File 0969-ssl-Improve-error-message.patch of Package erlang

From 7edbfc6a4f16a6e483b7b329e8b9cca603470167 Mon Sep 17 00:00:00 2001
From: Ingela Anderton Andin <ingela@erlang.org>
Date: Wed, 2 Jul 2025 17:38:56 +0200
Subject: [PATCH] ssl:  Improve error message

closes #10007
---
 lib/ssl/src/tls_socket.erl | 19 +++++++++++--------
 1 file changed, 11 insertions(+), 8 deletions(-)

diff --git a/lib/ssl/src/tls_socket.erl b/lib/ssl/src/tls_socket.erl
index fd919f7356..3c11465bf8 100644
--- a/lib/ssl/src/tls_socket.erl
+++ b/lib/ssl/src/tls_socket.erl
@@ -125,14 +125,14 @@ upgrade(Socket, #config{transport_info = {Transport,_,_,_,_}= CbInfo,
 	    {error, Error}
     end.
 
-connect(Address, Port,
+connect(Host, Port,
 	#config{transport_info = CbInfo, inet_user = UserOpts, ssl = SslOpts,
 		emulated = EmOpts, inet_ssl = SocketOpts, connection_cb = ConnetionCb},
 	Timeout) ->
     {Transport, _, _, _, _} = CbInfo,
-    try Transport:connect(Address, Port,  SocketOpts, Timeout) of
+    try Transport:connect(Host, Port,  SocketOpts, Timeout) of
 	{ok, Socket} ->
-	    ssl_gen_statem:connect(ConnetionCb, Address, Port, Socket,
+	    ssl_gen_statem:connect(ConnetionCb, Host, Port, Socket,
 				   {SslOpts, 
 				    emulated_socket_options(EmOpts, #socket_options{}), undefined},
 				   self(), CbInfo, Timeout);
@@ -140,11 +140,11 @@ connect(Address, Port,
 	    {error, Reason}
     catch
 	exit:{function_clause, _} ->
-	    {error, {options, {cb_info, CbInfo}}};
-	exit:badarg ->
-	    {error, {options, {socket_options, UserOpts}}};
-	exit:{badarg, _} ->
-	    {error, {options, {socket_options, UserOpts}}}
+	    {error, {badarg, connect_error(Transport, Host, Port, UserOpts, Timeout)}};
+        exit:badarg ->
+	    {error, {badarg, connect_error(Transport, Host, Port, UserOpts, Timeout)}};
+	exit:{badarg, Reason} ->
+	    {error, {badarg, connect_error(Transport, Host, Port, UserOpts, Timeout), Reason}}
     end.
 
 socket(Pids, Transport, Socket, ConnectionCb, Trackers) ->
@@ -515,3 +515,6 @@ validate_inet_option(active, Value)
 validate_inet_option(_, _) ->
     ok.
 
+connect_error(Transport, Host, Port, UserOpts, Timeout) ->
+    lists:flatten(io_lib:format("~p:connect(~p, ~p, ~p, ~p)",
+                                [Transport, Host, Port, UserOpts, Timeout])).
-- 
2.43.0

openSUSE Build Service is sponsored by