blob: 37c8f43145cb523e04b2caeaac198e6e4a74848c
1 | /* vi: set sw=4 ts=4: */ |
2 | /* |
3 | * Licensed under GPLv2 or later, see file LICENSE in this source tree. |
4 | * |
5 | * Authors: Alexey Kuznetsov, <kuznet@ms2.inr.ac.ru> |
6 | * |
7 | * Changes: |
8 | * |
9 | * Rani Assaf <rani@magic.metawire.com> 980929: resolve addresses |
10 | */ |
11 | |
12 | #include "libbb.h" |
13 | #include "utils.h" |
14 | #include "inet_common.h" |
15 | |
16 | unsigned get_unsigned(char *arg, const char *errmsg) |
17 | { |
18 | unsigned long res; |
19 | char *ptr; |
20 | |
21 | if (*arg) { |
22 | res = strtoul(arg, &ptr, 0); |
23 | //FIXME: "" will be accepted too, is it correct?! |
24 | if (!*ptr && res <= UINT_MAX) { |
25 | return res; |
26 | } |
27 | } |
28 | invarg(arg, errmsg); /* does not return */ |
29 | } |
30 | |
31 | uint32_t get_u32(char *arg, const char *errmsg) |
32 | { |
33 | unsigned long res; |
34 | char *ptr; |
35 | |
36 | if (*arg) { |
37 | res = strtoul(arg, &ptr, 0); |
38 | //FIXME: "" will be accepted too, is it correct?! |
39 | if (!*ptr && res <= 0xFFFFFFFFUL) { |
40 | return res; |
41 | } |
42 | } |
43 | invarg(arg, errmsg); /* does not return */ |
44 | } |
45 | |
46 | uint16_t get_u16(char *arg, const char *errmsg) |
47 | { |
48 | unsigned long res; |
49 | char *ptr; |
50 | |
51 | if (*arg) { |
52 | res = strtoul(arg, &ptr, 0); |
53 | //FIXME: "" will be accepted too, is it correct?! |
54 | if (!*ptr && res <= 0xFFFF) { |
55 | return res; |
56 | } |
57 | } |
58 | invarg(arg, errmsg); /* does not return */ |
59 | } |
60 | |
61 | int get_addr_1(inet_prefix *addr, char *name, int family) |
62 | { |
63 | memset(addr, 0, sizeof(*addr)); |
64 | |
65 | if (strcmp(name, "default") == 0 |
66 | || strcmp(name, "all") == 0 |
67 | || strcmp(name, "any") == 0 |
68 | ) { |
69 | addr->family = family; |
70 | addr->bytelen = (family == AF_INET6 ? 16 : 4); |
71 | addr->bitlen = -1; |
72 | return 0; |
73 | } |
74 | |
75 | if (strchr(name, ':')) { |
76 | addr->family = AF_INET6; |
77 | if (family != AF_UNSPEC && family != AF_INET6) |
78 | return -1; |
79 | if (inet_pton(AF_INET6, name, addr->data) <= 0) |
80 | return -1; |
81 | addr->bytelen = 16; |
82 | addr->bitlen = -1; |
83 | return 0; |
84 | } |
85 | |
86 | if (family != AF_UNSPEC && family != AF_INET) |
87 | return -1; |
88 | |
89 | /* Try to parse it as IPv4 */ |
90 | addr->family = AF_INET; |
91 | #if 0 /* Doesn't handle e.g. "10.10", for example, "ip r l root 10.10/16" */ |
92 | if (inet_pton(AF_INET, name, addr->data) <= 0) |
93 | return -1; |
94 | #else |
95 | { |
96 | unsigned i = 0; |
97 | unsigned n = 0; |
98 | const char *cp = name - 1; |
99 | while (*++cp) { |
100 | if ((unsigned char)(*cp - '0') <= 9) { |
101 | n = 10 * n + (unsigned char)(*cp - '0'); |
102 | if (n >= 256) |
103 | return -1; |
104 | ((uint8_t*)addr->data)[i] = n; |
105 | continue; |
106 | } |
107 | if (*cp == '.' && ++i <= 3) { |
108 | n = 0; |
109 | continue; |
110 | } |
111 | return -1; |
112 | } |
113 | } |
114 | #endif |
115 | addr->bytelen = 4; |
116 | addr->bitlen = -1; |
117 | |
118 | return 0; |
119 | } |
120 | |
121 | static void get_prefix_1(inet_prefix *dst, char *arg, int family) |
122 | { |
123 | char *slash; |
124 | |
125 | memset(dst, 0, sizeof(*dst)); |
126 | |
127 | if (strcmp(arg, "default") == 0 |
128 | || strcmp(arg, "all") == 0 |
129 | || strcmp(arg, "any") == 0 |
130 | ) { |
131 | dst->family = family; |
132 | /*dst->bytelen = 0; - done by memset */ |
133 | /*dst->bitlen = 0;*/ |
134 | return; |
135 | } |
136 | |
137 | slash = strchr(arg, '/'); |
138 | if (slash) |
139 | *slash = '\0'; |
140 | |
141 | if (get_addr_1(dst, arg, family) == 0) { |
142 | dst->bitlen = (dst->family == AF_INET6) ? 128 : 32; |
143 | if (slash) { |
144 | unsigned plen; |
145 | inet_prefix netmask_pfx; |
146 | |
147 | netmask_pfx.family = AF_UNSPEC; |
148 | plen = bb_strtou(slash + 1, NULL, 0); |
149 | if ((errno || plen > (unsigned) dst->bitlen) |
150 | && get_addr_1(&netmask_pfx, slash + 1, family) != 0 |
151 | ) { |
152 | goto bad; |
153 | } |
154 | if (netmask_pfx.family == AF_INET) { |
155 | /* fill in prefix length of dotted quad */ |
156 | uint32_t mask = ntohl(netmask_pfx.data[0]); |
157 | uint32_t host = ~mask; |
158 | |
159 | /* a valid netmask must be 2^n - 1 */ |
160 | if (host & (host + 1)) |
161 | goto bad; |
162 | |
163 | for (plen = 0; mask; mask <<= 1) |
164 | ++plen; |
165 | if (plen > (unsigned) dst->bitlen) |
166 | goto bad; |
167 | /* dst->flags |= PREFIXLEN_SPECIFIED; */ |
168 | } |
169 | dst->bitlen = plen; |
170 | } |
171 | } |
172 | |
173 | if (slash) |
174 | *slash = '/'; |
175 | return; |
176 | bad: |
177 | bb_error_msg_and_die("an %s %s is expected rather than \"%s\"", "inet", "prefix", arg); |
178 | } |
179 | |
180 | int get_addr(inet_prefix *dst, char *arg, int family) |
181 | { |
182 | if (family == AF_PACKET) { |
183 | bb_error_msg_and_die("\"%s\" may be inet %s, but it is not allowed in this context", arg, "address"); |
184 | } |
185 | if (get_addr_1(dst, arg, family)) { |
186 | bb_error_msg_and_die("an %s %s is expected rather than \"%s\"", "inet", "address", arg); |
187 | } |
188 | return 0; |
189 | } |
190 | |
191 | void get_prefix(inet_prefix *dst, char *arg, int family) |
192 | { |
193 | if (family == AF_PACKET) { |
194 | bb_error_msg_and_die("\"%s\" may be inet %s, but it is not allowed in this context", arg, "prefix"); |
195 | } |
196 | get_prefix_1(dst, arg, family); |
197 | } |
198 | |
199 | uint32_t get_addr32(char *name) |
200 | { |
201 | inet_prefix addr; |
202 | |
203 | if (get_addr_1(&addr, name, AF_INET)) { |
204 | bb_error_msg_and_die("an %s %s is expected rather than \"%s\"", "IP", "address", name); |
205 | } |
206 | return addr.data[0]; |
207 | } |
208 | |
209 | void incomplete_command(void) |
210 | { |
211 | bb_error_msg_and_die("command line is not complete, try option \"help\""); |
212 | } |
213 | |
214 | void invarg(const char *arg, const char *opt) |
215 | { |
216 | bb_error_msg_and_die(bb_msg_invalid_arg, arg, opt); |
217 | } |
218 | |
219 | void duparg(const char *key, const char *arg) |
220 | { |
221 | bb_error_msg_and_die("duplicate \"%s\": \"%s\" is the second value", key, arg); |
222 | } |
223 | |
224 | void duparg2(const char *key, const char *arg) |
225 | { |
226 | bb_error_msg_and_die("either \"%s\" is duplicate, or \"%s\" is garbage", key, arg); |
227 | } |
228 | |
229 | int inet_addr_match(const inet_prefix *a, const inet_prefix *b, int bits) |
230 | { |
231 | const uint32_t *a1 = a->data; |
232 | const uint32_t *a2 = b->data; |
233 | int words = bits >> 5; |
234 | |
235 | bits &= 0x1f; |
236 | |
237 | if (words) |
238 | if (memcmp(a1, a2, words << 2)) |
239 | return -1; |
240 | |
241 | if (bits) { |
242 | uint32_t w1, w2; |
243 | uint32_t mask; |
244 | |
245 | w1 = a1[words]; |
246 | w2 = a2[words]; |
247 | |
248 | mask = htonl((0xffffffff) << (0x20 - bits)); |
249 | |
250 | if ((w1 ^ w2) & mask) |
251 | return 1; |
252 | } |
253 | |
254 | return 0; |
255 | } |
256 | |
257 | const char *rt_addr_n2a(int af, |
258 | void *addr, char *buf, int buflen) |
259 | { |
260 | switch (af) { |
261 | case AF_INET: |
262 | case AF_INET6: |
263 | return inet_ntop(af, addr, buf, buflen); |
264 | default: |
265 | return "???"; |
266 | } |
267 | } |
268 | |
269 | #ifdef RESOLVE_HOSTNAMES |
270 | const char *format_host(int af, int len, void *addr, char *buf, int buflen) |
271 | { |
272 | if (resolve_hosts) { |
273 | struct hostent *h_ent; |
274 | |
275 | if (len <= 0) { |
276 | switch (af) { |
277 | case AF_INET: |
278 | len = 4; |
279 | break; |
280 | case AF_INET6: |
281 | len = 16; |
282 | break; |
283 | default:; |
284 | } |
285 | } |
286 | if (len > 0) { |
287 | h_ent = gethostbyaddr(addr, len, af); |
288 | if (h_ent != NULL) { |
289 | safe_strncpy(buf, h_ent->h_name, buflen); |
290 | return buf; |
291 | } |
292 | } |
293 | } |
294 | return rt_addr_n2a(af, addr, buf, buflen); |
295 | } |
296 | #endif |
297 |