ttcn3
/
osmo-ttcn3-hacks
mirror of https://gerrit.osmocom.org/osmo-ttcn3-hacks
10
0
Fork 1
Code Issues Releases Wiki Activity

BTS_Tests_SMSCB: use existing tr_PAG_REQ1 and t_MI_NoIdentity 

Change-Id: I018e1d875c85fe3958fd184fe0d2b0f56d1e343a
This commit is contained in:
Vadim Yanitskiy 2020-03-28 05:11:26 +07:00
parent 7e0022697c
commit a9a198dbd1
1 changed files with 3 additions and 29 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

32
bts/BTS_Tests_SMSCB.ttcn
View File

@ -23,6 +23,7 @@ import from L1CTL_Types all;
import from LAPDm_Types all;
import from IPA_Emulation all;
import from GSM_RR_Types all;
import from L3_Templates all;
import from RSL_Types all;
@ -884,33 +885,6 @@ private template GsmRrMessage tr_PagingType1 := {
payload :=?
};
private template GsmRrMessage tr_PagingType1_empty := {
header := t_RrHeader(PAGING_REQUEST_TYPE_1, 5),
payload := {
pag_req_1 := {
chan_needed := {
second := CHAN_NEED_ANY,
first := CHAN_NEED_ANY
},
page_mode := PAGE_MODE_NORMAL,
mi1 := {
lengthIndicator := 1,
mobileIdentityV := {
typeOfIdentity := '000'B,
oddEvenInd_identity := {
no_identity := {
oddevenIndicator := '0'B,
fillerDigits := 'F'H
}
}
}
},
mi2 := omit,
rest_octets := ?
}
}
};
/* we expect four blocks of 14 bytes, let's fill them with content easily distinguishable */
const octetstring c_etws_seg0 := '000102030405060708090a0b0c0d'O;
const octetstring c_etws_seg1 := '101112131415161718191a1b1c1d'O;
@ -941,7 +915,7 @@ testcase TC_etws_p1ro() runs on test_CT {
[] L1CTL.receive(tr_L1CTL_DATA_IND(t_chan_nr)) -> value dl {
var GsmRrMessage l3 := dec_GsmRrMessage(dl.payload.data_ind.payload);
select (l3) {
case (tr_PagingType1_empty) {
case (tr_PAG_REQ1(tr_MI_LV(t_MI_NoIdentity()))) {
var octetstring p1ro := l3.payload.pag_req_1.rest_octets;
var bitstring midamble := oct2bit(substr(p1ro, 0, 3));
var octetstring segment := substr(p1ro, 3, lengthof(p1ro)-3);
@ -1037,7 +1011,7 @@ testcase TC_etws_p1ro_end() runs on test_CT {
[] L1CTL.receive(tr_L1CTL_DATA_IND(t_chan_nr)) -> value dl {
var GsmRrMessage l3 := dec_GsmRrMessage(dl.payload.data_ind.payload);
select (l3) {
case (tr_PagingType1_empty) { repeat; }
case (tr_PAG_REQ1(tr_MI_LV(t_MI_NoIdentity()))) { repeat; }
case (tr_PagingType1) {
setverdict(fail, "Received non-empty PT1 after disabling ETWS PN: ", l3);
}