<?php

namespace Phem\Environment;

use DateTime;
use Phem\Core\Collection;
use Phem\Libraries\MessageBus\CometPusher;
use Ratchet\Wamp\Exception;

/**
 * @author kubapet
 */
class Application
{
    private static function injectFCGIRequest($query)
    {
              
        $cmd = "SCRIPT_NAME=".getcwd().DS."index.php " .
        "SCRIPT_FILENAME=".getcwd().DS."index.php " .
        "DOCUMENT_ROOT=".getcwd()." " .
        "HTTP_HOST=".FPM_INJECT_HTTP_HOST." " .
        "REQUEST_METHOD=GET " .
        "QUERY_STRING=\"".$query."\" " .
        "REQUEST_URI=\"/index.php".$query."\" " .
        "cgi-fcgi -bind -connect 127.0.0.1:".FPM_INJECT_PORT." > /tmp/app.log &";
        
        echo $cmd;
        
        echo "BEGIN".exec($cmd)."END";
        
        
    }
    
    public static function runParallelTask($controller,$task,$args = null)
    {
        $query = "controller=$controller&task=$task";
        foreach ($args as $key => $arg)
        {
            $query .= "&$key=$arg";
        }
        
        self::injectFCGIRequest($query);
    }

    /**
     * 
     * @return Collection
     */
    public static function getUsers()
    {
        if (self::getVar("Phem.".APP_NAMESPACE.".Users") == null)
        {
            self::setVar("Phem.".APP_NAMESPACE.".Users",new Collection());
        }
        return self::getVar("Phem.".APP_NAMESPACE.".Users");
    }
    
    public static function setUsers(Collection $users)
    {
         self::setVar("Phem.".APP_NAMESPACE.".Users",$users);
    }
    
    /**
     * 
     * @return Collection
     */
    public static function getRecentlyLoggedUsers()
    {
        if (self::getVar("Phem.".APP_NAMESPACE.".RLUsers") == null)
        {
            self::setVar("Phem.".APP_NAMESPACE.".RLUsers",new Collection());
        }
        return self::getVar("Phem.".APP_NAMESPACE.".RLUsers");
    }
    
    public static function setRecentlyLoggedUsers(Collection $users)
    {
         self::setVar("Phem.".APP_NAMESPACE.".RLUsers",$users);
    }    

    public static function onNewConnection($cid,$sid,$uid)
    {   
        
        $lock = self::lockVarsWait();
        
        $users = self::getUsers();
        $rlUsers = self::getRecentlyLoggedUsers();
        
        if (!($users->containsKey($uid)))
        {
            $users->put($uid,new Collection());
            if (!($rlUsers->containsKey($uid)))
            {
                $msgArgs = new MessageArgs();
                $msgArgs->setActionUrl(EnvironmentManager::getLinkBuilder()
                        ->navigate("Administration","loggedUsers"));
                $msgArgs->setActionType("replace");
                $msgArgs->setActionTarget("loggedUsers");

                $msg = new Message;
                $msg->setSubject('Uživatel je online');
                $msg->getArgs()->add($msgArgs);   
                $msg->setDate(new DateTime(date("Y-m-d")));
                $msg->setFromUsr($uid);

                $msgArgs->setMessage($msg);

                    //$msg->setText($uid);
                Application::notify($msg);
                
            }
        }
        $sessions = $users->get($uid);
        
        if (!($sessions->containsKey($sid)))
        {
            $sessions->set($sid,new Collection());
        }        
        $connections = $sessions->get($sid);
        
        if (!($connections->containsKey($cid)))
        {
            $connections->set($cid,$cid);
        }      
        
        self::setUsers($users);
        $lock->unlock();
        
    }

    public static function onConnectionClose($cid)
    {
        
        //$lb = EnvironmentManager::getLinkBuilder();
        //$lb->externalLink(array("controller"=>"dispatcher",""));    
	
	$uid = null;
	$sid = null;
        
        $lock = self::lockVarsWait();
        
	$users = self::getUsers();
	foreach ($users as $user => $sessions)
	{
	    foreach ($sessions as $session => $connections)
	    {
		foreach ($connections as $connection)
		{
		    if ($connection == $cid)
		    {
			$uid = $user;
			$sid = $session;
			break 3;
		    }
		}
	    }
	}
	$sessions = $users->get($uid);
	$connections = $sessions->get($sid);
	$connections->removeKey($cid);
	
	if ($connections->isEmpty())
	{
	    $sessions->removeKey($sid);
	}
	
	if ($sessions->isEmpty())
	{
            $users->removeKey($uid);
            self::setUsers($users);
            
            $rlUsers = self::getRecentlyLoggedUsers();
            $rlUsers->put($uid,$uid);
            self::setRecentlyLoggedUsers($rlUsers);
            
            $lock->unlock();
            
            //exec("php ".getcwd().DS.FRAMEWORK_DIR.DS."Static".DS."userWentOffline.php ".$uid." &");
            //exec("php ".getcwd().DS.FRAMEWORK_DIR.DS."Static".DS."userWentOffline.sh ".$uid." &");            
            
            self::runParallelTask("Notification", "userWentOffline", array("uid"=>$uid));
            
	    return;
	}
	
	self::setUsers($users);
        $lock->unlock();
    }

    public static function setVar($key, $value, $ttl = 0)
    {
        switch (strtolower(APPLICATION_SCOPE_STORAGE))
        {
            case 'xcache':
                if (!function_exists('xcache_set'))
                {
                    throw new ApplicationException('XCache support is missing');
                }
                xcache_set($key, serialize($value), $ttl);
                break;

            case 'apc':
                if (!function_exists('apc_store'))
                {
                    throw new ApplicationException('APC support is missing');
                }
                apc_store($key, $value, $ttl);
                break;

            default:
            case 'disabled':
                throw new ApplicationException(
                'Application scope backend not configured'
                );
        }
    }

    public static function getVar($key)
    {

        switch (strtolower(APPLICATION_SCOPE_STORAGE))
        {
            case 'xcache':
                if (!function_exists('xcache_set'))
                {
                    throw new ApplicationException('XCache support is missing');
                }
                return unserialize(\xcache_get($key));

            case 'apc':
                if (!function_exists('apc_store'))
                {
                    throw new ApplicationException('APC support is missing');
                }
                return apc_fetch($key);

            default:
            case 'disabled':
                throw new ApplicationException(
                'Application scope backend not configured'
                );
        }
    }

    public static function deleteVar($key)
    {
        switch (strtolower(APPLICATION_SCOPE_STORAGE))
        {
            case 'xcache':
                if (!function_exists('xcache_set'))
                {
                    throw new ApplicationException('XCache support is missing');
                }
                xcache_unset($key);
                break;

            case 'apc':
                if (!function_exists('apc_store'))
                {
                    throw new ApplicationException('APC support is missing');
                }
                apc_delete($key);
                break;

            default:
            case 'disabled':
                throw new ApplicationException(
                'Application scope backend not configured'
                );
        }
    }
    
    public static function lockVarsWait()
    {
        $lock = new \Phem\Core\ExclusiveLock("appscope");
        while(!$lock->lock())
        {
            sleep(0.01);
        }
        return $lock;
    }

    public static function getUserSessions($username)
    {
        $sessions = new Collection();

        //$iter = new \APCIterator('user', '/user.name/');
        $iter = \xcache_list(XC_TYPE_VAR, 0)['cache_list'];
        //print_r($iter);
        foreach ($iter as $item)
        {
            if (strpos($item["name"], 'user.name') === false)
                continue;
            if (self::getVar($item['name']) == $username)
            {
                $session = str_replace('user.name.', '', $item['name']);
                $sessions->add($session);
            }
        }

        return $sessions;
    }
    
    public static function getLoggedUsers()
    {  
        
        $em = EnvironmentManager::getEntityManager();
        
        $usernames = self::getUsers()->getKeys();
        $usersCollection = new Collection();
        
        if ((is_array($usernames))&&(count($usernames)>0))
        {
    	    $users = $em->getRepository('Phem\Libraries\Security\Model\MySQL\User')
                ->findBy(array('username' => self::getUsers()->getKeys()));
        }
        else
        {
    	    return $usersCollection;
        }
        

        foreach ($users as $user)
        {
            $usersCollection->put($user->getUsername(), $user);
        }
        
        return $usersCollection;
    }

 /*   public static function getLoggedUsers()
    {
        
        //  if (!class_exists("\APCIterator"))
        //  throw new ApplicationException('APC support is missing');
        
        $users = new Collection();

        //$iter = new \APCIterator('user', '/user.name/');
        $iter = \xcache_list(XC_TYPE_VAR, 0)["cache_list"];
        foreach ($iter as $item)
        {
            if (strpos($item["name"], 'user.name') === false)
                continue;
            //echo $item['key'].'<br/>';
            $usrOrig = EnvironmentManager::getUserManager()->getUser(self::getVar($item["name"]));
            if (!is_a($usrOrig, '\Phem\Libraries\Security\Model\Common\User'))
                continue;

            $usr = clone $usrOrig;
            $session = str_replace('user.name.', '', $item['name']);
            $usr->setSession($session);

            $users->set($usr->getUsername(), $usr);
        }
        return $users;
    }
    */
    
    public static function notifyRaw($data)
    {
        if ((MESSAGEBUS_MODE == "Both") || (MESSAGEBUS_MODE == "WebSocket"))
        {
            $pusherClassName = ROOT_NAMESPACE."\\Libraries\\MessageBus\\"
                    . WEBSOCKET_PULLER_MODE."Pusher";
            if (class_exists($pusherClassName))
            {
                $pusher = new $pusherClassName();
                $pusher->push($data);
            }
            else if (strtolower(WEBSOCKET_PULLER_MODE) != "disabled")
            {
                throw new Exception
                    ("Unsupported mode given by WEBSOCKET_PULLER_MODE");
            }        
        }
        
        if ((MESSAGEBUS_MODE == "Both") || (MESSAGEBUS_MODE == "Comet"))
        {
            $pusher = new CometPusher();
            $pusher->push($data);
        }            
    }

    public static function notify(Message $message)
    {
        $em = EnvironmentManager::getEntityManager();
        $em->persist($message);
        $em->flush();
        $em->clear();
        
    
        self::notifyRaw($message);
    }

    public static function heartbeat($username)
    {
        self::setVar('user.name.' . EnvironmentManager::getSession()->getId(), $username);
    }

    public static function waitForMessages($timeout)
    {
        self::setVar('user.pid.' . EnvironmentManager::getSession()->getId(), getmypid());

        if (!function_exists('pcntl_sigtimedwait'))
        {
            throw new ApplicationException('PCNTL support is missing (only available on POSIX platform)');
        }


        //suspend session and db connection before waiting for signal
        EnvironmentManager::getSession()->writeClose();

        $info = array();

       \pcntl_sigtimedwait(array(SIGUSR1), $info, $timeout);

        EnvironmentManager::getSession()->reopen();
        self::deleteVar('user.pid.' . EnvironmentManager::getSession()->getId());

        $messages = new Collection();
        //echo 'user.queue.' . EnvironmentManager::getSession()->getId();
        //$iter = new \APCIterator('user', '/user.queue.' . EnvironmentManager::getSession()->getId() . '/');

        $iter = \xcache_list(XC_TYPE_VAR, 0)['cache_list'];
        $varsToDelete = new Collection();
        foreach ($iter as $item)
        {
            if (strpos($item["name"], 'user.queue') === false)
                continue;
            //echo $item["name"]."<br />";
            $messages->add(self::getVar($item['name']));
            $varsToDelete->add($item['name']);
        }

        foreach ($varsToDelete as $var)
        {
            self::deleteVar($var);
        }

        return $messages;
    }

}
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
   <head>
      <meta http-equiv="content-type" content="text/html;charset=UTF-8">
      <meta http-equiv="generator" content="WebSVN 2.2.1" /> <!-- leave this for stats -->
      <link rel="shortcut icon" type="image/x-icon" href="./templates/BlueGrey/favicon.ico" />
      <link type="text/css" href="./templates/BlueGrey/styles.css" rel="stylesheet" media="screen">
      <!--[if lt IE 7]>
      <script type="text/javascript" src="./templates/BlueGrey/png.js"></script>
      <![endif]-->
      <script type="text/javascript" src="./templates/BlueGrey/collapse.js"></script>
      <title>
         WebSVN
            - freenet-router
            - Blame
               - Rev 2
            - /trunk/freenet-router/var/www/freenet-router/Framework/Environment/Application.php
      </title>

      <script type="text/javascript">
         function checkCB(chBox)
         {
            count = 0
            first = null
            f = chBox.form
            for (i = 0 ; i < f.elements.length ; i++)
            if (f.elements[i].type == 'checkbox' && f.elements[i].checked)
            {
               if (first == null && f.elements[i] != chBox)
                  first = f.elements[i]
               count += 1
            }
            
            if (count > 2) 
            {
               first.checked = false
               count -= 1
            }
         }
         
      </script>


</head>
<body>
	<table width="100%" border="0">
	  <tr>
		<td width="13%">&nbsp;</td>
		<td width="73%" align="center"><a href="http://www.jablonka.cz/"><img style="border: 0; width: 201px; height: 51px;" src="./templates/BlueGrey/logo.png" alt="jablonka.cz" /></a><a href="http://www.prosek.czf/"><img style="border: 0; width: 528px; height: 51px;" src="./templates/BlueGrey/squares.png" alt="prosek.czf" /></a></td>
		<td width="13%"><div style="float: right"><form action="?path=%2Ftrunk%2Ffreenet-router%2Fvar%2Fwww%2Ffreenet-router%2FFramework%2FEnvironment%2FApplication.php&amp;repname=freenet-router&amp;rev=0" method="post" id="langform"><select name="langchoice" onchange="javascript:this.form.submit();"><option value="ca">Catal&agrave;-Valenci&agrave; - Catalan</option><option value="cs">&#268;esky - Cesky</option><option value="da">Dansk - Dansk</option><option value="nl">Dutch - Dutch</option><option value="en" selected="selected">English - English</option><option value="fi">Finnish - Finnish</option><option value="fr">Fran&ccedil;ais - Francais</option><option value="de">Deutsch - German</option><option value="he-IL">&#1506;&#1489;&#1512;&#1497;&#1514; - Hebrew</option><option value="hu">Magyar - Hungarian</option><option value="id">Bahasa Indonesia - Indonesian</option><option value="it">Italiano - Italian</option><option value="ja">&#26085;&#26412;&#35486; - Japanese</option><option value="ko">&#54620;&#44397;&#50612; - Korean</option><option value="no">Norsk - Norwegian</option><option value="pl">Polski - Polish</option><option value="pt">Portugu&ecirc;s - Portuguese</option><option value="pt-BR">Portugu&ecirc;s - Brazilian Portuguese</option><option value="ru">&#1056;&#1091;&#1089;&#1089;&#1082;&#1080;&#1081; - Russian</option><option value="zh-CN">&#20013;&#25991; - Simplified Chinese</option><option value="sk">Sloven&#269;ina - Slovak</option><option value="sl">Sloven&#269;ina - Slovenian</option><option value="es">Espa&ntilde;ol - Spanish</option><option value="sv">Svenska - Swedish</option><option value="zh-TW">&#20013;&#25991; - Traditional Chinese</option><option value="tr">T&uuml;rk&ccedil;e - Turkish</option><option value="uz">O&euml;zbekcha - Uzbek</option></select><input type="submit" value="Go" /></form></div></td>
	  </tr>
	</table>
	<hr />
<table cellspacing="0" cellpadding="0" border="0" width="100%">
  <tr>
    <td align="left"><h1>freenet-router</h1></td>
    <td align="right"><b>Subversion Repositories:</b> <form action="form.php?" method="post" id="projectform"><select name="repname" onchange="javascript:this.form.submit();"><option value="banderdyn">banderdyn</option><option value="centos.prosek.czf">centos.prosek.czf</option><option value="crusader">crusader</option><option value="czf4bfu">czf4bfu</option><option value="czf4bfu.prosek.czf">czf4bfu.prosek.czf</option><option value="czfcentos">czfcentos</option><option value="czfgmap">czfgmap</option><option value="discover">discover</option><option value="fedora.prosek.czf">fedora.prosek.czf</option><option value="freenet-router" selected="selected">freenet-router</option><option value="ftth">ftth</option><option value="getonlineclouds">getonlineclouds</option><option value="hotsanic">hotsanic</option><option value="internet.prosek.czf">internet.prosek.czf</option><option value="is">is</option><option value="mapstats">mapstats</option><option value="meteolinger">meteolinger</option><option value="netmap">netmap</option><option value="qos">qos</option><option value="sedlo">sedlo</option><option value="sedlo.prosek.czf">sedlo.prosek.czf</option><option value="switches">switches</option><option value="vbtobb">vbtobb</option><option value="vlubnt">vlubnt</option><option value="weathermap">weathermap</option><option value="weatherstats">weatherstats</option><option value="websvn">websvn</option><option value="wifidashboard">wifidashboard</option><option value="wifimon">wifimon</option><option value="www.prosek.czf">www.prosek.czf</option><option value="xenstats">xenstats</option></select><input type="submit" value="Go" /><input type="hidden" name="selectproj" value="1" /><input type="hidden" name="op" value="form" /></form></td>
  </tr>
</table>

[<a href="listing.php?repname=freenet-router&amp;path=%2F&amp;rev=2">/</a>] [<a href="listing.php?repname=freenet-router&amp;path=%2Ftrunk%2F&amp;rev=2">trunk/</a>] [<a href="listing.php?repname=freenet-router&amp;path=%2Ftrunk%2Ffreenet-router%2F&amp;rev=2">freenet-router/</a>] [<a href="listing.php?repname=freenet-router&amp;path=%2Ftrunk%2Ffreenet-router%2Fvar%2F&amp;rev=2">var/</a>] [<a href="listing.php?repname=freenet-router&amp;path=%2Ftrunk%2Ffreenet-router%2Fvar%2Fwww%2F&amp;rev=2">www/</a>] [<a href="listing.php?repname=freenet-router&amp;path=%2Ftrunk%2Ffreenet-router%2Fvar%2Fwww%2Ffreenet-router%2F&amp;rev=2">freenet-router/</a>] [<a href="listing.php?repname=freenet-router&amp;path=%2Ftrunk%2Ffreenet-router%2Fvar%2Fwww%2Ffreenet-router%2FFramework%2F&amp;rev=2">Framework/</a>] [<a href="listing.php?repname=freenet-router&amp;path=%2Ftrunk%2Ffreenet-router%2Fvar%2Fwww%2Ffreenet-router%2FFramework%2FEnvironment%2F&amp;rev=2">Environment/</a>] [<b>Application.php</b>] - Blame information for rev <b>2</b>
<p>&nbsp;</p>

<table cellpadding="2" cellspacing="0" width="100%" class="blameTbl">
	<thead>
		<tr>
			<th class="HdrClmn"><b>Line No.</b></th>
			<th class="HdrClmn"><b>Rev</b></th>
			<th class="HdrClmn"><b>Author</b></th>
			<th class="HdrClmnEnd"><b>Line</b></th>
		</tr>
	</thead>
	<tbody>
	</tbody>
</table> 


<script type='text/javascript'>
/* <![CDATA[ */
var rev = new Array();
var a = document.getElementsByTagName('a');
for (var i = 0; i < a.length; i++) {
  if (a[i].className == 'blame-revision') {
    var id = a[i].id;
    addEvent(a[i], 'mouseover', function() { mouseover(this) } );
    addEvent(a[i], 'mouseout', function() { mouseout(this) } );
  }
}

function mouseover(a) {
  // Find the revision by using the link
  var m = /rev=(\d+)/.exec(a.href);
  var r = m[1];

  div = document.createElement('div');
  div.className = 'blame-popup';
  div.innerHTML = rev[r];
  a.parentNode.appendChild(div);
}

function mouseout(a) {
  var div = a.parentNode.parentNode.getElementsByTagName('div');
  for (var i = 0; i < div.length; i++) {
    if (div[i].className = 'blame-popup') {
      div[i].parentNode.removeChild(div[i]);
    }
  }
}

function addEvent(obj, type, func) {
  if (obj.addEventListener) {
    obj.addEventListener(type, func, false);
    return true;
  } else if (obj.attachEvent) {
    return obj.attachEvent('on' + type, func);
  } else {
    return false;
  }
}
/* ]]> */
</script>

      <p><center><font size="-1"><i><b>Powered by <a href="http://www.websvn.info/">WebSVN</a> 2.2.1</b></i></font></center>
   </body>
</html>