Camas/mods/pm/init.lua

--
-- Private messages mod
-- By Kaadmy, for Pixture
--
local S = minetest.get_translator("pm")

local enable_saving = minetest.settings:get_bool("pm_enable_saving")
if enable_saving == nil then enable_saving = true end
if minetest.is_singleplayer() then
   enable_saving = false
end

local messages = {}

minetest.register_chatcommand(
   "pm",
   {
      params = S("<player> <message>"),
      description = S("Send somebody a private message"),
      privs = {shout=true},
      func = function(name, param)
         local sendto, message = param:match("^(%S+)%s(.+)$")

         if not sendto then return false, S("Invalid usage, see /help pm.") end

         if not minetest.get_player_by_name(sendto) then
            if enable_saving then
               if messages[sendto] == nil then messages[sendto] = {} end
               table.insert(messages[sendto], name .. ": " .. message)

               return false, S("The player @1 is not online, saving message instead.", sendto)
            else
               return false, S("The player @1 is not online, and PM saving is disabled.", sendto)
            end
         end

         minetest.log("action", "PM from " .. name .. " to " .. sendto
                         .. ": " .. message)
         minetest.chat_send_player(sendto, S("PM from @1: @2", name, message))
         return true, S("PM sent.")
      end
})

minetest.register_chatcommand(
   "pms",
   {
      description = S("Show saved private messages"),
      func = function(name, param)
         if not enable_saving then return false, S("PM saving is disabled.") end
         if messages[name] == nil then return false, S("No saved PMs.") end

         minetest.chat_send_player(name, S("Saved PMs:"))

         local str = ""
         local amt_pms = 0
         for _, msg in pairs(messages[name]) do
            amt_pms = amt_pms + 1
            str = str .. "  " .. msg .. "\n"
         end

         minetest.chat_send_player(name, str)

         messages[name] = nil

         return true, S("@1 saved PMs", amt_pms)
      end
})

if enable_saving then
   minetest.register_on_joinplayer(
      function(player)
	 local name = player:get_player_name()

         if messages[name] ~= nil and #messages[name] >= 1 then
            minetest.chat_send_player(name, minetest.colorize("#0ff", S("Number of saved PMs: @1. Enter /pms command to view.", #messages[name])))
            return false
         else
            minetest.chat_send_player(name, minetest.colorize("#0ff", S("You have no saved PMs. Send PMs with the /pm command.")))
            return true
         end
   end)
end

default.log("mod:pm", "loaded")