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