Welcome to mirror list, hosted at ThFree Co, Russian Federation.

github.com/processone/ejabberd.git - Unnamed repository; edit this file 'description' to name the repository.
summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/ejabberd_c2s.erl4
-rw-r--r--src/jlib.erl4
2 files changed, 4 insertions, 4 deletions
diff --git a/src/ejabberd_c2s.erl b/src/ejabberd_c2s.erl
index 40c5a515f..975f79423 100644
--- a/src/ejabberd_c2s.erl
+++ b/src/ejabberd_c2s.erl
@@ -243,8 +243,8 @@ init([{SockMod, Socket}, Opts, FSMLimitOpts]) ->
%% Check if IP is blacklisted:
case is_ip_blacklisted(IP) of
true ->
- ?INFO_MSG("Connection attempt from blacklisted IP: ~s",
- [jlib:ip_to_list(IP)]),
+ ?INFO_MSG("Connection attempt from blacklisted IP: ~s (~w)",
+ [jlib:ip_to_list(IP), IP]),
{stop, normal};
false ->
Socket1 =
diff --git a/src/jlib.erl b/src/jlib.erl
index 930434e83..fad376684 100644
--- a/src/jlib.erl
+++ b/src/jlib.erl
@@ -387,8 +387,8 @@ e(X) -> exit({bad_encode_base64_token, X}).
%% Convert Erlang inet IP to list
ip_to_list({IP, _Port}) ->
ip_to_list(IP);
-ip_to_list({A,B,C,D}) ->
- lists:flatten(io_lib:format("~w.~w.~w.~w",[A,B,C,D])).
+ip_to_list(IpTuple) when is_tuple(IpTuple) ->
+ inet_parse:ntoa(IpTuple).
% --------------------------------------------------------------------
% Compat layer.