1 /* vi: set sw=4 ts=4: */
3 * Licensed under GPLv2 or later, see file LICENSE in this source tree.
5 * Authors: Alexey Kuznetsov, <kuznet@ms2.inr.ac.ru>
9 * Rani Assaf <rani@magic.metawire.com> 980929: resolve addresses
10 * Kunihiro Ishiguro <kunihiro@zebra.org> 001102: rtnh_ifindex was not initialized
13 #include "ip_common.h" /* #include "libbb.h" is inside */
14 #include "common_bufsiz.h"
19 #define RTAX_RTTVAR RTAX_HOPS
29 struct rtnl_handle *rth;
30 //int protocol, protocolmask; - write-only fields?!
32 //int type; - read-only
33 //int typemask; - unused
34 //int tos, tosmask; - unused
37 //int realm, realmmask; - unused
38 //inet_prefix rprefsrc; - read-only
45 typedef struct filter_t filter_t;
47 #define G_filter (*(filter_t*)bb_common_bufsiz1)
48 #define INIT_G() do { setup_common_bufsiz(); } while (0)
50 static int flush_update(void)
52 if (rtnl_send(G_filter.rth, G_filter.flushb, G_filter.flushp) < 0) {
53 bb_perror_msg("can't send flush request");
60 static int FAST_FUNC print_route(const struct sockaddr_nl *who UNUSED_PARAM,
61 struct nlmsghdr *n, void *arg UNUSED_PARAM)
63 struct rtmsg *r = NLMSG_DATA(n);
64 int len = n->nlmsg_len;
65 struct rtattr *tb[RTA_MAX+1];
71 if (n->nlmsg_type != RTM_NEWROUTE && n->nlmsg_type != RTM_DELROUTE) {
72 fprintf(stderr, "Not a route: %08x %08x %08x\n",
73 n->nlmsg_len, n->nlmsg_type, n->nlmsg_flags);
76 if (G_filter.flushb && n->nlmsg_type != RTM_NEWROUTE)
78 len -= NLMSG_LENGTH(sizeof(*r));
80 bb_error_msg_and_die("wrong nlmsg len %d", len);
82 memset(tb, 0, sizeof(tb));
83 parse_rtattr(tb, RTA_MAX, RTM_RTA(r), len);
86 tid = *(uint32_t *)RTA_DATA(tb[RTA_TABLE]);
90 if (r->rtm_family == AF_INET6)
92 else if (r->rtm_family == AF_INET)
95 if (r->rtm_family == AF_INET6) {
97 if (G_filter.tb < 0) {
98 if (!(r->rtm_flags & RTM_F_CLONED)) {
102 if (r->rtm_flags & RTM_F_CLONED) {
105 if (G_filter.tb == RT_TABLE_LOCAL) {
106 if (r->rtm_type != RTN_LOCAL) {
109 } else if (G_filter.tb == RT_TABLE_MAIN) {
110 if (r->rtm_type == RTN_LOCAL) {
119 if (G_filter.tb > 0 && G_filter.tb != tid) {
123 if ((G_filter.scope ^ r->rtm_scope) & G_filter.scopemask)
125 if (G_filter.rdst.family
126 && (r->rtm_family != G_filter.rdst.family || G_filter.rdst.bitlen > r->rtm_dst_len)
130 if (G_filter.mdst.family
131 && (r->rtm_family != G_filter.mdst.family
132 || (G_filter.mdst.bitlen >= 0 && G_filter.mdst.bitlen < r->rtm_dst_len)
137 if (G_filter.rsrc.family
138 && (r->rtm_family != G_filter.rsrc.family || G_filter.rsrc.bitlen > r->rtm_src_len)
142 if (G_filter.msrc.family
143 && (r->rtm_family != G_filter.msrc.family
144 || (G_filter.msrc.bitlen >= 0 && G_filter.msrc.bitlen < r->rtm_src_len)
150 memset(&src, 0, sizeof(src));
151 memset(&dst, 0, sizeof(dst));
154 src.bitlen = r->rtm_src_len;
155 src.bytelen = (r->rtm_family == AF_INET6 ? 16 : 4);
156 memcpy(src.data, RTA_DATA(tb[RTA_SRC]), src.bytelen);
159 dst.bitlen = r->rtm_dst_len;
160 dst.bytelen = (r->rtm_family == AF_INET6 ? 16 : 4);
161 memcpy(dst.data, RTA_DATA(tb[RTA_DST]), dst.bytelen);
164 if (G_filter.rdst.family
165 && inet_addr_match(&dst, &G_filter.rdst, G_filter.rdst.bitlen)
169 if (G_filter.mdst.family
170 && G_filter.mdst.bitlen >= 0
171 && inet_addr_match(&dst, &G_filter.mdst, r->rtm_dst_len)
175 if (G_filter.rsrc.family
176 && inet_addr_match(&src, &G_filter.rsrc, G_filter.rsrc.bitlen)
180 if (G_filter.msrc.family && G_filter.msrc.bitlen >= 0
181 && inet_addr_match(&src, &G_filter.msrc, r->rtm_src_len)
185 if (G_filter.oif != 0) {
188 if (G_filter.oif != *(int*)RTA_DATA(tb[RTA_OIF]))
192 if (G_filter.flushb) {
195 /* We are creating route flush commands */
197 if (r->rtm_family == AF_INET6
198 && r->rtm_dst_len == 0
199 && r->rtm_type == RTN_UNREACHABLE
201 && *(int*)RTA_DATA(tb[RTA_PRIORITY]) == -1
206 if (NLMSG_ALIGN(G_filter.flushp) + n->nlmsg_len > G_filter.flushe) {
210 fn = (void*)(G_filter.flushb + NLMSG_ALIGN(G_filter.flushp));
211 memcpy(fn, n, n->nlmsg_len);
212 fn->nlmsg_type = RTM_DELROUTE;
213 fn->nlmsg_flags = NLM_F_REQUEST;
214 fn->nlmsg_seq = ++G_filter.rth->seq;
215 G_filter.flushp = (((char*)fn) + n->nlmsg_len) - G_filter.flushb;
216 G_filter.flushed = 1;
220 /* We are printing routes */
222 if (n->nlmsg_type == RTM_DELROUTE) {
225 if (r->rtm_type != RTN_UNICAST /* && !G_filter.type - always 0 */) {
226 printf("%s ", rtnl_rtntype_n2a(r->rtm_type));
230 if (r->rtm_dst_len != host_len) {
232 rt_addr_n2a(r->rtm_family, RTA_DATA(tb[RTA_DST])),
236 printf("%s ", format_host(r->rtm_family,
237 RTA_PAYLOAD(tb[RTA_DST]),
238 RTA_DATA(tb[RTA_DST]))
241 } else if (r->rtm_dst_len) {
242 printf("0/%d ", r->rtm_dst_len);
247 if (r->rtm_src_len != host_len) {
248 printf("from %s/%u ",
249 rt_addr_n2a(r->rtm_family, RTA_DATA(tb[RTA_SRC])),
253 printf("from %s ", format_host(r->rtm_family,
254 RTA_PAYLOAD(tb[RTA_SRC]),
255 RTA_DATA(tb[RTA_SRC]))
258 } else if (r->rtm_src_len) {
259 printf("from 0/%u ", r->rtm_src_len);
261 if (tb[RTA_GATEWAY] && G_filter.rvia.bitlen != host_len) {
262 printf("via %s ", format_host(r->rtm_family,
263 RTA_PAYLOAD(tb[RTA_GATEWAY]),
264 RTA_DATA(tb[RTA_GATEWAY]))
268 printf("dev %s ", ll_index_to_name(*(int*)RTA_DATA(tb[RTA_OIF])));
270 #if ENABLE_FEATURE_IP_RULE
271 if (tid && tid != RT_TABLE_MAIN && !G_filter.tb)
272 printf("table %s ", rtnl_rttable_n2a(tid));
275 /* Todo: parse & show "proto kernel" here */
276 if (!(r->rtm_flags & RTM_F_CLONED)) {
277 if ((r->rtm_scope != RT_SCOPE_UNIVERSE) && G_filter.scopemask != -1)
278 printf("scope %s ", rtnl_rtscope_n2a(r->rtm_scope));
281 if (tb[RTA_PREFSRC] && /*G_filter.rprefsrc.bitlen - always 0*/ 0 != host_len) {
282 /* Do not use format_host(). It is our local addr
283 and symbolic name will not be useful.
285 printf(" src %s ", rt_addr_n2a(r->rtm_family,
286 RTA_DATA(tb[RTA_PREFSRC])));
288 if (tb[RTA_PRIORITY]) {
289 printf(" metric %d ", *(uint32_t*)RTA_DATA(tb[RTA_PRIORITY]));
291 if (r->rtm_flags & RTNH_F_DEAD) {
294 if (r->rtm_flags & RTNH_F_ONLINK) {
297 if (r->rtm_flags & RTNH_F_PERVASIVE) {
298 printf("pervasive ");
300 if (r->rtm_flags & RTM_F_NOTIFY) {
304 if (r->rtm_family == AF_INET6) {
305 struct rta_cacheinfo *ci = NULL;
306 if (tb[RTA_CACHEINFO]) {
307 ci = RTA_DATA(tb[RTA_CACHEINFO]);
309 if ((r->rtm_flags & RTM_F_CLONED) || (ci && ci->rta_expires)) {
310 if (r->rtm_flags & RTM_F_CLONED) {
311 printf("%c cache ", _SL_);
313 if (ci->rta_expires) {
314 printf(" expires %dsec", ci->rta_expires / get_hz());
316 if (ci->rta_error != 0) {
317 printf(" error %d", ci->rta_error);
320 if (ci->rta_error != 0)
321 printf(" error %d", ci->rta_error);
324 if (tb[RTA_IIF] && G_filter.iif == 0) {
325 printf(" iif %s", ll_index_to_name(*(int*)RTA_DATA(tb[RTA_IIF])));
331 static int str_is_lock(const char *str)
333 return strcmp(str, "lock") == 0;
336 /* Return value becomes exitcode. It's okay to not return at all */
337 static int iproute_modify(int cmd, unsigned flags, char **argv)
339 /* If you add stuff here, update iproute_full_usage */
340 static const char keywords[] ALIGN1 =
343 "scope\0""protocol\0"IF_FEATURE_IP_RULE("table\0")
344 "dev\0""oif\0""to\0""metric\0""onlink\0";
345 #define keyword_via (keywords + sizeof("src"))
346 #define keyword_mtu (keyword_via + sizeof("via"))
347 #define keyword_advmss (keyword_mtu + sizeof("mtu"))
348 #define keyword_scope (keyword_advmss + sizeof("advmss"))
349 #define keyword_proto (keyword_scope + sizeof("scope"))
350 #define keyword_table (keyword_proto + sizeof("protocol"))
358 IF_FEATURE_IP_RULE(ARG_table,)
371 struct rtnl_handle rth;
378 struct rtattr * mxrta = (void*)mxbuf;
382 smalluint scope_ok = 0;
385 memset(&req, 0, sizeof(req));
387 req.n.nlmsg_len = NLMSG_LENGTH(sizeof(struct rtmsg));
388 req.n.nlmsg_flags = NLM_F_REQUEST | flags;
389 req.n.nlmsg_type = cmd;
390 req.r.rtm_family = preferred_family;
391 if (RT_TABLE_MAIN != 0) /* if it is zero, memset already did it */
392 req.r.rtm_table = RT_TABLE_MAIN;
393 if (RT_SCOPE_NOWHERE != 0)
394 req.r.rtm_scope = RT_SCOPE_NOWHERE;
396 if (cmd != RTM_DELROUTE) {
397 req.r.rtm_scope = RT_SCOPE_UNIVERSE;
398 if (RTPROT_BOOT != 0)
399 req.r.rtm_protocol = RTPROT_BOOT;
400 if (RTN_UNICAST != 0)
401 req.r.rtm_type = RTN_UNICAST;
404 mxrta->rta_type = RTA_METRICS;
405 mxrta->rta_len = RTA_LENGTH(0);
408 arg = index_in_substrings(keywords, *argv);
409 if (arg == ARG_src) {
412 get_addr(&addr, *argv, req.r.rtm_family);
413 if (req.r.rtm_family == AF_UNSPEC)
414 req.r.rtm_family = addr.family;
415 addattr_l(&req.n, sizeof(req), RTA_PREFSRC, &addr.data, addr.bytelen);
416 } else if (arg == ARG_via) {
420 get_addr(&addr, *argv, req.r.rtm_family);
421 if (req.r.rtm_family == AF_UNSPEC) {
422 req.r.rtm_family = addr.family;
424 addattr_l(&req.n, sizeof(req), RTA_GATEWAY, &addr.data, addr.bytelen);
425 } else if (arg == ARG_mtu) {
428 if (str_is_lock(*argv)) {
429 mxlock |= (1 << RTAX_MTU);
432 mtu = get_unsigned(*argv, keyword_mtu);
433 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_MTU, mtu);
434 } else if (arg == ARG_advmss) {
437 if (str_is_lock(*argv)) {
438 mxlock |= (1 << RTAX_ADVMSS);
441 mss = get_unsigned(*argv, keyword_advmss);
442 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_ADVMSS, mss);
443 } else if (arg == ARG_scope) {
446 if (rtnl_rtscope_a2n(&scope, *argv))
447 invarg_1_to_2(*argv, keyword_scope);
448 req.r.rtm_scope = scope;
450 } else if (arg == ARG_protocol) {
453 if (rtnl_rtprot_a2n(&prot, *argv))
454 invarg_1_to_2(*argv, keyword_proto);
455 req.r.rtm_protocol = prot;
457 #if ENABLE_FEATURE_IP_RULE
458 } else if (arg == ARG_table) {
461 if (rtnl_rttable_a2n(&tid, *argv))
462 invarg_1_to_2(*argv, keyword_table);
464 req.r.rtm_table = tid;
466 req.r.rtm_table = RT_TABLE_UNSPEC;
467 addattr32(&req.n, sizeof(req), RTA_TABLE, tid);
470 } else if (arg == ARG_dev || arg == ARG_oif) {
473 } else if (arg == ARG_metric) {
474 //TODO: "metric", "priority" and "preference" are synonyms
477 metric = get_u32(*argv, "metric");
478 addattr32(&req.n, sizeof(req), RTA_PRIORITY, metric);
479 } else if (arg == ARG_onlink) {
480 req.r.rtm_flags |= RTNH_F_ONLINK;
488 if ((**argv < '0' || **argv > '9')
489 && rtnl_rtntype_a2n(&type, *argv) == 0
492 req.r.rtm_type = type;
497 duparg2("to", *argv);
499 get_prefix(&dst, *argv, req.r.rtm_family);
500 if (req.r.rtm_family == AF_UNSPEC) {
501 req.r.rtm_family = dst.family;
503 req.r.rtm_dst_len = dst.bitlen;
506 addattr_l(&req.n, sizeof(req), RTA_DST, &dst.data, dst.bytelen);
509 /* Other keywords recognized by iproute2-3.19.0: */
511 } else if (strcmp(*argv, "from") == 0) {
514 get_prefix(&addr, *argv, req.r.rtm_family);
515 if (req.r.rtm_family == AF_UNSPEC)
516 req.r.rtm_family = addr.family;
518 addattr_l(&req.n, sizeof(req), RTA_SRC, &addr.data, addr.bytelen);
519 req.r.rtm_src_len = addr.bitlen;
520 } else if (strcmp(*argv, "tos") == 0 ||
521 matches(*argv, "dsfield") == 0) {
524 if (rtnl_dsfield_a2n(&tos, *argv))
525 invarg("\"tos\" value is invalid\n", *argv);
527 } else if (strcmp(*argv, "hoplimit") == 0) {
530 if (strcmp(*argv, "lock") == 0) {
531 mxlock |= (1<<RTAX_HOPLIMIT);
534 if (get_unsigned(&hoplimit, *argv, 0))
535 invarg("\"hoplimit\" value is invalid\n", *argv);
536 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_HOPLIMIT, hoplimit);
537 } else if (matches(*argv, "reordering") == 0) {
540 if (strcmp(*argv, "lock") == 0) {
541 mxlock |= (1<<RTAX_REORDERING);
544 if (get_unsigned(&reord, *argv, 0))
545 invarg("\"reordering\" value is invalid\n", *argv);
546 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_REORDERING, reord);
547 } else if (strcmp(*argv, "rtt") == 0) {
550 if (strcmp(*argv, "lock") == 0) {
551 mxlock |= (1<<RTAX_RTT);
554 if (get_time_rtt(&rtt, *argv, &raw))
555 invarg("\"rtt\" value is invalid\n", *argv);
556 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_RTT,
557 (raw) ? rtt : rtt * 8);
558 } else if (strcmp(*argv, "rto_min") == 0) {
561 mxlock |= (1<<RTAX_RTO_MIN);
562 if (get_time_rtt(&rto_min, *argv, &raw))
563 invarg("\"rto_min\" value is invalid\n",
565 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_RTO_MIN,
567 } else if (matches(*argv, "window") == 0) {
570 if (strcmp(*argv, "lock") == 0) {
571 mxlock |= (1<<RTAX_WINDOW);
574 if (get_unsigned(&win, *argv, 0))
575 invarg("\"window\" value is invalid\n", *argv);
576 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_WINDOW, win);
577 } else if (matches(*argv, "cwnd") == 0) {
580 if (strcmp(*argv, "lock") == 0) {
581 mxlock |= (1<<RTAX_CWND);
584 if (get_unsigned(&win, *argv, 0))
585 invarg("\"cwnd\" value is invalid\n", *argv);
586 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_CWND, win);
587 } else if (matches(*argv, "initcwnd") == 0) {
590 if (strcmp(*argv, "lock") == 0) {
591 mxlock |= (1<<RTAX_INITCWND);
594 if (get_unsigned(&win, *argv, 0))
595 invarg("\"initcwnd\" value is invalid\n", *argv);
596 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_INITCWND, win);
597 } else if (matches(*argv, "initrwnd") == 0) {
600 if (strcmp(*argv, "lock") == 0) {
601 mxlock |= (1<<RTAX_INITRWND);
604 if (get_unsigned(&win, *argv, 0))
605 invarg("\"initrwnd\" value is invalid\n", *argv);
606 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_INITRWND, win);
607 } else if (matches(*argv, "features") == 0) {
608 unsigned int features = 0;
613 if (strcmp(*argv, "ecn") == 0)
614 features |= RTAX_FEATURE_ECN;
616 invarg("\"features\" value not valid\n", *argv);
620 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_FEATURES, features);
621 } else if (matches(*argv, "quickack") == 0) {
624 if (get_unsigned(&quickack, *argv, 0))
625 invarg("\"quickack\" value is invalid\n", *argv);
626 if (quickack != 1 && quickack != 0)
627 invarg("\"quickack\" value should be 0 or 1\n", *argv);
628 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_QUICKACK, quickack);
629 } else if (matches(*argv, "rttvar") == 0) {
632 if (strcmp(*argv, "lock") == 0) {
633 mxlock |= (1<<RTAX_RTTVAR);
636 if (get_time_rtt(&win, *argv, &raw))
637 invarg("\"rttvar\" value is invalid\n", *argv);
638 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_RTTVAR,
639 (raw) ? win : win * 4);
640 } else if (matches(*argv, "ssthresh") == 0) {
643 if (strcmp(*argv, "lock") == 0) {
644 mxlock |= (1<<RTAX_SSTHRESH);
647 if (get_unsigned(&win, *argv, 0))
648 invarg("\"ssthresh\" value is invalid\n", *argv);
649 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_SSTHRESH, win);
650 } else if (matches(*argv, "realms") == 0) {
653 if (get_rt_realms(&realm, *argv))
654 invarg("\"realm\" value is invalid\n", *argv);
655 addattr32(&req.n, sizeof(req), RTA_FLOW, realm);
656 } else if (strcmp(*argv, "nexthop") == 0) {
672 idx = xll_name_to_index(d);
673 addattr32(&req.n, sizeof(req), RTA_OIF, idx);
677 if (mxrta->rta_len > RTA_LENGTH(0)) {
679 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_LOCK, mxlock);
681 addattr_l(&req.n, sizeof(req), RTA_METRICS, RTA_DATA(mxrta), RTA_PAYLOAD(mxrta));
685 if (req.r.rtm_type == RTN_LOCAL || req.r.rtm_type == RTN_NAT)
686 req.r.rtm_scope = RT_SCOPE_HOST;
688 if (req.r.rtm_type == RTN_BROADCAST
689 || req.r.rtm_type == RTN_MULTICAST
690 || req.r.rtm_type == RTN_ANYCAST
692 req.r.rtm_scope = RT_SCOPE_LINK;
694 else if (req.r.rtm_type == RTN_UNICAST || req.r.rtm_type == RTN_UNSPEC) {
695 if (cmd == RTM_DELROUTE)
696 req.r.rtm_scope = RT_SCOPE_NOWHERE;
697 else if (!(ok & gw_ok))
698 req.r.rtm_scope = RT_SCOPE_LINK;
702 if (req.r.rtm_family == AF_UNSPEC) {
703 req.r.rtm_family = AF_INET;
706 if (rtnl_talk(&rth, &req.n, 0, 0, NULL, NULL, NULL) < 0) {
713 static int rtnl_rtcache_request(struct rtnl_handle *rth, int family)
719 struct sockaddr_nl nladdr;
721 memset(&nladdr, 0, sizeof(nladdr));
722 memset(&req, 0, sizeof(req));
723 nladdr.nl_family = AF_NETLINK;
725 req.nlh.nlmsg_len = sizeof(req);
727 req.nlh.nlmsg_type = RTM_GETROUTE;
728 if (NLM_F_ROOT | NLM_F_REQUEST)
729 req.nlh.nlmsg_flags = NLM_F_ROOT | NLM_F_REQUEST;
730 /*req.nlh.nlmsg_pid = 0; - memset did it already */
731 req.nlh.nlmsg_seq = rth->dump = ++rth->seq;
732 req.rtm.rtm_family = family;
734 req.rtm.rtm_flags = RTM_F_CLONED;
736 return xsendto(rth->fd, (void*)&req, sizeof(req), (struct sockaddr*)&nladdr, sizeof(nladdr));
739 static void iproute_flush_cache(void)
741 static const char fn[] ALIGN1 = "/proc/sys/net/ipv4/route/flush";
742 int flush_fd = open_or_warn(fn, O_WRONLY);
748 if (write(flush_fd, "-1", 2) < 2) {
749 bb_perror_msg("can't flush routing cache");
755 static void iproute_reset_filter(void)
757 memset(&G_filter, 0, sizeof(G_filter));
758 G_filter.mdst.bitlen = -1;
759 G_filter.msrc.bitlen = -1;
762 /* Return value becomes exitcode. It's okay to not return at all */
763 static int iproute_list_or_flush(char **argv, int flush)
765 int do_ipv6 = preferred_family;
766 struct rtnl_handle rth;
769 static const char keywords[] ALIGN1 =
770 /* If you add stuff here, update iproute_full_usage */
771 /* "ip route list/flush" parameters: */
772 "protocol\0" "dev\0" "oif\0" "iif\0"
773 "via\0" "table\0" "cache\0"
774 "from\0" "to\0" "scope\0"
775 /* and possible further keywords */
783 KW_proto, KW_dev, KW_oif, KW_iif,
784 KW_via, KW_table, KW_cache,
785 KW_from, KW_to, KW_scope,
795 iproute_reset_filter();
796 G_filter.tb = RT_TABLE_MAIN;
799 bb_error_msg_and_die(bb_msg_requires_arg, "\"ip route flush\"");
802 arg = index_in_substrings(keywords, *argv);
803 if (arg == KW_proto) {
806 //G_filter.protocolmask = -1;
807 if (rtnl_rtprot_a2n(&prot, *argv)) {
808 if (index_in_strings(keywords, *argv) != KW_all)
809 invarg_1_to_2(*argv, "protocol");
811 //G_filter.protocolmask = 0;
813 //G_filter.protocol = prot;
814 } else if (arg == KW_dev || arg == KW_oif) {
817 } else if (arg == KW_iif) {
820 } else if (arg == KW_via) {
822 get_prefix(&G_filter.rvia, *argv, do_ipv6);
823 } else if (arg == KW_table) { /* table all/cache/main */
825 parm = index_in_substrings(keywords, *argv);
826 if (parm == KW_cache)
828 else if (parm == KW_all)
830 else if (parm != KW_main) {
831 #if ENABLE_FEATURE_IP_RULE
833 if (rtnl_rttable_a2n(&tid, *argv))
834 invarg_1_to_2(*argv, "table");
837 invarg_1_to_2(*argv, "table");
840 } else if (arg == KW_cache) {
841 /* The command 'ip route flush cache' is used by OpenSWAN.
842 * Assuming it's a synonym for 'ip route flush table cache' */
844 } else if (arg == KW_scope) {
847 G_filter.scopemask = -1;
848 if (rtnl_rtscope_a2n(&scope, *argv)) {
849 if (strcmp(*argv, "all") != 0)
850 invarg_1_to_2(*argv, "scope");
851 scope = RT_SCOPE_NOWHERE;
852 G_filter.scopemask = 0;
854 G_filter.scope = scope;
855 } else if (arg == KW_from) {
857 parm = index_in_substrings(keywords, *argv);
858 if (parm == KW_root) {
860 get_prefix(&G_filter.rsrc, *argv, do_ipv6);
861 } else if (parm == KW_match) {
863 get_prefix(&G_filter.msrc, *argv, do_ipv6);
865 if (parm == KW_exact)
867 get_prefix(&G_filter.msrc, *argv, do_ipv6);
868 G_filter.rsrc = G_filter.msrc;
870 } else { /* "to" is the default parameter */
873 arg = index_in_substrings(keywords, *argv);
875 /* parm = arg; - would be more plausible, but we reuse 'arg' here */
876 if (arg == KW_root) {
878 get_prefix(&G_filter.rdst, *argv, do_ipv6);
879 } else if (arg == KW_match) {
881 get_prefix(&G_filter.mdst, *argv, do_ipv6);
882 } else { /* "to exact" is the default */
885 get_prefix(&G_filter.mdst, *argv, do_ipv6);
886 G_filter.rdst = G_filter.mdst;
892 if (do_ipv6 == AF_UNSPEC && G_filter.tb) {
903 idx = xll_name_to_index(id);
907 idx = xll_name_to_index(od);
913 char flushb[4096-512];
915 if (G_filter.tb == -1) { /* "flush table cache" */
916 if (do_ipv6 != AF_INET6)
917 iproute_flush_cache();
918 if (do_ipv6 == AF_INET)
922 G_filter.flushb = flushb;
924 G_filter.flushe = sizeof(flushb);
928 xrtnl_wilddump_request(&rth, do_ipv6, RTM_GETROUTE);
929 G_filter.flushed = 0;
930 xrtnl_dump_filter(&rth, print_route, NULL);
931 if (G_filter.flushed == 0)
938 if (G_filter.tb != -1) {
939 xrtnl_wilddump_request(&rth, do_ipv6, RTM_GETROUTE);
940 } else if (rtnl_rtcache_request(&rth, do_ipv6) < 0) {
941 bb_perror_msg_and_die("can't send dump request");
943 xrtnl_dump_filter(&rth, print_route, NULL);
949 /* Return value becomes exitcode. It's okay to not return at all */
950 static int iproute_get(char **argv)
952 struct rtnl_handle rth;
962 static const char options[] ALIGN1 =
963 "from\0""iif\0""oif\0""dev\0""notify\0""connected\0""to\0";
965 memset(&req, 0, sizeof(req));
967 iproute_reset_filter();
969 req.n.nlmsg_len = NLMSG_LENGTH(sizeof(struct rtmsg));
971 req.n.nlmsg_flags = NLM_F_REQUEST;
973 req.n.nlmsg_type = RTM_GETROUTE;
974 req.r.rtm_family = preferred_family;
975 /*req.r.rtm_table = 0; - memset did this already */
976 /*req.r.rtm_protocol = 0;*/
977 /*req.r.rtm_scope = 0;*/
978 /*req.r.rtm_type = 0;*/
979 /*req.r.rtm_src_len = 0;*/
980 /*req.r.rtm_dst_len = 0;*/
981 /*req.r.rtm_tos = 0;*/
984 switch (index_in_strings(options, *argv)) {
990 get_prefix(&addr, *argv, req.r.rtm_family);
991 if (req.r.rtm_family == AF_UNSPEC) {
992 req.r.rtm_family = addr.family;
995 addattr_l(&req.n, sizeof(req), RTA_SRC, &addr.data, addr.bytelen);
997 req.r.rtm_src_len = addr.bitlen;
1009 case 4: /* notify */
1010 req.r.rtm_flags |= RTM_F_NOTIFY;
1012 case 5: /* connected */
1020 get_prefix(&addr, *argv, req.r.rtm_family);
1021 if (req.r.rtm_family == AF_UNSPEC) {
1022 req.r.rtm_family = addr.family;
1025 addattr_l(&req.n, sizeof(req), RTA_DST, &addr.data, addr.bytelen);
1027 req.r.rtm_dst_len = addr.bitlen;
1033 if (req.r.rtm_dst_len == 0) {
1034 bb_error_msg_and_die("need at least destination address");
1045 idx = xll_name_to_index(idev);
1046 addattr32(&req.n, sizeof(req), RTA_IIF, idx);
1049 idx = xll_name_to_index(odev);
1050 addattr32(&req.n, sizeof(req), RTA_OIF, idx);
1054 if (req.r.rtm_family == AF_UNSPEC) {
1055 req.r.rtm_family = AF_INET;
1058 if (rtnl_talk(&rth, &req.n, 0, 0, &req.n, NULL, NULL) < 0) {
1062 if (connected && !from_ok) {
1063 struct rtmsg *r = NLMSG_DATA(&req.n);
1064 int len = req.n.nlmsg_len;
1065 struct rtattr * tb[RTA_MAX+1];
1067 print_route(NULL, &req.n, NULL);
1069 if (req.n.nlmsg_type != RTM_NEWROUTE) {
1070 bb_error_msg_and_die("not a route?");
1072 len -= NLMSG_LENGTH(sizeof(*r));
1074 bb_error_msg_and_die("wrong len %d", len);
1077 memset(tb, 0, sizeof(tb));
1078 parse_rtattr(tb, RTA_MAX, RTM_RTA(r), len);
1080 if (tb[RTA_PREFSRC]) {
1081 tb[RTA_PREFSRC]->rta_type = RTA_SRC;
1082 r->rtm_src_len = 8*RTA_PAYLOAD(tb[RTA_PREFSRC]);
1083 } else if (!tb[RTA_SRC]) {
1084 bb_error_msg_and_die("can't connect the route");
1086 if (!odev && tb[RTA_OIF]) {
1087 tb[RTA_OIF]->rta_type = 0;
1089 if (tb[RTA_GATEWAY]) {
1090 tb[RTA_GATEWAY]->rta_type = 0;
1092 if (!idev && tb[RTA_IIF]) {
1093 tb[RTA_IIF]->rta_type = 0;
1095 req.n.nlmsg_flags = NLM_F_REQUEST;
1096 req.n.nlmsg_type = RTM_GETROUTE;
1098 if (rtnl_talk(&rth, &req.n, 0, 0, &req.n, NULL, NULL) < 0) {
1102 print_route(NULL, &req.n, NULL);
1106 /* Return value becomes exitcode. It's okay to not return at all */
1107 int FAST_FUNC do_iproute(char **argv)
1109 static const char ip_route_commands[] ALIGN1 =
1110 "a\0""add\0""append\0""change\0""chg\0"
1111 "delete\0""get\0""list\0""show\0"
1112 "prepend\0""replace\0""test\0""flush\0"
1115 CMD_a = 0, CMD_add, CMD_append, CMD_change, CMD_chg,
1116 CMD_delete, CMD_get, CMD_list, CMD_show,
1117 CMD_prepend, CMD_replace, CMD_test, CMD_flush,
1121 int cmd = RTM_NEWROUTE;
1126 return iproute_list_or_flush(argv, 0);
1128 /* "Standard" 'ip r a' treats 'a' as 'add', not 'append' */
1129 /* It probably means that it is using "first match" rule */
1130 command_num = index_in_substrings(ip_route_commands, *argv);
1132 switch (command_num) {
1135 flags = NLM_F_CREATE|NLM_F_EXCL;
1138 flags = NLM_F_CREATE|NLM_F_APPEND;
1142 flags = NLM_F_REPLACE;
1148 return iproute_get(argv + 1);
1151 return iproute_list_or_flush(argv + 1, 0);
1153 flags = NLM_F_CREATE;
1156 flags = NLM_F_CREATE|NLM_F_REPLACE;
1162 return iproute_list_or_flush(argv + 1, 1);
1164 invarg_1_to_2(*argv, applet_name);
1167 return iproute_modify(cmd, flags, argv + 1);