Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 1 | module DIAMETER_Templates { |
| 2 | |
| 3 | /* (C) 2019 by Harald Welte <laforge@gnumonks.org> |
| 4 | * All rights reserved. |
| 5 | * |
| 6 | * Released under the terms of GNU General Public License, Version 2 or |
| 7 | * (at your option) any later version. |
| 8 | * |
| 9 | * SPDX-License-Identifier: GPL-2.0-or-later |
| 10 | */ |
| 11 | |
Pau Espin Pedrol | 965ac64 | 2023-10-16 18:12:45 +0200 | [diff] [blame] | 12 | import from General_Types all; |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 13 | import from DIAMETER_Types all; |
| 14 | import from Osmocom_Types all; |
Pau Espin Pedrol | 8fa2284 | 2022-05-20 14:47:55 +0200 | [diff] [blame] | 15 | import from Misc_Helpers all; |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 16 | |
| 17 | /* https://www.iana.org/assignments/aaa-parameters/aaa-parameters.xhtml#aaa-parameters-4 */ |
| 18 | type enumerated DIAMETER_Resultcode { |
| 19 | /* Informational */ |
| 20 | DIAMETER_MULTI_ROUND_AUTH (1001), |
| 21 | |
| 22 | /* Success */ |
| 23 | DIAMETER_SUCCESS (2001), |
| 24 | DIAMETER_LIMITED_SUCCESS (2002), |
| 25 | DIAMETER_FIRST_REGISTRATION (2003), |
| 26 | DIAMETER_SUBSEQUENT_REGISTRATION (2004), |
| 27 | DIAMETER_UNREGISTERED_SERVICE (2005), |
| 28 | DIAMETER_SUCCESS_SERVER_NAME_NOT_STORED (2006), |
| 29 | DIAMETER_SERVER_SELECTION (2007), |
| 30 | DIAMETER_SUCCESS_AUTH_SENT_SERVER_NOT_STORED (2008), |
| 31 | DIAMETER_SUCCESS_RELOCATE_HA (2009), |
| 32 | |
| 33 | /* Protocol Errors */ |
| 34 | DIAMETER_COMMAND_UNSUPPORTED (3001), |
| 35 | DIAMETER_UNABLE_TO_DELIVER (3002), |
| 36 | DIAMETER_REALM_NOT_SERVED (3003), |
| 37 | DIAMETER_TOO_BUSY (3004), |
| 38 | DIAMETER_LOOP_DETECTED (3005), |
| 39 | DIAMETER_REDIRECT_INDICATION (3006), |
| 40 | DIAMETER_APPLICATION_UNSUPPORTED (3007), |
| 41 | DIAMETER_INVALID_HDR_BITS (3008), |
| 42 | DIAMETER_INVALID_AVP_BITS (3009), |
| 43 | DIAMETER_UNKNOWN_PEER (3010), |
| 44 | DIAMETER_REALM_REDIRECT_INDICATION (3011), |
| 45 | |
| 46 | /* Transient Failures */ |
| 47 | DIAMETER_AUTHENTICATION_REJECTED (4001), |
| 48 | DIAMETER_OUT_OF_SPACE (4002), |
| 49 | ELECTION_LOST (4003), |
| 50 | DIAMETER_ERROR_MIP_REPLY_FAILURE (4005), |
| 51 | DIAMETER_ERROR_HA_NOT_AVAILABLE (4006), |
| 52 | DIAMETER_ERROR_BAD_KEY (4007), |
| 53 | DIAMETER_ERROR_MIP_FILTER_NOT_SUPPORTED (4008), |
| 54 | DIAMETER_END_USER_SERVICE_DENIED (4010), |
| 55 | DIAMETER_CREDIT_CONTROL_NOT_APPLICABLE (4011), |
| 56 | DIAMETER_CREDIT_LIMIT_REACHED (4012), |
| 57 | DIAMETER_USER_NAME_REQUIRED (4013), |
| 58 | RESOURCE_FAILURE (4014), |
| 59 | |
| 60 | DIAMETER_AUTHENTICATION_DATA_UNAVAILABLE (4181), |
| 61 | DIAMETER_ERROR_CAMEL_SUBSCRIPTION_PRESENT (4882), |
| 62 | |
| 63 | /* Permanent Failure */ |
| 64 | DIAMETER_AVP_UNSUPPORTED (5001), |
| 65 | DIAMETER_UNKNOWN_SESSION_ID (5002), |
| 66 | DIAMETER_AUTHORIZATION_REJECTED (5003), |
| 67 | DIAMETER_INVALID_AVP_VALUE (5004), |
| 68 | DIAMETER_MISSING_AVP (5005), |
| 69 | DIAMETER_RESOURCES_EXCEEDED (5006), |
| 70 | DIAMETER_CONTRADICTING_AVPS (5007), |
| 71 | DIAMETER_AVP_NOT_ALLOWED (5008), |
| 72 | DIAMETER_AVP_OCCURS_TOO_MANY_TIMES (5009), |
| 73 | DIAMETER_NO_COMMON_APPLICATION (5010), |
| 74 | DIAMETER_UNSUPPORTED_VERSION (5011), |
| 75 | DIAMETER_UNABLE_TO_COMPLY (5012), |
| 76 | DIAMETER_INVALID_BIT_IN_HEADER (5013), |
| 77 | DIAMETER_INVALID_AVP_LENGTH (5014), |
| 78 | DIAMETER_INVALID_MESSAGE_LENGTH (5015), |
| 79 | DIAMETER_INVALID_AVP_BIT_COMBO (5016), |
| 80 | DIAMETER_NO_COMMON_SECURITY (5017), |
| 81 | DIAMETER_RADIUS_AVP_UNTRANSLATABLE (5018), |
| 82 | DIAMETER_ERROR_NO_FOREIGN_HA_SERVICE (5024), |
| 83 | DIAMETER_ERROR_END_TO_END_MIP_KEY_ENCRYPTION (5025), |
| 84 | DIAMETER_USER_UNKNOWN (5030), |
| 85 | DIAMETER_RATING_FAILED (5031), |
| 86 | DIAMETER_ERROR_USER_UNKNOWN (5032), |
| 87 | DIAMETER_ERROR_IDENTITIES_DONT_MATCH (5033), |
| 88 | DIAMETER_ERROR_IDENTITY_NOT_REGISTERED (5034), |
| 89 | DIAMETER_ERROR_ROAMING_NOT_ALLOWED (5035), |
| 90 | DIAMETER_ERROR_IDENTITY_ALREADY_REGISTERED (5036), |
| 91 | DIAMETER_ERROR_AUTH_SCHEME_NOT_SUPPORTED (5037), |
| 92 | DIAMETER_ERROR_IN_ASSIGNMENT_TYPE (5038), |
| 93 | DIAMETER_ERROR_TOO_MUCH_DATA (5039), |
| 94 | DIAMETER_ERROR_NOT_SUPPORTED_USER_DATA (5040), |
| 95 | DIAMETER_ERROR_MIP6_AUTH_MODE (5041), |
| 96 | UNKNOWN_BINDING_TEMPLATE_NAME (5042), |
| 97 | BINDING_FAILURE (5043), |
| 98 | MAX_BINDINGS_SET_FAILURE (5044), |
| 99 | MAXIMUM_BINDINGS_REACHED_FOR_ENDPOINT (5045), |
| 100 | SESSION_EXISTS (5046), |
| 101 | INSUFFICIENT_CLASSIFIERS (5047), |
| 102 | DIAMETER_ERROR_EAP_CODE_UNKNOWN (5048) |
| 103 | }; |
| 104 | |
Pau Espin Pedrol | 867b130 | 2024-01-24 16:14:28 +0100 | [diff] [blame] | 105 | /* RFC4006 3.1 */ |
Pau Espin Pedrol | 77fdd0b | 2022-03-08 14:03:33 +0100 | [diff] [blame] | 106 | const uint32_t c_DIAMETER_CREDIT_CONTROL_AID := 4; |
Pau Espin Pedrol | 117a94f | 2023-12-21 16:10:12 +0100 | [diff] [blame] | 107 | |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 108 | const uint32_t c_DIAMETER_3GPP_S7_AID := 16777308; |
| 109 | |
Vadim Yanitskiy | 0e8f516 | 2021-12-15 05:00:32 +0300 | [diff] [blame] | 110 | const octetstring c_def_sess_id := char2oct("ttcn3.session"); |
| 111 | |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 112 | template (value) PDU_DIAMETER |
Pau Espin Pedrol | 965ac64 | 2023-10-16 18:12:45 +0200 | [diff] [blame] | 113 | ts_DIAMETER(template (value) DIAMETER_Types.BIT8 flags, |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 114 | template (value) Command_Code cmd_code, |
| 115 | template (value) OCTET4 app_id := '00000000'O, |
Vadim Yanitskiy | 00720bd | 2021-12-12 02:05:08 +0300 | [diff] [blame] | 116 | template (value) UINT32 hbh_id := '00000000'O, |
| 117 | template (value) UINT32 ete_id := '00000000'O, |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 118 | template (value) AVP_list avps := {} |
| 119 | ) := { |
| 120 | version := 1, |
| 121 | message_length := 0, /* overwritten */ |
| 122 | RPETxxxx := flags, |
| 123 | command_code := cmd_code, |
| 124 | application_id := app_id, |
| 125 | hop_by_hop_id := hbh_id, |
| 126 | end_to_end_id := ete_id, |
| 127 | avps := avps |
| 128 | } |
| 129 | template (present) PDU_DIAMETER |
Pau Espin Pedrol | 965ac64 | 2023-10-16 18:12:45 +0200 | [diff] [blame] | 130 | tr_DIAMETER(template (present) DIAMETER_Types.BIT8 flags := ?, |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 131 | template (present) Command_Code cmd_code := ?, |
| 132 | template (present) OCTET4 app_id := ?, |
| 133 | template (present) UINT32 hbh_id := ?, |
| 134 | template (present) UINT32 ete_id := ?, |
| 135 | template (present) AVP_list avps := ?) := { |
| 136 | version := 1, |
| 137 | message_length := ?, |
| 138 | RPETxxxx := flags, |
| 139 | command_code := cmd_code, |
| 140 | application_id := app_id, |
| 141 | hop_by_hop_id := hbh_id, |
| 142 | end_to_end_id := ete_id, |
| 143 | avps := avps |
| 144 | } |
| 145 | template (present) PDU_DIAMETER |
| 146 | tr_DIAMETER_A( |
| 147 | template (present) Command_Code cmd_code := ?, |
| 148 | template (present) OCTET4 app_id := ?, |
| 149 | template (present) UINT32 hbh_id := ?, |
| 150 | template (present) UINT32 ete_id := ?, |
| 151 | template (present) AVP_list avps := ?) := |
| 152 | tr_DIAMETER('0???????'B, cmd_code, app_id, hbh_id, ete_id, avps); |
| 153 | template (present) PDU_DIAMETER |
| 154 | tr_DIAMETER_R( |
| 155 | template (present) Command_Code cmd_code := ?, |
| 156 | template (present) OCTET4 app_id := ?, |
| 157 | template (present) UINT32 hbh_id := ?, |
| 158 | template (present) UINT32 ete_id := ?, |
| 159 | template (present) AVP_list avps := ?) := |
| 160 | tr_DIAMETER('1???????'B, cmd_code, app_id, hbh_id, ete_id, avps); |
| 161 | |
| 162 | |
| 163 | template (value) AVP_Header |
| 164 | ts_DIA_Hdr(template (value) AVP_Code avp_code, |
Pau Espin Pedrol | 965ac64 | 2023-10-16 18:12:45 +0200 | [diff] [blame] | 165 | template (value) DIAMETER_Types.BIT8 flags := '01000000'B) := { |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 166 | avp_code := avp_code, |
| 167 | VMPxxxxx := flags, |
| 168 | avp_length := 0, /* overwritten */ |
| 169 | vendor_id := omit |
| 170 | } |
| 171 | template (present) AVP_Header |
| 172 | tr_DIA_Hdr(template (present) AVP_Code avp_code, |
Pau Espin Pedrol | 965ac64 | 2023-10-16 18:12:45 +0200 | [diff] [blame] | 173 | template (present) DIAMETER_Types.BIT8 flags := '0???????'B) := { |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 174 | avp_code := avp_code, |
| 175 | VMPxxxxx := flags, |
| 176 | avp_length := ?, /* overwritten */ |
| 177 | vendor_id := omit |
| 178 | } |
| 179 | |
| 180 | template (value) AVP_Header |
| 181 | ts_DIA_Hdr_3GPP(template (value) AVP_Code avp_code, |
Pau Espin Pedrol | 965ac64 | 2023-10-16 18:12:45 +0200 | [diff] [blame] | 182 | template (value) DIAMETER_Types.BIT8 flags := '11000000'B) := { |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 183 | avp_code := avp_code, |
| 184 | VMPxxxxx := flags, |
| 185 | avp_length := 0, /* overwritten */ |
| 186 | vendor_id := vendor_id_3GPP |
| 187 | } |
| 188 | template (present) AVP_Header |
| 189 | tr_DIA_Hdr_3GPP(template (present) AVP_Code avp_code, |
Pau Espin Pedrol | 965ac64 | 2023-10-16 18:12:45 +0200 | [diff] [blame] | 190 | template (present) DIAMETER_Types.BIT8 flags := '1???????'B) := { |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 191 | avp_code := avp_code, |
| 192 | VMPxxxxx := flags, |
| 193 | avp_length := ?, /* overwritten */ |
| 194 | vendor_id := vendor_id_3GPP |
| 195 | } |
| 196 | |
Pau Espin Pedrol | a2af578 | 2022-05-18 16:34:29 +0200 | [diff] [blame] | 197 | template (present) AVP_Address tr_AVP_Address(template (present) AddressType addr_type := ?, |
| 198 | template (present) octetstring addr_data := ?) := { |
| 199 | address_type := addr_type, |
| 200 | address_data := addr_data |
| 201 | } |
| 202 | |
| 203 | template (present) GenericAVP tr_AVP_SubcrId(template (present) DCC_NONE_Subscription_Id t) := { |
| 204 | avp := { |
| 205 | avp_header := tr_DIA_Hdr(c_AVP_Code_DCC_NONE_Subscription_Id), |
| 206 | avp_data := { |
| 207 | avp_DCC_NONE_Subscription_Id := t |
| 208 | } |
| 209 | } |
| 210 | } |
| 211 | |
Pau Espin Pedrol | b8cd34a | 2022-05-18 16:34:12 +0200 | [diff] [blame] | 212 | template (present) GenericAVP tr_AVP_SubcrIdType(template (present) DCC_NONE_Subscription_Id_Type t) := { |
Harald Welte | f9fb63e | 2020-04-26 18:07:19 +0200 | [diff] [blame] | 213 | avp := { |
| 214 | avp_header := tr_DIA_Hdr(c_AVP_Code_DCC_NONE_Subscription_Id_Type), |
| 215 | avp_data := { |
| 216 | avp_DCC_NONE_Subscription_Id_Type := t |
| 217 | } |
| 218 | } |
| 219 | } |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 220 | |
Pau Espin Pedrol | a2af578 | 2022-05-18 16:34:29 +0200 | [diff] [blame] | 221 | template (present) GenericAVP tr_AVP_SubcrIdData(template (present) DCC_NONE_Subscription_Id_Data t) := { |
| 222 | avp := { |
| 223 | avp_header := tr_DIA_Hdr(c_AVP_Code_DCC_NONE_Subscription_Id_Data), |
| 224 | avp_data := { |
| 225 | avp_DCC_NONE_Subscription_Id_Data := t |
| 226 | } |
| 227 | } |
| 228 | } |
| 229 | |
| 230 | template (present) GenericAVP tr_AVP_RequestedAction(template (present) DCC_NONE_Requested_Action t := ?) := { |
| 231 | avp := { |
| 232 | avp_header := tr_DIA_Hdr(c_AVP_Code_DCC_NONE_Requested_Action), |
| 233 | avp_data := { |
| 234 | avp_DCC_NONE_Requested_Action := t |
| 235 | } |
| 236 | } |
| 237 | } |
| 238 | |
| 239 | template (present) GenericAVP tr_AVP_MultipleServicesIndicator(template (present) DCC_NONE_Multiple_Services_Indicator t := ?) := { |
| 240 | avp := { |
| 241 | avp_header := tr_DIA_Hdr(c_AVP_Code_DCC_NONE_Multiple_Services_Indicator), |
| 242 | avp_data := { |
| 243 | avp_DCC_NONE_Multiple_Services_Indicator := t |
| 244 | } |
| 245 | } |
| 246 | } |
| 247 | |
| 248 | template (present) GenericAVP tr_AVP_ServiceContextId(template (present) DCC_NONE_Service_Context_Id id := ?) := { |
| 249 | avp := { |
| 250 | avp_header := tr_DIA_Hdr(c_AVP_Code_DCC_NONE_Service_Context_Id), |
| 251 | avp_data := { |
| 252 | avp_DCC_NONE_Service_Context_Id := id |
| 253 | } |
| 254 | } |
| 255 | } |
| 256 | |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 257 | template (value) GenericAVP ts_AVP_OriginHost(template (value) charstring host) := { |
| 258 | avp := { |
| 259 | avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Origin_Host), |
| 260 | avp_data := { |
| 261 | avp_BASE_NONE_Origin_Host := host |
| 262 | } |
| 263 | } |
| 264 | } |
| 265 | template (present) GenericAVP tr_AVP_OriginHost(template (present) charstring host := ?) := { |
| 266 | avp := { |
| 267 | avp_header := tr_DIA_Hdr(c_AVP_Code_BASE_NONE_Origin_Host), |
| 268 | avp_data := { |
| 269 | avp_BASE_NONE_Origin_Host := host |
| 270 | } |
| 271 | } |
| 272 | } |
| 273 | |
| 274 | |
| 275 | template (value) GenericAVP ts_AVP_OriginRealm(template (value) charstring realm) := { |
| 276 | avp := { |
| 277 | avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Origin_Realm), |
| 278 | avp_data := { |
| 279 | avp_BASE_NONE_Origin_Realm := realm |
| 280 | } |
| 281 | } |
| 282 | } |
| 283 | template (present) GenericAVP tr_AVP_OriginRealm(template (present) charstring realm := ?) := { |
| 284 | avp := { |
| 285 | avp_header := tr_DIA_Hdr(c_AVP_Code_BASE_NONE_Origin_Realm), |
| 286 | avp_data := { |
| 287 | avp_BASE_NONE_Origin_Realm := realm |
| 288 | } |
| 289 | } |
| 290 | } |
| 291 | |
| 292 | |
| 293 | template (value) GenericAVP ts_AVP_OriginStateId(template (value) OCTET4 state_id) := { |
| 294 | avp := { |
| 295 | avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Origin_State_Id), |
| 296 | avp_data := { |
| 297 | avp_BASE_NONE_Origin_State_Id := state_id |
| 298 | } |
| 299 | } |
| 300 | } |
Vadim Yanitskiy | f28b255 | 2021-12-11 03:49:14 +0300 | [diff] [blame] | 301 | template (present) GenericAVP tr_AVP_OriginStateId(template (present) OCTET4 state_id := ?) := { |
| 302 | avp := { |
| 303 | avp_header := tr_DIA_Hdr(c_AVP_Code_BASE_NONE_Origin_State_Id), |
| 304 | avp_data := { |
| 305 | avp_BASE_NONE_Origin_State_Id := state_id |
| 306 | } |
| 307 | } |
| 308 | } |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 309 | |
Pau Espin Pedrol | 4944a5c | 2024-01-24 17:23:01 +0100 | [diff] [blame^] | 310 | template (value) GenericAVP ts_AVP_TerminationCause(template (value) BASE_NONE_Termination_Cause tc) := { |
| 311 | avp := { |
| 312 | avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Termination_Cause), |
| 313 | avp_data := { |
| 314 | avp_BASE_NONE_Termination_Cause := tc |
| 315 | } |
| 316 | } |
| 317 | } |
| 318 | |
Pau Espin Pedrol | a2af578 | 2022-05-18 16:34:29 +0200 | [diff] [blame] | 319 | template (present) GenericAVP tr_AVP_TerminationCause(template (present) BASE_NONE_Termination_Cause tc) := { |
| 320 | avp := { |
| 321 | avp_header := tr_DIA_Hdr(c_AVP_Code_BASE_NONE_Termination_Cause), |
| 322 | avp_data := { |
| 323 | avp_BASE_NONE_Termination_Cause := tc |
| 324 | } |
| 325 | } |
| 326 | } |
| 327 | |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 328 | template (value) GenericAVP ts_AVP_HostIpAddr(template (value) OCTET4 ipv4_addr) := { |
| 329 | avp := { |
| 330 | avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Host_IP_Address), |
| 331 | avp_data := { |
| 332 | avp_BASE_NONE_Host_IP_Address := { |
| 333 | address_type := IP, |
| 334 | address_data := ipv4_addr |
| 335 | } |
| 336 | } |
| 337 | } |
| 338 | } |
| 339 | |
| 340 | template (value) GenericAVP ts_AVP_VendorId(Vendor_Id vendor_id) := { |
| 341 | avp := { |
| 342 | avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Vendor_Id, '00000000'B), |
| 343 | avp_data := { |
| 344 | avp_BASE_NONE_Vendor_Id := int2oct(enum2int(vendor_id), 4) |
| 345 | } |
| 346 | } |
| 347 | } |
Pau Espin Pedrol | 7aa4ad8 | 2023-08-28 18:24:24 +0200 | [diff] [blame] | 348 | private function f_tr_AVP_VendorId(template (present) Vendor_Id vendor_id) |
| 349 | return template (present) BASE_NONE_Vendor_Id { |
| 350 | if (istemplatekind(vendor_id, "?")) { |
| 351 | return ?; |
| 352 | } else { |
| 353 | var template (present) BASE_NONE_Vendor_Id c; |
| 354 | c := int2oct(enum2int(valueof(vendor_id)), 4); |
| 355 | return c; |
| 356 | } |
| 357 | } |
| 358 | template (present) GenericAVP tr_AVP_VendorId(template (present) Vendor_Id vendor_id) := { |
| 359 | avp := { |
| 360 | avp_header := tr_DIA_Hdr(c_AVP_Code_BASE_NONE_Vendor_Id), |
| 361 | avp_data := { |
| 362 | avp_BASE_NONE_Vendor_Id := f_tr_AVP_VendorId(vendor_id) |
| 363 | } |
| 364 | } |
| 365 | } |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 366 | |
| 367 | template (value) GenericAVP ts_AVP_ProductName(charstring name) := { |
| 368 | avp := { |
| 369 | avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Product_Name, '00000000'B), |
| 370 | avp_data := { |
| 371 | avp_BASE_NONE_Product_Name := char2oct(name) |
| 372 | } |
| 373 | } |
| 374 | } |
| 375 | |
| 376 | template (value) GenericAVP ts_AVP_FwRevision(octetstring fw_version) := { |
| 377 | avp := { |
| 378 | avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Firmware_Revision, '00000000'B), |
| 379 | avp_data := { |
| 380 | avp_BASE_NONE_Firmware_Revision := fw_version |
| 381 | } |
| 382 | } |
| 383 | } |
| 384 | |
| 385 | template (value) GenericAVP ts_AVP_InbSecId(template (value) OCTET4 inb_sec_id) := { |
| 386 | avp := { |
| 387 | avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Inband_Security_Id), |
| 388 | avp_data := { |
| 389 | avp_BASE_NONE_Inband_Security_Id := inb_sec_id |
| 390 | } |
| 391 | } |
| 392 | } |
| 393 | |
Pau Espin Pedrol | 462f3df | 2023-10-16 18:10:55 +0200 | [diff] [blame] | 394 | private function enum2int_Vendor_Id_tmpl(template Vendor_Id inp) return template integer |
| 395 | { |
| 396 | if (istemplatekind(inp, "omit")) { |
| 397 | return omit; |
| 398 | } else if (istemplatekind(inp, "*")) { |
| 399 | return *; |
| 400 | } else if (istemplatekind(inp, "?")) { |
| 401 | return ?; |
| 402 | } else { |
| 403 | return enum2int(valueof(inp)); |
| 404 | } |
| 405 | } |
| 406 | |
| 407 | template (present) GenericAVP tr_AVP_VendorSpecAppId(template (present) Vendor_Id vendor_id := ?, |
| 408 | template (present) uint32_t auth_app_id := ?) := { |
| 409 | avp := { |
| 410 | avp_header := tr_DIA_Hdr(c_AVP_Code_BASE_NONE_Vendor_Specific_Application_Id), |
| 411 | avp_data := { |
| 412 | avp_BASE_NONE_Vendor_Specific_Application_Id := { |
| 413 | { |
| 414 | avp := { |
| 415 | avp_header := tr_DIA_Hdr(c_AVP_Code_BASE_NONE_Vendor_Id), |
| 416 | avp_data := { |
| 417 | avp_BASE_NONE_Vendor_Id := int2oct_tmpl(enum2int_Vendor_Id_tmpl(vendor_id), 4) |
| 418 | } |
| 419 | } |
| 420 | }, { |
| 421 | avp := { |
| 422 | avp_header := tr_DIA_Hdr(c_AVP_Code_BASE_NONE_Auth_Application_Id), |
| 423 | avp_data := { |
| 424 | avp_BASE_NONE_Auth_Application_Id := int2oct_tmpl(auth_app_id, 4) |
| 425 | } |
| 426 | } |
| 427 | } |
| 428 | } |
| 429 | } |
| 430 | } |
| 431 | } |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 432 | template (value) GenericAVP ts_AVP_VendorSpecAppId(Vendor_Id vendor_id, uint32_t auth_app_id) := { |
| 433 | avp := { |
| 434 | avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Vendor_Specific_Application_Id), |
| 435 | avp_data := { |
| 436 | avp_BASE_NONE_Vendor_Specific_Application_Id := { |
| 437 | { |
| 438 | avp := { |
| 439 | avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Vendor_Id), |
| 440 | avp_data := { |
| 441 | avp_BASE_NONE_Vendor_Id := int2oct(enum2int(vendor_id), 4) |
| 442 | } |
| 443 | } |
| 444 | }, { |
| 445 | avp := { |
| 446 | avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Auth_Application_Id), |
| 447 | avp_data := { |
| 448 | avp_BASE_NONE_Auth_Application_Id := int2oct(auth_app_id, 4) |
| 449 | } |
| 450 | } |
| 451 | } |
| 452 | } |
| 453 | } |
| 454 | } |
| 455 | } |
| 456 | |
| 457 | template (value) GenericAVP ts_AVP_AuthAppId(template (value) OCTET4 auth_app_id) := { |
| 458 | avp := { |
| 459 | avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Auth_Application_Id), |
| 460 | avp_data := { |
| 461 | avp_BASE_NONE_Auth_Application_Id := auth_app_id |
| 462 | } |
| 463 | } |
| 464 | } |
Harald Welte | f400151 | 2020-04-26 21:48:34 +0200 | [diff] [blame] | 465 | template (present) GenericAVP tr_AVP_AuthAppId(template (present) OCTET4 auth_app_id := ?) := { |
| 466 | avp := { |
| 467 | avp_header := tr_DIA_Hdr(c_AVP_Code_BASE_NONE_Auth_Application_Id), |
| 468 | avp_data := { |
| 469 | avp_BASE_NONE_Auth_Application_Id := auth_app_id |
| 470 | } |
| 471 | } |
| 472 | } |
| 473 | |
| 474 | template (value) GenericAVP ts_AVP_CcReqType(template (value) DCC_NONE_CC_Request_Type r) := { |
| 475 | avp := { |
| 476 | avp_header := ts_DIA_Hdr(c_AVP_Code_DCC_NONE_CC_Request_Type), |
| 477 | avp_data := { |
| 478 | avp_DCC_NONE_CC_Request_Type := r |
| 479 | } |
| 480 | } |
| 481 | } |
| 482 | template (present) GenericAVP tr_AVP_CcReqType(template (present) DCC_NONE_CC_Request_Type r := ?) := { |
| 483 | avp := { |
| 484 | avp_header := tr_DIA_Hdr(c_AVP_Code_DCC_NONE_CC_Request_Type), |
| 485 | avp_data := { |
| 486 | avp_DCC_NONE_CC_Request_Type := r |
| 487 | } |
| 488 | } |
| 489 | } |
| 490 | |
| 491 | template (value) GenericAVP ts_AVP_CcReqNum(template (value) AVP_Unsigned32 n) := { |
| 492 | avp := { |
| 493 | avp_header := ts_DIA_Hdr(c_AVP_Code_DCC_NONE_CC_Request_Number), |
| 494 | avp_data := { |
| 495 | avp_DCC_NONE_CC_Request_Number := n |
| 496 | } |
| 497 | } |
| 498 | } |
| 499 | template (present) GenericAVP tr_AVP_CcReqNum(template (present) AVP_Unsigned32 n := ?) := { |
| 500 | avp := { |
| 501 | avp_header := tr_DIA_Hdr(c_AVP_Code_DCC_NONE_CC_Request_Number), |
| 502 | avp_data := { |
| 503 | avp_DCC_NONE_CC_Request_Number := n |
| 504 | } |
| 505 | } |
| 506 | } |
| 507 | |
Pau Espin Pedrol | a2af578 | 2022-05-18 16:34:29 +0200 | [diff] [blame] | 508 | template (present) GenericAVP tr_AVP_EventTimestamp(template (present) AVP_Unsigned32 n := ?) := { |
| 509 | avp := { |
| 510 | avp_header := tr_DIA_Hdr(c_AVP_Code_BASE_NONE_Event_Timestamp), |
| 511 | avp_data := { |
| 512 | avp_BASE_NONE_Event_Timestamp := n |
| 513 | } |
| 514 | } |
| 515 | } |
Harald Welte | f400151 | 2020-04-26 21:48:34 +0200 | [diff] [blame] | 516 | |
Pau Espin Pedrol | 7aa4ad8 | 2023-08-28 18:24:24 +0200 | [diff] [blame] | 517 | template (present) GenericAVP tr_AVP_ExperimentalResultCode(template (present) AVP_Unsigned32 n := ?) := { |
| 518 | avp := { |
| 519 | avp_header := tr_DIA_Hdr(c_AVP_Code_BASE_NONE_Experimental_Result_Code), |
| 520 | avp_data := { |
| 521 | avp_BASE_NONE_Experimental_Result_Code := n |
| 522 | } |
| 523 | } |
| 524 | } |
| 525 | |
| 526 | template (present) GenericAVP tr_AVP_ExperimentalResult(template (present) Vendor_Id vendor_id := ?, |
| 527 | template (present) AVP_Unsigned32 err_code := ? |
| 528 | ) := { |
| 529 | avp := { |
| 530 | avp_header := tr_DIA_Hdr(c_AVP_Code_BASE_NONE_Experimental_Result), |
| 531 | avp_data := { |
| 532 | avp_BASE_NONE_Experimental_Result := { |
| 533 | tr_AVP_VendorId(vendor_id), |
| 534 | tr_AVP_ExperimentalResultCode(err_code) |
| 535 | } |
| 536 | } |
| 537 | } |
| 538 | } |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 539 | |
| 540 | template (value) GenericAVP ts_AVP_SuppVendorIdRaw(uint32_t vendor_id) := { |
| 541 | avp := { |
| 542 | avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Supported_Vendor_Id), |
| 543 | avp_data := { |
| 544 | avp_BASE_NONE_Supported_Vendor_Id := int2oct(vendor_id, 4) |
| 545 | } |
| 546 | } |
| 547 | } |
| 548 | template (value) GenericAVP ts_AVP_SuppVendorId(Vendor_Id vendor_id) := |
| 549 | ts_AVP_SuppVendorIdRaw(enum2int(vendor_id)); |
| 550 | |
| 551 | template (value) GenericAVP ts_AVP_ResultCode(DIAMETER_Resultcode res_code) := { |
| 552 | avp := { |
| 553 | avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Result_Code), |
| 554 | avp_data := { |
| 555 | avp_BASE_NONE_Result_Code := int2oct(enum2int(res_code), 4) |
| 556 | } |
| 557 | } |
| 558 | } |
Pau Espin Pedrol | 7aa4ad8 | 2023-08-28 18:24:24 +0200 | [diff] [blame] | 559 | private function f_tr_DIAMETER_Resultcode(template (present) DIAMETER_Resultcode res_code) |
| 560 | return template (present) BASE_NONE_Result_Code { |
| 561 | if (istemplatekind(res_code, "?")) { |
| 562 | return ?; |
| 563 | } else { |
| 564 | var template (present) BASE_NONE_Result_Code c; |
| 565 | c := int2oct(enum2int(valueof(res_code)), 4); |
| 566 | return c; |
| 567 | } |
| 568 | } |
| 569 | template (present) GenericAVP tr_AVP_ResultCode(template (present) DIAMETER_Resultcode res_code) := { |
Vadim Yanitskiy | f28b255 | 2021-12-11 03:49:14 +0300 | [diff] [blame] | 570 | avp := { |
| 571 | avp_header := tr_DIA_Hdr(c_AVP_Code_BASE_NONE_Result_Code), |
| 572 | avp_data := { |
Pau Espin Pedrol | 7aa4ad8 | 2023-08-28 18:24:24 +0200 | [diff] [blame] | 573 | avp_BASE_NONE_Result_Code := f_tr_DIAMETER_Resultcode(res_code) |
Vadim Yanitskiy | f28b255 | 2021-12-11 03:49:14 +0300 | [diff] [blame] | 574 | } |
| 575 | } |
| 576 | } |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 577 | |
| 578 | template (value) GenericAVP ts_AVP_AuthSessionState(template (value) BASE_NONE_Auth_Session_State ass := NO_STATE_MAINTAINED) := { |
| 579 | avp := { |
| 580 | avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Auth_Session_State), |
| 581 | avp_data := { |
| 582 | avp_BASE_NONE_Auth_Session_State := ass |
| 583 | } |
| 584 | } |
| 585 | } |
| 586 | template (present) GenericAVP tr_AVP_AuthSessionState(template (present) BASE_NONE_Auth_Session_State ass := ?) := { |
| 587 | avp := { |
| 588 | avp_header := tr_DIA_Hdr(c_AVP_Code_BASE_NONE_Auth_Session_State), |
| 589 | avp_data := { |
| 590 | avp_BASE_NONE_Auth_Session_State := ass |
| 591 | } |
| 592 | } |
| 593 | } |
| 594 | |
| 595 | template (value) GenericAVP ts_AVP_SessionId(template (value) octetstring session_id) := { |
| 596 | avp := { |
| 597 | avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Session_Id), |
| 598 | avp_data := { |
| 599 | avp_BASE_NONE_Session_Id := session_id |
| 600 | } |
| 601 | } |
| 602 | } |
| 603 | template (present) GenericAVP tr_AVP_SessionId(template (present) octetstring session_id := ?) := { |
| 604 | avp := { |
| 605 | avp_header := tr_DIA_Hdr(c_AVP_Code_BASE_NONE_Session_Id), |
| 606 | avp_data := { |
| 607 | avp_BASE_NONE_Session_Id := session_id |
| 608 | } |
| 609 | } |
| 610 | } |
| 611 | |
Pau Espin Pedrol | 3f19ce7 | 2023-12-21 19:09:12 +0100 | [diff] [blame] | 612 | template (value) GenericAVP ts_AVP_DestinationHost(template (value) charstring dest_host) := { |
| 613 | avp := { |
| 614 | avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Destination_Host), |
| 615 | avp_data := { |
| 616 | avp_BASE_NONE_Destination_Host := dest_host |
| 617 | } |
| 618 | } |
| 619 | } |
Pau Espin Pedrol | a2af578 | 2022-05-18 16:34:29 +0200 | [diff] [blame] | 620 | template (present) GenericAVP tr_AVP_DestinationHost(template (present) charstring host := ?) := { |
| 621 | avp := { |
| 622 | avp_header := tr_DIA_Hdr(c_AVP_Code_BASE_NONE_Destination_Host), |
| 623 | avp_data := { |
| 624 | avp_BASE_NONE_Destination_Host := host |
| 625 | } |
| 626 | } |
| 627 | } |
| 628 | |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 629 | /* 3.3 Destination Realm */ |
| 630 | template (value) GenericAVP ts_AVP_DestinationRealm(template (value) charstring dest_realm) := { |
| 631 | avp := { |
| 632 | avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Destination_Realm), |
| 633 | avp_data := { |
| 634 | avp_BASE_NONE_Destination_Realm := dest_realm |
| 635 | } |
| 636 | } |
| 637 | } |
| 638 | template (present) GenericAVP tr_AVP_DestinationRealm(template (present) charstring dest_realm := ?) := { |
| 639 | avp := { |
| 640 | avp_header := tr_DIA_Hdr(c_AVP_Code_BASE_NONE_Destination_Realm), |
| 641 | avp_data := { |
| 642 | avp_BASE_NONE_Destination_Realm := dest_realm |
| 643 | } |
| 644 | } |
| 645 | } |
| 646 | |
| 647 | /* 8.14 User-Name */ |
| 648 | template (value) GenericAVP ts_AVP_UserName(template (value) octetstring uid) := { |
| 649 | avp := { |
| 650 | avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_User_Name), |
| 651 | avp_data := { |
| 652 | avp_BASE_NONE_User_Name := uid |
| 653 | } |
| 654 | } |
| 655 | } |
| 656 | template (present) GenericAVP tr_AVP_UserName(template (present) octetstring uid := ?) := { |
| 657 | avp := { |
| 658 | avp_header := tr_DIA_Hdr(c_AVP_Code_BASE_NONE_User_Name), |
| 659 | avp_data := { |
| 660 | avp_BASE_NONE_User_Name := uid |
| 661 | } |
| 662 | } |
| 663 | } |
| 664 | template (value) GenericAVP ts_AVP_UserNameImsi(hexstring imsi) := ts_AVP_UserName(char2oct(hex2str(imsi))); |
Pau Espin Pedrol | f4619d8 | 2023-10-16 18:08:07 +0200 | [diff] [blame] | 665 | template (present) GenericAVP tr_AVP_UserNameImsi(template (present) hexstring imsi := ?) := tr_AVP_UserName(char2oct_tmpl(hex2str_tmpl(imsi))); |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 666 | |
| 667 | |
Harald Welte | 6effabb | 2020-02-18 21:39:59 +0100 | [diff] [blame] | 668 | template (value) GenericAVP ts_AVP_NumOfReqVectors(template (value) UINT32 num_req := '00000004'O) := { |
| 669 | avp := { |
| 670 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_Number_Of_Requested_Vectors), |
| 671 | avp_data := { |
| 672 | avp_AAA_3GPP_Number_Of_Requested_Vectors := num_req |
| 673 | } |
| 674 | } |
| 675 | } |
| 676 | |
| 677 | template (value) GenericAVP ts_AVP_ImmReqPref(template (value) UINT32 par := '00000000'O) := { |
| 678 | avp := { |
| 679 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_Immediate_Response_Preferred), |
| 680 | avp_data := { |
| 681 | avp_AAA_3GPP_Immediate_Response_Preferred := par |
| 682 | } |
| 683 | } |
| 684 | } |
| 685 | |
| 686 | |
| 687 | /* 7.3.11 Requested-EUTRAN-Authentication-Info */ |
| 688 | template (value) GenericAVP ts_AVP_RequestedEutranAuthInfo(template (value) UINT32 num_vec := '00000004'O) := { |
| 689 | avp := { |
| 690 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_Requested_EUTRAN_Authentication_Info), |
| 691 | avp_data := { |
| 692 | avp_AAA_3GPP_Requested_EUTRAN_Authentication_Info := { |
| 693 | ts_AVP_NumOfReqVectors(num_vec), |
| 694 | ts_AVP_ImmReqPref('00000000'O) |
| 695 | } |
| 696 | } |
| 697 | } |
| 698 | } |
| 699 | |
Pau Espin Pedrol | 446145a | 2023-10-10 19:12:21 +0200 | [diff] [blame] | 700 | template (present) GenericAVP tr_AVP_3GPP_SubscrRauTauTmr(template (present) uint32_t tmr := ?) := { |
| 701 | avp := { |
| 702 | avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_Subscribed_Periodic_RAU_TAU_Timer), |
| 703 | avp_data := { |
| 704 | avp_AAA_3GPP_Subscribed_Periodic_RAU_TAU_Timer := int2oct_tmpl(tmr, 4) |
| 705 | } |
| 706 | } |
| 707 | } |
| 708 | |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 709 | template (value) GenericAVP ts_AVP_3GPP_SubscrRauTauTmr(uint32_t tmr) := { |
| 710 | avp := { |
| 711 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_Subscribed_Periodic_RAU_TAU_Timer), |
| 712 | avp_data := { |
| 713 | avp_AAA_3GPP_Subscribed_Periodic_RAU_TAU_Timer := int2oct(tmr, 4) |
| 714 | } |
| 715 | } |
| 716 | } |
| 717 | |
Pau Espin Pedrol | 965ac64 | 2023-10-16 18:12:45 +0200 | [diff] [blame] | 718 | /* Service-Selection, TS 29.272 7.3.36, TS 29.273 5.2.3.5, (RFC 5778) */ |
Pau Espin Pedrol | 446145a | 2023-10-10 19:12:21 +0200 | [diff] [blame] | 719 | template (present) GenericAVP tr_AVP_ServiceSelection(template (present) charstring apn := ?) := { |
| 720 | avp := { |
| 721 | avp_header := tr_DIA_Hdr(c_AVP_Code_MIPv6_NONE_Service_Selection), |
| 722 | avp_data := { |
| 723 | avp_MIPv6_NONE_Service_Selection := char2oct_tmpl(apn) |
| 724 | } |
| 725 | } |
| 726 | } |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 727 | template (value) GenericAVP ts_AVP_ServiceSelection(charstring apn) := { |
| 728 | avp := { |
| 729 | avp_header := ts_DIA_Hdr(c_AVP_Code_MIPv6_NONE_Service_Selection), |
| 730 | avp_data := { |
| 731 | avp_MIPv6_NONE_Service_Selection := char2oct(apn) |
| 732 | } |
| 733 | } |
| 734 | } |
| 735 | |
Pau Espin Pedrol | 6477d73 | 2022-06-03 12:04:40 +0200 | [diff] [blame] | 736 | template (present) GenericAVP tr_AVP_PCC_3GPP_QoS_Information(template (present) AVP_list list := ?) := { |
Pau Espin Pedrol | a2af578 | 2022-05-18 16:34:29 +0200 | [diff] [blame] | 737 | avp := { |
| 738 | avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_PCC_3GPP_QoS_Information), |
| 739 | avp_data := { |
| 740 | avp_PCC_3GPP_QoS_Information := list |
| 741 | } |
| 742 | } |
| 743 | } |
| 744 | |
Pau Espin Pedrol | 6477d73 | 2022-06-03 12:04:40 +0200 | [diff] [blame] | 745 | template (value) GenericAVP ts_AVP_PCC_3GPP_QoS_Information(template (value) AVP_list list) := { |
| 746 | avp := { |
| 747 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_PCC_3GPP_QoS_Information), |
| 748 | avp_data := { |
| 749 | avp_PCC_3GPP_QoS_Information := list |
| 750 | } |
| 751 | } |
| 752 | } |
| 753 | |
| 754 | template (value) GenericAVP ts_AVP_PCC_3GPP_APN_Aggregate_Max_Bitrate_DL(uint32_t val) := { |
| 755 | avp := { |
| 756 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_PCC_3GPP_APN_Aggregate_Max_Bitrate_DL), |
| 757 | avp_data := { |
| 758 | avp_PCC_3GPP_APN_Aggregate_Max_Bitrate_DL := int2oct(val, 4) |
| 759 | } |
| 760 | } |
| 761 | } |
| 762 | |
| 763 | template (value) GenericAVP ts_AVP_PCC_3GPP_APN_Aggregate_Max_Bitrate_UL(uint32_t val) := { |
| 764 | avp := { |
| 765 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_PCC_3GPP_APN_Aggregate_Max_Bitrate_UL), |
| 766 | avp_data := { |
| 767 | avp_PCC_3GPP_APN_Aggregate_Max_Bitrate_UL := int2oct(val, 4) |
| 768 | } |
| 769 | } |
| 770 | } |
| 771 | |
| 772 | template (value) GenericAVP ts_AVP_PCC_3GPP_Default_EPS_Bearer_QoS(template (value) AVP_list list) := { |
| 773 | avp := { |
| 774 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_PCC_3GPP_Default_EPS_Bearer_QoS), |
| 775 | avp_data := { |
| 776 | avp_PCC_3GPP_Default_EPS_Bearer_QoS := list |
| 777 | } |
| 778 | } |
| 779 | } |
| 780 | |
Pau Espin Pedrol | 446145a | 2023-10-10 19:12:21 +0200 | [diff] [blame] | 781 | template (present) GenericAVP tr_AVP_PCC_3GPP_QoS_Class_Identifier(template (present) uint32_t val := ?) := { |
| 782 | avp := { |
| 783 | avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_PCC_3GPP_QoS_Class_Identifier), |
| 784 | avp_data := { |
| 785 | avp_PCC_3GPP_QoS_Class_Identifier := int2oct_tmpl(val, 4) |
| 786 | } |
| 787 | } |
| 788 | } |
| 789 | |
Pau Espin Pedrol | 6477d73 | 2022-06-03 12:04:40 +0200 | [diff] [blame] | 790 | template (value) GenericAVP ts_AVP_PCC_3GPP_QoS_Class_Identifier(uint32_t val) := { |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 791 | avp := { |
| 792 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_PCC_3GPP_QoS_Class_Identifier), |
| 793 | avp_data := { |
Pau Espin Pedrol | 6477d73 | 2022-06-03 12:04:40 +0200 | [diff] [blame] | 794 | avp_PCC_3GPP_QoS_Class_Identifier := int2oct(val, 4) |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 795 | } |
| 796 | } |
| 797 | } |
| 798 | |
Pau Espin Pedrol | 446145a | 2023-10-10 19:12:21 +0200 | [diff] [blame] | 799 | template (present) GenericAVP tr_AVP_3GPP_PriorityLevel(template (present) uint32_t prio := ?) := { |
| 800 | avp := { |
| 801 | avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_PCC_3GPP_Priority_Level), |
| 802 | avp_data := { |
| 803 | avp_PCC_3GPP_Priority_Level := int2oct_tmpl(prio, 4) |
| 804 | } |
| 805 | } |
| 806 | } |
| 807 | |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 808 | template (value) GenericAVP ts_AVP_3GPP_PriorityLevel(uint32_t prio) := { |
| 809 | avp := { |
| 810 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_PCC_3GPP_Priority_Level), |
| 811 | avp_data := { |
| 812 | avp_PCC_3GPP_Priority_Level := int2oct(prio, 4) |
| 813 | } |
| 814 | } |
| 815 | } |
| 816 | |
Pau Espin Pedrol | 446145a | 2023-10-10 19:12:21 +0200 | [diff] [blame] | 817 | template (present) GenericAVP tr_AVP_PCC_3GPP_AllocRetenPrio(template (present) uint32_t prio := ?) := { |
| 818 | avp := { |
| 819 | avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_PCC_3GPP_Allocation_Retention_Priority), |
| 820 | avp_data := { |
| 821 | avp_PCC_3GPP_Allocation_Retention_Priority := superset( |
| 822 | tr_AVP_3GPP_PriorityLevel(prio) |
| 823 | /* pre-emption capability */ |
| 824 | /* pre-emption vulnerability */ |
| 825 | ) |
| 826 | } |
| 827 | } |
| 828 | } |
Pau Espin Pedrol | 6477d73 | 2022-06-03 12:04:40 +0200 | [diff] [blame] | 829 | template (value) GenericAVP ts_AVP_PCC_3GPP_AllocRetenPrio(uint32_t prio) := { |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 830 | avp := { |
| 831 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_PCC_3GPP_Allocation_Retention_Priority), |
| 832 | avp_data := { |
| 833 | avp_PCC_3GPP_Allocation_Retention_Priority := { |
| 834 | ts_AVP_3GPP_PriorityLevel(prio) |
| 835 | /* pre-emption capability */ |
| 836 | /* pre-emption vulnerability */ |
| 837 | } |
| 838 | } |
| 839 | } |
| 840 | } |
| 841 | |
Pau Espin Pedrol | 446145a | 2023-10-10 19:12:21 +0200 | [diff] [blame] | 842 | /* 7.3.37 EPS-Subscribed-QoS-Profile */ |
| 843 | template (present) GenericAVP tr_AVP_3GPP_EpsSubscrQosProfile(template (present) uint32_t qos_class := ?, |
| 844 | template (present) uint32_t prio := ?) := { |
| 845 | avp := { |
| 846 | avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_EPS_Subscribed_QoS_Profile), |
| 847 | avp_data := { |
| 848 | avp_AAA_3GPP_EPS_Subscribed_QoS_Profile := superset( |
| 849 | tr_AVP_PCC_3GPP_QoS_Class_Identifier(qos_class), |
| 850 | tr_AVP_PCC_3GPP_AllocRetenPrio(prio) |
| 851 | ) |
| 852 | } |
| 853 | } |
| 854 | } |
| 855 | |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 856 | template (value) GenericAVP ts_AVP_3GPP_EpsSubscrQosProfile(uint32_t qos_class, uint32_t prio) := { |
| 857 | avp := { |
| 858 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_EPS_Subscribed_QoS_Profile), |
| 859 | avp_data := { |
| 860 | avp_AAA_3GPP_EPS_Subscribed_QoS_Profile := { |
Pau Espin Pedrol | 6477d73 | 2022-06-03 12:04:40 +0200 | [diff] [blame] | 861 | ts_AVP_PCC_3GPP_QoS_Class_Identifier(qos_class), |
| 862 | ts_AVP_PCC_3GPP_AllocRetenPrio(prio) |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 863 | } |
| 864 | } |
| 865 | } |
| 866 | } |
| 867 | |
Pau Espin Pedrol | a2af578 | 2022-05-18 16:34:29 +0200 | [diff] [blame] | 868 | template (present) GenericAVP tr_AVP_3GPP_Reporting_Reason(template (present) DCA_3GPP_Reporting_Reason r := ?) := { |
| 869 | avp := { |
| 870 | avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_DCA_3GPP_Reporting_Reason), |
| 871 | avp_data := { |
| 872 | avp_DCA_3GPP_Reporting_Reason := r |
| 873 | } |
| 874 | } |
| 875 | } |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 876 | |
Pau Espin Pedrol | a2af578 | 2022-05-18 16:34:29 +0200 | [diff] [blame] | 877 | template (present) GenericAVP tr_AVP_3GPP_AoCRequestType(template (present) DCA_3GPP_AoC_Request_Type t := ?) := { |
| 878 | avp := { |
| 879 | avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_DCA_3GPP_AoC_Request_Type), |
| 880 | avp_data := { |
| 881 | avp_DCA_3GPP_AoC_Request_Type := t |
| 882 | } |
| 883 | } |
| 884 | } |
| 885 | |
| 886 | template (present) GenericAVP tr_AVP_3GPP_ServiceInformation(template (present) AVP_list content := ?) := { |
| 887 | avp := { |
| 888 | avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_DCA_3GPP_Service_Information), |
| 889 | avp_data := { |
| 890 | avp_DCA_3GPP_Service_Information := content |
| 891 | } |
| 892 | } |
| 893 | } |
| 894 | |
| 895 | template (present) GenericAVP tr_AVP_3GPP_PSInformation(template (present) AVP_list content := ?) := { |
| 896 | avp := { |
| 897 | avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_DCA_3GPP_PS_Information), |
| 898 | avp_data := { |
| 899 | avp_DCA_3GPP_PS_Information := content |
| 900 | } |
| 901 | } |
| 902 | } |
| 903 | |
| 904 | template (present) GenericAVP tr_AVP_3GPP_ChargingId(template (present) AVP_OctetString id := ?) := { |
| 905 | avp := { |
| 906 | avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_GI_3GPP_3GPP_Charging_Id), |
| 907 | avp_data := { |
| 908 | avp_GI_3GPP_3GPP_Charging_Id := id |
| 909 | } |
| 910 | } |
| 911 | } |
| 912 | |
| 913 | template (present) GenericAVP tr_AVP_3GPP_PDPType(template (present) GI_3GPP_3GPP_PDP_Type t := ?) := { |
| 914 | avp := { |
| 915 | avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_GI_3GPP_3GPP_PDP_Type), |
| 916 | avp_data := { |
| 917 | avp_GI_3GPP_3GPP_PDP_Type := t |
| 918 | } |
| 919 | } |
| 920 | } |
| 921 | |
| 922 | template (present) GenericAVP tr_AVP_3GPP_PDPAddress(template (present) DCA_3GPP_PDP_Address addr := ?) := { |
| 923 | avp := { |
| 924 | avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_DCA_3GPP_PDP_Address), |
| 925 | avp_data := { |
| 926 | avp_DCA_3GPP_PDP_Address := addr |
| 927 | } |
| 928 | } |
| 929 | } |
| 930 | |
| 931 | template (present) GenericAVP tr_AVP_3GPP_SGSNAddress(template (present) DCA_3GPP_SGSN_Address addr := ?) := { |
| 932 | avp := { |
| 933 | avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_DCA_3GPP_SGSN_Address), |
| 934 | avp_data := { |
| 935 | avp_DCA_3GPP_SGSN_Address := addr |
| 936 | } |
| 937 | } |
| 938 | } |
| 939 | |
| 940 | template (present) GenericAVP tr_AVP_3GPP_GGSNAddress(template (present) DCA_3GPP_GGSN_Address addr := ?) := { |
| 941 | avp := { |
| 942 | avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_DCA_3GPP_GGSN_Address), |
| 943 | avp_data := { |
| 944 | avp_DCA_3GPP_GGSN_Address := addr |
| 945 | } |
| 946 | } |
| 947 | } |
| 948 | |
| 949 | template (present) GenericAVP tr_AVP_3GPP_SelectionMode(template (present) GI_3GPP_3GPP_Selection_Mode sm := ?) := { |
| 950 | avp := { |
| 951 | avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_GI_3GPP_3GPP_Selection_Mode), |
| 952 | avp_data := { |
| 953 | avp_GI_3GPP_3GPP_Selection_Mode := sm |
| 954 | } |
| 955 | } |
| 956 | } |
| 957 | |
| 958 | template (present) GenericAVP tr_AVP_3GPP_ChargingCharacteristics(template (present) GI_3GPP_3GPP_Charging_Characteristics cc := ?) := { |
| 959 | avp := { |
| 960 | avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_GI_3GPP_3GPP_Charging_Characteristics), |
| 961 | avp_data := { |
| 962 | avp_GI_3GPP_3GPP_Charging_Characteristics := cc |
| 963 | } |
| 964 | } |
| 965 | } |
| 966 | |
| 967 | template (present) GenericAVP tr_AVP_3GPP_SGSNMCCMNC(template (present) GI_3GPP_3GPP_SGSN_MCC_MNC smn := ?) := { |
| 968 | avp := { |
| 969 | avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_GI_3GPP_3GPP_SGSN_MCC_MNC), |
| 970 | avp_data := { |
| 971 | avp_GI_3GPP_3GPP_SGSN_MCC_MNC := smn |
| 972 | } |
| 973 | } |
| 974 | } |
| 975 | |
| 976 | template (present) GenericAVP tr_AVP_3GPP_NSAPI(template (present) GI_3GPP_3GPP_NSAPI nsapi := ?) := { |
| 977 | avp := { |
| 978 | avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_GI_3GPP_3GPP_NSAPI), |
| 979 | avp_data := { |
| 980 | avp_GI_3GPP_3GPP_NSAPI := nsapi |
| 981 | } |
| 982 | } |
| 983 | } |
| 984 | |
| 985 | template (present) GenericAVP tr_AVP_3GPP_MS_TimeZone(template (present) GI_3GPP_3GPP_MS_TimeZone ms_tz := ?) := { |
| 986 | avp := { |
| 987 | avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_GI_3GPP_3GPP_MS_TimeZone), |
| 988 | avp_data := { |
| 989 | avp_GI_3GPP_3GPP_MS_TimeZone := ms_tz |
| 990 | } |
| 991 | } |
| 992 | } |
| 993 | |
| 994 | template (present) GenericAVP tr_AVP_3GPP_ULI(template (present) GI_3GPP_3GPP_User_Location_Info uli := ?) := { |
| 995 | avp := { |
| 996 | avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_GI_3GPP_3GPP_User_Location_Info), |
| 997 | avp_data := { |
| 998 | avp_GI_3GPP_3GPP_User_Location_Info := uli |
| 999 | } |
| 1000 | } |
| 1001 | } |
| 1002 | |
| 1003 | template (present) GenericAVP tr_AVP_UserEquipmentInfo(template (present) DCC_NONE_User_Equipment_Info uei := ?) := { |
| 1004 | avp := { |
| 1005 | avp_header := tr_DIA_Hdr(c_AVP_Code_DCC_NONE_User_Equipment_Info), |
| 1006 | avp_data := { |
| 1007 | avp_DCC_NONE_User_Equipment_Info := uei |
| 1008 | } |
| 1009 | } |
| 1010 | } |
| 1011 | |
| 1012 | template (present) GenericAVP tr_AVP_UserEquipmentInfoType(template (present) DCC_NONE_User_Equipment_Info_Type ueit := ?) := { |
| 1013 | avp := { |
| 1014 | avp_header := tr_DIA_Hdr(c_AVP_Code_DCC_NONE_User_Equipment_Info_Type), |
| 1015 | avp_data := { |
| 1016 | avp_DCC_NONE_User_Equipment_Info_Type := ueit |
| 1017 | } |
| 1018 | } |
| 1019 | } |
| 1020 | |
| 1021 | template (present) GenericAVP tr_AVP_UserEquipmentInfoValue(template (present) DCC_NONE_User_Equipment_Info_Value ueiv := ?) := { |
| 1022 | avp := { |
| 1023 | avp_header := tr_DIA_Hdr(c_AVP_Code_DCC_NONE_User_Equipment_Info_Value), |
| 1024 | avp_data := { |
| 1025 | avp_DCC_NONE_User_Equipment_Info_Value := ueiv |
| 1026 | } |
| 1027 | } |
| 1028 | } |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 1029 | |
Pau Espin Pedrol | 77fdd0b | 2022-03-08 14:03:33 +0100 | [diff] [blame] | 1030 | /* RFC4006 8.16 Multiple-Services-Credit-Control AVP */ |
| 1031 | template (value) GenericAVP ts_AVP_Multiple_Services_Credit_Control(template (value) AVP_list content) := { |
| 1032 | avp := { |
| 1033 | avp_header := ts_DIA_Hdr(c_AVP_Code_DCC_NONE_Multiple_Services_Credit_Control), |
| 1034 | avp_data := { |
| 1035 | avp_DCC_NONE_Multiple_Services_Credit_Control := content |
| 1036 | } |
| 1037 | } |
| 1038 | } |
Pau Espin Pedrol | a2af578 | 2022-05-18 16:34:29 +0200 | [diff] [blame] | 1039 | template (present) GenericAVP tr_AVP_Multiple_Services_Credit_Control(template (present) AVP_list content := ?) := { |
| 1040 | avp := { |
| 1041 | avp_header := tr_DIA_Hdr(c_AVP_Code_DCC_NONE_Multiple_Services_Credit_Control), |
| 1042 | avp_data := { |
| 1043 | avp_DCC_NONE_Multiple_Services_Credit_Control := content |
| 1044 | } |
| 1045 | } |
| 1046 | } |
| 1047 | |
| 1048 | /* Requested-Service-Unit AVP */ |
| 1049 | template (present) GenericAVP tr_AVP_Requested_Service_Unit(template (present) AVP_list content := ?) := { |
| 1050 | avp := { |
| 1051 | avp_header := tr_DIA_Hdr(c_AVP_Code_DCC_NONE_Requested_Service_Unit), |
| 1052 | avp_data := { |
| 1053 | avp_DCC_NONE_Requested_Service_Unit := content |
| 1054 | } |
| 1055 | } |
| 1056 | } |
| 1057 | |
| 1058 | /* Used-Service-Unit AVP */ |
| 1059 | template (present) GenericAVP tr_AVP_Used_Service_Unit(template (present) AVP_list content := ?) := { |
| 1060 | avp := { |
| 1061 | avp_header := tr_DIA_Hdr(c_AVP_Code_DCC_NONE_Used_Service_Unit), |
| 1062 | avp_data := { |
| 1063 | avp_DCC_NONE_Used_Service_Unit := content |
| 1064 | } |
| 1065 | } |
| 1066 | } |
Pau Espin Pedrol | 77fdd0b | 2022-03-08 14:03:33 +0100 | [diff] [blame] | 1067 | |
| 1068 | /* RFC4006 8.17 Granted-Service-Unit AVP */ |
| 1069 | template (value) GenericAVP ts_AVP_Granted_Service_Unit(template (value) AVP_list content) := { |
| 1070 | avp := { |
| 1071 | avp_header := ts_DIA_Hdr(c_AVP_Code_DCC_NONE_Granted_Service_Unit), |
| 1072 | avp_data := { |
| 1073 | avp_DCC_NONE_Granted_Service_Unit := content |
| 1074 | } |
| 1075 | } |
| 1076 | } |
| 1077 | |
| 1078 | /* RFC4006 8.21 CC-Time AVP */ |
| 1079 | template (value) GenericAVP ts_AVP_CC_Time(uint32_t cc_time_val) := { |
| 1080 | avp := { |
| 1081 | avp_header := ts_DIA_Hdr(c_AVP_Code_DCC_NONE_CC_Time), |
| 1082 | avp_data := { |
| 1083 | avp_DCC_NONE_CC_Time := int2oct(cc_time_val, 4) |
| 1084 | } |
| 1085 | } |
| 1086 | } |
| 1087 | |
| 1088 | /* RFC4006 8.23 CC-Total-Octets AVP */ |
| 1089 | template (value) GenericAVP ts_AVP_CC_Total_Octets(uint64_t cc_total_octets_val) := { |
| 1090 | avp := { |
| 1091 | avp_header := ts_DIA_Hdr(c_AVP_Code_DCC_NONE_CC_Total_Octets), |
| 1092 | avp_data := { |
| 1093 | avp_DCC_NONE_CC_Total_Octets := int2oct(cc_total_octets_val, 8) |
| 1094 | } |
| 1095 | } |
| 1096 | } |
| 1097 | |
| 1098 | /* RFC4006 8.33 Validity-Time AVP */ |
| 1099 | template (value) GenericAVP ts_AVP_Validity_Time(uint32_t validity_time_val) := { |
| 1100 | avp := { |
| 1101 | avp_header := ts_DIA_Hdr(c_AVP_Code_DCC_NONE_Validity_Time), |
| 1102 | avp_data := { |
| 1103 | avp_DCC_NONE_Validity_Time := int2oct(validity_time_val, 4) |
| 1104 | } |
| 1105 | } |
| 1106 | } |
| 1107 | |
Pau Espin Pedrol | 52562c9 | 2022-05-23 15:45:46 +0200 | [diff] [blame] | 1108 | template (value) GenericAVP ts_AVP_3GPP_VolumeQuotaThreshold(uint32_t volume_quota_thresh_val) := { |
| 1109 | avp := { |
| 1110 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_DCA_3GPP_Volume_Quota_Threshold), |
| 1111 | avp_data := { |
| 1112 | avp_DCA_3GPP_Volume_Quota_Threshold := int2oct(volume_quota_thresh_val, 4) |
| 1113 | } |
| 1114 | } |
| 1115 | } |
| 1116 | |
Pau Espin Pedrol | a2af578 | 2022-05-18 16:34:29 +0200 | [diff] [blame] | 1117 | template (present) GenericAVP tr_AVP_3GPP_CalledStationId(template (present) DNAS_NONE_Called_Station_Id id := ?) := { |
| 1118 | avp := { |
| 1119 | avp_header := tr_DIA_Hdr(c_AVP_Code_DNAS_NONE_Called_Station_Id), |
| 1120 | avp_data := { |
| 1121 | avp_DNAS_NONE_Called_Station_Id := id |
| 1122 | } |
| 1123 | } |
| 1124 | } |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 1125 | |
Pau Espin Pedrol | 44b7520 | 2023-10-23 14:37:24 +0200 | [diff] [blame] | 1126 | /* RFC6733 8.7. Auth-Request-Type AVP */ |
| 1127 | template (value) GenericAVP ts_AVP_AuthRequestType(BASE_NONE_Auth_Request_Type auth_req_type) := { |
| 1128 | avp := { |
| 1129 | avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Auth_Request_Type, '00000000'B), |
| 1130 | avp_data := { |
| 1131 | avp_BASE_NONE_Auth_Request_Type := auth_req_type |
| 1132 | } |
| 1133 | } |
| 1134 | } |
| 1135 | template (present) GenericAVP tr_AVP_AuthRequestType(template (present) BASE_NONE_Auth_Request_Type auth_req_type) := { |
| 1136 | avp := { |
| 1137 | avp_header := tr_DIA_Hdr(c_AVP_Code_BASE_NONE_Auth_Request_Type), |
| 1138 | avp_data := { |
| 1139 | avp_BASE_NONE_Auth_Request_Type := auth_req_type |
| 1140 | } |
| 1141 | } |
| 1142 | } |
| 1143 | |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 1144 | |
Vadim Yanitskiy | 0d6cbd3 | 2023-02-11 08:07:27 +0700 | [diff] [blame] | 1145 | /* 5.3.1 Capabilities Exchange Request */ |
| 1146 | template (value) PDU_DIAMETER |
| 1147 | ts_DIA_CER(octetstring host_ip, uint32_t vendor_app_id, |
| 1148 | template (value) charstring orig_host := "ttcn3.localdomain", |
| 1149 | template (value) charstring orig_realm := "localdomain", |
| 1150 | template (value) UINT32 hbh_id := '00000000'O, |
| 1151 | template (value) UINT32 ete_id := '00000000'O) := |
| 1152 | ts_DIAMETER(flags := '10000000'B, |
| 1153 | cmd_code := Capabilities_Exchange, |
| 1154 | hbh_id := hbh_id, |
| 1155 | ete_id := ete_id, |
| 1156 | avps := { |
| 1157 | ts_AVP_OriginHost(orig_host), |
| 1158 | ts_AVP_OriginRealm(orig_realm), |
| 1159 | ts_AVP_HostIpAddr(host_ip), |
| 1160 | ts_AVP_VendorId(vendor_id_3GPP), |
| 1161 | ts_AVP_ProductName("TTCN-3 Testsuite"), |
| 1162 | ts_AVP_FwRevision('00000000'O), |
| 1163 | ts_AVP_InbSecId('00000000'O), |
| 1164 | ts_AVP_AuthAppId('FFFFFFFF'O), |
| 1165 | ts_AVP_VendorSpecAppId(vendor_id_3GPP, vendor_app_id) |
| 1166 | }); |
| 1167 | |
| 1168 | |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 1169 | /* 5.3.2 Capabilities Exchange Answer */ |
| 1170 | template (value) PDU_DIAMETER |
Pau Espin Pedrol | 33b4749 | 2022-03-08 17:43:01 +0100 | [diff] [blame] | 1171 | ts_DIA_CEA_AUTH_APP_ID(template (value) UINT32 hbh_id, template (value) UINT32 ete_id, |
| 1172 | template (value) charstring origin_host, |
| 1173 | template (value) charstring origin_realm, |
| 1174 | template (value) octetstring host_ip, uint32_t auth_app_id) |
| 1175 | := ts_DIAMETER(flags:='00000000'B, cmd_code:=Capabilities_Exchange, hbh_id:=hbh_id, ete_id:=ete_id, |
| 1176 | avps := { |
| 1177 | ts_AVP_ResultCode(DIAMETER_SUCCESS), |
| 1178 | ts_AVP_OriginHost(origin_host), |
| 1179 | ts_AVP_OriginRealm(origin_realm), |
| 1180 | ts_AVP_HostIpAddr(host_ip), |
| 1181 | ts_AVP_VendorId(vendor_id_3GPP), |
| 1182 | ts_AVP_ProductName("TTCN-3 Testsuite"), |
| 1183 | ts_AVP_OriginStateId('00000001'O), |
| 1184 | ts_AVP_SuppVendorIdRaw(5535), /* 3GPP2 */ |
| 1185 | ts_AVP_SuppVendorId(vendor_id_3GPP), |
| 1186 | ts_AVP_SuppVendorIdRaw(13019), /* ETSI */ |
Pau Espin Pedrol | 33b4749 | 2022-03-08 17:43:01 +0100 | [diff] [blame] | 1187 | ts_AVP_AuthAppId(int2oct(auth_app_id, 4)), |
| 1188 | ts_AVP_InbSecId('00000000'O) |
| 1189 | }); |
| 1190 | template (value) PDU_DIAMETER |
| 1191 | ts_DIA_CEA_VENDOR_APP_ID(template (value) UINT32 hbh_id, template (value) UINT32 ete_id, |
| 1192 | template (value) charstring origin_host, |
| 1193 | template (value) charstring origin_realm, |
| 1194 | template (value) octetstring host_ip, uint32_t vendor_app_id) |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 1195 | := ts_DIAMETER(flags:='00000000'B, cmd_code:=Capabilities_Exchange, hbh_id:=hbh_id, ete_id:=ete_id, |
| 1196 | avps := { |
| 1197 | ts_AVP_ResultCode(DIAMETER_SUCCESS), |
Harald Welte | 61f73d5 | 2020-04-26 21:41:12 +0200 | [diff] [blame] | 1198 | ts_AVP_OriginHost(origin_host), |
| 1199 | ts_AVP_OriginRealm(origin_realm), |
| 1200 | ts_AVP_HostIpAddr(host_ip), |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 1201 | ts_AVP_VendorId(vendor_id_3GPP), |
| 1202 | ts_AVP_ProductName("TTCN-3 Testsuite"), |
| 1203 | ts_AVP_OriginStateId('00000001'O), |
| 1204 | ts_AVP_SuppVendorIdRaw(5535), /* 3GPP2 */ |
| 1205 | ts_AVP_SuppVendorId(vendor_id_3GPP), |
| 1206 | ts_AVP_SuppVendorIdRaw(13019), /* ETSI */ |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 1207 | ts_AVP_InbSecId('00000000'O), |
Harald Welte | 61f73d5 | 2020-04-26 21:41:12 +0200 | [diff] [blame] | 1208 | ts_AVP_VendorSpecAppId(vendor_id_3GPP, vendor_app_id) |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 1209 | }); |
Pau Espin Pedrol | 33b4749 | 2022-03-08 17:43:01 +0100 | [diff] [blame] | 1210 | function f_ts_DIA_CEA(template (value) UINT32 hbh_id, template (value) UINT32 ete_id, |
| 1211 | template (value) charstring origin_host, |
| 1212 | template (value) charstring origin_realm, |
| 1213 | template (value) octetstring host_ip, template (omit) uint32_t auth_app_id, |
| 1214 | template (omit) uint32_t vendor_app_id) |
| 1215 | return template (value) PDU_DIAMETER |
| 1216 | { |
| 1217 | var template (value) PDU_DIAMETER diam_pdu; |
| 1218 | if (istemplatekind(vendor_app_id, "omit")) { |
| 1219 | diam_pdu := ts_DIA_CEA_AUTH_APP_ID(hbh_id, ete_id, origin_host, origin_realm, host_ip, valueof(auth_app_id)); |
| 1220 | } else { |
| 1221 | diam_pdu := ts_DIA_CEA_VENDOR_APP_ID(hbh_id, ete_id, origin_host, origin_realm, host_ip, valueof(vendor_app_id)); |
| 1222 | } |
| 1223 | return diam_pdu; |
| 1224 | } |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 1225 | |
Vadim Yanitskiy | f28b255 | 2021-12-11 03:49:14 +0300 | [diff] [blame] | 1226 | /* RFC 6733, section 5.5.1 "Device-Watchdog-Request" */ |
| 1227 | template (value) PDU_DIAMETER |
| 1228 | ts_DIA_DWR(template (value) OCTET4 state_id := '00000000'O, |
| 1229 | template (value) charstring orig_host := "ttcn3.localdomain", |
| 1230 | template (value) charstring orig_realm := "localdomain", |
| 1231 | template (value) UINT32 hbh_id := '00000000'O, |
| 1232 | template (value) UINT32 ete_id := '00000000'O) := |
| 1233 | ts_DIAMETER(flags := '10000000'B, |
| 1234 | cmd_code := Device_Watchdog, |
| 1235 | app_id := '00000000'O, |
| 1236 | hbh_id := hbh_id, |
| 1237 | ete_id := ete_id, |
| 1238 | avps := { |
| 1239 | ts_AVP_OriginHost(orig_host), |
| 1240 | ts_AVP_OriginRealm(orig_realm), |
| 1241 | ts_AVP_OriginStateId(state_id) |
| 1242 | }); |
| 1243 | template (present) PDU_DIAMETER |
| 1244 | tr_DIA_DWR(template (present) OCTET4 state_id := ?, |
| 1245 | template (present) charstring orig_host := ?, |
| 1246 | template (present) charstring orig_realm := ?, |
| 1247 | template (present) UINT32 hbh_id := ?, |
| 1248 | template (present) UINT32 ete_id := ?) := |
| 1249 | tr_DIAMETER(flags := '1???????'B, |
| 1250 | cmd_code := Device_Watchdog, |
| 1251 | app_id := '00000000'O, |
| 1252 | hbh_id := hbh_id, |
| 1253 | ete_id := ete_id, |
| 1254 | avps := superset( |
| 1255 | tr_AVP_OriginHost(orig_host), |
Pau Espin Pedrol | 8dcb061 | 2023-08-28 19:16:29 +0200 | [diff] [blame] | 1256 | tr_AVP_OriginRealm(orig_realm) |
| 1257 | /* tr_AVP_OriginStateId(state_id) is optional */ |
Vadim Yanitskiy | f28b255 | 2021-12-11 03:49:14 +0300 | [diff] [blame] | 1258 | )); |
| 1259 | |
| 1260 | /* RFC 6733, section 5.5.2 "Device-Watchdog-Answer" */ |
| 1261 | template (value) PDU_DIAMETER |
| 1262 | ts_DIA_DWA(template (value) OCTET4 state_id := '00000000'O, |
| 1263 | template (value) charstring orig_host := "ttcn3.localdomain", |
| 1264 | template (value) charstring orig_realm := "localdomain", |
| 1265 | template (value) UINT32 hbh_id := '00000000'O, |
| 1266 | template (value) UINT32 ete_id := '00000000'O) := |
| 1267 | ts_DIAMETER(flags := '00000000'B, |
| 1268 | cmd_code := Device_Watchdog, |
| 1269 | app_id := '00000000'O, |
| 1270 | hbh_id := hbh_id, |
| 1271 | ete_id := ete_id, |
| 1272 | avps := { |
| 1273 | ts_AVP_ResultCode(DIAMETER_SUCCESS), |
| 1274 | ts_AVP_OriginHost(orig_host), |
| 1275 | ts_AVP_OriginRealm(orig_realm), |
| 1276 | ts_AVP_OriginStateId(state_id) |
| 1277 | }); |
| 1278 | template (present) PDU_DIAMETER |
| 1279 | tr_DIA_DWA(template (present) OCTET4 state_id := ?, |
| 1280 | template (present) charstring orig_host := ?, |
| 1281 | template (present) charstring orig_realm := ?, |
| 1282 | template (present) UINT32 hbh_id := ?, |
| 1283 | template (present) UINT32 ete_id := ?) := |
| 1284 | tr_DIAMETER(flags := '0???????'B, |
| 1285 | cmd_code := Device_Watchdog, |
| 1286 | app_id := '00000000'O, |
| 1287 | hbh_id := hbh_id, |
| 1288 | ete_id := ete_id, |
| 1289 | avps := superset( |
| 1290 | tr_AVP_ResultCode(DIAMETER_SUCCESS), |
| 1291 | tr_AVP_OriginHost(orig_host), |
Pau Espin Pedrol | 8dcb061 | 2023-08-28 19:16:29 +0200 | [diff] [blame] | 1292 | tr_AVP_OriginRealm(orig_realm) |
| 1293 | /* tr_AVP_OriginStateId(state_id) is optional */ |
Vadim Yanitskiy | f28b255 | 2021-12-11 03:49:14 +0300 | [diff] [blame] | 1294 | )); |
| 1295 | |
Pau Espin Pedrol | 8fa2284 | 2022-05-20 14:47:55 +0200 | [diff] [blame] | 1296 | function f_DIAMETER_get_avp(PDU_DIAMETER pdu, template (present) AVP_Code avp_code) |
| 1297 | return template (omit) AVP |
| 1298 | { |
| 1299 | var integer i; |
| 1300 | |
| 1301 | for (i := 0; i < lengthof(pdu.avps); i := i+1) { |
| 1302 | if (not ispresent(pdu.avps[i].avp)) { |
| 1303 | continue; |
| 1304 | } |
| 1305 | var AVP_Header hdr := pdu.avps[i].avp.avp_header; |
| 1306 | if (match(hdr.avp_code, avp_code)) { |
| 1307 | return pdu.avps[i].avp; |
| 1308 | } |
| 1309 | } |
| 1310 | return omit; |
| 1311 | } |
| 1312 | function f_DIAMETER_get_avp_or_fail(PDU_DIAMETER pdu, template (present) AVP_Code avp_code) |
| 1313 | return AVP |
| 1314 | { |
| 1315 | var template (omit) AVP avp; |
| 1316 | avp := f_DIAMETER_get_avp(pdu, avp_code); |
| 1317 | if (istemplatekind(avp, "omit")) { |
| 1318 | Misc_Helpers.f_shutdown(__BFILE__, __LINE__, fail, |
| 1319 | log2str("AVP ", avp_code, " not found in ", pdu)); |
| 1320 | } |
| 1321 | return valueof(avp); |
| 1322 | } |
| 1323 | |
| 1324 | function f_AVP_Grouped_get_avp(AVP_Grouped avp_grp, template (present) AVP_Code avp_code) |
| 1325 | return template (omit) AVP |
| 1326 | { |
| 1327 | var integer i; |
| 1328 | |
| 1329 | for (i := 0; i < lengthof(avp_grp); i := i+1) { |
| 1330 | if (not ispresent(avp_grp[i].avp)) { |
| 1331 | continue; |
| 1332 | } |
| 1333 | var AVP_Header hdr := avp_grp[i].avp.avp_header; |
| 1334 | if (match(hdr.avp_code, avp_code)) { |
| 1335 | return avp_grp[i].avp; |
| 1336 | } |
| 1337 | } |
| 1338 | return omit; |
| 1339 | } |
| 1340 | function f_AVP_Grouped_get_avp_or_fail(AVP_Grouped avp_grp, template (present) AVP_Code avp_code) |
| 1341 | return AVP |
| 1342 | { |
| 1343 | var template (omit) AVP avp; |
| 1344 | avp := f_AVP_Grouped_get_avp(avp_grp, avp_code); |
| 1345 | if (istemplatekind(avp, "omit")) { |
| 1346 | Misc_Helpers.f_shutdown(__BFILE__, __LINE__, fail, |
| 1347 | log2str("AVP ", avp_code, " not found in ", avp_grp)); |
| 1348 | } |
| 1349 | return valueof(avp); |
| 1350 | } |
| 1351 | |
Pau Espin Pedrol | 462f3df | 2023-10-16 18:10:55 +0200 | [diff] [blame] | 1352 | |
| 1353 | /***************************** |
| 1354 | * Cx, Dx, 3GPP TS 29.229 |
| 1355 | *****************************/ |
| 1356 | /* SIP-Auth-Data-Item, 3GPP TS 29.229 6.3.8 */ |
| 1357 | template (present) GenericAVP tr_AVP_3GPP_SIPNumAuthDataItems(template (present) uint32_t num := ?) := { |
| 1358 | avp := { |
| 1359 | avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_CxDx_3GPP_SIP_Number_Auth_Items), |
| 1360 | avp_data := { |
| 1361 | avp_CxDx_3GPP_SIP_Number_Auth_Items := int2oct_tmpl(num, 4) /* CxDx_3GPP_SIP_Number_Auth_Items */ |
| 1362 | } |
| 1363 | } |
| 1364 | } |
| 1365 | template (value) GenericAVP ts_AVP_3GPP_SIPNumAuthDataItems(uint32_t num) := { |
| 1366 | avp := { |
| 1367 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_CxDx_3GPP_SIP_Number_Auth_Items), |
| 1368 | avp_data := { |
| 1369 | avp_CxDx_3GPP_SIP_Number_Auth_Items := int2oct(num, 4) /* CxDx_3GPP_SIP_Number_Auth_Items */ |
| 1370 | } |
| 1371 | } |
| 1372 | } |
| 1373 | |
| 1374 | /* SIP-Authentication-Scheme, 3GPP TS 29.229 6.3.9 */ |
| 1375 | template (present) GenericAVP tr_AVP_3GPP_SIPAuthScheme(template (present) CxDx_3GPP_SIP_Authentication_Scheme scheme := ?) := { |
| 1376 | avp := { |
| 1377 | avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_CxDx_3GPP_SIP_Authentication_Scheme), |
| 1378 | avp_data := { |
| 1379 | avp_CxDx_3GPP_SIP_Authentication_Scheme := scheme |
| 1380 | } |
| 1381 | } |
| 1382 | } |
| 1383 | template (value) GenericAVP ts_AVP_3GPP_SIPAuthScheme(template (value) CxDx_3GPP_SIP_Authentication_Scheme scheme) := { |
| 1384 | avp := { |
| 1385 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_CxDx_3GPP_SIP_Authentication_Scheme), |
| 1386 | avp_data := { |
| 1387 | avp_CxDx_3GPP_SIP_Authentication_Scheme := scheme |
| 1388 | } |
| 1389 | } |
| 1390 | } |
| 1391 | |
| 1392 | /* SIP-Authenticate, 3GPP TS 29.229 6.3.10 */ |
| 1393 | template (present) GenericAVP tr_AVP_3GPP_SIPAuthenticate(template (present) CxDx_3GPP_SIP_Authenticate rand_autn_concatenated := ?) := { |
| 1394 | avp := { |
| 1395 | avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_CxDx_3GPP_SIP_Authenticate), |
| 1396 | avp_data := { |
| 1397 | avp_CxDx_3GPP_SIP_Authenticate := rand_autn_concatenated |
| 1398 | } |
| 1399 | } |
| 1400 | } |
| 1401 | template (value) GenericAVP ts_AVP_3GPP_SIPAuthenticate(template (value) CxDx_3GPP_SIP_Authenticate rand_autn_concatenated) := { |
| 1402 | avp := { |
| 1403 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_CxDx_3GPP_SIP_Authenticate), |
| 1404 | avp_data := { |
| 1405 | avp_CxDx_3GPP_SIP_Authenticate := rand_autn_concatenated |
| 1406 | } |
| 1407 | } |
| 1408 | } |
| 1409 | |
| 1410 | /* SIP-Authorization, 3GPP TS 29.229 6.3.11 */ |
| 1411 | template (present) GenericAVP tr_AVP_3GPP_SIPAuthorization(template (present) CxDx_3GPP_SIP_Authorization rand_autn_concatenated := ?) := { |
| 1412 | avp := { |
| 1413 | avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_CxDx_3GPP_SIP_Authorization), |
| 1414 | avp_data := { |
| 1415 | avp_CxDx_3GPP_SIP_Authorization := rand_autn_concatenated |
| 1416 | } |
| 1417 | } |
| 1418 | } |
| 1419 | template (value) GenericAVP ts_AVP_3GPP_SIPAuthorization(template (value) CxDx_3GPP_SIP_Authorization rand_autn_concatenated) := { |
| 1420 | avp := { |
| 1421 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_CxDx_3GPP_SIP_Authorization), |
| 1422 | avp_data := { |
| 1423 | avp_CxDx_3GPP_SIP_Authorization := rand_autn_concatenated |
| 1424 | } |
| 1425 | } |
| 1426 | } |
| 1427 | |
| 1428 | /* SIP-Authentication-Context, 3GPP TS 29.229 6.3.12 */ |
| 1429 | template (present) GenericAVP tr_AVP_3GPP_SIPAuthContext(template (present) CxDx_3GPP_SIP_Authentication_Context val := ?) := { |
| 1430 | avp := { |
| 1431 | avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_CxDx_3GPP_SIP_Authentication_Context), |
| 1432 | avp_data := { |
| 1433 | avp_CxDx_3GPP_SIP_Authentication_Context := val |
| 1434 | } |
| 1435 | } |
| 1436 | } |
| 1437 | template (value) GenericAVP ts_AVP_3GPP_SIPAuthContext(template (value) CxDx_3GPP_SIP_Authentication_Context val) := { |
| 1438 | avp := { |
| 1439 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_CxDx_3GPP_SIP_Authentication_Context), |
| 1440 | avp_data := { |
| 1441 | avp_CxDx_3GPP_SIP_Authentication_Context := val |
| 1442 | } |
| 1443 | } |
| 1444 | } |
| 1445 | |
| 1446 | /* SIP-Item-Number, 3GPP TS 29.229 6.3.14 */ |
| 1447 | template (present) GenericAVP tr_AVP_3GPP_SIPItemNumber(template (present) uint32_t num := ?) := { |
| 1448 | avp := { |
| 1449 | avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_CxDx_3GPP_SIP_Item_Number), |
| 1450 | avp_data := { |
| 1451 | avp_CxDx_3GPP_SIP_Item_Number := int2oct_tmpl(num, 4) /* CxDx_3GPP_SIP_Item_Number */ |
| 1452 | } |
| 1453 | } |
| 1454 | } |
| 1455 | template (value) GenericAVP ts_AVP_3GPP_SIPItemNumber(uint32_t num) := { |
| 1456 | avp := { |
| 1457 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_CxDx_3GPP_SIP_Item_Number), |
| 1458 | avp_data := { |
| 1459 | avp_CxDx_3GPP_SIP_Item_Number := int2oct(num, 4) /* CxDx_3GPP_SIP_Item_Number */ |
| 1460 | } |
| 1461 | } |
| 1462 | } |
| 1463 | |
| 1464 | /* Confidentiality-Key, 3GPP TS 29.229 6.3.27 */ |
| 1465 | template (present) GenericAVP tr_AVP_3GPP_ConfidentialityKey(template (present) CxDx_3GPP_Confidentiality_Key ckey := ?) := { |
| 1466 | avp := { |
| 1467 | avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_CxDx_3GPP_Confidentiality_Key), |
| 1468 | avp_data := { |
| 1469 | avp_CxDx_3GPP_Confidentiality_Key := ckey |
| 1470 | } |
| 1471 | } |
| 1472 | } |
| 1473 | template (value) GenericAVP ts_AVP_3GPP_ConfidentialityKey(template (value) CxDx_3GPP_Confidentiality_Key ckey) := { |
| 1474 | avp := { |
| 1475 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_CxDx_3GPP_Confidentiality_Key), |
| 1476 | avp_data := { |
| 1477 | avp_CxDx_3GPP_Confidentiality_Key := ckey |
| 1478 | } |
| 1479 | } |
| 1480 | } |
| 1481 | |
| 1482 | /* Inegrity-Key, 3GPP TS 29.229 6.3.28 */ |
| 1483 | template (present) GenericAVP tr_AVP_3GPP_IntegrityKey(template (present) CxDx_3GPP_Integrity_Key ckey := ?) := { |
| 1484 | avp := { |
| 1485 | avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_CxDx_3GPP_Integrity_Key), |
| 1486 | avp_data := { |
| 1487 | avp_CxDx_3GPP_Integrity_Key := ckey |
| 1488 | } |
| 1489 | } |
| 1490 | } |
| 1491 | template (value) GenericAVP ts_AVP_3GPP_IntegrityKey(template (value) CxDx_3GPP_Integrity_Key ckey) := { |
| 1492 | avp := { |
| 1493 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_CxDx_3GPP_Integrity_Key), |
| 1494 | avp_data := { |
| 1495 | avp_CxDx_3GPP_Integrity_Key := ckey |
| 1496 | } |
| 1497 | } |
| 1498 | } |
| 1499 | |
Pau Espin Pedrol | 965ac64 | 2023-10-16 18:12:45 +0200 | [diff] [blame] | 1500 | /* Server-Assignment-Type, 3GPP TS 29.273 8.2.3.12, 3GPP TS 29.229 6.3.15 */ |
| 1501 | template (present) GenericAVP tr_AVP_3GPP_ServerAssignmentType(template (present) CxDx_3GPP_Server_Assignment_Type t := ?) := { |
| 1502 | avp := { |
| 1503 | avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_CxDx_3GPP_Server_Assignment_Type), |
| 1504 | avp_data := { |
| 1505 | avp_CxDx_3GPP_Server_Assignment_Type := t |
| 1506 | } |
| 1507 | } |
| 1508 | } |
| 1509 | template (value) GenericAVP ts_AVP_3GPP_ServerAssignmentType(template (value) CxDx_3GPP_Server_Assignment_Type t) := { |
| 1510 | avp := { |
| 1511 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_CxDx_3GPP_Server_Assignment_Type), |
| 1512 | avp_data := { |
| 1513 | avp_CxDx_3GPP_Server_Assignment_Type := t |
| 1514 | } |
| 1515 | } |
| 1516 | } |
| 1517 | |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 1518 | } |