Subversion Repositories eFlore/Applications.cel

<?php
abstract class WidgetCommun {

        protected $config = null;
        protected $parametres = null;
        protected $messages = array();
        protected $debug = array();

        public function __construct($config, $parametres) {
                $this->config = $config;
                $this->parserFichierIni($config['chemins']['widgetCourantDossier'].'config.ini');
                $this->parametres = $parametres;
        }

        /**
         * Parse le fichier ini donné en paramètre
         * @param string $fichier_ini nom du fichier ini à parser
         * @return boolean true si le fichier ini a été trouvé.
         */
        private function parserFichierIni($fichier_ini) {
                $retour = false;
                if (file_exists($fichier_ini)) {
                        $ini = parse_ini_file($fichier_ini, true);
                        $this->fusionner($ini);
                        $retour = true;
                }
                return $retour;
        }

        /**
         * fusionne un tableau de paramètres avec le tableau de config global
         * @param array $ini le tableau à fusionner
         */
        private function fusionner(array $ini) {
                $this->config = array_merge($this->config, $ini);
        }

        protected function traiterNomMethodeExecuter($nom) {
                $methode = 'executer';
                $methode .= str_replace(' ', '', ucwords(str_replace('-', ' ', strtolower($nom))));
                return $methode;
        }

        //+----------------------------------------------------------------------------------------------------------------+
        // GESTION des CLASSES CHARGÉES à la DEMANDE

        protected function getDao() {
                if (! isset($this->dao)) {
                        $this->dao = new Dao();
                }
                return $this->dao;
        }

        //+----------------------------------------------------------------------------------------------------------------+
        // GESTION DE MÉTHODES COMMUNES ENTRE LES SERVICES

        /**
         * Transformer une chaine en tableau si elle est de la forme :
         *  - "cle=valeur,cle=valeur,..." : tableau associatif
         *  - "valeur, valeur,..." : tableau
         *
         * @param String $chaine la chaine à transformer
         * @return le tableau issu de la chaine.
         */
        public function transformerEnTableau($chaine) {
                $tableau = array();
                if (empty($chaine) === false) {
                        $tableauPartiel = explode(',', $chaine);
                        foreach ($tableauPartiel as $champ) {
                                if (strpos($champ, '=') === false) {
                                        $tableau[] = trim($champ);
                                } else {
                                        list($cle, $val) = explode('=', $champ);
                                        $tableau[trim($cle)] = trim($val);
                                }
                        }
                }
                return $tableau;
        }

        protected function getUrlImage($id, $format = 'L') {
                $url_tpl = $this->config['chemins']['celImgUrlTpl'];
                $id = sprintf('%09s', $id).$format;
                $url = sprintf($url_tpl, $id);
                return $url;
        }

        protected function encoderMotCle($mot_cle) {
                return md5(mb_strtolower($mot_cle));
        }

        private function protegerMotsCles($mots_cles, $type) {
                $separateur = ($type == self::TYPE_IMG) ? ',' : ';' ;
                $mots_cles_a_proteger = explode($separateur,rtrim(trim($mots_cles), $separateur));
                foreach ($mots_cles_a_proteger as $mot) {
                        $mots_cles_proteges[] = $this->bdd->quote($mot);
                }
                $mots_cles = implode(',', $mots_cles_proteges);
                return $mots_cles;
        }

        protected function tronquerCourriel($courriel) {
                $courriel = preg_replace('/[^@]+$/i', '...', $courriel);
                return $courriel;
        }

        protected function nettoyerTableau($tableau) {
                foreach ($tableau as $cle => $valeur) {
                        if (is_array($valeur)) {
                                $valeur = $this->nettoyerTableau($valeur);
                        } else {
                                $valeur = $this->nettoyerTexte($valeur);
                        }
                        $tableau[$cle] = $valeur;
                }
                return $tableau;
        }

        protected function nettoyerTexte($txt) {
                $txt = preg_replace('/&(?!([a-z]+|#[0-9]+|#x[0-9][a-f]+);)/i', '&amp;', $txt);
                $txt = preg_replace('/^(?:000null|null)$/i', '', $txt);
                return $txt;
        }

        protected function etreVide($valeur) {
                $vide = false;
                if ($valeur == '' || $valeur == 'null'|| $valeur == '000null' || $valeur == '0') {
                        $vide = true;
                }
                return $vide;
        }

        protected function formaterDate($date_heure_mysql, $format = '%A %d %B %Y à %H:%M') {
                $date_formatee = '';
                if (!$this->etreVide($date_heure_mysql)) {
                        $timestamp = $this->convertirDateHeureMysqlEnTimestamp($date_heure_mysql);
                        $date_formatee = strftime($format, $timestamp);
                }
                return $date_formatee;
        }

        protected function convertirDateHeureMysqlEnTimestamp($date_heure_mysql){
       $val = explode(' ', $date_heure_mysql);
       $date = explode('-', $val[0]);
       $heure = explode(':', $val[1]);
       return mktime((int) $heure[0], (int) $heure[1], (int) $heure[2], (int) $date[1], (int) $date[2], (int) $date[0]);
        }

        //+----------------------------------------------------------------------------------------------------------------+
        // GESTION DE L'IDENTIFICATION et des UTILISATEURS

        protected function getAuthIdentifiant() {
                $id = (isset($_SERVER['PHP_AUTH_USER'])) ? $_SERVER['PHP_AUTH_USER'] : null;
                return $id;
        }

        protected function getAuthMotDePasse() {
                $mdp = (isset($_SERVER['PHP_AUTH_PW'])) ? $_SERVER['PHP_AUTH_PW'] : null;
                return $mdp;
        }

        protected function authentifierAdmin() {
                $message_accueil = "Veuillez vous identifier avec votre compte Tela Botanica.";
                $message_echec = "Accès limité aux administrateurs du CEL.\n".
                        "Votre tentative d'identification a échoué.\n".
                        "Actualiser la page pour essayer à nouveau si vous êtes bien inscrit comme administrateur.";
                return $this->authentifier($message_accueil, $message_echec, 'Admin');
        }

        protected function authentifierUtilisateur() {
                $message_accueil = "Veuillez vous identifier avec votre compte Tela Botanica.";
                $message_echec = "Accès limité aux utilisateur du CEL.\n".
                        "Inscrivez vous http://www.tela-botanica.org/page:inscription pour le devenir.\n".
                        "Votre tentative d'identification a échoué.\n".
                        "Actualiser la page pour essayer à nouveau si vous êtes déjà inscrit ou contacter 'accueil@tela-botanica.org'.";
                return $this->authentifier($message_accueil, $message_echec, 'Utilisateur');
        }

        private function authentifier($message_accueil, $message_echec, $type) {
                $id = $this->getAuthIdentifiant();
                if (!isset($id)) {
                        $this->envoyerAuth($message_accueil, $message_echec);
                } else {
                        if ($type == 'Utilisateur' && $this->getAuthMotDePasse() == 'debug') {
                                $autorisation = true;
                        } else {
                                $methodeAutorisation = "etre{$type}Autorise";
                                $autorisation = $this->$methodeAutorisation();
                        }
                        if ($autorisation == false) {
                                $this->envoyerAuth($message_accueil, $message_echec);
                        }
                }
                return true;
        }

        protected function etreUtilisateurAutorise() {
                $identifiant = $this->getAuthIdentifiant();
                $mdp = md5($this->getAuthMotDePasse());
                $url = sprintf($this->config['authentification']['serviceUrlTpl'], $identifiant, $mdp);
                $json = $this->getDao()->consulter($url);
                $existe = json_decode($json);

                $autorisation = (isset($existe) && $existe) ? true :false;
                return $autorisation;
        }

        protected function etreAdminAutorise($identifiant) {
                $identifiant = $this->getAuthIdentifiant();
                $autorisation = ($this->etreUtilisateurAutorise() && $this->etreAdminCel($identifiant)) ? true : false;
                return $autorisation;
        }

        protected function etreAdminCel($courriel) {
                $admins = $this->config['authentification']['administrateurs'];
                $courriels_autorises = explode(',', $admins);

                $autorisation = (in_array($courriel, $courriels_autorises)) ? true : false ;
                return $autorisation;
        }

        /**
        * Prend en paramêtre un tableau de courriels et retourne après avoir intérogé un service we de l'annuaire
        * une tableau avec en clé le courriel et en valeur, un tableau associatif :
        *  - nom : le nom de l'utilisateur
        *  - prenom : le prénom de l'utilisateur.
        *  @TODO ne gère pas le pseudo, qui devrait être retourné en lieu et place des nom / prénom s'il est utilisé et renseigné
        * @param array $courriels un tableau de courriels pour lesquels il faut recherche le prénom et nom.
        */
        protected function recupererUtilisateursNomPrenom(Array $courriels) {
                // Récupération des données au format Json
                $service = "utilisateur/prenom-nom-par-courriel/".implode(',', $courriels);
                $url = sprintf($this->config['chemins']['baseURLServicesAnnuaireTpl'], $service);
                $json = $this->getDao()->consulter($url);
                return (array) json_decode($json);
        }

        protected function recupererUtilisateursIdentite(Array $courriels) {
                // Récupération des données au format Json
                $service = "utilisateur/identite-par-courriel/".implode(',', $courriels);
                $url = sprintf($this->config['chemins']['baseURLServicesAnnuaireTpl'], $service);
                $json = $this->getDao()->consulter($url);
                $utilisateurs = json_decode($json);
                foreach ($courriels as $courriel) {
                        $info = array('id' => null, 'intitule' => '');
                        if (isset($utilisateurs->$courriel)) {
                                $info['intitule'] = $utilisateurs->$courriel->intitule;
                                $info['id'] = $utilisateurs->$courriel->id;
                        } else {
                                $info['intitule'] = $this->tronquerCourriel($courriel);
                        }
                        $noms[$courriel] = $info;
                }
                return $noms;
        }

        //+----------------------------------------------------------------------------------------------------------------+
        // GESTION de l'ENVOIE au NAVIGATEUR

        protected function envoyerJsonp($donnees = null, $encodage = 'utf-8') {
                $contenu = $_GET['callback'].'('.json_encode($donnees).');';
                $this->envoyer($contenu, 'text/html', $encodage);
        }

        protected function envoyer($donnees = null, $mime = 'text/html', $encodage = 'utf-8') {
                // Traitements des messages d'erreurs et données
                if (count($this->messages) != 0) {
                        header('HTTP/1.1 500 Internal Server Error');
                        $mime = 'text/html';
                        $encodage = 'utf-8';
                        $sortie = '<html>'.
                                '<head><title>Messages</title></head>'.
                                '<body><pre>'.implode("\n", $this->messages).'</pre><body>'.
                                '</html>';
                } else {
                        $sortie = $donnees;
                        if (is_null($donnees)) {
                                $sortie = 'OK';
                        }
                }

                // Gestion de l'envoie du déboguage
                $this->envoyerDebogage();

                // Envoie sur la sortie standard
                $this->envoyerContenu($encodage, $mime, $sortie);
        }

        private function envoyerDebogage() {
                if (!is_array($this->debug)) {
                        $this->debug[] = $this->debug;
                }
                if (count($this->debug) != 0) {
                        foreach ($this->debug as $cle => $val) {
                                if (is_array($val)) {
                                        $this->debug[$cle] = print_r($val, true);
                                }
                        }
                        header('X-DebugJrest-Data:'.json_encode($this->debug));
                }
        }

        private function envoyerContenu($encodage, $mime, $contenu) {
                if (!is_null($mime) && !is_null($encodage)) {
                        header("Content-Type: $mime; charset=$encodage");
                } else if (!is_null($mime) && is_null($encodage)) {
                        header("Content-Type: $mime");
                }
                print_r($contenu);
        }

        private function envoyerAuth($message_accueil, $message_echec) {
                header('HTTP/1.0 401 Unauthorized');
                header('WWW-Authenticate: Basic realm="'.mb_convert_encoding($message_accueil, 'ISO-8859-1', 'UTF-8').'"');
                header('Content-type: text/plain; charset=UTF-8');
                print $message_echec;
                exit(0);
        }

        //+----------------------------------------------------------------------------------------------------------------+
        // GESTION DES SQUELETTES (PHP, TXT...)

        /**
         * Méthode prenant en paramètre un tableau associatif, les clés seront recherchées dans le texte pour être
         * remplacer par la valeur. Dans le texte, les clés devront être entre accolades : {}
         *
         * @param String $txt           le texte où chercher les motifs.
         * @param Array  $donnees       un tableau associatif contenant les motifs à remplacer.
         *
         * @return String le texte avec les motifs remplacer par les valeurs du tableau.
         */
        protected static function traiterSqueletteTxt($txt, Array $donnees = array()) {
                $motifs = array();
                $valeurs = array();
                foreach ($donnees as $cle => $valeur) {
                        if (strpos($cle, '{') === false && strpos($cle, '}') === false) {
                                $motifs = '{'.$cle.'}';
                                $valeurs = $valeur;
                        }
                }
                $txt = str_replace($motifs, $valeurs, $txt);
                return $txt;
        }

        /**
         * Méthode prenant en paramètre un chemin de fichier squelette et un tableau associatif de données,
         * en extrait les variables, charge le squelette et retourne le résultat des deux combinés.
         *
         * @param String $fichier       le chemin du fichier du squelette
         * @param Array  $donnees       un tableau associatif contenant les variables a injecter dans le squelette.
         *
         * @return boolean false si le squelette n'existe pas, sinon la chaine résultat.
         */
        protected static function traiterSquelettePhp($fichier, Array $donnees = array()) {
                $sortie = false;
                if (file_exists($fichier)) {
                        // Extraction des variables du tableau de données
                        extract($donnees);
                        // Démarage de la bufferisation de sortie
                        ob_start();
                        // Si les tags courts sont activés
                        if ((bool) @ini_get('short_open_tag') === true) {
                                // Simple inclusion du squelette
                                include $fichier;
                        } else {
                                // Sinon, remplacement des tags courts par la syntaxe classique avec echo
                                $html_et_code_php = self::traiterTagsCourts($fichier);
                                // Pour évaluer du php mélangé dans du html il est nécessaire de fermer la balise php ouverte par eval
                                $html_et_code_php = '?>'.$html_et_code_php;
                                // Interprétation du html et du php dans le buffer
                                echo eval($html_et_code_php);
                        }
                        // Récupèration du contenu du buffer
                        $sortie = ob_get_contents();
                        // Suppression du buffer
                        @ob_end_clean();
                } else {
                        $msg = "Le fichier du squelette '$fichier' n'existe pas.";
                        trigger_error($msg, E_USER_WARNING);
                }
                // Retourne le contenu
                return $sortie;
        }

        /**
         * Fonction chargeant le contenu du squelette et remplaçant les tags court php (<?= ...) par un tag long avec echo.
         *
         * @param String $chemin_squelette le chemin du fichier du squelette
         *
         * @return string le contenu du fichier du squelette php avec les tags courts remplacés.
         */
        private static function traiterTagsCourts($chemin_squelette) {
                $contenu = file_get_contents($chemin_squelette);
                // Remplacement de tags courts par un tag long avec echo
                $contenu = str_replace('<?=', '<?php echo ',  $contenu);
                // Ajout systématique d'un point virgule avant la fermeture php
                $contenu = preg_replace("/;*\s*\?>/", "; ?>", $contenu);
                return $contenu;
        }

        //+----------------------------------------------------------------------------------------------------------------+
        // UTILITAIRES

        /**
         * Permet de trier un tableau multi-dimenssionnel en gardant l'ordre des clés.
         *
         * @param Array $array le tableau à trier
         * @param Array $cols tableau indiquant en clé la colonne à trier et en valeur l'ordre avec SORT_ASC ou SORT_DESC
         * @author cagret at gmail dot com
         * @see  http://fr.php.net/manual/fr/function.array-multisort.php Post du 21-Jun-2009 12:38
         */
        public static function trierTableauMd($array, $cols) {
                $colarr = array();
                foreach ($cols as $col => $order) {
                $colarr[$col] = array();
                        foreach ($array as $k => $row) {
                                $colarr[$col]['_'.$k] = strtolower(self::supprimerAccents($row[$col]));
                        }
                }
                $params = array();
                foreach ($cols as $col => $order) {
                        $params[] =& $colarr[$col];
                        $params = array_merge($params, (array)$order);
                }
                call_user_func_array('array_multisort', $params);
                $ret = array();
                $keys = array();
                $first = true;
                foreach ($colarr as $col => $arr) {
                        foreach ($arr as $k => $v) {
                                if ($first) {
                                        $keys[$k] = substr($k,1);
                                }
                                $k = $keys[$k];
                                if (!isset($ret[$k])) {
                                        $ret[$k] = $array[$k];
                                }
                                $ret[$k][$col] = $array[$k][$col];
                        }
                        $first = false;
                }
                return $ret;
        }

        private static function supprimerAccents($str, $charset='utf-8')
        {
            $str = htmlentities($str, ENT_NOQUOTES, $charset);

            $str = preg_replace('#&([A-za-z])(?:acute|cedil|circ|grave|orn|ring|slash|th|tilde|uml);#', '\1', $str);
            $str = preg_replace('#&([A-za-z]{2})(?:lig);#', '\1', $str); // pour les ligatures e.g. '&oelig;'
            $str = preg_replace('#&[^;]+;#', '', $str); // supprime les autres caractères

            return $str;
        }
}