pespin has uploaded this change for review. ( https://gerrit.osmocom.org/c/erlang/osmo-epdg/+/36234?usp=email )
Change subject: aaa_diameter_s6b.erl: Get rid of unused code ......................................................................
aaa_diameter_s6b.erl: Get rid of unused code
Change-Id: I9e94fe26073ddb1740c3ae1d761d359c3f1b7439 --- M src/aaa_diameter_s6b.erl 1 file changed, 13 insertions(+), 32 deletions(-)
git pull ssh://gerrit.osmocom.org:29418/erlang/osmo-epdg refs/changes/34/36234/1
diff --git a/src/aaa_diameter_s6b.erl b/src/aaa_diameter_s6b.erl index 163ffbd..baf251f 100644 --- a/src/aaa_diameter_s6b.erl +++ b/src/aaa_diameter_s6b.erl @@ -47,12 +47,9 @@ -export([start_link/0]). -export([start/0, stop/0, terminate/2]). %% gen_server Function Exports --export([init/1, handle_call/3, handle_cast/2, handle_info/2]). +-export([init/1, handle_call/3, handle_cast/2, handle_info/2, peer_down/3]). -export([code_change/3]). --export([multimedia_auth_request/6]). --export([server_assignment_request/3]). -export([tx_aa_answer/2, tx_st_answer/2]). --export([test/0, test/1]).
%% Diameter Application Definitions -define(SERVER, ?MODULE). @@ -96,11 +93,6 @@ {module, ?CALLBACK_MOD}, {answer_errors, callback}]}]).
--record(state, { - handlers, - peers = #{} -}). - %% @doc starts gen_server implementation process -spec start() -> ok | {error, term()}. start() -> @@ -115,9 +107,7 @@ start_link() -> gen_server:start_link({local, ?SERVER}, ?MODULE, [], []).
-peer_down(API, SvcName, {PeerRef, _} = Peer) -> - % fixme: why do we still have ets here? - (catch ets:delete(?MODULE, {API, PeerRef})), +peer_down(_API, SvcName, {_PeerRef, _} = Peer) -> gen_server:cast(?SERVER, {peer_down, SvcName, Peer}), ok.
@@ -133,20 +123,6 @@ {ok, _} = listen({address, Proto, Ip, Port}, {timer, ConnectTimer, WatchdogTimer, WatchdogConfig}), {ok, State}.
-test() -> - test("001011234567890"). - -test(IMSI) -> - multimedia_auth_request(IMSI, 3, "EAP-AKA", 1, [], []). - -multimedia_auth_request(IMSI, NumAuthItems, AuthScheme, RAT, CKey, IntegrityKey) -> - gen_server:call(?SERVER, - {mar, {IMSI, NumAuthItems, AuthScheme, RAT, CKey, IntegrityKey}}). -% APN is optional and should be [] -server_assignment_request(IMSI, Type, APN) -> - gen_server:call(?SERVER, - {sar, {IMSI, Type, APN}}). - tx_aa_answer(Pid, DiaRC) -> % handle_request(AAR) was spawned into its own process, and it's blocked waiting for AAA: Pid ! {aaa, DiaRC}. @@ -155,12 +131,8 @@ % handle_request(STR) was spawned into its own process, and it's blocked waiting for STA: Pid ! {sta, DiaRC}.
-result_code_success(2001) -> ok; -result_code_success(2002) -> ok; -result_code_success(_) -> invalid_result_code. - -handle_call({aar, {IMSI, Type, APN}}, _From, State) -> - SessionId = diameter:session_id(application:get_env(?ENV_APP_NAME, origin_host, ?ENV_DEFAULT_ORIG_HOST)). +handle_call(Info, _From, State) -> + error_logger:error_report(["unknown handle_call", {module, ?MODULE}, {info, Info}, {state, State}]).
%% @callback gen_server handle_cast(stop, State) ->