/* packet-gsm_a_common.c

 * Common routines for GSM A Interface dissection

 *

 * Copyright 2003, Michael Lum <mlum [AT] telostech.com>

 * In association with Telos Technology Inc.

 *

 * Split from packet-gsm_a.c by Neil Piercy <Neil [AT] littlebriars.co.uk>

 *

 * 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 <math.h>

#include <epan/packet.h>

#include <epan/expert.h>

#include <epan/tap.h>

#include <epan/stat_tap_ui.h>

#include <epan/tfs.h>

#include <epan/unit_strings.h>

#include <wsutil/str_util.h>

#include <wsutil/array.h>

#include "packet-gsm_a_common.h"

#include "packet-bssap.h"

#include "packet-gmr1_common.h"

#include "packet-e212.h"

void proto_register_gsm_a_common(void);

static const value_string gsm_common_elem_strings[] = {

    /* Common Information Elements 10.5.1 */

    { DE_CELL_ID, "Cell Identity" },

    { DE_CIPH_KEY_SEQ_NUM, "Ciphering Key Sequence Number" },

    { DE_LAI, "Location Area Identification (LAI)" },

    { DE_MID, "Mobile Identity" },

    { DE_MS_CM_1, "Mobile Station Classmark 1" },

    { DE_MS_CM_2, "Mobile Station Classmark 2" },

    { DE_MS_CM_3, "Mobile Station Classmark 3" },

    { DE_SPARE_NIBBLE, "Spare Half Octet" },

    { DE_D_GB_CALL_REF, "Descriptive group or broadcast call reference" },

    { DE_G_CIPH_KEY_NUM, "Group Cipher Key Number" },

    { DE_PD_SAPI, "PD and SAPI $(CCBS)$" },

    { DE_PRIO, "Priority Level" },

    { DE_CN_COMMON_GSM_MAP_NAS_SYS_INFO, "CN Common GSM-MAP NAS system information" },

    { DE_CS_DOMAIN_SPEC_SYS_INFO, "CS domain specific system information" },

    { DE_PS_DOMAIN_SPEC_SYS_INFO, "PS domain specific system information" },

    { DE_PLMN_LIST, "PLMN List" },

    { DE_NAS_CONT_FOR_PS_HO, "NAS container for PS HO" },

    { DE_MS_NET_FEAT_SUP, "MS network feature support" },

    { 0, NULL }

};

value_string_ext gsm_common_elem_strings_ext = VALUE_STRING_EXT_INIT(gsm_common_elem_strings);

static const value_string gsm_a_skip_ind_vals[] = {

    { 0, "No indication of selected PLMN"},

    { 1, "PLMN identity of the Common PLMN in the broadcast system information"},

    { 2, "PLMN identity of the first Additional PLMN in the broadcast system information"},

    { 3, "PLMN identity of the second Additional PLMN in the broadcast system information"},

    { 4, "PLMN identity of the third Additional PLMN in the broadcast system information"},

    { 5, "PLMN identity of the fourth Additional PLMN in the broadcast system information"},

    { 6, "Reserved"},

    { 7, "Reserved"},

    { 0, NULL }

};

static const true_false_string gsm_a_extension_value = {

    "No Extension",

    "Extended"

};

/* Mobile Station Classmark Value strings

 */

/* Mobile Station Classmark

 * Revision level

 */

static const value_string gsm_a_msc_rev_vals[] = {

    { 0, "Reserved for GSM phase 1"},

    { 1, "Used by GSM phase 2 mobile stations"},

    { 2, "Used by mobile stations supporting R99 or later versions of the protocol"},

    { 3, "Reserved for future use"},

    { 0, NULL }

};

/* ES IND (octet 3, bit 5) "Controlled Early Classmark Sending" option implementation */

static const true_false_string ES_IND_vals = {

    "Controlled Early Classmark Sending option is implemented in the MS",

    "Controlled Early Classmark Sending option is not implemented in the MS"

};

/* A5/1 algorithm supported (octet 3, bit 4) */

static const true_false_string A5_1_algorithm_sup_vals = {

    "encryption algorithm A5/1 not available",

    "encryption algorithm A5/1 available"

};

/* RF Power Capability (Octet 3) */

static const value_string RF_power_capability_vals[] = {

    { 0, "class 1"},

    { 1, "class 2"},

    { 2, "class 3"},

    { 3, "class 4"},

    { 4, "class 5"},

    { 7, "RF Power capability is irrelevant in this information element"},

    { 0, NULL }

};

/* PS capability (pseudo-synchronization capability) (octet 4) */

static const true_false_string ps_sup_cap_vals = {

    "PS capability present",

    "PS capability not present"

};

/* SS Screening Indicator (octet 4)defined in 3GPP TS 24.080 */

static const value_string SS_screening_indicator_vals[] = {

    { 0, "Default value of phase 1"},

    { 1, "Capability of handling of ellipsis notation and phase 2 error handling "},

    { 2, "For future use"},

    { 3, "For future use"},

    { 0, NULL }

};

/* SM capability (MT SMS pt to pt capability) (octet 4)*/

static const true_false_string SM_capability_vals = {

    "Mobile station supports mobile terminated point to point SMS",

    "Mobile station does not support mobile terminated point to point SMS"

};

/* VBS notification reception (octet 4) */

static const true_false_string VBS_notification_rec_vals = {

    "VBS capability and notifications wanted",

    "no VBS capability or no notifications wanted"

};

/* VGCS notification reception (octet 4) */

static const true_false_string VGCS_notification_rec_vals = {

    "VGCS capability and notifications wanted",

    "no VGCS capability or no notifications wanted"

};

/* FC Frequency Capability (octet 4 ) */

static const true_false_string FC_frequency_cap_vals = {

    "The MS does support the E-GSM or R-GSM",

    "The MS does not support the E-GSM or R-GSM band"

};

/* CM3 (octet 5, bit 8) */

static const true_false_string CM3_vals = {

    "The MS supports options that are indicated in classmark 3 IE",

    "The MS does not support any options that are indicated in CM3"

};

/* LCS VA capability (LCS value added location request notification capability) (octet 5,bit 6) */

static const true_false_string LCS_VA_cap_vals = {

    "LCS value added location request notification capability supported",

    "LCS value added location request notification capability not supported"

};

/* UCS2 treatment (octet 5, bit 5) */

static const true_false_string UCS2_treatment_vals = {

    "the ME has no preference between the use of the default alphabet and the use of UCS2",

    "the ME has a preference for the default alphabet"

};

/* SoLSA (octet 5, bit 4) */

static const true_false_string SoLSA_vals = {

    "The ME supports SoLSA",

    "The ME does not support SoLSA"

};

/* CMSP: CM Service Prompt (octet 5, bit 3) */

static const true_false_string CMSP_vals = {

    "Network initiated MO CM connection request supported for at least one CM protocol",

    "Network initiated MO CM connection request not supported"

};

/* A5/7 algorithm supported */

static const true_false_string A5_7_algorithm_sup_vals = {

    "encryption algorithm A5/7 available",

    "encryption algorithm A5/7 not available"

};

/* A5/6 algorithm supported */

static const true_false_string A5_6_algorithm_sup_vals = {

    "encryption algorithm A5/6 available",

    "encryption algorithm A5/6 not available"

};

/* A5/5 algorithm supported */

static const true_false_string A5_5_algorithm_sup_vals = {

    "encryption algorithm A5/5 available",

    "encryption algorithm A5/5 not available"

};

/* A5/4 algorithm supported */

static const true_false_string A5_4_algorithm_sup_vals = {

    "encryption algorithm A5/4 available",

    "encryption algorithm A5/4 not available"

};

/* A5/3 algorithm supported (octet 5, bit 2) */

static const true_false_string A5_3_algorithm_sup_vals = {

    "encryption algorithm A5/3 available",

    "encryption algorithm A5/3 not available"

};

/* A5/2 algorithm supported (octet 5, bit 1) */

static const true_false_string A5_2_algorithm_sup_vals = {

    "encryption algorithm A5/2 available",

    "encryption algorithm A5/2 not available"

};

static const value_string mobile_identity_type_vals[] = {

    { 0, "No Identity"},

    { 1, "IMSI"},

    { 2, "IMEI"},

    { 3, "IMEISV"},

    { 4, "TMSI/P-TMSI/M-TMSI"},

    { 5, "TMGI and optional MBMS Session Identity"}, /* ETSI TS 124 008 V6.8.0 (2005-03) p326 */

    { 0, NULL }

};

static const true_false_string oddevenind_vals = {

    "Odd number of identity digits",

    "Even number of identity digits"

};

const value_string gsm_a_sms_vals[] = {

    {  0, "1/4 timeslot (~144 microseconds)" },

    {  1, "2/4 timeslot (~288 microseconds)" },

    {  2, "3/4 timeslot (~433 microseconds)" },

    {  3, "4/4 timeslot (~577 microseconds)" },

    {  4, "5/4 timeslot (~721 microseconds)" },

    {  5, "6/4 timeslot (~865 microseconds)" },

    {  6, "7/4 timeslot (~1009 microseconds)" },

    {  7, "8/4 timeslot (~1154 microseconds)" },

    {  8, "9/4 timeslot (~1298 microseconds)" },

    {  9, "10/4 timeslot (~1442 microseconds)" },

    { 10, "11/4 timeslot (~1586 microseconds)" },

    { 11, "12/4 timeslot (~1730 microseconds)" },

    { 12, "13/4 timeslot (~1874 microseconds)" },

    { 13, "14/4 timeslot (~2019 microseconds)" },

    { 14, "15/4 timeslot (~2163 microseconds)" },

    { 15, "16/4 timeslot (~2307 microseconds)" },

    {  0, NULL}

};

static const true_false_string ms_assisted_e_otd_vals = {

    "MS assisted E-OTD supported",

    "MS assisted E-OTD not supported"

};

static const true_false_string ms_based_e_otd_vals = {

    "MS based E-OTD supported",

    "MS based E-OTD not supported"

};

static const true_false_string ms_assisted_gps_vals = {

    "MS assisted GPS supported",

    "MS assisted GPS not supported"

};

static const true_false_string ms_based_gps_vals = {

    "MS based GPS supported",

    "MS based GPS not supported"

};

static const true_false_string ms_conventional_gps_vals = {

    "Conventional GPS supported",

    "Conventional GPS not supported"

};

static const true_false_string modulation_capability_vals = {

    "8-PSK supported for uplink transmission and downlink reception",

    "8-PSK supported for downlink reception only"

};

static const value_string eight_psk_rf_power_capability_vals[] = {

    { 0, "Reserved" },

    { 1, "Power class E1" },

    { 2, "Power class E2" },

    { 3, "Power class E3" },

    { 0, NULL}

};

static const value_string gsm_400_bands_supported_vals[] = {

    { 1, "GSM 480 supported, GSM 450 not supported" },

    { 2, "GSM 450 supported, GSM 480 not supported" },

    { 3, "GSM 450 supported, GSM 480 supported" },

    { 0, NULL}

};

static const true_false_string umts_fdd_rat_cap_vals = {

    "UMTS FDD supported",

    "UMTS FDD not supported"

};

static const true_false_string umts_384_mcps_tdd_rat_cap_vals = {

    "UMTS 3.84 Mcps TDD supported",

    "UMTS 3.84 Mcps TDD not supported"

};

static const true_false_string cdma_2000_rat_cap_vals = {

    "CDMA 2000 supported",

    "CDMA 2000 not supported"

};

static const value_string dtm_gprs_multi_slot_class_vals[] = {

    { 0, "Unused. If received, the network shall interpret this as 1" },

    { 1, "Multislot class 5 supported" },

    { 2, "Multislot class 9 supported" },

    { 3, "Multislot class 11 supported" },

    { 0, NULL}

};

static const true_false_string single_slot_dtm_vals = {

    "Single Slot DTM supported",

    "Single Slot DTM not supported"

};

static const value_string gsm_band_vals[] = {

    { 0, "E-GSM is supported" },

    { 1, "P-GSM is supported" },

    { 2, "GSM 1800 is supported" },

    { 3, "GSM 450 is supported" },

    { 4, "GSM 480 is supported" },

    { 5, "GSM 850 is supported" },

    { 6, "GSM 1900 is supported" },

    { 7, "GSM 750 is supported" },

    { 8, "GSM 710 is supported" },

    { 9, "T-GSM 810 is supported" },

    { 0, NULL}

};

static const true_false_string umts_128_mcps_tdd_rat_cap_vals = {

    "UMTS 1.28 Mcps TDD supported",

    "UMTS 1.28 Mcps TDD not supported"

};

static const true_false_string geran_feature_package_1_vals = {

    "GERAN feature package 1 supported",

    "GERAN feature package 1 not supported"

};

static const true_false_string flo_iu_cap_vals = {

    "FLO in GERAN Iu Mode supported",

    "FLO in GERAN Iu Mode not supported"

};

static const true_false_string geran_feature_package_2_vals = {

    "GERAN feature package 2 supported",

    "GERAN feature package 2 not supported"

};

static const value_string gmsk_multislot_power_prof_vals[] = {

    { 0, "GMSK_MULTISLOT_POWER_PROFILE 0" },

    { 1, "GMSK_MULTISLOT_POWER_PROFILE 1" },

    { 2, "GMSK_MULTISLOT_POWER_PROFILE 2" },

    { 3, "GMSK_MULTISLOT_POWER_PROFILE 3" },

    { 0, NULL}

};

static const value_string eight_psk_multislot_power_prof_vals[] = {

    { 0, "8-PSK_MULTISLOT_POWER_PROFILE 0" },

    { 1, "8-PSK_MULTISLOT_POWER_PROFILE 1" },

    { 2, "8-PSK_MULTISLOT_POWER_PROFILE 2" },

    { 3, "8-PSK_MULTISLOT_POWER_PROFILE 3" },

    { 0, NULL}

};

static const value_string t_gsm_400_bands_supported_vals[] = {

    { 1, "T-GSM 380 supported, T-GSM 410 not supported" },

    { 2, "T-GSM 410 supported, T-GSM 380 not supported" },

    { 3, "T-GSM 410 supported, T-GSM 380 supported" },

    { 0, NULL}

};

static const value_string downlink_adv_receiver_perf_vals[] = {

    { 0, "Downlink Advanced Receiver Performance not supported" },

    { 1, "Downlink Advanced Receiver Performance - phase I supported" },

    { 2, "Downlink Advanced Receiver Performance - phase II supported" },

    { 0, NULL}

};

static const true_false_string dtm_enhancements_cap_vals = {

    "The mobile station supports enhanced DTM CS establishment and release procedures",

    "The mobile station does not support enhanced DTM CS establishment and release procedures"

};

static const true_false_string offset_required_vals = {

    "The mobile station requires the offset",

    "The mobile station does not require the offset"

};

static const value_string dtm_gprs_high_multi_slot_class_vals[] = {

    { 0, "Unused. If received, the network shall interpret this as \"0 0 1\"" },

    { 1, "Multislot class 31 or 36 supported" },

    { 2, "Multislot class 32 or 37 supported" },

    { 3, "Multislot class 33 or 38 supported" },

    { 4, "Multislot class 41 supported" },

    { 5, "Multislot class 42 supported" },

    { 6, "Multislot class 43 supported" },

    { 7, "Multislot class 44 supported" },

    { 0, NULL}

};

static const true_false_string repeated_acch_cap_vals = {

    "The mobile station supports Repeated SACCH and Repeated Downlink FACCH",

    "The mobile station does not support Repeated SACCH"

};

static const true_false_string ciphering_mode_setting_cap_vals = {

    "The mobile station supports the Ciphering Mode Setting IE in the DTM ASSIGNMENT COMMAND message",

    "The mobile station does not support the Ciphering Mode Setting IE in the DTM ASSIGNMENT COMMAND message"

};

static const true_false_string additional_positioning_caps_vals = {

    "The mobile station supports additional positioning capabilities which can be retrieved using RRLP",

    "The mobile station does not support additional positioning capabilities which can be retrieved using RRLP"

};

static const true_false_string e_utra_fdd_support_vals = {

    "E-UTRA FDD supported",

    "E-UTRA FDD not supported"

};

static const true_false_string e_utra_tdd_support_vals = {

    "E-UTRA TDD supported",

    "E-UTRA TDD not supported"

};

static const true_false_string e_utra_meas_and_report_support_vals = {

    "E-UTRAN Neighbour Cell measurements and measurement reporting while having an RR connection supported",

    "E-UTRAN Neighbour Cell measurements and measurement reporting while having an RR connection not supported"

};

static const true_false_string prio_based_resel_support_vals = {

    "Priority-based cell reselection supported",

    "Priority-based cell reselection not supported"

};

static const true_false_string utra_csg_cells_reporting_vals = {

    "Reporting of UTRAN CSG cells supported",

    "Reporting of UTRAN CSG cells not supported"

};

static const value_string vamos_level_vals[] = {

    { 0, "VAMOS not supported" },

    { 1, "VAMOS I supported" },

    { 2, "VAMOS II supported" },

    { 3, "VAMOS III supported" },

    { 0, NULL}

};

const value_string tighter_cap_level_vals[] = {

    { 0, "TIGHTER not supported" },

    { 1, "TIGHTER supported for speech and signalling channels only" },

    { 2, "TIGHTER supported for speech and signalling channels and for GPRS and EGPRS, but not for EGPRS2" },

    { 3, "TIGHTER supported for speech and signalling channels and for GPRS, EGPRS and EGPRS2" },

    { 0, NULL}

};

static const value_string cs_to_ps_srvcc_geran_to_utra_vals[] = {

    { 0, "CS to PS SRVCC from GERAN to UMTS FDD and 1.28 Mcps TDD not supported" },

    { 1, "CS to PS SRVCC from GERAN to UMTS FDD supported" },

    { 2, "CS to PS SRVCC from GERAN to UMTS 1.28 Mcps TDD supported" },

    { 3, "CS to PS SRVCC from GERAN to UMTS FDD and 1.28 Mcps TDD supported" },

    { 0, NULL}

};

static const value_string cs_to_ps_srvcc_geran_to_eutra_vals[] = {

    { 0, "CS to PS SRVCC from GERAN to E-UTRA FDD and TDD not supported" },

    { 1, "CS to PS SRVCC from GERAN to E-UTRA FDD supported" },

    { 2, "CS to PS SRVCC from GERAN to E-UTRA TDD supported" },

    { 3, "CS to PS SRVCC from GERAN to E-UTRA FDD and TDD supported" },

    { 0, NULL}

};

static const value_string gsm_a_rr_rxlev_vals [] = {

    {  0, "< -110 dBm"},

    {  1, "-110 <= x < -109 dBm"},

    {  2, "-109 <= x < -108 dBm"},

    {  3, "-108 <= x < -107 dBm"},

    {  4, "-107 <= x < -106 dBm"},

    {  5, "-106 <= x < -105 dBm"},

    {  6, "-105 <= x < -104 dBm"},

    {  7, "-104 <= x < -103 dBm"},

    {  8, "-103 <= x < -102 dBm"},

    {  9, "-102 <= x < -101 dBm"},

    { 10, "-101 <= x < -100 dBm"},

    { 11, "-100 <= x < -99 dBm"},

    { 12, "-99 <= x < -98 dBm"},

    { 13, "-98 <= x < -97 dBm"},

    { 14, "-97 <= x < -96 dBm"},

    { 15, "-96 <= x < -95 dBm"},

    { 16, "-95 <= x < -94 dBm"},

    { 17, "-94 <= x < -93 dBm"},

    { 18, "-93 <= x < -92 dBm"},

    { 19, "-92 <= x < -91 dBm"},

    { 20, "-91 <= x < -90 dBm"},

    { 21, "-90 <= x < -89 dBm"},

    { 22, "-89 <= x < -88 dBm"},

    { 23, "-88 <= x < -87 dBm"},

    { 24, "-87 <= x < -86 dBm"},

    { 25, "-86 <= x < -85 dBm"},

    { 26, "-85 <= x < -84 dBm"},

    { 27, "-84 <= x < -83 dBm"},

    { 28, "-83 <= x < -82 dBm"},

    { 29, "-82 <= x < -81 dBm"},

    { 30, "-81 <= x < -80 dBm"},

    { 31, "-80 <= x < -79 dBm"},

    { 32, "-79 <= x < -78 dBm"},

    { 33, "-78 <= x < -77 dBm"},

    { 34, "-77 <= x < -76 dBm"},

    { 35, "-76 <= x < -75 dBm"},

    { 36, "-75 <= x < -74 dBm"},

    { 37, "-74 <= x < -73 dBm"},

    { 38, "-73 <= x < -72 dBm"},

    { 39, "-72 <= x < -71 dBm"},

    { 40, "-71 <= x < -70 dBm"},

    { 41, "-70 <= x < -69 dBm"},

    { 42, "-69 <= x < -68 dBm"},

    { 43, "-68 <= x < -67 dBm"},

    { 44, "-67 <= x < -66 dBm"},

    { 45, "-66 <= x < -65 dBm"},

    { 46, "-65 <= x < -64 dBm"},

    { 47, "-64 <= x < -63 dBm"},

    { 48, "-63 <= x < -62 dBm"},

    { 49, "-62 <= x < -61 dBm"},

    { 50, "-61 <= x < -60 dBm"},

    { 51, "-60 <= x < -59 dBm"},

    { 52, "-59 <= x < -58 dBm"},

    { 53, "-58 <= x < -57 dBm"},

    { 54, "-57 <= x < -56 dBm"},

    { 55, "-56 <= x < -55 dBm"},

    { 56, "-55 <= x < -54 dBm"},

    { 57, "-54 <= x < -53 dBm"},

    { 58, "-53 <= x < -52 dBm"},

    { 59, "-52 <= x < -51 dBm"},

    { 60, "-51 <= x < -50 dBm"},

    { 61, "-50 <= x < -49 dBm"},

    { 62, "-49 <= x < -48 dBm"},

    { 63, ">= -48 dBm"},

    { 0, NULL}

};

value_string_ext gsm_a_rr_rxlev_vals_ext = VALUE_STRING_EXT_INIT(gsm_a_rr_rxlev_vals);

const value_string gsm_a_rr_rxqual_vals[] = {

    {0, "BER < 0.2%, Mean value 0.14%"},

    {1, "0.2% <= BER < 0.4%, Mean value 0.28%"},

    {2, "0.4% <= BER < 0.8%, Mean value 0.57%"},

    {3, "0.8% <= BER < 1.6%, Mean value 1.13%"},

    {4, "1.6% <= BER < 3.2%, Mean value 2.26%"},

    {5, "3.2% <= BER < 6.4%, Mean value 4.53%"},

    {6, "6.4% <= BER < 12.8%, Mean value 9.05%"},

    {7, "BER > 12.8%, Mean value 18.10%"},

    {0, NULL}

};

/* Initialize the protocol and registered fields */

static int proto_a_common;

static int proto_3gpp;

int gsm_a_tap;

int hf_gsm_a_common_elem_id;

static int hf_gsm_a_common_elem_id_f0;

static int hf_gsm_a_l_ext;

int hf_gsm_a_tmsi;

static int hf_gsm_a_imei;

static int hf_gsm_a_imeisv;

static int hf_gsm_a_MSC_rev;

static int hf_gsm_a_ES_IND;

static int hf_gsm_a_A5_1_algorithm_sup;

static int hf_gsm_a_RF_power_capability;

static int hf_gsm_a_ps_sup_cap;

static int hf_gsm_a_SS_screening_indicator;

static int hf_gsm_a_SM_capability;

static int hf_gsm_a_VBS_notification_rec;

static int hf_gsm_a_VGCS_notification_rec;

static int hf_gsm_a_FC_frequency_cap;

static int hf_gsm_a_CM3;

static int hf_gsm_a_LCS_VA_cap;

static int hf_gsm_a_UCS2_treatment;

static int hf_gsm_a_SoLSA;

static int hf_gsm_a_CMSP;

static int hf_gsm_a_A5_7_algorithm_sup;

static int hf_gsm_a_A5_6_algorithm_sup;

static int hf_gsm_a_A5_5_algorithm_sup;

static int hf_gsm_a_A5_4_algorithm_sup;

static int hf_gsm_a_A5_3_algorithm_sup;

static int hf_gsm_a_A5_2_algorithm_sup;

static int hf_gsm_a_odd_even_ind;

static int hf_gsm_a_id_dig_1;

static int hf_gsm_a_unused;

static int hf_gsm_a_mobile_identity_type;

static int hf_gsm_a_tmgi_mcc_mnc_ind;

static int hf_gsm_a_mbs_ses_id_ind;

static int hf_gsm_a_mbs_service_id;

static int hf_gsm_a_mbs_session_id;

static int hf_gsm_a_length;

static int hf_gsm_a_element_value;

int hf_gsm_a_extension;

int hf_gsm_a_L3_protocol_discriminator;

int hf_gsm_a_call_prio;

int hf_gsm_a_skip_ind;

int hf_gsm_a_spare_bits;

int hf_gsm_a_lac;

static int hf_gsm_a_spare_nibble;

static int hf_gsm_a_type_of_ciph_alg;

static int hf_gsm_a_att;

static int hf_gsm_a_nmo_1;

static int hf_gsm_a_nmo;

static int hf_gsm_a_old_xid;

static int hf_gsm_a_iov_ui;

static int hf_gsm_a_ext_periodic_timers;

static int hf_gsm_a_b7spare;

int hf_gsm_a_b8spare;

static int hf_gsm_a_multi_bnd_sup_fields;

static int hf_gsm_a_pgsm_supported;

static int hf_gsm_a_egsm_supported;

static int hf_gsm_a_gsm1800_supported;

static int hf_gsm_a_ass_radio_cap1;

static int hf_gsm_a_ass_radio_cap2;

static int hf_gsm_a_rsupport;

static int hf_gsm_a_r_capabilities;

static int hf_gsm_a_multislot_capabilities;

static int hf_gsm_a_multislot_class;

static int hf_gsm_a_ucs2_treatment;

static int hf_gsm_a_extended_measurement_cap;

static int hf_gsm_a_ms_measurement_capability;

static int hf_gsm_a_sms_value;

static int hf_gsm_a_sm_value;

static int hf_gsm_a_key_seq;

static int hf_gsm_a_ms_pos_method_cap_present;

static int hf_gsm_a_ms_pos_method;

static int hf_gsm_a_ms_assisted_e_otd;

static int hf_gsm_a_ms_based_e_otd;

static int hf_gsm_a_ms_assisted_gps;

static int hf_gsm_a_ms_based_gps;

static int hf_gsm_a_ms_conventional_gps;

static int hf_gsm_a_ecsd_multi_slot_capability;

static int hf_gsm_a_ecsd_multi_slot_class;

static int hf_gsm_a_8_psk_struct_present;

static int hf_gsm_a_8_psk_struct;

static int hf_gsm_a_modulation_capability;

static int hf_gsm_a_8_psk_rf_power_capability_1_present;

static int hf_gsm_a_8_psk_rf_power_capability_1;

static int hf_gsm_a_8_psk_rf_power_capability_2_present;

static int hf_gsm_a_8_psk_rf_power_capability_2;

static int hf_gsm_a_gsm_400_band_info_present;

static int hf_gsm_a_gsm_400_bands_supported;

static int hf_gsm_a_gsm_400_assoc_radio_cap;

static int hf_gsm_a_gsm_850_assoc_radio_cap_present;

static int hf_gsm_a_gsm_850_assoc_radio_cap;

static int hf_gsm_a_gsm_1900_assoc_radio_cap_present;

static int hf_gsm_a_gsm_1900_assoc_radio_cap;

static int hf_gsm_a_cm3_A5_bits;

static int hf_gsm_a_umts_fdd_rat_cap;

static int hf_gsm_a_umts_384_mcps_tdd_rat_cap;

static int hf_gsm_a_cdma_2000_rat_cap;

static int hf_gsm_a_dtm_e_gprs_multi_slot_info_present;

static int hf_gsm_a_dtm_gprs_multi_slot_class;

static int hf_gsm_a_single_slot_dtm;

static int hf_gsm_a_dtm_egprs_multi_slot_class_present;

static int hf_gsm_a_dtm_egprs_multi_slot_class;

static int hf_gsm_a_single_band_support;

static int hf_gsm_a_gsm_band;

static int hf_gsm_a_gsm_750_assoc_radio_cap_present;

static int hf_gsm_a_gsm_750_assoc_radio_cap;

static int hf_gsm_a_umts_128_mcps_tdd_rat_cap;

static int hf_gsm_a_geran_feature_package_1;

static int hf_gsm_a_ext_dtm_e_gprs_multi_slot_info_present;

static int hf_gsm_a_ext_dtm_gprs_multi_slot_class;

static int hf_gsm_a_ext_dtm_egprs_multi_slot_class;

static int hf_gsm_a_high_multislot_cap_present;

static int hf_gsm_a_high_multislot_cap;

static int hf_gsm_a_geran_iu_mode_support;

static int hf_gsm_a_geran_iu_mode_cap;

static int hf_gsm_a_geran_iu_mode_cap_length;

static int hf_gsm_a_flo_iu_cap;

static int hf_gsm_a_geran_feature_package_2;

static int hf_gsm_a_gmsk_multislot_power_prof;

static int hf_gsm_a_8_psk_multislot_power_prof;

static int hf_gsm_a_t_gsm_400_band_info_present;

static int hf_gsm_a_t_gsm_400_bands_supported;

static int hf_gsm_a_t_gsm_400_assoc_radio_cap;

static int hf_gsm_a_t_gsm_900_assoc_radio_cap_present;

static int hf_gsm_a_t_gsm_900_assoc_radio_cap;

static int hf_gsm_a_downlink_adv_receiver_perf;

static int hf_gsm_a_dtm_enhancements_cap;

static int hf_gsm_a_dtm_e_gprs_high_multi_slot_info_present;

static int hf_gsm_a_dtm_gprs_high_multi_slot_class;

static int hf_gsm_a_offset_required;

static int hf_gsm_a_dtm_egprs_high_multi_slot_class_present;

static int hf_gsm_a_dtm_egprs_high_multi_slot_class;

static int hf_gsm_a_repeated_acch_cap;

static int hf_gsm_a_gsm_710_assoc_radio_cap_present;

static int hf_gsm_a_gsm_710_assoc_radio_cap;

static int hf_gsm_a_t_gsm_810_assoc_radio_cap_present;

static int hf_gsm_a_t_gsm_810_assoc_radio_cap;

static int hf_gsm_a_ciphering_mode_setting_cap;

static int hf_gsm_a_additional_positioning_caps;

static int hf_gsm_a_e_utra_fdd_support;

static int hf_gsm_a_e_utra_tdd_support;

static int hf_gsm_a_e_utra_meas_and_report_support;

static int hf_gsm_a_prio_based_resel_support;

static int hf_gsm_a_utra_csg_cells_reporting;

static int hf_gsm_a_vamos_level;

static int hf_gsm_a_tighter_cap;

static int hf_gsm_a_selective_ciph_down_sacch;

static int hf_gsm_a_cs_to_ps_srvcc_geran_to_utra;

static int hf_gsm_a_cs_to_ps_srvcc_geran_to_eutra;

static int hf_gsm_a_geran_network_sharing_support;

static int hf_gsm_a_eutra_wb_rsrq_support;

static int hf_gsm_a_er_band_support;

static int hf_gsm_a_utra_mfbi_support;

static int hf_gsm_a_eutra_mfbi_support;

static int hf_gsm_a_ext_tsc_set_cap_support;

static int hf_gsm_a_ext_earfcn_value_range;

static int hf_gsm_a_geo_loc_type_of_shape;

static int hf_gsm_a_geo_loc_sign_of_lat;

static int hf_gsm_a_geo_loc_deg_of_lat;

static int hf_gsm_a_geo_loc_deg_of_long;

static int hf_gsm_a_geo_loc_osm_uri;

static int hf_gsm_a_geo_loc_uncertainty_code;

static int hf_gsm_a_geo_loc_uncertainty_semi_major;

static int hf_gsm_a_geo_loc_uncertainty_semi_minor;

static int hf_gsm_a_geo_loc_orientation_of_major_axis;

static int hf_gsm_a_geo_loc_uncertainty_altitude;

static int hf_gsm_a_geo_loc_confidence;

static int hf_gsm_a_geo_loc_uncertainty_range;

static int hf_gsm_a_geo_loc_horizontal_confidence;

static int hf_gsm_a_geo_loc_horizontal_uncertainty_range;

static int hf_gsm_a_geo_loc_vertical_confidence;

static int hf_gsm_a_geo_loc_vertical_uncertainty_range;

static int hf_gsm_a_geo_loc_high_acc_uncertainty_alt;

static int hf_gsm_a_geo_loc_no_of_points;

static int hf_gsm_a_geo_loc_high_acc_deg_of_lat;

static int hf_gsm_a_geo_loc_high_acc_deg_of_long;

static int hf_gsm_a_geo_loc_high_acc_uncertainty_semi_major;

static int hf_gsm_a_geo_loc_high_acc_uncertainty_semi_minor;

static int hf_gsm_a_geo_loc_high_acc_alt;

static int hf_gsm_a_velocity_type;

static int hf_gsm_a_bearing;

static int hf_gsm_a_horizontal_speed;

static int hf_gsm_a_uncertainty_speed;

static int hf_gsm_a_h_uncertainty_speed;

static int hf_gsm_a_v_uncertainty_speed;

static int hf_gsm_a_vertical_speed;

static int hf_gsm_a_d;

static int hf_gsm_a_geo_loc_D;

static int hf_gsm_a_geo_loc_altitude;

static int hf_gsm_a_geo_loc_inner_radius;

static int hf_gsm_a_geo_loc_uncertainty_radius;

static int hf_gsm_a_geo_loc_offset_angle;

static int hf_gsm_a_geo_loc_included_angle;

/* Generated from convert_proto_tree_add_text.pl */

static int hf_gsm_a_filler;

static int hf_gsm_a_identity_digit1;

static int hf_gsm_a_group_call_reference;

static int hf_gsm_a_service_flag;

static int hf_gsm_a_af_acknowledgement;

static int hf_gsm_a_call_priority;

static int hf_gsm_a_ciphering_info;

static int hf_gsm_a_sapi;

/* Inter protocol hf */

int hf_3gpp_tmsi;

static int ett_gsm_a_plmn;

static int ett_gsm_a_poly_pnt;

static expert_field ei_gsm_a_extraneous_data;

static expert_field ei_gsm_a_unknown_element;

static expert_field ei_gsm_a_unknown_pdu_type;

static expert_field ei_gsm_a_no_element_dissector;

static expert_field ei_gsm_a_format_not_supported;

static expert_field ei_gsm_a_mobile_identity_type;

static expert_field ei_gsm_a_ie_length_too_short;

sccp_assoc_info_t* sccp_assoc;

#define NUM_GSM_COMMON_ELEM array_length(gsm_common_elem_strings)

int ett_gsm_common_elem[NUM_GSM_COMMON_ELEM];

#define  ELLIPSOID_POINT 0

#define  ELLIPSOID_POINT_WITH_UNCERT_CIRC 1

#define  ELLIPSOID_POINT_WITH_UNCERT_ELLIPSE 3

#define  POLYGON 5

#define  ELLIPSOID_POINT_WITH_ALT 8

#define  ELLIPSOID_POINT_WITH_ALT_AND_UNCERT_ELLIPSOID 9

#define  ELLIPSOID_ARC 10

#define  HIGH_ACC_ELLIPSOID_PNT_WITH_UNCERT_ELLIPSE 11

#define  HIGH_ACC_ELLIPSOID_PNT_WITH_ALT_AND_UNCERT_ELLIPSOID 12

#define  HIGH_ACC_ELLIPSOID_PNT_WITH_SCALABLE_UNCERT_ELLIPSE 13

#define  HIGH_ACC_ELLIPSOID_PNT_WITH_ALT_AND_SCALABLE_UNCERT_ELLIPSOID 14

/*

4 3 2 1

0 0 0 0 Ellipsoid Point

0 0 0 1 Ellipsoid point with uncertainty Circle

0 0 1 1 Ellipsoid point with uncertainty Ellipse

0 1 0 1 Polygon

1 0 0 0 Ellipsoid point with altitude

1 0 0 1 Ellipsoid point with altitude and uncertainty Ellipsoid

1 0 1 0 Ellipsoid Arc

1 0 1 1 High Accuracy Ellipsoid point with uncertainty ellipse

1 1 0 0 High Accuracy Ellipsoid point with altitude and uncertainty ellipsoid

1 1 0 1 High Accuracy Ellipsoid point with scalable uncertainty ellipse

1 1 1 0 High Accuracy Ellipsoid point with altitude and scalable uncertainty ellipsoid

other values reserved for future use

*/

/* TS 23 032 Table 2a: Coding of Type of Shape */

static const value_string type_of_shape_vals[] = {

    { ELLIPSOID_POINT,                                                  "Ellipsoid Point"},

    { ELLIPSOID_POINT_WITH_UNCERT_CIRC,                                 "Ellipsoid point with uncertainty Circle"},

    { ELLIPSOID_POINT_WITH_UNCERT_ELLIPSE,                              "Ellipsoid point with uncertainty Ellipse"},

    { POLYGON,                                                          "Polygon"},

    { ELLIPSOID_POINT_WITH_ALT,                                         "Ellipsoid point with altitude"},

    { ELLIPSOID_POINT_WITH_ALT_AND_UNCERT_ELLIPSOID,                    "Ellipsoid point with altitude and uncertainty Ellipsoid"},

    { ELLIPSOID_ARC,                                                    "Ellipsoid Arc"},

    { HIGH_ACC_ELLIPSOID_PNT_WITH_UNCERT_ELLIPSE,                       "High Accuracy Ellipsoid point with uncertainty ellipse"},

    { HIGH_ACC_ELLIPSOID_PNT_WITH_ALT_AND_UNCERT_ELLIPSOID,             "High Accuracy Ellipsoid point with altitude and uncertainty ellipsoid"},

    { HIGH_ACC_ELLIPSOID_PNT_WITH_SCALABLE_UNCERT_ELLIPSE,              "High Accuracy Ellipsoid point with scalable uncertainty ellipse"},

    { HIGH_ACC_ELLIPSOID_PNT_WITH_ALT_AND_SCALABLE_UNCERT_ELLIPSOID,    "High Accuracy Ellipsoid point with altitude and scalable uncertainty ellipsoid"},

    { 0,    NULL }

};

/* 3GPP TS 23.032 7.3.1 */

static const value_string sign_of_latitude_vals[] = {

    { 0,  "North"},

    { 1,  "South"},

    { 0,  NULL }

};

static const value_string dir_of_alt_vals[] = {

    { 0,  "Altitude expresses height"},

    { 1,  "Altitude expresses depth"},

    { 0,  NULL }

};

static const value_string uncertainty_range[] = {

    { 0,  "High Accuracy default uncertainty range used"},

    { 1,  "High Accuracy Extended Uncertainty Range used"},

    { 0,  NULL }

};

typedef uint16_t (* const * elem_func_hander)(tvbuff_t *tvb, proto_tree *tree, packet_info *pinfo, uint32_t offset, unsigned len, char *add_string, int string_len);

int

dissect_geographical_description(tvbuff_t *tvb, packet_info *pinfo _U_, proto_tree *tree) {

    proto_item *lat_item, *long_item, *major_item, *minor_item, *orientation_item, *alt_item, *uncer_item, *loc_uri_item;

    /*proto_tree *subtree; */

    uint32_t     type_of_shape;

    int         offset = 0;

    int         length;

    uint32_t    uvalue32;

    int32_t     svalue32;

    char        *deg_lat_str;

    char        *deg_lon_str;

    char        *osm_uri;

    int         loc_offset;

    /*subtree = proto_item_add_subtree(item, ett_gsm_a_geo_desc);*/

    length = tvb_reported_length_remaining(tvb, 0);

    /* Geographical Location

     * The Location Estimate field is composed of 1 or more octets with an internal structure

     * according to section 7 in [23.032].

     */

    proto_tree_add_item_ret_uint(tree, hf_gsm_a_geo_loc_type_of_shape, tvb, 0, 1, ENC_BIG_ENDIAN, &type_of_shape);

    offset++;

    if (length < 2) {

        return length;

    }

    switch (type_of_shape) {

    case ELLIPSOID_POINT:

        /* Ellipsoid Point */

    case ELLIPSOID_POINT_WITH_UNCERT_CIRC:

        /* Ellipsoid Point with uncertainty Circle */

    case ELLIPSOID_POINT_WITH_UNCERT_ELLIPSE:

        /* Ellipsoid Point with uncertainty Ellipse */

    case ELLIPSOID_POINT_WITH_ALT:

        /* Ellipsoid Point with Altitude */

    case ELLIPSOID_POINT_WITH_ALT_AND_UNCERT_ELLIPSOID:

        /* Ellipsoid Point with altitude and uncertainty ellipsoid */

    case ELLIPSOID_ARC:

        /* Ellipsoid Arc */

        if (length < 4)

            return length;

        proto_tree_add_item(tree, hf_gsm_a_geo_loc_sign_of_lat, tvb, offset, 1, ENC_BIG_ENDIAN);

        /* convert degrees (X/0x7fffff) * 90 = degrees */

        lat_item = proto_tree_add_item_ret_uint(tree, hf_gsm_a_geo_loc_deg_of_lat, tvb, offset, 3, ENC_BIG_ENDIAN, &uvalue32);

        deg_lat_str = wmem_strdup_printf(pinfo->pool, "%s%.5f",

            (uvalue32 & 0x00800000) ? "-" : "",

            ((double)(uvalue32 & 0x7fffff)/8388607.0) * 90);

        proto_item_append_text(lat_item, " (%s degrees)", deg_lat_str);

        loc_offset = offset;

        offset = offset + 3;

        if (length < 7)

            return offset;

        long_item = proto_tree_add_item_ret_int(tree, hf_gsm_a_geo_loc_deg_of_long, tvb, offset, 3, ENC_BIG_ENDIAN, &svalue32);

        svalue32 |= (svalue32 & 0x800000) ? 0xff000000 : 0x00000000;

        /* (X/0xffffff) *360 = degrees */

        deg_lon_str = wmem_strdup_printf(pinfo->pool, "%.5f",

            ((double)svalue32/16777215.0) * 360);

        proto_item_append_text(long_item, " (%s degrees)", deg_lon_str);

        offset = offset + 3;

        if (type_of_shape == ELLIPSOID_POINT_WITH_UNCERT_CIRC) {

            /* Ellipsoid Point with uncertainty Circle */

            if (length < 8)

                return offset;

            /* Uncertainty code */

            uncer_item = proto_tree_add_item_ret_uint(tree, hf_gsm_a_geo_loc_uncertainty_code, tvb, offset, 1, ENC_BIG_ENDIAN, &uvalue32);

            proto_item_append_text(uncer_item, " (%.1f m)", 10 * (pow(1.1, (double)uvalue32) - 1));

        }else if (type_of_shape == ELLIPSOID_POINT_WITH_UNCERT_ELLIPSE) {

            /* Ellipsoid Point with uncertainty Ellipse */

            /* Uncertainty semi-major octet 10

             * To convert to metres 10*(((1.1)^X)-1)

             */

            major_item = proto_tree_add_item_ret_uint(tree, hf_gsm_a_geo_loc_uncertainty_semi_major, tvb, offset, 1, ENC_BIG_ENDIAN, &uvalue32);

            proto_item_append_text(major_item, " (%.1f m)", 10 * (pow(1.1, (double)uvalue32) - 1));

            offset++;

            /* Uncertainty semi-minor Octet 11

             * To convert to metres 10*(((1.1)^X)-1)

             */

            minor_item = proto_tree_add_item_ret_uint(tree, hf_gsm_a_geo_loc_uncertainty_semi_minor, tvb, offset, 1, ENC_BIG_ENDIAN, &uvalue32);

            proto_item_append_text(minor_item, " (%.1f m)", 10 * (pow(1.1, (double)uvalue32) - 1));

            offset++;

            /* TS 23.032 V15.1.0 (2018-09)

             * Orientation of major axis octet 12

             * allowed value from 0-179

             */

            orientation_item = proto_tree_add_item_ret_uint(tree, hf_gsm_a_geo_loc_orientation_of_major_axis, tvb, offset, 1, ENC_BIG_ENDIAN, &uvalue32);

            proto_item_append_text(orientation_item, " (%d degrees)", 2 * uvalue32);

            offset++;

            /* Confidence */

            proto_tree_add_item(tree, hf_gsm_a_geo_loc_confidence, tvb, offset, 1, ENC_BIG_ENDIAN);

            offset++;

        }else if (type_of_shape == ELLIPSOID_POINT_WITH_ALT) {

            /* Ellipsoid Point with Altitude */

            /*D: Direction of Altitude */

            proto_tree_add_item(tree, hf_gsm_a_geo_loc_D, tvb, offset, 2, ENC_BIG_ENDIAN);

            /* Altitude */

            proto_tree_add_item(tree, hf_gsm_a_geo_loc_altitude, tvb, offset, 2, ENC_BIG_ENDIAN);

        }else if (type_of_shape == ELLIPSOID_POINT_WITH_ALT_AND_UNCERT_ELLIPSOID) {

            /* Ellipsoid Point with altitude and uncertainty ellipsoid */

            /*D: Direction of Altitude octet 8,9 */

            proto_tree_add_item(tree, hf_gsm_a_geo_loc_D, tvb, offset, 2, ENC_BIG_ENDIAN);

            /* Altitude Octet 8,9*/

            proto_tree_add_item(tree, hf_gsm_a_geo_loc_altitude, tvb, offset, 2, ENC_BIG_ENDIAN);

            offset = offset +2;

            /* Uncertainty semi-major octet 10

             * To convert to metres 10*(((1.1)^X)-1)

             */

            major_item = proto_tree_add_item_ret_uint(tree, hf_gsm_a_geo_loc_uncertainty_semi_major, tvb, offset, 1, ENC_BIG_ENDIAN, &uvalue32);

            proto_item_append_text(major_item, " (%.1f m)", 10 * (pow(1.1, (double)uvalue32) - 1));

            offset++;

            /* Uncertainty semi-minor Octet 11

             * To convert to metres 10*(((1.1)^X)-1)

             */

            minor_item = proto_tree_add_item_ret_uint(tree, hf_gsm_a_geo_loc_uncertainty_semi_minor, tvb, offset, 1, ENC_BIG_ENDIAN, &uvalue32);

            proto_item_append_text(minor_item, " (%.1f m)", 10 * (pow(1.1, (double)uvalue32) - 1));

            offset++;

            /* Orientation of major axis octet 12

             * allowed value from 0-179 to convert

             * to actual degrees multiply by 2.

             */

            orientation_item = proto_tree_add_item_ret_uint(tree, hf_gsm_a_geo_loc_orientation_of_major_axis, tvb, offset, 1, ENC_BIG_ENDIAN, &uvalue32);

            proto_item_append_text(orientation_item, " (%d degrees)", 2 * uvalue32);

            offset++;

            /* Uncertainty Altitude 13

             * to convert to metres 45*(((1.025)^X)-1)

             */

            alt_item = proto_tree_add_item_ret_uint(tree, hf_gsm_a_geo_loc_uncertainty_altitude, tvb, offset, 1, ENC_BIG_ENDIAN, &uvalue32);

            proto_item_append_text(alt_item, " (%.1f m)", 45 * (pow(1.025, (double)uvalue32) - 1));

            offset++;

            /* Confidence octet 14

             */

            proto_tree_add_item(tree, hf_gsm_a_geo_loc_confidence, tvb, offset, 1, ENC_BIG_ENDIAN);

        }else if (type_of_shape == ELLIPSOID_ARC) {

            /* Ellipsoid Arc */

            /* Inner radius */

            proto_tree_add_item(tree, hf_gsm_a_geo_loc_inner_radius, tvb, offset, 2, ENC_BIG_ENDIAN);

            offset = offset + 2;

            /* Uncertainty radius */

            proto_tree_add_item(tree, hf_gsm_a_geo_loc_uncertainty_radius, tvb, offset, 1, ENC_BIG_ENDIAN);

            offset++;

            /* Offset angle */

            proto_tree_add_item(tree, hf_gsm_a_geo_loc_offset_angle, tvb, offset, 1, ENC_BIG_ENDIAN);

            offset++;

            /* Included angle */

            proto_tree_add_item(tree, hf_gsm_a_geo_loc_included_angle, tvb, offset, 1, ENC_BIG_ENDIAN);

            offset++;

            /* Confidence */

            proto_tree_add_item(tree, hf_gsm_a_geo_loc_confidence, tvb, offset, 1, ENC_BIG_ENDIAN);

        }

        osm_uri = wmem_strdup_printf(pinfo->pool, "https://www.openstreetmap.org/?mlat=%s&mlon=%s&zoom=12", deg_lat_str, deg_lon_str);

        loc_uri_item = proto_tree_add_string(tree, hf_gsm_a_geo_loc_osm_uri, tvb, loc_offset, 6, osm_uri);

        proto_item_set_url(loc_uri_item);

        proto_item_set_generated(loc_uri_item);

        break;

    case POLYGON:                   /* Polygon */

    {

        /* Number of points */

        uint32_t no_of_points;

        unsigned point_no = 0;

        proto_tree* sub_tree;

        proto_item *ti;

        proto_tree_add_item_ret_uint(tree, hf_gsm_a_geo_loc_no_of_points, tvb, 0, 1, ENC_BIG_ENDIAN, &no_of_points);

        /* offset increased with 1 after reading of shape above */

        while (no_of_points > 0) {

            point_no++;

            sub_tree = proto_tree_add_subtree_format(tree, tvb, offset, 6,

                ett_gsm_a_poly_pnt, &ti, "Polygon point %u", point_no);

            proto_tree_add_item(sub_tree, hf_gsm_a_geo_loc_sign_of_lat, tvb, offset, 1, ENC_BIG_ENDIAN);

            uvalue32 = tvb_get_ntoh24(tvb, offset);

            /* convert degrees (X/0x7fffff) * 90 = degrees */

            lat_item = proto_tree_add_item(sub_tree, hf_gsm_a_geo_loc_deg_of_lat, tvb, offset, 3, ENC_BIG_ENDIAN);

            deg_lat_str = wmem_strdup_printf(pinfo->pool, "%s%.5f",

                (uvalue32 & 0x00800000) ? "-" : "",

                ((double)(uvalue32 & 0x7fffff) / 8388607.0) * 90);

            proto_item_append_text(lat_item, " (%s degrees)", deg_lat_str);

            loc_offset = offset;

            offset = offset + 3;

            svalue32 = tvb_get_ntoh24(tvb, offset);

            svalue32 |= (svalue32 & 0x800000) ? 0xff000000 : 0x00000000;

            long_item = proto_tree_add_item(sub_tree, hf_gsm_a_geo_loc_deg_of_long, tvb, offset, 3, ENC_BIG_ENDIAN);

            /* (X/0xffffff) *360 = degrees */

            deg_lon_str = wmem_strdup_printf(pinfo->pool, "%.5f",

                ((double)svalue32 / 16777215.0) * 360);

            proto_item_append_text(long_item, " (%s degrees)", deg_lon_str);

            offset = offset + 3;

            no_of_points--;

            osm_uri = wmem_strdup_printf(pinfo->pool, "https://www.openstreetmap.org/?mlat=%s&mlon=%s&zoom=12", deg_lat_str, deg_lon_str);

            loc_uri_item = proto_tree_add_string(tree, hf_gsm_a_geo_loc_osm_uri, tvb, loc_offset, 6, osm_uri);

            proto_item_set_url(loc_uri_item);

            proto_item_set_generated(loc_uri_item);

        }

    }

        break;

    case HIGH_ACC_ELLIPSOID_PNT_WITH_UNCERT_ELLIPSE:

    case HIGH_ACC_ELLIPSOID_PNT_WITH_SCALABLE_UNCERT_ELLIPSE:

        loc_offset = offset;

        lat_item = proto_tree_add_item_ret_int(tree, hf_gsm_a_geo_loc_high_acc_deg_of_lat, tvb, offset, 4, ENC_BIG_ENDIAN, &svalue32);

        deg_lat_str = wmem_strdup_printf(pinfo->pool, "%s%.5f",

            (svalue32 & 0x80000000) ? "-" : "",

            ((double)(svalue32 & 0x7fffffff) / 2147483647.0) * 90);

        proto_item_append_text(lat_item, " (%s degrees)", deg_lat_str);

        offset += 4;

        long_item = proto_tree_add_item_ret_int(tree, hf_gsm_a_geo_loc_high_acc_deg_of_long, tvb, offset, 4, ENC_BIG_ENDIAN, &svalue32);

        deg_lon_str = wmem_strdup_printf(pinfo->pool, "%s%.5f",

            (svalue32 & 0x80000000) ? "-" : "",

            ((double)svalue32 / 2147483647.0) * 180);

        proto_item_append_text(long_item, " (%s degrees)", deg_lon_str);

        offset += 4;

        /* High accuracy uncertainty semi-major*/

        major_item = proto_tree_add_item_ret_uint(tree, hf_gsm_a_geo_loc_high_acc_uncertainty_semi_major, tvb, offset, 1, ENC_BIG_ENDIAN, &uvalue32);

        proto_item_append_text(major_item, " (%.5f m)", 0.3 * (pow(1.02, (double)uvalue32) - 1));

        offset++;

        /* High accuracy uncertainty semi-minor*/

        minor_item = proto_tree_add_item_ret_uint(tree, hf_gsm_a_geo_loc_high_acc_uncertainty_semi_minor, tvb, offset, 1, ENC_BIG_ENDIAN, &uvalue32);

        proto_item_append_text(minor_item, " (%.5f m)", 0.3 * (pow(1.02, (double)uvalue32) - 1));

        offset++;

        /* Orientation of major axis */

        orientation_item = proto_tree_add_item_ret_uint(tree, hf_gsm_a_geo_loc_orientation_of_major_axis, tvb, offset, 1, ENC_BIG_ENDIAN, &uvalue32);

        proto_item_append_text(orientation_item, " (%d degrees)", 2 * uvalue32);

        offset++;

        /* Confidence */

        proto_tree_add_item(tree, hf_gsm_a_geo_loc_confidence, tvb, offset, 1, ENC_BIG_ENDIAN);

        if (type_of_shape == HIGH_ACC_ELLIPSOID_PNT_WITH_SCALABLE_UNCERT_ELLIPSE) {

            /* Uncertainty Range */

            proto_tree_add_item(tree, hf_gsm_a_geo_loc_uncertainty_range, tvb, offset, 1, ENC_BIG_ENDIAN);

        }

        offset++;

        osm_uri = wmem_strdup_printf(pinfo->pool, "https://www.openstreetmap.org/?mlat=%s&mlon=%s&zoom=12", deg_lat_str, deg_lon_str);

        loc_uri_item = proto_tree_add_string(tree, hf_gsm_a_geo_loc_osm_uri, tvb, loc_offset, 6, osm_uri);

        proto_item_set_url(loc_uri_item);

        proto_item_set_generated(loc_uri_item);

        break;

    case HIGH_ACC_ELLIPSOID_PNT_WITH_ALT_AND_UNCERT_ELLIPSOID:

    case HIGH_ACC_ELLIPSOID_PNT_WITH_ALT_AND_SCALABLE_UNCERT_ELLIPSOID:

        lat_item = proto_tree_add_item_ret_int(tree, hf_gsm_a_geo_loc_high_acc_deg_of_lat, tvb, offset, 4, ENC_BIG_ENDIAN, &svalue32);

        deg_lat_str = wmem_strdup_printf(pinfo->pool, "%s%.5f",

            (svalue32 & 0x80000000) ? "-" : "",

            ((double)(svalue32 & 0x7fffffff) / 2147483647.0) * 90);

        proto_item_append_text(lat_item, " (%s degrees)", deg_lat_str);

        offset += 4;

        long_item = proto_tree_add_item_ret_int(tree, hf_gsm_a_geo_loc_high_acc_deg_of_long, tvb, offset, 4, ENC_BIG_ENDIAN, &svalue32);

        deg_lon_str = wmem_strdup_printf(pinfo->pool, "%s%.5f",

            (svalue32 & 0x80000000) ? "-" : "",

            ((double)svalue32 / 2147483647.0) * 180);

        proto_item_append_text(long_item, " (%s degrees)", deg_lon_str);

        offset += 4;

        /* High accuracy altitude

         * High accuracy altitude is encoded as a number N between -64000 and 1280000 using 2's complement binary on 22 bits.

         */

        alt_item = proto_tree_add_item_ret_int(tree, hf_gsm_a_geo_loc_high_acc_alt, tvb, offset, 3, ENC_BIG_ENDIAN, &svalue32);

        /* double z = pow(double x, double y);*/

        proto_item_append_text(alt_item, " (%.1f m)", (double)svalue32 * pow(2,-7));

        offset += 3;

        /* High accuracy uncertainty semi-major*/

        major_item = proto_tree_add_item_ret_uint(tree, hf_gsm_a_geo_loc_high_acc_uncertainty_semi_major, tvb, offset, 1, ENC_BIG_ENDIAN, &uvalue32);

        proto_item_append_text(major_item, " (%.5f m)", 0.3 * (pow(1.02, (double)uvalue32) - 1));