Tidy sethome code, add global functions, round coords to 1 decimal

- Global functions sethome.set(name, pos) , sethome.get(name) and sethome.go(name)
- Tidy: trim coords to one decimal place and write to table and output table in one go.
- Add error checking
- Add t4im's homepos loader
This commit is contained in:
tenplus1 2016-07-03 17:40:43 +01:00 committed by sfan5
parent f4f9e58ef2
commit 80d49095f5
1 changed files with 65 additions and 50 deletions

View File

@ -1,65 +1,80 @@
sethome = {}
local homes_file = minetest.get_worldpath() .. "/homes" local homes_file = minetest.get_worldpath() .. "/homes"
local homepos = {} local homepos = {}
local function loadhomes() local function loadhomes()
local input = io.open(homes_file, "r") local input, err = io.open(homes_file, "r")
if input then if not input then
repeat return minetest.log("info", "Could not load player homes file: " .. err)
local x = input:read("*n") end
if x == nil then
break -- Iterate over all stored positions in the format "x y z player" for each line
end for pos, name in input:read("*a"):gmatch("(%S+ %S+ %S+)%s([%w_-]+)[\r\n]") do
local y = input:read("*n") homepos[name] = minetest.string_to_pos(pos)
local z = input:read("*n") end
local name = input:read("*l") input:close()
homepos[name:sub(2)] = {x = x, y = y, z = z}
until input:read(0) == nil
io.close(input)
else
homepos = {}
end
end end
loadhomes() loadhomes()
sethome.set = function(name, pos)
local player = minetest.get_player_by_name(name)
if not player or not pos then
return false
end
local data = {}
local output, err = io.open(homes_file, "w")
if output then
homepos[name] = pos
for i, v in pairs(homepos) do
table.insert(data, string.format("%.1f %.1f %.1f %s\n", v.x, v.y, v.z, i))
end
output:write(table.concat(data))
io.close(output)
return true
end
minetest.log("action", "Unable to write to player homes file: " .. err)
return false
end
sethome.get = function(name)
return homepos[name]
end
sethome.go = function(name)
local player = minetest.get_player_by_name(name)
if player and homepos[name] then
player:setpos(homepos[name])
return true
end
return false
end
minetest.register_privilege("home", "Can use /sethome and /home") minetest.register_privilege("home", "Can use /sethome and /home")
local changed = false
minetest.register_chatcommand("home", { minetest.register_chatcommand("home", {
description = "Teleport you to your home point", description = "Teleport you to your home point",
privs = {home=true}, privs = {home = true},
func = function(name) func = function(name)
local player = minetest.get_player_by_name(name) if sethome.go(name) then
if player == nil then return true, "Teleported to home!"
-- just a check to prevent the server crashing end
return false return false, "Set a home using /sethome"
end end,
if homepos[player:get_player_name()] then
player:setpos(homepos[player:get_player_name()])
minetest.chat_send_player(name, "Teleported to home!")
else
minetest.chat_send_player(name, "Set a home using /sethome")
end
end,
}) })
minetest.register_chatcommand("sethome", { minetest.register_chatcommand("sethome", {
description = "Set your home point", description = "Set your home point",
privs = {home=true}, privs = {home = true},
func = function(name) func = function(name)
local player = minetest.get_player_by_name(name) name = name or "" -- fallback to blank name if nil
local pos = player:getpos() local player = minetest.get_player_by_name(name)
homepos[player:get_player_name()] = pos if player and sethome.set(name, player:getpos()) then
minetest.chat_send_player(name, "Home set!") return true, "Home set!"
changed = true end
if changed then return false, "Player not found!"
local output = io.open(homes_file, "w") end,
for i, v in pairs(homepos) do
output:write(v.x.." "..v.y.." "..v.z.." "..i.."\n")
end
io.close(output)
changed = false
end
end,
}) })