<p>Harald Welte has uploaded this change for <strong>review</strong>.</p><p><a href="https://gerrit.osmocom.org/13866">View Change</a></p><pre style="font-family: monospace,monospace; white-space: pre-wrap;">sgsn: Actual first Iu test case<br><br>Change-Id: I66069e31c30d33934ad57cc2b8794f56ffd5c7d6<br>---<br>M sgsn/SGSN_Tests.ttcn<br>A sgsn/SGSN_Tests_Iu.ttcn<br>2 files changed, 120 insertions(+), 8 deletions(-)<br><br></pre><pre style="font-family: monospace,monospace; white-space: pre-wrap;">git pull ssh://gerrit.osmocom.org:29418/osmo-ttcn3-hacks refs/changes/66/13866/1</pre><pre style="font-family: monospace,monospace; white-space: pre-wrap;"><span>diff --git a/sgsn/SGSN_Tests.ttcn b/sgsn/SGSN_Tests.ttcn</span><br><span>index 5dae397..8bd32b1 100644</span><br><span>--- a/sgsn/SGSN_Tests.ttcn</span><br><span>+++ b/sgsn/SGSN_Tests.ttcn</span><br><span>@@ -1,5 +1,7 @@</span><br><span> module SGSN_Tests {</span><br><span> </span><br><span style="color: hsl(120, 100%, 40%);">+friend module SGSN_Tests_Iu;</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span> import from General_Types all;</span><br><span> import from Osmocom_Types all;</span><br><span> import from Native_Functions all;</span><br><span>@@ -455,16 +457,72 @@</span><br><span> f_send_llc(ts_LLC_UI(l3_enc, sapi, '0'B, n_u));</span><br><span> }</span><br><span> </span><br><span style="color: hsl(120, 100%, 40%);">+/* trigger sending of a RANAP InitialUE and wait for SCCP connection confirmation */</span><br><span style="color: hsl(120, 100%, 40%);">+function f_send_l3_initial_ue(template PDU_L3_MS_SGSN l3_mo) runs on BSSGP_ConnHdlr {</span><br><span style="color: hsl(120, 100%, 40%);">+ log("Sending InitialUE: ", l3_mo);</span><br><span style="color: hsl(120, 100%, 40%);">+ var octetstring l3_enc := enc_PDU_L3_MS_SGSN(valueof(l3_mo));</span><br><span style="color: hsl(120, 100%, 40%);">+ var RANAP_PDU ranap;</span><br><span style="color: hsl(120, 100%, 40%);">+ var LAI lai := {</span><br><span style="color: hsl(120, 100%, 40%);">+ pLMNidentity := '62F224'O,</span><br><span style="color: hsl(120, 100%, 40%);">+ lAC := '1234'O,</span><br><span style="color: hsl(120, 100%, 40%);">+ iE_Extensions := omit</span><br><span style="color: hsl(120, 100%, 40%);">+ };</span><br><span style="color: hsl(120, 100%, 40%);">+ var SAI sai := {</span><br><span style="color: hsl(120, 100%, 40%);">+ pLMNidentity := lai.pLMNidentity,</span><br><span style="color: hsl(120, 100%, 40%);">+ lAC := lai.lAC,</span><br><span style="color: hsl(120, 100%, 40%);">+ sAC := '0000'O, /* FIXME */</span><br><span style="color: hsl(120, 100%, 40%);">+ iE_Extensions := omit</span><br><span style="color: hsl(120, 100%, 40%);">+ };</span><br><span style="color: hsl(120, 100%, 40%);">+ var IuSignallingConnectionIdentifier sigc_id := int2bit(23, 24); /* FIXME */</span><br><span style="color: hsl(120, 100%, 40%);">+ var GlobalRNC_ID grnc_id := {</span><br><span style="color: hsl(120, 100%, 40%);">+ pLMNidentity := lai.pLMNidentity,</span><br><span style="color: hsl(120, 100%, 40%);">+ rNC_ID := 2342 /* FIXME */</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%);">+ ranap := valueof(ts_RANAP_initialUE_CS(lai, sai, l3_enc, sigc_id, grnc_id));</span><br><span style="color: hsl(120, 100%, 40%);">+ BSSAP.send(ts_RANAP_Conn_Req(g_pars.sccp_addr_peer, g_pars.sccp_addr_local, ranap));</span><br><span style="color: hsl(120, 100%, 40%);">+ alt {</span><br><span style="color: hsl(120, 100%, 40%);">+ [] BSSAP.receive(RAN_Conn_Prim:MSC_CONN_PRIM_CONF_IND) {}</span><br><span style="color: hsl(120, 100%, 40%);">+ [] BSSAP.receive(RAN_Conn_Prim:MSC_CONN_PRIM_DISC_IND) {</span><br><span style="color: hsl(120, 100%, 40%);">+ setverdict(fail, "DISC.ind from SCCP");</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%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+/* send a L3 (GMM/SM) message over whatever is the appropriate lower-layer bearer */</span><br><span style="color: hsl(120, 100%, 40%);">+function f_send_l3(template PDU_L3_MS_SGSN l3_mo, integer gb_index := 0, boolean initial := false) runs on BSSGP_ConnHdlr {</span><br><span style="color: hsl(120, 100%, 40%);">+ if (gb_index >= NUM_GB) {</span><br><span style="color: hsl(120, 100%, 40%);">+ if (initial) {</span><br><span style="color: hsl(120, 100%, 40%);">+ f_send_l3_initial_ue(l3_mo);</span><br><span style="color: hsl(120, 100%, 40%);">+ } else {</span><br><span style="color: hsl(120, 100%, 40%);">+ BSSAP.send(ts_PDU_DTAP_PS_MO(l3_mo));</span><br><span style="color: hsl(120, 100%, 40%);">+ }</span><br><span style="color: hsl(120, 100%, 40%);">+ } else {</span><br><span style="color: hsl(120, 100%, 40%);">+ f_send_l3_gmm_llc(l3_mo, gb_index);</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> altstep as_mm_identity(integer gb_idx := 0) runs on BSSGP_ConnHdlr {</span><br><span> var MobileL3_CommonIE_Types.MobileIdentityLV mi;</span><br><span style="color: hsl(0, 100%, 40%);">- [] BSSGP[gb_idx].receive(tr_GMM_ID_REQ('001'B)) {</span><br><span style="color: hsl(120, 100%, 40%);">+ [gb_idx < NUM_GB] BSSGP[gb_idx].receive(tr_GMM_ID_REQ('001'B)) {</span><br><span> mi := valueof(ts_MI_IMSI_LV(g_pars.imsi));</span><br><span style="color: hsl(0, 100%, 40%);">- f_send_l3_gmm_llc(ts_GMM_ID_RESP(mi), gb_idx);</span><br><span style="color: hsl(120, 100%, 40%);">+ f_send_l3(ts_GMM_ID_RESP(mi), gb_idx);</span><br><span> repeat;</span><br><span> }</span><br><span style="color: hsl(0, 100%, 40%);">- [] BSSGP[gb_idx].receive(tr_GMM_ID_REQ('010'B)) {</span><br><span style="color: hsl(120, 100%, 40%);">+ [gb_idx >= NUM_GB] BSSAP.receive(tr_PDU_DTAP_PS_MT(tr_GMM_ID_REQ('001'B))) {</span><br><span style="color: hsl(120, 100%, 40%);">+ mi := valueof(ts_MI_IMSI_LV(g_pars.imsi));</span><br><span style="color: hsl(120, 100%, 40%);">+ f_send_l3(ts_GMM_ID_RESP(mi), gb_idx);</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%);">+ [gb_idx < NUM_GB] BSSGP[gb_idx].receive(tr_GMM_ID_REQ('010'B)) {</span><br><span> mi := valueof(ts_MI_IMEI_LV(g_pars.imei));</span><br><span style="color: hsl(0, 100%, 40%);">- f_send_l3_gmm_llc(ts_GMM_ID_RESP(mi), gb_idx);</span><br><span style="color: hsl(120, 100%, 40%);">+ f_send_l3(ts_GMM_ID_RESP(mi), gb_idx);</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%);">+ [gb_idx >= NUM_GB] BSSAP.receive(tr_PDU_DTAP_PS_MT(tr_GMM_ID_REQ('010'B))) {</span><br><span style="color: hsl(120, 100%, 40%);">+ mi := valueof(ts_MI_IMEI_LV(g_pars.imei));</span><br><span style="color: hsl(120, 100%, 40%);">+ f_send_l3(ts_GMM_ID_RESP(mi), gb_idx);</span><br><span> repeat;</span><br><span> }</span><br><span> }</span><br><span>@@ -475,7 +533,10 @@</span><br><span> var PDU_DTAP_PS_MT mt;</span><br><span> var PDU_L3_SGSN_MS l3_mt;</span><br><span> alt {</span><br><span style="color: hsl(0, 100%, 40%);">- [] BSSGP[gb_idx].receive(rx_tpl) -> value l3_mt { }</span><br><span style="color: hsl(120, 100%, 40%);">+ [gb_idx < NUM_GB] BSSGP[gb_idx].receive(rx_tpl) -> value l3_mt { }</span><br><span style="color: hsl(120, 100%, 40%);">+ [gb_idx >= NUM_GB] BSSAP.receive(tr_PDU_DTAP_PS_MT(rx_tpl)) -> value mt {</span><br><span style="color: hsl(120, 100%, 40%);">+ l3_mt := mt.dtap;</span><br><span style="color: hsl(120, 100%, 40%);">+ }</span><br><span> }</span><br><span> return l3_mt;</span><br><span> }</span><br><span>@@ -543,7 +604,17 @@</span><br><span> l3_mo.msgs.gprs_mm.authenticationAndCipheringResponse.imeisv :=</span><br><span> valueof(ts_MI_IMEISV_TLV(g_pars.imei & '0'H));</span><br><span> }</span><br><span style="color: hsl(0, 100%, 40%);">- f_send_l3_gmm_llc(l3_mo, gb_idx);</span><br><span style="color: hsl(120, 100%, 40%);">+ f_send_l3(l3_mo, gb_idx);</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ /* Security Mode Command + Complete on Iu case */</span><br><span style="color: hsl(120, 100%, 40%);">+ if (gb_idx >= NUM_GB) {</span><br><span style="color: hsl(120, 100%, 40%);">+ BSSAP.receive(tr_RANAP_SecurityModeCmd(uia_algs := ?, uia_key := oct2bit(g_pars.vec.ik),</span><br><span style="color: hsl(120, 100%, 40%);">+ key_sts := ?)) {</span><br><span style="color: hsl(120, 100%, 40%);">+ var IntegrityProtectionAlgorithm uia_chosen := 0; /*standard_UMTS_integrity_algorithm_UIA1;*/</span><br><span style="color: hsl(120, 100%, 40%);">+ BSSAP.send(ts_RANAP_SecurityModeComplete(uia_chosen));</span><br><span style="color: hsl(120, 100%, 40%);">+ //BSSAP.receive(tr_RANAP_CommonId(imsi_hex2oct(g_pars.imsi)));</span><br><span style="color: hsl(120, 100%, 40%);">+ }</span><br><span style="color: hsl(120, 100%, 40%);">+ }</span><br><span> } else {</span><br><span> /* wait for identity procedure */</span><br><span> f_sleep(1.0);</span><br><span>@@ -649,7 +720,7 @@</span><br><span> * revisionLevelIndicatior is at the wrong place! */</span><br><span> attach_req.msgs.gprs_mm.attachRequest.msNetworkCapability.msNetworkCapabilityV.solSACapability := '0'B;</span><br><span> </span><br><span style="color: hsl(0, 100%, 40%);">- f_send_l3_gmm_llc(attach_req, gb_idx);</span><br><span style="color: hsl(120, 100%, 40%);">+ f_send_l3(attach_req, gb_idx, initial := true);</span><br><span> f_gmm_auth(umts_aka_challenge, force_gsm_sres, gb_idx);</span><br><span> /* Expect SGSN to perform LU with HLR */</span><br><span> f_gmm_gsup_lu_isd();</span><br><span>@@ -658,7 +729,12 @@</span><br><span> f_process_attach_accept(l3_mt.msgs.gprs_mm.attachAccept);</span><br><span> </span><br><span> /* FIXME: Extract P-TMSI, if any. Only send Complete if necessary */</span><br><span style="color: hsl(0, 100%, 40%);">- f_send_l3_gmm_llc(ts_GMM_ATTACH_COMPL, gb_idx);</span><br><span style="color: hsl(120, 100%, 40%);">+ f_send_l3(ts_GMM_ATTACH_COMPL, gb_idx);</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ /* IuPS case: Expect Iu Release */</span><br><span style="color: hsl(120, 100%, 40%);">+ if (gb_idx >= NUM_GB) {</span><br><span style="color: hsl(120, 100%, 40%);">+ as_iu_release_compl_disc();</span><br><span style="color: hsl(120, 100%, 40%);">+ }</span><br><span> }</span><br><span> </span><br><span> private function f_TC_attach(charstring id) runs on BSSGP_ConnHdlr {</span><br><span>diff --git a/sgsn/SGSN_Tests_Iu.ttcn b/sgsn/SGSN_Tests_Iu.ttcn</span><br><span>new file mode 100644</span><br><span>index 0000000..2c2a8af</span><br><span>--- /dev/null</span><br><span>+++ b/sgsn/SGSN_Tests_Iu.ttcn</span><br><span>@@ -0,0 +1,36 @@</span><br><span style="color: hsl(120, 100%, 40%);">+module SGSN_Tests_Iu {</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+import from Osmocom_Types all;</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+import from SGSN_Tests all;</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+import from RAN_Adapter all;</span><br><span style="color: hsl(120, 100%, 40%);">+import from RAN_Emulation all;</span><br><span style="color: hsl(120, 100%, 40%);">+import from RANAP_Templates all;</span><br><span style="color: hsl(120, 100%, 40%);">+import from RANAP_PDU_Descriptions all;</span><br><span style="color: hsl(120, 100%, 40%);">+import from RANAP_IEs all;</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_iu_attach(charstring id) runs on BSSGP_ConnHdlr {</span><br><span style="color: hsl(120, 100%, 40%);">+ var PdpActPars apars := valueof(t_PdpActPars(mp_ggsn_ip));</span><br><span style="color: hsl(120, 100%, 40%);">+</span><br><span style="color: hsl(120, 100%, 40%);">+ /* first perform regular attach */</span><br><span style="color: hsl(120, 100%, 40%);">+ f_gmm_attach(umts_aka_challenge := true, force_gsm_sres := false, gb_idx := 3);</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%);">+testcase TC_iu_attach() runs on test_CT {</span><br><span style="color: hsl(120, 100%, 40%);">+ var BSSGP_ConnHdlr vc_conn;</span><br><span style="color: hsl(120, 100%, 40%);">+ f_init();</span><br><span style="color: hsl(120, 100%, 40%);">+ f_sleep(1.0);</span><br><span style="color: hsl(120, 100%, 40%);">+ vc_conn := f_start_handler(refers(f_TC_iu_attach), testcasename(), g_gb, 1001);</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%);">+</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_iu_attach() );</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></span><br></pre><p>To view, visit <a href="https://gerrit.osmocom.org/13866">change 13866</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/13866"/><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: newchange </div>
<div style="display:none"> Gerrit-Change-Id: I66069e31c30d33934ad57cc2b8794f56ffd5c7d6 </div>
<div style="display:none"> Gerrit-Change-Number: 13866 </div>
<div style="display:none"> Gerrit-PatchSet: 1 </div>
<div style="display:none"> Gerrit-Owner: Harald Welte <laforge@gnumonks.org> </div>