summaryrefslogtreecommitdiff
path: root/lang/erlang14/files/patch-lib_ssl_src_ssl__prim.erl
diff options
context:
space:
mode:
authorJimmy Olgeni <olgeni@FreeBSD.org>2005-11-10 15:12:40 +0000
committerJimmy Olgeni <olgeni@FreeBSD.org>2005-11-10 15:12:40 +0000
commit8cbd6f66060cf0f9cd2062fc68f7fb7f64889125 (patch)
tree62c88f536d416d0158ce5b97fb901556912de3b2 /lang/erlang14/files/patch-lib_ssl_src_ssl__prim.erl
parentAdd SHA256 checksums. (diff)
Add bugfix for SSL distribution protocol.
Obtained from: Bjorn Gustavsson <bjorn(at)erix.ericsson.se>
Notes
Notes: svn path=/head/; revision=147841
Diffstat (limited to '')
-rw-r--r--lang/erlang14/files/patch-lib_ssl_src_ssl__prim.erl23
1 files changed, 23 insertions, 0 deletions
diff --git a/lang/erlang14/files/patch-lib_ssl_src_ssl__prim.erl b/lang/erlang14/files/patch-lib_ssl_src_ssl__prim.erl
new file mode 100644
index 000000000000..94d8323434c0
--- /dev/null
+++ b/lang/erlang14/files/patch-lib_ssl_src_ssl__prim.erl
@@ -0,0 +1,23 @@
+
+$FreeBSD$
+
+--- lib/ssl/src/ssl_prim.erl.orig
++++ lib/ssl/src/ssl_prim.erl
+@@ -107,7 +107,7 @@
+ peername(St) when record(St, st), St#st.status =:= open ->
+ case ssl_server:peername_prim(ssl_server_prim, St#st.fd) of
+ {ok, {Address, Port}} ->
+- {ok, At} = inet:getaddr(Address, inet),
++ {ok, At} = inet_parse:ipv4_address(Address),
+ {ok, {At, Port}};
+ Error ->
+ Error
+@@ -119,7 +119,7 @@
+ sockname(St) when record(St, st), St#st.status =:= open ->
+ case ssl_server:sockname_prim(ssl_server_prim, St#st.fd) of
+ {ok, {Address, Port}} ->
+- {ok, At} = inet:getaddr(Address, inet),
++ {ok, At} = inet_parse:ipv4_address(Address),
+ {ok, {At, Port}};
+ Error ->
+ Error