/**
 * Copyright (c) 2006-2023 LOVE Development Team
 *
 * This software is provided 'as-is', without any express or implied
 * warranty.  In no event will the authors be held liable for any damages
 * arising from the use of this software.
 *
 * Permission is granted to anyone to use this software for any purpose,
 * including commercial applications, and to alter it and redistribute it
 * freely, subject to the following restrictions:
 *
 * 1. The origin of this software must not be misrepresented; you must not
 *    claim that you wrote the original software. If you use this software
 *    in a product, an acknowledgment in the product documentation would be
 *    appreciated but is not required.
 * 2. Altered source versions must be plainly marked as such, and must not be
 *    misrepresented as being the original software.
 * 3. This notice may not be removed or altered from any source distribution.
 **/

// LOVE
#include "Sensor.h"

// SDL
#include <SDL.h>
#include <SDL_sensor.h>

namespace love
{
namespace sensor
{
namespace sdl
{

Sensor::Sensor()
: sensors()
{
	if (SDL_InitSubSystem(SDL_INIT_SENSOR) < 0)
		throw love::Exception("Could not initialize SDL sensor subsystem (%s)", SDL_GetError());
}

Sensor::~Sensor()
{
	SDL_QuitSubSystem(SDL_INIT_SENSOR);
}

const char *Sensor::getName() const
{
	return "love.sensor.sdl";
}

bool Sensor::hasSensor(SensorType type)
{
	for (int i = 0; i < SDL_NumSensors(); i++)
	{
		if (convert(SDL_SensorGetDeviceType(i)) == type)
			return true;
	}

	return false;
}

bool Sensor::isEnabled(SensorType type)
{
	return sensors[type]; // nullptr is default
}

void Sensor::setEnabled(SensorType type, bool enable)
{
	if (sensors[type] && !enable)
	{
		SDL_SensorClose(sensors[type]);
		sensors[type] = nullptr;
	}
	else if (sensors[type] == nullptr && enable)
	{
		for (int i = 0; i < SDL_NumSensors(); i++)
		{
			if (convert(SDL_SensorGetDeviceType(i)) == type)
			{
				SDL_Sensor *sensorHandle = SDL_SensorOpen(i);

				if (sensorHandle == nullptr)
				{
					const char *name = nullptr;
					getConstant(type, name);

					throw love::Exception("Could not open \"%s\" SDL sensor (%s)", name, SDL_GetError());
				}

				sensors[type] = sensorHandle;
			}
		}
	}
}

std::vector<float> Sensor::getData(SensorType type)
{
	if (sensors[type] == nullptr)
	{
		const char *name = nullptr;
		getConstant(type, name);

		throw love::Exception("\"%s\" sensor is not enabled", name);
	}

	std::vector<float> values(3);

	if (SDL_SensorGetData(sensors[type], values.data(), (int) values.size()) != 0)
	{
		const char *name = nullptr;
		getConstant(type, name);

		throw love::Exception("Could not get \"%s\" SDL sensor data (%s)", name, SDL_GetError());
	}

	return values;
}

std::vector<void*> Sensor::getHandles()
{
	std::vector<void*> nativeSensor;

	for (const std::pair<SensorType, SDL_Sensor*> &data: sensors)
	{
		if (data.second)
			nativeSensor.push_back(data.second);
	}

	return nativeSensor;
}

const char *Sensor::getSensorName(SensorType type)
{
	if (sensors[type] == nullptr)
	{
		const char *name = nullptr;
		getConstant(type, name);

		throw love::Exception("\"%s\" sensor is not enabled", name);
	}

	return SDL_SensorGetName(sensors[type]);
}

Sensor::SensorType Sensor::convert(SDL_SensorType type)
{
	switch (type)
	{
		case SDL_SENSOR_ACCEL:
			return SENSOR_ACCELEROMETER;
		case SDL_SENSOR_GYRO:
			return SENSOR_GYROSCOPE;
		default:
			return SENSOR_MAX_ENUM;
	}
}

SDL_SensorType Sensor::convert(Sensor::SensorType type)
{
	switch (type)
	{
		case SENSOR_ACCELEROMETER:
			return SDL_SENSOR_ACCEL;
		case SENSOR_GYROSCOPE:
			return SDL_SENSOR_GYRO;
		default:
			return SDL_SENSOR_UNKNOWN;
	}
}

}
}
}
