builtin/chatcommands.lua

   1 -- Minetest: builtin/chatcommands.lua
   2
   3 --
   4 -- Chat command handler
   5 --
   6
   7 minetest.chatcommands = {}
   8 function minetest.register_chatcommand(cmd, def)
   9         def = def or {}
  10         def.params = def.params or ""
  11         def.description = def.description or ""
  12         def.privs = def.privs or {}
  13         minetest.chatcommands[cmd] = def
  14 end
  15
  16 minetest.register_on_chat_message(function(name, message)
  17         local cmd, param = string.match(message, "^/([^ ]+) *(.*)")
  18         if not param then
  19                 param = ""
  20         end
  21         local cmd_def = minetest.chatcommands[cmd]
  22         if cmd_def then
  23                 local has_privs, missing_privs = minetest.check_player_privs(name, cmd_def.privs)
  24                 if has_privs then
  25                         cmd_def.func(name, param)
  26                 else
  27                         minetest.chat_send_player(name, "You don't have permission to run this command (missing privileges: "..table.concat(missing_privs, ", ")..")")
  28                 end
  29                 return true -- handled chat message
  30         end
  31         return false
  32 end)
  33
  34 --
  35 -- Chat commands
  36 --
  37 minetest.register_chatcommand("me", {
  38         params = "<action>",
  39         description = "chat action (eg. /me orders a pizza)",
  40         privs = {shout=true},
  41         func = function(name, param)
  42                 minetest.chat_send_all("* " .. name .. " " .. param)
  43         end,
  44 })
  45
  46 minetest.register_chatcommand("help", {
  47         privs = {},
  48         params = "(nothing)/all/privs/<cmd>",
  49         description = "Get help for commands or list privileges",
  50         func = function(name, param)
  51                 local format_help_line = function(cmd, def)
  52                         local msg = "/"..cmd
  53                         if def.params and def.params ~= "" then msg = msg .. " " .. def.params end
  54                         if def.description and def.description ~= "" then msg = msg .. ": " .. def.description end
  55                         return msg
  56                 end
  57                 if param == "" then
  58                         local msg = ""
  59                         cmds = {}
  60                         for cmd, def in pairs(minetest.chatcommands) do
  61                                 if minetest.check_player_privs(name, def.privs) then
  62                                         table.insert(cmds, cmd)
  63                                 end
  64                         end
  65                         minetest.chat_send_player(name, "Available commands: "..table.concat(cmds, " "))
  66                         minetest.chat_send_player(name, "Use '/help <cmd>' to get more information, or '/help all' to list everything.")
  67                 elseif param == "all" then
  68                         minetest.chat_send_player(name, "Available commands:")
  69                         for cmd, def in pairs(minetest.chatcommands) do
  70                                 if minetest.check_player_privs(name, def.privs) then
  71                                         minetest.chat_send_player(name, format_help_line(cmd, def))
  72                                 end
  73                         end
  74                 elseif param == "privs" then
  75                         minetest.chat_send_player(name, "Available privileges:")
  76                         for priv, def in pairs(minetest.registered_privileges) do
  77                                 minetest.chat_send_player(name, priv..": "..def.description)
  78                         end
  79                 else
  80                         local cmd = param
  81                         def = minetest.chatcommands[cmd]
  82                         if not def then
  83                                 minetest.chat_send_player(name, "Command not available: "..cmd)
  84                         else
  85                                 minetest.chat_send_player(name, format_help_line(cmd, def))
  86                         end
  87                 end
  88         end,
  89 })
  90 minetest.register_chatcommand("privs", {
  91         params = "<name>",
  92         description = "print out privileges of player",
  93         func = function(name, param)
  94                 if param == "" then
  95                         param = name
  96                 else
  97                         --[[if not minetest.check_player_privs(name, {privs=true}) then
  98                                 minetest.chat_send_player(name, "Privileges of "..param.." are hidden from you.")
  99                                 return
 100                         end]]
 101                 end
 102                 minetest.chat_send_player(name, "Privileges of "..param..": "..minetest.privs_to_string(minetest.get_player_privs(param), ' '))
 103         end,
 104 })
 105 minetest.register_chatcommand("grant", {
 106         params = "<name> <privilege>|all",
 107         description = "Give privilege to player",
 108         privs = {},
 109         func = function(name, param)
 110                 if not minetest.check_player_privs(name, {privs=true}) and
 111                                 not minetest.check_player_privs(name, {basic_privs=true}) then
 112                         minetest.chat_send_player(name, "Your privileges are insufficient.")
 113                         return
 114                 end
 115                 local grantname, grantprivstr = string.match(param, "([^ ]+) (.+)")
 116                 if not grantname or not grantprivstr then
 117                         minetest.chat_send_player(name, "Invalid parameters (see /help grant)")
 118                         return
 119                 elseif not minetest.auth_table[grantname] then
 120                         minetest.chat_send_player(name, "Player "..grantname.." does not exist.")
 121                         return
 122                 end
 123                 local grantprivs = minetest.string_to_privs(grantprivstr)
 124                 if grantprivstr == "all" then
 125                         grantprivs = minetest.registered_privileges
 126                 end
 127                 local privs = minetest.get_player_privs(grantname)
 128                 local privs_known = true
 129                 for priv, _ in pairs(grantprivs) do
 130                         if priv ~= "interact" and priv ~= "shout" and priv ~= "interact_extra" and not minetest.check_player_privs(name, {privs=true}) then
 131                                 minetest.chat_send_player(name, "Your privileges are insufficient.")
 132                                 return
 133                         end
 134                         if not minetest.registered_privileges[priv] then
 135                                 minetest.chat_send_player(name, "Unknown privilege: "..priv)
 136                                 privs_known = false
 137                         end
 138                         privs[priv] = true
 139                 end
 140                 if not privs_known then
 141                         return
 142                 end
 143                 minetest.set_player_privs(grantname, privs)
 144                 minetest.log(name..' granted ('..minetest.privs_to_string(grantprivs, ', ')..') privileges to '..grantname)
 145                 minetest.chat_send_player(name, "Privileges of "..grantname..": "..minetest.privs_to_string(minetest.get_player_privs(grantname), ' '))
 146                 if grantname ~= name then
 147                         minetest.chat_send_player(grantname, name.." granted you privileges: "..minetest.privs_to_string(grantprivs, ' '))
 148                 end
 149         end,
 150 })
 151 minetest.register_chatcommand("revoke", {
 152         params = "<name> <privilege>|all",
 153         description = "Remove privilege from player",
 154         privs = {},
 155         func = function(name, param)
 156                 if not minetest.check_player_privs(name, {privs=true}) and
 157                                 not minetest.check_player_privs(name, {basic_privs=true}) then
 158                         minetest.chat_send_player(name, "Your privileges are insufficient.")
 159                         return
 160                 end
 161                 local revokename, revokeprivstr = string.match(param, "([^ ]+) (.+)")
 162                 if not revokename or not revokeprivstr then
 163                         minetest.chat_send_player(name, "Invalid parameters (see /help revoke)")
 164                         return
 165                 elseif not minetest.auth_table[revokename] then
 166                         minetest.chat_send_player(name, "Player "..revokename.." does not exist.")
 167                         return
 168                 end
 169                 local revokeprivs = minetest.string_to_privs(revokeprivstr)
 170                 local privs = minetest.get_player_privs(revokename)
 171                 for priv, _ in pairs(revokeprivs) do
 172                         if priv ~= "interact" and priv ~= "shout" and priv ~= "interact_extra" and not minetest.check_player_privs(name, {privs=true}) then
 173                                 minetest.chat_send_player(name, "Your privileges are insufficient.")
 174                                 return
 175                         end
 176                 end
 177                 if revokeprivstr == "all" then
 178                         privs = {}
 179                 else
 180                         for priv, _ in pairs(revokeprivs) do
 181                                 privs[priv] = nil
 182                         end
 183                 end
 184                 minetest.set_player_privs(revokename, privs)
 185                 minetest.log(name..' revoked ('..minetest.privs_to_string(revokeprivs, ', ')..') privileges from '..revokename)
 186                 minetest.chat_send_player(name, "Privileges of "..revokename..": "..minetest.privs_to_string(minetest.get_player_privs(revokename), ' '))
 187                 if revokename ~= name then
 188                         minetest.chat_send_player(revokename, name.." revoked privileges from you: "..minetest.privs_to_string(revokeprivs, ' '))
 189                 end
 190         end,
 191 })
 192 minetest.register_chatcommand("setpassword", {
 193         params = "<name> <password>",
 194         description = "set given password",
 195         privs = {password=true},
 196         func = function(name, param)
 197                 local toname, raw_password = string.match(param, "^([^ ]+) +(.+)$")
 198                 if not toname then
 199                         toname = string.match(param, "^([^ ]+) *$")
 200                         raw_password = nil
 201                 end
 202                 if not toname then
 203                         minetest.chat_send_player(name, "Name field required")
 204                         return
 205                 end
 206                 local actstr = "?"
 207                 if not raw_password then
 208                         minetest.set_player_password(toname, "")
 209                         actstr = "cleared"
 210                 else
 211                         minetest.set_player_password(toname, minetest.get_password_hash(toname, raw_password))
 212                         actstr = "set"
 213                 end
 214                 minetest.chat_send_player(name, "Password of player \""..toname.."\" "..actstr)
 215                 if toname ~= name then
 216                         minetest.chat_send_player(toname, "Your password was "..actstr.." by "..name)
 217                 end
 218         end,
 219 })
 220 minetest.register_chatcommand("clearpassword", {
 221         params = "<name>",
 222         description = "set empty password",
 223         privs = {password=true},
 224         func = function(name, param)
 225                 toname = param
 226                 if toname == "" then
 227                         minetest.chat_send_player(name, "Name field required")
 228                         return
 229                 end
 230                 minetest.set_player_password(toname, '')
 231                 minetest.chat_send_player(name, "Password of player \""..toname.."\" cleared")
 232         end,
 233 })
 234
 235 minetest.register_chatcommand("auth_reload", {
 236         params = "",
 237         description = "reload authentication data",
 238         privs = {server=true},
 239         func = function(name, param)
 240                 local done = minetest.auth_reload()
 241                 if done then
 242                         minetest.chat_send_player(name, "Done.")
 243                 else
 244                         minetest.chat_send_player(name, "Failed.")
 245                 end
 246         end,
 247 })
 248
 249 minetest.register_chatcommand("teleport", {
 250         params = "<X>,<Y>,<Z> | <to_name> | <name> <X>,<Y>,<Z> | <name> <to_name>",
 251         description = "teleport to given position",
 252         privs = {teleport=true},
 253         func = function(name, param)
 254                 -- Returns (pos, true) if found, otherwise (pos, false)
 255                 local function find_free_position_near(pos)
 256                         local tries = {
 257                                 {x=1,y=0,z=0},
 258                                 {x=-1,y=0,z=0},
 259                                 {x=0,y=0,z=1},
 260                                 {x=0,y=0,z=-1},
 261                         }
 262                         for _, d in ipairs(tries) do
 263                                 local p = {x = pos.x+d.x, y = pos.y+d.y, z = pos.z+d.z}
 264                                 local n = minetest.get_node(p)
 265                                 if not minetest.registered_nodes[n.name].walkable then
 266                                         return p, true
 267                                 end
 268                         end
 269                         return pos, false
 270                 end
 271
 272                 local teleportee = nil
 273                 local p = {}
 274                 p.x, p.y, p.z = string.match(param, "^([%d.-]+)[, ] *([%d.-]+)[, ] *([%d.-]+)$")
 275                 p.x = tonumber(p.x)
 276                 p.y = tonumber(p.y)
 277                 p.z = tonumber(p.z)
 278                 teleportee = minetest.get_player_by_name(name)
 279                 if teleportee and p.x and p.y and p.z then
 280                         minetest.chat_send_player(name, "Teleporting to ("..p.x..", "..p.y..", "..p.z..")")
 281                         teleportee:setpos(p)
 282                         return
 283                 end
 284
 285                 local teleportee = nil
 286                 local p = nil
 287                 local target_name = nil
 288                 target_name = string.match(param, "^([^ ]+)$")
 289                 teleportee = minetest.get_player_by_name(name)
 290                 if target_name then
 291                         local target = minetest.get_player_by_name(target_name)
 292                         if target then
 293                                 p = target:getpos()
 294                         end
 295                 end
 296                 if teleportee and p then
 297                         p = find_free_position_near(p)
 298                         minetest.chat_send_player(name, "Teleporting to "..target_name.." at ("..p.x..", "..p.y..", "..p.z..")")
 299                         teleportee:setpos(p)
 300                         return
 301                 end
 302
 303                 if minetest.check_player_privs(name, {bring=true}) then
 304                         local teleportee = nil
 305                         local p = {}
 306                         local teleportee_name = nil
 307                         teleportee_name, p.x, p.y, p.z = string.match(param, "^([^ ]+) +([%d.-]+)[, ] *([%d.-]+)[, ] *([%d.-]+)$")
 308                         p.x = tonumber(p.x)
 309                         p.y = tonumber(p.y)
 310                         p.z = tonumber(p.z)
 311                         if teleportee_name then
 312                                 teleportee = minetest.get_player_by_name(teleportee_name)
 313                         end
 314                         if teleportee and p.x and p.y and p.z then
 315                                 minetest.chat_send_player(name, "Teleporting "..teleportee_name.." to ("..p.x..", "..p.y..", "..p.z..")")
 316                                 teleportee:setpos(p)
 317                                 return
 318                         end
 319
 320                         local teleportee = nil
 321                         local p = nil
 322                         local teleportee_name = nil
 323                         local target_name = nil
 324                         teleportee_name, target_name = string.match(param, "^([^ ]+) +([^ ]+)$")
 325                         if teleportee_name then
 326                                 teleportee = minetest.get_player_by_name(teleportee_name)
 327                         end
 328                         if target_name then
 329                                 local target = minetest.get_player_by_name(target_name)
 330                                 if target then
 331                                         p = target:getpos()
 332                                 end
 333                         end
 334                         if teleportee and p then
 335                                 p = find_free_position_near(p)
 336                                 minetest.chat_send_player(name, "Teleporting "..teleportee_name.." to "..target_name.." at ("..p.x..", "..p.y..", "..p.z..")")
 337                                 teleportee:setpos(p)
 338                                 return
 339                         end
 340                 end
 341
 342                 minetest.chat_send_player(name, "Invalid parameters (\""..param.."\") or player not found (see /help teleport)")
 343                 return
 344         end,
 345 })
 346
 347 minetest.register_chatcommand("set", {
 348         params = "[-n] <name> <value> | <name>",
 349         description = "set or read server configuration setting",
 350         privs = {server=true},
 351         func = function(name, param)
 352                 local arg, setname, setvalue = string.match(param, "(-[n]) ([^ ]+) (.+)")
 353                 if arg and arg == "-n" and setname and setvalue then
 354                         minetest.setting_set(setname, setvalue)
 355                         minetest.chat_send_player(name, setname.." = "..setvalue)
 356                         return
 357                 end
 358                 local setname, setvalue = string.match(param, "([^ ]+) (.+)")
 359                 if setname and setvalue then
 360                         if not minetest.setting_get(setname) then
 361                                 minetest.chat_send_player(name, "Failed. Use '/set -n <name> <value>' to create a new setting.")
 362                                 return
 363                         end
 364                         minetest.setting_set(setname, setvalue)
 365                         minetest.chat_send_player(name, setname.." = "..setvalue)
 366                         return
 367                 end
 368                 local setname = string.match(param, "([^ ]+)")
 369                 if setname then
 370                         local setvalue = minetest.setting_get(setname)
 371                         if not setvalue then
 372                                 setvalue = "<not set>"
 373                         end
 374                         minetest.chat_send_player(name, setname.." = "..setvalue)
 375                         return
 376                 end
 377                 minetest.chat_send_player(name, "Invalid parameters (see /help set)")
 378         end,
 379 })
 380
 381 minetest.register_chatcommand("mods", {
 382         params = "",
 383         description = "lists mods installed on the server",
 384         privs = {},
 385         func = function(name, param)
 386                 local response = ""
 387                 local modnames = minetest.get_modnames()
 388                 for i, mod in ipairs(modnames) do
 389                         response = response .. mod
 390                         -- Add space if not at the end
 391                         if i ~= #modnames then
 392                                 response = response .. " "
 393                         end
 394                 end
 395                 minetest.chat_send_player(name, response)
 396         end,
 397 })
 398
 399 local function handle_give_command(cmd, giver, receiver, stackstring)
 400         minetest.log("action", giver.." invoked "..cmd..', stackstring="'
 401                         ..stackstring..'"')
 402         minetest.log(cmd..' invoked, stackstring="'..stackstring..'"')
 403         local itemstack = ItemStack(stackstring)
 404         if itemstack:is_empty() then
 405                 minetest.chat_send_player(giver, 'error: cannot give an empty item')
 406                 return
 407         elseif not itemstack:is_known() then
 408                 minetest.chat_send_player(giver, 'error: cannot give an unknown item')
 409                 return
 410         end
 411         local receiverref = minetest.get_player_by_name(receiver)
 412         if receiverref == nil then
 413                 minetest.chat_send_player(giver, receiver..' is not a known player')
 414                 return
 415         end
 416         local leftover = receiverref:get_inventory():add_item("main", itemstack)
 417         if leftover:is_empty() then
 418                 partiality = ""
 419         elseif leftover:get_count() == itemstack:get_count() then
 420                 partiality = "could not be "
 421         else
 422                 partiality = "partially "
 423         end
 424         -- The actual item stack string may be different from what the "giver"
 425         -- entered (e.g. big numbers are always interpreted as 2^16-1).
 426         stackstring = itemstack:to_string()
 427         if giver == receiver then
 428                 minetest.chat_send_player(giver, '"'..stackstring
 429                         ..'" '..partiality..'added to inventory.');
 430         else
 431                 minetest.chat_send_player(giver, '"'..stackstring
 432                         ..'" '..partiality..'added to '..receiver..'\'s inventory.');
 433                 minetest.chat_send_player(receiver, '"'..stackstring
 434                         ..'" '..partiality..'added to inventory.');
 435         end
 436 end
 437
 438 minetest.register_chatcommand("give", {
 439         params = "<name> <itemstring>",
 440         description = "give item to player",
 441         privs = {give=true},
 442         func = function(name, param)
 443                 local toname, itemstring = string.match(param, "^([^ ]+) +(.+)$")
 444                 if not toname or not itemstring then
 445                         minetest.chat_send_player(name, "name and itemstring required")
 446                         return
 447                 end
 448                 handle_give_command("/give", name, toname, itemstring)
 449         end,
 450 })
 451 minetest.register_chatcommand("giveme", {
 452         params = "<itemstring>",
 453         description = "give item to yourself",
 454         privs = {give=true},
 455         func = function(name, param)
 456                 local itemstring = string.match(param, "(.+)$")
 457                 if not itemstring then
 458                         minetest.chat_send_player(name, "itemstring required")
 459                         return
 460                 end
 461                 handle_give_command("/giveme", name, name, itemstring)
 462         end,
 463 })
 464 minetest.register_chatcommand("spawnentity", {
 465         params = "<entityname>",
 466         description = "spawn entity at your position",
 467         privs = {give=true, interact=true},
 468         func = function(name, param)
 469                 local entityname = string.match(param, "(.+)$")
 470                 if not entityname then
 471                         minetest.chat_send_player(name, "entityname required")
 472                         return
 473                 end
 474                 minetest.log("action", '/spawnentity invoked, entityname="'..entityname..'"')
 475                 local player = minetest.get_player_by_name(name)
 476                 if player == nil then
 477                         minetest.log("error", "Unable to spawn entity, player is nil")
 478                         return true -- Handled chat message
 479                 end
 480                 local p = player:getpos()
 481                 p.y = p.y + 1
 482                 minetest.add_entity(p, entityname)
 483                 minetest.chat_send_player(name, '"'..entityname
 484                                 ..'" spawned.');
 485         end,
 486 })
 487 minetest.register_chatcommand("pulverize", {
 488         params = "",
 489         description = "delete item in hand",
 490         privs = {},
 491         func = function(name, param)
 492                 local player = minetest.get_player_by_name(name)
 493                 if player == nil then
 494                         minetest.log("error", "Unable to pulverize, player is nil")
 495                         return true -- Handled chat message
 496                 end
 497                 if player:get_wielded_item():is_empty() then
 498                         minetest.chat_send_player(name, 'Unable to pulverize, no item in hand.')
 499                 else
 500                         player:set_wielded_item(nil)
 501                         minetest.chat_send_player(name, 'An item was pulverized.')
 502                 end
 503         end,
 504 })
 505
 506 -- Key = player name
 507 minetest.rollback_punch_callbacks = {}
 508
 509 minetest.register_on_punchnode(function(pos, node, puncher)
 510         local name = puncher:get_player_name()
 511         if minetest.rollback_punch_callbacks[name] then
 512                 minetest.rollback_punch_callbacks[name](pos, node, puncher)
 513                 minetest.rollback_punch_callbacks[name] = nil
 514         end
 515 end)
 516
 517 minetest.register_chatcommand("rollback_check", {
 518         params = "[<range>] [<seconds>] [limit]",
 519         description = "check who has last touched a node or near it, "..
 520                         "max. <seconds> ago (default range=0, seconds=86400=24h, limit=5)",
 521         privs = {rollback=true},
 522         func = function(name, param)
 523                 local range, seconds, limit =
 524                         param:match("(%d+) *(%d*) *(%d*)")
 525                 range = tonumber(range) or 0
 526                 seconds = tonumber(seconds) or 86400
 527                 limit = tonumber(limit) or 5
 528                 if limit > 100 then
 529                         minetest.chat_send_player(name, "That limit is too high!")
 530                         return
 531                 end
 532                 minetest.chat_send_player(name, "Punch a node (range="..
 533                                 range..", seconds="..seconds.."s, limit="..limit..")")
 534
 535                 minetest.rollback_punch_callbacks[name] = function(pos, node, puncher)
 536                         local name = puncher:get_player_name()
 537                         minetest.chat_send_player(name, "Checking "..minetest.pos_to_string(pos).."...")
 538                         local actions = minetest.rollback_get_node_actions(pos, range, seconds, limit)
 539                         local num_actions = #actions
 540                         if num_actions == 0 then
 541                                 minetest.chat_send_player(name, "Nobody has touched the "..
 542                                                 "specified location in "..seconds.." seconds")
 543                                 return
 544                         end
 545                         local time = os.time()
 546                         for i = num_actions, 1, -1 do
 547                                 local action = actions[i]
 548                                 minetest.chat_send_player(name,
 549                                         ("%s %s %s -> %s %d seconds ago.")
 550                                                 :format(
 551                                                         minetest.pos_to_string(action.pos),
 552                                                         action.actor,
 553                                                         action.oldnode.name,
 554                                                         action.newnode.name,
 555                                                         time - action.time))
 556                         end
 557                 end
 558         end,
 559 })
 560
 561 minetest.register_chatcommand("rollback", {
 562         params = "<player name> [<seconds>] | :<actor> [<seconds>]",
 563         description = "revert actions of a player; default for <seconds> is 60",
 564         privs = {rollback=true},
 565         func = function(name, param)
 566                 local target_name, seconds = string.match(param, ":([^ ]+) *(%d*)")
 567                 if not target_name then
 568                         local player_name = nil
 569                         player_name, seconds = string.match(param, "([^ ]+) *(%d*)")
 570                         if not player_name then
 571                                 minetest.chat_send_player(name, "Invalid parameters. See /help rollback and /help rollback_check")
 572                                 return
 573                         end
 574                         target_name = "player:"..player_name
 575                 end
 576                 seconds = tonumber(seconds) or 60
 577                 minetest.chat_send_player(name, "Reverting actions of "..
 578                                 target_name.." since "..seconds.." seconds.")
 579                 local success, log = minetest.rollback_revert_actions_by(
 580                                 target_name, seconds)
 581                 if #log > 100 then
 582                         minetest.chat_send_player(name, "(log is too long to show)")
 583                 else
 584                         for _, line in pairs(log) do
 585                                 minetest.chat_send_player(name, line)
 586                         end
 587                 end
 588                 if success then
 589                         minetest.chat_send_player(name, "Reverting actions succeeded.")
 590                 else
 591                         minetest.chat_send_player(name, "Reverting actions FAILED.")
 592                 end
 593         end,
 594 })
 595
 596 minetest.register_chatcommand("status", {
 597         params = "",
 598         description = "print server status line",
 599         privs = {},
 600         func = function(name, param)
 601                 minetest.chat_send_player(name, minetest.get_server_status())
 602         end,
 603 })
 604
 605 minetest.register_chatcommand("time", {
 606         params = "<0...24000>",
 607         description = "set time of day",
 608         privs = {settime=true},
 609         func = function(name, param)
 610                 if param == "" then
 611                         minetest.chat_send_player(name, "Missing parameter")
 612                         return
 613                 end
 614                 local newtime = tonumber(param)
 615                 if newtime == nil then
 616                         minetest.chat_send_player(name, "Invalid time")
 617                 else
 618                         minetest.set_timeofday((newtime % 24000) / 24000)
 619                         minetest.chat_send_player(name, "Time of day changed.")
 620                         minetest.log("action", name .. " sets time " .. newtime)
 621                 end
 622         end,
 623 })
 624
 625 minetest.register_chatcommand("shutdown", {
 626         params = "",
 627         description = "shutdown server",
 628         privs = {server=true},
 629         func = function(name, param)
 630                 minetest.log("action", name .. " shuts down server")
 631                 minetest.request_shutdown()
 632                 minetest.chat_send_all("*** Server shutting down (operator request).")
 633         end,
 634 })
 635
 636 minetest.register_chatcommand("ban", {
 637         params = "<name>",
 638         description = "ban IP of player",
 639         privs = {ban=true},
 640         func = function(name, param)
 641                 if param == "" then
 642                         minetest.chat_send_player(name, "Ban list: " .. minetest.get_ban_list())
 643                         return
 644                 end
 645                 if not minetest.get_player_by_name(param) then
 646                         minetest.chat_send_player(name, "No such player")
 647                         return
 648                 end
 649                 if not minetest.ban_player(param) then
 650                         minetest.chat_send_player(name, "Failed to ban player")
 651                 else
 652                         local desc = minetest.get_ban_description(param)
 653                         minetest.chat_send_player(name, "Banned " .. desc .. ".")
 654                         minetest.log("action", name .. " bans " .. desc .. ".")
 655                 end
 656         end,
 657 })
 658
 659 minetest.register_chatcommand("unban", {
 660         params = "<name/ip>",
 661         description = "remove IP ban",
 662         privs = {ban=true},
 663         func = function(name, param)
 664                 if not minetest.unban_player_or_ip(param) then
 665                         minetest.chat_send_player(name, "Failed to unban player/IP")
 666                 else
 667                         minetest.chat_send_player(name, "Unbanned " .. param)
 668                         minetest.log("action", name .. " unbans " .. param)
 669                 end
 670         end,
 671 })
 672
 673 minetest.register_chatcommand("clearobjects", {
 674         params = "",
 675         description = "clear all objects in world",
 676         privs = {server=true},
 677         func = function(name, param)
 678                 minetest.log("action", name .. " clears all objects")
 679                 minetest.chat_send_all("Clearing all objects.  This may take long.  You may experience a timeout.  (by " .. name .. ")")
 680                 minetest.clear_objects()
 681                 minetest.log("action", "object clearing done")
 682                 minetest.chat_send_all("*** Cleared all objects.")
 683         end,
 684 })
 685
 686 minetest.register_chatcommand("msg", {
 687         params = "<name> <message>",
 688         description = "Send a private message",
 689         privs = {shout=true},
 690         func = function(name, param)
 691                 local found, _, sendto, message = param:find("^([^%s]+)%s(.+)$")
 692                 if found then
 693                         if minetest.get_player_by_name(sendto) then
 694                                 minetest.log("action", "PM from "..name.." to "..sendto..": "..message)
 695                                 minetest.chat_send_player(sendto, "PM from "..name..": "..message, false)
 696                                 minetest.chat_send_player(name, "Message sent")
 697                         else
 698                                 minetest.chat_send_player(name, "The player "..sendto.." is not online")
 699                         end
 700                 else
 701                         minetest.chat_send_player(name, "Invalid usage, see /help msg")
 702                 end
 703         end,
 704 })