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

Annotation of src/usr.bin/netstat/inet.c, Revision 1.20

1.20    ! angelos     1: /*     $OpenBSD: inet.c,v 1.19 1997/07/01 20:32:14 provos Exp $        */
1.1       deraadt     2: /*     $NetBSD: inet.c,v 1.14 1995/10/03 21:42:37 thorpej Exp $        */
                      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: @(#)inet.c       8.4 (Berkeley) 4/20/94";
                     40: #else
1.20    ! angelos    41: static char *rcsid = "$OpenBSD: inet.c,v 1.19 1997/07/01 20:32:14 provos Exp $";
1.1       deraadt    42: #endif
                     43: #endif /* not lint */
                     44:
                     45: #include <sys/param.h>
                     46: #include <sys/queue.h>
                     47: #include <sys/socket.h>
                     48: #include <sys/socketvar.h>
                     49: #include <sys/mbuf.h>
                     50: #include <sys/protosw.h>
                     51:
                     52: #include <net/route.h>
                     53: #include <netinet/in.h>
                     54: #include <netinet/in_systm.h>
                     55: #include <netinet/ip.h>
                     56: #include <netinet/in_pcb.h>
                     57: #include <netinet/ip_icmp.h>
                     58: #include <netinet/icmp_var.h>
                     59: #include <netinet/igmp_var.h>
                     60: #include <netinet/ip_var.h>
                     61: #include <netinet/tcp.h>
                     62: #include <netinet/tcpip.h>
                     63: #include <netinet/tcp_seq.h>
                     64: #define TCPSTATES
                     65: #include <netinet/tcp_fsm.h>
                     66: #include <netinet/tcp_timer.h>
                     67: #include <netinet/tcp_var.h>
                     68: #include <netinet/tcp_debug.h>
                     69: #include <netinet/udp.h>
                     70: #include <netinet/udp_var.h>
1.10      angelos    71: #include <netinet/ip_ah.h>
                     72: #include <netinet/ip_esp.h>
                     73: #include <netinet/ip_ip4.h>
1.1       deraadt    74:
                     75: #include <arpa/inet.h>
1.18      millert    76: #include <limits.h>
1.1       deraadt    77: #include <netdb.h>
                     78: #include <stdio.h>
                     79: #include <string.h>
                     80: #include <unistd.h>
1.14      dgregor    81: #include <stdlib.h>
1.1       deraadt    82: #include "netstat.h"
                     83:
1.5       deraadt    84: #include <rpc/rpc.h>
                     85: #include <rpc/pmap_prot.h>
                     86: #include <rpc/pmap_clnt.h>
                     87:
1.1       deraadt    88: struct inpcb inpcb;
                     89: struct tcpcb tcpcb;
                     90: struct socket sockb;
                     91:
                     92: char   *inetname __P((struct in_addr *));
1.5       deraadt    93: void   inetprint __P((struct in_addr *, int, char *, int));
1.1       deraadt    94:
                     95: /*
                     96:  * Print a summary of connections related to an Internet
                     97:  * protocol.  For TCP, also give state of connection.
                     98:  * Listening processes (aflag) are suppressed unless the
                     99:  * -a (all) flag is specified.
                    100:  */
                    101: void
                    102: protopr(off, name)
                    103:        u_long off;
                    104:        char *name;
                    105: {
                    106:        struct inpcbtable table;
                    107:        register struct inpcb *head, *next, *prev;
                    108:        struct inpcb inpcb;
                    109:        int istcp;
                    110:        static int first = 1;
                    111:
                    112:        if (off == 0)
                    113:                return;
                    114:        istcp = strcmp(name, "tcp") == 0;
                    115:        kread(off, (char *)&table, sizeof table);
                    116:        prev = head =
                    117:            (struct inpcb *)&((struct inpcbtable *)off)->inpt_queue.cqh_first;
                    118:        next = table.inpt_queue.cqh_first;
                    119:
                    120:        while (next != head) {
                    121:                kread((u_long)next, (char *)&inpcb, sizeof inpcb);
                    122:                if (inpcb.inp_queue.cqe_prev != prev) {
                    123:                        printf("???\n");
                    124:                        break;
                    125:                }
                    126:                prev = next;
                    127:                next = inpcb.inp_queue.cqe_next;
                    128:
                    129:                if (!aflag &&
                    130:                    inet_lnaof(inpcb.inp_laddr) == INADDR_ANY)
                    131:                        continue;
                    132:                kread((u_long)inpcb.inp_socket, (char *)&sockb, sizeof (sockb));
                    133:                if (istcp) {
                    134:                        kread((u_long)inpcb.inp_ppcb,
                    135:                            (char *)&tcpcb, sizeof (tcpcb));
                    136:                }
                    137:                if (first) {
                    138:                        printf("Active Internet connections");
                    139:                        if (aflag)
                    140:                                printf(" (including servers)");
                    141:                        putchar('\n');
                    142:                        if (Aflag)
1.18      millert   143:                                printf("%-*.*s %-5.5s %-6.6s %-6.6s  %-*.*s %-*.*s %s\n",
                    144:                                    PLEN, PLEN, "PCB", "Proto", "Recv-Q",
                    145:                                    "Send-Q", PLEN, PLEN, "Local Address",
                    146:                                    PLEN, PLEN, "Foreign Address", "(state)");
                    147:                        else
                    148:                                printf("%-5.5s %-6.6s %-6.6s  %-22.22s %-22.22s %s\n",
                    149:                                    "Proto", "Recv-Q", "Send-Q",
                    150:                                    "Local Address", "Foreign Address",
                    151:                                    "(state)");
1.1       deraadt   152:                        first = 0;
                    153:                }
                    154:                if (Aflag)
                    155:                        if (istcp)
1.18      millert   156:                                printf("%*p ", PLEN, inpcb.inp_ppcb);
1.1       deraadt   157:                        else
1.18      millert   158:                                printf("%*p ", PLEN, prev);
1.16      millert   159:                printf("%-5.5s %6ld %6ld ", name, sockb.so_rcv.sb_cc,
1.1       deraadt   160:                        sockb.so_snd.sb_cc);
1.5       deraadt   161:                inetprint(&inpcb.inp_laddr, (int)inpcb.inp_lport, name, 1);
                    162:                inetprint(&inpcb.inp_faddr, (int)inpcb.inp_fport, name, 0);
1.1       deraadt   163:                if (istcp) {
                    164:                        if (tcpcb.t_state < 0 || tcpcb.t_state >= TCP_NSTATES)
                    165:                                printf(" %d", tcpcb.t_state);
                    166:                        else
                    167:                                printf(" %s", tcpstates[tcpcb.t_state]);
                    168:                }
                    169:                putchar('\n');
                    170:        }
                    171: }
                    172:
                    173: /*
                    174:  * Dump TCP statistics structure.
                    175:  */
                    176: void
                    177: tcp_stats(off, name)
                    178:        u_long off;
                    179:        char *name;
                    180: {
                    181:        struct tcpstat tcpstat;
                    182:
                    183:        if (off == 0)
                    184:                return;
                    185:        printf ("%s:\n", name);
                    186:        kread(off, (char *)&tcpstat, sizeof (tcpstat));
                    187:
                    188: #define        p(f, m) if (tcpstat.f || sflag <= 1) \
                    189:     printf(m, tcpstat.f, plural(tcpstat.f))
                    190: #define        p2(f1, f2, m) if (tcpstat.f1 || tcpstat.f2 || sflag <= 1) \
                    191:     printf(m, tcpstat.f1, plural(tcpstat.f1), tcpstat.f2, plural(tcpstat.f2))
                    192: #define        p3(f, m) if (tcpstat.f || sflag <= 1) \
                    193:     printf(m, tcpstat.f, plurales(tcpstat.f))
                    194:
1.16      millert   195:        p(tcps_sndtotal, "\t%ld packet%s sent\n");
1.1       deraadt   196:        p2(tcps_sndpack,tcps_sndbyte,
1.16      millert   197:                "\t\t%ld data packet%s (%qd byte%s)\n");
1.1       deraadt   198:        p2(tcps_sndrexmitpack, tcps_sndrexmitbyte,
1.16      millert   199:                "\t\t%ld data packet%s (%qd byte%s) retransmitted\n");
1.1       deraadt   200:        p2(tcps_sndacks, tcps_delack,
1.16      millert   201:                "\t\t%ld ack-only packet%s (%ld delayed)\n");
                    202:        p(tcps_sndurg, "\t\t%ld URG only packet%s\n");
                    203:        p(tcps_sndprobe, "\t\t%ld window probe packet%s\n");
                    204:        p(tcps_sndwinup, "\t\t%ld window update packet%s\n");
                    205:        p(tcps_sndctrl, "\t\t%ld control packet%s\n");
                    206:        p(tcps_rcvtotal, "\t%ld packet%s received\n");
                    207:        p2(tcps_rcvackpack, tcps_rcvackbyte, "\t\t%ld ack%s (for %qd byte%s)\n");
                    208:        p(tcps_rcvdupack, "\t\t%ld duplicate ack%s\n");
                    209:        p(tcps_rcvacktoomuch, "\t\t%ld ack%s for unsent data\n");
1.1       deraadt   210:        p2(tcps_rcvpack, tcps_rcvbyte,
1.16      millert   211:                "\t\t%ld packet%s (%qd byte%s) received in-sequence\n");
1.1       deraadt   212:        p2(tcps_rcvduppack, tcps_rcvdupbyte,
1.16      millert   213:                "\t\t%ld completely duplicate packet%s (%qd byte%s)\n");
                    214:        p(tcps_pawsdrop, "\t\t%ld old duplicate packet%s\n");
1.1       deraadt   215:        p2(tcps_rcvpartduppack, tcps_rcvpartdupbyte,
1.16      millert   216:                "\t\t%ld packet%s with some dup. data (%qd byte%s duped)\n");
1.1       deraadt   217:        p2(tcps_rcvoopack, tcps_rcvoobyte,
1.16      millert   218:                "\t\t%ld out-of-order packet%s (%qd byte%s)\n");
1.1       deraadt   219:        p2(tcps_rcvpackafterwin, tcps_rcvbyteafterwin,
1.16      millert   220:                "\t\t%ld packet%s (%qd byte%s) of data after window\n");
                    221:        p(tcps_rcvwinprobe, "\t\t%ld window probe%s\n");
                    222:        p(tcps_rcvwinupd, "\t\t%ld window update packet%s\n");
                    223:        p(tcps_rcvafterclose, "\t\t%ld packet%s received after close\n");
                    224:        p(tcps_rcvbadsum, "\t\t%ld discarded for bad checksum%s\n");
                    225:        p(tcps_rcvbadoff, "\t\t%ld discarded for bad header offset field%s\n");
                    226:        p(tcps_rcvshort, "\t\t%ld discarded because packet too short\n");
                    227:        p(tcps_connattempt, "\t%ld connection request%s\n");
                    228:        p(tcps_accepts, "\t%ld connection accept%s\n");
                    229:        p(tcps_connects, "\t%ld connection%s established (including accepts)\n");
1.1       deraadt   230:        p2(tcps_closed, tcps_drops,
1.16      millert   231:                "\t%ld connection%s closed (including %ld drop%s)\n");
                    232:        p(tcps_conndrops, "\t%ld embryonic connection%s dropped\n");
1.1       deraadt   233:        p2(tcps_rttupdated, tcps_segstimed,
1.16      millert   234:                "\t%ld segment%s updated rtt (of %ld attempt%s)\n");
                    235:        p(tcps_rexmttimeo, "\t%ld retransmit timeout%s\n");
                    236:        p(tcps_timeoutdrop, "\t\t%ld connection%s dropped by rexmit timeout\n");
                    237:        p(tcps_persisttimeo, "\t%ld persist timeout%s\n");
                    238:        p(tcps_keeptimeo, "\t%ld keepalive timeout%s\n");
                    239:        p(tcps_keepprobe, "\t\t%ld keepalive probe%s sent\n");
                    240:        p(tcps_keepdrops, "\t\t%ld connection%s dropped by keepalive\n");
                    241:        p(tcps_predack, "\t%ld correct ACK header prediction%s\n");
                    242:        p(tcps_preddat, "\t%ld correct data packet header prediction%s\n");
                    243:        p3(tcps_pcbhashmiss, "\t%ld PCB cache miss%s\n");
1.1       deraadt   244: #undef p
                    245: #undef p2
                    246: #undef p3
                    247: }
                    248:
                    249: /*
                    250:  * Dump UDP statistics structure.
                    251:  */
                    252: void
                    253: udp_stats(off, name)
                    254:        u_long off;
                    255:        char *name;
                    256: {
                    257:        struct udpstat udpstat;
                    258:        u_long delivered;
                    259:
                    260:        if (off == 0)
                    261:                return;
                    262:        kread(off, (char *)&udpstat, sizeof (udpstat));
                    263:        printf("%s:\n", name);
                    264: #define        p(f, m) if (udpstat.f || sflag <= 1) \
                    265:     printf(m, udpstat.f, plural(udpstat.f))
1.16      millert   266:        p(udps_ipackets, "\t%lu datagram%s received\n");
                    267:        p(udps_hdrops, "\t%lu with incomplete header\n");
                    268:        p(udps_badlen, "\t%lu with bad data length field\n");
                    269:        p(udps_badsum, "\t%lu with bad checksum\n");
                    270:        p(udps_noport, "\t%lu dropped due to no socket\n");
                    271:        p(udps_noportbcast, "\t%lu broadcast/multicast datagram%s dropped due to no socket\n");
                    272:        p(udps_fullsock, "\t%lu dropped due to full socket buffers\n");
1.1       deraadt   273:        delivered = udpstat.udps_ipackets -
                    274:                    udpstat.udps_hdrops -
                    275:                    udpstat.udps_badlen -
                    276:                    udpstat.udps_badsum -
                    277:                    udpstat.udps_noport -
                    278:                    udpstat.udps_noportbcast -
                    279:                    udpstat.udps_fullsock;
                    280:        if (delivered || sflag <= 1)
1.16      millert   281:                printf("\t%lu delivered\n", delivered);
                    282:        p(udps_opackets, "\t%lu datagram%s output\n");
1.1       deraadt   283: #undef p
                    284: }
                    285:
                    286: /*
                    287:  * Dump IP statistics structure.
                    288:  */
                    289: void
                    290: ip_stats(off, name)
                    291:        u_long off;
                    292:        char *name;
                    293: {
                    294:        struct ipstat ipstat;
                    295:
                    296:        if (off == 0)
                    297:                return;
                    298:        kread(off, (char *)&ipstat, sizeof (ipstat));
                    299:        printf("%s:\n", name);
                    300:
                    301: #define        p(f, m) if (ipstat.f || sflag <= 1) \
                    302:     printf(m, ipstat.f, plural(ipstat.f))
                    303:
1.16      millert   304:        p(ips_total, "\t%lu total packet%s received\n");
                    305:        p(ips_badsum, "\t%lu bad header checksum%s\n");
                    306:        p(ips_toosmall, "\t%lu with size smaller than minimum\n");
                    307:        p(ips_tooshort, "\t%lu with data size < data length\n");
                    308:        p(ips_badhlen, "\t%lu with header length < data size\n");
                    309:        p(ips_badlen, "\t%lu with data length < header length\n");
                    310:        p(ips_badoptions, "\t%lu with bad options\n");
                    311:        p(ips_badvers, "\t%lu with incorrect version number\n");
                    312:        p(ips_fragments, "\t%lu fragment%s received\n");
                    313:        p(ips_fragdropped, "\t%lu fragment%s dropped (dup or out of space)\n");
                    314:        p(ips_badfrags, "\t%lu malformed fragment%s dropped\n");
                    315:        p(ips_fragtimeout, "\t%lu fragment%s dropped after timeout\n");
                    316:        p(ips_reassembled, "\t%lu packet%s reassembled ok\n");
                    317:        p(ips_delivered, "\t%lu packet%s for this host\n");
                    318:        p(ips_noproto, "\t%lu packet%s for unknown/unsupported protocol\n");
                    319:        p(ips_forward, "\t%lu packet%s forwarded\n");
                    320:        p(ips_cantforward, "\t%lu packet%s not forwardable\n");
                    321:        p(ips_redirectsent, "\t%lu redirect%s sent\n");
                    322:        p(ips_localout, "\t%lu packet%s sent from this host\n");
                    323:        p(ips_rawout, "\t%lu packet%s sent with fabricated ip header\n");
                    324:        p(ips_odropped, "\t%lu output packet%s dropped due to no bufs, etc.\n");
                    325:        p(ips_noroute, "\t%lu output packet%s discarded due to no route\n");
                    326:        p(ips_fragmented, "\t%lu output datagram%s fragmented\n");
                    327:        p(ips_ofragments, "\t%lu fragment%s created\n");
                    328:        p(ips_cantfrag, "\t%lu datagram%s that can't be fragmented\n");
1.1       deraadt   329: #undef p
                    330: }
                    331:
                    332: static char *icmpnames[] = {
                    333:        "echo reply",
                    334:        "#1",
                    335:        "#2",
                    336:        "destination unreachable",
                    337:        "source quench",
                    338:        "routing redirect",
                    339:        "#6",
                    340:        "#7",
                    341:        "echo",
1.9       deraadt   342:        "router advertisement",
                    343:        "router solicitation",
1.1       deraadt   344:        "time exceeded",
                    345:        "parameter problem",
                    346:        "time stamp",
                    347:        "time stamp reply",
                    348:        "information request",
                    349:        "information request reply",
                    350:        "address mask request",
                    351:        "address mask reply",
                    352: };
                    353:
                    354: /*
                    355:  * Dump ICMP statistics.
                    356:  */
                    357: void
                    358: icmp_stats(off, name)
                    359:        u_long off;
                    360:        char *name;
                    361: {
                    362:        struct icmpstat icmpstat;
                    363:        register int i, first;
                    364:
                    365:        if (off == 0)
                    366:                return;
                    367:        kread(off, (char *)&icmpstat, sizeof (icmpstat));
                    368:        printf("%s:\n", name);
                    369:
                    370: #define        p(f, m) if (icmpstat.f || sflag <= 1) \
                    371:     printf(m, icmpstat.f, plural(icmpstat.f))
                    372:
1.16      millert   373:        p(icps_error, "\t%lu call%s to icmp_error\n");
1.1       deraadt   374:        p(icps_oldicmp,
1.16      millert   375:            "\t%lu error%s not generated 'cuz old message was icmp\n");
1.1       deraadt   376:        for (first = 1, i = 0; i < ICMP_MAXTYPE + 1; i++)
                    377:                if (icmpstat.icps_outhist[i] != 0) {
                    378:                        if (first) {
                    379:                                printf("\tOutput histogram:\n");
                    380:                                first = 0;
                    381:                        }
1.16      millert   382:                        printf("\t\t%s: %lu\n", icmpnames[i],
1.1       deraadt   383:                                icmpstat.icps_outhist[i]);
                    384:                }
1.16      millert   385:        p(icps_badcode, "\t%lu message%s with bad code fields\n");
                    386:        p(icps_tooshort, "\t%lu message%s < minimum length\n");
                    387:        p(icps_checksum, "\t%lu bad checksum%s\n");
                    388:        p(icps_badlen, "\t%lu message%s with bad length\n");
1.1       deraadt   389:        for (first = 1, i = 0; i < ICMP_MAXTYPE + 1; i++)
                    390:                if (icmpstat.icps_inhist[i] != 0) {
                    391:                        if (first) {
                    392:                                printf("\tInput histogram:\n");
                    393:                                first = 0;
                    394:                        }
1.16      millert   395:                        printf("\t\t%s: %lu\n", icmpnames[i],
1.1       deraadt   396:                                icmpstat.icps_inhist[i]);
                    397:                }
1.16      millert   398:        p(icps_reflect, "\t%lu message response%s generated\n");
1.1       deraadt   399: #undef p
                    400: }
                    401:
                    402: /*
                    403:  * Dump IGMP statistics structure.
                    404:  */
                    405: void
                    406: igmp_stats(off, name)
                    407:        u_long off;
                    408:        char *name;
                    409: {
                    410:        struct igmpstat igmpstat;
                    411:
                    412:        if (off == 0)
                    413:                return;
                    414:        kread(off, (char *)&igmpstat, sizeof (igmpstat));
                    415:        printf("%s:\n", name);
                    416:
                    417: #define        p(f, m) if (igmpstat.f || sflag <= 1) \
                    418:     printf(m, igmpstat.f, plural(igmpstat.f))
                    419: #define        py(f, m) if (igmpstat.f || sflag <= 1) \
                    420:     printf(m, igmpstat.f, igmpstat.f != 1 ? "ies" : "y")
1.16      millert   421:        p(igps_rcv_total, "\t%lu message%s received\n");
                    422:         p(igps_rcv_tooshort, "\t%lu message%s received with too few bytes\n");
                    423:         p(igps_rcv_badsum, "\t%lu message%s received with bad checksum\n");
                    424:         py(igps_rcv_queries, "\t%lu membership quer%s received\n");
                    425:         py(igps_rcv_badqueries, "\t%lu membership quer%s received with invalid field(s)\n");
                    426:         p(igps_rcv_reports, "\t%lu membership report%s received\n");
                    427:         p(igps_rcv_badreports, "\t%lu membership report%s received with invalid field(s)\n");
                    428:         p(igps_rcv_ourreports, "\t%lu membership report%s received for groups to which we belong\n");
                    429:         p(igps_snd_reports, "\t%lu membership report%s sent\n");
1.1       deraadt   430: #undef p
                    431: #undef py
                    432: }
                    433:
1.5       deraadt   434: struct rpcnams {
                    435:        struct rpcnams *next;
1.16      millert   436:        in_port_t port;
1.5       deraadt   437:        char    *rpcname;
                    438: };
                    439:
                    440: char *
                    441: getrpcportnam(port)
1.16      millert   442:        in_port_t port;
1.5       deraadt   443: {
                    444:        struct sockaddr_in server_addr;
                    445:        register struct hostent *hp;
                    446:        static struct pmaplist *head;
                    447:        int socket = RPC_ANYSOCK;
                    448:        struct timeval minutetimeout;
                    449:        register CLIENT *client;
                    450:        struct rpcent *rpc;
                    451:        static int first;
                    452:        static struct rpcnams *rpcn;
                    453:        struct rpcnams *n;
                    454:        char num[10];
                    455:
                    456:        if (first == 0) {
                    457:                first = 1;
1.7       deraadt   458:                memset((char *)&server_addr, 0, sizeof server_addr);
1.5       deraadt   459:                server_addr.sin_family = AF_INET;
                    460:                if ((hp = gethostbyname("localhost")) != NULL)
1.7       deraadt   461:                        memmove((caddr_t)&server_addr.sin_addr, hp->h_addr,
1.5       deraadt   462:                            hp->h_length);
                    463:                else
                    464:                        (void) inet_aton("0.0.0.0", &server_addr.sin_addr);
                    465:
                    466:                minutetimeout.tv_sec = 60;
                    467:                minutetimeout.tv_usec = 0;
                    468:                server_addr.sin_port = htons(PMAPPORT);
                    469:                if ((client = clnttcp_create(&server_addr, PMAPPROG,
1.7       deraadt   470:                    PMAPVERS, &socket, 50, 500)) == NULL)
                    471:                        return (NULL);
1.5       deraadt   472:                if (clnt_call(client, PMAPPROC_DUMP, xdr_void, NULL,
1.8       deraadt   473:                    xdr_pmaplist, &head, minutetimeout) != RPC_SUCCESS) {
1.7       deraadt   474:                        clnt_destroy(client);
                    475:                        return (NULL);
1.5       deraadt   476:                }
                    477:                for (; head != NULL; head = head->pml_next) {
                    478:                        n = (struct rpcnams *)malloc(sizeof(struct rpcnams));
                    479:                        if (n == NULL)
                    480:                                continue;
                    481:                        n->next = rpcn;
                    482:                        rpcn = n;
                    483:                        n->port = head->pml_map.pm_port;
                    484:
                    485:                        rpc = getrpcbynumber(head->pml_map.pm_prog);
                    486:                        if (rpc)
                    487:                                n->rpcname = strdup(rpc->r_name);
                    488:                        else {
1.16      millert   489:                                sprintf(num, "%ld", head->pml_map.pm_prog);
1.5       deraadt   490:                                n->rpcname = strdup(num);
                    491:                        }
                    492:                }
                    493:                clnt_destroy(client);
                    494:        }
                    495:
                    496:        for (n = rpcn; n; n = n->next)
                    497:                if (n->port == port)
                    498:                        return (n->rpcname);
                    499:        return (NULL);
                    500: }
                    501:
1.1       deraadt   502: /*
                    503:  * Pretty print an Internet address (net address + port).
                    504:  * If the nflag was specified, use numbers instead of names.
                    505:  */
                    506: void
1.5       deraadt   507: inetprint(in, port, proto, local)
1.1       deraadt   508:        register struct in_addr *in;
1.16      millert   509:        in_port_t port;
1.1       deraadt   510:        char *proto;
1.5       deraadt   511:        int local;
1.1       deraadt   512: {
                    513:        struct servent *sp = 0;
1.5       deraadt   514:        char line[80], *cp, *nam;
1.1       deraadt   515:        int width;
                    516:
                    517:        sprintf(line, "%.*s.", (Aflag && !nflag) ? 12 : 16, inetname(in));
1.4       millert   518:        cp = strchr(line, '\0');
1.1       deraadt   519:        if (!nflag && port)
                    520:                sp = getservbyport((int)port, proto);
                    521:        if (sp || port == 0)
                    522:                sprintf(cp, "%.8s", sp ? sp->s_name : "*");
1.16      millert   523:        else if (local && !nflag && (nam = getrpcportnam(ntohs(port))))
                    524:                sprintf(cp, "%d[%.8s]", ntohs(port), nam);
1.1       deraadt   525:        else
1.16      millert   526:                sprintf(cp, "%d", ntohs(port));
1.1       deraadt   527:        width = Aflag ? 18 : 22;
                    528:        printf(" %-*.*s", width, width, line);
                    529: }
                    530:
                    531: /*
                    532:  * Construct an Internet address representation.
                    533:  * If the nflag has been supplied, give
                    534:  * numeric value, otherwise try for symbolic name.
                    535:  */
                    536: char *
                    537: inetname(inp)
                    538:        struct in_addr *inp;
                    539: {
                    540:        register char *cp;
                    541:        static char line[50];
                    542:        struct hostent *hp;
                    543:        struct netent *np;
                    544:        static char domain[MAXHOSTNAMELEN + 1];
                    545:        static int first = 1;
                    546:
                    547:        if (first && !nflag) {
                    548:                first = 0;
                    549:                if (gethostname(domain, MAXHOSTNAMELEN) == 0 &&
1.4       millert   550:                    (cp = strchr(domain, '.')))
1.1       deraadt   551:                        (void) strcpy(domain, cp + 1);
                    552:                else
                    553:                        domain[0] = 0;
                    554:        }
                    555:        cp = 0;
                    556:        if (!nflag && inp->s_addr != INADDR_ANY) {
                    557:                int net = inet_netof(*inp);
                    558:                int lna = inet_lnaof(*inp);
                    559:
                    560:                if (lna == INADDR_ANY) {
                    561:                        np = getnetbyaddr(net, AF_INET);
                    562:                        if (np)
                    563:                                cp = np->n_name;
                    564:                }
                    565:                if (cp == 0) {
                    566:                        hp = gethostbyaddr((char *)inp, sizeof (*inp), AF_INET);
                    567:                        if (hp) {
1.4       millert   568:                                if ((cp = strchr(hp->h_name, '.')) &&
1.1       deraadt   569:                                    !strcmp(cp + 1, domain))
                    570:                                        *cp = 0;
                    571:                                cp = hp->h_name;
                    572:                        }
                    573:                }
                    574:        }
                    575:        if (inp->s_addr == INADDR_ANY)
                    576:                strcpy(line, "*");
                    577:        else if (cp)
                    578:                strcpy(line, cp);
                    579:        else {
                    580:                inp->s_addr = ntohl(inp->s_addr);
                    581: #define C(x)   ((x) & 0xff)
                    582:                sprintf(line, "%u.%u.%u.%u", C(inp->s_addr >> 24),
                    583:                    C(inp->s_addr >> 16), C(inp->s_addr >> 8), C(inp->s_addr));
                    584:        }
                    585:        return (line);
1.10      angelos   586: }
                    587:
                    588: /*
                    589:  * Dump AH statistics structure.
                    590:  */
                    591: void
                    592: ah_stats(off, name)
                    593:         u_long off;
                    594:         char *name;
                    595: {
                    596:         struct ahstat ahstat;
                    597:
                    598:         if (off == 0)
                    599:                 return;
                    600:         kread(off, (char *)&ahstat, sizeof (ahstat));
                    601:         printf("%s:\n", name);
                    602:
                    603: #define p(f, m) if (ahstat.f || sflag <= 1) \
                    604:     printf(m, ahstat.f, plural(ahstat.f))
                    605:
1.11      angelos   606:        p(ahs_input, "\t%u input AH packets\n");
                    607:        p(ahs_output, "\t%u output AH packets\n");
1.10      angelos   608:         p(ahs_hdrops, "\t%u packet%s shorter than header shows\n");
                    609:         p(ahs_notdb, "\t%u packet%s for which no TDB was found\n");
                    610:         p(ahs_badkcr, "\t%u input packet%s that failed to be processed\n");
                    611:         p(ahs_badauth, "\t%u packet%s that failed verification received\n");
                    612:         p(ahs_noxform, "\t%u packet%s for which no XFORM was set in TDB received\n");
1.19      provos    613:         p(ahs_qfull, "\t%u packet%s were dropped due to full output queue\n");
1.10      angelos   614:         p(ahs_wrap, "\t%u packet%s where counter wrapping was detected\n");
                    615:         p(ahs_replay, "\t%u possibly replayed packet%s received\n");
                    616:         p(ahs_badauthl, "\t%u packet%s with bad authenticator length received\n");
1.15      provos    617:        p(ahs_invalid, "\t%u packet%s attempted to use an invalid tdb\n");
1.20    ! angelos   618:        p(ahs_ibytes, "\t%qu input byte%s\n");
        !           619:        p(ahs_obytes, "\t%qu output byte%s\n");
        !           620:
1.10      angelos   621: #undef p
                    622: }
                    623:
                    624: /*
                    625:  * Dump ESP statistics structure.
                    626:  */
                    627: void
                    628: esp_stats(off, name)
                    629:         u_long off;
                    630:         char *name;
                    631: {
                    632:         struct espstat espstat;
                    633:
1.20    ! angelos   634:
1.10      angelos   635:         if (off == 0)
                    636:                 return;
                    637:         kread(off, (char *)&espstat, sizeof (espstat));
                    638:         printf("%s:\n", name);
                    639:
                    640: #define p(f, m) if (espstat.f || sflag <= 1) \
                    641:     printf(m, espstat.f, plural(espstat.f))
                    642:
1.12      angelos   643:        p(esps_input, "\t%u input ESP packets\n");
                    644:        p(esps_output, "\t%u output ESP packets\n");
1.10      angelos   645:         p(esps_hdrops, "\t%u packet%s shorter than header shows\n");
                    646:         p(esps_notdb, "\t%u packet%s for which no TDB was found\n");
                    647:         p(esps_badkcr, "\t%u input packet%s that failed to be processed\n");
                    648:         p(esps_badauth, "\t%u packet%s that failed verification received\n");
                    649:         p(esps_noxform, "\t%u packet%s for which no XFORM was set in TDB received\n");
1.19      provos    650:         p(esps_qfull, "\t%u packet%s were dropped due to full output queue\n");
1.10      angelos   651:         p(esps_wrap, "\t%u packet%s where counter wrapping was detected\n");
                    652:         p(esps_replay, "\t%u possibly replayed packet%s received\n");
                    653:         p(esps_badilen, "\t%u packet%s with payload not a multiple of 8 received\n");
1.15      provos    654:        p(esps_invalid, "\t%u packet%s attempted to use an invalid tdb\n");
1.20    ! angelos   655:        p(esps_ibytes, "\t%qu input byte%s\n");
        !           656:        p(esps_obytes, "\t%qu output byte%s\n");
1.10      angelos   657:
                    658: #undef p
                    659: }
                    660:
                    661: /*
                    662:  * Dump ESP statistics structure.
                    663:  */
                    664: void
                    665: ip4_stats(off, name)
                    666:         u_long off;
                    667:         char *name;
                    668: {
                    669:         struct ip4stat ip4stat;
                    670:
                    671:         if (off == 0)
                    672:                 return;
                    673:         kread(off, (char *)&ip4stat, sizeof (ip4stat));
                    674:         printf("%s:\n", name);
                    675:
                    676: #define p(f, m) if (ip4stat.f || sflag <= 1) \
                    677:     printf(m, ip4stat.f, plural(ip4stat.f))
                    678:
                    679:         p(ip4s_ipackets, "\t%u total input packet%s\n");
1.11      angelos   680:         p(ip4s_opackets, "\t%u total output packet%s\n");
1.10      angelos   681:         p(ip4s_hdrops, "\t%u packet%s shorter than header shows\n");
                    682:         p(ip4s_notip4, "\t%u packet%s with internal header not IPv4 received\n");
1.19      provos    683:         p(ip4s_qfull, "\t%u packet%s were dropped due to full output queue\n");
1.20    ! angelos   684:        p(ip4s_ibytes, "\t%qu input byte%s\n");
        !           685:        p(ip4s_obytes, "\t%qu output byte%s\n");
1.10      angelos   686:
                    687: #undef p
1.1       deraadt   688: }