1 /* Copyright (C) 1996-2014 Free Software Foundation, Inc.
2 This file is part of the GNU C Library.
3 Extended from original form by Ulrich Drepper <drepper@cygnus.com>, 1996.
5 The GNU C Library is free software; you can redistribute it and/or
6 modify it under the terms of the GNU Lesser General Public
7 License as published by the Free Software Foundation; either
8 version 2.1 of the License, or (at your option) any later version.
10 The GNU C Library is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 Lesser General Public License for more details.
15 You should have received a copy of the GNU Lesser General Public
16 License along with the GNU C Library; if not, see
17 <http://www.gnu.org/licenses/>. */
19 /* Parts of this file are plain copies of the file `gethtnamadr.c' from
20 the bind package and it has the following copyright. */
23 * ++Copyright++ 1985, 1988, 1993
25 * Copyright (c) 1985, 1988, 1993
26 * The Regents of the University of California. All rights reserved.
28 * Redistribution and use in source and binary forms, with or without
29 * modification, are permitted provided that the following conditions
31 * 1. Redistributions of source code must retain the above copyright
32 * notice, this list of conditions and the following disclaimer.
33 * 2. Redistributions in binary form must reproduce the above copyright
34 * notice, this list of conditions and the following disclaimer in the
35 * documentation and/or other materials provided with the distribution.
36 * 4. Neither the name of the University nor the names of its contributors
37 * may be used to endorse or promote products derived from this software
38 * without specific prior written permission.
40 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
41 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
42 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
43 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
44 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
45 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
46 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
47 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
48 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
49 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
52 * Portions Copyright (c) 1993 by Digital Equipment Corporation.
54 * Permission to use, copy, modify, and distribute this software for any
55 * purpose with or without fee is hereby granted, provided that the above
56 * copyright notice and this permission notice appear in all copies, and that
57 * the name of Digital Equipment Corporation not be used in advertising or
58 * publicity pertaining to distribution of the document or software without
59 * specific, written prior permission.
61 * THE SOFTWARE IS PROVIDED "AS IS" AND DIGITAL EQUIPMENT CORP. DISCLAIMS ALL
62 * WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES
63 * OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL DIGITAL EQUIPMENT
64 * CORPORATION BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL
65 * DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR
66 * PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS
67 * ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
81 #include <sys/syslog.h>
85 /* Get implementation for some internal functions. */
86 #include <resolv/mapv4v6addr.h>
87 #include <resolv/mapv4v6hostent.h>
92 # define MAXPACKET PACKETSZ
94 # define MAXPACKET 65536
96 /* As per RFC 1034 and 1035 a host name cannot exceed 255 octets in length. */
98 # undef MAXHOSTNAMELEN
100 #define MAXHOSTNAMELEN 256
102 static const char AskedForGot
[] = "\
103 gethostby*.getanswer: asked for \"%s\", got \"%s\"";
106 /* We need this time later. */
107 typedef union querybuf
110 u_char buf
[MAXPACKET
];
113 /* These functions are defined in res_comp.c. */
114 #define NS_MAXCDNAME 255 /* maximum compressed domain name */
115 extern int __ns_name_ntop (const u_char
*, char *, size_t);
116 extern int __ns_name_unpack (const u_char
*, const u_char
*,
117 const u_char
*, u_char
*, size_t);
120 static enum nss_status
getanswer_r (const querybuf
*answer
, int anslen
,
121 const char *qname
, int qtype
,
122 struct hostent
*result
, char *buffer
,
123 size_t buflen
, int *errnop
, int *h_errnop
,
124 int map
, int32_t *ttlp
, char **canonp
);
126 static enum nss_status
gaih_getanswer (const querybuf
*answer1
, int anslen1
,
127 const querybuf
*answer2
, int anslen2
,
129 struct gaih_addrtuple
**pat
,
130 char *buffer
, size_t buflen
,
131 int *errnop
, int *h_errnop
,
134 extern enum nss_status
_nss_dns_gethostbyname3_r (const char *name
, int af
,
135 struct hostent
*result
,
136 char *buffer
, size_t buflen
,
137 int *errnop
, int *h_errnop
,
140 hidden_proto (_nss_dns_gethostbyname3_r
)
143 _nss_dns_gethostbyname3_r (const char *name
, int af
, struct hostent
*result
,
144 char *buffer
, size_t buflen
, int *errnop
,
145 int *h_errnop
, int32_t *ttlp
, char **canonp
)
152 querybuf
*orig_host_buffer
;
153 char tmp
[NS_MAXDNAME
];
158 enum nss_status status
;
160 if (__res_maybe_init (&_res
, 0) == -1)
161 return NSS_STATUS_UNAVAIL
;
174 *errnop
= EAFNOSUPPORT
;
175 return NSS_STATUS_UNAVAIL
;
178 result
->h_addrtype
= af
;
179 result
->h_length
= size
;
182 * if there aren't any dots, it could be a user-level alias.
183 * this is also done in res_query() since we are not the only
184 * function that looks up host names.
186 if (strchr (name
, '.') == NULL
187 && (cp
= res_hostalias (&_res
, name
, tmp
, sizeof (tmp
))) != NULL
)
190 host_buffer
.buf
= orig_host_buffer
= (querybuf
*) alloca (1024);
192 n
= __libc_res_nsearch (&_res
, name
, C_IN
, type
, host_buffer
.buf
->buf
,
193 1024, &host_buffer
.ptr
, NULL
, NULL
, NULL
);
199 status
= NSS_STATUS_TRYAGAIN
;
202 /* System has run out of file descriptors. */
205 h_errno
= NETDB_INTERNAL
;
209 status
= NSS_STATUS_UNAVAIL
;
212 status
= NSS_STATUS_NOTFOUND
;
216 if (h_errno
== TRY_AGAIN
)
219 __set_errno (olderr
);
221 /* If we are looking for an IPv6 address and mapping is enabled
222 by having the RES_USE_INET6 bit in _res.options set, we try
224 if (af
== AF_INET6
&& (_res
.options
& RES_USE_INET6
))
225 n
= __libc_res_nsearch (&_res
, name
, C_IN
, T_A
, host_buffer
.buf
->buf
,
226 host_buffer
.buf
!= orig_host_buffer
227 ? MAXPACKET
: 1024, &host_buffer
.ptr
,
232 if (host_buffer
.buf
!= orig_host_buffer
)
233 free (host_buffer
.buf
);
239 result
->h_addrtype
= AF_INET
;
240 result
->h_length
= INADDRSZ
;
243 status
= getanswer_r (host_buffer
.buf
, n
, name
, type
, result
, buffer
, buflen
,
244 errnop
, h_errnop
, map
, ttlp
, canonp
);
245 if (host_buffer
.buf
!= orig_host_buffer
)
246 free (host_buffer
.buf
);
249 hidden_def (_nss_dns_gethostbyname3_r
)
253 _nss_dns_gethostbyname2_r (const char *name
, int af
, struct hostent
*result
,
254 char *buffer
, size_t buflen
, int *errnop
,
257 return _nss_dns_gethostbyname3_r (name
, af
, result
, buffer
, buflen
, errnop
,
258 h_errnop
, NULL
, NULL
);
263 _nss_dns_gethostbyname_r (const char *name
, struct hostent
*result
,
264 char *buffer
, size_t buflen
, int *errnop
,
267 enum nss_status status
= NSS_STATUS_NOTFOUND
;
269 if (_res
.options
& RES_USE_INET6
)
270 status
= _nss_dns_gethostbyname3_r (name
, AF_INET6
, result
, buffer
,
271 buflen
, errnop
, h_errnop
, NULL
, NULL
);
272 if (status
== NSS_STATUS_NOTFOUND
)
273 status
= _nss_dns_gethostbyname3_r (name
, AF_INET
, result
, buffer
,
274 buflen
, errnop
, h_errnop
, NULL
, NULL
);
281 _nss_dns_gethostbyname4_r (const char *name
, struct gaih_addrtuple
**pat
,
282 char *buffer
, size_t buflen
, int *errnop
,
283 int *herrnop
, int32_t *ttlp
)
285 if (__res_maybe_init (&_res
, 0) == -1)
286 return NSS_STATUS_UNAVAIL
;
289 * if there aren't any dots, it could be a user-level alias.
290 * this is also done in res_query() since we are not the only
291 * function that looks up host names.
293 if (strchr (name
, '.') == NULL
)
295 char *tmp
= alloca (NS_MAXDNAME
);
296 const char *cp
= res_hostalias (&_res
, name
, tmp
, NS_MAXDNAME
);
307 querybuf
*orig_host_buffer
;
308 host_buffer
.buf
= orig_host_buffer
= (querybuf
*) alloca (anslen
);
309 u_char
*ans2p
= NULL
;
314 enum nss_status status
;
315 int n
= __libc_res_nsearch (&_res
, name
, C_IN
, T_UNSPEC
,
316 host_buffer
.buf
->buf
, anslen
, &host_buffer
.ptr
,
317 &ans2p
, &nans2p
, &resplen2
);
320 status
= gaih_getanswer (host_buffer
.buf
, n
, (const querybuf
*) ans2p
,
321 resplen2
, name
, pat
, buffer
, buflen
,
322 errnop
, herrnop
, ttlp
);
329 status
= NSS_STATUS_TRYAGAIN
;
332 /* System has run out of file descriptors. */
335 h_errno
= NETDB_INTERNAL
;
339 status
= NSS_STATUS_UNAVAIL
;
342 status
= NSS_STATUS_NOTFOUND
;
347 if (h_errno
== TRY_AGAIN
)
350 __set_errno (olderr
);
353 /* Check whether ans2p was separately allocated. */
354 if (host_buffer
.buf
!= orig_host_buffer
)
357 && (ans2p
< host_buffer
.ptr
|| ans2p
>= host_buffer
.ptr
+ anslen
))
360 if (host_buffer
.buf
!= orig_host_buffer
)
361 free (host_buffer
.buf
);
367 extern enum nss_status
_nss_dns_gethostbyaddr2_r (const void *addr
,
368 socklen_t len
, int af
,
369 struct hostent
*result
,
370 char *buffer
, size_t buflen
,
371 int *errnop
, int *h_errnop
,
373 hidden_proto (_nss_dns_gethostbyaddr2_r
)
376 _nss_dns_gethostbyaddr2_r (const void *addr
, socklen_t len
, int af
,
377 struct hostent
*result
, char *buffer
, size_t buflen
,
378 int *errnop
, int *h_errnop
, int32_t *ttlp
)
380 static const u_char mapped
[] = { 0,0, 0,0, 0,0, 0,0, 0,0, 0xff,0xff };
381 static const u_char tunnelled
[] = { 0,0, 0,0, 0,0, 0,0, 0,0, 0,0 };
382 static const u_char v6local
[] = { 0,0, 0,1 };
383 const u_char
*uaddr
= (const u_char
*)addr
;
386 char *aliases
[MAX_NR_ALIASES
];
387 unsigned char host_addr
[16]; /* IPv4 or IPv6 */
388 char *h_addr_ptrs
[MAX_NR_ADDRS
+ 1];
390 } *host_data
= (struct host_data
*) buffer
;
396 querybuf
*orig_host_buffer
;
397 char qbuf
[MAXDNAME
+1], *qp
= NULL
;
402 uintptr_t pad
= -(uintptr_t) buffer
% __alignof__ (struct host_data
);
404 buflen
= buflen
> pad
? buflen
- pad
: 0;
406 if (__glibc_unlikely (buflen
< sizeof (struct host_data
)))
409 *h_errnop
= NETDB_INTERNAL
;
410 return NSS_STATUS_TRYAGAIN
;
413 host_data
= (struct host_data
*) buffer
;
415 if (__res_maybe_init (&_res
, 0) == -1)
416 return NSS_STATUS_UNAVAIL
;
418 if (af
== AF_INET6
&& len
== IN6ADDRSZ
419 && (memcmp (uaddr
, mapped
, sizeof mapped
) == 0
420 || (memcmp (uaddr
, tunnelled
, sizeof tunnelled
) == 0
421 && memcmp (&uaddr
[sizeof tunnelled
], v6local
, sizeof v6local
))))
424 addr
+= sizeof mapped
;
425 uaddr
+= sizeof mapped
;
439 *errnop
= EAFNOSUPPORT
;
440 *h_errnop
= NETDB_INTERNAL
;
441 return NSS_STATUS_UNAVAIL
;
445 *errnop
= EAFNOSUPPORT
;
446 *h_errnop
= NETDB_INTERNAL
;
447 return NSS_STATUS_UNAVAIL
;
450 host_buffer
.buf
= orig_host_buffer
= (querybuf
*) alloca (1024);
455 sprintf (qbuf
, "%u.%u.%u.%u.in-addr.arpa", (uaddr
[3] & 0xff),
456 (uaddr
[2] & 0xff), (uaddr
[1] & 0xff), (uaddr
[0] & 0xff));
459 /* Only lookup with the byte string format if the user wants it. */
460 if (__glibc_unlikely (_res
.options
& RES_USEBSTRING
))
462 qp
= stpcpy (qbuf
, "\\[x");
463 for (n
= 0; n
< IN6ADDRSZ
; ++n
)
464 qp
+= sprintf (qp
, "%02hhx", uaddr
[n
]);
465 strcpy (qp
, "].ip6.arpa");
466 n
= __libc_res_nquery (&_res
, qbuf
, C_IN
, T_PTR
,
467 host_buffer
.buf
->buf
, 1024, &host_buffer
.ptr
,
473 for (n
= IN6ADDRSZ
- 1; n
>= 0; n
--)
475 static const char nibblechar
[16] = "0123456789abcdef";
476 *qp
++ = nibblechar
[uaddr
[n
] & 0xf];
478 *qp
++ = nibblechar
[(uaddr
[n
] >> 4) & 0xf];
481 strcpy(qp
, "ip6.arpa");
488 n
= __libc_res_nquery (&_res
, qbuf
, C_IN
, T_PTR
, host_buffer
.buf
->buf
,
489 1024, &host_buffer
.ptr
, NULL
, NULL
, NULL
);
490 if (n
< 0 && af
== AF_INET6
&& (_res
.options
& RES_NOIP6DOTINT
) == 0)
492 strcpy (qp
, "ip6.int");
493 n
= __libc_res_nquery (&_res
, qbuf
, C_IN
, T_PTR
, host_buffer
.buf
->buf
,
494 host_buffer
.buf
!= orig_host_buffer
495 ? MAXPACKET
: 1024, &host_buffer
.ptr
,
501 __set_errno (olderr
);
502 if (host_buffer
.buf
!= orig_host_buffer
)
503 free (host_buffer
.buf
);
504 return errno
== ECONNREFUSED
? NSS_STATUS_UNAVAIL
: NSS_STATUS_NOTFOUND
;
508 status
= getanswer_r (host_buffer
.buf
, n
, qbuf
, T_PTR
, result
, buffer
, buflen
,
509 errnop
, h_errnop
, 0 /* XXX */, ttlp
, NULL
);
510 if (host_buffer
.buf
!= orig_host_buffer
)
511 free (host_buffer
.buf
);
512 if (status
!= NSS_STATUS_SUCCESS
)
516 This is
not implemented because it is
not possible to use the current
517 source from bind in a multi
-threaded program
.
520 result
->h_addrtype
= af
;
521 result
->h_length
= len
;
522 memcpy (host_data
->host_addr
, addr
, len
);
523 host_data
->h_addr_ptrs
[0] = (char *) host_data
->host_addr
;
524 host_data
->h_addr_ptrs
[1] = NULL
;
526 /* XXX I think this is wrong. Why should an IPv4 address be
527 converted to IPv6 if the user explicitly asked for IPv4? */
528 if (af
== AF_INET
&& (_res
.options
& RES_USE_INET6
))
530 map_v4v6_address ((char *) host_data
->host_addr
,
531 (char *) host_data
->host_addr
);
532 result
->h_addrtype
= AF_INET6
;
533 result
->h_length
= IN6ADDRSZ
;
536 *h_errnop
= NETDB_SUCCESS
;
537 return NSS_STATUS_SUCCESS
;
539 hidden_def (_nss_dns_gethostbyaddr2_r
)
543 _nss_dns_gethostbyaddr_r (const void *addr
, socklen_t len
, int af
,
544 struct hostent
*result
, char *buffer
, size_t buflen
,
545 int *errnop
, int *h_errnop
)
547 return _nss_dns_gethostbyaddr2_r (addr
, len
, af
, result
, buffer
, buflen
,
548 errnop
, h_errnop
, NULL
);
552 static void addrsort (char **ap
, int num
);
555 addrsort (char **ap
, int num
)
559 short aval
[MAX_NR_ADDRS
];
563 if (num
> MAX_NR_ADDRS
)
565 for (i
= 0; i
< num
; i
++, p
++)
567 for (j
= 0 ; (unsigned)j
< _res
.nsort
; j
++)
568 if (_res
.sort_list
[j
].addr
.s_addr
==
569 (((struct in_addr
*)(*p
))->s_addr
& _res
.sort_list
[j
].mask
))
572 if (needsort
== 0 && i
> 0 && j
< aval
[i
-1])
578 while (needsort
++ < num
)
579 for (j
= needsort
- 2; j
>= 0; j
--)
580 if (aval
[j
] > aval
[j
+1])
597 static enum nss_status
598 getanswer_r (const querybuf
*answer
, int anslen
, const char *qname
, int qtype
,
599 struct hostent
*result
, char *buffer
, size_t buflen
,
600 int *errnop
, int *h_errnop
, int map
, int32_t *ttlp
, char **canonp
)
604 char *aliases
[MAX_NR_ALIASES
];
605 unsigned char host_addr
[16]; /* IPv4 or IPv6 */
606 char *h_addr_ptrs
[0];
610 const u_char
*end_of_message
, *cp
;
611 int n
, ancount
, qdcount
;
612 int haveanswer
, had_error
;
613 char *bp
, **ap
, **hap
;
616 int (*name_ok
) (const char *);
617 u_char packtmp
[NS_MAXCDNAME
];
619 uintptr_t pad
= -(uintptr_t) buffer
% __alignof__ (struct host_data
);
621 if (__glibc_unlikely (buflen
< sizeof (struct host_data
) + pad
))
623 /* The buffer is too small. */
626 *h_errnop
= NETDB_INTERNAL
;
627 return NSS_STATUS_TRYAGAIN
;
629 host_data
= (struct host_data
*) buffer
;
630 linebuflen
= buflen
- sizeof (struct host_data
);
631 if (buflen
- sizeof (struct host_data
) != linebuflen
)
632 linebuflen
= INT_MAX
;
635 result
->h_name
= NULL
;
636 end_of_message
= answer
->buf
+ anslen
;
648 return NSS_STATUS_UNAVAIL
; /* XXX should be abort(); */
652 * find first satisfactory answer
655 ancount
= ntohs (hp
->ancount
);
656 qdcount
= ntohs (hp
->qdcount
);
657 cp
= answer
->buf
+ HFIXEDSZ
;
658 if (__builtin_expect (qdcount
, 1) != 1)
660 *h_errnop
= NO_RECOVERY
;
661 return NSS_STATUS_UNAVAIL
;
663 if (sizeof (struct host_data
) + (ancount
+ 1) * sizeof (char *) >= buflen
)
665 bp
= (char *) &host_data
->h_addr_ptrs
[ancount
+ 1];
666 linebuflen
-= (ancount
+ 1) * sizeof (char *);
668 n
= __ns_name_unpack (answer
->buf
, end_of_message
, cp
,
669 packtmp
, sizeof packtmp
);
670 if (n
!= -1 && __ns_name_ntop (packtmp
, bp
, linebuflen
) == -1)
672 if (__builtin_expect (errno
, 0) == EMSGSIZE
)
678 if (n
> 0 && bp
[0] == '.')
681 if (__builtin_expect (n
< 0 || ((*name_ok
) (bp
) == 0 && (errno
= EBADMSG
)),
685 *h_errnop
= NO_RECOVERY
;
686 return NSS_STATUS_UNAVAIL
;
690 if (qtype
== T_A
|| qtype
== T_AAAA
)
692 /* res_send() has already verified that the query name is the
693 * same as the one we sent; this just gets the expanded name
694 * (i.e., with the succeeding search-domain tacked on).
696 n
= strlen (bp
) + 1; /* for the \0 */
697 if (n
>= MAXHOSTNAMELEN
)
699 *h_errnop
= NO_RECOVERY
;
701 return NSS_STATUS_TRYAGAIN
;
708 /* The qname can be abbreviated, but h_name is now absolute. */
709 qname
= result
->h_name
;
712 ap
= host_data
->aliases
;
714 result
->h_aliases
= host_data
->aliases
;
715 hap
= host_data
->h_addr_ptrs
;
717 result
->h_addr_list
= host_data
->h_addr_ptrs
;
721 while (ancount
-- > 0 && cp
< end_of_message
&& had_error
== 0)
725 n
= __ns_name_unpack (answer
->buf
, end_of_message
, cp
,
726 packtmp
, sizeof packtmp
);
727 if (n
!= -1 && __ns_name_ntop (packtmp
, bp
, linebuflen
) == -1)
729 if (__builtin_expect (errno
, 0) == EMSGSIZE
)
735 if (__glibc_unlikely (n
< 0 || (*name_ok
) (bp
) == 0))
742 if (__glibc_unlikely (cp
+ 10 > end_of_message
))
748 type
= __ns_get16 (cp
);
749 cp
+= INT16SZ
; /* type */
750 class = __ns_get16 (cp
);
751 cp
+= INT16SZ
; /* class */
752 int32_t ttl
= __ns_get32 (cp
);
753 cp
+= INT32SZ
; /* TTL */
755 cp
+= INT16SZ
; /* len */
756 if (__glibc_unlikely (class != C_IN
))
758 /* XXX - debug? syslog? */
760 continue; /* XXX - had_error++ ? */
763 if ((qtype
== T_A
|| qtype
== T_AAAA
) && type
== T_CNAME
)
765 /* A CNAME could also have a TTL entry. */
766 if (ttlp
!= NULL
&& ttl
< *ttlp
)
769 if (ap
>= &host_data
->aliases
[MAX_NR_ALIASES
- 1])
771 n
= dn_expand (answer
->buf
, end_of_message
, cp
, tbuf
, sizeof tbuf
);
772 if (__glibc_unlikely (n
< 0 || (*name_ok
) (tbuf
) == 0))
780 n
= strlen (bp
) + 1; /* For the \0. */
781 if (__builtin_expect (n
, 0) >= MAXHOSTNAMELEN
)
788 /* Get canonical name. */
789 n
= strlen (tbuf
) + 1; /* For the \0. */
790 if (__glibc_unlikely (n
> linebuflen
))
792 if (__builtin_expect (n
, 0) >= MAXHOSTNAMELEN
)
798 bp
= __mempcpy (bp
, tbuf
, n
); /* Cannot overflow. */
803 if (qtype
== T_PTR
&& type
== T_CNAME
)
805 n
= dn_expand (answer
->buf
, end_of_message
, cp
, tbuf
, sizeof tbuf
);
806 if (__glibc_unlikely (n
< 0 || res_dnok (tbuf
) == 0))
812 /* Get canonical name. */
813 n
= strlen (tbuf
) + 1; /* For the \0. */
814 if (__glibc_unlikely (n
> linebuflen
))
816 if (__builtin_expect (n
, 0) >= MAXHOSTNAMELEN
)
822 bp
= __mempcpy (bp
, tbuf
, n
); /* Cannot overflow. */
826 if (__builtin_expect (type
== T_SIG
, 0)
827 || __builtin_expect (type
== T_KEY
, 0)
828 || __builtin_expect (type
== T_NXT
, 0))
830 /* We don't support DNSSEC yet. For now, ignore the record
831 and send a low priority message to syslog. */
832 syslog (LOG_DEBUG
| LOG_AUTH
,
833 "gethostby*.getanswer: asked for \"%s %s %s\", got type \"%s\"",
834 qname
, p_class (C_IN
), p_type(qtype
), p_type (type
));
839 if (type
== T_A
&& qtype
== T_AAAA
&& map
)
841 else if (__glibc_unlikely (type
!= qtype
))
843 syslog (LOG_NOTICE
| LOG_AUTH
,
844 "gethostby*.getanswer: asked for \"%s %s %s\", got type \"%s\"",
845 qname
, p_class (C_IN
), p_type (qtype
), p_type (type
));
847 continue; /* XXX - had_error++ ? */
853 if (__glibc_unlikely (strcasecmp (tname
, bp
) != 0))
855 syslog (LOG_NOTICE
| LOG_AUTH
, AskedForGot
, qname
, bp
);
857 continue; /* XXX - had_error++ ? */
860 n
= __ns_name_unpack (answer
->buf
, end_of_message
, cp
,
861 packtmp
, sizeof packtmp
);
862 if (n
!= -1 && __ns_name_ntop (packtmp
, bp
, linebuflen
) == -1)
864 if (__builtin_expect (errno
, 0) == EMSGSIZE
)
870 if (__glibc_unlikely (n
< 0 || res_hnok (bp
) == 0))
875 #if MULTI_PTRS_ARE_ALIASES
879 else if (ap
< &host_data
->aliases
[MAXALIASES
-1])
885 n
= strlen (bp
) + 1; /* for the \0 */
886 if (__builtin_expect (n
, 0) >= MAXHOSTNAMELEN
)
899 n
= strlen (bp
) + 1; /* for the \0 */
900 if (__glibc_unlikely (n
>= MAXHOSTNAMELEN
))
907 if (map_v4v6_hostent (result
, &bp
, &linebuflen
))
910 *h_errnop
= NETDB_SUCCESS
;
911 return NSS_STATUS_SUCCESS
;
915 if (__builtin_expect (strcasecmp (result
->h_name
, bp
), 0) != 0)
917 syslog (LOG_NOTICE
| LOG_AUTH
, AskedForGot
, result
->h_name
, bp
);
919 continue; /* XXX - had_error++ ? */
921 if (n
!= result
->h_length
)
930 /* We compose a single hostent out of the entire chain of
931 entries, so the TTL of the hostent is essentially the lowest
933 if (ttlp
!= NULL
&& ttl
< *ttlp
)
938 nn
= strlen (bp
) + 1; /* for the \0 */
943 linebuflen
-= sizeof (align
) - ((u_long
) bp
% sizeof (align
));
944 bp
+= sizeof (align
) - ((u_long
) bp
% sizeof (align
));
946 if (__glibc_unlikely (n
> linebuflen
))
948 bp
= __mempcpy (*hap
++ = bp
, cp
, n
);
963 #if defined RESOLVSORT
965 * Note: we sort even if host can take only one address
966 * in its return structures - should give it the "best"
967 * address in that case, not some random one
969 if (_res
.nsort
&& haveanswer
> 1 && qtype
== T_A
)
970 addrsort (host_data
->h_addr_ptrs
, haveanswer
);
971 #endif /*RESOLVSORT*/
973 if (result
->h_name
== NULL
)
975 n
= strlen (qname
) + 1; /* For the \0. */
978 if (n
>= MAXHOSTNAMELEN
)
981 bp
= __mempcpy (bp
, qname
, n
); /* Cannot overflow. */
986 if (map_v4v6_hostent (result
, &bp
, &linebuflen
))
988 *h_errnop
= NETDB_SUCCESS
;
989 return NSS_STATUS_SUCCESS
;
992 *h_errnop
= NO_RECOVERY
;
994 /* Special case here: if the resolver sent a result but it only
995 contains a CNAME while we are looking for a T_A or T_AAAA record,
996 we fail with NOTFOUND instead of TRYAGAIN. */
997 return ((qtype
== T_A
|| qtype
== T_AAAA
) && ap
!= host_data
->aliases
998 ? NSS_STATUS_NOTFOUND
: NSS_STATUS_TRYAGAIN
);
1002 static enum nss_status
1003 gaih_getanswer_slice (const querybuf
*answer
, int anslen
, const char *qname
,
1004 struct gaih_addrtuple
***patp
,
1005 char **bufferp
, size_t *buflenp
,
1006 int *errnop
, int *h_errnop
, int32_t *ttlp
, int *firstp
)
1008 char *buffer
= *bufferp
;
1009 size_t buflen
= *buflenp
;
1011 struct gaih_addrtuple
**pat
= *patp
;
1012 const HEADER
*hp
= &answer
->hdr
;
1013 int ancount
= ntohs (hp
->ancount
);
1014 int qdcount
= ntohs (hp
->qdcount
);
1015 const u_char
*cp
= answer
->buf
+ HFIXEDSZ
;
1016 const u_char
*end_of_message
= answer
->buf
+ anslen
;
1017 if (__glibc_unlikely (qdcount
!= 1))
1019 *h_errnop
= NO_RECOVERY
;
1020 return NSS_STATUS_UNAVAIL
;
1023 u_char packtmp
[NS_MAXCDNAME
];
1024 int n
= __ns_name_unpack (answer
->buf
, end_of_message
, cp
,
1025 packtmp
, sizeof packtmp
);
1026 /* We unpack the name to check it for validity. But we do not need
1028 if (n
!= -1 && __ns_name_ntop (packtmp
, buffer
, buflen
) == -1)
1030 if (__builtin_expect (errno
, 0) == EMSGSIZE
)
1034 *h_errnop
= NETDB_INTERNAL
;
1035 return NSS_STATUS_TRYAGAIN
;
1041 if (__builtin_expect (n
< 0 || (res_hnok (buffer
) == 0
1042 && (errno
= EBADMSG
)), 0))
1045 *h_errnop
= NO_RECOVERY
;
1046 return NSS_STATUS_UNAVAIL
;
1053 char *h_name
= NULL
;
1057 return NSS_STATUS_NOTFOUND
;
1059 while (ancount
-- > 0 && cp
< end_of_message
&& had_error
== 0)
1061 n
= __ns_name_unpack (answer
->buf
, end_of_message
, cp
,
1062 packtmp
, sizeof packtmp
);
1064 (h_namelen
= __ns_name_ntop (packtmp
, buffer
, buflen
)) == -1)
1066 if (__builtin_expect (errno
, 0) == EMSGSIZE
)
1071 if (__glibc_unlikely (n
< 0 || res_hnok (buffer
) == 0))
1076 if (*firstp
&& canon
== NULL
)
1079 buffer
+= h_namelen
;
1080 buflen
-= h_namelen
;
1085 if (__glibc_unlikely (cp
+ 10 > end_of_message
))
1091 int type
= __ns_get16 (cp
);
1092 cp
+= INT16SZ
; /* type */
1093 int class = __ns_get16 (cp
);
1094 cp
+= INT16SZ
; /* class */
1095 int32_t ttl
= __ns_get32 (cp
);
1096 cp
+= INT32SZ
; /* TTL */
1097 n
= __ns_get16 (cp
);
1098 cp
+= INT16SZ
; /* len */
1106 if (type
== T_CNAME
)
1108 char tbuf
[MAXDNAME
];
1110 /* A CNAME could also have a TTL entry. */
1111 if (ttlp
!= NULL
&& ttl
< *ttlp
)
1114 n
= dn_expand (answer
->buf
, end_of_message
, cp
, tbuf
, sizeof tbuf
);
1115 if (__glibc_unlikely (n
< 0 || res_hnok (tbuf
) == 0))
1124 /* Reclaim buffer space. */
1125 if (h_name
+ h_namelen
== buffer
)
1128 buflen
+= h_namelen
;
1131 n
= strlen (tbuf
) + 1;
1132 if (__glibc_unlikely (n
> buflen
))
1134 if (__glibc_unlikely (n
>= MAXHOSTNAMELEN
))
1141 buffer
= __mempcpy (buffer
, tbuf
, n
);
1148 // We should not see any types other than those explicitly listed
1149 // below. Some types sent by server seem missing, though. Just
1150 // collect the data for now.
1151 if (__glibc_unlikely (type
!= T_A
&& type
!= T_AAAA
))
1153 if (__builtin_expect (type
== T_SIG
, 0)
1154 || __builtin_expect (type
== T_KEY
, 0)
1155 || __builtin_expect (type
== T_NXT
, 0)
1156 || __builtin_expect (type
== T_PTR
, 0)
1157 || __builtin_expect (type
== T_DNAME
, 0))
1160 /* We don't support DNSSEC yet. For now, ignore the record
1161 and send a low priority message to syslog.
1163 We also don't expect T_PTR or T_DNAME messages. */
1164 syslog (LOG_DEBUG
| LOG_AUTH
,
1165 "getaddrinfo*.gaih_getanswer: got type \"%s\"",
1170 if (type
!= T_A
&& type
!= T_AAAA
)
1175 uintptr_t pad
= (-(uintptr_t) buffer
1176 % __alignof__ (struct gaih_addrtuple
));
1178 buflen
= buflen
> pad
? buflen
- pad
: 0;
1180 if (__builtin_expect (buflen
< sizeof (struct gaih_addrtuple
),
1184 *pat
= (struct gaih_addrtuple
*) buffer
;
1185 buffer
+= sizeof (struct gaih_addrtuple
);
1186 buflen
-= sizeof (struct gaih_addrtuple
);
1189 (*pat
)->name
= NULL
;
1190 (*pat
)->next
= NULL
;
1194 /* We compose a single hostent out of the entire chain of
1195 entries, so the TTL of the hostent is essentially the lowest
1196 TTL in the chain. */
1197 if (ttlp
!= NULL
&& ttl
< *ttlp
)
1200 (*pat
)->name
= canon
?: h_name
;
1205 (*pat
)->family
= type
== T_A
? AF_INET
: AF_INET6
;
1206 if (__builtin_expect ((type
== T_A
&& n
!= INADDRSZ
)
1207 || (type
== T_AAAA
&& n
!= IN6ADDRSZ
), 0))
1212 memcpy ((*pat
)->addr
, cp
, n
);
1214 (*pat
)->scopeid
= 0;
1216 pat
= &((*pat
)->next
);
1227 *h_errnop
= NETDB_SUCCESS
;
1228 return NSS_STATUS_SUCCESS
;
1231 /* Special case here: if the resolver sent a result but it only
1232 contains a CNAME while we are looking for a T_A or T_AAAA record,
1233 we fail with NOTFOUND instead of TRYAGAIN. */
1234 return canon
== NULL
? NSS_STATUS_TRYAGAIN
: NSS_STATUS_NOTFOUND
;
1238 static enum nss_status
1239 gaih_getanswer (const querybuf
*answer1
, int anslen1
, const querybuf
*answer2
,
1240 int anslen2
, const char *qname
,
1241 struct gaih_addrtuple
**pat
, char *buffer
, size_t buflen
,
1242 int *errnop
, int *h_errnop
, int32_t *ttlp
)
1246 enum nss_status status
= NSS_STATUS_NOTFOUND
;
1249 status
= gaih_getanswer_slice(answer1
, anslen1
, qname
,
1250 &pat
, &buffer
, &buflen
,
1251 errnop
, h_errnop
, ttlp
,
1253 if ((status
== NSS_STATUS_SUCCESS
|| status
== NSS_STATUS_NOTFOUND
1254 || (status
== NSS_STATUS_TRYAGAIN
1255 /* We want to look at the second answer in case of an
1256 NSS_STATUS_TRYAGAIN only if the error is non-recoverable, i.e.
1257 *h_errnop is NO_RECOVERY. If not, and if the failure was due to
1258 an insufficient buffer (ERANGE), then we need to drop the results
1259 and pass on the NSS_STATUS_TRYAGAIN to the caller so that it can
1260 repeat the query with a larger buffer. */
1261 && (*errnop
!= ERANGE
|| *h_errnop
== NO_RECOVERY
)))
1262 && answer2
!= NULL
&& anslen2
> 0)
1264 enum nss_status status2
= gaih_getanswer_slice(answer2
, anslen2
, qname
,
1265 &pat
, &buffer
, &buflen
,
1266 errnop
, h_errnop
, ttlp
,
1268 if (status
!= NSS_STATUS_SUCCESS
&& status2
!= NSS_STATUS_NOTFOUND
)