<p>pespin has uploaded this change for <strong>review</strong>.</p><p><a href="https://gerrit.osmocom.org/c/osmo-ttcn3-hacks/+/20947">View Change</a></p><pre style="font-family: monospace,monospace; white-space: pre-wrap;">pcu: Introduce test TC_dl_multislot_tbf<br><br>Some helper functions are introduced to be able to submit and expect<br>messages on a given TRX+TS, which is required for setups with several<br>TRX and PDCH-enabled TS different than the default.<br><br>Change-Id: I417953a4c89dec82500b3b66f08ed648d266d813<br>---<br>M pcu/GPRS_Components.ttcn<br>M pcu/PCU_Tests.ttcn<br>2 files changed, 125 insertions(+), 1 deletion(-)<br><br></pre><pre style="font-family: monospace,monospace; white-space: pre-wrap;">git pull ssh://gerrit.osmocom.org:29418/osmo-ttcn3-hacks refs/changes/47/20947/1</pre><pre style="font-family: monospace,monospace; white-space: pre-wrap;"><span>diff --git a/pcu/GPRS_Components.ttcn b/pcu/GPRS_Components.ttcn</span><br><span>index ec62671..16870fa 100644</span><br><span>--- a/pcu/GPRS_Components.ttcn</span><br><span>+++ b/pcu/GPRS_Components.ttcn</span><br><span>@@ -330,12 +330,48 @@</span><br><span>         return dl_tbf;</span><br><span> }</span><br><span> </span><br><span style="color: hsl(120, 100%, 40%);">+function f_dltbf_num_slots(inout DlTbf dl_tbf)</span><br><span style="color: hsl(120, 100%, 40%);">+runs on MS_BTS_IFACE_CT return uint3_t  {</span><br><span style="color: hsl(120, 100%, 40%);">+    var uint3_t n := 0;</span><br><span style="color: hsl(120, 100%, 40%);">+   for (var integer i := 0; i < lengthof(dl_tbf.ts_mask); i := i + 1) {</span><br><span style="color: hsl(120, 100%, 40%);">+               if (dl_tbf.ts_mask[i] == '1'B) {</span><br><span style="color: hsl(120, 100%, 40%);">+                      n := n + 1;</span><br><span style="color: hsl(120, 100%, 40%);">+           }</span><br><span style="color: hsl(120, 100%, 40%);">+     }</span><br><span style="color: hsl(120, 100%, 40%);">+     return n;</span><br><span style="color: hsl(120, 100%, 40%);">+}</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span> function f_ultbf_inc_bsn(inout UlTbf ul_tbf)</span><br><span> runs on MS_BTS_IFACE_CT {</span><br><span>  ul_tbf.bsn := ul_tbf.bsn + 1;</span><br><span>        ul_tbf.bsn := ul_tbf.bsn mod 128; /* FIXME: EGPRS SNS: 2048 */</span><br><span> }</span><br><span> </span><br><span style="color: hsl(120, 100%, 40%);">+function f_ultbf_next_ts(inout UlTbf ul_tbf)</span><br><span style="color: hsl(120, 100%, 40%);">+runs on MS_BTS_IFACE_CT return uint3_t {</span><br><span style="color: hsl(120, 100%, 40%);">+       /* FIXME: in the future we probably want to store last used internally</span><br><span style="color: hsl(120, 100%, 40%);">+        /* and continue from there */</span><br><span style="color: hsl(120, 100%, 40%);">+ for (var integer i := 0; i < lengthof(ul_tbf.ts_mask); i := i + 1) {</span><br><span style="color: hsl(120, 100%, 40%);">+               if (ul_tbf.ts_mask[i] == '1'B) {</span><br><span style="color: hsl(120, 100%, 40%);">+                      return i;</span><br><span style="color: hsl(120, 100%, 40%);">+             }</span><br><span style="color: hsl(120, 100%, 40%);">+     }</span><br><span style="color: hsl(120, 100%, 40%);">+     setverdict(fail, "No TS available for tx!");</span><br><span style="color: hsl(120, 100%, 40%);">+        f_shutdown(__BFILE__, __LINE__);</span><br><span style="color: hsl(120, 100%, 40%);">+      return 0;</span><br><span style="color: hsl(120, 100%, 40%);">+}</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+function f_ultbf_num_slots(inout UlTbf ul_tbf)</span><br><span style="color: hsl(120, 100%, 40%);">+runs on MS_BTS_IFACE_CT return uint3_t  {</span><br><span style="color: hsl(120, 100%, 40%);">+     var uint3_t n := 0;</span><br><span style="color: hsl(120, 100%, 40%);">+   for (var integer i := 0; i < lengthof(ul_tbf.ts_mask); i := i + 1) {</span><br><span style="color: hsl(120, 100%, 40%);">+               if (ul_tbf.ts_mask[i] == '1'B) {</span><br><span style="color: hsl(120, 100%, 40%);">+                      n := n + 1;</span><br><span style="color: hsl(120, 100%, 40%);">+           }</span><br><span style="color: hsl(120, 100%, 40%);">+     }</span><br><span style="color: hsl(120, 100%, 40%);">+     return n;</span><br><span style="color: hsl(120, 100%, 40%);">+}</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span> function f_ms_use_ra(inout GprsMS ms, uint16_t ra, uint8_t ra_is_11bit := 0)</span><br><span> runs on MS_BTS_IFACE_CT {</span><br><span>  ms.ra_is_11bit := ra_is_11bit;</span><br><span>diff --git a/pcu/PCU_Tests.ttcn b/pcu/PCU_Tests.ttcn</span><br><span>index 67d4484..67d7f82 100644</span><br><span>--- a/pcu/PCU_Tests.ttcn</span><br><span>+++ b/pcu/PCU_Tests.ttcn</span><br><span>@@ -148,6 +148,8 @@</span><br><span>    var boolean g_egprs_only := false;</span><br><span>   var boolean g_force_two_phase_access := false;</span><br><span> </span><br><span style="color: hsl(120, 100%, 40%);">+    var PCUIF_info_ind g_info_ind;</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span>     /* Guard timeout */</span><br><span>  timer g_T_guard := 60.0;</span><br><span> };</span><br><span>@@ -159,6 +161,32 @@</span><br><span>                }</span><br><span> }</span><br><span> </span><br><span style="color: hsl(120, 100%, 40%);">+private function f_arfcn2trxnr(uint10_t arfcn) runs on RAW_PCU_Test_CT return uint3_t {</span><br><span style="color: hsl(120, 100%, 40%);">+   if (PCUIF_Types.mp_pcuif_version >= 10) {</span><br><span style="color: hsl(120, 100%, 40%);">+          for (var integer i := 0; i < lengthof(g_info_ind.trx.v10); i := i + 1) {</span><br><span style="color: hsl(120, 100%, 40%);">+                   if (g_info_ind.trx.v10[i].arfcn == arfcn) {</span><br><span style="color: hsl(120, 100%, 40%);">+                           return i;</span><br><span style="color: hsl(120, 100%, 40%);">+                     }</span><br><span style="color: hsl(120, 100%, 40%);">+             }</span><br><span style="color: hsl(120, 100%, 40%);">+     } else {</span><br><span style="color: hsl(120, 100%, 40%);">+              for (var integer i := 0; i < lengthof(g_info_ind.trx.v09); i := i + 1) {</span><br><span style="color: hsl(120, 100%, 40%);">+                   if (g_info_ind.trx.v09[i].arfcn == arfcn) {</span><br><span style="color: hsl(120, 100%, 40%);">+                           return i;</span><br><span style="color: hsl(120, 100%, 40%);">+                     }</span><br><span style="color: hsl(120, 100%, 40%);">+             }</span><br><span style="color: hsl(120, 100%, 40%);">+     }</span><br><span style="color: hsl(120, 100%, 40%);">+     setverdict(fail, "Unable to find TRX NR for arfcn ", arfcn);</span><br><span style="color: hsl(120, 100%, 40%);">+        f_shutdown(__BFILE__, __LINE__);</span><br><span style="color: hsl(120, 100%, 40%);">+      return 0;</span><br><span style="color: hsl(120, 100%, 40%);">+}</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+private function f_ms_tx_TsTrxBtsNum(inout GprsMS ms)</span><br><span style="color: hsl(120, 100%, 40%);">+runs on RAW_PCU_Test_CT return TsTrxBtsNum {</span><br><span style="color: hsl(120, 100%, 40%);">+   var uint3_t ts_nr := f_ultbf_next_ts(ms.ul_tbf);</span><br><span style="color: hsl(120, 100%, 40%);">+      var uint3_t trx_nr := f_arfcn2trxnr(ms.ul_tbf.arfcn);</span><br><span style="color: hsl(120, 100%, 40%);">+ return valueof(ts_TsTrxBtsNum(ts_nr, trx_nr));</span><br><span style="color: hsl(120, 100%, 40%);">+}</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span> private function f_pcuvty_set_allowed_cs_mcs() runs on RAW_PCU_Test_CT {</span><br><span>      f_vty_config2(PCUVTY, {"pcu"}, "cs " & int2str(g_cs_initial_dl) & " " & int2str(g_cs_initial_ul));</span><br><span>         f_vty_config2(PCUVTY, {"pcu"}, "cs max " & int2str(g_cs_max_dl) & " " & int2str(g_cs_max_ul));</span><br><span>@@ -210,6 +238,7 @@</span><br><span> </span><br><span> function f_init_raw(charstring id, template (value) PCUIF_info_ind info_ind := ts_PCUIF_INFO_default)</span><br><span> runs on RAW_PCU_Test_CT {</span><br><span style="color: hsl(120, 100%, 40%);">+      g_info_ind := valueof(info_ind);</span><br><span>     /* Start the guard timer */</span><br><span>  g_T_guard.start;</span><br><span>     activate(as_Tguard_RAW());</span><br><span>@@ -232,7 +261,7 @@</span><br><span>     connect(self:STATSD_PROC, vc_STATSD:STATSD_PROC);</span><br><span> </span><br><span>        vc_PCUIF.start(f_PCUIF_CT_handler(mp_pcu_sock_path));</span><br><span style="color: hsl(0, 100%, 40%);">-   vc_BTS.start(f_BTS_CT_handler(0, valueof(info_ind)));</span><br><span style="color: hsl(120, 100%, 40%);">+ vc_BTS.start(f_BTS_CT_handler(0, valueof(g_info_ind)));</span><br><span> </span><br><span>  /* Wait until the BTS is ready (SI13 negotiated) */</span><br><span>  BTS.receive(tr_RAW_PCU_EV(BTS_EV_SI13_NEGO));</span><br><span>@@ -1636,6 +1665,64 @@</span><br><span>       f_shutdown(__BFILE__, __LINE__, final := true);</span><br><span> }</span><br><span> </span><br><span style="color: hsl(120, 100%, 40%);">+/* Verify allocation and use of multislot tbf. SYS#5131 */</span><br><span style="color: hsl(120, 100%, 40%);">+testcase TC_dl_multislot_tbf() runs on RAW_PCU_Test_CT {</span><br><span style="color: hsl(120, 100%, 40%);">+        var PCUIF_info_ind info_ind := valueof(ts_PCUIF_INFO_default);</span><br><span style="color: hsl(120, 100%, 40%);">+        var octetstring data := f_rnd_octstring(10);</span><br><span style="color: hsl(120, 100%, 40%);">+  var PacketDlAssign dl_tbf_ass;</span><br><span style="color: hsl(120, 100%, 40%);">+        var RlcmacDlBlock dl_block;</span><br><span style="color: hsl(120, 100%, 40%);">+   var uint32_t poll_fn;</span><br><span style="color: hsl(120, 100%, 40%);">+ var uint32_t sched_fn;</span><br><span style="color: hsl(120, 100%, 40%);">+        var GprsMS ms;</span><br><span style="color: hsl(120, 100%, 40%);">+        timer T := 5.0;</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+     /* Initialize NS/BSSGP side */</span><br><span style="color: hsl(120, 100%, 40%);">+        f_init_bssgp();</span><br><span style="color: hsl(120, 100%, 40%);">+       /* Initialize GPRS MS side */</span><br><span style="color: hsl(120, 100%, 40%);">+ f_init_gprs_ms();</span><br><span style="color: hsl(120, 100%, 40%);">+     ms := g_ms[0]; /* We only use first MS in this test */</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+      /* Only 1 TRX with 8 PDCH */</span><br><span style="color: hsl(120, 100%, 40%);">+  for (var integer i := 0; i < lengthof(info_ind.trx.v10); i := i + 1) {</span><br><span style="color: hsl(120, 100%, 40%);">+             info_ind.trx.v10[i].pdch_mask := '00000000'B;</span><br><span style="color: hsl(120, 100%, 40%);">+ }</span><br><span style="color: hsl(120, 100%, 40%);">+     info_ind.trx.v10[0].pdch_mask := '11111111'B;</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+       /* Initialize the PCU interface abstraction */</span><br><span style="color: hsl(120, 100%, 40%);">+        f_init_raw(testcasename(), info_ind);</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+       /* Establish BSSGP connection to the PCU */</span><br><span style="color: hsl(120, 100%, 40%);">+   f_bssgp_establish();</span><br><span style="color: hsl(120, 100%, 40%);">+  f_bssgp_client_llgmm_assign('FFFFFFFF'O, ms.tlli);</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+  /* Establish an Uplink TBF, this way the PCU can send DL Assignment</span><br><span style="color: hsl(120, 100%, 40%);">+     through PDCH (no multiblock assignment possible through PCH) */</span><br><span style="color: hsl(120, 100%, 40%);">+     f_ms_establish_ul_tbf(ms);</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+  /* Send one UL block (with TLLI since we are in One-Phase Access</span><br><span style="color: hsl(120, 100%, 40%);">+         contention resoultion) and make sure it is ACKED fine */</span><br><span style="color: hsl(120, 100%, 40%);">+   f_ms_tx_ul_data_block(ms, data, with_tlli := true, nr := f_ms_tx_TsTrxBtsNum(ms));</span><br><span style="color: hsl(120, 100%, 40%);">+    /* DL ACK/NACK sets poll+rrbp requesting PACKET CONTROL ACK */</span><br><span style="color: hsl(120, 100%, 40%);">+        f_rx_rlcmac_dl_block_exp_ack_nack(dl_block, poll_fn, nr := f_ms_tx_TsTrxBtsNum(ms));</span><br><span style="color: hsl(120, 100%, 40%);">+  //f_ms_tx_ul_block(ms, ts_RLCMAC_CTRL_ACK(ms.tlli), poll_fn, nr := f_ms_tx_TsTrxBtsNum(ms));</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+        /* SGSN sends some DL data, PCU will page on CCCH (PCH) */</span><br><span style="color: hsl(120, 100%, 40%);">+    var MultislotCap_GPRS_BSSGP mscap_gprs := {</span><br><span style="color: hsl(120, 100%, 40%);">+           gprsmultislotclass := '10010'B, /* MS class 18, supports 8 DL and 8 UL */</span><br><span style="color: hsl(120, 100%, 40%);">+             gprsextendeddynalloccap := '0'B</span><br><span style="color: hsl(120, 100%, 40%);">+       };</span><br><span style="color: hsl(120, 100%, 40%);">+    var MSRadioAccessCapabilityV_BSSGP ms_racap := { valueof(ts_RaCapRec_BSSGP('0001'B /* E-GSM */, mscap_gprs, omit)) };</span><br><span style="color: hsl(120, 100%, 40%);">+ BSSGP[0].send(ts_BSSGP_DL_UD(ms.tlli, data, ms_racap));</span><br><span style="color: hsl(120, 100%, 40%);">+       dl_block := f_ms_rx_pkt_ass_pacch(ms, sched_fn, tr_RLCMAC_DL_PACKET_ASS, nr := f_ms_tx_TsTrxBtsNum(ms));</span><br><span style="color: hsl(120, 100%, 40%);">+      if (f_dltbf_num_slots(ms.dl_tbf) != 4) {</span><br><span style="color: hsl(120, 100%, 40%);">+              setverdict(fail, "Expected 4 PDCH slot allocated but got ", f_dltbf_num_slots(ms.dl_tbf));</span><br><span style="color: hsl(120, 100%, 40%);">+          f_shutdown(__BFILE__, __LINE__);</span><br><span style="color: hsl(120, 100%, 40%);">+      }</span><br><span style="color: hsl(120, 100%, 40%);">+     f_ms_tx_ul_block(ms, ts_RLCMAC_CTRL_ACK(ms.tlli), sched_fn, nr := f_ms_tx_TsTrxBtsNum(ms));</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ f_shutdown(__BFILE__, __LINE__, final := true);</span><br><span style="color: hsl(120, 100%, 40%);">+}</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span> /* Test scenario where MS wants to request a new TBF once the current one is</span><br><span>  * ending, by means of sending a Packet Resource Request on ul slot provided by</span><br><span>  * last Pkt Ul ACK's RRBP.</span><br><span>@@ -2571,6 +2658,7 @@</span><br><span>            execute( TC_pcuif_fh_pkt_ass_ul() );</span><br><span>                 execute( TC_pcuif_fh_pkt_ass_dl() );</span><br><span>                 execute( TC_multitrx_multims_alloc() );</span><br><span style="color: hsl(120, 100%, 40%);">+               execute( TC_dl_multislot_tbf() );</span><br><span>    }</span><br><span> </span><br><span>        execute( TC_pcuif_info_ind_subsequent() );</span><br><span></span><br></pre><p>To view, visit <a href="https://gerrit.osmocom.org/c/osmo-ttcn3-hacks/+/20947">change 20947</a>. To unsubscribe, or for help writing mail filters, visit <a href="https://gerrit.osmocom.org/settings">settings</a>.</p><div itemscope itemtype="http://schema.org/EmailMessage"><div itemscope itemprop="action" itemtype="http://schema.org/ViewAction"><link itemprop="url" href="https://gerrit.osmocom.org/c/osmo-ttcn3-hacks/+/20947"/><meta itemprop="name" content="View Change"/></div></div>

<div style="display:none"> Gerrit-Project: osmo-ttcn3-hacks </div>
<div style="display:none"> Gerrit-Branch: master </div>
<div style="display:none"> Gerrit-Change-Id: I417953a4c89dec82500b3b66f08ed648d266d813 </div>
<div style="display:none"> Gerrit-Change-Number: 20947 </div>
<div style="display:none"> Gerrit-PatchSet: 1 </div>
<div style="display:none"> Gerrit-Owner: pespin <pespin@sysmocom.de> </div>
<div style="display:none"> Gerrit-MessageType: newchange </div>