]> granicus.if.org Git - postgresql/blobdiff - src/backend/utils/adt/inet_net_pton.c
Add support for EUI-64 MAC addresses as macaddr8
[postgresql] / src / backend / utils / adt / inet_net_pton.c
index 4c7ca9d618a2ea371e2035eaf335fa059440c11a..be788d37cd070eadb3ceac8a1fc7cd4c532077e2 100644 (file)
@@ -1,22 +1,24 @@
 /*
- * Copyright (c) 1996 by Internet Software Consortium.
+ * Copyright (c) 2004 by Internet Systems Consortium, Inc. ("ISC")
+ * 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
  * copyright notice and this permission notice appear in all copies.
  *
- * THE SOFTWARE IS PROVIDED "AS IS" AND INTERNET SOFTWARE CONSORTIUM DISCLAIMS
- * ALL WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES
- * OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL INTERNET SOFTWARE
- * CONSORTIUM BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL
- * DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR
- * PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS
- * ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
- * SOFTWARE.
+ * THE SOFTWARE IS PROVIDED "AS IS" AND ISC DISCLAIMS ALL WARRANTIES
+ * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
+ * MERCHANTABILITY AND FITNESS.  IN NO EVENT SHALL ISC BE LIABLE FOR
+ * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
+ * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
+ * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT
+ * OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
+ *
+ *       src/backend/utils/adt/inet_net_pton.c
  */
 
 #if defined(LIBC_SCCS) && !defined(lint)
-static const char rcsid[] = "$Id: inet_net_pton.c,v 1.15 2003/06/24 22:21:22 momjian Exp $";
+static const char rcsid[] = "Id: inet_net_pton.c,v 1.4.2.3 2004/03/17 00:40:11 marka Exp $";
 #endif
 
 #include "postgres.h"
@@ -24,22 +26,22 @@ static const char rcsid[] = "$Id: inet_net_pton.c,v 1.15 2003/06/24 22:21:22 mom
 #include <sys/socket.h>
 #include <netinet/in.h>
 #include <arpa/inet.h>
-
 #include <assert.h>
 #include <ctype.h>
-#include <errno.h>
 
+#include "utils/builtins.h" /* pgrminclude ignore */   /* needed on some
+                                                                                                                * platforms */
 #include "utils/inet.h"
 
-#include "utils/builtins.h"
 
 static int     inet_net_pton_ipv4(const char *src, u_char *dst);
 static int     inet_cidr_pton_ipv4(const char *src, u_char *dst, size_t size);
-static int      inet_net_pton_ipv6(const char *src, u_char *dst);
-static int      inet_cidr_pton_ipv6(const char *src, u_char *dst, size_t size);
+static int     inet_net_pton_ipv6(const char *src, u_char *dst);
+static int     inet_cidr_pton_ipv6(const char *src, u_char *dst, size_t size);
+
 
 /*
- * static int
+ * int
  * inet_net_pton(af, src, dst, size)
  *     convert network number from presentation to network format.
  *     accepts hex octets, hex strings, decimal octets, and /CIDR.
@@ -87,19 +89,18 @@ inet_net_pton(int af, const char *src, void *dst, size_t size)
  *     not an IPv4 network specification.
  * note:
  *     network byte order assumed.  this means 192.5.5.240/28 has
- *     0x11110000 in its fourth octet.
+ *     0b11110000 in its fourth octet.
  * author:
  *     Paul Vixie (ISC), June 1996
  */
 static int
 inet_cidr_pton_ipv4(const char *src, u_char *dst, size_t size)
 {
-       static const char
-                               xdigits[] = "0123456789abcdef",
-                               digits[] = "0123456789";
+       static const char xdigits[] = "0123456789abcdef";
+       static const char digits[] = "0123456789";
        int                     n,
                                ch,
-                               tmp,
+                               tmp = 0,
                                dirty,
                                bits;
        const u_char *odst = dst;
@@ -109,10 +110,9 @@ inet_cidr_pton_ipv4(const char *src, u_char *dst, size_t size)
                && isxdigit((unsigned char) src[1]))
        {
                /* Hexadecimal: Eat nybble string. */
-               if (size <= 0)
+               if (size <= 0U)
                        goto emsgsize;
                dirty = 0;
-               tmp = 0;
                src++;                                  /* skip x or X. */
                while ((ch = *src++) != '\0' && isxdigit((unsigned char) ch))
                {
@@ -126,7 +126,7 @@ inet_cidr_pton_ipv4(const char *src, u_char *dst, size_t size)
                                tmp = (tmp << 4) | n;
                        if (++dirty == 2)
                        {
-                               if (size-- <= 0)
+                               if (size-- <= 0U)
                                        goto emsgsize;
                                *dst++ = (u_char) tmp;
                                dirty = 0;
@@ -134,7 +134,7 @@ inet_cidr_pton_ipv4(const char *src, u_char *dst, size_t size)
                }
                if (dirty)
                {                                               /* Odd trailing nybble? */
-                       if (size-- <= 0)
+                       if (size-- <= 0U)
                                goto emsgsize;
                        *dst++ = (u_char) (tmp << 4);
                }
@@ -155,7 +155,7 @@ inet_cidr_pton_ipv4(const char *src, u_char *dst, size_t size)
                                        goto enoent;
                        } while ((ch = *src++) != '\0' &&
                                         isdigit((unsigned char) ch));
-                       if (size-- <= 0)
+                       if (size-- <= 0U)
                                goto emsgsize;
                        *dst++ = (u_char) tmp;
                        if (ch == '\0' || ch == '/')
@@ -202,22 +202,29 @@ inet_cidr_pton_ipv4(const char *src, u_char *dst, size_t size)
                if (*odst >= 240)               /* Class E */
                        bits = 32;
                else if (*odst >= 224)  /* Class D */
-                       bits = 4;
+                       bits = 8;
                else if (*odst >= 192)  /* Class C */
                        bits = 24;
                else if (*odst >= 128)  /* Class B */
                        bits = 16;
                else
-/* Class A */
+                       /* Class A */
                        bits = 8;
                /* If imputed mask is narrower than specified octets, widen. */
-               if (bits >= 8 && bits < ((dst - odst) * 8))
+               if (bits < ((dst - odst) * 8))
                        bits = (dst - odst) * 8;
+
+               /*
+                * If there are no additional bits specified for a class D address
+                * adjust bits to 4.
+                */
+               if (bits == 8 && *odst == 224)
+                       bits = 4;
        }
        /* Extend network to cover the actual mask. */
        while (bits > ((dst - odst) * 8))
        {
-               if (size-- <= 0)
+               if (size-- <= 0U)
                        goto emsgsize;
                *dst++ = '\0';
        }
@@ -339,24 +346,27 @@ emsgsize:
 }
 
 static int
-getbits(const char *src, int *bitsp) {
+getbits(const char *src, int *bitsp)
+{
        static const char digits[] = "0123456789";
-       int n;
-       int val;
-       char ch;
+       int                     n;
+       int                     val;
+       char            ch;
 
        val = 0;
        n = 0;
-       while ((ch = *src++) != '\0') {
+       while ((ch = *src++) != '\0')
+       {
                const char *pch;
 
                pch = strchr(digits, ch);
-               if (pch != NULL) {
+               if (pch != NULL)
+               {
                        if (n++ != 0 && val == 0)       /* no leading zeros */
                                return (0);
                        val *= 10;
                        val += (pch - digits);
-                       if (val > 128)                  /* range */
+                       if (val > 128)          /* range */
                                return (0);
                        continue;
                }
@@ -369,30 +379,34 @@ getbits(const char *src, int *bitsp) {
 }
 
 static int
-getv4(const char *src, u_char *dst, int *bitsp) {
+getv4(const char *src, u_char *dst, int *bitsp)
+{
        static const char digits[] = "0123456789";
-       u_char *odst = dst;
-       int n;
-       u_int val;
-       char ch;
+       u_char     *odst = dst;
+       int                     n;
+       u_int           val;
+       char            ch;
 
        val = 0;
        n = 0;
-       while ((ch = *src++) != '\0') {
+       while ((ch = *src++) != '\0')
+       {
                const char *pch;
 
                pch = strchr(digits, ch);
-               if (pch != NULL) {
+               if (pch != NULL)
+               {
                        if (n++ != 0 && val == 0)       /* no leading zeros */
                                return (0);
                        val *= 10;
                        val += (pch - digits);
-                       if (val > 255)                  /* range */
+                       if (val > 255)          /* range */
                                return (0);
                        continue;
                }
-               if (ch == '.' || ch == '/') {
-                       if (dst - odst > 3)             /* too many octets? */
+               if (ch == '.' || ch == '/')
+               {
+                       if (dst - odst > 3) /* too many octets? */
                                return (0);
                        *dst++ = val;
                        if (ch == '/')
@@ -405,7 +419,7 @@ getv4(const char *src, u_char *dst, int *bitsp) {
        }
        if (n == 0)
                return (0);
-       if (dst - odst > 3)             /* too many octets? */
+       if (dst - odst > 3)                     /* too many octets? */
                return (0);
        *dst++ = val;
        return (1);
@@ -422,15 +436,21 @@ inet_net_pton_ipv6(const char *src, u_char *dst)
 #define NS_INADDRSZ 4
 
 static int
-inet_cidr_pton_ipv6(const char *src, u_char *dst, size_t size) {
+inet_cidr_pton_ipv6(const char *src, u_char *dst, size_t size)
+{
        static const char xdigits_l[] = "0123456789abcdef",
-                         xdigits_u[] = "0123456789ABCDEF";
-       u_char tmp[NS_IN6ADDRSZ], *tp, *endp, *colonp;
-       const char *xdigits, *curtok;
-       int ch, saw_xdigit;
-       u_int val;
-       int digits;
-       int bits;
+                               xdigits_u[] = "0123456789ABCDEF";
+       u_char          tmp[NS_IN6ADDRSZ],
+                          *tp,
+                          *endp,
+                          *colonp;
+       const char *xdigits,
+                          *curtok;
+       int                     ch,
+                               saw_xdigit;
+       u_int           val;
+       int                     digits;
+       int                     bits;
 
        if (size < NS_IN6ADDRSZ)
                goto emsgsize;
@@ -447,12 +467,14 @@ inet_cidr_pton_ipv6(const char *src, u_char *dst, size_t size) {
        val = 0;
        digits = 0;
        bits = -1;
-       while ((ch = *src++) != '\0') {
+       while ((ch = *src++) != '\0')
+       {
                const char *pch;
 
                if ((pch = strchr((xdigits = xdigits_l), ch)) == NULL)
                        pch = strchr((xdigits = xdigits_u), ch);
-               if (pch != NULL) {
+               if (pch != NULL)
+               {
                        val <<= 4;
                        val |= (pch - xdigits);
                        if (++digits > 4)
@@ -460,17 +482,20 @@ inet_cidr_pton_ipv6(const char *src, u_char *dst, size_t size) {
                        saw_xdigit = 1;
                        continue;
                }
-               if (ch == ':') {
+               if (ch == ':')
+               {
                        curtok = src;
-                       if (!saw_xdigit) {
+                       if (!saw_xdigit)
+                       {
                                if (colonp)
                                        goto enoent;
                                colonp = tp;
                                continue;
-                       } else if (*src == '\0')
+                       }
+                       else if (*src == '\0')
                                goto enoent;
                        if (tp + NS_INT16SZ > endp)
-                               return (0);
+                               goto enoent;
                        *tp++ = (u_char) (val >> 8) & 0xff;
                        *tp++ = (u_char) val & 0xff;
                        saw_xdigit = 0;
@@ -479,16 +504,18 @@ inet_cidr_pton_ipv6(const char *src, u_char *dst, size_t size) {
                        continue;
                }
                if (ch == '.' && ((tp + NS_INADDRSZ) <= endp) &&
-                    getv4(curtok, tp, &bits) > 0) {
+                       getv4(curtok, tp, &bits) > 0)
+               {
                        tp += NS_INADDRSZ;
                        saw_xdigit = 0;
-                       break;  /* '\0' was seen by inet_pton4(). */
+                       break;                          /* '\0' was seen by inet_pton4(). */
                }
                if (ch == '/' && getbits(src, &bits) > 0)
                        break;
                goto enoent;
        }
-       if (saw_xdigit) {
+       if (saw_xdigit)
+       {
                if (tp + NS_INT16SZ > endp)
                        goto enoent;
                *tp++ = (u_char) (val >> 8) & 0xff;
@@ -497,20 +524,22 @@ inet_cidr_pton_ipv6(const char *src, u_char *dst, size_t size) {
        if (bits == -1)
                bits = 128;
 
-       endp =  tmp + 16;
+       endp = tmp + 16;
 
-       if (colonp != NULL) {
+       if (colonp != NULL)
+       {
                /*
-                * Since some memmove()'s erroneously fail to handle
-                * overlapping regions, we'll do the shift by hand.
+                * Since some memmove()'s erroneously fail to handle overlapping
+                * regions, we'll do the shift by hand.
                 */
-               const int n = tp - colonp;
-               int i;
+               const int       n = tp - colonp;
+               int                     i;
 
                if (tp == endp)
                        goto enoent;
-               for (i = 1; i <= n; i++) {
-                       endp[- i] = colonp[n - i];
+               for (i = 1; i <= n; i++)
+               {
+                       endp[-i] = colonp[n - i];
                        colonp[n - i] = 0;
                }
                tp = endp;
@@ -525,11 +554,11 @@ inet_cidr_pton_ipv6(const char *src, u_char *dst, size_t size) {
 
        return (bits);
 
- enoent:
+enoent:
        errno = ENOENT;
        return (-1);
 
- emsgsize:
+emsgsize:
        errno = EMSGSIZE;
        return (-1);
 }