/* packet-ncp.c

 * Routines for NetWare Core Protocol

 * Gilbert Ramirez <gram@alumni.rice.edu>

 * Modified to allow NCP over TCP/IP decodes by James Coe <jammer@cin.net>

 * Modified to decode server op-lock, packet signature,

 * & NDS packets by Greg Morris <gmorris@novell.com>

 *

 * Portions Copyright (c) by Gilbert Ramirez 2000-2002

 * Portions Copyright (c) by James Coe 2000-2002

 * Portions Copyright (c) Novell, Inc. 2000-2003

 *

 * Wireshark - Network traffic analyzer

 * By Gerald Combs <gerald@wireshark.org>

 * Copyright 2000 Gerald Combs

 *

 * SPDX-License-Identifier: GPL-2.0-or-later

 */

/* XXX:

   ToDo: Find and fix possible memory leak(s):

   Example:

   A 40M capture file with mostly NCP frames results

   in a 400K-800K memory usage increase each time the file is reloaded.

   (If the NCP dissection is disabled, there is minimal memory usage

   increase each time the file is reloaded).

*/

/*

 * On page 86 of

 *

 *   https://www.novell.com/documentation/developer/smscomp/pdfdoc/sms_docs/sms_docs.pdf

 *

 * it says:

 *

 * The following table lists the wild cards options that can be used in

 * the terminal path node.

 *

 *    Value  Option     Description

 *    0x2A   ASTERISK   Regular asterisk

 *    0x3F   QUESTION   Regular question mark

 *    0xAE   SPERIOD    Special Period-the most significant bit set

 *    0xAA   SASTERISK. Special Asterisk-the most significant bit set.

 *    0xBF   SQUESTION  Special Question-with the most significant bit set.

 *

 * ASTERISK is '*', and QUESTION is '?'; the "special" versions correspond

 * to the corresponding ASCII character, but with the upper bit set.

 *

 * They do not indicate what "special" means here.  During the painful

 * process at NetApp of reverse-engineering SMB server wildcard matching;

 * it turned out that "traditional 8.3 name" matching and "long name"

 * matching behave differently, and there were separate code points for

 * "traditional 8.3 name" wildcards and period and "long name" wildcards

 * and period, so that might be what's involved here.

 *

 * How should we display them?  Show the character in question plus a

 * Unicode COMBINING OVERLINE (U+0305), so they show up as {period,

 * asterisk, question mark} with an overline, for example?

 */

#include "config.h"

#include <epan/packet.h>

#include <epan/prefs.h>

#include <epan/srt_table.h>

#include "packet-ipx.h"

#include "packet-tcp.h"

#include "packet-ncp-int.h"

#include <epan/conversation_table.h>

void proto_register_ncp(void);

void proto_reg_handoff_ncp(void);

static dissector_handle_t ncp_handle;

static dissector_handle_t ncp_tcp_handle;

int proto_ncp;

static int hf_ncp_ip_ver;

static int hf_ncp_ip_length;

static int hf_ncp_ip_rplybufsize;

static int hf_ncp_ip_sig;

static int hf_ncp_ip_packetsig;

static int hf_ncp_type;

static int hf_ncp_seq;

static int hf_ncp_connection;

static int hf_ncp_task;

static int hf_ncp_stream_type;

static int hf_ncp_system_flags;

static int hf_ncp_system_flags_abt;

static int hf_ncp_system_flags_eob;

static int hf_ncp_system_flags_sys;

static int hf_ncp_system_flags_bsy;

static int hf_ncp_system_flags_lst;

static int hf_ncp_src_connection;

static int hf_ncp_dst_connection;

static int hf_ncp_packet_seqno;

static int hf_ncp_delay_time;

static int hf_ncp_burst_seqno;

static int hf_ncp_ack_seqno;

static int hf_ncp_burst_len;

static int hf_ncp_burst_offset;

static int hf_ncp_data_offset;

static int hf_ncp_data_bytes;

static int hf_ncp_missing_fraglist_count;

static int hf_ncp_missing_data_offset;

static int hf_ncp_missing_data_count;

static int hf_ncp_oplock_flag;

static int hf_ncp_oplock_handle;

static int hf_ncp_completion_code;

static int hf_ncp_connection_status;

static int hf_ncp_slot;

static int hf_ncp_signature_character;

/* static int hf_ncp_fragment_handle; */

static int hf_lip_echo_magic;

static int hf_lip_echo_payload;

static int hf_ncp_burst_command;

static int hf_ncp_burst_file_handle;

static int hf_ncp_burst_reserved;

int ett_ncp;

int ett_nds;

int ett_nds_segments;

int ett_nds_segment;

static int ett_ncp_system_flags;

static expert_field ei_ncp_oplock_handle;

static expert_field ei_ncp_new_server_session;

static expert_field ei_ncp_type;

static struct novell_tap ncp_tap;

static struct ncp_common_header     header;

static struct ncp_common_header    *ncp_hdr;

dissector_handle_t nds_data_handle;

/* desegmentation of NCP over TCP */

static bool ncp_desegment = true;

#define TCP_PORT_NCP            524

#define UDP_PORT_NCP            524

#define NCP_RQST_HDR_LENGTH     7

#define NCP_RPLY_HDR_LENGTH     8

/* These are the header structures to handle NCP over IP */

#define NCPIP_RQST      0x446d6454      /* "DmdT" */

#define NCPIP_RPLY      0x744e6350      /* "tNcP" */

struct ncp_ip_header {

    uint32_t signature;

    uint32_t length;

};

/* This header only appears on NCP over IP request packets */

struct ncp_ip_rqhdr {

    uint32_t version;

    uint32_t rplybufsize;

};

static const value_string ncp_sigchar_vals[] = {

  { '?', "Poll inactive station" },

  { 'Y', "Station is still using the connection" },

  { '!', "Broadcast message waiting" },

  { 0, NULL }

};

static const value_string ncp_ip_signature[] = {

    { NCPIP_RQST, "Demand Transport (Request)" },

    { NCPIP_RPLY, "Transport is NCP (Reply)" },

    { 0, NULL }

};

static const value_string burst_command[] = {

    { 0x01000000, "Burst Read" },

    { 0x02000000, "Burst Write" },

    { 0, NULL }

};

/* The information in this module comes from:

   NetWare LAN Analysis, Second Edition

   Laura A. Chappell and Dan E. Hakes

   (c) 1994 Novell, Inc.

   Novell Press, San Jose.

   ISBN: 0-7821-1362-1

   And from the ncpfs source code by Volker Lendecke

   And:

   Programmer's Guide to the NetWare Core Protocol

   Steve Conner & Diane Conner

   (c) 1996 by Steve Conner & Diane Conner

   Published by Annabooks, San Diego, California

   ISBN: 0-929392-31-0

   And:

   https://www.novell.com/developer/ndk/netware_core_protocols.html

   NCP documentation

   (formerly http:developer.novell.com)

*/

static const value_string ncp_type_vals[] = {

    { NCP_ALLOCATE_SLOT,    "Create a service connection" },

    { NCP_SERVICE_REQUEST,  "Service request" },

    { NCP_SERVICE_REPLY,    "Service reply" },

    { NCP_WATCHDOG,         "Watchdog" },

    { NCP_DEALLOCATE_SLOT,  "Destroy service connection" },

    { NCP_BROADCAST_SLOT,   "Server Broadcast" },

    { NCP_BURST_MODE_XFER,  "Burst mode transfer" },

    { NCP_POSITIVE_ACK,     "Request being processed" },

    { NCP_LIP_ECHO,         "Large Internet Packet Echo" },

    { 0,                    NULL }

};

static const value_string ncp_oplock_vals[] = {

    { 0x21, "Message Waiting" },

    { 0x24, "Clear Op-lock" },

    { 0, NULL }

};

enum ncp_table_values

{

    NCP_NCP_SRT_TABLE_INDEX = 0,

    NCP_NDS_SRT_TABLE_INDEX,

    NCP_FUNC_SRT_TABLE_INDEX,

    NCP_SSS_SRT_TABLE_INDEX,

    NCP_NMAS_SRT_TABLE_INDEX,

    NCP_SUB17_SRT_TABLE_INDEX,

    NCP_SUB21_SRT_TABLE_INDEX,

    NCP_SUB22_SRT_TABLE_INDEX,

    NCP_SUB23_SRT_TABLE_INDEX,

    NCP_SUB32_SRT_TABLE_INDEX,

    NCP_SUB34_SRT_TABLE_INDEX,

    NCP_SUB35_SRT_TABLE_INDEX,

    NCP_SUB36_SRT_TABLE_INDEX,

    NCP_SUB86_SRT_TABLE_INDEX,

    NCP_SUB87_SRT_TABLE_INDEX,

    NCP_SUB89_SRT_TABLE_INDEX,

    NCP_SUB90_SRT_TABLE_INDEX,

    NCP_SUB92_SRT_TABLE_INDEX,

    NCP_SUB94_SRT_TABLE_INDEX,

    NCP_SUB104_SRT_TABLE_INDEX,

    NCP_SUB111_SRT_TABLE_INDEX,

    NCP_SUB114_SRT_TABLE_INDEX,

    NCP_SUB123_SRT_TABLE_INDEX,

    NCP_SUB131_SRT_TABLE_INDEX

};

#define NCP_NUM_PROCEDURES     0

static const value_string ncp_group_vals[] = {

    { 0, "Synchronization" },

    { 1, "Print" },

    { 2, "File System" },

    { 3, "Connection" },

    { 4, "File Server Environment" },

    { 5, "Message" },

    { 6, "Bindery" },

    { 7, "Queue Management System (QMS)" },

    { 8, "Accounting" },

    { 9, "Transaction Tracking" },

    { 10, "AFP" },

    { 11, "NCP Extension" },

    { 12, "Extended Attribute" },

    { 13, "Auditing" },

    { 14, "Enhanced File System" },

    { 15, "Migration" },

    { 16, "Novell Modular Authentication Services (NMAS)" },

    { 17, "Secret Store Services (SSS)" },

    { 18, "Packet Burst" },

    { 19, "Novell Directory Services (NDS)" },

    { 20, "Time Synchronization" },

    { 21, "Server Statistics" },

    { 22, "Remote" },

    { 0,  NULL}

};

WS_DLL_PUBLIC_DEF const value_string sss_verb_enum[] = {

    { 0x00000000, "Query Server" },

    { 0x00000001, "Read App Secrets" },

    { 0x00000002, "Write App Secrets" },

    { 0x00000003, "Add Secret ID" },

    { 0x00000004, "Remove Secret ID" },

    { 0x00000005, "Remove SecretStore" },

    { 0x00000006, "Enumerate Secret IDs" },

    { 0x00000007, "Unlock Store" },

    { 0x00000008, "Set Master Password" },

    { 0x00000009, "Get Service Information" },

    { 0x000000ff, "Fragment"},

    { 0x00000000, NULL}

};

WS_DLL_PUBLIC_DEF const value_string nmas_subverb_enum[] = {

    { 0, "Fragmented Ping" },

    { 2, "Client Put Data" },

    { 4, "Client Get Data" },

    { 6, "Client Get User NDS Credentials" },

    { 8, "Login Store Management" },

    { 10, "Writable Object Check" },

    { 1242, "Message Handler" },

    { 0,  NULL}

};

WS_DLL_PUBLIC_DEF const value_string ncp_nds_verb_vals[] = {

    { 1, "Resolve Name" },

    { 2, "Read Entry Information" },

    { 3, "Read" },

    { 4, "Compare" },

    { 5, "List" },

    { 6, "Search Entries" },

    { 7, "Add Entry" },

    { 8, "Remove Entry" },

    { 9, "Modify Entry" },

    { 10, "Modify RDN" },

    { 11, "Create Attribute" },

    { 12, "Read Attribute Definition" },

    { 13, "Remove Attribute Definition" },

    { 14, "Define Class" },

    { 15, "Read Class Definition" },

    { 16, "Modify Class Definition" },

    { 17, "Remove Class Definition" },

    { 18, "List Containable Classes" },

    { 19, "Get Effective Rights" },

    { 20, "Add Partition" },

    { 21, "Remove Partition" },

    { 22, "List Partitions" },

    { 23, "Split Partition" },

    { 24, "Join Partitions" },

    { 25, "Add Replica" },

    { 26, "Remove Replica" },

    { 27, "Open Stream" },

    { 28, "Search Filter" },

    { 29, "Create Subordinate Reference" },

    { 30, "Link Replica" },

    { 31, "Change Replica Type" },

    { 32, "Start Update Schema" },

    { 33, "End Update Schema" },

    { 34, "Update Schema" },

    { 35, "Start Update Replica" },

    { 36, "End Update Replica" },

    { 37, "Update Replica" },

    { 38, "Synchronize Partition" },

    { 39, "Synchronize Schema" },

    { 40, "Read Syntaxes" },

    { 41, "Get Replica Root ID" },

    { 42, "Begin Move Entry" },

    { 43, "Finish Move Entry" },

    { 44, "Release Moved Entry" },

    { 45, "Backup Entry" },

    { 46, "Restore Entry" },

    { 47, "Save DIB (Obsolete)" },

    { 48, "Control" },

    { 49, "Remove Backlink" },

    { 50, "Close Iteration" },

    { 51, "Mutate Entry" },

    { 52, "Audit Skulking" },

    { 53, "Get Server Address" },

    { 54, "Set Keys" },

    { 55, "Change Password" },

    { 56, "Verify Password" },

    { 57, "Begin Login" },

    { 58, "Finish Login" },

    { 59, "Begin Authentication" },

    { 60, "Finish Authentication" },

    { 61, "Logout" },

    { 62, "Repair Ring (Obsolete)" },

    { 63, "Repair Timestamps" },

    { 64, "Create Back Link" },

    { 65, "Delete External Reference" },

    { 66, "Rename External Reference" },

    { 67, "Create Queue Entry Directory" },

    { 68, "Remove Queue Entry Directory" },

    { 69, "Merge Entries" },

    { 70, "Change Tree Name" },

    { 71, "Partition Entry Count" },

    { 72, "Check Login Restrictions" },

    { 73, "Start Join" },

    { 74, "Low Level Split" },

    { 75, "Low Level Join" },

    { 76, "Abort Partition Operation" },

    { 77, "Get All Servers" },

    { 78, "Partition Function" },

    { 79, "Read References" },

    { 80, "Inspect Entry" },

    { 81, "Get Remote Entry ID" },

    { 82, "Change Security" },

    { 83, "Check Console Operator" },

    { 84, "Start Move Tree" },

    { 85, "Move Tree" },

    { 86, "End Move Tree" },

    { 87, "Low Level Abort Join" },

    { 88, "Check Security Equivalence" },

    { 89, "Merge Tree" },

    { 90, "Sync External Reference" },

    { 91, "Resend Entry" },

    { 92, "New Schema Epoch" },

    { 93, "Statistics" },

    { 94, "Ping" },

    { 95, "Get Bindery Contexts" },

    { 96, "Monitor Connection" },

    { 97, "Get DS Statistics" },

    { 98, "Reset DS Counters" },

    { 99, "Console" },

    { 100, "Read Stream" },

    { 101, "Write Stream" },

    { 102, "Create Orphan Partition" },

    { 103, "Remove Orphan Partition" },

    { 104, "Link Orphan Partition" },

    { 105, "Set Distributed Reference Link (DRL)" },

    { 106, "Available" },

    { 107, "Available" },

    { 108, "Verify Distributed Reference Link (DRL)" },

    { 109, "Verify Partition" },

    { 110, "Iterator" },

    { 111, "Available" },

    { 112, "Close Stream" },

    { 113, "Available" },

    { 114, "Read Status" },

    { 115, "Partition Sync Status" },

    { 116, "Read Reference Data" },

    { 117, "Write Reference Data" },

    { 118, "Resource Event" },

    { 119, "DIB Request (obsolete)" },

    { 120, "Set Replication Filter" },

    { 121, "Get Replication Filter" },

    { 122, "Change Attribute Definition" },

    { 123, "Schema in Use" },

    { 124, "Remove Keys" },

    { 125, "Clone" },

    { 126, "Multiple Operations Transaction" },

    { 240, "Ping" },

    { 255, "EDirectory Call" },

    { 0,  NULL }

};

static void

ncpstat_init(struct register_srt* srt _U_, GArray* srt_array)

{

    /* Initialize all of the SRT tables with 0 rows.  That way we can "filter" the drawing

       function to only output tables with rows > 0 */

    init_srt_table("NCP", "Groups", srt_array, NCP_NUM_PROCEDURES, NULL, "ncp.group", NULL);

    /* NDS Verbs */

    init_srt_table("NDS Verbs", "NDS", srt_array, NCP_NUM_PROCEDURES, NULL, "ncp.ndsverb", NULL);

    /* NCP Functions */

    init_srt_table("NCP Functions without Subfunctions", "Functions", srt_array, NCP_NUM_PROCEDURES, NULL, "ncp.func", NULL);

    /* Secret Store Verbs */

    init_srt_table("Secret Store Verbs", "SSS", srt_array, NCP_NUM_PROCEDURES, NULL, "sss.subverb", NULL);

    /* NMAS Verbs */

    init_srt_table("NMAS Verbs", "NMAS", srt_array, NCP_NUM_PROCEDURES, NULL, "nmas.subverb", NULL);

    /* NCP Subfunctions */

    init_srt_table("Subfunctions for NCP 17", "17", srt_array, NCP_NUM_PROCEDURES, NULL, "ncp.func==17 && ncp.subfunc", NULL);

    init_srt_table("Subfunctions for NCP 21", "21", srt_array, NCP_NUM_PROCEDURES, NULL, "ncp.func==21 && ncp.subfunc", NULL);

    init_srt_table("Subfunctions for NCP 22", "22", srt_array, NCP_NUM_PROCEDURES, NULL, "ncp.func==22 && ncp.subfunc", NULL);

    init_srt_table("Subfunctions for NCP 23", "23", srt_array, NCP_NUM_PROCEDURES, NULL, "ncp.func==23 && ncp.subfunc", NULL);

    init_srt_table("Subfunctions for NCP 32", "32", srt_array, NCP_NUM_PROCEDURES, NULL, "ncp.func==32 && ncp.subfunc", NULL);

    init_srt_table("Subfunctions for NCP 34", "34", srt_array, NCP_NUM_PROCEDURES, NULL, "ncp.func==34 && ncp.subfunc", NULL);

    init_srt_table("Subfunctions for NCP 35", "35", srt_array, NCP_NUM_PROCEDURES, NULL, "ncp.func==35 && ncp.subfunc", NULL);

    init_srt_table("Subfunctions for NCP 36", "36", srt_array, NCP_NUM_PROCEDURES, NULL, "ncp.func==36 && ncp.subfunc", NULL);

    init_srt_table("Subfunctions for NCP 86", "86", srt_array, NCP_NUM_PROCEDURES, NULL, "ncp.func==86 && ncp.subfunc", NULL);

    init_srt_table("Subfunctions for NCP 87", "87", srt_array, NCP_NUM_PROCEDURES, NULL, "ncp.func==87 && ncp.subfunc", NULL);

    init_srt_table("Subfunctions for NCP 89 (Extended NCP's with UTF8 Support)", "89", srt_array, NCP_NUM_PROCEDURES, NULL, "ncp.func==89 && ncp.subfunc", NULL);

    init_srt_table("Subfunctions for NCP 90", "90", srt_array, NCP_NUM_PROCEDURES, NULL, "ncp.func==90 && ncp.subfunc", NULL);

    init_srt_table("Subfunctions for NCP 92 (Secret Store Services)", "92", srt_array, NCP_NUM_PROCEDURES, NULL, "ncp.func==92 && ncp.subfunc", NULL);

    init_srt_table("Subfunctions for NCP 94 (Novell Modular Authentication Services)", "94", srt_array, NCP_NUM_PROCEDURES, NULL, "ncp.func==94 && ncp.subfunc", NULL);

    init_srt_table("Subfunctions for NCP 104", "104", srt_array, NCP_NUM_PROCEDURES, NULL, "ncp.func==104 && ncp.subfunc", NULL);

    init_srt_table("Subfunctions for NCP 111", "111", srt_array, NCP_NUM_PROCEDURES, NULL, "ncp.func==111 && ncp.subfunc", NULL);

    init_srt_table("Subfunctions for NCP 114", "114", srt_array, NCP_NUM_PROCEDURES, NULL, "ncp.func==114 && ncp.subfunc", NULL);

    init_srt_table("Subfunctions for NCP 123", "123", srt_array, NCP_NUM_PROCEDURES, NULL, "ncp.func==123 && ncp.subfunc", NULL);

    init_srt_table("Subfunctions for NCP 131", "131", srt_array, NCP_NUM_PROCEDURES, NULL, "ncp.func==131 && ncp.subfunc", NULL);

}

static tap_packet_status

ncpstat_packet(void *pss, packet_info *pinfo, epan_dissect_t *edt _U_, const void *prv, tap_flags_t flags _U_)

{

    unsigned i = 0;

    srt_stat_table *ncp_srt_table;

    srt_data_t *data = (srt_data_t *)pss;

    const ncp_req_hash_value *request_val=(const ncp_req_hash_value *)prv;

    char* tmp_str;

    /* if we haven't seen the request, just ignore it */

    if(!request_val || request_val->ncp_rec==0){

        return TAP_PACKET_DONT_REDRAW;

    }

    /* By Group */

    tmp_str = val_to_str_wmem(NULL, request_val->ncp_rec->group, ncp_group_vals, "Unknown(%u)");

    i = NCP_NCP_SRT_TABLE_INDEX;

    ncp_srt_table = g_array_index(data->srt_array, srt_stat_table*, i);

    init_srt_table_row(ncp_srt_table, request_val->ncp_rec->group, tmp_str);

    wmem_free(NULL, tmp_str);

    add_srt_table_data(ncp_srt_table, request_val->ncp_rec->group, &request_val->req_frame_time, pinfo);

    /* By NCP number without subfunction*/

    if (request_val->ncp_rec->subfunc==0) {

        i = NCP_FUNC_SRT_TABLE_INDEX;

        ncp_srt_table = g_array_index(data->srt_array, srt_stat_table*, i);

        init_srt_table_row(ncp_srt_table, request_val->ncp_rec->func, request_val->ncp_rec->name);

        add_srt_table_data(ncp_srt_table, request_val->ncp_rec->func, &request_val->req_frame_time, pinfo);

    }

    /* By Subfunction number */

    if(request_val->ncp_rec->subfunc!=0){

        if (request_val->ncp_rec->func==17) {

            i = NCP_SUB17_SRT_TABLE_INDEX;

            ncp_srt_table = g_array_index(data->srt_array, srt_stat_table*, i);

            init_srt_table_row(ncp_srt_table, (request_val->ncp_rec->subfunc), request_val->ncp_rec->name);

            add_srt_table_data(ncp_srt_table, (request_val->ncp_rec->subfunc), &request_val->req_frame_time, pinfo);

        }

        if (request_val->ncp_rec->func==21) {

            i = NCP_SUB21_SRT_TABLE_INDEX;

            ncp_srt_table = g_array_index(data->srt_array, srt_stat_table*, i);

            init_srt_table_row(ncp_srt_table, (request_val->ncp_rec->subfunc), request_val->ncp_rec->name);

            add_srt_table_data(ncp_srt_table, (request_val->ncp_rec->subfunc), &request_val->req_frame_time, pinfo);

        }

        if (request_val->ncp_rec->func==22) {

            i = NCP_SUB22_SRT_TABLE_INDEX;

            ncp_srt_table = g_array_index(data->srt_array, srt_stat_table*, i);

            init_srt_table_row(ncp_srt_table, (request_val->ncp_rec->subfunc), request_val->ncp_rec->name);

            add_srt_table_data(ncp_srt_table, (request_val->ncp_rec->subfunc), &request_val->req_frame_time, pinfo);

        }

        if (request_val->ncp_rec->func==23) {

            i = NCP_SUB23_SRT_TABLE_INDEX;

            ncp_srt_table = g_array_index(data->srt_array, srt_stat_table*, i);

            init_srt_table_row(ncp_srt_table, (request_val->ncp_rec->subfunc), request_val->ncp_rec->name);

            add_srt_table_data(ncp_srt_table, (request_val->ncp_rec->subfunc), &request_val->req_frame_time, pinfo);

        }

        if (request_val->ncp_rec->func==32) {

            i = NCP_SUB32_SRT_TABLE_INDEX;

            ncp_srt_table = g_array_index(data->srt_array, srt_stat_table*, i);

            init_srt_table_row(ncp_srt_table, (request_val->ncp_rec->subfunc), request_val->ncp_rec->name);

            add_srt_table_data(ncp_srt_table, (request_val->ncp_rec->subfunc), &request_val->req_frame_time, pinfo);

        }

        if (request_val->ncp_rec->func==34) {

            i = NCP_SUB34_SRT_TABLE_INDEX;

            ncp_srt_table = g_array_index(data->srt_array, srt_stat_table*, i);

            init_srt_table_row(ncp_srt_table, (request_val->ncp_rec->subfunc), request_val->ncp_rec->name);

            add_srt_table_data(ncp_srt_table, (request_val->ncp_rec->subfunc), &request_val->req_frame_time, pinfo);

        }

        if (request_val->ncp_rec->func==35) {

            i = NCP_SUB35_SRT_TABLE_INDEX;

            ncp_srt_table = g_array_index(data->srt_array, srt_stat_table*, i);

            init_srt_table_row(ncp_srt_table, (request_val->ncp_rec->subfunc), request_val->ncp_rec->name);

            add_srt_table_data(ncp_srt_table, (request_val->ncp_rec->subfunc), &request_val->req_frame_time, pinfo);

        }

        if (request_val->ncp_rec->func==36) {

            i = NCP_SUB36_SRT_TABLE_INDEX;

            ncp_srt_table = g_array_index(data->srt_array, srt_stat_table*, i);

            init_srt_table_row(ncp_srt_table, (request_val->ncp_rec->subfunc), request_val->ncp_rec->name);

            add_srt_table_data(ncp_srt_table, (request_val->ncp_rec->subfunc), &request_val->req_frame_time, pinfo);

        }

        if (request_val->ncp_rec->func==86) {

            i = NCP_SUB86_SRT_TABLE_INDEX;

            ncp_srt_table = g_array_index(data->srt_array, srt_stat_table*, i);

            init_srt_table_row(ncp_srt_table, (request_val->ncp_rec->subfunc), request_val->ncp_rec->name);

            add_srt_table_data(ncp_srt_table, (request_val->ncp_rec->subfunc), &request_val->req_frame_time, pinfo);

        }

        if (request_val->ncp_rec->func==87) {

            i = NCP_SUB87_SRT_TABLE_INDEX;

            ncp_srt_table = g_array_index(data->srt_array, srt_stat_table*, i);

            init_srt_table_row(ncp_srt_table, (request_val->ncp_rec->subfunc), request_val->ncp_rec->name);

            add_srt_table_data(ncp_srt_table, (request_val->ncp_rec->subfunc), &request_val->req_frame_time, pinfo);

        }

        if (request_val->ncp_rec->func==89) {

            i = NCP_SUB89_SRT_TABLE_INDEX;

            ncp_srt_table = g_array_index(data->srt_array, srt_stat_table*, i);

            init_srt_table_row(ncp_srt_table, (request_val->ncp_rec->subfunc), request_val->ncp_rec->name);

            add_srt_table_data(ncp_srt_table, (request_val->ncp_rec->subfunc), &request_val->req_frame_time, pinfo);

        }

        if (request_val->ncp_rec->func==90) {

            i = NCP_SUB90_SRT_TABLE_INDEX;

            ncp_srt_table = g_array_index(data->srt_array, srt_stat_table*, i);

            init_srt_table_row(ncp_srt_table, (request_val->ncp_rec->subfunc), request_val->ncp_rec->name);

            add_srt_table_data(ncp_srt_table, (request_val->ncp_rec->subfunc), &request_val->req_frame_time, pinfo);

        }

        if (request_val->ncp_rec->func==92) {

            i = NCP_SUB92_SRT_TABLE_INDEX;

            ncp_srt_table = g_array_index(data->srt_array, srt_stat_table*, i);

            init_srt_table_row(ncp_srt_table, (request_val->ncp_rec->subfunc), request_val->ncp_rec->name);

            add_srt_table_data(ncp_srt_table, (request_val->ncp_rec->subfunc), &request_val->req_frame_time, pinfo);

        }

        if (request_val->ncp_rec->func==94) {

            i = NCP_SUB94_SRT_TABLE_INDEX;

            ncp_srt_table = g_array_index(data->srt_array, srt_stat_table*, i);

            init_srt_table_row(ncp_srt_table, (request_val->ncp_rec->subfunc), request_val->ncp_rec->name);

            add_srt_table_data(ncp_srt_table, (request_val->ncp_rec->subfunc), &request_val->req_frame_time, pinfo);

        }

        if (request_val->ncp_rec->func==104) {

            i = NCP_SUB104_SRT_TABLE_INDEX;

            ncp_srt_table = g_array_index(data->srt_array, srt_stat_table*, i);

            init_srt_table_row(ncp_srt_table, (request_val->ncp_rec->subfunc), request_val->ncp_rec->name);

            add_srt_table_data(ncp_srt_table, (request_val->ncp_rec->subfunc), &request_val->req_frame_time, pinfo);

        }

        if (request_val->ncp_rec->func==111) {

            i = NCP_SUB111_SRT_TABLE_INDEX;

            ncp_srt_table = g_array_index(data->srt_array, srt_stat_table*, i);

            init_srt_table_row(ncp_srt_table, (request_val->ncp_rec->subfunc), request_val->ncp_rec->name);

            add_srt_table_data(ncp_srt_table, (request_val->ncp_rec->subfunc), &request_val->req_frame_time, pinfo);

        }

        if (request_val->ncp_rec->func==114) {

            i = NCP_SUB114_SRT_TABLE_INDEX;

            ncp_srt_table = g_array_index(data->srt_array, srt_stat_table*, i);

            init_srt_table_row(ncp_srt_table, (request_val->ncp_rec->subfunc), request_val->ncp_rec->name);

            add_srt_table_data(ncp_srt_table, (request_val->ncp_rec->subfunc), &request_val->req_frame_time, pinfo);

        }

        if (request_val->ncp_rec->func==123) {

            i = NCP_SUB123_SRT_TABLE_INDEX;

            ncp_srt_table = g_array_index(data->srt_array, srt_stat_table*, i);

            init_srt_table_row(ncp_srt_table, (request_val->ncp_rec->subfunc), request_val->ncp_rec->name);

            add_srt_table_data(ncp_srt_table, (request_val->ncp_rec->subfunc), &request_val->req_frame_time, pinfo);

        }

        if (request_val->ncp_rec->func==131) {

            i = NCP_SUB131_SRT_TABLE_INDEX;

            ncp_srt_table = g_array_index(data->srt_array, srt_stat_table*, i);

            init_srt_table_row(ncp_srt_table, (request_val->ncp_rec->subfunc), request_val->ncp_rec->name);

            add_srt_table_data(ncp_srt_table, (request_val->ncp_rec->subfunc), &request_val->req_frame_time, pinfo);

        }

    }

    /* By NDS verb */

    if (request_val->ncp_rec->func==0x68) {

        tmp_str = val_to_str_wmem(NULL, request_val->nds_request_verb, ncp_nds_verb_vals, "Unknown(%u)");

        i = NCP_NDS_SRT_TABLE_INDEX;

        ncp_srt_table = g_array_index(data->srt_array, srt_stat_table*, i);

        init_srt_table_row(ncp_srt_table, (request_val->nds_request_verb), tmp_str);

        add_srt_table_data(ncp_srt_table, (request_val->nds_request_verb), &request_val->req_frame_time, pinfo);

        wmem_free(NULL, tmp_str);

    }

    if (request_val->ncp_rec->func==0x5c) {

        tmp_str = val_to_str_wmem(NULL, request_val->req_nds_flags, sss_verb_enum, "Unknown(%u)");

        i = NCP_SSS_SRT_TABLE_INDEX;

        ncp_srt_table = g_array_index(data->srt_array, srt_stat_table*, i);

        init_srt_table_row(ncp_srt_table, (request_val->req_nds_flags), tmp_str);

        add_srt_table_data(ncp_srt_table, (request_val->req_nds_flags), &request_val->req_frame_time, pinfo);

        wmem_free(NULL, tmp_str);

    }

    if (request_val->ncp_rec->func==0x5e) {

        tmp_str = val_to_str_wmem(NULL, request_val->req_nds_flags, nmas_subverb_enum, "Unknown(%u)");

        i = NCP_NMAS_SRT_TABLE_INDEX;

        ncp_srt_table = g_array_index(data->srt_array, srt_stat_table*, i);

        init_srt_table_row(ncp_srt_table, (request_val->req_nds_flags), tmp_str);

        add_srt_table_data(ncp_srt_table, (request_val->req_nds_flags), &request_val->req_frame_time, pinfo);

        wmem_free(NULL, tmp_str);

    }

    return TAP_PACKET_REDRAW;

}

/* Conversation Struct so we can detect NCP server sessions */

typedef struct {

    conversation_t *conversation;

    uint32_t        nwconnection;

    uint8_t         nwtask;

} mncp_rhash_key;

/* Store the packet number for the start of the NCP session.

 * Note sessions are defined as

 * NCP Connection + NCP Task == Unique NCP server session

 * It is normal for multiple sessions per connection to exist

 * These are normally different applications running on multi-tasking

 * Operating Systems.

 */

typedef struct {

    uint32_t session_start_packet_num;

} mncp_rhash_value;

static GHashTable *mncp_rhash;

/* Hash Functions */

static int

mncp_equal(const void *v, const void *v2)

{

    const mncp_rhash_key *val1 = (const mncp_rhash_key*)v;

    const mncp_rhash_key *val2 = (const mncp_rhash_key*)v2;

    if (val1->conversation == val2->conversation && val1->nwconnection == val2->nwconnection && val1->nwtask == val2->nwtask) {

        return 1;

    }

    return 0;

}

static unsigned

mncp_hash(const void *v)

{

    const mncp_rhash_key *mncp_key = (const mncp_rhash_key*)v;

    return GPOINTER_TO_UINT(mncp_key->conversation)+mncp_key->nwconnection+mncp_key->nwtask;

}

/* Initializes the hash table each time a new

 * file is loaded or re-loaded in wireshark */

static void

mncp_init_protocol(void)

{

    mncp_rhash = g_hash_table_new(mncp_hash, mncp_equal);

}

static void

mncp_cleanup_protocol(void)

{

    g_hash_table_destroy(mncp_rhash);

}

static mncp_rhash_value*

mncp_hash_insert(conversation_t *conversation, uint32_t nwconnection, uint8_t nwtask, packet_info *pinfo)

{

    mncp_rhash_key      *key;

    mncp_rhash_value    *value;

    /* Now remember the request, so we can find it if we later

       a reply to it. Track by conversation, connection, and task number.

       in NetWare these values determine each unique session */

    key = wmem_new(wmem_file_scope(), mncp_rhash_key);

    key->conversation = conversation;

    key->nwconnection = nwconnection;

    key->nwtask = nwtask;

    value = wmem_new(wmem_file_scope(), mncp_rhash_value);

    g_hash_table_insert(mncp_rhash, key, value);

    if (ncp_echo_conn && nwconnection != 65535) {

        expert_add_info_format(pinfo, NULL, &ei_ncp_new_server_session, "Detected New Server Session. Connection %d, Task %d", nwconnection, nwtask);

        value->session_start_packet_num = pinfo->num;

    }

    return value;

}

/* Returns the ncp_rec*, or NULL if not found. */

static mncp_rhash_value*

mncp_hash_lookup(conversation_t *conversation, uint32_t nwconnection, uint8_t nwtask)

{

    mncp_rhash_key        key;

    key.conversation = conversation;

    key.nwconnection = nwconnection;

    key.nwtask = nwtask;

    return (mncp_rhash_value *)g_hash_table_lookup(mncp_rhash, &key);

}

static const char* ncp_conv_get_filter_type(conv_item_t* conv _U_, conv_filter_type_e filter)

{

    if ((filter == CONV_FT_SRC_PORT) || (filter == CONV_FT_DST_PORT) || (filter == CONV_FT_ANY_PORT))

        return "ncp.connection";

    return CONV_FILTER_INVALID;

}

static ct_dissector_info_t ncp_ct_dissector_info = {&ncp_conv_get_filter_type};

static tap_packet_status

ncp_conversation_packet(void *pct, packet_info *pinfo, epan_dissect_t *edt _U_, const void *vip, tap_flags_t flags)

{

    conv_hash_t *hash = (conv_hash_t*) pct;

    hash->flags = flags;

    const struct ncp_common_header *ncph=(const struct ncp_common_header *)vip;

    uint32_t connection;

    connection = (ncph->conn_high * 256)+ncph->conn_low;

    if (connection < 65535) {

        add_conversation_table_data(hash, &pinfo->src, &pinfo->dst, connection, connection, 1, pinfo->fd->pkt_len, &pinfo->rel_ts, &pinfo->abs_ts, &ncp_ct_dissector_info, CONVERSATION_NCP);

    }

    return TAP_PACKET_REDRAW;

}

static const char* ncp_endpoint_get_filter_type(endpoint_item_t* endpoint _U_, conv_filter_type_e filter)

{

    return ncp_conv_get_filter_type(NULL, filter);

}

static et_dissector_info_t ncp_endpoint_dissector_info = {&ncp_endpoint_get_filter_type};

static tap_packet_status

ncp_endpoint_packet(void *pit, packet_info *pinfo, epan_dissect_t *edt _U_, const void *vip _U_, tap_flags_t flags)

{

    conv_hash_t *hash = (conv_hash_t*) pit;

    hash->flags = flags;

    /*const ncp_common_header *ncphdr=vip;*/

    /* Take two "add" passes per packet, adding for each direction, ensures that all

    packets are counted properly (even if address is sending to itself)

    XXX - this could probably be done more efficiently inside endpoint_table */

    add_endpoint_table_data(hash, &pinfo->src, 0, true, 1, pinfo->fd->pkt_len, &ncp_endpoint_dissector_info, ENDPOINT_NCP);

    add_endpoint_table_data(hash, &pinfo->dst, 0, false, 1, pinfo->fd->pkt_len, &ncp_endpoint_dissector_info, ENDPOINT_NCP);

    return TAP_PACKET_REDRAW;

}

/*

 * Burst packet system flags.

 */

#define ABT 0x04        /* Abort request */

#define BSY 0x08        /* Server Busy */

#define EOB 0x10        /* End of burst */

#define LST 0x40        /* Include Fragment List */

#define SYS 0x80        /* System packet */

#define LIP_ECHO_MAGIC_LEN 16

static const unsigned char lip_echo_magic[LIP_ECHO_MAGIC_LEN] = {

    'L', 'I', 'P', ' ', 'E', 'c', 'h', 'o', ' ', 'D', 'a', 't', 'a', ' ', ' ', ' '

};

static void

dissect_ncp_common(tvbuff_t *tvb, packet_info *pinfo, proto_tree *tree,

    bool is_tcp)

{

    proto_tree            *ncp_tree = NULL;

    proto_item            *ti;

    struct ncp_ip_header  ncpiph;

    struct ncp_ip_rqhdr   ncpiphrq;

    bool                  is_lip_echo_allocate_slot = false;

    uint16_t              ncp_burst_seqno, ncp_ack_seqno;

    uint16_t              flags = 0;

    proto_tree            *flags_tree = NULL;

    int                   hdr_offset = 0;

    int                   commhdr = 0;

    int                   offset = 0;

    int                   length_remaining;

    tvbuff_t              *next_tvb;

    uint32_t              ncp_burst_command, burst_len, burst_off, burst_file;

    uint8_t               subfunction;

    uint32_t              nw_connection = 0, data_offset;

    uint16_t              data_len = 0;

    uint16_t              missing_fraglist_count = 0;

    mncp_rhash_value      *request_value = NULL;

    conversation_t        *conversation;

    col_set_str(pinfo->cinfo, COL_PROTOCOL, "NCP");

    col_clear(pinfo->cinfo, COL_INFO);

    ncp_hdr = &header;

    ti = proto_tree_add_item(tree, proto_ncp, tvb, 0, -1, ENC_NA);

    ncp_tree = proto_item_add_subtree(ti, ett_ncp);

    if (is_tcp) {

        if (tvb_get_ntohl(tvb, hdr_offset) != NCPIP_RQST && tvb_get_ntohl(tvb, hdr_offset) != NCPIP_RPLY)

            commhdr += 1;

        /* Get NCPIP Header data */

        ncpiph.signature = tvb_get_ntohl(tvb, commhdr);

        proto_tree_add_uint(ncp_tree, hf_ncp_ip_sig, tvb, commhdr, 4, ncpiph.signature);

        ncpiph.length = (0x7fffffff & tvb_get_ntohl(tvb, commhdr+4));

        proto_tree_add_uint(ncp_tree, hf_ncp_ip_length, tvb, commhdr+4, 4, ncpiph.length);

        commhdr += 8;

        if (ncpiph.signature == NCPIP_RQST) {

            ncpiphrq.version = tvb_get_ntohl(tvb, commhdr);

            proto_tree_add_uint(ncp_tree, hf_ncp_ip_ver, tvb, commhdr, 4, ncpiphrq.version);

            commhdr += 4;

            ncpiphrq.rplybufsize = tvb_get_ntohl(tvb, commhdr);

            proto_tree_add_uint(ncp_tree, hf_ncp_ip_rplybufsize, tvb, commhdr, 4, ncpiphrq.rplybufsize);

            commhdr += 4;

        }

        /* Check to see if this is a valid offset, otherwise increment for packet signature */

        if (try_val_to_str(tvb_get_ntohs(tvb, commhdr), ncp_type_vals)==NULL) {

            /* Check to see if we have a valid type after packet signature length */

            if (try_val_to_str(tvb_get_ntohs(tvb, commhdr+8), ncp_type_vals)!=NULL) {

                proto_tree_add_item(ncp_tree, hf_ncp_ip_packetsig, tvb, commhdr, 8, ENC_NA);

                commhdr += 8;

            }

        }

    } else {

        /* Initialize this structure, we use it below */

        memset(&ncpiph, 0, sizeof(ncpiph));

    }

    header.type         = tvb_get_ntohs(tvb, commhdr);

    header.sequence     = tvb_get_uint8(tvb, commhdr+2);

    header.conn_low     = tvb_get_uint8(tvb, commhdr+3);

    header.task         = tvb_get_uint8(tvb, commhdr+4);

    header.conn_high    = tvb_get_uint8(tvb, commhdr+5);

    proto_tree_add_uint(ncp_tree, hf_ncp_type, tvb, commhdr, 2, header.type);

    nw_connection = (header.conn_high*256)+header.conn_low;

    /* Ok, we need to track the conversation so that we can

     * determine if a new server session is occurring for this

     * connection.

     */

    conversation = find_conversation(pinfo->num, &pinfo->src, &pinfo->dst,

        CONVERSATION_NCP, (uint32_t) pinfo->srcport, (uint32_t) pinfo->destport,

        0);

    if ((ncpiph.length & 0x80000000) || ncpiph.signature == NCPIP_RPLY) {

        /* First time through we will record the initial connection and task

         * values

         */

        if (!pinfo->fd->visited) {

            if (conversation != NULL) {

                /* find the record telling us the

                 * request made that caused this

                 * reply

                 */

                request_value = mncp_hash_lookup(conversation, nw_connection, header.task);

                /* if for some reason we have no

                 * conversation in our hash, create

                 * one */

                if (request_value == NULL) {

                    mncp_hash_insert(conversation, nw_connection, header.task, pinfo);

                }

            } else {

                /* It's not part of any conversation

                 * - create a new one.

                 */

                conversation = conversation_new(pinfo->num, &pinfo->src,

                    &pinfo->dst, CONVERSATION_NCP, (uint32_t) pinfo->srcport, (uint32_t) pinfo->destport, 0);

                mncp_hash_insert(conversation, nw_connection, header.task, pinfo);

            }

            /* If this is a request packet then we

             * might have a new task

             */

            if (ncpiph.signature == NCPIP_RPLY) {

                /* Now on reply packets we have to

                 * use the state of the original

                 * request packet, so look up the

                 * request value and check the task number

                 */

                /*request_value = mncp_hash_lookup(conversation, nw_connection, header.task);*/

            }

        } else {

            /* Get request value data */

            request_value = mncp_hash_lookup(conversation, nw_connection, header.task);

            if (request_value) {

                if ((request_value->session_start_packet_num == pinfo->num) && ncp_echo_conn) {

                    expert_add_info_format(pinfo, NULL, &ei_ncp_new_server_session, "Detected New Server Session. Connection %d, Task %d", nw_connection, header.task);

                }

            }

        }

    } else {

        if (!pinfo->fd->visited) {

            if (conversation != NULL) {

                /* find the record telling us the

                 * request made that caused this

                 * reply

                 */

                request_value = mncp_hash_lookup(conversation, nw_connection, header.task);

                /* if for some reason we have no

                 * conversation in our hash, create

                 * one */

                if (request_value == NULL) {

                    mncp_hash_insert(conversation, nw_connection, header.task, pinfo);

                }

            } else {

                /* It's not part of any conversation

                 * - create a new one.

                 */

                conversation = conversation_new(pinfo->num, &pinfo->src,

                    &pinfo->dst, CONVERSATION_NCP, (uint32_t) pinfo->srcport, (uint32_t) pinfo->destport, 0);

                mncp_hash_insert(conversation, nw_connection, header.task, pinfo);

            }

            /* find the record telling us the request

             * made that caused this reply

             */

        } else {

            request_value = mncp_hash_lookup(conversation, nw_connection, header.task);

            if (request_value) {

                if ((request_value->session_start_packet_num == pinfo->num) && ncp_echo_conn) {

                    expert_add_info_format(pinfo, NULL, &ei_ncp_new_server_session, "Detected New Server Session. Connection %d, Task %d", nw_connection, header.task);

                }

            }

        }

    }

    tap_queue_packet(ncp_tap.hdr, pinfo, ncp_hdr);

    col_add_str(pinfo->cinfo, COL_INFO,

        val_to_str(header.type, ncp_type_vals, "Unknown type (0x%04x)"));

    /*

     * Process the packet-type-specific header.

     */

    switch (header.type) {

    case NCP_BROADCAST_SLOT:    /* Server Broadcast */

        proto_tree_add_uint(ncp_tree, hf_ncp_seq, tvb, commhdr + 2, 1, header.sequence);

        proto_tree_add_uint(ncp_tree, hf_ncp_connection,tvb, commhdr + 3, 3, nw_connection);

        proto_tree_add_item(ncp_tree, hf_ncp_task, tvb, commhdr + 4, 1, ENC_BIG_ENDIAN);

        proto_tree_add_item(ncp_tree, hf_ncp_oplock_flag, tvb, commhdr + 9, 1, ENC_BIG_ENDIAN);

        proto_tree_add_item(ncp_tree, hf_ncp_oplock_handle, tvb, commhdr + 10, 4, ENC_BIG_ENDIAN);

        if ((tvb_get_uint8(tvb, commhdr+9)==0x24) && ncp_echo_file) {

            expert_add_info_format(pinfo, NULL, &ei_ncp_oplock_handle, "Server requesting station to clear oplock on handle - %08x", tvb_get_ntohl(tvb, commhdr+10));

        }

        break;

    case NCP_LIP_ECHO:    /* Lip Echo Packet */

        /* Unlike the ones with a packet type of 0x1111, in this one, the

           packet type field is the first two bytes of "Lip Echo Data"

           (with "Lip" not capitalized, and with "Echo Data" not followed

           by blanks) */

        proto_tree_add_item(ncp_tree, hf_lip_echo_magic, tvb, commhdr, 13, ENC_ASCII);

        break;

    case NCP_BURST_MODE_XFER:    /* Packet Burst Packet */

        /*

         * XXX - we should keep track of whether there's a burst

         * outstanding on a connection and, if not, treat the

         * beginning of the data as a burst header.

         *

         * The burst header contains:

         *