Changeset 3503

Timestamp:

03/15/10 11:59:43 (5 months ago)

Author:

trichards

Message:

Adding IRC services compatible with Hybrid IRC to mudbot.

Location:

Scripts/branches/0180_TM_ENHANCE_MUDBOT_QUESTING/Lua/experiments/mudbot

Files:

• bot.lua (modified) (4 diffs)
• irc.lua (modified) (5 diffs)
• logging.lua (modified) (2 diffs)
• services (added)
• services.lua (added)
• services/serverServ.lua (added)

Scripts/branches/0180_TM_ENHANCE_MUDBOT_QUESTING/Lua/experiments/mudbot/bot.lua

@@ -11 +11 @@
 function initBot(hostname, port, nickname, channel)
     local connection = irc.connect(hostname, port);
-    local nickname = nickname;
-    
+    bot.nickname = nickname;
+
     bot.connection = connection;
     bot.logDirectory = "logs/";
 
     function login()
-        connection.login(nickname)
+        connection.login(bot.nickname)
         return true
     end
@@ -39 +39 @@
             
             if first ~= nil then
-                if part1 == nickname then
+                if part1 == bot.nickname then
                     first, last, nick = string.find(connection.getCmd(1), "(.-)!")
                     if nick == nil then 
@@ -45 +45 @@
                     else
                         local channel = connection.getChannel();
-                        if channel == nickname then
+                        if channel == bot.nickname then
                             channel = nick;
                         end
@@ -61 +61 @@
                 
                 -- If this is a private message, assume that it's directed at the bot
-                if channel == nickname then
+                if channel == bot.nickname then
                     channel = nick;
                     handlePlayerCommand(connection, channel, nick, connection.getText());

Scripts/branches/0180_TM_ENHANCE_MUDBOT_QUESTING/Lua/experiments/mudbot/irc.lua

@@ -1 +1 @@
 local base = _G
 require "socket"
+require "mudbot.services"
 require "save"
 
@@ -16 +17 @@
 
     local send = function(text)
+        print("SEND: " .. text);
         c:send(text .. "\r\n")
     end
@@ -24 +26 @@
             if status == "closed" then 
                 return 
+            end
+            if (s ~= nil) then
+                print("RECV: " .. s);
             end
             coroutine.yield(s)
@@ -78 +83 @@
             -- Parse the string we got from the server
             if value ~= nil then
-                print(value)
 
                 local first, last, part1, part2 = string.find(value, "^:(.-):(.-)$")
@@ -112 +116 @@
                     doLog();
                 else
-                    -- Parse PING
+                    -- Parse Server commands
                     local words = {}
                     for w in string.gfind(value, "%S+") do
                         table.insert(words, w)
                     end
-
-                    if words[1] == "PING" then
-                        c:send("PONG :indiezen")
+                    
+                    command = ircServices["ServerServ"].commands[words[1]];
+                    
+                    if (command ~= nil) then
+                        command.handler(c, words);
                         print("PONG")
                                         else

Scripts/branches/0180_TM_ENHANCE_MUDBOT_QUESTING/Lua/experiments/mudbot/logging.lua

@@ -16 +16 @@
 local function logHandler()
     local text = bot.connection.getText();
-    print("Got message " .. text)
 
     -- Parse the message 
@@ -37 +36 @@
     end
     
-    print("first: " .. (first or ""));
-    print("last: " .. (last or ""));
-    print("nick: " .. (nick or ""));
+    --print("first: " .. (first or ""));
+    --print("last: " .. (last or ""));
+    --print("nick: " .. (nick or ""));
     
     -- Skip non-channel messages