home · contact · privacy
License everything (GPL).
[plomrogue] / src / client / parse.c
1 /* src/client/parse.c
2  *
3  * This file is part of PlomRogue. PlomRogue is licensed under the GPL version 3
4  * or any later version. For details on its copyright, license, and warranties,
5  * see the file NOTICE in the root directory of the PlomRogue source package.
6  */
7
8 #define _POSIX_C_SOURCE 200809L /* strdup(), snprintf() */
9 #include "parse.h"
10 #include <stddef.h> /* size_t, NULL */
11 #include <stdio.h> /* FILE, snprintf() */
12 #include <stdint.h> /* uint8_t, uint32_t */
13 #include <stdlib.h> /* free() */
14 #include <string.h> /* strdup(), strlen() */
15 #include <unistd.h> /* access(), F_OK */
16 #include "../common/parse_file.h" /* set_err_line_options(), err_line_inc(),
17                                    * err_line_zero(), token_from_line()
18                                    */
19 #include "../common/readwrite.h" /* try_fopen(),try_fclose(),textfile_width() */
20 #include "../common/rexit.h" /* exit_err(), exit_trouble() */
21 #include "../common/try_malloc.h" /* try_malloc() */
22
23
24
25 extern void parse_file(char * path, void (* token_to_entry) (char *, char *))
26 {
27     char * prefix = "Failed reading config file: \"";
28     char * affix = "\". ";
29     size_t size = strlen(prefix) + strlen(path) + strlen(affix) + 1;
30     char * errline_intro = try_malloc(size, __func__);
31     int test = snprintf(errline_intro, size, "%s%s%s", prefix, path, affix);
32     exit_trouble(test < 0, __func__, "snprintf");
33     exit_err(access(path, F_OK), errline_intro);
34     FILE * file = try_fopen(path, "r", __func__);
35     uint32_t linemax = textfile_width(file);
36     char * errline_line = try_malloc(linemax + 1, __func__);
37     set_err_line_options(errline_intro, errline_line, 1);
38     err_line_zero();
39     err_line(!linemax, "File is empty.");
40     char * token0 = NULL; /* For final token_to_entry() if while() stagnates. */
41     char * token1 = NULL;
42     char * err_val = "No value given.";
43     while (try_fgets(errline_line, linemax + 1, file, __func__))
44     {
45         err_line_inc();
46         char * line_copy = strdup(errline_line);
47         token0 = token_from_line(line_copy);
48         if (token0)
49         {
50             err_line(0 == (token1 = token_from_line(NULL)), err_val);
51             token_to_entry(token0, token1);
52             token0 = NULL;
53         }
54         free(line_copy);
55     }
56     token_to_entry(token0, token1);
57     try_fclose(file, __func__);
58     free(errline_line);
59     free(errline_intro);
60 }
61
62
63
64 extern void parsetest_defcontext(uint8_t flags)
65 {
66     err_line(!(flags & EDIT_STARTED),"Outside appropriate definition context.");
67 }
68
69
70
71 extern void parsetest_too_many_values()
72 {
73     err_line(!(!token_from_line(NULL)), "Too many values.");
74 }
75
76
77
78 extern void parse_id_uniq(int test)
79 {
80     err_line(0 != test, "Declaration of ID already used.");
81 }
82
83
84
85 extern void parse_unknown_arg()
86 {
87     err_line(1, "Unknown argument.");
88 }
89
90
91
92 extern char * parse_init_entry(uint8_t * flags, size_t size)
93 {
94     *flags = EDIT_STARTED;
95     char * p = try_malloc(size, __func__);
96     memset(p, 0, size);
97     return p;
98 }
99
100
101
102 extern uint8_t parse_flagval(char * token0, char * token1, char * comparand,
103                              uint8_t * flags, uint8_t set_flag, char type,
104                              char * element)
105 {
106     if (parse_val(token0, token1, comparand, type, element))
107     {
108         parsetest_defcontext(*flags);
109         *flags = *flags | set_flag;
110         return 1;
111     }
112     return 0;
113 }
114
115
116
117 extern void parse_and_reduce_to_readyflag(uint8_t * flags, uint8_t ready_flag)
118 {
119     char * err_fin = "Last definition block not finished yet.";
120     err_line((*flags & ready_flag) ^ ready_flag, err_fin);
121     *flags = ready_flag;
122 }