aboutsummaryrefslogtreecommitdiffstats
path: root/lib/kernel/test/socket_server.erl
diff options
context:
space:
mode:
authorMicael Karlberg <[email protected]>2018-07-12 10:42:19 +0200
committerMicael Karlberg <[email protected]>2018-09-18 14:50:18 +0200
commitea680e88b967440b2ecd925321ebb5dd48461608 (patch)
tree9524817c1314103536dbcb6910e294602986433f /lib/kernel/test/socket_server.erl
parente0f27afac1cb3e3a5567a05081d0cf307c154b0d (diff)
downloadotp-ea680e88b967440b2ecd925321ebb5dd48461608.tar.gz
otp-ea680e88b967440b2ecd925321ebb5dd48461608.tar.bz2
otp-ea680e88b967440b2ecd925321ebb5dd48461608.zip
[socket-nif] Add support for socket (level ip) option multicast_all
Added support for the IP option MULTICAST_ALL. OTP-14831
Diffstat (limited to 'lib/kernel/test/socket_server.erl')
-rw-r--r--lib/kernel/test/socket_server.erl4
1 files changed, 3 insertions, 1 deletions
diff --git a/lib/kernel/test/socket_server.erl b/lib/kernel/test/socket_server.erl
index 68a6aebc50..f2d63c4dc1 100644
--- a/lib/kernel/test/socket_server.erl
+++ b/lib/kernel/test/socket_server.erl
@@ -451,6 +451,7 @@ handler_init(Manager, ID, Peek, Sock) ->
{ok, Linger} = socket:getopt(Sock, socket, linger),
MTU = G(mtu),
MTUDisc = G(mtu_discover),
+ {ok, MALL} = socket:getopt(Sock, ip, multicast_all),
{ok, MIF} = socket:getopt(Sock, ip, multicast_if),
{ok, MLoop} = socket:getopt(Sock, ip, multicast_loop),
{ok, MTTL} = socket:getopt(Sock, ip, multicast_ttl),
@@ -464,12 +465,13 @@ handler_init(Manager, ID, Peek, Sock) ->
"~n (socket) Linger: ~p"
"~n (ip) MTU: ~s"
"~n (ip) MTU Discovery: ~s"
+ "~n (ip) Multicast ALL: ~p"
"~n (ip) Multicast IF: ~p"
"~n (ip) Multicast Loop: ~p"
"~n (ip) Multicast TTL: ~p",
[Domain, Type, Proto,
OOBI, SndBuf, RcvBuf, Linger,
- MTU, MTUDisc, MIF, MLoop, MTTL]),
+ MTU, MTUDisc, MALL, MIF, MLoop, MTTL]),
%% socket:setopt(Sock, otp, debug, true),
handler_loop(#handler{peek = Peek,
manager = Manager,