[unix-history] / usr.bin / netstat / ns.c

/*
 * Copyright (c) 1985, 1988 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
/* From: static char sccsid[] = "@(#)ns.c	5.13 (Berkeley) 3/1/91"; */
static const char ns_c_rcsid[] =
	"$Id$";
#endif /* not lint */

#include <sys/param.h>
#include <sys/socket.h>
#include <sys/socketvar.h>
#include <sys/mbuf.h>
#include <sys/protosw.h>

#include <net/route.h>
#include <net/if.h>

#include <netinet/tcp_fsm.h>

#include <netns/ns.h>
#include <netns/ns_pcb.h>
#include <netns/idp.h>
#include <netns/idp_var.h>
#include <netns/ns_error.h>
#include <netns/sp.h>
#include <netns/spidp.h>
#include <netns/spp_timer.h>
#include <netns/spp_var.h>
#define SANAMES
#include <netns/spp_debug.h>

#include <nlist.h>
#include <errno.h>
#include <stdio.h>
#include <string.h>

struct	nspcb nspcb;
struct	sppcb sppcb;
struct	socket sockb;
extern	int Aflag;
extern	int aflag;
extern	int nflag;
extern	char *plural();
char *ns_prpr();

static	int first = 1;

/*
 * Print a summary of connections related to a Network Systems
 * protocol.  For SPP, also give state of connection.
 * Listening processes (aflag) are suppressed unless the
 * -a (all) flag is specified.
 */

nsprotopr(off, name)
	off_t off;
	char *name;
{
	struct nspcb cb;
	register struct nspcb *prev, *next;
	int isspp;

	if (off == 0)
		return;
	isspp = strcmp(name, "spp") == 0;
	kvm_read(off, (char *)&cb, sizeof (struct nspcb));
	nspcb = cb;
	prev = (struct nspcb *)off;
	if (nspcb.nsp_next == (struct nspcb *)off)
		return;
	for (;nspcb.nsp_next != (struct nspcb *)off; prev = next) {
		off_t ppcb;

		next = nspcb.nsp_next;
		kvm_read((off_t)next, (char *)&nspcb, sizeof (nspcb));
		if (nspcb.nsp_prev != prev) {
			printf("???\n");
			break;
		}
		if (!aflag && ns_nullhost(nspcb.nsp_faddr) ) {
			continue;
		}
		kvm_read((off_t)nspcb.nsp_socket,
				(char *)&sockb, sizeof (sockb));
		ppcb = (off_t) nspcb.nsp_pcb;
		if (ppcb) {
			if (isspp) {
				kvm_read(ppcb, (char *)&sppcb, sizeof (sppcb));
			} else continue;
		} else
			if (isspp) continue;
		if (first) {
			printf("Active NS 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 ", ppcb);
		printf("%-5.5s %6d %6d ", name, sockb.so_rcv.sb_cc,
			sockb.so_snd.sb_cc);
		printf("  %-22.22s", ns_prpr(&nspcb.nsp_laddr));
		printf(" %-22.22s", ns_prpr(&nspcb.nsp_faddr));
		if (isspp) {
			extern char *tcpstates[];
			if (sppcb.s_state >= TCP_NSTATES)
				printf(" %d", sppcb.s_state);
			else
				printf(" %s", tcpstates[sppcb.s_state]);
		}
		putchar('\n');
		prev = next;
	}
}
#define ANY(x,y,z) \
	((x) ? printf("\t%d %s%s%s -- %s\n",x,y,plural(x),z,"x") : 0)

/*
 * Dump SPP statistics structure.
 */
spp_stats(off, name)
	off_t off;
	char *name;
{
	struct spp_istat spp_istat;
#define sppstat spp_istat.newstats

	if (off == 0)
		return;
	kvm_read(off, (char *)&spp_istat, sizeof (spp_istat));
	printf("%s:\n", name);
	ANY(spp_istat.nonucn, "connection", " dropped due to no new sockets ");
	ANY(spp_istat.gonawy, "connection", " terminated due to our end dying");
	ANY(spp_istat.nonucn, "connection",
	    " dropped due to inability to connect");
	ANY(spp_istat.noconn, "connection",
	    " dropped due to inability to connect");
	ANY(spp_istat.notme, "connection",
	    " incompleted due to mismatched id's");
	ANY(spp_istat.wrncon, "connection", " dropped due to mismatched id's");
	ANY(spp_istat.bdreas, "packet", " dropped out of sequence");
	ANY(spp_istat.lstdup, "packet", " duplicating the highest packet");
	ANY(spp_istat.notyet, "packet", " refused as exceeding allocation");
	ANY(sppstat.spps_connattempt, "connection", " initiated");
	ANY(sppstat.spps_accepts, "connection", " accepted");
	ANY(sppstat.spps_connects, "connection", " established");
	ANY(sppstat.spps_drops, "connection", " dropped");
	ANY(sppstat.spps_conndrops, "embryonic connection", " dropped");
	ANY(sppstat.spps_closed, "connection", " closed (includes drops)");
	ANY(sppstat.spps_segstimed, "packet", " where we tried to get rtt");
	ANY(sppstat.spps_rttupdated, "time", " we got rtt");
	ANY(sppstat.spps_delack, "delayed ack", " sent");
	ANY(sppstat.spps_timeoutdrop, "connection", " dropped in rxmt timeout");
	ANY(sppstat.spps_rexmttimeo, "retransmit timeout", "");
	ANY(sppstat.spps_persisttimeo, "persist timeout", "");
	ANY(sppstat.spps_keeptimeo, "keepalive timeout", "");
	ANY(sppstat.spps_keepprobe, "keepalive probe", " sent");
	ANY(sppstat.spps_keepdrops, "connection", " dropped in keepalive");
	ANY(sppstat.spps_sndtotal, "total packet", " sent");
	ANY(sppstat.spps_sndpack, "data packet", " sent");
	ANY(sppstat.spps_sndbyte, "data byte", " sent");
	ANY(sppstat.spps_sndrexmitpack, "data packet", " retransmitted");
	ANY(sppstat.spps_sndrexmitbyte, "data byte", " retransmitted");
	ANY(sppstat.spps_sndacks, "ack-only packet", " sent");
	ANY(sppstat.spps_sndprobe, "window probe", " sent");
	ANY(sppstat.spps_sndurg, "packet", " sent with URG only");
	ANY(sppstat.spps_sndwinup, "window update-only packet", " sent");
	ANY(sppstat.spps_sndctrl, "control (SYN|FIN|RST) packet", " sent");
	ANY(sppstat.spps_sndvoid, "request", " to send a non-existant packet");
	ANY(sppstat.spps_rcvtotal, "total packet", " received");
	ANY(sppstat.spps_rcvpack, "packet", " received in sequence");
	ANY(sppstat.spps_rcvbyte, "byte", " received in sequence");
	ANY(sppstat.spps_rcvbadsum, "packet", " received with ccksum errs");
	ANY(sppstat.spps_rcvbadoff, "packet", " received with bad offset");
	ANY(sppstat.spps_rcvshort, "packet", " received too short");
	ANY(sppstat.spps_rcvduppack, "duplicate-only packet", " received");
	ANY(sppstat.spps_rcvdupbyte, "duplicate-only byte", " received");
	ANY(sppstat.spps_rcvpartduppack, "packet", " with some duplicate data");
	ANY(sppstat.spps_rcvpartdupbyte, "dup. byte", " in part-dup. packet");
	ANY(sppstat.spps_rcvoopack, "out-of-order packet", " received");
	ANY(sppstat.spps_rcvoobyte, "out-of-order byte", " received");
	ANY(sppstat.spps_rcvpackafterwin, "packet", " with data after window");
	ANY(sppstat.spps_rcvbyteafterwin, "byte", " rcvd after window");
	ANY(sppstat.spps_rcvafterclose, "packet", " rcvd after 'close'");
	ANY(sppstat.spps_rcvwinprobe, "rcvd window probe packet", "");
	ANY(sppstat.spps_rcvdupack, "rcvd duplicate ack", "");
	ANY(sppstat.spps_rcvacktoomuch, "rcvd ack", " for unsent data");
	ANY(sppstat.spps_rcvackpack, "rcvd ack packet", "");
	ANY(sppstat.spps_rcvackbyte, "byte", " acked by rcvd acks");
	ANY(sppstat.spps_rcvwinupd, "rcvd window update packet", "");
}
#undef ANY
#define ANY(x,y,z)  ((x) ? printf("\t%d %s%s%s\n",x,y,plural(x),z) : 0)

/*
 * Dump IDP statistics structure.
 */
idp_stats(off, name)
	off_t off;
	char *name;
{
	struct idpstat idpstat;

	if (off == 0)
		return;
	kvm_read(off, (char *)&idpstat, sizeof (idpstat));
	printf("%s:\n", name);
	ANY(idpstat.idps_toosmall, "packet", " smaller than a header");
	ANY(idpstat.idps_tooshort, "packet", " smaller than advertised");
	ANY(idpstat.idps_badsum, "packet", " with bad checksums");
}

static	struct {
	u_short code;
	char *name;
	char *where;
} ns_errnames[] = {
	{0, "Unspecified Error", " at Destination"},
	{1, "Bad Checksum", " at Destination"},
	{2, "No Listener", " at Socket"},
	{3, "Packet", " Refused due to lack of space at Destination"},
	{01000, "Unspecified Error", " while gatewayed"},
	{01001, "Bad Checksum", " while gatewayed"},
	{01002, "Packet", " forwarded too many times"},
	{01003, "Packet", " too large to be forwarded"},
	{-1, 0, 0},
};

/*
 * Dump NS Error statistics structure.
 */
/*ARGSUSED*/
nserr_stats(off, name)
	off_t off;
	char *name;
{
	struct ns_errstat ns_errstat;
	register int j;
	register int histoprint = 1;
	int z;

	if (off == 0)
		return;
	kvm_read(off, (char *)&ns_errstat, sizeof (ns_errstat));
	printf("NS error statistics:\n");
	ANY(ns_errstat.ns_es_error, "call", " to ns_error");
	ANY(ns_errstat.ns_es_oldshort, "error",
		" ignored due to insufficient addressing");
	ANY(ns_errstat.ns_es_oldns_err, "error request",
		" in response to error packets");
	ANY(ns_errstat.ns_es_tooshort, "error packet",
		" received incomplete");
	ANY(ns_errstat.ns_es_badcode, "error packet",
		" received of unknown type");
	for(j = 0; j < NS_ERR_MAX; j ++) {
		z = ns_errstat.ns_es_outhist[j];
		if (z && histoprint) {
			printf("Output Error Histogram:\n");
			histoprint = 0;
		}
		ns_erputil(z, ns_errstat.ns_es_codes[j]);

	}
	histoprint = 1;
	for(j = 0; j < NS_ERR_MAX; j ++) {
		z = ns_errstat.ns_es_inhist[j];
		if (z && histoprint) {
			printf("Input Error Histogram:\n");
			histoprint = 0;
		}
		ns_erputil(z, ns_errstat.ns_es_codes[j]);
	}
}

ns_erputil(z, c)
{
	int j;
	char codebuf[30];
	char *name, *where;

	for(j = 0;; j ++) {
		if ((name = ns_errnames[j].name) == 0)
			break;
		if (ns_errnames[j].code == c)
			break;
	}
	if (name == 0)  {
		if (c > 01000)
			where = "in transit";
		else
			where = "at destination";
		sprintf(codebuf, "Unknown XNS error code 0%o", c);
		name = codebuf;
	} else 
		where =  ns_errnames[j].where;
	ANY(z, name, where);
}

static struct sockaddr_ns ssns = {AF_NS};

char *ns_prpr(x)
	struct ns_addr *x;
{
	struct sockaddr_ns *sns = &ssns;
	extern char *ns_print();

	sns->sns_addr = *x;
	return(ns_print(sns));
}
Commit	Line	Data
15637ed4 RG	1	/*
	2	* Copyright (c) 1985, 1988 Regents of the University of California.
	3	* All rights reserved.
	4	*
	5	* Redistribution and use in source and binary forms, with or without
	6	* modification, are permitted provided that the following conditions
	7	* are met:
	8	* 1. Redistributions of source code must retain the above copyright
	9	* notice, this list of conditions and the following disclaimer.
	10	* 2. Redistributions in binary form must reproduce the above copyright
	11	* notice, this list of conditions and the following disclaimer in the
	12	* documentation and/or other materials provided with the distribution.
	13	* 3. All advertising materials mentioning features or use of this software
	14	* must display the following acknowledgement:
	15	* This product includes software developed by the University of
	16	* California, Berkeley and its contributors.
	17	* 4. Neither the name of the University nor the names of its contributors
	18	* may be used to endorse or promote products derived from this software
	19	* without specific prior written permission.
	20	*
	21	* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
	22	* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
	23	* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
	24	* ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
	25	* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
	26	* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
	27	* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
	28	* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
	29	* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
	30	* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
	31	* SUCH DAMAGE.
	32	*/
	33
	34	#ifndef lint
49f80972 GW	35	/* From: static char sccsid[] = "@(#)ns.c 5.13 (Berkeley) 3/1/91"; */
	36	static const char ns_c_rcsid[] =
	37	"$Id$";
15637ed4 RG	38	#endif /* not lint */
	39
	40	#include <sys/param.h>
	41	#include <sys/socket.h>
	42	#include <sys/socketvar.h>
	43	#include <sys/mbuf.h>
	44	#include <sys/protosw.h>
	45
	46	#include <net/route.h>
	47	#include <net/if.h>
	48
	49	#include <netinet/tcp_fsm.h>
	50
	51	#include <netns/ns.h>
	52	#include <netns/ns_pcb.h>
	53	#include <netns/idp.h>
	54	#include <netns/idp_var.h>
	55	#include <netns/ns_error.h>
	56	#include <netns/sp.h>
	57	#include <netns/spidp.h>
	58	#include <netns/spp_timer.h>
	59	#include <netns/spp_var.h>
	60	#define SANAMES
	61	#include <netns/spp_debug.h>
	62
	63	#include <nlist.h>
	64	#include <errno.h>
	65	#include <stdio.h>
	66	#include <string.h>
	67
	68	struct nspcb nspcb;
	69	struct sppcb sppcb;
	70	struct socket sockb;
	71	extern int Aflag;
	72	extern int aflag;
	73	extern int nflag;
	74	extern char *plural();
	75	char *ns_prpr();
	76
	77	static int first = 1;
	78
	79	/*
	80	* Print a summary of connections related to a Network Systems
	81	* protocol. For SPP, also give state of connection.
	82	* Listening processes (aflag) are suppressed unless the
	83	* -a (all) flag is specified.
	84	*/
	85
	86	nsprotopr(off, name)
	87	off_t off;
	88	char *name;
	89	{
	90	struct nspcb cb;
	91	register struct nspcb prev, next;
	92	int isspp;
	93
	94	if (off == 0)
	95	return;
	96	isspp = strcmp(name, "spp") == 0;
	97	kvm_read(off, (char *)&cb, sizeof (struct nspcb));
	98	nspcb = cb;
	99	prev = (struct nspcb *)off;
	100	if (nspcb.nsp_next == (struct nspcb *)off)
	101	return;
102	for (;nspcb.nsp_next != (struct nspcb *)off; prev = next) {
103	off_t ppcb;
104
105	next = nspcb.nsp_next;
106	kvm_read((off_t)next, (char *)&nspcb, sizeof (nspcb));
107	if (nspcb.nsp_prev != prev) {
108	printf("???\n");
109	break;
110	}
111	if (!aflag && ns_nullhost(nspcb.nsp_faddr) ) {
112	continue;
113	}
114	kvm_read((off_t)nspcb.nsp_socket,
115	(char *)&sockb, sizeof (sockb));
116	ppcb = (off_t) nspcb.nsp_pcb;
117	if (ppcb) {
118	if (isspp) {
119	kvm_read(ppcb, (char *)&sppcb, sizeof (sppcb));
120	} else continue;
121	} else
122	if (isspp) continue;
123	if (first) {
124	printf("Active NS connections");
125	if (aflag)
126	printf(" (including servers)");
127	putchar('\n');
128	if (Aflag)
129	printf("%-8.8s ", "PCB");
130	printf(Aflag ?
131	"%-5.5s %-6.6s %-6.6s %-18.18s %-18.18s %s\n" :
132	"%-5.5s %-6.6s %-6.6s %-22.22s %-22.22s %s\n",
133	"Proto", "Recv-Q", "Send-Q",
134	"Local Address", "Foreign Address", "(state)");
135	first = 0;
136	}
137	if (Aflag)
138	printf("%8x ", ppcb);
139	printf("%-5.5s %6d %6d ", name, sockb.so_rcv.sb_cc,
140	sockb.so_snd.sb_cc);
141	printf(" %-22.22s", ns_prpr(&nspcb.nsp_laddr));
142	printf(" %-22.22s", ns_prpr(&nspcb.nsp_faddr));
143	if (isspp) {
144	extern char *tcpstates[];
145	if (sppcb.s_state >= TCP_NSTATES)
146	printf(" %d", sppcb.s_state);
147	else
148	printf(" %s", tcpstates[sppcb.s_state]);
149	}
150	putchar('\n');
151	prev = next;
152	}
153	}
154	#define ANY(x,y,z) \
155	((x) ? printf("\t%d %s%s%s -- %s\n",x,y,plural(x),z,"x") : 0)
156
157	/*
158	* Dump SPP statistics structure.
159	*/
160	spp_stats(off, name)
161	off_t off;
162	char *name;
163	{
164	struct spp_istat spp_istat;
165	#define sppstat spp_istat.newstats
166
167	if (off == 0)
168	return;
169	kvm_read(off, (char *)&spp_istat, sizeof (spp_istat));
170	printf("%s:\n", name);
171	ANY(spp_istat.nonucn, "connection", " dropped due to no new sockets ");
172	ANY(spp_istat.gonawy, "connection", " terminated due to our end dying");
173	ANY(spp_istat.nonucn, "connection",
174	" dropped due to inability to connect");
175	ANY(spp_istat.noconn, "connection",
176	" dropped due to inability to connect");
177	ANY(spp_istat.notme, "connection",
178	" incompleted due to mismatched id's");
179	ANY(spp_istat.wrncon, "connection", " dropped due to mismatched id's");
180	ANY(spp_istat.bdreas, "packet", " dropped out of sequence");
181	ANY(spp_istat.lstdup, "packet", " duplicating the highest packet");
182	ANY(spp_istat.notyet, "packet", " refused as exceeding allocation");
183	ANY(sppstat.spps_connattempt, "connection", " initiated");
184	ANY(sppstat.spps_accepts, "connection", " accepted");
185	ANY(sppstat.spps_connects, "connection", " established");
186	ANY(sppstat.spps_drops, "connection", " dropped");
187	ANY(sppstat.spps_conndrops, "embryonic connection", " dropped");
188	ANY(sppstat.spps_closed, "connection", " closed (includes drops)");
189	ANY(sppstat.spps_segstimed, "packet", " where we tried to get rtt");
190	ANY(sppstat.spps_rttupdated, "time", " we got rtt");
191	ANY(sppstat.spps_delack, "delayed ack", " sent");
192	ANY(sppstat.spps_timeoutdrop, "connection", " dropped in rxmt timeout");
193	ANY(sppstat.spps_rexmttimeo, "retransmit timeout", "");
194	ANY(sppstat.spps_persisttimeo, "persist timeout", "");
195	ANY(sppstat.spps_keeptimeo, "keepalive timeout", "");
196	ANY(sppstat.spps_keepprobe, "keepalive probe", " sent");
197	ANY(sppstat.spps_keepdrops, "connection", " dropped in keepalive");
198	ANY(sppstat.spps_sndtotal, "total packet", " sent");
199	ANY(sppstat.spps_sndpack, "data packet", " sent");
200	ANY(sppstat.spps_sndbyte, "data byte", " sent");
201	ANY(sppstat.spps_sndrexmitpack, "data packet", " retransmitted");
202	ANY(sppstat.spps_sndrexmitbyte, "data byte", " retransmitted");
203	ANY(sppstat.spps_sndacks, "ack-only packet", " sent");
204	ANY(sppstat.spps_sndprobe, "window probe", " sent");
205	ANY(sppstat.spps_sndurg, "packet", " sent with URG only");
206	ANY(sppstat.spps_sndwinup, "window update-only packet", " sent");
207	ANY(sppstat.spps_sndctrl, "control (SYN\|FIN\|RST) packet", " sent");
208	ANY(sppstat.spps_sndvoid, "request", " to send a non-existant packet");
209	ANY(sppstat.spps_rcvtotal, "total packet", " received");
210	ANY(sppstat.spps_rcvpack, "packet", " received in sequence");
211	ANY(sppstat.spps_rcvbyte, "byte", " received in sequence");
212	ANY(sppstat.spps_rcvbadsum, "packet", " received with ccksum errs");
213	ANY(sppstat.spps_rcvbadoff, "packet", " received with bad offset");
214	ANY(sppstat.spps_rcvshort, "packet", " received too short");
215	ANY(sppstat.spps_rcvduppack, "duplicate-only packet", " received");
216	ANY(sppstat.spps_rcvdupbyte, "duplicate-only byte", " received");
217	ANY(sppstat.spps_rcvpartduppack, "packet", " with some duplicate data");
218	ANY(sppstat.spps_rcvpartdupbyte, "dup. byte", " in part-dup. packet");
219	ANY(sppstat.spps_rcvoopack, "out-of-order packet", " received");
220	ANY(sppstat.spps_rcvoobyte, "out-of-order byte", " received");
221	ANY(sppstat.spps_rcvpackafterwin, "packet", " with data after window");
222	ANY(sppstat.spps_rcvbyteafterwin, "byte", " rcvd after window");
223	ANY(sppstat.spps_rcvafterclose, "packet", " rcvd after 'close'");
224	ANY(sppstat.spps_rcvwinprobe, "rcvd window probe packet", "");
225	ANY(sppstat.spps_rcvdupack, "rcvd duplicate ack", "");
226	ANY(sppstat.spps_rcvacktoomuch, "rcvd ack", " for unsent data");
227	ANY(sppstat.spps_rcvackpack, "rcvd ack packet", "");
228	ANY(sppstat.spps_rcvackbyte, "byte", " acked by rcvd acks");
229	ANY(sppstat.spps_rcvwinupd, "rcvd window update packet", "");
230	}
231	#undef ANY
232	#define ANY(x,y,z) ((x) ? printf("\t%d %s%s%s\n",x,y,plural(x),z) : 0)
233
234	/*
235	* Dump IDP statistics structure.
236	*/
237	idp_stats(off, name)
238	off_t off;
239	char *name;
240	{
241	struct idpstat idpstat;
242
243	if (off == 0)
244	return;
245	kvm_read(off, (char *)&idpstat, sizeof (idpstat));
246	printf("%s:\n", name);
247	ANY(idpstat.idps_toosmall, "packet", " smaller than a header");
248	ANY(idpstat.idps_tooshort, "packet", " smaller than advertised");
249	ANY(idpstat.idps_badsum, "packet", " with bad checksums");
250	}
251
252	static struct {
253	u_short code;
254	char *name;
255	char *where;
256	} ns_errnames[] = {
257	{0, "Unspecified Error", " at Destination"},
258	{1, "Bad Checksum", " at Destination"},
259	{2, "No Listener", " at Socket"},
260	{3, "Packet", " Refused due to lack of space at Destination"},
261	{01000, "Unspecified Error", " while gatewayed"},
262	{01001, "Bad Checksum", " while gatewayed"},
263	{01002, "Packet", " forwarded too many times"},
264	{01003, "Packet", " too large to be forwarded"},
265	{-1, 0, 0},
266	};
267
268	/*
269	* Dump NS Error statistics structure.
270	*/
271	/ARGSUSED/
272	nserr_stats(off, name)
273	off_t off;
274	char *name;
275	{
276	struct ns_errstat ns_errstat;
277	register int j;
278	register int histoprint = 1;
279	int z;
280
281	if (off == 0)
282	return;
283	kvm_read(off, (char *)&ns_errstat, sizeof (ns_errstat));
284	printf("NS error statistics:\n");
285	ANY(ns_errstat.ns_es_error, "call", " to ns_error");
286	ANY(ns_errstat.ns_es_oldshort, "error",
287	" ignored due to insufficient addressing");
288	ANY(ns_errstat.ns_es_oldns_err, "error request",
289	" in response to error packets");
290	ANY(ns_errstat.ns_es_tooshort, "error packet",
291	" received incomplete");
292	ANY(ns_errstat.ns_es_badcode, "error packet",
293	" received of unknown type");
294	for(j = 0; j < NS_ERR_MAX; j ++) {
295	z = ns_errstat.ns_es_outhist[j];
296	if (z && histoprint) {
297	printf("Output Error Histogram:\n");
298	histoprint = 0;
299	}
300	ns_erputil(z, ns_errstat.ns_es_codes[j]);
301
302	}
303	histoprint = 1;
304	for(j = 0; j < NS_ERR_MAX; j ++) {
305	z = ns_errstat.ns_es_inhist[j];
306	if (z && histoprint) {
307	printf("Input Error Histogram:\n");
308	histoprint = 0;
309	}
310	ns_erputil(z, ns_errstat.ns_es_codes[j]);
311	}
312	}
313
314	ns_erputil(z, c)
315	{
316	int j;
317	char codebuf[30];
318	char name, where;
319
320	for(j = 0;; j ++) {
321	if ((name = ns_errnames[j].name) == 0)
322	break;
323	if (ns_errnames[j].code == c)
324	break;
325	}
326	if (name == 0) {
327	if (c > 01000)
328	where = "in transit";
329	else
330	where = "at destination";
331	sprintf(codebuf, "Unknown XNS error code 0%o", c);
332	name = codebuf;
333	} else
334	where = ns_errnames[j].where;
335	ANY(z, name, where);
336	}
337
338	static struct sockaddr_ns ssns = {AF_NS};
339
340	char *ns_prpr(x)
341	struct ns_addr *x;
342	{
343	struct sockaddr_ns *sns = &ssns;
344	extern char *ns_print();
345
346	sns->sns_addr = *x;
347	return(ns_print(sns));
348	}