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