IncaOnlineExperimentProxy.hpp

Go to the documentation of this file.

#ifndef PACEMAKER_INCA_COM_INCAONLINEEXPERIMENTPROXY_HPP_
#define PACEMAKER_INCA_COM_INCAONLINEEXPERIMENTPROXY_HPP_
 
#include <stdexcept>
#include <string>
#include <vector>
 
#include "pacemaker/inca/detail/COMProxy.hpp"
#include "pacemaker/inca/detail/DispatchWrapper.hpp"
#include "pacemaker/inca/detail/incacom.hpp"
 
#include "pacemaker/inca/com/CalibrationScalarDataProxy.hpp"
#include "pacemaker/inca/com/ExperimentDeviceProxy.hpp"
 
namespace pacemaker::inca::com
{
  struct IncaOnlineExperiment_DispatchWrapper : public pacemaker::inca::detail::DispatchWrapper<::IncaOnlineExperiment_Dispatch>
  {
    [[nodiscard]] auto GetAllDevices() -> std::vector<ExperimentDeviceProxy>
    {
      _variant_t device_list = ::IncaOnlineExperiment_Dispatch::GetAllDevices();
      if (device_list.vt != (VT_ARRAY | VT_VARIANT))
        throw std::runtime_error("GetAllDevices returned an unexpected type.");
 
      SAFEARRAY *psa = V_ARRAY(&device_list);
      long       lLower{}, lUpper{};
      SafeArrayGetLBound(psa, 1, &lLower);
      SafeArrayGetUBound(psa, 1, &lUpper);
 
      std::vector<ExperimentDeviceProxy> out{};
      out.reserve(static_cast<std::size_t>(lUpper - lLower + 1));
      for (long i{lLower}; i <= lUpper; ++i)
      {
        _variant_t device;
        if (FAILED(SafeArrayGetElement(psa, &i, &device)))
          throw std::runtime_error("GetAllDevices: SafeArrayGetElement failed");
 
        if (device.vt != VT_DISPATCH)
          throw std::runtime_error("GetAllDevices: device element is not VT_DISPATCH");
 
        auto idispatch = (IDispatch *)(device);
        out.emplace_back(idispatch);
      }
      return out;
    }
 
    [[nodiscard]] auto GetCalibrationValueInDevice(const std::string &name, ::ExperimentDevice_Dispatch *const device) -> CalibrationScalarDataProxy
    {
      ::IDispatch *raw = ::IncaOnlineExperiment_Dispatch::GetCalibrationValueInDevice(name.c_str(), device).Detach();
      if (raw == nullptr)
        throw std::runtime_error("GetCalibrationValueInDevice: parameter not found " + name);
      return CalibrationScalarDataProxy(raw);
    }
  };
 
  using IncaOnlineExperimentProxy = pacemaker::inca::detail::COMProxy<IncaOnlineExperiment_DispatchWrapper>;
} // namespace pacemaker::inca::com
#endif // PACEMAKER_INCA_COM_INCAONLINEEXPERIMENTPROXY_HPP_