summaryrefslogtreecommitdiff
path: root/src/snapshot.erl
blob: c27ba55cb8da513ad0972d7ae0d0ecd7a765cb1c (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
-module(snapshot).

-export([opcode/0, decode/1, encode/1]).

-include("CSTA-snapshot-device.hrl").
-include("CSTA-device-identifiers.hrl").

opcode() ->
	{local, 74}.

decode(Data) ->
	'CSTA-snapshot-device':decode('SnapshotDeviceResult', Data).

encode(Device) ->
	'CSTA-snapshot-device':encode('SnapshotDeviceArgument',
		#'SnapshotDeviceArgument'{
		   snapshotObject = #'DeviceID'{
			deviceIdentifier = {deviceNumber, Device}}}).