src/src/lookups/spf.c

   1 /*************************************************
   2 *     Exim - an Internet mail transport agent    *
   3 *************************************************/
   4
   5 /*
   6  * Exim - SPF lookup module using libspf2
   7  * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
   8  *
   9  * Copyright (c) 2005 Chris Webb, Arachsys Internet Services Ltd
  10  *
  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.
  15  *
  16  * Copyright (c) The Exim Maintainers 2016
  17  */
  18
  19 #include "../exim.h"
  20
  21 #ifndef SUPPORT_SPF
  22 static void dummy(int x);
  23 static void dummy2(int x) { dummy(x-1); }
  24 static void dummy(int x) { dummy2(x-1); }
  25 #else
  26
  27 #include "lf_functions.h"
  28 #if !defined(HAVE_NS_TYPE) && defined(NS_INADDRSZ)
  29 # define HAVE_NS_TYPE
  30 #endif
  31 #include <spf2/spf.h>
  32 #include <spf2/spf_dns_resolv.h>
  33 #include <spf2/spf_dns_cache.h>
  34
  35 static void *
  36 spf_open(uschar *filename, uschar **errmsg)
  37 {
  38 SPF_server_t *spf_server;
  39 if ((spf_server = SPF_server_new(SPF_DNS_CACHE, 0)))
  40   return (void *) spf_server;
  41 *errmsg = US"SPF_server_new() failed";
  42 return NULL;
  43 }
  44
  45 static void
  46 spf_close(void *handle)
  47 {
  48 SPF_server_t *spf_server = handle;
  49 if (spf_server) SPF_server_free(spf_server);
  50 }
  51
  52 static int
  53 spf_find(void *handle, uschar *filename, const uschar *keystring, int key_len,
  54              uschar **result, uschar **errmsg, uint *do_cache)
  55 {
  56 SPF_server_t *spf_server = handle;
  57 SPF_request_t *spf_request;
  58 SPF_response_t *spf_response = NULL;
  59
  60 if (!(spf_request = SPF_request_new(spf_server)))
  61   {
  62   *errmsg = US"SPF_request_new() failed";
  63   return FAIL;
  64   }
  65
  66 #if HAVE_IPV6
  67 switch (string_is_ip_address(filename, NULL))
  68 #else
  69 switch (4)
  70 #endif
  71   {
  72   case 4:
  73     if (!SPF_request_set_ipv4_str(spf_request, CS filename))
  74       break;
  75     *errmsg = string_sprintf("invalid IPv4 address '%s'", filename);
  76     return FAIL;
  77 #if HAVE_IPV6
  78
  79   case 6:
  80     if (!SPF_request_set_ipv6_str(spf_request, CS filename))
  81       break;
  82     *errmsg = string_sprintf("invalid IPv6 address '%s'", filename);
  83     return FAIL;
  84
  85   default:
  86     *errmsg = string_sprintf("invalid IP address '%s'", filename);
  87     return FAIL;
  88 #endif
  89   }
  90
  91 if (SPF_request_set_env_from(spf_request, CS keystring))
  92     {
  93   *errmsg = string_sprintf("invalid envelope from address '%s'", keystring);
  94   return FAIL;
  95 }
  96
  97 SPF_request_query_mailfrom(spf_request, &spf_response);
  98 *result = string_copy(US SPF_strresult(SPF_response_result(spf_response)));
  99 SPF_response_free(spf_response);
 100 SPF_request_free(spf_request);
 101 return OK;
 102 }
 103
 104
 105 /*************************************************
 106 *         Version reporting entry point          *
 107 *************************************************/
 108
 109 /* See local README for interface description. */
 110
 111 #include "../version.h"
 112
 113 void
 114 spf_version_report(FILE *f)
 115 {
 116 #ifdef DYNLOOKUP
 117 fprintf(f, "Library version: SPF: Exim version %s\n", EXIM_VERSION_STR);
 118 #endif
 119 }
 120
 121
 122 static lookup_info _lookup_info = {
 123   US"spf",                       /* lookup name */
 124   0,                             /* not absfile, not query style */
 125   spf_open,                      /* open function */
 126   NULL,                          /* no check function */
 127   spf_find,                      /* find function */
 128   spf_close,                     /* close function */
 129   NULL,                          /* no tidy function */
 130   NULL,                          /* no quoting function */
 131   spf_version_report             /* version reporting */
 132 };
 133
 134 #ifdef DYNLOOKUP
 135 #define spf_lookup_module_info _lookup_module_info
 136 #endif
 137
 138 static lookup_info *_lookup_list[] = { &_lookup_info };
 139 lookup_module_info spf_lookup_module_info = { LOOKUP_MODULE_INFO_MAGIC, _lookup_list, 1 };
 140
 141 #endif /* SUPPORT_SPF */