<p>laforge <strong>submitted</strong> this change.</p><p><a href="https://gerrit.osmocom.org/c/osmo-ttcn3-hacks/+/20726">View Change</a></p><div style="white-space:pre-wrap">Approvals:
  Jenkins Builder: Verified
  laforge: Looks good to me, approved

</div><pre style="font-family: monospace,monospace; white-space: pre-wrap;">BTS_Tests: introduce TC_ms_pwr_ctrl_constant()<br><br>This test case is aimed to verify that the MS power level remains<br>constant when 'rx-current' does not change and equals 'rx-target'.<br><br>Change-Id: Ifdafa03506102ff15f4d6dc304fff7d7e8f48170<br>Related: SYS#4916<br>---<br>M bts/BTS_Tests.ttcn<br>1 file changed, 112 insertions(+), 0 deletions(-)<br><br></pre><pre style="font-family: monospace,monospace; white-space: pre-wrap;"><span>diff --git a/bts/BTS_Tests.ttcn b/bts/BTS_Tests.ttcn</span><br><span>index aa06180..9503bec 100644</span><br><span>--- a/bts/BTS_Tests.ttcn</span><br><span>+++ b/bts/BTS_Tests.ttcn</span><br><span>@@ -105,6 +105,7 @@</span><br><span>         integer mp_bts_tx_pwr_att_exp := 20; /* Expected Tx Power attenuation wrt to Tx Nominal Output Power, in dB */</span><br><span>       integer mp_ms_actual_ta_exp := 0;</span><br><span>    integer mp_timing_offset_256syms_exp := 512;</span><br><span style="color: hsl(120, 100%, 40%);">+  integer mp_uplink_power_target := -75;</span><br><span>       /* Time to wait for RSL conn from BTS during startup of test */</span><br><span>      float mp_ipa_up_timeout := 15.0;</span><br><span>     float mp_ipa_up_delay := 0.0;</span><br><span>@@ -6809,6 +6810,115 @@</span><br><span>      IPA_Testing.f_run_TC_chopped_ipa_payload(mp_rsl_ip, mp_rsl_port, LISTEN_FOR_CLIENT);</span><br><span> }</span><br><span> </span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+/* Callback function to be called by as_TC_ms_pwr_ctrl_constant().</span><br><span style="color: hsl(120, 100%, 40%);">+ * Return value: Measurement Report to be sent (encoded octetstring). */</span><br><span style="color: hsl(120, 100%, 40%);">+type function f_TC_ms_pwr_ctrl_cb(inout SacchL1Header l1h, integer num_blocks)</span><br><span style="color: hsl(120, 100%, 40%);">+ runs on ConnHdlr return octetstring;</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+private altstep as_TC_ms_pwr_ctrl(f_TC_ms_pwr_ctrl_cb cb, inout integer num_blocks)</span><br><span style="color: hsl(120, 100%, 40%);">+runs on ConnHdlr {</span><br><span style="color: hsl(120, 100%, 40%);">+       var L1ctlDlMessage l1_dl;</span><br><span style="color: hsl(120, 100%, 40%);">+     var SacchL1Header l1h;</span><br><span style="color: hsl(120, 100%, 40%);">+        var octetstring l2;</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ [] L1CTL.receive(tr_L1CTL_DATA_IND(g_chan_nr, tr_RslLinkID_SACCH(?))) -> value l1_dl {</span><br><span style="color: hsl(120, 100%, 40%);">+             /* Parse the L1 SACCH header (MS Power Level & Timing Advance) */</span><br><span style="color: hsl(120, 100%, 40%);">+         l1h := dec_SacchL1Header(substr(l1_dl.payload.data_ind.payload, 0, 2));</span><br><span style="color: hsl(120, 100%, 40%);">+               log("as_TC_ms_pwr_ctrl(): Rx SACCH L1 header: ", l1h);</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+            /* Pass it to the user specified call-back function */</span><br><span style="color: hsl(120, 100%, 40%);">+                l2 := cb.apply(l1h, num_blocks);</span><br><span style="color: hsl(120, 100%, 40%);">+              /* Send a Measurement Report generated by the call-back */</span><br><span style="color: hsl(120, 100%, 40%);">+            L1CTL.send(ts_L1CTL_DATA_REQ_SACCH(l1_dl.dl_info.chan_nr,</span><br><span style="color: hsl(120, 100%, 40%);">+                                                l1_dl.dl_info.link_id,</span><br><span style="color: hsl(120, 100%, 40%);">+                                                l1h, l2));</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+               /* Shall we keep going? */</span><br><span style="color: hsl(120, 100%, 40%);">+            num_blocks := num_blocks - 1;</span><br><span style="color: hsl(120, 100%, 40%);">+         log("as_TC_ms_pwr_ctrl(): ", num_blocks, " SACCH blocks remaining");</span><br><span style="color: hsl(120, 100%, 40%);">+              if (num_blocks > 0) { repeat; }</span><br><span style="color: hsl(120, 100%, 40%);">+            }</span><br><span style="color: hsl(120, 100%, 40%);">+     [] L1CTL.receive { repeat; }</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_TC_ms_pwr_ctrl_cb_def(inout SacchL1Header l1h, integer num_blocks)</span><br><span style="color: hsl(120, 100%, 40%);">+runs on ConnHdlr return octetstring {</span><br><span style="color: hsl(120, 100%, 40%);">+       /* Command the L1 to apply received parameters */</span><br><span style="color: hsl(120, 100%, 40%);">+     f_L1CTL_PARAM(L1CTL, l1h.actual_ta, l1h.ms_power_lvl);</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+      /* Dummy measurement report (the results are invalid) */</span><br><span style="color: hsl(120, 100%, 40%);">+      return f_pad_oct('010349'O & '0615004001C0'O, 21, '00'O);</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_TC_ms_pwr_ctrl_cb_const(inout SacchL1Header l1h, integer num_blocks)</span><br><span style="color: hsl(120, 100%, 40%);">+runs on ConnHdlr return octetstring {</span><br><span style="color: hsl(120, 100%, 40%);">+    if (l1h.ms_power_lvl != g_pars.l1_pars.ms_power_level) {</span><br><span style="color: hsl(120, 100%, 40%);">+              setverdict(fail, "Unexpected MS Power level change: ",</span><br><span style="color: hsl(120, 100%, 40%);">+                         g_pars.l1_pars.ms_power_level, " -> ",</span><br><span style="color: hsl(120, 100%, 40%);">+                           l1h.ms_power_lvl);</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 f_TC_ms_pwr_ctrl_cb_def(l1h, num_blocks);</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%);">+/* Make sure that MS power level remains constant when 'rx-current' equals 'rx-target' */</span><br><span style="color: hsl(120, 100%, 40%);">+private function f_TC_ms_pwr_ctrl_constant(charstring id)</span><br><span style="color: hsl(120, 100%, 40%);">+runs on ConnHdlr {</span><br><span style="color: hsl(120, 100%, 40%);">+       var integer num_blocks := 8;</span><br><span style="color: hsl(120, 100%, 40%);">+  timer T := int2float(num_blocks);</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+   f_l1_tune(L1CTL);</span><br><span style="color: hsl(120, 100%, 40%);">+     RSL.clear;</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+  /* These IEs are needed for autonomous MS power control */</span><br><span style="color: hsl(120, 100%, 40%);">+    var template (value) RSL_IE_List ies := {</span><br><span style="color: hsl(120, 100%, 40%);">+             t_RSL_IE(RSL_IE_MS_POWER, RSL_IE_Body:{</span><br><span style="color: hsl(120, 100%, 40%);">+                        ms_power := ts_RSL_IE_MS_Power(g_pars.l1_pars.ms_power_level)</span><br><span style="color: hsl(120, 100%, 40%);">+                }),</span><br><span style="color: hsl(120, 100%, 40%);">+           t_RSL_IE(RSL_IE_MS_POWER_PARAM, RSL_IE_Body:{</span><br><span style="color: hsl(120, 100%, 40%);">+                  ms_power_params := ts_RSL_IE_MS_Power_Parameters(''O)</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%);">+  /* Ensure that 'rx-current' equals 'rx-target' */</span><br><span style="color: hsl(120, 100%, 40%);">+     f_trxc_fake_rssi(mp_uplink_power_target);</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+   /* Establish a dedicated channel */</span><br><span style="color: hsl(120, 100%, 40%);">+   f_est_dchan(more_ies := valueof(ies));</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+      L1CTL.clear;</span><br><span style="color: hsl(120, 100%, 40%);">+  T.start;</span><br><span style="color: hsl(120, 100%, 40%);">+      alt {</span><br><span style="color: hsl(120, 100%, 40%);">+ [] as_TC_ms_pwr_ctrl(refers(f_TC_ms_pwr_ctrl_cb_const), num_blocks);</span><br><span style="color: hsl(120, 100%, 40%);">+  [] T.timeout {</span><br><span style="color: hsl(120, 100%, 40%);">+                setverdict(fail, "Not all SACCH blocks were processed in time, ",</span><br><span style="color: hsl(120, 100%, 40%);">+                            num_blocks, " were not handled");</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%);">+testcase TC_ms_pwr_ctrl_constant() runs on test_CT {</span><br><span style="color: hsl(120, 100%, 40%);">+    var ConnHdlr vc_conn;</span><br><span style="color: hsl(120, 100%, 40%);">+ var ConnHdlrPars pars;</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+      f_init();</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+   /* Explicitly configure the Uplink power target (in dBm) */</span><br><span style="color: hsl(120, 100%, 40%);">+   f_vty_config(BTSVTY, "bts 0", "uplink-power-target " & int2str(mp_uplink_power_target));</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+    for (var integer i := 0; i < sizeof(g_AllChanTypes); i := i + 1) {</span><br><span style="color: hsl(120, 100%, 40%);">+         pars := valueof(t_Pars(g_AllChanTypes[i], ts_RSL_ChanMode_SIGN));</span><br><span style="color: hsl(120, 100%, 40%);">+             log(testcasename(), ": starting on ", pars.chan_nr);</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+              vc_conn := f_start_handler(refers(f_TC_ms_pwr_ctrl_constant),</span><br><span style="color: hsl(120, 100%, 40%);">+                                    pars, trxc_comp := true);</span><br><span style="color: hsl(120, 100%, 40%);">+          vc_conn.done;</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%);">+   /* No need to reset Uplink power parameters - the IUT restarts anyway */</span><br><span style="color: hsl(120, 100%, 40%);">+      Misc_Helpers.f_shutdown(__BFILE__, __LINE__);</span><br><span style="color: hsl(120, 100%, 40%);">+}</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span> /* test generation of RLL ERR IND based on Um errors (TS 48.058 3.9) */</span><br><span> /*     protocol error as per 44.006 */</span><br><span> /*   link layer failure (repetition of I-frame N200 times without ACK */</span><br><span>@@ -6990,6 +7100,8 @@</span><br><span> </span><br><span>      execute( TC_chopped_ipa_ping() );</span><br><span>    execute( TC_chopped_ipa_payload() );</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+        execute( TC_ms_pwr_ctrl_constant() );</span><br><span> }</span><br><span> </span><br><span> </span><br><span></span><br></pre><p>To view, visit <a href="https://gerrit.osmocom.org/c/osmo-ttcn3-hacks/+/20726">change 20726</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/+/20726"/><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: Ifdafa03506102ff15f4d6dc304fff7d7e8f48170 </div>
<div style="display:none"> Gerrit-Change-Number: 20726 </div>
<div style="display:none"> Gerrit-PatchSet: 1 </div>
<div style="display:none"> Gerrit-Owner: fixeria <vyanitskiy@sysmocom.de> </div>
<div style="display:none"> Gerrit-Reviewer: Jenkins Builder </div>
<div style="display:none"> Gerrit-Reviewer: laforge <laforge@osmocom.org> </div>
<div style="display:none"> Gerrit-MessageType: merged </div>