Changeset 98 for devel/www/chat/irc_bot.php

Timestamp:

Jul 31, 2008, 4:13:02 PM (16 years ago)

Author:

george

Message:

• Přidáno: Podpora pro IRC chat. IRC bot pro sledování historie a ukládání zpráv do databáze.

File:

• devel/www/chat/irc_bot.php (modified) (5 diffs)

devel/www/chat/irc_bot.php

@@ -1 +1 @@
 <?php
 
-// PHP IRC bot
-// Based on HARVESTER IRC BOT by Harvie
+include('../global.php');
 
 class IRCBot
@@ -10 +9 @@
   var $Port = 6667;
   var $Channel = "#zdechov";
-  var $Nick = "BigBrother";
+  var $Nick = "History";
   var $JokeFileName = "jokes.txt";
   var $File;
@@ -42 +41 @@
   function Run()
   {
+    global $Database;
+
     while(!fwrite($this->File, ''))
     {
@@ -70 +71 @@
       }
 
+      // Log messages to database
+      if(strpos($Line, 'PRIVMSG') !== false)
+      {
+        $LineParts = explode(':', $Line);
+        $Text = $LineParts[2];
+        $LineParts2 = explode(' ', $LineParts[1]);
+        $LineParts3 = explode('@', $LineParts2[0]);
+        $Host = $LineParts3[1];
+        $LineParts4 = explode('!', $LineParts3[0]);
+        $Nick = $LineParts4[0];
+        $Database->insert('ChatHistory', array('Nick' => $Nick, 'Text' => $Text, 'Host' => $Host, 'Time' => 'NOW()', 'RoomName' => 'Všichni'));
+      }
+
       $Commands = explode(':', $Line);
       foreach($Commands as $Index => $Item)
@@ -90 +104 @@
           $this->Say('Ja jsem Harvester.');
           /*
-          irc_say( $sfp, "Harvester - Posle vizitku", $nick, $channel );
+          irc_say( $sfp, "Bot - Posle vizitku", $nick, $channel );
           irc_say( $sfp, "hhelp - vypise tuto napovedu", $nick, $channel );
           irc_say( $sfp, "hsay:Message - Posle zpravu", $nick, $channel );