networking/route.c

   1 /* vi: set sw=4 ts=4: */
   2 /* route
   3  *
   4  * Similar to the standard Unix route, but with only the necessary
   5  * parts for AF_INET and AF_INET6
   6  *
   7  * Bjorn Wesen, Axis Communications AB
   8  *
   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')
  12  *
  13  * Licensed under GPLv2 or later, see file LICENSE in this source tree.
  14  *
  15  *
  16  * displayroute() code added by Vladimir N. Oleynik <dzo@simtreas.ru>
  17  * adjustments by Larry Doolittle  <LRDoolittle@lbl.gov>
  18  *
  19  * IPV6 support added by Bart Visscher <magick@linux-fan.com>
  20  */
  21
  22 /* 2004/03/09  Manuel Novoa III <mjn3@codepoet.org>
  23  *
  24  * Rewritten to fix several bugs, add additional error checking, and
  25  * remove ridiculous amounts of bloat.
  26  */
  27
  28 //usage:#define route_trivial_usage
  29 //usage:       "[{add|del|delete}]"
  30 //usage:#define route_full_usage "\n\n"
  31 //usage:       "Edit kernel routing tables\n"
  32 //usage:     "\nOptions:"
  33 //usage:     "\n        -n      Don't resolve names"
  34 //usage:     "\n        -e      Display other/more information"
  35 //usage:     "\n        -A inet" IF_FEATURE_IPV6("{6}") "       Select address family"
  36
  37 #include <net/route.h>
  38 #include <net/if.h>
  39
  40 #include "libbb.h"
  41 #include "inet_common.h"
  42
  43
  44 #ifndef RTF_UP
  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  */
  53 #ifndef RTF_MSS
  54 #define RTF_MSS         RTF_MTU /* Compatibility :-(            */
  55 #endif
  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                 */
  59 #endif
  60
  61 #if defined(SIOCADDRTOLD) || defined(RTF_IRTT)  /* route */
  62 #define HAVE_NEW_ADDRT 1
  63 #endif
  64
  65 #if HAVE_NEW_ADDRT
  66 #define mask_in_addr(x) (((struct sockaddr_in *)&((x).rt_genmask))->sin_addr.s_addr)
  67 #define full_mask(x) (x)
  68 #else
  69 #define mask_in_addr(x) ((x).rt_genmask)
  70 #define full_mask(x) (((struct sockaddr_in *)&(x))->sin_addr.s_addr)
  71 #endif
  72
  73 /* The RTACTION entries must agree with tbl_verb[] below! */
  74 #define RTACTION_ADD 1
  75 #define RTACTION_DEL 2
  76
  77 /* For the various tbl_*[] arrays, the 1st byte is the offset to
  78  * the next entry and the 2nd byte is return value. */
  79
  80 #define NET_FLAG  1
  81 #define HOST_FLAG 2
  82
  83 /* We remap '-' to '#' to avoid problems with getopt. */
  84 static const char tbl_hash_net_host[] ALIGN1 =
  85         "\007\001#net\0"
  86 /*      "\010\002#host\0" */
  87         "\007\002#host"                         /* Since last, we can save a byte. */
  88 ;
  89
  90 #define KW_TAKES_ARG            020
  91 #define KW_SETS_FLAG            040
  92
  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
 100
 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
 106
 107 static const char tbl_ipvx[] ALIGN1 =
 108         /* 020 is the "takes an arg" bit */
 109 #if HAVE_NEW_ADDRT
 110         "\011\020metric\0"
 111 #endif
 112         "\012\021netmask\0"
 113         "\005\022gw\0"
 114         "\012\022gateway\0"
 115         "\006\023mss\0"
 116         "\011\024window\0"
 117 #ifdef RTF_IRTT
 118         "\007\025irtt\0"
 119 #endif
 120         "\006\026dev\0"
 121         "\011\026device\0"
 122         /* 040 is the "sets a flag" bit - MUST match flags_ipvx[] values below. */
 123 #ifdef RTF_REJECT
 124         "\011\040reject\0"
 125 #endif
 126         "\006\041mod\0"
 127         "\006\042dyn\0"
 128 /*      "\014\043reinstate\0" */
 129         "\013\043reinstate"                     /* Since last, we can save a byte. */
 130 ;
 131
 132 static const int flags_ipvx[] = { /* MUST match tbl_ipvx[] values above. */
 133 #ifdef RTF_REJECT
 134         RTF_REJECT,
 135 #endif
 136         RTF_MODIFIED,
 137         RTF_DYNAMIC,
 138         RTF_REINSTATE
 139 };
 140
 141 static int kw_lookup(const char *kwtbl, char ***pargs)
 142 {
 143         if (**pargs) {
 144                 do {
 145                         if (strcmp(kwtbl+2, **pargs) == 0) { /* Found a match. */
 146                                 *pargs += 1;
 147                                 if (kwtbl[1] & KW_TAKES_ARG) {
 148                                         if (!**pargs) { /* No more args! */
 149                                                 bb_show_usage();
 150                                         }
 151                                         *pargs += 1; /* Calling routine will use args[-1]. */
 152                                 }
 153                                 return kwtbl[1];
 154                         }
 155                         kwtbl += *kwtbl;
 156                 } while (*kwtbl);
 157         }
 158         return 0;
 159 }
 160
 161 /* Add or delete a route, depending on action. */
 162
 163 static NOINLINE void INET_setroute(int action, char **args)
 164 {
 165         /* char buffer instead of bona-fide struct avoids aliasing warning */
 166         char rt_buf[sizeof(struct rtentry)];
 167         struct rtentry *const rt = (void *)rt_buf;
 168
 169         const char *netmask = NULL;
 170         int skfd, isnet, xflag;
 171
 172         /* Grab the -net or -host options.  Remember they were transformed. */
 173         xflag = kw_lookup(tbl_hash_net_host, &args);
 174
 175         /* If we did grab -net or -host, make sure we still have an arg left. */
 176         if (*args == NULL) {
 177                 bb_show_usage();
 178         }
 179
 180         /* Clean out the RTREQ structure. */
 181         memset(rt, 0, sizeof(*rt));
 182
 183         {
 184                 const char *target = *args++;
 185                 char *prefix;
 186
 187                 /* recognize x.x.x.x/mask format. */
 188                 prefix = strchr(target, '/');
 189                 if (prefix) {
 190                         int prefix_len;
 191
 192                         prefix_len = xatoul_range(prefix+1, 0, 32);
 193                         mask_in_addr(*rt) = htonl( ~(0xffffffffUL >> prefix_len));
 194                         *prefix = '\0';
 195 #if HAVE_NEW_ADDRT
 196                         rt->rt_genmask.sa_family = AF_INET;
 197 #endif
 198                 } else {
 199                         /* Default netmask. */
 200                         netmask = "default";
 201                 }
 202                 /* Prefer hostname lookup is -host flag (xflag==1) was given. */
 203                 isnet = INET_resolve(target, (struct sockaddr_in *) &rt->rt_dst,
 204                                                          (xflag & HOST_FLAG));
 205                 if (isnet < 0) {
 206                         bb_error_msg_and_die("resolving %s", target);
 207                 }
 208                 if (prefix) {
 209                         /* do not destroy prefix for process args */
 210                         *prefix = '/';
 211                 }
 212         }
 213
 214         if (xflag) {            /* Reinit isnet if -net or -host was specified. */
 215                 isnet = (xflag & NET_FLAG);
 216         }
 217
 218         /* Fill in the other fields. */
 219         rt->rt_flags = ((isnet) ? RTF_UP : (RTF_UP | RTF_HOST));
 220
 221         while (*args) {
 222                 int k = kw_lookup(tbl_ipvx, &args);
 223                 const char *args_m1 = args[-1];
 224
 225                 if (k & KW_IPVx_FLAG_ONLY) {
 226                         rt->rt_flags |= flags_ipvx[k & 3];
 227                         continue;
 228                 }
 229
 230 #if HAVE_NEW_ADDRT
 231                 if (k == KW_IPVx_METRIC) {
 232                         rt->rt_metric = xatoul(args_m1) + 1;
 233                         continue;
 234                 }
 235 #endif
 236
 237                 if (k == KW_IPVx_NETMASK) {
 238                         struct sockaddr mask;
 239
 240                         if (mask_in_addr(*rt)) {
 241                                 bb_show_usage();
 242                         }
 243
 244                         netmask = args_m1;
 245                         isnet = INET_resolve(netmask, (struct sockaddr_in *) &mask, 0);
 246                         if (isnet < 0) {
 247                                 bb_error_msg_and_die("resolving %s", netmask);
 248                         }
 249                         rt->rt_genmask = full_mask(mask);
 250                         continue;
 251                 }
 252
 253                 if (k == KW_IPVx_GATEWAY) {
 254                         if (rt->rt_flags & RTF_GATEWAY) {
 255                                 bb_show_usage();
 256                         }
 257
 258                         isnet = INET_resolve(args_m1,
 259                                                 (struct sockaddr_in *) &rt->rt_gateway, 1);
 260                         rt->rt_flags |= RTF_GATEWAY;
 261
 262                         if (isnet) {
 263                                 if (isnet < 0) {
 264                                         bb_error_msg_and_die("resolving %s", args_m1);
 265                                 }
 266                                 bb_error_msg_and_die("gateway %s is a NETWORK", args_m1);
 267                         }
 268                         continue;
 269                 }
 270
 271                 if (k == KW_IPVx_MSS) { /* Check valid MSS bounds. */
 272                         rt->rt_flags |= RTF_MSS;
 273                         rt->rt_mss = xatoul_range(args_m1, 64, 32768);
 274                         continue;
 275                 }
 276
 277                 if (k == KW_IPVx_WINDOW) {      /* Check valid window bounds. */
 278                         rt->rt_flags |= RTF_WINDOW;
 279                         rt->rt_window = xatoul_range(args_m1, 128, INT_MAX);
 280                         continue;
 281                 }
 282
 283 #ifdef RTF_IRTT
 284                 if (k == KW_IPVx_IRTT) {
 285                         rt->rt_flags |= RTF_IRTT;
 286                         rt->rt_irtt = xatoul(args_m1);
 287                         rt->rt_irtt *= (sysconf(_SC_CLK_TCK) / 100);    /* FIXME */
 288 #if 0                                   /* FIXME: do we need to check anything of this? */
 289                         if (rt->rt_irtt < 1 || rt->rt_irtt > (120 * HZ)) {
 290                                 bb_error_msg_and_die("bad irtt");
 291                         }
 292 #endif
 293                         continue;
 294                 }
 295 #endif
 296
 297                 /* Device is special in that it can be the last arg specified
 298                  * and doesn't requre the dev/device keyword in that case. */
 299                 if (!rt->rt_dev && ((k == KW_IPVx_DEVICE) || (!k && !*++args))) {
 300                         /* Don't use args_m1 here since args may have changed! */
 301                         rt->rt_dev = args[-1];
 302                         continue;
 303                 }
 304
 305                 /* Nothing matched. */
 306                 bb_show_usage();
 307         }
 308
 309 #ifdef RTF_REJECT
 310         if ((rt->rt_flags & RTF_REJECT) && !rt->rt_dev) {
 311                 rt->rt_dev = (char*)"lo";
 312         }
 313 #endif
 314
 315         /* sanity checks.. */
 316         if (mask_in_addr(*rt)) {
 317                 uint32_t mask = mask_in_addr(*rt);
 318
 319                 mask = ~ntohl(mask);
 320                 if ((rt->rt_flags & RTF_HOST) && mask != 0xffffffff) {
 321                         bb_error_msg_and_die("netmask %.8x and host route conflict",
 322                                                                  (unsigned int) mask);
 323                 }
 324                 if (mask & (mask + 1)) {
 325                         bb_error_msg_and_die("bogus netmask %s", netmask);
 326                 }
 327                 mask = ((struct sockaddr_in *) &rt->rt_dst)->sin_addr.s_addr;
 328                 if (mask & ~(uint32_t)mask_in_addr(*rt)) {
 329                         bb_error_msg_and_die("netmask and route address conflict");
 330                 }
 331         }
 332
 333         /* Fill out netmask if still unset */
 334         if ((action == RTACTION_ADD) && (rt->rt_flags & RTF_HOST)) {
 335                 mask_in_addr(*rt) = 0xffffffff;
 336         }
 337
 338         /* Create a socket to the INET kernel. */
 339         skfd = xsocket(AF_INET, SOCK_DGRAM, 0);
 340
 341         if (action == RTACTION_ADD)
 342                 xioctl(skfd, SIOCADDRT, rt);
 343         else
 344                 xioctl(skfd, SIOCDELRT, rt);
 345
 346         if (ENABLE_FEATURE_CLEAN_UP) close(skfd);
 347 }
 348
 349 #if ENABLE_FEATURE_IPV6
 350
 351 static NOINLINE void INET6_setroute(int action, char **args)
 352 {
 353         struct sockaddr_in6 sa6;
 354         struct in6_rtmsg rt;
 355         int prefix_len, skfd;
 356         const char *devname;
 357
 358                 /* We know args isn't NULL from the check in route_main. */
 359                 const char *target = *args++;
 360
 361                 if (strcmp(target, "default") == 0) {
 362                         prefix_len = 0;
 363                         memset(&sa6, 0, sizeof(sa6));
 364                 } else {
 365                         char *cp;
 366                         cp = strchr(target, '/'); /* Yes... const to non is ok. */
 367                         if (cp) {
 368                                 *cp = '\0';
 369                                 prefix_len = xatoul_range(cp + 1, 0, 128);
 370                         } else {
 371                                 prefix_len = 128;
 372                         }
 373                         if (INET6_resolve(target, (struct sockaddr_in6 *) &sa6) < 0) {
 374                                 bb_error_msg_and_die("resolving %s", target);
 375                         }
 376                 }
 377
 378         /* Clean out the RTREQ structure. */
 379         memset(&rt, 0, sizeof(rt));
 380
 381         memcpy(&rt.rtmsg_dst, sa6.sin6_addr.s6_addr, sizeof(struct in6_addr));
 382
 383         /* Fill in the other fields. */
 384         rt.rtmsg_dst_len = prefix_len;
 385         rt.rtmsg_flags = ((prefix_len == 128) ? (RTF_UP|RTF_HOST) : RTF_UP);
 386         rt.rtmsg_metric = 1;
 387
 388         devname = NULL;
 389
 390         while (*args) {
 391                 int k = kw_lookup(tbl_ipvx, &args);
 392                 const char *args_m1 = args[-1];
 393
 394                 if ((k == KW_IPVx_MOD) || (k == KW_IPVx_DYN)) {
 395                         rt.rtmsg_flags |= flags_ipvx[k & 3];
 396                         continue;
 397                 }
 398
 399                 if (k == KW_IPVx_METRIC) {
 400                         rt.rtmsg_metric = xatoul(args_m1);
 401                         continue;
 402                 }
 403
 404                 if (k == KW_IPVx_GATEWAY) {
 405                         if (rt.rtmsg_flags & RTF_GATEWAY) {
 406                                 bb_show_usage();
 407                         }
 408
 409                         if (INET6_resolve(args_m1, (struct sockaddr_in6 *) &sa6) < 0) {
 410                                 bb_error_msg_and_die("resolving %s", args_m1);
 411                         }
 412                         memcpy(&rt.rtmsg_gateway, sa6.sin6_addr.s6_addr,
 413                                    sizeof(struct in6_addr));
 414                         rt.rtmsg_flags |= RTF_GATEWAY;
 415                         continue;
 416                 }
 417
 418                 /* Device is special in that it can be the last arg specified
 419                  * and doesn't requre the dev/device keyword in that case. */
 420                 if (!devname && ((k == KW_IPVx_DEVICE) || (!k && !*++args))) {
 421                         /* Don't use args_m1 here since args may have changed! */
 422                         devname = args[-1];
 423                         continue;
 424                 }
 425
 426                 /* Nothing matched. */
 427                 bb_show_usage();
 428         }
 429
 430         /* Create a socket to the INET6 kernel. */
 431         skfd = xsocket(AF_INET6, SOCK_DGRAM, 0);
 432
 433         rt.rtmsg_ifindex = 0;
 434
 435         if (devname) {
 436                 struct ifreq ifr;
 437                 memset(&ifr, 0, sizeof(ifr));
 438                 strncpy_IFNAMSIZ(ifr.ifr_name, devname);
 439                 xioctl(skfd, SIOGIFINDEX, &ifr);
 440                 rt.rtmsg_ifindex = ifr.ifr_ifindex;
 441         }
 442
 443         /* Tell the kernel to accept this route. */
 444         if (action == RTACTION_ADD)
 445                 xioctl(skfd, SIOCADDRT, &rt);
 446         else
 447                 xioctl(skfd, SIOCDELRT, &rt);
 448
 449         if (ENABLE_FEATURE_CLEAN_UP) close(skfd);
 450 }
 451 #endif
 452
 453 static const unsigned flagvals[] = { /* Must agree with flagchars[]. */
 454         RTF_GATEWAY,
 455         RTF_HOST,
 456         RTF_REINSTATE,
 457         RTF_DYNAMIC,
 458         RTF_MODIFIED,
 459 #if ENABLE_FEATURE_IPV6
 460         RTF_DEFAULT,
 461         RTF_ADDRCONF,
 462         RTF_CACHE
 463 #endif
 464 };
 465
 466 #define IPV4_MASK (RTF_GATEWAY|RTF_HOST|RTF_REINSTATE|RTF_DYNAMIC|RTF_MODIFIED)
 467 #define IPV6_MASK (RTF_GATEWAY|RTF_HOST|RTF_DEFAULT|RTF_ADDRCONF|RTF_CACHE)
 468
 469 /* Must agree with flagvals[]. */
 470 static const char flagchars[] ALIGN1 =
 471         "GHRDM"
 472 #if ENABLE_FEATURE_IPV6
 473         "DAC"
 474 #endif
 475 ;
 476
 477 static void set_flags(char *flagstr, int flags)
 478 {
 479         int i;
 480
 481         *flagstr++ = 'U';
 482
 483         for (i = 0; (*flagstr = flagchars[i]) != 0; i++) {
 484                 if (flags & flagvals[i]) {
 485                         ++flagstr;
 486                 }
 487         }
 488 }
 489
 490 /* also used in netstat */
 491 void FAST_FUNC bb_displayroutes(int noresolve, int netstatfmt)
 492 {
 493         char devname[64], flags[16], *sdest, *sgw;
 494         unsigned long d, g, m;
 495         int flgs, ref, use, metric, mtu, win, ir;
 496         struct sockaddr_in s_addr;
 497         struct in_addr mask;
 498
 499         FILE *fp = xfopen_for_read("/proc/net/route");
 500
 501         printf("Kernel IP routing table\n"
 502                "Destination     Gateway         Genmask         Flags %s Iface\n",
 503                         netstatfmt ? "  MSS Window  irtt" : "Metric Ref    Use");
 504
 505         if (fscanf(fp, "%*[^\n]\n") < 0) { /* Skip the first line. */
 506                 goto ERROR;                /* Empty or missing line, or read error. */
 507         }
 508         while (1) {
 509                 int r;
 510                 r = fscanf(fp, "%63s%lx%lx%X%d%d%d%lx%d%d%d\n",
 511                                    devname, &d, &g, &flgs, &ref, &use, &metric, &m,
 512                                    &mtu, &win, &ir);
 513                 if (r != 11) {
 514                         if ((r < 0) && feof(fp)) { /* EOF with no (nonspace) chars read. */
 515                                 break;
 516                         }
 517  ERROR:
 518                         bb_error_msg_and_die("fscanf");
 519                 }
 520
 521                 if (!(flgs & RTF_UP)) { /* Skip interfaces that are down. */
 522                         continue;
 523                 }
 524
 525                 set_flags(flags, (flgs & IPV4_MASK));
 526 #ifdef RTF_REJECT
 527                 if (flgs & RTF_REJECT) {
 528                         flags[0] = '!';
 529                 }
 530 #endif
 531
 532                 memset(&s_addr, 0, sizeof(struct sockaddr_in));
 533                 s_addr.sin_family = AF_INET;
 534                 s_addr.sin_addr.s_addr = d;
 535                 sdest = INET_rresolve(&s_addr, (noresolve | 0x8000), m); /* 'default' instead of '*' */
 536                 s_addr.sin_addr.s_addr = g;
 537                 sgw = INET_rresolve(&s_addr, (noresolve | 0x4000), m); /* Host instead of net */
 538                 mask.s_addr = m;
 539                 /* "%15.15s" truncates hostnames, do we really want that? */
 540                 printf("%-15.15s %-15.15s %-16s%-6s", sdest, sgw, inet_ntoa(mask), flags);
 541                 free(sdest);
 542                 free(sgw);
 543                 if (netstatfmt) {
 544                         printf("%5d %-5d %6d %s\n", mtu, win, ir, devname);
 545                 } else {
 546                         printf("%-6d %-2d %7d %s\n", metric, ref, use, devname);
 547                 }
 548         }
 549         fclose(fp);
 550 }
 551
 552 #if ENABLE_FEATURE_IPV6
 553
 554 static void INET6_displayroutes(void)
 555 {
 556         char addr6[128], *naddr6;
 557         /* In addr6x, we store both 40-byte ':'-delimited ipv6 addresses.
 558          * We read the non-delimited strings into the tail of the buffer
 559          * using fscanf and then modify the buffer by shifting forward
 560          * while inserting ':'s and the nul terminator for the first string.
 561          * Hence the strings are at addr6x and addr6x+40.  This generates
 562          * _much_ less code than the previous (upstream) approach. */
 563         char addr6x[80];
 564         char iface[16], flags[16];
 565         int iflags, metric, refcnt, use, prefix_len, slen;
 566         struct sockaddr_in6 snaddr6;
 567
 568         FILE *fp = xfopen_for_read("/proc/net/ipv6_route");
 569
 570         printf("Kernel IPv6 routing table\n%-44s%-40s"
 571                           "Flags Metric Ref    Use Iface\n",
 572                           "Destination", "Next Hop");
 573
 574         while (1) {
 575                 int r;
 576                 r = fscanf(fp, "%32s%x%*s%x%32s%x%x%x%x%s\n",
 577                                 addr6x+14, &prefix_len, &slen, addr6x+40+7,
 578                                 &metric, &use, &refcnt, &iflags, iface);
 579                 if (r != 9) {
 580                         if ((r < 0) && feof(fp)) { /* EOF with no (nonspace) chars read. */
 581                                 break;
 582                         }
 583  ERROR:
 584                         bb_error_msg_and_die("fscanf");
 585                 }
 586
 587                 /* Do the addr6x shift-and-insert changes to ':'-delimit addresses.
 588                  * For now, always do this to validate the proc route format, even
 589                  * if the interface is down. */
 590                 {
 591                         int i = 0;
 592                         char *p = addr6x+14;
 593
 594                         do {
 595                                 if (!*p) {
 596                                         if (i == 40) { /* nul terminator for 1st address? */
 597                                                 addr6x[39] = 0; /* Fixup... need 0 instead of ':'. */
 598                                                 ++p;    /* Skip and continue. */
 599                                                 continue;
 600                                         }
 601                                         goto ERROR;
 602                                 }
 603                                 addr6x[i++] = *p++;
 604                                 if (!((i+1) % 5)) {
 605                                         addr6x[i++] = ':';
 606                                 }
 607                         } while (i < 40+28+7);
 608                 }
 609
 610                 if (!(iflags & RTF_UP)) { /* Skip interfaces that are down. */
 611                         continue;
 612                 }
 613
 614                 set_flags(flags, (iflags & IPV6_MASK));
 615
 616                 r = 0;
 617                 while (1) {
 618                         inet_pton(AF_INET6, addr6x + r,
 619                                           (struct sockaddr *) &snaddr6.sin6_addr);
 620                         snaddr6.sin6_family = AF_INET6;
 621                         naddr6 = INET6_rresolve((struct sockaddr_in6 *) &snaddr6,
 622                                                    0x0fff /* Apparently, upstream never resolves. */
 623                                                    );
 624
 625                         if (!r) {                       /* 1st pass */
 626                                 snprintf(addr6, sizeof(addr6), "%s/%d", naddr6, prefix_len);
 627                                 r += 40;
 628                                 free(naddr6);
 629                         } else {                        /* 2nd pass */
 630                                 /* Print the info. */
 631                                 printf("%-43s %-39s %-5s %-6d %-2d %7d %-8s\n",
 632                                                 addr6, naddr6, flags, metric, refcnt, use, iface);
 633                                 free(naddr6);
 634                                 break;
 635                         }
 636                 }
 637         }
 638         fclose(fp);
 639 }
 640
 641 #endif
 642
 643 #define ROUTE_OPT_A     0x01
 644 #define ROUTE_OPT_n     0x02
 645 #define ROUTE_OPT_e     0x04
 646 #define ROUTE_OPT_INET6 0x08 /* Not an actual option. See below. */
 647
 648 /* 1st byte is offset to next entry offset.  2nd byte is return value. */
 649 /* 2nd byte matches RTACTION_* code */
 650 static const char tbl_verb[] ALIGN1 =
 651         "\006\001add\0"
 652         "\006\002del\0"
 653 /*      "\011\002delete\0" */
 654         "\010\002delete"  /* Since it's last, we can save a byte. */
 655 ;
 656
 657 int route_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE;
 658 int route_main(int argc UNUSED_PARAM, char **argv)
 659 {
 660         unsigned opt;
 661         int what;
 662         char *family;
 663         char **p;
 664
 665         /* First, remap '-net' and '-host' to avoid getopt problems. */
 666         p = argv;
 667         while (*++p) {
 668                 if (strcmp(*p, "-net") == 0 || strcmp(*p, "-host") == 0) {
 669                         p[0][0] = '#';
 670                 }
 671         }
 672
 673         opt = getopt32(argv, "A:ne", &family);
 674
 675         if ((opt & ROUTE_OPT_A) && strcmp(family, "inet") != 0) {
 676 #if ENABLE_FEATURE_IPV6
 677                 if (strcmp(family, "inet6") == 0) {
 678                         opt |= ROUTE_OPT_INET6; /* Set flag for ipv6. */
 679                 } else
 680 #endif
 681                 bb_show_usage();
 682         }
 683
 684         argv += optind;
 685
 686         /* No more args means display the routing table. */
 687         if (!*argv) {
 688                 int noresolve = (opt & ROUTE_OPT_n) ? 0x0fff : 0;
 689 #if ENABLE_FEATURE_IPV6
 690                 if (opt & ROUTE_OPT_INET6)
 691                         INET6_displayroutes();
 692                 else
 693 #endif
 694                         bb_displayroutes(noresolve, opt & ROUTE_OPT_e);
 695
 696                 fflush_stdout_and_exit(EXIT_SUCCESS);
 697         }
 698
 699         /* Check verb.  At the moment, must be add, del, or delete. */
 700         what = kw_lookup(tbl_verb, &argv);
 701         if (!what || !*argv) {          /* Unknown verb or no more args. */
 702                 bb_show_usage();
 703         }
 704
 705 #if ENABLE_FEATURE_IPV6
 706         if (opt & ROUTE_OPT_INET6)
 707                 INET6_setroute(what, argv);
 708         else
 709 #endif
 710                 INET_setroute(what, argv);
 711
 712         return EXIT_SUCCESS;
 713 }