Envole » Envole-Mutualisé » eole-dispatcher

Nouvelle version, qui semble fonctionner sur serveur de test :

       if ($__USE_CACHE) {
            $cache  = R::findOne( 'arenacache', ' uid = ? and zone  = ? ', array($uid,$zone));
            //Si un cache est trouve dans la base pour ce user et cette zone, 
            //on vérifie s'il est récent ou si un reload n'est pas demandé
            if ($cache && ((isset($_GET["reload"]) &&  ($_GET["reload"]=="true" )) || (!($cache->isRecent())))) {
                //si un cache est trouvé mais qu'il est ancien ou qu'un reolad a été demandé, on le supprime
                        $cache->clear();
                        \R::trash($cache);
                        $cache = null;
                }
            if ($cache) { //si après ces vérifications, un cache existe encore, on l'utilise
                $time = microtime(true) - $time_start_load;
                echo "/* $zone: utilisation du cache ". $cache->updated. " in $time seconds */\n";
                // Oui on va l'utiliser
                $items = $cache->getCache();
                $cache->access();
                /*$sQuery = "UPDATE arenacache SET acceded='".$cache->acceded."' WHERE id=".$cache->getId();
                R::exec( $sQuery );*/
                $arrDesItemsArena[]=$items;
            }
            else { // si au final il n'y a pas de cache (soit pas au début, soit détruit apres les verifs), on en crée un

                $cache = R::dispense('arenacache');
                $cache->uid=$uid;
                $cache->zone=$zone;
                // On le sauvegarde de suite,
                // car si mode cluster il peut ne pas y avoir d'unicité, vue le temps pris par le chargement des WS
                try {
                    R::store( $cache );
                } catch (\Exception $e) {

                }
                $time_start_load = microtime(true);

                // récupérartion des items Arena via le web service
                $result=$client->getRessourcesPortail($uid,$zone);
                $items=objectToArray($result);

                $time = microtime(true) - $time_start_load;
                echo "/* $zone: getFromArenaWebService in $time seconds */\n";

    //            $metrics->arenaFromWebService($zone,$time);

                // Création du cache, uniquement si des données sont remontées
                if ($cache && is_array($items) && count($items)!=0) {

                  $time = microtime(true);

                  $cache->setCache($items);
                  $cache->access();
                  try {
                      R::store( $cache );
                  } catch (\Exception $e) {

                  }

    //              $metrics->arenaToCache($zone,microtime(true) - $time);
                } // FIN du if ($cache && is_array($items) && count($items)!=0)

            } //FIN du else (pas de cache)

        } // FIN if (__USE_CACHE)

        else { // on ne veut pas de cache, cas très rare vu la lenteur du WS
                $result=$client->getRessourcesPortail($uid,$zone);
                $items=objectToArray($result);
        }
    $arrDesItemsArena[]=$items;

Penser dans le commit à mettre "ref #id" ou "fixes #id"

En test en prod chez nous, pour l'instant pas de pb
Je laisse passer l'été on regarde fin Août pour commit

Cela semble bien tourner
Cela dit j'ai eu un cas d'une personne dont le cahce semblait avoir été mis à jour et à qui il manquait une appli
Je vais donc refaire quelques tests en faisant des echos sur une machine de test avant de pusher