Home | History | Annotate | Line # | Download | only in dist
      1 /*
      2  * Copyright (c) 1988, 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1996
      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  * Hacked version of print-ether.c  Larry Lile <lile (at) stdio.com>
     22  *
     23  * Further tweaked to more closely resemble print-fddi.c
     24  *	Guy Harris <guy (at) alum.mit.edu>
     25  */
     26 
     27 #include <sys/cdefs.h>
     28 #ifndef lint
     29 __RCSID("$NetBSD: print-token.c,v 1.8 2024/09/02 16:15:33 christos Exp $");
     30 #endif
     31 
     32 /* \summary: Token Ring printer */
     33 
     34 #include <config.h>
     35 
     36 #include "netdissect-stdinc.h"
     37 
     38 #include <string.h>
     39 
     40 #include "netdissect.h"
     41 #include "extract.h"
     42 #include "addrtoname.h"
     43 
     44 /*
     45  * Copyright (c) 1998, Larry Lile
     46  * All rights reserved.
     47  *
     48  * Redistribution and use in source and binary forms, with or without
     49  * modification, are permitted provided that the following conditions
     50  * are met:
     51  * 1. Redistributions of source code must retain the above copyright
     52  *    notice unmodified, this list of conditions, and the following
     53  *    disclaimer.
     54  * 2. Redistributions in binary form must reproduce the above copyright
     55  *    notice, this list of conditions and the following disclaimer in the
     56  *    documentation and/or other materials provided with the distribution.
     57  *
     58  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
     59  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     60  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     61  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
     62  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     63  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     64  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     65  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     66  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     67  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     68  * SUCH DAMAGE.
     69  *
     70  */
     71 
     72 #define TOKEN_HDRLEN		14
     73 #define ROUTING_SEGMENT_MAX	16
     74 #define IS_SOURCE_ROUTED(trp)	((trp)->token_shost[0] & 0x80)
     75 #define FRAME_TYPE(trp)		((GET_U_1((trp)->token_fc) & 0xC0) >> 6)
     76 #define TOKEN_FC_LLC		1
     77 
     78 #define BROADCAST(trp)		((GET_BE_U_2((trp)->token_rcf) & 0xE000) >> 13)
     79 #define RIF_LENGTH(trp)		((GET_BE_U_2((trp)->token_rcf) & 0x1f00) >> 8)
     80 #define DIRECTION(trp)		((GET_BE_U_2((trp)->token_rcf) & 0x0080) >> 7)
     81 #define LARGEST_FRAME(trp)	((GET_BE_U_2((trp)->token_rcf) & 0x0070) >> 4)
     82 #define RING_NUMBER(trp, x)	((GET_BE_U_2((trp)->token_rseg[x]) & 0xfff0) >> 4)
     83 #define BRIDGE_NUMBER(trp, x)	(GET_BE_U_2((trp)->token_rseg[x]) & 0x000f)
     84 #define SEGMENT_COUNT(trp)	((int)((RIF_LENGTH(trp) - 2) / 2))
     85 
     86 struct token_header {
     87 	nd_uint8_t   token_ac;
     88 	nd_uint8_t   token_fc;
     89 	nd_mac_addr  token_dhost;
     90 	nd_mac_addr  token_shost;
     91 	nd_uint16_t  token_rcf;
     92 	nd_uint16_t  token_rseg[ROUTING_SEGMENT_MAX];
     93 };
     94 
     95 
     96 /* Extract src, dst addresses */
     97 static void
     98 extract_token_addrs(const struct token_header *trp, char *fsrc, char *fdst)
     99 {
    100 	memcpy(fdst, (const char *)trp->token_dhost, 6);
    101 	memcpy(fsrc, (const char *)trp->token_shost, 6);
    102 }
    103 
    104 /*
    105  * Print the TR MAC header
    106  */
    107 static void
    108 token_hdr_print(netdissect_options *ndo,
    109                 const struct token_header *trp, u_int length,
    110                 const u_char *fsrc, const u_char *fdst)
    111 {
    112 	const char *srcname, *dstname;
    113 
    114 	srcname = etheraddr_string(ndo, fsrc);
    115 	dstname = etheraddr_string(ndo, fdst);
    116 
    117 	if (!ndo->ndo_qflag)
    118 		ND_PRINT("%02x %02x ",
    119 		       GET_U_1(trp->token_ac),
    120 		       GET_U_1(trp->token_fc));
    121 	ND_PRINT("%s > %s, length %u: ",
    122 	       srcname, dstname,
    123 	       length);
    124 }
    125 
    126 static const char *broadcast_indicator[] = {
    127 	"Non-Broadcast", "Non-Broadcast",
    128 	"Non-Broadcast", "Non-Broadcast",
    129 	"All-routes",    "All-routes",
    130 	"Single-route",  "Single-route"
    131 };
    132 
    133 static const char *direction[] = {
    134 	"Forward", "Backward"
    135 };
    136 
    137 static const char *largest_frame[] = {
    138 	"516",
    139 	"1500",
    140 	"2052",
    141 	"4472",
    142 	"8144",
    143 	"11407",
    144 	"17800",
    145 	"??"
    146 };
    147 
    148 u_int
    149 token_print(netdissect_options *ndo, const u_char *p, u_int length, u_int caplen)
    150 {
    151 	const struct token_header *trp;
    152 	int llc_hdrlen;
    153 	nd_mac_addr srcmac, dstmac;
    154 	struct lladdr_info src, dst;
    155 	u_int route_len = 0, hdr_len = TOKEN_HDRLEN;
    156 	int seg;
    157 
    158 	ndo->ndo_protocol = "token-ring";
    159 	trp = (const struct token_header *)p;
    160 
    161 	if (caplen < TOKEN_HDRLEN) {
    162 		nd_print_trunc(ndo);
    163 		return hdr_len;
    164 	}
    165 
    166 	/*
    167 	 * Get the TR addresses into a canonical form
    168 	 */
    169 	extract_token_addrs(trp, (char*)srcmac, (char*)dstmac);
    170 
    171 	/* Adjust for source routing information in the MAC header */
    172 	if (IS_SOURCE_ROUTED(trp)) {
    173 		/* Clear source-routed bit */
    174 		srcmac[0] &= 0x7f;
    175 
    176 		if (ndo->ndo_eflag)
    177 			token_hdr_print(ndo, trp, length, srcmac, dstmac);
    178 
    179 		if (caplen < TOKEN_HDRLEN + 2) {
    180 			nd_print_trunc(ndo);
    181 			return hdr_len;
    182 		}
    183 		route_len = RIF_LENGTH(trp);
    184 		hdr_len += route_len;
    185 		if (caplen < hdr_len) {
    186 			nd_print_trunc(ndo);
    187 			return hdr_len;
    188 		}
    189 		if (ndo->ndo_vflag) {
    190 			ND_PRINT("%s ", broadcast_indicator[BROADCAST(trp)]);
    191 			ND_PRINT("%s", direction[DIRECTION(trp)]);
    192 
    193 			for (seg = 0; seg < SEGMENT_COUNT(trp); seg++)
    194 				ND_PRINT(" [%u:%u]", RING_NUMBER(trp, seg),
    195 				    BRIDGE_NUMBER(trp, seg));
    196 		} else {
    197 			ND_PRINT("rt = %x", GET_BE_U_2(trp->token_rcf));
    198 
    199 			for (seg = 0; seg < SEGMENT_COUNT(trp); seg++)
    200 				ND_PRINT(":%x",
    201 					 GET_BE_U_2(trp->token_rseg[seg]));
    202 		}
    203 		ND_PRINT(" (%s) ", largest_frame[LARGEST_FRAME(trp)]);
    204 	} else {
    205 		if (ndo->ndo_eflag)
    206 			token_hdr_print(ndo, trp, length, srcmac, dstmac);
    207 	}
    208 
    209 	src.addr = srcmac;
    210 	src.addr_string = etheraddr_string;
    211 	dst.addr = dstmac;
    212 	dst.addr_string = etheraddr_string;
    213 
    214 	/* Skip over token ring MAC header and routing information */
    215 	length -= hdr_len;
    216 	p += hdr_len;
    217 	caplen -= hdr_len;
    218 
    219 	/* Frame Control field determines interpretation of packet */
    220 	if (FRAME_TYPE(trp) == TOKEN_FC_LLC) {
    221 		/* Try to print the LLC-layer header & higher layers */
    222 		llc_hdrlen = llc_print(ndo, p, length, caplen, &src, &dst);
    223 		if (llc_hdrlen < 0) {
    224 			/* packet type not known, print raw packet */
    225 			if (!ndo->ndo_suppress_default_print)
    226 				ND_DEFAULTPRINT(p, caplen);
    227 			llc_hdrlen = -llc_hdrlen;
    228 		}
    229 		hdr_len += llc_hdrlen;
    230 	} else {
    231 		/* Some kinds of TR packet we cannot handle intelligently */
    232 		/* XXX - dissect MAC packets if frame type is 0 */
    233 		if (!ndo->ndo_eflag)
    234 			token_hdr_print(ndo, trp, length + TOKEN_HDRLEN + route_len,
    235 			    srcmac, dstmac);
    236 		if (!ndo->ndo_suppress_default_print)
    237 			ND_DEFAULTPRINT(p, caplen);
    238 	}
    239 	return (hdr_len);
    240 }
    241 
    242 /*
    243  * This is the top level routine of the printer.  'p' points
    244  * to the TR header of the packet, 'h->ts' is the timestamp,
    245  * 'h->len' is the length of the packet off the wire, and 'h->caplen'
    246  * is the number of bytes actually captured.
    247  */
    248 void
    249 token_if_print(netdissect_options *ndo, const struct pcap_pkthdr *h, const u_char *p)
    250 {
    251 	ndo->ndo_protocol = "token-ring";
    252 	ndo->ndo_ll_hdr_len += token_print(ndo, p, h->len, h->caplen);
    253 }
    254