src/src/lookups/spf.c

   1 /* $Cambridge: exim/src/src/lookups/spf.c,v 1.2 2005/06/27 18:01:02 tom Exp $ */
   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
  23 static void dummy(int x) { dummy(x-1); }
  24 #else
  25
  26 #include "lf_functions.h"
  27 #include "spf.h"
  28 #ifndef HAVE_NS_TYPE
  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 void *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
  45 void spf_close(void *handle) {
  46   SPF_server_t *spf_server = handle;
  47   if (spf_server) SPF_server_free(spf_server);
  48 }
  49
  50 int 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 */