1 /*****************************************************************************
3 *****************************************************************************
4 * Copyright (C) 2004-2006 VLC authors and VideoLAN
5 * Copyright © 2006-2007 Rémi Denis-Courmont
9 * Authors: Laurent Aimar <fenrir@videolan.org>
10 * Rémi Denis-Courmont <rem # videolan.org>
12 * This program is free software; you can redistribute it and/or modify it
13 * under the terms of the GNU Lesser General Public License as published by
14 * the Free Software Foundation; either version 2.1 of the License, or
15 * (at your option) any later version.
17 * This program is distributed in the hope that it will be useful,
18 * but WITHOUT ANY WARRANTY; without even the implied warranty of
19 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
20 * GNU Lesser General Public License for more details.
22 * You should have received a copy of the GNU Lesser General Public License
23 * along with this program; if not, write to the Free Software Foundation,
24 * Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
25 *****************************************************************************/
27 /*****************************************************************************
29 *****************************************************************************/
34 #include <vlc_common.h>
39 #include <vlc_network.h>
43 # define EAFNOSUPPORT WSAEAFNOSUPPORT
44 # include <wincrypt.h>
45 # include <iphlpapi.h>
53 #ifdef HAVE_LINUX_DCCP_H
54 # include <linux/dccp.h>
55 # ifndef SOCK_DCCP /* provisional API */
61 # define SOL_IP IPPROTO_IP
64 # define SOL_IPV6 IPPROTO_IPV6
67 # define IPPROTO_IPV6 41 /* IANA */
70 # define SOL_DCCP IPPROTO_DCCP
73 # define IPPROTO_DCCP 33 /* IANA */
76 # define SOL_UDPLITE IPPROTO_UDPLITE
78 #ifndef IPPROTO_UDPLITE
79 # define IPPROTO_UDPLITE 136 /* IANA */
82 #if defined (HAVE_NETINET_UDPLITE_H)
83 # include <netinet/udplite.h>
84 #elif defined (__linux__)
85 /* still missing from glibc 2.6 */
86 # define UDPLITE_SEND_CSCOV 10
87 # define UDPLITE_RECV_CSCOV 11
90 extern int net_Socket( vlc_object_t
*p_this
, int i_family
, int i_socktype
,
94 static int net_SetupDgramSocket (vlc_object_t
*p_obj
, int fd
,
95 const struct addrinfo
*ptr
)
98 setsockopt (fd
, SOL_SOCKET
, SO_REUSEPORT
, &(int){ 1 }, sizeof (int));
103 /* Check windows version so we know if we need to increase receive buffers
104 * for Windows 7 and earlier
106 * SetSocketMediaStreamingMode is present in win 8 and later, so we set
107 * receive buffer if that isn't present
109 #if (_WIN32_WINNT < _WIN32_WINNT_WIN8)
110 HINSTANCE h_Network
= LoadLibrary(TEXT("Windows.Networking.dll"));
111 if( (h_Network
== NULL
) ||
112 (GetProcAddress( h_Network
, "SetSocketMediaStreamingMode" ) == NULL
) )
114 setsockopt (fd
, SOL_SOCKET
, SO_RCVBUF
,
115 (void *)&(int){ 0x80000 }, sizeof (int));
118 FreeLibrary( h_Network
);
121 if (net_SockAddrIsMulticast (ptr
->ai_addr
, ptr
->ai_addrlen
)
122 && (sizeof (struct sockaddr_storage
) >= ptr
->ai_addrlen
))
124 // This works for IPv4 too - don't worry!
125 struct sockaddr_in6 dumb
=
127 .sin6_family
= ptr
->ai_addr
->sa_family
,
128 .sin6_port
= ((struct sockaddr_in
*)(ptr
->ai_addr
))->sin_port
131 bind (fd
, (struct sockaddr
*)&dumb
, ptr
->ai_addrlen
);
135 if (bind (fd
, ptr
->ai_addr
, ptr
->ai_addrlen
))
137 msg_Err( p_obj
, "socket bind error: %s", vlc_strerror_c(net_errno
) );
145 static int net_ListenSingle (vlc_object_t
*obj
, const char *host
, int port
,
148 struct addrinfo hints
= {
149 .ai_socktype
= SOCK_DGRAM
,
150 .ai_protocol
= protocol
,
151 .ai_flags
= AI_PASSIVE
| AI_NUMERICSERV
| AI_IDN
,
157 msg_Dbg (obj
, "net: opening %s datagram port %d",
158 host
? host
: "any", port
);
160 int val
= vlc_getaddrinfo (host
, port
, &hints
, &res
);
163 msg_Err (obj
, "Cannot resolve %s port %d : %s", host
, port
,
170 for (const struct addrinfo
*ptr
= res
; ptr
!= NULL
; ptr
= ptr
->ai_next
)
172 int fd
= net_Socket (obj
, ptr
->ai_family
, ptr
->ai_socktype
,
176 msg_Dbg (obj
, "socket error: %s", vlc_strerror_c(net_errno
));
181 /* Try dual-mode IPv6 if available. */
182 if (ptr
->ai_family
== AF_INET6
)
183 setsockopt (fd
, SOL_IPV6
, IPV6_V6ONLY
, &(int){ 0 }, sizeof (int));
185 fd
= net_SetupDgramSocket( obj
, fd
, ptr
);
189 if (net_SockAddrIsMulticast (ptr
->ai_addr
, ptr
->ai_addrlen
)
190 && net_Subscribe (obj
, fd
, ptr
->ai_addr
, ptr
->ai_addrlen
))
205 static int net_SetMcastHopLimit( vlc_object_t
*p_this
,
206 int fd
, int family
, int hlim
)
210 /* There is some confusion in the world whether IP_MULTICAST_TTL
211 * takes a byte or an int as an argument.
212 * BSD seems to indicate byte so we are going with that and use
213 * int as a fallback to be safe */
216 #ifdef IP_MULTICAST_TTL
219 cmd
= IP_MULTICAST_TTL
;
223 #ifdef IPV6_MULTICAST_HOPS
226 cmd
= IPV6_MULTICAST_HOPS
;
231 errno
= EAFNOSUPPORT
;
232 msg_Warn( p_this
, "%s", vlc_strerror_c(EAFNOSUPPORT
) );
236 if( setsockopt( fd
, proto
, cmd
, &hlim
, sizeof( hlim
) ) < 0 )
238 /* BSD compatibility */
241 msg_Dbg( p_this
, "cannot set hop limit (%d): %s", hlim
,
242 vlc_strerror_c(net_errno
) );
243 buf
= (unsigned char)(( hlim
> 255 ) ? 255 : hlim
);
244 if( setsockopt( fd
, proto
, cmd
, &buf
, sizeof( buf
) ) )
246 msg_Err( p_this
, "cannot set hop limit (%d): %s", hlim
,
247 vlc_strerror_c(net_errno
) );
256 static int net_SetMcastOut (vlc_object_t
*p_this
, int fd
, int family
,
259 int scope
= if_nametoindex (iface
);
262 msg_Err (p_this
, "invalid multicast interface: %s", iface
);
268 #ifdef IPV6_MULTICAST_IF
270 if (setsockopt (fd
, SOL_IPV6
, IPV6_MULTICAST_IF
,
271 &scope
, sizeof (scope
)) == 0)
279 struct ip_mreqn req
= { .imr_ifindex
= scope
};
280 if (setsockopt (fd
, SOL_IP
, IP_MULTICAST_IF
,
281 &req
, sizeof (req
)) == 0)
287 errno
= EAFNOSUPPORT
;
289 msg_Err (p_this
, "cannot force multicast interface %s: %s", iface
,
290 vlc_strerror_c(errno
));
295 static unsigned var_GetIfIndex (vlc_object_t
*obj
)
297 char *ifname
= var_InheritString (obj
, "miface");
301 unsigned ifindex
= if_nametoindex (ifname
);
303 msg_Err (obj
, "invalid multicast interface: %s", ifname
);
310 * IP-agnostic multicast join,
311 * with fallback to old APIs, and fallback from SSM to ASM.
314 net_SourceSubscribe (vlc_object_t
*obj
, int fd
,
315 const struct sockaddr
*src
, socklen_t srclen
,
316 const struct sockaddr
*grp
, socklen_t grplen
)
318 /* MCAST_JOIN_SOURCE_GROUP was introduced to OS X in v10.7, but it doesn't work,
319 * so ignore it to use the same code path as on 10.5 or 10.6 */
320 #if defined (MCAST_JOIN_SOURCE_GROUP) && !defined (__APPLE__)
321 /* Family-agnostic Source-Specific Multicast join */
323 struct group_source_req gsr
;
325 memset (&gsr
, 0, sizeof (gsr
));
326 gsr
.gsr_interface
= var_GetIfIndex (obj
);
328 switch (grp
->sa_family
)
333 const struct sockaddr_in6
*g6
= (const struct sockaddr_in6
*)grp
;
336 assert (grplen
>= sizeof (struct sockaddr_in6
));
337 if (g6
->sin6_scope_id
!= 0)
338 gsr
.gsr_interface
= g6
->sin6_scope_id
;
346 errno
= EAFNOSUPPORT
;
350 assert (grplen
<= sizeof (gsr
.gsr_group
));
351 memcpy (&gsr
.gsr_source
, src
, srclen
);
352 assert (srclen
<= sizeof (gsr
.gsr_source
));
353 memcpy (&gsr
.gsr_group
, grp
, grplen
);
354 if (setsockopt (fd
, level
, MCAST_JOIN_SOURCE_GROUP
,
355 &gsr
, sizeof (gsr
)) == 0)
359 if (src
->sa_family
!= grp
->sa_family
)
361 errno
= EAFNOSUPPORT
;
365 switch (grp
->sa_family
)
367 # ifdef IP_ADD_SOURCE_MEMBERSHIP
368 /* IPv4-specific API */
371 struct ip_mreq_source imr
;
373 memset (&imr
, 0, sizeof (imr
));
374 assert (grplen
>= sizeof (struct sockaddr_in
));
375 imr
.imr_multiaddr
= ((const struct sockaddr_in
*)grp
)->sin_addr
;
376 assert (srclen
>= sizeof (struct sockaddr_in
));
377 imr
.imr_sourceaddr
= ((const struct sockaddr_in
*)src
)->sin_addr
;
378 if (setsockopt (fd
, SOL_IP
, IP_ADD_SOURCE_MEMBERSHIP
,
379 &imr
, sizeof (imr
)) == 0)
385 errno
= EAFNOSUPPORT
;
389 msg_Err (obj
, "cannot join source multicast group: %s",
390 vlc_strerror_c(net_errno
));
391 msg_Warn (obj
, "trying ASM instead of SSM...");
392 return net_Subscribe (obj
, fd
, grp
, grplen
);
396 int net_Subscribe (vlc_object_t
*obj
, int fd
,
397 const struct sockaddr
*grp
, socklen_t grplen
)
399 /* MCAST_JOIN_GROUP was introduced to OS X in v10.7, but it doesn't work,
400 * so ignore it to use the same code as on 10.5 or 10.6 */
401 #if defined (MCAST_JOIN_GROUP) && !defined (__APPLE__)
402 /* Family-agnostic Any-Source Multicast join */
406 memset (&gr
, 0, sizeof (gr
));
407 gr
.gr_interface
= var_GetIfIndex (obj
);
409 switch (grp
->sa_family
)
414 const struct sockaddr_in6
*g6
= (const struct sockaddr_in6
*)grp
;
417 assert (grplen
>= sizeof (struct sockaddr_in6
));
418 if (g6
->sin6_scope_id
!= 0)
419 gr
.gr_interface
= g6
->sin6_scope_id
;
427 errno
= EAFNOSUPPORT
;
431 assert (grplen
<= sizeof (gr
.gr_group
));
432 memcpy (&gr
.gr_group
, grp
, grplen
);
433 if (setsockopt (fd
, level
, MCAST_JOIN_GROUP
, &gr
, sizeof (gr
)) == 0)
437 switch (grp
->sa_family
)
439 # ifdef IPV6_JOIN_GROUP
442 struct ipv6_mreq ipv6mr
;
443 const struct sockaddr_in6
*g6
= (const struct sockaddr_in6
*)grp
;
445 memset (&ipv6mr
, 0, sizeof (ipv6mr
));
446 assert (grplen
>= sizeof (struct sockaddr_in6
));
447 ipv6mr
.ipv6mr_multiaddr
= g6
->sin6_addr
;
448 ipv6mr
.ipv6mr_interface
= g6
->sin6_scope_id
;
449 if (!setsockopt (fd
, SOL_IPV6
, IPV6_JOIN_GROUP
,
450 &ipv6mr
, sizeof (ipv6mr
)))
455 # ifdef IP_ADD_MEMBERSHIP
460 memset (&imr
, 0, sizeof (imr
));
461 assert (grplen
>= sizeof (struct sockaddr_in
));
462 imr
.imr_multiaddr
= ((const struct sockaddr_in
*)grp
)->sin_addr
;
463 if (setsockopt (fd
, SOL_IP
, IP_ADD_MEMBERSHIP
,
464 &imr
, sizeof (imr
)) == 0)
470 errno
= EAFNOSUPPORT
;
474 msg_Err (obj
, "cannot join multicast group: %s",
475 vlc_strerror_c(net_errno
));
480 static int net_SetDSCP( int fd
, uint8_t dscp
)
482 struct sockaddr_storage addr
;
483 if( getsockname( fd
, (struct sockaddr
*)&addr
, &(socklen_t
){ sizeof (addr
) }) )
488 switch( addr
.ss_family
)
509 return setsockopt( fd
, level
, cmd
, &(int){ dscp
}, sizeof (int));
512 #undef net_ConnectDgram
513 /*****************************************************************************
515 *****************************************************************************
516 * Open a datagram socket to send data to a defined destination, with an
517 * optional hop limit.
518 *****************************************************************************/
519 int net_ConnectDgram( vlc_object_t
*p_this
, const char *psz_host
, int i_port
,
520 int i_hlim
, int proto
)
522 struct addrinfo hints
= {
523 .ai_socktype
= SOCK_DGRAM
,
524 .ai_protocol
= proto
,
525 .ai_flags
= AI_NUMERICSERV
| AI_IDN
,
528 bool b_unreach
= false;
531 i_hlim
= var_InheritInteger( p_this
, "ttl" );
533 msg_Dbg( p_this
, "net: connecting to [%s]:%d", psz_host
, i_port
);
535 int val
= vlc_getaddrinfo (psz_host
, i_port
, &hints
, &res
);
538 msg_Err (p_this
, "cannot resolve [%s]:%d : %s", psz_host
, i_port
,
543 for (struct addrinfo
*ptr
= res
; ptr
!= NULL
; ptr
= ptr
->ai_next
)
546 int fd
= net_Socket (p_this
, ptr
->ai_family
, ptr
->ai_socktype
,
551 /* Allow broadcast sending */
552 setsockopt (fd
, SOL_SOCKET
, SO_BROADCAST
, &(int){ 1 }, sizeof (int));
555 net_SetMcastHopLimit( p_this
, fd
, ptr
->ai_family
, i_hlim
);
557 str
= var_InheritString (p_this
, "miface");
560 net_SetMcastOut (p_this
, fd
, ptr
->ai_family
, str
);
564 net_SetDSCP (fd
, var_InheritInteger (p_this
, "dscp"));
566 if( connect( fd
, ptr
->ai_addr
, ptr
->ai_addrlen
) == 0 )
573 #if defined( _WIN32 )
574 if( WSAGetLastError () == WSAENETUNREACH
)
576 if( errno
== ENETUNREACH
)
580 msg_Warn( p_this
, "%s port %d : %s", psz_host
, i_port
,
581 vlc_strerror_c(errno
) );
590 msg_Err( p_this
, "Host %s port %d is unreachable", psz_host
,
599 /*****************************************************************************
601 *****************************************************************************
602 * OpenDgram a datagram socket and return a handle
603 *****************************************************************************/
604 int net_OpenDgram( vlc_object_t
*obj
, const char *psz_bind
, int i_bind
,
605 const char *psz_server
, int i_server
, int protocol
)
607 if ((psz_server
== NULL
) || (psz_server
[0] == '\0'))
608 return net_ListenSingle (obj
, psz_bind
, i_bind
, protocol
);
610 msg_Dbg (obj
, "net: connecting to [%s]:%d from [%s]:%d",
611 psz_server
, i_server
, psz_bind
, i_bind
);
613 struct addrinfo hints
= {
614 .ai_socktype
= SOCK_DGRAM
,
615 .ai_protocol
= protocol
,
616 .ai_flags
= AI_NUMERICSERV
| AI_IDN
,
619 int val
= vlc_getaddrinfo (psz_server
, i_server
, &hints
, &rem
);
622 msg_Err (obj
, "cannot resolve %s port %d : %s", psz_bind
, i_bind
,
627 hints
.ai_flags
|= AI_PASSIVE
;
628 val
= vlc_getaddrinfo (psz_bind
, i_bind
, &hints
, &loc
);
631 msg_Err (obj
, "cannot resolve %s port %d : %s", psz_bind
, i_bind
,
638 for (struct addrinfo
*ptr
= loc
; ptr
!= NULL
; ptr
= ptr
->ai_next
)
640 int fd
= net_Socket (obj
, ptr
->ai_family
, ptr
->ai_socktype
,
643 continue; // usually, address family not supported
645 fd
= net_SetupDgramSocket( obj
, fd
, ptr
);
649 for (struct addrinfo
*ptr2
= rem
; ptr2
!= NULL
; ptr2
= ptr2
->ai_next
)
651 if ((ptr2
->ai_family
!= ptr
->ai_family
)
652 || (ptr2
->ai_socktype
!= ptr
->ai_socktype
)
653 || (ptr2
->ai_protocol
!= ptr
->ai_protocol
))
656 if (net_SockAddrIsMulticast (ptr
->ai_addr
, ptr
->ai_addrlen
)
657 ? net_SourceSubscribe (obj
, fd
,
658 ptr2
->ai_addr
, ptr2
->ai_addrlen
,
659 ptr
->ai_addr
, ptr
->ai_addrlen
)
660 : connect (fd
, ptr2
->ai_addr
, ptr2
->ai_addrlen
))
662 msg_Err (obj
, "cannot connect to %s port %d: %s",
663 psz_server
, i_server
, vlc_strerror_c(net_errno
));
684 * Sets the send and receive checksum coverage of a socket:
686 * @param sendcov payload coverage of sent packets (bytes), -1 for full
687 * @param recvcov minimum payload coverage of received packets, -1 for full
689 int net_SetCSCov (int fd
, int sendcov
, int recvcov
)
693 if (getsockopt (fd
, SOL_SOCKET
, SO_TYPE
,
694 &type
, &(socklen_t
){ sizeof (type
) }))
699 #ifdef UDPLITE_RECV_CSCOV
700 case SOCK_DGRAM
: /* UDP-Lite */
704 sendcov
+= 8; /* partial */
705 if (setsockopt (fd
, SOL_UDPLITE
, UDPLITE_SEND_CSCOV
, &sendcov
,
713 if (setsockopt (fd
, SOL_UDPLITE
, UDPLITE_RECV_CSCOV
,
714 &recvcov
, sizeof (recvcov
)))
719 #ifdef DCCP_SOCKOPT_SEND_CSCOV
720 case SOCK_DCCP
: /* DCCP and its ill-named socket type */
721 if ((sendcov
== -1) || (sendcov
> 56))
724 sendcov
= (sendcov
+ 3) / 4;
725 if (setsockopt (fd
, SOL_DCCP
, DCCP_SOCKOPT_SEND_CSCOV
,
726 &sendcov
, sizeof (sendcov
)))
729 if ((recvcov
== -1) || (recvcov
> 56))
732 recvcov
= (recvcov
+ 3) / 4;
733 if (setsockopt (fd
, SOL_DCCP
, DCCP_SOCKOPT_RECV_CSCOV
,
734 &recvcov
, sizeof (recvcov
)))
740 #if !defined( UDPLITE_RECV_CSCOV ) && !defined( DCCP_SOCKOPT_SEND_CSCOV )