Camas/mods/playerlist/init.lua

--
-- Playerlist mod
-- By Kaadmy, for Pixture
--

playerlist = {}

-- current players format:
-- {<playername> = <last connect(if connected, or nil)>}
playerlist.players = {}

local function divmod(f, d)
   return {math.floor(f / d), f % d}
end

local function prettytime(time)
   local a = divmod(time, 60)
   local seconds = a[2]
   local minutes = a[1]

   local b = divmod(minutes, 60)
   local hours = b[1]
   minutes = b[2]

   local c = divmod(hours, 24)
   local days = c[1]
   hours = c[2]

   local str = ""
   if days ~= 0 then str = str .. days .. "d " end
   if hours ~= 0 then str = str .. hours .. "h " end
   if minutes ~= 0 then str = str .. minutes .. "m " end
   str = str .. seconds .. "s"

   return str
end

local function on_joinplayer(player)
   local name = player:get_player_name()

   playerlist.players[name] = minetest.get_gametime()
end

local function on_leaveplayer(player)
   local name = player:get_player_name()

   playerlist.players[name] = minetest.get_gametime()
end

minetest.register_on_joinplayer(on_joinplayer)
minetest.register_on_leaveplayer(on_leaveplayer)

minetest.register_chatcommand(
   "plist",
   {
      params = "[all|recent]",
      description = "List players that are connected and have connected since the last server restart",
      func = function(player_name, param)
		local time = minetest.get_gametime()

		local str = ""

		if param == "all" then
		   minetest.chat_send_player(player_name, "Players:")
		elseif param == "recent" then
		   str = str .. "Recent players: "
		else
		   str = str .. "Connected players: "
		end

		local player_count = 0
		for name, jointime in pairs(playerlist.players) do
		   local plyr = minetest.get_player_by_name(name)

		   if param == "all" then
		      if plyr ~= nil then
			 player_count = player_count + 1
			 minetest.chat_send_player(player_name, "  " .. name .. ": connected for " .. prettytime(time - jointime))
		      else
			 minetest.chat_send_player(player_name, "  " .. name .. ": last seen " .. prettytime(time - jointime) .. " ago")
		      end
		   else
		      if param == "recent" then
			 if plyr == nil then
			    player_count = player_count + 1
			    str = str .. name .. ", "
			 end
		      elseif plyr ~= nil then
			 player_count = player_count + 1
			 str = str .. name .. ", "
		      end
		   end
		end

		minetest.chat_send_player(player_name, str)

		if param == "recent" then
		   minetest.chat_send_player(player_name, player_count .. " recent players")
		else
		   minetest.chat_send_player(player_name, player_count .. " connected players")
		end
	     end
   })

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