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 #if defined(_WIN32) && (_WIN32_IE < 0x400)
  22 #undef _WIN32_IE
  23 #define _WIN32_IE 0x400
  24 #endif
  25
  26 #include "config.h"
  27
  28 #include <stdlib.h>
  29 #include <stdio.h>
  30 #include <ctype.h>
  31 #include <string.h>
  32
  33 #include "alMain.h"
  34
  35 #ifdef _WIN32_IE
  36 #include <shlobj.h>
  37 #endif
  38
  39 typedef struct ConfigEntry {
  40     char *key;
  41     char *value;
  42 } ConfigEntry;
  43
  44 typedef struct ConfigBlock {
  45     char *name;
  46     ConfigEntry *entries;
  47     size_t entryCount;
  48 } ConfigBlock;
  49
  50 static ConfigBlock *cfgBlocks;
  51 static size_t cfgCount;
  52
  53 static char buffer[1024];
  54
  55 static void LoadConfigFromFile(FILE *f)
  56 {
  57     ConfigBlock *curBlock = cfgBlocks;
  58     ConfigEntry *ent;
  59
  60     while(fgets(buffer, sizeof(buffer), f))
  61     {
  62         size_t i = 0;
  63
  64         while(isspace(buffer[i]))
  65             i++;
  66         if(!buffer[i] || buffer[i] == '#')
  67             continue;
  68
  69         memmove(buffer, buffer+i, strlen(buffer+i)+1);
  70
  71         if(buffer[0] == '[')
  72         {
  73             ConfigBlock *nextBlock;
  74
  75             i = 1;
  76             while(buffer[i] && buffer[i] != ']')
  77                 i++;
  78
  79             if(!buffer[i])
  80             {
  81                  AL_PRINT("config parse error: bad line \"%s\"\n", buffer);
  82                  continue;
  83             }
  84             buffer[i] = 0;
  85
  86             do {
  87                 i++;
  88                 if(buffer[i] && !isspace(buffer[i]))
  89                 {
  90                     if(buffer[i] != '#')
  91                         AL_PRINT("config warning: extra data after block: \"%s\"\n", buffer+i);
  92                     break;
  93                 }
  94             } while(buffer[i]);
  95
  96             nextBlock = NULL;
  97             for(i = 0;i < cfgCount;i++)
  98             {
  99                 if(strcasecmp(cfgBlocks[i].name, buffer+1) == 0)
 100                 {
 101                     nextBlock = cfgBlocks+i;
 102 //                    AL_PRINT("found block '%s'\n", nextBlock->name);
 103                     break;
 104                 }
 105             }
 106
 107             if(!nextBlock)
 108             {
 109                 nextBlock = realloc(cfgBlocks, (cfgCount+1)*sizeof(ConfigBlock));
 110                 if(!nextBlock)
 111                 {
 112                      AL_PRINT("config parse error: error reallocating config blocks\n");
 113                      continue;
 114                 }
 115                 cfgBlocks = nextBlock;
 116                 nextBlock = cfgBlocks+cfgCount;
 117                 cfgCount++;
 118
 119                 nextBlock->name = strdup(buffer+1);
 120                 nextBlock->entries = NULL;
 121                 nextBlock->entryCount = 0;
 122
 123 //                AL_PRINT("found new block '%s'\n", nextBlock->name);
 124             }
 125             curBlock = nextBlock;
 126             continue;
 127         }
 128
 129         /* Look for the option name */
 130         i = 0;
 131         while(buffer[i] && buffer[i] != '#' && buffer[i] != '=' &&
 132               !isspace(buffer[i]))
 133             i++;
 134
 135         if(!buffer[i] || buffer[i] == '#' || i == 0)
 136         {
 137             AL_PRINT("config parse error: malformed option line: \"%s\"\n", buffer);
 138             continue;
 139         }
 140
 141         /* Seperate the option */
 142         if(buffer[i] != '=')
 143         {
 144             buffer[i++] = 0;
 145
 146             while(isspace(buffer[i]))
 147                 i++;
 148             if(buffer[i] != '=')
 149             {
 150                 AL_PRINT("config parse error: option without a value: \"%s\"\n", buffer);
 151                 continue;
 152             }
 153         }
 154         /* Find the start of the value */
 155         buffer[i++] = 0;
 156         while(isspace(buffer[i]))
 157             i++;
 158
 159         /* Check if we already have this option set */
 160         ent = curBlock->entries;
 161         while((size_t)(ent-curBlock->entries) < curBlock->entryCount)
 162         {
 163             if(strcasecmp(ent->key, buffer) == 0)
 164                 break;
 165             ent++;
 166         }
 167
 168         if((size_t)(ent-curBlock->entries) >= curBlock->entryCount)
 169         {
 170             /* Allocate a new option entry */
 171             ent = realloc(curBlock->entries, (curBlock->entryCount+1)*sizeof(ConfigEntry));
 172             if(!ent)
 173             {
 174                  AL_PRINT("config parse error: error reallocating config entries\n");
 175                  continue;
 176             }
 177             curBlock->entries = ent;
 178             ent = curBlock->entries + curBlock->entryCount;
 179             curBlock->entryCount++;
 180
 181             ent->key = strdup(buffer);
 182             ent->value = NULL;
 183         }
 184
 185         /* Look for the end of the line (Null term, new-line, or #-symbol) and
 186            eat up the trailing whitespace */
 187         memmove(buffer, buffer+i, strlen(buffer+i)+1);
 188
 189         i = 0;
 190         while(buffer[i] && buffer[i] != '#' && buffer[i] != '\n')
 191             i++;
 192         do {
 193             i--;
 194         } while(isspace(buffer[i]));
 195         buffer[++i] = 0;
 196
 197         free(ent->value);
 198         ent->value = strdup(buffer);
 199
 200 //        AL_PRINT("found '%s' = '%s'\n", ent->key, ent->value);
 201     }
 202 }
 203
 204 void ReadALConfig(void)
 205 {
 206     FILE *f;
 207
 208     cfgBlocks = calloc(1, sizeof(ConfigBlock));
 209     cfgBlocks->name = strdup("general");
 210     cfgCount = 1;
 211
 212 #ifdef _WIN32
 213     if(SHGetSpecialFolderPathA(NULL, buffer, CSIDL_APPDATA, FALSE) != FALSE)
 214     {
 215         size_t p = strlen(buffer);
 216         snprintf(buffer+p, sizeof(buffer)-p, "\\alsoft.ini");
 217         f = fopen(buffer, "rt");
 218         if(f)
 219         {
 220             LoadConfigFromFile(f);
 221             fclose(f);
 222         }
 223     }
 224 #else
 225     f = fopen("/etc/openal/alsoft.conf", "r");
 226     if(f)
 227     {
 228         LoadConfigFromFile(f);
 229         fclose(f);
 230     }
 231     if(getenv("HOME") && *(getenv("HOME")))
 232     {
 233         snprintf(buffer, sizeof(buffer), "%s/.alsoftrc", getenv("HOME"));
 234         f = fopen(buffer, "r");
 235         if(f)
 236         {
 237             LoadConfigFromFile(f);
 238             fclose(f);
 239         }
 240     }
 241 #endif
 242     if(getenv("ALSOFT_CONF"))
 243     {
 244         f = fopen(getenv("ALSOFT_CONF"), "r");
 245         if(f)
 246         {
 247             LoadConfigFromFile(f);
 248             fclose(f);
 249         }
 250     }
 251 }
 252
 253 void FreeALConfig(void)
 254 {
 255     size_t i;
 256
 257     for(i = 0;i < cfgCount;i++)
 258     {
 259         size_t j;
 260         for(j = 0;j < cfgBlocks[i].entryCount;j++)
 261         {
 262            free(cfgBlocks[i].entries[j].key);
 263            free(cfgBlocks[i].entries[j].value);
 264         }
 265         free(cfgBlocks[i].entries);
 266         free(cfgBlocks[i].name);
 267     }
 268     free(cfgBlocks);
 269     cfgBlocks = NULL;
 270     cfgCount = 0;
 271 }
 272
 273 const char *GetConfigValue(const char *blockName, const char *keyName, const char *def)
 274 {
 275     size_t i, j;
 276
 277     if(keyName)
 278     {
 279         if(!blockName)
 280             blockName = "general";
 281
 282         for(i = 0;i < cfgCount;i++)
 283         {
 284             if(strcasecmp(cfgBlocks[i].name, blockName) != 0)
 285                 continue;
 286
 287             for(j = 0;j < cfgBlocks[i].entryCount;j++)
 288             {
 289                 if(strcasecmp(cfgBlocks[i].entries[j].key, keyName) == 0)
 290                 {
 291                     if(cfgBlocks[i].entries[j].value[0])
 292                         return cfgBlocks[i].entries[j].value;
 293                     return def;
 294                 }
 295             }
 296         }
 297     }
 298
 299     return def;
 300 }
 301
 302 int ConfigValueExists(const char *blockName, const char *keyName)
 303 {
 304     const char *val = GetConfigValue(blockName, keyName, "");
 305     return !!val[0];
 306 }
 307
 308 int GetConfigValueInt(const char *blockName, const char *keyName, int def)
 309 {
 310     const char *val = GetConfigValue(blockName, keyName, "");
 311
 312     if(!val[0]) return def;
 313     return strtol(val, NULL, 0);
 314 }
 315
 316 float GetConfigValueFloat(const char *blockName, const char *keyName, float def)
 317 {
 318     const char *val = GetConfigValue(blockName, keyName, "");
 319
 320     if(!val[0]) return def;
 321 #ifdef HAVE_STRTOF
 322     return strtof(val, NULL);
 323 #else
 324     return (float)strtod(val, NULL);
 325 #endif
 326 }
 327
 328 int GetConfigValueBool(const char *blockName, const char *keyName, int def)
 329 {
 330     const char *val = GetConfigValue(blockName, keyName, "");
 331
 332     if(!val[0]) return !!def;
 333     return (strcasecmp(val, "true") == 0 || strcasecmp(val, "yes") == 0 ||
 334             strcasecmp(val, "on") == 0 || atoi(val) != 0);
 335 }