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