masqmail

view src/conf.c @ 17:6c59dedd06be

find changesets by author, revision, files, or words in the commit message
fixed delivery with empty or non-existent alias file Thanks to Marcos Dione for the hint where to look. (Closes Debian bug #417842)
author meillo@marmaro.de
date Thu, 06 Nov 2008 09:41:35 +0100
parents 49dab67fe461
children 71605f542ecc
line source
1 /* MasqMail
2 Copyright (C) 1999-2001 Oliver Kurth
3
4 This program is free software; you can redistribute it and/or modify
5 it under the terms of the GNU General Public License as published by
6 the Free Software Foundation; either version 2 of the License, or
7 (at your option) any later version.
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 #include <pwd.h>
20 #include <grp.h>
21
22 #include "masqmail.h"
23
24 masqmail_conf conf;
25
26 void
27 init_conf()
28 {
29 struct passwd *passwd;
30 struct group *group;
31
32 memset(&conf, 0, sizeof(masqmail_conf));
33
34 conf.orig_uid = getuid();
35 conf.orig_gid = getgid();
36
37 if ((passwd = getpwnam(DEF_MAIL_USER)))
38 conf.mail_uid = passwd->pw_uid;
39 else {
40 fprintf(stderr, "user %s not found! (terminating)\n", DEF_MAIL_USER);
41 exit(EXIT_FAILURE);
42 }
43 if ((group = getgrnam(DEF_MAIL_GROUP)))
44 conf.mail_gid = group->gr_gid;
45 else {
46 fprintf(stderr, "group %s not found! (terminating)\n", DEF_MAIL_GROUP);
47 exit(EXIT_FAILURE);
48 }
49 }
50
51 static gchar* true_strings[] = {
52 "yes", "on", "true", NULL
53 };
54
55 static gchar *false_strings[] = {
56 "no", "off", "false", NULL
57 };
58
59 static gboolean
60 parse_boolean(gchar * rval)
61 {
62 gchar **str;
63
64 DEBUG(6) fprintf(stderr, "parse_boolean: %s\n", rval);
65
66 str = true_strings;
67 while (*str) {
68 if (strncasecmp(*str, rval, strlen(*str)) == 0)
69 return TRUE;
70 str++;
71 }
72
73 str = false_strings;
74 while (*str) {
75 if (strncasecmp(*str, rval, strlen(*str)) == 0)
76 return FALSE;
77 str++;
78 }
79
80 fprintf(stderr, "cannot parse value '%s'\n", rval);
81 exit(EXIT_FAILURE);
82 }
83
84 /* make a list from each line in a file */
85 static GList*
86 parse_list_file(gchar * fname)
87 {
88 GList *list = NULL;
89 FILE *fptr;
90
91 if ((fptr = fopen(fname, "rt"))) {
92 gchar buf[256];
93
94 while (!feof(fptr)) {
95 fgets(buf, 255, fptr);
96 if (buf[0] && (buf[0] != '#') && (buf[0] != '\n')) {
97 g_strchomp(buf);
98 list = g_list_append(list, g_strdup(buf));
99 }
100 }
101 fclose(fptr);
102 } else {
103 logwrite(LOG_ALERT, "could not open %s for reading: %s\n", fname, strerror(errno));
104 exit(EXIT_FAILURE);
105 }
106
107 return list;
108 }
109
110 /* given a semicolon separated string, this function makes a GList out of it. */
111 GList*
112 parse_list(gchar * line, gboolean read_file)
113 {
114 GList *list = NULL;
115 gchar buf[256];
116 gchar *p, *q;
117
118 DEBUG(6) fprintf(stderr, "parsing list %s\n", line);
119
120 p = line;
121 while (*p != '\0') {
122 q = buf;
123
124 while (*p && (*p != ';') && (q < buf + 255))
125 *(q++) = *(p++);
126 *q = '\0';
127
128 if ((buf[0] == '/') && (read_file))
129 /* item is a filename, include its contents */
130 list = g_list_concat(list, parse_list_file(buf));
131 else
132 /* just a normal item */
133 list = g_list_append(list, g_strdup(buf));
134
135 DEBUG(6) printf("item = %s\n", buf);
136
137 if (*p)
138 p++;
139 }
140 return list;
141 }
142
143 static GList*
144 parse_address_list(gchar * line, gboolean read_file)
145 {
146 GList *plain_list = parse_list(line, read_file);
147 GList *node;
148 GList *list = NULL;
149
150 foreach(plain_list, node) {
151 gchar *item = (gchar *) (node->data);
152 address *addr = create_address(item, TRUE);
153 if (addr)
154 list = g_list_append(list, addr);
155 g_free(item);
156 }
157 g_list_free(plain_list);
158
159 return list;
160 }
161
162 static GList*
163 parse_resolve_list(gchar * line)
164 {
165 GList *list;
166 GList *list_node;
167 GList *res_list = NULL;
168
169 list = parse_list(line, FALSE);
170 if (list) {
171 foreach(list, list_node) {
172 gchar *item = (gchar *) (list_node->data);
173 if (strcmp(item, "byname") == 0) {
174 res_list = g_list_append(res_list, resolve_byname);
175 #ifdef ENABLE_RESOLVER
176 } else if (strcmp(item, "dns_a") == 0) {
177 res_list = g_list_append(res_list, resolve_dns_a);
178 } else if (strcmp(item, "dns_mx") == 0) {
179 res_list = g_list_append(res_list, resolve_dns_mx);
180 #endif
181 } else {
182 logwrite(LOG_ALERT, "unknown resolver %s\n", item);
183 exit(EXIT_FAILURE);
184 }
185 g_free(item);
186 }
187 g_list_free(list);
188 }
189 return res_list;
190 }
191
192 static interface*
193 parse_interface(gchar * line, gint def_port)
194 {
195 gchar buf[256];
196 gchar *p, *q;
197 interface *iface;
198
199 DEBUG(6) fprintf(stderr, "parse_interface: %s\n", line);
200
201 p = line;
202 q = buf;
203 while ((*p != '\0') && (*p != ':') && (q < buf + 255))
204 *(q++) = *(p++);
205 *q = '\0';
206
207 iface = g_malloc(sizeof(interface));
208 iface->address = g_strdup(buf);
209
210 if (*p) {
211 p++;
212 iface->port = atoi(p);
213 } else
214 iface->port = def_port;
215
216 return iface;
217 }
218
219 #ifdef ENABLE_IDENT /* so far used for that only */
220 static struct in_addr*
221 parse_network(gchar * line, gint def_port)
222 {
223 gchar buf[256];
224 gchar *p, *q;
225 struct in_addr addr, mask_addr, net_addr, *p_net_addr;
226 guint n;
227
228 DEBUG(6) fprintf(stderr, "parse_network: %s\n", line);
229
230 p = line;
231 q = buf;
232 while ((*p != '\0') && (*p != '/') && (q < buf + 255))
233 *(q++) = *(p++);
234 *q = '\0';
235
236 if ((addr.s_addr = inet_addr(buf)) != INADDR_NONE) {
237 if (*p) {
238 guint i;
239 p++;
240 i = atoi(p);
241 if ((i >= 0) && (i <= 32))
242 n = i ? ~((1 << (32 - i)) - 1) : 0;
243 else {
244 fprintf(stderr, "'%d' is not a valid net mask (must be >= 0 and <= 32)\n", i);
245 exit(EXIT_FAILURE);
246 }
247 } else
248 n = 0;
249
250 mask_addr.s_addr = htonl(n);
251 net_addr.s_addr = mask_addr.s_addr & addr.s_addr;
252 } else {
253 fprintf(stderr, "'%s' is not a valid address (must be ip)\n", buf);
254 exit(EXIT_FAILURE);
255 }
256
257 p_net_addr = g_malloc(sizeof(struct in_addr));
258 p_net_addr->s_addr = net_addr.s_addr;
259 return p_net_addr;
260 }
261 #endif
262
263 static gboolean
264 eat_comments(FILE * in)
265 {
266 gint c;
267
268 for (c = fgetc(in); (c == '#' || isspace(c)) && c != EOF;
269 c = fgetc(in)) {
270 if (c == '#') {
271 gint c;
272 for (c = fgetc(in); (c != '\n') && (c != EOF); c = fgetc(in));
273 }
274 }
275 if (c == EOF)
276 return FALSE;
277 ungetc(c, in);
278 return TRUE;
279 }
280
281 /* after parsing, eat trailing character until LF */
282 static gboolean
283 eat_line_trailing(FILE * in)
284 {
285 gint c;
286
287 for (c = fgetc(in); c != EOF && c != '\n'; c = fgetc(in));
288 if (c == EOF)
289 return FALSE;
290 return TRUE;
291 }
292
293 static gboolean
294 eat_spaces(FILE * in)
295 {
296 gint c;
297
298 for (c = fgetc(in); c != EOF && isspace(c); c = fgetc(in));
299 if (c == EOF)
300 return FALSE;
301 ungetc(c, in);
302 return TRUE;
303 }
304
305 static gboolean
306 read_lval(FILE * in, gchar * buf, gint size)
307 {
308 gint c;
309 gchar *ptr = buf;
310
311 DEBUG(6) fprintf(stderr, "read_lval()\n");
312
313 if (!eat_spaces(in))
314 return FALSE;
315
316 c = fgetc(in);
317 DEBUG(6) fprintf(stderr, "read_lval() 2\n");
318 while ((isalnum(c) || c == '_' || c == '-' || c == '.')
319 && (ptr < buf + size - 1)
320 && (c != EOF)) {
321 *ptr = c;
322 ptr++;
323 c = fgetc(in);
324 }
325 *ptr = '\0';
326 ungetc(c, in);
327
328 if (c == EOF) {
329 fprintf(stderr, "unexpected EOF after %s\n", buf);
330 return FALSE;
331 } else if (ptr >= buf + size - 1) {
332 fprintf(stderr, "lval too long\n");
333 }
334
335 eat_spaces(in);
336
337 DEBUG(6) fprintf(stderr, "lval = %s\n", buf);
338
339 return buf[0] != '\0';
340 }
341
342 static gboolean
343 read_rval(FILE * in, gchar * buf, gint size)
344 {
345 gint c;
346 gchar *ptr = buf;
347
348 DEBUG(6) fprintf(stderr, "read_rval()\n");
349
350 if (!eat_spaces(in))
351 return FALSE;
352
353 c = fgetc(in);
354 if (c != '\"') {
355 while ((isalnum(c) || c == '_' || c == '-' || c == '.' || c == '/' || c == '@' || c == ';')
356 && (ptr < buf + size - 1)
357 && (c != EOF)) {
358 *ptr = c;
359 ptr++;
360 c = fgetc(in);
361 }
362 *ptr = '\0';
363 ungetc(c, in);
364 } else {
365 gboolean escape = FALSE;
366 c = fgetc(in);
367 while (((c != '\"') || escape) && (ptr < buf + size - 1)) {
368 if (c != '\n') { /* ignore line breaks */
369 if ((c == '\\') && (!escape)) {
370 escape = TRUE;
371 } else {
372 *ptr = c;
373 ptr++;
374 escape = FALSE;
375 }
376 }
377 c = fgetc(in);
378 }
379 *ptr = '\0';
380 }
381
382 eat_line_trailing(in);
383
384 DEBUG(6) fprintf(stderr, "rval = %s\n", buf);
385
386 return TRUE;
387 }
388
389 static gboolean
390 read_statement(FILE * in, gchar * lval, gint lsize, gchar * rval, gint rsize)
391 {
392 gint c;
393
394 DEBUG(6) fprintf(stderr, "read_statement()\n");
395
396 /* eat comments and empty lines: */
397 if (!eat_comments(in))
398 return FALSE;
399
400 DEBUG(6) fprintf(stderr, "read_statement() 1\n");
401
402 if (read_lval(in, lval, lsize)) {
403 DEBUG(6) fprintf(stderr, "lval = %s\n", lval);
404 if ((c = fgetc(in) == '=')) {
405 if (read_rval(in, rval, rsize)) {
406 DEBUG(6) fprintf(stderr, "rval = %s\n", rval);
407 return TRUE;
408 }
409 } else {
410 fprintf(stderr, "'=' expected after %s, char was '%c'\n", lval, c);
411 }
412 }
413 return FALSE;
414 }
415
416 gboolean
417 read_conf(gchar * filename)
418 {
419 FILE *in;
420
421 conf.log_max_pri = 7;
422 conf.remote_port = 25;
423 conf.do_relay = TRUE;
424 conf.alias_local_cmp = strcmp;
425 conf.max_defer_time = 86400 * 4; /* 4 days */
426
427 if ((in = fopen(filename, "r"))) {
428 gchar lval[256], rval[2048];
429 while (read_statement(in, lval, 256, rval, 2048)) {
430 if (strcmp(lval, "debug_level") == 0)
431 conf.debug_level = atoi(rval);
432 else if (strcmp(lval, "run_as_user") == 0) {
433 if (!conf.run_as_user) /* you should not be able to reset that flag */
434 conf.run_as_user = parse_boolean(rval);
435 } else if (strcmp(lval, "use_syslog") == 0)
436 conf.use_syslog = parse_boolean(rval);
437 else if (strcmp(lval, "mail_dir") == 0)
438 conf.mail_dir = g_strdup(rval);
439 else if (strcmp(lval, "lock_dir") == 0)
440 conf.lock_dir = g_strdup(rval);
441 else if (strcmp(lval, "spool_dir") == 0)
442 conf.spool_dir = g_strdup(rval);
443 else if (strcmp(lval, "log_dir") == 0)
444 conf.log_dir = g_strdup(rval);
445 else if (strcmp(lval, "host_name") == 0) {
446 if (rval[0] != '/')
447 conf.host_name = g_strdup(rval);
448 else {
449 char buf[256];
450 FILE *fptr = fopen(rval, "rt");
451 if (fptr) {
452 fgets(buf, 255, fptr);
453 g_strchomp(buf);
454 conf.host_name = g_strdup(buf);
455 fclose(fptr);
456 } else {
457 fprintf(stderr, "could not open %s: %s\n", rval,
458 strerror(errno));
459 return FALSE;
460 }
461 }
462 } else if (strcmp(lval, "remote_port") == 0) {
463 fprintf(stderr, "the remote_port option is now deprecated. Use 'mail_host' in the\n"
464 "route configuration instead. See man masqmail.route\n");
465 conf.remote_port = atoi(rval);
466 } else if (strcmp(lval, "local_hosts") == 0)
467 conf.local_hosts = parse_list(rval, FALSE);
468 else if (strcmp(lval, "local_addresses") == 0)
469 conf.local_addresses = parse_list(rval, TRUE);
470 else if (strcmp(lval, "not_local_addresses") == 0)
471 conf.not_local_addresses = parse_list(rval, TRUE);
472 else if (strcmp(lval, "local_nets") == 0)
473 conf.local_nets = parse_list(rval, FALSE);
474 else if (strcmp(lval, "do_save_envelope_to") == 0)
475 conf.do_save_envelope_to = parse_boolean(rval);
476 else if (strcmp(lval, "defer_all") == 0)
477 conf.defer_all = parse_boolean(rval);
478 else if (strcmp(lval, "do_relay") == 0)
479 conf.do_relay = parse_boolean(rval);
480 else if (strcmp(lval, "alias_file") == 0) {
481 conf.alias_file = g_strdup(rval);
482 } else if (strcmp(lval, "alias_local_caseless") == 0) {
483 conf.alias_local_cmp = parse_boolean(rval) ? strcasecmp : strcmp;
484 } else if (strcmp(lval, "mbox_default") == 0) {
485 conf.mbox_default = g_strdup(rval);
486 } else if (strcmp(lval, "mbox_users") == 0) {
487 conf.mbox_users = parse_list(rval, TRUE);
488 } else if (strcmp(lval, "mda_users") == 0) {
489 conf.mda_users = parse_list(rval, TRUE);
490 } else if (strcmp(lval, "maildir_users") == 0) {
491 conf.maildir_users = parse_list(rval, TRUE);
492 } else if (strcmp(lval, "mda") == 0) {
493 conf.mda = g_strdup(rval);
494 } else if (strcmp(lval, "mda_fromline") == 0) {
495 conf.mda_fromline = parse_boolean(rval);
496 } else if (strcmp(lval, "mda_fromhack") == 0) {
497 conf.mda_fromhack = parse_boolean(rval);
498 } else if (strcmp(lval, "pipe_fromline") == 0) {
499 conf.pipe_fromline = parse_boolean(rval);
500 } else if (strcmp(lval, "pipe_fromhack") == 0) {
501 conf.pipe_fromhack = parse_boolean(rval);
502 } else if (strcmp(lval, "listen_addresses") == 0) {
503 GList *node;
504 GList *tmp_list = parse_list(rval, FALSE);
505
506 conf.listen_addresses = NULL;
507 foreach(tmp_list, node) {
508 conf.listen_addresses = g_list_append(conf.listen_addresses, parse_interface((gchar *) (node-> data), 25));
509 g_free(node->data);
510 }
511 g_list_free(tmp_list);
512 } else if (strcmp(lval, "ident_trusted_nets") == 0) {
513 #ifdef ENABLE_IDENT
514 GList *node;
515 GList *tmp_list = parse_list(rval, FALSE);
516
517 conf.ident_trusted_nets = NULL;
518 foreach(tmp_list, node) {
519 conf.ident_trusted_nets = g_list_append(conf.ident_trusted_nets, parse_network((gchar *) (node->data), 25));
520 g_free(node->data);
521 }
522 g_list_free(tmp_list);
523 #else
524 fprintf(stderr, "%s ignored: not compiled with ident support\n", lval);
525 #endif
526 } else if ((strncmp(lval, "connect_route.", 14) == 0)
527 || (strncmp(lval, "online_routes.", 14) == 0)) {
528 GList *file_list = parse_list(rval, FALSE);
529 table_pair *pair = create_pair(&(lval[14]), file_list);
530 conf.connect_routes = g_list_append(conf.connect_routes, pair);
531 } else if (strcmp(lval, "local_net_route") == 0) {
532 conf.local_net_routes = parse_list(rval, FALSE);
533 } else if (strcmp(lval, "online_detect") == 0)
534 conf.online_detect = g_strdup(rval);
535 else if (strcmp(lval, "online_file") == 0)
536 conf.online_file = g_strdup(rval);
537 else if (strcmp(lval, "online_pipe") == 0)
538 conf.online_pipe = g_strdup(rval);
539 else if (strcmp(lval, "mserver_iface") == 0)
540 conf.mserver_iface = parse_interface(rval, 224);
541 else if (strcmp(lval, "do_queue") == 0)
542 conf.do_queue = parse_boolean(rval);
543 else if (strncmp(lval, "get.", 4) == 0) {
544 #ifdef ENABLE_POP3
545 table_pair *pair = create_pair_string(&(lval[4]), rval);
546 conf.get_names = g_list_append(conf.get_names, pair);
547 #else
548 fprintf(stderr, "get.<name> ignored: not compiled with pop support\n");
549 #endif
550 } else if (strncmp(lval, "online_gets.", 12) == 0) {
551 #ifdef ENABLE_POP3
552 GList *file_list = parse_list(rval, FALSE);
553 table_pair *pair = create_pair(&(lval[12]), file_list);
554 conf.online_gets = g_list_append(conf.online_gets, pair);
555 #else
556 fprintf(stderr, "online_gets.<name> ignored: not compiled with pop support\n");
557 #endif
558 } else if (strcmp(lval, "errmsg_file") == 0)
559 conf.errmsg_file = g_strdup(rval);
560 else if (strcmp(lval, "warnmsg_file") == 0)
561 conf.warnmsg_file = g_strdup(rval);
562 else if (strcmp(lval, "warn_intervals") == 0)
563 conf.warn_intervals = parse_list(rval, FALSE);
564 else if (strcmp(lval, "max_defer_time") == 0) {
565 gint dummy;
566 gint ival = time_interval(rval, &dummy);
567 if (ival < 0)
568 fprintf(stderr, "invalid time interval for 'max_defer_time': %s\n", rval);
569 else
570 conf.max_defer_time = ival;
571 } else if (strcmp(lval, "log_user") == 0)
572 conf.log_user = g_strdup(rval);
573
574 else
575 fprintf(stderr, "var '%s' not (yet) known, ignored\n", lval);
576 }
577 fclose(in);
578
579 if (conf.errmsg_file == NULL)
580 conf.errmsg_file = g_strdup(DATA_DIR "/tpl/failmsg.tpl");
581 if (conf.warnmsg_file == NULL)
582 conf.warnmsg_file = g_strdup(DATA_DIR "/tpl/warnmsg.tpl");
583
584 if (conf.lock_dir == NULL)
585 conf.lock_dir = g_strdup_printf("%s/lock/", conf.spool_dir);
586
587 if (conf.mbox_default == NULL)
588 conf.mbox_default = g_strdup("mbox");
589
590 if (conf.warn_intervals == NULL)
591 conf.warn_intervals = parse_list("1h;4h;8h;1d;2d;3d", FALSE);
592
593 return TRUE;
594 } else
595 fprintf(stderr, "could not open config file %s: %s\n", filename, strerror(errno));
596 return FALSE;
597 }
598
599 connect_route*
600 read_route(gchar * filename, gboolean is_local_net)
601 {
602 gboolean ok = FALSE;
603 FILE *in;
604
605 connect_route *route = g_malloc(sizeof(connect_route));
606 memset(route, 0, sizeof(connect_route));
607
608 DEBUG(5) debugf("read_route, filename = %s\n", filename);
609
610 route->filename = g_strdup(filename);
611 route->name = g_strdup(filename); /* quick hack */
612
613 route->protocol = g_strdup("smtp");
614 route->expand_h_sender_address = TRUE;
615
616 route->is_local_net = is_local_net;
617
618 route->do_pipelining = TRUE;
619
620 if ((in = fopen(route->filename, "r"))) {
621 gchar lval[256], rval[2048];
622 while (read_statement(in, lval, 256, rval, 2048)) {
623 if (strcmp(lval, "protocol") == 0)
624 route->protocol = g_strdup(rval);
625 else if (strcmp(lval, "mail_host") == 0)
626 route->mail_host = parse_interface(rval, conf.remote_port);
627 else if (strcmp(lval, "helo_name") == 0)
628 route->helo_name = g_strdup(rval);
629 else if (strcmp(lval, "wrapper") == 0)
630 route->wrapper = g_strdup(rval);
631 else if (strcmp(lval, "connect_error_fail") == 0)
632 route->connect_error_fail = parse_boolean(rval);
633 else if (strcmp(lval, "do_correct_helo") == 0)
634 route->do_correct_helo = parse_boolean(rval);
635 else if (strcmp(lval, "do_pipelining") == 0)
636 route->do_pipelining = parse_boolean(rval);
637 else if (strcmp(lval, "allowed_return_paths") == 0)
638 route->allowed_return_paths = parse_address_list(rval, TRUE);
639 else if (strcmp(lval, "allowed_mail_locals") == 0)
640 route->allowed_mail_locals = parse_list(rval, TRUE);
641 else if (strcmp(lval, "not_allowed_return_paths") == 0)
642 route->not_allowed_return_paths = parse_address_list(rval, TRUE);
643 else if (strcmp(lval, "not_allowed_mail_locals") == 0)
644 route->not_allowed_mail_locals = parse_list(rval, TRUE);
645 else if (strcmp(lval, "allowed_rcpt_domains") == 0)
646 route->allowed_rcpt_domains = parse_list(rval, TRUE);
647 else if (strcmp(lval, "not_allowed_rcpt_domains") == 0)
648 route->not_allowed_rcpt_domains = parse_list(rval, TRUE);
649 else if (strcmp(lval, "set_h_from_domain") == 0)
650 route->set_h_from_domain = g_strdup(rval);
651 else if (strcmp(lval, "set_h_reply_to_domain") == 0)
652 route->set_h_reply_to_domain = g_strdup(rval);
653 else if (strcmp(lval, "set_return_path_domain") == 0)
654 route->set_return_path_domain = g_strdup(rval);
655 else if (strcmp(lval, "map_return_path_addresses") == 0) {
656 GList *node, *list;
657
658 list = parse_list(rval, TRUE);
659 foreach(list, node) {
660 gchar *item = (gchar *) (node->data);
661 table_pair *pair = parse_table_pair(item, ':');
662 address *addr = create_address((gchar *) (pair->value), TRUE);
663 g_free(pair->value);
664 pair->value = (gpointer *) addr;
665 route->map_return_path_addresses = g_list_append(route->map_return_path_addresses, pair);
666 g_free(item);
667 }
668 g_list_free(list);
669 } else if (strcmp(lval, "map_h_from_addresses") == 0) {
670 GList *list, *node;
671
672 list = parse_list(rval, TRUE);
673 foreach(list, node) {
674 gchar *item = (gchar *) (node->data);
675 table_pair *pair = parse_table_pair(item, ':');
676 route->map_h_from_addresses = g_list_append(route->map_h_from_addresses, pair);
677 g_free(item);
678 }
679 g_list_free(list);
680 } else if (strcmp(lval, "map_h_reply_to_addresses") == 0) {
681 GList *list, *node;
682
683 list = parse_list(rval, TRUE);
684 foreach(list, node) {
685 gchar *item = (gchar *) (node->data);
686 table_pair *pair = parse_table_pair(item, ':');
687 route->map_h_reply_to_addresses = g_list_append(route->map_h_reply_to_addresses, pair);
688 g_free(item);
689 }
690 g_list_free(list);
691 } else if (strcmp(lval, "map_h_mail_followup_to_addresses") == 0) {
692 GList *list, *node;
693
694 list = parse_list(rval, TRUE);
695 foreach(list, node) {
696 gchar *item = (gchar *) (node->data);
697 table_pair *pair = parse_table_pair(item, ':');
698 route->map_h_mail_followup_to_addresses = g_list_append(route->map_h_mail_followup_to_addresses, pair);
699 g_free(item);
700 }
701 g_list_free(list);
702 } else if (strcmp(lval, "expand_h_sender_domain") == 0) {
703 route->expand_h_sender_domain = parse_boolean(rval);
704 } else if (strcmp(lval, "expand_h_sender_address") == 0) {
705 route->expand_h_sender_address = parse_boolean(rval);
706 } else if (strcmp(lval, "resolve_list") == 0)
707 route->resolve_list = parse_resolve_list(rval);
708 else if (strcmp(lval, "do_ssl") == 0) {
709 /* we ignore this. This option is used by sqilconf */
710 ;
711 }
712 #ifdef ENABLE_AUTH
713 else if (strcmp(lval, "auth_name") == 0) {
714 route->auth_name = g_strdup(rval);
715 } else if (strcmp(lval, "auth_login") == 0) {
716 route->auth_login = g_strdup(rval);
717 } else if (strcmp(lval, "auth_secret") == 0) {
718 route->auth_secret = g_strdup(rval);
719 }
720 #else
721 else if ((strcmp(lval, "auth_name") == 0)
722 || (strcmp(lval, "auth_login") == 0)
723 || (strcmp(lval, "auth_secret") == 0)) {
724 logwrite(LOG_WARNING, "%s ignored: not compiled with auth support.\n", lval);
725 }
726 #endif
727 else if (strcmp(lval, "pop3_login") == 0) {
728 #ifdef ENABLE_POP3
729 route->pop3_login = g_strdup(rval);
730 #else
731 logwrite(LOG_WARNING, "pop3_login ignored: not compiled with pop support.\n");
732 #endif
733 } else if (strcmp(lval, "pipe") == 0) {
734 route->pipe = g_strdup(rval);
735 } else if (strcmp(lval, "pipe_fromline") == 0) {
736 route->pipe_fromline = parse_boolean(rval);
737 } else if (strcmp(lval, "pipe_fromhack") == 0) {
738 route->pipe_fromhack = parse_boolean(rval);
739 } else if (strcmp(lval, "last_route") == 0) {
740 route->last_route = parse_boolean(rval);
741 } else
742 logwrite(LOG_WARNING, "var '%s' not (yet) known, ignored\n", lval);
743 }
744
745 if (route->resolve_list == NULL) {
746 if (is_local_net) {
747 route->resolve_list = g_list_append(NULL, resolve_byname);
748 } else {
749 #ifdef ENABLE_RESOLVER
750 route->resolve_list = g_list_append(route->resolve_list, resolve_dns_mx);
751 route->resolve_list = g_list_append(route->resolve_list, resolve_dns_a);
752 #endif
753 route->resolve_list = g_list_append(route->resolve_list, resolve_byname);
754 }
755 }
756 fclose(in);
757 ok = TRUE;
758
759 /* warn user about misconfigurations: */
760 if ((route->map_h_from_addresses != NULL)
761 && (route->set_h_from_domain != NULL)) {
762 logwrite(LOG_WARNING, "'map_h_from_addresses' overrides 'set_h_from_domain'\n");
763 g_free(route->set_h_from_domain);
764 route->set_h_from_domain = NULL;
765 }
766 if ((route->map_h_reply_to_addresses != NULL)
767 && (route->set_h_reply_to_domain != NULL)) {
768 logwrite(LOG_WARNING, "'map_h_reply_to_addresses' overrides 'set_h_reply_to_domain'\n");
769 g_free(route->set_h_reply_to_domain);
770 route->set_h_reply_to_domain = NULL;
771 }
772 } else {
773 logwrite(LOG_ALERT, "could not open route file %s: %s\n", route->filename, strerror(errno));
774 }
775
776 if (!ok) {
777 g_free(route);
778 route = NULL;
779 }
780
781 return route;
782 }
783
784 static void
785 _g_list_free_all(GList * list)
786 {
787 GList *node;
788 if (list) {
789 foreach(list, node)
790 g_free(node->data);
791 g_list_free(list);
792 }
793 }
794
795 void
796 destroy_route(connect_route * r)
797 {
798 if (r->filename)
799 g_free(r->filename);
800 if (r->protocol)
801 g_free(r->protocol);
802 if (r->mail_host) {
803 g_free(r->mail_host->address);
804 g_free(r->mail_host);
805 }
806 if (r->wrapper)
807 g_free(r->wrapper);
808 if (r->helo_name)
809 g_free(r->helo_name);
810 _g_list_free_all(r->allowed_mail_locals);
811 _g_list_free_all(r->not_allowed_mail_locals);
812 _g_list_free_all(r->allowed_rcpt_domains);
813 _g_list_free_all(r->not_allowed_rcpt_domains);
814 if (r->set_h_from_domain)
815 g_free(r->set_h_from_domain);
816 if (r->set_h_reply_to_domain)
817 g_free(r->set_h_reply_to_domain);
818 if (r->set_return_path_domain)
819 g_free(r->set_return_path_domain);
820 if (r->map_h_reply_to_addresses)
821 destroy_table(r->map_h_reply_to_addresses);
822 if (r->resolve_list)
823 g_list_free(r->resolve_list);
824 #ifdef ENABLE_AUTH
825 if (r->auth_name)
826 g_free(r->auth_name);
827 if (r->auth_login)
828 g_free(r->auth_login);
829 if (r->auth_secret)
830 g_free(r->auth_secret);
831 #endif
832 #ifdef ENABLE_POP3
833 if (r->pop3_login)
834 g_free(r->pop3_login);
835 #endif
836 if (r->pipe)
837 g_free(r->pipe);
838 g_free(r);
839 }
840
841 GList*
842 read_route_list(GList * rf_list, gboolean is_local_net)
843 {
844 GList *list = NULL;
845 GList *node;
846 uid_t saved_uid, saved_gid;
847
848 if (!conf.run_as_user) {
849 set_euidgid(0, 0, &saved_uid, &saved_gid);
850 }
851
852 foreach(rf_list, node) {
853 gchar *fname = (gchar *) (node->data);
854 connect_route *route = read_route(fname, is_local_net);
855 if (route)
856 list = g_list_append(list, route);
857 else
858 logwrite(LOG_ALERT, "could not read route configuration %s\n", fname);
859 }
860
861 /* set uid and gid back */
862 if (!conf.run_as_user) {
863 set_euidgid(saved_uid, saved_gid, NULL, NULL);
864 }
865
866 return list;
867 }
868
869 void
870 destroy_route_list(GList * list)
871 {
872 GList *node;
873
874 foreach(list, node) {
875 connect_route *route = (connect_route *) (node->data);
876 destroy_route(route);
877 }
878 g_list_free(list);
879 }
880
881 #ifdef ENABLE_POP3
882
883 get_conf*
884 read_get_conf(gchar * filename)
885 {
886 FILE *in;
887
888 get_conf *gc = g_malloc(sizeof(get_conf));
889 memset(gc, 0, sizeof(get_conf));
890
891 gc->server_port = 110;
892
893 if ((in = fopen(filename, "r"))) {
894 gchar lval[256], rval[2048];
895 while (read_statement(in, lval, 256, rval, 2048)) {
896 if (strcmp(lval, "protocol") == 0)
897 gc->protocol = g_strdup(rval);
898 else if (strcmp(lval, "server") == 0)
899 gc->server_name = g_strdup(rval);
900 else if (strcmp(lval, "port") == 0)
901 gc->server_port = atoi(rval);
902 else if (strcmp(lval, "wrapper") == 0)
903 gc->wrapper = g_strdup(rval);
904 else if (strcmp(lval, "user") == 0)
905 gc->login_user = g_strdup(rval);
906 else if (strcmp(lval, "pass") == 0)
907 gc->login_pass = g_strdup(rval);
908 else if (strcmp(lval, "address") == 0)
909 gc->address = create_address_qualified(rval, TRUE, conf.host_name);
910 else if (strcmp(lval, "return_path") == 0)
911 gc->return_path = create_address_qualified(rval, TRUE, conf.host_name);
912 else if (strcmp(lval, "do_ssl") == 0)
913 /* we ignore this. This option is used by sqilconf */
914 ;
915 else if (strcmp(lval, "do_keep") == 0)
916 gc->do_keep = parse_boolean(rval);
917 else if (strcmp(lval, "do_uidl") == 0)
918 gc->do_uidl = parse_boolean(rval);
919 else if (strcmp(lval, "do_uidl_dele") == 0)
920 gc->do_uidl_dele = parse_boolean(rval);
921 else if (strcmp(lval, "max_size") == 0)
922 gc->max_size = atoi(rval);
923 else if (strcmp(lval, "max_size_delete") == 0)
924 gc->max_size = parse_boolean(rval);
925 else if (strcmp(lval, "max_count") == 0)
926 gc->max_count = atoi(rval);
927 else if (strcmp(lval, "resolve_list") == 0)
928 gc->resolve_list = parse_resolve_list(rval);
929 else
930 logwrite(LOG_WARNING, "var '%s' not (yet) known, ignored\n", lval);
931 }
932 fclose(in);
933
934 if (gc->resolve_list == NULL) {
935 #ifdef ENABLE_RESOLVER
936 gc->resolve_list = g_list_append(NULL, resolve_dns_a);
937 #endif
938 gc->resolve_list = g_list_append(NULL, resolve_byname);
939 }
940
941 if (gc->protocol == NULL)
942 gc->protocol = g_strdup("pop3");
943 return gc;
944 }
945 logwrite(LOG_ALERT, "could not open get file %s: %s\n", filename, strerror(errno));
946
947 g_free(gc);
948 return NULL;
949 }
950
951 void
952 destroy_get_conf(get_conf * gc)
953 {
954 if (gc->protocol)
955 g_free(gc->protocol);
956 if (gc->server_name)
957 g_free(gc->server_name);
958 if (gc->login_user)
959 g_free(gc->login_user);
960 if (gc->login_pass)
961 g_free(gc->login_pass);
962 if (gc->wrapper)
963 g_free(gc->wrapper);
964 if (gc->address)
965 destroy_address(gc->address);
966 if (gc->return_path)
967 destroy_address(gc->return_path);
968 if (gc->resolve_list)
969 g_list_free(gc->resolve_list);
970 g_free(gc);
971 }
972
973 #endif
974
975 connect_route*
976 create_local_route()
977 {
978 connect_route *route;
979
980 route = g_malloc(sizeof(connect_route));
981 if (route) {
982 memset(route, 0, sizeof(connect_route));
983 route->protocol = g_strdup("smtp");
984 route->is_local_net = TRUE;
985 route->name = g_strdup("local_net (default)");
986 route->expand_h_sender_address = TRUE;
987 route->resolve_list = g_list_append(NULL, resolve_byname);
988 route->connect_error_fail = TRUE;
989 }
990 return route;
991 }