From d1c27c7e8037e9f438741ee5f7d3b6bda22d22a0 Mon Sep 17 00:00:00 2001 From: ANAND Date: Thu, 8 Aug 2019 21:34:46 +0530 Subject: Allow customizing chat message format (#8529) --- builtin/game/chat.lua | 1086 +++++++++++++++++++++++++++++++++++++++++ builtin/game/chatcommands.lua | 1061 ---------------------------------------- builtin/game/init.lua | 40 +- 3 files changed, 1106 insertions(+), 1081 deletions(-) create mode 100644 builtin/game/chat.lua delete mode 100644 builtin/game/chatcommands.lua (limited to 'builtin/game') diff --git a/builtin/game/chat.lua b/builtin/game/chat.lua new file mode 100644 index 000000000..84559b064 --- /dev/null +++ b/builtin/game/chat.lua @@ -0,0 +1,1086 @@ +-- Minetest: builtin/game/chat.lua + +-- +-- Chat message formatter +-- + +-- Implemented in Lua to allow redefinition +function core.format_chat_message(name, message) + local str = core.settings:get("chat_message_format") + local error_str = "Invalid chat message format - missing %s" + local i + + str, i = str:gsub("@name", name, 1) + if i == 0 then + error(error_str:format("@name"), 2) + end + + str, i = str:gsub("@message", message, 1) + if i == 0 then + error(error_str:format("@message"), 2) + end + + str = str:gsub("@timestamp", os.date("%H:%M:%S", os.time()), 1) + + return str +end + +-- +-- Chat command handler +-- + +core.chatcommands = core.registered_chatcommands -- BACKWARDS COMPATIBILITY + +core.register_on_chat_message(function(name, message) + if message:sub(1,1) ~= "/" then + return + end + + local cmd, param = string.match(message, "^/([^ ]+) *(.*)") + if not cmd then + core.chat_send_player(name, "-!- Empty command") + return true + end + + param = param or "" + + local cmd_def = core.registered_chatcommands[cmd] + if not cmd_def then + core.chat_send_player(name, "-!- Invalid command: " .. cmd) + return true + end + local has_privs, missing_privs = core.check_player_privs(name, cmd_def.privs) + if has_privs then + core.set_last_run_mod(cmd_def.mod_origin) + local _, result = cmd_def.func(name, param) + if result then + core.chat_send_player(name, result) + end + else + core.chat_send_player(name, "You don't have permission" + .. " to run this command (missing privileges: " + .. table.concat(missing_privs, ", ") .. ")") + end + return true -- Handled chat message +end) + +if core.settings:get_bool("profiler.load") then + -- Run after register_chatcommand and its register_on_chat_message + -- Before any chatcommands that should be profiled + profiler.init_chatcommand() +end + +-- Parses a "range" string in the format of "here (number)" or +-- "(x1, y1, z1) (x2, y2, z2)", returning two position vectors +local function parse_range_str(player_name, str) + local p1, p2 + local args = str:split(" ") + + if args[1] == "here" then + p1, p2 = core.get_player_radius_area(player_name, tonumber(args[2])) + if p1 == nil then + return false, "Unable to get player " .. player_name .. " position" + end + else + p1, p2 = core.string_to_area(str) + if p1 == nil then + return false, "Incorrect area format. Expected: (x1,y1,z1) (x2,y2,z2)" + end + end + + return p1, p2 +end + +-- +-- Chat commands +-- +core.register_chatcommand("me", { + params = "", + description = "Show chat action (e.g., '/me orders a pizza' displays" + .. " ' orders a pizza')", + privs = {shout=true}, + func = function(name, param) + core.chat_send_all("* " .. name .. " " .. param) + end, +}) + +core.register_chatcommand("admin", { + description = "Show the name of the server owner", + func = function(name) + local admin = core.settings:get("name") + if admin then + return true, "The administrator of this server is " .. admin .. "." + else + return false, "There's no administrator named in the config file." + end + end, +}) + +core.register_chatcommand("privs", { + params = "[]", + description = "Show privileges of yourself or another player", + func = function(caller, param) + param = param:trim() + local name = (param ~= "" and param or caller) + if not core.player_exists(name) then + return false, "Player " .. name .. " does not exist." + end + return true, "Privileges of " .. name .. ": " + .. core.privs_to_string( + core.get_player_privs(name), ' ') + end, +}) + +core.register_chatcommand("haspriv", { + params = "", + description = "Return list of all online players with privilege.", + privs = {basic_privs = true}, + func = function(caller, param) + param = param:trim() + if param == "" then + return false, "Invalid parameters (see /help haspriv)" + end + if not core.registered_privileges[param] then + return false, "Unknown privilege!" + end + local privs = core.string_to_privs(param) + local players_with_priv = {} + for _, player in pairs(core.get_connected_players()) do + local player_name = player:get_player_name() + if core.check_player_privs(player_name, privs) then + table.insert(players_with_priv, player_name) + end + end + return true, "Players online with the \"" .. param .. "\" privilege: " .. + table.concat(players_with_priv, ", ") + end +}) + +local function handle_grant_command(caller, grantname, grantprivstr) + local caller_privs = core.get_player_privs(caller) + if not (caller_privs.privs or caller_privs.basic_privs) then + return false, "Your privileges are insufficient." + end + + if not core.get_auth_handler().get_auth(grantname) then + return false, "Player " .. grantname .. " does not exist." + end + local grantprivs = core.string_to_privs(grantprivstr) + if grantprivstr == "all" then + grantprivs = core.registered_privileges + end + local privs = core.get_player_privs(grantname) + local privs_unknown = "" + local basic_privs = + core.string_to_privs(core.settings:get("basic_privs") or "interact,shout") + for priv, _ in pairs(grantprivs) do + if not basic_privs[priv] and not caller_privs.privs then + return false, "Your privileges are insufficient." + end + if not core.registered_privileges[priv] then + privs_unknown = privs_unknown .. "Unknown privilege: " .. priv .. "\n" + end + privs[priv] = true + end + if privs_unknown ~= "" then + return false, privs_unknown + end + for priv, _ in pairs(grantprivs) do + core.run_priv_callbacks(grantname, priv, caller, "grant") + end + core.set_player_privs(grantname, privs) + core.log("action", caller..' granted ('..core.privs_to_string(grantprivs, ', ')..') privileges to '..grantname) + if grantname ~= caller then + core.chat_send_player(grantname, caller + .. " granted you privileges: " + .. core.privs_to_string(grantprivs, ' ')) + end + return true, "Privileges of " .. grantname .. ": " + .. core.privs_to_string( + core.get_player_privs(grantname), ' ') +end + +core.register_chatcommand("grant", { + params = " ( | all)", + description = "Give privileges to player", + func = function(name, param) + local grantname, grantprivstr = string.match(param, "([^ ]+) (.+)") + if not grantname or not grantprivstr then + return false, "Invalid parameters (see /help grant)" + end + return handle_grant_command(name, grantname, grantprivstr) + end, +}) + +core.register_chatcommand("grantme", { + params = " | all", + description = "Grant privileges to yourself", + func = function(name, param) + if param == "" then + return false, "Invalid parameters (see /help grantme)" + end + return handle_grant_command(name, name, param) + end, +}) + +core.register_chatcommand("revoke", { + params = " ( | all)", + description = "Remove privileges from player", + privs = {}, + func = function(name, param) + if not core.check_player_privs(name, {privs=true}) and + not core.check_player_privs(name, {basic_privs=true}) then + return false, "Your privileges are insufficient." + end + local revoke_name, revoke_priv_str = string.match(param, "([^ ]+) (.+)") + if not revoke_name or not revoke_priv_str then + return false, "Invalid parameters (see /help revoke)" + elseif not core.get_auth_handler().get_auth(revoke_name) then + return false, "Player " .. revoke_name .. " does not exist." + end + local revoke_privs = core.string_to_privs(revoke_priv_str) + local privs = core.get_player_privs(revoke_name) + local basic_privs = + core.string_to_privs(core.settings:get("basic_privs") or "interact,shout") + for priv, _ in pairs(revoke_privs) do + if not basic_privs[priv] and + not core.check_player_privs(name, {privs=true}) then + return false, "Your privileges are insufficient." + end + end + if revoke_priv_str == "all" then + revoke_privs = privs + privs = {} + else + for priv, _ in pairs(revoke_privs) do + privs[priv] = nil + end + end + + for priv, _ in pairs(revoke_privs) do + core.run_priv_callbacks(revoke_name, priv, name, "revoke") + end + + core.set_player_privs(revoke_name, privs) + core.log("action", name..' revoked (' + ..core.privs_to_string(revoke_privs, ', ') + ..') privileges from '..revoke_name) + if revoke_name ~= name then + core.chat_send_player(revoke_name, name + .. " revoked privileges from you: " + .. core.privs_to_string(revoke_privs, ' ')) + end + return true, "Privileges of " .. revoke_name .. ": " + .. core.privs_to_string( + core.get_player_privs(revoke_name), ' ') + end, +}) + +core.register_chatcommand("setpassword", { + params = " ", + description = "Set player's password", + privs = {password=true}, + func = function(name, param) + local toname, raw_password = string.match(param, "^([^ ]+) +(.+)$") + if not toname then + toname = param:match("^([^ ]+) *$") + raw_password = nil + end + + if not toname then + return false, "Name field required" + end + + local act_str_past, act_str_pres + if not raw_password then + core.set_player_password(toname, "") + act_str_past = "cleared" + act_str_pres = "clears" + else + core.set_player_password(toname, + core.get_password_hash(toname, + raw_password)) + act_str_past = "set" + act_str_pres = "sets" + end + + if toname ~= name then + core.chat_send_player(toname, "Your password was " + .. act_str_past .. " by " .. name) + end + + core.log("action", name .. " " .. act_str_pres .. + " password of " .. toname .. ".") + + return true, "Password of player \"" .. toname .. "\" " .. act_str_past + end, +}) + +core.register_chatcommand("clearpassword", { + params = "", + description = "Set empty password for a player", + privs = {password=true}, + func = function(name, param) + local toname = param + if toname == "" then + return false, "Name field required" + end + core.set_player_password(toname, '') + + core.log("action", name .. " clears password of " .. toname .. ".") + + return true, "Password of player \"" .. toname .. "\" cleared" + end, +}) + +core.register_chatcommand("auth_reload", { + params = "", + description = "Reload authentication data", + privs = {server=true}, + func = function(name, param) + local done = core.auth_reload() + return done, (done and "Done." or "Failed.") + end, +}) + +core.register_chatcommand("remove_player", { + params = "", + description = "Remove a player's data", + privs = {server=true}, + func = function(name, param) + local toname = param + if toname == "" then + return false, "Name field required" + end + + local rc = core.remove_player(toname) + + if rc == 0 then + core.log("action", name .. " removed player data of " .. toname .. ".") + return true, "Player \"" .. toname .. "\" removed." + elseif rc == 1 then + return true, "No such player \"" .. toname .. "\" to remove." + elseif rc == 2 then + return true, "Player \"" .. toname .. "\" is connected, cannot remove." + end + + return false, "Unhandled remove_player return code " .. rc .. "" + end, +}) + +core.register_chatcommand("teleport", { + params = ",, | | ( ,,) | ( )", + description = "Teleport to position or player", + privs = {teleport=true}, + func = function(name, param) + -- Returns (pos, true) if found, otherwise (pos, false) + local function find_free_position_near(pos) + local tries = { + {x=1,y=0,z=0}, + {x=-1,y=0,z=0}, + {x=0,y=0,z=1}, + {x=0,y=0,z=-1}, + } + for _, d in ipairs(tries) do + local p = {x = pos.x+d.x, y = pos.y+d.y, z = pos.z+d.z} + local n = core.get_node_or_nil(p) + if n and n.name then + local def = core.registered_nodes[n.name] + if def and not def.walkable then + return p, true + end + end + end + return pos, false + end + + local p = {} + p.x, p.y, p.z = string.match(param, "^([%d.-]+)[, ] *([%d.-]+)[, ] *([%d.-]+)$") + p.x = tonumber(p.x) + p.y = tonumber(p.y) + p.z = tonumber(p.z) + if p.x and p.y and p.z then + + local lm = 31000 + if p.x < -lm or p.x > lm or p.y < -lm or p.y > lm or p.z < -lm or p.z > lm then + return false, "Cannot teleport out of map bounds!" + end + local teleportee = core.get_player_by_name(name) + if teleportee then + teleportee:set_pos(p) + return true, "Teleporting to "..core.pos_to_string(p) + end + end + + local target_name = param:match("^([^ ]+)$") + local teleportee = core.get_player_by_name(name) + + p = nil + if target_name then + local target = core.get_player_by_name(target_name) + if target then + p = target:get_pos() + end + end + + if teleportee and p then + p = find_free_position_near(p) + teleportee:set_pos(p) + return true, "Teleporting to " .. target_name + .. " at "..core.pos_to_string(p) + end + + if not core.check_player_privs(name, {bring=true}) then + return false, "You don't have permission to teleport other players (missing bring privilege)" + end + + teleportee = nil + p = {} + local teleportee_name + teleportee_name, p.x, p.y, p.z = param:match( + "^([^ ]+) +([%d.-]+)[, ] *([%d.-]+)[, ] *([%d.-]+)$") + p.x, p.y, p.z = tonumber(p.x), tonumber(p.y), tonumber(p.z) + if teleportee_name then + teleportee = core.get_player_by_name(teleportee_name) + end + if teleportee and p.x and p.y and p.z then + teleportee:set_pos(p) + return true, "Teleporting " .. teleportee_name + .. " to " .. core.pos_to_string(p) + end + + teleportee = nil + p = nil + teleportee_name, target_name = string.match(param, "^([^ ]+) +([^ ]+)$") + if teleportee_name then + teleportee = core.get_player_by_name(teleportee_name) + end + if target_name then + local target = core.get_player_by_name(target_name) + if target then + p = target:get_pos() + end + end + if teleportee and p then + p = find_free_position_near(p) + teleportee:set_pos(p) + return true, "Teleporting " .. teleportee_name + .. " to " .. target_name + .. " at " .. core.pos_to_string(p) + end + + return false, 'Invalid parameters ("' .. param + .. '") or player not found (see /help teleport)' + end, +}) + +core.register_chatcommand("set", { + params = "([-n] ) | ", + description = "Set or read server configuration setting", + privs = {server=true}, + func = function(name, param) + local arg, setname, setvalue = string.match(param, "(-[n]) ([^ ]+) (.+)") + if arg and arg == "-n" and setname and setvalue then + core.settings:set(setname, setvalue) + return true, setname .. " = " .. setvalue + end + + setname, setvalue = string.match(param, "([^ ]+) (.+)") + if setname and setvalue then + if not core.settings:get(setname) then + return false, "Failed. Use '/set -n ' to create a new setting." + end + core.settings:set(setname, setvalue) + return true, setname .. " = " .. setvalue + end + + setname = string.match(param, "([^ ]+)") + if setname then + setvalue = core.settings:get(setname) + if not setvalue then + setvalue = "" + end + return true, setname .. " = " .. setvalue + end + + return false, "Invalid parameters (see /help set)." + end, +}) + +local function emergeblocks_callback(pos, action, num_calls_remaining, ctx) + if ctx.total_blocks == 0 then + ctx.total_blocks = num_calls_remaining + 1 + ctx.current_blocks = 0 + end + ctx.current_blocks = ctx.current_blocks + 1 + + if ctx.current_blocks == ctx.total_blocks then + core.chat_send_player(ctx.requestor_name, + string.format("Finished emerging %d blocks in %.2fms.", + ctx.total_blocks, (os.clock() - ctx.start_time) * 1000)) + end +end + +local function emergeblocks_progress_update(ctx) + if ctx.current_blocks ~= ctx.total_blocks then + core.chat_send_player(ctx.requestor_name, + string.format("emergeblocks update: %d/%d blocks emerged (%.1f%%)", + ctx.current_blocks, ctx.total_blocks, + (ctx.current_blocks / ctx.total_blocks) * 100)) + + core.after(2, emergeblocks_progress_update, ctx) + end +end + +core.register_chatcommand("emergeblocks", { + params = "(here []) | ( )", + description = "Load (or, if nonexistent, generate) map blocks " + .. "contained in area pos1 to pos2 ( and must be in parentheses)", + privs = {server=true}, + func = function(name, param) + local p1, p2 = parse_range_str(name, param) + if p1 == false then + return false, p2 + end + + local context = { + current_blocks = 0, + total_blocks = 0, + start_time = os.clock(), + requestor_name = name + } + + core.emerge_area(p1, p2, emergeblocks_callback, context) + core.after(2, emergeblocks_progress_update, context) + + return true, "Started emerge of area ranging from " .. + core.pos_to_string(p1, 1) .. " to " .. core.pos_to_string(p2, 1) + end, +}) + +core.register_chatcommand("deleteblocks", { + params = "(here []) | ( )", + description = "Delete map blocks contained in area pos1 to pos2 " + .. "( and must be in parentheses)", + privs = {server=true}, + func = function(name, param) + local p1, p2 = parse_range_str(name, param) + if p1 == false then + return false, p2 + end + + if core.delete_area(p1, p2) then + return true, "Successfully cleared area ranging from " .. + core.pos_to_string(p1, 1) .. " to " .. core.pos_to_string(p2, 1) + else + return false, "Failed to clear one or more blocks in area" + end + end, +}) + +core.register_chatcommand("fixlight", { + params = "(here []) | ( )", + description = "Resets lighting in the area between pos1 and pos2 " + .. "( and must be in parentheses)", + privs = {server = true}, + func = function(name, param) + local p1, p2 = parse_range_str(name, param) + if p1 == false then + return false, p2 + end + + if core.fix_light(p1, p2) then + return true, "Successfully reset light in the area ranging from " .. + core.pos_to_string(p1, 1) .. " to " .. core.pos_to_string(p2, 1) + else + return false, "Failed to load one or more blocks in area" + end + end, +}) + +core.register_chatcommand("mods", { + params = "", + description = "List mods installed on the server", + privs = {}, + func = function(name, param) + return true, table.concat(core.get_modnames(), ", ") + end, +}) + +local function handle_give_command(cmd, giver, receiver, stackstring) + core.log("action", giver .. " invoked " .. cmd + .. ', stackstring="' .. stackstring .. '"') + local itemstack = ItemStack(stackstring) + if itemstack:is_empty() then + return false, "Cannot give an empty item" + elseif (not itemstack:is_known()) or (itemstack:get_name() == "unknown") then + return false, "Cannot give an unknown item" + -- Forbid giving 'ignore' due to unwanted side effects + elseif itemstack:get_name() == "ignore" then + return false, "Giving 'ignore' is not allowed" + end + local receiverref = core.get_player_by_name(receiver) + if receiverref == nil then + return false, receiver .. " is not a known player" + end + local leftover = receiverref:get_inventory():add_item("main", itemstack) + local partiality + if leftover:is_empty() then + partiality = "" + elseif leftover:get_count() == itemstack:get_count() then + partiality = "could not be " + else + partiality = "partially " + end + -- The actual item stack string may be different from what the "giver" + -- entered (e.g. big numbers are always interpreted as 2^16-1). + stackstring = itemstack:to_string() + if giver == receiver then + local msg = "%q %sadded to inventory." + return true, msg:format(stackstring, partiality) + else + core.chat_send_player(receiver, ("%q %sadded to inventory.") + :format(stackstring, partiality)) + local msg = "%q %sadded to %s's inventory." + return true, msg:format(stackstring, partiality, receiver) + end +end + +core.register_chatcommand("give", { + params = " [ []]", + description = "Give item to player", + privs = {give=true}, + func = function(name, param) + local toname, itemstring = string.match(param, "^([^ ]+) +(.+)$") + if not toname or not itemstring then + return false, "Name and ItemString required" + end + return handle_give_command("/give", name, toname, itemstring) + end, +}) + +core.register_chatcommand("giveme", { + params = " [ []]", + description = "Give item to yourself", + privs = {give=true}, + func = function(name, param) + local itemstring = string.match(param, "(.+)$") + if not itemstring then + return false, "ItemString required" + end + return handle_give_command("/giveme", name, name, itemstring) + end, +}) + +core.register_chatcommand("spawnentity", { + params = " [,,]", + description = "Spawn entity at given (or your) position", + privs = {give=true, interact=true}, + func = function(name, param) + local entityname, p = string.match(param, "^([^ ]+) *(.*)$") + if not entityname then + return false, "EntityName required" + end + core.log("action", ("%s invokes /spawnentity, entityname=%q") + :format(name, entityname)) + local player = core.get_player_by_name(name) + if player == nil then + core.log("error", "Unable to spawn entity, player is nil") + return false, "Unable to spawn entity, player is nil" + end + if not core.registered_entities[entityname] then + return false, "Cannot spawn an unknown entity" + end + if p == "" then + p = player:get_pos() + else + p = core.string_to_pos(p) + if p == nil then + return false, "Invalid parameters ('" .. param .. "')" + end + end + p.y = p.y + 1 + core.add_entity(p, entityname) + return true, ("%q spawned."):format(entityname) + end, +}) + +core.register_chatcommand("pulverize", { + params = "", + description = "Destroy item in hand", + func = function(name, param) + local player = core.get_player_by_name(name) + if not player then + core.log("error", "Unable to pulverize, no player.") + return false, "Unable to pulverize, no player." + end + local wielded_item = player:get_wielded_item() + if wielded_item:is_empty() then + return false, "Unable to pulverize, no item in hand." + end + core.log("action", name .. " pulverized \"" .. + wielded_item:get_name() .. " " .. wielded_item:get_count() .. "\"") + player:set_wielded_item(nil) + return true, "An item was pulverized." + end, +}) + +-- Key = player name +core.rollback_punch_callbacks = {} + +core.register_on_punchnode(function(pos, node, puncher) + local name = puncher and puncher:get_player_name() + if name and core.rollback_punch_callbacks[name] then + core.rollback_punch_callbacks[name](pos, node, puncher) + core.rollback_punch_callbacks[name] = nil + end +end) + +core.register_chatcommand("rollback_check", { + params = "[] [] []", + description = "Check who last touched a node or a node near it" + .. " within the time specified by . Default: range = 0," + .. " seconds = 86400 = 24h, limit = 5", + privs = {rollback=true}, + func = function(name, param) + if not core.settings:get_bool("enable_rollback_recording") then + return false, "Rollback functions are disabled." + end + local range, seconds, limit = + param:match("(%d+) *(%d*) *(%d*)") + range = tonumber(range) or 0 + seconds = tonumber(seconds) or 86400 + limit = tonumber(limit) or 5 + if limit > 100 then + return false, "That limit is too high!" + end + + core.rollback_punch_callbacks[name] = function(pos, node, puncher) + local name = puncher:get_player_name() + core.chat_send_player(name, "Checking " .. core.pos_to_string(pos) .. "...") + local actions = core.rollback_get_node_actions(pos, range, seconds, limit) + if not actions then + core.chat_send_player(name, "Rollback functions are disabled") + return + end + local num_actions = #actions + if num_actions == 0 then + core.chat_send_player(name, "Nobody has touched" + .. " the specified location in " + .. seconds .. " seconds") + return + end + local time = os.time() + for i = num_actions, 1, -1 do + local action = actions[i] + core.chat_send_player(name, + ("%s %s %s -> %s %d seconds ago.") + :format( + core.pos_to_string(action.pos), + action.actor, + action.oldnode.name, + action.newnode.name, + time - action.time)) + end + end + + return true, "Punch a node (range=" .. range .. ", seconds=" + .. seconds .. "s, limit=" .. limit .. ")" + end, +}) + +core.register_chatcommand("rollback", { + params = "( []) | (: [])", + description = "Revert actions of a player. Default for is 60", + privs = {rollback=true}, + func = function(name, param) + if not core.settings:get_bool("enable_rollback_recording") then + return false, "Rollback functions are disabled." + end + local target_name, seconds = string.match(param, ":([^ ]+) *(%d*)") + if not target_name then + local player_name + player_name, seconds = string.match(param, "([^ ]+) *(%d*)") + if not player_name then + return false, "Invalid parameters. See /help rollback" + .. " and /help rollback_check." + end + target_name = "player:"..player_name + end + seconds = tonumber(seconds) or 60 + core.chat_send_player(name, "Reverting actions of " + .. target_name .. " since " + .. seconds .. " seconds.") + local success, log = core.rollback_revert_actions_by( + target_name, seconds) + local response = "" + if #log > 100 then + response = "(log is too long to show)\n" + else + for _, line in pairs(log) do + response = response .. line .. "\n" + end + end + response = response .. "Reverting actions " + .. (success and "succeeded." or "FAILED.") + return success, response + end, +}) + +core.register_chatcommand("status", { + description = "Show server status", + func = function(name, param) + local status = core.get_server_status(name, false) + if status and status ~= "" then + return true, status + end + return false, "This command was disabled by a mod or game" + end, +}) + +core.register_chatcommand("time", { + params = "[<0..23>:<0..59> | <0..24000>]", + description = "Show or set time of day", + privs = {}, + func = function(name, param) + if param == "" then + local current_time = math.floor(core.get_timeofday() * 1440) + local minutes = current_time % 60 + local hour = (current_time - minutes) / 60 + return true, ("Current time is %d:%02d"):format(hour, minutes) + end + local player_privs = core.get_player_privs(name) + if not player_privs.settime then + return false, "You don't have permission to run this command " .. + "(missing privilege: settime)." + end + local hour, minute = param:match("^(%d+):(%d+)$") + if not hour then + local new_time = tonumber(param) + if not new_time then + return false, "Invalid time." + end + -- Backward compatibility. + core.set_timeofday((new_time % 24000) / 24000) + core.log("action", name .. " sets time to " .. new_time) + return true, "Time of day changed." + end + hour = tonumber(hour) + minute = tonumber(minute) + if hour < 0 or hour > 23 then + return false, "Invalid hour (must be between 0 and 23 inclusive)." + elseif minute < 0 or minute > 59 then + return false, "Invalid minute (must be between 0 and 59 inclusive)." + end + core.set_timeofday((hour * 60 + minute) / 1440) + core.log("action", ("%s sets time to %d:%02d"):format(name, hour, minute)) + return true, "Time of day changed." + end, +}) + +core.register_chatcommand("days", { + description = "Show day count since world creation", + func = function(name, param) + return true, "Current day is " .. core.get_day_count() + end +}) + +core.register_chatcommand("shutdown", { + params = "[ | -1] [reconnect] []", + description = "Shutdown server (-1 cancels a delayed shutdown)", + privs = {server=true}, + func = function(name, param) + local delay, reconnect, message + delay, param = param:match("^%s*(%S+)(.*)") + if param then + reconnect, param = param:match("^%s*(%S+)(.*)") + end + message = param and param:match("^%s*(.+)") or "" + delay = tonumber(delay) or 0 + + if delay == 0 then + core.log("action", name .. " shuts down server") + core.chat_send_all("*** Server shutting down (operator request).") + end + core.request_shutdown(message:trim(), core.is_yes(reconnect), delay) + end, +}) + +core.register_chatcommand("ban", { + params = "[ | ]", + description = "Ban player or show ban list", + privs = {ban=true}, + func = function(name, param) + if param == "" then + local ban_list = core.get_ban_list() + if ban_list == "" then + return true, "The ban list is empty." + else + return true, "Ban list: " .. ban_list + end + end + if not core.get_player_by_name(param) then + return false, "No such player." + end + if not core.ban_player(param) then + return false, "Failed to ban player." + end + local desc = core.get_ban_description(param) + core.log("action", name .. " bans " .. desc .. ".") + return true, "Banned " .. desc .. "." + end, +}) + +core.register_chatcommand("unban", { + params = " | ", + description = "Remove player ban", + privs = {ban=true}, + func = function(name, param) + if not core.unban_player_or_ip(param) then + return false, "Failed to unban player/IP." + end + core.log("action", name .. " unbans " .. param) + return true, "Unbanned " .. param + end, +}) + +core.register_chatcommand("kick", { + params = " []", + description = "Kick a player", + privs = {kick=true}, + func = function(name, param) + local tokick, reason = param:match("([^ ]+) (.+)") + tokick = tokick or param + if not core.kick_player(tokick, reason) then + return false, "Failed to kick player " .. tokick + end + local log_reason = "" + if reason then + log_reason = " with reason \"" .. reason .. "\"" + end + core.log("action", name .. " kicks " .. tokick .. log_reason) + return true, "Kicked " .. tokick + end, +}) + +core.register_chatcommand("clearobjects", { + params = "[full | quick]", + description = "Clear all objects in world", + privs = {server=true}, + func = function(name, param) + local options = {} + if param == "" or param == "quick" then + options.mode = "quick" + elseif param == "full" then + options.mode = "full" + else + return false, "Invalid usage, see /help clearobjects." + end + + core.log("action", name .. " clears all objects (" + .. options.mode .. " mode).") + core.chat_send_all("Clearing all objects. This may take long." + .. " You may experience a timeout. (by " + .. name .. ")") + core.clear_objects(options) + core.log("action", "Object clearing done.") + core.chat_send_all("*** Cleared all objects.") + end, +}) + +core.register_chatcommand("msg", { + params = " ", + description = "Send a private message", + privs = {shout=true}, + func = function(name, param) + local sendto, message = param:match("^(%S+)%s(.+)$") + if not sendto then + return false, "Invalid usage, see /help msg." + end + if not core.get_player_by_name(sendto) then + return false, "The player " .. sendto + .. " is not online." + end + core.log("action", "PM from " .. name .. " to " .. sendto + .. ": " .. message) + core.chat_send_player(sendto, "PM from " .. name .. ": " + .. message) + return true, "Message sent." + end, +}) + +core.register_chatcommand("last-login", { + params = "[]", + description = "Get the last login time of a player or yourself", + func = function(name, param) + if param == "" then + param = name + end + local pauth = core.get_auth_handler().get_auth(param) + if pauth and pauth.last_login then + -- Time in UTC, ISO 8601 format + return true, "Last login time was " .. + os.date("!%Y-%m-%dT%H:%M:%SZ", pauth.last_login) + end + return false, "Last login time is unknown" + end, +}) + +core.register_chatcommand("clearinv", { + params = "[]", + description = "Clear the inventory of yourself or another player", + func = function(name, param) + local player + if param and param ~= "" and param ~= name then + if not core.check_player_privs(name, {server=true}) then + return false, "You don't have permission" + .. " to clear another player's inventory (missing privilege: server)" + end + player = core.get_player_by_name(param) + core.chat_send_player(param, name.." cleared your inventory.") + else + player = core.get_player_by_name(name) + end + + if player then + player:get_inventory():set_list("main", {}) + player:get_inventory():set_list("craft", {}) + player:get_inventory():set_list("craftpreview", {}) + core.log("action", name.." clears "..player:get_player_name().."'s inventory") + return true, "Cleared "..player:get_player_name().."'s inventory." + else + return false, "Player must be online to clear inventory!" + end + end, +}) + +local function handle_kill_command(killer, victim) + if core.settings:get_bool("enable_damage") == false then + return false, "Players can't be killed, damage has been disabled." + end + local victimref = core.get_player_by_name(victim) + if victimref == nil then + return false, string.format("Player %s is not online.", victim) + elseif victimref:get_hp() <= 0 then + if killer == victim then + return false, "You are already dead." + else + return false, string.format("%s is already dead.", victim) + end + end + if not killer == victim then + core.log("action", string.format("%s killed %s", killer, victim)) + end + -- Kill victim + victimref:set_hp(0) + return true, string.format("%s has been killed.", victim) +end + +core.register_chatcommand("kill", { + params = "[]", + description = "Kill player or yourself", + privs = {server=true}, + func = function(name, param) + return handle_kill_command(name, param == "" and name or param) + end, +}) diff --git a/builtin/game/chatcommands.lua b/builtin/game/chatcommands.lua deleted file mode 100644 index b2a49863e..000000000 --- a/builtin/game/chatcommands.lua +++ /dev/null @@ -1,1061 +0,0 @@ --- Minetest: builtin/game/chatcommands.lua - --- --- Chat command handler --- - -core.chatcommands = core.registered_chatcommands -- BACKWARDS COMPATIBILITY - -core.register_on_chat_message(function(name, message) - if message:sub(1,1) ~= "/" then - return - end - - local cmd, param = string.match(message, "^/([^ ]+) *(.*)") - if not cmd then - core.chat_send_player(name, "-!- Empty command") - return true - end - - param = param or "" - - local cmd_def = core.registered_chatcommands[cmd] - if not cmd_def then - core.chat_send_player(name, "-!- Invalid command: " .. cmd) - return true - end - local has_privs, missing_privs = core.check_player_privs(name, cmd_def.privs) - if has_privs then - core.set_last_run_mod(cmd_def.mod_origin) - local _, result = cmd_def.func(name, param) - if result then - core.chat_send_player(name, result) - end - else - core.chat_send_player(name, "You don't have permission" - .. " to run this command (missing privileges: " - .. table.concat(missing_privs, ", ") .. ")") - end - return true -- Handled chat message -end) - -if core.settings:get_bool("profiler.load") then - -- Run after register_chatcommand and its register_on_chat_message - -- Before any chatcommands that should be profiled - profiler.init_chatcommand() -end - --- Parses a "range" string in the format of "here (number)" or --- "(x1, y1, z1) (x2, y2, z2)", returning two position vectors -local function parse_range_str(player_name, str) - local p1, p2 - local args = str:split(" ") - - if args[1] == "here" then - p1, p2 = core.get_player_radius_area(player_name, tonumber(args[2])) - if p1 == nil then - return false, "Unable to get player " .. player_name .. " position" - end - else - p1, p2 = core.string_to_area(str) - if p1 == nil then - return false, "Incorrect area format. Expected: (x1,y1,z1) (x2,y2,z2)" - end - end - - return p1, p2 -end - --- --- Chat commands --- -core.register_chatcommand("me", { - params = "", - description = "Show chat action (e.g., '/me orders a pizza' displays" - .. " ' orders a pizza')", - privs = {shout=true}, - func = function(name, param) - core.chat_send_all("* " .. name .. " " .. param) - end, -}) - -core.register_chatcommand("admin", { - description = "Show the name of the server owner", - func = function(name) - local admin = core.settings:get("name") - if admin then - return true, "The administrator of this server is " .. admin .. "." - else - return false, "There's no administrator named in the config file." - end - end, -}) - -core.register_chatcommand("privs", { - params = "[]", - description = "Show privileges of yourself or another player", - func = function(caller, param) - param = param:trim() - local name = (param ~= "" and param or caller) - if not core.player_exists(name) then - return false, "Player " .. name .. " does not exist." - end - return true, "Privileges of " .. name .. ": " - .. core.privs_to_string( - core.get_player_privs(name), ' ') - end, -}) - -core.register_chatcommand("haspriv", { - params = "", - description = "Return list of all online players with privilege.", - privs = {basic_privs = true}, - func = function(caller, param) - param = param:trim() - if param == "" then - return false, "Invalid parameters (see /help haspriv)" - end - if not core.registered_privileges[param] then - return false, "Unknown privilege!" - end - local privs = core.string_to_privs(param) - local players_with_priv = {} - for _, player in pairs(core.get_connected_players()) do - local player_name = player:get_player_name() - if core.check_player_privs(player_name, privs) then - table.insert(players_with_priv, player_name) - end - end - return true, "Players online with the \"" .. param .. "\" privilege: " .. - table.concat(players_with_priv, ", ") - end -}) - -local function handle_grant_command(caller, grantname, grantprivstr) - local caller_privs = core.get_player_privs(caller) - if not (caller_privs.privs or caller_privs.basic_privs) then - return false, "Your privileges are insufficient." - end - - if not core.get_auth_handler().get_auth(grantname) then - return false, "Player " .. grantname .. " does not exist." - end - local grantprivs = core.string_to_privs(grantprivstr) - if grantprivstr == "all" then - grantprivs = core.registered_privileges - end - local privs = core.get_player_privs(grantname) - local privs_unknown = "" - local basic_privs = - core.string_to_privs(core.settings:get("basic_privs") or "interact,shout") - for priv, _ in pairs(grantprivs) do - if not basic_privs[priv] and not caller_privs.privs then - return false, "Your privileges are insufficient." - end - if not core.registered_privileges[priv] then - privs_unknown = privs_unknown .. "Unknown privilege: " .. priv .. "\n" - end - privs[priv] = true - end - if privs_unknown ~= "" then - return false, privs_unknown - end - for priv, _ in pairs(grantprivs) do - core.run_priv_callbacks(grantname, priv, caller, "grant") - end - core.set_player_privs(grantname, privs) - core.log("action", caller..' granted ('..core.privs_to_string(grantprivs, ', ')..') privileges to '..grantname) - if grantname ~= caller then - core.chat_send_player(grantname, caller - .. " granted you privileges: " - .. core.privs_to_string(grantprivs, ' ')) - end - return true, "Privileges of " .. grantname .. ": " - .. core.privs_to_string( - core.get_player_privs(grantname), ' ') -end - -core.register_chatcommand("grant", { - params = " ( | all)", - description = "Give privileges to player", - func = function(name, param) - local grantname, grantprivstr = string.match(param, "([^ ]+) (.+)") - if not grantname or not grantprivstr then - return false, "Invalid parameters (see /help grant)" - end - return handle_grant_command(name, grantname, grantprivstr) - end, -}) - -core.register_chatcommand("grantme", { - params = " | all", - description = "Grant privileges to yourself", - func = function(name, param) - if param == "" then - return false, "Invalid parameters (see /help grantme)" - end - return handle_grant_command(name, name, param) - end, -}) - -core.register_chatcommand("revoke", { - params = " ( | all)", - description = "Remove privileges from player", - privs = {}, - func = function(name, param) - if not core.check_player_privs(name, {privs=true}) and - not core.check_player_privs(name, {basic_privs=true}) then - return false, "Your privileges are insufficient." - end - local revoke_name, revoke_priv_str = string.match(param, "([^ ]+) (.+)") - if not revoke_name or not revoke_priv_str then - return false, "Invalid parameters (see /help revoke)" - elseif not core.get_auth_handler().get_auth(revoke_name) then - return false, "Player " .. revoke_name .. " does not exist." - end - local revoke_privs = core.string_to_privs(revoke_priv_str) - local privs = core.get_player_privs(revoke_name) - local basic_privs = - core.string_to_privs(core.settings:get("basic_privs") or "interact,shout") - for priv, _ in pairs(revoke_privs) do - if not basic_privs[priv] and - not core.check_player_privs(name, {privs=true}) then - return false, "Your privileges are insufficient." - end - end - if revoke_priv_str == "all" then - revoke_privs = privs - privs = {} - else - for priv, _ in pairs(revoke_privs) do - privs[priv] = nil - end - end - - for priv, _ in pairs(revoke_privs) do - core.run_priv_callbacks(revoke_name, priv, name, "revoke") - end - - core.set_player_privs(revoke_name, privs) - core.log("action", name..' revoked (' - ..core.privs_to_string(revoke_privs, ', ') - ..') privileges from '..revoke_name) - if revoke_name ~= name then - core.chat_send_player(revoke_name, name - .. " revoked privileges from you: " - .. core.privs_to_string(revoke_privs, ' ')) - end - return true, "Privileges of " .. revoke_name .. ": " - .. core.privs_to_string( - core.get_player_privs(revoke_name), ' ') - end, -}) - -core.register_chatcommand("setpassword", { - params = " ", - description = "Set player's password", - privs = {password=true}, - func = function(name, param) - local toname, raw_password = string.match(param, "^([^ ]+) +(.+)$") - if not toname then - toname = param:match("^([^ ]+) *$") - raw_password = nil - end - - if not toname then - return false, "Name field required" - end - - local act_str_past, act_str_pres - if not raw_password then - core.set_player_password(toname, "") - act_str_past = "cleared" - act_str_pres = "clears" - else - core.set_player_password(toname, - core.get_password_hash(toname, - raw_password)) - act_str_past = "set" - act_str_pres = "sets" - end - - if toname ~= name then - core.chat_send_player(toname, "Your password was " - .. act_str_past .. " by " .. name) - end - - core.log("action", name .. " " .. act_str_pres .. - " password of " .. toname .. ".") - - return true, "Password of player \"" .. toname .. "\" " .. act_str_past - end, -}) - -core.register_chatcommand("clearpassword", { - params = "", - description = "Set empty password for a player", - privs = {password=true}, - func = function(name, param) - local toname = param - if toname == "" then - return false, "Name field required" - end - core.set_player_password(toname, '') - - core.log("action", name .. " clears password of " .. toname .. ".") - - return true, "Password of player \"" .. toname .. "\" cleared" - end, -}) - -core.register_chatcommand("auth_reload", { - params = "", - description = "Reload authentication data", - privs = {server=true}, - func = function(name, param) - local done = core.auth_reload() - return done, (done and "Done." or "Failed.") - end, -}) - -core.register_chatcommand("remove_player", { - params = "", - description = "Remove a player's data", - privs = {server=true}, - func = function(name, param) - local toname = param - if toname == "" then - return false, "Name field required" - end - - local rc = core.remove_player(toname) - - if rc == 0 then - core.log("action", name .. " removed player data of " .. toname .. ".") - return true, "Player \"" .. toname .. "\" removed." - elseif rc == 1 then - return true, "No such player \"" .. toname .. "\" to remove." - elseif rc == 2 then - return true, "Player \"" .. toname .. "\" is connected, cannot remove." - end - - return false, "Unhandled remove_player return code " .. rc .. "" - end, -}) - -core.register_chatcommand("teleport", { - params = ",, | | ( ,,) | ( )", - description = "Teleport to position or player", - privs = {teleport=true}, - func = function(name, param) - -- Returns (pos, true) if found, otherwise (pos, false) - local function find_free_position_near(pos) - local tries = { - {x=1,y=0,z=0}, - {x=-1,y=0,z=0}, - {x=0,y=0,z=1}, - {x=0,y=0,z=-1}, - } - for _, d in ipairs(tries) do - local p = {x = pos.x+d.x, y = pos.y+d.y, z = pos.z+d.z} - local n = core.get_node_or_nil(p) - if n and n.name then - local def = core.registered_nodes[n.name] - if def and not def.walkable then - return p, true - end - end - end - return pos, false - end - - local p = {} - p.x, p.y, p.z = string.match(param, "^([%d.-]+)[, ] *([%d.-]+)[, ] *([%d.-]+)$") - p.x = tonumber(p.x) - p.y = tonumber(p.y) - p.z = tonumber(p.z) - if p.x and p.y and p.z then - - local lm = 31000 - if p.x < -lm or p.x > lm or p.y < -lm or p.y > lm or p.z < -lm or p.z > lm then - return false, "Cannot teleport out of map bounds!" - end - local teleportee = core.get_player_by_name(name) - if teleportee then - teleportee:set_pos(p) - return true, "Teleporting to "..core.pos_to_string(p) - end - end - - local target_name = param:match("^([^ ]+)$") - local teleportee = core.get_player_by_name(name) - - p = nil - if target_name then - local target = core.get_player_by_name(target_name) - if target then - p = target:get_pos() - end - end - - if teleportee and p then - p = find_free_position_near(p) - teleportee:set_pos(p) - return true, "Teleporting to " .. target_name - .. " at "..core.pos_to_string(p) - end - - if not core.check_player_privs(name, {bring=true}) then - return false, "You don't have permission to teleport other players (missing bring privilege)" - end - - teleportee = nil - p = {} - local teleportee_name - teleportee_name, p.x, p.y, p.z = param:match( - "^([^ ]+) +([%d.-]+)[, ] *([%d.-]+)[, ] *([%d.-]+)$") - p.x, p.y, p.z = tonumber(p.x), tonumber(p.y), tonumber(p.z) - if teleportee_name then - teleportee = core.get_player_by_name(teleportee_name) - end - if teleportee and p.x and p.y and p.z then - teleportee:set_pos(p) - return true, "Teleporting " .. teleportee_name - .. " to " .. core.pos_to_string(p) - end - - teleportee = nil - p = nil - teleportee_name, target_name = string.match(param, "^([^ ]+) +([^ ]+)$") - if teleportee_name then - teleportee = core.get_player_by_name(teleportee_name) - end - if target_name then - local target = core.get_player_by_name(target_name) - if target then - p = target:get_pos() - end - end - if teleportee and p then - p = find_free_position_near(p) - teleportee:set_pos(p) - return true, "Teleporting " .. teleportee_name - .. " to " .. target_name - .. " at " .. core.pos_to_string(p) - end - - return false, 'Invalid parameters ("' .. param - .. '") or player not found (see /help teleport)' - end, -}) - -core.register_chatcommand("set", { - params = "([-n] ) | ", - description = "Set or read server configuration setting", - privs = {server=true}, - func = function(name, param) - local arg, setname, setvalue = string.match(param, "(-[n]) ([^ ]+) (.+)") - if arg and arg == "-n" and setname and setvalue then - core.settings:set(setname, setvalue) - return true, setname .. " = " .. setvalue - end - - setname, setvalue = string.match(param, "([^ ]+) (.+)") - if setname and setvalue then - if not core.settings:get(setname) then - return false, "Failed. Use '/set -n ' to create a new setting." - end - core.settings:set(setname, setvalue) - return true, setname .. " = " .. setvalue - end - - setname = string.match(param, "([^ ]+)") - if setname then - setvalue = core.settings:get(setname) - if not setvalue then - setvalue = "" - end - return true, setname .. " = " .. setvalue - end - - return false, "Invalid parameters (see /help set)." - end, -}) - -local function emergeblocks_callback(pos, action, num_calls_remaining, ctx) - if ctx.total_blocks == 0 then - ctx.total_blocks = num_calls_remaining + 1 - ctx.current_blocks = 0 - end - ctx.current_blocks = ctx.current_blocks + 1 - - if ctx.current_blocks == ctx.total_blocks then - core.chat_send_player(ctx.requestor_name, - string.format("Finished emerging %d blocks in %.2fms.", - ctx.total_blocks, (os.clock() - ctx.start_time) * 1000)) - end -end - -local function emergeblocks_progress_update(ctx) - if ctx.current_blocks ~= ctx.total_blocks then - core.chat_send_player(ctx.requestor_name, - string.format("emergeblocks update: %d/%d blocks emerged (%.1f%%)", - ctx.current_blocks, ctx.total_blocks, - (ctx.current_blocks / ctx.total_blocks) * 100)) - - core.after(2, emergeblocks_progress_update, ctx) - end -end - -core.register_chatcommand("emergeblocks", { - params = "(here []) | ( )", - description = "Load (or, if nonexistent, generate) map blocks " - .. "contained in area pos1 to pos2 ( and must be in parentheses)", - privs = {server=true}, - func = function(name, param) - local p1, p2 = parse_range_str(name, param) - if p1 == false then - return false, p2 - end - - local context = { - current_blocks = 0, - total_blocks = 0, - start_time = os.clock(), - requestor_name = name - } - - core.emerge_area(p1, p2, emergeblocks_callback, context) - core.after(2, emergeblocks_progress_update, context) - - return true, "Started emerge of area ranging from " .. - core.pos_to_string(p1, 1) .. " to " .. core.pos_to_string(p2, 1) - end, -}) - -core.register_chatcommand("deleteblocks", { - params = "(here []) | ( )", - description = "Delete map blocks contained in area pos1 to pos2 " - .. "( and must be in parentheses)", - privs = {server=true}, - func = function(name, param) - local p1, p2 = parse_range_str(name, param) - if p1 == false then - return false, p2 - end - - if core.delete_area(p1, p2) then - return true, "Successfully cleared area ranging from " .. - core.pos_to_string(p1, 1) .. " to " .. core.pos_to_string(p2, 1) - else - return false, "Failed to clear one or more blocks in area" - end - end, -}) - -core.register_chatcommand("fixlight", { - params = "(here []) | ( )", - description = "Resets lighting in the area between pos1 and pos2 " - .. "( and must be in parentheses)", - privs = {server = true}, - func = function(name, param) - local p1, p2 = parse_range_str(name, param) - if p1 == false then - return false, p2 - end - - if core.fix_light(p1, p2) then - return true, "Successfully reset light in the area ranging from " .. - core.pos_to_string(p1, 1) .. " to " .. core.pos_to_string(p2, 1) - else - return false, "Failed to load one or more blocks in area" - end - end, -}) - -core.register_chatcommand("mods", { - params = "", - description = "List mods installed on the server", - privs = {}, - func = function(name, param) - return true, table.concat(core.get_modnames(), ", ") - end, -}) - -local function handle_give_command(cmd, giver, receiver, stackstring) - core.log("action", giver .. " invoked " .. cmd - .. ', stackstring="' .. stackstring .. '"') - local itemstack = ItemStack(stackstring) - if itemstack:is_empty() then - return false, "Cannot give an empty item" - elseif (not itemstack:is_known()) or (itemstack:get_name() == "unknown") then - return false, "Cannot give an unknown item" - -- Forbid giving 'ignore' due to unwanted side effects - elseif itemstack:get_name() == "ignore" then - return false, "Giving 'ignore' is not allowed" - end - local receiverref = core.get_player_by_name(receiver) - if receiverref == nil then - return false, receiver .. " is not a known player" - end - local leftover = receiverref:get_inventory():add_item("main", itemstack) - local partiality - if leftover:is_empty() then - partiality = "" - elseif leftover:get_count() == itemstack:get_count() then - partiality = "could not be " - else - partiality = "partially " - end - -- The actual item stack string may be different from what the "giver" - -- entered (e.g. big numbers are always interpreted as 2^16-1). - stackstring = itemstack:to_string() - if giver == receiver then - local msg = "%q %sadded to inventory." - return true, msg:format(stackstring, partiality) - else - core.chat_send_player(receiver, ("%q %sadded to inventory.") - :format(stackstring, partiality)) - local msg = "%q %sadded to %s's inventory." - return true, msg:format(stackstring, partiality, receiver) - end -end - -core.register_chatcommand("give", { - params = " [ []]", - description = "Give item to player", - privs = {give=true}, - func = function(name, param) - local toname, itemstring = string.match(param, "^([^ ]+) +(.+)$") - if not toname or not itemstring then - return false, "Name and ItemString required" - end - return handle_give_command("/give", name, toname, itemstring) - end, -}) - -core.register_chatcommand("giveme", { - params = " [ []]", - description = "Give item to yourself", - privs = {give=true}, - func = function(name, param) - local itemstring = string.match(param, "(.+)$") - if not itemstring then - return false, "ItemString required" - end - return handle_give_command("/giveme", name, name, itemstring) - end, -}) - -core.register_chatcommand("spawnentity", { - params = " [,,]", - description = "Spawn entity at given (or your) position", - privs = {give=true, interact=true}, - func = function(name, param) - local entityname, p = string.match(param, "^([^ ]+) *(.*)$") - if not entityname then - return false, "EntityName required" - end - core.log("action", ("%s invokes /spawnentity, entityname=%q") - :format(name, entityname)) - local player = core.get_player_by_name(name) - if player == nil then - core.log("error", "Unable to spawn entity, player is nil") - return false, "Unable to spawn entity, player is nil" - end - if not core.registered_entities[entityname] then - return false, "Cannot spawn an unknown entity" - end - if p == "" then - p = player:get_pos() - else - p = core.string_to_pos(p) - if p == nil then - return false, "Invalid parameters ('" .. param .. "')" - end - end - p.y = p.y + 1 - core.add_entity(p, entityname) - return true, ("%q spawned."):format(entityname) - end, -}) - -core.register_chatcommand("pulverize", { - params = "", - description = "Destroy item in hand", - func = function(name, param) - local player = core.get_player_by_name(name) - if not player then - core.log("error", "Unable to pulverize, no player.") - return false, "Unable to pulverize, no player." - end - local wielded_item = player:get_wielded_item() - if wielded_item:is_empty() then - return false, "Unable to pulverize, no item in hand." - end - core.log("action", name .. " pulverized \"" .. - wielded_item:get_name() .. " " .. wielded_item:get_count() .. "\"") - player:set_wielded_item(nil) - return true, "An item was pulverized." - end, -}) - --- Key = player name -core.rollback_punch_callbacks = {} - -core.register_on_punchnode(function(pos, node, puncher) - local name = puncher and puncher:get_player_name() - if name and core.rollback_punch_callbacks[name] then - core.rollback_punch_callbacks[name](pos, node, puncher) - core.rollback_punch_callbacks[name] = nil - end -end) - -core.register_chatcommand("rollback_check", { - params = "[] [] []", - description = "Check who last touched a node or a node near it" - .. " within the time specified by . Default: range = 0," - .. " seconds = 86400 = 24h, limit = 5", - privs = {rollback=true}, - func = function(name, param) - if not core.settings:get_bool("enable_rollback_recording") then - return false, "Rollback functions are disabled." - end - local range, seconds, limit = - param:match("(%d+) *(%d*) *(%d*)") - range = tonumber(range) or 0 - seconds = tonumber(seconds) or 86400 - limit = tonumber(limit) or 5 - if limit > 100 then - return false, "That limit is too high!" - end - - core.rollback_punch_callbacks[name] = function(pos, node, puncher) - local name = puncher:get_player_name() - core.chat_send_player(name, "Checking " .. core.pos_to_string(pos) .. "...") - local actions = core.rollback_get_node_actions(pos, range, seconds, limit) - if not actions then - core.chat_send_player(name, "Rollback functions are disabled") - return - end - local num_actions = #actions - if num_actions == 0 then - core.chat_send_player(name, "Nobody has touched" - .. " the specified location in " - .. seconds .. " seconds") - return - end - local time = os.time() - for i = num_actions, 1, -1 do - local action = actions[i] - core.chat_send_player(name, - ("%s %s %s -> %s %d seconds ago.") - :format( - core.pos_to_string(action.pos), - action.actor, - action.oldnode.name, - action.newnode.name, - time - action.time)) - end - end - - return true, "Punch a node (range=" .. range .. ", seconds=" - .. seconds .. "s, limit=" .. limit .. ")" - end, -}) - -core.register_chatcommand("rollback", { - params = "( []) | (: [])", - description = "Revert actions of a player. Default for is 60", - privs = {rollback=true}, - func = function(name, param) - if not core.settings:get_bool("enable_rollback_recording") then - return false, "Rollback functions are disabled." - end - local target_name, seconds = string.match(param, ":([^ ]+) *(%d*)") - if not target_name then - local player_name - player_name, seconds = string.match(param, "([^ ]+) *(%d*)") - if not player_name then - return false, "Invalid parameters. See /help rollback" - .. " and /help rollback_check." - end - target_name = "player:"..player_name - end - seconds = tonumber(seconds) or 60 - core.chat_send_player(name, "Reverting actions of " - .. target_name .. " since " - .. seconds .. " seconds.") - local success, log = core.rollback_revert_actions_by( - target_name, seconds) - local response = "" - if #log > 100 then - response = "(log is too long to show)\n" - else - for _, line in pairs(log) do - response = response .. line .. "\n" - end - end - response = response .. "Reverting actions " - .. (success and "succeeded." or "FAILED.") - return success, response - end, -}) - -core.register_chatcommand("status", { - description = "Show server status", - func = function(name, param) - local status = core.get_server_status(name, false) - if status and status ~= "" then - return true, status - end - return false, "This command was disabled by a mod or game" - end, -}) - -core.register_chatcommand("time", { - params = "[<0..23>:<0..59> | <0..24000>]", - description = "Show or set time of day", - privs = {}, - func = function(name, param) - if param == "" then - local current_time = math.floor(core.get_timeofday() * 1440) - local minutes = current_time % 60 - local hour = (current_time - minutes) / 60 - return true, ("Current time is %d:%02d"):format(hour, minutes) - end - local player_privs = core.get_player_privs(name) - if not player_privs.settime then - return false, "You don't have permission to run this command " .. - "(missing privilege: settime)." - end - local hour, minute = param:match("^(%d+):(%d+)$") - if not hour then - local new_time = tonumber(param) - if not new_time then - return false, "Invalid time." - end - -- Backward compatibility. - core.set_timeofday((new_time % 24000) / 24000) - core.log("action", name .. " sets time to " .. new_time) - return true, "Time of day changed." - end - hour = tonumber(hour) - minute = tonumber(minute) - if hour < 0 or hour > 23 then - return false, "Invalid hour (must be between 0 and 23 inclusive)." - elseif minute < 0 or minute > 59 then - return false, "Invalid minute (must be between 0 and 59 inclusive)." - end - core.set_timeofday((hour * 60 + minute) / 1440) - core.log("action", ("%s sets time to %d:%02d"):format(name, hour, minute)) - return true, "Time of day changed." - end, -}) - -core.register_chatcommand("days", { - description = "Show day count since world creation", - func = function(name, param) - return true, "Current day is " .. core.get_day_count() - end -}) - -core.register_chatcommand("shutdown", { - params = "[ | -1] [reconnect] []", - description = "Shutdown server (-1 cancels a delayed shutdown)", - privs = {server=true}, - func = function(name, param) - local delay, reconnect, message - delay, param = param:match("^%s*(%S+)(.*)") - if param then - reconnect, param = param:match("^%s*(%S+)(.*)") - end - message = param and param:match("^%s*(.+)") or "" - delay = tonumber(delay) or 0 - - if delay == 0 then - core.log("action", name .. " shuts down server") - core.chat_send_all("*** Server shutting down (operator request).") - end - core.request_shutdown(message:trim(), core.is_yes(reconnect), delay) - end, -}) - -core.register_chatcommand("ban", { - params = "[ | ]", - description = "Ban player or show ban list", - privs = {ban=true}, - func = function(name, param) - if param == "" then - local ban_list = core.get_ban_list() - if ban_list == "" then - return true, "The ban list is empty." - else - return true, "Ban list: " .. ban_list - end - end - if not core.get_player_by_name(param) then - return false, "No such player." - end - if not core.ban_player(param) then - return false, "Failed to ban player." - end - local desc = core.get_ban_description(param) - core.log("action", name .. " bans " .. desc .. ".") - return true, "Banned " .. desc .. "." - end, -}) - -core.register_chatcommand("unban", { - params = " | ", - description = "Remove player ban", - privs = {ban=true}, - func = function(name, param) - if not core.unban_player_or_ip(param) then - return false, "Failed to unban player/IP." - end - core.log("action", name .. " unbans " .. param) - return true, "Unbanned " .. param - end, -}) - -core.register_chatcommand("kick", { - params = " []", - description = "Kick a player", - privs = {kick=true}, - func = function(name, param) - local tokick, reason = param:match("([^ ]+) (.+)") - tokick = tokick or param - if not core.kick_player(tokick, reason) then - return false, "Failed to kick player " .. tokick - end - local log_reason = "" - if reason then - log_reason = " with reason \"" .. reason .. "\"" - end - core.log("action", name .. " kicks " .. tokick .. log_reason) - return true, "Kicked " .. tokick - end, -}) - -core.register_chatcommand("clearobjects", { - params = "[full | quick]", - description = "Clear all objects in world", - privs = {server=true}, - func = function(name, param) - local options = {} - if param == "" or param == "quick" then - options.mode = "quick" - elseif param == "full" then - options.mode = "full" - else - return false, "Invalid usage, see /help clearobjects." - end - - core.log("action", name .. " clears all objects (" - .. options.mode .. " mode).") - core.chat_send_all("Clearing all objects. This may take long." - .. " You may experience a timeout. (by " - .. name .. ")") - core.clear_objects(options) - core.log("action", "Object clearing done.") - core.chat_send_all("*** Cleared all objects.") - end, -}) - -core.register_chatcommand("msg", { - params = " ", - description = "Send a private message", - privs = {shout=true}, - func = function(name, param) - local sendto, message = param:match("^(%S+)%s(.+)$") - if not sendto then - return false, "Invalid usage, see /help msg." - end - if not core.get_player_by_name(sendto) then - return false, "The player " .. sendto - .. " is not online." - end - core.log("action", "PM from " .. name .. " to " .. sendto - .. ": " .. message) - core.chat_send_player(sendto, "PM from " .. name .. ": " - .. message) - return true, "Message sent." - end, -}) - -core.register_chatcommand("last-login", { - params = "[]", - description = "Get the last login time of a player or yourself", - func = function(name, param) - if param == "" then - param = name - end - local pauth = core.get_auth_handler().get_auth(param) - if pauth and pauth.last_login then - -- Time in UTC, ISO 8601 format - return true, "Last login time was " .. - os.date("!%Y-%m-%dT%H:%M:%SZ", pauth.last_login) - end - return false, "Last login time is unknown" - end, -}) - -core.register_chatcommand("clearinv", { - params = "[]", - description = "Clear the inventory of yourself or another player", - func = function(name, param) - local player - if param and param ~= "" and param ~= name then - if not core.check_player_privs(name, {server=true}) then - return false, "You don't have permission" - .. " to clear another player's inventory (missing privilege: server)" - end - player = core.get_player_by_name(param) - core.chat_send_player(param, name.." cleared your inventory.") - else - player = core.get_player_by_name(name) - end - - if player then - player:get_inventory():set_list("main", {}) - player:get_inventory():set_list("craft", {}) - player:get_inventory():set_list("craftpreview", {}) - core.log("action", name.." clears "..player:get_player_name().."'s inventory") - return true, "Cleared "..player:get_player_name().."'s inventory." - else - return false, "Player must be online to clear inventory!" - end - end, -}) - -local function handle_kill_command(killer, victim) - if core.settings:get_bool("enable_damage") == false then - return false, "Players can't be killed, damage has been disabled." - end - local victimref = core.get_player_by_name(victim) - if victimref == nil then - return false, string.format("Player %s is not online.", victim) - elseif victimref:get_hp() <= 0 then - if killer == victim then - return false, "You are already dead." - else - return false, string.format("%s is already dead.", victim) - end - end - if not killer == victim then - core.log("action", string.format("%s killed %s", killer, victim)) - end - -- Kill victim - victimref:set_hp(0) - return true, string.format("%s has been killed.", victim) -end - -core.register_chatcommand("kill", { - params = "[]", - description = "Kill player or yourself", - privs = {server=true}, - func = function(name, param) - return handle_kill_command(name, param == "" and name or param) - end, -}) diff --git a/builtin/game/init.lua b/builtin/game/init.lua index 04f0732e5..271e49be3 100644 --- a/builtin/game/init.lua +++ b/builtin/game/init.lua @@ -1,37 +1,37 @@ local scriptpath = core.get_builtin_path() -local commonpath = scriptpath.."common"..DIR_DELIM -local gamepath = scriptpath.."game"..DIR_DELIM +local commonpath = scriptpath .. "common" .. DIR_DELIM +local gamepath = scriptpath .. "game".. DIR_DELIM -- Shared between builtin files, but -- not exposed to outer context local builtin_shared = {} -dofile(commonpath.."vector.lua") +dofile(commonpath .. "vector.lua") -dofile(gamepath.."constants.lua") -assert(loadfile(gamepath.."item.lua"))(builtin_shared) -dofile(gamepath.."register.lua") +dofile(gamepath .. "constants.lua") +assert(loadfile(gamepath .. "item.lua"))(builtin_shared) +dofile(gamepath .. "register.lua") if core.settings:get_bool("profiler.load") then - profiler = dofile(scriptpath.."profiler"..DIR_DELIM.."init.lua") + profiler = dofile(scriptpath .. "profiler" .. DIR_DELIM .. "init.lua") end dofile(commonpath .. "after.lua") -dofile(gamepath.."item_entity.lua") -dofile(gamepath.."deprecated.lua") -dofile(gamepath.."misc.lua") -dofile(gamepath.."privileges.lua") -dofile(gamepath.."auth.lua") +dofile(gamepath .. "item_entity.lua") +dofile(gamepath .. "deprecated.lua") +dofile(gamepath .. "misc.lua") +dofile(gamepath .. "privileges.lua") +dofile(gamepath .. "auth.lua") dofile(commonpath .. "chatcommands.lua") -dofile(gamepath.."chatcommands.lua") +dofile(gamepath .. "chat.lua") dofile(commonpath .. "information_formspecs.lua") -dofile(gamepath.."static_spawn.lua") -dofile(gamepath.."detached_inventory.lua") -assert(loadfile(gamepath.."falling.lua"))(builtin_shared) -dofile(gamepath.."features.lua") -dofile(gamepath.."voxelarea.lua") -dofile(gamepath.."forceloading.lua") -dofile(gamepath.."statbars.lua") +dofile(gamepath .. "static_spawn.lua") +dofile(gamepath .. "detached_inventory.lua") +assert(loadfile(gamepath .. "falling.lua"))(builtin_shared) +dofile(gamepath .. "features.lua") +dofile(gamepath .. "voxelarea.lua") +dofile(gamepath .. "forceloading.lua") +dofile(gamepath .. "statbars.lua") profiler = nil -- cgit v1.2.3