Adds CONFIG_ITEM_PASSWORD for showing stars in preferences dialog (still to be implem...
[vlc.git] / src / modules / configuration.c
1 /*****************************************************************************
2  * configuration.c management of the modules configuration
3  *****************************************************************************
4  * Copyright (C) 2001-2007 the VideoLAN team
5  * $Id$
6  *
7  * Authors: Gildas Bazin <gbazin@videolan.org>
8  *
9  * This program is free software; you can redistribute it and/or modify
10  * it under the terms of the GNU General Public License as published by
11  * the Free Software Foundation; either version 2 of the License, or
12  * (at your option) any later version.
13  *
14  * This program is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17  * GNU General Public License for more details.
18  *
19  * You should have received a copy of the GNU General Public License
20  * along with this program; if not, write to the Free Software
21  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
22  *****************************************************************************/
23
24 #include <vlc/vlc.h>
25 #include "../libvlc.h"
26 #include "vlc_keys.h"
27 #include "vlc_charset.h"
28
29 #include <stdio.h>                                              /* sprintf() */
30 #include <stdlib.h>                                      /* free(), strtol() */
31 #include <string.h>                                              /* strdup() */
32 #include <errno.h>                                                  /* errno */
33
34 #ifdef HAVE_LIMITS_H
35 #   include <limits.h>
36 #endif
37
38 #ifdef HAVE_UNISTD_H
39 #    include <unistd.h>                                          /* getuid() */
40 #endif
41
42 #ifdef HAVE_GETOPT_LONG
43 #   ifdef HAVE_GETOPT_H
44 #       include <getopt.h>                                       /* getopt() */
45 #   endif
46 #else
47 #   include "../extras/getopt.h"
48 #endif
49
50 #if defined(HAVE_GETPWUID)
51 #   include <pwd.h>                                            /* getpwuid() */
52 #endif
53
54 #if defined( HAVE_SYS_STAT_H )
55 #   include <sys/stat.h>
56 #endif
57 #if defined( HAVE_SYS_TYPES_H )
58 #   include <sys/types.h>
59 #endif
60 #if defined( WIN32 )
61 #   if !defined( UNDER_CE )
62 #       include <direct.h>
63 #   endif
64 #include <tchar.h>
65 #endif
66
67 #include "configuration.h"
68 #include "modules/modules.h"
69
70 static int ConfigStringToKey( const char * );
71 static char *ConfigKeyToString( int );
72
73 static inline char *strdupnull (const char *src)
74 {
75     if (src == NULL)
76         return NULL;
77     return strdup (src);
78 }
79
80 static inline char *_strdupnull (const char *src)
81 {
82     if (src == NULL)
83         return NULL;
84     return strdup (_(src));
85 }
86
87 /* Item types that use a string value (i.e. serialized in the module cache) */
88 int IsConfigStringType (int type)
89 {
90     static const unsigned char config_types[] = 
91     {
92         CONFIG_ITEM_STRING, CONFIG_ITEM_FILE, CONFIG_ITEM_MODULE,
93         CONFIG_ITEM_DIRECTORY, CONFIG_ITEM_MODULE_CAT, CONFIG_ITEM_PASSWORD,
94         CONFIG_ITEM_MODULE_LIST, CONFIG_ITEM_MODULE_LIST_CAT
95     };
96
97     /* NOTE: this needs to be changed if we ever get more than 255 types */
98     return memchr (config_types, type, sizeof (config_types)) != NULL;
99 }
100
101
102 static int IsConfigIntegerType (int type)
103 {
104     static const unsigned char config_types[] = 
105     {
106         CONFIG_ITEM_INTEGER, CONFIG_ITEM_KEY, CONFIG_ITEM_BOOL,
107         CONFIG_CATEGORY, CONFIG_SUBCATEGORY
108     };
109
110     return memchr (config_types, type, sizeof (config_types)) != NULL;
111 }
112
113
114 static inline int IsConfigFloatType (int type)
115 {
116     return type == CONFIG_ITEM_FLOAT;
117 }
118
119
120 /*****************************************************************************
121  * config_GetType: get the type of a variable (bool, int, float, string)
122  *****************************************************************************
123  * This function is used to get the type of a variable from its name.
124  * Beware, this is quite slow.
125  *****************************************************************************/
126 int __config_GetType( vlc_object_t *p_this, const char *psz_name )
127 {
128     module_config_t *p_config;
129     int i_type;
130
131     p_config = config_FindConfig( p_this, psz_name );
132
133     /* sanity checks */
134     if( !p_config )
135     {
136         return 0;
137     }
138
139     switch( p_config->i_type )
140     {
141     case CONFIG_ITEM_BOOL:
142         i_type = VLC_VAR_BOOL;
143         break;
144
145     case CONFIG_ITEM_INTEGER:
146         i_type = VLC_VAR_INTEGER;
147         break;
148
149     case CONFIG_ITEM_FLOAT:
150         i_type = VLC_VAR_FLOAT;
151         break;
152
153     case CONFIG_ITEM_MODULE:
154     case CONFIG_ITEM_MODULE_CAT:
155     case CONFIG_ITEM_MODULE_LIST:
156     case CONFIG_ITEM_MODULE_LIST_CAT:
157         i_type = VLC_VAR_MODULE;
158         break;
159
160     case CONFIG_ITEM_STRING:
161         i_type = VLC_VAR_STRING;
162         break;
163
164     case CONFIG_ITEM_PASSWORD:
165         i_type = VLC_VAR_STRING;
166         break;
167
168     case CONFIG_ITEM_FILE:
169         i_type = VLC_VAR_FILE;
170         break;
171
172     case CONFIG_ITEM_DIRECTORY:
173         i_type = VLC_VAR_DIRECTORY;
174         break;
175
176     default:
177         i_type = 0;
178         break;
179     }
180
181     return i_type;
182 }
183
184 /*****************************************************************************
185  * config_GetInt: get the value of an int variable
186  *****************************************************************************
187  * This function is used to get the value of variables which are internally
188  * represented by an integer (CONFIG_ITEM_INTEGER and
189  * CONFIG_ITEM_BOOL).
190  *****************************************************************************/
191 int __config_GetInt( vlc_object_t *p_this, const char *psz_name )
192 {
193     module_config_t *p_config;
194
195     p_config = config_FindConfig( p_this, psz_name );
196
197     /* sanity checks */
198     if( !p_config )
199     {
200         msg_Err( p_this, "option %s does not exist", psz_name );
201         return -1;
202     }
203
204     if (!IsConfigIntegerType (p_config->i_type))
205     {
206         msg_Err( p_this, "option %s does not refer to an int", psz_name );
207         return -1;
208     }
209
210     return p_config->value.i;
211 }
212
213 /*****************************************************************************
214  * config_GetFloat: get the value of a float variable
215  *****************************************************************************
216  * This function is used to get the value of variables which are internally
217  * represented by a float (CONFIG_ITEM_FLOAT).
218  *****************************************************************************/
219 float __config_GetFloat( vlc_object_t *p_this, const char *psz_name )
220 {
221     module_config_t *p_config;
222
223     p_config = config_FindConfig( p_this, psz_name );
224
225     /* sanity checks */
226     if( !p_config )
227     {
228         msg_Err( p_this, "option %s does not exist", psz_name );
229         return -1;
230     }
231
232     if (!IsConfigFloatType (p_config->i_type))
233     {
234         msg_Err( p_this, "option %s does not refer to a float", psz_name );
235         return -1;
236     }
237
238     return p_config->value.f;
239 }
240
241 /*****************************************************************************
242  * config_GetPsz: get the string value of a string variable
243  *****************************************************************************
244  * This function is used to get the value of variables which are internally
245  * represented by a string (CONFIG_ITEM_STRING, CONFIG_ITEM_FILE,
246  * CONFIG_ITEM_DIRECTORY, CONFIG_ITEM_PASSWORD, and CONFIG_ITEM_MODULE).
247  *
248  * Important note: remember to free() the returned char* because it's a
249  *   duplicate of the actual value. It isn't safe to return a pointer to the
250  *   actual value as it can be modified at any time.
251  *****************************************************************************/
252 char * __config_GetPsz( vlc_object_t *p_this, const char *psz_name )
253 {
254     module_config_t *p_config;
255
256     p_config = config_FindConfig( p_this, psz_name );
257
258     /* sanity checks */
259     if( !p_config )
260     {
261         msg_Err( p_this, "option %s does not exist", psz_name );
262         return NULL;
263     }
264
265     if (!IsConfigStringType (p_config->i_type))
266     {
267         msg_Err( p_this, "option %s does not refer to a string", psz_name );
268         return NULL;
269     }
270
271     /* return a copy of the string */
272     vlc_mutex_lock( p_config->p_lock );
273     char *psz_value = strdupnull (p_config->value.psz);
274     vlc_mutex_unlock( p_config->p_lock );
275
276     return psz_value;
277 }
278
279 /*****************************************************************************
280  * config_PutPsz: set the string value of a string variable
281  *****************************************************************************
282  * This function is used to set the value of variables which are internally
283  * represented by a string (CONFIG_ITEM_STRING, CONFIG_ITEM_FILE,
284  * CONFIG_ITEM_DIRECTORY, CONFIG_ITEM_PASSWORD, and CONFIG_ITEM_MODULE).
285  *****************************************************************************/
286 void __config_PutPsz( vlc_object_t *p_this,
287                       const char *psz_name, const char *psz_value )
288 {
289     module_config_t *p_config;
290     vlc_value_t oldval, val;
291
292     p_config = config_FindConfig( p_this, psz_name );
293
294
295     /* sanity checks */
296     if( !p_config )
297     {
298         msg_Warn( p_this, "option %s does not exist", psz_name );
299         return;
300     }
301
302     if (!IsConfigStringType (p_config->i_type))
303     {
304         msg_Err( p_this, "option %s does not refer to a string", psz_name );
305         return;
306     }
307
308     vlc_mutex_lock( p_config->p_lock );
309
310     /* backup old value */
311     oldval.psz_string = (char *)p_config->value.psz;
312
313     if ((psz_value != NULL) && *psz_value)
314         p_config->value.psz = strdup (psz_value);
315     else
316         p_config->value.psz = NULL;
317
318     p_config->b_dirty = VLC_TRUE;
319
320     val.psz_string = (char *)p_config->value.psz;
321
322     vlc_mutex_unlock( p_config->p_lock );
323
324     if( p_config->pf_callback )
325     {
326         p_config->pf_callback( p_this, psz_name, oldval, val,
327                                p_config->p_callback_data );
328     }
329
330     /* free old string */
331     if( oldval.psz_string ) free( oldval.psz_string );
332 }
333
334 /*****************************************************************************
335  * config_PutInt: set the integer value of an int variable
336  *****************************************************************************
337  * This function is used to set the value of variables which are internally
338  * represented by an integer (CONFIG_ITEM_INTEGER and
339  * CONFIG_ITEM_BOOL).
340  *****************************************************************************/
341 void __config_PutInt( vlc_object_t *p_this, const char *psz_name, int i_value )
342 {
343     module_config_t *p_config;
344     vlc_value_t oldval, val;
345
346     p_config = config_FindConfig( p_this, psz_name );
347
348     /* sanity checks */
349     if( !p_config )
350     {
351         msg_Warn( p_this, "option %s does not exist", psz_name );
352         return;
353     }
354
355     if (!IsConfigIntegerType (p_config->i_type))
356     {
357         msg_Err( p_this, "option %s does not refer to an int", psz_name );
358         return;
359     }
360
361     /* backup old value */
362     oldval.i_int = p_config->value.i;
363
364     /* if i_min == i_max == 0, then do not use them */
365     if ((p_config->min.i == 0) && (p_config->max.i == 0))
366     {
367         p_config->value.i = i_value;
368     }
369     else if (i_value < p_config->min.i)
370     {
371         p_config->value.i = p_config->min.i;
372     }
373     else if (i_value > p_config->max.i)
374     {
375         p_config->value.i = p_config->max.i;
376     }
377     else
378     {
379         p_config->value.i = i_value;
380     }
381
382     p_config->b_dirty = VLC_TRUE;
383
384     val.i_int = p_config->value.i;
385
386     if( p_config->pf_callback )
387     {
388         p_config->pf_callback( p_this, psz_name, oldval, val,
389                                p_config->p_callback_data );
390     }
391 }
392
393 /*****************************************************************************
394  * config_PutFloat: set the value of a float variable
395  *****************************************************************************
396  * This function is used to set the value of variables which are internally
397  * represented by a float (CONFIG_ITEM_FLOAT).
398  *****************************************************************************/
399 void __config_PutFloat( vlc_object_t *p_this,
400                         const char *psz_name, float f_value )
401 {
402     module_config_t *p_config;
403     vlc_value_t oldval, val;
404
405     p_config = config_FindConfig( p_this, psz_name );
406
407     /* sanity checks */
408     if( !p_config )
409     {
410         msg_Warn( p_this, "option %s does not exist", psz_name );
411         return;
412     }
413
414     if (!IsConfigFloatType (p_config->i_type))
415     {
416         msg_Err( p_this, "option %s does not refer to a float", psz_name );
417         return;
418     }
419
420     /* backup old value */
421     oldval.f_float = p_config->value.f;
422
423     /* if f_min == f_max == 0, then do not use them */
424     if ((p_config->min.f == 0) && (p_config->max.f == 0))
425     {
426         p_config->value.f = f_value;
427     }
428     else if (f_value < p_config->min.f)
429     {
430         p_config->value.f = p_config->min.f;
431     }
432     else if (f_value > p_config->max.f)
433     {
434         p_config->value.f = p_config->max.f;
435     }
436     else
437     {
438         p_config->value.f = f_value;
439     }
440
441     p_config->b_dirty = VLC_TRUE;
442
443     val.f_float = p_config->value.f;
444
445     if( p_config->pf_callback )
446     {
447         p_config->pf_callback( p_this, psz_name, oldval, val,
448                                p_config->p_callback_data );
449     }
450 }
451
452 /*****************************************************************************
453  * config_FindConfig: find the config structure associated with an option.
454  *****************************************************************************
455  * FIXME: This function really needs to be optimized.
456  * FIXME: And now even more.
457  *****************************************************************************/
458 module_config_t *config_FindConfig( vlc_object_t *p_this, const char *psz_name )
459 {
460     vlc_list_t *p_list;
461     int i_index;
462
463     if( !psz_name ) return NULL;
464
465     p_list = vlc_list_find( p_this, VLC_OBJECT_MODULE, FIND_ANYWHERE );
466
467     for( i_index = 0; i_index < p_list->i_count; i_index++ )
468     {
469         module_config_t *p_item, *p_end;
470         module_t *p_parser = (module_t *)p_list->p_values[i_index].p_object;
471
472         if( !p_parser->i_config_items )
473             continue;
474
475         for( p_item = p_parser->p_config, p_end = p_item + p_parser->confsize;
476              p_item < p_end;
477              p_item++ )
478         {
479             if( p_item->i_type & CONFIG_HINT )
480                 /* ignore hints */
481                 continue;
482             if( !strcmp( psz_name, p_item->psz_name ) )
483             {
484                 vlc_list_release( p_list );
485                 return p_item;
486             }
487         }
488     }
489
490     vlc_list_release( p_list );
491
492     return NULL;
493 }
494
495 /*****************************************************************************
496  * config_FindModule: find a specific module structure.
497  *****************************************************************************/
498 module_t *config_FindModule( vlc_object_t *p_this, const char *psz_name )
499 {
500     vlc_list_t *p_list;
501     module_t *p_module, *p_result = NULL;
502     int i_index;
503
504     if( !psz_name ) return NULL;
505
506     p_list = vlc_list_find( p_this, VLC_OBJECT_MODULE, FIND_ANYWHERE );
507
508     for( i_index = 0; i_index < p_list->i_count; i_index++ )
509     {
510         p_module = (module_t *)p_list->p_values[i_index].p_object;
511         if( !strcmp( p_module->psz_object_name, psz_name ) )
512         {
513              p_result = p_module;
514              break;
515         }
516     }
517
518     vlc_list_release( p_list );
519
520     return p_result;
521 }
522
523 /*****************************************************************************
524  * config_Duplicate: creates a duplicate of a module's configuration data.
525  *****************************************************************************
526  * Unfortunatly we cannot work directly with the module's config data as
527  * this module might be unloaded from memory at any time (remember HideModule).
528  * This is why we need to create an exact copy of the config data.
529  *****************************************************************************/
530 int config_Duplicate( module_t *p_module, const module_config_t *p_orig,
531                       size_t n )
532 {
533     int j;
534     const module_config_t *p_item, *p_end = p_orig + n;
535
536     /* Calculate the structure length */
537     p_module->i_config_items = 0;
538     p_module->i_bool_items = 0;
539
540     for( p_item = p_orig; p_item < p_end; p_item++ )
541     {
542         if( p_item->i_type & CONFIG_ITEM )
543         {
544             p_module->i_config_items++;
545         }
546
547         if( p_item->i_type == CONFIG_ITEM_BOOL )
548         {
549             p_module->i_bool_items++;
550         }
551     }
552
553     /* Allocate memory */
554     p_module->p_config = (module_config_t *)calloc( n, sizeof(*p_orig) );
555     if( p_module->p_config == NULL )
556     {
557         msg_Err( p_module, "config error: can't duplicate p_config" );
558         return VLC_ENOMEM;
559     }
560     p_module->confsize = n;
561
562     /* Do the duplication job */
563     for( size_t i = 0; i < n ; i++ )
564     {
565         p_module->p_config[i] = p_orig[i];
566
567         if (IsConfigIntegerType (p_module->p_config[i].i_type))
568         {
569             p_module->p_config[i].orig.i = p_orig[i].value.i;
570             p_module->p_config[i].saved.i = p_orig[i].value.i;
571         }
572         else
573         if (IsConfigFloatType (p_module->p_config[i].i_type))
574         {
575             p_module->p_config[i].orig.f = p_orig[i].value.f;
576             p_module->p_config[i].saved.f = p_orig[i].value.f;
577         }
578         else
579         if (IsConfigStringType (p_module->p_config[i].i_type))
580         {
581             p_module->p_config[i].value.psz = strdupnull (p_orig[i].value.psz);
582             p_module->p_config[i].orig.psz = strdupnull (p_orig[i].value.psz);
583             p_module->p_config[i].saved.psz = NULL;
584         }
585
586         p_module->p_config[i].psz_type = strdupnull (p_orig[i].psz_type);
587         p_module->p_config[i].psz_name = strdupnull (p_orig[i].psz_name);
588         p_module->p_config[i].psz_current = strdupnull (p_orig[i].psz_current);
589         p_module->p_config[i].psz_text = _strdupnull (p_orig[i].psz_text);
590         p_module->p_config[i].psz_longtext = _strdupnull (p_orig[i].psz_longtext);
591
592         p_module->p_config[i].p_lock = &p_module->object_lock;
593
594         /* duplicate the string list */
595         if( p_orig[i].i_list )
596         {
597             if( p_orig[i].ppsz_list )
598             {
599                 p_module->p_config[i].ppsz_list =
600                     malloc( (p_orig[i].i_list + 1) * sizeof(char *) );
601                 if( p_module->p_config[i].ppsz_list )
602                 {
603                     for( j = 0; j < p_orig[i].i_list; j++ )
604                         p_module->p_config[i].ppsz_list[j] =
605                                 strdupnull (p_orig[i].ppsz_list[j]);
606                     p_module->p_config[i].ppsz_list[j] = NULL;
607                 }
608             }
609             if( p_orig[i].ppsz_list_text )
610             {
611                 p_module->p_config[i].ppsz_list_text =
612                     calloc( (p_orig[i].i_list + 1), sizeof(char *) );
613                 if( p_module->p_config[i].ppsz_list_text )
614                 {
615                     for( j = 0; j < p_orig[i].i_list; j++ )
616                         p_module->p_config[i].ppsz_list_text[j] =
617                                 strdupnull (_(p_orig[i].ppsz_list_text[j]));
618                     p_module->p_config[i].ppsz_list_text[j] = NULL;
619                 }
620             }
621             if( p_orig[i].pi_list )
622             {
623                 p_module->p_config[i].pi_list =
624                     malloc( (p_orig[i].i_list + 1) * sizeof(int) );
625                 if( p_module->p_config[i].pi_list )
626                 {
627                     for( j = 0; j < p_orig[i].i_list; j++ )
628                         p_module->p_config[i].pi_list[j] =
629                             p_orig[i].pi_list[j];
630                 }
631             }
632         }
633
634         /* duplicate the actions list */
635         if( p_orig[i].i_action )
636         {
637             int j;
638
639             p_module->p_config[i].ppf_action =
640                 malloc( p_orig[i].i_action * sizeof(void *) );
641             p_module->p_config[i].ppsz_action_text =
642                 malloc( p_orig[i].i_action * sizeof(char *) );
643
644             for( j = 0; j < p_orig[i].i_action; j++ )
645             {
646                 p_module->p_config[i].ppf_action[j] =
647                     p_orig[i].ppf_action[j];
648                 p_module->p_config[i].ppsz_action_text[j] =
649                     strdupnull (p_orig[i].ppsz_action_text[j]);
650             }
651         }
652
653         p_module->p_config[i].pf_callback = p_orig[i].pf_callback;
654     }
655     return VLC_SUCCESS;
656 }
657
658
659 /*****************************************************************************
660  * config_Free: frees a duplicated module's configuration data.
661  *****************************************************************************
662  * This function frees all the data duplicated by config_Duplicate.
663  *****************************************************************************/
664 void config_Free( module_t *p_module )
665 {
666     int i;
667
668     for (size_t j = 0; j < p_module->confsize; j++)
669     {
670         module_config_t *p_item = p_module->p_config + j;
671
672         free( (char*) p_item->psz_type );
673         free( (char*) p_item->psz_name );
674         free( (char*) p_item->psz_current );
675         free( (char*) p_item->psz_text );
676         free( (char*) p_item->psz_longtext );
677
678         if (IsConfigStringType (p_item->i_type))
679         {
680             free ((char *)p_item->value.psz);
681             free ((char *)p_item->orig.psz);
682             free ((char *)p_item->saved.psz);
683         }
684
685         if( p_item->i_list )
686         {
687             for( i = 0; i < p_item->i_list; i++ )
688             {
689                 if( p_item->ppsz_list && p_item->ppsz_list[i] )
690                     free( (char*) p_item->ppsz_list[i] );
691                 if( p_item->ppsz_list_text && p_item->ppsz_list_text[i] )
692                     free( (char*) p_item->ppsz_list_text[i] );
693             }
694             if( p_item->ppsz_list ) free( p_item->ppsz_list );
695             if( p_item->ppsz_list_text ) free( p_item->ppsz_list_text );
696             if( p_item->pi_list ) free( p_item->pi_list );
697         }
698
699         if( p_item->i_action )
700         {
701             for( i = 0; i < p_item->i_action; i++ )
702             {
703                 free( (char*) p_item->ppsz_action_text[i] );
704             }
705             if( p_item->ppf_action ) free( p_item->ppf_action );
706             if( p_item->ppsz_action_text ) free( p_item->ppsz_action_text );
707         }
708     }
709
710     if (p_module->p_config != NULL)
711     {
712         free (p_module->p_config);
713         p_module->p_config = NULL;
714     }
715 }
716
717 /*****************************************************************************
718  * config_SetCallbacks: sets callback functions in the duplicate p_config.
719  *****************************************************************************
720  * Unfortunatly we cannot work directly with the module's config data as
721  * this module might be unloaded from memory at any time (remember HideModule).
722  * This is why we need to duplicate callbacks each time we reload the module.
723  *****************************************************************************/
724 void config_SetCallbacks( module_config_t *p_new, module_config_t *p_orig,
725                           size_t n )
726 {
727     for (size_t i = 0; i < n; i++)
728     {
729         p_new->pf_callback = p_orig->pf_callback;
730         p_new++;
731         p_orig++;
732     }
733 }
734
735 /*****************************************************************************
736  * config_UnsetCallbacks: unsets callback functions in the duplicate p_config.
737  *****************************************************************************
738  * We simply undo what we did in config_SetCallbacks.
739  *****************************************************************************/
740 void config_UnsetCallbacks( module_config_t *p_new, size_t n )
741 {
742     for (size_t i = 0; i < n; i++)
743     {
744         p_new->pf_callback = NULL;
745         p_new++;
746     }
747 }
748
749 /*****************************************************************************
750  * config_ResetAll: reset the configuration data for all the modules.
751  *****************************************************************************/
752 void __config_ResetAll( vlc_object_t *p_this )
753 {
754     int i_index;
755     vlc_list_t *p_list;
756     module_t *p_module;
757
758     /* Acquire config file lock */
759     vlc_mutex_lock( &p_this->p_libvlc->config_lock );
760
761     p_list = vlc_list_find( p_this, VLC_OBJECT_MODULE, FIND_ANYWHERE );
762
763     for( i_index = 0; i_index < p_list->i_count; i_index++ )
764     {
765         p_module = (module_t *)p_list->p_values[i_index].p_object ;
766         if( p_module->b_submodule ) continue;
767
768         for (size_t i = 0; i < p_module->confsize; i++ )
769         {
770             if (IsConfigIntegerType (p_module->p_config[i].i_type))
771                 p_module->p_config[i].value.i = p_module->p_config[i].orig.i;
772             else
773             if (IsConfigFloatType (p_module->p_config[i].i_type))
774                 p_module->p_config[i].value.f = p_module->p_config[i].orig.f;
775             else
776             if (IsConfigStringType (p_module->p_config[i].i_type))
777             {
778                 free ((char *)p_module->p_config[i].value.psz);
779                 p_module->p_config[i].value.psz =
780                         strdupnull (p_module->p_config[i].orig.psz);
781             }
782         }
783     }
784
785     vlc_list_release( p_list );
786     vlc_mutex_unlock( &p_this->p_libvlc->config_lock );
787 }
788
789
790 static FILE *config_OpenConfigFile( vlc_object_t *p_obj, const char *mode )
791 {
792     static const char psz_subpath[] = DIR_SEP CONFIG_DIR DIR_SEP CONFIG_FILE;
793     const char *psz_filename = p_obj->p_libvlc->psz_configfile;
794     const char *psz_homedir;
795     size_t i_buflen = 0;
796     FILE *p_stream;
797
798     if( psz_filename == NULL )
799     {
800         psz_homedir = p_obj->p_libvlc->psz_homedir;
801         if( psz_homedir == NULL )
802         {
803             msg_Err( p_obj, "no home directory defined" );
804             return NULL;
805         }
806
807         i_buflen = strlen(psz_homedir) + sizeof(psz_subpath) + 1;
808     }
809
810     char buf[i_buflen];
811     if( psz_filename == NULL )
812     {
813         sprintf( buf, "%s%s", psz_homedir, psz_subpath );
814         psz_filename = buf;
815     }
816
817     msg_Dbg( p_obj, "opening config file (%s)", psz_filename );
818     p_stream = utf8_fopen( psz_filename, mode );
819     if( p_stream == NULL && errno != ENOENT )
820         msg_Err( p_obj, "cannot open config file (%s): %s", psz_filename, strerror(errno) );
821
822     return p_stream;
823 }
824
825
826 static int strtoi (const char *str)
827 {
828     char *end;
829     long l;
830
831     errno = 0;
832     l = strtol (str, &end, 0);
833
834     if (!errno)
835     {
836         if ((l > INT_MAX) || (l < INT_MIN))
837             errno = ERANGE;
838         if (*end)
839             errno = EINVAL;
840     }
841     return (int)l;
842 }
843
844
845 /*****************************************************************************
846  * config_LoadConfigFile: loads the configuration file.
847  *****************************************************************************
848  * This function is called to load the config options stored in the config
849  * file.
850  *****************************************************************************/
851 int __config_LoadConfigFile( vlc_object_t *p_this, const char *psz_module_name )
852 {
853     vlc_list_t *p_list;
854     FILE *file;
855
856     file = config_OpenConfigFile (p_this, "rt");
857     if (file == NULL)
858         return VLC_EGENERIC;
859
860     /* Acquire config file lock */
861     vlc_mutex_lock( &p_this->p_libvlc->config_lock );
862
863     /* Look for the selected module, if NULL then save everything */
864     p_list = vlc_list_find( p_this, VLC_OBJECT_MODULE, FIND_ANYWHERE );
865
866     /* Look for UTF-8 Byte Order Mark */
867     char * (*convert) (const char *) = strdupnull;
868     char bom[3];
869
870     if ((fread (bom, 1, 3, file) != 3)
871      || memcmp (bom, "\xEF\xBB\xBF", 3))
872     {
873         convert = FromLocaleDup;
874         rewind (file); /* no BOM, rewind */
875     }
876
877     module_t *module = NULL;
878     char line[1024], section[1022];
879     section[0] = '\0';
880
881     while (fgets (line, 1024, file) != NULL)
882     {
883         /* Ignore comments and empty lines */
884         switch (line[0])
885         {
886             case '#':
887             case '\n':
888             case '\0':
889                 continue;
890         }
891
892         if (line[0] == '[')
893         {
894             char *ptr = strchr (line, ']');
895             if (ptr == NULL)
896                 continue; /* syntax error; */
897             *ptr = '\0';
898
899             /* New section ( = a given module) */
900             strcpy (section, line + 1);
901             module = NULL;
902
903             if ((psz_module_name == NULL)
904              || (strcmp (psz_module_name, section) == 0))
905             {
906                 for (int i = 0; i < p_list->i_count; i++)
907                 {
908                     module_t *m = (module_t *)p_list->p_values[i].p_object;
909
910                     if ((strcmp (section, m->psz_object_name) == 0)
911                      && (m->i_config_items > 0)) /* ignore config-less modules */
912                     {
913                         module = m;
914                         if (psz_module_name != NULL)
915                             msg_Dbg (p_this,
916                                      "loading config for module \"%s\"",
917                                      section);
918                         break;
919                     }
920                 }
921             }
922
923             continue;
924         }
925
926         if (module == NULL)
927             continue; /* no need to parse if there is no matching module */
928
929         char *ptr = strchr (line, '\n');
930         if (ptr != NULL)
931             *ptr = '\0';
932
933         /* look for option name */
934         const char *psz_option_name = line;
935
936         ptr = strchr (line, '=');
937         if (ptr == NULL)
938             continue; /* syntax error */
939
940         *ptr = '\0';
941         const char *psz_option_value = ptr + 1;
942
943         /* try to match this option with one of the module's options */
944         for (size_t i = 0; i < module->confsize; i++)
945         {
946             module_config_t *p_item = module->p_config + i;
947
948             if ((p_item->i_type & CONFIG_HINT)
949              || strcmp (p_item->psz_name, psz_option_name))
950                 continue;
951
952             /* We found it */
953             errno = 0;
954
955             switch( p_item->i_type )
956             {
957                 case CONFIG_ITEM_BOOL:
958                 case CONFIG_ITEM_INTEGER:
959                 {
960                     long l = strtoi (psz_option_value);
961                     if (errno)
962                         msg_Warn (p_this, "Integer value (%s) for %s: %s",
963                                   psz_option_value, psz_option_name,
964                                   strerror (errno));
965                     else
966                         p_item->saved.i = p_item->value.i = (int)l;
967                     break;
968                 }
969
970                 case CONFIG_ITEM_FLOAT:
971                     if( !*psz_option_value )
972                         break;                    /* ignore empty option */
973                     p_item->value.f = (float)i18n_atof( psz_option_value);
974                     p_item->saved.f = p_item->value.f;
975                     break;
976
977                 case CONFIG_ITEM_KEY:
978                     if( !*psz_option_value )
979                         break;                    /* ignore empty option */
980                     p_item->value.i = ConfigStringToKey(psz_option_value);
981                     p_item->saved.i = p_item->value.i;
982                     break;
983
984                 default:
985                     vlc_mutex_lock( p_item->p_lock );
986
987                     /* free old string */
988                     free( (char*) p_item->value.psz );
989                     free( (char*) p_item->saved.psz );
990
991                     p_item->value.psz = convert (psz_option_value);
992                     p_item->saved.psz = strdupnull (p_item->value.psz);
993
994                     vlc_mutex_unlock( p_item->p_lock );
995                     break;
996             }
997
998             break;
999         }
1000     }
1001
1002     if (ferror (file))
1003     {
1004         msg_Err (p_this, "error reading configuration: %s", strerror (errno));
1005         clearerr (file);
1006     }
1007     fclose (file);
1008
1009     vlc_list_release( p_list );
1010
1011     vlc_mutex_unlock( &p_this->p_libvlc->config_lock );
1012     return 0;
1013 }
1014
1015 /*****************************************************************************
1016  * config_CreateDir: Create configuration directory if it doesn't exist.
1017  *****************************************************************************/
1018 int config_CreateDir( vlc_object_t *p_this, const char *psz_dirname )
1019 {
1020     if( !psz_dirname && !*psz_dirname ) return -1;
1021
1022     if( utf8_mkdir( psz_dirname ) && ( errno != EEXIST ) )
1023     {
1024         msg_Err( p_this, "could not create %s (%s)",
1025                  psz_dirname, strerror(errno) );
1026         return -1;
1027     }
1028
1029     return 0;
1030 }
1031
1032 /*****************************************************************************
1033  * config_SaveConfigFile: Save a module's config options.
1034  *****************************************************************************
1035  * This will save the specified module's config options to the config file.
1036  * If psz_module_name is NULL then we save all the modules config options.
1037  * It's no use to save the config options that kept their default values, so
1038  * we'll try to be a bit clever here.
1039  *
1040  * When we save we mustn't delete the config options of the modules that
1041  * haven't been loaded. So we cannot just create a new config file with the
1042  * config structures we've got in memory.
1043  * I don't really know how to deal with this nicely, so I will use a completly
1044  * dumb method ;-)
1045  * I will load the config file in memory, but skipping all the sections of the
1046  * modules we want to save. Then I will create a brand new file, dump the file
1047  * loaded in memory and then append the sections of the modules we want to
1048  * save.
1049  * Really stupid no ?
1050  *****************************************************************************/
1051 static int SaveConfigFile( vlc_object_t *p_this, const char *psz_module_name,
1052                            vlc_bool_t b_autosave )
1053 {
1054     module_t *p_parser;
1055     vlc_list_t *p_list;
1056     FILE *file;
1057     char p_line[1024], *p_index2;
1058     int i_sizebuf = 0;
1059     char *p_bigbuffer, *p_index;
1060     vlc_bool_t b_backup;
1061     int i_index;
1062
1063     /* Acquire config file lock */
1064     vlc_mutex_lock( &p_this->p_libvlc->config_lock );
1065
1066     if (p_this->p_libvlc->psz_configfile == NULL)
1067     {
1068         const char *psz_homedir = p_this->p_libvlc->psz_homedir;
1069         if( !psz_homedir )
1070         {
1071             msg_Err( p_this, "no home directory defined" );
1072             vlc_mutex_unlock( &p_this->p_libvlc->config_lock );
1073             return -1;
1074         }
1075
1076         char dirname[strlen (psz_homedir) + sizeof (DIR_SEP CONFIG_DIR)];
1077         sprintf (dirname, "%s" DIR_SEP CONFIG_DIR, psz_homedir);
1078         config_CreateDir (p_this, dirname);
1079     }
1080
1081     file = config_OpenConfigFile (p_this, "rt");
1082     if (file != NULL)
1083     {
1084         /* look for file size */
1085         fseek( file, 0L, SEEK_END );
1086         i_sizebuf = ftell( file );
1087         fseek( file, 0L, SEEK_SET );
1088     }
1089
1090     p_bigbuffer = p_index = malloc( i_sizebuf+1 );
1091     if( !p_bigbuffer )
1092     {
1093         msg_Err( p_this, "out of memory" );
1094         if( file ) fclose( file );
1095         vlc_mutex_unlock( &p_this->p_libvlc->config_lock );
1096         return -1;
1097     }
1098     p_bigbuffer[0] = 0;
1099
1100     /* List all available modules */
1101     p_list = vlc_list_find( p_this, VLC_OBJECT_MODULE, FIND_ANYWHERE );
1102
1103     /* backup file into memory, we only need to backup the sections we won't
1104      * save later on */
1105     b_backup = 0;
1106     while( file && fgets( p_line, 1024, file ) )
1107     {
1108         if( (p_line[0] == '[') && (p_index2 = strchr(p_line,']')))
1109         {
1110
1111             /* we found a section, check if we need to do a backup */
1112             for( i_index = 0; i_index < p_list->i_count; i_index++ )
1113             {
1114                 p_parser = (module_t *)p_list->p_values[i_index].p_object ;
1115
1116                 if( ((p_index2 - &p_line[1])
1117                        == (int)strlen(p_parser->psz_object_name) )
1118                     && !memcmp( &p_line[1], p_parser->psz_object_name,
1119                                 strlen(p_parser->psz_object_name) ) )
1120                 {
1121                     if( !psz_module_name )
1122                         break;
1123                     else if( !strcmp( psz_module_name,
1124                                       p_parser->psz_object_name ) )
1125                         break;
1126                 }
1127             }
1128
1129             if( i_index == p_list->i_count )
1130             {
1131                 /* we don't have this section in our list so we need to back
1132                  * it up */
1133                 *p_index2 = 0;
1134 #if 0
1135                 msg_Dbg( p_this, "backing up config for unknown module \"%s\"",
1136                                  &p_line[1] );
1137 #endif
1138                 *p_index2 = ']';
1139
1140                 b_backup = 1;
1141             }
1142             else
1143             {
1144                 b_backup = 0;
1145             }
1146         }
1147
1148         /* save line if requested and line is valid (doesn't begin with a
1149          * space, tab, or eol) */
1150         if( b_backup && (p_line[0] != '\n') && (p_line[0] != ' ')
1151             && (p_line[0] != '\t') )
1152         {
1153             strcpy( p_index, p_line );
1154             p_index += strlen( p_line );
1155         }
1156     }
1157     if( file ) fclose( file );
1158
1159
1160     /*
1161      * Save module config in file
1162      */
1163
1164     file = config_OpenConfigFile (p_this, "wt");
1165     if( !file )
1166     {
1167         vlc_list_release( p_list );
1168         free( p_bigbuffer );
1169         vlc_mutex_unlock( &p_this->p_libvlc->config_lock );
1170         return -1;
1171     }
1172
1173     fprintf( file, "\xEF\xBB\xBF###\n###  " COPYRIGHT_MESSAGE "\n###\n\n"
1174        "###\n### lines begining with a '#' character are comments\n###\n\n" );
1175
1176     /* Look for the selected module, if NULL then save everything */
1177     for( i_index = 0; i_index < p_list->i_count; i_index++ )
1178     {
1179         module_config_t *p_item, *p_end;
1180         p_parser = (module_t *)p_list->p_values[i_index].p_object ;
1181
1182         if( psz_module_name && strcmp( psz_module_name,
1183                                        p_parser->psz_object_name ) )
1184             continue;
1185
1186         if( !p_parser->i_config_items )
1187             continue;
1188
1189         if( psz_module_name )
1190             msg_Dbg( p_this, "saving config for module \"%s\"",
1191                      p_parser->psz_object_name );
1192
1193         fprintf( file, "[%s]", p_parser->psz_object_name );
1194         if( p_parser->psz_longname )
1195             fprintf( file, " # %s\n\n", p_parser->psz_longname );
1196         else
1197             fprintf( file, "\n\n" );
1198
1199         for( p_item = p_parser->p_config, p_end = p_item + p_parser->confsize;
1200              p_item < p_end;
1201              p_item++ )
1202         {
1203             char  *psz_key;
1204             int   i_value = p_item->value.i;
1205             float f_value = p_item->value.f;
1206             const char  *psz_value = p_item->value.psz;
1207
1208             if( p_item->i_type & CONFIG_HINT )
1209                 /* ignore hints */
1210                 continue;
1211             /* Ignore deprecated options */
1212             if( p_item->psz_current )
1213                 continue;
1214             if( p_item->b_unsaveable )
1215                 /*obvious*/
1216                 continue;
1217
1218             if( b_autosave && !p_item->b_autosave )
1219             {
1220                 i_value = p_item->saved.i;
1221                 f_value = p_item->saved.f;
1222                 psz_value = p_item->saved.psz;
1223                 if( !psz_value ) psz_value = p_item->orig.psz;
1224             }
1225             else
1226             {
1227                 p_item->b_dirty = VLC_FALSE;
1228             }
1229
1230             switch( p_item->i_type )
1231             {
1232             case CONFIG_ITEM_BOOL:
1233             case CONFIG_ITEM_INTEGER:
1234                 if( p_item->psz_text )
1235                     fprintf( file, "# %s (%s)\n", p_item->psz_text,
1236                              (p_item->i_type == CONFIG_ITEM_BOOL) ?
1237                              _("boolean") : _("integer") );
1238                 if( i_value == p_item->orig.i )
1239                     fputc ('#', file);
1240                 fprintf( file, "%s=%i\n", p_item->psz_name, i_value );
1241
1242                 p_item->saved.i = i_value;
1243                 break;
1244
1245             case CONFIG_ITEM_KEY:
1246                 if( p_item->psz_text )
1247                     fprintf( file, "# %s (%s)\n", p_item->psz_text,
1248                              _("key") );
1249                 if( i_value == p_item->orig.i )
1250                     fputc ('#', file);
1251                 psz_key = ConfigKeyToString( i_value );
1252                 fprintf( file, "%s=%s\n", p_item->psz_name,
1253                          psz_key ? psz_key : "" );
1254                 free (psz_key);
1255
1256                 p_item->saved.i = i_value;
1257                 break;
1258
1259             case CONFIG_ITEM_FLOAT:
1260                 if( p_item->psz_text )
1261                     fprintf( file, "# %s (%s)\n", p_item->psz_text,
1262                              _("float") );
1263                 if( f_value == p_item->orig.f )
1264                     fputc ('#', file);
1265                 fprintf( file, "%s=%f\n", p_item->psz_name, (double)f_value );
1266
1267                 p_item->saved.f = f_value;
1268                 break;
1269
1270             default:
1271                 if( p_item->psz_text )
1272                     fprintf( file, "# %s (%s)\n", p_item->psz_text,
1273                              _("string") );
1274                 if( (!psz_value && !p_item->orig.psz) ||
1275                     (psz_value && p_item->orig.psz &&
1276                      !strcmp( psz_value, p_item->orig.psz )) )
1277                     fputc ('#', file);
1278                 fprintf( file, "%s=%s\n", p_item->psz_name,
1279                          psz_value ?: "" );
1280
1281                 if( b_autosave && !p_item->b_autosave ) break;
1282
1283                 free ((char *)p_item->saved.psz);
1284                 if( (psz_value && p_item->orig.psz &&
1285                      strcmp( psz_value, p_item->orig.psz )) ||
1286                     !psz_value || !p_item->orig.psz)
1287                     p_item->saved.psz = strdupnull (psz_value);
1288                 else
1289                     p_item->saved.psz = NULL;
1290             }
1291         }
1292
1293         fputc ('\n', file);
1294     }
1295
1296     vlc_list_release( p_list );
1297
1298     /*
1299      * Restore old settings from the config in file
1300      */
1301     fputs( p_bigbuffer, file );
1302     free( p_bigbuffer );
1303
1304     fclose( file );
1305     vlc_mutex_unlock( &p_this->p_libvlc->config_lock );
1306
1307     return 0;
1308 }
1309
1310 int config_AutoSaveConfigFile( vlc_object_t *p_this )
1311 {
1312     vlc_list_t *p_list;
1313     int i_index, i_count;
1314
1315     if( !p_this ) return -1;
1316
1317     /* Check if there's anything to save */
1318     vlc_mutex_lock( &p_this->p_libvlc->config_lock );
1319     p_list = vlc_list_find( p_this, VLC_OBJECT_MODULE, FIND_ANYWHERE );
1320     i_count = p_list->i_count;
1321     for( i_index = 0; i_index < i_count; i_index++ )
1322     {
1323         module_t *p_parser = (module_t *)p_list->p_values[i_index].p_object ;
1324         module_config_t *p_item, *p_end;
1325
1326         if( !p_parser->i_config_items ) continue;
1327
1328         for( p_item = p_parser->p_config, p_end = p_item + p_parser->confsize;
1329              p_item < p_end;
1330              p_item++ )
1331         {
1332             if( p_item->b_autosave && p_item->b_dirty ) break;
1333         }
1334         break;
1335     }
1336     vlc_list_release( p_list );
1337     vlc_mutex_unlock( &p_this->p_libvlc->config_lock );
1338
1339     if( i_index == i_count ) return VLC_SUCCESS;
1340     return SaveConfigFile( p_this, 0, VLC_TRUE );
1341 }
1342
1343 int __config_SaveConfigFile( vlc_object_t *p_this, const char *psz_module_name )
1344 {
1345     return SaveConfigFile( p_this, psz_module_name, VLC_FALSE );
1346 }
1347
1348 /*****************************************************************************
1349  * config_LoadCmdLine: parse command line
1350  *****************************************************************************
1351  * Parse command line for configuration options.
1352  * Now that the module_bank has been initialized, we can dynamically
1353  * generate the longopts structure used by getops. We have to do it this way
1354  * because we don't know (and don't want to know) in advance the configuration
1355  * options used (ie. exported) by each module.
1356  *****************************************************************************/
1357 int __config_LoadCmdLine( vlc_object_t *p_this, int *pi_argc, char *ppsz_argv[],
1358                           vlc_bool_t b_ignore_errors )
1359 {
1360     int i_cmd, i_index, i_opts, i_shortopts, flag, i_verbose = 0;
1361     module_t *p_parser;
1362     vlc_list_t *p_list;
1363     struct option *p_longopts;
1364     int i_modules_index;
1365
1366     /* Short options */
1367     module_config_t *pp_shortopts[256];
1368     char *psz_shortopts;
1369
1370     /* Set default configuration and copy arguments */
1371     p_this->p_libvlc->i_argc    = *pi_argc;
1372     p_this->p_libvlc->ppsz_argv = ppsz_argv;
1373
1374 #ifdef __APPLE__
1375     /* When VLC.app is run by double clicking in Mac OS X, the 2nd arg
1376      * is the PSN - process serial number (a unique PID-ish thingie)
1377      * still ok for real Darwin & when run from command line */
1378     if ( (*pi_argc > 1) && (strncmp( ppsz_argv[ 1 ] , "-psn" , 4 ) == 0) )
1379                                         /* for example -psn_0_9306113 */
1380     {
1381         /* GDMF!... I can't do this or else the MacOSX window server will
1382          * not pick up the PSN and not register the app and we crash...
1383          * hence the following kludge otherwise we'll get confused w/ argv[1]
1384          * being an input file name */
1385 #if 0
1386         ppsz_argv[ 1 ] = NULL;
1387 #endif
1388         *pi_argc = *pi_argc - 1;
1389         pi_argc--;
1390         return 0;
1391     }
1392 #endif
1393
1394     /* List all modules */
1395     p_list = vlc_list_find( p_this, VLC_OBJECT_MODULE, FIND_ANYWHERE );
1396
1397     /*
1398      * Generate the longopts and shortopts structures used by getopt_long
1399      */
1400
1401     i_opts = 0;
1402     for( i_modules_index = 0; i_modules_index < p_list->i_count;
1403          i_modules_index++ )
1404     {
1405         p_parser = (module_t *)p_list->p_values[i_modules_index].p_object ;
1406
1407         /* count the number of exported configuration options (to allocate
1408          * longopts). We also need to allocate space for two options when
1409          * dealing with boolean to allow for --foo and --no-foo */
1410         i_opts += p_parser->i_config_items
1411                      + 2 * p_parser->i_bool_items;
1412     }
1413
1414     p_longopts = malloc( sizeof(struct option) * (i_opts + 1) );
1415     if( p_longopts == NULL )
1416     {
1417         msg_Err( p_this, "out of memory" );
1418         vlc_list_release( p_list );
1419         return -1;
1420     }
1421
1422     psz_shortopts = malloc( sizeof( char ) * (2 * i_opts + 1) );
1423     if( psz_shortopts == NULL )
1424     {
1425         msg_Err( p_this, "out of memory" );
1426         free( p_longopts );
1427         vlc_list_release( p_list );
1428         return -1;
1429     }
1430
1431     /* If we are requested to ignore errors, then we must work on a copy
1432      * of the ppsz_argv array, otherwise getopt_long will reorder it for
1433      * us, ignoring the arity of the options */
1434     if( b_ignore_errors )
1435     {
1436         ppsz_argv = (char**)malloc( *pi_argc * sizeof(char *) );
1437         if( ppsz_argv == NULL )
1438         {
1439             msg_Err( p_this, "out of memory" );
1440             free( psz_shortopts );
1441             free( p_longopts );
1442             vlc_list_release( p_list );
1443             return -1;
1444         }
1445         memcpy( ppsz_argv, p_this->p_libvlc->ppsz_argv,
1446                 *pi_argc * sizeof(char *) );
1447     }
1448
1449     i_shortopts = 0;
1450     for( i_index = 0; i_index < 256; i_index++ )
1451     {
1452         pp_shortopts[i_index] = NULL;
1453     }
1454
1455     /* Fill the p_longopts and psz_shortopts structures */
1456     i_index = 0;
1457     for( i_modules_index = 0; i_modules_index < p_list->i_count;
1458          i_modules_index++ )
1459     {
1460         module_config_t *p_item, *p_end;
1461         p_parser = (module_t *)p_list->p_values[i_modules_index].p_object ;
1462
1463         if( !p_parser->i_config_items )
1464             continue;
1465
1466         for( p_item = p_parser->p_config, p_end = p_item + p_parser->confsize;
1467              p_item < p_end;
1468              p_item++ )
1469         {
1470             /* Ignore hints */
1471             if( p_item->i_type & CONFIG_HINT )
1472                 continue;
1473
1474             /* Add item to long options */
1475             p_longopts[i_index].name = strdup( p_item->psz_name );
1476             if( p_longopts[i_index].name == NULL ) continue;
1477             p_longopts[i_index].has_arg =
1478                 (p_item->i_type == CONFIG_ITEM_BOOL)?
1479                                                no_argument : required_argument;
1480             p_longopts[i_index].flag = &flag;
1481             p_longopts[i_index].val = 0;
1482             i_index++;
1483
1484             /* When dealing with bools we also need to add the --no-foo
1485              * option */
1486             if( p_item->i_type == CONFIG_ITEM_BOOL )
1487             {
1488                 char *psz_name = malloc( strlen(p_item->psz_name) + 3 );
1489                 if( psz_name == NULL ) continue;
1490                 strcpy( psz_name, "no" );
1491                 strcat( psz_name, p_item->psz_name );
1492
1493                 p_longopts[i_index].name = psz_name;
1494                 p_longopts[i_index].has_arg = no_argument;
1495                 p_longopts[i_index].flag = &flag;
1496                 p_longopts[i_index].val = 1;
1497                 i_index++;
1498
1499                 psz_name = malloc( strlen(p_item->psz_name) + 4 );
1500                 if( psz_name == NULL ) continue;
1501                 strcpy( psz_name, "no-" );
1502                 strcat( psz_name, p_item->psz_name );
1503
1504                 p_longopts[i_index].name = psz_name;
1505                 p_longopts[i_index].has_arg = no_argument;
1506                 p_longopts[i_index].flag = &flag;
1507                 p_longopts[i_index].val = 1;
1508                 i_index++;
1509             }
1510
1511             /* If item also has a short option, add it */
1512             if( p_item->i_short )
1513             {
1514                 pp_shortopts[(int)p_item->i_short] = p_item;
1515                 psz_shortopts[i_shortopts] = p_item->i_short;
1516                 i_shortopts++;
1517                 if( p_item->i_type != CONFIG_ITEM_BOOL )
1518                 {
1519                     psz_shortopts[i_shortopts] = ':';
1520                     i_shortopts++;
1521
1522                     if( p_item->i_short == 'v' )
1523                     {
1524                         psz_shortopts[i_shortopts] = ':';
1525                         i_shortopts++;
1526                     }
1527                 }
1528             }
1529         }
1530     }
1531
1532     /* We don't need the module list anymore */
1533     vlc_list_release( p_list );
1534
1535     /* Close the longopts and shortopts structures */
1536     memset( &p_longopts[i_index], 0, sizeof(struct option) );
1537     psz_shortopts[i_shortopts] = '\0';
1538
1539     /*
1540      * Parse the command line options
1541      */
1542     opterr = 0;
1543     optind = 0; /* set to 0 to tell GNU getopt to reinitialize */
1544     while( ( i_cmd = getopt_long( *pi_argc, ppsz_argv, psz_shortopts,
1545                                   p_longopts, &i_index ) ) != -1 )
1546     {
1547         /* A long option has been recognized */
1548         if( i_cmd == 0 )
1549         {
1550             module_config_t *p_conf;
1551             char *psz_name = (char *)p_longopts[i_index].name;
1552
1553             /* Check if we deal with a --nofoo or --no-foo long option */
1554             if( flag ) psz_name += psz_name[2] == '-' ? 3 : 2;
1555
1556             /* Store the configuration option */
1557             p_conf = config_FindConfig( p_this, psz_name );
1558             if( p_conf )
1559             {
1560                 /* Check if the option is deprecated */
1561                 if( p_conf->psz_current )
1562                 {
1563                     if( p_conf->b_strict )
1564                     {
1565                         fprintf(stderr,
1566                                 "Warning: option --%s no longer exists.\n",
1567                                 p_conf->psz_name);
1568                        continue;
1569                     }
1570
1571                     fprintf( stderr,
1572                              "%s: option --%s is deprecated. Use --%s instead.\n",
1573                              b_ignore_errors ? "Warning" : "Error",
1574                              p_conf->psz_name, p_conf->psz_current);
1575                     if( !b_ignore_errors )
1576                     {
1577                         /*free */
1578                         for( i_index = 0; p_longopts[i_index].name; i_index++ )
1579                              free( (char *)p_longopts[i_index].name );
1580
1581                         free( p_longopts );
1582                         free( psz_shortopts );
1583                         return -1;
1584                     }
1585   
1586                     psz_name = (char *)p_conf->psz_current;
1587                     p_conf = config_FindConfig( p_this, psz_name );
1588                 }
1589
1590                 switch( p_conf->i_type )
1591                 {
1592                     case CONFIG_ITEM_STRING:
1593                     case CONFIG_ITEM_PASSWORD:
1594                     case CONFIG_ITEM_FILE:
1595                     case CONFIG_ITEM_DIRECTORY:
1596                     case CONFIG_ITEM_MODULE:
1597                     case CONFIG_ITEM_MODULE_LIST:
1598                     case CONFIG_ITEM_MODULE_LIST_CAT:
1599                     case CONFIG_ITEM_MODULE_CAT:
1600                         config_PutPsz( p_this, psz_name, optarg );
1601                         break;
1602                     case CONFIG_ITEM_INTEGER:
1603                         config_PutInt( p_this, psz_name, strtol(optarg, 0, 0));
1604                         break;
1605                     case CONFIG_ITEM_FLOAT:
1606                         config_PutFloat( p_this, psz_name, (float)atof(optarg) );
1607                         break;
1608                     case CONFIG_ITEM_KEY:
1609                         config_PutInt( p_this, psz_name, ConfigStringToKey( optarg ) );
1610                         break;
1611                     case CONFIG_ITEM_BOOL:
1612                         config_PutInt( p_this, psz_name, !flag );
1613                         break;
1614                 }
1615                 continue;
1616             }
1617         }
1618
1619         /* A short option has been recognized */
1620         if( pp_shortopts[i_cmd] != NULL )
1621         {
1622             switch( pp_shortopts[i_cmd]->i_type )
1623             {
1624                 case CONFIG_ITEM_STRING:
1625                 case CONFIG_ITEM_PASSWORD:
1626                 case CONFIG_ITEM_FILE:
1627                 case CONFIG_ITEM_DIRECTORY:
1628                 case CONFIG_ITEM_MODULE:
1629                 case CONFIG_ITEM_MODULE_CAT:
1630                 case CONFIG_ITEM_MODULE_LIST:
1631                 case CONFIG_ITEM_MODULE_LIST_CAT:
1632                     config_PutPsz( p_this, pp_shortopts[i_cmd]->psz_name, optarg );
1633                     break;
1634                 case CONFIG_ITEM_INTEGER:
1635                     if( i_cmd == 'v' )
1636                     {
1637                         if( optarg )
1638                         {
1639                             if( *optarg == 'v' ) /* eg. -vvv */
1640                             {
1641                                 i_verbose++;
1642                                 while( *optarg == 'v' )
1643                                 {
1644                                     i_verbose++;
1645                                     optarg++;
1646                                 }
1647                             }
1648                             else
1649                             {
1650                                 i_verbose += atoi( optarg ); /* eg. -v2 */
1651                             }
1652                         }
1653                         else
1654                         {
1655                             i_verbose++; /* -v */
1656                         }
1657                         config_PutInt( p_this, pp_shortopts[i_cmd]->psz_name,
1658                                                i_verbose );
1659                     }
1660                     else
1661                     {
1662                         config_PutInt( p_this, pp_shortopts[i_cmd]->psz_name,
1663                                                strtol(optarg, 0, 0) );
1664                     }
1665                     break;
1666                 case CONFIG_ITEM_BOOL:
1667                     config_PutInt( p_this, pp_shortopts[i_cmd]->psz_name, 1 );
1668                     break;
1669             }
1670
1671             continue;
1672         }
1673
1674         /* Internal error: unknown option */
1675         if( !b_ignore_errors )
1676         {
1677             fprintf( stderr, "%s: unknown option"
1678                      " or missing mandatory argument ",
1679                      p_this->p_libvlc->psz_object_name );
1680             if( optopt )
1681             {
1682                 fprintf( stderr, "`-%c'\n", optopt );
1683             }
1684             else
1685             {
1686                 fprintf( stderr, "`%s'\n", ppsz_argv[optind-1] );
1687             }
1688             fprintf( stderr, "Try `%s --help' for more information.\n",
1689                              p_this->p_libvlc->psz_object_name );
1690
1691             for( i_index = 0; p_longopts[i_index].name; i_index++ )
1692                 free( (char *)p_longopts[i_index].name );
1693             free( p_longopts );
1694             free( psz_shortopts );
1695             return -1;
1696         }
1697     }
1698
1699     /* Free allocated resources */
1700     for( i_index = 0; p_longopts[i_index].name; i_index++ )
1701         free( (char *)p_longopts[i_index].name );
1702     free( p_longopts );
1703     free( psz_shortopts );
1704     if( b_ignore_errors ) free( ppsz_argv );
1705
1706     return 0;
1707 }
1708
1709 /**
1710  * config_GetDataDir: find directory where shared data is installed
1711  *
1712  * @return a string (always succeeds).
1713  */
1714 const char *config_GetDataDir( void )
1715 {
1716 #if defined (WIN32) || defined (UNDER_CE)
1717     return vlc_global()->psz_vlcpath;
1718 #elif defined(__APPLE__) || defined (SYS_BEOS)
1719     static char path[PATH_MAX] = "";
1720
1721     if( *path == '\0' )
1722     {
1723         snprintf( path, sizeof( path ), "%s/share",
1724                   vlc_global()->psz_vlcpath );
1725         path[sizeof( path ) - 1] = '\0';
1726     }
1727     return path;
1728 #else
1729     return DATA_PATH;
1730 #endif
1731 }
1732
1733 /*****************************************************************************
1734  * config_GetHomeDir, config_GetUserDir: find the user's home directory.
1735  *****************************************************************************
1736  * This function will try by different ways to find the user's home path.
1737  * Note that this function is not reentrant, it should be called only once
1738  * at the beginning of main where the result will be stored for later use.
1739  *****************************************************************************/
1740 static char *GetDir( vlc_bool_t b_appdata )
1741 {
1742     const char *psz_localhome = NULL;
1743
1744 #if defined(WIN32) && !defined(UNDER_CE)
1745     typedef HRESULT (WINAPI *SHGETFOLDERPATH)( HWND, int, HANDLE, DWORD,
1746                                                LPWSTR );
1747 #ifndef CSIDL_FLAG_CREATE
1748 #   define CSIDL_FLAG_CREATE 0x8000
1749 #endif
1750 #ifndef CSIDL_APPDATA
1751 #   define CSIDL_APPDATA 0x1A
1752 #endif
1753 #ifndef CSIDL_PROFILE
1754 #   define CSIDL_PROFILE 0x28
1755 #endif
1756 #ifndef SHGFP_TYPE_CURRENT
1757 #   define SHGFP_TYPE_CURRENT 0
1758 #endif
1759
1760     HINSTANCE shfolder_dll;
1761     SHGETFOLDERPATH SHGetFolderPath ;
1762
1763     /* load the shfolder dll to retrieve SHGetFolderPath */
1764     if( ( shfolder_dll = LoadLibrary( _T("SHFolder.dll") ) ) != NULL )
1765     {
1766         SHGetFolderPath = (void *)GetProcAddress( shfolder_dll,
1767                                                   _T("SHGetFolderPathW") );
1768         if ( SHGetFolderPath != NULL )
1769         {
1770             wchar_t whomedir[MAX_PATH];
1771
1772             /* get the "Application Data" folder for the current user */
1773             if( S_OK == SHGetFolderPath( NULL,
1774                                          (b_appdata ? CSIDL_APPDATA :
1775                                            CSIDL_PROFILE) | CSIDL_FLAG_CREATE,
1776                                          NULL, SHGFP_TYPE_CURRENT,
1777                                          whomedir ) )
1778             {
1779                 FreeLibrary( shfolder_dll );
1780                 return FromWide( whomedir );
1781             }
1782         }
1783         FreeLibrary( shfolder_dll );
1784     }
1785
1786 #elif defined(UNDER_CE)
1787
1788 #ifndef CSIDL_APPDATA
1789 #   define CSIDL_APPDATA 0x1A
1790 #endif
1791
1792     wchar_t whomedir[MAX_PATH];
1793
1794     /* get the "Application Data" folder for the current user */
1795     if( SHGetSpecialFolderPath( NULL, whomedir, CSIDL_APPDATA, 1 ) )
1796         return FromWide( whomedir );
1797 #endif
1798
1799 #if defined(HAVE_GETPWUID)
1800     struct passwd *p_pw;
1801     (void)b_appdata;
1802
1803     if( ( p_pw = getpwuid( getuid() ) ) == NULL )
1804 #endif
1805     {
1806         psz_localhome = getenv( "HOME" );
1807         if( psz_localhome == NULL )
1808         {
1809             psz_localhome = getenv( "TMP" );
1810             if( psz_localhome == NULL )
1811                 psz_localhome = "/tmp";
1812         }
1813     }
1814 #if defined(HAVE_GETPWUID)
1815     else
1816         psz_localhome = p_pw->pw_dir;
1817 #endif
1818
1819     return FromLocaleDup( psz_localhome );
1820 }
1821
1822 char *config_GetHomeDir( void )
1823 {
1824     return GetDir( VLC_TRUE );
1825 }
1826
1827 char *config_GetUserDir( void )
1828 {
1829     return GetDir( VLC_FALSE );
1830 }
1831
1832
1833 static int ConfigStringToKey( const char *psz_key )
1834 {
1835     int i_key = 0;
1836     unsigned int i;
1837     const char *psz_parser = strchr( psz_key, '-' );
1838     while( psz_parser && psz_parser != psz_key )
1839     {
1840         for( i = 0; i < sizeof(vlc_modifiers) / sizeof(key_descriptor_t); i++ )
1841         {
1842             if( !strncasecmp( vlc_modifiers[i].psz_key_string, psz_key,
1843                               strlen( vlc_modifiers[i].psz_key_string ) ) )
1844             {
1845                 i_key |= vlc_modifiers[i].i_key_code;
1846             }
1847         }
1848         psz_key = psz_parser + 1;
1849         psz_parser = strchr( psz_key, '-' );
1850     }
1851     for( i = 0; i < sizeof(vlc_keys) / sizeof( key_descriptor_t ); i++ )
1852     {
1853         if( !strcasecmp( vlc_keys[i].psz_key_string, psz_key ) )
1854         {
1855             i_key |= vlc_keys[i].i_key_code;
1856             break;
1857         }
1858     }
1859     return i_key;
1860 }
1861
1862 static char *ConfigKeyToString( int i_key )
1863 {
1864     char *psz_key = malloc( 100 );
1865     char *p;
1866     size_t index;
1867
1868     if ( !psz_key )
1869     {
1870         return NULL;
1871     }
1872     *psz_key = '\0';
1873     p = psz_key;
1874     for( index = 0; index < (sizeof(vlc_modifiers) / sizeof(key_descriptor_t));
1875          index++ )
1876     {
1877         if( i_key & vlc_modifiers[index].i_key_code )
1878         {
1879             p += sprintf( p, "%s-", vlc_modifiers[index].psz_key_string );
1880         }
1881     }
1882     for( index = 0; index < (sizeof(vlc_keys) / sizeof( key_descriptor_t));
1883          index++)
1884     {
1885         if( (int)( i_key & ~KEY_MODIFIER ) == vlc_keys[index].i_key_code )
1886         {
1887             p += sprintf( p, "%s", vlc_keys[index].psz_key_string );
1888             break;
1889         }
1890     }
1891     return psz_key;
1892 }