#include "controller_interface.h"
#include "common/assert.h"
#include "common/log.h"
#include "common/string_util.h"
#include "core/controller.h"
#include "core/system.h"
#include <cmath>
Log_SetChannel(ControllerInterface);

ControllerInterface::ControllerInterface() = default;

ControllerInterface::~ControllerInterface() = default;

bool ControllerInterface::Initialize(CommonHostInterface* host_interface)
{
  m_host_interface = host_interface;
  return true;
}

void ControllerInterface::Shutdown()
{
  m_host_interface = nullptr;
}

void ControllerInterface::SetHook(Hook::Callback callback)
{
  std::unique_lock<std::mutex> lock(m_event_intercept_mutex);
  Assert(!m_event_intercept_callback);
  m_event_intercept_callback = std::move(callback);
}

void ControllerInterface::ClearHook()
{
  std::unique_lock<std::mutex> lock(m_event_intercept_mutex);
  if (m_event_intercept_callback)
    m_event_intercept_callback = {};
}

bool ControllerInterface::DoEventHook(Hook::Type type, int controller_index, int button_or_axis_number,
                                      std::variant<float, std::string_view> value, bool track_history)
{
  std::unique_lock<std::mutex> lock(m_event_intercept_mutex);
  if (!m_event_intercept_callback)
    return false;

  const Hook ei{type, controller_index, button_or_axis_number, std::move(value), track_history};
  const Hook::CallbackResult action = m_event_intercept_callback(ei);
  if (action == Hook::CallbackResult::StopMonitoring)
    m_event_intercept_callback = {};

  return true;
}

void ControllerInterface::OnControllerConnected(int host_id)
{
  Log_InfoPrintf("Host controller %d connected, updating input map", host_id);
  m_host_interface->UpdateInputMap();
}

void ControllerInterface::OnControllerDisconnected(int host_id)
{
  Log_InfoPrintf("Host controller %d disconnected, updating input map", host_id);
  m_host_interface->UpdateInputMap();
}

void ControllerInterface::ClearBindings() {}

bool ControllerInterface::BindControllerAxis(int controller_index, int axis_number, AxisSide axis_side,
                                             AxisCallback callback)
{
  return false;
}

bool ControllerInterface::BindControllerButton(int controller_index, int button_number, ButtonCallback callback)
{
  return false;
}

bool ControllerInterface::BindControllerAxisToButton(int controller_index, int axis_number, bool direction,
                                                     ButtonCallback callback)
{
  return false;
}

static constexpr std::array<const char*, static_cast<u32>(ControllerInterface::Backend::Count)> s_backend_names = {{
  TRANSLATABLE("ControllerInterface", "None"),
#ifdef WITH_SDL2
  TRANSLATABLE("ControllerInterface", "SDL"),
#endif
#ifdef WIN32
  TRANSLATABLE("ControllerInterface", "XInput"),
  TRANSLATABLE("ControllerInterface", "DInput"),
#endif
#ifdef ANDROID
  // Deliberately not translated as it's not exposed to users.
  "Android",
#endif
}};

std::optional<ControllerInterface::Backend> ControllerInterface::ParseBackendName(const char* name)
{
  for (u32 i = 0; i < static_cast<u32>(s_backend_names.size()); i++)
  {
    if (StringUtil::Strcasecmp(name, s_backend_names[i]) == 0)
      return static_cast<Backend>(i);
  }

  return std::nullopt;
}

const char* ControllerInterface::GetBackendName(Backend type)
{
  return s_backend_names[static_cast<u32>(type)];
}

ControllerInterface::Backend ControllerInterface::GetDefaultBackend()
{
#ifdef WITH_SDL2
  return Backend::SDL;
#endif
#ifdef WIN32
  return Backend::XInput;
#else
  return Backend::None;
#endif
}

#ifdef WITH_SDL2
#include "sdl_controller_interface.h"
#endif
#ifdef WIN32
#include "dinput_controller_interface.h"
#include "xinput_controller_interface.h"
#endif

std::unique_ptr<ControllerInterface> ControllerInterface::Create(Backend type)
{
#ifdef WITH_SDL2
  if (type == Backend::SDL)
    return std::make_unique<SDLControllerInterface>();
#endif
#ifdef WIN32
  if (type == Backend::XInput)
    return std::make_unique<XInputControllerInterface>();
  if (type == Backend::DInput)
    return std::make_unique<DInputControllerInterface>();
#endif

  return {};
}