gnu-social/plugins/Aim/extlib/phptoclib/aimclassw.php

2371 lines
54 KiB
PHP
Executable File

<?php
/*
* PHPTOCLIB: A library for AIM connectivity through PHP using the TOC protocal.
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
* License as published by the Free Software Foundation; either
* version 2.1 of the License, or (at your option) any later version.
*
* This library is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with this library; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*
*/
/**
* The version of PHPTOCLIB we are running right now
*
* @access private
* @var int
*/
define("PHPTOCLIB_VERSION","1.0.0 RC1");
// Prevents Script from Timing Out
//set_time_limit(0);
// Constant Declarations
/**
* Maximum size for a direct connection IM in bytes
*
* @access private
* @var int
*/
define("MAX_DIM_SIZE",3072); //Default to 3kb
/**
* Internally used for message type
*
* @access private
* @var int
*/
define("AIM_TYPE_WARN",74);
/**
* Internally used for message type
*
* @access private
* @var int
*/
define("AIM_TYPE_MSG",75);
/**
* Internally used for message type
*
* @access private
* @var int
*/
define("AIM_TYPE_UPDATEBUDDY",76);
/**
* Internally used for message type
*
* @access private
* @var int
*/
define("AIM_TYPE_SIGNON",77);
/**
* Internally used for message type
*
* @access private
* @var int
*/
define("AIM_TYPE_NICK",78);
/**
* Internally used for message type
*
* @access private
* @var int
*/
define("AIM_TYPE_ERROR",79);
/**
* Internally used for message type
*
* @access private
* @var int
*/
define("AIM_TYPE_CHATJ",80);
/**
* Internally used for message type
*
* @access private
* @var int
*/
define("AIM_TYPE_CHATI",81);
/**
* Internally used for message type
*
* @access private
* @var int
*/
define("AIM_TYPE_CHATUPDBUD",82);
/**
* Internally used for message type
*
* @access private
* @var int
*/
define("AIM_TYPE_CHATINV",83);
/**
* Internally used for message type
*
* @access private
* @var int
*/
define("AIM_TYPE_CHATLE",84);
/**
* Internally used for message type
*
* @access private
* @var int
*/
define("AIM_TYPE_URL",85);
/**
* Internally used for message type
*
* @access private
* @var int
*/
define("AIM_TYPE_NICKSTAT",86);
/**
* Internally used for message type
*
* @access private
* @var int
*/
define("AIM_TYPE_PASSSTAT",87);
/**
* Internally used for message type
*
* @access private
* @var int
*/
define("AIM_TYPE_RVOUSP",88);
/**
* Internally used for message type
*
* @access private
* @var int
*/
define("AIM_TYPE_NOT_IMPLEMENTED",666);
/**
* Internally used for connection type
*
* Internal type for a normal connection
*
* @access private
* @var int
*/
define("CONN_TYPE_NORMAL",1);
/**
* Internally used for connection type
*
* Internal type of a Dirct Connection
*
* @access private
* @var int
*/
define("CONN_TYPE_DC",2);
/**
* Internally used for connection type
*
*Internal type for a file transfer connection
*
* @access private
* @var int
*/
define("CONN_TYPE_FT",3);
/**
* Internally used for connection type
*
*Internal type for a file get connection
*
* @access private
* @var int
*/
define("CONN_TYPE_FTG",4);
/**
* Maximum size for a TOC packet
*
* @access private
* @var int
*/
define("MAX_PACKLENGTH",2048);
/**
* TOC packet type
*
* @access private
* @var int
*/
define("SFLAP_TYPE_SIGNON",1);
/**
* TOC packet type
*
* @access private
* @var int
*/
define("SFLAP_TYPE_DATA",2);
/**
* TOC packet type
*
* @access private
* @var int
*/
define("SFLAP_TYPE_ERROR",3);
/**
* TOC packet type
*
* @access private
* @var int
*/
define("SFLAP_TYPE_SIGNOFF",4);
/**
* TOC packet type
*
* @access private
* @var int
*/
define("SFLAP_TYPE_KEEPALIVE",5);
/**
* TOC packet type
*
* @access private
* @var int
*/
define("SFLAP_MAX_LENGTH",1024);
/**
* Service UID for a voice connection
*
* @access private
* @var int
*/
define('VOICE_UID', '09461341-4C7F-11D1-8222-444553540000');
/**
* Service UID for file sending
*
* @access private
* @var int
*/
define('FILE_SEND_UID', '09461343-4C7F-11D1-8222-444553540000');
/**
* Service UID for file getting
*
* @access private
* @var int
*/
define('FILE_GET_UID', '09461348-4C7F-11D1-8222-444553540000');
/**
* Service UID for Direct connections
*
* @access private
* @var int
*/
define('IMAGE_UID', '09461345-4C7F-11D1-8222-444553540000');
/**
* Service UID for Buddy Icons
*
* @access private
* @var int
*/
define('BUDDY_ICON_UID', '09461346-4C7F-11D1-8222-444553540000');
/**
* Service UID for stocks
*
* @access private
* @var int
*/
define('STOCKS_UID', '09461347-4C7F-11D1-8222-444553540000');
/**
* Service UID for games
*
* @access private
* @var int
*/
define('GAMES_UID', '0946134a-4C7F-11D1-8222-444553540000');
/**
* FLAP return code
*
* @access private
* @var int
*/
define("SFLAP_SUCCESS",0);
/**
* FLAP return code
*
* @access private
* @var int
*/
define("SFLAP_ERR_UNKNOWN",1);
/**
* FLAP return code
*
* @access private
* @var int
*/
define("SFLAP_ERR_ARGS",2);
/**
* FLAP return code
*
* @access private
* @var int
*/
define("SFLAP_ERR_LENGTH",3);
/**
* FLAP return code
*
* @access private
* @var int
*/
define("SFLAP_ERR_READ",4);
/**
* FLAP return code
*
* @access private
* @var int
*/
define("SFLAP_ERR_SEND",5);
/**
* FLAP version number
*
* @access private
* @var int
*/
define("SFLAP_FLAP_VERSION",1);
/**
* FLAP TLV code
*
* @access private
* @var int
*/
define("SFLAP_TLV_TAG",1);
/**
* Bytes in a FLAP header
*
* @access private
* @var int
*/
define("SFLAP_HEADER_LEN",6);
/**
* PHPTocLib AIM Class
*
* @author Jeremy Bryant <pickleman78@users.sourceforge.net>
* @author Rajiv Makhijani <rajiv@blue-tech.org>
* @package phptoclib
* @version 1.0RC1
* @copyright 2005
* @access public
*
*/
class Aim
{
/**
* AIM ScreenName
*
* @var String
* @access private
*/
var $myScreenName;
/**
* AIM Password (Plain Text)
*
* @var String
* @access private
*/
var $myPassword;
/**
* AIM TOC Server
*
* @var String
* @access public
*/
var $myServer="toc.oscar.aol.com";
/**
* AIM Formatted ScreenName
*
* @var String
* @access private
*/
var $myFormatSN;
/**
* AIM TOC Server Port
*
* @var String
* @access public
*/
var $myPort="5190";
/**
* Profile Data
* Use setProfile() to update
*
* @var String
* @access private
*/
var $myProfile="Powered by phpTOCLib. Please visit http://sourceforge.net/projects/phptoclib for more information"; //The profile of the bot
/**
* Socket Connection Resource ID
*
* @var Resource
* @access private
*/
var $myConnection; //Connection resource ID
/**
* Roasted AIM Password
*
* @var String
* @access private
*/
var $myRoastedPass;
/**
* Last Message Recieved From Server
*
* @var String
* @access private
*/
var $myLastReceived;
/**
* Current Seq Number Used to Communicate with Server
*
* @var Integer
* @access private
*/
var $mySeqNum;
/**
* Current Warning Level
* Getter: getWarning()
* Setter: setWarning()
*
* @var Integer
* @access private
*/
var $myWarnLevel; //Warning Level of the bot
/**
* Auth Code
*
* @var Integer
* @access private
*/
var $myAuthCode;
/**
* Buddies
* Getter: getBuddies()
*
* @var Array
* @access private
*/
var $myBuddyList;
/**
* Blocked Buddies
* Getter: getBlocked()
*
* @var Array
* @access private
*/
var $myBlockedList;
/**
* Permited Buddies
* Getter: getBlocked()
*
* @var Array
* @access private
*/
var $myPermitList;
/**
* Permit/Deny Mode
* 1 - Allow All
* 2 - Deny All
* 3 - Permit only those on your permit list
* 4 - Permit all those not on your deny list
*
* @var Integer
* @access private
*/
var $myPdMode;
//Below variables added 4-29 by Jeremy: Implementing chat
/**
* Contains Chat Room Info
* $myChatRooms['roomid'] = people in room
*
* @var Array
* @access private
*/
var $myChatRooms;
//End of chat implementation
/**
* Event Handler Functions
*
* @var Array
* @access private
*/
var $myEventHandlers = array();
/**
* Array of direct connection objects(including file transfers)
*
* @var Array
* @access private
*/
var $myDirectConnections = array();
/**
* Array of the actual connections
*
* @var Array
* @access private
*/
var $myConnections = array();
/**
* The current state of logging
*
* @var Boolean
* @access private
*/
var $myLogging = false;
/**
* Constructor
*
* Permit/Deny Mode Options
* 1 - Allow All
* 2 - Deny All
* 3 - Permit only those on your permit list
* 4 - Permit all those not on your deny list
*
* @param String $sn AIM Screenname
* @param String $password AIM Password
* @param Integer $pdmode Permit/Deny Mode
* @access public
*/
function Aim($sn, $password, $pdmode)
{
//Constructor assignment
$this->myScreenName = $this->normalize($sn);
$this->myPassword = $password;
$this->myRoastedPass = $this->roastPass($password);
$this->mySeqNum = 1;
$this->myConnection = 0;
$this->myWarnLevel = 0;
$this->myAuthCode = $this->makeCode();
$this->myPdMode = $pdmode;
$this->myFormatSN = $this->myScreenName;
$this->log("PHPTOCLIB v" . PHPTOCLIB_VERSION . " Object Created");
}
/**
* Enables debug logging (Logging is disabled by default)
*
*
* @access public
* @return void
*/
function setLogging($enable)
{
$this->myLogging=$enable;
}
function log($data)
{
if($this->myLogging){
error_log($data);
}
}
/**
* Logs a packet
*
*
* @access private
* @param Array $packary Packet
* @param String $in Prepend
* @return void
*/
function logPacket($packary,$in)
{
if(!$this->myLogging || sizeof($packary)<=0 || (@strlen($packary['decoded'])<=0 && @isset($packary['decoded'])))
return;
$towrite=$in . ": ";
foreach($packary as $k=>$d)
{
$towrite.=$k . ":" . $d . "\r\n";
}
$towrite.="\r\n\r\n";
$this->log($towrite);
}
/**
* Roasts/Hashes Password
*
* @param String $password Password
* @access private
* @return String Roasted Password
*/
function roastPass($password)
{
$roaststring = 'Tic/Toc';
$roasted_password = '0x';
for ($i = 0; $i < strlen($password); $i++)
$roasted_password .= bin2hex($password[$i] ^ $roaststring[($i % 7)]);
return $roasted_password;
}
/**
* Access Method for myScreenName
*
* @access public
* @param $formated Returns formatted Screenname if true as returned by server
* @return String Screenname
*/
function getMyScreenName($formated = false)
{
if ($formated)
{
return $this->myFormatSN;
}
else
{
return $this->normalize($this->myScreenName);
}
}
/**
* Generated Authorization Code
*
* @access private
* @return Integer Auth Code
*/
function makeCode()
{
$sn = ord($this->myScreenName[0]) - 96;
$pw = ord($this->myPassword[0]) - 96;
$a = $sn * 7696 + 738816;
$b = $sn * 746512;
$c = $pw * $a;
return $c - $a + $b + 71665152;
}
/**
* Reads from Socket
*
* @access private
* @return String Data
*/
function sflapRead()
{
if ($this->socketcheck($this->myConnection))
{
$this->log("Disconnected.... Reconnecting in 60 seconds");
sleep(60);
$this->signon();
}
$header = fread($this->myConnection,SFLAP_HEADER_LEN);
if (strlen($header) == 0)
{
$this->myLastReceived = "";
return "";
}
$header_data = unpack("aast/Ctype/nseq/ndlen", $header);
$this->log(" . ", false);
$packet = fread($this->myConnection, $header_data['dlen']);
if (strlen($packet) <= 0 && $sockinfo['blocked'])
$this->derror("Could not read data");
if ($header_data['type'] == SFLAP_TYPE_SIGNON)
{
$packet_data=unpack("Ndecoded", $packet);
}
if ($header_data['type'] == SFLAP_TYPE_KEEPALIVE)
{
$this->myLastReceived = '';
return 0;
}
else if (strlen($packet)>0)
{
$packet_data = unpack("a*decoded", $packet);
}
$this->log("socketcheck check now");
if ($this->socketcheck($this->myConnection))
{
$this->derror("Connection ended unexpectedly");
}
$data = array_merge($header_data, $packet_data);
$this->myLastReceived = $data;
$this->logPacket($data,"in");
return $data;
}
/**
* Sends Data on Socket
*
* @param String $sflap_type Type
* @param String $sflap_data Data
* @param boolean $no_null No Null
* @param boolean $formatted Format
* @access private
* @return String Roasted Password
*/
function sflapSend($sflap_type, $sflap_data, $no_null, $formatted)
{
$packet = "";
if (strlen($sflap_data) >= MAX_PACKLENGTH)
$sflap_data = substr($sflap_data,0,MAX_PACKLENGTH);
if ($formatted)
{
$len = strlen($sflap_len);
$sflap_header = pack("aCnn",'*', $sflap_type, $this->mySeqNum, $len);
$packet = $sflap_header . $sflap_data;
} else {
if (!$no_null)
{
$sflap_data = str_replace("\0","", trim($sflap_data));
$sflap_data .= "\0";
}
$data = pack("a*", $sflap_data);
$len = strlen($sflap_data);
$header = pack("aCnn","*", $sflap_type, $this->mySeqNum, $len);
$packet = $header . $data;
}
//Make sure we are still connected
if ($this->socketcheck($this->myConnection))
{
$this->log("Disconnected.... reconnecting in 60 seconds");
sleep(60);
$this->signon();
}
$sent = fputs($this->myConnection, $packet) or $this->derror("Error sending packet to AIM");
$this->mySeqNum++;
sleep(ceil($this->myWarnLevel/10));
$this->logPacket(array($sflap_type,$sflap_data),"out");
}
/**
* Escape the thing that TOC doesn't like,that would be
* ",', $,{,},[,]
*
* @param String $data Data to Escape
* @see decodeData
* @access private
* @return String $data Escaped Data
*/
function encodeData($data)
{
$data = str_replace('"','\"', $data);
$data = str_replace('$','\$', $data);
$data = str_replace("'","\'", $data);
$data = str_replace('{','\{', $data);
$data = str_replace('}','\}', $data);
$data = str_replace('[','\[', $data);
$data = str_replace(']','\]', $data);
return $data;
}
/**
* Unescape data TOC has escaped
* ",', $,{,},[,]
*
* @param String $data Data to Unescape
* @see encodeData
* @access private
* @return String $data Unescape Data
*/
function decodeData($data)
{
$data = str_replace('\"','"', $data);
$data = str_replace('\$','$', $data);
$data = str_replace("\'","'", $data);
$data = str_replace('\{','{', $data);
$data = str_replace('\}','}', $data);
$data = str_replace('\[','[', $data);
$data = str_replace('\]',']', $data);
$data = str_replace('&quot;','"', $data);
$data = str_replace('&amp;','&', $data);
return $data;
}
/**
* Normalize ScreenName
* no spaces and all lowercase
*
* @param String $nick ScreenName
* @access public
* @return String $nick Normalized ScreenName
*/
function normalize($nick)
{
$nick = str_replace(" ","", $nick);
$nick = strtolower($nick);
return $nick;
}
/**
* Sets internal info with update buddy
* Currently only sets warning level
*
* @access public
* @return void
*/
function setMyInfo()
{
//Sets internal values bvase on the update buddy command
$this->log("Setting my warning level ...");
$this->sflapSend(SFLAP_TYPE_DATA,"toc_get_status " . $this->normalize($this->myScreenName),0,0);
//The rest of this will now be handled by the other functions. It is assumed
//that we may have other data queued in the socket, do we should just add this
//message to the queue instead of trying to set it in here
}
/**
* Connects to AIM and Signs On Using Info Provided in Constructor
*
* @access public
* @return void
*/
function signon()
{
$this->log("Ready to sign on to the server");
$this->myConnection = fsockopen($this->myServer, $this->myPort, $errno, $errstr,10) or die("$errorno:$errstr");
$this->log("Connected to server");
$this->mySeqNum = (time() % 65536); //Select an arbitrary starting point for
//sequence numbers
if (!$this->myConnection)
$this->derror("Error connecting to toc.oscar.aol.com");
$this->log("Connected to AOL");
//Send the flapon packet
fputs($this->myConnection,"FLAPON\r\n\n\0"); //send the initial handshake
$this->log("Sent flapon");
$this->sflapRead(); //Make sure the server responds with what we expect
if (!$this->myLastReceived)
$this->derror("Error sending the initialization string");
//send the FLAP SIGNON packet back with what it needs
//There are 2 parts to the signon packet. They are sent in succession, there
//is no indication if either packet was correctly sent
$signon_packet = pack("Nnna".strlen($this->myScreenName),1,1,strlen($this->myScreenName), $this->myScreenName);
$this->sflapSend(SFLAP_TYPE_SIGNON, $signon_packet,1,0);
$this->log("sent signon packet part one");
$signon_packet_part2 = 'toc2_signon login.oscar.aol.com 29999 ' . $this->myScreenName . ' ' . $this->myRoastedPass . ' english-US "TIC:TOC2:REVISION" 160 ' . $this->myAuthCode;
$this->log($signon_packet_part2 . "");
$this->sflapSend(SFLAP_TYPE_DATA, $signon_packet_part2,0,0);
$this->log("Sent signon packet part 2... Awaiting response...");
$this->sflapRead();
$this->log("Received Sign on packet, beginning initilization...");
$message = $this->getLastReceived();
$this->log($message . "\n");
if (strstr($message,"ERROR:"))
{
$this->onError($message);
die("Fatal signon error");
}
stream_set_timeout($this->myConnection,2);
//The information sent before the config2 command is utterly useless to us
//So we will just skim through them until we reach it
//Add the first entry to the connection array
$this->myConnections[] = $this->myConnection;
//UPDATED 4/12/03: Now this will use the receive function and send the
//received messaged to the assigned handlers. This is where the signon
//method has no more use
$this->log("Done with signon proccess");
//socket_set_blocking($this->myConnection,false);
}
/**
* Sends Instant Message
*
* @param String $to Message Recipient SN
* @param String $message Message to Send
* @param boolean $auto Sent as Auto Response / Away Message Style
* @access public
* @return void
*/
function sendIM($to, $message, $auto = false)
{
if ($auto) $auto = "auto";
else $auto = "";
$to = $this->normalize($to);
$message = $this->encodeData($message);
$command = 'toc2_send_im "' . $to . '" "' . $message . '" ' . $auto;
$this->sflapSend(SFLAP_TYPE_DATA, trim($command),0,0);
$cleanedmessage = str_replace("<br>", " ", $this->decodeData($message));
$cleanedmessage = strip_tags($cleanedmessage);
$this->log("TO - " . $to . " : " . $cleanedmessage);
}
/**
* Set Away Message
*
* @param String $message Away message (some HTML supported).
* Use null to remove the away message
* @access public
* @return void
*/
function setAway($message)
{
$message = $this->encodeData($message);
$command = 'toc_set_away "' . $message . '"';
$this->sflapSend(SFLAP_TYPE_DATA, trim($command),0,0);
$this->log("SET AWAY MESSAGE - " . $this->decodeData($message));
}
/**
* Fills Buddy List
* Not implemented fully yet
*
* @access public
* @return void
*/
function setBuddyList()
{
//This better be the right message
$message = $this->myLastReceived['decoded'];
if (strpos($message,"CONFIG2:") === false)
{
$this->log("setBuddyList cannot be called at this time because I got $message");
return false;
}
$people = explode("\n",trim($message,"\n"));
//The first 3 elements of the array are who knows what, element 3 should be
//a letter followed by a person
for($i = 1; $i<sizeof($people); $i++)
{
@list($mode, $name) = explode(":", $people[$i]);
switch($mode)
{
case 'p':
$this->myPermitList[] = $name;
break;
case 'd':
$this->myBlockedList[] = $name;
break;
case 'b':
$this->myBuddyList[] = $name;
break;
case 'done':
break;
default:
//
}
}
}
/**
* Adds buddy to Permit list
*
* @param String $buddy Buddy's Screenname
* @access public
* @return void
*/
function addPermit($buddy)
{
$this->sflapSend(SFLAP_TYPE_DATA,"toc2_add_permit " . $this->normalize($buddy),0,0);
$this->myPermitList[] = $this->normalize($buddy);
return 1;
}
/**
* Blocks buddy
*
* @param String $buddy Buddy's Screenname
* @access public
* @return void
*/
function blockBuddy($buddy)
{
$this->sflapSend(SFLAP_TYPE_DATA,"toc2_add_deny " . $this->normalize($buddy),0,0);
$this->myBlockedList[] = $this->normalize($buddy);
return 1;
}
/**
* Returns last message received from server
*
* @access private
* @return String Last Message from Server
*/
function getLastReceived()
{
if (@$instuff = $this->myLastReceived['decoded']){
return $this->myLastReceived['decoded'];
}else{
return;
}
}
/**
* Returns Buddy List
*
* @access public
* @return array Buddy List
*/
function getBuddies()
{
return $this->myBuddyList;
}
/**
* Returns Permit List
*
* @access public
* @return array Permit List
*/
function getPermit()
{
return $this->myPermitList;
}
/**
* Returns Blocked Buddies
*
* @access public
* @return array Blocked List
*/
function getBlocked()
{
return $this->myBlockedList;
}
/**
* Reads and returns data from server
*
* This is a wrapper for $Aim->sflap_read(), and only returns the $this->myLastReceived['data']
* portion of the message. It is preferred that you do not call $Aim->sflap_read() and use this
* function instead. This function has a return value. Calling this prevents the need to call
* $Aim->getLastReceived()
*
* @access public
* @return String Data recieved from server
*/
function read_from_aim()
{
$this->sflapRead();
$returnme = $this->getLastReceived();
return $returnme;
}
/**
* Sets current internal warning level
*
* This allows you to update the bots warning level when warned.
*
* @param int Warning Level %
* @access private
* @return void
*/
function setWarningLevel($warnlevel)
{
$this->myWarnLevel = $warnlevel;
}
/**
* Warns / "Evils" a User
*
* To successfully warn another user they must have sent you a message.
* There is a limit on how much and how often you can warn another user.
* Normally when you warn another user they are aware who warned them,
* however there is the option to warn anonymously. When warning anon.
* note that the warning is less severe.
*
* @param String $to Screenname to warn
* @param boolean $anon Warn's anonymously if true. (default = false)
* @access public
* @return void
*/
function warnUser($to, $anon = false)
{
if (!$anon)
$anon = '"norm"';
else
$anon = '"anon"';
$this->sflapSend(SFLAP_TYPE_DATA,"toc_evil " . $this->normalize($to) . " $anon",0,0);
}
/**
* Returns warning level of bot
*
* @access public
* @return void
*/
function getWarningLevel()
{
return $this->myWarningLevel;
}
/**
* Sets bot's profile/info
*
* Limited to 1024 bytes.
*
* @param String $profiledata Profile Data (Can contain limited html: br,hr,font,b,i,u etc)
* @param boolean $poweredby If true, appends link to phpTOCLib project to profile
* @access public
* @return void
*/
function setProfile($profiledata, $poweredby = false)
{
if ($poweredby == false){
$this->myProfile = $profiledata;
}else{
$this->myProfile = $profiledata . "<font size=1 face=tahoma><br><br>Powered by phpTOCLib<br>http://sourceforge.net/projects/phptoclib</font>";
}
$this->sflapSend(SFLAP_TYPE_DATA,"toc_set_info \"" . $this->encodeData($this->myProfile) . "\"",0,0);
$this->setMyInfo();
$this->log("Profile has been updated...");
}
//6/29/04 by Jeremy:
//Added mthod to accept a rvous,decline it, and
//read from the rvous socket
//Decline
/**
* Declines a direct connection request (rvous)
*
* @param String $nick ScreenName request was from
* @param String $cookie Request cookie (from server)
* @param String $uuid UUID
*
* @access public
* @return void
*/
function declineRvous($nick, $cookie, $uuid)
{
$nick = $this->normalize($nick);
$this->sflapSend(SFLAP_TYPE_DATA,"toc_rvous_cancel $nick $cookie $uuid",0,0);
}
/**
* Accepts a direct connection request (rvous)
*
* @param String $nick ScreenName request was from
* @param String $cookie Request cookie (from server)
* @param String $uuid UUID
* @param String $vip IP of User DC with
* @param int $port Port number to connect to
*
* @access public
* @return void
*/
function acceptRvous($nick, $cookie, $uuid, $vip, $port)
{
$this->sflapSend(SFLAP_TYPE_DATA,"toc_rvous_accept $nick $cookie $uuid",0,0);
//Now open the connection to that user
if ($uuid == IMAGE_UID)
{
$dcon = new Dconnect($vip, $port);
}
else if ($uuid == FILE_SEND_UID)
{
$dcon = new FileSendConnect($vip, $port);
}
if (!$dcon->connected)
{
$this->log("The connection failed");
return false;
}
//Place this dcon object inside the array
$this->myDirectConnections[] = $dcon;
//Place the socket in an array to
$this->myConnections[] = $dcon->sock;
//Get rid of the first packet because its worthless
//and confusing
$dcon->readDIM();
//Assign the cookie
$dcon->cookie = $dcon->lastReceived['cookie'];
$dcon->connectedTo = $this->normalize($nick);
return $dcon;
}
/**
* Sends a Message over a Direct Connection
*
* Only works if a direct connection is already established with user
*
* @param String $to Message Recipient SN
* @param String $message Message to Send
*
* @access public
* @return void
*/
function sendDim($to, $message)
{
//Find the connection
for($i = 0;$i<sizeof($this->myDirectConnections);$i++)
{
if ($this->normalize($to) == $this->myDirectConnections[$i]->connectedTo && $this->myDirectConnections[$i]->type == CONN_TYPE_DC)
{
$dcon = $this->myDirectConnections[$i];
break;
}
}
if (!$dcon)
{
$this->log("Could not find a direct connection to $to");
return false;
}
$dcon->sendMessage($message, $this->normalize($this->myScreenName));
return true;
}
/**
* Closes an established Direct Connection
*
* @param DConnect $dcon Direct Connection Object to Close
*
* @access public
* @return void
*/
function closeDcon($dcon)
{
$nary = array();
for($i = 0;$i<sizeof($this->myConnections);$i++)
{
if ($dcon->sock == $this->myConnections[$i])
unset($this->myConnections[$i]);
}
$this->myConnections = array_values($this->myConnections);
unset($nary);
$nary2 = array();
for($i = 0;$i<sizeof($this->myDirectConnections);$i++)
{
if ($dcon == $this->myDirectConnections[$i])
unset($this->myDirectConnections[$i]);
}
$this->myDirectConnections = array_values($this->myDirectConnections);
$dcon->close();
unset($dcon);
}
//Added 4/29/04 by Jeremy:
//Various chat related methods
/**
* Accepts a Chat Room Invitation (Joins room)
*
* @param String $chatid ID of Chat Room
*
* @access public
* @return void
*/
function joinChat($chatid)
{
$this->sflapSend(SFLAP_TYPE_DATA,"toc_chat_accept " . $chatid,0,0);
}
/**
* Leaves a chat room
*
* @param String $chatid ID of Chat Room
*
* @access public
* @return void
*/
function leaveChat($chatid)
{
$this->sflapSend(SFLAP_TYPE_DATA,"toc_chat_leave " . $chatid,0,0);
}
/**
* Sends a message in a chat room
*
* @param String $chatid ID of Chat Room
* @param String $message Message to send
*
* @access public
* @return void
*/
function chatSay($chatid, $message)
{
$this->sflapSend(SFLAP_TYPE_DATA,"toc_chat_send " . $chatid . " \"" . $this->encodeData($message) . "\"",0,0);
}
/**
* Invites a user to a chat room
*
* @param String $chatid ID of Chat Room
* @param String $who Screenname of user
* @param String $message Note to include with invitiation
*
* @access public
* @return void
*/
function chatInvite($chatid, $who, $message)
{
$who = $this->normalize($who);
$this->sflapSend(SFLAP_TYPE_DATA,"toc_chat_invite " . $chatid . " \"" . $this->encodeData($message) . "\" " . $who,0,0);
}
/**
* Joins/Creates a new chat room
*
* @param String $name Name of the new chat room
* @param String $exchange Exchange of new chat room
*
* @access public
* @return void
*/
function joinNewChat($name, $exchange)
{
//Creates a new chat
$this->sflapSend(SFLAP_TYPE_DATA,"toc_chat_join " . $exchange . " \"" . $name . "\"",0,0);
}
/**
* Disconnect error handler, attempts to reconnect in 60 seconds
*
* @param String $message Error message (desc of where error encountered etc)
*
* @access private
* @return void
*/
function derror($message)
{
$this->log($message);
$this->log("Error");
fclose($this->myConnection);
if ((time() - $GLOBALS['errortime']) < 600){
$this->log("Reconnecting in 60 Seconds");
sleep(60);
}
$this->signon();
$GLOBALS['errortime'] = time();
}
/**
* Returns connection type of socket (main or rvous etc)
*
* Helper method for recieve()
*
* @param Resource $sock Socket to determine type for
*
* @access private
* @return void
* @see receive
*/
function connectionType($sock)
{
//Is it the main connection?
if ($sock == $this->myConnection)
return CONN_TYPE_NORMAL;
else
{
for($i = 0;$i<sizeof($this->myDirectConnections);$i++)
{
if ($sock == $this->myDirectConnections[$i]->sock)
return $this->myDirectConnections[$i]->type;
}
}
return false;
}
/**
* Checks for new data and calls appropriate methods
*
* This method is usually called in an infinite loop to keep checking for new data
*
* @access public
* @return void
* @see connectionType
*/
function receive()
{
//This function will be used to get the incoming data
//and it will be used to call the event handlers
//First, get an array of sockets that have data that is ready to be read
$ready = array();
$ready = $this->myConnections;
$numrdy = stream_select($ready, $w = NULL, $x = NULL,NULL);
//Now that we've waited for something, go through the $ready
//array and read appropriately
for($i = 0;$i<sizeof($ready);$i++)
{
//Get the type
$type = $this->connectionType($ready[$i]);
if ($type == CONN_TYPE_NORMAL)
{
//Next step:Get the data sitting in the socket
$message = $this->read_from_aim();
if (strlen($message) <= 0)
{
return;
}
//Third step: Get the command from the server
@list($cmd, $rest) = explode(":", $message);
//Fourth step, take the command, test the type, and pass it off
//to the correct internal handler. The internal handler will
//do what needs to be done on the class internals to allow
//it to work, then proceed to pass it off to the user created handle
//if there is one
$this->log($cmd);
switch($cmd)
{
case 'SIGN_ON':
$this->onSignOn($message);
break;
case 'CONFIG2':
$this->onConfig($message);
break;
case 'ERROR':
$this->onError($message);
break;
case 'NICK':
$this->onNick($message);
break;
case 'IM_IN2':
$this->onImIn($message);
break;
case 'UPDATE_BUDDY2':
$this->onUpdateBuddy($message);
break;
case 'EVILED':
$this->onWarn($message);
break;
case 'CHAT_JOIN':
$this->onChatJoin($message);
break;
case 'CHAT_IN':
$this->onChatIn($message);
break;
case 'CHAT_UPDATE_BUDDY':
$this->onChatUpdate($message);
break;
case 'CHAT_INVITE':
$this->onChatInvite($message);
break;
case 'CHAT_LEFT':
$this->onChatLeft($message);
break;
case 'GOTO_URL':
$this->onGotoURL($message);
break;
case 'DIR_STATUS':
$this->onDirStatus($message);
break;
case 'ADMIN_NICK_STATUS':
$this->onAdminNick($message);
break;
case 'ADMIN_PASSWD_STATUS':
$this->onAdminPasswd($message);
break;
case 'PAUSE':
$this->onPause($message);
break;
case 'RVOUS_PROPOSE':
$this->onRvous($message);
break;
default:
$this->log("Fell through: $message");
$this->CatchAll($message);
break;
}
}
else
{
for($j = 0;$j<sizeof($this->myDirectConnections);$j++)
{
if ($this->myDirectConnections[$j]->sock == $ready[$i])
{
$dcon = $this->myDirectConnections[$j];
break;
}
}
//Now read from the dcon
if ($dcon->type == CONN_TYPE_DC)
{
if ($dcon->readDIM() == false)
{
$this->closeDcon($dcon);
continue;
}
$message['message'] = $dcon->lastMessage;
if ($message['message'] == "too big")
{
$this->sendDim("Connection dropped because you sent a message larger that " . MAX_DCON_SIZE . " bytes.", $dcon->connectedTo);
$this->closeDcon($dcon);
continue;
}
$message['from'] = $dcon->connectedTo;
$this->onDimIn($message);
}
}
}
$this->conn->myLastReceived="";
//Now get out of this function because the handlers should take care
//of everything
}
//The next block of code is all the event handlers needed by the class
//Some are left blank and only call the users handler because the class
//either does not support the command, or cannot do anything with it
// ---------------------------------------------------------------------
/**
* Direct IM In Event Handler
*
* Called when Direct IM is received.
* Call's user handler (if available) for DimIn.
*
* @access private
* @param String $data Raw message from server
* @return void
*/
function onDimIn($data)
{
$this->callHandler("DimIn", $data);
}
/**
* Sign On Event Handler
*
* Called when Sign On event occurs.
* Call's user handler (if available) for SIGN_ON.
*
* @access private
* @param String $data Raw message from server
* @return void
*/
function onSignOn($data)
{
$this->callHandler("SignOn", $data);
}
/**
* Config Event Handler
*
* Called when Config data received.
* Call's user handler (if available) for Config.
*
* Loads buddy list and other info
*
* @access private
* @param String $data Raw message from server
* @return void
*/
function onConfig($data)
{
$this->log("onConfig Message: " . $data);
if (strpos($data,"CONFIG2:") === false)
{
$this->log("get_buddy_list cannot be called at this time because I got $data");
//return false;
}
$people = explode("\n",trim($data,"\n"));
//The first 3 elements of the array are who knows what, element 3 should be
//a letter followed by a person
//AIM decided to add this wonderful new feature, the recent buddy thing, this kind of
//messes this funtion up, so we need to adapt it... unfortuneately, its not really
//clear how this works, so we are just going to add their name to the permit list.
//Recent buddies I believe are in the format
//number:name:number.... I think the first number counts down from 25 how long its
//been... but I don't know the second number,,,,
//TODO: Figure out the new recent buddies system
//Note: adding that at the bottom is a quick hack and may have adverse consequences...
for($i = 1;$i<sizeof($people);$i++)
{
@list($mode, $name) = explode(":", $people[$i]);
switch($mode)
{
case 'p':
$this->myPermitList[] = $name;
break;
case 'd':
$this->myBlockedList[] = $name;
break;
case 'b':
$this->myBuddyList[] = $name;
break;
case 'done':
break;
default:
//This is assumed to be recent buddies...
$this->myPermitList[]=$name;
}
}
//We only get the config message once, so now we should send our pd mode
$this->sflapSend(SFLAP_TYPE_DATA,"toc2_set_pdmode " . $this->myPdMode,0,0);
//Adds yourself to the permit list
//This is to fix an odd behavior if you have nobody on your list
//the server won't send the config command... so this takes care of it
$this->sflapSend(SFLAP_TYPE_DATA,"toc2_add_permit " . $this->normalize($this->myScreenName),0,0);
//Now we allow the user to send a list, update anything they want, etc
$this->callHandler("Config", $data);
//Now that we have taken care of what the user wants, send the init_done message
$this->sflapSend(SFLAP_TYPE_DATA,"toc_init_done",0,0);
//'VOICE_UID'
//'FILE_GET_UID'
//'IMAGE_UID'
//'BUDDY_ICON_UID'
//'STOCKS_UID'
//'GAMES_UID'
$this->sflapSend(SFLAP_TYPE_DATA, "toc_set_caps " . IMAGE_UID . " " . FILE_SEND_UID ." " . FILE_GET_UID . " " . BUDDY_ICON_UID . "",0,0);
}
/**
* Error Event Handler
*
* Called when an Error occurs.
* Call's user handler (if available) for Error.
*
* @access private
* @param String $data Raw message from server
* @return void
*/
function onError($data)
{
static $errarg = '';
static $ERRORS = array(
0=>'Success',
901 =>'$errarg not currently available',
902 =>'Warning of $errarg not currently available',
903 =>'A message has been dropped, you are exceeding
the server speed limit',
911 =>'Error validating input',
912 =>'Invalid account',
913 =>'Error encountered while processing request',
914 =>'Service unavailable',
950 =>'Chat in $errarg is unavailable.',
960 =>'You are sending message too fast to $errarg',
961 =>'You missed an im from $errarg because it was too big.',
962 =>'You missed an im from $errarg because it was sent too fast.',
970 =>'Failure',
971 =>'Too many matches',
972 =>'Need more qualifiers',
973 =>'Dir service temporarily unavailable',
974 =>'Email lookup restricted',
975 =>'Keyword Ignored',
976 =>'No Keywords',
977 =>'Language not supported',
978 =>'Country not supported',
979 =>'Failure unknown $errarg',
980 =>'Incorrect nickname or password.',
981 =>'The service is temporarily unavailable.',
982 =>'Your warning level is currently too high to sign on.',
983 =>'You have been connecting and
disconnecting too frequently. Wait 10 minutes and try again.
If you continue to try, you will need to wait even longer.',
989 =>'An unknown signon error has occurred $errarg'
);
$data_array = explode(":", $data);
for($i=0; $i<count($data_array); $i++)
{
switch($i)
{
case 0:
$cmd = $data_array[$i];
break;
case 1:
$errornum = $data_array[$i];
break;
case 2:
$errargs = $data_array[$i];
break;
}
}
eval("\$errorstring=\"\$ERRORS[" . $errornum . "]\";");
$string = "\$errorstring=\"\$ERRORS[$errornum]\";";
//This is important information! We need
// a A different outputter for errors
// b Just to echo it
//I'm just going to do a straight echo here, becuse we assume that
//the user will NEED to see this error. An option to supress it will
//come later I think. Perhaps if we did an error reporting level, similar
//to PHP's, and we could probably even use PHP's error outputting system
//I think that may be an idea....
$this->log($errorstring . "\n");
$this->callHandler("Error", $data);
}
/**
* Nick Event Handler
*
* Called when formatted own ScreenName is receieved
* Call's user handler (if available) for Nick.
*
* @access private
* @param String $data Raw message from server
* @return void
*/
function onNick($data)
{
//This is our nick, so set a field called "myFormatSN" which will represent
//the actual name given by the server to us, NOT the normalized screen name
@list($cmd, $nick) = explode(":", $data);
$this->myFormatSN = $nick;
$this->callHandler("Nick", $data);
}
/**
* IM In Event Handler
*
* Called when an Instant Message is received.
* Call's user handler (if available) for IMIn.
*
* @access private
* @param String $data Raw message from server
* @return void
*/
function onImIn($data)
{
//Perhaps we should add an internal log for debugging purposes??
//But now, this should probably be handled by the user purely
$this->callHandler("IMIn", $data);
}
/**
* UpdateBuddy Event Handler
*
* Called when a Buddy Update is receieved.
* Call's user handler (if available) for UpdateBuddy.
* If info is about self, updates self info (Currently ownly warning).
*
* ToDo: Keep track of idle, warning etc on Buddy List
*
* @access private
* @param String $data Raw message from server
* @return void
*/
function onUpdateBuddy($data)
{
//Again, since our class currently does not deal with other people without
//outside help, then this is also probably best left to the user. Though
//we should probably allow this to replace the setMyInfo function above
//by handling the input if and only if it is us
//Check and see that this is the command expected
if (strpos($data,"UPDATE_BUDDY2:") == -1)
{
$this->log("A different message than expected was received");
return false;
}
//@list($cmd, $info['sn'], $info['online'], $info['warnlevel'], $info['signon'], $info['idle'], $info['uc']) = explode(":", $command['incoming']);
//@list($cmd, $sn, $online, $warning, $starttime, $idletime, $uc) = explode(":", $data);
$info = $this->getMessageInfo($data);
if ($this->normalize($info['sn']) == $this->normalize($this->myScreenName))
{
$warning = rtrim($info['warnlevel'],"%");
$this->myWarnLevel = $warning;
$this->log("My warning level is $this->myWarnLevel %");
}
$this->callHandler("UpdateBuddy", $data);
}
/**
* Warning Event Handler
*
* Called when bot is warned.
* Call's user handler (if available) for Warn.
* Updates internal warning level
*
* @access private
* @param String $data Raw message from server
* @return void
*/
function onWarn($data)
{
/*
For reference:
$command['incoming'] .= ":0";
$it = explode(":", $command['incoming']);
$info['warnlevel'] = $it[1];
$info['from'] = $it[2];
*/
//SImply update our warning level
//@list($cmd, $newwarn, $user) = explode(":", $data);
$info = $this->getMessageInfo($data);
$this->setWarningLevel(trim($info['warnlevel'],"%"));
$this->log("My warning level is $this->myWarnLevel %");
$this->callHandler("Warned", $data);
}
/**
* Chat Join Handler
*
* Called when bot joins a chat room.
* Call's user handler (if available) for ChatJoin.
* Adds chat room to internal chat room list.
*
* @access private
* @param String $data Raw message from server
* @return void
*/
function onChatJoin($data)
{
@list($cmd, $rmid, $rmname) = explode(":", $data);
$this->myChatRooms[$rmid] = 0;
$this->callHandler("ChatJoin", $data);
}
/**
* Returns number of chat rooms bot is in
*
* @access public
* @param String $data Raw message from server
* @return int
*/
function getNumChats()
{
return count($this->myChatRooms);
}
/**
* Chat Update Handler
*
* Called when bot received chat room data (user update).
* Call's user handler (if available) for ChatUpdate.
*
* @access private
* @param String $data Raw message from server
* @return void
*/
function onChatUpdate($data)
{
$stuff = explode(":", $data);
$people = sizeof($stuff);
$people -= 2;
$this->callHandler("ChatUpdate", $data);
}
/**
* Chat Message In Handler
*
* Called when chat room message is received.
* Call's user handler (if available) for ChatIn.
*
* @access private
* @param String $data Raw message from server
* @return void
*/
function onChatIn($data)
{
$this->callHandler("ChatIn", $data);
}
/**
* Chat Invite Handler
*
* Called when bot is invited to a chat room.
* Call's user handler (if available) for ChatInvite.
*
* @access private
* @param String $data Raw message from server
* @return void
*/
function onChatInvite($data)
{
//@list($cmd, $name, $id, $from, $data) = explode(":", $data,6);
//$data = explode(":",$data,6);
//$nm = array();
//@list($nm['cmd'],$nm['name'],$nm['id'],$nm['from'],$nm['message']) = $data;
$this->callHandler("ChatInvite", $data);
}
/**
* Chat Left Handler
*
* Called when bot leaves a chat room
* Call's user handler (if available) for ChatLeft.
*
* @access private
* @param String $data Raw message from server
* @return void
*/
function onChatLeft($data)
{
$info = $this->getMessageInfo($data);
unset($this->myChatRooms[$info['chatid']]);
$this->callHandler("ChatLeft", $data);
}
/**
* Goto URL Handler
*
* Called on GotoURL.
* Call's user handler (if available) for GotoURL.
* No detailed info available for this / Unsupported.
*
* @access private
* @param String $data Raw message from server
* @return void
*/
function onGotoURL($data)
{
//This is of no use to the internal class
$this->callHandler("GotoURL", $data);
}
/**
* Dir Status Handler
*
* Called on DirStatus.
* Call's user handler (if available) for DirStatus.
* No detailed info available for this / Unsupported.
*
* @access private
* @param String $data Raw message from server
* @return void
*/
function onDirStatus($data)
{
//This is not currently suported
$this->callHandler("DirStatus", $data);
}
/**
* AdminNick Handler
*
* Called on AdminNick.
* Call's user handler (if available) for AdminNick.
* No detailed info available for this / Unsupported.
*
* @access private
* @param String $data Raw message from server
* @return void
*/
function onAdminNick($data)
{
//NOt particularly useful to us
$this->callHandler("AdminNick", $data);
}
/**
* AdminPasswd Handler
*
* Called on AdminPasswd.
* Call's user handler (if available) for AdminPasswd.
* No detailed info available for this / Unsupported.
*
* @access private
* @param String $data Raw message from server
* @return void
*/
function onAdminPasswd($data)
{
//Also not particlualry useful to the internals
$this->callHandler("AdminPasswd", $data);
}
/**
* Pause Handler
*
* Called on Pause.
* Call's user handler (if available) for Pause.
* No detailed info available for this / Unsupported.
*
* @access private
* @param String $data Raw message from server
* @return void
*/
function onPause($data)
{
//This is pretty useless to us too...
$this->callHandler("Pause", $data);
}
/**
* Direct Connection Handler
*
* Called on Direct Connection Request(Rvous).
* Call's user handler (if available) for Rvous.
*
* @access private
* @param String $data Raw message from server
* @return void
*/
function onRvous($data)
{
$this->callHandler("Rvous", $data);
}
/**
* CatchAll Handler
*
* Called for unrecognized commands.
* Logs unsupported messages to array.
* Call's user handler (if available) for CatchAll.
*
* @access private
* @param String $data Raw message from server
* @return void
*/
function CatchAll($data)
{
//Add to a log of unsupported messages.
$this->unsupported[] = $data;
//$this->log($data);
//print_r($data);
$this->callHandler("CatchAll", $data);
}
/**
* Calls User Handler
*
* Calls registered handler for a specific event.
*
* @access private
* @param String $event Command (event) name (Rvous etc)
* @param String $data Raw message from server
* @see registerHandler
* @return void
*/
function callHandler($event, $data)
{
if (isset($this->myEventHandlers[$event]))
{
//$function = $this->myEventHandlers[$event] . "(\$data);";
//eval($function);
call_user_func($this->myEventHandlers[$event], $data);
}
else
{
$this->noHandler($data);
}
}
/**
* Registers a user handler
*
* Handler List
* SignOn, Config, ERROR, NICK, IMIn, UpdateBuddy, Eviled, Warned, ChatJoin
* ChatIn, ChatUpdate, ChatInvite, ChatLeft, GotoURL, DirStatus, AdminNick
* AdminPasswd, Pause, Rvous, DimIn, CatchAll
*
* @access private
* @param String $event Event name
* @param String $handler User function to call
* @see callHandler
* @return boolean Returns true if successful
*/
function registerHandler($event, $handler)
{
if (is_callable($handler))
{
$this->myEventHandlers[$event] = $handler;
return true;
}
else
{
return false;
}
}
/**
* No user handler method fall back.
*
* Does nothing with message.
*
* @access public
* @param String $message Raw server message
* @return void
*/
function noHandler($message)
{
//This function intentionally left blank
//This is where the handlers will fall to for now. I plan on including a more
//efficent check to avoid the apparent stack jumps that this code will produce
//But for now, just fall into here, and be happy
return;
}
//GLOBAL FUNCTIONS
/**
* Finds type, and returns as part of array ['type']
* Puts message in ['incoming']
*
* Helper method for getMessageInfo.
*
* @access public
* @param String $message Raw server message
* @see msg_parse
* @see getMessageInfo
* @return array
*/
static function msg_type($message)
{
$command = array();
@list($cmd, $rest) = explode(":", $message);
switch($cmd)
{
case 'IM_IN2':
$type = AIM_TYPE_MSG;
break;
case 'UPDATE_BUDDY2':
$type = AIM_TYPE_UPDATEBUDDY;
break;
case 'EVILED':
$type = AIM_TYPE_WARN;
break;
case 'SIGN_ON':
$type = AIM_TYPE_SIGNON;
break;
case 'NICK':
$type = AIM_TYPE_NICK;
break;
case 'ERROR':
$type = AIM_TYPE_ERROR;
break;
case 'CHAT_JOIN':
$type = AIM_TYPE_CHATJ;
break;
case 'CHAT_IN':
$type = AIM_TYPE_CHATI;
break;
case 'CHAT_UPDATE_BUDDY':
$type = AIM_TYPE_CHATUPDBUD;
break;
case 'CHAT_INVITE':
$type = AIM_TYPE_CHATINV;
break;
case 'CHAT_LEFT':
$type = AIM_TYPE_CHATLE;
break;
case 'GOTO_URL':
$type = AIM_TYPE_URL;
break;
case 'ADMIN_NICK_STATUS':
$type = AIM_TYPE_NICKSTAT;
break;
case 'ADMIN_PASSWD_STATUS':
$type = AIM_TYPE_PASSSTAT;
break;
case 'RVOUS_PROPOSE':
$type = AIM_TYPE_RVOUSP;
break;
default:
$type = AIM_TYPE_NOT_IMPLEMENTED;
break;
}
$command['type'] = $type;
$command['incoming'] = $message;
return $command;
}
/**
* Parses message and splits into info array
*
* Helper method for getMessageInfo.
*
* @access public
* @param String $command Message and type (after msg_type)
* @see msg_type
* @see getMessageInfo
* @return array
*/
static function msg_parse($command)
{
$info = array();
switch($command['type'])
{
case AIM_TYPE_WARN:
$command['incoming'] .= ":0";
$it = explode(":", $command['incoming']);
$info['warnlevel'] = $it[1];
$info['from'] = $it[2];
break;
case AIM_TYPE_MSG:
$it = explode(":", $command['incoming'],5);
$info['auto'] = $it[2];
$info['from'] = $it[1];
$info['message'] = $it[4];
break;
case AIM_TYPE_UPDATEBUDDY:
@list($cmd, $info['sn'], $info['online'], $info['warnlevel'], $info['signon'], $info['idle'], $info['uc']) = explode(":", $command['incoming']);
break;
case AIM_TYPE_SIGNON:
@list($cmd, $info['version']) = explode(":", $command['incoming']);
break;
case AIM_TYPE_NICK:
@list($cmd, $info['nickname']) = explode(":", $command['incoming']);
break;
case AIM_TYPE_ERROR:
@list($cmd, $info['errorcode'], $info['args']) = explode(":", $command['incoming']);
break;
case AIM_TYPE_CHATJ:
@list($cmd, $info['chatid'], $info['chatname']) = explode(":", $command['incoming']);
break;
case AIM_TYPE_CHATI:
@list($cmd, $info['chatid'], $info['user'], $info['whisper'], $info['message']) = explode(":", $command['incoming'],5);
break;
case AIM_TYPE_CHATUPDBUD:
@list($cmd, $info['chatid'], $info['inside'], $info['userlist']) = explode(":", $command['incoming'],3);
break;
case AIM_TYPE_CHATINV:
@list($cmd, $info['chatname'], $info['chatid'], $info['from'], $info['message']) = explode(":", $command['incoming'],5);
break;
case AIM_TYPE_CHATLE:
@list($cmd, $info['chatid']) = explode(":", $command['incoming']);
break;
case AIM_TYPE_URL:
@list($cmd, $info['windowname'], $info['url']) = explode(":", $command['incoming'],3);
break;
case AIM_TYPE_RVOUSP:
@list($cmd,$info['user'],$info['uuid'],$info['cookie'],$info['seq'],$info['rip'],$info['pip'],$info['vip'],$info['port'],$info['tlvs']) = explode(":",$command['incoming'],10);
break;
case AIM_TYPE_NICKSTAT:
case AIM_TYPE_PASSSTAT:
@list($cmd, $info['returncode'], $info['opt']) = explode(":", $command['incoming'],3);
break;
default:
$info['command'] = $command['incoming'];
}
return $info;
}
/**
* Returns a parsed message
*
* Calls msg_parse(msg_type( to first determine message type and then parse accordingly
*
* @access public
* @param String $command Raw server message
* @see msg_type
* @see msg_parse
* @return array
*/
static function getMessageInfo($message)
{
return self::msg_parse(self::msg_type($message));
}
/**
* Checks socket for end of file
*
* @access public
* @param Resource $socket Socket to check
* @return boolean true if end of file (socket)
*/
static function socketcheck($socket){
$info = stream_get_meta_data($socket);
return $info['eof'];
//return(feof($socket));
}
}
?>