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