1 /*****************************************************************************
3 *****************************************************************************
4 * Copyright (C) 2004-2006 the VideoLAN team
5 * Copyright © 2006 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 *****************************************************************************/
35 #ifdef HAVE_SYS_TIME_H
36 # include <sys/time.h>
39 #include <vlc_network.h>
42 # if defined(UNDER_CE)
43 # undef IP_MULTICAST_TTL
44 # define IP_MULTICAST_TTL 3
45 # undef IP_ADD_MEMBERSHIP
46 # define IP_ADD_MEMBERSHIP 5
48 # define EAFNOSUPPORT WSAEAFNOSUPPORT
49 # define if_nametoindex( str ) atoi( str )
58 # define SOL_IP IPPROTO_IP
61 # define SOL_IPV6 IPPROTO_IPV6
64 # define IPPROTO_IPV6 41
67 extern int net_Socket( vlc_object_t *p_this, int i_family, int i_socktype,
72 * XXX: I am too lazy to put all these dual functions in “next generation”
76 static int net_SetMcastHopLimit( vlc_object_t *p_this,
77 int fd, int family, int hlim )
81 /* There is some confusion in the world whether IP_MULTICAST_TTL
82 * takes a byte or an int as an argument.
83 * BSD seems to indicate byte so we are going with that and use
84 * int as a fallback to be safe */
87 #ifdef IP_MULTICAST_TTL
90 cmd = IP_MULTICAST_TTL;
94 #ifdef IPV6_MULTICAST_HOPS
97 cmd = IPV6_MULTICAST_HOPS;
102 msg_Warn( p_this, "%s", strerror( EAFNOSUPPORT ) );
106 if( setsockopt( fd, proto, cmd, &hlim, sizeof( hlim ) ) < 0 )
108 /* BSD compatibility */
111 buf = (unsigned char)(( hlim > 255 ) ? 255 : hlim);
112 if( setsockopt( fd, proto, cmd, &buf, sizeof( buf ) ) )
120 static int net_SetMcastOutIface (int fd, int family, int scope)
124 #ifdef IPV6_MULTICAST_IF
126 return setsockopt (fd, SOL_IPV6, IPV6_MULTICAST_IF,
127 &scope, sizeof (scope));
133 struct ip_mreqn req = { .imr_ifindex = scope };
135 return setsockopt (fd, SOL_IP, IP_MULTICAST_IF, &req,
141 errno = EAFNOSUPPORT;
146 static inline int net_SetMcastOutIPv4 (int fd, struct in_addr ipv4)
148 #ifdef IP_MULTICAST_IF
149 return setsockopt( fd, SOL_IP, IP_MULTICAST_IF, &ipv4, sizeof (ipv4));
151 errno = EAFNOSUPPORT;
157 static int net_SetMcastOut (vlc_object_t *p_this, int fd, int family,
158 const char *iface, const char *addr)
162 int scope = if_nametoindex (iface);
165 msg_Err (p_this, "invalid multicast interface: %s", iface);
169 if (net_SetMcastOutIface (fd, family, scope) == 0)
172 msg_Err (p_this, "%s: %s", iface, net_strerror (net_errno));
177 if (family == AF_INET)
180 if (inet_pton (AF_INET, addr, &ipv4) <= 0)
182 msg_Err (p_this, "invalid IPv4 address for multicast: %s",
187 if (net_SetMcastOutIPv4 (fd, ipv4) == 0)
190 msg_Err (p_this, "%s: %s", addr, net_strerror (net_errno));
199 * Old-style any-source multicast join.
200 * In use on Windows XP/2003 and older.
203 net_IPv4Join (vlc_object_t *obj, int fd,
204 const struct sockaddr_in *src, const struct sockaddr_in *grp)
206 #ifdef IP_ADD_MEMBERSHIP
210 # ifdef IP_ADD_SOURCE_MEMBERSHIP
211 struct ip_mreq_source gsr4;
215 struct in_addr id = { .s_addr = INADDR_ANY };
218 /* Multicast interface IPv4 address */
219 char *iface = var_CreateGetString (obj, "miface-addr");
223 && (inet_pton (AF_INET, iface, &id) <= 0))
225 msg_Err (obj, "invalid multicast interface address %s", iface);
231 memset (&opt, 0, sizeof (opt));
234 # ifdef IP_ADD_SOURCE_MEMBERSHIP
235 cmd = IP_ADD_SOURCE_MEMBERSHIP;
236 opt.gsr4.imr_multiaddr = grp->sin_addr;
237 opt.gsr4.imr_sourceaddr = src->sin_addr;
238 opt.gsr4.imr_interface = id;
239 optlen = sizeof (opt.gsr4);
247 cmd = IP_ADD_MEMBERSHIP;
248 opt.gr4.imr_multiaddr = grp->sin_addr;
249 opt.gr4.imr_interface = id;
250 optlen = sizeof (opt.gr4);
253 msg_Dbg (obj, "IP_ADD_%sMEMBERSHIP multicast request",
254 (src != NULL) ? "SOURCE_" : "");
256 if (setsockopt (fd, SOL_IP, cmd, &opt, optlen) == 0)
262 msg_Err (obj, "cannot join IPv4 multicast group (%s)",
263 net_strerror (net_errno));
269 net_IPv6Join (vlc_object_t *obj, int fd, const struct sockaddr_in6 *src)
271 #ifdef IPV6_JOIN_GROUP
272 struct ipv6_mreq gr6;
273 memset (&gr6, 0, sizeof (gr6));
274 gr6.ipv6mr_interface = src->sin6_scope_id;
275 memcpy (&gr6.ipv6mr_multiaddr, &src->sin6_addr, 16);
277 msg_Dbg (obj, "IPV6_JOIN_GROUP multicast request");
279 if (!setsockopt (fd, IPPROTO_IPV6, IPV6_JOIN_GROUP, &gr6, sizeof (gr6)))
285 msg_Err (obj, "cannot join IPv6 any-source multicast group (%s)",
286 net_strerror (net_errno));
291 #if defined (WIN32) && !defined (MCAST_JOIN_SOURCE_GROUP)
293 * I hate manual definitions: Error-prone. Portability hell.
294 * Developers shall use UP-TO-DATE compilers. Full point.
295 * If you remove the warning, you remove the whole ifndef.
297 # warning Your C headers are out-of-date. Please update.
299 # define MCAST_JOIN_GROUP 41
303 struct sockaddr_storage gr_group;
306 # define MCAST_JOIN_SOURCE_GROUP 45 /* from <ws2ipdef.h> */
307 struct group_source_req
309 uint32_t gsr_interface;
310 struct sockaddr_storage gsr_group;
311 struct sockaddr_storage gsr_source;
316 * IP-agnostic multicast join,
317 * with fallback to old APIs, and fallback from SSM to ASM.
320 net_SourceSubscribe (vlc_object_t *obj, int fd,
321 const struct sockaddr *src, socklen_t srclen,
322 const struct sockaddr *grp, socklen_t grplen)
326 char *iface = var_CreateGetString (obj, "miface");
331 iid = if_nametoindex (iface);
334 msg_Err (obj, "invalid multicast interface: %s", iface);
342 switch (grp->sa_family)
347 if (((const struct sockaddr_in6 *)grp)->sin6_scope_id)
348 iid = ((const struct sockaddr_in6 *)grp)->sin6_scope_id;
357 errno = EAFNOSUPPORT;
362 switch (src->sa_family)
366 if (memcmp (&((const struct sockaddr_in6 *)src)->sin6_addr,
367 &in6addr_any, sizeof (in6addr_any)) == 0)
373 if (((const struct sockaddr_in *)src)->sin_addr.s_addr
380 /* Agnostic ASM/SSM multicast join */
381 #ifdef MCAST_JOIN_SOURCE_GROUP
385 struct group_source_req gsr;
389 memset (&opt, 0, sizeof (opt));
393 if ((grplen > sizeof (opt.gsr.gsr_group))
394 || (srclen > sizeof (opt.gsr.gsr_source)))
397 opt.gsr.gsr_interface = iid;
398 memcpy (&opt.gsr.gsr_source, src, srclen);
399 memcpy (&opt.gsr.gsr_group, grp, grplen);
400 optlen = sizeof (opt.gsr);
404 if (grplen > sizeof (opt.gr.gr_group))
407 opt.gr.gr_interface = iid;
408 memcpy (&opt.gr.gr_group, grp, grplen);
409 optlen = sizeof (opt.gr);
412 msg_Dbg (obj, "Multicast %sgroup join request", src ? "source " : "");
414 if (setsockopt (fd, level,
415 src ? MCAST_JOIN_SOURCE_GROUP : MCAST_JOIN_GROUP,
416 (void *)&opt, optlen) == 0)
420 /* Fallback to IPv-specific APIs */
421 if ((src != NULL) && (src->sa_family != grp->sa_family))
424 switch (grp->sa_family)
427 if ((grplen < sizeof (struct sockaddr_in))
428 || ((src != NULL) && (srclen < sizeof (struct sockaddr_in))))
431 if (net_IPv4Join (obj, fd, (const struct sockaddr_in *)src,
432 (const struct sockaddr_in *)grp) == 0)
438 if ((grplen < sizeof (struct sockaddr_in6))
439 || ((src != NULL) && (srclen < sizeof (struct sockaddr_in6))))
442 /* IPv6-specific SSM API does not exist. So if we're here
443 * it means IPv6 SSM is not supported on this OS and we
444 * directly fallback to ASM */
446 if (net_IPv6Join (obj, fd, (const struct sockaddr_in6 *)grp) == 0)
452 msg_Err (obj, "Multicast group join error (%s)",
453 net_strerror (net_errno));
457 msg_Warn (obj, "Trying ASM instead of SSM...");
458 return net_Subscribe (obj, fd, grp, grplen);
461 msg_Err (obj, "Multicast not supported");
466 int net_Subscribe (vlc_object_t *obj, int fd,
467 const struct sockaddr *addr, socklen_t addrlen)
469 return net_SourceSubscribe (obj, fd, NULL, 0, addr, addrlen);
473 int net_SetDSCP( int fd, uint8_t dscp )
475 struct sockaddr_storage addr;
476 if( getsockname( fd, (struct sockaddr *)&addr, &(socklen_t){ sizeof (addr) }) )
481 switch( addr.ss_family )
502 return setsockopt( fd, level, cmd, &(int){ dscp }, sizeof (int));
506 /*****************************************************************************
507 * __net_ConnectDgram:
508 *****************************************************************************
509 * Open a datagram socket to send data to a defined destination, with an
510 * optional hop limit.
511 *****************************************************************************/
512 int __net_ConnectDgram( vlc_object_t *p_this, const char *psz_host, int i_port,
513 int i_hlim, int proto )
515 struct addrinfo hints, *res, *ptr;
516 int i_val, i_handle = -1;
517 vlc_bool_t b_unreach = VLC_FALSE;
520 i_port = 1234; /* historical VLC thing */
523 i_hlim = var_CreateGetInteger( p_this, "ttl" );
525 memset( &hints, 0, sizeof( hints ) );
526 hints.ai_socktype = SOCK_DGRAM;
528 msg_Dbg( p_this, "net: connecting to %s port %d", psz_host, i_port );
530 i_val = vlc_getaddrinfo( p_this, psz_host, i_port, &hints, &res );
533 msg_Err( p_this, "cannot resolve %s port %d : %s", psz_host, i_port,
534 vlc_gai_strerror( i_val ) );
538 for( ptr = res; ptr != NULL; ptr = ptr->ai_next )
541 int fd = net_Socket (p_this, ptr->ai_family, ptr->ai_socktype,
542 proto ?: ptr->ai_protocol);
546 #if !defined( SYS_BEOS )
547 /* Increase the receive buffer size to 1/2MB (8Mb/s during 1/2s)
548 * to avoid packet loss caused by scheduling problems */
549 setsockopt (fd, SOL_SOCKET, SO_RCVBUF, &(int){ 0x80000 }, sizeof (int));
550 setsockopt (fd, SOL_SOCKET, SO_SNDBUF, &(int){ 0x80000 }, sizeof (int));
552 /* Allow broadcast sending */
553 setsockopt (fd, SOL_SOCKET, SO_BROADCAST, &(int){ 1 }, sizeof (int));
557 net_SetMcastHopLimit( p_this, fd, ptr->ai_family, i_hlim );
559 str = var_CreateGetString (p_this, "miface");
563 net_SetMcastOut (p_this, fd, ptr->ai_family, str, NULL);
567 str = var_CreateGetString (p_this, "miface-addr");
571 net_SetMcastOut (p_this, fd, ptr->ai_family, NULL, str);
575 net_SetDSCP (fd, var_CreateGetInteger (p_this, "dscp"));
577 if( connect( fd, ptr->ai_addr, ptr->ai_addrlen ) == 0 )
584 #if defined( WIN32 ) || defined( UNDER_CE )
585 if( WSAGetLastError () == WSAENETUNREACH )
587 if( errno == ENETUNREACH )
589 b_unreach = VLC_TRUE;
592 msg_Warn( p_this, "%s port %d : %s", psz_host, i_port,
599 vlc_freeaddrinfo( res );
604 msg_Err( p_this, "Host %s port %d is unreachable", psz_host,
613 /*****************************************************************************
615 *****************************************************************************
616 * OpenDgram a datagram socket and return a handle
617 *****************************************************************************/
618 int __net_OpenDgram( vlc_object_t *obj, const char *psz_bind, int i_bind,
619 const char *psz_server, int i_server,
620 int family, int protocol )
622 struct addrinfo hints, *loc, *rem;
626 return net_ListenSingle (obj, psz_bind, i_bind,
627 family, SOCK_DGRAM, protocol);
629 msg_Dbg( obj, "net: connecting to [%s]:%d from [%s]:%d",
630 psz_server, i_server, psz_bind, i_bind );
632 memset (&hints, 0, sizeof (hints));
633 hints.ai_family = family;
634 hints.ai_socktype = SOCK_DGRAM;
635 hints.ai_flags = AI_PASSIVE;
637 val = vlc_getaddrinfo (obj, psz_server, i_server, &hints, &rem);
640 msg_Err (obj, "cannot resolve %s port %d : %s", psz_bind, i_bind,
641 vlc_gai_strerror (val));
645 val = vlc_getaddrinfo (obj, psz_bind, i_bind, &hints, &loc);
648 msg_Err (obj, "cannot resolve %s port %d : %s", psz_bind, i_bind,
649 vlc_gai_strerror (val));
650 vlc_freeaddrinfo (rem);
654 for (struct addrinfo *ptr = loc; ptr != NULL; ptr = ptr->ai_next)
656 int fd = net_Socket (obj, ptr->ai_family, ptr->ai_socktype,
657 protocol ?: ptr->ai_protocol);
659 continue; // usually, address family not supported
662 setsockopt (fd, SOL_SOCKET, SO_REUSEPORT, &(int){ 1 }, sizeof (int));
666 /* Increase the receive buffer size to 1/2MB (8Mb/s during 1/2s)
667 * to avoid packet loss caused in case of scheduling hiccups */
668 setsockopt (fd, SOL_SOCKET, SO_RCVBUF,
669 (void *)&(int){ 0x80000 }, sizeof (int));
670 setsockopt (fd, SOL_SOCKET, SO_SNDBUF,
671 (void *)&(int){ 0x80000 }, sizeof (int));
674 #if defined (WIN32) || defined (UNDER_CE)
675 if (net_SockAddrIsMulticast (ptr->ai_addr, ptr->ai_addrlen)
676 && (sizeof (struct sockaddr_storage) >= ptr->ai_addrlen))
678 // This works for IPv4 too - don't worry!
679 struct sockaddr_in6 dumb =
681 .sin6_family = ptr->ai_addr->sa_family,
682 .sin6_port = ((struct sockaddr_in *)(ptr->ai_addr))->sin_port
685 bind (fd, (struct sockaddr *)&dumb, ptr->ai_addrlen);
689 if (bind (fd, ptr->ai_addr, ptr->ai_addrlen))
696 for (struct addrinfo *ptr2 = rem; ptr2 != NULL; ptr2 = ptr2->ai_next)
698 if ((ptr2->ai_family != ptr->ai_family)
699 || (ptr2->ai_socktype != ptr->ai_socktype)
700 || (ptr2->ai_protocol != ptr->ai_protocol))
703 if (net_SockAddrIsMulticast (ptr->ai_addr, ptr->ai_addrlen)
704 ? net_SourceSubscribe (obj, fd,
705 ptr2->ai_addr, ptr2->ai_addrlen,
706 ptr->ai_addr, ptr->ai_addrlen)
707 : connect (fd, ptr2->ai_addr, ptr2->ai_addrlen))
709 msg_Err (obj, "cannot connect to %s port %d: %s",
710 psz_server, i_server, net_strerror (net_errno));
723 vlc_freeaddrinfo (rem);
724 vlc_freeaddrinfo (loc);