smalltalk
/
osmo-st-gsm
Archived
1
0
Fork 0

gsm: Add all reject causes for the GSM48RejectCause

One range is not added, as it is not clear when to use it.
This commit is contained in:
Holger Hans Peter Freyther 2012-12-04 12:46:05 +01:00
parent 54e132e3ad
commit fa1f6edc23
1 changed files with 27 additions and 0 deletions

View File

@ -709,6 +709,33 @@ GSM48SimpleData subclass: GSM48RejectCause [
<gsmName: 'cause'>
<gsmValueLength: 1>
GSM48RejectCause class [
causeImsiUnknownInHlr [ <category: 'cause'> ^ 2r00000010 ]
causeIllegalMS [ <category: 'cause'> ^ 2r00000011 ]
causeImsiUnknownInVLR [ <category: 'cause'> ^ 2r00000100 ]
causeIMEINotAccepted [ <category: 'cause'> ^ 2r00000101 ]
causeIllegalME [ <category: 'cause'> ^ 2r00000110 ]
causePLMNNotAllowed [ <category: 'cause'> ^ 2r00001011 ]
causeLocationAreaNotAllowed [ <category: 'cause'> ^ 2r00001100 ]
causeRoamingNotAllowedInLAC [ <category: 'cause'> ^ 2r00001101 ]
cuaseNetworkFailure [ <category: 'cause'> ^ 2r00010001 ]
causeCongestion [ <category: 'cause'> ^ 2r00010110 ]
cuaseServiceOptionNotSupported [ <category: 'cause'> ^ 2r00100000 ]
causeRequestedServiceOptionNotSubscribed [ <category: 'cause'> ^ 2r00100001 ]
causeServiceOptionTemporarilyOutOfOrder [ <category: 'cause'> ^ 2r00100010 ]
causeCallCannotBeIdentified [ <category: 'cause'> ^ 2r00100110 ]
"TODO: Range of causes for re-try 2r00110000 to 2r00111111"
causeSemanticallyIncorrectMessage [ <category: 'cause'> ^ 2r01011111 ]
causeInvalidMandatoryInformation [ <category: 'cause'> ^ 2r01100000 ]
causeMessageTypeNonExistentOrNotImplemented [ <category: 'cause'> ^ 2r01100001 ]
causeMessageTypeNotCompatibleWithProtocolState [ <category: 'cause'> ^ 2r01100010 ]
causeInformationElementNonExistentOrNotImplemented [ <category: 'cause'> ^ 2r01100011 ]
causeConditionalIEError [ <category: 'cause'> ^ 2r01100100 ]
causeMessageNotCompatibleWithProtocolState [ <category: 'cause'> ^ 2r01100101 ]
causeProtocolErrorUnspecified [ <category: 'cause'> ^ 2r01101111 ]
]
GSM48RejectCause class >> createDefault [
<category: 'creation'>
^ self new