networking/route.c

   1 /* route
   2  *
   3  * Similar to the standard Unix route, but with only the necessary
   4  * parts for AF_INET
   5  *
   6  * Bjorn Wesen, Axis Communications AB
   7  *
   8  * Author of the original route:
   9  *              Fred N. van Kempen, <waltje@uwalt.nl.mugnet.org>
  10  *              (derived from FvK's 'route.c     1.70    01/04/94')
  11  *
  12  * This program is free software; you can redistribute it
  13  * and/or  modify it under  the terms of  the GNU General
  14  * Public  License as  published  by  the  Free  Software
  15  * Foundation;  either  version 2 of the License, or  (at
  16  * your option) any later version.
  17  *
  18  * $Id: route.c,v 1.16 2002/05/16 19:14:15 sandman Exp $
  19  *
  20  * displayroute() code added by Vladimir N. Oleynik <dzo@simtreas.ru>
  21  * adjustments by Larry Doolittle  <LRDoolittle@lbl.gov>
  22  */
  23
  24 #include <sys/types.h>
  25 #include <sys/ioctl.h>
  26 #include "inet_common.h"
  27 #include <net/route.h>
  28 #include <linux/param.h>  // HZ
  29 #include <stdio.h>
  30 #include <errno.h>
  31 #include <fcntl.h>
  32 #include <stdlib.h>
  33 #include <string.h>
  34 #include <getopt.h>
  35 #include <unistd.h>
  36 #include <ctype.h>
  37 #include "busybox.h"
  38
  39 #define _(x) x
  40
  41 #define RTACTION_ADD   1
  42 #define RTACTION_DEL   2
  43 #define RTACTION_HELP  3
  44 #define RTACTION_FLUSH 4
  45 #define RTACTION_SHOW  5
  46
  47 #define E_NOTFOUND      8
  48 #define E_SOCK          7
  49 #define E_LOOKUP        6
  50 #define E_VERSION       5
  51 #define E_USAGE         4
  52 #define E_OPTERR        3
  53 #define E_INTERN        2
  54 #define E_NOSUPP        1
  55
  56 #if defined (SIOCADDRTOLD) || defined (RTF_IRTT)        /* route */
  57 #define HAVE_NEW_ADDRT 1
  58 #endif
  59 #ifdef RTF_IRTT                 /* route */
  60 #define HAVE_RTF_IRTT 1
  61 #endif
  62 #ifdef RTF_REJECT               /* route */
  63 #define HAVE_RTF_REJECT 1
  64 #endif
  65
  66 #if HAVE_NEW_ADDRT
  67 #define mask_in_addr(x) (((struct sockaddr_in *)&((x).rt_genmask))->sin_addr.s_addr)
  68 #define full_mask(x) (x)
  69 #else
  70 #define mask_in_addr(x) ((x).rt_genmask)
  71 #define full_mask(x) (((struct sockaddr_in *)&(x))->sin_addr.s_addr)
  72 #endif
  73
  74
  75
  76 /* add or delete a route depending on action */
  77
  78 static int
  79 INET_setroute(int action, int options, char **args)
  80 {
  81         struct rtentry rt;
  82         char target[128], gateway[128] = "NONE";
  83         const char *netmask = bb_INET_default;
  84         int xflag, isnet;
  85         int skfd;
  86
  87         xflag = 0;
  88
  89         if (*args == NULL)
  90             show_usage();
  91         if (strcmp(*args, "-net")==0) {
  92                 xflag = 1;
  93                 args++;
  94         } else if (strcmp(*args, "-host")==0) {
  95                 xflag = 2;
  96                 args++;
  97         }
  98         if (*args == NULL)
  99             show_usage();
 100         safe_strncpy(target, *args++, (sizeof target));
 101
 102         /* Clean out the RTREQ structure. */
 103         memset((char *) &rt, 0, sizeof(struct rtentry));
 104
 105
 106         if ((isnet = INET_resolve(target, (struct sockaddr_in *)&rt.rt_dst, xflag!=1)) < 0) {
 107                 error_msg(_("can't resolve %s"), target);
 108                 return EXIT_FAILURE;   /* XXX change to E_something */
 109         }
 110
 111         switch (xflag) {
 112                 case 1:
 113                         isnet = 1;
 114                         break;
 115
 116                 case 2:
 117                         isnet = 0;
 118                         break;
 119
 120                 default:
 121                         break;
 122         }
 123
 124         /* Fill in the other fields. */
 125         rt.rt_flags = (RTF_UP | RTF_HOST);
 126         if (isnet)
 127                 rt.rt_flags &= ~RTF_HOST;
 128
 129         while (*args) {
 130                 if (strcmp(*args, "metric")==0) {
 131                         int metric;
 132
 133                         args++;
 134                         if (!*args || !isdigit(**args))
 135                                 show_usage();
 136                         metric = atoi(*args);
 137 #if HAVE_NEW_ADDRT
 138                         rt.rt_metric = metric + 1;
 139 #else
 140                         ENOSUPP("inet_setroute", "NEW_ADDRT (metric)");  /* XXX Fixme */
 141 #endif
 142                         args++;
 143                         continue;
 144                 }
 145
 146                 if (strcmp(*args, "netmask")==0) {
 147                         struct sockaddr mask;
 148
 149                         args++;
 150                         if (!*args || mask_in_addr(rt))
 151                                 show_usage();
 152                         netmask = *args;
 153                         if ((isnet = INET_resolve(netmask, (struct sockaddr_in *)&mask, 0)) < 0) {
 154                                 error_msg(_("can't resolve netmask %s"), netmask);
 155                                 return E_LOOKUP;
 156                         }
 157                         rt.rt_genmask = full_mask(mask);
 158                         args++;
 159                         continue;
 160                 }
 161
 162                 if (strcmp(*args, "gw")==0 || strcmp(*args, "gateway")==0) {
 163                         args++;
 164                         if (!*args)
 165                                 show_usage();
 166                         if (rt.rt_flags & RTF_GATEWAY)
 167                                 show_usage();
 168                         safe_strncpy(gateway, *args, (sizeof gateway));
 169                         if ((isnet = INET_resolve(gateway, (struct sockaddr_in *)&rt.rt_gateway, 1)) < 0) {
 170                                 error_msg(_("can't resolve gw %s"), gateway);
 171                                 return E_LOOKUP;
 172                         }
 173                         if (isnet) {
 174                                 error_msg(
 175                                         _("%s: cannot use a NETWORK as gateway!"),
 176                                         gateway);
 177                                 return E_OPTERR;
 178                         }
 179                         rt.rt_flags |= RTF_GATEWAY;
 180                         args++;
 181                         continue;
 182                 }
 183
 184                 if (strcmp(*args, "mss")==0) {
 185                         args++;
 186                         rt.rt_flags |= RTF_MSS;
 187                         if (!*args)
 188                                 show_usage();
 189                         rt.rt_mss = atoi(*args);
 190                         args++;
 191                         if (rt.rt_mss < 64 || rt.rt_mss > 32768) {
 192                                 error_msg(_("Invalid MSS."));
 193                                 return E_OPTERR;
 194                         }
 195                         continue;
 196                 }
 197
 198                 if (strcmp(*args, "window")==0) {
 199                         args++;
 200                         if (!*args)
 201                                 show_usage();
 202                         rt.rt_flags |= RTF_WINDOW;
 203                         rt.rt_window = atoi(*args);
 204                         args++;
 205                         if (rt.rt_window < 128) {
 206                                 error_msg(_("Invalid window."));
 207                                 return E_OPTERR;
 208                         }
 209                         continue;
 210                 }
 211
 212                 if (strcmp(*args, "irtt")==0) {
 213                         args++;
 214                         if (!*args)
 215                                 show_usage();
 216                         args++;
 217 #if HAVE_RTF_IRTT
 218                         rt.rt_flags |= RTF_IRTT;
 219                         rt.rt_irtt = atoi(*(args - 1));
 220                         rt.rt_irtt *= (HZ / 100);       /* FIXME */
 221 #if 0                           /* FIXME: do we need to check anything of this? */
 222                         if (rt.rt_irtt < 1 || rt.rt_irtt > (120 * HZ)) {
 223                                 error_msg(_("Invalid initial rtt."));
 224                                 return E_OPTERR;
 225                         }
 226 #endif
 227 #else
 228                         ENOSUPP("inet_setroute", "RTF_IRTT"); /* XXX Fixme */
 229 #endif
 230                         continue;
 231                 }
 232
 233                 if (strcmp(*args, "reject")==0) {
 234                         args++;
 235 #if HAVE_RTF_REJECT
 236                         rt.rt_flags |= RTF_REJECT;
 237 #else
 238                         ENOSUPP("inet_setroute", "RTF_REJECT"); /* XXX Fixme */
 239 #endif
 240                         continue;
 241                 }
 242                 if (strcmp(*args, "mod")==0) {
 243                         args++;
 244                         rt.rt_flags |= RTF_MODIFIED;
 245                         continue;
 246                 }
 247                 if (strcmp(*args, "dyn")==0) {
 248                         args++;
 249                         rt.rt_flags |= RTF_DYNAMIC;
 250                         continue;
 251                 }
 252                 if (strcmp(*args, "reinstate")==0) {
 253                         args++;
 254                         rt.rt_flags |= RTF_REINSTATE;
 255                         continue;
 256                 }
 257                 if (strcmp(*args, "device")==0 || strcmp(*args, "dev")==0) {
 258                         args++;
 259                         if (rt.rt_dev || *args == NULL)
 260                                 show_usage();
 261                         rt.rt_dev = *args++;
 262                         continue;
 263                 }
 264                 /* nothing matches */
 265                 if (!rt.rt_dev) {
 266                         rt.rt_dev = *args++;
 267                         if (*args)
 268                                 show_usage();   /* must be last to catch typos */
 269                 } else {
 270                         show_usage();
 271                 }
 272         }
 273
 274 #if HAVE_RTF_REJECT
 275         if ((rt.rt_flags & RTF_REJECT) && !rt.rt_dev)
 276                 rt.rt_dev = "lo";
 277 #endif
 278
 279         /* sanity checks.. */
 280         if (mask_in_addr(rt)) {
 281                 unsigned long mask = mask_in_addr(rt);
 282                 mask = ~ntohl(mask);
 283                 if ((rt.rt_flags & RTF_HOST) && mask != 0xffffffff) {
 284                         error_msg(
 285                                 _("netmask %.8x doesn't make sense with host route"),
 286                                 (unsigned int)mask);
 287                         return E_OPTERR;
 288                 }
 289                 if (mask & (mask + 1)) {
 290                         error_msg(_("bogus netmask %s"), netmask);
 291                         return E_OPTERR;
 292                 }
 293                 mask = ((struct sockaddr_in *) &rt.rt_dst)->sin_addr.s_addr;
 294                 if (mask & ~mask_in_addr(rt)) {
 295                         error_msg(_("netmask doesn't match route address"));
 296                         return E_OPTERR;
 297                 }
 298         }
 299         /* Fill out netmask if still unset */
 300         if ((action == RTACTION_ADD) && rt.rt_flags & RTF_HOST)
 301                 mask_in_addr(rt) = 0xffffffff;
 302
 303         /* Create a socket to the INET kernel. */
 304         if ((skfd = socket(AF_INET, SOCK_DGRAM, 0)) < 0) {
 305                 perror("socket");
 306                 return E_SOCK;
 307         }
 308         /* Tell the kernel to accept this route. */
 309         if (action == RTACTION_DEL) {
 310                 if (ioctl(skfd, SIOCDELRT, &rt) < 0) {
 311                         perror("SIOCDELRT");
 312                         close(skfd);
 313                         return E_SOCK;
 314                 }
 315         } else {
 316                 if (ioctl(skfd, SIOCADDRT, &rt) < 0) {
 317                         perror("SIOCADDRT");
 318                         close(skfd);
 319                         return E_SOCK;
 320                 }
 321         }
 322
 323         /* Close the socket. */
 324         (void) close(skfd);
 325         return EXIT_SUCCESS;
 326 }
 327
 328 #ifndef RTF_UP
 329 /* Keep this in sync with /usr/src/linux/include/linux/route.h */
 330 #define RTF_UP          0x0001          /* route usable                 */
 331 #define RTF_GATEWAY     0x0002          /* destination is a gateway     */
 332 #define RTF_HOST        0x0004          /* host entry (net otherwise)   */
 333 #define RTF_REINSTATE   0x0008          /* reinstate route after tmout  */
 334 #define RTF_DYNAMIC     0x0010          /* created dyn. (by redirect)   */
 335 #define RTF_MODIFIED    0x0020          /* modified dyn. (by redirect)  */
 336 #define RTF_MTU         0x0040          /* specific MTU for this route  */
 337 #ifndef RTF_MSS
 338 #define RTF_MSS         RTF_MTU         /* Compatibility :-(            */
 339 #endif
 340 #define RTF_WINDOW      0x0080          /* per route window clamping    */
 341 #define RTF_IRTT        0x0100          /* Initial round trip time      */
 342 #define RTF_REJECT      0x0200          /* Reject route                 */
 343 #endif
 344
 345 void displayroutes(int noresolve, int netstatfmt)
 346 {
 347         char buff[256];
 348         int  nl = 0 ;
 349         struct in_addr dest;
 350         struct in_addr gw;
 351         struct in_addr mask;
 352         int flgs, ref, use, metric, mtu, win, ir;
 353         char flags[64];
 354         unsigned long int d,g,m;
 355
 356         char sdest[16], sgw[16];
 357
 358         FILE *fp = xfopen("/proc/net/route", "r");
 359
 360         if(noresolve)
 361                 noresolve = 0x0fff;
 362
 363         while( fgets(buff, sizeof(buff), fp) != NULL ) {
 364                 if(nl) {
 365                         int ifl = 0;
 366                         int numeric;
 367                         struct sockaddr_in s_addr;
 368
 369                         while(buff[ifl]!=' ' && buff[ifl]!='\t' && buff[ifl]!='\0')
 370                                 ifl++;
 371                         buff[ifl]=0;    /* interface */
 372                         if(sscanf(buff+ifl+1, "%lx%lx%X%d%d%d%lx%d%d%d",
 373                            &d, &g, &flgs, &ref, &use, &metric, &m, &mtu, &win, &ir )!=10) {
 374                                 error_msg_and_die( "Unsuported kernel route format\n");
 375                         }
 376                         if(nl==1) {
 377                                 printf("Kernel IP routing table\n");
 378                                 printf("Destination     Gateway         Genmask         Flags %s Iface\n",
 379                                        netstatfmt ? "  MSS Window  irtt" : "Metric Ref    Use");
 380                         }
 381                         ifl = 0;        /* parse flags */
 382                         if(flgs&RTF_UP) {
 383                                 if(flgs&RTF_REJECT)
 384                                         flags[ifl++]='!';
 385                                 else
 386                                         flags[ifl++]='U';
 387                                 if(flgs&RTF_GATEWAY)
 388                                         flags[ifl++]='G';
 389                                 if(flgs&RTF_HOST)
 390                                         flags[ifl++]='H';
 391                                 if(flgs&RTF_REINSTATE)
 392                                         flags[ifl++]='R';
 393                                 if(flgs&RTF_DYNAMIC)
 394                                         flags[ifl++]='D';
 395                                 if(flgs&RTF_MODIFIED)
 396                                         flags[ifl++]='M';
 397                                 flags[ifl]=0;
 398                                 dest.s_addr = d;
 399                                 gw.s_addr   = g;
 400                                 mask.s_addr = m;
 401                                 memset(&s_addr, 0, sizeof(struct sockaddr_in));
 402                                 s_addr.sin_family = AF_INET;
 403                                 s_addr.sin_addr = dest;
 404                                 numeric = noresolve | 0x8000; /* default instead of * */
 405                                 INET_rresolve(sdest, sizeof(sdest), &s_addr, numeric, m);
 406                                 numeric = noresolve | 0x4000; /* host instead of net */
 407                                 s_addr.sin_addr = gw;
 408                                 INET_rresolve(sgw, sizeof(sgw), &s_addr, numeric, m);
 409
 410                                 printf("%-16s%-16s%-16s%-6s", sdest, sgw, inet_ntoa(mask), flags);
 411                                 if ( netstatfmt )
 412                                         printf("%5d %-5d %6d %s\n", mtu, win, ir, buff);
 413                                 else
 414                                         printf("%-6d %-2d %7d %s\n", metric, ref, use, buff);
 415                         }
 416                 }
 417                 nl++;
 418         }
 419 }
 420
 421 int route_main(int argc, char **argv)
 422 {
 423         int opt;
 424         int what = 0;
 425
 426         if ( !argv [1] || ( argv [1][0] == '-' )) {
 427                 /* check options */
 428                 int noresolve = 0;
 429                 int extended = 0;
 430
 431                 while ((opt = getopt(argc, argv, "ne")) > 0) {
 432                         switch (opt) {
 433                                 case 'n':
 434                                         noresolve = 1;
 435                                         break;
 436                                 case 'e':
 437                                         extended = 1;
 438                                         break;
 439                                 default:
 440                                         show_usage ( );
 441                         }
 442                 }
 443
 444                 displayroutes ( noresolve, extended );
 445                 return EXIT_SUCCESS;
 446         } else {
 447                 /* check verb */
 448                 if (strcmp( argv [1], "add")==0)
 449                         what = RTACTION_ADD;
 450                 else if (strcmp( argv [1], "del")==0 || strcmp( argv [1], "delete")==0)
 451                         what = RTACTION_DEL;
 452                 else if (strcmp( argv [1], "flush")==0)
 453                         what = RTACTION_FLUSH;
 454                 else
 455                         show_usage();
 456         }
 457
 458         return INET_setroute(what, 0, argv+2 );
 459 }