2 * iproute.c "ip route".
4 * This program is free software; you can redistribute it and/or
5 * modify it under the terms of the GNU General Public License
6 * as published by the Free Software Foundation; either version
7 * 2 of the License, or (at your option) any later version.
9 * Authors: Alexey Kuznetsov, <kuznet@ms2.inr.ac.ru>
14 * Rani Assaf <rani@magic.metawire.com> 980929: resolve addresses
15 * Kunihiro Ishiguro <kunihiro@zebra.org> 001102: rtnh_ifindex was not initialized
18 #include <sys/socket.h>
29 #define RTAX_RTTVAR RTAX_HOPS
38 struct rtnl_handle *rth;
39 int protocol, protocolmask;
54 static int print_route(struct sockaddr_nl *who, struct nlmsghdr *n, void *arg)
56 FILE *fp = (FILE*)arg;
57 struct rtmsg *r = NLMSG_DATA(n);
58 int len = n->nlmsg_len;
59 struct rtattr * tb[RTA_MAX+1];
65 if (n->nlmsg_type != RTM_NEWROUTE && n->nlmsg_type != RTM_DELROUTE) {
66 fprintf(stderr, "Not a route: %08x %08x %08x\n",
67 n->nlmsg_len, n->nlmsg_type, n->nlmsg_flags);
70 len -= NLMSG_LENGTH(sizeof(*r));
72 error_msg("wrong nlmsg len %d", len);
76 if (r->rtm_family == AF_INET6)
78 else if (r->rtm_family == AF_INET)
81 if (r->rtm_family == AF_INET6) {
84 if (!(r->rtm_flags&RTM_F_CLONED)) {
88 if (r->rtm_flags&RTM_F_CLONED) {
91 if (filter.tb == RT_TABLE_LOCAL) {
92 if (r->rtm_type != RTN_LOCAL) {
95 } else if (filter.tb == RT_TABLE_MAIN) {
96 if (r->rtm_type == RTN_LOCAL) {
105 if (filter.tb > 0 && filter.tb != r->rtm_table) {
109 if (filter.rdst.family &&
110 (r->rtm_family != filter.rdst.family || filter.rdst.bitlen > r->rtm_dst_len)) {
113 if (filter.mdst.family &&
114 (r->rtm_family != filter.mdst.family ||
115 (filter.mdst.bitlen >= 0 && filter.mdst.bitlen < r->rtm_dst_len))) {
118 if (filter.rsrc.family &&
119 (r->rtm_family != filter.rsrc.family || filter.rsrc.bitlen > r->rtm_src_len)) {
122 if (filter.msrc.family &&
123 (r->rtm_family != filter.msrc.family ||
124 (filter.msrc.bitlen >= 0 && filter.msrc.bitlen < r->rtm_src_len))) {
128 memset(tb, 0, sizeof(tb));
129 parse_rtattr(tb, RTA_MAX, RTM_RTA(r), len);
131 if (n->nlmsg_type == RTM_DELROUTE) {
132 fprintf(fp, "Deleted ");
134 if (r->rtm_type != RTN_UNICAST && !filter.type) {
135 fprintf(fp, "%s ", rtnl_rtntype_n2a(r->rtm_type, b1, sizeof(b1)));
139 if (r->rtm_dst_len != host_len) {
140 fprintf(fp, "%s/%u ", rt_addr_n2a(r->rtm_family,
141 RTA_PAYLOAD(tb[RTA_DST]),
142 RTA_DATA(tb[RTA_DST]),
147 fprintf(fp, "%s ", format_host(r->rtm_family,
148 RTA_PAYLOAD(tb[RTA_DST]),
149 RTA_DATA(tb[RTA_DST]),
153 } else if (r->rtm_dst_len) {
154 fprintf(fp, "0/%d ", r->rtm_dst_len);
156 fprintf(fp, "default ");
159 if (r->rtm_src_len != host_len) {
160 fprintf(fp, "from %s/%u ", rt_addr_n2a(r->rtm_family,
161 RTA_PAYLOAD(tb[RTA_SRC]),
162 RTA_DATA(tb[RTA_SRC]),
167 fprintf(fp, "from %s ", format_host(r->rtm_family,
168 RTA_PAYLOAD(tb[RTA_SRC]),
169 RTA_DATA(tb[RTA_SRC]),
173 } else if (r->rtm_src_len) {
174 fprintf(fp, "from 0/%u ", r->rtm_src_len);
176 if (tb[RTA_GATEWAY] && filter.rvia.bitlen != host_len) {
177 fprintf(fp, "via %s ",
178 format_host(r->rtm_family,
179 RTA_PAYLOAD(tb[RTA_GATEWAY]),
180 RTA_DATA(tb[RTA_GATEWAY]),
181 abuf, sizeof(abuf)));
183 if (tb[RTA_OIF] && filter.oifmask != -1) {
184 fprintf(fp, "dev %s ", ll_index_to_name(*(int*)RTA_DATA(tb[RTA_OIF])));
187 if (tb[RTA_PREFSRC] && filter.rprefsrc.bitlen != host_len) {
188 /* Do not use format_host(). It is our local addr
189 and symbolic name will not be useful.
191 fprintf(fp, " src %s ",
192 rt_addr_n2a(r->rtm_family,
193 RTA_PAYLOAD(tb[RTA_PREFSRC]),
194 RTA_DATA(tb[RTA_PREFSRC]),
195 abuf, sizeof(abuf)));
197 if (tb[RTA_PRIORITY]) {
198 fprintf(fp, " metric %d ", *(__u32*)RTA_DATA(tb[RTA_PRIORITY]));
200 if (r->rtm_family == AF_INET6) {
201 struct rta_cacheinfo *ci = NULL;
202 if (tb[RTA_CACHEINFO]) {
203 ci = RTA_DATA(tb[RTA_CACHEINFO]);
205 if ((r->rtm_flags & RTM_F_CLONED) || (ci && ci->rta_expires)) {
210 if (r->rtm_flags & RTM_F_CLONED) {
211 fprintf(fp, "%s cache ", _SL_);
213 if (ci->rta_expires) {
214 fprintf(fp, " expires %dsec", ci->rta_expires/hz);
216 if (ci->rta_error != 0) {
217 fprintf(fp, " error %d", ci->rta_error);
220 if (ci->rta_error != 0)
221 fprintf(fp, " error %d", ci->rta_error);
224 if (tb[RTA_IIF] && filter.iifmask != -1) {
225 fprintf(fp, " iif %s", ll_index_to_name(*(int*)RTA_DATA(tb[RTA_IIF])));
232 static int iproute_modify(int cmd, unsigned flags, int argc, char **argv)
234 struct rtnl_handle rth;
241 struct rtattr * mxrta = (void*)mxbuf;
249 memset(&req, 0, sizeof(req));
251 req.n.nlmsg_len = NLMSG_LENGTH(sizeof(struct rtmsg));
252 req.n.nlmsg_flags = NLM_F_REQUEST|flags;
253 req.n.nlmsg_type = cmd;
254 req.r.rtm_family = preferred_family;
255 req.r.rtm_table = RT_TABLE_MAIN;
256 req.r.rtm_scope = RT_SCOPE_NOWHERE;
258 if (cmd != RTM_DELROUTE) {
259 req.r.rtm_protocol = RTPROT_BOOT;
260 req.r.rtm_scope = RT_SCOPE_UNIVERSE;
261 req.r.rtm_type = RTN_UNICAST;
264 mxrta->rta_type = RTA_METRICS;
265 mxrta->rta_len = RTA_LENGTH(0);
268 if (strcmp(*argv, "src") == 0) {
271 get_addr(&addr, *argv, req.r.rtm_family);
272 if (req.r.rtm_family == AF_UNSPEC) {
273 req.r.rtm_family = addr.family;
275 addattr_l(&req.n, sizeof(req), RTA_PREFSRC, &addr.data, addr.bytelen);
276 } else if (strcmp(*argv, "via") == 0) {
280 get_addr(&addr, *argv, req.r.rtm_family);
281 if (req.r.rtm_family == AF_UNSPEC) {
282 req.r.rtm_family = addr.family;
284 addattr_l(&req.n, sizeof(req), RTA_GATEWAY, &addr.data, addr.bytelen);
285 } else if (strcmp(*argv, "mtu") == 0) {
288 if (strcmp(*argv, "lock") == 0) {
289 mxlock |= (1<<RTAX_MTU);
292 if (get_unsigned(&mtu, *argv, 0)) {
293 invarg("\"mtu\" value is invalid\n", *argv);
295 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_MTU, mtu);
296 } else if (matches(*argv, "protocol") == 0) {
299 if (rtnl_rtprot_a2n(&prot, *argv))
300 invarg("\"protocol\" value is invalid\n", *argv);
301 req.r.rtm_protocol = prot;
303 } else if (strcmp(*argv, "dev") == 0 ||
304 strcmp(*argv, "oif") == 0) {
311 if (strcmp(*argv, "to") == 0) {
314 if ((**argv < '0' || **argv > '9') &&
315 rtnl_rtntype_a2n(&type, *argv) == 0) {
317 req.r.rtm_type = type;
322 duparg2("to", *argv);
324 get_prefix(&dst, *argv, req.r.rtm_family);
325 if (req.r.rtm_family == AF_UNSPEC) {
326 req.r.rtm_family = dst.family;
328 req.r.rtm_dst_len = dst.bitlen;
331 addattr_l(&req.n, sizeof(req), RTA_DST, &dst.data, dst.bytelen);
337 if (rtnl_open(&rth, 0) < 0) {
347 if ((idx = ll_name_to_index(d)) == 0) {
348 error_msg("Cannot find device \"%s\"", d);
351 addattr32(&req.n, sizeof(req), RTA_OIF, idx);
355 if (mxrta->rta_len > RTA_LENGTH(0)) {
357 rta_addattr32(mxrta, sizeof(mxbuf), RTAX_LOCK, mxlock);
359 addattr_l(&req.n, sizeof(req), RTA_METRICS, RTA_DATA(mxrta), RTA_PAYLOAD(mxrta));
362 if (req.r.rtm_family == AF_UNSPEC) {
363 req.r.rtm_family = AF_INET;
366 if (rtnl_talk(&rth, &req.n, 0, 0, NULL, NULL, NULL) < 0) {
373 static int rtnl_rtcache_request(struct rtnl_handle *rth, int family)
379 struct sockaddr_nl nladdr;
381 memset(&nladdr, 0, sizeof(nladdr));
382 memset(&req, 0, sizeof(req));
383 nladdr.nl_family = AF_NETLINK;
385 req.nlh.nlmsg_len = sizeof(req);
386 req.nlh.nlmsg_type = RTM_GETROUTE;
387 req.nlh.nlmsg_flags = NLM_F_ROOT|NLM_F_REQUEST;
388 req.nlh.nlmsg_pid = 0;
389 req.nlh.nlmsg_seq = rth->dump = ++rth->seq;
390 req.rtm.rtm_family = family;
391 req.rtm.rtm_flags |= RTM_F_CLONED;
393 return sendto(rth->fd, (void*)&req, sizeof(req), 0, (struct sockaddr*)&nladdr, sizeof(nladdr));
396 static void iproute_reset_filter(void)
398 memset(&filter, 0, sizeof(filter));
399 filter.mdst.bitlen = -1;
400 filter.msrc.bitlen = -1;
403 static int iproute_list(int argc, char **argv)
405 int do_ipv6 = preferred_family;
406 struct rtnl_handle rth;
410 iproute_reset_filter();
411 filter.tb = RT_TABLE_MAIN;
414 if (matches(*argv, "protocol") == 0) {
417 filter.protocolmask = -1;
418 if (rtnl_rtprot_a2n(&prot, *argv)) {
419 if (strcmp(*argv, "all") != 0) {
420 invarg("invalid \"protocol\"\n", *argv);
423 filter.protocolmask = 0;
425 filter.protocol = prot;
426 } else if (strcmp(*argv, "dev") == 0 ||
427 strcmp(*argv, "oif") == 0) {
430 } else if (strcmp(*argv, "iif") == 0) {
433 } else if (matches(*argv, "from") == 0) {
435 if (matches(*argv, "root") == 0) {
437 get_prefix(&filter.rsrc, *argv, do_ipv6);
438 } else if (matches(*argv, "match") == 0) {
440 get_prefix(&filter.msrc, *argv, do_ipv6);
442 if (matches(*argv, "exact") == 0) {
445 get_prefix(&filter.msrc, *argv, do_ipv6);
446 filter.rsrc = filter.msrc;
449 if (matches(*argv, "to") == 0) {
452 if (matches(*argv, "root") == 0) {
454 get_prefix(&filter.rdst, *argv, do_ipv6);
455 } else if (matches(*argv, "match") == 0) {
457 get_prefix(&filter.mdst, *argv, do_ipv6);
459 if (matches(*argv, "exact") == 0) {
462 get_prefix(&filter.mdst, *argv, do_ipv6);
463 filter.rdst = filter.mdst;
469 if (do_ipv6 == AF_UNSPEC && filter.tb) {
473 if (rtnl_open(&rth, 0) < 0) {
483 if ((idx = ll_name_to_index(id)) == 0) {
484 error_msg("Cannot find device \"%s\"", id);
491 if ((idx = ll_name_to_index(od)) == 0) {
492 error_msg("Cannot find device \"%s\"", od);
499 if (filter.tb != -1) {
500 if (rtnl_wilddump_request(&rth, do_ipv6, RTM_GETROUTE) < 0) {
501 perror_msg_and_die("Cannot send dump request");
504 if (rtnl_rtcache_request(&rth, do_ipv6) < 0) {
505 perror_msg_and_die("Cannot send dump request");
509 if (rtnl_dump_filter(&rth, print_route, stdout, NULL, NULL) < 0) {
510 error_msg_and_die("Dump terminated");
517 static int iproute_get(int argc, char **argv)
519 struct rtnl_handle rth;
529 const char *options[] = { "from", "iif", "oif", "dev", "notify", "connected", "to", 0 };
531 memset(&req, 0, sizeof(req));
533 iproute_reset_filter();
535 req.n.nlmsg_len = NLMSG_LENGTH(sizeof(struct rtmsg));
536 req.n.nlmsg_flags = NLM_F_REQUEST;
537 req.n.nlmsg_type = RTM_GETROUTE;
538 req.r.rtm_family = preferred_family;
540 req.r.rtm_protocol = 0;
543 req.r.rtm_src_len = 0;
544 req.r.rtm_dst_len = 0;
548 switch (compare_string_array(options, *argv)) {
554 get_prefix(&addr, *argv, req.r.rtm_family);
555 if (req.r.rtm_family == AF_UNSPEC) {
556 req.r.rtm_family = addr.family;
559 addattr_l(&req.n, sizeof(req), RTA_SRC, &addr.data, addr.bytelen);
561 req.r.rtm_src_len = addr.bitlen;
574 req.r.rtm_flags |= RTM_F_NOTIFY;
576 case 5: /* connected */
584 get_prefix(&addr, *argv, req.r.rtm_family);
585 if (req.r.rtm_family == AF_UNSPEC) {
586 req.r.rtm_family = addr.family;
589 addattr_l(&req.n, sizeof(req), RTA_DST, &addr.data, addr.bytelen);
591 req.r.rtm_dst_len = addr.bitlen;
597 if (req.r.rtm_dst_len == 0) {
598 error_msg_and_die("need at least destination address");
601 if (rtnl_open(&rth, 0) < 0)
610 if ((idx = ll_name_to_index(idev)) == 0) {
611 error_msg("Cannot find device \"%s\"", idev);
614 addattr32(&req.n, sizeof(req), RTA_IIF, idx);
617 if ((idx = ll_name_to_index(odev)) == 0) {
618 error_msg("Cannot find device \"%s\"", odev);
621 addattr32(&req.n, sizeof(req), RTA_OIF, idx);
625 if (req.r.rtm_family == AF_UNSPEC) {
626 req.r.rtm_family = AF_INET;
629 if (rtnl_talk(&rth, &req.n, 0, 0, &req.n, NULL, NULL) < 0) {
633 if (connected && !from_ok) {
634 struct rtmsg *r = NLMSG_DATA(&req.n);
635 int len = req.n.nlmsg_len;
636 struct rtattr * tb[RTA_MAX+1];
638 if (print_route(NULL, &req.n, (void*)stdout) < 0) {
639 error_msg_and_die("An error :-)");
642 if (req.n.nlmsg_type != RTM_NEWROUTE) {
643 error_msg("Not a route?");
646 len -= NLMSG_LENGTH(sizeof(*r));
648 error_msg("Wrong len %d", len);
652 memset(tb, 0, sizeof(tb));
653 parse_rtattr(tb, RTA_MAX, RTM_RTA(r), len);
655 if (tb[RTA_PREFSRC]) {
656 tb[RTA_PREFSRC]->rta_type = RTA_SRC;
657 r->rtm_src_len = 8*RTA_PAYLOAD(tb[RTA_PREFSRC]);
658 } else if (!tb[RTA_SRC]) {
659 error_msg("Failed to connect the route");
662 if (!odev && tb[RTA_OIF]) {
663 tb[RTA_OIF]->rta_type = 0;
665 if (tb[RTA_GATEWAY]) {
666 tb[RTA_GATEWAY]->rta_type = 0;
668 if (!idev && tb[RTA_IIF]) {
669 tb[RTA_IIF]->rta_type = 0;
671 req.n.nlmsg_flags = NLM_F_REQUEST;
672 req.n.nlmsg_type = RTM_GETROUTE;
674 if (rtnl_talk(&rth, &req.n, 0, 0, &req.n, NULL, NULL) < 0) {
679 if (print_route(NULL, &req.n, (void*)stdout) < 0) {
680 error_msg_and_die("An error :-)");
686 int do_iproute(int argc, char **argv)
688 const char *ip_route_commands[] = { "add", "append", "change", "chg",
689 "delete", "get", "list", "show", "prepend", "replace", "test", 0 };
690 unsigned short command_num = 6;
691 unsigned int flags = 0;
692 int cmd = RTM_NEWROUTE;
695 command_num = compare_string_array(ip_route_commands, *argv);
697 switch(command_num) {
699 flags = NLM_F_CREATE|NLM_F_EXCL;
702 flags = NLM_F_CREATE|NLM_F_APPEND;
706 flags = NLM_F_REPLACE;
712 return iproute_get(argc-1, argv+1);
715 return iproute_list(argc-1, argv+1);
716 case 8: /* prepend */
717 flags = NLM_F_CREATE;
718 case 9: /* replace */
719 flags = NLM_F_CREATE|NLM_F_REPLACE;
723 error_msg_and_die("Unknown command %s", *argv);
726 return iproute_modify(cmd, flags, argc-1, argv+1);