/* | |
* Copyright (c) 1996 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. | |
*/ | |
/* | |
* Portions copyright (c) 1999, 2000 | |
* Intel Corporation. | |
* All rights reserved. | |
* | |
* Redistribution and use in source and binary forms, with or without | |
* modification, are permitted provided that the following conditions | |
* are met: | |
* | |
* 1. Redistributions of source code must retain the above copyright | |
* notice, this list of conditions and the following disclaimer. | |
* | |
* 2. Redistributions in binary form must reproduce the above copyright | |
* notice, this list of conditions and the following disclaimer in the | |
* documentation and/or other materials provided with the distribution. | |
* | |
* 3. All advertising materials mentioning features or use of this software | |
* must display the following acknowledgement: | |
* | |
* This product includes software developed by Intel Corporation and | |
* its contributors. | |
* | |
* 4. Neither the name of Intel Corporation or its contributors may be | |
* used to endorse or promote products derived from this software | |
* without specific prior written permission. | |
* | |
* THIS SOFTWARE IS PROVIDED BY INTEL CORPORATION AND CONTRIBUTORS ``AS IS'' | |
* AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE | |
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE | |
* ARE DISCLAIMED. IN NO EVENT SHALL INTEL CORPORATION OR CONTRIBUTORS BE | |
* LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR | |
* CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF | |
* SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS | |
* INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN | |
* CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) | |
* ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF | |
* THE POSSIBILITY OF SUCH DAMAGE. | |
* | |
*/ | |
#if defined(LIBC_SCCS) && !defined(lint) | |
static const char orig_rcsid[] = "From Id: inet_net_pton.c,v 1.8 1996/11/21 10:28:12 vixie Exp $"; | |
static const char rcsid[] = "$Id: inet_net_pton.c,v 1.1.1.1 2003/11/19 01:51:29 kyu3 Exp $"; | |
#endif | |
#include <sys/types.h> | |
#include <sys/socket.h> | |
#include <netinet/in.h> | |
#include <arpa/inet.h> | |
#include <assert.h> | |
#include <ctype.h> | |
#include <errno.h> | |
#include <stdio.h> | |
#include <string.h> | |
#include <stdlib.h> | |
#ifdef SPRINTF_CHAR | |
# define SPRINTF(x) strlen(sprintf/**/x) | |
#else | |
# define SPRINTF(x) ((size_t)sprintf x) | |
#endif | |
static int inet_net_pton_ipv4 (const char *src, u_char *dst, | |
size_t size); | |
/* | |
* static 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. | |
* "size" is in bytes and describes "dst". | |
* return: | |
* number of bits, either imputed classfully or specified with /CIDR, | |
* or -1 if some failure occurred (check errno). ENOENT means it was | |
* not a valid network specification. | |
* author: | |
* Paul Vixie (ISC), June 1996 | |
*/ | |
int | |
inet_net_pton( | |
int af, | |
const char *src, | |
void *dst, | |
size_t size | |
) | |
{ | |
switch (af) { | |
case AF_INET: | |
return (inet_net_pton_ipv4(src, dst, size)); | |
default: | |
errno = EAFNOSUPPORT; | |
return (-1); | |
} | |
} | |
/* | |
* static int | |
* inet_net_pton_ipv4(src, dst, size) | |
* convert IPv4 network number from presentation to network format. | |
* accepts hex octets, hex strings, decimal octets, and /CIDR. | |
* "size" is in bytes and describes "dst". | |
* return: | |
* number of bits, either imputed classfully or specified with /CIDR, | |
* or -1 if some failure occurred (check errno). ENOENT means it was | |
* not an IPv4 network specification. | |
* note: | |
* network byte order assumed. this means 192.5.5.240/28 has | |
* 0x11110000 in its fourth octet. | |
* author: | |
* Paul Vixie (ISC), June 1996 | |
*/ | |
static int | |
inet_net_pton_ipv4( | |
const char *src, | |
u_char *dst, | |
size_t size | |
) | |
{ | |
static const char xdigits[] = "0123456789abcdef"; | |
static const char digits[] = "0123456789"; | |
int n; | |
int ch; | |
int tmp; | |
int dirty; | |
int bits; | |
const u_char *odst = dst; | |
ch = *src++; | |
if (ch == '0' && (src[0] == 'x' || src[0] == 'X') | |
&& isascii(src[1]) && isxdigit(src[1])) { | |
/* Hexadecimal: Eat nybble string. */ | |
if (size <= 0) | |
goto emsgsize; | |
*dst = 0, dirty = 0; | |
src++; /* skip x or X. */ | |
while ((ch = *src++) != '\0' && | |
isascii(ch) && isxdigit(ch)) { | |
if (isupper(ch)) | |
ch = tolower(ch); | |
n = (int)(strchr(xdigits, ch) - xdigits); | |
assert(n >= 0 && n <= 15); | |
*dst |= n; | |
if (!dirty++) | |
*dst <<= 4; | |
else if (size-- > 0) | |
*++dst = 0, dirty = 0; | |
else | |
goto emsgsize; | |
} | |
if (dirty) | |
size--; | |
} else if (isascii(ch) && isdigit(ch)) { | |
/* Decimal: eat dotted digit string. */ | |
for (;;) { | |
tmp = 0; | |
do { | |
n = (int)(strchr(digits, ch) - digits); | |
assert(n >= 0 && n <= 9); | |
tmp *= 10; | |
tmp += n; | |
if (tmp > 255) | |
goto enoent; | |
} while ((ch = *src++) != '\0' && | |
isascii(ch) && isdigit(ch)); | |
if (size-- <= 0) | |
goto emsgsize; | |
*dst++ = (u_char) tmp; | |
if (ch == '\0' || ch == '/') | |
break; | |
if (ch != '.') | |
goto enoent; | |
ch = *src++; | |
if (!isascii(ch) || !isdigit(ch)) | |
goto enoent; | |
} | |
} else | |
goto enoent; | |
bits = -1; | |
if (ch == '/' && isascii(src[0]) && isdigit(src[0]) && dst > odst) { | |
/* CIDR width specifier. Nothing can follow it. */ | |
ch = *src++; /* Skip over the /. */ | |
bits = 0; | |
do { | |
n = (int)(strchr(digits, ch) - digits); | |
assert(n >= 0 && n <= 9); | |
bits *= 10; | |
bits += n; | |
} while ((ch = *src++) != '\0' && isascii(ch) && isdigit(ch)); | |
if (ch != '\0') | |
goto enoent; | |
if (bits > 32) | |
goto emsgsize; | |
} | |
/* Firey death and destruction unless we prefetched EOS. */ | |
if (ch != '\0') | |
goto enoent; | |
/* If nothing was written to the destination, we found no address. */ | |
if (dst == odst) | |
goto enoent; | |
/* If no CIDR spec was given, infer width from net class. */ | |
if (bits == -1) { | |
if (*odst >= 240) /* Class E */ | |
bits = 32; | |
else if (*odst >= 224) /* Class D */ | |
bits = 4; | |
else if (*odst >= 192) /* Class C */ | |
bits = 24; | |
else if (*odst >= 128) /* Class B */ | |
bits = 16; | |
else /* Class A */ | |
bits = 8; | |
/* If imputed mask is narrower than specified octets, widen. */ | |
if (bits >= 8 && bits < ((dst - odst) * 8)) | |
bits = (int)(dst - odst) * 8; | |
} | |
/* Extend network to cover the actual mask. */ | |
while (bits > ((dst - odst) * 8)) { | |
if (size-- <= 0) | |
goto emsgsize; | |
*dst++ = '\0'; | |
} | |
return (bits); | |
enoent: | |
errno = ENOENT; | |
return (-1); | |
emsgsize: | |
errno = EMSGSIZE; | |
return (-1); | |
} |