/* $Cambridge: exim/src/src/routers/rf_lookup_hostlist.c,v 1.3 2005/01/11 15:51:03 ph10 Exp $ */ /************************************************* * Exim - an Internet mail transport agent * *************************************************/ /* Copyright (c) University of Cambridge 1995 - 2005 */ /* See the file NOTICE for conditions of use and distribution. */ #include "../exim.h" #include "rf_functions.h" /************************************************* * Look up IP addresses for a set of hosts * *************************************************/ /* This function is called by a router to fill in the IP addresses for a set of hosts that are attached to an address. Each host has its name and MX value set; and those that need processing have their address fields set NULL. Multihomed hosts cause additional blocks to be inserted into the chain. This function also supports pseudo-hosts whose names end with "/MX". In this case, MX records are looked up for the name, and the list of hosts obtained replaces the incoming "host". In other words, "x/MX" is shorthand for "those hosts pointed to by x's MX records". Arguments: rblock the router block addr the address being routed ignore_target_hosts list of hosts to ignore lookup_type lk_default or lk_byname or lk_bydns hff_code what to do for host find failed addr_new passed to rf_self_action for self=reroute Returns: OK DEFER host lookup defer PASS timeout etc and pass_on_timeout set self_action: PASS, DECLINE, DEFER, FAIL, FREEZE hff_code after host find failed */ int rf_lookup_hostlist(router_instance *rblock, address_item *addr, uschar *ignore_target_hosts, int lookup_type, int hff_code, address_item **addr_new) { BOOL self_send = FALSE; host_item *h, *next_h, *prev; /* Look up each host address. A lookup may add additional items into the chain if there are multiple addresses. Hence the use of next_h to start each cycle of the loop at the next original host. If any host is identified as being the local host, omit it and any subsequent hosts - i.e. treat the list like an ordered list of MX hosts. If the first host is the local host, act according to the "self" option in the configuration. */ prev = NULL; for (h = addr->host_list; h != NULL; prev = h, h = next_h) { uschar *canonical_name; int rc, len; next_h = h->next; if (h->address != NULL) continue; DEBUG(D_route|D_host_lookup) debug_printf("finding IP address for %s\n", h->name); /* If the name ends with "/MX", we interpret it to mean "the list of hosts pointed to by MX records with this name". */ len = Ustrlen(h->name); if (len > 3 && strcmpic(h->name + len - 3, US"/mx") == 0) { DEBUG(D_route|D_host_lookup) debug_printf("doing DNS MX lookup for %s\n", h->name); h->name[len-3] = 0; rc = host_find_bydns(h, ignore_target_hosts, HOST_FIND_BY_MX, /* look only for MX records */ NULL, /* SRV service not relevant */ NULL, /* failing srv domains not relevant */ NULL, /* no special mx failing domains */ NULL, /* fully_qualified_name */ NULL); /* indicate local host removed */ } /* If explicitly configured to look up by name, or if the "host name" is actually an IP address, do a byname lookup. */ else if (lookup_type == lk_byname || string_is_ip_address(h->name, NULL) > 0) { DEBUG(D_route|D_host_lookup) debug_printf("calling host_find_byname\n"); rc = host_find_byname(h, ignore_target_hosts, &canonical_name, TRUE); } /* Otherwise, do a DNS lookup. If that yields "host not found", and the lookup type is the default (i.e. "bydns" is not explicitly configured), follow up with a byname lookup, just in case. */ else { BOOL removed; DEBUG(D_route|D_host_lookup) debug_printf("doing DNS lookup\n"); rc = host_find_bydns(h, ignore_target_hosts, HOST_FIND_BY_A, NULL, NULL, NULL, &canonical_name, &removed); if (rc == HOST_FOUND) { if (removed) setflag(addr, af_local_host_removed); } else if (rc == HOST_FIND_FAILED) { if (lookup_type == lk_default) { DEBUG(D_route|D_host_lookup) debug_printf("DNS lookup failed: trying getipnodebyname\n"); rc = host_find_byname(h, ignore_target_hosts, &canonical_name, TRUE); } } } /* Temporary failure defers, unless pass_on_timeout is set */ if (rc == HOST_FIND_AGAIN) { if (rblock->pass_on_timeout) { DEBUG(D_route) debug_printf("%s router timed out and pass_on_timeout set\n", rblock->name); return PASS; } addr->message = string_sprintf("host lookup for %s did not complete " "(DNS timeout?)", h->name); addr->basic_errno = ERRNO_DNSDEFER; return DEFER; } /* Permanent failure is controlled by host_find_failed */ if (rc == HOST_FIND_FAILED) { if (hff_code == hff_pass) return PASS; if (hff_code == hff_decline) return DECLINE; addr->message = string_sprintf("lookup of host \"%s\" failed in %s router%s", h->name, rblock->name, host_find_failed_syntax? ": syntax error in name" : ""); if (hff_code == hff_defer) return DEFER; if (hff_code == hff_fail) return FAIL; addr->special_action = SPECIAL_FREEZE; return DEFER; } /* A local host gets chopped, with its successors, if there are previous hosts. Otherwise the self option is used. If it is set to "send", any subsequent hosts that are also the local host do NOT get chopped. */ if (rc == HOST_FOUND_LOCAL && !self_send) { if (prev != NULL) { DEBUG(D_route) { debug_printf("Removed from host list:\n"); for (; h != NULL; h = h->next) debug_printf(" %s\n", h->name); } prev->next = NULL; setflag(addr, af_local_host_removed); break; } rc = rf_self_action(addr, h, rblock->self_code, rblock->self_rewrite, rblock->self, addr_new); if (rc != OK) { addr->host_list = NULL; /* Kill the host list for */ return rc; /* anything other than "send" */ } self_send = TRUE; } } return OK; } /* End of rf_lookup_hostlist.c */