Add UDTS

Change-Id: Ieaf9590b915e64b2cfa663c17f146d60845f4403
---
M stp/STP_Tests_TCAP.ttcn
1 file changed, 56 insertions(+), 0 deletions(-)


git pull ssh://gerrit.osmocom.org:29418/osmo-ttcn3-hacks refs/changes/17/43017/1

diff --git a/stp/STP_Tests_TCAP.ttcn b/stp/STP_Tests_TCAP.ttcn
index d7c45dc..d343bf7 100644
--- a/stp/STP_Tests_TCAP.ttcn
+++ b/stp/STP_Tests_TCAP.ttcn
@@ -841,6 +841,61 @@
 	setverdict(pass);
 }
 
+testcase TC_tcap_loadshare_m3ua_to_ipa_udts() runs on TCAP_CT {
+	var template (value) IPA_EXT_TCAP_ROUTING_Message tcap_rt_msg;
+	var Misc_Helpers.ro_charstring tcap_asps := { "asp-m3ua-loadshare-0-0",
+						      "asp-m3ua-loadshare-0-1",
+						      "asp-ipa-loadshare-0-0",
+						      "asp-ipa-loadshare-0-1" };
+	var TCAP_CT_Configurations tcap_configs := tcap_build_configs(tcap_asps);
+
+	f_init_tcap(tcap_configs);
+
+	/* Configure TCAP routing on ASP "asp-ipa-loadshare-0-0": */
+	tcap_rt_msg := ts_IPA_EXT_TCAP_ROUTING_ADD_RANGE(seq_nr := 0,
+							 tid_start := 0,
+							 tid_end := 99,
+							 pc := tcap_configs[2].cfg.own_pc,
+							 ssn := tcap_configs[2].cfg.own_ssn);
+	f_asp_tx_ipa_ext_tcap_routing(tcap_rt_msg, 2);
+
+	/* Configure TCAP routing on ASP "asp-ipa-loadshare-0-1": */
+	tcap_rt_msg.u.add_range.tid_start := 100;
+	tcap_rt_msg.u.add_range.tid_end := 199;
+	f_asp_tx_ipa_ext_tcap_routing(tcap_rt_msg, 3);
+
+
+	/* Transmit a TCAP Continue outside of the range which should rejected with a UDTS */
+	tcap_msg := ts_TCAP_Continue(200, 200);
+	f_asp_tx_tcap(tcap_msg, 0);
+
+	/* expect a UDTS */
+	var template (present) TCAP_N_NOTICE_ind exp_sccp_utds :=
+		tr_TCAP_N_NOTICE_ind(g_tcap[0].sccp_addr_peer,
+				     g_tcap[0].sccp_addr_own,
+				     tcap_msg);
+	timer T := 5.0;
+	var integer rx_asp;
+	T.start;
+	alt {
+	[] SCCP_TCAP[0].receive(exp_sccp_utds) {
+		log("Received UTDS via TCAP[0] ASP");
+		rx_asp := 0;
+		}
+	[] SCCP_TCAP[1].receive(exp_sccp_utds) {
+		log("Received UTDS via TCAP[1] ASP");
+		rx_asp := 1;
+		}
+	[] T.timeout {
+		setverdict(fail, __SCOPE__, "(): Timeout waiting for SCCP UTDS / TCAP message");
+		Misc_Helpers.f_shutdown(__BFILE__, __LINE__);
+		}
+	}
+
+	setverdict(pass);
+}
+
+
 /* TODO: test TCAP Abort message is used.
  * TODO: test TCAP Begin+End message is used.
  * TODO: test TCAP GlobalTitles ISD
@@ -863,6 +918,7 @@
 	execute( TC_tcap_loadshare_ipa_tcap_range_success_pc_ssn2() );
 	execute( TC_tcap_loadshare_ipa_tcap_range_fail_pc_ssn_overlap() );
 	execute( TC_tcap_loadshare_ipa_tcap_norange() );
+	execute( TC_tcap_loadshare_m3ua_to_ipa_udts() );
 }
 
 

