Subversion Repositories eFlore/Applications.del

Rev

Rev 1867 | Blame | Compare with Previous | Last modification | View Log | RSS feed

<?php
// declare(encoding='UTF-8');
/**
 * Classe Messagerie permettant d'envoyer des courriels (s'inspire de ce qui est fait dans l'appli Annuaire).
 *
 * @category   DEL
 * @package    Scripts
 * @subpackage Bibliotheque
 * @author     Mathias CHOUET <mathias@tela-botanica.org>
 * @author     Jean-Pascal MILCENT <jpm@tela-botanica.org>
 * @author     Aurelien PERONNET <aurelien@tela-botanica.org>
 * @license    GPL v3 <http://www.gnu.org/licenses/gpl.txt>
 * @license    CECILL v2 <http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt>
 * @copyright  1999-2014 Tela Botanica <accueil@tela-botanica.org>
 */
class Messagerie {

        private $conteneur = null;

        public function __construct($conteneur) {
                $this->conteneur = $conteneur;
        }

        public function envoyerHtml($destinataires, $sujet, $messageHtml, $messageTxt = '') {
                if ($messageTxt == '') {
                        $messageSansHtml = $this->supprimerHtml($messageHtml);
                        $messageTxt = $this->nettoyerTxt($messageSansHtml);
                }
                $encodage = $this->conteneur->getParametre('encodage_appli');
                mb_internal_encoding($encodage);
                // tentative d'acceptation des sujets longs (+ 76 caractères) par les clients mail tatillons
                $sujetEncode = mb_encode_mimeheader($sujet, mb_internal_encoding(), "B", "\n");

                $emailExpediteur = $this->conteneur->getParametre('adresse_expediteur_recapitulatif');
                $dateHeure = date('r');
                $uid = md5(uniqid(rand()));
                $limite = "_----------=_parties_$uid";
                $eol = "\n";// ATTENTION : avec Qmail laisser seulement \n car il remplace automatiquement par \r\n

                // Définition d'un mail en texte simple et html
                // multipart/alternative signifie même contenu de la forme la plus simple à la plus complexe
                $entetes = 'X-Sender: <http://www.tela-botanica.org>'.$eol.
                        'X-Mailer: PHP-DEL-SCRIPTS'.$eol.
                        'X-auth-smtp-user: '.$emailExpediteur.$eol.
                        'X-abuse-contact: '.$emailExpediteur.$eol.
                        'Date: '.$dateHeure.$eol.
                        'From: '.$emailExpediteur.$eol.
                        'Reply-To: '.$this->conteneur->getParametre('adresse_reponse').$eol.
                        'MIME-Version: 1.0'.$eol.
                        "Content-Type: multipart/alternative; boundary=\"$limite\";".$eol.$eol;

                // le message en html est préféré s'il est lisible
                $contenu =
                        "--$limite".$eol.
                        "Content-Type: text/plain; charset=\"$encodage\";".$eol.
                        "Content-Transfer-Encoding: 8bit;".$eol.$eol.
                        "$messageTxt".$eol.$eol.
                        "--$limite".$eol.
                        "Content-Type: text/html; charset=\"$encodage\";".$eol.
                        "Content-Transfer-Encoding: 8bit;".$eol.$eol.
                        "$messageHtml".$eol.
                        "--".$limite."--".$eol.$eol;

                $envoieStatut = $this->envoyer($destinataires, $entetes, $sujetEncode, $contenu);

                return $envoieStatut;
        }

        public function envoyerTxt($destinataires, $sujet, $messageTxt) {
                $emailExpediteur = $this->conteneur->getParametre('adresse_expediteur_recapitulatif');
                $encodage = $this->conteneur->getParametre('encodage_appli');
                mb_internal_encoding($encodage);
                $sujetEncode = mb_encode_mimeheader($sujet, mb_internal_encoding(), "B", "\n");
                $dateHeure = date('r');
                $eol = "\n";// ATTENTION : avec Qmail laisser seulement \n car il remplace automatiquement par \r\n

                // Définition d'un mail en texte simple et html
                // multipart/alternative signifie même contenu de la forme la plus simple à la plus complexe
                $entetes = 'X-Sender: <http://www.tela-botanica.org>'.$eol.
                        'X-Mailer: PHP-DEL-SCRIPTS'.$eol.
                        'X-auth-smtp-user: '.$emailExpediteur.$eol.
                        'X-abuse-contact: '.$emailExpediteur.$eol.
                        'Date: '.$dateHeure.$eol.
                        'From: '.$emailExpediteur.$eol.
                        'Reply-To: '.$this->conteneur->getParametre('adresse_reponse').$eol.
                        'MIME-Version: 1.0'.$eol.
                        "Content-Type: text/plain; charset=\"$encodage\";".$eol.$eol;

                // le message en html est préféré s'il est lisible
                $contenu = $messageTxt.$eol.$eol;

                $envoieStatut = $this->envoyer($destinataires, $entetes, $sujetEncode, $contenu);

                return $envoieStatut;
        }

        private function envoyer($destinataires, $entetes, $sujet, $contenu) {
                $envoieStatut = mail(
                        $destinataires,
                        $sujet,
                        $contenu,
                        $entetes
                );
                return $envoieStatut;
        }

        /** Transforme automatiquement le message html en message txt.
         *
         * Réalise un stip_tags et avant ça un remplacement des liens sur mesure pour les mettre au format email txt.
         */
        private function supprimerHtml($messageHtml) {
                $html = $this->ajouterHrefDansBalise($messageHtml);
                $messageSansHtml = strip_tags($html);
                return $messageSansHtml;
        }

        /**
         * Extrait la valeur de l'attribut href des balises HTML de liens (a) et ajoute le lien entre
         * chevrons (<>) dans le contenu de la balise "a".
         */
        private function ajouterHrefDansBalise($html) {
                libxml_use_internal_errors(true);
                $dom = new DOMDocument();
                $dom->loadHTML($html);
                foreach ($dom->getElementsByTagName('a') as $node) {
                        if ($node->hasAttribute( 'href' )) {
                                $href = $node->getAttribute('href');
                                $node->nodeValue = $node->nodeValue." ( $href )";
                        }
                }
                $html = $dom->saveHtml();
                return $html;
        }

        private function nettoyerTxt($message) {
                $messageSansTab = preg_replace('/\t+/', '', $message);
                $messageSansRetourMultiple = preg_replace('/\n+/', "\n", $messageSansTab);
                $messageTxt = html_entity_decode($messageSansRetourMultiple, null, 'UTF-8');
                return $messageTxt;
        }
}