Change in osmo-ttcn3-hacks[master]: BTS_Tests: make ts_LapdmAddr / ts_LAPDm_AB more friendly

[fixeria]

fixeria has uploaded this change for review. ( https://gerrit.osmocom.org/c/osmo-ttcn3-hacks/+/21318 )


Change subject: BTS_Tests: make ts_LapdmAddr / ts_LAPDm_AB more friendly
......................................................................

BTS_Tests: make ts_LapdmAddr / ts_LAPDm_AB more friendly

Change-Id: I35f84ebd6cb884f3ab63d1c2b77d8ed61acd5c74
---
M bts/BTS_Tests.ttcn
1 file changed, 15 insertions(+), 7 deletions(-)



  git pull ssh://gerrit.osmocom.org:29418/osmo-ttcn3-hacks refs/changes/18/21318/1

diff --git a/bts/BTS_Tests.ttcn b/bts/BTS_Tests.ttcn
index c2a0d6d..ad1d926 100644
--- a/bts/BTS_Tests.ttcn
+++ b/bts/BTS_Tests.ttcn
@@ -1832,7 +1832,9 @@
  * Measurement Processing / Reporting
  ***********************************************************************/
 
-private template LapdmAddressField ts_LapdmAddr(LapdmSapi sapi, boolean c_r) := {
+private template (value) LapdmAddressField
+ts_LapdmAddr(template (value) LapdmSapi sapi,
+	     template (value) boolean c_r) := {
 	spare := '0'B,
 	lpd := 0,
 	sapi := sapi,
@@ -1840,22 +1842,28 @@
 	ea := true
 }
 
-private template LapdmFrameAB ts_LAPDm_AB(LapdmSapi sapi, boolean c_r, boolean p, octetstring pl) := {
+private template (value) LapdmFrameAB
+ts_LAPDm_AB(template (value) LapdmSapi sapi,
+	    template (value) GsmRrL3Message l3,
+	    template (value) boolean c_r := false,
+	    template (value) boolean p := false) := {
 	addr := ts_LapdmAddr(sapi, c_r),
-	ctrl := ts_LapdmCtrlUI(p),
+	ctrl := ts_LapdmCtrlUI(valueof(p)),
 	len := 0, /* overwritten */
 	m := false,
 	el := 1,
-	payload := pl
+	payload := enc_GsmRrL3Message(valueof(l3))
 }
 
 /* handle incoming downlink SACCH and respond with uplink SACCH (meas res) */
 private altstep as_l1_sacch() runs on ConnHdlr {
+	var template (value) LapdmFrameAB lb;
 	var L1ctlDlMessage l1_dl;
+
 	[] L1CTL.receive(tr_L1CTL_DATA_IND(g_chan_nr, tr_RslLinkID_SACCH(?))) -> value l1_dl {
 		log("SACCH received: ", l1_dl.payload.data_ind.payload);
-		var GsmRrL3Message meas_rep := valueof(ts_MEAS_REP(true, mp_rxlev_exp, mp_rxlev_exp));
-		var LapdmFrameAB lb := valueof(ts_LAPDm_AB(0, false, false, enc_GsmRrL3Message(meas_rep)));
+
+		lb := ts_LAPDm_AB(0, ts_MEAS_REP(true, mp_rxlev_exp, mp_rxlev_exp));
 		log("LAPDm: ", lb);
 
 		var template (value) SacchL1Header l1h := ts_SacchL1Header(
@@ -1863,7 +1871,7 @@
 			g_pars.l1_pars.ms_actual_ta);
 
 		/* TODO: we can use an extension of TTCN-3 for that, i.e. PADDING('2B'O) */
-		var octetstring l2 := f_pad_oct(enc_LapdmFrameAB(lb), 21, '2B'O);
+		var octetstring l2 := f_pad_oct(enc_LapdmFrameAB(valueof(lb)), 21, '2B'O);
 
 		log("Sending Measurement Report: ", l1h, l2);
 		L1CTL.send(ts_L1CTL_DATA_REQ_SACCH(g_chan_nr, ts_RslLinkID_SACCH(0), l1h, l2));

-- 
To view, visit https://gerrit.osmocom.org/c/osmo-ttcn3-hacks/+/21318
To unsubscribe, or for help writing mail filters, visit https://gerrit.osmocom.org/settings

Gerrit-Project: osmo-ttcn3-hacks
Gerrit-Branch: master
Gerrit-Change-Id: I35f84ebd6cb884f3ab63d1c2b77d8ed61acd5c74
Gerrit-Change-Number: 21318
Gerrit-PatchSet: 1
Gerrit-Owner: fixeria <vyanitskiy at sysmocom.de>
Gerrit-MessageType: newchange
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.osmocom.org/pipermail/gerrit-log/attachments/20201124/00dc756e/attachment.htm>