xref: /netbsd-src/external/bsd/tcpdump/dist/print-fddi.c (revision 181254a7b1bdde6873432bffef2d2decc4b5c22f)
1 /*
2  * Copyright (c) 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 
22 #include <sys/cdefs.h>
23 #ifndef lint
24 __RCSID("$NetBSD: print-fddi.c,v 1.6 2017/02/05 04:05:05 spz Exp $");
25 #endif
26 
27 /* \summary: Fiber Distributed Data Interface (FDDI) printer */
28 
29 #ifdef HAVE_CONFIG_H
30 #include "config.h"
31 #endif
32 
33 #include <netdissect-stdinc.h>
34 
35 #include <string.h>
36 
37 #include "netdissect.h"
38 #include "addrtoname.h"
39 #include "ether.h"
40 
41 /*
42  * Based on Ultrix if_fddi.h
43  */
44 
45 struct fddi_header {
46 	u_char  fddi_fc;		/* frame control */
47 	u_char  fddi_dhost[6];
48 	u_char  fddi_shost[6];
49 };
50 
51 /*
52  * Length of an FDDI header; note that some compilers may pad
53  * "struct fddi_header" to a multiple of 4 bytes, for example, so
54  * "sizeof (struct fddi_header)" may not give the right
55  * answer.
56  */
57 #define FDDI_HDRLEN 13
58 
59 /* Useful values for fddi_fc (frame control) field */
60 
61 /*
62  * FDDI Frame Control bits
63  */
64 #define	FDDIFC_C		0x80		/* Class bit */
65 #define	FDDIFC_L		0x40		/* Address length bit */
66 #define	FDDIFC_F		0x30		/* Frame format bits */
67 #define	FDDIFC_Z		0x0f		/* Control bits */
68 
69 /*
70  * FDDI Frame Control values. (48-bit addressing only).
71  */
72 #define	FDDIFC_VOID		0x40		/* Void frame */
73 #define	FDDIFC_NRT		0x80		/* Nonrestricted token */
74 #define	FDDIFC_RT		0xc0		/* Restricted token */
75 #define	FDDIFC_SMT_INFO		0x41		/* SMT Info */
76 #define	FDDIFC_SMT_NSA		0x4F		/* SMT Next station adrs */
77 #define	FDDIFC_MAC_BEACON	0xc2		/* MAC Beacon frame */
78 #define	FDDIFC_MAC_CLAIM	0xc3		/* MAC Claim frame */
79 #define	FDDIFC_LLC_ASYNC	0x50		/* Async. LLC frame */
80 #define	FDDIFC_LLC_SYNC		0xd0		/* Sync. LLC frame */
81 #define	FDDIFC_IMP_ASYNC	0x60		/* Implementor Async. */
82 #define	FDDIFC_IMP_SYNC		0xe0		/* Implementor Synch. */
83 #define FDDIFC_SMT		0x40		/* SMT frame */
84 #define FDDIFC_MAC		0xc0		/* MAC frame */
85 
86 #define	FDDIFC_CLFF		0xF0		/* Class/Length/Format bits */
87 #define	FDDIFC_ZZZZ		0x0F		/* Control bits */
88 
89 /*
90  * Some FDDI interfaces use bit-swapped addresses.
91  */
92 #if defined(ultrix) || defined(__alpha) || defined(__bsdi) || defined(__NetBSD__) || defined(__linux__)
93 static int fddi_bitswap = 0;
94 #else
95 static int fddi_bitswap = 1;
96 #endif
97 
98 /*
99  * FDDI support for tcpdump, by Jeffrey Mogul [DECWRL], June 1992
100  *
101  * Based in part on code by Van Jacobson, which bears this note:
102  *
103  * NOTE:  This is a very preliminary hack for FDDI support.
104  * There are all sorts of wired in constants & nothing (yet)
105  * to print SMT packets as anything other than hex dumps.
106  * Most of the necessary changes are waiting on my redoing
107  * the "header" that a kernel fddi driver supplies to bpf:  I
108  * want it to look like one byte of 'direction' (0 or 1
109  * depending on whether the packet was inbound or outbound),
110  * two bytes of system/driver dependent data (anything an
111  * implementor thinks would be useful to filter on and/or
112  * save per-packet, then the real 21-byte FDDI header.
113  * Steve McCanne & I have also talked about adding the
114  * 'direction' byte to all bpf headers (e.g., in the two
115  * bytes of padding on an ethernet header).  It's not clear
116  * we could do this in a backwards compatible way & we hate
117  * the idea of an incompatible bpf change.  Discussions are
118  * proceeding.
119  *
120  * Also, to really support FDDI (and better support 802.2
121  * over ethernet) we really need to re-think the rather simple
122  * minded assumptions about fixed length & fixed format link
123  * level headers made in gencode.c.  One day...
124  *
125  *  - vj
126  */
127 
128 static const u_char fddi_bit_swap[] = {
129 	0x00, 0x80, 0x40, 0xc0, 0x20, 0xa0, 0x60, 0xe0,
130 	0x10, 0x90, 0x50, 0xd0, 0x30, 0xb0, 0x70, 0xf0,
131 	0x08, 0x88, 0x48, 0xc8, 0x28, 0xa8, 0x68, 0xe8,
132 	0x18, 0x98, 0x58, 0xd8, 0x38, 0xb8, 0x78, 0xf8,
133 	0x04, 0x84, 0x44, 0xc4, 0x24, 0xa4, 0x64, 0xe4,
134 	0x14, 0x94, 0x54, 0xd4, 0x34, 0xb4, 0x74, 0xf4,
135 	0x0c, 0x8c, 0x4c, 0xcc, 0x2c, 0xac, 0x6c, 0xec,
136 	0x1c, 0x9c, 0x5c, 0xdc, 0x3c, 0xbc, 0x7c, 0xfc,
137 	0x02, 0x82, 0x42, 0xc2, 0x22, 0xa2, 0x62, 0xe2,
138 	0x12, 0x92, 0x52, 0xd2, 0x32, 0xb2, 0x72, 0xf2,
139 	0x0a, 0x8a, 0x4a, 0xca, 0x2a, 0xaa, 0x6a, 0xea,
140 	0x1a, 0x9a, 0x5a, 0xda, 0x3a, 0xba, 0x7a, 0xfa,
141 	0x06, 0x86, 0x46, 0xc6, 0x26, 0xa6, 0x66, 0xe6,
142 	0x16, 0x96, 0x56, 0xd6, 0x36, 0xb6, 0x76, 0xf6,
143 	0x0e, 0x8e, 0x4e, 0xce, 0x2e, 0xae, 0x6e, 0xee,
144 	0x1e, 0x9e, 0x5e, 0xde, 0x3e, 0xbe, 0x7e, 0xfe,
145 	0x01, 0x81, 0x41, 0xc1, 0x21, 0xa1, 0x61, 0xe1,
146 	0x11, 0x91, 0x51, 0xd1, 0x31, 0xb1, 0x71, 0xf1,
147 	0x09, 0x89, 0x49, 0xc9, 0x29, 0xa9, 0x69, 0xe9,
148 	0x19, 0x99, 0x59, 0xd9, 0x39, 0xb9, 0x79, 0xf9,
149 	0x05, 0x85, 0x45, 0xc5, 0x25, 0xa5, 0x65, 0xe5,
150 	0x15, 0x95, 0x55, 0xd5, 0x35, 0xb5, 0x75, 0xf5,
151 	0x0d, 0x8d, 0x4d, 0xcd, 0x2d, 0xad, 0x6d, 0xed,
152 	0x1d, 0x9d, 0x5d, 0xdd, 0x3d, 0xbd, 0x7d, 0xfd,
153 	0x03, 0x83, 0x43, 0xc3, 0x23, 0xa3, 0x63, 0xe3,
154 	0x13, 0x93, 0x53, 0xd3, 0x33, 0xb3, 0x73, 0xf3,
155 	0x0b, 0x8b, 0x4b, 0xcb, 0x2b, 0xab, 0x6b, 0xeb,
156 	0x1b, 0x9b, 0x5b, 0xdb, 0x3b, 0xbb, 0x7b, 0xfb,
157 	0x07, 0x87, 0x47, 0xc7, 0x27, 0xa7, 0x67, 0xe7,
158 	0x17, 0x97, 0x57, 0xd7, 0x37, 0xb7, 0x77, 0xf7,
159 	0x0f, 0x8f, 0x4f, 0xcf, 0x2f, 0xaf, 0x6f, 0xef,
160 	0x1f, 0x9f, 0x5f, 0xdf, 0x3f, 0xbf, 0x7f, 0xff,
161 };
162 
163 /*
164  * Print FDDI frame-control bits
165  */
166 static inline void
167 print_fddi_fc(netdissect_options *ndo, u_char fc)
168 {
169 	switch (fc) {
170 
171 	case FDDIFC_VOID:                         /* Void frame */
172 		ND_PRINT((ndo, "void "));
173 		break;
174 
175 	case FDDIFC_NRT:                          /* Nonrestricted token */
176 		ND_PRINT((ndo, "nrt "));
177 		break;
178 
179 	case FDDIFC_RT:                           /* Restricted token */
180 		ND_PRINT((ndo, "rt "));
181 		break;
182 
183 	case FDDIFC_SMT_INFO:                     /* SMT Info */
184 		ND_PRINT((ndo, "info "));
185 		break;
186 
187 	case FDDIFC_SMT_NSA:                      /* SMT Next station adrs */
188 		ND_PRINT((ndo, "nsa "));
189 		break;
190 
191 	case FDDIFC_MAC_BEACON:                   /* MAC Beacon frame */
192 		ND_PRINT((ndo, "beacon "));
193 		break;
194 
195 	case FDDIFC_MAC_CLAIM:                    /* MAC Claim frame */
196 		ND_PRINT((ndo, "claim "));
197 		break;
198 
199 	default:
200 		switch (fc & FDDIFC_CLFF) {
201 
202 		case FDDIFC_MAC:
203 			ND_PRINT((ndo, "mac%1x ", fc & FDDIFC_ZZZZ));
204 			break;
205 
206 		case FDDIFC_SMT:
207 			ND_PRINT((ndo, "smt%1x ", fc & FDDIFC_ZZZZ));
208 			break;
209 
210 		case FDDIFC_LLC_ASYNC:
211 			ND_PRINT((ndo, "async%1x ", fc & FDDIFC_ZZZZ));
212 			break;
213 
214 		case FDDIFC_LLC_SYNC:
215 			ND_PRINT((ndo, "sync%1x ", fc & FDDIFC_ZZZZ));
216 			break;
217 
218 		case FDDIFC_IMP_ASYNC:
219 			ND_PRINT((ndo, "imp_async%1x ", fc & FDDIFC_ZZZZ));
220 			break;
221 
222 		case FDDIFC_IMP_SYNC:
223 			ND_PRINT((ndo, "imp_sync%1x ", fc & FDDIFC_ZZZZ));
224 			break;
225 
226 		default:
227 			ND_PRINT((ndo, "%02x ", fc));
228 			break;
229 		}
230 	}
231 }
232 
233 /* Extract src, dst addresses */
234 static inline void
235 extract_fddi_addrs(const struct fddi_header *fddip, char *fsrc, char *fdst)
236 {
237 	register int i;
238 
239 	if (fddi_bitswap) {
240 		/*
241 		 * bit-swap the fddi addresses (isn't the IEEE standards
242 		 * process wonderful!) then convert them to names.
243 		 */
244 		for (i = 0; i < 6; ++i)
245 			fdst[i] = fddi_bit_swap[fddip->fddi_dhost[i]];
246 		for (i = 0; i < 6; ++i)
247 			fsrc[i] = fddi_bit_swap[fddip->fddi_shost[i]];
248 	}
249 	else {
250 		memcpy(fdst, (const char *)fddip->fddi_dhost, 6);
251 		memcpy(fsrc, (const char *)fddip->fddi_shost, 6);
252 	}
253 }
254 
255 /*
256  * Print the FDDI MAC header
257  */
258 static inline void
259 fddi_hdr_print(netdissect_options *ndo,
260                register const struct fddi_header *fddip, register u_int length,
261                register const u_char *fsrc, register const u_char *fdst)
262 {
263 	const char *srcname, *dstname;
264 
265 	srcname = etheraddr_string(ndo, fsrc);
266 	dstname = etheraddr_string(ndo, fdst);
267 
268 	if (!ndo->ndo_qflag)
269 		print_fddi_fc(ndo, fddip->fddi_fc);
270 	ND_PRINT((ndo, "%s > %s, length %u: ",
271 	       srcname, dstname,
272 	       length));
273 }
274 
275 static inline void
276 fddi_smt_print(netdissect_options *ndo, const u_char *p _U_, u_int length _U_)
277 {
278 	ND_PRINT((ndo, "<SMT printer not yet implemented>"));
279 }
280 
281 u_int
282 fddi_print(netdissect_options *ndo, const u_char *p, u_int length, u_int caplen)
283 {
284 	const struct fddi_header *fddip = (const struct fddi_header *)p;
285 	struct ether_header ehdr;
286 	struct lladdr_info src, dst;
287 	int llc_hdrlen;
288 
289 	if (caplen < FDDI_HDRLEN) {
290 		ND_PRINT((ndo, "[|fddi]"));
291 		return (caplen);
292 	}
293 
294 	/*
295 	 * Get the FDDI addresses into a canonical form
296 	 */
297 	extract_fddi_addrs(fddip, (char *)ESRC(&ehdr), (char *)EDST(&ehdr));
298 
299 	if (ndo->ndo_eflag)
300 		fddi_hdr_print(ndo, fddip, length, ESRC(&ehdr), EDST(&ehdr));
301 
302 	src.addr = ESRC(&ehdr);
303 	src.addr_string = etheraddr_string;
304 	dst.addr = EDST(&ehdr);
305 	dst.addr_string = etheraddr_string;
306 
307 	/* Skip over FDDI MAC header */
308 	length -= FDDI_HDRLEN;
309 	p += FDDI_HDRLEN;
310 	caplen -= FDDI_HDRLEN;
311 
312 	/* Frame Control field determines interpretation of packet */
313 	if ((fddip->fddi_fc & FDDIFC_CLFF) == FDDIFC_LLC_ASYNC) {
314 		/* Try to print the LLC-layer header & higher layers */
315 		llc_hdrlen = llc_print(ndo, p, length, caplen, &src, &dst);
316 		if (llc_hdrlen < 0) {
317 			/*
318 			 * Some kinds of LLC packet we cannot
319 			 * handle intelligently
320 			 */
321 			if (!ndo->ndo_suppress_default_print)
322 				ND_DEFAULTPRINT(p, caplen);
323 			llc_hdrlen = -llc_hdrlen;
324 		}
325 	} else if ((fddip->fddi_fc & FDDIFC_CLFF) == FDDIFC_SMT) {
326 		fddi_smt_print(ndo, p, caplen);
327 		llc_hdrlen = 0;
328 	} else {
329 		/* Some kinds of FDDI packet we cannot handle intelligently */
330 		if (!ndo->ndo_eflag)
331 			fddi_hdr_print(ndo, fddip, length + FDDI_HDRLEN, ESRC(&ehdr),
332 			    EDST(&ehdr));
333 		if (!ndo->ndo_suppress_default_print)
334 			ND_DEFAULTPRINT(p, caplen);
335 		llc_hdrlen = 0;
336 	}
337 	return (FDDI_HDRLEN + llc_hdrlen);
338 }
339 
340 /*
341  * This is the top level routine of the printer.  'p' points
342  * to the FDDI header of the packet, 'h->ts' is the timestamp,
343  * 'h->len' is the length of the packet off the wire, and 'h->caplen'
344  * is the number of bytes actually captured.
345  */
346 u_int
347 fddi_if_print(netdissect_options *ndo, const struct pcap_pkthdr *h, register const u_char *p)
348 {
349 	return (fddi_print(ndo, p, h->len, h->caplen));
350 }
351