1
0
Fork 0
mirror of https://github.com/luanti-org/luanti.git synced 2025-09-15 18:57:08 +00:00

updated scripting api a bit

--HG--
rename : data/luaobjects/test/client.lua => data/scripts/objects/test/client.lua
rename : data/luaobjects/test/server.lua => data/scripts/objects/test/server.lua
This commit is contained in:
Perttu Ahola 2011-02-23 11:10:09 +02:00
parent 9778347c7f
commit be32adc872
8 changed files with 484 additions and 251 deletions

View file

@ -649,7 +649,7 @@ void LuaCAO::updateNodePos()
return;
m_node->setPosition(m_position);
m_node->setRotation(-m_rotation);
m_node->setRotation(m_rotation);
}
void LuaCAO::setPosition(v3f pos)

View file

@ -115,6 +115,26 @@ Player * Environment::getRandomConnectedPlayer()
return NULL;
}
Player * Environment::getNearestConnectedPlayer(v3f pos)
{
core::list<Player*> connected_players = getPlayers(true);
f32 nearest_d = 0;
Player *nearest_player = NULL;
for(core::list<Player*>::Iterator
i = connected_players.begin();
i != connected_players.end(); i++)
{
Player *player = *i;
f32 d = player->getPosition().getDistanceFrom(pos);
if(d < nearest_d || nearest_player == NULL)
{
nearest_d = d;
nearest_player = player;
}
}
return nearest_player;
}
core::list<Player*> Environment::getPlayers()
{
return m_players;
@ -480,9 +500,9 @@ void ServerEnvironment::step(float dtime)
if(player)
pos = player->getPosition();
pos += v3f(
myrand_range(-5,5)*BS,
myrand_range(-3,3)*BS,
0,
myrand_range(-5,5)*BS
myrand_range(-3,3)*BS
);
/*
@ -494,7 +514,7 @@ void ServerEnvironment::step(float dtime)
/*
Select a random type for it
*/
std::string objectdir = porting::getDataPath("luaobjects");
std::string objectdir = porting::getDataPath("scripts/objects");
std::vector<fs::DirListNode> dirlist = fs::GetDirListing(objectdir);
if(dirlist.size() > 0)
{

View file

@ -58,6 +58,7 @@ public:
Player * getPlayer(u16 peer_id);
Player * getPlayer(const char *name);
Player * getRandomConnectedPlayer();
Player * getNearestConnectedPlayer(v3f pos);
core::list<Player*> getPlayers();
core::list<Player*> getPlayers(bool ignore_disconnected);
void printPlayers(std::ostream &o);

View file

@ -3080,8 +3080,6 @@ void Server::BroadcastChatMessage(const std::wstring &message)
void Server::sendRemoveNode(v3s16 p, u16 ignore_id)
{
JMutexAutoLock conlock(m_con_mutex);
// Create packet
u32 replysize = 8;
SharedBuffer<u8> reply(replysize);

View file

@ -96,6 +96,37 @@ extern "C"{
on_initialize(self, data)
*/
/*
object_remove(x,y,z)
*/
static int lf_object_remove(lua_State *L)
{
// 1: self
LuaSAO *self = (LuaSAO*)lua_touserdata(L, -1);
lua_pop(L, 1);
assert(self);
self->m_removed = true;
return 0;
}
/*
ServerEnvironment object_get_environment(self)
*/
static int lf_object_get_environment(lua_State *L)
{
// 1: self
LuaSAO *self = (LuaSAO*)lua_touserdata(L, -1);
lua_pop(L, 1);
assert(self);
lua_pushlightuserdata(L, self->getEnv());
return 1;
}
/*
object_set_base_position(self, {X=,Y=,Z=})
*/
@ -187,9 +218,9 @@ static int lf_object_add_message(lua_State *L)
}
/*
object_get_node(self, {X=,Y=,Z=})
env_get_node(env, {X=,Y=,Z=})
*/
static int lf_object_get_node(lua_State *L)
static int lf_env_get_node(lua_State *L)
{
// 2: position
assert(lua_istable(L, -1));
@ -206,11 +237,11 @@ static int lf_object_get_node(lua_State *L)
lua_Number z = lua_tonumber(L, -1);
lua_pop(L, 1);
lua_pop(L, 1);
// 1: self
LuaSAO *self = (LuaSAO*)lua_touserdata(L, -1);
// 1: env
ServerEnvironment *env = (ServerEnvironment*)lua_touserdata(L, -1);
lua_pop(L, 1);
assert(self);
assert(env);
v3s16 pos = floatToInt(v3f(x,y,z), 1.0);
@ -219,7 +250,7 @@ static int lf_object_get_node(lua_State *L)
// Get the node
MapNode n(CONTENT_IGNORE);
n = self->getEnv()->getMap().getNodeNoEx(pos);
n = env->getMap().getNodeNoEx(pos);
// Create a table with some data about the node
lua_newtable(L);
@ -237,36 +268,6 @@ static int lf_object_get_node(lua_State *L)
return 1;
}
#if 0
/*
get_node_features(node)
node = {content=,param1=,param2=}
*/
static int lf_get_node_features(lua_State *L)
{
MapNode n;
// 1: node
assert(lua_istable(L, -1));
lua_pushstring(L, "content");
lua_gettable(L, -2);
n.d = lua_tointeger(L, -1);
lua_pop(L, 1);
lua_pushstring(L, "param1");
lua_gettable(L, -2);
n.param = lua_tointeger(L, -1);
lua_pop(L, 1);
lua_pushstring(L, "param2");
lua_gettable(L, -2);
n.param2 = lua_tointeger(L, -1);
lua_pop(L, 1);
lua_pop(L, 1);
ContentFeatures &f = content_features(n.d);
}
#endif
/*
get_content_features(content)
*/
@ -296,10 +297,10 @@ static int lf_get_content_features(lua_State *L)
}
/*
bool object_dig_node(self, {X=,Y=,Z=})
bool env_dig_node(env, {X=,Y=,Z=})
Return true on success
*/
static int lf_object_dig_node(lua_State *L)
static int lf_env_dig_node(lua_State *L)
{
// 2: position
assert(lua_istable(L, -1));
@ -316,11 +317,10 @@ static int lf_object_dig_node(lua_State *L)
lua_Number z = lua_tonumber(L, -1);
lua_pop(L, 1);
lua_pop(L, 1);
// 1: self
LuaSAO *self = (LuaSAO*)lua_touserdata(L, -1);
// 1: env
ServerEnvironment *env = (ServerEnvironment*)lua_touserdata(L, -1);
lua_pop(L, 1);
assert(self);
assert(env);
v3s16 pos = floatToInt(v3f(x,y,z), 1.0);
@ -329,19 +329,19 @@ static int lf_object_dig_node(lua_State *L)
This gets sent to the server by the map through the edit
event system.
*/
bool succeeded = self->getEnv()->getMap().removeNodeWithEvent(pos);
bool succeeded = env->getMap().removeNodeWithEvent(pos);
lua_pushboolean(L, succeeded);
return 1;
}
/*
bool object_place_node(self, {X=,Y=,Z=}, node)
bool env_place_node(env, {X=,Y=,Z=}, node)
node={content=,param1=,param2=}
param1 and param2 are optional
Return true on success
*/
static int lf_object_place_node(lua_State *L)
static int lf_env_place_node(lua_State *L)
{
// 3: node
MapNode n(CONTENT_STONE);
@ -379,11 +379,10 @@ static int lf_object_place_node(lua_State *L)
lua_Number z = lua_tonumber(L, -1);
lua_pop(L, 1);
lua_pop(L, 1);
// 1: self
LuaSAO *self = (LuaSAO*)lua_touserdata(L, -1);
// 1: env
ServerEnvironment *env = (ServerEnvironment*)lua_touserdata(L, -1);
lua_pop(L, 1);
assert(self);
assert(env);
v3s16 pos = floatToInt(v3f(x,y,z), 1.0);
@ -392,59 +391,100 @@ static int lf_object_place_node(lua_State *L)
This gets sent to the server by the map through the edit
event system.
*/
bool succeeded = self->getEnv()->getMap().addNodeWithEvent(pos, n);
bool succeeded = env->getMap().addNodeWithEvent(pos, n);
lua_pushboolean(L, succeeded);
return 1;
}
/*
object_remove(x,y,z)
string env_get_nearest_player_name(env, {X=,Y=,Z=})
*/
static int lf_object_remove(lua_State *L)
static int lf_env_get_nearest_player_name(lua_State *L)
{
// 1: self
LuaSAO *self = (LuaSAO*)lua_touserdata(L, -1);
// 2: position
assert(lua_istable(L, -1));
lua_pushstring(L, "X");
lua_gettable(L, -2);
lua_Number x = lua_tonumber(L, -1);
lua_pop(L, 1);
lua_pushstring(L, "Y");
lua_gettable(L, -2);
lua_Number y = lua_tonumber(L, -1);
lua_pop(L, 1);
lua_pushstring(L, "Z");
lua_gettable(L, -2);
lua_Number z = lua_tonumber(L, -1);
lua_pop(L, 1);
lua_pop(L, 1);
// 1: env
ServerEnvironment *env = (ServerEnvironment*)lua_touserdata(L, -1);
lua_pop(L, 1);
assert(env);
assert(self);
self->m_removed = true;
return 0;
v3f pos_f = v3f(x,y,z)*BS;
Player *player = env->getNearestConnectedPlayer(pos_f);
if(player)
lua_pushstring(L, player->getName());
else
lua_pushstring(L, "");
return 1; // Number of return values
}
/*
{X=,Y=,Z=} object_get_nearest_player_position(self)
{exists=, pos={X=,Y=,Z=}, connected=} env_get_player_info(env, name)
*/
/*static int lf_object_get_nearest_player_position(lua_State *L)
static int lf_env_get_player_info(lua_State *L)
{
// 1: self
LuaSAO *self = (LuaSAO*)lua_touserdata(L, -1);
// 2: name
const char *name = lua_tostring(L, -1);
lua_pop(L, 1);
// 1: env
ServerEnvironment *env = (ServerEnvironment*)lua_touserdata(L, -1);
lua_pop(L, 1);
assert(env);
assert(self);
ServerEnvironment *env = self->getEnv();
env->
v3f pos = ;
Player *player = env->getPlayer(name);
v3f pos(0,0,0);
if(player)
pos = player->getPosition();
lua_newtable(L);
lua_pushstring(L, "X");
lua_pushnumber(L, pos.X/BS);
lua_pushstring(L, "exists");
lua_pushboolean(L, (player != NULL));
lua_settable(L, -3);
if(player != NULL)
{
lua_pushstring(L, "pos");
{
lua_newtable(L);
lua_pushstring(L, "X");
lua_pushnumber(L, pos.X/BS);
lua_settable(L, -3);
lua_pushstring(L, "Y");
lua_pushnumber(L, pos.Y/BS);
lua_settable(L, -3);
lua_pushstring(L, "Y");
lua_pushnumber(L, pos.Y/BS);
lua_settable(L, -3);
lua_pushstring(L, "Z");
lua_pushnumber(L, pos.Z/BS);
lua_settable(L, -3);
lua_pushstring(L, "Z");
lua_pushnumber(L, pos.Z/BS);
lua_settable(L, -3);
}
lua_settable(L, -3);
lua_pushstring(L, "connected");
lua_pushboolean(L, (player->peer_id != 0));
lua_settable(L, -3);
}
return 1; // Number of return values
}*/
}
LuaSAO::LuaSAO(ServerEnvironment *env, u16 id, v3f pos):
ServerActiveObject(env, id, pos),
@ -465,14 +505,18 @@ LuaSAO::LuaSAO(ServerEnvironment *env, u16 id, v3f pos):
//lua_setglobal(L, "self");
// Register functions
lua_register(L, "object_set_base_position", lf_object_set_base_position);
lua_register(L, "object_get_base_position", lf_object_get_base_position);
lua_register(L, "object_add_message", lf_object_add_message);
lua_register(L, "object_get_node", lf_object_get_node);
lua_register(L, "get_content_features", lf_get_content_features);
lua_register(L, "object_dig_node", lf_object_dig_node);
lua_register(L, "object_place_node", lf_object_place_node);
lua_register(L, "object_remove", lf_object_remove);
#define LUA_REGISTER_FUNC(L, x) lua_register(L, #x, lf_ ## x)
LUA_REGISTER_FUNC(L, object_remove);
LUA_REGISTER_FUNC(L, object_get_environment);
LUA_REGISTER_FUNC(L, object_set_base_position);
LUA_REGISTER_FUNC(L, object_get_base_position);
LUA_REGISTER_FUNC(L, object_add_message);
LUA_REGISTER_FUNC(L, env_get_node);
LUA_REGISTER_FUNC(L, get_content_features);
LUA_REGISTER_FUNC(L, env_dig_node);
LUA_REGISTER_FUNC(L, env_place_node);
LUA_REGISTER_FUNC(L, env_get_nearest_player_name);
LUA_REGISTER_FUNC(L, env_get_player_info);
}
LuaSAO::~LuaSAO()
@ -487,7 +531,7 @@ std::string LuaSAO::getClientInitializationData()
*/
std::string relative_path;
relative_path += "luaobjects/";
relative_path += "scripts/objects/";
relative_path += m_script_name;
relative_path += "/client.lua";
std::string full_path = porting::getDataPath(relative_path.c_str());
@ -694,7 +738,7 @@ void LuaSAO::loadScripts(const std::string &script_name)
m_script_name = script_name;
std::string relative_path;
relative_path += "luaobjects/";
relative_path += "scripts/objects/";
relative_path += script_name;
std::string server_file = relative_path + "/server.lua";
std::string server_path = porting::getDataPath(server_file.c_str());