summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorHolger Hans Peter Freyther <holger@moiji-mobile.com>2014-05-12 10:02:36 +0200
committerHolger Hans Peter Freyther <holger@moiji-mobile.com>2014-05-12 10:03:23 +0200
commit07319cd1aabe9d540a884dc7bccfe30f9bc9400e (patch)
tree6bda9892ae10b8f3fb9c2bf8dbbaf7da36d32abb
parent5ec92351f5918da95e04d2ee11d4899a282a3b81 (diff)
bind: Add getters and extend the testcase of reading the message
-rw-r--r--codec/SMPPBindTransmitterBody.st28
-rw-r--r--test/SMPPMessageTest.st8
2 files changed, 36 insertions, 0 deletions
diff --git a/codec/SMPPBindTransmitterBody.st b/codec/SMPPBindTransmitterBody.st
index e683bdf..7f8b351 100644
--- a/codec/SMPPBindTransmitterBody.st
+++ b/codec/SMPPBindTransmitterBody.st
@@ -34,4 +34,32 @@ SMPPBodyBase subclass: SMPPBindTransmitterBody [
add: SMPPAddressRange tlvDescription;
yourself
]
+
+ systemdId [
+ ^systemd_id
+ ]
+
+ password [
+ ^password
+ ]
+
+ systemType [
+ ^system_type
+ ]
+
+ version [
+ ^0
+ ]
+
+ typeOfNumber [
+ ^addr_ton
+ ]
+
+ numberingPlanIndicator [
+ ^addr_npi
+ ]
+
+ addressRange [
+ ^addr_range
+ ]
]
diff --git a/test/SMPPMessageTest.st b/test/SMPPMessageTest.st
index 8eb6d9c..37b93df 100644
--- a/test/SMPPMessageTest.st
+++ b/test/SMPPMessageTest.st
@@ -35,6 +35,14 @@ TestCase subclass: SMPPMessageTest [
self assert: msg header commandId equals: 2.
self assert: msg header commandStatus equals: 0.
self assert: msg header sequenceNumber equals: 1.
+
+ self assert: msg body systemdId equals: 'SMPP3TEST'.
+ self assert: msg body password equals: 'secret08'.
+ self assert: msg body systemType equals: 'SUBMIT1'.
+ self assert: msg body version equals: 0.
+ self assert: msg body typeOfNumber equals: 1.
+ self assert: msg body numberingPlanIndicator equals: 1.
+ self assert: msg body addressRange equals: ''.
]
testWriteMessage [