git.sesse.net Git - vlc/blob - src/libvlc-common.c

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