1 /******************************************************************************/
2 /* pfixtools: a collection of postfix related tools */
4 /* ________________________________________________________________________ */
6 /* Redistribution and use in source and binary forms, with or without */
7 /* modification, are permitted provided that the following conditions */
10 /* 1. Redistributions of source code must retain the above copyright */
11 /* notice, this list of conditions and the following disclaimer. */
12 /* 2. Redistributions in binary form must reproduce the above copyright */
13 /* notice, this list of conditions and the following disclaimer in the */
14 /* documentation and/or other materials provided with the distribution. */
15 /* 3. The names of its contributors may not be used to endorse or promote */
16 /* products derived from this software without specific prior written */
19 /* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND */
20 /* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE */
21 /* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR */
22 /* PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS */
23 /* BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR */
24 /* CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF */
25 /* SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS */
26 /* INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN */
27 /* CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) */
28 /* ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF */
29 /* THE POSSIBILITY OF SUCH DAMAGE. */
30 /******************************************************************************/
33 * Copyright © 2008 Florent Bruneau
40 #define config_param_register(Param)
42 config_param_register("first_filter");
44 static inline config_t *config_new(void)
46 config_t *config = p_new(config_t, 1);
47 config->entry_point = -1;
51 void config_delete(config_t **config)
54 array_deep_wipe((*config)->filters, filter_wipe);
55 array_deep_wipe((*config)->params, filter_params_wipe);
61 static bool config_second_pass(config_t *config)
64 if (config->filters.len > 0) {
65 # define QSORT_TYPE filter_t
66 # define QSORT_BASE config->filters.data
67 # define QSORT_NELT config->filters.len
68 # define QSORT_LT(a,b) strcmp(a->name, b->name) < 0
72 foreach (filter_t *filter, config->filters) {
73 if (!filter_update_references(filter, &config->filters)) {
79 config->entry_point = -1;
80 foreach (filter_param_t *param, config->params) {
81 switch (param->type) {
82 case ATK_FIRST_FILTER:
83 config->entry_point = filter_find_with_name(&config->filters,
89 array_deep_wipe(config->params, filter_params_wipe);
91 if (config->entry_point == -1) {
93 syslog(LOG_ERR, "no entry point defined");
99 config_t *config_read(const char *file)
110 ssize_t key_len, value_len;
112 if (!file_map_open(&map, file, false)) {
116 config = config_new();
117 filter_init(&filter);
120 #define READ_ERROR(Fmt, ...) \
122 syslog(LOG_ERR, "config file %s:%d:%d: " Fmt, file, line + 1, \
123 p - linep + 1, ##__VA_ARGS__); \
126 #define ADD_IN_BUFFER(Buffer, Len, Char) \
128 if ((Len) >= BUFSIZ - 1) { \
129 READ_ERROR("unreasonnable long line"); \
131 (Buffer)[(Len)++] = (Char); \
132 (Buffer)[(Len)] = '\0'; \
134 #define READ_NEXT(OnEOF) \
140 if (++p >= map.end) { \
144 #define READ_BLANK(OnEOF) \
146 bool in_comment = false; \
147 while (in_comment || isspace(*p) || *p == '#') { \
149 in_comment = false; \
150 } else if (*p == '#') { \
156 #define READ_TOKEN(Name, Buffer, Len) \
159 (Buffer)[0] = '\0'; \
160 if (!isalpha(*p)) { \
161 READ_ERROR("invalid %s, unexpected character '%c'", Name, *p); \
164 ADD_IN_BUFFER(Buffer, Len, *p); \
165 READ_NEXT(goto badeof); \
166 } while (isalnum(*p) || *p == '_'); \
168 #define READ_STRING(Name, Buffer, Len, OnEOF) \
171 (Buffer)[0] = '\0'; \
173 bool escaped = false; \
174 while (*p == '"') { \
175 READ_NEXT(goto badeof); \
178 READ_ERROR("string must not contain EOL"); \
179 } else if (escaped) { \
180 ADD_IN_BUFFER(Buffer, Len, *p); \
182 } else if (*p == '\\') { \
184 } else if (*p == '"') { \
185 READ_NEXT(goto badeof); \
188 ADD_IN_BUFFER(Buffer, Len, *p); \
190 READ_NEXT(goto badeof); \
192 READ_BLANK(goto badeof); \
195 READ_ERROR("%s must end with a ';'", Name); \
198 bool escaped = false; \
199 while (*p != ';' && isascii(*p) && (isprint(*p) || isspace(*p))) { \
201 if (*p == '\r' || *p == '\n') { \
202 READ_BLANK(goto badeof); \
204 ADD_IN_BUFFER(Buffer, Len, '\\'); \
210 } else if (*p == '\r' || *p == '\n') { \
211 READ_ERROR("%s must not contain EOL", Name); \
213 ADD_IN_BUFFER(Buffer, Len, *p); \
215 READ_NEXT(goto badeof); \
218 ADD_IN_BUFFER(Buffer, Len, '\\'); \
230 value[0] = key[0] = '\0';
231 value_len = key_len = 0;
234 READ_TOKEN("section name", key, key_len);
235 READ_BLANK(goto badeof);
238 READ_NEXT(goto badeof);
239 goto read_param_value;
241 READ_NEXT(goto badeof);
244 READ_ERROR("invalid character '%c', expected '=' or '{'", *p);
248 READ_BLANK(goto badeof);
249 READ_STRING("parameter value", value, value_len, ;);
251 filter_param_t param;
252 param.type = param_tokenize(key, key_len);
253 if (param.type != ATK_UNKNOWN) {
254 param.value = m_strdup(value);
255 array_add(config->params, param);
261 filter_set_name(&filter, key, key_len);
262 READ_BLANK(goto badeof);
264 READ_TOKEN("filter parameter name", key, key_len);
265 READ_BLANK(goto badeof);
267 READ_ERROR("invalid character '%c', expected '='", *p);
269 READ_NEXT(goto badeof);
270 READ_BLANK(goto badeof);
271 READ_STRING("filter parameter value", value, value_len, goto badeof);
272 READ_BLANK(goto badeof);
273 if (strcmp(key, "type") == 0) {
274 if (!filter_set_type(&filter, value, value_len)) {
275 READ_ERROR("unknow filter type (%s) for filter %s",
278 } else if (key_len > 3 && strncmp(key, "on_", 3) == 0) {
279 if (!filter_add_hook(&filter, key + 3, key_len - 3,
281 READ_ERROR("hook %s not supported by filter %s",
282 key + 3, filter.name);
285 /* filter_add_param failure mean unknown type or unsupported type.
286 * this are non-fatal errors.
288 (void)filter_add_param(&filter, key, key_len, value, value_len);
292 if (!filter_build(&filter)) {
293 READ_ERROR("invalid filter %s", filter.name);
295 array_add(config->filters, filter);
296 filter_init(&filter);
300 if (!config_second_pass(config)) {
303 file_map_close(&map);
307 syslog(LOG_ERR, "Unexpected end of file");
310 filter_wipe(&filter);
311 config_delete(&config);
312 file_map_close(&map);