54 lines
1.7 KiB
Smalltalk
54 lines
1.7 KiB
Smalltalk
"
|
|
(C) 2012 by Holger Hans Peter Freyther
|
|
All Rights Reserved
|
|
|
|
This program is free software: you can redistribute it and/or modify
|
|
it under the terms of the GNU Affero General Public License as
|
|
published by the Free Software Foundation, either version 3 of the
|
|
License, or (at your option) any later version.
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
GNU Affero General Public License for more details.
|
|
|
|
You should have received a copy of the GNU Affero General Public License
|
|
along with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
"
|
|
|
|
TestCase subclass: GSM411Test [
|
|
<category: 'OsmoGSM-SMS-Tests'>
|
|
|
|
testCPData [
|
|
| inp dec |
|
|
inp := #[
|
|
16r09 16r01 16r23 16r00 16r0C 16r00 16r07 16r91
|
|
16r36 16r19 16r08 16r00 16r10 16r50 16r17 16r01
|
|
16r0C 16r0F 16r81 16r00 16r33 16r33 16r33 16r33
|
|
16r33 16r33 16rF3 16r00 16r00 16r09 16rAA 16rBB
|
|
16rCC 16rDD 16rEE 16rFF 16r11 16r22].
|
|
|
|
dec := GSM48MSG decode: inp readStream.
|
|
|
|
self
|
|
assert: dec type = GSMCpData messageType;
|
|
assert: dec toMessage asByteArray = inp.
|
|
|
|
self
|
|
assert: dec rpMessage toMessage asByteArray equals: dec userData data.
|
|
]
|
|
|
|
testCPData2 [
|
|
| inp dec |
|
|
inp := #(16r89 16r01 16r02 16r02 16r2A) asByteArray.
|
|
dec := GSM48MSG decode: inp readStream.
|
|
|
|
self
|
|
assert: dec type = GSMCpData messageType;
|
|
assert: dec toMessage asByteArray = inp.
|
|
|
|
self
|
|
assert: dec rpMessage toMessage asByteArray equals: dec userData data.
|
|
]
|
|
]
|