161961e0fSrobinson /*
261961e0fSrobinson * Copyright (c) 1996 by Internet Software Consortium.
37c478bd9Sstevel@tonic-gate *
47c478bd9Sstevel@tonic-gate * Permission to use, copy, modify, and distribute this software for any
57c478bd9Sstevel@tonic-gate * purpose with or without fee is hereby granted, provided that the above
67c478bd9Sstevel@tonic-gate * copyright notice and this permission notice appear in all copies.
77c478bd9Sstevel@tonic-gate *
87c478bd9Sstevel@tonic-gate * THE SOFTWARE IS PROVIDED "AS IS" AND INTERNET SOFTWARE CONSORTIUM DISCLAIMS
97c478bd9Sstevel@tonic-gate * ALL WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES
107c478bd9Sstevel@tonic-gate * OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL INTERNET SOFTWARE
117c478bd9Sstevel@tonic-gate * CONSORTIUM BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL
127c478bd9Sstevel@tonic-gate * DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR
137c478bd9Sstevel@tonic-gate * PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS
147c478bd9Sstevel@tonic-gate * ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
157c478bd9Sstevel@tonic-gate * SOFTWARE.
167c478bd9Sstevel@tonic-gate */
1761961e0fSrobinson
18*8a7aa2a5SYuri Pankov /*
19*8a7aa2a5SYuri Pankov * Copyright 2006 Sun Microsystems, Inc. All rights reserved.
20*8a7aa2a5SYuri Pankov * Use is subject to license terms.
21*8a7aa2a5SYuri Pankov */
22*8a7aa2a5SYuri Pankov
23*8a7aa2a5SYuri Pankov #include "lint.h"
24*8a7aa2a5SYuri Pankov
25*8a7aa2a5SYuri Pankov #include <sys/socket.h>
267c478bd9Sstevel@tonic-gate
277c478bd9Sstevel@tonic-gate #include <arpa/inet.h>
287c478bd9Sstevel@tonic-gate #include <netinet/in.h>
29*8a7aa2a5SYuri Pankov
30*8a7aa2a5SYuri Pankov #include <ctype.h>
317c478bd9Sstevel@tonic-gate #include <errno.h>
32*8a7aa2a5SYuri Pankov #include <netdb.h>
33*8a7aa2a5SYuri Pankov #include <stdio.h>
34*8a7aa2a5SYuri Pankov #include <stdlib.h>
35*8a7aa2a5SYuri Pankov #include <string.h>
36*8a7aa2a5SYuri Pankov #include <strings.h>
377c478bd9Sstevel@tonic-gate
3861961e0fSrobinson static int inet_pton4(const char *src, uchar_t *dst);
3961961e0fSrobinson static int inet_pton6(const char *src, uchar_t *dst);
407c478bd9Sstevel@tonic-gate
4161961e0fSrobinson /*
4261961e0fSrobinson * int
437c478bd9Sstevel@tonic-gate * inet_pton(af, src, dst)
447c478bd9Sstevel@tonic-gate * convert from presentation format (which usually means ASCII printable)
457c478bd9Sstevel@tonic-gate * to network format (which is usually some kind of binary format).
467c478bd9Sstevel@tonic-gate * return:
477c478bd9Sstevel@tonic-gate * 1 if the address was valid for the specified address family
487c478bd9Sstevel@tonic-gate * 0 if the address wasn't valid (`dst' is untouched in this case)
497c478bd9Sstevel@tonic-gate * -1 if some other error occurred (`dst' is untouched in this case, too)
507c478bd9Sstevel@tonic-gate * author:
517c478bd9Sstevel@tonic-gate * Paul Vixie, 1996. Taken from on297-gate:dns stuff
527c478bd9Sstevel@tonic-gate */
537c478bd9Sstevel@tonic-gate int
inet_pton(int af,const char * src,void * dst)5461961e0fSrobinson inet_pton(int af, const char *src, void *dst)
557c478bd9Sstevel@tonic-gate {
567c478bd9Sstevel@tonic-gate switch (af) {
577c478bd9Sstevel@tonic-gate case AF_INET:
587c478bd9Sstevel@tonic-gate return (inet_pton4(src, dst));
597c478bd9Sstevel@tonic-gate case AF_INET6:
607c478bd9Sstevel@tonic-gate return (inet_pton6(src, dst));
617c478bd9Sstevel@tonic-gate default:
627c478bd9Sstevel@tonic-gate errno = EAFNOSUPPORT;
637c478bd9Sstevel@tonic-gate return (-1);
647c478bd9Sstevel@tonic-gate }
657c478bd9Sstevel@tonic-gate /* NOTREACHED */
667c478bd9Sstevel@tonic-gate }
677c478bd9Sstevel@tonic-gate
6861961e0fSrobinson /*
6961961e0fSrobinson * int
707c478bd9Sstevel@tonic-gate * inet_pton4(src, dst)
717c478bd9Sstevel@tonic-gate * like inet_aton() but without all the hexadecimal and shorthand.
727c478bd9Sstevel@tonic-gate * return:
737c478bd9Sstevel@tonic-gate * 1 if `src' is a valid dotted quad, else 0.
747c478bd9Sstevel@tonic-gate * notice:
757c478bd9Sstevel@tonic-gate * does not touch `dst' unless it's returning 1.
767c478bd9Sstevel@tonic-gate *
777c478bd9Sstevel@tonic-gate */
7861961e0fSrobinson #define INADDRSZ 4
797c478bd9Sstevel@tonic-gate #define IN6ADDRSZ 16
8061961e0fSrobinson #define INT16SZ 2
8161961e0fSrobinson
827c478bd9Sstevel@tonic-gate static int
inet_pton4(const char * src,uchar_t * dst)8361961e0fSrobinson inet_pton4(const char *src, uchar_t *dst)
847c478bd9Sstevel@tonic-gate {
857c478bd9Sstevel@tonic-gate static const char digits[] = "0123456789";
867c478bd9Sstevel@tonic-gate int saw_digit, octets, ch;
8761961e0fSrobinson uchar_t tmp[INADDRSZ], *tp;
887c478bd9Sstevel@tonic-gate
897c478bd9Sstevel@tonic-gate saw_digit = 0;
907c478bd9Sstevel@tonic-gate octets = 0;
917c478bd9Sstevel@tonic-gate *(tp = tmp) = 0;
927c478bd9Sstevel@tonic-gate while ((ch = *src++) != '\0') {
937c478bd9Sstevel@tonic-gate const char *pch;
947c478bd9Sstevel@tonic-gate
957c478bd9Sstevel@tonic-gate if ((pch = strchr(digits, ch)) != NULL) {
9661961e0fSrobinson uint_t new = *tp * 10 + (pch - digits);
977c478bd9Sstevel@tonic-gate
987c478bd9Sstevel@tonic-gate if (new > 255)
997c478bd9Sstevel@tonic-gate return (0);
1007c478bd9Sstevel@tonic-gate *tp = new;
10161961e0fSrobinson if (!saw_digit) {
1027c478bd9Sstevel@tonic-gate if (++octets > 4)
1037c478bd9Sstevel@tonic-gate return (0);
1047c478bd9Sstevel@tonic-gate saw_digit = 1;
1057c478bd9Sstevel@tonic-gate }
1067c478bd9Sstevel@tonic-gate } else if (ch == '.' && saw_digit) {
1077c478bd9Sstevel@tonic-gate if (octets == 4)
1087c478bd9Sstevel@tonic-gate return (0);
1097c478bd9Sstevel@tonic-gate *++tp = 0;
1107c478bd9Sstevel@tonic-gate saw_digit = 0;
1117c478bd9Sstevel@tonic-gate } else
1127c478bd9Sstevel@tonic-gate return (0);
1137c478bd9Sstevel@tonic-gate }
1147c478bd9Sstevel@tonic-gate if (octets < 4)
1157c478bd9Sstevel@tonic-gate return (0);
1167c478bd9Sstevel@tonic-gate
11761961e0fSrobinson (void) memcpy(dst, tmp, INADDRSZ);
1187c478bd9Sstevel@tonic-gate return (1);
1197c478bd9Sstevel@tonic-gate }
1207c478bd9Sstevel@tonic-gate
1217c478bd9Sstevel@tonic-gate
12261961e0fSrobinson /*
12361961e0fSrobinson * int
1247c478bd9Sstevel@tonic-gate * inet_pton6(src, dst)
1257c478bd9Sstevel@tonic-gate * convert presentation level address to network order binary form.
1267c478bd9Sstevel@tonic-gate * return:
1277c478bd9Sstevel@tonic-gate * 1 if `src' is a valid [RFC1884 2.2] address, else 0.
1287c478bd9Sstevel@tonic-gate * notice:
1297c478bd9Sstevel@tonic-gate * (1) does not touch `dst' unless it's returning 1.
1307c478bd9Sstevel@tonic-gate * (2) :: in a full address is silently ignored.
1317c478bd9Sstevel@tonic-gate * credit:
1327c478bd9Sstevel@tonic-gate * inspired by Mark Andrews.
1337c478bd9Sstevel@tonic-gate *
1347c478bd9Sstevel@tonic-gate */
1357c478bd9Sstevel@tonic-gate static int
inet_pton6(const char * src,uchar_t * dst)13661961e0fSrobinson inet_pton6(const char *src, uchar_t *dst)
1377c478bd9Sstevel@tonic-gate {
138*8a7aa2a5SYuri Pankov static const char xdigits_l[] = "0123456789abcdef";
139*8a7aa2a5SYuri Pankov static const char xdigits_u[] = "0123456789ABCDEF";
14061961e0fSrobinson uchar_t tmp[IN6ADDRSZ], *tp, *endp, *colonp;
1417c478bd9Sstevel@tonic-gate const char *xdigits, *curtok;
1427c478bd9Sstevel@tonic-gate int ch, saw_xdigit;
14361961e0fSrobinson uint_t val;
1447c478bd9Sstevel@tonic-gate
14561961e0fSrobinson (void) memset((tp = tmp), '\0', IN6ADDRSZ);
1467c478bd9Sstevel@tonic-gate endp = tp + IN6ADDRSZ;
1477c478bd9Sstevel@tonic-gate colonp = NULL;
1487c478bd9Sstevel@tonic-gate /* Leading :: requires some special handling. */
1497c478bd9Sstevel@tonic-gate if (*src == ':')
1507c478bd9Sstevel@tonic-gate if (*++src != ':')
1517c478bd9Sstevel@tonic-gate return (0);
1527c478bd9Sstevel@tonic-gate curtok = src;
1537c478bd9Sstevel@tonic-gate saw_xdigit = 0;
1547c478bd9Sstevel@tonic-gate val = 0;
1557c478bd9Sstevel@tonic-gate while ((ch = *src++) != '\0') {
1567c478bd9Sstevel@tonic-gate const char *pch;
1577c478bd9Sstevel@tonic-gate
1587c478bd9Sstevel@tonic-gate if ((pch = strchr((xdigits = xdigits_l), ch)) == NULL)
1597c478bd9Sstevel@tonic-gate pch = strchr((xdigits = xdigits_u), ch);
1607c478bd9Sstevel@tonic-gate if (pch != NULL) {
1617c478bd9Sstevel@tonic-gate val <<= 4;
1627c478bd9Sstevel@tonic-gate val |= (pch - xdigits);
1637c478bd9Sstevel@tonic-gate if (val > 0xffff)
1647c478bd9Sstevel@tonic-gate return (0);
1657c478bd9Sstevel@tonic-gate saw_xdigit = 1;
1667c478bd9Sstevel@tonic-gate continue;
1677c478bd9Sstevel@tonic-gate }
1687c478bd9Sstevel@tonic-gate if (ch == ':') {
1697c478bd9Sstevel@tonic-gate curtok = src;
1707c478bd9Sstevel@tonic-gate if (!saw_xdigit) {
1717c478bd9Sstevel@tonic-gate if (colonp)
1727c478bd9Sstevel@tonic-gate return (0);
1737c478bd9Sstevel@tonic-gate colonp = tp;
1747c478bd9Sstevel@tonic-gate continue;
1757c478bd9Sstevel@tonic-gate } else if (*src == '\0') {
1767c478bd9Sstevel@tonic-gate return (0);
1777c478bd9Sstevel@tonic-gate }
1787c478bd9Sstevel@tonic-gate if (tp + INT16SZ > endp)
1797c478bd9Sstevel@tonic-gate return (0);
18061961e0fSrobinson *tp++ = (uchar_t)(val >> 8) & 0xff;
18161961e0fSrobinson *tp++ = (uchar_t)val & 0xff;
1827c478bd9Sstevel@tonic-gate saw_xdigit = 0;
1837c478bd9Sstevel@tonic-gate val = 0;
1847c478bd9Sstevel@tonic-gate continue;
1857c478bd9Sstevel@tonic-gate }
1867c478bd9Sstevel@tonic-gate if (ch == '.' && ((tp + INADDRSZ) <= endp) &&
1877c478bd9Sstevel@tonic-gate inet_pton4(curtok, tp) > 0) {
1887c478bd9Sstevel@tonic-gate tp += INADDRSZ;
1897c478bd9Sstevel@tonic-gate saw_xdigit = 0;
1907c478bd9Sstevel@tonic-gate break; /* '\0' was seen by inet_pton4(). */
1917c478bd9Sstevel@tonic-gate }
1927c478bd9Sstevel@tonic-gate return (0);
1937c478bd9Sstevel@tonic-gate }
1947c478bd9Sstevel@tonic-gate if (saw_xdigit) {
1957c478bd9Sstevel@tonic-gate if (tp + INT16SZ > endp)
1967c478bd9Sstevel@tonic-gate return (0);
19761961e0fSrobinson *tp++ = (uchar_t)(val >> 8) & 0xff;
19861961e0fSrobinson *tp++ = (uchar_t)val & 0xff;
1997c478bd9Sstevel@tonic-gate }
2007c478bd9Sstevel@tonic-gate if (colonp != NULL) {
2017c478bd9Sstevel@tonic-gate /*
2027c478bd9Sstevel@tonic-gate * Since some memmove()'s erroneously fail to handle
2037c478bd9Sstevel@tonic-gate * overlapping regions, we'll do the shift by hand.
2047c478bd9Sstevel@tonic-gate */
2057c478bd9Sstevel@tonic-gate const int n = tp - colonp;
2067c478bd9Sstevel@tonic-gate int i;
2077c478bd9Sstevel@tonic-gate
2087c478bd9Sstevel@tonic-gate if (tp == endp)
2097c478bd9Sstevel@tonic-gate return (0);
2107c478bd9Sstevel@tonic-gate for (i = 1; i <= n; i++) {
2117c478bd9Sstevel@tonic-gate endp[- i] = colonp[n - i];
2127c478bd9Sstevel@tonic-gate colonp[n - i] = 0;
2137c478bd9Sstevel@tonic-gate }
2147c478bd9Sstevel@tonic-gate tp = endp;
2157c478bd9Sstevel@tonic-gate }
2167c478bd9Sstevel@tonic-gate if (tp != endp)
2177c478bd9Sstevel@tonic-gate return (0);
21861961e0fSrobinson (void) memcpy(dst, tmp, IN6ADDRSZ);
2197c478bd9Sstevel@tonic-gate return (1);
2207c478bd9Sstevel@tonic-gate }
221