/* packet-zbee-nwk-gp.c

 * Dissector routines for the ZigBee Green Power profile (GP)

 * Copyright 2013 DSR Corporation, http://dsr-wireless.com/

 *

 * Wireshark - Network traffic analyzer

 * By Gerald Combs <gerald@wireshark.org>

 * Copyright 1998 Gerald Combs

 *

 * Used Owen Kirby's packet-zbee-aps module as a template. Based

 * on ZigBee Cluster Library Specification document 075123r02ZB

 *

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

 */

/* Include files. */

#include "config.h"

#include <epan/packet.h>

#include <epan/exceptions.h>

#include <epan/expert.h>

#include <epan/prefs.h>

#include <epan/uat.h>

#include <wsutil/bits_ctz.h>

#include <wsutil/pint.h>

#include "packet-zbee.h"

#include "packet-zbee-nwk.h"

#include "packet-zbee-security.h"

#include "packet-zbee-aps.h"

#include "packet-zbee-zcl.h"

void proto_register_zbee_nwk_gp(void);

void proto_reg_handoff_zbee_nwk_gp(void);

/**************************/

/* Defines. */

/**************************/

/* ZigBee NWK GP FCF frame types. */

#define ZBEE_NWK_GP_FCF_DATA        0x00

#define ZBEE_NWK_GP_FCF_MAINTENANCE 0x01

/* ZigBee NWK GP FCF fields. */

#define ZBEE_NWK_GP_FCF_AUTO_COMMISSIONING  0x40

#define ZBEE_NWK_GP_FCF_CONTROL_EXTENSION   0x80

#define ZBEE_NWK_GP_FCF_FRAME_TYPE          0x03

#define ZBEE_NWK_GP_FCF_VERSION             0x3C

/* Extended NWK Frame Control field. */

#define ZBEE_NWK_GP_FCF_EXT_APP_ID          0x07 /* 0 - 2 b. */

#define ZBEE_NWK_GP_FCF_EXT_SECURITY_LEVEL  0x18 /* 3 - 4 b. */

#define ZBEE_NWK_GP_FCF_EXT_SECURITY_KEY    0x20 /* 5 b. */

#define ZBEE_NWK_GP_FCF_EXT_RX_AFTER_TX     0x40 /* 6 b. */

#define ZBEE_NWK_GP_FCF_EXT_DIRECTION       0x80 /* 7 b. */

/* Definitions for application IDs. */

#define ZBEE_NWK_GP_APP_ID_DEFAULT  0x00

#define ZBEE_NWK_GP_APP_ID_LPED     0x01

#define ZBEE_NWK_GP_APP_ID_ZGP      0x02

/* Definitions for GP directions. */

#define ZBEE_NWK_GP_FC_EXT_DIRECTION_DEFAULT    0x00

#define ZBEE_NWK_GP_FC_EXT_DIRECTION_FROM_ZGPD  0x00

#define ZBEE_NWK_GP_FC_EXT_DIRECTION_FROM_ZGPP  0x01

/* Definitions for ZGPD Source IDs. */

#define ZBEE_NWK_GP_ZGPD_SRCID_ALL      0xFFFFFFFF

#define ZBEE_NWK_GP_ZGPD_SRCID_UNKNOWN  0x00000000

/* Security level values. */

#define ZBEE_NWK_GP_SECURITY_LEVEL_NO       0x00

#define ZBEE_NWK_GP_SECURITY_LEVEL_1LSB     0x01

#define ZBEE_NWK_GP_SECURITY_LEVEL_FULL     0x02

#define ZBEE_NWK_GP_SECURITY_LEVEL_FULLENCR 0x03

/* GP Security key types. */

#define ZBEE_NWK_GP_SECURITY_KEY_TYPE_NO_KEY                            0x00

#define ZBEE_NWK_GP_SECURITY_KEY_TYPE_ZB_NWK_KEY                        0x01

#define ZBEE_NWK_GP_SECURITY_KEY_TYPE_GPD_GROUP_KEY                     0x02

#define ZBEE_NWK_GP_SECURITY_KEY_TYPE_NWK_KEY_DERIVED_GPD_KEY_GROUP_KEY 0x03

#define ZBEE_NWK_GP_SECURITY_KEY_TYPE_PRECONFIGURED_INDIVIDUAL_GPD_KEY  0x04

#define ZBEE_NWK_GP_SECURITY_KEY_TYPE_DERIVED_INDIVIDUAL_GPD_KEY        0x07

typedef struct {

    /* FCF Data. */

    uint8_t frame_type;

    bool nwk_frame_control_extension;

    /* Ext FCF Data. */

    uint8_t application_id;

    uint8_t security_level;

    uint8_t direction;

    /* Src ID. */

    uint32_t source_id;

    /* GPD Endpoint */

    uint8_t endpoint;

    /* Security Frame Counter. */

    uint32_t security_frame_counter;

    /* MIC. */

    uint8_t mic_size;

    uint32_t mic;

    /* Application Payload. */

    uint8_t payload_len;

    /* Source IEEE address from parent */

    uint64_t ieee_packet_src64;

} zbee_nwk_green_power_packet;

/* Definitions for GP Commissioning command opt field (bitmask). */

#define ZBEE_NWK_GP_CMD_COMMISSIONING_OPT_MAC_SEQ           0x01

#define ZBEE_NWK_GP_CMD_COMMISSIONING_OPT_RX_ON_CAP         0x02

#define ZBEE_NWK_GP_CMD_COMMISSIONING_OPT_APPLICATION_INFO  0x04

#define ZBEE_NWK_GP_CMD_COMMISSIONING_OPT_PAN_ID_REQ        0x10

#define ZBEE_NWK_GP_CMD_COMMISSIONING_OPT_GP_SEC_KEY_REQ    0x20

#define ZBEE_NWK_GP_CMD_COMMISSIONING_OPT_FIXED_LOCATION    0x40

#define ZBEE_NWK_GP_CMD_COMMISSIONING_OPT_EXT_OPTIONS       0x80

/* Definitions for GP Commissioning command ext_opt field (bitmask). */

#define ZBEE_NWK_GP_CMD_COMMISSIONING_EXT_OPT_SEC_LEVEL_CAP     0x03

#define ZBEE_NWK_GP_CMD_COMMISSIONING_EXT_OPT_KEY_TYPE          0x1C

#define ZBEE_NWK_GP_CMD_COMMISSIONING_EXT_OPT_GPD_KEY_PRESENT   0x20

#define ZBEE_NWK_GP_CMD_COMMISSIONING_EXT_OPT_GPD_KEY_ENCR      0x40

#define ZBEE_NWK_GP_CMD_COMMISSIONING_EXT_OPT_OUT_COUNTER       0x80

/* Definitions for GP Commissioning command application information field (bitmask). */

#define ZBEE_NWK_GP_CMD_COMMISSIONING_APPLI_INFO_MIP    0x01

#define ZBEE_NWK_GP_CMD_COMMISSIONING_APPLI_INFO_MMIP   0x02

#define ZBEE_NWK_GP_CMD_COMMISSIONING_APPLI_INFO_GCLP   0x04

#define ZBEE_NWK_GP_CMD_COMMISSIONING_APPLI_INFO_CRP    0x08

/* Definitions for GP Commissioning command Number of server ClusterIDs (bitmask) */

#define ZBEE_NWK_GP_CMD_COMMISSIONING_CLID_LIST_LEN_SRV 0x0F

#define ZBEE_NWK_GP_CMD_COMMISSIONING_CLID_LIST_LEN_CLI 0xF0

/* Definitions for GP Decommissioning command opt field (bitmask). */

#define ZBEE_NWK_GP_CMD_COMMISSIONING_REP_OPT_PAN_ID_PRESENT    0x01

#define ZBEE_NWK_GP_CMD_COMMISSIONING_REP_OPT_SEC_KEY_PRESENT   0x02

#define ZBEE_NWK_GP_CMD_COMMISSIONING_REP_OPT_KEY_ENCR          0x04

#define ZBEE_NWK_GP_CMD_COMMISSIONING_REP_OPT_SEC_LEVEL         0x18

#define ZBEE_NWK_GP_CMD_COMMISSIONING_REP_OPT_KEY_TYPE          0xE0

/* Definition for GP read attributes command opt field (bitmask). */

#define ZBEE_NWK_GP_CMD_READ_ATTRIBUTE_OPT_MULTI_RECORD         0x01

#define ZBEE_NWK_GP_CMD_READ_ATTRIBUTE_OPT_MAN_FIELD_PRESENT    0x02

#define ZBEE_NWK_GP_CMD_ZCL_TUNNEL_OPT_FRAME_TYPE               0x03

#define ZBEE_NWK_GP_CMD_ZCL_TUNNEL_OPT_MAN_FIELD_PRESENT        0x04

#define ZBEE_NWK_GP_CMD_ZCL_TUNNEL_OPT_DIRECTION                0x08

/* Definitions for GP Channel Request command. */

#define ZBEE_NWK_GP_CMD_CHANNEL_REQUEST_1ST 0x0F

#define ZBEE_NWK_GP_CMD_CHANNEL_REQUEST_2ND 0xF0

/* GP Channel Configuration command. */

#define ZBEE_NWK_GP_CMD_CHANNEL_CONFIGURATION_OPERATION_CH 0x0F

/* GP GENERIC IDS. */

#define GPD_DEVICE_ID_GENERIC_GP_SIMPLE_GENERIC_1STATE_SWITCH   0x00

#define GPD_DEVICE_ID_GENERIC_GP_SIMPLE_GENERIC_2STATE_SWITCH   0x01

#define GPD_DEVICE_ID_GENERIC_GP_ON_OFF_SWITCH                  0x02

#define GPD_DEVICE_ID_GENERIC_GP_LEVEL_CONTROL_SWITCH           0x03

#define GPD_DEVICE_ID_GENERIC_GP_SIMPLE_SENSOR                  0x04

#define GPD_DEVICE_ID_GENERIC_GP_ADVANCED_GENERIC_1STATE_SWITCH 0x05

#define GPD_DEVICE_ID_GENERIC_GP_ADVANCED_GENERIC_2STATE_SWITCH 0x06

/* GP LIGHTING IDS. */

#define GPD_DEVICE_ID_LIGHTING_GP_COLOR_DIMMER_SWITCH           0x10

#define GPD_DEVICE_ID_LIGHTING_GP_LIGHT_SENSOR                  0x11

#define GPD_DEVICE_ID_LIGHTING_GP_OCCUPANCY_SENSOR              0x12

/* GP CLOSURES IDS. */

#define GPD_DEVICE_ID_CLOSURES_GP_DOOR_LOCK_CONTROLLER          0x20

/* HVAC IDS. */

#define GPD_DEVICE_ID_HVAC_GP_TEMPERATURE_SENSOR                0x30

#define GPD_DEVICE_ID_HVAC_GP_PRESSURE_SENSOR                   0x31

#define GPD_DEVICE_ID_HVAC_GP_FLOW_SENSOR                       0x32

#define GPD_DEVICE_ID_HVAC_GP_INDOOR_ENVIRONMENT_SENSOR         0x33

/* Manufacturer specific device. */

#define GPD_DEVICE_ID_MANUFACTURER_SPECIFIC                     0xFE

/* GPD manufacturers. */

#define ZBEE_NWK_GP_MANUF_ID_GREENPEAK      0x10D0

/* GPD devices by GreenPeak. */

#define ZBEE_NWK_GP_MANUF_GREENPEAK_IZDS    0x0000

#define ZBEE_NWK_GP_MANUF_GREENPEAK_IZDWS   0x0001

#define ZBEE_NWK_GP_MANUF_GREENPEAK_IZLS    0x0002

#define ZBEE_NWK_GP_MANUF_GREENPEAK_IZRHS   0x0003

/*********************/

/* Global variables. */

/*********************/

/* GP proto handle. */

static int proto_zbee_nwk_gp;

/* GP NWK FC. */

static int hf_zbee_nwk_gp_auto_commissioning;

static int hf_zbee_nwk_gp_fc_ext;

static int hf_zbee_nwk_gp_fcf;

static int hf_zbee_nwk_gp_frame_type;

static int hf_zbee_nwk_gp_proto_version;

/* GP NWK FC extension. */

static int hf_zbee_nwk_gp_fc_ext_field;

static int hf_zbee_nwk_gp_fc_ext_app_id;

static int hf_zbee_nwk_gp_fc_ext_direction;

static int hf_zbee_nwk_gp_fc_ext_rx_after_tx;

static int hf_zbee_nwk_gp_fc_ext_sec_key;

static int hf_zbee_nwk_gp_fc_ext_sec_level;

/* ZGPD Src ID. */

static int hf_zbee_nwk_gp_zgpd_src_id;

/* ZGPD Endpoint */

static int hf_zbee_nwk_gp_zgpd_endpoint;

/* Security frame counter. */

static int hf_zbee_nwk_gp_security_frame_counter;

/* Security MIC. */

static int hf_zbee_nwk_gp_security_mic_2b;

static int hf_zbee_nwk_gp_security_mic_4b;

/* Payload subframe. */

static int hf_zbee_nwk_gp_command_id;

/* Commissioning. */

static int hf_zbee_nwk_gp_cmd_comm_device_id;

static int hf_zbee_nwk_gp_cmd_comm_ext_opt;

static int hf_zbee_nwk_gp_cmd_comm_ext_opt_gpd_key_encr;

static int hf_zbee_nwk_gp_cmd_comm_ext_opt_gpd_key_present;

static int hf_zbee_nwk_gp_cmd_comm_ext_opt_key_type;

static int hf_zbee_nwk_gp_cmd_comm_ext_opt_outgoing_counter;

static int hf_zbee_nwk_gp_cmd_comm_ext_opt_sec_level_cap;

static int hf_zbee_nwk_gp_cmd_comm_security_key;

static int hf_zbee_nwk_gp_cmd_comm_gpd_sec_key_mic;

static int hf_zbee_nwk_gp_cmd_comm_opt_ext_opt;

static int hf_zbee_nwk_gp_cmd_comm_opt;

static int hf_zbee_nwk_gp_cmd_comm_opt_fixed_location;

static int hf_zbee_nwk_gp_cmd_comm_opt_mac_sec_num_cap;

static int hf_zbee_nwk_gp_cmd_comm_opt_appli_info_present;

static int hf_zbee_nwk_gp_cmd_comm_opt_panid_req;

static int hf_zbee_nwk_gp_cmd_comm_opt_rx_on_cap;

static int hf_zbee_nwk_gp_cmd_comm_opt_sec_key_req;

static int hf_zbee_nwk_gp_cmd_comm_outgoing_counter;

static int hf_zbee_nwk_gp_cmd_comm_manufacturer_greenpeak_dev_id;

static int hf_zbee_nwk_gp_cmd_comm_manufacturer_dev_id;

static int hf_zbee_nwk_gp_cmd_comm_manufacturer_id;

static int hf_zbee_nwk_gp_cmd_comm_appli_info;

static int hf_zbee_nwk_gp_cmd_comm_appli_info_crp;

static int hf_zbee_nwk_gp_cmd_comm_appli_info_gclp;

static int hf_zbee_nwk_gp_cmd_comm_appli_info_mip;

static int hf_zbee_nwk_gp_cmd_comm_appli_info_mmip;

static int hf_zbee_nwk_gp_cmd_comm_gpd_cmd_num;

static int hf_zbee_nwk_gp_cmd_comm_gpd_cmd_id_list;

static int hf_zbee_nwk_gp_cmd_comm_length_of_clid_list;

static int hf_zbee_nwk_gp_cmd_comm_length_of_clid_list_server;

static int hf_zbee_nwk_gp_cmd_comm_length_of_clid_list_client;

static int hf_zbee_nwk_cmd_comm_clid_list_server;

static int hf_zbee_nwk_cmd_comm_clid_list_client;

static int hf_zbee_nwk_cmd_comm_cluster_id;

/* Commissioning reply. */

static int hf_zbee_nwk_gp_cmd_comm_rep_opt;

static int hf_zbee_nwk_gp_cmd_comm_rep_opt_key_encr;

static int hf_zbee_nwk_gp_cmd_comm_rep_opt_panid_present;

static int hf_zbee_nwk_gp_cmd_comm_rep_opt_sec_key_present;

static int hf_zbee_nwk_gp_cmd_comm_rep_opt_sec_level;

static int hf_zbee_nwk_gp_cmd_comm_rep_opt_sec_type;

static int hf_zbee_nwk_gp_cmd_comm_rep_pan_id;

static int hf_zbee_nwk_gp_cmd_comm_rep_frame_counter;

/* Read attribute and read attribute response. */

static int hf_zbee_nwk_gp_cmd_read_att_opt_multi_rec;

static int hf_zbee_nwk_gp_cmd_read_att_opt_man_field_present;

static int hf_zbee_nwk_gp_cmd_read_att_opt;

static int hf_zbee_nwk_gp_cmd_read_att_record_len;

/* ZCL Tunnel */

static int hf_zbee_nwk_gp_cmd_zcl_tunnel_opt_frame_type;

static int hf_zbee_nwk_gp_cmd_zcl_tunnel_opt_man_field_present;

static int hf_zbee_nwk_gp_cmd_zcl_tunnel_opt_direction;

static int hf_zbee_nwk_gp_cmd_zcl_tunnel_opt;

static int hf_zbee_nwk_gp_cmd_zcl_tunnel_command_id;

static int hf_zbee_nwk_gp_cmd_zcl_tunnel_payload_len;

/* Common to commands returning data */

static int hf_zbee_nwk_gp_zcl_attr_status;

static int hf_zbee_nwk_gp_zcl_attr_data_type;

static int hf_zbee_nwk_gp_zcl_attr_cluster_id;

/* Common to all manufacturer specific commands */

static int hf_zbee_zcl_gp_cmd_ms_manufacturer_code;

/* Channel request. */

static int hf_zbee_nwk_gp_cmd_channel_request_toggling_behaviour;

static int hf_zbee_nwk_gp_cmd_channel_request_toggling_behaviour_1st;

static int hf_zbee_nwk_gp_cmd_channel_request_toggling_behaviour_2nd;

/* Channel Configuration command. */

static int hf_zbee_nwk_gp_cmd_operational_channel;

static int hf_zbee_nwk_gp_cmd_channel_configuration;

/* Move Color command. */

static int hf_zbee_nwk_gp_cmd_move_color_ratex;

static int hf_zbee_nwk_gp_cmd_move_color_ratey;

/* Move Up/Down command. */

static int hf_zbee_nwk_gp_cmd_move_up_down_rate;

/* Step Color command. */

static int hf_zbee_nwk_gp_cmd_step_color_stepx;

static int hf_zbee_nwk_gp_cmd_step_color_stepy;

static int hf_zbee_nwk_gp_cmd_step_color_transition_time;

/* Step Up/Down command. */

static int hf_zbee_nwk_gp_cmd_step_up_down_step_size;

static int hf_zbee_nwk_gp_cmd_step_up_down_transition_time;

static expert_field ei_zbee_nwk_gp_no_payload;

static expert_field ei_zbee_nwk_gp_inval_residual_data;

static expert_field ei_zbee_nwk_gp_com_rep_no_out_cnt;

/* Proto tree elements. */

static int ett_zbee_nwk;

static int ett_zbee_nwk_cmd;

static int ett_zbee_nwk_cmd_cinfo;

static int ett_zbee_nwk_cmd_appli_info;

static int ett_zbee_nwk_cmd_options;

static int ett_zbee_nwk_fcf;

static int ett_zbee_nwk_fcf_ext;

static int ett_zbee_nwk_clu_rec;

static int ett_zbee_nwk_att_rec;

static int ett_zbee_nwk_cmd_comm_gpd_cmd_id_list;

static int ett_zbee_nwk_cmd_comm_length_of_clid_list;

static int ett_zbee_nwk_cmd_comm_clid_list_server;

static int ett_zbee_nwk_cmd_comm_clid_list_client;

/* Common. */

static GSList *zbee_gp_keyring;

static unsigned num_uat_key_records;

typedef struct {

    char *string;

    uint8_t byte_order;

    char *label;

    uint8_t key[ZBEE_SEC_CONST_KEYSIZE];

} uat_key_record_t;

static const uint8_t empty_key[ZBEE_SEC_CONST_KEYSIZE] = {

    0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,

    0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00

};

static uat_key_record_t *gp_uat_key_records;

static uat_t *zbee_gp_sec_key_table_uat;

/* UAT. */

UAT_CSTRING_CB_DEF(gp_uat_key_records, string, uat_key_record_t)

UAT_VS_DEF(gp_uat_key_records, byte_order, uat_key_record_t, uint8_t, 0, "Normal")

Unexecuted instantiation: packet-zbee-nwk-gp.c:gp_uat_key_records_byte_order_set_cb

Unexecuted instantiation: packet-zbee-nwk-gp.c:gp_uat_key_records_byte_order_tostr_cb

UAT_CSTRING_CB_DEF(gp_uat_key_records, label, uat_key_record_t)

/****************/

/* Field names. */

/****************/

/* Byte order. */

static const value_string byte_order_vals[] = {

    { 0, "Normal"},

    { 1, "Reverse"},

    { 0, NULL }

};

/* Application ID names. */

static const value_string zbee_nwk_gp_app_id_names[] = {

    { ZBEE_NWK_GP_APP_ID_LPED, "LPED" },

    { ZBEE_NWK_GP_APP_ID_ZGP, "ZGP" },

    { 0, NULL }

};

/* Green Power commands. */

/* Abbreviations:

 * GPDF commands sent:

 *   From GPD w/o payload: "F "

 *   From GPD w   payload: "FP"

 *   To GPD:               "T "

 */

#define zbee_nwk_gp_cmd_names_VALUE_STRING_LIST(XXX) \

    XXX( /*F */ ZB_GP_CMD_ID_IDENTIFY                                 , 0x00, "Identify" ) \

    XXX( /*F */ ZB_GP_CMD_ID_RECALL_SCENE0                            , 0x10, "Recall Scene 0" ) \

    XXX( /*F */ ZB_GP_CMD_ID_RECALL_SCENE1                            , 0x11, "Recall Scene 1" ) \

    XXX( /*F */ ZB_GP_CMD_ID_RECALL_SCENE2                            , 0x12, "Recall Scene 2" ) \

    XXX( /*F */ ZB_GP_CMD_ID_RECALL_SCENE3                            , 0x13, "Recall Scene 3" ) \

    XXX( /*F */ ZB_GP_CMD_ID_RECALL_SCENE4                            , 0x14, "Recall Scene 4" ) \

    XXX( /*F */ ZB_GP_CMD_ID_RECALL_SCENE5                            , 0x15, "Recall Scene 5" ) \

    XXX( /*F */ ZB_GP_CMD_ID_RECALL_SCENE6                            , 0x16, "Recall Scene 6" ) \

    XXX( /*F */ ZB_GP_CMD_ID_RECALL_SCENE7                            , 0x17, "Recall Scene 7" ) \

    XXX( /*F */ ZB_GP_CMD_ID_STORE_SCENE0                             , 0x18, "Store Scene 0" ) \

    XXX( /*F */ ZB_GP_CMD_ID_STORE_SCENE1                             , 0x19, "Store Scene 1" ) \

    XXX( /*F */ ZB_GP_CMD_ID_STORE_SCENE2                             , 0x1A, "Store Scene 2" ) \

    XXX( /*F */ ZB_GP_CMD_ID_STORE_SCENE3                             , 0x1B, "Store Scene 3" ) \

    XXX( /*F */ ZB_GP_CMD_ID_STORE_SCENE4                             , 0x1C, "Store Scene 4" ) \

    XXX( /*F */ ZB_GP_CMD_ID_STORE_SCENE5                             , 0x1D, "Store Scene 5" ) \

    XXX( /*F */ ZB_GP_CMD_ID_STORE_SCENE6                             , 0x1E, "Store Scene 6" ) \

    XXX( /*F */ ZB_GP_CMD_ID_STORE_SCENE7                             , 0x1F, "Store Scene 7" ) \

    XXX( /*F */ ZB_GP_CMD_ID_OFF                                      , 0x20, "Off" ) \

    XXX( /*F */ ZB_GP_CMD_ID_ON                                       , 0x21, "On" ) \

    XXX( /*F */ ZB_GP_CMD_ID_TOGGLE                                   , 0x22, "Toggle" ) \

    XXX( /*F */ ZB_GP_CMD_ID_RELEASE                                  , 0x23, "Release" ) \

    XXX( /*FP*/ ZB_GP_CMD_ID_MOVE_UP                                  , 0x30, "Move Up" ) \

    XXX( /*FP*/ ZB_GP_CMD_ID_MOVE_DOWN                                , 0x31, "Move Down" ) \

    XXX( /*FP*/ ZB_GP_CMD_ID_STEP_UP                                  , 0x32, "Step Up" ) \

    XXX( /*FP*/ ZB_GP_CMD_ID_STEP_DOWN                                , 0x33, "Step Down" ) \

    XXX( /*F */ ZB_GP_CMD_ID_LEVEL_CONTROL_STOP                       , 0x34, "Level Control/Stop" ) \

    XXX( /*FP*/ ZB_GP_CMD_ID_MOVE_UP_WITH_ON_OFF                      , 0x35, "Move Up (with On/Off)" ) \

    XXX( /*FP*/ ZB_GP_CMD_ID_MOVE_DOWN_WITH_ON_OFF                    , 0x36, "Move Down (with On/Off)" ) \

    XXX( /*FP*/ ZB_GP_CMD_ID_STEP_UP_WITH_ON_OFF                      , 0x37, "Step Up (with On/Off)" ) \

    XXX( /*FP*/ ZB_GP_CMD_ID_STEP_DOWN_WITH_ON_OFF                    , 0x38, "Step Down (with On/Off)" ) \

    XXX( /*F */ ZB_GP_CMD_ID_MOVE_HUE_STOP                            , 0x40, "Move Hue Stop" ) \

    XXX( /*FP*/ ZB_GP_CMD_ID_MOVE_HUE_UP                              , 0x41, "Move Hue Up" ) \

    XXX( /*FP*/ ZB_GP_CMD_ID_MOVE_HUE_DOWN                            , 0x42, "Move Hue Down" ) \

    XXX( /*FP*/ ZB_GP_CMD_ID_STEP_HUE_UP                              , 0x43, "Step Hue Up" ) \

    XXX( /*FP*/ ZB_GP_CMD_ID_STEP_HUW_DOWN                            , 0x44, "Step Hue Down" ) \

    XXX( /*F */ ZB_GP_CMD_ID_MOVE_SATURATION_STOP                     , 0x45, "Move Saturation Stop" ) \

    XXX( /*FP*/ ZB_GP_CMD_ID_MOVE_SATURATION_UP                       , 0x46, "Move Saturation Up" ) \

    XXX( /*FP*/ ZB_GP_CMD_ID_MOVE_SATURATION_DOWN                     , 0x47, "Move Saturation Down" ) \

    XXX( /*FP*/ ZB_GP_CMD_ID_STEP_SATURATION_UP                       , 0x48, "Step Saturation Up" ) \

    XXX( /*FP*/ ZB_GP_CMD_ID_STEP_SATURATION_DOWN                     , 0x49, "Step Saturation Down" ) \

    XXX( /*FP*/ ZB_GP_CMD_ID_MOVE_COLOR                               , 0x4A, "Move Color" ) \

    XXX( /*FP*/ ZB_GP_CMD_ID_STEP_COLOR                               , 0x4B, "Step Color" ) \

    XXX( /*F */ ZB_GP_CMD_ID_LOCK_DOOR                                , 0x50, "Lock Door" ) \

    XXX( /*F */ ZB_GP_CMD_ID_UNLOCK_DOOR                              , 0x51, "Unlock Door" ) \

    XXX( /*F */ ZB_GP_CMD_ID_PRESS11                                  , 0x60, "Press 1 of 1" ) \

    XXX( /*F */ ZB_GP_CMD_ID_RELEASE11                                , 0x61, "Release 1 of 1" ) \

    XXX( /*F */ ZB_GP_CMD_ID_PRESS12                                  , 0x62, "Press 1 of 2" ) \

    XXX( /*F */ ZB_GP_CMD_ID_RELEASE12                                , 0x63, "Release 1 of 2" ) \

    XXX( /*F */ ZB_GP_CMD_ID_PRESS22                                  , 0x64, "Press 2 of 2" ) \

    XXX( /*F */ ZB_GP_CMD_ID_RELEASE22                                , 0x65, "Release 2 of 2" ) \

    XXX( /*F */ ZB_GP_CMD_ID_SHORT_PRESS11                            , 0x66, "Short press 1 of 1" ) \

    XXX( /*F */ ZB_GP_CMD_ID_SHORT_PRESS12                            , 0x67, "Short press 1 of 2" ) \

    XXX( /*F */ ZB_GP_CMD_ID_SHORT_PRESS22                            , 0x68, "Short press 2 of 2" ) \

    XXX( /*FP*/ ZB_GP_CMD_ID_ATTRIBUTE_REPORTING                      , 0xA0, "Attribute reporting" ) \

    XXX( /*FP*/ ZB_GP_CMD_ID_MANUFACTURE_SPECIFIC_ATTR_REPORTING      , 0xA1, "Manufacturer-specific attribute reporting" ) \

    XXX( /*FP*/ ZB_GP_CMD_ID_MULTI_CLUSTER_REPORTING                  , 0xA2, "Multi-cluster reporting" ) \

    XXX( /*FP*/ ZB_GP_CMD_ID_MANUFACTURER_SPECIFIC_MCLUSTER_REPORTING , 0xA3, "Manufacturer-specific multi-cluster reporting" ) \

    XXX( /*FP*/ ZB_GP_CMD_ID_REQUEST_ATTRIBUTES                       , 0xA4, "Request Attributes" ) \

    XXX( /*FP*/ ZB_GP_CMD_ID_READ_ATTRIBUTES_RESPONSE                 , 0xA5, "Read Attributes Response" ) \

    XXX( /*FP*/ ZB_GP_CMD_ID_ZCL_TUNNELING                            , 0xA6, "ZCL Tunneling" ) \

    XXX( /*FP*/ ZB_GP_CMD_ID_ANY_SENSOR_COMMAND_A0_A3                 , 0xAF, "Any GPD sensor command (0xA0 - 0xA3)" ) \

    XXX( /*FP*/ ZB_GP_CMD_ID_COMMISSIONING                            , 0xE0, "Commissioning" ) \

    XXX( /*F */ ZB_GP_CMD_ID_DECOMMISSIONING                          , 0xE1, "Decommissioning" ) \

    XXX( /*F */ ZB_GP_CMD_ID_SUCCESS                                  , 0xE2, "Success" ) \

    XXX( /*FP*/ ZB_GP_CMD_ID_CHANNEL_REQUEST                          , 0xE3, "Channel Request" ) \

    XXX( /*T */ ZB_GP_CMD_ID_COMMISSIONING_REPLY                      , 0xF0, "Commissioning Reply" ) \

    XXX( /*T */ ZB_GP_CMD_ID_WRITE_ATTRIBUTES                         , 0xF1, "Write Attributes" ) \

    XXX( /*T */ ZB_GP_CMD_ID_READ_ATTRIBUTES                          , 0xF2, "Read Attributes" ) \

    XXX( /*T */ ZB_GP_CMD_ID_CHANNEL_CONFIGURATION                    , 0xF3, "Channel Configuration" )

VALUE_STRING_ENUM(zbee_nwk_gp_cmd_names);

VALUE_STRING_ARRAY(zbee_nwk_gp_cmd_names);

value_string_ext zbee_nwk_gp_cmd_names_ext = VALUE_STRING_EXT_INIT(zbee_nwk_gp_cmd_names);

/* Green Power devices. */

const value_string zbee_nwk_gp_device_ids_names[] = {

    /* GP GENERIC */

    { GPD_DEVICE_ID_GENERIC_GP_SIMPLE_GENERIC_1STATE_SWITCH,   "Generic: GP Simple Generic 1-state Switch" },

    { GPD_DEVICE_ID_GENERIC_GP_SIMPLE_GENERIC_2STATE_SWITCH,   "Generic: GP Simple Generic 2-state Switch" },

    { GPD_DEVICE_ID_GENERIC_GP_ON_OFF_SWITCH,                  "Generic: GP On/Off Switch" },

    { GPD_DEVICE_ID_GENERIC_GP_LEVEL_CONTROL_SWITCH,           "Generic: GP Level Control Switch" },

    { GPD_DEVICE_ID_GENERIC_GP_SIMPLE_SENSOR,                  "Generic: GP Simple Sensor" },

    { GPD_DEVICE_ID_GENERIC_GP_ADVANCED_GENERIC_1STATE_SWITCH, "Generic: GP Advanced Generic 1-state Switch" },

    { GPD_DEVICE_ID_GENERIC_GP_ADVANCED_GENERIC_2STATE_SWITCH, "Generic: GP Advanced Generic 2-state Switch" },

    /* GP LIGHTING */

    { GPD_DEVICE_ID_LIGHTING_GP_COLOR_DIMMER_SWITCH,           "Lighting: GP Color Dimmer Switch" },

    { GPD_DEVICE_ID_LIGHTING_GP_LIGHT_SENSOR,                  "Lighting: GP Light Sensor" },

    { GPD_DEVICE_ID_LIGHTING_GP_OCCUPANCY_SENSOR,              "Lighting: GP Occupancy Sensor" },

    /* GP CLOSURES */

    { GPD_DEVICE_ID_CLOSURES_GP_DOOR_LOCK_CONTROLLER,          "Closures: GP Door Lock Controller" },

    /* HVAC */

    { GPD_DEVICE_ID_HVAC_GP_TEMPERATURE_SENSOR,                "HVAC: GP Temperature Sensor" },

    { GPD_DEVICE_ID_HVAC_GP_PRESSURE_SENSOR,                   "HVAC: GP Pressure Sensor" },

    { GPD_DEVICE_ID_HVAC_GP_FLOW_SENSOR,                       "HVAC: GP Flow Sensor" },

    { GPD_DEVICE_ID_HVAC_GP_INDOOR_ENVIRONMENT_SENSOR,         "HVAC: GP Indoor Environment Sensor" },

    /* CUSTOM */

    { GPD_DEVICE_ID_MANUFACTURER_SPECIFIC,                     "Manufacturer Specific" },

    { 0, NULL }

};

static value_string_ext zbee_nwk_gp_device_ids_names_ext = VALUE_STRING_EXT_INIT(zbee_nwk_gp_device_ids_names);

/* GP directions. */

static const value_string zbee_nwk_gp_directions[] = {

    { ZBEE_NWK_GP_FC_EXT_DIRECTION_FROM_ZGPD, "From ZGPD" },

    { ZBEE_NWK_GP_FC_EXT_DIRECTION_FROM_ZGPP, "From ZGPP" },

    { 0, NULL }

};

/* Frame types for Green Power profile. */

static const value_string zbee_nwk_gp_frame_types[] = {

    { ZBEE_NWK_GP_FCF_DATA,        "Data" },

    { ZBEE_NWK_GP_FCF_MAINTENANCE, "Maintenance" },

    { 0, NULL }

};

/* GreenPeak Green Power devices. */

static const value_string zbee_nwk_gp_manufacturer_greenpeak_dev_names[] = {

    { ZBEE_NWK_GP_MANUF_GREENPEAK_IZDS,  "IAS Zone Door Sensor" },

    { ZBEE_NWK_GP_MANUF_GREENPEAK_IZDWS, "IAS Zone Door/Window Sensor" },

    { ZBEE_NWK_GP_MANUF_GREENPEAK_IZLS,  "IAS Zone Leakage Sensor" },

    { ZBEE_NWK_GP_MANUF_GREENPEAK_IZRHS, "IAS Zone Relative Humidity Sensor" },

    { 0, NULL }

};

/* GP Src ID names. */

static const value_string zbee_nwk_gp_src_id_names[] = {

    { ZBEE_NWK_GP_ZGPD_SRCID_ALL,     "All" },

    { ZBEE_NWK_GP_ZGPD_SRCID_UNKNOWN, "Unspecified" },

    { 0, NULL }

};

/* GP security key type names. */

static const value_string zbee_nwk_gp_src_sec_keys_type_names[] = {

    { ZBEE_NWK_GP_SECURITY_KEY_TYPE_NO_KEY,                            "No key" },

    { ZBEE_NWK_GP_SECURITY_KEY_TYPE_ZB_NWK_KEY,                        "ZigBee NWK key" },

    { ZBEE_NWK_GP_SECURITY_KEY_TYPE_GPD_GROUP_KEY,                     "GPD group key" },

    { ZBEE_NWK_GP_SECURITY_KEY_TYPE_NWK_KEY_DERIVED_GPD_KEY_GROUP_KEY, "NWK key derived GPD group key" },

    { ZBEE_NWK_GP_SECURITY_KEY_TYPE_PRECONFIGURED_INDIVIDUAL_GPD_KEY,  "Individual, out of the box GPD key" },

    { ZBEE_NWK_GP_SECURITY_KEY_TYPE_DERIVED_INDIVIDUAL_GPD_KEY,        "Derived individual GPD key" },

    { 0, NULL }

};

/* GP security levels. */

static const value_string zbee_nwk_gp_src_sec_levels_names[] = {

    { ZBEE_NWK_GP_SECURITY_LEVEL_NO,       "No security" },

    { ZBEE_NWK_GP_SECURITY_LEVEL_1LSB,     "1 LSB of frame counter and short MIC only" },

    { ZBEE_NWK_GP_SECURITY_LEVEL_FULL,     "Full frame counter and full MIC only" },

    { ZBEE_NWK_GP_SECURITY_LEVEL_FULLENCR, "Encryption with full frame counter and full MIC" },

    { 0, NULL }

};

/*************************/

/* Function definitions. */

/*************************/

/* UAT record copy callback. */

static void *

uat_key_record_copy_cb(void *n, const void *o, size_t siz _U_)

{

    uat_key_record_t *new_key = (uat_key_record_t *)n;

    const uat_key_record_t *old_key = (const uat_key_record_t *)o;

    new_key->string = g_strdup(old_key->string);

    new_key->label = g_strdup(old_key->label);

    return new_key;

}

/* UAT record free callback. */

static void

uat_key_record_free_cb(void *r)

{

    uat_key_record_t *key = (uat_key_record_t *)r;

    g_free(key->string);

    g_free(key->label);

}

/**

 *Parses a key string from left to right into a buffer with increasing (normal byte order) or decreasing (reverse

 *

 *@param key_str pointer to the string

 *@param key_buf destination buffer in memory

 *@param byte_order byte order

*/

static bool

zbee_gp_security_parse_key(const char *key_str, uint8_t *key_buf, bool byte_order)

{

    bool string_mode = false;

    char temp;

    int i, j;

    memset(key_buf, 0, ZBEE_SEC_CONST_KEYSIZE);

    if (key_str == NULL) {

        return false;

    }

    if ((temp = *key_str++) == '"') {

        string_mode = true;

        temp = *key_str++;

    }

    j = byte_order ? ZBEE_SEC_CONST_KEYSIZE - 1 : 0;

    for (i = ZBEE_SEC_CONST_KEYSIZE - 1; i >= 0; i--) {

        if (string_mode) {

            if (g_ascii_isprint(temp)) {

                key_buf[j] = temp;

                temp = *key_str++;

            } else {

                return false;

            }

        } else {

            if ((temp == ':') || (temp == '-') || (temp == ' ')) {

                temp = *(key_str++);

            }

            if (g_ascii_isxdigit(temp)) {

                key_buf[j] = g_ascii_xdigit_value(temp) << 4;

            } else {

                return false;

            }

            temp = *(key_str++);

            if (g_ascii_isxdigit(temp)) {

                key_buf[j] |= g_ascii_xdigit_value(temp);

            } else {

                return false;

            }

            temp = *(key_str++);

        }

        if (byte_order) {

            j--;

        } else {

            j++;

        }

    }

    return true;

}

/* UAT record update callback. */

static bool

uat_key_record_update_cb(void *r, char **err)

{

    uat_key_record_t *rec = (uat_key_record_t *)r;

    if (rec->string == NULL) {

         *err = g_strdup("Key can't be blank.");

         return false;

    } else {

        g_strstrip(rec->string);

        if (rec->string[0] != 0) {

            *err = NULL;

            if (!zbee_gp_security_parse_key(rec->string, rec->key, rec->byte_order)) {

                *err = ws_strdup_printf("Expecting %d hexadecimal bytes or a %d character double-quoted string",

                    ZBEE_SEC_CONST_KEYSIZE, ZBEE_SEC_CONST_KEYSIZE);

                return false;

            }

        } else {

            *err = g_strdup("Key can't be blank.");

            return false;

        }

    }

    return true;

}

static void uat_key_record_post_update_cb(void) {

    unsigned i;

    for (i = 0; i < num_uat_key_records; i++) {

        if (memcmp(gp_uat_key_records[i].key, empty_key, ZBEE_SEC_CONST_KEYSIZE) == 0) {

            /* key was not loaded from string yet */

            zbee_gp_security_parse_key(gp_uat_key_records[i].string, gp_uat_key_records[i].key,

                                       gp_uat_key_records[i].byte_order);

        }

    }

}

/**

 *Fills in ZigBee GP security nonce from the provided packet structure.

 *

 *@param packet ZigBee NWK packet.

 *@param nonce nonce buffer.

*/

static void

zbee_gp_make_nonce(zbee_nwk_green_power_packet *packet, uint8_t *nonce)

{

    memset(nonce, 0, ZBEE_SEC_CONST_NONCE_LEN);

    /* Source address */

    if (packet->application_id == ZBEE_NWK_GP_APP_ID_DEFAULT)

    {

        if (packet->direction == ZBEE_NWK_GP_FC_EXT_DIRECTION_FROM_ZGPD) {

            phtoleu32(nonce, packet->source_id);

        }

        phtoleu32(nonce+4, packet->source_id);

    }

    else if (packet->application_id == ZBEE_NWK_GP_APP_ID_ZGP)

    {

        phtoleu64(nonce, packet->ieee_packet_src64);

    }

    /* Frame counter */

    phtoleu32(nonce+8, packet->security_frame_counter);

    /* Security control */

    if ((packet->application_id == ZBEE_NWK_GP_APP_ID_ZGP) &&

        (packet->direction != ZBEE_NWK_GP_FC_EXT_DIRECTION_FROM_ZGPD)) {

        nonce[12] = (char)0xc5;    /* Security level = 0b101, Key Identifier = 0x00,

                                        Extended nonce = 0b0, Reserved = 0b00 */

    } else {

        nonce[12] = (char)0x05;    /* Security level = 0b101, Key Identifier = 0x00,

                                        Extended nonce = 0b0, Reserved = 0b11 */

    }

}

/**

 *Creates a nonce and decrypts secured ZigBee GP payload.

 *

 *@param packet ZigBee NWK packet.

 *@param enc_buffer encoded payload buffer.

 *@param offset payload offset.

 *@param dec_buffer decoded payload buffer.

 *@param payload_len payload length.

 *@param mic_len MIC length.

 *@param key key.

*/

static bool

zbee_gp_decrypt_payload(zbee_nwk_green_power_packet *packet, const uint8_t *enc_buffer, const unsigned offset, uint8_t

    *dec_buffer, unsigned payload_len, unsigned mic_len, uint8_t *key)

{

    uint8_t *key_buffer = key;

    uint8_t nonce[ZBEE_SEC_CONST_NONCE_LEN];

    zbee_gp_make_nonce(packet, nonce);

    if (zbee_sec_ccm_decrypt(key_buffer, nonce, enc_buffer, enc_buffer + offset, dec_buffer, offset, payload_len,

        mic_len)) {

        return true;

    }

    return false;

}

/**

 *Dissector for ZigBee Green Power commissioning.

 *

 *@param tvb pointer to buffer containing raw packet.

 *@param pinfo pointer to packet information fields.

 *@param tree pointer to data tree Wireshark uses to display packet.

 *@param packet packet data.

 *@param offset current payload offset.

 *@return payload processed offset.

*/

static unsigned

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

    zbee_nwk_green_power_packet *packet, unsigned offset)

{

    uint8_t comm_options;

    uint8_t comm_ext_options = 0;

    uint8_t appli_info_options = 0;

    uint16_t manufacturer_id = 0;

    uint8_t i;

    uint8_t gpd_cmd_num = 0;

    proto_item *gpd_cmd_list;

    proto_tree *gpd_cmd_list_tree;

    uint8_t length_of_clid_list_bm;

    uint8_t server_clid_num;

    uint8_t client_clid_num;

    proto_item *server_clid_list, *client_clid_list;

    proto_tree *server_clid_list_tree, *client_clid_list_tree;

    void *enc_buffer;

    uint8_t *enc_buffer_withA;

    uint8_t *dec_buffer;

    bool gp_decrypted;

    GSList *GSList_i;

    tvbuff_t *payload_tvb;

    static int * const options[] = {

        &hf_zbee_nwk_gp_cmd_comm_opt_mac_sec_num_cap,

        &hf_zbee_nwk_gp_cmd_comm_opt_rx_on_cap,

        &hf_zbee_nwk_gp_cmd_comm_opt_appli_info_present,

        &hf_zbee_nwk_gp_cmd_comm_opt_panid_req,

        &hf_zbee_nwk_gp_cmd_comm_opt_sec_key_req,

        &hf_zbee_nwk_gp_cmd_comm_opt_fixed_location,

        &hf_zbee_nwk_gp_cmd_comm_opt_ext_opt,

        NULL

    };

    static int * const ext_options[] = {

        &hf_zbee_nwk_gp_cmd_comm_ext_opt_sec_level_cap,

        &hf_zbee_nwk_gp_cmd_comm_ext_opt_key_type,

        &hf_zbee_nwk_gp_cmd_comm_ext_opt_gpd_key_present,

        &hf_zbee_nwk_gp_cmd_comm_ext_opt_gpd_key_encr,

        &hf_zbee_nwk_gp_cmd_comm_ext_opt_outgoing_counter,

        NULL

    };

    static int * const appli_info[] = {

        &hf_zbee_nwk_gp_cmd_comm_appli_info_mip,

        &hf_zbee_nwk_gp_cmd_comm_appli_info_mmip,

        &hf_zbee_nwk_gp_cmd_comm_appli_info_gclp,

        &hf_zbee_nwk_gp_cmd_comm_appli_info_crp,

        NULL

    };

    static int * const length_of_clid_list[] = {

        &hf_zbee_nwk_gp_cmd_comm_length_of_clid_list_server,

        &hf_zbee_nwk_gp_cmd_comm_length_of_clid_list_client,

        NULL

    };

    /* Get Device ID and display it. */

    proto_tree_add_item(tree, hf_zbee_nwk_gp_cmd_comm_device_id, tvb, offset, 1, ENC_LITTLE_ENDIAN);

    offset += 1;

    /* Get Options Field, build subtree and display the results. */

    comm_options = tvb_get_uint8(tvb, offset);

    proto_tree_add_bitmask(tree, tvb, offset, hf_zbee_nwk_gp_cmd_comm_opt, ett_zbee_nwk_cmd_options, options, ENC_NA);

    offset += 1;

    if (comm_options & ZBEE_NWK_GP_CMD_COMMISSIONING_OPT_EXT_OPTIONS) {

        /* Get extended Options Field, build subtree and display the results. */

        comm_ext_options = tvb_get_uint8(tvb, offset);

        proto_tree_add_bitmask(tree, tvb, offset, hf_zbee_nwk_gp_cmd_comm_ext_opt, ett_zbee_nwk_cmd_options, ext_options, ENC_NA);

        offset += 1;

        if (comm_ext_options & ZBEE_NWK_GP_CMD_COMMISSIONING_EXT_OPT_GPD_KEY_PRESENT) {

            /* Get security key and display it. */

            proto_tree_add_item(tree, hf_zbee_nwk_gp_cmd_comm_security_key, tvb, offset, ZBEE_SEC_CONST_KEYSIZE, ENC_NA);

            offset += ZBEE_SEC_CONST_KEYSIZE;

            /* Key is encrypted */

            if (comm_ext_options & ZBEE_NWK_GP_CMD_COMMISSIONING_EXT_OPT_GPD_KEY_ENCR) {

                /* Get Security MIC and display it. */

                proto_tree_add_item(tree, hf_zbee_nwk_gp_cmd_comm_gpd_sec_key_mic, tvb, offset, 4, ENC_LITTLE_ENDIAN);

                offset += 4;

                if (packet != NULL)

                {

                    /* Decrypt the security key */

                    dec_buffer = (uint8_t *)wmem_alloc(pinfo->pool, ZBEE_SEC_CONST_KEYSIZE);

                    enc_buffer_withA = (uint8_t *)wmem_alloc(pinfo->pool, 4 + ZBEE_SEC_CONST_KEYSIZE + 4); /* CCM* a (this is SrcID) + encKey + MIC */

                    enc_buffer = tvb_memdup(pinfo->pool, tvb, offset - ZBEE_SEC_CONST_KEYSIZE - 4, ZBEE_SEC_CONST_KEYSIZE + 4);

                    phtoleu32(enc_buffer_withA, packet->source_id);

                    memcpy(enc_buffer_withA+4, enc_buffer, ZBEE_SEC_CONST_KEYSIZE + 4);

                    gp_decrypted = false;

                    for (GSList_i = zbee_gp_keyring; GSList_i && !gp_decrypted; GSList_i = g_slist_next(GSList_i)) {

                        packet->security_frame_counter = packet->source_id; /* for Nonce creation*/

                        gp_decrypted = zbee_gp_decrypt_payload(packet, enc_buffer_withA, 4

                            , dec_buffer, ZBEE_SEC_CONST_KEYSIZE, 4, ((key_record_t *)(GSList_i->data))->key);

                    }

                    if (gp_decrypted) {

                        key_record_t key_record;

                        key_record.frame_num = 0;

                        key_record.label = NULL;

                        memcpy(key_record.key, dec_buffer, ZBEE_SEC_CONST_KEYSIZE);

                        zbee_gp_keyring = g_slist_prepend(zbee_gp_keyring, g_memdup2(&key_record, sizeof(key_record_t)));

                        payload_tvb = tvb_new_child_real_data(tvb, dec_buffer, ZBEE_SEC_CONST_KEYSIZE, ZBEE_SEC_CONST_KEYSIZE);

                        add_new_data_source(pinfo, payload_tvb, "Decrypted security key");

                    }

                }

            }

            else

            {

                key_record_t key_record;

                void *key;

                key_record.frame_num = 0;

                key_record.label = NULL;

                key = tvb_memdup(pinfo->pool, tvb, offset - ZBEE_SEC_CONST_KEYSIZE, ZBEE_SEC_CONST_KEYSIZE);

                memcpy(key_record.key, key, ZBEE_SEC_CONST_KEYSIZE);

                zbee_gp_keyring = g_slist_prepend(zbee_gp_keyring, g_memdup2(&key_record, sizeof(key_record_t)));

            }

        }

        if (comm_ext_options & ZBEE_NWK_GP_CMD_COMMISSIONING_EXT_OPT_OUT_COUNTER) {

            /* Get GPD Outgoing Frame Counter and display it. */

            proto_tree_add_item(tree, hf_zbee_nwk_gp_cmd_comm_outgoing_counter, tvb, offset, 4, ENC_LITTLE_ENDIAN);

            offset += 4;

        }

    }

    /* Display manufacturer specific data. */

    if (comm_options & ZBEE_NWK_GP_CMD_COMMISSIONING_OPT_APPLICATION_INFO) {

        /* Display application information. */

        appli_info_options = tvb_get_uint8(tvb, offset);

        proto_tree_add_bitmask(tree, tvb, offset, hf_zbee_nwk_gp_cmd_comm_appli_info, ett_zbee_nwk_cmd_appli_info, appli_info, ENC_NA);

        offset += 1;

        if (appli_info_options & ZBEE_NWK_GP_CMD_COMMISSIONING_APPLI_INFO_MIP) {

            /* Get Manufacturer ID. */

            proto_tree_add_item_ret_uint16(tree, hf_zbee_nwk_gp_cmd_comm_manufacturer_id, tvb, offset, 2, ENC_LITTLE_ENDIAN, &manufacturer_id);

            offset += 2;

        }

        if (appli_info_options & ZBEE_NWK_GP_CMD_COMMISSIONING_APPLI_INFO_MMIP) {

            /* Get Manufacturer Device ID. */

            switch (manufacturer_id) {

                case ZBEE_NWK_GP_MANUF_ID_GREENPEAK:

                    proto_tree_add_item(tree, hf_zbee_nwk_gp_cmd_comm_manufacturer_greenpeak_dev_id, tvb, offset, 2,

                        ENC_LITTLE_ENDIAN);

                    offset += 2;

                    break;

                default:

                    proto_tree_add_item(tree, hf_zbee_nwk_gp_cmd_comm_manufacturer_dev_id, tvb, offset, 2, ENC_LITTLE_ENDIAN);

                    offset += 2;

                    break;

            }

        }

        if (appli_info_options & ZBEE_NWK_GP_CMD_COMMISSIONING_APPLI_INFO_GCLP) {

            /* Get and display number of GPD commands */

            proto_tree_add_item_ret_uint8(tree, hf_zbee_nwk_gp_cmd_comm_gpd_cmd_num, tvb, offset, 1, ENC_LITTLE_ENDIAN, &gpd_cmd_num);

            offset += 1;

            /* Display GPD command list */

            if (gpd_cmd_num > 0) {

                gpd_cmd_list = proto_tree_add_item(tree, hf_zbee_nwk_gp_cmd_comm_gpd_cmd_id_list,

                    tvb, offset, gpd_cmd_num, ENC_NA);

                gpd_cmd_list_tree = proto_item_add_subtree(gpd_cmd_list, ett_zbee_nwk_cmd_comm_gpd_cmd_id_list);

                for (i = 0; i < gpd_cmd_num; i++, offset++) {

                    /* Display command id */

                    proto_tree_add_item(gpd_cmd_list_tree, hf_zbee_nwk_gp_command_id,

                        tvb, offset, 1, ENC_LITTLE_ENDIAN);

                }

            }

        }

        if (appli_info_options & ZBEE_NWK_GP_CMD_COMMISSIONING_APPLI_INFO_CRP) {

            /* Get and display Cluster List */

            length_of_clid_list_bm = tvb_get_uint8(tvb, offset);

            server_clid_num = (length_of_clid_list_bm & ZBEE_NWK_GP_CMD_COMMISSIONING_CLID_LIST_LEN_SRV) >>

                ws_ctz(ZBEE_NWK_GP_CMD_COMMISSIONING_CLID_LIST_LEN_SRV);

            client_clid_num = (length_of_clid_list_bm & ZBEE_NWK_GP_CMD_COMMISSIONING_CLID_LIST_LEN_CLI ) >>

                ws_ctz(ZBEE_NWK_GP_CMD_COMMISSIONING_CLID_LIST_LEN_CLI);

            proto_tree_add_bitmask(tree, tvb, offset, hf_zbee_nwk_gp_cmd_comm_length_of_clid_list,

                ett_zbee_nwk_cmd_comm_length_of_clid_list, length_of_clid_list, ENC_NA);

            offset += 1;

            if (server_clid_num > 0) {

                /* Display server cluster list */

                server_clid_list = proto_tree_add_item(tree, hf_zbee_nwk_cmd_comm_clid_list_server,

                    tvb, offset, 2*server_clid_num, ENC_NA);

                server_clid_list_tree = proto_item_add_subtree(server_clid_list, ett_zbee_nwk_cmd_comm_clid_list_server);

                /* Retrieve server clusters */

                for (i = 0; i < server_clid_num; i++, offset += 2) {

                    proto_tree_add_item(server_clid_list_tree, hf_zbee_nwk_cmd_comm_cluster_id,

                        tvb, offset, 2, ENC_LITTLE_ENDIAN);

                }

            }

            if (client_clid_num > 0) {

                /* Display client cluster list */

                client_clid_list = proto_tree_add_item(tree, hf_zbee_nwk_cmd_comm_clid_list_client,

                    tvb, offset, 2*client_clid_num, ENC_NA);

                client_clid_list_tree = proto_item_add_subtree(client_clid_list, ett_zbee_nwk_cmd_comm_clid_list_client);

                /* Retrieve client clusters */

                for (i = 0; i < client_clid_num; i++, offset += 2) {

                    proto_tree_add_item(client_clid_list_tree, hf_zbee_nwk_cmd_comm_cluster_id,

                        tvb, offset, 2, ENC_LITTLE_ENDIAN);

                }

            }

        }

    }

    return offset;

} /* dissect_zbee_nwk_gp_cmd_commissioning */

/**

 *Dissector for ZigBee Green Power channel request.

 *

 *@param tvb pointer to buffer containing raw packet.

 *@param pinfo pointer to packet information fields.

 *@param tree pointer to data tree Wireshark uses to display packet.

 *@param packet packet data.

 *@param offset current payload offset.

 *@return payload processed offset.

*/

static unsigned

dissect_zbee_nwk_gp_cmd_channel_request(tvbuff_t *tvb, packet_info *pinfo _U_, proto_tree *tree,

    zbee_nwk_green_power_packet *packet _U_, unsigned offset)

{

    static int * const channels[] = {

        &hf_zbee_nwk_gp_cmd_channel_request_toggling_behaviour_1st,

        &hf_zbee_nwk_gp_cmd_channel_request_toggling_behaviour_2nd,

        NULL

    };

    /* Get Command Options Field, build subtree and display the results. */

    proto_tree_add_bitmask(tree, tvb, offset, hf_zbee_nwk_gp_cmd_channel_request_toggling_behaviour, ett_zbee_nwk_cmd_options, channels, ENC_NA);

    offset += 1;

    return offset;

} /* dissect_zbee_nwk_gp_cmd_channel_request */

/**

 *Dissector for ZigBee Green Power channel configuration.

 *

 *@param tvb pointer to buffer containing raw packet.

 *@param pinfo pointer to packet information fields.

 *@param tree pointer to data tree Wireshark uses to display packet.

 *@param packet packet data.

 *@param offset current payload offset.

 *@return payload processed offset.

*/

static unsigned

dissect_zbee_nwk_gp_cmd_channel_configuration(tvbuff_t *tvb, packet_info *pinfo _U_, proto_tree *tree,

    zbee_nwk_green_power_packet *packet _U_, unsigned offset)

{

    static int * const channels[] = {

        &hf_zbee_nwk_gp_cmd_channel_configuration,

        NULL

    };

    /* Get Command Options Field, build subtree and display the results. */

    proto_tree_add_bitmask(tree, tvb, offset, hf_zbee_nwk_gp_cmd_operational_channel, ett_zbee_nwk_cmd_options, channels, ENC_NA);

    offset += 1;

    return offset;

} /* dissect_zbee_nwk_gp_cmd_channel_configuration */

/**

 *Dissector for ZigBee Green Power commands attrib reporting.

 *

 *@param tvb pointer to buffer containing raw packet.

 *@param pinfo pointer to packet information fields.

 *@param tree pointer to data tree Wireshark uses to display packet.

 *@param packet packet data.

 *@param offset current payload offset.

 *@param mfr_code manufacturer code.

 *@return payload processed offset.

*/

static unsigned

dissect_zbee_nwk_gp_cmd_attr_reporting(tvbuff_t *tvb, packet_info *pinfo _U_, proto_tree *tree,

    zbee_nwk_green_power_packet *packet _U_, unsigned offset, uint16_t mfr_code)

{

    uint16_t cluster_id;

    proto_tree *field_tree;

    /* Get cluster ID and add it into the tree. */

    proto_tree_add_item_ret_uint16(tree, hf_zbee_nwk_gp_zcl_attr_cluster_id, tvb, offset, 2, ENC_LITTLE_ENDIAN, &cluster_id);

    offset += 2;

    /* Create subtree and parse ZCL Write Attribute Payload. */

    field_tree = proto_tree_add_subtree_format(tree, tvb, offset, 2, ett_zbee_nwk_cmd_options, NULL,

                                "Attribute reporting command for cluster: 0x%04X", cluster_id);

    dissect_zcl_report_attr(tvb, pinfo, field_tree, &offset, cluster_id, mfr_code, ZBEE_ZCL_FCF_TO_CLIENT);

    return offset;