+++ /dev/null
-/*
- * Copyright (c) 1999 Apple Computer, Inc. All rights reserved.
- *
- * @APPLE_LICENSE_HEADER_START@
- *
- * "Portions Copyright (c) 1999 Apple Computer, Inc. All Rights
- * Reserved. This file contains Original Code and/or Modifications of
- * Original Code as defined in and that are subject to the Apple Public
- * Source License Version 1.0 (the 'License'). You may not use this file
- * except in compliance with the License. Please obtain a copy of the
- * License at http://www.apple.com/publicsource and read it before using
- * this file.
- *
- * The Original Code and all software distributed under the License are
- * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
- * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
- * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
- * FITNESS FOR A PARTICULAR PURPOSE OR NON-INFRINGEMENT. Please see the
- * License for the specific language governing rights and limitations
- * under the License."
- *
- * @APPLE_LICENSE_HEADER_END@
- */
-/*
- * Copyright (c) 1983, 1988, 1993
- * The Regents of the University of California. All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- * 1. Redistributions of source code must retain the above copyright
- * notice, this list of conditions and the following disclaimer.
- * 2. Redistributions in binary form must reproduce the above copyright
- * notice, this list of conditions and the following disclaimer in the
- * documentation and/or other materials provided with the distribution.
- * 3. All advertising materials mentioning features or use of this software
- * must display the following acknowledgement:
- * This product includes software developed by the University of
- * California, Berkeley and its contributors.
- * 4. Neither the name of the University nor the names of its contributors
- * may be used to endorse or promote products derived from this software
- * without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
- * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
- * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
- * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
- * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
- * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
- * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
- * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
- * SUCH DAMAGE.
- */
-
-#ifndef lint
-static char sccsid[] = "@(#)iso.c 8.1 (Berkeley) 6/6/93";
-#endif /* not lint */
-
-/*
- * $Header: /cvs/Darwin/Commands/NeXT/network_cmds/netstat.tproj/iso.c,v 1.1.1.2 2000/01/11 01:48:52 wsanchez Exp $
- * $Source: /cvs/Darwin/Commands/NeXT/network_cmds/netstat.tproj/iso.c,v $
- */
-/*******************************************************************************
- Copyright IBM Corporation 1987
-
- All Rights Reserved
-
-Permission to use, copy, modify, and distribute this software and its
-documentation for any purpose and without fee is hereby granted,
-provided that the above copyright notice appear in all copies and that
-both that copyright notice and this permission notice appear in
-supporting documentation, and that the name of IBM not be
-used in advertising or publicity pertaining to distribution of the
-software without specific, written prior permission.
-
-IBM DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING
-ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL
-IBM BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR
-ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS,
-WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION,
-ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
-SOFTWARE.
-
-*******************************************************************************/
-
-/*
- * ARGO Project, Computer Sciences Dept., University of Wisconsin - Madison
- */
-
-#include <sys/param.h>
-#include <sys/mbuf.h>
-#include <sys/time.h>
-#include <sys/domain.h>
-#include <sys/protosw.h>
-#include <sys/socket.h>
-#include <sys/socketvar.h>
-#include <sys/queue.h>
-#include <errno.h>
-#include <net/if.h>
-#include <net/route.h>
-#include <netinet/in.h>
-#include <netinet/in_systm.h>
-#include <netinet/ip.h>
-#include <netinet/in_pcb.h>
-#include <netinet/ip_var.h>
-#include <netiso/iso.h>
-#include <netiso/iso_errno.h>
-#include <netiso/clnp.h>
-#include <netiso/esis.h>
-#include <netiso/clnp_stat.h>
-#include <netiso/argo_debug.h>
-#undef satosiso
-#include <netiso/tp_param.h>
-#include <netiso/tp_states.h>
-#include <netiso/tp_pcb.h>
-#include <netiso/tp_stat.h>
-#include <netiso/iso_pcb.h>
-#include <netiso/cltp_var.h>
-#include <netiso/cons.h>
-#ifdef IncStat
-#undef IncStat
-#endif
-#include <netiso/cons_pcb.h>
-#include <arpa/inet.h>
-#include <netdb.h>
-#include <string.h>
-#include <stdio.h>
-#include <stdlib.h>
-#include "netstat.h"
-
-static void tprintstat __P((struct tp_stat *, int));
-static void isonetprint __P((struct sockaddr_iso *, int));
-static void hexprint __P((int, char *, char *));
-extern void inetprint __P((struct in_addr *, int, char *));
-
-/*
- * Dump esis stats
- */
-void
-esis_stats(off, name)
- u_long off;
- char *name;
-{
- struct esis_stat esis_stat;
-
- if (off == 0 ||
- kread(off, (char *)&esis_stat, sizeof (struct esis_stat)))
- return;
- printf("%s:\n", name);
- printf("\t%d esh sent, %d esh received\n", esis_stat.es_eshsent,
- esis_stat.es_eshrcvd);
- printf("\t%d ish sent, %d ish received\n", esis_stat.es_ishsent,
- esis_stat.es_ishrcvd);
- printf("\t%d rd sent, %d rd received\n", esis_stat.es_rdsent,
- esis_stat.es_rdrcvd);
- printf("\t%d pdus not sent due to insufficient memory\n",
- esis_stat.es_nomem);
- printf("\t%d pdus received with bad checksum\n", esis_stat.es_badcsum);
- printf("\t%d pdus received with bad version number\n",
- esis_stat.es_badvers);
- printf("\t%d pdus received with bad type field\n", esis_stat.es_badtype);
- printf("\t%d short pdus received\n", esis_stat.es_toosmall);
-}
-
-/*
- * Dump clnp statistics structure.
- */
-void
-clnp_stats(off, name)
- u_long off;
- char *name;
-{
- struct clnp_stat clnp_stat;
-
- if (off == 0 ||
- kread(off, (char *)&clnp_stat, sizeof (clnp_stat)))
- return;
-
- printf("%s:\n\t%d total packets sent\n", name, clnp_stat.cns_sent);
- printf("\t%d total fragments sent\n", clnp_stat.cns_fragments);
- printf("\t%d total packets received\n", clnp_stat.cns_total);
- printf("\t%d with fixed part of header too small\n",
- clnp_stat.cns_toosmall);
- printf("\t%d with header length not reasonable\n", clnp_stat.cns_badhlen);
- printf("\t%d incorrect checksum%s\n",
- clnp_stat.cns_badcsum, plural(clnp_stat.cns_badcsum));
- printf("\t%d with unreasonable address lengths\n", clnp_stat.cns_badaddr);
- printf("\t%d with forgotten segmentation information\n",
- clnp_stat.cns_noseg);
- printf("\t%d with an incorrect protocol identifier\n", clnp_stat.cns_noproto);
- printf("\t%d with an incorrect version\n", clnp_stat.cns_badvers);
- printf("\t%d dropped because the ttl has expired\n",
- clnp_stat.cns_ttlexpired);
- printf("\t%d clnp cache misses\n", clnp_stat.cns_cachemiss);
- printf("\t%d clnp congestion experience bits set\n",
- clnp_stat.cns_congest_set);
- printf("\t%d clnp congestion experience bits received\n",
- clnp_stat.cns_congest_rcvd);
-}
-/*
- * Dump CLTP statistics structure.
- */
-void
-cltp_stats(off, name)
- u_long off;
- char *name;
-{
- struct cltpstat cltpstat;
-
- if (off == 0 ||
- kread(off, (char *)&cltpstat, sizeof (cltpstat)))
- return;
- printf("%s:\n\t%u incomplete header%s\n", name,
- cltpstat.cltps_hdrops, plural(cltpstat.cltps_hdrops));
- printf("\t%u bad data length field%s\n",
- cltpstat.cltps_badlen, plural(cltpstat.cltps_badlen));
- printf("\t%u bad checksum%s\n",
- cltpstat.cltps_badsum, plural(cltpstat.cltps_badsum));
-}
-
-struct tp_pcb tpcb;
-struct isopcb isopcb;
-static struct socket sockb;
-union {
- struct sockaddr_iso siso;
- char data[128];
-} laddr, faddr;
-#define kget(o, p) \
- (kread((u_long)(o), (char *)&p, sizeof (p)))
-
-static int first = 1;
-
-/*
- * Print a summary of connections related to an Internet
- * protocol. For TP, also give state of connection.
- * Listening processes (aflag) are suppressed unless the
- * -a (all) flag is specified.
- */
-void
-iso_protopr(off, name)
- u_long off;
- char *name;
-{
- struct isopcb cb;
- register struct isopcb *prev, *next;
-
- if (off == 0) {
- printf("%s control block: symbol not in namelist\n", name);
- return;
- }
- if (strcmp(name, "tp") == 0) {
- tp_protopr(off, name);
- return;
- }
- if (kread(off, (char *)&cb, sizeof(cb)))
- return;
- isopcb = cb;
- prev = (struct isopcb *)off;
- if (isopcb.isop_next == (struct isopcb *)off)
- return;
- while (isopcb.isop_next != (struct isopcb *)off) {
- next = isopcb.isop_next;
- kget(next, isopcb);
- if (isopcb.isop_prev != prev) {
- printf("prev 0x%x next 0x%x isop_prev 0x%x isop_next 0x%x???\n",
- prev, next, isopcb.isop_prev, isopcb.isop_next);
- break;
- }
- kget(isopcb.isop_socket, sockb);
- iso_protopr1((u_long)next, 0);
- putchar('\n');
- prev = next;
- }
-}
-
-void
-iso_protopr1(kern_addr, istp)
- u_long kern_addr;
- int istp;
-{
- if (first) {
- printf("Active ISO net connections");
- if (aflag)
- printf(" (including servers)");
- putchar('\n');
- if (Aflag)
- printf("%-8.8s ", "PCB");
- printf(Aflag ?
- "%-5.5s %-6.6s %-6.6s %-18.18s %-18.18s %s\n" :
- "%-5.5s %-6.6s %-6.6s %-22.22s %-22.22s %s\n",
- "Proto", "Recv-Q", "Send-Q",
- "Local Address", "Foreign Address", "(state)");
- first = 0;
- }
- if (Aflag)
- printf("%8x ",
- (sockb.so_pcb ? (void *)sockb.so_pcb : (void *)kern_addr));
- printf("%-5.5s %6d %6d ", "tp", sockb.so_rcv.sb_cc, sockb.so_snd.sb_cc);
- if (istp && tpcb.tp_lsuffixlen) {
- hexprint(tpcb.tp_lsuffixlen, tpcb.tp_lsuffix, "()");
- printf("\t");
- } else if (isopcb.isop_laddr == 0)
- printf("*.*\t");
- else {
- if ((char *)isopcb.isop_laddr == ((char *)kern_addr) +
- _offsetof(struct isopcb, isop_sladdr))
- laddr.siso = isopcb.isop_sladdr;
- else
- kget(isopcb.isop_laddr, laddr);
- isonetprint((struct sockaddr_iso *)&laddr, 1);
- }
- if (istp && tpcb.tp_fsuffixlen) {
- hexprint(tpcb.tp_fsuffixlen, tpcb.tp_fsuffix, "()");
- printf("\t");
- } else if (isopcb.isop_faddr == 0)
- printf("*.*\t");
- else {
- if ((char *)isopcb.isop_faddr == ((char *)kern_addr) +
- _offsetof(struct isopcb, isop_sfaddr))
- faddr.siso = isopcb.isop_sfaddr;
- else
- kget(isopcb.isop_faddr, faddr);
- isonetprint((struct sockaddr_iso *)&faddr, 0);
- }
-}
-
-void
-tp_protopr(off, name)
- u_long off;
- char *name;
-{
- extern char *tp_sstring[];
- struct tp_ref *tpr, *tpr_base;
- struct tp_refinfo tpkerninfo;
- int size;
-
- kget(off, tpkerninfo);
- size = tpkerninfo.tpr_size * sizeof (*tpr);
- tpr_base = (struct tp_ref *)malloc(size);
- if (tpr_base == 0)
- return;
- kread((u_long)(tpkerninfo.tpr_base), (char *)tpr_base, size);
- for (tpr = tpr_base; tpr < tpr_base + tpkerninfo.tpr_size; tpr++) {
- if (tpr->tpr_pcb == 0)
- continue;
- kget(tpr->tpr_pcb, tpcb);
- if (tpcb.tp_state == ST_ERROR)
- printf("undefined tpcb state: 0x%x\n", tpr->tpr_pcb);
- if (!aflag &&
- (tpcb.tp_state == TP_LISTENING ||
- tpcb.tp_state == TP_CLOSED ||
- tpcb.tp_state == TP_REFWAIT)) {
- continue;
- }
- kget(tpcb.tp_sock, sockb);
- if (tpcb.tp_npcb) switch(tpcb.tp_netservice) {
- case IN_CLNS:
- tp_inproto((u_long)tpkerninfo.tpr_base);
- break;
- default:
- kget(tpcb.tp_npcb, isopcb);
- iso_protopr1((u_long)tpcb.tp_npcb, 1);
- break;
- }
- if (tpcb.tp_state >= tp_NSTATES)
- printf(" %d", tpcb.tp_state);
- else
- printf(" %-12.12s", tp_sstring[tpcb.tp_state]);
- putchar('\n');
- }
-}
-
-void
-tp_inproto(pcb)
- u_long pcb;
-{
- struct inpcb inpcb;
- kget(tpcb.tp_npcb, inpcb);
- if (!aflag && inet_lnaof(inpcb.inp_laddr) == INADDR_ANY)
- return;
- if (Aflag)
- printf("%8x ", pcb);
- printf("%-5.5s %6d %6d ", "tpip",
- sockb.so_rcv.sb_cc, sockb.so_snd.sb_cc);
- inetprint(&inpcb.inp_laddr, inpcb.inp_lport, "tp");
- inetprint(&inpcb.inp_faddr, inpcb.inp_fport, "tp");
-}
-
-/*
- * Pretty print an iso address (net address + port).
- * If the nflag was specified, use numbers instead of names.
- */
-
-#ifdef notdef
-char *
-isonetname(iso)
- register struct iso_addr *iso;
-{
- struct sockaddr_iso sa;
- struct iso_hostent *ihe = 0;
- struct iso_hostent *iso_gethostentrybyaddr();
- struct iso_hostent *iso_getserventrybytsel();
- struct iso_hostent Ihe;
- static char line[80];
-
- bzero(line, sizeof(line));
- if( iso->isoa_afi ) {
- sa.siso_family = AF_ISO;
- sa.siso_addr = *iso;
- sa.siso_tsuffix = 0;
-
- if (!nflag )
- ihe = iso_gethostentrybyaddr( &sa, 0, 0 );
- if( ihe ) {
- Ihe = *ihe;
- ihe = &Ihe;
- sprintf(line, "%s", ihe->isoh_hname);
- } else {
- sprintf(line, "%s", iso_ntoa(iso));
- }
- } else {
- sprintf(line, "*");
- }
- return line;
-}
-
-static void
-isonetprint(iso, sufx, sufxlen, islocal)
- register struct iso_addr *iso;
- char *sufx;
- u_short sufxlen;
- int islocal;
-{
- struct iso_hostent *iso_getserventrybytsel(), *ihe;
- struct iso_hostent Ihe;
- char *line, *cp;
- int Alen = Aflag?18:22;
-
- line = isonetname(iso);
- cp = index(line, '\0');
- ihe = (struct iso_hostent *)0;
-
- if( islocal )
- islocal = 20;
- else
- islocal = 22 + Alen;
-
- if(Aflag)
- islocal += 10 ;
-
- if(!nflag) {
- if( (cp -line)>10 ) {
- cp = line+10;
- bzero(cp, sizeof(line)-10);
- }
- }
-
- *cp++ = '.';
- if(sufxlen) {
- if( !Aflag && !nflag && (ihe=iso_getserventrybytsel(sufx, sufxlen))) {
- Ihe = *ihe;
- ihe = &Ihe;
- }
- if( ihe && (strlen(ihe->isoh_aname)>0) ) {
- sprintf(cp, "%s", ihe->isoh_aname);
- } else {
- iso_sprinttsel(cp, sufx, sufxlen);
- }
- } else
- sprintf(cp, "*");
- /*
- fprintf(stdout, Aflag?" %-18.18s":" %-22.22s", line);
- */
-
- if( strlen(line) > Alen ) {
- fprintf(stdout, " %s", line);
- fprintf(stdout, "\n %*.s", islocal+Alen," ");
- } else {
- fprintf(stdout, " %-*.*s", Alen, Alen,line);
- }
-}
-#endif
-
-#ifdef notdef
-static void
-x25_protopr(off, name)
- u_long off;
- char *name;
-{
- static char *xpcb_states[] = {
- "CLOSED",
- "LISTENING",
- "CLOSING",
- "CONNECTING",
- "ACKWAIT",
- "OPEN",
- };
- register struct isopcb *prev, *next;
- struct x25_pcb xpcb;
-
- if (off == 0) {
- printf("%s control block: symbol not in namelist\n", name);
- return;
- }
- kread(off, &xpcb, sizeof (struct x25_pcb));
- prev = (struct isopcb *)off;
- if (xpcb.x_next == (struct isopcb *)off)
- return;
- while (xpcb.x_next != (struct isopcb *)off) {
- next = isopcb.isop_next;
- kread((u_long)next, &xpcb, sizeof (struct x25_pcb));
- if (xpcb.x_prev != prev) {
- printf("???\n");
- break;
- }
- kread((u_long)xpcb.x_socket, &sockb, sizeof (sockb));
-
- if (!aflag &&
- xpcb.x_state == LISTENING ||
- xpcb.x_state == TP_CLOSED ) {
- prev = next;
- continue;
- }
- if (first) {
- printf("Active X25 net connections");
- if (aflag)
- printf(" (including servers)");
- putchar('\n');
- if (Aflag)
- printf("%-8.8s ", "PCB");
- printf(Aflag ?
- "%-5.5s %-6.6s %-6.6s %-18.18s %-18.18s %s\n" :
- "%-5.5s %-6.6s %-6.6s %-22.22s %-22.22s %s\n",
- "Proto", "Recv-Q", "Send-Q",
- "Local Address", "Foreign Address", "(state)");
- first = 0;
- }
- printf("%-5.5s %6d %6d ", name, sockb.so_rcv.sb_cc,
- sockb.so_snd.sb_cc);
- isonetprint(&xpcb.x_laddr.siso_addr, &xpcb.x_lport,
- sizeof(xpcb.x_lport), 1);
- isonetprint(&xpcb.x_faddr.siso_addr, &xpcb.x_fport,
- sizeof(xpcb.x_lport), 0);
- if (xpcb.x_state < 0 || xpcb.x_state >= x25_NSTATES)
- printf(" 0x0x0x0x0x0x0x0x0x%x", xpcb.x_state);
- else
- printf(" %-12.12s", xpcb_states[xpcb.x_state]);
- putchar('\n');
- prev = next;
- }
-}
-#endif
-
-struct tp_stat tp_stat;
-
-void
-tp_stats(off, name)
- caddr_t off, name;
-{
- if (off == 0) {
- printf("TP not configured\n\n");
- return;
- }
- printf("%s:\n", name);
- kget(off, tp_stat);
- tprintstat(&tp_stat, 8);
-}
-
-#define OUT stdout
-
-static void
-tprintstat(s, indent)
- register struct tp_stat *s;
- int indent;
-{
- fprintf(OUT,
- "%*sReceiving:\n",indent," ");
- fprintf(OUT,
- "\t%*s%d variable parameter%s ignored\n", indent," ",
- s->ts_param_ignored ,plural(s->ts_param_ignored));
- fprintf(OUT,
- "\t%*s%d invalid parameter code%s\n", indent, " ",
- s->ts_inv_pcode ,plural(s->ts_inv_pcode));
- fprintf(OUT,
- "\t%*s%d invalid parameter value%s\n", indent, " ",
- s->ts_inv_pval ,plural(s->ts_inv_pval));
- fprintf(OUT,
- "\t%*s%d invalid dutype%s\n", indent, " ",
- s->ts_inv_dutype ,plural(s->ts_inv_dutype));
- fprintf(OUT,
- "\t%*s%d negotiation failure%s\n", indent, " ",
- s->ts_negotfailed ,plural(s->ts_negotfailed));
- fprintf(OUT,
- "\t%*s%d invalid destination reference%s\n", indent, " ",
- s->ts_inv_dref ,plural(s->ts_inv_dref));
- fprintf(OUT,
- "\t%*s%d invalid suffix parameter%s\n", indent, " ",
- s->ts_inv_sufx ,plural(s->ts_inv_sufx));
- fprintf(OUT,
- "\t%*s%d invalid length\n",indent, " ", s->ts_inv_length);
- fprintf(OUT,
- "\t%*s%d invalid checksum%s\n", indent, " ",
- s->ts_bad_csum ,plural(s->ts_bad_csum));
- fprintf(OUT,
- "\t%*s%d DT%s out of order\n", indent, " ",
- s->ts_dt_ooo ,plural(s->ts_dt_ooo));
- fprintf(OUT,
- "\t%*s%d DT%s not in window\n", indent, " ",
- s->ts_dt_niw ,plural(s->ts_dt_niw));
- fprintf(OUT,
- "\t%*s%d duplicate DT%s\n", indent, " ",
- s->ts_dt_dup ,plural(s->ts_dt_dup));
- fprintf(OUT,
- "\t%*s%d XPD%s not in window\n", indent, " ",
- s->ts_xpd_niw ,plural(s->ts_xpd_niw));
- fprintf(OUT,
- "\t%*s%d XPD%s w/o credit to stash\n", indent, " ",
- s->ts_xpd_dup ,plural(s->ts_xpd_dup));
- fprintf(OUT,
- "\t%*s%d time%s local credit reneged\n", indent, " ",
- s->ts_lcdt_reduced ,plural(s->ts_lcdt_reduced));
- fprintf(OUT,
- "\t%*s%d concatenated TPDU%s\n", indent, " ",
- s->ts_concat_rcvd ,plural(s->ts_concat_rcvd));
- fprintf(OUT,
- "%*sSending:\n", indent, " ");
- fprintf(OUT,
- "\t%*s%d XPD mark%s discarded\n", indent, " ",
- s->ts_xpdmark_del ,plural(s->ts_xpdmark_del));
- fprintf(OUT,
- "\t%*sXPD stopped data flow %d time%s\n", indent, " ",
- s->ts_xpd_intheway ,plural(s->ts_xpd_intheway));
- fprintf(OUT,
- "\t%*s%d time%s foreign window closed\n", indent, " ",
- s->ts_zfcdt ,plural(s->ts_zfcdt));
- fprintf(OUT,
- "%*sMiscellaneous:\n", indent, " ");
- fprintf(OUT,
- "\t%*s%d small mbuf%s\n", indent, " ",
- s->ts_mb_small ,plural(s->ts_mb_small));
- fprintf(OUT,
- "\t%*s%d cluster%s\n", indent, " ",
- s->ts_mb_cluster, plural(s->ts_mb_cluster));
- fprintf(OUT,
- "\t%*s%d source quench \n",indent, " ",
- s->ts_quench);
- fprintf(OUT,
- "\t%*s%d dec bit%s\n", indent, " ",
- s->ts_rcvdecbit, plural(s->ts_rcvdecbit));
- fprintf(OUT,
- "\t%*sM:L ( M mbuf chains of length L)\n", indent, " ");
- {
- register int j;
-
- fprintf(OUT, "\t%*s%d: over 16\n", indent, " ",
- s->ts_mb_len_distr[0]);
- for( j=1; j<=8; j++) {
- fprintf(OUT,
- "\t%*s%d: %d\t\t%d: %d\n", indent, " ",
- s->ts_mb_len_distr[j],j,
- s->ts_mb_len_distr[j<<1],j<<1
- );
- }
- }
- fprintf(OUT,
- "\t%*s%d EOT rcvd\n", indent, " ", s->ts_eot_input);
- fprintf(OUT,
- "\t%*s%d EOT sent\n", indent, " ", s->ts_EOT_sent);
- fprintf(OUT,
- "\t%*s%d EOT indication%s\n", indent, " ",
- s->ts_eot_user ,plural(s->ts_eot_user));
-
- fprintf(OUT,
- "%*sConnections:\n", indent, " ");
- fprintf(OUT,
- "\t%*s%d connection%s used extended format\n", indent, " ",
- s->ts_xtd_fmt ,plural(s->ts_xtd_fmt));
- fprintf(OUT,
- "\t%*s%d connection%s allowed transport expedited data\n", indent, " ",
- s->ts_use_txpd ,plural(s->ts_use_txpd));
- fprintf(OUT,
- "\t%*s%d connection%s turned off checksumming\n", indent, " ",
- s->ts_csum_off ,plural(s->ts_csum_off));
- fprintf(OUT,
- "\t%*s%d connection%s dropped due to retrans limit\n", indent, " ",
- s->ts_conn_gaveup ,plural(s->ts_conn_gaveup));
- fprintf(OUT,
- "\t%*s%d tp 4 connection%s\n", indent, " ",
- s->ts_tp4_conn ,plural(s->ts_tp4_conn));
- fprintf(OUT,
- "\t%*s%d tp 0 connection%s\n", indent, " ",
- s->ts_tp0_conn ,plural(s->ts_tp0_conn));
- {
- register int j;
- static char *name[]= {
- "~LOCAL, PDN",
- "~LOCAL,~PDN",
- " LOCAL,~PDN",
- " LOCAL, PDN"
- };
-
- fprintf(OUT,
- "\n%*sRound trip times, listed in ticks:\n", indent, " ");
- fprintf(OUT,
- "\t%*s%11.11s %12.12s | %12.12s | %s\n", indent, " ",
- "Category",
- "Smoothed avg", "Deviation", "Deviation/Avg");
- for (j = 0; j <= 3; j++) {
- fprintf(OUT,
- "\t%*s%11.11s: %-11d | %-11d | %-11d | %-11d\n", indent, " ",
- name[j],
- s->ts_rtt[j],
- s->ts_rtt[j],
- s->ts_rtv[j],
- s->ts_rtv[j]);
- }
- }
- fprintf(OUT,
-"\n%*sTpdus RECVD [%d valid, %3.6f %% of total (%d); %d dropped]\n",indent," ",
- s->ts_tpdu_rcvd ,
- ((s->ts_pkt_rcvd > 0) ?
- ((100 * (float)s->ts_tpdu_rcvd)/(float)s->ts_pkt_rcvd)
- : 0),
- s->ts_pkt_rcvd,
- s->ts_recv_drop );
-
- fprintf(OUT,
- "\t%*sDT %6d AK %6d DR %4d CR %4d \n", indent, " ",
- s->ts_DT_rcvd, s->ts_AK_rcvd, s->ts_DR_rcvd, s->ts_CR_rcvd);
- fprintf(OUT,
- "\t%*sXPD %6d XAK %6d DC %4d CC %4d ER %4d\n", indent, " ",
- s->ts_XPD_rcvd, s->ts_XAK_rcvd, s->ts_DC_rcvd, s->ts_CC_rcvd,
- s->ts_ER_rcvd);
- fprintf(OUT,
- "\n%*sTpdus SENT [%d total, %d dropped]\n", indent, " ",
- s->ts_tpdu_sent, s->ts_send_drop);
-
- fprintf(OUT,
- "\t%*sDT %6d AK %6d DR %4d CR %4d \n", indent, " ",
- s->ts_DT_sent, s->ts_AK_sent, s->ts_DR_sent, s->ts_CR_sent);
- fprintf(OUT,
- "\t%*sXPD %6d XAK %6d DC %4d CC %4d ER %4d\n", indent, " ",
- s->ts_XPD_sent, s->ts_XAK_sent, s->ts_DC_sent, s->ts_CC_sent,
- s->ts_ER_sent);
-
- fprintf(OUT,
- "\n%*sRetransmissions:\n", indent, " ");
-#define PERCENT(X,Y) (((Y)>0)?((100 *(float)(X)) / (float) (Y)):0)
-
- fprintf(OUT,
- "\t%*sCR %6d CC %6d DR %6d \n", indent, " ",
- s->ts_retrans_cr, s->ts_retrans_cc, s->ts_retrans_dr);
- fprintf(OUT,
- "\t%*sDT %6d (%5.2f%%)\n", indent, " ",
- s->ts_retrans_dt,
- PERCENT(s->ts_retrans_dt, s->ts_DT_sent));
- fprintf(OUT,
- "\t%*sXPD %6d (%5.2f%%)\n", indent, " ",
- s->ts_retrans_xpd,
- PERCENT(s->ts_retrans_xpd, s->ts_XPD_sent));
-
-
- fprintf(OUT,
- "\n%*sE Timers: [%6d ticks]\n", indent, " ", s->ts_Eticks);
- fprintf(OUT,
- "%*s%6d timer%s set \t%6d timer%s expired \t%6d timer%s cancelled\n",indent, " ",
- s->ts_Eset ,plural(s->ts_Eset),
- s->ts_Eexpired ,plural(s->ts_Eexpired),
- s->ts_Ecan_act ,plural(s->ts_Ecan_act));
-
- fprintf(OUT,
- "\n%*sC Timers: [%6d ticks]\n", indent, " ",s->ts_Cticks);
- fprintf(OUT,
- "%*s%6d timer%s set \t%6d timer%s expired \t%6d timer%s cancelled\n",
- indent, " ",
- s->ts_Cset ,plural(s->ts_Cset),
- s->ts_Cexpired ,plural(s->ts_Cexpired),
- s->ts_Ccan_act ,plural(s->ts_Ccan_act));
- fprintf(OUT,
- "%*s%6d inactive timer%s cancelled\n", indent, " ",
- s->ts_Ccan_inact ,plural(s->ts_Ccan_inact));
-
- fprintf(OUT,
- "\n%*sPathological debugging activity:\n", indent, " ");
- fprintf(OUT,
- "\t%*s%6d CC%s sent to zero dref\n", indent, " ",
- s->ts_zdebug ,plural(s->ts_zdebug));
- /* SAME LINE AS ABOVE */
- fprintf(OUT,
- "\t%*s%6d random DT%s dropped\n", indent, " ",
- s->ts_ydebug ,plural(s->ts_ydebug));
- fprintf(OUT,
- "\t%*s%6d illegally large XPD TPDU%s\n", indent, " ",
- s->ts_vdebug ,plural(s->ts_vdebug));
- fprintf(OUT,
- "\t%*s%6d faked reneging of cdt\n", indent, " ",
- s->ts_ldebug );
-
- fprintf(OUT,
- "\n%*sACK reasons:\n", indent, " ");
- fprintf(OUT, "\t%*s%6d not acked immediately\n", indent, " ",
- s->ts_ackreason[_ACK_DONT_] );
- fprintf(OUT, "\t%*s%6d strategy==each\n", indent, " ",
- s->ts_ackreason[_ACK_STRAT_EACH_] );
- fprintf(OUT, "\t%*s%6d strategy==fullwindow\n", indent, " ",
- s->ts_ackreason[_ACK_STRAT_FULLWIN_] );
- fprintf(OUT, "\t%*s%6d duplicate DT\n", indent, " ",
- s->ts_ackreason[_ACK_DUP_] );
- fprintf(OUT, "\t%*s%6d EOTSDU\n", indent, " ",
- s->ts_ackreason[_ACK_EOT_] );
- fprintf(OUT, "\t%*s%6d reordered DT\n", indent, " ",
- s->ts_ackreason[_ACK_REORDER_] );
- fprintf(OUT, "\t%*s%6d user rcvd\n", indent, " ",
- s->ts_ackreason[_ACK_USRRCV_] );
- fprintf(OUT, "\t%*s%6d fcc reqd\n", indent, " ",
- s->ts_ackreason[_ACK_FCC_] );
-}
-#ifndef SSEL
-#define SSEL(s) ((s)->siso_tlen + TSEL(s))
-#define PSEL(s) ((s)->siso_slen + SSEL(s))
-#endif
-
-static void
-isonetprint(siso, islocal)
- register struct sockaddr_iso *siso;
- int islocal;
-{
- hexprint(siso->siso_nlen, siso->siso_addr.isoa_genaddr, "{}");
- if (siso->siso_tlen || siso->siso_slen || siso->siso_plen)
- hexprint(siso->siso_tlen, TSEL(siso), "()");
- if (siso->siso_slen || siso->siso_plen)
- hexprint(siso->siso_slen, SSEL(siso), "[]");
- if (siso->siso_plen)
- hexprint(siso->siso_plen, PSEL(siso), "<>");
- putchar(' ');
-}
-
-static char hexlist[] = "0123456789abcdef", obuf[128];
-
-static void
-hexprint(n, buf, delim)
- int n;
- char *buf, *delim;
-{
- register u_char *in = (u_char *)buf, *top = in + n;
- register char *out = obuf;
- register int i;
-
- if (n == 0)
- return;
- while (in < top) {
- i = *in++;
- *out++ = '.';
- if (i > 0xf) {
- out[1] = hexlist[i & 0xf];
- i >>= 4;
- out[0] = hexlist[i];
- out += 2;
- } else
- *out++ = hexlist[i];
- }
- *obuf = *delim; *out++ = delim[1]; *out = 0;
- printf("%s", obuf);
-}
projects / apple / network_cmds.git / blobdiff