mirror of
https://sourceware.org/git/glibc.git
synced 2024-11-18 11:00:07 +00:00
993b3242cd
1997-03-29 17:39 Ulrich Drepper <drepper@cygnus.com> * math/Makefile (routines): Add carg, s_ccosh and s_csinh. * math/complex.h: Add C++ protection. * math/libm-test.c (cexp_test): Correct a few bugs. (csinh_test): New function. (ccosh_test): New function. (cacos_test): New function. (cacosh_test): New function. (casinh_test): New function. (catanh_test): New function. (main): Add calls to csinh_test and ccosh_test. * misc/Makefile (tests): Add tst-tsearch. Add rule to link tst-tsearch against libm. * misc/tsearch.c: Rewritten to use Red-Black-Tree algorithm by Bernd Schmidt <crux@Pool.Informatik.RWTH-Aachen.DE>. * misc/tst-tsearch.c: New file. * stdio-common/bug5.c: Clear LD_LIBRARY_PATH environment variable before using system. * stdio-common/test-popen.c: Clear LD_LIBRARY_PATH environment variable before using popen. * sysdeps/libm-ieee754/s_cexp.c: Correct handling of special cases. * sysdeps/libm-ieee754/s_cexpf.c: Likewise. * sysdeps/libm-ieee754/s_cexpl.c: Likewise. * sysdeps/libm-i387/s_cexp.S: New file. ix87 specific implementation of complex exponential function. * sysdeps/libm-i387/s_cexpf.S: New file. * sysdeps/libm-i387/s_cexpl.S: New file. * sysdeps/libm-ieee754/s_ccosh.c: New file. Implementation of complex cosh function. * sysdeps/libm-ieee754/s_ccoshf.c: New file. * sysdeps/libm-ieee754/s_ccoshl.c: New file. * sysdeps/libm-ieee754/s_csinh.c: New file. Implementation of complex sinh function. * sysdeps/libm-ieee754/s_csinhf.c: New file. * sysdeps/libm-ieee754/s_csinhl.c: New file. * math/carg.c: New file. Generic implementatio of carg function. * math/cargf.c: New file. * math/cargl.c: New file. 1997-03-29 16:07 Ulrich Drepper <drepper@cygnus.com> * sysdeps/posix/system.c: Update copyright. 1997-03-29 04:18 Ulrich Drepper <drepper@cygnus.com> * elf/dl-error.c (_dl_catch_error): Add another argument which is passed to OPERATE. (_dl_receive_error): Likewise. * elf/link.h: Change prototypes for _dl_catch_error and _dl_receive_error to reflect above change. * elf/dl-deps.c: Don't use nested function. Call _dl_catch_error with additional argument with pointer to data. * elf/dlclose.c: Likewise. * elf/dlerror.c: Likewise. * elf/dlopen.c: Likewise. * elf/dlsym.c: Likewise. * elf/dlvsym.c: Likewise. * elf/rtld.c: Likewise. * nss/nsswitch.c: Likewise. Patch by Bernd Schmidt <crux@Pool.Informatik.RWTH-Aachen.DE>. 1997-03-28 21:14 Miguel de Icaza <miguel@nuclecu.unam.mx> * elf/dl-error.c: Manually set up the values of "c", this avoids a call to memcpy and a zero 152 bytes structure. * sysdeps/sparc/dl-machine.h (elf_machine_rela): Test RTLD_BOOTSTRAP to avoid performing relative relocs on a second pass. * sysdeps/sparc/udiv_qrnnd.S: Make the code PIC aware. * sysdeps/unix/sysv/linux/sparc/Dist: Add kernel_stat.h and kernel_sigaction.h Add Linux/SPARC specific definitions. * sysdeps/unix/sysv/linux/sparc/fcntlbits.h: New file. * sysdeps/unix/sysv/linux/sparc/ioctls.h: New file. * sysdeps/unix/sysv/linux/sparc/kernel_sigaction.h: New file. * sysdeps/unix/sysv/linux/sparc/kernel_stat.h: New file. * sysdeps/unix/sysv/linux/sparc/sigaction.h: New file. * sysdeps/unix/sysv/linux/sparc/signum.h: New file. * sysdeps/unix/sysv/linux/sparc/termbits.h: New file. 1997-03-28 13:06 Philip Blundell <pjb27@cam.ac.uk> * sysdeps/posix/getaddrinfo.c (gaih_inet_serv): Use __getservbyname_r() not getservbyname(). (BROKEN_LIKE_POSIX): Define to 1 so we get strict POSIX behaviour.
684 lines
17 KiB
C
684 lines
17 KiB
C
/* The Inner Net License, Version 2.00
|
|
|
|
The author(s) grant permission for redistribution and use in source and
|
|
binary forms, with or without modification, of the software and documentation
|
|
provided that the following conditions are met:
|
|
|
|
0. If you receive a version of the software that is specifically labelled
|
|
as not being for redistribution (check the version message and/or README),
|
|
you are not permitted to redistribute that version of the software in any
|
|
way or form.
|
|
1. All terms of the all other applicable copyrights and licenses must be
|
|
followed.
|
|
2. Redistributions of source code must retain the authors' copyright
|
|
notice(s), this list of conditions, and the following disclaimer.
|
|
3. Redistributions in binary form must reproduce the authors' copyright
|
|
notice(s), this list of conditions, and the following disclaimer in the
|
|
documentation and/or other materials provided with the distribution.
|
|
4. All advertising materials mentioning features or use of this software
|
|
must display the following acknowledgement with the name(s) of the
|
|
authors as specified in the copyright notice(s) substituted where
|
|
indicated:
|
|
|
|
This product includes software developed by <name(s)>, The Inner
|
|
Net, and other contributors.
|
|
|
|
5. Neither the name(s) of the author(s) nor the names of its contributors
|
|
may be used to endorse or promote products derived from this software
|
|
without specific prior written permission.
|
|
|
|
THIS SOFTWARE IS PROVIDED BY ITS AUTHORS AND CONTRIBUTORS ``AS IS'' AND ANY
|
|
EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
|
|
WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
|
|
DISCLAIMED. IN NO EVENT SHALL THE AUTHORS OR CONTRIBUTORS BE LIABLE FOR ANY
|
|
DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
|
|
(INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
|
|
LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON
|
|
ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
|
|
(INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
|
|
SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
|
|
|
If these license terms cause you a real problem, contact the author. */
|
|
|
|
/* This software is Copyright 1996 by Craig Metz, All Rights Reserved. */
|
|
|
|
/* getaddrinfo() v1.13 */
|
|
|
|
/* To do what POSIX says, even when it's broken: */
|
|
#define BROKEN_LIKE_POSIX 1
|
|
#define LOCAL 1
|
|
#define INET6 1
|
|
#define HOSTTABLE 0
|
|
#define RESOLVER 1
|
|
|
|
#include <sys/types.h>
|
|
#include <stdlib.h>
|
|
#include <unistd.h>
|
|
#include <sys/socket.h>
|
|
#if LOCAL
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
#include <sys/utsname.h>
|
|
#include <sys/un.h>
|
|
#endif /* LOCAL */
|
|
#include <netinet/in.h>
|
|
#include <netdb.h>
|
|
#include <errno.h>
|
|
#include <arpa/inet.h>
|
|
|
|
#ifndef AF_LOCAL
|
|
#define AF_LOCAL AF_UNIX
|
|
#endif /* AF_LOCAL */
|
|
#ifndef PF_LOCAL
|
|
#define PF_LOCAL PF_UNIX
|
|
#endif /* PF_LOCAL */
|
|
#ifndef UNIX_PATH_MAX
|
|
#define UNIX_PATH_MAX 108
|
|
#endif /* UNIX_PATH_MAX */
|
|
|
|
#define GAIH_OKIFUNSPEC 0x0100
|
|
#define GAIH_EAI ~(GAIH_OKIFUNSPEC)
|
|
|
|
#if HOSTTABLE
|
|
struct hostent *_hostname2addr_hosts(const char *name, int);
|
|
struct hostent *_addr2hostname_hosts(const char *name, int, int);
|
|
#endif /* HOSTTABLE */
|
|
|
|
static struct addrinfo nullreq =
|
|
{ 0, PF_UNSPEC, 0, 0, 0, NULL, NULL, NULL };
|
|
|
|
struct gaih_service {
|
|
char *name;
|
|
int num;
|
|
};
|
|
|
|
struct gaih_servtuple {
|
|
struct gaih_servtuple *next;
|
|
int socktype;
|
|
int protocol;
|
|
int port;
|
|
};
|
|
|
|
static struct gaih_servtuple nullserv = {
|
|
NULL, 0, 0, 0
|
|
};
|
|
|
|
struct gaih_addrtuple {
|
|
struct gaih_addrtuple *next;
|
|
int family;
|
|
char addr[16];
|
|
};
|
|
|
|
struct gaih_typeproto {
|
|
int socktype;
|
|
int protocol;
|
|
char *name;
|
|
};
|
|
|
|
#if LOCAL
|
|
static int gaih_local(const char *name, const struct gaih_service *service,
|
|
const struct addrinfo *req, struct addrinfo **pai)
|
|
{
|
|
struct utsname utsname;
|
|
|
|
if (name || (req->ai_flags & AI_CANONNAME))
|
|
if (uname(&utsname))
|
|
return -EAI_SYSTEM;
|
|
if (name) {
|
|
if (strcmp(name, "localhost") && strcmp(name, "local") && strcmp(name, "unix") && strcmp(name, utsname.nodename))
|
|
return (GAIH_OKIFUNSPEC | -EAI_NONAME);
|
|
};
|
|
|
|
if (!(*pai = malloc(sizeof(struct addrinfo) + sizeof(struct sockaddr_un) + ((req->ai_flags & AI_CANONNAME) ? (strlen(utsname.nodename) + 1): 0))))
|
|
return -EAI_MEMORY;
|
|
|
|
(*pai)->ai_next = NULL;
|
|
(*pai)->ai_flags = req->ai_flags;
|
|
(*pai)->ai_family = AF_LOCAL;
|
|
(*pai)->ai_socktype = req->ai_socktype ? req->ai_socktype : SOCK_STREAM;
|
|
(*pai)->ai_protocol = req->ai_protocol;
|
|
(*pai)->ai_addrlen = sizeof(struct sockaddr_un);
|
|
(*pai)->ai_addr = (void *)(*pai) + sizeof(struct addrinfo);
|
|
#if SALEN
|
|
((struct sockaddr_un *)(*pai)->ai_addr)->sun_len = sizeof(struct sockaddr_un);
|
|
#endif /* SALEN */
|
|
((struct sockaddr_un *)(*pai)->ai_addr)->sun_family = AF_LOCAL;
|
|
memset(((struct sockaddr_un *)(*pai)->ai_addr)->sun_path, 0, UNIX_PATH_MAX);
|
|
if (service) {
|
|
char *c;
|
|
if (c = strchr(service->name, '/')) {
|
|
if (strlen(service->name) >= sizeof(((struct sockaddr_un *)(*pai)->ai_addr)->sun_path))
|
|
return (GAIH_OKIFUNSPEC | -EAI_SERVICE);
|
|
strcpy(((struct sockaddr_un *)(*pai)->ai_addr)->sun_path, service->name);
|
|
} else {
|
|
if (strlen(P_tmpdir "/") + 1 + strlen(service->name) >= sizeof(((struct sockaddr_un *)(*pai)->ai_addr)->sun_path))
|
|
return (GAIH_OKIFUNSPEC | -EAI_SERVICE);
|
|
strcpy(((struct sockaddr_un *)(*pai)->ai_addr)->sun_path, P_tmpdir "/");
|
|
strcat(((struct sockaddr_un *)(*pai)->ai_addr)->sun_path, service->name);
|
|
};
|
|
} else {
|
|
if (!tmpnam(((struct sockaddr_un *)(*pai)->ai_addr)->sun_path))
|
|
return -EAI_SYSTEM;
|
|
};
|
|
if (req->ai_flags & AI_CANONNAME)
|
|
strcpy((*pai)->ai_canonname = (char *)(*pai) + sizeof(struct addrinfo) + sizeof(struct sockaddr_un), utsname.nodename);
|
|
else
|
|
(*pai)->ai_canonname = NULL;
|
|
return 0;
|
|
};
|
|
#endif /* LOCAL */
|
|
|
|
static struct gaih_typeproto gaih_inet_typeproto[] =
|
|
{
|
|
{ 0, 0, NULL },
|
|
{ SOCK_STREAM, IPPROTO_TCP, (char *) "tcp" },
|
|
{ SOCK_DGRAM, IPPROTO_UDP, (char *) "udp" },
|
|
{ 0, 0, NULL }
|
|
};
|
|
|
|
static int gaih_inet_serv(char *servicename, struct gaih_typeproto *tp, struct gaih_servtuple **st)
|
|
{
|
|
struct servent *s;
|
|
int tmpbuflen = 1024;
|
|
struct servent ts;
|
|
char *tmpbuf = __alloca (tmpbuflen);
|
|
while (__getservbyname_r (servicename, tp->name, &ts, tmpbuf, tmpbuflen, &s))
|
|
{
|
|
if (errno == ERANGE)
|
|
{
|
|
tmpbuflen *= 2;
|
|
tmpbuf = __alloca (tmpbuflen);
|
|
}
|
|
else
|
|
{
|
|
return GAIH_OKIFUNSPEC | -EAI_SERVICE;
|
|
}
|
|
}
|
|
|
|
if (!(*st = malloc (sizeof (struct gaih_servtuple))))
|
|
return -EAI_MEMORY;
|
|
|
|
(*st)->next = NULL;
|
|
(*st)->socktype = tp->socktype;
|
|
(*st)->protocol = tp->protocol;
|
|
(*st)->port = s->s_port;
|
|
|
|
return 0;
|
|
}
|
|
|
|
static int gaih_inet(const char *name, const struct gaih_service *service,
|
|
const struct addrinfo *req, struct addrinfo **pai)
|
|
{
|
|
struct gaih_typeproto *tp = gaih_inet_typeproto;
|
|
struct gaih_servtuple *st = &nullserv;
|
|
struct gaih_addrtuple *at = NULL;
|
|
int i;
|
|
|
|
if (req->ai_protocol || req->ai_socktype) {
|
|
for (tp++; tp->name &&
|
|
((req->ai_socktype != tp->socktype) || !req->ai_socktype) &&
|
|
((req->ai_protocol != tp->protocol) || !req->ai_protocol); tp++);
|
|
if (!tp->name)
|
|
if (req->ai_socktype)
|
|
return (GAIH_OKIFUNSPEC | -EAI_SOCKTYPE);
|
|
else
|
|
return (GAIH_OKIFUNSPEC | -EAI_SERVICE);
|
|
}
|
|
|
|
if (service) {
|
|
if (service->num < 0) {
|
|
if (tp->name) {
|
|
if (i = gaih_inet_serv(service->name, tp, &st))
|
|
return i;
|
|
} else {
|
|
struct gaih_servtuple **pst = &st;
|
|
for (tp++; tp->name; tp++) {
|
|
if (i = gaih_inet_serv(service->name, tp, pst)) {
|
|
if (i & GAIH_OKIFUNSPEC)
|
|
continue;
|
|
goto ret;
|
|
}
|
|
pst = &((*pst)->next);
|
|
}
|
|
if (st == &nullserv) {
|
|
i = (GAIH_OKIFUNSPEC | -EAI_SERVICE);
|
|
goto ret;
|
|
}
|
|
}
|
|
} else {
|
|
if (!(st = malloc(sizeof(struct gaih_servtuple))))
|
|
return -EAI_MEMORY;
|
|
|
|
st->next = NULL;
|
|
st->socktype = tp->socktype;
|
|
st->protocol = tp->protocol;
|
|
st->port = htons(service->num);
|
|
}
|
|
}
|
|
|
|
if (name) {
|
|
if (!(at = malloc(sizeof(struct gaih_addrtuple)))) {
|
|
i = -EAI_MEMORY;
|
|
goto ret;
|
|
}
|
|
|
|
at->family = 0;
|
|
at->next = NULL;
|
|
|
|
if (!at->family || !req->ai_family || (req->ai_family == AF_INET))
|
|
if (inet_pton(AF_INET, name, at->addr) > 0)
|
|
at->family = AF_INET;
|
|
|
|
#if INET6
|
|
if (!at->family && (!req->ai_family || (req->ai_family == AF_INET6)))
|
|
if (inet_pton(AF_INET6, name, at->addr) > 0)
|
|
at->family = AF_INET6;
|
|
#endif /* INET6 */
|
|
|
|
#if HOSTTABLE
|
|
if (!at->family) {
|
|
struct hostent *h;
|
|
struct gaih_addrtuple **pat = &at;
|
|
|
|
#if INET6
|
|
if (!req->ai_family || (req->ai_family == AF_INET6))
|
|
if (h = _hostname2addr_hosts(name, AF_INET6)) {
|
|
for (i = 0; h->h_addr_list[i]; i++) {
|
|
if (!*pat) {
|
|
if (!(*pat = malloc(sizeof(struct gaih_addrtuple)))) {
|
|
i = -EAI_MEMORY;
|
|
goto ret;
|
|
}
|
|
}
|
|
(*pat)->next = NULL;
|
|
(*pat)->family = AF_INET6;
|
|
memcpy((*pat)->addr, h->h_addr_list[i], sizeof(struct in6_addr));
|
|
pat = &((*pat)->next);
|
|
}
|
|
}
|
|
#endif /* INET6 */
|
|
|
|
if (!req->ai_family || (req->ai_family == AF_INET))
|
|
if (h = _hostname2addr_hosts(name, AF_INET)) {
|
|
for (i = 0; h->h_addr_list[i]; i++) {
|
|
if (!*pat) {
|
|
if (!(*pat = malloc(sizeof(struct gaih_addrtuple)))) {
|
|
i = -EAI_MEMORY;
|
|
goto ret;
|
|
}
|
|
}
|
|
(*pat)->next = NULL;
|
|
(*pat)->family = AF_INET;
|
|
memcpy((*pat)->addr, h->h_addr_list[i], sizeof(struct in_addr));
|
|
pat = &((*pat)->next);
|
|
}
|
|
}
|
|
}
|
|
#endif /* HOSTTABLE */
|
|
|
|
#if RESOLVER
|
|
if (!at->family) {
|
|
struct hostent *h;
|
|
struct gaih_addrtuple **pat = &at;
|
|
|
|
#if INET6
|
|
if (!req->ai_family || (req->ai_family == AF_INET6)) {
|
|
int herrno;
|
|
int tmpbuflen = 1024;
|
|
struct hostent th;
|
|
char *tmpbuf = __alloca(tmpbuflen);
|
|
while (__gethostbyname2_r(name, AF_INET6, &th, tmpbuf, tmpbuflen,
|
|
&h, &herrno)) {
|
|
if (herrno == NETDB_INTERNAL) {
|
|
if (errno == ERANGE) {
|
|
/* Need more buffer */
|
|
tmpbuflen *= 2;
|
|
tmpbuf = __alloca(tmpbuflen);
|
|
} else {
|
|
/* Bail out */
|
|
__set_h_errno(herrno);
|
|
i = -EAI_SYSTEM;
|
|
goto ret;
|
|
}
|
|
} else {
|
|
break;
|
|
}
|
|
}
|
|
if (h) {
|
|
for (i = 0; h->h_addr_list[i]; i++) {
|
|
if (!*pat) {
|
|
if (!(*pat = malloc(sizeof(struct gaih_addrtuple)))) {
|
|
i = -EAI_MEMORY;
|
|
goto ret;
|
|
}
|
|
}
|
|
(*pat)->next = NULL;
|
|
(*pat)->family = AF_INET6;
|
|
memcpy((*pat)->addr, h->h_addr_list[i], sizeof(struct in6_addr));
|
|
pat = &((*pat)->next);
|
|
}
|
|
}
|
|
}
|
|
#endif /* INET6 */
|
|
|
|
if (!req->ai_family || (req->ai_family == AF_INET)) {
|
|
int herrno;
|
|
struct hostent th;
|
|
int tmpbuflen = 1024;
|
|
char *tmpbuf = __alloca(tmpbuflen);
|
|
while (__gethostbyname2_r(name, AF_INET, &th, tmpbuf, tmpbuflen,
|
|
&h, &herrno)) {
|
|
if (herrno == NETDB_INTERNAL) {
|
|
if (errno == ERANGE) {
|
|
/* Need more buffer */
|
|
tmpbuflen *= 2;
|
|
tmpbuf = __alloca(tmpbuflen);
|
|
} else {
|
|
/* Bail out */
|
|
__set_h_errno(herrno);
|
|
i = -EAI_SYSTEM;
|
|
goto ret;
|
|
}
|
|
} else {
|
|
break;
|
|
}
|
|
}
|
|
if (h) {
|
|
for (i = 0; h->h_addr_list[i]; i++) {
|
|
if (!*pat) {
|
|
if (!(*pat = malloc(sizeof(struct gaih_addrtuple)))) {
|
|
i = -EAI_MEMORY;
|
|
goto ret;
|
|
}
|
|
}
|
|
(*pat)->next = NULL;
|
|
(*pat)->family = AF_INET;
|
|
memcpy((*pat)->addr, h->h_addr_list[i], sizeof(struct in_addr));
|
|
pat = &((*pat)->next);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
#endif /* RESOLVER */
|
|
|
|
if (!at->family)
|
|
return (GAIH_OKIFUNSPEC | -EAI_NONAME);
|
|
} else {
|
|
if (!(at = malloc(sizeof(struct gaih_addrtuple)))) {
|
|
i = -EAI_MEMORY;
|
|
goto ret;
|
|
};
|
|
|
|
memset(at, 0, sizeof(struct gaih_addrtuple));
|
|
|
|
#if INET6
|
|
if (!(at->next = malloc(sizeof(struct gaih_addrtuple)))) {
|
|
i = -EAI_MEMORY;
|
|
goto ret;
|
|
};
|
|
|
|
at->family = AF_INET6;
|
|
|
|
memset(at->next, 0, sizeof(struct gaih_addrtuple));
|
|
at->next->family = AF_INET;
|
|
#else /* INET6 */
|
|
at->family = AF_INET;
|
|
#endif /* INET6 */
|
|
};
|
|
|
|
if (!pai) {
|
|
i = 0;
|
|
goto ret;
|
|
};
|
|
|
|
{
|
|
const char *c = NULL;
|
|
struct gaih_servtuple *st2;
|
|
struct gaih_addrtuple *at2 = at;
|
|
int j;
|
|
#ifndef MAXHOSTNAMELEN
|
|
#define MAXHOSTNAMELEN 128
|
|
#endif /* MAXHOSTNAMELEN */
|
|
char buffer[MAXHOSTNAMELEN];
|
|
|
|
while(at2) {
|
|
if (req->ai_flags & AI_CANONNAME) {
|
|
struct hostent *h = NULL;
|
|
|
|
#if RESOLVER
|
|
int herrno;
|
|
struct hostent th;
|
|
int tmpbuflen = 1024;
|
|
char *tmpbuf = __alloca(tmpbuflen);
|
|
while (__gethostbyaddr_r(at2->addr,
|
|
#if INET6
|
|
(at2->family == AF_INET6) ? sizeof(struct in6_addr) :
|
|
#endif /* INET6 */
|
|
sizeof(struct in_addr), at2->family,
|
|
&th, tmpbuf, tmpbuflen, &h, &herrno)) {
|
|
if (herrno == NETDB_INTERNAL) {
|
|
if (errno == ERANGE) {
|
|
/* Need more buffer */
|
|
tmpbuflen *= 2;
|
|
tmpbuf = __alloca(tmpbuflen);
|
|
} else {
|
|
/* Bail out */
|
|
__set_h_errno(herrno);
|
|
i = -EAI_SYSTEM;
|
|
goto ret;
|
|
}
|
|
} else {
|
|
break;
|
|
}
|
|
}
|
|
#endif /* RESOLVER */
|
|
#if HOSTTABLE
|
|
if (!h)
|
|
h = _addr2hostname_hosts(at2->addr,
|
|
#if INET6
|
|
(at2->family == AF_INET6) ? sizeof(struct in6_addr) :
|
|
#endif /* INET6 */
|
|
sizeof(struct in_addr), at2->family);
|
|
#endif /* HOSTTABLE */
|
|
|
|
if (!h)
|
|
c = inet_ntop(at2->family, at2->addr, buffer, sizeof(buffer));
|
|
else
|
|
c = h->h_name;
|
|
|
|
if (!c) {
|
|
i = (GAIH_OKIFUNSPEC | -EAI_NONAME);
|
|
goto ret;
|
|
}
|
|
|
|
j = strlen(c) + 1;
|
|
} else
|
|
j = 0;
|
|
|
|
#if INET6
|
|
if (at2->family == AF_INET6)
|
|
i = sizeof(struct sockaddr_in6);
|
|
else
|
|
#endif /* INET6 */
|
|
i = sizeof(struct sockaddr_in);
|
|
|
|
st2 = st;
|
|
while(st2) {
|
|
if (!(*pai = malloc(sizeof(struct addrinfo) + i + j))) {
|
|
i = -EAI_MEMORY;
|
|
goto ret;
|
|
}
|
|
(*pai)->ai_flags = req->ai_flags;
|
|
(*pai)->ai_family = at2->family;
|
|
(*pai)->ai_socktype = st2->socktype;
|
|
(*pai)->ai_protocol = st2->protocol;
|
|
(*pai)->ai_addrlen = i;
|
|
(*pai)->ai_addr = (void *)(*pai) + sizeof(struct addrinfo);
|
|
#if SALEN
|
|
((struct sockaddr_in *)(*pai)->ai_addr)->sin_len = i;
|
|
#endif /* SALEN */
|
|
((struct sockaddr_in *)(*pai)->ai_addr)->sin_family = at2->family;
|
|
((struct sockaddr_in *)(*pai)->ai_addr)->sin_port = st2->port;
|
|
|
|
#if INET6
|
|
if (at2->family == AF_INET6) {
|
|
((struct sockaddr_in6 *)(*pai)->ai_addr)->sin6_flowinfo = 0;
|
|
memcpy(&((struct sockaddr_in6 *)(*pai)->ai_addr)->sin6_addr, at2->addr, sizeof(struct in6_addr));
|
|
} else
|
|
#endif /* INET6 */
|
|
{
|
|
memcpy(&((struct sockaddr_in *)(*pai)->ai_addr)->sin_addr, at2->addr, sizeof(struct in_addr));
|
|
memset(((struct sockaddr_in *)(*pai)->ai_addr)->sin_zero, 0, sizeof(((struct sockaddr_in *)(*pai)->ai_addr)->sin_zero));
|
|
}
|
|
|
|
if (c) {
|
|
(*pai)->ai_canonname = (void *)(*pai) + sizeof(struct addrinfo) + i;
|
|
strcpy((*pai)->ai_canonname, c);
|
|
} else
|
|
(*pai)->ai_canonname = NULL;
|
|
(*pai)->ai_next = NULL;
|
|
|
|
pai = &((*pai)->ai_next);
|
|
|
|
st2 = st2->next;
|
|
}
|
|
at2 = at2->next;
|
|
}
|
|
}
|
|
|
|
i = 0;
|
|
|
|
ret:
|
|
if (st != &nullserv) {
|
|
struct gaih_servtuple *st2 = st;
|
|
while(st) {
|
|
st2 = st->next;
|
|
free(st);
|
|
st = st2;
|
|
}
|
|
}
|
|
if (at) {
|
|
struct gaih_addrtuple *at2 = at;
|
|
while(at) {
|
|
at2 = at->next;
|
|
free(at);
|
|
at = at2;
|
|
}
|
|
}
|
|
return i;
|
|
}
|
|
|
|
struct gaih {
|
|
int family;
|
|
int (*gaih)(const char *name, const struct gaih_service *service,
|
|
const struct addrinfo *req, struct addrinfo **pai);
|
|
};
|
|
|
|
static struct gaih gaih[] = {
|
|
#if INET6
|
|
{ PF_INET6, gaih_inet },
|
|
#endif /* INET6 */
|
|
{ PF_INET, gaih_inet },
|
|
#if LOCAL
|
|
{ PF_LOCAL, gaih_local },
|
|
#endif /* LOCAL */
|
|
{ PF_UNSPEC, NULL }
|
|
};
|
|
|
|
int getaddrinfo(const char *name, const char *service,
|
|
const struct addrinfo *req, struct addrinfo **pai)
|
|
{
|
|
int i = 0, j = 0;
|
|
struct addrinfo *p = NULL, **end;
|
|
struct gaih *g = gaih, *pg = NULL;
|
|
struct gaih_service gaih_service, *pservice;
|
|
|
|
if (name && (name[0] == '*') && !name[1])
|
|
name = NULL;
|
|
|
|
if (service && (service[0] == '*') && !service[1])
|
|
service = NULL;
|
|
|
|
#if BROKEN_LIKE_POSIX
|
|
if (!name && !service)
|
|
return EAI_NONAME;
|
|
#endif /* BROKEN_LIKE_POSIX */
|
|
|
|
if (!req)
|
|
req = &nullreq;
|
|
|
|
if (req->ai_flags & ~3)
|
|
return EAI_BADFLAGS;
|
|
|
|
if ((req->ai_flags & AI_CANONNAME) && !name)
|
|
return EAI_BADFLAGS;
|
|
|
|
if (service && *service) {
|
|
char *c;
|
|
gaih_service.num = strtoul(gaih_service.name = (void *)service, &c, 10);
|
|
if (*c) {
|
|
gaih_service.num = -1;
|
|
}
|
|
#if BROKEN_LIKE_POSIX
|
|
else
|
|
if (!req->ai_socktype)
|
|
return EAI_SERVICE;
|
|
#endif /* BROKEN_LIKE_POSIX */
|
|
pservice = &gaih_service;
|
|
} else
|
|
pservice = NULL;
|
|
|
|
if (pai)
|
|
end = &p;
|
|
else
|
|
end = NULL;
|
|
|
|
while(g->gaih) {
|
|
if ((req->ai_family == g->family) || !req->ai_family) {
|
|
j++;
|
|
if (!((pg && (pg->gaih == g->gaih)))) {
|
|
pg = g;
|
|
if (i = g->gaih(name, pservice, req, end)) {
|
|
if (!req->ai_family && (i & GAIH_OKIFUNSPEC))
|
|
continue;
|
|
goto gaih_err;
|
|
}
|
|
if (end)
|
|
while(*end) end = &((*end)->ai_next);
|
|
}
|
|
}
|
|
g++;
|
|
}
|
|
|
|
if (!j)
|
|
return EAI_FAMILY;
|
|
|
|
if (p) {
|
|
*pai = p;
|
|
return 0;
|
|
}
|
|
|
|
if (!pai && !i)
|
|
return 0;
|
|
|
|
gaih_err:
|
|
if (p)
|
|
freeaddrinfo(p);
|
|
|
|
if (i)
|
|
return -(i & GAIH_EAI);
|
|
|
|
return EAI_NONAME;
|
|
}
|
|
|
|
void freeaddrinfo(struct addrinfo *ai)
|
|
{
|
|
struct addrinfo *p;
|
|
|
|
while(ai) {
|
|
p = ai;
|
|
ai = ai->ai_next;
|
|
free((void *)p);
|
|
}
|
|
}
|