h2-mod/src/client/game/ui_scripting/lua/value_conversion.cpp

#include <std_include.hpp>
#include "value_conversion.hpp"
#include "../execution.hpp"
#include "../stack_isolation.hpp"
#include "../../../component/ui_scripting.hpp"

namespace ui_scripting::lua
{
	namespace
	{
		table convert_table(const sol::table& t)
		{
			table res{};

			t.for_each([res](const sol::object& key, const sol::object& value)
			{
				res.set(convert(key), convert(value));
			});

			return res;
		}

		script_value convert_function(const sol::protected_function& function)
		{
			const auto closure = game::hks::cclosure_Create(*game::hks::lua_state, main_function_handler, 0, 0, 0);
			add_converted_function(closure, function);

			game::hks::HksObject value{};
			value.t = game::hks::TCFUNCTION;
			value.v.cClosure = closure;

			return value;
		}
	}

	script_value convert(const sol::lua_value& value)
	{
		if (value.is<bool>())
		{
			return {value.as<bool>()};
		}

		if (value.is<int>())
		{
			return {value.as<int>()};
		}

		if (value.is<unsigned int>())
		{
			return {value.as<unsigned int>()};
		}

		if (value.is<double>())
		{
			return {value.as<double>()};
		}

		if (value.is<float>())
		{
			return {value.as<float>()};
		}

		if (value.is<std::string>())
		{
			return {value.as<std::string>()};
		}

		if (value.is<lightuserdata>())
		{
			return {value.as<lightuserdata>()};
		}

		if (value.is<userdata>())
		{
			return {value.as<userdata>()};
		}

		if (value.is<table>())
		{
			return {value.as<table>()};
		}

		if (value.is<function>())
		{
			return {value.as<function>()};
		}

		if (value.is<sol::table>())
		{
			return {convert_table(value.as<sol::table>())};
		}

		if (value.is<sol::protected_function>())
		{
			return {convert_function(value.as<sol::protected_function>())};
		}

		return {};
	}

	sol::lua_value convert(lua_State* state, const script_value& value)
	{
		if (value.is<int>())
		{
			return {state, value.as<int>()};
		}

		if (value.is<float>())
		{
			return {state, value.as<float>()};
		}

		if (value.is<bool>())
		{
			return {state, value.as<bool>()};
		}

		if (value.is<std::string>())
		{
			return {state, value.as<std::string>()};
		}

		if (value.is<lightuserdata>())
		{
			return {state, value.as<lightuserdata>()};
		}

		if (value.is<userdata>())
		{
			return {state, value.as<userdata>()};
		}

		if (value.is<table>())
		{
			return {state, value.as<table>()};
		}

		if (value.is<function>())
		{
			return {state, value.as<function>()};
		}

		return {state, sol::lua_nil};
	}
}