js_utilities.hpp

#pragma once
#if defined(QT_CORE_LIB)
#include <ossia/detail/optional.hpp>
#include <ossia/network/base/node.hpp>
#include <ossia/network/base/parameter_data.hpp>
#include <ossia/network/common/parameter_properties.hpp>
#include <ossia/network/dataspace/dataspace_visitors.hpp>
#include <ossia/network/generic/generic_node.hpp>
#include <ossia/network/value/value.hpp>
#include <ossia/preset/preset.hpp>
 
#include <ossia-qt/metatypes.hpp>
#include <ossia-qt/name_utils.hpp>
 
#include <QDebug>
#include <QHash>
#include <QLineF>
#include <QMetaEnum>
#include <QPoint>
#include <QRectF>
#include <QString>
#include <QStringBuilder>
#include <QTime>
#include <QVariant>
#include <QVariantList>
#include <QtGui/QColor>
#include <QtGui/QQuaternion>
#include <QtGui/QVector2D>
#include <QtGui/QVector3D>
#include <QtGui/QVector4D>
 
#if defined(QT_QML_LIB)
#include <ossia-qt/qml_context.hpp>
 
#include <QJSEngine>
#include <QJSValue>
#include <QJSValueIterator>
#include <QQmlExtensionPlugin>
#include <QQmlProperty>
#endif
namespace ossia::qt
{
 
template <std::size_t N>
struct QArray
{
};
 
template <>
struct QArray<2>
{
  using type = QVector2D;
};
template <>
struct QArray<3>
{
  using type = QVector3D;
};
template <>
struct QArray<4>
{
  using type = QVector4D;
};
 
#if defined(QT_QML_LIB)
template <typename T>
struct matching_ossia_enum
{
};
template <>
struct matching_ossia_enum<ossia::val_type>
{
  using type = qml_val_type::val_type;
};
template <>
struct matching_ossia_enum<ossia::access_mode>
{
  using type = qml_access_mode::access_mode;
};
template <>
struct matching_ossia_enum<ossia::bounding_mode>
{
  using type = qml_bounding_mode::bounding_mode;
};
template <>
struct matching_ossia_enum<ossia::repetition_filter>
{
  using type = qml_rep_filter::repetition_filter;
};
 
struct OSSIA_EXPORT js_value_inbound_visitor
{
  const QJSValue& val;
 
public:
  ossia::value operator()(impulse) const;
 
  ossia::value operator()(int32_t v) const;
  ossia::value operator()(float v) const;
  ossia::value operator()(bool v) const;
  ossia::value operator()(char v) const;
 
  ossia::value operator()(const std::string& v) const;
  ossia::value operator()(const std::vector<ossia::value>& v) const;
  ossia::value operator()(const value_map_type& v) const;
 
  ossia::value operator()(vec2f v) const;
  ossia::value operator()(vec3f v) const;
  ossia::value operator()(vec4f v) const;
 
  ossia::value operator()() const;
};
#endif
 
struct OSSIA_EXPORT variant_inbound_visitor
{
  const QVariant& val;
 
public:
  ossia::value operator()(impulse) const;
 
  ossia::value operator()(int32_t v) const;
  ossia::value operator()(float v) const;
  ossia::value operator()(bool v) const;
  ossia::value operator()(char v) const;
 
  ossia::value operator()(const std::string& v) const;
  ossia::value operator()(const std::vector<ossia::value>& v) const;
  ossia::value operator()(const value_map_type& v) const;
 
  ossia::value operator()(vec2f v) const;
  ossia::value operator()(vec3f v) const;
  ossia::value operator()(vec4f v) const;
 
  ossia::value operator()() const;
};
 
struct OSSIA_EXPORT qt_to_ossia
{
  ossia::value operator()() { return ossia::impulse{}; }
  ossia::value operator()(bool v) { return v; }
  ossia::value operator()(QTime v) { return v.msec(); }
  ossia::value operator()(qint32 v) { return v; }
  ossia::value operator()(quint32 v) { return (int)v; }
  ossia::value operator()(qint64 v) { return (int)v; }
  ossia::value operator()(quint64 v) { return (int)v; }
  ossia::value operator()(char v) { return v; }
  ossia::value operator()(unsigned char v) { return (char)v; }
  ossia::value operator()(signed char v) { return (char)v; }
  ossia::value operator()(QChar v) { return v.toLatin1(); }
  ossia::value operator()(const QString& v) { return v.toStdString(); }
  ossia::value operator()(const QByteArray& v) { return v.toStdString(); }
  ossia::value operator()(const QByteArrayList& v)
  {
    std::vector<ossia::value> tpl;
    tpl.reserve(v.size());
    for(auto& val : v)
    {
      tpl.push_back(val.toStdString());
    }
    return tpl;
  }
  ossia::value operator()(float v) { return v; }
  ossia::value operator()(double v) { return v; }
  ossia::value operator()(QColor v)
  {
    return make_vec(v.alphaF(), v.redF(), v.greenF(), v.blueF());
  }
  ossia::value operator()(QPoint v) { return make_vec(v.x(), v.y()); }
  ossia::value operator()(QPointF v) { return make_vec(v.x(), v.y()); }
  ossia::value operator()(QSize v) { return make_vec(v.width(), v.height()); }
  ossia::value operator()(QSizeF v) { return make_vec(v.width(), v.height()); }
  ossia::value operator()(QRect v)
  {
    return make_vec(v.x(), v.y(), v.width(), v.height());
  }
  ossia::value operator()(QRectF v)
  {
    return make_vec(v.x(), v.y(), v.width(), v.height());
  }
  ossia::value operator()(QLine v)
  {
    return make_vec(v.p1().x(), v.p1().y(), v.p2().x(), v.p2().y());
  }
  ossia::value operator()(QLineF v)
  {
    return make_vec(v.p1().x(), v.p1().y(), v.p2().x(), v.p2().y());
  }
  ossia::value operator()(QVector2D v) { return make_vec(v.x(), v.y()); }
  ossia::value operator()(QVector3D v) { return make_vec(v.x(), v.y(), v.z()); }
  ossia::value operator()(QVector4D v) { return make_vec(v.x(), v.y(), v.z(), v.w()); }
  ossia::value operator()(QQuaternion v)
  {
    return make_vec(v.scalar(), v.x(), v.y(), v.z());
  }
  auto operator()(const QVariantList& v)
  {
    std::vector<ossia::value> tpl;
    tpl.reserve(v.size());
    for(auto& val : v)
    {
      tpl.push_back(qt_to_ossia{}(val));
    }
    return tpl;
  }
  auto operator()(const QVariantMap& v)
  {
    value_map_type tpl;
    tpl.reserve(v.size());
    for(auto it = v.cbegin(); it != v.cend(); ++it)
    {
      tpl.emplace_back(it.key().toStdString(), qt_to_ossia{}(it.value()));
    }
    return tpl;
  }
  auto operator()(const QVariantHash& v)
  {
    value_map_type tpl;
    tpl.reserve(v.size());
    for(auto it = v.cbegin(); it != v.cend(); ++it)
    {
      tpl.emplace_back(it.key().toStdString(), qt_to_ossia{}(it.value()));
    }
    return tpl;
  }
  ossia::value operator()(const QStringList& v)
  {
    std::vector<ossia::value> tpl;
    tpl.reserve(v.size());
    for(auto& val : v)
    {
      tpl.emplace_back(val.toStdString());
    }
    return tpl;
  }
  ossia::value operator()(const QDate& v) { return v.toString().toStdString(); }
 
  ossia::value operator()(const QVariant& v);
};
 
struct ossia_to_qvariant
{
  QVariant operator()(QMetaType::Type type, const ossia::value& ossia_val);
 
  QVariant operator()(impulse) const { return {}; }
 
  QVariant operator()(int32_t val) const { return val; }
 
  QVariant operator()(float val) const { return val; }
  QVariant operator()(bool val) const { return val; }
  QVariant operator()(char val) const { return val; }
 
  QVariant operator()(const std::string& val) const
  {
    return QString::fromStdString(val);
  }
 
  template <std::size_t N>
  [[nodiscard]] typename QArray<N>::type
  make_array(const std::array<float, N>& arr) const
  {
    typename QArray<N>::type vec;
 
    for(std::size_t i = 0U; i < N; i++)
      vec[i] = arr[i];
    return vec;
  }
 
  QVariant operator()(vec2f val) const { return make_array(val); }
  QVariant operator()(vec3f val) const { return make_array(val); }
  QVariant operator()(vec4f val) const { return make_array(val); }
 
  QVariant operator()() const { return {}; }
 
  QVariant operator()(const std::vector<ossia::value>& val) const
  {
    QVariantList v;
    v.reserve(val.size());
    for(const ossia::value& e : val)
    {
      v.push_back(e.apply(*this));
    }
    return v;
  }
 
  QVariant operator()(const value_map_type& val) const
  {
    QVariantMap v;
    for(const auto& [k, e] : val)
    {
      v.insert(QString::fromStdString(k), e.apply(*this));
    }
    return v;
  }
};
 
#if defined(QT_QML_LIB)
struct OSSIA_EXPORT js_value_outbound_visitor
{
  QJSEngine& engine;
 
  [[nodiscard]] QJSValue to_enum(qml_val_type::val_type t) const;
 
  QJSValue operator()(impulse) const;
 
  QJSValue operator()(int32_t val) const;
  QJSValue operator()(float val) const;
  QJSValue operator()(bool val) const;
 
  QJSValue operator()(const std::string& val) const;
 
  [[nodiscard]] QJSValue make_list(const std::vector<ossia::value>& arr) const;
 
  QJSValue operator()(const std::vector<ossia::value>& val) const;
  QJSValue operator()(const value_map_type& val) const;
 
  template <std::size_t N>
  QJSValue make_array(const std::array<float, N>& arr) const
  {
    auto array = engine.newArray(arr.size());
    int i = 0;
    for(auto child : arr)
    {
      array.setProperty(i++, child);
    }
 
    return array;
  }
 
  QJSValue operator()(vec2f val) const;
  QJSValue operator()(vec3f val) const;
  QJSValue operator()(vec4f val) const;
 
  QJSValue operator()() const;
};
 
struct OSSIA_EXPORT js_string_outbound_visitor
{
  QString operator()(impulse) const;
 
  QString operator()(int32_t val) const;
 
  QString operator()(float val) const;
  QString operator()(bool val) const;
  QString operator()(char val) const;
 
  QString operator()(const std::string& val) const;
 
  QString operator()(const std::vector<ossia::value>& val) const;
  QString operator()(const value_map_type& val) const;
 
  template <std::size_t N>
  QString make_array(const std::array<float, N>& arr) const
  {
    static_assert(N > 0, "N <= 0");
    QString s = "[";
 
    s += QString::number(arr[0]);
    for(std::size_t i = 1; i < N; i++)
    {
      s += ", " % QString::number(arr[i]);
    }
    s += "]";
    return s;
  }
 
  QString operator()(vec2f val) const;
  QString operator()(vec3f val) const;
  QString operator()(vec4f val) const;
 
  QString operator()() const;
};
struct OSSIA_EXPORT js_string_unquoted_outbound_visitor : js_string_outbound_visitor
{
  using js_string_outbound_visitor::operator();
  QString operator()(char val) const;
  QString operator()(const std::string& val) const;
};
 
OSSIA_EXPORT ossia::value value_from_js(const QJSValue& v);
 
inline ossia::value value_from_js(const ossia::value& cur, const QJSValue& v)
{
  return cur.apply(js_value_inbound_visitor{v});
}
 
inline QJSValue value_to_js_value(const ossia::value& cur, QJSEngine& engine)
{
  return cur.apply(js_value_outbound_visitor{engine});
}
 
inline QString value_to_js_string(const ossia::value& cur)
{
  return cur.apply(js_string_outbound_visitor{});
}
 
inline QString value_to_js_string_unquoted(const ossia::value& cur)
{
  return cur.apply(js_string_unquoted_outbound_visitor{});
}
 
template <typename T>
std::optional<T> get_enum(const QJSValue& val)
{
  if(val.isNumber())
  {
    const int n = val.toInt();
    if(n >= 0
       && n < QMetaEnum::fromType<typename matching_ossia_enum<T>::type>().keyCount())
    {
      return static_cast<T>(n);
    }
  }
  return {};
}
 
OSSIA_EXPORT
ossia::net::parameter_data make_parameter_data(const QJSValue& js);
 
void set_parameter_type(QMetaType::Type type, ossia::net::parameter_base& addr);
 
template <typename Device_T, typename Node_T, typename Protocol_T>
void create_device(Device_T& device, QJSValue root);
 
template <typename Device_T, typename Node_T, typename Protocol_T>
void create_node_rec(QJSValue js, Device_T& device, Node_T& parent);
 
template <typename Device_T, typename Node_T, typename Protocol_T>
void create_device(Device_T& device, QJSValue root)
{
  if(!root.isArray())
    return;
 
  QJSValueIterator it(root);
  while(it.hasNext())
  {
    it.next();
    create_node_rec<Device_T, Node_T, Protocol_T>(
        it.value(), device, static_cast<Node_T&>(device.get_root_node()));
  }
}
 
template <typename Device_T, typename Node_T, typename Protocol_T>
void create_node_rec(QJSValue js, Device_T& device, Node_T& parent)
{
  auto data = Protocol_T::read_data(js);
  if(data.name.empty())
    return;
 
  auto node = new Node_T{std::move(data), device, parent};
  parent.add_child(std::unique_ptr<ossia::net::node_base>(node));
 
  device.on_node_created(*node);
 
  QJSValue children = js.property("children");
  if(!children.isArray())
    return;
 
  QJSValueIterator it(children);
  while(it.hasNext())
  {
    it.next();
    create_node_rec<Device_T, Node_T, Protocol_T>(it.value(), device, *node);
  }
}
 
template <typename Data>
struct deferred_js_node
{
  Data data;
  std::vector<deferred_js_node> children;
};
 
template <typename Data, typename Protocol_T>
void create_node_deferred_rec(QJSValue js, deferred_js_node<Data>& parent)
{
  auto data = Protocol_T::read_data(js);
  if(data.name.empty())
    return;
 
  parent.children.push_back(deferred_js_node<Data>{std::move(data), {}});
 
  QJSValue children = js.property("children");
  if(!children.isArray())
    return;
 
  deferred_js_node<Data>& node = parent.children.back();
 
  node.children.reserve(children.property("length").toInt());
  QJSValueIterator it(children);
  while(it.hasNext())
  {
    it.next();
    create_node_deferred_rec<Data, Protocol_T>(it.value(), node);
  }
}
 
template <typename Protocol_T>
auto create_device_nodes_deferred(QJSValue root)
{
  using data_type = decltype(Protocol_T::read_data(root));
  deferred_js_node<data_type> node_root;
 
  if(!root.isArray())
    return node_root;
 
  node_root.children.reserve(root.property("length").toInt());
  QJSValueIterator it(root);
  while(it.hasNext())
  {
    it.next();
    create_node_deferred_rec<data_type, Protocol_T>(it.value(), node_root);
  }
 
  return node_root;
}
 
template <typename Device_T, typename Node_T, typename Data>
void apply_deferred_device_rec(
    Device_T& device, Node_T& parent_ossia, deferred_js_node<Data>& node_js)
{
  auto node = new Node_T{std::move(node_js.data), device, parent_ossia};
  parent_ossia.add_child(std::unique_ptr<ossia::net::node_base>(node));
 
  for(auto& cld : node_js.children)
  {
    apply_deferred_device_rec<Device_T, Node_T, Data>(device, *node, cld);
  }
}
 
void device_creation_notify_recursively(ossia::net::device_base& device, auto& root_node)
{
  for(auto& node : root_node.children())
  {
    device.on_node_created(*node);
    if(auto p = node->get_parameter())
      device.on_parameter_created(*p);
 
    device_creation_notify_recursively(device, *node);
  }
}
 
template <typename Device_T, typename Node_T, typename Data>
void apply_deferred_device(Device_T& device, deferred_js_node<Data>& root)
{
  auto& nroot = static_cast<Node_T&>(device.get_root_node());
  for(auto& cld : root.children)
  {
    apply_deferred_device_rec<Device_T, Node_T, Data>(device, nroot, cld);
  }
 
  device_creation_notify_recursively(device, nroot);
}
 
template <typename Methods>
QMetaObject::Connection connectSignalToMatchingMethod(
    const QMetaMethod& sig, Methods& meth, QObject* source, QObject* target)
{
  switch(sig.parameterCount())
  {
    case 0: {
      return QObject::connect(source, sig, target, meth[QMetaType::UnknownType]);
    }
    case 1: {
      auto t = sig.parameterType(0);
 
      auto method_it = meth.find((QMetaType::Type)t);
      if(method_it != meth.end())
      {
        return QObject::connect(source, sig, target, method_it->second);
      }
      break;
    }
  }
  return {};
}
 
template <typename Methods>
QMetaObject::Connection connectSignalToMatchingMethod(
    const QQmlProperty& prop, Methods& methods, QMetaMethod variantMethod,
    QObject* source, QObject* target)
{
  auto meth = prop.method();
 
  switch(meth.parameterCount())
  {
    case 0: {
      return QObject::connect(source, prop.method(), target, variantMethod);
    }
    case 1: {
      auto t = meth.parameterType(0);
 
      auto method_it = methods.find((QMetaType::Type)t);
      if(method_it != methods.end())
      {
        return QObject::connect(source, prop.method(), target, method_it->second);
      }
      break;
    }
  }
  return {};
}
#endif
}
 
OSSIA_EXPORT QDebug operator<<(QDebug s, const ossia::value& v);
 
W_REGISTER_ARGTYPE(QJSValue)
 
Q_DECLARE_METATYPE(QJSValueList)
W_REGISTER_ARGTYPE(QJSValueList)
 
#else
#error This file requires Qt.
#endif