2 * Copyright (c) 1996 by Internet Software Consortium.
4 * Permission to use, copy, modify, and distribute this software for any
5 * purpose with or without fee is hereby granted, provided that the above
6 * copyright notice and this permission notice appear in all copies.
8 * THE SOFTWARE IS PROVIDED "AS IS" AND INTERNET SOFTWARE CONSORTIUM DISCLAIMS
9 * ALL WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES
10 * OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL INTERNET SOFTWARE
11 * CONSORTIUM BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL
12 * DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR
13 * PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS
14 * ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
18 #if defined(LIBC_SCCS) && !defined(lint)
19 static const char rcsid[] = "$Id: inet_net_pton.c,v 1.3 1998/10/12 01:30:26 momjian Exp $";
23 #include <sys/types.h>
24 #include <sys/socket.h>
25 #include <netinet/in.h>
26 #include <arpa/inet.h>
36 #include <utils/builtins.h>
39 #define SPRINTF(x) strlen(sprintf/**/x)
41 #define SPRINTF(x) ((size_t)sprintf x)
44 static int inet_net_pton_ipv4(const char *src, u_char *dst, size_t size);
48 * inet_net_pton(af, src, dst, size)
49 * convert network number from presentation to network format.
50 * accepts hex octets, hex strings, decimal octets, and /CIDR.
51 * "size" is in bytes and describes "dst".
53 * number of bits, either imputed classfully or specified with /CIDR,
54 * or -1 if some failure occurred (check errno). ENOENT means it was
55 * not a valid network specification.
57 * Paul Vixie (ISC), June 1996
60 inet_net_pton(int af, const char *src, void *dst, size_t size)
65 return (inet_net_pton_ipv4(src, dst, size));
74 * inet_net_pton_ipv4(src, dst, size)
75 * convert IPv4 network number from presentation to network format.
76 * accepts hex octets, hex strings, decimal octets, and /CIDR.
77 * "size" is in bytes and describes "dst".
79 * number of bits, either imputed classfully or specified with /CIDR,
80 * or -1 if some failure occurred (check errno). ENOENT means it was
81 * not an IPv4 network specification.
83 * network byte order assumed. this means 192.5.5.240/28 has
84 * 0x11110000 in its fourth octet.
86 * Paul Vixie (ISC), June 1996
89 inet_net_pton_ipv4(const char *src, u_char *dst, size_t size)
92 xdigits[] = "0123456789abcdef",
93 digits[] = "0123456789";
99 const u_char *odst = dst;
102 if (ch == '0' && (src[0] == 'x' || src[0] == 'X')
103 && isascii(src[1]) && isxdigit(src[1]))
105 /* Hexadecimal: Eat nybble string. */
109 src++; /* skip x or X. */
110 while ((ch = *src++) != '\0' &&
111 isascii(ch) && isxdigit(ch))
115 n = strchr(xdigits, ch) - xdigits;
116 assert(n >= 0 && n <= 15);
121 *++dst = 0, dirty = 0;
128 else if (isascii(ch) && isdigit(ch))
130 /* Decimal: eat dotted digit string. */
136 n = strchr(digits, ch) - digits;
137 assert(n >= 0 && n <= 9);
142 } while ((ch = *src++) != '\0' &&
143 isascii(ch) && isdigit(ch));
146 *dst++ = (u_char) tmp;
147 if (ch == '\0' || ch == '/')
152 if (!isascii(ch) || !isdigit(ch))
160 if (ch == '/' && isascii(src[0]) && isdigit(src[0]) && dst > odst)
162 /* CIDR width specifier. Nothing can follow it. */
163 ch = *src++; /* Skip over the /. */
167 n = strchr(digits, ch) - digits;
168 assert(n >= 0 && n <= 9);
171 } while ((ch = *src++) != '\0' &&
172 isascii(ch) && isdigit(ch));
179 /* Firey death and destruction unless we prefetched EOS. */
183 /* If nothing was written to the destination, we found no address. */
186 /* If no CIDR spec was given, infer width from net class. */
189 if (*odst >= 240) /* Class E */
191 else if (*odst >= 224) /* Class D */
193 else if (*odst >= 192) /* Class C */
195 else if (*odst >= 128) /* Class B */
200 /* If imputed mask is narrower than specified octets, widen. */
201 if (bits >= 8 && bits < ((dst - odst) * 8))
202 bits = (dst - odst) * 8;
204 /* Extend network to cover the actual mask. */
205 while (bits > ((dst - odst) * 8))