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 | |
| 12 | import from DIAMETER_Types all; |
| 13 | import from Osmocom_Types all; |
| 14 | |
| 15 | /* https://www.iana.org/assignments/aaa-parameters/aaa-parameters.xhtml#aaa-parameters-4 */ |
| 16 | type enumerated DIAMETER_Resultcode { |
| 17 | /* Informational */ |
| 18 | DIAMETER_MULTI_ROUND_AUTH (1001), |
| 19 | |
| 20 | /* Success */ |
| 21 | DIAMETER_SUCCESS (2001), |
| 22 | DIAMETER_LIMITED_SUCCESS (2002), |
| 23 | DIAMETER_FIRST_REGISTRATION (2003), |
| 24 | DIAMETER_SUBSEQUENT_REGISTRATION (2004), |
| 25 | DIAMETER_UNREGISTERED_SERVICE (2005), |
| 26 | DIAMETER_SUCCESS_SERVER_NAME_NOT_STORED (2006), |
| 27 | DIAMETER_SERVER_SELECTION (2007), |
| 28 | DIAMETER_SUCCESS_AUTH_SENT_SERVER_NOT_STORED (2008), |
| 29 | DIAMETER_SUCCESS_RELOCATE_HA (2009), |
| 30 | |
| 31 | /* Protocol Errors */ |
| 32 | DIAMETER_COMMAND_UNSUPPORTED (3001), |
| 33 | DIAMETER_UNABLE_TO_DELIVER (3002), |
| 34 | DIAMETER_REALM_NOT_SERVED (3003), |
| 35 | DIAMETER_TOO_BUSY (3004), |
| 36 | DIAMETER_LOOP_DETECTED (3005), |
| 37 | DIAMETER_REDIRECT_INDICATION (3006), |
| 38 | DIAMETER_APPLICATION_UNSUPPORTED (3007), |
| 39 | DIAMETER_INVALID_HDR_BITS (3008), |
| 40 | DIAMETER_INVALID_AVP_BITS (3009), |
| 41 | DIAMETER_UNKNOWN_PEER (3010), |
| 42 | DIAMETER_REALM_REDIRECT_INDICATION (3011), |
| 43 | |
| 44 | /* Transient Failures */ |
| 45 | DIAMETER_AUTHENTICATION_REJECTED (4001), |
| 46 | DIAMETER_OUT_OF_SPACE (4002), |
| 47 | ELECTION_LOST (4003), |
| 48 | DIAMETER_ERROR_MIP_REPLY_FAILURE (4005), |
| 49 | DIAMETER_ERROR_HA_NOT_AVAILABLE (4006), |
| 50 | DIAMETER_ERROR_BAD_KEY (4007), |
| 51 | DIAMETER_ERROR_MIP_FILTER_NOT_SUPPORTED (4008), |
| 52 | DIAMETER_END_USER_SERVICE_DENIED (4010), |
| 53 | DIAMETER_CREDIT_CONTROL_NOT_APPLICABLE (4011), |
| 54 | DIAMETER_CREDIT_LIMIT_REACHED (4012), |
| 55 | DIAMETER_USER_NAME_REQUIRED (4013), |
| 56 | RESOURCE_FAILURE (4014), |
| 57 | |
| 58 | DIAMETER_AUTHENTICATION_DATA_UNAVAILABLE (4181), |
| 59 | DIAMETER_ERROR_CAMEL_SUBSCRIPTION_PRESENT (4882), |
| 60 | |
| 61 | /* Permanent Failure */ |
| 62 | DIAMETER_AVP_UNSUPPORTED (5001), |
| 63 | DIAMETER_UNKNOWN_SESSION_ID (5002), |
| 64 | DIAMETER_AUTHORIZATION_REJECTED (5003), |
| 65 | DIAMETER_INVALID_AVP_VALUE (5004), |
| 66 | DIAMETER_MISSING_AVP (5005), |
| 67 | DIAMETER_RESOURCES_EXCEEDED (5006), |
| 68 | DIAMETER_CONTRADICTING_AVPS (5007), |
| 69 | DIAMETER_AVP_NOT_ALLOWED (5008), |
| 70 | DIAMETER_AVP_OCCURS_TOO_MANY_TIMES (5009), |
| 71 | DIAMETER_NO_COMMON_APPLICATION (5010), |
| 72 | DIAMETER_UNSUPPORTED_VERSION (5011), |
| 73 | DIAMETER_UNABLE_TO_COMPLY (5012), |
| 74 | DIAMETER_INVALID_BIT_IN_HEADER (5013), |
| 75 | DIAMETER_INVALID_AVP_LENGTH (5014), |
| 76 | DIAMETER_INVALID_MESSAGE_LENGTH (5015), |
| 77 | DIAMETER_INVALID_AVP_BIT_COMBO (5016), |
| 78 | DIAMETER_NO_COMMON_SECURITY (5017), |
| 79 | DIAMETER_RADIUS_AVP_UNTRANSLATABLE (5018), |
| 80 | DIAMETER_ERROR_NO_FOREIGN_HA_SERVICE (5024), |
| 81 | DIAMETER_ERROR_END_TO_END_MIP_KEY_ENCRYPTION (5025), |
| 82 | DIAMETER_USER_UNKNOWN (5030), |
| 83 | DIAMETER_RATING_FAILED (5031), |
| 84 | DIAMETER_ERROR_USER_UNKNOWN (5032), |
| 85 | DIAMETER_ERROR_IDENTITIES_DONT_MATCH (5033), |
| 86 | DIAMETER_ERROR_IDENTITY_NOT_REGISTERED (5034), |
| 87 | DIAMETER_ERROR_ROAMING_NOT_ALLOWED (5035), |
| 88 | DIAMETER_ERROR_IDENTITY_ALREADY_REGISTERED (5036), |
| 89 | DIAMETER_ERROR_AUTH_SCHEME_NOT_SUPPORTED (5037), |
| 90 | DIAMETER_ERROR_IN_ASSIGNMENT_TYPE (5038), |
| 91 | DIAMETER_ERROR_TOO_MUCH_DATA (5039), |
| 92 | DIAMETER_ERROR_NOT_SUPPORTED_USER_DATA (5040), |
| 93 | DIAMETER_ERROR_MIP6_AUTH_MODE (5041), |
| 94 | UNKNOWN_BINDING_TEMPLATE_NAME (5042), |
| 95 | BINDING_FAILURE (5043), |
| 96 | MAX_BINDINGS_SET_FAILURE (5044), |
| 97 | MAXIMUM_BINDINGS_REACHED_FOR_ENDPOINT (5045), |
| 98 | SESSION_EXISTS (5046), |
| 99 | INSUFFICIENT_CLASSIFIERS (5047), |
| 100 | DIAMETER_ERROR_EAP_CODE_UNKNOWN (5048) |
| 101 | }; |
| 102 | |
| 103 | /* 3GPP TS 29.272 Section 7.1.8 */ |
Harald Welte | f9fb63e | 2020-04-26 18:07:19 +0200 | [diff] [blame] | 104 | const uint32_t c_DIAMETER_3GPP_Gx_AID := 16777238; |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 105 | const uint32_t c_DIAMETER_3GPP_S6_AID := 16777251; |
| 106 | const uint32_t c_DIAMETER_3GPP_S13_AID := 16777252; |
| 107 | const uint32_t c_DIAMETER_3GPP_S7_AID := 16777308; |
| 108 | |
| 109 | template (value) PDU_DIAMETER |
| 110 | ts_DIAMETER(template (value) BIT8 flags, |
| 111 | template (value) Command_Code cmd_code, |
| 112 | template (value) OCTET4 app_id := '00000000'O, |
| 113 | template (value) UINT32 hbh_id, |
| 114 | template (value) UINT32 ete_id, |
| 115 | template (value) AVP_list avps := {} |
| 116 | ) := { |
| 117 | version := 1, |
| 118 | message_length := 0, /* overwritten */ |
| 119 | RPETxxxx := flags, |
| 120 | command_code := cmd_code, |
| 121 | application_id := app_id, |
| 122 | hop_by_hop_id := hbh_id, |
| 123 | end_to_end_id := ete_id, |
| 124 | avps := avps |
| 125 | } |
| 126 | template (present) PDU_DIAMETER |
| 127 | tr_DIAMETER(template (present) BIT8 flags := ?, |
| 128 | template (present) Command_Code cmd_code := ?, |
| 129 | template (present) OCTET4 app_id := ?, |
| 130 | template (present) UINT32 hbh_id := ?, |
| 131 | template (present) UINT32 ete_id := ?, |
| 132 | template (present) AVP_list avps := ?) := { |
| 133 | version := 1, |
| 134 | message_length := ?, |
| 135 | RPETxxxx := flags, |
| 136 | command_code := cmd_code, |
| 137 | application_id := app_id, |
| 138 | hop_by_hop_id := hbh_id, |
| 139 | end_to_end_id := ete_id, |
| 140 | avps := avps |
| 141 | } |
| 142 | template (present) PDU_DIAMETER |
| 143 | tr_DIAMETER_A( |
| 144 | template (present) Command_Code cmd_code := ?, |
| 145 | template (present) OCTET4 app_id := ?, |
| 146 | template (present) UINT32 hbh_id := ?, |
| 147 | template (present) UINT32 ete_id := ?, |
| 148 | template (present) AVP_list avps := ?) := |
| 149 | tr_DIAMETER('0???????'B, cmd_code, app_id, hbh_id, ete_id, avps); |
| 150 | template (present) PDU_DIAMETER |
| 151 | tr_DIAMETER_R( |
| 152 | template (present) Command_Code cmd_code := ?, |
| 153 | template (present) OCTET4 app_id := ?, |
| 154 | template (present) UINT32 hbh_id := ?, |
| 155 | template (present) UINT32 ete_id := ?, |
| 156 | template (present) AVP_list avps := ?) := |
| 157 | tr_DIAMETER('1???????'B, cmd_code, app_id, hbh_id, ete_id, avps); |
| 158 | |
| 159 | |
| 160 | template (value) AVP_Header |
| 161 | ts_DIA_Hdr(template (value) AVP_Code avp_code, |
| 162 | template (value) BIT8 flags := '01000000'B) := { |
| 163 | avp_code := avp_code, |
| 164 | VMPxxxxx := flags, |
| 165 | avp_length := 0, /* overwritten */ |
| 166 | vendor_id := omit |
| 167 | } |
| 168 | template (present) AVP_Header |
| 169 | tr_DIA_Hdr(template (present) AVP_Code avp_code, |
| 170 | template (present) BIT8 flags := '0???????'B) := { |
| 171 | avp_code := avp_code, |
| 172 | VMPxxxxx := flags, |
| 173 | avp_length := ?, /* overwritten */ |
| 174 | vendor_id := omit |
| 175 | } |
| 176 | |
| 177 | template (value) AVP_Header |
| 178 | ts_DIA_Hdr_3GPP(template (value) AVP_Code avp_code, |
| 179 | template (value) BIT8 flags := '11000000'B) := { |
| 180 | avp_code := avp_code, |
| 181 | VMPxxxxx := flags, |
| 182 | avp_length := 0, /* overwritten */ |
| 183 | vendor_id := vendor_id_3GPP |
| 184 | } |
| 185 | template (present) AVP_Header |
| 186 | tr_DIA_Hdr_3GPP(template (present) AVP_Code avp_code, |
| 187 | template (present) BIT8 flags := '1???????'B) := { |
| 188 | avp_code := avp_code, |
| 189 | VMPxxxxx := flags, |
| 190 | avp_length := ?, /* overwritten */ |
| 191 | vendor_id := vendor_id_3GPP |
| 192 | } |
| 193 | |
Harald Welte | f9fb63e | 2020-04-26 18:07:19 +0200 | [diff] [blame] | 194 | template (present) GenericAVP tr_SubcrIdType(template (present) DCC_NONE_Subscription_Id_Type t) := { |
| 195 | avp := { |
| 196 | avp_header := tr_DIA_Hdr(c_AVP_Code_DCC_NONE_Subscription_Id_Type), |
| 197 | avp_data := { |
| 198 | avp_DCC_NONE_Subscription_Id_Type := t |
| 199 | } |
| 200 | } |
| 201 | } |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 202 | |
| 203 | template (value) GenericAVP ts_AVP_OriginHost(template (value) charstring host) := { |
| 204 | avp := { |
| 205 | avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Origin_Host), |
| 206 | avp_data := { |
| 207 | avp_BASE_NONE_Origin_Host := host |
| 208 | } |
| 209 | } |
| 210 | } |
| 211 | template (present) GenericAVP tr_AVP_OriginHost(template (present) charstring host := ?) := { |
| 212 | avp := { |
| 213 | avp_header := tr_DIA_Hdr(c_AVP_Code_BASE_NONE_Origin_Host), |
| 214 | avp_data := { |
| 215 | avp_BASE_NONE_Origin_Host := host |
| 216 | } |
| 217 | } |
| 218 | } |
| 219 | |
| 220 | |
| 221 | template (value) GenericAVP ts_AVP_OriginRealm(template (value) charstring realm) := { |
| 222 | avp := { |
| 223 | avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Origin_Realm), |
| 224 | avp_data := { |
| 225 | avp_BASE_NONE_Origin_Realm := realm |
| 226 | } |
| 227 | } |
| 228 | } |
| 229 | template (present) GenericAVP tr_AVP_OriginRealm(template (present) charstring realm := ?) := { |
| 230 | avp := { |
| 231 | avp_header := tr_DIA_Hdr(c_AVP_Code_BASE_NONE_Origin_Realm), |
| 232 | avp_data := { |
| 233 | avp_BASE_NONE_Origin_Realm := realm |
| 234 | } |
| 235 | } |
| 236 | } |
| 237 | |
| 238 | |
| 239 | template (value) GenericAVP ts_AVP_OriginStateId(template (value) OCTET4 state_id) := { |
| 240 | avp := { |
| 241 | avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Origin_State_Id), |
| 242 | avp_data := { |
| 243 | avp_BASE_NONE_Origin_State_Id := state_id |
| 244 | } |
| 245 | } |
| 246 | } |
| 247 | |
| 248 | template (value) GenericAVP ts_AVP_HostIpAddr(template (value) OCTET4 ipv4_addr) := { |
| 249 | avp := { |
| 250 | avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Host_IP_Address), |
| 251 | avp_data := { |
| 252 | avp_BASE_NONE_Host_IP_Address := { |
| 253 | address_type := IP, |
| 254 | address_data := ipv4_addr |
| 255 | } |
| 256 | } |
| 257 | } |
| 258 | } |
| 259 | |
| 260 | template (value) GenericAVP ts_AVP_VendorId(Vendor_Id vendor_id) := { |
| 261 | avp := { |
| 262 | avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Vendor_Id, '00000000'B), |
| 263 | avp_data := { |
| 264 | avp_BASE_NONE_Vendor_Id := int2oct(enum2int(vendor_id), 4) |
| 265 | } |
| 266 | } |
| 267 | } |
| 268 | |
| 269 | template (value) GenericAVP ts_AVP_ProductName(charstring name) := { |
| 270 | avp := { |
| 271 | avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Product_Name, '00000000'B), |
| 272 | avp_data := { |
| 273 | avp_BASE_NONE_Product_Name := char2oct(name) |
| 274 | } |
| 275 | } |
| 276 | } |
| 277 | |
| 278 | template (value) GenericAVP ts_AVP_FwRevision(octetstring fw_version) := { |
| 279 | avp := { |
| 280 | avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Firmware_Revision, '00000000'B), |
| 281 | avp_data := { |
| 282 | avp_BASE_NONE_Firmware_Revision := fw_version |
| 283 | } |
| 284 | } |
| 285 | } |
| 286 | |
| 287 | template (value) GenericAVP ts_AVP_InbSecId(template (value) OCTET4 inb_sec_id) := { |
| 288 | avp := { |
| 289 | avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Inband_Security_Id), |
| 290 | avp_data := { |
| 291 | avp_BASE_NONE_Inband_Security_Id := inb_sec_id |
| 292 | } |
| 293 | } |
| 294 | } |
| 295 | |
| 296 | template (value) GenericAVP ts_AVP_VendorSpecAppId(Vendor_Id vendor_id, uint32_t auth_app_id) := { |
| 297 | avp := { |
| 298 | avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Vendor_Specific_Application_Id), |
| 299 | avp_data := { |
| 300 | avp_BASE_NONE_Vendor_Specific_Application_Id := { |
| 301 | { |
| 302 | avp := { |
| 303 | avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Vendor_Id), |
| 304 | avp_data := { |
| 305 | avp_BASE_NONE_Vendor_Id := int2oct(enum2int(vendor_id), 4) |
| 306 | } |
| 307 | } |
| 308 | }, { |
| 309 | avp := { |
| 310 | avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Auth_Application_Id), |
| 311 | avp_data := { |
| 312 | avp_BASE_NONE_Auth_Application_Id := int2oct(auth_app_id, 4) |
| 313 | } |
| 314 | } |
| 315 | } |
| 316 | } |
| 317 | } |
| 318 | } |
| 319 | } |
| 320 | |
| 321 | template (value) GenericAVP ts_AVP_AuthAppId(template (value) OCTET4 auth_app_id) := { |
| 322 | avp := { |
| 323 | avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Auth_Application_Id), |
| 324 | avp_data := { |
| 325 | avp_BASE_NONE_Auth_Application_Id := auth_app_id |
| 326 | } |
| 327 | } |
| 328 | } |
Harald Welte | f400151 | 2020-04-26 21:48:34 +0200 | [diff] [blame] | 329 | template (present) GenericAVP tr_AVP_AuthAppId(template (present) OCTET4 auth_app_id := ?) := { |
| 330 | avp := { |
| 331 | avp_header := tr_DIA_Hdr(c_AVP_Code_BASE_NONE_Auth_Application_Id), |
| 332 | avp_data := { |
| 333 | avp_BASE_NONE_Auth_Application_Id := auth_app_id |
| 334 | } |
| 335 | } |
| 336 | } |
| 337 | |
| 338 | template (value) GenericAVP ts_AVP_CcReqType(template (value) DCC_NONE_CC_Request_Type r) := { |
| 339 | avp := { |
| 340 | avp_header := ts_DIA_Hdr(c_AVP_Code_DCC_NONE_CC_Request_Type), |
| 341 | avp_data := { |
| 342 | avp_DCC_NONE_CC_Request_Type := r |
| 343 | } |
| 344 | } |
| 345 | } |
| 346 | template (present) GenericAVP tr_AVP_CcReqType(template (present) DCC_NONE_CC_Request_Type r := ?) := { |
| 347 | avp := { |
| 348 | avp_header := tr_DIA_Hdr(c_AVP_Code_DCC_NONE_CC_Request_Type), |
| 349 | avp_data := { |
| 350 | avp_DCC_NONE_CC_Request_Type := r |
| 351 | } |
| 352 | } |
| 353 | } |
| 354 | |
| 355 | template (value) GenericAVP ts_AVP_CcReqNum(template (value) AVP_Unsigned32 n) := { |
| 356 | avp := { |
| 357 | avp_header := ts_DIA_Hdr(c_AVP_Code_DCC_NONE_CC_Request_Number), |
| 358 | avp_data := { |
| 359 | avp_DCC_NONE_CC_Request_Number := n |
| 360 | } |
| 361 | } |
| 362 | } |
| 363 | template (present) GenericAVP tr_AVP_CcReqNum(template (present) AVP_Unsigned32 n := ?) := { |
| 364 | avp := { |
| 365 | avp_header := tr_DIA_Hdr(c_AVP_Code_DCC_NONE_CC_Request_Number), |
| 366 | avp_data := { |
| 367 | avp_DCC_NONE_CC_Request_Number := n |
| 368 | } |
| 369 | } |
| 370 | } |
| 371 | |
| 372 | |
| 373 | |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 374 | |
| 375 | template (value) GenericAVP ts_AVP_SuppVendorIdRaw(uint32_t vendor_id) := { |
| 376 | avp := { |
| 377 | avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Supported_Vendor_Id), |
| 378 | avp_data := { |
| 379 | avp_BASE_NONE_Supported_Vendor_Id := int2oct(vendor_id, 4) |
| 380 | } |
| 381 | } |
| 382 | } |
| 383 | template (value) GenericAVP ts_AVP_SuppVendorId(Vendor_Id vendor_id) := |
| 384 | ts_AVP_SuppVendorIdRaw(enum2int(vendor_id)); |
| 385 | |
| 386 | template (value) GenericAVP ts_AVP_ResultCode(DIAMETER_Resultcode res_code) := { |
| 387 | avp := { |
| 388 | avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Result_Code), |
| 389 | avp_data := { |
| 390 | avp_BASE_NONE_Result_Code := int2oct(enum2int(res_code), 4) |
| 391 | } |
| 392 | } |
| 393 | } |
| 394 | |
| 395 | template (value) GenericAVP ts_AVP_AuthSessionState(template (value) BASE_NONE_Auth_Session_State ass := NO_STATE_MAINTAINED) := { |
| 396 | avp := { |
| 397 | avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Auth_Session_State), |
| 398 | avp_data := { |
| 399 | avp_BASE_NONE_Auth_Session_State := ass |
| 400 | } |
| 401 | } |
| 402 | } |
| 403 | template (present) GenericAVP tr_AVP_AuthSessionState(template (present) BASE_NONE_Auth_Session_State ass := ?) := { |
| 404 | avp := { |
| 405 | avp_header := tr_DIA_Hdr(c_AVP_Code_BASE_NONE_Auth_Session_State), |
| 406 | avp_data := { |
| 407 | avp_BASE_NONE_Auth_Session_State := ass |
| 408 | } |
| 409 | } |
| 410 | } |
| 411 | |
| 412 | template (value) GenericAVP ts_AVP_SessionId(template (value) octetstring session_id) := { |
| 413 | avp := { |
| 414 | avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Session_Id), |
| 415 | avp_data := { |
| 416 | avp_BASE_NONE_Session_Id := session_id |
| 417 | } |
| 418 | } |
| 419 | } |
| 420 | template (present) GenericAVP tr_AVP_SessionId(template (present) octetstring session_id := ?) := { |
| 421 | avp := { |
| 422 | avp_header := tr_DIA_Hdr(c_AVP_Code_BASE_NONE_Session_Id), |
| 423 | avp_data := { |
| 424 | avp_BASE_NONE_Session_Id := session_id |
| 425 | } |
| 426 | } |
| 427 | } |
| 428 | |
| 429 | /* 3.3 Destination Realm */ |
| 430 | template (value) GenericAVP ts_AVP_DestinationRealm(template (value) charstring dest_realm) := { |
| 431 | avp := { |
| 432 | avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_Destination_Realm), |
| 433 | avp_data := { |
| 434 | avp_BASE_NONE_Destination_Realm := dest_realm |
| 435 | } |
| 436 | } |
| 437 | } |
| 438 | template (present) GenericAVP tr_AVP_DestinationRealm(template (present) charstring dest_realm := ?) := { |
| 439 | avp := { |
| 440 | avp_header := tr_DIA_Hdr(c_AVP_Code_BASE_NONE_Destination_Realm), |
| 441 | avp_data := { |
| 442 | avp_BASE_NONE_Destination_Realm := dest_realm |
| 443 | } |
| 444 | } |
| 445 | } |
| 446 | |
| 447 | /* 8.14 User-Name */ |
| 448 | template (value) GenericAVP ts_AVP_UserName(template (value) octetstring uid) := { |
| 449 | avp := { |
| 450 | avp_header := ts_DIA_Hdr(c_AVP_Code_BASE_NONE_User_Name), |
| 451 | avp_data := { |
| 452 | avp_BASE_NONE_User_Name := uid |
| 453 | } |
| 454 | } |
| 455 | } |
| 456 | template (present) GenericAVP tr_AVP_UserName(template (present) octetstring uid := ?) := { |
| 457 | avp := { |
| 458 | avp_header := tr_DIA_Hdr(c_AVP_Code_BASE_NONE_User_Name), |
| 459 | avp_data := { |
| 460 | avp_BASE_NONE_User_Name := uid |
| 461 | } |
| 462 | } |
| 463 | } |
| 464 | template (value) GenericAVP ts_AVP_UserNameImsi(hexstring imsi) := ts_AVP_UserName(char2oct(hex2str(imsi))); |
| 465 | template (present) GenericAVP tr_AVP_UserNameImsi(hexstring imsi) := tr_AVP_UserName(char2oct(hex2str(imsi))); |
| 466 | |
| 467 | |
| 468 | |
| 469 | /* TS 29.262 7.3.53 RAND */ |
| 470 | template (value) GenericAVP ts_AVP_RAND(template (value) octetstring rand) := { |
| 471 | avp := { |
| 472 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_RAND), |
| 473 | avp_data := { |
| 474 | avp_AAA_3GPP_RAND := rand |
| 475 | } |
| 476 | } |
| 477 | } |
| 478 | |
| 479 | /* TS 29.262 7.3.54 XRES */ |
| 480 | template (value) GenericAVP ts_AVP_XRES(template (value) octetstring xres) := { |
| 481 | avp := { |
| 482 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_XRES), |
| 483 | avp_data := { |
| 484 | avp_AAA_3GPP_XRES := xres |
| 485 | } |
| 486 | } |
| 487 | } |
| 488 | |
| 489 | /* TS 29.262 7.3.55 XRES */ |
| 490 | template (value) GenericAVP ts_AVP_AUTN(template (value) octetstring autn) := { |
| 491 | avp := { |
| 492 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_AUTN), |
| 493 | avp_data := { |
| 494 | avp_AAA_3GPP_AUTN := autn |
| 495 | } |
| 496 | } |
| 497 | } |
| 498 | |
| 499 | /* TS 29.262 7.3.56 KASME */ |
| 500 | template (value) GenericAVP ts_AVP_KASME(template (value) octetstring kasme) := { |
| 501 | avp := { |
| 502 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_KASME), |
| 503 | avp_data := { |
| 504 | avp_AAA_3GPP_KASME := kasme |
| 505 | } |
| 506 | } |
| 507 | } |
| 508 | |
| 509 | /* TS 29.262 7.3.23 Item-Number */ |
| 510 | template (value) GenericAVP ts_AVP_ItemNumber(uint32_t num) := { |
| 511 | avp := { |
| 512 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_KASME), |
| 513 | avp_data := { |
| 514 | avp_AAA_3GPP_Item_Number := int2oct(num, 4) |
| 515 | } |
| 516 | } |
| 517 | } |
| 518 | |
| 519 | /* TS 29.262 7.3.18 E-UTRAN Vector */ |
| 520 | template (value) GenericAVP ts_AVP_EutranVec(uint32_t item_num, octetstring rand, octetstring xres, |
| 521 | octetstring autn, octetstring kasme) := { |
| 522 | avp := { |
| 523 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_E_UTRAN_Vector), |
| 524 | avp_data := { |
| 525 | avp_AAA_3GPP_E_UTRAN_Vector := { |
| 526 | ts_AVP_ItemNumber(item_num), |
| 527 | ts_AVP_RAND(rand), |
| 528 | ts_AVP_XRES(xres), |
| 529 | ts_AVP_AUTN(autn), |
| 530 | ts_AVP_KASME(kasme) |
| 531 | } |
| 532 | } |
| 533 | } |
| 534 | } |
| 535 | |
| 536 | /* TS 29.262 7.3.2 Subscription-Data */ |
| 537 | template (value) GenericAVP ts_AVP_3GPP_SubscriptionData(template (value) AVP_list content) := { |
| 538 | avp := { |
| 539 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_Subscription_Data), |
| 540 | avp_data := { |
| 541 | avp_AAA_3GPP_Subscription_Data := content |
| 542 | } |
| 543 | } |
| 544 | } |
| 545 | |
| 546 | |
| 547 | /* TS 29.262 7.3.17 Authentication-Info */ |
| 548 | template (value) GenericAVP ts_AVP_3GPP_AuthInfo(template (value) AVP_list content) := { |
| 549 | avp := { |
| 550 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_Authentication_Info), |
| 551 | avp_data := { |
| 552 | avp_AAA_3GPP_Authentication_Info := content |
| 553 | } |
| 554 | } |
| 555 | } |
| 556 | |
| 557 | /* TS 29.262 7.3.9 Visited-PLMN-Id */ |
| 558 | template (value) GenericAVP ts_AVP_3GPP_VisitedPlmnId(template (value) octetstring id) := { |
| 559 | avp := { |
| 560 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_Visited_PLMN_Id), |
| 561 | avp_data := { |
| 562 | avp_AAA_3GPP_Visited_PLMN_Id := id |
| 563 | } |
| 564 | } |
| 565 | } |
| 566 | template (present) GenericAVP tr_AVP_3GPP_VisitedPlmnId(template (present) octetstring id := ?) := { |
| 567 | avp := { |
| 568 | avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_Visited_PLMN_Id), |
| 569 | avp_data := { |
| 570 | avp_AAA_3GPP_Visited_PLMN_Id := id |
| 571 | } |
| 572 | } |
| 573 | } |
| 574 | |
| 575 | /* TS 29.262 7.3.13 RAT-Type */ |
| 576 | template (value) GenericAVP ts_AVP_3GPP_RatType(template (value) PCC_3GPP_RAT_Type rat_type) := { |
| 577 | avp := { |
| 578 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_PCC_3GPP_RAT_Type), |
| 579 | avp_data := { |
| 580 | avp_PCC_3GPP_RAT_Type := rat_type |
| 581 | } |
| 582 | } |
| 583 | } |
| 584 | template (present) GenericAVP tr_AVP_3GPP_RatType(template (present) PCC_3GPP_RAT_Type rat_type := ?) := { |
| 585 | avp := { |
| 586 | avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_PCC_3GPP_RAT_Type), |
| 587 | avp_data := { |
| 588 | avp_PCC_3GPP_RAT_Type := rat_type |
| 589 | } |
| 590 | } |
| 591 | } |
| 592 | |
| 593 | /* TS 29.262 7.3.7 ULR-Flags */ |
| 594 | template (value) GenericAVP ts_AVP_3GPP_UlrFlags(template (value) UINT32 flags) := { |
| 595 | avp := { |
| 596 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_ULR_Flags), |
| 597 | avp_data := { |
| 598 | avp_AAA_3GPP_ULR_Flags := flags |
| 599 | } |
| 600 | } |
| 601 | } |
| 602 | template (present) GenericAVP tr_AVP_3GPP_UlrFlags(template (present) UINT32 flags := ?) := { |
| 603 | avp := { |
| 604 | avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_ULR_Flags), |
| 605 | avp_data := { |
| 606 | avp_AAA_3GPP_ULR_Flags := flags |
| 607 | } |
| 608 | } |
| 609 | } |
| 610 | |
| 611 | /* TS 29.262 7.3.8 ULA-Flags */ |
| 612 | template (value) GenericAVP ts_AVP_3GPP_UlaFlags(template (value) UINT32 flags) := { |
| 613 | avp := { |
| 614 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_ULA_Flags), |
| 615 | avp_data := { |
| 616 | avp_AAA_3GPP_ULA_Flags := flags |
| 617 | } |
| 618 | } |
| 619 | } |
| 620 | template (present) GenericAVP tr_AVP_3GPP_UlaFlags(template (present) UINT32 flags := ?) := { |
| 621 | avp := { |
| 622 | avp_header := tr_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_ULA_Flags), |
| 623 | avp_data := { |
| 624 | avp_AAA_3GPP_ULA_Flags := flags |
| 625 | } |
| 626 | } |
| 627 | } |
| 628 | |
Harald Welte | 6effabb | 2020-02-18 21:39:59 +0100 | [diff] [blame] | 629 | |
| 630 | |
| 631 | template (value) GenericAVP ts_AVP_NumOfReqVectors(template (value) UINT32 num_req := '00000004'O) := { |
| 632 | avp := { |
| 633 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_Number_Of_Requested_Vectors), |
| 634 | avp_data := { |
| 635 | avp_AAA_3GPP_Number_Of_Requested_Vectors := num_req |
| 636 | } |
| 637 | } |
| 638 | } |
| 639 | |
| 640 | template (value) GenericAVP ts_AVP_ImmReqPref(template (value) UINT32 par := '00000000'O) := { |
| 641 | avp := { |
| 642 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_Immediate_Response_Preferred), |
| 643 | avp_data := { |
| 644 | avp_AAA_3GPP_Immediate_Response_Preferred := par |
| 645 | } |
| 646 | } |
| 647 | } |
| 648 | |
| 649 | |
| 650 | /* 7.3.11 Requested-EUTRAN-Authentication-Info */ |
| 651 | template (value) GenericAVP ts_AVP_RequestedEutranAuthInfo(template (value) UINT32 num_vec := '00000004'O) := { |
| 652 | avp := { |
| 653 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_Requested_EUTRAN_Authentication_Info), |
| 654 | avp_data := { |
| 655 | avp_AAA_3GPP_Requested_EUTRAN_Authentication_Info := { |
| 656 | ts_AVP_NumOfReqVectors(num_vec), |
| 657 | ts_AVP_ImmReqPref('00000000'O) |
| 658 | } |
| 659 | } |
| 660 | } |
| 661 | } |
| 662 | |
| 663 | |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 664 | /* TS 29.262 7.3.27 Context-Identifier */ |
| 665 | template (value) GenericAVP ts_AVP_3GPP_ContextId(uint32_t ctx) := { |
| 666 | avp := { |
| 667 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_Context_Identifier), |
| 668 | avp_data := { |
| 669 | avp_AAA_3GPP_Context_Identifier := int2oct(ctx, 4) |
| 670 | } |
| 671 | } |
| 672 | } |
| 673 | |
| 674 | /* Ts 29.262 7.3.29 Subscriber-Status */ |
| 675 | template (value) GenericAVP ts_AVP_3GPP_SubscriberStatus(template (value) AAA_3GPP_Subscriber_Status sts) := { |
| 676 | avp := { |
| 677 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_Subscriber_Status), |
| 678 | avp_data := { |
| 679 | avp_AAA_3GPP_Subscriber_Status := sts |
| 680 | } |
| 681 | } |
| 682 | } |
| 683 | |
| 684 | template (value) GenericAVP ts_AVP_3GPP_SubscrRauTauTmr(uint32_t tmr) := { |
| 685 | avp := { |
| 686 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_Subscribed_Periodic_RAU_TAU_Timer), |
| 687 | avp_data := { |
| 688 | avp_AAA_3GPP_Subscribed_Periodic_RAU_TAU_Timer := int2oct(tmr, 4) |
| 689 | } |
| 690 | } |
| 691 | } |
| 692 | |
| 693 | /* TS 29.262 7.3.33 All-APN-Configurations-Included-Indicator */ |
| 694 | template (value) GenericAVP ts_AVP_3GPP_AllApnConfigsIncl(template (value) AAA_3GPP_All_APN_Configurations_Included_Indicator ind := All_APN_CONFIGURATIONS_INCLUDED) := { |
| 695 | avp := { |
| 696 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_All_APN_Configurations_Included_Indicator), |
| 697 | avp_data := { |
| 698 | avp_AAA_3GPP_All_APN_Configurations_Included_Indicator := ind |
| 699 | } |
| 700 | } |
| 701 | } |
| 702 | |
| 703 | /* TS 29.262 7.3.34 APN-Configuration-Profile */ |
| 704 | template (value) GenericAVP ts_AVP_3GPP_ApnConfigProfile(template (value) AVP_list content) := { |
| 705 | avp := { |
| 706 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_APN_Configuration_Profile), |
| 707 | avp_data := { |
| 708 | avp_AAA_3GPP_APN_Configuration_Profile := content |
| 709 | } |
| 710 | } |
| 711 | } |
| 712 | |
| 713 | /* TS 29.262 7.3.35 APN-Configuration */ |
| 714 | template (value) GenericAVP ts_AVP_3GPP_ApnConfig(uint32_t ctx, AAA_3GPP_PDN_Type pdn_type, |
| 715 | charstring apn) := { |
| 716 | avp := { |
| 717 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_APN_Configuration_Profile), |
| 718 | avp_data := { |
| 719 | avp_AAA_3GPP_APN_Configuration := { |
| 720 | ts_AVP_3GPP_ContextId(ctx), |
| 721 | ts_AVP_3GPP_PdnType(pdn_type), |
| 722 | ts_AVP_3GPP_EpsSubscrQosProfile(1, 1), |
| 723 | ts_AVP_ServiceSelection(apn) |
| 724 | } |
| 725 | } |
| 726 | } |
| 727 | } |
| 728 | |
| 729 | /* TS 29.262 7.3.36 Service-Selection (refers to RFC 5778) */ |
| 730 | template (value) GenericAVP ts_AVP_ServiceSelection(charstring apn) := { |
| 731 | avp := { |
| 732 | avp_header := ts_DIA_Hdr(c_AVP_Code_MIPv6_NONE_Service_Selection), |
| 733 | avp_data := { |
| 734 | avp_MIPv6_NONE_Service_Selection := char2oct(apn) |
| 735 | } |
| 736 | } |
| 737 | } |
| 738 | |
| 739 | template (value) GenericAVP ts_AVP_3GPP_QosClassId(uint32_t id) := { |
| 740 | avp := { |
| 741 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_PCC_3GPP_QoS_Class_Identifier), |
| 742 | avp_data := { |
| 743 | avp_PCC_3GPP_QoS_Class_Identifier := int2oct(id, 4) |
| 744 | } |
| 745 | } |
| 746 | } |
| 747 | |
| 748 | template (value) GenericAVP ts_AVP_3GPP_PriorityLevel(uint32_t prio) := { |
| 749 | avp := { |
| 750 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_PCC_3GPP_Priority_Level), |
| 751 | avp_data := { |
| 752 | avp_PCC_3GPP_Priority_Level := int2oct(prio, 4) |
| 753 | } |
| 754 | } |
| 755 | } |
| 756 | |
| 757 | |
| 758 | template (value) GenericAVP ts_AVP_3GPP_AllocRetenPrio(uint32_t prio) := { |
| 759 | avp := { |
| 760 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_PCC_3GPP_Allocation_Retention_Priority), |
| 761 | avp_data := { |
| 762 | avp_PCC_3GPP_Allocation_Retention_Priority := { |
| 763 | ts_AVP_3GPP_PriorityLevel(prio) |
| 764 | /* pre-emption capability */ |
| 765 | /* pre-emption vulnerability */ |
| 766 | } |
| 767 | } |
| 768 | } |
| 769 | } |
| 770 | |
| 771 | template (value) GenericAVP ts_AVP_3GPP_EpsSubscrQosProfile(uint32_t qos_class, uint32_t prio) := { |
| 772 | avp := { |
| 773 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_EPS_Subscribed_QoS_Profile), |
| 774 | avp_data := { |
| 775 | avp_AAA_3GPP_EPS_Subscribed_QoS_Profile := { |
| 776 | ts_AVP_3GPP_QosClassId(qos_class), |
| 777 | ts_AVP_3GPP_AllocRetenPrio(prio) |
| 778 | } |
| 779 | } |
| 780 | } |
| 781 | } |
| 782 | |
| 783 | |
| 784 | /* TS 29.262 7.3.41 AMBR */ |
| 785 | template (value) GenericAVP ts_AVP_3GPP_AMBR(uint32_t ul, uint32_t dl) := { |
| 786 | avp := { |
| 787 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_AMBR), |
| 788 | avp_data := { |
| 789 | avp_AAA_3GPP_AMBR := { |
| 790 | ts_AVP_3GPP_MaxReqBwUL(ul), |
| 791 | ts_AVP_3GPP_MaxReqBwDL(dl) |
| 792 | } |
| 793 | } |
| 794 | } |
| 795 | } |
| 796 | |
| 797 | template (value) GenericAVP ts_AVP_3GPP_MaxReqBwUL(uint32_t bw) := { |
| 798 | avp := { |
| 799 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_RX_3GPP_Max_Requested_Bandwidth_UL), |
| 800 | avp_data := { |
| 801 | avp_RX_3GPP_Max_Requested_Bandwidth_UL := int2oct(bw, 4) |
| 802 | } |
| 803 | } |
| 804 | } |
| 805 | |
| 806 | template (value) GenericAVP ts_AVP_3GPP_MaxReqBwDL(uint32_t bw) := { |
| 807 | avp := { |
| 808 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_RX_3GPP_Max_Requested_Bandwidth_DL), |
| 809 | avp_data := { |
| 810 | avp_RX_3GPP_Max_Requested_Bandwidth_DL := int2oct(bw, 4) |
| 811 | } |
| 812 | } |
| 813 | } |
| 814 | |
| 815 | |
| 816 | |
| 817 | /* TS 29.262 7.3.62 PDN-Type */ |
| 818 | template (value) GenericAVP ts_AVP_3GPP_PdnType(template (value) AAA_3GPP_PDN_Type pdn_type) := { |
| 819 | avp := { |
| 820 | avp_header := ts_DIA_Hdr_3GPP(c_AVP_Code_AAA_3GPP_PDN_Type), |
| 821 | avp_data := { |
| 822 | avp_AAA_3GPP_PDN_Type := pdn_type |
| 823 | } |
| 824 | } |
| 825 | } |
| 826 | |
| 827 | |
| 828 | |
| 829 | /* 5.3.2 Capabilities Exchange Answer */ |
| 830 | template (value) PDU_DIAMETER |
Harald Welte | 61f73d5 | 2020-04-26 21:41:12 +0200 | [diff] [blame] | 831 | ts_DIA_CEA(template (value) UINT32 hbh_id, template (value) UINT32 ete_id, |
| 832 | template (value) charstring origin_host, template (value) charstring origin_realm, |
| 833 | template (value) octetstring host_ip, uint32_t vendor_app_id) |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 834 | := ts_DIAMETER(flags:='00000000'B, cmd_code:=Capabilities_Exchange, hbh_id:=hbh_id, ete_id:=ete_id, |
| 835 | avps := { |
| 836 | ts_AVP_ResultCode(DIAMETER_SUCCESS), |
Harald Welte | 61f73d5 | 2020-04-26 21:41:12 +0200 | [diff] [blame] | 837 | ts_AVP_OriginHost(origin_host), |
| 838 | ts_AVP_OriginRealm(origin_realm), |
| 839 | ts_AVP_HostIpAddr(host_ip), |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 840 | ts_AVP_VendorId(vendor_id_3GPP), |
| 841 | ts_AVP_ProductName("TTCN-3 Testsuite"), |
| 842 | ts_AVP_OriginStateId('00000001'O), |
| 843 | ts_AVP_SuppVendorIdRaw(5535), /* 3GPP2 */ |
| 844 | ts_AVP_SuppVendorId(vendor_id_3GPP), |
| 845 | ts_AVP_SuppVendorIdRaw(13019), /* ETSI */ |
| 846 | ts_AVP_AuthAppId('FFFFFFFF'O), |
| 847 | ts_AVP_InbSecId('00000000'O), |
Harald Welte | 61f73d5 | 2020-04-26 21:41:12 +0200 | [diff] [blame] | 848 | ts_AVP_VendorSpecAppId(vendor_id_3GPP, vendor_app_id) |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 849 | }); |
| 850 | |
Harald Welte | 6effabb | 2020-02-18 21:39:59 +0100 | [diff] [blame] | 851 | |
| 852 | template (value) PDU_DIAMETER |
| 853 | ts_DIA_AIR(template (value) UINT32 hbh_id, template (value) UINT32 ete_id, |
| 854 | template (value) octetstring sess_id, |
| 855 | template (value) charstring dest_realm, hexstring imsi) |
| 856 | := ts_DIAMETER(flags:='00000000'B, cmd_code:=Authentication_Information, hbh_id:=hbh_id, ete_id:=ete_id, |
| 857 | avps := { |
| 858 | ts_AVP_SessionId(sess_id), |
| 859 | ts_AVP_DestinationRealm(dest_realm), |
| 860 | ts_AVP_UserNameImsi(imsi), |
| 861 | /* Requested EUTRAN Auth Info */ |
| 862 | ts_AVP_RequestedEutranAuthInfo, |
| 863 | ts_AVP_3GPP_VisitedPlmnId('11111F'O) |
| 864 | }); |
| 865 | |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 866 | template (present) PDU_DIAMETER |
| 867 | tr_DIA_AIR(hexstring imsi) := tr_DIAMETER(flags := '11000000'B, cmd_code:=Authentication_Information, |
| 868 | app_id := int2oct(c_DIAMETER_3GPP_S6_AID, 4), |
| 869 | avps := superset( |
| 870 | tr_AVP_SessionId, |
| 871 | tr_AVP_DestinationRealm, |
| 872 | tr_AVP_UserNameImsi(imsi), |
| 873 | tr_AVP_3GPP_VisitedPlmnId |
| 874 | )); |
| 875 | |
| 876 | /* TS 29.262 5.2.3.1 + 7.2.6 Authentication Information Answer */ |
| 877 | template (value) PDU_DIAMETER |
| 878 | ts_DIA_AIA(template (value) UINT32 hbh_id, template (value) UINT32 ete_id, |
| 879 | template (value) octetstring sess_id, |
| 880 | template (value) AVP_list auth_info_contents) |
| 881 | := ts_DIAMETER(flags:='01000000'B, cmd_code:=Authentication_Information, |
| 882 | app_id := int2oct(c_DIAMETER_3GPP_S6_AID, 4), hbh_id:=hbh_id, ete_id:=ete_id, |
| 883 | avps := { |
| 884 | ts_AVP_SessionId(sess_id), |
| 885 | ts_AVP_ResultCode(DIAMETER_SUCCESS), |
| 886 | ts_AVP_AuthSessionState(NO_STATE_MAINTAINED), |
| 887 | ts_AVP_OriginHost("hss.localdomain"), |
| 888 | ts_AVP_OriginRealm("localdomain"), |
| 889 | ts_AVP_3GPP_AuthInfo(auth_info_contents) |
| 890 | }); |
| 891 | |
| 892 | |
| 893 | /* TS 29.262 7.2.3 Update Location Request */ |
| 894 | template (present) PDU_DIAMETER |
| 895 | tr_DIA_ULR(hexstring imsi) := tr_DIAMETER(flags:='11000000'B, cmd_code:=Update_Location, |
| 896 | app_id:=int2oct(c_DIAMETER_3GPP_S6_AID, 4), |
| 897 | avps := superset( |
| 898 | tr_AVP_SessionId, |
| 899 | tr_AVP_AuthSessionState, |
| 900 | tr_AVP_OriginHost, |
| 901 | tr_AVP_OriginRealm, |
| 902 | tr_AVP_DestinationRealm, |
| 903 | tr_AVP_UserNameImsi(imsi), |
| 904 | tr_AVP_3GPP_RatType(EUTRAN), |
| 905 | tr_AVP_3GPP_UlrFlags, |
| 906 | tr_AVP_3GPP_VisitedPlmnId |
| 907 | )); |
| 908 | |
| 909 | template (value) PDU_DIAMETER |
| 910 | ts_DIA_ULA(template (value) UINT32 hbh_id, template (value) UINT32 ete_id, |
| 911 | template (value) octetstring sess_id, |
| 912 | template (value) AVP_list sub_data_content) |
| 913 | := ts_DIAMETER(flags:='01000000'B, cmd_code:=Update_Location, |
| 914 | app_id := int2oct(c_DIAMETER_3GPP_S6_AID, 4), hbh_id:=hbh_id, ete_id:=ete_id, |
| 915 | avps := { |
| 916 | ts_AVP_SessionId(sess_id), |
| 917 | ts_AVP_ResultCode(DIAMETER_SUCCESS), /* optional */ |
| 918 | ts_AVP_AuthSessionState(NO_STATE_MAINTAINED), |
| 919 | ts_AVP_OriginHost("hss.localdomain"), |
| 920 | ts_AVP_OriginRealm("localdomain"), |
| 921 | ts_AVP_3GPP_UlaFlags('00000002'O), |
| 922 | ts_AVP_3GPP_SubscriptionData(sub_data_content) |
| 923 | }); |
| 924 | |
| 925 | |
| 926 | |
Harald Welte | f400151 | 2020-04-26 21:48:34 +0200 | [diff] [blame] | 927 | /* RFC 4006 3.1. Credit-Control-Request (CCR) Command */ |
| 928 | template (present) PDU_DIAMETER |
| 929 | tr_DIA_CCR(template (present) DCC_NONE_CC_Request_Type req_type := INITIAL_REQUEST) |
| 930 | := tr_DIAMETER(flags:='11000000'B, cmd_code:=Credit_Control, |
| 931 | app_id:=int2oct(c_DIAMETER_3GPP_Gx_AID, 4), |
| 932 | avps := superset( |
| 933 | tr_AVP_SessionId, |
| 934 | tr_AVP_OriginHost, |
| 935 | tr_AVP_OriginRealm, |
| 936 | tr_AVP_DestinationRealm, |
| 937 | tr_AVP_AuthAppId(int2oct(c_DIAMETER_3GPP_Gx_AID, 4)), |
| 938 | tr_AVP_CcReqType(req_type), |
| 939 | tr_AVP_CcReqNum(?) |
| 940 | )); |
| 941 | |
| 942 | |
| 943 | /* RFC 4006 3.2. Credit-Control-Answer (CCA) Command */ |
| 944 | template (value) PDU_DIAMETER |
| 945 | ts_DIA_CCA(template (value) UINT32 hbh_id, template (value) UINT32 ete_id, |
| 946 | template (value) octetstring sess_id, |
| 947 | template (value) DCC_NONE_CC_Request_Type req_type, |
| 948 | template (value) AVP_Unsigned32 req_num) |
| 949 | |
| 950 | := ts_DIAMETER(flags:='01000000'B, cmd_code:=Credit_Control, |
| 951 | app_id:=int2oct(c_DIAMETER_3GPP_Gx_AID, 4), hbh_id:=hbh_id, ete_id:=ete_id, |
| 952 | avps := { |
| 953 | ts_AVP_SessionId(sess_id), |
| 954 | ts_AVP_ResultCode(DIAMETER_SUCCESS), |
| 955 | ts_AVP_OriginHost("pcrf.localdomain"), |
| 956 | ts_AVP_OriginRealm("localdomain"), |
| 957 | ts_AVP_AuthAppId(int2oct(c_DIAMETER_3GPP_Gx_AID, 4)), |
| 958 | ts_AVP_CcReqType(req_type), |
| 959 | ts_AVP_CcReqNum(req_num)//, |
| 960 | // qos |
| 961 | // default eps bearer qos |
| 962 | // supported features |
| 963 | // origin |
| 964 | }); |
| 965 | |
Harald Welte | d27ab24 | 2019-07-26 13:45:18 +0200 | [diff] [blame] | 966 | } |