nexmon – Rev 1

Subversion Repositories:
Rev:
/* packet-nlsp.c
 * Routines for NetWare Link Services Protocol
 *
 * Based on ISIS dissector by Stuart Stanley <stuarts@mxmail.net>
 *
 * Wireshark - Network traffic analyzer
 * By Gerald Combs <gerald@wireshark.org>
 * 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
 * as published by the Free Software Foundation; either version 2
 * of the License, or (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
 */

#include "config.h"

#include <epan/packet.h>
#include <epan/expert.h>
#include <epan/to_str.h>
#include "packet-ipx.h"

void proto_register_nlsp(void);
void proto_reg_handoff_nlsp(void);

/* NLSP base header */
static int proto_nlsp                    = -1;

static int hf_nlsp_irpd                  = -1;
static int hf_nlsp_header_length         = -1;
static int hf_nlsp_minor_version         = -1;
static int hf_nlsp_nr                    = -1;
static int hf_nlsp_type                  = -1;
static int hf_nlsp_major_version         = -1;
static int hf_nlsp_packet_length         = -1;
static int hf_nlsp_hello_state           = -1;
static int hf_nlsp_hello_multicast       = -1;
static int hf_nlsp_hello_circuit_type    = -1;
static int hf_nlsp_hello_holding_timer   = -1;
static int hf_nlsp_hello_priority        = -1;
static int hf_nlsp_lsp_sequence_number   = -1;
static int hf_nlsp_lsp_checksum          = -1;
static int hf_nlsp_lsp_p                 = -1;
static int hf_nlsp_lsp_attached_flag     = -1;
static int hf_nlsp_lsp_lspdbol           = -1;
static int hf_nlsp_lsp_router_type       = -1;
static int hf_nlsp_lsp_link_info_clv_flags_cost_present = -1;
static int hf_nlsp_lsp_link_info_clv_flags_cost_metric = -1;
static int hf_nlsp_lsp_link_info_clv_flags_cost = -1;

/* Generated from convert_proto_tree_add_text.pl */
static int hf_nlsp_psnp_lsp_checksum = -1;
static int hf_nlsp_csnp_start_lsp_id_source_id = -1;
static int hf_nlsp_svcs_info_node_number = -1;
static int hf_nlsp_ext_routes_rip_delay = -1;
static int hf_nlsp_psnp_source_id_system_id = -1;
static int hf_nlsp_svcs_info_socket = -1;
static int hf_nlsp_hello_sending_router_system_id = -1;
static int hf_nlsp_csnp_start_lsp_id_lsp_number = -1;
static int hf_nlsp_lsp_id_system_id = -1;
static int hf_nlsp_psnp_lsp_id_pseudonode_id = -1;
static int hf_nlsp_csnp_end_lsp_id_lsp_number = -1;
static int hf_nlsp_remaining_lifetime = -1;
static int hf_nlsp_csnp_remaining_lifetime = -1;
static int hf_nlsp_psnp_lsp_id_source_id = -1;
static int hf_nlsp_ext_routes_hops = -1;
static int hf_nlsp_hello_local_mtu_mtu_size = -1;
static int hf_nlsp_link_info_throughput = -1;
static int hf_nlsp_link_info_media_type = -1;
static int hf_nlsp_mgt_info_name = -1;
static int hf_nlsp_mgt_info_node_number = -1;
static int hf_nlsp_csnp_end_lsp_id_source_id = -1;
static int hf_nlsp_csnp_lsp_id_pseudonode_id = -1;
static int hf_nlsp_psnp_lsp_sequence_number = -1;
static int hf_nlsp_link_info_mtu_size = -1;
static int hf_nlsp_lsp_id_lsp_number = -1;
static int hf_nlsp_unknown_code = -1;
static int hf_nlsp_mgt_info_ipx_version_number = -1;
static int hf_nlsp_link_info_router_pseudonode_id = -1;
static int hf_nlsp_psnp_source_id_pseudonode_id = -1;
static int hf_nlsp_csnp_lsp_id_lsp_number = -1;
static int hf_nlsp_csnp_source_id_pseudonode_id = -1;
static int hf_nlsp_csnp_end_lsp_id_pseudonode_id = -1;
static int hf_nlsp_csnp_lsp_sequence_number = -1;
static int hf_nlsp_link_info_router_system_id = -1;
static int hf_nlsp_svcs_info_type = -1;
static int hf_nlsp_csnp_lsp_checksum = -1;
static int hf_nlsp_hello_local_wan_circuit_id = -1;
static int hf_nlsp_svcs_info_service_name = -1;
static int hf_nlsp_mgt_info_name_length = -1;
static int hf_nlsp_neighbor = -1;
static int hf_nlsp_area_address_network_number = -1;
static int hf_nlsp_link_info_delay = -1;
static int hf_nlsp_csnp_start_lsp_id_pseudonode_id = -1;
static int hf_nlsp_svcs_info_network_number = -1;
static int hf_nlsp_csnp_source_id_system_id = -1;
static int hf_nlsp_mgt_info_network_number = -1;
static int hf_nlsp_hello_designated_router_pseudonode_id = -1;
static int hf_nlsp_lsp_id_pseudonode_id = -1;
static int hf_nlsp_csnp_lsp_id_source_id = -1;
static int hf_nlsp_psnp_remaining_lifetime = -1;
static int hf_nlsp_area_address_mask = -1;
static int hf_nlsp_hello_designated_router_system_id = -1;
static int hf_nlsp_svcs_info_hops_to_reach_the_service = -1;
static int hf_nlsp_psnp_lsp_id_lsp_number = -1;
static int hf_nlsp_ext_routes_network_number = -1;

static expert_field ei_nlsp_short_packet = EI_INIT;
static expert_field ei_nlsp_long_packet = EI_INIT;
static expert_field ei_nlsp_major_version = EI_INIT;
static expert_field ei_nlsp_type = EI_INIT;

static gint ett_nlsp                     = -1;
static gint ett_nlsp_hello_clv_area_addr = -1;
static gint ett_nlsp_hello_clv_neighbors = -1;
static gint ett_nlsp_hello_local_mtu     = -1;
static gint ett_nlsp_hello_clv_unknown   = -1;
static gint ett_nlsp_lsp_info            = -1;
static gint ett_nlsp_lsp_clv_area_addr   = -1;
static gint ett_nlsp_lsp_clv_mgt_info    = -1;
static gint ett_nlsp_lsp_clv_link_info   = -1;
static gint ett_nlsp_lsp_clv_svcs_info   = -1;
static gint ett_nlsp_lsp_clv_ext_routes  = -1;
static gint ett_nlsp_lsp_clv_unknown     = -1;
static gint ett_nlsp_csnp_lsp_entries    = -1;
static gint ett_nlsp_csnp_lsp_entry      = -1;
static gint ett_nlsp_csnp_clv_unknown    = -1;
static gint ett_nlsp_psnp_lsp_entries    = -1;
static gint ett_nlsp_psnp_lsp_entry      = -1;
static gint ett_nlsp_psnp_clv_unknown    = -1;

#define PACKET_TYPE_MASK        0x1f

/*
 * See
 *
 *      http://www.cisco.com/univercd/cc/td/doc/cisintwk/ito_doc/nlsp.htm
 *
 * for some information about Hello packets.
 */

#define NLSP_TYPE_L1_HELLO      15
#define NLSP_TYPE_WAN_HELLO     17
#define NLSP_TYPE_L1_LSP        18
#define NLSP_TYPE_L1_CSNP       24
#define NLSP_TYPE_L1_PSNP       26

static const value_string nlsp_packet_type_vals[] = {
        { NLSP_TYPE_L1_HELLO,  "L1 Hello"},
        { NLSP_TYPE_WAN_HELLO, "WAN Hello"},
        { NLSP_TYPE_L1_LSP,    "L1 LSP"},
        { NLSP_TYPE_L1_CSNP,   "L1 CSNP"},
        { NLSP_TYPE_L1_PSNP,   "L1 PSNP"},
        { 0,                   NULL}
};

static const value_string nlsp_attached_flag_vals[] = {
        { 0, "Other routing areas cannot be reached through this router"},
        { 1, "Other routing areas can be reached through this router"},
        { 0, NULL}
};

static const value_string nlsp_router_type_vals[] = {
        { 1, "Level 1 Router"},
        { 3, "Level 1 and Level 2 Router"},
        { 0, NULL}
};

static const true_false_string tfs_internal_external = { "Internal", "External" };

/*
 * Our sub-packet dismantle structure for CLV's
 */
typedef struct {
        int             optcode;                /* code for option */
        const char      *tree_text;             /* text for fold out */
        gint            *tree_id;               /* id for add_item */
        void            (*dissect)(tvbuff_t *tvb, packet_info* pinfo, proto_tree *tree,
                                int offset, int length);
} nlsp_clv_handle_t;

/*
 * Name: nlsp_dissect_clvs()
 *
 * Description:
 *      Dispatch routine to shred all the CLVs in a packet.  We just
 *      walk through the clv entries in the packet.  For each one, we
 *      search the passed in valid clv's for this protocol (opts) for
 *      a matching code.  If found, we add to the display tree and
 *      then call the dissector.  If it is not, we just post an
 *      "unknown" clv entry using the passed in unknown clv tree id.
 *      XXX: The "unknown tree id" is an 'ett' index for use
 *           when creating a subtree;
 *           Since the 'unknown' subtree was not actually used in the
 *           code below, what was the intention for this ?
 *           For now: code related to creating an 'unknown' subtrree
 *            disabled.
 *
 * Input:
 *      tvbuff_t * : tvbuffer for packet data
 *      proto_tree * : protocol display tree to fill out.  May be NULL
 *      int : offset into packet data where we are.
 *      nlsp_clv_handle_t * : NULL dissector terminated array of codes
 *              and handlers (along with tree text and tree id's).
 *      int : length of CLV area.
 *      int : unknown clv tree id
 *
 * Output:
 *      void, but we will add to proto tree if !NULL.
 */
static void
nlsp_dissect_clvs(tvbuff_t *tvb, packet_info* pinfo, proto_tree *tree, int offset,
        const nlsp_clv_handle_t *opts, int len, int unknown_tree_id _U_)
{
        guint8 code;
        guint8 length;
        int q;
        proto_tree      *clv_tree;

        while ( len > 0 ) {
                code = tvb_get_guint8(tvb, offset);
                offset += 1;
                len -= 1;
                if (len == 0)
                        break;

                length = tvb_get_guint8(tvb, offset);
                offset += 1;
                len -= 1;
                if (len == 0)
                        break;

                if ( len < length ) {
                        proto_tree_add_expert_format(tree, pinfo, &ei_nlsp_short_packet, tvb, offset, -1,
                                "Short CLV header (%d vs %d)", length, len );
                        return;
                }
                q = 0;
                while ((opts[q].dissect != NULL )&&( opts[q].optcode != code )){
                        q++;
                }
                if ( opts[q].dissect ) {
                        /* adjust by 2 for code/len octets */
                        clv_tree = proto_tree_add_subtree_format(tree, tvb, offset - 2,
                                        length + 2, *opts[q].tree_id, NULL, "%s (%u)",
                                        opts[q].tree_text, length );
                        opts[q].dissect(tvb, pinfo, clv_tree, offset,
                            length);
                } else {
                        proto_item* ti;
                        ti = proto_tree_add_uint_format_value(tree, hf_nlsp_unknown_code, tvb, offset - 2,
                                        1, code, "%u (%u)", code, length);
                        proto_item_set_len(ti, length + 2);
                }
                offset += length;
                len -= length;
        }
}

/*
 * Name: dissect_area_address_clv()
 *
 * Description:
 *      Decode an area address clv.
 *
 * Input:
 *      tvbuff_t * : tvbuffer for packet data
 *      proto_tree * : protocol display tree to fill out.  May be NULL
 *      int : offset into packet data where we are.
 *      int : length of clv we are decoding
 *
 * Output:
 *      void, but we will add to proto tree if !NULL.
 */
static void
dissect_area_address_clv(tvbuff_t *tvb, packet_info* pinfo, proto_tree *tree, int offset,
                         int length)
{
        while (length > 0) {
                if (length < 4) {
                        proto_tree_add_expert_format(tree, pinfo, &ei_nlsp_short_packet, tvb, offset, -1,
                            "Short area address entry");
                        return;
                }
                proto_tree_add_item(tree, hf_nlsp_area_address_network_number, tvb, offset, 4, ENC_BIG_ENDIAN);

                offset += 4;
                length -= 4;

                if (length < 4) {
                        proto_tree_add_expert_format(tree, pinfo, &ei_nlsp_short_packet, tvb, offset, -1,
                            "Short area address entry");
                        return;
                }
                proto_tree_add_item(tree, hf_nlsp_area_address_mask, tvb, offset, 4, ENC_BIG_ENDIAN);

                offset += 4;
                length -= 4;
        }
}

/*
 * Name: dissect_neighbor_clv()
 *
 * Description:
 *      Decode an neighbor clv.
 *
 * Input:
 *      tvbuff_t * : tvbuffer for packet data
 *      proto_tree * : protocol display tree to fill out.  May be NULL
 *      int : offset into packet data where we are.
 *      int : length of clv we are decoding
 *
 * Output:
 *      void, but we will add to proto tree if !NULL.
 */
static void
dissect_neighbor_clv(tvbuff_t *tvb, packet_info* pinfo, proto_tree *tree, int offset,
                     int length)
{
        while (length > 0) {
                if (length < 6) {
                        proto_tree_add_expert_format(tree, pinfo, &ei_nlsp_short_packet,
                                        tvb, offset, -1, "Short neighbor entry");
                        return;
                }
                proto_tree_add_item(tree, hf_nlsp_neighbor, tvb, offset, 6, ENC_NA);
                offset += 6;
                length -= 6;
        }
}

/*
 * Name: dissect_hello_local_mtu_clv()
 *
 * Description:
 *      Decode for a hello packet's local MTU clv.
 *
 * Input:
 *      tvbuff_t * : tvbuffer for packet data
 *      proto_tree * : protocol display tree to fill out.  May be NULL
 *      int : offset into packet data where we are.
 *      int : length of clv we are decoding
 *
 * Output:
 *      void, but we will add to proto tree if !NULL.
 */
static void
dissect_hello_local_mtu_clv(tvbuff_t *tvb, packet_info* pinfo, proto_tree *tree, int offset,
                            int length)
{
        if (length < 4) {
                proto_tree_add_expert_format(tree, pinfo, &ei_nlsp_short_packet, tvb, offset, -1,
                    "Short link info entry");
                return;
        }
        proto_tree_add_item(tree, hf_nlsp_hello_local_mtu_mtu_size, tvb, offset, 4, ENC_BIG_ENDIAN);
}

static const nlsp_clv_handle_t clv_hello_opts[] = {
        {
                0xC0,
                "Area address(es)",
                &ett_nlsp_hello_clv_area_addr,
                dissect_area_address_clv
        },
        {
                6,
                "Neighbors",
                &ett_nlsp_hello_clv_neighbors,
                dissect_neighbor_clv
        },
        {
                0xC5,
                "Local MTU",
                &ett_nlsp_hello_local_mtu,
                dissect_hello_local_mtu_clv
        },

        {
                0,
                "",
                NULL,
                NULL
        }
};

/*
 * Name: nlsp_dissect_nlsp_hello()
 *
 * Description:
 *      This procedure rips apart NLSP hellos.
 *
 * Input:
 *      tvbuff_t * : tvbuffer for packet data
 *      proto_tree * : protocol display tree to add to.  May be NULL.
 *      int offset : our offset into packet data.
 *      int : hello type, a la NLSP_TYPE_* values
 *      int : header length of packet.
 *
 * Output:
 *      void, will modify proto_tree if not NULL.
 */
#define NLSP_HELLO_CTYPE_MASK           0x03
#define NLSP_HELLO_STATE_MASK           0xC0
#define NLSP_HELLO_MULTICAST_MASK       0x10

static const value_string nlsp_hello_state_vals[] = {
        { 0, "Up" },
        { 1, "Initializing" },
        { 2, "Down" },
        { 0, NULL }
};

#define NLSP_HELLO_TYPE_RESERVED        0
#define NLSP_HELLO_TYPE_LEVEL_1         1
#define NLSP_HELLO_TYPE_LEVEL_2         2
#define NLSP_HELLO_TYPE_LEVEL_12        3

static const value_string nlsp_hello_circuit_type_vals[] = {
        { NLSP_HELLO_TYPE_RESERVED,     "Reserved 0 (discard PDU)"},
        { NLSP_HELLO_TYPE_LEVEL_1,      "Level 1 only"},
        { NLSP_HELLO_TYPE_LEVEL_2,      "Level 2 only"},
        { NLSP_HELLO_TYPE_LEVEL_12,     "Level 1 and 2"},
        { 0,            NULL}
};

#define NLSP_HELLO_PRIORITY_MASK        0x7f

static void
nlsp_dissect_nlsp_hello(tvbuff_t *tvb, packet_info *pinfo, proto_tree *tree,
                        int offset, int hello_type, int header_length)
{
        guint16         packet_length;
        int             len;
        guint16         holding_timer;

        if (hello_type == NLSP_TYPE_WAN_HELLO) {
                proto_tree_add_item(tree, hf_nlsp_hello_state, tvb,
                        offset, 1, ENC_BIG_ENDIAN);
        } else {
                proto_tree_add_item(tree, hf_nlsp_hello_multicast, tvb,
                        offset, 1, ENC_BIG_ENDIAN);
        }
        proto_tree_add_item(tree, hf_nlsp_hello_circuit_type, tvb,
                offset, 1, ENC_BIG_ENDIAN);
        offset += 1;

        proto_tree_add_item(tree, hf_nlsp_hello_sending_router_system_id, tvb, offset, 6, ENC_NA);

        col_append_fstr(pinfo->cinfo, COL_INFO, ", System ID: %s",
                    tvb_ether_to_str(tvb, offset));

        offset += 6;

        holding_timer = tvb_get_ntohs(tvb, offset);
        proto_tree_add_uint_format_value(tree, hf_nlsp_hello_holding_timer,
                tvb, offset, 2, holding_timer, "%us", holding_timer);
        offset += 2;

        packet_length = tvb_get_ntohs(tvb, offset);
        proto_tree_add_uint(tree, hf_nlsp_packet_length, tvb, offset, 2, packet_length);
        offset += 2;

        proto_tree_add_item(tree, hf_nlsp_hello_priority, tvb, offset, 1, ENC_BIG_ENDIAN);
        offset += 1;

        if (hello_type == NLSP_TYPE_WAN_HELLO) {
                proto_tree_add_item(tree, hf_nlsp_hello_local_wan_circuit_id, tvb, offset, 1, ENC_BIG_ENDIAN);
                offset += 1;
        } else {
                proto_tree_add_item(tree, hf_nlsp_hello_designated_router_system_id, tvb, offset, 6, ENC_NA);
                proto_tree_add_item(tree, hf_nlsp_hello_designated_router_pseudonode_id, tvb, offset+6, 1, ENC_BIG_ENDIAN);
                offset += 7;
        }

        len = packet_length - header_length;
        if (len < 0) {
                proto_tree_add_expert_format(tree, pinfo, &ei_nlsp_long_packet, tvb, offset, -1,
                        "packet header length %d went beyond packet",
                        header_length);
                return;
        }

        /*
         * Now, we need to decode our CLVs.  We need to pass in
         * our list of valid ones!
         */
        nlsp_dissect_clvs(tvb, pinfo, tree, offset,
            clv_hello_opts, len, ett_nlsp_hello_clv_unknown);
}

/*
 * Name: dissect_lsp_mgt_info_clv()
 *
 * Description:
 *      Decode for a lsp packet's management information clv.
 *
 * Input:
 *      tvbuff_t * : tvbuffer for packet data
 *      proto_tree * : protocol display tree to fill out.  May be NULL
 *      int : offset into packet data where we are.
 *      int : length of clv we are decoding
 *
 * Output:
 *      void, but we will add to proto tree if !NULL.
 */
static void
dissect_lsp_mgt_info_clv(tvbuff_t *tvb, packet_info* pinfo, proto_tree *tree, int offset,
                         int length)
{
        guint8 name_length;

        if (length < 4) {
                proto_tree_add_expert_format(tree, pinfo, &ei_nlsp_short_packet, tvb, offset, -1,
                    "Short management info entry");
                return;
        }
        proto_tree_add_item(tree, hf_nlsp_mgt_info_network_number, tvb, offset, 4, ENC_BIG_ENDIAN);
        offset += 4;
        length -= 4;

        if (length < 6) {
                proto_tree_add_expert_format(tree, pinfo, &ei_nlsp_short_packet, tvb, offset, -1,
                    "Short management info entry");
                return;
        }
        proto_tree_add_item(tree, hf_nlsp_mgt_info_node_number, tvb, offset, 6, ENC_NA);
        offset += 6;
        length -= 6;

        if (length < 1) {
                proto_tree_add_expert_format(tree, pinfo, &ei_nlsp_short_packet, tvb, offset, -1,
                    "Short management info entry");
                return;
        }

        proto_tree_add_item(tree, hf_nlsp_mgt_info_ipx_version_number, tvb, offset, 1, ENC_BIG_ENDIAN);
        offset += 1;
        length -= 1;

        if (length < 1) {
                proto_tree_add_expert_format(tree, pinfo, &ei_nlsp_short_packet, tvb, offset, -1,
                    "Short management info entry");
                return;
        }
        name_length = tvb_get_guint8(tvb, offset);
        proto_tree_add_item(tree, hf_nlsp_mgt_info_name_length, tvb, offset, 1, ENC_BIG_ENDIAN);
        offset += 1;
        length -= 1;

        if (name_length != 0) {
                if (length < name_length) {
                        proto_tree_add_expert_format(tree, pinfo, &ei_nlsp_short_packet, tvb, offset, -1,
                            "Short management info entry");
                        return;
                }
                proto_tree_add_item(tree, hf_nlsp_mgt_info_name, tvb, offset, name_length, ENC_NA|ENC_ASCII);
        }
}

/*
 * Name: dissect_lsp_link_info_clv()
 *
 * Description:
 *      Decode for a lsp packet's link information clv.
 *
 * Input:
 *      tvbuff_t * : tvbuffer for packet data
 *      proto_tree * : protocol display tree to fill out.  May be NULL
 *      int : offset into packet data where we are.
 *      int : length of clv we are decoding
 *
 * Output:
 *      void, but we will add to proto tree if !NULL.
 */
static const value_string media_type_vals[] = {
        { 0x0000, "Generic LAN" },
        { 0x8000, "Generic WAN" },
        { 0x0001, "Localtalk" },
        { 0x0002, "Ethernet II" },
        { 0x0003, "IEEE 802.3 with IEEE 802.2 without SNAP" },
        { 0x0005, "IEEE 802.3 with IPX header and no 802.2 header" },
        { 0x000A, "IEEE 802.3 with IEEE 802.2 and SNAP" },
        { 0x0004, "IEEE 802.5 with IEEE 802.2 without SNAP" },
        { 0x000B, "IEEE 802.5 with IEEE 802.2 and SNAP" },
        { 0x0006, "IEEE 802.4" },
        { 0x0007, "IBM PC Network II" },
        { 0x0008, "Gateway G/Net" },
        { 0x0009, "Proteon ProNET" },
        { 0x000C, "Racore LANPAC" },
        { 0x800D, "ISDN" },
        { 0x000E, "ARCnet" },
        { 0x000F, "IBM PC Network II with 802.2 without SNAP" },
        { 0x0010, "IBM PC Network II with 802.2 and SNAP" },
        { 0x0011, "Corvus OmniNet at 4 Mbps" },
        { 0x0012, "Harris Adacom" },
        { 0x0013, "IP tunnel" },
        { 0x8013, "IP Relay" },
        { 0x0014, "FDDI with 802.2 without SNAP" },
        { 0x0015, "Commtex IVDLAN" },
        { 0x0016, "Dataco OSI" },
        { 0x0017, "FDDI with 802.2 and SNAP" },
        { 0x0018, "IBM SDLC tunnel" },
        { 0x0019, "PC Office frame" },
        { 0x001A, "Hypercommunications WAIDNET" },
        { 0x801C, "PPP" },
        { 0x801D, "Proxim RangeLAN" },
        { 0x801E, "X.25" },
        { 0x801F, "Frame Relay" },
        { 0x0020, "Integrated Workstations BUS-NET" },
        { 0x8021, "Novell SNA Links" },
        { 0,      NULL }
};

static void
dissect_lsp_link_info_clv(tvbuff_t *tvb, packet_info* pinfo, proto_tree *tree, int offset,
                          int length)
{
        guint8 flags_cost;

        if (length < 1) {
                proto_tree_add_expert_format(tree, pinfo, &ei_nlsp_short_packet, tvb, offset, -1,
                    "Short link info entry");
                return;
        }
        if (tree) {
                flags_cost = tvb_get_guint8(tvb, offset);
                proto_tree_add_item(tree, hf_nlsp_lsp_link_info_clv_flags_cost_present, tvb, offset, 1, ENC_BIG_ENDIAN);
                if (!(flags_cost & 0x80)) {
                        /*
                         * 0x80 clear => cost present.
                         */
                        proto_tree_add_item(tree, hf_nlsp_lsp_link_info_clv_flags_cost_metric, tvb, offset, 1, ENC_BIG_ENDIAN);
                        proto_tree_add_item(tree, hf_nlsp_lsp_link_info_clv_flags_cost, tvb, offset, 1, ENC_BIG_ENDIAN);
                }
        }
        offset += 1;
        length -= 1;

        if (length < 3) {
                proto_tree_add_expert_format(tree, pinfo, &ei_nlsp_short_packet, tvb, offset, -1,
                    "Short link info entry");
                return;
        }
        offset += 3;    /* Reserved */
        length -= 3;

        if (length < 7) {
                proto_tree_add_expert_format(tree, pinfo, &ei_nlsp_short_packet, tvb, offset, -1,
                    "Short link info entry");
                return;
        }

        proto_tree_add_item(tree, hf_nlsp_link_info_router_system_id, tvb, offset, 6, ENC_NA);
        proto_tree_add_item(tree, hf_nlsp_link_info_router_pseudonode_id, tvb, offset+6, 1, ENC_BIG_ENDIAN);
        offset += 7;
        length -= 7;

        if (length < 4) {
                proto_tree_add_expert_format(tree, pinfo, &ei_nlsp_short_packet, tvb, offset, -1,
                    "Short link info entry");
                return;
        }
        proto_tree_add_item(tree, hf_nlsp_link_info_mtu_size, tvb, offset, 4, ENC_BIG_ENDIAN);
        offset += 4;
        length -= 4;

        if (length < 4) {
                proto_tree_add_expert_format(tree, pinfo, &ei_nlsp_short_packet, tvb, offset, -1,
                    "Short link info entry");
                return;
        }
        proto_tree_add_uint_format_value(tree, hf_nlsp_link_info_delay, tvb, offset, 4,
                        tvb_get_ntohl(tvb, offset), "%uus", tvb_get_ntohl(tvb, offset));
        offset += 4;
        length -= 4;

        if (length < 4) {
                proto_tree_add_expert_format(tree, pinfo, &ei_nlsp_short_packet, tvb, offset, -1,
                    "Short link info entry");
                return;
        }
        proto_tree_add_uint_format_value(tree, hf_nlsp_link_info_throughput, tvb, offset, 4,
                        tvb_get_ntohl(tvb, offset), "%u bits/s", tvb_get_ntohl(tvb, offset));
        offset += 4;
        length -= 4;

        if (length < 2) {
                proto_tree_add_expert_format(tree, pinfo, &ei_nlsp_short_packet, tvb, offset, -1,
                    "Short link info entry");
                return;
        }
        proto_tree_add_item(tree, hf_nlsp_link_info_media_type, tvb, offset, 2, ENC_BIG_ENDIAN);
}

/*
 * Name: dissect_lsp_svcs_info_clv()
 *
 * Description:
 *      Decode for a lsp packet's services information clv.
 *
 * Input:
 *      tvbuff_t * : tvbuffer for packet data
 *      proto_tree * : protocol display tree to fill out.  May be NULL
 *      int : offset into packet data where we are.
 *      int : length of clv we are decoding
 *
 * Output:
 *      void, but we will add to proto tree if !NULL.
 */
static void
dissect_lsp_svcs_info_clv(tvbuff_t *tvb, packet_info* pinfo, proto_tree *tree, int offset,
                          int length)
{
        if (length < 1) {
                proto_tree_add_expert_format(tree, pinfo, &ei_nlsp_short_packet, tvb, offset, -1,
                    "Short services info entry");
                return;
        }

        proto_tree_add_item(tree, hf_nlsp_svcs_info_hops_to_reach_the_service, tvb, offset, 1, ENC_BIG_ENDIAN);
        offset += 1;
        length -= 1;

        if (length < 4) {
                proto_tree_add_expert_format(tree, pinfo, &ei_nlsp_short_packet, tvb, offset, -1,
                    "Short services info entry");
                return;
        }

        proto_tree_add_item(tree, hf_nlsp_svcs_info_network_number, tvb, offset, 4, ENC_BIG_ENDIAN);
        offset += 4;
        length -= 4;

        if (length < 6) {
                proto_tree_add_expert_format(tree, pinfo, &ei_nlsp_short_packet, tvb, offset, -1,
                    "Short services info entry");
                return;
        }

        proto_tree_add_item(tree, hf_nlsp_svcs_info_node_number, tvb, offset, 6, ENC_NA);
        offset += 6;
        length -= 6;

        if (length < 2) {
                proto_tree_add_expert_format(tree, pinfo, &ei_nlsp_short_packet, tvb, offset, -1,
                    "Short services info entry");
                return;
        }

        proto_tree_add_item(tree, hf_nlsp_svcs_info_socket, tvb, offset, 2, ENC_BIG_ENDIAN);
        offset += 2;
        length -= 2;

        if (length < 2) {
                proto_tree_add_expert_format(tree, pinfo, &ei_nlsp_short_packet, tvb, offset, -1,
                    "Short services info entry");
                return;
        }

        proto_tree_add_item(tree, hf_nlsp_svcs_info_type, tvb, offset, 2, ENC_BIG_ENDIAN);
        offset += 2;
        length -= 2;

        if (length > 0) {
                proto_tree_add_item(tree, hf_nlsp_svcs_info_service_name, tvb, offset, length, ENC_NA|ENC_ASCII);
        }
}


/*
 * Name: dissect_lsp_ext_routes_clv()
 *
 * Description:
 *      Decode for a lsp packet's external routes clv.
 *
 * Input:
 *      tvbuff_t * : tvbuffer for packet data
 *      proto_tree * : protocol display tree to fill out.  May be NULL
 *      int : offset into packet data where we are.
 *      int : length of clv we are decoding
 *
 * Output:
 *      void, but we will add to proto tree if !NULL.
 */
static void
dissect_lsp_ext_routes_clv(tvbuff_t *tvb, packet_info* pinfo, proto_tree *tree, int offset,
                           int length)
{
        while (length > 0) {
                if (length < 1) {
                        proto_tree_add_expert_format(tree, pinfo, &ei_nlsp_short_packet, tvb, offset, -1,
                            "Short external routes entry");
                        return;
                }

                proto_tree_add_item(tree, hf_nlsp_ext_routes_hops, tvb, offset, 1, ENC_BIG_ENDIAN);
                offset += 1;
                length -= 1;

                if (length < 4) {
                        proto_tree_add_expert_format(tree, pinfo, &ei_nlsp_short_packet, tvb, offset, -1,
                            "Short external routes entry");
                        return;
                }

                proto_tree_add_item(tree, hf_nlsp_ext_routes_network_number, tvb, offset, 4, ENC_BIG_ENDIAN);
                offset += 4;
                length -= 4;

                if (length < 2) {
                        proto_tree_add_expert_format(tree, pinfo, &ei_nlsp_short_packet, tvb, offset, -1,
                            "Short external routes entry");
                        return;
                }

                proto_tree_add_uint_format_value(tree, hf_nlsp_ext_routes_rip_delay, tvb, offset, 2,
                                tvb_get_ntohs(tvb, offset), "%u ticks", tvb_get_ntohs(tvb, offset));
                offset += 2;
                length -= 2;
        }
}

static const nlsp_clv_handle_t clv_l1_lsp_opts[] = {
        {
                0xC0,
                "Area address(es)",
                &ett_nlsp_lsp_clv_area_addr,
                dissect_area_address_clv
        },
        {
                0xC1,
                "Management information",
                &ett_nlsp_lsp_clv_mgt_info,
                dissect_lsp_mgt_info_clv
        },
        {
                0xC2,
                "Link information",
                &ett_nlsp_lsp_clv_link_info,
                dissect_lsp_link_info_clv
        },
        {
                0xC3,
                "Services information",
                &ett_nlsp_lsp_clv_svcs_info,
                dissect_lsp_svcs_info_clv
        },
        {
                0xC4,
                "External routes",
                &ett_nlsp_lsp_clv_ext_routes,
                dissect_lsp_ext_routes_clv
        },

        {
                0,
                "",
                NULL,
                NULL
        }
};

/*
 * Name: nlsp_dissect_nlsp_lsp()
 *
 * Description:
 *      Print out the LSP part of the main header and then call the CLV
 *      de-mangler with the right list of valid CLVs.
 *
 * Input:
 *      tvbuff_t * : tvbuffer for packet data
 *      proto_tree * : protocol display tree to add to.  May be NULL.
 *      int offset : our offset into packet data.
 *      int : header length of packet.
 *
 * Output:
 *      void, but we will add to proto tree if !NULL.
 */
/* P | ATT | OVERFLOW | ROUTER TYPE FIELD description */
#define NLSP_LSP_PARTITION_MASK     0x80
#define NLSP_LSP_PARTITION_SHIFT    7
#define NLSP_LSP_PARTITION(info)    (((info) & NLSP_LSP_PARTITION_MASK) >> NLSP_LSP_PARTITION_SHIFT)

#define NLSP_LSP_ATT_MASK     0x78
#define NLSP_LSP_ATT_SHIFT    3
#define NLSP_LSP_ATT(info)    (((info) & NLSP_LSP_ATT_MASK) >> NLSP_LSP_ATT_SHIFT)

#define NLSP_LSP_OVERFLOW_MASK     0x04
#define NLSP_LSP_OVERFLOW_SHIFT    2
#define NLSP_LSP_OVERFLOW(info)    (((info) & NLSP_LSP_OVERFLOW_MASK) >> NLSP_LSP_OVERFLOW_SHIFT)

#define NLSP_LSP_ROUTER_TYPE_MASK     0x03
#define NLSP_LSP_ROUTER_TYPE(info)    ((info) & NLSP_LSP_ROUTER_TYPE_MASK)

static void
nlsp_dissect_nlsp_lsp(tvbuff_t *tvb, packet_info *pinfo, proto_tree *tree,
                      int offset, int header_length)
{
        guint16         packet_length;
        guint16         remaining_lifetime;
        guint32         sequence_number;
        int             len;

        packet_length = tvb_get_ntohs(tvb, offset);
        proto_tree_add_uint(tree, hf_nlsp_packet_length, tvb,
                        offset, 2, packet_length);
        offset += 2;

        remaining_lifetime = tvb_get_ntohs(tvb, offset);
        proto_tree_add_uint_format_value(tree, hf_nlsp_remaining_lifetime, tvb, offset, 2,
                                        remaining_lifetime, "%us", remaining_lifetime);
        offset += 2;

        col_append_fstr(pinfo->cinfo, COL_INFO, ", LSP ID: %s",
                    tvb_ether_to_str(tvb, offset));

        proto_tree_add_item(tree, hf_nlsp_lsp_id_system_id, tvb, offset, 6, ENC_NA);

        offset += 6;
        /* XXX - append the pseudonode ID */
        proto_tree_add_item(tree, hf_nlsp_lsp_id_pseudonode_id, tvb, offset, 1, ENC_BIG_ENDIAN);

        offset += 1;
        proto_tree_add_item(tree, hf_nlsp_lsp_id_lsp_number, tvb, offset, 1, ENC_BIG_ENDIAN);
        offset += 1;

        sequence_number = tvb_get_ntohl(tvb, offset);
        col_append_fstr(pinfo->cinfo, COL_INFO,
                    ", Sequence: 0x%08x, Lifetime: %us",
                    sequence_number, remaining_lifetime);

        proto_tree_add_uint(tree, hf_nlsp_lsp_sequence_number, tvb,
                        offset, 4, sequence_number);
        offset += 4;

        /* XXX -> we could validate the cksum here! */
        proto_tree_add_checksum(tree, tvb, offset, hf_nlsp_lsp_checksum, -1, NULL, pinfo, 0, ENC_BIG_ENDIAN, PROTO_CHECKSUM_NO_FLAGS);
        offset += 2;

        if (tree) {
                proto_tree_add_item(tree, hf_nlsp_lsp_p, tvb,
                    offset, 1, ENC_BIG_ENDIAN);
                proto_tree_add_item(tree, hf_nlsp_lsp_attached_flag, tvb,
                    offset, 1, ENC_BIG_ENDIAN);
                proto_tree_add_item(tree, hf_nlsp_lsp_lspdbol, tvb,
                    offset, 1, ENC_BIG_ENDIAN);
                proto_tree_add_item(tree, hf_nlsp_lsp_router_type, tvb,
                    offset, 1, ENC_BIG_ENDIAN);
        }
        offset += 1;

        len = packet_length - header_length;
        if (len < 0) {
                proto_tree_add_expert_format(tree, pinfo, &ei_nlsp_long_packet, tvb, offset, -1,
                        "packet header length %d went beyond packet",
                         header_length);
                return;
        }

        /*
         * Now, we need to decode our CLVs.  We need to pass in
         * our list of valid ones!
         */
        nlsp_dissect_clvs(tvb, pinfo, tree, offset,
                clv_l1_lsp_opts, len, ett_nlsp_lsp_clv_unknown);
}

/*
 * Name: dissect_snp_lsp_entries()
 *
 * Description:
 *      All the snp packets use a common payload format.  We have up
 *      to n entries (based on length), which are made of:
 *              2 : remaining life time
 *              8 : lsp id
 *              4 : sequence number
 *              2 : checksum
 *
 * Input:
 *      tvbuff_t * : tvbuffer for packet data
 *      proto_tree * : protocol display tree to fill out.  May be NULL
 *      int : offset into packet data where we are.
 *      int : length of payload to decode.
 *
 * Output:
 *      void, but we will add to proto tree if !NULL.
 */
static void
dissect_csnp_lsp_entries(tvbuff_t *tvb, packet_info* pinfo, proto_tree *tree, int offset,
                         int length)
{
        proto_tree *subtree;

        while (length > 0) {
                if (length < 16) {
                        proto_tree_add_expert_format(tree, pinfo, &ei_nlsp_short_packet, tvb, offset, -1,
                            "Short CSNP header entry");
                        return;
                }

                subtree = proto_tree_add_subtree_format(tree, tvb, offset, 16,
                    ett_nlsp_csnp_lsp_entry, NULL, "LSP-ID: %s, Sequence: 0x%08x, Lifetime: %5us, Checksum: 0x%04x",
                    tvb_ether_to_str(tvb, offset+2), /* XXX - rest of system ID */
                    tvb_get_ntohl(tvb, offset+10),
                    tvb_get_ntohs(tvb, offset),
                    tvb_get_ntohs(tvb, offset+14));

                proto_tree_add_item(subtree, hf_nlsp_csnp_lsp_id_source_id, tvb, offset+2, 6, ENC_NA);
                proto_tree_add_item(subtree, hf_nlsp_csnp_lsp_id_pseudonode_id, tvb, offset+8, 1, ENC_BIG_ENDIAN);
                proto_tree_add_item(subtree, hf_nlsp_csnp_lsp_id_lsp_number, tvb, offset+9, 1, ENC_BIG_ENDIAN);

                proto_tree_add_item(subtree, hf_nlsp_csnp_lsp_sequence_number, tvb, offset+10, 4, ENC_BIG_ENDIAN);

                proto_tree_add_uint_format_value(subtree, hf_nlsp_csnp_remaining_lifetime, tvb, offset, 2,
                        tvb_get_ntohs(tvb, offset), "%us", tvb_get_ntohs(tvb, offset));

                proto_tree_add_checksum(subtree, tvb, offset+14, hf_nlsp_csnp_lsp_checksum, -1, NULL, pinfo, 0, ENC_BIG_ENDIAN, PROTO_CHECKSUM_NO_FLAGS);

                length -= 16;
                offset += 16;
        }
}

static void
dissect_psnp_lsp_entries(tvbuff_t *tvb, packet_info* pinfo, proto_tree *tree, int offset,
                         int length)
{
        proto_tree *subtree;

        while (length > 0) {
                if (length < 16) {
                        proto_tree_add_expert_format(tree, pinfo, &ei_nlsp_short_packet, tvb, offset, -1,
                            "Short PSNP header entry");
                        return;
                }

                subtree = proto_tree_add_subtree_format(tree, tvb, offset, 16,
                    ett_nlsp_psnp_lsp_entry, NULL, "LSP-ID: %s, Sequence: 0x%08x, Lifetime: %5us, Checksum: 0x%04x",
                    tvb_ether_to_str(tvb, offset+2), /* XXX - rest of system ID */
                    tvb_get_ntohl(tvb, offset+10),
                    tvb_get_ntohs(tvb, offset),
                    tvb_get_ntohs(tvb, offset+14));

                proto_tree_add_item(subtree, hf_nlsp_psnp_lsp_id_source_id, tvb, offset+2, 6, ENC_NA);
                proto_tree_add_item(subtree, hf_nlsp_psnp_lsp_id_pseudonode_id, tvb, offset+8, 1, ENC_BIG_ENDIAN);
                proto_tree_add_item(subtree, hf_nlsp_psnp_lsp_id_lsp_number, tvb, offset+9, 1, ENC_BIG_ENDIAN);

                proto_tree_add_item(subtree, hf_nlsp_psnp_lsp_sequence_number, tvb, offset+10, 4, ENC_BIG_ENDIAN);

                proto_tree_add_uint_format_value(subtree, hf_nlsp_psnp_remaining_lifetime, tvb, offset, 2,
                        tvb_get_ntohs(tvb, offset), "%us", tvb_get_ntohs(tvb, offset));

                proto_tree_add_checksum(subtree, tvb, offset+14, hf_nlsp_psnp_lsp_checksum, -1, NULL, pinfo, 0, ENC_BIG_ENDIAN, PROTO_CHECKSUM_NO_FLAGS);

                length -= 16;
                offset += 16;
        }
}

static const nlsp_clv_handle_t clv_l1_csnp_opts[] = {
        {
                9,
                "LSP entries",
                &ett_nlsp_csnp_lsp_entries,
                dissect_csnp_lsp_entries
        },

        {
                0,
                "",
                NULL,
                NULL
        }
};

/*
 * Name: nlsp_dissect_nlsp_csnp()
 *
 * Description:
 *      Tear apart a L1 CSNP header and then call into payload dissect
 *      to pull apart the lsp id payload.
 *
 * Input:
 *      tvbuff_t * : tvbuffer for packet data
 *      proto_tree * : protocol display tree to add to.  May be NULL.
 *      int offset : our offset into packet data.
 *      int : header length of packet.
 *
 * Output:
 *      void, but we will add to proto tree if !NULL.
 */
static void
nlsp_dissect_nlsp_csnp(tvbuff_t *tvb, packet_info *pinfo, proto_tree *tree,
                       int offset, int header_length)
{
        guint16         packet_length;
        int             len;

        packet_length = tvb_get_ntohs(tvb, offset);
        proto_tree_add_uint(tree, hf_nlsp_packet_length, tvb, offset, 2, packet_length);
        offset += 2;

        col_append_fstr(pinfo->cinfo, COL_INFO, ", Source ID: %s",
                    tvb_ether_to_str(tvb, offset));
        proto_tree_add_item(tree, hf_nlsp_csnp_source_id_system_id, tvb, offset, 6, ENC_NA);
        offset += 6;
        proto_tree_add_item(tree, hf_nlsp_csnp_source_id_pseudonode_id, tvb, offset, 1, ENC_BIG_ENDIAN);
        offset += 1;

        col_append_fstr(pinfo->cinfo, COL_INFO, ", Start LSP ID: %s",
                    tvb_ether_to_str(tvb, offset));
        proto_tree_add_item(tree, hf_nlsp_csnp_start_lsp_id_source_id, tvb, offset, 6, ENC_NA);
        offset += 6;
        /* XXX - append the pseudonode ID */
        proto_tree_add_item(tree, hf_nlsp_csnp_start_lsp_id_pseudonode_id, tvb, offset, 1, ENC_BIG_ENDIAN);
        offset += 1;

        proto_tree_add_item(tree, hf_nlsp_csnp_start_lsp_id_lsp_number, tvb, offset, 1, ENC_BIG_ENDIAN);
        offset += 1;

        col_append_fstr(pinfo->cinfo, COL_INFO, ", End LSP ID: %s",
                    tvb_ether_to_str(tvb, offset));
        proto_tree_add_item(tree, hf_nlsp_csnp_end_lsp_id_source_id, tvb, offset, 6, ENC_NA);
        offset += 6;
        /* XXX - append the pseudonode ID */
        proto_tree_add_item(tree, hf_nlsp_csnp_end_lsp_id_pseudonode_id, tvb, offset, 1, ENC_BIG_ENDIAN);
        offset += 1;
        proto_tree_add_item(tree, hf_nlsp_csnp_end_lsp_id_lsp_number, tvb, offset, 1, ENC_BIG_ENDIAN);
        offset += 1;

        len = packet_length - header_length;
        if (len < 0) {
                return;
        }
        /* Call into payload dissector */
        nlsp_dissect_clvs(tvb, pinfo, tree, offset,
            clv_l1_csnp_opts, len, ett_nlsp_csnp_clv_unknown);
}

static const nlsp_clv_handle_t clv_l1_psnp_opts[] = {
        {
                9,
                "LSP entries",
                &ett_nlsp_psnp_lsp_entries,
                dissect_psnp_lsp_entries
        },

        {
                0,
                "",
                NULL,
                NULL
        }
};

/*
 * Name: nlsp_dissect_nlsp_psnp()
 *
 * Description:
 *      Tear apart a L1 PSNP header and then call into payload dissect
 *      to pull apart the lsp id payload.
 *
 * Input:
 *      tvbuff_t * : tvbuffer for packet data
 *      proto_tree * : protocol display tree to add to.  May be NULL.
 *      int offset : our offset into packet data.
 *      int : header length of packet.
 *
 * Output:
 *      void, but we will add to proto tree if !NULL.
 */
static void
nlsp_dissect_nlsp_psnp(tvbuff_t *tvb, packet_info *pinfo, proto_tree *tree,
                       int offset, int header_length)
{
        guint16         packet_length;
        int             len;

        packet_length = tvb_get_ntohs(tvb, offset);
        proto_tree_add_uint(tree, hf_nlsp_packet_length, tvb,
                        offset, 2, packet_length);
        offset += 2;

        col_append_fstr(pinfo->cinfo, COL_INFO, ", Source ID: %s",
                    tvb_ether_to_str(tvb, offset));
        proto_tree_add_item(tree, hf_nlsp_psnp_source_id_system_id, tvb, offset, 6, ENC_NA);
        offset += 6;
        /* XXX - add the pseudonode ID */
        proto_tree_add_item(tree, hf_nlsp_psnp_source_id_pseudonode_id, tvb, offset, 1, ENC_BIG_ENDIAN);
        offset += 1;

        len = packet_length - header_length;
        if (len < 0) {
                return;
        }
        /* Call into payload dissector */
        nlsp_dissect_clvs(tvb, pinfo, tree, offset,
            clv_l1_psnp_opts, len, ett_nlsp_psnp_clv_unknown);
}

/*
 * Name: dissect_nlsp()
 *
 * Description:
 *      Main entry area for nlsp de-mangling.  This will build the
 *      main nlsp tree data and call the sub-protocols as needed.
 *
 * Input:
 *      tvbuff_t * : tvbuffer for packet data
 *      packet_info * : info for current packet
 *      proto_tree * : tree of display data.  May be NULL.
 *
 * Output:
 *      void, but we will add to the proto_tree if it is not NULL.
 */
static int
dissect_nlsp(tvbuff_t *tvb, packet_info *pinfo, proto_tree *tree, void* data _U_)
{
        proto_item *ti, *type_item;
        proto_tree *nlsp_tree;
        int offset = 0;
        guint8 nlsp_major_version;
        guint8 nlsp_header_length;
        guint8 packet_type_flags;
        guint8 packet_type;

        col_set_str(pinfo->cinfo, COL_PROTOCOL, "NLSP");
        col_clear(pinfo->cinfo, COL_INFO);

        ti = proto_tree_add_item(tree, proto_nlsp, tvb, 0, -1, ENC_NA);
        nlsp_tree = proto_item_add_subtree(ti, ett_nlsp);

        proto_tree_add_item(nlsp_tree, hf_nlsp_irpd, tvb, offset, 1,
                        ENC_BIG_ENDIAN );
        offset += 1;

        nlsp_header_length = tvb_get_guint8(tvb, 1);
        proto_tree_add_uint(nlsp_tree, hf_nlsp_header_length, tvb,
                        offset, 1, nlsp_header_length );
        offset += 1;

        proto_tree_add_item(nlsp_tree, hf_nlsp_minor_version, tvb,
                        offset, 1, ENC_BIG_ENDIAN );
        offset += 1;

        offset += 1;    /* Reserved */

        packet_type_flags = tvb_get_guint8(tvb, offset);
        packet_type = packet_type_flags & PACKET_TYPE_MASK;
        col_add_str(pinfo->cinfo, COL_INFO,
                    val_to_str(packet_type, nlsp_packet_type_vals, "Unknown (%u)"));
        if (packet_type == NLSP_TYPE_L1_LSP) {
                proto_tree_add_boolean(nlsp_tree, hf_nlsp_nr, tvb, offset, 1, packet_type_flags );
        }
        type_item = proto_tree_add_uint(nlsp_tree, hf_nlsp_type, tvb, offset, 1, packet_type_flags );
        offset += 1;

        nlsp_major_version = tvb_get_guint8(tvb, offset);
        ti = proto_tree_add_item(nlsp_tree, hf_nlsp_major_version, tvb,
                        offset, 1, ENC_BIG_ENDIAN );
        if (nlsp_major_version != 1){
                expert_add_info_format(pinfo, ti, &ei_nlsp_major_version,
                        "Unknown NLSP version (%d vs 1)",
                        nlsp_major_version);
        }
        offset += 1;

        offset += 2;    /* Reserved */

        switch (packet_type) {

        case NLSP_TYPE_L1_HELLO:
        case NLSP_TYPE_WAN_HELLO:
                nlsp_dissect_nlsp_hello(tvb, pinfo, nlsp_tree, offset,
                    packet_type, nlsp_header_length);
                break;

        case NLSP_TYPE_L1_LSP:
                nlsp_dissect_nlsp_lsp(tvb, pinfo, nlsp_tree, offset,
                    nlsp_header_length);
                break;

        case NLSP_TYPE_L1_CSNP:
                nlsp_dissect_nlsp_csnp(tvb, pinfo, nlsp_tree, offset,
                    nlsp_header_length);
                break;

        case NLSP_TYPE_L1_PSNP:
                nlsp_dissect_nlsp_psnp(tvb, pinfo, nlsp_tree, offset,
                    nlsp_header_length);
                break;

        default:
                expert_add_info(pinfo, type_item, &ei_nlsp_type);
        }
        return tvb_captured_length(tvb);
}

/*
 * Name: proto_register_nlsp()
 *
 * Description:
 *      main register for NLSP protocol set.  We register some display
 *      formats and the protocol module variables.
 *
 *      NOTE: this procedure to autolinked by the makefile process that
 *      builds register.c
 *
 * Input:
 *      void
 *
 * Output:
 *      void
 */
void
proto_register_nlsp(void)
{
        static hf_register_info hf[] = {
                { &hf_nlsp_irpd,
                  { "NetWare Link Services Protocol Discriminator", "nlsp.irpd",
                    FT_UINT8, BASE_HEX, NULL, 0x0,
                    NULL, HFILL }
                },

                { &hf_nlsp_header_length,
                  { "PDU Header Length", "nlsp.header_length",
                    FT_UINT8, BASE_DEC, NULL, 0x0,
                    NULL, HFILL }
                },

                { &hf_nlsp_minor_version,
                  { "Minor Version", "nlsp.minor_version",
                    FT_UINT8, BASE_DEC, NULL, 0x0,
                    NULL, HFILL }
                },

                { &hf_nlsp_nr,
                  { "Multi-homed Non-routing Server", "nlsp.nr",
                    FT_BOOLEAN, 8, NULL, 0x80,
                    NULL, HFILL }
                },

                { &hf_nlsp_type,
                  { "Packet Type", "nlsp.type",
                    FT_UINT8, BASE_DEC, VALS(nlsp_packet_type_vals), PACKET_TYPE_MASK,
                    NULL, HFILL }
                },

                { &hf_nlsp_major_version,
                  { "Major Version", "nlsp.major_version",
                    FT_UINT8, BASE_DEC, NULL, 0x0,
                    NULL, HFILL }
                },

                { &hf_nlsp_packet_length,
                  { "Packet Length", "nlsp.packet_length",
                    FT_UINT16, BASE_DEC, NULL, 0x0,
                    NULL, HFILL }
                },

                { &hf_nlsp_hello_state,
                  { "State", "nlsp.hello.state",
                    FT_UINT8, BASE_DEC, VALS(nlsp_hello_state_vals), NLSP_HELLO_STATE_MASK,
                    NULL, HFILL }
                },

                { &hf_nlsp_hello_multicast,
                  { "Multicast Routing", "nlsp.hello.multicast",
                    FT_BOOLEAN, 8, TFS(&tfs_supported_not_supported), NLSP_HELLO_MULTICAST_MASK,
                    "If set, this router supports multicast routing", HFILL }
                },

                { &hf_nlsp_hello_circuit_type,
                  { "Circuit Type", "nlsp.hello.circuit_type",
                    FT_UINT8, BASE_DEC, VALS(nlsp_hello_circuit_type_vals), NLSP_HELLO_CTYPE_MASK,
                    NULL, HFILL }
                },

                { &hf_nlsp_hello_holding_timer,
                  { "Holding Timer", "nlsp.hello.holding_timer",
                    FT_UINT8, BASE_DEC, NULL, 0x0,
                    NULL, HFILL }
                },

                { &hf_nlsp_hello_priority,
                  { "Priority", "nlsp.hello.priority",
                    FT_UINT8, BASE_DEC, NULL, NLSP_HELLO_PRIORITY_MASK,
                    NULL, HFILL }
                },

                { &hf_nlsp_lsp_sequence_number,
                  { "Sequence Number", "nlsp.sequence_number",
                    FT_UINT32, BASE_HEX, NULL, 0x0,
                    NULL, HFILL }
                },

                { &hf_nlsp_lsp_checksum,
                  { "Checksum", "nlsp.lsp.checksum",
                    FT_UINT16, BASE_HEX, NULL, 0x0,
                    NULL, HFILL }
                },

                { &hf_nlsp_lsp_p,
                  { "Partition Repair", "nlsp.lsp.partition_repair",
                    FT_BOOLEAN, 8, TFS(&tfs_supported_not_supported), NLSP_LSP_PARTITION_MASK,
                    "If set, this router supports the optional Partition Repair function", HFILL }
                },

                { &hf_nlsp_lsp_attached_flag,
                  { "Attached Flag", "nlsp.lsp.attached_flag",
                    FT_UINT8, BASE_DEC, VALS(nlsp_attached_flag_vals), NLSP_LSP_ATT_MASK,
                    NULL, HFILL }
                },

                { &hf_nlsp_lsp_lspdbol,
                  { "LSP Database Overloaded", "nlsp.lsp.lspdbol",
                    FT_BOOLEAN, 8, NULL, NLSP_LSP_OVERFLOW_MASK,
                    NULL, HFILL }
                },

                { &hf_nlsp_lsp_router_type,
                  { "Router Type", "nlsp.lsp.router_type",
                    FT_UINT8, BASE_DEC, VALS(nlsp_router_type_vals), NLSP_LSP_ROUTER_TYPE_MASK,
                    NULL, HFILL }
                },

                { &hf_nlsp_lsp_link_info_clv_flags_cost_present,
                  { "Cost present", "nlsp.lsp.link_info_clv.flags.cost_present",
                    FT_BOOLEAN, 8, TFS(&tfs_no_yes), 0x80,
                    NULL, HFILL }
                },

                { &hf_nlsp_lsp_link_info_clv_flags_cost_metric,
                  { "Cost metric", "nlsp.lsp.link_info_clv.flags.cost_metric",
                    FT_BOOLEAN, 8, TFS(&tfs_internal_external), 0x40,
                    NULL, HFILL }
                },

                { &hf_nlsp_lsp_link_info_clv_flags_cost,
                  { "Cost", "nlsp.lsp.link_info_clv.flags.cost",
                    FT_UINT8, BASE_DEC, NULL, 0x3F,
                    NULL, HFILL }
                },

                /* Generated from convert_proto_tree_add_text.pl */
                { &hf_nlsp_unknown_code,
                  { "Unknown code", "nlsp.unknown_code",
                    FT_UINT8, BASE_DEC, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_area_address_network_number,
                  { "Area address network number", "nlsp.area_address.network_number",
                    FT_UINT32, BASE_HEX, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_area_address_mask,
                  { "Area address mask", "nlsp.area_address.mask",
                    FT_UINT32, BASE_HEX, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_neighbor,
                  { "Neighbor", "nlsp.neighbor",
                    FT_ETHER, BASE_NONE, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_hello_local_mtu_mtu_size,
                  { "MTU Size", "nlsp.hello_local_mtu.mtu_size",
                    FT_UINT32, BASE_DEC, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_hello_sending_router_system_id,
                  { "Sending Router System ID", "nlsp.hello.sending_router_system_id",
                    FT_ETHER, BASE_NONE, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_hello_local_wan_circuit_id,
                  { "Local WAN Circuit ID", "nlsp.hello.local_wan_circuit_id",
                    FT_UINT8, BASE_DEC, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_hello_designated_router_system_id,
                  { "Designated Router System ID", "nlsp.hello.designated_router_system_id",
                    FT_ETHER, BASE_NONE, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_hello_designated_router_pseudonode_id,
                  { "Designated Router Pseudonode ID", "nlsp.hello.designated_router_pseudonode_id",
                    FT_UINT8, BASE_DEC, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_mgt_info_network_number,
                  { "Network number", "nlsp.mgt_info.network_number",
                    FT_UINT32, BASE_HEX, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_mgt_info_node_number,
                  { "Node number", "nlsp.mgt_info.node_number",
                    FT_ETHER, BASE_NONE, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_mgt_info_ipx_version_number,
                  { "IPX version number", "nlsp.mgt_info.ipx_version_number",
                    FT_UINT8, BASE_DEC, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_mgt_info_name_length,
                  { "Name length", "nlsp.mgt_info.name_length",
                    FT_UINT8, BASE_DEC, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_mgt_info_name,
                  { "Name", "nlsp.mgt_info.name",
                    FT_STRING, BASE_NONE, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_link_info_router_system_id,
                  { "Router System ID", "nlsp.link_info.router_system_id",
                    FT_ETHER, BASE_NONE, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_link_info_router_pseudonode_id,
                  { "Router Pseudonode ID", "nlsp.link_info.router_pseudonode_id",
                    FT_UINT8, BASE_DEC, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_link_info_mtu_size,
                  { "MTU Size", "nlsp.link_info.mtu_size",
                    FT_UINT32, BASE_DEC, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_link_info_delay,
                  { "Delay", "nlsp.link_info.delay",
                    FT_UINT32, BASE_DEC, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_link_info_throughput,
                  { "Throughput", "nlsp.link_info.throughput",
                    FT_UINT32, BASE_DEC, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_link_info_media_type,
                  { "Media type", "nlsp.link_info.media_type",
                    FT_UINT16, BASE_DEC, VALS(media_type_vals), 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_svcs_info_hops_to_reach_the_service,
                  { "Hops to reach the service", "nlsp.svcs_info.hops_to_reach_the_service",
                    FT_UINT8, BASE_DEC, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_svcs_info_network_number,
                  { "Network number", "nlsp.svcs_info.network_number",
                    FT_UINT32, BASE_HEX, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_svcs_info_node_number,
                  { "Node number", "nlsp.svcs_info.node_number",
                    FT_ETHER, BASE_NONE, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_svcs_info_socket,
                  { "Socket", "nlsp.svcs_info.socket",
                    FT_UINT16, BASE_DEC|BASE_EXT_STRING, &ipx_socket_vals_ext, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_svcs_info_type,
                  { "Type", "nlsp.svcs_info.type",
                    FT_UINT16, BASE_DEC|BASE_EXT_STRING, &novell_server_vals_ext, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_svcs_info_service_name,
                  { "Service Name", "nlsp.svcs_info.service_name",
                    FT_STRING, BASE_NONE, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_ext_routes_hops,
                  { "Hops", "nlsp.ext_routes.hops",
                    FT_UINT8, BASE_DEC, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_ext_routes_network_number,
                  { "Network number", "nlsp.ext_routes.network_number",
                    FT_UINT32, BASE_HEX, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_ext_routes_rip_delay,
                  { "RIP delay", "nlsp.ext_routes.rip_delay",
                    FT_UINT16, BASE_DEC, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_remaining_lifetime,
                  { "Remaining Lifetime", "nlsp.remaining_lifetime",
                    FT_UINT16, BASE_DEC, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_lsp_id_system_id,
                  { "LSP ID system ID", "nlsp.lsp_id_system_id",
                    FT_ETHER, BASE_NONE, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_lsp_id_pseudonode_id,
                  { "LSP ID pseudonode ID", "nlsp.lsp_id_pseudonode_id",
                    FT_UINT8, BASE_DEC, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_lsp_id_lsp_number,
                  { "LSP ID LSP number", "nlsp.lsp_id_lsp_number",
                    FT_UINT8, BASE_DEC, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_csnp_lsp_id_source_id,
                  { "LSP ID source ID", "nlsp.csnp.lsp_id_source_id",
                    FT_ETHER, BASE_NONE, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_csnp_lsp_id_pseudonode_id,
                  { "LSP ID pseudonode ID", "nlsp.csnp.lsp_id_pseudonode_id",
                    FT_UINT8, BASE_DEC, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_csnp_lsp_id_lsp_number,
                  { "LSP ID LSP number", "nlsp.csnp.lsp_id_lsp_number",
                    FT_UINT8, BASE_DEC, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_csnp_lsp_sequence_number,
                  { "LSP Sequence Number", "nlsp.csnp.lsp_sequence_number",
                    FT_UINT32, BASE_HEX, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_csnp_remaining_lifetime,
                  { "Remaining Lifetime", "nlsp.csnp.remaining_lifetime",
                    FT_UINT16, BASE_DEC, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_csnp_lsp_checksum,
                  { "LSP checksum", "nlsp.csnp.lsp_checksum",
                    FT_UINT16, BASE_HEX, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_psnp_lsp_id_source_id,
                  { "LSP ID source ID", "nlsp.psnp.lsp_id_source_id",
                    FT_ETHER, BASE_NONE, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_psnp_lsp_id_pseudonode_id,
                  { "LSP ID pseudonode ID", "nlsp.psnp.lsp_id_pseudonode_id",
                    FT_UINT8, BASE_DEC, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_psnp_lsp_id_lsp_number,
                  { "LSP ID LSP number", "nlsp.psnp.lsp_id_lsp_number",
                    FT_UINT8, BASE_DEC, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_psnp_lsp_sequence_number,
                  { "LSP Sequence Number", "nlsp.psnp.lsp_sequence_number",
                    FT_UINT32, BASE_HEX, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_psnp_remaining_lifetime,
                  { "Remaining Lifetime", "nlsp.psnp.remaining_lifetime",
                    FT_UINT16, BASE_DEC, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_psnp_lsp_checksum,
                  { "LSP checksum", "nlsp.psnp.lsp_checksum",
                    FT_UINT16, BASE_HEX, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_csnp_source_id_system_id,
                  { "Source ID system ID", "nlsp.csnp.source_id_system_id",
                    FT_ETHER, BASE_NONE, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_csnp_source_id_pseudonode_id,
                  { "Source ID pseudonode ID", "nlsp.csnp.source_id_pseudonode_id",
                    FT_UINT8, BASE_DEC, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_csnp_start_lsp_id_source_id,
                  { "Start LSP ID source ID", "nlsp.csnp.start_lsp_id_source_id",
                    FT_ETHER, BASE_NONE, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_csnp_start_lsp_id_pseudonode_id,
                  { "Start LSP ID pseudonode ID", "nlsp.csnp.start_lsp_id_pseudonode_id",
                    FT_UINT8, BASE_DEC, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_csnp_start_lsp_id_lsp_number,
                  { "Start LSP ID LSP number", "nlsp.csnp.start_lsp_id_lsp_number",
                    FT_UINT8, BASE_DEC, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_csnp_end_lsp_id_source_id,
                  { "End LSP ID source ID", "nlsp.csnp.end_lsp_id_source_id",
                    FT_ETHER, BASE_NONE, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_csnp_end_lsp_id_pseudonode_id,
                  { "End LSP ID pseudonode ID", "nlsp.csnp.end_lsp_id_pseudonode_id",
                    FT_UINT8, BASE_DEC, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_csnp_end_lsp_id_lsp_number,
                  { "End LSP ID LSP number", "nlsp.csnp.end_lsp_id_lsp_number",
                    FT_UINT8, BASE_DEC, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_psnp_source_id_system_id,
                  { "Source ID system ID", "nlsp.psnp.source_id_system_id",
                    FT_ETHER, BASE_NONE, NULL, 0x0,
                    NULL, HFILL }
                },
                { &hf_nlsp_psnp_source_id_pseudonode_id,
                  { "Source ID pseudonode ID", "nlsp.psnp.source_id_pseudonode_id",
                    FT_UINT8, BASE_DEC, NULL, 0x0,
                    NULL, HFILL }
                },
        };
        static gint *ett[] = {
                &ett_nlsp,
                &ett_nlsp_hello_clv_area_addr,
                &ett_nlsp_hello_clv_neighbors,
                &ett_nlsp_hello_local_mtu,
                &ett_nlsp_hello_clv_unknown,
                &ett_nlsp_lsp_info,
                &ett_nlsp_lsp_clv_area_addr,
                &ett_nlsp_lsp_clv_mgt_info,
                &ett_nlsp_lsp_clv_link_info,
                &ett_nlsp_lsp_clv_svcs_info,
                &ett_nlsp_lsp_clv_ext_routes,
                &ett_nlsp_lsp_clv_unknown,
                &ett_nlsp_csnp_lsp_entries,
                &ett_nlsp_csnp_lsp_entry,
                &ett_nlsp_csnp_clv_unknown,
                &ett_nlsp_psnp_lsp_entries,
                &ett_nlsp_psnp_lsp_entry,
                &ett_nlsp_psnp_clv_unknown,
        };

        static ei_register_info ei[] = {
                { &ei_nlsp_short_packet, { "nlsp.short_packet", PI_MALFORMED, PI_ERROR, "Short packet", EXPFILL }},
                { &ei_nlsp_long_packet, { "nlsp.long_packet", PI_MALFORMED, PI_ERROR, "Long packet", EXPFILL }},
                { &ei_nlsp_major_version, { "nlsp.major_version.unknown", PI_PROTOCOL, PI_WARN, "Unknown NLSP version", EXPFILL }},
                { &ei_nlsp_type, { "nlsp.type.unknown", PI_PROTOCOL, PI_WARN, "Unknown NLSP packet type", EXPFILL }},
        };

        expert_module_t* expert_nlsp;

        proto_nlsp = proto_register_protocol("NetWare Link Services Protocol",
            "NLSP", "nlsp");
        proto_register_field_array(proto_nlsp, hf, array_length(hf));
        proto_register_subtree_array(ett, array_length(ett));
        expert_nlsp = expert_register_protocol(proto_nlsp);
        expert_register_field_array(expert_nlsp, ei, array_length(ei));
}

void
proto_reg_handoff_nlsp(void)
{
        dissector_handle_t nlsp_handle;

        nlsp_handle = create_dissector_handle(dissect_nlsp, proto_nlsp);
        dissector_add_uint("ipx.socket", IPX_SOCKET_NLSP, nlsp_handle);
}

/*
 * Editor modelines  -  http://www.wireshark.org/tools/modelines.html
 *
 * Local variables:
 * c-basic-offset: 8
 * tab-width: 8
 * indent-tabs-mode: t
 * End:
 *
 * vi: set shiftwidth=8 tabstop=8 noexpandtab:
 * :indentSize=8:tabSize=8:noTabs=false:
 */