From ae635c514359afbb7a730d62aba607c71bf0f015 Mon Sep 17 00:00:00 2001
From: Holger Hans Peter Freyther <zecke@selfish.org>
Date: Sun, 23 Dec 2012 16:20:39 +0100
Subject: [PATCH] gsm: Introduce all GSM04.08 CC attributes for GSM

---
 GSM48.st | 48 ++++++++++++++++++++++++++++++++++++++----------
 1 file changed, 38 insertions(+), 10 deletions(-)

diff --git a/GSM48.st b/GSM48.st
index 4adbfea..994b0bd 100644
--- a/GSM48.st
+++ b/GSM48.st
@@ -1980,16 +1980,44 @@ GSM48MSG subclass: GSM48CCMessage [
     GSM48CCMessage class >> isGSMBaseclass [ <category: 'factory'> ^ self = GSM48CCMessage ]
     GSM48CCMessage class >> classType [ ^ 16r3 ]
 
-    GSM48CCMessage class >> msgAlerting   [ ^ 16r1 ]
-    GSM48CCMessage class >> msgProceeding [ ^ 16r2 ]
-    GSM48CCMessage class >> msgSetup      [ ^ 16r5 ]
-    GSM48CCMessage class >> msgConnect    [ ^ 16r7 ]
-    GSM48CCMessage class >> msgConnectAck [ ^ 16rF ]
-    GSM48CCMessage class >> msgDisconnect [ ^ 16r25 ]
-    GSM48CCMessage class >> msgReleaseCompl [ ^ 16r2A ]
-    GSM48CCMessage class >> msgRelease    [ ^ 16r2D ]
-    GSM48CCMessage class >> msgStatus     [ ^ 16r3D ]
-    GSM48CCMessage class >> msgEmergencySetup [ ^ 2r1110 ]
+    GSM48CCMessage class >> msgAlerting         [ <category: 'est'> ^ 2r000001 ]
+    GSM48CCMessage class >> msgConfirmed        [ <category: 'est'> ^ 2r001000 ]
+    GSM48CCMessage class >> msgProceeding       [ <category: 'est'> ^ 2r000010 ]
+    GSM48CCMessage class >> msgConnect          [ <category: 'est'> ^ 2r000111 ]
+    GSM48CCMessage class >> msgConnectAck       [ <category: 'est'> ^ 2r001111 ]
+    GSM48CCMessage class >> msgEmergencySetup   [ <category: 'est'> ^ 2r001110 ]
+    GSM48CCMessage class >> msgProgress         [ <category: 'est'> ^ 2r000011 ]
+    GSM48CCMessage class >> msgCCEst            [ <category: 'est'> ^ 2r000100 ]
+    GSM48CCMessage class >> msgCCEstCnf         [ <category: 'est'> ^ 2r000110 ]
+    GSM48CCMessage class >> msgRecall           [ <category: 'est'> ^ 2r001011 ]
+    GSM48CCMessage class >> msgStartCC          [ <category: 'est'> ^ 2r001001 ]
+    GSM48CCMessage class >> msgSetup            [ <category: 'est'> ^ 2r000101 ]
+
+    GSM48CCMessage class >> msgModify           [ <category: 'mod'> ^ 2r010111 ]
+    GSM48CCMessage class >> msgModifyComplete   [ <category: 'mod'> ^ 2r011111 ]
+    GSM48CCMessage class >> msgModifyReject     [ <category: 'mod'> ^ 2r010011 ]
+    GSM48CCMessage class >> msgUserInformation  [ <category: 'mod'> ^ 2r010000 ]
+    GSM48CCMessage class >> msgHold             [ <category: 'mod'> ^ 2r011000 ]
+    GSM48CCMessage class >> msgHoldAck          [ <category: 'mod'> ^ 2r011001 ]
+    GSM48CCMessage class >> msgHoldReject       [ <category: 'mod'> ^ 2r011010 ]
+    GSM48CCMessage class >> msgRetrieve         [ <category: 'mod'> ^ 2r011100 ]
+    GSM48CCMessage class >> msgRetrieveAck      [ <category: 'mod'> ^ 2r011101 ]
+    GSM48CCMessage class >> msgRetrieveReject   [ <category: 'mod'> ^ 2r011110 ]
+
+    GSM48CCMessage class >> msgDisconnect       [ <category: 'rel'> ^ 2r100101 ]
+    GSM48CCMessage class >> msgRelease          [ <category: 'rel'> ^ 2r101101 ]
+    GSM48CCMessage class >> msgReleaseCompl     [ <category: 'rel'> ^ 2r101010 ]
+
+    GSM48CCMessage class >> msgCongestionCtrl   [ <category: 'misc'> ^ 2r111001 ]
+    GSM48CCMessage class >> msgNotify           [ <category: 'misc'> ^ 2r111110 ]
+    GSM48CCMessage class >> msgStatus           [ <category: 'misc'> ^ 2r111101 ]
+    GSM48CCMessage class >> msgStatusEnquiry    [ <category: 'misc'> ^ 2r110100 ]
+    GSM48CCMessage class >> msgStartDTMF        [ <category: 'misc'> ^ 2r110101 ]
+    GSM48CCMessage class >> msgStopDTMF         [ <category: 'misc'> ^ 2r110001 ]
+    GSM48CCMessage class >> msgStopDTMFAck      [ <category: 'misc'> ^ 2r110010 ]
+    GSM48CCMessage class >> msgStartDTMFAck     [ <category: 'misc'> ^ 2r110110 ]
+    GSM48CCMessage class >> msgStartDTMFReject  [ <category: 'misc'> ^ 2r110111 ]
+    GSM48CCMessage class >> msgFacility         [ <category: 'misc'> ^ 2r111010 ]
 
     ti [
         ^ ti ifNil: [ 0 ]