2 * Copyright (c) 1998-2004, 2006 Sendmail, Inc. and its suppliers.
4 * Copyright (c) 1986, 1995-1997 Eric P. Allman. All rights reserved.
5 * Copyright (c) 1988, 1993
6 * The Regents of the University of California. All rights reserved.
8 * By using this file, you agree to the terms and conditions set
9 * forth in the LICENSE file which can be found at the top level of
10 * the sendmail distribution.
18 SM_RCSID("@(#)$Id: domain.c,v 8.202 2006/12/19 01:15:07 ca Exp $ (with name server)")
19 #else /* NAMED_BIND */
20 SM_RCSID("@(#)$Id: domain.c,v 8.202 2006/12/19 01:15:07 ca Exp $ (without name server)")
21 #endif /* NAMED_BIND */
25 # include <arpa/inet.h>
29 ** The standard udp packet size PACKETSZ (512) is not sufficient for some
30 ** nameserver answers containing very many resource records. The resolver
31 ** may switch to tcp and retry if it detects udp packet overflow.
32 ** Also note that the resolver routines res_query and res_search return
33 ** the size of the *un*truncated answer in case the supplied answer buffer
34 ** it not big enough to accommodate the entire answer.
38 # define MAXPACKET 8192 /* max packet size used internally by BIND */
39 # endif /* ! MAXPACKET */
44 unsigned char qb2
[MAXPACKET
];
47 # ifndef MXHOSTBUFSIZE
48 # define MXHOSTBUFSIZE (128 * MAXMXHOSTS)
49 # endif /* ! MXHOSTBUFSIZE */
51 static char MXHostBuf
[MXHOSTBUFSIZE
];
52 #if (MXHOSTBUFSIZE < 2) || (MXHOSTBUFSIZE >= INT_MAX/2)
53 ERROR
: _MXHOSTBUFSIZE is out of range
54 #endif /* (MXHOSTBUFSIZE < 2) || (MXHOSTBUFSIZE >= INT_MAX/2) */
57 # define MAXDNSRCH 6 /* number of possible domains to search */
58 # endif /* ! MAXDNSRCH */
60 # ifndef RES_DNSRCH_VARIABLE
61 # define RES_DNSRCH_VARIABLE _res.dnsrch
62 # endif /* ! RES_DNSRCH_VARIABLE */
65 # define NO_DATA NO_ADDRESS
66 # endif /* ! NO_DATA */
69 # define HFIXEDSZ 12 /* sizeof(HEADER) */
70 # endif /* ! HFIXEDSZ */
72 # define MAXCNAMEDEPTH 10 /* maximum depth of CNAME recursion */
74 # if defined(__RES) && (__RES >= 19940415)
75 # define RES_UNC_T char *
76 # else /* defined(__RES) && (__RES >= 19940415) */
77 # define RES_UNC_T unsigned char *
78 # endif /* defined(__RES) && (__RES >= 19940415) */
80 static int mxrand
__P((char *));
81 static int fallbackmxrr
__P((int, unsigned short *, char **));
84 ** GETFALLBACKMXRR -- get MX resource records for fallback MX host.
86 ** We have to initialize this once before doing anything else.
87 ** Moreover, we have to repeat this from time to time to avoid
88 ** stale data, e.g., in persistent queue runners.
89 ** This should be done in a parent process so the child
90 ** processes have the right data.
93 ** host -- the name of the fallback MX host.
96 ** number of MX records.
99 ** Populates NumFallbackMXHosts and fbhosts.
100 ** Sets renewal time (based on TTL).
103 int NumFallbackMXHosts
= 0; /* Number of fallback MX hosts (after MX expansion) */
104 static char *fbhosts
[MAXMXHOSTS
+ 1];
107 getfallbackmxrr(host
)
112 static time_t renew
= 0;
115 /* This is currently done before this function is called. */
116 if (host
== NULL
|| *host
== '\0')
119 if (NumFallbackMXHosts
> 0 && renew
> curtime())
120 return NumFallbackMXHosts
;
124 NumFallbackMXHosts
= 1;
129 for (i
= 0; i
< NumFallbackMXHosts
; i
++)
133 NumFallbackMXHosts
= getmxrr(host
, fbhosts
, NULL
, false,
134 &rcode
, false, &ttl
);
135 renew
= curtime() + ttl
;
136 for (i
= 0; i
< NumFallbackMXHosts
; i
++)
137 fbhosts
[i
] = newstr(fbhosts
[i
]);
139 return NumFallbackMXHosts
;
143 ** FALLBACKMXRR -- add MX resource records for fallback MX host to list.
146 ** nmx -- current number of MX records.
147 ** prefs -- array of preferences.
148 ** mxhosts -- array of MX hosts (maximum size: MAXMXHOSTS)
151 ** new number of MX records.
154 ** If FallbackMX was set, it appends the MX records for
155 ** that host to mxhosts (and modifies prefs accordingly).
159 fallbackmxrr(nmx
, prefs
, mxhosts
)
161 unsigned short *prefs
;
166 for (i
= 0; i
< NumFallbackMXHosts
&& nmx
< MAXMXHOSTS
; i
++)
169 prefs
[nmx
] = prefs
[nmx
- 1] + 1;
172 mxhosts
[nmx
++] = fbhosts
[i
];
178 ** GETMXRR -- get MX resource records for a domain
181 ** host -- the name of the host to MX.
182 ** mxhosts -- a pointer to a return buffer of MX records.
183 ** mxprefs -- a pointer to a return buffer of MX preferences.
184 ** If NULL, don't try to populate.
185 ** droplocalhost -- If true, all MX records less preferred
186 ** than the local host (as determined by $=w) will
188 ** rcode -- a pointer to an EX_ status code.
189 ** tryfallback -- add also fallback MX host?
190 ** pttl -- pointer to return TTL (can be NULL).
193 ** The number of MX records found.
194 ** -1 if there is an internal failure.
195 ** If no MX records are found, mxhosts[0] is set to host
196 ** and 1 is returned.
199 ** The entries made for mxhosts point to a static array
200 ** MXHostBuf[MXHOSTBUFSIZE], so the data needs to be copied,
201 ** if it must be preserved across calls to this function.
205 getmxrr(host
, mxhosts
, mxprefs
, droplocalhost
, rcode
, tryfallback
, pttl
)
208 unsigned short *mxprefs
;
214 register unsigned char *eom
, *cp
;
215 register int i
, j
, n
;
220 int ancount
, qdcount
, buflen
;
221 bool seenlocal
= false;
222 unsigned short pref
, type
;
223 unsigned short localpref
= 256;
224 char *fallbackMX
= FallbackMX
;
225 bool trycanon
= false;
226 unsigned short *prefs
;
227 int (*resfunc
) __P((const char *, int, int, u_char
*, int));
228 unsigned short prefer
[MAXMXHOSTS
];
229 int weight
[MAXMXHOSTS
];
231 extern int res_query(), res_search();
234 sm_dprintf("getmxrr(%s, droplocalhost=%d)\n",
235 host
, droplocalhost
);
238 *pttl
= SM_DEFAULT_TTL
;
242 if ((fallbackMX
!= NULL
&& droplocalhost
&&
243 wordinclass(fallbackMX
, 'w')) || !tryfallback
)
245 /* don't use fallback for this pass */
254 /* efficiency hack -- numeric or non-MX lookups */
259 ** If we don't have MX records in our host switch, don't
260 ** try for MX records. Note that this really isn't "right",
261 ** since we might be set up to try NIS first and then DNS;
262 ** if the host is found in NIS we really shouldn't be doing
263 ** MX lookups. However, that should be a degenerate case.
268 if (HasWildcardMX
&& ConfigLevel
>= 6)
271 resfunc
= res_search
;
274 n
= (*resfunc
)(host
, C_IN
, T_MX
, (unsigned char *) &answer
,
279 sm_dprintf("getmxrr: res_search(%s) failed (errno=%d, h_errno=%d)\n",
280 host
, errno
, h_errno
);
288 /* no MX data on this host */
292 # if BROKEN_RES_SEARCH
293 case 0: /* Ultrix resolver retns failure w/ h_errno=0 */
294 # endif /* BROKEN_RES_SEARCH */
295 /* host doesn't exist in DNS; might be in /etc/hosts */
302 /* couldn't connect to the name server */
303 if (fallbackMX
!= NULL
)
305 /* name server is hosed -- push to fallback */
306 return fallbackmxrr(nmx
, prefs
, mxhosts
);
308 /* it might come up later; better queue it up */
309 *rcode
= EX_TEMPFAIL
;
313 syserr("getmxrr: res_search (%s) failed with impossible h_errno (%d)",
319 /* irreconcilable differences */
323 /* avoid problems after truncation in tcp packets */
324 if (n
> sizeof(answer
))
327 /* find first satisfactory answer */
328 hp
= (HEADER
*)&answer
;
329 cp
= (unsigned char *)&answer
+ HFIXEDSZ
;
330 eom
= (unsigned char *)&answer
+ n
;
331 for (qdcount
= ntohs((unsigned short) hp
->qdcount
);
335 if ((n
= dn_skipname(cp
, eom
)) < 0)
339 /* NOTE: see definition of MXHostBuf! */
340 buflen
= sizeof(MXHostBuf
) - 1;
341 SM_ASSERT(buflen
> 0);
343 ancount
= ntohs((unsigned short) hp
->ancount
);
345 /* See RFC 1035 for layout of RRs. */
346 /* XXX leave room for FallbackMX ? */
347 while (--ancount
>= 0 && cp
< eom
&& nmx
< MAXMXHOSTS
- 1)
349 if ((n
= dn_expand((unsigned char *)&answer
, eom
, cp
,
350 (RES_UNC_T
) bp
, buflen
)) < 0)
354 cp
+= INT16SZ
; /* skip over class */
356 GETSHORT(n
, cp
); /* rdlength */
359 if (tTd(8, 8) || _res
.options
& RES_DEBUG
)
360 sm_dprintf("unexpected answer type %d, size %d\n",
366 if ((n
= dn_expand((unsigned char *)&answer
, eom
, cp
,
367 (RES_UNC_T
) bp
, buflen
)) < 0)
372 /* Can this happen? */
376 sm_syslog(LOG_ERR
, NOQID
,
377 "MX records for %s contain empty string",
382 if (wordinclass(bp
, 'w'))
385 sm_dprintf("found localhost (%s) in MX list, pref=%d\n",
389 if (!seenlocal
|| pref
< localpref
)
397 weight
[nmx
] = mxrand(bp
);
409 /* don't want to wrap buflen */
415 /* return only one TTL entry, that should be sufficient */
416 if (ttl
> 0 && pttl
!= NULL
)
419 /* sort the records */
420 for (i
= 0; i
< nmx
; i
++)
422 for (j
= i
+ 1; j
< nmx
; j
++)
424 if (prefs
[i
] > prefs
[j
] ||
425 (prefs
[i
] == prefs
[j
] && weight
[i
] > weight
[j
]))
428 register char *temp1
;
434 mxhosts
[i
] = mxhosts
[j
];
437 weight
[i
] = weight
[j
];
441 if (seenlocal
&& prefs
[i
] >= localpref
)
443 /* truncate higher preference part of list */
448 /* delete duplicates from list (yes, some bozos have duplicates) */
449 for (i
= 0; i
< nmx
- 1; )
451 if (sm_strcasecmp(mxhosts
[i
], mxhosts
[i
+ 1]) != 0)
455 /* compress out duplicate */
456 for (j
= i
+ 1; j
< nmx
; j
++)
458 mxhosts
[j
] = mxhosts
[j
+ 1];
459 prefs
[j
] = prefs
[j
+ 1];
470 struct hostent
*h
= NULL
;
473 ** If we have deleted all MX entries, this is
474 ** an error -- we should NEVER send to a host that
475 ** has an MX, and this should have been caught
476 ** earlier in the config file.
478 ** Some sites prefer to go ahead and try the
479 ** A record anyway; that case is handled by
480 ** setting TryNullMXList. I believe this is a
481 ** bad idea, but it's up to you....
488 h
= sm_gethostbyname(host
, AF_INET
);
491 if (errno
== ETIMEDOUT
||
492 h_errno
== TRY_AGAIN
||
493 (errno
== ECONNREFUSED
&&
496 *rcode
= EX_TEMPFAIL
;
502 h
= sm_gethostbyname(host
, AF_INET6
);
504 (errno
== ETIMEDOUT
||
505 h_errno
== TRY_AGAIN
||
506 (errno
== ECONNREFUSED
&&
509 *rcode
= EX_TEMPFAIL
;
512 # endif /* NETINET6 */
519 syserr("MX list for %s points back to %s",
526 # endif /* NETINET6 */
528 if (strlen(host
) >= sizeof(MXHostBuf
))
531 syserr("Host name %s too long",
532 shortenstring(host
, MAXSHORTSTR
));
535 (void) sm_strlcpy(MXHostBuf
, host
, sizeof(MXHostBuf
));
536 mxhosts
[0] = MXHostBuf
;
542 struct sockaddr_in6 tmp6
;
543 # endif /* NETINET6 */
545 /* this may be an MX suppression-style address */
546 p
= strchr(MXHostBuf
, ']');
551 if (inet_addr(&MXHostBuf
[1]) != INADDR_NONE
)
557 else if (anynet_pton(AF_INET6
, &MXHostBuf
[1],
558 &tmp6
.sin6_addr
) == 1)
563 # endif /* NETINET6 */
572 getcanonname(mxhosts
[0], sizeof(MXHostBuf
) - 2, false, pttl
))
574 /* XXX MXHostBuf == "" ? is that possible? */
575 bp
= &MXHostBuf
[strlen(MXHostBuf
)];
585 /* if we have a default lowest preference, include that */
586 if (fallbackMX
!= NULL
&& !seenlocal
)
588 nmx
= fallbackmxrr(nmx
, prefs
, mxhosts
);
593 ** MXRAND -- create a randomizer for equal MX preferences
595 ** If two MX hosts have equal preferences we want to randomize
596 ** the selection. But in order for signatures to be the same,
597 ** we need to randomize the same way each time. This function
598 ** computes a pseudo-random hash function from the host name.
601 ** host -- the name of the host.
604 ** A random but repeatable value based on the host name.
612 static unsigned int seed
;
616 seed
= (int) curtime() & 0xffff;
622 sm_dprintf("mxrand(%s)", host
);
625 while (*host
!= '\0')
629 if (isascii(c
) && isupper(c
))
631 hfunc
= ((hfunc
<< 1) ^ c
) % 2003;
638 sm_dprintf(" = %d\n", hfunc
);
642 ** BESTMX -- find the best MX for a name
644 ** This is really a hack, but I don't see any obvious way
645 ** to generalize it at the moment.
650 bestmx_map_lookup(map
, name
, av
, statp
)
657 int saveopts
= _res
.options
;
661 char *mxhosts
[MAXMXHOSTS
+ 1];
662 #if _FFR_BESTMX_BETTER_TRUNCATION
664 #else /* _FFR_BESTMX_BETTER_TRUNCATION */
666 char buf
[PSBUFSIZE
/ 2];
667 #endif /* _FFR_BESTMX_BETTER_TRUNCATION */
669 _res
.options
&= ~(RES_DNSRCH
|RES_DEFNAMES
);
670 nmx
= getmxrr(name
, mxhosts
, NULL
, false, statp
, false, NULL
);
671 _res
.options
= saveopts
;
674 if (bitset(MF_MATCHONLY
, map
->map_mflags
))
675 return map_rewrite(map
, name
, strlen(name
), NULL
);
676 if ((map
->map_coldelim
== '\0') || (nmx
== 1))
677 return map_rewrite(map
, mxhosts
[0], strlen(mxhosts
[0]), av
);
680 ** We were given a -z flag (return all MXs) and there are multiple
681 ** ones. We need to build them all into a list.
684 #if _FFR_BESTMX_BETTER_TRUNCATION
685 for (i
= 0; i
< nmx
; i
++)
687 if (strchr(mxhosts
[i
], map
->map_coldelim
) != NULL
)
689 syserr("bestmx_map_lookup: MX host %.64s includes map delimiter character 0x%02X",
690 mxhosts
[i
], map
->map_coldelim
);
693 len
+= strlen(mxhosts
[i
]) + 1;
696 len
-= strlen(mxhosts
[i
]) + 1;
700 buf
= (char *) sm_malloc(len
);
703 *statp
= EX_UNAVAILABLE
;
707 for (i
= 0; i
< nmx
; i
++)
711 end
= sm_strlcat(buf
, mxhosts
[i
], len
);
712 if (i
!= nmx
&& end
+ 1 < len
)
714 buf
[end
] = map
->map_coldelim
;
719 /* Cleanly truncate for rulesets */
720 truncate_at_delim(buf
, PSBUFSIZE
/ 2, map
->map_coldelim
);
721 #else /* _FFR_BESTMX_BETTER_TRUNCATION */
723 for (i
= 0; i
< nmx
; i
++)
727 if (strchr(mxhosts
[i
], map
->map_coldelim
) != NULL
)
729 syserr("bestmx_map_lookup: MX host %.64s includes map delimiter character 0x%02X",
730 mxhosts
[i
], map
->map_coldelim
);
733 slen
= strlen(mxhosts
[i
]);
734 if (len
+ slen
+ 2 > sizeof(buf
))
738 *p
++ = map
->map_coldelim
;
741 (void) sm_strlcpy(p
, mxhosts
[i
], sizeof(buf
) - len
);
745 #endif /* _FFR_BESTMX_BETTER_TRUNCATION */
747 result
= map_rewrite(map
, buf
, len
, av
);
748 #if _FFR_BESTMX_BETTER_TRUNCATION
750 #endif /* _FFR_BESTMX_BETTER_TRUNCATION */
754 ** DNS_GETCANONNAME -- get the canonical name for named host using DNS
756 ** This algorithm tries to be smart about wildcard MX records.
757 ** This is hard to do because DNS doesn't tell is if we matched
758 ** against a wildcard or a specific MX.
760 ** We always prefer A & CNAME records, since these are presumed
763 ** If we match an MX in one pass and lose it in the next, we use
764 ** the old one. For example, consider an MX matching *.FOO.BAR.COM.
765 ** A hostname bletch.foo.bar.com will match against this MX, but
766 ** will stop matching when we try bletch.bar.com -- so we know
767 ** that bletch.foo.bar.com must have been right. This fails if
768 ** there was also an MX record matching *.BAR.COM, but there are
769 ** some things that just can't be fixed.
772 ** host -- a buffer containing the name of the host.
773 ** This is a value-result parameter.
774 ** hbsize -- the size of the host buffer.
775 ** trymx -- if set, try MX records as well as A and CNAME.
776 ** statp -- pointer to place to store status.
777 ** pttl -- pointer to return TTL (can be NULL).
780 ** true -- if the host matched.
781 ** false -- otherwise.
785 dns_getcanonname(host
, hbsize
, trymx
, statp
, pttl
)
792 register unsigned char *eom
, *ap
;
797 int ancount
, qdcount
;
809 char nbuf
[SM_MAX(MAXPACKET
, MAXDNAME
*2+2)];
810 char *searchlist
[MAXDNSRCH
+ 2];
813 sm_dprintf("dns_getcanonname(%s, trymx=%d)\n", host
, trymx
);
815 if ((_res
.options
& RES_INIT
) == 0 && res_init() == -1)
817 *statp
= EX_UNAVAILABLE
;
824 ** Initialize domain search list. If there is at least one
825 ** dot in the name, search the unmodified name first so we
826 ** find "vse.CS" in Czechoslovakia instead of in the local
827 ** domain (e.g., vse.CS.Berkeley.EDU). Note that there is no
828 ** longer a country named Czechoslovakia but this type of problem
831 ** Older versions of the resolver could create this
832 ** list by tearing apart the host name.
837 /* Check for dots in the name */
838 for (cp
= host
, n
= 0; *cp
!= '\0'; cp
++)
843 ** Build the search list.
844 ** If there is at least one dot in name, start with a null
845 ** domain to search the unmodified name first.
846 ** If name does not end with a dot and search up local domain
847 ** tree desired, append each local domain component to the
848 ** search list; if name contains no dots and default domain
849 ** name is desired, append default domain name to search list;
850 ** else if name ends in a dot, remove that dot.
856 if (n
>= 0 && *--cp
!= '.' && bitset(RES_DNSRCH
, _res
.options
))
858 /* make sure there are less than MAXDNSRCH domains */
859 for (domain
= RES_DNSRCH_VARIABLE
, ret
= 0;
860 *domain
!= NULL
&& ret
< MAXDNSRCH
;
864 else if (n
== 0 && bitset(RES_DEFNAMES
, _res
.options
))
866 *dp
++ = _res
.defdname
;
875 ** Now loop through the search list, appending each domain in turn
876 ** name and searching for a match.
882 if (InetMode
== AF_INET6
)
884 # endif /* NETINET6 */
887 for (dp
= searchlist
; *dp
!= NULL
; )
889 if (qtype
== initial
)
892 sm_dprintf("dns_getcanonname: trying %s.%s (%s)\n",
895 qtype
== T_AAAA
? "AAAA" :
896 # endif /* NETINET6 */
898 qtype
== T_MX
? "MX" :
901 ret
= res_querydomain(host
, *dp
, C_IN
, qtype
,
902 answer
.qb2
, sizeof(answer
.qb2
));
905 int save_errno
= errno
;
908 sm_dprintf("\tNO: errno=%d, h_errno=%d\n",
909 save_errno
, h_errno
);
911 if (save_errno
== ECONNREFUSED
|| h_errno
== TRY_AGAIN
)
914 ** the name server seems to be down or broken.
917 SM_SET_H_ERRNO(TRY_AGAIN
);
921 *statp
= EX_TEMPFAIL
;
924 *statp
= EX_TEMPFAIL
;
926 if (WorkAroundBrokenAAAA
)
929 ** Only return if not TRY_AGAIN as an
930 ** attempt with a different qtype may
931 ** succeed (res_querydomain() calls
932 ** res_query() calls res_send() which
933 ** sets errno to ETIMEDOUT if the
934 ** nameservers could be contacted but
935 ** didn't give an answer).
938 if (save_errno
!= ETIMEDOUT
)
946 if (h_errno
!= HOST_NOT_FOUND
)
948 /* might have another type of interest */
956 # endif /* NETINET6 */
957 if (qtype
== T_A
&& !gotmx
&&
958 (trymx
|| **dp
== '\0'))
965 /* definite no -- try the next domain */
971 sm_dprintf("\tYES\n");
973 /* avoid problems after truncation in tcp packets */
974 if (ret
> sizeof(answer
))
975 ret
= sizeof(answer
);
979 ** Appear to have a match. Confirm it by searching for A or
980 ** CNAME records. If we don't have a local domain
981 ** wild card MX record, we will accept MX as well.
984 hp
= (HEADER
*) &answer
;
985 ap
= (unsigned char *) &answer
+ HFIXEDSZ
;
986 eom
= (unsigned char *) &answer
+ ret
;
988 /* skip question part of response -- we know what we asked */
989 for (qdcount
= ntohs((unsigned short) hp
->qdcount
);
991 ap
+= ret
+ QFIXEDSZ
)
993 if ((ret
= dn_skipname(ap
, eom
)) < 0)
996 sm_dprintf("qdcount failure (%d)\n",
997 ntohs((unsigned short) hp
->qdcount
));
998 *statp
= EX_SOFTWARE
;
999 return false; /* ???XXX??? */
1004 for (ancount
= ntohs((unsigned short) hp
->ancount
);
1005 --ancount
>= 0 && ap
< eom
;
1008 n
= dn_expand((unsigned char *) &answer
, eom
, ap
,
1009 (RES_UNC_T
) nbuf
, sizeof(nbuf
));
1014 ap
+= INT16SZ
; /* skip over class */
1016 GETSHORT(n
, ap
); /* rdlength */
1021 if (**dp
!= '\0' && HasWildcardMX
)
1024 ** If we are using MX matches and have
1025 ** not yet gotten one, save this one
1026 ** but keep searching for an A or
1030 if (trymx
&& mxmatch
== NULL
)
1036 ** If we did not append a domain name, this
1037 ** must have been a canonical name to start
1038 ** with. Even if we did append a domain name,
1039 ** in the absence of a wildcard MX this must
1040 ** still be a real MX match.
1041 ** Such MX matches are as good as an A match,
1048 # endif /* NETINET6 */
1050 /* Flag that a good match was found */
1053 /* continue in case a CNAME also exists */
1057 if (DontExpandCnames
)
1059 /* got CNAME -- guaranteed canonical */
1064 if (loopcnt
++ > MAXCNAMEDEPTH
)
1066 /*XXX should notify postmaster XXX*/
1067 message("DNS failure: CNAME loop for %s",
1069 if (CurEnv
->e_message
== NULL
)
1073 (void) sm_snprintf(ebuf
,
1075 "Deferred: DNS failure: CNAME loop for %.100s",
1079 CurEnv
->e_rpool
, ebuf
);
1081 SM_SET_H_ERRNO(NO_RECOVERY
);
1086 /* value points at name */
1087 if ((ret
= dn_expand((unsigned char *)&answer
,
1088 eom
, ap
, (RES_UNC_T
) nbuf
,
1091 (void) sm_strlcpy(host
, nbuf
, hbsize
);
1094 ** RFC 1034 section 3.6 specifies that CNAME
1095 ** should point at the canonical name -- but
1096 ** urges software to try again anyway.
1102 /* not a record of interest */
1110 ** Got a good match -- either an A, CNAME, or an
1111 ** exact MX record. Save it and get out of here.
1119 ** Nothing definitive yet.
1120 ** If this was a T_A query and we haven't yet found a MX
1121 ** match, try T_MX if allowed to do so.
1122 ** Otherwise, try the next domain.
1126 if (qtype
== T_AAAA
)
1129 # endif /* NETINET6 */
1130 if (qtype
== T_A
&& !gotmx
&& (trymx
|| **dp
== '\0'))
1139 /* if nothing was found, we are done */
1140 if (mxmatch
== NULL
)
1142 if (*statp
== EX_OK
)
1148 ** Create canonical name and return.
1149 ** If saved domain name is null, name was already canonical.
1150 ** Otherwise append the saved domain name.
1153 (void) sm_snprintf(nbuf
, sizeof(nbuf
), "%.*s%s%.*s", MAXDNAME
, host
,
1154 *mxmatch
== '\0' ? "" : ".",
1156 (void) sm_strlcpy(host
, nbuf
, hbsize
);
1158 sm_dprintf("dns_getcanonname: %s\n", host
);
1161 /* return only one TTL entry, that should be sufficient */
1162 if (ttl
> 0 && pttl
!= NULL
)
1166 #endif /* NAMED_BIND */