Don't crash on malformed IP addresses

diff --git a/src/xmpp_stream_out.erl b/src/xmpp_stream_out.erl
index 57f674ec00574023fe5221e82ee0da38619e9d07..6137a587bc9d2499c3099b3c06956a8aee5ff965 100644 (file)
--- a/src/xmpp_stream_out.erl
+++ b/src/xmpp_stream_out.erl
@@ -964,16 +964,18 @@ connect(AddrPorts, #{sockmod := SockMod} = State) ->
                     {ok, term(), ip_port()} | network_error().
 connect([{Addr, Port}|AddrPorts], SockMod, Timeout, _) ->
     Type = get_addr_type(Addr),
-    case SockMod:connect(Addr, Port,
-                        [binary, {packet, 0},
-                         {send_timeout, ?TCP_SEND_TIMEOUT},
-                         {send_timeout_close, true},
-                         {active, false}, Type],
-                        Timeout) of
+    try SockMod:connect(Addr, Port,
+                       [binary, {packet, 0},
+                        {send_timeout, ?TCP_SEND_TIMEOUT},
+                        {send_timeout_close, true},
+                        {active, false}, Type],
+                       Timeout) of
        {ok, Socket} ->
            {ok, Socket, {Addr, Port}};
        Err ->
            connect(AddrPorts, SockMod, Timeout, Err)
+    catch _:badarg ->
+           connect(AddrPorts, SockMod, Timeout, {error, einval})
     end;
 connect([], _SockMod, _Timeout, Err) ->
     Err.