/[LeafOK_CVS]/pvpgn-1.7.4/src/compat/inet_aton.c
ViewVC logotype

Annotation of /pvpgn-1.7.4/src/compat/inet_aton.c

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.1.1.1 - (hide annotations) (vendor branch)
Tue Jun 6 03:41:38 2006 UTC (19 years, 9 months ago) by sysadm
Branch: GNU, MAIN
CVS Tags: arelease, HEAD
Changes since 1.1: +0 -0 lines
Content type: text/x-csrc
no message

1 sysadm 1.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     #include "common/setup_before.h"
56     #ifndef HAVE_INET_ATON
57    
58     #if defined(LIBC_SCCS) && !defined(lint)
59     static char sccsid[] = "@(#)inet_addr.c 8.1 (Berkeley) 6/17/93";
60     static char rcsid[] = "$Id: inet_aton.c,v 1.1.1.1 2002/12/27 08:45:08 dizzy Exp $";
61     #endif /* LIBC_SCCS and not lint */
62    
63     #include <ctype.h>
64     #ifdef HAVE_SYS_TYPES_H
65     # include <sys/types.h>
66     #endif
67     #ifdef HAVE_SYS_PARAM_H
68     # include <sys/param.h>
69     #endif
70     #ifdef HAVE_NETINET_IN_H
71     # include <netinet/in.h>
72     #endif
73     #ifdef HAVE_ARPA_INET_H
74     # include <arpa/inet.h>
75     #endif
76     #include "compat/socket.h" /* for Win32 address types, maybe there should be compat/netinet_in.h */
77     #include "inet_aton.h"
78     #include "common/setup_after.h"
79    
80    
81     /*
82     * Check whether "cp" is a valid ASCII representation
83     * of an Internet address and convert to a binary address.
84     * Returns 1 if the address is valid, 0 if not.
85     * This replaces inet_addr, the return value from which
86     * cannot distinguish between failure and a local wildcard address.
87     * Only handles IPv4.
88     * Assumes 32-bit ints.
89     */
90     extern int inet_aton(char const * cp, struct in_addr * addr)
91     {
92     unsigned int val;
93     int base, n;
94     char c;
95     unsigned int parts[4];
96     unsigned int *pp = parts;
97    
98     c = *cp;
99     for (;;) {
100     /*
101     * Collect number up to ``.''.
102     * Values are specified as for C:
103     * 0x=hex, 0=octal, isdigit=decimal.
104     */
105     if (!isdigit((int)c))
106     return (0);
107     val = 0; base = 10;
108     if (c == '0') {
109     c = *++cp;
110     if (c == 'x' || c == 'X')
111     base = 16, c = *++cp;
112     else
113     base = 8;
114     }
115     for (;;) {
116     if (isascii((int)c) && isdigit((int)c)) {
117     val = (val * base) + (c - '0');
118     c = *++cp;
119     } else if (base == 16 && isascii((int)c) && isxdigit((int)c)) {
120     val = (val << 4) |
121     (c + 10 - (islower((int)c) ? 'a' : 'A'));
122     c = *++cp;
123     } else
124     break;
125     }
126     if (c == '.') {
127     /*
128     * Internet format:
129     * a.b.c.d
130     * a.b.c (with c treated as 16 bits)
131     * a.b (with b treated as 24 bits)
132     */
133     if (pp >= parts + 3)
134     return (0);
135     *pp++ = val;
136     c = *++cp;
137     } else
138     break;
139     }
140     /*
141     * Check for trailing characters.
142     */
143     if (c != '\0' && (!isascii((int)c) || !isspace((int)c)))
144     return (0);
145     /*
146     * Concoct the address according to
147     * the number of parts specified.
148     */
149     n = pp - parts + 1;
150     switch (n) {
151    
152     case 0:
153     return (0); /* initial nondigit */
154    
155     case 1: /* a -- 32 bits */
156     break;
157    
158     case 2: /* a.b -- 8.24 bits */
159     if (val > 0xffffff)
160     return (0);
161     val |= parts[0] << 24;
162     break;
163    
164     case 3: /* a.b.c -- 8.8.16 bits */
165     if (val > 0xffff)
166     return (0);
167     val |= (parts[0] << 24) | (parts[1] << 16);
168     break;
169    
170     case 4: /* a.b.c.d -- 8.8.8.8 bits */
171     if (val > 0xff)
172     return (0);
173     val |= (parts[0] << 24) | (parts[1] << 16) | (parts[2] << 8);
174     break;
175     }
176     if (addr)
177     addr->s_addr = htonl(val);
178     return (1);
179     }
180    
181     #else
182     typedef int filenotempty; /* make ISO standard happy */
183     #endif

webmaster@leafok.com
ViewVC Help
Powered by ViewVC 1.3.0-beta1