]>
Commit | Line | Data |
---|---|---|
d7ce7006 | 1 | /* Copyright (c) 1996 by Internet Software Consortium.\r |
2 | *\r | |
3 | * Permission to use, copy, modify, and distribute this software for any\r | |
4 | * purpose with or without fee is hereby granted, provided that the above\r | |
5 | * copyright notice and this permission notice appear in all copies.\r | |
6 | *\r | |
7 | * THE SOFTWARE IS PROVIDED "AS IS" AND INTERNET SOFTWARE CONSORTIUM DISCLAIMS\r | |
8 | * ALL WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES\r | |
9 | * OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL INTERNET SOFTWARE\r | |
10 | * CONSORTIUM BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL\r | |
11 | * DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR\r | |
12 | * PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS\r | |
13 | * ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS\r | |
14 | * SOFTWARE.\r | |
15 | */\r | |
16 | \r | |
17 | /*\r | |
18 | * Portions copyright (c) 1999, 2000\r | |
19 | * Intel Corporation.\r | |
20 | * All rights reserved.\r | |
21 | * \r | |
22 | * Redistribution and use in source and binary forms, with or without\r | |
23 | * modification, are permitted provided that the following conditions\r | |
24 | * are met:\r | |
25 | * \r | |
26 | * 1. Redistributions of source code must retain the above copyright\r | |
27 | * notice, this list of conditions and the following disclaimer.\r | |
28 | * \r | |
29 | * 2. Redistributions in binary form must reproduce the above copyright\r | |
30 | * notice, this list of conditions and the following disclaimer in the\r | |
31 | * documentation and/or other materials provided with the distribution.\r | |
32 | * \r | |
33 | * 3. All advertising materials mentioning features or use of this software\r | |
34 | * must display the following acknowledgement:\r | |
35 | * \r | |
36 | * This product includes software developed by Intel Corporation and\r | |
37 | * its contributors.\r | |
38 | * \r | |
39 | * 4. Neither the name of Intel Corporation or its contributors may be\r | |
40 | * used to endorse or promote products derived from this software\r | |
41 | * without specific prior written permission.\r | |
42 | * \r | |
43 | * THIS SOFTWARE IS PROVIDED BY INTEL CORPORATION AND CONTRIBUTORS ``AS IS''\r | |
44 | * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE\r | |
45 | * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE\r | |
46 | * ARE DISCLAIMED. IN NO EVENT SHALL INTEL CORPORATION OR CONTRIBUTORS BE\r | |
47 | * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR\r | |
48 | * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF\r | |
49 | * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS\r | |
50 | * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN\r | |
51 | * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)\r | |
52 | * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF\r | |
53 | * THE POSSIBILITY OF SUCH DAMAGE.\r | |
54 | * \r | |
55 | */\r | |
56 | \r | |
57 | #if defined(LIBC_SCCS) && !defined(lint)\r | |
58 | static char rcsid[] = "$Id: inet_pton.c,v 1.1.1.1 2003/11/19 01:51:30 kyu3 Exp $";\r | |
59 | #endif /* LIBC_SCCS and not lint */\r | |
60 | \r | |
61 | #include <sys/param.h>\r | |
62 | #include <sys/types.h>\r | |
63 | #include <sys/socket.h>\r | |
64 | #include <netinet/in.h>\r | |
65 | #include <arpa/inet.h>\r | |
66 | #include <arpa/nameser.h>\r | |
67 | #include <string.h>\r | |
68 | #include <errno.h>\r | |
69 | \r | |
70 | /*\r | |
71 | * WARNING: Don't even consider trying to compile this on a system where\r | |
72 | * sizeof(int) < 4. sizeof(int) > 4 is fine; all the world's not a VAX.\r | |
73 | */\r | |
74 | \r | |
75 | static int inet_pton4 (const char *src, u_char *dst);\r | |
76 | static int inet_pton6 (const char *src, u_char *dst);\r | |
77 | \r | |
78 | /* int\r | |
79 | * inet_pton(af, src, dst)\r | |
80 | * convert from presentation format (which usually means ASCII printable)\r | |
81 | * to network format (which is usually some kind of binary format).\r | |
82 | * return:\r | |
83 | * 1 if the address was valid for the specified address family\r | |
84 | * 0 if the address wasn't valid (`dst' is untouched in this case)\r | |
85 | * -1 if some other error occurred (`dst' is untouched in this case, too)\r | |
86 | * author:\r | |
87 | * Paul Vixie, 1996.\r | |
88 | */\r | |
89 | int\r | |
90 | inet_pton(\r | |
91 | int af,\r | |
92 | const char *src,\r | |
93 | void *dst\r | |
94 | )\r | |
95 | {\r | |
96 | switch (af) {\r | |
97 | case AF_INET:\r | |
98 | return (inet_pton4(src, dst));\r | |
99 | case AF_INET6:\r | |
100 | return (inet_pton6(src, dst));\r | |
101 | default:\r | |
102 | errno = EAFNOSUPPORT;\r | |
103 | return (-1);\r | |
104 | }\r | |
105 | /* NOTREACHED */\r | |
106 | }\r | |
107 | \r | |
108 | /* int\r | |
109 | * inet_pton4(src, dst)\r | |
110 | * like inet_aton() but without all the hexadecimal and shorthand.\r | |
111 | * return:\r | |
112 | * 1 if `src' is a valid dotted quad, else 0.\r | |
113 | * notice:\r | |
114 | * does not touch `dst' unless it's returning 1.\r | |
115 | * author:\r | |
116 | * Paul Vixie, 1996.\r | |
117 | */\r | |
118 | static int\r | |
119 | inet_pton4(\r | |
120 | const char *src,\r | |
121 | u_char *dst\r | |
122 | )\r | |
123 | {\r | |
124 | static const char digits[] = "0123456789";\r | |
125 | int saw_digit, octets, ch;\r | |
126 | u_char tmp[NS_INADDRSZ], *tp;\r | |
127 | \r | |
128 | saw_digit = 0;\r | |
129 | octets = 0;\r | |
130 | *(tp = tmp) = 0;\r | |
131 | while ((ch = *src++) != '\0') {\r | |
132 | const char *pch;\r | |
133 | \r | |
134 | if ((pch = strchr(digits, ch)) != NULL) {\r | |
135 | u_int new = *tp * 10 + (u_int)(pch - digits);\r | |
136 | \r | |
137 | if (new > 255)\r | |
138 | return (0);\r | |
139 | *tp = (u_char)new;\r | |
140 | if (! saw_digit) {\r | |
141 | if (++octets > 4)\r | |
142 | return (0);\r | |
143 | saw_digit = 1;\r | |
144 | }\r | |
145 | } else if (ch == '.' && saw_digit) {\r | |
146 | if (octets == 4)\r | |
147 | return (0);\r | |
148 | *++tp = 0;\r | |
149 | saw_digit = 0;\r | |
150 | } else\r | |
151 | return (0);\r | |
152 | }\r | |
153 | if (octets < 4)\r | |
154 | return (0);\r | |
155 | \r | |
156 | memcpy(dst, tmp, NS_INADDRSZ);\r | |
157 | return (1);\r | |
158 | }\r | |
159 | \r | |
160 | /* int\r | |
161 | * inet_pton6(src, dst)\r | |
162 | * convert presentation level address to network order binary form.\r | |
163 | * return:\r | |
164 | * 1 if `src' is a valid [RFC1884 2.2] address, else 0.\r | |
165 | * notice:\r | |
166 | * (1) does not touch `dst' unless it's returning 1.\r | |
167 | * (2) :: in a full address is silently ignored.\r | |
168 | * credit:\r | |
169 | * inspired by Mark Andrews.\r | |
170 | * author:\r | |
171 | * Paul Vixie, 1996.\r | |
172 | */\r | |
173 | static int\r | |
174 | inet_pton6(\r | |
175 | const char *src,\r | |
176 | u_char *dst\r | |
177 | )\r | |
178 | {\r | |
179 | static const char xdigits_l[] = "0123456789abcdef",\r | |
180 | xdigits_u[] = "0123456789ABCDEF";\r | |
181 | u_char tmp[NS_IN6ADDRSZ], *tp, *endp, *colonp;\r | |
182 | const char *xdigits, *curtok;\r | |
183 | int ch, saw_xdigit;\r | |
184 | u_int val;\r | |
185 | \r | |
186 | memset((tp = tmp), '\0', NS_IN6ADDRSZ);\r | |
187 | endp = tp + NS_IN6ADDRSZ;\r | |
188 | colonp = NULL;\r | |
189 | /* Leading :: requires some special handling. */\r | |
190 | if (*src == ':')\r | |
191 | if (*++src != ':')\r | |
192 | return (0);\r | |
193 | curtok = src;\r | |
194 | saw_xdigit = 0;\r | |
195 | val = 0;\r | |
196 | while ((ch = *src++) != '\0') {\r | |
197 | const char *pch;\r | |
198 | \r | |
199 | if ((pch = strchr((xdigits = xdigits_l), ch)) == NULL)\r | |
200 | pch = strchr((xdigits = xdigits_u), ch);\r | |
201 | if (pch != NULL) {\r | |
202 | val <<= 4;\r | |
203 | val |= (pch - xdigits);\r | |
204 | if (val > 0xffff)\r | |
205 | return (0);\r | |
206 | saw_xdigit = 1;\r | |
207 | continue;\r | |
208 | }\r | |
209 | if (ch == ':') {\r | |
210 | curtok = src;\r | |
211 | if (!saw_xdigit) {\r | |
212 | if (colonp)\r | |
213 | return (0);\r | |
214 | colonp = tp;\r | |
215 | continue;\r | |
216 | }\r | |
217 | if (tp + NS_INT16SZ > endp)\r | |
218 | return (0);\r | |
219 | *tp++ = (u_char) (val >> 8) & 0xff;\r | |
220 | *tp++ = (u_char) val & 0xff;\r | |
221 | saw_xdigit = 0;\r | |
222 | val = 0;\r | |
223 | continue;\r | |
224 | }\r | |
225 | if (ch == '.' && ((tp + NS_INADDRSZ) <= endp) &&\r | |
226 | inet_pton4(curtok, tp) > 0) {\r | |
227 | tp += NS_INADDRSZ;\r | |
228 | saw_xdigit = 0;\r | |
229 | break; /* '\0' was seen by inet_pton4(). */\r | |
230 | }\r | |
231 | return (0);\r | |
232 | }\r | |
233 | if (saw_xdigit) {\r | |
234 | if (tp + NS_INT16SZ > endp)\r | |
235 | return (0);\r | |
236 | *tp++ = (u_char) (val >> 8) & 0xff;\r | |
237 | *tp++ = (u_char) val & 0xff;\r | |
238 | }\r | |
239 | if (colonp != NULL) {\r | |
240 | /*\r | |
241 | * Since some memmove()'s erroneously fail to handle\r | |
242 | * overlapping regions, we'll do the shift by hand.\r | |
243 | */\r | |
244 | const int n = (int)(tp - colonp);\r | |
245 | int i;\r | |
246 | \r | |
247 | for (i = 1; i <= n; i++) {\r | |
248 | endp[- i] = colonp[n - i];\r | |
249 | colonp[n - i] = 0;\r | |
250 | }\r | |
251 | tp = endp;\r | |
252 | }\r | |
253 | if (tp != endp)\r | |
254 | return (0);\r | |
255 | memcpy(dst, tmp, NS_IN6ADDRSZ);\r | |
256 | return (1);\r | |
257 | }\r |