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

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