msc: Introduce test TC_(iu_)chan_rel_sccp_tiar_timeout

Verify SCCP T(iar) timeout triggers release of established channel.

Related: OS#4343
Change-Id: Id6488a262e656f5c8fabb4e81f4797b305eb09e2
diff --git a/msc/MSC_Tests_Iu.ttcn b/msc/MSC_Tests_Iu.ttcn
index b6b0983..e894598 100644
--- a/msc/MSC_Tests_Iu.ttcn
+++ b/msc/MSC_Tests_Iu.ttcn
@@ -80,6 +80,21 @@
 	vc_conn.done;
 }
 
+testcase TC_iu_lu_and_mo_call_sccp_tiar_timeout() runs on MTC_CT {
+	var BSC_ConnHdlr vc_conn;
+
+	/* Set T(iar) in MSC low enough that it will trigger before other side
+	   has time to keep alive with a T(ias). Keep recommended ratio of
+	   T(iar) >= T(ias)*2 */
+	g_msc_sccp_timer_ias := 2;
+	g_msc_sccp_timer_iar := 5;
+
+	f_init(3);
+
+	vc_conn := f_start_handler(refers(f_lu_and_mo_call_sccp_tiar_timeout), 1019, ran_idx := 2, ran_is_geran := false);
+	vc_conn.done;
+}
+
 testcase TC_iu_lu_auth_sai_timeout() runs on MTC_CT {
 	var BSC_ConnHdlr vc_conn;
 	f_init(3);
@@ -515,6 +530,7 @@
 	execute( TC_iu_lu_imsi_timeout_tmsi_realloc() );
 	execute( TC_iu_cmserv_imsi_unknown() );
 	execute( TC_iu_lu_and_mo_call() );
+	execute( TC_iu_lu_and_mo_call_sccp_tiar_timeout() );
 	execute( TC_iu_lu_auth_sai_timeout() );
 	execute( TC_iu_lu_auth_sai_err() );
 	execute( TC_iu_lu_release_request() );