spip_nursit/plugins-dist/dist/nursit/facteur/inc/Facteur/FacteurMail.php

581 lines
16 KiB
PHP
Raw Normal View History

2023-06-01 15:30:12 +00:00
<?php
/**
* Plugin Facteur 4
* (c) 2009-2019 Collectif SPIP
* Distribue sous licence GPL
*
* @package SPIP\Facteur\FacteurMail
*/
namespace SPIP\Facteur;
use PHPMailer\PHPMailer\PHPMailer;
use PHPMailer\PHPMailer\Exception;
if (!defined("_ECRIRE_INC_VERSION")){
return;
}
include_spip('inc/charsets');
include_spip('inc/texte');
include_spip('inc/filtres');
include_spip('facteur_fonctions');
include_spip('lib/PHPMailer-6/autoload');
class FacteurMail extends PHPMailer {
/**
* From force si From pas dans le bon domaine
* @var string
*/
public $ForceFrom = '';
/**
* FromName force si From pas dans le bon domaine
* @var string
*/
public $ForceFromName = '';
/**
* Faut il embarquer dans le mail les images referencees ?
* @var bool
*/
protected $embedReferencedImages = false;
/**
* Faut il convertir le message en Isotruc (obsolete ?)
* @var bool
*/
protected $convertMessageToIso8859 = false;
/**
* Les URLs du site
* @var array
*/
protected $urlsBase = array();
/**
* CC Auto a remettre quand on clear les recipients
* @var mixed|null
*/
protected $autoCc = null;
/**
* Bcc Auto a remettre quand on clear les recipients
* @var mixed|null
*/
protected $autoBcc = null;
/**
* @var bool
*/
protected $important = false;
protected $sendFailFunction = null;
protected static $logName = 'facteur';
/**
* Wrapper de spip_log pour par PHPMailer
* @param $message
* @param $level
*/
public static function logDebug($message, $level){
$facteurClass = get_called_class();
spip_log("$facteurClass: $level: " . trim($message), $facteurClass::$logName . _LOG_DEBUG);
}
/**
* Fonction de log interne aux Facteurs pour prefixer avec la class qui genere le log
* @param string|array $message
* @param null|int $level
*/
protected function log($message, $level = null) {
$class = get_class($this);
if (empty($level)) {
$level = _LOG_INFO;
}
spip_log("$class: " . (is_scalar($message) ? $message : json_encode($message, true)), static::$logName . $level);
}
/**
* Facteur constructor.
* @param array $options
* @throws Exception
*/
public function __construct($options = array()){
// par defaut on log rien car tres verbeux
// on utilise facteur_log_debug qui filtre log SPIP en _LOG_DEBUG
$this->SMTPDebug = 0;
$this->Debugoutput = __NAMESPACE__ . '\FacteurMail::logDebug';
// Il est possible d'avoir beaucoup plus de logs avec 2, 3 ou 4, ce qui logs les échanges complets avec le serveur
// utiliser avec un define('_MAX_LOG',1000); car sinon on est limite a 100 lignes par hit et phpMailer est tres verbeux
if (defined('_FACTEUR_DEBUG_SMTP')){
$this->SMTPDebug = _FACTEUR_DEBUG_SMTP;
}
$this->exceptions = false;
if (!empty($options['exceptions'])) {
$this->exceptions = ($options['exceptions'] ? true : false);
}
if (!empty($options['adresse_envoi_email'])){
$this->From = $options['adresse_envoi_email'];
}
// Si plusieurs emails dans le from, pas de Name !
if (strpos($this->From, ",")===false){
if (!empty($options['adresse_envoi_nom'])){
$this->FromName = $options['adresse_envoi_nom'];
}
}
// si forcer_from, on sauvegarde le From et FromName par defaut, qui seront utilises
// si From n'est pas dans le meme domaine
// (utiliser le facteur avec un service externe qui necessite la validation des domaines d'envoi)
if (isset($options['forcer_from']) and ($options['forcer_from'] === 'oui' or $options['forcer_from'] === true)){
$this->ForceFrom = $this->From;
$this->ForceFromName = $this->FromName;
}
$this->CharSet = "utf-8";
$this->Mailer = 'mail';
// Retour des erreurs
if (!empty($options['smtp_sender'])){
$this->Sender = $options['smtp_sender'];
$this->AddCustomHeader("Errors-To: " . $this->Sender);
}
// Destinataires en copie, seulement s'il n'y a pas de destinataire de test
if (!defined('_TEST_EMAIL_DEST')){
if (!empty($options['cc'])){
$this->autoCc = $options['cc'];
$this->AddCC($this->autoCc);
}
if (!empty($options['bcc'])){
$this->autoBcc = $options['bcc'];
$this->AddBCC($this->autoBcc);
}
}
if (!empty($options['filtre_images']) and $options['filtre_images']) {
$this->embedReferencedImages = true;
}
if (!empty($options['filtre_iso_8859']) and $options['filtre_iso_8859']) {
$this->convertMessageToIso8859 = true;
}
if (!empty($options['adresses_site'])) {
$this->urlsBase = $options['adresses_site'];
}
}
/**
* Auto-configuration du mailer si besoin
* (rien a faire ici dans le cas par defaut)
* @return bool
*/
public function configure(){
return true;
}
/**
* Definir l'objet du mail
* @param $objet
* @param $charset
*/
public function setObjet($objet, $charset = null){
if (is_null($charset)) {
$charset = $GLOBALS['meta']['charset'];
}
$this->Subject = unicode_to_utf_8(charset2unicode($objet, $charset));
}
/**
* Definir le ou les Destinataire(s) du mail
* clear tous les destinataires precedemment definis
*
* @param string | array $email
* @throws Exception
*/
public function setDest($email) {
$this->clearAllRecipients();
//Pour un envoi multiple de mail, $email doit être un tableau avec les adresses.
if (is_array($email)){
foreach ($email as $cle => $adresseMail){
if (!$this->AddAddress($adresseMail)){
$this->log("Erreur AddAddress $adresseMail : " . print_r($this->ErrorInfo, true), _LOG_ERREUR);
}
}
} elseif (!$this->AddAddress($email)) {
$this->log("Erreur AddAddress $email : " . print_r($this->ErrorInfo, true), _LOG_ERREUR);
}
}
/**
* Definir le message, en HTML et/ou en texte (si seulement un message texte fourni
* @param string|null $message_html
* @param string $message_texte
* @param string $charset
* @throws Exception
*/
public function setMessage($message_html, $message_texte = null, $charset = null) {
if (is_null($charset)) {
$charset = $GLOBALS['meta']['charset'];
}
// S'il y a un contenu HTML
if (!empty($message_html)){
$message_html = unicode_to_utf_8(charset2unicode($message_html, $charset));
$this->Body = $message_html;
$this->IsHTML(true);
if ($this->embedReferencedImages) {
$this->embedReferencedImages();
}
$this->urlsToAbsUrls();
}
// S'il y a un contenu texte brut
if (!empty($message_texte)){
$message_texte = unicode_to_utf_8(charset2unicode($message_texte, $charset));
// Si pas de HTML on le remplace en tant que contenu principal
if (!$this->Body){
$this->IsHTML(false);
$this->Body = $message_texte;
} // Sinon on met le texte brut en contenu alternatif
else {
$this->AltBody = $message_texte;
}
}
}
/**
* Set the important flag more or less supported by client mails
*/
public function setImportant($important = true) {
if ($important) {
$this->addCustomHeader("X-Priority", "1 (High)");
$this->addCustomHeader("X-MSMail-Priority", "High");
$this->addCustomHeader("Importance", "High");
}
$this->important = $important;
}
/**
* Set the fail function to call if an important mail was not sent
* @param $function
* @param $args
* @param $include
*/
public function setSendFailFunction($function, $args, $include) {
$this->sendFailFunction = array(
'function' => $function,
'args' => $args,
'include' => $include,
);
}
/**
* Generer le log informatif sur le mail qui va etre envoye
* @return string
*/
public function getMessageLog(){
$this->forceFromIfNeeded();
$header = $this->CreateHeader();
$trace = trim($header) . "\n";
// completer le header avec les infos essentielles qu'on veut dans les logs
if (!empty($this->to) and strpos($trace, "To:") === false) {
$trace .= $this->addrAppend('To', $this->to);
}
if (!empty($this->cc) and strpos($trace, "Cc:") === false) {
$trace .= $this->addrAppend('Cc', $this->cc);
}
if (!empty($this->bcc) and strpos($trace, "Bcc:") === false) {
$trace .= $this->addrAppend('Bcc', $this->bcc);
}
if (strpos($trace, 'Subject:') === false) {
$trace .= "Subject: " . $this->Subject . "\n";
}
$message_desc = [];
if (!empty($this->Body)) {
$message_desc[] = "Body(".strlen($this->Body)."c)";
}
if (!empty($this->AltBody)) {
$message_desc[] = "AltBody(".strlen($this->AltBody)."c)";
}
if (!empty($this->attachment)) {
$message_desc[] = "Files(".count($this->attachment).")";
}
$trace .= "Message: " . implode(' ', $message_desc)."\n";
return "Sent by " . get_class($this) . "\n" . rtrim($trace);
}
/**
* @param bool $exceptions
*/
public function setExceptions($exceptions){
$this->exceptions = ($exceptions ? true : false);
}
/**
* Transformer les urls des liens et des images en url absolues
* sans toucher aux images embarquees de la forme "cid:..."
*
* @param string|null $baseUrl
*/
protected function urlsToAbsUrls($baseUrl = null){
if (preg_match_all(',(<(a|link)[[:space:]]+[^<>]*href=["\']?)([^"\' ><[:space:]]+)([^<>]*>),imsS',
$this->Body, $liens, PREG_SET_ORDER)){
foreach ($liens as $lien){
if (strncmp($lien[3], "cid:", 4)!==0){
$abs = url_absolue($lien[3], $baseUrl);
if ($abs<>$lien[3] and !preg_match('/^#/', $lien[3])){
$this->Body = str_replace($lien[0], $lien[1] . $abs . $lien[4], $this->Body);
}
}
}
}
if (preg_match_all(',(<(img|script)[[:space:]]+[^<>]*src=["\']?)([^"\' ><[:space:]]+)([^<>]*>),imsS',
$this->Body, $liens, PREG_SET_ORDER)){
foreach ($liens as $lien){
if (strncmp($lien[3], "cid:", 4)!==0){
$abs = url_absolue($lien[3], $baseUrl);
if ($abs<>$lien[3]){
$this->Body = str_replace($lien[0], $lien[1] . $abs . $lien[4], $this->Body);
}
}
}
}
}
/**
* Embed les images HTML dans l'email
* @throws Exception
*/
protected function embedReferencedImages(){
$image_types = array(
'gif' => 'image/gif',
'jpg' => 'image/jpeg',
'jpeg' => 'image/jpeg',
'jpe' => 'image/jpeg',
'bmp' => 'image/bmp',
'png' => 'image/png',
'tif' => 'image/tiff',
'tiff' => 'image/tiff',
//'swf' => 'application/x-shockwave-flash' // on elever pour des raisons de securite et deprecie
);
$src_found = array();
$images_embeded = array();
if (preg_match_all(
'/["\'](([^"\']+)\.(' . implode('|', array_keys($image_types)) . '))([?][^"\']+)?([#][^"\']+)?["\']/Uims',
$this->Body, $images, PREG_SET_ORDER)){
$adresse_site = $GLOBALS['meta']['adresse_site'] . '/';
foreach ($images as $im){
$im = array_pad($im, 6, null);
$src_orig = $im[1] . $im[4] . $im[5];
if (!isset($src_found[$src_orig])){ // deja remplace ? rien a faire (ie la meme image presente plusieurs fois)
// examiner le src et voir si embedable
$src = $im[1];
foreach ($this->urlsBase as $base) {
if ($src AND strncmp($src, $base, strlen($base))==0){
$src = _DIR_RACINE . substr($src, strlen($base));
}
}
if ($src
AND !preg_match(",^([a-z0-9]+:)?//,i", $src)
AND (
file_exists($f = $src) // l'image a ete generee depuis le meme cote que l'envoi
OR (_DIR_RACINE AND file_exists($f = _DIR_RACINE . $src)) // l'image a ete generee dans le public et on est dans le prive
OR (!_DIR_RACINE AND file_exists($f = _DIR_RESTREINT . $src)) // l'image a ete generee dans le prive et on est dans le public
)
){
if (!isset($images_embeded[$f])){
$extension = strtolower($im[3]);
$header_extension = $image_types[$extension];
$cid = md5($f); // un id unique pour un meme fichier
$images_embeded[$f] = $cid; // marquer l'image comme traitee, inutile d'y revenir
$this->AddEmbeddedImage($f, $cid, basename($f), 'base64', $header_extension);
}
$this->Body = str_replace($src_orig, "cid:" . $images_embeded[$f], $this->Body);
$src_found[$src_orig] = $f;
}
}
}
}
}
/**
* Conversion safe d'un texte utf en isotruc
* @param string $text
* @param string $mode
* @return string
*/
protected function safeUtf8Decode($text, $mode = 'texte_brut'){
if (!is_utf8($text)){
return ($text);
}
if (function_exists('iconv') && $mode=='texte_brut'){
$text = str_replace('', "'", $text);
$text = iconv("UTF-8", "ISO-8859-1//TRANSLIT", $text);
return str_replace('&#8217;', "'", $text);
} else {
if ($mode=='texte_brut'){
$text = str_replace('', "'", $text);
}
$text = unicode2charset(utf_8_to_unicode($text), 'iso-8859-1');
return str_replace('&#8217;', "'", $text);
}
}
/**
* Convertir tout le mail utf en isotruc
*/
protected function convertMessageFromUtf8ToIso8859(){
$this->CharSet = 'iso-8859-1';
$this->Body = str_ireplace('charset=utf-8', 'charset=iso-8859-1', $this->Body);
$this->Body = $this->safeUtf8Decode($this->Body, 'html');
$this->AltBody = $this->safeUtf8Decode($this->AltBody);
$this->Subject = $this->safeUtf8Decode($this->Subject);
$this->FromName = $this->safeUtf8Decode($this->FromName);
}
/**
* Forcer le from avant envoi si il n'est pas sur le bon domaine
* @throws Exception
*/
protected function forceFromIfNeeded() {
if ($this->ForceFrom
AND $this->From!==$this->ForceFrom){
$forcedomain = explode('@', $this->ForceFrom);
$forcedomain = end($forcedomain);
$domain = explode('@', $this->From);
$domain = end($domain);
if ($domain!==$forcedomain){
// le From passe en ReplyTo
$this->AddReplyTo($this->From, $this->FromName);
// on force le From
$this->From = $this->ForceFrom;
$this->FromName = $this->ForceFromName;
}
}
}
/**
* Clear all recipients
*/
public function clearAllRecipients(){
parent::clearAllRecipients();
if (!empty($this->autoCc)) {
$this->AddCC($this->autoCc);
}
if (!empty($this->autoBcc)){
$this->AddBCC($this->autoBcc);
}
}
/**
* Verifier si il faut envoyer le mail d'alerte
* @param mixed $res
* @return mixed
*/
protected function sendAlertIfNeeded($res) {
if ($res === false) {
if ($this->important and !empty($this->sendFailFunction)) {
$facteur_envoyer_alerte_fail = charger_fonction('facteur_envoyer_alerte_fail','inc');
$facteur_envoyer_alerte_fail($this->sendFailFunction['function'], $this->sendFailFunction['args'], $this->sendFailFunction['include']);
}
}
return $res;
}
/**
* Une fonction wrapper pour appeler une methode de phpMailer
* en recuperant l'erreur eventuelle, en la loguant via SPIP et en lancant une exception si demandee
* @param string $function
* @param array $args
* @return bool
* @throws phpmailerException
*/
protected function callWrapper($function, $args){
$exceptions = $this->exceptions;
$this->exceptions = true;
try {
$retour = call_user_func_array($function, $args);
$this->exceptions = $exceptions;
} catch (Exception $exc) {
$this->log((is_array($function) ? implode('::', $function) : $function) . "() : " . $exc->getMessage(), _LOG_ERREUR);
$this->exceptions = $exceptions;
if ($this->exceptions){
throw $exc;
}
return false;
}
if ($this->ErrorInfo){
$this->log((is_array($function) ? implode('::', $function) : $function) . "() : " . $this->ErrorInfo, _LOG_ERREUR);
}
return $retour;
}
/*
* Appel des fonctions parents via le callWrapper qui se charge de loger les erreurs
*/
/**
* Avant le Send() on force le From et le Charset si besoin
*
* @return bool
* @throws Exception
*/
public function Send(){
$this->forceFromIfNeeded();
if ($this->convertMessageToIso8859){
$this->convertMessageFromUtf8ToIso8859();
}
$args = func_get_args();
$res = $this->callWrapper(array('parent', 'Send'), $args);
return $this->sendAlertIfNeeded($res);
}
public function addAttachment($path, $name = '', $encoding = 'base64', $type = '', $disposition = 'attachment'){
$args = func_get_args();
return $this->callWrapper(array('parent', 'AddAttachment'), $args);
}
public function AddReplyTo($address, $name = ''){
$args = func_get_args();
return $this->callWrapper(array('parent', 'AddReplyTo'), $args);
}
public function AddBCC($address, $name = ''){
$args = func_get_args();
return $this->callWrapper(array('parent', 'AddBCC'), $args);
}
public function AddCC($address, $name = ''){
$args = func_get_args();
return $this->callWrapper(array('parent', 'AddCC'), $args);
}
}