/* packet-marker.c

 * Routines for Link Aggregation Marker protocol dissection.

 * IEEE Std 802.1AX-2014 Section 6.5

 *

 * Copyright 2002 Steve Housley <steve_housley@3com.com>

 * Copyright 2005 Dominique Bastien <dbastien@accedian.com>

 *

 * Wireshark - Network traffic analyzer

 * By Gerald Combs <gerald@wireshark.org>

 * Copyright 1998 Gerald Combs

 *

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

 */

#include "config.h"

#include <epan/packet.h>

#include <epan/to_str.h>

#include <epan/expert.h>

#include "packet-slowprotocols.h"

/* General declarations */

void proto_register_marker(void);

void proto_reg_handoff_marker(void);

static dissector_handle_t marker_handle;

/* MARKER TLVs subtype */

#define MARKER_TERMINATOR               0x0

#define MARKERPDU_MARKER_INFO           0x1

#define MARKERPDU_MARKER_RESPONSE       0x2

static const value_string marker_vals[] = {

    { MARKER_TERMINATOR,         "Marker Terminator" },

    { MARKERPDU_MARKER_INFO,     "Marker Information" },

    { MARKERPDU_MARKER_RESPONSE, "Marker Response Information" },

    { 0, NULL }

};

/* Initialise the protocol and registered fields */

static int proto_marker;

static int hf_marker_version_number;

static int hf_marker_tlv_type;

static int hf_marker_tlv_length;

static int hf_marker_req_port;

static int hf_marker_req_system;

static int hf_marker_req_trans_id;

static int hf_marker_req_pad;

static int hf_marker_reserved;

/* Expert Items */

static expert_field ei_marker_wrong_tlv_type;

static expert_field ei_marker_wrong_tlv_length;

static expert_field ei_marker_wrong_pad_value;

/* Initialise the subtree pointers */

static int ett_marker;

static int

dissect_marker(tvbuff_t *tvb, packet_info *pinfo, proto_tree *tree, void* data _U_)

{

    int           offset = 0;

    unsigned      tlv_type, tlv_length;

    unsigned      port, transactionid, pad;

    const char   *sysidstr;

    proto_tree *marker_tree;

    proto_item *marker_item, *tlv_type_item, *tlv_length_item, *pad_item;

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

    col_set_str(pinfo->cinfo, COL_INFO, "Marker Protocol");

    marker_item = proto_tree_add_protocol_format(tree, proto_marker, tvb,

        0, -1, "Marker Protocol");

    marker_tree = proto_item_add_subtree(marker_item, ett_marker);

    proto_tree_add_item(marker_tree, hf_marker_version_number, tvb,

        offset, 1, ENC_BIG_ENDIAN);

    offset += 1;

    tlv_type_item = proto_tree_add_item_ret_uint(marker_tree, hf_marker_tlv_type, tvb,

        offset, 1, ENC_BIG_ENDIAN, &tlv_type);

    offset += 1;

    tlv_length_item = proto_tree_add_item_ret_uint(marker_tree, hf_marker_tlv_length, tvb,

        offset, 1, ENC_BIG_ENDIAN, &tlv_length);

    offset += 1;

    if (tlv_type == MARKERPDU_MARKER_INFO) {

        col_set_str(pinfo->cinfo, COL_INFO, "Information");

    } else if (tlv_type == MARKERPDU_MARKER_RESPONSE) {

        col_set_str(pinfo->cinfo, COL_INFO, "Response");

    } else {

        expert_add_info(pinfo, tlv_type_item, &ei_marker_wrong_tlv_type);

    }

    if (tlv_length != 16) {

        expert_add_info(pinfo, tlv_length_item, &ei_marker_wrong_tlv_length);

    }

    proto_tree_add_item_ret_uint(marker_tree, hf_marker_req_port, tvb,

        offset, 2, ENC_BIG_ENDIAN, &port);

    offset += 2;

    proto_tree_add_item(marker_tree, hf_marker_req_system, tvb,

        offset, 6, ENC_NA);

    sysidstr = tvb_ether_to_str(pinfo->pool, tvb, offset);

    offset += 6;

    proto_tree_add_item_ret_uint(marker_tree, hf_marker_req_trans_id, tvb,

        offset, 4, ENC_BIG_ENDIAN, &transactionid);

    offset += 4;

    col_append_fstr(pinfo->cinfo, COL_INFO, " SysId=%s, P=%d, TId=%d",

        sysidstr, port, transactionid);

    pad_item = proto_tree_add_item_ret_uint(marker_tree, hf_marker_req_pad, tvb,

        offset, 2, ENC_BIG_ENDIAN, &pad);

    if (pad != 0) {

        expert_add_info(pinfo, pad_item, &ei_marker_wrong_pad_value);

    }

    offset += 2;

    proto_tree_add_item_ret_uint(marker_tree, hf_marker_tlv_type, tvb,

        offset, 1, ENC_BIG_ENDIAN, &tlv_type);

    offset += 1;

    proto_tree_add_item_ret_uint(marker_tree, hf_marker_tlv_length, tvb,

        offset, 1, ENC_BIG_ENDIAN, &tlv_length);

    offset += 1;

    if (tlv_type == MARKER_TERMINATOR) {

        if (tlv_length != 0) {

            expert_add_info(pinfo, tlv_type_item, &ei_marker_wrong_tlv_length);

        }

    } else {

        expert_add_info(pinfo, tlv_type_item, &ei_marker_wrong_tlv_type);

    }

    proto_tree_add_item(marker_tree, hf_marker_reserved, tvb,

        offset, 90, ENC_NA);

    offset += 90;

    return offset;

}

/* Register the protocol with Wireshark */

void

proto_register_marker(void)

{

/* Setup list of header fields */

    static hf_register_info hf[] = {

        { &hf_marker_version_number,

          { "Version Number",    "marker.version",

            FT_UINT8,    BASE_HEX,    NULL,    0x0,

            "Marker protocol version", HFILL }},

        { &hf_marker_tlv_type,

          { "TLV Type",    "marker.tlvType",

            FT_UINT8,    BASE_HEX,    VALS(marker_vals),    0x0,

            NULL, HFILL }},

        { &hf_marker_tlv_length,

          { "TLV Length",            "marker.tlvLen",

            FT_UINT8,    BASE_HEX,    NULL,    0x0,

            "Length of the Actor TLV", HFILL }},

        { &hf_marker_req_port,

          { "Requester Port",  "marker.requesterPort",

            FT_UINT16,    BASE_DEC,    NULL,    0x0,

            NULL, HFILL }},

        { &hf_marker_req_system,

          { "Requester System",  "marker.requesterSystem",

            FT_ETHER,    BASE_NONE,    NULL,    0x0,

            "Requester System ID encoded as a MAC address", HFILL }},

        { &hf_marker_req_trans_id,

          { "Requester Transaction ID",  "marker.requesterTransId",

            FT_UINT32,    BASE_DEC,    NULL,    0x0,

            NULL, HFILL }},

        { &hf_marker_req_pad,

          { "Requester Pad",  "marker.requesterPad",

            FT_UINT32,    BASE_DEC,    NULL,    0x0,

            NULL, HFILL }},

        { &hf_marker_reserved,

          { "Reserved",  "marker.reserved",

            FT_BYTES,    BASE_NONE,    NULL,    0x0,

            NULL, HFILL }},

    };

    /* Setup protocol subtree array */

    static int *ett[] = {

        &ett_marker,

    };

    static ei_register_info ei[] = {

    { &ei_marker_wrong_tlv_type,   { "marker.wrong_tlv_type",   PI_MALFORMED, PI_ERROR, "TLV is not expected type",   EXPFILL }},

    { &ei_marker_wrong_tlv_length, { "marker.wrong_tlv_length", PI_MALFORMED, PI_ERROR, "TLV is not expected length", EXPFILL }},

    { &ei_marker_wrong_pad_value,  { "marker.wrong_pad_value",  PI_PROTOCOL,  PI_WARN,  "pad value is not 0",         EXPFILL }},

    };

    expert_module_t* expert_marker;

    /* Register the protocol name and description */

    proto_marker = proto_register_protocol("Link Aggregation Marker Protocol", "Marker", "marker");

    /* Required function calls to register the header fields and subtrees used */

    proto_register_field_array(proto_marker, hf, array_length(hf));

    proto_register_subtree_array(ett, array_length(ett));

    expert_marker = expert_register_protocol(proto_marker);

    expert_register_field_array(expert_marker, ei, array_length(ei));

    marker_handle = register_dissector("marker", dissect_marker, proto_marker);

}

void

proto_reg_handoff_marker(void)

{

    dissector_add_uint("slow.subtype", MARKER_SUBTYPE, marker_handle);

}

/*

 * Editor modelines  -  https://www.wireshark.org/tools/modelines.html

 *

 * Local variables:

 * c-basic-offset: 4

 * tab-width: 8

 * indent-tabs-mode: nil

 * End:

 *

 * vi: set shiftwidth=4 tabstop=8 expandtab:

 * :indentSize=4:tabSize=8:noTabs=true:

 */