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