73e764474a58a2a13542935df98983c66840add0
[musl] / src / network / gethostbyaddr_r.c
1 #define _GNU_SOURCE
2
3 #include <sys/socket.h>
4 #include <netdb.h>
5 #include <string.h>
6 #include <netinet/in.h>
7 #include <errno.h>
8 #include <inttypes.h>
9
10 int gethostbyaddr_r(const void *a, socklen_t l, int af,
11         struct hostent *h, char *buf, size_t buflen,
12         struct hostent **res, int *err)
13 {
14         union {
15                 struct sockaddr_in sin;
16                 struct sockaddr_in6 sin6;
17         } sa = { .sin.sin_family = af };
18         socklen_t sl = af==AF_INET6 ? sizeof sa.sin6 : sizeof sa.sin;
19         int i;
20
21         /* Load address argument into sockaddr structure */
22         if (af==AF_INET6 && l==16) memcpy(&sa.sin6.sin6_addr, a, 16);
23         else if (af==AF_INET && l==4) memcpy(&sa.sin.sin_addr, a, 4);
24         else {
25                 *err = NO_RECOVERY;
26                 return EINVAL;
27         }
28
29         /* Align buffer and check for space for pointers and ip address */
30         i = (uintptr_t)buf & sizeof(char *)-1;
31         if (!i) i = sizeof(char *);
32         if (buflen <= 5*sizeof(char *)-i + l) return ERANGE;
33         buf += sizeof(char *)-i;
34         buflen -= 5*sizeof(char *)-i + l;
35
36         h->h_addr_list = (void *)buf;
37         buf += 2*sizeof(char *);
38         h->h_aliases = (void *)buf;
39         buf += 2*sizeof(char *);
40
41         h->h_addr_list[0] = buf;
42         memcpy(h->h_addr_list[0], a, l);
43         buf += l;
44         h->h_addr_list[1] = 0;
45         h->h_aliases[0] = buf;
46         h->h_aliases[1] = 0;
47
48         switch (getnameinfo((void *)&sa, sl, buf, buflen, 0, 0, 0)) {
49         case EAI_AGAIN:
50                 *err = TRY_AGAIN;
51                 return EAGAIN;
52         case EAI_OVERFLOW:
53                 return ERANGE;
54         default:
55         case EAI_MEMORY:
56         case EAI_SYSTEM:
57         case EAI_FAIL:
58                 *err = NO_RECOVERY;
59                 return errno;
60         case 0:
61                 break;
62         }
63
64         h->h_addrtype = af;
65         h->h_name = h->h_aliases[0];
66         *res = h;
67         return 0;
68 }