smalltalk
/
osmo-st-testphone
Archived
1
0
Fork 0
Code Releases Activity

gsm: Rename selector to be more specific and correct

This commit is contained in:
Holger Hans Peter Freyther 2013-01-07 10:09:10 +01:00
parent ef7f792316
commit c83932dbe0
1 changed files with 5 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
GSMDriver.st
View File

@ -105,7 +105,7 @@ classes.'>
<category: 'protected'> <category: 'protected'>
] ]
dispatchMan: aMsg [ dispatchBSSAP: aMsg [
<category: 'private'> <category: 'private'>
aMsg type = GSM0808Helper msgClear ifTrue: [ aMsg type = GSM0808Helper msgClear ifTrue: [
| resp | | resp |
@ -153,7 +153,9 @@ classes.'>
aMsg class messageType = GSM48MMMessage msgAuReq ifTrue: [ aMsg class messageType = GSM48MMMessage msgAuReq ifTrue: [
| auth resp | | auth resp |
'Authentication....' printNl. 'Authentication....' printNl.
auth := A3A8 COMP128: phoneConfig auVer ki: self auKey rand: aMsg auth data. auth := A3A8 COMP128: phoneConfig auVer
ki: self auKey
rand: aMsg auth data.
resp := GSM48AuthResp new. resp := GSM48AuthResp new.
resp sres data: (auth copyFrom: 1 to: 4). resp sres data: (auth copyFrom: 1 to: 4).
@ -180,7 +182,7 @@ classes.'>
<category: 'protected'> <category: 'protected'>
aMsg class msgType = BSSAPHelper msgManagemnt aMsg class msgType = BSSAPHelper msgManagemnt
ifTrue: [ ifTrue: [
self dispatchMan: aMsg data. self dispatchBSSAP: aMsg data.
] ]
ifFalse: [ ifFalse: [
self dispatchDTAP: aMsg data sapi: aMsg sapi. self dispatchDTAP: aMsg data sapi: aMsg sapi.