BSD 4_4_Lite2 release

[unix-history] / usr / src / usr.bin / netstat / route.c

diff --git a/usr/src/usr.bin/netstat/route.c b/usr/src/usr.bin/netstat/route.c
index 84b4d32..ee98f07 100644 (file)
--- a/usr/src/usr.bin/netstat/route.c
+++ b/usr/src/usr.bin/netstat/route.c
@@ -1,12 +1,38 @@
 /*
 /*

- * Copyright (c) 1983, 1988 Regents of the University of California.
- * All rights reserved.
+ * Copyright (c) 1983, 1988, 1993
+ *     The Regents of the University of California.  All rights reserved.

  *
  *

- * %sccs.include.redist.c%
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ *    notice, this list of conditions and the following disclaimer.
+ * 2. Redistributions in binary form must reproduce the above copyright
+ *    notice, this list of conditions and the following disclaimer in the
+ *    documentation and/or other materials provided with the distribution.
+ * 3. All advertising materials mentioning features or use of this software
+ *    must display the following acknowledgement:
+ *     This product includes software developed by the University of
+ *     California, Berkeley and its contributors.
+ * 4. Neither the name of the University nor the names of its contributors
+ *    may be used to endorse or promote products derived from this software
+ *    without specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
+ * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
+ * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+ * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
+ * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
+ * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
+ * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
+ * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
+ * SUCH DAMAGE.

  */
 
 #ifndef lint
  */
 
 #ifndef lint

-static char sccsid[] = "@(#)route.c    5.24 (Berkeley) %G%";
+static char sccsid[] = "@(#)route.c    8.6 (Berkeley) 4/28/95";

 #endif /* not lint */
 
 #include <sys/param.h>
 #endif /* not lint */
 
 #include <sys/param.h>


@@ -24,7 +50,7 @@ static char sccsid[] = "@(#)route.c   5.24 (Berkeley) %G%";
 
 #include <netns/ns.h>
 
 
 #include <netns/ns.h>
 

-#include <sys/kinfo.h>
+#include <sys/sysctl.h>

 
 #include <netdb.h>
 #include <stdio.h>
 
 #include <netdb.h>
 #include <stdio.h>


@@ -33,7 +59,7 @@ static char sccsid[] = "@(#)route.c   5.24 (Berkeley) %G%";
 #include <unistd.h>
 #include "netstat.h"
 
 #include <unistd.h>
 #include "netstat.h"
 

-#define kget(p, d) (kread((off_t)(p), (char *)&(d), sizeof (d)))
+#define kget(p, d) (kread((u_long)(p), (char *)&(d), sizeof (d)))

 
 /*
  * Definitions for showing gateway flags.
 
 /*
  * Definitions for showing gateway flags.


@@ -76,7 +102,7 @@ static void p_tree __P((struct radix_node *));
 static void p_rtnode __P(());
 static void ntreestuff __P(());
 static void np_rtentry __P((struct rt_msghdr *));
 static void p_rtnode __P(());
 static void ntreestuff __P(());
 static void np_rtentry __P((struct rt_msghdr *));

-static void p_sockaddr __P((struct sockaddr *, int, int));
+static void p_sockaddr __P((struct sockaddr *, struct sockaddr *, int, int));

 static void p_flags __P((int, char *));
 static void p_rtentry __P((struct rtentry *));
 
 static void p_flags __P((int, char *));
 static void p_rtentry __P((struct rtentry *));
 


@@ -85,7 +111,7 @@ static void p_rtentry __P((struct rtentry *));
  */
 void
 routepr(rtree)
  */
 void
 routepr(rtree)

-       off_t rtree;
+       u_long rtree;

 {
        struct radix_node_head *rnh, head;
        int i;
 {
        struct radix_node_head *rnh, head;
        int i;


@@ -178,7 +204,7 @@ kgetsa(dst)
 
        kget(dst, pt_u.u_sa);
        if (pt_u.u_sa.sa_len > sizeof (pt_u.u_sa))
 
        kget(dst, pt_u.u_sa);
        if (pt_u.u_sa.sa_len > sizeof (pt_u.u_sa))

-               kread((off_t)dst, (char *)pt_u.u_data, pt_u.u_sa.sa_len);
+               kread((u_long)dst, (char *)pt_u.u_data, pt_u.u_sa.sa_len);

        return (&pt_u.u_sa);
 }
 
        return (&pt_u.u_sa);
 }
 


@@ -203,7 +229,7 @@ again:
                                p_rtnode();
                } else {
                        p_sockaddr(kgetsa((struct sockaddr *)rnode.rn_key),
                                p_rtnode();
                } else {
                        p_sockaddr(kgetsa((struct sockaddr *)rnode.rn_key),

-                           0, 44);
+                                  NULL, 0, 44);

                        putchar('\n');
                }
                if (rn = rnode.rn_dupedkey)
                        putchar('\n');
                }
                if (rn = rnode.rn_dupedkey)


@@ -230,7 +256,7 @@ p_rtnode()
                if (rnode.rn_mask) {
                        printf("\t  mask ");
                        p_sockaddr(kgetsa((struct sockaddr *)rnode.rn_mask),
                if (rnode.rn_mask) {
                        printf("\t  mask ");
                        p_sockaddr(kgetsa((struct sockaddr *)rnode.rn_mask),

-                                   0, -1);
+                                  NULL, 0, -1);

                } else if (rm == 0)
                        return;
        } else {
                } else if (rm == 0)
                        return;
        } else {


@@ -242,7 +268,15 @@ p_rtnode()
                sprintf(nbuf, " %d refs, ", rmask.rm_refs);
                printf(" mk = %8.8x {(%d),%s",
                        rm, -1 - rmask.rm_b, rmask.rm_refs ? nbuf : " ");
                sprintf(nbuf, " %d refs, ", rmask.rm_refs);
                printf(" mk = %8.8x {(%d),%s",
                        rm, -1 - rmask.rm_b, rmask.rm_refs ? nbuf : " ");

-               p_sockaddr(kgetsa((struct sockaddr *)rmask.rm_mask), 0, -1);
+               if (rmask.rm_flags & RNF_NORMAL) {
+                       struct radix_node rnode_aux;
+                       printf(" <normal>, ");
+                       kget(rmask.rm_leaf, rnode_aux);
+                       p_sockaddr(kgetsa((struct sockaddr *)rnode_aux.rn_mask),
+                                   NULL, 0, -1);
+               } else
+                   p_sockaddr(kgetsa((struct sockaddr *)rmask.rm_mask),
+                               NULL, 0, -1);

                putchar('}');
                if (rm = rmask.rm_mklist)
                        printf(" ->");
                putchar('}');
                if (rm = rmask.rm_mklist)
                        printf(" ->");


@@ -253,16 +287,23 @@ p_rtnode()
 static void
 ntreestuff()
 {
 static void
 ntreestuff()
 {

-       int needed;
+       size_t needed;
+       int mib[6];

        char *buf, *next, *lim;
        register struct rt_msghdr *rtm;
 
        char *buf, *next, *lim;
        register struct rt_msghdr *rtm;
 

-       if ((needed = getkerninfo(KINFO_RT_DUMP, 0, 0, 0)) < 0)
-               { perror("route-getkerninfo-estimate"); exit(1);}
+        mib[0] = CTL_NET;
+        mib[1] = PF_ROUTE;
+        mib[2] = 0;
+        mib[3] = 0;
+        mib[4] = NET_RT_DUMP;
+        mib[5] = 0;
+        if (sysctl(mib, 6, NULL, &needed, NULL, 0) < 0)
+               { perror("route-sysctl-estimate"); exit(1);}

        if ((buf = malloc(needed)) == 0)
                { printf("out of space\n"); exit(1);}
        if ((buf = malloc(needed)) == 0)
                { printf("out of space\n"); exit(1);}

-       if (getkerninfo(KINFO_RT_DUMP, buf, &needed, 0) < 0)
-               { perror("getkerninfo of routing table"); exit(1);}
+        if (sysctl(mib, 6, buf, &needed, NULL, 0) < 0)
+               { perror("sysctl of routing table"); exit(1);}

        lim  = buf + needed;
        for (next = buf; next < lim; next += rtm->rtm_msglen) {
                rtm = (struct rt_msghdr *)next;
        lim  = buf + needed;
        for (next = buf; next < lim; next += rtm->rtm_msglen) {
                rtm = (struct rt_msghdr *)next;


@@ -300,21 +341,21 @@ np_rtentry(rtm)
                old_af = af;
        }
        if (rtm->rtm_addrs == RTA_DST)
                old_af = af;
        }
        if (rtm->rtm_addrs == RTA_DST)

-               p_sockaddr(sa, 0, 36);
+               p_sockaddr(sa, NULL, 0, 36);

        else {
        else {

-               p_sockaddr(sa, rtm->rtm_flags, 16);
+               p_sockaddr(sa, NULL, rtm->rtm_flags, 16);

                if (sa->sa_len == 0)
                        sa->sa_len = sizeof(long);
                sa = (struct sockaddr *)(sa->sa_len + (char *)sa);
                if (sa->sa_len == 0)
                        sa->sa_len = sizeof(long);
                sa = (struct sockaddr *)(sa->sa_len + (char *)sa);

-               p_sockaddr(sa, 0, 18);
+               p_sockaddr(sa, NULL, 0, 18);

        }
        p_flags(rtm->rtm_flags & interesting, "%-6.6s ");
        putchar('\n');
 }
 
 static void
        }
        p_flags(rtm->rtm_flags & interesting, "%-6.6s ");
        putchar('\n');
 }
 
 static void

-p_sockaddr(sa, flags, width)
-       struct sockaddr *sa;
+p_sockaddr(sa, mask, flags, width)
+       struct sockaddr *sa, *mask;

        int flags, width;
 {
        char workbuf[128], *cplim;
        int flags, width;
 {
        char workbuf[128], *cplim;


@@ -325,10 +366,16 @@ p_sockaddr(sa, flags, width)
            {
                register struct sockaddr_in *sin = (struct sockaddr_in *)sa;
 
            {
                register struct sockaddr_in *sin = (struct sockaddr_in *)sa;
 

-               cp = (sin->sin_addr.s_addr == 0) ? "default" :
-                     ((flags & RTF_HOST) ?
-                       routename(sin->sin_addr.s_addr) :
-                       netname(sin->sin_addr.s_addr, 0L));
+               if (sin->sin_addr.s_addr == INADDR_ANY)
+                       cp = "default";
+               else if (flags & RTF_HOST)
+                       cp = routename(sin->sin_addr.s_addr);
+               else if (mask)
+                       cp = netname(sin->sin_addr.s_addr,
+                                    ntohl(((struct sockaddr_in *)mask)
+                                          ->sin_addr.s_addr));
+               else
+                       cp = netname(sin->sin_addr.s_addr, 0L);

                break;
            }
 
                break;
            }
 


@@ -367,14 +414,16 @@ p_sockaddr(sa, flags, width)
 
        default:
            {
 
        default:
            {

-               register u_short *s = ((u_short *)sa->sa_data), *slim;
+               register u_char *s = (u_char *)sa->sa_data, *slim;

 
 

-               slim = (u_short *) sa + ((sa->sa_len + sizeof(u_short) - 1) /
-                   sizeof(u_short));
+               slim =  sa->sa_len + (u_char *) sa;

                cplim = cp + sizeof(workbuf) - 6;
                cp += sprintf(cp, "(%d)", sa->sa_family);
                cplim = cp + sizeof(workbuf) - 6;
                cp += sprintf(cp, "(%d)", sa->sa_family);

-               while (s < slim && cp < cplim)
-                       cp += sprintf(cp, " %x", *s++);
+               while (s < slim && cp < cplim) {
+                       cp += sprintf(cp, " %02x", *s++);
+                       if (s < slim)
+                           cp += sprintf(cp, "%02x", *s++);
+               }

                cp = workbuf;
            }
        }
                cp = workbuf;
            }
        }


@@ -409,15 +458,25 @@ p_rtentry(rt)
 {
        static struct ifnet ifnet, *lastif;
        static char name[16];
 {
        static struct ifnet ifnet, *lastif;
        static char name[16];

+       register struct sockaddr *sa;
+       struct sockaddr addr, mask;

 
 

-       p_sockaddr(kgetsa(rt_key(rt)), rt->rt_flags, WID_DST);
-       p_sockaddr(kgetsa(rt->rt_gateway), 0, WID_GW);
+       if (!(sa = kgetsa(rt_key(rt))))
+               bzero(&addr, sizeof addr);
+       else
+               addr = *sa;
+       if (!rt_mask(rt) || !(sa = kgetsa(rt_mask(rt))))
+               bzero(&mask, sizeof mask);
+       else
+               mask = *sa;
+       p_sockaddr(&addr, &mask, rt->rt_flags, WID_DST);
+       p_sockaddr(kgetsa(rt->rt_gateway), NULL, RTF_HOST, WID_GW);

        p_flags(rt->rt_flags, "%-6.6s ");
        printf("%6d %8d ", rt->rt_refcnt, rt->rt_use);
        if (rt->rt_ifp) {
                if (rt->rt_ifp != lastif) {
                        kget(rt->rt_ifp, ifnet);
        p_flags(rt->rt_flags, "%-6.6s ");
        printf("%6d %8d ", rt->rt_refcnt, rt->rt_use);
        if (rt->rt_ifp) {
                if (rt->rt_ifp != lastif) {
                        kget(rt->rt_ifp, ifnet);

-                       kread((off_t)ifnet.if_name, name, 16);
+                       kread((u_long)ifnet.if_name, name, 16);

                        lastif = rt->rt_ifp;
                }
                printf(" %.15s%d%s", name, ifnet.if_unit,
                        lastif = rt->rt_ifp;
                }
                printf(" %.15s%d%s", name, ifnet.if_unit,


@@ -466,6 +525,51 @@ routename(in)
        return (line);
 }
 
        return (line);
 }
 

+static u_long
+forgemask(a)
+       u_long a;
+{
+       u_long m;
+
+       if (IN_CLASSA(a))
+               m = IN_CLASSA_NET;
+       else if (IN_CLASSB(a))
+               m = IN_CLASSB_NET;
+       else
+               m = IN_CLASSC_NET;
+       return (m);
+}
+
+static void
+domask(dst, addr, mask)
+       char *dst;
+       u_long addr, mask;
+{
+       register int b, i;
+
+       if (!mask || (forgemask(addr) == mask)) {
+               *dst = '\0';
+               return;
+       }
+       i = 0;
+       for (b = 0; b < 32; b++)
+               if (mask & (1 << b)) {
+                       register int bb;
+
+                       i = b;
+                       for (bb = b+1; bb < 32; bb++)
+                               if (!(mask & (1 << bb))) {
+                                       i = -1; /* noncontig */
+                                       break;
+                               }
+                       break;
+               }
+       if (i == -1)
+               sprintf(dst, "&0x%lx", mask);
+       else
+               sprintf(dst, "/%d", 32-i);
+}
+

 /*
  * Return the name of the network whose address is given.
  * The address is assumed to be that of a net or subnet, not a host.
 /*
  * Return the name of the network whose address is given.
  * The address is assumed to be that of a net or subnet, not a host.


@@ -477,22 +581,26 @@ netname(in, mask)
        char *cp = 0;
        static char line[MAXHOSTNAMELEN + 1];
        struct netent *np = 0;
        char *cp = 0;
        static char line[MAXHOSTNAMELEN + 1];
        struct netent *np = 0;

-       u_long net;
-       register int i;
+       u_long net, omask;
+       register u_long i;

        int subnetshift;
 
        i = ntohl(in);
        int subnetshift;
 
        i = ntohl(in);

+       omask = mask;

        if (!nflag && i) {
                if (mask == 0) {
        if (!nflag && i) {
                if (mask == 0) {

-                       if (IN_CLASSA(i)) {
-                               mask = IN_CLASSA_NET;
+                       switch (mask = forgemask(i)) {
+                       case IN_CLASSA_NET:

                                subnetshift = 8;
                                subnetshift = 8;

-                       } else if (IN_CLASSB(i)) {
-                               mask = IN_CLASSB_NET;
+                               break;
+                       case IN_CLASSB_NET:

                                subnetshift = 8;
                                subnetshift = 8;

-                       } else {
-                               mask = IN_CLASSC_NET;
+                               break;
+                       case IN_CLASSC_NET:

                                subnetshift = 4;
                                subnetshift = 4;

+                               break;
+                       default:
+                               abort();

                        }
                        /*
                         * If there are more bits than the standard mask
                        }
                        /*
                         * If there are more bits than the standard mask


@@ -521,6 +629,7 @@ netname(in, mask)
        else
                sprintf(line, "%u.%u.%u.%u", C(i >> 24),
                        C(i >> 16), C(i >> 8), C(i));
        else
                sprintf(line, "%u.%u.%u.%u", C(i >> 24),
                        C(i >> 16), C(i >> 8), C(i));

+       domask(line+strlen(line), i, omask);

        return (line);
 }
 
        return (line);
 }
 


@@ -529,7 +638,7 @@ netname(in, mask)
  */
 void
 rt_stats(off)
  */
 void
 rt_stats(off)

-       off_t off;
+       u_long off;

 {
        struct rtstat rtstat;
 
 {
        struct rtstat rtstat;