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