Variant.h

Go to the documentation of this file.

// Copyright 2019-2020 CERN and copyright holders of ALICE O2.
// See https://alice-o2.web.cern.ch/copyright for details of the copyright holders.
// All rights not expressly granted are reserved.
//
// This software is distributed under the terms of the GNU General Public
// License v3 (GPL Version 3), copied verbatim in the file "COPYING".
//
// In applying this license CERN does not waive the privileges and immunities
// granted to it by virtue of its status as an Intergovernmental Organization
// or submit itself to any jurisdiction.
#ifndef FRAMEWORK_VARIANT_H
#define FRAMEWORK_VARIANT_H
 
#include "Framework/RuntimeError.h"
#include "Framework/Array2D.h"
#include <type_traits>
#include <cstring>
#include <cstdint>
#include <cstdlib>
#include <iosfwd>
#include <initializer_list>
#include <string_view>
#include <vector>
#include <string>
 
namespace o2::framework
{
 
// Do NOT insert entries in this enum, only append at the end (before "Empty"). Hyperloop depends on the order.
enum class VariantType : int { Int = 0,
                               Int64,
                               Float,
                               Double,
                               String,
                               Bool,
                               ArrayInt,
                               ArrayFloat,
                               ArrayDouble,
                               ArrayBool,
                               ArrayString,
                               Array2DInt,
                               Array2DFloat,
                               Array2DDouble,
                               LabeledArrayInt,    // 2D array
                               LabeledArrayFloat,  // 2D array
                               LabeledArrayDouble, // 2D array
                               UInt8,
                               UInt16,
                               UInt32,
                               UInt64,
                               Int8,
                               Int16,
                               LabeledArrayString, // 2D array
                               Empty,
                               Dict,
                               Unknown };
 
template <VariantType V>
constexpr auto isArray()
{
  return (V == VariantType::ArrayBool ||
          V == VariantType::ArrayDouble ||
          V == VariantType::ArrayFloat ||
          V == VariantType::ArrayInt ||
          V == VariantType::ArrayString);
}
 
template <VariantType V>
constexpr auto isArray2D()
{
  return (V == VariantType::Array2DInt ||
          V == VariantType::Array2DFloat ||
          V == VariantType::Array2DDouble);
}
 
template <VariantType V>
constexpr auto isLabeledArrayString()
{
  return V == VariantType::LabeledArrayString;
}
 
template <VariantType V>
constexpr auto isLabeledArray()
{
  return (V == VariantType::LabeledArrayInt ||
          V == VariantType::LabeledArrayFloat ||
          V == VariantType::LabeledArrayDouble ||
          V == VariantType::LabeledArrayString);
}
 
template <VariantType V>
constexpr auto isSimpleVariant()
{
  return (V == VariantType::Int) ||
         (V == VariantType::Int8) ||
         (V == VariantType::Int16) ||
         (V == VariantType::Int64) ||
         (V == VariantType::UInt8) ||
         (V == VariantType::UInt16) ||
         (V == VariantType::UInt32) ||
         (V == VariantType::UInt64) ||
         (V == VariantType::Float) ||
         (V == VariantType::Double) ||
         (V == VariantType::Bool);
}
 
template <typename T>
struct variant_trait : std::integral_constant<VariantType, VariantType::Unknown> {
};
 
#define DECLARE_VARIANT_TRAIT(_Type1_, _Type2_)                                               \
  template <>                                                                                 \
  struct variant_trait<_Type1_> : std::integral_constant<VariantType, VariantType::_Type2_> { \
  };
 
DECLARE_VARIANT_TRAIT(int, Int);
DECLARE_VARIANT_TRAIT(int8_t, Int8);
DECLARE_VARIANT_TRAIT(int16_t, Int16);
DECLARE_VARIANT_TRAIT(long int, Int64);
DECLARE_VARIANT_TRAIT(long long int, Int64);
DECLARE_VARIANT_TRAIT(uint8_t, UInt8);
DECLARE_VARIANT_TRAIT(uint16_t, UInt16);
DECLARE_VARIANT_TRAIT(uint32_t, UInt32);
DECLARE_VARIANT_TRAIT(unsigned long int, UInt64);
DECLARE_VARIANT_TRAIT(unsigned long long int, UInt64);
 
DECLARE_VARIANT_TRAIT(float, Float);
DECLARE_VARIANT_TRAIT(double, Double);
DECLARE_VARIANT_TRAIT(bool, Bool);
 
DECLARE_VARIANT_TRAIT(const char*, String);
DECLARE_VARIANT_TRAIT(char*, String);
DECLARE_VARIANT_TRAIT(char* const, String);
DECLARE_VARIANT_TRAIT(const char* const, String);
DECLARE_VARIANT_TRAIT(std::string_view, String);
DECLARE_VARIANT_TRAIT(std::string, String);
 
DECLARE_VARIANT_TRAIT(int*, ArrayInt);
DECLARE_VARIANT_TRAIT(float*, ArrayFloat);
DECLARE_VARIANT_TRAIT(double*, ArrayDouble);
DECLARE_VARIANT_TRAIT(bool*, ArrayBool);
DECLARE_VARIANT_TRAIT(std::string*, ArrayString);
 
DECLARE_VARIANT_TRAIT(std::vector<int>, ArrayInt);
DECLARE_VARIANT_TRAIT(std::vector<float>, ArrayFloat);
DECLARE_VARIANT_TRAIT(std::vector<double>, ArrayDouble);
DECLARE_VARIANT_TRAIT(std::vector<bool>, ArrayBool);
DECLARE_VARIANT_TRAIT(std::vector<std::string>, ArrayString);
 
DECLARE_VARIANT_TRAIT(Array2D<int>, Array2DInt);
DECLARE_VARIANT_TRAIT(Array2D<float>, Array2DFloat);
DECLARE_VARIANT_TRAIT(Array2D<double>, Array2DDouble);
 
DECLARE_VARIANT_TRAIT(LabeledArray<int>, LabeledArrayInt);
DECLARE_VARIANT_TRAIT(LabeledArray<float>, LabeledArrayFloat);
DECLARE_VARIANT_TRAIT(LabeledArray<double>, LabeledArrayDouble);
DECLARE_VARIANT_TRAIT(LabeledArray<std::string>, LabeledArrayString);
 
template <typename T>
struct variant_array_symbol {
  constexpr static char symbol = 'u';
};
 
template <>
struct variant_array_symbol<int> {
  constexpr static char symbol = 'i';
};
 
template <>
struct variant_array_symbol<float> {
  constexpr static char symbol = 'f';
};
 
template <>
struct variant_array_symbol<double> {
  constexpr static char symbol = 'd';
};
 
template <>
struct variant_array_symbol<bool> {
  constexpr static char symbol = 'b';
};
 
template <>
struct variant_array_symbol<std::string> {
  constexpr static char symbol = 's';
};
 
template <typename T>
inline constexpr VariantType variant_trait_v = variant_trait<T>::value;
 
template <VariantType type>
struct variant_type {
};
 
#define DECLARE_VARIANT_TYPE(_Type1_, _Type2_) \
  template <>                                  \
  struct variant_type<VariantType::_Type2_> {  \
    using type = _Type1_;                      \
  };
 
DECLARE_VARIANT_TYPE(int, Int);
DECLARE_VARIANT_TYPE(int8_t, Int8);
DECLARE_VARIANT_TYPE(int16_t, Int16);
DECLARE_VARIANT_TYPE(int64_t, Int64);
DECLARE_VARIANT_TYPE(uint8_t, UInt8);
DECLARE_VARIANT_TYPE(uint16_t, UInt16);
DECLARE_VARIANT_TYPE(uint32_t, UInt32);
DECLARE_VARIANT_TYPE(uint64_t, UInt64);
DECLARE_VARIANT_TYPE(float, Float);
DECLARE_VARIANT_TYPE(double, Double);
DECLARE_VARIANT_TYPE(const char*, String);
DECLARE_VARIANT_TYPE(bool, Bool);
 
DECLARE_VARIANT_TYPE(int*, ArrayInt);
DECLARE_VARIANT_TYPE(float*, ArrayFloat);
DECLARE_VARIANT_TYPE(double*, ArrayDouble);
DECLARE_VARIANT_TYPE(bool*, ArrayBool);
DECLARE_VARIANT_TYPE(std::string*, ArrayString);
 
DECLARE_VARIANT_TYPE(Array2D<int>, Array2DInt);
DECLARE_VARIANT_TYPE(Array2D<float>, Array2DFloat);
DECLARE_VARIANT_TYPE(Array2D<double>, Array2DDouble);
 
DECLARE_VARIANT_TYPE(LabeledArray<int>, LabeledArrayInt);
DECLARE_VARIANT_TYPE(LabeledArray<float>, LabeledArrayFloat);
DECLARE_VARIANT_TYPE(LabeledArray<double>, LabeledArrayDouble);
DECLARE_VARIANT_TYPE(LabeledArray<std::string>, LabeledArrayString);
 
template <VariantType type>
struct variant_array_element_type {
};
 
#define DECLARE_VARIANT_ARRAY_ELEMENT_TYPE(_Type1_, _Type2_) \
  template <>                                                \
  struct variant_array_element_type<VariantType::_Type2_> {  \
    using type = _Type1_;                                    \
  };
 
DECLARE_VARIANT_ARRAY_ELEMENT_TYPE(int, ArrayInt);
DECLARE_VARIANT_ARRAY_ELEMENT_TYPE(int, Array2DInt);
DECLARE_VARIANT_ARRAY_ELEMENT_TYPE(float, ArrayFloat);
DECLARE_VARIANT_ARRAY_ELEMENT_TYPE(float, Array2DFloat);
DECLARE_VARIANT_ARRAY_ELEMENT_TYPE(double, ArrayDouble);
DECLARE_VARIANT_ARRAY_ELEMENT_TYPE(double, Array2DDouble);
DECLARE_VARIANT_ARRAY_ELEMENT_TYPE(bool, ArrayBool);
DECLARE_VARIANT_ARRAY_ELEMENT_TYPE(std::string, ArrayString);
 
DECLARE_VARIANT_ARRAY_ELEMENT_TYPE(int, LabeledArrayInt);
DECLARE_VARIANT_ARRAY_ELEMENT_TYPE(float, LabeledArrayFloat);
DECLARE_VARIANT_ARRAY_ELEMENT_TYPE(double, LabeledArrayDouble);
DECLARE_VARIANT_ARRAY_ELEMENT_TYPE(std::string, LabeledArrayString);
 
template <VariantType V>
using variant_array_element_type_t = typename variant_array_element_type<V>::type;
 
template <typename T>
struct variant_helper {
  static void set(void* store, T value)
  {
    new (reinterpret_cast<T*>(store)) T{};
    *(reinterpret_cast<T*>(store)) = value;
  }
  static void set(void* store, T values, size_t size)
  {
    *reinterpret_cast<T*>(store) = reinterpret_cast<T>(std::memcpy(std::malloc(size * sizeof(std::remove_pointer_t<T>)), reinterpret_cast<void*>(values), size * sizeof(std::remove_pointer_t<T>)));
  }
 
  static T get(const void* store) { return *(reinterpret_cast<const T*>(store)); }
};
 
template <>
struct variant_helper<std::vector<std::string>> {
  // Allocates a new store and copies into it.
  static void set(void* store, std::vector<std::string> value)
  {
    auto ptr = reinterpret_cast<std::vector<std::string>*>(store);
    new (ptr) std::vector<std::string>{value};
  }
 
  static std::vector<std::string> const& get(const void* store) { return *(reinterpret_cast<std::vector<std::string> const*>(store)); }
};
 
template <>
struct variant_helper<std::string*> {
  static void set(void* store, std::string* values, size_t size)
  {
    auto ptr = reinterpret_cast<std::vector<std::string>*>(store);
    new (ptr) std::vector<std::string>{values, values + size};
  }
 
  static std::string const* get(const void* store) { return (*(reinterpret_cast<std::vector<std::string> const*>(store))).data(); }
};
 
template <>
struct variant_helper<const char*> {
  static const char* get(const void* store) { return *reinterpret_cast<const char* const*>(store); }
 
  static void set(void* store, const char* value) { *reinterpret_cast<char**>(store) = strdup(value); }
};
 
template <>
struct variant_helper<std::string_view> {
  static std::string_view get(const void* store) { return std::string_view(*reinterpret_cast<const char* const*>(store)); }
 
  static void set(void* store, std::string_view value) { *reinterpret_cast<char**>(store) = strdup(value.data()); }
};
 
template <>
struct variant_helper<std::string> {
  static std::string get(const void* store) { return std::string(*reinterpret_cast<const char* const*>(store)); }
 
  static void set(void* store, std::string value) { *reinterpret_cast<char**>(store) = strdup(value.data()); }
};
 
class Variant
{
 public:
  Variant(VariantType type = VariantType::Unknown) : mType{type} {}
 
  template <typename T>
  Variant(T value) : mType{variant_trait_v<T>}
  {
    variant_helper<decltype(value)>::set(&mStore, value);
  }
 
  template <typename T>
  Variant(T values, size_t size) : mType{variant_trait_v<T>}, mSize{size}
  {
    variant_helper<T>::set(&mStore, values, mSize);
  }
 
  template <typename T>
  Variant(std::vector<T>& values) : mType{variant_trait_v<T*>}, mSize{values.size()}
  {
    variant_helper<T*>::set(&mStore, values.data(), mSize);
  }
 
  Variant(std::vector<std::string>& values) : mType{VariantType::ArrayString}, mSize{values.size()}
  {
    variant_helper<std::vector<std::string>>::set(&mStore, values);
  }
 
  template <typename T>
  Variant(std::initializer_list<T>)
  {
    static_assert(sizeof(T) == 0,
                  "brace-enclosed initializer list forbidden for Variant"
                  "\n did you accidentally put braces around the default value?");
  }
 
  Variant(const Variant& other);
  Variant(Variant&& other) noexcept;
  ~Variant();
  Variant& operator=(const Variant& other);
  Variant& operator=(Variant&& other) noexcept;
  template <typename T>
  Variant& operator=(std::vector<T>&& other) noexcept
  {
    *this = Variant(other);
    return *this;
  }
 
  template <typename T>
  T get() const
  {
    if (mType != variant_trait_v<T>) {
      throw runtime_error_f("Variant::get: Mismatch between types %d %d.", mType, variant_trait_v<T>);
    }
    return variant_helper<T>::get(&mStore);
  }
 
  template <typename T>
  [[nodiscard]] std::string const* get() const
    requires(std::same_as<std::string*, T>)
  {
    if (mType != VariantType::ArrayString) {
      throw runtime_error_f("Variant::get: Mismatch between types %d %d.", mType, VariantType::ArrayString);
    }
    return variant_helper<T>::get(&mStore);
  }
 
  template <typename T>
  void set(T value)
  {
    return variant_helper<T>::set(&mStore, value);
  }
 
  template <typename T>
  void set(T value, size_t size)
  {
    mSize = size;
    return variant_helper<T>::set(&mStore, value, mSize);
  }
 
  template <typename T>
  void set(std::vector<T>& values)
    requires(std::is_pod_v<T>)
  {
    return variant_helper<T*>::set(&mStore, values.data(), values.size());
  }
 
  template <typename T>
  void set(std::vector<T>& values)
    requires(std::is_same_v<T, std::string>)
  {
    return variant_helper<T*>::set(&mStore, values);
  }
 
  [[nodiscard]] VariantType type() const { return mType; }
  [[nodiscard]] size_t size() const { return mSize; }
  [[nodiscard]] std::string asString() const;
 
 private:
  friend std::ostream& operator<<(std::ostream& oss, Variant const& val);
  using storage_t = std::aligned_union<8, int, int8_t, int16_t, int64_t,
                                       uint8_t, uint16_t, uint32_t, uint64_t,
                                       const char*, float, double, bool,
                                       int*, float*, double*, bool*, std::string*,
                                       Array2D<int>, Array2D<float>, Array2D<double>, Array2D<std::string>,
                                       LabeledArray<int>, LabeledArray<float>, LabeledArray<double>, LabeledArray<std::string>>::type;
  storage_t mStore;
  VariantType mType = VariantType::Unknown;
  size_t mSize = 1;
};
 
inline Variant emptyDict() { return Variant(VariantType::Dict); }
 
} // namespace o2::framework
 
#endif