- removed the obsolete artificial delay when switching channels.
[vlc.git] / src / misc / netutils.c
1 /*****************************************************************************
2  * netutils.c: various network functions
3  *****************************************************************************
4  * Copyright (C) 1999-2001 VideoLAN
5  * $Id: netutils.c,v 1.66 2002/05/30 13:22:43 asmax 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  *
14  * This program is free software; you can redistribute it and/or modify
15  * it under the terms of the GNU General Public License as published by
16  * the Free Software Foundation; either version 2 of the License, or
17  * (at your option) any later version.
18  *
19  * This program is distributed in the hope that it will be useful,
20  * but WITHOUT ANY WARRANTY; without even the implied warranty of
21  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
22  * GNU General Public License for more details.
23  *
24  * You should have received a copy of the GNU General Public License
25  * along with this program; if not, write to the Free Software
26  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111, USA.
27  *****************************************************************************/
28
29 /*****************************************************************************
30  * Preamble
31  *****************************************************************************/
32 #include <stdlib.h>                             /* free(), realloc(), atoi() */
33 #include <errno.h>                                                /* errno() */
34 #include <string.h>                                              /* memset() */
35
36 #include <videolan/vlc.h>
37
38 #ifdef HAVE_UNISTD_H
39 #   include <unistd.h>                                      /* gethostname() */
40 #elif defined( _MSC_VER ) && defined( _WIN32 )
41 #   include <io.h>
42 #endif
43
44 #if !defined( _MSC_VER )
45 #include <sys/time.h>                                        /* gettimeofday */
46 #endif
47
48 #ifdef WIN32
49 #   include <winsock2.h>
50 #else
51 #   include <netdb.h>                                         /* hostent ... */
52 #   include <sys/socket.h>                           /* BSD: struct sockaddr */
53 #   include <netinet/in.h>                            /* BSD: struct in_addr */
54 #   ifdef HAVE_ARPA_INET_H
55 #       include <arpa/inet.h>                    /* inet_ntoa(), inet_aton() */
56 #   endif
57 #endif
58
59 #ifdef SYS_LINUX
60 #include <sys/ioctl.h>                                            /* ioctl() */
61 #endif
62
63 #if defined( WIN32 )                    /* tools to get the MAC adress from  */
64 #include <windows.h>                    /* the interface under Windows       */
65 #include <stdio.h>
66 #include <nb30.h>
67 #endif
68
69 #ifdef HAVE_NET_IF_H
70 #include <net/if.h>                            /* interface (arch-dependent) */
71 #endif
72
73 #ifdef HAVE_SYS_SOCKIO_H
74 #include <sys/sockio.h>
75 #endif
76
77 #include "netutils.h"
78
79 #include "intf_playlist.h"
80 #include "network.h"
81
82 /*****************************************************************************
83  * input_channel_t: channel library data
84  *****************************************************************************
85  * Store global channel library data.
86  * The part of the code concerning the channel changing process is unstable
87  * as it depends on the VideoLAN channel server, which isn't frozen for
88  * the time being.
89  *****************************************************************************/
90 typedef struct input_channel_s
91 {
92     int         i_channel;                         /* current channel number */
93     mtime_t     last_change;                             /* last change date */
94 } input_channel_t;
95
96 /*****************************************************************************
97  * Local prototypes
98  *****************************************************************************/
99 static int GetMacAddress   ( int i_fd, char *psz_mac );
100 #ifdef WIN32
101 static int GetAdapterInfo  ( int i_adapter, char *psz_string );
102 #endif
103
104 /*****************************************************************************
105  * network_ChannelCreate: initialize global channel method data
106  *****************************************************************************
107  * Initialize channel input method global data. This function should be called
108  * once before any input thread is created or any call to other
109  * input_Channel*() function is attempted.
110  *****************************************************************************/
111 int network_ChannelCreate( void )
112 {
113 #if !defined( SYS_LINUX ) && !defined( WIN32 )
114     intf_ErrMsg( "channel warning: VLAN-based channels are not supported"
115                  " under this architecture" );
116 #endif
117
118     /* Allocate structure */
119     p_main->p_channel = malloc( sizeof( input_channel_t ) );
120     if( p_main->p_channel == NULL )
121     {
122         intf_ErrMsg( "network error: could not create channel bank" );
123         return( -1 );
124     }
125
126     /* Initialize structure */
127     p_main->p_channel->i_channel   = 0;
128     p_main->p_channel->last_change = 0;
129
130     intf_WarnMsg( 2, "network: channels initialized" );
131     return( 0 );
132 }
133
134 /*****************************************************************************
135  * network_ChannelJoin: join a channel
136  *****************************************************************************
137  * This function will try to join a channel. If the relevant interface is
138  * already on the good channel, nothing will be done. Else, and if possible
139  * (if the interface is not locked), the channel server will be contacted
140  * and a change will be requested. The function will block until the change
141  * is effective. Note that once a channel is no more used, its interface
142  * should be unlocked using input_ChannelLeave().
143  * Non 0 will be returned in case of error.
144  *****************************************************************************/
145 int network_ChannelJoin( int i_channel )
146 {
147 #define VLCS_VERSION 13
148 #define MESSAGE_LENGTH 256
149
150     struct module_s *   p_network;
151     char *              psz_network = NULL;
152     network_socket_t    socket_desc;
153     char psz_mess[ MESSAGE_LENGTH ];
154     char psz_mac[ 40 ];
155     int i_fd, i_port;
156     char *psz_vlcs;
157     struct timeval delay;
158     fd_set fds;
159
160     if( !config_GetIntVariable( "network-channel" ) )
161     {
162         intf_ErrMsg( "network: channels disabled, to enable them, use the"
163                      "--channels option" );
164         return -1;
165     }
166
167     /* If last change is too recent, wait a while */
168 //    if( mdate() - p_main->p_channel->last_change < INPUT_CHANNEL_CHANGE_DELAY )
169 //    {
170 //        intf_WarnMsg( 2, "network: waiting before changing channel" );
171         /* XXX Isn't this completely brain-damaged ??? -- Sam */
172         /* Yes it is. I don't think this is still justified with the new
173          * vlanserver --Meuuh */
174 //        mwait( p_main->p_channel->last_change + INPUT_CHANNEL_CHANGE_DELAY );
175 //    }
176
177     if( config_GetIntVariable( "ipv4" ) )
178     {
179         psz_network = "ipv4";
180     }
181     if( config_GetIntVariable( "ipv6" ) )
182     {
183         psz_network = "ipv6";
184     }
185
186     /* Getting information about the channel server */
187     if( !(psz_vlcs = config_GetPszVariable( "channel-server" )) )
188     {
189         intf_ErrMsg( "network: configuration variable channel_server empty" );
190         return -1;
191     }
192
193     i_port = config_GetIntVariable( "channel-port" );
194
195     intf_WarnMsg( 5, "channel: connecting to %s:%d",
196                      psz_vlcs, i_port );
197
198     /* Prepare the network_socket_t structure */
199     socket_desc.i_type = NETWORK_UDP;
200     socket_desc.psz_bind_addr = "";
201     socket_desc.i_bind_port = 4321;
202     socket_desc.psz_server_addr = psz_vlcs;
203     socket_desc.i_server_port = i_port;
204
205     /* Find an appropriate network module */
206     p_network = module_Need( MODULE_CAPABILITY_NETWORK, psz_network,
207                              &socket_desc );
208     if( p_network == NULL )
209     {
210         return( -1 );
211     }
212     module_Unneed( p_network );
213
214     free( psz_vlcs ); /* Do we really need this ? -- Meuuh */
215     i_fd = socket_desc.i_handle;
216
217     /* Look for the interface MAC address */
218     if( GetMacAddress( i_fd, psz_mac ) )
219     {
220         intf_ErrMsg( "network error: failed getting MAC address" );
221         close( i_fd );
222         return -1;
223     }
224
225     intf_WarnMsg( 6, "network: MAC address is %s", psz_mac );
226
227     /* Build the message */
228     sprintf( psz_mess, "%d %u %lu %s \n", i_channel, VLCS_VERSION,
229                        (unsigned long)(mdate() / (u64)1000000),
230                        psz_mac );
231
232     /* Send the message */
233     send( i_fd, psz_mess, MESSAGE_LENGTH, 0 );
234
235     intf_WarnMsg( 2, "network: attempting to join channel %d", i_channel );
236
237     /* We have changed channels ! (or at least, we tried) */
238     p_main->p_channel->last_change = mdate();
239     p_main->p_channel->i_channel = i_channel;
240
241     /* Wait 5 sec for an answer from the server */
242     delay.tv_sec = 5;
243     delay.tv_usec = 0;
244     FD_ZERO( &fds );
245     FD_SET( i_fd, &fds );
246
247     switch( select( i_fd + 1, &fds, NULL, NULL, &delay ) )
248     {
249         case 0:
250             intf_ErrMsg( "network error: no answer from vlcs" );
251             close( i_fd );
252             return -1;
253             break;
254
255         case -1:
256             intf_ErrMsg( "network error: error while listening to vlcs" );
257             close( i_fd );
258             return -1;
259             break;
260     }
261
262     recv( i_fd, psz_mess, MESSAGE_LENGTH, 0 );
263     psz_mess[ MESSAGE_LENGTH - 1 ] = '\0';
264
265     if( !strncasecmp( psz_mess, "E:", 2 ) )
266     {
267         intf_ErrMsg( "network error: vlcs said '%s'", psz_mess + 2 );
268         close( i_fd );
269         return -1;
270     }
271     else if( !strncasecmp( psz_mess, "I:", 2 ) )
272     {
273         intf_WarnMsg( 2, "network info: vlcs said '%s'", psz_mess + 2 );
274     }
275     else /* We got something to play ! FIXME: not very nice */
276     {
277 #   define p_item \
278         (&p_main->p_playlist->p_item[ p_main->p_playlist->i_index + 1])
279         vlc_mutex_lock( &p_main->p_playlist->change_lock );
280         if( p_item )
281         {
282             free( p_item->psz_name );
283             p_item->psz_name = strdup( psz_mess );
284             /* Unlock _afterwards_ */
285             vlc_mutex_unlock( &p_main->p_playlist->change_lock );
286         }
287         else
288         {
289             /* Unlock _before_ */
290             vlc_mutex_unlock( &p_main->p_playlist->change_lock );
291             intf_PlaylistAdd( p_main->p_playlist, 0, psz_mess );
292         }
293     }
294
295     /* Close the socket and return nicely */
296 #ifndef WIN32
297     close( i_fd );
298 #else
299     closesocket( i_fd );
300 #endif
301
302     return 0;
303 }
304
305 /* Following functions are local */
306
307 /*****************************************************************************
308  * GetMacAddress: extract the MAC Address
309  *****************************************************************************/
310 static int GetMacAddress( int i_fd, char *psz_mac )
311 {
312 #if defined( SYS_LINUX )
313     struct ifreq interface;
314     int i_ret;
315     char *psz_interface;
316
317     /*
318      * Looking for information about the eth0 interface
319      */
320     interface.ifr_addr.sa_family = AF_INET;
321     if( !(psz_interface = config_GetPszVariable( "iface" )) )
322     {
323         intf_ErrMsg( "network error: configuration variable iface empty" );
324         return -1;
325     }
326     strcpy( interface.ifr_name, psz_interface );
327     free( psz_interface );
328
329     i_ret = ioctl( i_fd, SIOCGIFHWADDR, &interface );
330
331     if( i_ret )
332     {
333         intf_ErrMsg( "network error: ioctl SIOCGIFHWADDR failed" );
334         return( i_ret );
335     }
336
337     sprintf( psz_mac, "%2.2x:%2.2x:%2.2x:%2.2x:%2.2x:%2.2x",
338                       interface.ifr_hwaddr.sa_data[0] & 0xff,
339                       interface.ifr_hwaddr.sa_data[1] & 0xff,
340                       interface.ifr_hwaddr.sa_data[2] & 0xff,
341                       interface.ifr_hwaddr.sa_data[3] & 0xff,
342                       interface.ifr_hwaddr.sa_data[4] & 0xff,
343                       interface.ifr_hwaddr.sa_data[5] & 0xff );
344
345     return( 0 );
346
347 #elif defined( WIN32 )
348     int i, i_ret = -1;
349
350     /* Get adapter list - support for more than one adapter */
351     LANA_ENUM AdapterList;
352     NCB       Ncb;
353
354     intf_WarnMsg( 2, "network: looking for MAC address" );
355
356     memset( &Ncb, 0, sizeof( NCB ) );
357     Ncb.ncb_command = NCBENUM;
358     Ncb.ncb_buffer = (unsigned char *)&AdapterList;
359     Ncb.ncb_length = sizeof( AdapterList );
360     Netbios( &Ncb );
361
362     /* Get all of the local ethernet addresses */
363     for ( i = 0; i < AdapterList.length ; ++i )
364     {
365         if ( GetAdapterInfo ( AdapterList.lana[ i ], psz_mac ) == 0 )
366         {
367             i_ret = 0;
368         }
369     }
370
371     return( i_ret );
372
373 #else
374     strcpy( psz_mac, "00:00:00:00:00:00" );
375     return( 0 );
376
377 #endif
378 }
379
380 #ifdef WIN32
381 /*****************************************************************************
382  * GetAdapterInfo : gets some informations about the interface using NETBIOS
383  *****************************************************************************/
384 static int GetAdapterInfo( int i_adapter, char *psz_string )
385 {
386     struct ASTAT
387     {
388         ADAPTER_STATUS adapt;
389         NAME_BUFFER    psz_name[30];
390     } Adapter;
391
392     /* Reset the LAN adapter so that we can begin querying it */
393     NCB Ncb;
394     memset( &Ncb, 0, sizeof ( Ncb ) );
395     Ncb.ncb_command  = NCBRESET;
396     Ncb.ncb_lana_num = i_adapter;
397
398     if( Netbios( &Ncb ) != NRC_GOODRET )
399     {
400         intf_ErrMsg( "network error: reset returned %i", Ncb.ncb_retcode );
401         return -1;
402     }
403
404     /* Prepare to get the adapter status block */
405     memset( &Ncb, 0, sizeof( Ncb ) ) ;     /* Initialization */
406     Ncb.ncb_command = NCBASTAT;
407     Ncb.ncb_lana_num = i_adapter;
408
409     strcpy( (char *)Ncb.ncb_callname, "*" );
410
411     memset( &Adapter, 0, sizeof ( Adapter ) );
412     Ncb.ncb_buffer = ( unsigned char * ) &Adapter;
413     Ncb.ncb_length = sizeof ( Adapter );
414
415     /* Get the adapter's info and, if this works, return it in standard,
416      * colon-delimited form. */
417     if ( Netbios( &Ncb ) == 0 )
418     {
419         sprintf ( psz_string, "%02X:%02X:%02X:%02X:%02X:%02X",
420                 (int) ( Adapter.adapt.adapter_address[0] ),
421                 (int) ( Adapter.adapt.adapter_address[1] ),
422                 (int) ( Adapter.adapt.adapter_address[2] ),
423                 (int) ( Adapter.adapt.adapter_address[3] ),
424                 (int) ( Adapter.adapt.adapter_address[4] ),
425                 (int) ( Adapter.adapt.adapter_address[5] ) );
426
427         intf_WarnMsg( 2, "network: found MAC address %s", psz_string );
428
429         return 0;
430     }
431     else
432     {
433         intf_ErrMsg( "network error: ASTAT returned %i", Ncb.ncb_retcode );
434         return -1;
435     }
436 }
437 #endif /* WIN32 */
438