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