1 /*****************************************************************************
3 *****************************************************************************
4 * Copyright (C) 2004-2006 the VideoLAN team
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
13 * it under the terms of the GNU General Public License as published by
14 * the Free Software Foundation; either version 2 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 General Public License for more details.
22 * You should have received a copy of the GNU General Public License
23 * along with this program; if not, write to the Free Software
24 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
25 *****************************************************************************/
27 /*****************************************************************************
29 *****************************************************************************/
34 #include <vlc_common.h>
38 #ifdef HAVE_SYS_TIME_H
39 # include <sys/time.h>
42 #include <vlc_network.h>
45 # if defined(UNDER_CE)
46 # undef IP_MULTICAST_TTL
47 # define IP_MULTICAST_TTL 3
48 # undef IP_ADD_MEMBERSHIP
49 # define IP_ADD_MEMBERSHIP 5
51 # define EAFNOSUPPORT WSAEAFNOSUPPORT
52 # define if_nametoindex( str ) atoi( str )
60 #ifdef HAVE_LINUX_DCCP_H
61 # include <linux/dccp.h>
62 # ifndef SOCK_DCCP /* provisional API */
68 # define SOL_IP IPPROTO_IP
71 # define SOL_IPV6 IPPROTO_IPV6
74 # define IPPROTO_IPV6 41 /* IANA */
77 # define SOL_DCCP IPPROTO_DCCP
80 # define IPPROTO_DCCP 33 /* IANA */
83 # define SOL_UDPLITE IPPROTO_UDPLITE
85 #ifndef IPPROTO_UDPLITE
86 # define IPPROTO_UDPLITE 136 /* IANA */
89 #if defined (HAVE_NETINET_UDPLITE_H)
90 # include <netinet/udplite.h>
91 #elif defined (__linux__)
92 /* still missing from glibc 2.6 */
93 # define UDPLITE_SEND_CSCOV 10
94 # define UDPLITE_RECV_CSCOV 11
97 extern int net_Socket( vlc_object_t *p_this, int i_family, int i_socktype,
101 static int net_SetupDgramSocket( vlc_object_t *p_obj, int fd, const struct addrinfo *ptr )
104 setsockopt (fd, SOL_SOCKET, SO_REUSEPORT, &(int){ 1 }, sizeof (int));
108 /* Increase the receive buffer size to 1/2MB (8Mb/s during 1/2s)
109 * to avoid packet loss caused in case of scheduling hiccups */
110 setsockopt (fd, SOL_SOCKET, SO_RCVBUF,
111 (void *)&(int){ 0x80000 }, sizeof (int));
112 setsockopt (fd, SOL_SOCKET, SO_SNDBUF,
113 (void *)&(int){ 0x80000 }, sizeof (int));
116 #if defined (WIN32) || defined (UNDER_CE)
117 if (net_SockAddrIsMulticast (ptr->ai_addr, ptr->ai_addrlen)
118 && (sizeof (struct sockaddr_storage) >= ptr->ai_addrlen))
120 // This works for IPv4 too - don't worry!
121 struct sockaddr_in6 dumb =
123 .sin6_family = ptr->ai_addr->sa_family,
124 .sin6_port = ((struct sockaddr_in *)(ptr->ai_addr))->sin_port
127 bind (fd, (struct sockaddr *)&dumb, ptr->ai_addrlen);
131 if (bind (fd, ptr->ai_addr, ptr->ai_addrlen))
133 msg_Err( p_obj, "socket bind error (%m)" );
141 static int net_ListenSingle (vlc_object_t *obj, const char *host, int port,
142 int family, int protocol)
144 struct addrinfo hints, *res;
146 memset (&hints, 0, sizeof( hints ));
147 hints.ai_family = family;
148 hints.ai_socktype = SOCK_DGRAM;
149 hints.ai_flags = AI_PASSIVE;
154 msg_Dbg (obj, "net: opening %s datagram port %d",
155 host ? host : "any", port);
157 int val = vlc_getaddrinfo (obj, host, port, &hints, &res);
160 msg_Err (obj, "Cannot resolve %s port %d : %s", host, port,
161 vlc_gai_strerror (val));
168 for (const struct addrinfo *ptr = res; ptr != NULL; ptr = ptr->ai_next)
170 int fd = net_Socket (obj, ptr->ai_family, ptr->ai_socktype,
171 protocol ? protocol : ptr->ai_protocol);
174 msg_Dbg (obj, "socket error: %m");
179 /* If IPv6 was forced, set IPv6-only mode.
180 * If IPv4 was forced, do nothing extraordinary.
181 * If nothing was forced, try dual-mode IPv6. */
182 if (ptr->ai_family == AF_INET6)
184 int on = (family == AF_INET6);
185 setsockopt (fd, SOL_IPV6, IPV6_V6ONLY, &on, sizeof (on));
187 else if (ptr->ai_family == AF_INET && family == AF_UNSPEC)
189 for (const struct addrinfo *p = ptr; p != NULL; p = p->ai_next)
190 if (p->ai_family == AF_INET6)
200 if (family == AF_UNSPEC && ptr->ai_next != NULL)
202 msg_Warn (obj, "ambiguous network protocol specification");
203 msg_Warn (obj, "please select IP version explicitly");
207 fd = net_SetupDgramSocket( obj, fd, ptr );
211 if (net_SockAddrIsMulticast (ptr->ai_addr, ptr->ai_addrlen)
212 && net_Subscribe (obj, fd, ptr->ai_addr, ptr->ai_addrlen))
222 vlc_freeaddrinfo (res);
227 static int net_SetMcastHopLimit( vlc_object_t *p_this,
228 int fd, int family, int hlim )
232 /* There is some confusion in the world whether IP_MULTICAST_TTL
233 * takes a byte or an int as an argument.
234 * BSD seems to indicate byte so we are going with that and use
235 * int as a fallback to be safe */
238 #ifdef IP_MULTICAST_TTL
241 cmd = IP_MULTICAST_TTL;
245 #ifdef IPV6_MULTICAST_HOPS
248 cmd = IPV6_MULTICAST_HOPS;
253 errno = EAFNOSUPPORT;
254 msg_Warn( p_this, "%m" );
258 if( setsockopt( fd, proto, cmd, &hlim, sizeof( hlim ) ) < 0 )
260 /* BSD compatibility */
263 buf = (unsigned char)(( hlim > 255 ) ? 255 : hlim);
264 if( setsockopt( fd, proto, cmd, &buf, sizeof( buf ) ) )
272 static int net_SetMcastOutIface (int fd, int family, int scope)
276 #ifdef IPV6_MULTICAST_IF
278 return setsockopt (fd, SOL_IPV6, IPV6_MULTICAST_IF,
279 &scope, sizeof (scope));
285 struct ip_mreqn req = { .imr_ifindex = scope };
287 return setsockopt (fd, SOL_IP, IP_MULTICAST_IF, &req,
293 errno = EAFNOSUPPORT;
298 static inline int net_SetMcastOutIPv4 (int fd, struct in_addr ipv4)
300 #ifdef IP_MULTICAST_IF
301 return setsockopt( fd, SOL_IP, IP_MULTICAST_IF, &ipv4, sizeof (ipv4));
303 errno = EAFNOSUPPORT;
309 static int net_SetMcastOut (vlc_object_t *p_this, int fd, int family,
310 const char *iface, const char *addr)
314 int scope = if_nametoindex (iface);
317 msg_Err (p_this, "invalid multicast interface: %s", iface);
321 if (net_SetMcastOutIface (fd, family, scope) == 0)
324 msg_Err (p_this, "%s: %m", iface);
329 if (family == AF_INET)
332 if (inet_pton (AF_INET, addr, &ipv4) <= 0)
334 msg_Err (p_this, "invalid IPv4 address for multicast: %s",
339 if (net_SetMcastOutIPv4 (fd, ipv4) == 0)
342 msg_Err (p_this, "%s: %m", addr);
351 * Old-style any-source multicast join.
352 * In use on Windows XP/2003 and older.
355 net_IPv4Join (vlc_object_t *obj, int fd,
356 const struct sockaddr_in *src, const struct sockaddr_in *grp)
358 #ifdef IP_ADD_MEMBERSHIP
362 # ifdef IP_ADD_SOURCE_MEMBERSHIP
363 struct ip_mreq_source gsr4;
367 struct in_addr id = { .s_addr = INADDR_ANY };
370 /* Multicast interface IPv4 address */
371 char *iface = var_CreateGetNonEmptyString (obj, "miface-addr");
373 && (inet_pton (AF_INET, iface, &id) <= 0))
375 msg_Err (obj, "invalid multicast interface address %s", iface);
381 memset (&opt, 0, sizeof (opt));
384 # ifdef IP_ADD_SOURCE_MEMBERSHIP
385 cmd = IP_ADD_SOURCE_MEMBERSHIP;
386 opt.gsr4.imr_multiaddr = grp->sin_addr;
387 opt.gsr4.imr_sourceaddr = src->sin_addr;
388 opt.gsr4.imr_interface = id;
389 optlen = sizeof (opt.gsr4);
397 cmd = IP_ADD_MEMBERSHIP;
398 opt.gr4.imr_multiaddr = grp->sin_addr;
399 opt.gr4.imr_interface = id;
400 optlen = sizeof (opt.gr4);
403 msg_Dbg (obj, "IP_ADD_%sMEMBERSHIP multicast request",
404 (src != NULL) ? "SOURCE_" : "");
406 if (setsockopt (fd, SOL_IP, cmd, &opt, optlen) == 0)
412 msg_Err (obj, "cannot join IPv4 multicast group (%m)");
418 net_IPv6Join (vlc_object_t *obj, int fd, const struct sockaddr_in6 *src)
420 #ifdef IPV6_JOIN_GROUP
421 struct ipv6_mreq gr6;
422 memset (&gr6, 0, sizeof (gr6));
423 gr6.ipv6mr_interface = src->sin6_scope_id;
424 memcpy (&gr6.ipv6mr_multiaddr, &src->sin6_addr, 16);
426 msg_Dbg (obj, "IPV6_JOIN_GROUP multicast request");
428 if (!setsockopt (fd, SOL_IPV6, IPV6_JOIN_GROUP, &gr6, sizeof (gr6)))
434 msg_Err (obj, "cannot join IPv6 any-source multicast group (%m)");
439 #if defined (WIN32) && !defined (MCAST_JOIN_SOURCE_GROUP)
441 * I hate manual definitions: Error-prone. Portability hell.
442 * Developers shall use UP-TO-DATE compilers. Full point.
443 * If you remove the warning, you remove the whole ifndef.
445 # warning Your C headers are out-of-date. Please update.
447 # define MCAST_JOIN_GROUP 41
451 struct sockaddr_storage gr_group;
454 # define MCAST_JOIN_SOURCE_GROUP 45 /* from <ws2ipdef.h> */
455 struct group_source_req
457 uint32_t gsr_interface;
458 struct sockaddr_storage gsr_group;
459 struct sockaddr_storage gsr_source;
464 * IP-agnostic multicast join,
465 * with fallback to old APIs, and fallback from SSM to ASM.
468 net_SourceSubscribe (vlc_object_t *obj, int fd,
469 const struct sockaddr *src, socklen_t srclen,
470 const struct sockaddr *grp, socklen_t grplen)
474 char *iface = var_CreateGetNonEmptyString (obj, "miface");
477 iid = if_nametoindex (iface);
480 msg_Err (obj, "invalid multicast interface: %s", iface);
487 switch (grp->sa_family)
492 if (((const struct sockaddr_in6 *)grp)->sin6_scope_id)
493 iid = ((const struct sockaddr_in6 *)grp)->sin6_scope_id;
502 errno = EAFNOSUPPORT;
507 switch (src->sa_family)
511 if (memcmp (&((const struct sockaddr_in6 *)src)->sin6_addr,
512 &in6addr_any, sizeof (in6addr_any)) == 0)
518 if (((const struct sockaddr_in *)src)->sin_addr.s_addr
525 /* Agnostic ASM/SSM multicast join */
526 #ifdef MCAST_JOIN_SOURCE_GROUP
530 struct group_source_req gsr;
534 memset (&opt, 0, sizeof (opt));
538 if ((grplen > sizeof (opt.gsr.gsr_group))
539 || (srclen > sizeof (opt.gsr.gsr_source)))
542 opt.gsr.gsr_interface = iid;
543 memcpy (&opt.gsr.gsr_source, src, srclen);
544 memcpy (&opt.gsr.gsr_group, grp, grplen);
545 optlen = sizeof (opt.gsr);
549 if (grplen > sizeof (opt.gr.gr_group))
552 opt.gr.gr_interface = iid;
553 memcpy (&opt.gr.gr_group, grp, grplen);
554 optlen = sizeof (opt.gr);
557 msg_Dbg (obj, "Multicast %sgroup join request", src ? "source " : "");
559 if (setsockopt (fd, level,
560 src ? MCAST_JOIN_SOURCE_GROUP : MCAST_JOIN_GROUP,
561 (void *)&opt, optlen) == 0)
565 /* Fallback to IPv-specific APIs */
566 if ((src != NULL) && (src->sa_family != grp->sa_family))
569 switch (grp->sa_family)
572 if ((grplen < sizeof (struct sockaddr_in))
573 || ((src != NULL) && (srclen < sizeof (struct sockaddr_in))))
576 if (net_IPv4Join (obj, fd, (const struct sockaddr_in *)src,
577 (const struct sockaddr_in *)grp) == 0)
583 if ((grplen < sizeof (struct sockaddr_in6))
584 || ((src != NULL) && (srclen < sizeof (struct sockaddr_in6))))
587 /* IPv6-specific SSM API does not exist. So if we're here
588 * it means IPv6 SSM is not supported on this OS and we
589 * directly fallback to ASM */
591 if (net_IPv6Join (obj, fd, (const struct sockaddr_in6 *)grp) == 0)
597 msg_Err (obj, "Multicast group join error (%m)");
601 msg_Warn (obj, "Trying ASM instead of SSM...");
602 return net_Subscribe (obj, fd, grp, grplen);
605 msg_Err (obj, "Multicast not supported");
610 int net_Subscribe (vlc_object_t *obj, int fd,
611 const struct sockaddr *addr, socklen_t addrlen)
613 return net_SourceSubscribe (obj, fd, NULL, 0, addr, addrlen);
617 static int net_SetDSCP( int fd, uint8_t dscp )
619 struct sockaddr_storage addr;
620 if( getsockname( fd, (struct sockaddr *)&addr, &(socklen_t){ sizeof (addr) }) )
625 switch( addr.ss_family )
646 return setsockopt( fd, level, cmd, &(int){ dscp }, sizeof (int));
650 /*****************************************************************************
651 * __net_ConnectDgram:
652 *****************************************************************************
653 * Open a datagram socket to send data to a defined destination, with an
654 * optional hop limit.
655 *****************************************************************************/
656 int __net_ConnectDgram( vlc_object_t *p_this, const char *psz_host, int i_port,
657 int i_hlim, int proto )
659 struct addrinfo hints, *res, *ptr;
660 int i_val, i_handle = -1;
661 bool b_unreach = false;
664 i_hlim = var_CreateGetInteger( p_this, "ttl" );
666 memset( &hints, 0, sizeof( hints ) );
667 hints.ai_socktype = SOCK_DGRAM;
669 msg_Dbg( p_this, "net: connecting to [%s]:%d", psz_host, i_port );
671 i_val = vlc_getaddrinfo( p_this, psz_host, i_port, &hints, &res );
674 msg_Err( p_this, "cannot resolve [%s]:%d : %s", psz_host, i_port,
675 vlc_gai_strerror( i_val ) );
679 for( ptr = res; ptr != NULL; ptr = ptr->ai_next )
682 int fd = net_Socket (p_this, ptr->ai_family, ptr->ai_socktype,
683 proto ? proto : ptr->ai_protocol);
687 #if !defined( SYS_BEOS )
688 /* Increase the receive buffer size to 1/2MB (8Mb/s during 1/2s)
689 * to avoid packet loss caused by scheduling problems */
690 setsockopt (fd, SOL_SOCKET, SO_RCVBUF, &(int){ 0x80000 }, sizeof (int));
691 setsockopt (fd, SOL_SOCKET, SO_SNDBUF, &(int){ 0x80000 }, sizeof (int));
693 /* Allow broadcast sending */
694 setsockopt (fd, SOL_SOCKET, SO_BROADCAST, &(int){ 1 }, sizeof (int));
698 net_SetMcastHopLimit( p_this, fd, ptr->ai_family, i_hlim );
700 str = var_CreateGetNonEmptyString (p_this, "miface");
703 net_SetMcastOut (p_this, fd, ptr->ai_family, str, NULL);
707 str = var_CreateGetNonEmptyString (p_this, "miface-addr");
710 net_SetMcastOut (p_this, fd, ptr->ai_family, NULL, str);
714 net_SetDSCP (fd, var_CreateGetInteger (p_this, "dscp"));
716 if( connect( fd, ptr->ai_addr, ptr->ai_addrlen ) == 0 )
723 #if defined( WIN32 ) || defined( UNDER_CE )
724 if( WSAGetLastError () == WSAENETUNREACH )
726 if( errno == ENETUNREACH )
731 msg_Warn( p_this, "%s port %d : %m", psz_host, i_port);
737 vlc_freeaddrinfo( res );
742 msg_Err( p_this, "Host %s port %d is unreachable", psz_host,
751 /*****************************************************************************
753 *****************************************************************************
754 * OpenDgram a datagram socket and return a handle
755 *****************************************************************************/
756 int __net_OpenDgram( vlc_object_t *obj, const char *psz_bind, int i_bind,
757 const char *psz_server, int i_server,
758 int family, int protocol )
760 if ((psz_server == NULL) || (psz_server[0] == '\0'))
761 return net_ListenSingle (obj, psz_bind, i_bind, family, protocol);
763 msg_Dbg (obj, "net: connecting to [%s]:%d from [%s]:%d",
764 psz_server, i_server, psz_bind, i_bind);
766 struct addrinfo hints, *loc, *rem;
769 memset (&hints, 0, sizeof (hints));
770 hints.ai_family = family;
771 hints.ai_socktype = SOCK_DGRAM;
773 val = vlc_getaddrinfo (obj, psz_server, i_server, &hints, &rem);
776 msg_Err (obj, "cannot resolve %s port %d : %s", psz_bind, i_bind,
777 vlc_gai_strerror (val));
781 hints.ai_flags = AI_PASSIVE;
782 val = vlc_getaddrinfo (obj, psz_bind, i_bind, &hints, &loc);
785 msg_Err (obj, "cannot resolve %s port %d : %s", psz_bind, i_bind,
786 vlc_gai_strerror (val));
787 vlc_freeaddrinfo (rem);
791 for (struct addrinfo *ptr = loc; ptr != NULL; ptr = ptr->ai_next)
793 int fd = net_Socket (obj, ptr->ai_family, ptr->ai_socktype,
794 protocol ? protocol : ptr->ai_protocol);
796 continue; // usually, address family not supported
798 fd = net_SetupDgramSocket( obj, fd, ptr );
803 for (struct addrinfo *ptr2 = rem; ptr2 != NULL; ptr2 = ptr2->ai_next)
805 if ((ptr2->ai_family != ptr->ai_family)
806 || (ptr2->ai_socktype != ptr->ai_socktype)
807 || (ptr2->ai_protocol != ptr->ai_protocol))
810 if (net_SockAddrIsMulticast (ptr->ai_addr, ptr->ai_addrlen)
811 ? net_SourceSubscribe (obj, fd,
812 ptr2->ai_addr, ptr2->ai_addrlen,
813 ptr->ai_addr, ptr->ai_addrlen)
814 : connect (fd, ptr2->ai_addr, ptr2->ai_addrlen))
816 msg_Err (obj, "cannot connect to %s port %d: %m",
817 psz_server, i_server);
830 vlc_freeaddrinfo (rem);
831 vlc_freeaddrinfo (loc);
838 * Sets the send and receive checksum coverage of a socket:
840 * @param sendcov payload coverage of sent packets (bytes), -1 for full
841 * @param recvcov minimum payload coverage of received packets, -1 for full
843 int net_SetCSCov (int fd, int sendcov, int recvcov)
847 if (getsockopt (fd, SOL_SOCKET, SO_TYPE,
848 &type, &(socklen_t){ sizeof (type) }))
853 #ifdef UDPLITE_RECV_CSCOV
854 case SOCK_DGRAM: /* UDP-Lite */
858 sendcov += 8; /* partial */
859 if (setsockopt (fd, SOL_UDPLITE, UDPLITE_SEND_CSCOV, &sendcov,
867 if (setsockopt (fd, SOL_UDPLITE, UDPLITE_RECV_CSCOV,
868 &recvcov, sizeof (recvcov)))
873 #ifdef DCCP_SOCKOPT_SEND_CSCOV
874 case SOCK_DCCP: /* DCCP and its ill-named socket type */
875 if ((sendcov == -1) || (sendcov > 56))
878 sendcov = (sendcov + 3) / 4;
879 if (setsockopt (fd, SOL_DCCP, DCCP_SOCKOPT_SEND_CSCOV,
880 &sendcov, sizeof (sendcov)))
883 if ((recvcov == -1) || (recvcov > 56))
886 recvcov = (recvcov + 3) / 4;
887 if (setsockopt (fd, SOL_DCCP, DCCP_SOCKOPT_RECV_CSCOV,
888 &recvcov, sizeof (recvcov)))
894 #if !defined( UDPLITE_RECV_CSCOV ) && !defined( DCCP_SOCKOPT_SEND_CSCOV )