epdg_ue_fsm: Allow re-auth procedure

Change-Id: Ifa98b88aadc23a7dab70e7e0a3f6e01c35353333
---
M src/aaa_ue_fsm.erl
M src/epdg_ue_fsm.erl
2 files changed, 19 insertions(+), 2 deletions(-)

diff --git a/src/aaa_ue_fsm.erl b/src/aaa_ue_fsm.erl
index e982d57..7f70005 100644
--- a/src/aaa_ue_fsm.erl
+++ b/src/aaa_ue_fsm.erl
@@ -245,8 +245,12 @@
                 end
         end;
 
-state_authenticated({call, From}, _Whatever, Data) ->
-        lager:info("ue_fsm state_authenticated event=purge_ms_request, ~p~n", [Data]),
+state_authenticated({call, _From}, {swm_auth_req, PdpTypeNr, Apn}, Data) ->
+        lager:info("ue_fsm state_authenticated event=swm_auth_req {~p, ~p}, ~p~n", [PdpTypeNr, Apn, Data]),
+        {next_state, state_new, Data, [postpone]};
+
+state_authenticated({call, From}, Ev, Data) ->
+        lager:info("ue_fsm state_authenticated: Unexpected call event ~p, ~p~n", [Ev, Data]),
         {keep_state, Data, [{reply,From,ok}]}.
 
 state_authenticated_wait_swx_saa(enter, _OldState, Data) ->
diff --git a/src/epdg_ue_fsm.erl b/src/epdg_ue_fsm.erl
index 4b6747e..92f94f7 100644
--- a/src/epdg_ue_fsm.erl
+++ b/src/epdg_ue_fsm.erl
@@ -237,6 +237,10 @@
 state_authenticated(enter, _OldState, Data) ->
         {keep_state, Data};
 
+state_authenticated({call, _From}, {auth_request, PdpTypeNr, Apn}, Data) ->
+        lager:info("ue_fsm state_authenticated event=auth_request {~p, ~p}, ~p~n", [PdpTypeNr, Apn, Data]),
+        {next_state, state_new, Data, [postpone]};
+
 state_authenticated({call, From}, tunnel_request, Data) ->
         lager:info("ue_fsm state_authenticated event=tunnel_request, ~p~n", [Data]),
         epdg_gtpc_s2b:create_session_req(Data#ue_fsm_data.imsi, Data#ue_fsm_data.apn),

