git.sesse.net Git - vlc/blob - src/misc/netutils.c

   1 /*****************************************************************************
   2  * netutils.c: various network functions
   3  *****************************************************************************
   4  * Copyright (C) 1999-2001 VideoLAN
   5  * $Id: netutils.c,v 1.80 2003/03/03 14:21:08 gbazin Exp $
   6  *
   7  * Authors: Vincent Seguin <seguin@via.ecp.fr>
   8  *          Benoit Steiner <benny@via.ecp.fr>
   9  *          Henri Fallon <henri@videolan.org>
  10  *          Xavier Marchesini <xav@alarue.net>
  11  *          Christophe Massiot <massiot@via.ecp.fr>
  12  *          Samuel Hocevar <sam@via.ecp.fr>
  13  *          Jon Lech Johansen <jon-vl@nanocrew.net>
  14  *
  15  * This program is free software; you can redistribute it and/or modify
  16  * it under the terms of the GNU General Public License as published by
  17  * the Free Software Foundation; either version 2 of the License, or
  18  * (at your option) any later version.
  19  *
  20  * This program is distributed in the hope that it will be useful,
  21  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  22  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  23  * GNU General Public License for more details.
  24  *
  25  * You should have received a copy of the GNU General Public License
  26  * along with this program; if not, write to the Free Software
  27  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111, USA.
  28  *****************************************************************************/
  29
  30 /*****************************************************************************
  31  * Preamble
  32  *****************************************************************************/
  33 #include <stdlib.h>                             /* free(), realloc(), atoi() */
  34 #include <string.h>                                              /* memset() */
  35
  36 #include <vlc/vlc.h>
  37
  38 #ifdef HAVE_ERRNO_H
  39 #   include <errno.h>                                             /* errno() */
  40 #endif
  41
  42 #ifdef HAVE_UNISTD_H
  43 #   include <unistd.h>                                      /* gethostname() */
  44 #elif defined( WIN32 ) && !defined( UNDER_CE )
  45 #   include <io.h>
  46 #endif
  47
  48 #if !defined( _MSC_VER )
  49 #include <sys/time.h>                                        /* gettimeofday */
  50 #endif
  51
  52 #if defined( UNDER_CE )
  53     /* No real network support (FIXME: use winsock1?) */
  54 #elif defined( WIN32 )
  55 #   include <winsock2.h>
  56 #else
  57 #   include <netdb.h>                                         /* hostent ... */
  58 #   include <sys/socket.h>                           /* BSD: struct sockaddr */
  59 #   include <netinet/in.h>                            /* BSD: struct in_addr */
  60 #   ifdef HAVE_ARPA_INET_H
  61 #       include <arpa/inet.h>                    /* inet_ntoa(), inet_aton() */
  62 #   endif
  63 #endif
  64
  65 #ifdef SYS_LINUX
  66 #include <sys/ioctl.h>                                            /* ioctl() */
  67 #endif
  68
  69 #ifdef SYS_DARWIN
  70 #include <IOKit/IOKitLib.h>
  71 #include <IOKit/network/IOEthernetInterface.h>
  72 #include <IOKit/network/IOEthernetController.h>
  73 #endif
  74
  75 #if defined( WIN32 ) && !defined( UNDER_CE )
  76     /* tools to get the MAC adress from the interface under Windows */
  77 #   include <windows.h>
  78 #   include <stdio.h>
  79 #   include <nb30.h>
  80 #endif
  81
  82 #ifdef HAVE_NET_IF_H
  83 #include <net/if.h>                            /* interface (arch-dependent) */
  84 #endif
  85
  86 #ifdef HAVE_SYS_SOCKIO_H
  87 #include <sys/sockio.h>
  88 #endif
  89
  90 #include "netutils.h"
  91 #include "vlc_playlist.h"
  92
  93 #include "network.h"
  94
  95 /*****************************************************************************
  96  * input_channel_t: channel library data
  97  *****************************************************************************
  98  * Store global channel library data.
  99  * The part of the code concerning the channel changing process is unstable
 100  * as it depends on the VideoLAN channel server, which isn't frozen for
 101  * the time being.
 102  *****************************************************************************/
 103 struct input_channel_t
 104 {
 105     int         i_channel;                         /* current channel number */
 106     mtime_t     last_change;                             /* last change date */
 107 };
 108
 109 /*****************************************************************************
 110  * Local prototypes
 111  *****************************************************************************/
 112 static int GetMacAddress   ( vlc_object_t *, int i_fd, char *psz_mac );
 113 #ifdef SYS_DARWIN
 114 static int GetNetIntfCtrl  ( const char *psz_interface,
 115                              io_object_t *ctrl_service );
 116 #elif defined( WIN32 ) && !defined( UNDER_CE )
 117 static int GetAdapterInfo  ( int i_adapter, char *psz_string );
 118 #endif
 119
 120 /*****************************************************************************
 121  * network_ChannelCreate: initialize global channel method data
 122  *****************************************************************************
 123  * Initialize channel input method global data. This function should be called
 124  * once before any input thread is created or any call to other
 125  * input_Channel*() function is attempted.
 126  *****************************************************************************/
 127 int __network_ChannelCreate( vlc_object_t *p_this )
 128 {
 129 #if !defined( SYS_LINUX ) && !( defined( WIN32 ) && !defined( UNDER_CE ) )
 130     msg_Warn( p_this, "VLAN-based channels are not supported "
 131                       "on this architecture" );
 132 #endif
 133
 134     /* Allocate structure */
 135     p_this->p_vlc->p_channel = malloc( sizeof( input_channel_t ) );
 136     if( p_this->p_vlc->p_channel == NULL )
 137     {
 138         msg_Err( p_this, "out of memory" );
 139         return( -1 );
 140     }
 141
 142     /* Initialize structure */
 143     p_this->p_vlc->p_channel->i_channel   = 0;
 144     p_this->p_vlc->p_channel->last_change = 0;
 145
 146     msg_Dbg( p_this, "channels initialized" );
 147     return( 0 );
 148 }
 149
 150 /*****************************************************************************
 151  * network_ChannelJoin: join a channel
 152  *****************************************************************************
 153  * This function will try to join a channel. If the relevant interface is
 154  * already on the good channel, nothing will be done. Else, and if possible
 155  * (if the interface is not locked), the channel server will be contacted
 156  * and a change will be requested. The function will block until the change
 157  * is effective. Note that once a channel is no more used, its interface
 158  * should be unlocked using input_ChannelLeave().
 159  * Non 0 will be returned in case of error.
 160  *****************************************************************************/
 161 int __network_ChannelJoin( vlc_object_t *p_this, int i_channel )
 162 {
 163 #define VLCS_VERSION 13
 164 #define MESSAGE_LENGTH 256
 165
 166 #if defined( SYS_LINUX ) || ( defined( WIN32 ) && !defined( UNDER_CE ) )
 167     module_t *       p_network;
 168     char *           psz_network = NULL;
 169     network_socket_t socket_desc;
 170     char psz_mess[ MESSAGE_LENGTH ];
 171     char psz_mac[ 40 ];
 172     int i_fd, i_port;
 173     char *psz_vlcs;
 174     struct timeval delay;
 175     fd_set fds;
 176
 177     if( p_this->p_vlc->p_channel == NULL )
 178     {
 179         msg_Warn( p_this, "channels not initialized" );
 180         return 0;
 181     }
 182
 183     if( p_this->p_vlc->p_channel->i_channel == i_channel )
 184     {
 185         return 0;
 186     }
 187
 188     if( !config_GetInt( p_this, "network-channel" ) )
 189     {
 190         msg_Err( p_this, "channels disabled, to enable them, use the"
 191                          " --channels option" );
 192         return -1;
 193     }
 194
 195     if( config_GetInt( p_this, "ipv4" ) )
 196     {
 197         psz_network = "ipv4";
 198     }
 199     if( config_GetInt( p_this, "ipv6" ) )
 200     {
 201         psz_network = "ipv6";
 202     }
 203
 204     /* Getting information about the channel server */
 205     if( !(psz_vlcs = config_GetPsz( p_this, "channel-server" )) )
 206     {
 207         msg_Err( p_this, "configuration variable channel-server empty" );
 208         return -1;
 209     }
 210
 211     i_port = config_GetInt( p_this, "channel-port" );
 212
 213     msg_Dbg( p_this, "connecting to %s:%d", psz_vlcs, i_port );
 214
 215     /* Prepare the network_socket_t structure */
 216     socket_desc.i_type = NETWORK_UDP;
 217     socket_desc.psz_bind_addr = "";
 218     socket_desc.i_bind_port = 4321;
 219     socket_desc.psz_server_addr = psz_vlcs;
 220     socket_desc.i_server_port = i_port;
 221
 222     /* Find an appropriate network module */
 223     p_this->p_private = (void*) &socket_desc;
 224     p_network = module_Need( p_this, "network", psz_network/*, &socket_desc*/ );
 225     if( p_network == NULL )
 226     {
 227         return( -1 );
 228     }
 229     module_Unneed( p_this, p_network );
 230
 231     free( psz_vlcs ); /* Do we really need this ? -- Meuuh */
 232     i_fd = socket_desc.i_handle;
 233
 234     /* Look for the interface MAC address */
 235     if( GetMacAddress( p_this, i_fd, psz_mac ) )
 236     {
 237         msg_Err( p_this, "failed getting MAC address" );
 238         close( i_fd );
 239         return -1;
 240     }
 241
 242     msg_Dbg( p_this, "MAC address is %s", psz_mac );
 243
 244     /* Build the message */
 245     sprintf( psz_mess, "%d %u %lu %s \n", i_channel, VLCS_VERSION,
 246                        (unsigned long)(mdate() / (u64)1000000),
 247                        psz_mac );
 248
 249     /* Send the message */
 250     send( i_fd, psz_mess, MESSAGE_LENGTH, 0 );
 251
 252     msg_Dbg( p_this, "attempting to join channel %d", i_channel );
 253
 254     /* We have changed channels ! (or at least, we tried) */
 255     p_this->p_vlc->p_channel->last_change = mdate();
 256     p_this->p_vlc->p_channel->i_channel = i_channel;
 257
 258     /* Wait 5 sec for an answer from the server */
 259     delay.tv_sec = 5;
 260     delay.tv_usec = 0;
 261     FD_ZERO( &fds );
 262     FD_SET( i_fd, &fds );
 263
 264     switch( select( i_fd + 1, &fds, NULL, NULL, &delay ) )
 265     {
 266         case 0:
 267             msg_Err( p_this, "no answer from vlcs" );
 268             close( i_fd );
 269             return -1;
 270
 271         case -1:
 272             msg_Err( p_this, "error while listening to vlcs" );
 273             close( i_fd );
 274             return -1;
 275     }
 276
 277     recv( i_fd, psz_mess, MESSAGE_LENGTH, 0 );
 278     psz_mess[ MESSAGE_LENGTH - 1 ] = '\0';
 279
 280     if( !strncasecmp( psz_mess, "E:", 2 ) )
 281     {
 282         msg_Err( p_this, "vlcs said '%s'", psz_mess + 2 );
 283         close( i_fd );
 284         return -1;
 285     }
 286     else if( !strncasecmp( psz_mess, "I:", 2 ) )
 287     {
 288         msg_Dbg( p_this, "vlcs said '%s'", psz_mess + 2 );
 289     }
 290     else
 291     {
 292         /* We got something to play ! */
 293         playlist_t *p_playlist;
 294         p_playlist = vlc_object_find( p_this, VLC_OBJECT_PLAYLIST,
 295                                               FIND_ANYWHERE );
 296         if( p_playlist != NULL )
 297         {
 298             playlist_Add( p_playlist, psz_mess,
 299                           PLAYLIST_APPEND | PLAYLIST_GO, PLAYLIST_END );
 300             vlc_object_release( p_playlist );
 301         }
 302     }
 303
 304     /* Close the socket and return nicely */
 305 #   if defined( WIN32 )
 306     closesocket( i_fd );
 307 #   else
 308     close( i_fd );
 309 #   endif
 310
 311 #endif
 312     return 0;
 313 }
 314
 315 /* Following functions are local */
 316
 317 /*****************************************************************************
 318  * GetMacAddress: extract the MAC Address
 319  *****************************************************************************/
 320 static int GetMacAddress( vlc_object_t *p_this, int i_fd, char *psz_mac )
 321 {
 322 #if defined( SYS_LINUX )
 323     struct ifreq interface;
 324     int i_ret;
 325     char *psz_interface;
 326
 327     /*
 328      * Looking for information about the eth0 interface
 329      */
 330     interface.ifr_addr.sa_family = AF_INET;
 331     if( !(psz_interface = config_GetPsz( p_this, "iface" )) )
 332     {
 333         msg_Err( p_this, "configuration variable iface empty" );
 334         return -1;
 335     }
 336     strcpy( interface.ifr_name, psz_interface );
 337     free( psz_interface );
 338
 339     i_ret = ioctl( i_fd, SIOCGIFHWADDR, &interface );
 340
 341     if( i_ret )
 342     {
 343         msg_Err( p_this, "ioctl SIOCGIFHWADDR failed" );
 344         return( i_ret );
 345     }
 346
 347     sprintf( psz_mac, "%2.2x:%2.2x:%2.2x:%2.2x:%2.2x:%2.2x",
 348                       interface.ifr_hwaddr.sa_data[0] & 0xff,
 349                       interface.ifr_hwaddr.sa_data[1] & 0xff,
 350                       interface.ifr_hwaddr.sa_data[2] & 0xff,
 351                       interface.ifr_hwaddr.sa_data[3] & 0xff,
 352                       interface.ifr_hwaddr.sa_data[4] & 0xff,
 353                       interface.ifr_hwaddr.sa_data[5] & 0xff );
 354
 355     return( 0 );
 356
 357 #elif defined( SYS_DARWIN )
 358     char *psz_interface;
 359     io_object_t ctrl_service;
 360     CFTypeRef cfd_mac_address;
 361     UInt8 ui_mac_address[kIOEthernetAddressSize];
 362
 363     if( !(psz_interface = config_GetPsz( p_this, "iface" )) )
 364     {
 365         msg_Err( p_this, "configuration variable iface empty" );
 366         return( -1 );
 367     }
 368
 369     if( GetNetIntfCtrl( psz_interface, &ctrl_service ) )
 370     {
 371         msg_Err( p_this, "GetNetIntfCtrl failed" );
 372         return( -1 );
 373     }
 374
 375     cfd_mac_address = IORegistryEntryCreateCFProperty( ctrl_service,
 376                                                        CFSTR(kIOMACAddress),
 377                                                        kCFAllocatorDefault,
 378                                                        0 );
 379     IOObjectRelease( ctrl_service );
 380     if( cfd_mac_address == NULL )
 381     {
 382         msg_Err( p_this, "IORegistryEntryCreateCFProperty failed" );
 383         return( -1 );
 384     }
 385
 386     CFDataGetBytes( cfd_mac_address,
 387                     CFRangeMake(0, kIOEthernetAddressSize),
 388                     ui_mac_address );
 389     CFRelease( cfd_mac_address );
 390
 391     sprintf( psz_mac, "%2.2x:%2.2x:%2.2x:%2.2x:%2.2x:%2.2x",
 392                       ui_mac_address[0], ui_mac_address[1],
 393                       ui_mac_address[2], ui_mac_address[3],
 394                       ui_mac_address[4], ui_mac_address[5] );
 395
 396     return( 0 );
 397
 398 #elif defined( WIN32 ) && !defined( UNDER_CE )
 399     int i, i_ret = -1;
 400
 401     /* Get adapter list - support for more than one adapter */
 402     LANA_ENUM AdapterList;
 403     NCB       Ncb;
 404
 405     msg_Dbg( p_this, "looking for MAC address" );
 406
 407     memset( &Ncb, 0, sizeof( NCB ) );
 408     Ncb.ncb_command = NCBENUM;
 409     Ncb.ncb_buffer = (unsigned char *)&AdapterList;
 410     Ncb.ncb_length = sizeof( AdapterList );
 411     Netbios( &Ncb );
 412
 413     /* Get all of the local ethernet addresses */
 414     for ( i = 0; i < AdapterList.length ; ++i )
 415     {
 416         if ( GetAdapterInfo ( AdapterList.lana[ i ], psz_mac ) == 0 )
 417         {
 418             i_ret = 0;
 419         }
 420     }
 421
 422     return( i_ret );
 423
 424 #else
 425     strcpy( psz_mac, "00:00:00:00:00:00" );
 426     return( 0 );
 427
 428 #endif
 429 }
 430
 431 #ifdef SYS_DARWIN
 432 /*****************************************************************************
 433  * GetNetIntfCtrl : get parent controller for network interface
 434  *****************************************************************************/
 435 static int GetNetIntfCtrl( const char *psz_interface,
 436                            io_object_t *ctrl_service )
 437 {
 438     mach_port_t port;
 439     kern_return_t ret;
 440     io_object_t intf_service;
 441     io_iterator_t intf_iterator;
 442
 443     /* get port for IOKit communication */
 444     if( ( ret = IOMasterPort( MACH_PORT_NULL, &port ) ) != KERN_SUCCESS )
 445     {
 446         return( -1 );
 447     }
 448
 449     /* look up the IOService object for the interface */
 450     ret = IOServiceGetMatchingServices( port, IOBSDNameMatching( port, 0,
 451                                         psz_interface ), &intf_iterator );
 452     if( ret != KERN_SUCCESS )
 453     {
 454         return( -1 );
 455     }
 456
 457     intf_service = IOIteratorNext( intf_iterator );
 458     if( intf_service == NULL )
 459     {
 460         return( -1 );
 461     }
 462
 463     ret = IORegistryEntryGetParentEntry( intf_service,
 464                                          kIOServicePlane,
 465                                          ctrl_service );
 466     IOObjectRelease( intf_service );
 467     if( ret != KERN_SUCCESS )
 468     {
 469         return( -1 );
 470     }
 471
 472     return( 0 );
 473 }
 474
 475 #elif defined( WIN32 ) && !defined( UNDER_CE )
 476 /*****************************************************************************
 477  * GetAdapterInfo : gets some informations about the interface using NETBIOS
 478  *****************************************************************************/
 479 static int GetAdapterInfo( int i_adapter, char *psz_string )
 480 {
 481     struct ASTAT
 482     {
 483         ADAPTER_STATUS adapt;
 484         NAME_BUFFER    psz_name[30];
 485     } Adapter;
 486
 487     /* Reset the LAN adapter so that we can begin querying it */
 488     NCB Ncb;
 489     memset( &Ncb, 0, sizeof ( Ncb ) );
 490     Ncb.ncb_command  = NCBRESET;
 491     Ncb.ncb_lana_num = i_adapter;
 492
 493     if( Netbios( &Ncb ) != NRC_GOODRET )
 494     {
 495 //X        intf_ErrMsg( "network error: reset returned %i", Ncb.ncb_retcode );
 496         return -1;
 497     }
 498
 499     /* Prepare to get the adapter status block */
 500     memset( &Ncb, 0, sizeof( Ncb ) ) ;     /* Initialization */
 501     Ncb.ncb_command = NCBASTAT;
 502     Ncb.ncb_lana_num = i_adapter;
 503
 504     strcpy( (char *)Ncb.ncb_callname, "*" );
 505
 506     memset( &Adapter, 0, sizeof ( Adapter ) );
 507     Ncb.ncb_buffer = ( unsigned char * ) &Adapter;
 508     Ncb.ncb_length = sizeof ( Adapter );
 509
 510     /* Get the adapter's info and, if this works, return it in standard,
 511      * colon-delimited form. */
 512     if ( Netbios( &Ncb ) == 0 )
 513     {
 514         sprintf ( psz_string, "%02X:%02X:%02X:%02X:%02X:%02X",
 515                 (int) ( Adapter.adapt.adapter_address[0] ),
 516                 (int) ( Adapter.adapt.adapter_address[1] ),
 517                 (int) ( Adapter.adapt.adapter_address[2] ),
 518                 (int) ( Adapter.adapt.adapter_address[3] ),
 519                 (int) ( Adapter.adapt.adapter_address[4] ),
 520                 (int) ( Adapter.adapt.adapter_address[5] ) );
 521
 522 //X        intf_WarnMsg( 2, "network: found MAC address %s", psz_string );
 523
 524         return 0;
 525     }
 526     else
 527     {
 528 //X        intf_ErrMsg( "network error: ASTAT returned %i", Ncb.ncb_retcode );
 529         return -1;
 530     }
 531 }
 532 #endif /* WIN32 */
 533