xref: /freebsd/contrib/tcpdump/print-ipx.c (revision 87b759f0fa1f7554d50ce640c40138512bbded44)
1 /*
2  * Copyright (c) 1994, 1995, 1996
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: (1) source code distributions
7  * retain the above copyright notice and this paragraph in its entirety, (2)
8  * distributions including binary code include the above copyright notice and
9  * this paragraph in its entirety in the documentation or other materials
10  * provided with the distribution, and (3) all advertising materials mentioning
11  * features or use of this software display the following acknowledgement:
12  * ``This product includes software developed by the University of California,
13  * Lawrence Berkeley Laboratory and its contributors.'' Neither the name of
14  * the University nor the names of its contributors may be used to endorse
15  * or promote products derived from this software without specific prior
16  * written permission.
17  * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR IMPLIED
18  * WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF
19  * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
20  *
21  * Contributed by Brad Parker (brad@fcr.com).
22  */
23 
24 /* \summary: Novell IPX printer */
25 
26 #include <config.h>
27 
28 #include "netdissect-stdinc.h"
29 
30 #include <stdio.h>
31 
32 #define ND_LONGJMP_FROM_TCHECK
33 #include "netdissect.h"
34 #include "addrtoname.h"
35 #include "extract.h"
36 
37 /* well-known sockets */
38 #define	IPX_SKT_NCP		0x0451
39 #define	IPX_SKT_SAP		0x0452
40 #define	IPX_SKT_RIP		0x0453
41 #define	IPX_SKT_NETBIOS		0x0455
42 #define	IPX_SKT_DIAGNOSTICS	0x0456
43 #define	IPX_SKT_NWLINK_DGM	0x0553	/* NWLink datagram, may contain SMB */
44 #define	IPX_SKT_EIGRP		0x85be	/* Cisco EIGRP over IPX */
45 
46 /* IPX transport header */
47 struct ipxHdr {
48     nd_uint16_t	cksum;		/* Checksum */
49     nd_uint16_t	length;		/* Length, in bytes, including header */
50     nd_uint8_t	tCtl;		/* Transport Control (i.e. hop count) */
51     nd_uint8_t	pType;		/* Packet Type (i.e. level 2 protocol) */
52     nd_uint32_t	dstNet;		/* destination net */
53     nd_mac_addr	dstNode;	/* destination node */
54     nd_uint16_t	dstSkt;		/* destination socket */
55     nd_uint32_t	srcNet;		/* source net */
56     nd_mac_addr	srcNode;	/* source node */
57     nd_uint16_t	srcSkt;		/* source socket */
58 };
59 
60 #define ipxSize	30
61 
62 static const char *ipxaddr_string(netdissect_options *, uint32_t, const u_char *);
63 static void ipx_decode(netdissect_options *, const struct ipxHdr *, const u_char *, u_int);
64 static void ipx_sap_print(netdissect_options *, const u_char *, u_int);
65 static void ipx_rip_print(netdissect_options *, const u_char *, u_int);
66 
67 /*
68  * Print IPX datagram packets.
69  */
70 void
71 ipx_print(netdissect_options *ndo, const u_char *p, u_int length)
72 {
73 	const struct ipxHdr *ipx = (const struct ipxHdr *)p;
74 
75 	ndo->ndo_protocol = "ipx";
76 	if (!ndo->ndo_eflag)
77 		ND_PRINT("IPX ");
78 
79 	ND_PRINT("%s.%04x > ",
80 		     ipxaddr_string(ndo, GET_BE_U_4(ipx->srcNet), ipx->srcNode),
81 		     GET_BE_U_2(ipx->srcSkt));
82 
83 	ND_PRINT("%s.%04x: ",
84 		     ipxaddr_string(ndo, GET_BE_U_4(ipx->dstNet), ipx->dstNode),
85 		     GET_BE_U_2(ipx->dstSkt));
86 
87 	/* take length from ipx header */
88 	length = GET_BE_U_2(ipx->length);
89 
90 	if (length < ipxSize) {
91 		ND_PRINT("[length %u < %u]", length, ipxSize);
92 		nd_print_invalid(ndo);
93 		return;
94 	}
95 	ipx_decode(ndo, ipx, p + ipxSize, length - ipxSize);
96 }
97 
98 static const char *
99 ipxaddr_string(netdissect_options *ndo, uint32_t net, const u_char *node)
100 {
101     static char line[256];
102 
103     snprintf(line, sizeof(line), "%08x.%02x:%02x:%02x:%02x:%02x:%02x",
104 	    net, GET_U_1(node), GET_U_1(node + 1),
105 	    GET_U_1(node + 2), GET_U_1(node + 3),
106 	    GET_U_1(node + 4), GET_U_1(node + 5));
107 
108     return line;
109 }
110 
111 static void
112 ipx_decode(netdissect_options *ndo, const struct ipxHdr *ipx, const u_char *datap, u_int length)
113 {
114     u_short dstSkt;
115 
116     dstSkt = GET_BE_U_2(ipx->dstSkt);
117     switch (dstSkt) {
118       case IPX_SKT_NCP:
119 	ND_PRINT("ipx-ncp %u", length);
120 	break;
121       case IPX_SKT_SAP:
122 	ipx_sap_print(ndo, datap, length);
123 	break;
124       case IPX_SKT_RIP:
125 	ipx_rip_print(ndo, datap, length);
126 	break;
127       case IPX_SKT_NETBIOS:
128 	ND_PRINT("ipx-netbios %u", length);
129 #ifdef ENABLE_SMB
130 	ipx_netbios_print(ndo, datap, length);
131 #endif
132 	break;
133       case IPX_SKT_DIAGNOSTICS:
134 	ND_PRINT("ipx-diags %u", length);
135 	break;
136       case IPX_SKT_NWLINK_DGM:
137 	ND_PRINT("ipx-nwlink-dgm %u", length);
138 #ifdef ENABLE_SMB
139 	ipx_netbios_print(ndo, datap, length);
140 #endif
141 	break;
142       case IPX_SKT_EIGRP:
143 	eigrp_print(ndo, datap, length);
144 	break;
145       default:
146 	ND_PRINT("ipx-#%x %u", dstSkt, length);
147 	break;
148     }
149 }
150 
151 static void
152 ipx_sap_print(netdissect_options *ndo, const u_char *ipx, u_int length)
153 {
154     int command, i;
155 
156     command = GET_BE_U_2(ipx);
157     ND_ICHECK_U(length, <, 2);
158     ipx += 2;
159     length -= 2;
160 
161     switch (command) {
162       case 1:
163       case 3:
164 	if (command == 1)
165 	    ND_PRINT("ipx-sap-req");
166 	else
167 	    ND_PRINT("ipx-sap-nearest-req");
168 
169 	ND_PRINT(" %s", ipxsap_string(ndo, htons(GET_BE_U_2(ipx))));
170 	break;
171 
172       case 2:
173       case 4:
174 	if (command == 2)
175 	    ND_PRINT("ipx-sap-resp");
176 	else
177 	    ND_PRINT("ipx-sap-nearest-resp");
178 
179 	for (i = 0; i < 8 && length != 0; i++) {
180 	    ND_TCHECK_2(ipx);
181 	    if (length < 2)
182 		goto invalid;
183 	    ND_PRINT(" %s '", ipxsap_string(ndo, htons(GET_BE_U_2(ipx))));
184 	    ipx += 2;
185 	    length -= 2;
186 	    if (length < 48) {
187 		ND_PRINT("'");
188 		goto invalid;
189 	    }
190 	    nd_printjnp(ndo, ipx, 48);
191 	    ND_PRINT("'");
192 	    ipx += 48;
193 	    length -= 48;
194 	    /*
195 	     * 10 bytes of IPX address.
196 	     */
197 	    ND_TCHECK_LEN(ipx, 10);
198 	    if (length < 10)
199 		goto invalid;
200 	    ND_PRINT(" addr %s",
201 		ipxaddr_string(ndo, GET_BE_U_4(ipx), ipx + 4));
202 	    ipx += 10;
203 	    length -= 10;
204 	    /*
205 	     * 2 bytes of socket and 2 bytes of number of intermediate
206 	     * networks.
207 	     */
208 	    ND_TCHECK_4(ipx);
209 	    if (length < 4)
210 		goto invalid;
211 	    ipx += 4;
212 	    length -= 4;
213 	}
214 	break;
215       default:
216 	ND_PRINT("ipx-sap-?%x", command);
217 	break;
218     }
219     return;
220 
221 invalid:
222     nd_print_invalid(ndo);
223 }
224 
225 static void
226 ipx_rip_print(netdissect_options *ndo, const u_char *ipx, u_int length)
227 {
228     int command, i;
229 
230     command = GET_BE_U_2(ipx);
231     ND_ICHECK_U(length, <, 2);
232     ipx += 2;
233     length -= 2;
234 
235     switch (command) {
236       case 1:
237 	ND_PRINT("ipx-rip-req");
238 	if (length != 0) {
239 	    if (length < 8)
240 		goto invalid;
241 	    ND_PRINT(" %08x/%u.%u", GET_BE_U_4(ipx),
242 			 GET_BE_U_2(ipx + 4), GET_BE_U_2(ipx + 6));
243 	}
244 	break;
245       case 2:
246 	ND_PRINT("ipx-rip-resp");
247 	for (i = 0; i < 50 && length != 0; i++) {
248 	    if (length < 8)
249 		goto invalid;
250 	    ND_PRINT(" %08x/%u.%u", GET_BE_U_4(ipx),
251 			 GET_BE_U_2(ipx + 4), GET_BE_U_2(ipx + 6));
252 
253 	    ipx += 8;
254 	    length -= 8;
255 	}
256 	break;
257       default:
258 	ND_PRINT("ipx-rip-?%x", command);
259 	break;
260     }
261     return;
262 
263 invalid:
264     nd_print_invalid(ndo);
265 }
266