xmlrpc_value_utils.hpp

Go to the documentation of this file.

#pragma once
 
#include <array>
#include <limits>
#include <list>
#include <map>
#include <set>
#include <string>
#include <unordered_map>
#include <unordered_set>
#include <vector>
 
#include <dynamic_reconfigure/BoolParameter.h>
#include <dynamic_reconfigure/Config.h>
#include <dynamic_reconfigure/DoubleParameter.h>
#include <dynamic_reconfigure/IntParameter.h>
#include <dynamic_reconfigure/StrParameter.h>
#include <XmlRpcValue.h>
#include <XmlRpcException.h>
 
#include <cras_cpp_common/xmlrpc_value_traits.hpp>
 
namespace XmlRpc
{
// This prevents GTest to understand all XmlRpcValues as structs and trying to print them as such.
// That results in memory corruption and an exception thrown in GTest EXPECT* methods.
inline void PrintTo(const XmlRpcValue& value, ::std::ostream* os)
{
  if (os)
    *os << value.toXml();
}
}
 
namespace cras
{
 
inline bool convert(const ::XmlRpc::XmlRpcValue& x, ::XmlRpc::XmlRpcValue& v, bool /*skipNonConvertible*/ = false,
  ::std::list<::std::string>* errors = nullptr)
{
  v = x;
  return true;
}
 
inline bool convert(const ::XmlRpc::XmlRpcValue& x, bool& v, bool /*skipNonConvertible*/ = false,
  ::std::list<::std::string>* errors = nullptr)
{
  if (x.getType() == ::XmlRpc::XmlRpcValue::TypeBoolean)
  {
    v = x;
    return true;
  }
 
  if (x.getType() == ::XmlRpc::XmlRpcValue::TypeInt)
  {
    const auto i = static_cast<int>(x);
    if (i == 0 || i == 1)
    {
      v = static_cast<bool>(i);
      return true;
    }
    else if (errors != nullptr)
      errors->push_back(::cras::format("Cannot convert int value %i to boolean.", i));
  }
 
  if (errors != nullptr)
    errors->push_back(::cras::format("Cannot convert type %s to boolean.", ::cras::to_cstring(x.getType())));
  return false;
}
 
inline bool convert(const ::XmlRpc::XmlRpcValue& x, int& v, bool /*skipNonConvertible*/ = false,
  ::std::list<::std::string>* errors = nullptr)
{
  if (x.getType() == ::XmlRpc::XmlRpcValue::TypeInt)
  {
    v = x;
    return true;
  }
 
  if (errors != nullptr)
    errors->push_back(::cras::format("Cannot convert type %s to int.", ::cras::to_cstring(x.getType())));
 
  return false;
}
 
#define DEFINE_INTEGRAL_CONVERT(resultType, xmlType, minBound, maxBound) \
\
  inline bool convert(const ::XmlRpc::XmlRpcValue& x, resultType& v, bool skipNonConvertible = false, \
    ::std::list<::std::string>* errors = nullptr) \
  { \
    xmlType i; \
    if (!convert(x, i, skipNonConvertible, errors)) \
      return false; \
    if (i < (minBound) || i > (maxBound)) { \
      if (errors != nullptr) \
        errors->push_back(::cras::format("Value %s is out of bounds <%s, %s>.", \
          ::cras::to_string(i).c_str(), ::cras::to_string(minBound).c_str(), ::cras::to_string(maxBound).c_str())); \
      return false; \
    } \
    v = static_cast<resultType>(i); \
    return true; \
  }
 
DEFINE_INTEGRAL_CONVERT(char, int, CHAR_MIN, CHAR_MAX)
DEFINE_INTEGRAL_CONVERT(signed char, int, CHAR_MIN, CHAR_MAX)
DEFINE_INTEGRAL_CONVERT(short, int, SHRT_MIN, SHRT_MAX)  // NOLINT
DEFINE_INTEGRAL_CONVERT(long, int, LONG_MIN, LONG_MAX)  // NOLINT
DEFINE_INTEGRAL_CONVERT(long long, int, LONG_LONG_MIN, LONG_LONG_MAX)  // NOLINT
 
DEFINE_INTEGRAL_CONVERT(unsigned char, int, 0, UCHAR_MAX)
DEFINE_INTEGRAL_CONVERT(unsigned short, int, 0, USHRT_MAX)  // NOLINT
DEFINE_INTEGRAL_CONVERT(unsigned int, int, 0, UINT_MAX)
DEFINE_INTEGRAL_CONVERT(unsigned long, int, 0, ULONG_MAX)  // NOLINT
DEFINE_INTEGRAL_CONVERT(unsigned long long, int, 0, ULONG_LONG_MAX)  // NOLINT
 
inline bool convert(const ::XmlRpc::XmlRpcValue& x, double& v, bool /*skipNonConvertible*/ = false,
  ::std::list<::std::string>* errors = nullptr)
{
  if (x.getType() == ::XmlRpc::XmlRpcValue::TypeDouble)
  {
    v = x;
    return true;
  }
 
  if (x.getType() == ::XmlRpc::XmlRpcValue::TypeInt)
  {
    v = static_cast<double>(static_cast<int>(x));
    return true;
  }
 
  if (errors != nullptr)
    errors->push_back(::cras::format("Cannot convert type %s to double.", ::cras::to_cstring(x.getType())));
 
  return false;
}
 
#define DEFINE_DOUBLE_CONVERT(resultType, xmlType, minBound, maxBound) \
\
  inline bool convert(const ::XmlRpc::XmlRpcValue& x, resultType& v, bool skipNonConvertible = false, \
    ::std::list<::std::string>* errors = nullptr) \
  { \
    xmlType i; \
    if (!convert(x, i, skipNonConvertible, errors)) \
      return false; \
    if (::std::isnan(i)) { v = ::std::numeric_limits<resultType>::quiet_NaN(); return true; } \
    if (::std::isinf(i) && i > 0) { v = ::std::numeric_limits<resultType>::infinity(); return true; } \
    if (::std::isinf(i) && i < 0) { v = -::std::numeric_limits<resultType>::infinity(); return true; } \
    if (i < (minBound) || i > (maxBound)) { \
      if (errors != nullptr) \
        errors->push_back(::cras::format("Value %s is out of bounds <%s, %s>.", \
          ::cras::to_string(i).c_str(), ::cras::to_string(minBound).c_str(), ::cras::to_string(maxBound).c_str())); \
      return false; \
    } \
    v = static_cast<resultType>(i); \
    return true; \
  }
 
DEFINE_DOUBLE_CONVERT(float, double, -FLT_MAX, FLT_MAX)
DEFINE_DOUBLE_CONVERT(long double, double, -LDBL_MAX, LDBL_MAX)
 
inline bool convert(const ::XmlRpc::XmlRpcValue& x, std::string& v, bool /*skipNonConvertible*/ = false,
  ::std::list<::std::string>* errors = nullptr)
{
  if (x.getType() == ::XmlRpc::XmlRpcValue::TypeString)
  {
    v = static_cast<::std::string>(x);
    return true;
  }
 
  if (errors != nullptr)
    errors->push_back(::cras::format("Cannot convert type %s to string.", ::cras::to_cstring(x.getType())));
 
  return false;
}
 
// forward-declare container types so that they can be used by the other container converters (map inside vector etc.)
template<typename T>
inline bool convert(const ::XmlRpc::XmlRpcValue& x, ::std::map<::std::string, T>& v,
  bool skipNonConvertible = false, ::std::list<::std::string>* errors = nullptr);
 
template<typename T>
inline bool convert(const ::XmlRpc::XmlRpcValue& x, ::std::unordered_map<::std::string, T>& v,
  bool skipNonConvertible = false, ::std::list<::std::string>* errors = nullptr);
 
template<typename T>
inline bool convert(const ::XmlRpc::XmlRpcValue& x, ::std::vector<T>& v,
  bool skipNonConvertible = false, ::std::list<::std::string>* errors = nullptr);
 
template<typename T>
inline bool convert(const ::XmlRpc::XmlRpcValue& x, ::std::list<T>& v,
  bool skipNonConvertible = false, ::std::list<::std::string>* errors = nullptr);
 
template<typename T>
inline bool convert(const ::XmlRpc::XmlRpcValue& x, ::std::set<T>& v,
  bool skipNonConvertible = false, ::std::list<::std::string>* errors = nullptr);
 
template<typename T>
inline bool convert(const ::XmlRpc::XmlRpcValue& x, ::std::unordered_set<T>& v,
  bool skipNonConvertible = false, ::std::list<::std::string>* errors = nullptr);
 
template<typename T, size_t N>
inline bool convert(const ::XmlRpc::XmlRpcValue& x, ::std::array<T, N>& v,
  bool skipNonConvertible = false, ::std::list<::std::string>* errors = nullptr);
 
#define DEFINE_ARRAY_CONVERT(arrayType, insertFn) \
  template<typename T> \
  inline bool convert(const ::XmlRpc::XmlRpcValue& x, arrayType<T>& v, bool skipNonConvertible, \
    ::std::list<::std::string>* errors) \
  { \
    if (x.getType() != ::XmlRpc::XmlRpcValue::TypeArray) { \
      if (errors != nullptr) \
        errors->push_back(::cras::format("Cannot convert type %s to array.", ::cras::to_cstring(x.getType())));\
      return false; \
    } \
    v.clear(); \
    for (size_t i = 0; i < x.size(); ++i) \
    { \
      T t; \
      if (convert(x[i], t, skipNonConvertible, errors)) \
        v.insertFn(t); \
      else if (!skipNonConvertible) \
        return false; \
    } \
    return v.size() > 0 || x.size() == 0; \
  }
 
DEFINE_ARRAY_CONVERT(::std::vector, push_back)
DEFINE_ARRAY_CONVERT(::std::list, push_back)
DEFINE_ARRAY_CONVERT(::std::set, insert)
DEFINE_ARRAY_CONVERT(::std::unordered_set, insert)
 
template<typename T, size_t N>
inline bool convert(const ::XmlRpc::XmlRpcValue& x, ::std::array<T, N>& v, bool skipNonConvertible,
  ::std::list<::std::string>* errors)
{
  if (x.getType() != ::XmlRpc::XmlRpcValue::TypeArray)
  {
    if (errors != nullptr)
      errors->push_back(::cras::format("Cannot convert type %s to array.", ::cras::to_cstring(x.getType())));
    return false;
  }
  if (x.size() != N)
  {
    if (errors != nullptr)
      errors->push_back(::cras::format("The array is expected to have %i items, but %i was given.", N, x.size()));
    return false;
  }
  for (size_t i = 0; i < x.size(); ++i)
  {
    T t;
    if (convert(x[i], t, skipNonConvertible, errors))
      v[i] = t;
    else  // we cannot skip non-convertible values because we do not know what to use instead of them
      return false;
  }
  return true;
}
 
#define DEFINE_STRUCT_CONVERT(mapType) \
  template<typename T> \
  inline bool convert(const ::XmlRpc::XmlRpcValue& x, mapType<::std::string, T>& v, bool skipNonConvertible, \
    ::std::list<::std::string>* errors) \
  { \
    if (x.getType() != ::XmlRpc::XmlRpcValue::TypeStruct) { \
      if (errors != nullptr) \
        errors->push_back(::cras::format("Cannot convert type %s to struct.", ::cras::to_cstring(x.getType())));\
      return false; \
    } \
    v.clear(); \
    for (auto it = x.begin(); it != x.end(); ++it) \
    { \
      T t; \
      if (convert(it->second, t, skipNonConvertible, errors)) \
        v[it->first] = t; \
      else if (!skipNonConvertible) \
        return false; \
    } \
    return v.size() > 0 || x.size() == 0; \
  }
 
DEFINE_STRUCT_CONVERT(::std::map)
DEFINE_STRUCT_CONVERT(::std::unordered_map)
 
inline bool convert(const ::XmlRpc::XmlRpcValue& x, ::dynamic_reconfigure::Config& v, bool skipNonConvertible,
    ::std::list<::std::string>* errors)
{
  if (x.getType() != ::XmlRpc::XmlRpcValue::TypeStruct)
  {
    if (errors != nullptr)
      errors->push_back(::cras::format(
        "Cannot convert type %s to dynamic_reconfigure/Config.", ::cras::to_cstring(x.getType())));
    return false;
  }
  for (auto it = x.begin(); it != x.end(); ++it)
  {
    const auto& name = it->first;
    const auto& val = it->second;
    switch (val.getType())
    {
      case XmlRpc::XmlRpcValue::TypeBoolean:
      {
        dynamic_reconfigure::BoolParameter p;
        p.name = name;
        p.value = static_cast<bool>(val);
        v.bools.push_back(p);
        break;
      }
      case XmlRpc::XmlRpcValue::TypeInt:
      {
        dynamic_reconfigure::IntParameter p;
        p.name = name;
        p.value = static_cast<int>(val);
        v.ints.push_back(p);
        break;
      }
      case XmlRpc::XmlRpcValue::TypeDouble:
      {
        dynamic_reconfigure::DoubleParameter p;
        p.name = name;
        p.value = static_cast<double>(val);
        v.doubles.push_back(p);
        break;
      }
      case XmlRpc::XmlRpcValue::TypeString:
      {
        dynamic_reconfigure::StrParameter p;
        p.name = name;
        p.value = static_cast<std::string>(val);
        v.strs.push_back(p);
        break;
      }
      default:
      {
        if (errors != nullptr)
          errors->push_back(::cras::format("Field %s of type %s cannot be stored in dynamic_reconfigure/Config.",
            name.c_str(), ::cras::to_cstring(x.getType())));
        if (!skipNonConvertible)
          return false;
      }
    }
  }
  return true;
}
 
}