+++ /dev/null
-/* Copyright (c) 1996 by Internet Software Consortium.\r
- *\r
- * Permission to use, copy, modify, and distribute this software for any\r
- * purpose with or without fee is hereby granted, provided that the above\r
- * copyright notice and this permission notice appear in all copies.\r
- *\r
- * THE SOFTWARE IS PROVIDED "AS IS" AND INTERNET SOFTWARE CONSORTIUM DISCLAIMS\r
- * ALL WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES\r
- * OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL INTERNET SOFTWARE\r
- * CONSORTIUM BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL\r
- * DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR\r
- * PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS\r
- * ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS\r
- * SOFTWARE.\r
- */\r
-\r
-/*\r
- * Portions copyright (c) 1999, 2000\r
- * Intel Corporation.\r
- * All rights reserved.\r
- *\r
- * Redistribution and use in source and binary forms, with or without\r
- * modification, are permitted provided that the following conditions\r
- * are met:\r
- *\r
- * 1. Redistributions of source code must retain the above copyright\r
- * notice, this list of conditions and the following disclaimer.\r
- *\r
- * 2. Redistributions in binary form must reproduce the above copyright\r
- * notice, this list of conditions and the following disclaimer in the\r
- * documentation and/or other materials provided with the distribution.\r
- *\r
- * 3. All advertising materials mentioning features or use of this software\r
- * must display the following acknowledgement:\r
- *\r
- * This product includes software developed by Intel Corporation and\r
- * its contributors.\r
- *\r
- * 4. Neither the name of Intel Corporation or its contributors may be\r
- * used to endorse or promote products derived from this software\r
- * without specific prior written permission.\r
- *\r
- * THIS SOFTWARE IS PROVIDED BY INTEL CORPORATION AND CONTRIBUTORS ``AS IS''\r
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE\r
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE\r
- * ARE DISCLAIMED. IN NO EVENT SHALL INTEL CORPORATION OR CONTRIBUTORS BE\r
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR\r
- * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF\r
- * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS\r
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN\r
- * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)\r
- * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF\r
- * THE POSSIBILITY OF SUCH DAMAGE.\r
- *\r
- */\r
-\r
-#if defined (LIBC_SCCS) && !defined (lint)\r
-static char rcsid[] = "$Id: inet_pton.c,v 1.1.1.1 2003/11/19 01:51:30 kyu3 Exp $";\r
-#endif /* LIBC_SCCS and not lint */\r
-\r
-#include <sys/param.h>\r
-#include <sys/types.h>\r
-#include <sys/socket.h>\r
-#include <netinet/in.h>\r
-#include <arpa/inet.h>\r
-#include <arpa/nameser.h>\r
-#include <string.h>\r
-#include <errno.h>\r
-\r
-/*\r
- * WARNING: Don't even consider trying to compile this on a system where\r
- * sizeof(int) < 4. sizeof(int) > 4 is fine; all the world's not a VAX.\r
- */\r
-\r
-static int\r
-inet_pton4 (\r
- const char *src,\r
- u_char *dst\r
- );\r
-\r
-static int\r
-inet_pton6 (\r
- const char *src,\r
- u_char *dst\r
- );\r
-\r
-/* int\r
- * inet_pton(af, src, dst)\r
- * convert from presentation format (which usually means ASCII printable)\r
- * to network format (which is usually some kind of binary format).\r
- * return:\r
- * 1 if the address was valid for the specified address family\r
- * 0 if the address wasn't valid (`dst' is untouched in this case)\r
- * -1 if some other error occurred (`dst' is untouched in this case, too)\r
- * author:\r
- * Paul Vixie, 1996.\r
- */\r
-int\r
-inet_pton (\r
- int af,\r
- const char *src,\r
- void *dst\r
- )\r
-{\r
- switch (af) {\r
- case AF_INET:\r
- return (inet_pton4 (src, dst));\r
- case AF_INET6:\r
- return (inet_pton6 (src, dst));\r
- default:\r
- errno = EAFNOSUPPORT;\r
- return (-1);\r
- }\r
-\r
- /* NOTREACHED */\r
-}\r
-\r
-/* int\r
- * inet_pton4(src, dst)\r
- * like inet_aton() but without all the hexadecimal and shorthand.\r
- * return:\r
- * 1 if `src' is a valid dotted quad, else 0.\r
- * notice:\r
- * does not touch `dst' unless it's returning 1.\r
- * author:\r
- * Paul Vixie, 1996.\r
- */\r
-static int\r
-inet_pton4 (\r
- const char *src,\r
- u_char *dst\r
- )\r
-{\r
- static const char digits[] = "0123456789";\r
- int saw_digit, octets, ch;\r
- u_char tmp[NS_INADDRSZ], *tp;\r
-\r
- saw_digit = 0;\r
- octets = 0;\r
- *(tp = tmp) = 0;\r
- while ((ch = *src++) != '\0') {\r
- const char *pch;\r
-\r
- if ((pch = strchr (digits, ch)) != NULL) {\r
- u_int new = *tp * 10 + (u_int)(pch - digits);\r
-\r
- if (new > 255) {\r
- return (0);\r
- }\r
-\r
- *tp = (u_char)new;\r
- if (!saw_digit) {\r
- if (++octets > 4) {\r
- return (0);\r
- }\r
-\r
- saw_digit = 1;\r
- }\r
- } else if ((ch == '.') && saw_digit) {\r
- if (octets == 4) {\r
- return (0);\r
- }\r
-\r
- *++tp = 0;\r
- saw_digit = 0;\r
- } else {\r
- return (0);\r
- }\r
- }\r
-\r
- if (octets < 4) {\r
- return (0);\r
- }\r
-\r
- memcpy (dst, tmp, NS_INADDRSZ);\r
- return (1);\r
-}\r
-\r
-/* int\r
- * inet_pton6(src, dst)\r
- * convert presentation level address to network order binary form.\r
- * return:\r
- * 1 if `src' is a valid [RFC1884 2.2] address, else 0.\r
- * notice:\r
- * (1) does not touch `dst' unless it's returning 1.\r
- * (2) :: in a full address is silently ignored.\r
- * credit:\r
- * inspired by Mark Andrews.\r
- * author:\r
- * Paul Vixie, 1996.\r
- */\r
-static int\r
-inet_pton6 (\r
- const char *src,\r
- u_char *dst\r
- )\r
-{\r
- static const char xdigits_l[] = "0123456789abcdef",\r
- xdigits_u[] = "0123456789ABCDEF";\r
- u_char tmp[NS_IN6ADDRSZ], *tp, *endp, *colonp;\r
- const char *xdigits, *curtok;\r
- int ch, saw_xdigit;\r
- u_int val;\r
-\r
- memset ((tp = tmp), '\0', NS_IN6ADDRSZ);\r
- endp = tp + NS_IN6ADDRSZ;\r
- colonp = NULL;\r
- /* Leading :: requires some special handling. */\r
- if (*src == ':') {\r
- if (*++src != ':') {\r
- return (0);\r
- }\r
- }\r
-\r
- curtok = src;\r
- saw_xdigit = 0;\r
- val = 0;\r
- while ((ch = *src++) != '\0') {\r
- const char *pch;\r
-\r
- if ((pch = strchr ((xdigits = xdigits_l), ch)) == NULL) {\r
- pch = strchr ((xdigits = xdigits_u), ch);\r
- }\r
-\r
- if (pch != NULL) {\r
- val <<= 4;\r
- val |= (pch - xdigits);\r
- if (val > 0xffff) {\r
- return (0);\r
- }\r
-\r
- saw_xdigit = 1;\r
- continue;\r
- }\r
-\r
- if (ch == ':') {\r
- curtok = src;\r
- if (!saw_xdigit) {\r
- if (colonp) {\r
- return (0);\r
- }\r
-\r
- colonp = tp;\r
- continue;\r
- }\r
-\r
- if (tp + NS_INT16SZ > endp) {\r
- return (0);\r
- }\r
-\r
- *tp++ = (u_char)(val >> 8) & 0xff;\r
- *tp++ = (u_char)val & 0xff;\r
- saw_xdigit = 0;\r
- val = 0;\r
- continue;\r
- }\r
-\r
- if ((ch == '.') && ((tp + NS_INADDRSZ) <= endp) &&\r
- (inet_pton4 (curtok, tp) > 0))\r
- {\r
- tp += NS_INADDRSZ;\r
- saw_xdigit = 0;\r
- break; /* '\0' was seen by inet_pton4(). */\r
- }\r
-\r
- return (0);\r
- }\r
-\r
- if (saw_xdigit) {\r
- if (tp + NS_INT16SZ > endp) {\r
- return (0);\r
- }\r
-\r
- *tp++ = (u_char)(val >> 8) & 0xff;\r
- *tp++ = (u_char)val & 0xff;\r
- }\r
-\r
- if (colonp != NULL) {\r
- /*\r
- * Since some memmove()'s erroneously fail to handle\r
- * overlapping regions, we'll do the shift by hand.\r
- */\r
- const int n = (int)(tp - colonp);\r
- int i;\r
-\r
- for (i = 1; i <= n; i++) {\r
- endp[-i] = colonp[n - i];\r
- colonp[n - i] = 0;\r
- }\r
-\r
- tp = endp;\r
- }\r
-\r
- if (tp != endp) {\r
- return (0);\r
- }\r
-\r
- memcpy (dst, tmp, NS_IN6ADDRSZ);\r
- return (1);\r
-}\r