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