masqmail

annotate src/conf.c @ 387:a408411ff8df

find changesets by author, revision, files, or words in the commit message
Added a glob-pattern aliasing facility. One use-case is virtual hosting another catch-all maildrops, but you may use it as a more flexible aliasing mechanism as well.
author markus schnalke <meillo@marmaro.de>
date Sat, 18 Feb 2012 12:35:12 +0100
parents 5781ba87df95
children c5fd796ea06e
rev   line source
meillo@367 1 /*
meillo@367 2 ** MasqMail
meillo@367 3 ** Copyright (C) 1999-2001 Oliver Kurth
meillo@367 4 ** Copyright (C) 2010 markus schnalke <meillo@marmaro.de>
meillo@367 5 **
meillo@367 6 ** This program is free software; you can redistribute it and/or modify
meillo@367 7 ** it under the terms of the GNU General Public License as published by
meillo@367 8 ** the Free Software Foundation; either version 2 of the License, or
meillo@367 9 ** (at your option) any later version.
meillo@367 10 **
meillo@367 11 ** This program is distributed in the hope that it will be useful,
meillo@367 12 ** but WITHOUT ANY WARRANTY; without even the implied warranty of
meillo@367 13 ** MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
meillo@367 14 ** GNU General Public License for more details.
meillo@367 15 **
meillo@367 16 ** You should have received a copy of the GNU General Public License
meillo@367 17 ** along with this program; if not, write to the Free Software
meillo@367 18 ** Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
meillo@0 19 */
meillo@0 20
meillo@13 21 #include <pwd.h>
meillo@13 22 #include <grp.h>
meillo@13 23
meillo@0 24 #include "masqmail.h"
meillo@0 25
meillo@0 26 masqmail_conf conf;
meillo@0 27
meillo@10 28 void
meillo@10 29 init_conf()
meillo@0 30 {
meillo@10 31 struct passwd *passwd;
meillo@10 32 struct group *group;
meillo@0 33
meillo@10 34 memset(&conf, 0, sizeof(masqmail_conf));
meillo@0 35
meillo@10 36 conf.orig_uid = getuid();
meillo@10 37 conf.orig_gid = getgid();
meillo@0 38
meillo@10 39 if ((passwd = getpwnam(DEF_MAIL_USER)))
meillo@10 40 conf.mail_uid = passwd->pw_uid;
meillo@10 41 else {
meillo@10 42 fprintf(stderr, "user %s not found! (terminating)\n", DEF_MAIL_USER);
meillo@262 43 exit(1);
meillo@10 44 }
meillo@10 45 if ((group = getgrnam(DEF_MAIL_GROUP)))
meillo@10 46 conf.mail_gid = group->gr_gid;
meillo@10 47 else {
meillo@10 48 fprintf(stderr, "group %s not found! (terminating)\n", DEF_MAIL_GROUP);
meillo@262 49 exit(1);
meillo@10 50 }
meillo@0 51 }
meillo@0 52
meillo@366 53 static gchar *true_strings[] = {
meillo@10 54 "yes", "on", "true", NULL
meillo@0 55 };
meillo@0 56
meillo@10 57 static gchar *false_strings[] = {
meillo@10 58 "no", "off", "false", NULL
meillo@0 59 };
meillo@0 60
meillo@10 61 static gboolean
meillo@366 62 parse_boolean(gchar *rval)
meillo@0 63 {
meillo@10 64 gchar **str;
meillo@0 65
meillo@333 66 DEBUG(9) fprintf(stderr, "parse_boolean: %s\n", rval);
meillo@0 67
meillo@10 68 str = true_strings;
meillo@10 69 while (*str) {
meillo@10 70 if (strncasecmp(*str, rval, strlen(*str)) == 0)
meillo@10 71 return TRUE;
meillo@10 72 str++;
meillo@10 73 }
meillo@0 74
meillo@10 75 str = false_strings;
meillo@10 76 while (*str) {
meillo@10 77 if (strncasecmp(*str, rval, strlen(*str)) == 0)
meillo@10 78 return FALSE;
meillo@10 79 str++;
meillo@10 80 }
meillo@0 81
meillo@10 82 fprintf(stderr, "cannot parse value '%s'\n", rval);
meillo@262 83 exit(1);
meillo@0 84 }
meillo@0 85
meillo@0 86 /* make a list from each line in a file */
meillo@10 87 static GList*
meillo@366 88 parse_list_file(gchar *fname)
meillo@0 89 {
meillo@10 90 GList *list = NULL;
meillo@10 91 FILE *fptr;
meillo@0 92
meillo@28 93 if ((fptr = fopen(fname, "rt")) == NULL) {
meillo@10 94 logwrite(LOG_ALERT, "could not open %s for reading: %s\n", fname, strerror(errno));
meillo@262 95 exit(1);
meillo@10 96 }
meillo@0 97
meillo@28 98 gchar buf[256];
meillo@28 99
meillo@28 100 while (!feof(fptr)) {
meillo@28 101 fgets(buf, 255, fptr);
meillo@28 102 if (buf[0] && (buf[0] != '#') && (buf[0] != '\n')) {
meillo@28 103 g_strchomp(buf);
meillo@333 104 DEBUG(9) fprintf(stderr,"parse_list_file: item = %s\n", buf);
meillo@28 105 list = g_list_append(list, g_strdup(buf));
meillo@28 106 }
meillo@28 107 }
meillo@28 108 fclose(fptr);
meillo@28 109
meillo@10 110 return list;
meillo@0 111 }
meillo@0 112
meillo@13 113 /* given a semicolon separated string, this function makes a GList out of it. */
meillo@10 114 GList*
meillo@366 115 parse_list(gchar *line, gboolean read_file)
meillo@0 116 {
meillo@10 117 GList *list = NULL;
meillo@10 118 gchar buf[256];
meillo@10 119 gchar *p, *q;
meillo@0 120
meillo@333 121 DEBUG(9) fprintf(stderr, "parsing list %s, file?:%d\n", line, read_file);
meillo@0 122
meillo@10 123 p = line;
meillo@14 124 while (*p != '\0') {
meillo@10 125 q = buf;
meillo@0 126
meillo@10 127 while (*p && (*p != ';') && (q < buf + 255))
meillo@10 128 *(q++) = *(p++);
meillo@14 129 *q = '\0';
meillo@0 130
meillo@10 131 if ((buf[0] == '/') && (read_file))
meillo@10 132 /* item is a filename, include its contents */
meillo@10 133 list = g_list_concat(list, parse_list_file(buf));
meillo@10 134 else
meillo@10 135 /* just a normal item */
meillo@10 136 list = g_list_append(list, g_strdup(buf));
meillo@0 137
meillo@333 138 DEBUG(9) fprintf(stderr, "item = %s\n", buf);
meillo@0 139
meillo@10 140 if (*p)
meillo@10 141 p++;
meillo@10 142 }
meillo@10 143 return list;
meillo@0 144 }
meillo@0 145
meillo@367 146 /*
meillo@367 147 ** Split the addrs at '@' into local_part and domain. Without an '@'
meillo@367 148 ** everything is local_part. Create address structs, which are put into a
meillo@367 149 ** list and returned. This funktion is used for lists of addrs containing
meillo@367 150 ** globbing chars (* and ?). We don't need valid RFC821 addresses here,
meillo@367 151 ** just patterns to match against.
meillo@317 152 */
meillo@10 153 static GList*
meillo@366 154 parse_address_glob_list(gchar *line, gboolean read_file)
meillo@0 155 {
meillo@10 156 GList *plain_list = parse_list(line, read_file);
meillo@10 157 GList *node;
meillo@10 158 GList *list = NULL;
meillo@0 159
meillo@10 160 foreach(plain_list, node) {
meillo@10 161 gchar *item = (gchar *) (node->data);
meillo@366 162 char *at;
meillo@366 163 char *p;
meillo@317 164 address *addr = calloc(1, sizeof(address));
meillo@317 165
meillo@317 166 for (p=item+strlen(item)-1; isspace(*p) || *p=='>'; p--) {
meillo@317 167 *p = '\0';
meillo@317 168 }
meillo@317 169 for (p=item; isspace(*p) || *p=='<'; p++) {
meillo@317 170 }
meillo@317 171
meillo@317 172 addr->address = strdup(p);
meillo@317 173 at = strrchr(p, '@');
meillo@317 174 if (at) {
meillo@317 175 *at = '\0';
meillo@317 176 addr->local_part = strdup(p);
meillo@317 177 addr->domain = strdup(at+1);
meillo@317 178 } else {
meillo@317 179 addr->local_part = strdup(p);
meillo@330 180 /* No `@', thus any domain is okay. */
meillo@330 181 addr->domain = "*";
meillo@317 182 }
meillo@317 183 list = g_list_append(list, addr);
meillo@317 184 DEBUG(6) debugf("parse_address_glob_list: read pattern `%s' `%s'\n",
meillo@317 185 addr->local_part, addr->domain);
meillo@10 186 g_free(item);
meillo@10 187 }
meillo@10 188 g_list_free(plain_list);
meillo@10 189 return list;
meillo@0 190 }
meillo@0 191
meillo@10 192 static GList*
meillo@366 193 parse_resolve_list(gchar *line)
meillo@0 194 {
meillo@10 195 GList *list;
meillo@10 196 GList *list_node;
meillo@10 197 GList *res_list = NULL;
meillo@0 198
meillo@10 199 list = parse_list(line, FALSE);
meillo@28 200 if (!list) {
meillo@28 201 return NULL;
meillo@28 202 }
meillo@28 203
meillo@28 204 foreach(list, list_node) {
meillo@28 205 gchar *item = (gchar *) (list_node->data);
meillo@28 206 if (strcmp(item, "byname") == 0) {
meillo@28 207 res_list = g_list_append(res_list, resolve_byname);
meillo@0 208 #ifdef ENABLE_RESOLVER
meillo@28 209 } else if (strcmp(item, "dns_a") == 0) {
meillo@28 210 res_list = g_list_append(res_list, resolve_dns_a);
meillo@28 211 } else if (strcmp(item, "dns_mx") == 0) {
meillo@28 212 res_list = g_list_append(res_list, resolve_dns_mx);
meillo@0 213 #endif
meillo@28 214 } else {
meillo@28 215 logwrite(LOG_ALERT, "unknown resolver %s\n", item);
meillo@262 216 exit(1);
meillo@10 217 }
meillo@28 218 g_free(item);
meillo@10 219 }
meillo@28 220 g_list_free(list);
meillo@10 221 return res_list;
meillo@0 222 }
meillo@0 223
meillo@10 224 static interface*
meillo@366 225 parse_interface(gchar *line, gint def_port)
meillo@0 226 {
meillo@10 227 gchar buf[256];
meillo@10 228 gchar *p, *q;
meillo@10 229 interface *iface;
meillo@0 230
meillo@333 231 DEBUG(9) fprintf(stderr, "parse_interface: %s\n", line);
meillo@0 232
meillo@10 233 p = line;
meillo@10 234 q = buf;
meillo@14 235 while ((*p != '\0') && (*p != ':') && (q < buf + 255))
meillo@10 236 *(q++) = *(p++);
meillo@14 237 *q = '\0';
meillo@0 238
meillo@10 239 iface = g_malloc(sizeof(interface));
meillo@10 240 iface->address = g_strdup(buf);
meillo@0 241
meillo@10 242 if (*p) {
meillo@10 243 p++;
meillo@10 244 iface->port = atoi(p);
meillo@10 245 } else
meillo@10 246 iface->port = def_port;
meillo@333 247 DEBUG(9) fprintf(stderr,"rval=%s, address:port=%s:%i\n",line, iface->address, iface->port);
meillo@0 248
meillo@10 249 return iface;
meillo@0 250 }
meillo@0 251
meillo@10 252 static gboolean
meillo@366 253 eat_comments(FILE *in)
meillo@0 254 {
meillo@10 255 gint c;
meillo@0 256
meillo@10 257 for (c = fgetc(in); (c == '#' || isspace(c)) && c != EOF;
meillo@10 258 c = fgetc(in)) {
meillo@10 259 if (c == '#') {
meillo@10 260 gint c;
meillo@10 261 for (c = fgetc(in); (c != '\n') && (c != EOF); c = fgetc(in));
meillo@10 262 }
meillo@10 263 }
meillo@10 264 if (c == EOF)
meillo@10 265 return FALSE;
meillo@10 266 ungetc(c, in);
meillo@10 267 return TRUE;
meillo@0 268 }
meillo@0 269
meillo@0 270 /* after parsing, eat trailing character until LF */
meillo@10 271 static gboolean
meillo@366 272 eat_line_trailing(FILE *in)
meillo@0 273 {
meillo@10 274 gint c;
meillo@0 275
meillo@10 276 for (c = fgetc(in); c != EOF && c != '\n'; c = fgetc(in));
meillo@10 277 if (c == EOF)
meillo@10 278 return FALSE;
meillo@10 279 return TRUE;
meillo@0 280 }
meillo@0 281
meillo@10 282 static gboolean
meillo@366 283 eat_spaces(FILE *in)
meillo@0 284 {
meillo@10 285 gint c;
meillo@10 286
meillo@28 287 for (c = fgetc(in); c != EOF && isspace(c); c = fgetc(in)) {
meillo@28 288 /* empty */
meillo@28 289 }
meillo@10 290 if (c == EOF)
meillo@10 291 return FALSE;
meillo@10 292 ungetc(c, in);
meillo@10 293 return TRUE;
meillo@0 294 }
meillo@0 295
meillo@10 296 static gboolean
meillo@366 297 read_lval(FILE *in, gchar *buf, gint size)
meillo@0 298 {
meillo@10 299 gint c;
meillo@10 300 gchar *ptr = buf;
meillo@0 301
meillo@333 302 DEBUG(9) fprintf(stderr, "read_lval()\n");
meillo@0 303
meillo@10 304 if (!eat_spaces(in))
meillo@10 305 return FALSE;
meillo@0 306
meillo@10 307 c = fgetc(in);
meillo@333 308 DEBUG(9) fprintf(stderr, "read_lval() 2\n");
meillo@10 309 while ((isalnum(c) || c == '_' || c == '-' || c == '.')
meillo@10 310 && (ptr < buf + size - 1)
meillo@10 311 && (c != EOF)) {
meillo@10 312 *ptr = c;
meillo@10 313 ptr++;
meillo@10 314 c = fgetc(in);
meillo@10 315 }
meillo@14 316 *ptr = '\0';
meillo@10 317 ungetc(c, in);
meillo@0 318
meillo@10 319 if (c == EOF) {
meillo@10 320 fprintf(stderr, "unexpected EOF after %s\n", buf);
meillo@10 321 return FALSE;
meillo@10 322 } else if (ptr >= buf + size - 1) {
meillo@10 323 fprintf(stderr, "lval too long\n");
meillo@10 324 }
meillo@0 325
meillo@10 326 eat_spaces(in);
meillo@0 327
meillo@333 328 DEBUG(9) fprintf(stderr, "lval = %s\n", buf);
meillo@10 329
meillo@14 330 return buf[0] != '\0';
meillo@0 331 }
meillo@0 332
meillo@10 333 static gboolean
meillo@366 334 read_rval(FILE *in, gchar *buf, gint size)
meillo@0 335 {
meillo@10 336 gint c;
meillo@10 337 gchar *ptr = buf;
meillo@0 338
meillo@333 339 DEBUG(9) fprintf(stderr, "read_rval()\n");
meillo@0 340
meillo@10 341 if (!eat_spaces(in))
meillo@10 342 return FALSE;
meillo@10 343
meillo@10 344 c = fgetc(in);
meillo@10 345 if (c != '\"') {
meillo@115 346 while ((isalnum(c) || c == '_' || c == '-' || c == '.'
meillo@115 347 || c == '/' || c == '@' || c == ';' || c == ':')
meillo@10 348 && (ptr < buf + size - 1)
meillo@10 349 && (c != EOF)) {
meillo@10 350 *ptr = c;
meillo@10 351 ptr++;
meillo@10 352 c = fgetc(in);
meillo@10 353 }
meillo@14 354 *ptr = '\0';
meillo@10 355 ungetc(c, in);
meillo@10 356 } else {
meillo@10 357 gboolean escape = FALSE;
meillo@10 358 c = fgetc(in);
meillo@10 359 while (((c != '\"') || escape) && (ptr < buf + size - 1)) {
meillo@13 360 if (c != '\n') { /* ignore line breaks */
meillo@10 361 if ((c == '\\') && (!escape)) {
meillo@10 362 escape = TRUE;
meillo@10 363 } else {
meillo@10 364 *ptr = c;
meillo@10 365 ptr++;
meillo@10 366 escape = FALSE;
meillo@10 367 }
meillo@10 368 }
meillo@10 369 c = fgetc(in);
meillo@10 370 }
meillo@14 371 *ptr = '\0';
meillo@0 372 }
meillo@0 373
meillo@10 374 eat_line_trailing(in);
meillo@0 375
meillo@333 376 DEBUG(9) fprintf(stderr, "rval = %s\n", buf);
meillo@10 377
meillo@10 378 return TRUE;
meillo@0 379 }
meillo@0 380
meillo@10 381 static gboolean
meillo@366 382 read_statement(FILE *in, gchar *lval, gint lsize, gchar *rval, gint rsize)
meillo@0 383 {
meillo@10 384 gint c;
meillo@0 385
meillo@333 386 DEBUG(9) fprintf(stderr, "read_statement()\n");
meillo@0 387
meillo@10 388 /* eat comments and empty lines: */
meillo@10 389 if (!eat_comments(in))
meillo@10 390 return FALSE;
meillo@0 391
meillo@28 392 if (!read_lval(in, lval, lsize)) {
meillo@28 393 return FALSE;
meillo@28 394 }
meillo@28 395
meillo@333 396 DEBUG(9) fprintf(stderr, " lval = %s\n", lval);
meillo@28 397 if ((c = fgetc(in) == '=')) {
meillo@28 398 if (read_rval(in, rval, rsize)) {
meillo@333 399 DEBUG(9) fprintf(stderr, " rval = %s\n", rval);
meillo@28 400 return TRUE;
meillo@10 401 }
meillo@28 402 } else {
meillo@333 403 DEBUG(9) fprintf(stderr," '=' expected after %s, char was '%c'\n", lval, c);
meillo@28 404 fprintf(stderr, "'=' expected after %s, char was '%c'\n", lval, c);
meillo@10 405 }
meillo@10 406 return FALSE;
meillo@0 407 }
meillo@0 408
meillo@10 409 gboolean
meillo@366 410 read_conf(gchar *filename)
meillo@0 411 {
meillo@10 412 FILE *in;
meillo@0 413
meillo@10 414 conf.log_max_pri = 7;
meillo@10 415 conf.do_relay = TRUE;
meillo@244 416 conf.localpartcmp = strcmp;
meillo@10 417 conf.max_defer_time = 86400 * 4; /* 4 days */
meillo@120 418 conf.max_msg_size = 0; /* no limit on msg size */
meillo@151 419 conf.spool_dir = SPOOL_DIR;
meillo@152 420 conf.mail_dir = "/var/mail";
meillo@329 421 conf.listen_addresses = g_list_append(NULL, parse_interface("localhost", 25));
meillo@0 422
meillo@28 423 if ((in = fopen(filename, "r")) == NULL) {
meillo@155 424 logwrite(LOG_ALERT, "could not open config file %s: %s\n", filename, strerror(errno));
meillo@28 425 return FALSE;
meillo@28 426 }
meillo@28 427
meillo@28 428 gchar lval[256], rval[2048];
meillo@28 429 while (read_statement(in, lval, 256, rval, 2048)) {
meillo@333 430 DEBUG(9) fprintf(stderr,"read_conf(): lval=%s\n", lval);
meillo@28 431 if (strcmp(lval, "debug_level") == 0)
meillo@28 432 conf.debug_level = atoi(rval);
meillo@28 433 else if (strcmp(lval, "run_as_user") == 0) {
meillo@28 434 if (!conf.run_as_user) /* you should not be able to reset that flag */
meillo@28 435 conf.run_as_user = parse_boolean(rval);
meillo@28 436 } else if (strcmp(lval, "use_syslog") == 0)
meillo@28 437 conf.use_syslog = parse_boolean(rval);
meillo@28 438 else if (strcmp(lval, "mail_dir") == 0)
meillo@28 439 conf.mail_dir = g_strdup(rval);
meillo@28 440 else if (strcmp(lval, "lock_dir") == 0)
meillo@28 441 conf.lock_dir = g_strdup(rval);
meillo@28 442 else if (strcmp(lval, "spool_dir") == 0)
meillo@28 443 conf.spool_dir = g_strdup(rval);
meillo@28 444 else if (strcmp(lval, "log_dir") == 0)
meillo@28 445 conf.log_dir = g_strdup(rval);
meillo@28 446 else if (strcmp(lval, "host_name") == 0) {
meillo@28 447 if (rval[0] != '/')
meillo@28 448 conf.host_name = g_strdup(rval);
meillo@28 449 else {
meillo@28 450 char buf[256];
meillo@28 451 FILE *fptr = fopen(rval, "rt");
meillo@307 452 if (!fptr) {
meillo@155 453 logwrite(LOG_ALERT, "could not open %s: %s\n", rval, strerror(errno));
meillo@28 454 return FALSE;
meillo@10 455 }
meillo@28 456 fgets(buf, 255, fptr);
meillo@28 457 g_strchomp(buf);
meillo@28 458 conf.host_name = g_strdup(buf);
meillo@28 459 fclose(fptr);
meillo@28 460 }
meillo@28 461 } else if (strcmp(lval, "local_hosts") == 0)
meillo@28 462 conf.local_hosts = parse_list(rval, FALSE);
meillo@28 463 else if (strcmp(lval, "local_addresses") == 0)
meillo@28 464 conf.local_addresses = parse_list(rval, TRUE);
meillo@28 465 else if (strcmp(lval, "not_local_addresses") == 0)
meillo@28 466 conf.not_local_addresses = parse_list(rval, TRUE);
meillo@28 467 else if (strcmp(lval, "do_save_envelope_to") == 0)
meillo@28 468 conf.do_save_envelope_to = parse_boolean(rval);
meillo@28 469 else if (strcmp(lval, "defer_all") == 0)
meillo@28 470 conf.defer_all = parse_boolean(rval);
meillo@28 471 else if (strcmp(lval, "do_relay") == 0)
meillo@28 472 conf.do_relay = parse_boolean(rval);
meillo@28 473 else if (strcmp(lval, "alias_file") == 0) {
meillo@28 474 conf.alias_file = g_strdup(rval);
meillo@387 475 } else if (strcmp(lval, "globalias_file") == 0) {
meillo@387 476 conf.globalias_file = g_strdup(rval);
meillo@243 477 } else if (strcmp(lval, "caseless_matching") == 0) {
meillo@244 478 conf.localpartcmp = parse_boolean(rval) ? strcasecmp : strcmp;
meillo@28 479 } else if (strcmp(lval, "mbox_default") == 0) {
meillo@28 480 conf.mbox_default = g_strdup(rval);
meillo@28 481 } else if (strcmp(lval, "mbox_users") == 0) {
meillo@28 482 conf.mbox_users = parse_list(rval, TRUE);
meillo@28 483 } else if (strcmp(lval, "mda_users") == 0) {
meillo@28 484 conf.mda_users = parse_list(rval, TRUE);
meillo@28 485 } else if (strcmp(lval, "mda") == 0) {
meillo@28 486 conf.mda = g_strdup(rval);
meillo@28 487 } else if (strcmp(lval, "mda_fromline") == 0) {
meillo@28 488 conf.mda_fromline = parse_boolean(rval);
meillo@28 489 } else if (strcmp(lval, "mda_fromhack") == 0) {
meillo@28 490 conf.mda_fromhack = parse_boolean(rval);
meillo@28 491 } else if (strcmp(lval, "pipe_fromline") == 0) {
meillo@28 492 conf.pipe_fromline = parse_boolean(rval);
meillo@28 493 } else if (strcmp(lval, "pipe_fromhack") == 0) {
meillo@28 494 conf.pipe_fromhack = parse_boolean(rval);
meillo@28 495 } else if (strcmp(lval, "listen_addresses") == 0) {
meillo@28 496 GList *node;
meillo@28 497 GList *tmp_list = parse_list(rval, FALSE);
meillo@0 498
meillo@28 499 conf.listen_addresses = NULL;
meillo@28 500 foreach(tmp_list, node) {
meillo@28 501 conf.listen_addresses = g_list_append(conf.listen_addresses, parse_interface((gchar *) (node-> data), 25));
meillo@28 502 g_free(node->data);
meillo@28 503 }
meillo@28 504 g_list_free(tmp_list);
meillo@354 505 } else if (strncmp(lval, "query_routes.", 13) == 0) {
meillo@28 506 GList *file_list = parse_list(rval, FALSE);
meillo@354 507 table_pair *pair = create_pair(lval+13, file_list);
meillo@354 508 conf.query_routes = g_list_append(conf.query_routes, pair);
meillo@354 509 } else if (strcmp(lval, "permanent_routes") == 0) {
meillo@354 510 conf.perma_routes = parse_list(rval, FALSE);
meillo@310 511 } else if (strcmp(lval, "online_query") == 0)
meillo@310 512 conf.online_query = g_strdup(rval);
meillo@28 513 else if (strcmp(lval, "do_queue") == 0)
meillo@28 514 conf.do_queue = parse_boolean(rval);
meillo@192 515 else if (strcmp(lval, "errmsg_file") == 0)
meillo@28 516 conf.errmsg_file = g_strdup(rval);
meillo@28 517 else if (strcmp(lval, "warnmsg_file") == 0)
meillo@28 518 conf.warnmsg_file = g_strdup(rval);
meillo@28 519 else if (strcmp(lval, "warn_intervals") == 0)
meillo@28 520 conf.warn_intervals = parse_list(rval, FALSE);
meillo@28 521 else if (strcmp(lval, "max_defer_time") == 0) {
meillo@254 522 gint ival = time_interval(rval);
meillo@28 523 if (ival < 0)
meillo@155 524 logwrite(LOG_WARNING, "invalid time interval for 'max_defer_time': %s\n", rval);
meillo@28 525 else
meillo@28 526 conf.max_defer_time = ival;
meillo@28 527 } else if (strcmp(lval, "log_user") == 0)
meillo@28 528 conf.log_user = g_strdup(rval);
meillo@117 529 else if(strcmp(lval, "max_msg_size") == 0) {
meillo@117 530 conf.max_msg_size = atol(rval);
meillo@333 531 DEBUG(9) fprintf(stderr,"rval=%s, conf.max_msg_size=%ld\n",
meillo@117 532 rval, conf.max_msg_size);
meillo@117 533 }
meillo@28 534 else
meillo@155 535 logwrite(LOG_WARNING, "var '%s' not (yet) known, ignored\n", lval);
meillo@28 536 }
meillo@28 537 fclose(in);
meillo@0 538
meillo@156 539 if (!conf.host_name) {
meillo@156 540 logwrite(LOG_ALERT, "`host_name' MUST be set in masqmail.conf. See man page\n");
meillo@156 541 return FALSE;
meillo@156 542 }
meillo@156 543
meillo@28 544 if (conf.errmsg_file == NULL)
meillo@28 545 conf.errmsg_file = g_strdup(DATA_DIR "/tpl/failmsg.tpl");
meillo@28 546 if (conf.warnmsg_file == NULL)
meillo@28 547 conf.warnmsg_file = g_strdup(DATA_DIR "/tpl/warnmsg.tpl");
meillo@0 548
meillo@28 549 if (conf.lock_dir == NULL)
meillo@28 550 conf.lock_dir = g_strdup_printf("%s/lock/", conf.spool_dir);
meillo@0 551
meillo@28 552 if (conf.mbox_default == NULL)
meillo@28 553 conf.mbox_default = g_strdup("mbox");
meillo@0 554
meillo@28 555 if (conf.warn_intervals == NULL)
meillo@28 556 conf.warn_intervals = parse_list("1h;4h;8h;1d;2d;3d", FALSE);
meillo@0 557
meillo@157 558 if (!conf.local_hosts) {
meillo@366 559 char *shortname = strdup(conf.host_name);
meillo@366 560 char *p = strchr(shortname, '.');
meillo@157 561 if (p) {
meillo@157 562 *p = '\0';
meillo@157 563 }
meillo@157 564 /* we don't care if shortname and conf.host_name are the same */
meillo@366 565 char *local_hosts_str = g_strdup_printf("localhost;%s;%s", shortname, conf.host_name);
meillo@157 566 conf.local_hosts = parse_list(local_hosts_str, FALSE);
meillo@157 567 free(shortname);
meillo@157 568 free(local_hosts_str);
meillo@157 569 }
meillo@157 570
meillo@157 571
meillo@28 572 return TRUE;
meillo@0 573 }
meillo@0 574
meillo@10 575 connect_route*
meillo@366 576 read_route(gchar *filename, gboolean is_perma)
meillo@0 577 {
meillo@10 578 gboolean ok = FALSE;
meillo@10 579 FILE *in;
meillo@0 580
meillo@10 581 connect_route *route = g_malloc(sizeof(connect_route));
meillo@10 582 memset(route, 0, sizeof(connect_route));
meillo@0 583
meillo@10 584 DEBUG(5) debugf("read_route, filename = %s\n", filename);
meillo@0 585
meillo@10 586 route->filename = g_strdup(filename);
meillo@357 587 route->name = route->filename; /* quick hack */
meillo@0 588
meillo@10 589 route->expand_h_sender_address = TRUE;
meillo@0 590
meillo@354 591 route->is_perma = is_perma;
meillo@0 592
meillo@10 593 route->do_pipelining = TRUE;
meillo@0 594
meillo@28 595 if ((in = fopen(route->filename, "r")) == NULL) {
meillo@28 596 logwrite(LOG_ALERT, "could not open route file %s: %s\n", route->filename, strerror(errno));
meillo@28 597 g_free(route);
meillo@28 598 return NULL;
meillo@28 599 }
meillo@0 600
meillo@28 601 gchar lval[256], rval[2048];
meillo@28 602 while (read_statement(in, lval, 256, rval, 2048)) {
meillo@311 603 if (strcmp(lval, "mail_host") == 0)
meillo@178 604 route->mail_host = parse_interface(rval, 25);
meillo@28 605 else if (strcmp(lval, "helo_name") == 0)
meillo@28 606 route->helo_name = g_strdup(rval);
meillo@28 607 else if (strcmp(lval, "wrapper") == 0)
meillo@28 608 route->wrapper = g_strdup(rval);
meillo@28 609 else if (strcmp(lval, "connect_error_fail") == 0)
meillo@28 610 route->connect_error_fail = parse_boolean(rval);
meillo@28 611 else if (strcmp(lval, "do_correct_helo") == 0)
meillo@28 612 route->do_correct_helo = parse_boolean(rval);
meillo@222 613 else if (strcmp(lval, "instant_helo") == 0)
meillo@222 614 route->instant_helo = parse_boolean(rval);
meillo@28 615 else if (strcmp(lval, "do_pipelining") == 0)
meillo@28 616 route->do_pipelining = parse_boolean(rval);
meillo@317 617
meillo@317 618 else if (strcmp(lval, "allowed_senders") == 0)
meillo@317 619 route->allowed_senders = parse_address_glob_list(rval, TRUE);
meillo@317 620 else if (strcmp(lval, "denied_senders") == 0)
meillo@317 621 route->denied_senders = parse_address_glob_list(rval, TRUE);
meillo@317 622 else if (strcmp(lval, "allowed_recipients") == 0)
meillo@317 623 route->allowed_recipients = parse_address_glob_list(rval, TRUE);
meillo@317 624 else if (strcmp(lval, "denied_recipients") == 0)
meillo@317 625 route->denied_recipients = parse_address_glob_list(rval, TRUE);
meillo@317 626
meillo@28 627 else if (strcmp(lval, "set_h_from_domain") == 0)
meillo@28 628 route->set_h_from_domain = g_strdup(rval);
meillo@28 629 else if (strcmp(lval, "set_h_reply_to_domain") == 0)
meillo@28 630 route->set_h_reply_to_domain = g_strdup(rval);
meillo@28 631 else if (strcmp(lval, "set_return_path_domain") == 0)
meillo@28 632 route->set_return_path_domain = g_strdup(rval);
meillo@28 633 else if (strcmp(lval, "map_return_path_addresses") == 0) {
meillo@28 634 GList *node, *list;
meillo@10 635
meillo@28 636 list = parse_list(rval, TRUE);
meillo@28 637 foreach(list, node) {
meillo@28 638 gchar *item = (gchar *) (node->data);
meillo@28 639 table_pair *pair = parse_table_pair(item, ':');
meillo@28 640 address *addr = create_address((gchar *) (pair->value), TRUE);
meillo@28 641 g_free(pair->value);
meillo@28 642 pair->value = (gpointer *) addr;
meillo@28 643 route->map_return_path_addresses = g_list_append(route->map_return_path_addresses, pair);
meillo@28 644 g_free(item);
meillo@28 645 }
meillo@28 646 g_list_free(list);
meillo@28 647 } else if (strcmp(lval, "map_h_from_addresses") == 0) {
meillo@28 648 GList *list, *node;
meillo@10 649
meillo@28 650 list = parse_list(rval, TRUE);
meillo@28 651 foreach(list, node) {
meillo@28 652 gchar *item = (gchar *) (node->data);
meillo@28 653 table_pair *pair = parse_table_pair(item, ':');
meillo@28 654 route->map_h_from_addresses = g_list_append(route->map_h_from_addresses, pair);
meillo@28 655 g_free(item);
meillo@28 656 }
meillo@28 657 g_list_free(list);
meillo@28 658 } else if (strcmp(lval, "map_h_reply_to_addresses") == 0) {
meillo@28 659 GList *list, *node;
meillo@10 660
meillo@28 661 list = parse_list(rval, TRUE);
meillo@28 662 foreach(list, node) {
meillo@28 663 gchar *item = (gchar *) (node->data);
meillo@28 664 table_pair *pair = parse_table_pair(item, ':');
meillo@28 665 route->map_h_reply_to_addresses = g_list_append(route->map_h_reply_to_addresses, pair);
meillo@28 666 g_free(item);
meillo@10 667 }
meillo@28 668 g_list_free(list);
meillo@28 669 } else if (strcmp(lval, "map_h_mail_followup_to_addresses") == 0) {
meillo@28 670 GList *list, *node;
meillo@28 671
meillo@28 672 list = parse_list(rval, TRUE);
meillo@28 673 foreach(list, node) {
meillo@28 674 gchar *item = (gchar *) (node->data);
meillo@28 675 table_pair *pair = parse_table_pair(item, ':');
meillo@28 676 route->map_h_mail_followup_to_addresses = g_list_append(route->map_h_mail_followup_to_addresses, pair);
meillo@28 677 g_free(item);
meillo@28 678 }
meillo@28 679 g_list_free(list);
meillo@28 680 } else if (strcmp(lval, "expand_h_sender_domain") == 0) {
meillo@28 681 route->expand_h_sender_domain = parse_boolean(rval);
meillo@28 682 } else if (strcmp(lval, "expand_h_sender_address") == 0) {
meillo@28 683 route->expand_h_sender_address = parse_boolean(rval);
meillo@28 684 } else if (strcmp(lval, "resolve_list") == 0)
meillo@28 685 route->resolve_list = parse_resolve_list(rval);
meillo@28 686 else if (strcmp(lval, "do_ssl") == 0) {
meillo@28 687 /* we ignore this. This option is used by sqilconf */
meillo@28 688 ;
meillo@28 689 }
meillo@10 690 #ifdef ENABLE_AUTH
meillo@28 691 else if (strcmp(lval, "auth_name") == 0) {
meillo@28 692 route->auth_name = g_strdup(rval);
meillo@28 693 } else if (strcmp(lval, "auth_login") == 0) {
meillo@28 694 route->auth_login = g_strdup(rval);
meillo@28 695 } else if (strcmp(lval, "auth_secret") == 0) {
meillo@28 696 route->auth_secret = g_strdup(rval);
meillo@28 697 }
meillo@10 698 #else
meillo@28 699 else if ((strcmp(lval, "auth_name") == 0)
meillo@28 700 || (strcmp(lval, "auth_login") == 0)
meillo@28 701 || (strcmp(lval, "auth_secret") == 0)) {
meillo@28 702 logwrite(LOG_WARNING, "%s ignored: not compiled with auth support.\n", lval);
meillo@28 703 }
meillo@10 704 #endif
meillo@190 705 else if (strcmp(lval, "pipe") == 0) {
meillo@28 706 route->pipe = g_strdup(rval);
meillo@28 707 } else if (strcmp(lval, "pipe_fromline") == 0) {
meillo@28 708 route->pipe_fromline = parse_boolean(rval);
meillo@28 709 } else if (strcmp(lval, "pipe_fromhack") == 0) {
meillo@28 710 route->pipe_fromhack = parse_boolean(rval);
meillo@28 711 } else if (strcmp(lval, "last_route") == 0) {
meillo@28 712 route->last_route = parse_boolean(rval);
meillo@28 713 } else
meillo@28 714 logwrite(LOG_WARNING, "var '%s' not (yet) known, ignored\n", lval);
meillo@28 715 }
meillo@28 716
meillo@319 717 if (!route->resolve_list) {
meillo@28 718 #ifdef ENABLE_RESOLVER
meillo@354 719 route->resolve_list = g_list_append(route->resolve_list, resolve_dns_mx);
meillo@354 720 route->resolve_list = g_list_append(route->resolve_list, resolve_dns_a);
meillo@28 721 #endif
meillo@319 722 route->resolve_list = g_list_append(route->resolve_list, resolve_byname);
meillo@28 723 }
meillo@28 724 fclose(in);
meillo@28 725 ok = TRUE;
meillo@10 726
meillo@28 727 /* warn user about misconfigurations: */
meillo@28 728 if ((route->map_h_from_addresses != NULL) && (route->set_h_from_domain != NULL)) {
meillo@28 729 logwrite(LOG_WARNING, "'map_h_from_addresses' overrides 'set_h_from_domain'\n");
meillo@28 730 g_free(route->set_h_from_domain);
meillo@28 731 route->set_h_from_domain = NULL;
meillo@28 732 }
meillo@28 733 if ((route->map_h_reply_to_addresses != NULL) && (route->set_h_reply_to_domain != NULL)) {
meillo@28 734 logwrite(LOG_WARNING, "'map_h_reply_to_addresses' overrides 'set_h_reply_to_domain'\n");
meillo@28 735 g_free(route->set_h_reply_to_domain);
meillo@28 736 route->set_h_reply_to_domain = NULL;
meillo@10 737 }
meillo@10 738
meillo@10 739 if (!ok) {
meillo@10 740 g_free(route);
meillo@10 741 route = NULL;
meillo@10 742 }
meillo@10 743
meillo@10 744 return route;
meillo@10 745 }
meillo@10 746
meillo@10 747 static void
meillo@366 748 _g_list_free_all(GList *list)
meillo@10 749 {
meillo@10 750 GList *node;
meillo@10 751 if (list) {
meillo@10 752 foreach(list, node)
meillo@10 753 g_free(node->data);
meillo@10 754 g_list_free(list);
meillo@10 755 }
meillo@10 756 }
meillo@10 757
meillo@10 758 void
meillo@366 759 destroy_route(connect_route *r)
meillo@10 760 {
meillo@10 761 if (r->filename)
meillo@10 762 g_free(r->filename);
meillo@10 763 if (r->mail_host) {
meillo@10 764 g_free(r->mail_host->address);
meillo@10 765 g_free(r->mail_host);
meillo@10 766 }
meillo@10 767 if (r->wrapper)
meillo@10 768 g_free(r->wrapper);
meillo@10 769 if (r->helo_name)
meillo@10 770 g_free(r->helo_name);
meillo@317 771 _g_list_free_all(r->allowed_senders);
meillo@317 772 _g_list_free_all(r->denied_senders);
meillo@317 773 _g_list_free_all(r->allowed_recipients);
meillo@317 774 _g_list_free_all(r->denied_recipients);
meillo@10 775 if (r->set_h_from_domain)
meillo@10 776 g_free(r->set_h_from_domain);
meillo@10 777 if (r->set_h_reply_to_domain)
meillo@10 778 g_free(r->set_h_reply_to_domain);
meillo@10 779 if (r->set_return_path_domain)
meillo@10 780 g_free(r->set_return_path_domain);
meillo@10 781 if (r->map_h_reply_to_addresses)
meillo@10 782 destroy_table(r->map_h_reply_to_addresses);
meillo@10 783 if (r->resolve_list)
meillo@10 784 g_list_free(r->resolve_list);
meillo@10 785 #ifdef ENABLE_AUTH
meillo@10 786 if (r->auth_name)
meillo@10 787 g_free(r->auth_name);
meillo@10 788 if (r->auth_login)
meillo@10 789 g_free(r->auth_login);
meillo@10 790 if (r->auth_secret)
meillo@10 791 g_free(r->auth_secret);
meillo@10 792 #endif
meillo@10 793 if (r->pipe)
meillo@10 794 g_free(r->pipe);
meillo@10 795 g_free(r);
meillo@10 796 }
meillo@10 797
meillo@10 798 GList*
meillo@366 799 read_route_list(GList *rf_list, gboolean is_perma)
meillo@10 800 {
meillo@10 801 GList *list = NULL;
meillo@10 802 GList *node;
meillo@10 803 uid_t saved_uid, saved_gid;
meillo@10 804
meillo@10 805 if (!conf.run_as_user) {
meillo@10 806 set_euidgid(0, 0, &saved_uid, &saved_gid);
meillo@10 807 }
meillo@10 808
meillo@10 809 foreach(rf_list, node) {
meillo@10 810 gchar *fname = (gchar *) (node->data);
meillo@354 811 connect_route *route = read_route(fname, is_perma);
meillo@10 812 if (route)
meillo@10 813 list = g_list_append(list, route);
meillo@10 814 else
meillo@10 815 logwrite(LOG_ALERT, "could not read route configuration %s\n", fname);
meillo@10 816 }
meillo@10 817
meillo@10 818 /* set uid and gid back */
meillo@10 819 if (!conf.run_as_user) {
meillo@10 820 set_euidgid(saved_uid, saved_gid, NULL, NULL);
meillo@10 821 }
meillo@10 822
meillo@10 823 return list;
meillo@10 824 }
meillo@10 825
meillo@10 826 void
meillo@366 827 destroy_route_list(GList *list)
meillo@10 828 {
meillo@10 829 GList *node;
meillo@10 830
meillo@10 831 foreach(list, node) {
meillo@10 832 connect_route *route = (connect_route *) (node->data);
meillo@10 833 destroy_route(route);
meillo@0 834 }
meillo@0 835 g_list_free(list);
meillo@0 836 }