123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232 |
- /*
- Minetest
- Copyright (C) 2013 celeron55, Perttu Ahola <celeron55@gmail.com>
- This program is free software; you can redistribute it and/or modify
- it under the terms of the GNU Lesser General Public License as published by
- the Free Software Foundation; either version 2.1 of the License, or
- (at your option) any later version.
- This program is distributed in the hope that it will be useful,
- but WITHOUT ANY WARRANTY; without even the implied warranty of
- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- GNU Lesser General Public License for more details.
- You should have received a copy of the GNU Lesser General Public License along
- with this program; if not, write to the Free Software Foundation, Inc.,
- 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
- */
- #include "cpp_api/s_nodemeta.h"
- #include "cpp_api/s_internal.h"
- #include "common/c_converter.h"
- #include "nodedef.h"
- #include "mapnode.h"
- #include "server.h"
- #include "environment.h"
- #include "lua_api/l_item.h"
- // Return number of accepted items to be moved
- int ScriptApiNodemeta::nodemeta_inventory_AllowMove(
- const MoveAction &ma, int count,
- ServerActiveObject *player)
- {
- SCRIPTAPI_PRECHECKHEADER
- int error_handler = PUSH_ERROR_HANDLER(L);
- const NodeDefManager *ndef = getServer()->ndef();
- // If node doesn't exist, we don't know what callback to call
- MapNode node = getEnv()->getMap().getNode(ma.to_inv.p);
- if (node.getContent() == CONTENT_IGNORE)
- return 0;
- // Push callback function on stack
- const auto &nodename = ndef->get(node).name;
- if (!getItemCallback(nodename.c_str(), "allow_metadata_inventory_move", &ma.to_inv.p))
- return count;
- // function(pos, from_list, from_index, to_list, to_index, count, player)
- push_v3s16(L, ma.to_inv.p); // pos
- lua_pushstring(L, ma.from_list.c_str()); // from_list
- lua_pushinteger(L, ma.from_i + 1); // from_index
- lua_pushstring(L, ma.to_list.c_str()); // to_list
- lua_pushinteger(L, ma.to_i + 1); // to_index
- lua_pushinteger(L, count); // count
- objectrefGetOrCreate(L, player); // player
- PCALL_RES(lua_pcall(L, 7, 1, error_handler));
- if (!lua_isnumber(L, -1))
- throw LuaError("allow_metadata_inventory_move should"
- " return a number. node=" + nodename);
- int num = luaL_checkinteger(L, -1);
- lua_pop(L, 2); // Pop integer and error handler
- return num;
- }
- // Return number of accepted items to be put
- int ScriptApiNodemeta::nodemeta_inventory_AllowPut(
- const MoveAction &ma, const ItemStack &stack,
- ServerActiveObject *player)
- {
- SCRIPTAPI_PRECHECKHEADER
- int error_handler = PUSH_ERROR_HANDLER(L);
- const NodeDefManager *ndef = getServer()->ndef();
- // If node doesn't exist, we don't know what callback to call
- MapNode node = getEnv()->getMap().getNode(ma.to_inv.p);
- if (node.getContent() == CONTENT_IGNORE)
- return 0;
- // Push callback function on stack
- const auto &nodename = ndef->get(node).name;
- if (!getItemCallback(nodename.c_str(), "allow_metadata_inventory_put", &ma.to_inv.p))
- return stack.count;
- // Call function(pos, listname, index, stack, player)
- push_v3s16(L, ma.to_inv.p); // pos
- lua_pushstring(L, ma.to_list.c_str()); // listname
- lua_pushinteger(L, ma.to_i + 1); // index
- LuaItemStack::create(L, stack); // stack
- objectrefGetOrCreate(L, player); // player
- PCALL_RES(lua_pcall(L, 5, 1, error_handler));
- if(!lua_isnumber(L, -1))
- throw LuaError("allow_metadata_inventory_put should"
- " return a number. node=" + nodename);
- int num = luaL_checkinteger(L, -1);
- lua_pop(L, 2); // Pop integer and error handler
- return num;
- }
- // Return number of accepted items to be taken
- int ScriptApiNodemeta::nodemeta_inventory_AllowTake(
- const MoveAction &ma, const ItemStack &stack,
- ServerActiveObject *player)
- {
- SCRIPTAPI_PRECHECKHEADER
- int error_handler = PUSH_ERROR_HANDLER(L);
- const NodeDefManager *ndef = getServer()->ndef();
- // If node doesn't exist, we don't know what callback to call
- MapNode node = getEnv()->getMap().getNode(ma.from_inv.p);
- if (node.getContent() == CONTENT_IGNORE)
- return 0;
- // Push callback function on stack
- const auto &nodename = ndef->get(node).name;
- if (!getItemCallback(nodename.c_str(), "allow_metadata_inventory_take", &ma.from_inv.p))
- return stack.count;
- // Call function(pos, listname, index, count, player)
- push_v3s16(L, ma.from_inv.p); // pos
- lua_pushstring(L, ma.from_list.c_str()); // listname
- lua_pushinteger(L, ma.from_i + 1); // index
- LuaItemStack::create(L, stack); // stack
- objectrefGetOrCreate(L, player); // player
- PCALL_RES(lua_pcall(L, 5, 1, error_handler));
- if (!lua_isnumber(L, -1))
- throw LuaError("allow_metadata_inventory_take should"
- " return a number. node=" + nodename);
- int num = luaL_checkinteger(L, -1);
- lua_pop(L, 2); // Pop integer and error handler
- return num;
- }
- // Report moved items
- void ScriptApiNodemeta::nodemeta_inventory_OnMove(
- const MoveAction &ma, int count,
- ServerActiveObject *player)
- {
- SCRIPTAPI_PRECHECKHEADER
- int error_handler = PUSH_ERROR_HANDLER(L);
- const NodeDefManager *ndef = getServer()->ndef();
- // If node doesn't exist, we don't know what callback to call
- MapNode node = getEnv()->getMap().getNode(ma.from_inv.p);
- if (node.getContent() == CONTENT_IGNORE)
- return;
- // Push callback function on stack
- const auto &nodename = ndef->get(node).name;
- if (!getItemCallback(nodename.c_str(), "on_metadata_inventory_move", &ma.from_inv.p))
- return;
- // function(pos, from_list, from_index, to_list, to_index, count, player)
- push_v3s16(L, ma.from_inv.p); // pos
- lua_pushstring(L, ma.from_list.c_str()); // from_list
- lua_pushinteger(L, ma.from_i + 1); // from_index
- lua_pushstring(L, ma.to_list.c_str()); // to_list
- lua_pushinteger(L, ma.to_i + 1); // to_index
- lua_pushinteger(L, count); // count
- objectrefGetOrCreate(L, player); // player
- PCALL_RES(lua_pcall(L, 7, 0, error_handler));
- lua_pop(L, 1); // Pop error handler
- }
- // Report put items
- void ScriptApiNodemeta::nodemeta_inventory_OnPut(
- const MoveAction &ma, const ItemStack &stack,
- ServerActiveObject *player)
- {
- SCRIPTAPI_PRECHECKHEADER
- int error_handler = PUSH_ERROR_HANDLER(L);
- const NodeDefManager *ndef = getServer()->ndef();
- // If node doesn't exist, we don't know what callback to call
- MapNode node = getEnv()->getMap().getNode(ma.to_inv.p);
- if (node.getContent() == CONTENT_IGNORE)
- return;
- // Push callback function on stack
- const auto &nodename = ndef->get(node).name;
- if (!getItemCallback(nodename.c_str(), "on_metadata_inventory_put", &ma.to_inv.p))
- return;
- // Call function(pos, listname, index, stack, player)
- push_v3s16(L, ma.to_inv.p); // pos
- lua_pushstring(L, ma.to_list.c_str()); // listname
- lua_pushinteger(L, ma.to_i + 1); // index
- LuaItemStack::create(L, stack); // stack
- objectrefGetOrCreate(L, player); // player
- PCALL_RES(lua_pcall(L, 5, 0, error_handler));
- lua_pop(L, 1); // Pop error handler
- }
- // Report taken items
- void ScriptApiNodemeta::nodemeta_inventory_OnTake(
- const MoveAction &ma, const ItemStack &stack,
- ServerActiveObject *player)
- {
- SCRIPTAPI_PRECHECKHEADER
- int error_handler = PUSH_ERROR_HANDLER(L);
- const NodeDefManager *ndef = getServer()->ndef();
- // If node doesn't exist, we don't know what callback to call
- MapNode node = getEnv()->getMap().getNode(ma.from_inv.p);
- if (node.getContent() == CONTENT_IGNORE)
- return;
- // Push callback function on stack
- const auto &nodename = ndef->get(node).name;
- if (!getItemCallback(nodename.c_str(), "on_metadata_inventory_take", &ma.from_inv.p))
- return;
- // Call function(pos, listname, index, stack, player)
- push_v3s16(L, ma.from_inv.p); // pos
- lua_pushstring(L, ma.from_list.c_str()); // listname
- lua_pushinteger(L, ma.from_i + 1); // index
- LuaItemStack::create(L, stack); // stack
- objectrefGetOrCreate(L, player); // player
- PCALL_RES(lua_pcall(L, 5, 0, error_handler));
- lua_pop(L, 1); // Pop error handler
- }
|