[BACK]Return to route.c CVS log [TXT][DIR] Up to [local] / src / usr.bin / netstat

Annotation of src/usr.bin/netstat/route.c, Revision 1.17

1.17    ! angelos     1: /*     $OpenBSD: route.c,v 1.16 1997/07/13 23:02:42 angelos Exp $      */
1.2       deraadt     2: /*     $NetBSD: route.c,v 1.15 1996/05/07 02:55:06 thorpej Exp $       */
1.1       deraadt     3:
                      4: /*
                      5:  * Copyright (c) 1983, 1988, 1993
                      6:  *     The Regents of the University of California.  All rights reserved.
                      7:  *
                      8:  * Redistribution and use in source and binary forms, with or without
                      9:  * modification, are permitted provided that the following conditions
                     10:  * are met:
                     11:  * 1. Redistributions of source code must retain the above copyright
                     12:  *    notice, this list of conditions and the following disclaimer.
                     13:  * 2. Redistributions in binary form must reproduce the above copyright
                     14:  *    notice, this list of conditions and the following disclaimer in the
                     15:  *    documentation and/or other materials provided with the distribution.
                     16:  * 3. All advertising materials mentioning features or use of this software
                     17:  *    must display the following acknowledgement:
                     18:  *     This product includes software developed by the University of
                     19:  *     California, Berkeley and its contributors.
                     20:  * 4. Neither the name of the University nor the names of its contributors
                     21:  *    may be used to endorse or promote products derived from this software
                     22:  *    without specific prior written permission.
                     23:  *
                     24:  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
                     25:  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
                     26:  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
                     27:  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
                     28:  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
                     29:  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
                     30:  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
                     31:  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
                     32:  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
                     33:  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
                     34:  * SUCH DAMAGE.
                     35:  */
                     36:
                     37: #ifndef lint
                     38: #if 0
                     39: static char sccsid[] = "from: @(#)route.c      8.3 (Berkeley) 3/9/94";
                     40: #else
1.17    ! angelos    41: static char *rcsid = "$OpenBSD: route.c,v 1.16 1997/07/13 23:02:42 angelos Exp $";
1.1       deraadt    42: #endif
                     43: #endif /* not lint */
                     44:
                     45: #include <sys/param.h>
                     46: #include <sys/protosw.h>
                     47: #include <sys/socket.h>
                     48: #include <sys/mbuf.h>
                     49:
                     50: #include <net/if.h>
                     51: #include <net/if_dl.h>
                     52: #include <net/if_types.h>
                     53: #define _KERNEL
                     54: #include <net/route.h>
                     55: #undef _KERNEL
                     56: #include <netinet/in.h>
1.13      millert    57: #include <arpa/inet.h>
1.1       deraadt    58:
                     59: #include <netns/ns.h>
                     60:
1.5       mickey     61: #include <netipx/ipx.h>
                     62:
1.1       deraadt    63: #include <sys/sysctl.h>
                     64:
1.15      millert    65: #include <limits.h>
1.1       deraadt    66: #include <netdb.h>
                     67: #include <stdio.h>
                     68: #include <stdlib.h>
                     69: #include <string.h>
                     70: #include <unistd.h>
1.9       angelos    71:
                     72: #ifndef INET
                     73: #define INET
                     74: #endif
                     75:
                     76: #include <net/encap.h>
1.1       deraadt    77: #include "netstat.h"
                     78:
                     79: #define kget(p, d) (kread((u_long)(p), (char *)&(d), sizeof (d)))
                     80:
                     81: /*
                     82:  * Definitions for showing gateway flags.
                     83:  */
                     84: struct bits {
                     85:        short   b_mask;
                     86:        char    b_val;
                     87: } bits[] = {
                     88:        { RTF_UP,       'U' },
                     89:        { RTF_GATEWAY,  'G' },
                     90:        { RTF_HOST,     'H' },
                     91:        { RTF_REJECT,   'R' },
                     92:        { RTF_DYNAMIC,  'D' },
                     93:        { RTF_MODIFIED, 'M' },
                     94:        { RTF_DONE,     'd' }, /* Completed -- for routing messages only */
                     95:        { RTF_MASK,     'm' }, /* Mask Present -- for routing messages only */
                     96:        { RTF_CLONING,  'C' },
                     97:        { RTF_XRESOLVE, 'X' },
                     98:        { RTF_LLINFO,   'L' },
                     99:        { RTF_STATIC,   'S' },
                    100:        { RTF_PROTO1,   '1' },
                    101:        { RTF_PROTO2,   '2' },
                    102:        { 0 }
                    103: };
                    104:
                    105: static union {
1.6       deraadt   106:        struct          sockaddr u_sa;
                    107:        u_int32_t       u_data[64];
1.1       deraadt   108: } pt_u;
                    109:
                    110: int    do_rtent = 0;
                    111: struct rtentry rtentry;
                    112: struct radix_node rnode;
                    113: struct radix_mask rmask;
                    114:
                    115: int    NewTree = 0;
                    116:
                    117: static struct sockaddr *kgetsa __P((struct sockaddr *));
                    118: static void p_tree __P((struct radix_node *));
                    119: static void p_rtnode __P(());
                    120: static void ntreestuff __P(());
                    121: static void np_rtentry __P((struct rt_msghdr *));
                    122: static void p_sockaddr __P((struct sockaddr *, int, int));
                    123: static void p_flags __P((int, char *));
                    124: static void p_rtentry __P((struct rtentry *));
1.9       angelos   125: static void encap_print __P((struct rtentry *));
1.1       deraadt   126:
                    127: /*
                    128:  * Print routing tables.
                    129:  */
                    130: void
                    131: routepr(rtree)
                    132:        u_long rtree;
                    133: {
                    134:        struct radix_node_head *rnh, head;
                    135:        int i;
                    136:
                    137:        printf("Routing tables\n");
                    138:
                    139:        if (Aflag == 0 && NewTree)
                    140:                ntreestuff();
                    141:        else {
                    142:                if (rtree == 0) {
                    143:                        printf("rt_tables: symbol not in namelist\n");
                    144:                        return;
                    145:                }
                    146:
                    147:                kget(rtree, rt_tables);
                    148:                for (i = 0; i <= AF_MAX; i++) {
                    149:                        if ((rnh = rt_tables[i]) == 0)
                    150:                                continue;
                    151:                        kget(rnh, head);
                    152:                        if (i == AF_UNSPEC) {
                    153:                                if (Aflag && af == 0) {
                    154:                                        printf("Netmasks:\n");
                    155:                                        p_tree(head.rnh_treetop);
                    156:                                }
                    157:                        } else if (af == AF_UNSPEC || af == i) {
                    158:                                pr_family(i);
                    159:                                do_rtent = 1;
1.9       angelos   160:                                if (i != AF_ENCAP)
1.10      deraadt   161:                                        pr_rthdr();
1.9       angelos   162:                                else
1.10      deraadt   163:                                        pr_encaphdr();
1.1       deraadt   164:                                p_tree(head.rnh_treetop);
                    165:                        }
                    166:                }
                    167:        }
                    168: }
                    169:
                    170: /*
                    171:  * Print address family header before a section of the routing table.
                    172:  */
                    173: void
                    174: pr_family(af)
                    175:        int af;
                    176: {
                    177:        char *afname;
                    178:
                    179:        switch (af) {
                    180:        case AF_INET:
                    181:                afname = "Internet";
                    182:                break;
                    183:        case AF_NS:
                    184:                afname = "XNS";
                    185:                break;
1.5       mickey    186:        case AF_IPX:
                    187:                afname = "IPX";
                    188:                break;
1.1       deraadt   189:        case AF_ISO:
                    190:                afname = "ISO";
                    191:                break;
                    192:        case AF_CCITT:
                    193:                afname = "X.25";
                    194:                break;
1.9       angelos   195:        case AF_ENCAP:
1.10      deraadt   196:                afname = "Encap";
1.9       angelos   197:                break;
1.1       deraadt   198:        default:
                    199:                afname = NULL;
                    200:                break;
                    201:        }
                    202:        if (afname)
                    203:                printf("\n%s:\n", afname);
                    204:        else
                    205:                printf("\nProtocol Family %d:\n", af);
                    206: }
                    207:
                    208: /* column widths; each followed by one space */
                    209: #define        WID_DST         16      /* width of destination column */
                    210: #define        WID_GW          18      /* width of gateway column */
                    211:
                    212: /*
                    213:  * Print header for routing table columns.
                    214:  */
                    215: void
                    216: pr_rthdr()
                    217: {
                    218:
                    219:        if (Aflag)
1.15      millert   220:                printf("%-*.*s ", PLEN, PLEN, "Address");
1.14      millert   221:        printf("%-*.*s %-*.*s %-6.6s  %6.6s%16.16s %6.6s  %s\n",
1.1       deraadt   222:                WID_DST, WID_DST, "Destination",
                    223:                WID_GW, WID_GW, "Gateway",
                    224:                "Flags", "Refs", "Use", "Mtu", "Interface");
                    225: }
                    226:
1.9       angelos   227: /*
                    228:  * Print header for AF_ENCAP entries.
                    229:  */
                    230: void
                    231: pr_encaphdr()
                    232: {
1.10      deraadt   233:        if (Aflag)
1.15      millert   234:                printf("%-*s ", PLEN, "Address");
1.17    ! angelos   235:        printf("%-31s %-5s %-31s %-5s %-5s %-26s\n",
1.16      angelos   236:            "Source address/netmask", "Port", "Destination address/netmask",
                    237:            "Port", "Proto", "SA(Address/SPI/Proto)");
1.9       angelos   238: }
                    239:
1.1       deraadt   240: static struct sockaddr *
                    241: kgetsa(dst)
                    242:        register struct sockaddr *dst;
                    243: {
                    244:
                    245:        kget(dst, pt_u.u_sa);
                    246:        if (pt_u.u_sa.sa_len > sizeof (pt_u.u_sa))
                    247:                kread((u_long)dst, (char *)pt_u.u_data, pt_u.u_sa.sa_len);
                    248:        return (&pt_u.u_sa);
                    249: }
                    250:
                    251: static void
                    252: p_tree(rn)
                    253:        struct radix_node *rn;
                    254: {
                    255:
                    256: again:
                    257:        kget(rn, rnode);
                    258:        if (rnode.rn_b < 0) {
                    259:                if (Aflag)
1.14      millert   260:                        printf("%-16p ", rn);
1.1       deraadt   261:                if (rnode.rn_flags & RNF_ROOT) {
                    262:                        if (Aflag)
                    263:                                printf("(root node)%s",
                    264:                                    rnode.rn_dupedkey ? " =>\n" : "\n");
                    265:                } else if (do_rtent) {
                    266:                        kget(rn, rtentry);
                    267:                        p_rtentry(&rtentry);
                    268:                        if (Aflag)
                    269:                                p_rtnode();
                    270:                } else {
                    271:                        p_sockaddr(kgetsa((struct sockaddr *)rnode.rn_key),
                    272:                            0, 44);
                    273:                        putchar('\n');
                    274:                }
1.13      millert   275:                if ((rn = rnode.rn_dupedkey))
1.1       deraadt   276:                        goto again;
                    277:        } else {
                    278:                if (Aflag && do_rtent) {
1.14      millert   279:                        printf("%-16p ", rn);
1.1       deraadt   280:                        p_rtnode();
                    281:                }
                    282:                rn = rnode.rn_r;
                    283:                p_tree(rnode.rn_l);
                    284:                p_tree(rn);
                    285:        }
                    286: }
                    287:
                    288: char   nbuf[20];
                    289:
                    290: static void
                    291: p_rtnode()
                    292: {
                    293:        struct radix_mask *rm = rnode.rn_mklist;
                    294:
                    295:        if (rnode.rn_b < 0) {
                    296:                if (rnode.rn_mask) {
                    297:                        printf("\t  mask ");
                    298:                        p_sockaddr(kgetsa((struct sockaddr *)rnode.rn_mask),
1.10      deraadt   299:                            0, -1);
1.1       deraadt   300:                } else if (rm == 0)
                    301:                        return;
                    302:        } else {
                    303:                sprintf(nbuf, "(%d)", rnode.rn_b);
1.14      millert   304:                printf("%6.6s %16p : %16p", nbuf, rnode.rn_l,
                    305:                    rnode.rn_r);
1.1       deraadt   306:        }
                    307:        while (rm) {
                    308:                kget(rm, rmask);
                    309:                sprintf(nbuf, " %d refs, ", rmask.rm_refs);
1.14      millert   310:                printf(" mk = %16p {(%d),%s",
1.1       deraadt   311:                        rm, -1 - rmask.rm_b, rmask.rm_refs ? nbuf : " ");
                    312:                p_sockaddr(kgetsa((struct sockaddr *)rmask.rm_mask), 0, -1);
                    313:                putchar('}');
1.13      millert   314:                if ((rm = rmask.rm_mklist))
1.1       deraadt   315:                        printf(" ->");
                    316:        }
                    317:        putchar('\n');
                    318: }
                    319:
                    320: static void
                    321: ntreestuff()
                    322: {
                    323:        size_t needed;
                    324:        int mib[6];
                    325:        char *buf, *next, *lim;
                    326:        register struct rt_msghdr *rtm;
                    327:
1.10      deraadt   328:        mib[0] = CTL_NET;
                    329:        mib[1] = PF_ROUTE;
                    330:        mib[2] = 0;
                    331:        mib[3] = 0;
                    332:        mib[4] = NET_RT_DUMP;
                    333:        mib[5] = 0;
                    334:        if (sysctl(mib, 6, NULL, &needed, NULL, 0) < 0) {
                    335:                perror("route-sysctl-estimate");
                    336:                exit(1);
                    337:        }
                    338:        if ((buf = malloc(needed)) == 0) {
                    339:                printf("out of space\n");
                    340:                exit(1);
                    341:        }
                    342:         if (sysctl(mib, 6, buf, &needed, NULL, 0) < 0) {
                    343:                perror("sysctl of routing table");
                    344:                exit(1);
                    345:        }
                    346:        lim = buf + needed;
1.1       deraadt   347:        for (next = buf; next < lim; next += rtm->rtm_msglen) {
                    348:                rtm = (struct rt_msghdr *)next;
                    349:                np_rtentry(rtm);
                    350:        }
                    351: }
                    352:
                    353: static void
                    354: np_rtentry(rtm)
                    355:        register struct rt_msghdr *rtm;
                    356: {
                    357:        register struct sockaddr *sa = (struct sockaddr *)(rtm + 1);
                    358: #ifdef notdef
                    359:        static int masks_done, banner_printed;
                    360: #endif
                    361:        static int old_af;
                    362:        int af = 0, interesting = RTF_UP | RTF_GATEWAY | RTF_HOST;
                    363:
                    364: #ifdef notdef
                    365:        /* for the moment, netmasks are skipped over */
                    366:        if (!banner_printed) {
                    367:                printf("Netmasks:\n");
                    368:                banner_printed = 1;
                    369:        }
                    370:        if (masks_done == 0) {
                    371:                if (rtm->rtm_addrs != RTA_DST ) {
                    372:                        masks_done = 1;
                    373:                        af = sa->sa_family;
                    374:                }
                    375:        } else
                    376: #endif
                    377:                af = sa->sa_family;
                    378:        if (af != old_af) {
                    379:                pr_family(af);
                    380:                old_af = af;
                    381:        }
                    382:        if (rtm->rtm_addrs == RTA_DST)
                    383:                p_sockaddr(sa, 0, 36);
                    384:        else {
1.10      deraadt   385:                p_sockaddr(sa, rtm->rtm_flags, 16);
1.1       deraadt   386:                if (sa->sa_len == 0)
1.13      millert   387:                        sa->sa_len = sizeof(in_addr_t);
1.1       deraadt   388:                sa = (struct sockaddr *)(sa->sa_len + (char *)sa);
                    389:                p_sockaddr(sa, 0, 18);
                    390:        }
                    391:        p_flags(rtm->rtm_flags & interesting, "%-6.6s ");
                    392:        putchar('\n');
                    393: }
                    394:
                    395: static void
                    396: p_sockaddr(sa, flags, width)
                    397:        struct sockaddr *sa;
                    398:        int flags, width;
                    399: {
                    400:        char workbuf[128], *cplim;
                    401:        register char *cp = workbuf;
                    402:
                    403:        switch(sa->sa_family) {
                    404:        case AF_INET:
                    405:            {
                    406:                register struct sockaddr_in *sin = (struct sockaddr_in *)sa;
                    407:
                    408:                cp = (sin->sin_addr.s_addr == 0) ? "default" :
                    409:                      ((flags & RTF_HOST) ?
                    410:                        routename(sin->sin_addr.s_addr) :
                    411:                        netname(sin->sin_addr.s_addr, INADDR_ANY));
                    412:                break;
                    413:            }
                    414:
                    415:        case AF_NS:
                    416:                cp = ns_print(sa);
                    417:                break;
                    418:
1.5       mickey    419:        case AF_IPX:
                    420:                cp = ipx_print(sa);
                    421:                break;
1.9       angelos   422:
1.1       deraadt   423:        case AF_LINK:
                    424:            {
                    425:                register struct sockaddr_dl *sdl = (struct sockaddr_dl *)sa;
                    426:
                    427:                if (sdl->sdl_nlen == 0 && sdl->sdl_alen == 0 &&
                    428:                    sdl->sdl_slen == 0)
                    429:                        (void) sprintf(workbuf, "link#%d", sdl->sdl_index);
                    430:                else switch (sdl->sdl_type) {
                    431:                case IFT_ETHER:
                    432:                    {
                    433:                        register int i;
                    434:                        register u_char *lla = (u_char *)sdl->sdl_data +
                    435:                            sdl->sdl_nlen;
                    436:
                    437:                        cplim = "";
                    438:                        for (i = 0; i < sdl->sdl_alen; i++, lla++) {
1.4       deraadt   439:                                cp += snprintf(cp,
                    440:                                    workbuf + sizeof (workbuf) - cp,
                    441:                                    "%s%x", cplim, *lla);
1.1       deraadt   442:                                cplim = ":";
                    443:                        }
                    444:                        cp = workbuf;
                    445:                        break;
                    446:                    }
                    447:                default:
                    448:                        cp = link_ntoa(sdl);
                    449:                        break;
                    450:                }
                    451:                break;
                    452:            }
                    453:
                    454:        default:
                    455:            {
                    456:                register u_char *s = (u_char *)sa->sa_data, *slim;
                    457:
1.10      deraadt   458:                slim = sa->sa_len + (u_char *) sa;
1.1       deraadt   459:                cplim = cp + sizeof(workbuf) - 6;
                    460:                cp += sprintf(cp, "(%d)", sa->sa_family);
                    461:                while (s < slim && cp < cplim) {
1.4       deraadt   462:                        cp += snprintf(cp, workbuf + sizeof (workbuf) - cp,
                    463:                            " %02x", *s++);
1.1       deraadt   464:                        if (s < slim)
1.4       deraadt   465:                                cp += snprintf(cp,
                    466:                                    workbuf + sizeof (workbuf) - cp,
                    467:                                    "%02x", *s++);
1.1       deraadt   468:                }
                    469:                cp = workbuf;
                    470:            }
                    471:        }
                    472:        if (width < 0 )
                    473:                printf("%s ", cp);
                    474:        else {
                    475:                if (nflag)
                    476:                        printf("%-*s ", width, cp);
                    477:                else
                    478:                        printf("%-*.*s ", width, width, cp);
                    479:        }
                    480: }
                    481:
                    482: static void
                    483: p_flags(f, format)
                    484:        register int f;
                    485:        char *format;
                    486: {
                    487:        char name[33], *flags;
                    488:        register struct bits *p = bits;
                    489:
                    490:        for (flags = name; p->b_mask; p++)
                    491:                if (p->b_mask & f)
                    492:                        *flags++ = p->b_val;
                    493:        *flags = '\0';
                    494:        printf(format, name);
                    495: }
                    496:
                    497: static void
                    498: p_rtentry(rt)
                    499:        register struct rtentry *rt;
                    500: {
                    501:        static struct ifnet ifnet, *lastif;
1.9       angelos   502:        struct sockaddr *sa;
                    503:
                    504:        sa = kgetsa(rt_key(rt));
                    505:
1.10      deraadt   506:        if (sa->sa_family == AF_ENCAP) {
                    507:                encap_print(rt);
                    508:                return;
1.9       angelos   509:        }
                    510:
                    511:        p_sockaddr(sa, rt->rt_flags, WID_DST);
1.1       deraadt   512:        p_sockaddr(kgetsa(rt->rt_gateway), RTF_HOST, WID_GW);
                    513:        p_flags(rt->rt_flags, "%-6.6s ");
1.13      millert   514:        printf("%6d %8ld ", rt->rt_refcnt, rt->rt_use);
1.1       deraadt   515:        if (rt->rt_rmx.rmx_mtu)
1.13      millert   516:                printf("%6ld ", rt->rt_rmx.rmx_mtu);
1.1       deraadt   517:        else
                    518:                printf("%6s ", "-");
                    519:        if (rt->rt_ifp) {
                    520:                if (rt->rt_ifp != lastif) {
                    521:                        kget(rt->rt_ifp, ifnet);
                    522:                        lastif = rt->rt_ifp;
                    523:                }
1.2       deraadt   524:                printf(" %.16s%s", ifnet.if_xname,
1.1       deraadt   525:                        rt->rt_nodes[0].rn_dupedkey ? " =>" : "");
                    526:        }
                    527:        putchar('\n');
                    528: }
                    529:
                    530: char *
                    531: routename(in)
1.13      millert   532:        in_addr_t in;
1.1       deraadt   533: {
                    534:        register char *cp;
                    535:        static char line[MAXHOSTNAMELEN + 1];
                    536:        struct hostent *hp;
                    537:        static char domain[MAXHOSTNAMELEN + 1];
                    538:        static int first = 1;
                    539:
                    540:        if (first) {
                    541:                first = 0;
                    542:                if (gethostname(domain, MAXHOSTNAMELEN) == 0 &&
1.7       millert   543:                    (cp = strchr(domain, '.')))
1.1       deraadt   544:                        (void) strcpy(domain, cp + 1);
                    545:                else
                    546:                        domain[0] = 0;
                    547:        }
                    548:        cp = 0;
                    549:        if (!nflag) {
                    550:                hp = gethostbyaddr((char *)&in, sizeof (struct in_addr),
                    551:                        AF_INET);
                    552:                if (hp) {
1.7       millert   553:                        if ((cp = strchr(hp->h_name, '.')) &&
1.1       deraadt   554:                            !strcmp(cp + 1, domain))
                    555:                                *cp = 0;
                    556:                        cp = hp->h_name;
                    557:                }
                    558:        }
                    559:        if (cp)
                    560:                strncpy(line, cp, sizeof(line) - 1);
                    561:        else {
                    562: #define C(x)   ((x) & 0xff)
                    563:                in = ntohl(in);
                    564:                sprintf(line, "%u.%u.%u.%u",
                    565:                    C(in >> 24), C(in >> 16), C(in >> 8), C(in));
                    566:        }
                    567:        return (line);
                    568: }
                    569:
                    570: /*
                    571:  * Return the name of the network whose address is given.
                    572:  * The address is assumed to be that of a net or subnet, not a host.
                    573:  */
                    574: char *
                    575: netname(in, mask)
1.13      millert   576:        in_addr_t in, mask;
1.1       deraadt   577: {
                    578:        char *cp = 0;
                    579:        static char line[MAXHOSTNAMELEN + 1];
                    580:        struct netent *np = 0;
1.13      millert   581:        in_addr_t net, subnetshift;
1.1       deraadt   582:
                    583:        in = ntohl(in);
                    584:        mask = ntohl(mask);
                    585:        if (!nflag && in != INADDR_ANY) {
1.8       tholo     586:                np = getnetbyaddr(in, AF_INET);
                    587:                if (np == NULL) {
                    588:                        if (mask == INADDR_ANY) {
                    589:                                if (IN_CLASSA(in)) {
                    590:                                        mask = IN_CLASSA_NET;
                    591:                                        subnetshift = 8;
                    592:                                } else if (IN_CLASSB(in)) {
                    593:                                        mask = IN_CLASSB_NET;
                    594:                                        subnetshift = 8;
                    595:                                } else {
                    596:                                        mask = IN_CLASSC_NET;
                    597:                                        subnetshift = 4;
                    598:                                }
                    599:                                /*
                    600:                                * If there are more bits than the standard mask
                    601:                                * would suggest, subnets must be in use.
                    602:                                * Guess at the subnet mask, assuming reasonable
                    603:                                * width subnet fields.
                    604:                                */
                    605:                                while (in &~ mask)
1.11      millert   606:                                        mask = (int)mask >> subnetshift;
1.1       deraadt   607:                        }
1.8       tholo     608:                        net = in & mask;
                    609:                        while ((mask & 1) == 0)
                    610:                                mask >>= 1, net >>= 1;
                    611:                        np = getnetbyaddr(net, AF_INET);
1.1       deraadt   612:                }
                    613:                if (np)
                    614:                        cp = np->n_name;
                    615:        }
                    616:        if (cp)
                    617:                strncpy(line, cp, sizeof(line) - 1);
                    618:        else if ((in & 0xffffff) == 0)
                    619:                sprintf(line, "%u", C(in >> 24));
                    620:        else if ((in & 0xffff) == 0)
                    621:                sprintf(line, "%u.%u", C(in >> 24) , C(in >> 16));
                    622:        else if ((in & 0xff) == 0)
                    623:                sprintf(line, "%u.%u.%u", C(in >> 24), C(in >> 16), C(in >> 8));
                    624:        else
                    625:                sprintf(line, "%u.%u.%u.%u", C(in >> 24),
                    626:                        C(in >> 16), C(in >> 8), C(in));
                    627:        return (line);
                    628: }
                    629:
                    630: /*
                    631:  * Print routing statistics
                    632:  */
                    633: void
                    634: rt_stats(off)
                    635:        u_long off;
                    636: {
                    637:        struct rtstat rtstat;
                    638:
                    639:        if (off == 0) {
                    640:                printf("rtstat: symbol not in namelist\n");
                    641:                return;
                    642:        }
                    643:        kread(off, (char *)&rtstat, sizeof (rtstat));
                    644:        printf("routing:\n");
                    645:        printf("\t%u bad routing redirect%s\n",
                    646:                rtstat.rts_badredirect, plural(rtstat.rts_badredirect));
                    647:        printf("\t%u dynamically created route%s\n",
                    648:                rtstat.rts_dynamic, plural(rtstat.rts_dynamic));
                    649:        printf("\t%u new gateway%s due to redirects\n",
                    650:                rtstat.rts_newgateway, plural(rtstat.rts_newgateway));
                    651:        printf("\t%u destination%s found unreachable\n",
                    652:                rtstat.rts_unreach, plural(rtstat.rts_unreach));
                    653:        printf("\t%u use%s of a wildcard route\n",
                    654:                rtstat.rts_wildcard, plural(rtstat.rts_wildcard));
                    655: }
1.5       mickey    656:
1.1       deraadt   657: short ns_nullh[] = {0,0,0};
                    658: short ns_bh[] = {-1,-1,-1};
                    659:
                    660: char *
                    661: ns_print(sa)
                    662:        register struct sockaddr *sa;
                    663: {
                    664:        register struct sockaddr_ns *sns = (struct sockaddr_ns*)sa;
                    665:        struct ns_addr work;
                    666:        union { union ns_net net_e; u_long long_e; } net;
1.13      millert   667:        in_port_t port;
1.1       deraadt   668:        static char mybuf[50], cport[10], chost[25];
                    669:        char *host = "";
                    670:        register char *p; register u_char *q;
                    671:
                    672:        work = sns->sns_addr;
                    673:        port = ntohs(work.x_port);
                    674:        work.x_port = 0;
1.10      deraadt   675:        net.net_e = work.x_net;
1.1       deraadt   676:        if (ns_nullhost(work) && net.long_e == 0) {
                    677:                if (port ) {
                    678:                        sprintf(mybuf, "*.%xH", port);
                    679:                        upHex(mybuf);
                    680:                } else
                    681:                        sprintf(mybuf, "*.*");
                    682:                return (mybuf);
                    683:        }
                    684:
                    685:        if (bcmp(ns_bh, work.x_host.c_host, 6) == 0) {
                    686:                host = "any";
                    687:        } else if (bcmp(ns_nullh, work.x_host.c_host, 6) == 0) {
                    688:                host = "*";
                    689:        } else {
                    690:                q = work.x_host.c_host;
                    691:                sprintf(chost, "%02x%02x%02x%02x%02x%02xH",
                    692:                        q[0], q[1], q[2], q[3], q[4], q[5]);
                    693:                for (p = chost; *p == '0' && p < chost + 12; p++)
                    694:                        continue;
                    695:                host = p;
                    696:        }
                    697:        if (port)
                    698:                sprintf(cport, ".%xH", htons(port));
                    699:        else
                    700:                *cport = 0;
                    701:
                    702:        sprintf(mybuf,"%xH.%s%s", ntohl(net.long_e), host, cport);
                    703:        upHex(mybuf);
                    704:        return(mybuf);
                    705: }
                    706:
                    707: char *
                    708: ns_phost(sa)
                    709:        struct sockaddr *sa;
                    710: {
                    711:        register struct sockaddr_ns *sns = (struct sockaddr_ns *)sa;
                    712:        struct sockaddr_ns work;
                    713:        static union ns_net ns_zeronet;
                    714:        char *p;
                    715:
                    716:        work = *sns;
                    717:        work.sns_addr.x_port = 0;
                    718:        work.sns_addr.x_net = ns_zeronet;
                    719:
                    720:        p = ns_print((struct sockaddr *)&work);
1.5       mickey    721:        if (strncmp("0H.", p, 3) == 0) p += 3;
                    722:        return(p);
                    723: }
                    724:
                    725: u_short ipx_nullh[] = {0,0,0};
                    726: u_short ipx_bh[] = {0xffff,0xffff,0xffff};
                    727:
                    728: char *
                    729: ipx_print(sa)
                    730:        register struct sockaddr *sa;
                    731: {
                    732:        register struct sockaddr_ipx *sipx = (struct sockaddr_ipx*)sa;
                    733:        struct ipx_addr work;
                    734:        union { union ipx_net net_e; u_long long_e; } net;
1.13      millert   735:        in_port_t port;
1.5       mickey    736:        static char mybuf[50], cport[10], chost[25];
                    737:        char *host = "";
1.13      millert   738:        register char *q;
1.5       mickey    739:
                    740:        work = sipx->sipx_addr;
                    741:        port = ntohs(work.ipx_port);
                    742:        work.ipx_port = 0;
1.10      deraadt   743:        net.net_e = work.ipx_net;
1.5       mickey    744:        if (ipx_nullhost(work) && net.long_e == 0) {
                    745:                if (port != 0) {
                    746:                        sprintf(mybuf, "*.%xH", port);
                    747:                        upHex(mybuf);
                    748:                } else
                    749:                        sprintf(mybuf, "*.*");
                    750:                return (mybuf);
                    751:        }
                    752:
                    753:        if (bcmp(ipx_bh, work.ipx_host.c_host, 6) == 0) {
                    754:                host = "any";
                    755:        } else if (bcmp(ipx_nullh, work.ipx_host.c_host, 6) == 0) {
                    756:                host = "*";
                    757:        } else {
                    758:                q = work.ipx_host.c_host;
                    759:                sprintf(chost, "%02x:%02x:%02x:%02x:%02x:%02x",
                    760:                        q[0], q[1], q[2], q[3], q[4], q[5]);
                    761:                host = chost;
                    762:        }
                    763:        if (port)
                    764:                sprintf(cport, ".%xH", htons(port));
                    765:        else
                    766:                *cport = 0;
                    767:
                    768:        sprintf(mybuf,"%xH.%s%s", ntohl(net.long_e), host, cport);
                    769:        upHex(mybuf);
                    770:        return(mybuf);
                    771: }
                    772:
                    773: char *
                    774: ipx_phost(sa)
                    775:        struct sockaddr *sa;
                    776: {
                    777:        register struct sockaddr_ipx *sipx = (struct sockaddr_ipx *)sa;
                    778:        struct sockaddr_ipx work;
                    779:        static union ipx_net ipx_zeronet;
                    780:        char *p;
                    781:
                    782:        work = *sipx;
                    783:        work.sipx_addr.ipx_port = 0;
                    784:        work.sipx_addr.ipx_net = ipx_zeronet;
                    785:
                    786:        p = ipx_print((struct sockaddr *)&work);
1.1       deraadt   787:        if (strncmp("0H.", p, 3) == 0) p += 3;
                    788:        return(p);
1.9       angelos   789: }
                    790:
                    791: static void
                    792: encap_print(rt)
                    793:        register struct rtentry *rt;
                    794: {
1.10      deraadt   795:        struct sockaddr_encap sen1, sen2, sen3;
1.17    ! angelos   796:        u_char buffer[32];
1.16      angelos   797:        int i;
1.9       angelos   798:
                    799:        bcopy(kgetsa(rt_key(rt)), &sen1, sizeof(sen1));
                    800:        bcopy(kgetsa(rt_mask(rt)), &sen2, sizeof(sen2));
                    801:        bcopy(kgetsa(rt->rt_gateway), &sen3, sizeof(sen3));
                    802:
1.17    ! angelos   803:        bzero(buffer, 32);
1.16      angelos   804:        strncpy(buffer, inet_ntoa(sen1.sen_ip_src), 15);
                    805:        i = strlen(buffer);
                    806:        strncpy(buffer + i, "/", 1);
                    807:        i++;
                    808:        strncpy(buffer + i, inet_ntoa(sen2.sen_ip_src), 15);
                    809:
1.17    ! angelos   810:        printf("%-31s %-5u ", buffer, sen1.sen_sport);
1.16      angelos   811:
1.17    ! angelos   812:        bzero(buffer, 32);
1.16      angelos   813:        strncpy(buffer, inet_ntoa(sen1.sen_ip_dst), 15);
                    814:        i = strlen(buffer);
                    815:        strncpy(buffer + i, "/", 1);
                    816:        i++;
                    817:        strncpy(buffer + i, inet_ntoa(sen2.sen_ip_dst), 15);
                    818:
1.17    ! angelos   819:        printf("%-31s %-5u %-5u ", buffer, sen1.sen_dport, sen1.sen_proto);
1.16      angelos   820:        printf("%s/%08x/%-lu\n", inet_ntoa(sen3.sen_ipsp_dst),
                    821:               ntohl(sen3.sen_ipsp_spi), sen3.sen_ipsp_sproto);
1.1       deraadt   822: }
                    823:
                    824: void
                    825: upHex(p0)
                    826:        char *p0;
                    827: {
                    828:        register char *p = p0;
                    829:        for (; *p; p++) switch (*p) {
                    830:
                    831:        case 'a': case 'b': case 'c': case 'd': case 'e': case 'f':
                    832:                *p += ('A' - 'a');
                    833:        }
                    834: }