aboutsummaryrefslogtreecommitdiffstats
path: root/library
diff options
context:
space:
mode:
authorHarald Welte <laforge@gnumonks.org>2018-08-02 15:05:43 +0200
committerHarald Welte <laforge@gnumonks.org>2018-08-02 15:14:03 +0200
commit95686e0bd7f4774f7da39d9f9ee37c30b43a3e33 (patch)
tree06db3adef1c7e3ad0ea4d356be3af147feafb9cd /library
parent43a1a0be9e8ce4701dbe81ce9809bac1bca794e6 (diff)
IPA_Emulation: Add missing zero byte to strings in IPA CCM ID RESP
Diffstat (limited to 'library')
-rw-r--r--library/IPA_Emulation.ttcnpp2
-rw-r--r--library/IPA_Types.ttcn2
2 files changed, 2 insertions, 2 deletions
diff --git a/library/IPA_Emulation.ttcnpp b/library/IPA_Emulation.ttcnpp
index a271f2d8..b10a983a 100644
--- a/library/IPA_Emulation.ttcnpp
+++ b/library/IPA_Emulation.ttcnpp
@@ -239,7 +239,7 @@ template ASP_MTP3_TRANSFERind ts_MTP3_XFER_ind(integer opc, octetstring data) :=
private template IpaCcmRespPart t_IdRespPart(IpaCcmIdTag tag, charstring payload) := {
len := 0, /* overwritten by codec */
tag := tag,
- data := payload
+ data := char2oct(payload) & '00'O
}
private function f_send_IPA_EVT(template ASP_IPA_Event evt) runs on IPA_Emulation_CT {
diff --git a/library/IPA_Types.ttcn b/library/IPA_Types.ttcn
index 933a3fe6..3230329e 100644
--- a/library/IPA_Types.ttcn
+++ b/library/IPA_Types.ttcn
@@ -98,7 +98,7 @@ type set of IpaCcmGetPart IpaCcmIdGet;
type record IpaCcmRespPart {
uint16_t len,
IpaCcmIdTag tag,
- charstring data
+ octetstring data
} with { variant (len) "LENGTHTO(data,tag)" }
type set of IpaCcmRespPart IpaCcmIdResp;