From e1c2586b0b433a9909dea2c0263b5892970ebba6 Mon Sep 17 00:00:00 2001 From: Dimitri Sokolyuk Date: Fri, 23 Oct 2015 13:18:34 +0200 Subject: Add rose --- tda.erl | 11 +++++++++++ 1 file changed, 11 insertions(+) diff --git a/tda.erl b/tda.erl index 04a2487..6c0f901 100644 --- a/tda.erl +++ b/tda.erl @@ -1,9 +1,13 @@ -module(tda). + -export([associate_request/0, associate_result/1]). -export([release_request/0, release_result/1]). -export([associate_abort/1]). +-export([system_status/1]). + -include("ACSE-1.hrl"). -include("CSTA-application-context-information-csta3.hrl"). +-include("Remote-Operations-Generic-ROS-PDUs.hrl"). associate_request() -> Ver = {newDefinition, #'NewACSEUserInformationForCSTA'{ @@ -50,3 +54,10 @@ release_result(Bin) -> associate_abort(Bin) -> {ok, Pdu} = 'ACSE-1':decode('ABRT-apdu', Bin), Pdu#'ABRT-apdu'.'abort-source'. + +% <<161,12,2,1,1,2,2,0,211,48,3,10,1,2>> +% <<162,11,2,1,1,48,6,2,2,0,211,5,0>> +system_status(Bin) -> + % broken, no Invoke type + {ok, Invoke} = 'Remote-Operations-Generic-ROS-PDUs':decode('Invoke', Bin), + Invoke. -- cgit v1.2.3