1/*-
2 * SPDX-License-Identifier: BSD-3-Clause
3 *
4 * Copyright (c) 2001-2007, by Weongyo Jeong. All rights reserved.
5 * Copyright (c) 2011, by Michael Tuexen. All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions are met:
9 *
10 * a) Redistributions of source code must retain the above copyright notice,
11 *   this list of conditions and the following disclaimer.
12 *
13 * b) Redistributions in binary form must reproduce the above copyright
14 *    notice, this list of conditions and the following disclaimer in
15 *   the documentation and/or other materials provided with the distribution.
16 *
17 * c) Neither the name of Cisco Systems, Inc. nor the names of its
18 *    contributors may be used to endorse or promote products derived
19 *    from this software without specific prior written permission.
20 *
21 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
22 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
23 * THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
25 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
26 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
27 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
28 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
29 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
30 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF
31 * THE POSSIBILITY OF SUCH DAMAGE.
32 */
33
34#include <sys/param.h>
35#include <sys/queue.h>
36#include <sys/types.h>
37#include <sys/socket.h>
38#include <sys/socketvar.h>
39#include <sys/sysctl.h>
40#include <sys/protosw.h>
41
42#include <netinet/in.h>
43#include <netinet/sctp.h>
44#include <netinet/sctp_constants.h>
45#include <arpa/inet.h>
46
47#include <err.h>
48#include <errno.h>
49#include <libutil.h>
50#include <netdb.h>
51#include <stdint.h>
52#include <stdio.h>
53#include <stdlib.h>
54#include <stdbool.h>
55#include <string.h>
56#include <unistd.h>
57#include "netstat.h"
58#include <libxo/xo.h>
59
60#ifdef SCTP
61
62static void sctp_statesprint(uint32_t state);
63
64#define	NETSTAT_SCTP_STATES_CLOSED		0x0
65#define	NETSTAT_SCTP_STATES_BOUND		0x1
66#define	NETSTAT_SCTP_STATES_LISTEN		0x2
67#define	NETSTAT_SCTP_STATES_COOKIE_WAIT		0x3
68#define	NETSTAT_SCTP_STATES_COOKIE_ECHOED	0x4
69#define	NETSTAT_SCTP_STATES_ESTABLISHED		0x5
70#define	NETSTAT_SCTP_STATES_SHUTDOWN_SENT	0x6
71#define	NETSTAT_SCTP_STATES_SHUTDOWN_RECEIVED	0x7
72#define	NETSTAT_SCTP_STATES_SHUTDOWN_ACK_SENT	0x8
73#define	NETSTAT_SCTP_STATES_SHUTDOWN_PENDING	0x9
74
75static const char *sctpstates[] = {
76	"CLOSED",
77	"BOUND",
78	"LISTEN",
79	"COOKIE_WAIT",
80	"COOKIE_ECHOED",
81	"ESTABLISHED",
82	"SHUTDOWN_SENT",
83	"SHUTDOWN_RECEIVED",
84	"SHUTDOWN_ACK_SENT",
85	"SHUTDOWN_PENDING"
86};
87
88static LIST_HEAD(xladdr_list, xladdr_entry) xladdr_head;
89struct xladdr_entry {
90	struct xsctp_laddr *xladdr;
91	LIST_ENTRY(xladdr_entry) xladdr_entries;
92};
93
94static LIST_HEAD(xraddr_list, xraddr_entry) xraddr_head;
95struct xraddr_entry {
96	struct xsctp_raddr *xraddr;
97	LIST_ENTRY(xraddr_entry) xraddr_entries;
98};
99
100static void
101sctp_print_address(const char *container, union sctp_sockstore *address,
102    int port, int num_port)
103{
104	struct servent *sp = 0;
105	char line[80], *cp;
106	int width;
107	size_t alen, plen;
108
109	if (container)
110		xo_open_container(container);
111
112	switch (address->sa.sa_family) {
113#ifdef INET
114	case AF_INET:
115		snprintf(line, sizeof(line), "%.*s.",
116		    Wflag ? 39 : 16, inetname(&address->sin.sin_addr));
117		break;
118#endif
119#ifdef INET6
120	case AF_INET6:
121		snprintf(line, sizeof(line), "%.*s.",
122		    Wflag ? 39 : 16, inet6name(&address->sin6.sin6_addr));
123		break;
124#endif
125	default:
126		snprintf(line, sizeof(line), "%.*s.",
127		    Wflag ? 39 : 16, "");
128		break;
129	}
130	alen = strlen(line);
131	cp = line + alen;
132	if (!num_port && port)
133		sp = getservbyport((int)port, "sctp");
134	if (sp || port == 0)
135		snprintf(cp, sizeof(line) - alen,
136		    "%.15s ", sp ? sp->s_name : "*");
137	else
138		snprintf(cp, sizeof(line) - alen,
139		    "%d ", ntohs((u_short)port));
140	width = Wflag ? 45 : 22;
141	xo_emit("{d:target/%-*.*s} ", width, width, line);
142
143	plen = strlen(cp) - 1;
144	alen--;
145	xo_emit("{e:address/%*.*s}{e:port/%*.*s}", alen, alen, line, plen,
146	    plen, cp);
147
148	if (container)
149		xo_close_container(container);
150}
151
152static int
153sctp_skip_xinpcb_ifneed(char *buf, const size_t buflen, size_t *offset)
154{
155	int exist_tcb = 0;
156	struct xsctp_tcb *xstcb;
157	struct xsctp_raddr *xraddr;
158	struct xsctp_laddr *xladdr;
159
160	while (*offset < buflen) {
161		xladdr = (struct xsctp_laddr *)(buf + *offset);
162		*offset += sizeof(struct xsctp_laddr);
163		if (xladdr->last == 1)
164			break;
165	}
166
167	while (*offset < buflen) {
168		xstcb = (struct xsctp_tcb *)(buf + *offset);
169		*offset += sizeof(struct xsctp_tcb);
170		if (xstcb->last == 1)
171			break;
172
173		exist_tcb = 1;
174
175		while (*offset < buflen) {
176			xladdr = (struct xsctp_laddr *)(buf + *offset);
177			*offset += sizeof(struct xsctp_laddr);
178			if (xladdr->last == 1)
179				break;
180		}
181
182		while (*offset < buflen) {
183			xraddr = (struct xsctp_raddr *)(buf + *offset);
184			*offset += sizeof(struct xsctp_raddr);
185			if (xraddr->last == 1)
186				break;
187		}
188	}
189
190	/*
191	 * If Lflag is set, we don't care about the return value.
192	 */
193	if (Lflag)
194		return 0;
195
196	return exist_tcb;
197}
198
199static void
200sctp_process_tcb(struct xsctp_tcb *xstcb,
201    char *buf, const size_t buflen, size_t *offset, int *indent)
202{
203	int i, xl_total = 0, xr_total = 0, x_max;
204	struct xsctp_raddr *xraddr;
205	struct xsctp_laddr *xladdr;
206	struct xladdr_entry *prev_xl = NULL, *xl = NULL, *xl_tmp;
207	struct xraddr_entry *prev_xr = NULL, *xr = NULL, *xr_tmp;
208
209	LIST_INIT(&xladdr_head);
210	LIST_INIT(&xraddr_head);
211
212	/*
213	 * Make `struct xladdr_list' list and `struct xraddr_list' list
214	 * to handle the address flexibly.
215	 */
216	while (*offset < buflen) {
217		xladdr = (struct xsctp_laddr *)(buf + *offset);
218		*offset += sizeof(struct xsctp_laddr);
219		if (xladdr->last == 1)
220			break;
221
222		prev_xl = xl;
223		xl = malloc(sizeof(struct xladdr_entry));
224		if (xl == NULL) {
225			xo_warnx("malloc %lu bytes",
226			    (u_long)sizeof(struct xladdr_entry));
227			goto out;
228		}
229		xl->xladdr = xladdr;
230		if (prev_xl == NULL)
231			LIST_INSERT_HEAD(&xladdr_head, xl, xladdr_entries);
232		else
233			LIST_INSERT_AFTER(prev_xl, xl, xladdr_entries);
234		xl_total++;
235	}
236
237	while (*offset < buflen) {
238		xraddr = (struct xsctp_raddr *)(buf + *offset);
239		*offset += sizeof(struct xsctp_raddr);
240		if (xraddr->last == 1)
241			break;
242
243		prev_xr = xr;
244		xr = malloc(sizeof(struct xraddr_entry));
245		if (xr == NULL) {
246			xo_warnx("malloc %lu bytes",
247			    (u_long)sizeof(struct xraddr_entry));
248			goto out;
249		}
250		xr->xraddr = xraddr;
251		if (prev_xr == NULL)
252			LIST_INSERT_HEAD(&xraddr_head, xr, xraddr_entries);
253		else
254			LIST_INSERT_AFTER(prev_xr, xr, xraddr_entries);
255		xr_total++;
256	}
257
258	/*
259	 * Let's print the address infos.
260	 */
261	xo_open_list("address");
262	xl = LIST_FIRST(&xladdr_head);
263	xr = LIST_FIRST(&xraddr_head);
264	x_max = MAX(xl_total, xr_total);
265	for (i = 0; i < x_max; i++) {
266		xo_open_instance("address");
267
268		if (((*indent == 0) && i > 0) || *indent > 0)
269			xo_emit("{P:/%-12s} ", " ");
270
271		if (xl != NULL) {
272			sctp_print_address("local", &(xl->xladdr->address),
273			    htons(xstcb->local_port), numeric_port);
274		} else {
275			if (Wflag) {
276				xo_emit("{P:/%-45s} ", " ");
277			} else {
278				xo_emit("{P:/%-22s} ", " ");
279			}
280		}
281
282		if (xr != NULL && !Lflag) {
283			sctp_print_address("remote", &(xr->xraddr->address),
284			    htons(xstcb->remote_port), numeric_port);
285		}
286
287		if (xl != NULL)
288			xl = LIST_NEXT(xl, xladdr_entries);
289		if (xr != NULL)
290			xr = LIST_NEXT(xr, xraddr_entries);
291
292		if (i == 0 && !Lflag)
293			sctp_statesprint(xstcb->state);
294
295		if (i < x_max)
296			xo_emit("\n");
297		xo_close_instance("address");
298	}
299
300out:
301	/*
302	 * Free the list which be used to handle the address.
303	 */
304	xl = LIST_FIRST(&xladdr_head);
305	while (xl != NULL) {
306		xl_tmp = LIST_NEXT(xl, xladdr_entries);
307		free(xl);
308		xl = xl_tmp;
309	}
310
311	xr = LIST_FIRST(&xraddr_head);
312	while (xr != NULL) {
313		xr_tmp = LIST_NEXT(xr, xraddr_entries);
314		free(xr);
315		xr = xr_tmp;
316	}
317}
318
319static void
320sctp_process_inpcb(struct xsctp_inpcb *xinpcb,
321    char *buf, const size_t buflen, size_t *offset)
322{
323	int indent = 0, xladdr_total = 0, is_listening = 0;
324	static int first = 1;
325	const char *tname, *pname;
326	struct xsctp_tcb *xstcb;
327	struct xsctp_laddr *xladdr;
328	size_t offset_laddr;
329	int process_closed;
330
331	if (xinpcb->maxqlen > 0)
332		is_listening = 1;
333
334	if (first) {
335		if (!Lflag) {
336			xo_emit("Active SCTP associations");
337			if (aflag)
338				xo_emit(" (including servers)");
339		} else
340			xo_emit("Current listen queue sizes (qlen/maxqlen)");
341		xo_emit("\n");
342		if (Lflag)
343			xo_emit("{T:/%-6.6s} {T:/%-5.5s} {T:/%-8.8s} "
344			    "{T:/%-22.22s}\n",
345			    "Proto", "Type", "Listen", "Local Address");
346		else
347			if (Wflag)
348				xo_emit("{T:/%-6.6s} {T:/%-5.5s} {T:/%-45.45s} "
349				    "{T:/%-45.45s} {T:/%s}\n",
350				    "Proto", "Type",
351				    "Local Address", "Foreign Address",
352				    "(state)");
353			else
354				xo_emit("{T:/%-6.6s} {T:/%-5.5s} {T:/%-22.22s} "
355				    "{T:/%-22.22s} {T:/%s}\n",
356				    "Proto", "Type",
357				    "Local Address", "Foreign Address",
358				    "(state)");
359		first = 0;
360	}
361	xladdr = (struct xsctp_laddr *)(buf + *offset);
362	if ((!aflag && is_listening) ||
363	    (Lflag && !is_listening)) {
364		sctp_skip_xinpcb_ifneed(buf, buflen, offset);
365		return;
366	}
367
368	if (xinpcb->flags & SCTP_PCB_FLAGS_BOUND_V6) {
369		/* Can't distinguish between sctp46 and sctp6 */
370		pname = "sctp46";
371	} else {
372		pname = "sctp4";
373	}
374
375	if (xinpcb->flags & SCTP_PCB_FLAGS_TCPTYPE)
376		tname = "1to1";
377	else if (xinpcb->flags & SCTP_PCB_FLAGS_UDPTYPE)
378		tname = "1toN";
379	else
380		tname = "????";
381
382	if (Lflag) {
383		char buf1[22];
384
385		snprintf(buf1, sizeof buf1, "%u/%u",
386		    xinpcb->qlen, xinpcb->maxqlen);
387		xo_emit("{:protocol/%-6.6s/%s} {:type/%-5.5s/%s} ",
388		    pname, tname);
389		xo_emit("{d:queues/%-8.8s}{e:queue-len/%hu}"
390		    "{e:max-queue-len/%hu} ",
391		    buf1, xinpcb->qlen, xinpcb->maxqlen);
392	}
393
394	offset_laddr = *offset;
395	process_closed = 0;
396
397	xo_open_list("local-address");
398retry:
399	while (*offset < buflen) {
400		xladdr = (struct xsctp_laddr *)(buf + *offset);
401		*offset += sizeof(struct xsctp_laddr);
402		if (xladdr->last) {
403			if (aflag && !Lflag && (xladdr_total == 0) && process_closed) {
404				xo_open_instance("local-address");
405
406				xo_emit("{:protocol/%-6.6s/%s} "
407				    "{:type/%-5.5s/%s} ", pname, tname);
408				if (Wflag) {
409					xo_emit("{P:/%-91.91s/%s} "
410					    "{:state/CLOSED}", " ");
411				} else {
412					xo_emit("{P:/%-45.45s/%s} "
413					    "{:state/CLOSED}", " ");
414				}
415				xo_close_instance("local-address");
416			}
417			if (process_closed || is_listening) {
418				xo_emit("\n");
419			}
420			break;
421		}
422
423		if (!Lflag && !is_listening && !process_closed)
424			continue;
425
426		xo_open_instance("local-address");
427
428		if (xladdr_total == 0) {
429			if (!Lflag) {
430				xo_emit("{:protocol/%-6.6s/%s} "
431				    "{:type/%-5.5s/%s} ", pname, tname);
432			}
433		} else {
434			xo_emit("\n");
435			xo_emit(Lflag ? "{P:/%-21.21s} " : "{P:/%-12.12s} ",
436			    " ");
437		}
438		sctp_print_address("local", &(xladdr->address),
439		    htons(xinpcb->local_port), numeric_port);
440		if (aflag && !Lflag && xladdr_total == 0) {
441			if (Wflag) {
442				if (process_closed) {
443					xo_emit("{P:/%-45.45s} "
444					    "{:state/CLOSED}", " ");
445				} else {
446					xo_emit("{P:/%-45.45s} "
447					    "{:state/LISTEN}", " ");
448				}
449			} else {
450				if (process_closed) {
451					xo_emit("{P:/%-22.22s} "
452					    "{:state/CLOSED}", " ");
453				} else {
454					xo_emit("{P:/%-22.22s} "
455					    "{:state/LISTEN}", " ");
456				}
457			}
458		}
459		xladdr_total++;
460		xo_close_instance("local-address");
461	}
462
463	xstcb = (struct xsctp_tcb *)(buf + *offset);
464	*offset += sizeof(struct xsctp_tcb);
465	if (aflag && (xladdr_total == 0) && xstcb->last && !process_closed) {
466		process_closed = 1;
467		*offset = offset_laddr;
468		goto retry;
469	}
470	while (xstcb->last == 0 && *offset < buflen) {
471		xo_emit("{:protocol/%-6.6s/%s} {:type/%-5.5s/%s} ",
472		    pname, tname);
473		sctp_process_tcb(xstcb, buf, buflen, offset, &indent);
474		indent++;
475		xstcb = (struct xsctp_tcb *)(buf + *offset);
476		*offset += sizeof(struct xsctp_tcb);
477	}
478
479	xo_close_list("local-address");
480}
481
482/*
483 * Print a summary of SCTP connections related to an Internet
484 * protocol.
485 */
486void
487sctp_protopr(u_long off __unused,
488    const char *name __unused, int af1 __unused, int proto)
489{
490	char *buf;
491	const char *mibvar = "net.inet.sctp.assoclist";
492	size_t offset = 0;
493	size_t len = 0;
494	struct xsctp_inpcb *xinpcb;
495
496	if (proto != IPPROTO_SCTP)
497		return;
498
499	if (sysctlbyname(mibvar, 0, &len, 0, 0) < 0) {
500		if (errno != ENOENT)
501			xo_warn("sysctl: %s", mibvar);
502		return;
503	}
504	if ((buf = malloc(len)) == NULL) {
505		xo_warnx("malloc %lu bytes", (u_long)len);
506		return;
507	}
508	if (sysctlbyname(mibvar, buf, &len, 0, 0) < 0) {
509		xo_warn("sysctl: %s", mibvar);
510		free(buf);
511		return;
512	}
513
514	xinpcb = (struct xsctp_inpcb *)(buf + offset);
515	offset += sizeof(struct xsctp_inpcb);
516	while (xinpcb->last == 0 && offset < len) {
517		sctp_process_inpcb(xinpcb, buf, (const size_t)len,
518		    &offset);
519
520		xinpcb = (struct xsctp_inpcb *)(buf + offset);
521		offset += sizeof(struct xsctp_inpcb);
522	}
523
524	free(buf);
525}
526
527static void
528sctp_statesprint(uint32_t state)
529{
530	int idx;
531
532	switch (state) {
533	case SCTP_CLOSED:
534		idx = NETSTAT_SCTP_STATES_CLOSED;
535		break;
536	case SCTP_BOUND:
537		idx = NETSTAT_SCTP_STATES_BOUND;
538		break;
539	case SCTP_LISTEN:
540		idx = NETSTAT_SCTP_STATES_LISTEN;
541		break;
542	case SCTP_COOKIE_WAIT:
543		idx = NETSTAT_SCTP_STATES_COOKIE_WAIT;
544		break;
545	case SCTP_COOKIE_ECHOED:
546		idx = NETSTAT_SCTP_STATES_COOKIE_ECHOED;
547		break;
548	case SCTP_ESTABLISHED:
549		idx = NETSTAT_SCTP_STATES_ESTABLISHED;
550		break;
551	case SCTP_SHUTDOWN_SENT:
552		idx = NETSTAT_SCTP_STATES_SHUTDOWN_SENT;
553		break;
554	case SCTP_SHUTDOWN_RECEIVED:
555		idx = NETSTAT_SCTP_STATES_SHUTDOWN_RECEIVED;
556		break;
557	case SCTP_SHUTDOWN_ACK_SENT:
558		idx = NETSTAT_SCTP_STATES_SHUTDOWN_ACK_SENT;
559		break;
560	case SCTP_SHUTDOWN_PENDING:
561		idx = NETSTAT_SCTP_STATES_SHUTDOWN_PENDING;
562		break;
563	default:
564		xo_emit("UNKNOWN {:state/0x%08x}", state);
565		return;
566	}
567
568	xo_emit("{:state/%s}", sctpstates[idx]);
569}
570
571/*
572 * Dump SCTP statistics structure.
573 */
574void
575sctp_stats(u_long off, const char *name, int af1 __unused, int proto __unused)
576{
577	struct sctpstat sctpstat;
578
579	if (fetch_stats("net.inet.sctp.stats", off, &sctpstat,
580	    sizeof(sctpstat), kread) != 0)
581		return;
582
583	xo_open_container(name);
584	xo_emit("{T:/%s}:\n", name);
585
586#define	p(f, m) if (sctpstat.f || sflag <= 1) \
587	xo_emit(m, (uintmax_t)sctpstat.f, plural(sctpstat.f))
588#define	p1a(f, m) if (sctpstat.f || sflag <= 1) \
589	xo_emit(m, (uintmax_t)sctpstat.f)
590
591	/*
592	 * input statistics
593	 */
594	p(sctps_recvpackets, "\t{:received-packets/%ju} "
595	    "{N:/input packet%s}\n");
596	p(sctps_recvdatagrams, "\t\t{:received-datagrams/%ju} "
597	    "{N:/datagram%s}\n");
598	p(sctps_recvpktwithdata, "\t\t{:received-with-data/%ju} "
599	    "{N:/packet%s that had data}\n");
600	p(sctps_recvsacks, "\t\t{:received-sack-chunks/%ju} "
601	    "{N:/input SACK chunk%s}\n");
602	p(sctps_recvdata, "\t\t{:received-data-chunks/%ju} "
603	    "{N:/input DATA chunk%s}\n");
604	p(sctps_recvdupdata, "\t\t{:received-duplicate-data-chunks/%ju} "
605	    "{N:/duplicate DATA chunk%s}\n");
606	p(sctps_recvheartbeat, "\t\t{:received-hb-chunks/%ju} "
607	    "{N:/input HB chunk%s}\n");
608	p(sctps_recvheartbeatack, "\t\t{:received-hb-ack-chunks/%ju} "
609	    "{N:/HB-ACK chunk%s}\n");
610	p(sctps_recvecne, "\t\t{:received-ecne-chunks/%ju} "
611	    "{N:/input ECNE chunk%s}\n");
612	p(sctps_recvauth, "\t\t{:received-auth-chunks/%ju} "
613	    "{N:/input AUTH chunk%s}\n");
614	p(sctps_recvauthmissing, "\t\t{:dropped-missing-auth/%ju} "
615	    "{N:/chunk%s missing AUTH}\n");
616	p(sctps_recvivalhmacid, "\t\t{:dropped-invalid-hmac/%ju} "
617	    "{N:/invalid HMAC id%s received}\n");
618	p(sctps_recvivalkeyid, "\t\t{:dropped-invalid-secret/%ju} "
619	    "{N:/invalid secret id%s received}\n");
620	p1a(sctps_recvauthfailed, "\t\t{:dropped-auth-failed/%ju} "
621	    "{N:/auth failed}\n");
622	p1a(sctps_recvexpress, "\t\t{:received-fast-path/%ju} "
623	    "{N:/fast path receives all one chunk}\n");
624	p1a(sctps_recvexpressm, "\t\t{:receives-fast-path-multipart/%ju} "
625	    "{N:/fast path multi-part data}\n");
626
627	/*
628	 * output statistics
629	 */
630	p(sctps_sendpackets, "\t{:sent-packets/%ju} "
631	    "{N:/output packet%s}\n");
632	p(sctps_sendsacks, "\t\t{:sent-sacks/%ju} "
633	    "{N:/output SACK%s}\n");
634	p(sctps_senddata, "\t\t{:sent-data-chunks/%ju} "
635	    "{N:/output DATA chunk%s}\n");
636	p(sctps_sendretransdata, "\t\t{:sent-retransmitted-data-chunks/%ju} "
637	    "{N:/retransmitted DATA chunk%s}\n");
638	p(sctps_sendfastretrans, "\t\t"
639	    "{:sent-fast-retransmitted-data-chunks/%ju} "
640	    "{N:/fast retransmitted DATA chunk%s}\n");
641	p(sctps_sendmultfastretrans, "\t\t"
642	    "{:sent-fast-retransmitted-data-chunk-multiple-times/%ju} "
643	    "{N:/FR'%s that happened more than once to same chunk}\n");
644	p(sctps_sendheartbeat, "\t\t{:sent-hb-chunks/%ju} "
645	    "{N:/output HB chunk%s}\n");
646	p(sctps_sendecne, "\t\t{:sent-ecne-chunks/%ju} "
647	    "{N:/output ECNE chunk%s}\n");
648	p(sctps_sendauth, "\t\t{:sent-auth-chunks/%ju} "
649	    "{N:/output AUTH chunk%s}\n");
650	p1a(sctps_senderrors, "\t\t{:send-errors/%ju} "
651	    "{N:/ip_output error counter}\n");
652
653	/*
654	 * PCKDROPREP statistics
655	 */
656	xo_emit("\t{T:Packet drop statistics}:\n");
657	xo_open_container("drop-statistics");
658	p1a(sctps_pdrpfmbox, "\t\t{:middle-box/%ju} "
659	    "{N:/from middle box}\n");
660	p1a(sctps_pdrpfehos, "\t\t{:end-host/%ju} "
661	    "{N:/from end host}\n");
662	p1a(sctps_pdrpmbda, "\t\t{:with-data/%ju} "
663	    "{N:/with data}\n");
664	p1a(sctps_pdrpmbct, "\t\t{:non-data/%ju} "
665	    "{N:/non-data, non-endhost}\n");
666	p1a(sctps_pdrpbwrpt, "\t\t{:non-endhost/%ju} "
667	    "{N:/non-endhost, bandwidth rep only}\n");
668	p1a(sctps_pdrpcrupt, "\t\t{:short-header/%ju} "
669	    "{N:/not enough for chunk header}\n");
670	p1a(sctps_pdrpnedat, "\t\t{:short-data/%ju} "
671	    "{N:/not enough data to confirm}\n");
672	p1a(sctps_pdrppdbrk, "\t\t{:chunk-break/%ju} "
673	    "{N:/where process_chunk_drop said break}\n");
674	p1a(sctps_pdrptsnnf, "\t\t{:tsn-not-found/%ju} "
675	    "{N:/failed to find TSN}\n");
676	p1a(sctps_pdrpdnfnd, "\t\t{:reverse-tsn/%ju} "
677	    "{N:/attempt reverse TSN lookup}\n");
678	p1a(sctps_pdrpdiwnp, "\t\t{:confirmed-zero-window/%ju} "
679	    "{N:/e-host confirms zero-rwnd}\n");
680	p1a(sctps_pdrpdizrw, "\t\t{:middle-box-no-space/%ju} "
681	    "{N:/midbox confirms no space}\n");
682	p1a(sctps_pdrpbadd, "\t\t{:bad-data/%ju} "
683	    "{N:/data did not match TSN}\n");
684	p(sctps_pdrpmark, "\t\t{:tsn-marked-fast-retransmission/%ju} "
685	    "{N:/TSN'%s marked for Fast Retran}\n");
686	xo_close_container("drop-statistics");
687
688	/*
689	 * Timeouts
690	 */
691	xo_emit("\t{T:Timeouts}:\n");
692	xo_open_container("timeouts");
693	p(sctps_timoiterator, "\t\t{:iterator/%ju} "
694	    "{N:/iterator timer%s fired}\n");
695	p(sctps_timodata, "\t\t{:t3-data/%ju} "
696	    "{N:/T3 data time out%s}\n");
697	p(sctps_timowindowprobe, "\t\t{:window-probe/%ju} "
698	    "{N:/window probe (T3) timer%s fired}\n");
699	p(sctps_timoinit, "\t\t{:init-timer/%ju} "
700	    "{N:/INIT timer%s fired}\n");
701	p(sctps_timosack, "\t\t{:sack-timer/%ju} "
702	    "{N:/sack timer%s fired}\n");
703	p(sctps_timoshutdown, "\t\t{:shutdown-timer/%ju} "
704	    "{N:/shutdown timer%s fired}\n");
705	p(sctps_timoheartbeat, "\t\t{:heartbeat-timer/%ju} "
706	    "{N:/heartbeat timer%s fired}\n");
707	p1a(sctps_timocookie, "\t\t{:cookie-timer/%ju} "
708	    "{N:/a cookie timeout fired}\n");
709	p1a(sctps_timosecret, "\t\t{:endpoint-changed-cookie/%ju} "
710	    "{N:/an endpoint changed its cook}ie"
711	    "secret\n");
712	p(sctps_timopathmtu, "\t\t{:pmtu-timer/%ju} "
713	    "{N:/PMTU timer%s fired}\n");
714	p(sctps_timoshutdownack, "\t\t{:shutdown-timer/%ju} "
715	    "{N:/shutdown ack timer%s fired}\n");
716	p(sctps_timoshutdownguard, "\t\t{:shutdown-guard-timer/%ju} "
717	    "{N:/shutdown guard timer%s fired}\n");
718	p(sctps_timostrmrst, "\t\t{:stream-reset-timer/%ju} "
719	    "{N:/stream reset timer%s fired}\n");
720	p(sctps_timoearlyfr, "\t\t{:early-fast-retransmission-timer/%ju} "
721	    "{N:/early FR timer%s fired}\n");
722	p1a(sctps_timoasconf, "\t\t{:asconf-timer/%ju} "
723	    "{N:/an asconf timer fired}\n");
724	p1a(sctps_timoautoclose, "\t\t{:auto-close-timer/%ju} "
725	    "{N:/auto close timer fired}\n");
726	p(sctps_timoassockill, "\t\t{:asoc-free-timer/%ju} "
727	    "{N:/asoc free timer%s expired}\n");
728	p(sctps_timoinpkill, "\t\t{:input-free-timer/%ju} "
729	    "{N:/inp free timer%s expired}\n");
730	xo_close_container("timeouts");
731
732#if 0
733	/*
734	 * Early fast retransmission counters
735	 */
736	p(sctps_earlyfrstart, "\t%ju TODO:sctps_earlyfrstart\n");
737	p(sctps_earlyfrstop, "\t%ju TODO:sctps_earlyfrstop\n");
738	p(sctps_earlyfrmrkretrans, "\t%ju TODO:sctps_earlyfrmrkretrans\n");
739	p(sctps_earlyfrstpout, "\t%ju TODO:sctps_earlyfrstpout\n");
740	p(sctps_earlyfrstpidsck1, "\t%ju TODO:sctps_earlyfrstpidsck1\n");
741	p(sctps_earlyfrstpidsck2, "\t%ju TODO:sctps_earlyfrstpidsck2\n");
742	p(sctps_earlyfrstpidsck3, "\t%ju TODO:sctps_earlyfrstpidsck3\n");
743	p(sctps_earlyfrstpidsck4, "\t%ju TODO:sctps_earlyfrstpidsck4\n");
744	p(sctps_earlyfrstrid, "\t%ju TODO:sctps_earlyfrstrid\n");
745	p(sctps_earlyfrstrout, "\t%ju TODO:sctps_earlyfrstrout\n");
746	p(sctps_earlyfrstrtmr, "\t%ju TODO:sctps_earlyfrstrtmr\n");
747#endif
748
749	/*
750	 * Others
751	 */
752	p1a(sctps_hdrops, "\t{:dropped-too-short/%ju} "
753	    "{N:/packet shorter than header}\n");
754	p1a(sctps_badsum, "\t{:dropped-bad-checksum/%ju} "
755	    "{N:/checksum error}\n");
756	p1a(sctps_noport, "\t{:dropped-no-endpoint/%ju} "
757	    "{N:/no endpoint for port}\n");
758	p1a(sctps_badvtag, "\t{:dropped-bad-v-tag/%ju} "
759	    "{N:/bad v-tag}\n");
760	p1a(sctps_badsid, "\t{:dropped-bad-sid/%ju} "
761	    "{N:/bad SID}\n");
762	p1a(sctps_nomem, "\t{:dropped-no-memory/%ju} "
763	    "{N:/no memory}\n");
764	p1a(sctps_fastretransinrtt, "\t{:multiple-fast-retransmits-in-rtt/%ju} "
765	    "{N:/number of multiple FR in a RT}T window\n");
766#if 0
767	p(sctps_markedretrans, "\t%ju TODO:sctps_markedretrans\n");
768#endif
769	p1a(sctps_naglesent, "\t{:rfc813-sent/%ju} "
770	    "{N:/RFC813 allowed sending}\n");
771	p1a(sctps_naglequeued, "\t{:rfc813-queued/%ju} "
772	    "{N:/RFC813 does not allow sending}\n");
773	p1a(sctps_maxburstqueued, "\t{:max-burst-queued/%ju} "
774	    "{N:/times max burst prohibited sending}\n");
775	p1a(sctps_ifnomemqueued, "\t{:no-memory-in-interface/%ju} "
776	    "{N:/look ahead tells us no memory in interface}\n");
777	p(sctps_windowprobed, "\t{:sent-window-probes/%ju} "
778	    "{N:/number%s of window probes sent}\n");
779	p(sctps_lowlevelerr, "\t{:low-level-err/%ju} "
780	    "{N:/time%s an output error to clamp down on next user send}\n");
781	p(sctps_lowlevelerrusr, "\t{:low-level-user-error/%ju} "
782	    "{N:/time%s sctp_senderrors were caused from a user}\n");
783	p(sctps_datadropchklmt, "\t{:dropped-chunk-limit/%ju} "
784	    "{N:/number of in data drop%s due to chunk limit reached}\n");
785	p(sctps_datadroprwnd, "\t{:dropped-rwnd-limit/%ju} "
786	    "{N:/number of in data drop%s due to rwnd limit reached}\n");
787	p(sctps_ecnereducedcwnd, "\t{:ecn-reduced-cwnd/%ju} "
788	    "{N:/time%s a ECN reduced the cwnd}\n");
789	p1a(sctps_vtagexpress, "\t{:v-tag-express-lookup/%ju} "
790	    "{N:/used express lookup via vtag}\n");
791	p1a(sctps_vtagbogus, "\t{:v-tag-collision/%ju} "
792	    "{N:/collision in express lookup}\n");
793	p(sctps_primary_randry, "\t{:sender-ran-dry/%ju} "
794	    "{N:/time%s the sender ran dry of user data on primary}\n");
795	p1a(sctps_cmt_randry, "\t{:cmt-ran-dry/%ju} "
796	    "{N:/same for above}\n");
797	p(sctps_slowpath_sack, "\t{:slow-path-sack/%ju} "
798	    "{N:/sack%s the slow way}\n");
799	p(sctps_wu_sacks_sent, "\t{:sent-window-update-only-sack/%ju} "
800	    "{N:/window update only sack%s sent}\n");
801	p(sctps_sends_with_flags, "\t{:sent-with-sinfo/%ju} "
802	    "{N:/send%s with sinfo_flags !=0}\n");
803	p(sctps_sends_with_unord, "\t{:sent-with-unordered/%ju} "
804	    "{N:/unordered send%s}\n");
805	p(sctps_sends_with_eof, "\t{:sent-with-eof/%ju} "
806	    "{N:/send%s with EOF flag set}\n");
807	p(sctps_sends_with_abort, "\t{:sent-with-abort/%ju} "
808	    "{N:/send%s with ABORT flag set}\n");
809	p(sctps_protocol_drain_calls, "\t{:protocol-drain-called/%ju} "
810	    "{N:/time%s protocol drain called}\n");
811	p(sctps_protocol_drains_done, "\t{:protocol-drain/%ju} "
812	    "{N:/time%s we did a protocol drain}\n");
813	p(sctps_read_peeks, "\t{:read-with-peek/%ju} "
814	    "{N:/time%s recv was called with peek}\n");
815	p(sctps_cached_chk, "\t{:cached-chunks/%ju} "
816	    "{N:/cached chunk%s used}\n");
817	p1a(sctps_cached_strmoq, "\t{:cached-output-queue-used/%ju} "
818	    "{N:/cached stream oq's used}\n");
819	p(sctps_left_abandon, "\t{:messages-abandoned/%ju} "
820	    "{N:/unread message%s abandonded by close}\n");
821	p1a(sctps_send_burst_avoid, "\t{:send-burst-avoidance/%ju} "
822	    "{N:/send burst avoidance, already max burst inflight to net}\n");
823	p1a(sctps_send_cwnd_avoid, "\t{:send-cwnd-avoidance/%ju} "
824	    "{N:/send cwnd full avoidance, already max burst inflight "
825	    "to net}\n");
826	p(sctps_fwdtsn_map_over, "\t{:tsn-map-overruns/%ju} "
827	   "{N:/number of map array over-run%s via fwd-tsn's}\n");
828
829#undef p
830#undef p1a
831	xo_close_container(name);
832}
833
834#endif /* SCTP */
835