[CSM] Add core.get_timeofday & core.get_day_count env calls (#5401)

[minetest.git] / src / script / cpp_api / s_item.cpp

diff --git a/src/script/cpp_api/s_item.cpp b/src/script/cpp_api/s_item.cpp
index cb5b1e775e345e8826c3489a385fe3a618115c4e..cbb83380735095033d89f11660aa374585422f20 100644 (file)
--- a/src/script/cpp_api/s_item.cpp
+++ b/src/script/cpp_api/s_item.cpp
@@ -34,24 +34,25 @@ bool ScriptApiItem::item_OnDrop(ItemStack &item,
 {
        SCRIPTAPI_PRECHECKHEADER
 
+       int error_handler = PUSH_ERROR_HANDLER(L);
+
        // Push callback function on stack
        if (!getItemCallback(item.name.c_str(), "on_drop"))
                return false;
 
        // Call function
        LuaItemStack::create(L, item);
-       objectrefGetOrCreate(dropper);
+       objectrefGetOrCreate(L, dropper);
        pushFloatPos(L, pos);
-       if (lua_pcall(L, 3, 1, m_errorhandler))
-               scriptError();
+       PCALL_RES(lua_pcall(L, 3, 1, error_handler));
        if (!lua_isnil(L, -1)) {
                try {
-                       item = read_item(L,-1, getServer());
+                       item = read_item(L, -1, getServer()->idef());
                } catch (LuaError &e) {
                        throw LuaError(std::string(e.what()) + ". item=" + item.name);
                }
        }
-       lua_pop(L, 1);  // Pop item
+       lua_pop(L, 2);  // Pop item and error handler
        return true;
 }
 
@@ -60,24 +61,25 @@ bool ScriptApiItem::item_OnPlace(ItemStack &item,
 {
        SCRIPTAPI_PRECHECKHEADER
 
+       int error_handler = PUSH_ERROR_HANDLER(L);
+
        // Push callback function on stack
        if (!getItemCallback(item.name.c_str(), "on_place"))
                return false;
 
        // Call function
        LuaItemStack::create(L, item);
-       objectrefGetOrCreate(placer);
+       objectrefGetOrCreate(L, placer);
        pushPointedThing(pointed);
-       if (lua_pcall(L, 3, 1, m_errorhandler))
-               scriptError();
+       PCALL_RES(lua_pcall(L, 3, 1, error_handler));
        if (!lua_isnil(L, -1)) {
                try {
-                       item = read_item(L,-1, getServer());
+                       item = read_item(L, -1, getServer()->idef());
                } catch (LuaError &e) {
                        throw LuaError(std::string(e.what()) + ". item=" + item.name);
                }
        }
-       lua_pop(L, 1);  // Pop item
+       lua_pop(L, 2);  // Pop item and error handler
        return true;
 }
 
@@ -86,24 +88,51 @@ bool ScriptApiItem::item_OnUse(ItemStack &item,
 {
        SCRIPTAPI_PRECHECKHEADER
 
+       int error_handler = PUSH_ERROR_HANDLER(L);
+
        // Push callback function on stack
        if (!getItemCallback(item.name.c_str(), "on_use"))
                return false;
 
        // Call function
        LuaItemStack::create(L, item);
-       objectrefGetOrCreate(user);
+       objectrefGetOrCreate(L, user);
        pushPointedThing(pointed);
-       if (lua_pcall(L, 3, 1, m_errorhandler))
-               scriptError();
+       PCALL_RES(lua_pcall(L, 3, 1, error_handler));
        if(!lua_isnil(L, -1)) {
                try {
-                       item = read_item(L,-1, getServer());
+                       item = read_item(L, -1, getServer()->idef());
+               } catch (LuaError &e) {
+                       throw LuaError(std::string(e.what()) + ". item=" + item.name);
+               }
+       }
+       lua_pop(L, 2);  // Pop item and error handler
+       return true;
+}
+
+bool ScriptApiItem::item_OnSecondaryUse(ItemStack &item, ServerActiveObject *user)
+{
+       SCRIPTAPI_PRECHECKHEADER
+       
+       int error_handler = PUSH_ERROR_HANDLER(L);
+       
+       if (!getItemCallback(item.name.c_str(), "on_secondary_use"))
+               return false;
+       
+       LuaItemStack::create(L, item);
+       objectrefGetOrCreate(L, user);
+       PointedThing pointed;
+       pointed.type = POINTEDTHING_NOTHING;
+       pushPointedThing(pointed);
+       PCALL_RES(lua_pcall(L, 3, 1, error_handler));
+       if (!lua_isnil(L, -1)) {
+               try {
+                       item = read_item(L, -1, getServer()->idef());
                } catch (LuaError &e) {
                        throw LuaError(std::string(e.what()) + ". item=" + item.name);
                }
        }
-       lua_pop(L, 1);  // Pop item
+       lua_pop(L, 2);  // Pop item and error handler
        return true;
 }
 
@@ -112,11 +141,13 @@ bool ScriptApiItem::item_OnCraft(ItemStack &item, ServerActiveObject *user,
 {
        SCRIPTAPI_PRECHECKHEADER
 
-       lua_getglobal(L, "minetest");
+       int error_handler = PUSH_ERROR_HANDLER(L);
+
+       lua_getglobal(L, "core");
        lua_getfield(L, -1, "on_craft");
        LuaItemStack::create(L, item);
-       objectrefGetOrCreate(user);
-       
+       objectrefGetOrCreate(L, user);
+
        // Push inventory list
        std::vector<ItemStack> items;
        for (u32 i = 0; i < old_craft_grid->getSize(); i++) {
@@ -125,16 +156,15 @@ bool ScriptApiItem::item_OnCraft(ItemStack &item, ServerActiveObject *user,
        push_items(L, items);
 
        InvRef::create(L, craft_inv);
-       if (lua_pcall(L, 4, 1, m_errorhandler))
-               scriptError();
+       PCALL_RES(lua_pcall(L, 4, 1, error_handler));
        if (!lua_isnil(L, -1)) {
                try {
-                       item = read_item(L,-1, getServer());
+                       item = read_item(L, -1, getServer()->idef());
                } catch (LuaError &e) {
                        throw LuaError(std::string(e.what()) + ". item=" + item.name);
                }
        }
-       lua_pop(L, 1);  // Pop item
+       lua_pop(L, 2);  // Pop item and error handler
        return true;
 }
 
@@ -143,10 +173,12 @@ bool ScriptApiItem::item_CraftPredict(ItemStack &item, ServerActiveObject *user,
 {
        SCRIPTAPI_PRECHECKHEADER
 
-       lua_getglobal(L, "minetest");
+       int error_handler = PUSH_ERROR_HANDLER(L);
+
+       lua_getglobal(L, "core");
        lua_getfield(L, -1, "craft_predict");
        LuaItemStack::create(L, item);
-       objectrefGetOrCreate(user);
+       objectrefGetOrCreate(L, user);
 
        //Push inventory list
        std::vector<ItemStack> items;
@@ -156,32 +188,31 @@ bool ScriptApiItem::item_CraftPredict(ItemStack &item, ServerActiveObject *user,
        push_items(L, items);
 
        InvRef::create(L, craft_inv);
-       if (lua_pcall(L, 4, 1, m_errorhandler))
-               scriptError();
+       PCALL_RES(lua_pcall(L, 4, 1, error_handler));
        if (!lua_isnil(L, -1)) {
                try {
-                       item = read_item(L,-1, getServer());
+                       item = read_item(L, -1, getServer()->idef());
                } catch (LuaError &e) {
                        throw LuaError(std::string(e.what()) + ". item=" + item.name);
                }
        }
-       lua_pop(L, 1);  // Pop item
+       lua_pop(L, 2);  // Pop item and error handler
        return true;
 }
 
-// Retrieves minetest.registered_items[name][callbackname]
+// Retrieves core.registered_items[name][callbackname]
 // If that is nil or on error, return false and stack is unchanged
 // If that is a function, returns true and pushes the
 // function onto the stack
-// If minetest.registered_items[name] doesn't exist, minetest.nodedef_default
+// If core.registered_items[name] doesn't exist, core.nodedef_default
 // is tried instead so unknown items can still be manipulated to some degree
 bool ScriptApiItem::getItemCallback(const char *name, const char *callbackname)
 {
        lua_State* L = getStack();
 
-       lua_getglobal(L, "minetest");
+       lua_getglobal(L, "core");
        lua_getfield(L, -1, "registered_items");
-       lua_remove(L, -2); // Remove minetest
+       lua_remove(L, -2); // Remove core
        luaL_checktype(L, -1, LUA_TTABLE);
        lua_getfield(L, -1, name);
        lua_remove(L, -2); // Remove registered_items
@@ -192,12 +223,15 @@ bool ScriptApiItem::getItemCallback(const char *name, const char *callbackname)
                errorstream << "Item \"" << name << "\" not defined" << std::endl;
                lua_pop(L, 1);
 
-               // Try minetest.nodedef_default instead
-               lua_getglobal(L, "minetest");
+               // Try core.nodedef_default instead
+               lua_getglobal(L, "core");
                lua_getfield(L, -1, "nodedef_default");
                lua_remove(L, -2);
                luaL_checktype(L, -1, LUA_TTABLE);
        }
+
+       setOriginFromTable(-1);
+
        lua_getfield(L, -1, callbackname);
        lua_remove(L, -2); // Remove item def
        // Should be a function or nil
@@ -229,7 +263,7 @@ void ScriptApiItem::pushPointedThing(const PointedThing& pointed)
        {
                lua_pushstring(L, "object");
                lua_setfield(L, -2, "type");
-               objectrefGet(pointed.object_id);
+               objectrefGet(L, pointed.object_id);
                lua_setfield(L, -2, "ref");
        }
        else