diff options
Diffstat (limited to 'library/DIAMETER_Templates.ttcn')
| -rw-r--r-- | library/DIAMETER_Templates.ttcn | 1112 |
1 files changed, 842 insertions, 270 deletions
diff --git a/library/DIAMETER_Templates.ttcn b/library/DIAMETER_Templates.ttcn index 2cc29861..71485132 100644 --- a/library/DIAMETER_Templates.ttcn +++ b/library/DIAMETER_Templates.ttcn @@ -9,8 +9,10 @@ module DIAMETER_Templates { * SPDX-License-Identifier: GPL-2.0-or-later */ +import from General_Types all; import from DIAMETER_Types all; import from Osmocom_Types all; +import from Misc_Helpers all; /* https://www.iana.org/assignments/aaa-parameters/aaa-parameters.xhtml#aaa-parameters-4 */ type enumerated DIAMETER_Resultcode { @@ -100,18 +102,19 @@ type enumerated DIAMETER_Resultcode { DIAMETER_ERROR_EAP_CODE_UNKNOWN (5048) }; -/* 3GPP TS 29.272 Section 7.1.8 */ -const uint32_t c_DIAMETER_3GPP_Gx_AID := 16777238; -const uint32_t c_DIAMETER_3GPP_S6_AID := 16777251; -const uint32_t c_DIAMETER_3GPP_S13_AID := 16777252; +/* RFC4006 3.1 */ +const uint32_t c_DIAMETER_CREDIT_CONTROL_AID := 4; + const uint32_t c_DIAMETER_3GPP_S7_AID := 16777308; +const octetstring c_def_sess_id := char2oct("ttcn3.session"); + template (value) PDU_DIAMETER -ts_DIAMETER(template (value) BIT8 flags, +ts_DIAMETER(template (value) DIAMETER_Types.BIT8 flags, template (value) Command_Code cmd_code, template (value) OCTET4 app_id := '00000000'O, - template (value) UINT32 hbh_id, - template (value) UINT32 ete_id, + template (value) UINT32 hbh_id := '00000000'O, + template (value) UINT32 ete_id := '00000000'O, template (value) AVP_list avps := {} ) := { version := 1, @@ -124,7 +127,7 @@ ts_DIAMETER(template (value) BIT8 flags, avps := avps } template (present) PDU_DIAMETER -tr_DIAMETER(template (present) BIT8 flags := ?, +tr_DIAMETER(template (present) DIAMETER_Types.BIT8 flags := ?, template (present) Command_Code cmd_code := ?, template (present) OCTET4 app_id := ?, template (present) UINT32 hbh_id := ?, @@ -159,7 +162,7 @@ tr_DIAMETER_R( template (value) AVP_Header ts_DIA_Hdr(template (value) AVP_Code avp_code, - template (value) BIT8 flags := '01000000'B) := { + template (value) DIAMETER_Types.BIT8 flags := '01000000'B) := { avp_code := avp_code, VMPxxxxx := flags, avp_length := 0, /* overwritten */ @@ -167,7 +170,7 @@ ts_DIA_Hdr(template (value) AVP_Code avp_code, } template (present) AVP_Header tr_DIA_Hdr(template (present) AVP_Code avp_code, - template (present) BIT8 flags := '0???????'B) := { + template (present) DIAMETER_Types.BIT8 flags := '0???????'B) := { avp_code := avp_code, VMPxxxxx := flags, avp_length := ?, /* overwritten */ @@ -176,7 +179,7 @@ tr_DIA_Hdr(template (present) AVP_Code avp_code, template (value) AVP_Header ts_DIA_Hdr_3GPP(template (value) AVP_Code avp_code, - template (value) BIT8 flags := '11000000'B) := { + template (value) DIAMETER_Types.BIT8 flags := '11000000'B) := { avp_code := avp_code, VMPxxxxx := flags, avp_length := 0, /* overwritten */ @@ -184,14 +187,29 @@ ts_DIA_Hdr_3GPP(template (value) AVP_Code avp_code, } template (present) AVP_Header tr_DIA_Hdr_3GPP(template (present) AVP_Code avp_code, - template (present) BIT8 flags := '1???????'B) := { + template (present) DIAMETER_Types.BIT8 flags := '1???????'B) := { avp_code := avp_code, VMPxxxxx := flags, avp_length := ?, /* overwritten */ vendor_id := vendor_id_3GPP } -template (present) GenericAVP tr_SubcrIdType(template (present) DCC_NONE_Subscription_Id_Type t) := { +template (present) AVP_Address tr_AVP_Address(template (present) AddressType addr_type := ?, + template (present) octetstring addr_data := ?) := { + address_type := addr_type, + address_data := addr_data +} + +template (present) GenericAVP tr_AVP_SubcrId(template (present) DCC_NONE_Subscription_Id t) := { + avp := { + avp_header := tr_DIA_Hdr(c_AVP_Code_DCC_NONE_Subscription_Id), + avp_data := { + avp_DCC_NONE_Subscription_Id := t + } + } +} + +template (present) GenericAVP tr_AVP_SubcrIdType(template (present) DCC_NONE_Subscription_Id_Type t) := { avp := { avp_header := tr_DIA_Hdr(c_AVP_Code_DCC_NONE_Subscription_Id_Type), avp_data := { @@ -200,6 +218,42 @@ template (present) GenericAVP tr_SubcrIdType(template (present) DCC_NONE_Subscri } } +template (present) GenericAVP tr_AVP_SubcrIdData(template (present) DCC_NONE_Subscription_Id_Data t) := { + avp := { + avp_header := tr_DIA_Hdr(c_AVP_Code_DCC_NONE_Subscription_Id_Data), + avp_data := { + avp_DCC_NONE_Subscription_Id_Data := t + } + } +} + +template (present) GenericAVP tr_AVP_RequestedAction(template (present) DCC_NONE_Requested_Action t := ?) := { + avp := { + avp_header := tr_DIA_Hdr(c_AVP_Code_DCC_NONE_Requested_Action), + avp_data := { + avp_DCC_NONE_Requested_Action := t + } + } +} + +template (present) GenericAVP tr_AVP_MultipleServicesIndicator(template (present) DCC_NONE_Multiple_Services_Indicator t := ?) := { + avp := { + avp_header := tr_DIA_Hdr(c_AVP_Code_DCC_NONE_Multiple_Services_Indicator), + avp_data := { + avp_DCC_NONE_Multiple_Services_Indicator := t + } + } +} + +template (present) GenericAVP tr_AVP_ServiceContextId(template (present) DCC_NONE_Service_Context_Id id := ?) := { + avp := { + avp_header := tr_DIA_Hdr(c_AVP_Code_DCC_NONE_Service_Context_Id), + avp_data := { + avp_DCC_NONE_Service_Context_Id := id + } + } +} + template (value) GenericAVP ts_AVP_OriginHost(template (value) charstring host) := { avp := { avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Origin_Host), @@ -244,6 +298,32 @@ template (value) GenericAVP ts_AVP_OriginStateId(template (value) OCTET4 state_i } } } +template (present) GenericAVP tr_AVP_OriginStateId(template (present) OCTET4 state_id := ?) := { + avp := { + avp_header := tr_DIA_Hdr(c_AVP_Code_BASE_NONE_Origin_State_Id), + avp_data := { + avp_BASE_NONE_Origin_State_Id := state_id + } + } +} + +template (value) GenericAVP ts_AVP_TerminationCause(template (value) BASE_NONE_Termination_Cause tc) := { + avp := { + avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Termination_Cause), + avp_data := { + avp_BASE_NONE_Termination_Cause := tc + } + } +} + +template (present) GenericAVP tr_AVP_TerminationCause(template (present) BASE_NONE_Termination_Cause tc) := { + avp := { + avp_header := tr_DIA_Hdr(c_AVP_Code_BASE_NONE_Termination_Cause), + avp_data := { + avp_BASE_NONE_Termination_Cause := tc + } + } +} template (value) GenericAVP ts_AVP_HostIpAddr(template (value) OCTET4 ipv4_addr) := { avp := { @@ -257,11 +337,29 @@ template (value) GenericAVP ts_AVP_HostIpAddr(template (value) OCTET4 ipv4_addr) } } -template (value) GenericAVP ts_AVP_VendorId(Vendor_Id vendor_id) := { +template (value) GenericAVP ts_AVP_VendorId(template (value) Vendor_Id vendor_id) := { avp := { avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Vendor_Id, '00000000'B), avp_data := { - avp_BASE_NONE_Vendor_Id := int2oct(enum2int(vendor_id), 4) + avp_BASE_NONE_Vendor_Id := int2oct(enum2int(valueof(vendor_id)), 4) + } + } +} +private function f_tr_AVP_VendorId(template (present) Vendor_Id vendor_id) +return template (present) BASE_NONE_Vendor_Id { + if (istemplatekind(vendor_id, "?")) { + return ?; + } else { + var template (present) BASE_NONE_Vendor_Id c; + c := int2oct(enum2int(valueof(vendor_id)), 4); + return c; + } +} +template (present) GenericAVP tr_AVP_VendorId(template (present) Vendor_Id vendor_id) := { + avp := { + avp_header := tr_DIA_Hdr(c_AVP_Code_BASE_NONE_Vendor_Id), + avp_data := { + avp_BASE_NONE_Vendor_Id := f_tr_AVP_VendorId(vendor_id) } } } @@ -293,6 +391,44 @@ template (value) GenericAVP ts_AVP_InbSecId(template (value) OCTET4 inb_sec_id) } } +private function enum2int_Vendor_Id_tmpl(template Vendor_Id inp) return template integer +{ + if (istemplatekind(inp, "omit")) { + return omit; + } else if (istemplatekind(inp, "*")) { + return *; + } else if (istemplatekind(inp, "?")) { + return ?; + } else { + return enum2int(valueof(inp)); + } +} + +template (present) GenericAVP tr_AVP_VendorSpecAppId(template (present) Vendor_Id vendor_id := ?, + template (present) uint32_t auth_app_id := ?) := { + avp := { + avp_header := tr_DIA_Hdr(c_AVP_Code_BASE_NONE_Vendor_Specific_Application_Id), + avp_data := { + avp_BASE_NONE_Vendor_Specific_Application_Id := { + { + avp := { + avp_header := tr_DIA_Hdr(c_AVP_Code_BASE_NONE_Vendor_Id), + avp_data := { + avp_BASE_NONE_Vendor_Id := int2oct_tmpl(enum2int_Vendor_Id_tmpl(vendor_id), 4) + } + } + }, { + avp := { + avp_header := tr_DIA_Hdr(c_AVP_Code_BASE_NONE_Auth_Application_Id), + avp_data := { + avp_BASE_NONE_Auth_Application_Id := int2oct_tmpl(auth_app_id, 4) + } + } + } + } + } + } +} template (value) GenericAVP ts_AVP_VendorSpecAppId(Vendor_Id vendor_id, uint32_t auth_app_id) := { avp := { avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Vendor_Specific_Application_Id), @@ -369,8 +505,58 @@ template (present) GenericAVP tr_AVP_CcReqNum(template (present) AVP_Unsigned32 } } +template (present) GenericAVP tr_AVP_EventTimestamp(template (present) AVP_Unsigned32 n := ?) := { + avp := { + avp_header := tr_DIA_Hdr(c_AVP_Code_BASE_NONE_Event_Timestamp), + avp_data := { + avp_BASE_NONE_Event_Timestamp := n + } + } +} +template (present) GenericAVP tr_AVP_ExperimentalResultCode(template (present) AVP_Unsigned32 n := ?) := { + avp := { + avp_header := tr_DIA_Hdr(c_AVP_Code_BASE_NONE_Experimental_Result_Code), + avp_data := { + avp_BASE_NONE_Experimental_Result_Code := n + } + } +} +template (value) GenericAVP ts_AVP_ExperimentalResultCode(template (value) AVP_Unsigned32 n) := { + avp := { + avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Experimental_Result_Code), + avp_data := { + avp_BASE_NONE_Experimental_Result_Code := n + } + } +} +template (present) GenericAVP tr_AVP_ExperimentalResult(template (present) Vendor_Id vendor_id := ?, + template (present) AVP_Unsigned32 err_code := ? + ) := { + avp := { + avp_header := tr_DIA_Hdr(c_AVP_Code_BASE_NONE_Experimental_Result), + avp_data := { + avp_BASE_NONE_Experimental_Result := { + tr_AVP_VendorId(vendor_id), + tr_AVP_ExperimentalResultCode(err_code) + } + } + } +} +template (value) GenericAVP ts_AVP_ExperimentalResult(template (value) Vendor_Id vendor_id := vendor_id_3GPP, + template (value) AVP_Unsigned32 err_code + ) := { + avp := { + avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Experimental_Result), + avp_data := { + avp_BASE_NONE_Experimental_Result := { + ts_AVP_VendorId(vendor_id), + ts_AVP_ExperimentalResultCode(err_code) + } + } + } +} template (value) GenericAVP ts_AVP_SuppVendorIdRaw(uint32_t vendor_id) := { avp := { @@ -383,11 +569,29 @@ template (value) GenericAVP ts_AVP_SuppVendorIdRaw(uint32_t vendor_id) := { template (value) GenericAVP ts_AVP_SuppVendorId(Vendor_Id vendor_id) := ts_AVP_SuppVendorIdRaw(enum2int(vendor_id)); -template (value) GenericAVP ts_AVP_ResultCode(DIAMETER_Resultcode res_code) := { +template (value) GenericAVP ts_AVP_ResultCode(template (value) DIAMETER_Resultcode res_code) := { avp := { avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Result_Code), avp_data := { - avp_BASE_NONE_Result_Code := int2oct(enum2int(res_code), 4) + avp_BASE_NONE_Result_Code := int2oct(enum2int(valueof(res_code)), 4) + } + } +} +private function f_tr_DIAMETER_Resultcode(template (present) DIAMETER_Resultcode res_code) +return template (present) BASE_NONE_Result_Code { + if (istemplatekind(res_code, "?")) { + return ?; + } else { + var template (present) BASE_NONE_Result_Code c; + c := int2oct(enum2int(valueof(res_code)), 4); + return c; + } +} +template (present) GenericAVP tr_AVP_ResultCode(template (present) DIAMETER_Resultcode res_code) := { + avp := { + avp_header := tr_DIA_Hdr(c_AVP_Code_BASE_NONE_Result_Code), + avp_data := { + avp_BASE_NONE_Result_Code := f_tr_DIAMETER_Resultcode(res_code) } } } @@ -426,6 +630,23 @@ template (present) GenericAVP tr_AVP_SessionId(template (present) octetstring se } } +template (value) GenericAVP ts_AVP_DestinationHost(template (value) charstring dest_host) := { + avp := { + avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Destination_Host), + avp_data := { + avp_BASE_NONE_Destination_Host := dest_host + } + } +} +template (present) GenericAVP tr_AVP_DestinationHost(template (present) charstring host := ?) := { + avp := { + avp_header := tr_DIA_Hdr(c_AVP_Code_BASE_NONE_Destination_Host), + avp_data := { + avp_BASE_NONE_Destination_Host := host + } + } +} + /* 3.3 Destination Realm */ template (value) GenericAVP ts_AVP_DestinationRealm(template (value) charstring dest_realm) := { avp := { @@ -461,376 +682,536 @@ template (present) GenericAVP tr_AVP_UserName(template (present) octetstring uid } } } -template (value) GenericAVP ts_AVP_UserNameImsi(hexstring imsi) := ts_AVP_UserName(char2oct(hex2str(imsi))); -template (present) GenericAVP tr_AVP_UserNameImsi(hexstring imsi) := tr_AVP_UserName(char2oct(hex2str(imsi))); +template (value) GenericAVP ts_AVP_UserNameImsi(template (value) hexstring imsi) := ts_AVP_UserName(char2oct(hex2str(valueof(imsi)))); +template (present) GenericAVP tr_AVP_UserNameImsi(template (present) hexstring imsi := ?) := tr_AVP_UserName(char2oct_tmpl(hex2str_tmpl(imsi))); +template (value) GenericAVP ts_AVP_NumOfReqVectors(template (value) UINT32 num_req := '00000004'O) := { + avp := { + avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_Number_Of_Requested_Vectors), + avp_data := { + avp_AAA_3GPP_Number_Of_Requested_Vectors := num_req + } + } +} -/* TS 29.262 7.3.53 RAND */ -template (value) GenericAVP ts_AVP_RAND(template (value) octetstring rand) := { +template (value) GenericAVP ts_AVP_ImmReqPref(template (value) UINT32 par := '00000000'O) := { avp := { - avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_RAND), + avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_Immediate_Response_Preferred), avp_data := { - avp_AAA_3GPP_RAND := rand + avp_AAA_3GPP_Immediate_Response_Preferred := par } } } -/* TS 29.262 7.3.54 XRES */ -template (value) GenericAVP ts_AVP_XRES(template (value) octetstring xres) := { + +/* 7.3.11 Requested-EUTRAN-Authentication-Info */ +template (value) GenericAVP ts_AVP_RequestedEutranAuthInfo(template (value) UINT32 num_vec := '00000004'O) := { avp := { - avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_XRES), + avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_Requested_EUTRAN_Authentication_Info), avp_data := { - avp_AAA_3GPP_XRES := xres + avp_AAA_3GPP_Requested_EUTRAN_Authentication_Info := { + ts_AVP_NumOfReqVectors(num_vec), + ts_AVP_ImmReqPref('00000000'O) + } } } } -/* TS 29.262 7.3.55 XRES */ -template (value) GenericAVP ts_AVP_AUTN(template (value) octetstring autn) := { +template (present) GenericAVP tr_AVP_3GPP_SubscrRauTauTmr(template (present) uint32_t tmr := ?) := { avp := { - avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_AUTN), + avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_Subscribed_Periodic_RAU_TAU_Timer), avp_data := { - avp_AAA_3GPP_AUTN := autn + avp_AAA_3GPP_Subscribed_Periodic_RAU_TAU_Timer := int2oct_tmpl(tmr, 4) } } } -/* TS 29.262 7.3.56 KASME */ -template (value) GenericAVP ts_AVP_KASME(template (value) octetstring kasme) := { +template (value) GenericAVP ts_AVP_3GPP_SubscrRauTauTmr(uint32_t tmr) := { avp := { - avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_KASME), + avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_Subscribed_Periodic_RAU_TAU_Timer), avp_data := { - avp_AAA_3GPP_KASME := kasme + avp_AAA_3GPP_Subscribed_Periodic_RAU_TAU_Timer := int2oct(tmr, 4) } } } -/* TS 29.262 7.3.23 Item-Number */ -template (value) GenericAVP ts_AVP_ItemNumber(uint32_t num) := { +template (present) GenericAVP tr_AVP_PCC_3GPP_QoS_Information(template (present) AVP_list list := ?) := { avp := { - avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_KASME), + avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_PCC_3GPP_QoS_Information), avp_data := { - avp_AAA_3GPP_Item_Number := int2oct(num, 4) + avp_PCC_3GPP_QoS_Information := list } } } -/* TS 29.262 7.3.18 E-UTRAN Vector */ -template (value) GenericAVP ts_AVP_EutranVec(uint32_t item_num, octetstring rand, octetstring xres, - octetstring autn, octetstring kasme) := { +template (value) GenericAVP ts_AVP_PCC_3GPP_QoS_Information(template (value) AVP_list list) := { avp := { - avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_E_UTRAN_Vector), + avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_PCC_3GPP_QoS_Information), avp_data := { - avp_AAA_3GPP_E_UTRAN_Vector := { - ts_AVP_ItemNumber(item_num), - ts_AVP_RAND(rand), - ts_AVP_XRES(xres), - ts_AVP_AUTN(autn), - ts_AVP_KASME(kasme) - } + avp_PCC_3GPP_QoS_Information := list } } } -/* TS 29.262 7.3.2 Subscription-Data */ -template (value) GenericAVP ts_AVP_3GPP_SubscriptionData(template (value) AVP_list content) := { +template (value) GenericAVP ts_AVP_PCC_3GPP_APN_Aggregate_Max_Bitrate_DL(uint32_t val) := { avp := { - avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_Subscription_Data), + avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_PCC_3GPP_APN_Aggregate_Max_Bitrate_DL), avp_data := { - avp_AAA_3GPP_Subscription_Data := content + avp_PCC_3GPP_APN_Aggregate_Max_Bitrate_DL := int2oct(val, 4) } } } +template (value) GenericAVP ts_AVP_PCC_3GPP_APN_Aggregate_Max_Bitrate_UL(uint32_t val) := { + avp := { + avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_PCC_3GPP_APN_Aggregate_Max_Bitrate_UL), + avp_data := { + avp_PCC_3GPP_APN_Aggregate_Max_Bitrate_UL := int2oct(val, 4) + } + } +} -/* TS 29.262 7.3.17 Authentication-Info */ -template (value) GenericAVP ts_AVP_3GPP_AuthInfo(template (value) AVP_list content) := { +template (value) GenericAVP ts_AVP_PCC_3GPP_Default_EPS_Bearer_QoS(template (value) AVP_list list) := { avp := { - avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_Authentication_Info), + avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_PCC_3GPP_Default_EPS_Bearer_QoS), avp_data := { - avp_AAA_3GPP_Authentication_Info := content + avp_PCC_3GPP_Default_EPS_Bearer_QoS := list } } } -/* TS 29.262 7.3.9 Visited-PLMN-Id */ -template (value) GenericAVP ts_AVP_3GPP_VisitedPlmnId(template (value) octetstring id) := { +template (present) GenericAVP tr_AVP_PCC_3GPP_QoS_Class_Identifier(template (present) uint32_t val := ?) := { avp := { - avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_Visited_PLMN_Id), + avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_PCC_3GPP_QoS_Class_Identifier), avp_data := { - avp_AAA_3GPP_Visited_PLMN_Id := id + avp_PCC_3GPP_QoS_Class_Identifier := int2oct_tmpl(val, 4) } } } -template (present) GenericAVP tr_AVP_3GPP_VisitedPlmnId(template (present) octetstring id := ?) := { + +template (value) GenericAVP ts_AVP_PCC_3GPP_QoS_Class_Identifier(uint32_t val) := { avp := { - avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_Visited_PLMN_Id), + avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_PCC_3GPP_QoS_Class_Identifier), avp_data := { - avp_AAA_3GPP_Visited_PLMN_Id := id + avp_PCC_3GPP_QoS_Class_Identifier := int2oct(val, 4) } } } -/* TS 29.262 7.3.13 RAT-Type */ -template (value) GenericAVP ts_AVP_3GPP_RatType(template (value) PCC_3GPP_RAT_Type rat_type) := { +template (present) GenericAVP tr_AVP_3GPP_PriorityLevel(template (present) uint32_t prio := ?) := { avp := { - avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_PCC_3GPP_RAT_Type), + avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_PCC_3GPP_Priority_Level), avp_data := { - avp_PCC_3GPP_RAT_Type := rat_type + avp_PCC_3GPP_Priority_Level := int2oct_tmpl(prio, 4) } } } -template (present) GenericAVP tr_AVP_3GPP_RatType(template (present) PCC_3GPP_RAT_Type rat_type := ?) := { + +template (value) GenericAVP ts_AVP_3GPP_PriorityLevel(uint32_t prio) := { avp := { - avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_PCC_3GPP_RAT_Type), + avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_PCC_3GPP_Priority_Level), avp_data := { - avp_PCC_3GPP_RAT_Type := rat_type + avp_PCC_3GPP_Priority_Level := int2oct(prio, 4) } } } -/* TS 29.262 7.3.7 ULR-Flags */ -template (value) GenericAVP ts_AVP_3GPP_UlrFlags(template (value) UINT32 flags) := { +template (present) GenericAVP tr_AVP_PCC_3GPP_AllocRetenPrio(template (present) uint32_t prio := ?) := { avp := { - avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_ULR_Flags), + avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_PCC_3GPP_Allocation_Retention_Priority), avp_data := { - avp_AAA_3GPP_ULR_Flags := flags + avp_PCC_3GPP_Allocation_Retention_Priority := superset( + tr_AVP_3GPP_PriorityLevel(prio) + /* pre-emption capability */ + /* pre-emption vulnerability */ + ) } } } -template (present) GenericAVP tr_AVP_3GPP_UlrFlags(template (present) UINT32 flags := ?) := { +template (value) GenericAVP ts_AVP_PCC_3GPP_AllocRetenPrio(uint32_t prio) := { avp := { - avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_ULR_Flags), + avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_PCC_3GPP_Allocation_Retention_Priority), avp_data := { - avp_AAA_3GPP_ULR_Flags := flags + avp_PCC_3GPP_Allocation_Retention_Priority := { + ts_AVP_3GPP_PriorityLevel(prio) + /* pre-emption capability */ + /* pre-emption vulnerability */ + } } } } -/* TS 29.262 7.3.8 ULA-Flags */ -template (value) GenericAVP ts_AVP_3GPP_UlaFlags(template (value) UINT32 flags) := { +/* 7.3.37 EPS-Subscribed-QoS-Profile */ +template (present) GenericAVP tr_AVP_3GPP_EpsSubscrQosProfile(template (present) uint32_t qos_class := ?, + template (present) uint32_t prio := ?) := { avp := { - avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_ULA_Flags), + avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_EPS_Subscribed_QoS_Profile), avp_data := { - avp_AAA_3GPP_ULA_Flags := flags + avp_AAA_3GPP_EPS_Subscribed_QoS_Profile := superset( + tr_AVP_PCC_3GPP_QoS_Class_Identifier(qos_class), + tr_AVP_PCC_3GPP_AllocRetenPrio(prio) + ) } } } -template (present) GenericAVP tr_AVP_3GPP_UlaFlags(template (present) UINT32 flags := ?) := { + +template (value) GenericAVP ts_AVP_3GPP_EpsSubscrQosProfile(uint32_t qos_class, uint32_t prio) := { avp := { - avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_ULA_Flags), + avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_EPS_Subscribed_QoS_Profile), avp_data := { - avp_AAA_3GPP_ULA_Flags := flags + avp_AAA_3GPP_EPS_Subscribed_QoS_Profile := { + ts_AVP_PCC_3GPP_QoS_Class_Identifier(qos_class), + ts_AVP_PCC_3GPP_AllocRetenPrio(prio) + } } } } +template (present) GenericAVP tr_AVP_3GPP_Reporting_Reason(template (present) DCA_3GPP_Reporting_Reason r := ?) := { + avp := { + avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_DCA_3GPP_Reporting_Reason), + avp_data := { + avp_DCA_3GPP_Reporting_Reason := r + } + } +} +template (present) GenericAVP tr_AVP_3GPP_AoCRequestType(template (present) DCA_3GPP_AoC_Request_Type t := ?) := { + avp := { + avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_DCA_3GPP_AoC_Request_Type), + avp_data := { + avp_DCA_3GPP_AoC_Request_Type := t + } + } +} -template (value) GenericAVP ts_AVP_NumOfReqVectors(template (value) UINT32 num_req := '00000004'O) := { +template (present) GenericAVP tr_AVP_3GPP_ServiceInformation(template (present) AVP_list content := ?) := { avp := { - avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_Number_Of_Requested_Vectors), + avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_DCA_3GPP_Service_Information), avp_data := { - avp_AAA_3GPP_Number_Of_Requested_Vectors := num_req + avp_DCA_3GPP_Service_Information := content } } } -template (value) GenericAVP ts_AVP_ImmReqPref(template (value) UINT32 par := '00000000'O) := { +template (present) GenericAVP tr_AVP_3GPP_PSInformation(template (present) AVP_list content := ?) := { avp := { - avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_Immediate_Response_Preferred), + avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_DCA_3GPP_PS_Information), avp_data := { - avp_AAA_3GPP_Immediate_Response_Preferred := par + avp_DCA_3GPP_PS_Information := content } } } +template (present) GenericAVP tr_AVP_3GPP_ChargingId(template (present) AVP_OctetString id := ?) := { + avp := { + avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_GI_3GPP_3GPP_Charging_Id), + avp_data := { + avp_GI_3GPP_3GPP_Charging_Id := id + } + } +} -/* 7.3.11 Requested-EUTRAN-Authentication-Info */ -template (value) GenericAVP ts_AVP_RequestedEutranAuthInfo(template (value) UINT32 num_vec := '00000004'O) := { +template (present) GenericAVP tr_AVP_3GPP_PDPType(template (present) GI_3GPP_3GPP_PDP_Type t := ?) := { avp := { - avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_Requested_EUTRAN_Authentication_Info), + avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_GI_3GPP_3GPP_PDP_Type), avp_data := { - avp_AAA_3GPP_Requested_EUTRAN_Authentication_Info := { - ts_AVP_NumOfReqVectors(num_vec), - ts_AVP_ImmReqPref('00000000'O) - } + avp_GI_3GPP_3GPP_PDP_Type := t } } } +template (present) GenericAVP tr_AVP_3GPP_PDPAddress(template (present) DCA_3GPP_PDP_Address addr := ?) := { + avp := { + avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_DCA_3GPP_PDP_Address), + avp_data := { + avp_DCA_3GPP_PDP_Address := addr + } + } +} -/* TS 29.262 7.3.27 Context-Identifier */ -template (value) GenericAVP ts_AVP_3GPP_ContextId(uint32_t ctx) := { +template (present) GenericAVP tr_AVP_3GPP_SGSNAddress(template (present) DCA_3GPP_SGSN_Address addr := ?) := { avp := { - avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_Context_Identifier), + avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_DCA_3GPP_SGSN_Address), avp_data := { - avp_AAA_3GPP_Context_Identifier := int2oct(ctx, 4) + avp_DCA_3GPP_SGSN_Address := addr } } } -/* Ts 29.262 7.3.29 Subscriber-Status */ -template (value) GenericAVP ts_AVP_3GPP_SubscriberStatus(template (value) AAA_3GPP_Subscriber_Status sts) := { +template (present) GenericAVP tr_AVP_3GPP_GGSNAddress(template (present) DCA_3GPP_GGSN_Address addr := ?) := { avp := { - avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_Subscriber_Status), + avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_DCA_3GPP_GGSN_Address), avp_data := { - avp_AAA_3GPP_Subscriber_Status := sts + avp_DCA_3GPP_GGSN_Address := addr } } } -template (value) GenericAVP ts_AVP_3GPP_SubscrRauTauTmr(uint32_t tmr) := { +template (present) GenericAVP tr_AVP_3GPP_SelectionMode(template (present) GI_3GPP_3GPP_Selection_Mode sm := ?) := { avp := { - avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_Subscribed_Periodic_RAU_TAU_Timer), + avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_GI_3GPP_3GPP_Selection_Mode), avp_data := { - avp_AAA_3GPP_Subscribed_Periodic_RAU_TAU_Timer := int2oct(tmr, 4) + avp_GI_3GPP_3GPP_Selection_Mode := sm } } } -/* TS 29.262 7.3.33 All-APN-Configurations-Included-Indicator */ -template (value) GenericAVP ts_AVP_3GPP_AllApnConfigsIncl(template (value) AAA_3GPP_All_APN_Configurations_Included_Indicator ind := All_APN_CONFIGURATIONS_INCLUDED) := { +template (present) GenericAVP tr_AVP_3GPP_ChargingCharacteristics(template (present) GI_3GPP_3GPP_Charging_Characteristics cc := ?) := { avp := { - avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_All_APN_Configurations_Included_Indicator), + avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_GI_3GPP_3GPP_Charging_Characteristics), avp_data := { - avp_AAA_3GPP_All_APN_Configurations_Included_Indicator := ind + avp_GI_3GPP_3GPP_Charging_Characteristics := cc } } } -/* TS 29.262 7.3.34 APN-Configuration-Profile */ -template (value) GenericAVP ts_AVP_3GPP_ApnConfigProfile(template (value) AVP_list content) := { +template (present) GenericAVP tr_AVP_3GPP_SGSNMCCMNC(template (present) GI_3GPP_3GPP_SGSN_MCC_MNC smn := ?) := { avp := { - avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_APN_Configuration_Profile), + avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_GI_3GPP_3GPP_SGSN_MCC_MNC), avp_data := { - avp_AAA_3GPP_APN_Configuration_Profile := content + avp_GI_3GPP_3GPP_SGSN_MCC_MNC := smn } } } -/* TS 29.262 7.3.35 APN-Configuration */ -template (value) GenericAVP ts_AVP_3GPP_ApnConfig(uint32_t ctx, AAA_3GPP_PDN_Type pdn_type, - charstring apn) := { +template (present) GenericAVP tr_AVP_3GPP_NSAPI(template (present) GI_3GPP_3GPP_NSAPI nsapi := ?) := { avp := { - avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_APN_Configuration_Profile), + avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_GI_3GPP_3GPP_NSAPI), avp_data := { - avp_AAA_3GPP_APN_Configuration := { - ts_AVP_3GPP_ContextId(ctx), - ts_AVP_3GPP_PdnType(pdn_type), - ts_AVP_3GPP_EpsSubscrQosProfile(1, 1), - ts_AVP_ServiceSelection(apn) - } + avp_GI_3GPP_3GPP_NSAPI := nsapi } } } -/* TS 29.262 7.3.36 Service-Selection (refers to RFC 5778) */ -template (value) GenericAVP ts_AVP_ServiceSelection(charstring apn) := { +template (present) GenericAVP tr_AVP_3GPP_MS_TimeZone(template (present) GI_3GPP_3GPP_MS_TimeZone ms_tz := ?) := { avp := { - avp_header := ts_DIA_Hdr(c_AVP_Code_MIPv6_NONE_Service_Selection), + avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_GI_3GPP_3GPP_MS_TimeZone), avp_data := { - avp_MIPv6_NONE_Service_Selection := char2oct(apn) + avp_GI_3GPP_3GPP_MS_TimeZone := ms_tz } } } -template (value) GenericAVP ts_AVP_3GPP_QosClassId(uint32_t id) := { +template (present) GenericAVP tr_AVP_3GPP_ULI(template (present) GI_3GPP_3GPP_User_Location_Info uli := ?) := { avp := { - avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_PCC_3GPP_QoS_Class_Identifier), + avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_GI_3GPP_3GPP_User_Location_Info), avp_data := { - avp_PCC_3GPP_QoS_Class_Identifier := int2oct(id, 4) + avp_GI_3GPP_3GPP_User_Location_Info := uli } } } -template (value) GenericAVP ts_AVP_3GPP_PriorityLevel(uint32_t prio) := { +template (present) GenericAVP tr_AVP_UserEquipmentInfo(template (present) DCC_NONE_User_Equipment_Info uei := ?) := { avp := { - avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_PCC_3GPP_Priority_Level), + avp_header := tr_DIA_Hdr(c_AVP_Code_DCC_NONE_User_Equipment_Info), avp_data := { - avp_PCC_3GPP_Priority_Level := int2oct(prio, 4) + avp_DCC_NONE_User_Equipment_Info := uei } } } +template (present) GenericAVP tr_AVP_UserEquipmentInfoType(template (present) DCC_NONE_User_Equipment_Info_Type ueit := ?) := { + avp := { + avp_header := tr_DIA_Hdr(c_AVP_Code_DCC_NONE_User_Equipment_Info_Type), + avp_data := { + avp_DCC_NONE_User_Equipment_Info_Type := ueit + } + } +} -template (value) GenericAVP ts_AVP_3GPP_AllocRetenPrio(uint32_t prio) := { +template (present) GenericAVP tr_AVP_UserEquipmentInfoValue(template (present) DCC_NONE_User_Equipment_Info_Value ueiv := ?) := { avp := { - avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_PCC_3GPP_Allocation_Retention_Priority), + avp_header := tr_DIA_Hdr(c_AVP_Code_DCC_NONE_User_Equipment_Info_Value), avp_data := { - avp_PCC_3GPP_Allocation_Retention_Priority := { - ts_AVP_3GPP_PriorityLevel(prio) - /* pre-emption capability */ - /* pre-emption vulnerability */ - } + avp_DCC_NONE_User_Equipment_Info_Value := ueiv } } } -template (value) GenericAVP ts_AVP_3GPP_EpsSubscrQosProfile(uint32_t qos_class, uint32_t prio) := { +/* RFC4006 8.16 Multiple-Services-Credit-Control AVP */ +template (value) GenericAVP ts_AVP_Multiple_Services_Credit_Control(template (value) AVP_list content) := { avp := { - avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_EPS_Subscribed_QoS_Profile), + avp_header := ts_DIA_Hdr(c_AVP_Code_DCC_NONE_Multiple_Services_Credit_Control), avp_data := { - avp_AAA_3GPP_EPS_Subscribed_QoS_Profile := { - ts_AVP_3GPP_QosClassId(qos_class), - ts_AVP_3GPP_AllocRetenPrio(prio) - } + avp_DCC_NONE_Multiple_Services_Credit_Control := content + } + } +} +template (present) GenericAVP tr_AVP_Multiple_Services_Credit_Control(template (present) AVP_list content := ?) := { + avp := { + avp_header := tr_DIA_Hdr(c_AVP_Code_DCC_NONE_Multiple_Services_Credit_Control), + avp_data := { + avp_DCC_NONE_Multiple_Services_Credit_Control := content } } } +/* Requested-Service-Unit AVP */ +template (present) GenericAVP tr_AVP_Requested_Service_Unit(template (present) AVP_list content := ?) := { + avp := { + avp_header := tr_DIA_Hdr(c_AVP_Code_DCC_NONE_Requested_Service_Unit), + avp_data := { + avp_DCC_NONE_Requested_Service_Unit := content + } + } +} -/* TS 29.262 7.3.41 AMBR */ -template (value) GenericAVP ts_AVP_3GPP_AMBR(uint32_t ul, uint32_t dl) := { +/* Used-Service-Unit AVP */ +template (present) GenericAVP tr_AVP_Used_Service_Unit(template (present) AVP_list content := ?) := { avp := { - avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_AMBR), + avp_header := tr_DIA_Hdr(c_AVP_Code_DCC_NONE_Used_Service_Unit), avp_data := { - avp_AAA_3GPP_AMBR := { - ts_AVP_3GPP_MaxReqBwUL(ul), - ts_AVP_3GPP_MaxReqBwDL(dl) - } + avp_DCC_NONE_Used_Service_Unit := content } } } -template (value) GenericAVP ts_AVP_3GPP_MaxReqBwUL(uint32_t bw) := { +/* RFC4006 8.17 Granted-Service-Unit AVP */ +template (value) GenericAVP ts_AVP_Granted_Service_Unit(template (value) AVP_list content) := { avp := { - avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_RX_3GPP_Max_Requested_Bandwidth_UL), + avp_header := ts_DIA_Hdr(c_AVP_Code_DCC_NONE_Granted_Service_Unit), avp_data := { - avp_RX_3GPP_Max_Requested_Bandwidth_UL := int2oct(bw, 4) + avp_DCC_NONE_Granted_Service_Unit := content } } } -template (value) GenericAVP ts_AVP_3GPP_MaxReqBwDL(uint32_t bw) := { +/* RFC4006 8.21 CC-Time AVP */ +template (value) GenericAVP ts_AVP_CC_Time(uint32_t cc_time_val) := { avp := { - avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_RX_3GPP_Max_Requested_Bandwidth_DL), + avp_header := ts_DIA_Hdr(c_AVP_Code_DCC_NONE_CC_Time), avp_data := { - avp_RX_3GPP_Max_Requested_Bandwidth_DL := int2oct(bw, 4) + avp_DCC_NONE_CC_Time := int2oct(cc_time_val, 4) } } } +/* RFC4006 8.23 CC-Total-Octets AVP */ +template (value) GenericAVP ts_AVP_CC_Total_Octets(uint64_t cc_total_octets_val) := { + avp := { + avp_header := ts_DIA_Hdr(c_AVP_Code_DCC_NONE_CC_Total_Octets), + avp_data := { + avp_DCC_NONE_CC_Total_Octets := int2oct(cc_total_octets_val, 8) + } + } +} +/* RFC4006 8.33 Validity-Time AVP */ +template (value) GenericAVP ts_AVP_Validity_Time(uint32_t validity_time_val) := { + avp := { + avp_header := ts_DIA_Hdr(c_AVP_Code_DCC_NONE_Validity_Time), + avp_data := { + avp_DCC_NONE_Validity_Time := int2oct(validity_time_val, 4) + } + } +} -/* TS 29.262 7.3.62 PDN-Type */ -template (value) GenericAVP ts_AVP_3GPP_PdnType(template (value) AAA_3GPP_PDN_Type pdn_type) := { +template (value) GenericAVP ts_AVP_3GPP_VolumeQuotaThreshold(uint32_t volume_quota_thresh_val) := { avp := { - avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_PDN_Type), + avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_DCA_3GPP_Volume_Quota_Threshold), avp_data := { - avp_AAA_3GPP_PDN_Type := pdn_type + avp_DCA_3GPP_Volume_Quota_Threshold := int2oct(volume_quota_thresh_val, 4) } } } +template (present) GenericAVP tr_AVP_3GPP_CalledStationId(template (present) DNAS_NONE_Called_Station_Id id := ?) := { + avp := { + avp_header := tr_DIA_Hdr(c_AVP_Code_DNAS_NONE_Called_Station_Id), + avp_data := { + avp_DNAS_NONE_Called_Station_Id := id + } + } +} + +/* RFC6733 8.7. Auth-Request-Type AVP */ +template (value) GenericAVP ts_AVP_AuthRequestType(BASE_NONE_Auth_Request_Type auth_req_type) := { + avp := { + avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Auth_Request_Type, '00000000'B), + avp_data := { + avp_BASE_NONE_Auth_Request_Type := auth_req_type + } + } +} +template (present) GenericAVP tr_AVP_AuthRequestType(template (present) BASE_NONE_Auth_Request_Type auth_req_type) := { + avp := { + avp_header := tr_DIA_Hdr(c_AVP_Code_BASE_NONE_Auth_Request_Type), + avp_data := { + avp_BASE_NONE_Auth_Request_Type := auth_req_type + } + } +} + +/* RFC6733 8.12. Re-Auth-Request-Type AVP */ +template (value) GenericAVP ts_AVP_ReAuthRequestType(BASE_NONE_Re_Auth_Request_Type reauth_req_type) := { + avp := { + avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Re_Auth_Request_Type, '00000000'B), + avp_data := { + avp_BASE_NONE_Re_Auth_Request_Type := reauth_req_type + } + } +} +template (present) GenericAVP tr_AVP_ReAuthRequestType(template (present) BASE_NONE_Re_Auth_Request_Type reauth_req_type) := { + avp := { + avp_header := tr_DIA_Hdr(c_AVP_Code_BASE_NONE_Re_Auth_Request_Type), + avp_data := { + avp_BASE_NONE_Re_Auth_Request_Type := reauth_req_type + } + } +} + +/* 5.3.1 Capabilities Exchange Request */ +template (value) PDU_DIAMETER +ts_DIA_CER(octetstring host_ip, uint32_t vendor_app_id, + template (value) charstring orig_host := "ttcn3.localdomain", + template (value) charstring orig_realm := "localdomain", + template (value) UINT32 hbh_id := '00000000'O, + template (value) UINT32 ete_id := '00000000'O) := + ts_DIAMETER(flags := '10000000'B, + cmd_code := Capabilities_Exchange, + hbh_id := hbh_id, + ete_id := ete_id, + avps := { + ts_AVP_OriginHost(orig_host), + ts_AVP_OriginRealm(orig_realm), + ts_AVP_HostIpAddr(host_ip), + ts_AVP_VendorId(vendor_id_3GPP), + ts_AVP_ProductName("TTCN-3 Testsuite"), + ts_AVP_FwRevision('00000000'O), + ts_AVP_InbSecId('00000000'O), + ts_AVP_AuthAppId('FFFFFFFF'O), + ts_AVP_VendorSpecAppId(vendor_id_3GPP, vendor_app_id) + }); /* 5.3.2 Capabilities Exchange Answer */ template (value) PDU_DIAMETER -ts_DIA_CEA(template (value) UINT32 hbh_id, template (value) UINT32 ete_id, - template (value) charstring origin_host, template (value) charstring origin_realm, - template (value) octetstring host_ip, uint32_t vendor_app_id) +ts_DIA_CEA_AUTH_APP_ID(template (value) UINT32 hbh_id, template (value) UINT32 ete_id, + template (value) charstring origin_host, + template (value) charstring origin_realm, + template (value) octetstring host_ip, uint32_t auth_app_id) +:= ts_DIAMETER(flags:='00000000'B, cmd_code:=Capabilities_Exchange, hbh_id:=hbh_id, ete_id:=ete_id, + avps := { + ts_AVP_ResultCode(DIAMETER_SUCCESS), + ts_AVP_OriginHost(origin_host), + ts_AVP_OriginRealm(origin_realm), + ts_AVP_HostIpAddr(host_ip), + ts_AVP_VendorId(vendor_id_3GPP), + ts_AVP_ProductName("TTCN-3 Testsuite"), + ts_AVP_OriginStateId('00000001'O), + ts_AVP_SuppVendorIdRaw(5535), /* 3GPP2 */ + ts_AVP_SuppVendorId(vendor_id_3GPP), + ts_AVP_SuppVendorIdRaw(13019), /* ETSI */ + ts_AVP_AuthAppId(int2oct(auth_app_id, 4)), + ts_AVP_InbSecId('00000000'O) + }); +template (value) PDU_DIAMETER +ts_DIA_CEA_VENDOR_APP_ID(template (value) UINT32 hbh_id, template (value) UINT32 ete_id, + template (value) charstring origin_host, + template (value) charstring origin_realm, + template (value) octetstring host_ip, uint32_t vendor_app_id) := ts_DIAMETER(flags:='00000000'B, cmd_code:=Capabilities_Exchange, hbh_id:=hbh_id, ete_id:=ete_id, avps := { ts_AVP_ResultCode(DIAMETER_SUCCESS), @@ -843,124 +1224,315 @@ ts_DIA_CEA(template (value) UINT32 hbh_id, template (value) UINT32 ete_id, ts_AVP_SuppVendorIdRaw(5535), /* 3GPP2 */ ts_AVP_SuppVendorId(vendor_id_3GPP), ts_AVP_SuppVendorIdRaw(13019), /* ETSI */ - ts_AVP_AuthAppId('FFFFFFFF'O), ts_AVP_InbSecId('00000000'O), ts_AVP_VendorSpecAppId(vendor_id_3GPP, vendor_app_id) }); +function f_ts_DIA_CEA(template (value) UINT32 hbh_id, template (value) UINT32 ete_id, + template (value) charstring origin_host, + template (value) charstring origin_realm, + template (value) octetstring host_ip, template (omit) uint32_t auth_app_id, + template (omit) uint32_t vendor_app_id) + return template (value) PDU_DIAMETER +{ + var template (value) PDU_DIAMETER diam_pdu; + if (istemplatekind(vendor_app_id, "omit")) { + diam_pdu := ts_DIA_CEA_AUTH_APP_ID(hbh_id, ete_id, origin_host, origin_realm, host_ip, valueof(auth_app_id)); + } else { + diam_pdu := ts_DIA_CEA_VENDOR_APP_ID(hbh_id, ete_id, origin_host, origin_realm, host_ip, valueof(vendor_app_id)); + } + return diam_pdu; +} - +/* RFC 6733, section 5.5.1 "Device-Watchdog-Request" */ template (value) PDU_DIAMETER -ts_DIA_AIR(template (value) UINT32 hbh_id, template (value) UINT32 ete_id, - template (value) octetstring sess_id, - template (value) charstring dest_realm, hexstring imsi) -:= ts_DIAMETER(flags:='00000000'B, cmd_code:=Authentication_Information, hbh_id:=hbh_id, ete_id:=ete_id, - avps := { - ts_AVP_SessionId(sess_id), - ts_AVP_DestinationRealm(dest_realm), - ts_AVP_UserNameImsi(imsi), - /* Requested EUTRAN Auth Info */ - ts_AVP_RequestedEutranAuthInfo, - ts_AVP_3GPP_VisitedPlmnId('11111F'O) +ts_DIA_DWR(template (value) OCTET4 state_id := '00000000'O, + template (value) charstring orig_host := "ttcn3.localdomain", + template (value) charstring orig_realm := "localdomain", + template (value) UINT32 hbh_id := '00000000'O, + template (value) UINT32 ete_id := '00000000'O) := + ts_DIAMETER(flags := '10000000'B, + cmd_code := Device_Watchdog, + app_id := '00000000'O, + hbh_id := hbh_id, + ete_id := ete_id, + avps := { + ts_AVP_OriginHost(orig_host), + ts_AVP_OriginRealm(orig_realm), + ts_AVP_OriginStateId(state_id) }); - template (present) PDU_DIAMETER -tr_DIA_AIR(hexstring imsi) := tr_DIAMETER(flags := '11000000'B, cmd_code:=Authentication_Information, - app_id := int2oct(c_DIAMETER_3GPP_S6_AID, 4), - avps := superset( - tr_AVP_SessionId, - tr_AVP_DestinationRealm, - tr_AVP_UserNameImsi(imsi), - tr_AVP_3GPP_VisitedPlmnId +tr_DIA_DWR(template (present) OCTET4 state_id := ?, + template (present) charstring orig_host := ?, + template (present) charstring orig_realm := ?, + template (present) UINT32 hbh_id := ?, + template (present) UINT32 ete_id := ?) := + tr_DIAMETER(flags := '1???????'B, + cmd_code := Device_Watchdog, + app_id := '00000000'O, + hbh_id := hbh_id, + ete_id := ete_id, + avps := superset( + tr_AVP_OriginHost(orig_host), + tr_AVP_OriginRealm(orig_realm) + /* tr_AVP_OriginStateId(state_id) is optional */ )); -/* TS 29.262 5.2.3.1 + 7.2.6 Authentication Information Answer */ +/* RFC 6733, section 5.5.2 "Device-Watchdog-Answer" */ template (value) PDU_DIAMETER -ts_DIA_AIA(template (value) UINT32 hbh_id, template (value) UINT32 ete_id, - template (value) octetstring sess_id, - template (value) AVP_list auth_info_contents) -:= ts_DIAMETER(flags:='01000000'B, cmd_code:=Authentication_Information, - app_id := int2oct(c_DIAMETER_3GPP_S6_AID, 4), hbh_id:=hbh_id, ete_id:=ete_id, - avps := { - ts_AVP_SessionId(sess_id), - ts_AVP_ResultCode(DIAMETER_SUCCESS), - ts_AVP_AuthSessionState(NO_STATE_MAINTAINED), - ts_AVP_OriginHost("hss.localdomain"), - ts_AVP_OriginRealm("localdomain"), - ts_AVP_3GPP_AuthInfo(auth_info_contents) +ts_DIA_DWA(template (value) OCTET4 state_id := '00000000'O, + template (value) charstring orig_host := "ttcn3.localdomain", + template (value) charstring orig_realm := "localdomain", + template (value) UINT32 hbh_id := '00000000'O, + template (value) UINT32 ete_id := '00000000'O) := + ts_DIAMETER(flags := '00000000'B, + cmd_code := Device_Watchdog, + app_id := '00000000'O, + hbh_id := hbh_id, + ete_id := ete_id, + avps := { + ts_AVP_ResultCode(DIAMETER_SUCCESS), + ts_AVP_OriginHost(orig_host), + ts_AVP_OriginRealm(orig_realm), + ts_AVP_OriginStateId(state_id) }); - - -/* TS 29.262 7.2.3 Update Location Request */ template (present) PDU_DIAMETER -tr_DIA_ULR(hexstring imsi) := tr_DIAMETER(flags:='11000000'B, cmd_code:=Update_Location, - app_id:=int2oct(c_DIAMETER_3GPP_S6_AID, 4), - avps := superset( - tr_AVP_SessionId, - tr_AVP_AuthSessionState, - tr_AVP_OriginHost, - tr_AVP_OriginRealm, - tr_AVP_DestinationRealm, - tr_AVP_UserNameImsi(imsi), - tr_AVP_3GPP_RatType(EUTRAN), - tr_AVP_3GPP_UlrFlags, - tr_AVP_3GPP_VisitedPlmnId +tr_DIA_DWA(template (present) OCTET4 state_id := ?, + template (present) charstring orig_host := ?, + template (present) charstring orig_realm := ?, + template (present) UINT32 hbh_id := ?, + template (present) UINT32 ete_id := ?) := + tr_DIAMETER(flags := '0???????'B, + cmd_code := Device_Watchdog, + app_id := '00000000'O, + hbh_id := hbh_id, + ete_id := ete_id, + avps := superset( + tr_AVP_ResultCode(DIAMETER_SUCCESS), + tr_AVP_OriginHost(orig_host), + tr_AVP_OriginRealm(orig_realm) + /* tr_AVP_OriginStateId(state_id) is optional */ )); -template (value) PDU_DIAMETER -ts_DIA_ULA(template (value) UINT32 hbh_id, template (value) UINT32 ete_id, - template (value) octetstring sess_id, - template (value) AVP_list sub_data_content) -:= ts_DIAMETER(flags:='01000000'B, cmd_code:=Update_Location, - app_id := int2oct(c_DIAMETER_3GPP_S6_AID, 4), hbh_id:=hbh_id, ete_id:=ete_id, - avps := { - ts_AVP_SessionId(sess_id), - ts_AVP_ResultCode(DIAMETER_SUCCESS), /* optional */ - ts_AVP_AuthSessionState(NO_STATE_MAINTAINED), - ts_AVP_OriginHost("hss.localdomain"), - ts_AVP_OriginRealm("localdomain"), - ts_AVP_3GPP_UlaFlags('00000002'O), - ts_AVP_3GPP_SubscriptionData(sub_data_content) - }); +function f_DIAMETER_get_avp(PDU_DIAMETER pdu, template (present) AVP_Code avp_code) +return template (omit) AVP +{ + var integer i; + for (i := 0; i < lengthof(pdu.avps); i := i+1) { + if (not ispresent(pdu.avps[i].avp)) { + continue; + } + var AVP_Header hdr := pdu.avps[i].avp.avp_header; + if (match(hdr.avp_code, avp_code)) { + return pdu.avps[i].avp; + } + } + return omit; +} +function f_DIAMETER_get_avp_or_fail(PDU_DIAMETER pdu, template (present) AVP_Code avp_code) +return AVP +{ + var template (omit) AVP avp; + avp := f_DIAMETER_get_avp(pdu, avp_code); + if (istemplatekind(avp, "omit")) { + Misc_Helpers.f_shutdown(__BFILE__, __LINE__, fail, + log2str("AVP ", avp_code, " not found in ", pdu)); + } + return valueof(avp); +} +function f_AVP_Grouped_get_avp(AVP_Grouped avp_grp, template (present) AVP_Code avp_code) +return template (omit) AVP +{ + var integer i; -/* RFC 4006 3.1. Credit-Control-Request (CCR) Command */ -template (present) PDU_DIAMETER -tr_DIA_CCR(template (present) DCC_NONE_CC_Request_Type req_type := INITIAL_REQUEST) -:= tr_DIAMETER(flags:='11000000'B, cmd_code:=Credit_Control, - app_id:=int2oct(c_DIAMETER_3GPP_Gx_AID, 4), - avps := superset( - tr_AVP_SessionId, - tr_AVP_OriginHost, - tr_AVP_OriginRealm, - tr_AVP_DestinationRealm, - tr_AVP_AuthAppId(int2oct(c_DIAMETER_3GPP_Gx_AID, 4)), - tr_AVP_CcReqType(req_type), - tr_AVP_CcReqNum(?) - )); + for (i := 0; i < lengthof(avp_grp); i := i+1) { + if (not ispresent(avp_grp[i].avp)) { + continue; + } + var AVP_Header hdr := avp_grp[i].avp.avp_header; + if (match(hdr.avp_code, avp_code)) { + return avp_grp[i].avp; + } + } + return omit; +} +function f_AVP_Grouped_get_avp_or_fail(AVP_Grouped avp_grp, template (present) AVP_Code avp_code) +return AVP +{ + var template (omit) AVP avp; + avp := f_AVP_Grouped_get_avp(avp_grp, avp_code); + if (istemplatekind(avp, "omit")) { + Misc_Helpers.f_shutdown(__BFILE__, __LINE__, fail, + log2str("AVP ", avp_code, " not found in ", avp_grp)); + } + return valueof(avp); +} -/* RFC 4006 3.2. Credit-Control-Answer (CCA) Command */ -template (value) PDU_DIAMETER -ts_DIA_CCA(template (value) UINT32 hbh_id, template (value) UINT32 ete_id, - template (value) octetstring sess_id, - template (value) DCC_NONE_CC_Request_Type req_type, - template (value) AVP_Unsigned32 req_num) +/***************************** + * Cx, Dx, 3GPP TS 29.229 + *****************************/ +/* SIP-Auth-Data-Item, 3GPP TS 29.229 6.3.8 */ +template (present) GenericAVP tr_AVP_3GPP_SIPNumAuthDataItems(template (present) uint32_t num := ?) := { + avp := { + avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_CxDx_3GPP_SIP_Number_Auth_Items), + avp_data := { + avp_CxDx_3GPP_SIP_Number_Auth_Items := int2oct_tmpl(num, 4) /* CxDx_3GPP_SIP_Number_Auth_Items */ + } + } +} +template (value) GenericAVP ts_AVP_3GPP_SIPNumAuthDataItems(uint32_t num) := { + avp := { + avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_CxDx_3GPP_SIP_Number_Auth_Items), + avp_data := { + avp_CxDx_3GPP_SIP_Number_Auth_Items := int2oct(num, 4) /* CxDx_3GPP_SIP_Number_Auth_Items */ + } + } +} -:= ts_DIAMETER(flags:='01000000'B, cmd_code:=Credit_Control, - app_id:=int2oct(c_DIAMETER_3GPP_Gx_AID, 4), hbh_id:=hbh_id, ete_id:=ete_id, - avps := { - ts_AVP_SessionId(sess_id), - ts_AVP_ResultCode(DIAMETER_SUCCESS), - ts_AVP_OriginHost("pcrf.localdomain"), - ts_AVP_OriginRealm("localdomain"), - ts_AVP_AuthAppId(int2oct(c_DIAMETER_3GPP_Gx_AID, 4)), - ts_AVP_CcReqType(req_type), - ts_AVP_CcReqNum(req_num)//, - // qos - // default eps bearer qos - // supported features - // origin - }); +/* SIP-Authentication-Scheme, 3GPP TS 29.229 6.3.9 */ +template (present) GenericAVP tr_AVP_3GPP_SIPAuthScheme(template (present) CxDx_3GPP_SIP_Authentication_Scheme scheme := ?) := { + avp := { + avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_CxDx_3GPP_SIP_Authentication_Scheme), + avp_data := { + avp_CxDx_3GPP_SIP_Authentication_Scheme := scheme + } + } +} +template (value) GenericAVP ts_AVP_3GPP_SIPAuthScheme(template (value) CxDx_3GPP_SIP_Authentication_Scheme scheme) := { + avp := { + avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_CxDx_3GPP_SIP_Authentication_Scheme), + avp_data := { + avp_CxDx_3GPP_SIP_Authentication_Scheme := scheme + } + } +} + +/* SIP-Authenticate, 3GPP TS 29.229 6.3.10 */ +template (present) GenericAVP tr_AVP_3GPP_SIPAuthenticate(template (present) CxDx_3GPP_SIP_Authenticate rand_autn_concatenated := ?) := { + avp := { + avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_CxDx_3GPP_SIP_Authenticate), + avp_data := { + avp_CxDx_3GPP_SIP_Authenticate := rand_autn_concatenated + } + } +} +template (value) GenericAVP ts_AVP_3GPP_SIPAuthenticate(template (value) CxDx_3GPP_SIP_Authenticate rand_autn_concatenated) := { + avp := { + avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_CxDx_3GPP_SIP_Authenticate), + avp_data := { + avp_CxDx_3GPP_SIP_Authenticate := rand_autn_concatenated + } + } +} + +/* SIP-Authorization, 3GPP TS 29.229 6.3.11 */ +template (present) GenericAVP tr_AVP_3GPP_SIPAuthorization(template (present) CxDx_3GPP_SIP_Authorization rand_autn_concatenated := ?) := { + avp := { + avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_CxDx_3GPP_SIP_Authorization), + avp_data := { + avp_CxDx_3GPP_SIP_Authorization := rand_autn_concatenated + } + } +} +template (value) GenericAVP ts_AVP_3GPP_SIPAuthorization(template (value) CxDx_3GPP_SIP_Authorization rand_autn_concatenated) := { + avp := { + avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_CxDx_3GPP_SIP_Authorization), + avp_data := { + avp_CxDx_3GPP_SIP_Authorization := rand_autn_concatenated + } + } +} + +/* SIP-Authentication-Context, 3GPP TS 29.229 6.3.12 */ +template (present) GenericAVP tr_AVP_3GPP_SIPAuthContext(template (present) CxDx_3GPP_SIP_Authentication_Context val := ?) := { + avp := { + avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_CxDx_3GPP_SIP_Authentication_Context), + avp_data := { + avp_CxDx_3GPP_SIP_Authentication_Context := val + } + } +} +template (value) GenericAVP ts_AVP_3GPP_SIPAuthContext(template (value) CxDx_3GPP_SIP_Authentication_Context val) := { + avp := { + avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_CxDx_3GPP_SIP_Authentication_Context), + avp_data := { + avp_CxDx_3GPP_SIP_Authentication_Context := val + } + } +} + +/* SIP-Item-Number, 3GPP TS 29.229 6.3.14 */ +template (present) GenericAVP tr_AVP_3GPP_SIPItemNumber(template (present) uint32_t num := ?) := { + avp := { + avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_CxDx_3GPP_SIP_Item_Number), + avp_data := { + avp_CxDx_3GPP_SIP_Item_Number := int2oct_tmpl(num, 4) /* CxDx_3GPP_SIP_Item_Number */ + } + } +} +template (value) GenericAVP ts_AVP_3GPP_SIPItemNumber(uint32_t num) := { + avp := { + avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_CxDx_3GPP_SIP_Item_Number), + avp_data := { + avp_CxDx_3GPP_SIP_Item_Number := int2oct(num, 4) /* CxDx_3GPP_SIP_Item_Number */ + } + } +} + +/* Confidentiality-Key, 3GPP TS 29.229 6.3.27 */ +template (present) GenericAVP tr_AVP_3GPP_ConfidentialityKey(template (present) CxDx_3GPP_Confidentiality_Key ckey := ?) := { + avp := { + avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_CxDx_3GPP_Confidentiality_Key), + avp_data := { + avp_CxDx_3GPP_Confidentiality_Key := ckey + } + } +} +template (value) GenericAVP ts_AVP_3GPP_ConfidentialityKey(template (value) CxDx_3GPP_Confidentiality_Key ckey) := { + avp := { + avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_CxDx_3GPP_Confidentiality_Key), + avp_data := { + avp_CxDx_3GPP_Confidentiality_Key := ckey + } + } +} + +/* Inegrity-Key, 3GPP TS 29.229 6.3.28 */ +template (present) GenericAVP tr_AVP_3GPP_IntegrityKey(template (present) CxDx_3GPP_Integrity_Key ckey := ?) := { + avp := { + avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_CxDx_3GPP_Integrity_Key), + avp_data := { + avp_CxDx_3GPP_Integrity_Key := ckey + } + } +} +template (value) GenericAVP ts_AVP_3GPP_IntegrityKey(template (value) CxDx_3GPP_Integrity_Key ckey) := { + avp := { + avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_CxDx_3GPP_Integrity_Key), + avp_data := { + avp_CxDx_3GPP_Integrity_Key := ckey + } + } +} + +/* Server-Assignment-Type, 3GPP TS 29.273 8.2.3.12, 3GPP TS 29.229 6.3.15 */ +template (present) GenericAVP tr_AVP_3GPP_ServerAssignmentType(template (present) CxDx_3GPP_Server_Assignment_Type t := ?) := { + avp := { + avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_CxDx_3GPP_Server_Assignment_Type), + avp_data := { + avp_CxDx_3GPP_Server_Assignment_Type := t + } + } +} +template (value) GenericAVP ts_AVP_3GPP_ServerAssignmentType(template (value) CxDx_3GPP_Server_Assignment_Type t) := { + avp := { + avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_CxDx_3GPP_Server_Assignment_Type), + avp_data := { + avp_CxDx_3GPP_Server_Assignment_Type := t + } + } +} } |