// 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_Utility.hpp>
#include <NDK/LuaAPI.hpp>

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

	LuaBinding_Utility::LuaBinding_Utility(LuaBinding& binding) :
	LuaBinding_Base(binding)
	{
		/*********************************** Nz::AbstractImage **********************************/
		abstractImage.Reset("AbstractImage");
		{
			abstractImage.BindMethod("GetBytesPerPixel", &Nz::AbstractImage::GetBytesPerPixel);
			abstractImage.BindMethod("GetDepth", &Nz::AbstractImage::GetDepth, static_cast<Nz::UInt8>(0));
			abstractImage.BindMethod("GetFormat", &Nz::AbstractImage::GetFormat);
			abstractImage.BindMethod("GetHeight", &Nz::AbstractImage::GetHeight, static_cast<Nz::UInt8>(0));
			abstractImage.BindMethod("GetLevelCount", &Nz::AbstractImage::GetLevelCount);
			abstractImage.BindMethod("GetMaxLevel", &Nz::AbstractImage::GetMaxLevel);
			abstractImage.BindMethod("GetSize", &Nz::AbstractImage::GetSize, static_cast<Nz::UInt8>(0));
			abstractImage.BindMethod("GetType", &Nz::AbstractImage::GetType);
			abstractImage.BindMethod("GetWidth", &Nz::AbstractImage::GetWidth, static_cast<Nz::UInt8>(0));
			abstractImage.BindMethod("IsCompressed", &Nz::AbstractImage::IsCompressed);
			abstractImage.BindMethod("IsCubemap", &Nz::AbstractImage::IsCubemap);

			abstractImage.BindMethod("GetMemoryUsage", [] (Nz::LuaInstance& lua, Nz::AbstractImage* instance, std::size_t argumentCount) -> int
			{
				std::size_t argCount = std::min<std::size_t>(argumentCount, 1U);
				switch (argCount)
				{
					case 0:
						return lua.Push(instance->GetMemoryUsage());

					case 1:
					{
						int argIndex = 2;
						Nz::UInt8 level(lua.Check<Nz::UInt8>(&argIndex));

						return lua.Push(instance->GetMemoryUsage(level));
					}
				}

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

			abstractImage.BindMethod("Update", [] (Nz::LuaInstance& lua, Nz::AbstractImage* instance, std::size_t argumentCount) -> int
			{
				std::size_t argCount = std::min<std::size_t>(argumentCount, 6U);
				int argIndex = 2;

				std::size_t bufferSize = 0;
				const Nz::UInt8* pixels = reinterpret_cast<const Nz::UInt8*>(lua.CheckString(argIndex++, &bufferSize));

				if (argCount < 2 || lua.IsOfType(2, Nz::LuaType_Number))
				{
					// bool Update(const UInt8* pixels, unsigned int srcWidth = 0, unsigned int srcHeight = 0, UInt8 level = 0)
					unsigned int srcWidth = lua.Check<unsigned int>(&argIndex, 0);
					unsigned int srcHeight = lua.Check<unsigned int>(&argIndex, 0);
					Nz::UInt8 level = lua.Check<Nz::UInt8>(&argIndex, 0);

					///TODO: Buffer checks (Nz::ByteBufferView ?)
					return lua.Push(instance->Update(pixels, srcWidth, srcHeight, level));
				}
				/* Disabled until Box and Rect have been ported
				else if (lua.IsOfType(2, "Box"))
				{
					// bool Update(const UInt8* pixels, const Boxui& box, unsigned int srcWidth = 0, unsigned int srcHeight = 0, UInt8 level = 0)
					Nz::Boxui box = lua.Check<Nz::Boxui>(&argIndex);
					unsigned int srcWidth = lua.Check<unsigned int>(&argIndex, 0);
					unsigned int srcHeight = lua.Check<unsigned int>(&argIndex, 0);
					Nz::UInt8 level = lua.Check<Nz::UInt8>(&argIndex, 0);

					///TODO: Buffer checks (Nz::ByteBufferView ?)
					return lua.Push(abstractImage->Update(pixels, srcWidth, srcHeight, level));
				}
				else if (lua.IsOfType(2, "Rect"))
				{
					// bool Update(const UInt8* pixels, const Rectui& rect, unsigned int z = 0, unsigned int srcWidth = 0, unsigned int srcHeight = 0, UInt8 level = 0)
					Nz::Rectui box = lua.Check<Nz::Rectui>(&argIndex);
					unsigned int srcWidth = lua.Check<unsigned int>(&argIndex, 0);
					unsigned int srcHeight = lua.Check<unsigned int>(&argIndex, 0);
					Nz::UInt8 level = lua.Check<Nz::UInt8>(&argIndex, 0);

					///TODO: Buffer checks (Nz::ByteBufferView ?)
					return lua.Push(abstractImage->Update(pixels, srcWidth, srcHeight, level));
				}*/

				lua.Error("No matching overload for method Update");
				return 0;
			});
		}

		/*********************************** Nz::Font **********************************/
		font.Reset("Font");
		{
			font.SetConstructor([] (Nz::LuaInstance& /*lua*/, Nz::FontRef* instance, std::size_t /*argumentCount*/)
			{
				Nz::PlacementNew(instance, Nz::Font::New());
				return true;
			});

			font.BindMethod("ClearGlyphCache", &Nz::Font::ClearGlyphCache);
			font.BindMethod("ClearKerningCache", &Nz::Font::ClearKerningCache);
			font.BindMethod("ClearSizeInfoCache", &Nz::Font::ClearSizeInfoCache);

			font.BindMethod("Destroy", &Nz::Font::Destroy);

			font.BindMethod("GetCachedGlyphCount", [] (Nz::LuaInstance& lua, Nz::FontRef& instance, std::size_t argumentCount) -> int
			{
				std::size_t argCount = std::min<std::size_t>(argumentCount, 2U);

				int argIndex = 2;
				switch (argCount)
				{
					case 0:
						lua.Push(instance->GetCachedGlyphCount());
						return 1;

					case 2:
					{
						unsigned int characterSize = lua.Check<unsigned int>(&argIndex);
						Nz::UInt32 style = lua.Check<Nz::UInt32>(&argIndex);

						lua.Push(instance->GetCachedGlyphCount(characterSize, style));
						return 1;
					}
				}

				lua.Error("No matching overload for method GetCachedGlyphCount");
				return 0;
			});

			font.BindMethod("GetFamilyName", &Nz::Font::GetFamilyName);
			font.BindMethod("GetKerning", &Nz::Font::GetKerning);
			font.BindMethod("GetGlyphBorder", &Nz::Font::GetGlyphBorder);
			font.BindMethod("GetMinimumStepSize", &Nz::Font::GetMinimumStepSize);
			font.BindMethod("GetSizeInfo", &Nz::Font::GetSizeInfo);
			font.BindMethod("GetStyleName", &Nz::Font::GetStyleName);

			font.BindMethod("IsValid", &Nz::Font::IsValid);

			font.BindMethod("Precache", (bool(Nz::Font::*)(unsigned int, Nz::UInt32, const Nz::String&) const) &Nz::Font::Precache);

			font.BindMethod("OpenFromFile", &Nz::Font::OpenFromFile, Nz::FontParams());

			font.BindMethod("SetGlyphBorder", &Nz::Font::SetGlyphBorder);
			font.BindMethod("SetMinimumStepSize", &Nz::Font::SetMinimumStepSize);

			font.BindStaticMethod("GetDefault", &Nz::Font::GetDefault);
			font.BindStaticMethod("GetDefaultGlyphBorder", &Nz::Font::GetDefaultGlyphBorder);
			font.BindStaticMethod("GetDefaultMinimumStepSize", &Nz::Font::GetDefaultMinimumStepSize);

			font.BindStaticMethod("SetDefaultGlyphBorder", &Nz::Font::SetDefaultGlyphBorder);
			font.BindStaticMethod("SetDefaultMinimumStepSize", &Nz::Font::SetDefaultMinimumStepSize);
		}

		/*********************************** Nz::Keyboard **********************************/
		keyboard.Reset("Keyboard");
		{
			keyboard.BindStaticMethod("GetKeyName", &Nz::Keyboard::GetKeyName);
			keyboard.BindStaticMethod("IsKeyPressed", &Nz::Keyboard::IsKeyPressed);
		}

		/*********************************** Nz::Node **********************************/
		node.Reset("Node");
		{
			node.BindMethod("GetBackward", &Nz::Node::GetBackward);
					//nodeClass.SetMethod("GetChilds", &Nz::Node::GetChilds);
			node.BindMethod("GetDown", &Nz::Node::GetDown);
			node.BindMethod("GetForward", &Nz::Node::GetForward);
			node.BindMethod("GetInheritPosition", &Nz::Node::GetInheritPosition);
			node.BindMethod("GetInheritRotation", &Nz::Node::GetInheritRotation);
			node.BindMethod("GetInheritScale", &Nz::Node::GetInheritScale);
			node.BindMethod("GetInitialPosition", &Nz::Node::GetInitialPosition);
			//nodeClass.SetMethod("GetInitialRotation", &Nz::Node::GetInitialRotation);
			node.BindMethod("GetInitialScale", &Nz::Node::GetInitialScale);
			node.BindMethod("GetLeft", &Nz::Node::GetLeft);
			node.BindMethod("GetNodeType", &Nz::Node::GetNodeType);
			//nodeClass.SetMethod("GetParent", &Nz::Node::GetParent);
			node.BindMethod("GetPosition", &Nz::Node::GetPosition, Nz::CoordSys_Global);
			node.BindMethod("GetRight", &Nz::Node::GetRight);
			//nodeClass.SetMethod("GetRotation", &Nz::Node::GetRotation, Nz::CoordSys_Global);
			node.BindMethod("GetScale", &Nz::Node::GetScale, Nz::CoordSys_Global);
			//nodeClass.SetMethod("GetTransformMatrix", &Nz::Node::GetTransformMatrix);
			node.BindMethod("GetUp", &Nz::Node::GetUp);

			node.BindMethod("HasChilds", &Nz::Node::HasChilds);

			node.BindMethod("GetBackward", &Nz::Node::GetBackward);
			node.BindMethod("GetDown", &Nz::Node::GetDown);
			node.BindMethod("GetForward", &Nz::Node::GetForward);
			node.BindMethod("GetInheritPosition", &Nz::Node::GetInheritPosition);
			node.BindMethod("GetInheritRotation", &Nz::Node::GetInheritRotation);
			node.BindMethod("GetInheritScale", &Nz::Node::GetInheritScale);
			node.BindMethod("GetInitialPosition", &Nz::Node::GetInitialPosition);
			node.BindMethod("GetInitialRotation", &Nz::Node::GetInitialRotation);
			node.BindMethod("GetInitialScale", &Nz::Node::GetInitialScale);
			node.BindMethod("GetLeft", &Nz::Node::GetLeft);
			node.BindMethod("GetNodeType", &Nz::Node::GetNodeType);
			node.BindMethod("GetPosition", &Nz::Node::GetPosition, Nz::CoordSys_Global);
			node.BindMethod("GetRight", &Nz::Node::GetRight);
			node.BindMethod("GetRotation", &Nz::Node::GetRotation, Nz::CoordSys_Global);
			node.BindMethod("GetScale", &Nz::Node::GetScale, Nz::CoordSys_Global);
			node.BindMethod("GetUp", &Nz::Node::GetUp);

			node.BindMethod("SetInitialPosition", (void(Nz::Node::*)(const Nz::Vector3f&)) &Nz::Node::SetInitialPosition);
			node.BindMethod("SetInitialRotation", (void(Nz::Node::*)(const Nz::Quaternionf&)) &Nz::Node::SetInitialRotation);

			node.BindMethod("SetPosition", (void(Nz::Node::*)(const Nz::Vector3f&, Nz::CoordSys)) &Nz::Node::SetPosition, Nz::CoordSys_Local);
			node.BindMethod("SetRotation", (void(Nz::Node::*)(const Nz::Quaternionf&, Nz::CoordSys)) &Nz::Node::SetRotation, Nz::CoordSys_Local);

			node.BindMethod("Move", [] (Nz::LuaInstance& lua, Nz::Node& instance, std::size_t /*argumentCount*/) -> int
			{
				int argIndex = 2;

				Nz::Vector3f offset = lua.Check<Nz::Vector3f>(&argIndex);
				Nz::CoordSys coordSys = lua.Check<Nz::CoordSys>(&argIndex, Nz::CoordSys_Local);
				instance.Move(offset, coordSys);

				return 0;
			});

			node.BindMethod("Rotate", [] (Nz::LuaInstance& lua, Nz::Node& instance, std::size_t /*argumentCount*/) -> int
			{
				int argIndex = 2;

				Nz::Quaternionf rotation = lua.Check<Nz::Quaternionf>(&argIndex);
				Nz::CoordSys coordSys = lua.Check<Nz::CoordSys>(&argIndex, Nz::CoordSys_Local);
				instance.Rotate(rotation, coordSys);

				return 0;
			});

			node.BindMethod("Scale", [] (Nz::LuaInstance& lua, Nz::Node& instance, std::size_t argumentCount) -> int
			{
				std::size_t argCount = std::min<std::size_t>(argumentCount, 4U);

				int argIndex = 2;
				switch (argCount)
				{
					case 1:
					{
						if (lua.IsOfType(argIndex, Nz::LuaType_Number))
							instance.Scale(lua.Check<float>(&argIndex));
						else
							instance.Scale(lua.Check<Nz::Vector3f>(&argIndex));

						return 0;
					}

					case 3:
						instance.Scale(lua.Check<Nz::Vector3f>(&argIndex));
						return 0;
				}

				lua.Error("No matching overload for method Scale");
				return 0;
			});

			node.BindMethod("SetScale", [] (Nz::LuaInstance& lua, Nz::Node& instance, std::size_t argumentCount) -> int
			{
				std::size_t argCount = std::min<std::size_t>(argumentCount, 4U);

				int argIndex = 2;
				switch (argCount)
				{
					case 1:
					case 2:
					{
						if (lua.IsOfType(argIndex, Nz::LuaType_Number))
						{
							float scale = lua.Check<float>(&argIndex);
							Nz::CoordSys coordSys = lua.Check<Nz::CoordSys>(&argIndex, Nz::CoordSys_Local);
							instance.SetScale(scale, coordSys);
						}
						else
							instance.SetScale(lua.Check<Nz::Vector3f>(&argIndex));

						return 0;
					}

					case 3:
					case 4:
					{
						Nz::Vector3f scale = lua.Check<Nz::Vector3f>(&argIndex);
						Nz::CoordSys coordSys = lua.Check<Nz::CoordSys>(&argIndex, Nz::CoordSys_Local);

						instance.SetScale(scale, coordSys);
						return 0;
					}
				}

				lua.Error("No matching overload for method SetScale");
				return 0;
			});

			node.BindMethod("SetInitialScale", [] (Nz::LuaInstance& lua, Nz::Node& instance, std::size_t argumentCount) -> int
			{
				std::size_t argCount = std::min<std::size_t>(argumentCount, 4U);

				int argIndex = 2;
				switch (argCount)
				{
					case 1:
					{
						if (lua.IsOfType(argIndex, Nz::LuaType_Number))
							instance.SetInitialScale(lua.Check<float>(&argIndex));
						else
							instance.SetInitialScale(lua.Check<Nz::Vector2f>(&argIndex));

						return 0;
					}

					case 2:
					case 3:
						instance.SetInitialScale(lua.Check<Nz::Vector3f>(&argIndex));
						return 0;
				}

				lua.Error("No matching overload for method SetInitialScale");
				return 0;
			});
		}
	}

	/*!
	* \brief Registers the classes that will be used by the Lua instance
	*
	* \param instance Lua instance that will interact with the Utility classes
	*/
	void LuaBinding_Utility::Register(Nz::LuaInstance& instance)
	{
		abstractImage.Register(instance);
		font.Register(instance);
		keyboard.Register(instance);
		node.Register(instance);

		keyboard.PushGlobalTable(instance);
		{
			static_assert(Nz::Keyboard::Count == 121, "Nz::Keyboard::Key has been updated but change was not reflected to Lua binding");

			instance.PushField("Undefined", Nz::Keyboard::Undefined);

			// A-Z
			for (std::size_t i = 0; i < 26; ++i)
				instance.PushField(Nz::String('A' + char(i)), Nz::Keyboard::A + i);

			// Numerical
			for (std::size_t i = 0; i < 10; ++i)
			{
				instance.PushField("Num" + Nz::String::Number(i), Nz::Keyboard::Num0 + i);
				instance.PushField("Numpad" + Nz::String::Number(i), Nz::Keyboard::Numpad0 + i);
			}

			// F1-F15
			for (std::size_t i = 0; i < 15; ++i)
				instance.PushField('F' + Nz::String::Number(i+1), Nz::Keyboard::F1 + i);

			// And all the others...
			instance.PushField("Down",              Nz::Keyboard::Down);
			instance.PushField("Left",              Nz::Keyboard::Left);
			instance.PushField("Right",             Nz::Keyboard::Right);
			instance.PushField("Up",                Nz::Keyboard::Up);

			instance.PushField("Add",               Nz::Keyboard::Add);
			instance.PushField("Decimal",           Nz::Keyboard::Decimal);
			instance.PushField("Divide",            Nz::Keyboard::Divide);
			instance.PushField("Multiply",          Nz::Keyboard::Multiply);
			instance.PushField("Subtract",          Nz::Keyboard::Subtract);

			instance.PushField("Backslash",         Nz::Keyboard::Backslash);
			instance.PushField("Backspace",         Nz::Keyboard::Backspace);
			instance.PushField("Clear",             Nz::Keyboard::Clear);
			instance.PushField("Comma",             Nz::Keyboard::Comma);
			instance.PushField("Dash",              Nz::Keyboard::Dash);
			instance.PushField("Delete",            Nz::Keyboard::Delete);
			instance.PushField("End",               Nz::Keyboard::End);
			instance.PushField("Equal",             Nz::Keyboard::Equal);
			instance.PushField("Escape",            Nz::Keyboard::Escape);
			instance.PushField("Home",              Nz::Keyboard::Home);
			instance.PushField("Insert",            Nz::Keyboard::Insert);
			instance.PushField("LAlt",              Nz::Keyboard::LAlt);
			instance.PushField("LBracket",          Nz::Keyboard::LBracket);
			instance.PushField("LControl",          Nz::Keyboard::LControl);
			instance.PushField("LShift",            Nz::Keyboard::LShift);
			instance.PushField("LSystem",           Nz::Keyboard::LSystem);
			instance.PushField("PageDown",          Nz::Keyboard::PageDown);
			instance.PushField("PageUp",            Nz::Keyboard::PageUp);
			instance.PushField("Pause",             Nz::Keyboard::Pause);
			instance.PushField("Period",            Nz::Keyboard::Period);
			instance.PushField("Print",             Nz::Keyboard::Print);
			instance.PushField("PrintScreen",       Nz::Keyboard::PrintScreen);
			instance.PushField("Quote",             Nz::Keyboard::Quote);
			instance.PushField("RAlt",              Nz::Keyboard::RAlt);
			instance.PushField("RBracket",          Nz::Keyboard::RBracket);
			instance.PushField("RControl",          Nz::Keyboard::RControl);
			instance.PushField("Return",            Nz::Keyboard::Return);
			instance.PushField("RShift",            Nz::Keyboard::RShift);
			instance.PushField("RSystem",           Nz::Keyboard::RSystem);
			instance.PushField("Semicolon",         Nz::Keyboard::Semicolon);
			instance.PushField("Slash",             Nz::Keyboard::Slash);
			instance.PushField("Space",             Nz::Keyboard::Space);
			instance.PushField("Tab",               Nz::Keyboard::Tab);
			instance.PushField("Tilde",             Nz::Keyboard::Tilde);
			instance.PushField("Browser_Back",      Nz::Keyboard::Browser_Back);
			instance.PushField("Browser_Favorites", Nz::Keyboard::Browser_Favorites);
			instance.PushField("Browser_Forward",   Nz::Keyboard::Browser_Forward);
			instance.PushField("Browser_Home",      Nz::Keyboard::Browser_Home);
			instance.PushField("Browser_Refresh",   Nz::Keyboard::Browser_Refresh);
			instance.PushField("Browser_Search",    Nz::Keyboard::Browser_Search);
			instance.PushField("Browser_Stop",      Nz::Keyboard::Browser_Stop);
			instance.PushField("Media_Next",        Nz::Keyboard::Media_Next);
			instance.PushField("Media_Play",        Nz::Keyboard::Media_Play);
			instance.PushField("Media_Previous",    Nz::Keyboard::Media_Previous);
			instance.PushField("Media_Stop",        Nz::Keyboard::Media_Stop);
			instance.PushField("Volume_Down",       Nz::Keyboard::Volume_Down);
			instance.PushField("Volume_Mute",       Nz::Keyboard::Volume_Mute);
			instance.PushField("Volume_Up",         Nz::Keyboard::Volume_Up);
			instance.PushField("CapsLock",          Nz::Keyboard::CapsLock);
			instance.PushField("NumLock",           Nz::Keyboard::NumLock);
			instance.PushField("ScrollLock",        Nz::Keyboard::ScrollLock);
		}
		instance.Pop();

		static_assert(Nz::WindowStyle_Max + 1 == 6, "Nz::WindowStyle has been updated but change was not reflected to Lua binding");
		instance.PushTable(0, Nz::WindowStyle_Max + 1);
		{
			instance.PushField("None",       Nz::WindowStyle_None);
			instance.PushField("Fullscreen", Nz::WindowStyle_Fullscreen);
			instance.PushField("Closable",   Nz::WindowStyle_Closable);
			instance.PushField("Resizable",  Nz::WindowStyle_Resizable);
			instance.PushField("Titlebar",   Nz::WindowStyle_Titlebar);
			instance.PushField("Threaded",   Nz::WindowStyle_Threaded);
		}
		instance.SetGlobal("WindowStyle");


	}
}