1 /* $NetBSD: inet_addr.c,v 1.1.1.1 2009/04/12 15:33:34 christos Exp $ */ 2 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 36 /* 37 * Portions Copyright (c) 1993 by Digital Equipment Corporation. 38 * 39 * Permission to use, copy, modify, and distribute this software for any 40 * purpose with or without fee is hereby granted, provided that the above 41 * copyright notice and this permission notice appear in all copies, and that 42 * the name of Digital Equipment Corporation not be used in advertising or 43 * publicity pertaining to distribution of the document or software without 44 * specific, written prior permission. 45 * 46 * THE SOFTWARE IS PROVIDED "AS IS" AND DIGITAL EQUIPMENT CORP. DISCLAIMS ALL 47 * WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES 48 * OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL DIGITAL EQUIPMENT 49 * CORPORATION BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL 50 * DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR 51 * PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS 52 * ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS 53 * SOFTWARE. 54 */ 55 56 /* 57 * Copyright (c) 2004 by Internet Systems Consortium, Inc. ("ISC") 58 * Portions Copyright (c) 1996-1999 by Internet Software Consortium. 59 * 60 * Permission to use, copy, modify, and distribute this software for any 61 * purpose with or without fee is hereby granted, provided that the above 62 * copyright notice and this permission notice appear in all copies. 63 * 64 * THE SOFTWARE IS PROVIDED "AS IS" AND ISC DISCLAIMS ALL WARRANTIES 65 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF 66 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL ISC BE LIABLE FOR 67 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES 68 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN 69 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT 70 * OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. 71 */ 72 73 #if defined(LIBC_SCCS) && !defined(lint) 74 static const char sccsid[] = "@(#)inet_addr.c 8.1 (Berkeley) 6/17/93"; 75 static const char rcsid[] = "Id: inet_addr.c,v 1.5 2005/04/27 04:56:19 sra Exp"; 76 #endif /* LIBC_SCCS and not lint */ 77 78 #include "port_before.h" 79 80 #include <sys/types.h> 81 #include <sys/param.h> 82 83 #include <netinet/in.h> 84 #include <arpa/inet.h> 85 86 #include <ctype.h> 87 88 #include "port_after.h" 89 90 /*% 91 * Ascii internet address interpretation routine. 92 * The value returned is in network order. 93 */ 94 u_long 95 inet_addr(const char *cp) { 96 struct in_addr val; 97 98 if (inet_aton(cp, &val)) 99 return (val.s_addr); 100 return (INADDR_NONE); 101 } 102 103 /*% 104 * Check whether "cp" is a valid ascii representation 105 * of an Internet address and convert to a binary address. 106 * Returns 1 if the address is valid, 0 if not. 107 * This replaces inet_addr, the return value from which 108 * cannot distinguish between failure and a local broadcast address. 109 */ 110 int 111 inet_aton(const char *cp, struct in_addr *addr) { 112 u_long val; 113 int base, n; 114 char c; 115 u_int8_t parts[4]; 116 u_int8_t *pp = parts; 117 int digit; 118 119 c = *cp; 120 for (;;) { 121 /* 122 * Collect number up to ``.''. 123 * Values are specified as for C: 124 * 0x=hex, 0=octal, isdigit=decimal. 125 */ 126 if (!isdigit((unsigned char)c)) 127 return (0); 128 val = 0; base = 10; digit = 0; 129 if (c == '0') { 130 c = *++cp; 131 if (c == 'x' || c == 'X') 132 base = 16, c = *++cp; 133 else { 134 base = 8; 135 digit = 1 ; 136 } 137 } 138 for (;;) { 139 if (isascii(c) && isdigit((unsigned char)c)) { 140 if (base == 8 && (c == '8' || c == '9')) 141 return (0); 142 val = (val * base) + (c - '0'); 143 c = *++cp; 144 digit = 1; 145 } else if (base == 16 && isascii(c) && 146 isxdigit((unsigned char)c)) { 147 val = (val << 4) | 148 (c + 10 - (islower((unsigned char)c) ? 'a' : 'A')); 149 c = *++cp; 150 digit = 1; 151 } else 152 break; 153 } 154 if (c == '.') { 155 /* 156 * Internet format: 157 * a.b.c.d 158 * a.b.c (with c treated as 16 bits) 159 * a.b (with b treated as 24 bits) 160 */ 161 if (pp >= parts + 3 || val > 0xffU) 162 return (0); 163 *pp++ = val; 164 c = *++cp; 165 } else 166 break; 167 } 168 /* 169 * Check for trailing characters. 170 */ 171 if (c != '\0' && (!isascii(c) || !isspace((unsigned char)c))) 172 return (0); 173 /* 174 * Did we get a valid digit? 175 */ 176 if (!digit) 177 return (0); 178 /* 179 * Concoct the address according to 180 * the number of parts specified. 181 */ 182 n = pp - parts + 1; 183 switch (n) { 184 case 1: /*%< a -- 32 bits */ 185 break; 186 187 case 2: /*%< a.b -- 8.24 bits */ 188 if (val > 0xffffffU) 189 return (0); 190 val |= parts[0] << 24; 191 break; 192 193 case 3: /*%< a.b.c -- 8.8.16 bits */ 194 if (val > 0xffffU) 195 return (0); 196 val |= (parts[0] << 24) | (parts[1] << 16); 197 break; 198 199 case 4: /*%< a.b.c.d -- 8.8.8.8 bits */ 200 if (val > 0xffU) 201 return (0); 202 val |= (parts[0] << 24) | (parts[1] << 16) | (parts[2] << 8); 203 break; 204 } 205 if (addr != NULL) 206 addr->s_addr = htonl(val); 207 return (1); 208 } 209 210 /*! \file */ 211