uu pseudo dma kludge

[unix-history] / usr / src / sbin / route / route.c

diff --git a/usr/src/sbin/route/route.c b/usr/src/sbin/route/route.c
index 2b2ddf0..7b65241 100644 (file)
--- a/usr/src/sbin/route/route.c
+++ b/usr/src/sbin/route/route.c
@@ -1,13 +1,17 @@
 #ifndef lint
 #ifndef lint

-static char sccsid[] = "@(#)route.c    4.3 82/10/07";
+static char sccsid[] = "@(#)route.c    4.7 83/05/05";

 #endif
 
 #endif
 

-#include <stdio.h>

 #include <sys/types.h>
 #include <sys/socket.h>
 #include <sys/ioctl.h>
 #include <sys/types.h>
 #include <sys/socket.h>
 #include <sys/ioctl.h>

+#include <sys/mbuf.h>
+
+#define        KERNEL

 #include <net/route.h>
 #include <net/route.h>

-#include <net/in.h>
+#include <netinet/in.h>
+
+#include <stdio.h>

 #include <errno.h>
 #include <ctype.h>
 #include <netdb.h>
 #include <errno.h>
 #include <ctype.h>
 #include <netdb.h>


@@ -16,6 +20,7 @@ struct        rtentry route;
 int    options;
 int    s;
 struct sockaddr_in sin = { AF_INET };
 int    options;
 int    s;
 struct sockaddr_in sin = { AF_INET };

+struct in_addr inet_makeaddr();

 
 main(argc, argv)
        int argc;
 
 main(argc, argv)
        int argc;


@@ -23,21 +28,136 @@ main(argc, argv)
 {
 
        if (argc < 2)
 {
 
        if (argc < 2)

-               printf("usage: route [ cmd ] [ args ]\n"), exit(1);
-       s = socket(SOCK_RAW, 0, 0, options);
+               printf("usage: route [ -f ] [ cmd args ]\n"), exit(1);
+       s = socket(AF_INET, SOCK_RAW, 0, 0);

        if (s < 0) {
        if (s < 0) {

-               perror("socket");
+               perror("route: socket");

                exit(1);
        }
        argc--, argv++;
                exit(1);
        }
        argc--, argv++;

-       if (strcmp(*argv, "add") == 0)
-               newroute(argc, argv);
-       else if (strcmp(*argv, "delete") == 0)
-               newroute(argc, argv);
-       else if (strcmp(*argv, "change") == 0)
-               changeroute(argc-1, argv+1);
-       else
-               printf("%s: huh?\n", *argv);
+       if (strcmp(*argv, "-f") == 0) {
+               argc--, argv++;
+               flushroutes();
+       }
+       if (argc > 0) {
+               if (strcmp(*argv, "add") == 0)
+                       newroute(argc, argv);
+               else if (strcmp(*argv, "delete") == 0)
+                       newroute(argc, argv);
+               else if (strcmp(*argv, "change") == 0)
+                       changeroute(argc-1, argv+1);
+               else
+                       printf("%s: huh?\n", *argv);
+       }
+}
+
+/*
+ * Purge all entries in the routing tables not
+ * associated with network interfaces.
+ */
+#include <nlist.h>
+
+struct nlist nl[] = {
+#define        N_RTHOST        0
+       { "_rthost" },
+#define        N_RTNET         1
+       { "_rtnet" },
+       "",
+};
+
+flushroutes()
+{
+       struct mbuf mb;
+       register struct rtentry *rt;
+       register struct mbuf *m;
+       struct mbuf *routehash[RTHASHSIZ];
+       int i, doinghost = 1, kmem;
+       char *routename();
+
+       nlist("/vmunix", nl);
+       if (nl[N_RTHOST].n_value == 0) {
+               printf("route: \"rthost\", symbol not in namelist\n");
+               exit(1);
+       }
+       if (nl[N_RTNET].n_value == 0) {
+               printf("route: \"rtnet\", symbol not in namelist\n");
+               exit(1);
+       }
+       kmem = open("/dev/kmem", 0);
+       if (kmem < 0) {
+               perror("route: /dev/kmem");
+               exit(1);
+       }
+       lseek(kmem, nl[N_RTHOST].n_value, 0);
+       read(kmem, routehash, sizeof (routehash));
+       printf("Flushing routing tables:\n");
+again:
+       for (i = 0; i < RTHASHSIZ; i++) {
+               if (routehash[i] == 0)
+                       continue;
+               m = routehash[i];
+               while (m) {
+                       lseek(kmem, m, 0);
+                       read(kmem, &mb, sizeof (mb));
+                       rt = mtod(&mb, struct rtentry *);
+                       if (rt->rt_flags & RTF_GATEWAY) {
+                               struct sockaddr_in *sin;
+
+                               sin = (struct sockaddr_in *)&rt->rt_dst;
+                               printf("%-15.15s ", routename(sin->sin_addr));
+                               sin = (struct sockaddr_in *)&rt->rt_gateway;
+                               printf("%-15.15s ", routename(sin->sin_addr));
+                               if (ioctl(s, SIOCDELRT, (caddr_t)rt) < 0)
+                                       error("delete");
+                               else
+                                       printf("done\n");
+                       }
+                       m = mb.m_next;
+               }
+       }
+       if (doinghost) {
+               lseek(kmem, nl[N_RTNET].n_value, 0);
+               read(kmem, routehash, sizeof (routehash));
+               doinghost = 0;
+               goto again;
+       }
+       close(kmem);
+}
+
+char *
+routename(in)
+       struct in_addr in;
+{
+       char *cp = 0;
+       static char line[50];
+       int lna, net;
+
+       net = inet_netof(in);
+       lna = inet_lnaof(in);
+       if (lna == INADDR_ANY) {
+               struct netent *np = getnetbyaddr(net, AF_INET);
+
+               if (np)
+                       cp = np->n_name;
+       } else {
+               struct hostent *hp;
+
+               hp = gethostbyaddr(&in, sizeof (struct in_addr),
+                       AF_INET);
+               if (hp)
+                       cp = hp->h_name;
+       }
+       if (cp)
+               strcpy(line, cp);
+       else {
+               u_char *ucp = (u_char *)&in;
+               if (lna == INADDR_ANY)
+                       sprintf(line, "%u.%u.%u", ucp[0], ucp[1], ucp[2]);
+               else
+                       sprintf(line, "%u.%u.%u.%u", ucp[0], ucp[1],
+                               ucp[2], ucp[3]);
+       }
+       return (line);

 }
 
 newroute(argc, argv)
 }
 
 newroute(argc, argv)


@@ -60,9 +180,9 @@ newroute(argc, argv)
                route.rt_flags |= RTF_HOST;
        if (argc > 3 && atoi(argv[3]) > 0)
                route.rt_flags |= RTF_GATEWAY;
                route.rt_flags |= RTF_HOST;
        if (argc > 3 && atoi(argv[3]) > 0)
                route.rt_flags |= RTF_GATEWAY;

-       printf("%s %x: gateway %x, flags %x\n", cmd, sin->sin_addr,
-               ((struct sockaddr_in *)&route.rt_gateway)->sin_addr,
-               route.rt_flags);
+       printf("%s %s: gateway ", cmd, routename(sin->sin_addr));
+       sin = (struct sockaddr_in *)&route.rt_gateway;
+       printf("%s, flags %x\n", routename(sin->sin_addr), route.rt_flags);

        if (ioctl(s, *cmd == 'a' ? SIOCADDRT : SIOCDELRT, (caddr_t)&route))
                error(cmd);
 }
        if (ioctl(s, *cmd == 'a' ? SIOCADDRT : SIOCDELRT, (caddr_t)&route))
                error(cmd);
 }


@@ -94,17 +214,32 @@ getaddr(s, sin)
        struct sockaddr_in *sin;
 {
        struct hostent *hp;
        struct sockaddr_in *sin;
 {
        struct hostent *hp;

+       struct netent *np;
+       u_long val;

 
        hp = gethostbyname(s);
 
        hp = gethostbyname(s);

-       if (hp == 0) {
-               sin->sin_addr.s_addr = inet_addr(s);
-               if (sin->sin_addr.s_addr == -1) {
-                       fprintf(stderr, "%s: bad value\n", s);
-                       exit(1);
-               }
-               sin->sin_family = AF_INET;
+       if (hp) {
+               sin->sin_family = hp->h_addrtype;
+               bcopy(hp->h_addr, &sin->sin_addr, hp->h_length);
+               return;
+       }
+       np = getnetbyname(s);
+       if (np) {
+               sin->sin_family = np->n_addrtype;
+               sin->sin_addr = inet_makeaddr(np->n_net, INADDR_ANY);
+               return;
+       }
+       sin->sin_family = AF_INET;
+       val = inet_addr(s);
+       if (val != -1) {
+               sin->sin_addr.s_addr = val;
+               return;
+       }
+       val = inet_network(s);
+       if (val != -1) {
+               sin->sin_addr = inet_makeaddr(val, INADDR_ANY);

                return;
        }
                return;
        }

-       sin->sin_family = hp->h_addrtype;
-       bcopy(hp->h_addr, &sin->sin_addr, hp->h_length);
+       fprintf(stderr, "%s: bad value\n", s);
+       exit(1);

 }
 }