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.
37 #include <sys/types.h>
38 #include <sys/ioctl.h>
39 #include <net/route.h>
42 #include "inet_common.h"
45 /* Keep this in sync with /usr/src/linux/include/linux/route.h */
46 #define RTF_UP 0x0001 /* route usable */
47 #define RTF_GATEWAY 0x0002 /* destination is a gateway */
48 #define RTF_HOST 0x0004 /* host entry (net otherwise) */
49 #define RTF_REINSTATE 0x0008 /* reinstate route after tmout */
50 #define RTF_DYNAMIC 0x0010 /* created dyn. (by redirect) */
51 #define RTF_MODIFIED 0x0020 /* modified dyn. (by redirect) */
52 #define RTF_MTU 0x0040 /* specific MTU for this route */
54 #define RTF_MSS RTF_MTU /* Compatibility :-( */
56 #define RTF_WINDOW 0x0080 /* per route window clamping */
57 #define RTF_IRTT 0x0100 /* Initial round trip time */
58 #define RTF_REJECT 0x0200 /* Reject route */
61 #if defined (SIOCADDRTOLD) || defined (RTF_IRTT) /* route */
62 #define HAVE_NEW_ADDRT 1
66 #define mask_in_addr(x) (((struct sockaddr_in *)&((x).rt_genmask))->sin_addr.s_addr)
67 #define full_mask(x) (x)
69 #define mask_in_addr(x) ((x).rt_genmask)
70 #define full_mask(x) (((struct sockaddr_in *)&(x))->sin_addr.s_addr)
73 /* The RTACTION entries must agree with tbl_verb[] below! */
74 #define RTACTION_ADD 1
75 #define RTACTION_DEL 2
77 /* For the various tbl_*[] arrays, the 1st byte is the offset to
78 * the next entry and the 2nd byte is return value. */
83 /* We remap '-' to '#' to avoid problems with getopt. */
84 static const char tbl_hash_net_host[] =
86 /* "\010\002#host\0" */
87 "\007\002#host" /* Since last, we can save a byte. */
90 #define KW_TAKES_ARG 020
91 #define KW_SETS_FLAG 040
93 #define KW_IPVx_METRIC 020
94 #define KW_IPVx_NETMASK 021
95 #define KW_IPVx_GATEWAY 022
96 #define KW_IPVx_MSS 023
97 #define KW_IPVx_WINDOW 024
98 #define KW_IPVx_IRTT 025
99 #define KW_IPVx_DEVICE 026
101 #define KW_IPVx_FLAG_ONLY 040
102 #define KW_IPVx_REJECT 040
103 #define KW_IPVx_MOD 041
104 #define KW_IPVx_DYN 042
105 #define KW_IPVx_REINSTATE 043
107 static const char tbl_ipvx[] =
108 /* 020 is the "takes an arg" bit */
122 /* 040 is the "sets a flag" bit - MUST match flags_ipvx[] values below. */
128 /* "\014\043reinstate\0" */
129 "\013\043reinstate" /* Since last, we can save a byte. */
132 static const int flags_ipvx[] = { /* MUST match tbl_ipvx[] values above. */
141 static int kw_lookup(const char *kwtbl, char ***pargs)
145 if (strcmp(kwtbl+2, **pargs) == 0) { /* Found a match. */
147 if (kwtbl[1] & KW_TAKES_ARG) {
148 if (!**pargs) { /* No more args! */
151 *pargs += 1; /* Calling routine will use args[-1]. */
161 /* Add or delete a route, depending on action. */
163 static void INET_setroute(int action, char **args)
166 const char *netmask = NULL;
167 int skfd, isnet, xflag;
169 assert((action == RTACTION_ADD) || (action == RTACTION_DEL));
171 /* Grab the -net or -host options. Remember they were transformed. */
172 xflag = kw_lookup(tbl_hash_net_host, &args);
174 /* If we did grab -net or -host, make sure we still have an arg left. */
179 /* Clean out the RTREQ structure. */
180 memset((char *) &rt, 0, sizeof(struct rtentry));
183 const char *target = *args++;
186 /* recognize x.x.x.x/mask format. */
187 prefix = strchr(target, '/');
191 prefix_len = bb_xgetularg10_bnd(prefix+1, 0, 32);
192 mask_in_addr(rt) = htonl( ~ (0xffffffffUL >> prefix_len));
195 rt.rt_genmask.sa_family = AF_INET;
198 /* Default netmask. */
199 netmask = bb_INET_default;
201 /* Prefer hostname lookup is -host flag (xflag==1) was given. */
202 isnet = INET_resolve(target, (struct sockaddr_in *) &rt.rt_dst,
203 (xflag & HOST_FLAG));
205 bb_error_msg_and_die("resolving %s", target);
208 /* do not destroy prefix for process args */
213 if (xflag) { /* Reinit isnet if -net or -host was specified. */
214 isnet = (xflag & NET_FLAG);
217 /* Fill in the other fields. */
218 rt.rt_flags = ((isnet) ? RTF_UP : (RTF_UP | RTF_HOST));
221 int k = kw_lookup(tbl_ipvx, &args);
222 const char *args_m1 = args[-1];
224 if (k & KW_IPVx_FLAG_ONLY) {
225 rt.rt_flags |= flags_ipvx[k & 3];
230 if (k == KW_IPVx_METRIC) {
231 rt.rt_metric = bb_xgetularg10(args_m1) + 1;
236 if (k == KW_IPVx_NETMASK) {
237 struct sockaddr mask;
239 if (mask_in_addr(rt)) {
244 isnet = INET_resolve(netmask, (struct sockaddr_in *) &mask, 0);
246 bb_error_msg_and_die("resolving %s", netmask);
248 rt.rt_genmask = full_mask(mask);
252 if (k == KW_IPVx_GATEWAY) {
253 if (rt.rt_flags & RTF_GATEWAY) {
257 isnet = INET_resolve(args_m1,
258 (struct sockaddr_in *) &rt.rt_gateway, 1);
259 rt.rt_flags |= RTF_GATEWAY;
263 bb_error_msg_and_die("resolving %s", args_m1);
265 bb_error_msg_and_die("gateway %s is a NETWORK", args_m1);
270 if (k == KW_IPVx_MSS) { /* Check valid MSS bounds. */
271 rt.rt_flags |= RTF_MSS;
272 rt.rt_mss = bb_xgetularg10_bnd(args_m1, 64, 32768);
276 if (k == KW_IPVx_WINDOW) { /* Check valid window bounds. */
277 rt.rt_flags |= RTF_WINDOW;
278 rt.rt_window = bb_xgetularg10_bnd(args_m1, 128, INT_MAX);
283 if (k == KW_IPVx_IRTT) {
284 rt.rt_flags |= RTF_IRTT;
285 rt.rt_irtt = bb_xgetularg10(args_m1);
286 rt.rt_irtt *= (sysconf(_SC_CLK_TCK) / 100); /* FIXME */
287 #if 0 /* FIXME: do we need to check anything of this? */
288 if (rt.rt_irtt < 1 || rt.rt_irtt > (120 * HZ)) {
289 bb_error_msg_and_die("bad irtt");
296 /* Device is special in that it can be the last arg specified
297 * and doesn't requre the dev/device keyword in that case. */
298 if (!rt.rt_dev && ((k == KW_IPVx_DEVICE) || (!k && !*++args))) {
299 /* Don't use args_m1 here since args may have changed! */
300 rt.rt_dev = args[-1];
304 /* Nothing matched. */
309 if ((rt.rt_flags & RTF_REJECT) && !rt.rt_dev) {
314 /* sanity checks.. */
315 if (mask_in_addr(rt)) {
316 unsigned long mask = mask_in_addr(rt);
319 if ((rt.rt_flags & RTF_HOST) && mask != 0xffffffff) {
320 bb_error_msg_and_die("netmask %.8x and host route conflict",
321 (unsigned int) mask);
323 if (mask & (mask + 1)) {
324 bb_error_msg_and_die("bogus netmask %s", netmask);
326 mask = ((struct sockaddr_in *) &rt.rt_dst)->sin_addr.s_addr;
327 if (mask & ~mask_in_addr(rt)) {
328 bb_error_msg_and_die("netmask and route address conflict");
332 /* Fill out netmask if still unset */
333 if ((action == RTACTION_ADD) && (rt.rt_flags & RTF_HOST)) {
334 mask_in_addr(rt) = 0xffffffff;
337 /* Create a socket to the INET kernel. */
338 skfd = bb_xsocket(AF_INET, SOCK_DGRAM, 0);
340 if (ioctl(skfd, ((action==RTACTION_ADD) ? SIOCADDRT : SIOCDELRT), &rt)<0) {
341 bb_perror_msg_and_die("SIOC[ADD|DEL]RT");
344 if (ENABLE_FEATURE_CLEAN_UP) close(skfd);
347 #ifdef CONFIG_FEATURE_IPV6
349 static void INET6_setroute(int action, char **args)
351 struct sockaddr_in6 sa6;
353 int prefix_len, skfd;
356 assert((action == RTACTION_ADD) || (action == RTACTION_DEL));
359 /* We know args isn't NULL from the check in route_main. */
360 const char *target = *args++;
362 if (strcmp(target, bb_INET_default) == 0) {
364 memset(&sa6, 0, sizeof(sa6));
367 if ((cp = strchr(target, '/'))) { /* Yes... const to non is ok. */
369 prefix_len = bb_xgetularg10_bnd(cp+1, 0, 128);
373 if (INET6_resolve(target, (struct sockaddr_in6 *) &sa6) < 0) {
374 bb_error_msg_and_die("resolving %s", target);
379 /* Clean out the RTREQ structure. */
380 memset((char *) &rt, 0, sizeof(struct in6_rtmsg));
382 memcpy(&rt.rtmsg_dst, sa6.sin6_addr.s6_addr, sizeof(struct in6_addr));
384 /* Fill in the other fields. */
385 rt.rtmsg_dst_len = prefix_len;
386 rt.rtmsg_flags = ((prefix_len == 128) ? (RTF_UP|RTF_HOST) : RTF_UP);
392 int k = kw_lookup(tbl_ipvx, &args);
393 const char *args_m1 = args[-1];
395 if ((k == KW_IPVx_MOD) || (k == KW_IPVx_DYN)) {
396 rt.rtmsg_flags |= flags_ipvx[k & 3];
400 if (k == KW_IPVx_METRIC) {
401 rt.rtmsg_metric = bb_xgetularg10(args_m1);
405 if (k == KW_IPVx_GATEWAY) {
406 if (rt.rtmsg_flags & RTF_GATEWAY) {
410 if (INET6_resolve(args_m1, (struct sockaddr_in6 *) &sa6) < 0) {
411 bb_error_msg_and_die("resolving %s", args_m1);
413 memcpy(&rt.rtmsg_gateway, sa6.sin6_addr.s6_addr,
414 sizeof(struct in6_addr));
415 rt.rtmsg_flags |= RTF_GATEWAY;
419 /* Device is special in that it can be the last arg specified
420 * and doesn't requre the dev/device keyword in that case. */
421 if (!devname && ((k == KW_IPVx_DEVICE) || (!k && !*++args))) {
422 /* Don't use args_m1 here since args may have changed! */
427 /* Nothing matched. */
431 /* Create a socket to the INET6 kernel. */
432 skfd = bb_xsocket(AF_INET6, SOCK_DGRAM, 0);
434 rt.rtmsg_ifindex = 0;
438 memset(&ifr, 0, sizeof(ifr));
439 strcpy(ifr.ifr_name, devname);
441 if (ioctl(skfd, SIOGIFINDEX, &ifr) < 0) {
442 bb_perror_msg_and_die("SIOGIFINDEX");
444 rt.rtmsg_ifindex = ifr.ifr_ifindex;
447 /* Tell the kernel to accept this route. */
448 if (ioctl(skfd, ((action==RTACTION_ADD) ? SIOCADDRT : SIOCDELRT), &rt)<0) {
449 bb_perror_msg_and_die("SIOC[ADD|DEL]RT");
452 if (ENABLE_FEATURE_CLEAN_UP) close(skfd);
456 static const unsigned int flagvals[] = { /* Must agree with flagchars[]. */
462 #ifdef CONFIG_FEATURE_IPV6
469 #define IPV4_MASK (RTF_GATEWAY|RTF_HOST|RTF_REINSTATE|RTF_DYNAMIC|RTF_MODIFIED)
470 #define IPV6_MASK (RTF_GATEWAY|RTF_HOST|RTF_DEFAULT|RTF_ADDRCONF|RTF_CACHE)
472 static const char flagchars[] = /* Must agree with flagvals[]. */
474 #ifdef CONFIG_FEATURE_IPV6
480 #ifndef CONFIG_FEATURE_IPV6
483 void set_flags(char *flagstr, int flags)
489 for (i=0 ; (*flagstr = flagchars[i]) != 0 ; i++) {
490 if (flags & flagvals[i]) {
496 /* also used in netstat */
497 void displayroutes(int noresolve, int netstatfmt)
499 char devname[64], flags[16], sdest[16], sgw[16];
500 unsigned long int d, g, m;
501 int flgs, ref, use, metric, mtu, win, ir;
502 struct sockaddr_in s_addr;
505 FILE *fp = bb_xfopen("/proc/net/route", "r");
507 bb_printf("Kernel IP routing table\n"
508 "Destination Gateway Genmask"
510 netstatfmt ? " MSS Window irtt" : "Metric Ref Use");
512 if (fscanf(fp, "%*[^\n]\n") < 0) { /* Skip the first line. */
513 goto ERROR; /* Empty or missing line, or read error. */
517 r = fscanf(fp, "%63s%lx%lx%X%d%d%d%lx%d%d%d\n",
518 devname, &d, &g, &flgs, &ref, &use, &metric, &m,
521 if ((r < 0) && feof(fp)) { /* EOF with no (nonspace) chars read. */
525 bb_error_msg_and_die("fscanf");
528 if (!(flgs & RTF_UP)) { /* Skip interfaces that are down. */
532 set_flags(flags, (flgs & IPV4_MASK));
534 if (flgs & RTF_REJECT) {
539 memset(&s_addr, 0, sizeof(struct sockaddr_in));
540 s_addr.sin_family = AF_INET;
541 s_addr.sin_addr.s_addr = d;
542 INET_rresolve(sdest, sizeof(sdest), &s_addr,
543 (noresolve | 0x8000), m); /* Default instead of *. */
545 s_addr.sin_addr.s_addr = g;
546 INET_rresolve(sgw, sizeof(sgw), &s_addr,
547 (noresolve | 0x4000), m); /* Host instead of net. */
550 bb_printf("%-16s%-16s%-16s%-6s", sdest, sgw, inet_ntoa(mask), flags);
552 bb_printf("%5d %-5d %6d %s\n", mtu, win, ir, devname);
554 bb_printf("%-6d %-2d %7d %s\n", metric, ref, use, devname);
559 #ifdef CONFIG_FEATURE_IPV6
561 static void INET6_displayroutes(int noresolve)
563 char addr6[128], naddr6[128];
564 /* In addr6x, we store both 40-byte ':'-delimited ipv6 addresses.
565 * We read the non-delimited strings into the tail of the buffer
566 * using fscanf and then modify the buffer by shifting forward
567 * while inserting ':'s and the nul terminator for the first string.
568 * Hence the strings are at addr6x and addr6x+40. This generates
569 * _much_ less code than the previous (upstream) approach. */
571 char iface[16], flags[16];
572 int iflags, metric, refcnt, use, prefix_len, slen;
573 struct sockaddr_in6 snaddr6;
575 FILE *fp = bb_xfopen("/proc/net/ipv6_route", "r");
577 bb_printf("Kernel IPv6 routing table\n%-44s%-40s"
578 "Flags Metric Ref Use Iface\n",
579 "Destination", "Next Hop");
583 r = fscanf(fp, "%32s%x%*s%x%32s%x%x%x%x%s\n",
584 addr6x+14, &prefix_len, &slen, addr6x+40+7,
585 &metric, &use, &refcnt, &iflags, iface);
587 if ((r < 0) && feof(fp)) { /* EOF with no (nonspace) chars read. */
591 bb_error_msg_and_die("fscanf");
594 /* Do the addr6x shift-and-insert changes to ':'-delimit addresses.
595 * For now, always do this to validate the proc route format, even
596 * if the interface is down. */
603 if (i==40) { /* nul terminator for 1st address? */
604 addr6x[39] = 0; /* Fixup... need 0 instead of ':'. */
605 ++p; /* Skip and continue. */
614 } while (i < 40+28+7);
617 if (!(iflags & RTF_UP)) { /* Skip interfaces that are down. */
621 set_flags(flags, (iflags & IPV6_MASK));
625 inet_pton(AF_INET6, addr6x + r,
626 (struct sockaddr *) &snaddr6.sin6_addr);
627 snaddr6.sin6_family = AF_INET6;
628 INET6_rresolve(naddr6, sizeof(naddr6),
629 (struct sockaddr_in6 *) &snaddr6,
631 (noresolve | 0x8000) /* Default instead of *. */
633 0x0fff /* Apparently, upstream never resolves. */
637 if (!r) { /* 1st pass */
638 snprintf(addr6, sizeof(addr6), "%s/%d", naddr6, prefix_len);
640 } else { /* 2nd pass */
641 /* Print the info. */
642 bb_printf("%-43s %-39s %-5s %-6d %-2d %7d %-8s\n",
643 addr6, naddr6, flags, metric, refcnt, use, iface);
652 #define ROUTE_OPT_A 0x01
653 #define ROUTE_OPT_n 0x02
654 #define ROUTE_OPT_e 0x04
655 #define ROUTE_OPT_INET6 0x08 /* Not an actual option. See below. */
657 /* 1st byte is offset to next entry offset. 2nd byte is return value. */
658 static const char tbl_verb[] = /* 2nd byte matches RTACTION_* code */
661 /* "\011\002delete\0" */
662 "\010\002delete" /* Since last, we can save a byte. */
665 int route_main(int argc, char **argv)
671 /* First, remap '-net' and '-host' to avoid getopt problems. */
676 if ((strcmp(*p, "-net") == 0) || (strcmp(*p, "-host") == 0)) {
682 opt = bb_getopt_ulflags(argc, argv, "A:ne", &family);
684 if ((opt & ROUTE_OPT_A) && strcmp(family, "inet")) {
685 #ifdef CONFIG_FEATURE_IPV6
686 if (strcmp(family, "inet6") == 0) {
687 opt |= ROUTE_OPT_INET6; /* Set flag for ipv6. */
695 /* No more args means display the routing table. */
697 int noresolve = (opt & ROUTE_OPT_n) ? 0x0fff : 0;
698 #ifdef CONFIG_FEATURE_IPV6
699 if (opt & ROUTE_OPT_INET6)
700 INET6_displayroutes(noresolve);
703 displayroutes(noresolve, opt & ROUTE_OPT_e);
706 bb_fflush_stdout_and_exit(EXIT_SUCCESS);
709 /* Check verb. At the moment, must be add, del, or delete. */
710 what = kw_lookup(tbl_verb, &argv);
711 if (!what || !*argv) { /* Unknown verb or no more args. */
715 #ifdef CONFIG_FEATURE_IPV6
716 if (opt & ROUTE_OPT_INET6)
717 INET6_setroute(what, argv);
720 INET_setroute(what, argv);