]> git.sesse.net Git - vlc/blob - src/libvlc.c
* include/configuration.h: added a new flag to the configuration stucture to
[vlc] / src / libvlc.c
1 /*****************************************************************************
2  * libvlc.c: main libvlc source
3  *****************************************************************************
4  * Copyright (C) 1998-2002 VideoLAN
5  * $Id: libvlc.c,v 1.66 2003/02/20 01:52:46 sigmunau 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             if ( p_item->b_advanced && !config_GetInt( p_this, "advanced" ))
1126             {
1127                 continue;
1128             }
1129             switch( p_item->i_type )
1130             {
1131             case CONFIG_HINT_CATEGORY:
1132             case CONFIG_HINT_USAGE:
1133                 fprintf( stdout, " %s\n", p_item->psz_text );
1134                 break;
1135
1136             case CONFIG_ITEM_STRING:
1137             case CONFIG_ITEM_FILE:
1138             case CONFIG_ITEM_MODULE: /* We could also have "=<" here */
1139                 if( !p_item->ppsz_list )
1140                 {
1141                     psz_bra = " <"; psz_type = _("string"); psz_ket = ">";
1142                     break;
1143                 }
1144                 else
1145                 {
1146                     psz_bra = " {";
1147                     psz_type = psz_buffer;
1148                     psz_type[0] = '\0';
1149                     for( i = 0; p_item->ppsz_list[i]; i++ )
1150                     {
1151                         if( i ) strcat( psz_type, "," );
1152                         strcat( psz_type, p_item->ppsz_list[i] );
1153                     }
1154                     psz_ket = "}";
1155                     break;
1156                 }
1157             case CONFIG_ITEM_INTEGER:
1158                 psz_bra = " <"; psz_type = _("integer"); psz_ket = ">";
1159                 break;
1160             case CONFIG_ITEM_FLOAT:
1161                 psz_bra = " <"; psz_type = _("float"); psz_ket = ">";
1162                 break;
1163             case CONFIG_ITEM_BOOL:
1164                 psz_bra = ""; psz_type = ""; psz_ket = "";
1165                 if( !b_help_module )
1166                 {
1167                     psz_suf = p_item->i_value ? _(" (default enabled)") :
1168                                                 _(" (default disabled)");
1169                 }
1170                 break;
1171             }
1172
1173             if( !psz_type )
1174             {
1175                 continue;
1176             }
1177
1178             /* Add short option if any */
1179             if( p_item->i_short )
1180             {
1181                 sprintf( psz_short, "-%c,", p_item->i_short );
1182             }
1183             else
1184             {
1185                 strcpy( psz_short, "   " );
1186             }
1187
1188             i = PADDING_SPACES - strlen( p_item->psz_name )
1189                  - strlen( psz_bra ) - strlen( psz_type )
1190                  - strlen( psz_ket ) - 1;
1191
1192             if( p_item->i_type == CONFIG_ITEM_BOOL && !b_help_module )
1193             {
1194                 /* If option is of type --foo-bar, we print its counterpart
1195                  * as --no-foo-bar, but if it is of type --foobar (without
1196                  * dashes in the name) we print it as --nofoobar. Both
1197                  * values are of course valid, only the display changes. */
1198                 psz_prefix = strchr( p_item->psz_name, '-' ) ? ", --no-"
1199                                                              : ", --no";
1200                 i -= strlen( p_item->psz_name ) + strlen( psz_prefix );
1201             }
1202
1203             if( i < 0 )
1204             {
1205                 psz_spaces[0] = '\n';
1206                 i = 0;
1207             }
1208             else
1209             {
1210                 psz_spaces[i] = '\0';
1211             }
1212
1213             if( p_item->i_type == CONFIG_ITEM_BOOL && !b_help_module )
1214             {
1215                 fprintf( stdout, psz_format, psz_short, p_item->psz_name,
1216                          psz_prefix, p_item->psz_name, psz_bra, psz_type,
1217                          psz_ket, psz_spaces );
1218             }
1219             else
1220             {
1221                 fprintf( stdout, psz_format, psz_short, p_item->psz_name,
1222                          "", "", psz_bra, psz_type, psz_ket, psz_spaces );
1223             }
1224
1225             psz_spaces[i] = ' ';
1226
1227             /* We wrap the rest of the output */
1228             sprintf( psz_buffer, "%s%s", p_item->psz_text, psz_suf );
1229             psz_text = psz_buffer;
1230             while( *psz_text )
1231             {
1232                 char *psz_parser, *psz_word;
1233                 int i_end = strlen( psz_text );
1234
1235                 /* If the remaining text fits in a line, print it. */
1236                 if( i_end <= i_width )
1237                 {
1238                     fprintf( stdout, "%s\n", psz_text );
1239                     break;
1240                 }
1241
1242                 /* Otherwise, eat as many words as possible */
1243                 psz_parser = psz_text;
1244                 do
1245                 {
1246                     psz_word = psz_parser;
1247                     psz_parser = strchr( psz_word, ' ' );
1248                     /* If no space was found, we reached the end of the text
1249                      * block; otherwise, we skip the space we just found. */
1250                     psz_parser = psz_parser ? psz_parser + 1
1251                                             : psz_text + i_end;
1252
1253                 } while( psz_parser - psz_text <= i_width );
1254
1255                 /* We cut a word in one of these cases:
1256                  *  - it's the only word in the line and it's too long.
1257                  *  - we used less than 80% of the width and the word we are
1258                  *    going to wrap is longer than 40% of the width, and even
1259                  *    if the word would have fit in the next line. */
1260                 if( psz_word == psz_text
1261                      || ( psz_word - psz_text < 80 * i_width / 100
1262                            && psz_parser - psz_word > 40 * i_width / 100 ) )
1263                 {
1264                     char c = psz_text[i_width];
1265                     psz_text[i_width] = '\0';
1266                     fprintf( stdout, "%s\n%s", psz_text, psz_spaces );
1267                     psz_text += i_width;
1268                     psz_text[0] = c;
1269                 }
1270                 else
1271                 {
1272                     psz_word[-1] = '\0';
1273                     fprintf( stdout, "%s\n%s", psz_text, psz_spaces );
1274                     psz_text = psz_word;
1275                 }
1276             }
1277         }
1278     }
1279
1280     /* Release the module list */
1281     vlc_list_release( p_list );
1282
1283 #ifdef WIN32        /* Pause the console because it's destroyed when we exit */
1284     fprintf( stdout, _("\nPress the RETURN key to continue...\n") );
1285     getchar();
1286 #endif
1287 }
1288
1289 /*****************************************************************************
1290  * ListModules: list the available modules with their description
1291  *****************************************************************************
1292  * Print a list of all available modules (builtins and plugins) and a short
1293  * description for each one.
1294  *****************************************************************************/
1295 static void ListModules( vlc_t *p_this )
1296 {
1297     vlc_list_t *p_list;
1298     module_t *p_parser;
1299     char psz_spaces[22];
1300     int i_index;
1301
1302     memset( psz_spaces, ' ', 22 );
1303
1304 #ifdef WIN32
1305     ShowConsole();
1306 #endif
1307
1308     /* Usage */
1309     fprintf( stdout, _("Usage: %s [options] [items]...\n\n"),
1310                      p_this->p_vlc->psz_object_name );
1311
1312     fprintf( stdout, _("[module]              [description]\n") );
1313
1314     /* List all modules */
1315     p_list = vlc_list_find( p_this, VLC_OBJECT_MODULE, FIND_ANYWHERE );
1316
1317     /* Enumerate each module */
1318     for( i_index = 0; i_index < p_list->i_count; i_index++ )
1319     {
1320         int i;
1321
1322         p_parser = (module_t *)p_list->p_values[i_index].p_object ;
1323
1324         /* Nasty hack, but right now I'm too tired to think about a nice
1325          * solution */
1326         i = 22 - strlen( p_parser->psz_object_name ) - 1;
1327         if( i < 0 ) i = 0;
1328         psz_spaces[i] = 0;
1329
1330         fprintf( stdout, "  %s%s %s\n", p_parser->psz_object_name,
1331                          psz_spaces, p_parser->psz_longname );
1332
1333         psz_spaces[i] = ' ';
1334     }
1335
1336     vlc_list_release( p_list );
1337
1338 #ifdef WIN32        /* Pause the console because it's destroyed when we exit */
1339     fprintf( stdout, _("\nPress the RETURN key to continue...\n") );
1340     getchar();
1341 #endif
1342 }
1343
1344 /*****************************************************************************
1345  * Version: print complete program version
1346  *****************************************************************************
1347  * Print complete program version and build number.
1348  *****************************************************************************/
1349 static void Version( void )
1350 {
1351 #ifdef WIN32
1352     ShowConsole();
1353 #endif
1354
1355     fprintf( stdout, VERSION_MESSAGE "\n" );
1356     fprintf( stdout,
1357       _("This program comes with NO WARRANTY, to the extent permitted by "
1358         "law.\nYou may redistribute it under the terms of the GNU General "
1359         "Public License;\nsee the file named COPYING for details.\n"
1360         "Written by the VideoLAN team at Ecole Centrale, Paris.\n") );
1361
1362 #ifdef WIN32        /* Pause the console because it's destroyed when we exit */
1363     fprintf( stdout, _("\nPress the RETURN key to continue...\n") );
1364     getchar();
1365 #endif
1366 }
1367
1368 /*****************************************************************************
1369  * ShowConsole: On Win32, create an output console for debug messages
1370  *****************************************************************************
1371  * This function is useful only on Win32.
1372  *****************************************************************************/
1373 #ifdef WIN32 /*  */
1374 static void ShowConsole( void )
1375 {
1376 #   ifndef UNDER_CE
1377     AllocConsole();
1378     freopen( "CONOUT$", "w", stdout );
1379     freopen( "CONOUT$", "w", stderr );
1380     freopen( "CONIN$", "r", stdin );
1381 #   endif
1382     return;
1383 }
1384 #endif
1385
1386 /*****************************************************************************
1387  * ConsoleWidth: Return the console width in characters
1388  *****************************************************************************
1389  * We use the stty shell command to get the console width; if this fails or
1390  * if the width is less than 80, we default to 80.
1391  *****************************************************************************/
1392 static int ConsoleWidth( void )
1393 {
1394     int i_width = 80;
1395
1396 #ifndef WIN32
1397     char buf[20], *psz_parser;
1398     FILE *file;
1399     int i_ret;
1400
1401     file = popen( "stty size 2>/dev/null", "r" );
1402     if( file )
1403     {
1404         i_ret = fread( buf, 1, 20, file );
1405         if( i_ret > 0 )
1406         {
1407             buf[19] = '\0';
1408             psz_parser = strchr( buf, ' ' );
1409             if( psz_parser )
1410             {
1411                 i_ret = atoi( psz_parser + 1 );
1412                 if( i_ret >= 80 )
1413                 {
1414                     i_width = i_ret;
1415                 }
1416             }
1417         }
1418
1419         pclose( file );
1420     }
1421 #endif
1422
1423     return i_width;
1424 }
1425