summaryrefslogtreecommitdiff
path: root/acse.erl
diff options
context:
space:
mode:
authorDimitri Sokolyuk <demon@dim13.org>2015-10-29 14:00:41 +0100
committerDimitri Sokolyuk <demon@dim13.org>2015-10-29 14:00:41 +0100
commitfc86381ccac10fa30aefe76996a716ae1d677f5b (patch)
treec7a0c6c2ab9ab0c254bdb01088c2aad3119ff277 /acse.erl
parentb9697094228db7832e75a8699a2678338f7c7c22 (diff)
Prepare for rebar
Diffstat (limited to 'acse.erl')
-rw-r--r--acse.erl35
1 files changed, 0 insertions, 35 deletions
diff --git a/acse.erl b/acse.erl
deleted file mode 100644
index e8f0d70..0000000
--- a/acse.erl
+++ /dev/null
@@ -1,35 +0,0 @@
--module(acse).
-
--include("ACSE-1.hrl").
--include("CSTA-application-context-information-csta3.hrl").
-
--export([associate/0, release/0]).
--export([decode/1, dispatch/1]).
-
-ui() ->
- {ok, UI} = 'CSTA-application-context-information-csta3':encode(
- 'ACSEUserInformationForCSTA', {newDefinition,
- #'NewACSEUserInformationForCSTA'{cSTAVersion = [versionFive]}}),
- {'single-ASN1-type', UI}.
-
-associate() ->
- 'ACSE-1':encode('ACSE-apdu', {aarq, #'AARQ-apdu'{
- 'protocol-version' = [version1],
- 'application-context-name' = {1, 3, 12, 0, 218},
- 'user-information' = [#'EXTERNAL'{
- 'direct-reference' = {1, 3, 12, 0, 285, 200},
- encoding = ui()}]}}).
-
-release() -> 'ACSE-1':encode('ACSE-apdu', {rlrq, #'RLRQ-apdu'{}}).
-
-decode(Msg) -> 'ACSE-1':decode('ACSE-apdu', Msg).
-
-dispatch({aare, #'AARE-apdu'{result = Result}}) ->
- case Result of
- accepted -> ok;
- _ -> error
- end;
-
-dispatch({rlre, _}) -> ok;
-
-dispatch({abrt, _}) -> error.