aboutsummaryrefslogtreecommitdiff
path: root/src/script/common/c_converter.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'src/script/common/c_converter.cpp')
-rw-r--r--src/script/common/c_converter.cpp120
1 files changed, 43 insertions, 77 deletions
diff --git a/src/script/common/c_converter.cpp b/src/script/common/c_converter.cpp
index 69da35b73..90b78a081 100644
--- a/src/script/common/c_converter.cpp
+++ b/src/script/common/c_converter.cpp
@@ -48,17 +48,19 @@ extern "C" {
} \
} while (0)
-#define CHECK_POS_COORD(name) CHECK_TYPE(-1, "vector coordinate " name, LUA_TNUMBER)
+#define CHECK_POS_COORD(index, name) CHECK_TYPE(index, "vector coordinate " name, LUA_TNUMBER)
#define CHECK_POS_TAB(index) CHECK_TYPE(index, "vector", LUA_TTABLE)
/**
- * A helper which sets the vector metatable for the table on top of the stack
+ * A helper which calls CUSTOM_RIDX_READ_VECTOR with the argument at the given index
*/
-static void set_vector_metatable(lua_State *L)
+static void read_v3_aux(lua_State *L, int index)
{
- lua_rawgeti(L, LUA_REGISTRYINDEX, CUSTOM_RIDX_VECTOR_METATABLE);
- lua_setmetatable(L, -2);
+ lua_pushvalue(L, index);
+ lua_rawgeti(L, LUA_REGISTRYINDEX, CUSTOM_RIDX_READ_VECTOR);
+ lua_insert(L, -2);
+ lua_call(L, 1, 3);
}
// Retrieve an integer vector where all components are optional
@@ -79,14 +81,11 @@ static bool getv3intfield(lua_State *L, int index,
void push_v3f(lua_State *L, v3f p)
{
- lua_createtable(L, 0, 3);
+ lua_rawgeti(L, LUA_REGISTRYINDEX, CUSTOM_RIDX_PUSH_VECTOR);
lua_pushnumber(L, p.X);
- lua_setfield(L, -2, "x");
lua_pushnumber(L, p.Y);
- lua_setfield(L, -2, "y");
lua_pushnumber(L, p.Z);
- lua_setfield(L, -2, "z");
- set_vector_metatable(L);
+ lua_call(L, 3, 1);
}
void push_v2f(lua_State *L, v2f p)
@@ -160,12 +159,12 @@ v2f check_v2f(lua_State *L, int index)
v2f p;
CHECK_POS_TAB(index);
lua_getfield(L, index, "x");
- CHECK_POS_COORD("x");
+ CHECK_POS_COORD(-1, "x");
p.X = lua_tonumber(L, -1);
CHECK_FLOAT(p.X, "x");
lua_pop(L, 1);
lua_getfield(L, index, "y");
- CHECK_POS_COORD("y");
+ CHECK_POS_COORD(-1, "y");
p.Y = lua_tonumber(L, -1);
CHECK_FLOAT(p.Y, "y");
lua_pop(L, 1);
@@ -174,78 +173,48 @@ v2f check_v2f(lua_State *L, int index)
v3f read_v3f(lua_State *L, int index)
{
- v3f pos;
- CHECK_POS_TAB(index);
- lua_getfield(L, index, "x");
- pos.X = lua_tonumber(L, -1);
- lua_pop(L, 1);
- lua_getfield(L, index, "y");
- pos.Y = lua_tonumber(L, -1);
- lua_pop(L, 1);
- lua_getfield(L, index, "z");
- pos.Z = lua_tonumber(L, -1);
- lua_pop(L, 1);
- return pos;
+ read_v3_aux(L, index);
+ float x = lua_tonumber(L, -3);
+ float y = lua_tonumber(L, -2);
+ float z = lua_tonumber(L, -1);
+ lua_pop(L, 3);
+ return v3f(x, y, z);
}
v3f check_v3f(lua_State *L, int index)
{
- v3f pos;
- CHECK_POS_TAB(index);
- lua_getfield(L, index, "x");
- CHECK_POS_COORD("x");
- pos.X = lua_tonumber(L, -1);
- CHECK_FLOAT(pos.X, "x");
- lua_pop(L, 1);
- lua_getfield(L, index, "y");
- CHECK_POS_COORD("y");
- pos.Y = lua_tonumber(L, -1);
- CHECK_FLOAT(pos.Y, "y");
- lua_pop(L, 1);
- lua_getfield(L, index, "z");
- CHECK_POS_COORD("z");
- pos.Z = lua_tonumber(L, -1);
- CHECK_FLOAT(pos.Z, "z");
- lua_pop(L, 1);
- return pos;
+ read_v3_aux(L, index);
+ CHECK_POS_COORD(-3, "x");
+ CHECK_POS_COORD(-2, "y");
+ CHECK_POS_COORD(-1, "z");
+ float x = lua_tonumber(L, -3);
+ float y = lua_tonumber(L, -2);
+ float z = lua_tonumber(L, -1);
+ lua_pop(L, 3);
+ return v3f(x, y, z);
}
v3d read_v3d(lua_State *L, int index)
{
- v3d pos;
- CHECK_POS_TAB(index);
- lua_getfield(L, index, "x");
- pos.X = lua_tonumber(L, -1);
- lua_pop(L, 1);
- lua_getfield(L, index, "y");
- pos.Y = lua_tonumber(L, -1);
- lua_pop(L, 1);
- lua_getfield(L, index, "z");
- pos.Z = lua_tonumber(L, -1);
- lua_pop(L, 1);
- return pos;
+ read_v3_aux(L, index);
+ double x = lua_tonumber(L, -3);
+ double y = lua_tonumber(L, -2);
+ double z = lua_tonumber(L, -1);
+ lua_pop(L, 3);
+ return v3d(x, y, z);
}
v3d check_v3d(lua_State *L, int index)
{
- v3d pos;
- CHECK_POS_TAB(index);
- lua_getfield(L, index, "x");
- CHECK_POS_COORD("x");
- pos.X = lua_tonumber(L, -1);
- CHECK_FLOAT(pos.X, "x");
- lua_pop(L, 1);
- lua_getfield(L, index, "y");
- CHECK_POS_COORD("y");
- pos.Y = lua_tonumber(L, -1);
- CHECK_FLOAT(pos.Y, "y");
- lua_pop(L, 1);
- lua_getfield(L, index, "z");
- CHECK_POS_COORD("z");
- pos.Z = lua_tonumber(L, -1);
- CHECK_FLOAT(pos.Z, "z");
- lua_pop(L, 1);
- return pos;
+ read_v3_aux(L, index);
+ CHECK_POS_COORD(-3, "x");
+ CHECK_POS_COORD(-2, "y");
+ CHECK_POS_COORD(-1, "z");
+ double x = lua_tonumber(L, -3);
+ double y = lua_tonumber(L, -2);
+ double z = lua_tonumber(L, -1);
+ lua_pop(L, 3);
+ return v3d(x, y, z);
}
void push_ARGB8(lua_State *L, video::SColor color)
@@ -274,14 +243,11 @@ v3f checkFloatPos(lua_State *L, int index)
void push_v3s16(lua_State *L, v3s16 p)
{
- lua_createtable(L, 0, 3);
+ lua_rawgeti(L, LUA_REGISTRYINDEX, CUSTOM_RIDX_PUSH_VECTOR);
lua_pushinteger(L, p.X);
- lua_setfield(L, -2, "x");
lua_pushinteger(L, p.Y);
- lua_setfield(L, -2, "y");
lua_pushinteger(L, p.Z);
- lua_setfield(L, -2, "z");
- set_vector_metatable(L);
+ lua_call(L, 3, 1);
}
v3s16 read_v3s16(lua_State *L, int index)