summaryrefslogtreecommitdiff
path: root/rose.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 /rose.erl
parent03774c4e3033235d7fab446c6a6d8a9cf3ce4803 (diff)
Snapshot
Diffstat (limited to 'rose.erl')
-rw-r--r--rose.erl17
1 files changed, 15 insertions, 2 deletions
diff --git a/rose.erl b/rose.erl
index 908f217..650061c 100644
--- a/rose.erl
+++ b/rose.erl
@@ -26,6 +26,8 @@ dispatch({invoke, #'Invoke'{invokeId = Id, opcode = Op, argument = Data}}) ->
ok;
{local, 71} ->
ok;
+ {local, 74} ->
+ ok;
{local, 211} ->
return(Id, Op, csta:status());
_ ->
@@ -35,6 +37,17 @@ dispatch({invoke, #'Invoke'{invokeId = Id, opcode = Op, argument = Data}}) ->
dispatch({returnResult, #'ReturnResult'{result = Data}}) ->
dispatch(Data);
-dispatch(#'ReturnResult_result'{result = Data}) ->
- io:format("Result: ~p~n", [Data]),
+dispatch({returnError, #'ReturnError'{errcode = Code, parameter = Par}}) ->
+ io:format("Err: ~p ~p~n", [Code, Par]),
+ error;
+
+dispatch(#'ReturnResult_result'{opcode = Op, result = Data}) ->
+ case Op of
+ {local, 74} ->
+ {ok, Status} = 'CSTA-snapshot-device':decode(
+ 'SnapshotDeviceResult', Data),
+ io:format("Result: ~p~n", [Status]);
+ _ ->
+ io:format("Result: ~p~n", [Data])
+ end,
ok.