Added the mxh lookup type for dnsdb lookups.
authorPhilip Hazel <ph10@hermes.cam.ac.uk>
Wed, 24 Nov 2004 15:43:36 +0000 (15:43 +0000)
committerPhilip Hazel <ph10@hermes.cam.ac.uk>
Wed, 24 Nov 2004 15:43:36 +0000 (15:43 +0000)
doc/doc-txt/ChangeLog
doc/doc-txt/NewStuff
src/ACKNOWLEDGMENTS
src/src/dns.c
src/src/exim.h
src/src/lookups/dnsdb.c

index 51ca5f64faf6131e17330906a65c4d5aee021a03..d3a98b6baa2d9e7c8eb22816fd38b2354e498324 100644 (file)
@@ -1,4 +1,4 @@
-$Cambridge: exim/doc/doc-txt/ChangeLog,v 1.37 2004/11/24 14:38:13 ph10 Exp $
+$Cambridge: exim/doc/doc-txt/ChangeLog,v 1.38 2004/11/24 15:43:36 ph10 Exp $
 
 Change log file for Exim from version 4.21
 -------------------------------------------
@@ -154,10 +154,13 @@ Exim version 4.44
     (1) There is a new type, "zns", which walks up the domain tree until it
         finds some nameserver records. It should be used with care.
 
-    (2) It is now possible to give a list of domains (or IP addresses) to be
+    (2) There is a new type, "mxh", which is like "mx" except that it returns
+        just the host names, not the priorities.
+
+    (3) It is now possible to give a list of domains (or IP addresses) to be
         looked up.
 
-    (3) It is now possible to specify the separator character for use when
+    (4) It is now possible to specify the separator character for use when
         multiple records are returned.
 
 38. The dnslists ACL condition has been extended: it is now possible to supply
index 3525e84dc7772a2d3f92621d2d30f760325d44a3..da99fb7b397916082e94270b4cd288f649d7fc28 100644 (file)
@@ -1,4 +1,4 @@
-$Cambridge: exim/doc/doc-txt/NewStuff,v 1.15 2004/11/24 14:38:13 ph10 Exp $
+$Cambridge: exim/doc/doc-txt/NewStuff,v 1.16 2004/11/24 15:43:36 ph10 Exp $
 
 New Features in Exim
 --------------------
@@ -108,7 +108,7 @@ Version 4.44
 
     Previously this was a syntax error.
 
-12. There is now a new "record type" that can be specified in dnsdb lookups. It
+12. There is a new "record type" that can be specified in dnsdb lookups. It
     is "zns" (for "zone NS"). It performs a lookup for NS records on the given
     domain, but if none are found, it removes the first component of the domain
     name, and tries again. This process continues until NS records are found
@@ -129,7 +129,11 @@ Version 4.44
     the name servers for the high-level domains such as .com or .co.uk are not
     going to be on such a list.
 
-13. It is now possible to specify a list of domains or IP addresses to be
+13. Another new "record type" is "mxh"; this looks up MX records just as "mx"
+    does, but it returns only the names of the hosts, omitting the priority
+    values.
+
+14. It is now possible to specify a list of domains or IP addresses to be
     looked up in a dnsdb lookup. The list is specified in the normal Exim way,
     with colon as the default separator, but with the ability to change this.
     For example:
@@ -151,13 +155,13 @@ Version 4.44
     of them yields some data, the lookup succeeds. However, if there is a
     temporary DNS error for any of them, the lookup defers.
 
-14. It is now possible to specify the character to be used as a separator when
+15. It is now possible to specify the character to be used as a separator when
     a dnsdb lookup returns data from more than one DNS record. The default is a
     newline. To specify a different character, put '>' followed by the new
     character at the start of the query. For example:
 
       ${lookup dnsdb{>: a=h1.test.ex:h2.test.ex}}
-      ${lookup dnsdb{>| mx=<;m1.test.ex;m2.test.ex}}
+      ${lookup dnsdb{>| mxh=<;m1.test.ex;m2.test.ex}}
 
     It is permitted to specify a space as the separator character. Note that
     more than one DNS record can be found for a single lookup item; this
@@ -166,7 +170,7 @@ Version 4.44
     The same effect could be achieved by wrapping the lookup in ${tr...}; this
     feature is just a syntactic simplification.
 
-15. It is now possible to supply a list of domains and/or IP addresses to be
+16. It is now possible to supply a list of domains and/or IP addresses to be
     lookup up in a DNS blacklist. Previously, only a single domain name could
     be given, for example:
 
@@ -196,7 +200,7 @@ Version 4.44
     Once a DNS record has been found (that matches a specific IP return
     address, if specified), no further lookups are done.
 
-16. The log selector queue_time_overall causes Exim to output the time spent on
+17. The log selector queue_time_overall causes Exim to output the time spent on
     the queue as an addition to the "Completed" message. Like queue_time (which
     puts the queue time on individual delivery lines), the time is tagged with
     "QT=", and it is measured from the time that the message starts to be
index 4ca8ffbb714d92996f353ce2ce0bf96193fb114d..fe092c4484ea605a8337c22015a16c38912b8877 100644 (file)
@@ -1,4 +1,4 @@
-$Cambridge: exim/src/ACKNOWLEDGMENTS,v 1.6 2004/11/24 14:38:13 ph10 Exp $
+$Cambridge: exim/src/ACKNOWLEDGMENTS,v 1.7 2004/11/24 15:43:36 ph10 Exp $
 
 EXIM ACKNOWLEDGEMENTS
 
@@ -122,6 +122,7 @@ Tony Finch                Expansion extensions
                             Timezone patch for exiwhat
                             Patch for more daemon exiwhat information
                             Patch for -dd 
+                            Patch for mxh lookup type in dnsdb 
 Giuliano Gavazzi          Patches for OSX compilation
 Dominic Germain           Patch for exiqgrep MacOS X bug
 Oliver Gorwits            $load_average patch
index a5a154741aab2454185370f9af4d28f92ea78b4f..e80b1c122d449f2137c4593cb4a8871133d8964c 100644 (file)
@@ -1,4 +1,4 @@
-/* $Cambridge: exim/src/src/dns.c,v 1.2 2004/11/19 09:45:54 ph10 Exp $ */
+/* $Cambridge: exim/src/src/dns.c,v 1.3 2004/11/24 15:43:36 ph10 Exp $ */
 
 /*************************************************
 *     Exim - an Internet mail transport agent    *
@@ -650,6 +650,10 @@ dns_special_lookup(dns_answer *dnsa, uschar *name, int type,
 {
 if (type >= 0) return dns_lookup(dnsa, name, type, fully_qualified_name);
 
+/* The "mx hosts only" type doesn't require any special action here */
+
+if (type == T_MXH) return dns_lookup(dnsa, name, T_MX, fully_qualified_name);
+
 /* Find nameservers for the domain or the nearest enclosing zone, excluding the 
 root servers. */
 
index 998adc3ea0a924c44a3747b43b55b31d13c17e08..397a1368725aede25fd2fec6dd2a0f7dea06a140 100644 (file)
@@ -1,4 +1,4 @@
-/* $Cambridge: exim/src/src/exim.h,v 1.2 2004/11/19 09:45:54 ph10 Exp $ */
+/* $Cambridge: exim/src/src/exim.h,v 1.3 2004/11/24 15:43:36 ph10 Exp $ */
 
 /*************************************************
 *     Exim - an Internet mail transport agent    *
@@ -279,9 +279,11 @@ header files. I don't suppose they have T_SRV either. */
 #endif
 
 /* We use the private type T_ZNS for retrieving the nameservers for the
-enclosing zone of a domain. */
+enclosing zone of a domain, and the private type T_MXH for retrieving
+the MX hostnames only (without their priorities). */
 
 #define T_ZNS (-1)
+#define T_MXH (-2)
 
 /* The resolv.h header defines __P(x) on some Solaris 2.5.1 systems (without
 checking that it is already defined, in fact). This conflicts with other
index 22a9de4f4b832536213f83c1e4042c1f89d3f5d1..29a36081e951b0fc4dd6a5bf28fa28b3cc80592f 100644 (file)
@@ -1,4 +1,4 @@
-/* $Cambridge: exim/src/src/lookups/dnsdb.c,v 1.3 2004/11/19 15:18:57 ph10 Exp $ */
+/* $Cambridge: exim/src/src/lookups/dnsdb.c,v 1.4 2004/11/24 15:43:36 ph10 Exp $ */
 
 /*************************************************
 *     Exim - an Internet mail transport agent    *
@@ -32,6 +32,7 @@ static char *type_names[] = {
 #endif
   "cname",
   "mx",
+  "mxh",
   "ns",
   "ptr",
   "srv",
@@ -49,6 +50,7 @@ static int type_values[] = {
 #endif
   T_CNAME,
   T_MX,
+  T_MXH,     /* Private type for "MX hostnames" */
   T_NS,
   T_PTR,
   T_SRV,
@@ -184,6 +186,8 @@ while ((domain = string_nextinlist(&keystring, &sep, buffer, sizeof(buffer)))
         != NULL)
   {       
   uschar rbuffer[256];
+  int searchtype = (type == T_ZNS)? T_NS :          /* record type we want */
+                   (type == T_MXH)? T_MX : type; 
 
   /* If the type is PTR, we have to construct the relevant magic lookup
   key. This code is now in a separate function. */
@@ -196,24 +200,25 @@ while ((domain = string_nextinlist(&keystring, &sep, buffer, sizeof(buffer)))
   
   DEBUG(D_lookup) debug_printf("dnsdb key: %s\n", domain);
   
-  /* Do the lookup and sort out the result. We use the special 
-  lookup function that knows about pseudo types like "zns". If the lookup 
-  fails, continue with the next domain. */
+  /* Do the lookup and sort out the result. There are two special types that 
+  are handled specially: T_ZNS and T_MXH. The former is handled in a special 
+  lookup function so that the facility could be used from other parts of the
+  Exim code. The latter affects only what happens later on in this function,
+  but for tidiness it is handled in a similar way. If the lookup fails,
+  continue with the next domain. */
   
   rc = dns_special_lookup(&dnsa, domain, type, NULL);
   
   if (rc == DNS_NOMATCH || rc == DNS_NODATA) continue;
   if (rc != DNS_SUCCEED) return DEFER;
   
-  /* If the lookup was a pseudo-type, change it to the correct type for
-  searching the returned records; then search for them. */
-  
-  if (type == T_ZNS) type = T_NS;
+  /* Search the returned records */
+
   for (rr = dns_next_rr(&dnsa, &dnss, RESET_ANSWERS);
        rr != NULL;
        rr = dns_next_rr(&dnsa, &dnss, RESET_NEXT))
     {
-    if (rr->type != type) continue;
+    if (rr->type != searchtype) continue;
   
     /* There may be several addresses from an A6 record. Put the configured 
     separator between them, just as for between several records. However, A6 
@@ -245,26 +250,33 @@ while ((domain = string_nextinlist(&keystring, &sep, buffer, sizeof(buffer)))
       yield = string_cat(yield, &size, &ptr, (uschar *)(rr->data+1),
         (rr->data)[0]);
       }
-    else   /* T_CNAME, T_MX, T_NS, T_SRV, T_PTR */
+    else   /* T_CNAME, T_MX, T_MXH, T_NS, T_SRV, T_PTR */
       {
+      int num; 
       uschar s[264];
       uschar *p = (uschar *)(rr->data);
-      if (type == T_MX)
+       
+      if (type == T_MXH)
+        {
+        /* mxh ignores the priority number and includes only the hostnames */
+        GETSHORT(num, p);            /* pointer is advanced */
+        }
+      else if (type == T_MX)
         {
-        int num;
         GETSHORT(num, p);            /* pointer is advanced */
         sprintf(CS s, "%d ", num);
         yield = string_cat(yield, &size, &ptr, s, Ustrlen(s));
         }
       else if (type == T_SRV)
         {
-        int num, weight, port;
+        int weight, port;
         GETSHORT(num, p);            /* pointer is advanced */
         GETSHORT(weight, p);
         GETSHORT(port, p);
         sprintf(CS s, "%d %d %d ", num, weight, port);
         yield = string_cat(yield, &size, &ptr, s, Ustrlen(s));
         }
+         
       rc = dn_expand(dnsa.answer, dnsa.answer + dnsa.answerlen, p,
         (DN_EXPAND_ARG4_TYPE)(s), sizeof(s));