2 /********************************* PHP-P10 ******************************
3 * P10 uplink class by pk910 (c)2011 pk910 *
4 ************************************************************************
7 * PHP-P10 is free software; you can redistribute it and/or modify *
8 * it under the terms of the GNU General Public License as published by *
9 * the Free Software Foundation; either version 2 of the License, or *
10 * (at your option) any later version. *
12 * This program is distributed in the hope that it will be useful, *
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of *
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
15 * GNU General Public License for more details. *
17 * You should have received a copy of the GNU General Public License *
18 * along with PHP-P10; if not, write to the Free Software Foundation, *
19 * Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA. *
21 ************************************************************************
23 * Uplink/Uplink.class.php
25 * This file contains the basic P10 Protocol handler.
27 ************************************************************************
31 * has to be called after the settings have been set.
34 * loop function that should be calles as many times as possible.
35 * It reads from the socket and BLOCKS the script execution for a
36 * specific time if nothing is received.
38 * void setUplinkHost(String $host, int $port, bool $ssl = false, String $bind = null)
39 * sets the Uplink connection information.
41 * void setLoopTimeout(int $timeout)
42 * sets the maximum time loop() is blocking the script execution.
44 * void setUplinkServer(int $numeric, String $name, String $password, String $description)
45 * sets the own P10 Server information.
47 * void setValidateServer(String $name, String $password)
48 * sets additional security relevant information about the remote server.
50 * void setEventHandler(EventHandler $event_handler)
51 * sets the EventHandlder
53 require_once("Client.class.php");
54 require_once("Numerics.class.php");
55 require_once("P10Formatter.class.php");
56 require_once("P10_Server.class.php");
57 require_once("P10_User.class.php");
58 require_once("P10_Channel.class.php");
59 require_once("P10_ModeSets.class.php");
63 private $settings = array();
66 const FLAG_P10SESSION = 0x0001; //connection is in P10 mode (server is connected)
67 const FLAG_SECURITY_QUIT = 0x0002; //local connection abort because of security issues
68 const FLAG_NOT_CONNECTABLE = 0x0004; //remote server is not connectable
69 const FLAG_BURST_PENDING = 0x0008; //we still have to burst
70 const FLAG_CONNECTED = 0x0010; //connected and synced (ready)
71 const FLAG_GOT_PASS = 0x0020; //got PASS from the remote Server
74 public function __construct() {
75 $this->client = new Client();
76 $this->setSetting("recv_timeout", 1000);
79 public function initialize() {
81 trigger_error("Uplink already initialized.", E_USER_ERROR);
84 $self_numeric = $this->getSetting("numeric");
85 $self_name = $this->getSetting("name");
86 $self_description = $this->getSetting("description");
87 if(!$self_numeric || !$self_name) {
88 trigger_error("Server Settings missing.", E_USER_ERROR);
91 $this->server = new P10_Server($self_name, $self_numeric, null, time(), time(), $self_description);
94 public function loop() {
95 if($this->server == null) {
96 trigger_error("Uplink not initialized.", E_USER_ERROR);
99 if(!$this->client->connected()) {
100 if(($this->flags & self::FLAG_P10SESSION)) {
101 //Server got disconnected
102 $this->server->disconnectServer(true);
103 $this->flags &= ~self::FLAG_P10SESSION;
105 $host = $this->getSetting("host");
106 $port = $this->getSetting("port");
107 if($host == null || $port == null) {
108 trigger_error("Uplink Settings missing.", E_USER_ERROR);
111 if(($this->flags & self::FLAG_SECURITY_QUIT) || ($this->flags & self::FLAG_NOT_CONNECTABLE)) {
114 $state = $this->client->connect($host, $port, $this->getSetting("bind"), $this->getSetting("ssl"), $this->getSetting("recv_timeout"));
116 usleep($this->getSetting("recv_timeout") / 1000);
117 $this->flags |= self::FLAG_NOT_CONNECTABLE;
121 $this->loginServer();
123 //try to receive new data from the Uplink
124 $lines = $this->client->recv();
125 if($lines == null) return;
126 foreach($lines as $line) {
127 $this->parseLine($line);
131 public function setUplinkHost($host, $port, $ssl = false, $bind = null) {
132 $this->setSetting("host", $host);
133 $this->setSetting("port", $port);
134 $this->setSetting("ssl", $ssl);
135 $this->setSetting("bind", $bind);
138 public function setLoopTimeout($timeout) {
139 $this->setSetting("recv_timeout", $timeout);
142 public function setUplinkServer($numeric, $name, $password, $description) {
143 $this->setSetting("numeric", Numerics::intToNum($numeric, 2));
144 $this->setSetting("name", $name);
145 $this->setSetting("password", $password);
146 $this->setSetting("description", $description);
149 public function setValidateServer($name, $password) {
150 $this->setSetting("their_name", $name);
151 $this->setSetting("their_password", $password);
154 private function setSetting($setting, $value) {
155 $this->settings[$setting] = $value;
158 private function getSetting($setting) {
159 if(array_key_exists($setting, $this->settings)) {
160 return $this->settings[$setting];
166 private function loginServer() {
167 $password = $this->getSetting("password");
168 $this->send("PASS", $password);
169 $this->send("SERVER", $this->server->getName(), $this->server->getStartTime(), $this->server->getLinkTime(), $this->server->getNumeric(), $this->server->getDescription());
172 private function parseLine($line) {
173 $highExplode = explode(" :", $line, 2);
174 $tokens = explode(" ", $highExplode[0]);
175 if(count($highExplode) > 1)
176 $tokens[] = $highExplode[1];
177 $cmdPos = (($this->flags & self::FLAG_P10SESSION) ? 1 : 0);
178 if($cmdPos == 1) $from = $tokens[0];
180 $arguments = array_slice($tokens, $cmdPos + 1);
181 switch(strtoupper($tokens[$cmdPos])) {
184 $this->recv_pass($from, $arguments);
187 $this->recv_server($from, $arguments);
190 $this->recv_error($from, $arguments);
194 $this->recv_server($from, $arguments);
197 $this->recv_ping($from, $arguments);
200 $this->recv_nick($from, $arguments);
203 $this->recv_end_of_burst($from, $arguments);
206 $this->recv_end_of_burst_ack($from, $arguments);
209 $this->recv_server_quit($from, $arguments);
212 $this->recv_quit($from, $arguments);
215 $this->recv_burst($from, $arguments);
219 $this->recv_join($from, $arguments);
222 $this->recv_part($from, $arguments);
231 private function send($command) {
232 if(func_num_args() > 1) {
233 $args = array_slice(func_get_args(), 1);
234 $command = P10Formatter::formatCMD($this->getSetting("numeric"), $command, $args);
236 $command = P10Formatter::formatCMD($this->getSetting("numeric"), $command, array());
238 $this->client->send($command);
241 /********************************************************************************************
242 * INCOMING COMMANDS *
243 ********************************************************************************************/
245 private function recv_pass($from, $args) {
246 $their_pass = $this->getSetting("their_password");
248 if($args[0] != $their_pass) {
250 $this->flags |= self::FLAG_SECURITY_QUIT;
251 $this->send("ERROR", "Incorrect password received.");
252 $this->client->disconnect();
255 $this->flags |= self::FLAG_GOT_PASS;
259 private function recv_error($from, $args) {
260 //we received an error - the socket is dead for us, now
261 //maybe we want to log this, later
262 $this->client->disconnect();
265 private function recv_server($from, $args) {
268 $their_name = $this->getSetting("their_name");
269 if($their_name && $args[0] != $their_name) {
270 $this->flags |= self::FLAG_SECURITY_QUIT;
271 $this->send("ERROR", "Invalid Server name");
272 $this->client->disconnect();
275 if($this->getSetting("their_password") && !($this->flags & self::FLAG_GOT_PASS)) {
276 $this->flags |= self::FLAG_SECURITY_QUIT;
277 $this->send("ERROR", "PASS missing.");
278 $this->client->disconnect();
281 $new_server = new P10_Server($args[0], substr($args[5],0,2), $this->server, $args[2], $args[3], $args[7]);
282 $this->server->addServer($new_server);
283 $this->flags |= self::FLAG_P10SESSION | self::FLAG_BURST_PENDING;
285 //another server got a new slave server ^^
286 $server = P10_Server::getServerByNum($from);
287 if($server == null) {
288 trigger_error("Parent Server (".$from.") does not exist or was not found on recv_server.", E_USER_ERROR);
291 $new_server = new P10_Server($args[0], substr($args[5],0,2), $server, $args[2], $args[3], $args[7]);
292 $server->addServer($new_server);
296 private function recv_ping($from, $args) {
297 $this->send("Z", $args[0]); //simply PONG
300 private function recv_nick($from, $args) {
301 if(count($args) <= 2) {
303 $user = P10_User::getUserByNum($from);
305 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);
308 $nick->setNick($args[0]);
311 $numeric = $args[count($args)-2];
313 $server = P10_Server::getServerByNum($from);
314 if($server == null) {
315 trigger_error("Server (".$from.") the User (".$nick.") is coming from does not exist or was not found on recv_nick.", E_USER_ERROR);
318 if(substr($numeric,0,2) != $from) {
319 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);
321 $connect_time = $args[2];
324 $modes = implode(" ",array_slice($args, 5, count($args)-8));
325 $modes = new P10_UserModeSet($modes);
326 $ip = Numerics::parseIP($args[count($args)-3]);
327 $realname = $args[count($args)-1];
328 new P10_User($nick, $numeric, $server, $connect_time, $ident, $host, $ip, $realname, $modes);
332 private function recv_end_of_burst($from, $args) {
333 if(($this->flags & self::FLAG_BURST_PENDING)) {
336 $this->flags &= ~self::FLAG_BURST_PENDING;
340 private function recv_end_of_burst_ack($from, $args) {
341 $this->flags |= self::FLAG_CONNECTED;
344 private function recv_server_quit($from, $args) {
345 $server = P10_Server::getServerByName($args[0]);
346 if($server == null) {
347 trigger_error("Server (".$args[0].") not found.", E_USER_ERROR);
350 $server->disconnectServer();
353 private function recv_quit($from, $args) {
354 $user = P10_User::getUserByNum($from);
356 trigger_error("Server tries to quit an user that does not exist or was not found on recv_quit.", E_USER_ERROR);
359 $user->quit($args[0]);
362 private function recv_burst($from, $args) {
364 $create_time = $args[1];
365 $channel = P10_Channel::getChannelByName($name);
367 $channel = new P10_Channel($name);
368 $channel->setCreateTime($create_time);
369 $modes = $channel->getModes();
370 $userstr = $args[count($args)-1];
371 $modeparamcount = count($args)-3;
372 if($userstr[0] == "%") {
374 $banlist = explode(" ", substr($userstr, 1));
375 foreach($banlist as $ban) {
378 $userstr = $args[count($args)-2];
381 if($userstr[0] == "+") { //MODE String
385 $users = explode(",",$userstr);
386 $isop = false; $isvoice = false;
387 foreach($users as $user) {
388 $uexp = explode(":", $user);
389 if(strlen($uexp[0]) != 5) {
390 trigger_error("burst parse error: '".$uexp[0]."' is not an user numeric.", E_USER_ERROR);
393 if(count($uexp) > 1) {
396 for($i = 0; $i < strlen($uexp[1]); $i++) {
397 if($uexp[1][0] == "@") $isop = true;
398 if($uexp[1][0] == "+") $isvoice = true;
401 $user = P10_User::getUserByNum($uexp[0]);
403 trigger_error("burst parse error: cant find User '".$uexp[0]."'.", E_USER_ERROR);
406 $channel->burstUser($user, $isop, $isvoice);
408 $modes->parseModes(implode(array_slice($args, 2, $modeparamcount)));
411 private function recv_join($from, $args) {
412 $user = P10_User::getUserByNum($from);
414 trigger_error("Server tries to join an user that does not exist or was not found on recv_join.", E_USER_ERROR);
417 $channel = P10_Channel::getChannelByName($args[0]);
419 $channel = new P10_Channel($args[0]);
420 $channel->joinUser($user);
423 private function recv_part($from, $args) {
424 $user = P10_User::getUserByNum($from);
426 trigger_error("Server tries to part an user that does not exist or was not found on recv_join.", E_USER_ERROR);
429 $channel = P10_Channel::getChannelByName($args[0]);
431 $channel = new P10_Channel($args[0]);
432 $channel->partUser($user, $args[1]);
435 /********************************************************************************************
437 ********************************************************************************************/
439 private function burst() {
440 foreach($this->server->getUsers() as $user) {
441 $nick = $user->getNick();
442 $connect_time = $user->getConnectTime();
443 $ident = $user->getIdent();
444 $host = $user->getHost();
445 $modes = $user->getModes()->getModeString();
446 $ip = Numerics::numericFromIP($user->getIP());
447 $numeric = $user->getNumeric();
448 $realname = $user->getRealname();
449 $this->send("N", $nick, $connect_time, $ident, $host, $modes, $ip, $numeric, $realname);
451 foreach(P10_Channel::getChannels() as $channel) {
452 $sorted_users = array('ov' => array(), 'o' => array(), 'v' => array(), '-' => array());
453 $local_users = false;
454 foreach($channel->getUsers() as $user) {
455 if(substr($user->getNumeric(), 0, 2) != $this->server->getNumeric()) continue; //skip users that are not on the local server
456 $privs = $channel->getUserPrivs($user);
458 if(($privs & P10_Channel::USERPRIV_OPED)) $strPrivs .= "o";
459 if(($privs & P10_Channel::USERPRIV_VOICE)) $strPrivs .= "v";
460 if($strPrivs == "") $strPrivs = "-";
462 $sorted_users[$strPrivs][] = $user;
464 if(!$local_users) continue;
466 foreach($sorted_users['-'] as $user) {
467 if($userStr != "") $userStr.=",";
468 $userStr .= $user->getNumeric();
470 foreach($sorted_users['ov'] as $i => $user) {
471 if($userStr != "") $userStr.=",";
472 $userStr .= $user->getNumeric();
473 if($i == 0) $userStr .= ":ov";
475 foreach($sorted_users['o'] as $i => $user) {
476 if($userStr != "") $userStr.=",";
477 $userStr .= $user->getNumeric();
478 if($i == 0) $userStr .= ":o";
480 foreach($sorted_users['v'] as $i => $user) {
481 if($userStr != "") $userStr.=",";
482 $userStr .= $user->getNumeric();
483 if($i == 0) $userStr .= ":v";
486 //TODO: Build ban String
488 $modeString = $channel->getModes()->getModeString();
489 if($modeString != "+") {
490 $burstString .= $modeString;
493 if($burstString != "") $burstString .= " ";
494 $burstString .= $userStr;
496 if($banString != "") {
497 if($burstString != "") $burstString .= " ";
498 $burstString .= ":%".$banString;
500 $this->send("B", $channel->getName(), $channel->getCreateTime(), $burstString);