(arg_service_list): Reduce size of svcs and mark const.
[kopensolaris-gnu/glibc.git] / resolv / inet_pton.c
index 385dc25..c507013 100644 (file)
@@ -1,4 +1,5 @@
-/* Copyright (c) 1996 by Internet Software Consortium.
+/*
+ * Copyright (c) 1996,1999 by Internet Software Consortium.
  *
  * Permission to use, copy, modify, and distribute this software for any
  * purpose with or without fee is hereby granted, provided that the above
@@ -15,7 +16,7 @@
  */
 
 #if defined(LIBC_SCCS) && !defined(lint)
-static char rcsid[] = "$Id$";
+static const char rcsid[] = "$BINDId: inet_pton.c,v 1.7 1999/10/13 16:39:28 vixie Exp $";
 #endif /* LIBC_SCCS and not lint */
 
 #include <sys/param.h>
@@ -24,20 +25,20 @@ static char rcsid[] = "$Id$";
 #include <netinet/in.h>
 #include <arpa/inet.h>
 #include <arpa/nameser.h>
+#include <ctype.h>
 #include <string.h>
 #include <errno.h>
-#include "../conf/portability.h"
 
 /*
  * WARNING: Don't even consider trying to compile this on a system where
  * sizeof(int) < 4.  sizeof(int) > 4 is fine; all the world's not a VAX.
  */
 
-static int     inet_pton4 __P((const char *src, u_char *dst));
-static int     inet_pton6 __P((const char *src, u_char *dst));
+static int inet_pton4 (const char *src, u_char *dst) internal_function;
+static int inet_pton6 (const char *src, u_char *dst) internal_function;
 
 /* int
- * inet_pton(af, src, dst, size)
+ * inet_pton(af, src, dst)
  *     convert from presentation format (which usually means ASCII printable)
  *     to network format (which is usually some kind of binary format).
  * return:
@@ -48,35 +49,28 @@ static int  inet_pton6 __P((const char *src, u_char *dst));
  *     Paul Vixie, 1996.
  */
 int
-inet_pton(af, src, dst, size)
+inet_pton(af, src, dst)
        int af;
        const char *src;
        void *dst;
-       size_t size;
 {
        switch (af) {
        case AF_INET:
-               if (size < INADDRSZ) {
-                       errno = ENOSPC;
-                       return (-1);
-               }
                return (inet_pton4(src, dst));
        case AF_INET6:
-               if (size < IN6ADDRSZ) {
-                       errno = ENOSPC;
-                       return (-1);
-               }
                return (inet_pton6(src, dst));
        default:
-               errno = EINVAL;
+               __set_errno (EAFNOSUPPORT);
                return (-1);
        }
        /* NOTREACHED */
 }
+libc_hidden_def (inet_pton)
 
 /* int
  * inet_pton4(src, dst)
- *     like inet_pton() but without all the hexadecimal and shorthand.
+ *     like inet_aton() but without all the hexadecimal, octal (with the
+ *     exception of 0) and shorthand.
  * return:
  *     1 if `src' is a valid dotted quad, else 0.
  * notice:
@@ -85,23 +79,24 @@ inet_pton(af, src, dst, size)
  *     Paul Vixie, 1996.
  */
 static int
+internal_function
 inet_pton4(src, dst)
        const char *src;
        u_char *dst;
 {
-       static const char digits[] = "0123456789";
        int saw_digit, octets, ch;
-       u_char tmp[INADDRSZ], *tp;
+       u_char tmp[NS_INADDRSZ], *tp;
 
        saw_digit = 0;
        octets = 0;
        *(tp = tmp) = 0;
        while ((ch = *src++) != '\0') {
-               const char *pch;
 
-               if ((pch = strchr(digits, ch)) != NULL) {
-                       u_int new = *tp * 10 + (pch - digits);
+               if (ch >= '0' && ch <= '9') {
+                       u_int new = *tp * 10 + (ch - '0');
 
+                       if (saw_digit && *tp == 0)
+                               return (0);
                        if (new > 255)
                                return (0);
                        *tp = new;
@@ -120,7 +115,7 @@ inet_pton4(src, dst)
        }
        if (octets < 4)
                return (0);
-       bcopy(tmp, dst, INADDRSZ);
+       memcpy(dst, tmp, NS_INADDRSZ);
        return (1);
 }
 
@@ -138,19 +133,19 @@ inet_pton4(src, dst)
  *     Paul Vixie, 1996.
  */
 static int
+internal_function
 inet_pton6(src, dst)
        const char *src;
        u_char *dst;
 {
-       static const char xdigits_l[] = "0123456789abcdef",
-                         xdigits_u[] = "0123456789ABCDEF";
-       u_char tmp[IN6ADDRSZ], *tp, *endp, *colonp;
-       const char *xdigits, *curtok;
+       static const char xdigits[] = "0123456789abcdef";
+       u_char tmp[NS_IN6ADDRSZ], *tp, *endp, *colonp;
+       const char *curtok;
        int ch, saw_xdigit;
        u_int val;
 
-       bzero((tp = tmp), IN6ADDRSZ);
-       endp = tp + IN6ADDRSZ;
+       tp = memset(tmp, '\0', NS_IN6ADDRSZ);
+       endp = tp + NS_IN6ADDRSZ;
        colonp = NULL;
        /* Leading :: requires some special handling. */
        if (*src == ':')
@@ -159,11 +154,10 @@ inet_pton6(src, dst)
        curtok = src;
        saw_xdigit = 0;
        val = 0;
-       while ((ch = *src++) != '\0') {
+       while ((ch = tolower (*src++)) != '\0') {
                const char *pch;
 
-               if ((pch = strchr((xdigits = xdigits_l), ch)) == NULL)
-                       pch = strchr((xdigits = xdigits_u), ch);
+               pch = strchr(xdigits, ch);
                if (pch != NULL) {
                        val <<= 4;
                        val |= (pch - xdigits);
@@ -179,8 +173,10 @@ inet_pton6(src, dst)
                                        return (0);
                                colonp = tp;
                                continue;
+                       } else if (*src == '\0') {
+                               return (0);
                        }
-                       if (tp + INT16SZ > endp)
+                       if (tp + NS_INT16SZ > endp)
                                return (0);
                        *tp++ = (u_char) (val >> 8) & 0xff;
                        *tp++ = (u_char) val & 0xff;
@@ -188,16 +184,16 @@ inet_pton6(src, dst)
                        val = 0;
                        continue;
                }
-               if (ch == '.' && ((tp + INADDRSZ) <= endp) &&
+               if (ch == '.' && ((tp + NS_INADDRSZ) <= endp) &&
                    inet_pton4(curtok, tp) > 0) {
-                       tp += INADDRSZ;
+                       tp += NS_INADDRSZ;
                        saw_xdigit = 0;
                        break;  /* '\0' was seen by inet_pton4(). */
                }
                return (0);
        }
        if (saw_xdigit) {
-               if (tp + INT16SZ > endp)
+               if (tp + NS_INT16SZ > endp)
                        return (0);
                *tp++ = (u_char) (val >> 8) & 0xff;
                *tp++ = (u_char) val & 0xff;
@@ -207,17 +203,19 @@ inet_pton6(src, dst)
                 * Since some memmove()'s erroneously fail to handle
                 * overlapping regions, we'll do the shift by hand.
                 */
-               const howmany = tp - colonp;
+               const int n = tp - colonp;
                int i;
 
-               for (i = 1; i <= howmany; i++) {
-                       endp[- i] = colonp[howmany - i];
-                       colonp[howmany - i] = 0;
+               if (tp == endp)
+                       return (0);
+               for (i = 1; i <= n; i++) {
+                       endp[- i] = colonp[n - i];
+                       colonp[n - i] = 0;
                }
                tp = endp;
        }
        if (tp != endp)
                return (0);
-       bcopy(tmp, dst, IN6ADDRSZ);
+       memcpy(dst, tmp, NS_IN6ADDRSZ);
        return (1);
 }