summaryrefslogtreecommitdiff
path: root/src/escape.erl
diff options
context:
space:
mode:
Diffstat (limited to 'src/escape.erl')
-rw-r--r--src/escape.erl10
1 files changed, 9 insertions, 1 deletions
diff --git a/src/escape.erl b/src/escape.erl
index f1104a8..11f2a6c 100644
--- a/src/escape.erl
+++ b/src/escape.erl
@@ -1,9 +1,10 @@
-module(escape).
-export([decode/1, lines/1]).
--export([privateData/1]).
+-export([privateData/1, deviceData/1]).
-include("CSTA-escape-service.hrl").
+-include("CSTA-device-identifiers.hrl").
-include("KME-specific-types.hrl").
decode(Data) ->
@@ -27,3 +28,10 @@ private({systemDataLinkedReply, #'KmeSystemDataLinkedReply'{lastSegment = false,
Data;
private({systemDataLinkedReply, #'KmeSystemDataLinkedReply'{lastSegment = true, sysData = Data}}) ->
Data.
+
+deviceData(Device) ->
+ 'CSTA-escape-service':encode('EscapeArgument', #'EscapeArgument'{
+ privateData = {private, {kmeSystemData, {getSystemData,
+ {request, {deviceData, #'KmeGetSystemDataReq_deviceData'{
+ device = #'DeviceID'{deviceIdentifier = Device},
+ sysData = {fcoKey, 'NULL'} }}}}}}}).