/* packet-e164.c

 * Routines for output and filtering of E164 numbers common

 * to many dissectors.

 * Copyright 2004, Anders Broman <anders.broman@ericsson.com>

 *

 * Wireshark - Network traffic analyzer

 * By Gerald Combs <gerald@wireshark.org>

 * Copyright 1998 Gerald Combs

 *

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

 *

 * Ref ITU-T E.164 05/97

 *     Annex to ITU Operational Bulletin No. 991 - 1.XI.2011

 *     Amendment No. 10 ITU Operational Bulletin No. 1057 - 1.VIII.2014

 * Find the bulletins here:

 * http://www.itu.int/pub/T-SP-OB

 */

#include "config.h"

#include <epan/packet.h>

#include "packet-e164.h"

#include "expert.h"

void proto_register_e164(void);

const value_string E164_country_code_value[] = {

  { 0,  "Reserved"},

  { 1,  "Americas"},

  { 7,  "Russian Federation, Kazakstan (Republic of)"},

  { 20, "Egypt (Arab Republic of)"},

  { 27, "South Africa (Republic of)"},

  { 30, "Greece"},

  { 31, "Netherlands (Kingdom of the)"},

  { 32, "Belgium"},

  { 33, "France"},

  { 34, "Spain"},

  { 36, "Hungary (Republic of)"},

  { 39, "Italy"},

  { 40, "Romania"},

  { 41, "Switzerland (Confederation of)"},

  { 43, "Austria"},

  { 44, "United Kingdom of Great Britain and Northern Ireland"},

  { 45, "Denmark"},

  { 46, "Sweden"},

  { 47, "Norway"},

  { 48, "Poland (Republic of)"},

  { 49, "Germany (Federal Republic of)"},

  { 51, "Peru"},

  { 52, "Mexico"},

  { 53, "Cuba"},

  { 54, "Argentine Republic"},

  { 55, "Brazil (Federative Republic of)"},

  { 56, "Chile"},

  { 57, "Colombia (Republic of)"},

  { 58, "Venezuela(Bolivarian Republic of)"},

  { 60, "Malaysia"},

  { 61, "Australia"},

  { 62, "Indonesia (Republic of)"},

  { 63, "Philippines (Republic of the)"},

  { 64, "New Zealand"},

  { 65, "Singapore (Republic of)"},

  { 66, "Thailand"},

  { 81, "Japan"},

  { 82, "Korea (Republic of)"},

  { 84, "Viet Nam (Socialist Republic of)"},

  { 86, "China (People's Republic of)"},

  { 90, "Turkey"},

  { 91, "India (Republic of)"},

  { 92, "Pakistan (Islamic Republic of)"},

  { 93, "Afghanistan"},

  { 94, "Sri Lanka (Democratic Socialist Republic of)"},

  { 95, "Myanmar (the Republic of the Union of)"},

  { 98, "Iran (Islamic Republic of)"},

  { 210,  "Spare code"},

  { 211,  "South Sudan (Republic of)"},

  { 212,  "Morocco (Kingdom of)"},

  { 213,  "Algeria (People's Democratic Republic of)"},

  { 214,  "Spare code"},

  { 215,  "Spare code"},

  { 216,  "Tunisia"},

  { 217,  "Spare code"},

  { 218,  "Libya (Socialist People's Libyan Arab Jamahiriya)"},

  { 219,  "Spare code"},

  { 220,  "Gambia (Republic of)"},

  { 221,  "Senegal (Republic of)"},

  { 222,  "Mauritania (Islamic Republic of)"},

  { 223,  "Mali (Republic of)"},

  { 224,  "Guinea (Republic of)"},

  { 225,  "Cote d'Ivoire (Republic of)"},

  { 226,  "Burkina Faso"},

  { 227,  "Niger (Republic of the)"},

  { 228,  "Togolese Republic"},

  { 229,  "Benin (Republic of)"},

  { 230,  "Mauritius (Republic of)"},

  { 231,  "Liberia (Republic of)"},

  { 232,  "Sierra Leone"},

  { 233,  "Ghana"},

  { 234,  "Nigeria (Federal Republic of)"},

  { 235,  "Chad (Republic of)"},

  { 236,  "Central African Republic"},

  { 237,  "Cameroon (Republic of)"},

  { 238,  "Cape Verde (Republic of)"},

  { 239,  "Sao Tome and Principe (Democratic Republic of)"},

  { 240,  "Equatorial Guinea (Republic of)"},

  { 241,  "Gabonese Republic"},

  { 242,  "Congo (Republic of the)"},

  { 243,  "Democratic Republic of Congo"},

  { 244,  "Angola (Republic of)"},

  { 245,  "Guinea-Bissau (Republic of)"},

  { 246,  "Diego Garcia"},

  { 247,  "Saint Helena, Ascension and Tristan da Cunha"},

  { 248,  "Seychelles (Republic of)"},

  { 249,  "Sudan (Republic of the)"},

  { 250,  "Rwanda (Republic of)"},

  { 251,  "Ethiopia (Federal Democratic Republic of)"},

  { 252,  "Somali Democratic Republic"},

  { 253,  "Djibouti (Republic of)"},

  { 254,  "Kenya (Republic of)"},

  { 255,  "Tanzania (United Republic of)"},

  { 256,  "Uganda (Republic of)"},

  { 257,  "Burundi (Republic of)"},

  { 258,  "Mozambique (Republic of)"},

  { 259,  "Spare code"},

  { 260,  "Zambia (Republic of)"},

  { 261,  "Madagascar (Republic of)"},

  { 262,  "French Departments and Territories in the Indian Ocean"},

  { 263,  "Zimbabwe (Republic of)"},

  { 264,  "Namibia (Republic of)"},

  { 265,  "Malawi"},

  { 266,  "Lesotho (Kingdom of)"},

  { 267,  "Botswana (Republic of)"},

  { 268,  "Swaziland (Kingdom of)"},

  { 269,  "Comoros (Union of the)"},

  { 280,  "Spare code"},

  { 281,  "Spare code"},

  { 282,  "Spare code"},

  { 283,  "Spare code"},

  { 284,  "Spare code"},

  { 285,  "Spare code"},

  { 286,  "Spare code"},

  { 287,  "Spare code"},

  { 288,  "Spare code"},

  { 289,  "Spare code"},

  { 290,  "Saint Helena, Ascension and Tristan da Cunha"},

  { 291,  "Eritrea"},

  { 292,  "Spare code"},

  { 293,  "Spare code"},

  { 294,  "Spare code"},

  { 295,  "Spare code"},

  { 296,  "Spare code"},

  { 297,  "Aruba"},

  { 298,  "Faroe Islands"},

  { 299,  "Greenland (Denmark)"},

  { 350,  "Gibraltar"},

  { 351,  "Portugal"},

  { 352,  "Luxembourg"},

  { 353,  "Ireland"},

  { 354,  "Iceland"},

  { 355,  "Albania (Republic of)"},

  { 356,  "Malta"},

  { 357,  "Cyprus (Republic of)"},

  { 358,  "Finland"},

  { 359,  "Bulgaria (Republic of)"},

  { 370,  "Lithuania (Republic of)"},

  { 371,  "Latvia (Republic of)"},

  { 372,  "Estonia (Republic of)"},

  { 373,  "Moldova (Republic of)"},

  { 374,  "Armenia (Republic of)"},

  { 375,  "Belarus (Republic of)"},

  { 376,  "Andorra (Principality of)"},

  { 377,  "Monaco (Principality of)"},

  { 378,  "San Marino (Republic of)"},

  { 379,  "Vatican City State"},

  { 380,  "Ukraine"},

  { 381,  "Serbia (Republic of)"},

  { 382,  "Montenegro (Republic of)"},

  { 383,  "Spare code"},

  { 384,  "Spare code"},

  { 385,  "Croatia (Republic of)"},

  { 386,  "Slovenia (Republic of)"},

  { 387,  "Bosnia and Herzegovina"},

  { 388,  "Group of countries, shared code"},

  { 389,  "The Former Yugoslav Republic of Macedonia"},

  { 420,  "Czech Republic"},

  { 421,  "Slovak Republic"},

  { 422,  "Spare code"},

  { 423,  "Liechtenstein (Principality of)"},

  { 424,  "Spare code"},

  { 425,  "Spare code"},

  { 426,  "Spare code"},

  { 427,  "Spare code"},

  { 428,  "Spare code"},

  { 429,  "Spare code"},

  { 500,  "Falkland Islands (Malvinas)"},

  { 501,  "Belize"},

  { 502,  "Guatemala (Republic of)"},

  { 503,  "El Salvador (Republic of)"},

  { 504,  "Honduras (Republic of)"},

  { 505,  "Nicaragua"},

  { 506,  "Costa Rica"},

  { 507,  "Panama (Republic of)"},

  { 508,  "Saint Pierre and Miquelon (Collectivite territoriale de la Republique francaise)"},

  { 509,  "Haiti (Republic of)"},

  { 590,  "Guadeloupe (French Department of)"},

  { 591,  "Bolivia (Plurinational State of)"},

  { 592,  "Guyana"},

  { 593,  "Ecuador"},

  { 594,  "French Guiana (French Department of)"},

  { 595,  "Paraguay (Republic of)"},

  { 596,  "Martinique (French Department of)"},

  { 597,  "Suriname (Republic of)"},

  { 598,  "Uruguay (Eastern Republic of)"},

  { 599,  "Bonaire, Saint Eustatius and Saba, Curacao"},

  { 670,  "Democratic Republic of Timor-Leste"},

  { 671,  "Spare code"},

  { 672,  "Australian External Territories"},

  { 673,  "Brunei Darussalam"},

  { 674,  "Nauru (Republic of)"},

  { 675,  "Papua New Guinea"},

  { 676,  "Tonga (Kingdom of)"},

  { 677,  "Solomon Islands"},

  { 678,  "Vanuatu (Republic of)"},

  { 679,  "Fiji (Republic of)"},

  { 680,  "Palau (Republic of)"},

  { 681,  "Wallis and Futuna (Territoire francais d'outre-mer)"},

  { 682,  "Cook Islands"},

  { 683,  "Niue"},

  { 684,  "Spare code"},

  { 685,  "Samoa (Independent State of)"},

  { 686,  "Kiribati (Republic of)"},

  { 687,  "New Caledonia (Territoire francais d'outre-mer)"},

  { 688,  "Tuvalu"},

  { 689,  "French Polynesia (Territoire francais d'outre-mer)"},

  { 690,  "Tokelau"},

  { 691,  "Micronesia (Federated States of)"},

  { 692,  "Marshall Islands (Republic of the)"},

  { 693,  "Spare code"},

  { 694,  "Spare code"},

  { 695,  "Spare code"},

  { 696,  "Spare code"},

  { 697,  "Spare code"},

  { 698,  "Spare code"},

  { 699,  "Spare code"},

  { 800,  "International Freephone Service"},

  { 801,  "Spare code"},

  { 802,  "Spare code"},

  { 803,  "Spare code"},

  { 804,  "Spare code"},

  { 805,  "Spare code"},

  { 806,  "Spare code"},

  { 807,  "Spare code"},

  { 808,  "International Shared Cost Service (ISCS)"},

  { 809,  "Spare code"},

  { 830,  "Spare code"},

  { 831,  "Spare code"},

  { 832,  "Spare code"},

  { 833,  "Spare code"},

  { 834,  "Spare code"},

  { 835,  "Spare code"},

  { 836,  "Spare code"},

  { 837,  "Spare code"},

  { 838,  "Spare code"},

  { 839,  "Spare code"},

  { 850,  "Democratic People's Republic of Korea"},

  { 851,  "Spare code"},

  { 852,  "Hong Kong, China"},

  { 853,  "Macau, China"},

  { 854,  "Spare code"},

  { 855,  "Cambodia (Kingdom of)"},

  { 856,  "Lao People's Democratic Republic"},

  { 857,  "Spare code"},

  { 858,  "Spare code"},

  { 859,  "Spare code"},

  { 870,  "Inmarsat SNAC"},

  { 871,  "Spare code"},

  { 872,  "Spare code"},

  { 873,  "Spare code"},

  { 874,  "Spare code"},

  { 875,  "Reserved - Maritime Mobile Service Applications"},

  { 876,  "Reserved - Maritime Mobile Service Applications"},

  { 877,  "Reserved - Maritime Mobile Service Applications"},

  { 878,  "Universal Personal Telecommunication Service (UPT)"},

  { 879,  "Reserved for national non-commercial purposes"},

  { 880,  "Bangladesh"},

  { 881,  "Global Mobile Satellite System (GMSS), shared code"},

  { 882,  "International Networks, shared code"},

  { 883,  "International Networks, shared code"},

  { 884,  "Spare code"},

  { 885,  "Spare code"},

  { 886,  "Taiwan, China"},

  { 887,  "Spare code"},

  { 888,  "Telecommunications for Disaster Relief (TDR)"},

  { 889,  "Spare code"},

  { 890,  "Spare code"},

  { 891,  "Spare code"},

  { 892,  "Spare code"},

  { 893,  "Spare code"},

  { 894,  "Spare code"},

  { 895,  "Spare code"},

  { 896,  "Spare code"},

  { 897,  "Spare code"},

  { 898,  "Spare code"},

  { 899,  "Spare code"},

  { 960,  "Maldives (Republic of)"},

  { 961,  "Lebanon"},

  { 962,  "Jordan (Hashemite Kingdom of)"},

  { 963,  "Syrian Arab Republic"},

  { 964,  "Iraq (Republic of)"},

  { 965,  "Kuwait (State of)"},

  { 966,  "Saudi Arabia (Kingdom of)"},

  { 967,  "Yemen (Republic of)"},

  { 968,  "Oman (Sultanate of)"},

  { 969,  "Reserved - reservation currently under investigation"},

  { 970,  "Reserved"},

  { 971,  "United Arab Emirates"},

  { 972,  "Israel (State of)"},

  { 973,  "Bahrain (Kingdom of)"},

  { 974,  "Qatar (State of)"},

  { 975,  "Bhutan (Kingdom of)"},

  { 976,  "Mongolia"},

  { 977,  "Nepal (Federal Democratic Republic of)"},

  { 978,  "Spare code"},

  { 979,  "International Premium Rate Service (IPRS)"},

  { 990,  "Spare code"},

  { 991,  "Trial of a proposed new international telecommunication public correspondence service, shared code"},

  { 992,  "Tajikstan (Republic of)"},

  { 993,  "Turkmenistan"},

  { 994,  "Azerbaijan"},

  { 995,  "Georgia"},

  { 996,  "Kyrgyz Republic"},

  { 997,  "Spare code"},

  { 998,  "Uzbekistan (Republic of)"},

  { 999,  "Reserved for future global service"},

  { 0,  NULL }

};

static value_string_ext E164_country_code_value_ext = VALUE_STRING_EXT_INIT(E164_country_code_value);

/* Country code from ITU-T E.164 to ISO 3166 two letters country name */

const value_string E164_ISO3166_country_code_short_value[] = {

    { 1,  "us" }, { 7,  "ru" }, { 20,   "eg" }, { 27,   "za" },

    { 30,   "gr" }, { 31,   "nl" }, { 32,   "be" }, { 33,   "fr" },

    { 34,   "es" }, { 36,   "hu" }, { 39,   "it" }, { 40,   "ro" },

    { 41,   "ch" }, { 43,   "at" }, { 44,   "gb" }, { 45,   "dk" },

    { 46,   "se" }, { 47,   "no" }, { 48,   "pl" }, { 49,   "de" },

    { 51,   "pe" }, { 52,   "mx" }, { 53,   "cu" }, { 54,   "ar" },

    { 55,   "br" }, { 56,   "cl" }, { 57,   "co" }, { 58,   "ve" },

    { 60,   "my" }, { 61,   "au" }, { 62,   "id" }, { 63,   "ph" },

    { 64,   "nz" }, { 65,   "sg" }, { 66,   "th" }, { 81,   "jp" },

    { 82,   "kr" }, { 84,   "vn" }, { 86,   "cn" }, { 90,   "tr" },

    { 91,   "in" }, { 92,   "pk" }, { 93,   "af" }, { 94,   "lk" },

    { 98,   "ir" }, { 95,   "mm" },

    { 212,  "ma" }, { 213,  "dz" }, { 216,  "tn" }, { 218,  "ly" },

    { 220,  "gm" }, { 221,  "sn" }, { 222,  "mr" }, { 223,  "ml" },

    { 224,  "gn" }, { 225,  "ci" }, { 226,  "bf" }, { 227,  "ne" },

    { 228,  "tg" }, { 229,  "bj" }, { 230,  "mu" }, { 231,  "lr" },

    { 232,  "sl" }, { 233,  "gh" }, { 234,  "ng" }, { 235,  "td" },

    { 236,  "cf" }, { 237,  "cm" }, { 238,  "cv" }, { 239,  "st" },

    { 240,  "gq" }, { 241,  "ga" }, { 242,  "cg" }, { 243,  "cd" },

    { 244,  "ao" }, { 245,  "gw" }, { 248,  "sc" }, { 249,  "sd" },

    { 250,  "rw" }, { 251,  "et" }, { 252,  "so" }, { 253,  "dj" },

    { 254,  "ke" }, { 255,  "tz" }, { 256,  "ug" }, { 257,  "bi" },

    { 258,  "mz" }, { 260,  "zm" }, { 261,  "mg" }, { 262,  "fr" },

    { 263,  "zw" }, { 264,  "na" }, { 265,  "mw" }, { 266,  "ls" },

    { 267,  "bw" }, { 268,  "sz" }, { 269,  "km" }, { 290,  "sh" },

    { 291,  "er" }, { 297,  "aw" }, { 298,  "fo" }, { 299,  "gl" },

    { 350,  "gi" }, { 351,  "pt" }, { 352,  "lu" }, { 353,  "ie" },

    { 354,  "is" }, { 355,  "al" }, { 356,  "mt" }, { 357,  "cy" },

    { 358,  "fi" }, { 359,  "bg" }, { 370,  "lt" }, { 371,  "lv" },

    { 372,  "ee" }, { 373,  "md" }, { 374,  "am" }, { 375,  "by" },

    { 376,  "ad" }, { 377,  "mc" }, { 378,  "sm" }, { 379,  "va" },

    { 380,  "ua" }, { 385,  "hr" }, { 386,  "si" }, { 387,  "ba" },

    { 420,  "cz" }, { 421,  "sk" }, { 423,  "li" },

    { 500,  "fk" }, { 501,  "bz" }, { 502,  "gt" }, { 503,  "sv" },

    { 504,  "hn" }, { 505,  "ni" }, { 506,  "cr" }, { 507,  "pa" },

    { 508,  "pm" }, { 509,  "ht" }, { 590,  "gp" }, { 591,  "bo" },

    { 592,  "gy" }, { 593,  "ec" }, { 594,  "gf" }, { 595,  "py" },

    { 596,  "mq" }, { 597,  "sr" }, { 598,  "uy" },

    { 673,  "bn" }, { 682,  "ck" }, { 670,  "tl" }, { 674,  "nr" },

    { 675,  "pg" }, { 676,  "to" }, { 677,  "sb" }, { 678,  "vu" },

    { 679,  "fj" }, { 680,  "pw" }, { 681,  "wf" }, { 683,  "nu" },

    { 685,  "ws" }, { 686,  "ki" }, { 687,  "nc" }, { 688,  "tv" },

    { 689,  "pf" }, { 690,  "tk" }, { 691,  "fm" }, { 692,  "mh" },

    { 850,  "kp" }, { 852,  "hk" }, { 853,  "mo" }, { 855,  "kh" },

    { 856,  "la" }, { 880,  "bd" },

    { 960,  "mv" }, { 961,  "lb" }, { 962,  "jo" }, { 963,  "sy" },

    { 964,  "iq" }, { 965,  "kw" }, { 966,  "sa" }, { 967,  "ye" },

    { 968,  "om" }, { 971,  "ae" }, { 972,  "il" }, { 973,  "bh" },

    { 974,  "qa" }, { 975,  "bt" }, { 976,  "mn" }, { 977,  "np" },

    { 992,  "tj" }, { 993,  "tm" }, { 994,  "az" }, { 995,  "ge" },

    { 996,  "kg" }, { 998,  "uz" },

    { 0,  NULL }

};

value_string_ext E164_ISO3166_country_code_short_value_ext = VALUE_STRING_EXT_INIT(E164_ISO3166_country_code_short_value);

static const value_string E164_GMSS_vals[] = {

  { 6,  "Iridium Satellite LLC"},

  { 7,  "Iridium Satellite LLC"},

  { 8,  "Globalstar"},

  { 9,  "Globalstar"},

  { 0,  NULL }

};

static const value_string E164_International_Networks_882_vals[] = {

  { 10, "Global Office Application"},

  { 12, "HyperStream International (HSI) Data Network"},

  { 13, "EMS Regional Mobile Satellite System"},

  { 15, "Global international ATM Network"},

  { 16, "Thuraya RMSS Network"},

  { 20, "Garuda Mobile Telecommunication Satellite System"},

  { 22, "Cable & Wireless Global Network"},

  { 23, "Sita-Equant Network"},

  { 24, "TeliaSonera Sverige AB"},

  { 28, "Deutsche Telekom's Next Generation Network"},

  { 31, "Global International ATM Network"},

  { 32, "MCP network"},

  { 33, "Oration Technologies Network"},

  { 34, "BebbiCell AG"},

  { 35, "Jasper System"},

  { 36, "Jersey Telecom"},

  { 37, "Cingular Wireless network"},

  { 39, "Vodafone Malta"},

  { 40, "Oy Communications"},

  { 41, "Intermatica"},

  { 42, "Seanet Maritime Communication"},

  { 43, "Beeline"},

  { 45, "Telecom Italia"},

  { 46, "Tyntec GmbH"},

  { 47, "Transatel"},

  { 97, "Smart Communications Inc"},

  { 98, "Onair GSM services"},

  { 99, "Telenor GSM network - services in aircraft"},

  { 0,  NULL }

};

static value_string_ext E164_International_Networks_882_vals_ext = VALUE_STRING_EXT_INIT(E164_International_Networks_882_vals);

static const value_string E164_International_Networks_883_vals[] = {

  { 100,  "MediaLincc Ltd"},

  { 110,  "Aicent Inc"},

  { 120,  "Telenor Connexion AB"},

  { 130,  "France Telecom Orange"},

  { 140,  "Multiregional TransitTelecom (MTT)"},

  { 150,  "BodyTrace Netherlands B.V"},

  { 5100, "Voxbone SA"},

  { 5110, "Bandwidth.com Inc"},

  { 5120, "MTX Connect Ltd"},

  { 5130, "SIMPE Ltd"},

  { 5140, "Ellipsat Inc"},

  { 5150, "Wins Limited"},

  { 0,  NULL }

};

static int proto_e164;

static int hf_E164_calling_party_number;

static int hf_E164_called_party_number;

static int hf_E164_msisdn;

static int hf_E164_isdn;

static int hf_E164_identification_code;

static int hf_E164_country_code;

static int ett_e164_msisdn;

static expert_field ei_E164_country_code_non_decimal;

static expert_field ei_E164_identification_code_non_decimal;

void

dissect_e164_number(tvbuff_t *tvb, proto_tree *tree, int offset, int length, e164_info_t e164_info)

{

  proto_item *pi;

  switch (e164_info.e164_number_type) {

  case CALLING_PARTY_NUMBER:

    proto_tree_add_string(tree, hf_E164_calling_party_number, tvb, offset,

              length, e164_info.E164_number_str);

    break;

  case CALLED_PARTY_NUMBER:

    proto_tree_add_string(tree, hf_E164_called_party_number, tvb, offset,

              length, e164_info.E164_number_str);

    break;

  default:

    break;

  }

  if (e164_info.nature_of_address == E164_NA_INTERNATIONAL_NUMBER) {

    pi = proto_tree_add_string(tree, hf_E164_msisdn, tvb, offset, length, e164_info.E164_number_str);

    proto_item_set_hidden(pi);

  }

}

/**

 * Convert 16bit integer in BCD encoding to decimal.

 * @param bcd   BCD value to convert.

 * @param[out] dec  Pointer to decimal result.

 * @return true if ok, false if bcd contains a nibble > 9.

 */

static bool

convert_bcd_to_dec(uint16_t bcd, uint16_t * dec)

{

  bool rok = true;

  uint16_t result = 0;

  uint16_t mult = 1;

  while (bcd) {

    if ((bcd & 0x0f) > 9)

      rok = false;

    result += (bcd & 0x0f) * mult;

    bcd >>= 4;

    mult *= 10;

  }

  *dec = result;

  return rok;

}

void

dissect_e164_cc(tvbuff_t *tvb, packet_info* pinfo, proto_tree *tree, int offset, e164_encoding_t encoding)

{

  int cc_offset;

  uint8_t address_digit_pair;

  uint16_t  id_code = 0;

  uint8_t cc_length;

  uint8_t length;

  uint16_t cc = 0;

  bool bcd_ok = false;

  proto_item *item = NULL;

  cc_offset = offset;

  address_digit_pair = tvb_get_uint8(tvb, cc_offset);

  /* Get the first 3 digits of the MSISDN */

  switch (encoding) {

  case E164_ENC_BINARY:

    /* Dissect country code after removing non significant zeros */

    while (address_digit_pair == 0) {

      cc_offset = cc_offset + 1;

      address_digit_pair = tvb_get_uint8(tvb, cc_offset);

    }

    cc = tvb_get_ntohs(tvb, cc_offset);

    if ((address_digit_pair & 0xf0) != 0) {

      cc = cc >> 4;

    }

    break;

  case E164_ENC_BCD:

    cc = address_digit_pair &0x0f;

    cc = cc << 4;

    cc = cc | (address_digit_pair &0xf0)>>4;

    cc = cc << 4;

    if (tvb_bytes_exist(tvb, cc_offset+1, 1)) {

      address_digit_pair = tvb_get_uint8(tvb, cc_offset+1);

      cc = cc | (address_digit_pair &0x0f);

    }

    break;

  case E164_ENC_UTF8:

    /* XXX - do we need to worry about leading 0s? */

    cc  = (tvb_get_uint8(tvb, cc_offset)   - '0') << 8;

    cc |= (tvb_get_uint8(tvb, cc_offset+1) - '0') << 4;

    cc |= (tvb_get_uint8(tvb, cc_offset+2) - '0');

    break;

  }

  /* Determine how many of those digits are the Country Code */

  switch (cc & 0x0f00) {

  case 0x0:

    cc_length = 1;

    break;

  case 0x0100:

    cc_length = 1;

    break;

  case 0x0200:

    switch (cc & 0x00f0) {

    case 0:

    case 0x70:

      cc_length = 2;

      break;

    default:

      cc_length = 3;

      break;

    }

    break;

  case 0x0300:

    switch (cc & 0x00f0) {

    case 0:

    case 0x10:

    case 0x20:

    case 0x30:

    case 0x40:

    case 0x60:

    case 0x90:

      cc_length = 2;

      break;

    default:

      cc_length = 3;

      break;

    }

    break;

  case 0x0400:

    switch (cc & 0x00f0) {

    case 0x20:

      cc_length = 3;

      break;

    default:

      cc_length = 2;

      break;

    }

    break;

  case 0x0500:

    switch (cc & 0x00f0) {

    case 0:

    case 0x90:

      cc_length = 3;

      break;

    default:

      cc_length = 2;

      break;

    }

    break;

  case 0x0600:

    switch (cc & 0x00f0) {

    case 0x70:

    case 0x80:

    case 0x90:

      cc_length = 3;

      break;

    default:

      cc_length = 2;

      break;

    }

    break;

  case 0x0700:

    cc_length = 1;

    break;

  case 0x0800:

    switch (cc & 0x00f0) {

    case 0x10:

    case 0x20:

    case 0x40:

    case 0x60:

      cc_length = 2;

      break;

    default:

      cc_length = 3;

      break;

    }

    break;

  case 0x0900:

    switch (cc & 0x00f0) {

    case 0:

    case 0x10:

    case 0x20:

    case 0x30:

    case 0x40:

    case 0x50:

    case 0x80:

      cc_length = 2;

      break;

    default:

      cc_length = 3;

      break;

    }

    break;

  default:

    cc_length = 0;

    break;

  } /* End switch cc */

  /* (Now that we know how long the CC is,)

   * shift off any extra digits we got.

   */

  switch (cc_length) {

  case 1:

    cc = cc >> 8;

    length = 1;

    break;

  case 2:

    cc = cc >> 4;

    length = 1;

    break;

  default:

    length = 2;

    break;

  } /* end switch cc_length */

  /* Now process the CC as decimal */

  bcd_ok = convert_bcd_to_dec(cc, &cc);

  /* Display the CC */

  if (encoding == E164_ENC_UTF8)

      item = proto_tree_add_uint(tree, hf_E164_country_code, tvb, cc_offset, cc_length, cc);

  else

      item = proto_tree_add_uint(tree, hf_E164_country_code, tvb, cc_offset, length, cc);

  if (!bcd_ok) {

    expert_add_info(pinfo, item, &ei_E164_country_code_non_decimal);

  }

  /* Handle special Country Codes */

  switch (cc) {

  case 881:

    /* Get the 1-digit ID code */

    switch (encoding) {

    case E164_ENC_BINARY:

      id_code = tvb_get_uint8(tvb, cc_offset + 1) & 0x0f;

      break;

    case E164_ENC_BCD:

      id_code = (tvb_get_uint8(tvb, cc_offset + 1) & 0xf0) >> 4;

      break;

    case E164_ENC_UTF8:

      id_code = tvb_get_uint8(tvb, cc_offset + cc_length) - '0';

      break;

    }

    bcd_ok = (id_code <= 9);

    item = proto_tree_add_uint_format_value(tree, hf_E164_identification_code, tvb, (cc_offset + 1), 1,

            id_code, "%d %s", id_code, val_to_str_const(id_code, E164_GMSS_vals, "Unknown"));

    if (!bcd_ok) {

      expert_add_info(pinfo, item, &ei_E164_identification_code_non_decimal);

    }

    break;

  case 882:

    /* Get the 2-digit ID code */

    switch (encoding) {

    case E164_ENC_BINARY:

      id_code = tvb_get_ntohs(tvb, cc_offset + 1);

      id_code = (id_code & 0x0ff0) >> 4;

      break;

    case E164_ENC_BCD:

      id_code  = tvb_get_uint8(tvb, cc_offset + 1) & 0xf0;

      id_code |= tvb_get_uint8(tvb, cc_offset + 2) & 0x0f;

      break;

    case E164_ENC_UTF8:

      id_code  = (tvb_get_uint8(tvb, cc_offset+cc_length)   - '0') << 4;

      id_code |= (tvb_get_uint8(tvb, cc_offset+cc_length+1) - '0');

      break;

    }

    bcd_ok = convert_bcd_to_dec(id_code, &id_code);

    item = proto_tree_add_uint_format_value(tree, hf_E164_identification_code, tvb, (cc_offset + 1), 2,

            id_code, "%d %s", id_code, val_to_str_ext_const(id_code, &E164_International_Networks_882_vals_ext, "Unknown"));

    if (!bcd_ok) {

      expert_add_info(pinfo, item, &ei_E164_identification_code_non_decimal);

    }

    break;

  case 883:

    /* Get the 3-digit ID code */

    switch (encoding) {

    case E164_ENC_BINARY:

      id_code = tvb_get_ntohs(tvb, cc_offset + 1);

      id_code = id_code & 0x0fff;

      break;

    case E164_ENC_BCD:

      id_code  = (tvb_get_uint8(tvb, cc_offset + 1) & 0xf0) << 4;

      id_code |= (tvb_get_uint8(tvb, cc_offset + 2) & 0x0f) << 4;

      id_code |= (tvb_get_uint8(tvb, cc_offset + 2) & 0xf0) >> 4;

      break;

    case E164_ENC_UTF8:

      id_code  = (tvb_get_uint8(tvb, cc_offset+cc_length)   - '0') << 8;

      id_code |= (tvb_get_uint8(tvb, cc_offset+cc_length+1) - '0') << 4;

      id_code |= (tvb_get_uint8(tvb, cc_offset+cc_length+2) - '0');

      break;

    }

    if ((id_code & 0x0ff0) == 0x510) {

      /* Get the 4th digit of the ID code */

      switch (encoding) {

      case E164_ENC_BINARY:

        id_code = (id_code << 4) | ((tvb_get_uint8(tvb, cc_offset + 3) & 0xf0) >> 4);

        break;

      case E164_ENC_BCD:

        id_code = (id_code << 4) | (tvb_get_uint8(tvb, cc_offset + 3) & 0x0f);

        break;

      case E164_ENC_UTF8:

        id_code = (id_code << 4) | (tvb_get_uint8(tvb, cc_offset + cc_length + 3) - '0');

        break;

      }

      bcd_ok = convert_bcd_to_dec(id_code, &id_code);

      item = proto_tree_add_uint_format_value(tree, hf_E164_identification_code, tvb, (cc_offset + 1), 3,

          id_code, "%d %s", id_code, val_to_str_const(id_code, E164_International_Networks_883_vals, "Unknown"));

      if (!bcd_ok) {

        expert_add_info(pinfo, item, &ei_E164_identification_code_non_decimal);

      }

    } else {

      bcd_ok = convert_bcd_to_dec(id_code, &id_code);

      item = proto_tree_add_uint_format_value(tree, hf_E164_identification_code, tvb, (cc_offset + 1), 2,

          id_code, "%d %s", id_code, val_to_str_const(id_code, E164_International_Networks_883_vals, "Unknown"));

      if (!bcd_ok) {

        expert_add_info(pinfo, item, &ei_E164_identification_code_non_decimal);

      }

    }

    break;

  default:

    break;

  }

}

static const char *

dissect_e164(tvbuff_t *tvb, packet_info* pinfo, proto_tree *tree, int offset, int length, e164_encoding_t encoding, int name_type)

{

  proto_item *pi;

  proto_tree *subtree;

  unsigned    str_encoding;

  char       *number_str;

  switch (encoding) {

  case E164_ENC_UTF8:

    str_encoding = ENC_UTF_8;

    break;

  case E164_ENC_BCD:

    str_encoding = ENC_BCD_DIGITS_0_9|ENC_LITTLE_ENDIAN;

    break;

  case E164_ENC_BINARY:

  default:

    DISSECTOR_ASSERT_NOT_REACHED();

  }

  pi = proto_tree_add_item_ret_display_string(tree, name_type, tvb, offset, length, str_encoding, pinfo->pool, &number_str);

  subtree = proto_item_add_subtree(pi, ett_e164_msisdn);

  dissect_e164_cc(tvb, pinfo, subtree, offset, encoding);

  return number_str;

}

const char *

dissect_e164_msisdn(tvbuff_t *tvb, packet_info* pinfo, proto_tree *tree, int offset, int length, e164_encoding_t encoding)

{

  return dissect_e164(tvb, pinfo, tree, offset, length, encoding, hf_E164_msisdn);

}

const char *

dissect_e164_isdn(tvbuff_t *tvb, packet_info* pinfo, proto_tree *tree, int offset, int length, e164_encoding_t encoding)

{

  return dissect_e164(tvb, pinfo, tree, offset, length, encoding, hf_E164_isdn);

}

/*

 * Register the protocol with Wireshark.

 */

void

proto_register_e164(void)

{

  /* Setup list of header fields  See Section 1.6.1 for details */

  static hf_register_info hf[] = {

    { &hf_E164_calling_party_number,

      { "E.164 Calling party number digits", "e164.calling_party_number.digits",

      FT_STRING, BASE_NONE, NULL, 0x0,

      NULL, HFILL }},

    { &hf_E164_called_party_number,

      { "E.164 Called party number digits", "e164.called_party_number.digits",

      FT_STRING, BASE_NONE, NULL, 0x0,

      NULL, HFILL }},

    { &hf_E164_msisdn,

      { "E.164 number (MSISDN)", "e164.msisdn",

      FT_STRING, BASE_NONE, NULL, 0x0,

      NULL, HFILL }},

    { &hf_E164_isdn,

      { "E.164 number (ISDN)", "e164.isdn",

      FT_STRING, BASE_NONE, NULL, 0x0,

      NULL, HFILL }},

    { &hf_E164_identification_code,

      { "Identification Code", "e164.identification_code",

      FT_UINT32, BASE_DEC, NULL, 0x0,

      NULL, HFILL }},

    { &hf_E164_country_code,

      { "Country Code", "e164.country_code",

      FT_UINT16, BASE_DEC|BASE_EXT_STRING, &E164_country_code_value_ext, 0x0,

      NULL, HFILL }},

  };

  static int *ett_e164_array[] = {

      &ett_e164_msisdn,

  };

  static ei_register_info ei[] = {

  { &ei_E164_country_code_non_decimal, { "e164.country_code.non_decimal", PI_MALFORMED, PI_WARN, "Country Code contains non-decimal digits", EXPFILL }},

  { &ei_E164_identification_code_non_decimal, { "e164.identification_code.non_decimal", PI_MALFORMED, PI_WARN, "Identification Code contains non-decimal digits", EXPFILL }},

  };

  expert_module_t* expert_e164;

  proto_e164 = proto_register_protocol("ITU-T E.164 number", "E.164", "e164");

  proto_register_field_array(proto_e164, hf, array_length(hf));

  proto_register_subtree_array(ett_e164_array, array_length(ett_e164_array));

  expert_e164 = expert_register_protocol(proto_e164);

  expert_register_field_array(expert_e164, ei, array_length(ei));

}

/*

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

 *

 * Local variables:

 * c-basic-offset: 8

 * tab-width: 8

 * indent-tabs-mode: t

 * End:

 *

 * vi: set shiftwidth=8 tabstop=8 noexpandtab:

 * :indentSize=8:tabSize=8:noTabs=false:

 */