1 /* $NetBSD: inet_aton.c,v 1.7 2014/12/10 04:37:59 christos Exp $ */
2
3 /*
4 * Portions Copyright (C) 2004, 2005, 2007, 2008, 2012-2014 Internet Systems Consortium, Inc. ("ISC")
5 * Portions Copyright (C) 1996-2001 Internet Software Consortium.
6 *
7 * Permission to use, copy, modify, and/or distribute this software for any
8 * purpose with or without fee is hereby granted, provided that the above
9 * copyright notice and this permission notice appear in all copies.
10 *
11 * THE SOFTWARE IS PROVIDED "AS IS" AND ISC DISCLAIMS ALL WARRANTIES WITH
12 * REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY
13 * AND FITNESS. IN NO EVENT SHALL ISC BE LIABLE FOR ANY SPECIAL, DIRECT,
14 * INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM
15 * LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE
16 * OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
17 * PERFORMANCE OF THIS SOFTWARE.
18 */
19
20 /*
21 * Copyright (c) 1983, 1990, 1993
22 * The Regents of the University of California. All rights reserved.
23 *
24 * Redistribution and use in source and binary forms, with or without
25 * modification, are permitted provided that the following conditions
26 * are met:
27 * 1. Redistributions of source code must retain the above copyright
28 * notice, this list of conditions and the following disclaimer.
29 * 2. Redistributions in binary form must reproduce the above copyright
30 * notice, this list of conditions and the following disclaimer in the
31 * documentation and/or other materials provided with the distribution.
32 * 3. Neither the name of the University nor the names of its contributors
33 * may be used to endorse or promote products derived from this software
34 * without specific prior written permission.
35 *
36 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
37 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
38 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
39 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
40 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
41 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
42 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
43 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
44 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
45 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
46 * SUCH DAMAGE.
47 */
48
49 /*
50 * Portions Copyright (c) 1993 by Digital Equipment Corporation.
51 *
52 * Permission to use, copy, modify, and distribute this software for any
53 * purpose with or without fee is hereby granted, provided that the above
54 * copyright notice and this permission notice appear in all copies, and that
55 * the name of Digital Equipment Corporation not be used in advertising or
56 * publicity pertaining to distribution of the document or software without
57 * specific, written prior permission.
58 *
59 * THE SOFTWARE IS PROVIDED "AS IS" AND DIGITAL EQUIPMENT CORP. DISCLAIMS ALL
60 * WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES
61 * OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL DIGITAL EQUIPMENT
62 * CORPORATION BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL
63 * DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR
64 * PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS
65 * ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
66 * SOFTWARE.
67 */
68 /*! \file */
69
70 #if defined(LIBC_SCCS) && !defined(lint)
71 static char sccsid[] = "@(#)inet_addr.c 8.1 (Berkeley) 6/17/93";
72 static char rcsid[] = "Id: inet_aton.c,v 1.23 2008/12/01 23:47:45 tbox Exp ";
73 #endif /* LIBC_SCCS and not lint */
74
75 #include <config.h>
76
77 #include <ctype.h>
78 #include <stddef.h> /* Required for NULL. */
79
80 #include <isc/types.h>
81 #include <isc/net.h>
82
83 /*%
84 * Check whether "cp" is a valid ascii representation
85 * of an Internet address and convert to a binary address.
86 * Returns 1 if the address is valid, 0 if not.
87 * This replaces inet_addr, the return value from which
88 * cannot distinguish between failure and a local broadcast address.
89 */
90 int
isc_net_aton(const char * cp,struct in_addr * addr)91 isc_net_aton(const char *cp, struct in_addr *addr) {
92 isc_uint32_t val;
93 int base;
94 ptrdiff_t n;
95 unsigned char c;
96 isc_uint8_t parts[4];
97 isc_uint8_t *pp = parts;
98 int digit;
99
100 c = *cp;
101 for (;;) {
102 /*
103 * Collect number up to ``.''.
104 * Values are specified as for C:
105 * 0x=hex, 0=octal, isdigit=decimal.
106 */
107 if (!isdigit(c & 0xff))
108 return (0);
109 val = 0; base = 10; digit = 0;
110 if (c == '0') {
111 c = *++cp;
112 if (c == 'x' || c == 'X')
113 base = 16, c = *++cp;
114 else {
115 base = 8;
116 digit = 1;
117 }
118 }
119 for (;;) {
120 /*
121 * isascii() is valid for all integer values, and
122 * when it is true, c is known to be in scope
123 * for isdigit(). No cast necessary. Similar
124 * comment applies for later ctype uses.
125 */
126 if (isascii(c) && isdigit(c)) {
127 if (base == 8 && (c == '8' || c == '9'))
128 return (0);
129 val = (val * base) + (c - '0');
130 c = *++cp;
131 digit = 1;
132 } else if (base == 16 && isascii(c) && isxdigit(c)) {
133 val = (val << 4) |
134 (c + 10 - (islower(c) ? 'a' : 'A'));
135 c = *++cp;
136 digit = 1;
137 } else
138 break;
139 }
140 if (c == '.') {
141 /*
142 * Internet format:
143 * a.b.c.d
144 * a.b.c (with c treated as 16 bits)
145 * a.b (with b treated as 24 bits)
146 */
147 if (pp >= parts + 3 || val > 0xffU)
148 return (0);
149 *pp++ = (isc_uint8_t)val;
150 c = *++cp;
151 } else
152 break;
153 }
154 /*
155 * Check for trailing characters.
156 */
157 if (c != '\0' && (!isascii(c) || !isspace(c)))
158 return (0);
159 /*
160 * Did we get a valid digit?
161 */
162 if (!digit)
163 return (0);
164 /*
165 * Concoct the address according to
166 * the number of parts specified.
167 */
168 n = pp - parts + 1;
169 switch (n) {
170 case 1: /* a -- 32 bits */
171 break;
172
173 case 2: /* a.b -- 8.24 bits */
174 if (val > 0xffffffU)
175 return (0);
176 val |= parts[0] << 24;
177 break;
178
179 case 3: /* a.b.c -- 8.8.16 bits */
180 if (val > 0xffffU)
181 return (0);
182 val |= (parts[0] << 24) | (parts[1] << 16);
183 break;
184
185 case 4: /* a.b.c.d -- 8.8.8.8 bits */
186 if (val > 0xffU)
187 return (0);
188 val |= (parts[0] << 24) | (parts[1] << 16) | (parts[2] << 8);
189 break;
190 }
191 if (addr != NULL)
192 addr->s_addr = htonl(val);
193
194 return (1);
195 }
196