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