Remove no longer needed catman periodic via 'make upgrade'.
[dragonfly.git] / sys / netinet / tcp_debug.c
blobd6fda5cd38240f7063294d468f909f64fbea1d65
1 /*
2 * Copyright (c) 1982, 1986, 1993
3 * The Regents of the University of California. All rights reserved.
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. Neither the name of the University nor the names of its contributors
14 * may be used to endorse or promote products derived from this software
15 * without specific prior written permission.
17 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
18 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
21 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27 * SUCH DAMAGE.
29 * @(#)tcp_debug.c 8.1 (Berkeley) 6/10/93
30 * $FreeBSD: src/sys/netinet/tcp_debug.c,v 1.16.2.1 2000/07/15 07:14:31 kris Exp $
33 #include "opt_inet.h"
34 #include "opt_inet6.h"
36 #ifndef INET
37 #error The option TCPDEBUG requires option INET.
38 #endif
40 /* load symbolic names */
41 #define PRUREQUESTS
42 #define TCPSTATES
43 #define TCPTIMERS
44 #define TANAMES
46 #include <sys/param.h>
47 #include <sys/systm.h>
48 #include <sys/protosw.h>
49 #include <sys/socket.h>
51 #include <net/netisr.h>
52 #include <net/netmsg.h>
54 #include <netinet/in.h>
55 #include <netinet/in_systm.h>
56 #include <netinet/ip.h>
57 #ifdef INET6
58 #include <netinet/ip6.h>
59 #endif
60 #include <netinet/ip_var.h>
61 #include <netinet/tcp.h>
62 #include <netinet/tcp_fsm.h>
63 #include <netinet/tcp_timer.h>
64 #include <netinet/tcp_var.h>
65 #include <netinet/tcpip.h>
66 #include <netinet/tcp_debug.h>
68 static int tcpconsdebug = 0;
69 static struct tcp_debug tcp_debug[TCP_NDEBUG];
70 static int tcp_debx;
73 * Tcp debug routines
75 void
76 tcp_trace(short act, short ostate, struct tcpcb *tp, void *ipgen,
77 struct tcphdr *th, int req)
79 #ifdef INET6
80 int isipv6;
81 #endif /* INET6 */
82 tcp_seq seq, ack;
83 int len, flags;
84 struct tcp_debug *td = &tcp_debug[tcp_debx++];
86 #ifdef INET6
87 isipv6 = (ipgen != NULL && ((struct ip *)ipgen)->ip_v == 6) ? 1 : 0;
88 #endif /* INET6 */
89 td->td_family =
90 #ifdef INET6
91 (isipv6 != 0) ? AF_INET6 :
92 #endif
93 AF_INET;
94 if (tcp_debx == TCP_NDEBUG)
95 tcp_debx = 0;
96 td->td_time = iptime();
97 td->td_act = act;
98 td->td_ostate = ostate;
99 td->td_tcb = (caddr_t)tp;
100 if (tp)
101 td->td_cb = *tp;
102 else
103 bzero(&td->td_cb, sizeof *tp);
104 if (ipgen) {
105 switch (td->td_family) {
106 case AF_INET:
107 bcopy(ipgen, &td->td_ti.ti_i, sizeof(td->td_ti.ti_i));
108 bzero(td->td_ip6buf, sizeof td->td_ip6buf);
109 break;
110 #ifdef INET6
111 case AF_INET6:
112 bcopy(ipgen, td->td_ip6buf, sizeof td->td_ip6buf);
113 bzero(&td->td_ti.ti_i, sizeof td->td_ti.ti_i);
114 break;
115 #endif
116 default:
117 bzero(td->td_ip6buf, sizeof td->td_ip6buf);
118 bzero(&td->td_ti.ti_i, sizeof td->td_ti.ti_i);
119 break;
121 } else {
122 bzero(&td->td_ti.ti_i, sizeof td->td_ti.ti_i);
123 bzero(td->td_ip6buf, sizeof td->td_ip6buf);
125 if (th) {
126 switch (td->td_family) {
127 case AF_INET:
128 td->td_ti.ti_t = *th;
129 bzero(&td->td_ti6.th, sizeof td->td_ti6.th);
130 break;
131 #ifdef INET6
132 case AF_INET6:
133 td->td_ti6.th = *th;
134 bzero(&td->td_ti.ti_t, sizeof td->td_ti.ti_t);
135 break;
136 #endif
137 default:
138 bzero(&td->td_ti.ti_t, sizeof td->td_ti.ti_t);
139 bzero(&td->td_ti6.th, sizeof td->td_ti6.th);
140 break;
142 } else {
143 bzero(&td->td_ti.ti_t, sizeof td->td_ti.ti_t);
144 bzero(&td->td_ti6.th, sizeof td->td_ti6.th);
146 td->td_req = req;
147 if (tcpconsdebug == 0)
148 return;
149 if (tp)
150 kprintf("%p %s:", tp, tcpstates[ostate]);
151 else
152 kprintf("???????? ");
153 kprintf("%s ", tanames[act]);
154 switch (act) {
156 case TA_INPUT:
157 case TA_OUTPUT:
158 case TA_DROP:
159 if (ipgen == NULL || th == NULL)
160 break;
161 seq = th->th_seq;
162 ack = th->th_ack;
163 len =
164 #ifdef INET6
165 isipv6 ? ((struct ip6_hdr *)ipgen)->ip6_plen :
166 #endif
167 ((struct ip *)ipgen)->ip_len;
168 if (act == TA_OUTPUT) {
169 seq = ntohl(seq);
170 ack = ntohl(ack);
171 len = ntohs((u_short)len);
173 if (act == TA_OUTPUT)
174 len -= sizeof(struct tcphdr);
175 if (len)
176 kprintf("[%x..%x)", seq, seq+len);
177 else
178 kprintf("%x", seq);
179 kprintf("@%x, urp=%x", ack, th->th_urp);
180 flags = th->th_flags;
181 if (flags) {
182 char *cp = "<";
183 #define pf(f) { \
184 if (th->th_flags & TH_##f) { \
185 kprintf("%s%s", cp, #f); \
186 cp = ","; \
189 pf(SYN); pf(ACK); pf(FIN); pf(RST); pf(PUSH); pf(URG);
190 kprintf(">");
192 break;
194 case TA_USER:
195 kprintf("%s", prurequests[req&0xff]);
196 if ((req & 0xff) == PRU_SLOWTIMO)
197 kprintf("<%s>", tcptimers[req>>8]);
198 break;
200 if (tp)
201 kprintf(" -> %s", tcpstates[tp->t_state]);
202 /* print out internal state of tp !?! */
203 kprintf("\n");
204 if (tp == NULL)
205 return;
206 kprintf(
207 "\trcv_(nxt,wnd,up) (%lx,%lx,%lx) snd_(una,nxt,max) (%lx,%lx,%lx)\n",
208 (u_long)tp->rcv_nxt, tp->rcv_wnd, (u_long)tp->rcv_up,
209 (u_long)tp->snd_una, (u_long)tp->snd_nxt, (u_long)tp->snd_max);
210 kprintf("\tsnd_(wl1,wl2,wnd) (%lx,%lx,%lx)\n",
211 (u_long)tp->snd_wl1, (u_long)tp->snd_wl2, tp->snd_wnd);