michael@0: /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 2 -*- */ michael@0: /* This Source Code Form is subject to the terms of the Mozilla Public michael@0: * License, v. 2.0. If a copy of the MPL was not distributed with this michael@0: * file, You can obtain one at http://mozilla.org/MPL/2.0/. */ michael@0: michael@0: #include "primpl.h" michael@0: michael@0: #include michael@0: michael@0: /* michael@0: * On Unix, the error code for gethostbyname() and gethostbyaddr() michael@0: * is returned in the global variable h_errno, instead of the usual michael@0: * errno. michael@0: */ michael@0: #if defined(XP_UNIX) michael@0: #if defined(_PR_NEED_H_ERRNO) michael@0: extern int h_errno; michael@0: #endif michael@0: #define _MD_GETHOST_ERRNO() h_errno michael@0: #else michael@0: #define _MD_GETHOST_ERRNO() _MD_ERRNO() michael@0: #endif michael@0: michael@0: /* michael@0: * The meaning of the macros related to gethostbyname, gethostbyaddr, michael@0: * and gethostbyname2 is defined below. michael@0: * - _PR_HAVE_THREADSAFE_GETHOST: the gethostbyXXX functions return michael@0: * the result in thread specific storage. For example, AIX, HP-UX, michael@0: * and OSF1. michael@0: * - _PR_HAVE_GETHOST_R: have the gethostbyXXX_r functions. See next michael@0: * two macros. michael@0: * - _PR_HAVE_GETHOST_R_INT: the gethostbyXXX_r functions return an michael@0: * int. For example, Linux glibc. michael@0: * - _PR_HAVE_GETHOST_R_POINTER: the gethostbyXXX_r functions return michael@0: * a struct hostent* pointer. For example, Solaris and IRIX. michael@0: */ michael@0: #if defined(_PR_NO_PREEMPT) || defined(_PR_HAVE_GETHOST_R) \ michael@0: || defined(_PR_HAVE_THREADSAFE_GETHOST) michael@0: #define _PR_NO_DNS_LOCK michael@0: #endif michael@0: michael@0: #if defined(_PR_NO_DNS_LOCK) michael@0: #define LOCK_DNS() michael@0: #define UNLOCK_DNS() michael@0: #else michael@0: PRLock *_pr_dnsLock = NULL; michael@0: #define LOCK_DNS() PR_Lock(_pr_dnsLock) michael@0: #define UNLOCK_DNS() PR_Unlock(_pr_dnsLock) michael@0: #endif /* defined(_PR_NO_DNS_LOCK) */ michael@0: michael@0: /* michael@0: * Some platforms have the reentrant getprotobyname_r() and michael@0: * getprotobynumber_r(). However, they come in three flavors. michael@0: * Some return a pointer to struct protoent, others return michael@0: * an int, and glibc's flavor takes five arguments. michael@0: */ michael@0: #if defined(XP_BEOS) && defined(BONE_VERSION) michael@0: #include /* pick up define for inet_addr */ michael@0: #include michael@0: #define _PR_HAVE_GETPROTO_R michael@0: #define _PR_HAVE_GETPROTO_R_POINTER michael@0: #endif michael@0: michael@0: #if defined(SOLARIS) || (defined(BSDI) && defined(_REENTRANT)) \ michael@0: || (defined(LINUX) && defined(_REENTRANT) \ michael@0: && !(defined(__GLIBC__) && __GLIBC__ >= 2) \ michael@0: && !defined(ANDROID)) michael@0: #define _PR_HAVE_GETPROTO_R michael@0: #define _PR_HAVE_GETPROTO_R_POINTER michael@0: #endif michael@0: michael@0: #if defined(OSF1) \ michael@0: || defined(AIX4_3_PLUS) || (defined(AIX) && defined(_THREAD_SAFE)) \ michael@0: || (defined(HPUX10_10) && defined(_REENTRANT)) \ michael@0: || (defined(HPUX10_20) && defined(_REENTRANT)) \ michael@0: || defined(OPENBSD) michael@0: #define _PR_HAVE_GETPROTO_R michael@0: #define _PR_HAVE_GETPROTO_R_INT michael@0: #endif michael@0: michael@0: #if __FreeBSD_version >= 602000 michael@0: #define _PR_HAVE_GETPROTO_R michael@0: #define _PR_HAVE_5_ARG_GETPROTO_R michael@0: #endif michael@0: michael@0: /* BeOS has glibc but not the glibc-style getprotobyxxx_r functions. */ michael@0: #if (defined(__GLIBC__) && __GLIBC__ >= 2 && !defined(XP_BEOS)) michael@0: #define _PR_HAVE_GETPROTO_R michael@0: #define _PR_HAVE_5_ARG_GETPROTO_R michael@0: #endif michael@0: michael@0: #if !defined(_PR_HAVE_GETPROTO_R) michael@0: PRLock* _getproto_lock = NULL; michael@0: #endif michael@0: michael@0: #if defined(_PR_INET6_PROBE) michael@0: extern PRBool _pr_ipv6_is_present(void); michael@0: #endif michael@0: michael@0: #define _PR_IN6_IS_ADDR_UNSPECIFIED(a) \ michael@0: (((a)->pr_s6_addr32[0] == 0) && \ michael@0: ((a)->pr_s6_addr32[1] == 0) && \ michael@0: ((a)->pr_s6_addr32[2] == 0) && \ michael@0: ((a)->pr_s6_addr32[3] == 0)) michael@0: michael@0: #define _PR_IN6_IS_ADDR_LOOPBACK(a) \ michael@0: (((a)->pr_s6_addr32[0] == 0) && \ michael@0: ((a)->pr_s6_addr32[1] == 0) && \ michael@0: ((a)->pr_s6_addr32[2] == 0) && \ michael@0: ((a)->pr_s6_addr[12] == 0) && \ michael@0: ((a)->pr_s6_addr[13] == 0) && \ michael@0: ((a)->pr_s6_addr[14] == 0) && \ michael@0: ((a)->pr_s6_addr[15] == 0x1U)) michael@0: michael@0: const PRIPv6Addr _pr_in6addr_any = {{{ 0, 0, 0, 0, michael@0: 0, 0, 0, 0, michael@0: 0, 0, 0, 0, michael@0: 0, 0, 0, 0 }}}; michael@0: michael@0: const PRIPv6Addr _pr_in6addr_loopback = {{{ 0, 0, 0, 0, michael@0: 0, 0, 0, 0, michael@0: 0, 0, 0, 0, michael@0: 0, 0, 0, 0x1U }}}; michael@0: /* michael@0: * The values at bytes 10 and 11 are compared using pointers to michael@0: * 8-bit fields, and not 32-bit fields, to make the comparison work on michael@0: * both big-endian and little-endian systems michael@0: */ michael@0: michael@0: #define _PR_IN6_IS_ADDR_V4MAPPED(a) \ michael@0: (((a)->pr_s6_addr32[0] == 0) && \ michael@0: ((a)->pr_s6_addr32[1] == 0) && \ michael@0: ((a)->pr_s6_addr[8] == 0) && \ michael@0: ((a)->pr_s6_addr[9] == 0) && \ michael@0: ((a)->pr_s6_addr[10] == 0xff) && \ michael@0: ((a)->pr_s6_addr[11] == 0xff)) michael@0: michael@0: #define _PR_IN6_IS_ADDR_V4COMPAT(a) \ michael@0: (((a)->pr_s6_addr32[0] == 0) && \ michael@0: ((a)->pr_s6_addr32[1] == 0) && \ michael@0: ((a)->pr_s6_addr32[2] == 0)) michael@0: michael@0: #define _PR_IN6_V4MAPPED_TO_IPADDR(a) ((a)->pr_s6_addr32[3]) michael@0: michael@0: #if defined(_PR_INET6) && defined(_PR_HAVE_GETHOSTBYNAME2) michael@0: michael@0: /* michael@0: * The _pr_QueryNetIfs() function finds out if the system has michael@0: * IPv4 or IPv6 source addresses configured and sets _pr_have_inet_if michael@0: * and _pr_have_inet6_if accordingly. michael@0: * michael@0: * We have an implementation using SIOCGIFCONF ioctl and a michael@0: * default implementation that simply sets _pr_have_inet_if michael@0: * and _pr_have_inet6_if to true. A better implementation michael@0: * would be to use the routing sockets (see Chapter 17 of michael@0: * W. Richard Stevens' Unix Network Programming, Vol. 1, 2nd. Ed.) michael@0: */ michael@0: michael@0: static PRLock *_pr_query_ifs_lock = NULL; michael@0: static PRBool _pr_have_inet_if = PR_FALSE; michael@0: static PRBool _pr_have_inet6_if = PR_FALSE; michael@0: michael@0: #undef DEBUG_QUERY_IFS michael@0: michael@0: #if defined(AIX) \ michael@0: || (defined(DARWIN) && (!defined(HAVE_GETIFADDRS) \ michael@0: || (defined(XP_MACOSX) && (!defined(MAC_OS_X_VERSION_10_2) || \ michael@0: MAC_OS_X_VERSION_MIN_REQUIRED < MAC_OS_X_VERSION_10_2)))) michael@0: michael@0: /* michael@0: * Use SIOCGIFCONF ioctl on platforms that don't have routing michael@0: * sockets. Warning: whether SIOCGIFCONF ioctl returns AF_INET6 michael@0: * network interfaces is not portable. michael@0: * michael@0: * The _pr_QueryNetIfs() function is derived from the code in michael@0: * src/lib/libc/net/getifaddrs.c in BSD Unix and the code in michael@0: * Section 16.6 of W. Richard Stevens' Unix Network Programming, michael@0: * Vol. 1, 2nd. Ed. michael@0: */ michael@0: michael@0: #include michael@0: #include michael@0: #include michael@0: #include michael@0: michael@0: #ifdef DEBUG_QUERY_IFS michael@0: static void michael@0: _pr_PrintIfreq(struct ifreq *ifr) michael@0: { michael@0: PRNetAddr addr; michael@0: struct sockaddr *sa; michael@0: const char* family; michael@0: char addrstr[64]; michael@0: michael@0: sa = &ifr->ifr_addr; michael@0: if (sa->sa_family == AF_INET) { michael@0: struct sockaddr_in *sin = (struct sockaddr_in *)sa; michael@0: family = "inet"; michael@0: memcpy(&addr.inet.ip, &sin->sin_addr, sizeof(sin->sin_addr)); michael@0: } else if (sa->sa_family == AF_INET6) { michael@0: struct sockaddr_in6 *sin6 = (struct sockaddr_in6 *)sa; michael@0: family = "inet6"; michael@0: memcpy(&addr.ipv6.ip, &sin6->sin6_addr, sizeof(sin6->sin6_addr)); michael@0: } else { michael@0: return; /* skip if not AF_INET or AF_INET6 */ michael@0: } michael@0: addr.raw.family = sa->sa_family; michael@0: PR_NetAddrToString(&addr, addrstr, sizeof(addrstr)); michael@0: printf("%s: %s %s\n", ifr->ifr_name, family, addrstr); michael@0: } michael@0: #endif michael@0: michael@0: static void michael@0: _pr_QueryNetIfs(void) michael@0: { michael@0: int sock; michael@0: int rv; michael@0: struct ifconf ifc; michael@0: struct ifreq *ifr; michael@0: struct ifreq *lifr; michael@0: PRUint32 len, lastlen; michael@0: char *buf; michael@0: michael@0: if ((sock = socket(AF_INET, SOCK_STREAM, 0)) == -1) { michael@0: return; michael@0: } michael@0: michael@0: /* Issue SIOCGIFCONF request in a loop. */ michael@0: lastlen = 0; michael@0: len = 100 * sizeof(struct ifreq); /* initial buffer size guess */ michael@0: for (;;) { michael@0: buf = (char *)PR_Malloc(len); michael@0: if (NULL == buf) { michael@0: close(sock); michael@0: return; michael@0: } michael@0: ifc.ifc_buf = buf; michael@0: ifc.ifc_len = len; michael@0: rv = ioctl(sock, SIOCGIFCONF, &ifc); michael@0: if (rv < 0) { michael@0: if (errno != EINVAL || lastlen != 0) { michael@0: close(sock); michael@0: PR_Free(buf); michael@0: return; michael@0: } michael@0: } else { michael@0: if (ifc.ifc_len == lastlen) michael@0: break; /* success, len has not changed */ michael@0: lastlen = ifc.ifc_len; michael@0: } michael@0: len += 10 * sizeof(struct ifreq); /* increment */ michael@0: PR_Free(buf); michael@0: } michael@0: close(sock); michael@0: michael@0: ifr = ifc.ifc_req; michael@0: lifr = (struct ifreq *)&ifc.ifc_buf[ifc.ifc_len]; michael@0: michael@0: while (ifr < lifr) { michael@0: struct sockaddr *sa; michael@0: int sa_len; michael@0: michael@0: #ifdef DEBUG_QUERY_IFS michael@0: _pr_PrintIfreq(ifr); michael@0: #endif michael@0: sa = &ifr->ifr_addr; michael@0: if (sa->sa_family == AF_INET) { michael@0: struct sockaddr_in *sin = (struct sockaddr_in *) sa; michael@0: if (sin->sin_addr.s_addr != htonl(INADDR_LOOPBACK)) { michael@0: _pr_have_inet_if = PR_TRUE; michael@0: } michael@0: } else if (sa->sa_family == AF_INET6) { michael@0: struct sockaddr_in6 *sin6 = (struct sockaddr_in6 *) sa; michael@0: if (!IN6_IS_ADDR_LOOPBACK(&sin6->sin6_addr) michael@0: && !IN6_IS_ADDR_LINKLOCAL(&sin6->sin6_addr)) { michael@0: _pr_have_inet6_if = PR_TRUE; michael@0: } michael@0: } michael@0: michael@0: #ifdef _PR_HAVE_SOCKADDR_LEN michael@0: sa_len = PR_MAX(sa->sa_len, sizeof(struct sockaddr)); michael@0: #else michael@0: switch (sa->sa_family) { michael@0: #ifdef AF_LINK michael@0: case AF_LINK: michael@0: sa_len = sizeof(struct sockaddr_dl); michael@0: break; michael@0: #endif michael@0: case AF_INET6: michael@0: sa_len = sizeof(struct sockaddr_in6); michael@0: break; michael@0: default: michael@0: sa_len = sizeof(struct sockaddr); michael@0: break; michael@0: } michael@0: #endif michael@0: ifr = (struct ifreq *)(((char *)sa) + sa_len); michael@0: } michael@0: PR_Free(buf); michael@0: } michael@0: michael@0: #elif (defined(DARWIN) && defined(HAVE_GETIFADDRS)) || defined(FREEBSD) \ michael@0: || defined(NETBSD) || defined(OPENBSD) michael@0: michael@0: /* michael@0: * Use the BSD getifaddrs function. michael@0: */ michael@0: michael@0: #include michael@0: #include michael@0: #include michael@0: #include michael@0: michael@0: #ifdef DEBUG_QUERY_IFS michael@0: static void michael@0: _pr_PrintIfaddrs(struct ifaddrs *ifa) michael@0: { michael@0: struct sockaddr *sa; michael@0: const char* family; michael@0: void *addrp; michael@0: char addrstr[64]; michael@0: michael@0: sa = ifa->ifa_addr; michael@0: if (sa->sa_family == AF_INET) { michael@0: struct sockaddr_in *sin = (struct sockaddr_in *)sa; michael@0: family = "inet"; michael@0: addrp = &sin->sin_addr; michael@0: } else if (sa->sa_family == AF_INET6) { michael@0: struct sockaddr_in6 *sin6 = (struct sockaddr_in6 *)sa; michael@0: family = "inet6"; michael@0: addrp = &sin6->sin6_addr; michael@0: } else { michael@0: return; /* skip if not AF_INET or AF_INET6 */ michael@0: } michael@0: inet_ntop(sa->sa_family, addrp, addrstr, sizeof(addrstr)); michael@0: printf("%s: %s %s\n", ifa->ifa_name, family, addrstr); michael@0: } michael@0: #endif michael@0: michael@0: static void michael@0: _pr_QueryNetIfs(void) michael@0: { michael@0: struct ifaddrs *ifp; michael@0: struct ifaddrs *ifa; michael@0: michael@0: if (getifaddrs(&ifp) == -1) { michael@0: return; michael@0: } michael@0: for (ifa = ifp; ifa; ifa = ifa->ifa_next) { michael@0: struct sockaddr *sa; michael@0: michael@0: #ifdef DEBUG_QUERY_IFS michael@0: _pr_PrintIfaddrs(ifa); michael@0: #endif michael@0: sa = ifa->ifa_addr; michael@0: if (sa->sa_family == AF_INET) { michael@0: struct sockaddr_in *sin = (struct sockaddr_in *) sa; michael@0: if (sin->sin_addr.s_addr != htonl(INADDR_LOOPBACK)) { michael@0: _pr_have_inet_if = 1; michael@0: } michael@0: } else if (sa->sa_family == AF_INET6) { michael@0: struct sockaddr_in6 *sin6 = (struct sockaddr_in6 *) sa; michael@0: if (!IN6_IS_ADDR_LOOPBACK(&sin6->sin6_addr) michael@0: && !IN6_IS_ADDR_LINKLOCAL(&sin6->sin6_addr)) { michael@0: _pr_have_inet6_if = 1; michael@0: } michael@0: } michael@0: } michael@0: freeifaddrs(ifp); michael@0: } michael@0: michael@0: #else /* default */ michael@0: michael@0: /* michael@0: * Emulate the code in NSPR 4.2 or older. PR_GetIPNodeByName behaves michael@0: * as if the system had both IPv4 and IPv6 source addresses configured. michael@0: */ michael@0: static void michael@0: _pr_QueryNetIfs(void) michael@0: { michael@0: _pr_have_inet_if = PR_TRUE; michael@0: _pr_have_inet6_if = PR_TRUE; michael@0: } michael@0: michael@0: #endif michael@0: michael@0: #endif /* _PR_INET6 && _PR_HAVE_GETHOSTBYNAME2 */ michael@0: michael@0: void _PR_InitNet(void) michael@0: { michael@0: #if defined(XP_UNIX) michael@0: #ifdef HAVE_NETCONFIG michael@0: /* michael@0: * This one-liner prevents the endless re-open's and re-read's of michael@0: * /etc/netconfig on EACH and EVERY call to accept(), connect(), etc. michael@0: */ michael@0: (void)setnetconfig(); michael@0: #endif michael@0: #endif michael@0: #if !defined(_PR_NO_DNS_LOCK) michael@0: _pr_dnsLock = PR_NewLock(); michael@0: #endif michael@0: #if !defined(_PR_HAVE_GETPROTO_R) michael@0: _getproto_lock = PR_NewLock(); michael@0: #endif michael@0: #if defined(_PR_INET6) && defined(_PR_HAVE_GETHOSTBYNAME2) michael@0: _pr_query_ifs_lock = PR_NewLock(); michael@0: #endif michael@0: } michael@0: michael@0: void _PR_CleanupNet(void) michael@0: { michael@0: #if !defined(_PR_NO_DNS_LOCK) michael@0: if (_pr_dnsLock) { michael@0: PR_DestroyLock(_pr_dnsLock); michael@0: _pr_dnsLock = NULL; michael@0: } michael@0: #endif michael@0: #if !defined(_PR_HAVE_GETPROTO_R) michael@0: if (_getproto_lock) { michael@0: PR_DestroyLock(_getproto_lock); michael@0: _getproto_lock = NULL; michael@0: } michael@0: #endif michael@0: #if defined(_PR_INET6) && defined(_PR_HAVE_GETHOSTBYNAME2) michael@0: if (_pr_query_ifs_lock) { michael@0: PR_DestroyLock(_pr_query_ifs_lock); michael@0: _pr_query_ifs_lock = NULL; michael@0: } michael@0: #endif michael@0: } michael@0: michael@0: /* michael@0: ** Allocate space from the buffer, aligning it to "align" before doing michael@0: ** the allocation. "align" must be a power of 2. michael@0: */ michael@0: static char *Alloc(PRIntn amount, char **bufp, PRIntn *buflenp, PRIntn align) michael@0: { michael@0: char *buf = *bufp; michael@0: PRIntn buflen = *buflenp; michael@0: michael@0: if (align && ((long)buf & (align - 1))) { michael@0: PRIntn skip = align - ((ptrdiff_t)buf & (align - 1)); michael@0: if (buflen < skip) { michael@0: return 0; michael@0: } michael@0: buf += skip; michael@0: buflen -= skip; michael@0: } michael@0: if (buflen < amount) { michael@0: return 0; michael@0: } michael@0: *bufp = buf + amount; michael@0: *buflenp = buflen - amount; michael@0: return buf; michael@0: } michael@0: michael@0: typedef enum _PRIPAddrConversion { michael@0: _PRIPAddrNoConversion, michael@0: _PRIPAddrIPv4Mapped, michael@0: _PRIPAddrIPv4Compat michael@0: } _PRIPAddrConversion; michael@0: michael@0: /* michael@0: ** Convert an IPv4 address (v4) to an IPv4-mapped IPv6 address (v6). michael@0: */ michael@0: static void MakeIPv4MappedAddr(const char *v4, char *v6) michael@0: { michael@0: memset(v6, 0, 10); michael@0: memset(v6 + 10, 0xff, 2); michael@0: memcpy(v6 + 12, v4, 4); michael@0: } michael@0: michael@0: /* michael@0: ** Convert an IPv4 address (v4) to an IPv4-compatible IPv6 address (v6). michael@0: */ michael@0: static void MakeIPv4CompatAddr(const char *v4, char *v6) michael@0: { michael@0: memset(v6, 0, 12); michael@0: memcpy(v6 + 12, v4, 4); michael@0: } michael@0: michael@0: /* michael@0: ** Copy a hostent, and all of the memory that it refers to into michael@0: ** (hopefully) stacked buffers. michael@0: */ michael@0: static PRStatus CopyHostent( michael@0: struct hostent *from, michael@0: char **buf, michael@0: PRIntn *bufsize, michael@0: _PRIPAddrConversion conversion, michael@0: PRHostEnt *to) michael@0: { michael@0: PRIntn len, na; michael@0: char **ap; michael@0: michael@0: if (conversion != _PRIPAddrNoConversion michael@0: && from->h_addrtype == AF_INET) { michael@0: PR_ASSERT(from->h_length == 4); michael@0: to->h_addrtype = PR_AF_INET6; michael@0: to->h_length = 16; michael@0: } else { michael@0: #if defined(_PR_INET6) || defined(_PR_INET6_PROBE) michael@0: if (AF_INET6 == from->h_addrtype) michael@0: to->h_addrtype = PR_AF_INET6; michael@0: else michael@0: #endif michael@0: to->h_addrtype = from->h_addrtype; michael@0: to->h_length = from->h_length; michael@0: } michael@0: michael@0: /* Copy the official name */ michael@0: if (!from->h_name) return PR_FAILURE; michael@0: len = strlen(from->h_name) + 1; michael@0: to->h_name = Alloc(len, buf, bufsize, 0); michael@0: if (!to->h_name) return PR_FAILURE; michael@0: memcpy(to->h_name, from->h_name, len); michael@0: michael@0: /* Count the aliases, then allocate storage for the pointers */ michael@0: if (!from->h_aliases) { michael@0: na = 1; michael@0: } else { michael@0: for (na = 1, ap = from->h_aliases; *ap != 0; na++, ap++){;} /* nothing to execute */ michael@0: } michael@0: to->h_aliases = (char**)Alloc( michael@0: na * sizeof(char*), buf, bufsize, sizeof(char**)); michael@0: if (!to->h_aliases) return PR_FAILURE; michael@0: michael@0: /* Copy the aliases, one at a time */ michael@0: if (!from->h_aliases) { michael@0: to->h_aliases[0] = 0; michael@0: } else { michael@0: for (na = 0, ap = from->h_aliases; *ap != 0; na++, ap++) { michael@0: len = strlen(*ap) + 1; michael@0: to->h_aliases[na] = Alloc(len, buf, bufsize, 0); michael@0: if (!to->h_aliases[na]) return PR_FAILURE; michael@0: memcpy(to->h_aliases[na], *ap, len); michael@0: } michael@0: to->h_aliases[na] = 0; michael@0: } michael@0: michael@0: /* Count the addresses, then allocate storage for the pointers */ michael@0: for (na = 1, ap = from->h_addr_list; *ap != 0; na++, ap++){;} /* nothing to execute */ michael@0: to->h_addr_list = (char**)Alloc( michael@0: na * sizeof(char*), buf, bufsize, sizeof(char**)); michael@0: if (!to->h_addr_list) return PR_FAILURE; michael@0: michael@0: /* Copy the addresses, one at a time */ michael@0: for (na = 0, ap = from->h_addr_list; *ap != 0; na++, ap++) { michael@0: to->h_addr_list[na] = Alloc(to->h_length, buf, bufsize, 0); michael@0: if (!to->h_addr_list[na]) return PR_FAILURE; michael@0: if (conversion != _PRIPAddrNoConversion michael@0: && from->h_addrtype == AF_INET) { michael@0: if (conversion == _PRIPAddrIPv4Mapped) { michael@0: MakeIPv4MappedAddr(*ap, to->h_addr_list[na]); michael@0: } else { michael@0: PR_ASSERT(conversion == _PRIPAddrIPv4Compat); michael@0: MakeIPv4CompatAddr(*ap, to->h_addr_list[na]); michael@0: } michael@0: } else { michael@0: memcpy(to->h_addr_list[na], *ap, to->h_length); michael@0: } michael@0: } michael@0: to->h_addr_list[na] = 0; michael@0: return PR_SUCCESS; michael@0: } michael@0: michael@0: #ifdef SYMBIAN michael@0: /* Set p_aliases by hand because Symbian's getprotobyname() returns NULL. */ michael@0: static void AssignAliases(struct protoent *Protoent, char** aliases) michael@0: { michael@0: if (NULL == Protoent->p_aliases) { michael@0: if (0 == strcmp(Protoent->p_name, "ip")) michael@0: aliases[0] = "IP"; michael@0: else if (0 == strcmp(Protoent->p_name, "tcp")) michael@0: aliases[0] = "TCP"; michael@0: else if (0 == strcmp(Protoent->p_name, "udp")) michael@0: aliases[0] = "UDP"; michael@0: else michael@0: aliases[0] = "UNKNOWN"; michael@0: aliases[1] = NULL; michael@0: Protoent->p_aliases = aliases; michael@0: } michael@0: } michael@0: #endif michael@0: michael@0: #if !defined(_PR_HAVE_GETPROTO_R) michael@0: /* michael@0: ** Copy a protoent, and all of the memory that it refers to into michael@0: ** (hopefully) stacked buffers. michael@0: */ michael@0: static PRStatus CopyProtoent( michael@0: struct protoent *from, char *buf, PRIntn bufsize, PRProtoEnt *to) michael@0: { michael@0: PRIntn len, na; michael@0: char **ap; michael@0: michael@0: /* Do the easy stuff */ michael@0: to->p_num = from->p_proto; michael@0: michael@0: /* Copy the official name */ michael@0: if (!from->p_name) return PR_FAILURE; michael@0: len = strlen(from->p_name) + 1; michael@0: to->p_name = Alloc(len, &buf, &bufsize, 0); michael@0: if (!to->p_name) return PR_FAILURE; michael@0: memcpy(to->p_name, from->p_name, len); michael@0: michael@0: /* Count the aliases, then allocate storage for the pointers */ michael@0: for (na = 1, ap = from->p_aliases; *ap != 0; na++, ap++){;} /* nothing to execute */ michael@0: to->p_aliases = (char**)Alloc( michael@0: na * sizeof(char*), &buf, &bufsize, sizeof(char**)); michael@0: if (!to->p_aliases) return PR_FAILURE; michael@0: michael@0: /* Copy the aliases, one at a time */ michael@0: for (na = 0, ap = from->p_aliases; *ap != 0; na++, ap++) { michael@0: len = strlen(*ap) + 1; michael@0: to->p_aliases[na] = Alloc(len, &buf, &bufsize, 0); michael@0: if (!to->p_aliases[na]) return PR_FAILURE; michael@0: memcpy(to->p_aliases[na], *ap, len); michael@0: } michael@0: to->p_aliases[na] = 0; michael@0: michael@0: return PR_SUCCESS; michael@0: } michael@0: #endif /* !defined(_PR_HAVE_GETPROTO_R) */ michael@0: michael@0: /* michael@0: * ################################################################# michael@0: * NOTE: tmphe, tmpbuf, bufsize, h, and h_err are local variables michael@0: * or arguments of PR_GetHostByName, PR_GetIPNodeByName, and michael@0: * PR_GetHostByAddr. DO NOT CHANGE THE NAMES OF THESE LOCAL michael@0: * VARIABLES OR ARGUMENTS. michael@0: * ################################################################# michael@0: */ michael@0: #if defined(_PR_HAVE_GETHOST_R_INT) michael@0: michael@0: #define GETHOSTBYNAME(name) \ michael@0: (gethostbyname_r(name, &tmphe, tmpbuf, bufsize, &h, &h_err), h) michael@0: #define GETHOSTBYNAME2(name, af) \ michael@0: (gethostbyname2_r(name, af, &tmphe, tmpbuf, bufsize, &h, &h_err), h) michael@0: #define GETHOSTBYADDR(addr, addrlen, af) \ michael@0: (gethostbyaddr_r(addr, addrlen, af, \ michael@0: &tmphe, tmpbuf, bufsize, &h, &h_err), h) michael@0: michael@0: #elif defined(_PR_HAVE_GETHOST_R_POINTER) michael@0: michael@0: #define GETHOSTBYNAME(name) \ michael@0: gethostbyname_r(name, &tmphe, tmpbuf, bufsize, &h_err) michael@0: #define GETHOSTBYNAME2(name, af) \ michael@0: gethostbyname2_r(name, af, &tmphe, tmpbuf, bufsize, &h_err) michael@0: #define GETHOSTBYADDR(addr, addrlen, af) \ michael@0: gethostbyaddr_r(addr, addrlen, af, &tmphe, tmpbuf, bufsize, &h_err) michael@0: michael@0: #else michael@0: michael@0: #define GETHOSTBYNAME(name) gethostbyname(name) michael@0: #define GETHOSTBYNAME2(name, af) gethostbyname2(name, af) michael@0: #define GETHOSTBYADDR(addr, addrlen, af) gethostbyaddr(addr, addrlen, af) michael@0: michael@0: #endif /* definition of GETHOSTBYXXX */ michael@0: michael@0: PR_IMPLEMENT(PRStatus) PR_GetHostByName( michael@0: const char *name, char *buf, PRIntn bufsize, PRHostEnt *hp) michael@0: { michael@0: struct hostent *h; michael@0: PRStatus rv = PR_FAILURE; michael@0: #if defined(_PR_HAVE_GETHOST_R) michael@0: char localbuf[PR_NETDB_BUF_SIZE]; michael@0: char *tmpbuf; michael@0: struct hostent tmphe; michael@0: int h_err; michael@0: #endif michael@0: michael@0: if (!_pr_initialized) _PR_ImplicitInitialization(); michael@0: michael@0: #if defined(_PR_HAVE_GETHOST_R) michael@0: tmpbuf = localbuf; michael@0: if (bufsize > sizeof(localbuf)) michael@0: { michael@0: tmpbuf = (char *)PR_Malloc(bufsize); michael@0: if (NULL == tmpbuf) michael@0: { michael@0: PR_SetError(PR_OUT_OF_MEMORY_ERROR, 0); michael@0: return rv; michael@0: } michael@0: } michael@0: #endif michael@0: michael@0: LOCK_DNS(); michael@0: michael@0: h = GETHOSTBYNAME(name); michael@0: michael@0: if (NULL == h) michael@0: { michael@0: PR_SetError(PR_DIRECTORY_LOOKUP_ERROR, _MD_GETHOST_ERRNO()); michael@0: } michael@0: else michael@0: { michael@0: _PRIPAddrConversion conversion = _PRIPAddrNoConversion; michael@0: rv = CopyHostent(h, &buf, &bufsize, conversion, hp); michael@0: if (PR_SUCCESS != rv) michael@0: PR_SetError(PR_INSUFFICIENT_RESOURCES_ERROR, 0); michael@0: } michael@0: UNLOCK_DNS(); michael@0: #if defined(_PR_HAVE_GETHOST_R) michael@0: if (tmpbuf != localbuf) michael@0: PR_Free(tmpbuf); michael@0: #endif michael@0: return rv; michael@0: } michael@0: michael@0: #if !defined(_PR_INET6) && \ michael@0: defined(_PR_INET6_PROBE) && defined(_PR_HAVE_GETIPNODEBYNAME) michael@0: typedef struct hostent * (*_pr_getipnodebyname_t)(const char *, int, michael@0: int, int *); michael@0: typedef struct hostent * (*_pr_getipnodebyaddr_t)(const void *, size_t, michael@0: int, int *); michael@0: typedef void (*_pr_freehostent_t)(struct hostent *); michael@0: static void * _pr_getipnodebyname_fp; michael@0: static void * _pr_getipnodebyaddr_fp; michael@0: static void * _pr_freehostent_fp; michael@0: michael@0: /* michael@0: * Look up the addresses of getipnodebyname, getipnodebyaddr, michael@0: * and freehostent. michael@0: */ michael@0: PRStatus michael@0: _pr_find_getipnodebyname(void) michael@0: { michael@0: PRLibrary *lib; michael@0: PRStatus rv; michael@0: #define GETIPNODEBYNAME "getipnodebyname" michael@0: #define GETIPNODEBYADDR "getipnodebyaddr" michael@0: #define FREEHOSTENT "freehostent" michael@0: michael@0: _pr_getipnodebyname_fp = PR_FindSymbolAndLibrary(GETIPNODEBYNAME, &lib); michael@0: if (NULL != _pr_getipnodebyname_fp) { michael@0: _pr_freehostent_fp = PR_FindSymbol(lib, FREEHOSTENT); michael@0: if (NULL != _pr_freehostent_fp) { michael@0: _pr_getipnodebyaddr_fp = PR_FindSymbol(lib, GETIPNODEBYADDR); michael@0: if (NULL != _pr_getipnodebyaddr_fp) michael@0: rv = PR_SUCCESS; michael@0: else michael@0: rv = PR_FAILURE; michael@0: } else michael@0: rv = PR_FAILURE; michael@0: (void)PR_UnloadLibrary(lib); michael@0: } else michael@0: rv = PR_FAILURE; michael@0: return rv; michael@0: } michael@0: #endif michael@0: michael@0: #if defined(_PR_INET6) && defined(_PR_HAVE_GETHOSTBYNAME2) michael@0: /* michael@0: ** Append the V4 addresses to the end of the list michael@0: */ michael@0: static PRStatus AppendV4AddrsToHostent( michael@0: struct hostent *from, michael@0: char **buf, michael@0: PRIntn *bufsize, michael@0: PRHostEnt *to) michael@0: { michael@0: PRIntn na, na_old; michael@0: char **ap; michael@0: char **new_addr_list; michael@0: michael@0: /* Count the addresses, then grow storage for the pointers */ michael@0: for (na_old = 0, ap = to->h_addr_list; *ap != 0; na_old++, ap++) michael@0: {;} /* nothing to execute */ michael@0: for (na = na_old + 1, ap = from->h_addr_list; *ap != 0; na++, ap++) michael@0: {;} /* nothing to execute */ michael@0: new_addr_list = (char**)Alloc( michael@0: na * sizeof(char*), buf, bufsize, sizeof(char**)); michael@0: if (!new_addr_list) return PR_FAILURE; michael@0: michael@0: /* Copy the V6 addresses, one at a time */ michael@0: for (na = 0, ap = to->h_addr_list; *ap != 0; na++, ap++) { michael@0: new_addr_list[na] = to->h_addr_list[na]; michael@0: } michael@0: to->h_addr_list = new_addr_list; michael@0: michael@0: /* Copy the V4 addresses, one at a time */ michael@0: for (ap = from->h_addr_list; *ap != 0; na++, ap++) { michael@0: to->h_addr_list[na] = Alloc(to->h_length, buf, bufsize, 0); michael@0: if (!to->h_addr_list[na]) return PR_FAILURE; michael@0: MakeIPv4MappedAddr(*ap, to->h_addr_list[na]); michael@0: } michael@0: to->h_addr_list[na] = 0; michael@0: return PR_SUCCESS; michael@0: } michael@0: #endif michael@0: michael@0: PR_IMPLEMENT(PRStatus) PR_GetIPNodeByName( michael@0: const char *name, PRUint16 af, PRIntn flags, michael@0: char *buf, PRIntn bufsize, PRHostEnt *hp) michael@0: { michael@0: struct hostent *h = 0; michael@0: PRStatus rv = PR_FAILURE; michael@0: #if defined(_PR_HAVE_GETHOST_R) michael@0: char localbuf[PR_NETDB_BUF_SIZE]; michael@0: char *tmpbuf; michael@0: struct hostent tmphe; michael@0: int h_err; michael@0: #endif michael@0: #if defined(_PR_HAVE_GETIPNODEBYNAME) michael@0: PRUint16 md_af = af; michael@0: int error_num; michael@0: int tmp_flags = 0; michael@0: #endif michael@0: #if defined(_PR_HAVE_GETHOSTBYNAME2) michael@0: PRBool did_af_inet = PR_FALSE; michael@0: #endif michael@0: michael@0: if (!_pr_initialized) _PR_ImplicitInitialization(); michael@0: michael@0: if (af != PR_AF_INET && af != PR_AF_INET6) { michael@0: PR_SetError(PR_INVALID_ARGUMENT_ERROR, 0); michael@0: return PR_FAILURE; michael@0: } michael@0: michael@0: #if defined(_PR_INET6) && defined(_PR_HAVE_GETHOSTBYNAME2) michael@0: PR_Lock(_pr_query_ifs_lock); michael@0: /* michael@0: * Keep querying the presence of IPv4 and IPv6 interfaces until michael@0: * at least one is up. This allows us to detect the local michael@0: * machine going from offline to online. michael@0: */ michael@0: if (!_pr_have_inet_if && !_pr_have_inet6_if) { michael@0: _pr_QueryNetIfs(); michael@0: #ifdef DEBUG_QUERY_IFS michael@0: if (_pr_have_inet_if) michael@0: printf("Have IPv4 source address\n"); michael@0: if (_pr_have_inet6_if) michael@0: printf("Have IPv6 source address\n"); michael@0: #endif michael@0: } michael@0: PR_Unlock(_pr_query_ifs_lock); michael@0: #endif michael@0: michael@0: #if defined(_PR_HAVE_GETIPNODEBYNAME) michael@0: if (flags & PR_AI_V4MAPPED) michael@0: tmp_flags |= AI_V4MAPPED; michael@0: if (flags & PR_AI_ADDRCONFIG) michael@0: tmp_flags |= AI_ADDRCONFIG; michael@0: if (flags & PR_AI_ALL) michael@0: tmp_flags |= AI_ALL; michael@0: if (af == PR_AF_INET6) michael@0: md_af = AF_INET6; michael@0: else michael@0: md_af = af; michael@0: #endif michael@0: michael@0: #if defined(_PR_HAVE_GETHOST_R) michael@0: tmpbuf = localbuf; michael@0: if (bufsize > sizeof(localbuf)) michael@0: { michael@0: tmpbuf = (char *)PR_Malloc(bufsize); michael@0: if (NULL == tmpbuf) michael@0: { michael@0: PR_SetError(PR_OUT_OF_MEMORY_ERROR, 0); michael@0: return rv; michael@0: } michael@0: } michael@0: #endif michael@0: michael@0: /* Do not need to lock the DNS lock if getipnodebyname() is called */ michael@0: #ifdef _PR_INET6 michael@0: #ifdef _PR_HAVE_GETHOSTBYNAME2 michael@0: LOCK_DNS(); michael@0: if (af == PR_AF_INET6) michael@0: { michael@0: if ((flags & PR_AI_ADDRCONFIG) == 0 || _pr_have_inet6_if) michael@0: { michael@0: #ifdef _PR_INET6_PROBE michael@0: if (_pr_ipv6_is_present()) michael@0: #endif michael@0: h = GETHOSTBYNAME2(name, AF_INET6); michael@0: } michael@0: if ((NULL == h) && (flags & PR_AI_V4MAPPED) michael@0: && ((flags & PR_AI_ADDRCONFIG) == 0 || _pr_have_inet_if)) michael@0: { michael@0: did_af_inet = PR_TRUE; michael@0: h = GETHOSTBYNAME2(name, AF_INET); michael@0: } michael@0: } michael@0: else michael@0: { michael@0: if ((flags & PR_AI_ADDRCONFIG) == 0 || _pr_have_inet_if) michael@0: { michael@0: did_af_inet = PR_TRUE; michael@0: h = GETHOSTBYNAME2(name, af); michael@0: } michael@0: } michael@0: #elif defined(_PR_HAVE_GETIPNODEBYNAME) michael@0: h = getipnodebyname(name, md_af, tmp_flags, &error_num); michael@0: #else michael@0: #error "Unknown name-to-address translation function" michael@0: #endif /* _PR_HAVE_GETHOSTBYNAME2 */ michael@0: #elif defined(_PR_INET6_PROBE) && defined(_PR_HAVE_GETIPNODEBYNAME) michael@0: if (_pr_ipv6_is_present()) michael@0: { michael@0: #ifdef PR_GETIPNODE_NOT_THREADSAFE michael@0: LOCK_DNS(); michael@0: #endif michael@0: h = (*((_pr_getipnodebyname_t)_pr_getipnodebyname_fp))(name, md_af, tmp_flags, &error_num); michael@0: } michael@0: else michael@0: { michael@0: LOCK_DNS(); michael@0: h = GETHOSTBYNAME(name); michael@0: } michael@0: #else /* _PR_INET6 */ michael@0: LOCK_DNS(); michael@0: h = GETHOSTBYNAME(name); michael@0: #endif /* _PR_INET6 */ michael@0: michael@0: if (NULL == h) michael@0: { michael@0: #if defined(_PR_INET6) && defined(_PR_HAVE_GETIPNODEBYNAME) michael@0: PR_SetError(PR_DIRECTORY_LOOKUP_ERROR, error_num); michael@0: #elif defined(_PR_INET6_PROBE) && defined(_PR_HAVE_GETIPNODEBYNAME) michael@0: if (_pr_ipv6_is_present()) michael@0: PR_SetError(PR_DIRECTORY_LOOKUP_ERROR, error_num); michael@0: else michael@0: PR_SetError(PR_DIRECTORY_LOOKUP_ERROR, _MD_GETHOST_ERRNO()); michael@0: #else michael@0: PR_SetError(PR_DIRECTORY_LOOKUP_ERROR, _MD_GETHOST_ERRNO()); michael@0: #endif michael@0: } michael@0: else michael@0: { michael@0: _PRIPAddrConversion conversion = _PRIPAddrNoConversion; michael@0: michael@0: if (af == PR_AF_INET6) conversion = _PRIPAddrIPv4Mapped; michael@0: rv = CopyHostent(h, &buf, &bufsize, conversion, hp); michael@0: if (PR_SUCCESS != rv) michael@0: PR_SetError(PR_INSUFFICIENT_RESOURCES_ERROR, 0); michael@0: #if defined(_PR_INET6) && defined(_PR_HAVE_GETIPNODEBYNAME) michael@0: freehostent(h); michael@0: #elif defined(_PR_INET6_PROBE) && defined(_PR_HAVE_GETIPNODEBYNAME) michael@0: if (_pr_ipv6_is_present()) michael@0: (*((_pr_freehostent_t)_pr_freehostent_fp))(h); michael@0: #endif michael@0: #if defined(_PR_INET6) && defined(_PR_HAVE_GETHOSTBYNAME2) michael@0: if ((PR_SUCCESS == rv) && (flags & PR_AI_V4MAPPED) michael@0: && ((flags & PR_AI_ALL) michael@0: || ((flags & PR_AI_ADDRCONFIG) && _pr_have_inet_if)) michael@0: && !did_af_inet && (h = GETHOSTBYNAME2(name, AF_INET)) != 0) { michael@0: rv = AppendV4AddrsToHostent(h, &buf, &bufsize, hp); michael@0: if (PR_SUCCESS != rv) michael@0: PR_SetError(PR_INSUFFICIENT_RESOURCES_ERROR, 0); michael@0: } michael@0: #endif michael@0: } michael@0: michael@0: /* Must match the convoluted logic above for LOCK_DNS() */ michael@0: #ifdef _PR_INET6 michael@0: #ifdef _PR_HAVE_GETHOSTBYNAME2 michael@0: UNLOCK_DNS(); michael@0: #endif /* _PR_HAVE_GETHOSTBYNAME2 */ michael@0: #elif defined(_PR_INET6_PROBE) && defined(_PR_HAVE_GETIPNODEBYNAME) michael@0: #ifdef PR_GETIPNODE_NOT_THREADSAFE michael@0: UNLOCK_DNS(); michael@0: #else michael@0: if (!_pr_ipv6_is_present()) michael@0: UNLOCK_DNS(); michael@0: #endif michael@0: #else /* _PR_INET6 */ michael@0: UNLOCK_DNS(); michael@0: #endif /* _PR_INET6 */ michael@0: michael@0: #if defined(_PR_HAVE_GETHOST_R) michael@0: if (tmpbuf != localbuf) michael@0: PR_Free(tmpbuf); michael@0: #endif michael@0: michael@0: return rv; michael@0: } michael@0: michael@0: PR_IMPLEMENT(PRStatus) PR_GetHostByAddr( michael@0: const PRNetAddr *hostaddr, char *buf, PRIntn bufsize, PRHostEnt *hostentry) michael@0: { michael@0: struct hostent *h; michael@0: PRStatus rv = PR_FAILURE; michael@0: const void *addr; michael@0: PRUint32 tmp_ip; michael@0: int addrlen; michael@0: PRInt32 af; michael@0: #if defined(_PR_HAVE_GETHOST_R) michael@0: char localbuf[PR_NETDB_BUF_SIZE]; michael@0: char *tmpbuf; michael@0: struct hostent tmphe; michael@0: int h_err; michael@0: #endif michael@0: #if defined(_PR_HAVE_GETIPNODEBYADDR) michael@0: int error_num; michael@0: #endif michael@0: michael@0: if (!_pr_initialized) _PR_ImplicitInitialization(); michael@0: michael@0: if (hostaddr->raw.family == PR_AF_INET6) michael@0: { michael@0: #if defined(_PR_INET6_PROBE) michael@0: af = _pr_ipv6_is_present() ? AF_INET6 : AF_INET; michael@0: #elif defined(_PR_INET6) michael@0: af = AF_INET6; michael@0: #else michael@0: af = AF_INET; michael@0: #endif michael@0: #if defined(_PR_GHBA_DISALLOW_V4MAPPED) michael@0: if (_PR_IN6_IS_ADDR_V4MAPPED(&hostaddr->ipv6.ip)) michael@0: af = AF_INET; michael@0: #endif michael@0: } michael@0: else michael@0: { michael@0: PR_ASSERT(hostaddr->raw.family == AF_INET); michael@0: af = AF_INET; michael@0: } michael@0: if (hostaddr->raw.family == PR_AF_INET6) { michael@0: #if defined(_PR_INET6) || defined(_PR_INET6_PROBE) michael@0: if (af == AF_INET6) { michael@0: addr = &hostaddr->ipv6.ip; michael@0: addrlen = sizeof(hostaddr->ipv6.ip); michael@0: } michael@0: else michael@0: #endif michael@0: { michael@0: PR_ASSERT(af == AF_INET); michael@0: if (!_PR_IN6_IS_ADDR_V4MAPPED(&hostaddr->ipv6.ip)) { michael@0: PR_SetError(PR_INVALID_ARGUMENT_ERROR, 0); michael@0: return rv; michael@0: } michael@0: tmp_ip = _PR_IN6_V4MAPPED_TO_IPADDR((PRIPv6Addr *) michael@0: &hostaddr->ipv6.ip); michael@0: addr = &tmp_ip; michael@0: addrlen = sizeof(tmp_ip); michael@0: } michael@0: } else { michael@0: PR_ASSERT(hostaddr->raw.family == AF_INET); michael@0: PR_ASSERT(af == AF_INET); michael@0: addr = &hostaddr->inet.ip; michael@0: addrlen = sizeof(hostaddr->inet.ip); michael@0: } michael@0: michael@0: #if defined(_PR_HAVE_GETHOST_R) michael@0: tmpbuf = localbuf; michael@0: if (bufsize > sizeof(localbuf)) michael@0: { michael@0: tmpbuf = (char *)PR_Malloc(bufsize); michael@0: if (NULL == tmpbuf) michael@0: { michael@0: PR_SetError(PR_OUT_OF_MEMORY_ERROR, 0); michael@0: return rv; michael@0: } michael@0: } michael@0: #endif michael@0: michael@0: /* Do not need to lock the DNS lock if getipnodebyaddr() is called */ michael@0: #if defined(_PR_HAVE_GETIPNODEBYADDR) && defined(_PR_INET6) michael@0: h = getipnodebyaddr(addr, addrlen, af, &error_num); michael@0: #elif defined(_PR_HAVE_GETIPNODEBYADDR) && defined(_PR_INET6_PROBE) michael@0: if (_pr_ipv6_is_present()) michael@0: { michael@0: #ifdef PR_GETIPNODE_NOT_THREADSAFE michael@0: LOCK_DNS(); michael@0: #endif michael@0: h = (*((_pr_getipnodebyaddr_t)_pr_getipnodebyaddr_fp))(addr, addrlen, michael@0: af, &error_num); michael@0: } michael@0: else michael@0: { michael@0: LOCK_DNS(); michael@0: h = GETHOSTBYADDR(addr, addrlen, af); michael@0: } michael@0: #else /* _PR_HAVE_GETIPNODEBYADDR */ michael@0: LOCK_DNS(); michael@0: h = GETHOSTBYADDR(addr, addrlen, af); michael@0: #endif /* _PR_HAVE_GETIPNODEBYADDR */ michael@0: if (NULL == h) michael@0: { michael@0: #if defined(_PR_INET6) && defined(_PR_HAVE_GETIPNODEBYADDR) michael@0: PR_SetError(PR_DIRECTORY_LOOKUP_ERROR, error_num); michael@0: #elif defined(_PR_INET6_PROBE) && defined(_PR_HAVE_GETIPNODEBYADDR) michael@0: if (_pr_ipv6_is_present()) michael@0: PR_SetError(PR_DIRECTORY_LOOKUP_ERROR, error_num); michael@0: else michael@0: PR_SetError(PR_DIRECTORY_LOOKUP_ERROR, _MD_GETHOST_ERRNO()); michael@0: #else michael@0: PR_SetError(PR_DIRECTORY_LOOKUP_ERROR, _MD_GETHOST_ERRNO()); michael@0: #endif michael@0: } michael@0: else michael@0: { michael@0: _PRIPAddrConversion conversion = _PRIPAddrNoConversion; michael@0: if (hostaddr->raw.family == PR_AF_INET6) { michael@0: if (af == AF_INET) { michael@0: if (_PR_IN6_IS_ADDR_V4MAPPED((PRIPv6Addr*) michael@0: &hostaddr->ipv6.ip)) { michael@0: conversion = _PRIPAddrIPv4Mapped; michael@0: } else if (_PR_IN6_IS_ADDR_V4COMPAT((PRIPv6Addr *) michael@0: &hostaddr->ipv6.ip)) { michael@0: conversion = _PRIPAddrIPv4Compat; michael@0: } michael@0: } michael@0: } michael@0: rv = CopyHostent(h, &buf, &bufsize, conversion, hostentry); michael@0: if (PR_SUCCESS != rv) { michael@0: PR_SetError(PR_INSUFFICIENT_RESOURCES_ERROR, 0); michael@0: } michael@0: #if defined(_PR_INET6) && defined(_PR_HAVE_GETIPNODEBYADDR) michael@0: freehostent(h); michael@0: #elif defined(_PR_INET6_PROBE) && defined(_PR_HAVE_GETIPNODEBYADDR) michael@0: if (_pr_ipv6_is_present()) michael@0: (*((_pr_freehostent_t)_pr_freehostent_fp))(h); michael@0: #endif michael@0: } michael@0: michael@0: /* Must match the convoluted logic above for LOCK_DNS() */ michael@0: #if defined(_PR_HAVE_GETIPNODEBYADDR) && defined(_PR_INET6) michael@0: #elif defined(_PR_HAVE_GETIPNODEBYADDR) && defined(_PR_INET6_PROBE) michael@0: #ifdef PR_GETIPNODE_NOT_THREADSAFE michael@0: UNLOCK_DNS(); michael@0: #else michael@0: if (!_pr_ipv6_is_present()) michael@0: UNLOCK_DNS(); michael@0: #endif michael@0: #else /* _PR_HAVE_GETIPNODEBYADDR */ michael@0: UNLOCK_DNS(); michael@0: #endif /* _PR_HAVE_GETIPNODEBYADDR */ michael@0: michael@0: #if defined(_PR_HAVE_GETHOST_R) michael@0: if (tmpbuf != localbuf) michael@0: PR_Free(tmpbuf); michael@0: #endif michael@0: michael@0: return rv; michael@0: } michael@0: michael@0: /******************************************************************************/ michael@0: /* michael@0: * Some systems define a reentrant version of getprotobyname(). Too bad michael@0: * the signature isn't always the same. But hey, they tried. If there michael@0: * is such a definition, use it. Otherwise, grab a lock and do it here. michael@0: */ michael@0: /******************************************************************************/ michael@0: michael@0: #if !defined(_PR_HAVE_GETPROTO_R) michael@0: /* michael@0: * This may seem like a silly thing to do, but the compiler SHOULD michael@0: * complain if getprotobyname_r() is implemented on some system and michael@0: * we're not using it. For sure these signatures are different than michael@0: * any usable implementation. michael@0: */ michael@0: michael@0: #if defined(ANDROID) michael@0: /* Android's Bionic libc system includes prototypes for these in netdb.h, michael@0: * but doesn't actually include implementations. It uses the 5-arg form, michael@0: * so these functions end up not matching the prototype. So just rename michael@0: * them if not found. michael@0: */ michael@0: #define getprotobyname_r _pr_getprotobyname_r michael@0: #define getprotobynumber_r _pr_getprotobynumber_r michael@0: #endif michael@0: michael@0: static struct protoent *getprotobyname_r(const char* name) michael@0: { michael@0: return getprotobyname(name); michael@0: } /* getprotobyname_r */ michael@0: michael@0: static struct protoent *getprotobynumber_r(PRInt32 number) michael@0: { michael@0: return getprotobynumber(number); michael@0: } /* getprotobynumber_r */ michael@0: michael@0: #endif /* !defined(_PR_HAVE_GETPROTO_R) */ michael@0: michael@0: PR_IMPLEMENT(PRStatus) PR_GetProtoByName( michael@0: const char* name, char* buffer, PRInt32 buflen, PRProtoEnt* result) michael@0: { michael@0: PRStatus rv = PR_SUCCESS; michael@0: #if defined(_PR_HAVE_GETPROTO_R) michael@0: struct protoent* res = (struct protoent*)result; michael@0: #endif michael@0: michael@0: if (!_pr_initialized) _PR_ImplicitInitialization(); michael@0: michael@0: #if defined(_PR_HAVE_GETPROTO_R_INT) michael@0: { michael@0: /* michael@0: ** The protoent_data has a pointer as the first field. michael@0: ** That implies the buffer better be aligned, and char* michael@0: ** doesn't promise much. michael@0: */ michael@0: PRUptrdiff aligned = (PRUptrdiff)buffer; michael@0: if (0 != (aligned & (sizeof(struct protoent_data*) - 1))) michael@0: { michael@0: aligned += sizeof(struct protoent_data*) - 1; michael@0: aligned &= ~(sizeof(struct protoent_data*) - 1); michael@0: buflen -= (aligned - (PRUptrdiff)buffer); michael@0: buffer = (char*)aligned; michael@0: } michael@0: } michael@0: #endif /* defined(_PR_HAVE_GETPROTO_R_INT) */ michael@0: michael@0: if (PR_NETDB_BUF_SIZE > buflen) michael@0: { michael@0: PR_SetError(PR_INVALID_ARGUMENT_ERROR, 0); michael@0: return PR_FAILURE; michael@0: } michael@0: michael@0: #if defined(_PR_HAVE_GETPROTO_R_POINTER) michael@0: if (NULL == getprotobyname_r(name, res, buffer, buflen)) michael@0: { michael@0: PR_SetError(PR_DIRECTORY_LOOKUP_ERROR, _MD_ERRNO()); michael@0: return PR_FAILURE; michael@0: } michael@0: #elif defined(_PR_HAVE_GETPROTO_R_INT) michael@0: /* michael@0: ** The buffer needs to be zero'd, and it should be michael@0: ** at least the size of a struct protoent_data. michael@0: */ michael@0: memset(buffer, 0, buflen); michael@0: if (-1 == getprotobyname_r(name, res, (struct protoent_data*)buffer)) michael@0: { michael@0: PR_SetError(PR_DIRECTORY_LOOKUP_ERROR, _MD_ERRNO()); michael@0: return PR_FAILURE; michael@0: } michael@0: #elif defined(_PR_HAVE_5_ARG_GETPROTO_R) michael@0: /* The 5th argument for getprotobyname_r() cannot be NULL */ michael@0: if (-1 == getprotobyname_r(name, res, buffer, buflen, &res)) michael@0: { michael@0: PR_SetError(PR_DIRECTORY_LOOKUP_ERROR, _MD_ERRNO()); michael@0: return PR_FAILURE; michael@0: } michael@0: #else /* do it the hard way */ michael@0: { michael@0: struct protoent *staticBuf; michael@0: PR_Lock(_getproto_lock); michael@0: staticBuf = getprotobyname_r(name); michael@0: if (NULL == staticBuf) michael@0: { michael@0: rv = PR_FAILURE; michael@0: PR_SetError(PR_DIRECTORY_LOOKUP_ERROR, _MD_ERRNO()); michael@0: } michael@0: else michael@0: { michael@0: #if defined(SYMBIAN) michael@0: char* aliases[2]; michael@0: AssignAliases(staticBuf, aliases); michael@0: #endif michael@0: rv = CopyProtoent(staticBuf, buffer, buflen, result); michael@0: if (PR_FAILURE == rv) michael@0: PR_SetError(PR_INSUFFICIENT_RESOURCES_ERROR, 0); michael@0: } michael@0: PR_Unlock(_getproto_lock); michael@0: } michael@0: #endif /* all that */ michael@0: return rv; michael@0: } michael@0: michael@0: PR_IMPLEMENT(PRStatus) PR_GetProtoByNumber( michael@0: PRInt32 number, char* buffer, PRInt32 buflen, PRProtoEnt* result) michael@0: { michael@0: PRStatus rv = PR_SUCCESS; michael@0: #if defined(_PR_HAVE_GETPROTO_R) michael@0: struct protoent* res = (struct protoent*)result; michael@0: #endif michael@0: michael@0: if (!_pr_initialized) _PR_ImplicitInitialization(); michael@0: michael@0: #if defined(_PR_HAVE_GETPROTO_R_INT) michael@0: { michael@0: /* michael@0: ** The protoent_data has a pointer as the first field. michael@0: ** That implies the buffer better be aligned, and char* michael@0: ** doesn't promise much. michael@0: */ michael@0: PRUptrdiff aligned = (PRUptrdiff)buffer; michael@0: if (0 != (aligned & (sizeof(struct protoent_data*) - 1))) michael@0: { michael@0: aligned += sizeof(struct protoent_data*) - 1; michael@0: aligned &= ~(sizeof(struct protoent_data*) - 1); michael@0: buflen -= (aligned - (PRUptrdiff)buffer); michael@0: buffer = (char*)aligned; michael@0: } michael@0: } michael@0: #endif /* defined(_PR_HAVE_GETPROTO_R_INT) */ michael@0: michael@0: if (PR_NETDB_BUF_SIZE > buflen) michael@0: { michael@0: PR_SetError(PR_INVALID_ARGUMENT_ERROR, 0); michael@0: return PR_FAILURE; michael@0: } michael@0: michael@0: #if defined(_PR_HAVE_GETPROTO_R_POINTER) michael@0: if (NULL == getprotobynumber_r(number, res, buffer, buflen)) michael@0: { michael@0: PR_SetError(PR_DIRECTORY_LOOKUP_ERROR, _MD_ERRNO()); michael@0: return PR_FAILURE; michael@0: } michael@0: michael@0: #elif defined(_PR_HAVE_GETPROTO_R_INT) michael@0: /* michael@0: ** The buffer needs to be zero'd for these OS's. michael@0: */ michael@0: memset(buffer, 0, buflen); michael@0: if (-1 == getprotobynumber_r(number, res, (struct protoent_data*)buffer)) michael@0: { michael@0: PR_SetError(PR_DIRECTORY_LOOKUP_ERROR, _MD_ERRNO()); michael@0: return PR_FAILURE; michael@0: } michael@0: #elif defined(_PR_HAVE_5_ARG_GETPROTO_R) michael@0: /* The 5th argument for getprotobynumber_r() cannot be NULL */ michael@0: if (-1 == getprotobynumber_r(number, res, buffer, buflen, &res)) michael@0: { michael@0: PR_SetError(PR_DIRECTORY_LOOKUP_ERROR, _MD_ERRNO()); michael@0: return PR_FAILURE; michael@0: } michael@0: #else /* do it the hard way */ michael@0: { michael@0: struct protoent *staticBuf; michael@0: PR_Lock(_getproto_lock); michael@0: staticBuf = getprotobynumber_r(number); michael@0: if (NULL == staticBuf) michael@0: { michael@0: rv = PR_FAILURE; michael@0: PR_SetError(PR_DIRECTORY_LOOKUP_ERROR, _MD_ERRNO()); michael@0: } michael@0: else michael@0: { michael@0: #if defined(SYMBIAN) michael@0: char* aliases[2]; michael@0: AssignAliases(staticBuf, aliases); michael@0: #endif michael@0: rv = CopyProtoent(staticBuf, buffer, buflen, result); michael@0: if (PR_FAILURE == rv) michael@0: PR_SetError(PR_INSUFFICIENT_RESOURCES_ERROR, 0); michael@0: } michael@0: PR_Unlock(_getproto_lock); michael@0: } michael@0: #endif /* all that crap */ michael@0: return rv; michael@0: michael@0: } michael@0: michael@0: PRUintn _PR_NetAddrSize(const PRNetAddr* addr) michael@0: { michael@0: PRUintn addrsize; michael@0: michael@0: /* michael@0: * RFC 2553 added a new field (sin6_scope_id) to michael@0: * struct sockaddr_in6. PRNetAddr's ipv6 member has a michael@0: * scope_id field to match the new field. In order to michael@0: * work with older implementations supporting RFC 2133, michael@0: * we take the size of struct sockaddr_in6 instead of michael@0: * addr->ipv6. michael@0: */ michael@0: if (AF_INET == addr->raw.family) michael@0: addrsize = sizeof(addr->inet); michael@0: else if (PR_AF_INET6 == addr->raw.family) michael@0: #if defined(_PR_INET6) michael@0: addrsize = sizeof(struct sockaddr_in6); michael@0: #else michael@0: addrsize = sizeof(addr->ipv6); michael@0: #endif michael@0: #if defined(XP_UNIX) || defined(XP_OS2) michael@0: else if (AF_UNIX == addr->raw.family) michael@0: addrsize = sizeof(addr->local); michael@0: #endif michael@0: else addrsize = 0; michael@0: michael@0: return addrsize; michael@0: } /* _PR_NetAddrSize */ michael@0: michael@0: PR_IMPLEMENT(PRIntn) PR_EnumerateHostEnt( michael@0: PRIntn enumIndex, const PRHostEnt *hostEnt, PRUint16 port, PRNetAddr *address) michael@0: { michael@0: void *addr = hostEnt->h_addr_list[enumIndex++]; michael@0: memset(address, 0, sizeof(PRNetAddr)); michael@0: if (NULL == addr) enumIndex = 0; michael@0: else michael@0: { michael@0: address->raw.family = hostEnt->h_addrtype; michael@0: if (PR_AF_INET6 == hostEnt->h_addrtype) michael@0: { michael@0: address->ipv6.port = htons(port); michael@0: address->ipv6.flowinfo = 0; michael@0: address->ipv6.scope_id = 0; michael@0: memcpy(&address->ipv6.ip, addr, hostEnt->h_length); michael@0: } michael@0: else michael@0: { michael@0: PR_ASSERT(AF_INET == hostEnt->h_addrtype); michael@0: address->inet.port = htons(port); michael@0: memcpy(&address->inet.ip, addr, hostEnt->h_length); michael@0: } michael@0: } michael@0: return enumIndex; michael@0: } /* PR_EnumerateHostEnt */ michael@0: michael@0: PR_IMPLEMENT(PRStatus) PR_InitializeNetAddr( michael@0: PRNetAddrValue val, PRUint16 port, PRNetAddr *addr) michael@0: { michael@0: PRStatus rv = PR_SUCCESS; michael@0: if (!_pr_initialized) _PR_ImplicitInitialization(); michael@0: michael@0: if (val != PR_IpAddrNull) memset(addr, 0, sizeof(addr->inet)); michael@0: addr->inet.family = AF_INET; michael@0: addr->inet.port = htons(port); michael@0: switch (val) michael@0: { michael@0: case PR_IpAddrNull: michael@0: break; /* don't overwrite the address */ michael@0: case PR_IpAddrAny: michael@0: addr->inet.ip = htonl(INADDR_ANY); michael@0: break; michael@0: case PR_IpAddrLoopback: michael@0: addr->inet.ip = htonl(INADDR_LOOPBACK); michael@0: break; michael@0: default: michael@0: PR_SetError(PR_INVALID_ARGUMENT_ERROR, 0); michael@0: rv = PR_FAILURE; michael@0: } michael@0: return rv; michael@0: } /* PR_InitializeNetAddr */ michael@0: michael@0: PR_IMPLEMENT(PRStatus) PR_SetNetAddr( michael@0: PRNetAddrValue val, PRUint16 af, PRUint16 port, PRNetAddr *addr) michael@0: { michael@0: PRStatus rv = PR_SUCCESS; michael@0: if (!_pr_initialized) _PR_ImplicitInitialization(); michael@0: michael@0: if (af == PR_AF_INET6) michael@0: { michael@0: if (val != PR_IpAddrNull) memset(addr, 0, sizeof(addr->ipv6)); michael@0: addr->ipv6.family = af; michael@0: addr->ipv6.port = htons(port); michael@0: addr->ipv6.flowinfo = 0; michael@0: addr->ipv6.scope_id = 0; michael@0: switch (val) michael@0: { michael@0: case PR_IpAddrNull: michael@0: break; /* don't overwrite the address */ michael@0: case PR_IpAddrAny: michael@0: addr->ipv6.ip = _pr_in6addr_any; michael@0: break; michael@0: case PR_IpAddrLoopback: michael@0: addr->ipv6.ip = _pr_in6addr_loopback; michael@0: break; michael@0: default: michael@0: PR_SetError(PR_INVALID_ARGUMENT_ERROR, 0); michael@0: rv = PR_FAILURE; michael@0: } michael@0: } michael@0: else michael@0: { michael@0: if (val != PR_IpAddrNull) memset(addr, 0, sizeof(addr->inet)); michael@0: addr->inet.family = af; michael@0: addr->inet.port = htons(port); michael@0: switch (val) michael@0: { michael@0: case PR_IpAddrNull: michael@0: break; /* don't overwrite the address */ michael@0: case PR_IpAddrAny: michael@0: addr->inet.ip = htonl(INADDR_ANY); michael@0: break; michael@0: case PR_IpAddrLoopback: michael@0: addr->inet.ip = htonl(INADDR_LOOPBACK); michael@0: break; michael@0: default: michael@0: PR_SetError(PR_INVALID_ARGUMENT_ERROR, 0); michael@0: rv = PR_FAILURE; michael@0: } michael@0: } michael@0: return rv; michael@0: } /* PR_SetNetAddr */ michael@0: michael@0: PR_IMPLEMENT(PRBool) michael@0: PR_IsNetAddrType(const PRNetAddr *addr, PRNetAddrValue val) michael@0: { michael@0: if (addr->raw.family == PR_AF_INET6) { michael@0: if (val == PR_IpAddrAny) { michael@0: if (_PR_IN6_IS_ADDR_UNSPECIFIED((PRIPv6Addr *)&addr->ipv6.ip)) { michael@0: return PR_TRUE; michael@0: } else if (_PR_IN6_IS_ADDR_V4MAPPED((PRIPv6Addr *)&addr->ipv6.ip) michael@0: && _PR_IN6_V4MAPPED_TO_IPADDR((PRIPv6Addr *)&addr->ipv6.ip) michael@0: == htonl(INADDR_ANY)) { michael@0: return PR_TRUE; michael@0: } michael@0: } else if (val == PR_IpAddrLoopback) { michael@0: if (_PR_IN6_IS_ADDR_LOOPBACK((PRIPv6Addr *)&addr->ipv6.ip)) { michael@0: return PR_TRUE; michael@0: } else if (_PR_IN6_IS_ADDR_V4MAPPED((PRIPv6Addr *)&addr->ipv6.ip) michael@0: && _PR_IN6_V4MAPPED_TO_IPADDR((PRIPv6Addr *)&addr->ipv6.ip) michael@0: == htonl(INADDR_LOOPBACK)) { michael@0: return PR_TRUE; michael@0: } michael@0: } else if (val == PR_IpAddrV4Mapped michael@0: && _PR_IN6_IS_ADDR_V4MAPPED((PRIPv6Addr *)&addr->ipv6.ip)) { michael@0: return PR_TRUE; michael@0: } michael@0: } else { michael@0: if (addr->raw.family == AF_INET) { michael@0: if (val == PR_IpAddrAny && addr->inet.ip == htonl(INADDR_ANY)) { michael@0: return PR_TRUE; michael@0: } else if (val == PR_IpAddrLoopback michael@0: && addr->inet.ip == htonl(INADDR_LOOPBACK)) { michael@0: return PR_TRUE; michael@0: } michael@0: } michael@0: } michael@0: return PR_FALSE; michael@0: } michael@0: michael@0: extern int pr_inet_aton(const char *cp, PRUint32 *addr); michael@0: michael@0: #define XX 127 michael@0: static const unsigned char index_hex[256] = { michael@0: XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, michael@0: XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, michael@0: XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, michael@0: 0, 1, 2, 3, 4, 5, 6, 7, 8, 9,XX,XX, XX,XX,XX,XX, michael@0: XX,10,11,12, 13,14,15,XX, XX,XX,XX,XX, XX,XX,XX,XX, michael@0: XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, michael@0: XX,10,11,12, 13,14,15,XX, XX,XX,XX,XX, XX,XX,XX,XX, michael@0: XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, michael@0: XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, michael@0: XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, michael@0: XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, michael@0: XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, michael@0: XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, michael@0: XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, michael@0: XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, michael@0: XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, michael@0: }; michael@0: michael@0: /* michael@0: * StringToV6Addr() returns 1 if the conversion succeeds, michael@0: * or 0 if the input is not a valid IPv6 address string. michael@0: * (Same as inet_pton(AF_INET6, string, addr).) michael@0: */ michael@0: static int StringToV6Addr(const char *string, PRIPv6Addr *addr) michael@0: { michael@0: const unsigned char *s = (const unsigned char *)string; michael@0: int section = 0; /* index of the current section (a 16-bit michael@0: * piece of the address */ michael@0: int double_colon = -1; /* index of the section after the first michael@0: * 16-bit group of zeros represented by michael@0: * the double colon */ michael@0: unsigned int val; michael@0: int len; michael@0: michael@0: /* Handle initial (double) colon */ michael@0: if (*s == ':') { michael@0: if (s[1] != ':') return 0; michael@0: s += 2; michael@0: addr->pr_s6_addr16[0] = 0; michael@0: section = double_colon = 1; michael@0: } michael@0: michael@0: while (*s) { michael@0: if (section == 8) return 0; /* too long */ michael@0: if (*s == ':') { michael@0: if (double_colon != -1) return 0; /* two double colons */ michael@0: addr->pr_s6_addr16[section++] = 0; michael@0: double_colon = section; michael@0: s++; michael@0: continue; michael@0: } michael@0: for (len = val = 0; len < 4 && index_hex[*s] != XX; len++) { michael@0: val = (val << 4) + index_hex[*s++]; michael@0: } michael@0: if (*s == '.') { michael@0: if (len == 0) return 0; /* nothing between : and . */ michael@0: break; michael@0: } michael@0: if (*s == ':') { michael@0: s++; michael@0: if (!*s) return 0; /* cannot end with single colon */ michael@0: } else if (*s) { michael@0: return 0; /* bad character */ michael@0: } michael@0: addr->pr_s6_addr16[section++] = htons((unsigned short)val); michael@0: } michael@0: michael@0: if (*s == '.') { michael@0: /* Have a trailing v4 format address */ michael@0: if (section > 6) return 0; /* not enough room */ michael@0: michael@0: /* michael@0: * The number before the '.' is decimal, but we parsed it michael@0: * as hex. That means it is in BCD. Check it for validity michael@0: * and convert it to binary. michael@0: */ michael@0: if (val > 0x0255 || (val & 0xf0) > 0x90 || (val & 0xf) > 9) return 0; michael@0: val = (val >> 8) * 100 + ((val >> 4) & 0xf) * 10 + (val & 0xf); michael@0: addr->pr_s6_addr[2 * section] = val; michael@0: michael@0: s++; michael@0: val = index_hex[*s++]; michael@0: if (val > 9) return 0; michael@0: while (*s >= '0' && *s <= '9') { michael@0: val = val * 10 + *s++ - '0'; michael@0: if (val > 255) return 0; michael@0: } michael@0: if (*s != '.') return 0; /* must have exactly 4 decimal numbers */ michael@0: addr->pr_s6_addr[2 * section + 1] = val; michael@0: section++; michael@0: michael@0: s++; michael@0: val = index_hex[*s++]; michael@0: if (val > 9) return 0; michael@0: while (*s >= '0' && *s <= '9') { michael@0: val = val * 10 + *s++ - '0'; michael@0: if (val > 255) return 0; michael@0: } michael@0: if (*s != '.') return 0; /* must have exactly 4 decimal numbers */ michael@0: addr->pr_s6_addr[2 * section] = val; michael@0: michael@0: s++; michael@0: val = index_hex[*s++]; michael@0: if (val > 9) return 0; michael@0: while (*s >= '0' && *s <= '9') { michael@0: val = val * 10 + *s++ - '0'; michael@0: if (val > 255) return 0; michael@0: } michael@0: if (*s) return 0; /* must have exactly 4 decimal numbers */ michael@0: addr->pr_s6_addr[2 * section + 1] = val; michael@0: section++; michael@0: } michael@0: michael@0: if (double_colon != -1) { michael@0: /* Stretch the double colon */ michael@0: int tosection; michael@0: int ncopy = section - double_colon; michael@0: for (tosection = 7; ncopy--; tosection--) { michael@0: addr->pr_s6_addr16[tosection] = michael@0: addr->pr_s6_addr16[double_colon + ncopy]; michael@0: } michael@0: while (tosection >= double_colon) { michael@0: addr->pr_s6_addr16[tosection--] = 0; michael@0: } michael@0: } else if (section != 8) { michael@0: return 0; /* too short */ michael@0: } michael@0: return 1; michael@0: } michael@0: #undef XX michael@0: michael@0: #ifndef _PR_HAVE_INET_NTOP michael@0: static const char *basis_hex = "0123456789abcdef"; michael@0: michael@0: /* michael@0: * V6AddrToString() returns a pointer to the buffer containing michael@0: * the text string if the conversion succeeds, and NULL otherwise. michael@0: * (Same as inet_ntop(AF_INET6, addr, buf, size), except that errno michael@0: * is not set on failure.) michael@0: */ michael@0: static const char *V6AddrToString( michael@0: const PRIPv6Addr *addr, char *buf, PRUint32 size) michael@0: { michael@0: #define STUFF(c) do { \ michael@0: if (!size--) return NULL; \ michael@0: *buf++ = (c); \ michael@0: } while (0) michael@0: michael@0: int double_colon = -1; /* index of the first 16-bit michael@0: * group of zeros represented michael@0: * by the double colon */ michael@0: int double_colon_length = 1; /* use double colon only if michael@0: * there are two or more 16-bit michael@0: * groups of zeros */ michael@0: int zero_length; michael@0: int section; michael@0: unsigned int val; michael@0: const char *bufcopy = buf; michael@0: michael@0: /* Scan to find the placement of the double colon */ michael@0: for (section = 0; section < 8; section++) { michael@0: if (addr->pr_s6_addr16[section] == 0) { michael@0: zero_length = 1; michael@0: section++; michael@0: while (section < 8 && addr->pr_s6_addr16[section] == 0) { michael@0: zero_length++; michael@0: section++; michael@0: } michael@0: /* Select the longest sequence of zeros */ michael@0: if (zero_length > double_colon_length) { michael@0: double_colon = section - zero_length; michael@0: double_colon_length = zero_length; michael@0: } michael@0: } michael@0: } michael@0: michael@0: /* Now start converting to a string */ michael@0: section = 0; michael@0: michael@0: if (double_colon == 0) { michael@0: if (double_colon_length == 6 || michael@0: (double_colon_length == 5 && addr->pr_s6_addr16[5] == 0xffff)) { michael@0: /* ipv4 format address */ michael@0: STUFF(':'); michael@0: STUFF(':'); michael@0: if (double_colon_length == 5) { michael@0: STUFF('f'); michael@0: STUFF('f'); michael@0: STUFF('f'); michael@0: STUFF('f'); michael@0: STUFF(':'); michael@0: } michael@0: if (addr->pr_s6_addr[12] > 99) STUFF(addr->pr_s6_addr[12]/100 + '0'); michael@0: if (addr->pr_s6_addr[12] > 9) STUFF((addr->pr_s6_addr[12]%100)/10 + '0'); michael@0: STUFF(addr->pr_s6_addr[12]%10 + '0'); michael@0: STUFF('.'); michael@0: if (addr->pr_s6_addr[13] > 99) STUFF(addr->pr_s6_addr[13]/100 + '0'); michael@0: if (addr->pr_s6_addr[13] > 9) STUFF((addr->pr_s6_addr[13]%100)/10 + '0'); michael@0: STUFF(addr->pr_s6_addr[13]%10 + '0'); michael@0: STUFF('.'); michael@0: if (addr->pr_s6_addr[14] > 99) STUFF(addr->pr_s6_addr[14]/100 + '0'); michael@0: if (addr->pr_s6_addr[14] > 9) STUFF((addr->pr_s6_addr[14]%100)/10 + '0'); michael@0: STUFF(addr->pr_s6_addr[14]%10 + '0'); michael@0: STUFF('.'); michael@0: if (addr->pr_s6_addr[15] > 99) STUFF(addr->pr_s6_addr[15]/100 + '0'); michael@0: if (addr->pr_s6_addr[15] > 9) STUFF((addr->pr_s6_addr[15]%100)/10 + '0'); michael@0: STUFF(addr->pr_s6_addr[15]%10 + '0'); michael@0: STUFF('\0'); michael@0: return bufcopy; michael@0: } michael@0: } michael@0: michael@0: while (section < 8) { michael@0: if (section == double_colon) { michael@0: STUFF(':'); michael@0: STUFF(':'); michael@0: section += double_colon_length; michael@0: continue; michael@0: } michael@0: val = ntohs(addr->pr_s6_addr16[section]); michael@0: if (val > 0xfff) { michael@0: STUFF(basis_hex[val >> 12]); michael@0: } michael@0: if (val > 0xff) { michael@0: STUFF(basis_hex[(val >> 8) & 0xf]); michael@0: } michael@0: if (val > 0xf) { michael@0: STUFF(basis_hex[(val >> 4) & 0xf]); michael@0: } michael@0: STUFF(basis_hex[val & 0xf]); michael@0: section++; michael@0: if (section < 8 && section != double_colon) STUFF(':'); michael@0: } michael@0: STUFF('\0'); michael@0: return bufcopy; michael@0: #undef STUFF michael@0: } michael@0: #endif /* !_PR_HAVE_INET_NTOP */ michael@0: michael@0: /* michael@0: * Convert an IPv4 addr to an (IPv4-mapped) IPv6 addr michael@0: */ michael@0: PR_IMPLEMENT(void) PR_ConvertIPv4AddrToIPv6(PRUint32 v4addr, PRIPv6Addr *v6addr) michael@0: { michael@0: PRUint8 *dstp; michael@0: dstp = v6addr->pr_s6_addr; michael@0: memset(dstp, 0, 10); michael@0: memset(dstp + 10, 0xff, 2); michael@0: memcpy(dstp + 12,(char *) &v4addr, 4); michael@0: } michael@0: michael@0: PR_IMPLEMENT(PRUint16) PR_ntohs(PRUint16 n) { return ntohs(n); } michael@0: PR_IMPLEMENT(PRUint32) PR_ntohl(PRUint32 n) { return ntohl(n); } michael@0: PR_IMPLEMENT(PRUint16) PR_htons(PRUint16 n) { return htons(n); } michael@0: PR_IMPLEMENT(PRUint32) PR_htonl(PRUint32 n) { return htonl(n); } michael@0: PR_IMPLEMENT(PRUint64) PR_ntohll(PRUint64 n) michael@0: { michael@0: #ifdef IS_BIG_ENDIAN michael@0: return n; michael@0: #else michael@0: PRUint64 tmp; michael@0: PRUint32 hi, lo; michael@0: LL_L2UI(lo, n); michael@0: LL_SHR(tmp, n, 32); michael@0: LL_L2UI(hi, tmp); michael@0: hi = PR_ntohl(hi); michael@0: lo = PR_ntohl(lo); michael@0: LL_UI2L(n, lo); michael@0: LL_SHL(n, n, 32); michael@0: LL_UI2L(tmp, hi); michael@0: LL_ADD(n, n, tmp); michael@0: return n; michael@0: #endif michael@0: } /* ntohll */ michael@0: michael@0: PR_IMPLEMENT(PRUint64) PR_htonll(PRUint64 n) michael@0: { michael@0: #ifdef IS_BIG_ENDIAN michael@0: return n; michael@0: #else michael@0: PRUint64 tmp; michael@0: PRUint32 hi, lo; michael@0: LL_L2UI(lo, n); michael@0: LL_SHR(tmp, n, 32); michael@0: LL_L2UI(hi, tmp); michael@0: hi = htonl(hi); michael@0: lo = htonl(lo); michael@0: LL_UI2L(n, lo); michael@0: LL_SHL(n, n, 32); michael@0: LL_UI2L(tmp, hi); michael@0: LL_ADD(n, n, tmp); michael@0: return n; michael@0: #endif michael@0: } /* htonll */ michael@0: michael@0: michael@0: /* michael@0: * Implementation of PR_GetAddrInfoByName and friends michael@0: * michael@0: * Compile-time options: michael@0: * michael@0: * _PR_HAVE_GETADDRINFO Define this macro if the target system provides michael@0: * getaddrinfo. With this defined, NSPR will require michael@0: * getaddrinfo at run time. If this if not defined, michael@0: * then NSPR will attempt to dynamically resolve michael@0: * getaddrinfo, falling back to PR_GetHostByName if michael@0: * getaddrinfo does not exist on the target system. michael@0: * michael@0: * Since getaddrinfo is a relatively new system call on many systems, michael@0: * we are forced to dynamically resolve it at run time in most cases. michael@0: * The exception includes any system (such as Mac OS X) that is known to michael@0: * provide getaddrinfo in all versions that NSPR cares to support. michael@0: */ michael@0: michael@0: #if defined(_PR_HAVE_GETADDRINFO) michael@0: michael@0: #if defined(_PR_INET6) michael@0: michael@0: typedef struct addrinfo PRADDRINFO; michael@0: #define GETADDRINFO getaddrinfo michael@0: #define FREEADDRINFO freeaddrinfo michael@0: #define GETNAMEINFO getnameinfo michael@0: michael@0: #elif defined(_PR_INET6_PROBE) michael@0: michael@0: typedef struct addrinfo PRADDRINFO; michael@0: michael@0: /* getaddrinfo/freeaddrinfo/getnameinfo prototypes */ michael@0: #if defined(WIN32) michael@0: #define FUNC_MODIFIER __stdcall michael@0: #else michael@0: #define FUNC_MODIFIER michael@0: #endif michael@0: typedef int (FUNC_MODIFIER * FN_GETADDRINFO) michael@0: (const char *nodename, michael@0: const char *servname, michael@0: const PRADDRINFO *hints, michael@0: PRADDRINFO **res); michael@0: typedef int (FUNC_MODIFIER * FN_FREEADDRINFO) michael@0: (PRADDRINFO *ai); michael@0: typedef int (FUNC_MODIFIER * FN_GETNAMEINFO) michael@0: (const struct sockaddr *addr, int addrlen, michael@0: char *host, int hostlen, michael@0: char *serv, int servlen, int flags); michael@0: michael@0: /* global state */ michael@0: static FN_GETADDRINFO _pr_getaddrinfo = NULL; michael@0: static FN_FREEADDRINFO _pr_freeaddrinfo = NULL; michael@0: static FN_GETNAMEINFO _pr_getnameinfo = NULL; michael@0: michael@0: #define GETADDRINFO_SYMBOL "getaddrinfo" michael@0: #define FREEADDRINFO_SYMBOL "freeaddrinfo" michael@0: #define GETNAMEINFO_SYMBOL "getnameinfo" michael@0: michael@0: PRStatus michael@0: _pr_find_getaddrinfo(void) michael@0: { michael@0: PRLibrary *lib; michael@0: #ifdef WIN32 michael@0: /* michael@0: * On windows, we need to search ws2_32.dll or wship6.dll michael@0: * (Microsoft IPv6 Technology Preview for Windows 2000) for michael@0: * getaddrinfo and freeaddrinfo. These libraries might not michael@0: * be loaded yet. michael@0: */ michael@0: const char *libname[] = { "ws2_32.dll", "wship6.dll" }; michael@0: int i; michael@0: michael@0: for (i = 0; i < sizeof(libname)/sizeof(libname[0]); i++) { michael@0: lib = PR_LoadLibrary(libname[i]); michael@0: if (!lib) { michael@0: continue; michael@0: } michael@0: _pr_getaddrinfo = (FN_GETADDRINFO) michael@0: PR_FindFunctionSymbol(lib, GETADDRINFO_SYMBOL); michael@0: if (!_pr_getaddrinfo) { michael@0: PR_UnloadLibrary(lib); michael@0: continue; michael@0: } michael@0: _pr_freeaddrinfo = (FN_FREEADDRINFO) michael@0: PR_FindFunctionSymbol(lib, FREEADDRINFO_SYMBOL); michael@0: _pr_getnameinfo = (FN_GETNAMEINFO) michael@0: PR_FindFunctionSymbol(lib, GETNAMEINFO_SYMBOL); michael@0: if (!_pr_freeaddrinfo || !_pr_getnameinfo) { michael@0: PR_UnloadLibrary(lib); michael@0: continue; michael@0: } michael@0: /* Keep the library loaded. */ michael@0: return PR_SUCCESS; michael@0: } michael@0: return PR_FAILURE; michael@0: #else michael@0: /* michael@0: * Resolve getaddrinfo by searching all loaded libraries. Then michael@0: * search library containing getaddrinfo for freeaddrinfo. michael@0: */ michael@0: _pr_getaddrinfo = (FN_GETADDRINFO) michael@0: PR_FindFunctionSymbolAndLibrary(GETADDRINFO_SYMBOL, &lib); michael@0: if (!_pr_getaddrinfo) { michael@0: return PR_FAILURE; michael@0: } michael@0: _pr_freeaddrinfo = (FN_FREEADDRINFO) michael@0: PR_FindFunctionSymbol(lib, FREEADDRINFO_SYMBOL); michael@0: _pr_getnameinfo = (FN_GETNAMEINFO) michael@0: PR_FindFunctionSymbol(lib, GETNAMEINFO_SYMBOL); michael@0: PR_UnloadLibrary(lib); michael@0: if (!_pr_freeaddrinfo || !_pr_getnameinfo) { michael@0: return PR_FAILURE; michael@0: } michael@0: return PR_SUCCESS; michael@0: #endif michael@0: } michael@0: michael@0: #define GETADDRINFO (*_pr_getaddrinfo) michael@0: #define FREEADDRINFO (*_pr_freeaddrinfo) michael@0: #define GETNAMEINFO (*_pr_getnameinfo) michael@0: michael@0: #endif /* _PR_INET6 */ michael@0: michael@0: #endif /* _PR_HAVE_GETADDRINFO */ michael@0: michael@0: #if !defined(_PR_HAVE_GETADDRINFO) || defined(_PR_INET6_PROBE) michael@0: /* michael@0: * If getaddrinfo does not exist, then we will fall back on michael@0: * PR_GetHostByName, which requires that we allocate a buffer for the michael@0: * PRHostEnt data structure and its members. michael@0: */ michael@0: typedef struct PRAddrInfoFB { michael@0: char buf[PR_NETDB_BUF_SIZE]; michael@0: PRHostEnt hostent; michael@0: PRBool has_cname; michael@0: } PRAddrInfoFB; michael@0: michael@0: static PRAddrInfo * michael@0: pr_GetAddrInfoByNameFB(const char *hostname, michael@0: PRUint16 af, michael@0: PRIntn flags) michael@0: { michael@0: PRStatus rv; michael@0: PRAddrInfoFB *ai; michael@0: /* fallback on PR_GetHostByName */ michael@0: ai = PR_NEW(PRAddrInfoFB); michael@0: if (!ai) { michael@0: PR_SetError(PR_OUT_OF_MEMORY_ERROR, 0); michael@0: return NULL; michael@0: } michael@0: rv = PR_GetHostByName(hostname, ai->buf, sizeof ai->buf, &ai->hostent); michael@0: if (rv == PR_FAILURE) { michael@0: PR_Free(ai); michael@0: return NULL; michael@0: } michael@0: ai->has_cname = !(flags & PR_AI_NOCANONNAME); michael@0: michael@0: return (PRAddrInfo *) ai; michael@0: } michael@0: #endif /* !_PR_HAVE_GETADDRINFO || _PR_INET6_PROBE */ michael@0: michael@0: PR_IMPLEMENT(PRAddrInfo *) PR_GetAddrInfoByName(const char *hostname, michael@0: PRUint16 af, michael@0: PRIntn flags) michael@0: { michael@0: /* restrict input to supported values */ michael@0: if ((af != PR_AF_INET && af != PR_AF_UNSPEC) || michael@0: (flags & ~ PR_AI_NOCANONNAME) != PR_AI_ADDRCONFIG) { michael@0: PR_SetError(PR_INVALID_ARGUMENT_ERROR, 0); michael@0: return NULL; michael@0: } michael@0: michael@0: if (!_pr_initialized) _PR_ImplicitInitialization(); michael@0: michael@0: #if !defined(_PR_HAVE_GETADDRINFO) michael@0: return pr_GetAddrInfoByNameFB(hostname, af, flags); michael@0: #else michael@0: #if defined(_PR_INET6_PROBE) michael@0: if (!_pr_ipv6_is_present()) { michael@0: return pr_GetAddrInfoByNameFB(hostname, af, flags); michael@0: } michael@0: #endif michael@0: { michael@0: PRADDRINFO *res, hints; michael@0: int rv; michael@0: michael@0: /* michael@0: * we assume a RFC 2553 compliant getaddrinfo. this may at some michael@0: * point need to be customized as platforms begin to adopt the michael@0: * RFC 3493. michael@0: */ michael@0: michael@0: memset(&hints, 0, sizeof(hints)); michael@0: if (!(flags & PR_AI_NOCANONNAME)) michael@0: hints.ai_flags |= AI_CANONNAME; michael@0: #ifdef AI_ADDRCONFIG michael@0: /* michael@0: * Propagate AI_ADDRCONFIG to the GETADDRINFO call if PR_AI_ADDRCONFIG michael@0: * is set. michael@0: * michael@0: * Need a workaround for loopback host addresses: michael@0: * The problem is that in glibc and Windows, AI_ADDRCONFIG applies the michael@0: * existence of an outgoing network interface to IP addresses of the michael@0: * loopback interface, due to a strict interpretation of the michael@0: * specification. For example, if a computer does not have any michael@0: * outgoing IPv6 network interface, but its loopback network interface michael@0: * supports IPv6, a getaddrinfo call on "localhost" with AI_ADDRCONFIG michael@0: * won't return the IPv6 loopback address "::1", because getaddrinfo michael@0: * thinks the computer cannot connect to any IPv6 destination, michael@0: * ignoring the remote vs. local/loopback distinction. michael@0: */ michael@0: if ((flags & PR_AI_ADDRCONFIG) && michael@0: strcmp(hostname, "localhost") != 0 && michael@0: strcmp(hostname, "localhost.localdomain") != 0 && michael@0: strcmp(hostname, "localhost6") != 0 && michael@0: strcmp(hostname, "localhost6.localdomain6") != 0) { michael@0: hints.ai_flags |= AI_ADDRCONFIG; michael@0: } michael@0: #endif michael@0: hints.ai_family = (af == PR_AF_INET) ? AF_INET : AF_UNSPEC; michael@0: michael@0: /* michael@0: * it is important to select a socket type in the hints, otherwise we michael@0: * will get back repetitive entries: one for each socket type. since michael@0: * we do not expose ai_socktype through our API, it is okay to do this michael@0: * here. the application may still choose to create a socket of some michael@0: * other type. michael@0: */ michael@0: hints.ai_socktype = SOCK_STREAM; michael@0: michael@0: rv = GETADDRINFO(hostname, NULL, &hints, &res); michael@0: #ifdef AI_ADDRCONFIG michael@0: if (rv == EAI_BADFLAGS && (hints.ai_flags & AI_ADDRCONFIG)) { michael@0: hints.ai_flags &= ~AI_ADDRCONFIG; michael@0: rv = GETADDRINFO(hostname, NULL, &hints, &res); michael@0: } michael@0: #endif michael@0: if (rv == 0) michael@0: return (PRAddrInfo *) res; michael@0: michael@0: PR_SetError(PR_DIRECTORY_LOOKUP_ERROR, rv); michael@0: } michael@0: return NULL; michael@0: #endif michael@0: } michael@0: michael@0: PR_IMPLEMENT(void) PR_FreeAddrInfo(PRAddrInfo *ai) michael@0: { michael@0: #if defined(_PR_HAVE_GETADDRINFO) michael@0: #if defined(_PR_INET6_PROBE) michael@0: if (!_pr_ipv6_is_present()) michael@0: PR_Free((PRAddrInfoFB *) ai); michael@0: else michael@0: #endif michael@0: FREEADDRINFO((PRADDRINFO *) ai); michael@0: #else michael@0: PR_Free((PRAddrInfoFB *) ai); michael@0: #endif michael@0: } michael@0: michael@0: PR_IMPLEMENT(void *) PR_EnumerateAddrInfo(void *iterPtr, michael@0: const PRAddrInfo *base, michael@0: PRUint16 port, michael@0: PRNetAddr *result) michael@0: { michael@0: #if defined(_PR_HAVE_GETADDRINFO) michael@0: PRADDRINFO *ai; michael@0: #if defined(_PR_INET6_PROBE) michael@0: if (!_pr_ipv6_is_present()) { michael@0: /* using PRAddrInfoFB */ michael@0: PRIntn iter = (PRIntn)(PRPtrdiff) iterPtr; michael@0: iter = PR_EnumerateHostEnt(iter, &((PRAddrInfoFB *) base)->hostent, port, result); michael@0: if (iter < 0) michael@0: iter = 0; michael@0: return (void *)(PRPtrdiff) iter; michael@0: } michael@0: #endif michael@0: michael@0: if (iterPtr) michael@0: ai = ((PRADDRINFO *) iterPtr)->ai_next; michael@0: else michael@0: ai = (PRADDRINFO *) base; michael@0: michael@0: while (ai && ai->ai_addrlen > sizeof(PRNetAddr)) michael@0: ai = ai->ai_next; michael@0: michael@0: if (ai) { michael@0: /* copy sockaddr to PRNetAddr */ michael@0: memcpy(result, ai->ai_addr, ai->ai_addrlen); michael@0: result->raw.family = ai->ai_addr->sa_family; michael@0: #ifdef _PR_INET6 michael@0: if (AF_INET6 == result->raw.family) michael@0: result->raw.family = PR_AF_INET6; michael@0: #endif michael@0: if (ai->ai_addrlen < sizeof(PRNetAddr)) michael@0: memset(((char*)result)+ai->ai_addrlen, 0, sizeof(PRNetAddr) - ai->ai_addrlen); michael@0: michael@0: if (result->raw.family == PR_AF_INET) michael@0: result->inet.port = htons(port); michael@0: else michael@0: result->ipv6.port = htons(port); michael@0: } michael@0: michael@0: return ai; michael@0: #else michael@0: /* using PRAddrInfoFB */ michael@0: PRIntn iter = (PRIntn) iterPtr; michael@0: iter = PR_EnumerateHostEnt(iter, &((PRAddrInfoFB *) base)->hostent, port, result); michael@0: if (iter < 0) michael@0: iter = 0; michael@0: return (void *) iter; michael@0: #endif michael@0: } michael@0: michael@0: PR_IMPLEMENT(const char *) PR_GetCanonNameFromAddrInfo(const PRAddrInfo *ai) michael@0: { michael@0: #if defined(_PR_HAVE_GETADDRINFO) michael@0: #if defined(_PR_INET6_PROBE) michael@0: if (!_pr_ipv6_is_present()) { michael@0: const PRAddrInfoFB *fb = (const PRAddrInfoFB *) ai; michael@0: return fb->has_cname ? fb->hostent.h_name : NULL; michael@0: } michael@0: #endif michael@0: return ((const PRADDRINFO *) ai)->ai_canonname; michael@0: #else michael@0: const PRAddrInfoFB *fb = (const PRAddrInfoFB *) ai; michael@0: return fb->has_cname ? fb->hostent.h_name : NULL; michael@0: #endif michael@0: } michael@0: michael@0: #if defined(_PR_HAVE_GETADDRINFO) michael@0: static PRStatus pr_StringToNetAddrGAI(const char *string, PRNetAddr *addr) michael@0: { michael@0: PRADDRINFO *res, hints; michael@0: int rv; /* 0 for success, or the error code EAI_xxx */ michael@0: PRNetAddr laddr; michael@0: PRStatus status = PR_SUCCESS; michael@0: michael@0: memset(&hints, 0, sizeof(hints)); michael@0: hints.ai_flags = AI_NUMERICHOST; michael@0: hints.ai_family = AF_UNSPEC; michael@0: hints.ai_socktype = SOCK_STREAM; michael@0: michael@0: rv = GETADDRINFO(string, NULL, &hints, &res); michael@0: if (rv != 0) michael@0: { michael@0: PR_SetError(PR_INVALID_ARGUMENT_ERROR, rv); michael@0: return PR_FAILURE; michael@0: } michael@0: michael@0: /* pick up the first addr */ michael@0: memcpy(&laddr, res->ai_addr, res->ai_addrlen); michael@0: if (AF_INET6 == res->ai_addr->sa_family) michael@0: { michael@0: addr->ipv6.family = PR_AF_INET6; michael@0: addr->ipv6.ip = laddr.ipv6.ip; michael@0: addr->ipv6.scope_id = laddr.ipv6.scope_id; michael@0: } michael@0: else if (AF_INET == res->ai_addr->sa_family) michael@0: { michael@0: addr->inet.family = PR_AF_INET; michael@0: addr->inet.ip = laddr.inet.ip; michael@0: } michael@0: else michael@0: { michael@0: PR_SetError(PR_INVALID_ARGUMENT_ERROR, 0); michael@0: status = PR_FAILURE; michael@0: } michael@0: michael@0: FREEADDRINFO(res); michael@0: return status; michael@0: } michael@0: #endif /* _PR_HAVE_GETADDRINFO */ michael@0: michael@0: static PRStatus pr_StringToNetAddrFB(const char *string, PRNetAddr *addr) michael@0: { michael@0: PRIntn rv; michael@0: michael@0: rv = pr_inet_aton(string, &addr->inet.ip); michael@0: if (1 == rv) michael@0: { michael@0: addr->raw.family = AF_INET; michael@0: return PR_SUCCESS; michael@0: } michael@0: michael@0: PR_ASSERT(0 == rv); michael@0: /* clean up after the failed call */ michael@0: memset(&addr->inet.ip, 0, sizeof(addr->inet.ip)); michael@0: michael@0: rv = StringToV6Addr(string, &addr->ipv6.ip); michael@0: if (1 == rv) michael@0: { michael@0: addr->raw.family = PR_AF_INET6; michael@0: return PR_SUCCESS; michael@0: } michael@0: michael@0: PR_ASSERT(0 == rv); michael@0: PR_SetError(PR_INVALID_ARGUMENT_ERROR, 0); michael@0: return PR_FAILURE; michael@0: } michael@0: michael@0: PR_IMPLEMENT(PRStatus) PR_StringToNetAddr(const char *string, PRNetAddr *addr) michael@0: { michael@0: if (!_pr_initialized) _PR_ImplicitInitialization(); michael@0: michael@0: if (!addr || !string || !*string) michael@0: { michael@0: PR_SetError(PR_INVALID_ARGUMENT_ERROR, 0); michael@0: return PR_FAILURE; michael@0: } michael@0: michael@0: #if !defined(_PR_HAVE_GETADDRINFO) michael@0: return pr_StringToNetAddrFB(string, addr); michael@0: #else michael@0: /* michael@0: * getaddrinfo with AI_NUMERICHOST is much slower than pr_inet_aton on some michael@0: * platforms, such as Mac OS X (bug 404399), Linux glibc 2.10 (bug 344809), michael@0: * and most likely others. So we only use it to convert literal IP addresses michael@0: * that contain IPv6 scope IDs, which pr_inet_aton cannot convert. michael@0: */ michael@0: if (!strchr(string, '%')) michael@0: return pr_StringToNetAddrFB(string, addr); michael@0: michael@0: #if defined(_PR_INET6_PROBE) michael@0: if (!_pr_ipv6_is_present()) michael@0: return pr_StringToNetAddrFB(string, addr); michael@0: #endif michael@0: michael@0: return pr_StringToNetAddrGAI(string, addr); michael@0: #endif michael@0: } michael@0: michael@0: #if defined(_PR_HAVE_GETADDRINFO) michael@0: static PRStatus pr_NetAddrToStringGNI( michael@0: const PRNetAddr *addr, char *string, PRUint32 size) michael@0: { michael@0: int addrlen; michael@0: const PRNetAddr *addrp = addr; michael@0: #if defined(_PR_HAVE_SOCKADDR_LEN) || defined(_PR_INET6) michael@0: PRUint16 md_af = addr->raw.family; michael@0: PRNetAddr addrcopy; michael@0: #endif michael@0: int rv; /* 0 for success, or the error code EAI_xxx */ michael@0: michael@0: #ifdef _PR_INET6 michael@0: if (addr->raw.family == PR_AF_INET6) michael@0: { michael@0: md_af = AF_INET6; michael@0: #ifndef _PR_HAVE_SOCKADDR_LEN michael@0: addrcopy = *addr; michael@0: addrcopy.raw.family = md_af; michael@0: addrp = &addrcopy; michael@0: #endif michael@0: } michael@0: #endif michael@0: michael@0: addrlen = PR_NETADDR_SIZE(addr); michael@0: #ifdef _PR_HAVE_SOCKADDR_LEN michael@0: addrcopy = *addr; michael@0: ((struct sockaddr*)&addrcopy)->sa_len = addrlen; michael@0: ((struct sockaddr*)&addrcopy)->sa_family = md_af; michael@0: addrp = &addrcopy; michael@0: #endif michael@0: rv = GETNAMEINFO((const struct sockaddr *)addrp, addrlen, michael@0: string, size, NULL, 0, NI_NUMERICHOST); michael@0: if (rv != 0) michael@0: { michael@0: PR_SetError(PR_INVALID_ARGUMENT_ERROR, rv); michael@0: return PR_FAILURE; michael@0: } michael@0: return PR_SUCCESS; michael@0: } michael@0: #endif /* _PR_HAVE_GETADDRINFO */ michael@0: michael@0: #if !defined(_PR_HAVE_GETADDRINFO) || defined(_PR_INET6_PROBE) michael@0: static PRStatus pr_NetAddrToStringFB( michael@0: const PRNetAddr *addr, char *string, PRUint32 size) michael@0: { michael@0: if (PR_AF_INET6 == addr->raw.family) michael@0: { michael@0: #if defined(_PR_HAVE_INET_NTOP) michael@0: if (NULL == inet_ntop(AF_INET6, &addr->ipv6.ip, string, size)) michael@0: #else michael@0: if (NULL == V6AddrToString(&addr->ipv6.ip, string, size)) michael@0: #endif michael@0: { michael@0: /* the size of the result buffer is inadequate */ michael@0: PR_SetError(PR_BUFFER_OVERFLOW_ERROR, 0); michael@0: return PR_FAILURE; michael@0: } michael@0: } michael@0: else michael@0: { michael@0: if (size < 16) goto failed; michael@0: if (AF_INET != addr->raw.family) goto failed; michael@0: else michael@0: { michael@0: unsigned char *byte = (unsigned char*)&addr->inet.ip; michael@0: PR_snprintf(string, size, "%u.%u.%u.%u", michael@0: byte[0], byte[1], byte[2], byte[3]); michael@0: } michael@0: } michael@0: michael@0: return PR_SUCCESS; michael@0: michael@0: failed: michael@0: PR_SetError(PR_INVALID_ARGUMENT_ERROR, 0); michael@0: return PR_FAILURE; michael@0: michael@0: } /* pr_NetAddrToStringFB */ michael@0: #endif /* !_PR_HAVE_GETADDRINFO || _PR_INET6_PROBE */ michael@0: michael@0: PR_IMPLEMENT(PRStatus) PR_NetAddrToString( michael@0: const PRNetAddr *addr, char *string, PRUint32 size) michael@0: { michael@0: if (!_pr_initialized) _PR_ImplicitInitialization(); michael@0: michael@0: #if !defined(_PR_HAVE_GETADDRINFO) michael@0: return pr_NetAddrToStringFB(addr, string, size); michael@0: #else michael@0: #if defined(_PR_INET6_PROBE) michael@0: if (!_pr_ipv6_is_present()) michael@0: return pr_NetAddrToStringFB(addr, string, size); michael@0: #endif michael@0: return pr_NetAddrToStringGNI(addr, string, size); michael@0: #endif michael@0: } /* PR_NetAddrToString */