The Tcpdump Group git mirrors - tcpdump/blob - 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 #ifndef lint
  27 static const char rcsid[] =
  28     "@(#) $Header: /tcpdump/master/tcpdump/print-token.c,v 1.5 2000-09-28 06:43:08 guy Exp $";
  29 #endif
  30
  31 #ifdef HAVE_CONFIG_H
  32 #include "config.h"
  33 #endif
  34
  35 #include <sys/param.h>
  36 #include <sys/time.h>
  37 #include <sys/socket.h>
  38
  39 struct mbuf;
  40 struct rtentry;
  41
  42 #include <netinet/in.h>
  43 #include <netinet/in_systm.h>
  44
  45 #include <pcap.h>
  46 #include <stdio.h>
  47
  48 #include "interface.h"
  49 #include "addrtoname.h"
  50 #include "ethertype.h"
  51
  52 #include "ether.h"
  53 #include "token.h"
  54
  55 /* Extract src, dst addresses */
  56 static inline void
  57 extract_token_addrs(const struct token_header *trp, char *fsrc, char *fdst)
  58 {
  59         memcpy(fdst, (char *)trp->token_dhost, 6);
  60         memcpy(fsrc, (char *)trp->token_shost, 6);
  61 }
  62
  63 /*
  64  * Print the TR MAC header
  65  */
  66 static inline void
  67 token_print(register const struct token_header *trp, register u_int length,
  68            register const u_char *fsrc, register const u_char *fdst)
  69 {
  70         char *srcname, *dstname;
  71
  72         srcname = etheraddr_string(fsrc);
  73         dstname = etheraddr_string(fdst);
  74
  75         if (vflag)
  76                 (void) printf("%02x %02x %s %s %d: ",
  77                        trp->token_ac,
  78                        trp->token_fc,
  79                        srcname, dstname,
  80                        length);
  81         else
  82                 printf("%s %s %d: ", srcname, dstname, length);
  83 }
  84
  85 static char *broadcast_indicator[] = {
  86         "Non-Broadcast", "Non-Broadcast",
  87         "Non-Broadcast", "Non-Broadcast",
  88         "All-routes",    "All-routes",
  89         "Single-route",  "Single-route"
  90 };
  91
  92 static char *direction[] = {
  93         "Forward", "Backward"
  94 };
  95
  96 static char *largest_frame[] = {
  97         "516",
  98         "1500",
  99         "2052",
 100         "4472",
 101         "8144",
 102         "11407",
 103         "17800",
 104         "??"
 105 };
 106
 107 /*
 108  * This is the top level routine of the printer.  'p' is the points
 109  * to the TR header of the packet, 'tvp' is the timestamp,
 110  * 'length' is the length of the packet off the wire, and 'caplen'
 111  * is the number of bytes actually captured.
 112  */
 113 void
 114 token_if_print(u_char *user, const struct pcap_pkthdr *h, const u_char *p)
 115 {
 116         u_int caplen = h->caplen;
 117         u_int length = h->len;
 118         struct token_header *trp;
 119         u_short extracted_ethertype;
 120         struct ether_header ehdr;
 121         u_int route_len = 0, seg;
 122
 123         trp = (struct token_header *)p;
 124
 125         ts_print(&h->ts);
 126
 127         if (caplen < TOKEN_HDRLEN) {
 128                 printf("[|token-ring]");
 129                 goto out;
 130         }
 131         /*
 132          * Get the TR addresses into a canonical form
 133          */
 134         extract_token_addrs(trp, (char*)ESRC(&ehdr), (char*)EDST(&ehdr));
 135         /*
 136          * Some printers want to get back at the ethernet addresses,
 137          * and/or check that they're not walking off the end of the packet.
 138          * Rather than pass them all the way down, we set these globals.
 139          */
 140         snapend = p + caplen;
 141         /*
 142          * Actually, the only printer that uses packetp is print-bootp.c,
 143          * and it assumes that packetp points to an Ethernet header.  The
 144          * right thing to do is to fix print-bootp.c to know which link
 145          * type is in use when it excavates. XXX
 146          */
 147         packetp = (u_char *)&ehdr;
 148
 149         /* Adjust for source routing information in the MAC header */
 150         if (IS_SOURCE_ROUTED(trp)) {
 151                 /* Clear source-routed bit */
 152                 *ESRC(&ehdr) &= 0x7f;
 153
 154                 if (eflag)
 155                         token_print(trp, length, ESRC(&ehdr), EDST(&ehdr));
 156
 157                 route_len = RIF_LENGTH(trp);
 158                 if (vflag) {
 159                         printf("%s ", broadcast_indicator[BROADCAST(trp)]);
 160                         printf("%s", direction[DIRECTION(trp)]);
 161
 162                         for (seg = 0; seg < SEGMENT_COUNT(trp); seg++)
 163                                 printf(" [%d:%d]", RING_NUMBER(trp, seg),
 164                                     BRIDGE_NUMBER(trp, seg));
 165                 } else {
 166                         printf("rt = %x", ntohs(trp->token_rcf));
 167
 168                         for (seg = 0; seg < SEGMENT_COUNT(trp); seg++)
 169                                 printf(":%x", ntohs(trp->token_rseg[seg]));
 170                 }
 171                 printf(" (%s) ", largest_frame[LARGEST_FRAME(trp)]);
 172         } else {
 173                 if (eflag)
 174                         token_print(trp, length, ESRC(&ehdr), EDST(&ehdr));
 175         }
 176
 177         /* Skip over token ring MAC header and routing information */
 178         length -= TOKEN_HDRLEN + route_len;
 179         p += TOKEN_HDRLEN + route_len;
 180         caplen -= TOKEN_HDRLEN + route_len;
 181
 182         /* Frame Control field determines interpretation of packet */
 183         extracted_ethertype = 0;
 184         if (FRAME_TYPE(trp) == TOKEN_FC_LLC) {
 185                 /* Try to print the LLC-layer header & higher layers */
 186                 if (llc_print(p, length, caplen, ESRC(&ehdr), EDST(&ehdr))
 187                     == 0) {
 188                         /* ether_type not known, print raw packet */
 189                         if (!eflag)
 190                                 token_print(trp, length,
 191                                     ESRC(&ehdr), EDST(&ehdr));
 192                         if (extracted_ethertype) {
 193                                 printf("(LLC %s) ",
 194                         etherproto_string(htons(extracted_ethertype)));
 195                         }
 196                         if (!xflag && !qflag)
 197                                 default_print(p, caplen);
 198                 }
 199         } else {
 200                 /* Some kinds of TR packet we cannot handle intelligently */
 201                 /* XXX - dissect MAC packets if frame type is 0 */
 202                 if (!eflag)
 203                         token_print(trp, length, ESRC(&ehdr), EDST(&ehdr));
 204                 if (!xflag && !qflag)
 205                         default_print(p, caplen);
 206         }
 207         if (xflag)
 208                 default_print(p, caplen);
 209 out:
 210         putchar('\n');
 211 }