summaryrefslogtreecommitdiff
path: root/src/acse.erl
diff options
context:
space:
mode:
Diffstat (limited to 'src/acse.erl')
-rw-r--r--src/acse.erl10
1 files changed, 7 insertions, 3 deletions
diff --git a/src/acse.erl b/src/acse.erl
index cb0af0e..1112345 100644
--- a/src/acse.erl
+++ b/src/acse.erl
@@ -20,8 +20,8 @@ associate() ->
release() ->
'ACSE-1':encode('ACSE-apdu', {rlrq, #'RLRQ-apdu'{}}).
-decode(Msg) ->
- 'ACSE-1':decode('ACSE-apdu', Msg).
+decode(Data) ->
+ 'ACSE-1':decode('ACSE-apdu', Data).
dispatch({aare, #'AARE-apdu'{result = Result}}) ->
case Result of
@@ -33,4 +33,8 @@ dispatch({rlre, _}) ->
ok;
dispatch({abrt, _}) ->
- error.
+ error;
+
+dispatch({asn1_ExtAlt, Data}) ->
+ {ok, Rose} = rose:decode(Data),
+ rose:dispatch(Rose).