Update Ingoing s2s connections inner state to hold domain name (thanks to Juan Pablo...

SVN Revision: 2489

diff --git a/src/ejabberd_s2s_in.erl b/src/ejabberd_s2s_in.erl
index e25ebd98f49ead85c3edd0cc1271bb6100a05e1a..ae6508cddce9b0259e4f05f973ca6e696fc84bd6 100644 (file)
--- a/src/ejabberd_s2s_in.erl
+++ b/src/ejabberd_s2s_in.erl
@@ -532,6 +532,14 @@ handle_sync_event(get_state_infos, _From, StateName, StateData) ->
                  catch
                      _:_ -> {unknown,unknown}
                  end,
+    Domains =  case StateData#state.authenticated of
+                   true -> 
+                       [StateData#state.auth_domain];
+                   false ->
+                       Connections = StateData#state.connections,
+                       [D || {{D, _}, established} <- 
+                           dict:to_list(Connections)]
+               end,
     Infos = [
             {direction, in},
             {statename, StateName},
@@ -543,7 +551,8 @@ handle_sync_event(get_state_infos, _From, StateName, StateData) ->
             {tls_options, StateData#state.tls_options},
             {authenticated, StateData#state.authenticated},
             {shaper, StateData#state.shaper},
-            {sockmod, SockMod}
+            {sockmod, SockMod},
+            {domains, Domains}
            ],
     Reply = {state_infos, Infos},
     {reply,Reply,StateName,StateData};