<?php
-/********************************* PHP-P10 ******************************
- * P10 uplink class by pk910 (c)2011 pk910 *
- ************************************************************************
- * Version 2 (OOP) *
+/******************************* PHP-P10 v2 *****************************
+ * Copyright (C) 2011 Philipp Kreil (pk910) *
* *
- * PHP-P10 is free software; you can redistribute it and/or modify *
+ * 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 *
+ * the Free Software Foundation, either version 3 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 PHP-P10; if not, write to the Free Software Foundation, *
- * Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA. *
+ * along with this program. If not, see <http://www.gnu.org/licenses/>. *
* *
************************************************************************
*
*
* This file contains the basic P10 Protocol handler.
*
- ************************************************************************
- * accessable methods:
- *
- * void initialize()
- * has to be called after the settings have been set.
- *
- * void loop()
- * loop function that should be calles as many times as possible.
- * It reads from the socket and BLOCKS the script execution for a
- * specific time if nothing is received.
- *
- * void setUplinkHost(String $host, int $port, bool $ssl = false, String $bind = null)
- * sets the Uplink connection information.
- *
- * void setLoopTimeout(int $timeout)
- * sets the maximum time loop() is blocking the script execution.
- *
- * void setUplinkServer(int $numeric, String $name, String $password, String $description)
- * sets the own P10 Server information.
- *
- * void setValidateServer(String $name, String $password)
- * sets additional security relevant information about the remote server.
- *
- * void setHISOptions(String $serverName, String $serverDescription String $usermask)
- * sets the default Account fakehost
- *
- * void setEventHandler(EventHandler $event_handler)
- * sets the EventHandlder
*/
require_once("Client.class.php");
require_once("Numerics.class.php");
require_once("P10_Channel.class.php");
require_once("P10_ModeSets.class.php");
require_once("EventHandler.interface.php");
+require_once("IPAddr.class.php");
$e=1;
define("ERR_NICK_IN_USE", $e++);
private $settings = array();
private $server;
private $eventHandler = null;
- private $last_local_numeric = 1;
+ private $last_local_numeric = 0;
const FLAG_P10SESSION = 0x0001; //connection is in P10 mode (server is connected)
const FLAG_SECURITY_QUIT = 0x0002; //local connection abort because of security issues
case "OM":
$this->recv_mode($from, $arguments);
break;
+ case "AC":
+ $this->recv_account($from, $arguments);
+ break;
+ case "FA":
+ $this->recv_fakehost($from, $arguments);
+ break;
+ case "NFH":
+ $this->recv_newfakehost($from, $arguments);
+ break;
//default
default:
//unknown cmd
$host = $args[4];
$modes = implode(" ",array_slice($args, 5, count($args)-8));
$modes = new P10_UserModeSet($modes);
- $ip = Numerics::parseIP($args[count($args)-3]);
+ $ip = new IPAddr($args[count($args)-3]);
$realname = $args[count($args)-1];
$user = new P10_User($nick, $numeric, $server, $connect_time, $ident, $host, $ip, $realname, $modes);
if($this->eventHandler)
private function recv_burst($from, $args) {
$name = $args[0];
$create_time = $args[1];
+ if(count($args) == 2) {
+ //we've got an empty channel without any modes set??? dead channel!
+ return;
+ }
$channel = P10_Channel::getChannelByName($name);
if($channel == null)
$channel = new P10_Channel($name);
$channel->setCreateTime($create_time);
$modes = $channel->getModes();
$userstr = $args[count($args)-1];
- $modeparamcount = count($args)-3;
if($userstr[0] == "%") {
//ban list
$banlist = explode(" ", substr($userstr, 1));
//TODO: save bans
}
$userstr = $args[count($args)-2];
- $modeparamcount--;
}
if($userstr[0] == "+") { //MODE String
- $modeparamcount++;
$userstr = "";
}
$users = explode(",",$userstr);
- $isop = false; $isvoice = false;
+ $isop = false; $ishalfop = false; $isvoice = false;
foreach($users as $user) {
if($user == "") continue;
$uexp = explode(":", $user);
if(strlen($uexp[0]) != 5) {
- trigger_error("burst parse error: '".$uexp[0]."' is not an user numeric.", E_USER_ERROR);
- return;
+ trigger_error("burst parse error: '".$uexp[0]."' is not an user numeric.", E_USER_WARNING);
+ break;
}
if(count($uexp) > 1) {
$isop = false;
+ $ishalfop = false;
$isvoice = false;
for($i = 0; $i < strlen($uexp[1]); $i++) {
if($uexp[1][0] == "@") $isop = true;
+ if($uexp[1][0] == "%") $ishalfop = true;
if($uexp[1][0] == "+") $isvoice = true;
}
}
trigger_error("burst parse error: cant find User '".$uexp[0]."'.", E_USER_ERROR);
return;
}
- $channel->burstUser($user, $isop, $isvoice);
+ $channel->burstUser($user, $isop, $ishalfop, $isvoice);
if($this->eventHandler)
$this->eventHandler->event_join($user, $channel, true);
}
- $modes->parseModes(implode(array_slice($args, 2, $modeparamcount)));
+ $modestr = array_slice($args, 2);
+ if($modestr[0] == "+")
+ $modes->parseModes(implode(" ", $modestr));
}
private function recv_join($from, $args) {
private function recv_privmsg($from, $args) {
$user = P10_User::getUserByNum($from);
if($user == null) {
- trigger_error("Server tries to send a privmsg from an user that does not exist or was not found on recv_privmsg.", E_USER_ERROR);
+ trigger_error("Server tries to send a privmsg from an user that does not exist or was not found on recv_privmsg.", E_USER_WARNING);
return;
}
if($this->eventHandler) {
$channel = P10_Channel::getChannelByName($args[0]);
if($channel == null)
$channel = new P10_Channel($args[0]);
- $this->eventHandler->event_chanmessage($user, $channel, $args[1]);
+ if(strlen($args[1]) > 0 && $args[1][0] == "\001") {
+ //ctcp
+ $args[1] = substr($args[1],1);
+ if($args[1][strlen($args[1])-1] == "\001")
+ $args[1] = substr($args[1],0,-1);
+ $ctcpexp = explode(" ",$args[1],2);
+ $this->eventHandler->event_chanctcp($user, $channel, strtoupper($ctcpexp[0]), (count($ctcpexp) > 1 ? $ctcpexp[1] : null));
+ } else
+ $this->eventHandler->event_chanmessage($user, $channel, $args[1]);
+ } else if($args[0][0] == "$") {
+ //"multicast"
+ $this->eventHandler->event_privmessage($user, NULL, $args[1]);
} else {
$targetUser = P10_User::getUserByNum($args[0]);
if($targetUser == null) {
- trigger_error("Server tries to send a privmsg to an user that does not exist or was not found on recv_privmsg.", E_USER_ERROR);
+ trigger_error("Server tries to send a privmsg to an user that does not exist or was not found on recv_privmsg.", E_USER_WARNING);
return;
}
- $this->eventHandler->event_privmessage($user, $targetUser, $args[1]);
+ if(strlen($args[1]) > 0 && $args[1][0] == "\001") {
+ //ctcp
+ $args[1] = substr($args[1],1);
+ if($args[1][strlen($args[1])-1] == "\001")
+ $args[1] = substr($args[1],0,-1);
+ $ctcpexp = explode(" ",$args[1],2);
+ $this->eventHandler->event_privctcp($user, $targetUser, strtoupper($ctcpexp[0]), (count($ctcpexp) > 1 ? $ctcpexp[1] : null));
+ } else
+ $this->eventHandler->event_privmessage($user, $targetUser, $args[1]);
}
}
}
private function recv_notice($from, $args) {
$user = P10_User::getUserByNum($from);
if($user == null) {
- trigger_error("Server tries to send a notice from an user that does not exist or was not found on recv_notice.", E_USER_ERROR);
+ trigger_error("Server tries to send a notice from an user that does not exist or was not found on recv_notice.", E_USER_WARNING);
return;
}
if($this->eventHandler) {
$channel = P10_Channel::getChannelByName($args[0]);
if($channel == null)
$channel = new P10_Channel($args[0]);
- $this->eventHandler->event_channotice($user, $channel, $args[1]);
+ if(strlen($args[1]) > 0 && $args[1][0] == "\001") {
+ //ctcp
+ $args[1] = substr($args[1],1);
+ if($args[1][strlen($args[1])-1] == "\001")
+ $args[1] = substr($args[1],0,-1);
+ $ctcpexp = explode(" ",$args[1],2);
+ $this->eventHandler->event_chanctcpreply($user, $channel, strtoupper($ctcpexp[0]), (count($ctcpexp) > 1 ? $ctcpexp[1] : null));
+ } else
+ $this->eventHandler->event_channotice($user, $channel, $args[1]);
+ } else if($args[0][0] == "$") {
+ //"multicast"
+ $this->eventHandler->event_privnotice($user, NULL, $args[1]);
} else {
$targetUser = P10_User::getUserByNum($args[0]);
if($targetUser == null) {
- trigger_error("Server tries to send a notice to an user that does not exist or was not found on recv_notice.", E_USER_ERROR);
+ trigger_error("Server tries to send a notice to an user that does not exist or was not found on recv_notice.", E_USER_WARNING);
return;
}
- $this->eventHandler->event_privnotice($user, $targetUser, $args[1]);
+ if(strlen($args[1]) > 0 && $args[1][0] == "\001") {
+ //ctcp
+ $args[1] = substr($args[1],1);
+ if($args[1][strlen($args[1])-1] == "\001")
+ $args[1] = substr($args[1],0,-1);
+ $ctcpexp = explode(" ",$args[1],2);
+ $this->eventHandler->event_privctcpreply($user, $targetUser, strtoupper($ctcpexp[0]), (count($ctcpexp) > 1 ? $ctcpexp[1] : null));
+ } else
+ $this->eventHandler->event_privnotice($user, $targetUser, $args[1]);
}
}
}
if($channels != "") {
$this->send("319", $from, $nick, $channels);
}
- if($fromUser->getModes()->hasMode("o") || $from == $user->getNumeric() || !$this->getSetting("his_name")) {
- $this->send("312", $from, $nick, $user->getServer()->getName(), $user->getServer()->getDescription());
- } else {
- $this->send("312", $from, $nick, $this->getSetting("his_name"), $this->getSetting("his_desc"));
- }
- if($modes->hasMode("o") && (!$modes->hasMode("H") || $fromUser->getModes()->hasMode("o"))) {
- if($modes->hasMode("S")) {
- if($modes->hasMode("D"))
- $this->send("313", $from, $nick, "is a Network Service");
- else
- $this->send("313", $from, $nick, "is an illegal Network Service - HACKER!");
- } else
- $this->send("313", $from, $nick, "is an IRC Operator");
- }
- if(($auth = $modes->hasMode("r"))) {
- $this->send("330", $from, $nick, $auth);
- }
+ }
+ if($fromUser->getModes()->hasMode("o") || $from == $user->getNumeric() || !$this->getSetting("his_name")) {
+ $this->send("312", $from, $nick, $user->getServer()->getName(), $user->getServer()->getDescription());
+ } else {
+ $this->send("312", $from, $nick, $this->getSetting("his_name"), $this->getSetting("his_desc"));
+ }
+ if($modes->hasMode("o") && (!$modes->hasMode("H") || $fromUser->getModes()->hasMode("o"))) {
+ if($modes->hasMode("S")) {
+ if($modes->hasMode("D"))
+ $this->send("313", $from, $nick, "is a Network Service");
+ else
+ $this->send("313", $from, $nick, "is an illegal Network Service - HACKER!");
+ } else
+ $this->send("313", $from, $nick, "is an IRC Operator");
+ }
+ if(($auth = $modes->hasMode("r"))) {
+ $this->send("330", $from, $nick, $auth);
}
}
$this->send("318", $from, $args[1]);
}
if(count($args) > 0) {
$user->setAway($args[0]);
+ if($this->eventHandler)
+ $this->eventHandler->event_away($user, $args[0]);
} else {
$user->setAway(null);
+ if($this->eventHandler)
+ $this->eventHandler->event_away($user, null);
}
}
private function recv_mode($from, $args) {
$user = P10_User::getUserByNum($from);
- if($user == null) {
+ if($user == null && strlen($from) != 2) {
trigger_error("Server tries to send a modechange from an user that does not exist or was not found on recv_mode.", E_USER_ERROR);
return;
}
if($channel == null)
$channel = new P10_Channel($args[0]);
$channel->getModes()->setModes($modes);
- if($this->eventHandler)
+ if($this->eventHandler && strlen($from) != 2)
$this->eventHandler->event_chanmode($user, $channel, $modes);
} else {
- $targetUser = P10_User::getUserByNum($args[0]);
+ $targetUser = P10_User::getUserByNick($args[0]);
if($targetUser == null) {
trigger_error("Server tries to send a mode to an user that does not exist or was not found on recv_mode.", E_USER_ERROR);
return;
$this->eventHandler->event_usermode($targetUser, $modes);
}
}
+
+ private function recv_account($from, $args) {
+ $user = P10_User::getUserByNum($args[0]);
+ if($user == null) {
+ trigger_error("Server tries to send an auth announce from an user that does not exist or was not found on recv_account.", E_USER_ERROR);
+ return;
+ }
+ $auth = $args[1];
+ $user->getModes()->setModes("+r ".$auth);
+ if($this->eventHandler)
+ $this->eventHandler->event_usermode($user, "+r ".$auth);
+ }
+
+ private function recv_fakehost($from, $args) {
+ $user = P10_User::getUserByNum($args[0]);
+ if($user == null) {
+ trigger_error("Server tries to send a fakehost change from an user that does not exist or was not found on recv_fakehost.", E_USER_ERROR);
+ return;
+ }
+ $fakehost = $args[1];
+ $user->getModes()->setModes("+f ".$fakehost);
+ if($this->eventHandler)
+ $this->eventHandler->event_usermode($user, "+f ".$fakehost);
+ }
+
+ private function recv_newfakehost($from, $args) {
+ $user = P10_User::getUserByNum($args[0]);
+ if($user == null) {
+ trigger_error("Server tries to send a fakehost change from an user that does not exist or was not found on recv_fakehost.", E_USER_ERROR);
+ return;
+ }
+ $fakeident = $args[1];
+ $fakehost = $args[2];
+ $user->setIdent($fakeident);
+ $user->getModes()->setModes("+f ".$fakehost);
+ if($this->eventHandler)
+ $this->eventHandler->event_usermode($user, "+f ".$fakehost);
+ }
/********************************************************************************************
* SERVER FUNCTIONS *
$ident = $user->getIdent();
$host = $user->getHost();
$modes = $user->getModes()->getModeString();
- $ip = Numerics::numericFromIP($user->getIP());
+ $ip = $user->getIP()->getNumeric();
$numeric = $user->getNumeric();
$realname = $user->getRealname();
$this->send("N", $nick, $connect_time, $ident, $host, $modes, $ip, $numeric, $realname);
}
foreach(P10_Channel::getChannels() as $channel) {
- $sorted_users = array('ov' => array(), 'o' => array(), 'v' => array(), '-' => array());
+ $privs_to_burst = array('o', 'h', 'v' );
+ $priv_values = array(P10_Channel::USERPRIV_OPED, P10_Channel::USERPRIV_HALFOP, P10_Channel::USERPRIV_VOICE );
+ $priv_combinations = array();
+ $sorted_users = array();
+ $combinations = pow(2, count($privs_to_burst)); //binary possibilities => 2^count($privs_to_burst)
+ for($i = 0; $i < $combinations; $i++) {
+ //make a binary number out of $i
+ $binary = decbin($i);
+ while(strlen($binary) < count($privs_to_burst))
+ $binary = '0'.$binary;
+ $combination_name = '';
+ $combination_value = 0;
+ for($j = 0; $j < count($privs_to_burst); $j++) {
+ if($binary[$j] == '1') {
+ $combination_name .= $privs_to_burst[$j];
+ $combination_value += $priv_values[$j];
+ }
+ }
+ $priv_combinations[] = array("name" => $combination_name, "value" => $combination_value);
+ $sorted_users[$combination_value] = array();
+ }
$local_users = false;
foreach($channel->getUsers() as $user) {
if(substr($user->getNumeric(), 0, 2) != $this->server->getNumeric()) continue; //skip users that are not on the local server
$privs = $channel->getUserPrivs($user);
- $strPrivs = "";
- if(($privs & P10_Channel::USERPRIV_OPED)) $strPrivs .= "o";
- if(($privs & P10_Channel::USERPRIV_VOICE)) $strPrivs .= "v";
- if($strPrivs == "") $strPrivs = "-";
$local_users = true;
- $sorted_users[$strPrivs][] = $user;
+ $sorted_users[$privs][] = $user;
}
if(!$local_users) continue;
$userStr = "";
- foreach($sorted_users['-'] as $user) {
- if($userStr != "") $userStr.=",";
- $userStr .= $user->getNumeric();
- }
- foreach($sorted_users['ov'] as $i => $user) {
- if($userStr != "") $userStr.=",";
- $userStr .= $user->getNumeric();
- if($i == 0) $userStr .= ":ov";
- }
- foreach($sorted_users['o'] as $i => $user) {
- if($userStr != "") $userStr.=",";
- $userStr .= $user->getNumeric();
- if($i == 0) $userStr .= ":o";
- }
- foreach($sorted_users['v'] as $i => $user) {
- if($userStr != "") $userStr.=",";
- $userStr .= $user->getNumeric();
- if($i == 0) $userStr .= ":v";
- }
+ foreach($priv_combinations as $combination) {
+ $i = 0;
+ foreach($sorted_users[$combination['value']] as $user) {
+ if($userStr != "") $userStr.=",";
+ $userStr .= $user->getNumeric();
+ if(($i++) == 0 && $combination['value'] > 0) {
+ $userStr .= ":".$combination['name'];
+ }
+ }
+ }
$banString = "";
//TODO: Build ban String
$burstString = "";
}
$this->last_local_numeric++;
$modes = new P10_UserModeSet($modes);
+ $ip = new IPAddr($ip);
$user = new P10_User($nick, $numeric, $this->server, time(), $ident, $host, $ip, $realname, $modes);
if(($this->flags & self::FLAG_CONNECTED)) {
- $ip = Numerics::numericFromIP($user->getIP());
+ $ip = $user->getIP()->getNumeric();
$this->send("N", $nick, $user->getConnectTime(), $ident, $host, $user->getModes()->getModeString(), $ip, $numeric, $realname);
}
return $user;
if($privs != 0) {
$channel->setUserPrivs($user, $privs);
if(($this->flags & self::FLAG_CONNECTED)) {
- $modestr = "+".(($privs & P10_Channel::USERPRIV_OPED) ? "o" : "").(($privs & P10_Channel::USERPRIV_VOICE) ? "v" : "");
+ $modestr = "+".(($privs & P10_Channel::USERPRIV_OPED) ? "o" : "").(($privs & P10_Channel::USERPRIV_HALFOP) ? "h" : "").(($privs & P10_Channel::USERPRIV_VOICE) ? "v" : "");
$modestr .= (($privs & P10_Channel::USERPRIV_OPED) ? " ".$user->getNumeric() : "");
+ $modestr .= (($privs & P10_Channel::USERPRIV_HALFOP) ? " ".$user->getNumeric() : "");
$modestr .= (($privs & P10_Channel::USERPRIV_VOICE) ? " ".$user->getNumeric() : "");
$this->send("OM", $user->getNumeric(), $chanName, $modestr);
}
$channel = P10_Channel::getChannelByName($targetStr);
if($channel == null)
$channel = new P10_Channel($targetStr);
- $modes = $channel->getModes()->setModes($modes);
+ $modes = $channel->getModes()->setModes($modes, true);
if(($this->flags & self::FLAG_CONNECTED))
$this->send(($force ? "OM" : "M"), $user->getNumeric(), $targetStr, $modes);
if($this->eventHandler)
$targetUser = P10_User::getUserByNum($targetStr);
if($targetUser->getServer() === $this->server) {
//just do it :D
- $modes = $targetUser->getModes()->setModes($modes);
+ $modes = $targetUser->getModes()->setModes($modes, true);
if(($this->flags & self::FLAG_CONNECTED))
$this->send("M", $targetUser->getNumeric(), $targetUser->getNick(), $modes);
if($this->eventHandler)
}
}
+ public function ctcp($user, $target, $command, $text) {
+ return $this->privmsg($user, $target, "\001".strtoupper($command)." ".$text."\001");
+ }
+ public function ctcp_reply($user, $target, $command, $text) {
+ return $this->notice($user, $target, "\001".strtoupper($command)." ".$text."\001");
+ }
}