source: MondoRescue/branches/2.2.9/mindi-busybox/networking/libiproute/iproute.c@ 2887

Last change on this file since 2887 was 2725, checked in by Bruno Cornec, 13 years ago
  • Update mindi-busybox to 1.18.3 to avoid problems with the tar command which is now failing on recent versions with busybox 1.7.3
File size: 21.4 KB
RevLine 
[821]1/* vi: set sw=4 ts=4: */
2/*
[2725]3 * Licensed under GPLv2 or later, see file LICENSE in this source tree.
[821]4 *
[2725]5 * Authors: Alexey Kuznetsov, <kuznet@ms2.inr.ac.ru>
[821]6 *
7 * Changes:
8 *
[2725]9 * Rani Assaf <rani@magic.metawire.com> 980929: resolve addresses
[821]10 * Kunihiro Ishiguro <kunihiro@zebra.org> 001102: rtnh_ifindex was not initialized
11 */
12
[2725]13#include "ip_common.h" /* #include "libbb.h" is inside */
[821]14#include "rt_names.h"
15#include "utils.h"
16
17#ifndef RTAX_RTTVAR
18#define RTAX_RTTVAR RTAX_HOPS
19#endif
20
21
[2725]22struct filter_t {
[821]23 int tb;
[2725]24 smallint flushed;
[821]25 char *flushb;
26 int flushp;
27 int flushe;
28 struct rtnl_handle *rth;
[2725]29 //int protocol, protocolmask; - write-only fields?!
30 //int scope, scopemask; - unused
31 //int type; - read-only
32 //int typemask; - unused
33 //int tos, tosmask; - unused
[821]34 int iif, iifmask;
35 int oif, oifmask;
[2725]36 //int realm, realmmask; - unused
37 //inet_prefix rprefsrc; - read-only
[821]38 inet_prefix rvia;
39 inet_prefix rdst;
40 inet_prefix mdst;
41 inet_prefix rsrc;
42 inet_prefix msrc;
[2725]43} FIX_ALIASING;
44typedef struct filter_t filter_t;
[821]45
[2725]46#define G_filter (*(filter_t*)&bb_common_bufsiz1)
[1765]47
[821]48static int flush_update(void)
49{
[2725]50 if (rtnl_send(G_filter.rth, G_filter.flushb, G_filter.flushp) < 0) {
51 bb_perror_msg("can't send flush request");
[821]52 return -1;
53 }
[2725]54 G_filter.flushp = 0;
[821]55 return 0;
56}
57
[1765]58static unsigned get_hz(void)
59{
60 static unsigned hz_internal;
61 FILE *fp;
62
63 if (hz_internal)
64 return hz_internal;
65
[2725]66 fp = fopen_for_read("/proc/net/psched");
[1765]67 if (fp) {
68 unsigned nom, denom;
69
70 if (fscanf(fp, "%*08x%*08x%08x%08x", &nom, &denom) == 2)
71 if (nom == 1000000)
72 hz_internal = denom;
73 fclose(fp);
74 }
75 if (!hz_internal)
76 hz_internal = sysconf(_SC_CLK_TCK);
77 return hz_internal;
78}
79
[2725]80static int FAST_FUNC print_route(const struct sockaddr_nl *who UNUSED_PARAM,
81 struct nlmsghdr *n, void *arg UNUSED_PARAM)
[821]82{
83 struct rtmsg *r = NLMSG_DATA(n);
84 int len = n->nlmsg_len;
85 struct rtattr * tb[RTA_MAX+1];
86 char abuf[256];
87 inet_prefix dst;
88 inet_prefix src;
89 int host_len = -1;
90 SPRINT_BUF(b1);
91
92 if (n->nlmsg_type != RTM_NEWROUTE && n->nlmsg_type != RTM_DELROUTE) {
93 fprintf(stderr, "Not a route: %08x %08x %08x\n",
94 n->nlmsg_len, n->nlmsg_type, n->nlmsg_flags);
95 return 0;
96 }
[2725]97 if (G_filter.flushb && n->nlmsg_type != RTM_NEWROUTE)
[821]98 return 0;
99 len -= NLMSG_LENGTH(sizeof(*r));
[1765]100 if (len < 0)
101 bb_error_msg_and_die("wrong nlmsg len %d", len);
[821]102
103 if (r->rtm_family == AF_INET6)
104 host_len = 128;
105 else if (r->rtm_family == AF_INET)
106 host_len = 32;
107
108 if (r->rtm_family == AF_INET6) {
[2725]109 if (G_filter.tb) {
110 if (G_filter.tb < 0) {
111 if (!(r->rtm_flags & RTM_F_CLONED)) {
[821]112 return 0;
113 }
114 } else {
[2725]115 if (r->rtm_flags & RTM_F_CLONED) {
[821]116 return 0;
117 }
[2725]118 if (G_filter.tb == RT_TABLE_LOCAL) {
[821]119 if (r->rtm_type != RTN_LOCAL) {
120 return 0;
121 }
[2725]122 } else if (G_filter.tb == RT_TABLE_MAIN) {
[821]123 if (r->rtm_type == RTN_LOCAL) {
124 return 0;
125 }
126 } else {
127 return 0;
128 }
129 }
130 }
131 } else {
[2725]132 if (G_filter.tb > 0 && G_filter.tb != r->rtm_table) {
[821]133 return 0;
134 }
135 }
[2725]136 if (G_filter.rdst.family
137 && (r->rtm_family != G_filter.rdst.family || G_filter.rdst.bitlen > r->rtm_dst_len)
138 ) {
[821]139 return 0;
140 }
[2725]141 if (G_filter.mdst.family
142 && (r->rtm_family != G_filter.mdst.family
143 || (G_filter.mdst.bitlen >= 0 && G_filter.mdst.bitlen < r->rtm_dst_len)
144 )
145 ) {
[821]146 return 0;
147 }
[2725]148 if (G_filter.rsrc.family
149 && (r->rtm_family != G_filter.rsrc.family || G_filter.rsrc.bitlen > r->rtm_src_len)
150 ) {
[821]151 return 0;
152 }
[2725]153 if (G_filter.msrc.family
154 && (r->rtm_family != G_filter.msrc.family
155 || (G_filter.msrc.bitlen >= 0 && G_filter.msrc.bitlen < r->rtm_src_len)
156 )
157 ) {
[821]158 return 0;
159 }
160
161 memset(tb, 0, sizeof(tb));
162 parse_rtattr(tb, RTA_MAX, RTM_RTA(r), len);
163
[2725]164 if (G_filter.rdst.family
165 && inet_addr_match(&dst, &G_filter.rdst, G_filter.rdst.bitlen)
166 ) {
[821]167 return 0;
[2725]168 }
169 if (G_filter.mdst.family
170 && G_filter.mdst.bitlen >= 0
171 && inet_addr_match(&dst, &G_filter.mdst, r->rtm_dst_len)
172 ) {
[821]173 return 0;
[2725]174 }
175 if (G_filter.rsrc.family
176 && inet_addr_match(&src, &G_filter.rsrc, G_filter.rsrc.bitlen)
177 ) {
[821]178 return 0;
[2725]179 }
180 if (G_filter.msrc.family && G_filter.msrc.bitlen >= 0
181 && inet_addr_match(&src, &G_filter.msrc, r->rtm_src_len)
182 ) {
[821]183 return 0;
[2725]184 }
185 if (G_filter.flushb
186 && r->rtm_family == AF_INET6
187 && r->rtm_dst_len == 0
188 && r->rtm_type == RTN_UNREACHABLE
189 && tb[RTA_PRIORITY]
190 && *(int*)RTA_DATA(tb[RTA_PRIORITY]) == -1
191 ) {
[821]192 return 0;
[2725]193 }
[821]194
[2725]195 if (G_filter.flushb) {
[821]196 struct nlmsghdr *fn;
[2725]197 if (NLMSG_ALIGN(G_filter.flushp) + n->nlmsg_len > G_filter.flushe) {
[821]198 if (flush_update())
[1765]199 bb_error_msg_and_die("flush");
[821]200 }
[2725]201 fn = (struct nlmsghdr*)(G_filter.flushb + NLMSG_ALIGN(G_filter.flushp));
[821]202 memcpy(fn, n, n->nlmsg_len);
203 fn->nlmsg_type = RTM_DELROUTE;
204 fn->nlmsg_flags = NLM_F_REQUEST;
[2725]205 fn->nlmsg_seq = ++G_filter.rth->seq;
206 G_filter.flushp = (((char*)fn) + n->nlmsg_len) - G_filter.flushb;
207 G_filter.flushed = 1;
[821]208 return 0;
209 }
210
211 if (n->nlmsg_type == RTM_DELROUTE) {
[2725]212 printf("Deleted ");
[821]213 }
[2725]214 if (r->rtm_type != RTN_UNICAST /* && !G_filter.type - always 0 */) {
215 printf("%s ", rtnl_rtntype_n2a(r->rtm_type, b1));
[821]216 }
217
218 if (tb[RTA_DST]) {
219 if (r->rtm_dst_len != host_len) {
[2725]220 printf("%s/%u ", rt_addr_n2a(r->rtm_family,
221 RTA_DATA(tb[RTA_DST]),
222 abuf, sizeof(abuf)),
223 r->rtm_dst_len
224 );
[821]225 } else {
[2725]226 printf("%s ", format_host(r->rtm_family,
227 RTA_PAYLOAD(tb[RTA_DST]),
228 RTA_DATA(tb[RTA_DST]),
229 abuf, sizeof(abuf))
230 );
[821]231 }
232 } else if (r->rtm_dst_len) {
[2725]233 printf("0/%d ", r->rtm_dst_len);
[821]234 } else {
[2725]235 printf("default ");
[821]236 }
237 if (tb[RTA_SRC]) {
238 if (r->rtm_src_len != host_len) {
[2725]239 printf("from %s/%u ", rt_addr_n2a(r->rtm_family,
240 RTA_DATA(tb[RTA_SRC]),
241 abuf, sizeof(abuf)),
242 r->rtm_src_len
243 );
[821]244 } else {
[2725]245 printf("from %s ", format_host(r->rtm_family,
246 RTA_PAYLOAD(tb[RTA_SRC]),
247 RTA_DATA(tb[RTA_SRC]),
248 abuf, sizeof(abuf))
249 );
[821]250 }
251 } else if (r->rtm_src_len) {
[2725]252 printf("from 0/%u ", r->rtm_src_len);
[821]253 }
[2725]254 if (tb[RTA_GATEWAY] && G_filter.rvia.bitlen != host_len) {
255 printf("via %s ", format_host(r->rtm_family,
256 RTA_PAYLOAD(tb[RTA_GATEWAY]),
257 RTA_DATA(tb[RTA_GATEWAY]),
258 abuf, sizeof(abuf)));
[821]259 }
[2725]260 if (tb[RTA_OIF] && G_filter.oifmask != -1) {
261 printf("dev %s ", ll_index_to_name(*(int*)RTA_DATA(tb[RTA_OIF])));
[821]262 }
263
[2725]264 if (tb[RTA_PREFSRC] && /*G_filter.rprefsrc.bitlen - always 0*/ 0 != host_len) {
[821]265 /* Do not use format_host(). It is our local addr
266 and symbolic name will not be useful.
267 */
[2725]268 printf(" src %s ", rt_addr_n2a(r->rtm_family,
269 RTA_DATA(tb[RTA_PREFSRC]),
270 abuf, sizeof(abuf)));
[821]271 }
272 if (tb[RTA_PRIORITY]) {
[2725]273 printf(" metric %d ", *(uint32_t*)RTA_DATA(tb[RTA_PRIORITY]));
[821]274 }
275 if (r->rtm_family == AF_INET6) {
276 struct rta_cacheinfo *ci = NULL;
277 if (tb[RTA_CACHEINFO]) {
278 ci = RTA_DATA(tb[RTA_CACHEINFO]);
279 }
280 if ((r->rtm_flags & RTM_F_CLONED) || (ci && ci->rta_expires)) {
281 if (r->rtm_flags & RTM_F_CLONED) {
[2725]282 printf("%c cache ", _SL_);
[821]283 }
284 if (ci->rta_expires) {
[2725]285 printf(" expires %dsec", ci->rta_expires / get_hz());
[821]286 }
287 if (ci->rta_error != 0) {
[2725]288 printf(" error %d", ci->rta_error);
[821]289 }
290 } else if (ci) {
291 if (ci->rta_error != 0)
[2725]292 printf(" error %d", ci->rta_error);
[821]293 }
294 }
[2725]295 if (tb[RTA_IIF] && G_filter.iifmask != -1) {
296 printf(" iif %s", ll_index_to_name(*(int*)RTA_DATA(tb[RTA_IIF])));
[821]297 }
[2725]298 bb_putchar('\n');
[821]299 return 0;
300}
301
[1765]302/* Return value becomes exitcode. It's okay to not return at all */
[2725]303static int iproute_modify(int cmd, unsigned flags, char **argv)
[821]304{
[1765]305 static const char keywords[] ALIGN1 =
[2725]306 "src\0""via\0""mtu\0""lock\0""protocol\0"IF_FEATURE_IP_RULE("table\0")
307 "dev\0""oif\0""to\0""metric\0";
[1765]308 enum {
309 ARG_src,
310 ARG_via,
311 ARG_mtu, PARM_lock,
312 ARG_protocol,
[2725]313IF_FEATURE_IP_RULE(ARG_table,)
[1765]314 ARG_dev,
315 ARG_oif,
[2725]316 ARG_to,
317 ARG_metric,
[1765]318 };
319 enum {
320 gw_ok = 1 << 0,
321 dst_ok = 1 << 1,
322 proto_ok = 1 << 2,
323 type_ok = 1 << 3
324 };
[821]325 struct rtnl_handle rth;
326 struct {
[2725]327 struct nlmsghdr n;
328 struct rtmsg r;
329 char buf[1024];
[821]330 } req;
[1765]331 char mxbuf[256];
[821]332 struct rtattr * mxrta = (void*)mxbuf;
333 unsigned mxlock = 0;
[1765]334 char *d = NULL;
335 smalluint ok = 0;
336 int arg;
[821]337
338 memset(&req, 0, sizeof(req));
339
340 req.n.nlmsg_len = NLMSG_LENGTH(sizeof(struct rtmsg));
[2725]341 req.n.nlmsg_flags = NLM_F_REQUEST | flags;
[821]342 req.n.nlmsg_type = cmd;
343 req.r.rtm_family = preferred_family;
[2725]344 if (RT_TABLE_MAIN) /* if it is zero, memset already did it */
345 req.r.rtm_table = RT_TABLE_MAIN;
346 if (RT_SCOPE_NOWHERE)
347 req.r.rtm_scope = RT_SCOPE_NOWHERE;
[821]348
349 if (cmd != RTM_DELROUTE) {
350 req.r.rtm_protocol = RTPROT_BOOT;
351 req.r.rtm_scope = RT_SCOPE_UNIVERSE;
352 req.r.rtm_type = RTN_UNICAST;
353 }
354
355 mxrta->rta_type = RTA_METRICS;
356 mxrta->rta_len = RTA_LENGTH(0);
357
[2725]358 while (*argv) {
[1765]359 arg = index_in_substrings(keywords, *argv);
360 if (arg == ARG_src) {
[821]361 inet_prefix addr;
362 NEXT_ARG();
363 get_addr(&addr, *argv, req.r.rtm_family);
[1765]364 if (req.r.rtm_family == AF_UNSPEC)
[821]365 req.r.rtm_family = addr.family;
366 addattr_l(&req.n, sizeof(req), RTA_PREFSRC, &addr.data, addr.bytelen);
[1765]367 } else if (arg == ARG_via) {
[821]368 inet_prefix addr;
[1765]369 ok |= gw_ok;
[821]370 NEXT_ARG();
371 get_addr(&addr, *argv, req.r.rtm_family);
372 if (req.r.rtm_family == AF_UNSPEC) {
373 req.r.rtm_family = addr.family;
374 }
375 addattr_l(&req.n, sizeof(req), RTA_GATEWAY, &addr.data, addr.bytelen);
[1765]376 } else if (arg == ARG_mtu) {
[821]377 unsigned mtu;
378 NEXT_ARG();
[1765]379 if (index_in_strings(keywords, *argv) == PARM_lock) {
[2725]380 mxlock |= (1 << RTAX_MTU);
[821]381 NEXT_ARG();
382 }
[2725]383 mtu = get_unsigned(*argv, "mtu");
[821]384 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_MTU, mtu);
[1765]385 } else if (arg == ARG_protocol) {
[821]386 uint32_t prot;
387 NEXT_ARG();
388 if (rtnl_rtprot_a2n(&prot, *argv))
389 invarg(*argv, "protocol");
390 req.r.rtm_protocol = prot;
[1765]391 ok |= proto_ok;
392#if ENABLE_FEATURE_IP_RULE
393 } else if (arg == ARG_table) {
394 uint32_t tid;
[821]395 NEXT_ARG();
[1765]396 if (rtnl_rttable_a2n(&tid, *argv))
397 invarg(*argv, "table");
398 req.r.rtm_table = tid;
399#endif
400 } else if (arg == ARG_dev || arg == ARG_oif) {
401 NEXT_ARG();
[821]402 d = *argv;
[2725]403 } else if (arg == ARG_metric) {
404 uint32_t metric;
405 NEXT_ARG();
406 metric = get_u32(*argv, "metric");
407 addattr32(&req.n, sizeof(req), RTA_PRIORITY, metric);
[821]408 } else {
409 int type;
410 inet_prefix dst;
411
[1765]412 if (arg == ARG_to) {
[821]413 NEXT_ARG();
414 }
[1765]415 if ((**argv < '0' || **argv > '9')
[2725]416 && rtnl_rtntype_a2n(&type, *argv) == 0) {
[821]417 NEXT_ARG();
418 req.r.rtm_type = type;
[1765]419 ok |= type_ok;
[821]420 }
421
[1765]422 if (ok & dst_ok) {
[821]423 duparg2("to", *argv);
424 }
425 get_prefix(&dst, *argv, req.r.rtm_family);
426 if (req.r.rtm_family == AF_UNSPEC) {
427 req.r.rtm_family = dst.family;
428 }
429 req.r.rtm_dst_len = dst.bitlen;
[1765]430 ok |= dst_ok;
[821]431 if (dst.bytelen) {
432 addattr_l(&req.n, sizeof(req), RTA_DST, &dst.data, dst.bytelen);
433 }
434 }
[2725]435 argv++;
[821]436 }
437
[1765]438 xrtnl_open(&rth);
[821]439
440 if (d) {
441 int idx;
442
443 ll_init_map(&rth);
444
445 if (d) {
[1765]446 idx = xll_name_to_index(d);
[821]447 addattr32(&req.n, sizeof(req), RTA_OIF, idx);
448 }
449 }
450
451 if (mxrta->rta_len > RTA_LENGTH(0)) {
452 if (mxlock) {
453 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_LOCK, mxlock);
454 }
455 addattr_l(&req.n, sizeof(req), RTA_METRICS, RTA_DATA(mxrta), RTA_PAYLOAD(mxrta));
456 }
457
[1765]458 if (req.r.rtm_type == RTN_LOCAL || req.r.rtm_type == RTN_NAT)
459 req.r.rtm_scope = RT_SCOPE_HOST;
[2725]460 else
461 if (req.r.rtm_type == RTN_BROADCAST
462 || req.r.rtm_type == RTN_MULTICAST
463 || req.r.rtm_type == RTN_ANYCAST
464 ) {
[1765]465 req.r.rtm_scope = RT_SCOPE_LINK;
[2725]466 }
[1765]467 else if (req.r.rtm_type == RTN_UNICAST || req.r.rtm_type == RTN_UNSPEC) {
468 if (cmd == RTM_DELROUTE)
469 req.r.rtm_scope = RT_SCOPE_NOWHERE;
470 else if (!(ok & gw_ok))
471 req.r.rtm_scope = RT_SCOPE_LINK;
472 }
473
[821]474 if (req.r.rtm_family == AF_UNSPEC) {
475 req.r.rtm_family = AF_INET;
476 }
477
478 if (rtnl_talk(&rth, &req.n, 0, 0, NULL, NULL, NULL) < 0) {
[1765]479 return 2;
[821]480 }
481
482 return 0;
483}
484
485static int rtnl_rtcache_request(struct rtnl_handle *rth, int family)
486{
487 struct {
488 struct nlmsghdr nlh;
489 struct rtmsg rtm;
490 } req;
491 struct sockaddr_nl nladdr;
492
493 memset(&nladdr, 0, sizeof(nladdr));
494 memset(&req, 0, sizeof(req));
495 nladdr.nl_family = AF_NETLINK;
496
497 req.nlh.nlmsg_len = sizeof(req);
[2725]498 if (RTM_GETROUTE)
499 req.nlh.nlmsg_type = RTM_GETROUTE;
500 if (NLM_F_ROOT | NLM_F_REQUEST)
501 req.nlh.nlmsg_flags = NLM_F_ROOT | NLM_F_REQUEST;
502 /*req.nlh.nlmsg_pid = 0; - memset did it already */
[821]503 req.nlh.nlmsg_seq = rth->dump = ++rth->seq;
504 req.rtm.rtm_family = family;
[2725]505 if (RTM_F_CLONED)
506 req.rtm.rtm_flags = RTM_F_CLONED;
[821]507
[1765]508 return xsendto(rth->fd, (void*)&req, sizeof(req), (struct sockaddr*)&nladdr, sizeof(nladdr));
[821]509}
510
[1765]511static void iproute_flush_cache(void)
[821]512{
[1765]513 static const char fn[] ALIGN1 = "/proc/sys/net/ipv4/route/flush";
514 int flush_fd = open_or_warn(fn, O_WRONLY);
[821]515
516 if (flush_fd < 0) {
[1765]517 return;
[821]518 }
519
[1765]520 if (write(flush_fd, "-1", 2) < 2) {
[2725]521 bb_perror_msg("can't flush routing cache");
[1765]522 return;
[821]523 }
524 close(flush_fd);
525}
526
527static void iproute_reset_filter(void)
528{
[2725]529 memset(&G_filter, 0, sizeof(G_filter));
530 G_filter.mdst.bitlen = -1;
531 G_filter.msrc.bitlen = -1;
[821]532}
533
[1765]534/* Return value becomes exitcode. It's okay to not return at all */
[2725]535static int iproute_list_or_flush(char **argv, int flush)
[821]536{
537 int do_ipv6 = preferred_family;
538 struct rtnl_handle rth;
539 char *id = NULL;
540 char *od = NULL;
[1765]541 static const char keywords[] ALIGN1 =
[2725]542 /* "ip route list/flush" parameters: */
543 "protocol\0" "dev\0" "oif\0" "iif\0"
544 "via\0" "table\0" "cache\0"
545 "from\0" "to\0"
546 /* and possible further keywords */
547 "all\0"
548 "root\0"
549 "match\0"
550 "exact\0"
551 "main\0"
552 ;
[1765]553 enum {
[2725]554 KW_proto, KW_dev, KW_oif, KW_iif,
555 KW_via, KW_table, KW_cache,
556 KW_from, KW_to,
557 /* */
558 KW_all,
559 KW_root,
560 KW_match,
561 KW_exact,
562 KW_main,
[1765]563 };
564 int arg, parm;
[2725]565
[821]566 iproute_reset_filter();
[2725]567 G_filter.tb = RT_TABLE_MAIN;
[821]568
[2725]569 if (flush && !*argv)
[1765]570 bb_error_msg_and_die(bb_msg_requires_arg, "\"ip route flush\"");
[821]571
[2725]572 while (*argv) {
[1765]573 arg = index_in_substrings(keywords, *argv);
[2725]574 if (arg == KW_proto) {
[821]575 uint32_t prot = 0;
576 NEXT_ARG();
[2725]577 //G_filter.protocolmask = -1;
[821]578 if (rtnl_rtprot_a2n(&prot, *argv)) {
[2725]579 if (index_in_strings(keywords, *argv) != KW_all)
[821]580 invarg(*argv, "protocol");
581 prot = 0;
[2725]582 //G_filter.protocolmask = 0;
[821]583 }
[2725]584 //G_filter.protocol = prot;
585 } else if (arg == KW_dev || arg == KW_oif) {
[821]586 NEXT_ARG();
587 od = *argv;
[2725]588 } else if (arg == KW_iif) {
[821]589 NEXT_ARG();
590 id = *argv;
[2725]591 } else if (arg == KW_via) {
[821]592 NEXT_ARG();
[2725]593 get_prefix(&G_filter.rvia, *argv, do_ipv6);
594 } else if (arg == KW_table) { /* table all/cache/main */
[1765]595 NEXT_ARG();
596 parm = index_in_substrings(keywords, *argv);
[2725]597 if (parm == KW_cache)
598 G_filter.tb = -1;
599 else if (parm == KW_all)
600 G_filter.tb = 0;
601 else if (parm != KW_main) {
602#if ENABLE_FEATURE_IP_RULE
603 uint32_t tid;
604 if (rtnl_rttable_a2n(&tid, *argv))
605 invarg(*argv, "table");
606 G_filter.tb = tid;
607#else
[1765]608 invarg(*argv, "table");
[2725]609#endif
610 }
611 } else if (arg == KW_cache) {
612 /* The command 'ip route flush cache' is used by OpenSWAN.
613 * Assuming it's a synonym for 'ip route flush table cache' */
614 G_filter.tb = -1;
615 } else if (arg == KW_from) {
[1765]616 NEXT_ARG();
617 parm = index_in_substrings(keywords, *argv);
[2725]618 if (parm == KW_root) {
[821]619 NEXT_ARG();
[2725]620 get_prefix(&G_filter.rsrc, *argv, do_ipv6);
621 } else if (parm == KW_match) {
[821]622 NEXT_ARG();
[2725]623 get_prefix(&G_filter.msrc, *argv, do_ipv6);
[821]624 } else {
[2725]625 if (parm == KW_exact)
[821]626 NEXT_ARG();
[2725]627 get_prefix(&G_filter.msrc, *argv, do_ipv6);
628 G_filter.rsrc = G_filter.msrc;
[821]629 }
[2725]630 } else { /* "to" is the default parameter */
631 if (arg == KW_to) {
[821]632 NEXT_ARG();
[1765]633 arg = index_in_substrings(keywords, *argv);
[821]634 }
[2725]635 /* parm = arg; - would be more plausible, but we reuse 'arg' here */
636 if (arg == KW_root) {
[821]637 NEXT_ARG();
[2725]638 get_prefix(&G_filter.rdst, *argv, do_ipv6);
639 } else if (arg == KW_match) {
[821]640 NEXT_ARG();
[2725]641 get_prefix(&G_filter.mdst, *argv, do_ipv6);
642 } else { /* "to exact" is the default */
643 if (arg == KW_exact)
[821]644 NEXT_ARG();
[2725]645 get_prefix(&G_filter.mdst, *argv, do_ipv6);
646 G_filter.rdst = G_filter.mdst;
[821]647 }
648 }
[1765]649 argv++;
[821]650 }
651
[2725]652 if (do_ipv6 == AF_UNSPEC && G_filter.tb) {
[821]653 do_ipv6 = AF_INET;
654 }
655
[1765]656 xrtnl_open(&rth);
[821]657 ll_init_map(&rth);
658
659 if (id || od) {
660 int idx;
661
662 if (id) {
[1765]663 idx = xll_name_to_index(id);
[2725]664 G_filter.iif = idx;
665 G_filter.iifmask = -1;
[821]666 }
667 if (od) {
[1765]668 idx = xll_name_to_index(od);
[2725]669 G_filter.oif = idx;
670 G_filter.oifmask = -1;
[821]671 }
672 }
673
674 if (flush) {
675 char flushb[4096-512];
676
[2725]677 if (G_filter.tb == -1) { /* "flush table cache" */
[821]678 if (do_ipv6 != AF_INET6)
679 iproute_flush_cache();
680 if (do_ipv6 == AF_INET)
681 return 0;
682 }
683
[2725]684 G_filter.flushb = flushb;
685 G_filter.flushp = 0;
686 G_filter.flushe = sizeof(flushb);
687 G_filter.rth = &rth;
[821]688
689 for (;;) {
[1765]690 xrtnl_wilddump_request(&rth, do_ipv6, RTM_GETROUTE);
[2725]691 G_filter.flushed = 0;
692 xrtnl_dump_filter(&rth, print_route, NULL);
693 if (G_filter.flushed == 0)
[821]694 return 0;
[1765]695 if (flush_update())
696 return 1;
[821]697 }
698 }
699
[2725]700 if (G_filter.tb != -1) {
[1765]701 xrtnl_wilddump_request(&rth, do_ipv6, RTM_GETROUTE);
702 } else if (rtnl_rtcache_request(&rth, do_ipv6) < 0) {
[2725]703 bb_perror_msg_and_die("can't send dump request");
[821]704 }
[2725]705 xrtnl_dump_filter(&rth, print_route, NULL);
[821]706
[1765]707 return 0;
[821]708}
709
710
[1765]711/* Return value becomes exitcode. It's okay to not return at all */
[2725]712static int iproute_get(char **argv)
[821]713{
714 struct rtnl_handle rth;
715 struct {
[1765]716 struct nlmsghdr n;
717 struct rtmsg r;
718 char buf[1024];
[821]719 } req;
[1765]720 char *idev = NULL;
721 char *odev = NULL;
722 bool connected = 0;
723 bool from_ok = 0;
724 static const char options[] ALIGN1 =
725 "from\0""iif\0""oif\0""dev\0""notify\0""connected\0""to\0";
[821]726
727 memset(&req, 0, sizeof(req));
728
729 iproute_reset_filter();
730
731 req.n.nlmsg_len = NLMSG_LENGTH(sizeof(struct rtmsg));
[2725]732 if (NLM_F_REQUEST)
733 req.n.nlmsg_flags = NLM_F_REQUEST;
734 if (RTM_GETROUTE)
735 req.n.nlmsg_type = RTM_GETROUTE;
[821]736 req.r.rtm_family = preferred_family;
[2725]737 /*req.r.rtm_table = 0; - memset did this already */
738 /*req.r.rtm_protocol = 0;*/
739 /*req.r.rtm_scope = 0;*/
740 /*req.r.rtm_type = 0;*/
741 /*req.r.rtm_src_len = 0;*/
742 /*req.r.rtm_dst_len = 0;*/
743 /*req.r.rtm_tos = 0;*/
[821]744
[2725]745 while (*argv) {
[1765]746 switch (index_in_strings(options, *argv)) {
[821]747 case 0: /* from */
748 {
749 inet_prefix addr;
750 NEXT_ARG();
751 from_ok = 1;
752 get_prefix(&addr, *argv, req.r.rtm_family);
753 if (req.r.rtm_family == AF_UNSPEC) {
754 req.r.rtm_family = addr.family;
755 }
756 if (addr.bytelen) {
757 addattr_l(&req.n, sizeof(req), RTA_SRC, &addr.data, addr.bytelen);
758 }
759 req.r.rtm_src_len = addr.bitlen;
760 break;
761 }
762 case 1: /* iif */
763 NEXT_ARG();
764 idev = *argv;
765 break;
766 case 2: /* oif */
767 case 3: /* dev */
768 NEXT_ARG();
769 odev = *argv;
770 break;
771 case 4: /* notify */
772 req.r.rtm_flags |= RTM_F_NOTIFY;
773 break;
774 case 5: /* connected */
775 connected = 1;
776 break;
777 case 6: /* to */
778 NEXT_ARG();
779 default:
780 {
781 inet_prefix addr;
782 get_prefix(&addr, *argv, req.r.rtm_family);
783 if (req.r.rtm_family == AF_UNSPEC) {
784 req.r.rtm_family = addr.family;
785 }
786 if (addr.bytelen) {
787 addattr_l(&req.n, sizeof(req), RTA_DST, &addr.data, addr.bytelen);
788 }
789 req.r.rtm_dst_len = addr.bitlen;
790 }
791 }
[2725]792 argv++;
[821]793 }
794
795 if (req.r.rtm_dst_len == 0) {
796 bb_error_msg_and_die("need at least destination address");
797 }
798
[1765]799 xrtnl_open(&rth);
[821]800
801 ll_init_map(&rth);
802
803 if (idev || odev) {
804 int idx;
805
806 if (idev) {
[1765]807 idx = xll_name_to_index(idev);
[821]808 addattr32(&req.n, sizeof(req), RTA_IIF, idx);
809 }
810 if (odev) {
[1765]811 idx = xll_name_to_index(odev);
[821]812 addattr32(&req.n, sizeof(req), RTA_OIF, idx);
813 }
814 }
815
816 if (req.r.rtm_family == AF_UNSPEC) {
817 req.r.rtm_family = AF_INET;
818 }
819
820 if (rtnl_talk(&rth, &req.n, 0, 0, &req.n, NULL, NULL) < 0) {
[1765]821 return 2;
[821]822 }
823
824 if (connected && !from_ok) {
825 struct rtmsg *r = NLMSG_DATA(&req.n);
826 int len = req.n.nlmsg_len;
827 struct rtattr * tb[RTA_MAX+1];
828
[2725]829 print_route(NULL, &req.n, NULL);
[821]830
831 if (req.n.nlmsg_type != RTM_NEWROUTE) {
[1765]832 bb_error_msg_and_die("not a route?");
[821]833 }
834 len -= NLMSG_LENGTH(sizeof(*r));
835 if (len < 0) {
[1765]836 bb_error_msg_and_die("wrong len %d", len);
[821]837 }
838
839 memset(tb, 0, sizeof(tb));
840 parse_rtattr(tb, RTA_MAX, RTM_RTA(r), len);
841
842 if (tb[RTA_PREFSRC]) {
843 tb[RTA_PREFSRC]->rta_type = RTA_SRC;
844 r->rtm_src_len = 8*RTA_PAYLOAD(tb[RTA_PREFSRC]);
845 } else if (!tb[RTA_SRC]) {
[2725]846 bb_error_msg_and_die("can't connect the route");
[821]847 }
848 if (!odev && tb[RTA_OIF]) {
849 tb[RTA_OIF]->rta_type = 0;
850 }
851 if (tb[RTA_GATEWAY]) {
852 tb[RTA_GATEWAY]->rta_type = 0;
853 }
854 if (!idev && tb[RTA_IIF]) {
855 tb[RTA_IIF]->rta_type = 0;
856 }
857 req.n.nlmsg_flags = NLM_F_REQUEST;
858 req.n.nlmsg_type = RTM_GETROUTE;
859
860 if (rtnl_talk(&rth, &req.n, 0, 0, &req.n, NULL, NULL) < 0) {
[1765]861 return 2;
[821]862 }
863 }
[2725]864 print_route(NULL, &req.n, NULL);
[1765]865 return 0;
[821]866}
867
[1765]868/* Return value becomes exitcode. It's okay to not return at all */
[2725]869int FAST_FUNC do_iproute(char **argv)
[821]870{
[1765]871 static const char ip_route_commands[] ALIGN1 =
872 /*0-3*/ "add\0""append\0""change\0""chg\0"
873 /*4-7*/ "delete\0""get\0""list\0""show\0"
874 /*8..*/ "prepend\0""replace\0""test\0""flush\0";
[2725]875 int command_num;
[1765]876 unsigned flags = 0;
[821]877 int cmd = RTM_NEWROUTE;
878
[2725]879 if (!*argv)
880 return iproute_list_or_flush(argv, 0);
881
[1765]882 /* "Standard" 'ip r a' treats 'a' as 'add', not 'append' */
883 /* It probably means that it is using "first match" rule */
[2725]884 command_num = index_in_substrings(ip_route_commands, *argv);
885
[1765]886 switch (command_num) {
887 case 0: /* add */
[821]888 flags = NLM_F_CREATE|NLM_F_EXCL;
889 break;
890 case 1: /* append */
891 flags = NLM_F_CREATE|NLM_F_APPEND;
892 break;
893 case 2: /* change */
894 case 3: /* chg */
895 flags = NLM_F_REPLACE;
896 break;
897 case 4: /* delete */
898 cmd = RTM_DELROUTE;
899 break;
[1765]900 case 5: /* get */
[2725]901 return iproute_get(argv+1);
[1765]902 case 6: /* list */
903 case 7: /* show */
[2725]904 return iproute_list_or_flush(argv+1, 0);
[1765]905 case 8: /* prepend */
[821]906 flags = NLM_F_CREATE;
[2725]907 break;
[1765]908 case 9: /* replace */
[821]909 flags = NLM_F_CREATE|NLM_F_REPLACE;
[2725]910 break;
[1765]911 case 10: /* test */
[821]912 flags = NLM_F_EXCL;
[2725]913 break;
[1765]914 case 11: /* flush */
[2725]915 return iproute_list_or_flush(argv+1, 1);
[821]916 default:
[1765]917 bb_error_msg_and_die("unknown command %s", *argv);
[821]918 }
919
[2725]920 return iproute_modify(cmd, flags, argv+1);
[821]921}
Note: See TracBrowser for help on using the repository browser.