<?php

//not in CLI mode, return nothing...

if(php_sapi_name() != 'cli') exit();

//includ tools

include 'config/init.php';

include 'lib/db.php';

include 'lib/aes.php';

include 'model/relay.php';

//configs ...

$host = '0.0.0.0'; //host

$port = '8080'; //port

$title = "Xhat - zumbi";

$null = NULL; //null var

$bufLen = 16784; //buffer (recever/send) length

$timerSet = ( 1 * 60 ); //em segundos = ( h * m * s )

$timer = time() + $timerSet; //start ...

//Status ...

$us_now = 0;

$us_max = 0;

$cha_now = 0;

$cha_max = 0;

//Command line settings...

array_shift($argv);

foreach($argv as $a){

if(strpos($a, '-h') !== false || strpos($a, '?') !== false) exit(help());

if(strpos($a, '-a:') !== false) $host = substr($a, 3);

if(strpos($a, '-p:') !== false) $port = substr($a, 3);

if(strpos($a, '-t:') !== false) $title = substr($a, 3);

if(strpos($a, '-s') !== false) defined('SHOW') || define('SHOW', true);

if(strpos($a, '-l') !== false) defined('LOG') || define('LOG', true);

}

//Default settings

defined('SHOW') || define('SHOW', false);

defined('LOG') || define('LOG', false);

//welcome message

terminal("PHP CHAT RELAY\n\tCTRL+C for stop");

//Initialize DB data Model

$db = new Model\Relay($config['db']['mysql']);

$db->initalize($title, $host, $port);

//Create TCP/IP stream socket

$socket = socket_create(AF_INET, SOCK_STREAM, SOL_TCP);

//reuseable port

socket_set_option($socket, SOL_SOCKET, SO_REUSEADDR, 1);

//bind socket to specified host

socket_bind($socket, 0, $port);

//listen to port

if (socket_listen($socket))

terminal("Wait for connections!\n\tAddress: ".$host.':'.$port);

//create & add listning socket to the list

$clients = array($socket);

$users = array();

//if(isset($clients[0])) unset($clients[0]);

//echo "\n\n------------- clients: ".print_r($clients);

//start endless loop, so that our script doesn't stop ------------------------------------------------- START LOOP

while (true) {

//manage multipal connections

$changed = $clients;

//returns the socket resources in $changed array

socket_select($changed, $null, $null, 0, 10);

//check for new socket

if (in_array($socket, $changed)) {

$socket_new = socket_accept($socket); //accepet new socket

$clients[] = $socket_new; //add socket to client array

$header = socket_read($socket_new, $bufLen); //read data sent by the socket

//terminal("HEADER \r\n", $header);

$hc = perform_handshaking($header, $socket_new, $host, $port); //perform websocket handshake

if(!$hc) array_pop($clients); //ignora se não for handshaking !!

//socket_getpeername($socket_new, $ip); //get ip address of connected socket //IRRELEVANTE

//make room for new socket

$found_socket = array_search($socket, $changed);

unset($changed[$found_socket]);

$skt = array_search($socket_new, $clients);

$users[$skt] = array('channel' => 'null');

terminal('CONNECTED', $users);

}

//loop through all connected sockets

foreach ($changed as $changed_socket) {

//check for any incomming data

while (socket_recv($changed_socket, $buf, $bufLen, 0) >= 1) {

//echo "\n\n changed: ".print_r($changed_socket, true)."\n buffer: ".print_r($buf, true)."\n ---------finish Changed ---------\n\n";

$skt = array_search($changed_socket, $changed);

$received_text = unmask($buf); //unmask data

$msg = json_decode($received_text); //json decode

//Decodificando...

$msg = $db->decMSG($msg);

if($msg === false) break;

//if (!isset($msg->channel) || $msg->channel == 'null')

//break 1; //evitando null: null

dp('linha 123, recebendo algum texto');

//HTML scapes

//$msg->message = strip_tags($msg->message, '<h1><h2><p><b><i><s><br><hr><ul><ol><li>');

//if($msg->message == '//serveroutnow') exit("\r\n\r\n".'SERVER OUT From users online!!');

terminal('MESSAGE IN', $msg); //echo

//Call controllers

switch ($msg->type) {

case 'chkey':

$db->changeKey($msg);

break;

case 'msg':

case 'file':

case 'audio':

case 'video':

case 'image':

//to private message/file

$tmpu = (isset($msg->to)) ? $msg->to : null;

//Atualiza o canal do usuário

$users[$skt]['channel'] = $msg->channel;

sendMessage(get_object_vars($msg), $tmpu, $msg->channel);

$db->saveMSG($msg);

break;

case 'init':

//Checando se o canal existe

/*if($msg->channel != 0){ dp();

echo 'User: '.$msg->userid+' channel: '+$msg->channel;

$channel = $db->channelExists($msg->userid, $msg->channel);

if($channel === false) {

terminal('Canal invalido: '.$msg->channel);

sendMessage(array('type' => 'out',

'id'=>$skt,

'message'=>'This channel is OFF!'),

null,

$msg->channel);

break;

} else $msg->channelName = $channel['name'];

}*/

//insert new user

$msg->id = $skt;

updateUser($msg);

dp('Depois de INIT');

//return ID

sendMessage(array('type' => 'init',

'id'=>$msg->id,

'message'=>'',

'users' => ''),

$skt,

$msg->channel);

dp('Depois de enviar mensagem');

/*

//search for users in just room.

$userList = searchUser('channel', $msg->channel);

//new user notice

sendMessage(array('type' => 'sinc',

'id'=>$msg->id,

'message'=>'new',

'users' => $userList),

null,

$msg->channel);*/

break;

/*case 'sinc':

//search for users in just room.

$userList = searchUser('channel', $msg->channel);

//new user notice

sendMessage(array('type' => 'sinc',

'id'=>$skt,

'message'=>'update',

'users' => $userList),

null,

$msg->channel);

break;

case 'out':

//delete user

unset($clients[$skt], $users[$skt]);

//search for users in just room.

$userList = searchUser('channel', $msg->channel);

//send user list

sendMessage(array('type' => 'sinc',

'id'=>$skt,

'message'=>'out',

'users' => ''),

null,

$msg->channel);

break;

*/

default:

# no code...

break;

}

break 2; //exit this sub-loop, only

}

$buf = '';

$buf = @socket_read($changed_socket, null, PHP_NORMAL_READ); dp('changed socket: '.$changed_socket);

if ($buf === false) { // client is off?

// remove client for $clients array

$found_socket = array_search($changed_socket, $clients); echo "\n\nDESCON:".$found_socket."\n\n";

//log

terminal('DISCONNECTED', $users[$found_socket]);

//Apagando o usuário nmo DB

$db->deleteUser($users[$found_socket]['userid']);

//notify all users about disconnected connection

sendMessage(array('type' => 'out',

'id'=>$users[$found_socket]['userid'],

'message'=>''), null, $users[$found_socket]['channel']);

//deleting this user

unset($clients[$found_socket]);

unset($users[$found_socket]);

}

}

//TIMER ------------------------------------------------------------------------------------------------

if($timer <= time()) {

//Atualizando

$us_now = count($users);

$us_max = $us_now > $us_max ? $us_now : $us_max;

//Verificando Status

if($db->stop()) break;

//Atualizando dados no BD

$db->theUpdate($us_now, $us_max, $cha_now, $cha_max);

$timer = time() + $timerSet;

}

}

//close the listening socket (after BREAK LOOP)

socket_close($socket);

//Gravando o status de saida no DB

$db->theUpdate($us_now, $us_max, $cha_now, $cha_max, true);

//---------------------------------------------------------------------------------------------------- The FINISH!!

// FUNCTIONS \o_

function dp($txt = ''){

global $clients, $users, $msg;

echo "\n\n Dumping - $txt :\nMsg: ".print_r($msg, true)."\nUsers: \n".print_r($users, true)."\nClients: \n".print_R($clients, true)."\n -------- finish Dumping . \n";

}

//Send message for all || this user

function sendMessage($msg, $user = null, $channel = null) {

}

//Unmask incoming framed message

function unmask($text) {

}

//Encode message for transfer to client.

function mask($text) {

}

//handshake new client.

function perform_handshaking($receved_header, $client_conn, $host, $port) {

}

//Insert/Update a user

function updateUser($data){

}

/* Search in users list for an value in key

*

* @param {string} key = name of the index

* @param {string} value = value searched

* @returns {array|boolean} User list data or false

*/

function searchUser($key, $value){

}

//tabula data to echoes...

function tabell($val, $tab = 0){

}

//Echo log data and save in file to web monitoring...

function terminal($text, $msg = null){

}

//Help display

function help(){