Implemented hosts_avoid_pipelining in the smtp transport.
[exim.git] / src / src / lookups / spf.c
CommitLineData
56dda33c 1/* $Cambridge: exim/src/src/lookups/spf.c,v 1.2 2005/06/27 18:01:02 tom Exp $ */
92f1b170
TK
2
3/*************************************************
4* Exim - an Internet mail transport agent *
5*************************************************/
6
7/*
8 * Exim - SPF lookup module using libspf2
9 * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
10 *
11 * Copyright (c) 2005 Chris Webb, Arachsys Internet Services Ltd
12 *
13 * This program is free software; you can redistribute it and/or
14 * modify it under the terms of the GNU General Public License
15 * as published by the Free Software Foundation; either version 2
16 * of the License, or (at your option) any later version.
17 *
18 */
19
20#include "../exim.h"
21
22#ifndef EXPERIMENTAL_SPF
23static void dummy(int x) { dummy(x-1); }
24#else
25
26#include "lf_functions.h"
27#include "spf.h"
56dda33c
TK
28#ifndef HAVE_NS_TYPE
29#define HAVE_NS_TYPE
30#endif
92f1b170
TK
31#include <spf2/spf.h>
32#include <spf2/spf_dns_resolv.h>
33#include <spf2/spf_dns_cache.h>
34
35void *spf_open(uschar *filename, uschar **errmsg) {
36 SPF_server_t *spf_server = NULL;
37 spf_server = SPF_server_new(SPF_DNS_CACHE, 0);
38 if (spf_server == NULL) {
39 *errmsg = US"SPF_server_new() failed";
40 return NULL;
41 }
42 return (void *) spf_server;
43}
44
45void spf_close(void *handle) {
46 SPF_server_t *spf_server = handle;
47 if (spf_server) SPF_server_free(spf_server);
48}
49
50int spf_find(void *handle, uschar *filename, uschar *keystring, int key_len,
51 uschar **result, uschar **errmsg, BOOL *do_cache) {
52 SPF_server_t *spf_server = handle;
53 SPF_request_t *spf_request = NULL;
54 SPF_response_t *spf_response = NULL;
55
56 spf_request = SPF_request_new(spf_server);
57 if (spf_request == NULL) {
58 *errmsg = US"SPF_request_new() failed";
59 return FAIL;
60 }
61
62 if (SPF_request_set_ipv4_str(spf_request, filename)) {
63 *errmsg = string_sprintf("invalid IP address '%s'", filename);
64 return FAIL;
65 }
66 if (SPF_request_set_env_from(spf_request, keystring)) {
67 *errmsg = string_sprintf("invalid envelope from address '%s'", keystring);
68 return FAIL;
69 }
70
71 SPF_request_query_mailfrom(spf_request, &spf_response);
72 *result = string_copy(US SPF_strresult(SPF_response_result(spf_response)));
73 SPF_response_free(spf_response);
74 SPF_request_free(spf_request);
75 return OK;
76}
77
78#endif /* EXPERIMENTAL_SPF */