1 /*************************************************
2 * Exim - an Internet mail transport agent *
3 *************************************************/
5 /* Exim - SPF lookup module using libspf2
6 ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
8 Copyright (c) The Exim Maintainers 2020 - 2022
9 Copyright (c) 2005 Chris Webb, Arachsys Internet Services Ltd
11 This program is free software; you can redistribute it and/or
12 modify it under the terms of the GNU General Public License
13 as published by the Free Software Foundation; either version 2
14 of the License, or (at your option) any later version.
20 static void dummy(int x);
21 static void dummy2(int x) { dummy(x-1); }
22 static void dummy(int x) { dummy2(x-1); }
25 #include "lf_functions.h"
26 #if !defined(HAVE_NS_TYPE) && defined(NS_INADDRSZ)
30 #include <spf2/spf_dns_resolv.h>
31 #include <spf2/spf_dns_cache.h>
33 extern SPF_dns_server_t * SPF_dns_exim_new(int);
37 spf_open(const uschar * filename, uschar ** errmsg)
39 SPF_dns_server_t * dc;
40 SPF_server_t *spf_server = NULL;
43 DEBUG(D_lookup) debug = 1;
45 if ((dc = SPF_dns_exim_new(debug)))
46 if ((dc = SPF_dns_cache_new(dc, NULL, debug, 8)))
47 spf_server = SPF_server_new_dns(dc, debug);
51 *errmsg = US"SPF_dns_exim_nnew() failed";
54 return (void *) spf_server;
59 spf_close(void *handle)
61 SPF_server_t *spf_server = handle;
62 if (spf_server) SPF_server_free(spf_server);
66 spf_find(void * handle, const uschar * filename, const uschar * keystring,
67 int key_len, uschar ** result, uschar ** errmsg, uint * do_cache,
70 SPF_server_t *spf_server = handle;
71 SPF_request_t *spf_request;
72 SPF_response_t *spf_response = NULL;
74 if (!(spf_request = SPF_request_new(spf_server)))
76 *errmsg = US"SPF_request_new() failed";
81 switch (string_is_ip_address(filename, NULL))
87 if (!SPF_request_set_ipv4_str(spf_request, CS filename))
89 *errmsg = string_sprintf("invalid IPv4 address '%s'", filename);
94 if (!SPF_request_set_ipv6_str(spf_request, CS filename))
96 *errmsg = string_sprintf("invalid IPv6 address '%s'", filename);
100 *errmsg = string_sprintf("invalid IP address '%s'", filename);
105 if (SPF_request_set_env_from(spf_request, CS keystring))
107 *errmsg = string_sprintf("invalid envelope from address '%s'", keystring);
111 SPF_request_query_mailfrom(spf_request, &spf_response);
112 *result = string_copy(US SPF_strresult(SPF_response_result(spf_response)));
114 DEBUG(D_lookup) spf_response_debug(spf_response);
116 SPF_response_free(spf_response);
117 SPF_request_free(spf_request);
122 /*************************************************
123 * Version reporting entry point *
124 *************************************************/
126 /* See local README for interface description. */
128 #include "../version.h"
131 spf_version_report(gstring * g)
134 g = string_fmt_append(g, "Library version: SPF: Exim version %s\n", EXIM_VERSION_STR));
140 static lookup_info _lookup_info = {
141 .name = US"spf", /* lookup name */
142 .type = 0, /* not absfile, not query style */
143 .open = spf_open, /* open function */
144 .check = NULL, /* no check function */
145 .find = spf_find, /* find function */
146 .close = spf_close, /* close function */
147 .tidy = NULL, /* no tidy function */
148 .quote = NULL, /* no quoting function */
149 .version_report = spf_version_report /* version reporting */
153 #define spf_lookup_module_info _lookup_module_info
156 static lookup_info *_lookup_list[] = { &_lookup_info };
157 lookup_module_info spf_lookup_module_info = { LOOKUP_MODULE_INFO_MAGIC, _lookup_list, 1 };
159 #endif /* SUPPORT_SPF */