gbproxy: Add test for Uplink-Unitdata

Change-Id: I912ba5a83c852e6ad9524e06a8e76e9f16a517d8
This commit is contained in:
Harald Welte 2020-11-15 21:45:49 +01:00 committed by daniel
parent fbae83ffba
commit 9268601b27
1 changed files with 38 additions and 0 deletions

View File

@ -566,8 +566,46 @@ friend function f_bssgp_resume(OCT1 susp_ref, integer ran_idx := 0) runs on BSSG
}
/* send uplink-unitdata of a variety of different sizes; expect it to show up on SGSN */
private function f_TC_ul_unitdata(charstring id) runs on BSSGP_ConnHdlr {
var integer i;
for (i := 0; i < 1024; i := i+1) {
var octetstring payload := f_rnd_octstring(i);
var template (value) PDU_BSSGP pdu_tx := ts_BSSGP_UL_UD(g_pars.tlli, g_pars.bssgp_cell_id[0], payload);
/* we cannot use pdu_tx as there are some subtle differences in the length field :/ */
var template (present) PDU_BSSGP pdu_rx := tr_BSSGP_UL_UD(g_pars.tlli, g_pars.bssgp_cell_id[0], payload);
PCU[0].send(pdu_tx);
alt {
[] SGSN[0].receive(pdu_rx);
/* FIXME: Those should be handled before the ConnHdlr is started */
[] SGSN[0].receive(BssgpStatusIndication:{*,?,BVC_S_UNBLOCKED}) { repeat; }
[] SGSN[0].receive {
setverdict(fail, "SGSN Received unexpected");
mtc.stop;
}
}
}
setverdict(pass);
}
testcase TC_ul_unitdata() runs on test_CT
{
var BSSGP_ConnHdlr vc_conn;
f_init();
vc_conn := f_start_handler(refers(f_TC_ul_unitdata), testcasename(), g_pcu, g_sgsn, 1);
vc_conn.done;
/* TODO: start multiple handlers (UEs) on various cells on same and other NSEs */
f_cleanup();
}
control {
execute( TC_BVC_bringup() );
execute( TC_ul_unitdata() );
}