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