epan/dissectors/packet-ipsi-ctl.c

   1 /* packet-ipsi-ctl.c
   2  * Routines for Avaya IPSI Control packet disassembly
   3  * Traffic is encapsulated Avaya proprietary CCMS
   4  * (Control Channel Message Set) between PCD and SIM
   5  *
   6  * Copyright 2008, Randy McEoin <rmceoin@ahbelo.com>
   7  *
   8  * Wireshark - Network traffic analyzer
   9  * By Gerald Combs <gerald@wireshark.org>
  10  * Copyright 1998 Gerald Combs
  11  *
  12  * SPDX-License-Identifier: GPL-2.0-or-later
  13  */
  14
  15 #include "config.h"
  16
  17 #include <epan/packet.h>
  18
  19 void proto_register_ipsictl(void);
  20 void proto_reg_handoff_ipsictl(void);
  21
  22 static dissector_handle_t ipsictl_handle;
  23
  24 #define IPSICTL_PORT            5010 /* Not IANA registered */
  25 #define IPSICTL_PDU_MAGIC       0x0300
  26
  27 static int proto_ipsictl;
  28
  29 static int hf_ipsictl_pdu;
  30 static int hf_ipsictl_magic;
  31 static int hf_ipsictl_length;
  32 static int hf_ipsictl_type;
  33 static int hf_ipsictl_sequence;
  34 static int hf_ipsictl_field1;
  35 static int hf_ipsictl_data;
  36
  37 static int ett_ipsictl;
  38 static int ett_ipsictl_pdu;
  39
  40 static int dissect_ipsictl(tvbuff_t *tvb, packet_info *pinfo, proto_tree *tree, void* data _U_)
  41 {
  42
  43   proto_tree   *ipsictl_tree;
  44   proto_tree   *pdu_tree;
  45   proto_item   *ti;
  46   int           offset = 0;
  47   int           loffset = 0;
  48   int           llength = 0;
  49   int           remaining_length;
  50   uint16_t      magic;
  51   uint16_t      length;
  52   uint16_t      type=0;
  53   uint16_t      sequence=0;
  54   int           first_sequence=-1;
  55   int           last_sequence=-1;
  56   uint16_t      field1=0;
  57   uint16_t      pdu=0;
  58   int           haspdus=0;
  59
  60   remaining_length=tvb_reported_length_remaining(tvb, offset);
  61
  62   ti = proto_tree_add_item(tree, proto_ipsictl, tvb, offset, remaining_length, ENC_NA);
  63   ipsictl_tree = proto_item_add_subtree(ti, ett_ipsictl);
  64
  65   magic = tvb_get_ntohs(tvb, offset);
  66   if (magic == IPSICTL_PDU_MAGIC)
  67   {
  68     haspdus=1;
  69   }
  70
  71   while (haspdus &&
  72     ((remaining_length=tvb_reported_length_remaining(tvb, offset)) > 6))
  73   {
  74     loffset = offset;
  75
  76     magic = tvb_get_ntohs(tvb, loffset); loffset+=2;
  77     length = tvb_get_ntohs(tvb, loffset); loffset+=2;
  78     llength=length;
  79     remaining_length-=4;
  80     if (remaining_length>=2)
  81     {
  82       type = tvb_get_ntohs(tvb, loffset); loffset+=2;
  83       remaining_length-=2;
  84       llength-=2;
  85     }
  86     if (remaining_length>=2)
  87     {
  88       sequence = tvb_get_ntohs(tvb, loffset); loffset+=2;
  89       remaining_length-=2;
  90       llength-=2;
  91       if (first_sequence==-1)
  92       {
  93         first_sequence=sequence;
  94       }else{
  95         last_sequence=sequence;
  96       }
  97     }
  98     if (remaining_length>=2)
  99     {
 100       field1 = tvb_get_ntohs(tvb, loffset);
 101       llength-=2;
 102     }
 103
 104     ti = proto_tree_add_uint(ipsictl_tree, hf_ipsictl_pdu, tvb,
 105            offset, (length+4), pdu);
 106     pdu_tree = proto_item_add_subtree(ti, ett_ipsictl_pdu);
 107
 108     loffset=offset;
 109     remaining_length=tvb_reported_length_remaining(tvb, offset);
 110
 111     if (tree) {
 112       proto_tree_add_uint(pdu_tree, hf_ipsictl_magic, tvb, loffset, 2, magic);
 113     }
 114     loffset+=2; remaining_length-=2;
 115     if (tree) {
 116       proto_tree_add_uint(pdu_tree, hf_ipsictl_length, tvb, loffset, 2, length);
 117     }
 118     loffset+=2; remaining_length-=2;
 119
 120     if (remaining_length>=2)
 121     {
 122       if (tree) {
 123         proto_tree_add_uint(pdu_tree, hf_ipsictl_type, tvb, loffset, 2, type);
 124       }
 125       loffset+=2; remaining_length-=2;
 126     }
 127     if (remaining_length>=2)
 128     {
 129       if (tree) {
 130         proto_tree_add_uint(pdu_tree, hf_ipsictl_sequence, tvb, loffset, 2, sequence);
 131       }
 132       loffset+=2; remaining_length-=2;
 133     }
 134     if (remaining_length>=2)
 135     {
 136       if (tree) {
 137         proto_tree_add_uint(pdu_tree, hf_ipsictl_field1, tvb, loffset, 2, field1);
 138       }
 139       loffset+=2; remaining_length-=2;
 140     }
 141     if (remaining_length>=2)
 142     {
 143       if (tree) {
 144         proto_tree_add_item(pdu_tree, hf_ipsictl_data, tvb, loffset, llength, ENC_NA);
 145       }
 146       loffset+=llength;
 147     }
 148
 149     offset=loffset;
 150     pdu++;
 151   }
 152
 153   if (!haspdus)
 154   {
 155     proto_tree_add_item(ipsictl_tree, hf_ipsictl_data, tvb, offset, -1, ENC_NA);
 156   }
 157
 158   col_set_str(pinfo->cinfo, COL_PROTOCOL, "IPSICTL");
 159
 160   if (haspdus)
 161   {
 162     if (last_sequence==-1)
 163     {
 164       col_add_fstr(pinfo->cinfo, COL_INFO, "PDUS=%d, Seq=0x%04x",
 165         pdu,first_sequence);
 166     }else{
 167       col_add_fstr(pinfo->cinfo, COL_INFO, "PDUS=%d, Seq=0x%04x-0x%04x",
 168         pdu,first_sequence,last_sequence);
 169     }
 170   }else{
 171     col_set_str(pinfo->cinfo, COL_INFO, "Initialization");
 172   }
 173
 174   return tvb_captured_length(tvb);
 175
 176 } /* dissect_ipsictl */
 177
 178 void proto_register_ipsictl(void)
 179 {
 180
 181   static hf_register_info hf[] = {
 182     { &hf_ipsictl_pdu,
 183       { "PDU",  "ipsictl.pdu",
 184         FT_UINT16,      BASE_DEC,       NULL,   0x0,
 185         "IPSICTL PDU", HFILL }},
 186     { &hf_ipsictl_magic,
 187       { "Magic",        "ipsictl.magic",
 188         FT_UINT16,      BASE_HEX,       NULL,   0x0,
 189         "IPSICTL Magic", HFILL }},
 190     { &hf_ipsictl_length,
 191       { "Length",       "ipsictl.length",
 192         FT_UINT16,      BASE_HEX,       NULL,   0x0,
 193         "IPSICTL Length", HFILL }},
 194     { &hf_ipsictl_type,
 195       { "Type", "ipsictl.type",
 196         FT_UINT16,      BASE_HEX,       NULL,   0x0,
 197         "IPSICTL Type", HFILL }},
 198     { &hf_ipsictl_sequence,
 199       { "Sequence",     "ipsictl.sequence",
 200         FT_UINT16,      BASE_HEX,       NULL,   0x0,
 201         "IPSICTL Sequence", HFILL }},
 202     { &hf_ipsictl_field1,
 203       { "Field1",       "ipsictl.field1",
 204         FT_UINT16,      BASE_HEX,       NULL,   0x0,
 205         "IPSICTL Field1", HFILL }},
 206     { &hf_ipsictl_data,
 207       { "Data", "ipsictl.data",
 208         FT_BYTES,       BASE_NONE,      NULL,   0x0,
 209         "IPSICTL data", HFILL }},
 210   };
 211
 212   static int *ett[] = {
 213     &ett_ipsictl,
 214     &ett_ipsictl_pdu
 215   };
 216
 217   proto_ipsictl = proto_register_protocol("IPSICTL", "IPSICTL", "ipsictl");
 218   proto_register_field_array(proto_ipsictl, hf, array_length(hf));
 219   proto_register_subtree_array(ett, array_length(ett));
 220
 221   ipsictl_handle = register_dissector("ipsictl", dissect_ipsictl, proto_ipsictl);
 222 }
 223
 224 void proto_reg_handoff_ipsictl(void)
 225 {
 226
 227   dissector_add_uint_with_preference("tcp.port", IPSICTL_PORT, ipsictl_handle);
 228
 229 }
 230
 231 /*
 232  * Editor modelines  -  https://www.wireshark.org/tools/modelines.html
 233  *
 234  * Local Variables:
 235  * c-basic-offset: 2
 236  * tab-width: 8
 237  * indent-tabs-mode: nil
 238  * End:
 239  *
 240  * ex: set shiftwidth=2 tabstop=8 expandtab:
 241  * :indentSize=2:tabSize=8:noTabs=true:
 242  */