From e944d2b3d236c5aeba04455773e5cd8e5f1507c0 Mon Sep 17 00:00:00 2001 From: Dimitri Sokolyuk Date: Thu, 29 Oct 2015 11:33:12 +0100 Subject: Snapshot --- csta.erl | 10 +++++++++- 1 file changed, 9 insertions(+), 1 deletion(-) (limited to 'csta.erl') 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}}}). -- cgit v1.2.3