]> git.sesse.net Git - vlc/blob - src/libvlc.c
dbe0e9e2dffcf93eb8a9beec2950574a1ba7a1b0
[vlc] / src / libvlc.c
1 /*****************************************************************************
2  * libvlc.c: main libvlc source
3  *****************************************************************************
4  * Copyright (C) 1998-2002 VideoLAN
5  * $Id: libvlc.c,v 1.65 2003/02/19 10:02:57 gbazin Exp $
6  *
7  * Authors: Vincent Seguin <seguin@via.ecp.fr>
8  *          Samuel Hocevar <sam@zoy.org>
9  *          Gildas Bazin <gbazin@netcourrier.com>
10  *
11  * This program is free software; you can redistribute it and/or modify
12  * it under the terms of the GNU General Public License as published by
13  * the Free Software Foundation; either version 2 of the License, or
14  * (at your option) any later version.
15  *
16  * This program is distributed in the hope that it will be useful,
17  * but WITHOUT ANY WARRANTY; without even the implied warranty of
18  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
19  * GNU General Public License for more details.
20  *
21  * You should have received a copy of the GNU General Public License
22  * along with this program; if not, write to the Free Software
23  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111, USA.
24  *****************************************************************************/
25
26 /*****************************************************************************
27  * Pretend we are a builtin module
28  *****************************************************************************/
29 #define MODULE_NAME main
30 #define MODULE_PATH main
31 #define __BUILTIN__
32
33 /*****************************************************************************
34  * Preamble
35  *****************************************************************************/
36 #include <vlc/vlc.h>
37
38 #ifdef HAVE_ERRNO_H
39 #   include <errno.h>                                              /* ENOMEM */
40 #endif
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( _MSC_VER ) && 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 #include "vlc_cpu.h"                                        /* CPU detection */
64 #include "os_specific.h"
65
66 #include "error.h"
67 #include "netutils.h"                                 /* network_ChannelJoin */
68
69 #include "stream_control.h"
70 #include "input_ext-intf.h"
71
72 #include "vlc_playlist.h"
73 #include "interface.h"
74
75 #include "audio_output.h"
76
77 #include "video.h"
78 #include "video_output.h"
79
80 #include "libvlc.h"
81
82 /*****************************************************************************
83  * The evil global variable. We handle it with care, don't worry.
84  *****************************************************************************/
85 static libvlc_t libvlc;
86 static vlc_t *  p_static_vlc;
87
88 /*****************************************************************************
89  * Local prototypes
90  *****************************************************************************/
91 static void SetLanguage   ( char const * );
92 static int  GetFilenames  ( vlc_t *, int, char *[] );
93 static void Usage         ( vlc_t *, char const *psz_module_name );
94 static void ListModules   ( vlc_t * );
95 static void Version       ( void );
96
97 #ifdef WIN32
98 static void ShowConsole   ( void );
99 #endif
100 static int  ConsoleWidth  ( void );
101
102 /*****************************************************************************
103  * VLC_Version: return the libvlc version.
104  *****************************************************************************
105  * This function returns full version string (numeric version and codename).
106  *****************************************************************************/
107 char const * VLC_Version( void )
108 {
109     return VERSION_MESSAGE;
110 }
111
112 /*****************************************************************************
113  * VLC_Error: strerror() equivalent
114  *****************************************************************************
115  * This function returns full version string (numeric version and codename).
116  *****************************************************************************/
117 char const * VLC_Error( int i_err )
118 {
119     return vlc_error( i_err );
120 }
121
122 /*****************************************************************************
123  * VLC_Create: allocate a vlc_t structure, and initialize libvlc if needed.
124  *****************************************************************************
125  * This function allocates a vlc_t structure and returns a negative value
126  * in case of failure. Also, the thread system is initialized.
127  *****************************************************************************/
128 int VLC_Create( void )
129 {
130     int i_ret;
131     vlc_t * p_vlc = NULL;
132     vlc_value_t lockval;
133
134     /* vlc_threads_init *must* be the first internal call! No other call is
135      * allowed before the thread system has been initialized. */
136     i_ret = vlc_threads_init( &libvlc );
137     if( i_ret < 0 )
138     {
139         return i_ret;
140     }
141
142     /* Now that the thread system is initialized, we don't have much, but
143      * at least we have var_Create */
144     var_Create( &libvlc, "libvlc", VLC_VAR_MUTEX );
145     var_Get( &libvlc, "libvlc", &lockval );
146     vlc_mutex_lock( lockval.p_address );
147     if( !libvlc.b_ready )
148     {
149         char *psz_env;
150
151         /* Guess what CPU we have */
152         libvlc.i_cpu = CPUCapabilities();
153
154         /* Find verbosity from VLC_VERBOSE environment variable */
155         psz_env = getenv( "VLC_VERBOSE" );
156         libvlc.i_verbose = psz_env ? atoi( psz_env ) : -1;
157
158 #ifdef HAVE_ISATTY
159         libvlc.b_color = isatty( 2 ); /* 2 is for stderr */
160 #else
161         libvlc.b_color = VLC_FALSE;
162 #endif
163
164         /* Initialize message queue */
165         msg_Create( &libvlc );
166
167         /* Announce who we are */
168         msg_Dbg( &libvlc, COPYRIGHT_MESSAGE );
169         msg_Dbg( &libvlc, "libvlc was configured with %s", CONFIGURE_LINE );
170
171         /* The module bank will be initialized later */
172         libvlc.p_module_bank = NULL;
173
174         libvlc.b_ready = VLC_TRUE;
175     }
176     vlc_mutex_unlock( lockval.p_address );
177     var_Destroy( &libvlc, "libvlc" );
178
179     /* Allocate a vlc object */
180     p_vlc = vlc_object_create( &libvlc, VLC_OBJECT_VLC );
181     if( p_vlc == NULL )
182     {
183         return VLC_EGENERIC;
184     }
185
186     p_vlc->psz_object_name = "root";
187
188     /* Initialize mutexes */
189     vlc_mutex_init( p_vlc, &p_vlc->config_lock );
190
191     /* Store our newly allocated structure in the global list */
192     vlc_object_attach( p_vlc, &libvlc );
193
194     /* Store data for the non-reentrant API */
195     p_static_vlc = p_vlc;
196
197     return p_vlc->i_object_id;
198 }
199
200 /*****************************************************************************
201  * VLC_Init: initialize a vlc_t structure.
202  *****************************************************************************
203  * This function initializes a previously allocated vlc_t structure:
204  *  - CPU detection
205  *  - gettext initialization
206  *  - message queue, module bank and playlist initialization
207  *  - configuration and commandline parsing
208  *****************************************************************************/
209 int VLC_Init( int i_object, int i_argc, char *ppsz_argv[] )
210 {
211     char         p_capabilities[200];
212     char *       p_tmp;
213     char *       psz_modules;
214     char *       psz_parser;
215     vlc_bool_t   b_exit = VLC_FALSE;
216     vlc_t *      p_vlc;
217     module_t    *p_help_module;
218     playlist_t  *p_playlist;
219     vlc_value_t  lockval;
220
221     p_vlc = i_object ? vlc_object_get( &libvlc, i_object ) : p_static_vlc;
222
223     if( !p_vlc )
224     {
225         return VLC_ENOOBJ;
226     }
227
228     /*
229      * System specific initialization code
230      */
231     system_Init( p_vlc, &i_argc, ppsz_argv );
232
233     /* Get the executable name (similar to the basename command) */
234     if( i_argc > 0 )
235     {
236         p_vlc->psz_object_name = p_tmp = ppsz_argv[ 0 ];
237         while( *p_tmp )
238         {
239             if( *p_tmp == '/' ) p_vlc->psz_object_name = ++p_tmp;
240             else ++p_tmp;
241         }
242     }
243     else
244     {
245         p_vlc->psz_object_name = "vlc";
246     }
247
248     /*
249      * Support for gettext
250      */
251     SetLanguage( "" );
252
253     /* Translate "C" to the language code: "fr", "en_GB", "nl", "ru"... */
254     msg_Dbg( p_vlc, "translation test: code is \"%s\"", _("C") );
255
256     /* Initialize the module bank and load the configuration of the
257      * main module. We need to do this at this stage to be able to display
258      * a short help if required by the user. (short help == main module
259      * options) */
260     var_Create( &libvlc, "libvlc", VLC_VAR_MUTEX );
261     var_Get( &libvlc, "libvlc", &lockval );
262     vlc_mutex_lock( lockval.p_address );
263     if( libvlc.p_module_bank == NULL )
264     {
265         module_InitBank( &libvlc );
266         module_LoadMain( &libvlc );
267     }
268     vlc_mutex_unlock( lockval.p_address );
269     var_Destroy( &libvlc, "libvlc" );
270
271     /* Hack: insert the help module here */
272     p_help_module = vlc_object_create( p_vlc, VLC_OBJECT_MODULE );
273     if( p_help_module == NULL )
274     {
275         //module_EndBank( p_vlc );
276         if( i_object ) vlc_object_release( p_vlc );
277         return VLC_EGENERIC;
278     }
279     p_help_module->psz_object_name = "help";
280     config_Duplicate( p_help_module, p_help_config );
281     vlc_object_attach( p_help_module, libvlc.p_module_bank );
282     /* End hack */
283
284     if( config_LoadCmdLine( p_vlc, &i_argc, ppsz_argv, VLC_TRUE ) )
285     {
286         vlc_object_detach( p_help_module );
287         config_Free( p_help_module );
288         vlc_object_destroy( p_help_module );
289         //module_EndBank( p_vlc );
290         if( i_object ) vlc_object_release( p_vlc );
291         return VLC_EGENERIC;
292     }
293
294     /* Check for short help option */
295     if( config_GetInt( p_vlc, "help" ) )
296     {
297         fprintf( stdout, _("Usage: %s [options] [items]...\n\n"),
298                          p_vlc->psz_object_name );
299         Usage( p_vlc, "main" );
300         Usage( p_vlc, "help" );
301         b_exit = VLC_TRUE;
302     }
303     /* Check for version option */
304     else if( config_GetInt( p_vlc, "version" ) )
305     {
306         Version();
307         b_exit = VLC_TRUE;
308     }
309
310     /* Hack: remove the help module here */
311     vlc_object_detach( p_help_module );
312     /* End hack */
313
314     if( b_exit )
315     {
316         config_Free( p_help_module );
317         vlc_object_destroy( p_help_module );
318         //module_EndBank( p_vlc );
319         if( i_object ) vlc_object_release( p_vlc );
320         return VLC_EEXIT;
321     }
322
323     /*
324      * Load the builtins and plugins into the module_bank.
325      * We have to do it before config_Load*() because this also gets the
326      * list of configuration options exported by each module and loads their
327      * default values.
328      */
329     module_LoadBuiltins( &libvlc );
330     module_LoadPlugins( &libvlc );
331     msg_Dbg( p_vlc, "module bank initialized, found %i modules",
332                     libvlc.p_module_bank->i_children );
333
334     /* Hack: insert the help module here */
335     vlc_object_attach( p_help_module, libvlc.p_module_bank );
336     /* End hack */
337
338     /* Check for help on modules */
339     if( (p_tmp = config_GetPsz( p_vlc, "module" )) )
340     {
341         Usage( p_vlc, p_tmp );
342         free( p_tmp );
343         b_exit = VLC_TRUE;
344     }
345     /* Check for long help option */
346     else if( config_GetInt( p_vlc, "longhelp" ) )
347     {
348         Usage( p_vlc, NULL );
349         b_exit = VLC_TRUE;
350     }
351     /* Check for module list option */
352     else if( config_GetInt( p_vlc, "list" ) )
353     {
354         ListModules( p_vlc );
355         b_exit = VLC_TRUE;
356     }
357
358     /* Hack: remove the help module here */
359     vlc_object_detach( p_help_module );
360     config_Free( p_help_module );
361     vlc_object_destroy( p_help_module );
362     /* End hack */
363
364     if( b_exit )
365     {
366         //module_EndBank( p_vlc );
367         if( i_object ) vlc_object_release( p_vlc );
368         return VLC_EEXIT;
369     }
370
371     /*
372      * Override default configuration with config file settings
373      */
374     p_vlc->psz_homedir = config_GetHomeDir();
375     config_LoadConfigFile( p_vlc, NULL );
376
377     /*
378      * Override configuration with command line settings
379      */
380     if( config_LoadCmdLine( p_vlc, &i_argc, ppsz_argv, VLC_FALSE ) )
381     {
382 #ifdef WIN32
383         ShowConsole();
384         /* Pause the console because it's destroyed when we exit */
385         fprintf( stderr, "The command line options couldn't be loaded, check "
386                  "that they are valid.\nPress the RETURN key to continue..." );
387         getchar();
388 #endif
389         //module_EndBank( p_vlc );
390         if( i_object ) vlc_object_release( p_vlc );
391         return VLC_EGENERIC;
392     }
393
394     /*
395      * System specific configuration
396      */
397     system_Configure( p_vlc );
398
399     /*
400      * Message queue options
401      */
402     if( config_GetInt( p_vlc, "quiet" ) )
403     {
404         libvlc.i_verbose = -1;
405     }
406     else
407     {
408         int i_tmp = config_GetInt( p_vlc, "verbose" );
409         if( i_tmp >= 0 )
410         {
411             libvlc.i_verbose = __MIN( i_tmp, 2 );
412         }
413     }
414     libvlc.b_color = libvlc.b_color || config_GetInt( p_vlc, "color" );
415
416     /*
417      * Output messages that may still be in the queue
418      */
419     msg_Flush( p_vlc );
420
421     /* p_vlc initialization. FIXME ? */
422     p_vlc->i_desync = config_GetInt( p_vlc, "desync" ) * (mtime_t)1000;
423
424 #if defined( __i386__ )
425     if( !config_GetInt( p_vlc, "mmx" ) )
426         libvlc.i_cpu &= ~CPU_CAPABILITY_MMX;
427     if( !config_GetInt( p_vlc, "3dn" ) )
428         libvlc.i_cpu &= ~CPU_CAPABILITY_3DNOW;
429     if( !config_GetInt( p_vlc, "mmxext" ) )
430         libvlc.i_cpu &= ~CPU_CAPABILITY_MMXEXT;
431     if( !config_GetInt( p_vlc, "sse" ) )
432         libvlc.i_cpu &= ~CPU_CAPABILITY_SSE;
433 #endif
434 #if defined( __powerpc__ ) || defined( SYS_DARWIN )
435     if( !config_GetInt( p_vlc, "altivec" ) )
436         libvlc.i_cpu &= ~CPU_CAPABILITY_ALTIVEC;
437 #endif
438
439 #define PRINT_CAPABILITY( capability, string )                              \
440     if( libvlc.i_cpu & capability )                                         \
441     {                                                                       \
442         strncat( p_capabilities, string " ",                                \
443                  sizeof(p_capabilities) - strlen(p_capabilities) );         \
444         p_capabilities[sizeof(p_capabilities) - 1] = '\0';                  \
445     }
446
447     p_capabilities[0] = '\0';
448     PRINT_CAPABILITY( CPU_CAPABILITY_486, "486" );
449     PRINT_CAPABILITY( CPU_CAPABILITY_586, "586" );
450     PRINT_CAPABILITY( CPU_CAPABILITY_PPRO, "Pentium Pro" );
451     PRINT_CAPABILITY( CPU_CAPABILITY_MMX, "MMX" );
452     PRINT_CAPABILITY( CPU_CAPABILITY_3DNOW, "3DNow!" );
453     PRINT_CAPABILITY( CPU_CAPABILITY_MMXEXT, "MMXEXT" );
454     PRINT_CAPABILITY( CPU_CAPABILITY_SSE, "SSE" );
455     PRINT_CAPABILITY( CPU_CAPABILITY_ALTIVEC, "AltiVec" );
456     PRINT_CAPABILITY( CPU_CAPABILITY_FPU, "FPU" );
457     msg_Dbg( p_vlc, "CPU has capabilities %s", p_capabilities );
458
459     /*
460      * Choose the best memcpy module
461      */
462     p_vlc->p_memcpy_module = module_Need( p_vlc, "memcpy", "$memcpy" );
463
464     if( p_vlc->pf_memcpy == NULL )
465     {
466         p_vlc->pf_memcpy = memcpy;
467     }
468
469     if( p_vlc->pf_memset == NULL )
470     {
471         p_vlc->pf_memset = memset;
472     }
473
474     /*
475      * Initialize shared resources and libraries
476      */
477     if( config_GetInt( p_vlc, "network-channel" )
478          && network_ChannelCreate( p_vlc ) )
479     {
480         /* On error during Channels initialization, switch off channels */
481         msg_Warn( p_vlc,
482                   "channels initialization failed, deactivating channels" );
483         config_PutInt( p_vlc, "network-channel", VLC_FALSE );
484     }
485
486     /*
487      * Initialize playlist and get commandline files
488      */
489     p_playlist = playlist_Create( p_vlc );
490     if( !p_playlist )
491     {
492         msg_Err( p_vlc, "playlist initialization failed" );
493         if( p_vlc->p_memcpy_module != NULL )
494         {
495             module_Unneed( p_vlc, p_vlc->p_memcpy_module );
496         }
497         //module_EndBank( p_vlc );
498         if( i_object ) vlc_object_release( p_vlc );
499         return VLC_EGENERIC;
500     }
501
502     /*
503      * Load background interfaces
504      */
505     psz_modules = config_GetPsz( p_vlc, "extraintf" );
506     psz_parser = psz_modules;
507     while ( psz_parser && *psz_parser )
508     {
509         char *psz_module;
510         psz_module = psz_parser;
511         psz_parser = strchr( psz_module, ',' );
512         if ( psz_parser )
513         {
514             *psz_parser = '\0';
515             psz_parser++;
516         }
517         VLC_AddIntf( 0, psz_module, VLC_FALSE );
518     }
519     if ( psz_modules )
520     {
521         free( psz_modules );
522     }
523
524     /*
525      * FIXME: kludge to use a p_vlc-local variable for the Mozilla plugin
526      */
527     var_Create( p_vlc, "drawable", VLC_VAR_INTEGER );
528
529     /*
530      * Get input filenames given as commandline arguments
531      */
532     GetFilenames( p_vlc, i_argc, ppsz_argv );
533
534     if( i_object ) vlc_object_release( p_vlc );
535     return VLC_SUCCESS;
536 }
537
538 /*****************************************************************************
539  * VLC_AddIntf: add an interface
540  *****************************************************************************
541  * This function opens an interface plugin and runs it. If b_block is set
542  * to 0, VLC_AddIntf will return immediately and let the interface run in a
543  * separate thread. If b_block is set to 1, VLC_AddIntf will continue until
544  * user requests to quit.
545  *****************************************************************************/
546 int VLC_AddIntf( int i_object, char const *psz_module, vlc_bool_t b_block )
547 {
548     int i_err;
549     intf_thread_t *p_intf;
550     vlc_t *p_vlc;
551
552     p_vlc = i_object ? vlc_object_get( &libvlc, i_object ) : p_static_vlc;
553
554     if( !p_vlc )
555     {
556         return VLC_ENOOBJ;
557     }
558
559     /* Try to create the interface */
560     p_intf = intf_Create( p_vlc, psz_module ? psz_module : "$intf" );
561
562     if( p_intf == NULL )
563     {
564         msg_Err( p_vlc, "interface initialization failed" );
565         if( i_object ) vlc_object_release( p_vlc );
566         return VLC_EGENERIC;
567     }
568
569     /* Try to run the interface */
570     p_intf->b_block = b_block;
571     i_err = intf_RunThread( p_intf );
572     if( i_err )
573     {
574         vlc_object_detach( p_intf );
575         intf_Destroy( p_intf );
576         if( i_object ) vlc_object_release( p_vlc );
577         return i_err;
578     }
579
580     if( i_object ) vlc_object_release( p_vlc );
581     return VLC_SUCCESS;
582 }
583
584 /*****************************************************************************
585  * VLC_Destroy: stop playing and destroy everything.
586  *****************************************************************************
587  * This function requests the running threads to finish, waits for their
588  * termination, and destroys their structure.
589  *****************************************************************************/
590 int VLC_Destroy( int i_object )
591 {
592     vlc_t *p_vlc;
593
594     p_vlc = i_object ? vlc_object_get( &libvlc, i_object ) : p_static_vlc;
595
596     if( !p_vlc )
597     {
598         return VLC_ENOOBJ;
599     }
600
601     /*
602      * Go back into channel 0 which is the network
603      */
604     if( config_GetInt( p_vlc, "network-channel" ) && p_vlc->p_channel )
605     {
606         network_ChannelJoin( p_vlc, COMMON_CHANNEL );
607     }
608
609     /*
610      * Free allocated memory
611      */
612     if( p_vlc->p_memcpy_module )
613     {
614         module_Unneed( p_vlc, p_vlc->p_memcpy_module );
615         p_vlc->p_memcpy_module = NULL;
616     }
617
618     if( p_vlc->psz_homedir )
619     {
620         free( p_vlc->psz_homedir );
621         p_vlc->psz_homedir = NULL;
622     }
623
624     /*
625      * XXX: Free module bank !
626      */
627     //module_EndBank( p_vlc );
628
629     /*
630      * System specific cleaning code
631      */
632     system_End( p_vlc );
633
634     /* Destroy mutexes */
635     vlc_mutex_destroy( &p_vlc->config_lock );
636
637     vlc_object_detach( p_vlc );
638
639     /* Release object before destroying it */
640     if( i_object ) vlc_object_release( p_vlc );
641
642     vlc_object_destroy( p_vlc );
643
644     /* Stop thread system: last one out please shut the door! */
645     vlc_threads_end( &libvlc );
646
647     return VLC_SUCCESS;
648 }
649
650 /*****************************************************************************
651  * VLC_Die: ask vlc to die.
652  *****************************************************************************
653  * This function sets p_vlc->b_die to VLC_TRUE, but does not do any other
654  * task. It is your duty to call vlc_end and VLC_Destroy afterwards.
655  *****************************************************************************/
656 int VLC_Die( int i_object )
657 {
658     vlc_t *p_vlc;
659
660     p_vlc = i_object ? vlc_object_get( &libvlc, i_object ) : p_static_vlc;
661
662     if( !p_vlc )
663     {
664         return VLC_ENOOBJ;
665     }
666
667     p_vlc->b_die = VLC_TRUE;
668
669     if( i_object ) vlc_object_release( p_vlc );
670     return VLC_SUCCESS;
671 }
672
673 /*****************************************************************************
674  * VLC_AddTarget: adds a target for playing.
675  *****************************************************************************
676  * This function adds psz_target to the current playlist. If a playlist does
677  * not exist, it will create one.
678  *****************************************************************************/
679 int VLC_AddTarget( int i_object, char const *psz_target, int i_mode, int i_pos )
680 {
681     int i_err;
682     playlist_t *p_playlist;
683     vlc_t *p_vlc;
684
685     p_vlc = i_object ? vlc_object_get( &libvlc, i_object ) : p_static_vlc;
686
687     if( !p_vlc )
688     {
689         return VLC_ENOOBJ;
690     }
691
692     p_playlist = vlc_object_find( p_vlc, VLC_OBJECT_PLAYLIST, FIND_ANYWHERE );
693
694     if( p_playlist == NULL )
695     {
696         msg_Dbg( p_vlc, "no playlist present, creating one" );
697         p_playlist = playlist_Create( p_vlc );
698
699         if( p_playlist == NULL )
700         {
701             if( i_object ) vlc_object_release( p_vlc );
702             return VLC_EGENERIC;
703         }
704
705         vlc_object_yield( p_playlist );
706     }
707
708     i_err = playlist_Add( p_playlist, psz_target, i_mode, i_pos );
709
710     vlc_object_release( p_playlist );
711
712     if( i_object ) vlc_object_release( p_vlc );
713     return i_err;
714 }
715
716 /*****************************************************************************
717  * VLC_Set: set a vlc variable
718  *****************************************************************************
719  *
720  *****************************************************************************/
721 int VLC_Set( int i_object, char const *psz_var, vlc_value_t value )
722 {
723     vlc_t *p_vlc;
724     int i_ret;
725
726     p_vlc = i_object ? vlc_object_get( &libvlc, i_object ) : p_static_vlc;
727
728     if( !p_vlc )
729     {
730         return VLC_ENOOBJ;
731     }
732
733     /* FIXME: Temporary hack for Mozilla, if variable starts with conf:: then
734      * we handle it as a configuration variable. Don't tell Gildas :) -- sam */
735     if( !strncmp( psz_var, "conf::", 6 ) )
736     {
737         module_config_t *p_item;
738         char const *psz_newvar = psz_var + 6;
739
740         p_item = config_FindConfig( VLC_OBJECT(p_vlc), psz_newvar );
741
742         if( p_item )
743         {
744             switch( p_item->i_type )
745             {
746                 case CONFIG_ITEM_BOOL:
747                     config_PutInt( p_vlc, psz_newvar, value.b_bool );
748                     break;
749                 case CONFIG_ITEM_INTEGER:
750                     config_PutInt( p_vlc, psz_newvar, value.i_int );
751                     break;
752                 case CONFIG_ITEM_FLOAT:
753                     config_PutFloat( p_vlc, psz_newvar, value.f_float );
754                     break;
755                 default:
756                     config_PutPsz( p_vlc, psz_newvar, value.psz_string );
757                     break;
758             }
759             if( i_object ) vlc_object_release( p_vlc );
760             return VLC_SUCCESS;
761         }
762     }
763
764     i_ret = var_Set( p_vlc, psz_var, value );
765
766     if( i_object ) vlc_object_release( p_vlc );
767     return i_ret;
768 }
769
770 /*****************************************************************************
771  * VLC_Get: get a vlc variable
772  *****************************************************************************
773  *
774  *****************************************************************************/
775 int VLC_Get( int i_object, char const *psz_var, vlc_value_t *p_value )
776 {
777     vlc_t *p_vlc;
778     int i_ret;
779
780     p_vlc = i_object ? vlc_object_get( &libvlc, i_object ) : p_static_vlc;
781
782     if( !p_vlc )
783     {
784         return VLC_ENOOBJ;
785     }
786
787     i_ret = var_Get( p_vlc, psz_var, p_value );
788
789     if( i_object ) vlc_object_release( p_vlc );
790     return i_ret;
791 }
792
793 /* FIXME: temporary hacks */
794
795 /*****************************************************************************
796  * VLC_Play: play
797  *****************************************************************************/
798 int VLC_Play( int i_object )
799 {
800     playlist_t * p_playlist;
801     vlc_t *p_vlc;
802
803     p_vlc = i_object ? vlc_object_get( &libvlc, i_object ) : p_static_vlc;
804
805     /* Check that the handle is valid */
806     if( !p_vlc )
807     {
808         return VLC_ENOOBJ;
809     }
810
811     vlc_thread_set_priority( p_vlc, VLC_THREAD_PRIORITY_LOW );
812
813     p_playlist = vlc_object_find( p_vlc, VLC_OBJECT_PLAYLIST, FIND_CHILD );
814
815     if( !p_playlist )
816     {
817         if( i_object ) vlc_object_release( p_vlc );
818         return VLC_ENOOBJ;
819     }
820
821     vlc_mutex_lock( &p_playlist->object_lock );
822     if( p_playlist->i_size )
823     {
824         vlc_mutex_unlock( &p_playlist->object_lock );
825         playlist_Play( p_playlist );
826     }
827     else
828     {
829         vlc_mutex_unlock( &p_playlist->object_lock );
830     }
831
832     vlc_object_release( p_playlist );
833
834     if( i_object ) vlc_object_release( p_vlc );
835     return VLC_SUCCESS;
836 }
837
838 /*****************************************************************************
839  * VLC_Stop: stop
840  *****************************************************************************/
841 int VLC_Stop( int i_object )
842 {
843     intf_thread_t *   p_intf;
844     playlist_t    *   p_playlist;
845     vout_thread_t *   p_vout;
846     aout_instance_t * p_aout;
847     vlc_t *p_vlc;
848
849     p_vlc = i_object ? vlc_object_get( &libvlc, i_object ) : p_static_vlc;
850
851     /* Check that the handle is valid */
852     if( !p_vlc )
853     {
854         return VLC_ENOOBJ;
855     }
856
857     /*
858      * Ask the interfaces to stop and destroy them
859      */
860     msg_Dbg( p_vlc, "removing all interfaces" );
861     while( (p_intf = vlc_object_find( p_vlc, VLC_OBJECT_INTF, FIND_CHILD )) )
862     {
863         intf_StopThread( p_intf );
864         vlc_object_detach( p_intf );
865         vlc_object_release( p_intf );
866         intf_Destroy( p_intf );
867     }
868
869     /*
870      * Free playlists
871      */
872     msg_Dbg( p_vlc, "removing all playlists" );
873     while( (p_playlist = vlc_object_find( p_vlc, VLC_OBJECT_PLAYLIST,
874                                           FIND_CHILD )) )
875     {
876         vlc_object_detach( p_playlist );
877         vlc_object_release( p_playlist );
878         playlist_Destroy( p_playlist );
879     }
880
881     /*
882      * Free video outputs
883      */
884     msg_Dbg( p_vlc, "removing all video outputs" );
885     while( (p_vout = vlc_object_find( p_vlc, VLC_OBJECT_VOUT, FIND_CHILD )) )
886     {
887         vlc_object_detach( p_vout );
888         vlc_object_release( p_vout );
889         vout_Destroy( p_vout );
890     }
891
892     /*
893      * Free audio outputs
894      */
895     msg_Dbg( p_vlc, "removing all audio outputs" );
896     while( (p_aout = vlc_object_find( p_vlc, VLC_OBJECT_AOUT, FIND_CHILD )) )
897     {
898         vlc_object_detach( (vlc_object_t *)p_aout );
899         vlc_object_release( (vlc_object_t *)p_aout );
900         aout_Delete( p_aout );
901     }
902
903     if( i_object ) vlc_object_release( p_vlc );
904     return VLC_SUCCESS;
905 }
906
907 /*****************************************************************************
908  * VLC_Pause: toggle pause
909  *****************************************************************************/
910 int VLC_Pause( int i_object )
911 {
912     input_thread_t *p_input;
913     vlc_t *p_vlc;
914
915     p_vlc = i_object ? vlc_object_get( &libvlc, i_object ) : p_static_vlc;
916
917     if( !p_vlc )
918     {
919         return VLC_ENOOBJ;
920     }
921
922     p_input = vlc_object_find( p_vlc, VLC_OBJECT_INPUT, FIND_CHILD );
923
924     if( !p_input )
925     {
926         if( i_object ) vlc_object_release( p_vlc );
927         return VLC_ENOOBJ;
928     }
929
930     input_SetStatus( p_input, INPUT_STATUS_PAUSE );
931     vlc_object_release( p_input );
932
933     if( i_object ) vlc_object_release( p_vlc );
934     return VLC_SUCCESS;
935 }
936
937 /*****************************************************************************
938  * VLC_FullScreen: toggle fullscreen mode
939  *****************************************************************************/
940 int VLC_FullScreen( int i_object )
941 {
942     vout_thread_t *p_vout;
943     vlc_t *p_vlc;
944
945     p_vlc = i_object ? vlc_object_get( &libvlc, i_object ) : p_static_vlc;
946
947     if( !p_vlc )
948     {
949         return VLC_ENOOBJ;
950     }
951
952     p_vout = vlc_object_find( p_vlc, VLC_OBJECT_VOUT, FIND_CHILD );
953
954     if( !p_vout )
955     {
956         if( i_object ) vlc_object_release( p_vlc );
957         return VLC_ENOOBJ;
958     }
959
960     p_vout->i_changes |= VOUT_FULLSCREEN_CHANGE;
961     vlc_object_release( p_vout );
962
963     if( i_object ) vlc_object_release( p_vlc );
964     return VLC_SUCCESS;
965 }
966
967 /* following functions are local */
968
969 /*****************************************************************************
970  * SetLanguage: set the interface language.
971  *****************************************************************************
972  * We set the LC_MESSAGES locale category for interface messages and buttons,
973  * as well as the LC_CTYPE category for string sorting and possible wide
974  * character support.
975  *****************************************************************************/
976 static void SetLanguage ( char const *psz_lang )
977 {
978 #if defined( ENABLE_NLS ) \
979      && ( defined( HAVE_GETTEXT ) || defined( HAVE_INCLUDED_GETTEXT ) )
980
981     char *          psz_path;
982 #ifdef SYS_DARWIN
983     char            psz_tmp[1024];
984 #endif
985
986 #   if defined( HAVE_INCLUDED_GETTEXT ) && !defined( HAVE_LC_MESSAGES )
987     if( *psz_lang )
988     {
989         /* We set LC_ALL manually because it is the only way to set
990          * the language at runtime under eg. Windows. Beware that this
991          * makes the environment unconsistent when libvlc is unloaded and
992          * should probably be moved to a safer place like vlc.c. */
993         static char psz_lcall[20];
994         snprintf( psz_lcall, 19, "LC_ALL=%s", psz_lang );
995         psz_lcall[19] = '\0';
996         putenv( psz_lcall );
997     }
998 #   endif
999
1000 #   if defined( HAVE_LC_MESSAGES )
1001     setlocale( LC_MESSAGES, psz_lang );
1002 #   endif
1003     setlocale( LC_CTYPE, psz_lang );
1004
1005     /* Specify where to find the locales for current domain */
1006 #ifndef SYS_DARWIN
1007     psz_path = LOCALEDIR;
1008 #else
1009     snprintf( psz_tmp, sizeof(psz_tmp), "%s/%s", libvlc.psz_vlcpath,
1010               "locale" );
1011     psz_path = psz_tmp;
1012 #endif
1013     if( !bindtextdomain( PACKAGE, psz_path ) )
1014     {
1015         fprintf( stderr, "warning: no domain %s in directory %s\n",
1016                  PACKAGE, psz_path );
1017     }
1018
1019     /* Set the default domain */
1020     textdomain( PACKAGE );
1021 #endif
1022 }
1023
1024 /*****************************************************************************
1025  * GetFilenames: parse command line options which are not flags
1026  *****************************************************************************
1027  * Parse command line for input files.
1028  *****************************************************************************/
1029 static int GetFilenames( vlc_t *p_vlc, int i_argc, char *ppsz_argv[] )
1030 {
1031     int i_opt;
1032
1033     /* We assume that the remaining parameters are filenames */
1034     for( i_opt = i_argc - 1; i_opt > optind; i_opt-- )
1035     {
1036         /* TODO: write an internal function of this one, to avoid
1037          *       unnecessary lookups. */
1038         VLC_AddTarget( p_vlc->i_object_id, ppsz_argv[ i_opt ],
1039                        PLAYLIST_INSERT, 0 );
1040     }
1041
1042     /* If there is at least one target, play it */
1043     if( i_argc > optind )
1044     {
1045         VLC_AddTarget( p_vlc->i_object_id, ppsz_argv[ optind ],
1046                        PLAYLIST_INSERT | PLAYLIST_GO, 0 );
1047     }
1048
1049     return VLC_SUCCESS;
1050 }
1051
1052 /*****************************************************************************
1053  * Usage: print program usage
1054  *****************************************************************************
1055  * Print a short inline help. Message interface is initialized at this stage.
1056  *****************************************************************************/
1057 static void Usage( vlc_t *p_this, char const *psz_module_name )
1058 {
1059 #define FORMAT_STRING "  %s --%s%s%s%s%s%s%s "
1060     /* short option ------'    |     | | | |  | |
1061      * option name ------------'     | | | |  | |
1062      * <bra -------------------------' | | |  | |
1063      * option type or "" --------------' | |  | |
1064      * ket> -----------------------------' |  | |
1065      * padding spaces ---------------------'  | |
1066      * comment -------------------------------' |
1067      * comment suffix --------------------------'
1068      *
1069      * The purpose of having bra and ket is that we might i18n them as well.
1070      */
1071 #define LINE_START 8
1072 #define PADDING_SPACES 25
1073     vlc_list_t *p_list;
1074     module_t *p_parser;
1075     module_config_t *p_item;
1076     char psz_spaces[PADDING_SPACES+LINE_START+1];
1077     char psz_format[sizeof(FORMAT_STRING)];
1078     char psz_buffer[1000];
1079     char psz_short[4];
1080     int i_index;
1081     int i_width = ConsoleWidth() - (PADDING_SPACES+LINE_START+1);
1082
1083     memset( psz_spaces, ' ', PADDING_SPACES+LINE_START );
1084     psz_spaces[PADDING_SPACES+LINE_START] = '\0';
1085
1086     strcpy( psz_format, FORMAT_STRING );
1087
1088 #ifdef WIN32
1089     ShowConsole();
1090 #endif
1091
1092     /* List all modules */
1093     p_list = vlc_list_find( p_this, VLC_OBJECT_MODULE, FIND_ANYWHERE );
1094
1095     /* Enumerate the config for each module */
1096     for( i_index = 0; i_index < p_list->i_count; i_index++ )
1097     {
1098         vlc_bool_t b_help_module;
1099
1100         p_parser = (module_t *)p_list->p_values[i_index].p_object ;
1101
1102         if( psz_module_name && strcmp( psz_module_name,
1103                                        p_parser->psz_object_name ) )
1104         {
1105             continue;
1106         }
1107
1108         /* Ignore modules without config options */
1109         if( !p_parser->i_config_items )
1110         {
1111             continue;
1112         }
1113
1114         b_help_module = !strcmp( "help", p_parser->psz_object_name );
1115
1116         /* Print module options */
1117         for( p_item = p_parser->p_config;
1118              p_item->i_type != CONFIG_HINT_END;
1119              p_item++ )
1120         {
1121             char *psz_text;
1122             char *psz_bra = NULL, *psz_type = NULL, *psz_ket = NULL;
1123             char *psz_suf = "", *psz_prefix = NULL;
1124             int i;
1125
1126             switch( p_item->i_type )
1127             {
1128             case CONFIG_HINT_CATEGORY:
1129             case CONFIG_HINT_USAGE:
1130                 fprintf( stdout, " %s\n", p_item->psz_text );
1131                 break;
1132
1133             case CONFIG_ITEM_STRING:
1134             case CONFIG_ITEM_FILE:
1135             case CONFIG_ITEM_MODULE: /* We could also have "=<" here */
1136                 if( !p_item->ppsz_list )
1137                 {
1138                     psz_bra = " <"; psz_type = _("string"); psz_ket = ">";
1139                     break;
1140                 }
1141                 else
1142                 {
1143                     psz_bra = " {";
1144                     psz_type = psz_buffer;
1145                     psz_type[0] = '\0';
1146                     for( i = 0; p_item->ppsz_list[i]; i++ )
1147                     {
1148                         if( i ) strcat( psz_type, "," );
1149                         strcat( psz_type, p_item->ppsz_list[i] );
1150                     }
1151                     psz_ket = "}";
1152                     break;
1153                 }
1154             case CONFIG_ITEM_INTEGER:
1155                 psz_bra = " <"; psz_type = _("integer"); psz_ket = ">";
1156                 break;
1157             case CONFIG_ITEM_FLOAT:
1158                 psz_bra = " <"; psz_type = _("float"); psz_ket = ">";
1159                 break;
1160             case CONFIG_ITEM_BOOL:
1161                 psz_bra = ""; psz_type = ""; psz_ket = "";
1162                 if( !b_help_module )
1163                 {
1164                     psz_suf = p_item->i_value ? _(" (default enabled)") :
1165                                                 _(" (default disabled)");
1166                 }
1167                 break;
1168             }
1169
1170             if( !psz_type )
1171             {
1172                 continue;
1173             }
1174
1175             /* Add short option if any */
1176             if( p_item->i_short )
1177             {
1178                 sprintf( psz_short, "-%c,", p_item->i_short );
1179             }
1180             else
1181             {
1182                 strcpy( psz_short, "   " );
1183             }
1184
1185             i = PADDING_SPACES - strlen( p_item->psz_name )
1186                  - strlen( psz_bra ) - strlen( psz_type )
1187                  - strlen( psz_ket ) - 1;
1188
1189             if( p_item->i_type == CONFIG_ITEM_BOOL && !b_help_module )
1190             {
1191                 /* If option is of type --foo-bar, we print its counterpart
1192                  * as --no-foo-bar, but if it is of type --foobar (without
1193                  * dashes in the name) we print it as --nofoobar. Both
1194                  * values are of course valid, only the display changes. */
1195                 psz_prefix = strchr( p_item->psz_name, '-' ) ? ", --no-"
1196                                                              : ", --no";
1197                 i -= strlen( p_item->psz_name ) + strlen( psz_prefix );
1198             }
1199
1200             if( i < 0 )
1201             {
1202                 psz_spaces[0] = '\n';
1203                 i = 0;
1204             }
1205             else
1206             {
1207                 psz_spaces[i] = '\0';
1208             }
1209
1210             if( p_item->i_type == CONFIG_ITEM_BOOL && !b_help_module )
1211             {
1212                 fprintf( stdout, psz_format, psz_short, p_item->psz_name,
1213                          psz_prefix, p_item->psz_name, psz_bra, psz_type,
1214                          psz_ket, psz_spaces );
1215             }
1216             else
1217             {
1218                 fprintf( stdout, psz_format, psz_short, p_item->psz_name,
1219                          "", "", psz_bra, psz_type, psz_ket, psz_spaces );
1220             }
1221
1222             psz_spaces[i] = ' ';
1223
1224             /* We wrap the rest of the output */
1225             sprintf( psz_buffer, "%s%s", p_item->psz_text, psz_suf );
1226             psz_text = psz_buffer;
1227             while( *psz_text )
1228             {
1229                 char *psz_parser, *psz_word;
1230                 int i_end = strlen( psz_text );
1231
1232                 /* If the remaining text fits in a line, print it. */
1233                 if( i_end <= i_width )
1234                 {
1235                     fprintf( stdout, "%s\n", psz_text );
1236                     break;
1237                 }
1238
1239                 /* Otherwise, eat as many words as possible */
1240                 psz_parser = psz_text;
1241                 do
1242                 {
1243                     psz_word = psz_parser;
1244                     psz_parser = strchr( psz_word, ' ' );
1245                     /* If no space was found, we reached the end of the text
1246                      * block; otherwise, we skip the space we just found. */
1247                     psz_parser = psz_parser ? psz_parser + 1
1248                                             : psz_text + i_end;
1249
1250                 } while( psz_parser - psz_text <= i_width );
1251
1252                 /* We cut a word in one of these cases:
1253                  *  - it's the only word in the line and it's too long.
1254                  *  - we used less than 80% of the width and the word we are
1255                  *    going to wrap is longer than 40% of the width, and even
1256                  *    if the word would have fit in the next line. */
1257                 if( psz_word == psz_text
1258                      || ( psz_word - psz_text < 80 * i_width / 100
1259                            && psz_parser - psz_word > 40 * i_width / 100 ) )
1260                 {
1261                     char c = psz_text[i_width];
1262                     psz_text[i_width] = '\0';
1263                     fprintf( stdout, "%s\n%s", psz_text, psz_spaces );
1264                     psz_text += i_width;
1265                     psz_text[0] = c;
1266                 }
1267                 else
1268                 {
1269                     psz_word[-1] = '\0';
1270                     fprintf( stdout, "%s\n%s", psz_text, psz_spaces );
1271                     psz_text = psz_word;
1272                 }
1273             }
1274         }
1275     }
1276
1277     /* Release the module list */
1278     vlc_list_release( p_list );
1279
1280 #ifdef WIN32        /* Pause the console because it's destroyed when we exit */
1281     fprintf( stdout, _("\nPress the RETURN key to continue...\n") );
1282     getchar();
1283 #endif
1284 }
1285
1286 /*****************************************************************************
1287  * ListModules: list the available modules with their description
1288  *****************************************************************************
1289  * Print a list of all available modules (builtins and plugins) and a short
1290  * description for each one.
1291  *****************************************************************************/
1292 static void ListModules( vlc_t *p_this )
1293 {
1294     vlc_list_t *p_list;
1295     module_t *p_parser;
1296     char psz_spaces[22];
1297     int i_index;
1298
1299     memset( psz_spaces, ' ', 22 );
1300
1301 #ifdef WIN32
1302     ShowConsole();
1303 #endif
1304
1305     /* Usage */
1306     fprintf( stdout, _("Usage: %s [options] [items]...\n\n"),
1307                      p_this->p_vlc->psz_object_name );
1308
1309     fprintf( stdout, _("[module]              [description]\n") );
1310
1311     /* List all modules */
1312     p_list = vlc_list_find( p_this, VLC_OBJECT_MODULE, FIND_ANYWHERE );
1313
1314     /* Enumerate each module */
1315     for( i_index = 0; i_index < p_list->i_count; i_index++ )
1316     {
1317         int i;
1318
1319         p_parser = (module_t *)p_list->p_values[i_index].p_object ;
1320
1321         /* Nasty hack, but right now I'm too tired to think about a nice
1322          * solution */
1323         i = 22 - strlen( p_parser->psz_object_name ) - 1;
1324         if( i < 0 ) i = 0;
1325         psz_spaces[i] = 0;
1326
1327         fprintf( stdout, "  %s%s %s\n", p_parser->psz_object_name,
1328                          psz_spaces, p_parser->psz_longname );
1329
1330         psz_spaces[i] = ' ';
1331     }
1332
1333     vlc_list_release( p_list );
1334
1335 #ifdef WIN32        /* Pause the console because it's destroyed when we exit */
1336     fprintf( stdout, _("\nPress the RETURN key to continue...\n") );
1337     getchar();
1338 #endif
1339 }
1340
1341 /*****************************************************************************
1342  * Version: print complete program version
1343  *****************************************************************************
1344  * Print complete program version and build number.
1345  *****************************************************************************/
1346 static void Version( void )
1347 {
1348 #ifdef WIN32
1349     ShowConsole();
1350 #endif
1351
1352     fprintf( stdout, VERSION_MESSAGE "\n" );
1353     fprintf( stdout,
1354       _("This program comes with NO WARRANTY, to the extent permitted by "
1355         "law.\nYou may redistribute it under the terms of the GNU General "
1356         "Public License;\nsee the file named COPYING for details.\n"
1357         "Written by the VideoLAN team at Ecole Centrale, Paris.\n") );
1358
1359 #ifdef WIN32        /* Pause the console because it's destroyed when we exit */
1360     fprintf( stdout, _("\nPress the RETURN key to continue...\n") );
1361     getchar();
1362 #endif
1363 }
1364
1365 /*****************************************************************************
1366  * ShowConsole: On Win32, create an output console for debug messages
1367  *****************************************************************************
1368  * This function is useful only on Win32.
1369  *****************************************************************************/
1370 #ifdef WIN32 /*  */
1371 static void ShowConsole( void )
1372 {
1373 #   ifndef UNDER_CE
1374     AllocConsole();
1375     freopen( "CONOUT$", "w", stdout );
1376     freopen( "CONOUT$", "w", stderr );
1377     freopen( "CONIN$", "r", stdin );
1378 #   endif
1379     return;
1380 }
1381 #endif
1382
1383 /*****************************************************************************
1384  * ConsoleWidth: Return the console width in characters
1385  *****************************************************************************
1386  * We use the stty shell command to get the console width; if this fails or
1387  * if the width is less than 80, we default to 80.
1388  *****************************************************************************/
1389 static int ConsoleWidth( void )
1390 {
1391     int i_width = 80;
1392
1393 #ifndef WIN32
1394     char buf[20], *psz_parser;
1395     FILE *file;
1396     int i_ret;
1397
1398     file = popen( "stty size 2>/dev/null", "r" );
1399     if( file )
1400     {
1401         i_ret = fread( buf, 1, 20, file );
1402         if( i_ret > 0 )
1403         {
1404             buf[19] = '\0';
1405             psz_parser = strchr( buf, ' ' );
1406             if( psz_parser )
1407             {
1408                 i_ret = atoi( psz_parser + 1 );
1409                 if( i_ret >= 80 )
1410                 {
1411                     i_width = i_ret;
1412                 }
1413             }
1414         }
1415
1416         pclose( file );
1417     }
1418 #endif
1419
1420     return i_width;
1421 }
1422