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