From 1b9b77096d1b2384a1187079ceae47dce34bb88c Mon Sep 17 00:00:00 2001
From: Harald Welte <laforge@gnumonks.org>
Date: Sun, 30 Jul 2017 04:19:14 +0200
Subject: GSM_RR_Types: Parse PacketChannelDescription

---
 library/GSM_RR_Types.ttcn | 31 ++++++++++++++++++++++++++++++-
 1 file changed, 30 insertions(+), 1 deletion(-)

(limited to 'library')

diff --git a/library/GSM_RR_Types.ttcn b/library/GSM_RR_Types.ttcn
index 436273af..eed58df4 100644
--- a/library/GSM_RR_Types.ttcn
+++ b/library/GSM_RR_Types.ttcn
@@ -268,7 +268,36 @@ module GSM_RR_Types {
 	} with { variant (len) "LENGTHTO(ma)" };
 
 	/* 10.5.2.25a */
-	type OCT3 PacketChannelDescription;
+	type record PktChDesc0Ind {
+		uint6_t		maio,
+		BIT1		ma_number_ind,
+		BIT1		change_mark1_valid,
+		BIT2		change_mark1
+	} with { variant "" };
+	type record PktChDesc0 {
+		BIT1		hopping,
+		BIT1		spare ('0'B),
+		uint10_t	arfcn optional,
+		PktChDesc0Ind	indirect optional
+	} with {
+		variant (arfcn) "PRESENCE(hopping = '0'B)"
+		variant (indirect) "PRESENCE(hopping = '1'B)"
+	};
+	type record PktChDesc1 {
+		uint6_t		maio,
+		uint6_t		hsn
+	} with { variant "" };
+	type record PacketChannelDescription {
+		uint5_t		channel_Type_spare,
+		uint3_t		tn,
+		uint3_t		tsc,
+		BIT1		presence,
+		PktChDesc0	zero optional,
+		PktChDesc1	one optional
+	} with {
+		variant (zero)	"PRESENCE(presence = '0'B)"
+		variant (one)	"PRESENCE(presence = '1'B)"
+	};
 
 	/* 10.5.2.25b */
 	type record DedicatedModeOrTbf {
-- 
cgit v1.2.3