1219019Sgabor/*
2219019Sgabor * Copyright (c) 1991, 1992, 1993, 1994, 1995, 1996, 1997
3219019Sgabor *	The Regents of the University of California.  All rights reserved.
4219019Sgabor *
5219019Sgabor * Redistribution and use in source and binary forms, with or without
6219019Sgabor * modification, are permitted provided that: (1) source code distributions
7219019Sgabor * retain the above copyright notice and this paragraph in its entirety, (2)
8219019Sgabor * distributions including binary code include the above copyright notice and
9219019Sgabor * this paragraph in its entirety in the documentation or other materials
10219019Sgabor * provided with the distribution, and (3) all advertising materials mentioning
11219019Sgabor * features or use of this software display the following acknowledgement:
12219019Sgabor * ``This product includes software developed by the University of California,
13219019Sgabor * Lawrence Berkeley Laboratory and its contributors.'' Neither the name of
14219019Sgabor * the University nor the names of its contributors may be used to endorse
15219019Sgabor * or promote products derived from this software without specific prior
16219019Sgabor * written permission.
17219019Sgabor * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR IMPLIED
18219019Sgabor * WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF
19219019Sgabor * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
20219019Sgabor */
21219019Sgabor
22219019Sgabor#include <sys/cdefs.h>
23219019Sgabor#ifndef lint
24219019Sgabor__RCSID("$NetBSD: print-fddi.c,v 1.7 2023/08/17 20:19:40 christos Exp $");
25219019Sgabor#endif
26219019Sgabor
27219019Sgabor/* \summary: Fiber Distributed Data Interface (FDDI) printer */
28219019Sgabor
29219019Sgabor#ifdef HAVE_CONFIG_H
30219019Sgabor#include <config.h>
31219019Sgabor#endif
32219019Sgabor
33219019Sgabor#include "netdissect-stdinc.h"
34219019Sgabor
35219019Sgabor#include <string.h>
36219019Sgabor
37219019Sgabor#include "netdissect.h"
38#include "extract.h"
39#include "addrtoname.h"
40
41/*
42 * Based on Ultrix if_fddi.h
43 */
44
45struct fddi_header {
46	nd_uint8_t  fddi_fc;		/* frame control */
47	nd_mac_addr fddi_dhost;
48	nd_mac_addr fddi_shost;
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__)
93static int fddi_bitswap = 0;
94#else
95static 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
128static 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 */
166static void
167print_fddi_fc(netdissect_options *ndo, u_char fc)
168{
169	switch (fc) {
170
171	case FDDIFC_VOID:                         /* Void frame */
172		ND_PRINT("void ");
173		break;
174
175	case FDDIFC_NRT:                          /* Nonrestricted token */
176		ND_PRINT("nrt ");
177		break;
178
179	case FDDIFC_RT:                           /* Restricted token */
180		ND_PRINT("rt ");
181		break;
182
183	case FDDIFC_SMT_INFO:                     /* SMT Info */
184		ND_PRINT("info ");
185		break;
186
187	case FDDIFC_SMT_NSA:                      /* SMT Next station adrs */
188		ND_PRINT("nsa ");
189		break;
190
191	case FDDIFC_MAC_BEACON:                   /* MAC Beacon frame */
192		ND_PRINT("beacon ");
193		break;
194
195	case FDDIFC_MAC_CLAIM:                    /* MAC Claim frame */
196		ND_PRINT("claim ");
197		break;
198
199	default:
200		switch (fc & FDDIFC_CLFF) {
201
202		case FDDIFC_MAC:
203			ND_PRINT("mac%1x ", fc & FDDIFC_ZZZZ);
204			break;
205
206		case FDDIFC_SMT:
207			ND_PRINT("smt%1x ", fc & FDDIFC_ZZZZ);
208			break;
209
210		case FDDIFC_LLC_ASYNC:
211			ND_PRINT("async%1x ", fc & FDDIFC_ZZZZ);
212			break;
213
214		case FDDIFC_LLC_SYNC:
215			ND_PRINT("sync%1x ", fc & FDDIFC_ZZZZ);
216			break;
217
218		case FDDIFC_IMP_ASYNC:
219			ND_PRINT("imp_async%1x ", fc & FDDIFC_ZZZZ);
220			break;
221
222		case FDDIFC_IMP_SYNC:
223			ND_PRINT("imp_sync%1x ", fc & FDDIFC_ZZZZ);
224			break;
225
226		default:
227			ND_PRINT("%02x ", fc);
228			break;
229		}
230	}
231}
232
233/* Extract src, dst addresses */
234static void
235extract_fddi_addrs(const struct fddi_header *fddip, char *fsrc, char *fdst)
236{
237	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 */
258static void
259fddi_hdr_print(netdissect_options *ndo,
260               const struct fddi_header *fddip, u_int length,
261               const u_char *fsrc, 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, GET_U_1(fddip->fddi_fc));
270	ND_PRINT("%s > %s, length %u: ",
271	       srcname, dstname,
272	       length);
273}
274
275static void
276fddi_smt_print(netdissect_options *ndo, const u_char *p _U_, u_int length _U_)
277{
278	ND_PRINT("<SMT printer not yet implemented>");
279}
280
281u_int
282fddi_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	uint8_t fc;
286	nd_mac_addr srcmac, dstmac;
287	struct lladdr_info src, dst;
288	int llc_hdrlen;
289
290	ndo->ndo_protocol = "fddi";
291	if (caplen < FDDI_HDRLEN) {
292		nd_print_trunc(ndo);
293		return (caplen);
294	}
295
296	fc = GET_U_1(fddip->fddi_fc);
297
298	/*
299	 * Get the FDDI addresses into a canonical form
300	 */
301	extract_fddi_addrs(fddip, (char *)srcmac, (char *)dstmac);
302
303	if (ndo->ndo_eflag)
304		fddi_hdr_print(ndo, fddip, length, srcmac, dstmac);
305
306	src.addr = srcmac;
307	src.addr_string = etheraddr_string;
308	dst.addr = dstmac;
309	dst.addr_string = etheraddr_string;
310
311	/* Skip over FDDI MAC header */
312	length -= FDDI_HDRLEN;
313	p += FDDI_HDRLEN;
314	caplen -= FDDI_HDRLEN;
315
316	/* Frame Control field determines interpretation of packet */
317	if ((fc & FDDIFC_CLFF) == FDDIFC_LLC_ASYNC) {
318		/* Try to print the LLC-layer header & higher layers */
319		llc_hdrlen = llc_print(ndo, p, length, caplen, &src, &dst);
320		if (llc_hdrlen < 0) {
321			/*
322			 * Some kinds of LLC packet we cannot
323			 * handle intelligently
324			 */
325			if (!ndo->ndo_suppress_default_print)
326				ND_DEFAULTPRINT(p, caplen);
327			llc_hdrlen = -llc_hdrlen;
328		}
329	} else if ((fc & FDDIFC_CLFF) == FDDIFC_SMT) {
330		fddi_smt_print(ndo, p, caplen);
331		llc_hdrlen = 0;
332	} else {
333		/* Some kinds of FDDI packet we cannot handle intelligently */
334		if (!ndo->ndo_eflag)
335			fddi_hdr_print(ndo, fddip, length + FDDI_HDRLEN, srcmac,
336			    dstmac);
337		if (!ndo->ndo_suppress_default_print)
338			ND_DEFAULTPRINT(p, caplen);
339		llc_hdrlen = 0;
340	}
341	return (FDDI_HDRLEN + llc_hdrlen);
342}
343
344/*
345 * This is the top level routine of the printer.  'p' points
346 * to the FDDI header of the packet, 'h->ts' is the timestamp,
347 * 'h->len' is the length of the packet off the wire, and 'h->caplen'
348 * is the number of bytes actually captured.
349 */
350void
351fddi_if_print(netdissect_options *ndo, const struct pcap_pkthdr *h, const u_char *p)
352{
353	ndo->ndo_protocol = "fddi";
354	ndo->ndo_ll_hdr_len += fddi_print(ndo, p, h->len, h->caplen);
355}
356