[M] Change in osmo-ttcn3-hacks[master]: sgsn: Introduce test TC_update_ctx_err_ind_from_ggsn
pespin has submitted this change. ( https://gerrit.osmocom.org/c/osmo-ttcn3-hacks/+/37665?usp=email )
Change subject: sgsn: Introduce test TC_update_ctx_err_ind_from_ggsn ......................................................................
sgsn: Introduce test TC_update_ctx_err_ind_from_ggsn
Related: OS#6512 Related: SYS#5435 Change-Id: Ic417b23cae798361f73150f6a72f91e2f8528e7a --- M library/GTPv1C_Templates.ttcn M library/GTPv1U_Templates.ttcn M sgsn/BSSGP_ConnHdlr.ttcn M sgsn/SGSN_Tests_Iu.ttcn M sgsn/expected-results.xml 5 files changed, 201 insertions(+), 2 deletions(-)
Approvals: laforge: Looks good to me, but someone else must approve Jenkins Builder: Verified pespin: Looks good to me, approved
diff --git a/library/GTPv1C_Templates.ttcn b/library/GTPv1C_Templates.ttcn index 893ab01..b1059fe 100644 --- a/library/GTPv1C_Templates.ttcn +++ b/library/GTPv1C_Templates.ttcn @@ -404,6 +404,18 @@ } }
+ /* 7.7.81 Direct Tunnel Flags */ + template (value) DirectTunnelFlags ts_DirectTunnelFlags(BIT1 dTI := '0'B, + BIT1 gCSI := '0'B, + BIT1 eI := '0'B) := { + type_gtpc := 'B6'O, + lengthf := 0, /* overwritten */ + dTI := dTI, + gCSI := gCSI, + eI := eI, + spare := '00000'B + } + /* 7.7.29 PDP Context */ template (value) PDP_Context_GTPC ts_PDP_Context_GTPC(template (value) octetstring pdp_addr, template (value) octetstring ggsn_gsn_addr, @@ -902,6 +914,53 @@ sgsn_ip_data, pco, ratType, uli)), seq) }
+ /* Update PPD Context Sent GGSN -> SGSN: */ + template (value) GTPC_PDUs ts_UpdatePdpPDU_GGSN(template (value) BIT4 nsapi, + template (omit) hexstring imsi := omit, + template (omit) Recovery_gtpc recovery := omit, + template (omit) EndUserAddress eua := omit, + template (omit) ProtConfigOptions pco := omit, + template (omit) QualityOfServiceProfile qos := omit, + template (omit) DirectTunnelFlags dtf := omit) := { + updatePDPContextRequest := { + updatePDPContextRequestGGSN := { + imsi := f_ts_Imsi(imsi), + recovery := recovery, + nsapi := ts_NSAPI(nsapi), + endUserAddress := eua, + protConfigOptions := pco, + qualityOfServiceProfile := qos, + tft := omit, + commonFlags := omit, + aPN_Restriction := omit, + mS_InfoChangeReportingAction := omit, + directTunnelFlags := dtf, + bearerControlMode := omit, + evolvedAllocationRetentionPriorityI := omit, + extendedCommonFlags := omit, + cSGInfoReportingAction := omit, + aPN_AMBR := omit, + private_extension_gtpc := omit + } + } + } + template (value) Gtp1cUnitdata ts_GTPC_UpdatePDP_GGSN(template (value) Gtp1cPeer peer, + template (value) OCT4 teid, + template (value) uint16_t seq, + template (value) BIT4 nsapi, + template (omit) hexstring imsi := omit, + template (omit) Recovery_gtpc recovery := omit, + template (omit) EndUserAddress eua := omit, + template (omit) ProtConfigOptions pco := omit, + template (omit) QualityOfServiceProfile qos := omit, + template (omit) DirectTunnelFlags dtf := omit) := { + peer := peer, + gtpc := ts_GTP1C_PDU(updatePDPContextRequest, teid, + ts_UpdatePdpPDU_GGSN(nsapi, imsi, recovery, + eua, pco, qos, dtf), + seq) + } +
template (value) NSAPI_GTPC ts_NSAPI(template (value) BIT4 nsapi) := { type_gtpc := '14'O, @@ -1029,6 +1088,48 @@ eua, recovery, pco)), seq) }
+ /* Update PDP Context Resp sent SGSN -> GGSN: */ + template (present) GTPC_PDUs tr_UpdatePdpRespSGSNPDU(template (present) GTP_Cause cause := ?, + template Recovery_gtpc recovery := *, + template TeidDataI teidDataI := *, + template ProtConfigOptions pco := *, + template GSN_Address_GTPC sgsn_addr_traffic := *, + template QualityOfServiceProfile qos := *, + template DirectTunnelFlags dtf := *) := { + updatePDPContextResponse := { + updatePDPContextResponseSGSN := { + + cause := tr_Cause_gtpc(cause), + + recovery := recovery, + teidDataI := teidDataI, + protConfigOptions := pco, + sgsn_addr_traffic := sgsn_addr_traffic, + qualityOfServiceProfile := qos, + userLocationInformation := *, + mS_TimeZone := *, + directTunnelFlags := dtf, + evolvedAllocationRetentionPriorityI := *, + aPN_AMBR := *, + private_extension_gtpc := * + } + } + } + + template (present) Gtp1cUnitdata tr_GTPC_UpdatePdpRespSGSN(template (present) Gtp1cPeer peer, uint16_t seq, OCT4 teid, + template (present) GTP_Cause cause := ?, + template Recovery_gtpc recovery := *, + template TeidDataI teidDataI := *, + template ProtConfigOptions pco := *, + template GSN_Address_GTPC sgsn_addr_traffic := *, + template QualityOfServiceProfile qos := *, + template DirectTunnelFlags dtf := *) := { + peer := peer, + gtpc := tr_GTP1C_PDU(updatePDPContextResponse, teid, + tr_UpdatePdpRespSGSNPDU(cause, recovery, teidDataI, pco, + sgsn_addr_traffic, qos, dtf)) + } + /* PCO send base template */ template (value) ProtConfigOptions ts_PCO := { type_gtpc := '84'O, diff --git a/library/GTPv1U_Templates.ttcn b/library/GTPv1U_Templates.ttcn index 86d2401..c242115 100644 --- a/library/GTPv1U_Templates.ttcn +++ b/library/GTPv1U_Templates.ttcn @@ -140,17 +140,41 @@ gtpu := ts_GTP1U_PDU('02'O, seq, '00000000'O, ts_UEchoRespPDU(rest_ctr)) }
+ template (present) GSNAddress_gtpu tr_UGsnAddr(template (present) octetstring ip_addr := ?) := { + type_gtpu := '85'O, + lengthf := ?, + gSNAddressValue := ip_addr + } template (value) GSNAddress_gtpu ts_UGsnAddr(template (value) octetstring ip_addr) := { type_gtpu := '85'O, lengthf := lengthof(valueof(ip_addr)), gSNAddressValue := ip_addr }
+ template (present) TeidDataI_gtpu tr_UteidDataI(template (present) OCT4 teid := ?) := { + type_gtpu := '10'O, + teidDataI := teid + } template (value) TeidDataI_gtpu ts_UteidDataI(template (value) OCT4 teid) := { type_gtpu := '10'O, teidDataI := teid }
+ template (present) GTPU_IEs tr_UErrorIndication(template (present) OCT4 teid := ?, + template (present) octetstring gsn_addr := ?) := { + errorIndication_IEs := { + teidDataI_gtpu := tr_UteidDataI(teid), + gSNAddress_gtpu := tr_UGsnAddr(gsn_addr), + private_extension_gtpu := * + } + } + template (present) Gtp1uUnitdata tr_GTPU_ErrorIndication(template (present) Gtp1uPeer peer := ?, + template (present) OCT4 teid := ?, + template (present) octetstring gsn_addr := ?) := { + peer := peer, + gtpu := tr_GTP1U_PDU('1A'O, '00000000'O, tr_UErrorIndication(teid, gsn_addr)) + } + template (value) GTPU_IEs ts_UErrorIndication(template (value) OCT4 teid, template (value) octetstring gsn_addr) := { errorIndication_IEs := { @@ -159,7 +183,6 @@ private_extension_gtpu := omit } } - /* master template for sending a GTP-U Error indication */ template (value) Gtp1uUnitdata ts_GTPU_ErrorIndication(template (value) Gtp1uPeer peer, template (value) uint16_t seq, diff --git a/sgsn/BSSGP_ConnHdlr.ttcn b/sgsn/BSSGP_ConnHdlr.ttcn index 140fa99..055902a 100644 --- a/sgsn/BSSGP_ConnHdlr.ttcn +++ b/sgsn/BSSGP_ConnHdlr.ttcn @@ -54,7 +54,7 @@
/* Emulated GGSN is at GTP_ConnHdlr.GTP[0] */ const integer GTP_GGSN_IDX := 0; -private function ran2gtp_idx(integer ran_index) return integer { +function ran2gtp_idx(integer ran_index) return integer { return ran_index + 1 - NUM_GB; }
diff --git a/sgsn/SGSN_Tests_Iu.ttcn b/sgsn/SGSN_Tests_Iu.ttcn index 5010443..f5339d4 100644 --- a/sgsn/SGSN_Tests_Iu.ttcn +++ b/sgsn/SGSN_Tests_Iu.ttcn @@ -12,6 +12,7 @@ import from RANAP_PDU_Descriptions all; import from RANAP_IEs all;
+import from GTPv1C_Templates all; import from GTPv1U_Templates all; import from GTP_Emulation all;
@@ -262,6 +263,67 @@ f_cleanup(); }
+/* TS 29.060 7.3.3, 3GPP TS 23.007 15.2: Emulate GGSN sending +UpdatePDPCtx[NSAPI, Direct Tunnel Flags(EI=1)] due to having receiving an Error +Indication from RNC while in Direct Tunnel mode. SGSN should attempt recreation +of the RAB to make sure PDP context is established, since it may be that RNC got +restarted. */ +private function f_TC_update_ctx_err_ind_from_ggsn(charstring id) runs on BSSGP_ConnHdlr { + var PdpActPars apars := valueof(t_PdpActPars(mp_ggsn_ip, mp_ranap_cfg[0].sctp_addr.local_ip_addr)); + var integer ran_index := 3; + + /* first perform regular attach */ + f_gmm_attach(umts_aka_challenge := true, force_gsm_sres := false, ran_index := ran_index); + + f_service_request(apars, ran_index := ran_index); + + f_pdp_ctx_act(apars, ran_index := ran_index); + + /* then transceive a downlink PDU */ + f_gtpu_xceive_mt(apars, f_rnd_octstring(100), ran_index := ran_index); + /* RNC answers with Error Indication, it probably crashed and lost state: */ + f_gtp_register_teid('00000000'O, GTP_GGSN_IDX); /* Ease debugging in case SGSN sends ErrorInd */ + f_ran_register_imsi(g_pars.imsi, g_pars.p_tmsi); /* Forward Paging below to this component */ + GTP[ran2gtp_idx(ran_index)].send(ts_GTPU_ErrorIndication(ts_GtpPeerU(apars.ggsn_ip_u), + 0, apars.rnc_tei_u, + apars.rnc_ip_u)); + GTP[GTP_GGSN_IDX].receive(tr_GTPU_ErrorIndication(ts_GtpPeerU(apars.rnc_ip_u), + apars.rnc_tei_u, + apars.rnc_ip_u)); + + GTP[GTP_GGSN_IDX].send(ts_GTPC_UpdatePDP_GGSN(ts_GtpPeerC(apars.sgsn_ip_c), + apars.sgsn_tei_c, 2, + apars.nsapi, + g_pars.imsi, + dtf := ts_DirectTunnelFlags(eI := '1'B))); + + GTP[GTP_GGSN_IDX].receive(tr_GTPC_UpdatePdpRespSGSN(ts_GtpPeerC(apars.sgsn_ip_c), 2, + apars.ggsn_tei_c, + GTP_CAUSE_REQUEST_ACCEPTED)); + + BSSAP.receive(RAN_Conn_Prim:MSC_CONN_PRIM_DISC_IND); + g_pars.rnc_send_initial_ue := true; + BSSAP.receive(tr_RANAP_Paging(ps_domain, imsi_hex2oct(g_pars.imsi))); + + /* Ue comes back, answering the paging: + * SGSN recreates the Iu ctx and recovers the Direct Tunnel RNC<->GGSN: */ + f_service_request(apars, pdp_status := '2000'O /*NSAPI=5*/, ran_index := ran_index); + as_ranap_rab_ass_req(apars); + as_ggsn_gtp_ctx_upd_req(apars, exp_dir_tun := true, ran_index := ran_index); + + /* Now UE is in PMM ENABLED state, tear it down to clean up: */ + f_pdp_ctx_deact_mo(apars, '00'O, ran_index := ran_index); + setverdict(pass); +} +testcase TC_update_ctx_err_ind_from_ggsn() runs on test_CT { + var BSSGP_ConnHdlr vc_conn; + f_init(); + f_sleep(1.0); + vc_conn := f_start_handler(refers(f_TC_update_ctx_err_ind_from_ggsn), testcasename(), g_gb, 1004); + vc_conn.done; + f_cleanup(); +} + control { execute( TC_iu_attach() ); execute( TC_iu_attach_encr() ); @@ -270,6 +332,7 @@ execute( TC_attach_pdp_act_user() ); execute( TC_attach_pdp_act_pmm_idle() ); execute( TC_pmm_idle_rx_mt_data() ); + execute( TC_update_ctx_err_ind_from_ggsn() ); }
diff --git a/sgsn/expected-results.xml b/sgsn/expected-results.xml index 3461721..a29467d 100644 --- a/sgsn/expected-results.xml +++ b/sgsn/expected-results.xml @@ -96,6 +96,7 @@ <testcase classname='SGSN_Tests_Iu' name='TC_attach_pdp_act_pmm_idle' time='MASKED'/> <testcase classname='SGSN_Tests_Iu' name='TC_attach_pdp_act_pmm_idle_lost_pdp_status' time='MASKED'/> <testcase classname='SGSN_Tests_Iu' name='TC_pmm_idle_rx_mt_data' time='MASKED'/> + <testcase classname='SGSN_Tests_Iu' name='TC_update_ctx_err_ind_from_ggsn' time='MASKED'/> <!-- SGSN_Tests_NS (handle_sns == true) testcases start here --> <testcase classname='SGSN_Tests_NS' name='TC_SNS_size' time='MASKED'/> <testcase classname='SGSN_Tests_NS' name='TC_SNS_size_too_big' time='MASKED'/>
-
pespin