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