]> git.sesse.net Git - vlc/blob - src/libvlc-common.c
Split libvlc.c:
[vlc] / src / libvlc-common.c
1 /*****************************************************************************
2  * libvlc-common.c: libvlc instances creation and deletion
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  * Pretend we are a builtin module
34  *****************************************************************************/
35 #define MODULE_NAME main
36 #define MODULE_PATH main
37 #define __BUILTIN__
38
39 /*****************************************************************************
40  * Preamble
41  *****************************************************************************/
42 #include <vlc/vlc.h>
43 #include <libvlc_internal.h>
44 #include <vlc/input.h>
45
46 #include <errno.h>                                                 /* ENOMEM */
47 #include <stdio.h>                                              /* sprintf() */
48 #include <string.h>                                            /* strerror() */
49 #include <stdlib.h>                                                /* free() */
50
51 #ifndef WIN32
52 #   include <netinet/in.h>                            /* BSD: struct in_addr */
53 #endif
54
55 #ifdef HAVE_UNISTD_H
56 #   include <unistd.h>
57 #elif defined( WIN32 ) && !defined( UNDER_CE )
58 #   include <io.h>
59 #endif
60
61 #ifdef WIN32                       /* optind, getopt(), included in unistd.h */
62 #   include "extras/getopt.h"
63 #endif
64
65 #ifdef HAVE_LOCALE_H
66 #   include <locale.h>
67 #endif
68
69 #ifdef HAVE_HAL
70 #   include <hal/libhal.h>
71 #endif
72
73 #include "vlc_cpu.h"                                        /* CPU detection */
74 #include "os_specific.h"
75
76 #include "vlc_error.h"
77
78 #include "vlc_playlist.h"
79 #include "vlc_interface.h"
80
81 #include "audio_output.h"
82
83 #include "vlc_video.h"
84 #include "video_output.h"
85
86 #include "stream_output.h"
87 #include "charset.h"
88
89 #include "libvlc.h"
90
91 /*****************************************************************************
92  * The evil global variable. We handle it with care, don't worry.
93  *****************************************************************************/
94 static libvlc_global_data_t   libvlc_global;
95 static libvlc_global_data_t * p_libvlc_global;
96 static libvlc_int_t *    p_static_vlc;
97
98 /*****************************************************************************
99  * Local prototypes
100  *****************************************************************************/
101 void LocaleInit( vlc_object_t * );
102 void LocaleDeinit( void );
103 static void SetLanguage   ( char const * );
104 static int  GetFilenames  ( libvlc_int_t *, int, char *[] );
105 static void Help          ( libvlc_int_t *, char const *psz_help_name );
106 static void Usage         ( libvlc_int_t *, char const *psz_module_name );
107 static void ListModules   ( libvlc_int_t * );
108 static void Version       ( void );
109
110 #ifdef WIN32
111 static void ShowConsole   ( vlc_bool_t );
112 static void PauseConsole  ( void );
113 #endif
114 static int  ConsoleWidth  ( void );
115
116 static int  VerboseCallback( vlc_object_t *, char const *,
117                              vlc_value_t, vlc_value_t, void * );
118
119 static void InitDeviceValues( libvlc_int_t * );
120
121 /*****************************************************************************
122  * vlc_current_object: return the current object.
123  *****************************************************************************
124  * If i_object is non-zero, return the corresponding object. Otherwise,
125  * return the statically allocated p_vlc object.
126  *****************************************************************************/
127 libvlc_int_t * vlc_current_object( int i_object )
128 {
129     if( i_object )
130     {
131          return vlc_object_get( p_libvlc_global, i_object );
132     }
133
134     return p_static_vlc;
135 }
136
137
138 /**
139  * Allocate a libvlc instance, initialize global data if needed
140  * It also initializes the threading system
141  */
142 libvlc_int_t * libvlc_InternalCreate( void )
143 {
144     int i_ret;
145     libvlc_int_t * p_libvlc = NULL;
146     vlc_value_t lockval;
147
148     /* &libvlc_global never changes,
149      * so we can safely call this multiple times. */
150     p_libvlc_global = &libvlc_global;
151
152     /* vlc_threads_init *must* be the first internal call! No other call is
153      * allowed before the thread system has been initialized. */
154     i_ret = vlc_threads_init( p_libvlc_global );
155     if( i_ret < 0 ) return NULL;
156
157     /* Now that the thread system is initialized, we don't have much, but
158      * at least we have var_Create */
159     var_Create( p_libvlc_global, "libvlc", VLC_VAR_MUTEX );
160     var_Get( p_libvlc_global, "libvlc", &lockval );
161     vlc_mutex_lock( lockval.p_address );
162     if( !libvlc_global.b_ready )
163     {
164         char *psz_env;
165
166         /* Guess what CPU we have */
167         libvlc_global.i_cpu = CPUCapabilities();
168
169         /* Find verbosity from VLC_VERBOSE environment variable */
170         psz_env = getenv( "VLC_VERBOSE" );
171         libvlc_global.i_verbose = psz_env ? atoi( psz_env ) : -1;
172
173 #if defined( HAVE_ISATTY ) && !defined( WIN32 )
174         libvlc_global.b_color = isatty( 2 ); /* 2 is for stderr */
175 #else
176         libvlc_global.b_color = VLC_FALSE;
177 #endif
178
179         /* Initialize message queue */
180         msg_Create( p_libvlc_global );
181
182         /* Announce who we are */
183         msg_Dbg( p_libvlc_global, COPYRIGHT_MESSAGE );
184         msg_Dbg( p_libvlc_global, "libvlc was configured with %s",
185                                 CONFIGURE_LINE );
186
187         /* The module bank will be initialized later */
188         libvlc_global.p_module_bank = NULL;
189
190         libvlc_global.b_ready = VLC_TRUE;
191     }
192     vlc_mutex_unlock( lockval.p_address );
193     var_Destroy( p_libvlc_global, "libvlc" );
194
195     /* Allocate a libvlc instance object */
196     p_libvlc = vlc_object_create( p_libvlc_global, VLC_OBJECT_LIBVLC );
197     if( p_libvlc == NULL ) return NULL;
198     p_libvlc->thread_id = 0;
199     p_libvlc->p_playlist = NULL;
200     p_libvlc->psz_object_name = "libvlc";
201
202     /* Initialize mutexes */
203     vlc_mutex_init( p_libvlc, &p_libvlc->config_lock );
204 #ifdef __APPLE__
205     vlc_mutex_init( p_libvlc, &p_libvlc->quicktime_lock );
206     vlc_thread_set_priority( p_libvlc, VLC_THREAD_PRIORITY_LOW );
207 #endif
208
209     /* Store our newly allocated structure in the global list */
210     vlc_object_attach( p_libvlc, p_libvlc_global );
211
212     /* Store data for the non-reentrant API */
213     p_static_vlc = p_libvlc;
214
215     return p_libvlc;
216 }
217
218 /**
219  * Initialize a libvlc instance
220  * This function initializes a previously allocated libvlc instance:
221  *  - CPU detection
222  *  - gettext initialization
223  *  - message queue, module bank and playlist initialization
224  *  - configuration and commandline parsing
225  */
226 int libvlc_InternalInit( libvlc_int_t *p_libvlc, int i_argc, char *ppsz_argv[] )
227 {
228     char         p_capabilities[200];
229     char *       p_tmp;
230     char *       psz_modules;
231     char *       psz_parser;
232     char *       psz_control;
233     vlc_bool_t   b_exit = VLC_FALSE;
234     int          i_ret = VLC_EEXIT;
235     module_t    *p_help_module;
236     playlist_t  *p_playlist;
237     vlc_value_t  val;
238 #if defined( ENABLE_NLS ) \
239      && ( defined( HAVE_GETTEXT ) || defined( HAVE_INCLUDED_GETTEXT ) )
240 # if defined (WIN32) || defined (__APPLE__)
241     char *       psz_language;
242 #endif
243 #endif
244
245     /* System specific initialization code */
246     system_Init( p_libvlc, &i_argc, ppsz_argv );
247
248     /* Get the executable name (similar to the basename command) */
249     if( i_argc > 0 )
250     {
251         p_libvlc->psz_object_name = p_tmp = ppsz_argv[ 0 ];
252         while( *p_tmp )
253         {
254             if( *p_tmp == '/' ) p_libvlc->psz_object_name = ++p_tmp;
255             else ++p_tmp;
256         }
257     }
258     else
259     {
260         p_libvlc->psz_object_name = "vlc";
261     }
262
263     /*
264      * Support for gettext
265      */
266     SetLanguage( "" );
267
268     /*
269      * Global iconv, must be done after setlocale()
270      * so that vlc_current_charset() works.
271      */
272     LocaleInit( (vlc_object_t *)p_libvlc );
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     /* Hack: insert the help module here */
284     p_help_module = vlc_object_create( p_libvlc, VLC_OBJECT_MODULE );
285     if( p_help_module == NULL )
286     {
287         module_EndBank( p_libvlc );
288         return VLC_EGENERIC;
289     }
290     p_help_module->psz_object_name = "help";
291     p_help_module->psz_longname = N_("Help options");
292     config_Duplicate( p_help_module, p_help_config );
293     vlc_object_attach( p_help_module, libvlc_global.p_module_bank );
294     /* End hack */
295
296     if( config_LoadCmdLine( p_libvlc, &i_argc, ppsz_argv, VLC_TRUE ) )
297     {
298         vlc_object_detach( p_help_module );
299         config_Free( p_help_module );
300         vlc_object_destroy( p_help_module );
301         module_EndBank( p_libvlc );
302         return VLC_EGENERIC;
303     }
304
305     /* Check for short help option */
306     if( config_GetInt( p_libvlc, "help" ) )
307     {
308         Help( p_libvlc, "help" );
309         b_exit = VLC_TRUE;
310         i_ret = VLC_EEXITSUCCESS;
311     }
312     /* Check for version option */
313     else if( config_GetInt( p_libvlc, "version" ) )
314     {
315         Version();
316         b_exit = VLC_TRUE;
317         i_ret = VLC_EEXITSUCCESS;
318     }
319
320     /* Set the config file stuff */
321     p_libvlc->psz_homedir = config_GetHomeDir();
322     p_libvlc->psz_userdir = config_GetUserDir();
323     if( p_libvlc->psz_userdir == NULL )
324         p_libvlc->psz_userdir = strdup(p_libvlc->psz_homedir);
325     p_libvlc->psz_configfile = config_GetPsz( p_libvlc, "config" );
326     if( p_libvlc->psz_configfile != NULL && p_libvlc->psz_configfile[0] == '~'
327          && p_libvlc->psz_configfile[1] == '/' )
328     {
329         char *psz = malloc( strlen(p_libvlc->psz_userdir)
330                              + strlen(p_libvlc->psz_configfile) );
331         /* This is incomplete : we should also support the ~cmassiot/ syntax. */
332         sprintf( psz, "%s/%s", p_libvlc->psz_userdir,
333                                p_libvlc->psz_configfile + 2 );
334         free( p_libvlc->psz_configfile );
335         p_libvlc->psz_configfile = psz;
336     }
337
338     /* Check for plugins cache options */
339     if( config_GetInt( p_libvlc, "reset-plugins-cache" ) )
340     {
341         libvlc_global.p_module_bank->b_cache_delete = VLC_TRUE;
342     }
343
344     /* Hack: remove the help module here */
345     vlc_object_detach( p_help_module );
346     /* End hack */
347
348     /* Will be re-done properly later on */
349     p_libvlc->p_libvlc_global->i_verbose = config_GetInt( p_libvlc, "verbose" );
350
351     /* Check for daemon mode */
352 #ifndef WIN32
353     if( config_GetInt( p_libvlc, "daemon" ) )
354     {
355 #if HAVE_DAEMON
356         if( daemon( 1, 0) != 0 )
357         {
358             msg_Err( p_libvlc, "Unable to fork vlc to daemon mode" );
359             b_exit = VLC_TRUE;
360         }
361
362         p_libvlc->p_libvlc_global->b_daemon = VLC_TRUE;
363
364         /* lets check if we need to write the pidfile */
365         char * psz_pidfile = config_GetPsz( p_libvlc, "pidfile" );
366
367         if( psz_pidfile != NULL )
368         {
369             FILE *pidfile;
370             pid_t i_pid = getpid ();
371             msg_Dbg( p_libvlc, "PID is %d, writing it to %s",
372                                i_pid, psz_pidfile );
373             pidfile = utf8_fopen( psz_pidfile,"w" );
374             if( pidfile != NULL )
375             {
376                 utf8_fprintf( pidfile, "%d", (int)i_pid );
377                 fclose( pidfile );
378             }
379             else
380             {
381                 msg_Err( p_libvlc, "cannot open pid file for writing: %s (%s)",
382                          psz_pidfile, strerror(errno) );
383             }
384         }
385         free( psz_pidfile );
386
387 #else
388         pid_t i_pid;
389
390         if( ( i_pid = fork() ) < 0 )
391         {
392             msg_Err( p_libvlc, "unable to fork vlc to daemon mode" );
393             b_exit = VLC_TRUE;
394         }
395         else if( i_pid )
396         {
397             /* This is the parent, exit right now */
398             msg_Dbg( p_libvlc, "closing parent process" );
399             b_exit = VLC_TRUE;
400             i_ret = VLC_EEXITSUCCESS;
401         }
402         else
403         {
404             /* We are the child */
405             msg_Dbg( p_libvlc, "daemon spawned" );
406             close( STDIN_FILENO );
407             close( STDOUT_FILENO );
408             close( STDERR_FILENO );
409
410             p_libvlc->p_libvlc_global->b_daemon = VLC_TRUE;
411         }
412 #endif
413     }
414 #endif
415
416     if( b_exit )
417     {
418         config_Free( p_help_module );
419         vlc_object_destroy( p_help_module );
420         module_EndBank( p_libvlc );
421         return i_ret;
422     }
423
424     /* Check for translation config option */
425 #if defined( ENABLE_NLS ) \
426      && ( defined( HAVE_GETTEXT ) || defined( HAVE_INCLUDED_GETTEXT ) )
427 # if defined (WIN32) || defined (__APPLE__)
428     /* This ain't really nice to have to reload the config here but it seems
429      * the only way to do it. */
430     config_LoadConfigFile( p_libvlc, "main" );
431     config_LoadCmdLine( p_libvlc, &i_argc, ppsz_argv, VLC_TRUE );
432
433     /* Check if the user specified a custom language */
434     psz_language = config_GetPsz( p_libvlc, "language" );
435     if( psz_language && *psz_language && strcmp( psz_language, "auto" ) )
436     {
437         vlc_bool_t b_cache_delete = libvlc_global.p_module_bank->b_cache_delete;
438
439         /* Reset the default domain */
440         SetLanguage( psz_language );
441
442         /* Translate "C" to the language code: "fr", "en_GB", "nl", "ru"... */
443         msg_Dbg( p_libvlc, "translation test: code is \"%s\"", _("C") );
444
445         module_EndBank( p_libvlc );
446         module_InitBank( p_libvlc );
447         config_LoadConfigFile( p_libvlc, "main" );
448         config_LoadCmdLine( p_libvlc, &i_argc, ppsz_argv, VLC_TRUE );
449         libvlc_global.p_module_bank->b_cache_delete = b_cache_delete;
450     }
451     if( psz_language ) free( psz_language );
452 # endif
453 #endif
454
455     /*
456      * Load the builtins and plugins into the module_bank.
457      * We have to do it before config_Load*() because this also gets the
458      * list of configuration options exported by each module and loads their
459      * default values.
460      */
461     module_LoadBuiltins( p_libvlc );
462     module_LoadPlugins( p_libvlc );
463     if( p_libvlc->b_die )
464     {
465         b_exit = VLC_TRUE;
466     }
467
468     msg_Dbg( p_libvlc, "module bank initialized, found %i modules",
469                     libvlc_global.p_module_bank->i_children );
470
471     /* Hack: insert the help module here */
472     vlc_object_attach( p_help_module, libvlc_global.p_module_bank );
473     /* End hack */
474
475     /* Check for help on modules */
476     if( (p_tmp = config_GetPsz( p_libvlc, "module" )) )
477     {
478         Help( p_libvlc, p_tmp );
479         free( p_tmp );
480         b_exit = VLC_TRUE;
481         i_ret = VLC_EEXITSUCCESS;
482     }
483     /* Check for long help option */
484     else if( config_GetInt( p_libvlc, "longhelp" ) )
485     {
486         Help( p_libvlc, "longhelp" );
487         b_exit = VLC_TRUE;
488         i_ret = VLC_EEXITSUCCESS;
489     }
490     /* Check for module list option */
491     else if( config_GetInt( p_libvlc, "list" ) )
492     {
493         ListModules( p_libvlc );
494         b_exit = VLC_TRUE;
495         i_ret = VLC_EEXITSUCCESS;
496     }
497
498     /* Check for config file options */
499     if( config_GetInt( p_libvlc, "reset-config" ) )
500     {
501         vlc_object_detach( p_help_module );
502         config_ResetAll( p_libvlc );
503         config_LoadCmdLine( p_libvlc, &i_argc, ppsz_argv, VLC_TRUE );
504         config_SaveConfigFile( p_libvlc, NULL );
505         vlc_object_attach( p_help_module, libvlc_global.p_module_bank );
506     }
507     if( config_GetInt( p_libvlc, "save-config" ) )
508     {
509         vlc_object_detach( p_help_module );
510         config_LoadConfigFile( p_libvlc, NULL );
511         config_LoadCmdLine( p_libvlc, &i_argc, ppsz_argv, VLC_TRUE );
512         config_SaveConfigFile( p_libvlc, NULL );
513         vlc_object_attach( p_help_module, libvlc_global.p_module_bank );
514     }
515
516     /* Hack: remove the help module here */
517     vlc_object_detach( p_help_module );
518     /* End hack */
519
520     if( b_exit )
521     {
522         config_Free( p_help_module );
523         vlc_object_destroy( p_help_module );
524         module_EndBank( p_libvlc );
525         return i_ret;
526     }
527
528     /*
529      * Init device values
530      */
531     InitDeviceValues( p_libvlc );
532
533     /*
534      * Override default configuration with config file settings
535      */
536     config_LoadConfigFile( p_libvlc, NULL );
537
538     /* Hack: insert the help module here */
539     vlc_object_attach( p_help_module, libvlc_global.p_module_bank );
540     /* End hack */
541
542     /*
543      * Override configuration with command line settings
544      */
545     if( config_LoadCmdLine( p_libvlc, &i_argc, ppsz_argv, VLC_FALSE ) )
546     {
547 #ifdef WIN32
548         ShowConsole( VLC_FALSE );
549         /* Pause the console because it's destroyed when we exit */
550         fprintf( stderr, "The command line options couldn't be loaded, check "
551                  "that they are valid.\n" );
552         PauseConsole();
553 #endif
554         vlc_object_detach( p_help_module );
555         config_Free( p_help_module );
556         vlc_object_destroy( p_help_module );
557         module_EndBank( p_libvlc );
558         return VLC_EGENERIC;
559     }
560
561     /* Hack: remove the help module here */
562     vlc_object_detach( p_help_module );
563     config_Free( p_help_module );
564     vlc_object_destroy( p_help_module );
565     /* End hack */
566
567     /*
568      * System specific configuration
569      */
570     system_Configure( p_libvlc, &i_argc, ppsz_argv );
571
572     /*
573      * Message queue options
574      */
575
576     var_Create( p_libvlc, "verbose", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
577     if( config_GetInt( p_libvlc, "quiet" ) )
578     {
579         val.i_int = -1;
580         var_Set( p_libvlc, "verbose", val );
581     }
582     var_AddCallback( p_libvlc, "verbose", VerboseCallback, NULL );
583     var_Change( p_libvlc, "verbose", VLC_VAR_TRIGGER_CALLBACKS, NULL, NULL );
584
585     libvlc_global.b_color = libvlc_global.b_color && 
586                                 config_GetInt( p_libvlc, "color" );
587
588     /*
589      * Output messages that may still be in the queue
590      */
591     msg_Flush( p_libvlc );
592
593     /* p_libvlc initialization. FIXME ? */
594
595     if( !config_GetInt( p_libvlc, "fpu" ) )
596         libvlc_global.i_cpu &= ~CPU_CAPABILITY_FPU;
597
598 #if defined( __i386__ ) || defined( __x86_64__ )
599     if( !config_GetInt( p_libvlc, "mmx" ) )
600         libvlc_global.i_cpu &= ~CPU_CAPABILITY_MMX;
601     if( !config_GetInt( p_libvlc, "3dn" ) )
602         libvlc_global.i_cpu &= ~CPU_CAPABILITY_3DNOW;
603     if( !config_GetInt( p_libvlc, "mmxext" ) )
604         libvlc_global.i_cpu &= ~CPU_CAPABILITY_MMXEXT;
605     if( !config_GetInt( p_libvlc, "sse" ) )
606         libvlc_global.i_cpu &= ~CPU_CAPABILITY_SSE;
607     if( !config_GetInt( p_libvlc, "sse2" ) )
608         libvlc_global.i_cpu &= ~CPU_CAPABILITY_SSE2;
609 #endif
610 #if defined( __powerpc__ ) || defined( __ppc__ ) || defined( __ppc64__ )
611     if( !config_GetInt( p_libvlc, "altivec" ) )
612         libvlc_global.i_cpu &= ~CPU_CAPABILITY_ALTIVEC;
613 #endif
614
615 #define PRINT_CAPABILITY( capability, string )                              \
616     if( libvlc_global.i_cpu & capability )                                         \
617     {                                                                       \
618         strncat( p_capabilities, string " ",                                \
619                  sizeof(p_capabilities) - strlen(p_capabilities) );         \
620         p_capabilities[sizeof(p_capabilities) - 1] = '\0';                  \
621     }
622
623     p_capabilities[0] = '\0';
624     PRINT_CAPABILITY( CPU_CAPABILITY_486, "486" );
625     PRINT_CAPABILITY( CPU_CAPABILITY_586, "586" );
626     PRINT_CAPABILITY( CPU_CAPABILITY_PPRO, "Pentium Pro" );
627     PRINT_CAPABILITY( CPU_CAPABILITY_MMX, "MMX" );
628     PRINT_CAPABILITY( CPU_CAPABILITY_3DNOW, "3DNow!" );
629     PRINT_CAPABILITY( CPU_CAPABILITY_MMXEXT, "MMXEXT" );
630     PRINT_CAPABILITY( CPU_CAPABILITY_SSE, "SSE" );
631     PRINT_CAPABILITY( CPU_CAPABILITY_SSE2, "SSE2" );
632     PRINT_CAPABILITY( CPU_CAPABILITY_ALTIVEC, "AltiVec" );
633     PRINT_CAPABILITY( CPU_CAPABILITY_FPU, "FPU" );
634     msg_Dbg( p_libvlc, "CPU has capabilities %s", p_capabilities );
635
636     /*
637      * Choose the best memcpy module
638      */
639     p_libvlc->p_memcpy_module = module_Need( p_libvlc, "memcpy", "$memcpy", 0 );
640
641     if( p_libvlc->pf_memcpy == NULL )
642     {
643         p_libvlc->pf_memcpy = memcpy;
644     }
645
646     if( p_libvlc->pf_memset == NULL )
647     {
648         p_libvlc->pf_memset = memset;
649     }
650
651     p_libvlc->b_stats = config_GetInt( p_libvlc, "stats" );
652     p_libvlc->i_timers = 0;
653     p_libvlc->pp_timers = NULL;
654     vlc_mutex_init( p_libvlc, &p_libvlc->timer_lock );
655
656     /*
657      * Initialize hotkey handling
658      */
659     var_Create( p_libvlc, "key-pressed", VLC_VAR_INTEGER );
660     p_libvlc->p_hotkeys = malloc( sizeof(p_hotkeys) );
661     /* Do a copy (we don't need to modify the strings) */
662     memcpy( p_libvlc->p_hotkeys, p_hotkeys, sizeof(p_hotkeys) );
663
664     /* Initialize playlist and get commandline files */
665     playlist_ThreadCreate( p_libvlc );
666     if( !p_libvlc->p_playlist )
667     {
668         msg_Err( p_libvlc, "playlist initialization failed" );
669         if( p_libvlc->p_memcpy_module != NULL )
670         {
671             module_Unneed( p_libvlc, p_libvlc->p_memcpy_module );
672         }
673         module_EndBank( p_libvlc );
674         return VLC_EGENERIC;
675     }
676     p_playlist = p_libvlc->p_playlist;
677
678     psz_modules = config_GetPsz( p_playlist, "services-discovery" );
679     if( psz_modules && *psz_modules )
680     {
681         /* Add service discovery modules */
682         playlist_AddSDModules( p_playlist, psz_modules );
683     }
684     if( psz_modules ) free( psz_modules );
685
686     /*
687      * Load background interfaces
688      */
689     psz_modules = config_GetPsz( p_libvlc, "extraintf" );
690     psz_control = config_GetPsz( p_libvlc, "control" );
691
692     if( psz_modules && *psz_modules && psz_control && *psz_control )
693     {
694         psz_modules = (char *)realloc( psz_modules, strlen( psz_modules ) +
695                                                     strlen( psz_control ) + 1 );
696         sprintf( psz_modules, "%s:%s", psz_modules, psz_control );
697     }
698     else if( psz_control && *psz_control )
699     {
700         if( psz_modules ) free( psz_modules );
701         psz_modules = strdup( psz_control );
702     }
703
704     psz_parser = psz_modules;
705     while ( psz_parser && *psz_parser )
706     {
707         char *psz_module, *psz_temp;
708         psz_module = psz_parser;
709         psz_parser = strchr( psz_module, ':' );
710         if ( psz_parser )
711         {
712             *psz_parser = '\0';
713             psz_parser++;
714         }
715         psz_temp = (char *)malloc( strlen(psz_module) + sizeof(",none") );
716         if( psz_temp )
717         {
718             sprintf( psz_temp, "%s,none", psz_module );
719             VLC_AddIntf( 0, psz_temp, VLC_FALSE, VLC_FALSE );
720             free( psz_temp );
721         }
722     }
723     if ( psz_modules )
724     {
725         free( psz_modules );
726     }
727
728     /*
729      * Always load the hotkeys interface if it exists
730      */
731     VLC_AddIntf( 0, "hotkeys,none", VLC_FALSE, VLC_FALSE );
732
733     /*
734      * If needed, load the Xscreensaver interface
735      * Currently, only for X
736      */
737 #ifdef HAVE_X11_XLIB_H
738     if( config_GetInt( p_libvlc, "disable-screensaver" ) == 1 )
739     {
740         VLC_AddIntf( 0, "screensaver,none", VLC_FALSE, VLC_FALSE );
741     }
742 #endif
743
744     if( config_GetInt( p_libvlc, "file-logging" ) == 1 )
745     {
746         VLC_AddIntf( 0, "logger,none", VLC_FALSE, VLC_FALSE );
747     }
748 #ifdef HAVE_SYSLOG_H
749     if( config_GetInt( p_libvlc, "syslog" ) == 1 )
750     {
751         char *psz_logmode = "logmode=syslog";
752         libvlc_InternalAddIntf( 0, "logger,none", VLC_FALSE, VLC_FALSE,
753                                 1, &psz_logmode );
754     }
755 #endif
756
757     if( config_GetInt( p_libvlc, "show-intf" ) == 1 )
758     {
759         VLC_AddIntf( 0, "showintf,none", VLC_FALSE, VLC_FALSE );
760     }
761
762     if( config_GetInt( p_libvlc, "network-synchronisation") == 1 )
763     {
764         VLC_AddIntf( 0, "netsync,none", VLC_FALSE, VLC_FALSE );
765     }
766
767     /*
768      * FIXME: kludge to use a p_libvlc-local variable for the Mozilla plugin
769      */
770     var_Create( p_libvlc, "drawable", VLC_VAR_INTEGER );
771     var_Create( p_libvlc, "drawable-view-top", VLC_VAR_INTEGER );
772     var_Create( p_libvlc, "drawable-view-left", VLC_VAR_INTEGER );
773     var_Create( p_libvlc, "drawable-view-bottom", VLC_VAR_INTEGER );
774     var_Create( p_libvlc, "drawable-view-right", VLC_VAR_INTEGER );
775     var_Create( p_libvlc, "drawable-clip-top", VLC_VAR_INTEGER );
776     var_Create( p_libvlc, "drawable-clip-left", VLC_VAR_INTEGER );
777     var_Create( p_libvlc, "drawable-clip-bottom", VLC_VAR_INTEGER );
778     var_Create( p_libvlc, "drawable-clip-right", VLC_VAR_INTEGER );
779
780     /* Create volume callback system. */
781     var_Create( p_libvlc, "volume-change", VLC_VAR_BOOL );
782
783     /*
784      * Get input filenames given as commandline arguments
785      */
786     GetFilenames( p_libvlc, i_argc, ppsz_argv );
787
788     /*
789      * Get --open argument
790      */
791     var_Create( p_libvlc, "open", VLC_VAR_STRING | VLC_VAR_DOINHERIT );
792     var_Get( p_libvlc, "open", &val );
793     if ( val.psz_string != NULL && *val.psz_string )
794     {
795         VLC_AddTarget( p_libvlc->i_object_id, val.psz_string, NULL, 0,
796                        PLAYLIST_INSERT, 0 );
797     }
798     if ( val.psz_string != NULL ) free( val.psz_string );
799
800     return VLC_SUCCESS;
801 }
802
803 /**
804  * Cleanup a libvlc instance. The instance is not completely deallocated
805  * \param p_libvlc the instance to clean
806  */
807 int libvlc_InternalCleanup( libvlc_int_t *p_libvlc )
808 {
809     intf_thread_t      * p_intf;
810     vout_thread_t      * p_vout;
811     aout_instance_t    * p_aout;
812     announce_handler_t * p_announce;
813
814     /* Ask the interfaces to stop and destroy them */
815     msg_Dbg( p_libvlc, "removing all interfaces" );
816     while( (p_intf = vlc_object_find( p_libvlc, VLC_OBJECT_INTF, FIND_CHILD )) )
817     {
818         intf_StopThread( p_intf );
819         vlc_object_detach( p_intf );
820         vlc_object_release( p_intf );
821         intf_Destroy( p_intf );
822     }
823
824     /* Free playlist */
825     msg_Dbg( p_libvlc, "removing playlist" );
826     playlist_ThreadDestroy( p_libvlc->p_playlist );
827
828     /* Free video outputs */
829     msg_Dbg( p_libvlc, "removing all video outputs" );
830     while( (p_vout = vlc_object_find( p_libvlc, VLC_OBJECT_VOUT, FIND_CHILD )) )
831     {
832         vlc_object_detach( p_vout );
833         vlc_object_release( p_vout );
834         vout_Destroy( p_vout );
835     }
836
837     /* Free audio outputs */
838     msg_Dbg( p_libvlc, "removing all audio outputs" );
839     while( (p_aout = vlc_object_find( p_libvlc, VLC_OBJECT_AOUT, FIND_CHILD )) )
840     {
841         vlc_object_detach( (vlc_object_t *)p_aout );
842         vlc_object_release( (vlc_object_t *)p_aout );
843         aout_Delete( p_aout );
844     }
845
846     stats_TimersDumpAll( p_libvlc );
847     stats_TimersClean( p_libvlc );
848
849     /* Free announce handler(s?) */
850     while( (p_announce = vlc_object_find( p_libvlc, VLC_OBJECT_ANNOUNCE,
851                                                  FIND_CHILD ) ) )
852     {
853         msg_Dbg( p_libvlc, "removing announce handler" );
854         vlc_object_detach( p_announce );
855         vlc_object_release( p_announce );
856         announce_HandlerDestroy( p_announce );
857     }
858     return VLC_SUCCESS;
859 }
860
861 /**
862  * Destroy everything.
863  * This function requests the running threads to finish, waits for their
864  * termination, and destroys their structure.
865  * It stops the thread systems: no instance can run after this has run
866  * \param p_libvlc the instance to destroy
867  * \param b_release whether we should do a release on the instance
868  */
869 int libvlc_InternalDestroy( libvlc_int_t *p_libvlc, vlc_bool_t b_release )
870 {
871     /* Free allocated memory */
872     if( p_libvlc->p_memcpy_module )
873     {
874         module_Unneed( p_libvlc, p_libvlc->p_memcpy_module );
875         p_libvlc->p_memcpy_module = NULL;
876     }
877
878     /* Free module bank !  */
879     module_EndBank( p_libvlc );
880
881     FREENULL( p_libvlc->psz_homedir );
882     FREENULL( p_libvlc->psz_userdir );
883     FREENULL( p_libvlc->psz_configfile );
884     FREENULL( p_libvlc->p_hotkeys );
885
886     /* System specific cleaning code */
887     system_End( p_libvlc );
888
889     /*
890      * Free message queue.
891      * Nobody shall use msg_* afterward.
892      */
893     msg_Flush( p_libvlc );
894     msg_Destroy( p_libvlc_global );
895
896     /* Destroy global iconv */
897     LocaleDeinit();
898
899     /* Destroy mutexes */
900     vlc_mutex_destroy( &p_libvlc->config_lock );
901
902     vlc_object_detach( p_libvlc );
903     if( b_release ) vlc_object_release( p_libvlc );
904     vlc_object_destroy( p_libvlc );
905
906     /* Stop thread system: last one out please shut the door! */
907     vlc_threads_end( p_libvlc_global );
908
909     return VLC_SUCCESS;
910 }
911
912 /**
913  * Add an interface plugin and run it
914  */
915 int libvlc_InternalAddIntf( libvlc_int_t *p_libvlc,
916                             char const *psz_module,
917                             vlc_bool_t b_block, vlc_bool_t b_play,
918                             int i_options, char **ppsz_options )
919 {
920     int i_err;
921     intf_thread_t *p_intf;
922
923 #ifndef WIN32
924     if( p_libvlc->p_libvlc_global->b_daemon && b_block && !psz_module )
925     {
926         /* Daemon mode hack.
927          * We prefer the dummy interface if none is specified. */
928         char *psz_interface = config_GetPsz( p_libvlc, "intf" );
929         if( !psz_interface || !*psz_interface ) psz_module = "dummy";
930         if( psz_interface ) free( psz_interface );
931     }
932 #endif
933
934     /* Try to create the interface */
935     p_intf = intf_Create( p_libvlc, psz_module ? psz_module : "$intf",
936                           i_options, ppsz_options );
937
938     if( p_intf == NULL )
939     {
940         msg_Err( p_libvlc, "interface \"%s\" initialization failed",
941                  psz_module );
942         return VLC_EGENERIC;
943     }
944
945     /* Interface doesn't handle play on start so do it ourselves */
946     if( !p_intf->b_play && b_play )
947         playlist_Play( p_libvlc->p_playlist );
948
949     /* Try to run the interface */
950     p_intf->b_play = b_play;
951     p_intf->b_block = b_block;
952     i_err = intf_RunThread( p_intf );
953     if( i_err )
954     {
955         vlc_object_detach( p_intf );
956         intf_Destroy( p_intf );
957         return i_err;
958     }
959     return VLC_SUCCESS;
960 };
961
962
963 /*****************************************************************************
964  * SetLanguage: set the interface language.
965  *****************************************************************************
966  * We set the LC_MESSAGES locale category for interface messages and buttons,
967  * as well as the LC_CTYPE category for string sorting and possible wide
968  * character support.
969  *****************************************************************************/
970 static void SetLanguage ( char const *psz_lang )
971 {
972 #if defined( ENABLE_NLS ) \
973      && ( defined( HAVE_GETTEXT ) || defined( HAVE_INCLUDED_GETTEXT ) )
974
975     char *          psz_path;
976 #if defined( __APPLE__ ) || defined ( WIN32 ) || defined( SYS_BEOS )
977     char            psz_tmp[1024];
978 #endif
979
980     if( psz_lang && !*psz_lang )
981     {
982 #   if defined( HAVE_LC_MESSAGES )
983         setlocale( LC_MESSAGES, psz_lang );
984 #   endif
985         setlocale( LC_CTYPE, psz_lang );
986     }
987     else if( psz_lang )
988     {
989 #ifdef __APPLE__
990         /* I need that under Darwin, please check it doesn't disturb
991          * other platforms. --Meuuh */
992         setenv( "LANG", psz_lang, 1 );
993
994 #elif defined( SYS_BEOS ) || defined( WIN32 )
995         /* We set LC_ALL manually because it is the only way to set
996          * the language at runtime under eg. Windows. Beware that this
997          * makes the environment unconsistent when libvlc is unloaded and
998          * should probably be moved to a safer place like vlc.c. */
999         static char psz_lcall[20];
1000         snprintf( psz_lcall, 19, "LC_ALL=%s", psz_lang );
1001         psz_lcall[19] = '\0';
1002         putenv( psz_lcall );
1003 #endif
1004
1005         setlocale( LC_ALL, psz_lang );
1006     }
1007
1008     /* Specify where to find the locales for current domain */
1009 #if !defined( __APPLE__ ) && !defined( WIN32 ) && !defined( SYS_BEOS )
1010     psz_path = LOCALEDIR;
1011 #else
1012     snprintf( psz_tmp, sizeof(psz_tmp), "%s/%s", libvlc_global.psz_vlcpath,
1013               "locale" );
1014     psz_path = psz_tmp;
1015 #endif
1016     if( !bindtextdomain( PACKAGE_NAME, psz_path ) )
1017     {
1018         fprintf( stderr, "warning: couldn't bind domain %s in directory %s\n",
1019                  PACKAGE_NAME, psz_path );
1020     }
1021
1022     /* Set the default domain */
1023     bind_textdomain_codeset( PACKAGE_NAME, "UTF-8" );
1024 #endif
1025 }
1026
1027 /*****************************************************************************
1028  * GetFilenames: parse command line options which are not flags
1029  *****************************************************************************
1030  * Parse command line for input files as well as their associated options.
1031  * An option always follows its associated input and begins with a ":".
1032  *****************************************************************************/
1033 static int GetFilenames( libvlc_int_t *p_vlc, int i_argc, char *ppsz_argv[] )
1034 {
1035     int i_opt, i_options;
1036
1037     /* We assume that the remaining parameters are filenames
1038      * and their input options */
1039     for( i_opt = i_argc - 1; i_opt >= optind; i_opt-- )
1040     {
1041         const char *psz_target;
1042         i_options = 0;
1043
1044         /* Count the input options */
1045         while( *ppsz_argv[ i_opt ] == ':' && i_opt > optind )
1046         {
1047             i_options++;
1048             i_opt--;
1049         }
1050
1051         /* TODO: write an internal function of this one, to avoid
1052          *       unnecessary lookups. */
1053         /* FIXME: should we convert options to UTF-8 as well ?? */
1054         psz_target = FromLocale( ppsz_argv[ i_opt ] );
1055         VLC_AddTarget( p_vlc->i_object_id, psz_target,
1056                        (char const **)( i_options ? &ppsz_argv[i_opt + 1] :
1057                                         NULL ), i_options,
1058                        PLAYLIST_INSERT, 0 );
1059         LocaleFree( psz_target );
1060     }
1061
1062     return VLC_SUCCESS;
1063 }
1064
1065 /*****************************************************************************
1066  * Help: print program help
1067  *****************************************************************************
1068  * Print a short inline help. Message interface is initialized at this stage.
1069  *****************************************************************************/
1070 static void Help( libvlc_int_t *p_this, char const *psz_help_name )
1071 {
1072 #ifdef WIN32
1073     ShowConsole( VLC_TRUE );
1074 #endif
1075
1076     if( psz_help_name && !strcmp( psz_help_name, "help" ) )
1077     {
1078         utf8_fprintf( stdout, VLC_USAGE, p_this->psz_object_name );
1079         Usage( p_this, "help" );
1080         Usage( p_this, "main" );
1081     }
1082     else if( psz_help_name && !strcmp( psz_help_name, "longhelp" ) )
1083     {
1084         utf8_fprintf( stdout, VLC_USAGE, p_this->psz_object_name );
1085         Usage( p_this, NULL );
1086     }
1087     else if( psz_help_name )
1088     {
1089         Usage( p_this, psz_help_name );
1090     }
1091
1092 #ifdef WIN32        /* Pause the console because it's destroyed when we exit */
1093     PauseConsole();
1094 #endif
1095 }
1096
1097 /*****************************************************************************
1098  * Usage: print module usage
1099  *****************************************************************************
1100  * Print a short inline help. Message interface is initialized at this stage.
1101  *****************************************************************************/
1102 static void Usage( libvlc_int_t *p_this, char const *psz_module_name )
1103 {
1104 #define FORMAT_STRING "  %s --%s%s%s%s%s%s%s "
1105     /* short option ------'    |     | | | |  | |
1106      * option name ------------'     | | | |  | |
1107      * <bra -------------------------' | | |  | |
1108      * option type or "" --------------' | |  | |
1109      * ket> -----------------------------' |  | |
1110      * padding spaces ---------------------'  | |
1111      * comment -------------------------------' |
1112      * comment suffix --------------------------'
1113      *
1114      * The purpose of having bra and ket is that we might i18n them as well.
1115      */
1116 #define LINE_START 8
1117 #define PADDING_SPACES 25
1118     vlc_list_t *p_list;
1119     module_t *p_parser;
1120     module_config_t *p_item;
1121     char psz_spaces_text[PADDING_SPACES+LINE_START+1];
1122     char psz_spaces_longtext[LINE_START+3];
1123     char psz_format[sizeof(FORMAT_STRING)];
1124     char psz_buffer[10000];
1125     char psz_short[4];
1126     int i_index;
1127     int i_width = ConsoleWidth() - (PADDING_SPACES+LINE_START+1);
1128     vlc_bool_t b_advanced = config_GetInt( p_this, "advanced" );
1129     vlc_bool_t b_description;
1130
1131     memset( psz_spaces_text, ' ', PADDING_SPACES+LINE_START );
1132     psz_spaces_text[PADDING_SPACES+LINE_START] = '\0';
1133     memset( psz_spaces_longtext, ' ', LINE_START+2 );
1134     psz_spaces_longtext[LINE_START+2] = '\0';
1135
1136     strcpy( psz_format, FORMAT_STRING );
1137
1138     /* List all modules */
1139     p_list = vlc_list_find( p_this, VLC_OBJECT_MODULE, FIND_ANYWHERE );
1140
1141     /* Enumerate the config for each module */
1142     for( i_index = 0; i_index < p_list->i_count; i_index++ )
1143     {
1144         vlc_bool_t b_help_module;
1145
1146         p_parser = (module_t *)p_list->p_values[i_index].p_object ;
1147
1148         if( psz_module_name && strcmp( psz_module_name,
1149                                        p_parser->psz_object_name ) )
1150         {
1151             continue;
1152         }
1153
1154         /* Ignore modules without config options */
1155         if( !p_parser->i_config_items )
1156         {
1157             continue;
1158         }
1159
1160         /* Ignore modules with only advanced config options if requested */
1161         if( !b_advanced )
1162         {
1163             for( p_item = p_parser->p_config;
1164                  p_item->i_type != CONFIG_HINT_END;
1165                  p_item++ )
1166             {
1167                 if( (p_item->i_type & CONFIG_ITEM) &&
1168                     !p_item->b_advanced ) break;
1169             }
1170             if( p_item->i_type == CONFIG_HINT_END ) continue;
1171         }
1172
1173         /* Print name of module */
1174         if( strcmp( "main", p_parser->psz_object_name ) )
1175         utf8_fprintf( stdout, "\n %s\n", p_parser->psz_longname );
1176
1177         b_help_module = !strcmp( "help", p_parser->psz_object_name );
1178
1179         /* Print module options */
1180         for( p_item = p_parser->p_config;
1181              p_item->i_type != CONFIG_HINT_END;
1182              p_item++ )
1183         {
1184             char *psz_text, *psz_spaces = psz_spaces_text;
1185             char *psz_bra = NULL, *psz_type = NULL, *psz_ket = NULL;
1186             char *psz_suf = "", *psz_prefix = NULL;
1187             signed int i;
1188
1189             /* Skip deprecated options */
1190             if( p_item->psz_current )
1191             {
1192                 continue;
1193             }
1194             /* Skip advanced options if requested */
1195             if( p_item->b_advanced && !b_advanced )
1196             {
1197                 continue;
1198             }
1199
1200             switch( p_item->i_type )
1201             {
1202             case CONFIG_HINT_CATEGORY:
1203             case CONFIG_HINT_USAGE:
1204                 if( !strcmp( "main", p_parser->psz_object_name ) )
1205                 utf8_fprintf( stdout, "\n %s\n", p_item->psz_text );
1206                 break;
1207
1208             case CONFIG_ITEM_STRING:
1209             case CONFIG_ITEM_FILE:
1210             case CONFIG_ITEM_DIRECTORY:
1211             case CONFIG_ITEM_MODULE: /* We could also have "=<" here */
1212             case CONFIG_ITEM_MODULE_CAT:
1213             case CONFIG_ITEM_MODULE_LIST:
1214             case CONFIG_ITEM_MODULE_LIST_CAT:
1215                 psz_bra = " <"; psz_type = _("string"); psz_ket = ">";
1216
1217                 if( p_item->ppsz_list )
1218                 {
1219                     psz_bra = " {";
1220                     psz_type = psz_buffer;
1221                     psz_type[0] = '\0';
1222                     for( i = 0; p_item->ppsz_list[i]; i++ )
1223                     {
1224                         if( i ) strcat( psz_type, "," );
1225                         strcat( psz_type, p_item->ppsz_list[i] );
1226                     }
1227                     psz_ket = "}";
1228                 }
1229                 break;
1230             case CONFIG_ITEM_INTEGER:
1231             case CONFIG_ITEM_KEY: /* FIXME: do something a bit more clever */
1232                 psz_bra = " <"; psz_type = _("integer"); psz_ket = ">";
1233
1234                 if( p_item->i_list )
1235                 {
1236                     psz_bra = " {";
1237                     psz_type = psz_buffer;
1238                     psz_type[0] = '\0';
1239                     for( i = 0; p_item->ppsz_list_text[i]; i++ )
1240                     {
1241                         if( i ) strcat( psz_type, ", " );
1242                         sprintf( psz_type + strlen(psz_type), "%i (%s)",
1243                                  p_item->pi_list[i],
1244                                  p_item->ppsz_list_text[i] );
1245                     }
1246                     psz_ket = "}";
1247                 }
1248                 break;
1249             case CONFIG_ITEM_FLOAT:
1250                 psz_bra = " <"; psz_type = _("float"); psz_ket = ">";
1251                 break;
1252             case CONFIG_ITEM_BOOL:
1253                 psz_bra = ""; psz_type = ""; psz_ket = "";
1254                 if( !b_help_module )
1255                 {
1256                     psz_suf = p_item->i_value ? _(" (default enabled)") :
1257                                                 _(" (default disabled)");
1258                 }
1259                 break;
1260             }
1261
1262             if( !psz_type )
1263             {
1264                 continue;
1265             }
1266
1267             /* Add short option if any */
1268             if( p_item->i_short )
1269             {
1270                 sprintf( psz_short, "-%c,", p_item->i_short );
1271             }
1272             else
1273             {
1274                 strcpy( psz_short, "   " );
1275             }
1276
1277             i = PADDING_SPACES - strlen( p_item->psz_name )
1278                  - strlen( psz_bra ) - strlen( psz_type )
1279                  - strlen( psz_ket ) - 1;
1280
1281             if( p_item->i_type == CONFIG_ITEM_BOOL && !b_help_module )
1282             {
1283                 psz_prefix =  ", --no-";
1284                 i -= strlen( p_item->psz_name ) + strlen( psz_prefix );
1285             }
1286
1287             if( i < 0 )
1288             {
1289                 psz_spaces[0] = '\n';
1290                 i = 0;
1291             }
1292             else
1293             {
1294                 psz_spaces[i] = '\0';
1295             }
1296
1297             if( p_item->i_type == CONFIG_ITEM_BOOL && !b_help_module )
1298             {
1299                 utf8_fprintf( stdout, psz_format, psz_short, p_item->psz_name,
1300                          psz_prefix, p_item->psz_name, psz_bra, psz_type,
1301                          psz_ket, psz_spaces );
1302             }
1303             else
1304             {
1305                 utf8_fprintf( stdout, psz_format, psz_short, p_item->psz_name,
1306                          "", "", psz_bra, psz_type, psz_ket, psz_spaces );
1307             }
1308
1309             psz_spaces[i] = ' ';
1310
1311             /* We wrap the rest of the output */
1312             sprintf( psz_buffer, "%s%s", p_item->psz_text, psz_suf );
1313             b_description = config_GetInt( p_this, "help-verbose" );
1314
1315  description:
1316             psz_text = psz_buffer;
1317             while( *psz_text )
1318             {
1319                 char *psz_parser, *psz_word;
1320                 size_t i_end = strlen( psz_text );
1321
1322                 /* If the remaining text fits in a line, print it. */
1323                 if( i_end <= (size_t)i_width )
1324                 {
1325                     utf8_fprintf( stdout, "%s\n", psz_text );
1326                     break;
1327                 }
1328
1329                 /* Otherwise, eat as many words as possible */
1330                 psz_parser = psz_text;
1331                 do
1332                 {
1333                     psz_word = psz_parser;
1334                     psz_parser = strchr( psz_word, ' ' );
1335                     /* If no space was found, we reached the end of the text
1336                      * block; otherwise, we skip the space we just found. */
1337                     psz_parser = psz_parser ? psz_parser + 1
1338                                             : psz_text + i_end;
1339
1340                 } while( psz_parser - psz_text <= i_width );
1341
1342                 /* We cut a word in one of these cases:
1343                  *  - it's the only word in the line and it's too long.
1344                  *  - we used less than 80% of the width and the word we are
1345                  *    going to wrap is longer than 40% of the width, and even
1346                  *    if the word would have fit in the next line. */
1347                 if( psz_word == psz_text
1348                      || ( psz_word - psz_text < 80 * i_width / 100
1349                            && psz_parser - psz_word > 40 * i_width / 100 ) )
1350                 {
1351                     char c = psz_text[i_width];
1352                     psz_text[i_width] = '\0';
1353                     utf8_fprintf( stdout, "%s\n%s", psz_text, psz_spaces );
1354                     psz_text += i_width;
1355                     psz_text[0] = c;
1356                 }
1357                 else
1358                 {
1359                     psz_word[-1] = '\0';
1360                     utf8_fprintf( stdout, "%s\n%s", psz_text, psz_spaces );
1361                     psz_text = psz_word;
1362                 }
1363             }
1364
1365             if( b_description && p_item->psz_longtext )
1366             {
1367                 sprintf( psz_buffer, "%s%s", p_item->psz_longtext, psz_suf );
1368                 b_description = VLC_FALSE;
1369                 psz_spaces = psz_spaces_longtext;
1370                 utf8_fprintf( stdout, "%s", psz_spaces );
1371                 goto description;
1372             }
1373         }
1374     }
1375
1376     /* Release the module list */
1377     vlc_list_release( p_list );
1378 }
1379
1380 /*****************************************************************************
1381  * ListModules: list the available modules with their description
1382  *****************************************************************************
1383  * Print a list of all available modules (builtins and plugins) and a short
1384  * description for each one.
1385  *****************************************************************************/
1386 static void ListModules( libvlc_int_t *p_this )
1387 {
1388     vlc_list_t *p_list;
1389     module_t *p_parser;
1390     char psz_spaces[22];
1391     int i_index;
1392
1393     memset( psz_spaces, ' ', 22 );
1394
1395 #ifdef WIN32
1396     ShowConsole( VLC_TRUE );
1397 #endif
1398
1399     /* List all modules */
1400     p_list = vlc_list_find( p_this, VLC_OBJECT_MODULE, FIND_ANYWHERE );
1401
1402     /* Enumerate each module */
1403     for( i_index = 0; i_index < p_list->i_count; i_index++ )
1404     {
1405         int i;
1406
1407         p_parser = (module_t *)p_list->p_values[i_index].p_object ;
1408
1409         /* Nasty hack, but right now I'm too tired to think about a nice
1410          * solution */
1411         i = 22 - strlen( p_parser->psz_object_name ) - 1;
1412         if( i < 0 ) i = 0;
1413         psz_spaces[i] = 0;
1414
1415         utf8_fprintf( stdout, "  %s%s %s\n", p_parser->psz_object_name,
1416                          psz_spaces, p_parser->psz_longname );
1417
1418         psz_spaces[i] = ' ';
1419     }
1420
1421     vlc_list_release( p_list );
1422
1423 #ifdef WIN32        /* Pause the console because it's destroyed when we exit */
1424     PauseConsole();
1425 #endif
1426 }
1427
1428 /*****************************************************************************
1429  * Version: print complete program version
1430  *****************************************************************************
1431  * Print complete program version and build number.
1432  *****************************************************************************/
1433 static void Version( void )
1434 {
1435 #ifdef WIN32
1436     ShowConsole( VLC_TRUE );
1437 #endif
1438
1439     utf8_fprintf( stdout, _("VLC version %s\n"), VLC_Version() );
1440     utf8_fprintf( stdout, _("Compiled by %s@%s.%s\n"),
1441              VLC_CompileBy(), VLC_CompileHost(), VLC_CompileDomain() );
1442     utf8_fprintf( stdout, _("Compiler: %s\n"), VLC_Compiler() );
1443 #ifndef HAVE_SHARED_LIBVLC
1444     if( strcmp( VLC_Changeset(), "exported" ) )
1445         utf8_fprintf( stdout, _("Based upon svn changeset [%s]\n"),
1446                  VLC_Changeset() );
1447 #endif
1448     utf8_fprintf( stdout, LICENSE_MSG );
1449
1450 #ifdef WIN32        /* Pause the console because it's destroyed when we exit */
1451     PauseConsole();
1452 #endif
1453 }
1454
1455 /*****************************************************************************
1456  * ShowConsole: On Win32, create an output console for debug messages
1457  *****************************************************************************
1458  * This function is useful only on Win32.
1459  *****************************************************************************/
1460 #ifdef WIN32 /*  */
1461 static void ShowConsole( vlc_bool_t b_dofile )
1462 {
1463 #   ifndef UNDER_CE
1464     FILE *f_help;
1465
1466     if( getenv( "PWD" ) && getenv( "PS1" ) ) return; /* cygwin shell */
1467
1468     AllocConsole();
1469
1470     freopen( "CONOUT$", "w", stderr );
1471     freopen( "CONIN$", "r", stdin );
1472
1473     if( b_dofile && (f_help = fopen( "vlc-help.txt", "wt" )) )
1474     {
1475         fclose( f_help );
1476         freopen( "vlc-help.txt", "wt", stdout );
1477         utf8_fprintf( stderr, _("\nDumped content to vlc-help.txt file.\n") );
1478     }
1479
1480     else freopen( "CONOUT$", "w", stdout );
1481
1482 #   endif
1483 }
1484 #endif
1485
1486 /*****************************************************************************
1487  * PauseConsole: On Win32, wait for a key press before closing the console
1488  *****************************************************************************
1489  * This function is useful only on Win32.
1490  *****************************************************************************/
1491 #ifdef WIN32 /*  */
1492 static void PauseConsole( void )
1493 {
1494 #   ifndef UNDER_CE
1495
1496     if( getenv( "PWD" ) && getenv( "PS1" ) ) return; /* cygwin shell */
1497
1498     utf8_fprintf( stderr, _("\nPress the RETURN key to continue...\n") );
1499     getchar();
1500     fclose( stdout );
1501
1502 #   endif
1503 }
1504 #endif
1505
1506 /*****************************************************************************
1507  * ConsoleWidth: Return the console width in characters
1508  *****************************************************************************
1509  * We use the stty shell command to get the console width; if this fails or
1510  * if the width is less than 80, we default to 80.
1511  *****************************************************************************/
1512 static int ConsoleWidth( void )
1513 {
1514     int i_width = 80;
1515
1516 #ifndef WIN32
1517     char buf[20], *psz_parser;
1518     FILE *file;
1519     int i_ret;
1520
1521     file = popen( "stty size 2>/dev/null", "r" );
1522     if( file )
1523     {
1524         i_ret = fread( buf, 1, 20, file );
1525         if( i_ret > 0 )
1526         {
1527             buf[19] = '\0';
1528             psz_parser = strchr( buf, ' ' );
1529             if( psz_parser )
1530             {
1531                 i_ret = atoi( psz_parser + 1 );
1532                 if( i_ret >= 80 )
1533                 {
1534                     i_width = i_ret;
1535                 }
1536             }
1537         }
1538
1539         pclose( file );
1540     }
1541 #endif
1542
1543     return i_width;
1544 }
1545
1546 static int VerboseCallback( vlc_object_t *p_this, const char *psz_variable,
1547                      vlc_value_t old_val, vlc_value_t new_val, void *param)
1548 {
1549     libvlc_int_t *p_vlc = (libvlc_int_t *)p_this;
1550
1551     if( new_val.i_int >= -1 )
1552     {
1553         p_vlc->p_libvlc_global->i_verbose = __MIN( new_val.i_int, 2 );
1554     }
1555     return VLC_SUCCESS;
1556 }
1557
1558 /*****************************************************************************
1559  * InitDeviceValues: initialize device values
1560  *****************************************************************************
1561  * This function inits the dvd, vcd and cd-audio values
1562  *****************************************************************************/
1563 static void InitDeviceValues( libvlc_int_t *p_vlc )
1564 {
1565 #ifdef HAVE_HAL
1566     LibHalContext * ctx;
1567     int i, i_devices;
1568     char **devices;
1569     char *block_dev;
1570     dbus_bool_t b_dvd;
1571     DBusConnection *p_connection;
1572     DBusError       error;
1573
1574 #ifdef HAVE_HAL_1
1575     ctx =  libhal_ctx_new();
1576     if( !ctx ) return;
1577     dbus_error_init( &error );
1578     p_connection = dbus_bus_get ( DBUS_BUS_SYSTEM, &error );
1579     if( dbus_error_is_set( &error ) )
1580     {
1581         dbus_error_free( &error );
1582         return;
1583     }
1584     libhal_ctx_set_dbus_connection( ctx, p_connection );
1585     if( libhal_ctx_init( ctx, &error ) )
1586 #else
1587     if( ( ctx = hal_initialize( NULL, FALSE ) ) )
1588 #endif
1589     {
1590 #ifdef HAVE_HAL_1
1591         if( ( devices = libhal_get_all_devices( ctx, &i_devices, NULL ) ) )
1592 #else
1593         if( ( devices = hal_get_all_devices( ctx, &i_devices ) ) )
1594 #endif
1595         {
1596             for( i = 0; i < i_devices; i++ )
1597             {
1598 #ifdef HAVE_HAL_1
1599                 if( !libhal_device_property_exists( ctx, devices[i],
1600                                                 "storage.cdrom.dvd", NULL ) )
1601 #else
1602                 if( !hal_device_property_exists( ctx, devices[ i ],
1603                                                 "storage.cdrom.dvd" ) )
1604 #endif
1605                 {
1606                     continue;
1607                 }
1608 #ifdef HAVE_HAL_1
1609                 b_dvd = libhal_device_get_property_bool( ctx, devices[ i ],
1610                                                  "storage.cdrom.dvd", NULL  );
1611                 block_dev = libhal_device_get_property_string( ctx,
1612                                 devices[ i ], "block.device" , NULL );
1613 #else
1614                 b_dvd = hal_device_get_property_bool( ctx, devices[ i ],
1615                                                       "storage.cdrom.dvd" );
1616                 block_dev = hal_device_get_property_string( ctx, devices[ i ],
1617                                                             "block.device" );
1618 #endif
1619                 if( b_dvd )
1620                 {
1621                     config_PutPsz( p_vlc, "dvd", block_dev );
1622                 }
1623
1624                 config_PutPsz( p_vlc, "vcd", block_dev );
1625                 config_PutPsz( p_vlc, "cd-audio", block_dev );
1626 #ifdef HAVE_HAL_1
1627                 libhal_free_string( block_dev );
1628 #else
1629                 hal_free_string( block_dev );
1630 #endif
1631             }
1632 #ifdef HAVE_HAL_1
1633             libhal_free_string_array( devices );
1634 #else
1635             hal_free_string_array( devices );
1636 #endif
1637         }
1638
1639 #ifdef HAVE_HAL_1
1640         libhal_ctx_shutdown( ctx, NULL );
1641 #else
1642         hal_shutdown( ctx );
1643 #endif
1644     }
1645     else
1646     {
1647         msg_Warn( p_vlc, "Unable to get HAL device properties" );
1648     }
1649 #endif
1650 }