dos2unix: tiny shrink
[oweals/busybox.git] / libbb / inet_common.c
index c7bf409c4a9fa16d4cfb17e43c7e9c3bb7f1c060..9c4f49649d689a60da1260a3423bdaa81792e530 100644 (file)
+/* vi: set sw=4 ts=4: */
 /*
  * stolen from net-tools-1.59 and stripped down for busybox by
- *                      Erik Andersen <andersee@debian.org>
+ *                      Erik Andersen <andersen@codepoet.org>
  *
  * Heavily modified by Manuel Novoa III       Mar 12, 2001
  *
- * Version:     $Id: inet_common.c,v 1.3 2002/07/03 11:46:36 andersen Exp $
  *
  */
 
-#include "inet_common.h"
-#include <stdio.h>
-#include <errno.h>
-#include <stdlib.h>
-#include <string.h>
-#include <unistd.h>
 #include "libbb.h"
+#include "inet_common.h"
 
-#ifdef DEBUG
-#include <resolv.h>
+int INET_resolve(const char *name, struct sockaddr_in *s_in, int hostfirst)
+{
+       struct hostent *hp;
+#if ENABLE_FEATURE_ETC_NETWORKS
+       struct netent *np;
 #endif
 
+       /* Grmpf. -FvK */
+       s_in->sin_family = AF_INET;
+       s_in->sin_port = 0;
 
-const char bb_INET_default[]="default";
-
-int INET_resolve(const char *name, struct sockaddr_in *s_in, int hostfirst)
-{
-    struct hostent *hp;
-    struct netent *np;
-
-    /* Grmpf. -FvK */
-    s_in->sin_family = AF_INET;
-    s_in->sin_port = 0;
-
-    /* Default is special, meaning 0.0.0.0. */
-    if (!strcmp(name, bb_INET_default)) {
-       s_in->sin_addr.s_addr = INADDR_ANY;
-       return (1);
-    }
-    /* Look to see if it's a dotted quad. */
-    if (inet_aton(name, &s_in->sin_addr)) {
-       return 0;
-    }
-    /* If we expect this to be a hostname, try hostname database first */
+       /* Default is special, meaning 0.0.0.0. */
+       if (!strcmp(name, bb_str_default)) {
+               s_in->sin_addr.s_addr = INADDR_ANY;
+               return 1;
+       }
+       /* Look to see if it's a dotted quad. */
+       if (inet_aton(name, &s_in->sin_addr)) {
+               return 0;
+       }
+       /* If we expect this to be a hostname, try hostname database first */
 #ifdef DEBUG
-    if (hostfirst) fprintf (stderr, "gethostbyname (%s)\n", name);
+       if (hostfirst) {
+               bb_error_msg("gethostbyname(%s)", name);
+       }
 #endif
-    if (hostfirst &&
-       (hp = gethostbyname(name)) != (struct hostent *) NULL) {
-       memcpy((char *) &s_in->sin_addr, (char *) hp->h_addr_list[0],
-               sizeof(struct in_addr));
-       return 0;
-    }
-    /* Try the NETWORKS database to see if this is a known network. */
+       if (hostfirst) {
+               hp = gethostbyname(name);
+               if (hp != NULL) {
+                       memcpy(&s_in->sin_addr, hp->h_addr_list[0],
+                               sizeof(struct in_addr));
+                       return 0;
+               }
+       }
+#if ENABLE_FEATURE_ETC_NETWORKS
+       /* Try the NETWORKS database to see if this is a known network. */
 #ifdef DEBUG
-    fprintf (stderr, "getnetbyname (%s)\n", name);
+       bb_error_msg("getnetbyname(%s)", name);
+#endif
+       np = getnetbyname(name);
+       if (np != NULL) {
+               s_in->sin_addr.s_addr = htonl(np->n_net);
+               return 1;
+       }
 #endif
-    if ((np = getnetbyname(name)) != (struct netent *) NULL) {
-       s_in->sin_addr.s_addr = htonl(np->n_net);
-       return 1;
-    }
-    if (hostfirst) {
-       /* Don't try again */
-       errno = h_errno;
-       return -1;
-    }
+       if (hostfirst) {
+               /* Don't try again */
+               return -1;
+       }
 #ifdef DEBUG
-    res_init();
-    _res.options |= RES_DEBUG;
+       res_init();
+       _res.options |= RES_DEBUG;
 #endif
 
 #ifdef DEBUG
-    fprintf (stderr, "gethostbyname (%s)\n", name);
+       bb_error_msg("gethostbyname(%s)", name);
 #endif
-    if ((hp = gethostbyname(name)) == (struct hostent *) NULL) {
-       errno = h_errno;
-       return -1;
-    }
-    memcpy((char *) &s_in->sin_addr, (char *) hp->h_addr_list[0],
-          sizeof(struct in_addr));
-
-    return 0;
+       hp = gethostbyname(name);
+       if (hp == NULL) {
+               return -1;
+       }
+       memcpy(&s_in->sin_addr, hp->h_addr_list[0], sizeof(struct in_addr));
+       return 0;
 }
 
-/* cache */
-struct addr {
-    struct sockaddr_in addr;
-    char *name;
-    int host;
-    struct addr *next;
-};
-
-static struct addr *INET_nn = NULL;     /* addr-to-name cache           */
 
 /* numeric: & 0x8000: default instead of *,
  *          & 0x4000: host instead of net,
  *          & 0x0fff: don't resolve
  */
-int INET_rresolve(char *name, size_t len, struct sockaddr_in *s_in,
-                        int numeric, unsigned int netmask)
+char *INET_rresolve(struct sockaddr_in *s_in, int numeric, uint32_t netmask)
 {
-    struct hostent *ent;
-    struct netent *np;
-    struct addr *pn;
-    unsigned long ad, host_ad;
-    int host = 0;
-
-    /* Grmpf. -FvK */
-    if (s_in->sin_family != AF_INET) {
+       /* addr-to-name cache */
+       struct addr {
+               struct addr *next;
+               struct sockaddr_in addr;
+               int host;
+               char name[1];
+       };
+       static struct addr *cache = NULL;
+
+       struct addr *pn;
+       char *name;
+       uint32_t ad, host_ad;
+       int host = 0;
+
+       if (s_in->sin_family != AF_INET) {
 #ifdef DEBUG
-       fprintf(stderr, "rresolve: unsupport address family %d !\n", s_in->sin_family);
+               bb_error_msg("rresolve: unsupported address family %d!",
+                                 s_in->sin_family);
 #endif
-       errno = EAFNOSUPPORT;
-       return (-1);
-    }
-    ad = (unsigned long) s_in->sin_addr.s_addr;
+               errno = EAFNOSUPPORT;
+               return NULL;
+       }
+       ad = s_in->sin_addr.s_addr;
 #ifdef DEBUG
-    fprintf (stderr, "rresolve: %08lx, mask %08x, num %08x \n", ad, netmask, numeric);
-#endif
-    if (ad == INADDR_ANY) {
-       if ((numeric & 0x0FFF) == 0) {
-           if (numeric & 0x8000)
-               safe_strncpy(name, bb_INET_default, len);
-           else
-               safe_strncpy(name, "*", len);
-           return (0);
-       }
-    }
-    if (numeric & 0x0FFF) {
-       safe_strncpy(name, inet_ntoa(s_in->sin_addr), len);
-       return (0);
-    }
-
-    if ((ad & (~netmask)) != 0 || (numeric & 0x4000))
-       host = 1;
-#if 0
-    INET_nn = NULL;
+       bb_error_msg("rresolve: %08x, mask %08x, num %08x", (unsigned)ad, netmask, numeric);
 #endif
-    pn = INET_nn;
-    while (pn != NULL) {
-       if (pn->addr.sin_addr.s_addr == ad && pn->host == host) {
-           safe_strncpy(name, pn->name, len);
+       if (ad == INADDR_ANY) {
+               if ((numeric & 0x0FFF) == 0) {
+                       if (numeric & 0x8000)
+                               return xstrdup(bb_str_default);
+                       return xstrdup("*");
+               }
+       }
+       if (numeric & 0x0FFF)
+               return xstrdup(inet_ntoa(s_in->sin_addr));
+
+       if ((ad & (~netmask)) != 0 || (numeric & 0x4000))
+               host = 1;
+       pn = cache;
+       while (pn) {
+               if (pn->addr.sin_addr.s_addr == ad && pn->host == host) {
 #ifdef DEBUG
-           fprintf (stderr, "rresolve: found %s %08lx in cache\n", (host? "host": "net"), ad);
+                       bb_error_msg("rresolve: found %s %08x in cache",
+                                         (host ? "host" : "net"), (unsigned)ad);
 #endif
-           return (0);
+                       return xstrdup(pn->name);
+               }
+               pn = pn->next;
        }
-       pn = pn->next;
-    }
 
-    host_ad = ntohl(ad);
-    np = NULL;
-    ent = NULL;
-    if (host) {
+       host_ad = ntohl(ad);
+       name = NULL;
+       if (host) {
+               struct hostent *ent;
 #ifdef DEBUG
-       fprintf (stderr, "gethostbyaddr (%08lx)\n", ad);
+               bb_error_msg("gethostbyaddr (%08x)", (unsigned)ad);
 #endif
-       ent = gethostbyaddr((char *) &ad, 4, AF_INET);
-       if (ent != NULL)
-           safe_strncpy(name, ent->h_name, len);
-    } else {
+               ent = gethostbyaddr((char *) &ad, 4, AF_INET);
+               if (ent)
+                       name = xstrdup(ent->h_name);
+       } else if (ENABLE_FEATURE_ETC_NETWORKS) {
+               struct netent *np;
 #ifdef DEBUG
-       fprintf (stderr, "getnetbyaddr (%08lx)\n", host_ad);
+               bb_error_msg("getnetbyaddr (%08x)", (unsigned)host_ad);
 #endif
-       np = getnetbyaddr(host_ad, AF_INET);
-       if (np != NULL)
-           safe_strncpy(name, np->n_name, len);
-    }
-    if ((ent == NULL) && (np == NULL))
-       safe_strncpy(name, inet_ntoa(s_in->sin_addr), len);
-    pn = (struct addr *) xmalloc(sizeof(struct addr));
-    pn->addr = *s_in;
-    pn->next = INET_nn;
-    pn->host = host;
-    pn->name = xstrdup(name);
-    INET_nn = pn;
-
-    return (0);
+               np = getnetbyaddr(host_ad, AF_INET);
+               if (np)
+                       name = xstrdup(np->n_name);
+       }
+       if (!name)
+               name = xstrdup(inet_ntoa(s_in->sin_addr));
+       pn = xmalloc(sizeof(*pn) + strlen(name)); /* no '+ 1', it's already accounted for */
+       pn->next = cache;
+       pn->addr = *s_in;
+       pn->host = host;
+       strcpy(pn->name, name);
+       cache = pn;
+       return name;
 }
 
-#if CONFIG_FEATURE_IPV6
+#if ENABLE_FEATURE_IPV6
 
-int INET6_resolve(char *name, struct sockaddr_in6 *sin6)
+int INET6_resolve(const char *name, struct sockaddr_in6 *sin6)
 {
-    struct addrinfo req, *ai;
-    int s;
-
-    memset (&req, '\0', sizeof req);
-    req.ai_family = AF_INET6;
-    if ((s = getaddrinfo(name, NULL, &req, &ai))) {
-       fprintf(stderr, "getaddrinfo: %s: %d\n", name, s);
-       return -1;
-    }
-    memcpy(sin6, ai->ai_addr, sizeof(struct sockaddr_in6));
-
-    freeaddrinfo(ai);
-
-    return (0);
+       struct addrinfo req, *ai;
+       int s;
+
+       memset(&req, '\0', sizeof req);
+       req.ai_family = AF_INET6;
+       s = getaddrinfo(name, NULL, &req, &ai);
+       if (s) {
+               bb_error_msg("getaddrinfo: %s: %d", name, s);
+               return -1;
+       }
+       memcpy(sin6, ai->ai_addr, sizeof(struct sockaddr_in6));
+       freeaddrinfo(ai);
+       return 0;
 }
 
 #ifndef IN6_IS_ADDR_UNSPECIFIED
-#define IN6_IS_ADDR_UNSPECIFIED(a) \
-        (((__u32 *) (a))[0] == 0 && ((__u32 *) (a))[1] == 0 && \
-         ((__u32 *) (a))[2] == 0 && ((__u32 *) (a))[3] == 0)
+# define IN6_IS_ADDR_UNSPECIFIED(a) \
+       (((uint32_t *) (a))[0] == 0 && ((uint32_t *) (a))[1] == 0 && \
+        ((uint32_t *) (a))[2] == 0 && ((uint32_t *) (a))[3] == 0)
 #endif
 
 
-int INET6_rresolve(char *name, size_t len, struct sockaddr_in6 *sin6, int numeric)
+char *INET6_rresolve(struct sockaddr_in6 *sin6, int numeric)
 {
-    int s;
+       char name[128];
+       int s;
 
-    /* Grmpf. -FvK */
-    if (sin6->sin6_family != AF_INET6) {
+       if (sin6->sin6_family != AF_INET6) {
 #ifdef DEBUG
-       fprintf(stderr, _("rresolve: unsupport address family %d !\n"),
-               sin6->sin6_family);
+               bb_error_msg("rresolve: unsupport address family %d!",
+                                 sin6->sin6_family);
 #endif
-       errno = EAFNOSUPPORT;
-       return (-1);
-    }
-    if (numeric & 0x7FFF) {
-       inet_ntop(AF_INET6, &sin6->sin6_addr, name, len);
-       return (0);
-    }
-    if (IN6_IS_ADDR_UNSPECIFIED(&sin6->sin6_addr)) {
-        if (numeric & 0x8000)
-           strcpy(name, "default");
-       else
-           strcpy(name, "*");
-       return (0);
-    }
-
-    if ((s = getnameinfo((struct sockaddr *) sin6, sizeof(struct sockaddr_in6),
-                        name, len , NULL, 0, 0))) {
-       fputs("getnameinfo failed\n", stderr);
-       return -1;
-    }
-    return (0);
+               errno = EAFNOSUPPORT;
+               return NULL;
+       }
+       if (numeric & 0x7FFF) {
+               inet_ntop(AF_INET6, &sin6->sin6_addr, name, sizeof(name));
+               return xstrdup(name);
+       }
+       if (IN6_IS_ADDR_UNSPECIFIED(&sin6->sin6_addr)) {
+               if (numeric & 0x8000)
+                       return xstrdup(bb_str_default);
+               return xstrdup("*");
+       }
+
+       s = getnameinfo((struct sockaddr *) sin6, sizeof(struct sockaddr_in6),
+                               name, sizeof(name), NULL, 0, 0);
+       if (s) {
+               bb_error_msg("getnameinfo failed");
+               return NULL;
+       }
+       return xstrdup(name);
 }
 
-#endif /* CONFIG_FEATURE_IPV6 */
+#endif         /* CONFIG_FEATURE_IPV6 */