xref: /freebsd/contrib/tcpdump/print-ipx.c (revision 2e3507c25e42292b45a5482e116d278f5515d04d)
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 #ifdef HAVE_CONFIG_H
27 #include <config.h>
28 #endif
29 
30 #include "netdissect-stdinc.h"
31 
32 #include <stdio.h>
33 
34 #define ND_LONGJMP_FROM_TCHECK
35 #include "netdissect.h"
36 #include "addrtoname.h"
37 #include "extract.h"
38 
39 /* well-known sockets */
40 #define	IPX_SKT_NCP		0x0451
41 #define	IPX_SKT_SAP		0x0452
42 #define	IPX_SKT_RIP		0x0453
43 #define	IPX_SKT_NETBIOS		0x0455
44 #define	IPX_SKT_DIAGNOSTICS	0x0456
45 #define	IPX_SKT_NWLINK_DGM	0x0553	/* NWLink datagram, may contain SMB */
46 #define	IPX_SKT_EIGRP		0x85be	/* Cisco EIGRP over IPX */
47 
48 /* IPX transport header */
49 struct ipxHdr {
50     nd_uint16_t	cksum;		/* Checksum */
51     nd_uint16_t	length;		/* Length, in bytes, including header */
52     nd_uint8_t	tCtl;		/* Transport Control (i.e. hop count) */
53     nd_uint8_t	pType;		/* Packet Type (i.e. level 2 protocol) */
54     nd_uint32_t	dstNet;		/* destination net */
55     nd_mac_addr	dstNode;	/* destination node */
56     nd_uint16_t	dstSkt;		/* destination socket */
57     nd_uint32_t	srcNet;		/* source net */
58     nd_mac_addr	srcNode;	/* source node */
59     nd_uint16_t	srcSkt;		/* source socket */
60 };
61 
62 #define ipxSize	30
63 
64 static const char *ipxaddr_string(netdissect_options *, uint32_t, const u_char *);
65 static void ipx_decode(netdissect_options *, const struct ipxHdr *, const u_char *, u_int);
66 static void ipx_sap_print(netdissect_options *, const u_char *, u_int);
67 static void ipx_rip_print(netdissect_options *, const u_char *, u_int);
68 
69 /*
70  * Print IPX datagram packets.
71  */
72 void
73 ipx_print(netdissect_options *ndo, const u_char *p, u_int length)
74 {
75 	const struct ipxHdr *ipx = (const struct ipxHdr *)p;
76 
77 	ndo->ndo_protocol = "ipx";
78 	if (!ndo->ndo_eflag)
79 		ND_PRINT("IPX ");
80 
81 	ND_PRINT("%s.%04x > ",
82 		     ipxaddr_string(ndo, GET_BE_U_4(ipx->srcNet), ipx->srcNode),
83 		     GET_BE_U_2(ipx->srcSkt));
84 
85 	ND_PRINT("%s.%04x: ",
86 		     ipxaddr_string(ndo, GET_BE_U_4(ipx->dstNet), ipx->dstNode),
87 		     GET_BE_U_2(ipx->dstSkt));
88 
89 	/* take length from ipx header */
90 	length = GET_BE_U_2(ipx->length);
91 
92 	if (length < ipxSize) {
93 		ND_PRINT("[length %u < %u]", length, ipxSize);
94 		nd_print_invalid(ndo);
95 		return;
96 	}
97 	ipx_decode(ndo, ipx, p + ipxSize, length - ipxSize);
98 }
99 
100 static const char *
101 ipxaddr_string(netdissect_options *ndo, uint32_t net, const u_char *node)
102 {
103     static char line[256];
104 
105     snprintf(line, sizeof(line), "%08x.%02x:%02x:%02x:%02x:%02x:%02x",
106 	    net, GET_U_1(node), GET_U_1(node + 1),
107 	    GET_U_1(node + 2), GET_U_1(node + 3),
108 	    GET_U_1(node + 4), GET_U_1(node + 5));
109 
110     return line;
111 }
112 
113 static void
114 ipx_decode(netdissect_options *ndo, const struct ipxHdr *ipx, const u_char *datap, u_int length)
115 {
116     u_short dstSkt;
117 
118     dstSkt = GET_BE_U_2(ipx->dstSkt);
119     switch (dstSkt) {
120       case IPX_SKT_NCP:
121 	ND_PRINT("ipx-ncp %u", length);
122 	break;
123       case IPX_SKT_SAP:
124 	ipx_sap_print(ndo, datap, length);
125 	break;
126       case IPX_SKT_RIP:
127 	ipx_rip_print(ndo, datap, length);
128 	break;
129       case IPX_SKT_NETBIOS:
130 	ND_PRINT("ipx-netbios %u", length);
131 #ifdef ENABLE_SMB
132 	ipx_netbios_print(ndo, datap, length);
133 #endif
134 	break;
135       case IPX_SKT_DIAGNOSTICS:
136 	ND_PRINT("ipx-diags %u", length);
137 	break;
138       case IPX_SKT_NWLINK_DGM:
139 	ND_PRINT("ipx-nwlink-dgm %u", length);
140 #ifdef ENABLE_SMB
141 	ipx_netbios_print(ndo, datap, length);
142 #endif
143 	break;
144       case IPX_SKT_EIGRP:
145 	eigrp_print(ndo, datap, length);
146 	break;
147       default:
148 	ND_PRINT("ipx-#%x %u", dstSkt, length);
149 	break;
150     }
151 }
152 
153 static void
154 ipx_sap_print(netdissect_options *ndo, const u_char *ipx, u_int length)
155 {
156     int command, i;
157 
158     command = GET_BE_U_2(ipx);
159     ND_LCHECK_U(length, 2);
160     ipx += 2;
161     length -= 2;
162 
163     switch (command) {
164       case 1:
165       case 3:
166 	if (command == 1)
167 	    ND_PRINT("ipx-sap-req");
168 	else
169 	    ND_PRINT("ipx-sap-nearest-req");
170 
171 	ND_PRINT(" %s", ipxsap_string(ndo, htons(GET_BE_U_2(ipx))));
172 	break;
173 
174       case 2:
175       case 4:
176 	if (command == 2)
177 	    ND_PRINT("ipx-sap-resp");
178 	else
179 	    ND_PRINT("ipx-sap-nearest-resp");
180 
181 	for (i = 0; i < 8 && length != 0; i++) {
182 	    ND_TCHECK_2(ipx);
183 	    if (length < 2)
184 		goto invalid;
185 	    ND_PRINT(" %s '", ipxsap_string(ndo, htons(GET_BE_U_2(ipx))));
186 	    ipx += 2;
187 	    length -= 2;
188 	    if (length < 48) {
189 		ND_PRINT("'");
190 		goto invalid;
191 	    }
192 	    nd_printjnp(ndo, ipx, 48);
193 	    ND_PRINT("'");
194 	    ipx += 48;
195 	    length -= 48;
196 	    /*
197 	     * 10 bytes of IPX address.
198 	     */
199 	    ND_TCHECK_LEN(ipx, 10);
200 	    if (length < 10)
201 		goto invalid;
202 	    ND_PRINT(" addr %s",
203 		ipxaddr_string(ndo, GET_BE_U_4(ipx), ipx + 4));
204 	    ipx += 10;
205 	    length -= 10;
206 	    /*
207 	     * 2 bytes of socket and 2 bytes of number of intermediate
208 	     * networks.
209 	     */
210 	    ND_TCHECK_4(ipx);
211 	    if (length < 4)
212 		goto invalid;
213 	    ipx += 4;
214 	    length -= 4;
215 	}
216 	break;
217       default:
218 	ND_PRINT("ipx-sap-?%x", command);
219 	break;
220     }
221     return;
222 
223 invalid:
224     nd_print_invalid(ndo);
225 }
226 
227 static void
228 ipx_rip_print(netdissect_options *ndo, const u_char *ipx, u_int length)
229 {
230     int command, i;
231 
232     command = GET_BE_U_2(ipx);
233     ND_LCHECK_U(length, 2);
234     ipx += 2;
235     length -= 2;
236 
237     switch (command) {
238       case 1:
239 	ND_PRINT("ipx-rip-req");
240 	if (length != 0) {
241 	    if (length < 8)
242 		goto invalid;
243 	    ND_PRINT(" %08x/%u.%u", GET_BE_U_4(ipx),
244 			 GET_BE_U_2(ipx + 4), GET_BE_U_2(ipx + 6));
245 	}
246 	break;
247       case 2:
248 	ND_PRINT("ipx-rip-resp");
249 	for (i = 0; i < 50 && length != 0; i++) {
250 	    if (length < 8)
251 		goto invalid;
252 	    ND_PRINT(" %08x/%u.%u", GET_BE_U_4(ipx),
253 			 GET_BE_U_2(ipx + 4), GET_BE_U_2(ipx + 6));
254 
255 	    ipx += 8;
256 	    length -= 8;
257 	}
258 	break;
259       default:
260 	ND_PRINT("ipx-rip-?%x", command);
261 	break;
262     }
263     return;
264 
265 invalid:
266     nd_print_invalid(ndo);
267 }
268