Uplink/Uplink.class.php

   1 <?php
   2 /******************************* PHP-P10 v2 *****************************
   3  * Copyright (C) 2011  Philipp Kreil (pk910)                            *
   4  *                                                                      *
   5  * This program is free software: you can redistribute it and/or modify *
   6  * it under the terms of the GNU General Public License as published by *
   7  * the Free Software Foundation, either version 3 of the License, or    *
   8  * (at your option) any later version.                                  *
   9  *                                                                      *
  10  * This program is distributed in the hope that it will be useful,      *
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of       *
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the        *
  13  * GNU General Public License for more details.                         *
  14  *                                                                      *
  15  * You should have received a copy of the GNU General Public License    *
  16  * along with this program. If not, see <http://www.gnu.org/licenses/>. *
  17  *                                                                      *
  18  ************************************************************************
  19  *
  20  *  Uplink/Uplink.class.php
  21  *
  22  * This file contains the basic P10 Protocol handler.
  23  *
  24  */
  25 require_once("Client.class.php");
  26 require_once("Numerics.class.php");
  27 require_once("P10Formatter.class.php");
  28 require_once("P10_Server.class.php");
  29 require_once("P10_User.class.php");
  30 require_once("P10_Channel.class.php");
  31 require_once("P10_ModeSets.class.php");
  32 require_once("EventHandler.interface.php");
  33 require_once("IPAddr.class.php");
  34
  35 $e=1;
  36 define("ERR_NICK_IN_USE", $e++);
  37 define("ERR_INVALID_USER", $e++);
  38 define("ERR_INVALID_CHANNAME", $e++);
  39 define("ERR_NOT_CONNECTED", $e++);
  40 define("ERR_NOT_ON_CHANNEL", $e++);
  41
  42 class Uplink {
  43         private $client;
  44         private $settings = array();
  45         private $server;
  46         private $eventHandler = null;
  47         private $last_local_numeric = 0;
  48
  49         const FLAG_P10SESSION      = 0x0001; //connection is in P10 mode (server is connected)
  50         const FLAG_SECURITY_QUIT   = 0x0002; //local connection abort because of security issues
  51         const FLAG_NOT_CONNECTABLE = 0x0004; //remote server is not connectable
  52         const FLAG_BURST_PENDING   = 0x0008; //we still have to burst
  53         const FLAG_CONNECTED       = 0x0010; //connected and synced (ready)
  54         const FLAG_GOT_PASS        = 0x0020; //got PASS from the remote Server
  55         private $flags = 0;
  56
  57         public function __construct() {
  58                 $this->client = new Client();
  59                 $this->setSetting("recv_timeout", 1000);
  60                 $this->setSetting("his_usermask", "user.NoMask");
  61         }
  62
  63         public function initialize() {
  64                 if($this->server) {
  65                         trigger_error("Uplink already initialized.", E_USER_ERROR);
  66                         return;
  67                 }
  68                 $self_numeric = $this->getSetting("numeric");
  69                 $self_name = $this->getSetting("name");
  70                 $self_description = $this->getSetting("description");
  71                 if(!$self_numeric || !$self_name) {
  72                         trigger_error("Server Settings missing.", E_USER_ERROR);
  73                         return;
  74                 }
  75                 $this->server = new P10_Server($self_name, $self_numeric, null, time(), time(), $self_description);
  76         }
  77
  78         public function loop() {
  79                 if($this->server == null) {
  80                         trigger_error("Uplink not initialized.", E_USER_ERROR);
  81                         return;
  82                 }
  83                 if(!$this->client->connected()) {
  84                         if(($this->flags & self::FLAG_P10SESSION)) {
  85                                 //Server got disconnected
  86                                 $this->server->disconnectServer($this->eventHandler, true);
  87                                 $this->flags &= ~self::FLAG_P10SESSION;
  88                         }
  89                         $host = $this->getSetting("host");
  90                         $port = $this->getSetting("port");
  91                         if($host == null || $port == null) {
  92                                 trigger_error("Uplink Settings missing.", E_USER_ERROR);
  93                                 return;
  94                         }
  95                         if(($this->flags & self::FLAG_SECURITY_QUIT) || ($this->flags & self::FLAG_NOT_CONNECTABLE)) {
  96                                 sleep(1);
  97                         }
  98                         $state = $this->client->connect($host, $port, $this->getSetting("bind"), $this->getSetting("ssl"), $this->getSetting("recv_timeout"));
  99                         if(!$state) {
 100                                 usleep($this->getSetting("recv_timeout") / 1000);
 101                                 $this->flags |= self::FLAG_NOT_CONNECTABLE;
 102                                 return;
 103                         }
 104                         $this->flags = 0;
 105                         $this->loginServer();
 106                 }
 107                 //try to receive new data from the Uplink
 108                 $lines = $this->client->recv();
 109                 if($lines == null) return;
 110                 foreach($lines as $line) {
 111                         $this->parseLine($line);
 112                 }
 113         }
 114
 115         public function shutdown() {
 116                 if($this->client->connected()) {
 117                         if(($this->flags & self::FLAG_P10SESSION)) {
 118                                 $this->send("SQ", "Shutdown requested.");
 119                         }
 120                         $this->client->disconnect();
 121                 }
 122         }
 123
 124         public function setUplinkHost($host, $port, $ssl = false, $bind = null) {
 125                 $this->setSetting("host", $host);
 126                 $this->setSetting("port", $port);
 127                 $this->setSetting("ssl", $ssl);
 128                 $this->setSetting("bind", $bind);
 129         }
 130
 131         public function setLoopTimeout($timeout) {
 132                 $this->setSetting("recv_timeout", $timeout);
 133         }
 134
 135         public function setUplinkServer($numeric, $name, $password, $description) {
 136                 $this->setSetting("numeric", Numerics::intToNum($numeric, 2));
 137                 $this->setSetting("name", $name);
 138                 $this->setSetting("password", $password);
 139                 $this->setSetting("description", $description);
 140         }
 141
 142         public function setValidateServer($name, $password) {
 143                 $this->setSetting("their_name", $name);
 144                 $this->setSetting("their_password", $password);
 145         }
 146
 147         public function setHISOptions($servername, $serverdesc, $usermask) {
 148                 $this->setSetting("his_name", $servername);
 149                 $this->setSetting("his_desc", $serverdesc);
 150                 $this->setSetting("his_usermask", $usermask);
 151         }
 152
 153         public function setEventHandler($event_handler) {
 154                 if(!is_a($event_handler, "EventHandler")) {
 155                         trigger_error((is_object($event_handler) ? get_class($event_handler) : gettype($event_handler))." is NOT a valid EventHandler.", E_USER_ERROR);
 156                         return;
 157                 }
 158                 $this->eventHandler = $event_handler;
 159         }
 160
 161         private function setSetting($setting, $value) {
 162                 $this->settings[$setting] = $value;
 163         }
 164
 165         private function getSetting($setting) {
 166                 if(array_key_exists($setting, $this->settings)) {
 167                         return $this->settings[$setting];
 168                 } else {
 169                         return null;
 170                 }
 171         }
 172
 173         private function loginServer() {
 174                 $password = $this->getSetting("password");
 175                 $this->send("PASS", $password);
 176                 $this->send("SERVER", $this->server->getName(), $this->server->getStartTime(), $this->server->getLinkTime(), $this->server->getNumeric(), $this->server->getDescription());
 177         }
 178
 179         private function parseLine($line) {
 180                 $highExplode = explode(" :", $line, 2);
 181                 $tokens = explode(" ", $highExplode[0]);
 182                 if(count($highExplode) > 1)
 183                         $tokens[] = $highExplode[1];
 184                 $cmdPos = (($this->flags & self::FLAG_P10SESSION) ? 1 : 0);
 185                 if($cmdPos == 1) $from = $tokens[0];
 186                 else $from = null;
 187                 $arguments = array_slice($tokens, $cmdPos + 1);
 188                 if(($this->flags & self::FLAG_P10SESSION) && $this->eventHandler) {
 189                         $this->eventHandler->event_preparse($from, strtoupper($tokens[$cmdPos]), $arguments);
 190                 }
 191                 switch(strtoupper($tokens[$cmdPos])) {
 192                 //pre P10 Session
 193                         case "PASS":
 194                                 $this->recv_pass($from, $arguments);
 195                                 break;
 196                         case "SERVER":
 197                                 $this->recv_server($from, $arguments);
 198                                 break;
 199                         case "ERROR":
 200                                 $this->recv_error($from, $arguments);
 201                                 break;
 202                 //P10 Session
 203                         case "S":
 204                                 $this->recv_server($from, $arguments);
 205                                 break;
 206                         case "G":
 207                                 $this->recv_ping($from, $arguments);
 208                                 break;
 209                         case "N":
 210                                 $this->recv_nick($from, $arguments);
 211                                 break;
 212                         case "EB":
 213                                 $this->recv_end_of_burst($from, $arguments);
 214                                 break;
 215                         case "EA":
 216                                 $this->recv_end_of_burst_ack($from, $arguments);
 217                                 break;
 218                         case "SQ":
 219                                 $this->recv_server_quit($from, $arguments);
 220                                 break;
 221                         case "Q":
 222                                 $this->recv_quit($from, $arguments);
 223                                 break;
 224                         case "B":
 225                                 $this->recv_burst($from, $arguments);
 226                                 break;
 227                         case "J":
 228                         case "C":
 229                                 $this->recv_join($from, $arguments);
 230                                 break;
 231                         case "L":
 232                                 $this->recv_part($from, $arguments);
 233                                 break;
 234                         case "K":
 235                                 $this->recv_kick($from, $arguments);
 236                                 break;
 237                         case "D":
 238                                 $this->recv_kill($from, $arguments);
 239                                 break;
 240                         case "P":
 241                                 $this->recv_privmsg($from, $arguments);
 242                                 break;
 243                         case "O":
 244                                 $this->recv_notice($from, $arguments);
 245                                 break;
 246                         case "W":
 247                                 $this->recv_whois($from, $arguments);
 248                                 break;
 249                         case "A":
 250                                 $this->recv_away($from, $arguments);
 251                                 break;
 252                         case "M":
 253                         case "OM":
 254                                 $this->recv_mode($from, $arguments);
 255                                 break;
 256             case "AC":
 257                                 $this->recv_account($from, $arguments);
 258                                 break;
 259             case "FA":
 260                                 $this->recv_fakehost($from, $arguments);
 261                                 break;
 262             case "NFH":
 263                                 $this->recv_newfakehost($from, $arguments);
 264                                 break;
 265                 //default
 266                         default:
 267                                 //unknown cmd
 268                                 if($this->eventHandler)
 269                                         $this->eventHandler->event_unknown_cmd($from, strtoupper($tokens[$cmdPos]), $arguments);
 270                                 break;
 271                 }
 272         }
 273
 274         private function send($command) {
 275                 if(func_num_args() > 1) {
 276                         $args = array_slice(func_get_args(), 1);
 277                         $command = P10Formatter::formatCMD($this->getSetting("numeric"), $command, $args);
 278                 } else {
 279                         $command = P10Formatter::formatCMD($this->getSetting("numeric"), $command, array());
 280                 }
 281                 $this->client->send($command);
 282         }
 283
 284         /********************************************************************************************
 285          *                                     INCOMING COMMANDS                                    *
 286          ********************************************************************************************/
 287
 288         private function recv_pass($from, $args) {
 289                 $their_pass = $this->getSetting("their_password");
 290                 if($their_pass) {
 291                         if($args[0] != $their_pass) {
 292                                 //security QUIT
 293                                 $this->flags |= self::FLAG_SECURITY_QUIT;
 294                                 $this->send("ERROR", "Incorrect password received.");
 295                                 $this->client->disconnect();
 296                                 return;
 297                         }
 298                         $this->flags |= self::FLAG_GOT_PASS;
 299                 }
 300         }
 301
 302         private function recv_error($from, $args) {
 303                 //we received an error - the socket is dead for us, now
 304                 //maybe we want to log this, later
 305                 $this->client->disconnect();
 306         }
 307
 308         private function recv_server($from, $args) {
 309                 if($from == null) {
 310                         //our uplink Server
 311                         $their_name = $this->getSetting("their_name");
 312                         if($their_name && $args[0] != $their_name) {
 313                                 $this->flags |= self::FLAG_SECURITY_QUIT;
 314                                 $this->send("ERROR", "Invalid Server name");
 315                                 $this->client->disconnect();
 316                                 return;
 317                         }
 318                         if($this->getSetting("their_password") && !($this->flags & self::FLAG_GOT_PASS)) {
 319                                 $this->flags |= self::FLAG_SECURITY_QUIT;
 320                                 $this->send("ERROR", "PASS missing.");
 321                                 $this->client->disconnect();
 322                                 return;
 323                         }
 324                         $new_server = new P10_Server($args[0], substr($args[5],0,2), $this->server, $args[2], $args[3], $args[7]);
 325                         $this->server->addServer($new_server);
 326                         $this->flags |= self::FLAG_P10SESSION | self::FLAG_BURST_PENDING;
 327                         if($this->eventHandler)
 328                                 $this->eventHandler->event_newserver($new_server, !($this->flags & self::FLAG_CONNECTED));
 329                 } else {
 330                         //another server got a new slave server ^^
 331                         $server = P10_Server::getServerByNum($from);
 332                         if($server == null) {
 333                                 trigger_error("Parent Server (".$from.") does not exist or was not found on recv_server.", E_USER_ERROR);
 334                                 return;
 335                         }
 336                         $new_server = new P10_Server($args[0], substr($args[5],0,2), $server, $args[2], $args[3], $args[7]);
 337                         $server->addServer($new_server);
 338                         if($this->eventHandler)
 339                                 $this->eventHandler->event_newserver($new_server, !($this->flags & self::FLAG_CONNECTED));
 340                 }
 341         }
 342
 343         private function recv_ping($from, $args) {
 344                 $this->send("Z", $args[0]); //simply PONG
 345                 P10_Channel::recheckAllChannels();
 346         }
 347
 348         private function recv_nick($from, $args) {
 349                 if(count($args) <= 2) {
 350                         //Nick change
 351                         $user = P10_User::getUserByNum($from);
 352                         if($user == null) {
 353                                 trigger_error("Server tries to change the nick of an user that does not exist or was not found on recv_nick.", E_USER_ERROR);
 354                                 return;
 355                         }
 356                         if($this->eventHandler)
 357                                 $this->eventHandler->event_nick($user, $args[0]);
 358                         $user->setNick($args[0]);
 359                 } else {
 360                         //New User
 361                         $numeric = $args[count($args)-2];
 362                         $nick = $args[0];
 363                         $server = P10_Server::getServerByNum($from);
 364                         if($server == null) {
 365                                 trigger_error("Server (".$from.") the User (".$nick.") is coming from does not exist or was not found on recv_nick.", E_USER_ERROR);
 366                                 return;
 367                         }
 368                         if(substr($numeric,0,2) != $from) {
 369                                 trigger_error("A Server (".$from.") tries to connect a User with an invalid User numeric ('".$numeric."' does not belong to the Server)", E_USER_WARNING);
 370                         }
 371                         $connect_time = $args[2];
 372                         $ident = $args[3];
 373                         $host = $args[4];
 374                         $modes = implode(" ",array_slice($args, 5, count($args)-8));
 375                         $modes = new P10_UserModeSet($modes);
 376                         $ip = new IPAddr($args[count($args)-3]);
 377                         $realname = $args[count($args)-1];
 378                         $user = new P10_User($nick, $numeric, $server, $connect_time, $ident, $host, $ip, $realname, $modes);
 379                         if($this->eventHandler)
 380                                 $this->eventHandler->event_connect($user, !($this->flags & self::FLAG_CONNECTED));
 381                 }
 382         }
 383
 384         private function recv_end_of_burst($from, $args) {
 385                 if(($this->flags & self::FLAG_BURST_PENDING)) {
 386                         $this->burst();
 387                         $this->send("EA");
 388                         $this->flags &= ~self::FLAG_BURST_PENDING;
 389                 }
 390         }
 391
 392         private function recv_end_of_burst_ack($from, $args) {
 393                 $this->flags |= self::FLAG_CONNECTED;
 394         }
 395
 396         private function recv_server_quit($from, $args) {
 397                 $server = P10_Server::getServerByName($args[0]);
 398                 if($server == null) {
 399                         trigger_error("Server (".$args[0].") not found.", E_USER_ERROR);
 400                         return;
 401                 }
 402                 $server->disconnectServer($this->eventHandler);
 403         }
 404
 405         private function recv_quit($from, $args) {
 406                 $user = P10_User::getUserByNum($from);
 407                 if($user == null) {
 408                         trigger_error("Server tries to quit an user that does not exist or was not found on recv_quit.", E_USER_ERROR);
 409                         return;
 410                 }
 411                 if($this->eventHandler)
 412                         $this->eventHandler->event_quit($user, $args[0]);
 413                 $user->quit($args[0]);
 414         }
 415
 416         private function recv_burst($from, $args) {
 417                 $name = $args[0];
 418                 $create_time = $args[1];
 419         if(count($args) == 2) {
 420             //we've got an empty channel without any modes set???  dead channel!
 421             return;
 422         }
 423                 $channel = P10_Channel::getChannelByName($name);
 424                 if($channel == null)
 425                         $channel = new P10_Channel($name);
 426                 $channel->setCreateTime($create_time);
 427                 $modes = $channel->getModes();
 428                 $userstr = $args[count($args)-1];
 429                 if($userstr[0] == "%") {
 430                         //ban list
 431                         $banlist = explode(" ", substr($userstr, 1));
 432                         foreach($banlist as $ban) {
 433                                 //TODO: save bans
 434                         }
 435                         $userstr = $args[count($args)-2];
 436                 }
 437                 if($userstr[0] == "+") { //MODE String
 438                         $userstr = "";
 439                 }
 440                 $users = explode(",",$userstr);
 441                 $isop = false; $ishalfop = false; $isvoice = false;
 442                 foreach($users as $user) {
 443                         if($user == "") continue;
 444                         $uexp = explode(":", $user);
 445                         if(strlen($uexp[0]) != 5) {
 446                                 trigger_error("burst parse error: '".$uexp[0]."' is not an user numeric.", E_USER_WARNING);
 447                                 break;
 448                         }
 449                         if(count($uexp) > 1) {
 450                                 $isop = false;
 451                 $ishalfop = false;
 452                                 $isvoice = false;
 453                                 for($i = 0; $i < strlen($uexp[1]); $i++) {
 454                                         if($uexp[1][0] == "@") $isop = true;
 455                     if($uexp[1][0] == "%") $ishalfop = true;
 456                                         if($uexp[1][0] == "+") $isvoice = true;
 457                                 }
 458                         }
 459                         $user = P10_User::getUserByNum($uexp[0]);
 460                         if($user == null) {
 461                                 trigger_error("burst parse error: cant find User '".$uexp[0]."'.", E_USER_ERROR);
 462                                 return;
 463                         }
 464                         $channel->burstUser($user, $isop, $ishalfop, $isvoice);
 465                         if($this->eventHandler)
 466                                 $this->eventHandler->event_join($user, $channel, true);
 467                 }
 468                 $modestr = array_slice($args, 2);
 469                 if($modestr[0] == "+")
 470                         $modes->parseModes(implode(" ", $modestr));
 471         }
 472
 473         private function recv_join($from, $args) {
 474                 $user = P10_User::getUserByNum($from);
 475                 if($user == null) {
 476                         trigger_error("Server tries to join an user that does not exist or was not found on recv_join.", E_USER_ERROR);
 477                         return;
 478                 }
 479                 $channel = P10_Channel::getChannelByName($args[0]);
 480                 if($channel == null)
 481                         $channel = new P10_Channel($args[0]);
 482                 $channel->joinUser($user);
 483                 if($this->eventHandler)
 484                         $this->eventHandler->event_join($user, $channel, false);
 485         }
 486
 487         private function recv_part($from, $args) {
 488                 $user = P10_User::getUserByNum($from);
 489                 if($user == null) {
 490                         trigger_error("Server tries to part an user that does not exist or was not found on recv_join.", E_USER_ERROR);
 491                         return;
 492                 }
 493                 $channel = P10_Channel::getChannelByName($args[0]);
 494                 if($channel == null)
 495                         $channel = new P10_Channel($args[0]);
 496                 if($this->eventHandler)
 497                         $this->eventHandler->event_part($user, $channel, $args[1]);
 498                 $channel->partUser($user);
 499         }
 500
 501         private function recv_kick($from, $args) {
 502                 $user = P10_User::getUserByNum($from);
 503                 if($user == null) {
 504                         trigger_error("An unknown user tries to kick another user on recv_kick.", E_USER_ERROR);
 505                         return;
 506                 }
 507                 $channel = P10_Channel::getChannelByName($args[0]);
 508                 if($channel == null)
 509                         $channel = new P10_Channel($args[0]);
 510                 $target = P10_User::getUserByNum($args[1]);
 511                 if($target == null) {
 512                         trigger_error("Someone tries to kick an user that does not exist or was not found on recv_kick.", E_USER_ERROR);
 513                         return;
 514                 }
 515                 if($this->eventHandler)
 516                         $this->eventHandler->event_kick($user, $target, $channel, $args[1]);
 517                 $channel->partUser($user);
 518         }
 519
 520         private function recv_kill($from, $args) {
 521                 $user = P10_User::getUserByNum($args[0]);
 522                 if($user == null) {
 523                         trigger_error("Server tries to kill an user that does not exist or was not found on recv_quit.", E_USER_ERROR);
 524                         return;
 525                 }
 526                 if($this->eventHandler)
 527                         $this->eventHandler->event_quit($user, "Killed (".$args[1].")");
 528                 $user->quit($args[1]);
 529         }
 530
 531         private function recv_privmsg($from, $args) {
 532                 $user = P10_User::getUserByNum($from);
 533                 if($user == null) {
 534                         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);
 535                         return;
 536                 }
 537                 if($this->eventHandler) {
 538                         if($args[0][0] == "#") {
 539                                 $channel = P10_Channel::getChannelByName($args[0]);
 540                                 if($channel == null)
 541                                         $channel = new P10_Channel($args[0]);
 542                                 if(strlen($args[1]) > 0 && $args[1][0] == "\001") {
 543                                         //ctcp
 544                                         $args[1] = substr($args[1],1);
 545                                         if($args[1][strlen($args[1])-1] == "\001")
 546                                                 $args[1] = substr($args[1],0,-1);
 547                                         $ctcpexp = explode(" ",$args[1],2);
 548                                         $this->eventHandler->event_chanctcp($user, $channel, strtoupper($ctcpexp[0]), (count($ctcpexp) > 1 ? $ctcpexp[1] : null));
 549                                 } else
 550                                         $this->eventHandler->event_chanmessage($user, $channel, $args[1]);
 551                         } else if($args[0][0] == "$") {
 552                                 //"multicast"
 553                                 $this->eventHandler->event_privmessage($user, NULL, $args[1]);
 554                         } else {
 555                                 $targetUser = P10_User::getUserByNum($args[0]);
 556                                 if($targetUser == null) {
 557                                         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);
 558                                         return;
 559                                 }
 560                                 if(strlen($args[1]) > 0 && $args[1][0] == "\001") {
 561                                         //ctcp
 562                                         $args[1] = substr($args[1],1);
 563                                         if($args[1][strlen($args[1])-1] == "\001")
 564                                                 $args[1] = substr($args[1],0,-1);
 565                                         $ctcpexp = explode(" ",$args[1],2);
 566                                         $this->eventHandler->event_privctcp($user, $targetUser, strtoupper($ctcpexp[0]), (count($ctcpexp) > 1 ? $ctcpexp[1] : null));
 567                                 } else
 568                                         $this->eventHandler->event_privmessage($user, $targetUser, $args[1]);
 569                         }
 570                 }
 571         }
 572
 573         private function recv_notice($from, $args) {
 574                 $user = P10_User::getUserByNum($from);
 575                 if($user == null) {
 576                         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);
 577                         return;
 578                 }
 579                 if($this->eventHandler) {
 580                         if($args[0][0] == "#") {
 581                                 $channel = P10_Channel::getChannelByName($args[0]);
 582                                 if($channel == null)
 583                                         $channel = new P10_Channel($args[0]);
 584                                 if(strlen($args[1]) > 0 && $args[1][0] == "\001") {
 585                                         //ctcp
 586                                         $args[1] = substr($args[1],1);
 587                                         if($args[1][strlen($args[1])-1] == "\001")
 588                                                 $args[1] = substr($args[1],0,-1);
 589                                         $ctcpexp = explode(" ",$args[1],2);
 590                                         $this->eventHandler->event_chanctcpreply($user, $channel, strtoupper($ctcpexp[0]), (count($ctcpexp) > 1 ? $ctcpexp[1] : null));
 591                                 } else
 592                                         $this->eventHandler->event_channotice($user, $channel, $args[1]);
 593                         } else if($args[0][0] == "$") {
 594                                 //"multicast"
 595                                 $this->eventHandler->event_privnotice($user, NULL, $args[1]);
 596                         } else {
 597                                 $targetUser = P10_User::getUserByNum($args[0]);
 598                                 if($targetUser == null) {
 599                                         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);
 600                                         return;
 601                                 }
 602                                 if(strlen($args[1]) > 0 && $args[1][0] == "\001") {
 603                                         //ctcp
 604                                         $args[1] = substr($args[1],1);
 605                                         if($args[1][strlen($args[1])-1] == "\001")
 606                                                 $args[1] = substr($args[1],0,-1);
 607                                         $ctcpexp = explode(" ",$args[1],2);
 608                                         $this->eventHandler->event_privctcpreply($user, $targetUser, strtoupper($ctcpexp[0]), (count($ctcpexp) > 1 ? $ctcpexp[1] : null));
 609                                 } else
 610                                         $this->eventHandler->event_privnotice($user, $targetUser, $args[1]);
 611                         }
 612                 }
 613         }
 614
 615         private function recv_whois($from, $args) {
 616                 /* [get] ACAAF W AX :NetworkServ */
 617                 $fromUser = P10_User::getUserByNum($from);
 618                 if($fromUser == null) {
 619                         trigger_error("Server tries to send a whois from an user that does not exist or was not found on recv_whois.", E_USER_ERROR);
 620                         return;
 621                 }
 622                 $users=explode(",",$args[1]);
 623                 foreach($users as $nick) {
 624                         $user = P10_User::getUserByNick($nick);
 625                         if(!$user) {
 626                                 $this->send("401", $from, $nick);
 627                                 continue;
 628                         }
 629                         $nick = $user->getNick();
 630                         $ident = $user->getIdent();
 631                         $hostmask = $user->getHost();
 632                         $modes = $user->getModes();
 633                         if($modes->hasMode('x')) {
 634                                 if(($fakehost = $modes->hasMode('f'))) {
 635                                         $hostmask = $fakehost;
 636                                 } elseif(($account = $modes->hasMode('r'))) {
 637                                         $hostmask = $account.".".$this->getSetting("his_usermask");
 638                                 }
 639                         }
 640                         $realname = $user->getRealname();
 641                         $this->send("311", $from , $nick, $ident, $hostmask, $realname);
 642                         if(((!$modes->hasMode('n') && !$modes->hasMode('k')) || $from == $user->getNumeric()) && count($user->getChannels()) != 0) {
 643                                 $channels = "";
 644                                 foreach($user->getChannels() as $channel) {
 645                                         $cmodes = $channel->getModes();
 646                                         $privs = $channel->getUserPrivs($user);
 647                                         if($cmodes->hasMode("s") && !$fromUser->isOnChannel($channel) && $from != $user->getNumeric()) continue;
 648                                         if($cmodes->hasMode("u") && ($privs & (P10_Channel::USERPRIV_OPED | P10_Channel::USERPRIV_VOICE)) == 0 && $from != $user->getNumeric()) continue;
 649                                         $chanstr = ($channels == "" ? "" : " ");
 650                                         $prefix = "";
 651                                         if(($privs & P10_Channel::USERPRIV_OPED)) {
 652                                                 $prefix = "@";
 653                                         } else if(($privs & P10_Channel::USERPRIV_VOICE)) {
 654                                                 $prefix = "+";
 655                                         }
 656                                         $chanstr .= $prefix.$channel->getName();
 657                                         if(strlen($channels) + strlen($chanstr) > 450) {
 658                                                 $this->send("319", $from, $nick, $channels);
 659                                                 $channels = $prefix.$channel->getName();
 660                                         }
 661                                 }
 662                                 if($channels != "") {
 663                                         $this->send("319", $from, $nick, $channels);
 664                                 }
 665                         }
 666                         if($fromUser->getModes()->hasMode("o") || $from == $user->getNumeric() || !$this->getSetting("his_name")) {
 667                                 $this->send("312", $from, $nick, $user->getServer()->getName(), $user->getServer()->getDescription());
 668                         } else {
 669                                 $this->send("312", $from, $nick, $this->getSetting("his_name"), $this->getSetting("his_desc"));
 670                         }
 671                         if($modes->hasMode("o") && (!$modes->hasMode("H") || $fromUser->getModes()->hasMode("o"))) {
 672                                 if($modes->hasMode("S")) {
 673                                         if($modes->hasMode("D"))
 674                                                 $this->send("313", $from, $nick, "is a Network Service");
 675                                         else
 676                                                 $this->send("313", $from, $nick, "is an illegal Network Service - HACKER!");
 677                                 } else
 678                                         $this->send("313", $from, $nick, "is an IRC Operator");
 679                         }
 680                         if(($auth = $modes->hasMode("r"))) {
 681                                 $this->send("330", $from, $nick, $auth);
 682                         }
 683                 }
 684                 $this->send("318", $from, $args[1]);
 685         }
 686
 687         private function recv_away($from, $args) {
 688                 $user = P10_User::getUserByNum($from);
 689                 if($user == null) {
 690                         trigger_error("Server tries to send an away command from an user that does not exist or was not found on recv_away.", E_USER_ERROR);
 691                         return;
 692                 }
 693                 if(count($args) > 0) {
 694                         $user->setAway($args[0]);
 695                         if($this->eventHandler)
 696                                 $this->eventHandler->event_away($user, $args[0]);
 697                 } else {
 698                         $user->setAway(null);
 699                         if($this->eventHandler)
 700                                 $this->eventHandler->event_away($user, null);
 701                 }
 702         }
 703
 704         private function recv_mode($from, $args) {
 705                 $user = P10_User::getUserByNum($from);
 706                 if($user == null && strlen($from) != 2) {
 707                         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);
 708                         return;
 709                 }
 710                 $modes = implode(" ",array_slice($args,1));
 711                 if($args[0][0] == "#") {
 712                         $channel = P10_Channel::getChannelByName($args[0]);
 713                         if($channel == null)
 714                                 $channel = new P10_Channel($args[0]);
 715                         $channel->getModes()->setModes($modes);
 716                         if($this->eventHandler && strlen($from) != 2)
 717                                 $this->eventHandler->event_chanmode($user, $channel, $modes);
 718                 } else {
 719                         $targetUser = P10_User::getUserByNick($args[0]);
 720                         if($targetUser == null) {
 721                                 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);
 722                                 return;
 723                         }
 724                         $targetUser->getModes()->setModes($modes);
 725                         if($this->eventHandler)
 726                                 $this->eventHandler->event_usermode($targetUser, $modes);
 727                 }
 728         }
 729
 730     private function recv_account($from, $args) {
 731                 $user = P10_User::getUserByNum($args[0]);
 732                 if($user == null) {
 733                         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);
 734                         return;
 735                 }
 736                 $auth = $args[1];
 737                 $user->getModes()->setModes("+r ".$auth);
 738         if($this->eventHandler)
 739             $this->eventHandler->event_usermode($user, "+r ".$auth);
 740         }
 741
 742     private function recv_fakehost($from, $args) {
 743                 $user = P10_User::getUserByNum($args[0]);
 744                 if($user == null) {
 745                         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);
 746                         return;
 747                 }
 748                 $fakehost = $args[1];
 749                 $user->getModes()->setModes("+f ".$fakehost);
 750         if($this->eventHandler)
 751             $this->eventHandler->event_usermode($user, "+f ".$fakehost);
 752         }
 753
 754     private function recv_newfakehost($from, $args) {
 755                 $user = P10_User::getUserByNum($args[0]);
 756                 if($user == null) {
 757                         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);
 758                         return;
 759                 }
 760         $fakeident = $args[1];
 761                 $fakehost = $args[2];
 762         $user->setIdent($fakeident);
 763                 $user->getModes()->setModes("+f ".$fakehost);
 764         if($this->eventHandler)
 765             $this->eventHandler->event_usermode($user, "+f ".$fakehost);
 766         }
 767
 768         /********************************************************************************************
 769          *                                     SERVER FUNCTIONS                                     *
 770          ********************************************************************************************/
 771
 772         private function burst() {
 773                 foreach($this->server->getUsers() as $user) {
 774                         $nick = $user->getNick();
 775                         $connect_time = $user->getConnectTime();
 776                         $ident = $user->getIdent();
 777                         $host = $user->getHost();
 778                         $modes = $user->getModes()->getModeString();
 779                         $ip = $user->getIP()->getNumeric();
 780                         $numeric = $user->getNumeric();
 781                         $realname = $user->getRealname();
 782                         $this->send("N", $nick, $connect_time, $ident, $host, $modes, $ip, $numeric, $realname);
 783                 }
 784                 foreach(P10_Channel::getChannels() as $channel) {
 785             $privs_to_burst = array('o',                        'h',                          'v'                         );
 786             $priv_values =    array(P10_Channel::USERPRIV_OPED, P10_Channel::USERPRIV_HALFOP, P10_Channel::USERPRIV_VOICE );
 787             $priv_combinations = array();
 788             $sorted_users = array();
 789             $combinations = pow(2, count($privs_to_burst)); //binary possibilities => 2^count($privs_to_burst)
 790             for($i = 0; $i < $combinations; $i++) {
 791                 //make a binary number out of $i
 792                 $binary = decbin($i);
 793                 while(strlen($binary) < count($privs_to_burst))
 794                     $binary = '0'.$binary;
 795                 $combination_name = '';
 796                 $combination_value = 0;
 797                 for($j = 0; $j < count($privs_to_burst); $j++) {
 798                     if($binary[$j] == '1') {
 799                         $combination_name .= $privs_to_burst[$j];
 800                         $combination_value += $priv_values[$j];
 801                     }
 802                 }
 803                 $priv_combinations[] = array("name" => $combination_name, "value" => $combination_value);
 804                 $sorted_users[$combination_value] = array();
 805             }
 806                         $local_users = false;
 807                         foreach($channel->getUsers() as $user) {
 808                                 if(substr($user->getNumeric(), 0, 2) != $this->server->getNumeric()) continue; //skip users that are not on the local server
 809                                 $privs = $channel->getUserPrivs($user);
 810                                 $local_users = true;
 811                                 $sorted_users[$privs][] = $user;
 812                         }
 813                         if(!$local_users) continue;
 814                         $userStr = "";
 815             foreach($priv_combinations as $combination) {
 816                 $i = 0;
 817                 foreach($sorted_users[$combination['value']] as $user) {
 818                     if($userStr != "") $userStr.=",";
 819                     $userStr .= $user->getNumeric();
 820                     if(($i++) == 0 && $combination['value'] > 0) {
 821                         $userStr .= ":".$combination['name'];
 822                     }
 823                 }
 824             }
 825                         $banString = "";
 826                         //TODO: Build ban String
 827                         $burstString = "";
 828                         $modeString = $channel->getModes()->getModeString();
 829                         if($modeString != "+") {
 830                                 $burstString .= $modeString;
 831                         }
 832                         if($userStr != "") {
 833                                 if($burstString != "") $burstString .= " ";
 834                                 $burstString .= $userStr;
 835                         }
 836                         if($banString != "") {
 837                                 if($burstString != "") $burstString .= " ";
 838                                 $burstString .= ":%".$banString;
 839                         }
 840                         $this->send("B", $channel->getName(), $channel->getCreateTime(), $burstString);
 841                 }
 842                 $this->send("EB");
 843         }
 844
 845         /********************************************************************************************
 846          *                                    LOCAL USER FUNCTIONS                                  *
 847          ********************************************************************************************/
 848
 849         public function addUser($nick, $ident, $host, $ip, $modes, $realname) {
 850                 $user = P10_User::getUserByNick($nick);
 851                 if($user != null) return ERR_NICK_IN_USE;
 852                 $numeric = substr($this->server->getNumeric(),0,2).Numerics::intToNum($this->last_local_numeric, 3);
 853                 while(P10_User::getUserByNum($numeric)) {
 854                         $this->last_local_numeric++;
 855                         $numeric = substr($this->server->getNumeric(),0,2).Numerics::intToNum($this->last_local_numeric, 3);
 856                 }
 857                 $this->last_local_numeric++;
 858                 $modes = new P10_UserModeSet($modes);
 859                 $ip = new IPAddr($ip);
 860                 $user = new P10_User($nick, $numeric, $this->server, time(), $ident, $host, $ip, $realname, $modes);
 861                 if(($this->flags & self::FLAG_CONNECTED)) {
 862                         $ip = $user->getIP()->getNumeric();
 863                         $this->send("N", $nick, $user->getConnectTime(), $ident, $host, $user->getModes()->getModeString(), $ip, $numeric, $realname);
 864                 }
 865                 return $user;
 866         }
 867
 868         public function delUser($user, $reason) {
 869                 if(!is_a($user, "P10_User")) return ERR_INVALID_USER;
 870                 if($user->getServer() === $this->server) {
 871                         //local user (QUIT)
 872                         $user->quit($reason);
 873                         if(($this->flags & self::FLAG_CONNECTED))
 874                                 $this->send("Q", $user->getNumeric(), $reason);
 875                 } else {
 876                         //remote user (KILL)
 877                         if(!($this->flags & self::FLAG_CONNECTED))
 878                                 return ERR_NOT_CONNECTED;
 879                         if($this->eventHandler)
 880                                 $this->eventHandler->event_quit($user, "Killed (".$reason.")");
 881                         $user->quit("Killed (".$reason.")");
 882                         $name = ($this->getSetting('his_name') ? $this->getSetting('his_name') : $this->getSetting('name'));
 883
 884                         $this->send("D", $user->getNumeric(), $name, $reason);
 885                 }
 886         }
 887
 888         public function join($user, $chanName, $privs = 0) {
 889                 if(!is_a($user, "P10_User") || !($user->getServer() === $this->server))
 890                         return ERR_INVALID_USER;
 891                 if($chanName[0] != "#")
 892                         return ERR_INVALID_CHANNAME;
 893                 $channel = P10_Channel::getChannelByName($chanName);
 894                 if($channel == null)
 895                         $channel = new P10_Channel($chanName);
 896                 $channel->joinUser($user);
 897                 if(($this->flags & self::FLAG_CONNECTED))
 898                         $this->send("J", $user->getNumeric(), $chanName, time(), 0);
 899                 if($privs != 0) {
 900                         $channel->setUserPrivs($user, $privs);
 901                         if(($this->flags & self::FLAG_CONNECTED)) {
 902                                 $modestr = "+".(($privs & P10_Channel::USERPRIV_OPED) ? "o" : "").(($privs & P10_Channel::USERPRIV_HALFOP) ? "h" : "").(($privs & P10_Channel::USERPRIV_VOICE) ? "v" : "");
 903                                 $modestr .= (($privs & P10_Channel::USERPRIV_OPED) ? " ".$user->getNumeric() : "");
 904                 $modestr .= (($privs & P10_Channel::USERPRIV_HALFOP) ? " ".$user->getNumeric() : "");
 905                                 $modestr .= (($privs & P10_Channel::USERPRIV_VOICE) ? " ".$user->getNumeric() : "");
 906                                 $this->send("OM", $user->getNumeric(), $chanName, $modestr);
 907                         }
 908                 }
 909                 if($this->eventHandler)
 910                         $this->eventHandler->event_join($user, $channel, false);
 911         }
 912
 913         public function part($user, $chanName, $reason) {
 914                 if(!is_a($user, "P10_User") || !($user->getServer() === $this->server))
 915                         return ERR_INVALID_USER;
 916                 if(!((is_string($chanName) && $chanName[0] == "#") || is_a($chanName, "P10_Channel")))
 917                         return ERR_INVALID_CHANNAME;
 918                 if(is_a($chanName, "P10_Channel"))
 919                         $channel = $chanName;
 920                 else
 921                         $channel = P10_Channel::getChannelByName($chanName);
 922                 if($channel == null)
 923                         $channel = new P10_Channel($chanName);
 924                 if(!$user->isOnChannel($channel))
 925                         return ERR_NOT_ON_CHANNEL;
 926                 if($this->eventHandler)
 927                         $this->eventHandler->event_part($user, $channel, $reason);
 928                 $channel->partUser($user, $reason);
 929                 if(($this->flags & self::FLAG_CONNECTED))
 930                         $this->send("L", $user->getNumeric(), $chanName, $reason);
 931         }
 932
 933         public function kick($user, $target, $chanName, $reason) {
 934                 if(!is_a($user, "P10_User") || !($user->getServer() === $this->server))
 935                         return ERR_INVALID_USER;
 936                 if(!is_a($target, "P10_User"))
 937                         return ERR_INVALID_USER;
 938                 if(!((is_string($chanName) && $chanName[0] == "#") || is_a($chanName, "P10_Channel")))
 939                         return ERR_INVALID_CHANNAME;
 940                 if(is_a($chanName, "P10_Channel"))
 941                         $channel = $chanName;
 942                 else
 943                         $channel = P10_Channel::getChannelByName($chanName);
 944                 if($channel == null)
 945                         $channel = new P10_Channel($chanName);
 946                 if(!$target->isOnChannel($channel))
 947                         return ERR_NOT_ON_CHANNEL;
 948                 if($this->eventHandler)
 949                         $this->eventHandler->event_kick($user, $target, $channel, $reason);
 950                 $channel->partUser($target, $reason);
 951                 if(($this->flags & self::FLAG_CONNECTED))
 952                         $this->send("K", $user->getNumeric(), $channel->getName(), $target->getNumeric(), $reason);
 953         }
 954
 955         public function privmsg($user, $target, $message) {
 956                 if(!is_a($user, "P10_User") || !($user->getServer() === $this->server))
 957                         return ERR_INVALID_USER;
 958                 if(!is_a($target, "P10_User") && !is_a($target, "P10_Channel") && !(is_string($target) && ($target[0] == "#" || P10_User::getUserByNick($target))))
 959                         return ERR_INVALID_USER;
 960                 if(is_a($target, "P10_Channel"))
 961                         $targetStr = $target->getName();
 962                 else if(is_a($target, "P10_User"))
 963                         $targetStr = $target->getNumeric();
 964                 else if($target[0] == "#")
 965                         $targetStr = $target;
 966                 else
 967                         $targetStr = P10_User::getUserByNick($target)->getNumeric();
 968
 969                 if($this->eventHandler) {
 970                         if($targetStr[0] == "#") {
 971                                 $channel = P10_Channel::getChannelByName($targetStr);
 972                                 if($channel == null)
 973                                         $channel = new P10_Channel($targetStr);
 974                                 $this->eventHandler->event_chanmessage($user, $channel, $message);
 975                         } else {
 976                                 $targetUser = P10_User::getUserByNum($targetStr);
 977                                 $this->eventHandler->event_privmessage($user, $targetUser, $message);
 978                         }
 979                 }
 980                 if(($this->flags & self::FLAG_CONNECTED))
 981                         $this->send("P", $user->getNumeric(), $targetStr, $message);
 982         }
 983
 984         public function notice($user, $target, $message) {
 985                 if(!is_a($user, "P10_User") || !($user->getServer() === $this->server))
 986                         return ERR_INVALID_USER;
 987                 if(!is_a($target, "P10_User") && !is_a($target, "P10_Channel") && !(is_string($target) && ($target[0] == "#" || P10_User::getUserByNick($target))))
 988                         return ERR_INVALID_USER;
 989                 if(is_a($target, "P10_Channel"))
 990                         $targetStr = $target->getName();
 991                 else if(is_a($target, "P10_User"))
 992                         $targetStr = $target->getNumeric();
 993                 else if($target[0] == "#")
 994                         $targetStr = $target;
 995                 else
 996                         $targetStr = P10_User::getUserByNick($target)->getNumeric();
 997
 998                 if($this->eventHandler) {
 999                         if($targetStr[0] == "#") {
1000                                 $channel = P10_Channel::getChannelByName($targetStr);
1001                                 if($channel == null)
1002                                         $channel = new P10_Channel($targetStr);
1003                                 $this->eventHandler->event_channotice($user, $channel, $message);
1004                         } else {
1005                                 $targetUser = P10_User::getUserByNum($targetStr);
1006                                 $this->eventHandler->event_privnotice($user, $targetUser, $message);
1007                         }
1008                 }
1009                 if(($this->flags & self::FLAG_CONNECTED))
1010                         $this->send("O", $user->getNumeric(), $targetStr, $message);
1011         }
1012
1013         public function mode($user, $target, $modes, $force = false) {
1014                 if(!is_a($user, "P10_User") || !($user->getServer() === $this->server))
1015                         return ERR_INVALID_USER;
1016                 if(!is_a($target, "P10_User") && !is_a($target, "P10_Channel") && !(is_string($target) && ($target[0] == "#" || P10_User::getUserByNick($target))))
1017                         return ERR_INVALID_USER;
1018                 if(is_a($target, "P10_Channel"))
1019                         $targetStr = $target->getName();
1020                 else if(is_a($target, "P10_User"))
1021                         $targetStr = $target->getNumeric();
1022                 else if($target[0] == "#")
1023                         $targetStr = $target;
1024                 else
1025                         $targetStr = P10_User::getUserByNick($target)->getNumeric();
1026
1027                 if($targetStr[0] == "#") {
1028                         $channel = P10_Channel::getChannelByName($targetStr);
1029                         if($channel == null)
1030                                 $channel = new P10_Channel($targetStr);
1031                         $modes = $channel->getModes()->setModes($modes, true);
1032                         if(($this->flags & self::FLAG_CONNECTED))
1033                                 $this->send(($force ? "OM" : "M"), $user->getNumeric(), $targetStr, $modes);
1034                         if($this->eventHandler)
1035                                 $this->eventHandler->event_chanmode(($force ? $this->server : $user), $channel, $modes);
1036                 } else {
1037                         $targetUser = P10_User::getUserByNum($targetStr);
1038                         if($targetUser->getServer() === $this->server) {
1039                                 //just do it :D
1040                                 $modes = $targetUser->getModes()->setModes($modes, true);
1041                                 if(($this->flags & self::FLAG_CONNECTED))
1042                                         $this->send("M", $targetUser->getNumeric(), $targetUser->getNick(), $modes);
1043                                 if($this->eventHandler)
1044                                         $this->eventHandler->event_usermode($targetUser, $modes);
1045                         } else {
1046                                 //SVSMODE
1047                                 if(($this->flags & self::FLAG_CONNECTED))
1048                                         $this->send("SM", $user->getNumeric(), $targetUser->getNumeric(), $modes);
1049                         }
1050                 }
1051         }
1052
1053         public function ctcp($user, $target, $command, $text) {
1054                 return $this->privmsg($user, $target, "\001".strtoupper($command)." ".$text."\001");
1055         }
1056
1057         public function ctcp_reply($user, $target, $command, $text) {
1058                 return $this->notice($user, $target, "\001".strtoupper($command)." ".$text."\001");
1059         }
1060
1061 }
1062
1063 ?>