Configure the message queue parameter before we use the message queue...
[vlc.git] / src / libvlc-common.c
1 /*****************************************************************************
2  * libvlc-common.c: libvlc instances creation and deletion, interfaces handling
3  *****************************************************************************
4  * Copyright (C) 1998-2006 the VideoLAN team
5  * $Id$
6  *
7  * Authors: Vincent Seguin <seguin@via.ecp.fr>
8  *          Samuel Hocevar <sam@zoy.org>
9  *          Gildas Bazin <gbazin@videolan.org>
10  *          Derk-Jan Hartman <hartman at videolan dot org>
11  *          RĂ©mi Denis-Courmont <rem # videolan : org>
12  *
13  * This program is free software; you can redistribute it and/or modify
14  * it under the terms of the GNU General Public License as published by
15  * the Free Software Foundation; either version 2 of the License, or
16  * (at your option) any later version.
17  *
18  * This program is distributed in the hope that it will be useful,
19  * but WITHOUT ANY WARRANTY; without even the implied warranty of
20  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
21  * GNU General Public License for more details.
22  *
23  * You should have received a copy of the GNU General Public License
24  * along with this program; if not, write to the Free Software
25  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
26  *****************************************************************************/
27
28 /** \file
29  * This file contains functions to create and destroy libvlc instances
30  */
31
32 /*****************************************************************************
33  * Preamble
34  *****************************************************************************/
35 #include <vlc/vlc.h>
36 #include "control/libvlc_internal.h"
37 #include <vlc_input.h>
38
39 #include "modules/modules.h"
40 #include "modules/configuration.h"
41
42 #include <errno.h>                                                 /* ENOMEM */
43 #include <stdio.h>                                              /* sprintf() */
44 #include <string.h>
45 #include <stdlib.h>                                                /* free() */
46
47 #ifndef WIN32
48 #   include <netinet/in.h>                            /* BSD: struct in_addr */
49 #endif
50
51 #ifdef HAVE_UNISTD_H
52 #   include <unistd.h>
53 #elif defined( WIN32 ) && !defined( UNDER_CE )
54 #   include <io.h>
55 #endif
56
57 #ifdef WIN32                       /* optind, getopt(), included in unistd.h */
58 #   include "extras/getopt.h"
59 #endif
60
61 #ifdef HAVE_LOCALE_H
62 #   include <locale.h>
63 #endif
64
65 #ifdef HAVE_DBUS_3
66 /* used for one-instance mode */
67 #   include <dbus/dbus.h>
68 #endif
69
70 #ifdef HAVE_HAL
71 #   include <hal/libhal.h>
72 #endif
73
74 #include "vlc_os_specific.h"
75
76 #include <vlc_playlist.h>
77 #include <vlc_interface.h>
78
79 #include <vlc_aout.h>
80 #include "audio_output/aout_internal.h"
81
82 #include <vlc_vout.h>
83
84 #include <vlc_sout.h>
85 #include "stream_output/stream_output.h"
86
87 #include <vlc_charset.h>
88
89 #include "libvlc.h"
90
91 #include "playlist/playlist_internal.h"
92
93 /*****************************************************************************
94  * The evil global variable. We handle it with care, don't worry.
95  *****************************************************************************/
96 static libvlc_global_data_t   libvlc_global;
97 #define p_libvlc_global (&libvlc_global)
98 static libvlc_int_t *    p_static_vlc = NULL;
99 static volatile unsigned int i_instances = 0;
100
101 /*****************************************************************************
102  * Local prototypes
103  *****************************************************************************/
104 #if defined (__APPLE__) || defined (WIN32)
105 static void SetLanguage   ( char const * );
106 #endif
107 static inline int LoadMessages (void);
108 static int  GetFilenames  ( libvlc_int_t *, int, char *[] );
109 static void Help          ( libvlc_int_t *, char const *psz_help_name );
110 static void Usage         ( libvlc_int_t *, char const *psz_module_name );
111 static void ListModules   ( libvlc_int_t *, vlc_bool_t );
112 static void Version       ( void );
113
114 #ifdef WIN32
115 static void ShowConsole   ( vlc_bool_t );
116 static void PauseConsole  ( void );
117 #endif
118 static int  ConsoleWidth  ( void );
119
120 static int  VerboseCallback( vlc_object_t *, char const *,
121                              vlc_value_t, vlc_value_t, void * );
122
123 static void InitDeviceValues( libvlc_int_t * );
124
125 libvlc_global_data_t *vlc_global( void )
126 {
127     return &libvlc_global;
128 }
129
130 /*****************************************************************************
131  * vlc_current_object: return the current object.
132  *****************************************************************************
133  * If i_object is non-zero, return the corresponding object. Otherwise,
134  * return the statically allocated p_vlc object.
135  *****************************************************************************/
136 libvlc_int_t * vlc_current_object( int i_object )
137 {
138     if( i_object )
139     {
140          return vlc_object_get( p_libvlc_global, i_object );
141     }
142
143     return p_static_vlc;
144 }
145
146
147 /**
148  * Allocate a libvlc instance, initialize global data if needed
149  * It also initializes the threading system
150  */
151 libvlc_int_t * libvlc_InternalCreate( void )
152 {
153     int i_ret;
154     libvlc_int_t * p_libvlc = NULL;
155     vlc_value_t lockval;
156     char *psz_env = NULL;
157
158 #if 0
159     /* &libvlc_global never changes,
160      * so we can safely call this multiple times. */
161     p_libvlc_global = &libvlc_global;
162 #endif
163
164     /* vlc_threads_init *must* be the first internal call! No other call is
165      * allowed before the thread system has been initialized. */
166     i_ret = vlc_threads_init( p_libvlc_global );
167     if( i_ret < 0 ) return NULL;
168
169     /* Now that the thread system is initialized, we don't have much, but
170      * at least we have var_Create */
171     var_Create( p_libvlc_global, "libvlc", VLC_VAR_MUTEX );
172     var_Get( p_libvlc_global, "libvlc", &lockval );
173     vlc_mutex_lock( lockval.p_address );
174
175     i_instances++;
176
177     if( !libvlc_global.b_ready )
178     {
179         /* Guess what CPU we have */
180         cpu_flags = CPUCapabilities();
181        /* The module bank will be initialized later */
182         libvlc_global.p_module_bank = NULL;
183
184         libvlc_global.b_ready = VLC_TRUE;
185     }
186     vlc_mutex_unlock( lockval.p_address );
187     var_Destroy( p_libvlc_global, "libvlc" );
188
189     /* Allocate a libvlc instance object */
190     p_libvlc = vlc_object_create( p_libvlc_global, VLC_OBJECT_LIBVLC );
191     if( p_libvlc == NULL )
192     {
193         i_instances--;
194         return NULL;
195     }
196     p_libvlc->p_playlist = NULL;
197     p_libvlc->psz_object_name = "libvlc";
198
199     /* Initialize message queue */
200     msg_Create( p_libvlc );
201
202     /* Find verbosity from VLC_VERBOSE environment variable */
203     psz_env = getenv( "VLC_VERBOSE" );
204     p_libvlc->i_verbose = psz_env ? atoi( psz_env ) : -1;
205 #if defined( HAVE_ISATTY ) && !defined( WIN32 )
206     p_libvlc->b_color = isatty( 2 ); /* 2 is for stderr */
207 #else
208     p_libvlc->b_color = VLC_FALSE;
209 #endif
210
211     /* Announce who we are - Do it only for first instance ? */
212     msg_Dbg( p_libvlc, COPYRIGHT_MESSAGE );
213     msg_Dbg( p_libvlc, "libvlc was configured with %s", CONFIGURE_LINE );
214
215     /* Initialize mutexes */
216     vlc_mutex_init( p_libvlc, &p_libvlc->config_lock );
217 #ifdef __APPLE__
218     vlc_mutex_init( p_libvlc, &p_libvlc->quicktime_lock );
219     vlc_thread_set_priority( p_libvlc, VLC_THREAD_PRIORITY_LOW );
220 #endif
221     /* Store data for the non-reentrant API */
222     p_static_vlc = p_libvlc;
223
224     return p_libvlc;
225 }
226
227 /**
228  * Initialize a libvlc instance
229  * This function initializes a previously allocated libvlc instance:
230  *  - CPU detection
231  *  - gettext initialization
232  *  - message queue, module bank and playlist initialization
233  *  - configuration and commandline parsing
234  */
235 int libvlc_InternalInit( libvlc_int_t *p_libvlc, int i_argc, char *ppsz_argv[] )
236 {
237     char         p_capabilities[200];
238     char *       p_tmp = NULL;
239     char *       psz_modules = NULL;
240     char *       psz_parser = NULL;
241     char *       psz_control = NULL;
242     vlc_bool_t   b_exit = VLC_FALSE;
243     int          i_ret = VLC_EEXIT;
244     module_t    *p_help_module = NULL;
245     playlist_t  *p_playlist = NULL;
246     vlc_value_t  val;
247 #if defined( ENABLE_NLS ) \
248      && ( defined( HAVE_GETTEXT ) || defined( HAVE_INCLUDED_GETTEXT ) )
249 # if defined (WIN32) || defined (__APPLE__)
250     char *       psz_language;
251 #endif
252 #endif
253
254     /* System specific initialization code */
255     system_Init( p_libvlc, &i_argc, ppsz_argv );
256
257     /* Get the executable name (similar to the basename command) */
258     if( i_argc > 0 )
259     {
260         p_libvlc->psz_object_name = p_tmp = ppsz_argv[ 0 ];
261         while( *p_tmp )
262         {
263             if( *p_tmp == '/' ) p_libvlc->psz_object_name = ++p_tmp;
264             else ++p_tmp;
265         }
266     }
267     else
268     {
269         p_libvlc->psz_object_name = "vlc";
270     }
271
272     /*
273      * Support for gettext
274      */
275     LoadMessages ();
276
277     /* Translate "C" to the language code: "fr", "en_GB", "nl", "ru"... */
278     msg_Dbg( p_libvlc, "translation test: code is \"%s\"", _("C") );
279
280     /* Initialize the module bank and load the configuration of the
281      * main module. We need to do this at this stage to be able to display
282      * a short help if required by the user. (short help == main module
283      * options) */
284     module_InitBank( p_libvlc );
285
286     /* Hack: insert the help module here */
287     p_help_module = vlc_module_create( VLC_OBJECT(p_libvlc) );
288     if( p_help_module == NULL )
289     {
290         module_EndBank( p_libvlc );
291         return VLC_EGENERIC;
292     }
293     p_help_module->psz_object_name = "help";
294     p_help_module->psz_longname = N_("Help options");
295     config_Duplicate( p_help_module, libvlc_config, libvlc_config_count );
296     vlc_object_attach( p_help_module, libvlc_global.p_module_bank );
297     /* End hack */
298
299     if( config_LoadCmdLine( p_libvlc, &i_argc, ppsz_argv, VLC_TRUE ) )
300     {
301         vlc_object_detach( p_help_module );
302         config_Free( p_help_module );
303         vlc_object_destroy( p_help_module );
304         module_EndBank( p_libvlc );
305         return VLC_EGENERIC;
306     }
307
308     /* Check for short help option */
309     if( config_GetInt( p_libvlc, "help" ) )
310     {
311         Help( p_libvlc, "help" );
312         b_exit = VLC_TRUE;
313         i_ret = VLC_EEXITSUCCESS;
314     }
315     /* Check for version option */
316     else if( config_GetInt( p_libvlc, "version" ) )
317     {
318         Version();
319         b_exit = VLC_TRUE;
320         i_ret = VLC_EEXITSUCCESS;
321     }
322
323     /* Set the config file stuff */
324     p_libvlc->psz_homedir    = config_GetHomeDir();
325     p_libvlc->psz_configdir  = config_GetConfigDir( p_libvlc );
326     p_libvlc->psz_datadir    = config_GetUserDataDir( p_libvlc );
327     p_libvlc->psz_cachedir   = config_GetCacheDir( p_libvlc );
328     p_libvlc->psz_configfile = config_GetCustomConfigFile( p_libvlc );
329
330     /* Check for plugins cache options */
331     if( config_GetInt( p_libvlc, "reset-plugins-cache" ) )
332     {
333         libvlc_global.p_module_bank->b_cache_delete = VLC_TRUE;
334     }
335
336     /* Hack: remove the help module here */
337     vlc_object_detach( p_help_module );
338     /* End hack */
339
340     /* Will be re-done properly later on */
341     p_libvlc->i_verbose = config_GetInt( p_libvlc, "verbose" );
342
343     /* Check for daemon mode */
344 #ifndef WIN32
345     if( config_GetInt( p_libvlc, "daemon" ) )
346     {
347 #if HAVE_DAEMON
348         char *psz_pidfile = NULL;
349
350         if( daemon( 1, 0) != 0 )
351         {
352             msg_Err( p_libvlc, "Unable to fork vlc to daemon mode" );
353             b_exit = VLC_TRUE;
354         }
355         libvlc_global.b_daemon = VLC_TRUE;
356
357         /* lets check if we need to write the pidfile */
358         psz_pidfile = config_GetPsz( p_libvlc, "pidfile" );
359         if( psz_pidfile != NULL )
360         {
361             FILE *pidfile;
362             pid_t i_pid = getpid ();
363             msg_Dbg( p_libvlc, "PID is %d, writing it to %s",
364                                i_pid, psz_pidfile );
365             pidfile = utf8_fopen( psz_pidfile,"w" );
366             if( pidfile != NULL )
367             {
368                 utf8_fprintf( pidfile, "%d", (int)i_pid );
369                 fclose( pidfile );
370             }
371             else
372             {
373                 msg_Err( p_libvlc, "cannot open pid file for writing: %s (%m)",
374                          psz_pidfile );
375             }
376         }
377         free( psz_pidfile );
378
379 #else
380         pid_t i_pid;
381
382         if( ( i_pid = fork() ) < 0 )
383         {
384             msg_Err( p_libvlc, "unable to fork vlc to daemon mode" );
385             b_exit = VLC_TRUE;
386         }
387         else if( i_pid )
388         {
389             /* This is the parent, exit right now */
390             msg_Dbg( p_libvlc, "closing parent process" );
391             b_exit = VLC_TRUE;
392             i_ret = VLC_EEXITSUCCESS;
393         }
394         else
395         {
396             /* We are the child */
397             msg_Dbg( p_libvlc, "daemon spawned" );
398             close( STDIN_FILENO );
399             close( STDOUT_FILENO );
400             close( STDERR_FILENO );
401
402             libvlc_global.b_daemon = VLC_TRUE;
403         }
404 #endif
405     }
406 #endif
407
408     if( b_exit )
409     {
410         config_Free( p_help_module );
411         vlc_object_destroy( p_help_module );
412         module_EndBank( p_libvlc );
413         return i_ret;
414     }
415
416     /* Check for translation config option */
417 #if defined( ENABLE_NLS ) \
418      && ( defined( HAVE_GETTEXT ) || defined( HAVE_INCLUDED_GETTEXT ) )
419 # if defined (WIN32) || defined (__APPLE__)
420     /* This ain't really nice to have to reload the config here but it seems
421      * the only way to do it. */
422     config_LoadConfigFile( p_libvlc, "main" );
423     config_LoadCmdLine( p_libvlc, &i_argc, ppsz_argv, VLC_TRUE );
424
425     /* Check if the user specified a custom language */
426     psz_language = config_GetPsz( p_libvlc, "language" );
427     if( psz_language && *psz_language && strcmp( psz_language, "auto" ) )
428     {
429         vlc_bool_t b_cache_delete = libvlc_global.p_module_bank->b_cache_delete;
430
431         /* Reset the default domain */
432         SetLanguage( psz_language );
433
434         /* Translate "C" to the language code: "fr", "en_GB", "nl", "ru"... */
435         msg_Dbg( p_libvlc, "translation test: code is \"%s\"", _("C") );
436
437         module_EndBank( p_libvlc );
438         module_InitBank( p_libvlc );
439         config_LoadConfigFile( p_libvlc, "main" );
440         config_LoadCmdLine( p_libvlc, &i_argc, ppsz_argv, VLC_TRUE );
441         libvlc_global.p_module_bank->b_cache_delete = b_cache_delete;
442     }
443     if( psz_language ) free( psz_language );
444 # endif
445 #endif
446
447     /*
448      * Load the builtins and plugins into the module_bank.
449      * We have to do it before config_Load*() because this also gets the
450      * list of configuration options exported by each module and loads their
451      * default values.
452      */
453     module_LoadBuiltins( p_libvlc );
454     module_LoadPlugins( p_libvlc );
455     if( p_libvlc->b_die )
456     {
457         b_exit = VLC_TRUE;
458     }
459
460     msg_Dbg( p_libvlc, "module bank initialized, found %i modules",
461                     libvlc_global.p_module_bank->i_children );
462
463     /* Hack: insert the help module here */
464     vlc_object_attach( p_help_module, libvlc_global.p_module_bank );
465     /* End hack */
466
467     /* Check for help on modules */
468     if( (p_tmp = config_GetPsz( p_libvlc, "module" )) )
469     {
470         Help( p_libvlc, p_tmp );
471         free( p_tmp );
472         b_exit = VLC_TRUE;
473         i_ret = VLC_EEXITSUCCESS;
474     }
475     /* Check for long help option */
476     else if( config_GetInt( p_libvlc, "longhelp" ) )
477     {
478         Help( p_libvlc, "longhelp" );
479         b_exit = VLC_TRUE;
480         i_ret = VLC_EEXITSUCCESS;
481     }
482     /* Check for module list option */
483     else if( config_GetInt( p_libvlc, "list" ) )
484     {
485         ListModules( p_libvlc, VLC_FALSE );
486         b_exit = VLC_TRUE;
487         i_ret = VLC_EEXITSUCCESS;
488     }
489     else if( config_GetInt( p_libvlc, "list-verbose" ) )
490     {
491         ListModules( p_libvlc, VLC_TRUE );
492         b_exit = VLC_TRUE;
493         i_ret = VLC_EEXITSUCCESS;
494     }
495
496     /* Check for config file options */
497     if( config_GetInt( p_libvlc, "reset-config" ) )
498     {
499         vlc_object_detach( p_help_module );
500         config_ResetAll( p_libvlc );
501         config_LoadCmdLine( p_libvlc, &i_argc, ppsz_argv, VLC_TRUE );
502         config_SaveConfigFile( p_libvlc, NULL );
503         vlc_object_attach( p_help_module, libvlc_global.p_module_bank );
504     }
505     if( config_GetInt( p_libvlc, "save-config" ) )
506     {
507         vlc_object_detach( p_help_module );
508         config_LoadConfigFile( p_libvlc, NULL );
509         config_LoadCmdLine( p_libvlc, &i_argc, ppsz_argv, VLC_TRUE );
510         config_SaveConfigFile( p_libvlc, NULL );
511         vlc_object_attach( p_help_module, libvlc_global.p_module_bank );
512     }
513
514     /* Hack: remove the help module here */
515     vlc_object_detach( p_help_module );
516     /* End hack */
517
518     if( b_exit )
519     {
520         config_Free( p_help_module );
521         vlc_object_destroy( p_help_module );
522         module_EndBank( p_libvlc );
523         return i_ret;
524     }
525
526     /*
527      * Init device values
528      */
529     InitDeviceValues( p_libvlc );
530
531     /*
532      * Override default configuration with config file settings
533      */
534     config_LoadConfigFile( p_libvlc, NULL );
535
536     /* Hack: insert the help module here */
537     vlc_object_attach( p_help_module, libvlc_global.p_module_bank );
538     /* End hack */
539
540     /*
541      * Override configuration with command line settings
542      */
543     if( config_LoadCmdLine( p_libvlc, &i_argc, ppsz_argv, VLC_FALSE ) )
544     {
545 #ifdef WIN32
546         ShowConsole( VLC_FALSE );
547         /* Pause the console because it's destroyed when we exit */
548         fprintf( stderr, "The command line options couldn't be loaded, check "
549                  "that they are valid.\n" );
550         PauseConsole();
551 #endif
552         vlc_object_detach( p_help_module );
553         config_Free( p_help_module );
554         vlc_object_destroy( p_help_module );
555         module_EndBank( p_libvlc );
556         return VLC_EGENERIC;
557     }
558
559     /* Hack: remove the help module here */
560     vlc_object_detach( p_help_module );
561     config_Free( p_help_module );
562     vlc_object_destroy( p_help_module );
563     /* End hack */
564
565     /*
566      * System specific configuration
567      */
568     system_Configure( p_libvlc, &i_argc, ppsz_argv );
569
570 /* FIXME: could be replaced by using Unix sockets */
571 #ifdef HAVE_DBUS_3
572     dbus_threads_init_default();
573
574     if( config_GetInt( p_libvlc, "one-instance" ) )
575     {
576         /* Initialise D-Bus interface, check for other instances */
577         DBusConnection  *p_conn = NULL;
578         DBusError       dbus_error;
579
580         dbus_error_init( &dbus_error );
581
582         /* connect to the session bus */
583         p_conn = dbus_bus_get( DBUS_BUS_SESSION, &dbus_error );
584         if( !p_conn )
585         {
586             msg_Err( p_libvlc, "Failed to connect to D-Bus session daemon: %s",
587                     dbus_error.message );
588             dbus_error_free( &dbus_error );
589         }
590         else
591         {
592             /* check if VLC is available on the bus
593              * if not: D-Bus control is not enabled on the other
594              * instance and we can't pass MRLs to it */
595             DBusMessage *p_test_msg = NULL;
596             DBusMessage *p_test_reply = NULL;
597             p_test_msg =  dbus_message_new_method_call(
598                     "org.mpris.vlc", "/",
599                     "org.freedesktop.MediaPlayer", "Identity" );
600             /* block until a reply arrives */
601             p_test_reply = dbus_connection_send_with_reply_and_block(
602                     p_conn, p_test_msg, -1, &dbus_error );
603             dbus_message_unref( p_test_msg );
604             if( p_test_reply == NULL )
605             {
606                 dbus_error_free( &dbus_error );
607                 msg_Dbg( p_libvlc, "No Media Player is running. "
608                         "Continuing normally." );
609             }
610             else
611             {
612                 int i_input;
613                 DBusMessage* p_dbus_msg = NULL;
614                 DBusMessageIter dbus_args;
615                 DBusPendingCall* p_dbus_pending = NULL;
616                 dbus_bool_t b_play;
617
618                 dbus_message_unref( p_test_reply );
619                 msg_Warn( p_libvlc, "Another Media Player is running. Exiting");
620
621                 for( i_input = optind;i_input < i_argc;i_input++ )
622                 {
623                     msg_Dbg( p_libvlc, "Adds %s to the running Media Player",
624                             ppsz_argv[i_input] );
625
626                     p_dbus_msg = dbus_message_new_method_call(
627                             "org.mpris.vlc", "/TrackList",
628                             "org.freedesktop.MediaPlayer", "AddTrack" );
629
630                     if ( NULL == p_dbus_msg )
631                     {
632                         msg_Err( p_libvlc, "D-Bus problem" );
633                         system_End( p_libvlc );
634                         exit( VLC_ETIMEOUT );
635                     }
636
637                     /* append MRLs */
638                     dbus_message_iter_init_append( p_dbus_msg, &dbus_args );
639                     if ( !dbus_message_iter_append_basic( &dbus_args,
640                                 DBUS_TYPE_STRING, &ppsz_argv[i_input] ) )
641                     {
642                         msg_Err( p_libvlc, "Out of memory" );
643                         dbus_message_unref( p_dbus_msg );
644                         system_End( p_libvlc );
645                         exit( VLC_ENOMEM );
646                     }
647                     b_play = TRUE;
648                     if( config_GetInt( p_libvlc, "playlist-enqueue" ) )
649                         b_play = FALSE;
650                     if ( !dbus_message_iter_append_basic( &dbus_args,
651                                 DBUS_TYPE_BOOLEAN, &b_play ) )
652                     {
653                         msg_Err( p_libvlc, "Out of memory" );
654                         dbus_message_unref( p_dbus_msg );
655                         system_End( p_libvlc );
656                         exit( VLC_ENOMEM );
657                     }
658
659                     /* send message and get a handle for a reply */
660                     if ( !dbus_connection_send_with_reply ( p_conn,
661                                 p_dbus_msg, &p_dbus_pending, -1 ) )
662                     {
663                         msg_Err( p_libvlc, "D-Bus problem" );
664                         dbus_message_unref( p_dbus_msg );
665                         system_End( p_libvlc );
666                         exit( VLC_ETIMEOUT );
667                     }
668
669                     if ( NULL == p_dbus_pending )
670                     {
671                         msg_Err( p_libvlc, "D-Bus problem" );
672                         dbus_message_unref( p_dbus_msg );
673                         system_End( p_libvlc );
674                         exit( VLC_ETIMEOUT );
675                     }
676                     dbus_connection_flush( p_conn );
677                     dbus_message_unref( p_dbus_msg );
678                     /* block until we receive a reply */
679                     dbus_pending_call_block( p_dbus_pending );
680                     dbus_pending_call_unref( p_dbus_pending );
681                 } /* processes all command line MRLs */
682
683                 /* bye bye */
684                 system_End( p_libvlc );
685                 exit( VLC_SUCCESS );
686             }
687         }
688         /* we unreference the connection when we've finished with it */
689         if( p_conn ) dbus_connection_unref( p_conn );
690     }
691 #endif
692
693     /*
694      * Message queue options
695      */
696
697     var_Create( p_libvlc, "verbose", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
698     if( config_GetInt( p_libvlc, "quiet" ) )
699     {
700         val.i_int = -1;
701         var_Set( p_libvlc, "verbose", val );
702     }
703     var_AddCallback( p_libvlc, "verbose", VerboseCallback, NULL );
704     var_Change( p_libvlc, "verbose", VLC_VAR_TRIGGER_CALLBACKS, NULL, NULL );
705
706     p_libvlc->b_color = p_libvlc->b_color && config_GetInt( p_libvlc, "color" );
707
708     /*
709      * Output messages that may still be in the queue
710      */
711     msg_Flush( p_libvlc );
712
713     if( !config_GetInt( p_libvlc, "fpu" ) )
714         cpu_flags &= ~CPU_CAPABILITY_FPU;
715
716 #if defined( __i386__ ) || defined( __x86_64__ )
717     if( !config_GetInt( p_libvlc, "mmx" ) )
718         cpu_flags &= ~CPU_CAPABILITY_MMX;
719     if( !config_GetInt( p_libvlc, "3dn" ) )
720         cpu_flags &= ~CPU_CAPABILITY_3DNOW;
721     if( !config_GetInt( p_libvlc, "mmxext" ) )
722         cpu_flags &= ~CPU_CAPABILITY_MMXEXT;
723     if( !config_GetInt( p_libvlc, "sse" ) )
724         cpu_flags &= ~CPU_CAPABILITY_SSE;
725     if( !config_GetInt( p_libvlc, "sse2" ) )
726         cpu_flags &= ~CPU_CAPABILITY_SSE2;
727 #endif
728 #if defined( __powerpc__ ) || defined( __ppc__ ) || defined( __ppc64__ )
729     if( !config_GetInt( p_libvlc, "altivec" ) )
730         cpu_flags &= ~CPU_CAPABILITY_ALTIVEC;
731 #endif
732
733 #define PRINT_CAPABILITY( capability, string )                              \
734     if( vlc_CPU() & capability )                                            \
735     {                                                                       \
736         strncat( p_capabilities, string " ",                                \
737                  sizeof(p_capabilities) - strlen(p_capabilities) );         \
738         p_capabilities[sizeof(p_capabilities) - 1] = '\0';                  \
739     }
740
741     p_capabilities[0] = '\0';
742     PRINT_CAPABILITY( CPU_CAPABILITY_486, "486" );
743     PRINT_CAPABILITY( CPU_CAPABILITY_586, "586" );
744     PRINT_CAPABILITY( CPU_CAPABILITY_PPRO, "Pentium Pro" );
745     PRINT_CAPABILITY( CPU_CAPABILITY_MMX, "MMX" );
746     PRINT_CAPABILITY( CPU_CAPABILITY_3DNOW, "3DNow!" );
747     PRINT_CAPABILITY( CPU_CAPABILITY_MMXEXT, "MMXEXT" );
748     PRINT_CAPABILITY( CPU_CAPABILITY_SSE, "SSE" );
749     PRINT_CAPABILITY( CPU_CAPABILITY_SSE2, "SSE2" );
750     PRINT_CAPABILITY( CPU_CAPABILITY_ALTIVEC, "AltiVec" );
751     PRINT_CAPABILITY( CPU_CAPABILITY_FPU, "FPU" );
752     msg_Dbg( p_libvlc, "CPU has capabilities %s", p_capabilities );
753
754     /*
755      * Choose the best memcpy module
756      */
757     p_libvlc->p_memcpy_module = module_Need( p_libvlc, "memcpy", "$memcpy", 0 );
758
759     if( p_libvlc->pf_memcpy == NULL )
760     {
761         p_libvlc->pf_memcpy = memcpy;
762     }
763
764     if( p_libvlc->pf_memset == NULL )
765     {
766         p_libvlc->pf_memset = memset;
767     }
768
769     p_libvlc->b_stats = config_GetInt( p_libvlc, "stats" );
770     p_libvlc->i_timers = 0;
771     p_libvlc->pp_timers = NULL;
772     vlc_mutex_init( p_libvlc, &p_libvlc->timer_lock );
773
774     /*
775      * Initialize hotkey handling
776      */
777     var_Create( p_libvlc, "key-pressed", VLC_VAR_INTEGER );
778     p_libvlc->p_hotkeys = malloc( libvlc_hotkeys_size );
779     /* Do a copy (we don't need to modify the strings) */
780     memcpy( p_libvlc->p_hotkeys, libvlc_hotkeys, libvlc_hotkeys_size );
781
782     /* Initialize playlist and get commandline files */
783     playlist_ThreadCreate( p_libvlc );
784     if( !p_libvlc->p_playlist )
785     {
786         msg_Err( p_libvlc, "playlist initialization failed" );
787         if( p_libvlc->p_memcpy_module != NULL )
788         {
789             module_Unneed( p_libvlc, p_libvlc->p_memcpy_module );
790         }
791         module_EndBank( p_libvlc );
792         return VLC_EGENERIC;
793     }
794     p_playlist = p_libvlc->p_playlist;
795
796     psz_modules = config_GetPsz( p_playlist, "services-discovery" );
797     if( psz_modules && *psz_modules )
798     {
799         /* Add service discovery modules */
800         playlist_ServicesDiscoveryAdd( p_playlist, psz_modules );
801     }
802     if( psz_modules ) free( psz_modules );
803
804     /*
805      * Load background interfaces
806      */
807     psz_modules = config_GetPsz( p_libvlc, "extraintf" );
808     psz_control = config_GetPsz( p_libvlc, "control" );
809
810     if( psz_modules && *psz_modules && psz_control && *psz_control )
811     {
812         psz_modules = (char *)realloc( psz_modules, strlen( psz_modules ) +
813                                                     strlen( psz_control ) + 1 );
814         sprintf( psz_modules, "%s:%s", psz_modules, psz_control );
815     }
816     else if( psz_control && *psz_control )
817     {
818         if( psz_modules ) free( psz_modules );
819         psz_modules = strdup( psz_control );
820     }
821
822     psz_parser = psz_modules;
823     while ( psz_parser && *psz_parser )
824     {
825         char *psz_module, *psz_temp;
826         psz_module = psz_parser;
827         psz_parser = strchr( psz_module, ':' );
828         if ( psz_parser )
829         {
830             *psz_parser = '\0';
831             psz_parser++;
832         }
833         psz_temp = (char *)malloc( strlen(psz_module) + sizeof(",none") );
834         if( psz_temp )
835         {
836             sprintf( psz_temp, "%s,none", psz_module );
837             VLC_AddIntf( 0, psz_temp, VLC_FALSE, VLC_FALSE );
838             free( psz_temp );
839         }
840     }
841     if ( psz_modules )
842     {
843         free( psz_modules );
844     }
845
846     /*
847      * Always load the hotkeys interface if it exists
848      */
849     VLC_AddIntf( 0, "hotkeys,none", VLC_FALSE, VLC_FALSE );
850
851 #ifdef HAVE_DBUS_3
852     /* loads dbus control interface if in one-instance mode
853      * we do it only when playlist exists, because dbus module needs it */
854     if( config_GetInt( p_libvlc, "one-instance" ) )
855         VLC_AddIntf( 0, "dbus,none", VLC_FALSE, VLC_FALSE );
856 #endif
857
858     /*
859      * If needed, load the Xscreensaver interface
860      * Currently, only for X
861      */
862 #ifdef HAVE_X11_XLIB_H
863     if( config_GetInt( p_libvlc, "disable-screensaver" ) == 1 )
864     {
865         VLC_AddIntf( 0, "screensaver,none", VLC_FALSE, VLC_FALSE );
866     }
867 #endif
868
869     if( config_GetInt( p_libvlc, "file-logging" ) == 1 )
870     {
871         VLC_AddIntf( 0, "logger,none", VLC_FALSE, VLC_FALSE );
872     }
873 #ifdef HAVE_SYSLOG_H
874     if( config_GetInt( p_libvlc, "syslog" ) == 1 )
875     {
876         const char *psz_logmode = "logmode=syslog";
877         libvlc_InternalAddIntf( p_libvlc, "logger,none", VLC_FALSE, VLC_FALSE,
878                                 1, &psz_logmode );
879     }
880 #endif
881
882     if( config_GetInt( p_libvlc, "show-intf" ) == 1 )
883     {
884         VLC_AddIntf( 0, "showintf,none", VLC_FALSE, VLC_FALSE );
885     }
886
887     if( config_GetInt( p_libvlc, "network-synchronisation") == 1 )
888     {
889         VLC_AddIntf( 0, "netsync,none", VLC_FALSE, VLC_FALSE );
890     }
891
892 #ifdef WIN32
893     if( config_GetInt( p_libvlc, "prefer-system-codecs") == 1 )
894     {
895         char *psz_codecs = config_GetPsz( p_playlist, "codec" );
896         if( psz_codecs )
897         {
898             char *psz_morecodecs;
899             asprintf(&psz_morecodecs, "%s,dmo,quicktime", psz_codecs);
900             if( psz_morecodecs )
901             {
902                 config_PutPsz( p_libvlc, "codec", psz_morecodecs);
903                 free(psz_morecodecs);
904             }
905         }
906         else
907             config_PutPsz( p_libvlc, "codec", "dmo,quicktime");
908         free(psz_codecs);
909     }
910 #endif
911
912     /*
913      * FIXME: kludge to use a p_libvlc-local variable for the Mozilla plugin
914      */
915     var_Create( p_libvlc, "drawable", VLC_VAR_INTEGER );
916     var_Create( p_libvlc, "drawable-view-top", VLC_VAR_INTEGER );
917     var_Create( p_libvlc, "drawable-view-left", VLC_VAR_INTEGER );
918     var_Create( p_libvlc, "drawable-view-bottom", VLC_VAR_INTEGER );
919     var_Create( p_libvlc, "drawable-view-right", VLC_VAR_INTEGER );
920     var_Create( p_libvlc, "drawable-clip-top", VLC_VAR_INTEGER );
921     var_Create( p_libvlc, "drawable-clip-left", VLC_VAR_INTEGER );
922     var_Create( p_libvlc, "drawable-clip-bottom", VLC_VAR_INTEGER );
923     var_Create( p_libvlc, "drawable-clip-right", VLC_VAR_INTEGER );
924
925     /* Create volume callback system. */
926     var_Create( p_libvlc, "volume-change", VLC_VAR_BOOL );
927
928     /*
929      * Get input filenames given as commandline arguments
930      */
931     GetFilenames( p_libvlc, i_argc, ppsz_argv );
932
933     /*
934      * Get --open argument
935      */
936     var_Create( p_libvlc, "open", VLC_VAR_STRING | VLC_VAR_DOINHERIT );
937     var_Get( p_libvlc, "open", &val );
938     if ( val.psz_string != NULL && *val.psz_string )
939     {
940         VLC_AddTarget( p_libvlc->i_object_id, val.psz_string, NULL, 0,
941                        PLAYLIST_INSERT, 0 );
942     }
943     if ( val.psz_string != NULL ) free( val.psz_string );
944
945     return VLC_SUCCESS;
946 }
947
948 /**
949  * Cleanup a libvlc instance. The instance is not completely deallocated
950  * \param p_libvlc the instance to clean
951  */
952 int libvlc_InternalCleanup( libvlc_int_t *p_libvlc )
953 {
954     intf_thread_t      * p_intf = NULL;
955     vout_thread_t      * p_vout = NULL;
956     aout_instance_t    * p_aout = NULL;
957     announce_handler_t * p_announce = NULL;
958
959     /* Ask the interfaces to stop and destroy them */
960     msg_Dbg( p_libvlc, "removing all interfaces" );
961     while( (p_intf = vlc_object_find( p_libvlc, VLC_OBJECT_INTF, FIND_CHILD )) )
962     {
963         intf_StopThread( p_intf );
964         vlc_object_detach( p_intf );
965         vlc_object_release( p_intf );
966         intf_Destroy( p_intf );
967         p_intf = NULL;
968     }
969
970     /* Free playlist */
971     msg_Dbg( p_libvlc, "removing playlist" );
972     playlist_ThreadDestroy( p_libvlc->p_playlist );
973
974     /* Free video outputs */
975     msg_Dbg( p_libvlc, "removing all video outputs" );
976     while( (p_vout = vlc_object_find( p_libvlc, VLC_OBJECT_VOUT, FIND_CHILD )) )
977     {
978         vlc_object_detach( p_vout );
979         vlc_object_release( p_vout );
980         vout_Destroy( p_vout );
981     }
982
983     /* Free audio outputs */
984     msg_Dbg( p_libvlc, "removing all audio outputs" );
985     while( (p_aout = vlc_object_find( p_libvlc, VLC_OBJECT_AOUT, FIND_CHILD )) )
986     {
987         vlc_object_detach( (vlc_object_t *)p_aout );
988         vlc_object_release( (vlc_object_t *)p_aout );
989         aout_Delete( p_aout );
990     }
991
992     stats_TimersDumpAll( p_libvlc );
993     stats_TimersClean( p_libvlc );
994
995     /* Free announce handler(s?) */
996     while( (p_announce = vlc_object_find( p_libvlc, VLC_OBJECT_ANNOUNCE,
997                                                  FIND_CHILD ) ) )
998     {
999         msg_Dbg( p_libvlc, "removing announce handler" );
1000         vlc_object_detach( p_announce );
1001         vlc_object_release( p_announce );
1002         announce_HandlerDestroy( p_announce );
1003     }
1004     return VLC_SUCCESS;
1005 }
1006
1007 /**
1008  * Destroy everything.
1009  * This function requests the running threads to finish, waits for their
1010  * termination, and destroys their structure.
1011  * It stops the thread systems: no instance can run after this has run
1012  * \param p_libvlc the instance to destroy
1013  * \param b_release whether we should do a release on the instance
1014  */
1015 int libvlc_InternalDestroy( libvlc_int_t *p_libvlc, vlc_bool_t b_release )
1016 {
1017     vlc_value_t lockval;
1018
1019     if( !p_libvlc )
1020         return VLC_EGENERIC;
1021
1022 #ifndef WIN32
1023     char* psz_pidfile = NULL;
1024
1025     if( libvlc_global.p_module_bank )
1026     if( config_GetInt( p_libvlc, "daemon" ) )
1027     {
1028         psz_pidfile = config_GetPsz( p_libvlc, "pidfile" );
1029         if( psz_pidfile != NULL )
1030         {
1031             msg_Dbg( p_libvlc, "removing pid file %s", psz_pidfile );
1032             if( unlink( psz_pidfile ) == -1 )
1033             {
1034                 msg_Dbg( p_libvlc, "removing pid file %s: %m",
1035                         psz_pidfile );
1036             }
1037         }
1038         free ( psz_pidfile );
1039     }
1040 #endif
1041
1042     if( p_libvlc->p_memcpy_module )
1043     {
1044         module_Unneed( p_libvlc, p_libvlc->p_memcpy_module );
1045         p_libvlc->p_memcpy_module = NULL;
1046     }
1047
1048     /* Free module bank. It is refcounted, so we call this each time  */
1049     module_EndBank( p_libvlc );
1050
1051     FREENULL( p_libvlc->psz_homedir );
1052     FREENULL( p_libvlc->psz_configdir );
1053     FREENULL( p_libvlc->psz_datadir );
1054     FREENULL( p_libvlc->psz_cachedir );
1055     FREENULL( p_libvlc->psz_configfile );
1056     FREENULL( p_libvlc->p_hotkeys );
1057
1058     var_Create( p_libvlc_global, "libvlc", VLC_VAR_MUTEX );
1059     var_Get( p_libvlc_global, "libvlc", &lockval );
1060     vlc_mutex_lock( lockval.p_address );
1061     i_instances--;
1062
1063     if( i_instances == 0 )
1064     {
1065         /* System specific cleaning code */
1066         system_End( p_libvlc );
1067     }
1068     vlc_mutex_unlock( lockval.p_address );
1069     var_Destroy( p_libvlc_global, "libvlc" );
1070
1071     msg_Flush( p_libvlc );
1072     msg_Destroy( p_libvlc );
1073
1074     /* Destroy mutexes */
1075     vlc_mutex_destroy( &p_libvlc->config_lock );
1076     vlc_mutex_destroy( &p_libvlc->timer_lock );
1077
1078     if( b_release ) vlc_object_release( p_libvlc );
1079     vlc_object_destroy( p_libvlc );
1080     p_libvlc = NULL;
1081
1082     /* Stop thread system: last one out please shut the door!
1083      * The number of initializations of the thread system is counted, we
1084      * can call this each time */
1085     vlc_threads_end( p_libvlc_global );
1086
1087     return VLC_SUCCESS;
1088 }
1089
1090 /**
1091  * Add an interface plugin and run it
1092  */
1093 int libvlc_InternalAddIntf( libvlc_int_t *p_libvlc,
1094                             char const *psz_module,
1095                             vlc_bool_t b_block, vlc_bool_t b_play,
1096                             int i_options, const char *const *ppsz_options )
1097 {
1098     int i_err;
1099     intf_thread_t *p_intf = NULL;
1100
1101     if( !p_libvlc )
1102         return VLC_EGENERIC;
1103
1104 #ifndef WIN32
1105     if( libvlc_global.b_daemon && b_block && !psz_module )
1106     {
1107         /* Daemon mode hack.
1108          * We prefer the dummy interface if none is specified. */
1109         char *psz_interface = config_GetPsz( p_libvlc, "intf" );
1110         if( !psz_interface || !*psz_interface ) psz_module = "dummy";
1111         if( psz_interface ) free( psz_interface );
1112     }
1113 #endif
1114
1115     /* Try to create the interface */
1116     p_intf = intf_Create( p_libvlc, psz_module ? psz_module : "$intf",
1117                           i_options, ppsz_options );
1118     if( p_intf == NULL )
1119     {
1120         msg_Err( p_libvlc, "interface \"%s\" initialization failed",
1121                  psz_module );
1122         return VLC_EGENERIC;
1123     }
1124
1125     /* Interface doesn't handle play on start so do it ourselves */
1126     if( !p_intf->b_play && b_play )
1127         playlist_Play( p_libvlc->p_playlist );
1128
1129     /* Try to run the interface */
1130     p_intf->b_play = b_play;
1131     i_err = intf_RunThread( p_intf );
1132     if( i_err )
1133     {
1134         vlc_object_detach( p_intf );
1135         intf_Destroy( p_intf );
1136         p_intf = NULL;
1137         return i_err;
1138     }
1139
1140     if( b_block )
1141     {
1142         /* FIXME: should be moved to interface/interface.c */
1143         if( p_intf->pf_run )
1144             vlc_thread_join( p_intf );
1145         else
1146             while( vlc_object_lock_and_wait( p_intf ) == 0 );
1147
1148         vlc_object_detach( p_intf );
1149         intf_Destroy( p_intf );
1150     }
1151
1152     return VLC_SUCCESS;
1153 };
1154
1155 #if defined (__APPLE__) || defined (WIN32)
1156 /*****************************************************************************
1157  * SetLanguage: set the interface language.
1158  *****************************************************************************
1159  * We set the LC_MESSAGES locale category for interface messages and buttons,
1160  * as well as the LC_CTYPE category for string sorting and possible wide
1161  * character support.
1162  *****************************************************************************/
1163 static void SetLanguage ( const char *psz_lang )
1164 {
1165 #ifdef __APPLE__
1166     /* I need that under Darwin, please check it doesn't disturb
1167      * other platforms. --Meuuh */
1168     setenv( "LANG", psz_lang, 1 );
1169
1170 #else
1171     /* We set LC_ALL manually because it is the only way to set
1172      * the language at runtime under eg. Windows. Beware that this
1173      * makes the environment unconsistent when libvlc is unloaded and
1174      * should probably be moved to a safer place like vlc.c. */
1175     static char psz_lcall[20];
1176     snprintf( psz_lcall, 19, "LC_ALL=%s", psz_lang );
1177     psz_lcall[19] = '\0';
1178     putenv( psz_lcall );
1179 #endif
1180
1181     setlocale( LC_ALL, psz_lang );
1182 }
1183 #endif
1184
1185
1186 static inline int LoadMessages (void)
1187 {
1188 #if defined( ENABLE_NLS ) \
1189      && ( defined( HAVE_GETTEXT ) || defined( HAVE_INCLUDED_GETTEXT ) )
1190     /* Specify where to find the locales for current domain */
1191 #if !defined( __APPLE__ ) && !defined( WIN32 ) && !defined( SYS_BEOS )
1192     static const char psz_path[] = LOCALEDIR;
1193 #else
1194     char psz_path[1024];
1195     if (snprintf (psz_path, sizeof (psz_path), "%s/%s",
1196                   libvlc_global.psz_vlcpath, "locale")
1197                      >= (int)sizeof (psz_path))
1198         return -1;
1199
1200 #endif
1201     if (bindtextdomain (PACKAGE_NAME, psz_path) == NULL)
1202     {
1203         fprintf (stderr, "Warning: cannot bind text domain "PACKAGE_NAME
1204                          " to directory %s\n", psz_path);
1205         return -1;
1206     }
1207
1208     /* LibVLC wants all messages in UTF-8.
1209      * Unfortunately, we cannot ask UTF-8 for strerror_r(), strsignal_r()
1210      * and other functions that are not part of our text domain.
1211      */
1212     if (bind_textdomain_codeset (PACKAGE_NAME, "UTF-8") == NULL)
1213     {
1214         fprintf (stderr, "Error: cannot set Unicode encoding for text domain "
1215                          PACKAGE_NAME"\n");
1216         // Unbinds the text domain to avoid broken encoding
1217         bindtextdomain (PACKAGE_NAME, "DOES_NOT_EXIST");
1218         return -1;
1219     }
1220
1221     /* LibVLC does NOT set the default textdomain, since it is a library.
1222      * This could otherwise break programs using LibVLC (other than VLC).
1223      * textdomain (PACKAGE_NAME);
1224      */
1225 #endif
1226     return 0;
1227 }
1228
1229 /*****************************************************************************
1230  * GetFilenames: parse command line options which are not flags
1231  *****************************************************************************
1232  * Parse command line for input files as well as their associated options.
1233  * An option always follows its associated input and begins with a ":".
1234  *****************************************************************************/
1235 static int GetFilenames( libvlc_int_t *p_vlc, int i_argc, char *ppsz_argv[] )
1236 {
1237     int i_opt, i_options;
1238
1239     /* We assume that the remaining parameters are filenames
1240      * and their input options */
1241     for( i_opt = i_argc - 1; i_opt >= optind; i_opt-- )
1242     {
1243         i_options = 0;
1244
1245         /* Count the input options */
1246         while( *ppsz_argv[ i_opt ] == ':' && i_opt > optind )
1247         {
1248             i_options++;
1249             i_opt--;
1250         }
1251
1252         /* TODO: write an internal function of this one, to avoid
1253          *       unnecessary lookups. */
1254
1255         VLC_AddTarget( p_vlc->i_object_id, ppsz_argv[i_opt],
1256                        (char const **)( i_options ? &ppsz_argv[i_opt + 1] :
1257                                         NULL ), i_options,
1258                        PLAYLIST_INSERT, 0 );
1259     }
1260
1261     return VLC_SUCCESS;
1262 }
1263
1264 /*****************************************************************************
1265  * Help: print program help
1266  *****************************************************************************
1267  * Print a short inline help. Message interface is initialized at this stage.
1268  *****************************************************************************/
1269 static void Help( libvlc_int_t *p_this, char const *psz_help_name )
1270 {
1271 #ifdef WIN32
1272     ShowConsole( VLC_TRUE );
1273 #endif
1274
1275     if( psz_help_name && !strcmp( psz_help_name, "help" ) )
1276     {
1277         utf8_fprintf( stdout, vlc_usage, p_this->psz_object_name );
1278         Usage( p_this, "help" );
1279         Usage( p_this, "main" );
1280     }
1281     else if( psz_help_name && !strcmp( psz_help_name, "longhelp" ) )
1282     {
1283         utf8_fprintf( stdout, vlc_usage, p_this->psz_object_name );
1284         Usage( p_this, NULL );
1285     }
1286     else if( psz_help_name )
1287     {
1288         Usage( p_this, psz_help_name );
1289     }
1290
1291 #ifdef WIN32        /* Pause the console because it's destroyed when we exit */
1292     PauseConsole();
1293 #endif
1294 }
1295
1296 /*****************************************************************************
1297  * Usage: print module usage
1298  *****************************************************************************
1299  * Print a short inline help. Message interface is initialized at this stage.
1300  *****************************************************************************/
1301 static void Usage( libvlc_int_t *p_this, char const *psz_module_name )
1302 {
1303 #define FORMAT_STRING "  %s --%s%s%s%s%s%s%s "
1304     /* short option ------'    | | | | | | |
1305      * option name ------------' | | | | | |
1306      * <bra ---------------------' | | | | |
1307      * option type or "" ----------' | | | |
1308      * ket> -------------------------' | | |
1309      * padding spaces -----------------' | |
1310      * comment --------------------------' |
1311      * comment suffix ---------------------'
1312      *
1313      * The purpose of having bra and ket is that we might i18n them as well.
1314      */
1315
1316 #   define COL(x)  "\033[" #x ";1m"
1317 #   define RED     COL(31)
1318 #   define GREEN   COL(32)
1319 #   define YELLOW  COL(33)
1320 #   define BLUE    COL(34)
1321 #   define MAGENTA COL(35)
1322 #   define CYAN    COL(36)
1323 #   define WHITE   COL(37)
1324 #   define GRAY    "\033[0m"
1325 #define COLOR_FORMAT_STRING (WHITE"  %s --%s"YELLOW"%s%s%s%s%s%s "GRAY)
1326
1327 #define LINE_START 8
1328 #define PADDING_SPACES 25
1329 #ifdef WIN32
1330 #   define OPTION_VALUE_SEP "="
1331 #else
1332 #   define OPTION_VALUE_SEP " "
1333 #endif
1334     vlc_list_t *p_list = NULL;
1335     char psz_spaces_text[PADDING_SPACES+LINE_START+1];
1336     char psz_spaces_longtext[LINE_START+3];
1337     char psz_format[sizeof(COLOR_FORMAT_STRING)];
1338     char psz_buffer[10000];
1339     char psz_short[4];
1340     int i_index;
1341     int i_width = ConsoleWidth() - (PADDING_SPACES+LINE_START+1);
1342     int i_width_description = i_width + PADDING_SPACES - 1;
1343     vlc_bool_t b_advanced    = config_GetInt( p_this, "advanced" );
1344     vlc_bool_t b_description = config_GetInt( p_this, "help-verbose" );
1345     vlc_bool_t b_description_hack;
1346     vlc_bool_t b_color       = config_GetInt( p_this, "color" );
1347
1348     memset( psz_spaces_text, ' ', PADDING_SPACES+LINE_START );
1349     psz_spaces_text[PADDING_SPACES+LINE_START] = '\0';
1350     memset( psz_spaces_longtext, ' ', LINE_START+2 );
1351     psz_spaces_longtext[LINE_START+2] = '\0';
1352
1353     if( b_color )
1354         strcpy( psz_format, COLOR_FORMAT_STRING );
1355     else
1356         strcpy( psz_format, FORMAT_STRING );
1357
1358     /* List all modules */
1359     p_list = vlc_list_find( p_this, VLC_OBJECT_MODULE, FIND_ANYWHERE );
1360
1361     /* Ugly hack to make sure that the help options always come first
1362      * (part 1) */
1363     if( !psz_module_name )
1364         Usage( p_this, "help" );
1365
1366     /* Enumerate the config for each module */
1367     for( i_index = 0; i_index < p_list->i_count; i_index++ )
1368     {
1369         vlc_bool_t b_help_module;
1370         module_t *p_parser = (module_t *)p_list->p_values[i_index].p_object;
1371         module_config_t *p_item = NULL;
1372         module_config_t *p_end = p_parser->p_config + p_parser->confsize;
1373
1374         if( psz_module_name && strcmp( psz_module_name,
1375                                        p_parser->psz_object_name ) )
1376         {
1377             const char *const *pp_shortcut = p_parser->pp_shortcuts;
1378             while( *pp_shortcut )
1379             {
1380                 if( !strcmp( psz_module_name, *pp_shortcut ) )
1381                     break;
1382                 pp_shortcut ++;
1383             }
1384             if( !*pp_shortcut )
1385                 continue;
1386         }
1387
1388         /* Ignore modules without config options */
1389         if( !p_parser->i_config_items )
1390         {
1391             continue;
1392         }
1393
1394         b_help_module = !strcmp( "help", p_parser->psz_object_name );
1395         /* Ugly hack to make sure that the help options always come first
1396          * (part 2) */
1397         if( !psz_module_name && b_help_module )
1398             continue;
1399
1400         /* Ignore modules with only advanced config options if requested */
1401         if( !b_advanced )
1402         {
1403             for( p_item = p_parser->p_config;
1404                  p_item < p_end;
1405                  p_item++ )
1406             {
1407                 if( (p_item->i_type & CONFIG_ITEM) &&
1408                     !p_item->b_advanced ) break;
1409             }
1410         }
1411
1412         /* Print name of module */
1413         if( strcmp( "main", p_parser->psz_object_name ) )
1414         {
1415             if( b_color )
1416                 utf8_fprintf( stdout, "\n " GREEN "%s" GRAY "\n",
1417                               p_parser->psz_longname );
1418             else
1419                 utf8_fprintf( stdout, "\n %s\n", p_parser->psz_longname );
1420         }
1421         if( p_parser->psz_help )
1422         {
1423             if( b_color )
1424                 utf8_fprintf( stdout, CYAN" %s\n"GRAY, p_parser->psz_help );
1425             else
1426                 utf8_fprintf( stdout, " %s\n", p_parser->psz_help );
1427         }
1428
1429         /* Print module options */
1430         for( p_item = p_parser->p_config;
1431              p_item < p_end;
1432              p_item++ )
1433         {
1434             char *psz_text, *psz_spaces = psz_spaces_text;
1435             const char *psz_bra = NULL, *psz_type = NULL, *psz_ket = NULL;
1436             const char *psz_suf = "", *psz_prefix = NULL;
1437             signed int i;
1438             size_t i_cur_width;
1439
1440             /* Skip deprecated options */
1441             if( p_item->psz_current )
1442             {
1443                 continue;
1444             }
1445             /* Skip advanced options if requested */
1446             if( p_item->b_advanced && !b_advanced )
1447             {
1448                 continue;
1449             }
1450
1451             switch( p_item->i_type )
1452             {
1453             case CONFIG_HINT_CATEGORY:
1454             case CONFIG_HINT_USAGE:
1455                 if( !strcmp( "main", p_parser->psz_object_name ) )
1456                 {
1457                     if( b_color )
1458                         utf8_fprintf( stdout, GREEN "\n %s\n" GRAY,
1459                                       p_item->psz_text );
1460                     else
1461                         utf8_fprintf( stdout, "\n %s\n", p_item->psz_text );
1462                 }
1463                 if( b_description && p_item->psz_longtext )
1464                 {
1465                     if( b_color )
1466                         utf8_fprintf( stdout, CYAN " %s\n" GRAY,
1467                                       p_item->psz_longtext );
1468                     else
1469                         utf8_fprintf( stdout, " %s\n", p_item->psz_longtext );
1470                 }
1471                 break;
1472
1473             case CONFIG_HINT_SUBCATEGORY:
1474                 if( strcmp( "main", p_parser->psz_object_name ) )
1475                 break;
1476             case CONFIG_SECTION:
1477                 if( b_color )
1478                 {
1479                     utf8_fprintf( stdout, RED"   %s:\n"GRAY,
1480                                   p_item->psz_text );
1481                     if( b_description && p_item->psz_longtext )
1482                         utf8_fprintf( stdout, MAGENTA"   %s\n"GRAY,
1483                                       p_item->psz_longtext );
1484                 }
1485                 else
1486                 {
1487                     utf8_fprintf( stdout, "   %s:\n", p_item->psz_text );
1488                     if( b_description && p_item->psz_longtext )
1489                         utf8_fprintf( stdout, "   %s\n", p_item->psz_longtext );
1490                 }
1491                 break;
1492
1493             case CONFIG_ITEM_STRING:
1494             case CONFIG_ITEM_FILE:
1495             case CONFIG_ITEM_DIRECTORY:
1496             case CONFIG_ITEM_MODULE: /* We could also have "=<" here */
1497             case CONFIG_ITEM_MODULE_CAT:
1498             case CONFIG_ITEM_MODULE_LIST:
1499             case CONFIG_ITEM_MODULE_LIST_CAT:
1500                 psz_bra = OPTION_VALUE_SEP "<";
1501                 psz_type = _("string");
1502                 psz_ket = ">";
1503
1504                 if( p_item->ppsz_list )
1505                 {
1506                     psz_bra = OPTION_VALUE_SEP "{";
1507                     psz_type = psz_buffer;
1508                     psz_buffer[0] = '\0';
1509                     for( i = 0; p_item->ppsz_list[i]; i++ )
1510                     {
1511                         if( i ) strcat( psz_buffer, "," );
1512                         strcat( psz_buffer, p_item->ppsz_list[i] );
1513                     }
1514                     psz_ket = "}";
1515                 }
1516                 break;
1517             case CONFIG_ITEM_INTEGER:
1518             case CONFIG_ITEM_KEY: /* FIXME: do something a bit more clever */
1519                 psz_bra = OPTION_VALUE_SEP "<";
1520                 psz_type = _("integer");
1521                 psz_ket = ">";
1522
1523                 if( p_item->min.i || p_item->max.i )
1524                 {
1525                     sprintf( psz_buffer, "%s [%i .. %i]", psz_type,
1526                              p_item->min.i, p_item->max.i );
1527                     psz_type = psz_buffer;
1528                 }
1529
1530                 if( p_item->i_list )
1531                 {
1532                     psz_bra = OPTION_VALUE_SEP "{";
1533                     psz_type = psz_buffer;
1534                     psz_buffer[0] = '\0';
1535                     for( i = 0; p_item->ppsz_list_text[i]; i++ )
1536                     {
1537                         if( i ) strcat( psz_buffer, ", " );
1538                         sprintf( psz_buffer + strlen(psz_buffer), "%i (%s)",
1539                                  p_item->pi_list[i],
1540                                  p_item->ppsz_list_text[i] );
1541                     }
1542                     psz_ket = "}";
1543                 }
1544                 break;
1545             case CONFIG_ITEM_FLOAT:
1546                 psz_bra = OPTION_VALUE_SEP "<";
1547                 psz_type = _("float");
1548                 psz_ket = ">";
1549                 if( p_item->min.f || p_item->max.f )
1550                 {
1551                     sprintf( psz_buffer, "%s [%f .. %f]", psz_type,
1552                              p_item->min.f, p_item->max.f );
1553                     psz_type = psz_buffer;
1554                 }
1555                 break;
1556             case CONFIG_ITEM_BOOL:
1557                 psz_bra = ""; psz_type = ""; psz_ket = "";
1558                 if( !b_help_module )
1559                 {
1560                     psz_suf = p_item->value.i ? _(" (default enabled)") :
1561                                                 _(" (default disabled)");
1562                 }
1563                 break;
1564             }
1565
1566             if( !psz_type )
1567             {
1568                 continue;
1569             }
1570
1571             /* Add short option if any */
1572             if( p_item->i_short )
1573             {
1574                 sprintf( psz_short, "-%c,", p_item->i_short );
1575             }
1576             else
1577             {
1578                 strcpy( psz_short, "   " );
1579             }
1580
1581             i = PADDING_SPACES - strlen( p_item->psz_name )
1582                  - strlen( psz_bra ) - strlen( psz_type )
1583                  - strlen( psz_ket ) - 1;
1584
1585             if( p_item->i_type == CONFIG_ITEM_BOOL && !b_help_module )
1586             {
1587                 psz_prefix =  ", --no-";
1588                 i -= strlen( p_item->psz_name ) + strlen( psz_prefix );
1589             }
1590
1591             if( i < 0 )
1592             {
1593                 psz_spaces[0] = '\n';
1594                 i = 0;
1595             }
1596             else
1597             {
1598                 psz_spaces[i] = '\0';
1599             }
1600
1601             if( p_item->i_type == CONFIG_ITEM_BOOL && !b_help_module )
1602             {
1603                 utf8_fprintf( stdout, psz_format, psz_short, p_item->psz_name,
1604                          psz_prefix, p_item->psz_name, psz_bra, psz_type,
1605                          psz_ket, psz_spaces );
1606             }
1607             else
1608             {
1609                 utf8_fprintf( stdout, psz_format, psz_short, p_item->psz_name,
1610                          "", "", psz_bra, psz_type, psz_ket, psz_spaces );
1611             }
1612
1613             psz_spaces[i] = ' ';
1614
1615             /* We wrap the rest of the output */
1616             sprintf( psz_buffer, "%s%s", p_item->psz_text, psz_suf );
1617             b_description_hack = b_description;
1618
1619  description:
1620             psz_text = psz_buffer;
1621             i_cur_width = b_description && !b_description_hack
1622                           ? i_width_description
1623                           : i_width;
1624             while( *psz_text )
1625             {
1626                 char *psz_parser, *psz_word;
1627                 size_t i_end = strlen( psz_text );
1628
1629                 /* If the remaining text fits in a line, print it. */
1630                 if( i_end <= i_cur_width )
1631                 {
1632                     if( b_color )
1633                     {
1634                         if( !b_description || b_description_hack )
1635                             utf8_fprintf( stdout, BLUE"%s\n"GRAY, psz_text );
1636                         else
1637                             utf8_fprintf( stdout, "%s\n", psz_text );
1638                     }
1639                     else
1640                     {
1641                         utf8_fprintf( stdout, "%s\n", psz_text );
1642                     }
1643                     break;
1644                 }
1645
1646                 /* Otherwise, eat as many words as possible */
1647                 psz_parser = psz_text;
1648                 do
1649                 {
1650                     psz_word = psz_parser;
1651                     psz_parser = strchr( psz_word, ' ' );
1652                     /* If no space was found, we reached the end of the text
1653                      * block; otherwise, we skip the space we just found. */
1654                     psz_parser = psz_parser ? psz_parser + 1
1655                                             : psz_text + i_end;
1656
1657                 } while( (size_t)(psz_parser - psz_text) <= i_cur_width );
1658
1659                 /* We cut a word in one of these cases:
1660                  *  - it's the only word in the line and it's too long.
1661                  *  - we used less than 80% of the width and the word we are
1662                  *    going to wrap is longer than 40% of the width, and even
1663                  *    if the word would have fit in the next line. */
1664                 if( psz_word == psz_text
1665              || ( (size_t)(psz_word - psz_text) < 80 * i_cur_width / 100
1666              && (size_t)(psz_parser - psz_word) > 40 * i_cur_width / 100 ) )
1667                 {
1668                     char c = psz_text[i_cur_width];
1669                     psz_text[i_cur_width] = '\0';
1670                     if( b_color )
1671                     {
1672                         if( !b_description || b_description_hack )
1673                             utf8_fprintf( stdout, BLUE"%s\n%s"GRAY,
1674                                           psz_text, psz_spaces );
1675                         else
1676                             utf8_fprintf( stdout, "%s\n%s",
1677                                           psz_text, psz_spaces );
1678                     }
1679                     else
1680                     {
1681                         utf8_fprintf( stdout, "%s\n%s", psz_text, psz_spaces );
1682                     }
1683                     psz_text += i_cur_width;
1684                     psz_text[0] = c;
1685                 }
1686                 else
1687                 {
1688                     psz_word[-1] = '\0';
1689                     if( b_color )
1690                     {
1691                         if( !b_description || b_description_hack )
1692                             utf8_fprintf( stdout, BLUE"%s\n%s"GRAY,
1693                                           psz_text, psz_spaces );
1694                         else
1695                             utf8_fprintf( stdout, "%s\n%s",
1696                                           psz_text, psz_spaces );
1697                     }
1698                     else
1699                     {
1700                         utf8_fprintf( stdout, "%s\n%s", psz_text, psz_spaces );
1701                     }
1702                     psz_text = psz_word;
1703                 }
1704             }
1705
1706             if( b_description_hack && p_item->psz_longtext )
1707             {
1708                 sprintf( psz_buffer, "%s%s", p_item->psz_longtext, psz_suf );
1709                 b_description_hack = VLC_FALSE;
1710                 psz_spaces = psz_spaces_longtext;
1711                 utf8_fprintf( stdout, "%s", psz_spaces );
1712                 goto description;
1713             }
1714         }
1715     }
1716
1717     /* Release the module list */
1718     vlc_list_release( p_list );
1719 }
1720
1721 /*****************************************************************************
1722  * ListModules: list the available modules with their description
1723  *****************************************************************************
1724  * Print a list of all available modules (builtins and plugins) and a short
1725  * description for each one.
1726  *****************************************************************************/
1727 static void ListModules( libvlc_int_t *p_this, vlc_bool_t b_verbose )
1728 {
1729     vlc_list_t *p_list = NULL;
1730     module_t *p_parser = NULL;
1731     char psz_spaces[22];
1732     int i_index;
1733
1734     vlc_bool_t b_color = config_GetInt( p_this, "color" );
1735
1736     memset( psz_spaces, ' ', 22 );
1737
1738 #ifdef WIN32
1739     ShowConsole( VLC_TRUE );
1740 #endif
1741
1742     /* List all modules */
1743     p_list = vlc_list_find( p_this, VLC_OBJECT_MODULE, FIND_ANYWHERE );
1744
1745     /* Enumerate each module */
1746     for( i_index = 0; i_index < p_list->i_count; i_index++ )
1747     {
1748         int i;
1749
1750         p_parser = (module_t *)p_list->p_values[i_index].p_object ;
1751
1752         /* Nasty hack, but right now I'm too tired to think about a nice
1753          * solution */
1754         i = 22 - strlen( p_parser->psz_object_name ) - 1;
1755         if( i < 0 ) i = 0;
1756         psz_spaces[i] = 0;
1757
1758         if( b_color )
1759             utf8_fprintf( stdout, GREEN"  %s%s "WHITE"%s\n"GRAY,
1760                           p_parser->psz_object_name,
1761                           psz_spaces,
1762                           p_parser->psz_longname );
1763         else
1764             utf8_fprintf( stdout, "  %s%s %s\n",
1765                           p_parser->psz_object_name,
1766                           psz_spaces, p_parser->psz_longname );
1767
1768         if( b_verbose )
1769         {
1770             const char *const *pp_shortcut = p_parser->pp_shortcuts;
1771             while( *pp_shortcut )
1772             {
1773                 if( strcmp( *pp_shortcut, p_parser->psz_object_name ) )
1774                 {
1775                     if( b_color )
1776                         utf8_fprintf( stdout, CYAN"   s %s\n"GRAY,
1777                                       *pp_shortcut );
1778                     else
1779                         utf8_fprintf( stdout, "   s %s\n",
1780                                       *pp_shortcut );
1781                 }
1782                 pp_shortcut++;
1783             }
1784             if( p_parser->psz_capability )
1785             {
1786                 if( b_color )
1787                     utf8_fprintf( stdout, MAGENTA"   c %s (%d)\n"GRAY,
1788                                   p_parser->psz_capability,
1789                                   p_parser->i_score );
1790                 else
1791                     utf8_fprintf( stdout, "   c %s (%d)\n",
1792                                   p_parser->psz_capability,
1793                                   p_parser->i_score );
1794             }
1795             if( p_parser->psz_program )
1796             {
1797                 if( b_color )
1798                     utf8_fprintf( stdout, YELLOW "   p %s\n"GRAY,
1799                                   p_parser->psz_program );
1800                 else
1801                     utf8_fprintf( stdout, "   p %s\n", p_parser->psz_program );
1802             }
1803         }
1804
1805         psz_spaces[i] = ' ';
1806     }
1807
1808     vlc_list_release( p_list );
1809
1810 #ifdef WIN32        /* Pause the console because it's destroyed when we exit */
1811     PauseConsole();
1812 #endif
1813 }
1814
1815 /*****************************************************************************
1816  * Version: print complete program version
1817  *****************************************************************************
1818  * Print complete program version and build number.
1819  *****************************************************************************/
1820 static void Version( void )
1821 {
1822 #ifdef WIN32
1823     ShowConsole( VLC_TRUE );
1824 #endif
1825
1826     utf8_fprintf( stdout, _("VLC version %s\n"), VLC_Version() );
1827     utf8_fprintf( stdout, _("Compiled by %s@%s.%s\n"),
1828              VLC_CompileBy(), VLC_CompileHost(), VLC_CompileDomain() );
1829     utf8_fprintf( stdout, _("Compiler: %s\n"), VLC_Compiler() );
1830     if( strcmp( VLC_Changeset(), "exported" ) )
1831         utf8_fprintf( stdout, _("Based upon svn changeset [%s]\n"),
1832                  VLC_Changeset() );
1833     utf8_fprintf( stdout, LICENSE_MSG );
1834
1835 #ifdef WIN32        /* Pause the console because it's destroyed when we exit */
1836     PauseConsole();
1837 #endif
1838 }
1839
1840 /*****************************************************************************
1841  * ShowConsole: On Win32, create an output console for debug messages
1842  *****************************************************************************
1843  * This function is useful only on Win32.
1844  *****************************************************************************/
1845 #ifdef WIN32 /*  */
1846 static void ShowConsole( vlc_bool_t b_dofile )
1847 {
1848 #   ifndef UNDER_CE
1849     FILE *f_help = NULL;
1850
1851     if( getenv( "PWD" ) && getenv( "PS1" ) ) return; /* cygwin shell */
1852
1853     AllocConsole();
1854
1855     freopen( "CONOUT$", "w", stderr );
1856     freopen( "CONIN$", "r", stdin );
1857
1858     if( b_dofile && (f_help = fopen( "vlc-help.txt", "wt" )) )
1859     {
1860         fclose( f_help );
1861         freopen( "vlc-help.txt", "wt", stdout );
1862         utf8_fprintf( stderr, _("\nDumped content to vlc-help.txt file.\n") );
1863     }
1864     else freopen( "CONOUT$", "w", stdout );
1865
1866 #   endif
1867 }
1868 #endif
1869
1870 /*****************************************************************************
1871  * PauseConsole: On Win32, wait for a key press before closing the console
1872  *****************************************************************************
1873  * This function is useful only on Win32.
1874  *****************************************************************************/
1875 #ifdef WIN32 /*  */
1876 static void PauseConsole( void )
1877 {
1878 #   ifndef UNDER_CE
1879
1880     if( getenv( "PWD" ) && getenv( "PS1" ) ) return; /* cygwin shell */
1881
1882     utf8_fprintf( stderr, _("\nPress the RETURN key to continue...\n") );
1883     getchar();
1884     fclose( stdout );
1885
1886 #   endif
1887 }
1888 #endif
1889
1890 /*****************************************************************************
1891  * ConsoleWidth: Return the console width in characters
1892  *****************************************************************************
1893  * We use the stty shell command to get the console width; if this fails or
1894  * if the width is less than 80, we default to 80.
1895  *****************************************************************************/
1896 static int ConsoleWidth( void )
1897 {
1898     int i_width = 80;
1899
1900 #ifndef WIN32
1901     char buf[20];
1902     char *psz_parser = NULL;
1903     FILE *file = NULL;
1904     int i_ret;
1905
1906     file = popen( "stty size 2>/dev/null", "r" );
1907     if( file )
1908     {
1909         i_ret = fread( buf, 1, 20, file );
1910         if( i_ret > 0 )
1911         {
1912             buf[19] = '\0';
1913             psz_parser = strchr( buf, ' ' );
1914             if( psz_parser )
1915             {
1916                 i_ret = atoi( psz_parser + 1 );
1917                 if( i_ret >= 80 )
1918                 {
1919                     i_width = i_ret;
1920                 }
1921             }
1922         }
1923
1924         pclose( file );
1925     }
1926 #endif
1927
1928     return i_width;
1929 }
1930
1931 static int VerboseCallback( vlc_object_t *p_this, const char *psz_variable,
1932                      vlc_value_t old_val, vlc_value_t new_val, void *param)
1933 {
1934     libvlc_int_t *p_libvlc = (libvlc_int_t *)p_this;
1935     (void)psz_variable;
1936     (void)old_val;
1937     (void)param;
1938
1939     if( new_val.i_int >= -1 )
1940     {
1941         p_libvlc->i_verbose = __MIN( new_val.i_int, 2 );
1942     }
1943     return VLC_SUCCESS;
1944 }
1945
1946 /*****************************************************************************
1947  * InitDeviceValues: initialize device values
1948  *****************************************************************************
1949  * This function inits the dvd, vcd and cd-audio values
1950  *****************************************************************************/
1951 static void InitDeviceValues( libvlc_int_t *p_vlc )
1952 {
1953 #ifdef HAVE_HAL
1954     LibHalContext * ctx = NULL;
1955     int i, i_devices;
1956     char **devices = NULL;
1957     char *block_dev = NULL;
1958     dbus_bool_t b_dvd;
1959
1960 #ifdef HAVE_HAL_1
1961     DBusConnection *p_connection = NULL;
1962     DBusError       error;
1963
1964     ctx = libhal_ctx_new();
1965     if( !ctx ) return;
1966     dbus_error_init( &error );
1967     p_connection = dbus_bus_get ( DBUS_BUS_SYSTEM, &error );
1968     if( dbus_error_is_set( &error ) || !p_connection )
1969     {
1970         dbus_error_free( &error );
1971         return;
1972     }
1973     libhal_ctx_set_dbus_connection( ctx, p_connection );
1974     if( libhal_ctx_init( ctx, &error ) )
1975 #else
1976     ctx = hal_initialize( NULL, FALSE );
1977     if( ctx )
1978 #endif
1979
1980     {
1981 #ifdef HAVE_HAL_1
1982         if( ( devices = libhal_get_all_devices( ctx, &i_devices, NULL ) ) )
1983 #else
1984         if( ( devices = hal_get_all_devices( ctx, &i_devices ) ) )
1985 #endif
1986         {
1987             for( i = 0; i < i_devices; i++ )
1988             {
1989 #ifdef HAVE_HAL_1
1990                 if( !libhal_device_property_exists( ctx, devices[i],
1991                                                 "storage.cdrom.dvd", NULL ) )
1992 #else
1993                 if( !hal_device_property_exists( ctx, devices[ i ],
1994                                                 "storage.cdrom.dvd" ) )
1995 #endif
1996                 {
1997                     continue;
1998                 }
1999 #ifdef HAVE_HAL_1
2000                 b_dvd = libhal_device_get_property_bool( ctx, devices[ i ],
2001                                                  "storage.cdrom.dvd", NULL  );
2002                 block_dev = libhal_device_get_property_string( ctx,
2003                                 devices[ i ], "block.device" , NULL );
2004 #else
2005                 b_dvd = hal_device_get_property_bool( ctx, devices[ i ],
2006                                                       "storage.cdrom.dvd" );
2007                 block_dev = hal_device_get_property_string( ctx, devices[ i ],
2008                                                             "block.device" );
2009 #endif
2010                 if( b_dvd )
2011                 {
2012                     config_PutPsz( p_vlc, "dvd", block_dev );
2013                 }
2014
2015                 config_PutPsz( p_vlc, "vcd", block_dev );
2016                 config_PutPsz( p_vlc, "cd-audio", block_dev );
2017 #ifdef HAVE_HAL_1
2018                 libhal_free_string( block_dev );
2019 #else
2020                 hal_free_string( block_dev );
2021 #endif
2022             }
2023 #ifdef HAVE_HAL_1
2024             libhal_free_string_array( devices );
2025 #else
2026             hal_free_string_array( devices );
2027 #endif
2028         }
2029
2030 #ifdef HAVE_HAL_1
2031         libhal_ctx_shutdown( ctx, NULL );
2032         dbus_connection_unref( p_connection );
2033 #else
2034         hal_shutdown( ctx );
2035 #endif
2036     }
2037     else
2038     {
2039         msg_Warn( p_vlc, "Unable to get HAL device properties" );
2040     }
2041 #else
2042     (void)p_vlc;
2043 #endif /* HAVE_HAL */
2044 }