masqmail

annotate src/conf.c @ 319:d41fb3b9ed3e

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