Loading ttcn/DiameterShDh_TCFunctions.ttcn3 +58 −3 Original line number Diff line number Diff line Loading @@ -1941,7 +1941,12 @@ module DiameterShDh_TCFunctions { f_selfOrClientSyncAndVerdict(c_prDone, f_getVerdict()); log("*** " & __SCOPE__ & ": INFO: Preamble done. ***"); //TODO TestBody // TestBody f_awaiting_PNR( mdw_pNR( vc_sessionId, // containing a Session-ID AVP mdw_pnrBodyUserdataAvps(?,?,?,mw_user_Data(?)) //TODO import XML Schema )); f_selfOrClientSyncAndVerdict(c_tbDone, f_getVerdict()); Loading @@ -1959,7 +1964,29 @@ module DiameterShDh_TCFunctions { f_selfOrClientSyncAndVerdict(c_prDone, f_getVerdict()); log("*** " & __SCOPE__ & ": INFO: Preamble done. ***"); //TODO TestBody // TestBody f_send_SNR( md_sNR( vc_sessionId, md_snrBodyAvps( vc_originHost, // containing an Origin-Host AVP vc_originRealm, // containing an Origin-Realm AVP vc_destinationRealm, // containing a Destination-Realm AVP m_msisdn_user_Identity ( m_MSISDN_user_identity(char2oct(PX_NotRelatedPrivateIdentity)) ), m_subs_Req_Type(SUBSCRIBE_E), m_data_Reference(REPOSITORY_DATA_E) ) ) ); f_awaiting_PNR( mdw_pNR( vc_sessionId, // containing a Session-ID AVP mdw_pnrBodyUserdataAvps(?,?,?,mw_user_Data( char2oct(* & "shdata_repositorydata(0)_serviceinfo_seqnr" & *))) // TODO: Sh_data cp PU21 )); f_selfOrClientSyncAndVerdict(c_tbDone, f_getVerdict()); Loading Loading @@ -2277,7 +2304,35 @@ module DiameterShDh_TCFunctions { f_selfOrClientSyncAndVerdict(c_prDone, f_getVerdict()); log("*** " & __SCOPE__ & ": INFO: Preamble done. ***"); //TODO TestBody //TestBody derived from SH_AS_MS_01 f_send_PNR( md_pNR( vc_sessionId, md_pnrBodyUserdataAvps( vc_originHost, // containing an Origin-Host AVP vc_originRealm, // containing an Origin-Realm AVP vc_destinationHost, // containing an Destination-Host AVP vc_destinationRealm, // containing a Destination-Realm AVP m_specific_user_Identity, // containing a User-Identity AVP m_user_Data_dummy // Containing a User-Data AVP ) ) ); f_awaiting_PNA( mdw_pNA( vc_sessionId, // containing a Session-ID AVP mw_PNA_ResulSuc( mw_resultCode( DIAMETER_SUCCESS_E // containing a Result-Code AVP // indicating DIAMETER_SUCCESS_E ), vc_originHost_IUT, // containing an Origin-Host AVP vc_originRealm_IUT ))); f_selfOrClientSyncAndVerdict(c_tbDone, f_getVerdict()); Loading ttcn/DiameterShDh_Templates.ttcn3 +37 −0 Original line number Diff line number Diff line Loading @@ -295,6 +295,23 @@ module DiameterShDh_Templates { user_Identity := p_user_Identity } // End of template md_pnrBodyAvps template (value) PNR_Body_AVP md_pnrBodyUserdataAvps( template (value) Origin_Host_AVP p_origin_Host, template (value) Origin_Realm_AVP p_origin_Realm, template (value) Destination_Host_AVP p_destination_Host, template (value) Destination_Realm_AVP p_destination_Realm, template (value) User_Identity_AVP p_user_Identity := m_user_Identity_dummy, template (value) User_Data_AVP p_user_data := m_user_Data_dummy ) modifies m_PNR_Body_dummy := { vendor_Specific_Application_Id := m_vendor_Specific_Appl_Id_Sh, origin_Host := p_origin_Host, origin_Realm := p_origin_Realm, destination_Host := p_destination_Host, destination_Realm := p_destination_Realm, user_Identity := p_user_Identity } // End of template md_pnrBodyAvps } // End of group pnr_msg group pur_msg { Loading Loading @@ -511,6 +528,18 @@ module DiameterShDh_Templates { destination_Realm := p_destinationRealm } // End of template mdw_pnrBodyAvps template PNR_Body_AVP mdw_pnrBodyUserdataAvps( template (present) Origin_Host_AVP p_originHost := ?, template (present) Origin_Realm_AVP p_originRealm := ?, template (present) Destination_Realm_AVP p_destinationRealm := ?, template (present) User_Data_AVP p_user_Data := ? ) modifies mw_PNR_Body_dummy := { origin_Host := p_originHost, origin_Realm := p_originRealm, destination_Realm := p_destinationRealm, user_Data := ? } // End of template mdw_pnrBodyUserdataAvps } // End of group pnr_msg group pur_msg { Loading Loading @@ -850,6 +879,14 @@ module DiameterShDh_Templates { failed := p_failed // optional in TS 129 229 } // End of template mw_PNA_ResulFaile template PNA_Body_AVP mw_PNA_ResulSuc( template (present) Result_Code_AVP p_resultCode, template (present) Origin_Host_AVP p_originHost, template (present) Origin_Realm_AVP p_originRealm ) modifies mdw_pnaBodyAvps := { result_Code := p_resultCode // optional in TS 129 229 } // End of template mw_PNA_ResulSuc /** * @desc Send template for PNA * @param p_sessionId Session identifier Loading Loading
ttcn/DiameterShDh_TCFunctions.ttcn3 +58 −3 Original line number Diff line number Diff line Loading @@ -1941,7 +1941,12 @@ module DiameterShDh_TCFunctions { f_selfOrClientSyncAndVerdict(c_prDone, f_getVerdict()); log("*** " & __SCOPE__ & ": INFO: Preamble done. ***"); //TODO TestBody // TestBody f_awaiting_PNR( mdw_pNR( vc_sessionId, // containing a Session-ID AVP mdw_pnrBodyUserdataAvps(?,?,?,mw_user_Data(?)) //TODO import XML Schema )); f_selfOrClientSyncAndVerdict(c_tbDone, f_getVerdict()); Loading @@ -1959,7 +1964,29 @@ module DiameterShDh_TCFunctions { f_selfOrClientSyncAndVerdict(c_prDone, f_getVerdict()); log("*** " & __SCOPE__ & ": INFO: Preamble done. ***"); //TODO TestBody // TestBody f_send_SNR( md_sNR( vc_sessionId, md_snrBodyAvps( vc_originHost, // containing an Origin-Host AVP vc_originRealm, // containing an Origin-Realm AVP vc_destinationRealm, // containing a Destination-Realm AVP m_msisdn_user_Identity ( m_MSISDN_user_identity(char2oct(PX_NotRelatedPrivateIdentity)) ), m_subs_Req_Type(SUBSCRIBE_E), m_data_Reference(REPOSITORY_DATA_E) ) ) ); f_awaiting_PNR( mdw_pNR( vc_sessionId, // containing a Session-ID AVP mdw_pnrBodyUserdataAvps(?,?,?,mw_user_Data( char2oct(* & "shdata_repositorydata(0)_serviceinfo_seqnr" & *))) // TODO: Sh_data cp PU21 )); f_selfOrClientSyncAndVerdict(c_tbDone, f_getVerdict()); Loading Loading @@ -2277,7 +2304,35 @@ module DiameterShDh_TCFunctions { f_selfOrClientSyncAndVerdict(c_prDone, f_getVerdict()); log("*** " & __SCOPE__ & ": INFO: Preamble done. ***"); //TODO TestBody //TestBody derived from SH_AS_MS_01 f_send_PNR( md_pNR( vc_sessionId, md_pnrBodyUserdataAvps( vc_originHost, // containing an Origin-Host AVP vc_originRealm, // containing an Origin-Realm AVP vc_destinationHost, // containing an Destination-Host AVP vc_destinationRealm, // containing a Destination-Realm AVP m_specific_user_Identity, // containing a User-Identity AVP m_user_Data_dummy // Containing a User-Data AVP ) ) ); f_awaiting_PNA( mdw_pNA( vc_sessionId, // containing a Session-ID AVP mw_PNA_ResulSuc( mw_resultCode( DIAMETER_SUCCESS_E // containing a Result-Code AVP // indicating DIAMETER_SUCCESS_E ), vc_originHost_IUT, // containing an Origin-Host AVP vc_originRealm_IUT ))); f_selfOrClientSyncAndVerdict(c_tbDone, f_getVerdict()); Loading
ttcn/DiameterShDh_Templates.ttcn3 +37 −0 Original line number Diff line number Diff line Loading @@ -295,6 +295,23 @@ module DiameterShDh_Templates { user_Identity := p_user_Identity } // End of template md_pnrBodyAvps template (value) PNR_Body_AVP md_pnrBodyUserdataAvps( template (value) Origin_Host_AVP p_origin_Host, template (value) Origin_Realm_AVP p_origin_Realm, template (value) Destination_Host_AVP p_destination_Host, template (value) Destination_Realm_AVP p_destination_Realm, template (value) User_Identity_AVP p_user_Identity := m_user_Identity_dummy, template (value) User_Data_AVP p_user_data := m_user_Data_dummy ) modifies m_PNR_Body_dummy := { vendor_Specific_Application_Id := m_vendor_Specific_Appl_Id_Sh, origin_Host := p_origin_Host, origin_Realm := p_origin_Realm, destination_Host := p_destination_Host, destination_Realm := p_destination_Realm, user_Identity := p_user_Identity } // End of template md_pnrBodyAvps } // End of group pnr_msg group pur_msg { Loading Loading @@ -511,6 +528,18 @@ module DiameterShDh_Templates { destination_Realm := p_destinationRealm } // End of template mdw_pnrBodyAvps template PNR_Body_AVP mdw_pnrBodyUserdataAvps( template (present) Origin_Host_AVP p_originHost := ?, template (present) Origin_Realm_AVP p_originRealm := ?, template (present) Destination_Realm_AVP p_destinationRealm := ?, template (present) User_Data_AVP p_user_Data := ? ) modifies mw_PNR_Body_dummy := { origin_Host := p_originHost, origin_Realm := p_originRealm, destination_Realm := p_destinationRealm, user_Data := ? } // End of template mdw_pnrBodyUserdataAvps } // End of group pnr_msg group pur_msg { Loading Loading @@ -850,6 +879,14 @@ module DiameterShDh_Templates { failed := p_failed // optional in TS 129 229 } // End of template mw_PNA_ResulFaile template PNA_Body_AVP mw_PNA_ResulSuc( template (present) Result_Code_AVP p_resultCode, template (present) Origin_Host_AVP p_originHost, template (present) Origin_Realm_AVP p_originRealm ) modifies mdw_pnaBodyAvps := { result_Code := p_resultCode // optional in TS 129 229 } // End of template mw_PNA_ResulSuc /** * @desc Send template for PNA * @param p_sessionId Session identifier Loading