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