Network.Multicast

The Network.Multicast module is for sending UDP datagrams over multicast (class D) addresses.

Simple sending and receiving

multicastSender :: HostName -> PortNumber -> IO (Socket, SockAddr)

Calling multicastSender creates a client side UDP socket for sending multicast datagrams to the specified host and port.

Minimal example:

 import Network.Socket
 import Network.Multicast
 main = withSocketsDo $ do
     (sock, addr) <- multicastSender "224.0.0.99" 9999
     let loop = do
         sendTo sock "Hello, world" addr
         loop in loop

multicastReceiver :: HostName -> PortNumber -> IO Socket

Calling multicastReceiver creates and binds a UDP socket for listening multicast datagrams on the specified host and port.

Minimal example:

 import Network.Socket
 import Network.Multicast
 main = withSocketsDo $ do
     sock <- multicastReceiver "224.0.0.99" 9999
     let loop = do
         (msg, _, addr) <- recvFrom sock 1024
         print (msg, addr) in loop

Additional Socket operations

addMembership :: Socket -> HostName -> IO ()

Make the socket listen on multicast datagrams sent by the specified HostName.

dropMembership :: Socket -> HostName -> IO ()

Stop the socket from listening on multicast datagrams sent by the specified HostName.

setLoopbackMode :: Socket -> LoopbackMode -> IO ()

Enable or disable the loopback mode on a socket created by multicastSender. Loopback is enabled by default; disabling it may improve performance a little bit.

setTimeToLive :: Socket -> TimeToLive -> IO ()

Set the Time-to-Live of the multicast.

setInterface :: Socket -> HostName -> IO ()

Set the outgoing interface address of the multicast.

Socket options

type TimeToLive = Int

type LoopbackMode = Bool

enableLoopback :: LoopbackMode

noLoopback :: LoopbackMode