1
0
mirror of https://github.com/sys4-fr/server-nalc.git synced 2024-12-26 10:40:37 +01:00
server-nalc/minetestforfun_game/mods/sethome/init.lua
2015-02-19 16:57:24 +01:00

117 lines
3.8 KiB
Lua

home = {}
home.homes_file = {["real"] = minetest.get_worldpath() .. "/realhomes",
["nether"] = minetest.get_worldpath() .. "/netherhomes"}
home.homepos = {["real"] = {}, ["nether"] = {}}
home.g_timers = {["real"] = {}, ["nether"] = {}}
home.s_timers = {["real"] = {}, ["nether"] = {}}
home.GET_HOME_INTERVAL = 20*60
home.SET_HOME_INTERVAL = 20*60
home.sethome = function(name)
local player = minetest.get_player_by_name(name)
local pos = player:getpos()
local p_status = "real"
if pos.y < -19600 then
p_status = "nether"
end
if home.s_timers[p_status][name] ~= nil then
local timer_player = os.difftime(os.time(),home.s_timers[p_status][name])
if timer_player < home.SET_HOME_INTERVAL then -- less than x minutes
minetest.chat_send_player(name, "Please retry later, you used sethome last time less than ".. home.SET_HOME_INTERVAL .." seconds ago.")
minetest.chat_send_player(name, "Retry in: ".. home.SET_HOME_INTERVAL-timer_player .." seconds.")
minetest.log("action","Player ".. name .." tried to sethome within forbidden interval.")
return false
end
end
if home.homepos[p_status][player:get_player_name()] ~= pos then
home.s_timers[p_status][name] = os.time()
home.homepos[p_status][player:get_player_name()] = pos
minetest.chat_send_player(name, "Home set!")
local output = io.open(home.homes_file[p_status], "w")
output:write(minetest.serialize(home.homepos[p_status]))
io.close(output)
return true
end
return false
end
home.tohome = function(name)
local player = minetest.get_player_by_name(name)
if player == nil then
-- just a check to prevent the server crashing
return false
end
local p_status = "real"
if player:getpos().y < -19600 then
p_status = "nether"
end
if home.homepos[p_status][name] then
if home.g_timers[p_status][name] ~= nil then
local timer_player = os.difftime(os.time(),home.g_timers[p_status][name])
if timer_player < home.GET_HOME_INTERVAL then -- less than x minutes
minetest.chat_send_player(name, "Please retry later, you used home last time less than ".. home.GET_HOME_INTERVAL .." seconds ago.")
minetest.chat_send_player(name, "Retry in: ".. home.GET_HOME_INTERVAL-timer_player .." seconds.")
minetest.log("action","Player ".. name .." tried to teleport home within forbidden interval.")
return false
end
end
player:setpos(home.homepos[p_status][player:get_player_name()])
minetest.chat_send_player(name, "Teleported to home!")
minetest.log("action","Player ".. name .." teleported to home. Last teleportation allowed in ".. home.GET_HOME_INTERVAL .." seconds.")
home.g_timers[p_status][name] = os.time()
return true
else
minetest.chat_send_player(name, "Set a home using /sethome")
return false
end
end
local function loadhomes()
for key,_ in pairs(home.homes_file) do
local input = io.open(home.homes_file[key], "r")
if input then
-- Old format handler
local line = input:read()
input:seek("set",0)
if line == nil then return end
if not line:match("return {") then
repeat
local x = input:read("*n")
if x == nil then
break
end
local y = input:read("*n")
local z = input:read("*n")
local name = input:read("*l")
home.homepos[key][name:sub(2)] = {x = x, y = y, z = z}
until input:read(0) == nil
else
home.homepos[key] = minetest.deserialize(input:read())
end
io.close(input)
else
home.homepos[key] = {}
end
end
end
loadhomes()
minetest.register_privilege("home", "Can use /sethome and /home")
minetest.register_chatcommand("home", {
description = "Teleport you to your home point",
privs = {home=true},
func = home.tohome,
})
minetest.register_chatcommand("sethome", {
description = "Set your home point",
privs = {home=true},
func = home.sethome,
})
minetest.log("action","[sethome] Loaded.")