Add Definitions for GPRS coding schemes
diff --git a/library/GSM_Types.ttcn b/library/GSM_Types.ttcn
index 6086092..600a714 100644
--- a/library/GSM_Types.ttcn
+++ b/library/GSM_Types.ttcn
@@ -18,6 +18,10 @@
type uint32_t GsmTmsi;
type uint32_t GprsTlli;
+ type enumerated GprsCodingScheme {
+ CS1, CS2, CS3, CS4
+ };
+
/* 10.5.2.8 */
type enumerated ChannelNeeded {
CHAN_NEED_ANY (0),
@@ -84,6 +88,7 @@
template RslChannelNr t_RslChanNr_BCCH(template uint3_t tn) := t_RslChanNr0(tn, RSL_CHAN_NR_BCCH);
template RslChannelNr t_RslChanNr_PCH_AGCH(template uint3_t tn) := t_RslChanNr0(tn, RSL_CHAN_NR_PCH_AGCH);
template RslChannelNr t_RslChanNr_Bm(template uint3_t tn) := t_RslChanNr0(tn, RSL_CHAN_NR_Bm_ACCH);
+ template RslChannelNr t_RslChanNr_PDCH(template uint3_t tn) := t_RslChanNr0(tn, RSL_CHAN_NR_OSMO_PDCH);
template RslChannelNr t_RslChanNr_Lm(template uint3_t tn, uint1_t sub_slot) := {
u := { lm := { tag := '0001'B, sub_chan := sub_slot } },
tn := tn
diff --git a/library/L1CTL_Types.ttcn b/library/L1CTL_Types.ttcn
index f687c95..00323b4 100644
--- a/library/L1CTL_Types.ttcn
+++ b/library/L1CTL_Types.ttcn
@@ -58,6 +58,22 @@
NEIGH_MODE_SB
} with { variant "FIELDLENGTH(8)" };
+ type enumerated L1ctlGprsCs {
+ L1CTL_CS1 (1),
+ L1CTL_CS2,
+ L1CTL_CS3,
+ L1CTL_CS4,
+ L1CTL_MCS1,
+ L1CTL_MCS2,
+ L1CTL_MCS3,
+ L1CTL_MCS4,
+ L1CTL_MCS5,
+ L1CTL_MCS6,
+ L1CTL_MCS7,
+ L1CTL_MCS8,
+ L1CTL_MCS9
+ } with { variant "FIELDLENGTH(8)" };
+
type enumerated L1ctlResetType {
L1CTL_RES_T_BOOT (0),
L1CTL_RES_T_FULL,
@@ -170,7 +186,8 @@
type record L1ctlUlTbfInfo {
uint8_t tbf_nr,
- OCT3 padding
+ L1ctlGprsCs cs,
+ OCT2 padding
} with { variant "" };
type record L1ctlFbsbFlags {
@@ -464,12 +481,13 @@
}
};
- template L1ctlUlMessage t_L1CTL_DATA_TBF_REQ(octetstring l2_data, uint8_t tbf_nr := 0) := {
+ template L1ctlUlMessage t_L1CTL_DATA_TBF_REQ(octetstring l2_data, L1ctlGprsCs cs := L1CTL_CS1, uint8_t tbf_nr := 0) := {
header := t_L1ctlHeader(L1CTL_DATA_TBF_REQ),
ul_info := omit,
ul_info_tbf := {
tbf_nr := tbf_nr,
- padding := '000000'O
+ cs := cs,
+ padding := '0000'O
},
payload := {
other := l2_data