From b8879ee4f79825ce40e559241ba83574c823c021 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Diego=20Mart=C3=ADnez?= <kaeza@users.sf.net>
Date: Wed, 26 Dec 2012 23:20:29 -0200
Subject: [PATCH] Fix

---
 src/.callback.lua.marks |  1 +
 src/botcmds.lua         | 67 +++++++++++++++++++++++++++++++++++++++++
 2 files changed, 68 insertions(+)
 create mode 100644 src/.callback.lua.marks
 create mode 100644 src/botcmds.lua

diff --git a/src/.callback.lua.marks b/src/.callback.lua.marks
new file mode 100644
index 0000000..53b5786
--- /dev/null
+++ b/src/.callback.lua.marks
@@ -0,0 +1 @@
+!_;915;915
diff --git a/src/botcmds.lua b/src/botcmds.lua
new file mode 100644
index 0000000..c8e17ef
--- /dev/null
+++ b/src/botcmds.lua
@@ -0,0 +1,67 @@
+
+mt_irc.bot_commands = { };
+
+mt_irc.bot_help = function ( from, cmdname )
+    local cmd = mt_irc.bot_commands[cmdname];
+    if (not cmd) then
+        irc.say(from, "Unknown command `"..cmdname.."'");
+    end
+    local usage = "Usage: !"..cmdname;
+    if (cmd.params) then usage = usage.." "..cmd.params; end
+    irc.say(from, usage);
+    if (cmd.description) then irc.say(from, "    "..cmd.description); end
+end
+
+mt_irc.register_bot_command = function ( name, def )
+    if ((not def.func) or (type(def.func) ~= "function")) then
+        error("Wrong bot command definition", 2);
+    end
+    mt_irc.bot_commands[name] = def;
+end
+
+mt_irc.register_bot_command("help", {
+    func = function ( from, args )
+        if (args ~= "") then
+            mt_irc.bot_help(from, args);
+        else
+            local cmdlist = "Available commands:";
+            for name,cmd in pairs(mt_irc.bot_commands) do
+                cmdlist = cmdlist.." "..name;
+            end
+            irc.say(from, cmdlist);
+            irc.say(from, "Use `!help <command name>' to get help about a specific command.");
+        end
+    end;
+});
+
+mt_irc.register_bot_command("who", {
+    func = function ( from, args )
+        local s = "";
+        for k, v in pairs(mt_irc.connected_players) do
+            if (v) then
+                s = s.." "..k;
+            end
+        end
+        irc.say(from, "Players On Channel:"..s);
+    end;
+});
+
+mt_irc.register_bot_command("whereis", {
+    
+    func = function ( from, args )
+        if (args == "") then
+            mt_irc.bot_help(from, "whereis");
+            return;
+        end
+        local list = minetest.env:get_objects_inside_radius({x=0,y=0,z=0}, 100000);
+        for _, obj in ipairs(list) do
+            if (obj:is_player() and (obj:get_player_name() == args)) then
+                local fmt = "Player %s is at (%.2f,%.2f,%.2f)";
+                local pos = obj:getpos();
+                irc.say(from, fmt:format(args, pos.x, pos.y, pos.z));
+                return;
+            end
+        end
+        irc.say(from, "There's No player named `"..args.."'");
+    end;
+});