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