mgw: Test for duplicate transmission of DLCX
diff --git a/mgw/MGCP_Test.ttcn b/mgw/MGCP_Test.ttcn
index d13fad3..1e037f0 100644
--- a/mgw/MGCP_Test.ttcn
+++ b/mgw/MGCP_Test.ttcn
@@ -705,6 +705,34 @@
/* TODO: Double-DLCX (retransmission) */
+ testcase TC_crcx_and_dlcx_retrans() runs on dummy_CT {
+ var template MgcpCommand cmd;
+ var MgcpResponse resp;
+ var MgcpEndpoint ep := "5@mgw";
+ var MgcpCallId call_id := '51229'H;
+ var template MgcpResponse rtmpl := {
+ line := {
+ code := "200",
+ string := "OK"
+ },
+ params:= { },
+ sdp := omit
+ };
+
+ f_init(ep);
+
+ cmd := ts_CRCX(get_next_trans_id(), ep, "recvonly", call_id);
+ resp := mgcp_transceive_mgw(cmd, tr_CRCX_ACK);
+
+ cmd := ts_DLCX(get_next_trans_id(), ep, call_id);
+ resp := mgcp_transceive_mgw(cmd, rtmpl);
+ resp := mgcp_transceive_mgw(cmd, rtmpl);
+
+ setverdict(pass);
+ }
+
+
+
/* TODO: Double-DLCX (no retransmission) */
@@ -734,5 +762,6 @@
execute(TC_crcx_and_dlcx_ep());
execute(TC_crcx_and_dlcx_ep_callid_inval());
execute(TC_crcx_and_dlcx_ep_callid_connid_inval());
+ execute(TC_crcx_and_dlcx_retrans());
}
}