File 1411-kernel-gen-udp-socket-Fixed-bind.patch of Package erlang

Overview Repositories Revisions Requests Users Attributes Meta

File 1411-kernel-gen-udp-socket-Fixed-bind.patch of Package erlang (Revision 08f2bbf2232e657df7f110a806b4a641)

Currently displaying revision 08f2bbf2232e657df7f110a806b4a641 , Show latest

From 2b2a0b0958d1cc212605fa5f7ba8c21cde1ec629 Mon Sep 17 00:00:00 2001
From: Micael Karlberg <bmk@erlang.org>
Date: Tue, 20 Jul 2021 18:46:43 +0200
Subject: [PATCH 11/12] [kernel|gen-udp-socket] Fixed bind

Don't ignore the port number just because the address is
"undefined".

OTP-17410
---
 lib/kernel/src/gen_udp_socket.erl | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/lib/kernel/src/gen_udp_socket.erl b/lib/kernel/src/gen_udp_socket.erl
index e0f01d27e1..dd6c2a0078 100644
--- a/lib/kernel/src/gen_udp_socket.erl
+++ b/lib/kernel/src/gen_udp_socket.erl
@@ -232,8 +232,9 @@ default_any(Domain, _ExtraOpts, undefined = Undefined) ->
 default_any(_Domain, _ExtraOpts, BindAddr) ->
     BindAddr.
 
-bind_addr(_Domain, BindIP, _BindPort, Fd)
-  when (BindIP =:= undefined) orelse (is_integer(Fd) andalso (0 =< Fd)) ->
+bind_addr(_Domain, BindIP, BindPort, Fd)
+  when ((BindIP =:= undefined)  andalso (BindPort =:= 0)) orelse
+       (is_integer(Fd) andalso (0 =< Fd)) ->
     %% Do not bind!
     undefined;
 bind_addr(local = Domain, BindIP, _BindPort, _Fd) ->
@@ -246,8 +247,9 @@ bind_addr(local = Domain, BindIP, _BindPort, _Fd) ->
     end;
 bind_addr(Domain, BindIP, BindPort, _Fd)
   when (Domain =:= inet) orelse (Domain =:= inet6) ->
+    Addr = if (BindIP =:= undefined) -> any; true -> BindIP end,
     #{family => Domain,
-      addr   => BindIP,
+      addr   => Addr,
       port   => BindPort}.
 
 call_bind(_Server, undefined) ->
-- 
2.31.1

Places

File 1411-kernel-gen-udp-socket-Fixed-bind.patch of Package erlang (Revision 08f2bbf2232e657df7f110a806b4a641)

Places