aboutsummaryrefslogtreecommitdiff
path: root/src/script/lua_api/l_metadata.cpp
blob: 21002e6a70734bb0c674cde9596e79263da5f9bd (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
/*
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.
*/

#pragma once

#include "cpp_api/s_base.h"
#include "irr_v3d.h"
#include "util/string.h"

struct MoveAction;
struct InventoryLocation;
struct ItemStack;
struct ToolCapabilities;
struct PlayerHPChangeReason;
class ServerActiveObject;

class ScriptApiPlayer : virtual public ScriptApiBase
{
public:
	virtual ~ScriptApiPlayer() = default;

	void on_newplayer(ServerActiveObject *player);
	void on_dieplayer(ServerActiveObject *player, const PlayerHPChangeReason &reason);
	bool on_respawnplayer(ServerActiveObject *player);
	bool on_prejoinplayer(const std::string &name, const std::string &ip,
			std::string *reason);
	bool can_bypass_userlimit(const std::string &name, const std::string &ip);
	void on_joinplayer(ServerActiveObject *player, s64 last_login);
	void on_leaveplayer(ServerActiveObject *player, bool timeout);
	void on_cheat(ServerActiveObject *player, const std::string &cheat_type);
	bool on_punchplayer(ServerActiveObject *player, ServerActiveObject *hitter,
			float time_from_last_punch, const ToolCapabilities *toolcap,
			v3f dir, s16 damage);
	s32 on_player_hpchange(ServerActiveObject *player, s32 hp_change,
			const PlayerHPChangeReason &reason);
	void on_playerReceiveFields(ServerActiveObject *player,
			const std::string &formname, const StringMap &fields);
	void on_authplayer(const std::string &name, const std::string &ip, bool is_success);

	// Player inventory callbacks
	// Return number of accepted items to be moved
	int player_inventory_AllowMove(
		const MoveAction &ma, int count,
		ServerActiveObject *player);
	// Return number of accepted items to be put
	int player_inventory_AllowPut(
		const MoveAction &ma, const ItemStack &stack,
		ServerActiveObject *player);
	// Return number of accepted items to be taken
	int player_inventory_AllowTake(
		const MoveAction &ma, const ItemStack &stack,
		ServerActiveObject *player);
	// Report moved items
	void player_inventory_OnMove(
		const MoveAction &ma, int count,
		ServerActiveObject *player);
	// Report put items
	void player_inventory_OnPut(
		const MoveAction &ma, const ItemStack &stack,
		ServerActiveObject *player);
	// Report taken items
	void player_inventory_OnTake(
		const MoveAction &ma, const ItemStack &stack,
		ServerActiveObject *player);
private:
	void pushPutTakeArguments(
		const char *method, const InventoryLocation &loc,
		const std::string &listname, int index, const ItemStack &stack,
		ServerActiveObject *player);
	void pushMoveArguments(const MoveAction &ma,
		int count, ServerActiveObject *player);
};
class="hl opt">::checkobject(lua_State *L, int narg) { luaL_checktype(L, narg, LUA_TUSERDATA); void *ud = luaL_checkudata_is_metadataref(L, narg); if (!ud) luaL_typerror(L, narg, "MetaDataRef"); return *(MetaDataRef**)ud; // unbox pointer } // Exported functions // contains(self, name) int MetaDataRef::l_contains(lua_State *L) { MAP_LOCK_REQUIRED; MetaDataRef *ref = checkobject(L, 1); std::string name = luaL_checkstring(L, 2); Metadata *meta = ref->getmeta(false); if (meta == NULL) return 0; lua_pushboolean(L, meta->contains(name)); return 1; } // get(self, name) int MetaDataRef::l_get(lua_State *L) { MAP_LOCK_REQUIRED; MetaDataRef *ref = checkobject(L, 1); std::string name = luaL_checkstring(L, 2); Metadata *meta = ref->getmeta(false); if (meta == NULL) return 0; std::string str; if (meta->getStringToRef(name, str)) { lua_pushlstring(L, str.c_str(), str.size()); return 1; } return 0; } // get_string(self, name) int MetaDataRef::l_get_string(lua_State *L) { MAP_LOCK_REQUIRED; MetaDataRef *ref = checkobject(L, 1); std::string name = luaL_checkstring(L, 2); Metadata *meta = ref->getmeta(false); if (meta == NULL) { lua_pushlstring(L, "", 0); return 1; } const std::string &str = meta->getString(name); lua_pushlstring(L, str.c_str(), str.size()); return 1; } // set_string(self, name, var) int MetaDataRef::l_set_string(lua_State *L) { MAP_LOCK_REQUIRED; MetaDataRef *ref = checkobject(L, 1); std::string name = luaL_checkstring(L, 2); size_t len = 0; const char *s = lua_tolstring(L, 3, &len); std::string str(s, len); Metadata *meta = ref->getmeta(!str.empty()); if (meta == NULL || str == meta->getString(name)) return 0; meta->setString(name, str); ref->reportMetadataChange(&name); return 0; } // get_int(self, name) int MetaDataRef::l_get_int(lua_State *L) { MAP_LOCK_REQUIRED; MetaDataRef *ref = checkobject(L, 1); std::string name = luaL_checkstring(L, 2); Metadata *meta = ref->getmeta(false); if (meta == NULL) { lua_pushnumber(L, 0); return 1; } const std::string &str = meta->getString(name); lua_pushnumber(L, stoi(str)); return 1; } // set_int(self, name, var) int MetaDataRef::l_set_int(lua_State *L) { MAP_LOCK_REQUIRED; MetaDataRef *ref = checkobject(L, 1); std::string name = luaL_checkstring(L, 2); int a = luaL_checkint(L, 3); std::string str = itos(a); Metadata *meta = ref->getmeta(true); if (meta == NULL || str == meta->getString(name)) return 0; meta->setString(name, str); ref->reportMetadataChange(&name); return 0; } // get_float(self, name) int MetaDataRef::l_get_float(lua_State *L) { MAP_LOCK_REQUIRED; MetaDataRef *ref = checkobject(L, 1); std::string name = luaL_checkstring(L, 2); Metadata *meta = ref->getmeta(false); if (meta == NULL) { lua_pushnumber(L, 0); return 1; } const std::string &str = meta->getString(name); lua_pushnumber(L, stof(str)); return 1; } // set_float(self, name, var) int MetaDataRef::l_set_float(lua_State *L) { MAP_LOCK_REQUIRED; MetaDataRef *ref = checkobject(L, 1); std::string name = luaL_checkstring(L, 2); float a = readParam<float>(L, 3); std::string str = ftos(a); Metadata *meta = ref->getmeta(true); if (meta == NULL || str == meta->getString(name)) return 0; meta->setString(name, str); ref->reportMetadataChange(&name); return 0; } // to_table(self) int MetaDataRef::l_to_table(lua_State *L) { MAP_LOCK_REQUIRED; MetaDataRef *ref = checkobject(L, 1); Metadata *meta = ref->getmeta(true); if (meta == NULL) { lua_pushnil(L); return 1; } lua_newtable(L); ref->handleToTable(L, meta); return 1; } // from_table(self, table) int MetaDataRef::l_from_table(lua_State *L) { MAP_LOCK_REQUIRED; MetaDataRef *ref = checkobject(L, 1); int base = 2; ref->clearMeta(); if (!lua_istable(L, base)) { // No metadata lua_pushboolean(L, true); return 1; } // Create new metadata Metadata *meta = ref->getmeta(true); if (meta == NULL) { lua_pushboolean(L, false); return 1; } bool was_successful = ref->handleFromTable(L, base, meta); ref->reportMetadataChange(); lua_pushboolean(L, was_successful); return 1; } void MetaDataRef::handleToTable(lua_State *L, Metadata *meta) { lua_newtable(L); { const StringMap &fields = meta->getStrings(); for (const auto &field : fields) { const std::string &name = field.first; const std::string &value = field.second; lua_pushlstring(L, name.c_str(), name.size()); lua_pushlstring(L, value.c_str(), value.size()); lua_settable(L, -3); } } lua_setfield(L, -2, "fields"); } bool MetaDataRef::handleFromTable(lua_State *L, int table, Metadata *meta) { // Set fields lua_getfield(L, table, "fields"); if (lua_istable(L, -1)) { int fieldstable = lua_gettop(L); lua_pushnil(L); while (lua_next(L, fieldstable) != 0) { // key at index -2 and value at index -1 std::string name = readParam<std::string>(L, -2); size_t cl; const char *cs = lua_tolstring(L, -1, &cl); meta->setString(name, std::string(cs, cl)); lua_pop(L, 1); // Remove value, keep key for next iteration } lua_pop(L, 1); } return true; } // equals(self, other) int MetaDataRef::l_equals(lua_State *L) { MetaDataRef *ref1 = checkobject(L, 1); Metadata *data1 = ref1->getmeta(false); MetaDataRef *ref2 = checkobject(L, 2); Metadata *data2 = ref2->getmeta(false); if (data1 == NULL || data2 == NULL) lua_pushboolean(L, data1 == data2); else lua_pushboolean(L, *data1 == *data2); return 1; }