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