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