discover: Add configuration methods
[petitboot] / discover / parser-conf.c
1 /*
2  *  Copyright (C) 2009 Sony Computer Entertainment Inc.
3  *  Copyright 2009 Sony Corp.
4  *
5  *  This program is free software; you can redistribute it and/or modify
6  *  it under the terms of the GNU General Public License as published by
7  *  the Free Software Foundation; version 2 of the License.
8  *
9  *  This program is distributed in the hope that it will be useful,
10  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
11  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12  *  GNU General Public License for more details.
13  *
14  *  You should have received a copy of the GNU General Public License
15  *  along with this program; if not, write to the Free Software
16  *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
17  */
18
19 #define _GNU_SOURCE
20
21 #include <assert.h>
22 #include <ctype.h>
23 #include <errno.h>
24 #include <fcntl.h>
25 #include <string.h>
26 #include <unistd.h>
27 #include <sys/types.h>
28 #include <sys/stat.h>
29
30 #include "log/log.h"
31 #include "talloc/talloc.h"
32 #include "parser-conf.h"
33 #include "parser-utils.h"
34 #include "paths.h"
35
36 /**
37  * conf_strip_str - Remove quotes and/or whitespace around a string.
38  *
39  * Returns the next byte to process, or NULL if the string is empty.
40  */
41
42 char *conf_strip_str(char *s)
43 {
44         char *e;
45
46         if (!s)
47                 return NULL;
48
49         while (*s == '"' || *s == '\'' || isspace(*s))
50                 s++;
51
52         e = s + strlen(s) - 1;
53
54         while (*e == '"' || *e == '\'' || isspace(*e))
55                 *(e--) = 0;
56
57         return strlen(s) ? s : NULL;
58 }
59
60 /**
61  * conf_replace_char - replace one char with another.
62  */
63
64 char *conf_replace_char(char *s, char from, char to)
65 {
66         if (!s)
67                 return NULL;
68
69         for ( ; *s; s++)
70                 if (*s == from)
71                         *s = to;
72
73         return s;
74 }
75
76 /**
77  * conf_get_pair - Get the next 'name/value' parameter pair.
78  * @str: The string to process.
79  * @name_out: Returns a pointer to the name.
80  * @value_out: Returns a pointer to the value.
81  * @tdelimiter: The pair separator.
82  * @terminator: The pair terminator.
83  *
84  * Parses a name=value pair returning pointers in @name_out and @value_out.
85  * The pair can be terminated by @terminator or a zero.
86  * If no '=' character is found @value_out is set and @name_out is
87  * set to NULL.
88  * If the value is empty *value_out is set to NULL.
89  * The string is modified in place.
90  *
91  * Returns the next byte to process, or NULL if we've hit the end of the
92  * string.
93  */
94
95 char *conf_get_pair(struct conf_context __attribute__((unused)) *conf, char *str,
96         char **name_out, char **value_out, char delimiter, char terminator)
97 {
98         char *sep, *end;
99
100         *name_out = *value_out = NULL;
101
102         /* terminate the value */
103         end = strchr(str, terminator);
104
105         if (end)
106                 *end = 0;
107
108         conf_replace_char(str, '\t', ' ');
109
110         str = conf_strip_str(str);
111
112         if (!str)
113                 goto exit;
114
115         sep = strchr(str, delimiter);
116
117         if (!sep) {
118                 *name_out = NULL;
119                 *value_out = conf_strip_str(str);
120         } else {
121                 *sep = 0;
122                 *name_out = conf_strip_str(str);
123                 *value_out = conf_strip_str(sep + 1);
124         }
125
126 exit:
127         pb_log("%s: @%s@%s@\n", __func__, *name_out, *value_out);
128
129         return end ? end + 1 : NULL;
130 }
131
132 /**
133  * conf_param_in_list - Search a list of strings for an entry.
134  * @list: A NULL treminated array of pointers to strings.
135  * @param: A string to search for.
136  *
137  * Retuns 1 if @param is found in @list, 0 if @param is not found.
138  */
139
140 int conf_param_in_list(const char *const *list, const char *param)
141 {
142         const char *const *str;
143
144         for (str = list; *str; str++)
145                 if (streq(*str, param))
146                         return 1;
147         return 0;
148 }
149
150 /**
151  * conf_init_global_options - Zero the global option table.
152  */
153
154 void conf_init_global_options(struct conf_context *conf)
155 {
156         int i;
157
158         if (!conf->global_options)
159                 return;
160
161         for (i = 0; conf->global_options[i].name; i++)
162                 conf->global_options[i].value = NULL;
163 }
164
165 /**
166  * conf_set_global_option - Set a value in the global option table.
167  *
168  * Check if an option (name=value) is a global option. If so, store it in
169  * the global options table, and return 1. Otherwise, return 0.
170  */
171
172 int conf_set_global_option(struct conf_context *conf, const char *name,
173         const char *value)
174 {
175         int i;
176
177         assert(conf->global_options);
178
179         for (i = 0; conf->global_options[i].name; i++) {
180                 if (streq(name, conf->global_options[i].name)) {
181                         conf->global_options[i].value
182                                 = talloc_strdup(conf, value);
183                         pb_log("%s: @%s@%s@\n", __func__, name, value);
184                         return 1;
185                 }
186         }
187         return 0;
188 }
189
190 /**
191  * conf_get_global_option - Get a value from the global option table.
192  * @conf: The parser struct conf_context.
193  * @name: The name of the (name:value) to retrieve.
194  *
195  * Returns the value if @name is found in the table, or NULL if @name
196  * is not found.
197  */
198
199 const char *conf_get_global_option(struct conf_context *conf,
200         const char *name)
201 {
202         int i;
203
204         assert(conf->global_options);
205
206         for (i = 0; conf->global_options[i].name ;i++)
207                 if (streq(name, conf->global_options[i].name)) {
208                         pb_log("%s: @%s@%s@\n", __func__, name,
209                                 conf->global_options[i].value);
210                         return conf->global_options[i].value;
211                 }
212
213         assert(0 && "unknown global name");
214         return NULL;
215 }
216
217 /**
218  * conf_parse_buf - The main parser loop.
219  *
220  * Called from conf_parse() with data read from a conf file.
221  */
222
223 void conf_parse_buf(struct conf_context *conf, char *buf,
224                 int len __attribute__((unused)))
225 {
226         char *pos, *name, *value;
227
228         assert(conf->get_pair);
229         assert(conf->process_pair);
230
231         for (pos = buf; pos;) {
232                 pos = conf->get_pair(conf, pos, &name, &value, '\n');
233
234                 if (!value)
235                         continue;
236
237                 if (name && *name == '#')
238                         continue;
239
240                 if (*value == '#')
241                         continue;
242
243                 conf->process_pair(conf, name, value);
244         }
245
246         if (conf->finish)
247                 conf->finish(conf);
248 }