[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.9

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