Alc/alcConfig.c

   1 /**
   2  * OpenAL cross platform audio library
   3  * Copyright (C) 1999-2007 by authors.
   4  * This library is free software; you can redistribute it and/or
   5  *  modify it under the terms of the GNU Library General Public
   6  *  License as published by the Free Software Foundation; either
   7  *  version 2 of the License, or (at your option) any later version.
   8  *
   9  * This library is distributed in the hope that it will be useful,
  10  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12  *  Library General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU Library General Public
  15  *  License along with this library; if not, write to the
  16  *  Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  17  *  Boston, MA  02111-1307, USA.
  18  * Or go to http://www.gnu.org/copyleft/lgpl.html
  19  */
  20
  21 #ifdef _WIN32
  22 #ifdef __MINGW32__
  23 #define _WIN32_IE 0x501
  24 #else
  25 #define _WIN32_IE 0x400
  26 #endif
  27 #endif
  28
  29 #include "config.h"
  30
  31 #include <stdlib.h>
  32 #include <stdio.h>
  33 #include <ctype.h>
  34 #include <string.h>
  35
  36 #include "alMain.h"
  37
  38 #ifdef _WIN32_IE
  39 #include <shlobj.h>
  40 #endif
  41
  42 typedef struct ConfigEntry {
  43     char *key;
  44     char *value;
  45 } ConfigEntry;
  46
  47 typedef struct ConfigBlock {
  48     ConfigEntry *entries;
  49     unsigned int entryCount;
  50 } ConfigBlock;
  51
  52 static ConfigBlock cfgBlock;
  53
  54 static char buffer[1024];
  55
  56 static char *lstrip(char *line)
  57 {
  58     while(isspace(line[0]))
  59         line++;
  60     return line;
  61 }
  62
  63 static char *rstrip(char *line)
  64 {
  65     size_t len = strlen(line);
  66     while(len > 0 && isspace(line[len-1]))
  67         len--;
  68     line[len] = 0;
  69     return line;
  70 }
  71
  72 static void LoadConfigFromFile(FILE *f)
  73 {
  74     char curSection[128] = "";
  75     ConfigEntry *ent;
  76
  77     while(fgets(buffer, sizeof(buffer), f))
  78     {
  79         char *line, *comment;
  80         char key[256] = "";
  81         char value[256] = "";
  82
  83         comment = strchr(buffer, '#');
  84         if(comment)
  85         {
  86             *(comment++) = 0;
  87             comment = rstrip(lstrip(comment));
  88         }
  89
  90         line = rstrip(lstrip(buffer));
  91         if(!line[0])
  92             continue;
  93
  94         if(line[0] == '[')
  95         {
  96             char *section = line+1;
  97             char *endsection;
  98
  99             endsection = strchr(section, ']');
 100             if(!endsection || section == endsection || endsection[1] != 0)
 101             {
 102                  ERR("config parse error: bad line \"%s\"\n", line);
 103                  continue;
 104             }
 105             *endsection = 0;
 106
 107             if(strcasecmp(section, "general") == 0)
 108                 curSection[0] = 0;
 109             else
 110             {
 111                 strncpy(curSection, section, sizeof(curSection)-1);
 112                 curSection[sizeof(curSection)-1] = 0;
 113             }
 114
 115             continue;
 116         }
 117
 118         if(sscanf(line, "%255[^=] = \"%255[^\"]\"", key, value) == 2 ||
 119            sscanf(line, "%255[^=] = '%255[^\']'", key, value) == 2 ||
 120            sscanf(line, "%255[^=] = %255[^\n]", key, value) == 2)
 121         {
 122             /* sscanf doesn't handle '' or "" as empty values, so clip it
 123              * manually. */
 124             if(strcmp(value, "\"\"") == 0 || strcmp(value, "''") == 0)
 125                 value[0] = 0;
 126          }
 127          else if(sscanf(line, "%255[^=] %255[=]", key, value) == 2)
 128          {
 129              /* Special case for 'key =' */
 130              value[0] = 0;
 131          }
 132          else
 133          {
 134              ERR("config parse error: malformed option line: \"%s\"\n\n", line);
 135              continue;
 136          }
 137          rstrip(key);
 138
 139          if(curSection[0] != 0)
 140          {
 141              size_t len = strlen(curSection);
 142              memmove(&key[len+1], key, sizeof(key)-1-len);
 143              key[len] = '/';
 144              memcpy(key, curSection, len);
 145          }
 146
 147         /* Check if we already have this option set */
 148         ent = cfgBlock.entries;
 149         while((unsigned int)(ent-cfgBlock.entries) < cfgBlock.entryCount)
 150         {
 151             if(strcasecmp(ent->key, key) == 0)
 152                 break;
 153             ent++;
 154         }
 155
 156         if((unsigned int)(ent-cfgBlock.entries) >= cfgBlock.entryCount)
 157         {
 158             /* Allocate a new option entry */
 159             ent = realloc(cfgBlock.entries, (cfgBlock.entryCount+1)*sizeof(ConfigEntry));
 160             if(!ent)
 161             {
 162                  ERR("config parse error: error reallocating config entries\n");
 163                  continue;
 164             }
 165             cfgBlock.entries = ent;
 166             ent = cfgBlock.entries + cfgBlock.entryCount;
 167             cfgBlock.entryCount++;
 168
 169             ent->key = strdup(key);
 170             ent->value = NULL;
 171         }
 172
 173         free(ent->value);
 174         ent->value = strdup(value);
 175
 176         TRACE("found '%s' = '%s'\n", ent->key, ent->value);
 177     }
 178 }
 179
 180 void ReadALConfig(void)
 181 {
 182     const char *str;
 183     FILE *f;
 184
 185 #ifdef _WIN32
 186     if(SHGetSpecialFolderPathA(NULL, buffer, CSIDL_APPDATA, FALSE) != FALSE)
 187     {
 188         size_t p = strlen(buffer);
 189         snprintf(buffer+p, sizeof(buffer)-p, "\\alsoft.ini");
 190
 191         TRACE("Loading config %s...\n", buffer);
 192         f = fopen(buffer, "rt");
 193         if(f)
 194         {
 195             LoadConfigFromFile(f);
 196             fclose(f);
 197         }
 198     }
 199 #else
 200     str = "/etc/openal/alsoft.conf";
 201
 202     TRACE("Loading config %s...\n", str);
 203     f = fopen(str, "r");
 204     if(f)
 205     {
 206         LoadConfigFromFile(f);
 207         fclose(f);
 208     }
 209
 210     if(!(str=getenv("XDG_CONFIG_DIRS")) || str[0] == 0)
 211         str = "/etc/xdg";
 212     strncpy(buffer, str, sizeof(buffer)-1);
 213     buffer[sizeof(buffer)-1] = 0;
 214     /* Go through the list in reverse, since "the order of base directories
 215      * denotes their importance; the first directory listed is the most
 216      * important". Ergo, we need to load the settings from the later dirs
 217      * first so that the settings in the earlier dirs override them.
 218      */
 219     while(1)
 220     {
 221         char *next = strrchr(buffer, ':');
 222         if(next) *(next++) = 0;
 223         else next = buffer;
 224
 225         if(next[0] != '/')
 226             WARN("Ignoring XDG config dir: %s\n", next);
 227         else
 228         {
 229             size_t len = strlen(next);
 230             strncpy(next+len, "/alsoft.conf", buffer+sizeof(buffer)-next-len);
 231             buffer[sizeof(buffer)-1] = 0;
 232
 233             TRACE("Loading config %s...\n", next);
 234             f = fopen(next, "r");
 235             if(f)
 236             {
 237                 LoadConfigFromFile(f);
 238                 fclose(f);
 239             }
 240         }
 241         if(next == buffer)
 242             break;
 243     }
 244
 245     if((str=getenv("HOME")) != NULL && *str)
 246     {
 247         snprintf(buffer, sizeof(buffer), "%s/.alsoftrc", str);
 248
 249         TRACE("Loading config %s...\n", buffer);
 250         f = fopen(buffer, "r");
 251         if(f)
 252         {
 253             LoadConfigFromFile(f);
 254             fclose(f);
 255         }
 256     }
 257
 258     if((str=getenv("XDG_CONFIG_HOME")) != NULL && str[0] != 0)
 259         snprintf(buffer, sizeof(buffer), "%s/%s", str, "alsoft.conf");
 260     else
 261     {
 262         buffer[0] = 0;
 263         if((str=getenv("HOME")) != NULL && str[0] != 0)
 264             snprintf(buffer, sizeof(buffer), "%s/.config/%s", str, "alsoft.conf");
 265     }
 266     if(buffer[0] != 0)
 267     {
 268         TRACE("Loading config %s...\n", buffer);
 269         f = fopen(buffer, "r");
 270         if(f)
 271         {
 272             LoadConfigFromFile(f);
 273             fclose(f);
 274         }
 275     }
 276 #endif
 277
 278     if((str=getenv("ALSOFT_CONF")) != NULL && *str)
 279     {
 280         TRACE("Loading config %s...\n", str);
 281         f = fopen(str, "r");
 282         if(f)
 283         {
 284             LoadConfigFromFile(f);
 285             fclose(f);
 286         }
 287     }
 288 }
 289
 290 void FreeALConfig(void)
 291 {
 292     unsigned int i;
 293
 294     for(i = 0;i < cfgBlock.entryCount;i++)
 295     {
 296         free(cfgBlock.entries[i].key);
 297         free(cfgBlock.entries[i].value);
 298     }
 299     free(cfgBlock.entries);
 300 }
 301
 302 const char *GetConfigValue(const char *blockName, const char *keyName, const char *def)
 303 {
 304     unsigned int i;
 305     char key[256];
 306
 307     if(!keyName)
 308         return def;
 309
 310     if(blockName && strcasecmp(blockName, "general") != 0)
 311         snprintf(key, sizeof(key), "%s/%s", blockName, keyName);
 312     else
 313     {
 314         strncpy(key, keyName, sizeof(key)-1);
 315         key[sizeof(key)-1] = 0;
 316     }
 317
 318     for(i = 0;i < cfgBlock.entryCount;i++)
 319     {
 320         if(strcasecmp(cfgBlock.entries[i].key, key) == 0)
 321         {
 322             TRACE("Found %s = \"%s\"\n", key, cfgBlock.entries[i].value);
 323             if(cfgBlock.entries[i].value[0])
 324                 return cfgBlock.entries[i].value;
 325             return def;
 326         }
 327     }
 328
 329     TRACE("Key %s not found\n", key);
 330     return def;
 331 }
 332
 333 int ConfigValueExists(const char *blockName, const char *keyName)
 334 {
 335     const char *val = GetConfigValue(blockName, keyName, "");
 336     return !!val[0];
 337 }
 338
 339 int ConfigValueStr(const char *blockName, const char *keyName, const char **ret)
 340 {
 341     const char *val = GetConfigValue(blockName, keyName, "");
 342     if(!val[0]) return 0;
 343
 344     *ret = val;
 345     return 1;
 346 }
 347
 348 int ConfigValueInt(const char *blockName, const char *keyName, int *ret)
 349 {
 350     const char *val = GetConfigValue(blockName, keyName, "");
 351     if(!val[0]) return 0;
 352
 353     *ret = strtol(val, NULL, 0);
 354     return 1;
 355 }
 356
 357 int ConfigValueUInt(const char *blockName, const char *keyName, unsigned int *ret)
 358 {
 359     const char *val = GetConfigValue(blockName, keyName, "");
 360     if(!val[0]) return 0;
 361
 362     *ret = strtoul(val, NULL, 0);
 363     return 1;
 364 }
 365
 366 int ConfigValueFloat(const char *blockName, const char *keyName, float *ret)
 367 {
 368     const char *val = GetConfigValue(blockName, keyName, "");
 369     if(!val[0]) return 0;
 370
 371 #ifdef HAVE_STRTOF
 372     *ret = strtof(val, NULL);
 373 #else
 374     *ret = (float)strtod(val, NULL);
 375 #endif
 376     return 1;
 377 }
 378
 379 int GetConfigValueBool(const char *blockName, const char *keyName, int def)
 380 {
 381     const char *val = GetConfigValue(blockName, keyName, "");
 382
 383     if(!val[0]) return !!def;
 384     return (strcasecmp(val, "true") == 0 || strcasecmp(val, "yes") == 0 ||
 385             strcasecmp(val, "on") == 0 || atoi(val) != 0);
 386 }