• Home
  • Line#
  • Scopes#
  • Navigate#
  • Raw
  • Download
1 /*	$NetBSD: gethnamaddr.c,v 1.70 2006/03/22 00:03:51 christos Exp $	*/
2 
3 /*
4  * ++Copyright++ 1985, 1988, 1993
5  * -
6  * Copyright (c) 1985, 1988, 1993
7  *    The Regents of the University of California.  All rights reserved.
8  *
9  * Redistribution and use in source and binary forms, with or without
10  * modification, are permitted provided that the following conditions
11  * are met:
12  * 1. Redistributions of source code must retain the above copyright
13  *    notice, this list of conditions and the following disclaimer.
14  * 2. Redistributions in binary form must reproduce the above copyright
15  *    notice, this list of conditions and the following disclaimer in the
16  *    documentation and/or other materials provided with the distribution.
17  * 3. Neither the name of the University nor the names of its contributors
18  *    may be used to endorse or promote products derived from this software
19  *    without specific prior written permission.
20  *
21  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
22  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
25  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31  * SUCH DAMAGE.
32  * -
33  * Portions Copyright (c) 1993 by Digital Equipment Corporation.
34  *
35  * Permission to use, copy, modify, and distribute this software for any
36  * purpose with or without fee is hereby granted, provided that the above
37  * copyright notice and this permission notice appear in all copies, and that
38  * the name of Digital Equipment Corporation not be used in advertising or
39  * publicity pertaining to distribution of the document or software without
40  * specific, written prior permission.
41  *
42  * THE SOFTWARE IS PROVIDED "AS IS" AND DIGITAL EQUIPMENT CORP. DISCLAIMS ALL
43  * WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES
44  * OF MERCHANTABILITY AND FITNESS.   IN NO EVENT SHALL DIGITAL EQUIPMENT
45  * CORPORATION BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL
46  * DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR
47  * PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS
48  * ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
49  * SOFTWARE.
50  * -
51  * --Copyright--
52  */
53 
54 #include <sys/cdefs.h>
55 #include <sys/types.h>
56 
57 #include <sys/param.h>
58 #include <sys/socket.h>
59 #include <sys/un.h>
60 #include <netinet/in.h>
61 #include <arpa/inet.h>
62 #include "arpa_nameser.h"
63 #include "resolv_private.h"
64 #include "resolv_cache.h"
65 #include <assert.h>
66 #include <ctype.h>
67 #include <errno.h>
68 #include <netdb.h>
69 #include <stdarg.h>
70 #include <stdio.h>
71 #include <strings.h>
72 #include <syslog.h>
73 #include <unistd.h>
74 
75 #ifndef LOG_AUTH
76 # define LOG_AUTH 0
77 #endif
78 
79 #define MULTI_PTRS_ARE_ALIASES 1	/* XXX - experimental */
80 
81 #include "nsswitch.h"
82 #include <stdlib.h>
83 #include <string.h>
84 
85 // This should be synchronized to ResponseCode.h
86 static const int DnsProxyQueryResult = 222;
87 
88 static const char const AskedForGot[] =
89 			  "gethostby*.getanswer: asked for \"%s\", got \"%s\"";
90 
91 #define	MAXPACKET	(64*1024)
92 
93 typedef union {
94     HEADER hdr;
95     u_char buf[MAXPACKET];
96 } querybuf;
97 
98 typedef union {
99     int32_t al;
100     char ac;
101 } align;
102 
103 #ifdef DEBUG
104 static void dprintf(const char *, res_state, ...)
105 	__attribute__((__format__(__printf__, 1, 3)));
106 #endif
107 static struct hostent *getanswer(const querybuf *, int, const char *, int,
108     res_state);
109 static void map_v4v6_address(const char *, char *);
110 static void map_v4v6_hostent(struct hostent *, char **, char *);
111 static void addrsort(char **, int, res_state);
112 
113 static void _sethtent(int);
114 static void _endhtent(void);
115 static struct hostent *_gethtent(void);
116 void ht_sethostent(int);
117 void ht_endhostent(void);
118 struct hostent *ht_gethostbyname(char *);
119 struct hostent *ht_gethostbyaddr(const char *, int, int);
120 void dns_service(void);
121 #undef dn_skipname
122 int dn_skipname(const u_char *, const u_char *);
123 static int _gethtbyaddr(void *, void *, va_list);
124 static int _gethtbyname(void *, void *, va_list);
125 static struct hostent *_gethtbyname2(const char *, int);
126 static int _dns_gethtbyaddr(void *, void *, va_list);
127 static int _dns_gethtbyname(void *, void *, va_list);
128 
129 static struct hostent *gethostbyname_internal(const char *, int, res_state, const char *, int);
130 
131 static const ns_src default_dns_files[] = {
132 	{ NSSRC_FILES, 	NS_SUCCESS },
133 	{ NSSRC_DNS, 	NS_SUCCESS },
134 	{ 0, 0 }
135 };
136 
137 
138 #ifdef DEBUG
139 static void
dprintf(const char * msg,res_state res,...)140 dprintf(const char *msg, res_state res, ...)
141 {
142 	assert(msg != NULL);
143 
144 	if (res->options & RES_DEBUG) {
145 		int save = errno;
146 		va_list ap;
147 
148 		va_start (ap, res);
149 		vprintf(msg, ap);
150 		va_end (ap);
151 
152 		errno = save;
153 	}
154 }
155 #else
156 # define dprintf(msg, res, num) ((void)0) /*nada*/
157 #endif
158 
159 #define BOUNDED_INCR(x) \
160 	do { \
161 		cp += (x); \
162 		if (cp > eom) { \
163 			h_errno = NO_RECOVERY; \
164 			return NULL; \
165 		} \
166 	} while (/*CONSTCOND*/0)
167 
168 #define BOUNDS_CHECK(ptr, count) \
169 	do { \
170 		if ((ptr) + (count) > eom) { \
171 			h_errno = NO_RECOVERY; \
172 			return NULL; \
173 		} \
174 	} while (/*CONSTCOND*/0)
175 
176 static struct hostent *
getanswer(const querybuf * answer,int anslen,const char * qname,int qtype,res_state res)177 getanswer(const querybuf *answer, int anslen, const char *qname, int qtype,
178     res_state res)
179 {
180 	const HEADER *hp;
181 	const u_char *cp;
182 	int n;
183 	const u_char *eom, *erdata;
184 	char *bp, **ap, **hap, *ep;
185 	int type, class, ancount, qdcount;
186 	int haveanswer, had_error;
187 	int toobig = 0;
188 	char tbuf[MAXDNAME];
189 	const char *tname;
190 	int (*name_ok)(const char *);
191 	res_static  rs = __res_get_static();
192 
193 	assert(answer != NULL);
194 	assert(qname != NULL);
195 
196 	tname = qname;
197 	rs->host.h_name = NULL;
198 	eom = answer->buf + anslen;
199 	switch (qtype) {
200 	case T_A:
201 	case T_AAAA:
202 		name_ok = res_hnok;
203 		break;
204 	case T_PTR:
205 		name_ok = res_dnok;
206 		break;
207 	default:
208 		return NULL;	/* XXX should be abort(); */
209 	}
210 	/*
211 	 * find first satisfactory answer
212 	 */
213 	hp = &answer->hdr;
214 	ancount = ntohs(hp->ancount);
215 	qdcount = ntohs(hp->qdcount);
216 	bp = rs->hostbuf;
217 	ep = rs->hostbuf + sizeof rs->hostbuf;
218 	cp = answer->buf;
219 	BOUNDED_INCR(HFIXEDSZ);
220 	if (qdcount != 1) {
221 		h_errno = NO_RECOVERY;
222 		return NULL;
223 	}
224 	n = dn_expand(answer->buf, eom, cp, bp, ep - bp);
225 	if ((n < 0) || !(*name_ok)(bp)) {
226 		h_errno = NO_RECOVERY;
227 		return NULL;
228 	}
229 	BOUNDED_INCR(n + QFIXEDSZ);
230 	if (qtype == T_A || qtype == T_AAAA) {
231 		/* res_send() has already verified that the query name is the
232 		 * same as the one we sent; this just gets the expanded name
233 		 * (i.e., with the succeeding search-domain tacked on).
234 		 */
235 		n = strlen(bp) + 1;		/* for the \0 */
236 		if (n >= MAXHOSTNAMELEN) {
237 			h_errno = NO_RECOVERY;
238 			return NULL;
239 		}
240 		rs->host.h_name = bp;
241 		bp += n;
242 		/* The qname can be abbreviated, but h_name is now absolute. */
243 		qname = rs->host.h_name;
244 	}
245 	ap = rs->host_aliases;
246 	*ap = NULL;
247 	rs->host.h_aliases = rs->host_aliases;
248 	hap = rs->h_addr_ptrs;
249 	*hap = NULL;
250 	rs->host.h_addr_list = rs->h_addr_ptrs;
251 	haveanswer = 0;
252 	had_error = 0;
253 	while (ancount-- > 0 && cp < eom && !had_error) {
254 		n = dn_expand(answer->buf, eom, cp, bp, ep - bp);
255 		if ((n < 0) || !(*name_ok)(bp)) {
256 			had_error++;
257 			continue;
258 		}
259 		cp += n;			/* name */
260 		BOUNDS_CHECK(cp, 3 * INT16SZ + INT32SZ);
261 		type = _getshort(cp);
262  		cp += INT16SZ;			/* type */
263 		class = _getshort(cp);
264  		cp += INT16SZ + INT32SZ;	/* class, TTL */
265 		n = _getshort(cp);
266 		cp += INT16SZ;			/* len */
267 		BOUNDS_CHECK(cp, n);
268 		erdata = cp + n;
269 		if (class != C_IN) {
270 			/* XXX - debug? syslog? */
271 			cp += n;
272 			continue;		/* XXX - had_error++ ? */
273 		}
274 		if ((qtype == T_A || qtype == T_AAAA) && type == T_CNAME) {
275 			if (ap >= &rs->host_aliases[MAXALIASES-1])
276 				continue;
277 			n = dn_expand(answer->buf, eom, cp, tbuf, sizeof tbuf);
278 			if ((n < 0) || !(*name_ok)(tbuf)) {
279 				had_error++;
280 				continue;
281 			}
282 			cp += n;
283 			if (cp != erdata) {
284 				h_errno = NO_RECOVERY;
285 				return NULL;
286 			}
287 			/* Store alias. */
288 			*ap++ = bp;
289 			n = strlen(bp) + 1;	/* for the \0 */
290 			if (n >= MAXHOSTNAMELEN) {
291 				had_error++;
292 				continue;
293 			}
294 			bp += n;
295 			/* Get canonical name. */
296 			n = strlen(tbuf) + 1;	/* for the \0 */
297 			if (n > ep - bp || n >= MAXHOSTNAMELEN) {
298 				had_error++;
299 				continue;
300 			}
301 			strlcpy(bp, tbuf, (size_t)(ep - bp));
302 			rs->host.h_name = bp;
303 			bp += n;
304 			continue;
305 		}
306 		if (qtype == T_PTR && type == T_CNAME) {
307 			n = dn_expand(answer->buf, eom, cp, tbuf, sizeof tbuf);
308 			if (n < 0 || !res_dnok(tbuf)) {
309 				had_error++;
310 				continue;
311 			}
312 			cp += n;
313 			if (cp != erdata) {
314 				h_errno = NO_RECOVERY;
315 				return NULL;
316 			}
317 			/* Get canonical name. */
318 			n = strlen(tbuf) + 1;	/* for the \0 */
319 			if (n > ep - bp || n >= MAXHOSTNAMELEN) {
320 				had_error++;
321 				continue;
322 			}
323 			strlcpy(bp, tbuf, (size_t)(ep - bp));
324 			tname = bp;
325 			bp += n;
326 			continue;
327 		}
328 		if (type != qtype) {
329 			if (type != T_KEY && type != T_SIG)
330 				syslog(LOG_NOTICE|LOG_AUTH,
331 	       "gethostby*.getanswer: asked for \"%s %s %s\", got type \"%s\"",
332 				       qname, p_class(C_IN), p_type(qtype),
333 				       p_type(type));
334 			cp += n;
335 			continue;		/* XXX - had_error++ ? */
336 		}
337 		switch (type) {
338 		case T_PTR:
339 			if (strcasecmp(tname, bp) != 0) {
340 				syslog(LOG_NOTICE|LOG_AUTH,
341 				       AskedForGot, qname, bp);
342 				cp += n;
343 				continue;	/* XXX - had_error++ ? */
344 			}
345 			n = dn_expand(answer->buf, eom, cp, bp, ep - bp);
346 			if ((n < 0) || !res_hnok(bp)) {
347 				had_error++;
348 				break;
349 			}
350 #if MULTI_PTRS_ARE_ALIASES
351 			cp += n;
352 			if (cp != erdata) {
353 				h_errno = NO_RECOVERY;
354 				return NULL;
355 			}
356 			if (!haveanswer)
357 				rs->host.h_name = bp;
358 			else if (ap < &rs->host_aliases[MAXALIASES-1])
359 				*ap++ = bp;
360 			else
361 				n = -1;
362 			if (n != -1) {
363 				n = strlen(bp) + 1;	/* for the \0 */
364 				if (n >= MAXHOSTNAMELEN) {
365 					had_error++;
366 					break;
367 				}
368 				bp += n;
369 			}
370 			break;
371 #else
372 			rs->host.h_name = bp;
373 			if (res->options & RES_USE_INET6) {
374 				n = strlen(bp) + 1;	/* for the \0 */
375 				if (n >= MAXHOSTNAMELEN) {
376 					had_error++;
377 					break;
378 				}
379 				bp += n;
380 				map_v4v6_hostent(&rs->host, &bp, ep);
381 			}
382 			h_errno = NETDB_SUCCESS;
383 			return &rs->host;
384 #endif
385 		case T_A:
386 		case T_AAAA:
387 			if (strcasecmp(rs->host.h_name, bp) != 0) {
388 				syslog(LOG_NOTICE|LOG_AUTH,
389 				       AskedForGot, rs->host.h_name, bp);
390 				cp += n;
391 				continue;	/* XXX - had_error++ ? */
392 			}
393 			if (n != rs->host.h_length) {
394 				cp += n;
395 				continue;
396 			}
397 			if (type == T_AAAA) {
398 				struct in6_addr in6;
399 				memcpy(&in6, cp, IN6ADDRSZ);
400 				if (IN6_IS_ADDR_V4MAPPED(&in6)) {
401 					cp += n;
402 					continue;
403 				}
404 			}
405 			if (!haveanswer) {
406 				int nn;
407 
408 				rs->host.h_name = bp;
409 				nn = strlen(bp) + 1;	/* for the \0 */
410 				bp += nn;
411 			}
412 
413 			bp += sizeof(align) -
414 			    (size_t)((u_long)bp % sizeof(align));
415 
416 			if (bp + n >= &rs->hostbuf[sizeof rs->hostbuf]) {
417 				dprintf("size (%d) too big\n", res, n);
418 				had_error++;
419 				continue;
420 			}
421 			if (hap >= &rs->h_addr_ptrs[MAXADDRS-1]) {
422 				if (!toobig++)
423 					dprintf("Too many addresses (%d)\n",
424 						res, MAXADDRS);
425 				cp += n;
426 				continue;
427 			}
428 			(void)memcpy(*hap++ = bp, cp, (size_t)n);
429 			bp += n;
430 			cp += n;
431 			if (cp != erdata) {
432 				h_errno = NO_RECOVERY;
433 				return NULL;
434 			}
435 			break;
436 		default:
437 			abort();
438 		}
439 		if (!had_error)
440 			haveanswer++;
441 	}
442 	if (haveanswer) {
443 		*ap = NULL;
444 		*hap = NULL;
445 		/*
446 		 * Note: we sort even if host can take only one address
447 		 * in its return structures - should give it the "best"
448 		 * address in that case, not some random one
449 		 */
450 		if (res->nsort && haveanswer > 1 && qtype == T_A)
451 			addrsort(rs->h_addr_ptrs, haveanswer, res);
452 		if (!rs->host.h_name) {
453 			n = strlen(qname) + 1;	/* for the \0 */
454 			if (n > ep - bp || n >= MAXHOSTNAMELEN)
455 				goto no_recovery;
456 			strlcpy(bp, qname, (size_t)(ep - bp));
457 			rs->host.h_name = bp;
458 			bp += n;
459 		}
460 		if (res->options & RES_USE_INET6)
461 			map_v4v6_hostent(&rs->host, &bp, ep);
462 		h_errno = NETDB_SUCCESS;
463 		return &rs->host;
464 	}
465  no_recovery:
466 	h_errno = NO_RECOVERY;
467 	return NULL;
468 }
469 
470 int
gethostbyname_r(const char * name,struct hostent * hp,char * buf,size_t buflen,struct hostent ** result,int * errorp)471 gethostbyname_r(const char *name, struct hostent *hp, char *buf, size_t buflen,
472     struct hostent**result, int *errorp)
473 {
474         struct hostent *res;
475 
476         res = gethostbyname(name);
477         *errorp = h_errno;
478         if (res == NULL) {
479                 *result = NULL;
480                 return -1;
481         }
482         memcpy(hp, res, sizeof *hp);
483         *result = hp;
484         return 0;
485 }
486 
487 struct hostent *
gethostbyname(const char * name)488 gethostbyname(const char *name)
489 {
490 	struct hostent *hp;
491 	res_state res = __res_get_state();
492 
493 	if (res == NULL)
494 		return NULL;
495 
496 	assert(name != NULL);
497 
498 	/* try IPv6 first - if that fails do IPv4 */
499 	if (res->options & RES_USE_INET6) {
500 		hp = gethostbyname_internal(name, AF_INET6, res, NULL, 0);
501 		if (hp) {
502 			__res_put_state(res);
503 			return hp;
504 		}
505 	}
506 	hp = gethostbyname_internal(name, AF_INET, res, NULL, 0);
507 	__res_put_state(res);
508 	return hp;
509 }
510 
511 struct hostent *
gethostbyname2(const char * name,int af)512 gethostbyname2(const char *name, int af)
513 {
514 	return android_gethostbynameforiface(name, af, NULL, 0);
515 }
516 
517 struct hostent *
android_gethostbynameforiface(const char * name,int af,const char * iface,int mark)518 android_gethostbynameforiface(const char *name, int af, const char *iface, int mark)
519 {
520 	struct hostent *hp;
521 	res_state res = __res_get_state();
522 
523 	if (res == NULL)
524 		return NULL;
525 	hp = gethostbyname_internal(name, af, res, iface, mark);
526 	__res_put_state(res);
527 	return hp;
528 }
529 
530 
android_open_proxy()531 static FILE* android_open_proxy()
532 {
533 	int sock;
534 	const int one = 1;
535 	struct sockaddr_un proxy_addr;
536 
537 	sock = socket(AF_UNIX, SOCK_STREAM, 0);
538 	if (sock < 0) {
539 		return NULL;
540 	}
541 
542 	setsockopt(sock, SOL_SOCKET, SO_REUSEADDR, &one, sizeof(one));
543 	memset(&proxy_addr, 0, sizeof(proxy_addr));
544 	proxy_addr.sun_family = AF_UNIX;
545 	strlcpy(proxy_addr.sun_path, "/dev/socket/dnsproxyd", sizeof(proxy_addr.sun_path));
546 	if (TEMP_FAILURE_RETRY(connect(sock,
547 			(const struct sockaddr*) &proxy_addr,
548 			sizeof(proxy_addr))) != 0) {
549 		close(sock);
550 		return NULL;
551 	}
552 
553 	return fdopen(sock, "r+");
554 }
555 
556 static struct hostent *
android_read_hostent(FILE * proxy)557 android_read_hostent(FILE* proxy)
558 {
559 	uint32_t size;
560 	char buf[4];
561 	if (fread(buf, 1, sizeof(buf), proxy) != sizeof(buf)) return NULL;
562 
563 	/* This is reading serialized data from system/netd/DnsProxyListener.cpp
564 	 * and changes here need to be matched there */
565 	int result_code = strtol(buf, NULL, 10);
566 	if (result_code != DnsProxyQueryResult) {
567 		fread(&size, 1, sizeof(size), proxy);
568 		return NULL;
569 	}
570 
571 	if (fread(&size, 1, sizeof(size), proxy) != sizeof(size)) return NULL;
572 	size = ntohl(size);
573 	res_static rs = __res_get_static();
574 	memset(&rs->host, 0, sizeof(rs->host));
575 	char *ptr = rs->hostbuf;
576 
577 	if (fread(ptr, 1, size, proxy) != size) return NULL;
578 	ptr += size;
579 	rs->host.h_name = rs->hostbuf;
580 
581 	char **aliases = rs->host_aliases;
582 	rs->host.h_aliases = rs->host_aliases;
583 	while (1) {
584 		if (fread(&size, 1, sizeof(size), proxy) != sizeof(size)) return NULL;
585 		size = ntohl(size);
586 
587 		if (size == 0) {
588 			*aliases = NULL;
589 			break;
590 		}
591 		if (fread(ptr, 1, size, proxy) != size) return NULL;
592 		*aliases++ = ptr;
593 		ptr += size;
594 	}
595 
596 	if (fread(&size, 1, sizeof(size), proxy) != sizeof(size)) return NULL;
597 	rs->host.h_addrtype = ntohl(size);
598 
599 	if (fread(&size, 1, sizeof(size), proxy) != sizeof(size)) return NULL;
600 	rs->host.h_length = ntohl(size);
601 
602 	char **addrs = rs->h_addr_ptrs;
603 	rs->host.h_addr_list = rs->h_addr_ptrs;
604 	while (1) {
605 		if (fread(&size, 1, sizeof(size), proxy) != sizeof(size)) return NULL;
606 		size = ntohl(size);
607 		if (size == 0) {
608 			*addrs = NULL;
609 			break;
610 		}
611 		if (fread(ptr, 1, size, proxy) != size) return NULL;
612 		*addrs++ = ptr;
613 		ptr += size;
614 	}
615 
616 	return &rs->host;
617 }
618 
619 
620 static struct hostent *
gethostbyname_internal_real(const char * name,int af,res_state res)621 gethostbyname_internal_real(const char *name, int af, res_state res)
622 {
623 	const char *cp;
624 	char *bp, *ep;
625 	int size;
626 	struct hostent *hp;
627 	res_static rs = __res_get_static();
628 
629 	static const ns_dtab dtab[] = {
630 		NS_FILES_CB(_gethtbyname, NULL)
631 		{ NSSRC_DNS, _dns_gethtbyname, NULL },	/* force -DHESIOD */
632 		{ 0, 0, 0 }
633 	};
634 
635 	assert(name != NULL);
636 
637 	switch (af) {
638 	case AF_INET:
639 		size = INADDRSZ;
640 		break;
641 	case AF_INET6:
642 		size = IN6ADDRSZ;
643 		break;
644 	default:
645 		h_errno = NETDB_INTERNAL;
646 		errno = EAFNOSUPPORT;
647 		return NULL;
648 	}
649 
650 	rs->host.h_addrtype = af;
651 	rs->host.h_length = size;
652 
653 	/*
654 	 * if there aren't any dots, it could be a user-level alias.
655 	 * this is also done in res_nquery() since we are not the only
656 	 * function that looks up host names.
657 	 */
658 	if (!strchr(name, '.') && (cp = __hostalias(name)))
659 		name = cp;
660 
661 	/*
662 	 * disallow names consisting only of digits/dots, unless
663 	 * they end in a dot.
664 	 */
665 	if (isdigit((u_char) name[0]))
666 		for (cp = name;; ++cp) {
667 			if (!*cp) {
668 				if (*--cp == '.')
669 					break;
670 				/*
671 				 * All-numeric, no dot at the end.
672 				 * Fake up a hostent as if we'd actually
673 				 * done a lookup.
674 				 */
675 				if (inet_pton(af, name,
676 				    (char *)(void *)rs->host_addr) <= 0) {
677 					h_errno = HOST_NOT_FOUND;
678 					return NULL;
679 				}
680 				strncpy(rs->hostbuf, name, MAXDNAME);
681 				rs->hostbuf[MAXDNAME] = '\0';
682 				bp = rs->hostbuf + MAXDNAME;
683 				ep = rs->hostbuf + sizeof rs->hostbuf;
684 				rs->host.h_name = rs->hostbuf;
685 				rs->host.h_aliases = rs->host_aliases;
686 				rs->host_aliases[0] = NULL;
687 				rs->h_addr_ptrs[0] = (char *)(void *)rs->host_addr;
688 				rs->h_addr_ptrs[1] = NULL;
689 				rs->host.h_addr_list = rs->h_addr_ptrs;
690 				if (res->options & RES_USE_INET6)
691 					map_v4v6_hostent(&rs->host, &bp, ep);
692 				h_errno = NETDB_SUCCESS;
693 				return &rs->host;
694 			}
695 			if (!isdigit((u_char) *cp) && *cp != '.')
696 				break;
697 		}
698 	if ((isxdigit((u_char) name[0]) && strchr(name, ':') != NULL) ||
699 	    name[0] == ':')
700 		for (cp = name;; ++cp) {
701 			if (!*cp) {
702 				if (*--cp == '.')
703 					break;
704 				/*
705 				 * All-IPv6-legal, no dot at the end.
706 				 * Fake up a hostent as if we'd actually
707 				 * done a lookup.
708 				 */
709 				if (inet_pton(af, name,
710 				    (char *)(void *)rs->host_addr) <= 0) {
711 					h_errno = HOST_NOT_FOUND;
712 					return NULL;
713 				}
714 				strncpy(rs->hostbuf, name, MAXDNAME);
715 				rs->hostbuf[MAXDNAME] = '\0';
716 				bp = rs->hostbuf + MAXDNAME;
717 				ep = rs->hostbuf + sizeof rs->hostbuf;
718 				rs->host.h_name = rs->hostbuf;
719 				rs->host.h_aliases = rs->host_aliases;
720 				rs->host_aliases[0] = NULL;
721 				rs->h_addr_ptrs[0] = (char *)(void *)rs->host_addr;
722 				rs->h_addr_ptrs[1] = NULL;
723 				rs->host.h_addr_list = rs->h_addr_ptrs;
724 				h_errno = NETDB_SUCCESS;
725 				return &rs->host;
726 			}
727 			if (!isxdigit((u_char) *cp) && *cp != ':' && *cp != '.')
728 				break;
729 		}
730 
731 	hp = NULL;
732 	h_errno = NETDB_INTERNAL;
733 	if (nsdispatch(&hp, dtab, NSDB_HOSTS, "gethostbyname",
734 	    default_dns_files, name, strlen(name), af) != NS_SUCCESS) {
735 		return NULL;
736 	}
737 	h_errno = NETDB_SUCCESS;
738 	return hp;
739 }
740 
741 
742 // very similar in proxy-ness to android_getaddrinfo_proxy
743 static struct hostent *
gethostbyname_internal(const char * name,int af,res_state res,const char * iface,int mark)744 gethostbyname_internal(const char *name, int af, res_state res, const char *iface, int mark)
745 {
746 	const char *cache_mode = getenv("ANDROID_DNS_MODE");
747 	FILE* proxy = NULL;
748 	struct hostent *result = NULL;
749 
750 	if (cache_mode != NULL && strcmp(cache_mode, "local") == 0) {
751 		res_setiface(res, iface);
752 		res_setmark(res, mark);
753 		return gethostbyname_internal_real(name, af, res);
754 	}
755 
756 	proxy = android_open_proxy();
757 	if (proxy == NULL) goto exit;
758 
759 	/* This is writing to system/netd/DnsProxyListener.cpp and changes
760 	 * here need to be matched there */
761 	if (fprintf(proxy, "gethostbyname %s %s %d",
762 			iface == NULL ? "^" : iface,
763 			name == NULL ? "^" : name,
764 			af) < 0) {
765 		goto exit;
766 	}
767 
768 	if (fputc(0, proxy) == EOF || fflush(proxy) != 0) {
769 		goto exit;
770 	}
771 
772 	result = android_read_hostent(proxy);
773 
774 exit:
775 	if (proxy != NULL) {
776 		fclose(proxy);
777 	}
778 	return result;
779 }
780 
781 
782 struct hostent *
android_gethostbyaddrforiface_proxy(const void * addr,socklen_t len,int af,const char * iface,int mark)783 android_gethostbyaddrforiface_proxy(const void *addr,
784     socklen_t len, int af, const char* iface, int mark)
785 {
786 	struct hostent *result = NULL;
787 	FILE* proxy = android_open_proxy();
788 
789 	if (proxy == NULL) goto exit;
790 
791 	char buf[INET6_ADDRSTRLEN];  //big enough for IPv4 and IPv6
792 	const char * addrStr = inet_ntop(af, addr, buf, sizeof(buf));
793 	if (addrStr == NULL) goto exit;
794 
795 	if (fprintf(proxy, "gethostbyaddr %s %d %d %s",
796 			addrStr, len, af, iface == NULL ? "^" : iface) < 0) {
797 		goto exit;
798 	}
799 
800 	if (fputc(0, proxy) == EOF || fflush(proxy) != 0) {
801 		goto exit;
802 	}
803 
804 	result = android_read_hostent(proxy);
805 exit:
806 	if (proxy != NULL) {
807 		fclose(proxy);
808 	}
809 	return result;
810 }
811 
812 struct hostent *
android_gethostbyaddrforiface_real(const void * addr,socklen_t len,int af,const char * iface,int mark)813 android_gethostbyaddrforiface_real(const void *addr,
814     socklen_t len, int af, const char* iface, int mark)
815 {
816 	const u_char *uaddr = (const u_char *)addr;
817 	socklen_t size;
818 	struct hostent *hp;
819 	static const ns_dtab dtab[] = {
820 		NS_FILES_CB(_gethtbyaddr, NULL)
821 		{ NSSRC_DNS, _dns_gethtbyaddr, NULL },	/* force -DHESIOD */
822 		{ 0, 0, 0 }
823 	};
824 
825 	assert(addr != NULL);
826 
827 	if (af == AF_INET6 && len == IN6ADDRSZ &&
828 	    (IN6_IS_ADDR_LINKLOCAL((const struct in6_addr *)(const void *)uaddr) ||
829 	     IN6_IS_ADDR_SITELOCAL((const struct in6_addr *)(const void *)uaddr))) {
830 		h_errno = HOST_NOT_FOUND;
831 		return NULL;
832 	}
833 	if (af == AF_INET6 && len == IN6ADDRSZ &&
834 	    (IN6_IS_ADDR_V4MAPPED((const struct in6_addr *)(const void *)uaddr) ||
835 	     IN6_IS_ADDR_V4COMPAT((const struct in6_addr *)(const void *)uaddr))) {
836 		/* Unmap. */
837 		addr += IN6ADDRSZ - INADDRSZ;
838 		uaddr += IN6ADDRSZ - INADDRSZ;
839 		af = AF_INET;
840 		len = INADDRSZ;
841 	}
842 	switch (af) {
843 	case AF_INET:
844 		size = INADDRSZ;
845 		break;
846 	case AF_INET6:
847 		size = IN6ADDRSZ;
848 		break;
849 	default:
850 		errno = EAFNOSUPPORT;
851 		h_errno = NETDB_INTERNAL;
852 		return NULL;
853 	}
854 	if (size != len) {
855 		errno = EINVAL;
856 		h_errno = NETDB_INTERNAL;
857 		return NULL;
858 	}
859 	hp = NULL;
860 	h_errno = NETDB_INTERNAL;
861 	if (nsdispatch(&hp, dtab, NSDB_HOSTS, "gethostbyaddr",
862 		default_dns_files, uaddr, len, af, iface, mark) != NS_SUCCESS)
863 		return NULL;
864 	h_errno = NETDB_SUCCESS;
865 	return hp;
866 }
867 
868 struct hostent *
android_gethostbyaddrforiface(const void * addr,socklen_t len,int af,const char * iface,int mark)869 android_gethostbyaddrforiface(const void *addr, socklen_t len, int af, const char* iface, int mark)
870 {
871 	const char *cache_mode = getenv("ANDROID_DNS_MODE");
872 
873 	if (cache_mode == NULL || strcmp(cache_mode, "local") != 0) {
874 		return android_gethostbyaddrforiface_proxy(addr, len, af, iface, mark);
875 	} else {
876 		return android_gethostbyaddrforiface_real(addr,len, af, iface, mark);
877 	}
878 }
879 
880 struct hostent *
gethostbyaddr(const void * addr,socklen_t len,int af)881 gethostbyaddr(const void *addr, socklen_t len, int af)
882 {
883 	return android_gethostbyaddrforiface(addr, len, af, NULL, 0);
884 }
885 
886 
887 static void
_sethtent(int f)888 _sethtent(int f)
889 {
890     res_static  rs = __res_get_static();
891     if (rs == NULL) return;
892 	if (!rs->hostf)
893 		rs->hostf = fopen(_PATH_HOSTS, "r" );
894 	else
895 		rewind(rs->hostf);
896 	rs->stayopen = f;
897 }
898 
899 static void
_endhtent(void)900 _endhtent(void)
901 {
902     res_static  rs = __res_get_static();
903     if (rs == NULL) return;
904 
905 	if (rs->hostf && !rs->stayopen) {
906 		(void) fclose(rs->hostf);
907 		rs->hostf = NULL;
908 	}
909 }
910 
911 static struct hostent *
_gethtent(void)912 _gethtent(void)
913 {
914 	char *p;
915 	char *cp, **q;
916 	int af, len;
917 	res_static  rs = __res_get_static();
918 
919 	if (!rs->hostf && !(rs->hostf = fopen(_PATH_HOSTS, "r" ))) {
920 		h_errno = NETDB_INTERNAL;
921 		return NULL;
922 	}
923  again:
924 	if (!(p = fgets(rs->hostbuf, sizeof rs->hostbuf, rs->hostf))) {
925 		h_errno = HOST_NOT_FOUND;
926 		return NULL;
927 	}
928 	if (*p == '#')
929 		goto again;
930 	if (!(cp = strpbrk(p, "#\n")))
931 		goto again;
932 	*cp = '\0';
933 	if (!(cp = strpbrk(p, " \t")))
934 		goto again;
935 	*cp++ = '\0';
936 	if (inet_pton(AF_INET6, p, (char *)(void *)rs->host_addr) > 0) {
937 		af = AF_INET6;
938 		len = IN6ADDRSZ;
939 	} else if (inet_pton(AF_INET, p, (char *)(void *)rs->host_addr) > 0) {
940 		res_state res = __res_get_state();
941 		if (res == NULL)
942 			return NULL;
943 		if (res->options & RES_USE_INET6) {
944 			map_v4v6_address((char *)(void *)rs->host_addr,
945 			    (char *)(void *)rs->host_addr);
946 			af = AF_INET6;
947 			len = IN6ADDRSZ;
948 		} else {
949 			af = AF_INET;
950 			len = INADDRSZ;
951 		}
952 		__res_put_state(res);
953 	} else {
954 		goto again;
955 	}
956 	/* if this is not something we're looking for, skip it. */
957 	if (rs->host.h_addrtype != 0 && rs->host.h_addrtype != af)
958 		goto again;
959 	if (rs->host.h_length != 0 && rs->host.h_length != len)
960 		goto again;
961 	rs->h_addr_ptrs[0] = (char *)(void *)rs->host_addr;
962 	rs->h_addr_ptrs[1] = NULL;
963 	rs->host.h_addr_list = rs->h_addr_ptrs;
964 	rs->host.h_length = len;
965 	rs->host.h_addrtype = af;
966 	while (*cp == ' ' || *cp == '\t')
967 		cp++;
968 	rs->host.h_name = cp;
969 	q = rs->host.h_aliases = rs->host_aliases;
970 	if ((cp = strpbrk(cp, " \t")) != NULL)
971 		*cp++ = '\0';
972 	while (cp && *cp) {
973 		if (*cp == ' ' || *cp == '\t') {
974 			cp++;
975 			continue;
976 		}
977 		if (q < &rs->host_aliases[MAXALIASES - 1])
978 			*q++ = cp;
979 		if ((cp = strpbrk(cp, " \t")) != NULL)
980 			*cp++ = '\0';
981 	}
982 	*q = NULL;
983 	h_errno = NETDB_SUCCESS;
984 	return &rs->host;
985 }
986 
987 /*ARGSUSED*/
988 int
_gethtbyname(void * rv,void * cb_data,va_list ap)989 _gethtbyname(void *rv, void *cb_data, va_list ap)
990 {
991 	struct hostent *hp;
992 	const char *name;
993 	int af;
994 
995 	assert(rv != NULL);
996 
997 	name = va_arg(ap, char *);
998 	/* NOSTRICT skip len */(void)va_arg(ap, int);
999 	af = va_arg(ap, int);
1000 
1001 	hp = NULL;
1002 #if 0
1003 	{
1004 		res_state res = __res_get_state();
1005 		if (res == NULL)
1006 			return NS_NOTFOUND;
1007 		if (res->options & RES_USE_INET6)
1008 			hp = _gethtbyname2(name, AF_INET6);
1009 		if (hp==NULL)
1010 			hp = _gethtbyname2(name, AF_INET);
1011 		__res_put_state(res);
1012 	}
1013 #else
1014 	hp = _gethtbyname2(name, af);
1015 #endif
1016 	*((struct hostent **)rv) = hp;
1017 	if (hp == NULL) {
1018 		h_errno = HOST_NOT_FOUND;
1019 		return NS_NOTFOUND;
1020 	}
1021 	return NS_SUCCESS;
1022 }
1023 
1024 static struct hostent *
_gethtbyname2(const char * name,int af)1025 _gethtbyname2(const char *name, int af)
1026 {
1027 	struct hostent *p;
1028 	char *tmpbuf, *ptr, **cp;
1029 	int num;
1030 	size_t len;
1031 	res_static rs = __res_get_static();
1032 
1033 	assert(name != NULL);
1034 
1035 	_sethtent(rs->stayopen);
1036 	ptr = tmpbuf = NULL;
1037 	num = 0;
1038 	while ((p = _gethtent()) != NULL && num < MAXADDRS) {
1039 		if (p->h_addrtype != af)
1040 			continue;
1041 		if (strcasecmp(p->h_name, name) != 0) {
1042 			for (cp = p->h_aliases; *cp != NULL; cp++)
1043 				if (strcasecmp(*cp, name) == 0)
1044 					break;
1045 			if (*cp == NULL) continue;
1046 		}
1047 
1048 		if (num == 0) {
1049 			size_t bufsize;
1050 			char *src;
1051 
1052 			bufsize = strlen(p->h_name) + 2 +
1053 				  MAXADDRS * p->h_length +
1054 				  ALIGNBYTES;
1055 			for (cp = p->h_aliases; *cp != NULL; cp++)
1056 				bufsize += strlen(*cp) + 1;
1057 
1058 			if ((tmpbuf = malloc(bufsize)) == NULL) {
1059 				h_errno = NETDB_INTERNAL;
1060 				return NULL;
1061 			}
1062 
1063 			ptr = tmpbuf;
1064 			src = p->h_name;
1065 			while ((*ptr++ = *src++) != '\0');
1066 			for (cp = p->h_aliases; *cp != NULL; cp++) {
1067 				src = *cp;
1068 				while ((*ptr++ = *src++) != '\0');
1069 			}
1070 			*ptr++ = '\0';
1071 
1072 			ptr = (char *)(void *)ALIGN(ptr);
1073 		}
1074 
1075 		(void)memcpy(ptr, p->h_addr_list[0], (size_t)p->h_length);
1076 		ptr += p->h_length;
1077 		num++;
1078 	}
1079 	_endhtent();
1080 	if (num == 0) return NULL;
1081 
1082 	len = ptr - tmpbuf;
1083 	if (len > (sizeof(rs->hostbuf) - ALIGNBYTES)) {
1084 		free(tmpbuf);
1085 		errno = ENOSPC;
1086 		h_errno = NETDB_INTERNAL;
1087 		return NULL;
1088 	}
1089 	ptr = memcpy((void *)ALIGN(rs->hostbuf), tmpbuf, len);
1090 	free(tmpbuf);
1091 
1092 	rs->host.h_name = ptr;
1093 	while (*ptr++);
1094 
1095 	cp = rs->host_aliases;
1096 	while (*ptr) {
1097 		*cp++ = ptr;
1098 		while (*ptr++);
1099 	}
1100 	ptr++;
1101 	*cp = NULL;
1102 
1103 	ptr = (char *)(void *)ALIGN(ptr);
1104 	cp = rs->h_addr_ptrs;
1105 	while (num--) {
1106 		*cp++ = ptr;
1107 		ptr += rs->host.h_length;
1108 	}
1109 	*cp = NULL;
1110 
1111 	return &rs->host;
1112 }
1113 
1114 /*ARGSUSED*/
1115 static int
_gethtbyaddr(void * rv,void * cb_data,va_list ap)1116 _gethtbyaddr(void *rv, void *cb_data, va_list ap)
1117 {
1118 	struct hostent *p;
1119 	const unsigned char *addr;
1120 	int len, af;
1121 	res_static  rs = __res_get_static();
1122 
1123 	assert(rv != NULL);
1124 
1125 	addr = va_arg(ap, unsigned char *);
1126 	len = va_arg(ap, int);
1127 	af = va_arg(ap, int);
1128 
1129 	rs->host.h_length = len;
1130 	rs->host.h_addrtype = af;
1131 
1132 	_sethtent(rs->stayopen);
1133 	while ((p = _gethtent()) != NULL)
1134 		if (p->h_addrtype == af && !memcmp(p->h_addr, addr,
1135 		    (size_t)len))
1136 			break;
1137 	_endhtent();
1138 	*((struct hostent **)rv) = p;
1139 	if (p==NULL) {
1140 		h_errno = HOST_NOT_FOUND;
1141 		return NS_NOTFOUND;
1142 	}
1143 	return NS_SUCCESS;
1144 }
1145 
1146 static void
map_v4v6_address(const char * src,char * dst)1147 map_v4v6_address(const char *src, char *dst)
1148 {
1149 	u_char *p = (u_char *)dst;
1150 	char tmp[INADDRSZ];
1151 	int i;
1152 
1153 	assert(src != NULL);
1154 	assert(dst != NULL);
1155 
1156 	/* Stash a temporary copy so our caller can update in place. */
1157 	(void)memcpy(tmp, src, INADDRSZ);
1158 	/* Mark this ipv6 addr as a mapped ipv4. */
1159 	for (i = 0; i < 10; i++)
1160 		*p++ = 0x00;
1161 	*p++ = 0xff;
1162 	*p++ = 0xff;
1163 	/* Retrieve the saved copy and we're done. */
1164 	(void)memcpy((void *)p, tmp, INADDRSZ);
1165 }
1166 
1167 static void
map_v4v6_hostent(struct hostent * hp,char ** bpp,char * ep)1168 map_v4v6_hostent(struct hostent *hp, char **bpp, char *ep)
1169 {
1170 	char **ap;
1171 
1172 	assert(hp != NULL);
1173 	assert(bpp != NULL);
1174 	assert(ep != NULL);
1175 
1176 	if (hp->h_addrtype != AF_INET || hp->h_length != INADDRSZ)
1177 		return;
1178 	hp->h_addrtype = AF_INET6;
1179 	hp->h_length = IN6ADDRSZ;
1180 	for (ap = hp->h_addr_list; *ap; ap++) {
1181 		int i = sizeof(align) - (size_t)((u_long)*bpp % sizeof(align));
1182 
1183 		if (ep - *bpp < (i + IN6ADDRSZ)) {
1184 			/* Out of memory.  Truncate address list here.  XXX */
1185 			*ap = NULL;
1186 			return;
1187 		}
1188 		*bpp += i;
1189 		map_v4v6_address(*ap, *bpp);
1190 		*ap = *bpp;
1191 		*bpp += IN6ADDRSZ;
1192 	}
1193 }
1194 
1195 static void
addrsort(char ** ap,int num,res_state res)1196 addrsort(char **ap, int num, res_state res)
1197 {
1198 	int i, j;
1199 	char **p;
1200 	short aval[MAXADDRS];
1201 	int needsort = 0;
1202 
1203 	assert(ap != NULL);
1204 
1205 	p = ap;
1206 	for (i = 0; i < num; i++, p++) {
1207 	    for (j = 0 ; (unsigned)j < res->nsort; j++)
1208 		if (res->sort_list[j].addr.s_addr ==
1209 		    (((struct in_addr *)(void *)(*p))->s_addr &
1210 		    res->sort_list[j].mask))
1211 			break;
1212 	    aval[i] = j;
1213 	    if (needsort == 0 && i > 0 && j < aval[i-1])
1214 		needsort = i;
1215 	}
1216 	if (!needsort)
1217 	    return;
1218 
1219 	while (needsort < num) {
1220 	    for (j = needsort - 1; j >= 0; j--) {
1221 		if (aval[j] > aval[j+1]) {
1222 		    char *hp;
1223 
1224 		    i = aval[j];
1225 		    aval[j] = aval[j+1];
1226 		    aval[j+1] = i;
1227 
1228 		    hp = ap[j];
1229 		    ap[j] = ap[j+1];
1230 		    ap[j+1] = hp;
1231 		} else
1232 		    break;
1233 	    }
1234 	    needsort++;
1235 	}
1236 }
1237 
1238 struct hostent *
gethostent(void)1239 gethostent(void)
1240 {
1241     res_static  rs = __res_get_static();
1242 	rs->host.h_addrtype = 0;
1243 	rs->host.h_length = 0;
1244 	return _gethtent();
1245 }
1246 
1247 /*ARGSUSED*/
1248 static int
_dns_gethtbyname(void * rv,void * cb_data,va_list ap)1249 _dns_gethtbyname(void *rv, void *cb_data, va_list ap)
1250 {
1251 	querybuf *buf;
1252 	int n, type;
1253 	struct hostent *hp;
1254 	const char *name;
1255 	int af;
1256 	res_state res;
1257 
1258 	assert(rv != NULL);
1259 
1260 	name = va_arg(ap, char *);
1261 	/* NOSTRICT skip len */(void)va_arg(ap, int);
1262 	af = va_arg(ap, int);
1263 
1264 	switch (af) {
1265 	case AF_INET:
1266 		type = T_A;
1267 		break;
1268 	case AF_INET6:
1269 		type = T_AAAA;
1270 		break;
1271 	default:
1272 		return NS_UNAVAIL;
1273 	}
1274 	buf = malloc(sizeof(*buf));
1275 	if (buf == NULL) {
1276 		h_errno = NETDB_INTERNAL;
1277 		return NS_NOTFOUND;
1278 	}
1279 	res = __res_get_state();
1280 	if (res == NULL) {
1281 		free(buf);
1282 		return NS_NOTFOUND;
1283 	}
1284 	n = res_nsearch(res, name, C_IN, type, buf->buf, sizeof(buf->buf));
1285 	if (n < 0) {
1286 		free(buf);
1287 		dprintf("res_nsearch failed (%d)\n", res, n);
1288 		__res_put_state(res);
1289 		return NS_NOTFOUND;
1290 	}
1291 	hp = getanswer(buf, n, name, type, res);
1292 	free(buf);
1293 	__res_put_state(res);
1294 	if (hp == NULL)
1295 		switch (h_errno) {
1296 		case HOST_NOT_FOUND:
1297 			return NS_NOTFOUND;
1298 		case TRY_AGAIN:
1299 			return NS_TRYAGAIN;
1300 		default:
1301 			return NS_UNAVAIL;
1302 		}
1303 	*((struct hostent **)rv) = hp;
1304 	return NS_SUCCESS;
1305 }
1306 
1307 /*ARGSUSED*/
1308 static int
_dns_gethtbyaddr(void * rv,void * cb_data,va_list ap)1309 _dns_gethtbyaddr(void *rv, void	*cb_data, va_list ap)
1310 {
1311 	char qbuf[MAXDNAME + 1], *qp, *ep;
1312 	int n;
1313 	querybuf *buf;
1314 	struct hostent *hp;
1315 	const unsigned char *uaddr;
1316 	int len, af, advance;
1317 	res_state res;
1318 	const char* iface;
1319 	int mark;
1320 	res_static rs = __res_get_static();
1321 
1322 	assert(rv != NULL);
1323 
1324 	uaddr = va_arg(ap, unsigned char *);
1325 	len = va_arg(ap, int);
1326 	af = va_arg(ap, int);
1327 	iface = va_arg(ap, char *);
1328 	mark = va_arg(ap, int);
1329 
1330 	switch (af) {
1331 	case AF_INET:
1332 		(void)snprintf(qbuf, sizeof(qbuf), "%u.%u.%u.%u.in-addr.arpa",
1333 		    (uaddr[3] & 0xff), (uaddr[2] & 0xff),
1334 		    (uaddr[1] & 0xff), (uaddr[0] & 0xff));
1335 		break;
1336 
1337 	case AF_INET6:
1338 		qp = qbuf;
1339 		ep = qbuf + sizeof(qbuf) - 1;
1340 		for (n = IN6ADDRSZ - 1; n >= 0; n--) {
1341 			advance = snprintf(qp, (size_t)(ep - qp), "%x.%x.",
1342 			    uaddr[n] & 0xf,
1343 			    ((unsigned int)uaddr[n] >> 4) & 0xf);
1344 			if (advance > 0 && qp + advance < ep)
1345 				qp += advance;
1346 			else {
1347 				h_errno = NETDB_INTERNAL;
1348 				return NS_NOTFOUND;
1349 			}
1350 		}
1351 		if (strlcat(qbuf, "ip6.arpa", sizeof(qbuf)) >= sizeof(qbuf)) {
1352 			h_errno = NETDB_INTERNAL;
1353 			return NS_NOTFOUND;
1354 		}
1355 		break;
1356 	default:
1357 		abort();
1358 	}
1359 
1360 	buf = malloc(sizeof(*buf));
1361 	if (buf == NULL) {
1362 		h_errno = NETDB_INTERNAL;
1363 		return NS_NOTFOUND;
1364 	}
1365 	res = __res_get_state();
1366 	if (res == NULL) {
1367 		free(buf);
1368 		return NS_NOTFOUND;
1369 	}
1370 	res_setiface(res, iface);
1371 	res_setmark(res, mark);
1372 	n = res_nquery(res, qbuf, C_IN, T_PTR, buf->buf, sizeof(buf->buf));
1373 	if (n < 0) {
1374 		free(buf);
1375 		dprintf("res_nquery failed (%d)\n", res, n);
1376 		__res_put_state(res);
1377 		return NS_NOTFOUND;
1378 	}
1379 	hp = getanswer(buf, n, qbuf, T_PTR, res);
1380 	free(buf);
1381 	if (hp == NULL) {
1382 		__res_put_state(res);
1383 		switch (h_errno) {
1384 		case HOST_NOT_FOUND:
1385 			return NS_NOTFOUND;
1386 		case TRY_AGAIN:
1387 			return NS_TRYAGAIN;
1388 		default:
1389 			return NS_UNAVAIL;
1390 		}
1391 	}
1392 	hp->h_addrtype = af;
1393 	hp->h_length = len;
1394 	(void)memcpy(rs->host_addr, uaddr, (size_t)len);
1395 	rs->h_addr_ptrs[0] = (char *)(void *)rs->host_addr;
1396 	rs->h_addr_ptrs[1] = NULL;
1397 	if (af == AF_INET && (res->options & RES_USE_INET6)) {
1398 		map_v4v6_address((char *)(void *)rs->host_addr,
1399 		    (char *)(void *)rs->host_addr);
1400 		hp->h_addrtype = AF_INET6;
1401 		hp->h_length = IN6ADDRSZ;
1402 	}
1403 
1404 	__res_put_state(res);
1405 	*((struct hostent **)rv) = hp;
1406 	h_errno = NETDB_SUCCESS;
1407 	return NS_SUCCESS;
1408 }
1409