1 /*
2 * ++Copyright++ 1983, 1990, 1993
3 * -
4 * Copyright (c) 1983, 1990, 1993
5 * The Regents of the University of California. All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 * 3. All advertising materials mentioning features or use of this software
16 * must display the following acknowledgement:
17 * This product includes software developed by the University of
18 * California, Berkeley and its contributors.
19 * 4. Neither the name of the University nor the names of its contributors
20 * may be used to endorse or promote products derived from this software
21 * without specific prior written permission.
22 *
23 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33 * SUCH DAMAGE.
34 * -
35 * Portions Copyright (c) 1993 by Digital Equipment Corporation.
36 *
37 * Permission to use, copy, modify, and distribute this software for any
38 * purpose with or without fee is hereby granted, provided that the above
39 * copyright notice and this permission notice appear in all copies, and that
40 * the name of Digital Equipment Corporation not be used in advertising or
41 * publicity pertaining to distribution of the document or software without
42 * specific, written prior permission.
43 *
44 * THE SOFTWARE IS PROVIDED "AS IS" AND DIGITAL EQUIPMENT CORP. DISCLAIMS ALL
45 * WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES
46 * OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL DIGITAL EQUIPMENT
47 * CORPORATION BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL
48 * DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR
49 * PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS
50 * ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
51 * SOFTWARE.
52 * -
53 * --Copyright--
54 */
55
56 #if !defined(lint)
57 static const char sccsid[] = "@(#)inet_addr.c 8.1 (Berkeley) 6/17/93";
58 static const char rcsid[] = "@(#)$Id: inet_addr.c,v 1.8.2.3 2004/12/09 19:41:20 darrenr Exp $";
59 #endif /* LIBC_SCCS and not lint */
60
61 #include <sys/param.h>
62 #include <netinet/in.h>
63 #include <arpa/inet.h>
64 #include <ctype.h>
65
66 #ifndef __P
67 # ifdef __STDC__
68 # define __P(x) x
69 # else
70 # define __P(x) ()
71 # endif
72 #endif
73 #ifndef linux
74 int inet_aton __P((const char *, struct in_addr *));
75
76 /*
77 * Because the ctype(3) posix definition, if used "safely" in code everywhere,
78 * would mean all normal code that walks through strings needed casts. Yuck.
79 */
80 #define ISALNUM(x) isalnum((u_char)(x))
81 #define ISALPHA(x) isalpha((u_char)(x))
82 #define ISASCII(x) isascii((u_char)(x))
83 #define ISDIGIT(x) isdigit((u_char)(x))
84 #define ISPRINT(x) isprint((u_char)(x))
85 #define ISSPACE(x) isspace((u_char)(x))
86 #define ISUPPER(x) isupper((u_char)(x))
87 #define ISXDIGIT(x) isxdigit((u_char)(x))
88 #define ISLOWER(x) islower((u_char)(x))
89
90 /*
91 * Check whether "cp" is a valid ascii representation
92 * of an Internet address and convert to a binary address.
93 * Returns 1 if the address is valid, 0 if not.
94 * This replaces inet_addr, the return value from which
95 * cannot distinguish between failure and a local broadcast address.
96 */
97 int
inet_aton(cp,addr)98 inet_aton(cp, addr)
99 register const char *cp;
100 struct in_addr *addr;
101 {
102 register u_long val;
103 register int base, n;
104 register char c;
105 u_int parts[4];
106 register u_int *pp = parts;
107
108 c = *cp;
109 for (;;) {
110 /*
111 * Collect number up to ``.''.
112 * Values are specified as for C:
113 * 0x=hex, 0=octal, isdigit=decimal.
114 */
115 if (!ISDIGIT(c))
116 return (0);
117 val = 0; base = 10;
118 if (c == '0') {
119 c = *++cp;
120 if (c == 'x' || c == 'X')
121 base = 16, c = *++cp;
122 else
123 base = 8;
124 }
125 for (;;) {
126 if (ISASCII(c) && ISDIGIT(c)) {
127 val = (val * base) + (c - '0');
128 c = *++cp;
129 } else if (base == 16 && ISASCII(c) && ISXDIGIT(c)) {
130 val = (val << 4) |
131 (c + 10 - (ISLOWER(c) ? 'a' : 'A'));
132 c = *++cp;
133 } else
134 break;
135 }
136 if (c == '.') {
137 /*
138 * Internet format:
139 * a.b.c.d
140 * a.b.c (with c treated as 16 bits)
141 * a.b (with b treated as 24 bits)
142 */
143 if (pp >= parts + 3)
144 return (0);
145 *pp++ = val;
146 c = *++cp;
147 } else
148 break;
149 }
150 /*
151 * Check for trailing characters.
152 */
153 if (c != '\0' && (!ISASCII(c) || !ISSPACE(c)))
154 return (0);
155 /*
156 * Concoct the address according to
157 * the number of parts specified.
158 */
159 n = pp - parts + 1;
160 switch (n) {
161
162 case 0:
163 return (0); /* initial nondigit */
164
165 case 1: /* a -- 32 bits */
166 break;
167
168 case 2: /* a.b -- 8.24 bits */
169 if (val > 0xffffff)
170 return (0);
171 val |= parts[0] << 24;
172 break;
173
174 case 3: /* a.b.c -- 8.8.16 bits */
175 if (val > 0xffff)
176 return (0);
177 val |= (parts[0] << 24) | (parts[1] << 16);
178 break;
179
180 case 4: /* a.b.c.d -- 8.8.8.8 bits */
181 if (val > 0xff)
182 return (0);
183 val |= (parts[0] << 24) | (parts[1] << 16) | (parts[2] << 8);
184 break;
185 }
186 if (addr)
187 addr->s_addr = htonl(val);
188 return (1);
189 }
190 #endif
191
192 /* these are compatibility routines, not needed on recent BSD releases */
193
194 /*
195 * Ascii internet address interpretation routine.
196 * The value returned is in network order.
197 */
198 #if 0
199 inet_addr(cp)
200 const char *cp;
201 {
202 struct in_addr val;
203
204 if (inet_aton(cp, &val))
205 return (val.s_addr);
206 return (0xffffffff);
207 }
208 #endif
209