1 /*
2 * CDDL HEADER START
3 *
4 * The contents of this file are subject to the terms of the
5 * Common Development and Distribution License (the "License").
6 * You may not use this file except in compliance with the License.
7 *
8 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
9 * or http://www.opensolaris.org/os/licensing.
10 * See the License for the specific language governing permissions
11 * and limitations under the License.
12 *
13 * When distributing Covered Code, include this CDDL HEADER in each
14 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
15 * If applicable, add the following below this CDDL HEADER, with the
16 * fields enclosed by brackets "[]" replaced with your own identifying
17 * information: Portions Copyright [yyyy] [name of copyright owner]
18 *
19 * CDDL HEADER END
20 */
21
22 /*
23 * Copyright 2008 Sun Microsystems, Inc. All rights reserved.
24 * Use is subject to license terms.
25 */
26
27 /* Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989 AT&T */
28 /* All Rights Reserved */
29 /*
30 * Portions of this source code were derived from Berkeley
31 * 4.3 BSD under license from the Regents of the University of
32 * California.
33 */
34
35 /*
36 * Copyright (c) 1983, 1990, 1993
37 * The Regents of the University of California. All rights reserved.
38 *
39 * Redistribution and use in source and binary forms, with or without
40 * modification, are permitted provided that the following conditions
41 * are met:
42 * 1. Redistributions of source code must retain the above copyright
43 * notice, this list of conditions and the following disclaimer.
44 * 2. Redistributions in binary form must reproduce the above copyright
45 * notice, this list of conditions and the following disclaimer in the
46 * documentation and/or other materials provided with the distribution.
47 * 3. All advertising materials mentioning features or use of this software
48 * must display the following acknowledgement:
49 * This product includes software developed by the University of
50 * California, Berkeley and its contributors.
51 * 4. Neither the name of the University nor the names of its contributors
52 * may be used to endorse or promote products derived from this software
53 * without specific prior written permission.
54 *
55 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
56 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
57 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
58 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
59 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
60 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
61 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
62 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
63 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
64 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
65 * SUCH DAMAGE.
66 */
67
68 /*
69 * Portions Copyright (c) 1993 by Digital Equipment Corporation.
70 *
71 * Permission to use, copy, modify, and distribute this software for any
72 * purpose with or without fee is hereby granted, provided that the above
73 * copyright notice and this permission notice appear in all copies, and that
74 * the name of Digital Equipment Corporation not be used in advertising or
75 * publicity pertaining to distribution of the document or software without
76 * specific, written prior permission.
77 *
78 * THE SOFTWARE IS PROVIDED "AS IS" AND DIGITAL EQUIPMENT CORP. DISCLAIMS ALL
79 * WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES
80 * OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL DIGITAL EQUIPMENT
81 * CORPORATION BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL
82 * DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR
83 * PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS
84 * ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
85 * SOFTWARE.
86 */
87
88 /*
89 * Portions Copyright (c) 1996-1999 by Internet Software Consortium.
90 *
91 * Permission to use, copy, modify, and distribute this software for any
92 * purpose with or without fee is hereby granted, provided that the above
93 * copyright notice and this permission notice appear in all copies.
94 *
95 * THE SOFTWARE IS PROVIDED "AS IS" AND INTERNET SOFTWARE CONSORTIUM DISCLAIMS
96 * ALL WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES
97 * OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL INTERNET SOFTWARE
98 * CONSORTIUM BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL
99 * DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR
100 * PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS
101 * ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
102 * SOFTWARE.
103 */
104
105 #pragma ident "%Z%%M% %I% %E% SMI"
106
107 /*
108 * Convert network-format internet address
109 * to base 256 d.d.d.d representation.
110 *
111 * Reentrant interface
112 */
113
114 #include "mt.h"
115 #include "rpc_mt.h"
116 #include <errno.h>
117 #include <sys/types.h>
118 #include <ctype.h>
119 #include <netinet/in.h>
120 #include <stdio.h>
121 #include <stdlib.h>
122
123
124 char *
inet_ntoa_r(in,b)125 inet_ntoa_r(in, b)
126 struct in_addr in;
127 char b[]; /* Assumed >= 18 bytes */
128 {
129 char *p;
130
131 p = (char *)∈
132 #define UC(b) (((int)b)&0xff)
133 (void) sprintf(b, "%d.%d.%d.%d",
134 UC(p[0]), UC(p[1]), UC(p[2]), UC(p[3]));
135 return (b);
136 }
137
138 char *
inet_ntoa(in)139 inet_ntoa(in)
140 struct in_addr in;
141 {
142 char *b;
143 static char b_main[18];
144 static pthread_key_t ntoa_key = PTHREAD_ONCE_KEY_NP;
145
146 if (thr_main())
147 b = b_main;
148 else if ((b = thr_get_storage(&ntoa_key, 18, free)) == NULL)
149 b = b_main;
150
151 return (inet_ntoa_r(in, b));
152 }
153
154 /*
155 * Check whether "cp" is a valid ascii representation
156 * of an Internet address and convert to a binary address.
157 * Returns 1 if the address is valid, 0 if not.
158 * This replaces inet_addr, the return value from which
159 * cannot distinguish between failure and a local broadcast address.
160 */
161 int
inet_aton(const char * cp,struct in_addr * addr)162 inet_aton(const char *cp, struct in_addr *addr)
163 {
164 uint32_t val;
165 int base, n;
166 char c;
167 unsigned int parts[4];
168 unsigned int *pp = parts;
169
170
171 c = *cp;
172 for (;;) {
173 /*
174 * Collect number up to ``.''.
175 * Values are specified as for C:
176 * 0x=hex, 0=octal, isdigit=decimal.
177 */
178 if (!isdigit(c))
179 return (0);
180 val = 0; base = 10;
181 if (c == '0') {
182 c = *++cp;
183 if (c == 'x' || c == 'X')
184 base = 16, c = *++cp;
185 else
186 base = 8;
187 }
188 for (;;) {
189 if (isascii(c) && isdigit(c)) {
190 val = (val * base) + (c - '0');
191 c = *++cp;
192 } else if (base == 16 && isascii(c) && isxdigit(c)) {
193 val = (val << 4) |
194 (c + 10 - (islower(c) ? 'a' : 'A'));
195 c = *++cp;
196 } else
197 break;
198 }
199 if (c == '.') {
200 /*
201 * Internet format:
202 * a.b.c.d
203 * a.b.c (with c treated as 16 bits)
204 * a.b (with b treated as 24 bits)
205 */
206 if (pp >= parts + 3)
207 return (0);
208 *pp++ = val;
209 c = *++cp;
210 } else
211 break;
212 }
213 /*
214 * Check for trailing characters.
215 */
216 if (c != '\0' && (!isascii(c) || !isspace(c)))
217 return (0);
218 /*
219 * Concoct the address according to
220 * the number of parts specified.
221 */
222 n = pp - parts + 1;
223 switch (n) {
224
225 case 0:
226 return (0); /* initial nondigit */
227
228 case 1: /* a -- 32 bits */
229 break;
230
231 case 2: /* a.b -- 8.24 bits */
232 if ((val > 0xffffff) || (parts[0] > 0xff))
233 return (0);
234 val |= parts[0] << 24;
235 break;
236
237 case 3: /* a.b.c -- 8.8.16 bits */
238 if ((val > 0xffff) || (parts[0] > 0xff) || (parts[1] > 0xff))
239 return (0);
240 val |= (parts[0] << 24) | (parts[1] << 16);
241 break;
242
243 case 4: /* a.b.c.d -- 8.8.8.8 bits */
244 if ((val > 0xff) || (parts[0] > 0xff) || (parts[1] > 0xff) ||
245 (parts[2] > 0xff))
246 return (0);
247 val |= (parts[0] << 24) | (parts[1] << 16) | (parts[2] << 8);
248 break;
249 }
250 if (addr)
251 addr->s_addr = htonl(val);
252 return (1);
253 }
254
255 /*
256 * Internet address interpretation routine.
257 * All the network library routines call this
258 * routine to interpret entries in the data bases
259 * which are expected to be an address.
260 * The value returned is in network order.
261 */
262 in_addr_t
inet_addr(const char * cp)263 inet_addr(const char *cp)
264 {
265 struct in_addr val;
266
267 if (inet_aton(cp, &val))
268 return (val.s_addr);
269 return (INADDR_NONE);
270 }
271
272 /*
273 * Return the network number from an internet
274 * address; handles class a/b/c network #'s.
275 */
276 uint_t
inet_netof(struct in_addr in)277 inet_netof(struct in_addr in)
278 {
279 uint32_t i = ntohl(in.s_addr);
280
281 if (IN_CLASSA(i))
282 return ((i & IN_CLASSA_NET) >> IN_CLASSA_NSHIFT);
283 if (IN_CLASSB(i))
284 return ((i & IN_CLASSB_NET) >> IN_CLASSB_NSHIFT);
285 return ((i & IN_CLASSC_NET) >> IN_CLASSC_NSHIFT);
286 }
287