libbb/inet_common.c

   1 /*
   2  * stolen from net-tools-1.59 and stripped down for busybox by
   3  *                      Erik Andersen <andersen@codepoet.org>
   4  *
   5  * Heavily modified by Manuel Novoa III       Mar 12, 2001
   6  *
   7  * Version:     $Id: inet_common.c,v 1.8 2004/03/10 07:42:38 mjn3 Exp $
   8  *
   9  */
  10
  11 #include "libbb.h"
  12 #include "inet_common.h"
  13 #include <stdio.h>
  14 #include <errno.h>
  15 #include <stdlib.h>
  16 #include <string.h>
  17 #include <unistd.h>
  18
  19 #ifdef DEBUG
  20 # include <resolv.h>
  21 #endif
  22
  23
  24 const char bb_INET_default[] = "default";
  25
  26 int INET_resolve(const char *name, struct sockaddr_in *s_in, int hostfirst)
  27 {
  28         struct hostent *hp;
  29         struct netent *np;
  30
  31         /* Grmpf. -FvK */
  32         s_in->sin_family = AF_INET;
  33         s_in->sin_port = 0;
  34
  35         /* Default is special, meaning 0.0.0.0. */
  36         if (!strcmp(name, bb_INET_default)) {
  37                 s_in->sin_addr.s_addr = INADDR_ANY;
  38                 return (1);
  39         }
  40         /* Look to see if it's a dotted quad. */
  41         if (inet_aton(name, &s_in->sin_addr)) {
  42                 return 0;
  43         }
  44         /* If we expect this to be a hostname, try hostname database first */
  45 #ifdef DEBUG
  46         if (hostfirst) {
  47                 bb_error_msg("gethostbyname (%s)", name);
  48         }
  49 #endif
  50         if (hostfirst && (hp = gethostbyname(name)) != (struct hostent *) NULL) {
  51                 memcpy((char *) &s_in->sin_addr, (char *) hp->h_addr_list[0],
  52                            sizeof(struct in_addr));
  53                 return 0;
  54         }
  55         /* Try the NETWORKS database to see if this is a known network. */
  56 #ifdef DEBUG
  57         bb_error_msg("getnetbyname (%s)", name);
  58 #endif
  59         if ((np = getnetbyname(name)) != (struct netent *) NULL) {
  60                 s_in->sin_addr.s_addr = htonl(np->n_net);
  61                 return 1;
  62         }
  63         if (hostfirst) {
  64                 /* Don't try again */
  65                 return -1;
  66         }
  67 #ifdef DEBUG
  68         res_init();
  69         _res.options |= RES_DEBUG;
  70 #endif
  71
  72 #ifdef DEBUG
  73         bb_error_msg("gethostbyname (%s)", name);
  74 #endif
  75         if ((hp = gethostbyname(name)) == (struct hostent *) NULL) {
  76                 return -1;
  77         }
  78         memcpy((char *) &s_in->sin_addr, (char *) hp->h_addr_list[0],
  79                    sizeof(struct in_addr));
  80
  81         return 0;
  82 }
  83
  84 /* cache */
  85 struct addr {
  86         struct sockaddr_in addr;
  87         char *name;
  88         int host;
  89         struct addr *next;
  90 };
  91
  92 static struct addr *INET_nn = NULL;     /* addr-to-name cache           */
  93
  94 /* numeric: & 0x8000: default instead of *,
  95  *          & 0x4000: host instead of net,
  96  *          & 0x0fff: don't resolve
  97  */
  98 int INET_rresolve(char *name, size_t len, struct sockaddr_in *s_in,
  99                                   int numeric, unsigned int netmask)
 100 {
 101         struct hostent *ent;
 102         struct netent *np;
 103         struct addr *pn;
 104         unsigned long ad, host_ad;
 105         int host = 0;
 106
 107         /* Grmpf. -FvK */
 108         if (s_in->sin_family != AF_INET) {
 109 #ifdef DEBUG
 110                 bb_error_msg("rresolve: unsupport address family %d !",
 111                                   s_in->sin_family);
 112 #endif
 113                 errno = EAFNOSUPPORT;
 114                 return (-1);
 115         }
 116         ad = (unsigned long) s_in->sin_addr.s_addr;
 117 #ifdef DEBUG
 118         bb_error_msg("rresolve: %08lx, mask %08x, num %08x", ad, netmask, numeric);
 119 #endif
 120         if (ad == INADDR_ANY) {
 121                 if ((numeric & 0x0FFF) == 0) {
 122                         if (numeric & 0x8000)
 123                                 safe_strncpy(name, bb_INET_default, len);
 124                         else
 125                                 safe_strncpy(name, "*", len);
 126                         return (0);
 127                 }
 128         }
 129         if (numeric & 0x0FFF) {
 130                 safe_strncpy(name, inet_ntoa(s_in->sin_addr), len);
 131                 return (0);
 132         }
 133
 134         if ((ad & (~netmask)) != 0 || (numeric & 0x4000))
 135                 host = 1;
 136 #if 0
 137         INET_nn = NULL;
 138 #endif
 139         pn = INET_nn;
 140         while (pn != NULL) {
 141                 if (pn->addr.sin_addr.s_addr == ad && pn->host == host) {
 142                         safe_strncpy(name, pn->name, len);
 143 #ifdef DEBUG
 144                         bb_error_msg("rresolve: found %s %08lx in cache",
 145                                           (host ? "host" : "net"), ad);
 146 #endif
 147                         return (0);
 148                 }
 149                 pn = pn->next;
 150         }
 151
 152         host_ad = ntohl(ad);
 153         np = NULL;
 154         ent = NULL;
 155         if (host) {
 156 #ifdef DEBUG
 157                 bb_error_msg("gethostbyaddr (%08lx)", ad);
 158 #endif
 159                 ent = gethostbyaddr((char *) &ad, 4, AF_INET);
 160                 if (ent != NULL) {
 161                         safe_strncpy(name, ent->h_name, len);
 162                 }
 163         } else {
 164 #ifdef DEBUG
 165                 bb_error_msg("getnetbyaddr (%08lx)", host_ad);
 166 #endif
 167                 np = getnetbyaddr(host_ad, AF_INET);
 168                 if (np != NULL) {
 169                         safe_strncpy(name, np->n_name, len);
 170                 }
 171         }
 172         if ((ent == NULL) && (np == NULL)) {
 173                 safe_strncpy(name, inet_ntoa(s_in->sin_addr), len);
 174         }
 175         pn = (struct addr *) xmalloc(sizeof(struct addr));
 176         pn->addr = *s_in;
 177         pn->next = INET_nn;
 178         pn->host = host;
 179         pn->name = bb_xstrdup(name);
 180         INET_nn = pn;
 181
 182         return (0);
 183 }
 184
 185 #ifdef CONFIG_FEATURE_IPV6
 186
 187 int INET6_resolve(const char *name, struct sockaddr_in6 *sin6)
 188 {
 189         struct addrinfo req, *ai;
 190         int s;
 191
 192         memset(&req, '\0', sizeof req);
 193         req.ai_family = AF_INET6;
 194         if ((s = getaddrinfo(name, NULL, &req, &ai))) {
 195                 bb_error_msg("getaddrinfo: %s: %d", name, s);
 196                 return -1;
 197         }
 198         memcpy(sin6, ai->ai_addr, sizeof(struct sockaddr_in6));
 199
 200         freeaddrinfo(ai);
 201
 202         return (0);
 203 }
 204
 205 #ifndef IN6_IS_ADDR_UNSPECIFIED
 206 # define IN6_IS_ADDR_UNSPECIFIED(a) \
 207         (((uint32_t *) (a))[0] == 0 && ((uint32_t *) (a))[1] == 0 && \
 208          ((uint32_t *) (a))[2] == 0 && ((uint32_t *) (a))[3] == 0)
 209 #endif
 210
 211
 212 int INET6_rresolve(char *name, size_t len, struct sockaddr_in6 *sin6,
 213                                    int numeric)
 214 {
 215         int s;
 216
 217         /* Grmpf. -FvK */
 218         if (sin6->sin6_family != AF_INET6) {
 219 #ifdef DEBUG
 220                 bb_error_msg(_("rresolve: unsupport address family %d !\n"),
 221                                   sin6->sin6_family);
 222 #endif
 223                 errno = EAFNOSUPPORT;
 224                 return (-1);
 225         }
 226         if (numeric & 0x7FFF) {
 227                 inet_ntop(AF_INET6, &sin6->sin6_addr, name, len);
 228                 return (0);
 229         }
 230         if (IN6_IS_ADDR_UNSPECIFIED(&sin6->sin6_addr)) {
 231                 if (numeric & 0x8000) {
 232                         strcpy(name, "default");
 233                 } else {
 234                         strcpy(name, "*");
 235                 }
 236                 return (0);
 237         }
 238
 239         s = getnameinfo((struct sockaddr *) sin6, sizeof(struct sockaddr_in6), name, len, NULL, 0, 0);
 240         if (s) {
 241                 bb_error_msg("getnameinfo failed");
 242                 return -1;
 243         }
 244         return (0);
 245 }
 246
 247 #endif                                                  /* CONFIG_FEATURE_IPV6 */