#include <psemek/sdl2/cursor.hpp>
#include <psemek/log/log.hpp>
#include <psemek/util/enum.hpp>

#include <SDL2/SDL_mouse.h>

#include <memory>

namespace psemek::sdl2
{

	namespace
	{

		struct cursor_deleter
		{
			void operator() (SDL_Cursor * c) const
			{
				SDL_FreeCursor(c);
			}
		};

		using cursor_ptr = std::unique_ptr<SDL_Cursor, cursor_deleter>;

	}

	struct cursor
	{
		std::unique_ptr<SDL_Cursor, cursor_deleter> cursor;
	};

	namespace
	{

		SDL_Cursor * create_system_cursor(SDL_SystemCursor id)
		{
			auto cursor = SDL_CreateSystemCursor(id);
			if (!cursor)
				log::warning() << "Failed to create system cursor: " << SDL_GetError();
			return cursor;
		}

		struct system_cursor_provider_impl
			: cursor_provider
		{
			system_cursor_provider_impl()
			{
				arrow_.cursor.reset(create_system_cursor(SDL_SYSTEM_CURSOR_ARROW));
				beam_.cursor.reset(create_system_cursor(SDL_SYSTEM_CURSOR_IBEAM));
				hand_.cursor.reset(create_system_cursor(SDL_SYSTEM_CURSOR_HAND));
			}

			cursor const & get(cursor_type type) const override
			{
				switch (type)
				{
				case cursor_type::arrow: return arrow_;
				case cursor_type::beam: return beam_;
				case cursor_type::hand: return hand_;
				}

				throw util::unknown_enum_value_exception<cursor_type>(type);
			}

		private:
			cursor arrow_;
			cursor beam_;
			cursor hand_;
		};

	}

	std::unique_ptr<cursor_provider> system_cursor_provider()
	{
		return std::make_unique<system_cursor_provider_impl>();
	}

	static std::unique_ptr<cursor_provider> current_provider;

	std::unique_ptr<cursor_provider> set_cursor_provider(std::unique_ptr<cursor_provider> new_provider)
	{
		std::swap(current_provider, new_provider);
		return new_provider;
	}

	cursor_provider const * get_cursor_provider()
	{
		static std::unique_ptr<cursor_provider> fallback;

		if (current_provider)
			return current_provider.get();

		if (!fallback)
			fallback = system_cursor_provider();

		return fallback.get();
	}

	void set_cursor(cursor_type type)
	{
		SDL_SetCursor(get_cursor_provider()->get(type).cursor.get());
	}


}