GTP_Templates: Add templates for some GTPv1C IEs

Change-Id: I84aac34ca40a2707dc9da28e112fd7684e706c8e
This commit is contained in:
Pau Espin 2024-01-09 10:25:15 +01:00 committed by pespin
parent 5389e3a625
commit f95460b55b
1 changed files with 315 additions and 45 deletions

View File

@ -162,6 +162,77 @@ module GTP_Templates {
ptmsi_Signature := ptmsi_sig
}
/* MS Validated - 7.7.10 */
template (value) MS_Validated ts_MS_Validated(template (value) BIT1 msValidated) := {
type_gtpc := '0D'O,
msValidated := msValidated,
spare := '1111111'B
}
template (present) MS_Validated tr_MS_Validated(template (present) BIT1 msValidated := ?) := {
type_gtpc := '0D'O,
msValidated := msValidated,
spare := '1111111'B
}
function f_tr_MS_Validated(template BIT1 msValidated := *) return template MS_Validated {
if (istemplatekind(msValidated, "omit")) {
return omit;
} else if (istemplatekind(msValidated, "*")) {
return *;
} else {
return tr_MS_Validated(msValidated);
}
}
private function f_ts_MS_Validated(template (omit) BIT1 msValidated)
return template (omit) MS_Validated {
if (istemplatekind(msValidated, "omit")) {
return omit;
}
return ts_MS_Validated(msValidated);
}
/* 7.7.13 TEI Data I */
template (value) TeidDataI ts_TeidDataI(template (value) OCT4 teid) := {
type_gtpc := '10'O,
teidDataI := teid
}
template (present) TeidDataI tr_TeidDataI(template (present) OCT4 teid := ?) := {
type_gtpc := '10'O,
teidDataI := teid
}
/* 7.7.14 TEI Control Plane */
template (value) TeidControlPlane ts_TEIC(template (value) OCT4 teic) := {
type_gtpc := '11'O,
teidControlPlane := teic
}
template (present) TeidControlPlane tr_TEIC(template (present) OCT4 teic := ?) := {
type_gtpc := '11'O,
teidControlPlane := teic
}
private function f_ts_TEIC(template (omit) OCT4 teic)
return template (omit) TeidControlPlane {
if (istemplatekind(teic, "omit")) {
return omit;
}
return ts_TEIC(teic);
}
/* 7.7.15 Tunnel Endpoint Identifier Data II */
template (value) TeidDataII ts_TeidDataII(template (value) BIT4 nsapi,
template (value) OCT4 teid) := {
type_gtpc := '12'O,
nsapi := nsapi,
unused := '0000'B,
teidDataII := teid
}
template (present) TeidDataII tr_TeidDataII(template (present) BIT4 nsapi := ?,
template (present) OCT4 teid := ?) := {
type_gtpc := '12'O,
nsapi := nsapi,
unused := '0000'B,
teidDataII := teid
}
/* IMEI(SV) IE TS 29.060 7.7.53 */
template (value) IMEISV_gtpc ts_IMEISV(template (value) OCT8 imeisv) := {
type_gtpc := '9A'O,
@ -236,6 +307,82 @@ module GTP_Templates {
chargingChar := chargingChar
}
/* 7.7.28 MM Context */
template (value) MM_Context ts_MM_ContextUMTS(template (value) OCT16 ck,
template (value) OCT16 ik) := {
type_gtpc := '81'O,
context := {
mmcontUMTS := {
lengthf := 0, /* overwritten */
ksi := '001'B,
usedGPRSIntegrityAlgorithm := '000'B,
ugipai := '1'B, /* Integrity Protection not required */
gupii := '1'B, /* Ignore "Used GPRS integrity protection algorithm" field" */
spare1 := '000'B,
noofVectors := 0, /* TODO: fill quintpuplets*/
security := '01'B, /* UMTS key and quintuplets */
ck := ck,
ik := ik,
quintupletlength := 0, /* overwritten */
quintuplet := ''O,
drx_par := '0000'O,
msNetW_cap_length := 0, /* overwritten */
msNetw_cap := omit,
containerLength := 0, /* overwritten */
container := omit,
access_restriction_data_length := 0, /* overwritten */
access_restriction_data := omit
}
}
}
/* 7.7.29 PDP Context */
template (value) PDP_Context_GTPC ts_PDP_Context_GTPC(template (value) octetstring pdp_addr,
template (value) octetstring ggsn_gsn_addr,
template (value) octetstring apn,
template (value) OCT4 ggsn_teic := '12345678'O,
template (value) OCT4 ggsn_teid := '87654321'O) := {
type_gtpc := '82'O,
lengthf := 0, /* overwritten */
nsapi := '0101'B,
order := '0'B,
asi := '0'B,
vaa := '0'B,
ea := '0'B,
sapi := '0011'B,
spare1 := '0000'B,
qos_subLength := 0, /* overwritten */
qos_sub := ts_QosProfileValueDefault,
qos_reqLength := 0, /* overwritten */
qos_req := ts_QosProfileValueDefault,
qos_negLength := 0, /* overwritten */
qos_neg := ts_QosProfileValueDefault,
snd := '0000'O,
snu := '0000'O,
sendNPDUnum := '00'O,
receiveNPDUnum := '00'O,
uteidControlPlane := ggsn_teic,
uteidData1 := ggsn_teid,
pdpcontext := '00'O,
pdp_typeorg := '0001'B, /* IETF */
spare2 := '1111'B,
pdp_typenum := '21'O, /* IETF IPV4 */
pdp_addressLength := 0, /* overwritten */
pdp_address := pdp_addr,
ggsn_addressControlPlaneLength := 0, /* overwritten */
ggsn_addressControlPlane := ggsn_gsn_addr,
ggsn_addressUserPlaneLength := 0, /* overwritten */
ggsn_addressUserPlane := ggsn_gsn_addr,
apnLength := 0, /* overwritten */
apn := apn,
transactionId := '0001'B,
spare3 := '0000'B,
transactionID_cont := '00'O,
pdp_typenum2 := omit,
pdp_addresslength2 := omit,
pdp_Address2 := omit
}
/* template matching reception of GTP-C unit-data */
template (present) Gtp1cUnitdata tr_GTPC_MsgType(template (present) GtpPeer peer,
@ -398,6 +545,11 @@ module GTP_Templates {
lengthf := lengthof(ip_addr),
addressf := ip_addr
}
template (present) GSN_Address_GTPC tr_GsnAddr(template (present) octetstring ip_addr := ?) := {
type_gtpc := '85'O,
lengthf := ?,
addressf := ip_addr
}
template (value) MSISDN ts_Msisdn(octetstring msisdn) := {
type_gtpc := '86'O,
@ -405,39 +557,46 @@ module GTP_Templates {
msisdn := msisdn
}
template (value) QoSV_GTPC ts_QosValueDefault := {
reliabilityClass := '011'B,
delayClass := '001'B,
spare1 := '00'B,
precedenceClass := '010'B,
spare2 := '0'B,
peakThroughput := '1001'B,
meanThroughput := '11111'B,
spare3 := '000'B,
deliverErroneusSDU := '010'B, /* Erroneus SDU are delivered */
deliveryOrder := '10'B, /* Without delivery order */
trafficClass := '100'B, /* Background */
maxSDUSize := '96'O, /* 1500 octets */
maxBitrateUplink := 'FE'O, /* 8640, continues in extended octet */
maxBitrateDownlink := 'FE'O, /* 8640, continues in extended octet */
sduErrorRatio := '0100'B, /* 1x10^-4 */
residualBER := '0101'B, /* 1x10^-3 */
trafficHandlingPriority := '01'B, /* prio 1 */
transferDelay := '000001'B, /* 10 ms */
guaranteedBitRateUplink := 'FE'O, /* 8640, continues in extended octet */
guaranteedBitRateDownlink := 'FE'O, /* 8640, continues in extended octet */
sourceStatisticsDescriptor := '0000'B, /* unknown */
signallingIndication := '0'B, /* Not optimized */
spare4 := '000'B,
maxBitrateDownlinkExt := '5B'O, /* 33 mbps */
guaranteedBitRateDownlinkExt := '5B'O, /* 33 mbps */
maxBitrateUplinkExt := '6e'O, /* 52 mbps */
guaranteedBitRateUplinkExt := '6e'O /* 52 mbps */
}
template (value) QualityOfServiceProfile_Value ts_QosProfileValueDefault := {
allocRetensionPrio := '00'O,
qos_ProfileValue := ts_QosValueDefault
}
template (value) QualityOfServiceProfile ts_QosDefault := {
type_gtpc := '87'O,
lengthf := 17,
allocRetensionPrio := '00'O,
qos_ProfileValue := {
reliabilityClass := '011'B,
delayClass := '001'B,
spare1 := '00'B,
precedenceClass := '010'B,
spare2 := '0'B,
peakThroughput := '1001'B,
meanThroughput := '11111'B,
spare3 := '000'B,
deliverErroneusSDU := '010'B, /* Erroneus SDU are delivered */
deliveryOrder := '10'B, /* Without delivery order */
trafficClass := '100'B, /* Background */
maxSDUSize := '96'O, /* 1500 octets */
maxBitrateUplink := 'FE'O, /* 8640, continues in extended octet */
maxBitrateDownlink := 'FE'O, /* 8640, continues in extended octet */
sduErrorRatio := '0100'B, /* 1x10^-4 */
residualBER := '0101'B, /* 1x10^-3 */
trafficHandlingPriority := '01'B, /* prio 1 */
transferDelay := '000001'B, /* 10 ms */
guaranteedBitRateUplink := 'FE'O, /* 8640, continues in extended octet */
guaranteedBitRateDownlink := 'FE'O, /* 8640, continues in extended octet */
sourceStatisticsDescriptor := '0000'B, /* unknown */
signallingIndication := '0'B, /* Not optimized */
spare4 := '000'B,
maxBitrateDownlinkExt := '5B'O, /* 33 mbps */
guaranteedBitRateDownlinkExt := '5B'O, /* 33 mbps */
maxBitrateUplinkExt := '6e'O, /* 52 mbps */
guaranteedBitRateUplinkExt := '6e'O /* 52 mbps */
}
qos_ProfileValue := ts_QosValueDefault
}
template (value) IMSI_gtpc ts_Imsi(hexstring digits) := {
@ -469,18 +628,41 @@ module GTP_Templates {
}
}
function f_ts_RATType(template (omit) OCT1 ratType := omit) return template (omit) RATType {
var template (omit) RATType rt;
if (istemplatekind(ratType, "omit")) {
rt := omit;
/* 7.7.50 RAT Type */
type enumerated GTP_RATType {
GTP_RAT_TYPE_RESERVED (0),
GTP_RAT_TYPE_UTRAN (1),
GTP_RAT_TYPE_GERAN (2),
GTP_RAT_TYPE_WLAN (3),
GTP_RAT_TYPE_GAN (4),
GTP_RAT_TYPE_HSPA_E (5),
GTP_RAT_TYPE_EUTRAN (6)
};
template (value) RATType ts_RATType(template (value) OCT1 rat_type) := {
type_gtpc := '97'O,
lengthf := 1,
ratTypeValue := rat_type
}
function f_ts_RATType(template (omit) OCT1 rat_type := omit) return template (omit) RATType {
if (istemplatekind(rat_type, "omit")) {
return omit;
} else {
rt := {
type_gtpc := '97'O,
lengthf := 1,
ratTypeValue := ratType
};
return ts_RATType(rat_type);
}
}
template (present) RATType tr_RATType(template (present) OCT1 rat_type) := {
type_gtpc := '97'O,
lengthf := 1,
ratTypeValue := rat_type
}
function f_tr_RATType(template OCT1 rat_type := *) return template RATType {
if (istemplatekind(rat_type, "omit")) {
return omit;
} else if (istemplatekind(rat_type, "*")) {
return *;
} else {
return tr_RATType(rat_type);
}
return rt;
}
template (value) RoutingAreaIdentity ts_RoutingAreaIdentity(template (value) hexstring mcc_digits,
@ -947,11 +1129,44 @@ module GTP_Templates {
}
/* SGSN Context Request - 7.5.3 */
template (present) GTPC_PDUs tr_SGSNContextReqPDU(template (present) RoutingAreaIdentity rai := ?,
template (present) OCT4 teic := ?,
template (present) octetstring sgsn_addr_control := ?,
template hexstring imsi := *,
template BIT1 msValidated := *,
template TLLI tlli := *,
template PacketTMSI ptmsi := *,
template PTMSI_Signature ptmsi_sig := *,
template OCT1 rat_type := *) := {
sgsn_ContextRequest := {
imsi := f_tr_Imsi(imsi),
routingAreaIdentity := rai,
tlli := tlli,
packetTMSI := ptmsi,
ptmsi_Signature := ptmsi_sig,
ms_Validated := f_tr_MS_Validated(msValidated),
teidControlPlane := {
type_gtpc := '11'O,
teidControlPlane := teic
},
sgsn_addr_controlPlane := tr_GsnAddr(sgsn_addr_control),
alternative_sgsn_addr_controlPlane := *,
sGSN_Number := *,
ratType := f_tr_RATType(rat_type),
hopCounter := *,
private_extension_gtpc := *
}
}
template (present) Gtp1cUnitdata tr_GTPC_SGSNContextReq(template (present) GtpPeer peer,
template (present) GTPC_PDUs SGSNContextReqPDU) := {
peer := peer,
gtpc := tr_GTP1C_PDU(sgsnContextRequest, '00000000'O, SGSNContextReqPDU)
}
template (value) GTPC_PDUs ts_SGSNContextReqPDU(template (value) RoutingAreaIdentity rai,
template (value) OCT4 teic,
template (value) octetstring sgsn_addr_control,
template (omit) hexstring imsi := omit,
template (value) BIT1 msValidated := '0'B,
template (omit) BIT1 msValidated := '0'B,
template (omit) TLLI tlli := omit,
template (omit) PacketTMSI ptmsi := omit,
template (omit) PTMSI_Signature ptmsi_sig := omit,
@ -962,11 +1177,7 @@ module GTP_Templates {
tlli := tlli,
packetTMSI := ptmsi,
ptmsi_Signature := ptmsi_sig,
ms_Validated := {
type_gtpc := '0D'O,
msValidated := msValidated,
spare := '1111111'B
},
ms_Validated := f_ts_MS_Validated(msValidated),
teidControlPlane := {
type_gtpc := '11'O,
teidControlPlane := teic
@ -1025,7 +1236,66 @@ module GTP_Templates {
template (present) GTPC_PDUs SGSNContextRespPDU := ?)
:= tr_GTPC_MsgType(peer, sgsnContextResponse, teid, SGSNContextRespPDU);
template (value) GTPC_PDUs ts_SGSNContextRespPDU(template (value) GTP_Cause cause,
template (omit) hexstring imsi := omit,
template (omit) OCT4 teic := omit,
template (omit) octetstring sgsn_addr_control := omit,
template (omit) MM_Context mm_context := omit,
template (omit) PDP_Context_GTPC_List pdp_ctx_list := omit) := {
sgsn_ContextResponse := {
cause := ts_Cause_gtpc(cause),
imsi := f_ts_Imsi(imsi),
teidControlPlane := f_ts_TEIC(teic),
rabContext := omit,
radioPrioritySMS := omit,
radioPriority := omit,
packetFlowID := omit,
charging_char := omit,
mm_Context := mm_context,
pdp_Context := pdp_ctx_list,
sgsn_addr_controlPlane := ts_GsnAddr(sgsn_addr_control),
pdpContextPriorization := omit,
radioPriority_LCS := omit,
mBMS_UE_Context := omit,
subscribedRFSP_Index := omit,
rFSP_IndexInUse := omit,
colocatedGGSN_PGW_FQDN := omit,
evolvedAllocationRetentionPriorityII := omit,
extendedCommonFlags := omit,
ue_network_capability := omit,
ue_ambr := omit,
apn_ambr_nsapi := omit,
signallingPriorityIndication_nsapi := omit,
higher_bitrates_than_16mbps_flag := omit,
selectionMode_nsapi := omit,
localHomeNetworkID_nsapi := omit,
uE_UsageType := omit,
extendedCommonFlagsII := omit,
private_extension_gtpc := omit
}
}
template (value) Gtp1cUnitdata ts_GTPC_SGSNContextResp(GtpPeer peer, OCT4 teid, uint16_t seq,
template (value) GTPC_PDUs SGSNContextRespPDU) := {
peer := peer,
gtpc := ts_GTP1C_PDU(sgsnContextResponse, teid, valueof(SGSNContextRespPDU), seq)
}
/* SGSN Context Acknowledge - 7.5.5 */
template (present) GTPC_PDUs tr_SGSNContextAckPDU(template (present) GTP_Cause cause := ?) := {
sgsn_ContextAcknowledge := {
cause := tr_Cause_gtpc(cause),
teidDataII := *,
sgsn_AddressForUserTraffic := *,
sgsn_Number := *,
nodeIdentifier := *,
private_extension_gtpc := *
}
}
template (present) Gtp1cUnitdata tr_GTPC_SGSNContextAck(template (present) GtpPeer peer := ?,
template (present) OCT4 teid := ?,
template (present) GTPC_PDUs SGSNContextAckPDU := ?)
:= tr_GTPC_MsgType(peer, sgsnContextAcknowledge, teid, SGSNContextAckPDU);
template (value) GTPC_PDUs ts_SGSNContextAckPDU(template (value) GTP_Cause cause := GTP_CAUSE_REQUEST_ACCEPTED) := {
sgsn_ContextAcknowledge := {
cause := ts_Cause_gtpc(cause),