projects/stargazer/plugins/other/radius/config.cpp

   1 /*
   2  *    This program is free software; you can redistribute it and/or modify
   3  *    it under the terms of the GNU General Public License as published by
   4  *    the Free Software Foundation; either version 2 of the License, or
   5  *    (at your option) any later version.
   6  *
   7  *    This program is distributed in the hope that it will be useful,
   8  *    but WITHOUT ANY WARRANTY; without even the implied warranty of
   9  *    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  10  *    GNU General Public License for more details.
  11  *
  12  *    You should have received a copy of the GNU General Public License
  13  *    along with this program; if not, write to the Free Software
  14  *    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  15  */
  16
  17 /*
  18  *    Author : Maxim Mamontov <faust@stargazer.dp.ua>
  19  */
  20
  21 #include "config.h"
  22
  23 #include "stg/common.h"
  24
  25 #include <vector>
  26 #include <stdexcept>
  27
  28 #include <strings.h> // strncasecmp
  29
  30 using STG::Config;
  31
  32 namespace
  33 {
  34
  35 struct ParserError : public std::runtime_error
  36 {
  37     ParserError(size_t pos, const std::string& message)
  38         : runtime_error("Parsing error at position " + x2str(pos) + ". " + message),
  39           position(pos),
  40           error(message)
  41     {}
  42     virtual ~ParserError() throw() {}
  43
  44     size_t position;
  45     std::string error;
  46 };
  47
  48 size_t skipSpaces(const std::string& value, size_t start)
  49 {
  50     while (start < value.length() && std::isspace(value[start]))
  51         ++start;
  52     return start;
  53 }
  54
  55 size_t checkChar(const std::string& value, size_t start, char ch)
  56 {
  57     if (start >= value.length())
  58         throw ParserError(start, "Unexpected end of string. Expected '" + std::string(1, ch) + "'.");
  59     if (value[start] != ch)
  60         throw ParserError(start, "Expected '" + std::string(1, ch) + "', got '" + std::string(1, value[start]) + "'.");
  61     return start + 1;
  62 }
  63
  64 std::pair<size_t, std::string> readString(const std::string& value, size_t start)
  65 {
  66     std::string dest;
  67     while (start < value.length() && !std::isspace(value[start]) &&
  68            value[start] != ',' && value[start] != '(' && value[start] != ')')
  69         dest.push_back(value[start++]);
  70     if (dest.empty()) {
  71         if (start == value.length())
  72             throw ParserError(start, "Unexpected end of string. Expected string.");
  73         else
  74             throw ParserError(start, "Unexpected whitespace. Expected string.");
  75     }
  76     return std::make_pair(start, dest);
  77 }
  78
  79 Config::Pairs toPairs(const std::vector<std::string>& values)
  80 {
  81     if (values.empty())
  82         return Config::Pairs();
  83     std::string value(values[0]);
  84     Config::Pairs res;
  85     size_t start = 0;
  86     while (start < value.size()) {
  87         Config::Pair pair;
  88         start = skipSpaces(value, start);
  89         if (!res.empty())
  90         {
  91             start = checkChar(value, start, ',');
  92             start = skipSpaces(value, start);
  93         }
  94         size_t pairStart = start;
  95         start = checkChar(value, start, '(');
  96         const std::pair<size_t, std::string> key = readString(value, start);
  97         start = key.first;
  98         pair.first = key.second;
  99         start = skipSpaces(value, start);
 100         start = checkChar(value, start, ',');
 101         start = skipSpaces(value, start);
 102         const std::pair<size_t, std::string> val = readString(value, start);
 103         start = val.first;
 104         pair.second = val.second;
 105         start = skipSpaces(value, start);
 106         start = checkChar(value, start, ')');
 107         if (res.find(pair.first) != res.end())
 108             throw ParserError(pairStart, "Duplicate field.");
 109         res.insert(pair);
 110     }
 111     return res;
 112 }
 113
 114 bool toBool(const std::vector<std::string>& values)
 115 {
 116     if (values.empty())
 117         return false;
 118     std::string value(values[0]);
 119     return strncasecmp(value.c_str(), "yes", 3) == 0;
 120 }
 121
 122 std::string toString(const std::vector<std::string>& values)
 123 {
 124     if (values.empty())
 125         return "";
 126     return values[0];
 127 }
 128
 129 template <typename T>
 130 T toInt(const std::vector<std::string>& values)
 131 {
 132     if (values.empty())
 133         return 0;
 134     T res = 0;
 135     if (str2x(values[0], res) == 0)
 136         return res;
 137     return 0;
 138 }
 139
 140 Config::Pairs parseVector(const std::string& paramName, const MODULE_SETTINGS& params)
 141 {
 142     for (size_t i = 0; i < params.moduleParams.size(); ++i)
 143         if (params.moduleParams[i].param == paramName)
 144             return toPairs(params.moduleParams[i].value);
 145     return Config::Pairs();
 146 }
 147
 148 bool parseBool(const std::string& paramName, const MODULE_SETTINGS& params)
 149 {
 150     for (size_t i = 0; i < params.moduleParams.size(); ++i)
 151         if (params.moduleParams[i].param == paramName)
 152             return toBool(params.moduleParams[i].value);
 153     return false;
 154 }
 155
 156 std::string parseString(const std::string& paramName, const MODULE_SETTINGS& params)
 157 {
 158     for (size_t i = 0; i < params.moduleParams.size(); ++i)
 159         if (params.moduleParams[i].param == paramName)
 160             return toString(params.moduleParams[i].value);
 161     return "";
 162 }
 163
 164 template <typename T>
 165 T parseInt(const std::string& paramName, const MODULE_SETTINGS& params)
 166 {
 167     for (size_t i = 0; i < params.moduleParams.size(); ++i)
 168         if (params.moduleParams[i].param == paramName)
 169             return toInt<T>(params.moduleParams[i].value);
 170     return 0;
 171 }
 172
 173 std::string parseAddress(const std::string& address)
 174 {
 175     size_t pos = address.find_first_of(':');
 176     if (pos == std::string::npos)
 177         throw ParserError(0, "Connection type is not specified. Should be either 'unix' or 'tcp'.");
 178     return address.substr(pos + 1);
 179 }
 180
 181 Config::Type parseConnectionType(const std::string& address)
 182 {
 183     size_t pos = address.find_first_of(':');
 184     if (pos == std::string::npos)
 185         throw ParserError(0, "Connection type is not specified. Should be either 'unix' or 'tcp'.");
 186     std::string type = ToLower(address.substr(0, pos));
 187     if (type == "unix")
 188         return Config::UNIX;
 189     else if (type == "tcp")
 190         return Config::TCP;
 191     throw ParserError(0, "Invalid connection type. Should be either 'unix' or 'tcp', got '" + type + "'");
 192 }
 193
 194 } // namespace anonymous
 195
 196 Config::Config(const MODULE_SETTINGS& settings)
 197     : match(parseVector("match", settings)),
 198       modify(parseVector("modify", settings)),
 199       reply(parseVector("reply", settings)),
 200       verbose(parseBool("verbose", settings)),
 201       address(parseString("bind_address", settings)),
 202       bindAddress(parseAddress(address)),
 203       connectionType(parseConnectionType(address)),
 204       portStr(parseString("port", settings)),
 205       port(parseInt<uint16_t>("port", settings)),
 206       key(parseString("key", settings))
 207 {
 208 }