contrib/tcpdump/print-token.c

   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@stdio.com>
  22  *
  23  * Further tweaked to more closely resemble print-fddi.c
  24  *      Guy Harris <guy@alum.mit.edu>
  25  *
  26  * $FreeBSD$
  27  */
  28 #ifndef lint
  29 static const char rcsid[] _U_ =
  30     "@(#) $Header: /tcpdump/master/tcpdump/print-token.c,v 1.27 2005-11-13 12:12:43 guy Exp $";
  31 #endif
  32
  33 #ifdef HAVE_CONFIG_H
  34 #include "config.h"
  35 #endif
  36
  37 #include <tcpdump-stdinc.h>
  38
  39 #include <pcap.h>
  40 #include <stdio.h>
  41 #include <string.h>
  42
  43 #include "interface.h"
  44 #include "addrtoname.h"
  45 #include "ethertype.h"
  46
  47 #include "ether.h"
  48 #include "token.h"
  49
  50 /* Extract src, dst addresses */
  51 static inline void
  52 extract_token_addrs(const struct token_header *trp, char *fsrc, char *fdst)
  53 {
  54         memcpy(fdst, (const char *)trp->token_dhost, 6);
  55         memcpy(fsrc, (const char *)trp->token_shost, 6);
  56 }
  57
  58 /*
  59  * Print the TR MAC header
  60  */
  61 static inline void
  62 token_hdr_print(register const struct token_header *trp, register u_int length,
  63            register const u_char *fsrc, register const u_char *fdst)
  64 {
  65         const char *srcname, *dstname;
  66
  67         srcname = etheraddr_string(fsrc);
  68         dstname = etheraddr_string(fdst);
  69
  70         if (vflag)
  71                 (void) printf("%02x %02x %s %s %d: ",
  72                        trp->token_ac,
  73                        trp->token_fc,
  74                        srcname, dstname,
  75                        length);
  76         else
  77                 printf("%s %s %d: ", srcname, dstname, length);
  78 }
  79
  80 static const char *broadcast_indicator[] = {
  81         "Non-Broadcast", "Non-Broadcast",
  82         "Non-Broadcast", "Non-Broadcast",
  83         "All-routes",    "All-routes",
  84         "Single-route",  "Single-route"
  85 };
  86
  87 static const char *direction[] = {
  88         "Forward", "Backward"
  89 };
  90
  91 static const char *largest_frame[] = {
  92         "516",
  93         "1500",
  94         "2052",
  95         "4472",
  96         "8144",
  97         "11407",
  98         "17800",
  99         "??"
 100 };
 101
 102 u_int
 103 token_print(const u_char *p, u_int length, u_int caplen)
 104 {
 105         const struct token_header *trp;
 106         u_short extracted_ethertype;
 107         struct ether_header ehdr;
 108         u_int route_len = 0, hdr_len = TOKEN_HDRLEN;
 109         int seg;
 110
 111         trp = (const struct token_header *)p;
 112
 113         if (caplen < TOKEN_HDRLEN) {
 114                 printf("[|token-ring]");
 115                 return hdr_len;
 116         }
 117
 118         /*
 119          * Get the TR addresses into a canonical form
 120          */
 121         extract_token_addrs(trp, (char*)ESRC(&ehdr), (char*)EDST(&ehdr));
 122
 123         /* Adjust for source routing information in the MAC header */
 124         if (IS_SOURCE_ROUTED(trp)) {
 125                 /* Clear source-routed bit */
 126                 *ESRC(&ehdr) &= 0x7f;
 127
 128                 if (eflag)
 129                         token_hdr_print(trp, length, ESRC(&ehdr), EDST(&ehdr));
 130
 131                 route_len = RIF_LENGTH(trp);
 132                 if (vflag) {
 133                         printf("%s ", broadcast_indicator[BROADCAST(trp)]);
 134                         printf("%s", direction[DIRECTION(trp)]);
 135
 136                         for (seg = 0; seg < SEGMENT_COUNT(trp); seg++)
 137                                 printf(" [%d:%d]", RING_NUMBER(trp, seg),
 138                                     BRIDGE_NUMBER(trp, seg));
 139                 } else {
 140                         printf("rt = %x", ntohs(trp->token_rcf));
 141
 142                         for (seg = 0; seg < SEGMENT_COUNT(trp); seg++)
 143                                 printf(":%x", ntohs(trp->token_rseg[seg]));
 144                 }
 145                 printf(" (%s) ", largest_frame[LARGEST_FRAME(trp)]);
 146         } else {
 147                 if (eflag)
 148                         token_hdr_print(trp, length, ESRC(&ehdr), EDST(&ehdr));
 149         }
 150
 151         /* Skip over token ring MAC header and routing information */
 152         hdr_len += route_len;
 153         length -= hdr_len;
 154         p += hdr_len;
 155         caplen -= hdr_len;
 156
 157         /* Frame Control field determines interpretation of packet */
 158         if (FRAME_TYPE(trp) == TOKEN_FC_LLC) {
 159                 /* Try to print the LLC-layer header & higher layers */
 160                 if (llc_print(p, length, caplen, ESRC(&ehdr), EDST(&ehdr),
 161                     &extracted_ethertype) == 0) {
 162                         /* ether_type not known, print raw packet */
 163                         if (!eflag)
 164                                 token_hdr_print(trp,
 165                                     length + TOKEN_HDRLEN + route_len,
 166                                     ESRC(&ehdr), EDST(&ehdr));
 167                         if (extracted_ethertype) {
 168                                 printf("(LLC %s) ",
 169                         etherproto_string(htons(extracted_ethertype)));
 170                         }
 171                         if (!suppress_default_print)
 172                                 default_print(p, caplen);
 173                 }
 174         } else {
 175                 /* Some kinds of TR packet we cannot handle intelligently */
 176                 /* XXX - dissect MAC packets if frame type is 0 */
 177                 if (!eflag)
 178                         token_hdr_print(trp, length + TOKEN_HDRLEN + route_len,
 179                             ESRC(&ehdr), EDST(&ehdr));
 180                 if (!suppress_default_print)
 181                         default_print(p, caplen);
 182         }
 183         return (hdr_len);
 184 }
 185
 186 /*
 187  * This is the top level routine of the printer.  'p' points
 188  * to the TR header of the packet, 'h->ts' is the timestamp,
 189  * 'h->len' is the length of the packet off the wire, and 'h->caplen'
 190  * is the number of bytes actually captured.
 191  */
 192 u_int
 193 token_if_print(const struct pcap_pkthdr *h, const u_char *p)
 194 {
 195         return (token_print(p, h->len, h->caplen));
 196 }