Lua templating reading (part 4): s16, v2s16, v2f (#7512)

diff --git a/src/script/common/c_converter.cpp b/src/script/common/c_converter.cpp
index 0ee5afa3e04e31a9f86c0c720e6aa399740c87a5..dfd3f5cea9ed394b0a67c364b14790f965f8dceb 100644 (file)
--- a/src/script/common/c_converter.cpp
+++ b/src/script/common/c_converter.cpp
@@ -113,21 +113,6 @@ v2s16 read_v2s16(lua_State *L, int index)
        return p;
 }
 
-v2s16 check_v2s16(lua_State *L, int index)
-{
-       v2s16 p;
-       CHECK_POS_TAB(index);
-       lua_getfield(L, index, "x");
-       CHECK_POS_COORD("x");
-       p.X = lua_tonumber(L, -1);
-       lua_pop(L, 1);
-       lua_getfield(L, index, "y");
-       CHECK_POS_COORD("y");
-       p.Y = lua_tonumber(L, -1);
-       lua_pop(L, 1);
-       return p;
-}
-
 void push_v2s16(lua_State *L, v2s16 p)
 {
        lua_newtable(L);

diff --git a/src/script/common/c_converter.h b/src/script/common/c_converter.h
index 04fdb353aabe12e601f4fbb44d8e303fe0546879..87bc35ac6d34c4ac6356d21ffceed7ac5141902e 100644 (file)
--- a/src/script/common/c_converter.h
+++ b/src/script/common/c_converter.h
@@ -100,8 +100,6 @@ void               setboolfield(lua_State *L, int table,
                              const char *fieldname, bool value);
 
 v3f                 checkFloatPos       (lua_State *L, int index);
-v2f                 check_v2f           (lua_State *L, int index);
-v2s16               check_v2s16         (lua_State *L, int index);
 v3f                 check_v3f           (lua_State *L, int index);
 v3s16               check_v3s16         (lua_State *L, int index);
 

diff --git a/src/script/common/helper.cpp b/src/script/common/helper.cpp
index 9adc56a657adf6c1131498f4584d025f4e570875..59bde57abe6778b1058d9d4b4228ceae83e4101c 100644 (file)
--- a/src/script/common/helper.cpp
+++ b/src/script/common/helper.cpp
@@ -20,7 +20,26 @@ with this program; if not, write to the Free Software Foundation, Inc.,
 #include "helper.h"
 #include <cmath>
 #include <sstream>
+#include <irr_v2d.h>
 #include "c_types.h"
+#include "c_internal.h"
+
+// imported from c_converter.cpp with pure C++ style
+static inline void check_lua_type(lua_State *L, int index, const char *name, int type)
+{
+       int t = lua_type(L, index);
+       if (t != type) {
+               std::string traceback = script_get_backtrace(L);
+               throw LuaError(std::string("Invalid ") + (name) + " (expected " +
+                               lua_typename(L, (type)) + " got " + lua_typename(L, t) +
+                               ").\n" + traceback);
+       }
+}
+
+// imported from c_converter.cpp
+#define CHECK_POS_COORD(name)                                                            \
+       check_lua_type(L, -1, "position coordinate '" name "'", LUA_TNUMBER)
+#define CHECK_POS_TAB(index) check_lua_type(L, index, "position", LUA_TTABLE)
 
 bool LuaHelper::isNaN(lua_State *L, int idx)
 {
@@ -43,6 +62,11 @@ template <> bool LuaHelper::readParam(lua_State *L, int index, const bool &defau
        return lua_toboolean(L, index) != 0;
 }
 
+template <> s16 LuaHelper::readParam(lua_State *L, int index)
+{
+       return lua_tonumber(L, index);
+}
+
 template <> float LuaHelper::readParam(lua_State *L, int index)
 {
        if (isNaN(L, index))
@@ -51,6 +75,36 @@ template <> float LuaHelper::readParam(lua_State *L, int index)
        return (float)luaL_checknumber(L, index);
 }
 
+template <> v2s16 LuaHelper::readParam(lua_State *L, int index)
+{
+       v2s16 p;
+       CHECK_POS_TAB(index);
+       lua_getfield(L, index, "x");
+       CHECK_POS_COORD("x");
+       p.X = readParam<s16>(L, -1);
+       lua_pop(L, 1);
+       lua_getfield(L, index, "y");
+       CHECK_POS_COORD("y");
+       p.Y = readParam<s16>(L, -1);
+       lua_pop(L, 1);
+       return p;
+}
+
+template <> v2f LuaHelper::readParam(lua_State *L, int index)
+{
+       v2f p;
+       CHECK_POS_TAB(index);
+       lua_getfield(L, index, "x");
+       CHECK_POS_COORD("x");
+       p.X = readParam<float>(L, -1);
+       lua_pop(L, 1);
+       lua_getfield(L, index, "y");
+       CHECK_POS_COORD("y");
+       p.Y = readParam<float>(L, -1);
+       lua_pop(L, 1);
+       return p;
+}
+
 template <> std::string LuaHelper::readParam(lua_State *L, int index)
 {
        std::string result;

diff --git a/src/script/lua_api/l_noise.cpp b/src/script/lua_api/l_noise.cpp
index ac3ddd4795197edfcc746f17d145dff02ade6354..e38d319f48b31e9c40a6e79566ff17d1b7e7d389 100644 (file)
--- a/src/script/lua_api/l_noise.cpp
+++ b/src/script/lua_api/l_noise.cpp
@@ -40,7 +40,7 @@ int LuaPerlinNoise::l_get_2d(lua_State *L)
 {
        NO_MAP_LOCK_REQUIRED;
        LuaPerlinNoise *o = checkobject(L, 1);
-       v2f p = check_v2f(L, 2);
+       v2f p = readParam<v2f>(L, 2);
        lua_Number val = NoisePerlin2D(&o->np, p.X, p.Y, 0);
        lua_pushnumber(L, val);
        return 1;
@@ -166,7 +166,7 @@ int LuaPerlinNoiseMap::l_get_2d_map(lua_State *L)
        size_t i = 0;
 
        LuaPerlinNoiseMap *o = checkobject(L, 1);
-       v2f p = check_v2f(L, 2);
+       v2f p = readParam<v2f>(L, 2);
 
        Noise *n = o->noise;
        n->perlinMap2D(p.X, p.Y);
@@ -189,8 +189,8 @@ int LuaPerlinNoiseMap::l_get_2d_map_flat(lua_State *L)
        NO_MAP_LOCK_REQUIRED;
 
        LuaPerlinNoiseMap *o = checkobject(L, 1);
-       v2f p                = check_v2f(L, 2);
-       bool use_buffer      = lua_istable(L, 3);
+       v2f p = readParam<v2f>(L, 2);
+       bool use_buffer = lua_istable(L, 3);
 
        Noise *n = o->noise;
        n->perlinMap2D(p.X, p.Y);
@@ -275,7 +275,7 @@ int LuaPerlinNoiseMap::l_calc_2d_map(lua_State *L)
        NO_MAP_LOCK_REQUIRED;
 
        LuaPerlinNoiseMap *o = checkobject(L, 1);
-       v2f p                = check_v2f(L, 2);
+       v2f p = readParam<v2f>(L, 2);
 
        Noise *n = o->noise;
        n->perlinMap2D(p.X, p.Y);

diff --git a/src/script/lua_api/l_object.cpp b/src/script/lua_api/l_object.cpp
index 1ea7d7ff29ba6ef58e4b5089d5974fcadd63cb53..14010533e80043839f8e6dbb9bf0d5863ba916aa 100644 (file)
--- a/src/script/lua_api/l_object.cpp
+++ b/src/script/lua_api/l_object.cpp
@@ -458,7 +458,7 @@ int ObjectRef::l_set_animation(lua_State *L)
        // Do it
        v2f frames = v2f(1, 1);
        if (!lua_isnil(L, 2))
-               frames = read_v2f(L, 2);
+               frames = readParam<v2f>(L, 2);
        float frame_speed = 15;
        if (!lua_isnil(L, 3))
                frame_speed = lua_tonumber(L, 3);
@@ -955,7 +955,7 @@ int ObjectRef::l_set_sprite(lua_State *L)
        // Do it
        v2s16 p(0,0);
        if (!lua_isnil(L, 2))
-               p = read_v2s16(L, 2);
+               p = readParam<v2s16>(L, 2);
        int num_frames = 1;
        if (!lua_isnil(L, 3))
                num_frames = lua_tonumber(L, 3);