1058 lines
27 KiB
PHP
1058 lines
27 KiB
PHP
|
<?php
|
||
|
|
/*
|
||
|
|
+---------------------------------------------------------------------------
|
||
|
|
| PHP-IRC v2.2.0
|
||
|
|
| ========================================================
|
||
|
|
| by Manick
|
||
|
|
| (c) 2001-2005 by http://phpbots.sf.net/
|
||
|
|
| Contact: manick@manekian.com
|
||
|
|
| irc: #manekian@irc.rizon.net
|
||
|
|
| ========================================
|
||
|
|
+---------------------------------------------------------------------------
|
||
|
|
| > dcc_mod module
|
||
|
|
| > Module written by Manick
|
||
|
|
| > Module Version Number: 2.2.0
|
||
|
|
+---------------------------------------------------------------------------
|
||
|
|
| > This program is free software; you can redistribute it and/or
|
||
|
|
| > modify it under the terms of the GNU General Public License
|
||
|
|
| > as published by the Free Software Foundation; either version 2
|
||
|
|
| > of the License, or (at your option) any later version.
|
||
|
|
| >
|
||
|
|
| > This program 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 General Public License for more details.
|
||
|
|
| >
|
||
|
|
| > You should have received a copy of the GNU General Public License
|
||
|
|
| > along with this program; if not, write to the Free Software
|
||
|
|
| > Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
||
|
|
+---------------------------------------------------------------------------
|
||
|
|
| Changes
|
||
|
|
| =======-------
|
||
|
|
| > If you wish to suggest or submit an update/change to the source
|
||
|
|
| > code, email me at manick@manekian.com with the change, and I
|
||
|
|
| > will look to adding it in as soon as I can.
|
||
|
|
+---------------------------------------------------------------------------
|
||
|
|
*/
|
||
|
|
|
||
|
|
class dcc_mod extends module {
|
||
|
|
|
||
|
|
public $title = "DCC Chat Utils";
|
||
|
|
public $author = "Manick";
|
||
|
|
public $version = "2.1.1";
|
||
|
|
public $dontShow = true;
|
||
|
|
|
||
|
|
public function init()
|
||
|
|
{
|
||
|
|
$this->timerClass->addTimer("dccstatus", $this, "sendStatus", "", 5*60);
|
||
|
|
}
|
||
|
|
|
||
|
|
public function destroy()
|
||
|
|
{
|
||
|
|
$this->timerClass->removeTimer("dccstatus");
|
||
|
|
}
|
||
|
|
|
||
|
|
/* DCC Functions */
|
||
|
|
|
||
|
|
public $monitorList = array();
|
||
|
|
|
||
|
|
public function monitor_check($line, $args)
|
||
|
|
{
|
||
|
|
switch($line['cmd'])
|
||
|
|
{
|
||
|
|
case "PRIVMSG":
|
||
|
|
if (isset($this->monitorList[irc::myStrToLower($line['to'])]))
|
||
|
|
{
|
||
|
|
if (preg_match("/\1ACTION (.+?)\1/", $line['text'], $match))
|
||
|
|
{
|
||
|
|
$this->dccClass->dccInform("CHAN: " . $line['to'] . ": * " . $line['fromNick'] . " " . $match[1]);
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
$this->dccClass->dccInform("CHAN: " . $line['to'] . ": <" . $line['fromNick'] . "> " . $line['text']);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
|
||
|
|
case "MODE":
|
||
|
|
if ($line['fromNick'] != $this->ircClass->getNick())
|
||
|
|
{
|
||
|
|
if (isset($this->monitorList[irc::myStrToLower($line['to'])]))
|
||
|
|
{
|
||
|
|
$this->dccClass->dccInform("CHAN: " . $line['to'] . ": *** " . $line['fromNick'] . " sets mode: ".$line['params']);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
|
||
|
|
case "JOIN":
|
||
|
|
if ($line['fromNick'] != $this->ircClass->getNick())
|
||
|
|
{
|
||
|
|
if (isset($this->monitorList[irc::myStrToLower($line['text'])]))
|
||
|
|
{
|
||
|
|
$this->dccClass->dccInform("CHAN: " . $line['text'] . ": *** " . $line['fromNick'] . " joined channel.");
|
||
|
|
}
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
|
||
|
|
case "PART":
|
||
|
|
if ($line['fromNick'] != $this->ircClass->getNick())
|
||
|
|
{
|
||
|
|
if (isset($this->monitorList[irc::myStrToLower($line['to'])]))
|
||
|
|
{
|
||
|
|
$this->dccClass->dccInform("CHAN: " . $line['to'] . ": *** " . $line['fromNick'] . " parted channel.");
|
||
|
|
}
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
|
||
|
|
case "KICK":
|
||
|
|
if ($line['params'] != $this->ircClass->getNick())
|
||
|
|
{
|
||
|
|
if (isset($this->monitorList[irc::myStrToLower($line['to'])]))
|
||
|
|
{
|
||
|
|
$this->dccClass->dccInform("CHAN: " . $line['to'] . ": *** " . $line['params'] . " was kicked by ".$line['fromNick']." (".$line['text'].").");
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
break;
|
||
|
|
|
||
|
|
default:
|
||
|
|
break;
|
||
|
|
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
public function dcc_botinfo($chat, $args)
|
||
|
|
{
|
||
|
|
|
||
|
|
$chat->dccSend("PHP-IRC v" . VERSION . " [".VERSION_DATE."] by Manick (visit http://phpbots.sf.net/ to download)");
|
||
|
|
$chat->dccSend("total running time of " . $this->ircClass->timeFormat($this->ircClass->getRunTime(), "%d days, %h hours, %m minutes, and %s seconds."));
|
||
|
|
|
||
|
|
$fd = @fopen("/proc/" . $this->ircClass->pid() . "/stat", "r");
|
||
|
|
if ($fd !== false)
|
||
|
|
{
|
||
|
|
$stat = fread($fd, 1024);
|
||
|
|
fclose($fd);
|
||
|
|
|
||
|
|
$stat_array = explode(" ", $stat);
|
||
|
|
|
||
|
|
$pid = $stat_array[0];
|
||
|
|
$comm = $stat_array[1];
|
||
|
|
$utime = $stat_array[13];
|
||
|
|
$stime = $stat_array[14];
|
||
|
|
$vsize = $stat_array[22];
|
||
|
|
$meminfo = number_format($vsize, 0, '.',',');
|
||
|
|
$u_time = number_format($utime / 100, 2,'.',',');
|
||
|
|
$s_time = number_format($stime / 100, 2,'.',',');
|
||
|
|
|
||
|
|
$fd = @fopen("/proc/stat", "r");
|
||
|
|
if ($fd !== false)
|
||
|
|
{
|
||
|
|
$stat = fread($fd, 1024);
|
||
|
|
fclose($fd);
|
||
|
|
|
||
|
|
$stat = str_replace(" ", " ", $stat);
|
||
|
|
$stat_array_2 = explode(" ", $stat);
|
||
|
|
$totalutime = $stat_array_2[1];
|
||
|
|
$totalstime = $stat_array_2[3];
|
||
|
|
$u_percent = number_format($utime / $totalutime, 6,'.',',');
|
||
|
|
$s_percent = number_format($stime / $totalstime, 6,'.',',');
|
||
|
|
|
||
|
|
$chat->dccSend("cpu usage: " . $u_time . "s user (" . $u_percent . "%), " . $s_time . "s system (" . $s_percent . "%)");
|
||
|
|
}
|
||
|
|
|
||
|
|
$chat->dccSend("memory usage: " . $meminfo . " bytes");
|
||
|
|
|
||
|
|
}
|
||
|
|
|
||
|
|
$fd = @fopen("/proc/loadavg", "r");
|
||
|
|
if ($fd !== false)
|
||
|
|
{
|
||
|
|
$loadavg = fread($fd, 1024);
|
||
|
|
$loadavg_array = explode(" ", $loadavg);
|
||
|
|
$loadavgs = $loadavg_array[0] . " " . $loadavg_array[1] . " " .$loadavg_array[2];
|
||
|
|
fclose($fd);
|
||
|
|
|
||
|
|
$chat->dccSend("cpu load averages: " . $loadavgs);
|
||
|
|
}
|
||
|
|
|
||
|
|
$realname = $this->ircClass->getClientConf('realname') == "" ? "n/a" : $this->ircClass->getClientConf('realname');
|
||
|
|
$upload = $this->ircClass->getClientConf('upload') == "yes" ? "yes" : "no";
|
||
|
|
|
||
|
|
$chat->dccSend("configured nick: " . $this->ircClass->getClientConf('nick') . ", " .
|
||
|
|
"actual nick: " . $this->ircClass->getNick() . ", realname: " . $realname);
|
||
|
|
|
||
|
|
$chat->dccSend("upload is currently set to " . $upload);
|
||
|
|
|
||
|
|
if ($this->ircClass->getStatusRaw() == STATUS_CONNECTED_REGISTERED)
|
||
|
|
{
|
||
|
|
$network = $this->ircClass->getServerConf('Network') == "" ? $this->ircClass->getClientConf('server') : $this->ircClass->getServerConf('Network');
|
||
|
|
$chat->dccSend("current server: " . $network . "(" . $this->ircClass->getClientConf('server') . ") port: " . $this->ircClass->getClientConf('port'));
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
$chat->dccSend("current server: none");
|
||
|
|
}
|
||
|
|
|
||
|
|
$maintain = $this->ircClass->getMaintainedChannels();
|
||
|
|
|
||
|
|
$maintained = "n/a";
|
||
|
|
|
||
|
|
if (isset($maintain[0]))
|
||
|
|
{
|
||
|
|
$maintained = "";
|
||
|
|
foreach ($maintain AS $chan)
|
||
|
|
{
|
||
|
|
$maintained .= $chan['CHANNEL'] . " ";
|
||
|
|
}
|
||
|
|
$maintained = trim($maintained);
|
||
|
|
$chat->dccSend("configured channels: " . $maintained);
|
||
|
|
}
|
||
|
|
|
||
|
|
$channels = $this->ircClass->getChannelData();
|
||
|
|
|
||
|
|
foreach($channels AS $chanPtr)
|
||
|
|
{
|
||
|
|
$chat->dccSend("in channel " . strtoupper($chanPtr->name) . ": users: " . $chanPtr->count);
|
||
|
|
}
|
||
|
|
|
||
|
|
$chat->dccSend("status line: " . $this->getStatus());
|
||
|
|
$chat->dccSend("config file: " . $this->ircClass->getConfigFilename());
|
||
|
|
|
||
|
|
return;
|
||
|
|
|
||
|
|
}
|
||
|
|
|
||
|
|
public function dcc_connect($chat, $args)
|
||
|
|
{
|
||
|
|
$status = $this->ircClass->getStatusRaw();
|
||
|
|
|
||
|
|
if ($status == STATUS_ERROR)
|
||
|
|
{
|
||
|
|
$this->ircClass->reconnect();
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
public function dcc_monitor($chat, $args)
|
||
|
|
{
|
||
|
|
if ($args['nargs'] == 0)
|
||
|
|
{
|
||
|
|
$chat->dccSend("The following channels are being monitored:");
|
||
|
|
foreach ($this->monitorList AS $channel => $random)
|
||
|
|
{
|
||
|
|
$chat->dccSend($channel);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
|
||
|
|
$chan = irc::myStrToLower($args['arg1']);
|
||
|
|
|
||
|
|
if (!isset($this->monitorList[$chan]))
|
||
|
|
{
|
||
|
|
$this->monitorList[$chan] = 1;
|
||
|
|
$chat->dccSend("The channel '" . $chan . "' is now being monitored.");
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
$chat->dccSend("The channel '" . $chan . "' was removed from the monitored list.");
|
||
|
|
unset($this->monitorList[$chan]);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
public function dcc_who($chat, $args)
|
||
|
|
{
|
||
|
|
$dccList = $this->dccClass->getDccList();
|
||
|
|
|
||
|
|
$chat->dccSend("--- Users Online ---");
|
||
|
|
$chat->dccSend("[id] <nick> <admin>");
|
||
|
|
foreach ($dccList AS $chatBox)
|
||
|
|
{
|
||
|
|
if ($chatBox->type == CHAT)
|
||
|
|
{
|
||
|
|
$chat->dccSend("[" . $chatBox->id . "] " . $chatBox->nick . ($chatBox->isAdmin ? " (admin)" : ""));
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
public function dcc_timers($chat, $args)
|
||
|
|
{
|
||
|
|
$timers = $this->timerClass->getTimers();
|
||
|
|
|
||
|
|
$chat->dccSend("Active Timers:");
|
||
|
|
|
||
|
|
if (count($timers) > 0)
|
||
|
|
{
|
||
|
|
$time = timers::getMicroTime();
|
||
|
|
foreach ($timers AS $timer)
|
||
|
|
{
|
||
|
|
$interval = "interval(" . $timer->interval . " sec)";
|
||
|
|
|
||
|
|
$timeTillNext = round(($timer->nextRunTime - $time < 0 ? 0 : $timer->nextRunTime - $time), 0);
|
||
|
|
|
||
|
|
$ttnext = irc::timeFormat($timeTillNext, "%m min, %s sec");
|
||
|
|
|
||
|
|
if (is_object($timer->class))
|
||
|
|
{
|
||
|
|
$cName = get_class($timer->class);
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
$cName = "";
|
||
|
|
}
|
||
|
|
|
||
|
|
$tName = preg_replace("/([a-z0-9]){32}/", "", $timer->name);
|
||
|
|
if ($tName == "")
|
||
|
|
{
|
||
|
|
$tName = "(random hash)";
|
||
|
|
}
|
||
|
|
|
||
|
|
$cName = preg_replace("/_([a-z0-9]){32}/", "", $cName);
|
||
|
|
|
||
|
|
$chat->dccSend("Timer " . BOLD . $tName . BOLD . ": func(" . $cName . "::" . $timer->func . ") " . $interval . ", Time till next run: " . $ttnext);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
$chat->dccSend("There are currently no timers.");
|
||
|
|
}
|
||
|
|
|
||
|
|
}
|
||
|
|
|
||
|
|
public function dcc_reloadfunc($chat, $args)
|
||
|
|
{
|
||
|
|
if ($this->ircClass->getClientConf('functionfile') != "")
|
||
|
|
{
|
||
|
|
$stat = $this->parserClass->loadFuncs($this->ircClass->getClientConf('functionfile'));
|
||
|
|
$chat->dccSend("Function reload complete");
|
||
|
|
if ($stat == true)
|
||
|
|
{
|
||
|
|
$chat->dccSend("There were errors loading a function file! Cached version may still be in use!");
|
||
|
|
}
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
$chat->dccSend("No function file defined in config file.");
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
public function dcc_rehash($chat, $args)
|
||
|
|
{
|
||
|
|
|
||
|
|
$chat->dccSend("Rehashing main config file, please wait...");
|
||
|
|
|
||
|
|
$currConfig = $this->ircClass->getClientConf();
|
||
|
|
$newConfig = bot::parseConfig($this->ircClass->getConfigFilename());
|
||
|
|
|
||
|
|
if ($newConfig == false)
|
||
|
|
{
|
||
|
|
$chat->dccSend("Could not find config file or IO error.");
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
|
||
|
|
$this->ircClass->setConfig($newConfig, $this->ircClass->getConfigFilename());
|
||
|
|
|
||
|
|
if ($currConfig['nick'] != $newConfig['nick'])
|
||
|
|
{
|
||
|
|
$chat->dccSend("Changing nick...");
|
||
|
|
$this->ircClass->changeNick($newConfig['nick']);
|
||
|
|
}
|
||
|
|
|
||
|
|
if ($currConfig['server'] != $newConfig['server'])
|
||
|
|
{
|
||
|
|
$chat->dccSend("Connecting to new server...");
|
||
|
|
$this->ircClass->disconnect();
|
||
|
|
$this->ircClass->reconnect();
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
if (isset($currConfig['channel']))
|
||
|
|
{
|
||
|
|
if (!is_array($currConfig['channel']))
|
||
|
|
{
|
||
|
|
$currConfig['channel'] = array($currConfig['channel']);
|
||
|
|
}
|
||
|
|
if (!is_array($newConfig['channel']))
|
||
|
|
{
|
||
|
|
$newConfig['channel'] = array($newConfig['channel']);
|
||
|
|
}
|
||
|
|
|
||
|
|
foreach($currConfig['channel'] AS $chan)
|
||
|
|
{
|
||
|
|
if (!in_array($chan, $newConfig['channel']))
|
||
|
|
{
|
||
|
|
$chan = trim($chan) . " ";
|
||
|
|
$chan = trim(substr($chan, 0, strpos($chan, chr(32)) + 1));
|
||
|
|
$this->ircClass->sendRaw("PART " . $chan);
|
||
|
|
}
|
||
|
|
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
$this->ircClass->purgeMaintainList();
|
||
|
|
|
||
|
|
$chat->dccSend("Rehashing channel list...");
|
||
|
|
bot::createChannelArray($this->ircClass);
|
||
|
|
|
||
|
|
$chat->dccSend("Rehashing IP address...");
|
||
|
|
if (isset($newConfig['natip']))
|
||
|
|
{
|
||
|
|
if (isset($currConfig['natip']))
|
||
|
|
{
|
||
|
|
if ($currConfig['natip'] != $newConfig['natip'])
|
||
|
|
{
|
||
|
|
$this->ircClass->setClientIP($newConfig['natip']);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
$this->ircClass->setClientIP($newConfig['natip']);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
if ($this->ircClass->getStatusRaw() != STATUS_CONNECTED_REGISTERED)
|
||
|
|
{
|
||
|
|
$chat->dccSend("NOTICE: Cannot reset IP address unless connected to server. No change made.");
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
$this->ircClass->setClientIP();
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
if (isset($newConfig['dccrangestart']) && $newConfig['dccrangestart'] != $currConfig['dccrangestart'])
|
||
|
|
{
|
||
|
|
$chat->dccSend("Updating TCP Range...");
|
||
|
|
$this->socketClass->setTcpRange($newConfig['dccrangestart']);
|
||
|
|
}
|
||
|
|
|
||
|
|
if (isset($newConfig['logfile']) && $newConfig['logfile'] != $currConfig['logfile'])
|
||
|
|
{
|
||
|
|
$chat->dccSend("Changing log file...");
|
||
|
|
$this->ircClass->closeLog();
|
||
|
|
}
|
||
|
|
|
||
|
|
if (isset($newConfig['functionfile']))
|
||
|
|
{
|
||
|
|
if ($newConfig['functionfile'] != $currConfig['functionfile'])
|
||
|
|
{
|
||
|
|
$this->parserClass->loadFuncs($newConfig['functionfile']);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
$chat->dccSend("Fatal Error, functionfile directive not set. The performance of this bot is no longer guaranteed (please restart and fix your error)");
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
|
||
|
|
$chat->dccSend("Main config rehash complete.");
|
||
|
|
|
||
|
|
}
|
||
|
|
|
||
|
|
public function dcc_join($chat, $args)
|
||
|
|
{
|
||
|
|
$chat->dccSend("Joining: " . $args['query']);
|
||
|
|
$this->ircClass->sendRaw("JOIN " . $args['query']);
|
||
|
|
}
|
||
|
|
|
||
|
|
public function dcc_part($chat, $args)
|
||
|
|
{
|
||
|
|
$this->ircClass->sendRaw("PART " . $args['query']);
|
||
|
|
}
|
||
|
|
|
||
|
|
public function dcc_rejoin($chat, $args)
|
||
|
|
{
|
||
|
|
$chanPtr = $this->ircClass->getChannelData($args['arg1']);
|
||
|
|
|
||
|
|
if ($chanPtr == NULL)
|
||
|
|
{
|
||
|
|
$chat->dccSend("You are not on channel '" . $args['arg1'] . "'");
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
$chat->dccSend("Rejoining: " . $args['arg1']);
|
||
|
|
$this->ircClass->sendRaw("JOIN " . $args['arg1']);
|
||
|
|
$this->ircClass->sendRaw("PART " . $args['arg1']);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
public function dcc_shutdown($chat, $args)
|
||
|
|
{
|
||
|
|
$chat->dccSend("Shutting down, sending kill command to irc class.");
|
||
|
|
|
||
|
|
if ($this->ircClass->getStatusRaw() == STATUS_CONNECTED_REGISTERED)
|
||
|
|
{
|
||
|
|
$time = $this->ircClass->timeFormat($this->ircClass->getRunTime(), "%dd%hh%mm%ss");
|
||
|
|
$msg = "php-irc v" . VERSION . " by Manick, running ".$time;
|
||
|
|
$this->ircClass->sendRaw("QUIT :" . $msg);
|
||
|
|
}
|
||
|
|
|
||
|
|
$chat->dccSend("Waiting for server queue to flush...");
|
||
|
|
|
||
|
|
$this->timerClass->addTimer("shutdown", $this->ircClass, "shutdown", "", 1);
|
||
|
|
}
|
||
|
|
|
||
|
|
public function dcc_ignore($chat, $args)
|
||
|
|
{
|
||
|
|
$usageList = $this->ircClass->getUsageList();
|
||
|
|
|
||
|
|
$chat->dccSend("--- Usage List (* denotes active ignore) ---");
|
||
|
|
|
||
|
|
foreach($usageList AS $host => $user)
|
||
|
|
{
|
||
|
|
if (trim($host) != "")
|
||
|
|
{
|
||
|
|
if (intval($user->timeBanned) > 5)
|
||
|
|
{
|
||
|
|
$chat->dccSend(($user->isBanned == true ? "*" : "") . $host . ": " . (intval($user->timeBanned) > 5 ? date("m-d-y h:i:s a", $user->timeBanned) : "never banned"));
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
}
|
||
|
|
|
||
|
|
public function dcc_rignore($chat, $args)
|
||
|
|
{
|
||
|
|
$usageList = $this->ircClass->getUsageList();
|
||
|
|
|
||
|
|
if (array_key_exists($args['arg1'], $usageList))
|
||
|
|
{
|
||
|
|
$usageList[$args['arg1']]->isBanned = false;
|
||
|
|
$chat->dccSend("Ignore for " . $args['arg1'] . " successfully removed.");
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
$chat->dccSend("No such ignore.");
|
||
|
|
}
|
||
|
|
|
||
|
|
}
|
||
|
|
|
||
|
|
public function dcc_clearqueue($chat, $args)
|
||
|
|
{
|
||
|
|
if ($args['nargs'] > 0)
|
||
|
|
{
|
||
|
|
$this->ircClass->removeQueues($args['arg1']);
|
||
|
|
$chat->dccSend("All text queues for " . $args['arg1'] . " removed.");
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
$this->ircClass->purgeTextQueue();
|
||
|
|
$chat->dccSend("All text queues purged.");
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
public function dcc_status($chat, $args)
|
||
|
|
{
|
||
|
|
$chat->dccSend($this->getStatus());
|
||
|
|
}
|
||
|
|
|
||
|
|
public function dcc_server($chat, $args)
|
||
|
|
{
|
||
|
|
$server = $args['arg1'];
|
||
|
|
$port = 6667;
|
||
|
|
|
||
|
|
if ($args['nargs'] > 1)
|
||
|
|
{
|
||
|
|
$port = intval($args['arg2']);
|
||
|
|
if ($port == 0)
|
||
|
|
{
|
||
|
|
$port = 6667;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
$chat->dccSend("Changing server to: " . $server . ":" . $port);
|
||
|
|
$this->ircClass->setClientConfigVar('server', $server);
|
||
|
|
$this->ircClass->setClientConfigVar('port', $port);
|
||
|
|
$this->ircClass->disconnect();
|
||
|
|
$this->ircClass->reconnect();
|
||
|
|
}
|
||
|
|
|
||
|
|
public function dcc_exit($chat, $args)
|
||
|
|
{
|
||
|
|
$this->dccClass->dccInform("DCC: " . $chat->nick . " logged off", $chat);
|
||
|
|
$chat->disconnect("User quit");
|
||
|
|
}
|
||
|
|
|
||
|
|
public function dcc_action($chat, $args)
|
||
|
|
{
|
||
|
|
$this->ircClass->action($args['arg1'], substr($args['query'], strlen($args['arg1']) + 1));
|
||
|
|
}
|
||
|
|
|
||
|
|
public function dcc_restart($chat, $args)
|
||
|
|
{
|
||
|
|
$this->ircClass->disconnect();
|
||
|
|
}
|
||
|
|
|
||
|
|
public function dcc_chat($chat, $args)
|
||
|
|
{
|
||
|
|
$this->dccClass->dccInform("CHAT: (" . $chat->nick . ")> " . $args['query'], $chat);
|
||
|
|
}
|
||
|
|
|
||
|
|
public function dcc_raw($chat, $args)
|
||
|
|
{
|
||
|
|
$this->ircClass->sendRaw($args['query']);
|
||
|
|
}
|
||
|
|
|
||
|
|
public function dcc_say($chat, $args)
|
||
|
|
{
|
||
|
|
$this->ircClass->privMsg($args['arg1'], substr($args['query'], strlen($args['arg1']) + 1));
|
||
|
|
}
|
||
|
|
|
||
|
|
public function dcc_users($chat, $args)
|
||
|
|
{
|
||
|
|
$chat->dccSend($this->ircClass->displayUsers());
|
||
|
|
}
|
||
|
|
|
||
|
|
public function dcc_upload($chat, $args)
|
||
|
|
{
|
||
|
|
$args['arg1'] = irc::myStrToLower($args['arg1']);
|
||
|
|
|
||
|
|
if ($args['arg1'] == "yes")
|
||
|
|
{
|
||
|
|
$this->ircClass->setClientConfigVar('upload', 'yes');
|
||
|
|
$chat->dccSend("Upload is now set to allow.");
|
||
|
|
}
|
||
|
|
else if ($args['arg1'] == "no")
|
||
|
|
{
|
||
|
|
$this->ircClass->setClientConfigVar('upload', 'no');
|
||
|
|
$chat->dccSend("Upload is now set to deny.");
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
$chat->dccSend("Upload is currently set to: " . $this->ircClass->getClientConf('upload'));
|
||
|
|
$chat->dccSend("Valid syntax is 'yes' or 'no'.");
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
public function dcc_maintain($chat, $args)
|
||
|
|
{
|
||
|
|
if ($args['nargs'] == 0)
|
||
|
|
{
|
||
|
|
|
||
|
|
$chat->dccSend("-- Maintained Channels --");
|
||
|
|
$chans = $this->ircClass->getMaintainedChannels();
|
||
|
|
|
||
|
|
$num = 0;
|
||
|
|
foreach($chans AS $chan)
|
||
|
|
{
|
||
|
|
$chat->dccSend($chan['CHANNEL'] .
|
||
|
|
($chan['KEY'] != "" ? " with key " . $chan['KEY'] : ""));
|
||
|
|
$num++;
|
||
|
|
}
|
||
|
|
|
||
|
|
$chat->dccSend($num . " total channels");
|
||
|
|
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
$chanArg = irc::myStrToLower($args['arg1']);
|
||
|
|
|
||
|
|
$chans = $this->ircClass->getMaintainedChannels();
|
||
|
|
|
||
|
|
$found = false;
|
||
|
|
foreach($chans AS $chan)
|
||
|
|
{
|
||
|
|
if ($chan['CHANNEL'] == $chanArg)
|
||
|
|
{
|
||
|
|
$found = true;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
if ($found == true)
|
||
|
|
{
|
||
|
|
$this->ircClass->removeMaintain($chanArg);
|
||
|
|
$chat->dccSend("Channel " . $chanArg . " successfully removed from maintain list.");
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
$this->ircClass->maintainChannel($chanArg, ($args['nargs'] >= 2 ? $args['arg2'] : ""));
|
||
|
|
$chat->dccSend("Channel " . $chanArg . " is now being maintained"
|
||
|
|
. ($args['nargs'] >= 2 ? " with key " . $args['arg2'] : "."));
|
||
|
|
|
||
|
|
if ($this->ircClass->isOnline($this->ircClass->getNick(), $chanArg) == false)
|
||
|
|
{
|
||
|
|
$this->ircClass->joinChannel($chanArg . ($args['nargs'] >= 2 ? " " . $args['arg2'] : ""));
|
||
|
|
}
|
||
|
|
|
||
|
|
}
|
||
|
|
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
}
|
||
|
|
|
||
|
|
public function dcc_help($chat, $args)
|
||
|
|
{
|
||
|
|
$cmdList = $this->parserClass->getCmdList('dcc');
|
||
|
|
$sectionList = $this->parserClass->getCmdList('section');
|
||
|
|
|
||
|
|
if ($args['nargs'] > 0)
|
||
|
|
{
|
||
|
|
$cmd = $args['arg1'];
|
||
|
|
|
||
|
|
if (isset($cmdList[$cmd]))
|
||
|
|
{
|
||
|
|
$chat->dccSend("Usage: " . $cmd . " " . $cmdList[$cmd]['usage']);
|
||
|
|
$chat->dccSend("Section: " . $sectionList[$cmdList[$cmd]['section']]['longname']);
|
||
|
|
$chat->dccSend("Description: " . $cmdList[$cmd]['help']);
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
$chat->dccSend("Invalid Command: " . $line['arg1']);
|
||
|
|
}
|
||
|
|
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
|
||
|
|
$chat->dccSend("Commands:");
|
||
|
|
|
||
|
|
$sections = array();
|
||
|
|
|
||
|
|
foreach ($cmdList AS $cmd => $cmdData)
|
||
|
|
{
|
||
|
|
if (!$chat->isAdmin && $cmdData['admin'] == true)
|
||
|
|
{
|
||
|
|
continue;
|
||
|
|
}
|
||
|
|
|
||
|
|
$sections[$cmdData['section']][] = strtoupper($cmd) . " - " . $cmdData['help'];
|
||
|
|
}
|
||
|
|
|
||
|
|
foreach ($sections AS $section => $data)
|
||
|
|
{
|
||
|
|
$chat->dccSend($sectionList[$section]['longname']);
|
||
|
|
|
||
|
|
foreach ($data AS $cmd)
|
||
|
|
{
|
||
|
|
$chat->dccSend("-- " . $cmd);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
$chat->dccSend("Use HELP <command> for a list of arguments");
|
||
|
|
|
||
|
|
|
||
|
|
}
|
||
|
|
|
||
|
|
public function dcc_modules($chat, $args)
|
||
|
|
{
|
||
|
|
$cmdList = $this->parserClass->getCmdList();
|
||
|
|
|
||
|
|
if (isset($cmdList['file']))
|
||
|
|
{
|
||
|
|
$chat->dccSend("Installed Modules:");
|
||
|
|
|
||
|
|
foreach($cmdList['file'] AS $module)
|
||
|
|
{
|
||
|
|
$class = $module['class'];
|
||
|
|
|
||
|
|
$chat->dccSend("-- " . $class->title . " " . $class->version . " by " . $class->author);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
$chat->dccSend("There are no installed modules.");
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
public function dcc_close($chat, $args)
|
||
|
|
{
|
||
|
|
$dccList = $this->dccClass->getDccList();
|
||
|
|
|
||
|
|
foreach ($dccList AS $sockInt => $dcc)
|
||
|
|
{
|
||
|
|
if ($args['arg1'] == $dcc->id)
|
||
|
|
{
|
||
|
|
if ($dcc->type == CHAT && $dcc->isAdmin == true)
|
||
|
|
{
|
||
|
|
$chat->dccSend("Cannot close admin session!");
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
|
||
|
|
$dcc->disconnect("Owner Requested Close");
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
public function dcc_listul($chat, $args)
|
||
|
|
{
|
||
|
|
|
||
|
|
$uldir = $this->ircClass->getClientConf('uploaddir');
|
||
|
|
|
||
|
|
if ($uldir != "")
|
||
|
|
{
|
||
|
|
$chat->dccSend("Directory Contents, " . $uldir);
|
||
|
|
|
||
|
|
$dir = @scandir($uldir);
|
||
|
|
|
||
|
|
$dirs = 0;
|
||
|
|
$files = 0;
|
||
|
|
|
||
|
|
if (count($dir))
|
||
|
|
{
|
||
|
|
|
||
|
|
foreach ($dir AS $file)
|
||
|
|
{
|
||
|
|
if (is_dir($uldir . "/" . $file))
|
||
|
|
{
|
||
|
|
$dirs++;
|
||
|
|
$chat->dccSend(BOLD . "dir: " . BOLD . $file);
|
||
|
|
}
|
||
|
|
else if (is_file($uldir . "/" . $file))
|
||
|
|
{
|
||
|
|
$files++;
|
||
|
|
$chat->dccSend($file);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
$chat->dccSend($dirs . " directories, " . $files . " files");
|
||
|
|
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
$chat->dccSend("Error, no uploaddir configuration directive set in config file.");
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
public function dcc_dccs($chat, $args)
|
||
|
|
{
|
||
|
|
$dccList = $this->dccClass->getDccList();
|
||
|
|
$currDcc = false;
|
||
|
|
|
||
|
|
foreach ($dccList AS $sockInt => $dcc)
|
||
|
|
{
|
||
|
|
if ($dcc->type == FILE)
|
||
|
|
{
|
||
|
|
$currDcc = true;
|
||
|
|
|
||
|
|
if ($dcc->speed_lastavg == 0)
|
||
|
|
{
|
||
|
|
$percent = "0%";
|
||
|
|
$eta = "n/a";
|
||
|
|
$speed = 0.0;
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
$percent = round(($dcc->bytesTransfered/$dcc->filesize)*100, 1) . "%";
|
||
|
|
$eta = $this->ircClass->timeFormat(round(($dcc->filesize - $dcc->bytesTransfered)/$dcc->speed_lastavg, 0), "%hh,%mm,%ss");
|
||
|
|
$speed = irc::intToSizeString($dcc->speed_lastavg);
|
||
|
|
}
|
||
|
|
|
||
|
|
if ($dcc->transferType == UPLOAD)
|
||
|
|
{
|
||
|
|
$chat->dccSend("Upload[{$dcc->id}]: " . $dcc->nick . " " . $dcc->filenameNoDir . " ".$percent." " . $speed . "/s eta:" . $eta);
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
$chat->dccSend("Download[{$dcc->id}]: " . $dcc->nick . " " . $dcc->filenameNoDir . " ".$percent." " . $speed . "/s eta:" . $eta);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
if ($currDcc == false)
|
||
|
|
{
|
||
|
|
$chat->dccSend("No dcc transfers in progress");
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
public function dcc_send($chat, $args)
|
||
|
|
{
|
||
|
|
$filename = substr($args['query'], strlen($args['arg1']) + 1);
|
||
|
|
|
||
|
|
$this->dccClass->addFile($args['arg1'], null, null, UPLOAD, $filename, null);
|
||
|
|
}
|
||
|
|
|
||
|
|
public function dcc_function($chat, $args)
|
||
|
|
{
|
||
|
|
$cmdList = $this->parserClass->getCmdList();
|
||
|
|
|
||
|
|
if ($args['nargs'] == 0)
|
||
|
|
{
|
||
|
|
$chat->dccSend("-- All user-defined function status --");
|
||
|
|
|
||
|
|
$num = 0;
|
||
|
|
foreach ($cmdList['priv'] AS $cmd => $data)
|
||
|
|
{
|
||
|
|
$chat->dccSend($cmd . " => " . ($data['active'] == true ? "active" : "inactive") . ", Usage: " . $data['usage']);
|
||
|
|
$num++;
|
||
|
|
}
|
||
|
|
$chat->dccSend($num . " total functions.");
|
||
|
|
|
||
|
|
}
|
||
|
|
else if ($args['nargs'] == 2)
|
||
|
|
{
|
||
|
|
if ($args['arg1'] == "activate")
|
||
|
|
{
|
||
|
|
if ($args['arg2'] == "all")
|
||
|
|
{
|
||
|
|
foreach($cmdList['priv'] AS $cmd => $data)
|
||
|
|
{
|
||
|
|
//$cmdList['priv'][$cmd]['active'] = true;
|
||
|
|
$this->parserClass->setCmdListValue('priv', $cmd, 'active', true);
|
||
|
|
}
|
||
|
|
$chat->dccSend("All functions activated.");
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
$cmdLower = irc::myStrToLower($args['arg2']);
|
||
|
|
|
||
|
|
if (isset($cmdList['priv'][$cmdLower]))
|
||
|
|
{
|
||
|
|
$this->parserClass->setCmdListValue('priv', $cmdLower, 'active', true);
|
||
|
|
//$cmdList['priv'][$cmdLower]['active'] = true;
|
||
|
|
$chat->dccSend("Function " . $cmdLower . " activated.");
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
$chat->dccSend("Invalid function specified.");
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
else if ($args['arg1'] == "deactivate")
|
||
|
|
{
|
||
|
|
if ($args['arg2'] == "all")
|
||
|
|
{
|
||
|
|
foreach($cmdList['priv'] AS $cmd => $data)
|
||
|
|
{
|
||
|
|
if ($data['canDeactivate'] != false)
|
||
|
|
{
|
||
|
|
$this->parserClass->setCmdListValue('priv', $cmd, 'active', false);
|
||
|
|
//$cmdList['priv'][$cmd]['active'] = false;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
$chat->dccSend("All functions deactivated.");
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
$cmdLower = irc::myStrToLower($args['arg2']);
|
||
|
|
|
||
|
|
if (isset($cmdList['priv'][$cmdLower]))
|
||
|
|
{
|
||
|
|
if ($cmdList['priv'][$cmdLower]['canDeactivate'] != false)
|
||
|
|
{
|
||
|
|
$this->parserClass->setCmdListValue('priv', $cmdLower, 'active', false);
|
||
|
|
//$cmdList['priv'][$cmdLower]['active'] = false;
|
||
|
|
$chat->dccSend("Function " . $cmdLower . " deactivated.");
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
$chat->dccSend("Cannot modify read-only function " . $cmdLower . ".");
|
||
|
|
}
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
$chat->dccSend("Invalid function specified.");
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
$chat->dccSend("Invalid Syntax, use 'all', or specify a function name.");
|
||
|
|
}
|
||
|
|
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
$chat->dccSend("Invalid Syntax, use 'activate' or 'deactivate'.");
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
public function dcc_spawn($chat, $args)
|
||
|
|
{
|
||
|
|
$chat->dccSend("Spawning " . $args['query'] . "...");
|
||
|
|
$result= bot::addBot($args['query']);
|
||
|
|
if($result === true)
|
||
|
|
$chat->dccSend($args['query'] . " successfully spawned");
|
||
|
|
else
|
||
|
|
$chat->dccSend($args['query'] . " was not spawned");
|
||
|
|
}
|
||
|
|
|
||
|
|
private function getStatus()
|
||
|
|
{
|
||
|
|
$sqlCount = 0;
|
||
|
|
$bwStats = $this->ircClass->getStats();
|
||
|
|
|
||
|
|
if (is_object($this->db))
|
||
|
|
{
|
||
|
|
$sqlCount = $this->db->numQueries();
|
||
|
|
}
|
||
|
|
|
||
|
|
$bwUp = irc::intToSizeString($bwStats['BYTESUP']);
|
||
|
|
$bwDown = irc::intToSizeString($bwStats['BYTESDOWN']);
|
||
|
|
|
||
|
|
$fileBwUp = irc::intToSizeString($this->dccClass->getBytesUp());
|
||
|
|
$fileBwDown = irc::intToSizeString($this->dccClass->getBytesDown());
|
||
|
|
|
||
|
|
$txtQueue = $this->ircClass->getTextQueueLength() + 1;
|
||
|
|
|
||
|
|
$ircStat = $this->ircClass->getStatusString($this->ircClass->getStatusRaw());
|
||
|
|
|
||
|
|
$status = "Status: [" . $ircStat . "] ". $sqlCount .
|
||
|
|
" SQL, " . $txtQueue . " SrQ, (irc BW: " . $bwUp . " up, " . $bwDown . " down, file BW: " . $fileBwUp . " up, " . $fileBwDown . " down)";
|
||
|
|
return $status;
|
||
|
|
}
|
||
|
|
|
||
|
|
public function sendStatus()
|
||
|
|
{
|
||
|
|
$this->dccClass->dccInform($this->getStatus());
|
||
|
|
return true;
|
||
|
|
}
|
||
|
|
|
||
|
|
/*
|
||
|
|
NOTE: If you're reading this, you're really bored. Anyway, this is just something I'm keeping in here
|
||
|
|
in case I ever need it again. It was a debug mechanism for a hash class I wrote to replace the associative arrays
|
||
|
|
that the bot currently uses.
|
||
|
|
|
||
|
|
dcc debug 1 "<chan/mem> [<channel>]" "Debug channel/member hash tables" true dcc_mod dcc_debug info
|
||
|
|
public function dcc_debug($chat, $args)
|
||
|
|
{
|
||
|
|
if ($args['arg1'] == "chan")
|
||
|
|
{
|
||
|
|
$chanData = $this->ircClass->getChannelData();
|
||
|
|
|
||
|
|
$chat->dccSend($chanData->getCount() . " total buckets");
|
||
|
|
|
||
|
|
foreach ($chanData->debug() AS $debug)
|
||
|
|
{
|
||
|
|
$chat->dccSend($debug);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
else if ($args['arg1'] == "mem")
|
||
|
|
{
|
||
|
|
if ($args['nargs'] > 1)
|
||
|
|
{
|
||
|
|
$chanData = $this->ircClass->getChannelData();
|
||
|
|
|
||
|
|
$chanPtr = $chanData->find($args['arg2']);
|
||
|
|
|
||
|
|
if ($chanPtr !== false)
|
||
|
|
{
|
||
|
|
$chat->dccSend($chanPtr->memberList->getCount() . " total buckets");
|
||
|
|
|
||
|
|
foreach ($chanPtr->memberList->debug() AS $debug)
|
||
|
|
{
|
||
|
|
$chat->dccSend($debug);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
*/
|
||
|
|
}
|
||
|
|
?>
|