summaryrefslogtreecommitdiff
path: root/csta.erl
diff options
context:
space:
mode:
authorDimitri Sokolyuk <demon@dim13.org>2015-10-29 11:33:12 +0100
committerDimitri Sokolyuk <demon@dim13.org>2015-10-29 11:33:12 +0100
commite944d2b3d236c5aeba04455773e5cd8e5f1507c0 (patch)
tree0c55c21c33f86b7b07c0afef42b33cd4d415d9c8 /csta.erl
parent03774c4e3033235d7fab446c6a6d8a9cf3ce4803 (diff)
Snapshot
Diffstat (limited to 'csta.erl')
-rw-r--r--csta.erl10
1 files changed, 9 insertions, 1 deletions
diff --git a/csta.erl b/csta.erl
index 6aa904a..ca5fb09 100644
--- a/csta.erl
+++ b/csta.erl
@@ -1,8 +1,10 @@
-module(csta).
--export([lines/1, decode/1, status/0]).
+-export([lines/1, decode/1, status/0, snapshot/1]).
-include("CSTA-escape-service.hrl").
+-include("CSTA-snapshot-device.hrl").
+-include("CSTA-device-identifiers.hrl").
decode(Data) ->
'CSTA-escape-service':decode('EscapeArgument', Data).
@@ -21,3 +23,9 @@ lines(Device) ->
status() ->
'CSTA-system-status':encode('SystemStatusRes', {noData, []}).
+
+snapshot(Device) ->
+ 'CSTA-snapshot-device':encode('SnapshotDeviceArgument',
+ #'SnapshotDeviceArgument'{
+ snapshotObject = #'DeviceID'{
+ deviceIdentifier = {deviceNumber, Device}}}).