<p>Harald Welte <strong>merged</strong> this change.</p><p><a href="https://gerrit.osmocom.org/14264">View Change</a></p><div style="white-space:pre-wrap">Approvals:
Jenkins Builder: Verified
Harald Welte: Looks good to me, approved
</div><pre style="font-family: monospace,monospace; white-space: pre-wrap;">bts: Initial set of OML tests<br><br>The test coverage is far incomplete, but it at least is a starting<br>point.<br><br>Related: OS#4031<br>Change-Id: I82bb85b684d2db3a6b1e96a68ffde03e22affa6b<br>---<br>M bts/BTS_Tests.cfg<br>A bts/BTS_Tests_OML.ttcn<br>M bts/gen_links.sh<br>M bts/regen_makefile.sh<br>4 files changed, 628 insertions(+), 2 deletions(-)<br><br></pre><pre style="font-family: monospace,monospace; white-space: pre-wrap;"><span>diff --git a/bts/BTS_Tests.cfg b/bts/BTS_Tests.cfg</span><br><span>index a7ce68d..78a288d 100644</span><br><span>--- a/bts/BTS_Tests.cfg</span><br><span>+++ b/bts/BTS_Tests.cfg</span><br><span>@@ -19,6 +19,8 @@</span><br><span> #BTS_Tests.mp_rsl_ip := "10.9.1.2" # office</span><br><span> BTS_Tests.mp_rsl_ip := "192.168.100.2" # home</span><br><span> #BTS_Tests.mp_pcu_socket := ""</span><br><span style="color: hsl(120, 100%, 40%);">+#BTS_Tests_OML.mp_oml_ip := "192.168.102.239" # home</span><br><span style="color: hsl(120, 100%, 40%);">+#BTS_Tests_OML.mp_oml_port := 3002</span><br><span> </span><br><span> # real BTS / RF</span><br><span> #BTS_Tests.mp_bb_trxc_port := -1</span><br><span>diff --git a/bts/BTS_Tests_OML.ttcn b/bts/BTS_Tests_OML.ttcn</span><br><span>new file mode 100644</span><br><span>index 0000000..84d46a4</span><br><span>--- /dev/null</span><br><span>+++ b/bts/BTS_Tests_OML.ttcn</span><br><span>@@ -0,0 +1,624 @@</span><br><span style="color: hsl(120, 100%, 40%);">+module BTS_Tests_OML {</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+/* Integration Tests for OsmoBTS A-bis OML (Organization & Maintenance Link)</span><br><span style="color: hsl(120, 100%, 40%);">+ *</span><br><span style="color: hsl(120, 100%, 40%);">+ * (C) 2019 by Harald Welte <laforge@gnumonks.org></span><br><span style="color: hsl(120, 100%, 40%);">+ * All rights reserved.</span><br><span style="color: hsl(120, 100%, 40%);">+ *</span><br><span style="color: hsl(120, 100%, 40%);">+ * Released under the terms of GNU General Public License, Version 2 or</span><br><span style="color: hsl(120, 100%, 40%);">+ * (at your option) any later version.</span><br><span style="color: hsl(120, 100%, 40%);">+ *</span><br><span style="color: hsl(120, 100%, 40%);">+ * SPDX-License-Identifier: GPL-2.0-or-later</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%);">+import from General_Types all;</span><br><span style="color: hsl(120, 100%, 40%);">+import from Osmocom_Types all;</span><br><span style="color: hsl(120, 100%, 40%);">+import from AbisOML_Types all;</span><br><span style="color: hsl(120, 100%, 40%);">+import from IPA_Emulation all;</span><br><span style="color: hsl(120, 100%, 40%);">+import from IPA_Types all;</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+const integer NUM_TRX := 8;</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+type record of uint16_t ArfcnList;</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+modulepar {</span><br><span style="color: hsl(120, 100%, 40%);">+ charstring mp_oml_ip := "127.0.0.1";</span><br><span style="color: hsl(120, 100%, 40%);">+ integer mp_oml_port := 3002;</span><br><span style="color: hsl(120, 100%, 40%);">+ ArfcnList mp_arfcn := { 100, 101, 102, 103, 104, 105, 106, 107 };</span><br><span style="color: hsl(120, 100%, 40%);">+ OML_FOM_InterfLevBoundaries mp_interf_bound := { 85, 91, 97, 103, 109, 115 };</span><br><span style="color: hsl(120, 100%, 40%);">+ OML_FOM_T200 mp_t200 := {</span><br><span style="color: hsl(120, 100%, 40%);">+ sdcch_5ms := 30,</span><br><span style="color: hsl(120, 100%, 40%);">+ facch_f_5ms := 36,</span><br><span style="color: hsl(120, 100%, 40%);">+ facch_h_5ms := 36,</span><br><span style="color: hsl(120, 100%, 40%);">+ sacch_tch_sapi0_10ms := 168,</span><br><span style="color: hsl(120, 100%, 40%);">+ sacch_sdcch_10ms := 52,</span><br><span style="color: hsl(120, 100%, 40%);">+ sdcch_sapi3_5ms := 33,</span><br><span style="color: hsl(120, 100%, 40%);">+ sacch_rch_sapi3_10ms := 168</span><br><span style="color: hsl(120, 100%, 40%);">+ };</span><br><span style="color: hsl(120, 100%, 40%);">+ uint8_t mp_max_ta := 63;</span><br><span style="color: hsl(120, 100%, 40%);">+ uint8_t mp_load_threshold := 10;</span><br><span style="color: hsl(120, 100%, 40%);">+ uint8_t mp_load_ind_period := 1;</span><br><span style="color: hsl(120, 100%, 40%);">+ uint8_t mp_rach_b_thresh := 90;</span><br><span style="color: hsl(120, 100%, 40%);">+ uint16_t mp_loadavg_slots := 1000;</span><br><span style="color: hsl(120, 100%, 40%);">+ uint8_t mp_air_timer := 100;</span><br><span style="color: hsl(120, 100%, 40%);">+ uint8_t mp_ny1 := 10;</span><br><span style="color: hsl(120, 100%, 40%);">+ uint8_t mp_bsic := 63;</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%);">+/* BSC side OML component */</span><br><span style="color: hsl(120, 100%, 40%);">+type component BSC_OML_CT {</span><br><span style="color: hsl(120, 100%, 40%);">+ /* IPA emulation component underneath OML */</span><br><span style="color: hsl(120, 100%, 40%);">+ var IPA_Emulation_CT vc_IPA_OML;</span><br><span style="color: hsl(120, 100%, 40%);">+ /* Port for OML */</span><br><span style="color: hsl(120, 100%, 40%);">+ port IPA_OML_PT OML;</span><br><span style="color: hsl(120, 100%, 40%);">+ var uint8_t g_bts_nr := 0;</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ /* global test case guard timer */</span><br><span style="color: hsl(120, 100%, 40%);">+ timer T_oml_guard := 60.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 altstep as_Tguard() runs on BSC_OML_CT {</span><br><span style="color: hsl(120, 100%, 40%);">+ [] T_oml_guard.timeout {</span><br><span style="color: hsl(120, 100%, 40%);">+ setverdict(fail, "Timeout of T_guard");</span><br><span style="color: hsl(120, 100%, 40%);">+ mtc.stop;</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%);">+private altstep as_SwAct() runs on BSC_OML_CT {</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_PDU rx;</span><br><span style="color: hsl(120, 100%, 40%);">+ [] OML.receive(tr_OML_SwActReq(?, ?, ?, ?)) -> value rx {</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_FOM_ObjectClass obj_class := rx.u.fom.hdr.obj_class;</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_FOM_ObjectInstance obj_inst := rx.u.fom.hdr.obj_inst;</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ /* acknowledge the activate request */</span><br><span style="color: hsl(120, 100%, 40%);">+ OML.send(f_OML_make_ack(rx));</span><br><span style="color: hsl(120, 100%, 40%);">+ var octetstring file_id := ''O;</span><br><span style="color: hsl(120, 100%, 40%);">+ var octetstring sw_desc := ''O;</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ /* Request activation of software and check for ACK */</span><br><span style="color: hsl(120, 100%, 40%);">+ OML.send(ts_OML_ActivateSw(obj_class, obj_inst, file_id, sw_desc));</span><br><span style="color: hsl(120, 100%, 40%);">+ interleave {</span><br><span style="color: hsl(120, 100%, 40%);">+ [] OML.receive(tr_OML_ActivateSwACK(obj_class, obj_inst, file_id, sw_desc));</span><br><span style="color: hsl(120, 100%, 40%);">+ [] OML.receive(tr_OML_SwActivatedRep(obj_class, obj_inst));</span><br><span style="color: hsl(120, 100%, 40%);">+ }</span><br><span style="color: hsl(120, 100%, 40%);">+ 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%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+private altstep as_IPA_evt() runs on BSC_OML_CT {</span><br><span style="color: hsl(120, 100%, 40%);">+ var ASP_IPA_Event evt;</span><br><span style="color: hsl(120, 100%, 40%);">+ [] OML.receive(ASP_IPA_Event:?) -> value evt {</span><br><span style="color: hsl(120, 100%, 40%);">+ log("Ignoring ", evt);</span><br><span style="color: hsl(120, 100%, 40%);">+ 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%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+function f_init_oml(charstring id) runs on BSC_OML_CT {</span><br><span style="color: hsl(120, 100%, 40%);">+ vc_IPA_OML := IPA_Emulation_CT.create(id & "-OML-IPA");</span><br><span style="color: hsl(120, 100%, 40%);">+ map(vc_IPA_OML:IPA_PORT, system:IPA_CODEC_PT);</span><br><span style="color: hsl(120, 100%, 40%);">+ connect(vc_IPA_OML:IPA_OML_PORT, self:OML);</span><br><span style="color: hsl(120, 100%, 40%);">+ vc_IPA_OML.start(IPA_Emulation.main_server(mp_oml_ip, mp_oml_port));</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ T_oml_guard.start;</span><br><span style="color: hsl(120, 100%, 40%);">+ activate(as_Tguard());</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ OML.receive(t_ASP_IPA_EVT_UD(ASP_IPA_EVENT_UP));</span><br><span style="color: hsl(120, 100%, 40%);">+ //OML.receive(t_ASP_IPA_EVT_UD(ASP_IPA_EVENT_ID_ACK));</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ activate(as_SwAct());</span><br><span style="color: hsl(120, 100%, 40%);">+ activate(as_IPA_evt());</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%);">+/* Perform an "OPSTART" procedure with the speciifed MO" */</span><br><span style="color: hsl(120, 100%, 40%);">+private function f_oml_opstart(template (value) OML_FOM_ObjectClass obj_class,</span><br><span style="color: hsl(120, 100%, 40%);">+ template (value) OML_FOM_ObjectInstance obj_inst,</span><br><span style="color: hsl(120, 100%, 40%);">+ boolean exp_fail := false)</span><br><span style="color: hsl(120, 100%, 40%);">+runs on BSC_OML_CT {</span><br><span style="color: hsl(120, 100%, 40%);">+ OML.send(ts_OML_Opstart(obj_class, obj_inst));</span><br><span style="color: hsl(120, 100%, 40%);">+ alt {</span><br><span style="color: hsl(120, 100%, 40%);">+ [not exp_fail] OML.receive(tr_OML_OpstartACK(obj_class, obj_inst)) {</span><br><span style="color: hsl(120, 100%, 40%);">+ setverdict(pass);</span><br><span style="color: hsl(120, 100%, 40%);">+ }</span><br><span style="color: hsl(120, 100%, 40%);">+ [not exp_fail] OML.receive(tr_OML_OpstartNACK(obj_class, obj_inst)) {</span><br><span style="color: hsl(120, 100%, 40%);">+ setverdict(fail, "Unexpected OPSTART NACK for ", obj_class, " ", obj_inst);</span><br><span style="color: hsl(120, 100%, 40%);">+ }</span><br><span style="color: hsl(120, 100%, 40%);">+ [exp_fail] OML.receive(tr_OML_OpstartACK(obj_class, obj_inst)) {</span><br><span style="color: hsl(120, 100%, 40%);">+ setverdict(fail, "Unexpected OPSTART ACK for ", obj_class, " ", obj_inst);</span><br><span style="color: hsl(120, 100%, 40%);">+ }</span><br><span style="color: hsl(120, 100%, 40%);">+ [exp_fail] OML.receive(tr_OML_OpstartNACK(obj_class, obj_inst)) {</span><br><span style="color: hsl(120, 100%, 40%);">+ setverdict(pass);</span><br><span style="color: hsl(120, 100%, 40%);">+ }</span><br><span style="color: hsl(120, 100%, 40%);">+ [] OML.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%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+/* Perform a "CHANGE ADMINISTRATIVE STATE" procedure with the speciifed MO" */</span><br><span style="color: hsl(120, 100%, 40%);">+private function f_oml_chg_adm_st(template (value) OML_FOM_ObjectClass obj_class,</span><br><span style="color: hsl(120, 100%, 40%);">+ template (value) OML_FOM_ObjectInstance obj_inst,</span><br><span style="color: hsl(120, 100%, 40%);">+ template (value) OML_FOM_AdministrativeState adm_st,</span><br><span style="color: hsl(120, 100%, 40%);">+ boolean exp_fail := false)</span><br><span style="color: hsl(120, 100%, 40%);">+runs on BSC_OML_CT {</span><br><span style="color: hsl(120, 100%, 40%);">+ OML.send(ts_OML_ChangeAdmState(obj_class, obj_inst, adm_st));</span><br><span style="color: hsl(120, 100%, 40%);">+ alt {</span><br><span style="color: hsl(120, 100%, 40%);">+ [not exp_fail] OML.receive(tr_OML_ChangeAdmStateACK(obj_class, obj_inst, adm_st)) {</span><br><span style="color: hsl(120, 100%, 40%);">+ setverdict(pass);</span><br><span style="color: hsl(120, 100%, 40%);">+ }</span><br><span style="color: hsl(120, 100%, 40%);">+ [not exp_fail] OML.receive(tr_OML_ChangeAdmStateNACK(obj_class, obj_inst)) {</span><br><span style="color: hsl(120, 100%, 40%);">+ setverdict(fail, "Unexpected CHANGE ADM STATE NACK for ", obj_class, " ", obj_inst);</span><br><span style="color: hsl(120, 100%, 40%);">+ }</span><br><span style="color: hsl(120, 100%, 40%);">+ [exp_fail] OML.receive(tr_OML_ChangeAdmStateACK(obj_class, obj_inst, adm_st)) {</span><br><span style="color: hsl(120, 100%, 40%);">+ setverdict(fail, "Unexpected CHANGE ADM STATE ACK for ", obj_class, " ", obj_inst);</span><br><span style="color: hsl(120, 100%, 40%);">+ }</span><br><span style="color: hsl(120, 100%, 40%);">+ [exp_fail] OML.receive(tr_OML_ChangeAdmStateNACK(obj_class, obj_inst)) {</span><br><span style="color: hsl(120, 100%, 40%);">+ setverdict(pass);</span><br><span style="color: hsl(120, 100%, 40%);">+ }</span><br><span style="color: hsl(120, 100%, 40%);">+ [] OML.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%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+/* Perform a "SET RADIO CARRIER ATTRIBUTES" procedure with the BTS */</span><br><span style="color: hsl(120, 100%, 40%);">+private function f_oml_radio_attr(uint8_t trx_nr)</span><br><span style="color: hsl(120, 100%, 40%);">+runs on BSC_OML_CT {</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_FOM_ObjectInstance obj_inst := valueof(ts_OML_ObjectInstance(g_bts_nr, trx_nr, 255));</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_PDU cmd := valueof(ts_OML_SetRadioAttr(obj_inst, 0, {mp_arfcn[trx_nr]}));</span><br><span style="color: hsl(120, 100%, 40%);">+ var template OML_PDU exp_ack := f_OML_make_ack_exp(cmd);</span><br><span style="color: hsl(120, 100%, 40%);">+ var template OML_PDU exp_nack := f_OML_make_nack_exp(cmd, ?);</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_PDU rx;</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ OML.send(cmd);</span><br><span style="color: hsl(120, 100%, 40%);">+ alt {</span><br><span style="color: hsl(120, 100%, 40%);">+ [] OML.receive(exp_ack) -> value rx {</span><br><span style="color: hsl(120, 100%, 40%);">+ setverdict(pass);</span><br><span style="color: hsl(120, 100%, 40%);">+ }</span><br><span style="color: hsl(120, 100%, 40%);">+ [] OML.receive(exp_nack) -> value rx {</span><br><span style="color: hsl(120, 100%, 40%);">+ setverdict(fail, "SET RADIO CARRIER ATTRIBUTES NACK ", exp_nack);</span><br><span style="color: hsl(120, 100%, 40%);">+ }</span><br><span style="color: hsl(120, 100%, 40%);">+ [] OML.receive(tr_OML_MsgType(NM_MT_SET_RADIO_ATTR_ACK, NM_OC_RADIO_CARRIER, obj_inst, omit)) {</span><br><span style="color: hsl(120, 100%, 40%);">+ setverdict(fail, "SET RADIO CARRIER ATTRIBUTES ACK without IEs");</span><br><span style="color: hsl(120, 100%, 40%);">+ }</span><br><span style="color: hsl(120, 100%, 40%);">+ [] OML.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%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+/* Perform a "SET CHANNEL ATTRIBUTES" procedure with the BTS */</span><br><span style="color: hsl(120, 100%, 40%);">+private function f_oml_ts_attr(uint8_t trx_nr, uint8_t ts_nr)</span><br><span style="color: hsl(120, 100%, 40%);">+runs on BSC_OML_CT {</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_FOM_ObjectInstance obj_inst := valueof(ts_OML_ObjectInstance(g_bts_nr, trx_nr, ts_nr));</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_PDU cmd := valueof(ts_OML_SetChanAttr(obj_inst, NM_CHANC_TCHFull, tsc := 7));</span><br><span style="color: hsl(120, 100%, 40%);">+ var template OML_PDU exp_ack := f_OML_make_ack_exp(cmd);</span><br><span style="color: hsl(120, 100%, 40%);">+ var template OML_PDU exp_nack := f_OML_make_nack_exp(cmd, ?);</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_PDU rx;</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ OML.send(cmd);</span><br><span style="color: hsl(120, 100%, 40%);">+ alt {</span><br><span style="color: hsl(120, 100%, 40%);">+ [] OML.receive(exp_ack) -> value rx {</span><br><span style="color: hsl(120, 100%, 40%);">+ setverdict(pass);</span><br><span style="color: hsl(120, 100%, 40%);">+ }</span><br><span style="color: hsl(120, 100%, 40%);">+ [] OML.receive(exp_nack) -> value rx {</span><br><span style="color: hsl(120, 100%, 40%);">+ setverdict(fail, "SET CHANNEL ATTRIBUTES NACK ", exp_nack);</span><br><span style="color: hsl(120, 100%, 40%);">+ }</span><br><span style="color: hsl(120, 100%, 40%);">+ [] OML.receive(tr_OML_MsgType(NM_MT_SET_CHAN_ATTR_ACK, NM_OC_CHANNEL, obj_inst, omit)) {</span><br><span style="color: hsl(120, 100%, 40%);">+ setverdict(fail, "SET CHANNEL ATTRIBUTES ACK without IEs");</span><br><span style="color: hsl(120, 100%, 40%);">+ }</span><br><span style="color: hsl(120, 100%, 40%);">+ [] OML.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%);">+}</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+/* Perform a "SET BTS ATTRIBUTES" procedure with the BTS */</span><br><span style="color: hsl(120, 100%, 40%);">+private function f_oml_bts_attr()</span><br><span style="color: hsl(120, 100%, 40%);">+runs on BSC_OML_CT {</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_FOM_ObjectInstance obj_inst := valueof(ts_OML_ObjectInstance(g_bts_nr, 255, 255));</span><br><span style="color: hsl(120, 100%, 40%);">+ var template (value) OML_FOM_IE_List ies := {</span><br><span style="color: hsl(120, 100%, 40%);">+ ts_OML_IE(NM_ATT_INTERF_BOUND, OML_FOM_IE_Body:{interf_bound:=mp_interf_bound}),</span><br><span style="color: hsl(120, 100%, 40%);">+ ts_OML_IE(NM_ATT_BCCH_ARFCN, OML_FOM_IE_Body:{bcch_arfcn:=mp_arfcn[0]}),</span><br><span style="color: hsl(120, 100%, 40%);">+ ts_OML_IE(NM_ATT_CONN_FAIL_CRIT, OML_FOM_IE_Body:{other := ts_OML_IE_L16V(2, '0120'O)}),</span><br><span style="color: hsl(120, 100%, 40%);">+ ts_OML_IE(NM_ATT_T200, OML_FOM_IE_Body:{t200 := mp_t200}),</span><br><span style="color: hsl(120, 100%, 40%);">+ ts_OML_IE(NM_ATT_MAX_TA, OML_FOM_IE_Body:{max_ta := mp_max_ta}),</span><br><span style="color: hsl(120, 100%, 40%);">+ ts_OML_IE(NM_ATT_OVERL_PERIOD, OML_FOM_IE_Body:{other := ts_OML_IE_L16V(1, '0a'O)}),</span><br><span style="color: hsl(120, 100%, 40%);">+ ts_OML_IE(NM_ATT_CCCH_L_T, OML_FOM_IE_Body:{load_threshold := mp_load_threshold}),</span><br><span style="color: hsl(120, 100%, 40%);">+ ts_OML_IE(NM_ATT_CCCH_L_I_P, OML_FOM_IE_Body:{load_ind_period := mp_load_ind_period}),</span><br><span style="color: hsl(120, 100%, 40%);">+ ts_OML_IE(NM_ATT_RACH_B_THRESH, OML_FOM_IE_Body:{rach_b_thresh := mp_rach_b_thresh}),</span><br><span style="color: hsl(120, 100%, 40%);">+ ts_OML_IE(NM_ATT_LDAVG_SLOTS, OML_FOM_IE_Body:{loadavg_slots := mp_loadavg_slots}),</span><br><span style="color: hsl(120, 100%, 40%);">+ ts_OML_IE(NM_ATT_BTS_AIR_TIMER, OML_FOM_IE_Body:{air_timer := mp_air_timer}),</span><br><span style="color: hsl(120, 100%, 40%);">+ ts_OML_IE(NM_ATT_NY1, OML_FOM_IE_Body:{ny1 := mp_ny1}),</span><br><span style="color: hsl(120, 100%, 40%);">+ ts_OML_IE(NM_ATT_BSIC, OML_FOM_IE_Body:{bsic := mp_bsic})</span><br><span style="color: hsl(120, 100%, 40%);">+ //ts_OML_IE(NM_ATT_IPACC_CGI, ...)</span><br><span style="color: hsl(120, 100%, 40%);">+ };</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_PDU cmd := valueof(ts_OML_SetBtsAttr(obj_inst, ies));</span><br><span style="color: hsl(120, 100%, 40%);">+ var template OML_PDU exp_ack := f_OML_make_ack_exp(cmd);</span><br><span style="color: hsl(120, 100%, 40%);">+ var template OML_PDU exp_nack := f_OML_make_nack_exp(cmd, ?);</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_PDU rx;</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ OML.send(cmd);</span><br><span style="color: hsl(120, 100%, 40%);">+ alt {</span><br><span style="color: hsl(120, 100%, 40%);">+ [] OML.receive(exp_ack) -> value rx {</span><br><span style="color: hsl(120, 100%, 40%);">+ setverdict(pass);</span><br><span style="color: hsl(120, 100%, 40%);">+ }</span><br><span style="color: hsl(120, 100%, 40%);">+ [] OML.receive(exp_nack) -> value rx {</span><br><span style="color: hsl(120, 100%, 40%);">+ setverdict(fail, "SET BTS ATTRIBUTES NACK ", exp_nack);</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%);">+ [] OML.receive(tr_OML_MsgType(NM_MT_SET_BTS_ATTR_ACK, NM_OC_BTS, obj_inst, omit)) {</span><br><span style="color: hsl(120, 100%, 40%);">+ setverdict(fail, "SET BTS ATTRIBUTES ACK without IEs");</span><br><span style="color: hsl(120, 100%, 40%);">+ }</span><br><span style="color: hsl(120, 100%, 40%);">+ [] OML.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%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+/* Send an OML message and expect no response at all */</span><br><span style="color: hsl(120, 100%, 40%);">+private function f_oml_send_exp_no_resp(template (value) OML_PDU tx, charstring err_msg,</span><br><span style="color: hsl(120, 100%, 40%);">+ float tout := 5.0) runs on BSC_OML_CT</span><br><span style="color: hsl(120, 100%, 40%);">+{</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%);">+ OML.send(tx);</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%);">+ [] OML.receive {</span><br><span style="color: hsl(120, 100%, 40%);">+ setverdict(fail, err_msg);</span><br><span style="color: hsl(120, 100%, 40%);">+ }</span><br><span style="color: hsl(120, 100%, 40%);">+ [] T.timeout {</span><br><span style="color: hsl(120, 100%, 40%);">+ setverdict(pass);</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%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+private function f_oml_exp_rx(template OML_PDU exp_rx, charstring err_msg) runs on BSC_OML_CT</span><br><span style="color: hsl(120, 100%, 40%);">+{</span><br><span style="color: hsl(120, 100%, 40%);">+ timer T := 5.0;</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%);">+ [] OML.receive(exp_rx) {</span><br><span style="color: hsl(120, 100%, 40%);">+ setverdict(pass);</span><br><span style="color: hsl(120, 100%, 40%);">+ }</span><br><span style="color: hsl(120, 100%, 40%);">+ [] OML.receive { repeat; }</span><br><span style="color: hsl(120, 100%, 40%);">+ [] T.timeout {</span><br><span style="color: hsl(120, 100%, 40%);">+ setverdict(fail, "Timeout waiting for ", err_msg);</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%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+/* Send an OML message and expect a failure event report in response */</span><br><span style="color: hsl(120, 100%, 40%);">+private function f_oml_send_exp_fail_rep(template (value) OML_PDU tx, charstring err_msg,</span><br><span style="color: hsl(120, 100%, 40%);">+ template OML_FOM_EventType evt := ?,</span><br><span style="color: hsl(120, 100%, 40%);">+ template OML_FOM_Severity severity := ?,</span><br><span style="color: hsl(120, 100%, 40%);">+ template OML_FOM_ProbableCause cause := ?,</span><br><span style="color: hsl(120, 100%, 40%);">+ float tout := 5.0) runs on BSC_OML_CT</span><br><span style="color: hsl(120, 100%, 40%);">+{</span><br><span style="color: hsl(120, 100%, 40%);">+ var template OML_FOM_ObjectClass obj_class := ?;</span><br><span style="color: hsl(120, 100%, 40%);">+ var template OML_FOM_ObjectInstance obj_inst := ?;</span><br><span style="color: hsl(120, 100%, 40%);">+ if (ischosen(tx.u.fom)) {</span><br><span style="color: hsl(120, 100%, 40%);">+ obj_class := tx.u.fom.hdr.obj_class;</span><br><span style="color: hsl(120, 100%, 40%);">+ obj_inst := tx.u.fom.hdr.obj_inst;</span><br><span style="color: hsl(120, 100%, 40%);">+ }</span><br><span style="color: hsl(120, 100%, 40%);">+ var template OML_PDU exp_fail := tr_OML_FailureEvtRep(obj_class,obj_inst, evt, severity, cause);</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ OML.send(tx);</span><br><span style="color: hsl(120, 100%, 40%);">+ f_oml_exp_rx(exp_fail, "Failure Event Report");</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%);">+/* Send an OML message and expect it to be NACKed with specified cause */</span><br><span style="color: hsl(120, 100%, 40%);">+private function f_oml_send_exp_nack(template (value) OML_PDU tx, template OML_FOM_NackCause exp_cause,</span><br><span style="color: hsl(120, 100%, 40%);">+ float tout := 5.0) runs on BSC_OML_CT</span><br><span style="color: hsl(120, 100%, 40%);">+{</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%);">+ var template OML_PDU exp_nack := f_OML_make_nack_exp(valueof(tx), exp_cause);</span><br><span style="color: hsl(120, 100%, 40%);">+ var template OML_PDU exp_ack := f_OML_make_ack_exp(valueof(tx));</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_PDU rx;</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ OML.send(tx);</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%);">+ [] OML.receive(exp_ack) -> value rx {</span><br><span style="color: hsl(120, 100%, 40%);">+ setverdict(fail, "Unexpected ACK ", rx);</span><br><span style="color: hsl(120, 100%, 40%);">+ }</span><br><span style="color: hsl(120, 100%, 40%);">+ [] OML.receive(exp_nack) -> value rx {</span><br><span style="color: hsl(120, 100%, 40%);">+ setverdict(pass);</span><br><span style="color: hsl(120, 100%, 40%);">+ }</span><br><span style="color: hsl(120, 100%, 40%);">+ [] OML.receive { repeat; }</span><br><span style="color: hsl(120, 100%, 40%);">+ [] T.timeout {</span><br><span style="color: hsl(120, 100%, 40%);">+ setverdict(fail, "Timeout waiting for NACK ", exp_nack);</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%);">+</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%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+testcase TC_oml_selftest() runs on BSC_OML_CT {</span><br><span style="color: hsl(120, 100%, 40%);">+ const octetstring state_chg_bts := '8080000d610100ffff'O & '2401'O & '07000107'O & '0401'O;</span><br><span style="color: hsl(120, 100%, 40%);">+ const octetstring set_attr_bts := '80800033410100ffff19555b61676d7318060e00020110331e2424a83421a81f3f2500010a0c1e0b642a0a2b03e80a80230a08007b0920'O</span><br><span style="color: hsl(120, 100%, 40%);">+ const octetstring set_attr_radio := '8080000c44020000ff2d00050002007b'O;</span><br><span style="color: hsl(120, 100%, 40%);">+ const octetstring set_attr_ts0 := '8080000947030000000d074000'O;</span><br><span style="color: hsl(120, 100%, 40%);">+ const octetstring ipa_rsl_connect := '1080000a0d636f6d2e697061636365737300e0040000ff8500810bbb'O;</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ log(dec_OML_PDU(state_chg_bts));</span><br><span style="color: hsl(120, 100%, 40%);">+ log(dec_OML_PDU(set_attr_bts));</span><br><span style="color: hsl(120, 100%, 40%);">+ log(dec_OML_PDU(set_attr_radio));</span><br><span style="color: hsl(120, 100%, 40%);">+ log(dec_OML_PDU(set_attr_ts0));</span><br><span style="color: hsl(120, 100%, 40%);">+ log(dec_OML_PDU(ipa_rsl_connect));</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_oml_nothing() runs on BSC_OML_CT {</span><br><span style="color: hsl(120, 100%, 40%);">+ f_init_oml(testcasename());</span><br><span style="color: hsl(120, 100%, 40%);">+ f_sleep(100.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%);">+/* test behavior for unsupported message discriminator */</span><br><span style="color: hsl(120, 100%, 40%);">+testcase TC_wrong_mdisc() runs on BSC_OML_CT {</span><br><span style="color: hsl(120, 100%, 40%);">+ f_init_oml(testcasename());</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_PDU mmi_pdu := {</span><br><span style="color: hsl(120, 100%, 40%);">+ mdisc := ABIS_OM_MDISC_MMI,</span><br><span style="color: hsl(120, 100%, 40%);">+ placement := ABIS_OM_PLACEMENT_ONLY,</span><br><span style="color: hsl(120, 100%, 40%);">+ sequence := 0,</span><br><span style="color: hsl(120, 100%, 40%);">+ u := {</span><br><span style="color: hsl(120, 100%, 40%);">+ other := '01020304'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%);">+ f_oml_send_exp_fail_rep(mmi_pdu, "Unexpected response to MMI message");</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%);">+/* send a message of unknown/unsupported type */</span><br><span style="color: hsl(120, 100%, 40%);">+testcase TC_wrong_msgtype() runs on BSC_OML_CT {</span><br><span style="color: hsl(120, 100%, 40%);">+ f_init_oml(testcasename());</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_PDU tx := valueof(ts_OML_MsgType(NM_MT_ESTABLISH_TEI, NM_OC_BTS,</span><br><span style="color: hsl(120, 100%, 40%);">+ ts_OML_ObjectInstance(0, 255, 255), omit));</span><br><span style="color: hsl(120, 100%, 40%);">+ f_oml_send_exp_fail_rep(tx, "ESTABLISH_TEI");</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%);">+/* send message shorter than OML header length indicates */</span><br><span style="color: hsl(120, 100%, 40%);">+testcase TC_short_length() runs on BSC_OML_CT {</span><br><span style="color: hsl(120, 100%, 40%);">+ f_init_oml(testcasename());</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ /* Send "Change Adm State (Locked) to BTS, but with length 09 instead of 07 */</span><br><span style="color: hsl(120, 100%, 40%);">+ OML.send('80800009690100ffff0401'O);</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ template OML_PDU exp_fail := tr_OML_FailureEvtRep(NM_OC_BTS,</span><br><span style="color: hsl(120, 100%, 40%);">+ ts_OML_ObjectInstance(0, 255, 255),</span><br><span style="color: hsl(120, 100%, 40%);">+ ?, ?, ?);</span><br><span style="color: hsl(120, 100%, 40%);">+ f_oml_exp_rx(exp_fail, "Failure Event Report");</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%);">+/* send message longer than OML header length indicates */</span><br><span style="color: hsl(120, 100%, 40%);">+testcase TC_long_length() runs on BSC_OML_CT {</span><br><span style="color: hsl(120, 100%, 40%);">+ f_init_oml(testcasename());</span><br><span style="color: hsl(120, 100%, 40%);">+ /* Send "Change Adm State (Locked) to BTS, but with two extra bytes at the end */</span><br><span style="color: hsl(120, 100%, 40%);">+ OML.send('80800007690100ffff04010402'O);</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ template OML_PDU exp :=</span><br><span style="color: hsl(120, 100%, 40%);">+ tr_OML_ChangeAdmStateACK(NM_OC_BTS, ts_OML_ObjectInstance(0, 255, 255),</span><br><span style="color: hsl(120, 100%, 40%);">+ NM_STATE_LOCKED);</span><br><span style="color: hsl(120, 100%, 40%);">+ f_oml_exp_rx(exp, "Change ADM State ACK");</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%);">+/* test behavior for unsupported placement (!= ONLY) */</span><br><span style="color: hsl(120, 100%, 40%);">+testcase TC_wrong_placement() runs on BSC_OML_CT {</span><br><span style="color: hsl(120, 100%, 40%);">+ f_init_oml(testcasename());</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_FOM_ObjectClass obj_class := NM_OC_BTS</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_FOM_ObjectInstance obj_inst := valueof(ts_OML_ObjectInstance(g_bts_nr, 255, 255));</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_PDU pdu := valueof(ts_OML_ChangeAdmState(obj_class, obj_inst, NM_STATE_LOCKED));</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ pdu.placement := ABIS_OM_PLACEMENT_FIRST;</span><br><span style="color: hsl(120, 100%, 40%);">+ f_oml_send_exp_fail_rep(pdu, "Unexpected response to PLACEMENT_FIRST");</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ pdu.placement := ABIS_OM_PLACEMENT_MIDDLE;</span><br><span style="color: hsl(120, 100%, 40%);">+ f_oml_send_exp_fail_rep(pdu, "Unexpected response to PLACEMENT_MIDDLE");</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ pdu.placement := ABIS_OM_PLACEMENT_LAST;</span><br><span style="color: hsl(120, 100%, 40%);">+ f_oml_send_exp_fail_rep(pdu, "Unexpected response to PLACEMENT_LAST");</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%);">+/* test behavior for sequence != 0 (invalid if mdisc == ONLY) */</span><br><span style="color: hsl(120, 100%, 40%);">+testcase TC_wrong_seq() runs on BSC_OML_CT {</span><br><span style="color: hsl(120, 100%, 40%);">+ f_init_oml(testcasename());</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_FOM_ObjectClass obj_class := NM_OC_BTS;</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_FOM_ObjectInstance obj_inst := valueof(ts_OML_ObjectInstance(g_bts_nr, 255, 255));</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_PDU pdu := valueof(ts_OML_ChangeAdmState(obj_class, obj_inst, NM_STATE_LOCKED));</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ OML.clear;</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ pdu.sequence := 23;</span><br><span style="color: hsl(120, 100%, 40%);">+ f_oml_send_exp_fail_rep(pdu, "Unexpected response to sequence != 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%);">+/* test behavior for unsupported obj_class */</span><br><span style="color: hsl(120, 100%, 40%);">+testcase TC_wrong_obj_class() runs on BSC_OML_CT {</span><br><span style="color: hsl(120, 100%, 40%);">+ f_init_oml(testcasename());</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_FOM_ObjectClass obj_class := NM_OC_BTS;</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_FOM_ObjectInstance obj_inst := valueof(ts_OML_ObjectInstance(g_bts_nr, 255, 255));</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_PDU pdu := valueof(ts_OML_ChangeAdmState(obj_class, obj_inst, NM_STATE_LOCKED));</span><br><span style="color: hsl(120, 100%, 40%);">+ pdu.u.fom.hdr.obj_class := NM_OC_NULL;</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ /* NM_NACK_OBJCLASS_INVAL */</span><br><span style="color: hsl(120, 100%, 40%);">+ f_oml_send_exp_nack(pdu, NM_NACK_OBJCLASS_NOTSUPP);</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%);">+/* test behavior for wrong BTS number in object instance */</span><br><span style="color: hsl(120, 100%, 40%);">+testcase TC_wrong_bts_nr() runs on BSC_OML_CT {</span><br><span style="color: hsl(120, 100%, 40%);">+ f_init_oml(testcasename());</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_FOM_ObjectClass obj_class := NM_OC_BTS;</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_FOM_ObjectInstance obj_inst := valueof(ts_OML_ObjectInstance(250, 255, 255));</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_PDU pdu := valueof(ts_OML_ChangeAdmState(obj_class, obj_inst, NM_STATE_LOCKED));</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ f_oml_send_exp_nack(pdu, NM_NACK_BTSNR_UNKN);</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%);">+/* test behavior for wrong TRX number in object instance */</span><br><span style="color: hsl(120, 100%, 40%);">+testcase TC_wrong_trx_nr() runs on BSC_OML_CT {</span><br><span style="color: hsl(120, 100%, 40%);">+ f_init_oml(testcasename());</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_FOM_ObjectClass obj_class := NM_OC_RADIO_CARRIER;</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_FOM_ObjectInstance obj_inst := valueof(ts_OML_ObjectInstance(g_bts_nr, 250, 255));</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_PDU pdu := valueof(ts_OML_ChangeAdmState(obj_class, obj_inst, NM_STATE_LOCKED));</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ f_oml_send_exp_nack(pdu, NM_NACK_TRXNR_UNKN);</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%);">+/* test behavior for wrong TS number in object instance */</span><br><span style="color: hsl(120, 100%, 40%);">+testcase TC_wrong_ts_nr() runs on BSC_OML_CT {</span><br><span style="color: hsl(120, 100%, 40%);">+ f_init_oml(testcasename());</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_FOM_ObjectClass obj_class := NM_OC_RADIO_CARRIER;</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_FOM_ObjectInstance obj_inst := valueof(ts_OML_ObjectInstance(g_bts_nr, 0, 250));</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_PDU pdu := valueof(ts_OML_ChangeAdmState(obj_class, obj_inst, NM_STATE_LOCKED));</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ f_oml_send_exp_nack(pdu, NM_NACK_OBJINST_UNKN);</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%);">+/* RADIO CARRIER: Test OPSTART with SET BTS ATTRIBUTES; expect ACK */</span><br><span style="color: hsl(120, 100%, 40%);">+testcase TC_radio_carrier_opstart() runs on BSC_OML_CT {</span><br><span style="color: hsl(120, 100%, 40%);">+ f_init_oml(testcasename());</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_FOM_ObjectClass obj_class := NM_OC_RADIO_CARRIER;</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_FOM_ObjectInstance obj_inst := valueof(ts_OML_ObjectInstance(g_bts_nr, 0, 255));</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ f_oml_radio_attr(0);</span><br><span style="color: hsl(120, 100%, 40%);">+ f_oml_opstart(obj_class, obj_inst);</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%);">+/* RADIO CARRIER: Test OPSTART without SET BTS ATTRIBUTES; expect NACK */</span><br><span style="color: hsl(120, 100%, 40%);">+testcase TC_radio_carrier_opstart_noattr() runs on BSC_OML_CT {</span><br><span style="color: hsl(120, 100%, 40%);">+ f_init_oml(testcasename());</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_FOM_ObjectClass obj_class := NM_OC_RADIO_CARRIER;</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_FOM_ObjectInstance obj_inst := valueof(ts_OML_ObjectInstance(g_bts_nr, 0, 255));</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ /* we are *not* setting any attributes here */</span><br><span style="color: hsl(120, 100%, 40%);">+ f_oml_opstart(obj_class, obj_inst, exp_fail := true);</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%);">+/* BTS: Test OPSTART after SET BTS ATTRIBUTES; expect ACK */</span><br><span style="color: hsl(120, 100%, 40%);">+testcase TC_bts_opstart() runs on BSC_OML_CT {</span><br><span style="color: hsl(120, 100%, 40%);">+ f_init_oml(testcasename());</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_FOM_ObjectClass obj_class := NM_OC_BTS;</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_FOM_ObjectInstance obj_inst := valueof(ts_OML_ObjectInstance(g_bts_nr, 255, 255));</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ f_oml_bts_attr();</span><br><span style="color: hsl(120, 100%, 40%);">+ f_oml_opstart(obj_class, obj_inst);</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%);">+/* BTS: Test OPSTART without SET BTS ATTRIBUTES; expect NACK */</span><br><span style="color: hsl(120, 100%, 40%);">+testcase TC_bts_opstart_noattr() runs on BSC_OML_CT {</span><br><span style="color: hsl(120, 100%, 40%);">+ f_init_oml(testcasename());</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_FOM_ObjectClass obj_class := NM_OC_BTS;</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_FOM_ObjectInstance obj_inst := valueof(ts_OML_ObjectInstance(g_bts_nr, 255, 255));</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ /* we are *not* setting any attributes here */</span><br><span style="color: hsl(120, 100%, 40%);">+ f_oml_opstart(obj_class, obj_inst, exp_fail := true);</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%);">+/* CHANNEL: Test OPSTART after SET CHANNEL ATTRIBUTES; expect ACK */</span><br><span style="color: hsl(120, 100%, 40%);">+testcase TC_ts_opstart() runs on BSC_OML_CT {</span><br><span style="color: hsl(120, 100%, 40%);">+ f_init_oml(testcasename());</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_FOM_ObjectClass obj_class := NM_OC_CHANNEL;</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_FOM_ObjectInstance obj_inst := valueof(ts_OML_ObjectInstance(g_bts_nr, 0, 1));</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ f_oml_ts_attr(trx_nr := 0, ts_nr := 1);</span><br><span style="color: hsl(120, 100%, 40%);">+ f_oml_opstart(obj_class, obj_inst);</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%);">+/* CHANNEL: Test OPSTART without SET CHANNEL ATTRIBUTES; expect NACK */</span><br><span style="color: hsl(120, 100%, 40%);">+testcase TC_ts_opstart_noattr() runs on BSC_OML_CT {</span><br><span style="color: hsl(120, 100%, 40%);">+ f_init_oml(testcasename());</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_FOM_ObjectClass obj_class := NM_OC_CHANNEL;</span><br><span style="color: hsl(120, 100%, 40%);">+ var OML_FOM_ObjectInstance obj_inst := valueof(ts_OML_ObjectInstance(g_bts_nr, 0, 1));</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ /* we are *not* setting any attributes here */</span><br><span style="color: hsl(120, 100%, 40%);">+ f_oml_opstart(obj_class, obj_inst, exp_fail := true);</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 the initial Event State Change Reports after OML connect match our expectation */</span><br><span style="color: hsl(120, 100%, 40%);">+testcase TC_initial_state_reports() runs on BSC_OML_CT {</span><br><span style="color: hsl(120, 100%, 40%);">+ f_init_oml(testcasename());</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ interleave {</span><br><span style="color: hsl(120, 100%, 40%);">+ [] OML.receive(tr_OML_StateChgEvtRep(NM_OC_SITE_MANAGER, ts_OML_ObjectInstance(255, 255, 255),</span><br><span style="color: hsl(120, 100%, 40%);">+ NM_OPSTATE_ENABLED, NM_AVSTATE_OK));</span><br><span style="color: hsl(120, 100%, 40%);">+ [] OML.receive(tr_OML_StateChgEvtRep(NM_OC_BTS, ts_OML_ObjectInstance(0, 255, 255),</span><br><span style="color: hsl(120, 100%, 40%);">+ NM_OPSTATE_DISABLED, NM_AVSTATE_DEPENDENCY));</span><br><span style="color: hsl(120, 100%, 40%);">+ [] OML.receive(tr_OML_StateChgEvtRep(NM_OC_BTS, ts_OML_ObjectInstance(0, 255, 255),</span><br><span style="color: hsl(120, 100%, 40%);">+ NM_OPSTATE_DISABLED, NM_AVSTATE_DEPENDENCY));</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%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+control {</span><br><span style="color: hsl(120, 100%, 40%);">+ execute( TC_wrong_mdisc() );</span><br><span style="color: hsl(120, 100%, 40%);">+ execute( TC_wrong_msgtype() );</span><br><span style="color: hsl(120, 100%, 40%);">+ execute( TC_short_length() );</span><br><span style="color: hsl(120, 100%, 40%);">+ execute( TC_long_length() );</span><br><span style="color: hsl(120, 100%, 40%);">+ execute( TC_wrong_placement() );</span><br><span style="color: hsl(120, 100%, 40%);">+ execute( TC_wrong_seq() );</span><br><span style="color: hsl(120, 100%, 40%);">+ execute( TC_wrong_obj_class() );</span><br><span style="color: hsl(120, 100%, 40%);">+ execute( TC_wrong_bts_nr() );</span><br><span style="color: hsl(120, 100%, 40%);">+ execute( TC_wrong_trx_nr() );</span><br><span style="color: hsl(120, 100%, 40%);">+ execute( TC_radio_carrier_opstart_noattr() );</span><br><span style="color: hsl(120, 100%, 40%);">+ execute( TC_bts_opstart() );</span><br><span style="color: hsl(120, 100%, 40%);">+ execute( TC_bts_opstart_noattr() );</span><br><span style="color: hsl(120, 100%, 40%);">+ execute( TC_ts_opstart() );</span><br><span style="color: hsl(120, 100%, 40%);">+ execute( TC_ts_opstart_noattr() );</span><br><span style="color: hsl(120, 100%, 40%);">+ execute( TC_initial_state_reports() );</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%);">+/* BTS:</span><br><span style="color: hsl(120, 100%, 40%);">+ * - Evt: Disabled/Locked</span><br><span style="color: hsl(120, 100%, 40%);">+ * - SW ACT</span><br><span style="color: hsl(120, 100%, 40%);">+ * - Evt: Disabled/Dependency</span><br><span style="color: hsl(120, 100%, 40%);">+ * - SET BTS ATTR</span><br><span style="color: hsl(120, 100%, 40%);">+ * - Opstart</span><br><span style="color: hsl(120, 100%, 40%);">+ * - Chg Adm State Unlocked</span><br><span style="color: hsl(120, 100%, 40%);">+ * - Evt: Disabled/Dependency/Unlocked</span><br><span style="color: hsl(120, 100%, 40%);">+ * - Evt: Enabled/0 (after last channel unlocked?)</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%);">+/* Radio Carrier:</span><br><span style="color: hsl(120, 100%, 40%);">+ * - Evt: Disabled/Offline after SW ACT</span><br><span style="color: hsl(120, 100%, 40%);">+ * - Set Radio Carrier Attributes ? (->NACL)</span><br><span style="color: hsl(120, 100%, 40%);">+ * - Evt: Disabled/Dependency</span><br><span style="color: hsl(120, 100%, 40%);">+ * - Set Radio Carrier Attributes ?</span><br><span style="color: hsl(120, 100%, 40%);">+ * - Opstart</span><br><span style="color: hsl(120, 100%, 40%);">+ * - Chg Adm State Unlocked</span><br><span style="color: hsl(120, 100%, 40%);">+ * - Evt:</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%);">+/* Baseband Transceiver:</span><br><span style="color: hsl(120, 100%, 40%);">+ * - Evt: Disabled/Locked</span><br><span style="color: hsl(120, 100%, 40%);">+ * - SW Activation</span><br><span style="color: hsl(120, 100%, 40%);">+ * - Evt: Disabled/Dependency after SW ACT</span><br><span style="color: hsl(120, 100%, 40%);">+ * - IPA RSL Connect</span><br><span style="color: hsl(120, 100%, 40%);">+ * - Opstart</span><br><span style="color: hsl(120, 100%, 40%);">+ * - Chg Admin Unlocked</span><br><span style="color: hsl(120, 100%, 40%);">+ * - Evt: Disabled/Dependency/Unlocked</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%);">+/* Channel:</span><br><span style="color: hsl(120, 100%, 40%);">+ * - Evt: Not Installed/Locked</span><br><span style="color: hsl(120, 100%, 40%);">+ * - Evt: Disabled/Dependency (after SW ACT Rep on BB Transc)</span><br><span style="color: hsl(120, 100%, 40%);">+ * - Set Channel Attr</span><br><span style="color: hsl(120, 100%, 40%);">+ * - Opstart</span><br><span style="color: hsl(120, 100%, 40%);">+ * - Evt: Disabled/Offline</span><br><span style="color: hsl(120, 100%, 40%);">+ * - Chg Admin Unlocked</span><br><span style="color: hsl(120, 100%, 40%);">+ * - Evt: Disabled/OK/Unlocked</span><br><span style="color: hsl(120, 100%, 40%);">+ * - Evt: Enabled/OK (after BB TRANSC Opstart)</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>diff --git a/bts/gen_links.sh b/bts/gen_links.sh</span><br><span>index 2a07f16..aafe231 100755</span><br><span>--- a/bts/gen_links.sh</span><br><span>+++ b/bts/gen_links.sh</span><br><span>@@ -36,7 +36,7 @@</span><br><span> FILES="Misc_Helpers.ttcn General_Types.ttcn GSM_Types.ttcn GSM_RR_Types.ttcn Osmocom_VTY_Functions.ttcn GSM_SystemInformation.ttcn Osmocom_Types.ttcn RLCMAC_Types.ttcn RLCMAC_CSN1_Types.ttcn RLCMAC_EncDec.cc L1CTL_Types.ttcn L1CTL_PortType.ttcn L1CTL_PortType_CtrlFunct.ttcn L1CTL_PortType_CtrlFunctDef.cc LAPDm_RAW_PT.ttcn LAPDm_Types.ttcn "</span><br><span> #FILES+="NS_Emulation.ttcn NS_CodecPort.ttcn NS_CodecPort_CtrlFunct.ttcn NS_CodecPort_CtrlFunctDef.cc "</span><br><span> #FILES+="BSSGP_Emulation.ttcn Osmocom_Gb_Types.ttcn "</span><br><span style="color: hsl(0, 100%, 40%);">-FILES+="IPA_Types.ttcn IPA_CodecPort.ttcn IPA_CodecPort_CtrlFunct.ttcn IPA_CodecPort_CtrlFunctDef.cc IPA_Emulation.ttcnpp IPA_CodecPort.ttcn RSL_Types.ttcn RSL_Emulation.ttcn "</span><br><span style="color: hsl(120, 100%, 40%);">+FILES+="IPA_Types.ttcn IPA_CodecPort.ttcn IPA_CodecPort_CtrlFunct.ttcn IPA_CodecPort_CtrlFunctDef.cc IPA_Emulation.ttcnpp IPA_CodecPort.ttcn RSL_Types.ttcn RSL_Emulation.ttcn AbisOML_Types.ttcn "</span><br><span> FILES+="Osmocom_CTRL_Types.ttcn Osmocom_CTRL_Functions.ttcn Osmocom_CTRL_Adapter.ttcn "</span><br><span> FILES+="L3_Templates.ttcn L3_Common.ttcn "</span><br><span> FILES+="Native_Functions.ttcn Native_FunctionDefs.cc "</span><br><span>diff --git a/bts/regen_makefile.sh b/bts/regen_makefile.sh</span><br><span>index 9ed5a06..c912da8 100755</span><br><span>--- a/bts/regen_makefile.sh</span><br><span>+++ b/bts/regen_makefile.sh</span><br><span>@@ -2,6 +2,6 @@</span><br><span> </span><br><span> FILES="*.ttcn *.ttcnpp IPA_CodecPort_CtrlFunctDef.cc IPL4asp_PT.cc IPL4asp_discovery.cc TCCConversion.cc TCCInterface.cc UD_PT.cc RLCMAC_EncDec.cc Native_FunctionDefs.cc TRXC_CodecPort_CtrlFunctDef.cc L1CTL_PortType_CtrlFunctDef.cc TELNETasp_PT.cc"</span><br><span> </span><br><span style="color: hsl(0, 100%, 40%);">-export CPPFLAGS_TTCN3="-DIPA_EMULATION_RSL"</span><br><span style="color: hsl(120, 100%, 40%);">+export CPPFLAGS_TTCN3="-DIPA_EMULATION_RSL -DIPA_EMULATION_OML"</span><br><span> </span><br><span> ../regen-makefile.sh BTS_Tests.ttcn $FILES</span><br><span></span><br></pre><p>To view, visit <a href="https://gerrit.osmocom.org/14264">change 14264</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/14264"/><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-MessageType: merged </div>
<div style="display:none"> Gerrit-Change-Id: I82bb85b684d2db3a6b1e96a68ffde03e22affa6b </div>
<div style="display:none"> Gerrit-Change-Number: 14264 </div>
<div style="display:none"> Gerrit-PatchSet: 1 </div>
<div style="display:none"> Gerrit-Owner: Harald Welte <laforge@gnumonks.org> </div>
<div style="display:none"> Gerrit-Reviewer: Harald Welte <laforge@gnumonks.org> </div>
<div style="display:none"> Gerrit-Reviewer: Jenkins Builder (1000002) </div>