BTS_Tests: add test cases for Temporary ACCH Overpower
Change-Id: Ibdb94aa2779ae4b08f08cfef78c2959ae451a784
Related: SYS#5319
diff --git a/bts/BTS_Tests.ttcn b/bts/BTS_Tests.ttcn
index 7476a0c..55bb0ee 100644
--- a/bts/BTS_Tests.ttcn
+++ b/bts/BTS_Tests.ttcn
@@ -317,7 +317,8 @@
/* Test-specific parameters */
friend type union TestSpecUnion {
- RllTestCase rll
+ RllTestCase rll,
+ TopTestCase top
}
private template (value) RachControlParameters ts_RachCtrl_default := {
@@ -773,6 +774,43 @@
var RSL_Message rx := f_rsl_transceive_ret(tx, exp_rx, id, ignore_other);
}
+/* Send the given measurement results to the IUT over the Um interface,
+ * wait for the IUT to receive then and forward over the A-bis/RSL interface. */
+friend function f_transceive_meas_rep(template (value) MeasurementResults meas_res)
+runs on ConnHdlr {
+ var template (value) SacchL1Header l1h;
+ var octetstring l2, l3;
+ timer T;
+
+ /* RR Measurement Report to be sent */
+ var GsmRrL3Message meas_rep := {
+ header := valueof(t_RrL3Header(MEASUREMENT_REPORT)),
+ payload := { meas_rep := { meas_res := valueof(meas_res) } }
+ };
+
+ /* TITAN has weird (and often unusable) padding model, so we pad here manaully */
+ l3 := f_pad_oct(enc_GsmRrL3Message(meas_rep), 18, '00'O);
+ l2 := f_pad_oct(enc_LapdmFrameAB(valueof(ts_LAPDm_AB(0, meas_rep))), 21, '00'O);
+ l1h := ts_SacchL1Header(g_pars.l1_pars.ms_power_level, false,
+ g_pars.l1_pars.ms_actual_ta);
+
+ /* Send RR Measurement Report over the Um interface */
+ L1CTL.send(ts_L1CTL_DATA_REQ_SACCH(g_chan_nr, ts_RslLinkID_SACCH(0), l1h, l2));
+
+ /* Expect MEASurement RESult on the A-bis/RSL interface */
+ T.start(2.0);
+ alt {
+ [] RSL.receive(tr_RSL_MEAS_RES_OSMO(g_chan_nr, l3_info := l3)) {
+ setverdict(pass);
+ }
+ [] RSL.receive { repeat; }
+ [] T.timeout {
+ setverdict(fail, "Timeout waiting for RSL MEASurement RESult");
+ Misc_Helpers.f_shutdown(__BFILE__, __LINE__);
+ }
+ }
+}
+
friend function f_rsl_chan_act(RSL_IE_ChannelMode mode,
boolean encr_enable := false,
RSL_IE_List more_ies := {},
@@ -7956,6 +7994,272 @@
Misc_Helpers.f_shutdown(__BFILE__, __LINE__);
}
+private type record TopTestCase {
+ RSL_IE_BS_Power bs_power,
+ RSL_IE_OSMO_TopAcchCap top_cap,
+ record of TopTestStep steps
+};
+private type record TopTestStep {
+ MeasurementResults meas_res optional,
+ GsmRxLev overpower_sacch,
+ GsmRxLev overpower_facch
+};
+
+private function f_rxlev_match(template (present) RslLinkId link_id,
+ template (present) GsmRxLev rxlev)
+runs on ConnHdlr {
+ var L1ctlDlMessage dl := f_L1CTL_rx_data(L1CTL, g_chan_nr, link_id);
+ if (not match(dl.dl_info.rx_level, rxlev)) {
+ setverdict(fail, "RxLev(", link_id, ") := ", dl.dl_info.rx_level,
+ " does not match expected RxLev := ", rxlev);
+ Misc_Helpers.f_shutdown(__BFILE__, __LINE__);
+ }
+}
+
+private function f_TC_acch_overpower(charstring id) runs on ConnHdlr {
+ var TopTestCase tc := g_pars.spec.top;
+ var GsmRxLev rxlev_dcch;
+ var L1ctlDlMessage dl;
+
+ /* Wait for Pau ramping to complete */
+ f_sleep(6.0);
+
+ f_l1_tune(L1CTL);
+ L1CTL.clear;
+ RSL.clear;
+
+ /* Measure RxLev(BCCH), calculate RxLev(DCCH) */
+ dl := f_L1CTL_rx_data(L1CTL, t_RslChanNr_BCCH(0));
+ rxlev_dcch := dl.dl_info.rx_level - (tc.bs_power.power_level * 2);
+
+ log("RxLev(BCCH) := ", dl.dl_info.rx_level);
+ log("Expected RxLev(DCCH) := ", rxlev_dcch);
+
+ /* Additional IEs for the CHANnel ACTIVation message */
+ var template (value) RSL_IE_List ies := {
+ /* Employ BS power control in static mode */
+ t_RSL_IE(RSL_IE_MS_POWER, RSL_IE_Body:{
+ bs_power := tc.bs_power
+ }),
+ /* Indicate the given Temporary Overpower capability */
+ t_RSL_IE(RSL_IE_OSMO_TOP_ACCH_CAP, RSL_IE_Body:{
+ top_acch_cap := tc.top_cap
+ })
+ };
+
+ /* Establish a dedicated channel */
+ f_est_dchan(more_ies := valueof(ies));
+
+ /* Give it some time to stabilize */
+ f_sleep(0.480 * 2.0);
+ L1CTL.clear;
+ RSL.clear;
+
+ for (var integer i := 0; i < lengthof(tc.steps); i := i + 1) {
+ var TopTestStep step := tc.steps[i];
+ var GsmRxLev rxlev_facch := rxlev_dcch + step.overpower_facch;
+ var GsmRxLev rxlev_sacch := rxlev_dcch + step.overpower_sacch;
+
+ log("Executing step[", i, "] := ", step);
+
+ /* Send RR Measurement Report (if present) */
+ if (ispresent(step.meas_res)) {
+ f_transceive_meas_rep(step.meas_res);
+ f_sleep(0.480 * 2.0);
+ L1CTL.clear;
+ }
+
+ /* Check RxLev on both FACCH and SACCH */
+ f_rxlev_match(tr_RslLinkID_DCCH(?), rxlev_facch);
+ f_rxlev_match(tr_RslLinkID_SACCH(?), rxlev_sacch);
+
+ setverdict(pass);
+ }
+}
+testcase TC_acch_overpower_rxqual_thresh() runs on test_CT {
+ var ConnHdlrPars pars;
+ var ConnHdlr vc_conn;
+
+ f_init();
+
+ /* Verify lower and upper RxQual thresholds */
+ var template TopTestCase top := {
+ bs_power := ts_RSL_IE_BS_Power(4), /* 4 x 2dB = 8dB */
+ top_cap := ts_RSL_IE_OSMO_TopAcchCap(4), /* 4dB */
+ steps := {
+ /* Channel established, no overpower */
+ { meas_res := omit,
+ overpower_sacch := 0, overpower_facch := 0 },
+
+ /* Worst possible RxQual value, overpower of 4dB */
+ { meas_res := ts_MeasurementResults(rxq_f := 7),
+ overpower_sacch := 4, overpower_facch := 4 },
+ /* Worst possible RxQual value, disabling overpower */
+ { meas_res := ts_MeasurementResults(rxq_f := 0),
+ overpower_sacch := 0, overpower_facch := 0 },
+
+ /* Lower threshold not reached, no overpower */
+ { meas_res := ts_MeasurementResults(rxq_f := 1),
+ overpower_sacch := 0, overpower_facch := 0 },
+ /* Lower threshold not reached, no overpower */
+ { meas_res := ts_MeasurementResults(rxq_f := 2),
+ overpower_sacch := 0, overpower_facch := 0 },
+ /* Lower threshold reached, overpower of 4dB */
+ { meas_res := ts_MeasurementResults(rxq_f := 4),
+ overpower_sacch := 4, overpower_facch := 4 },
+ /* Upper threshold not reached, keeping overpower */
+ { meas_res := ts_MeasurementResults(rxq_f := 3),
+ overpower_sacch := 4, overpower_facch := 4 },
+ /* Upper threshold reached, disabling overpower */
+ { meas_res := ts_MeasurementResults(rxq_f := 2),
+ overpower_sacch := 0, overpower_facch := 0 }
+ }
+ };
+
+ pars := valueof(t_Pars(t_RslChanNr_Bm(0), ts_RSL_ChanMode_SIGN,
+ spec := { top := top }, trx_nr := 1));
+ vc_conn := f_start_handler(refers(f_TC_acch_overpower), pars);
+ vc_conn.done;
+
+ Misc_Helpers.f_shutdown(__BFILE__, __LINE__);
+}
+testcase TC_acch_overpower_rxqual_thresh_dtx() runs on test_CT {
+ var ConnHdlrPars pars;
+ var ConnHdlr vc_conn;
+
+ f_init();
+
+ /* Verify handling of FULL and SUB values */
+ var template TopTestCase top := {
+ bs_power := ts_RSL_IE_BS_Power(4), /* 4 x 2dB = 8dB */
+ top_cap := ts_RSL_IE_OSMO_TopAcchCap(4), /* 4dB */
+ steps := {
+ /* Channel established, no overpower */
+ { meas_res := omit,
+ overpower_sacch := 0, overpower_facch := 0 },
+
+ /* Invalid measurement results, no overpower */
+ { meas_res := ts_MeasurementResults(rxq_f := 7,
+ rxq_s := 7,
+ valid := false),
+ overpower_sacch := 0, overpower_facch := 0 },
+
+ /* DTXu was in use, no overpower */
+ { meas_res := ts_MeasurementResults(rxq_f := 7,
+ rxq_s := 0,
+ dtx_used := true),
+ overpower_sacch := 0, overpower_facch := 0 },
+ /* DTXu was in use, overpower of 4 dB */
+ { meas_res := ts_MeasurementResults(rxq_f := 0,
+ rxq_s := 7,
+ dtx_used := true),
+ overpower_sacch := 4, overpower_facch := 4 }
+ }
+ };
+
+ pars := valueof(t_Pars(t_RslChanNr_Bm(0), ts_RSL_ChanMode_SIGN,
+ spec := { top := top }, trx_nr := 1));
+ vc_conn := f_start_handler(refers(f_TC_acch_overpower), pars);
+ vc_conn.done;
+
+ Misc_Helpers.f_shutdown(__BFILE__, __LINE__);
+}
+testcase TC_acch_overpower_always_on_facch() runs on test_CT {
+ var ConnHdlrPars pars;
+ var ConnHdlr vc_conn;
+
+ f_init();
+
+ /* Overpower is always on, SACCH disabled */
+ var template TopTestCase top := {
+ bs_power := ts_RSL_IE_BS_Power(4), /* 4 x 2dB = 8dB */
+ top_cap := ts_RSL_IE_OSMO_TopAcchCap(overpower := 4, /* 4dB */
+ rxqual := 0, /* always on */
+ sacch_enable := false),
+ steps := {
+ /* Channel established, FACCH overpower */
+ { meas_res := omit,
+ overpower_sacch := 0, overpower_facch := 4 },
+ /* MS indicates good RxQual, no difference */
+ { meas_res := ts_MeasurementResults(rxq_f := 0),
+ overpower_sacch := 0, overpower_facch := 4 },
+ /* MS indicates bad RxQual, no difference */
+ { meas_res := ts_MeasurementResults(rxq_f := 7),
+ overpower_sacch := 0, overpower_facch := 4 }
+ }
+ };
+
+ pars := valueof(t_Pars(t_RslChanNr_Bm(0), ts_RSL_ChanMode_SIGN,
+ spec := { top := top }, trx_nr := 1));
+ vc_conn := f_start_handler(refers(f_TC_acch_overpower), pars);
+ vc_conn.done;
+
+ Misc_Helpers.f_shutdown(__BFILE__, __LINE__);
+}
+testcase TC_acch_overpower_always_on_sacch() runs on test_CT {
+ var ConnHdlrPars pars;
+ var ConnHdlr vc_conn;
+
+ f_init();
+
+ /* Overpower is always on, FACCH disabled */
+ var template TopTestCase top := {
+ bs_power := ts_RSL_IE_BS_Power(4), /* 4 x 2dB = 8dB */
+ top_cap := ts_RSL_IE_OSMO_TopAcchCap(overpower := 4, /* 4dB */
+ rxqual := 0, /* always on */
+ facch_enable := false),
+ steps := {
+ /* Channel established, SACCH overpower */
+ { meas_res := omit,
+ overpower_sacch := 4, overpower_facch := 0 },
+ /* MS indicates good RxQual, no difference */
+ { meas_res := ts_MeasurementResults(rxq_f := 0),
+ overpower_sacch := 4, overpower_facch := 0 },
+ /* MS indicates bad RxQual, no difference */
+ { meas_res := ts_MeasurementResults(rxq_f := 7),
+ overpower_sacch := 4, overpower_facch := 0 }
+ }
+ };
+
+ pars := valueof(t_Pars(t_RslChanNr_Bm(0), ts_RSL_ChanMode_SIGN,
+ spec := { top := top }, trx_nr := 1));
+ vc_conn := f_start_handler(refers(f_TC_acch_overpower), pars);
+ vc_conn.done;
+
+ Misc_Helpers.f_shutdown(__BFILE__, __LINE__);
+}
+testcase TC_acch_overpower_limit() runs on test_CT {
+ var ConnHdlrPars pars;
+ var ConnHdlr vc_conn;
+
+ f_init();
+
+ /* Overpower higher than current power reduction level (2dB) */
+ var template TopTestCase top := {
+ bs_power := ts_RSL_IE_BS_Power(1), /* 1 x 2dB = 2dB */
+ top_cap := ts_RSL_IE_OSMO_TopAcchCap(overpower := 4, /* 4dB */
+ rxqual := 0 /* always on */),
+ steps := {
+ /* Channel established, ACCH overpower of 2dB */
+ { meas_res := omit,
+ overpower_sacch := 2, overpower_facch := 2 },
+ /* MS indicates good RxQual, no difference */
+ { meas_res := ts_MeasurementResults(rxq_f := 0),
+ overpower_sacch := 2, overpower_facch := 2 },
+ /* MS indicates bad RxQual, no difference */
+ { meas_res := ts_MeasurementResults(rxq_f := 7),
+ overpower_sacch := 2, overpower_facch := 2 }
+ }
+ };
+
+ pars := valueof(t_Pars(t_RslChanNr_Bm(0), ts_RSL_ChanMode_SIGN,
+ spec := { top := top }, trx_nr := 1));
+ vc_conn := f_start_handler(refers(f_TC_acch_overpower), pars);
+ vc_conn.done;
+
+ Misc_Helpers.f_shutdown(__BFILE__, __LINE__);
+}
+
/* test generation of RLL ERR IND based on Um errors (TS 48.058 3.9) */
/* protocol error as per 44.006 */
/* link layer failure (repetition of I-frame N200 times without ACK */
@@ -8160,6 +8464,12 @@
execute( TC_early_immediate_assignment() );
+ execute( TC_acch_overpower_rxqual_thresh() );
+ execute( TC_acch_overpower_rxqual_thresh_dtx() );
+ execute( TC_acch_overpower_always_on_facch() );
+ execute( TC_acch_overpower_always_on_sacch() );
+ execute( TC_acch_overpower_limit() );
+
/* BEWARE: these test cases can potentially break the IUT or cause
* weird/unexpected behavior. Ensure that they are executed last. */
execute( TC_dyn_osmo_pdch_tchh_race_act() );
diff --git a/library/GSM_RR_Types.ttcn b/library/GSM_RR_Types.ttcn
index f45784c..980020e 100644
--- a/library/GSM_RR_Types.ttcn
+++ b/library/GSM_RR_Types.ttcn
@@ -1104,6 +1104,27 @@
}
};
+ template (value) MeasurementResults
+ ts_MeasurementResults(template (value) uint6_t rxl_f := 63,
+ template (value) uint6_t rxl_s := 63,
+ template (value) uint3_t rxq_f := 0,
+ template (value) uint3_t rxq_s := 0,
+ boolean dtx_used := false,
+ boolean valid := true,
+ template (omit) NcellReports reps := omit) := {
+ ba_used := '0'B,
+ dtx_used := bool2bit(dtx_used),
+ rxlev_full_srv_cell := rxl_f,
+ threeg_ba_used := '0'B,
+ meas_valid := bool2bit(not valid),
+ rxlev_sub_srv_cell := rxl_s,
+ si23_ba_used := '0'B,
+ rxqual_full_srv_cell := rxq_f,
+ rxqual_sub_srv_cell := rxq_s,
+ no_ncell_m := 0,
+ ncell_reports := reps
+ };
+
template (value) GsmRrL3Message ts_MEAS_REP(boolean valid,
template (value) uint6_t rxl_f,
template (value) uint6_t rxl_s,