aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorHolger Hans Peter Freyther <zecke@selfish.org>2010-12-05 10:10:02 +0100
committerHolger Hans Peter Freyther <zecke@selfish.org>2010-12-05 13:57:40 +0100
commit50b9f6013a507cc2687de59b1f235698fd0fd058 (patch)
tree8be3cbad795473628a47058aa36756ddad3b1a74
parent33ca33843ed67575b1f9964781d5d19ce4db06ea (diff)
GSMDriver: Reply with an Assignment Complete message...
-rw-r--r--BSSMAP.st2
-rw-r--r--GSMDriver.st12
2 files changed, 14 insertions, 0 deletions
diff --git a/BSSMAP.st b/BSSMAP.st
index 179db03..1d58547 100644
--- a/BSSMAP.st
+++ b/BSSMAP.st
@@ -15,6 +15,8 @@ Object subclass: GSM0808Helper [
GSM0808Helper class >> msgClearComp [ <category: 'spec'> ^ 16r21 ]
GSM0808Helper class >> msgCipherModeCmd [ <category: 'spec'> ^ 16r53 ]
GSM0808Helper class >> msgCipherModeCmpl [ <category: 'spec'> ^ 16r55 ]
+ GSM0808Helper class >> msgAssRequest [ <category: 'spec'> ^ 16r1 ]
+ GSM0808Helper class >> msgAssComplete [ <category: 'spec'> ^ 16r2 ]
]
Object subclass: LAI [
diff --git a/GSMDriver.st b/GSMDriver.st
index 3eb727c..42fe550 100644
--- a/GSMDriver.st
+++ b/GSMDriver.st
@@ -85,6 +85,18 @@ classes.'>
^ true
].
+ aMsg type = GSM0808Helper msgAssRequest ifTrue: [
+ | resp |
+ "Reply with a AMR halfrate statement"
+ resp := IEMessage initWith: GSM0808Helper msgAssComplete.
+ resp addIe: (GSM0808CauseIE initWith: 0).
+ resp addIe: (GSM0808ChosenChannel initWith: 16r98).
+ resp addIe: (GSM0808ChosenEncrIE initWith: 1).
+ resp addIe: (GSM0808SpeechVerIE initWith: 16r25).
+ sccp nextPutData: (BSSAPManagement initWith: resp).
+ ^ true
+ ].
+
'Unhandled message' printNl.
aMsg inspect.
]