xref: /freebsd-12.1/sys/netinet/tcp_debug.c (revision 578d29dd)
1 /*
2  * Copyright (c) 1982, 1986, 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  *	@(#)tcp_debug.c	8.1 (Berkeley) 6/10/93
34  * $FreeBSD$
35  */
36 
37 #include "opt_inet.h"
38 #include "opt_tcpdebug.h"
39 
40 #ifndef INET
41 #error The option TCPDEBUG requires option INET.
42 #endif
43 
44 #ifdef TCPDEBUG
45 /* load symbolic names */
46 #define PRUREQUESTS
47 #define TCPSTATES
48 #define	TCPTIMERS
49 #define	TANAMES
50 #endif
51 
52 #include <sys/param.h>
53 #include <sys/systm.h>
54 #include <sys/protosw.h>
55 
56 #include <netinet/in.h>
57 #include <netinet/in_systm.h>
58 #include <netinet/ip_var.h>
59 #include <netinet/tcp.h>
60 #include <netinet/tcp_fsm.h>
61 #include <netinet/tcp_timer.h>
62 #include <netinet/tcp_var.h>
63 #include <netinet/tcpip.h>
64 #include <netinet/tcp_debug.h>
65 
66 #ifdef TCPDEBUG
67 static int	tcpconsdebug = 0;
68 #endif
69 
70 static struct tcp_debug tcp_debug[TCP_NDEBUG];
71 static int	tcp_debx;
72 
73 /*
74  * Tcp debug routines
75  */
76 void
77 tcp_trace(act, ostate, tp, ti, req)
78 	short act, ostate;
79 	struct tcpcb *tp;
80 	struct tcpiphdr *ti;
81 	int req;
82 {
83 	tcp_seq seq, ack;
84 	int len, flags;
85 	struct tcp_debug *td = &tcp_debug[tcp_debx++];
86 
87 	if (tcp_debx == TCP_NDEBUG)
88 		tcp_debx = 0;
89 	td->td_time = iptime();
90 	td->td_act = act;
91 	td->td_ostate = ostate;
92 	td->td_tcb = (caddr_t)tp;
93 	if (tp)
94 		td->td_cb = *tp;
95 	else
96 		bzero((caddr_t)&td->td_cb, sizeof (*tp));
97 	if (ti)
98 		td->td_ti = *ti;
99 	else
100 		bzero((caddr_t)&td->td_ti, sizeof (*ti));
101 	td->td_req = req;
102 #ifdef TCPDEBUG
103 	if (tcpconsdebug == 0)
104 		return;
105 	if (tp)
106 		printf("%p %s:", tp, tcpstates[ostate]);
107 	else
108 		printf("???????? ");
109 	printf("%s ", tanames[act]);
110 	switch (act) {
111 
112 	case TA_INPUT:
113 	case TA_OUTPUT:
114 	case TA_DROP:
115 		if (ti == 0)
116 			break;
117 		seq = ti->ti_seq;
118 		ack = ti->ti_ack;
119 		len = ti->ti_len;
120 		if (act == TA_OUTPUT) {
121 			seq = ntohl(seq);
122 			ack = ntohl(ack);
123 			len = ntohs((u_short)len);
124 		}
125 		if (act == TA_OUTPUT)
126 			len -= sizeof (struct tcphdr);
127 		if (len)
128 			printf("[%x..%x)", seq, seq+len);
129 		else
130 			printf("%x", seq);
131 		printf("@%x, urp=%x", ack, ti->ti_urp);
132 		flags = ti->ti_flags;
133 		if (flags) {
134 			char *cp = "<";
135 #define pf(f) {					\
136 	if (ti->ti_flags & TH_##f) {		\
137 		printf("%s%s", cp, #f);		\
138 		cp = ",";			\
139 	}					\
140 }
141 			pf(SYN); pf(ACK); pf(FIN); pf(RST); pf(PUSH); pf(URG);
142 			printf(">");
143 		}
144 		break;
145 
146 	case TA_USER:
147 		printf("%s", prurequests[req&0xff]);
148 		if ((req & 0xff) == PRU_SLOWTIMO)
149 			printf("<%s>", tcptimers[req>>8]);
150 		break;
151 	}
152 	if (tp)
153 		printf(" -> %s", tcpstates[tp->t_state]);
154 	/* print out internal state of tp !?! */
155 	printf("\n");
156 	if (tp == 0)
157 		return;
158 	printf(
159 	"\trcv_(nxt,wnd,up) (%lx,%lx,%lx) snd_(una,nxt,max) (%lx,%lx,%lx)\n",
160 	    (u_long)tp->rcv_nxt, tp->rcv_wnd, (u_long)tp->rcv_up,
161 	    (u_long)tp->snd_una, (u_long)tp->snd_nxt, (u_long)tp->snd_max);
162 	printf("\tsnd_(wl1,wl2,wnd) (%lx,%lx,%lx)\n",
163 	    (u_long)tp->snd_wl1, (u_long)tp->snd_wl2, tp->snd_wnd);
164 #endif /* TCPDEBUG */
165 }
166