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

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