alc/alconfig.cpp

   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.,
  17  *  51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
  18  * Or go to http://www.gnu.org/copyleft/lgpl.html
  19  */
  20
  21 #include "config.h"
  22
  23 #include "alconfig.h"
  24
  25 #ifdef _WIN32
  26 #include <windows.h>
  27 #include <shlobj.h>
  28 #endif
  29 #ifdef __APPLE__
  30 #include <CoreFoundation/CoreFoundation.h>
  31 #endif
  32
  33 #include <algorithm>
  34 #include <array>
  35 #include <cctype>
  36 #include <cstdlib>
  37 #include <filesystem>
  38 #include <fstream>
  39 #include <istream>
  40 #include <limits>
  41 #include <string>
  42 #include <string_view>
  43 #include <utility>
  44 #include <vector>
  45
  46 #include "almalloc.h"
  47 #include "alstring.h"
  48 #include "core/helpers.h"
  49 #include "core/logging.h"
  50 #include "strutils.h"
  51
  52 #if defined(ALSOFT_UWP)
  53 #include <winrt/Windows.Media.Core.h> // !!This is important!!
  54 #include <winrt/Windows.Storage.h>
  55 #include <winrt/Windows.Foundation.h>
  56 #include <winrt/Windows.Foundation.Collections.h>
  57 using namespace winrt;
  58 #endif
  59
  60 namespace {
  61
  62 using namespace std::string_view_literals;
  63
  64 #if defined(_WIN32) && !defined(_GAMING_XBOX) && !defined(ALSOFT_UWP)
  65 struct CoTaskMemDeleter {
  66     void operator()(void *mem) const { CoTaskMemFree(mem); }
  67 };
  68 #endif
  69
  70 struct ConfigEntry {
  71     std::string key;
  72     std::string value;
  73 };
  74 std::vector<ConfigEntry> ConfOpts;
  75
  76
  77 std::string &lstrip(std::string &line)
  78 {
  79     size_t pos{0};
  80     while(pos < line.length() && std::isspace(line[pos]))
  81         ++pos;
  82     line.erase(0, pos);
  83     return line;
  84 }
  85
  86 bool readline(std::istream &f, std::string &output)
  87 {
  88     while(f.good() && f.peek() == '\n')
  89         f.ignore();
  90
  91     return std::getline(f, output) && !output.empty();
  92 }
  93
  94 std::string expdup(std::string_view str)
  95 {
  96     std::string output;
  97
  98     while(!str.empty())
  99     {
 100         if(auto nextpos = str.find('$'))
 101         {
 102             output += str.substr(0, nextpos);
 103             if(nextpos == std::string_view::npos)
 104                 break;
 105
 106             str.remove_prefix(nextpos);
 107         }
 108
 109         str.remove_prefix(1);
 110         if(str.empty())
 111         {
 112             output += '$';
 113             break;
 114         }
 115         if(str.front() == '$')
 116         {
 117             output += '$';
 118             str.remove_prefix(1);
 119             continue;
 120         }
 121
 122         const bool hasbraces{str.front() == '{'};
 123         if(hasbraces) str.remove_prefix(1);
 124
 125         size_t envend{0};
 126         while(envend < str.size() && (std::isalnum(str[envend]) || str[envend] == '_'))
 127             ++envend;
 128         if(hasbraces && (envend == str.size() || str[envend] != '}'))
 129             continue;
 130         const std::string envname{str.substr(0, envend)};
 131         if(hasbraces) ++envend;
 132         str.remove_prefix(envend);
 133
 134         if(auto envval = al::getenv(envname.c_str()))
 135             output += *envval;
 136     }
 137
 138     return output;
 139 }
 140
 141 void LoadConfigFromFile(std::istream &f)
 142 {
 143     std::string curSection;
 144     std::string buffer;
 145
 146     while(readline(f, buffer))
 147     {
 148         if(lstrip(buffer).empty())
 149             continue;
 150
 151         if(buffer[0] == '[')
 152         {
 153             auto endpos = buffer.find(']', 1);
 154             if(endpos == 1 || endpos == std::string::npos)
 155             {
 156                 ERR(" config parse error: bad line \"%s\"\n", buffer.c_str());
 157                 continue;
 158             }
 159             if(buffer[endpos+1] != '\0')
 160             {
 161                 size_t last{endpos+1};
 162                 while(last < buffer.size() && std::isspace(buffer[last]))
 163                     ++last;
 164
 165                 if(last < buffer.size() && buffer[last] != '#')
 166                 {
 167                     ERR(" config parse error: bad line \"%s\"\n", buffer.c_str());
 168                     continue;
 169                 }
 170             }
 171
 172             auto section = std::string_view{buffer}.substr(1, endpos-1);
 173
 174             curSection.clear();
 175             if(al::case_compare(section, "general"sv) != 0)
 176             {
 177                 do {
 178                     auto nextp = section.find('%');
 179                     if(nextp == std::string_view::npos)
 180                     {
 181                         curSection += section;
 182                         break;
 183                     }
 184
 185                     curSection += section.substr(0, nextp);
 186                     section.remove_prefix(nextp);
 187
 188                     if(section.size() > 2 &&
 189                        ((section[1] >= '0' && section[1] <= '9') ||
 190                         (section[1] >= 'a' && section[1] <= 'f') ||
 191                         (section[1] >= 'A' && section[1] <= 'F')) &&
 192                        ((section[2] >= '0' && section[2] <= '9') ||
 193                         (section[2] >= 'a' && section[2] <= 'f') ||
 194                         (section[2] >= 'A' && section[2] <= 'F')))
 195                     {
 196                         int b{0};
 197                         if(section[1] >= '0' && section[1] <= '9')
 198                             b = (section[1]-'0') << 4;
 199                         else if(section[1] >= 'a' && section[1] <= 'f')
 200                             b = (section[1]-'a'+0xa) << 4;
 201                         else if(section[1] >= 'A' && section[1] <= 'F')
 202                             b = (section[1]-'A'+0x0a) << 4;
 203                         if(section[2] >= '0' && section[2] <= '9')
 204                             b |= (section[2]-'0');
 205                         else if(section[2] >= 'a' && section[2] <= 'f')
 206                             b |= (section[2]-'a'+0xa);
 207                         else if(section[2] >= 'A' && section[2] <= 'F')
 208                             b |= (section[2]-'A'+0x0a);
 209                         curSection += static_cast<char>(b);
 210                         section.remove_prefix(3);
 211                     }
 212                     else if(section.size() > 1 && section[1] == '%')
 213                     {
 214                         curSection += '%';
 215                         section.remove_prefix(2);
 216                     }
 217                     else
 218                     {
 219                         curSection += '%';
 220                         section.remove_prefix(1);
 221                     }
 222                 } while(!section.empty());
 223             }
 224
 225             continue;
 226         }
 227
 228         auto cmtpos = std::min(buffer.find('#'), buffer.size());
 229         while(cmtpos > 0 && std::isspace(buffer[cmtpos-1]))
 230             --cmtpos;
 231         if(!cmtpos) continue;
 232         buffer.erase(cmtpos);
 233
 234         auto sep = buffer.find('=');
 235         if(sep == std::string::npos)
 236         {
 237             ERR(" config parse error: malformed option line: \"%s\"\n", buffer.c_str());
 238             continue;
 239         }
 240         auto keypart = std::string_view{buffer}.substr(0, sep++);
 241         while(!keypart.empty() && std::isspace(keypart.back()))
 242             keypart.remove_suffix(1);
 243         if(keypart.empty())
 244         {
 245             ERR(" config parse error: malformed option line: \"%s\"\n", buffer.c_str());
 246             continue;
 247         }
 248         auto valpart = std::string_view{buffer}.substr(sep);
 249         while(!valpart.empty() && std::isspace(valpart.front()))
 250             valpart.remove_prefix(1);
 251
 252         std::string fullKey;
 253         if(!curSection.empty())
 254         {
 255             fullKey += curSection;
 256             fullKey += '/';
 257         }
 258         fullKey += keypart;
 259
 260         if(valpart.size() > size_t{std::numeric_limits<int>::max()})
 261         {
 262             ERR(" config parse error: value too long in line \"%s\"\n", buffer.c_str());
 263             continue;
 264         }
 265         if(valpart.size() > 1)
 266         {
 267             if((valpart.front() == '"' && valpart.back() == '"')
 268                 || (valpart.front() == '\'' && valpart.back() == '\''))
 269             {
 270                 valpart.remove_prefix(1);
 271                 valpart.remove_suffix(1);
 272             }
 273         }
 274
 275         TRACE(" setting '%s' = '%.*s'\n", fullKey.c_str(), al::sizei(valpart), valpart.data());
 276
 277         /* Check if we already have this option set */
 278         auto find_key = [&fullKey](const ConfigEntry &entry) -> bool
 279         { return entry.key == fullKey; };
 280         auto ent = std::find_if(ConfOpts.begin(), ConfOpts.end(), find_key);
 281         if(ent != ConfOpts.end())
 282         {
 283             if(!valpart.empty())
 284                 ent->value = expdup(valpart);
 285             else
 286                 ConfOpts.erase(ent);
 287         }
 288         else if(!valpart.empty())
 289             ConfOpts.emplace_back(ConfigEntry{std::move(fullKey), expdup(valpart)});
 290     }
 291     ConfOpts.shrink_to_fit();
 292 }
 293
 294 const char *GetConfigValue(const std::string_view devName, const std::string_view blockName,
 295     const std::string_view keyName)
 296 {
 297     if(keyName.empty())
 298         return nullptr;
 299
 300     std::string key;
 301     if(!blockName.empty() && al::case_compare(blockName, "general"sv) != 0)
 302     {
 303         key = blockName;
 304         key += '/';
 305     }
 306     if(!devName.empty())
 307     {
 308         key += devName;
 309         key += '/';
 310     }
 311     key += keyName;
 312
 313     auto iter = std::find_if(ConfOpts.cbegin(), ConfOpts.cend(),
 314         [&key](const ConfigEntry &entry) -> bool { return entry.key == key; });
 315     if(iter != ConfOpts.cend())
 316     {
 317         TRACE("Found option %s = \"%s\"\n", key.c_str(), iter->value.c_str());
 318         if(!iter->value.empty())
 319             return iter->value.c_str();
 320         return nullptr;
 321     }
 322
 323     if(devName.empty())
 324         return nullptr;
 325     return GetConfigValue({}, blockName, keyName);
 326 }
 327
 328 } // namespace
 329
 330
 331 #ifdef _WIN32
 332 void ReadALConfig()
 333 {
 334     namespace fs = std::filesystem;
 335     fs::path path;
 336
 337 #if !defined(_GAMING_XBOX)
 338     {
 339 #if !defined(ALSOFT_UWP)
 340         std::unique_ptr<WCHAR,CoTaskMemDeleter> bufstore;
 341         const HRESULT hr{SHGetKnownFolderPath(FOLDERID_RoamingAppData, KF_FLAG_DONT_UNEXPAND,
 342             nullptr, al::out_ptr(bufstore))};
 343         if(SUCCEEDED(hr))
 344         {
 345             const std::wstring_view buffer{bufstore.get()};
 346 #else
 347         winrt::Windows::Storage::ApplicationDataContainer localSettings = winrt::Windows::Storage::ApplicationData::Current().LocalSettings();
 348         auto bufstore = Windows::Storage::ApplicationData::Current().RoamingFolder().Path();
 349         std::wstring_view buffer{bufstore};
 350         {
 351 #endif
 352             path = fs::path{buffer};
 353             path /= L"alsoft.ini";
 354
 355             TRACE("Loading config %s...\n", path.u8string().c_str());
 356             if(std::ifstream f{path}; f.is_open())
 357                 LoadConfigFromFile(f);
 358         }
 359     }
 360 #endif
 361
 362     path = fs::u8path(GetProcBinary().path);
 363     if(!path.empty())
 364     {
 365         path /= "alsoft.ini";
 366         TRACE("Loading config %s...\n", path.u8string().c_str());
 367         if(std::ifstream f{path}; f.is_open())
 368             LoadConfigFromFile(f);
 369     }
 370
 371     if(auto confpath = al::getenv(L"ALSOFT_CONF"))
 372     {
 373         path = *confpath;
 374         TRACE("Loading config %s...\n", path.u8string().c_str());
 375         if(std::ifstream f{path}; f.is_open())
 376             LoadConfigFromFile(f);
 377     }
 378 }
 379
 380 #else
 381
 382 void ReadALConfig()
 383 {
 384     namespace fs = std::filesystem;
 385     fs::path path{"/etc/openal/alsoft.conf"};
 386
 387     TRACE("Loading config %s...\n", path.u8string().c_str());
 388     if(std::ifstream f{path}; f.is_open())
 389         LoadConfigFromFile(f);
 390
 391     std::string confpaths{al::getenv("XDG_CONFIG_DIRS").value_or("/etc/xdg")};
 392     /* Go through the list in reverse, since "the order of base directories
 393      * denotes their importance; the first directory listed is the most
 394      * important". Ergo, we need to load the settings from the later dirs
 395      * first so that the settings in the earlier dirs override them.
 396      */
 397     while(!confpaths.empty())
 398     {
 399         auto next = confpaths.rfind(':');
 400         if(next < confpaths.length())
 401         {
 402             path = fs::path{std::string_view{confpaths}.substr(next+1)}.lexically_normal();
 403             confpaths.erase(next);
 404         }
 405         else
 406         {
 407             path = fs::path{confpaths}.lexically_normal();
 408             confpaths.clear();
 409         }
 410
 411         if(!path.is_absolute())
 412             WARN("Ignoring XDG config dir: %s\n", path.u8string().c_str());
 413         else
 414         {
 415             path /= "alsoft.conf";
 416
 417             TRACE("Loading config %s...\n", path.u8string().c_str());
 418             if(std::ifstream f{path}; f.is_open())
 419                 LoadConfigFromFile(f);
 420         }
 421     }
 422
 423 #ifdef __APPLE__
 424     CFBundleRef mainBundle = CFBundleGetMainBundle();
 425     if(mainBundle)
 426     {
 427         CFURLRef configURL{CFBundleCopyResourceURL(mainBundle, CFSTR(".alsoftrc"), CFSTR(""),
 428             nullptr)};
 429
 430         std::array<unsigned char,PATH_MAX> fileName{};
 431         if(configURL && CFURLGetFileSystemRepresentation(configURL, true, fileName.data(), fileName.size()))
 432         {
 433             if(std::ifstream f{reinterpret_cast<char*>(fileName.data())}; f.is_open())
 434                 LoadConfigFromFile(f);
 435         }
 436     }
 437 #endif
 438
 439     if(auto homedir = al::getenv("HOME"))
 440     {
 441         path = *homedir;
 442         path /= ".alsoftrc";
 443
 444         TRACE("Loading config %s...\n", path.u8string().c_str());
 445         if(std::ifstream f{path}; f.is_open())
 446             LoadConfigFromFile(f);
 447     }
 448
 449     if(auto configdir = al::getenv("XDG_CONFIG_HOME"))
 450     {
 451         path = *configdir;
 452         path /= "alsoft.conf";
 453     }
 454     else
 455     {
 456         path.clear();
 457         if(auto homedir = al::getenv("HOME"))
 458         {
 459             path = *homedir;
 460             path /= ".config/alsoft.conf";
 461         }
 462     }
 463     if(!path.empty())
 464     {
 465         TRACE("Loading config %s...\n", path.u8string().c_str());
 466         if(std::ifstream f{path}; f.is_open())
 467             LoadConfigFromFile(f);
 468     }
 469
 470     path = GetProcBinary().path;
 471     if(!path.empty())
 472     {
 473         path /= "alsoft.conf";
 474
 475         TRACE("Loading config %s...\n", path.u8string().c_str());
 476         if(std::ifstream f{path}; f.is_open())
 477             LoadConfigFromFile(f);
 478     }
 479
 480     if(auto confname = al::getenv("ALSOFT_CONF"))
 481     {
 482         TRACE("Loading config %s...\n", confname->c_str());
 483         if(std::ifstream f{*confname}; f.is_open())
 484             LoadConfigFromFile(f);
 485     }
 486 }
 487 #endif
 488
 489 std::optional<std::string> ConfigValueStr(const std::string_view devName,
 490     const std::string_view blockName, const std::string_view keyName)
 491 {
 492     if(const char *val{GetConfigValue(devName, blockName, keyName)})
 493         return val;
 494     return std::nullopt;
 495 }
 496
 497 std::optional<int> ConfigValueInt(const std::string_view devName, const std::string_view blockName,
 498     const std::string_view keyName)
 499 {
 500     if(const char *val{GetConfigValue(devName, blockName, keyName)})
 501         return static_cast<int>(std::strtol(val, nullptr, 0));
 502     return std::nullopt;
 503 }
 504
 505 std::optional<unsigned int> ConfigValueUInt(const std::string_view devName,
 506     const std::string_view blockName, const std::string_view keyName)
 507 {
 508     if(const char *val{GetConfigValue(devName, blockName, keyName)})
 509         return static_cast<unsigned int>(std::strtoul(val, nullptr, 0));
 510     return std::nullopt;
 511 }
 512
 513 std::optional<float> ConfigValueFloat(const std::string_view devName,
 514     const std::string_view blockName, const std::string_view keyName)
 515 {
 516     if(const char *val{GetConfigValue(devName, blockName, keyName)})
 517         return std::strtof(val, nullptr);
 518     return std::nullopt;
 519 }
 520
 521 std::optional<bool> ConfigValueBool(const std::string_view devName,
 522     const std::string_view blockName, const std::string_view keyName)
 523 {
 524     if(const char *val{GetConfigValue(devName, blockName, keyName)})
 525         return al::strcasecmp(val, "on") == 0 || al::strcasecmp(val, "yes") == 0
 526             || al::strcasecmp(val, "true") == 0 || atoi(val) != 0;
 527     return std::nullopt;
 528 }
 529
 530 bool GetConfigValueBool(const std::string_view devName, const std::string_view blockName,
 531     const std::string_view keyName, bool def)
 532 {
 533     if(const char *val{GetConfigValue(devName, blockName, keyName)})
 534         return al::strcasecmp(val, "on") == 0 || al::strcasecmp(val, "yes") == 0
 535             || al::strcasecmp(val, "true") == 0 || atoi(val) != 0;
 536     return def;
 537 }