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