1 /* vi: set sw=4 ts=4: */
4 * Similar to the standard Unix route, but with only the necessary
5 * parts for AF_INET and AF_INET6
7 * Bjorn Wesen, Axis Communications AB
9 * Author of the original route:
10 * Fred N. van Kempen, <waltje@uwalt.nl.mugnet.org>
11 * (derived from FvK's 'route.c 1.70 01/04/94')
13 * Licensed under GPLv2 or later, see file LICENSE in this tarball for details.
15 * $Id: route.c,v 1.26 2004/03/19 23:27:08 mjn3 Exp $
17 * displayroute() code added by Vladimir N. Oleynik <dzo@simtreas.ru>
18 * adjustments by Larry Doolittle <LRDoolittle@lbl.gov>
20 * IPV6 support added by Bart Visscher <magick@linux-fan.com>
23 /* 2004/03/09 Manuel Novoa III <mjn3@codepoet.org>
25 * Rewritten to fix several bugs, add additional error checking, and
26 * remove ridiculous amounts of bloat.
30 #include "inet_common.h"
32 #include <net/route.h>
37 /* Keep this in sync with /usr/src/linux/include/linux/route.h */
38 #define RTF_UP 0x0001 /* route usable */
39 #define RTF_GATEWAY 0x0002 /* destination is a gateway */
40 #define RTF_HOST 0x0004 /* host entry (net otherwise) */
41 #define RTF_REINSTATE 0x0008 /* reinstate route after tmout */
42 #define RTF_DYNAMIC 0x0010 /* created dyn. (by redirect) */
43 #define RTF_MODIFIED 0x0020 /* modified dyn. (by redirect) */
44 #define RTF_MTU 0x0040 /* specific MTU for this route */
46 #define RTF_MSS RTF_MTU /* Compatibility :-( */
48 #define RTF_WINDOW 0x0080 /* per route window clamping */
49 #define RTF_IRTT 0x0100 /* Initial round trip time */
50 #define RTF_REJECT 0x0200 /* Reject route */
53 #if defined (SIOCADDRTOLD) || defined (RTF_IRTT) /* route */
54 #define HAVE_NEW_ADDRT 1
58 #define mask_in_addr(x) (((struct sockaddr_in *)&((x).rt_genmask))->sin_addr.s_addr)
59 #define full_mask(x) (x)
61 #define mask_in_addr(x) ((x).rt_genmask)
62 #define full_mask(x) (((struct sockaddr_in *)&(x))->sin_addr.s_addr)
65 /* The RTACTION entries must agree with tbl_verb[] below! */
66 #define RTACTION_ADD 1
67 #define RTACTION_DEL 2
69 /* For the various tbl_*[] arrays, the 1st byte is the offset to
70 * the next entry and the 2nd byte is return value. */
75 /* We remap '-' to '#' to avoid problems with getopt. */
76 static const char tbl_hash_net_host[] =
78 /* "\010\002#host\0" */
79 "\007\002#host" /* Since last, we can save a byte. */
82 #define KW_TAKES_ARG 020
83 #define KW_SETS_FLAG 040
85 #define KW_IPVx_METRIC 020
86 #define KW_IPVx_NETMASK 021
87 #define KW_IPVx_GATEWAY 022
88 #define KW_IPVx_MSS 023
89 #define KW_IPVx_WINDOW 024
90 #define KW_IPVx_IRTT 025
91 #define KW_IPVx_DEVICE 026
93 #define KW_IPVx_FLAG_ONLY 040
94 #define KW_IPVx_REJECT 040
95 #define KW_IPVx_MOD 041
96 #define KW_IPVx_DYN 042
97 #define KW_IPVx_REINSTATE 043
99 static const char tbl_ipvx[] =
100 /* 020 is the "takes an arg" bit */
114 /* 040 is the "sets a flag" bit - MUST match flags_ipvx[] values below. */
120 /* "\014\043reinstate\0" */
121 "\013\043reinstate" /* Since last, we can save a byte. */
124 static const int flags_ipvx[] = { /* MUST match tbl_ipvx[] values above. */
133 static int kw_lookup(const char *kwtbl, char ***pargs)
137 if (strcmp(kwtbl+2, **pargs) == 0) { /* Found a match. */
139 if (kwtbl[1] & KW_TAKES_ARG) {
140 if (!**pargs) { /* No more args! */
143 *pargs += 1; /* Calling routine will use args[-1]. */
153 /* Add or delete a route, depending on action. */
155 static void INET_setroute(int action, char **args)
158 const char *netmask = NULL;
159 int skfd, isnet, xflag;
161 /* Grab the -net or -host options. Remember they were transformed. */
162 xflag = kw_lookup(tbl_hash_net_host, &args);
164 /* If we did grab -net or -host, make sure we still have an arg left. */
169 /* Clean out the RTREQ structure. */
170 memset((char *) &rt, 0, sizeof(struct rtentry));
173 const char *target = *args++;
176 /* recognize x.x.x.x/mask format. */
177 prefix = strchr(target, '/');
181 prefix_len = xatoul_range(prefix+1, 0, 32);
182 mask_in_addr(rt) = htonl( ~ (0xffffffffUL >> prefix_len));
185 rt.rt_genmask.sa_family = AF_INET;
188 /* Default netmask. */
189 netmask = bb_INET_default;
191 /* Prefer hostname lookup is -host flag (xflag==1) was given. */
192 isnet = INET_resolve(target, (struct sockaddr_in *) &rt.rt_dst,
193 (xflag & HOST_FLAG));
195 bb_error_msg_and_die("resolving %s", target);
198 /* do not destroy prefix for process args */
203 if (xflag) { /* Reinit isnet if -net or -host was specified. */
204 isnet = (xflag & NET_FLAG);
207 /* Fill in the other fields. */
208 rt.rt_flags = ((isnet) ? RTF_UP : (RTF_UP | RTF_HOST));
211 int k = kw_lookup(tbl_ipvx, &args);
212 const char *args_m1 = args[-1];
214 if (k & KW_IPVx_FLAG_ONLY) {
215 rt.rt_flags |= flags_ipvx[k & 3];
220 if (k == KW_IPVx_METRIC) {
221 rt.rt_metric = xatoul(args_m1) + 1;
226 if (k == KW_IPVx_NETMASK) {
227 struct sockaddr mask;
229 if (mask_in_addr(rt)) {
234 isnet = INET_resolve(netmask, (struct sockaddr_in *) &mask, 0);
236 bb_error_msg_and_die("resolving %s", netmask);
238 rt.rt_genmask = full_mask(mask);
242 if (k == KW_IPVx_GATEWAY) {
243 if (rt.rt_flags & RTF_GATEWAY) {
247 isnet = INET_resolve(args_m1,
248 (struct sockaddr_in *) &rt.rt_gateway, 1);
249 rt.rt_flags |= RTF_GATEWAY;
253 bb_error_msg_and_die("resolving %s", args_m1);
255 bb_error_msg_and_die("gateway %s is a NETWORK", args_m1);
260 if (k == KW_IPVx_MSS) { /* Check valid MSS bounds. */
261 rt.rt_flags |= RTF_MSS;
262 rt.rt_mss = xatoul_range(args_m1, 64, 32768);
266 if (k == KW_IPVx_WINDOW) { /* Check valid window bounds. */
267 rt.rt_flags |= RTF_WINDOW;
268 rt.rt_window = xatoul_range(args_m1, 128, INT_MAX);
273 if (k == KW_IPVx_IRTT) {
274 rt.rt_flags |= RTF_IRTT;
275 rt.rt_irtt = xatoul(args_m1);
276 rt.rt_irtt *= (sysconf(_SC_CLK_TCK) / 100); /* FIXME */
277 #if 0 /* FIXME: do we need to check anything of this? */
278 if (rt.rt_irtt < 1 || rt.rt_irtt > (120 * HZ)) {
279 bb_error_msg_and_die("bad irtt");
286 /* Device is special in that it can be the last arg specified
287 * and doesn't requre the dev/device keyword in that case. */
288 if (!rt.rt_dev && ((k == KW_IPVx_DEVICE) || (!k && !*++args))) {
289 /* Don't use args_m1 here since args may have changed! */
290 rt.rt_dev = args[-1];
294 /* Nothing matched. */
299 if ((rt.rt_flags & RTF_REJECT) && !rt.rt_dev) {
304 /* sanity checks.. */
305 if (mask_in_addr(rt)) {
306 unsigned long mask = mask_in_addr(rt);
309 if ((rt.rt_flags & RTF_HOST) && mask != 0xffffffff) {
310 bb_error_msg_and_die("netmask %.8x and host route conflict",
311 (unsigned int) mask);
313 if (mask & (mask + 1)) {
314 bb_error_msg_and_die("bogus netmask %s", netmask);
316 mask = ((struct sockaddr_in *) &rt.rt_dst)->sin_addr.s_addr;
317 if (mask & ~mask_in_addr(rt)) {
318 bb_error_msg_and_die("netmask and route address conflict");
322 /* Fill out netmask if still unset */
323 if ((action == RTACTION_ADD) && (rt.rt_flags & RTF_HOST)) {
324 mask_in_addr(rt) = 0xffffffff;
327 /* Create a socket to the INET kernel. */
328 skfd = xsocket(AF_INET, SOCK_DGRAM, 0);
330 if (ioctl(skfd, ((action==RTACTION_ADD) ? SIOCADDRT : SIOCDELRT), &rt)<0) {
331 bb_perror_msg_and_die("SIOC[ADD|DEL]RT");
334 if (ENABLE_FEATURE_CLEAN_UP) close(skfd);
337 #ifdef CONFIG_FEATURE_IPV6
339 static void INET6_setroute(int action, char **args)
341 struct sockaddr_in6 sa6;
343 int prefix_len, skfd;
346 /* We know args isn't NULL from the check in route_main. */
347 const char *target = *args++;
349 if (strcmp(target, bb_INET_default) == 0) {
351 memset(&sa6, 0, sizeof(sa6));
354 if ((cp = strchr(target, '/'))) { /* Yes... const to non is ok. */
356 prefix_len = xatoul_range(cp+1, 0, 128);
360 if (INET6_resolve(target, (struct sockaddr_in6 *) &sa6) < 0) {
361 bb_error_msg_and_die("resolving %s", target);
365 /* Clean out the RTREQ structure. */
366 memset((char *) &rt, 0, sizeof(struct in6_rtmsg));
368 memcpy(&rt.rtmsg_dst, sa6.sin6_addr.s6_addr, sizeof(struct in6_addr));
370 /* Fill in the other fields. */
371 rt.rtmsg_dst_len = prefix_len;
372 rt.rtmsg_flags = ((prefix_len == 128) ? (RTF_UP|RTF_HOST) : RTF_UP);
378 int k = kw_lookup(tbl_ipvx, &args);
379 const char *args_m1 = args[-1];
381 if ((k == KW_IPVx_MOD) || (k == KW_IPVx_DYN)) {
382 rt.rtmsg_flags |= flags_ipvx[k & 3];
386 if (k == KW_IPVx_METRIC) {
387 rt.rtmsg_metric = xatoul(args_m1);
391 if (k == KW_IPVx_GATEWAY) {
392 if (rt.rtmsg_flags & RTF_GATEWAY) {
396 if (INET6_resolve(args_m1, (struct sockaddr_in6 *) &sa6) < 0) {
397 bb_error_msg_and_die("resolving %s", args_m1);
399 memcpy(&rt.rtmsg_gateway, sa6.sin6_addr.s6_addr,
400 sizeof(struct in6_addr));
401 rt.rtmsg_flags |= RTF_GATEWAY;
405 /* Device is special in that it can be the last arg specified
406 * and doesn't requre the dev/device keyword in that case. */
407 if (!devname && ((k == KW_IPVx_DEVICE) || (!k && !*++args))) {
408 /* Don't use args_m1 here since args may have changed! */
413 /* Nothing matched. */
417 /* Create a socket to the INET6 kernel. */
418 skfd = xsocket(AF_INET6, SOCK_DGRAM, 0);
420 rt.rtmsg_ifindex = 0;
424 memset(&ifr, 0, sizeof(ifr));
425 strcpy(ifr.ifr_name, devname);
427 if (ioctl(skfd, SIOGIFINDEX, &ifr) < 0) {
428 bb_perror_msg_and_die("SIOGIFINDEX");
430 rt.rtmsg_ifindex = ifr.ifr_ifindex;
433 /* Tell the kernel to accept this route. */
434 if (ioctl(skfd, ((action==RTACTION_ADD) ? SIOCADDRT : SIOCDELRT), &rt)<0) {
435 bb_perror_msg_and_die("SIOC[ADD|DEL]RT");
438 if (ENABLE_FEATURE_CLEAN_UP) close(skfd);
442 static const unsigned int flagvals[] = { /* Must agree with flagchars[]. */
448 #ifdef CONFIG_FEATURE_IPV6
455 #define IPV4_MASK (RTF_GATEWAY|RTF_HOST|RTF_REINSTATE|RTF_DYNAMIC|RTF_MODIFIED)
456 #define IPV6_MASK (RTF_GATEWAY|RTF_HOST|RTF_DEFAULT|RTF_ADDRCONF|RTF_CACHE)
458 static const char flagchars[] = /* Must agree with flagvals[]. */
460 #ifdef CONFIG_FEATURE_IPV6
466 #ifndef CONFIG_FEATURE_IPV6
469 void set_flags(char *flagstr, int flags)
475 for (i=0 ; (*flagstr = flagchars[i]) != 0 ; i++) {
476 if (flags & flagvals[i]) {
482 /* also used in netstat */
483 void displayroutes(int noresolve, int netstatfmt);
484 void displayroutes(int noresolve, int netstatfmt)
486 char devname[64], flags[16], sdest[16], sgw[16];
487 unsigned long int d, g, m;
488 int flgs, ref, use, metric, mtu, win, ir;
489 struct sockaddr_in s_addr;
492 FILE *fp = xfopen("/proc/net/route", "r");
494 bb_printf("Kernel IP routing table\n"
495 "Destination Gateway Genmask"
497 netstatfmt ? " MSS Window irtt" : "Metric Ref Use");
499 if (fscanf(fp, "%*[^\n]\n") < 0) { /* Skip the first line. */
500 goto ERROR; /* Empty or missing line, or read error. */
504 r = fscanf(fp, "%63s%lx%lx%X%d%d%d%lx%d%d%d\n",
505 devname, &d, &g, &flgs, &ref, &use, &metric, &m,
508 if ((r < 0) && feof(fp)) { /* EOF with no (nonspace) chars read. */
512 bb_error_msg_and_die("fscanf");
515 if (!(flgs & RTF_UP)) { /* Skip interfaces that are down. */
519 set_flags(flags, (flgs & IPV4_MASK));
521 if (flgs & RTF_REJECT) {
526 memset(&s_addr, 0, sizeof(struct sockaddr_in));
527 s_addr.sin_family = AF_INET;
528 s_addr.sin_addr.s_addr = d;
529 INET_rresolve(sdest, sizeof(sdest), &s_addr,
530 (noresolve | 0x8000), m); /* Default instead of *. */
532 s_addr.sin_addr.s_addr = g;
533 INET_rresolve(sgw, sizeof(sgw), &s_addr,
534 (noresolve | 0x4000), m); /* Host instead of net. */
537 bb_printf("%-16s%-16s%-16s%-6s", sdest, sgw, inet_ntoa(mask), flags);
539 bb_printf("%5d %-5d %6d %s\n", mtu, win, ir, devname);
541 bb_printf("%-6d %-2d %7d %s\n", metric, ref, use, devname);
546 #ifdef CONFIG_FEATURE_IPV6
548 static void INET6_displayroutes(int noresolve)
550 char addr6[128], naddr6[128];
551 /* In addr6x, we store both 40-byte ':'-delimited ipv6 addresses.
552 * We read the non-delimited strings into the tail of the buffer
553 * using fscanf and then modify the buffer by shifting forward
554 * while inserting ':'s and the nul terminator for the first string.
555 * Hence the strings are at addr6x and addr6x+40. This generates
556 * _much_ less code than the previous (upstream) approach. */
558 char iface[16], flags[16];
559 int iflags, metric, refcnt, use, prefix_len, slen;
560 struct sockaddr_in6 snaddr6;
562 FILE *fp = xfopen("/proc/net/ipv6_route", "r");
564 bb_printf("Kernel IPv6 routing table\n%-44s%-40s"
565 "Flags Metric Ref Use Iface\n",
566 "Destination", "Next Hop");
570 r = fscanf(fp, "%32s%x%*s%x%32s%x%x%x%x%s\n",
571 addr6x+14, &prefix_len, &slen, addr6x+40+7,
572 &metric, &use, &refcnt, &iflags, iface);
574 if ((r < 0) && feof(fp)) { /* EOF with no (nonspace) chars read. */
578 bb_error_msg_and_die("fscanf");
581 /* Do the addr6x shift-and-insert changes to ':'-delimit addresses.
582 * For now, always do this to validate the proc route format, even
583 * if the interface is down. */
590 if (i==40) { /* nul terminator for 1st address? */
591 addr6x[39] = 0; /* Fixup... need 0 instead of ':'. */
592 ++p; /* Skip and continue. */
601 } while (i < 40+28+7);
604 if (!(iflags & RTF_UP)) { /* Skip interfaces that are down. */
608 set_flags(flags, (iflags & IPV6_MASK));
612 inet_pton(AF_INET6, addr6x + r,
613 (struct sockaddr *) &snaddr6.sin6_addr);
614 snaddr6.sin6_family = AF_INET6;
615 INET6_rresolve(naddr6, sizeof(naddr6),
616 (struct sockaddr_in6 *) &snaddr6,
617 0x0fff /* Apparently, upstream never resolves. */
620 if (!r) { /* 1st pass */
621 snprintf(addr6, sizeof(addr6), "%s/%d", naddr6, prefix_len);
623 } else { /* 2nd pass */
624 /* Print the info. */
625 bb_printf("%-43s %-39s %-5s %-6d %-2d %7d %-8s\n",
626 addr6, naddr6, flags, metric, refcnt, use, iface);
635 #define ROUTE_OPT_A 0x01
636 #define ROUTE_OPT_n 0x02
637 #define ROUTE_OPT_e 0x04
638 #define ROUTE_OPT_INET6 0x08 /* Not an actual option. See below. */
640 /* 1st byte is offset to next entry offset. 2nd byte is return value. */
641 static const char tbl_verb[] = /* 2nd byte matches RTACTION_* code */
644 /* "\011\002delete\0" */
645 "\010\002delete" /* Since last, we can save a byte. */
648 int route_main(int argc, char **argv)
654 /* First, remap '-net' and '-host' to avoid getopt problems. */
659 if ((strcmp(*p, "-net") == 0) || (strcmp(*p, "-host") == 0)) {
665 opt = getopt32(argc, argv, "A:ne", &family);
667 if ((opt & ROUTE_OPT_A) && strcmp(family, "inet")) {
668 #ifdef CONFIG_FEATURE_IPV6
669 if (strcmp(family, "inet6") == 0) {
670 opt |= ROUTE_OPT_INET6; /* Set flag for ipv6. */
678 /* No more args means display the routing table. */
680 int noresolve = (opt & ROUTE_OPT_n) ? 0x0fff : 0;
681 #ifdef CONFIG_FEATURE_IPV6
682 if (opt & ROUTE_OPT_INET6)
683 INET6_displayroutes(noresolve);
686 displayroutes(noresolve, opt & ROUTE_OPT_e);
689 bb_fflush_stdout_and_exit(EXIT_SUCCESS);
692 /* Check verb. At the moment, must be add, del, or delete. */
693 what = kw_lookup(tbl_verb, &argv);
694 if (!what || !*argv) { /* Unknown verb or no more args. */
698 #ifdef CONFIG_FEATURE_IPV6
699 if (opt & ROUTE_OPT_INET6)
700 INET6_setroute(what, argv);
703 INET_setroute(what, argv);