10a67c2028
svn path=/trunk/; revision=25080
739 lines
22 KiB
C
739 lines
22 KiB
C
/* packet-tcap-template.c
|
|
* Routines for TCAP
|
|
* Copyright 2004 - 2005, Tim Endean <endeant@hotmail.com>
|
|
* Built from the gsm-map dissector Copyright 2004 - 2005, Anders Broman <anders.broman@ericsson.com>
|
|
*
|
|
* $Id$
|
|
*
|
|
* Wireshark - Network traffic analyzer
|
|
* By Gerald Combs <gerald@wireshark.org>
|
|
* Copyright 1998 Gerald Combs
|
|
*
|
|
* This program is free software; you can redistribute it and/or
|
|
* modify it under the terms of the GNU General Public License
|
|
* as published by the Free Software Foundation; either version 2
|
|
* of the License, or (at your option) any later version.
|
|
*
|
|
* This program is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU General Public License
|
|
* along with this program; if not, write to the Free Software
|
|
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
|
* References: ETSI 300 374
|
|
*/
|
|
|
|
#ifdef HAVE_CONFIG_H
|
|
# include "config.h"
|
|
#endif
|
|
|
|
#include <glib.h>
|
|
#include <epan/packet.h>
|
|
#include <epan/prefs.h>
|
|
#include <epan/conversation.h>
|
|
#include <epan/oids.h>
|
|
#include <epan/emem.h>
|
|
#include <epan/asn1.h>
|
|
#include <epan/strutil.h>
|
|
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
#include "packet-ber.h"
|
|
#include "packet-tcap.h"
|
|
#include "epan/tcap-persistentdata.h"
|
|
|
|
#define PNAME "Transaction Capabilities Application Part"
|
|
#define PSNAME "TCAP"
|
|
#define PFNAME "tcap"
|
|
|
|
/* Initialize the protocol and registered fields */
|
|
int proto_tcap = -1;
|
|
static int hf_tcap_tag = -1;
|
|
static int hf_tcap_length = -1;
|
|
static int hf_tcap_data = -1;
|
|
static int hf_tcap_tid = -1;
|
|
|
|
int hf_tcapsrt_SessionId=-1;
|
|
int hf_tcapsrt_Duplicate=-1;
|
|
int hf_tcapsrt_BeginSession=-1;
|
|
int hf_tcapsrt_EndSession=-1;
|
|
int hf_tcapsrt_SessionTime=-1;
|
|
|
|
#include "packet-tcap-hf.c"
|
|
|
|
/* Initialize the subtree pointers */
|
|
static gint ett_tcap = -1;
|
|
static gint ett_param = -1;
|
|
|
|
static gint ett_otid = -1;
|
|
static gint ett_dtid = -1;
|
|
gint ett_tcap_stat = -1;
|
|
|
|
static struct tcapsrt_info_t * gp_tcapsrt_info;
|
|
static gboolean tcap_subdissector_used=FALSE;
|
|
static dissector_handle_t requested_subdissector_handle = NULL;
|
|
|
|
static struct tcaphash_context_t * gp_tcap_context=NULL;
|
|
|
|
#include "packet-tcap-ett.c"
|
|
|
|
#define MAX_SSN 254
|
|
static range_t *global_ssn_range;
|
|
static range_t *ssn_range;
|
|
struct tcap_private_t tcap_private;
|
|
|
|
gboolean gtcap_HandleSRT=FALSE;
|
|
extern gboolean gtcap_PersistentSRT;
|
|
extern gboolean gtcap_DisplaySRT;
|
|
extern guint gtcap_RepetitionTimeout;
|
|
extern guint gtcap_LostTimeout;
|
|
|
|
static dissector_handle_t tcap_handle = NULL;
|
|
static dissector_table_t ber_oid_dissector_table=NULL;
|
|
static const char * cur_oid;
|
|
static const char * tcapext_oid;
|
|
static proto_tree * tcap_top_tree=NULL;
|
|
static proto_tree * tcap_stat_tree=NULL;
|
|
|
|
static dissector_handle_t data_handle;
|
|
static dissector_handle_t ansi_tcap_handle;
|
|
|
|
static void raz_tcap_private(struct tcap_private_t * p_tcap_private);
|
|
static int dissect_tcap_param(asn1_ctx_t *actx, proto_tree *tree, tvbuff_t *tvb, int offset);
|
|
static int dissect_tcap_UserInformation(gboolean implicit_tag _U_, tvbuff_t *tvb, int offset, asn1_ctx_t *actx _U_, proto_tree *tree, int hf_index _U_);
|
|
static int dissect_tcap_ITU_ComponentPDU(gboolean implicit_tag _U_, tvbuff_t *tvb, int offset, asn1_ctx_t *actx _U_, proto_tree *tree, int hf_index _U_);
|
|
static int dissect_tcap_ANSI_ComponentPDU(gboolean implicit_tag _U_, tvbuff_t *tvb, int offset, asn1_ctx_t *actx _U_, proto_tree *tree, int hf_index _U_);
|
|
static int dissect_tcap_TheExternUserInfo(gboolean implicit_tag _U_, tvbuff_t *tvb, int offset,asn1_ctx_t *actx _U_, proto_tree *tree, int hf_index _U_);
|
|
|
|
static GHashTable* ansi_sub_dissectors = NULL;
|
|
static GHashTable* itu_sub_dissectors = NULL;
|
|
|
|
static void dissect_tcap(tvbuff_t *tvb, packet_info *pinfo, proto_tree *parent_tree);
|
|
|
|
extern void add_ansi_tcap_subdissector(guint32 ssn, dissector_handle_t dissector) {
|
|
g_hash_table_insert(ansi_sub_dissectors,GUINT_TO_POINTER(ssn),dissector);
|
|
dissector_add("sccp.ssn",ssn,tcap_handle);
|
|
}
|
|
|
|
extern void add_itu_tcap_subdissector(guint32 ssn, dissector_handle_t dissector) {
|
|
g_hash_table_insert(itu_sub_dissectors,GUINT_TO_POINTER(ssn),dissector);
|
|
dissector_add("sccp.ssn",ssn,tcap_handle);
|
|
}
|
|
|
|
extern void delete_ansi_tcap_subdissector(guint32 ssn, dissector_handle_t dissector _U_) {
|
|
g_hash_table_remove(ansi_sub_dissectors,GUINT_TO_POINTER(ssn));
|
|
if (!get_itu_tcap_subdissector(ssn))
|
|
dissector_delete("sccp.ssn",ssn,tcap_handle);
|
|
}
|
|
extern void delete_itu_tcap_subdissector(guint32 ssn, dissector_handle_t dissector _U_) {
|
|
g_hash_table_remove(itu_sub_dissectors,GUINT_TO_POINTER(ssn));
|
|
if (!get_ansi_tcap_subdissector(ssn))
|
|
dissector_delete("sccp.ssn", ssn,tcap_handle);
|
|
}
|
|
|
|
dissector_handle_t get_ansi_tcap_subdissector(guint32 ssn) {
|
|
return g_hash_table_lookup(ansi_sub_dissectors,GUINT_TO_POINTER(ssn));
|
|
}
|
|
|
|
dissector_handle_t get_itu_tcap_subdissector(guint32 ssn) {
|
|
return g_hash_table_lookup(itu_sub_dissectors,GUINT_TO_POINTER(ssn));
|
|
}
|
|
|
|
|
|
|
|
#include "packet-tcap-fn.c"
|
|
|
|
|
|
|
|
const value_string tcap_component_type_str[] = {
|
|
{ TCAP_COMP_INVOKE, "Invoke" },
|
|
{ TCAP_COMP_RRL, "Return Result(L)" },
|
|
{ TCAP_COMP_RE, "Return Error" },
|
|
{ TCAP_COMP_REJECT, "Reject" },
|
|
{ TCAP_COMP_RRN, "Return Result(NL)" },
|
|
{ 0, NULL } };
|
|
|
|
|
|
static void
|
|
dissect_tcap(tvbuff_t *tvb, packet_info *pinfo, proto_tree *parent_tree)
|
|
{
|
|
proto_item *item=NULL;
|
|
proto_tree *tree=NULL;
|
|
|
|
struct tcaphash_context_t * p_tcap_context;
|
|
dissector_handle_t subdissector_handle;
|
|
asn1_ctx_t asn1_ctx;
|
|
gint8 class;
|
|
gboolean pc;
|
|
gint tag;
|
|
|
|
/* Check if ANSI TCAP and call the ANSI TCAP dissector if that's the case
|
|
* PackageType ::= CHOICE { unidirectional [PRIVATE 1] IMPLICIT UniTransactionPDU,
|
|
* queryWithPerm [PRIVATE 2] IMPLICIT TransactionPDU,
|
|
* queryWithoutPerm [PRIVATE 3] IMPLICIT TransactionPDU,
|
|
* response [PRIVATE 4] IMPLICIT TransactionPDU,
|
|
* conversationWithPerm [PRIVATE 5] IMPLICIT TransactionPDU,
|
|
* conversationWithoutPerm [PRIVATE 6] IMPLICIT TransactionPDU,
|
|
* abort [PRIVATE 22] IMPLICIT Abort
|
|
* }
|
|
*
|
|
*
|
|
*/
|
|
get_ber_identifier(tvb, 0, &class, &pc, &tag);
|
|
|
|
if(class == BER_CLASS_PRI){
|
|
switch(tag){
|
|
case 1:
|
|
case 2:
|
|
case 3:
|
|
case 4:
|
|
case 5:
|
|
case 6:
|
|
case 22:
|
|
call_dissector(ansi_tcap_handle, tvb, pinfo, parent_tree);
|
|
return;
|
|
break;
|
|
default:
|
|
return;
|
|
}
|
|
}
|
|
|
|
/* ITU TCAP */
|
|
asn1_ctx_init(&asn1_ctx, ASN1_ENC_BER, TRUE, pinfo);
|
|
|
|
tcap_top_tree = parent_tree;
|
|
tcap_stat_tree = NULL;
|
|
|
|
if (check_col(pinfo->cinfo, COL_PROTOCOL))
|
|
{
|
|
col_set_str(pinfo->cinfo, COL_PROTOCOL, "TCAP");
|
|
}
|
|
|
|
/* create display subtree for the protocol */
|
|
if(parent_tree){
|
|
item = proto_tree_add_item(parent_tree, proto_tcap, tvb, 0, -1, FALSE);
|
|
tree = proto_item_add_subtree(item, ett_tcap);
|
|
tcap_stat_tree=tree;
|
|
}
|
|
cur_oid = NULL;
|
|
tcapext_oid = NULL;
|
|
raz_tcap_private(&tcap_private);
|
|
|
|
pinfo->private_data = &tcap_private;
|
|
gp_tcapsrt_info=tcapsrt_razinfo();
|
|
tcap_subdissector_used=FALSE;
|
|
gp_tcap_context=NULL;
|
|
dissect_tcap_TCMessage(FALSE, tvb, 0, &asn1_ctx, tree, -1);
|
|
|
|
if (gtcap_HandleSRT && !tcap_subdissector_used ) {
|
|
p_tcap_context=tcapsrt_call_matching(tvb, pinfo, tcap_stat_tree, gp_tcapsrt_info);
|
|
tcap_private.context=p_tcap_context;
|
|
|
|
/* If the current message is TCAP only,
|
|
* save the Application Context Name for the next messages
|
|
*/
|
|
if ( p_tcap_context && cur_oid && !p_tcap_context->oid_present ) {
|
|
/* Save the application context and the sub dissector */
|
|
ber_oid_dissector_table = find_dissector_table("ber.oid");
|
|
g_strlcpy(p_tcap_context->oid,cur_oid, LENGTH_OID);
|
|
p_tcap_context->oid_present=TRUE;
|
|
if ( (subdissector_handle = dissector_get_string_handle(ber_oid_dissector_table, cur_oid)) ) {
|
|
p_tcap_context->subdissector_handle=subdissector_handle;
|
|
p_tcap_context->subdissector_present=TRUE;
|
|
}
|
|
}
|
|
if (gtcap_HandleSRT && p_tcap_context && p_tcap_context->callback) {
|
|
/* Callback fonction for the upper layer */
|
|
(p_tcap_context->callback)(tvb, pinfo, tcap_stat_tree, p_tcap_context);
|
|
}
|
|
}
|
|
}
|
|
|
|
void
|
|
proto_reg_handoff_tcap(void)
|
|
{
|
|
|
|
data_handle = find_dissector("data");
|
|
ansi_tcap_handle = find_dissector("ansi_tcap");
|
|
|
|
#include "packet-tcap-dis-tab.c"
|
|
}
|
|
|
|
static void init_tcap(void);
|
|
|
|
void
|
|
proto_register_tcap(void)
|
|
{
|
|
|
|
/* Setup list of header fields See Section 1.6.1 for details*/
|
|
static hf_register_info hf[] = {
|
|
{ &hf_tcap_tag,
|
|
{ "Tag", "tcap.msgtype",
|
|
FT_UINT8, BASE_HEX, NULL, 0,
|
|
"", HFILL }
|
|
},
|
|
{ &hf_tcap_length,
|
|
{ "Length", "tcap.len",
|
|
FT_UINT8, BASE_DEC, NULL, 0,
|
|
"", HFILL }
|
|
},
|
|
{ &hf_tcap_data,
|
|
{ "Data", "tcap.data",
|
|
FT_BYTES, BASE_HEX, NULL, 0,
|
|
"", HFILL }
|
|
},
|
|
{ &hf_tcap_tid,
|
|
{ "Transaction Id", "tcap.tid",
|
|
FT_BYTES, BASE_HEX, NULL, 0,
|
|
"", HFILL }
|
|
},
|
|
/* Tcap Service Response Time */
|
|
{ &hf_tcapsrt_SessionId,
|
|
{ "Session Id",
|
|
"tcap.srt.session_id",
|
|
FT_UINT32, BASE_DEC, NULL, 0x0,
|
|
"", HFILL }
|
|
},
|
|
{ &hf_tcapsrt_BeginSession,
|
|
{ "Begin Session",
|
|
"tcap.srt.begin",
|
|
FT_FRAMENUM, BASE_NONE, NULL, 0x0,
|
|
"SRT Begin of Session", HFILL }
|
|
},
|
|
{ &hf_tcapsrt_EndSession,
|
|
{ "End Session",
|
|
"tcap.srt.end",
|
|
FT_FRAMENUM, BASE_NONE, NULL, 0x0,
|
|
"SRT End of Session", HFILL }
|
|
},
|
|
{ &hf_tcapsrt_SessionTime,
|
|
{ "Session duration",
|
|
"tcap.srt.sessiontime",
|
|
FT_RELATIVE_TIME, BASE_NONE, NULL, 0x0,
|
|
"Duration of the TCAP session", HFILL }
|
|
},
|
|
{ &hf_tcapsrt_Duplicate,
|
|
{ "Session Duplicate",
|
|
"tcap.srt.duplicate",
|
|
FT_FRAMENUM, BASE_NONE, NULL, 0x0,
|
|
"SRT Duplicated with Session", HFILL }
|
|
},
|
|
#include "packet-tcap-hfarr.c"
|
|
};
|
|
|
|
/* Setup protocol subtree array */
|
|
static gint *ett[] = {
|
|
&ett_tcap,
|
|
&ett_param,
|
|
&ett_otid,
|
|
&ett_dtid,
|
|
&ett_tcap_stat,
|
|
#include "packet-tcap-ettarr.c"
|
|
};
|
|
|
|
/*static enum_val_t tcap_options[] = {
|
|
{ "itu", "ITU", ITU_TCAP_STANDARD },
|
|
{ "ansi", "ANSI", ANSI_TCAP_STANDARD },
|
|
{ NULL, NULL, 0 }
|
|
};*/
|
|
|
|
module_t *tcap_module;
|
|
|
|
/* Register the protocol name and description */
|
|
proto_tcap = proto_register_protocol(PNAME, PSNAME, PFNAME);
|
|
|
|
/* Required function calls to register the header fields and subtrees used */
|
|
proto_register_field_array(proto_tcap, hf, array_length(hf));
|
|
proto_register_subtree_array(ett, array_length(ett));
|
|
|
|
tcap_module = prefs_register_protocol(proto_tcap, NULL);
|
|
|
|
#if 0
|
|
prefs_register_enum_preference(tcap_module, "standard", "ITU TCAP standard",
|
|
"The SS7 standard used in ITU TCAP packets",
|
|
&tcap_standard, tcap_options, FALSE);
|
|
#else
|
|
prefs_register_obsolete_preference(tcap_module, "standard");
|
|
#endif
|
|
|
|
#if 0
|
|
prefs_register_bool_preference(tcap_module, "lock_info_col", "Lock Info column",
|
|
"Always show TCAP in Info column",
|
|
&lock_info_col);
|
|
#else
|
|
prefs_register_obsolete_preference(tcap_module, "lock_info_col");
|
|
#endif
|
|
|
|
/* Set default SSNs */
|
|
range_convert_str(&global_ssn_range, "", MAX_SSN);
|
|
ssn_range = range_empty();
|
|
|
|
prefs_register_range_preference(tcap_module, "ssn", "SCCP SSNs",
|
|
"SCCP (and SUA) SSNs to decode as TCAP",
|
|
&global_ssn_range, MAX_SSN);
|
|
|
|
prefs_register_bool_preference(tcap_module, "srt",
|
|
"Service Response Time Analyse",
|
|
"Activate the analyse for Response Time",
|
|
>cap_HandleSRT);
|
|
|
|
prefs_register_bool_preference(tcap_module, "persistentsrt",
|
|
"Persistent stats for SRT",
|
|
"Statistics for Response Time",
|
|
>cap_PersistentSRT);
|
|
|
|
prefs_register_uint_preference(tcap_module, "repetitiontimeout",
|
|
"Repetition timeout",
|
|
"Maximal delay for message repetion",
|
|
10, >cap_RepetitionTimeout);
|
|
|
|
prefs_register_uint_preference(tcap_module, "losttimeout",
|
|
"lost timeout",
|
|
"Maximal delay for message lost",
|
|
10, >cap_LostTimeout);
|
|
|
|
ansi_sub_dissectors = g_hash_table_new(g_direct_hash,g_direct_equal);
|
|
itu_sub_dissectors = g_hash_table_new(g_direct_hash,g_direct_equal);
|
|
|
|
/* 'globally' register dissector */
|
|
register_dissector("tcap", dissect_tcap, proto_tcap);
|
|
|
|
tcap_handle = create_dissector_handle(dissect_tcap, proto_tcap);
|
|
|
|
register_init_routine(&init_tcap);
|
|
}
|
|
|
|
|
|
static void range_delete_callback(guint32 ssn)
|
|
{
|
|
if ( ssn && !get_ansi_tcap_subdissector(ssn) && !get_itu_tcap_subdissector(ssn) ) {
|
|
dissector_delete("sccp.ssn", ssn, tcap_handle);
|
|
}
|
|
}
|
|
|
|
static void range_add_callback(guint32 ssn)
|
|
{
|
|
if (ssn && !get_ansi_tcap_subdissector(ssn) && !get_itu_tcap_subdissector(ssn) ) {
|
|
dissector_add("sccp.ssn", ssn, tcap_handle);
|
|
}
|
|
}
|
|
|
|
|
|
static void init_tcap(void) {
|
|
if (ssn_range) {
|
|
range_foreach(ssn_range, range_delete_callback);
|
|
g_free(ssn_range);
|
|
}
|
|
|
|
ssn_range = range_copy(global_ssn_range);
|
|
range_foreach(ssn_range, range_add_callback);
|
|
tcapsrt_init_routine();
|
|
}
|
|
|
|
static int
|
|
dissect_tcap_param(asn1_ctx_t *actx, proto_tree *tree, tvbuff_t *tvb, int offset)
|
|
{
|
|
gint tag_offset, saved_offset, len_offset;
|
|
tvbuff_t *next_tvb;
|
|
proto_tree *subtree;
|
|
proto_item *pi;
|
|
gint8 class;
|
|
gboolean pc;
|
|
gint32 tag;
|
|
guint32 len;
|
|
guint32 tag_length;
|
|
guint32 len_length;
|
|
gboolean ind_field;
|
|
|
|
while (tvb_reported_length_remaining(tvb, offset) > 0)
|
|
{
|
|
saved_offset = offset;
|
|
|
|
offset = get_ber_identifier(tvb, offset, &class, &pc, &tag);
|
|
tag_offset = offset;
|
|
offset = get_ber_length(tvb, offset, &len, &ind_field);
|
|
len_offset = offset;
|
|
|
|
tag_length = tag_offset - saved_offset;
|
|
len_length = len_offset - tag_offset;
|
|
|
|
if (pc)
|
|
{
|
|
pi = proto_tree_add_text(tree, tvb, saved_offset,
|
|
len + (len_offset - saved_offset),
|
|
"CONSTRUCTOR");
|
|
subtree = proto_item_add_subtree(pi, ett_param);
|
|
proto_tree_add_uint_format(subtree, hf_tcap_tag, tvb,
|
|
saved_offset, tag_length, tag,
|
|
"CONSTRUCTOR Tag");
|
|
proto_tree_add_uint(subtree, hf_tcap_tag, tvb, saved_offset,
|
|
tag_length, class);
|
|
|
|
proto_tree_add_uint(subtree, hf_tcap_length, tvb, tag_offset,
|
|
len_length, len);
|
|
|
|
if (len-(2*ind_field)) /*should always be positive unless we get an empty contructor pointless? */
|
|
{
|
|
next_tvb = tvb_new_subset(tvb, offset, len-(2*ind_field),
|
|
len-(2*ind_field));
|
|
dissect_tcap_param(actx, subtree,next_tvb,0);
|
|
}
|
|
|
|
if (ind_field)
|
|
proto_tree_add_text(subtree, tvb, offset+len-2, 2, "CONSTRUCTOR EOC");
|
|
|
|
offset += len;
|
|
}
|
|
else
|
|
{
|
|
pi = proto_tree_add_text(tree, tvb, saved_offset,
|
|
len + (len_offset - saved_offset),
|
|
"Parameter (0x%.2x)", tag);
|
|
|
|
subtree = proto_item_add_subtree(pi, ett_param);
|
|
|
|
proto_tree_add_uint(subtree, hf_tcap_tag, tvb, saved_offset,
|
|
tag_length, tag);
|
|
|
|
proto_tree_add_uint(subtree, hf_tcap_length, tvb,
|
|
saved_offset+tag_length, len_length, len);
|
|
|
|
if (len) /* check for NULLS */
|
|
{
|
|
next_tvb = tvb_new_subset(tvb, offset, len, len);
|
|
dissect_ber_octet_string(TRUE, actx, tree, next_tvb, 0,
|
|
hf_tcap_data, NULL);
|
|
}
|
|
|
|
offset += len;
|
|
}
|
|
}
|
|
return offset;
|
|
}
|
|
|
|
static void raz_tcap_private(struct tcap_private_t * p_tcap_private)
|
|
{
|
|
memset(p_tcap_private,0,sizeof(struct tcap_private_t) );
|
|
}
|
|
|
|
/*
|
|
* Call ITU Subdissector to decode the Tcap Component
|
|
*/
|
|
static int
|
|
dissect_tcap_ITU_ComponentPDU(gboolean implicit_tag _U_, tvbuff_t *tvb, int offset, asn1_ctx_t *actx _U_, proto_tree *tree, int hf_index _U_)
|
|
{
|
|
dissector_handle_t subdissector_handle=NULL;
|
|
gboolean is_subdissector=FALSE;
|
|
struct tcaphash_context_t * p_tcap_context=NULL;
|
|
|
|
/*
|
|
* ok lets look at the oid and ssn and try and find a dissector, otherwise lets decode it.
|
|
*/
|
|
ber_oid_dissector_table = find_dissector_table("ber.oid");
|
|
|
|
/*
|
|
* Handle The TCAP Service Response Time
|
|
*/
|
|
if ( gtcap_HandleSRT ) {
|
|
if (!tcap_subdissector_used) {
|
|
p_tcap_context=tcapsrt_call_matching(tvb, actx->pinfo, tcap_stat_tree, gp_tcapsrt_info);
|
|
tcap_subdissector_used=TRUE;
|
|
gp_tcap_context=p_tcap_context;
|
|
tcap_private.context=p_tcap_context;
|
|
}else{
|
|
/* Take the last TCAP context */
|
|
p_tcap_context = gp_tcap_context;
|
|
tcap_private.context=p_tcap_context;
|
|
}
|
|
}
|
|
if (p_tcap_context) {
|
|
if (cur_oid) {
|
|
if (p_tcap_context->oid_present) {
|
|
/* We have already an Application Context, check if we have
|
|
to fallback to a lower version */
|
|
if ( strncmp(p_tcap_context->oid,cur_oid, LENGTH_OID)!=0) {
|
|
/* ACN, changed, Fallback to lower version
|
|
* and update the subdissector (purely formal)
|
|
*/
|
|
g_strlcpy(p_tcap_context->oid,cur_oid, LENGTH_OID);
|
|
if ( (subdissector_handle = dissector_get_string_handle(ber_oid_dissector_table, cur_oid)) ) {
|
|
p_tcap_context->subdissector_handle=subdissector_handle;
|
|
p_tcap_context->subdissector_present=TRUE;
|
|
}
|
|
}
|
|
} else {
|
|
/* We do not have the OID in the TCAP context, so store it */
|
|
g_strlcpy(p_tcap_context->oid,cur_oid, LENGTH_OID);
|
|
p_tcap_context->oid_present=TRUE;
|
|
/* Try to find a subdissector according to OID */
|
|
if ( (subdissector_handle
|
|
= dissector_get_string_handle(ber_oid_dissector_table, cur_oid)) ) {
|
|
p_tcap_context->subdissector_handle=subdissector_handle;
|
|
p_tcap_context->subdissector_present=TRUE;
|
|
} else {
|
|
/* Not found, so try to find a subdissector according to SSN */
|
|
if ( (subdissector_handle = get_itu_tcap_subdissector(actx->pinfo->match_port))) {
|
|
/* Found according to SSN */
|
|
p_tcap_context->subdissector_handle=subdissector_handle;
|
|
p_tcap_context->subdissector_present=TRUE;
|
|
}
|
|
}
|
|
} /* context OID */
|
|
} else {
|
|
/* Copy the OID from the TCAP context to the current oid */
|
|
if (p_tcap_context->oid_present) {
|
|
tcap_private.oid= (void*) p_tcap_context->oid;
|
|
tcap_private.acv=TRUE;
|
|
}
|
|
} /* no OID */
|
|
} /* no TCAP context */
|
|
|
|
|
|
if ( p_tcap_context
|
|
&& p_tcap_context->subdissector_present) {
|
|
/* Take the subdissector from the context */
|
|
subdissector_handle=p_tcap_context->subdissector_handle;
|
|
is_subdissector=TRUE;
|
|
}
|
|
|
|
/* Have SccpUsersTable protocol taking precedence over sccp.ssn table */
|
|
if (!is_subdissector && requested_subdissector_handle) {
|
|
is_subdissector = TRUE;
|
|
subdissector_handle = requested_subdissector_handle;
|
|
}
|
|
|
|
if (!is_subdissector) {
|
|
/*
|
|
* If we do not currently know the subdissector, we have to find it
|
|
* - first, according to the OID
|
|
* - then according to the SSN
|
|
* - and at least, take the default Data handler
|
|
*/
|
|
if (ber_oid_dissector_table && cur_oid) {
|
|
/* Search if we can find the sub protocol according to the A.C.N */
|
|
if ( (subdissector_handle
|
|
= dissector_get_string_handle(ber_oid_dissector_table, cur_oid)) ) {
|
|
/* found */
|
|
is_subdissector=TRUE;
|
|
} else {
|
|
/* Search if we can found the sub protocol according to the SSN table */
|
|
if ( (subdissector_handle
|
|
= get_itu_tcap_subdissector(actx->pinfo->match_port))) {
|
|
/* Found according to SSN */
|
|
is_subdissector=TRUE;
|
|
} else {
|
|
/* Nothing found, take the Data handler */
|
|
subdissector_handle = data_handle;
|
|
is_subdissector=TRUE;
|
|
} /* SSN */
|
|
} /* ACN */
|
|
} else {
|
|
/* There is no A.C.N for this transaction, so search in the SSN table */
|
|
if ( (subdissector_handle = get_itu_tcap_subdissector(actx->pinfo->match_port))) {
|
|
/* Found according to SSN */
|
|
is_subdissector=TRUE;
|
|
} else {
|
|
subdissector_handle = data_handle;
|
|
is_subdissector=TRUE;
|
|
}
|
|
} /* OID */
|
|
} else {
|
|
/* We have it already */
|
|
}
|
|
|
|
/* Call the sub dissector if present, and not already called */
|
|
if (is_subdissector)
|
|
call_dissector(subdissector_handle, tvb, actx->pinfo, tree);
|
|
|
|
return offset;
|
|
}
|
|
|
|
/*
|
|
* Call ANSI Subdissector to decode the Tcap Component
|
|
*/
|
|
static int
|
|
dissect_tcap_ANSI_ComponentPDU(gboolean implicit_tag _U_, tvbuff_t *tvb, int offset, asn1_ctx_t *actx _U_, proto_tree *tree, int hf_index _U_)
|
|
{
|
|
dissector_handle_t subdissector_handle;
|
|
gboolean is_subdissector=FALSE;
|
|
struct tcaphash_context_t * p_tcap_context=NULL;
|
|
|
|
gchar str[20];
|
|
|
|
|
|
/*
|
|
* Handle The TCAP Service Response Time
|
|
*/
|
|
if ( gtcap_HandleSRT ) {
|
|
if (!tcap_subdissector_used) {
|
|
p_tcap_context=tcapsrt_call_matching(tvb, actx->pinfo, tcap_stat_tree, gp_tcapsrt_info);
|
|
tcap_subdissector_used=TRUE;
|
|
gp_tcap_context=p_tcap_context;
|
|
tcap_private.context=p_tcap_context;
|
|
} else {
|
|
/* Take the last TCAP context */
|
|
p_tcap_context = gp_tcap_context;
|
|
tcap_private.context=p_tcap_context;
|
|
}
|
|
}
|
|
|
|
if (p_tcap_context) {
|
|
/* tcap_private.TransactionID_str = bytes_to_str(&(p_tcap_context->session_id),4); */
|
|
g_snprintf(str, sizeof(str), "(%d)",p_tcap_context->session_id);
|
|
tcap_private.TransactionID_str = str;
|
|
}
|
|
|
|
if ( (subdissector_handle
|
|
= get_ansi_tcap_subdissector(actx->pinfo->match_port))) {
|
|
/* Found according to SSN */
|
|
is_subdissector=TRUE;
|
|
} else {
|
|
/* Nothing found, take the Data handler */
|
|
subdissector_handle = data_handle;
|
|
is_subdissector=TRUE;
|
|
} /* SSN */
|
|
|
|
/* Call the sub dissector if present, and not already called */
|
|
if (is_subdissector)
|
|
call_dissector(subdissector_handle, tvb, actx->pinfo, tree);
|
|
|
|
return offset;
|
|
}
|
|
|
|
static int
|
|
dissect_tcap_TheExternUserInfo(gboolean implicit_tag _U_, tvbuff_t *tvb, int offset, asn1_ctx_t *actx _U_, proto_tree *tree, int hf_index _U_)
|
|
{
|
|
/*
|
|
* ok lets look at the oid and ssn and try and find a dissector, otherwise lets decode it.
|
|
*/
|
|
ber_oid_dissector_table = find_dissector_table("ber.oid");
|
|
|
|
if (ber_oid_dissector_table && tcapext_oid){
|
|
if(!dissector_try_string(ber_oid_dissector_table, tcapext_oid, tvb, actx->pinfo, tree))
|
|
{
|
|
return dissect_tcap_param(actx,tree,tvb,0);
|
|
}
|
|
}
|
|
return offset;
|
|
}
|
|
|
|
|
|
void call_tcap_dissector(dissector_handle_t handle, tvbuff_t* tvb, packet_info* pinfo, proto_tree* tree) {
|
|
|
|
requested_subdissector_handle = handle;
|
|
|
|
TRY {
|
|
dissect_tcap(tvb, pinfo, tree);
|
|
} CATCH_ALL {
|
|
requested_subdissector_handle = NULL;
|
|
RETHROW;
|
|
} ENDTRY;
|
|
|
|
requested_subdissector_handle = NULL;
|
|
|
|
}
|
|
|
|
|