1 /*	$OpenBSD: spx_debug.c,v 1.7 2003/06/02 23:28:16 millert Exp $	*/
2 
3 /*-
4  *
5  * Copyright (c) 1996 Michael Shalayeff
6  * Copyright (c) 1995, Mike Mitchell
7  * Copyright (c) 1984, 1985, 1986, 1987, 1993
8  *	The Regents of the University of California.  All rights reserved.
9  *
10  * Redistribution and use in source and binary forms, with or without
11  * modification, are permitted provided that the following conditions
12  * are met:
13  * 1. Redistributions of source code must retain the above copyright
14  *    notice, this list of conditions and the following disclaimer.
15  * 2. Redistributions in binary form must reproduce the above copyright
16  *    notice, this list of conditions and the following disclaimer in the
17  *    documentation and/or other materials provided with the distribution.
18  * 3. Neither the name of the University nor the names of its contributors
19  *    may be used to endorse or promote products derived from this software
20  *    without specific prior written permission.
21  *
22  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
23  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
24  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
25  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
26  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
27  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
28  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
29  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
30  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
31  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32  * SUCH DAMAGE.
33  *
34  *	@(#)spx_debug.c
35  *
36  * from FreeBSD Id: spx_debug.c,v 1.5 1996/03/11 15:13:58 davidg Exp
37  */
38 
39 #include <sys/param.h>
40 #include <sys/queue.h>
41 #include <sys/systm.h>
42 #include <sys/mbuf.h>
43 #include <sys/socket.h>
44 #include <sys/socketvar.h>
45 #define	PRUREQUESTS
46 #include <sys/protosw.h>
47 #include <sys/errno.h>
48 
49 #include <net/route.h>
50 #include <net/if.h>
51 #include <netinet/in_systm.h>
52 #define	TCPSTATES
53 #include <netinet/tcp_fsm.h>
54 
55 #include <netipx/ipx.h>
56 #include <netipx/ipx_pcb.h>
57 #include <netipx/ipx.h>
58 #include <netipx/ipx_var.h>
59 #include <netipx/spx.h>
60 #define SPXTIMERS
61 #include <netipx/spx_timer.h>
62 #include <netipx/spx_var.h>
63 #define	SANAMES
64 #include <netipx/spx_debug.h>
65 
66 int	spxconsdebug = 0;
67 
68 /*
69  * spx debug routines
70  */
71 void
spx_trace(act,ostate,sp,si,req)72 spx_trace(act, ostate, sp, si, req)
73 	short act;
74 	u_char ostate;
75 	struct spxpcb *sp;
76 	struct spx *si;
77 	int req;
78 {
79 #ifdef SPXDEBUG
80 	u_short seq, ack, len, alo;
81 	int flags;
82 	struct spx_debug *sd = &spx_debug[spx_debx++];
83 
84 	if (spx_debx == SPX_NDEBUG)
85 		spx_debx = 0;
86 	sd->sd_time = iptime();
87 	sd->sd_act = act;
88 	sd->sd_ostate = ostate;
89 	sd->sd_cb = (caddr_t)sp;
90 	if (sp)
91 		sd->sd_sp = *sp;
92 	else
93 		bzero((caddr_t)&sd->sd_sp, sizeof(*sp));
94 	if (si)
95 		sd->sd_si = *si;
96 	else
97 		bzero((caddr_t)&sd->sd_si, sizeof(*si));
98 	sd->sd_req = req;
99 	if (spxconsdebug == 0)
100 		return;
101 	if (ostate >= TCP_NSTATES) ostate = 0;
102 	if (act >= SA_DROP) act = SA_DROP;
103 	if (sp)
104 		printf("%x %s:", sp, tcpstates[ostate]);
105 	else
106 		printf("???????? ");
107 	printf("%s ", spxnames[act]);
108 	switch (act) {
109 
110 	case SA_RESPOND:
111 	case SA_INPUT:
112 	case SA_OUTPUT:
113 	case SA_DROP:
114 		if (si == 0)
115 			break;
116 		seq = si->si_seq;
117 		ack = si->si_ack;
118 		alo = si->si_alo;
119 		len = si->si_len;
120 		if (act == SA_OUTPUT) {
121 			seq = ntohs(seq);
122 			ack = ntohs(ack);
123 			alo = ntohs(alo);
124 			len = ntohs(len);
125 		}
126 #ifndef lint
127 #define p1(f)  { printf("%s = %x, ", "f", f); }
128 		p1(seq); p1(ack); p1(alo); p1(len);
129 #endif
130 		flags = si->si_cc;
131 		if (flags) {
132 			char *cp = "<";
133 #ifndef lint
134 #define pf(f) { if (flags & SPX_ ## f) { printf("%s%s", cp, "f"); cp = ","; } }
135 			pf(SP); pf(SA); pf(OB); pf(EM);
136 #else
137 			cp = cp;
138 #endif
139 			printf(">");
140 		}
141 #ifndef lint
142 #define p2(f)  { printf("%s = %x, ", "f", si->si_ ## f); }
143 		p2(sid);p2(did);p2(dt);p2(pt);
144 #endif
145 		ipx_printhost(&si->si_sna);
146 		ipx_printhost(&si->si_dna);
147 
148 		if (act==SA_RESPOND) {
149 			printf("ipx_len = %x, ",
150 				((struct ipx *)si)->ipx_len);
151 		}
152 		break;
153 
154 	case SA_USER:
155 		printf("%s", prurequests[req&0xff]);
156 		if ((req & 0xff) == PRU_SLOWTIMO)
157 			printf("<%s>", spxtimers[req>>8]);
158 		break;
159 	}
160 	if (sp)
161 		printf(" -> %s", tcpstates[sp->s_state]);
162 	/* print out internal state of sp !?! */
163 	printf("\n");
164 	if (sp == 0)
165 		return;
166 #ifndef lint
167 #define p3(f)  { printf("%s = %x, ", "f", sp->s_ ## f); }
168 	printf("\t"); p3(rack);p3(ralo);p3(smax);p3(flags); printf("\n");
169 #endif
170 #endif
171 }
172