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