Subversion Repositories eFlore/Applications.del

Compare Revisions

Ignore whitespace Rev 1709 → Rev 1710

/branches/v1.2-lithium/scripts/bibliotheque/Messagerie.php
New file
0,0 → 1,84
<?php
class Messagerie {
 
private $conteneur = null;
 
public function __construct($conteneur) {
$this->conteneur = $conteneur;
}
 
public function envoyerHtml($destinataires, $sujet, $message) {
$messageHtml = $message;
$messageTxt = $this->supprimerHtml($message);
$emailExpediteur = $this->conteneur->getParametre('adresse_expediteur_recapitulatif');
$encodage = $this->conteneur->getParametre('encodage_appli');
$dateHeure = date('D, j M Y G:i:s O');
$uid = md5(uniqid(rand()));
$limite = "_----------=_parties_$uid";
 
// 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>\n".
"X-Mailer: PHP-DEL-SCRIPTS\n".
"X-auth-smtp-user: $emailExpediteur\n".
"X-abuse-contact: $emailExpediteur\n".
"Date: $dateHeure\n".
"From: $emailExpediteur\n".
"Content-Type: multipart/alternative; boundary=\"$limite\";\n\n";
 
// le message en html est préféré s'il est lisible
$contenu =
"--$limite\n".
"Content-Type: text/plain; charset=\"$encodage\";\n".
"Content-Transfer-Encoding: 7bit;\n\n".
"$messageTxt\n".
"--$limite\n".
"Content-Type: text/html;".
"charset=\"$encodage\";\n".
"Content-Transfer-Encoding: 7bit;\n\n".
"$messageHtml\n".
"--".$limite."--\n";
 
$envoieStatut = $this->envoyer($destinataires, $entetes, $sujet, $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);
$messageTxt = trim(" \t", $messageSansHtml);
return $messageTxt;
}
 
/**
* 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) {
$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;
}
}