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

   1 /*****************************************************************************
   2  * libvlc.c: main libvlc source
   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 /*****************************************************************************
  29  * Pretend we are a builtin module
  30  *****************************************************************************/
  31 #define MODULE_NAME main
  32 #define MODULE_PATH main
  33 #define __BUILTIN__
  34
  35 /*****************************************************************************
  36  * Preamble
  37  *****************************************************************************/
  38 #include <vlc/vlc.h>
  39 #include <vlc/input.h>
  40
  41 #include <errno.h>                                                 /* ENOMEM */
  42 #include <stdio.h>                                              /* sprintf() */
  43 #include <string.h>                                            /* strerror() */
  44 #include <stdlib.h>                                                /* free() */
  45
  46 #ifndef WIN32
  47 #   include <netinet/in.h>                            /* BSD: struct in_addr */
  48 #endif
  49
  50 #ifdef HAVE_UNISTD_H
  51 #   include <unistd.h>
  52 #elif defined( WIN32 ) && !defined( UNDER_CE )
  53 #   include <io.h>
  54 #endif
  55
  56 #ifdef WIN32                       /* optind, getopt(), included in unistd.h */
  57 #   include "extras/getopt.h"
  58 #endif
  59
  60 #ifdef HAVE_LOCALE_H
  61 #   include <locale.h>
  62 #endif
  63
  64 #ifdef HAVE_HAL
  65 #   include <hal/libhal.h>
  66 #endif
  67
  68 #include "vlc_cpu.h"                                        /* CPU detection */
  69 #include "os_specific.h"
  70
  71 #include "vlc_error.h"
  72
  73 #include "vlc_playlist.h"
  74 #include "vlc_interface.h"
  75
  76 #include "audio_output.h"
  77
  78 #include "vlc_video.h"
  79 #include "video_output.h"
  80
  81 #include "stream_output.h"
  82 #include "charset.h"
  83
  84 #include "libvlc.h"
  85
  86 /*****************************************************************************
  87  * The evil global variable. We handle it with care, don't worry.
  88  *****************************************************************************/
  89 static libvlc_global_data_t   libvlc_global;
  90 static libvlc_global_data_t * p_libvlc_global;
  91 static libvlc_int_t *    p_static_vlc;
  92
  93 /*****************************************************************************
  94  * Local prototypes
  95  *****************************************************************************/
  96 static int AddIntfInternal( int i_object, char const *psz_module,
  97                              vlc_bool_t b_block, vlc_bool_t b_play,
  98                              int i_options, char **ppsz_options );
  99
 100 void LocaleInit( vlc_object_t * );
 101 void LocaleDeinit( void );
 102 static void SetLanguage   ( char const * );
 103 static int  GetFilenames  ( libvlc_int_t *, int, char *[] );
 104 static void Help          ( libvlc_int_t *, char const *psz_help_name );
 105 static void Usage         ( libvlc_int_t *, char const *psz_module_name );
 106 static void ListModules   ( libvlc_int_t * );
 107 static void Version       ( void );
 108
 109 #ifdef WIN32
 110 static void ShowConsole   ( vlc_bool_t );
 111 static void PauseConsole  ( void );
 112 #endif
 113 static int  ConsoleWidth  ( void );
 114
 115 static int  VerboseCallback( vlc_object_t *, char const *,
 116                              vlc_value_t, vlc_value_t, void * );
 117
 118 static void InitDeviceValues( libvlc_int_t * );
 119
 120 /*****************************************************************************
 121  * vlc_current_object: return the current object.
 122  *****************************************************************************
 123  * If i_object is non-zero, return the corresponding object. Otherwise,
 124  * return the statically allocated p_vlc object.
 125  *****************************************************************************/
 126 libvlc_int_t * vlc_current_object( int i_object )
 127 {
 128     if( i_object )
 129     {
 130          return vlc_object_get( p_libvlc_global, i_object );
 131     }
 132
 133     return p_static_vlc;
 134 }
 135
 136 /*****************************************************************************
 137  * VLC_Version: return the libvlc version.
 138  *****************************************************************************
 139  * This function returns full version string (numeric version and codename).
 140  *****************************************************************************/
 141 char const * VLC_Version( void )
 142 {
 143     return VERSION_MESSAGE;
 144 }
 145
 146 /*****************************************************************************
 147  * VLC_CompileBy, VLC_CompileHost, VLC_CompileDomain,
 148  * VLC_Compiler, VLC_Changeset
 149  *****************************************************************************/
 150 #define DECLARE_VLC_VERSION( func, var )                                    \
 151 char const * VLC_##func ( void )                                            \
 152 {                                                                           \
 153     return VLC_##var ;                                                      \
 154 }
 155
 156 DECLARE_VLC_VERSION( CompileBy, COMPILE_BY );
 157 DECLARE_VLC_VERSION( CompileHost, COMPILE_HOST );
 158 DECLARE_VLC_VERSION( CompileDomain, COMPILE_DOMAIN );
 159 DECLARE_VLC_VERSION( Compiler, COMPILER );
 160
 161 #ifndef HAVE_SHARED_LIBVLC
 162 extern const char psz_vlc_changeset[];
 163 char const * VLC_Changeset( void )
 164 {
 165     return psz_vlc_changeset;
 166 }
 167 #endif
 168
 169 /*****************************************************************************
 170  * VLC_Error: strerror() equivalent
 171  *****************************************************************************
 172  * This function returns full version string (numeric version and codename).
 173  *****************************************************************************/
 174 char const * VLC_Error( int i_err )
 175 {
 176     return vlc_error( i_err );
 177 }
 178
 179 /*****************************************************************************
 180  * VLC_Create: allocate a vlc_t structure, and initialize libvlc if needed.
 181  *****************************************************************************
 182  * This function allocates a vlc_t structure and returns a negative value
 183  * in case of failure. Also, the thread system is initialized.
 184  *****************************************************************************/
 185 int VLC_Create( void )
 186 {
 187     int i_ret;
 188     libvlc_int_t * p_libvlc = NULL;
 189     vlc_value_t lockval;
 190
 191     /* &libvlc never changes, so we can safely call this multiple times. */
 192     p_libvlc_global = &libvlc_global;
 193
 194     /* vlc_threads_init *must* be the first internal call! No other call is
 195      * allowed before the thread system has been initialized. */
 196     i_ret = vlc_threads_init( p_libvlc_global );
 197     if( i_ret < 0 )
 198     {
 199         return i_ret;
 200     }
 201
 202     /* Now that the thread system is initialized, we don't have much, but
 203      * at least we have var_Create */
 204     var_Create( p_libvlc_global, "libvlc", VLC_VAR_MUTEX );
 205     var_Get( p_libvlc_global, "libvlc", &lockval );
 206     vlc_mutex_lock( lockval.p_address );
 207     if( !libvlc_global.b_ready )
 208     {
 209         char *psz_env;
 210
 211         /* Guess what CPU we have */
 212         libvlc_global.i_cpu = CPUCapabilities();
 213
 214         /* Find verbosity from VLC_VERBOSE environment variable */
 215         psz_env = getenv( "VLC_VERBOSE" );
 216         libvlc_global.i_verbose = psz_env ? atoi( psz_env ) : -1;
 217
 218 #if defined( HAVE_ISATTY ) && !defined( WIN32 )
 219         libvlc_global.b_color = isatty( 2 ); /* 2 is for stderr */
 220 #else
 221         libvlc_global.b_color = VLC_FALSE;
 222 #endif
 223
 224         /* Initialize message queue */
 225         msg_Create( p_libvlc_global );
 226
 227         /* Announce who we are */
 228         msg_Dbg( p_libvlc_global, COPYRIGHT_MESSAGE );
 229         msg_Dbg( p_libvlc_global, "libvlc was configured with %s",
 230                                 CONFIGURE_LINE );
 231
 232         /* The module bank will be initialized later */
 233         libvlc_global.p_module_bank = NULL;
 234
 235         libvlc_global.b_ready = VLC_TRUE;
 236     }
 237     vlc_mutex_unlock( lockval.p_address );
 238     var_Destroy( p_libvlc_global, "libvlc" );
 239
 240     /* Allocate a vlc object */
 241     p_libvlc = vlc_object_create( p_libvlc_global, VLC_OBJECT_LIBVLC );
 242     if( p_libvlc == NULL )
 243     {
 244         return VLC_EGENERIC;
 245     }
 246     p_libvlc->thread_id = 0;
 247     p_libvlc->p_playlist = NULL;
 248     p_libvlc->psz_object_name = "libvlc";
 249
 250     /* Initialize mutexes */
 251     vlc_mutex_init( p_libvlc, &p_libvlc->config_lock );
 252 #ifdef __APPLE__
 253     vlc_mutex_init( p_libvlc, &p_libvlc->quicktime_lock );
 254     vlc_thread_set_priority( p_libvlc, VLC_THREAD_PRIORITY_LOW );
 255 #endif
 256
 257     /* Store our newly allocated structure in the global list */
 258     vlc_object_attach( p_libvlc, p_libvlc_global );
 259
 260     /* Store data for the non-reentrant API */
 261     p_static_vlc = p_libvlc;
 262
 263     return p_libvlc->i_object_id;
 264 }
 265
 266 #define LIBVLC_FUNC \
 267     libvlc_int_t * p_libvlc = vlc_current_object( i_object ); \
 268     if( !p_libvlc ) return VLC_ENOOBJ;
 269 #define LIBVLC_FUNC_END \
 270     if( i_object ) vlc_object_release( p_libvlc );
 271
 272
 273 /*****************************************************************************
 274  * VLC_Init: initialize a vlc_t structure.
 275  *****************************************************************************
 276  * This function initializes a previously allocated vlc_t structure:
 277  *  - CPU detection
 278  *  - gettext initialization
 279  *  - message queue, module bank and playlist initialization
 280  *  - configuration and commandline parsing
 281  *****************************************************************************/
 282 int VLC_Init( int i_object, int i_argc, char *ppsz_argv[] )
 283 {
 284     char         p_capabilities[200];
 285     char *       p_tmp;
 286     char *       psz_modules;
 287     char *       psz_parser;
 288     char *       psz_control;
 289     vlc_bool_t   b_exit = VLC_FALSE;
 290     int          i_ret = VLC_EEXIT;
 291     module_t    *p_help_module;
 292     playlist_t  *p_playlist;
 293     vlc_value_t  val;
 294 #if defined( ENABLE_NLS ) \
 295      && ( defined( HAVE_GETTEXT ) || defined( HAVE_INCLUDED_GETTEXT ) )
 296 # if defined (WIN32) || defined (__APPLE__)
 297     char *       psz_language;
 298 #endif
 299 #endif
 300     LIBVLC_FUNC;
 301
 302     /* System specific initialization code */
 303     system_Init( p_libvlc, &i_argc, ppsz_argv );
 304
 305     /* Get the executable name (similar to the basename command) */
 306     if( i_argc > 0 )
 307     {
 308         p_libvlc->psz_object_name = p_tmp = ppsz_argv[ 0 ];
 309         while( *p_tmp )
 310         {
 311             if( *p_tmp == '/' ) p_libvlc->psz_object_name = ++p_tmp;
 312             else ++p_tmp;
 313         }
 314     }
 315     else
 316     {
 317         p_libvlc->psz_object_name = "vlc";
 318     }
 319
 320     /*
 321      * Support for gettext
 322      */
 323     SetLanguage( "" );
 324
 325     /*
 326      * Global iconv, must be done after setlocale()
 327      * so that vlc_current_charset() works.
 328      */
 329     LocaleInit( (vlc_object_t *)p_libvlc );
 330
 331     /* Translate "C" to the language code: "fr", "en_GB", "nl", "ru"... */
 332     msg_Dbg( p_libvlc, "translation test: code is \"%s\"", _("C") );
 333
 334     /* Initialize the module bank and load the configuration of the
 335      * main module. We need to do this at this stage to be able to display
 336      * a short help if required by the user. (short help == main module
 337      * options) */
 338     module_InitBank( p_libvlc );
 339
 340     /* Hack: insert the help module here */
 341     p_help_module = vlc_object_create( p_libvlc, VLC_OBJECT_MODULE );
 342     if( p_help_module == NULL )
 343     {
 344         module_EndBank( p_libvlc );
 345         if( i_object ) vlc_object_release( p_libvlc );
 346         return VLC_EGENERIC;
 347     }
 348     p_help_module->psz_object_name = "help";
 349     p_help_module->psz_longname = N_("Help options");
 350     config_Duplicate( p_help_module, p_help_config );
 351     vlc_object_attach( p_help_module, libvlc_global.p_module_bank );
 352     /* End hack */
 353
 354     if( config_LoadCmdLine( p_libvlc, &i_argc, ppsz_argv, VLC_TRUE ) )
 355     {
 356         vlc_object_detach( p_help_module );
 357         config_Free( p_help_module );
 358         vlc_object_destroy( p_help_module );
 359         module_EndBank( p_libvlc );
 360         if( i_object ) vlc_object_release( p_libvlc );
 361         return VLC_EGENERIC;
 362     }
 363
 364     /* Check for short help option */
 365     if( config_GetInt( p_libvlc, "help" ) )
 366     {
 367         Help( p_libvlc, "help" );
 368         b_exit = VLC_TRUE;
 369         i_ret = VLC_EEXITSUCCESS;
 370     }
 371     /* Check for version option */
 372     else if( config_GetInt( p_libvlc, "version" ) )
 373     {
 374         Version();
 375         b_exit = VLC_TRUE;
 376         i_ret = VLC_EEXITSUCCESS;
 377     }
 378
 379     /* Set the config file stuff */
 380     p_libvlc->psz_homedir = config_GetHomeDir();
 381     p_libvlc->psz_userdir = config_GetUserDir();
 382     if( p_libvlc->psz_userdir == NULL )
 383         p_libvlc->psz_userdir = strdup(p_libvlc->psz_homedir);
 384     p_libvlc->psz_configfile = config_GetPsz( p_libvlc, "config" );
 385     if( p_libvlc->psz_configfile != NULL && p_libvlc->psz_configfile[0] == '~'
 386          && p_libvlc->psz_configfile[1] == '/' )
 387     {
 388         char *psz = malloc( strlen(p_libvlc->psz_userdir)
 389                              + strlen(p_libvlc->psz_configfile) );
 390         /* This is incomplete : we should also support the ~cmassiot/ syntax. */
 391         sprintf( psz, "%s/%s", p_libvlc->psz_userdir,
 392                                p_libvlc->psz_configfile + 2 );
 393         free( p_libvlc->psz_configfile );
 394         p_libvlc->psz_configfile = psz;
 395     }
 396
 397     /* Check for plugins cache options */
 398     if( config_GetInt( p_libvlc, "reset-plugins-cache" ) )
 399     {
 400         libvlc_global.p_module_bank->b_cache_delete = VLC_TRUE;
 401     }
 402
 403     /* Hack: remove the help module here */
 404     vlc_object_detach( p_help_module );
 405     /* End hack */
 406
 407     /* Will be re-done properly later on */
 408     p_libvlc->p_libvlc_global->i_verbose = config_GetInt( p_libvlc, "verbose" );
 409
 410     /* Check for daemon mode */
 411 #ifndef WIN32
 412     if( config_GetInt( p_libvlc, "daemon" ) )
 413     {
 414 #if HAVE_DAEMON
 415         if( daemon( 1, 0) != 0 )
 416         {
 417             msg_Err( p_libvlc, "Unable to fork vlc to daemon mode" );
 418             b_exit = VLC_TRUE;
 419         }
 420
 421         p_libvlc->p_libvlc_global->b_daemon = VLC_TRUE;
 422
 423         /* lets check if we need to write the pidfile */
 424         char * psz_pidfile = config_GetPsz( p_libvlc, "pidfile" );
 425
 426         msg_Dbg( p_libvlc, "psz_pidfile is %s", psz_pidfile );
 427
 428         if( psz_pidfile != NULL )
 429         {
 430             FILE *pidfile;
 431             pid_t i_pid = getpid ();
 432
 433             msg_Dbg( p_libvlc, "our PID is %d, writing it to %s", i_pid, psz_pidfile );
 434
 435             pidfile = utf8_fopen( psz_pidfile,"w" );
 436             if( pidfile != NULL )
 437             {
 438                 utf8_fprintf( pidfile, "%d", (int)i_pid );
 439                 fclose( pidfile );
 440             }
 441             else
 442             {
 443                 msg_Err( p_libvlc, "Cannot open pid file for writing: %s, error: %s",
 444                         psz_pidfile, strerror(errno) );
 445             }
 446         }
 447
 448         free( psz_pidfile );
 449
 450 #else
 451         pid_t i_pid;
 452
 453         if( ( i_pid = fork() ) < 0 )
 454         {
 455             msg_Err( p_libvlc, "Unable to fork vlc to daemon mode" );
 456             b_exit = VLC_TRUE;
 457         }
 458         else if( i_pid )
 459         {
 460             /* This is the parent, exit right now */
 461             msg_Dbg( p_libvlc, "closing parent process" );
 462             b_exit = VLC_TRUE;
 463             i_ret = VLC_EEXITSUCCESS;
 464         }
 465         else
 466         {
 467             /* We are the child */
 468             msg_Dbg( p_libvlc, "daemon spawned" );
 469             close( STDIN_FILENO );
 470             close( STDOUT_FILENO );
 471             close( STDERR_FILENO );
 472
 473             p_libvlc->p_libvlc_global->b_daemon = VLC_TRUE;
 474         }
 475 #endif
 476     }
 477 #endif
 478
 479     if( b_exit )
 480     {
 481         config_Free( p_help_module );
 482         vlc_object_destroy( p_help_module );
 483         module_EndBank( p_libvlc );
 484         if( i_object ) vlc_object_release( p_libvlc );
 485         return i_ret;
 486     }
 487
 488     /* Check for translation config option */
 489 #if defined( ENABLE_NLS ) \
 490      && ( defined( HAVE_GETTEXT ) || defined( HAVE_INCLUDED_GETTEXT ) )
 491 # if defined (WIN32) || defined (__APPLE__)
 492     /* This ain't really nice to have to reload the config here but it seems
 493      * the only way to do it. */
 494     config_LoadConfigFile( p_libvlc, "main" );
 495     config_LoadCmdLine( p_libvlc, &i_argc, ppsz_argv, VLC_TRUE );
 496
 497     /* Check if the user specified a custom language */
 498     psz_language = config_GetPsz( p_libvlc, "language" );
 499     if( psz_language && *psz_language && strcmp( psz_language, "auto" ) )
 500     {
 501         vlc_bool_t b_cache_delete = libvlc_global.p_module_bank->b_cache_delete;
 502
 503         /* Reset the default domain */
 504         SetLanguage( psz_language );
 505
 506         /* Translate "C" to the language code: "fr", "en_GB", "nl", "ru"... */
 507         msg_Dbg( p_libvlc, "translation test: code is \"%s\"", _("C") );
 508
 509         module_EndBank( p_libvlc );
 510         module_InitBank( p_libvlc );
 511         config_LoadConfigFile( p_libvlc, "main" );
 512         config_LoadCmdLine( p_libvlc, &i_argc, ppsz_argv, VLC_TRUE );
 513         libvlc_global.p_module_bank->b_cache_delete = b_cache_delete;
 514     }
 515     if( psz_language ) free( psz_language );
 516 # endif
 517 #endif
 518
 519     /*
 520      * Load the builtins and plugins into the module_bank.
 521      * We have to do it before config_Load*() because this also gets the
 522      * list of configuration options exported by each module and loads their
 523      * default values.
 524      */
 525     module_LoadBuiltins( p_libvlc );
 526     module_LoadPlugins( p_libvlc );
 527     if( p_libvlc->b_die )
 528     {
 529         b_exit = VLC_TRUE;
 530     }
 531
 532     msg_Dbg( p_libvlc, "module bank initialized, found %i modules",
 533                     libvlc_global.p_module_bank->i_children );
 534
 535     /* Hack: insert the help module here */
 536     vlc_object_attach( p_help_module, libvlc_global.p_module_bank );
 537     /* End hack */
 538
 539     /* Check for help on modules */
 540     if( (p_tmp = config_GetPsz( p_libvlc, "module" )) )
 541     {
 542         Help( p_libvlc, p_tmp );
 543         free( p_tmp );
 544         b_exit = VLC_TRUE;
 545         i_ret = VLC_EEXITSUCCESS;
 546     }
 547     /* Check for long help option */
 548     else if( config_GetInt( p_libvlc, "longhelp" ) )
 549     {
 550         Help( p_libvlc, "longhelp" );
 551         b_exit = VLC_TRUE;
 552         i_ret = VLC_EEXITSUCCESS;
 553     }
 554     /* Check for module list option */
 555     else if( config_GetInt( p_libvlc, "list" ) )
 556     {
 557         ListModules( p_libvlc );
 558         b_exit = VLC_TRUE;
 559         i_ret = VLC_EEXITSUCCESS;
 560     }
 561
 562     /* Check for config file options */
 563     if( config_GetInt( p_libvlc, "reset-config" ) )
 564     {
 565         vlc_object_detach( p_help_module );
 566         config_ResetAll( p_libvlc );
 567         config_LoadCmdLine( p_libvlc, &i_argc, ppsz_argv, VLC_TRUE );
 568         config_SaveConfigFile( p_libvlc, NULL );
 569         vlc_object_attach( p_help_module, libvlc_global.p_module_bank );
 570     }
 571     if( config_GetInt( p_libvlc, "save-config" ) )
 572     {
 573         vlc_object_detach( p_help_module );
 574         config_LoadConfigFile( p_libvlc, NULL );
 575         config_LoadCmdLine( p_libvlc, &i_argc, ppsz_argv, VLC_TRUE );
 576         config_SaveConfigFile( p_libvlc, NULL );
 577         vlc_object_attach( p_help_module, libvlc_global.p_module_bank );
 578     }
 579
 580     /* Hack: remove the help module here */
 581     vlc_object_detach( p_help_module );
 582     /* End hack */
 583
 584     if( b_exit )
 585     {
 586         config_Free( p_help_module );
 587         vlc_object_destroy( p_help_module );
 588         module_EndBank( p_libvlc );
 589         if( i_object ) vlc_object_release( p_libvlc );
 590         return i_ret;
 591     }
 592
 593     /*
 594      * Init device values
 595      */
 596     InitDeviceValues( p_libvlc );
 597
 598     /*
 599      * Override default configuration with config file settings
 600      */
 601     config_LoadConfigFile( p_libvlc, NULL );
 602
 603     /* Hack: insert the help module here */
 604     vlc_object_attach( p_help_module, libvlc_global.p_module_bank );
 605     /* End hack */
 606
 607     /*
 608      * Override configuration with command line settings
 609      */
 610     if( config_LoadCmdLine( p_libvlc, &i_argc, ppsz_argv, VLC_FALSE ) )
 611     {
 612 #ifdef WIN32
 613         ShowConsole( VLC_FALSE );
 614         /* Pause the console because it's destroyed when we exit */
 615         fprintf( stderr, "The command line options couldn't be loaded, check "
 616                  "that they are valid.\n" );
 617         PauseConsole();
 618 #endif
 619         vlc_object_detach( p_help_module );
 620         config_Free( p_help_module );
 621         vlc_object_destroy( p_help_module );
 622         module_EndBank( p_libvlc );
 623         if( i_object ) vlc_object_release( p_libvlc );
 624         return VLC_EGENERIC;
 625     }
 626
 627     /* Hack: remove the help module here */
 628     vlc_object_detach( p_help_module );
 629     config_Free( p_help_module );
 630     vlc_object_destroy( p_help_module );
 631     /* End hack */
 632
 633     /*
 634      * System specific configuration
 635      */
 636     system_Configure( p_libvlc, &i_argc, ppsz_argv );
 637
 638     /*
 639      * Message queue options
 640      */
 641
 642     var_Create( p_libvlc, "verbose", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
 643     if( config_GetInt( p_libvlc, "quiet" ) )
 644     {
 645         val.i_int = -1;
 646         var_Set( p_libvlc, "verbose", val );
 647     }
 648     var_AddCallback( p_libvlc, "verbose", VerboseCallback, NULL );
 649     var_Change( p_libvlc, "verbose", VLC_VAR_TRIGGER_CALLBACKS, NULL, NULL );
 650
 651     libvlc_global.b_color = libvlc_global.b_color &&
 652                                 config_GetInt( p_libvlc, "color" );
 653
 654     /*
 655      * Output messages that may still be in the queue
 656      */
 657     msg_Flush( p_libvlc );
 658
 659     /* p_libvlc initialization. FIXME ? */
 660
 661     if( !config_GetInt( p_libvlc, "fpu" ) )
 662         libvlc_global.i_cpu &= ~CPU_CAPABILITY_FPU;
 663
 664 #if defined( __i386__ ) || defined( __x86_64__ )
 665     if( !config_GetInt( p_libvlc, "mmx" ) )
 666         libvlc_global.i_cpu &= ~CPU_CAPABILITY_MMX;
 667     if( !config_GetInt( p_libvlc, "3dn" ) )
 668         libvlc_global.i_cpu &= ~CPU_CAPABILITY_3DNOW;
 669     if( !config_GetInt( p_libvlc, "mmxext" ) )
 670         libvlc_global.i_cpu &= ~CPU_CAPABILITY_MMXEXT;
 671     if( !config_GetInt( p_libvlc, "sse" ) )
 672         libvlc_global.i_cpu &= ~CPU_CAPABILITY_SSE;
 673     if( !config_GetInt( p_libvlc, "sse2" ) )
 674         libvlc_global.i_cpu &= ~CPU_CAPABILITY_SSE2;
 675 #endif
 676 #if defined( __powerpc__ ) || defined( __ppc__ ) || defined( __ppc64__ )
 677     if( !config_GetInt( p_libvlc, "altivec" ) )
 678         libvlc_global.i_cpu &= ~CPU_CAPABILITY_ALTIVEC;
 679 #endif
 680
 681 #define PRINT_CAPABILITY( capability, string )                              \
 682     if( libvlc_global.i_cpu & capability )                                         \
 683     {                                                                       \
 684         strncat( p_capabilities, string " ",                                \
 685                  sizeof(p_capabilities) - strlen(p_capabilities) );         \
 686         p_capabilities[sizeof(p_capabilities) - 1] = '\0';                  \
 687     }
 688
 689     p_capabilities[0] = '\0';
 690     PRINT_CAPABILITY( CPU_CAPABILITY_486, "486" );
 691     PRINT_CAPABILITY( CPU_CAPABILITY_586, "586" );
 692     PRINT_CAPABILITY( CPU_CAPABILITY_PPRO, "Pentium Pro" );
 693     PRINT_CAPABILITY( CPU_CAPABILITY_MMX, "MMX" );
 694     PRINT_CAPABILITY( CPU_CAPABILITY_3DNOW, "3DNow!" );
 695     PRINT_CAPABILITY( CPU_CAPABILITY_MMXEXT, "MMXEXT" );
 696     PRINT_CAPABILITY( CPU_CAPABILITY_SSE, "SSE" );
 697     PRINT_CAPABILITY( CPU_CAPABILITY_SSE2, "SSE2" );
 698     PRINT_CAPABILITY( CPU_CAPABILITY_ALTIVEC, "AltiVec" );
 699     PRINT_CAPABILITY( CPU_CAPABILITY_FPU, "FPU" );
 700     msg_Dbg( p_libvlc, "CPU has capabilities %s", p_capabilities );
 701
 702     /*
 703      * Choose the best memcpy module
 704      */
 705     p_libvlc->p_memcpy_module = module_Need( p_libvlc, "memcpy", "$memcpy", 0 );
 706
 707     if( p_libvlc->pf_memcpy == NULL )
 708     {
 709         p_libvlc->pf_memcpy = memcpy;
 710     }
 711
 712     if( p_libvlc->pf_memset == NULL )
 713     {
 714         p_libvlc->pf_memset = memset;
 715     }
 716
 717     p_libvlc->b_stats = config_GetInt( p_libvlc, "stats" );
 718     p_libvlc->i_timers = 0;
 719     p_libvlc->pp_timers = NULL;
 720     vlc_mutex_init( p_libvlc, &p_libvlc->timer_lock );
 721
 722     /*
 723      * Initialize hotkey handling
 724      */
 725     var_Create( p_libvlc, "key-pressed", VLC_VAR_INTEGER );
 726     p_libvlc->p_hotkeys = malloc( sizeof(p_hotkeys) );
 727     /* Do a copy (we don't need to modify the strings) */
 728     memcpy( p_libvlc->p_hotkeys, p_hotkeys, sizeof(p_hotkeys) );
 729
 730     /* Initialize playlist and get commandline files */
 731     playlist_ThreadCreate( p_libvlc );
 732     if( !p_libvlc->p_playlist )
 733     {
 734         msg_Err( p_libvlc, "playlist initialization failed" );
 735         if( p_libvlc->p_memcpy_module != NULL )
 736         {
 737             module_Unneed( p_libvlc, p_libvlc->p_memcpy_module );
 738         }
 739         module_EndBank( p_libvlc );
 740         if( i_object ) vlc_object_release( p_libvlc );
 741         return VLC_EGENERIC;
 742     }
 743     p_playlist = p_libvlc->p_playlist;
 744
 745     psz_modules = config_GetPsz( p_playlist, "services-discovery" );
 746     if( psz_modules && *psz_modules )
 747     {
 748         /* Add service discovery modules */
 749         playlist_AddSDModules( p_playlist, psz_modules );
 750     }
 751     if( psz_modules ) free( psz_modules );
 752
 753     /*
 754      * Load background interfaces
 755      */
 756     psz_modules = config_GetPsz( p_libvlc, "extraintf" );
 757     psz_control = config_GetPsz( p_libvlc, "control" );
 758
 759     if( psz_modules && *psz_modules && psz_control && *psz_control )
 760     {
 761         psz_modules = (char *)realloc( psz_modules, strlen( psz_modules ) +
 762                                                     strlen( psz_control ) + 1 );
 763         sprintf( psz_modules, "%s:%s", psz_modules, psz_control );
 764     }
 765     else if( psz_control && *psz_control )
 766     {
 767         if( psz_modules ) free( psz_modules );
 768         psz_modules = strdup( psz_control );
 769     }
 770
 771     psz_parser = psz_modules;
 772     while ( psz_parser && *psz_parser )
 773     {
 774         char *psz_module, *psz_temp;
 775         psz_module = psz_parser;
 776         psz_parser = strchr( psz_module, ':' );
 777         if ( psz_parser )
 778         {
 779             *psz_parser = '\0';
 780             psz_parser++;
 781         }
 782         psz_temp = (char *)malloc( strlen(psz_module) + sizeof(",none") );
 783         if( psz_temp )
 784         {
 785             sprintf( psz_temp, "%s,none", psz_module );
 786             VLC_AddIntf( 0, psz_temp, VLC_FALSE, VLC_FALSE );
 787             free( psz_temp );
 788         }
 789     }
 790     if ( psz_modules )
 791     {
 792         free( psz_modules );
 793     }
 794
 795     /*
 796      * Always load the hotkeys interface if it exists
 797      */
 798     VLC_AddIntf( 0, "hotkeys,none", VLC_FALSE, VLC_FALSE );
 799
 800     /*
 801      * If needed, load the Xscreensaver interface
 802      * Currently, only for X
 803      */
 804 #ifdef HAVE_X11_XLIB_H
 805     if( config_GetInt( p_libvlc, "disable-screensaver" ) == 1 )
 806     {
 807         VLC_AddIntf( 0, "screensaver,none", VLC_FALSE, VLC_FALSE );
 808     }
 809 #endif
 810
 811     if( config_GetInt( p_libvlc, "file-logging" ) == 1 )
 812     {
 813         VLC_AddIntf( 0, "logger,none", VLC_FALSE, VLC_FALSE );
 814     }
 815 #ifdef HAVE_SYSLOG_H
 816     if( config_GetInt( p_libvlc, "syslog" ) == 1 )
 817     {
 818         char *psz_logmode = "logmode=syslog";
 819         AddIntfInternal( 0, "logger,none", VLC_FALSE, VLC_FALSE, 1, &psz_logmode );
 820     }
 821 #endif
 822
 823     if( config_GetInt( p_libvlc, "show-intf" ) == 1 )
 824     {
 825         VLC_AddIntf( 0, "showintf,none", VLC_FALSE, VLC_FALSE );
 826     }
 827
 828     if( config_GetInt( p_libvlc, "network-synchronisation") == 1 )
 829     {
 830         VLC_AddIntf( 0, "netsync,none", VLC_FALSE, VLC_FALSE );
 831     }
 832
 833     /*
 834      * FIXME: kludge to use a p_libvlc-local variable for the Mozilla plugin
 835      */
 836     var_Create( p_libvlc, "drawable", VLC_VAR_INTEGER );
 837     var_Create( p_libvlc, "drawable-view-top", VLC_VAR_INTEGER );
 838     var_Create( p_libvlc, "drawable-view-left", VLC_VAR_INTEGER );
 839     var_Create( p_libvlc, "drawable-view-bottom", VLC_VAR_INTEGER );
 840     var_Create( p_libvlc, "drawable-view-right", VLC_VAR_INTEGER );
 841     var_Create( p_libvlc, "drawable-clip-top", VLC_VAR_INTEGER );
 842     var_Create( p_libvlc, "drawable-clip-left", VLC_VAR_INTEGER );
 843     var_Create( p_libvlc, "drawable-clip-bottom", VLC_VAR_INTEGER );
 844     var_Create( p_libvlc, "drawable-clip-right", VLC_VAR_INTEGER );
 845
 846     /* Create volume callback system. */
 847     var_Create( p_libvlc, "volume-change", VLC_VAR_BOOL );
 848
 849     /*
 850      * Get input filenames given as commandline arguments
 851      */
 852     GetFilenames( p_libvlc, i_argc, ppsz_argv );
 853
 854     /*
 855      * Get --open argument
 856      */
 857     var_Create( p_libvlc, "open", VLC_VAR_STRING | VLC_VAR_DOINHERIT );
 858     var_Get( p_libvlc, "open", &val );
 859     if ( val.psz_string != NULL && *val.psz_string )
 860     {
 861         VLC_AddTarget( p_libvlc->i_object_id, val.psz_string, NULL, 0,
 862                        PLAYLIST_INSERT, 0 );
 863     }
 864     if ( val.psz_string != NULL ) free( val.psz_string );
 865
 866     LIBVLC_FUNC_END;
 867     return VLC_SUCCESS;
 868 }
 869
 870 /*****************************************************************************
 871  * VLC_AddIntf: add an interface
 872  *****************************************************************************
 873  * This function opens an interface plugin and runs it. If b_block is set
 874  * to 0, VLC_AddIntf will return immediately and let the interface run in a
 875  * separate thread. If b_block is set to 1, VLC_AddIntf will continue until
 876  * user requests to quit. If b_play is set to 1, VLC_AddIntf will start playing
 877  * the playlist when it is completely initialised.
 878  *****************************************************************************/
 879 int VLC_AddIntf( int i_object, char const *psz_module,
 880                  vlc_bool_t b_block, vlc_bool_t b_play )
 881 {
 882     return AddIntfInternal( i_object, psz_module, b_block, b_play, 0, NULL );
 883 }
 884
 885
 886 /*****************************************************************************
 887  * VLC_Die: ask vlc to die.
 888  *****************************************************************************
 889  * This function sets p_vlc->b_die to VLC_TRUE, but does not do any other
 890  * task. It is your duty to call VLC_CleanUp and VLC_Destroy afterwards.
 891  *****************************************************************************/
 892 int VLC_Die( int i_object )
 893 {
 894     LIBVLC_FUNC;
 895     p_libvlc->b_die = VLC_TRUE;
 896     LIBVLC_FUNC_END;
 897     return VLC_SUCCESS;
 898 }
 899
 900 /*****************************************************************************
 901  * VLC_CleanUp: CleanUp all the intf, playlist, vout, aout
 902  *****************************************************************************/
 903 int VLC_CleanUp( int i_object )
 904 {
 905     intf_thread_t      * p_intf;
 906     playlist_t         * p_playlist;
 907     vout_thread_t      * p_vout;
 908     aout_instance_t    * p_aout;
 909     announce_handler_t * p_announce;
 910
 911     LIBVLC_FUNC;
 912
 913     /* Ask the interfaces to stop and destroy them */
 914     msg_Dbg( p_libvlc, "removing all interfaces" );
 915     while( (p_intf = vlc_object_find( p_libvlc, VLC_OBJECT_INTF, FIND_CHILD )) )
 916     {
 917         intf_StopThread( p_intf );
 918         vlc_object_detach( p_intf );
 919         vlc_object_release( p_intf );
 920         intf_Destroy( p_intf );
 921     }
 922
 923     /* Free playlist */
 924     msg_Dbg( p_libvlc, "removing playlist" );
 925     playlist_ThreadDestroy( p_libvlc->p_playlist );
 926
 927     /* Free video outputs */
 928     msg_Dbg( p_libvlc, "removing all video outputs" );
 929     while( (p_vout = vlc_object_find( p_libvlc, VLC_OBJECT_VOUT, FIND_CHILD )) )
 930     {
 931         vlc_object_detach( p_vout );
 932         vlc_object_release( p_vout );
 933         vout_Destroy( p_vout );
 934     }
 935
 936     /* Free audio outputs */
 937     msg_Dbg( p_libvlc, "removing all audio outputs" );
 938     while( (p_aout = vlc_object_find( p_libvlc, VLC_OBJECT_AOUT, FIND_CHILD )) )
 939     {
 940         vlc_object_detach( (vlc_object_t *)p_aout );
 941         vlc_object_release( (vlc_object_t *)p_aout );
 942         aout_Delete( p_aout );
 943     }
 944
 945     stats_TimersDumpAll( p_libvlc );
 946     stats_TimersClean( p_libvlc );
 947
 948     /* Free announce handler(s?) */
 949     while( (p_announce = vlc_object_find( p_libvlc, VLC_OBJECT_ANNOUNCE,
 950                                                  FIND_CHILD ) ) )
 951     {
 952         msg_Dbg( p_libvlc, "removing announce handler" );
 953         vlc_object_detach( p_announce );
 954         vlc_object_release( p_announce );
 955         announce_HandlerDestroy( p_announce );
 956     }
 957
 958     LIBVLC_FUNC_END;
 959 }
 960
 961 /*****************************************************************************
 962  * VLC_Destroy: Destroy everything.
 963  *****************************************************************************
 964  * This function requests the running threads to finish, waits for their
 965  * termination, and destroys their structure.
 966  *****************************************************************************/
 967 int VLC_Destroy( int i_object )
 968 {
 969     LIBVLC_FUNC;
 970
 971     /* Free allocated memory */
 972     if( p_libvlc->p_memcpy_module )
 973     {
 974         module_Unneed( p_libvlc, p_libvlc->p_memcpy_module );
 975         p_libvlc->p_memcpy_module = NULL;
 976     }
 977
 978     /* Free module bank !  */
 979     module_EndBank( p_libvlc );
 980
 981     FREENULL( p_libvlc->psz_homedir );
 982     FREENULL( p_libvlc->psz_userdir );
 983     FREENULL( p_libvlc->psz_configfile );
 984     FREENULL( p_libvlc->p_hotkeys );
 985
 986     /* System specific cleaning code */
 987     system_End( p_libvlc );
 988
 989     /*
 990      * Free message queue.
 991      * Nobody shall use msg_* afterward.
 992      */
 993     msg_Flush( p_libvlc );
 994     msg_Destroy( p_libvlc_global );
 995
 996     /* Destroy global iconv */
 997     LocaleDeinit();
 998
 999     /* Destroy mutexes */
1000     vlc_mutex_destroy( &p_libvlc->config_lock );
1001
1002     vlc_object_detach( p_libvlc );
1003
1004     /* Release object before destroying it */
1005     if( i_object ) vlc_object_release( p_libvlc );
1006
1007     vlc_object_destroy( p_libvlc );
1008
1009     /* Stop thread system: last one out please shut the door! */
1010     vlc_threads_end( p_libvlc_global );
1011
1012     return VLC_SUCCESS;
1013 }
1014
1015 /*****************************************************************************
1016  * VLC_VariableSet: set a vlc variable
1017  *****************************************************************************/
1018 int VLC_VariableSet( int i_object, char const *psz_var, vlc_value_t value )
1019 {
1020     int i_ret;
1021     LIBVLC_FUNC;
1022
1023     /* FIXME: Temporary hack for Mozilla, if variable starts with conf:: then
1024      * we handle it as a configuration variable. Don't tell Gildas :) -- sam */
1025     if( !strncmp( psz_var, "conf::", 6 ) )
1026     {
1027         module_config_t *p_item;
1028         char const *psz_newvar = psz_var + 6;
1029
1030         p_item = config_FindConfig( VLC_OBJECT(p_libvlc), psz_newvar );
1031
1032         if( p_item )
1033         {
1034             switch( p_item->i_type )
1035             {
1036                 case CONFIG_ITEM_BOOL:
1037                     config_PutInt( p_libvlc, psz_newvar, value.b_bool );
1038                     break;
1039                 case CONFIG_ITEM_INTEGER:
1040                     config_PutInt( p_libvlc, psz_newvar, value.i_int );
1041                     break;
1042                 case CONFIG_ITEM_FLOAT:
1043                     config_PutFloat( p_libvlc, psz_newvar, value.f_float );
1044                     break;
1045                 default:
1046                     config_PutPsz( p_libvlc, psz_newvar, value.psz_string );
1047                     break;
1048             }
1049             if( i_object ) vlc_object_release( p_libvlc );
1050             return VLC_SUCCESS;
1051         }
1052     }
1053
1054     i_ret = var_Set( p_libvlc, psz_var, value );
1055
1056     LIBVLC_FUNC_END;
1057     return i_ret;
1058 }
1059
1060 /*****************************************************************************
1061  * VLC_VariableGet: get a vlc variable
1062  *****************************************************************************/
1063 int VLC_VariableGet( int i_object, char const *psz_var, vlc_value_t *p_value )
1064 {
1065     int i_ret;
1066     LIBVLC_FUNC;
1067     i_ret = var_Get( p_libvlc , psz_var, p_value );
1068     LIBVLC_FUNC_END;
1069     return i_ret;
1070 }
1071
1072 /*****************************************************************************
1073  * VLC_VariableType: get a vlc variable type
1074  *****************************************************************************/
1075 int VLC_VariableType( int i_object, char const *psz_var, int *pi_type )
1076 {
1077     int i_type;
1078     LIBVLC_FUNC;
1079     /* FIXME: Temporary hack for Mozilla, if variable starts with conf:: then
1080      * we handle it as a configuration variable. Don't tell Gildas :) -- sam */
1081     if( !strncmp( psz_var, "conf::", 6 ) )
1082     {
1083         module_config_t *p_item;
1084         char const *psz_newvar = psz_var + 6;
1085
1086         p_item = config_FindConfig( VLC_OBJECT(p_libvlc), psz_newvar );
1087
1088         if( p_item )
1089         {
1090             switch( p_item->i_type )
1091             {
1092                 case CONFIG_ITEM_BOOL:
1093                     i_type = VLC_VAR_BOOL;
1094                     break;
1095                 case CONFIG_ITEM_INTEGER:
1096                     i_type = VLC_VAR_INTEGER;
1097                     break;
1098                 case CONFIG_ITEM_FLOAT:
1099                     i_type = VLC_VAR_FLOAT;
1100                     break;
1101                 default:
1102                     i_type = VLC_VAR_STRING;
1103                     break;
1104             }
1105         }
1106         else
1107             i_type = 0;
1108     }
1109     else
1110         i_type = VLC_VAR_TYPE & var_Type( p_libvlc , psz_var );
1111
1112     LIBVLC_FUNC_END;
1113
1114     if( i_type > 0 )
1115     {
1116         *pi_type = i_type;
1117         return VLC_SUCCESS;
1118     }
1119     return VLC_ENOVAR;
1120 }
1121
1122 #define LIBVLC_PLAYLIST_FUNC \
1123     libvlc_int_t *p_libvlc = vlc_current_object( i_object );\
1124     if( !p_libvlc || !p_libvlc->p_playlist ) return VLC_ENOOBJ; \
1125     vlc_object_yield( p_libvlc->p_playlist );
1126
1127 #define LIBVLC_PLAYLIST_FUNC_END \
1128     vlc_object_release( p_libvlc->p_playlist ); \
1129     if( i_object ) vlc_object_release( p_libvlc );
1130
1131 /*****************************************************************************
1132  * VLC_AddTarget: adds a target for playing.
1133  *****************************************************************************
1134  * This function adds psz_target to the playlist
1135  *****************************************************************************/
1136
1137 int VLC_AddTarget( int i_object, char const *psz_target,
1138                    char const **ppsz_options, int i_options,
1139                    int i_mode, int i_pos )
1140 {
1141     int i_err;
1142     LIBVLC_PLAYLIST_FUNC;
1143     i_err = playlist_PlaylistAddExt( p_libvlc->p_playlist, psz_target,
1144                                      psz_target,  i_mode, i_pos, -1,
1145                                      ppsz_options, i_options );
1146     LIBVLC_PLAYLIST_FUNC_END;
1147     return i_err;
1148 }
1149
1150 /*****************************************************************************
1151  * VLC_Play: play the playlist
1152  *****************************************************************************/
1153 int VLC_Play( int i_object )
1154 {
1155     LIBVLC_PLAYLIST_FUNC;
1156     playlist_Play( p_libvlc->p_playlist );
1157     LIBVLC_PLAYLIST_FUNC_END;
1158     return VLC_SUCCESS;
1159 }
1160
1161 /*****************************************************************************
1162  * VLC_Pause: toggle pause
1163  *****************************************************************************/
1164 int VLC_Pause( int i_object )
1165 {
1166     LIBVLC_PLAYLIST_FUNC;
1167     playlist_Pause( p_libvlc->p_playlist );
1168     LIBVLC_PLAYLIST_FUNC_END;
1169     return VLC_SUCCESS;
1170 }
1171
1172 /*****************************************************************************
1173  * VLC_Stop: stop playback
1174  *****************************************************************************/
1175 int VLC_Stop( int i_object )
1176 {
1177     LIBVLC_PLAYLIST_FUNC;
1178     playlist_Stop( p_libvlc->p_playlist );
1179     LIBVLC_PLAYLIST_FUNC_END;
1180     return VLC_SUCCESS;
1181 }
1182
1183 /*****************************************************************************
1184  * VLC_IsPlaying: Query for Playlist Status
1185  *****************************************************************************/
1186 vlc_bool_t VLC_IsPlaying( int i_object )
1187 {
1188     vlc_bool_t   b_playing;
1189
1190     LIBVLC_PLAYLIST_FUNC;
1191     if( p_libvlc->p_playlist->p_input )
1192     {
1193         vlc_value_t  val;
1194         var_Get( p_libvlc->p_playlist->p_input, "state", &val );
1195         b_playing = ( val.i_int == PLAYING_S );
1196     }
1197     else
1198     {
1199         b_playing = playlist_IsPlaying( p_libvlc->p_playlist );
1200     }
1201     LIBVLC_PLAYLIST_FUNC_END;
1202     return b_playing;
1203 }
1204
1205 /**
1206  * Get the current position in a input
1207  *
1208  * Return the current position as a float
1209  * \note For some inputs, this will be unknown.
1210  *
1211  * \param i_object a vlc object id
1212  * \return a float in the range of 0.0 - 1.0
1213  */
1214 float VLC_PositionGet( int i_object )
1215 {
1216     input_thread_t *p_input;
1217     vlc_value_t val;
1218     libvlc_int_t *p_libvlc = vlc_current_object( i_object );
1219
1220     /* Check that the handle is valid */
1221     if( !p_libvlc )
1222     {
1223         return VLC_ENOOBJ;
1224     }
1225
1226     p_input = vlc_object_find( p_libvlc, VLC_OBJECT_INPUT, FIND_CHILD );
1227
1228     if( !p_input )
1229     {
1230         if( i_object ) vlc_object_release( p_libvlc );
1231         return VLC_ENOOBJ;
1232     }
1233
1234     var_Get( p_input, "position", &val );
1235     vlc_object_release( p_input );
1236
1237     if( i_object ) vlc_object_release( p_libvlc );
1238     return val.f_float;
1239 }
1240
1241 /**
1242  * Set the current position in a input
1243  *
1244  * Set the current position in a input and then return
1245  * the current position as a float.
1246  * \note For some inputs, this will be unknown.
1247  *
1248  * \param i_object a vlc object id
1249  * \param i_position a float in the range of 0.0 - 1.0
1250  * \return a float in the range of 0.0 - 1.0
1251  */
1252 float VLC_PositionSet( int i_object, float i_position )
1253 {
1254     input_thread_t *p_input;
1255     vlc_value_t val;
1256     libvlc_int_t *p_libvlc = vlc_current_object( i_object );
1257
1258     /* Check that the handle is valid */
1259     if( !p_libvlc )
1260     {
1261         return VLC_ENOOBJ;
1262     }
1263
1264     p_input = vlc_object_find( p_libvlc, VLC_OBJECT_INPUT, FIND_CHILD );
1265
1266     if( !p_input )
1267     {
1268         if( i_object ) vlc_object_release( p_libvlc );
1269         return VLC_ENOOBJ;
1270     }
1271
1272     val.f_float = i_position;
1273     var_Set( p_input, "position", val );
1274     var_Get( p_input, "position", &val );
1275     vlc_object_release( p_input );
1276
1277     if( i_object ) vlc_object_release( p_libvlc );
1278     return val.f_float;
1279 }
1280
1281 /**
1282  * Get the current position in a input
1283  *
1284  * Return the current position in seconds from the start.
1285  * \note For some inputs, this will be unknown.
1286  *
1287  * \param i_object a vlc object id
1288  * \return the offset from 0:00 in seconds
1289  */
1290 int VLC_TimeGet( int i_object )
1291 {
1292     input_thread_t *p_input;
1293     vlc_value_t val;
1294     libvlc_int_t *p_libvlc = vlc_current_object( i_object );
1295
1296     /* Check that the handle is valid */
1297     if( !p_libvlc )
1298     {
1299         return VLC_ENOOBJ;
1300     }
1301
1302     p_input = vlc_object_find( p_libvlc, VLC_OBJECT_INPUT, FIND_CHILD );
1303
1304     if( !p_input )
1305     {
1306         if( i_object ) vlc_object_release( p_libvlc );
1307         return VLC_ENOOBJ;
1308     }
1309
1310     var_Get( p_input, "time", &val );
1311     vlc_object_release( p_input );
1312
1313     if( i_object ) vlc_object_release( p_libvlc );
1314     return val.i_time  / 1000000;
1315 }
1316
1317 /**
1318  * Seek to a position in the current input
1319  *
1320  * Seek i_seconds in the current input. If b_relative is set,
1321  * then the seek will be relative to the current position, otherwise
1322  * it will seek to i_seconds from the beginning of the input.
1323  * \note For some inputs, this will be unknown.
1324  *
1325  * \param i_object a vlc object id
1326  * \param i_seconds seconds from current position or from beginning of input
1327  * \param b_relative seek relative from current position
1328  * \return VLC_SUCCESS on success
1329  */
1330 int VLC_TimeSet( int i_object, int i_seconds, vlc_bool_t b_relative )
1331 {
1332     input_thread_t *p_input;
1333     vlc_value_t val;
1334     libvlc_int_t *p_libvlc = vlc_current_object( i_object );
1335
1336     /* Check that the handle is valid */
1337     if( !p_libvlc )
1338     {
1339         return VLC_ENOOBJ;
1340     }
1341
1342     p_input = vlc_object_find( p_libvlc, VLC_OBJECT_INPUT, FIND_CHILD );
1343
1344     if( !p_input )
1345     {
1346         if( i_object ) vlc_object_release( p_libvlc );
1347         return VLC_ENOOBJ;
1348     }
1349
1350     if( b_relative )
1351     {
1352         val.i_time = i_seconds;
1353         val.i_time = val.i_time * 1000000L;
1354         var_Set( p_input, "time-offset", val );
1355     }
1356     else
1357     {
1358         val.i_time = i_seconds;
1359         val.i_time = val.i_time * 1000000L;
1360         var_Set( p_input, "time", val );
1361     }
1362     vlc_object_release( p_input );
1363
1364     if( i_object ) vlc_object_release( p_libvlc );
1365     return VLC_SUCCESS;
1366 }
1367
1368 /**
1369  * Get the total length of a input
1370  *
1371  * Return the total length in seconds from the current input.
1372  * \note For some inputs, this will be unknown.
1373  *
1374  * \param i_object a vlc object id
1375  * \return the length in seconds
1376  */
1377 int VLC_LengthGet( int i_object )
1378 {
1379     input_thread_t *p_input;
1380     vlc_value_t val;
1381     libvlc_int_t *p_libvlc = vlc_current_object( i_object );
1382
1383     /* Check that the handle is valid */
1384     if( !p_libvlc )
1385     {
1386         return VLC_ENOOBJ;
1387     }
1388
1389     p_input = vlc_object_find( p_libvlc, VLC_OBJECT_INPUT, FIND_CHILD );
1390
1391     if( !p_input )
1392     {
1393         if( i_object ) vlc_object_release( p_libvlc );
1394         return VLC_ENOOBJ;
1395     }
1396
1397     var_Get( p_input, "length", &val );
1398     vlc_object_release( p_input );
1399
1400     if( i_object ) vlc_object_release( p_libvlc );
1401     return val.i_time  / 1000000L;
1402 }
1403
1404 /**
1405  * Play the input faster than realtime
1406  *
1407  * 2x, 4x, 8x faster than realtime
1408  * \note For some inputs, this will be impossible.
1409  *
1410  * \param i_object a vlc object id
1411  * \return the current speedrate
1412  */
1413 float VLC_SpeedFaster( int i_object )
1414 {
1415     input_thread_t *p_input;
1416     vlc_value_t val;
1417     libvlc_int_t *p_libvlc = vlc_current_object( i_object );
1418
1419     /* Check that the handle is valid */
1420     if( !p_libvlc )
1421     {
1422         return VLC_ENOOBJ;
1423     }
1424
1425     p_input = vlc_object_find( p_libvlc, VLC_OBJECT_INPUT, FIND_CHILD );
1426
1427     if( !p_input )
1428     {
1429         if( i_object ) vlc_object_release( p_libvlc );
1430         return VLC_ENOOBJ;
1431     }
1432
1433     val.b_bool = VLC_TRUE;
1434     var_Set( p_input, "rate-faster", val );
1435     var_Get( p_input, "rate", &val );
1436     vlc_object_release( p_input );
1437
1438     if( i_object ) vlc_object_release( p_libvlc );
1439     return val.f_float / INPUT_RATE_DEFAULT;
1440 }
1441
1442 /**
1443  * Play the input slower than realtime
1444  *
1445  * 1/2x, 1/4x, 1/8x slower than realtime
1446  * \note For some inputs, this will be impossible.
1447  *
1448  * \param i_object a vlc object id
1449  * \return the current speedrate
1450  */
1451 float VLC_SpeedSlower( int i_object )
1452 {
1453     input_thread_t *p_input;
1454     vlc_value_t val;
1455     libvlc_int_t *p_libvlc = vlc_current_object( i_object );
1456
1457     /* Check that the handle is valid */
1458     if( !p_libvlc )
1459     {
1460         return VLC_ENOOBJ;
1461     }
1462
1463     p_input = vlc_object_find( p_libvlc, VLC_OBJECT_INPUT, FIND_CHILD );
1464
1465     if( !p_input )
1466     {
1467         if( i_object ) vlc_object_release( p_libvlc );
1468         return VLC_ENOOBJ;
1469     }
1470
1471     val.b_bool = VLC_TRUE;
1472     var_Set( p_input, "rate-slower", val );
1473     var_Get( p_input, "rate", &val );
1474     vlc_object_release( p_input );
1475
1476     if( i_object ) vlc_object_release( p_libvlc );
1477     return val.f_float / INPUT_RATE_DEFAULT;
1478 }
1479
1480 /**
1481  * Return the current playlist item
1482  *
1483  * Returns the index of the playlistitem that is currently selected for play.
1484  * This is valid even if nothing is currently playing.
1485  *
1486  * \param i_object a vlc object id
1487  * \return the current index
1488  */
1489 int VLC_PlaylistIndex( int i_object )
1490 {
1491     printf( "This function is deprecated and should not be used anymore" );
1492     return -1;
1493 }
1494
1495 /**
1496  * Total amount of items in the playlist
1497  *
1498  * \param i_object a vlc object id
1499  * \return amount of playlist items
1500  */
1501 int VLC_PlaylistNumberOfItems( int i_object )
1502 {
1503     int i_size;
1504     playlist_t * p_playlist;
1505     libvlc_int_t *p_libvlc = vlc_current_object( i_object );
1506
1507     /* Check that the handle is valid */
1508     if( !p_libvlc )
1509     {
1510         return VLC_ENOOBJ;
1511     }
1512
1513     p_playlist = vlc_object_find( p_libvlc, VLC_OBJECT_PLAYLIST, FIND_CHILD );
1514
1515     if( !p_playlist )
1516     {
1517         if( i_object ) vlc_object_release( p_libvlc );
1518         return VLC_ENOOBJ;
1519     }
1520
1521     i_size = p_playlist->i_size;
1522     vlc_object_release( p_playlist );
1523
1524     if( i_object ) vlc_object_release( p_libvlc );
1525     return i_size;
1526 }
1527
1528 /**
1529  * Next playlist item
1530  *
1531  * Skip to the next playlistitem and play it.
1532  *
1533  * \param i_object a vlc object id
1534  * \return VLC_SUCCESS on success
1535  */
1536 int VLC_PlaylistNext( int i_object )
1537 {
1538     playlist_t * p_playlist;
1539     libvlc_int_t *p_libvlc = vlc_current_object( i_object );
1540
1541     /* Check that the handle is valid */
1542     if( !p_libvlc )
1543     {
1544         return VLC_ENOOBJ;
1545     }
1546
1547     p_playlist = vlc_object_find( p_libvlc, VLC_OBJECT_PLAYLIST, FIND_CHILD );
1548
1549     if( !p_playlist )
1550     {
1551         if( i_object ) vlc_object_release( p_libvlc );
1552         return VLC_ENOOBJ;
1553     }
1554
1555     playlist_Next( p_playlist );
1556     vlc_object_release( p_playlist );
1557
1558     if( i_object ) vlc_object_release( p_libvlc );
1559     return VLC_SUCCESS;
1560 }
1561
1562 /**
1563  * Previous playlist item
1564  *
1565  * Skip to the previous playlistitem and play it.
1566  *
1567  * \param i_object a vlc object id
1568  * \return VLC_SUCCESS on success
1569  */
1570 int VLC_PlaylistPrev( int i_object )
1571 {
1572     playlist_t * p_playlist;
1573     libvlc_int_t *p_libvlc = vlc_current_object( i_object );
1574
1575     /* Check that the handle is valid */
1576     if( !p_libvlc )
1577     {
1578         return VLC_ENOOBJ;
1579     }
1580
1581     p_playlist = vlc_object_find( p_libvlc, VLC_OBJECT_PLAYLIST, FIND_CHILD );
1582
1583     if( !p_playlist )
1584     {
1585         if( i_object ) vlc_object_release( p_libvlc );
1586         return VLC_ENOOBJ;
1587     }
1588
1589     playlist_Prev( p_playlist );
1590     vlc_object_release( p_playlist );
1591
1592     if( i_object ) vlc_object_release( p_libvlc );
1593     return VLC_SUCCESS;
1594 }
1595
1596
1597 /*****************************************************************************
1598  * VLC_PlaylistClear: Empty the playlist
1599  *****************************************************************************/
1600 int VLC_PlaylistClear( int i_object )
1601 {
1602     playlist_t * p_playlist;
1603     libvlc_int_t *p_libvlc = vlc_current_object( i_object );
1604
1605     /* Check that the handle is valid */
1606     if( !p_libvlc )
1607     {
1608         return VLC_ENOOBJ;
1609     }
1610
1611     p_playlist = vlc_object_find( p_libvlc, VLC_OBJECT_PLAYLIST, FIND_CHILD );
1612
1613     if( !p_playlist )
1614     {
1615         if( i_object ) vlc_object_release( p_libvlc );
1616         return VLC_ENOOBJ;
1617     }
1618
1619     playlist_Clear( p_playlist );
1620
1621     vlc_object_release( p_playlist );
1622
1623     if( i_object ) vlc_object_release( p_libvlc );
1624     return VLC_SUCCESS;
1625 }
1626
1627 /**
1628  * Change the volume
1629  *
1630  * \param i_object a vlc object id
1631  * \param i_volume something in a range from 0-200
1632  * \return the new volume (range 0-200 %)
1633  */
1634 int VLC_VolumeSet( int i_object, int i_volume )
1635 {
1636     audio_volume_t i_vol = 0;
1637     libvlc_int_t *p_libvlc = vlc_current_object( i_object );
1638
1639     /* Check that the handle is valid */
1640     if( !p_libvlc )
1641     {
1642         return VLC_ENOOBJ;
1643     }
1644
1645     if( i_volume >= 0 && i_volume <= 200 )
1646     {
1647         i_vol = i_volume * AOUT_VOLUME_MAX / 200;
1648         aout_VolumeSet( p_libvlc, i_vol );
1649     }
1650
1651     if( i_object ) vlc_object_release( p_libvlc );
1652     return i_vol * 200 / AOUT_VOLUME_MAX;
1653 }
1654
1655 /**
1656  * Get the current volume
1657  *
1658  * Retrieve the current volume.
1659  *
1660  * \param i_object a vlc object id
1661  * \return the current volume (range 0-200 %)
1662  */
1663 int VLC_VolumeGet( int i_object )
1664 {
1665     audio_volume_t i_volume;
1666     libvlc_int_t *p_libvlc = vlc_current_object( i_object );
1667
1668     /* Check that the handle is valid */
1669     if( !p_libvlc )
1670     {
1671         return VLC_ENOOBJ;
1672     }
1673
1674     aout_VolumeGet( p_libvlc, &i_volume );
1675
1676     if( i_object ) vlc_object_release( p_libvlc );
1677     return i_volume*200/AOUT_VOLUME_MAX;
1678 }
1679
1680 /**
1681  * Mute/Unmute the volume
1682  *
1683  * \param i_object a vlc object id
1684  * \return VLC_SUCCESS on success
1685  */
1686 int VLC_VolumeMute( int i_object )
1687 {
1688     libvlc_int_t *p_libvlc = vlc_current_object( i_object );
1689
1690     /* Check that the handle is valid */
1691     if( !p_libvlc )
1692     {
1693         return VLC_ENOOBJ;
1694     }
1695
1696     aout_VolumeMute( p_libvlc, NULL );
1697
1698     if( i_object ) vlc_object_release( p_libvlc );
1699     return VLC_SUCCESS;
1700 }
1701
1702 /*****************************************************************************
1703  * VLC_FullScreen: toggle fullscreen mode
1704  *****************************************************************************/
1705 int VLC_FullScreen( int i_object )
1706 {
1707     vout_thread_t *p_vout;
1708     libvlc_int_t *p_libvlc = vlc_current_object( i_object );
1709
1710     if( !p_libvlc )
1711     {
1712         return VLC_ENOOBJ;
1713     }
1714
1715     p_vout = vlc_object_find( p_libvlc, VLC_OBJECT_VOUT, FIND_CHILD );
1716
1717     if( !p_vout )
1718     {
1719         if( i_object ) vlc_object_release( p_libvlc );
1720         return VLC_ENOOBJ;
1721     }
1722
1723     p_vout->i_changes |= VOUT_FULLSCREEN_CHANGE;
1724     vlc_object_release( p_vout );
1725
1726     if( i_object ) vlc_object_release( p_libvlc );
1727     return VLC_SUCCESS;
1728 }
1729
1730 /* following functions are local */
1731
1732
1733 static int  AddIntfInternal( int i_object, char const *psz_module,
1734                              vlc_bool_t b_block, vlc_bool_t b_play,
1735                              int i_options, char **ppsz_options )
1736 {
1737     int i_err;
1738     intf_thread_t *p_intf;
1739     libvlc_int_t *p_libvlc = vlc_current_object( i_object );
1740
1741     if( !p_libvlc )
1742     {
1743         return VLC_ENOOBJ;
1744     }
1745
1746 #ifndef WIN32
1747     if( p_libvlc->p_libvlc_global->b_daemon && b_block && !psz_module )
1748     {
1749         /* Daemon mode hack.
1750          * We prefer the dummy interface if none is specified. */
1751         char *psz_interface = config_GetPsz( p_libvlc, "intf" );
1752         if( !psz_interface || !*psz_interface ) psz_module = "dummy";
1753         if( psz_interface ) free( psz_interface );
1754     }
1755 #endif
1756
1757     /* Try to create the interface */
1758     p_intf = intf_Create( p_libvlc, psz_module ? psz_module : "$intf",
1759                           i_options, ppsz_options );
1760
1761     if( p_intf == NULL )
1762     {
1763         msg_Err( p_libvlc, "interface \"%s\" initialization failed", psz_module );
1764         if( i_object ) vlc_object_release( p_libvlc );
1765         return VLC_EGENERIC;
1766     }
1767
1768     /* Interface doesn't handle play on start so do it ourselves */
1769     if( !p_intf->b_play && b_play ) VLC_Play( i_object );
1770
1771     /* Try to run the interface */
1772     p_intf->b_play = b_play;
1773     p_intf->b_block = b_block;
1774     i_err = intf_RunThread( p_intf );
1775     if( i_err )
1776     {
1777         vlc_object_detach( p_intf );
1778         intf_Destroy( p_intf );
1779         if( i_object ) vlc_object_release( p_libvlc );
1780         return i_err;
1781     }
1782
1783     if( i_object ) vlc_object_release( p_libvlc );
1784     return VLC_SUCCESS;
1785 };
1786
1787
1788 /*****************************************************************************
1789  * SetLanguage: set the interface language.
1790  *****************************************************************************
1791  * We set the LC_MESSAGES locale category for interface messages and buttons,
1792  * as well as the LC_CTYPE category for string sorting and possible wide
1793  * character support.
1794  *****************************************************************************/
1795 static void SetLanguage ( char const *psz_lang )
1796 {
1797 #if defined( ENABLE_NLS ) \
1798      && ( defined( HAVE_GETTEXT ) || defined( HAVE_INCLUDED_GETTEXT ) )
1799
1800     char *          psz_path;
1801 #if defined( __APPLE__ ) || defined ( WIN32 ) || defined( SYS_BEOS )
1802     char            psz_tmp[1024];
1803 #endif
1804
1805     if( psz_lang && !*psz_lang )
1806     {
1807 #   if defined( HAVE_LC_MESSAGES )
1808         setlocale( LC_MESSAGES, psz_lang );
1809 #   endif
1810         setlocale( LC_CTYPE, psz_lang );
1811     }
1812     else if( psz_lang )
1813     {
1814 #ifdef __APPLE__
1815         /* I need that under Darwin, please check it doesn't disturb
1816          * other platforms. --Meuuh */
1817         setenv( "LANG", psz_lang, 1 );
1818
1819 #elif defined( SYS_BEOS ) || defined( WIN32 )
1820         /* We set LC_ALL manually because it is the only way to set
1821          * the language at runtime under eg. Windows. Beware that this
1822          * makes the environment unconsistent when libvlc is unloaded and
1823          * should probably be moved to a safer place like vlc.c. */
1824         static char psz_lcall[20];
1825         snprintf( psz_lcall, 19, "LC_ALL=%s", psz_lang );
1826         psz_lcall[19] = '\0';
1827         putenv( psz_lcall );
1828 #endif
1829
1830         setlocale( LC_ALL, psz_lang );
1831     }
1832
1833     /* Specify where to find the locales for current domain */
1834 #if !defined( __APPLE__ ) && !defined( WIN32 ) && !defined( SYS_BEOS )
1835     psz_path = LOCALEDIR;
1836 #else
1837     snprintf( psz_tmp, sizeof(psz_tmp), "%s/%s", libvlc_global.psz_vlcpath,
1838               "locale" );
1839     psz_path = psz_tmp;
1840 #endif
1841     if( !bindtextdomain( PACKAGE_NAME, psz_path ) )
1842     {
1843         fprintf( stderr, "warning: couldn't bind domain %s in directory %s\n",
1844                  PACKAGE_NAME, psz_path );
1845     }
1846
1847     /* Set the default domain */
1848     bind_textdomain_codeset( PACKAGE_NAME, "UTF-8" );
1849 #endif
1850 }
1851
1852 /*****************************************************************************
1853  * GetFilenames: parse command line options which are not flags
1854  *****************************************************************************
1855  * Parse command line for input files as well as their associated options.
1856  * An option always follows its associated input and begins with a ":".
1857  *****************************************************************************/
1858 static int GetFilenames( libvlc_int_t *p_vlc, int i_argc, char *ppsz_argv[] )
1859 {
1860     int i_opt, i_options;
1861
1862     /* We assume that the remaining parameters are filenames
1863      * and their input options */
1864     for( i_opt = i_argc - 1; i_opt >= optind; i_opt-- )
1865     {
1866         const char *psz_target;
1867         i_options = 0;
1868
1869         /* Count the input options */
1870         while( *ppsz_argv[ i_opt ] == ':' && i_opt > optind )
1871         {
1872             i_options++;
1873             i_opt--;
1874         }
1875
1876         /* TODO: write an internal function of this one, to avoid
1877          *       unnecessary lookups. */
1878         /* FIXME: should we convert options to UTF-8 as well ?? */
1879         psz_target = FromLocale( ppsz_argv[ i_opt ] );
1880         VLC_AddTarget( p_vlc->i_object_id, psz_target,
1881                        (char const **)( i_options ? &ppsz_argv[i_opt + 1] :
1882                                         NULL ), i_options,
1883                        PLAYLIST_INSERT, 0 );
1884         LocaleFree( psz_target );
1885     }
1886
1887     return VLC_SUCCESS;
1888 }
1889
1890 /*****************************************************************************
1891  * Help: print program help
1892  *****************************************************************************
1893  * Print a short inline help. Message interface is initialized at this stage.
1894  *****************************************************************************/
1895 static void Help( libvlc_int_t *p_this, char const *psz_help_name )
1896 {
1897 #ifdef WIN32
1898     ShowConsole( VLC_TRUE );
1899 #endif
1900
1901     if( psz_help_name && !strcmp( psz_help_name, "help" ) )
1902     {
1903         utf8_fprintf( stdout, VLC_USAGE, p_this->psz_object_name );
1904         Usage( p_this, "help" );
1905         Usage( p_this, "main" );
1906     }
1907     else if( psz_help_name && !strcmp( psz_help_name, "longhelp" ) )
1908     {
1909         utf8_fprintf( stdout, VLC_USAGE, p_this->psz_object_name );
1910         Usage( p_this, NULL );
1911     }
1912     else if( psz_help_name )
1913     {
1914         Usage( p_this, psz_help_name );
1915     }
1916
1917 #ifdef WIN32        /* Pause the console because it's destroyed when we exit */
1918     PauseConsole();
1919 #endif
1920 }
1921
1922 /*****************************************************************************
1923  * Usage: print module usage
1924  *****************************************************************************
1925  * Print a short inline help. Message interface is initialized at this stage.
1926  *****************************************************************************/
1927 static void Usage( libvlc_int_t *p_this, char const *psz_module_name )
1928 {
1929 #define FORMAT_STRING "  %s --%s%s%s%s%s%s%s "
1930     /* short option ------'    |     | | | |  | |
1931      * option name ------------'     | | | |  | |
1932      * <bra -------------------------' | | |  | |
1933      * option type or "" --------------' | |  | |
1934      * ket> -----------------------------' |  | |
1935      * padding spaces ---------------------'  | |
1936      * comment -------------------------------' |
1937      * comment suffix --------------------------'
1938      *
1939      * The purpose of having bra and ket is that we might i18n them as well.
1940      */
1941 #define LINE_START 8
1942 #define PADDING_SPACES 25
1943     vlc_list_t *p_list;
1944     module_t *p_parser;
1945     module_config_t *p_item;
1946     char psz_spaces_text[PADDING_SPACES+LINE_START+1];
1947     char psz_spaces_longtext[LINE_START+3];
1948     char psz_format[sizeof(FORMAT_STRING)];
1949     char psz_buffer[10000];
1950     char psz_short[4];
1951     int i_index;
1952     int i_width = ConsoleWidth() - (PADDING_SPACES+LINE_START+1);
1953     vlc_bool_t b_advanced = config_GetInt( p_this, "advanced" );
1954     vlc_bool_t b_description;
1955
1956     memset( psz_spaces_text, ' ', PADDING_SPACES+LINE_START );
1957     psz_spaces_text[PADDING_SPACES+LINE_START] = '\0';
1958     memset( psz_spaces_longtext, ' ', LINE_START+2 );
1959     psz_spaces_longtext[LINE_START+2] = '\0';
1960
1961     strcpy( psz_format, FORMAT_STRING );
1962
1963     /* List all modules */
1964     p_list = vlc_list_find( p_this, VLC_OBJECT_MODULE, FIND_ANYWHERE );
1965
1966     /* Enumerate the config for each module */
1967     for( i_index = 0; i_index < p_list->i_count; i_index++ )
1968     {
1969         vlc_bool_t b_help_module;
1970
1971         p_parser = (module_t *)p_list->p_values[i_index].p_object ;
1972
1973         if( psz_module_name && strcmp( psz_module_name,
1974                                        p_parser->psz_object_name ) )
1975         {
1976             continue;
1977         }
1978
1979         /* Ignore modules without config options */
1980         if( !p_parser->i_config_items )
1981         {
1982             continue;
1983         }
1984
1985         /* Ignore modules with only advanced config options if requested */
1986         if( !b_advanced )
1987         {
1988             for( p_item = p_parser->p_config;
1989                  p_item->i_type != CONFIG_HINT_END;
1990                  p_item++ )
1991             {
1992                 if( (p_item->i_type & CONFIG_ITEM) &&
1993                     !p_item->b_advanced ) break;
1994             }
1995             if( p_item->i_type == CONFIG_HINT_END ) continue;
1996         }
1997
1998         /* Print name of module */
1999         if( strcmp( "main", p_parser->psz_object_name ) )
2000         utf8_fprintf( stdout, "\n %s\n", p_parser->psz_longname );
2001
2002         b_help_module = !strcmp( "help", p_parser->psz_object_name );
2003
2004         /* Print module options */
2005         for( p_item = p_parser->p_config;
2006              p_item->i_type != CONFIG_HINT_END;
2007              p_item++ )
2008         {
2009             char *psz_text, *psz_spaces = psz_spaces_text;
2010             char *psz_bra = NULL, *psz_type = NULL, *psz_ket = NULL;
2011             char *psz_suf = "", *psz_prefix = NULL;
2012             signed int i;
2013
2014             /* Skip deprecated options */
2015             if( p_item->psz_current )
2016             {
2017                 continue;
2018             }
2019             /* Skip advanced options if requested */
2020             if( p_item->b_advanced && !b_advanced )
2021             {
2022                 continue;
2023             }
2024
2025             switch( p_item->i_type )
2026             {
2027             case CONFIG_HINT_CATEGORY:
2028             case CONFIG_HINT_USAGE:
2029                 if( !strcmp( "main", p_parser->psz_object_name ) )
2030                 utf8_fprintf( stdout, "\n %s\n", p_item->psz_text );
2031                 break;
2032
2033             case CONFIG_ITEM_STRING:
2034             case CONFIG_ITEM_FILE:
2035             case CONFIG_ITEM_DIRECTORY:
2036             case CONFIG_ITEM_MODULE: /* We could also have "=<" here */
2037             case CONFIG_ITEM_MODULE_CAT:
2038             case CONFIG_ITEM_MODULE_LIST:
2039             case CONFIG_ITEM_MODULE_LIST_CAT:
2040                 psz_bra = " <"; psz_type = _("string"); psz_ket = ">";
2041
2042                 if( p_item->ppsz_list )
2043                 {
2044                     psz_bra = " {";
2045                     psz_type = psz_buffer;
2046                     psz_type[0] = '\0';
2047                     for( i = 0; p_item->ppsz_list[i]; i++ )
2048                     {
2049                         if( i ) strcat( psz_type, "," );
2050                         strcat( psz_type, p_item->ppsz_list[i] );
2051                     }
2052                     psz_ket = "}";
2053                 }
2054                 break;
2055             case CONFIG_ITEM_INTEGER:
2056             case CONFIG_ITEM_KEY: /* FIXME: do something a bit more clever */
2057                 psz_bra = " <"; psz_type = _("integer"); psz_ket = ">";
2058
2059                 if( p_item->i_list )
2060                 {
2061                     psz_bra = " {";
2062                     psz_type = psz_buffer;
2063                     psz_type[0] = '\0';
2064                     for( i = 0; p_item->ppsz_list_text[i]; i++ )
2065                     {
2066                         if( i ) strcat( psz_type, ", " );
2067                         sprintf( psz_type + strlen(psz_type), "%i (%s)",
2068                                  p_item->pi_list[i],
2069                                  p_item->ppsz_list_text[i] );
2070                     }
2071                     psz_ket = "}";
2072                 }
2073                 break;
2074             case CONFIG_ITEM_FLOAT:
2075                 psz_bra = " <"; psz_type = _("float"); psz_ket = ">";
2076                 break;
2077             case CONFIG_ITEM_BOOL:
2078                 psz_bra = ""; psz_type = ""; psz_ket = "";
2079                 if( !b_help_module )
2080                 {
2081                     psz_suf = p_item->i_value ? _(" (default enabled)") :
2082                                                 _(" (default disabled)");
2083                 }
2084                 break;
2085             }
2086
2087             if( !psz_type )
2088             {
2089                 continue;
2090             }
2091
2092             /* Add short option if any */
2093             if( p_item->i_short )
2094             {
2095                 sprintf( psz_short, "-%c,", p_item->i_short );
2096             }
2097             else
2098             {
2099                 strcpy( psz_short, "   " );
2100             }
2101
2102             i = PADDING_SPACES - strlen( p_item->psz_name )
2103                  - strlen( psz_bra ) - strlen( psz_type )
2104                  - strlen( psz_ket ) - 1;
2105
2106             if( p_item->i_type == CONFIG_ITEM_BOOL && !b_help_module )
2107             {
2108                 psz_prefix =  ", --no-";
2109                 i -= strlen( p_item->psz_name ) + strlen( psz_prefix );
2110             }
2111
2112             if( i < 0 )
2113             {
2114                 psz_spaces[0] = '\n';
2115                 i = 0;
2116             }
2117             else
2118             {
2119                 psz_spaces[i] = '\0';
2120             }
2121
2122             if( p_item->i_type == CONFIG_ITEM_BOOL && !b_help_module )
2123             {
2124                 utf8_fprintf( stdout, psz_format, psz_short, p_item->psz_name,
2125                          psz_prefix, p_item->psz_name, psz_bra, psz_type,
2126                          psz_ket, psz_spaces );
2127             }
2128             else
2129             {
2130                 utf8_fprintf( stdout, psz_format, psz_short, p_item->psz_name,
2131                          "", "", psz_bra, psz_type, psz_ket, psz_spaces );
2132             }
2133
2134             psz_spaces[i] = ' ';
2135
2136             /* We wrap the rest of the output */
2137             sprintf( psz_buffer, "%s%s", p_item->psz_text, psz_suf );
2138             b_description = config_GetInt( p_this, "help-verbose" );
2139
2140  description:
2141             psz_text = psz_buffer;
2142             while( *psz_text )
2143             {
2144                 char *psz_parser, *psz_word;
2145                 size_t i_end = strlen( psz_text );
2146
2147                 /* If the remaining text fits in a line, print it. */
2148                 if( i_end <= (size_t)i_width )
2149                 {
2150                     utf8_fprintf( stdout, "%s\n", psz_text );
2151                     break;
2152                 }
2153
2154                 /* Otherwise, eat as many words as possible */
2155                 psz_parser = psz_text;
2156                 do
2157                 {
2158                     psz_word = psz_parser;
2159                     psz_parser = strchr( psz_word, ' ' );
2160                     /* If no space was found, we reached the end of the text
2161                      * block; otherwise, we skip the space we just found. */
2162                     psz_parser = psz_parser ? psz_parser + 1
2163                                             : psz_text + i_end;
2164
2165                 } while( psz_parser - psz_text <= i_width );
2166
2167                 /* We cut a word in one of these cases:
2168                  *  - it's the only word in the line and it's too long.
2169                  *  - we used less than 80% of the width and the word we are
2170                  *    going to wrap is longer than 40% of the width, and even
2171                  *    if the word would have fit in the next line. */
2172                 if( psz_word == psz_text
2173                      || ( psz_word - psz_text < 80 * i_width / 100
2174                            && psz_parser - psz_word > 40 * i_width / 100 ) )
2175                 {
2176                     char c = psz_text[i_width];
2177                     psz_text[i_width] = '\0';
2178                     utf8_fprintf( stdout, "%s\n%s", psz_text, psz_spaces );
2179                     psz_text += i_width;
2180                     psz_text[0] = c;
2181                 }
2182                 else
2183                 {
2184                     psz_word[-1] = '\0';
2185                     utf8_fprintf( stdout, "%s\n%s", psz_text, psz_spaces );
2186                     psz_text = psz_word;
2187                 }
2188             }
2189
2190             if( b_description && p_item->psz_longtext )
2191             {
2192                 sprintf( psz_buffer, "%s%s", p_item->psz_longtext, psz_suf );
2193                 b_description = VLC_FALSE;
2194                 psz_spaces = psz_spaces_longtext;
2195                 utf8_fprintf( stdout, "%s", psz_spaces );
2196                 goto description;
2197             }
2198         }
2199     }
2200
2201     /* Release the module list */
2202     vlc_list_release( p_list );
2203 }
2204
2205 /*****************************************************************************
2206  * ListModules: list the available modules with their description
2207  *****************************************************************************
2208  * Print a list of all available modules (builtins and plugins) and a short
2209  * description for each one.
2210  *****************************************************************************/
2211 static void ListModules( libvlc_int_t *p_this )
2212 {
2213     vlc_list_t *p_list;
2214     module_t *p_parser;
2215     char psz_spaces[22];
2216     int i_index;
2217
2218     memset( psz_spaces, ' ', 22 );
2219
2220 #ifdef WIN32
2221     ShowConsole( VLC_TRUE );
2222 #endif
2223
2224     /* List all modules */
2225     p_list = vlc_list_find( p_this, VLC_OBJECT_MODULE, FIND_ANYWHERE );
2226
2227     /* Enumerate each module */
2228     for( i_index = 0; i_index < p_list->i_count; i_index++ )
2229     {
2230         int i;
2231
2232         p_parser = (module_t *)p_list->p_values[i_index].p_object ;
2233
2234         /* Nasty hack, but right now I'm too tired to think about a nice
2235          * solution */
2236         i = 22 - strlen( p_parser->psz_object_name ) - 1;
2237         if( i < 0 ) i = 0;
2238         psz_spaces[i] = 0;
2239
2240         utf8_fprintf( stdout, "  %s%s %s\n", p_parser->psz_object_name,
2241                          psz_spaces, p_parser->psz_longname );
2242
2243         psz_spaces[i] = ' ';
2244     }
2245
2246     vlc_list_release( p_list );
2247
2248 #ifdef WIN32        /* Pause the console because it's destroyed when we exit */
2249     PauseConsole();
2250 #endif
2251 }
2252
2253 /*****************************************************************************
2254  * Version: print complete program version
2255  *****************************************************************************
2256  * Print complete program version and build number.
2257  *****************************************************************************/
2258 static void Version( void )
2259 {
2260 #ifdef WIN32
2261     ShowConsole( VLC_TRUE );
2262 #endif
2263
2264     utf8_fprintf( stdout, _("VLC version %s\n"), VLC_Version() );
2265     utf8_fprintf( stdout, _("Compiled by %s@%s.%s\n"),
2266              VLC_CompileBy(), VLC_CompileHost(), VLC_CompileDomain() );
2267     utf8_fprintf( stdout, _("Compiler: %s\n"), VLC_Compiler() );
2268 #ifndef HAVE_SHARED_LIBVLC
2269     if( strcmp( VLC_Changeset(), "exported" ) )
2270         utf8_fprintf( stdout, _("Based upon svn changeset [%s]\n"),
2271                  VLC_Changeset() );
2272 #endif
2273     utf8_fprintf( stdout, LICENSE_MSG );
2274
2275 #ifdef WIN32        /* Pause the console because it's destroyed when we exit */
2276     PauseConsole();
2277 #endif
2278 }
2279
2280 /*****************************************************************************
2281  * ShowConsole: On Win32, create an output console for debug messages
2282  *****************************************************************************
2283  * This function is useful only on Win32.
2284  *****************************************************************************/
2285 #ifdef WIN32 /*  */
2286 static void ShowConsole( vlc_bool_t b_dofile )
2287 {
2288 #   ifndef UNDER_CE
2289     FILE *f_help;
2290
2291     if( getenv( "PWD" ) && getenv( "PS1" ) ) return; /* cygwin shell */
2292
2293     AllocConsole();
2294
2295     freopen( "CONOUT$", "w", stderr );
2296     freopen( "CONIN$", "r", stdin );
2297
2298     if( b_dofile && (f_help = fopen( "vlc-help.txt", "wt" )) )
2299     {
2300         fclose( f_help );
2301         freopen( "vlc-help.txt", "wt", stdout );
2302         utf8_fprintf( stderr, _("\nDumped content to vlc-help.txt file.\n") );
2303     }
2304
2305     else freopen( "CONOUT$", "w", stdout );
2306
2307 #   endif
2308 }
2309 #endif
2310
2311 /*****************************************************************************
2312  * PauseConsole: On Win32, wait for a key press before closing the console
2313  *****************************************************************************
2314  * This function is useful only on Win32.
2315  *****************************************************************************/
2316 #ifdef WIN32 /*  */
2317 static void PauseConsole( void )
2318 {
2319 #   ifndef UNDER_CE
2320
2321     if( getenv( "PWD" ) && getenv( "PS1" ) ) return; /* cygwin shell */
2322
2323     utf8_fprintf( stderr, _("\nPress the RETURN key to continue...\n") );
2324     getchar();
2325     fclose( stdout );
2326
2327 #   endif
2328 }
2329 #endif
2330
2331 /*****************************************************************************
2332  * ConsoleWidth: Return the console width in characters
2333  *****************************************************************************
2334  * We use the stty shell command to get the console width; if this fails or
2335  * if the width is less than 80, we default to 80.
2336  *****************************************************************************/
2337 static int ConsoleWidth( void )
2338 {
2339     int i_width = 80;
2340
2341 #ifndef WIN32
2342     char buf[20], *psz_parser;
2343     FILE *file;
2344     int i_ret;
2345
2346     file = popen( "stty size 2>/dev/null", "r" );
2347     if( file )
2348     {
2349         i_ret = fread( buf, 1, 20, file );
2350         if( i_ret > 0 )
2351         {
2352             buf[19] = '\0';
2353             psz_parser = strchr( buf, ' ' );
2354             if( psz_parser )
2355             {
2356                 i_ret = atoi( psz_parser + 1 );
2357                 if( i_ret >= 80 )
2358                 {
2359                     i_width = i_ret;
2360                 }
2361             }
2362         }
2363
2364         pclose( file );
2365     }
2366 #endif
2367
2368     return i_width;
2369 }
2370
2371 static int VerboseCallback( vlc_object_t *p_this, const char *psz_variable,
2372                      vlc_value_t old_val, vlc_value_t new_val, void *param)
2373 {
2374     libvlc_int_t *p_vlc = (libvlc_int_t *)p_this;
2375
2376     if( new_val.i_int >= -1 )
2377     {
2378         p_vlc->p_libvlc_global->i_verbose = __MIN( new_val.i_int, 2 );
2379     }
2380     return VLC_SUCCESS;
2381 }
2382
2383 /*****************************************************************************
2384  * InitDeviceValues: initialize device values
2385  *****************************************************************************
2386  * This function inits the dvd, vcd and cd-audio values
2387  *****************************************************************************/
2388 static void InitDeviceValues( libvlc_int_t *p_vlc )
2389 {
2390 #ifdef HAVE_HAL
2391     LibHalContext * ctx;
2392     int i, i_devices;
2393     char **devices;
2394     char *block_dev;
2395     dbus_bool_t b_dvd;
2396     DBusConnection *p_connection;
2397     DBusError       error;
2398
2399 #ifdef HAVE_HAL_1
2400     ctx =  libhal_ctx_new();
2401     if( !ctx ) return;
2402     dbus_error_init( &error );
2403     p_connection = dbus_bus_get ( DBUS_BUS_SYSTEM, &error );
2404     if( dbus_error_is_set( &error ) )
2405     {
2406         dbus_error_free( &error );
2407         return;
2408     }
2409     libhal_ctx_set_dbus_connection( ctx, p_connection );
2410     if( libhal_ctx_init( ctx, &error ) )
2411 #else
2412     if( ( ctx = hal_initialize( NULL, FALSE ) ) )
2413 #endif
2414     {
2415 #ifdef HAVE_HAL_1
2416         if( ( devices = libhal_get_all_devices( ctx, &i_devices, NULL ) ) )
2417 #else
2418         if( ( devices = hal_get_all_devices( ctx, &i_devices ) ) )
2419 #endif
2420         {
2421             for( i = 0; i < i_devices; i++ )
2422             {
2423 #ifdef HAVE_HAL_1
2424                 if( !libhal_device_property_exists( ctx, devices[i],
2425                                                 "storage.cdrom.dvd", NULL ) )
2426 #else
2427                 if( !hal_device_property_exists( ctx, devices[ i ],
2428                                                 "storage.cdrom.dvd" ) )
2429 #endif
2430                 {
2431                     continue;
2432                 }
2433 #ifdef HAVE_HAL_1
2434                 b_dvd = libhal_device_get_property_bool( ctx, devices[ i ],
2435                                                  "storage.cdrom.dvd", NULL  );
2436                 block_dev = libhal_device_get_property_string( ctx,
2437                                 devices[ i ], "block.device" , NULL );
2438 #else
2439                 b_dvd = hal_device_get_property_bool( ctx, devices[ i ],
2440                                                       "storage.cdrom.dvd" );
2441                 block_dev = hal_device_get_property_string( ctx, devices[ i ],
2442                                                             "block.device" );
2443 #endif
2444                 if( b_dvd )
2445                 {
2446                     config_PutPsz( p_vlc, "dvd", block_dev );
2447                 }
2448
2449                 config_PutPsz( p_vlc, "vcd", block_dev );
2450                 config_PutPsz( p_vlc, "cd-audio", block_dev );
2451 #ifdef HAVE_HAL_1
2452                 libhal_free_string( block_dev );
2453 #else
2454                 hal_free_string( block_dev );
2455 #endif
2456             }
2457 #ifdef HAVE_HAL_1
2458             libhal_free_string_array( devices );
2459 #else
2460             hal_free_string_array( devices );
2461 #endif
2462         }
2463
2464 #ifdef HAVE_HAL_1
2465         libhal_ctx_shutdown( ctx, NULL );
2466 #else
2467         hal_shutdown( ctx );
2468 #endif
2469     }
2470     else
2471     {
2472         msg_Warn( p_vlc, "Unable to get HAL device properties" );
2473     }
2474 #endif
2475 }