asterisk: IMS: Validate Via port matches the ipsec port-c one

Related: SYS#6964
Change-Id: I3f8b2112d40dd5f018abb8bc00b9e1be16586a9b
diff --git a/asterisk/IMS_ConnectionHandler.ttcn b/asterisk/IMS_ConnectionHandler.ttcn
index f10e2aa..c06df15 100644
--- a/asterisk/IMS_ConnectionHandler.ttcn
+++ b/asterisk/IMS_ConnectionHandler.ttcn
@@ -595,7 +595,7 @@
 				?,
 				tr_From(),
 				tr_To(),
-				tr_Via_from(?),
+				tr_Via_from(f_tr_HostPort(g_pars.subscr.remote_sip_host, g_pars.subscr.ipsec_remote_port_c)),
 				authorization := authorization);
 		SIP.receive(exp_req) -> value g_rx_sip_req;
 
@@ -662,7 +662,7 @@
 				?,
 				tr_From(),
 				tr_To(),
-				tr_Via_from(?),
+				tr_Via_from(f_tr_HostPort(g_pars.subscr.remote_sip_host, g_pars.subscr.ipsec_remote_port_c)),
 				expires := tr_Expires(int2str(0)),
 				require := tr_Require(superset("sec-agree")),
 				security_client := tr_Security_client(superset(tr_Security_mechanism("ipsec-3gpp",
@@ -759,7 +759,7 @@
 			      ?,
 			      tr_From(tr_Addr_Union_from_val(g_pars.subscr.cp.calling.addr), *),
 			      tr_To(tr_Addr_Union_from_val(g_pars.subscr.cp.called.addr), *),
-			      tr_Via_from(f_tr_HostPort(g_pars.subscr.remote_sip_host, g_pars.subscr.remote_sip_port)),
+			      tr_Via_from(f_tr_HostPort(g_pars.subscr.remote_sip_host, g_pars.subscr.ipsec_remote_port_c)),
 			      ?, ?);
 	var charstring sip_expect_str := log2str(exp_req);
 
@@ -815,7 +815,7 @@
 			   g_pars.subscr.cp.sip_call_id,
 			   g_pars.subscr.cp.from_addr,
 			   g_pars.subscr.cp.to_addr,
-			   tr_Via_from(f_tr_HostPort(g_pars.subscr.remote_sip_host, g_pars.subscr.remote_sip_port)),
+			   tr_Via_from(f_tr_HostPort(g_pars.subscr.remote_sip_host, g_pars.subscr.ipsec_remote_port_c)),
 			   exp_seq_nr);
 	var charstring sip_expect_str := log2str(exp_req);