masqmail: 60c92aa59911 src/conf.c

masqmail

view src/conf.c @ 160:60c92aa59911

added a script to guess the host's name

author	meillo@marmaro.de
date	Thu, 08 Jul 2010 11:27:03 +0200
parents	ee2afbf92428
children	6dd3a289989b

line source

1 /* MasqMail

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.

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.

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 */

19 #include <pwd.h>

20 #include <grp.h>

22 #include "masqmail.h"

24 masqmail_conf conf;

26 void

27 init_conf()

28 {

29 struct passwd *passwd;

30 struct group *group;

32 memset(&conf, 0, sizeof(masqmail_conf));

34 conf.orig_uid = getuid();

35 conf.orig_gid = getgid();

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 }

51 static gchar* true_strings[] = {

52 "yes", "on", "true", NULL

53 };

55 static gchar *false_strings[] = {

56 "no", "off", "false", NULL

57 };

59 static gboolean

60 parse_boolean(gchar * rval)

61 {

62 gchar **str;

64 DEBUG(6) fprintf(stderr, "parse_boolean: %s\n", rval);

66 str = true_strings;

67 while (*str) {

68 if (strncasecmp(*str, rval, strlen(*str)) == 0)

69 return TRUE;

70 str++;

71 }

73 str = false_strings;

74 while (*str) {

75 if (strncasecmp(*str, rval, strlen(*str)) == 0)

76 return FALSE;

77 str++;

78 }

80 fprintf(stderr, "cannot parse value '%s'\n", rval);

81 exit(EXIT_FAILURE);

82 }

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;

91 if ((fptr = fopen(fname, "rt")) == NULL) {

92 logwrite(LOG_ALERT, "could not open %s for reading: %s\n", fname, strerror(errno));

93 exit(EXIT_FAILURE);

94 }

96 gchar buf[256];

98 while (!feof(fptr)) {

99 fgets(buf, 255, fptr);

100 if (buf[0] && (buf[0] != '#') && (buf[0] != '\n')) {

101 g_strchomp(buf);

102 DEBUG(6) fprintf(stderr,"parse_list_file: item = %s\n", buf);

103 list = g_list_append(list, g_strdup(buf));

104 }

105 }

106 fclose(fptr);

107

108 return list;

109 }

110

111 /* given a semicolon separated string, this function makes a GList out of it. */

112 GList*

113 parse_list(gchar * line, gboolean read_file)

114 {

115 GList *list = NULL;

116 gchar buf[256];

117 gchar *p, *q;

118

119 DEBUG(6) fprintf(stderr, "parsing list %s, file?:%d\n", line, read_file);

120

121 p = line;

122 while (*p != '\0') {

123 q = buf;

124

125 while (*p && (*p != ';') && (q < buf + 255))

126 *(q++) = *(p++);

127 *q = '\0';

128

129 if ((buf[0] == '/') && (read_file))

130 /* item is a filename, include its contents */

131 list = g_list_concat(list, parse_list_file(buf));

132 else

133 /* just a normal item */

134 list = g_list_append(list, g_strdup(buf));

135

136 DEBUG(6) fprintf(stderr, "item = %s\n", buf);

137

138 if (*p)

139 p++;

140 }

141 return list;

142 }

143

144 static GList*

145 parse_address_list(gchar * line, gboolean read_file)

146 {

147 GList *plain_list = parse_list(line, read_file);

148 GList *node;

149 GList *list = NULL;

150

151 foreach(plain_list, node) {

152 gchar *item = (gchar *) (node->data);

153 address *addr = create_address(item, TRUE);

154 if (addr)

155 list = g_list_append(list, addr);

156 g_free(item);

157 }

158 g_list_free(plain_list);

159

160 return list;

161 }

162

163 static GList*

164 parse_resolve_list(gchar * line)

165 {

166 GList *list;

167 GList *list_node;

168 GList *res_list = NULL;

169

170 list = parse_list(line, FALSE);

171 if (!list) {

172 return NULL;

173 }

174

175 foreach(list, list_node) {

176 gchar *item = (gchar *) (list_node->data);

177 if (strcmp(item, "byname") == 0) {

178 res_list = g_list_append(res_list, resolve_byname);

179 #ifdef ENABLE_RESOLVER

180 } else if (strcmp(item, "dns_a") == 0) {

181 res_list = g_list_append(res_list, resolve_dns_a);

182 } else if (strcmp(item, "dns_mx") == 0) {

183 res_list = g_list_append(res_list, resolve_dns_mx);

184 #endif

185 } else {

186 logwrite(LOG_ALERT, "unknown resolver %s\n", item);

187 exit(EXIT_FAILURE);

188 }

189 g_free(item);

190 }

191 g_list_free(list);

192 return res_list;

193 }

194

195 static interface*

196 parse_interface(gchar * line, gint def_port)

197 {

198 gchar buf[256];

199 gchar *p, *q;

200 interface *iface;

201

202 DEBUG(6) fprintf(stderr, "parse_interface: %s\n", line);

203

204 p = line;

205 q = buf;

206 while ((*p != '\0') && (*p != ':') && (q < buf + 255))

207 *(q++) = *(p++);

208 *q = '\0';

209

210 iface = g_malloc(sizeof(interface));

211 iface->address = g_strdup(buf);

212

213 if (*p) {

214 p++;

215 iface->port = atoi(p);

216 } else

217 iface->port = def_port;

218 DEBUG(6) fprintf(stderr,"rval=%s, address:port=%s:%i\n",line, iface->address, iface->port);

219

220 return iface;

221 }

222

223 #ifdef ENABLE_IDENT /* so far used for that only */

224 static struct in_addr*

225 parse_network(gchar * line, gint def_port)

226 {

227 gchar buf[256];

228 gchar *p, *q;

229 struct in_addr addr, mask_addr, net_addr, *p_net_addr;

230 guint n;

231

232 DEBUG(6) fprintf(stderr, "parse_network: %s\n", line);

233

234 p = line;

235 q = buf;

236 while ((*p != '\0') && (*p != '/') && (q < buf + 255))

237 *(q++) = *(p++);

238 *q = '\0';

239

240 if ((addr.s_addr = inet_addr(buf)) == INADDR_NONE) {

241 fprintf(stderr, "'%s' is not a valid address (must be ip)\n", buf);

242 exit(EXIT_FAILURE);

243 }

244

245 if (*p) {

246 guint i;

247 p++;

248 i = atoi(p);

249 if ((i >= 0) && (i <= 32))

250 n = i ? ~((1 << (32 - i)) - 1) : 0;

251 else {

252 fprintf(stderr, "'%d' is not a valid net mask (must be >= 0 and <= 32)\n", i);

253 exit(EXIT_FAILURE);

254 }

255 } else

256 n = 0;

257

258 mask_addr.s_addr = htonl(n);

259 net_addr.s_addr = mask_addr.s_addr & addr.s_addr;

260

261 p_net_addr = g_malloc(sizeof(struct in_addr));

262 p_net_addr->s_addr = net_addr.s_addr;

263 return p_net_addr;

264 }

265 #endif

266

267 static gboolean

268 eat_comments(FILE * in)

269 {

270 gint c;

271

272 for (c = fgetc(in); (c == '#' || isspace(c)) && c != EOF;

273 c = fgetc(in)) {

274 if (c == '#') {

275 gint c;

276 for (c = fgetc(in); (c != '\n') && (c != EOF); c = fgetc(in));

277 }

278 }

279 if (c == EOF)

280 return FALSE;

281 ungetc(c, in);

282 return TRUE;

283 }

284

285 /* after parsing, eat trailing character until LF */

286 static gboolean

287 eat_line_trailing(FILE * in)

288 {

289 gint c;

290

291 for (c = fgetc(in); c != EOF && c != '\n'; c = fgetc(in));

292 if (c == EOF)

293 return FALSE;

294 return TRUE;

295 }

296

297 static gboolean

298 eat_spaces(FILE * in)

299 {

300 gint c;

301

302 for (c = fgetc(in); c != EOF && isspace(c); c = fgetc(in)) {

303 /* empty */

304 }

305 if (c == EOF)

306 return FALSE;

307 ungetc(c, in);

308 return TRUE;

309 }

310

311 static gboolean

312 read_lval(FILE * in, gchar * buf, gint size)

313 {

314 gint c;

315 gchar *ptr = buf;

316

317 DEBUG(6) fprintf(stderr, "read_lval()\n");

318

319 if (!eat_spaces(in))

320 return FALSE;

321

322 c = fgetc(in);

323 DEBUG(6) fprintf(stderr, "read_lval() 2\n");

324 while ((isalnum(c) || c == '_' || c == '-' || c == '.')

325 && (ptr < buf + size - 1)

326 && (c != EOF)) {

327 *ptr = c;

328 ptr++;

329 c = fgetc(in);

330 }

331 *ptr = '\0';

332 ungetc(c, in);

333

334 if (c == EOF) {

335 fprintf(stderr, "unexpected EOF after %s\n", buf);

336 return FALSE;

337 } else if (ptr >= buf + size - 1) {

338 fprintf(stderr, "lval too long\n");

339 }

340

341 eat_spaces(in);

342

343 DEBUG(6) fprintf(stderr, "lval = %s\n", buf);

344

345 return buf[0] != '\0';

346 }

347

348 static gboolean

349 read_rval(FILE * in, gchar * buf, gint size)

350 {

351 gint c;

352 gchar *ptr = buf;

353

354 DEBUG(6) fprintf(stderr, "read_rval()\n");

355

356 if (!eat_spaces(in))

357 return FALSE;

358

359 c = fgetc(in);

360 if (c != '\"') {

361 while ((isalnum(c) || c == '_' || c == '-' || c == '.'

362 || c == '/' || c == '@' || c == ';' || c == ':')

363 && (ptr < buf + size - 1)

364 && (c != EOF)) {

365 *ptr = c;

366 ptr++;

367 c = fgetc(in);

368 }

369 *ptr = '\0';

370 ungetc(c, in);

371 } else {

372 gboolean escape = FALSE;

373 c = fgetc(in);

374 while (((c != '\"') || escape) && (ptr < buf + size - 1)) {

375 if (c != '\n') { /* ignore line breaks */

376 if ((c == '\\') && (!escape)) {

377 escape = TRUE;

378 } else {

379 *ptr = c;

380 ptr++;

381 escape = FALSE;

382 }

383 }

384 c = fgetc(in);

385 }

386 *ptr = '\0';

387 }

388

389 eat_line_trailing(in);

390

391 DEBUG(6) fprintf(stderr, "rval = %s\n", buf);

392

393 return TRUE;

394 }

395

396 static gboolean

397 read_statement(FILE * in, gchar * lval, gint lsize, gchar * rval, gint rsize)

398 {

399 gint c;

400

401 DEBUG(6) fprintf(stderr, "read_statement()\n");

402

403 /* eat comments and empty lines: */

404 if (!eat_comments(in))

405 return FALSE;

406

407 if (!read_lval(in, lval, lsize)) {

408 return FALSE;

409 }

410

411 DEBUG(6) fprintf(stderr, " lval = %s\n", lval);

412 if ((c = fgetc(in) == '=')) {

413 if (read_rval(in, rval, rsize)) {

414 DEBUG(6) fprintf(stderr, " rval = %s\n", rval);

415 return TRUE;

416 }

417 } else {

418 DEBUG(6) fprintf(stderr," '=' expected after %s, char was '%c'\n", lval, c);

419 fprintf(stderr, "'=' expected after %s, char was '%c'\n", lval, c);

420 }

421 return FALSE;

422 }

423

424 gboolean

425 read_conf(gchar * filename)

426 {

427 FILE *in;

428

429 conf.log_max_pri = 7;

430 conf.remote_port = 25;

431 conf.do_relay = TRUE;

432 conf.alias_local_cmp = strcmp;

433 conf.max_defer_time = 86400 * 4; /* 4 days */

434 conf.max_msg_size = 0; /* no limit on msg size */

435 conf.spool_dir = SPOOL_DIR;

436 conf.mail_dir = "/var/mail";

437

438 if ((in = fopen(filename, "r")) == NULL) {

439 logwrite(LOG_ALERT, "could not open config file %s: %s\n", filename, strerror(errno));

440 return FALSE;

441 }

442

443 gchar lval[256], rval[2048];

444 while (read_statement(in, lval, 256, rval, 2048)) {

445 DEBUG(6) fprintf(stderr,"read_conf(): lval=%s\n", lval);

446 if (strcmp(lval, "debug_level") == 0)

447 conf.debug_level = atoi(rval);

448 else if (strcmp(lval, "run_as_user") == 0) {

449 if (!conf.run_as_user) /* you should not be able to reset that flag */

450 conf.run_as_user = parse_boolean(rval);

451 } else if (strcmp(lval, "use_syslog") == 0)

452 conf.use_syslog = parse_boolean(rval);

453 else if (strcmp(lval, "mail_dir") == 0)

454 conf.mail_dir = g_strdup(rval);

455 else if (strcmp(lval, "lock_dir") == 0)

456 conf.lock_dir = g_strdup(rval);

457 else if (strcmp(lval, "spool_dir") == 0)

458 conf.spool_dir = g_strdup(rval);

459 else if (strcmp(lval, "log_dir") == 0)

460 conf.log_dir = g_strdup(rval);

461 else if (strcmp(lval, "host_name") == 0) {

462 if (rval[0] != '/')

463 conf.host_name = g_strdup(rval);

464 else {

465 char buf[256];

466 FILE *fptr = fopen(rval, "rt");

467 if (fptr) {

468 logwrite(LOG_ALERT, "could not open %s: %s\n", rval, strerror(errno));

469 return FALSE;

470 }

471 fgets(buf, 255, fptr);

472 g_strchomp(buf);

473 conf.host_name = g_strdup(buf);

474 fclose(fptr);

475 }

476 } else if (strcmp(lval, "remote_port") == 0) {

477 logwrite(LOG_WARNING, "the remote_port option is now deprecated. Use 'mail_host' in the\n"

478 "route configuration instead. See man masqmail.route\n");

479 conf.remote_port = atoi(rval);

480 } else if (strcmp(lval, "local_hosts") == 0)

481 conf.local_hosts = parse_list(rval, FALSE);

482 else if (strcmp(lval, "local_addresses") == 0)

483 conf.local_addresses = parse_list(rval, TRUE);

484 else if (strcmp(lval, "not_local_addresses") == 0)

485 conf.not_local_addresses = parse_list(rval, TRUE);

486 else if (strcmp(lval, "local_nets") == 0)

487 conf.local_nets = parse_list(rval, FALSE);

488 else if (strcmp(lval, "do_save_envelope_to") == 0)

489 conf.do_save_envelope_to = parse_boolean(rval);

490 else if (strcmp(lval, "defer_all") == 0)

491 conf.defer_all = parse_boolean(rval);

492 else if (strcmp(lval, "do_relay") == 0)

493 conf.do_relay = parse_boolean(rval);

494 else if (strcmp(lval, "alias_file") == 0) {

495 conf.alias_file = g_strdup(rval);

496 } else if (strcmp(lval, "alias_local_caseless") == 0) {

497 conf.alias_local_cmp = parse_boolean(rval) ? strcasecmp : strcmp;

498 } else if (strcmp(lval, "mbox_default") == 0) {

499 conf.mbox_default = g_strdup(rval);

500 } else if (strcmp(lval, "mbox_users") == 0) {

501 conf.mbox_users = parse_list(rval, TRUE);

502 } else if (strcmp(lval, "mda_users") == 0) {

503 conf.mda_users = parse_list(rval, TRUE);

504 } else if (strcmp(lval, "maildir_users") == 0) {

505 conf.maildir_users = parse_list(rval, TRUE);

506 } else if (strcmp(lval, "mda") == 0) {

507 conf.mda = g_strdup(rval);

508 } else if (strcmp(lval, "mda_fromline") == 0) {

509 conf.mda_fromline = parse_boolean(rval);

510 } else if (strcmp(lval, "mda_fromhack") == 0) {

511 conf.mda_fromhack = parse_boolean(rval);

512 } else if (strcmp(lval, "pipe_fromline") == 0) {

513 conf.pipe_fromline = parse_boolean(rval);

514 } else if (strcmp(lval, "pipe_fromhack") == 0) {

515 conf.pipe_fromhack = parse_boolean(rval);

516 } else if (strcmp(lval, "listen_addresses") == 0) {

517 GList *node;

518 GList *tmp_list = parse_list(rval, FALSE);

519

520 conf.listen_addresses = NULL;

521 foreach(tmp_list, node) {

522 conf.listen_addresses = g_list_append(conf.listen_addresses, parse_interface((gchar *) (node-> data), 25));

523 g_free(node->data);

524 }

525 g_list_free(tmp_list);

526 } else if (strcmp(lval, "ident_trusted_nets") == 0) {

527 #ifdef ENABLE_IDENT

528 GList *node;

529 GList *tmp_list = parse_list(rval, FALSE);

530

531 conf.ident_trusted_nets = NULL;

532 foreach(tmp_list, node) {

533 conf.ident_trusted_nets = g_list_append(conf.ident_trusted_nets, parse_network((gchar *) (node->data), 25));

534 g_free(node->data);

535 }

536 g_list_free(tmp_list);

537 #else

538 logwrite(LOG_WARNING, "%s ignored: not compiled with ident support\n", lval);

539 #endif

540 } else if ((strncmp(lval, "connect_route.", 14) == 0)

541 || (strncmp(lval, "online_routes.", 14) == 0)) {

542 GList *file_list = parse_list(rval, FALSE);

543 table_pair *pair = create_pair(&(lval[14]), file_list);

544 conf.connect_routes = g_list_append(conf.connect_routes, pair);

545 } else if (strcmp(lval, "local_net_route") == 0) {

546 conf.local_net_routes = parse_list(rval, FALSE);

547 } else if (strcmp(lval, "online_detect") == 0)

548 conf.online_detect = g_strdup(rval);

549 else if (strcmp(lval, "online_file") == 0)

550 conf.online_file = g_strdup(rval);

551 else if (strcmp(lval, "online_pipe") == 0)

552 conf.online_pipe = g_strdup(rval);

553 else if (strcmp(lval, "mserver_iface") == 0)

554 conf.mserver_iface = parse_interface(rval, 224);

555 else if (strcmp(lval, "do_queue") == 0)

556 conf.do_queue = parse_boolean(rval);

557 else if (strncmp(lval, "get.", 4) == 0) {

558 #ifdef ENABLE_POP3

559 table_pair *pair = create_pair_string(&(lval[4]), rval);

560 conf.get_names = g_list_append(conf.get_names, pair);

561 #else

562 logwrite(LOG_WARNING, "get.<name> ignored: not compiled with pop support\n");

563 #endif

564 } else if (strncmp(lval, "online_gets.", 12) == 0) {

565 #ifdef ENABLE_POP3

566 GList *file_list = parse_list(rval, FALSE);

567 table_pair *pair = create_pair(&(lval[12]), file_list);

568 conf.online_gets = g_list_append(conf.online_gets, pair);

569 #else

570 logwrite(LOG_WARNING, "online_gets.<name> ignored: not compiled with pop support\n");

571 #endif

572 } else if (strcmp(lval, "errmsg_file") == 0)

573 conf.errmsg_file = g_strdup(rval);

574 else if (strcmp(lval, "warnmsg_file") == 0)

575 conf.warnmsg_file = g_strdup(rval);

576 else if (strcmp(lval, "warn_intervals") == 0)

577 conf.warn_intervals = parse_list(rval, FALSE);

578 else if (strcmp(lval, "max_defer_time") == 0) {

579 gint dummy;

580 gint ival = time_interval(rval, &dummy);

581 if (ival < 0)

582 logwrite(LOG_WARNING, "invalid time interval for 'max_defer_time': %s\n", rval);

583 else

584 conf.max_defer_time = ival;

585 } else if (strcmp(lval, "log_user") == 0)

586 conf.log_user = g_strdup(rval);

587 else if(strcmp(lval, "max_msg_size") == 0) {

588 conf.max_msg_size = atol(rval);

589 DEBUG(6) fprintf(stderr,"rval=%s, conf.max_msg_size=%ld\n",

590 rval, conf.max_msg_size);

591 }

592 else

593 logwrite(LOG_WARNING, "var '%s' not (yet) known, ignored\n", lval);

594 }

595 fclose(in);

596

597 if (!conf.host_name) {

598 logwrite(LOG_ALERT, "`host_name' MUST be set in masqmail.conf. See man page\n");

599 return FALSE;

600 }

601

602 if (conf.errmsg_file == NULL)

603 conf.errmsg_file = g_strdup(DATA_DIR "/tpl/failmsg.tpl");

604 if (conf.warnmsg_file == NULL)

605 conf.warnmsg_file = g_strdup(DATA_DIR "/tpl/warnmsg.tpl");

606

607 if (conf.lock_dir == NULL)

608 conf.lock_dir = g_strdup_printf("%s/lock/", conf.spool_dir);

609

610 if (conf.mbox_default == NULL)

611 conf.mbox_default = g_strdup("mbox");

612

613 if (conf.warn_intervals == NULL)

614 conf.warn_intervals = parse_list("1h;4h;8h;1d;2d;3d", FALSE);

615

616 if (!conf.local_hosts) {

617 char* shortname = strdup(conf.host_name);

618 char* p = strchr(shortname, '.');

619 if (p) {

620 *p = '\0';

621 }

622 /* we don't care if shortname and conf.host_name are the same */

623 char* local_hosts_str = g_strdup_printf("localhost;%s;%s", shortname, conf.host_name);

624 conf.local_hosts = parse_list(local_hosts_str, FALSE);

625 free(shortname);

626 free(local_hosts_str);

627 }

628

629

630 return TRUE;

631 }

632

633 connect_route*

634 read_route(gchar * filename, gboolean is_local_net)

635 {

636 gboolean ok = FALSE;

637 FILE *in;

638

639 connect_route *route = g_malloc(sizeof(connect_route));

640 memset(route, 0, sizeof(connect_route));

641

642 DEBUG(5) debugf("read_route, filename = %s\n", filename);

643

644 route->filename = g_strdup(filename);

645 route->name = g_strdup(filename); /* quick hack */

646

647 route->protocol = g_strdup("smtp");

648 route->expand_h_sender_address = TRUE;

649

650 route->is_local_net = is_local_net;

651

652 route->do_pipelining = TRUE;

653

654 if ((in = fopen(route->filename, "r")) == NULL) {

655 logwrite(LOG_ALERT, "could not open route file %s: %s\n", route->filename, strerror(errno));

656 g_free(route);

657 return NULL;

658 }

659

660 gchar lval[256], rval[2048];

661 while (read_statement(in, lval, 256, rval, 2048)) {

662 if (strcmp(lval, "protocol") == 0)

663 route->protocol = g_strdup(rval);

664 else if (strcmp(lval, "mail_host") == 0)

665 route->mail_host = parse_interface(rval, conf.remote_port);

666 else if (strcmp(lval, "helo_name") == 0)

667 route->helo_name = g_strdup(rval);

668 else if (strcmp(lval, "wrapper") == 0)

669 route->wrapper = g_strdup(rval);

670 else if (strcmp(lval, "connect_error_fail") == 0)

671 route->connect_error_fail = parse_boolean(rval);

672 else if (strcmp(lval, "do_correct_helo") == 0)

673 route->do_correct_helo = parse_boolean(rval);

674 else if (strcmp(lval, "do_pipelining") == 0)

675 route->do_pipelining = parse_boolean(rval);

676 else if (strcmp(lval, "allowed_return_paths") == 0)

677 route->allowed_return_paths = parse_address_list(rval, TRUE);

678 else if (strcmp(lval, "allowed_mail_locals") == 0)

679 route->allowed_mail_locals = parse_list(rval, TRUE);

680 else if (strcmp(lval, "not_allowed_return_paths") == 0)

681 route->not_allowed_return_paths = parse_address_list(rval, TRUE);

682 else if (strcmp(lval, "not_allowed_mail_locals") == 0)

683 route->not_allowed_mail_locals = parse_list(rval, TRUE);

684 else if (strcmp(lval, "allowed_rcpt_domains") == 0)

685 route->allowed_rcpt_domains = parse_list(rval, TRUE);

686 else if (strcmp(lval, "not_allowed_rcpt_domains") == 0)

687 route->not_allowed_rcpt_domains = parse_list(rval, TRUE);

688 else if (strcmp(lval, "set_h_from_domain") == 0)

689 route->set_h_from_domain = g_strdup(rval);

690 else if (strcmp(lval, "set_h_reply_to_domain") == 0)

691 route->set_h_reply_to_domain = g_strdup(rval);

692 else if (strcmp(lval, "set_return_path_domain") == 0)

693 route->set_return_path_domain = g_strdup(rval);

694 else if (strcmp(lval, "map_return_path_addresses") == 0) {

695 GList *node, *list;

696

697 list = parse_list(rval, TRUE);

698 foreach(list, node) {

699 gchar *item = (gchar *) (node->data);

700 table_pair *pair = parse_table_pair(item, ':');

701 address *addr = create_address((gchar *) (pair->value), TRUE);

702 g_free(pair->value);

703 pair->value = (gpointer *) addr;

704 route->map_return_path_addresses = g_list_append(route->map_return_path_addresses, pair);

705 g_free(item);

706 }

707 g_list_free(list);

708 } else if (strcmp(lval, "map_h_from_addresses") == 0) {

709 GList *list, *node;

710

711 list = parse_list(rval, TRUE);

712 foreach(list, node) {

713 gchar *item = (gchar *) (node->data);

714 table_pair *pair = parse_table_pair(item, ':');

715 route->map_h_from_addresses = g_list_append(route->map_h_from_addresses, pair);

716 g_free(item);

717 }

718 g_list_free(list);

719 } else if (strcmp(lval, "map_h_reply_to_addresses") == 0) {

720 GList *list, *node;

721

722 list = parse_list(rval, TRUE);

723 foreach(list, node) {

724 gchar *item = (gchar *) (node->data);

725 table_pair *pair = parse_table_pair(item, ':');

726 route->map_h_reply_to_addresses = g_list_append(route->map_h_reply_to_addresses, pair);

727 g_free(item);

728 }

729 g_list_free(list);

730 } else if (strcmp(lval, "map_h_mail_followup_to_addresses") == 0) {

731 GList *list, *node;

732

733 list = parse_list(rval, TRUE);

734 foreach(list, node) {

735 gchar *item = (gchar *) (node->data);

736 table_pair *pair = parse_table_pair(item, ':');

737 route->map_h_mail_followup_to_addresses = g_list_append(route->map_h_mail_followup_to_addresses, pair);

738 g_free(item);

739 }

740 g_list_free(list);

741 } else if (strcmp(lval, "expand_h_sender_domain") == 0) {

742 route->expand_h_sender_domain = parse_boolean(rval);

743 } else if (strcmp(lval, "expand_h_sender_address") == 0) {

744 route->expand_h_sender_address = parse_boolean(rval);

745 } else if (strcmp(lval, "resolve_list") == 0)

746 route->resolve_list = parse_resolve_list(rval);

747 else if (strcmp(lval, "do_ssl") == 0) {

748 /* we ignore this. This option is used by sqilconf */

749 ;

750 }

751 #ifdef ENABLE_AUTH

752 else if (strcmp(lval, "auth_name") == 0) {

753 route->auth_name = g_strdup(rval);

754 } else if (strcmp(lval, "auth_login") == 0) {

755 route->auth_login = g_strdup(rval);

756 } else if (strcmp(lval, "auth_secret") == 0) {

757 route->auth_secret = g_strdup(rval);

758 }

759 #else

760 else if ((strcmp(lval, "auth_name") == 0)

761 || (strcmp(lval, "auth_login") == 0)

762 || (strcmp(lval, "auth_secret") == 0)) {

763 logwrite(LOG_WARNING, "%s ignored: not compiled with auth support.\n", lval);

764 }

765 #endif

766 else if (strcmp(lval, "pop3_login") == 0) {

767 #ifdef ENABLE_POP3

768 route->pop3_login = g_strdup(rval);

769 #else

770 logwrite(LOG_WARNING, "pop3_login ignored: not compiled with pop support.\n");

771 #endif

772 } else if (strcmp(lval, "pipe") == 0) {

773 route->pipe = g_strdup(rval);

774 } else if (strcmp(lval, "pipe_fromline") == 0) {

775 route->pipe_fromline = parse_boolean(rval);

776 } else if (strcmp(lval, "pipe_fromhack") == 0) {

777 route->pipe_fromhack = parse_boolean(rval);

778 } else if (strcmp(lval, "last_route") == 0) {

779 route->last_route = parse_boolean(rval);

780 } else

781 logwrite(LOG_WARNING, "var '%s' not (yet) known, ignored\n", lval);

782 }

783

784 if (route->resolve_list == NULL) {

785 if (is_local_net) {

786 route->resolve_list = g_list_append(NULL, resolve_byname);

787 } else {

788 #ifdef ENABLE_RESOLVER

789 route->resolve_list = g_list_append(route->resolve_list, resolve_dns_mx);

790 route->resolve_list = g_list_append(route->resolve_list, resolve_dns_a);

791 #endif

792 route->resolve_list = g_list_append(route->resolve_list, resolve_byname);

793 }

794 }

795 fclose(in);

796 ok = TRUE;

797

798 /* warn user about misconfigurations: */

799 if ((route->map_h_from_addresses != NULL) && (route->set_h_from_domain != NULL)) {

800 logwrite(LOG_WARNING, "'map_h_from_addresses' overrides 'set_h_from_domain'\n");

801 g_free(route->set_h_from_domain);

802 route->set_h_from_domain = NULL;

803 }

804 if ((route->map_h_reply_to_addresses != NULL) && (route->set_h_reply_to_domain != NULL)) {

805 logwrite(LOG_WARNING, "'map_h_reply_to_addresses' overrides 'set_h_reply_to_domain'\n");

806 g_free(route->set_h_reply_to_domain);

807 route->set_h_reply_to_domain = NULL;

808 }

809

810 if (!ok) {

811 g_free(route);

812 route = NULL;

813 }

814

815 return route;

816 }

817

818 static void

819 _g_list_free_all(GList * list)

820 {

821 GList *node;

822 if (list) {

823 foreach(list, node)

824 g_free(node->data);

825 g_list_free(list);

826 }

827 }

828

829 void

830 destroy_route(connect_route * r)

831 {

832 if (r->filename)

833 g_free(r->filename);

834 if (r->protocol)

835 g_free(r->protocol);

836 if (r->mail_host) {

837 g_free(r->mail_host->address);

838 g_free(r->mail_host);

839 }

840 if (r->wrapper)

841 g_free(r->wrapper);

842 if (r->helo_name)

843 g_free(r->helo_name);

844 _g_list_free_all(r->allowed_mail_locals);

845 _g_list_free_all(r->not_allowed_mail_locals);

846 _g_list_free_all(r->allowed_rcpt_domains);

847 _g_list_free_all(r->not_allowed_rcpt_domains);

848 if (r->set_h_from_domain)

849 g_free(r->set_h_from_domain);

850 if (r->set_h_reply_to_domain)

851 g_free(r->set_h_reply_to_domain);

852 if (r->set_return_path_domain)

853 g_free(r->set_return_path_domain);

854 if (r->map_h_reply_to_addresses)

855 destroy_table(r->map_h_reply_to_addresses);

856 if (r->resolve_list)

857 g_list_free(r->resolve_list);

858 #ifdef ENABLE_AUTH

859 if (r->auth_name)

860 g_free(r->auth_name);

861 if (r->auth_login)

862 g_free(r->auth_login);

863 if (r->auth_secret)

864 g_free(r->auth_secret);

865 #endif

866 #ifdef ENABLE_POP3

867 if (r->pop3_login)

868 g_free(r->pop3_login);

869 #endif

870 if (r->pipe)

871 g_free(r->pipe);

872 g_free(r);

873 }

874

875 GList*

876 read_route_list(GList * rf_list, gboolean is_local_net)

877 {

878 GList *list = NULL;

879 GList *node;

880 uid_t saved_uid, saved_gid;

881

882 if (!conf.run_as_user) {

883 set_euidgid(0, 0, &saved_uid, &saved_gid);

884 }

885

886 foreach(rf_list, node) {

887 gchar *fname = (gchar *) (node->data);

888 connect_route *route = read_route(fname, is_local_net);

889 if (route)

890 list = g_list_append(list, route);

891 else

892 logwrite(LOG_ALERT, "could not read route configuration %s\n", fname);

893 }

894

895 /* set uid and gid back */

896 if (!conf.run_as_user) {

897 set_euidgid(saved_uid, saved_gid, NULL, NULL);

898 }

899

900 return list;

901 }

902

903 void

904 destroy_route_list(GList * list)

905 {

906 GList *node;

907

908 foreach(list, node) {

909 connect_route *route = (connect_route *) (node->data);

910 destroy_route(route);

911 }

912 g_list_free(list);

913 }

914

915 #ifdef ENABLE_POP3

916

917 get_conf*

918 read_get_conf(gchar * filename)

919 {

920 FILE *in;

921

922 get_conf *gc = g_malloc(sizeof(get_conf));

923 memset(gc, 0, sizeof(get_conf));

924

925 gc->server_port = 110;

926

927 if ((in = fopen(filename, "r")) == NULL) {

928 logwrite(LOG_ALERT, "could not open get file %s: %s\n", filename, strerror(errno));

929 g_free(gc);

930 return NULL;

931 }

932

933 gchar lval[256], rval[2048];

934 while (read_statement(in, lval, 256, rval, 2048)) {

935 if (strcmp(lval, "protocol") == 0)

936 gc->protocol = g_strdup(rval);

937 else if (strcmp(lval, "server") == 0)

938 gc->server_name = g_strdup(rval);

939 else if (strcmp(lval, "port") == 0)

940 gc->server_port = atoi(rval);

941 else if (strcmp(lval, "wrapper") == 0)

942 gc->wrapper = g_strdup(rval);

943 else if (strcmp(lval, "user") == 0)

944 gc->login_user = g_strdup(rval);

945 else if (strcmp(lval, "pass") == 0)

946 gc->login_pass = g_strdup(rval);

947 else if (strcmp(lval, "address") == 0)

948 gc->address = create_address_qualified(rval, TRUE, conf.host_name);

949 else if (strcmp(lval, "return_path") == 0)

950 gc->return_path = create_address_qualified(rval, TRUE, conf.host_name);

951 else if (strcmp(lval, "do_ssl") == 0)

952 /* we ignore this. This option is used by sqilconf */

953 ;

954 else if (strcmp(lval, "do_keep") == 0)

955 gc->do_keep = parse_boolean(rval);

956 else if (strcmp(lval, "do_uidl") == 0)

957 gc->do_uidl = parse_boolean(rval);

958 else if (strcmp(lval, "do_uidl_dele") == 0)

959 gc->do_uidl_dele = parse_boolean(rval);

960 else if (strcmp(lval, "max_size") == 0)

961 gc->max_size = atoi(rval);

962 else if (strcmp(lval, "max_size_delete") == 0)

963 gc->max_size_delete = parse_boolean(rval);

964 else if (strcmp(lval, "max_count") == 0)

965 gc->max_count = atoi(rval);

966 else if (strcmp(lval, "resolve_list") == 0)

967 gc->resolve_list = parse_resolve_list(rval);

968 else

969 logwrite(LOG_WARNING, "var '%s' not (yet) known, ignored\n", lval);

970 }

971 fclose(in);

972

973 if (gc->resolve_list == NULL) {

974 #ifdef ENABLE_RESOLVER

975 gc->resolve_list = g_list_append(NULL, resolve_dns_a);

976 #endif

977 gc->resolve_list = g_list_append(NULL, resolve_byname);

978 }

979

980 if (gc->protocol == NULL)

981 gc->protocol = g_strdup("pop3");

982 return gc;

983 }

984

985 void

986 destroy_get_conf(get_conf * gc)

987 {

988 if (gc->protocol)

989 g_free(gc->protocol);

990 if (gc->server_name)

991 g_free(gc->server_name);

992 if (gc->login_user)

993 g_free(gc->login_user);

994 if (gc->login_pass)

995 g_free(gc->login_pass);

996 if (gc->wrapper)

997 g_free(gc->wrapper);

998 if (gc->address)

999 destroy_address(gc->address);

1000 if (gc->return_path)

1001 destroy_address(gc->return_path);

1002 if (gc->resolve_list)

1003 g_list_free(gc->resolve_list);

1004 g_free(gc);

1005 }

1006

1007 #endif

1008

1009 connect_route*

1010 create_local_route()

1011 {

1012 connect_route *route;

1013

1014 route = g_malloc(sizeof(connect_route));

1015 if (!route) {

1016 return NULL;

1017 }

1018 memset(route, 0, sizeof(connect_route));

1019 route->protocol = g_strdup("smtp");

1020 route->is_local_net = TRUE;

1021 route->name = g_strdup("local_net (default)");

1022 route->expand_h_sender_address = TRUE;

1023 route->resolve_list = g_list_append(NULL, resolve_byname);

1024 route->connect_error_fail = TRUE;

1025 return route;

1026 }