xref: /minix3/lib/libc/net/getnameinfo.c (revision dd41186aac5f9c05e657f127b7e5d33f375d1686)
1*0a6a1f1dSLionel Sambuc /*	$NetBSD: getnameinfo.c,v 1.59 2015/09/22 16:15:08 christos Exp $	*/
22fe8fb19SBen Gras /*	$KAME: getnameinfo.c,v 1.45 2000/09/25 22:43:56 itojun Exp $	*/
32fe8fb19SBen Gras 
42fe8fb19SBen Gras /*
52fe8fb19SBen Gras  * Copyright (c) 2000 Ben Harris.
62fe8fb19SBen Gras  * Copyright (C) 1995, 1996, 1997, and 1998 WIDE Project.
72fe8fb19SBen Gras  * All rights reserved.
82fe8fb19SBen Gras  *
92fe8fb19SBen Gras  * Redistribution and use in source and binary forms, with or without
102fe8fb19SBen Gras  * modification, are permitted provided that the following conditions
112fe8fb19SBen Gras  * are met:
122fe8fb19SBen Gras  * 1. Redistributions of source code must retain the above copyright
132fe8fb19SBen Gras  *    notice, this list of conditions and the following disclaimer.
142fe8fb19SBen Gras  * 2. Redistributions in binary form must reproduce the above copyright
152fe8fb19SBen Gras  *    notice, this list of conditions and the following disclaimer in the
162fe8fb19SBen Gras  *    documentation and/or other materials provided with the distribution.
172fe8fb19SBen Gras  * 3. Neither the name of the project nor the names of its contributors
182fe8fb19SBen Gras  *    may be used to endorse or promote products derived from this software
192fe8fb19SBen Gras  *    without specific prior written permission.
202fe8fb19SBen Gras  *
212fe8fb19SBen Gras  * THIS SOFTWARE IS PROVIDED BY THE PROJECT AND CONTRIBUTORS ``AS IS'' AND
222fe8fb19SBen Gras  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
232fe8fb19SBen Gras  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
242fe8fb19SBen Gras  * ARE DISCLAIMED.  IN NO EVENT SHALL THE PROJECT OR CONTRIBUTORS BE LIABLE
252fe8fb19SBen Gras  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
262fe8fb19SBen Gras  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
272fe8fb19SBen Gras  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
282fe8fb19SBen Gras  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
292fe8fb19SBen Gras  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
302fe8fb19SBen Gras  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
312fe8fb19SBen Gras  * SUCH DAMAGE.
322fe8fb19SBen Gras  */
332fe8fb19SBen Gras 
342fe8fb19SBen Gras /*
352fe8fb19SBen Gras  * Issues to be discussed:
362fe8fb19SBen Gras  * - Thread safe-ness must be checked
372fe8fb19SBen Gras  * - RFC2553 says that we should raise error on short buffer.  X/Open says
382fe8fb19SBen Gras  *   we need to truncate the result.  We obey RFC2553 (and X/Open should be
392fe8fb19SBen Gras  *   modified).  ipngwg rough consensus seems to follow RFC2553.
402fe8fb19SBen Gras  * - What is "local" in NI_FQDN?
412fe8fb19SBen Gras  * - NI_NAMEREQD and NI_NUMERICHOST conflict with each other.
422fe8fb19SBen Gras  * - (KAME extension) always attach textual scopeid (fe80::1%lo0), if
432fe8fb19SBen Gras  *   sin6_scope_id is filled - standardization status?
442fe8fb19SBen Gras  *   XXX breaks backward compat for code that expects no scopeid.
452fe8fb19SBen Gras  *   beware on merge.
462fe8fb19SBen Gras  */
472fe8fb19SBen Gras 
482fe8fb19SBen Gras #include <sys/cdefs.h>
492fe8fb19SBen Gras #if defined(LIBC_SCCS) && !defined(lint)
50*0a6a1f1dSLionel Sambuc __RCSID("$NetBSD: getnameinfo.c,v 1.59 2015/09/22 16:15:08 christos Exp $");
512fe8fb19SBen Gras #endif /* LIBC_SCCS and not lint */
522fe8fb19SBen Gras 
53*0a6a1f1dSLionel Sambuc #ifndef RUMP_ACTION
542fe8fb19SBen Gras #include "namespace.h"
55*0a6a1f1dSLionel Sambuc #endif
562fe8fb19SBen Gras #include <sys/types.h>
572fe8fb19SBen Gras #include <sys/socket.h>
58f14fb602SLionel Sambuc #include <sys/un.h>
592fe8fb19SBen Gras #include <net/if.h>
602fe8fb19SBen Gras #include <net/if_dl.h>
612fe8fb19SBen Gras #include <net/if_ieee1394.h>
622fe8fb19SBen Gras #include <net/if_types.h>
632fe8fb19SBen Gras #include <netatalk/at.h>
642fe8fb19SBen Gras #include <netinet/in.h>
652fe8fb19SBen Gras #include <arpa/inet.h>
662fe8fb19SBen Gras #include <arpa/nameser.h>
672fe8fb19SBen Gras #include <assert.h>
682fe8fb19SBen Gras #include <limits.h>
692fe8fb19SBen Gras #include <netdb.h>
702fe8fb19SBen Gras #include <resolv.h>
712fe8fb19SBen Gras #include <stddef.h>
722fe8fb19SBen Gras #include <string.h>
732fe8fb19SBen Gras 
742fe8fb19SBen Gras #include "servent.h"
7584d9c625SLionel Sambuc #include "hostent.h"
762fe8fb19SBen Gras 
77*0a6a1f1dSLionel Sambuc #ifndef RUMP_ACTION
782fe8fb19SBen Gras #ifdef __weak_alias
792fe8fb19SBen Gras __weak_alias(getnameinfo,_getnameinfo)
802fe8fb19SBen Gras #endif
81*0a6a1f1dSLionel Sambuc #endif
822fe8fb19SBen Gras 
832fe8fb19SBen Gras static const struct afd {
842fe8fb19SBen Gras 	int		a_af;
852fe8fb19SBen Gras 	socklen_t	a_addrlen;
862fe8fb19SBen Gras 	socklen_t	a_socklen;
872fe8fb19SBen Gras 	int		a_off;
882fe8fb19SBen Gras } afdl [] = {
892fe8fb19SBen Gras #ifdef INET6
902fe8fb19SBen Gras 	{PF_INET6, sizeof(struct in6_addr), sizeof(struct sockaddr_in6),
912fe8fb19SBen Gras 		offsetof(struct sockaddr_in6, sin6_addr)},
922fe8fb19SBen Gras #endif
932fe8fb19SBen Gras 	{PF_INET, sizeof(struct in_addr), sizeof(struct sockaddr_in),
942fe8fb19SBen Gras 		offsetof(struct sockaddr_in, sin_addr)},
952fe8fb19SBen Gras 	{0, 0, 0, 0},
962fe8fb19SBen Gras };
972fe8fb19SBen Gras 
982fe8fb19SBen Gras struct sockinet {
992fe8fb19SBen Gras 	u_char	si_len;
1002fe8fb19SBen Gras 	u_char	si_family;
1012fe8fb19SBen Gras 	u_short	si_port;
1022fe8fb19SBen Gras };
1032fe8fb19SBen Gras 
104f14fb602SLionel Sambuc static int getnameinfo_inet(const struct sockaddr *, socklen_t, char *,
105f14fb602SLionel Sambuc     socklen_t, char *, socklen_t, int);
1062fe8fb19SBen Gras #ifdef INET6
107f14fb602SLionel Sambuc static int ip6_parsenumeric(const struct sockaddr *, const char *, char *,
108f14fb602SLionel Sambuc 				 socklen_t, int);
109f14fb602SLionel Sambuc static int ip6_sa2str(const struct sockaddr_in6 *, char *, size_t, int);
1102fe8fb19SBen Gras #endif
111f14fb602SLionel Sambuc static int getnameinfo_atalk(const struct sockaddr *, socklen_t, char *,
112f14fb602SLionel Sambuc     socklen_t, char *, socklen_t, int);
113f14fb602SLionel Sambuc static int getnameinfo_local(const struct sockaddr *, socklen_t, char *,
114f14fb602SLionel Sambuc     socklen_t, char *, socklen_t, int);
1152fe8fb19SBen Gras 
116f14fb602SLionel Sambuc static int getnameinfo_link(const struct sockaddr *, socklen_t, char *,
117f14fb602SLionel Sambuc     socklen_t, char *, socklen_t, int);
118f14fb602SLionel Sambuc static int hexname(const uint8_t *, size_t, char *, socklen_t);
1192fe8fb19SBen Gras 
1202fe8fb19SBen Gras /*
1212fe8fb19SBen Gras  * Top-level getnameinfo() code.  Look at the address family, and pick an
1222fe8fb19SBen Gras  * appropriate function to call.
1232fe8fb19SBen Gras  */
1242fe8fb19SBen Gras int
getnameinfo(const struct sockaddr * sa,socklen_t salen,char * host,socklen_t hostlen,char * serv,socklen_t servlen,int flags)125f14fb602SLionel Sambuc getnameinfo(const struct sockaddr *sa, socklen_t salen,
126f14fb602SLionel Sambuc 	char *host, socklen_t hostlen,
127f14fb602SLionel Sambuc 	char *serv, socklen_t servlen,
128f14fb602SLionel Sambuc 	int flags)
1292fe8fb19SBen Gras {
1302fe8fb19SBen Gras 
1312fe8fb19SBen Gras 	switch (sa->sa_family) {
1322fe8fb19SBen Gras 	case AF_APPLETALK:
1332fe8fb19SBen Gras 		return getnameinfo_atalk(sa, salen, host, hostlen,
1342fe8fb19SBen Gras 		    serv, servlen, flags);
1352fe8fb19SBen Gras 	case AF_INET:
1362fe8fb19SBen Gras 	case AF_INET6:
1372fe8fb19SBen Gras 		return getnameinfo_inet(sa, salen, host, hostlen,
1382fe8fb19SBen Gras 		    serv, servlen, flags);
1392fe8fb19SBen Gras 	case AF_LINK:
1402fe8fb19SBen Gras 		return getnameinfo_link(sa, salen, host, hostlen,
1412fe8fb19SBen Gras 		    serv, servlen, flags);
142f14fb602SLionel Sambuc 	case AF_LOCAL:
143f14fb602SLionel Sambuc 		return getnameinfo_local(sa, salen, host, hostlen,
144f14fb602SLionel Sambuc 		    serv, servlen, flags);
1452fe8fb19SBen Gras 	default:
1462fe8fb19SBen Gras 		return EAI_FAMILY;
1472fe8fb19SBen Gras 	}
1482fe8fb19SBen Gras }
1492fe8fb19SBen Gras 
1502fe8fb19SBen Gras /*
1512fe8fb19SBen Gras  * getnameinfo_atalk():
1522fe8fb19SBen Gras  * Format an AppleTalk address into a printable format.
1532fe8fb19SBen Gras  */
1542fe8fb19SBen Gras /* ARGSUSED */
1552fe8fb19SBen Gras static int
getnameinfo_atalk(const struct sockaddr * sa,socklen_t salen,char * host,socklen_t hostlen,char * serv,socklen_t servlen,int flags)1562fe8fb19SBen Gras getnameinfo_atalk(const struct sockaddr *sa, socklen_t salen,
1572fe8fb19SBen Gras     char *host, socklen_t hostlen, char *serv, socklen_t servlen,
1582fe8fb19SBen Gras     int flags)
1592fe8fb19SBen Gras {
1602fe8fb19SBen Gras 	char numserv[8];
1612fe8fb19SBen Gras 	int n, m=0;
1622fe8fb19SBen Gras 
1632fe8fb19SBen Gras 	const struct sockaddr_at *sat =
1642fe8fb19SBen Gras 	    (const struct sockaddr_at *)(const void *)sa;
1652fe8fb19SBen Gras 
1662fe8fb19SBen Gras 	if (serv != NULL && servlen > 0) {
1672fe8fb19SBen Gras 		snprintf(numserv, sizeof(numserv), "%u", sat->sat_port);
1682fe8fb19SBen Gras 		if (strlen(numserv) + 1 > servlen)
1692fe8fb19SBen Gras 			return EAI_MEMORY;
1702fe8fb19SBen Gras 		strlcpy(serv, numserv, servlen);
1712fe8fb19SBen Gras 	}
1722fe8fb19SBen Gras 
1732fe8fb19SBen Gras         n = snprintf(host, hostlen, "%u.%u",
1742fe8fb19SBen Gras 	    ntohs(sat->sat_addr.s_net), sat->sat_addr.s_node);
1752fe8fb19SBen Gras 
1762fe8fb19SBen Gras 	if (n < 0 || (socklen_t)(m+n) >= hostlen)
1772fe8fb19SBen Gras 		goto errout;
1782fe8fb19SBen Gras 
1792fe8fb19SBen Gras 	m += n;
1802fe8fb19SBen Gras 
1812fe8fb19SBen Gras 	if (sat->sat_range.r_netrange.nr_phase) {
1822fe8fb19SBen Gras         	n = snprintf(host+m, hostlen-m, " phase %u",
1832fe8fb19SBen Gras 			sat->sat_range.r_netrange.nr_phase);
1842fe8fb19SBen Gras 
1852fe8fb19SBen Gras 		if (n < 0 || (socklen_t)(m+n) >= hostlen)
1862fe8fb19SBen Gras 			goto errout;
1872fe8fb19SBen Gras 
1882fe8fb19SBen Gras 		m += n;
1892fe8fb19SBen Gras 	}
1902fe8fb19SBen Gras 	if (sat->sat_range.r_netrange.nr_firstnet) {
1912fe8fb19SBen Gras         	n = snprintf(host+m, hostlen-m, " range %u - %u",
1922fe8fb19SBen Gras 			ntohs(sat->sat_range.r_netrange.nr_firstnet),
1932fe8fb19SBen Gras 			ntohs(sat->sat_range.r_netrange.nr_lastnet ));
1942fe8fb19SBen Gras 
1952fe8fb19SBen Gras 		if (n < 0 || (socklen_t)(m+n) >= hostlen)
1962fe8fb19SBen Gras 			goto errout;
1972fe8fb19SBen Gras 
1982fe8fb19SBen Gras 		m += n;
1992fe8fb19SBen Gras 	}
2002fe8fb19SBen Gras 
2012fe8fb19SBen Gras 	return 0;
2022fe8fb19SBen Gras 
2032fe8fb19SBen Gras errout:
2042fe8fb19SBen Gras 	if (host && hostlen>0)
2052fe8fb19SBen Gras 		host[m] = '\0';	/* XXX ??? */
2062fe8fb19SBen Gras 
2072fe8fb19SBen Gras 	return EAI_MEMORY;
2082fe8fb19SBen Gras }
209f14fb602SLionel Sambuc 
210f14fb602SLionel Sambuc /*
211f14fb602SLionel Sambuc  * getnameinfo_local():
212f14fb602SLionel Sambuc  * Format an local address into a printable format.
213f14fb602SLionel Sambuc  */
214f14fb602SLionel Sambuc /* ARGSUSED */
215f14fb602SLionel Sambuc static int
getnameinfo_local(const struct sockaddr * sa,socklen_t salen,char * host,socklen_t hostlen,char * serv,socklen_t servlen,int flags)216f14fb602SLionel Sambuc getnameinfo_local(const struct sockaddr *sa, socklen_t salen,
217f14fb602SLionel Sambuc     char *host, socklen_t hostlen, char *serv, socklen_t servlen,
218f14fb602SLionel Sambuc     int flags)
219f14fb602SLionel Sambuc {
220f14fb602SLionel Sambuc 	const struct sockaddr_un *sun =
221f14fb602SLionel Sambuc 	    (const struct sockaddr_un *)(const void *)sa;
222f14fb602SLionel Sambuc 
223f14fb602SLionel Sambuc 	if (serv != NULL && servlen > 0)
224f14fb602SLionel Sambuc 		serv[0] = '\0';
225f14fb602SLionel Sambuc 
226f14fb602SLionel Sambuc 	if (host && hostlen > 0)
227f14fb602SLionel Sambuc 		strlcpy(host, sun->sun_path,
228f14fb602SLionel Sambuc 		    MIN(sizeof(sun->sun_path) + 1, hostlen));
229f14fb602SLionel Sambuc 
230f14fb602SLionel Sambuc 	return 0;
231f14fb602SLionel Sambuc }
2322fe8fb19SBen Gras 
2332fe8fb19SBen Gras /*
2342fe8fb19SBen Gras  * getnameinfo_inet():
2352fe8fb19SBen Gras  * Format an IPv4 or IPv6 sockaddr into a printable string.
2362fe8fb19SBen Gras  */
2372fe8fb19SBen Gras static int
getnameinfo_inet(const struct sockaddr * sa,socklen_t salen,char * host,socklen_t hostlen,char * serv,socklen_t servlen,int flags)238f14fb602SLionel Sambuc getnameinfo_inet(const struct sockaddr *sa, socklen_t salen,
239f14fb602SLionel Sambuc 	char *host, socklen_t hostlen,
240f14fb602SLionel Sambuc 	char *serv, socklen_t servlen,
241f14fb602SLionel Sambuc 	int flags)
2422fe8fb19SBen Gras {
2432fe8fb19SBen Gras 	const struct afd *afd;
2442fe8fb19SBen Gras 	struct servent *sp;
2452fe8fb19SBen Gras 	struct hostent *hp;
2462fe8fb19SBen Gras 	u_short port;
2472fe8fb19SBen Gras 	int family, i;
2482fe8fb19SBen Gras 	const char *addr;
249f14fb602SLionel Sambuc 	uint32_t v4a;
2502fe8fb19SBen Gras 	char numserv[512];
2512fe8fb19SBen Gras 	char numaddr[512];
2522fe8fb19SBen Gras 
2532fe8fb19SBen Gras 	/* sa is checked below */
2542fe8fb19SBen Gras 	/* host may be NULL */
2552fe8fb19SBen Gras 	/* serv may be NULL */
2562fe8fb19SBen Gras 
2572fe8fb19SBen Gras 	if (sa == NULL)
2582fe8fb19SBen Gras 		return EAI_FAIL;
2592fe8fb19SBen Gras 
2602fe8fb19SBen Gras 	family = sa->sa_family;
2612fe8fb19SBen Gras 	for (i = 0; afdl[i].a_af; i++)
2622fe8fb19SBen Gras 		if (afdl[i].a_af == family) {
2632fe8fb19SBen Gras 			afd = &afdl[i];
2642fe8fb19SBen Gras 			goto found;
2652fe8fb19SBen Gras 		}
2662fe8fb19SBen Gras 	return EAI_FAMILY;
2672fe8fb19SBen Gras 
2682fe8fb19SBen Gras  found:
2692fe8fb19SBen Gras 	if (salen != afd->a_socklen)
2702fe8fb19SBen Gras 		return EAI_FAIL;
2712fe8fb19SBen Gras 
2722fe8fb19SBen Gras 	/* network byte order */
2732fe8fb19SBen Gras 	port = ((const struct sockinet *)(const void *)sa)->si_port;
2742fe8fb19SBen Gras 	addr = (const char *)(const void *)sa + afd->a_off;
2752fe8fb19SBen Gras 
2762fe8fb19SBen Gras 	if (serv == NULL || servlen == 0) {
2772fe8fb19SBen Gras 		/*
2782fe8fb19SBen Gras 		 * do nothing in this case.
2792fe8fb19SBen Gras 		 * in case you are wondering if "&&" is more correct than
2802fe8fb19SBen Gras 		 * "||" here: rfc2553bis-03 says that serv == NULL OR
2812fe8fb19SBen Gras 		 * servlen == 0 means that the caller does not want the result.
2822fe8fb19SBen Gras 		 */
2832fe8fb19SBen Gras 	} else {
2842fe8fb19SBen Gras 		struct servent_data svd;
2852fe8fb19SBen Gras 		struct servent sv;
2862fe8fb19SBen Gras 
2872fe8fb19SBen Gras 		if (flags & NI_NUMERICSERV)
2882fe8fb19SBen Gras 			sp = NULL;
2892fe8fb19SBen Gras 		else {
2902fe8fb19SBen Gras 			(void)memset(&svd, 0, sizeof(svd));
2912fe8fb19SBen Gras 			sp = getservbyport_r(port,
2922fe8fb19SBen Gras 				(flags & NI_DGRAM) ? "udp" : "tcp", &sv, &svd);
2932fe8fb19SBen Gras 		}
2942fe8fb19SBen Gras 		if (sp) {
2952fe8fb19SBen Gras 			if (strlen(sp->s_name) + 1 > servlen) {
2962fe8fb19SBen Gras 				endservent_r(&svd);
2972fe8fb19SBen Gras 				return EAI_MEMORY;
2982fe8fb19SBen Gras 			}
2992fe8fb19SBen Gras 			strlcpy(serv, sp->s_name, servlen);
3002fe8fb19SBen Gras 			endservent_r(&svd);
3012fe8fb19SBen Gras 		} else {
3022fe8fb19SBen Gras 			snprintf(numserv, sizeof(numserv), "%u", ntohs(port));
3032fe8fb19SBen Gras 			if (strlen(numserv) + 1 > servlen)
3042fe8fb19SBen Gras 				return EAI_MEMORY;
3052fe8fb19SBen Gras 			strlcpy(serv, numserv, servlen);
3062fe8fb19SBen Gras 		}
3072fe8fb19SBen Gras 	}
3082fe8fb19SBen Gras 
3092fe8fb19SBen Gras 	switch (sa->sa_family) {
3102fe8fb19SBen Gras 	case AF_INET:
311f14fb602SLionel Sambuc 		v4a = (uint32_t)
3122fe8fb19SBen Gras 		    ntohl(((const struct sockaddr_in *)
3132fe8fb19SBen Gras 		    (const void *)sa)->sin_addr.s_addr);
3142fe8fb19SBen Gras 		if (IN_MULTICAST(v4a) || IN_EXPERIMENTAL(v4a))
3152fe8fb19SBen Gras 			flags |= NI_NUMERICHOST;
3162fe8fb19SBen Gras 		v4a >>= IN_CLASSA_NSHIFT;
3172fe8fb19SBen Gras 		if (v4a == 0)
3182fe8fb19SBen Gras 			flags |= NI_NUMERICHOST;
3192fe8fb19SBen Gras 		break;
3202fe8fb19SBen Gras #ifdef INET6
3212fe8fb19SBen Gras 	case AF_INET6:
3222fe8fb19SBen Gras 	    {
3232fe8fb19SBen Gras 		const struct sockaddr_in6 *sin6;
3242fe8fb19SBen Gras 		sin6 = (const struct sockaddr_in6 *)(const void *)sa;
3252fe8fb19SBen Gras 		switch (sin6->sin6_addr.s6_addr[0]) {
3262fe8fb19SBen Gras 		case 0x00:
3272fe8fb19SBen Gras 			if (IN6_IS_ADDR_V4MAPPED(&sin6->sin6_addr))
3282fe8fb19SBen Gras 				;
3292fe8fb19SBen Gras 			else if (IN6_IS_ADDR_LOOPBACK(&sin6->sin6_addr))
3302fe8fb19SBen Gras 				;
3312fe8fb19SBen Gras 			else
3322fe8fb19SBen Gras 				flags |= NI_NUMERICHOST;
3332fe8fb19SBen Gras 			break;
3342fe8fb19SBen Gras 		default:
3352fe8fb19SBen Gras 			if (IN6_IS_ADDR_LINKLOCAL(&sin6->sin6_addr)) {
3362fe8fb19SBen Gras 				flags |= NI_NUMERICHOST;
3372fe8fb19SBen Gras 			}
3382fe8fb19SBen Gras 			else if (IN6_IS_ADDR_MULTICAST(&sin6->sin6_addr))
3392fe8fb19SBen Gras 				flags |= NI_NUMERICHOST;
3402fe8fb19SBen Gras 			break;
3412fe8fb19SBen Gras 		}
3422fe8fb19SBen Gras 	    }
3432fe8fb19SBen Gras 		break;
3442fe8fb19SBen Gras #endif
3452fe8fb19SBen Gras 	}
3462fe8fb19SBen Gras 	if (host == NULL || hostlen == 0) {
3472fe8fb19SBen Gras 		/*
3482fe8fb19SBen Gras 		 * do nothing in this case.
3492fe8fb19SBen Gras 		 * in case you are wondering if "&&" is more correct than
3502fe8fb19SBen Gras 		 * "||" here: rfc2553bis-03 says that host == NULL or
3512fe8fb19SBen Gras 		 * hostlen == 0 means that the caller does not want the result.
3522fe8fb19SBen Gras 		 */
3532fe8fb19SBen Gras 	} else if (flags & NI_NUMERICHOST) {
3542fe8fb19SBen Gras 		size_t numaddrlen;
3552fe8fb19SBen Gras 
3562fe8fb19SBen Gras 		/* NUMERICHOST and NAMEREQD conflicts with each other */
3572fe8fb19SBen Gras 		if (flags & NI_NAMEREQD)
3582fe8fb19SBen Gras 			return EAI_NONAME;
3592fe8fb19SBen Gras 
3602fe8fb19SBen Gras 		switch(afd->a_af) {
3612fe8fb19SBen Gras #ifdef INET6
3622fe8fb19SBen Gras 		case AF_INET6:
3632fe8fb19SBen Gras 		{
3642fe8fb19SBen Gras 			int error;
3652fe8fb19SBen Gras 
3662fe8fb19SBen Gras 			if ((error = ip6_parsenumeric(sa, addr, host,
3672fe8fb19SBen Gras 						      hostlen, flags)) != 0)
3682fe8fb19SBen Gras 				return(error);
3692fe8fb19SBen Gras 			break;
3702fe8fb19SBen Gras 		}
3712fe8fb19SBen Gras #endif
3722fe8fb19SBen Gras 		default:
373f14fb602SLionel Sambuc 			if (inet_ntop(afd->a_af, addr, numaddr,
374f14fb602SLionel Sambuc 			    (socklen_t)sizeof(numaddr)) == NULL)
3752fe8fb19SBen Gras 				return EAI_SYSTEM;
3762fe8fb19SBen Gras 			numaddrlen = strlen(numaddr);
3772fe8fb19SBen Gras 			if (numaddrlen + 1 > hostlen) /* don't forget terminator */
3782fe8fb19SBen Gras 				return EAI_MEMORY;
3792fe8fb19SBen Gras 			strlcpy(host, numaddr, hostlen);
3802fe8fb19SBen Gras 			break;
3812fe8fb19SBen Gras 		}
3822fe8fb19SBen Gras 	} else {
38384d9c625SLionel Sambuc 		struct hostent hent;
38484d9c625SLionel Sambuc 		char hbuf[4096];
38584d9c625SLionel Sambuc 		int he;
38684d9c625SLionel Sambuc 		hp = gethostbyaddr_r(addr, afd->a_addrlen, afd->a_af, &hent,
38784d9c625SLionel Sambuc 		    hbuf, sizeof(hbuf), &he);
3882fe8fb19SBen Gras 
3892fe8fb19SBen Gras 		if (hp) {
3902fe8fb19SBen Gras #if 0
3912fe8fb19SBen Gras 			/*
3922fe8fb19SBen Gras 			 * commented out, since "for local host" is not
3932fe8fb19SBen Gras 			 * implemented here - see RFC2553 p30
3942fe8fb19SBen Gras 			 */
3952fe8fb19SBen Gras 			if (flags & NI_NOFQDN) {
3962fe8fb19SBen Gras 				char *p;
3972fe8fb19SBen Gras 				p = strchr(hp->h_name, '.');
3982fe8fb19SBen Gras 				if (p)
3992fe8fb19SBen Gras 					*p = '\0';
4002fe8fb19SBen Gras 			}
4012fe8fb19SBen Gras #endif
4022fe8fb19SBen Gras 			if (strlen(hp->h_name) + 1 > hostlen) {
4032fe8fb19SBen Gras 				return EAI_MEMORY;
4042fe8fb19SBen Gras 			}
4052fe8fb19SBen Gras 			strlcpy(host, hp->h_name, hostlen);
4062fe8fb19SBen Gras 		} else {
407*0a6a1f1dSLionel Sambuc 			switch (he) {
408*0a6a1f1dSLionel Sambuc 			case NO_DATA:
409*0a6a1f1dSLionel Sambuc 			case HOST_NOT_FOUND:
4102fe8fb19SBen Gras 				if (flags & NI_NAMEREQD)
4112fe8fb19SBen Gras 					return EAI_NONAME;
412*0a6a1f1dSLionel Sambuc 				break;
413*0a6a1f1dSLionel Sambuc 			case TRY_AGAIN:
414*0a6a1f1dSLionel Sambuc 				return EAI_AGAIN;
415*0a6a1f1dSLionel Sambuc 			case NETDB_SUCCESS:
416*0a6a1f1dSLionel Sambuc 			case NETDB_INTERNAL:
417*0a6a1f1dSLionel Sambuc 			case NO_RECOVERY:
418*0a6a1f1dSLionel Sambuc 				/*FALLTHROUGH*/
419*0a6a1f1dSLionel Sambuc 			default:
420*0a6a1f1dSLionel Sambuc 				return EAI_SYSTEM;
421*0a6a1f1dSLionel Sambuc 			}
4222fe8fb19SBen Gras 			switch(afd->a_af) {
4232fe8fb19SBen Gras #ifdef INET6
4242fe8fb19SBen Gras 			case AF_INET6:
4252fe8fb19SBen Gras 			{
4262fe8fb19SBen Gras 				int error;
4272fe8fb19SBen Gras 
4282fe8fb19SBen Gras 				if ((error = ip6_parsenumeric(sa, addr, host,
4292fe8fb19SBen Gras 							      hostlen,
4302fe8fb19SBen Gras 							      flags)) != 0)
4312fe8fb19SBen Gras 					return(error);
4322fe8fb19SBen Gras 				break;
4332fe8fb19SBen Gras 			}
4342fe8fb19SBen Gras #endif
4352fe8fb19SBen Gras 			default:
4362fe8fb19SBen Gras 				if (inet_ntop(afd->a_af, addr, host,
4372fe8fb19SBen Gras 				    hostlen) == NULL)
4382fe8fb19SBen Gras 					return EAI_SYSTEM;
4392fe8fb19SBen Gras 				break;
4402fe8fb19SBen Gras 			}
4412fe8fb19SBen Gras 		}
4422fe8fb19SBen Gras 	}
4432fe8fb19SBen Gras 	return(0);
4442fe8fb19SBen Gras }
4452fe8fb19SBen Gras 
4462fe8fb19SBen Gras #ifdef INET6
4472fe8fb19SBen Gras static int
ip6_parsenumeric(const struct sockaddr * sa,const char * addr,char * host,socklen_t hostlen,int flags)448f14fb602SLionel Sambuc ip6_parsenumeric(const struct sockaddr *sa, const char *addr, char *host,
449f14fb602SLionel Sambuc 	socklen_t hostlen, int flags)
4502fe8fb19SBen Gras {
4512fe8fb19SBen Gras 	size_t numaddrlen;
4522fe8fb19SBen Gras 	char numaddr[512];
4532fe8fb19SBen Gras 
4542fe8fb19SBen Gras 	_DIAGASSERT(sa != NULL);
4552fe8fb19SBen Gras 	_DIAGASSERT(addr != NULL);
4562fe8fb19SBen Gras 	_DIAGASSERT(host != NULL);
4572fe8fb19SBen Gras 
458f14fb602SLionel Sambuc 	if (inet_ntop(AF_INET6, addr, numaddr, (socklen_t)sizeof(numaddr))
459f14fb602SLionel Sambuc 	    == NULL)
4602fe8fb19SBen Gras 		return EAI_SYSTEM;
4612fe8fb19SBen Gras 
4622fe8fb19SBen Gras 	numaddrlen = strlen(numaddr);
4632fe8fb19SBen Gras 	if (numaddrlen + 1 > hostlen) /* don't forget terminator */
4642fe8fb19SBen Gras 		return EAI_OVERFLOW;
4652fe8fb19SBen Gras 	strlcpy(host, numaddr, hostlen);
4662fe8fb19SBen Gras 
4672fe8fb19SBen Gras 	if (((const struct sockaddr_in6 *)(const void *)sa)->sin6_scope_id) {
4682fe8fb19SBen Gras 		char zonebuf[MAXHOSTNAMELEN];
4692fe8fb19SBen Gras 		int zonelen;
4702fe8fb19SBen Gras 
4712fe8fb19SBen Gras 		zonelen = ip6_sa2str(
4722fe8fb19SBen Gras 		    (const struct sockaddr_in6 *)(const void *)sa,
4732fe8fb19SBen Gras 		    zonebuf, sizeof(zonebuf), flags);
4742fe8fb19SBen Gras 		if (zonelen < 0)
4752fe8fb19SBen Gras 			return EAI_OVERFLOW;
4762fe8fb19SBen Gras 		if ((size_t) zonelen + 1 + numaddrlen + 1 > hostlen)
4772fe8fb19SBen Gras 			return EAI_OVERFLOW;
4782fe8fb19SBen Gras 		/* construct <numeric-addr><delim><zoneid> */
4792fe8fb19SBen Gras 		memcpy(host + numaddrlen + 1, zonebuf,
4802fe8fb19SBen Gras 		    (size_t)zonelen);
4812fe8fb19SBen Gras 		host[numaddrlen] = SCOPE_DELIMITER;
4822fe8fb19SBen Gras 		host[numaddrlen + 1 + zonelen] = '\0';
4832fe8fb19SBen Gras 	}
4842fe8fb19SBen Gras 
4852fe8fb19SBen Gras 	return 0;
4862fe8fb19SBen Gras }
4872fe8fb19SBen Gras 
4882fe8fb19SBen Gras /* ARGSUSED */
4892fe8fb19SBen Gras static int
ip6_sa2str(const struct sockaddr_in6 * sa6,char * buf,size_t bufsiz,int flags)490f14fb602SLionel Sambuc ip6_sa2str(const struct sockaddr_in6 *sa6, char *buf, size_t bufsiz, int flags)
4912fe8fb19SBen Gras {
4922fe8fb19SBen Gras 	unsigned int ifindex;
4932fe8fb19SBen Gras 	const struct in6_addr *a6;
4942fe8fb19SBen Gras 	int n;
4952fe8fb19SBen Gras 
4962fe8fb19SBen Gras 	_DIAGASSERT(sa6 != NULL);
4972fe8fb19SBen Gras 	_DIAGASSERT(buf != NULL);
4982fe8fb19SBen Gras 
4992fe8fb19SBen Gras 	ifindex = (unsigned int)sa6->sin6_scope_id;
5002fe8fb19SBen Gras 	a6 = &sa6->sin6_addr;
5012fe8fb19SBen Gras 
5022fe8fb19SBen Gras #ifdef NI_NUMERICSCOPE
5032fe8fb19SBen Gras 	if ((flags & NI_NUMERICSCOPE) != 0) {
5042fe8fb19SBen Gras 		n = snprintf(buf, bufsiz, "%u", sa6->sin6_scope_id);
5052fe8fb19SBen Gras 		if (n < 0 || (size_t)n >= bufsiz)
5062fe8fb19SBen Gras 			return -1;
5072fe8fb19SBen Gras 		else
5082fe8fb19SBen Gras 			return n;
5092fe8fb19SBen Gras 	}
5102fe8fb19SBen Gras #endif
5112fe8fb19SBen Gras 
5122fe8fb19SBen Gras 	/* if_indextoname() does not take buffer size.  not a good api... */
5132fe8fb19SBen Gras 	if ((IN6_IS_ADDR_LINKLOCAL(a6) || IN6_IS_ADDR_MC_LINKLOCAL(a6)) &&
5142fe8fb19SBen Gras 	    bufsiz >= IF_NAMESIZE) {
5152fe8fb19SBen Gras 		char *p = if_indextoname(ifindex, buf);
5162fe8fb19SBen Gras 		if (p) {
517f14fb602SLionel Sambuc 			return (int)strlen(p);
5182fe8fb19SBen Gras 		}
5192fe8fb19SBen Gras 	}
5202fe8fb19SBen Gras 
5212fe8fb19SBen Gras 	/* last resort */
5222fe8fb19SBen Gras 	n = snprintf(buf, bufsiz, "%u", sa6->sin6_scope_id);
5232fe8fb19SBen Gras 	if (n < 0 || (size_t) n >= bufsiz)
5242fe8fb19SBen Gras 		return -1;
5252fe8fb19SBen Gras 	else
5262fe8fb19SBen Gras 		return n;
5272fe8fb19SBen Gras }
5282fe8fb19SBen Gras #endif /* INET6 */
5292fe8fb19SBen Gras 
5302fe8fb19SBen Gras 
5312fe8fb19SBen Gras /*
5322fe8fb19SBen Gras  * getnameinfo_link():
5332fe8fb19SBen Gras  * Format a link-layer address into a printable format, paying attention to
5342fe8fb19SBen Gras  * the interface type.
5352fe8fb19SBen Gras  */
5362fe8fb19SBen Gras /* ARGSUSED */
5372fe8fb19SBen Gras static int
getnameinfo_link(const struct sockaddr * sa,socklen_t salen,char * host,socklen_t hostlen,char * serv,socklen_t servlen,int flags)5382fe8fb19SBen Gras getnameinfo_link(const struct sockaddr *sa, socklen_t salen,
5392fe8fb19SBen Gras     char *host, socklen_t hostlen, char *serv, socklen_t servlen,
5402fe8fb19SBen Gras     int flags)
5412fe8fb19SBen Gras {
5422fe8fb19SBen Gras 	const struct sockaddr_dl *sdl =
5432fe8fb19SBen Gras 	    (const struct sockaddr_dl *)(const void *)sa;
5442fe8fb19SBen Gras 	const struct ieee1394_hwaddr *iha;
5452fe8fb19SBen Gras 	int n;
5462fe8fb19SBen Gras 
5472fe8fb19SBen Gras 	if (serv != NULL && servlen > 0)
5482fe8fb19SBen Gras 		*serv = '\0';
5492fe8fb19SBen Gras 
5502fe8fb19SBen Gras 	if (sdl->sdl_nlen == 0 && sdl->sdl_alen == 0 && sdl->sdl_slen == 0) {
5512fe8fb19SBen Gras 		n = snprintf(host, hostlen, "link#%u", sdl->sdl_index);
552*0a6a1f1dSLionel Sambuc 		goto out;
5532fe8fb19SBen Gras 	}
5542fe8fb19SBen Gras 
5552fe8fb19SBen Gras 	switch (sdl->sdl_type) {
5562fe8fb19SBen Gras #ifdef IFT_ECONET
5572fe8fb19SBen Gras 	case IFT_ECONET:
5582fe8fb19SBen Gras 		if (sdl->sdl_alen < 2)
5592fe8fb19SBen Gras 			return EAI_FAMILY;
5602fe8fb19SBen Gras 		if (CLLADDR(sdl)[1] == 0)
5612fe8fb19SBen Gras 			n = snprintf(host, hostlen, "%u", CLLADDR(sdl)[0]);
5622fe8fb19SBen Gras 		else
5632fe8fb19SBen Gras 			n = snprintf(host, hostlen, "%u.%u",
5642fe8fb19SBen Gras 			    CLLADDR(sdl)[1], CLLADDR(sdl)[0]);
565*0a6a1f1dSLionel Sambuc 		goto out;
5662fe8fb19SBen Gras #endif
5672fe8fb19SBen Gras 	case IFT_IEEE1394:
5682fe8fb19SBen Gras 		if (sdl->sdl_alen < sizeof(iha->iha_uid))
5692fe8fb19SBen Gras 			return EAI_FAMILY;
5702fe8fb19SBen Gras 		iha =
5712fe8fb19SBen Gras 		    (const struct ieee1394_hwaddr *)(const void *)CLLADDR(sdl);
5722fe8fb19SBen Gras 		return hexname(iha->iha_uid, sizeof(iha->iha_uid),
5732fe8fb19SBen Gras 		    host, hostlen);
5742fe8fb19SBen Gras 	/*
5752fe8fb19SBen Gras 	 * The following have zero-length addresses.
5762fe8fb19SBen Gras 	 * IFT_ATM	(net/if_atmsubr.c)
5772fe8fb19SBen Gras 	 * IFT_FAITH	(net/if_faith.c)
5782fe8fb19SBen Gras 	 * IFT_GIF	(net/if_gif.c)
5792fe8fb19SBen Gras 	 * IFT_LOOP	(net/if_loop.c)
5802fe8fb19SBen Gras 	 * IFT_PPP	(net/if_ppp.c, net/if_spppsubr.c)
5812fe8fb19SBen Gras 	 * IFT_SLIP	(net/if_sl.c, net/if_strip.c)
5822fe8fb19SBen Gras 	 * IFT_STF	(net/if_stf.c)
5832fe8fb19SBen Gras 	 * IFT_L2VLAN	(net/if_vlan.c)
5842fe8fb19SBen Gras 	 * IFT_PROPVIRTUAL (net/if_bridge.h>
5852fe8fb19SBen Gras 	 */
5862fe8fb19SBen Gras 	/*
5872fe8fb19SBen Gras 	 * The following use IPv4 addresses as link-layer addresses:
5882fe8fb19SBen Gras 	 * IFT_OTHER	(net/if_gre.c)
5892fe8fb19SBen Gras 	 */
5902fe8fb19SBen Gras 	case IFT_ARCNET: /* default below is believed correct for all these. */
5912fe8fb19SBen Gras 	case IFT_ETHER:
5922fe8fb19SBen Gras 	case IFT_FDDI:
5932fe8fb19SBen Gras 	case IFT_HIPPI:
5942fe8fb19SBen Gras 	case IFT_ISO88025:
5952fe8fb19SBen Gras 	default:
596f14fb602SLionel Sambuc 		return hexname((const uint8_t *)CLLADDR(sdl),
5972fe8fb19SBen Gras 		    (size_t)sdl->sdl_alen, host, hostlen);
5982fe8fb19SBen Gras 	}
599*0a6a1f1dSLionel Sambuc out:
600*0a6a1f1dSLionel Sambuc 	if (n < 0 || (socklen_t) n >= hostlen) {
601*0a6a1f1dSLionel Sambuc 		*host = '\0';
602*0a6a1f1dSLionel Sambuc 		return EAI_MEMORY;
603*0a6a1f1dSLionel Sambuc 	}
604*0a6a1f1dSLionel Sambuc 	return 0;
6052fe8fb19SBen Gras }
6062fe8fb19SBen Gras 
6072fe8fb19SBen Gras static int
hexname(const uint8_t * cp,size_t len,char * host,socklen_t hostlen)608f14fb602SLionel Sambuc hexname(const uint8_t *cp, size_t len, char *host, socklen_t hostlen)
6092fe8fb19SBen Gras {
6102fe8fb19SBen Gras 	int n;
6112fe8fb19SBen Gras 	size_t i;
6122fe8fb19SBen Gras 	char *outp = host;
6132fe8fb19SBen Gras 
6142fe8fb19SBen Gras 	*outp = '\0';
6152fe8fb19SBen Gras 	for (i = 0; i < len; i++) {
6162fe8fb19SBen Gras 		n = snprintf(outp, hostlen, "%s%02x",
6172fe8fb19SBen Gras 		    i ? ":" : "", cp[i]);
6182fe8fb19SBen Gras 		if (n < 0 || (socklen_t) n >= hostlen) {
6192fe8fb19SBen Gras 			*host = '\0';
6202fe8fb19SBen Gras 			return EAI_MEMORY;
6212fe8fb19SBen Gras 		}
6222fe8fb19SBen Gras 		outp += n;
6232fe8fb19SBen Gras 		hostlen -= n;
6242fe8fb19SBen Gras 	}
6252fe8fb19SBen Gras 	return 0;
6262fe8fb19SBen Gras }
627