git.sesse.net Git - vlc/blob - modules/misc/network/ipv6.c

   1 /*****************************************************************************
   2  * ipv6.c: IPv6 network abstraction layer
   3  *****************************************************************************
   4  * Copyright (C) 2002 VideoLAN
   5  * $Id: ipv6.c,v 1.16 2004/02/15 22:20:56 gbazin Exp $
   6  *
   7  * Authors: Alexis Guillard <alexis.guillard@bt.com>
   8  *          Christophe Massiot <massiot@via.ecp.fr>
   9  *          Remco Poortinga <poortinga@telin.nl>
  10  *
  11  * This program is free software; you can redistribute it and/or modify
  12  * it under the terms of the GNU General Public License as published by
  13  * the Free Software Foundation; either version 2 of the License, or
  14  * (at your option) any later version.
  15  *
  16  * This program is distributed in the hope that it will be useful,
  17  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  18  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  19  * GNU General Public License for more details.
  20  *
  21  * You should have received a copy of the GNU General Public License
  22  * along with this program; if not, write to the Free Software
  23  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111, USA.
  24  *****************************************************************************/
  25
  26 /*****************************************************************************
  27  * Preamble
  28  *****************************************************************************/
  29 #include <stdlib.h>
  30 #include <sys/types.h>
  31 #include <sys/stat.h>
  32 #include <string.h>
  33 #include <errno.h>
  34 #include <fcntl.h>
  35
  36 #include <vlc/vlc.h>
  37
  38 #ifdef HAVE_UNISTD_H
  39 #   include <unistd.h>
  40 #elif defined( _MSC_VER ) && defined( _WIN32 )
  41 #   include <io.h>
  42 #endif
  43
  44 #ifdef WIN32
  45 #   include <winsock2.h>
  46 #   include <ws2tcpip.h>
  47 #elif !defined( SYS_BEOS ) && !defined( SYS_NTO )
  48 #   include <netdb.h>                                         /* hostent ... */
  49 #   include <sys/socket.h>
  50 #   include <netinet/in.h>
  51 #   include <net/if.h>
  52 #   ifdef HAVE_ARPA_INET_H
  53 #       include <arpa/inet.h>                    /* inet_ntoa(), inet_aton() */
  54 #   endif
  55 #endif
  56
  57 #include "network.h"
  58
  59 #if defined(WIN32)
  60 static const struct in6_addr in6addr_any = {{IN6ADDR_ANY_INIT}};
  61 /* the following will have to be removed when w32api defines them */
  62 #ifndef IPPROTO_IPV6
  63 #   define IPPROTO_IPV6 41
  64 #endif
  65 #ifndef IPV6_JOIN_GROUP
  66 #   define IPV6_JOIN_GROUP 12
  67 #endif
  68 #ifndef IPV6_MULTICAST_HOPS
  69 #   define IPV6_MULTICAST_HOPS 10
  70 #endif
  71 #ifndef IPV6_UNICAST_HOPS
  72 #   define IPV6_UNICAST_HOPS 4
  73 #endif
  74 #   define close closesocket
  75 #endif
  76
  77 /*****************************************************************************
  78  * Local prototypes
  79  *****************************************************************************/
  80 static int Open( vlc_object_t * );
  81
  82 /*****************************************************************************
  83  * Module descriptor
  84  *****************************************************************************/
  85 vlc_module_begin();
  86     set_description( _("IPv6 network abstraction layer") );
  87     set_capability( "network", 40 );
  88     set_callbacks( Open, NULL );
  89 vlc_module_end();
  90
  91 /*****************************************************************************
  92  * BuildAddr: utility function to build a struct sockaddr_in6
  93  *****************************************************************************/
  94 static int BuildAddr( vlc_object_t * p_this, struct sockaddr_in6 * p_socket,
  95                       const char * psz_bind_address, int i_port )
  96 {
  97     char * psz_multicast_interface = "";
  98     char * psz_backup = strdup(psz_bind_address);
  99     char * psz_address = psz_backup;
 100
 101 #if defined(WIN32)
 102     /* Try to get getaddrinfo() and freeaddrinfo() from wship6.dll */
 103     typedef int (CALLBACK * GETADDRINFO) ( const char *nodename,
 104                                             const char *servname,
 105                                             const struct addrinfo *hints,
 106                                             struct addrinfo **res );
 107     typedef void (CALLBACK * FREEADDRINFO) ( struct addrinfo FAR *ai );
 108
 109     struct addrinfo hints, *res;
 110     GETADDRINFO _getaddrinfo = NULL;
 111     FREEADDRINFO _freeaddrinfo = NULL;
 112
 113     HINSTANCE wship6_dll = LoadLibrary("wship6.dll");
 114     if( wship6_dll )
 115     {
 116         _getaddrinfo = (GETADDRINFO) GetProcAddress( wship6_dll,
 117                                                      "getaddrinfo" );
 118         _freeaddrinfo = (FREEADDRINFO) GetProcAddress( wship6_dll,
 119                                                        "freeaddrinfo" );
 120     }
 121     if( !_getaddrinfo || !_freeaddrinfo )
 122     {
 123         msg_Warn( p_this, "no IPv6 stack installed" );
 124         if( wship6_dll ) FreeLibrary( wship6_dll );
 125         free( psz_backup );
 126         return( -1 );
 127     }
 128 #endif
 129
 130     /* Reset struct */
 131     memset( p_socket, 0, sizeof( struct sockaddr_in6 ) );
 132     p_socket->sin6_family = AF_INET6;                              /* family */
 133     p_socket->sin6_port = htons( i_port );
 134     if( !*psz_address )
 135     {
 136         p_socket->sin6_addr = in6addr_any;
 137     }
 138     else if( psz_address[0] == '['
 139               && psz_address[strlen(psz_address) - 1] == ']' )
 140     {
 141         psz_address[strlen(psz_address) - 1] = '\0';
 142         psz_address++;
 143
 144         /* see if there is an interface name in there... */
 145         if( (psz_multicast_interface = strchr(psz_address, '%')) != NULL )
 146         {
 147             *psz_multicast_interface = '\0';
 148             psz_multicast_interface++;
 149             msg_Dbg( p_this, "Interface name specified: \"%s\"",
 150                              psz_multicast_interface );
 151
 152             /* now convert that interface name to an index */
 153 #if defined( WIN32 )
 154             /* FIXME ?? */
 155             p_socket->sin6_scope_id = atol(psz_multicast_interface);
 156 #elif defined( HAVE_IF_NAMETOINDEX )
 157             p_socket->sin6_scope_id = if_nametoindex(psz_multicast_interface);
 158 #endif
 159             msg_Dbg( p_this, " = #%i", p_socket->sin6_scope_id );
 160         }
 161
 162 #if !defined( WIN32 )
 163         inet_pton(AF_INET6, psz_address, &p_socket->sin6_addr.s6_addr);
 164
 165 #else
 166         memset(&hints, 0, sizeof(hints));
 167         hints.ai_family = AF_INET6;
 168
 169         if( _getaddrinfo( psz_address, NULL, &hints, &res ) != 0 )
 170         {
 171             FreeLibrary( wship6_dll );
 172             free( psz_backup );
 173             return( -1 );
 174         }
 175         memcpy( &p_socket->sin6_addr,
 176                 &((struct sockaddr_in6 *)res->ai_addr)->sin6_addr,
 177                 sizeof(struct in6_addr) );
 178         _freeaddrinfo( res );
 179
 180 #endif
 181     }
 182     else
 183     {
 184 #ifdef HAVE_GETHOSTBYNAME2
 185         struct hostent    * p_hostent;
 186
 187         /* We have a fqdn, try to find its address */
 188         if ( (p_hostent = gethostbyname2( psz_address, AF_INET6 )) == NULL )
 189         {
 190             msg_Warn( p_this, "IPv6 error: unknown host %s", psz_address );
 191             free( psz_backup );
 192             return( -1 );
 193         }
 194
 195         /* Copy the first address of the host in the socket address */
 196         memcpy( &p_socket->sin6_addr, p_hostent->h_addr_list[0],
 197                  p_hostent->h_length );
 198
 199 #elif defined(WIN32)
 200         memset(&hints, 0, sizeof(hints));
 201         hints.ai_family = AF_INET6;
 202
 203         if( _getaddrinfo( psz_address, NULL, &hints, &res ) != 0 )
 204         {
 205             FreeLibrary( wship6_dll );
 206             free( psz_backup );
 207             return( -1 );
 208         }
 209         memcpy( &p_socket->sin6_addr,
 210                 &((struct sockaddr_in6 *)res->ai_addr)->sin6_addr,
 211                 sizeof(struct in6_addr) );
 212         _freeaddrinfo( res );
 213
 214 #else
 215         msg_Warn( p_this, "IPv6 error: IPv6 address %s is invalid",
 216                  psz_address );
 217         free( psz_backup );
 218         return( -1 );
 219 #endif
 220     }
 221
 222 #if defined(WIN32)
 223     FreeLibrary( wship6_dll );
 224 #endif
 225
 226     free( psz_backup );
 227     return 0;
 228 }
 229
 230 /*****************************************************************************
 231  * OpenUDP: open a UDP socket
 232  *****************************************************************************
 233  * psz_bind_addr, i_bind_port : address and port used for the bind()
 234  *   system call. If psz_bind_addr == NULL, the socket is bound to
 235  *   in6addr_any and broadcast reception is enabled. If i_bind_port == 0,
 236  *   1234 is used. If psz_bind_addr is a multicast (class D) address,
 237  *   join the multicast group.
 238  * psz_server_addr, i_server_port : address and port used for the connect()
 239  *   system call. It can avoid receiving packets from unauthorized IPs.
 240  *   Its use leads to great confusion and is currently discouraged.
 241  * This function returns -1 in case of error.
 242  *****************************************************************************/
 243 static int OpenUDP( vlc_object_t * p_this, network_socket_t * p_socket )
 244 {
 245     char * psz_bind_addr = p_socket->psz_bind_addr;
 246     int i_bind_port = p_socket->i_bind_port;
 247     char * psz_server_addr = p_socket->psz_server_addr;
 248     int i_server_port = p_socket->i_server_port;
 249
 250     int i_handle, i_opt;
 251     socklen_t i_opt_size;
 252     struct sockaddr_in6 sock;
 253
 254     /* Open a SOCK_DGRAM (UDP) socket, in the AF_INET6 domain, automatic (0)
 255      * protocol */
 256     if( (i_handle = socket( AF_INET6, SOCK_DGRAM, 0 )) == -1 )
 257     {
 258         msg_Warn( p_this, "cannot create socket (%s)", strerror(errno) );
 259         return( -1 );
 260     }
 261
 262     /* We may want to reuse an already used socket */
 263     i_opt = 1;
 264     if( setsockopt( i_handle, SOL_SOCKET, SO_REUSEADDR,
 265                     (void *) &i_opt, sizeof( i_opt ) ) == -1 )
 266     {
 267         msg_Warn( p_this, "cannot configure socket (SO_REUSEADDR: %s)",
 268                          strerror(errno) );
 269         close( i_handle );
 270         return( -1 );
 271     }
 272
 273     /* Increase the receive buffer size to 1/2MB (8Mb/s during 1/2s) to avoid
 274      * packet loss caused by scheduling problems */
 275     i_opt = 0x80000;
 276     if( setsockopt( i_handle, SOL_SOCKET, SO_RCVBUF,
 277                     (void *) &i_opt, sizeof( i_opt ) ) == -1 )
 278     {
 279         msg_Warn( p_this, "cannot configure socket (SO_RCVBUF: %s)",
 280                           strerror(errno) );
 281     }
 282
 283     /* Check if we really got what we have asked for, because Linux, etc.
 284      * will silently limit the max buffer size to net.core.rmem_max which
 285      * is typically only 65535 bytes */
 286     i_opt = 0;
 287     i_opt_size = sizeof( i_opt );
 288     if( getsockopt( i_handle, SOL_SOCKET, SO_RCVBUF,
 289                     (void*) &i_opt, &i_opt_size ) == -1 )
 290     {
 291         msg_Warn( p_this, "cannot query socket (SO_RCVBUF: %s)",
 292                           strerror(errno) );
 293     }
 294     else if( i_opt < 0x80000 )
 295     {
 296         msg_Warn( p_this, "Socket buffer size is 0x%x instead of 0x%x",
 297                           i_opt, 0x80000 );
 298     }
 299
 300     /* Build the local socket */
 301     if ( BuildAddr( p_this, &sock, psz_bind_addr, i_bind_port ) == -1 )
 302     {
 303         close( i_handle );
 304         return( -1 );
 305     }
 306
 307 #if defined(WIN32)
 308     /* Under Win32 and for multicasting, we bind to IN6ADDR_ANY */
 309     if( IN6_IS_ADDR_MULTICAST(&sock.sin6_addr) )
 310     {
 311         struct sockaddr_in6 sockany = sock;
 312         sockany.sin6_addr = in6addr_any;
 313         sockany.sin6_scope_id = 0;
 314
 315         /* Bind it */
 316         if( bind( i_handle, (struct sockaddr *)&sockany, sizeof( sock ) ) < 0 )
 317         {
 318             msg_Warn( p_this, "cannot bind socket (%s)", strerror(errno) );
 319             close( i_handle );
 320             return( -1 );
 321         }
 322     } else
 323 #endif
 324     /* Bind it */
 325     if( bind( i_handle, (struct sockaddr *)&sock, sizeof( sock ) ) < 0 )
 326     {
 327         msg_Warn( p_this, "cannot bind socket (%s)", strerror(errno) );
 328         close( i_handle );
 329         return( -1 );
 330     }
 331
 332     /* Allow broadcast reception if we bound on in6addr_any */
 333     if( !*psz_bind_addr )
 334     {
 335         i_opt = 1;
 336         if( setsockopt( i_handle, SOL_SOCKET, SO_BROADCAST,
 337                         (void*) &i_opt, sizeof( i_opt ) ) == -1 )
 338         {
 339             msg_Warn( p_this, "IPv6 warning: cannot configure socket "
 340                               "(SO_BROADCAST: %s)", strerror(errno) );
 341         }
 342     }
 343
 344     /* Join the multicast group if the socket is a multicast address */
 345 #if defined( WIN32 ) || defined( HAVE_IF_NAMETOINDEX )
 346     if( IN6_IS_ADDR_MULTICAST(&sock.sin6_addr) )
 347     {
 348         struct ipv6_mreq     imr;
 349         int                  res;
 350
 351         imr.ipv6mr_interface = sock.sin6_scope_id;
 352         imr.ipv6mr_multiaddr = sock.sin6_addr;
 353         res = setsockopt(i_handle, IPPROTO_IPV6, IPV6_JOIN_GROUP, (void*) &imr,
 354 #if defined(WIN32)
 355                          sizeof(imr) + 4); /* Doesn't work without this */
 356 #else
 357                          sizeof(imr));
 358 #endif
 359
 360         if( res == -1 )
 361         {
 362             msg_Err( p_this, "cannot join multicast group" );
 363         }
 364     }
 365 #else
 366     msg_Warn( p_this, "Multicast IPv6 is not supported on your OS" );
 367 #endif
 368
 369
 370     if( *psz_server_addr )
 371     {
 372         int ttl = p_socket->i_ttl;
 373         if( ttl < 1 )
 374         {
 375             ttl = config_GetInt( p_this, "ttl" );
 376         }
 377         if( ttl < 1 ) ttl = 1;
 378
 379         /* Build socket for remote connection */
 380         if ( BuildAddr( p_this, &sock, psz_server_addr, i_server_port ) == -1 )
 381         {
 382             msg_Warn( p_this, "cannot build remote address" );
 383             close( i_handle );
 384             return( -1 );
 385         }
 386
 387         /* Connect the socket */
 388         if( connect( i_handle, (struct sockaddr *) &sock,
 389                      sizeof( sock ) ) == (-1) )
 390         {
 391             msg_Warn( p_this, "cannot connect socket (%s)", strerror(errno) );
 392             close( i_handle );
 393             return( -1 );
 394         }
 395
 396         /* Set the time-to-live */
 397         if( ttl > 1 )
 398         {
 399 #if defined( WIN32 ) || defined( HAVE_IF_NAMETOINDEX )
 400             if( IN6_IS_ADDR_MULTICAST(&sock.sin6_addr) )
 401             {
 402                 if( setsockopt( i_handle, IPPROTO_IPV6, IPV6_MULTICAST_HOPS,
 403                                 (void *)&ttl, sizeof( ttl ) ) < 0 )
 404                 {
 405 #ifdef HAVE_ERRNO_H
 406                     msg_Err( p_this, "failed to set multicast ttl (%s)",
 407                              strerror(errno) );
 408 #else
 409                     msg_Err( p_this, "failed to set multicast ttl" );
 410 #endif
 411                 }
 412             }
 413             else
 414 #endif
 415             {
 416                 if( setsockopt( i_handle, IPPROTO_IPV6, IPV6_UNICAST_HOPS,
 417                                 (void *)&ttl, sizeof( ttl ) ) < 0 )
 418                 {
 419 #ifdef HAVE_ERRNO_H
 420                     msg_Err( p_this, "failed to set unicast ttl (%s)",
 421                               strerror(errno) );
 422 #else
 423                     msg_Err( p_this, "failed to set unicast ttl" );
 424 #endif
 425                 }
 426             }
 427         }
 428     }
 429
 430     p_socket->i_handle = i_handle;
 431     p_socket->i_mtu = config_GetInt( p_this, "mtu" );
 432
 433     return( 0 );
 434 }
 435
 436 /*****************************************************************************
 437  * OpenTCP: open a TCP socket
 438  *****************************************************************************
 439  * psz_server_addr, i_server_port : address and port used for the connect()
 440  *   system call. If i_server_port == 0, 80 is used.
 441  * Other parameters are ignored.
 442  * This function returns -1 in case of error.
 443  *****************************************************************************/
 444 static int OpenTCP( vlc_object_t * p_this, network_socket_t * p_socket )
 445 {
 446     char * psz_server_addr = p_socket->psz_server_addr;
 447     int i_server_port = p_socket->i_server_port;
 448
 449     int i_handle;
 450     struct sockaddr_in6 sock;
 451
 452     if( i_server_port == 0 )
 453     {
 454         i_server_port = 80;
 455     }
 456
 457     /* Open a SOCK_STREAM (TCP) socket, in the AF_INET6 domain, automatic (0)
 458      * protocol */
 459     if( (i_handle = socket( AF_INET6, SOCK_STREAM, 0 )) == -1 )
 460     {
 461         msg_Warn( p_this, "cannot create socket (%s)", strerror(errno) );
 462         return( -1 );
 463     }
 464
 465     /* Build remote address */
 466     if ( BuildAddr( p_this, &sock, psz_server_addr, i_server_port ) == -1 )
 467     {
 468         close( i_handle );
 469         return( -1 );
 470     }
 471
 472     /* Connect the socket */
 473     if( connect( i_handle, (struct sockaddr *) &sock,
 474                  sizeof( sock ) ) == (-1) )
 475     {
 476         msg_Warn( p_this, "cannot connect socket (%s)", strerror(errno) );
 477         close( i_handle );
 478         return( -1 );
 479     }
 480
 481     p_socket->i_handle = i_handle;
 482     p_socket->i_mtu = 0; /* There is no MTU notion in TCP */
 483
 484     return( 0 );
 485 }
 486
 487 /*****************************************************************************
 488  * Open: wrapper around OpenUDP and OpenTCP
 489  *****************************************************************************/
 490 static int Open( vlc_object_t * p_this )
 491 {
 492     network_socket_t * p_socket = p_this->p_private;
 493
 494     if( p_socket->i_type == NETWORK_UDP )
 495     {
 496         return OpenUDP( p_this, p_socket );
 497     }
 498     else
 499     {
 500         return OpenTCP( p_this, p_socket );
 501     }
 502 }