Commit | Line | Data |
---|---|---|
059ec3d9 PH |
1 | /************************************************* |
2 | * Exim - an Internet mail transport agent * | |
3 | *************************************************/ | |
4 | ||
80fea873 | 5 | /* Copyright (c) University of Cambridge 1995 - 2016 */ |
059ec3d9 PH |
6 | /* See the file NOTICE for conditions of use and distribution. */ |
7 | ||
8 | ||
9 | #include "exim.h" | |
10 | ||
e6d225ae | 11 | #include <string.h> |
059ec3d9 PH |
12 | |
13 | /* This module contains tables that define the lookup methods and drivers | |
14 | that are actually included in the binary. Its contents are controlled by | |
15 | various macros in config.h that ultimately come from Local/Makefile. They are | |
16 | all described in src/EDITME. */ | |
17 | ||
18 | ||
e6d225ae DW |
19 | lookup_info **lookup_list; |
20 | int lookup_list_count = 0; | |
059ec3d9 | 21 | |
6545de78 PP |
22 | static int lookup_list_init_done = 0; |
23 | ||
4c04137d | 24 | /* Table of information about all possible authentication mechanisms. All |
059ec3d9 PH |
25 | entries are always present if any mechanism is declared, but the functions are |
26 | set to NULL for those that are not compiled into the binary. */ | |
27 | ||
28 | #ifdef AUTH_CRAM_MD5 | |
29 | #include "auths/cram_md5.h" | |
30 | #endif | |
31 | ||
32 | #ifdef AUTH_CYRUS_SASL | |
33 | #include "auths/cyrus_sasl.h" | |
34 | #endif | |
35 | ||
14aa5a05 PH |
36 | #ifdef AUTH_DOVECOT |
37 | #include "auths/dovecot.h" | |
38 | #endif | |
39 | ||
44bbabb5 PP |
40 | #ifdef AUTH_GSASL |
41 | #include "auths/gsasl_exim.h" | |
42 | #endif | |
43 | ||
dde3daac PP |
44 | #ifdef AUTH_HEIMDAL_GSSAPI |
45 | #include "auths/heimdal_gssapi.h" | |
46 | #endif | |
47 | ||
059ec3d9 PH |
48 | #ifdef AUTH_PLAINTEXT |
49 | #include "auths/plaintext.h" | |
50 | #endif | |
51 | ||
52 | #ifdef AUTH_SPA | |
53 | #include "auths/spa.h" | |
54 | #endif | |
55 | ||
b3ef41c9 JH |
56 | #ifdef AUTH_TLS |
57 | #include "auths/tls.h" | |
58 | #endif | |
59 | ||
059ec3d9 PH |
60 | auth_info auths_available[] = { |
61 | ||
62 | /* Checking by an expansion condition on plain text */ | |
63 | ||
64 | #ifdef AUTH_CRAM_MD5 | |
65 | { | |
66 | US"cram_md5", /* lookup name */ | |
67 | auth_cram_md5_options, | |
68 | &auth_cram_md5_options_count, | |
69 | &auth_cram_md5_option_defaults, | |
70 | sizeof(auth_cram_md5_options_block), | |
71 | auth_cram_md5_init, /* init function */ | |
72 | auth_cram_md5_server, /* server function */ | |
44bbabb5 PP |
73 | auth_cram_md5_client, /* client function */ |
74 | NULL /* diagnostic function */ | |
059ec3d9 PH |
75 | }, |
76 | #endif | |
77 | ||
78 | #ifdef AUTH_CYRUS_SASL | |
79 | { | |
384152a6 | 80 | US"cyrus_sasl", /* lookup name */ |
059ec3d9 PH |
81 | auth_cyrus_sasl_options, |
82 | &auth_cyrus_sasl_options_count, | |
83 | &auth_cyrus_sasl_option_defaults, | |
84 | sizeof(auth_cyrus_sasl_options_block), | |
85 | auth_cyrus_sasl_init, /* init function */ | |
86 | auth_cyrus_sasl_server, /* server function */ | |
44bbabb5 PP |
87 | NULL, /* client function */ |
88 | auth_cyrus_sasl_version_report /* diagnostic function */ | |
059ec3d9 PH |
89 | }, |
90 | #endif | |
91 | ||
14aa5a05 PH |
92 | #ifdef AUTH_DOVECOT |
93 | { | |
94 | US"dovecot", /* lookup name */ | |
95 | auth_dovecot_options, | |
96 | &auth_dovecot_options_count, | |
97 | &auth_dovecot_option_defaults, | |
98 | sizeof(auth_dovecot_options_block), | |
99 | auth_dovecot_init, /* init function */ | |
100 | auth_dovecot_server, /* server function */ | |
44bbabb5 PP |
101 | NULL, /* client function */ |
102 | NULL /* diagnostic function */ | |
103 | }, | |
104 | #endif | |
105 | ||
106 | #ifdef AUTH_GSASL | |
107 | { | |
108 | US"gsasl", /* lookup name */ | |
109 | auth_gsasl_options, | |
110 | &auth_gsasl_options_count, | |
111 | &auth_gsasl_option_defaults, | |
112 | sizeof(auth_gsasl_options_block), | |
113 | auth_gsasl_init, /* init function */ | |
114 | auth_gsasl_server, /* server function */ | |
115 | NULL, /* client function */ | |
116 | auth_gsasl_version_report /* diagnostic function */ | |
14aa5a05 PH |
117 | }, |
118 | #endif | |
119 | ||
dde3daac PP |
120 | #ifdef AUTH_HEIMDAL_GSSAPI |
121 | { | |
122 | US"heimdal_gssapi", /* lookup name */ | |
123 | auth_heimdal_gssapi_options, | |
124 | &auth_heimdal_gssapi_options_count, | |
125 | &auth_heimdal_gssapi_option_defaults, | |
126 | sizeof(auth_heimdal_gssapi_options_block), | |
127 | auth_heimdal_gssapi_init, /* init function */ | |
128 | auth_heimdal_gssapi_server, /* server function */ | |
129 | NULL, /* client function */ | |
130 | auth_heimdal_gssapi_version_report /* diagnostic function */ | |
131 | }, | |
132 | #endif | |
133 | ||
059ec3d9 PH |
134 | #ifdef AUTH_PLAINTEXT |
135 | { | |
136 | US"plaintext", /* lookup name */ | |
137 | auth_plaintext_options, | |
138 | &auth_plaintext_options_count, | |
139 | &auth_plaintext_option_defaults, | |
140 | sizeof(auth_plaintext_options_block), | |
141 | auth_plaintext_init, /* init function */ | |
142 | auth_plaintext_server, /* server function */ | |
44bbabb5 PP |
143 | auth_plaintext_client, /* client function */ |
144 | NULL /* diagnostic function */ | |
059ec3d9 PH |
145 | }, |
146 | #endif | |
147 | ||
148 | #ifdef AUTH_SPA | |
149 | { | |
150 | US"spa", /* lookup name */ | |
151 | auth_spa_options, | |
152 | &auth_spa_options_count, | |
153 | &auth_spa_option_defaults, | |
154 | sizeof(auth_spa_options_block), | |
155 | auth_spa_init, /* init function */ | |
156 | auth_spa_server, /* server function */ | |
44bbabb5 PP |
157 | auth_spa_client, /* client function */ |
158 | NULL /* diagnostic function */ | |
059ec3d9 PH |
159 | }, |
160 | #endif | |
161 | ||
b3ef41c9 JH |
162 | #ifdef AUTH_TLS |
163 | { | |
164 | US"tls", /* lookup name */ | |
165 | auth_tls_options, | |
166 | &auth_tls_options_count, | |
167 | &auth_tls_option_defaults, | |
168 | sizeof(auth_tls_options_block), | |
169 | auth_tls_init, /* init function */ | |
170 | auth_tls_server, /* server function */ | |
171 | NULL, /* client function */ | |
172 | NULL /* diagnostic function */ | |
173 | }, | |
174 | #endif | |
175 | ||
44bbabb5 | 176 | { US"", NULL, NULL, NULL, 0, NULL, NULL, NULL, NULL } |
059ec3d9 PH |
177 | }; |
178 | ||
179 | ||
180 | /* Tables of information about which routers and transports are included in the | |
181 | exim binary. */ | |
182 | ||
183 | /* Pull in the necessary header files */ | |
184 | ||
185 | #include "routers/rf_functions.h" | |
186 | ||
187 | #ifdef ROUTER_ACCEPT | |
188 | #include "routers/accept.h" | |
189 | #endif | |
190 | ||
191 | #ifdef ROUTER_DNSLOOKUP | |
192 | #include "routers/dnslookup.h" | |
193 | #endif | |
194 | ||
195 | #ifdef ROUTER_MANUALROUTE | |
196 | #include "routers/manualroute.h" | |
197 | #endif | |
198 | ||
199 | #ifdef ROUTER_IPLITERAL | |
200 | #include "routers/ipliteral.h" | |
201 | #endif | |
202 | ||
203 | #ifdef ROUTER_IPLOOKUP | |
204 | #include "routers/iplookup.h" | |
205 | #endif | |
206 | ||
207 | #ifdef ROUTER_QUERYPROGRAM | |
208 | #include "routers/queryprogram.h" | |
209 | #endif | |
210 | ||
211 | #ifdef ROUTER_REDIRECT | |
212 | #include "routers/redirect.h" | |
213 | #endif | |
214 | ||
215 | #ifdef TRANSPORT_APPENDFILE | |
216 | #include "transports/appendfile.h" | |
217 | #endif | |
218 | ||
219 | #ifdef TRANSPORT_AUTOREPLY | |
220 | #include "transports/autoreply.h" | |
221 | #endif | |
222 | ||
223 | #ifdef TRANSPORT_LMTP | |
224 | #include "transports/lmtp.h" | |
225 | #endif | |
226 | ||
227 | #ifdef TRANSPORT_PIPE | |
228 | #include "transports/pipe.h" | |
229 | #endif | |
230 | ||
3369a853 ACK |
231 | #ifdef EXPERIMENTAL_QUEUEFILE |
232 | #include "transports/queuefile.h" | |
233 | #endif | |
234 | ||
059ec3d9 PH |
235 | #ifdef TRANSPORT_SMTP |
236 | #include "transports/smtp.h" | |
237 | #endif | |
238 | ||
239 | ||
240 | /* Now set up the structures, terminated by an entry with a null name. */ | |
241 | ||
242 | router_info routers_available[] = { | |
243 | #ifdef ROUTER_ACCEPT | |
244 | { | |
245 | US"accept", | |
246 | accept_router_options, | |
247 | &accept_router_options_count, | |
248 | &accept_router_option_defaults, | |
249 | sizeof(accept_router_options_block), | |
250 | accept_router_init, | |
251 | accept_router_entry, | |
252 | NULL, /* no tidyup entry */ | |
253 | ri_yestransport | |
254 | }, | |
255 | #endif | |
256 | #ifdef ROUTER_DNSLOOKUP | |
257 | { | |
258 | US"dnslookup", | |
259 | dnslookup_router_options, | |
260 | &dnslookup_router_options_count, | |
261 | &dnslookup_router_option_defaults, | |
262 | sizeof(dnslookup_router_options_block), | |
263 | dnslookup_router_init, | |
264 | dnslookup_router_entry, | |
265 | NULL, /* no tidyup entry */ | |
266 | ri_yestransport | |
267 | }, | |
268 | #endif | |
269 | #ifdef ROUTER_IPLITERAL | |
270 | { | |
271 | US"ipliteral", | |
272 | ipliteral_router_options, | |
273 | &ipliteral_router_options_count, | |
274 | &ipliteral_router_option_defaults, | |
275 | sizeof(ipliteral_router_options_block), | |
276 | ipliteral_router_init, | |
277 | ipliteral_router_entry, | |
278 | NULL, /* no tidyup entry */ | |
279 | ri_yestransport | |
280 | }, | |
281 | #endif | |
282 | #ifdef ROUTER_IPLOOKUP | |
283 | { | |
284 | US"iplookup", | |
285 | iplookup_router_options, | |
286 | &iplookup_router_options_count, | |
287 | &iplookup_router_option_defaults, | |
288 | sizeof(iplookup_router_options_block), | |
289 | iplookup_router_init, | |
290 | iplookup_router_entry, | |
291 | NULL, /* no tidyup entry */ | |
292 | ri_notransport | |
293 | }, | |
294 | #endif | |
295 | #ifdef ROUTER_MANUALROUTE | |
296 | { | |
297 | US"manualroute", | |
298 | manualroute_router_options, | |
299 | &manualroute_router_options_count, | |
300 | &manualroute_router_option_defaults, | |
301 | sizeof(manualroute_router_options_block), | |
302 | manualroute_router_init, | |
303 | manualroute_router_entry, | |
304 | NULL, /* no tidyup entry */ | |
305 | 0 | |
306 | }, | |
307 | #endif | |
308 | #ifdef ROUTER_QUERYPROGRAM | |
309 | { | |
310 | US"queryprogram", | |
311 | queryprogram_router_options, | |
312 | &queryprogram_router_options_count, | |
313 | &queryprogram_router_option_defaults, | |
314 | sizeof(queryprogram_router_options_block), | |
315 | queryprogram_router_init, | |
316 | queryprogram_router_entry, | |
317 | NULL, /* no tidyup entry */ | |
318 | 0 | |
319 | }, | |
320 | #endif | |
321 | #ifdef ROUTER_REDIRECT | |
322 | { | |
323 | US"redirect", | |
324 | redirect_router_options, | |
325 | &redirect_router_options_count, | |
326 | &redirect_router_option_defaults, | |
327 | sizeof(redirect_router_options_block), | |
328 | redirect_router_init, | |
329 | redirect_router_entry, | |
330 | NULL, /* no tidyup entry */ | |
331 | ri_notransport | |
332 | }, | |
333 | #endif | |
334 | { US"", NULL, NULL, NULL, 0, NULL, NULL, NULL, 0 } | |
335 | }; | |
336 | ||
337 | ||
338 | ||
339 | transport_info transports_available[] = { | |
340 | #ifdef TRANSPORT_APPENDFILE | |
341 | { | |
342 | US"appendfile", /* driver name */ | |
343 | appendfile_transport_options, /* local options table */ | |
344 | &appendfile_transport_options_count, /* number of entries */ | |
345 | &appendfile_transport_option_defaults, /* private options defaults */ | |
346 | sizeof(appendfile_transport_options_block), /* size of private block */ | |
347 | appendfile_transport_init, /* init entry point */ | |
348 | appendfile_transport_entry, /* main entry point */ | |
349 | NULL, /* no tidyup entry */ | |
350 | NULL, /* no closedown entry */ | |
351 | TRUE, /* local flag */ | |
352 | }, | |
353 | #endif | |
354 | #ifdef TRANSPORT_AUTOREPLY | |
355 | { | |
356 | US"autoreply", /* driver name */ | |
357 | autoreply_transport_options, /* local options table */ | |
358 | &autoreply_transport_options_count, /* number of entries */ | |
359 | &autoreply_transport_option_defaults, /* private options defaults */ | |
360 | sizeof(autoreply_transport_options_block), /* size of private block */ | |
361 | autoreply_transport_init, /* init entry point */ | |
362 | autoreply_transport_entry, /* main entry point */ | |
363 | NULL, /* no tidyup entry */ | |
364 | NULL, /* no closedown entry */ | |
365 | TRUE /* local flag */ | |
366 | }, | |
367 | #endif | |
368 | #ifdef TRANSPORT_LMTP | |
369 | { | |
370 | US"lmtp", /* driver name */ | |
371 | lmtp_transport_options, /* local options table */ | |
372 | &lmtp_transport_options_count, /* number of entries */ | |
373 | &lmtp_transport_option_defaults, /* private options defaults */ | |
374 | sizeof(lmtp_transport_options_block), /* size of private block */ | |
375 | lmtp_transport_init, /* init entry point */ | |
376 | lmtp_transport_entry, /* main entry point */ | |
377 | NULL, /* no tidyup entry */ | |
378 | NULL, /* no closedown entry */ | |
379 | TRUE /* local flag */ | |
380 | }, | |
381 | #endif | |
382 | #ifdef TRANSPORT_PIPE | |
383 | { | |
384 | US"pipe", /* driver name */ | |
385 | pipe_transport_options, /* local options table */ | |
386 | &pipe_transport_options_count, /* number of entries */ | |
387 | &pipe_transport_option_defaults, /* private options defaults */ | |
388 | sizeof(pipe_transport_options_block), /* size of private block */ | |
389 | pipe_transport_init, /* init entry point */ | |
390 | pipe_transport_entry, /* main entry point */ | |
391 | NULL, /* no tidyup entry */ | |
392 | NULL, /* no closedown entry */ | |
393 | TRUE /* local flag */ | |
394 | }, | |
395 | #endif | |
3369a853 ACK |
396 | #ifdef EXPERIMENTAL_QUEUEFILE |
397 | { | |
398 | US"queuefile", /* driver name */ | |
399 | queuefile_transport_options, /* local options table */ | |
400 | &queuefile_transport_options_count, /* number of entries */ | |
401 | &queuefile_transport_option_defaults, /* private options defaults */ | |
402 | sizeof(queuefile_transport_options_block), /* size of private block */ | |
403 | queuefile_transport_init, /* init entry point */ | |
404 | queuefile_transport_entry, /* main entry point */ | |
405 | NULL, /* no tidyup entry */ | |
406 | NULL, /* no closedown entry */ | |
407 | TRUE /* local flag */ | |
408 | }, | |
409 | #endif | |
059ec3d9 PH |
410 | #ifdef TRANSPORT_SMTP |
411 | { | |
412 | US"smtp", /* driver name */ | |
413 | smtp_transport_options, /* local options table */ | |
414 | &smtp_transport_options_count, /* number of entries */ | |
415 | &smtp_transport_option_defaults, /* private options defaults */ | |
416 | sizeof(smtp_transport_options_block), /* size of private block */ | |
417 | smtp_transport_init, /* init entry point */ | |
418 | smtp_transport_entry, /* main entry point */ | |
419 | NULL, /* no tidyup entry */ | |
420 | smtp_transport_closedown, /* close down passed channel */ | |
421 | FALSE /* local flag */ | |
422 | }, | |
423 | #endif | |
424 | { US"", NULL, NULL, NULL, 0, NULL, NULL, NULL, NULL, FALSE } | |
425 | }; | |
426 | ||
d185889f JH |
427 | |
428 | #ifndef MACRO_PREDEF | |
429 | ||
e6d225ae DW |
430 | struct lookupmodulestr |
431 | { | |
432 | void *dl; | |
433 | struct lookup_module_info *info; | |
434 | struct lookupmodulestr *next; | |
435 | }; | |
436 | ||
437 | static struct lookupmodulestr *lookupmodules = NULL; | |
438 | ||
96f5fe4c JH |
439 | static void |
440 | addlookupmodule(void *dl, struct lookup_module_info *info) | |
e6d225ae | 441 | { |
96f5fe4c JH |
442 | struct lookupmodulestr *p = store_malloc(sizeof(struct lookupmodulestr)); |
443 | ||
444 | p->dl = dl; | |
445 | p->info = info; | |
446 | p->next = lookupmodules; | |
447 | lookupmodules = p; | |
448 | lookup_list_count += info->lookupcount; | |
e6d225ae DW |
449 | } |
450 | ||
451 | /* only valid after lookup_list and lookup_list_count are assigned */ | |
96f5fe4c JH |
452 | static void |
453 | add_lookup_to_list(lookup_info *info) | |
e6d225ae | 454 | { |
96f5fe4c JH |
455 | /* need to add the lookup to lookup_list, sorted */ |
456 | int pos = 0; | |
457 | ||
458 | /* strategy is to go through the list until we find | |
459 | either an empty spot or a name that is higher. | |
460 | this can't fail because we have enough space. */ | |
461 | ||
462 | while (lookup_list[pos] && (Ustrcmp(lookup_list[pos]->name, info->name) <= 0)) | |
463 | pos++; | |
464 | ||
465 | if (lookup_list[pos]) | |
466 | { | |
467 | /* need to insert it, so move all the other items up | |
468 | (last slot is still empty, of course) */ | |
469 | ||
470 | memmove(&lookup_list[pos+1], | |
471 | &lookup_list[pos], | |
472 | sizeof(lookup_info *) * (lookup_list_count-pos-1)); | |
e6d225ae | 473 | } |
96f5fe4c | 474 | lookup_list[pos] = info; |
e6d225ae DW |
475 | } |
476 | ||
4d805ee9 PP |
477 | |
478 | /* These need to be at file level for old versions of gcc (2.95.2 reported), | |
479 | * which give parse errors on an extern in function scope. Each entry needs | |
480 | * to also be invoked in init_lookup_list() below */ | |
481 | ||
78f72498 JH |
482 | #if defined(LOOKUP_CDB) && LOOKUP_CDB!=2 |
483 | extern lookup_module_info cdb_lookup_module_info; | |
4d805ee9 | 484 | #endif |
78f72498 JH |
485 | #if defined(LOOKUP_DBM) && LOOKUP_DBM!=2 |
486 | extern lookup_module_info dbmdb_lookup_module_info; | |
4d805ee9 | 487 | #endif |
78f72498 JH |
488 | #if defined(LOOKUP_DNSDB) && LOOKUP_DNSDB!=2 |
489 | extern lookup_module_info dnsdb_lookup_module_info; | |
4d805ee9 | 490 | #endif |
78f72498 JH |
491 | #if defined(LOOKUP_DSEARCH) && LOOKUP_DSEARCH!=2 |
492 | extern lookup_module_info dsearch_lookup_module_info; | |
4d805ee9 | 493 | #endif |
78f72498 JH |
494 | #if defined(LOOKUP_IBASE) && LOOKUP_IBASE!=2 |
495 | extern lookup_module_info ibase_lookup_module_info; | |
4d805ee9 | 496 | #endif |
78f72498 JH |
497 | #if defined(LOOKUP_LDAP) |
498 | extern lookup_module_info ldap_lookup_module_info; | |
de78e2d5 | 499 | #endif |
78f72498 JH |
500 | #if defined(LOOKUP_LSEARCH) && LOOKUP_LSEARCH!=2 |
501 | extern lookup_module_info lsearch_lookup_module_info; | |
4d805ee9 | 502 | #endif |
78f72498 JH |
503 | #if defined(LOOKUP_MYSQL) && LOOKUP_MYSQL!=2 |
504 | extern lookup_module_info mysql_lookup_module_info; | |
4d805ee9 PP |
505 | #endif |
506 | #if defined(LOOKUP_NIS) && LOOKUP_NIS!=2 | |
507 | extern lookup_module_info nis_lookup_module_info; | |
508 | #endif | |
78f72498 JH |
509 | #if defined(LOOKUP_NISPLUS) && LOOKUP_NISPLUS!=2 |
510 | extern lookup_module_info nisplus_lookup_module_info; | |
4d805ee9 | 511 | #endif |
78f72498 JH |
512 | #if defined(LOOKUP_ORACLE) && LOOKUP_ORACLE!=2 |
513 | extern lookup_module_info oracle_lookup_module_info; | |
4d805ee9 | 514 | #endif |
78f72498 JH |
515 | #if defined(LOOKUP_PASSWD) && LOOKUP_PASSWD!=2 |
516 | extern lookup_module_info passwd_lookup_module_info; | |
4d805ee9 | 517 | #endif |
78f72498 JH |
518 | #if defined(LOOKUP_PGSQL) && LOOKUP_PGSQL!=2 |
519 | extern lookup_module_info pgsql_lookup_module_info; | |
4d805ee9 | 520 | #endif |
78f72498 JH |
521 | #if defined(LOOKUP_REDIS) && LOOKUP_REDIS!=2 |
522 | extern lookup_module_info redis_lookup_module_info; | |
4d805ee9 | 523 | #endif |
5bde3efa ACK |
524 | #if defined(EXPERIMENTAL_LMDB) |
525 | extern lookup_module_info lmdb_lookup_module_info; | |
526 | #endif | |
78f72498 JH |
527 | #if defined(EXPERIMENTAL_SPF) |
528 | extern lookup_module_info spf_lookup_module_info; | |
4d805ee9 | 529 | #endif |
78f72498 JH |
530 | #if defined(LOOKUP_SQLITE) && LOOKUP_SQLITE!=2 |
531 | extern lookup_module_info sqlite_lookup_module_info; | |
4d805ee9 | 532 | #endif |
78f72498 JH |
533 | #if defined(LOOKUP_TESTDB) && LOOKUP_TESTDB!=2 |
534 | extern lookup_module_info testdb_lookup_module_info; | |
535 | #endif | |
536 | #if defined(LOOKUP_WHOSON) && LOOKUP_WHOSON!=2 | |
537 | extern lookup_module_info whoson_lookup_module_info; | |
4d805ee9 PP |
538 | #endif |
539 | ||
96f5fe4c JH |
540 | |
541 | void | |
542 | init_lookup_list(void) | |
e6d225ae | 543 | { |
fb2bba55 | 544 | #ifdef LOOKUP_MODULE_DIR |
e6d225ae DW |
545 | DIR *dd; |
546 | struct dirent *ent; | |
e6d225ae DW |
547 | int countmodules = 0; |
548 | int moduleerrors = 0; | |
fb2bba55 | 549 | #endif |
e6d225ae DW |
550 | struct lookupmodulestr *p; |
551 | ||
6545de78 PP |
552 | if (lookup_list_init_done) |
553 | return; | |
554 | lookup_list_init_done = 1; | |
555 | ||
e6d225ae | 556 | #if defined(LOOKUP_CDB) && LOOKUP_CDB!=2 |
e6d225ae DW |
557 | addlookupmodule(NULL, &cdb_lookup_module_info); |
558 | #endif | |
559 | ||
560 | #if defined(LOOKUP_DBM) && LOOKUP_DBM!=2 | |
e6d225ae DW |
561 | addlookupmodule(NULL, &dbmdb_lookup_module_info); |
562 | #endif | |
563 | ||
564 | #if defined(LOOKUP_DNSDB) && LOOKUP_DNSDB!=2 | |
e6d225ae DW |
565 | addlookupmodule(NULL, &dnsdb_lookup_module_info); |
566 | #endif | |
567 | ||
568 | #if defined(LOOKUP_DSEARCH) && LOOKUP_DSEARCH!=2 | |
e6d225ae DW |
569 | addlookupmodule(NULL, &dsearch_lookup_module_info); |
570 | #endif | |
571 | ||
572 | #if defined(LOOKUP_IBASE) && LOOKUP_IBASE!=2 | |
e6d225ae DW |
573 | addlookupmodule(NULL, &ibase_lookup_module_info); |
574 | #endif | |
575 | ||
576 | #ifdef LOOKUP_LDAP | |
e6d225ae DW |
577 | addlookupmodule(NULL, &ldap_lookup_module_info); |
578 | #endif | |
579 | ||
580 | #if defined(LOOKUP_LSEARCH) && LOOKUP_LSEARCH!=2 | |
e6d225ae DW |
581 | addlookupmodule(NULL, &lsearch_lookup_module_info); |
582 | #endif | |
583 | ||
584 | #if defined(LOOKUP_MYSQL) && LOOKUP_MYSQL!=2 | |
e6d225ae DW |
585 | addlookupmodule(NULL, &mysql_lookup_module_info); |
586 | #endif | |
587 | ||
588 | #if defined(LOOKUP_NIS) && LOOKUP_NIS!=2 | |
e6d225ae DW |
589 | addlookupmodule(NULL, &nis_lookup_module_info); |
590 | #endif | |
591 | ||
592 | #if defined(LOOKUP_NISPLUS) && LOOKUP_NISPLUS!=2 | |
e6d225ae DW |
593 | addlookupmodule(NULL, &nisplus_lookup_module_info); |
594 | #endif | |
595 | ||
596 | #if defined(LOOKUP_ORACLE) && LOOKUP_ORACLE!=2 | |
e6d225ae DW |
597 | addlookupmodule(NULL, &oracle_lookup_module_info); |
598 | #endif | |
599 | ||
600 | #if defined(LOOKUP_PASSWD) && LOOKUP_PASSWD!=2 | |
e6d225ae DW |
601 | addlookupmodule(NULL, &passwd_lookup_module_info); |
602 | #endif | |
603 | ||
604 | #if defined(LOOKUP_PGSQL) && LOOKUP_PGSQL!=2 | |
e6d225ae DW |
605 | addlookupmodule(NULL, &pgsql_lookup_module_info); |
606 | #endif | |
607 | ||
de78e2d5 | 608 | #if defined(LOOKUP_REDIS) && LOOKUP_REDIS!=2 |
9bdd29ad TL |
609 | addlookupmodule(NULL, &redis_lookup_module_info); |
610 | #endif | |
611 | ||
5bde3efa ACK |
612 | #ifdef EXPERIMENTAL_LMDB |
613 | addlookupmodule(NULL, &lmdb_lookup_module_info); | |
614 | #endif | |
615 | ||
e6d225ae | 616 | #ifdef EXPERIMENTAL_SPF |
e6d225ae DW |
617 | addlookupmodule(NULL, &spf_lookup_module_info); |
618 | #endif | |
619 | ||
620 | #if defined(LOOKUP_SQLITE) && LOOKUP_SQLITE!=2 | |
e6d225ae DW |
621 | addlookupmodule(NULL, &sqlite_lookup_module_info); |
622 | #endif | |
623 | ||
624 | #if defined(LOOKUP_TESTDB) && LOOKUP_TESTDB!=2 | |
e6d225ae DW |
625 | addlookupmodule(NULL, &testdb_lookup_module_info); |
626 | #endif | |
627 | ||
628 | #if defined(LOOKUP_WHOSON) && LOOKUP_WHOSON!=2 | |
e6d225ae DW |
629 | addlookupmodule(NULL, &whoson_lookup_module_info); |
630 | #endif | |
631 | ||
632 | #ifdef LOOKUP_MODULE_DIR | |
633 | dd = opendir(LOOKUP_MODULE_DIR); | |
634 | if (dd == NULL) { | |
1594a79a | 635 | DEBUG(D_lookup) debug_printf("Couldn't open %s: not loading lookup modules\n", LOOKUP_MODULE_DIR); |
e6d225ae DW |
636 | log_write(0, LOG_MAIN, "Couldn't open %s: not loading lookup modules\n", LOOKUP_MODULE_DIR); |
637 | } | |
638 | else { | |
f322340b JH |
639 | const pcre *regex_islookupmod = regex_must_compile( |
640 | US"\\." DYNLIB_FN_EXT "$", FALSE, TRUE); | |
641 | ||
1594a79a | 642 | DEBUG(D_lookup) debug_printf("Loading lookup modules from %s\n", LOOKUP_MODULE_DIR); |
e6d225ae DW |
643 | while ((ent = readdir(dd)) != NULL) { |
644 | char *name = ent->d_name; | |
645 | int len = (int)strlen(name); | |
646 | if (pcre_exec(regex_islookupmod, NULL, name, len, 0, PCRE_EOPT, NULL, 0) >= 0) { | |
647 | int pathnamelen = len + (int)strlen(LOOKUP_MODULE_DIR) + 2; | |
648 | void *dl; | |
649 | struct lookup_module_info *info; | |
1ba28e2b | 650 | const char *errormsg; |
e6d225ae DW |
651 | |
652 | /* SRH: am I being paranoid here or what? */ | |
653 | if (pathnamelen > big_buffer_size) { | |
654 | fprintf(stderr, "Loading lookup modules: %s/%s: name too long\n", LOOKUP_MODULE_DIR, name); | |
655 | log_write(0, LOG_MAIN|LOG_PANIC, "%s/%s: name too long\n", LOOKUP_MODULE_DIR, name); | |
656 | continue; | |
657 | } | |
658 | ||
659 | /* SRH: snprintf here? */ | |
660 | sprintf(CS big_buffer, "%s/%s", LOOKUP_MODULE_DIR, name); | |
661 | ||
662 | dl = dlopen(CS big_buffer, RTLD_NOW);// TJ was LAZY | |
663 | if (dl == NULL) { | |
664 | fprintf(stderr, "Error loading %s: %s\n", name, dlerror()); | |
665 | moduleerrors++; | |
666 | log_write(0, LOG_MAIN|LOG_PANIC, "Error loading lookup module %s: %s\n", name, dlerror()); | |
667 | continue; | |
668 | } | |
669 | ||
56e0c4ce PP |
670 | /* FreeBSD nsdispatch() can trigger dlerror() errors about |
671 | * _nss_cache_cycle_prevention_function; we need to clear the dlerror() | |
672 | * state before calling dlsym(), so that any error afterwards only | |
673 | * comes from dlsym(). | |
674 | */ | |
675 | errormsg = dlerror(); | |
676 | ||
e6d225ae DW |
677 | info = (struct lookup_module_info*) dlsym(dl, "_lookup_module_info"); |
678 | if ((errormsg = dlerror()) != NULL) { | |
679 | fprintf(stderr, "%s does not appear to be a lookup module (%s)\n", name, errormsg); | |
680 | dlclose(dl); | |
681 | moduleerrors++; | |
682 | log_write(0, LOG_MAIN|LOG_PANIC, "%s does not appear to be a lookup module (%s)\n", name, errormsg); | |
683 | continue; | |
684 | } | |
685 | if (info->magic != LOOKUP_MODULE_INFO_MAGIC) { | |
686 | fprintf(stderr, "Lookup module %s is not compatible with this version of Exim\n", name); | |
687 | dlclose(dl); | |
688 | moduleerrors++; | |
689 | log_write(0, LOG_MAIN|LOG_PANIC, "Lookup module %s is not compatible with this version of Exim\n", name); | |
690 | continue; | |
691 | } | |
692 | ||
693 | addlookupmodule(dl, info); | |
1594a79a | 694 | DEBUG(D_lookup) debug_printf("Loaded \"%s\" (%d lookup types)\n", name, info->lookupcount); |
e6d225ae DW |
695 | countmodules++; |
696 | } | |
697 | } | |
f322340b | 698 | store_free((void*)regex_islookupmod); |
e6d225ae DW |
699 | closedir(dd); |
700 | } | |
701 | ||
1594a79a | 702 | DEBUG(D_lookup) debug_printf("Loaded %d lookup modules\n", countmodules); |
e6d225ae DW |
703 | #endif |
704 | ||
1594a79a | 705 | DEBUG(D_lookup) debug_printf("Total %d lookups\n", lookup_list_count); |
e6d225ae DW |
706 | |
707 | lookup_list = store_malloc(sizeof(lookup_info *) * lookup_list_count); | |
708 | memset(lookup_list, 0, sizeof(lookup_info *) * lookup_list_count); | |
709 | ||
710 | /* now add all lookups to the real list */ | |
711 | p = lookupmodules; | |
712 | while (p) { | |
713 | int j; | |
714 | struct lookupmodulestr *pnext; | |
715 | ||
716 | for (j = 0; j < p->info->lookupcount; j++) | |
717 | add_lookup_to_list(p->info->lookups[j]); | |
718 | ||
719 | pnext = p->next; | |
720 | store_free(p); | |
721 | p = pnext; | |
722 | } | |
723 | /* just to be sure */ | |
724 | lookupmodules = NULL; | |
725 | } | |
726 | ||
d185889f | 727 | #endif /*!MACRO_PREDEF*/ |
059ec3d9 | 728 | /* End of drtables.c */ |