Home | History | Annotate | Line # | Download | only in netinet
tcp_debug.c revision 1.31
      1 /*	$NetBSD: tcp_debug.c,v 1.31 2018/03/29 07:46:43 maxv Exp $	*/
      2 
      3 /*
      4  * Copyright (C) 1995, 1996, 1997, and 1998 WIDE Project.
      5  * 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. Neither the name of the project nor the names of its contributors
     16  *    may be used to endorse or promote products derived from this software
     17  *    without specific prior written permission.
     18  *
     19  * THIS SOFTWARE IS PROVIDED BY THE PROJECT AND CONTRIBUTORS ``AS IS'' AND
     20  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     21  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     22  * ARE DISCLAIMED.  IN NO EVENT SHALL THE PROJECT OR CONTRIBUTORS BE LIABLE
     23  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     24  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     25  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     26  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     27  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     28  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     29  * SUCH DAMAGE.
     30  */
     31 
     32 /*
     33  * Copyright (c) 1982, 1986, 1993
     34  *	The Regents of the University of California.  All rights reserved.
     35  *
     36  * Redistribution and use in source and binary forms, with or without
     37  * modification, are permitted provided that the following conditions
     38  * are met:
     39  * 1. Redistributions of source code must retain the above copyright
     40  *    notice, this list of conditions and the following disclaimer.
     41  * 2. Redistributions in binary form must reproduce the above copyright
     42  *    notice, this list of conditions and the following disclaimer in the
     43  *    documentation and/or other materials provided with the distribution.
     44  * 3. Neither the name of the University nor the names of its contributors
     45  *    may be used to endorse or promote products derived from this software
     46  *    without specific prior written permission.
     47  *
     48  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     49  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     50  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     51  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     52  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     53  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     54  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     55  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     56  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     57  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     58  * SUCH DAMAGE.
     59  *
     60  *	@(#)tcp_debug.c	8.1 (Berkeley) 6/10/93
     61  */
     62 
     63 #include <sys/cdefs.h>
     64 __KERNEL_RCSID(0, "$NetBSD: tcp_debug.c,v 1.31 2018/03/29 07:46:43 maxv Exp $");
     65 
     66 #ifdef _KERNEL_OPT
     67 #include "opt_inet.h"
     68 #include "opt_tcp_debug.h"
     69 #endif
     70 
     71 /* load symbolic names */
     72 #define	PRUREQUESTS
     73 #define	TCPSTATES
     74 #define	TCPTIMERS
     75 #define	TANAMES
     76 
     77 #include <sys/param.h>
     78 #include <sys/systm.h>
     79 #include <sys/mbuf.h>
     80 #include <sys/socket.h>
     81 #include <sys/socketvar.h>
     82 #include <sys/protosw.h>
     83 #include <sys/errno.h>
     84 
     85 #include <net/if.h>
     86 
     87 #include <netinet/in.h>
     88 #include <netinet/in_systm.h>
     89 #include <netinet/ip.h>
     90 #include <netinet/in_pcb.h>
     91 #include <netinet/ip_var.h>
     92 
     93 #ifdef INET6
     94 #include <netinet/ip6.h>
     95 #endif
     96 
     97 #include <netinet/tcp.h>
     98 #include <netinet/tcp_fsm.h>
     99 #include <netinet/tcp_seq.h>
    100 #include <netinet/tcp_timer.h>
    101 #include <netinet/tcp_var.h>
    102 #include <netinet/tcpip.h>
    103 #include <netinet/tcp_debug.h>
    104 
    105 struct	tcp_debug tcp_debug[TCP_NDEBUG];
    106 int	tcp_debx;
    107 int	tcpconsdebug = 0;
    108 /*
    109  * Tcp debug routines
    110  */
    111 void
    112 tcp_trace(short act, short ostate, struct tcpcb *tp, struct mbuf *m, int req)
    113 {
    114 	tcp_seq seq, ack;
    115 	int len, flags;
    116 	struct tcphdr *th;
    117 	struct tcp_debug *td = &tcp_debug[tcp_debx++];
    118 
    119 	if (tcp_debx == TCP_NDEBUG)
    120 		tcp_debx = 0;
    121 	td->td_time = iptime();
    122 	td->td_act = act;
    123 	td->td_ostate = ostate;
    124 	td->td_tcb = (void *)tp;
    125 	if (tp)
    126 		td->td_cb = *tp;
    127 	else
    128 		memset((void *)&td->td_cb, 0, sizeof (*tp));
    129 	td->td_family = tp->t_family;
    130 	memset((void *)&td->td_ti, 0, sizeof (td->td_ti));
    131 #ifdef INET6
    132 	memset((void *)&td->td_ti6, 0, sizeof (td->td_ti6));
    133 #endif
    134 	th = NULL;
    135 	if (m) {
    136 		struct ip *ip;
    137 		ip = mtod(m, struct ip *);
    138 		switch (ip->ip_v) {
    139 		case 4:
    140 			if (m->m_len < sizeof(td->td_ti))
    141 				break;
    142 			memcpy(&td->td_ti, mtod(m, void *), sizeof(td->td_ti));
    143 			th = (struct tcphdr *)((char *)&td->td_ti +
    144 			    sizeof(struct ip));
    145 			break;
    146 #ifdef INET6
    147 		case 6:
    148 			if (m->m_len < sizeof(td->td_ti6))
    149 				break;
    150 			memcpy(&td->td_ti6, mtod(m, void *),
    151 				sizeof(td->td_ti6));
    152 			th = (struct tcphdr *)((char *)&td->td_ti6 +
    153 			    sizeof(struct ip6_hdr));
    154 			break;
    155 #endif
    156 		}
    157 	}
    158 	td->td_req = req;
    159 	if (tcpconsdebug == 0)
    160 		return;
    161 	if (tp)
    162 		printf("%p %s:", tp, tcpstates[ostate]);
    163 	else
    164 		printf("???????? ");
    165 	printf("%s ", tanames[act]);
    166 	switch (act) {
    167 
    168 	case TA_INPUT:
    169 	case TA_OUTPUT:
    170 	case TA_DROP:
    171 		if (th == 0)
    172 			break;
    173 		seq = th->th_seq;
    174 		ack = th->th_ack;
    175 		len = m->m_pkthdr.len;
    176 		if (act == TA_OUTPUT) {
    177 			seq = ntohl(seq);
    178 			ack = ntohl(ack);
    179 			len = ntohs((u_int16_t)len);
    180 		}
    181 		if (act == TA_OUTPUT)
    182 			len -= sizeof (struct tcphdr);
    183 		if (len)
    184 			printf("[%x..%x)", seq, seq+len);
    185 		else
    186 			printf("%x", seq);
    187 		printf("@%x, urp=%x", ack, th->th_urp);
    188 		flags = th->th_flags;
    189 		if (flags) {
    190 #ifndef lint
    191 			const char *cp = "<";
    192 #define pf(f) { if (th->th_flags&__CONCAT(TH_,f)) { \
    193 	printf("%s%s", cp, "f"); cp = ","; } }
    194 			pf(SYN); pf(ACK); pf(FIN); pf(RST); pf(PUSH); pf(URG);
    195 #endif
    196 			printf(">");
    197 		}
    198 		break;
    199 
    200 	case TA_USER:
    201 		printf("%s", prurequests[req&0xff]);
    202 		if ((req & 0xff) == PRU_SLOWTIMO)
    203 			printf("<%s>", tcptimers[req>>8]);
    204 		break;
    205 	}
    206 	if (tp)
    207 		printf(" -> %s", tcpstates[tp->t_state]);
    208 	/* print out internal state of tp !?! */
    209 	printf("\n");
    210 	if (tp == 0)
    211 		return;
    212 	printf("\trcv_(nxt,wnd,up) (%x,%lx,%x) snd_(una,nxt,max) (%x,%x,%x)\n",
    213 	    tp->rcv_nxt, tp->rcv_wnd, tp->rcv_up, tp->snd_una, tp->snd_nxt,
    214 	    tp->snd_max);
    215 	printf("\tsnd_(wl1,wl2,wnd) (%x,%x,%lx)\n",
    216 	    tp->snd_wl1, tp->snd_wl2, tp->snd_wnd);
    217 }
    218