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.4 2002/02/21 09:25:42 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 int inet_aton __P((const char *, struct in_addr *)); 74 75 /* 76 * Check whether "cp" is a valid ascii representation 77 * of an Internet address and convert to a binary address. 78 * Returns 1 if the address is valid, 0 if not. 79 * This replaces inet_addr, the return value from which 80 * cannot distinguish between failure and a local broadcast address. 81 */ 82 int 83 inet_aton(cp, addr) 84 register const char *cp; 85 struct in_addr *addr; 86 { 87 register u_long val; 88 register int base, n; 89 register char c; 90 u_int parts[4]; 91 register u_int *pp = parts; 92 93 c = *cp; 94 for (;;) { 95 /* 96 * Collect number up to ``.''. 97 * Values are specified as for C: 98 * 0x=hex, 0=octal, isdigit=decimal. 99 */ 100 if (!isdigit(c)) 101 return (0); 102 val = 0; base = 10; 103 if (c == '0') { 104 c = *++cp; 105 if (c == 'x' || c == 'X') 106 base = 16, c = *++cp; 107 else 108 base = 8; 109 } 110 for (;;) { 111 if (isascii(c) && isdigit(c)) { 112 val = (val * base) + (c - '0'); 113 c = *++cp; 114 } else if (base == 16 && isascii(c) && isxdigit(c)) { 115 val = (val << 4) | 116 (c + 10 - (islower(c) ? 'a' : 'A')); 117 c = *++cp; 118 } else 119 break; 120 } 121 if (c == '.') { 122 /* 123 * Internet format: 124 * a.b.c.d 125 * a.b.c (with c treated as 16 bits) 126 * a.b (with b treated as 24 bits) 127 */ 128 if (pp >= parts + 3) 129 return (0); 130 *pp++ = val; 131 c = *++cp; 132 } else 133 break; 134 } 135 /* 136 * Check for trailing characters. 137 */ 138 if (c != '\0' && (!isascii(c) || !isspace(c))) 139 return (0); 140 /* 141 * Concoct the address according to 142 * the number of parts specified. 143 */ 144 n = pp - parts + 1; 145 switch (n) { 146 147 case 0: 148 return (0); /* initial nondigit */ 149 150 case 1: /* a -- 32 bits */ 151 break; 152 153 case 2: /* a.b -- 8.24 bits */ 154 if (val > 0xffffff) 155 return (0); 156 val |= parts[0] << 24; 157 break; 158 159 case 3: /* a.b.c -- 8.8.16 bits */ 160 if (val > 0xffff) 161 return (0); 162 val |= (parts[0] << 24) | (parts[1] << 16); 163 break; 164 165 case 4: /* a.b.c.d -- 8.8.8.8 bits */ 166 if (val > 0xff) 167 return (0); 168 val |= (parts[0] << 24) | (parts[1] << 16) | (parts[2] << 8); 169 break; 170 } 171 if (addr) 172 addr->s_addr = htonl(val); 173 return (1); 174 } 175 176 /* these are compatibility routines, not needed on recent BSD releases */ 177 178 /* 179 * Ascii internet address interpretation routine. 180 * The value returned is in network order. 181 */ 182 #if (defined(SOLARIS2) && (SOLARIS2 > 5)) || defined(__hpux) || \ 183 defined(__osf__) || (defined(IRIX) && (IRIX >= 605)) || \ 184 (defined(__FreeBSD__) && (__FreeBSD__ >= 4)) || \ 185 defined(__OpenBSD__) 186 in_addr_t 187 #else 188 u_long 189 #endif 190 inet_addr(cp) 191 register const char *cp; 192 { 193 struct in_addr val; 194 195 if (inet_aton(cp, &val)) 196 return (val.s_addr); 197 return (0xffffffff); 198 } 199