// Copyright (C) 2016 Jérôme Leclercq, Arnaud Cadot
// This file is part of the "Nazara Development Kit"
// For conditions of distribution and use, see copyright notice in Prerequesites.hpp

#include <NDK/Lua/LuaBinding_SDK.hpp>
#include <NDK/LuaAPI.hpp>
#include <NDK/Lua/LuaBinding.hpp>
#include <NDK/Lua/LuaBinding_Utility.hpp>

#ifndef NDK_SERVER
#include <NDK/Lua/LuaBinding_Graphics.hpp>
#endif

namespace Ndk
{
	std::unique_ptr<LuaBinding_Base> LuaBinding_Base::BindSDK(LuaBinding& binding)
	{
		return std::make_unique<LuaBinding_SDK>(binding);
	}

	LuaBinding_SDK::LuaBinding_SDK(LuaBinding& binding) :
	LuaBinding_Base(binding)
	{
		#ifndef NDK_SERVER
		LuaBinding_Graphics& graphics = static_cast<LuaBinding_Graphics&>(*m_binding.graphics);
		#endif

		LuaBinding_Utility& utility = static_cast<LuaBinding_Utility&>(*m_binding.utility);

		/*********************************** Ndk::Application **********************************/
		application.Reset("Application");
		{
			#ifndef NDK_SERVER
			//application.SetMethod("AddWindow", &Application::AddWindow);

			application.BindMethod("EnableConsole",    &Application::EnableConsole);
			application.BindMethod("EnableFPSCounter", &Application::EnableFPSCounter);

			application.BindMethod("IsConsoleEnabled",    &Application::IsConsoleEnabled);
			application.BindMethod("IsFPSCounterEnabled", &Application::IsFPSCounterEnabled);
			#endif

			application.BindMethod("AddWorld", [] (Nz::LuaInstance& lua, Application* instance, std::size_t /*argumentCount*/) -> int
			{
				lua.Push(instance->AddWorld().CreateHandle());
				return 1;
			});

			application.BindMethod("GetUpdateTime", &Application::GetUpdateTime);
			application.BindMethod("Quit", &Application::Quit);
		}

		/*********************************** Ndk::Console **********************************/
		#ifndef NDK_SERVER
		console.Reset("Console");
		{
			console.Inherit<Nz::Node>(utility.node, [] (ConsoleHandle* handle) -> Nz::Node*
			{
				return handle->GetObject();
			});

			console.BindMethod("AddLine", &Console::AddLine, Nz::Color::White);
			console.BindMethod("Clear", &Console::Clear);
			console.BindMethod("GetCharacterSize", &Console::GetCharacterSize);
			//console.BindMethod("GetHistory", &Console::GetHistory);
			//console.BindMethod("GetInput", &Console::GetInput);
			console.BindMethod("GetTextFont", &Console::GetTextFont);

			console.BindMethod("SetCharacterSize", &Console::SetCharacterSize);
			console.BindMethod("SetTextFont", &Console::SetTextFont);
		}
		#endif

		/*********************************** Ndk::Entity **********************************/
		entity.Reset("Entity");
		{
			entity.BindMethod("Enable", &Entity::Enable, true);
			entity.BindMethod("GetId", &Entity::GetId);
			entity.BindMethod("GetWorld", &Entity::GetWorld);
			entity.BindMethod("Kill", &Entity::Kill);
			entity.BindMethod("IsEnabled", &Entity::IsEnabled);
			entity.BindMethod("IsValid", &Entity::IsValid);
			entity.BindMethod("RemoveAllComponents", &Entity::RemoveAllComponents);
			entity.BindMethod("__tostring", &EntityHandle::ToString);

			entity.BindMethod("AddComponent", [this] (Nz::LuaInstance& instance, EntityHandle& handle, std::size_t /*argumentCount*/) -> int
			{
				LuaBinding::ComponentBinding* binding = m_binding.QueryComponentIndex(instance);

				return binding->adder(instance, handle);
			});

			entity.BindMethod("GetComponent", [this] (Nz::LuaInstance& instance, EntityHandle& handle, std::size_t /*argumentCount*/) -> int
			{
				LuaBinding::ComponentBinding* binding = m_binding.QueryComponentIndex(instance);

				return binding->getter(instance, handle->GetComponent(binding->index));
			});

			entity.BindMethod("RemoveComponent", [this] (Nz::LuaInstance& instance, EntityHandle& handle, std::size_t /*argumentCount*/) -> int
			{
				LuaBinding::ComponentBinding* binding = m_binding.QueryComponentIndex(instance);

				handle->RemoveComponent(binding->index);
				return 0;
			});
		}

		/*********************************** Ndk::NodeComponent **********************************/
		nodeComponent.Reset("NodeComponent");
		{
			nodeComponent.Inherit<Nz::Node>(utility.node, [] (NodeComponentHandle* handle) -> Nz::Node*
			{
				return handle->GetObject();
			});
		}

		/*********************************** Ndk::VelocityComponent **********************************/
		velocityComponent.Reset("VelocityComponent");
		{
			velocityComponent.SetGetter([] (Nz::LuaInstance& lua, VelocityComponentHandle& instance)
			{
				std::size_t length;
				const char* member = lua.CheckString(2, &length);

				if (std::strcmp(member, "Linear") == 0)
				{
					lua.Push(instance->linearVelocity);
					return true;
				}

				return false;
			});

			velocityComponent.SetSetter([] (Nz::LuaInstance& lua, VelocityComponentHandle& instance)
			{
				std::size_t length;
				const char* member = lua.CheckString(2, &length);

				int argIndex = 3;
				if (std::strcmp(member, "Linear") == 0)
				{
					instance->linearVelocity = lua.Check<Nz::Vector3f>(&argIndex);
					return true;
				}

				return false;
			});
		}

		/*********************************** Ndk::World **********************************/
		world.Reset("World");
		{
			world.BindMethod("CreateEntity", &World::CreateEntity);
			world.BindMethod("CreateEntities", &World::CreateEntities);
			world.BindMethod("Clear", &World::Clear);
		}

		#ifndef NDK_SERVER
		/*********************************** Ndk::CameraComponent **********************************/
		cameraComponent.Reset("CameraComponent");
		{
			cameraComponent.Inherit<Nz::AbstractViewer>(graphics.abstractViewer, [] (CameraComponentHandle* handle) -> Nz::AbstractViewer*
			{
				return handle->GetObject();
			});

			cameraComponent.BindMethod("GetFOV", &Ndk::CameraComponent::GetFOV);
			cameraComponent.BindMethod("GetLayer", &Ndk::CameraComponent::GetLayer);

			cameraComponent.BindMethod("SetFOV", &Ndk::CameraComponent::SetFOV);
			cameraComponent.BindMethod("SetLayer", &Ndk::CameraComponent::SetLayer);
			cameraComponent.BindMethod("SetProjectionType", &Ndk::CameraComponent::SetProjectionType);
			cameraComponent.BindMethod("SetSize", (void(Ndk::CameraComponent::*)(const Nz::Vector2f&)) &Ndk::CameraComponent::SetSize);
			//cameraComponent.BindMethod("SetTarget", &Ndk::CameraComponent::SetTarget);
			cameraComponent.BindMethod("SetTargetRegion", &Ndk::CameraComponent::SetTargetRegion);
			cameraComponent.BindMethod("SetViewport", &Ndk::CameraComponent::SetViewport);
			cameraComponent.BindMethod("SetZFar", &Ndk::CameraComponent::SetZFar);
			cameraComponent.BindMethod("SetZNear", &Ndk::CameraComponent::SetZNear);
		}

		/*********************************** Ndk::GraphicsComponent **********************************/
		graphicsComponent.Reset("GraphicsComponent");
		{
			graphicsComponent.BindMethod("Attach", [] (Nz::LuaInstance& lua, Ndk::GraphicsComponent* instance, std::size_t argumentCount) -> int
			{
				/*
				void Attach(Nz::InstancedRenderableRef renderable, int renderOrder = 0);
				void Attach(Nz::InstancedRenderableRef renderable, const Nz::Matrix4f& localMatrix, int renderOrder = 0);
				*/

				std::size_t argCount = std::min<std::size_t>(argumentCount, 3U);

				switch (argCount)
				{
					case 1:
					{
						int argIndex = 2;
						instance->Attach(lua.Check<Nz::InstancedRenderableRef>(&argIndex));
						return 0;
					}

					case 2:
					{
						int argIndex = 2;
						Nz::InstancedRenderableRef renderable = lua.Check<Nz::InstancedRenderableRef>(&argIndex);

						if (lua.IsOfType(argIndex, Nz::LuaType_Number))
						{
							int renderOrder = lua.Check<int>(&argIndex);

							instance->Attach(renderable, renderOrder);
						}
						else if (lua.IsOfType(argIndex, "Matrix4"))
						{
							Nz::Matrix4f localMatrix = lua.Check<Nz::Matrix4f>(&argIndex);

							instance->Attach(renderable, localMatrix);
						}
						else
							break;

						return 0;
					}

					case 3:
					{
						int argIndex = 2;
						Nz::InstancedRenderableRef renderable = lua.Check<Nz::InstancedRenderableRef>(&argIndex);
						Nz::Matrix4f localMatrix = lua.Check<Nz::Matrix4f>(&argIndex);
						int renderOrder = lua.Check<int>(&argIndex);

						instance->Attach(renderable, localMatrix, renderOrder);
						return 0;
					}
				}

				lua.Error("No matching overload for method GetMemoryUsage");
				return 0;
			});
		}
		#endif

		// Components functions
		m_binding.BindComponent<NodeComponent>("Node");
		m_binding.BindComponent<VelocityComponent>("Velocity");

		#ifndef NDK_SERVER
		m_binding.BindComponent<CameraComponent>("Camera");
		m_binding.BindComponent<GraphicsComponent>("Graphics");
		#endif
	}

	/*!
	* \brief Registers the classes that will be used by the Lua instance
	*
	* \param instance Lua instance that will interact with the SDK classes
	*/
	void LuaBinding_SDK::Register(Nz::LuaInstance& instance)
	{
		// Classes
		application.Register(instance);
		entity.Register(instance);
		nodeComponent.Register(instance);
		velocityComponent.Register(instance);
		world.Register(instance);

		#ifndef NDK_SERVER
		cameraComponent.Register(instance);
		console.Register(instance);
		graphicsComponent.Register(instance);
		#endif

		// Enums
	}

	/*!
	* \brief Gets the index of the component
	* \return A pointer to the binding linked to a component
	*
	* \param instance Lua instance that will interact with the component
	* \param argIndex Index of the component
	*/
	LuaBinding::ComponentBinding* LuaBinding::QueryComponentIndex(Nz::LuaInstance& instance, int argIndex)
	{
		switch (instance.GetType(argIndex))
		{
			case Nz::LuaType_Number:
			{
				ComponentIndex componentIndex = instance.Check<ComponentIndex>(&argIndex);
				if (componentIndex > m_componentBinding.size())
				{
					instance.Error("Invalid component index");
					return nullptr;
				}

				ComponentBinding& binding = m_componentBinding[componentIndex];
				if (binding.name.IsEmpty())
				{
					instance.Error("Invalid component index");
					return nullptr;
				}

				return &binding;
			}

			case Nz::LuaType_String:
			{
				const char* key = instance.CheckString(argIndex);
				auto it = m_componentBindingByName.find(key);
				if (it == m_componentBindingByName.end())
				{
					instance.Error("Invalid component name");
					return nullptr;
				}

				return &m_componentBinding[it->second];
			}

			default:
				break;
		}

		instance.Error("Invalid component index at #" + Nz::String::Number(argIndex));
		return nullptr;
	}
}