?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Really fix indent.
[dragonfly.git] / usr.bin / netstat / iso.c
blob0c7a614e0efa1667a3615067d5a5dccbf2abce1d
1 /*
2 * Copyright (c) 1983, 1988, 1993
3 * The Regents of the University of California. 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 * @(#)iso.c 8.1 (Berkeley) 6/6/93
34 */
35
36 /*
37 * $FreeBSD: src/usr.bin/netstat/iso.c,v 1.4.2.2 2001/09/17 14:53:17 ru Exp $
38 * $DragonFly: src/usr.bin/netstat/iso.c,v 1.5 2007/04/22 01:25:04 dillon Exp $
39 */
40 /*******************************************************************************
41 Copyright IBM Corporation 1987
42
43 All Rights Reserved
44
45 Permission to use, copy, modify, and distribute this software and its
46 documentation for any purpose and without fee is hereby granted,
47 provided that the above copyright notice appear in all copies and that
48 both that copyright notice and this permission notice appear in
49 supporting documentation, and that the name of IBM not be
50 used in advertising or publicity pertaining to distribution of the
51 software without specific, written prior permission.
52
53 IBM DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING
54 ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL
55 IBM BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR
56 ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS,
57 WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION,
58 ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
59 SOFTWARE.
60
61 *******************************************************************************/
62
63 /*
64 * ARGO Project, Computer Sciences Dept., University of Wisconsin - Madison
65 */
66
67 #include <sys/param.h>
68 #include <sys/mbuf.h>
69 #include <sys/time.h>
70 #include <sys/domain.h>
71 #include <sys/protosw.h>
72 #include <sys/socket.h>
73 #include <sys/socketvar.h>
74 #include <sys/queue.h>
75 #include <errno.h>
76 #include <net/if.h>
77 #include <net/route.h>
78 #include <netinet/in.h>
79 #include <netinet/in_systm.h>
80 #include <netinet/ip.h>
81 #include <netinet/in_pcb.h>
82 #include <netinet/ip_var.h>
83 #include <netiso/iso.h>
84 #include <netiso/iso_errno.h>
85 #include <netiso/clnp.h>
86 #include <netiso/esis.h>
87 #include <netiso/clnp_stat.h>
88 #include <netiso/argo_debug.h>
89 #undef satosiso
90 #include <netiso/tp_param.h>
91 #include <netiso/tp_states.h>
92 #include <netiso/tp_pcb.h>
93 #include <netiso/tp_stat.h>
94 #include <netiso/iso_pcb.h>
95 #include <netiso/cltp_var.h>
96 #include <netiso/cons.h>
97 #ifdef IncStat
98 #undef IncStat
99 #endif
100 #include <netiso/cons_pcb.h>
101 #include <arpa/inet.h>
102 #include <netdb.h>
103 #include <string.h>
104 #include <stdio.h>
105 #include <stdlib.h>
106 #include "netstat.h"
107
108 static void tprintstat (struct tp_stat *, int);
109 static void isonetprint (struct sockaddr_iso *, int);
110 static void hexprint (int, char *, char *);
111 extern void inetprint (struct in_addr *, int, char *);
112
113 /*
114 * Dump esis stats
115 */
116 void
117 esis_stats(u_long off, char *name, int af __unused)
118 {
119 struct esis_stat esis_stat;
120
121 if (off == 0 ||
122 kread(off, (char *)&esis_stat, sizeof (struct esis_stat)))
123 return;
124 printf("%s:\n", name);
125 printf("\t%d esh sent, %d esh received\n", esis_stat.es_eshsent,
126 esis_stat.es_eshrcvd);
127 printf("\t%d ish sent, %d ish received\n", esis_stat.es_ishsent,
128 esis_stat.es_ishrcvd);
129 printf("\t%d rd sent, %d rd received\n", esis_stat.es_rdsent,
130 esis_stat.es_rdrcvd);
131 printf("\t%d pdus not sent due to insufficient memory\n",
132 esis_stat.es_nomem);
133 printf("\t%d pdus received with bad checksum\n", esis_stat.es_badcsum);
134 printf("\t%d pdus received with bad version number\n",
135 esis_stat.es_badvers);
136 printf("\t%d pdus received with bad type field\n", esis_stat.es_badtype);
137 printf("\t%d short pdus received\n", esis_stat.es_toosmall);
138 }
139
140 /*
141 * Dump clnp statistics structure.
142 */
143 void
144 clnp_stats(u_long off, char *name, int af __unused)
145 {
146 struct clnp_stat clnp_stat;
147
148 if (off == 0 ||
149 kread(off, (char *)&clnp_stat, sizeof (clnp_stat)))
150 return;
151
152 printf("%s:\n\t%d total packets sent\n", name, clnp_stat.cns_sent);
153 printf("\t%d total fragments sent\n", clnp_stat.cns_fragments);
154 printf("\t%d total packets received\n", clnp_stat.cns_total);
155 printf("\t%d with fixed part of header too small\n",
156 clnp_stat.cns_toosmall);
157 printf("\t%d with header length not reasonable\n", clnp_stat.cns_badhlen);
158 printf("\t%d incorrect checksum%s\n",
159 clnp_stat.cns_badcsum, plural(clnp_stat.cns_badcsum));
160 printf("\t%d with unreasonable address lengths\n", clnp_stat.cns_badaddr);
161 printf("\t%d with forgotten segmentation information\n",
162 clnp_stat.cns_noseg);
163 printf("\t%d with an incorrect protocol identifier\n", clnp_stat.cns_noproto);
164 printf("\t%d with an incorrect version\n", clnp_stat.cns_badvers);
165 printf("\t%d dropped because the ttl has expired\n",
166 clnp_stat.cns_ttlexpired);
167 printf("\t%d clnp cache misses\n", clnp_stat.cns_cachemiss);
168 printf("\t%d clnp congestion experience bits set\n",
169 clnp_stat.cns_congest_set);
170 printf("\t%d clnp congestion experience bits received\n",
171 clnp_stat.cns_congest_rcvd);
172 }
173 /*
174 * Dump CLTP statistics structure.
175 */
176 void
177 cltp_stats(u_long off, char *name, int af __unused)
178 {
179 struct cltpstat cltpstat;
180
181 if (off == 0 ||
182 kread(off, (char *)&cltpstat, sizeof (cltpstat)))
183 return;
184 printf("%s:\n\t%u incomplete header%s\n", name,
185 cltpstat.cltps_hdrops, plural(cltpstat.cltps_hdrops));
186 printf("\t%u bad data length field%s\n",
187 cltpstat.cltps_badlen, plural(cltpstat.cltps_badlen));
188 printf("\t%u bad checksum%s\n",
189 cltpstat.cltps_badsum, plural(cltpstat.cltps_badsum));
190 }
191
192 struct tp_pcb tpcb;
193 struct isopcb isopcb;
194 struct socket sockb;
195 union {
196 struct sockaddr_iso siso;
197 char data[128];
198 } laddr, faddr;
199 #define kget(o, p) \
200 (kread((u_long)(o), (char *)&p, sizeof (p)))
201
202 static int first = 1;
203
204 /*
205 * Print a summary of connections related to an Internet
206 * protocol. For TP, also give state of connection.
207 * Listening processes (aflag) are suppressed unless the
208 * -a (all) flag is specified.
209 */
210 void
211 iso_protopr(u_long off, char *name, int af __unused)
212 {
213 struct isopcb cb;
214 struct isopcb *prev, *next;
215
216 if (off == 0) {
217 printf("%s control block: symbol not in namelist\n", name);
218 return;
219 }
220 if (strcmp(name, "tp") == 0) {
221 tp_protopr(off, name);
222 return;
223 }
224 if (kread(off, (char *)&cb, sizeof(cb)))
225 return;
226 isopcb = cb;
227 prev = (struct isopcb *)off;
228 if (isopcb.isop_next == (struct isopcb *)off)
229 return;
230 while (isopcb.isop_next != (struct isopcb *)off) {
231 next = isopcb.isop_next;
232 kget(next, isopcb);
233 if (isopcb.isop_prev != prev) {
234 printf("prev 0x%x next 0x%x isop_prev 0x%x isop_next 0x%x???\n",
235 prev, next, isopcb.isop_prev, isopcb.isop_next);
236 break;
237 }
238 kget(isopcb.isop_socket, sockb);
239 iso_protopr1((u_long)next, 0);
240 putchar('\n');
241 prev = next;
242 }
243 }
244
245 void
246 iso_protopr1(u_long kern_addr, int istp)
247 {
248 if (first) {
249 printf("Active ISO net connections");
250 if (aflag)
251 printf(" (including servers)");
252 putchar('\n');
253 if (Aflag)
254 printf("%-8.8s ", "PCB");
255 printf(Aflag ?
256 "%-5.5s %-6.6s %-6.6s %-18.18s %-18.18s %s\n" :
257 "%-5.5s %-6.6s %-6.6s %-22.22s %-22.22s %s\n",
258 "Proto", "Recv-Q", "Send-Q",
259 "Local Address", "Foreign Address", "(state)");
260 first = 0;
261 }
262 if (Aflag)
263 printf("%8x ",
264 (sockb.so_pcb ? (void *)sockb.so_pcb : (void *)kern_addr));
265 printf("%-5.5s %6d %6d ", "tp", sockb.so_rcv.ssb_cc, sockb.so_snd.ssb_cc);
266 if (istp && tpcb.tp_lsuffixlen) {
267 hexprint(tpcb.tp_lsuffixlen, tpcb.tp_lsuffix, "()");
268 printf("\t");
269 } else if (isopcb.isop_laddr == 0)
270 printf("*.*\t");
271 else {
272 if ((char *)isopcb.isop_laddr == ((char *)kern_addr) +
273 _offsetof(struct isopcb, isop_sladdr))
274 laddr.siso = isopcb.isop_sladdr;
275 else
276 kget(isopcb.isop_laddr, laddr);
277 isonetprint((struct sockaddr_iso *)&laddr, 1);
278 }
279 if (istp && tpcb.tp_fsuffixlen) {
280 hexprint(tpcb.tp_fsuffixlen, tpcb.tp_fsuffix, "()");
281 printf("\t");
282 } else if (isopcb.isop_faddr == 0)
283 printf("*.*\t");
284 else {
285 if ((char *)isopcb.isop_faddr == ((char *)kern_addr) +
286 _offsetof(struct isopcb, isop_sfaddr))
287 faddr.siso = isopcb.isop_sfaddr;
288 else
289 kget(isopcb.isop_faddr, faddr);
290 isonetprint((struct sockaddr_iso *)&faddr, 0);
291 }
292 }
293
294 void
295 tp_protopr(u_long off, char *name, int af __unused)
296 {
297 extern char *tp_sstring[];
298 struct tp_ref *tpr, *tpr_base;
299 struct tp_refinfo tpkerninfo;
300 int size;
301
302 kget(off, tpkerninfo);
303 size = tpkerninfo.tpr_size * sizeof (*tpr);
304 tpr_base = (struct tp_ref *)malloc(size);
305 if (tpr_base == 0)
306 return;
307 kread((u_long)(tpkerninfo.tpr_base), (char *)tpr_base, size);
308 for (tpr = tpr_base; tpr < tpr_base + tpkerninfo.tpr_size; tpr++) {
309 if (tpr->tpr_pcb == 0)
310 continue;
311 kget(tpr->tpr_pcb, tpcb);
312 if (tpcb.tp_state == ST_ERROR)
313 printf("undefined tpcb state: 0x%x\n", tpr->tpr_pcb);
314 if (!aflag &&
315 (tpcb.tp_state == TP_LISTENING ||
316 tpcb.tp_state == TP_CLOSED ||
317 tpcb.tp_state == TP_REFWAIT)) {
318 continue;
319 }
320 kget(tpcb.tp_sock, sockb);
321 if (tpcb.tp_npcb) switch(tpcb.tp_netservice) {
322 case IN_CLNS:
323 tp_inproto((u_long)tpkerninfo.tpr_base);
324 break;
325 default:
326 kget(tpcb.tp_npcb, isopcb);
327 iso_protopr1((u_long)tpcb.tp_npcb, 1);
328 break;
329 }
330 if (tpcb.tp_state >= tp_NSTATES)
331 printf(" %d", tpcb.tp_state);
332 else
333 printf(" %-12.12s", tp_sstring[tpcb.tp_state]);
334 putchar('\n');
335 }
336 }
337
338 void
339 tp_inproto(u_long pcb)
340 {
341 struct inpcb inpcb;
342 kget(tpcb.tp_npcb, inpcb);
343 if (!aflag && inet_lnaof(inpcb.inp_laddr) == INADDR_ANY)
344 return;
345 if (Aflag)
346 printf("%8x ", pcb);
347 printf("%-5.5s %6d %6d ", "tpip",
348 sockb.so_rcv.ssb_cc, sockb.so_snd.ssb_cc);
349 inetprint(&inpcb.inp_laddr, inpcb.inp_lport, "tp");
350 inetprint(&inpcb.inp_faddr, inpcb.inp_fport, "tp");
351 }
352
353 /*
354 * Pretty print an iso address (net address + port).
355 * If the numeric_addr or numeric_port were specified,
356 * use numbers instead of names.
357 */
358
359 #ifdef notdef
360 char *
361 isonetname(struct iso_addr *iso)
362 {
363 struct sockaddr_iso sa;
364 struct iso_hostent *ihe = 0;
365 struct iso_hostent *iso_gethostentrybyaddr();
366 struct iso_hostent *iso_getserventrybytsel();
367 struct iso_hostent Ihe;
368 static char line[80];
369
370 bzero(line, sizeof(line));
371 if( iso->isoa_afi ) {
372 sa.siso_family = AF_ISO;
373 sa.siso_addr = *iso;
374 sa.siso_tsuffix = 0;
375
376 if ( !numeric_addr )
377 ihe = iso_gethostentrybyaddr( &sa, 0, 0 );
378 if( ihe ) {
379 Ihe = *ihe;
380 ihe = &Ihe;
381 sprintf(line, "%s", ihe->isoh_hname);
382 } else {
383 sprintf(line, "%s", iso_ntoa(iso));
384 }
385 } else {
386 sprintf(line, "*");
387 }
388 return line;
389 }
390
391 static void
392 isonetprint(struct iso_addr *iso, char *sufx, u_short sufxlen, int islocal)
393 {
394 struct iso_hostent *iso_getserventrybytsel(), *ihe;
395 struct iso_hostent Ihe;
396 char *line, *cp;
397 int Alen = Aflag?18:22;
398
399 line = isonetname(iso);
400 cp = strchr(line, '\0');
401 ihe = (struct iso_hostent *)0;
402
403 if( islocal )
404 islocal = 20;
405 else
406 islocal = 22 + Alen;
407
408 if(Aflag)
409 islocal += 10 ;
410
411 if(!numeric_addr) {
412 if( (cp -line)>10 ) {
413 cp = line+10;
414 bzero(cp, sizeof(line)-10);
415 }
416 }
417
418 *cp++ = '.';
419 if(sufxlen) {
420 if( !Aflag && !numeric_port && (ihe=iso_getserventrybytsel(sufx, sufxlen))) {
421 Ihe = *ihe;
422 ihe = &Ihe;
423 }
424 if( ihe && (strlen(ihe->isoh_aname)>0) ) {
425 sprintf(cp, "%s", ihe->isoh_aname);
426 } else {
427 iso_sprinttsel(cp, sufx, sufxlen);
428 }
429 } else
430 sprintf(cp, "*");
431 /*
432 fprintf(stdout, Aflag?" %-18.18s":" %-22.22s", line);
433 */
434
435 if( strlen(line) > Alen ) {
436 fprintf(stdout, " %s", line);
437 fprintf(stdout, "\n %*.s", islocal+Alen," ");
438 } else {
439 fprintf(stdout, " %-*.*s", Alen, Alen,line);
440 }
441 }
442 #endif
443
444 #ifdef notdef
445 static void
446 x25_protopr(u_long off, char *name, int af __unused)
447 {
448 static char *xpcb_states[] = {
449 "CLOSED",
450 "LISTENING",
451 "CLOSING",
452 "CONNECTING",
453 "ACKWAIT",
454 "OPEN",
455 };
456 struct isopcb *prev, *next;
457 struct x25_pcb xpcb;
458
459 if (off == 0) {
460 printf("%s control block: symbol not in namelist\n", name);
461 return;
462 }
463 kread(off, &xpcb, sizeof (struct x25_pcb));
464 prev = (struct isopcb *)off;
465 if (xpcb.x_next == (struct isopcb *)off)
466 return;
467 while (xpcb.x_next != (struct isopcb *)off) {
468 next = isopcb.isop_next;
469 kread((u_long)next, &xpcb, sizeof (struct x25_pcb));
470 if (xpcb.x_prev != prev) {
471 printf("???\n");
472 break;
473 }
474 kread((u_long)xpcb.x_socket, &sockb, sizeof (sockb));
475
476 if (!aflag &&
477 xpcb.x_state == LISTENING ||
478 xpcb.x_state == TP_CLOSED ) {
479 prev = next;
480 continue;
481 }
482 if (first) {
483 printf("Active X25 net connections");
484 if (aflag)
485 printf(" (including servers)");
486 putchar('\n');
487 if (Aflag)
488 printf("%-8.8s ", "PCB");
489 printf(Aflag ?
490 "%-5.5s %-6.6s %-6.6s %-18.18s %-18.18s %s\n" :
491 "%-5.5s %-6.6s %-6.6s %-22.22s %-22.22s %s\n",
492 "Proto", "Recv-Q", "Send-Q",
493 "Local Address", "Foreign Address", "(state)");
494 first = 0;
495 }
496 printf("%-5.5s %6d %6d ", name, sockb.so_rcv.ssb_cc,
497 sockb.so_snd.ssb_cc);
498 isonetprint(&xpcb.x_laddr.siso_addr, &xpcb.x_lport,
499 sizeof(xpcb.x_lport), 1);
500 isonetprint(&xpcb.x_faddr.siso_addr, &xpcb.x_fport,
501 sizeof(xpcb.x_lport), 0);
502 if (xpcb.x_state < 0 || xpcb.x_state >= x25_NSTATES)
503 printf(" 0x0x0x0x0x0x0x0x0x%x", xpcb.x_state);
504 else
505 printf(" %-12.12s", xpcb_states[xpcb.x_state]);
506 putchar('\n');
507 prev = next;
508 }
509 }
510 #endif
511
512 struct tp_stat tp_stat;
513
514 void
515 tp_stats(caddr_t off, caddr_t name)
516 {
517 if (off == 0) {
518 printf("TP not configured\n\n");
519 return;
520 }
521 printf("%s:\n", name);
522 kget(off, tp_stat);
523 tprintstat(&tp_stat, 8);
524 }
525
526 #define OUT stdout
527
528 static void
529 tprintstat(struct tp_stat *s, int indent)
530 {
531 fprintf(OUT,
532 "%*sReceiving:\n",indent," ");
533 fprintf(OUT,
534 "\t%*s%d variable parameter%s ignored\n", indent," ",
535 s->ts_param_ignored ,plural(s->ts_param_ignored));
536 fprintf(OUT,
537 "\t%*s%d invalid parameter code%s\n", indent, " ",
538 s->ts_inv_pcode ,plural(s->ts_inv_pcode));
539 fprintf(OUT,
540 "\t%*s%d invalid parameter value%s\n", indent, " ",
541 s->ts_inv_pval ,plural(s->ts_inv_pval));
542 fprintf(OUT,
543 "\t%*s%d invalid dutype%s\n", indent, " ",
544 s->ts_inv_dutype ,plural(s->ts_inv_dutype));
545 fprintf(OUT,
546 "\t%*s%d negotiation failure%s\n", indent, " ",
547 s->ts_negotfailed ,plural(s->ts_negotfailed));
548 fprintf(OUT,
549 "\t%*s%d invalid destination reference%s\n", indent, " ",
550 s->ts_inv_dref ,plural(s->ts_inv_dref));
551 fprintf(OUT,
552 "\t%*s%d invalid suffix parameter%s\n", indent, " ",
553 s->ts_inv_sufx ,plural(s->ts_inv_sufx));
554 fprintf(OUT,
555 "\t%*s%d invalid length\n",indent, " ", s->ts_inv_length);
556 fprintf(OUT,
557 "\t%*s%d invalid checksum%s\n", indent, " ",
558 s->ts_bad_csum ,plural(s->ts_bad_csum));
559 fprintf(OUT,
560 "\t%*s%d DT%s out of order\n", indent, " ",
561 s->ts_dt_ooo ,plural(s->ts_dt_ooo));
562 fprintf(OUT,
563 "\t%*s%d DT%s not in window\n", indent, " ",
564 s->ts_dt_niw ,plural(s->ts_dt_niw));
565 fprintf(OUT,
566 "\t%*s%d duplicate DT%s\n", indent, " ",
567 s->ts_dt_dup ,plural(s->ts_dt_dup));
568 fprintf(OUT,
569 "\t%*s%d XPD%s not in window\n", indent, " ",
570 s->ts_xpd_niw ,plural(s->ts_xpd_niw));
571 fprintf(OUT,
572 "\t%*s%d XPD%s w/o credit to stash\n", indent, " ",
573 s->ts_xpd_dup ,plural(s->ts_xpd_dup));
574 fprintf(OUT,
575 "\t%*s%d time%s local credit reneged\n", indent, " ",
576 s->ts_lcdt_reduced ,plural(s->ts_lcdt_reduced));
577 fprintf(OUT,
578 "\t%*s%d concatenated TPDU%s\n", indent, " ",
579 s->ts_concat_rcvd ,plural(s->ts_concat_rcvd));
580 fprintf(OUT,
581 "%*sSending:\n", indent, " ");
582 fprintf(OUT,
583 "\t%*s%d XPD mark%s discarded\n", indent, " ",
584 s->ts_xpdmark_del ,plural(s->ts_xpdmark_del));
585 fprintf(OUT,
586 "\t%*sXPD stopped data flow %d time%s\n", indent, " ",
587 s->ts_xpd_intheway ,plural(s->ts_xpd_intheway));
588 fprintf(OUT,
589 "\t%*s%d time%s foreign window closed\n", indent, " ",
590 s->ts_zfcdt ,plural(s->ts_zfcdt));
591 fprintf(OUT,
592 "%*sMiscellaneous:\n", indent, " ");
593 fprintf(OUT,
594 "\t%*s%d small mbuf%s\n", indent, " ",
595 s->ts_mb_small ,plural(s->ts_mb_small));
596 fprintf(OUT,
597 "\t%*s%d cluster%s\n", indent, " ",
598 s->ts_mb_cluster, plural(s->ts_mb_cluster));
599 fprintf(OUT,
600 "\t%*s%d source quench \n",indent, " ",
601 s->ts_quench);
602 fprintf(OUT,
603 "\t%*s%d dec bit%s\n", indent, " ",
604 s->ts_rcvdecbit, plural(s->ts_rcvdecbit));
605 fprintf(OUT,
606 "\t%*sM:L ( M mbuf chains of length L)\n", indent, " ");
607 {
608 int j;
609
610 fprintf(OUT, "\t%*s%d: over 16\n", indent, " ",
611 s->ts_mb_len_distr[0]);
612 for( j=1; j<=8; j++) {
613 fprintf(OUT,
614 "\t%*s%d: %d\t\t%d: %d\n", indent, " ",
615 s->ts_mb_len_distr[j],j,
616 s->ts_mb_len_distr[j<<1],j<<1
617 );
618 }
619 }
620 fprintf(OUT,
621 "\t%*s%d EOT rcvd\n", indent, " ", s->ts_eot_input);
622 fprintf(OUT,
623 "\t%*s%d EOT sent\n", indent, " ", s->ts_EOT_sent);
624 fprintf(OUT,
625 "\t%*s%d EOT indication%s\n", indent, " ",
626 s->ts_eot_user ,plural(s->ts_eot_user));
627
628 fprintf(OUT,
629 "%*sConnections:\n", indent, " ");
630 fprintf(OUT,
631 "\t%*s%d connection%s used extended format\n", indent, " ",
632 s->ts_xtd_fmt ,plural(s->ts_xtd_fmt));
633 fprintf(OUT,
634 "\t%*s%d connection%s allowed transport expedited data\n", indent, " ",
635 s->ts_use_txpd ,plural(s->ts_use_txpd));
636 fprintf(OUT,
637 "\t%*s%d connection%s turned off checksumming\n", indent, " ",
638 s->ts_csum_off ,plural(s->ts_csum_off));
639 fprintf(OUT,
640 "\t%*s%d connection%s dropped due to retrans limit\n", indent, " ",
641 s->ts_conn_gaveup ,plural(s->ts_conn_gaveup));
642 fprintf(OUT,
643 "\t%*s%d tp 4 connection%s\n", indent, " ",
644 s->ts_tp4_conn ,plural(s->ts_tp4_conn));
645 fprintf(OUT,
646 "\t%*s%d tp 0 connection%s\n", indent, " ",
647 s->ts_tp0_conn ,plural(s->ts_tp0_conn));
648 {
649 int j;
650 static char *name[]= {
651 "~LOCAL, PDN",
652 "~LOCAL,~PDN",
653 " LOCAL,~PDN",
654 " LOCAL, PDN"
655 };
656
657 fprintf(OUT,
658 "\n%*sRound trip times, listed in ticks:\n", indent, " ");
659 fprintf(OUT,
660 "\t%*s%11.11s %12.12s | %12.12s | %s\n", indent, " ",
661 "Category",
662 "Smoothed avg", "Deviation", "Deviation/Avg");
663 for (j = 0; j <= 3; j++) {
664 fprintf(OUT,
665 "\t%*s%11.11s: %-11d | %-11d | %-11d | %-11d\n", indent, " ",
666 name[j],
667 s->ts_rtt[j],
668 s->ts_rtt[j],
669 s->ts_rtv[j],
670 s->ts_rtv[j]);
671 }
672 }
673 fprintf(OUT,
674 "\n%*sTpdus RECVD [%d valid, %3.6f %% of total (%d); %d dropped]\n",indent," ",
675 s->ts_tpdu_rcvd ,
676 ((s->ts_pkt_rcvd > 0) ?
677 ((100 * (float)s->ts_tpdu_rcvd)/(float)s->ts_pkt_rcvd)
678 : 0),
679 s->ts_pkt_rcvd,
680 s->ts_recv_drop );
681
682 fprintf(OUT,
683 "\t%*sDT %6d AK %6d DR %4d CR %4d \n", indent, " ",
684 s->ts_DT_rcvd, s->ts_AK_rcvd, s->ts_DR_rcvd, s->ts_CR_rcvd);
685 fprintf(OUT,
686 "\t%*sXPD %6d XAK %6d DC %4d CC %4d ER %4d\n", indent, " ",
687 s->ts_XPD_rcvd, s->ts_XAK_rcvd, s->ts_DC_rcvd, s->ts_CC_rcvd,
688 s->ts_ER_rcvd);
689 fprintf(OUT,
690 "\n%*sTpdus SENT [%d total, %d dropped]\n", indent, " ",
691 s->ts_tpdu_sent, s->ts_send_drop);
692
693 fprintf(OUT,
694 "\t%*sDT %6d AK %6d DR %4d CR %4d \n", indent, " ",
695 s->ts_DT_sent, s->ts_AK_sent, s->ts_DR_sent, s->ts_CR_sent);
696 fprintf(OUT,
697 "\t%*sXPD %6d XAK %6d DC %4d CC %4d ER %4d\n", indent, " ",
698 s->ts_XPD_sent, s->ts_XAK_sent, s->ts_DC_sent, s->ts_CC_sent,
699 s->ts_ER_sent);
700
701 fprintf(OUT,
702 "\n%*sRetransmissions:\n", indent, " ");
703 #define PERCENT(X,Y) (((Y)>0)?((100 *(float)(X)) / (float) (Y)):0)
704
705 fprintf(OUT,
706 "\t%*sCR %6d CC %6d DR %6d \n", indent, " ",
707 s->ts_retrans_cr, s->ts_retrans_cc, s->ts_retrans_dr);
708 fprintf(OUT,
709 "\t%*sDT %6d (%5.2f%%)\n", indent, " ",
710 s->ts_retrans_dt,
711 PERCENT(s->ts_retrans_dt, s->ts_DT_sent));
712 fprintf(OUT,
713 "\t%*sXPD %6d (%5.2f%%)\n", indent, " ",
714 s->ts_retrans_xpd,
715 PERCENT(s->ts_retrans_xpd, s->ts_XPD_sent));
716
717
718 fprintf(OUT,
719 "\n%*sE Timers: [%6d ticks]\n", indent, " ", s->ts_Eticks);
720 fprintf(OUT,
721 "%*s%6d timer%s set \t%6d timer%s expired \t%6d timer%s cancelled\n",indent, " ",
722 s->ts_Eset ,plural(s->ts_Eset),
723 s->ts_Eexpired ,plural(s->ts_Eexpired),
724 s->ts_Ecan_act ,plural(s->ts_Ecan_act));
725
726 fprintf(OUT,
727 "\n%*sC Timers: [%6d ticks]\n", indent, " ",s->ts_Cticks);
728 fprintf(OUT,
729 "%*s%6d timer%s set \t%6d timer%s expired \t%6d timer%s cancelled\n",
730 indent, " ",
731 s->ts_Cset ,plural(s->ts_Cset),
732 s->ts_Cexpired ,plural(s->ts_Cexpired),
733 s->ts_Ccan_act ,plural(s->ts_Ccan_act));
734 fprintf(OUT,
735 "%*s%6d inactive timer%s cancelled\n", indent, " ",
736 s->ts_Ccan_inact ,plural(s->ts_Ccan_inact));
737
738 fprintf(OUT,
739 "\n%*sPathological debugging activity:\n", indent, " ");
740 fprintf(OUT,
741 "\t%*s%6d CC%s sent to zero dref\n", indent, " ",
742 s->ts_zdebug ,plural(s->ts_zdebug));
743 /* SAME LINE AS ABOVE */
744 fprintf(OUT,
745 "\t%*s%6d random DT%s dropped\n", indent, " ",
746 s->ts_ydebug ,plural(s->ts_ydebug));
747 fprintf(OUT,
748 "\t%*s%6d illegally large XPD TPDU%s\n", indent, " ",
749 s->ts_vdebug ,plural(s->ts_vdebug));
750 fprintf(OUT,
751 "\t%*s%6d faked reneging of cdt\n", indent, " ",
752 s->ts_ldebug );
753
754 fprintf(OUT,
755 "\n%*sACK reasons:\n", indent, " ");
756 fprintf(OUT, "\t%*s%6d not acked immediately\n", indent, " ",
757 s->ts_ackreason[_ACK_DONT_] );
758 fprintf(OUT, "\t%*s%6d strategy==each\n", indent, " ",
759 s->ts_ackreason[_ACK_STRAT_EACH_] );
760 fprintf(OUT, "\t%*s%6d strategy==fullwindow\n", indent, " ",
761 s->ts_ackreason[_ACK_STRAT_FULLWIN_] );
762 fprintf(OUT, "\t%*s%6d duplicate DT\n", indent, " ",
763 s->ts_ackreason[_ACK_DUP_] );
764 fprintf(OUT, "\t%*s%6d EOTSDU\n", indent, " ",
765 s->ts_ackreason[_ACK_EOT_] );
766 fprintf(OUT, "\t%*s%6d reordered DT\n", indent, " ",
767 s->ts_ackreason[_ACK_REORDER_] );
768 fprintf(OUT, "\t%*s%6d user rcvd\n", indent, " ",
769 s->ts_ackreason[_ACK_USRRCV_] );
770 fprintf(OUT, "\t%*s%6d fcc reqd\n", indent, " ",
771 s->ts_ackreason[_ACK_FCC_] );
772 }
773 #ifndef SSEL
774 #define SSEL(s) ((s)->siso_tlen + TSEL(s))
775 #define PSEL(s) ((s)->siso_slen + SSEL(s))
776 #endif
777
778 static void
779 isonetprint(struct sockaddr_iso *siso, int islocal)
780 {
781 hexprint(siso->siso_nlen, siso->siso_addr.isoa_genaddr, "{}");
782 if (siso->siso_tlen || siso->siso_slen || siso->siso_plen)
783 hexprint(siso->siso_tlen, TSEL(siso), "()");
784 if (siso->siso_slen || siso->siso_plen)
785 hexprint(siso->siso_slen, SSEL(siso), "[]");
786 if (siso->siso_plen)
787 hexprint(siso->siso_plen, PSEL(siso), "<>");
788 putchar(' ');
789 }
790
791 static char hexlist[] = "0123456789abcdef", obuf[128];
792
793 static void
794 hexprint(int n, char *buf, char *delim)
795 {
796 u_char *in = (u_char *)buf, *top = in + n;
797 char *out = obuf;
798 int i;
799
800 if (n == 0)
801 return;
802 while (in < top) {
803 i = *in++;
804 *out++ = '.';
805 if (i > 0xf) {
806 out[1] = hexlist[i & 0xf];
807 i >>= 4;
808 out[0] = hexlist[i];
809 out += 2;
810 } else
811 *out++ = hexlist[i];
812 }
813 *obuf = *delim; *out++ = delim[1]; *out = 0;
814 printf("%s", obuf);
815 }
DragonFly BSD