* src/web/ejabberd_web_admin.erl: Show in ejabberd Web Admin the

connection method and connected node of Jabber clients (thanks to
Oleg Palij)(EJAB-319)

SVN Revision: 1757
This commit is contained in:
Badlop 2008-12-26 12:44:54 +00:00
parent 682909e0fc
commit 394245620e
2 changed files with 16 additions and 3 deletions

View File

@ -1,5 +1,9 @@
2008-12-26 Badlop <badlop@process-one.net>
* src/web/ejabberd_web_admin.erl: Show in ejabberd Web Admin the
connection method and connected node of Jabber clients (thanks to
Oleg Palij)(EJAB-319)
* src/ejabberd_config.erl: Option outgoing_s2s_options to define
s2s outgoing behaviour: IPv4, IPv6 and timeout (thanks to Stephan
Maka)(EJAB-665)

View File

@ -1442,15 +1442,24 @@ user_info(User, Server, Query, Lang) ->
_ ->
[?XE("ul",
lists:map(fun(R) ->
FIP = case ejabberd_sm:get_user_ip(
FIP = case ejabberd_sm:get_user_info(
User, Server, R) of
undefined ->
offline ->
"";
{IP, Port} ->
[{node, Node}, {conn, Conn}, {ip, {IP, Port}}] ->
ConnS = case Conn of
c2s -> "plain";
c2s_tls -> "tls";
c2s_compressed -> "zlib";
http_bind -> "http-bind";
http_poll -> "http-poll"
end,
" (" ++
ConnS ++ "://" ++
inet_parse:ntoa(IP) ++
":" ++
integer_to_list(Port)
++ "#" ++ atom_to_list(Node)
++ ")"
end,
?LI([?C(R ++ FIP)])