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  * $FreeBSD$
  24  */
  25 #ifndef lint
  26 static const char rcsid[] =
  27     "@(#) $Header: /home/ncvs/src/contrib/tcpdump/print-token.c,v 1.1 1999/02/20 11:17:55 julian Exp $";
  28 #endif
  29
  30 #include <sys/param.h>
  31 #include <sys/time.h>
  32 #include <sys/socket.h>
  33
  34 #if __STDC__
  35 struct mbuf;
  36 struct rtentry;
  37 #endif
  38 #include <net/if.h>
  39
  40 #include "token.h"
  41
  42 #include <netinet/in.h>
  43 #include <net/ethernet.h>
  44 #include <netinet/in_systm.h>
  45 #include <netinet/ip.h>
  46 #include <netinet/ip_var.h>
  47 #include <netinet/udp.h>
  48 #include <netinet/udp_var.h>
  49 #include <netinet/tcp.h>
  50 #include <netinet/tcpip.h>
  51
  52 #include <stdio.h>
  53 #include <pcap.h>
  54
  55 #include "interface.h"
  56 #include "addrtoname.h"
  57 #include "ethertype.h"
  58 #include "llc.h"
  59
  60 const u_char *packetp;
  61 const u_char *snapend;
  62
  63 static inline void
  64 token_print(register const u_char *bp, u_int length)
  65 {
  66         register const struct token_header *tp;
  67         register const struct llc *lp;
  68         u_short ether_type;
  69
  70         tp = (const struct token_header *)bp;
  71         lp = (struct llc *)(bp + TOKEN_HDR_LEN);
  72
  73         if (IS_SOURCE_ROUTED) {
  74             tp->ether_shost[0] = tp->ether_shost[0] & 0x7f;
  75                 lp = (struct llc *)(bp + TOKEN_HDR_LEN + RIF_LENGTH);
  76         }
  77
  78         /*
  79          * Ethertype on ethernet is a short, but ethertype in an llc-snap has
  80          * been defined as 2 u_chars.  This is a stupid little hack to fix
  81          * this for now but something better should be done using ntohs()
  82          * XXX
  83          */
  84          ether_type = ((u_short)lp->ethertype[1] << 16) | lp->ethertype[0];
  85
  86         if (qflag)
  87                 (void)printf("%s %s %d: ",
  88                              etheraddr_string(ESRC(tp)),
  89                              etheraddr_string(EDST(tp)),
  90                              length);
  91         else
  92                 (void)printf("%s %s %s %d: ",
  93                              etheraddr_string(ESRC(tp)),
  94                              etheraddr_string(EDST(tp)),
  95                              etherproto_string(ether_type),
  96                              length);
  97 }
  98
  99 /*
 100  * This is the top level routine of the printer.  'p' is the points
 101  * to the ether header of the packet, 'tvp' is the timestamp,
 102  * 'length' is the length of the packet off the wire, and 'caplen'
 103  * is the number of bytes actually captured.
 104  */
 105 void
 106 token_if_print(u_char *user, const struct pcap_pkthdr *h, const u_char *p)
 107 {
 108         u_int caplen = h->caplen;
 109         u_int length = h->len;
 110         struct token_header *tp;
 111         u_short ether_type;
 112         u_short extracted_ethertype;
 113         u_int route_len = 0, seg;
 114         struct llc *lp;
 115
 116         tp = (struct token_header *)p;
 117
 118         ts_print(&h->ts);
 119
 120         if (caplen < TOKEN_HDR_LEN) {
 121                 printf("[|token-ring]");
 122                 goto out;
 123         }
 124
 125         /*
 126          * Some printers want to get back at the ethernet addresses,
 127          * and/or check that they're not walking off the end of the packet.
 128          * Rather than pass them all the way down, we set these globals.
 129          */
 130         tp = (struct token_header *)p;
 131
 132         /* Adjust for source routing information in the MAC header */
 133         if (IS_SOURCE_ROUTED) {
 134
 135             if (eflag)
 136                 token_print(p, length);
 137
 138                 route_len =  RIF_LENGTH;
 139             if (vflag) {
 140                 if (vflag > 1)
 141                     printf("ac %x fc %x ", tp->ac, tp->fc);
 142                 ether_type = ntohs((int)lp->ethertype);
 143
 144                 printf("%s ", broadcast_indicator[BROADCAST]);
 145                 printf("%s", direction[DIRECTION]);
 146
 147                 for (seg = 0; seg < SEGMENT_COUNT; seg++)
 148                     printf(" [%d:%d]", RING_NUMBER(seg), BRIDGE_NUMBER(seg));
 149             } else {
 150                 printf("rt = %x", ntohs(tp->rcf));
 151
 152                 for (seg = 0; seg < SEGMENT_COUNT; seg++)
 153                     printf(":%x", ntohs(tp->rseg[seg]));
 154             }
 155             printf(" (%s) ", largest_frame[LARGEST_FRAME]);
 156         } else {
 157             if (eflag)
 158                 token_print(p, length);
 159         }
 160
 161         /* Set pointer to llc header, adjusted for routing information */
 162         lp = (struct llc *)(p + TOKEN_HDR_LEN + route_len);
 163
 164         packetp = p;
 165         snapend = p + caplen;
 166
 167         /* Skip over token ring MAC header */
 168         length -= TOKEN_HDR_LEN + route_len;
 169         caplen -= TOKEN_HDR_LEN + route_len;
 170         p += TOKEN_HDR_LEN + route_len;
 171
 172         extracted_ethertype = 0;
 173         /* Try to print the LLC-layer header & higher layers */
 174         if (llc_print(p, length, caplen, ESRC(tp), EDST(tp), &extracted_ethertype) == 0) {
 175                 /* ether_type not known, print raw packet */
 176                 if (!eflag)
 177                         token_print((u_char *)tp, length);
 178                 if (extracted_ethertype) {
 179                         printf("(LLC %s) ",
 180                        etherproto_string(htons(extracted_ethertype)));
 181                 }
 182                 if (!xflag && !qflag)
 183                         default_print(p, caplen);
 184         }
 185         if (xflag)
 186                 default_print(p, caplen);
 187  out:
 188         putchar('\n');
 189 }