tcp_debug.c revision 56801
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: head/sys/netinet/tcp_debug.c 56801 2000-01-29 11:49:07Z shin $
35 */
36
37#include "opt_inet.h"
38#include "opt_inet6.h"
39#include "opt_tcpdebug.h"
40
41#ifndef INET
42#error The option TCPDEBUG requires option INET.
43#endif
44
45#ifdef TCPDEBUG
46/* load symbolic names */
47#define PRUREQUESTS
48#define TCPSTATES
49#define	TCPTIMERS
50#define	TANAMES
51#endif
52
53#include <sys/param.h>
54#include <sys/systm.h>
55#include <sys/protosw.h>
56#include <sys/socket.h>
57
58#include <netinet/in.h>
59#include <netinet/in_systm.h>
60#include <netinet/ip.h>
61#ifdef INET6
62#include <netinet6/ip6.h>
63#endif
64#include <netinet/ip_var.h>
65#include <netinet/tcp.h>
66#include <netinet/tcp_fsm.h>
67#include <netinet/tcp_timer.h>
68#include <netinet/tcp_var.h>
69#include <netinet/tcpip.h>
70#include <netinet/tcp_debug.h>
71
72#ifdef TCPDEBUG
73static int	tcpconsdebug = 0;
74#endif
75
76static struct tcp_debug tcp_debug[TCP_NDEBUG];
77static int	tcp_debx;
78
79/*
80 * Tcp debug routines
81 */
82void
83tcp_trace(act, ostate, tp, ipgen, th, req)
84	short act, ostate;
85	struct tcpcb *tp;
86	void *ipgen;
87	struct tcphdr *th;
88	int req;
89{
90#ifdef INET6
91	int isipv6;
92#endif /* INET6 */
93	tcp_seq seq, ack;
94	int len, flags;
95	struct tcp_debug *td = &tcp_debug[tcp_debx++];
96
97#ifdef INET6
98	isipv6 = (ipgen != NULL && ((struct ip *)ipgen)->ip_v == 6) ? 1 : 0;
99#endif /* INET6 */
100	td->td_family =
101#ifdef INET6
102		(isipv6 != 0) ? AF_INET6 :
103#endif
104		AF_INET;
105	if (tcp_debx == TCP_NDEBUG)
106		tcp_debx = 0;
107	td->td_time = iptime();
108	td->td_act = act;
109	td->td_ostate = ostate;
110	td->td_tcb = (caddr_t)tp;
111	if (tp)
112		td->td_cb = *tp;
113	else
114		bzero((caddr_t)&td->td_cb, sizeof (*tp));
115	if (ipgen) {
116		switch (td->td_family) {
117		case AF_INET:
118			bcopy((caddr_t)ipgen, (caddr_t)&td->td_ti.ti_i,
119			      sizeof(td->td_ti.ti_i));
120			bzero((caddr_t)td->td_ip6buf, sizeof(td->td_ip6buf));
121			break;
122#ifdef INET6
123		case AF_INET6:
124			bcopy((caddr_t)ipgen, (caddr_t)td->td_ip6buf,
125			      sizeof(td->td_ip6buf));
126			bzero((caddr_t)&td->td_ti.ti_i,
127			      sizeof(td->td_ti.ti_i));
128			break;
129#endif
130		default:
131			bzero((caddr_t)td->td_ip6buf, sizeof(td->td_ip6buf));
132			bzero((caddr_t)&td->td_ti.ti_i,
133			      sizeof(td->td_ti.ti_i));
134			break;
135		}
136	} else {
137		bzero((caddr_t)&td->td_ti.ti_i, sizeof(td->td_ti.ti_i));
138		bzero((caddr_t)td->td_ip6buf, sizeof(td->td_ip6buf));
139	}
140	if (th) {
141		switch (td->td_family) {
142		case AF_INET:
143			td->td_ti.ti_t = *th;
144			bzero((caddr_t)&td->td_ti6.th, sizeof(td->td_ti6.th));
145			break;
146#ifdef INET6
147		case AF_INET6:
148			td->td_ti6.th = *th;
149			bzero((caddr_t)&td->td_ti.ti_t,
150			      sizeof(td->td_ti.ti_t));
151			break;
152#endif
153		default:
154			bzero((caddr_t)&td->td_ti.ti_t,
155			      sizeof(td->td_ti.ti_t));
156			bzero((caddr_t)&td->td_ti6.th, sizeof(td->td_ti6.th));
157			break;
158		}
159	} else {
160		bzero((caddr_t)&td->td_ti.ti_t, sizeof(td->td_ti.ti_t));
161		bzero((caddr_t)&td->td_ti6.th, sizeof(td->td_ti6.th));
162	}
163	td->td_req = req;
164#ifdef TCPDEBUG
165	if (tcpconsdebug == 0)
166		return;
167	if (tp)
168		printf("%p %s:", tp, tcpstates[ostate]);
169	else
170		printf("???????? ");
171	printf("%s ", tanames[act]);
172	switch (act) {
173
174	case TA_INPUT:
175	case TA_OUTPUT:
176	case TA_DROP:
177		if (ipgen == NULL || th == NULL)
178			break;
179		seq = th->th_seq;
180		ack = th->th_ack;
181		len =
182#ifdef INET6
183			isipv6 ? ((struct ip6_hdr *)ipgen)->ip6_plen :
184#endif
185			((struct ip *)ipgen)->ip_len;
186		if (act == TA_OUTPUT) {
187			seq = ntohl(seq);
188			ack = ntohl(ack);
189			len = ntohs((u_short)len);
190		}
191		if (act == TA_OUTPUT)
192			len -= sizeof (struct tcphdr);
193		if (len)
194			printf("[%x..%x)", seq, seq+len);
195		else
196			printf("%x", seq);
197		printf("@%x, urp=%x", ack, th->th_urp);
198		flags = th->th_flags;
199		if (flags) {
200			char *cp = "<";
201#define pf(f) {					\
202	if (th->th_flags & TH_##f) {		\
203		printf("%s%s", cp, #f);		\
204		cp = ",";			\
205	}					\
206}
207			pf(SYN); pf(ACK); pf(FIN); pf(RST); pf(PUSH); pf(URG);
208			printf(">");
209		}
210		break;
211
212	case TA_USER:
213		printf("%s", prurequests[req&0xff]);
214		if ((req & 0xff) == PRU_SLOWTIMO)
215			printf("<%s>", tcptimers[req>>8]);
216		break;
217	}
218	if (tp)
219		printf(" -> %s", tcpstates[tp->t_state]);
220	/* print out internal state of tp !?! */
221	printf("\n");
222	if (tp == 0)
223		return;
224	printf(
225	"\trcv_(nxt,wnd,up) (%lx,%lx,%lx) snd_(una,nxt,max) (%lx,%lx,%lx)\n",
226	    (u_long)tp->rcv_nxt, tp->rcv_wnd, (u_long)tp->rcv_up,
227	    (u_long)tp->snd_una, (u_long)tp->snd_nxt, (u_long)tp->snd_max);
228	printf("\tsnd_(wl1,wl2,wnd) (%lx,%lx,%lx)\n",
229	    (u_long)tp->snd_wl1, (u_long)tp->snd_wl2, tp->snd_wnd);
230#endif /* TCPDEBUG */
231}
232