summaryrefslogtreecommitdiff
path: root/acse.erl
diff options
context:
space:
mode:
Diffstat (limited to 'acse.erl')
-rw-r--r--acse.erl10
1 files changed, 5 insertions, 5 deletions
diff --git a/acse.erl b/acse.erl
index 1ba1cf5..84b923c 100644
--- a/acse.erl
+++ b/acse.erl
@@ -3,24 +3,24 @@
-include("ACSE-1.hrl").
-include("CSTA-application-context-information-csta3.hrl").
--export([associate_request/0, release_request/0]).
+-export([associate/0, release/0]).
-export([decode/1, accepted/1]).
-user_information() ->
+ui() ->
{ok, UI} = 'CSTA-application-context-information-csta3':encode(
'ACSEUserInformationForCSTA', {newDefinition,
#'NewACSEUserInformationForCSTA'{cSTAVersion = [versionFive]}}),
{'single-ASN1-type', UI}.
-associate_request() ->
+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 = user_information()}]}}).
+ encoding = ui()}]}}).
-release_request() -> 'ACSE-1':encode('ACSE-apdu', {rlrq, #'RLRQ-apdu'{}}).
+release() -> 'ACSE-1':encode('ACSE-apdu', {rlrq, #'RLRQ-apdu'{}}).
decode(Msg) -> 'ACSE-1':decode('ACSE-apdu', Msg).