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