xref: /netbsd-src/sys/netinet/tcp_debug.c (revision 1f2744e6e4915c9da2a3f980279398c4cf7d5e6d)
1 /*	$NetBSD: tcp_debug.c,v 1.8 1994/06/29 06:38:36 cgd Exp $	*/
2 
3 /*
4  * Copyright (c) 1982, 1986, 1993
5  *	The Regents of the University of California.  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
9  * are met:
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice, this list of conditions and the following disclaimer.
12  * 2. Redistributions in binary form must reproduce the above copyright
13  *    notice, this list of conditions and the following disclaimer in the
14  *    documentation and/or other materials provided with the distribution.
15  * 3. All advertising materials mentioning features or use of this software
16  *    must display the following acknowledgement:
17  *	This product includes software developed by the University of
18  *	California, Berkeley and its contributors.
19  * 4. Neither the name of the University nor the names of its contributors
20  *    may be used to endorse or promote products derived from this software
21  *    without specific prior written permission.
22  *
23  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33  * SUCH DAMAGE.
34  *
35  *	@(#)tcp_debug.c	8.1 (Berkeley) 6/10/93
36  */
37 
38 #ifdef TCPDEBUG
39 /* load symbolic names */
40 #define	PRUREQUESTS
41 #define	TCPSTATES
42 #define	TCPTIMERS
43 #define	TANAMES
44 #endif
45 
46 #include <sys/param.h>
47 #include <sys/systm.h>
48 #include <sys/mbuf.h>
49 #include <sys/socket.h>
50 #include <sys/socketvar.h>
51 #include <sys/protosw.h>
52 #include <sys/errno.h>
53 
54 #include <net/route.h>
55 #include <net/if.h>
56 
57 #include <netinet/in.h>
58 #include <netinet/in_systm.h>
59 #include <netinet/ip.h>
60 #include <netinet/in_pcb.h>
61 #include <netinet/ip_var.h>
62 #include <netinet/tcp.h>
63 #include <netinet/tcp_fsm.h>
64 #include <netinet/tcp_seq.h>
65 #include <netinet/tcp_timer.h>
66 #include <netinet/tcp_var.h>
67 #include <netinet/tcpip.h>
68 #include <netinet/tcp_debug.h>
69 
70 #ifdef TCPDEBUG
71 int	tcpconsdebug = 0;
72 #endif
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("%x %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 #ifndef lint
135 			char *cp = "<";
136 #define pf(f) { if (ti->ti_flags&TH_/**/f) { printf("%s%s", cp, "f"); cp = ","; } }
137 			pf(SYN); pf(ACK); pf(FIN); pf(RST); pf(PUSH); pf(URG);
138 #endif
139 			printf(">");
140 		}
141 		break;
142 
143 	case TA_USER:
144 		printf("%s", prurequests[req&0xff]);
145 		if ((req & 0xff) == PRU_SLOWTIMO)
146 			printf("<%s>", tcptimers[req>>8]);
147 		break;
148 	}
149 	if (tp)
150 		printf(" -> %s", tcpstates[tp->t_state]);
151 	/* print out internal state of tp !?! */
152 	printf("\n");
153 	if (tp == 0)
154 		return;
155 	printf("\trcv_(nxt,wnd,up) (%x,%x,%x) snd_(una,nxt,max) (%x,%x,%x)\n",
156 	    tp->rcv_nxt, tp->rcv_wnd, tp->rcv_up, tp->snd_una, tp->snd_nxt,
157 	    tp->snd_max);
158 	printf("\tsnd_(wl1,wl2,wnd) (%x,%x,%x)\n",
159 	    tp->snd_wl1, tp->snd_wl2, tp->snd_wnd);
160 #endif /* TCPDEBUG */
161 }
162