WP File Manager

Name	Action
..
bulkstart.php	Edit
feedback.php	Edit
send.php	Edit

Editing: send.php

<?php /** * Plugin MailShot * (c) 2012 Cedric Morin * Licence GNU/GPL */ if (!defined('_ECRIRE_INC_VERSION')) return; include_spip("inc/config"); /** * Envoi une newsletter a un destinataire * * @param array $destinataire * description du destinataire * string email * string nom * array listes * string lang * string status : on|pending|off * string url_unsubscribe : url de desabonnement * * * @param array|string $corps * string id de la newsletter *ou array contenu de la newsletter * string sujet * string html * string texte * string from : email de l'envoyeur (prioritaire sur argument $from de premier niveau, deprecie) * string nom_envoyeur : un nom d'envoyeur pour completer l'email from * string cc : destinataires en copie conforme * string bcc : destinataires en copie conforme cachee * string|array repondre_a : une ou plusieurs adresses a qui repondre * * @param array $options * options d'envoi * bool test : mode test (ajoute un [TEST] dans le sujet * string tracking_id * * @return string|int * vide si ok, ou message d'erreur sinon */ function newsletter_send_dist($destinataire,$corps,$options=array()){ static $config = null; $erreur = ""; $options = array_merge(array('test'=>false,'tracking_id'=>''),$options); if (is_null($config)){ $config = lire_config("mailshot/"); if (!isset($config['mailer'])) $config['mailer'] = 'defaut'; } if (preg_match(",@example\.org$,i",$destinataire['email'])){ return "email invalide (@example.org)"; } // refuser si pas de reglage specifique d'envoi mailshot et que facteur est configure pour utiliser mail() if ($config['mailer']=='defaut' AND lire_config("facteur_smtp")=='non'){ $url_config = generer_url_ecrire("configurer_mailshot"); spip_log("mailer non configure pour l'envoi à ".$destinataire['email']." du mail « ".substr(print_r($corps, true), 0, 500)." »",'mailshot_send'._LOG_ERREUR); return _T('mailshot:erreur_aucun_service_configure',array('url'=>$url_config)); } if (!is_array($corps)) { $content = charger_fonction("content","newsletter"); $corps = $content($corps); if (!$corps OR !is_array($corps)){ return _T('mailshot:erreur_generation_newsletter'); } if (isset($corps['from_email'])) { $corps['from'] = $corps['from_email']; if (isset($corps['from_name'])) { $corps['nom_envoyeur'] = $corps['from_name']; } } } $corps = array_merge(array('html'=>'','texte'=>'','sujet'=>''),$corps); if (!$corps['html'] AND !$corps['texte']) return "rien a envoyer !"; if (!$corps['sujet']) return "il faut un sujet !"; $corps_cont = array(); // proceder au remplacement des variables contextuelles du destinataire $contextualize = charger_fonction("contextualize","newsletter"); $corps_cont['sujet'] = $contextualize($corps['sujet'], $destinataire); $corps_cont['html'] = $contextualize($corps['html'], $destinataire); $corps_cont['texte'] = $contextualize($corps['texte'], $destinataire); // preparer les messages : generer un texte si manquant ou un html si manquant ? if (!$corps_cont['html']){ if (!$corps_cont['texte']) { // il y a eu un gros probleme, on ne peut rien faire => log et erreur spip_log("Message vide pour " . $corps['sujet'] . " destinataire : ". var_export($destinataire, true), "mailshot_send" . _LOG_CRITIQUE); return "erreur lors de la personalisation de la newsletter"; } $corps_cont['html'] = recuperer_fond("emails/texte",array('texte'=>$corps_cont['texte'],'sujet'=>$corps_cont['sujet'])); } elseif (!$corps_cont['texte']){ // tant pis... : pas de bras, pas de chocolat } // Mode test ? if ($options['test']) $corps_cont['sujet'] = "["._T('newsletter:info_test_sujet')."] " . $corps_cont['sujet']; // TODO : ajouter le tracking (1 image tracker + clic tracking sur les liens) // ---- Envoi proprement dit if (!function_exists('nettoyer_titre_email')) { include_spip('inc/envoyer_mail'); // pour nettoyer_titre_email() } $sujet = nettoyer_titre_email($corps_cont['sujet']); $sujet = filtrer_entites($sujet); $sujet = str_replace('&amp;','&', $sujet); $dest_email = $destinataire['email']; // mode TEST : forcer l'email if (defined('_TEST_EMAIL_DEST')) { if (!_TEST_EMAIL_DEST) return _T('mailshot:erreur_envoi_mail_bloque_debug'); else { $dest_email = _TEST_EMAIL_DEST; // signaler cela comme une erreur, mais on continue quand meme $erreur = _T('mailshot:erreur_envoi_mail_force_debug',array('email'=>_TEST_EMAIL_DEST)); } } // On cree l'objet Mailer (PHPMailer) pour le manipuler ensuite if (!$mailer_factory = charger_fonction($config['mailer'],'bulkmailer',true) OR !$mailer = $mailer_factory( array( 'email' => $dest_email, 'sujet' => $sujet, 'html' => &$corps_cont['html'], 'texte' => &$corps_cont['texte'], ))){ $url_config = generer_url_ecrire("configurer_mailshot"); spip_log("mailer non configure pour l'envoi de $sujet a ".$destinataire['email'],'mailshot_send'._LOG_ERREUR); return _T('mailshot:erreur_aucun_service_configure',array('url'=>$url_config)); } # Regler le From si fourni dans $corps a l'appel if (isset($corps['from']) and $corps['from']){ $from = $corps['from']; if (isset($corps['nom_envoyeur']) and $corps['nom_envoyeur']){ $nom_envoyeur = $corps['nom_envoyeur']; } } // Un from par defaut sinon ? if (empty($from) AND empty($mailer->From)) { $from = $GLOBALS['meta']["email_envoi"]; if (empty($from) OR !email_valide($from)) { spip_log("Meta email_envoi invalide. Le mail sera probablement vu comme spam.","mailshot_send"); $from = $dest_email; } } if (!empty($from)){ // "Marie Toto <Marie@toto.com>" if (preg_match(",^([^<>\"]*)<([^<>\"]+)>$,i",$from,$m)){ $nom_envoyeur = trim($m[1]); $from = trim($m[2]); } $mailer->From = $from; // la valeur par defaut de la config n'est probablement pas valable pour ce mail, // on l'ecrase pour cet envoi $mailer->FromName = $from; } // On ajoute le nom de l'envoyeur s'il fait partie des options if (!empty($nom_envoyeur)) { $mailer->FromName = $nom_envoyeur; } // Si plusieurs emails dans le from, pas de Name ! if (strpos($mailer->From,",")!==false){ $mailer->FromName = ""; } # Regler le cc if (isset($corps['cc']) AND $cc=$corps['cc']){ if (is_array($cc)) foreach ($cc as $courriel) $mailer->AddCC($courriel); else $mailer->AddCC($cc); } # Regler le bcc if (isset($corps['bcc']) AND $bcc=$corps['bcc']){ if (is_array($bcc)) foreach ($bcc as $courriel) $mailer->AddBCC($courriel); else $mailer->AddBCC($bcc); } # Regler le Reply-to # TODO : reglage specifique mailshot if (isset($corps['repondre_a']) AND $repondre_a=$corps['repondre_a']){ if (is_array($repondre_a)) foreach ($repondre_a as $courriel) $mailer->AddReplyTo($courriel); else $mailer->AddReplyTo($repondre_a); } // Si une adresse email a ete specifiee pour les retours en erreur, on l'ajoute if (!empty($corps['adresse_erreur'])) $mailer->Sender = $corps['adresse_erreur']; // On passe dans un pipeline pour modifier tout le facteur avant l'envoi $mailer = pipeline('newsletter_pre_envoi', $mailer); // On genere les headers $head = $mailer->CreateHeader(); // Et c'est parti on envoie enfin $sent_via = get_class($mailer) . "[Facteur + " . $config['mailer'] . "]"; spip_log("mail via mailshot\n$head"."Destinataire:".print_r($destinataire['email'],true),'mail'); spip_log("mail "."a :".print_r($destinataire['email'],true)."\n" . ($head ? trim($head)."\n" : '') . "via $sent_via | HTML Length : ".strlen($corps_cont['html']) . " | Texte Length : " . strlen($corps_cont['texte']),'mailshot_send'._LOG_DEBUG); // fixer les options d'envoi si possible (non dispo par Facteur mais par les surcharges) if (isset($mailer->send_options)) $mailer->send_options = $options; $retour = $mailer->Send(); if (!$retour) { spip_log("Erreur Envoi mail ($dest_email) via $sent_via : ".print_r($mailer->ErrorInfo,true),'mailshot_send'._LOG_ERREUR); if ($mailer->ErrorInfo) { return $mailer->ErrorInfo; } else { return _T("mailshot:erreur_envoi_newsletter"); } } return $erreur; }