Use "proto_tree_add_item()" whenever possible; this fixes some bugs
[obnox/wireshark/wip.git] / packet-fddi.c
index eade8f0e76e30bcf15b8f1eb8bc2f21ac9e5bec2..1c5a970972f43c9455fbc980332e63b360debe99 100644 (file)
@@ -3,12 +3,11 @@
  *
  * Laurent Deniel <deniel@worldnet.fr>
  *
- * $Id: packet-fddi.c,v 1.2 1998/10/10 18:23:43 gerald Exp $
+ * $Id: packet-fddi.c,v 1.55 2001/12/10 00:25:27 guy Exp $
  *
  * Ethereal - Network traffic analyzer
- * By Gerald Combs <gerald@zing.org>
+ * By Gerald Combs <gerald@ethereal.com>
  * Copyright 1998 Gerald Combs
- *
  * 
  * This program is free software; you can redistribute it and/or
  * modify it under the terms of the GNU General Public License
 # include "config.h"
 #endif
 
-#include <gtk/gtk.h>
+#ifdef HAVE_SYS_TYPES_H
+# include <sys/types.h>
+#endif
 
 #include <stdio.h>
-
-#include <pcap.h>
-
-#include "ethereal.h"
+#include <string.h>
+#include <glib.h>
+#include "bitswap.h"
 #include "packet.h"
+#include "packet-fddi.h"
+#include "packet-llc.h"
 #include "resolv.h"
 
+static int proto_fddi = -1;
+static int hf_fddi_fc = -1;
+static int hf_fddi_fc_clf = -1;
+static int hf_fddi_fc_prio = -1;
+static int hf_fddi_fc_smt_subtype = -1;
+static int hf_fddi_fc_mac_subtype = -1;
+static int hf_fddi_dst = -1;
+static int hf_fddi_src = -1;
+static int hf_fddi_addr = -1;
+
+static gint ett_fddi = -1;
+static gint ett_fddi_fc = -1;
+
 /* FDDI Frame Control values */
 
 #define FDDI_FC_VOID           0x00            /* Void frame */
 #define FDDI_FC_IMP_ASYNC_MAX  0x6f
 #define FDDI_FC_IMP_SYNC       0xe0            /* Implementor Synch. */
 
+#define FDDI_FC_CLFF           0xF0            /* Class/Length/Format bits */
+#define FDDI_FC_ZZZZ           0x0F            /* Control bits */
+
+/*
+ * Async frame ZZZZ bits:
+ */
+#define FDDI_FC_ASYNC_R                0x08            /* Reserved */
+#define FDDI_FC_ASYNC_PRI      0x07            /* Priority */
+
+#define CLFF_BITS(fc)  (((fc) & FDDI_FC_CLFF) >> 4)
+#define ZZZZ_BITS(fc)  ((fc) & FDDI_FC_ZZZZ)
+
+static const value_string clf_vals[] = {
+       { CLFF_BITS(FDDI_FC_VOID),      "Void" },
+       { CLFF_BITS(FDDI_FC_SMT),       "SMT" },
+       { CLFF_BITS(FDDI_FC_LLC_ASYNC), "Async LLC" },
+       { CLFF_BITS(FDDI_FC_IMP_ASYNC), "Implementor Async" },
+       { CLFF_BITS(FDDI_FC_NRT),       "Nonrestricted Token" },
+       { CLFF_BITS(FDDI_FC_MAC),       "MAC" },
+       { CLFF_BITS(FDDI_FC_LLC_SYNC),  "Sync LLC" },
+       { CLFF_BITS(FDDI_FC_IMP_SYNC),  "Implementor Sync" },
+       { 0,                            NULL }
+};
+
+static const value_string smt_subtype_vals[] = {
+       { ZZZZ_BITS(FDDI_FC_SMT_INFO), "Info" },
+       { ZZZZ_BITS(FDDI_FC_SMT_NSA),  "Next Station Address" },
+       { 0,                           NULL }
+};
+
+static const value_string mac_subtype_vals[] = {
+       { ZZZZ_BITS(FDDI_FC_MAC_BEACON), "Beacon" },
+       { ZZZZ_BITS(FDDI_FC_MAC_CLAIM),  "Claim" },
+       { 0,                             NULL }
+};
+
 #define FDDI_HEADER_SIZE       13
 
 /* field positions */
 #define FDDI_P_DHOST           1
 #define FDDI_P_SHOST           7
 
-void dissect_fddi(const u_char *pd, frame_data *fd, GtkTree *tree) 
+static dissector_handle_t llc_handle;
+static dissector_handle_t data_handle;
+
+static void
+swap_mac_addr(u_char *swapped_addr, const u_char *orig_addr)
 {
+       int i;
 
+       for (i = 0; i < 6; i++) {
+               swapped_addr[i] = BIT_SWAP(orig_addr[i]);
+       }
+}
+
+
+void
+capture_fddi(const u_char *pd, int len, packet_counts *ld)
+{
   int        offset = 0, fc;
-  GtkWidget *fh_tree, *ti;
 
-  if (fd->cap_len < FDDI_HEADER_SIZE) {
-    dissect_data(pd, offset, fd, tree);
+  if (!BYTES_ARE_IN_FRAME(0, len, FDDI_HEADER_SIZE)) {
+    ld->other++;
     return;
   }
+  offset = FDDI_HEADER_SIZE;
 
   fc = (int) pd[FDDI_P_FC];
 
-  if (fd->win_info[0]) {
-    strcpy(fd->win_info[2], get_ether_name((u_char *)&pd[FDDI_P_DHOST]));
-    strcpy(fd->win_info[1], get_ether_name((u_char *)&pd[FDDI_P_SHOST]));
-    strcpy(fd->win_info[4], "FDDI");
+  switch (fc) {
+
+    /* From now, only 802.2 SNAP (Async. LCC frame) is supported */
+
+    case FDDI_FC_LLC_ASYNC + 0  :
+    case FDDI_FC_LLC_ASYNC + 1  :
+    case FDDI_FC_LLC_ASYNC + 2  :
+    case FDDI_FC_LLC_ASYNC + 3  :
+    case FDDI_FC_LLC_ASYNC + 4  :
+    case FDDI_FC_LLC_ASYNC + 5  :
+    case FDDI_FC_LLC_ASYNC + 6  :
+    case FDDI_FC_LLC_ASYNC + 7  :
+    case FDDI_FC_LLC_ASYNC + 8  :
+    case FDDI_FC_LLC_ASYNC + 9  :
+    case FDDI_FC_LLC_ASYNC + 10 :
+    case FDDI_FC_LLC_ASYNC + 11 :
+    case FDDI_FC_LLC_ASYNC + 12 :
+    case FDDI_FC_LLC_ASYNC + 13 :
+    case FDDI_FC_LLC_ASYNC + 14 :
+    case FDDI_FC_LLC_ASYNC + 15 :
+      capture_llc(pd, offset, len, ld);
+      return;
+    default :
+      ld->other++;
+      return;
+
+  } /* fc */
+
+} /* capture_fddi */
+
+static gchar *
+fddifc_to_str(int fc)
+{
+  static gchar strbuf[128+1];
+
+  switch (fc) {
+
+  case FDDI_FC_VOID:                   /* Void frame */
+    return "Void frame";
+
+  case FDDI_FC_NRT:                    /* Nonrestricted token */
+    return "Nonrestricted token";
+
+  case FDDI_FC_RT:                     /* Restricted token */
+    return "Restricted token";
+
+  case FDDI_FC_SMT_INFO:               /* SMT Info */
+    return "SMT info";
+
+  case FDDI_FC_SMT_NSA:                        /* SMT Next station adrs */
+    return "SMT Next station address";
+
+  case FDDI_FC_MAC_BEACON:             /* MAC Beacon frame */
+    return "MAC beacon";
+
+  case FDDI_FC_MAC_CLAIM:              /* MAC Claim frame */
+    return "MAC claim token";
+
+  default:
+    switch (fc & FDDI_FC_CLFF) {
+
+    case FDDI_FC_MAC:
+      sprintf(strbuf, "MAC frame, control %x", fc & FDDI_FC_ZZZZ);
+      return strbuf;
+
+    case FDDI_FC_SMT:
+      sprintf(strbuf, "SMT frame, control %x", fc & FDDI_FC_ZZZZ);
+      return strbuf;
+
+    case FDDI_FC_LLC_ASYNC:
+      if (fc & FDDI_FC_ASYNC_R)
+        sprintf(strbuf, "Async LLC frame, control %x", fc & FDDI_FC_ZZZZ);
+      else
+        sprintf(strbuf, "Async LLC frame, priority %d",
+                       fc & FDDI_FC_ASYNC_PRI);
+      return strbuf;
+
+    case FDDI_FC_LLC_SYNC:
+      if (fc & FDDI_FC_ZZZZ) {
+        sprintf(strbuf, "Sync LLC frame, control %x", fc & FDDI_FC_ZZZZ);
+        return strbuf;
+      } else
+        return "Sync LLC frame";
+
+    case FDDI_FC_IMP_ASYNC:
+      sprintf(strbuf, "Implementor async frame, control %x",
+                       fc & FDDI_FC_ZZZZ);
+      return strbuf;
+
+    case FDDI_FC_IMP_SYNC:
+      sprintf(strbuf, "Implementor sync frame, control %x",
+                       fc & FDDI_FC_ZZZZ);
+      return strbuf;
+      break;
+
+    default:
+      return "Unknown frame type";
+    }
   }
+}
+
+
+static void
+dissect_fddi(tvbuff_t *tvb, packet_info *pinfo, proto_tree *tree,
+               gboolean bitswapped)
+{
+  int        fc;
+  proto_tree *fh_tree = NULL;
+  proto_item *ti;
+  gchar      *fc_str;
+  proto_tree *fc_tree;
+  static u_char src[6], dst[6];
+  u_char     src_swapped[6], dst_swapped[6];
+  tvbuff_t   *next_tvb;
+
+  if (check_col(pinfo->cinfo, COL_PROTOCOL))
+    col_set_str(pinfo->cinfo, COL_PROTOCOL, "FDDI");
+
+  fc = (int) tvb_get_guint8(tvb, FDDI_P_FC);
+  fc_str = fddifc_to_str(fc);
+
+  if (check_col(pinfo->cinfo, COL_INFO))
+    col_add_str(pinfo->cinfo, COL_INFO, fc_str);
 
   if (tree) {
-    ti = add_item_to_tree(GTK_WIDGET(tree), 0, offset,
-                         "FDDI %s (%d on wire, %d captured)",
-                         (fc >= FDDI_FC_LLC_ASYNC_MIN && fc <= FDDI_FC_LLC_ASYNC_MAX) ?
-                         "Async LLC" : "unsupported FC",
-                         fd->pkt_len, fd->cap_len);
-
-      fh_tree = gtk_tree_new();
-      add_subtree(ti, fh_tree, ETT_FDDI);
-      add_item_to_tree(fh_tree, FDDI_P_FC, 1, "Frame Control: 0x%02x", fc);
-      add_item_to_tree(fh_tree, FDDI_P_DHOST, 6, "Destination: %s (%s)",
-                      ether_to_str((guint8 *) &pd[FDDI_P_DHOST]),
-                      get_ether_name((u_char *) &pd[FDDI_P_DHOST]));
-      add_item_to_tree(fh_tree, FDDI_P_SHOST, 6, "Source: %s (%s)",
-                      ether_to_str((guint8 *) &pd[FDDI_P_SHOST]),
-                      get_ether_name((u_char *)&pd[FDDI_P_SHOST]));
+    ti = proto_tree_add_protocol_format(tree, proto_fddi, tvb, 0, FDDI_HEADER_SIZE,
+               "Fiber Distributed Data Interface, %s", fc_str);
+    fh_tree = proto_item_add_subtree(ti, ett_fddi);
+    ti = proto_tree_add_uint_format(fh_tree, hf_fddi_fc, tvb, FDDI_P_FC, 1, fc,
+        "Frame Control: 0x%02x (%s)", fc, fc_str);
+    fc_tree = proto_item_add_subtree(ti, ett_fddi_fc);
+    proto_tree_add_uint(fc_tree, hf_fddi_fc_clf, tvb, FDDI_P_FC, 1, fc);
+    switch (fc & FDDI_FC_CLFF) {
+
+    case FDDI_FC_SMT:
+      proto_tree_add_uint(fc_tree, hf_fddi_fc_smt_subtype, tvb, FDDI_P_FC, 1, fc);
+      break;
+
+    case FDDI_FC_MAC:
+      if (fc != FDDI_FC_RT)
+        proto_tree_add_uint(fc_tree, hf_fddi_fc_mac_subtype, tvb, FDDI_P_FC, 1, fc);
+      break;
+
+    case FDDI_FC_LLC_ASYNC:
+      if (!(fc & FDDI_FC_ASYNC_R))
+        proto_tree_add_uint(fc_tree, hf_fddi_fc_prio, tvb, FDDI_P_FC, 1, fc);
+      break;
     }
+  }
 
-  offset = FDDI_HEADER_SIZE;
+  /* Extract the destination address, possibly bit-swapping it. */
+  if (bitswapped)
+    swap_mac_addr(dst, (u_char *) tvb_get_ptr(tvb, FDDI_P_DHOST, 6));
+  else
+    memcpy(dst, (u_char *) tvb_get_ptr(tvb, FDDI_P_DHOST, 6), sizeof dst);
+  swap_mac_addr(dst_swapped, (u_char*) tvb_get_ptr(tvb, FDDI_P_DHOST, 6));
+
+  /* XXX - copy them to some buffer associated with "pi", rather than
+     just making "dst" static? */
+  SET_ADDRESS(&pinfo->dl_dst, AT_ETHER, 6, &dst[0]);
+  SET_ADDRESS(&pinfo->dst, AT_ETHER, 6, &dst[0]);
+
+  if (fh_tree) {
+    proto_tree_add_ether(fh_tree, hf_fddi_dst, tvb, FDDI_P_DHOST, 6, dst);
+    proto_tree_add_ether_hidden(fh_tree, hf_fddi_addr, tvb, FDDI_P_DHOST, 6, dst);
+
+    /* hide some bit-swapped mac address fields in the proto_tree, just in case */
+    proto_tree_add_ether_hidden(fh_tree, hf_fddi_dst, tvb, FDDI_P_DHOST, 6, dst_swapped);
+    proto_tree_add_ether_hidden(fh_tree, hf_fddi_addr, tvb, FDDI_P_DHOST, 6, dst_swapped);
+  }
+
+  /* Extract the source address, possibly bit-swapping it. */
+  if (bitswapped)
+    swap_mac_addr(src, (u_char *) tvb_get_ptr(tvb, FDDI_P_SHOST, 6));
+  else
+    memcpy(src, (u_char *) tvb_get_ptr(tvb, FDDI_P_SHOST, 6), sizeof src);
+  swap_mac_addr(src_swapped, (u_char*) tvb_get_ptr(tvb, FDDI_P_SHOST, 6));
+
+  /* XXX - copy them to some buffer associated with "pi", rather than
+     just making "src" static? */
+  SET_ADDRESS(&pinfo->dl_src, AT_ETHER, 6, &src[0]);
+  SET_ADDRESS(&pinfo->src, AT_ETHER, 6, &src[0]);
+
+  if (fh_tree) {
+      proto_tree_add_ether(fh_tree, hf_fddi_src, tvb, FDDI_P_SHOST, 6, src);
+      proto_tree_add_ether_hidden(fh_tree, hf_fddi_addr, tvb, FDDI_P_SHOST, 6, src);
+
+      /* hide some bit-swapped mac address fields in the proto_tree, just in case */
+      proto_tree_add_ether_hidden(fh_tree, hf_fddi_src, tvb, FDDI_P_SHOST, 6, src_swapped);
+      proto_tree_add_ether_hidden(fh_tree, hf_fddi_addr, tvb, FDDI_P_SHOST, 6, src_swapped);
+  }
+
+  next_tvb = tvb_new_subset(tvb, FDDI_HEADER_SIZE, -1, -1);
 
   switch (fc) {
 
@@ -133,14 +366,104 @@ void dissect_fddi(const u_char *pd, frame_data *fd, GtkTree *tree)
     case FDDI_FC_LLC_ASYNC + 13 :
     case FDDI_FC_LLC_ASYNC + 14 :
     case FDDI_FC_LLC_ASYNC + 15 :
-      dissect_llc(pd, offset, fd, tree);
+      call_dissector(llc_handle, next_tvb, pinfo, tree);
       return;
       
     default :
-      dissect_data(pd, offset, fd, tree);
+      call_dissector(data_handle,next_tvb, pinfo, tree);
       return;
 
   } /* fc */
-
 } /* dissect_fddi */
 
+       
+static void
+dissect_fddi_bitswapped(tvbuff_t *tvb, packet_info *pinfo, proto_tree *tree)
+{
+       dissect_fddi(tvb, pinfo, tree, TRUE);
+}
+
+static void
+dissect_fddi_not_bitswapped(tvbuff_t *tvb, packet_info *pinfo, proto_tree *tree)
+{
+       dissect_fddi(tvb, pinfo, tree, FALSE);
+}
+
+void
+proto_register_fddi(void)
+{
+       static hf_register_info hf[] = {
+
+               /*
+                * XXX - we want this guy to have his own private formatting
+                * routine, using "fc_to_str()"; if "fc_to_str()" returns
+                * NULL, just show the hex value, else show the string.
+                */
+               { &hf_fddi_fc,
+               { "Frame Control",      "fddi.fc", FT_UINT8, BASE_HEX, NULL, 0x0,
+                       "", HFILL }},
+
+               { &hf_fddi_fc_clf,
+               { "Class/Length/Format", "fddi.fc.clf", FT_UINT8, BASE_HEX, VALS(clf_vals), FDDI_FC_CLFF,
+                       "", HFILL }},
+
+               { &hf_fddi_fc_prio,
+               { "Priority", "fddi.fc.prio", FT_UINT8, BASE_DEC, NULL, FDDI_FC_ASYNC_PRI,
+                       "", HFILL }},
+
+               { &hf_fddi_fc_smt_subtype,
+               { "SMT Subtype", "fddi.fc.smt_subtype", FT_UINT8, BASE_DEC, VALS(smt_subtype_vals), FDDI_FC_ZZZZ,
+                       "", HFILL }},
+
+               { &hf_fddi_fc_mac_subtype,
+               { "MAC Subtype", "fddi.fc.mac_subtype", FT_UINT8, BASE_DEC, VALS(mac_subtype_vals), FDDI_FC_ZZZZ,
+                       "", HFILL }},
+
+               { &hf_fddi_dst,
+               { "Destination",        "fddi.dst", FT_ETHER, BASE_NONE, NULL, 0x0,
+                       "Destination Hardware Address", HFILL }},
+
+               { &hf_fddi_src,
+               { "Source",             "fddi.src", FT_ETHER, BASE_NONE, NULL, 0x0,
+                       "", HFILL }},
+
+               { &hf_fddi_addr,
+               { "Source or Destination Address", "fddi.addr", FT_ETHER, BASE_NONE, NULL, 0x0,
+                       "Source or Destination Hardware Address", HFILL }},
+
+       };
+       static gint *ett[] = {
+               &ett_fddi,
+               &ett_fddi_fc,
+       };
+
+       proto_fddi = proto_register_protocol("Fiber Distributed Data Interface",
+           "FDDI", "fddi");
+       proto_register_field_array(proto_fddi, hf, array_length(hf));
+       proto_register_subtree_array(ett, array_length(ett));
+
+       /*
+        * Called from various dissectors for encapsulated FDDI frames.
+        * We assume the MAC addresses in them aren't bitswapped.
+        */
+       register_dissector("fddi", dissect_fddi_not_bitswapped, proto_fddi);
+}
+
+void
+proto_reg_handoff_fddi(void)
+{
+       dissector_handle_t fddi_handle, fddi_bitswapped_handle;
+
+       /*
+        * Get a handle for the LLC dissector.
+        */
+       llc_handle = find_dissector("llc");
+       data_handle = find_dissector("data");
+
+       fddi_handle = find_dissector("fddi");
+       dissector_add("wtap_encap", WTAP_ENCAP_FDDI, fddi_handle);
+       fddi_bitswapped_handle =
+           create_dissector_handle(dissect_fddi_bitswapped, proto_fddi);
+       dissector_add("wtap_encap", WTAP_ENCAP_FDDI_BITSWAPPED,
+           fddi_bitswapped_handle);
+}