builtin/game/chatcommands.lua

   1 -- Minetest: builtin/game/chatcommands.lua
   2
   3 --
   4 -- Chat command handler
   5 --
   6
   7 core.chatcommands = core.registered_chatcommands -- BACKWARDS COMPATIBILITY
   8
   9 core.register_on_chat_message(function(name, message)
  10         if message:sub(1,1) ~= "/" then
  11                 return
  12         end
  13
  14         local cmd, param = string.match(message, "^/([^ ]+) *(.*)")
  15         if not cmd then
  16                 core.chat_send_player(name, "-!- Empty command")
  17                 return true
  18         end
  19
  20         param = param or ""
  21
  22         local cmd_def = core.registered_chatcommands[cmd]
  23         if not cmd_def then
  24                 core.chat_send_player(name, "-!- Invalid command: " .. cmd)
  25                 return true
  26         end
  27         local has_privs, missing_privs = core.check_player_privs(name, cmd_def.privs)
  28         if has_privs then
  29                 core.set_last_run_mod(cmd_def.mod_origin)
  30                 local success, message = cmd_def.func(name, param)
  31                 if message then
  32                         core.chat_send_player(name, message)
  33                 end
  34         else
  35                 core.chat_send_player(name, "You don't have permission"
  36                                 .. " to run this command (missing privileges: "
  37                                 .. table.concat(missing_privs, ", ") .. ")")
  38         end
  39         return true  -- Handled chat message
  40 end)
  41
  42 if core.settings:get_bool("profiler.load") then
  43         -- Run after register_chatcommand and its register_on_chat_message
  44         -- Before any chattcommands that should be profiled
  45         profiler.init_chatcommand()
  46 end
  47
  48 -- Parses a "range" string in the format of "here (number)" or
  49 -- "(x1, y1, z1) (x2, y2, z2)", returning two position vectors
  50 local function parse_range_str(player_name, str)
  51         local p1, p2
  52         local args = str:split(" ")
  53
  54         if args[1] == "here" then
  55                 p1, p2 = core.get_player_radius_area(player_name, tonumber(args[2]))
  56                 if p1 == nil then
  57                         return false, "Unable to get player " .. player_name .. " position"
  58                 end
  59         else
  60                 p1, p2 = core.string_to_area(str)
  61                 if p1 == nil then
  62                         return false, "Incorrect area format. Expected: (x1,y1,z1) (x2,y2,z2)"
  63                 end
  64         end
  65
  66         return p1, p2
  67 end
  68
  69 --
  70 -- Chat commands
  71 --
  72 core.register_chatcommand("me", {
  73         params = "<action>",
  74         description = "Display chat action (e.g., '/me orders a pizza' displays"
  75                         .. " '<player name> orders a pizza')",
  76         privs = {shout=true},
  77         func = function(name, param)
  78                 core.chat_send_all("* " .. name .. " " .. param)
  79         end,
  80 })
  81
  82 core.register_chatcommand("admin", {
  83         description = "Show the name of the server owner",
  84         func = function(name)
  85                 local admin = minetest.settings:get("name")
  86                 if admin then
  87                         return true, "The administrator of this server is "..admin.."."
  88                 else
  89                         return false, "There's no administrator named in the config file."
  90                 end
  91         end,
  92 })
  93
  94 core.register_chatcommand("privs", {
  95         params = "[<name>]",
  96         description = "Print privileges of player",
  97         func = function(caller, param)
  98                 param = param:trim()
  99                 local name = (param ~= "" and param or caller)
 100                 return true, "Privileges of " .. name .. ": "
 101                         .. core.privs_to_string(
 102                                 core.get_player_privs(name), ' ')
 103         end,
 104 })
 105
 106 local function handle_grant_command(caller, grantname, grantprivstr)
 107         local caller_privs = minetest.get_player_privs(caller)
 108         if not (caller_privs.privs or caller_privs.basic_privs) then
 109                 return false, "Your privileges are insufficient."
 110         end
 111
 112         if not core.get_auth_handler().get_auth(grantname) then
 113                 return false, "Player " .. grantname .. " does not exist."
 114         end
 115         local grantprivs = core.string_to_privs(grantprivstr)
 116         if grantprivstr == "all" then
 117                 grantprivs = core.registered_privileges
 118         end
 119         local privs = core.get_player_privs(grantname)
 120         local privs_unknown = ""
 121         local basic_privs =
 122                 core.string_to_privs(core.settings:get("basic_privs") or "interact,shout")
 123         for priv, _ in pairs(grantprivs) do
 124                 if not basic_privs[priv] and not caller_privs.privs then
 125                         return false, "Your privileges are insufficient."
 126                 end
 127                 if not core.registered_privileges[priv] then
 128                         privs_unknown = privs_unknown .. "Unknown privilege: " .. priv .. "\n"
 129                 end
 130                 privs[priv] = true
 131         end
 132         if privs_unknown ~= "" then
 133                 return false, privs_unknown
 134         end
 135         for priv, _ in pairs(grantprivs) do
 136                 core.run_priv_callbacks(grantname, priv, caller, "grant")
 137         end
 138         core.set_player_privs(grantname, privs)
 139         core.log("action", caller..' granted ('..core.privs_to_string(grantprivs, ', ')..') privileges to '..grantname)
 140         if grantname ~= caller then
 141                 core.chat_send_player(grantname, caller
 142                                 .. " granted you privileges: "
 143                                 .. core.privs_to_string(grantprivs, ' '))
 144         end
 145         return true, "Privileges of " .. grantname .. ": "
 146                 .. core.privs_to_string(
 147                         core.get_player_privs(grantname), ' ')
 148 end
 149
 150 core.register_chatcommand("grant", {
 151         params = "<name> (<privilege> | all)",
 152         description = "Give privilege to player",
 153         func = function(name, param)
 154                 local grantname, grantprivstr = string.match(param, "([^ ]+) (.+)")
 155                 if not grantname or not grantprivstr then
 156                         return false, "Invalid parameters (see /help grant)"
 157                 end
 158                 return handle_grant_command(name, grantname, grantprivstr)
 159         end,
 160 })
 161
 162 core.register_chatcommand("grantme", {
 163         params = "<privilege> | all",
 164         description = "Grant privileges to yourself",
 165         func = function(name, param)
 166                 if param == "" then
 167                         return false, "Invalid parameters (see /help grantme)"
 168                 end
 169                 return handle_grant_command(name, name, param)
 170         end,
 171 })
 172
 173 core.register_chatcommand("revoke", {
 174         params = "<name> (<privilege> | all)",
 175         description = "Remove privilege from player",
 176         privs = {},
 177         func = function(name, param)
 178                 if not core.check_player_privs(name, {privs=true}) and
 179                                 not core.check_player_privs(name, {basic_privs=true}) then
 180                         return false, "Your privileges are insufficient."
 181                 end
 182                 local revoke_name, revoke_priv_str = string.match(param, "([^ ]+) (.+)")
 183                 if not revoke_name or not revoke_priv_str then
 184                         return false, "Invalid parameters (see /help revoke)"
 185                 elseif not core.get_auth_handler().get_auth(revoke_name) then
 186                         return false, "Player " .. revoke_name .. " does not exist."
 187                 end
 188                 local revoke_privs = core.string_to_privs(revoke_priv_str)
 189                 local privs = core.get_player_privs(revoke_name)
 190                 local basic_privs =
 191                         core.string_to_privs(core.settings:get("basic_privs") or "interact,shout")
 192                 for priv, _ in pairs(revoke_privs) do
 193                         if not basic_privs[priv] and
 194                                         not core.check_player_privs(name, {privs=true}) then
 195                                 return false, "Your privileges are insufficient."
 196                         end
 197                 end
 198                 if revoke_priv_str == "all" then
 199                         revoke_privs = privs
 200                         privs = {}
 201                 else
 202                         for priv, _ in pairs(revoke_privs) do
 203                                 privs[priv] = nil
 204                         end
 205                 end
 206
 207                 for priv, _ in pairs(revoke_privs) do
 208                         core.run_priv_callbacks(revoke_name, priv, name, "revoke")
 209                 end
 210
 211                 core.set_player_privs(revoke_name, privs)
 212                 core.log("action", name..' revoked ('
 213                                 ..core.privs_to_string(revoke_privs, ', ')
 214                                 ..') privileges from '..revoke_name)
 215                 if revoke_name ~= name then
 216                         core.chat_send_player(revoke_name, name
 217                                         .. " revoked privileges from you: "
 218                                         .. core.privs_to_string(revoke_privs, ' '))
 219                 end
 220                 return true, "Privileges of " .. revoke_name .. ": "
 221                         .. core.privs_to_string(
 222                                 core.get_player_privs(revoke_name), ' ')
 223         end,
 224 })
 225
 226 core.register_chatcommand("setpassword", {
 227         params = "<name> <password>",
 228         description = "Set player's password",
 229         privs = {password=true},
 230         func = function(name, param)
 231                 local toname, raw_password = string.match(param, "^([^ ]+) +(.+)$")
 232                 if not toname then
 233                         toname = param:match("^([^ ]+) *$")
 234                         raw_password = nil
 235                 end
 236                 if not toname then
 237                         return false, "Name field required"
 238                 end
 239                 local act_str_past = "?"
 240                 local act_str_pres = "?"
 241                 if not raw_password then
 242                         core.set_player_password(toname, "")
 243                         act_str_past = "cleared"
 244                         act_str_pres = "clears"
 245                 else
 246                         core.set_player_password(toname,
 247                                         core.get_password_hash(toname,
 248                                                         raw_password))
 249                         act_str_past = "set"
 250                         act_str_pres = "sets"
 251                 end
 252                 if toname ~= name then
 253                         core.chat_send_player(toname, "Your password was "
 254                                         .. act_str_past .. " by " .. name)
 255                 end
 256
 257                 core.log("action", name .. " " .. act_str_pres
 258                 .. " password of " .. toname .. ".")
 259
 260                 return true, "Password of player \"" .. toname .. "\" " .. act_str_past
 261         end,
 262 })
 263
 264 core.register_chatcommand("clearpassword", {
 265         params = "<name>",
 266         description = "Set empty password",
 267         privs = {password=true},
 268         func = function(name, param)
 269                 local toname = param
 270                 if toname == "" then
 271                         return false, "Name field required"
 272                 end
 273                 core.set_player_password(toname, '')
 274
 275                 core.log("action", name .. " clears password of " .. toname .. ".")
 276
 277                 return true, "Password of player \"" .. toname .. "\" cleared"
 278         end,
 279 })
 280
 281 core.register_chatcommand("auth_reload", {
 282         params = "",
 283         description = "Reload authentication data",
 284         privs = {server=true},
 285         func = function(name, param)
 286                 local done = core.auth_reload()
 287                 return done, (done and "Done." or "Failed.")
 288         end,
 289 })
 290
 291 core.register_chatcommand("remove_player", {
 292         params = "<name>",
 293         description = "Remove player data",
 294         privs = {server=true},
 295         func = function(name, param)
 296                 local toname = param
 297                 if toname == "" then
 298                         return false, "Name field required"
 299                 end
 300
 301                 local rc = core.remove_player(toname)
 302
 303                 if rc == 0 then
 304                         core.log("action", name .. " removed player data of " .. toname .. ".")
 305                         return true, "Player \"" .. toname .. "\" removed."
 306                 elseif rc == 1 then
 307                         return true, "No such player \"" .. toname .. "\" to remove."
 308                 elseif rc == 2 then
 309                         return true, "Player \"" .. toname .. "\" is connected, cannot remove."
 310                 end
 311
 312                 return false, "Unhandled remove_player return code " .. rc .. ""
 313         end,
 314 })
 315
 316 core.register_chatcommand("teleport", {
 317         params = "<X>,<Y>,<Z> | <to_name> | (<name> <X>,<Y>,<Z>) | (<name> <to_name>)",
 318         description = "Teleport to player or position",
 319         privs = {teleport=true},
 320         func = function(name, param)
 321                 -- Returns (pos, true) if found, otherwise (pos, false)
 322                 local function find_free_position_near(pos)
 323                         local tries = {
 324                                 {x=1,y=0,z=0},
 325                                 {x=-1,y=0,z=0},
 326                                 {x=0,y=0,z=1},
 327                                 {x=0,y=0,z=-1},
 328                         }
 329                         for _, d in ipairs(tries) do
 330                                 local p = {x = pos.x+d.x, y = pos.y+d.y, z = pos.z+d.z}
 331                                 local n = core.get_node_or_nil(p)
 332                                 if n and n.name then
 333                                         local def = core.registered_nodes[n.name]
 334                                         if def and not def.walkable then
 335                                                 return p, true
 336                                         end
 337                                 end
 338                         end
 339                         return pos, false
 340                 end
 341
 342                 local teleportee = nil
 343                 local p = {}
 344                 p.x, p.y, p.z = string.match(param, "^([%d.-]+)[, ] *([%d.-]+)[, ] *([%d.-]+)$")
 345                 p.x = tonumber(p.x)
 346                 p.y = tonumber(p.y)
 347                 p.z = tonumber(p.z)
 348                 if p.x and p.y and p.z then
 349                         local lm = 31000
 350                         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
 351                                 return false, "Cannot teleport out of map bounds!"
 352                         end
 353                         teleportee = core.get_player_by_name(name)
 354                         if teleportee then
 355                                 teleportee:setpos(p)
 356                                 return true, "Teleporting to "..core.pos_to_string(p)
 357                         end
 358                 end
 359
 360                 local teleportee = nil
 361                 local p = nil
 362                 local target_name = nil
 363                 target_name = param:match("^([^ ]+)$")
 364                 teleportee = core.get_player_by_name(name)
 365                 if target_name then
 366                         local target = core.get_player_by_name(target_name)
 367                         if target then
 368                                 p = target:getpos()
 369                         end
 370                 end
 371                 if teleportee and p then
 372                         p = find_free_position_near(p)
 373                         teleportee:setpos(p)
 374                         return true, "Teleporting to " .. target_name
 375                                         .. " at "..core.pos_to_string(p)
 376                 end
 377
 378                 if not core.check_player_privs(name, {bring=true}) then
 379                         return false, "You don't have permission to teleport other players (missing bring privilege)"
 380                 end
 381
 382                 local teleportee = nil
 383                 local p = {}
 384                 local teleportee_name = nil
 385                 teleportee_name, p.x, p.y, p.z = param:match(
 386                                 "^([^ ]+) +([%d.-]+)[, ] *([%d.-]+)[, ] *([%d.-]+)$")
 387                 p.x, p.y, p.z = tonumber(p.x), tonumber(p.y), tonumber(p.z)
 388                 if teleportee_name then
 389                         teleportee = core.get_player_by_name(teleportee_name)
 390                 end
 391                 if teleportee and p.x and p.y and p.z then
 392                         teleportee:setpos(p)
 393                         return true, "Teleporting " .. teleportee_name
 394                                         .. " to " .. core.pos_to_string(p)
 395                 end
 396
 397                 local teleportee = nil
 398                 local p = nil
 399                 local teleportee_name = nil
 400                 local target_name = nil
 401                 teleportee_name, target_name = string.match(param, "^([^ ]+) +([^ ]+)$")
 402                 if teleportee_name then
 403                         teleportee = core.get_player_by_name(teleportee_name)
 404                 end
 405                 if target_name then
 406                         local target = core.get_player_by_name(target_name)
 407                         if target then
 408                                 p = target:getpos()
 409                         end
 410                 end
 411                 if teleportee and p then
 412                         p = find_free_position_near(p)
 413                         teleportee:setpos(p)
 414                         return true, "Teleporting " .. teleportee_name
 415                                         .. " to " .. target_name
 416                                         .. " at " .. core.pos_to_string(p)
 417                 end
 418
 419                 return false, 'Invalid parameters ("' .. param
 420                                 .. '") or player not found (see /help teleport)'
 421         end,
 422 })
 423
 424 core.register_chatcommand("set", {
 425         params = "([-n] <name> <value>) | <name>",
 426         description = "Set or read server configuration setting",
 427         privs = {server=true},
 428         func = function(name, param)
 429                 local arg, setname, setvalue = string.match(param, "(-[n]) ([^ ]+) (.+)")
 430                 if arg and arg == "-n" and setname and setvalue then
 431                         core.settings:set(setname, setvalue)
 432                         return true, setname .. " = " .. setvalue
 433                 end
 434                 local setname, setvalue = string.match(param, "([^ ]+) (.+)")
 435                 if setname and setvalue then
 436                         if not core.settings:get(setname) then
 437                                 return false, "Failed. Use '/set -n <name> <value>' to create a new setting."
 438                         end
 439                         core.settings:set(setname, setvalue)
 440                         return true, setname .. " = " .. setvalue
 441                 end
 442                 local setname = string.match(param, "([^ ]+)")
 443                 if setname then
 444                         local setvalue = core.settings:get(setname)
 445                         if not setvalue then
 446                                 setvalue = "<not set>"
 447                         end
 448                         return true, setname .. " = " .. setvalue
 449                 end
 450                 return false, "Invalid parameters (see /help set)."
 451         end,
 452 })
 453
 454 local function emergeblocks_callback(pos, action, num_calls_remaining, ctx)
 455         if ctx.total_blocks == 0 then
 456                 ctx.total_blocks   = num_calls_remaining + 1
 457                 ctx.current_blocks = 0
 458         end
 459         ctx.current_blocks = ctx.current_blocks + 1
 460
 461         if ctx.current_blocks == ctx.total_blocks then
 462                 core.chat_send_player(ctx.requestor_name,
 463                         string.format("Finished emerging %d blocks in %.2fms.",
 464                         ctx.total_blocks, (os.clock() - ctx.start_time) * 1000))
 465         end
 466 end
 467
 468 local function emergeblocks_progress_update(ctx)
 469         if ctx.current_blocks ~= ctx.total_blocks then
 470                 core.chat_send_player(ctx.requestor_name,
 471                         string.format("emergeblocks update: %d/%d blocks emerged (%.1f%%)",
 472                         ctx.current_blocks, ctx.total_blocks,
 473                         (ctx.current_blocks / ctx.total_blocks) * 100))
 474
 475                 core.after(2, emergeblocks_progress_update, ctx)
 476         end
 477 end
 478
 479 core.register_chatcommand("emergeblocks", {
 480         params = "(here [<radius>]) | (<pos1> <pos2>)",
 481         description = "Load (or, if nonexistent, generate) map blocks "
 482                 .. "contained in area pos1 to pos2 (<pos1> and <pos2> must be in parentheses)",
 483         privs = {server=true},
 484         func = function(name, param)
 485                 local p1, p2 = parse_range_str(name, param)
 486                 if p1 == false then
 487                         return false, p2
 488                 end
 489
 490                 local context = {
 491                         current_blocks = 0,
 492                         total_blocks   = 0,
 493                         start_time     = os.clock(),
 494                         requestor_name = name
 495                 }
 496
 497                 core.emerge_area(p1, p2, emergeblocks_callback, context)
 498                 core.after(2, emergeblocks_progress_update, context)
 499
 500                 return true, "Started emerge of area ranging from " ..
 501                         core.pos_to_string(p1, 1) .. " to " .. core.pos_to_string(p2, 1)
 502         end,
 503 })
 504
 505 core.register_chatcommand("deleteblocks", {
 506         params = "(here [<radius>]) | (<pos1> <pos2>)",
 507         description = "Delete map blocks contained in area pos1 to pos2 "
 508                 .. "(<pos1> and <pos2> must be in parentheses)",
 509         privs = {server=true},
 510         func = function(name, param)
 511                 local p1, p2 = parse_range_str(name, param)
 512                 if p1 == false then
 513                         return false, p2
 514                 end
 515
 516                 if core.delete_area(p1, p2) then
 517                         return true, "Successfully cleared area ranging from " ..
 518                                 core.pos_to_string(p1, 1) .. " to " .. core.pos_to_string(p2, 1)
 519                 else
 520                         return false, "Failed to clear one or more blocks in area"
 521                 end
 522         end,
 523 })
 524
 525 core.register_chatcommand("fixlight", {
 526         params = "(here [<radius>]) | (<pos1> <pos2>)",
 527         description = "Resets lighting in the area between pos1 and pos2 "
 528                 .. "(<pos1> and <pos2> must be in parentheses)",
 529         privs = {server = true},
 530         func = function(name, param)
 531                 local p1, p2 = parse_range_str(name, param)
 532                 if p1 == false then
 533                         return false, p2
 534                 end
 535
 536                 if core.fix_light(p1, p2) then
 537                         return true, "Successfully reset light in the area ranging from " ..
 538                                 core.pos_to_string(p1, 1) .. " to " .. core.pos_to_string(p2, 1)
 539                 else
 540                         return false, "Failed to load one or more blocks in area"
 541                 end
 542         end,
 543 })
 544
 545 core.register_chatcommand("mods", {
 546         params = "",
 547         description = "List mods installed on the server",
 548         privs = {},
 549         func = function(name, param)
 550                 return true, table.concat(core.get_modnames(), ", ")
 551         end,
 552 })
 553
 554 local function handle_give_command(cmd, giver, receiver, stackstring)
 555         core.log("action", giver .. " invoked " .. cmd
 556                         .. ', stackstring="' .. stackstring .. '"')
 557         local itemstack = ItemStack(stackstring)
 558         if itemstack:is_empty() then
 559                 return false, "Cannot give an empty item"
 560         elseif not itemstack:is_known() then
 561                 return false, "Cannot give an unknown item"
 562         end
 563         local receiverref = core.get_player_by_name(receiver)
 564         if receiverref == nil then
 565                 return false, receiver .. " is not a known player"
 566         end
 567         local leftover = receiverref:get_inventory():add_item("main", itemstack)
 568         local partiality
 569         if leftover:is_empty() then
 570                 partiality = ""
 571         elseif leftover:get_count() == itemstack:get_count() then
 572                 partiality = "could not be "
 573         else
 574                 partiality = "partially "
 575         end
 576         -- The actual item stack string may be different from what the "giver"
 577         -- entered (e.g. big numbers are always interpreted as 2^16-1).
 578         stackstring = itemstack:to_string()
 579         if giver == receiver then
 580                 return true, ("%q %sadded to inventory.")
 581                                 :format(stackstring, partiality)
 582         else
 583                 core.chat_send_player(receiver, ("%q %sadded to inventory.")
 584                                 :format(stackstring, partiality))
 585                 return true, ("%q %sadded to %s's inventory.")
 586                                 :format(stackstring, partiality, receiver)
 587         end
 588 end
 589
 590 core.register_chatcommand("give", {
 591         params = "<name> <ItemString>",
 592         description = "Give item to player",
 593         privs = {give=true},
 594         func = function(name, param)
 595                 local toname, itemstring = string.match(param, "^([^ ]+) +(.+)$")
 596                 if not toname or not itemstring then
 597                         return false, "Name and ItemString required"
 598                 end
 599                 return handle_give_command("/give", name, toname, itemstring)
 600         end,
 601 })
 602
 603 core.register_chatcommand("giveme", {
 604         params = "<ItemString>",
 605         description = "Give item to yourself",
 606         privs = {give=true},
 607         func = function(name, param)
 608                 local itemstring = string.match(param, "(.+)$")
 609                 if not itemstring then
 610                         return false, "ItemString required"
 611                 end
 612                 return handle_give_command("/giveme", name, name, itemstring)
 613         end,
 614 })
 615
 616 core.register_chatcommand("spawnentity", {
 617         params = "<EntityName> [<X>,<Y>,<Z>]",
 618         description = "Spawn entity at given (or your) position",
 619         privs = {give=true, interact=true},
 620         func = function(name, param)
 621                 local entityname, p = string.match(param, "^([^ ]+) *(.*)$")
 622                 if not entityname then
 623                         return false, "EntityName required"
 624                 end
 625                 core.log("action", ("%s invokes /spawnentity, entityname=%q")
 626                                 :format(name, entityname))
 627                 local player = core.get_player_by_name(name)
 628                 if player == nil then
 629                         core.log("error", "Unable to spawn entity, player is nil")
 630                         return false, "Unable to spawn entity, player is nil"
 631                 end
 632                 if not minetest.registered_entities[entityname] then
 633                         return false, "Cannot spawn an unknown entity"
 634                 end
 635                 if p == "" then
 636                         p = player:getpos()
 637                 else
 638                         p = core.string_to_pos(p)
 639                         if p == nil then
 640                                 return false, "Invalid parameters ('" .. param .. "')"
 641                         end
 642                 end
 643                 p.y = p.y + 1
 644                 core.add_entity(p, entityname)
 645                 return true, ("%q spawned."):format(entityname)
 646         end,
 647 })
 648
 649 core.register_chatcommand("pulverize", {
 650         params = "",
 651         description = "Destroy item in hand",
 652         func = function(name, param)
 653                 local player = core.get_player_by_name(name)
 654                 if not player then
 655                         core.log("error", "Unable to pulverize, no player.")
 656                         return false, "Unable to pulverize, no player."
 657                 end
 658                 if player:get_wielded_item():is_empty() then
 659                         return false, "Unable to pulverize, no item in hand."
 660                 end
 661                 player:set_wielded_item(nil)
 662                 return true, "An item was pulverized."
 663         end,
 664 })
 665
 666 -- Key = player name
 667 core.rollback_punch_callbacks = {}
 668
 669 core.register_on_punchnode(function(pos, node, puncher)
 670         local name = puncher and puncher:get_player_name()
 671         if name and core.rollback_punch_callbacks[name] then
 672                 core.rollback_punch_callbacks[name](pos, node, puncher)
 673                 core.rollback_punch_callbacks[name] = nil
 674         end
 675 end)
 676
 677 core.register_chatcommand("rollback_check", {
 678         params = "[<range>] [<seconds>] [<limit>]",
 679         description = "Check who last touched a node or a node near it"
 680                         .. " within the time specified by <seconds>. Default: range = 0,"
 681                         .. " seconds = 86400 = 24h, limit = 5",
 682         privs = {rollback=true},
 683         func = function(name, param)
 684                 if not core.settings:get_bool("enable_rollback_recording") then
 685                         return false, "Rollback functions are disabled."
 686                 end
 687                 local range, seconds, limit =
 688                         param:match("(%d+) *(%d*) *(%d*)")
 689                 range = tonumber(range) or 0
 690                 seconds = tonumber(seconds) or 86400
 691                 limit = tonumber(limit) or 5
 692                 if limit > 100 then
 693                         return false, "That limit is too high!"
 694                 end
 695
 696                 core.rollback_punch_callbacks[name] = function(pos, node, puncher)
 697                         local name = puncher:get_player_name()
 698                         core.chat_send_player(name, "Checking " .. core.pos_to_string(pos) .. "...")
 699                         local actions = core.rollback_get_node_actions(pos, range, seconds, limit)
 700                         if not actions then
 701                                 core.chat_send_player(name, "Rollback functions are disabled")
 702                                 return
 703                         end
 704                         local num_actions = #actions
 705                         if num_actions == 0 then
 706                                 core.chat_send_player(name, "Nobody has touched"
 707                                                 .. " the specified location in "
 708                                                 .. seconds .. " seconds")
 709                                 return
 710                         end
 711                         local time = os.time()
 712                         for i = num_actions, 1, -1 do
 713                                 local action = actions[i]
 714                                 core.chat_send_player(name,
 715                                         ("%s %s %s -> %s %d seconds ago.")
 716                                                 :format(
 717                                                         core.pos_to_string(action.pos),
 718                                                         action.actor,
 719                                                         action.oldnode.name,
 720                                                         action.newnode.name,
 721                                                         time - action.time))
 722                         end
 723                 end
 724
 725                 return true, "Punch a node (range=" .. range .. ", seconds="
 726                                 .. seconds .. "s, limit=" .. limit .. ")"
 727         end,
 728 })
 729
 730 core.register_chatcommand("rollback", {
 731         params = "(<name> [<seconds>]) | (:<actor> [<seconds>])",
 732         description = "Revert actions of a player. Default for <seconds> is 60",
 733         privs = {rollback=true},
 734         func = function(name, param)
 735                 if not core.settings:get_bool("enable_rollback_recording") then
 736                         return false, "Rollback functions are disabled."
 737                 end
 738                 local target_name, seconds = string.match(param, ":([^ ]+) *(%d*)")
 739                 if not target_name then
 740                         local player_name = nil
 741                         player_name, seconds = string.match(param, "([^ ]+) *(%d*)")
 742                         if not player_name then
 743                                 return false, "Invalid parameters. See /help rollback"
 744                                                 .. " and /help rollback_check."
 745                         end
 746                         target_name = "player:"..player_name
 747                 end
 748                 seconds = tonumber(seconds) or 60
 749                 core.chat_send_player(name, "Reverting actions of "
 750                                 .. target_name .. " since "
 751                                 .. seconds .. " seconds.")
 752                 local success, log = core.rollback_revert_actions_by(
 753                                 target_name, seconds)
 754                 local response = ""
 755                 if #log > 100 then
 756                         response = "(log is too long to show)\n"
 757                 else
 758                         for _, line in pairs(log) do
 759                                 response = response .. line .. "\n"
 760                         end
 761                 end
 762                 response = response .. "Reverting actions "
 763                                 .. (success and "succeeded." or "FAILED.")
 764                 return success, response
 765         end,
 766 })
 767
 768 core.register_chatcommand("status", {
 769         description = "Print server status",
 770         func = function(name, param)
 771                 return true, core.get_server_status()
 772         end,
 773 })
 774
 775 core.register_chatcommand("time", {
 776         params = "<0..23>:<0..59> | <0..24000>",
 777         description = "Set time of day",
 778         privs = {},
 779         func = function(name, param)
 780                 if param == "" then
 781                         local current_time = math.floor(core.get_timeofday() * 1440)
 782                         local minutes = current_time % 60
 783                         local hour = (current_time - minutes) / 60
 784                         return true, ("Current time is %d:%02d"):format(hour, minutes)
 785                 end
 786                 local player_privs = core.get_player_privs(name)
 787                 if not player_privs.settime then
 788                         return false, "You don't have permission to run this command " ..
 789                                 "(missing privilege: settime)."
 790                 end
 791                 local hour, minute = param:match("^(%d+):(%d+)$")
 792                 if not hour then
 793                         local new_time = tonumber(param)
 794                         if not new_time then
 795                                 return false, "Invalid time."
 796                         end
 797                         -- Backward compatibility.
 798                         core.set_timeofday((new_time % 24000) / 24000)
 799                         core.log("action", name .. " sets time to " .. new_time)
 800                         return true, "Time of day changed."
 801                 end
 802                 hour = tonumber(hour)
 803                 minute = tonumber(minute)
 804                 if hour < 0 or hour > 23 then
 805                         return false, "Invalid hour (must be between 0 and 23 inclusive)."
 806                 elseif minute < 0 or minute > 59 then
 807                         return false, "Invalid minute (must be between 0 and 59 inclusive)."
 808                 end
 809                 core.set_timeofday((hour * 60 + minute) / 1440)
 810                 core.log("action", ("%s sets time to %d:%02d"):format(name, hour, minute))
 811                 return true, "Time of day changed."
 812         end,
 813 })
 814
 815 core.register_chatcommand("days", {
 816         description = "Display day count",
 817         func = function(name, param)
 818                 return true, "Current day is " .. core.get_day_count()
 819         end
 820 })
 821
 822 core.register_chatcommand("shutdown", {
 823         params = "[<delay_in_seconds> | -1] [reconnect] [<message>]",
 824         description = "Shutdown server (-1 cancels a delayed shutdown)",
 825         privs = {server=true},
 826         func = function(name, param)
 827                 local delay, reconnect, message = param:match("([^ ][-]?[0-9]+)([^ ]+)(.*)")
 828                 message = message or ""
 829
 830                 if delay ~= "" then
 831                         delay = tonumber(param) or 0
 832                 else
 833                         delay = 0
 834                         core.log("action", name .. " shuts down server")
 835                         core.chat_send_all("*** Server shutting down (operator request).")
 836                 end
 837                 core.request_shutdown(message:trim(), core.is_yes(reconnect), delay)
 838         end,
 839 })
 840
 841 core.register_chatcommand("ban", {
 842         params = "<name>",
 843         description = "Ban IP of player",
 844         privs = {ban=true},
 845         func = function(name, param)
 846                 if param == "" then
 847                         return true, "Ban list: " .. core.get_ban_list()
 848                 end
 849                 if not core.get_player_by_name(param) then
 850                         return false, "No such player."
 851                 end
 852                 if not core.ban_player(param) then
 853                         return false, "Failed to ban player."
 854                 end
 855                 local desc = core.get_ban_description(param)
 856                 core.log("action", name .. " bans " .. desc .. ".")
 857                 return true, "Banned " .. desc .. "."
 858         end,
 859 })
 860
 861 core.register_chatcommand("unban", {
 862         params = "<name> | <IP_address>",
 863         description = "Remove IP ban",
 864         privs = {ban=true},
 865         func = function(name, param)
 866                 if not core.unban_player_or_ip(param) then
 867                         return false, "Failed to unban player/IP."
 868                 end
 869                 core.log("action", name .. " unbans " .. param)
 870                 return true, "Unbanned " .. param
 871         end,
 872 })
 873
 874 core.register_chatcommand("kick", {
 875         params = "<name> [<reason>]",
 876         description = "Kick a player",
 877         privs = {kick=true},
 878         func = function(name, param)
 879                 local tokick, reason = param:match("([^ ]+) (.+)")
 880                 tokick = tokick or param
 881                 if not core.kick_player(tokick, reason) then
 882                         return false, "Failed to kick player " .. tokick
 883                 end
 884                 local log_reason = ""
 885                 if reason then
 886                         log_reason = " with reason \"" .. reason .. "\""
 887                 end
 888                 core.log("action", name .. " kicks " .. tokick .. log_reason)
 889                 return true, "Kicked " .. tokick
 890         end,
 891 })
 892
 893 core.register_chatcommand("clearobjects", {
 894         params = "[full | quick]",
 895         description = "Clear all objects in world",
 896         privs = {server=true},
 897         func = function(name, param)
 898                 local options = {}
 899                 if param == "" or param == "full" then
 900                         options.mode = "full"
 901                 elseif param == "quick" then
 902                         options.mode = "quick"
 903                 else
 904                         return false, "Invalid usage, see /help clearobjects."
 905                 end
 906
 907                 core.log("action", name .. " clears all objects ("
 908                                 .. options.mode .. " mode).")
 909                 core.chat_send_all("Clearing all objects.  This may take long."
 910                                 .. "  You may experience a timeout.  (by "
 911                                 .. name .. ")")
 912                 core.clear_objects(options)
 913                 core.log("action", "Object clearing done.")
 914                 core.chat_send_all("*** Cleared all objects.")
 915         end,
 916 })
 917
 918 core.register_chatcommand("msg", {
 919         params = "<name> <message>",
 920         description = "Send a private message",
 921         privs = {shout=true},
 922         func = function(name, param)
 923                 local sendto, message = param:match("^(%S+)%s(.+)$")
 924                 if not sendto then
 925                         return false, "Invalid usage, see /help msg."
 926                 end
 927                 if not core.get_player_by_name(sendto) then
 928                         return false, "The player " .. sendto
 929                                         .. " is not online."
 930                 end
 931                 core.log("action", "PM from " .. name .. " to " .. sendto
 932                                 .. ": " .. message)
 933                 core.chat_send_player(sendto, "PM from " .. name .. ": "
 934                                 .. message)
 935                 return true, "Message sent."
 936         end,
 937 })
 938
 939 core.register_chatcommand("last-login", {
 940         params = "[<name>]",
 941         description = "Get the last login time of a player",
 942         func = function(name, param)
 943                 if param == "" then
 944                         param = name
 945                 end
 946                 local pauth = core.get_auth_handler().get_auth(param)
 947                 if pauth and pauth.last_login then
 948                         -- Time in UTC, ISO 8601 format
 949                         return true, "Last login time was " ..
 950                                 os.date("!%Y-%m-%dT%H:%M:%SZ", pauth.last_login)
 951                 end
 952                 return false, "Last login time is unknown"
 953         end,
 954 })
 955
 956 core.register_chatcommand("clearinv", {
 957         params = "[<name>]",
 958         description = "Clear the inventory of yourself or another player",
 959         func = function(name, param)
 960                 local player
 961                 if param and param ~= "" and param ~= name then
 962                         if not core.check_player_privs(name, {server=true}) then
 963                                 return false, "You don't have permission"
 964                                                 .. " to run this command (missing privilege: server)"
 965                         end
 966                         player = core.get_player_by_name(param)
 967                         core.chat_send_player(param, name.." cleared your inventory.")
 968                 else
 969                         player = core.get_player_by_name(name)
 970                 end
 971
 972                 if player then
 973                         player:get_inventory():set_list("main", {})
 974                         player:get_inventory():set_list("craft", {})
 975                         player:get_inventory():set_list("craftpreview", {})
 976                         core.log("action", name.." clears "..player:get_player_name().."'s inventory")
 977                         return true, "Cleared "..player:get_player_name().."'s inventory."
 978                 else
 979                         return false, "Player must be online to clear inventory!"
 980                 end
 981         end,
 982 })