git.sesse.net Git - vlc/blob - src/misc/configuration.c

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