<p>laforge <strong>merged</strong> this change.</p><p><a href="https://gerrit.osmocom.org/c/osmo-ttcn3-hacks/+/15414">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;">bsc: Test that ETWS Primary Notification are sent via dedicated channels<br><br>When the BSC receives an ETWS PN via CBSP, it must send it through all<br>established dedicated channels of the matching BTSs.<br><br>Related: OS#4046<br><br>Change-Id: Ib057bd251604e9bae968e71de245b3bbf737a356<br>---<br>M bsc/BSC_Tests_CBSP.ttcn<br>M library/CBSP_Templates.ttcn<br>M library/L3_Templates.ttcn<br>3 files changed, 108 insertions(+), 1 deletion(-)<br><br></pre><pre style="font-family: monospace,monospace; white-space: pre-wrap;"><span>diff --git a/bsc/BSC_Tests_CBSP.ttcn b/bsc/BSC_Tests_CBSP.ttcn</span><br><span>index 3d6040e..792b771 100644</span><br><span>--- a/bsc/BSC_Tests_CBSP.ttcn</span><br><span>+++ b/bsc/BSC_Tests_CBSP.ttcn</span><br><span>@@ -25,6 +25,10 @@</span><br><span> import from IPA_CodecPort all;</span><br><span> import from IPA_Types all;</span><br><span> </span><br><span style="color: hsl(120, 100%, 40%);">+import from MobileL3_Types all;</span><br><span style="color: hsl(120, 100%, 40%);">+import from MobileL3_RRM_Types all;</span><br><span style="color: hsl(120, 100%, 40%);">+import from L3_Templates all;</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span> import from RSL_Types all;</span><br><span> import from RSL_Emulation all;</span><br><span> </span><br><span>@@ -155,6 +159,35 @@</span><br><span> }</span><br><span> </span><br><span> /* send a WRITE CBS to the BSC; expect either COMPLETE or FAILURE in response*/</span><br><span style="color: hsl(120, 100%, 40%);">+function f_cbsp_write_emerg(uint16_t msg_id, uint16_t ser_no,</span><br><span style="color: hsl(120, 100%, 40%);">+ template (value) BSSMAP_FIELD_CellIdentificationList cell_list := ts_BSSMAP_CIL_BSS,</span><br><span style="color: hsl(120, 100%, 40%);">+ template (value) uint8_t emerg_ind := 1,</span><br><span style="color: hsl(120, 100%, 40%);">+ template (value) uint16_t warn_type := oct2int('0780'O),</span><br><span style="color: hsl(120, 100%, 40%);">+ template (value) uint16_t warn_per := 5,</span><br><span style="color: hsl(120, 100%, 40%);">+ template BSSMAP_FIELD_CellIdentificationList success_list := ?,</span><br><span style="color: hsl(120, 100%, 40%);">+ template CBSP_FailureListItems fail_list := omit) runs on cbsp_test_CT {</span><br><span style="color: hsl(120, 100%, 40%);">+ var template (value) CBSP_PDU tx;</span><br><span style="color: hsl(120, 100%, 40%);">+ var template CBSP_PDU rx;</span><br><span style="color: hsl(120, 100%, 40%);">+ var CBSP_IEs pages := {f_gen_page()};</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ tx := ts_CBSP_WRITE_EMERG(msg_id, ser_no, cell_list, emerg_ind, warn_type, warn_per);</span><br><span style="color: hsl(120, 100%, 40%);">+ CBSP[0].send(ts_CBSP_Send(g_cbsp_conn_id[0], tx));</span><br><span style="color: hsl(120, 100%, 40%);">+ if (istemplatekind(fail_list, "omit")) {</span><br><span style="color: hsl(120, 100%, 40%);">+ rx := tr_CBSP_WRITE_CBS_COMPL(msg_id, ser_no, success_list, omit);</span><br><span style="color: hsl(120, 100%, 40%);">+ } else {</span><br><span style="color: hsl(120, 100%, 40%);">+ rx := tr_CBSP_WRITE_CBS_FAIL(msg_id, ser_no, fail_list, *, success_list, omit);</span><br><span style="color: hsl(120, 100%, 40%);">+ }</span><br><span style="color: hsl(120, 100%, 40%);">+ alt {</span><br><span style="color: hsl(120, 100%, 40%);">+ [] CBSP[0].receive(tr_CBSP_Recv(g_cbsp_conn_id[0], 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%);">+ [] CBSP[0].receive(tr_CBSP_Recv(g_cbsp_conn_id[0], ?)) {</span><br><span style="color: hsl(120, 100%, 40%);">+ setverdict(fail, "Received unexpected CBSP");</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 a WRITE CBS to the BSC; expect either COMPLETE or FAILURE in response*/</span><br><span> function f_cbsp_write(uint16_t msg_id, uint16_t ser_no,</span><br><span> template (value) BSSMAP_FIELD_CellIdentificationList cell_list := ts_BSSMAP_CIL_BSS,</span><br><span> template (value) CBSP_Category category := CBSP_CATEG_NORMAL,</span><br><span>@@ -478,6 +511,57 @@</span><br><span> f_cbsp_reset_bss(0);</span><br><span> }</span><br><span> </span><br><span style="color: hsl(120, 100%, 40%);">+private const octetstring c_ETWS_sec_default :=</span><br><span style="color: hsl(120, 100%, 40%);">+ '00000000000000000000000000000000000000000000000000'O &</span><br><span style="color: hsl(120, 100%, 40%);">+ '00000000000000000000000000000000000000000000000000'O;</span><br><span style="color: hsl(120, 100%, 40%);">+function f_gen_etws_pn(uint16_t ser_nr, uint16_t msg_id, OCT2 msg_type := '0780'O,</span><br><span style="color: hsl(120, 100%, 40%);">+ octetstring sec_inf := c_ETWS_sec_default) return octetstring {</span><br><span style="color: hsl(120, 100%, 40%);">+ return int2oct(ser_nr, 2) & int2oct(msg_id, 2) & msg_type & sec_inf;</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%);">+/* Write ETWS PN to single BTS; verify it arrives on DCHAN */</span><br><span style="color: hsl(120, 100%, 40%);">+testcase TC_cbsp_emerg_write_bts_cgi_dchan() runs on cbsp_test_CT {</span><br><span style="color: hsl(120, 100%, 40%);">+ var CBSP_IEs pages := {f_gen_page()};</span><br><span style="color: hsl(120, 100%, 40%);">+ var template (value) BSSMAP_FIELD_CellIdentificationList cell_list;</span><br><span style="color: hsl(120, 100%, 40%);">+ var ASP_RSL_Unitdata rx_rsl_ud;</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ cell_list := ts_BSSMAP_CIL_CGI({bssmap_cgi(mp_cgi_bts0)});</span><br><span style="color: hsl(120, 100%, 40%);">+ f_cbsp_init_server();</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ /* first establish a dedicated channel */</span><br><span style="color: hsl(120, 100%, 40%);">+ var DchanTuple dt := f_est_dchan('23'O, 23, '00010203040506'O);</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ /* then send ETWS PN */</span><br><span style="color: hsl(120, 100%, 40%);">+ f_cbsp_write_emerg(15, 1015, cell_list);</span><br><span style="color: hsl(120, 100%, 40%);">+ var template (present) octetstring tr_apdu := f_gen_etws_pn(1015, 15);</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%);">+ [] IPA_RSL[0].receive(tr_ASP_RSL_UD(IPAC_PROTO_RSL_TRX0, tr_RSL_DATA_REQ(dt.rsl_chan_nr, ?, ?))) -> value rx_rsl_ud {</span><br><span style="color: hsl(120, 100%, 40%);">+ var RSL_IE_Body l3_ie;</span><br><span style="color: hsl(120, 100%, 40%);">+ if (f_rsl_find_ie(rx_rsl_ud.rsl, RSL_IE_L3_INFO, l3_ie) == false) {</span><br><span style="color: hsl(120, 100%, 40%);">+ setverdict(fail, "RSL DATA REQ without L3?");</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%);">+ var PDU_ML3_NW_MS l3 := dec_PDU_ML3_NW_MS(l3_ie.l3_info.payload);</span><br><span style="color: hsl(120, 100%, 40%);">+ var template (present) APDU_Flags_V tr_flags := {</span><br><span style="color: hsl(120, 100%, 40%);">+ lastSeg := '0'B,</span><br><span style="color: hsl(120, 100%, 40%);">+ firstSeg := '0'B,</span><br><span style="color: hsl(120, 100%, 40%);">+ cR := '0'B,</span><br><span style="color: hsl(120, 100%, 40%);">+ spare := '0'B</span><br><span style="color: hsl(120, 100%, 40%);">+ };</span><br><span style="color: hsl(120, 100%, 40%);">+ if (match(l3, tr_RR_APP_INFO('0001'B, tr_apdu, tr_flags))) {</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%);">+ [] IPA_RSL[0].receive { repeat; }</span><br><span style="color: hsl(120, 100%, 40%);">+ [] T.timeout {</span><br><span style="color: hsl(120, 100%, 40%);">+ setverdict(fail, "Waiting for APP INFO");</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> control {</span><br><span> execute( TC_cbsp_bsc_server() );</span><br><span> execute( TC_cbsp_bsc_client() );</span><br><span>@@ -499,6 +583,8 @@</span><br><span> execute( TC_cbsp_kill_nonexist() );</span><br><span> execute( TC_cbsp_write_then_kill() );</span><br><span> execute( TC_cbsp_write_then_reset() );</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ execute( TC_cbsp_emerg_write_bts_cgi_dchan() );</span><br><span> }</span><br><span> </span><br><span> </span><br><span>diff --git a/library/CBSP_Templates.ttcn b/library/CBSP_Templates.ttcn</span><br><span>index 7c73d7c..57e87e2 100644</span><br><span>--- a/library/CBSP_Templates.ttcn</span><br><span>+++ b/library/CBSP_Templates.ttcn</span><br><span>@@ -283,7 +283,6 @@</span><br><span> template (value) BSSMAP_FIELD_CellIdentificationList cell_list,</span><br><span> template (value) uint8_t emerg_ind,</span><br><span> template (value) uint16_t warn_type,</span><br><span style="color: hsl(0, 100%, 40%);">- template (value) uint16_t num_bcast_req,</span><br><span> template (value) uint8_t warn_per</span><br><span> ) :=</span><br><span> ts_CBSP(CBSP_MSGT_WRITE_REPLACE, {</span><br><span>diff --git a/library/L3_Templates.ttcn b/library/L3_Templates.ttcn</span><br><span>index bc0e797..2fb86d0 100644</span><br><span>--- a/library/L3_Templates.ttcn</span><br><span>+++ b/library/L3_Templates.ttcn</span><br><span>@@ -523,6 +523,28 @@</span><br><span> }</span><br><span> }</span><br><span> </span><br><span style="color: hsl(120, 100%, 40%);">+template (present) PDU_ML3_NW_MS tr_RR_APP_INFO(template (present) BIT4 apdu_id,</span><br><span style="color: hsl(120, 100%, 40%);">+ template (present) octetstring data,</span><br><span style="color: hsl(120, 100%, 40%);">+ template (present) APDU_Flags_V flags := ?) := {</span><br><span style="color: hsl(120, 100%, 40%);">+ discriminator := '0000'B, /* overwritten */</span><br><span style="color: hsl(120, 100%, 40%);">+ tiOrSkip := {</span><br><span style="color: hsl(120, 100%, 40%);">+ skipIndicator := '0000'B</span><br><span style="color: hsl(120, 100%, 40%);">+ },</span><br><span style="color: hsl(120, 100%, 40%);">+ msgs := {</span><br><span style="color: hsl(120, 100%, 40%);">+ rrm := {</span><br><span style="color: hsl(120, 100%, 40%);">+ applicationInformation := {</span><br><span style="color: hsl(120, 100%, 40%);">+ messageType := '00111000'B,</span><br><span style="color: hsl(120, 100%, 40%);">+ aPDU_ID := apdu_id,</span><br><span style="color: hsl(120, 100%, 40%);">+ aPDU_Flags := flags,</span><br><span style="color: hsl(120, 100%, 40%);">+ aPDU_Data := {</span><br><span style="color: hsl(120, 100%, 40%);">+ lengthIndicator := ?,</span><br><span style="color: hsl(120, 100%, 40%);">+ aPDU_DataValue := data</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> template (value) PDU_ML3_NW_MS ts_RR_HandoverCommand := {</span><br><span> discriminator := '0110'B,</span><br><span> tiOrSkip := {</span><br><span></span><br></pre><p>To view, visit <a href="https://gerrit.osmocom.org/c/osmo-ttcn3-hacks/+/15414">change 15414</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/+/15414"/><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: Ib057bd251604e9bae968e71de245b3bbf737a356 </div>
<div style="display:none"> Gerrit-Change-Number: 15414 </div>
<div style="display:none"> Gerrit-PatchSet: 4 </div>
<div style="display:none"> Gerrit-Owner: laforge <laforge@gnumonks.org> </div>
<div style="display:none"> Gerrit-Reviewer: Jenkins Builder </div>
<div style="display:none"> Gerrit-Reviewer: laforge <laforge@gnumonks.org> </div>
<div style="display:none"> Gerrit-CC: pespin <pespin@sysmocom.de> </div>
<div style="display:none"> Gerrit-MessageType: merged </div>