mirror of
https://github.com/Dolibarr/dolibarr.git
synced 2025-12-10 19:41:26 +01:00
462 lines
13 KiB
PHP
462 lines
13 KiB
PHP
<?php
|
|
|
|
class simplemail {
|
|
|
|
var $recipientlist;
|
|
var $subject;
|
|
var $hfrom;
|
|
var $hbcc;
|
|
var $hcc;
|
|
var $deliveryreceipt;
|
|
|
|
var $Xsender;
|
|
var $ErrorsTo;
|
|
var $returnpath;
|
|
var $XMailer = 'PHP';
|
|
var $XPriority = 3;
|
|
|
|
var $set_mode='php';
|
|
|
|
var $text;
|
|
var $html;
|
|
var $attachement;
|
|
var $htmlattachement;
|
|
|
|
var $recipient;
|
|
|
|
var $body;
|
|
var $headers;
|
|
var $error_log;
|
|
var $connect;
|
|
|
|
var $default_charset = 'iso-8859-1';
|
|
|
|
var $B1B = "----=_001";
|
|
var $B2B = "----=_002";
|
|
var $B3B = "----=_003";
|
|
|
|
|
|
function simplemail() {
|
|
$this -> attachement = array();
|
|
$this -> htmlattachement = array();
|
|
}
|
|
|
|
function checkaddress($address) {
|
|
if ( preg_match('`([[:alnum:]]([-_.]?[[:alnum:]])*@[[:alnum:]]([-_.]?[[:alnum:]])*\.([a-z]{2,4}))`', $address) ) {
|
|
return TRUE;
|
|
} else {
|
|
$this->error_log("l'adresse $address est invalide"); return FALSE;
|
|
}
|
|
}
|
|
|
|
function checkname($name) {
|
|
if ( preg_match("`[0-9a-zA-Z\.\-_ ]*`" , $name ) ) {
|
|
return TRUE;
|
|
} else {
|
|
$this->error_log(" le pseudo $name est invalide\n"); return FALSE;
|
|
}
|
|
}
|
|
|
|
function makenameplusaddress($address,$name) {
|
|
if ( !$this->checkaddress($address) ) return FALSE;
|
|
if ( !$this->checkname($name) ) return FALSE;
|
|
if ( empty($name) ) { return $address; }
|
|
else { $tmp=$name." <".$address.">"; return $tmp; }
|
|
}
|
|
|
|
function addrecipient($newrecipient,$name='') {
|
|
$tmp=$this->makenameplusaddress($newrecipient,$name);
|
|
if ( !$tmp ) { $this->error_log(" To: error"); return FALSE; }
|
|
$this->recipientlist[] = array( 'mail'=>$newrecipient, 'nameplusmail' => $tmp );
|
|
return TRUE;
|
|
}
|
|
|
|
function addbcc($bcc,$name='') {
|
|
$tmp=$this->makenameplusaddress($bcc,$name);
|
|
if ( !$tmp ) { $this->error_log(" Bcc: error"); return FALSE; }
|
|
if ( !empty($this->hbcc)) $this->hbcc.= ",";
|
|
$this->hbcc.= $tmp;
|
|
return TRUE;
|
|
}
|
|
|
|
function addcc($cc,$name='') {
|
|
$tmp=$this->makenameplusaddress($cc,$name);
|
|
if ( !$tmp ) { $this->error_log(" Cc: error\n"); return FALSE; }
|
|
if (!empty($this->hcc)) $this->hcc.= ",";
|
|
$this->hcc.= $tmp;
|
|
return TRUE;
|
|
}
|
|
|
|
function addsubject($subject) {
|
|
if (!empty($subject)) $this->subject = $subject;
|
|
}
|
|
|
|
function addfrom($from,$name='') {
|
|
$tmp=$this->makenameplusaddress($from,$name);
|
|
if ( !$tmp ) { $this->error_log(" From: error"); return FALSE; }
|
|
$this->hfrom = $tmp;
|
|
return TRUE;
|
|
}
|
|
|
|
function addreturnpath($return) {
|
|
$tmp=$this->makenameplusaddress($return,'');
|
|
if ( !$tmp ) { $this->error_log("Return-Path: error"); return FALSE; }
|
|
$this->returnpath = $return;
|
|
return TRUE;
|
|
}
|
|
|
|
function addreplyto($replyto) {
|
|
$tmp=$this->makenameplusaddress($replyto,'');
|
|
if ( !$tmp ) { $this->error_log(" Reply-To: error"); return FALSE; }
|
|
$this->returnpath = $tmp;
|
|
return TRUE;
|
|
}
|
|
|
|
function adddeliveryreceipt($deliveryreceipt) {
|
|
$tmp=$this->makenameplusaddress($deliveryreceipt,'');
|
|
if ( !$tmp ) { $this->error_log(" Disposition-Notification-To: error"); return FALSE; }
|
|
$this->deliveryreceipt = $tmp;
|
|
return TRUE;
|
|
}
|
|
|
|
|
|
// les attachements
|
|
function addattachement($filename) {
|
|
array_push ( $this -> attachement , array ( 'filename'=> $filename ) );
|
|
}
|
|
|
|
// les attachements html
|
|
function addhtmlattachement($filename,$cid='',$contenttype='') {
|
|
array_push ( $this -> htmlattachement ,
|
|
array ( 'filename'=>$filename ,
|
|
'cid'=>$cid ,
|
|
'contenttype'=>$contenttype )
|
|
);
|
|
}
|
|
|
|
function writeattachement(&$attachement,$B) {
|
|
$message = '';
|
|
$inline = array();
|
|
if ( !empty($attachement) ) {
|
|
foreach($attachement as $AttmFile){
|
|
$patharray = explode ("/", $AttmFile['filename']);
|
|
$FileName = $patharray[count($patharray)-1];
|
|
|
|
// If duplicate images are embedded, they may show up as attachments, so remove them.
|
|
if (!in_array($AttmFile['filename'],$inline))
|
|
{
|
|
$message .= "\n--".$B."\n";
|
|
|
|
if (!empty($AttmFile['cid'])) {
|
|
$inline[] = $AttmFile['filename'];
|
|
$message .= "Content-Type: {$AttmFile['contenttype']};\n name=\"".$FileName."\"\n";
|
|
$message .= "Content-Transfer-Encoding: base64\n";
|
|
$message .= "Content-ID: <{$AttmFile['cid']}>\n";
|
|
$message .= "Content-Disposition: inline;\n filename=\"".$FileName."\"\n\n";
|
|
} else {
|
|
$message .= "Content-Type: application/octetstream;\n name=\"".$FileName."\"\n";
|
|
$message .= "Content-Transfer-Encoding: base64\n";
|
|
$message .= "Content-Disposition: attachment;\n filename=\"".$FileName."\"\n\n";
|
|
}
|
|
|
|
$fd=fopen ($AttmFile['filename'], "rb");
|
|
$FileContent=fread($fd,filesize($AttmFile['filename']));
|
|
fclose ($fd);
|
|
|
|
$FileContent = chunk_split(base64_encode($FileContent));
|
|
$message .= $FileContent;
|
|
$message .= "\n\n";
|
|
}
|
|
}
|
|
$message .= "\n--".$B."--\n";
|
|
}
|
|
return $message;
|
|
}
|
|
|
|
function BodyLineWrap($Value) {
|
|
return wordwrap($Value, 78, "\n ");
|
|
}
|
|
|
|
function makebody() {
|
|
$message='';
|
|
if ( !$this->html && $this->text && !empty($this->attachement) ) {
|
|
|
|
//Messages start with text/html alternatives in OB
|
|
$message ="This is a multi-part message in MIME format.\n";
|
|
$message.="\n--".$this->B1B."\n";
|
|
|
|
$message.="Content-Type: text/plain; charset=\"iso-8859-1\"\n";
|
|
$message.="Content-Transfer-Encoding: quoted-printable\n\n";
|
|
// plaintext goes here
|
|
$message.=$this->BodyLineWrap($this->text)."\n\n";
|
|
|
|
$message.=$this->writeattachement($this->attachement,$this->B1B);
|
|
|
|
}
|
|
elseif ( !$this->html && $this->text && empty($this->attachement) ) {
|
|
|
|
// plaintext goes here
|
|
$message.=$this->BodyLineWrap($this->text)."\n\n";
|
|
}
|
|
elseif ( $this->html ) {
|
|
|
|
//Messages start with text/html alternatives in OB
|
|
$message ="This is a multi-part message in MIME format.\n";
|
|
$message.="\n--".$this->B1B."\n";
|
|
|
|
$message.="Content-Type: multipart/related;\n\t boundary=\"".$this->B2B."\"\n\n";
|
|
//plaintext section
|
|
$message.="\n--".$this->B2B."\n";
|
|
|
|
$message.="Content-Type: multipart/alternative;\n\t boundary=\"".$this->B3B."\"\n\n";
|
|
//plaintext section
|
|
$message.="\n--".$this->B3B."\n";
|
|
|
|
$message.="Content-Type: text/plain; charset=\"iso-8859-1\"\n";
|
|
$message.="Content-Transfer-Encoding: quoted-printable\n\n";
|
|
// plaintext goes here
|
|
$message.=$this->BodyLineWrap($this->text)."\n\n";
|
|
|
|
// html section
|
|
$message.="\n--".$this->B3B."\n";
|
|
$message.="Content-Type: text/html; charset=\"iso-8859-1\"\n";
|
|
$message.="Content-Transfer-Encoding: base64\n\n";
|
|
// html goes here
|
|
$message.=chunk_split(base64_encode($this->html))."\n\n";
|
|
|
|
// end of text
|
|
$message.="\n--".$this->B3B."--\n";
|
|
|
|
// attachments html
|
|
if (empty($this->htmlattachement)) {
|
|
$message.="\n--".$this->B2B."--\n";
|
|
} else {
|
|
$message.=$this->writeattachement( $this->htmlattachement,$this->B2B);
|
|
}
|
|
|
|
// attachments
|
|
if (empty($this->attachement)) {
|
|
$message.="\n--".$this->B1B."--\n";
|
|
} else {
|
|
$message.=$this->writeattachement($this->attachement,$this->B1B);
|
|
}
|
|
|
|
}
|
|
|
|
$this->body = $message;
|
|
|
|
return $message;
|
|
|
|
}
|
|
|
|
// Mail Headers Methods
|
|
|
|
function MakeHeaderField($Field,$Value) {
|
|
return wordwrap($Field.": ".$Value, 78, "\n ")."\r\n";
|
|
}
|
|
|
|
function AddField2Header($Field,$Value) {
|
|
$this->headers .= $this->MakeHeaderField($Field,$Value);
|
|
}
|
|
|
|
function makeheader() {
|
|
|
|
$this->headers = '';
|
|
|
|
if ( empty($this->recipientlist) ) { $this->error_log("destinataire manquant"); return FALSE; }
|
|
else { // DOLCHANGE LDR Fix missing recipients in header
|
|
$this->AddField2Header("To",$this->recipient);
|
|
}
|
|
|
|
if ( empty($this->subject) ) {
|
|
$this->error_log("sujet manquant");
|
|
return FALSE;
|
|
} else {
|
|
if ($this->set_mode!='php' ) {
|
|
$this->AddField2Header("Subject", $this->subject);
|
|
}
|
|
}
|
|
|
|
|
|
# Date: Mon, 03 Nov 2003 20:48:06 +0100
|
|
$this->AddField2Header("Date", date ('r'));
|
|
|
|
if ( !empty($this->Xsender) ) { $this->AddField2Header("X-Sender",$this->Xsender); }
|
|
else { $this->AddField2Header("X-Sender",$this->hfrom); }
|
|
|
|
if ( !empty($this->ErrorsTo) ) { $this->AddField2Header("Errors-To",$this->ErrorsTo); }
|
|
else { $this->AddField2Header("Errors-To",$this->hfrom); }
|
|
|
|
if ( !empty($this->XMailer) ) $this->AddField2Header("X-Mailer",$this->XMailer);
|
|
|
|
if ( !empty($this->XPriority) ) $this->AddField2Header("X-Priority",$this->XPriority);
|
|
|
|
if ( !empty($this->hfrom) ) $this->AddField2Header("From",$this->hfrom);
|
|
|
|
if ( !empty($this->returnpath) ) { $this->AddField2Header("Return-Path",$this->returnpath); }
|
|
else { $this->AddField2Header("Return-Path",$this->hfrom); }
|
|
|
|
if ( !empty($this->replyto) ) $this->AddField2Header("Reply-To",$this->replyto);
|
|
|
|
if ( !empty($this->deliveryreceipt) ) $this->AddField2Header("Disposition-Notification-To",$this->deliveryreceipt);
|
|
|
|
$this->headers .="MIME-Version: 1.0\r\n";
|
|
|
|
if ( !$this->html && $this->text && !empty($this->attachement) ) {
|
|
$this->headers .= "Content-Type: multipart/mixed;\r\n\t boundary=\"".$this->B1B."\"\r\n";
|
|
} elseif ( !$this->html && $this->text && empty($this->attachement) ) {
|
|
$this->headers .="Content-Type: text/plain; charset=utf8; format=flowed\r\n";
|
|
$this->headers .="Content-Transfer-Encoding: 8bit\r\n";
|
|
} elseif ( $this->html ) {
|
|
if ( !$this->text ) { $this->text="HTML only!"; }
|
|
$this->headers .="Content-Type: multipart/mixed;\r\n\t boundary=\"".$this->B1B."\"\r\n";
|
|
}
|
|
|
|
if ( !empty($this->hcc) ) $this->AddField2Header("Cc",$this->hcc);
|
|
if ( !empty($this->hbcc) ) $this->AddField2Header("Bcc",$this->hbcc);
|
|
|
|
return $this->headers;
|
|
}
|
|
|
|
function sendmail() {
|
|
$this->makebody();
|
|
$this->makeheader();
|
|
switch($this->set_mode) {
|
|
case 'php' : $this->phpmail(); break;
|
|
case 'socket': $this->socketmailloop(); break;
|
|
}
|
|
|
|
return TRUE;
|
|
}
|
|
|
|
// Mail send by PHPmail
|
|
|
|
function phpmail() {
|
|
global $conf;
|
|
// DOLCHANGE LDR Fix the To in header was not filled
|
|
foreach ($this->recipientlist as $key => $to)
|
|
{
|
|
$this->recipient = ($this->recipient?$this->recipient.', ':'').$to['mail'];
|
|
}
|
|
foreach ($this->recipientlist as $key => $to)
|
|
{
|
|
$bounce = '';
|
|
if ($conf->global->MAIN_MAIL_ALLOW_SENDMAIL_F)
|
|
{
|
|
// DOLCHANGE LDR
|
|
// le return-path dans les header ne fonctionne pas avec tous les MTA
|
|
// Le passage par -f est donc possible si la constante MAIN_MAIL_ALLOW_SENDMAIL_F est definie.
|
|
// La variable definie pose des pb avec certains sendmail securisee (option -f refusee car dangereuse)
|
|
$bounce = $this->returnpath != '' ? "-f {$this->returnpath}" : "";
|
|
}
|
|
// $this->recipient = $to['mail']; DOLCHANGE LDR Fix the To in header was not filled
|
|
if ( mail($to['mail'], $this->subject, $this->body, $this->makeheader() , $bounce ) ) {
|
|
$this->error_log("envoie vers {$to['nameplusmail']} reussi");
|
|
} else {
|
|
$this->error_log("envoie vers {$to['nameplusmail']} echoue");
|
|
}
|
|
}
|
|
return TRUE;
|
|
}
|
|
|
|
// Socket Function
|
|
|
|
function SocketStart() {
|
|
if (!$this->connect = fsockopen (ini_get("SMTP"), ini_get("smtp_port"), $errno, $errstr, 30)) {
|
|
$this->error_log("Could not talk to the sendmail server!"); return FALSE;
|
|
};
|
|
return fgets($this->connect, 1024);
|
|
}
|
|
|
|
function SocketStop() {
|
|
fclose($this->connect);
|
|
return TRUE;
|
|
}
|
|
|
|
function SocketSend($in,$wait='') {
|
|
fputs($this->connect, $in, strlen($in));
|
|
//echo $in;
|
|
$this->error_log($in); // DOLCHANGE LDR Add debug
|
|
//flush();
|
|
if(empty($wait)) {
|
|
$rcv = fgets($this->connect, 1024);
|
|
$this->error_log('('.$rcv.')'); // DOLCHANGE LDR Add debug
|
|
return $rcv;
|
|
}
|
|
return TRUE;
|
|
}
|
|
|
|
// Mail Socket
|
|
|
|
function socketmailstart() {
|
|
|
|
$this->SocketStart();
|
|
if (!isset($_SERVER['SERVER_NAME']) || empty($_SERVER['SERVER_NAME'])) { $serv = 'unknown'; }
|
|
else { $serv = $_SERVER['SERVER_NAME']; }
|
|
// DOLCHANGE LDR
|
|
$serv = ini_get('SMTP');
|
|
$this->SocketSend("HELO $serv\r\n",'250');
|
|
}
|
|
|
|
function socketmailsend($to) {
|
|
|
|
// $this->recipient = $to; // DOLCHANGE LDR Must not reset this property
|
|
$this->error_log("Socket vers $to");
|
|
|
|
// DOLCHANGE LDR: From has to be the raw email address, strip the "name" off
|
|
$fromarray=explode(' ',$this->hfrom);
|
|
$from=(empty($fromarray[1])?$fromarray[0]:$fromarray[1]);
|
|
$this->SocketSend( "MAIL FROM: ".$from."\r\n", '250');
|
|
$this->SocketSend( "RCPT TO: <".$to.">\r\n", '250');
|
|
$this->SocketSend( "DATA\r\n", '354');
|
|
$this->SocketSend( $this->CleanMailDataString($this->headers)."\r\n".$this->CleanMailDataString($this->body)."\r\n", '250'); // DOLCHANGE LDR Must wait return 250
|
|
$this->SocketSend( ".\r\n" );
|
|
$this->SocketSend( "RSET\r\n" );
|
|
|
|
$this->error_log("Fin de l'envoi vers $to");
|
|
|
|
return TRUE;
|
|
}
|
|
|
|
function socketmailstop() {
|
|
$this->SocketSend("QUIT\r\n");
|
|
$this->SocketStop();
|
|
return TRUE;
|
|
}
|
|
|
|
function socketmailloop() {
|
|
$this->socketmailstart();
|
|
// DOLCHANGE LDR Fix the To in header was not filled
|
|
foreach ($this->recipientlist as $key => $to)
|
|
{
|
|
$this->recipient = ($this->recipient?$this->recipient.', ':'').$to['mail'];
|
|
}
|
|
foreach ($this->recipientlist as $key => $to)
|
|
{
|
|
$this->makeheader();
|
|
$this->socketmailsend($to['mail']);
|
|
}
|
|
$this->socketmailstop();
|
|
}
|
|
|
|
// Misc.
|
|
|
|
function error_log($msg='') {
|
|
if(!empty($msg)) {
|
|
//$this->error_log .= $msg . "\r\n--\r\n";
|
|
//DOLCHANGE LDR Better to read log
|
|
$this->error_log .= $msg;
|
|
return TRUE;
|
|
}
|
|
return " --- Error Log --- \r\n\r\n".$this->error_log;
|
|
}
|
|
|
|
function CleanMailDataString($data) {
|
|
$data = preg_replace("/([^\r]{1})\n/", "\\1\r\n", $data);
|
|
$data = preg_replace("/\n\n/", "\n\r\n", $data);
|
|
$data = preg_replace("/\n\./", "\n..", $data);
|
|
return $data;
|
|
}
|
|
}
|
|
?>
|