1 /* vi: set sw=4 ts=4: */
3 * iproute.c "ip route".
5 * Licensed under the GPL v2 or later, see the file LICENSE in this tarball.
7 * Authors: Alexey Kuznetsov, <kuznet@ms2.inr.ac.ru>
12 * Rani Assaf <rani@magic.metawire.com> 980929: resolve addresses
13 * Kunihiro Ishiguro <kunihiro@zebra.org> 001102: rtnh_ifindex was not initialized
20 #include "ip_common.h"
23 #define RTAX_RTTVAR RTAX_HOPS
34 struct rtnl_handle *rth;
35 int protocol, protocolmask;
50 static int flush_update(void)
52 if (rtnl_send(filter.rth, filter.flushb, filter.flushp) < 0) {
53 perror("Failed to send flush request\n");
60 static unsigned get_hz(void)
62 static unsigned hz_internal;
68 fp = fopen("/proc/net/psched", "r");
72 if (fscanf(fp, "%*08x%*08x%08x%08x", &nom, &denom) == 2)
78 hz_internal = sysconf(_SC_CLK_TCK);
82 static int print_route(struct sockaddr_nl *who ATTRIBUTE_UNUSED,
83 struct nlmsghdr *n, void *arg)
85 FILE *fp = (FILE*)arg;
86 struct rtmsg *r = NLMSG_DATA(n);
87 int len = n->nlmsg_len;
88 struct rtattr * tb[RTA_MAX+1];
96 if (n->nlmsg_type != RTM_NEWROUTE && n->nlmsg_type != RTM_DELROUTE) {
97 fprintf(stderr, "Not a route: %08x %08x %08x\n",
98 n->nlmsg_len, n->nlmsg_type, n->nlmsg_flags);
101 if (filter.flushb && n->nlmsg_type != RTM_NEWROUTE)
103 len -= NLMSG_LENGTH(sizeof(*r));
105 bb_error_msg("wrong nlmsg len %d", len);
109 if (r->rtm_family == AF_INET6)
111 else if (r->rtm_family == AF_INET)
114 if (r->rtm_family == AF_INET6) {
117 if (!(r->rtm_flags&RTM_F_CLONED)) {
121 if (r->rtm_flags&RTM_F_CLONED) {
124 if (filter.tb == RT_TABLE_LOCAL) {
125 if (r->rtm_type != RTN_LOCAL) {
128 } else if (filter.tb == RT_TABLE_MAIN) {
129 if (r->rtm_type == RTN_LOCAL) {
138 if (filter.tb > 0 && filter.tb != r->rtm_table) {
142 if (filter.rdst.family &&
143 (r->rtm_family != filter.rdst.family || filter.rdst.bitlen > r->rtm_dst_len)) {
146 if (filter.mdst.family &&
147 (r->rtm_family != filter.mdst.family ||
148 (filter.mdst.bitlen >= 0 && filter.mdst.bitlen < r->rtm_dst_len))) {
151 if (filter.rsrc.family &&
152 (r->rtm_family != filter.rsrc.family || filter.rsrc.bitlen > r->rtm_src_len)) {
155 if (filter.msrc.family &&
156 (r->rtm_family != filter.msrc.family ||
157 (filter.msrc.bitlen >= 0 && filter.msrc.bitlen < r->rtm_src_len))) {
161 memset(tb, 0, sizeof(tb));
162 parse_rtattr(tb, RTA_MAX, RTM_RTA(r), len);
164 if (filter.rdst.family && inet_addr_match(&dst, &filter.rdst, filter.rdst.bitlen))
166 if (filter.mdst.family && filter.mdst.bitlen >= 0 &&
167 inet_addr_match(&dst, &filter.mdst, r->rtm_dst_len))
170 if (filter.rsrc.family && inet_addr_match(&src, &filter.rsrc, filter.rsrc.bitlen))
172 if (filter.msrc.family && filter.msrc.bitlen >= 0 &&
173 inet_addr_match(&src, &filter.msrc, r->rtm_src_len))
177 r->rtm_family == AF_INET6 &&
178 r->rtm_dst_len == 0 &&
179 r->rtm_type == RTN_UNREACHABLE &&
181 *(int*)RTA_DATA(tb[RTA_PRIORITY]) == -1)
186 if (NLMSG_ALIGN(filter.flushp) + n->nlmsg_len > filter.flushe) {
190 fn = (struct nlmsghdr*)(filter.flushb + NLMSG_ALIGN(filter.flushp));
191 memcpy(fn, n, n->nlmsg_len);
192 fn->nlmsg_type = RTM_DELROUTE;
193 fn->nlmsg_flags = NLM_F_REQUEST;
194 fn->nlmsg_seq = ++filter.rth->seq;
195 filter.flushp = (((char*)fn) + n->nlmsg_len) - filter.flushb;
200 if (n->nlmsg_type == RTM_DELROUTE) {
201 fprintf(fp, "Deleted ");
203 if (r->rtm_type != RTN_UNICAST && !filter.type) {
204 fprintf(fp, "%s ", rtnl_rtntype_n2a(r->rtm_type, b1, sizeof(b1)));
208 if (r->rtm_dst_len != host_len) {
209 fprintf(fp, "%s/%u ", rt_addr_n2a(r->rtm_family,
210 RTA_PAYLOAD(tb[RTA_DST]),
211 RTA_DATA(tb[RTA_DST]),
216 fprintf(fp, "%s ", format_host(r->rtm_family,
217 RTA_PAYLOAD(tb[RTA_DST]),
218 RTA_DATA(tb[RTA_DST]),
222 } else if (r->rtm_dst_len) {
223 fprintf(fp, "0/%d ", r->rtm_dst_len);
225 fprintf(fp, "default ");
228 if (r->rtm_src_len != host_len) {
229 fprintf(fp, "from %s/%u ", rt_addr_n2a(r->rtm_family,
230 RTA_PAYLOAD(tb[RTA_SRC]),
231 RTA_DATA(tb[RTA_SRC]),
236 fprintf(fp, "from %s ", format_host(r->rtm_family,
237 RTA_PAYLOAD(tb[RTA_SRC]),
238 RTA_DATA(tb[RTA_SRC]),
242 } else if (r->rtm_src_len) {
243 fprintf(fp, "from 0/%u ", r->rtm_src_len);
245 if (tb[RTA_GATEWAY] && filter.rvia.bitlen != host_len) {
246 fprintf(fp, "via %s ",
247 format_host(r->rtm_family,
248 RTA_PAYLOAD(tb[RTA_GATEWAY]),
249 RTA_DATA(tb[RTA_GATEWAY]),
250 abuf, sizeof(abuf)));
252 if (tb[RTA_OIF] && filter.oifmask != -1) {
253 fprintf(fp, "dev %s ", ll_index_to_name(*(int*)RTA_DATA(tb[RTA_OIF])));
256 if (tb[RTA_PREFSRC] && filter.rprefsrc.bitlen != host_len) {
257 /* Do not use format_host(). It is our local addr
258 and symbolic name will not be useful.
260 fprintf(fp, " src %s ",
261 rt_addr_n2a(r->rtm_family,
262 RTA_PAYLOAD(tb[RTA_PREFSRC]),
263 RTA_DATA(tb[RTA_PREFSRC]),
264 abuf, sizeof(abuf)));
266 if (tb[RTA_PRIORITY]) {
267 fprintf(fp, " metric %d ", *(uint32_t*)RTA_DATA(tb[RTA_PRIORITY]));
269 if (r->rtm_family == AF_INET6) {
270 struct rta_cacheinfo *ci = NULL;
271 if (tb[RTA_CACHEINFO]) {
272 ci = RTA_DATA(tb[RTA_CACHEINFO]);
274 if ((r->rtm_flags & RTM_F_CLONED) || (ci && ci->rta_expires)) {
275 if (r->rtm_flags & RTM_F_CLONED) {
276 fprintf(fp, "%s cache ", _SL_);
278 if (ci->rta_expires) {
279 fprintf(fp, " expires %dsec", ci->rta_expires / get_hz());
281 if (ci->rta_error != 0) {
282 fprintf(fp, " error %d", ci->rta_error);
285 if (ci->rta_error != 0)
286 fprintf(fp, " error %d", ci->rta_error);
289 if (tb[RTA_IIF] && filter.iifmask != -1) {
290 fprintf(fp, " iif %s", ll_index_to_name(*(int*)RTA_DATA(tb[RTA_IIF])));
297 static int iproute_modify(int cmd, unsigned flags, int argc, char **argv)
299 struct rtnl_handle rth;
306 struct rtattr * mxrta = (void*)mxbuf;
314 memset(&req, 0, sizeof(req));
316 req.n.nlmsg_len = NLMSG_LENGTH(sizeof(struct rtmsg));
317 req.n.nlmsg_flags = NLM_F_REQUEST|flags;
318 req.n.nlmsg_type = cmd;
319 req.r.rtm_family = preferred_family;
320 req.r.rtm_table = RT_TABLE_MAIN;
321 req.r.rtm_scope = RT_SCOPE_NOWHERE;
323 if (cmd != RTM_DELROUTE) {
324 req.r.rtm_protocol = RTPROT_BOOT;
325 req.r.rtm_scope = RT_SCOPE_UNIVERSE;
326 req.r.rtm_type = RTN_UNICAST;
329 mxrta->rta_type = RTA_METRICS;
330 mxrta->rta_len = RTA_LENGTH(0);
333 if (strcmp(*argv, "src") == 0) {
336 get_addr(&addr, *argv, req.r.rtm_family);
337 if (req.r.rtm_family == AF_UNSPEC) {
338 req.r.rtm_family = addr.family;
340 addattr_l(&req.n, sizeof(req), RTA_PREFSRC, &addr.data, addr.bytelen);
341 } else if (strcmp(*argv, "via") == 0) {
345 get_addr(&addr, *argv, req.r.rtm_family);
346 if (req.r.rtm_family == AF_UNSPEC) {
347 req.r.rtm_family = addr.family;
349 addattr_l(&req.n, sizeof(req), RTA_GATEWAY, &addr.data, addr.bytelen);
350 } else if (strcmp(*argv, "mtu") == 0) {
353 if (strcmp(*argv, "lock") == 0) {
354 mxlock |= (1<<RTAX_MTU);
357 if (get_unsigned(&mtu, *argv, 0)) {
358 invarg(*argv, "mtu");
360 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_MTU, mtu);
361 } else if (matches(*argv, "protocol") == 0) {
364 if (rtnl_rtprot_a2n(&prot, *argv))
365 invarg(*argv, "protocol");
366 req.r.rtm_protocol = prot;
368 #if ENABLE_FEATURE_IP_RULE
369 } else if (matches(*argv, "table") == 0) {
372 if (rtnl_rttable_a2n(&tid, *argv))
373 invarg(*argv, "table");
374 req.r.rtm_table = tid;
376 } else if (strcmp(*argv, "dev") == 0 ||
377 strcmp(*argv, "oif") == 0) {
384 if (strcmp(*argv, "to") == 0) {
387 if ((**argv < '0' || **argv > '9') &&
388 rtnl_rtntype_a2n(&type, *argv) == 0) {
390 req.r.rtm_type = type;
395 duparg2("to", *argv);
397 get_prefix(&dst, *argv, req.r.rtm_family);
398 if (req.r.rtm_family == AF_UNSPEC) {
399 req.r.rtm_family = dst.family;
401 req.r.rtm_dst_len = dst.bitlen;
404 addattr_l(&req.n, sizeof(req), RTA_DST, &dst.data, dst.bytelen);
410 if (rtnl_open(&rth, 0) < 0) {
420 idx = ll_name_to_index(d);
422 bb_error_msg("cannot find device \"%s\"", d);
425 addattr32(&req.n, sizeof(req), RTA_OIF, idx);
429 if (mxrta->rta_len > RTA_LENGTH(0)) {
431 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_LOCK, mxlock);
433 addattr_l(&req.n, sizeof(req), RTA_METRICS, RTA_DATA(mxrta), RTA_PAYLOAD(mxrta));
436 if (req.r.rtm_family == AF_UNSPEC) {
437 req.r.rtm_family = AF_INET;
440 if (rtnl_talk(&rth, &req.n, 0, 0, NULL, NULL, NULL) < 0) {
447 static int rtnl_rtcache_request(struct rtnl_handle *rth, int family)
453 struct sockaddr_nl nladdr;
455 memset(&nladdr, 0, sizeof(nladdr));
456 memset(&req, 0, sizeof(req));
457 nladdr.nl_family = AF_NETLINK;
459 req.nlh.nlmsg_len = sizeof(req);
460 req.nlh.nlmsg_type = RTM_GETROUTE;
461 req.nlh.nlmsg_flags = NLM_F_ROOT|NLM_F_REQUEST;
462 req.nlh.nlmsg_pid = 0;
463 req.nlh.nlmsg_seq = rth->dump = ++rth->seq;
464 req.rtm.rtm_family = family;
465 req.rtm.rtm_flags |= RTM_F_CLONED;
467 return sendto(rth->fd, (void*)&req, sizeof(req), 0, (struct sockaddr*)&nladdr, sizeof(nladdr));
470 static int iproute_flush_cache(void)
472 #define ROUTE_FLUSH_PATH "/proc/sys/net/ipv4/route/flush"
475 int flush_fd = open (ROUTE_FLUSH_PATH, O_WRONLY);
479 fprintf(stderr, "Cannot open \"%s\"\n", ROUTE_FLUSH_PATH);
483 len = strlen (buffer);
485 if ((write (flush_fd, (void *)buffer, len)) < len) {
486 fprintf(stderr, "Cannot flush routing cache\n");
493 static void iproute_reset_filter(void)
495 memset(&filter, 0, sizeof(filter));
496 filter.mdst.bitlen = -1;
497 filter.msrc.bitlen = -1;
500 static int iproute_list_or_flush(int argc, char **argv, int flush)
502 int do_ipv6 = preferred_family;
503 struct rtnl_handle rth;
507 iproute_reset_filter();
508 filter.tb = RT_TABLE_MAIN;
510 if (flush && argc <= 0) {
511 bb_error_msg(bb_msg_requires_arg, "\"ip route flush\"");
516 if (matches(*argv, "protocol") == 0) {
519 filter.protocolmask = -1;
520 if (rtnl_rtprot_a2n(&prot, *argv)) {
521 if (strcmp(*argv, "all") != 0) {
522 invarg(*argv, "protocol");
525 filter.protocolmask = 0;
527 filter.protocol = prot;
528 } else if (strcmp(*argv, "dev") == 0 ||
529 strcmp(*argv, "oif") == 0) {
532 } else if (strcmp(*argv, "iif") == 0) {
535 } else if (matches(*argv, "from") == 0) {
537 if (matches(*argv, "root") == 0) {
539 get_prefix(&filter.rsrc, *argv, do_ipv6);
540 } else if (matches(*argv, "match") == 0) {
542 get_prefix(&filter.msrc, *argv, do_ipv6);
544 if (matches(*argv, "exact") == 0) {
547 get_prefix(&filter.msrc, *argv, do_ipv6);
548 filter.rsrc = filter.msrc;
551 if (matches(*argv, "to") == 0) {
554 if (matches(*argv, "root") == 0) {
556 get_prefix(&filter.rdst, *argv, do_ipv6);
557 } else if (matches(*argv, "match") == 0) {
559 get_prefix(&filter.mdst, *argv, do_ipv6);
560 } else if (matches(*argv, "table") == 0) {
562 if (matches(*argv, "cache") == 0) {
564 #if 0 && ENABLE_FEATURE_IP_RULE
567 } else if (matches(*argv, "main") != 0) {
568 invarg(*argv, "table");
571 } else if (matches(*argv, "cache") == 0) {
574 if (matches(*argv, "exact") == 0) {
577 get_prefix(&filter.mdst, *argv, do_ipv6);
578 filter.rdst = filter.mdst;
584 if (do_ipv6 == AF_UNSPEC && filter.tb) {
588 if (rtnl_open(&rth, 0) < 0) {
598 if ((idx = ll_name_to_index(id)) == 0) {
599 bb_error_msg("cannot find device \"%s\"", id);
606 if ((idx = ll_name_to_index(od)) == 0) {
607 bb_error_msg("cannot find device \"%s\"", od);
615 char flushb[4096-512];
617 if (filter.tb == -1) {
618 if (do_ipv6 != AF_INET6)
619 iproute_flush_cache();
620 if (do_ipv6 == AF_INET)
624 filter.flushb = flushb;
626 filter.flushe = sizeof(flushb);
630 if (rtnl_wilddump_request(&rth, do_ipv6, RTM_GETROUTE) < 0) {
631 perror("Cannot send dump request");
635 if (rtnl_dump_filter(&rth, print_route, stdout, NULL, NULL) < 0) {
636 bb_error_msg("flush terminated");
639 if (filter.flushed == 0) {
643 if (flush_update() < 0)
648 if (filter.tb != -1) {
649 if (rtnl_wilddump_request(&rth, do_ipv6, RTM_GETROUTE) < 0) {
650 bb_perror_msg_and_die("cannot send dump request");
653 if (rtnl_rtcache_request(&rth, do_ipv6) < 0) {
654 bb_perror_msg_and_die("cannot send dump request");
658 if (rtnl_dump_filter(&rth, print_route, stdout, NULL, NULL) < 0) {
659 bb_error_msg_and_die("dump terminated");
666 static int iproute_get(int argc, char **argv)
668 struct rtnl_handle rth;
678 static const char * const options[] =
679 { "from", "iif", "oif", "dev", "notify", "connected", "to", 0 };
681 memset(&req, 0, sizeof(req));
683 iproute_reset_filter();
685 req.n.nlmsg_len = NLMSG_LENGTH(sizeof(struct rtmsg));
686 req.n.nlmsg_flags = NLM_F_REQUEST;
687 req.n.nlmsg_type = RTM_GETROUTE;
688 req.r.rtm_family = preferred_family;
690 req.r.rtm_protocol = 0;
693 req.r.rtm_src_len = 0;
694 req.r.rtm_dst_len = 0;
698 switch (index_in_str_array(options, *argv)) {
704 get_prefix(&addr, *argv, req.r.rtm_family);
705 if (req.r.rtm_family == AF_UNSPEC) {
706 req.r.rtm_family = addr.family;
709 addattr_l(&req.n, sizeof(req), RTA_SRC, &addr.data, addr.bytelen);
711 req.r.rtm_src_len = addr.bitlen;
724 req.r.rtm_flags |= RTM_F_NOTIFY;
726 case 5: /* connected */
734 get_prefix(&addr, *argv, req.r.rtm_family);
735 if (req.r.rtm_family == AF_UNSPEC) {
736 req.r.rtm_family = addr.family;
739 addattr_l(&req.n, sizeof(req), RTA_DST, &addr.data, addr.bytelen);
741 req.r.rtm_dst_len = addr.bitlen;
747 if (req.r.rtm_dst_len == 0) {
748 bb_error_msg_and_die("need at least destination address");
751 if (rtnl_open(&rth, 0) < 0)
760 if ((idx = ll_name_to_index(idev)) == 0) {
761 bb_error_msg("cannot find device \"%s\"", idev);
764 addattr32(&req.n, sizeof(req), RTA_IIF, idx);
767 if ((idx = ll_name_to_index(odev)) == 0) {
768 bb_error_msg("cannot find device \"%s\"", odev);
771 addattr32(&req.n, sizeof(req), RTA_OIF, idx);
775 if (req.r.rtm_family == AF_UNSPEC) {
776 req.r.rtm_family = AF_INET;
779 if (rtnl_talk(&rth, &req.n, 0, 0, &req.n, NULL, NULL) < 0) {
783 if (connected && !from_ok) {
784 struct rtmsg *r = NLMSG_DATA(&req.n);
785 int len = req.n.nlmsg_len;
786 struct rtattr * tb[RTA_MAX+1];
788 if (print_route(NULL, &req.n, (void*)stdout) < 0) {
789 bb_error_msg_and_die("an error :-)");
792 if (req.n.nlmsg_type != RTM_NEWROUTE) {
793 bb_error_msg("not a route?");
796 len -= NLMSG_LENGTH(sizeof(*r));
798 bb_error_msg("wrong len %d", len);
802 memset(tb, 0, sizeof(tb));
803 parse_rtattr(tb, RTA_MAX, RTM_RTA(r), len);
805 if (tb[RTA_PREFSRC]) {
806 tb[RTA_PREFSRC]->rta_type = RTA_SRC;
807 r->rtm_src_len = 8*RTA_PAYLOAD(tb[RTA_PREFSRC]);
808 } else if (!tb[RTA_SRC]) {
809 bb_error_msg("failed to connect the route");
812 if (!odev && tb[RTA_OIF]) {
813 tb[RTA_OIF]->rta_type = 0;
815 if (tb[RTA_GATEWAY]) {
816 tb[RTA_GATEWAY]->rta_type = 0;
818 if (!idev && tb[RTA_IIF]) {
819 tb[RTA_IIF]->rta_type = 0;
821 req.n.nlmsg_flags = NLM_F_REQUEST;
822 req.n.nlmsg_type = RTM_GETROUTE;
824 if (rtnl_talk(&rth, &req.n, 0, 0, &req.n, NULL, NULL) < 0) {
829 if (print_route(NULL, &req.n, (void*)stdout) < 0) {
830 bb_error_msg_and_die("an error :-)");
836 int do_iproute(int argc, char **argv)
838 static const char * const ip_route_commands[] =
839 { "add", "append", "change", "chg", "delete", "get",
840 "list", "show", "prepend", "replace", "test", "flush", 0 };
842 unsigned int flags = 0;
843 int cmd = RTM_NEWROUTE;
845 /* "Standard" 'ip r a' treats 'a' as 'add', not 'append' */
846 /* It probably means that it is using "first match" rule */
848 command_num = index_in_substr_array(ip_route_commands, *argv);
850 switch (command_num) {
852 flags = NLM_F_CREATE|NLM_F_EXCL;
855 flags = NLM_F_CREATE|NLM_F_APPEND;
859 flags = NLM_F_REPLACE;
866 return iproute_get(argc-1, argv+1);
869 return iproute_list_or_flush(argc-1, argv+1, 0);
870 case 9: /* prepend */
871 flags = NLM_F_CREATE;
872 case 10: /* replace */
873 flags = NLM_F_CREATE|NLM_F_REPLACE;
877 return iproute_list_or_flush(argc-1, argv+1, 1);
879 bb_error_msg_and_die("unknown command %s", *argv);
882 return iproute_modify(cmd, flags, argc-1, argv+1);