From eef6ce439727436febc67692c145e07847cc4c89 Mon Sep 17 00:00:00 2001 From: Harald Welte Date: Wed, 30 May 2012 12:06:21 +0200 Subject: add xua_asp_test module to repository (was in my local tree only) --- src/xua_asp_test.erl | 32 ++++++++++++++++++++++++++++++++ 1 file changed, 32 insertions(+) create mode 100644 src/xua_asp_test.erl (limited to 'src') diff --git a/src/xua_asp_test.erl b/src/xua_asp_test.erl new file mode 100644 index 0000000..7347afe --- /dev/null +++ b/src/xua_asp_test.erl @@ -0,0 +1,32 @@ + +-module(xua_asp_test). + +-include("osmo_util.hrl"). +-include("m3ua.hrl"). + +-export([start/0, create_asp/0]). +-export([asp_up_ack/1, asp_active_ack/1, asp_inactive_ack/1, asp_down_ack/1]). + +start() -> + sg_as_sup:start_link("foo", [{debug, [trace]}]). + +create_asp() -> + Fun = fun(Prim, Args) -> asp_prim_to_user(Prim, Args) end, + AspArgs = [sua_asp, [], Fun, [], self()], + xua_as_fsm:create_asp("foo", AspArgs). + +asp_up_ack(Pid) -> + gen_fsm:send_event(Pid, {xua_msg, ?M3UA_MSGC_ASPSM, ?M3UA_MSGT_ASPSM_ASPUP_ACK}). + +asp_active_ack(Pid) -> + gen_fsm:send_event(Pid, {xua_msg,?M3UA_MSGC_ASPTM, ?M3UA_MSGT_ASPTM_ASPAC_ACK}). + +asp_inactive_ack(Pid) -> + gen_fsm:send_event(Pid, {xua_msg, ?M3UA_MSGC_ASPTM, ?M3UA_MSGT_ASPTM_ASPIA_ACK}). + +asp_down_ack(Pid) -> + gen_fsm:send_event(Pid, {xua_msg, ?M3UA_MSGC_ASPSM, ?M3UA_MSGT_ASPSM_ASPDN_ACK}). + + +asp_prim_to_user(Prim, _Args) -> + io:format("ASP->SCTP: ~p~n", [Prim]). -- cgit v1.2.3