Head

GCC Code Coverage Report

Directory:	./		Exec	Total	Coverage
File:	lib/libc/net/inet_pton.c	Lines:	0	75	0.0 %
Date:	2017-11-13	Branches:	0	70	0.0 %


/*	$OpenBSD: inet_pton.c,v 1.10 2015/09/13 21:36:08 guenther Exp $	*/

/* 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.
 */

#include <sys/types.h>
#include <sys/socket.h>
#include <netinet/in.h>
#include <arpa/inet.h>
#include <arpa/nameser.h>
#include <string.h>
#include <errno.h>

/*
 * WARNING: Don't even consider trying to compile this on a system where
 * sizeof(int) < 4.  sizeof(int) > 4 is fine; all the world's not a VAX.
 */

static int	inet_pton4(const char *src, u_char *dst);
static int	inet_pton6(const char *src, u_char *dst);

/* int
 * inet_pton(af, src, dst)
 *	convert from presentation format (which usually means ASCII printable)
 *	to network format (which is usually some kind of binary format).
 * return:
 *	1 if the address was valid for the specified address family
 *	0 if the address wasn't valid (`dst' is untouched in this case)
 *	-1 if some other error occurred (`dst' is untouched in this case, too)
 * author:
 *	Paul Vixie, 1996.
 */
int
inet_pton(int af, const char *src, void *dst)
{
	switch (af) {
	case AF_INET:
		return (inet_pton4(src, dst));
	case AF_INET6:
		return (inet_pton6(src, dst));
	default:
		errno = EAFNOSUPPORT;
		return (-1);
	}
	/* NOTREACHED */
}
DEF_WEAK(inet_pton);

/* int
 * inet_pton4(src, dst)
 *	like inet_aton() but without all the hexadecimal and shorthand.
 * return:
 *	1 if `src' is a valid dotted quad, else 0.
 * notice:
 *	does not touch `dst' unless it's returning 1.
 * author:
 *	Paul Vixie, 1996.
 */
static int
inet_pton4(const char *src, u_char *dst)
{
	static const char digits[] = "0123456789";
	int saw_digit, octets, ch;
	u_char tmp[INADDRSZ], *tp;

	saw_digit = 0;
	octets = 0;
	*(tp = tmp) = 0;
	while ((ch = *src++) != '\0') {
		const char *pch;

		if ((pch = strchr(digits, ch)) != NULL) {
			u_int new = *tp * 10 + (pch - digits);

			if (new > 255)
				return (0);
			if (! saw_digit) {
				if (++octets > 4)
					return (0);
				saw_digit = 1;
			}
			*tp = new;
		} else if (ch == '.' && saw_digit) {
			if (octets == 4)
				return (0);
			*++tp = 0;
			saw_digit = 0;
		} else
			return (0);
	}
	if (octets < 4)
		return (0);

	memcpy(dst, tmp, INADDRSZ);
	return (1);
}

/* int
 * inet_pton6(src, dst)
 *	convert presentation level address to network order binary form.
 * return:
 *	1 if `src' is a valid [RFC1884 2.2] address, else 0.
 * notice:
 *	does not touch `dst' unless it's returning 1.
 * credit:
 *	inspired by Mark Andrews.
 * author:
 *	Paul Vixie, 1996.
 */
static int
inet_pton6(const char *src, u_char *dst)
{
	static const char xdigits_l[] = "0123456789abcdef",
			  xdigits_u[] = "0123456789ABCDEF";
	u_char tmp[IN6ADDRSZ], *tp, *endp, *colonp;
	const char *xdigits, *curtok;
	int ch, saw_xdigit, count_xdigit;
	u_int val;

	memset((tp = tmp), '\0', IN6ADDRSZ);
	endp = tp + IN6ADDRSZ;
	colonp = NULL;
	/* Leading :: requires some special handling. */
	if (*src == ':')
		if (*++src != ':')
			return (0);
	curtok = src;
	saw_xdigit = count_xdigit = 0;
	val = 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 (count_xdigit >= 4)
				return (0);
			val <<= 4;
			val |= (pch - xdigits);
			if (val > 0xffff)
				return (0);
			saw_xdigit = 1;
			count_xdigit++;
			continue;
		}
		if (ch == ':') {
			curtok = src;
			if (!saw_xdigit) {
				if (colonp)
					return (0);
				colonp = tp;
				continue;
			} else if (*src == '\0') {
				return (0);
			}
			if (tp + INT16SZ > endp)
				return (0);
			*tp++ = (u_char) (val >> 8) & 0xff;
			*tp++ = (u_char) val & 0xff;
			saw_xdigit = 0;
			count_xdigit = 0;
			val = 0;
			continue;
		}
		if (ch == '.' && ((tp + INADDRSZ) <= endp) &&
		    inet_pton4(curtok, tp) > 0) {
			tp += INADDRSZ;
			saw_xdigit = 0;
			count_xdigit = 0;
			break;	/* '\0' was seen by inet_pton4(). */
		}
		return (0);
	}
	if (saw_xdigit) {
		if (tp + INT16SZ > endp)
			return (0);
		*tp++ = (u_char) (val >> 8) & 0xff;
		*tp++ = (u_char) val & 0xff;
	}
	if (colonp != NULL) {
		/*
		 * Since some memmove()'s erroneously fail to handle
		 * overlapping regions, we'll do the shift by hand.
		 */
		const int n = tp - colonp;
		int i;

		if (tp == endp)
			return (0);
		for (i = 1; i <= n; i++) {
			endp[- i] = colonp[n - i];
			colonp[n - i] = 0;
		}
		tp = endp;
	}
	if (tp != endp)
		return (0);
	memcpy(dst, tmp, IN6ADDRSZ);
	return (1);
}


Generated by: GCOVR (Version 3.3)

Line	Branch	Exec	Source
1			/* $OpenBSD: inet_pton.c,v 1.10 2015/09/13 21:36:08 guenther Exp $ */
2
3			/* Copyright (c) 1996 by Internet Software Consortium.
4			*
5			* Permission to use, copy, modify, and distribute this software for any
6			* purpose with or without fee is hereby granted, provided that the above
7			* copyright notice and this permission notice appear in all copies.
8			*
9			* THE SOFTWARE IS PROVIDED "AS IS" AND INTERNET SOFTWARE CONSORTIUM DISCLAIMS
10			* ALL WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES
11			* OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL INTERNET SOFTWARE
12			* CONSORTIUM BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL
13			* DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR
14			* PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS
15			* ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
16			* SOFTWARE.
17			*/
18
19			#include <sys/types.h>
20			#include <sys/socket.h>
21			#include <netinet/in.h>
22			#include <arpa/inet.h>
23			#include <arpa/nameser.h>
24			#include <string.h>
25			#include <errno.h>
26
27			/*
28			* WARNING: Don't even consider trying to compile this on a system where
29			* sizeof(int) < 4. sizeof(int) > 4 is fine; all the world's not a VAX.
30			*/
31
32			static int inet_pton4(const char src, u_char dst);
33			static int inet_pton6(const char src, u_char dst);
34
35			/* int
36			* inet_pton(af, src, dst)
37			* convert from presentation format (which usually means ASCII printable)
38			* to network format (which is usually some kind of binary format).
39			* return:
40			* 1 if the address was valid for the specified address family
41			* 0 if the address wasn't valid (`dst' is untouched in this case)
42			* -1 if some other error occurred (`dst' is untouched in this case, too)
43			* author:
44			* Paul Vixie, 1996.
45			*/
46			int
47			inet_pton(int af, const char src, void dst)
48			{
49			switch (af) {
50			case AF_INET:
51			return (inet_pton4(src, dst));
52			case AF_INET6:
53			return (inet_pton6(src, dst));
54			default:
55			errno = EAFNOSUPPORT;
56			return (-1);
57			}
58			/* NOTREACHED */
59			}
60			DEF_WEAK(inet_pton);
61
62			/* int
63			* inet_pton4(src, dst)
64			* like inet_aton() but without all the hexadecimal and shorthand.
65			* return:
66			* 1 if `src' is a valid dotted quad, else 0.
67			* notice:
68			* does not touch `dst' unless it's returning 1.
69			* author:
70			* Paul Vixie, 1996.
71			*/
72			static int
73			inet_pton4(const char src, u_char dst)
74			{
75			static const char digits[] = "0123456789";
76			int saw_digit, octets, ch;
77			u_char tmp[INADDRSZ], *tp;
78
79			saw_digit = 0;
80			octets = 0;
81			*(tp = tmp) = 0;
82			while ((ch = *src++) != '\0') {
83			const char *pch;
84
85			if ((pch = strchr(digits, ch)) != NULL) {
86			u_int new = tp 10 + (pch - digits);
87
88			if (new > 255)
89			return (0);
90			if (! saw_digit) {
91			if (++octets > 4)
92			return (0);
93			saw_digit = 1;
94			}
95			*tp = new;
96			} else if (ch == '.' && saw_digit) {
97			if (octets == 4)
98			return (0);
99			*++tp = 0;
100			saw_digit = 0;
101			} else
102			return (0);
103			}
104			if (octets < 4)
105			return (0);
106
107			memcpy(dst, tmp, INADDRSZ);
108			return (1);
109			}
110
111			/* int
112			* inet_pton6(src, dst)
113			* convert presentation level address to network order binary form.
114			* return:
115			* 1 if `src' is a valid [RFC1884 2.2] address, else 0.
116			* notice:
117			* does not touch `dst' unless it's returning 1.
118			* credit:
119			* inspired by Mark Andrews.
120			* author:
121			* Paul Vixie, 1996.
122			*/
123			static int
124			inet_pton6(const char src, u_char dst)
125			{
126			static const char xdigits_l[] = "0123456789abcdef",
127			xdigits_u[] = "0123456789ABCDEF";
128			u_char tmp[IN6ADDRSZ], tp, endp, *colonp;
129			const char xdigits, curtok;
130			int ch, saw_xdigit, count_xdigit;
131			u_int val;
132
133			memset((tp = tmp), '\0', IN6ADDRSZ);
134			endp = tp + IN6ADDRSZ;
135			colonp = NULL;
136			/* Leading :: requires some special handling. */
137			if (*src == ':')
138			if (*++src != ':')
139			return (0);
140			curtok = src;
141			saw_xdigit = count_xdigit = 0;
142			val = 0;
143			while ((ch = *src++) != '\0') {
144			const char *pch;
145
146			if ((pch = strchr((xdigits = xdigits_l), ch)) == NULL)
147			pch = strchr((xdigits = xdigits_u), ch);
148			if (pch != NULL) {
149			if (count_xdigit >= 4)
150			return (0);
151			val <<= 4;
152			val \|= (pch - xdigits);
153			if (val > 0xffff)
154			return (0);
155			saw_xdigit = 1;
156			count_xdigit++;
157			continue;
158			}
159			if (ch == ':') {
160			curtok = src;
161			if (!saw_xdigit) {
162			if (colonp)
163			return (0);
164			colonp = tp;
165			continue;
166			} else if (*src == '\0') {
167			return (0);
168			}
169			if (tp + INT16SZ > endp)
170			return (0);
171			*tp++ = (u_char) (val >> 8) & 0xff;
172			*tp++ = (u_char) val & 0xff;
173			saw_xdigit = 0;
174			count_xdigit = 0;
175			val = 0;
176			continue;
177			}
178			if (ch == '.' && ((tp + INADDRSZ) <= endp) &&
179			inet_pton4(curtok, tp) > 0) {
180			tp += INADDRSZ;
181			saw_xdigit = 0;
182			count_xdigit = 0;
183			break; /* '\0' was seen by inet_pton4(). */
184			}
185			return (0);
186			}
187			if (saw_xdigit) {
188			if (tp + INT16SZ > endp)
189			return (0);
190			*tp++ = (u_char) (val >> 8) & 0xff;
191			*tp++ = (u_char) val & 0xff;
192			}
193			if (colonp != NULL) {
194			/*
195			* Since some memmove()'s erroneously fail to handle
196			* overlapping regions, we'll do the shift by hand.
197			*/
198			const int n = tp - colonp;
199			int i;
200
201			if (tp == endp)
202			return (0);
203			for (i = 1; i <= n; i++) {
204			endp[- i] = colonp[n - i];
205			colonp[n - i] = 0;
206			}
207			tp = endp;
208			}
209			if (tp != endp)
210			return (0);
211			memcpy(dst, tmp, IN6ADDRSZ);
212			return (1);
213			}