xref: /freebsd/contrib/tcpdump/print-arcnet.c (revision 0b3105a37d7adcadcb720112fed4dc4e8040be99)
1 /*
2  * Copyright (c) 1988, 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1996, 1997
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  * From: NetBSD: print-arcnet.c,v 1.2 2000/04/24 13:02:28 itojun Exp
22  */
23 
24 #define NETDISSECT_REWORKED
25 #ifdef HAVE_CONFIG_H
26 #include "config.h"
27 #endif
28 
29 #include <tcpdump-stdinc.h>
30 
31 #include "interface.h"
32 #include "extract.h"
33 
34 /*
35  * from: NetBSD: if_arc.h,v 1.13 1999/11/19 20:41:19 thorpej Exp
36  */
37 
38 /*
39  * Structure of a 2.5MB/s Arcnet header on the BSDs,
40  * as given to interface code.
41  */
42 struct	arc_header {
43 	uint8_t  arc_shost;
44 	uint8_t  arc_dhost;
45 	uint8_t  arc_type;
46 	/*
47 	 * only present for newstyle encoding with LL fragmentation.
48 	 * Don't use sizeof(anything), use ARC_HDR{,NEW}LEN instead.
49 	 */
50 	uint8_t  arc_flag;
51 	uint16_t arc_seqid;
52 
53 	/*
54 	 * only present in exception packets (arc_flag == 0xff)
55 	 */
56 	uint8_t  arc_type2;	/* same as arc_type */
57 	uint8_t  arc_flag2;	/* real flag value */
58 	uint16_t arc_seqid2;	/* real seqid value */
59 };
60 
61 #define	ARC_HDRLEN		3
62 #define	ARC_HDRNEWLEN		6
63 #define	ARC_HDRNEWLEN_EXC	10
64 
65 /* RFC 1051 */
66 #define	ARCTYPE_IP_OLD		240	/* IP protocol */
67 #define	ARCTYPE_ARP_OLD		241	/* address resolution protocol */
68 
69 /* RFC 1201 */
70 #define	ARCTYPE_IP		212	/* IP protocol */
71 #define	ARCTYPE_ARP		213	/* address resolution protocol */
72 #define	ARCTYPE_REVARP		214	/* reverse addr resolution protocol */
73 
74 #define	ARCTYPE_ATALK		221	/* Appletalk */
75 #define	ARCTYPE_BANIAN		247	/* Banyan Vines */
76 #define	ARCTYPE_IPX		250	/* Novell IPX */
77 
78 #define ARCTYPE_INET6		0xc4	/* IPng */
79 #define ARCTYPE_DIAGNOSE	0x80	/* as per ANSI/ATA 878.1 */
80 
81 /*
82  * Structure of a 2.5MB/s Arcnet header on Linux.  Linux has
83  * an extra "offset" field when given to interface code, and
84  * never presents packets that look like exception frames.
85  */
86 struct	arc_linux_header {
87 	uint8_t  arc_shost;
88 	uint8_t  arc_dhost;
89 	uint16_t arc_offset;
90 	uint8_t  arc_type;
91 	/*
92 	 * only present for newstyle encoding with LL fragmentation.
93 	 * Don't use sizeof(anything), use ARC_LINUX_HDR{,NEW}LEN
94 	 * instead.
95 	 */
96 	uint8_t  arc_flag;
97 	uint16_t arc_seqid;
98 };
99 
100 #define	ARC_LINUX_HDRLEN	5
101 #define	ARC_LINUX_HDRNEWLEN	8
102 
103 static int arcnet_encap_print(netdissect_options *, u_char arctype, const u_char *p,
104     u_int length, u_int caplen);
105 
106 static const struct tok arctypemap[] = {
107 	{ ARCTYPE_IP_OLD,	"oldip" },
108 	{ ARCTYPE_ARP_OLD,	"oldarp" },
109 	{ ARCTYPE_IP,		"ip" },
110 	{ ARCTYPE_ARP,		"arp" },
111 	{ ARCTYPE_REVARP,	"rarp" },
112 	{ ARCTYPE_ATALK,	"atalk" },
113 	{ ARCTYPE_BANIAN,	"banyan" },
114 	{ ARCTYPE_IPX,		"ipx" },
115 	{ ARCTYPE_INET6,	"ipv6" },
116 	{ ARCTYPE_DIAGNOSE,	"diag" },
117 	{ 0, 0 }
118 };
119 
120 static inline void
121 arcnet_print(netdissect_options *ndo, const u_char *bp, u_int length, int phds,
122              int flag, u_int seqid)
123 {
124 	const struct arc_header *ap;
125 	const char *arctypename;
126 
127 
128 	ap = (const struct arc_header *)bp;
129 
130 
131 	if (ndo->ndo_qflag) {
132 		ND_PRINT((ndo, "%02x %02x %d: ",
133 			     ap->arc_shost,
134 			     ap->arc_dhost,
135 			     length));
136 		return;
137 	}
138 
139 	arctypename = tok2str(arctypemap, "%02x", ap->arc_type);
140 
141 	if (!phds) {
142 		ND_PRINT((ndo, "%02x %02x %s %d: ",
143 			     ap->arc_shost, ap->arc_dhost, arctypename,
144 			     length));
145 			     return;
146 	}
147 
148 	if (flag == 0) {
149 		ND_PRINT((ndo, "%02x %02x %s seqid %04x %d: ",
150 			ap->arc_shost, ap->arc_dhost, arctypename, seqid,
151 			length));
152 			return;
153 	}
154 
155 	if (flag & 1)
156 		ND_PRINT((ndo, "%02x %02x %s seqid %04x "
157 			"(first of %d fragments) %d: ",
158 			ap->arc_shost, ap->arc_dhost, arctypename, seqid,
159 			(flag + 3) / 2, length));
160 	else
161 		ND_PRINT((ndo, "%02x %02x %s seqid %04x "
162 			"(fragment %d) %d: ",
163 			ap->arc_shost, ap->arc_dhost, arctypename, seqid,
164 			flag/2 + 1, length));
165 }
166 
167 /*
168  * This is the top level routine of the printer.  'p' points
169  * to the ARCNET header of the packet, 'h->ts' is the timestamp,
170  * 'h->len' is the length of the packet off the wire, and 'h->caplen'
171  * is the number of bytes actually captured.
172  */
173 u_int
174 arcnet_if_print(netdissect_options *ndo, const struct pcap_pkthdr *h, const u_char *p)
175 {
176 	u_int caplen = h->caplen;
177 	u_int length = h->len;
178 	const struct arc_header *ap;
179 
180 	int phds, flag = 0, archdrlen = 0;
181 	u_int seqid = 0;
182 	u_char arc_type;
183 
184 	if (caplen < ARC_HDRLEN || length < ARC_HDRLEN) {
185 		ND_PRINT((ndo, "[|arcnet]"));
186 		return (caplen);
187 	}
188 
189 	ap = (const struct arc_header *)p;
190 	arc_type = ap->arc_type;
191 
192 	switch (arc_type) {
193 	default:
194 		phds = 1;
195 		break;
196 	case ARCTYPE_IP_OLD:
197 	case ARCTYPE_ARP_OLD:
198 	case ARCTYPE_DIAGNOSE:
199 		phds = 0;
200 		archdrlen = ARC_HDRLEN;
201 		break;
202 	}
203 
204 	if (phds) {
205 		if (caplen < ARC_HDRNEWLEN || length < ARC_HDRNEWLEN) {
206 			arcnet_print(ndo, p, length, 0, 0, 0);
207 			ND_PRINT((ndo, "[|phds]"));
208 			return (caplen);
209 		}
210 
211 		if (ap->arc_flag == 0xff) {
212 			if (caplen < ARC_HDRNEWLEN_EXC || length < ARC_HDRNEWLEN_EXC) {
213 				arcnet_print(ndo, p, length, 0, 0, 0);
214 				ND_PRINT((ndo, "[|phds extended]"));
215 				return (caplen);
216 			}
217 			flag = ap->arc_flag2;
218 			seqid = EXTRACT_16BITS(&ap->arc_seqid2);
219 			archdrlen = ARC_HDRNEWLEN_EXC;
220 		} else {
221 			flag = ap->arc_flag;
222 			seqid = EXTRACT_16BITS(&ap->arc_seqid);
223 			archdrlen = ARC_HDRNEWLEN;
224 		}
225 	}
226 
227 
228 	if (ndo->ndo_eflag)
229 		arcnet_print(ndo, p, length, phds, flag, seqid);
230 
231 	/*
232 	 * Go past the ARCNET header.
233 	 */
234 	length -= archdrlen;
235 	caplen -= archdrlen;
236 	p += archdrlen;
237 
238 	if (phds && flag && (flag & 1) == 0) {
239 		/*
240 		 * This is a middle fragment.
241 		 */
242 		return (archdrlen);
243 	}
244 
245 	if (!arcnet_encap_print(ndo, arc_type, p, length, caplen))
246 		ND_DEFAULTPRINT(p, caplen);
247 
248 	return (archdrlen);
249 }
250 
251 /*
252  * This is the top level routine of the printer.  'p' points
253  * to the ARCNET header of the packet, 'h->ts' is the timestamp,
254  * 'h->len' is the length of the packet off the wire, and 'h->caplen'
255  * is the number of bytes actually captured.  It is quite similar
256  * to the non-Linux style printer except that Linux doesn't ever
257  * supply packets that look like exception frames, it always supplies
258  * reassembled packets rather than raw frames, and headers have an
259  * extra "offset" field between the src/dest and packet type.
260  */
261 u_int
262 arcnet_linux_if_print(netdissect_options *ndo, const struct pcap_pkthdr *h, const u_char *p)
263 {
264 	u_int caplen = h->caplen;
265 	u_int length = h->len;
266 	const struct arc_linux_header *ap;
267 
268 	int archdrlen = 0;
269 	u_char arc_type;
270 
271 	if (caplen < ARC_LINUX_HDRLEN || length < ARC_LINUX_HDRLEN) {
272 		ND_PRINT((ndo, "[|arcnet]"));
273 		return (caplen);
274 	}
275 
276 	ap = (const struct arc_linux_header *)p;
277 	arc_type = ap->arc_type;
278 
279 	switch (arc_type) {
280 	default:
281 		archdrlen = ARC_LINUX_HDRNEWLEN;
282 		if (caplen < ARC_LINUX_HDRNEWLEN || length < ARC_LINUX_HDRNEWLEN) {
283 			ND_PRINT((ndo, "[|arcnet]"));
284 			return (caplen);
285 		}
286 		break;
287 	case ARCTYPE_IP_OLD:
288 	case ARCTYPE_ARP_OLD:
289 	case ARCTYPE_DIAGNOSE:
290 		archdrlen = ARC_LINUX_HDRLEN;
291 		break;
292 	}
293 
294 	if (ndo->ndo_eflag)
295 		arcnet_print(ndo, p, length, 0, 0, 0);
296 
297 	/*
298 	 * Go past the ARCNET header.
299 	 */
300 	length -= archdrlen;
301 	caplen -= archdrlen;
302 	p += archdrlen;
303 
304 	if (!arcnet_encap_print(ndo, arc_type, p, length, caplen))
305 		ND_DEFAULTPRINT(p, caplen);
306 
307 	return (archdrlen);
308 }
309 
310 /*
311  * Prints the packet encapsulated in an ARCnet data field,
312  * given the ARCnet system code.
313  *
314  * Returns non-zero if it can do so, zero if the system code is unknown.
315  */
316 
317 
318 static int
319 arcnet_encap_print(netdissect_options *ndo, u_char arctype, const u_char *p,
320     u_int length, u_int caplen)
321 {
322 	switch (arctype) {
323 
324 	case ARCTYPE_IP_OLD:
325 	case ARCTYPE_IP:
326 	        ip_print(ndo, p, length);
327 		return (1);
328 
329 	case ARCTYPE_INET6:
330 		ip6_print(ndo, p, length);
331 		return (1);
332 
333 	case ARCTYPE_ARP_OLD:
334 	case ARCTYPE_ARP:
335 	case ARCTYPE_REVARP:
336 		arp_print(ndo, p, length, caplen);
337 		return (1);
338 
339 	case ARCTYPE_ATALK:	/* XXX was this ever used? */
340 		if (ndo->ndo_vflag)
341 			ND_PRINT((ndo, "et1 "));
342 		atalk_print(ndo, p, length);
343 		return (1);
344 
345 	case ARCTYPE_IPX:
346 		ipx_print(ndo, p, length);
347 		return (1);
348 
349 	default:
350 		return (0);
351 	}
352 }
353 
354 /*
355  * Local Variables:
356  * c-style: bsd
357  * End:
358  */
359 
360