Now that WinPcap is a DLL, I can load it at run-time rather than load-time.
[obnox/wireshark/wip.git] / packet-ipv6.c
index 991a54462cb673e252bd22005e912dd008763e0a..fa164f32340aa60d728def13f341a6a86308a4c3 100644 (file)
@@ -1,13 +1,15 @@
 /* packet-ipv6.c
  * Routines for IPv6 packet disassembly 
  *
- * $Id: packet-ipv6.c,v 1.9 1999/07/07 22:51:45 gram Exp $
+ * $Id: packet-ipv6.c,v 1.51 2001/01/23 02:49:55 gerald Exp $
  *
  * Ethereal - Network traffic analyzer
- * By Gerald Combs <gerald@zing.org>
+ * By Gerald Combs <gerald@ethereal.com>
+ *
  * Copyright 1998 Gerald Combs
  *
- * 
+ * MobileIPv6 support added by Tomislav Borosa <tomislav.borosa@siemens.hr>
+ *
  * This program is free software; you can redistribute it and/or
  * modify it under the terms of the GNU General Public License
  * as published by the Free Software Foundation; either version 2
 #ifdef HAVE_SYS_TYPES_H
 # include <sys/types.h>
 #endif
+
+#ifdef HAVE_SYS_SOCKET_h
 #include <sys/socket.h>
+#endif
 
 #ifdef HAVE_NETINET_IN_H
 # include <netinet/in.h>
 #include <string.h>
 #include <stdio.h>
 #include <glib.h>
+#include "etypes.h"
+#include "ppptypes.h"
+#include "aftypes.h"
 #include "packet.h"
 #include "packet-ip.h"
+#include "packet-ipsec.h"
 #include "packet-ipv6.h"
-#include "etypes.h"
+#include "packet-tcp.h"
+#include "packet-udp.h"
 #include "resolv.h"
 
-#ifndef offsetof
-#define        offsetof(type, member)  ((size_t)(&((type *)0)->member))
+/*
+ * NOTE: ipv6.nxt is not very useful as we will have chained header.
+ * now testing ipv6.final, but it raises SEGV.
+#define TEST_FINALHDR
+ */
+
+static int proto_ipv6 = -1;
+static int hf_ipv6_version = -1;
+static int hf_ipv6_class = -1;
+static int hf_ipv6_flow = -1;
+static int hf_ipv6_plen = -1;
+static int hf_ipv6_nxt = -1;
+static int hf_ipv6_hlim = -1;
+static int hf_ipv6_src = -1;
+static int hf_ipv6_dst = -1;
+static int hf_ipv6_addr = -1;
+#ifdef TEST_FINALHDR
+static int hf_ipv6_final = -1;
 #endif
 
-static const char *
-inet_ntop6(const u_char *src, char *dst, size_t size);
+/* BT INSERT BEGIN */
+static int hf_ipv6_mipv6_type = -1;
+static int hf_ipv6_mipv6_length = -1;
+static int hf_ipv6_mipv6_a_flag = -1;
+static int hf_ipv6_mipv6_h_flag = -1;
+static int hf_ipv6_mipv6_r_flag = -1;
+static int hf_ipv6_mipv6_d_flag = -1;
+static int hf_ipv6_mipv6_m_flag = -1;
+static int hf_ipv6_mipv6_b_flag = -1;
+static int hf_ipv6_mipv6_prefix_length = -1;
+static int hf_ipv6_mipv6_sequence_number = -1;
+static int hf_ipv6_mipv6_life_time = -1;
+static int hf_ipv6_mipv6_status = -1;
+static int hf_ipv6_mipv6_refresh = -1;
+static int hf_ipv6_mipv6_home_address = -1;
+static int hf_ipv6_mipv6_sub_type = -1;
+static int hf_ipv6_mipv6_sub_length = -1;
+static int hf_ipv6_mipv6_sub_unique_ID = -1;
+static int hf_ipv6_mipv6_sub_alternative_COA = -1;
+/* BT INSERT END */
+
+static gint ett_ipv6 = -1;
 
-static const char *
-inet_ntop4(const u_char *src, char *dst, size_t size);
+#ifndef offsetof
+#define        offsetof(type, member)  ((size_t)(&((type *)0)->member))
+#endif
 
 static int
 dissect_routing6(const u_char *pd, int offset, frame_data *fd, proto_tree *tree) {
-    return 0;
+    struct ip6_rthdr rt;
+    int len;
+    proto_tree *rthdr_tree;
+       proto_item *ti;
+    char buf[sizeof(struct ip6_rthdr0) + sizeof(struct e_in6_addr) * 23];
+       
+    memcpy(&rt, (void *) &pd[offset], sizeof(rt));
+    len = (rt.ip6r_len + 1) << 3;
+
+    if (tree) {
+       /* !!! specify length */
+       ti = proto_tree_add_text(tree, NullTVB, offset, len,
+           "Routing Header, Type %u", rt.ip6r_type);
+       rthdr_tree = proto_item_add_subtree(ti, ett_ipv6);
+
+       proto_tree_add_text(rthdr_tree, NullTVB,
+           offset + offsetof(struct ip6_rthdr, ip6r_nxt), 1,
+           "Next header: %s (0x%02x)", ipprotostr(rt.ip6r_nxt), rt.ip6r_nxt);
+       proto_tree_add_text(rthdr_tree, NullTVB,
+           offset + offsetof(struct ip6_rthdr, ip6r_len), 1,
+           "Length: %u (%d bytes)", rt.ip6r_len, len);
+       proto_tree_add_text(rthdr_tree, NullTVB,
+           offset + offsetof(struct ip6_rthdr, ip6r_type), 1,
+           "Type: %u", rt.ip6r_type);
+       proto_tree_add_text(rthdr_tree, NullTVB,
+           offset + offsetof(struct ip6_rthdr, ip6r_segleft), 1,
+           "Segments left: %u", rt.ip6r_segleft);
+
+       if (rt.ip6r_type == 0 && len <= sizeof(buf)) {
+           struct e_in6_addr *a;
+           int n;
+           struct ip6_rthdr0 *rt0;
+
+           memcpy(buf, (void *) &pd[offset], len);
+           rt0 = (struct ip6_rthdr0 *)buf;
+           for (a = rt0->ip6r0_addr, n = 0;
+                a < (struct e_in6_addr *)(buf + len);
+                a++, n++) {
+               proto_tree_add_text(rthdr_tree, NullTVB,
+                   offset + offsetof(struct ip6_rthdr0, ip6r0_addr) + n * sizeof(struct e_in6_addr),
+                   sizeof(struct e_in6_addr),
+#ifdef INET6
+                   "address %d: %s (%s)",
+                   n, get_hostname6(a), ip6_to_str(a)
+#else
+                   "address %d: %s", n, ip6_to_str(a)
+#endif
+                   );
+           }
+       }
+  
+       /* decode... */
+    }
+
+    return len;
 }
 
 static int
-dissect_frag6(const u_char *pd, int offset, frame_data *fd, proto_tree *tree) {
+dissect_frag6(const u_char *pd, int offset, frame_data *fd, proto_tree *tree, 
+    int *fragstart) {
+    struct ip6_frag frag;
+    int len;
+    proto_item *ti;
+    proto_tree *rthdr_tree;
+
+    memcpy(&frag, (void *) &pd[offset], sizeof(frag));
+    len = sizeof(frag);
+    frag.ip6f_offlg = ntohs(frag.ip6f_offlg);
+    *fragstart = frag.ip6f_offlg & IP6F_OFF_MASK;
     if (check_col(fd, COL_INFO)) {
-       col_add_fstr(fd, COL_INFO, "IPv6 fragment");
+       col_add_fstr(fd, COL_INFO,
+           "IPv6 fragment (nxt=%s (0x%02x) off=%u id=0x%x)",
+           ipprotostr(frag.ip6f_nxt), frag.ip6f_nxt,
+           *fragstart, frag.ip6f_ident);
+    }
+    if (tree) {
+          ti = proto_tree_add_text(tree, NullTVB, offset, len,
+                          "Fragmention Header");
+          rthdr_tree = proto_item_add_subtree(ti, ett_ipv6);
+
+          proto_tree_add_text(rthdr_tree, NullTVB,
+                        offset + offsetof(struct ip6_frag, ip6f_nxt), 1,
+                        "Next header: %s (0x%02x)",
+                        ipprotostr(frag.ip6f_nxt), frag.ip6f_nxt);
+
+       #if 0
+          proto_tree_add_text(rthdr_tree, NullTVB,
+                        offset + offsetof(struct ip6_frag, ip6f_reserved), 1,
+                        "Reserved: %u",
+                        frag.ip6f_reserved);
+       #endif
+
+          proto_tree_add_text(rthdr_tree, NullTVB,
+                        offset + offsetof(struct ip6_frag, ip6f_offlg), 2,
+                        "Offset: %u",
+                        frag.ip6f_offlg & IP6F_OFF_MASK);
+
+          proto_tree_add_text(rthdr_tree, NullTVB,
+                        offset + offsetof(struct ip6_frag, ip6f_offlg), 2,
+                        "More fragments: %s",
+                               frag.ip6f_offlg & IP6F_MORE_FRAG ?
+                               "Yes" : "No");
+
+          proto_tree_add_text(rthdr_tree, NullTVB,
+                        offset + offsetof(struct ip6_frag, ip6f_ident), 4,
+                        "Identification: 0x%08x",
+                        frag.ip6f_ident);
     }
-    return 0;
+    return len;
 }
 
+/* BT INSERT BEGIN */
 static int
-dissect_hopopts(const u_char *pd, int offset, frame_data *fd, proto_tree *tree) {
-    return 0;
+dissect_mipv6_ba(tvbuff_t *tvb, proto_tree *dstopt_tree, int offset) {
+       guint8 status, len=0;
+       gchar status_text[80]="";
+       gboolean sub_options=FALSE;
+
+       proto_tree_add_uint_format(dstopt_tree, hf_ipv6_mipv6_type, tvb, offset+len,
+       IP6_MIPv6_OPTION_TYPE_LENGTH, tvb_get_guint8(tvb,offset+len),
+       "Option Type: %u (0x%02x) - Binding Acknowledgement", tvb_get_guint8(tvb,offset+len),
+       tvb_get_guint8(tvb,offset+len));
+  len+=IP6_MIPv6_OPTION_TYPE_LENGTH;
+  if (tvb_get_guint8(tvb,offset+len)>11)
+               sub_options=TRUE;
+  proto_tree_add_uint(dstopt_tree, hf_ipv6_mipv6_length, tvb, offset+len,
+       IP6_MIPv6_OPTION_LENGTH_LENGTH, tvb_get_guint8(tvb,offset+len));
+  len+=IP6_MIPv6_OPTION_LENGTH_LENGTH;
+       status = tvb_get_guint8(tvb,offset+len);
+       switch (status){
+               case BA_OK:
+                       strcpy(status_text,"- Binding Update accepted");
+                       break;
+               case BA_REAS_UNSPEC:
+                       strcpy(status_text,"- Binding Update was rejected - Reason unspecified");
+                       break;
+               case BA_ADMIN_PROH:
+                       strcpy(status_text,"- Binding Update was rejected - Administratively prohibited");
+                       break;
+               case BA_INSUF_RES:
+                       strcpy(status_text,"- Binding Update was rejected - Insufficient resources");
+                       break;
+               case BA_NO_HR:
+                       strcpy(status_text,"- Binding Update was rejected - Home registration not supported");
+                       break;
+               case BA_NO_SUBNET:
+                       strcpy(status_text,"- Binding Update was rejected - Not home subnet");
+                       break;
+               case BA_ERR_ID_LEN:
+                       strcpy(status_text,"- Binding Update was rejected - Incorrect interface identifier length");
+                       break;
+               case BA_NO_HA:
+                       strcpy(status_text,"- Binding Update was rejected - Not home agent for this mobile node");
+                       break;
+               case BA_DUPL_ADDR:
+                       strcpy(status_text,"- Binding Update was rejected - Duplicate Address Detection failed");
+                       break;
+               default:
+                       strcpy(status_text,"");
+                       break;
+       }
+  if ((status>128)&&(strlen(status_text)==0))
+               strcpy(status_text,"- Binding Update was rejected");
+       proto_tree_add_uint_format(dstopt_tree, hf_ipv6_mipv6_status, tvb, offset+len,
+       IP6_MIPv6_STATUS_LENGTH, tvb_get_guint8(tvb,offset+len),
+       "Status: %u %s", tvb_get_guint8(tvb,offset+len), status_text);
+  len+=IP6_MIPv6_STATUS_LENGTH;
+  proto_tree_add_uint(dstopt_tree, hf_ipv6_mipv6_sequence_number, tvb, offset+len,
+       IP6_MIPv6_SEQUENCE_NUMBER_LENGTH, tvb_get_ntohs(tvb,offset+len));
+  len+=IP6_MIPv6_SEQUENCE_NUMBER_LENGTH;
+  if (tvb_get_ntohl(tvb,offset+len)==0xffffffff)
+       {
+               proto_tree_add_uint_format(dstopt_tree, hf_ipv6_mipv6_life_time, tvb, offset+len,
+               IP6_MIPv6_LIFE_TIME_LENGTH, tvb_get_ntohl(tvb,offset+len),
+               "Life Time: %u - Infinity", tvb_get_ntohl(tvb,offset+len));
+       } else
+       {
+               proto_tree_add_uint(dstopt_tree, hf_ipv6_mipv6_life_time, tvb, offset+len,
+               IP6_MIPv6_LIFE_TIME_LENGTH, tvb_get_ntohl(tvb,offset+len));
+  }
+  len+=IP6_MIPv6_LIFE_TIME_LENGTH;
+       proto_tree_add_uint(dstopt_tree, hf_ipv6_mipv6_refresh, tvb, offset+len,
+       IP6_MIPv6_REFRESH_LENGTH, tvb_get_ntohl(tvb,offset+len));
+  len+=IP6_MIPv6_REFRESH_LENGTH;
+  /* sub - options */
+  if (sub_options)
+  {
+               proto_tree_add_text(dstopt_tree, NullTVB, offset+len, 1, "Sub-Options");
+       }
+  return len;
 }
 
 static int
-dissect_dstopts(const u_char *pd, int offset, frame_data *fd, proto_tree *tree) {
-    struct ip6_dest dstopt;
-    int len;
-    proto_tree *dstopt_tree;
-       proto_item *ti;
+dissect_mipv6_bu(tvbuff_t *tvb, proto_tree *dstopt_tree, int offset) {
+       int len=0;
+       gboolean sub_options=FALSE;
+
+       proto_tree_add_uint_format(dstopt_tree, hf_ipv6_mipv6_type, tvb, offset,
+       IP6_MIPv6_OPTION_TYPE_LENGTH, tvb_get_guint8(tvb,offset),
+       "Option Type: %u (0x%02x) - Binding Update", tvb_get_guint8(tvb,offset),
+       tvb_get_guint8(tvb,offset));
+  len+=IP6_MIPv6_OPTION_TYPE_LENGTH;
+  if (tvb_get_guint8(tvb,offset+len)>8)
+  sub_options=TRUE;
+  proto_tree_add_uint(dstopt_tree, hf_ipv6_mipv6_length, tvb, offset+len,
+  IP6_MIPv6_OPTION_LENGTH_LENGTH, tvb_get_guint8(tvb,offset+len));
+  len+=IP6_MIPv6_OPTION_LENGTH_LENGTH;
+  proto_tree_add_boolean(dstopt_tree, hf_ipv6_mipv6_a_flag, tvb, offset+len,
+  IP6_MIPv6_FLAGS_LENGTH, tvb_get_guint8(tvb, offset+len));
+  proto_tree_add_boolean(dstopt_tree, hf_ipv6_mipv6_h_flag, tvb, offset+len,
+  IP6_MIPv6_FLAGS_LENGTH, tvb_get_guint8(tvb, offset+len));
+  proto_tree_add_boolean(dstopt_tree, hf_ipv6_mipv6_r_flag, tvb, offset+len,
+  IP6_MIPv6_FLAGS_LENGTH, tvb_get_guint8(tvb, offset+len));
+  proto_tree_add_boolean(dstopt_tree, hf_ipv6_mipv6_d_flag, tvb, offset+len,
+  IP6_MIPv6_FLAGS_LENGTH, tvb_get_guint8(tvb, offset+len));
+  proto_tree_add_boolean(dstopt_tree, hf_ipv6_mipv6_m_flag, tvb, offset+len,
+  IP6_MIPv6_FLAGS_LENGTH, tvb_get_guint8(tvb, offset+len));
+  proto_tree_add_boolean(dstopt_tree, hf_ipv6_mipv6_b_flag, tvb, offset+len,
+  IP6_MIPv6_FLAGS_LENGTH, tvb_get_guint8(tvb, offset+len));
+  len+=IP6_MIPv6_FLAGS_LENGTH;
+  proto_tree_add_uint(dstopt_tree, hf_ipv6_mipv6_prefix_length, tvb, offset+len,
+       IP6_MIPv6_PREFIX_LENGTH_LENGTH, tvb_get_guint8(tvb,offset+len));
+  len+=IP6_MIPv6_PREFIX_LENGTH_LENGTH;
+  proto_tree_add_uint(dstopt_tree, hf_ipv6_mipv6_sequence_number, tvb, offset+len,
+       IP6_MIPv6_SEQUENCE_NUMBER_LENGTH, tvb_get_ntohs(tvb,offset+len));
+  len+=IP6_MIPv6_SEQUENCE_NUMBER_LENGTH;
+  if (tvb_get_ntohl(tvb,offset+len)==0xffffffff)
+       {
+               proto_tree_add_uint_format(dstopt_tree, hf_ipv6_mipv6_life_time, tvb, offset+len,
+               IP6_MIPv6_LIFE_TIME_LENGTH, tvb_get_ntohl(tvb,offset+len),
+               "Life Time: %u - Infinity", tvb_get_ntohl(tvb,offset+len));
+       } else
+       {
+               proto_tree_add_uint(dstopt_tree, hf_ipv6_mipv6_life_time, tvb, offset+len,
+               IP6_MIPv6_LIFE_TIME_LENGTH, tvb_get_ntohl(tvb,offset+len));
+  }
+  len+=IP6_MIPv6_LIFE_TIME_LENGTH;
+  /* sub - options */
+  if (sub_options)
+  {
+               proto_tree_add_text(dstopt_tree, NullTVB, offset+len, 1, "Sub-Options");
+       }
+  return len;
+}
 
-    memcpy(&dstopt, (void *) &pd[offset], sizeof(dstopt)); 
-    len = (dstopt.ip6d_len + 1) << 3;
+static int
+dissect_mipv6_ha(tvbuff_t *tvb, proto_tree *dstopt_tree, int offset) {
+       int len=0;
+       gboolean sub_options=FALSE;
+
+       proto_tree_add_uint_format(dstopt_tree, hf_ipv6_mipv6_type, tvb, offset+len,
+       IP6_MIPv6_OPTION_TYPE_LENGTH, tvb_get_guint8(tvb,offset+len),
+       "Option Type: %u (0x%02x) - Home Address", tvb_get_guint8(tvb,offset+len),
+       tvb_get_guint8(tvb,offset+len));
+  len+=IP6_MIPv6_OPTION_TYPE_LENGTH;
+  if (tvb_get_guint8(tvb,offset+len)>16)
+               sub_options=TRUE;
+  proto_tree_add_uint(dstopt_tree, hf_ipv6_mipv6_length, tvb, offset+len,
+       IP6_MIPv6_OPTION_LENGTH_LENGTH, tvb_get_guint8(tvb,offset+len));
+  len+=IP6_MIPv6_OPTION_LENGTH_LENGTH;
+  proto_tree_add_ipv6(dstopt_tree, hf_ipv6_mipv6_home_address, tvb, offset+len,
+       IP6_MIPv6_HOME_ADDRESS_LENGTH, tvb_get_ptr(tvb,offset+len,IP6_MIPv6_HOME_ADDRESS_LENGTH));
+  len+=IP6_MIPv6_HOME_ADDRESS_LENGTH;                                          
+  /* sub - options */
+  if (sub_options)
+  {
+               proto_tree_add_text(dstopt_tree, NullTVB, offset+len, 1, "Sub-Options");
+       }
+       return len;
+}
 
-    if (tree) {
-       /* !!! specify length */
-       ti = proto_tree_add_text(tree, offset, len,
-           "Destination Option Header");
-       dstopt_tree = proto_item_add_subtree(ti, ETT_IPv6);
+static int
+dissect_mipv6_br(tvbuff_t *tvb, proto_tree *dstopt_tree, int offset) {
+       int len=0;      
+       gboolean sub_options=FALSE;
+
+       proto_tree_add_uint_format(dstopt_tree, hf_ipv6_mipv6_type, tvb, offset+len,
+       IP6_MIPv6_OPTION_TYPE_LENGTH, tvb_get_guint8(tvb,offset+len),
+       "Option Type: %u (0x%02x) - Binding Request", tvb_get_guint8(tvb,offset+len),
+       tvb_get_guint8(tvb,offset+len));
+  len+=IP6_MIPv6_OPTION_TYPE_LENGTH;
+  if (tvb_get_guint8(tvb,offset+len)>0)
+               sub_options=TRUE;
+  proto_tree_add_uint(dstopt_tree, hf_ipv6_mipv6_length, tvb, offset+len,
+       IP6_MIPv6_OPTION_LENGTH_LENGTH, tvb_get_guint8(tvb,offset+len));
+  len+=IP6_MIPv6_OPTION_LENGTH_LENGTH;
+  /* sub - options */
+  if (sub_options)
+  {
+               proto_tree_add_text(dstopt_tree, NullTVB, offset+len, 1, "Sub-Options");
+       }
+       return len;
+}
+
+static int
+dissect_mipv6_sub_u(tvbuff_t *tvb, proto_tree *dstopt_tree, int offset) {
+       int len=0;
+                                       
+       proto_tree_add_uint_format(dstopt_tree, hf_ipv6_mipv6_sub_length, tvb, offset+len,
+       IP6_MIPv6_SUB_TYPE_LENGTH, tvb_get_guint8(tvb,offset+len),
+       "Sub-Option Type: %u (0x%02x) - Unique Identifier Sub-Option", tvb_get_guint8(tvb,offset+len),
+       tvb_get_guint8(tvb,offset+len));
+  len+=IP6_MIPv6_SUB_TYPE_LENGTH;
+  proto_tree_add_uint(dstopt_tree, hf_ipv6_mipv6_sub_length, tvb, offset+len,
+       IP6_MIPv6_SUB_LENGTH_LENGTH, tvb_get_guint8(tvb,offset+len));
+  len+=IP6_MIPv6_SUB_LENGTH_LENGTH;
+  proto_tree_add_uint(dstopt_tree, hf_ipv6_mipv6_sub_unique_ID, tvb, offset+len,
+       IP6_MIPv6_SUB_UNIQUE_ID_LENGTH, tvb_get_ntohs(tvb,offset+len));
+  len+=IP6_MIPv6_SUB_UNIQUE_ID_LENGTH;                                         
+       return len;
+}
+
+static int
+dissect_mipv6_sub_a_coa(tvbuff_t *tvb, proto_tree *dstopt_tree, int offset) {
+       int len=0;
+
+       proto_tree_add_uint_format(dstopt_tree, hf_ipv6_mipv6_sub_type, tvb, offset+len,
+       IP6_MIPv6_SUB_TYPE_LENGTH, tvb_get_guint8(tvb,offset+len),
+       "Sub-Option Type: %u (0x%02x) - Alternative Care Of Address", tvb_get_guint8(tvb,offset+len),
+       tvb_get_guint8(tvb,offset+len));
+  len+=IP6_MIPv6_SUB_TYPE_LENGTH;
+  proto_tree_add_uint(dstopt_tree, hf_ipv6_mipv6_sub_length, tvb, offset+len,
+       IP6_MIPv6_SUB_LENGTH_LENGTH, tvb_get_guint8(tvb,offset+len));
+  len+=IP6_MIPv6_SUB_LENGTH_LENGTH;
+  proto_tree_add_ipv6(dstopt_tree, hf_ipv6_mipv6_sub_alternative_COA, tvb, offset+len,
+       IP6_MIPv6_SUB_ALTERNATIVE_COA_LENGTH, tvb_get_ptr(tvb,offset+len,IP6_MIPv6_SUB_ALTERNATIVE_COA_LENGTH));
+  len+=IP6_MIPv6_SUB_ALTERNATIVE_COA_LENGTH;                                           
+       return len;
+}
+/* BT INSERT END */
+
+static int
+dissect_opts(const u_char *pd, int offset, frame_data *fd, proto_tree *tree,
+  char *optname) {
+       struct ip6_ext ext;
+  int len;
+  proto_tree *dstopt_tree;
+       proto_item *ti;
+  u_char *p;
+
+       /* BT INSERT BEGIN */
+       tvbuff_t *tvb;
+  int mip_offset=0, delta=0;
+  /* BT INSERT END */
+
+  static const value_string rtalertvals[] = {
+       { IP6OPT_RTALERT_MLD, "MLD" },
+       { IP6OPT_RTALERT_RSVP, "RSVP" },
+       { 0, NULL },
+    };
+
+  memcpy(&ext, (void *) &pd[offset], sizeof(ext));
+  len = (ext.ip6e_len + 1) << 3;
+
+  /* BT INSERT BEGIN */
+       tvb = tvb_create_from_top(offset);
+  /* BT INSERT END */
+
+       if (tree) {
+               /* !!! specify length */
+               ti = proto_tree_add_text(tree, NullTVB, offset, len,
+           "%s Header ", optname);
+
+               dstopt_tree = proto_item_add_subtree(ti, ett_ipv6);
+
+               proto_tree_add_text(dstopt_tree, NullTVB,
+               offset + offsetof(struct ip6_ext, ip6e_nxt), 1,
+         "Next header: %s (0x%02x)", ipprotostr(ext.ip6e_nxt),ext.ip6e_nxt);
+    proto_tree_add_text(dstopt_tree, NullTVB,
+               offset + offsetof(struct ip6_ext, ip6e_len), 1,
+         "Length: %u (%d bytes)", ext.ip6e_len, len);
+
+    /* BT INSERT BEGIN */
+    mip_offset+=2;
+    /* BT INSERT END */
+
+               p = (u_char *)(pd + offset + 2);
+
+               while (p < pd + offset + len) {
+               switch (p[0]) {
+               case IP6OPT_PAD1:
+                                       proto_tree_add_text(dstopt_tree, NullTVB, p - pd, 1,
+                       "Pad1");
+                                       p++;
+          /* BT INSERT BEGIN */
+                                       mip_offset++;
+          /* BT INSERT END */
+                                       break;
+               case IP6OPT_PADN:
+                                       proto_tree_add_text(dstopt_tree, NullTVB, p - pd, p[1] + 2,
+                       "PadN: %u bytes", p[1] + 2);
+                                       p += p[1];
+                                       p += 2;
+          /* BT INSERT BEGIN */
+                                       mip_offset+=tvb_get_guint8(tvb,mip_offset+1)+2;
+          /* BT INSERT END */
+                                       break;
+               case IP6OPT_JUMBO:
+                                       if (p[1] == 4) {
+                               proto_tree_add_text(dstopt_tree, NullTVB, p - pd, p[1] + 2,
+                                               "Jumbo payload: %u (%u bytes)",
+                                               pntohl(&p[2]), p[1] + 2);
+                                       } else {
+                               proto_tree_add_text(dstopt_tree, NullTVB, p - pd, p[1] + 2,
+                                               "Jumbo payload: Invalid length (%u bytes)",
+                                               p[1] + 2);
+                                       }
+                                       p += p[1];
+                                       p += 2;
+          /* BT INSERT BEGIN */
+                                       mip_offset+=tvb_get_guint8(tvb,mip_offset+1)+2;
+          /* BT INSERT END */
+                                       break;
+               case IP6OPT_RTALERT:
+               {
+                                       char *rta;
+
+                                       if (p[1] == 2) {
+                               rta = val_to_str(pntohs(&p[2]), rtalertvals,
+                                               "Unknown");
+                                       } else
+                               rta = "Invalid length";
+                                       ti = proto_tree_add_text(dstopt_tree, NullTVB, p - pd, p[1] + 2,
+                                       "Router alert: %s (%u bytes)", rta, p[1] + 2);
+                                       p += p[1];
+                                       p += 2;
+                                       /* BT INSERT BEGIN */
+                                       mip_offset+=tvb_get_guint8(tvb,mip_offset+1)+2;
+          /* BT INSERT END */
+                                       break;
+               }
+        /* BT INSERT BEGIN */
+                       case IP6OPT_BINDING_UPDATE :
+                       {       
+            delta=dissect_mipv6_bu(tvb, dstopt_tree, mip_offset);
+                                               p+=delta;
+                                               mip_offset+=delta;
+                       break;
+                       }
+                       case IP6OPT_BINDING_ACK :
+                       {                       
+            delta=dissect_mipv6_ba(tvb, dstopt_tree, mip_offset);
+                                               p+=delta;
+                                               mip_offset+=delta;
+                                               break;                  
+                                       }
+                       case IP6OPT_HOME_ADDRESS :
+                       {
+            delta=dissect_mipv6_ha(tvb, dstopt_tree, mip_offset);
+                                               p+=delta;
+                                               mip_offset+=delta;
+                                               break;                  
+          }
+                       case IP6OPT_BINDING_REQUEST :
+                       {
+                 delta=dissect_mipv6_br(tvb, dstopt_tree, mip_offset);
+                                               p+=delta;
+                                               mip_offset+=delta;
+                                               break;
+                                       }
+                       case IP6OPT_MIPv6_UNIQUE_ID_SUB :
+                       {
+                 delta=dissect_mipv6_sub_u(tvb, dstopt_tree, mip_offset);
+                                               p+=delta;
+                                               mip_offset+=delta;
+                                               break;
+                                       }
+                       case IP6OPT_MIPv6_ALTERNATIVE_COA_SUB :
+                       {
+                 delta=dissect_mipv6_sub_a_coa(tvb, dstopt_tree, mip_offset);
+                                               p+=delta;
+                                               mip_offset+=delta;
+                                               break;
+                                       }
+        /* BT INSERT END */
+               default:
+                                       p = (u_char *)(pd + offset + len);
+                                       break;
+               }
+               }
 
-       proto_tree_add_text(dstopt_tree,
-           offset + offsetof(struct ip6_dest, ip6d_len), 1,
-           "Length: %d (%d bytes)", dstopt.ip6d_len, len);
-  
        /* decode... */
-    }
 
+       }
     return len;
 }
 
+static int
+dissect_hopopts(const u_char *pd, int offset, frame_data *fd, proto_tree *tree) {
+    return dissect_opts(pd, offset, fd, tree, "Hop-by-hop Option");
+}
+
+static int
+dissect_dstopts(const u_char *pd, int offset, frame_data *fd, proto_tree *tree) {
+    return dissect_opts(pd, offset, fd, tree, "Destination Option");
+}
 
 void
 dissect_ipv6(const u_char *pd, int offset, frame_data *fd, proto_tree *tree) {
@@ -106,56 +607,71 @@ dissect_ipv6(const u_char *pd, int offset, frame_data *fd, proto_tree *tree) {
   proto_item *ti;
   guint8 nxt;
   int advance;
+  int poffset;
+  int frag;
 
   struct ip6_hdr ipv6;
 
+  OLD_CHECK_DISPLAY_AS_DATA(proto_ipv6, pd, offset, fd, tree);
+
   memcpy(&ipv6, (void *) &pd[offset], sizeof(ipv6)); 
 
-  if (check_col(fd, COL_PROTOCOL))
-    col_add_str(fd, COL_PROTOCOL, "IPv6");
-  if (check_col(fd, COL_RES_NET_SRC))
-    col_add_str(fd, COL_RES_NET_SRC, get_hostname6(&ipv6.ip6_src));
-  if (check_col(fd, COL_UNRES_NET_SRC))
-    col_add_str(fd, COL_UNRES_NET_SRC, ip6_to_str(&ipv6.ip6_src));
-  if (check_col(fd, COL_RES_NET_DST))
-    col_add_str(fd, COL_RES_NET_DST, get_hostname6(&ipv6.ip6_dst));
-  if (check_col(fd, COL_UNRES_NET_DST))
-    col_add_str(fd, COL_UNRES_NET_DST, ip6_to_str(&ipv6.ip6_dst));
+  pi.ipproto = ipv6.ip6_nxt; /* XXX make work TCP follow (ipproto = 6) */
+
+  SET_ADDRESS(&pi.net_src, AT_IPv6, 16, &pd[offset + IP6H_SRC]);
+  SET_ADDRESS(&pi.src, AT_IPv6, 16, &pd[offset + IP6H_SRC]);
+  SET_ADDRESS(&pi.net_dst, AT_IPv6, 16, &pd[offset + IP6H_DST]);
+  SET_ADDRESS(&pi.dst, AT_IPv6, 16, &pd[offset + IP6H_DST]);
 
   if (tree) {
     /* !!! specify length */
-    ti = proto_tree_add_text(tree, offset, 40, "Internet Protocol Version 6");
-    ipv6_tree = proto_item_add_subtree(ti, ETT_IPv6);
+    ti = proto_tree_add_item(tree, proto_ipv6, NullTVB, offset, 40, FALSE);
+    ipv6_tree = proto_item_add_subtree(ti, ett_ipv6);
 
     /* !!! warning: version also contains 4 Bit priority */
-    proto_tree_add_text(ipv6_tree,
+    proto_tree_add_uint(ipv6_tree, hf_ipv6_version, NullTVB,
                offset + offsetof(struct ip6_hdr, ip6_vfc), 1,
-               "Version: %d", ipv6.ip6_vfc >> 4);
+               (ipv6.ip6_vfc >> 4) & 0x0f);
+
 
-    proto_tree_add_text(ipv6_tree,
+    proto_tree_add_uint(ipv6_tree, hf_ipv6_class, NullTVB,
                offset + offsetof(struct ip6_hdr, ip6_flow), 4,
-               "Traffic class: 0x%02x", (ntohl(ipv6.ip6_flow) >> 20) & 0xff);
+               (guint8)((ntohl(ipv6.ip6_flow) >> 20) & 0xff));
 
-    /* there should be no alignment problems for ip6_flow, since it's the first
-    guint32 in the ipv6 struct */
-    proto_tree_add_text(ipv6_tree,
+    /*
+     * there should be no alignment problems for ip6_flow, since it's the first
+     * guint32 in the ipv6 struct
+     */
+    proto_tree_add_uint_format(ipv6_tree, hf_ipv6_flow, NullTVB,
                offset + offsetof(struct ip6_hdr, ip6_flow), 4,
-               "Flowlabel: 0x%05x", ntohl(ipv6.ip6_flow & IPV6_FLOWLABEL_MASK));
+               (unsigned long)(ntohl(ipv6.ip6_flow) & IPV6_FLOWLABEL_MASK),
+               "Flowlabel: 0x%05lx",
+               (unsigned long)(ntohl(ipv6.ip6_flow) & IPV6_FLOWLABEL_MASK));
 
-    proto_tree_add_text(ipv6_tree,
+    proto_tree_add_uint(ipv6_tree, hf_ipv6_plen, NullTVB,
                offset + offsetof(struct ip6_hdr, ip6_plen), 2,
-               "Payload Length: %d", ntohs(ipv6.ip6_plen));
+               ntohs(ipv6.ip6_plen));
 
-    proto_tree_add_text(ipv6_tree,
+    proto_tree_add_uint_format(ipv6_tree, hf_ipv6_nxt, NullTVB,
                offset + offsetof(struct ip6_hdr, ip6_nxt), 1,
-               "Next Header: %d", ipv6.ip6_nxt);
+               ipv6.ip6_nxt,
+               "Next header: %s (0x%02x)",
+               ipprotostr(ipv6.ip6_nxt), ipv6.ip6_nxt);
 
-    proto_tree_add_text(ipv6_tree,
+    proto_tree_add_uint(ipv6_tree, hf_ipv6_hlim, NullTVB,
                offset + offsetof(struct ip6_hdr, ip6_hlim), 1,
-               "Hop limit: %d", ipv6.ip6_hlim);
+               ipv6.ip6_hlim);
 
-    proto_tree_add_text(ipv6_tree,
+    proto_tree_add_ipv6_hidden(ipv6_tree, hf_ipv6_addr, NullTVB, 
+                              offset + offsetof(struct ip6_hdr, ip6_src), 16,
+                              ipv6.ip6_src.s6_addr8);
+    proto_tree_add_ipv6_hidden(ipv6_tree, hf_ipv6_addr, NullTVB, 
+                              offset + offsetof(struct ip6_hdr, ip6_dst), 16,
+                              ipv6.ip6_dst.s6_addr8);
+
+    proto_tree_add_ipv6_format(ipv6_tree, hf_ipv6_src, NullTVB,
                offset + offsetof(struct ip6_hdr, ip6_src), 16,
+               (guint8 *)&ipv6.ip6_src,
 #ifdef INET6
                "Source address: %s (%s)",
                get_hostname6(&ipv6.ip6_src),
@@ -164,8 +680,9 @@ dissect_ipv6(const u_char *pd, int offset, frame_data *fd, proto_tree *tree) {
 #endif
                ip6_to_str(&ipv6.ip6_src));
 
-       proto_tree_add_text(ipv6_tree,
+    proto_tree_add_ipv6_format(ipv6_tree, hf_ipv6_dst, NullTVB,
                offset + offsetof(struct ip6_hdr, ip6_dst), 16,
+               (guint8 *)&ipv6.ip6_dst,
 #ifdef INET6
                "Destination address: %s (%s)",
                get_hostname6(&ipv6.ip6_dst),
@@ -176,226 +693,219 @@ dissect_ipv6(const u_char *pd, int offset, frame_data *fd, proto_tree *tree) {
   }
 
   /* start of the new header (could be a extension header) */
-  offset += 40;
-  nxt = ipv6.ip6_nxt;
+  nxt = pd[poffset = offset + offsetof(struct ip6_hdr, ip6_nxt)];
+  offset += sizeof(struct ip6_hdr);
+  frag = 0;
+
+/* start out assuming this insn't fragmented */
+       pi.fragmented = FALSE;
 
 again:
     switch (nxt) {
     case IP_PROTO_HOPOPTS:
-       dissect_hopopts(pd, offset, fd, tree);
-#if 0
-       goto again;
-#else
-       break;
-#endif
-    case IP_PROTO_IPIP:
-       dissect_ip(pd, offset, fd, tree);
-       break;
+                       advance = dissect_hopopts(pd, offset, fd, tree);
+                       nxt = pd[poffset = offset];
+                       offset += advance;
+                       goto again;
     case IP_PROTO_ROUTING:
-       dissect_routing6(pd, offset, fd, tree);
-#if 0
-       goto again;
-#else
-       break;
-#endif
+                       advance = dissect_routing6(pd, offset, fd, tree);
+                       nxt = pd[poffset = offset];
+                       offset += advance;
+                       goto again;
     case IP_PROTO_FRAGMENT:
-       dissect_frag6(pd, offset, fd, tree);
-#if 0
-       goto again;
-#else
-       break;
-#endif
-    case IP_PROTO_ICMPV6:
-       dissect_icmpv6(pd, offset, fd, tree);
-       break;
-    case IP_PROTO_NONE:
-       if (check_col(fd, COL_INFO)) {
-           col_add_fstr(fd, COL_INFO, "IPv6 no next header");
-       }
-       break;
+                       pi.fragmented = TRUE;
+                       advance = dissect_frag6(pd, offset, fd, tree, &frag);
+                       nxt = pd[poffset = offset];
+                       offset += advance;
+                       goto again;
     case IP_PROTO_AH:
-       advance = dissect_ah(pd, offset, fd, tree);
-       nxt = pd[offset];
-       offset += advance;
+                       advance = dissect_ah_old(pd, offset, fd, tree);
+                       nxt = pd[poffset = offset];
+                       offset += advance;
        goto again;
-    case IP_PROTO_ESP:
-       dissect_esp(pd, offset, fd, tree);
-       break;
     case IP_PROTO_DSTOPTS:
-       advance = dissect_dstopts(pd, offset, fd, tree);
-       nxt = pd[offset];
-       offset += advance;
-       goto again;
-    case IP_PROTO_TCP:
-       dissect_tcp(pd, offset, fd, tree);
-       break;
-    case IP_PROTO_UDP:
-       dissect_udp(pd, offset, fd, tree);
-       break;
-    default:
-       if (check_col(fd, COL_INFO)) {
-           col_add_fstr(fd, COL_INFO, "Unknown IPv6 protocol (0x%02x)",
-               ipv6.ip6_nxt);
-       }
-       dissect_data(pd, offset, fd, tree);
+                       advance = dissect_dstopts(pd, offset, fd, tree);
+                       nxt = pd[poffset = offset];
+                       offset += advance;
+                       goto again;
     }
-}
-
-gchar *
-ip6_to_str(struct e_in6_addr *ad) {
-  static gchar buf[4 * 8 + 8];
-
-  inet_ntop6((u_char*)ad, (gchar*)buf, sizeof(buf));
-  return buf;
-}
 
-#ifndef NS_IN6ADDRSZ
-#define NS_IN6ADDRSZ   16
+#ifdef TEST_FINALHDR
+  proto_tree_add_uint_hidden(ipv6_tree, hf_ipv6_final, NullTVB, poffset, 1, nxt);
 #endif
+  if (frag) {
+    /* fragmented */
+    if (check_col(fd, COL_PROTOCOL))
+      col_set_str(fd, COL_PROTOCOL, "IPv6");
+    /* COL_INFO was filled in by "dissect_frag6()" */
+    old_dissect_data(pd, offset, fd, tree);
+  }    else {
+    /* do lookup with the subdissector table */
+    if (!old_dissector_try_port(ip_dissector_table, nxt, pd, offset, fd, tree)) {
+      /* Unknown protocol */
+      if (check_col(fd, COL_PROTOCOL))
+       col_set_str(fd, COL_PROTOCOL, "IPv6");
+      if (check_col(fd, COL_INFO))
+       col_add_fstr(fd, COL_INFO, "%s (0x%02x)", ipprotostr(nxt),nxt);
+      old_dissect_data(pd, offset, fd, tree);
+    }
+  }
+}
 
-#ifndef NS_INT16SZ
-#define NS_INT16SZ     (sizeof(guint16))
-#endif
-
-#define SPRINTF(x) ((size_t)sprintf x)
-
-/*
- * Copyright (c) 1996-1999 by Internet Software Consortium.
- *
- * Permission to use, copy, modify, and distribute this software for any
- * purpose with or without fee is hereby granted, provided that the above
- * copyright notice and this permission notice appear in all copies.
- *
- * THE SOFTWARE IS PROVIDED "AS IS" AND INTERNET SOFTWARE CONSORTIUM DISCLAIMS
- * ALL WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES
- * OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL INTERNET SOFTWARE
- * CONSORTIUM BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL
- * DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR
- * PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS
- * ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
- * SOFTWARE.
- */
+static void
+dissect_ipv6_none(const u_char *pd, int offset, frame_data *fd, proto_tree *tree) {
+  /* BT INSERT BEGIN */
+  if (hf_ipv6_mipv6_length!=-1) {
+       if (check_col(fd, COL_PROTOCOL))
+       col_set_str(fd, COL_PROTOCOL, "IPv6");
+       if (check_col(fd, COL_INFO))
+       col_add_fstr(fd, COL_INFO, "MobileIPv6 Destination Option");
+       } else {
+  /* BT INSERT END */
+  if (check_col(fd, COL_INFO))
+    col_add_fstr(fd, COL_INFO, "IPv6 no next header");
+  }
+  /* XXX - dissect the payload as padding? */
+}
 
-/* const char *
- * inet_ntop4(src, dst, size)
- *     format an IPv4 address
- * return:
- *     `dst' (as a const)
- * notes:
- *     (1) uses no statics
- *     (2) takes a u_char* not an in_addr as input
- * author:
- *     Paul Vixie, 1996.
- */
-static const char *
-inet_ntop4(src, dst, size)
-       const u_char *src;
-       char *dst;
-       size_t size;
+void
+proto_register_ipv6(void)
 {
-       static const char fmt[] = "%u.%u.%u.%u";
-       char tmp[sizeof "255.255.255.255"];
-
-       if (SPRINTF((tmp, fmt, src[0], src[1], src[2], src[3])) > size) {
-               return (NULL);
-       }
-       strcpy(dst, tmp);
-       return (dst);
+  static hf_register_info hf[] = {
+    { &hf_ipv6_version,
+      { "Version",             "ipv6.version",
+                               FT_UINT8, BASE_DEC, NULL, 0x0, "" }},
+    { &hf_ipv6_class,
+      { "Traffic class",       "ipv6.class",
+                               FT_UINT8, BASE_HEX, NULL, 0x0, "" }},
+    { &hf_ipv6_flow,
+      { "Flowlabel",           "ipv6.flow",
+                               FT_UINT32, BASE_HEX, NULL, 0x0, "" }},
+    { &hf_ipv6_plen,
+      { "Payload length",      "ipv6.plen",
+                               FT_UINT16, BASE_DEC, NULL, 0x0, "" }},
+    { &hf_ipv6_nxt,
+      { "Next header",         "ipv6.nxt",
+                               FT_UINT8, BASE_HEX, NULL, 0x0, "" }},
+    { &hf_ipv6_hlim,
+      { "Hop limit",           "ipv6.hlim",
+                               FT_UINT8, BASE_DEC, NULL, 0x0, "" }},
+    { &hf_ipv6_src,
+      { "Source",              "ipv6.src",
+                               FT_IPv6, BASE_NONE, NULL, 0x0,
+                               "Source IPv6 Address" }},
+    { &hf_ipv6_dst,
+      { "Destination",         "ipv6.dst",
+                               FT_IPv6, BASE_NONE, NULL, 0x0,
+                               "Destination IPv6 Address" }},
+    { &hf_ipv6_addr,
+      { "Address",             "ipv6.addr",
+                               FT_IPv6, BASE_NONE, NULL, 0x0,
+                               "Source or Destination IPv6 Address" }},
+
+    /* BT INSERT BEGIN */
+    { &hf_ipv6_mipv6_type,
+      { "Option Type ",                "ipv6.mipv6_type",
+                               FT_UINT8, BASE_DEC, NULL, 0x0,
+                               "" }},
+    { &hf_ipv6_mipv6_length,
+      { "Option Length ",              "ipv6.mipv6_length",
+                               FT_UINT8, BASE_DEC, NULL, 0x0,
+                               "" }},
+    { &hf_ipv6_mipv6_a_flag,
+      { "Acknowledge (A) ",            "ipv6.mipv6_a_flag",
+                               FT_BOOLEAN, 8, TFS(&ipv6_mipv6_bu_a_flag_value),
+                               IP6_MIPv6_BU_A_FLAG,
+                               "" }},
+    { &hf_ipv6_mipv6_h_flag,
+      { "Home Registration (H) ",              "ipv6.mipv6_h_flag",
+                               FT_BOOLEAN, 8, TFS(&ipv6_mipv6_bu_h_flag_value),
+                               IP6_MIPv6_BU_H_FLAG,
+                               "" }},
+    { &hf_ipv6_mipv6_r_flag,
+      { "Router (R) ",         "ipv6.mipv6_r_flag",
+                               FT_BOOLEAN, 8, TFS(&ipv6_mipv6_bu_r_flag_value),
+                               IP6_MIPv6_BU_R_FLAG,
+                               "" }},
+    { &hf_ipv6_mipv6_d_flag,
+      { "Duplicate Address Detection (D) ",            "ipv6.mipv6_d_flag",
+                               FT_BOOLEAN, 8, TFS(&ipv6_mipv6_bu_d_flag_value),
+                               IP6_MIPv6_BU_D_FLAG,
+                               "" }},
+    { &hf_ipv6_mipv6_m_flag,
+      { "MAP Registration (M) ",               "ipv6.mipv6_m_flag",
+                               FT_BOOLEAN, 8, TFS(&ipv6_mipv6_bu_m_flag_value),
+                               IP6_MIPv6_BU_M_FLAG,
+                               "" }},
+    { &hf_ipv6_mipv6_b_flag,
+      { "Bicasting all (B) ",          "ipv6.mipv6_b_flag",
+                               FT_BOOLEAN, 8, TFS(&ipv6_mipv6_bu_b_flag_value),
+                               IP6_MIPv6_BU_B_FLAG,
+                               "" }},
+    { &hf_ipv6_mipv6_prefix_length,
+      { "Prefix Length ",              "ipv6.mipv6_prefix_length",
+                               FT_UINT8, BASE_DEC, NULL, 0x0,
+                               "" }},
+    { &hf_ipv6_mipv6_sequence_number,
+      { "Sequence Number ",            "ipv6.mipv6_sequence_number",
+                               FT_UINT16, BASE_DEC, NULL, 0x0,
+                               "" }},
+    { &hf_ipv6_mipv6_life_time,
+      { "Life Time ",          "ipv6.mipv6_life_time",
+                               FT_UINT32, BASE_DEC, NULL, 0x0,
+                               "" }},
+    { &hf_ipv6_mipv6_status,
+      { "Status ",             "ipv6.mipv6_status",
+                               FT_UINT8, BASE_DEC, NULL, 0x0,
+                               "" }},
+    { &hf_ipv6_mipv6_refresh,
+      { "Refresh ",            "ipv6.mipv6_refresh",
+                               FT_UINT32, BASE_DEC, NULL, 0x0,
+                               "" }},
+    { &hf_ipv6_mipv6_home_address,
+      { "Home Address ",               "ipv6.mipv6_home_address",
+                               FT_IPv6, BASE_HEX, NULL, 0x0,
+                               "" }},
+    { &hf_ipv6_mipv6_sub_type,
+      { "Sub-Option Type ",            "ipv6.mipv6_sub_type",
+                               FT_UINT8, BASE_NONE, NULL, 0x0,
+                               "" }},
+    { &hf_ipv6_mipv6_sub_length,
+      { "Sub-Option Length ",          "ipv6.mipv6_sub_length",
+                               FT_UINT8, BASE_NONE, NULL, 0x0,
+                               "" }},
+    { &hf_ipv6_mipv6_sub_unique_ID,
+      { "Unique Identifier ",          "ipv6.mipv6_sub_unique_ID",
+                               FT_UINT16, BASE_NONE, NULL, 0x0,
+                               "" }},
+    { &hf_ipv6_mipv6_sub_alternative_COA,
+      { "Alternative Care of Address ",                "ipv6.mipv6_sub_alternative_COA",
+                               FT_IPv6, BASE_HEX, NULL, 0x0,
+                               "" }},
+
+    /* BT INSERT END */
+#ifdef TEST_FINALHDR
+    { &hf_ipv6_final,
+      { "Final next header",   "ipv6.final",
+                               FT_UINT8, BASE_HEX, NULL, 0x0, "" }},
+#endif
+  };
+  static gint *ett[] = {
+    &ett_ipv6,
+  };
+
+  proto_ipv6 = proto_register_protocol("Internet Protocol Version 6", "IPv6", "ipv6");
+  proto_register_field_array(proto_ipv6, hf, array_length(hf));
+  proto_register_subtree_array(ett, array_length(ett));
 }
 
-/* const char *
- * inet_ntop6(src, dst, size)
- *     convert IPv6 binary address into presentation (printable) format
- * author:
- *     Paul Vixie, 1996.
- */
-static const char *
-inet_ntop6(src, dst, size)
-       const u_char *src;
-       char *dst;
-       size_t size;
+void
+proto_reg_handoff_ipv6(void)
 {
-       /*
-        * Note that int32_t and int16_t need only be "at least" large enough
-        * to contain a value of the specified size.  On some systems, like
-        * Crays, there is no such thing as an integer variable with 16 bits.
-        * Keep this in mind if you think this function should have been coded
-        * to use pointer overlays.  All the world's not a VAX.
-        */
-       char tmp[sizeof "ffff:ffff:ffff:ffff:ffff:ffff:255.255.255.255"], *tp;
-       struct { int base, len; } best, cur;
-       u_int words[NS_IN6ADDRSZ / NS_INT16SZ];
-       int i;
-
-       /*
-        * Preprocess:
-        *      Copy the input (bytewise) array into a wordwise array.
-        *      Find the longest run of 0x00's in src[] for :: shorthanding.
-        */
-       memset(words, '\0', sizeof words);
-       for (i = 0; i < NS_IN6ADDRSZ; i++)
-               words[i / 2] |= (src[i] << ((1 - (i % 2)) << 3));
-       best.base = -1;
-       cur.base = -1;
-       for (i = 0; i < (NS_IN6ADDRSZ / NS_INT16SZ); i++) {
-               if (words[i] == 0) {
-                       if (cur.base == -1)
-                               cur.base = i, cur.len = 1;
-                       else
-                               cur.len++;
-               } else {
-                       if (cur.base != -1) {
-                               if (best.base == -1 || cur.len > best.len)
-                                       best = cur;
-                               cur.base = -1;
-                       }
-               }
-       }
-       if (cur.base != -1) {
-               if (best.base == -1 || cur.len > best.len)
-                       best = cur;
-       }
-       if (best.base != -1 && best.len < 2)
-               best.base = -1;
-
-       /*
-        * Format the result.
-        */
-       tp = tmp;
-       for (i = 0; i < (NS_IN6ADDRSZ / NS_INT16SZ); i++) {
-               /* Are we inside the best run of 0x00's? */
-               if (best.base != -1 && i >= best.base &&
-                   i < (best.base + best.len)) {
-                       if (i == best.base)
-                               *tp++ = ':';
-                       continue;
-               }
-               /* Are we following an initial run of 0x00s or any real hex? */
-               if (i != 0)
-                       *tp++ = ':';
-               /* Is this address an encapsulated IPv4? */
-               if (i == 6 && best.base == 0 &&
-                   (best.len == 6 || (best.len == 5 && words[5] == 0xffff))) {
-                       if (!inet_ntop4(src+12, tp, sizeof tmp - (tp - tmp)))
-                               return (NULL);
-                       tp += strlen(tp);
-                       break;
-               }
-               tp += SPRINTF((tp, "%x", words[i]));
-       }
-       /* Was it a trailing run of 0x00's? */
-       if (best.base != -1 && (best.base + best.len) == 
-           (NS_IN6ADDRSZ / NS_INT16SZ))
-               *tp++ = ':';
-       *tp++ = '\0';
-
-       /*
-        * Check for overflow, copy, and we're done.
-        */
-       if ((size_t)(tp - tmp) > size) {
-               return (NULL);
-       }
-       strcpy(dst, tmp);
-       return (dst);
+       old_dissector_add("ethertype", ETHERTYPE_IPv6, dissect_ipv6, proto_ipv6);
+       old_dissector_add("ppp.protocol", PPP_IPV6, dissect_ipv6, proto_ipv6);
+       old_dissector_add("ip.proto", IP_PROTO_IPV6, dissect_ipv6, proto_ipv6);
+       old_dissector_add("null.type", BSD_AF_INET6_BSD, dissect_ipv6, proto_ipv6);
+       old_dissector_add("null.type", BSD_AF_INET6_FREEBSD, dissect_ipv6, proto_ipv6);
+       old_dissector_add("ip.proto", IP_PROTO_NONE, dissect_ipv6_none, proto_ipv6);
 }
-