sendfile(); */ class CMailFile { var $subject; var $addr_from; var $addr_to; var $addr_cc; var $addr_bcc; var $text_body; var $text_encoded; var $mime_headers; var $mime_boundary = "--==================_846811060==_"; var $smtp_headers; /** \brief CMailFile \param subject sujet \param to email destinataire \param from email emetteur \param msg message \param filename_list tableau de fichiers attachés \param mimetype_list tableau des types des fichiers attachés \param mimefilename_list tableau des noms des fichiers attachés \param addr_cc email cc \param addr_bcc email bcc */ function CMailFile($subject,$to,$from,$msg,$filename_list,$mimetype_list,$mimefilename_list,$addr_cc="",$addr_bcc="") { $this->subject = $subject; $this->addr_from = $from; $this->addr_to = $to; $this->addr_cc = $addr_cc; $this->addr_bcc = $addr_bcc; $this->smtp_headers = $this->write_smtpheaders(); $this->text_body = $this->write_body($msg, $filename_list); if (count($filename_list)) { $this->mime_headers = $this->write_mimeheaders($filename_list, $mimefilename_list); $this->text_encoded = $this->attach_file($filename_list,$mimetype_list,$mimefilename_list); } } /** \brief permet d'attacher un fichier \param filename_list \param mimetype_list \param mimefilename_list */ function attach_file($filename_list,$mimetype_list,$mimefilename_list) { for ($i = 0; $i < count($filename_list); $i++) { $encoded = $this->encode_file($filename_list[$i]); if ($mimefilename_list[$i]) $filename_list[$i] = $mimefilename_list[$i]; $out = $out . "--" . $this->mime_boundary . "\n"; if (! $mimetype_list[$i]) { $mimetype_list[$i] = "application/octet-stream"; } $out = $out . "Content-type: " . $mimetype_list[$i] . "; name=\"$filename_list[$i]\";\n"; $out = $out . "Content-Transfer-Encoding: base64\n"; $out = $out . "Content-disposition: attachment; filename=\"$filename_list[$i]\"\n\n"; $out = $out . $encoded . "\n"; } $out = $out . "--" . $this->mime_boundary . "--" . "\n"; return $out; // added -- to notify email client attachment is done } /** \brief permet d'encoder un fichier \param sourcefile */ function encode_file($sourcefile) { // print "
 on encode $sourcefile
\n"; if (is_readable($sourcefile)) { $fd = fopen($sourcefile, "r"); $contents = fread($fd, filesize($sourcefile)); $encoded = my_chunk_split(base64_encode($contents)); fclose($fd); } return $encoded; } /** \brief permet d'envoyer un fichier */ function sendfile() { $headers .= $this->smtp_headers . $this->mime_headers; $message = $this->text_body . $this->text_encoded; return mail($this->addr_to,$this->subject,stripslashes($message),$headers); } /** \brief permet d'ecrire le body d'un message \param msgtext \param filename_list */ function write_body($msgtext, $filename_list) { if (count($filename_list)) { $out = "--" . $this->mime_boundary . "\n"; $out = $out . "Content-Type: text/plain; charset=\"iso8859-15\"\n\n"; // $out = $out . "Content-Type: text/plain; charset=\"us-ascii\"\n\n"; } $out = $out . $msgtext . "\n"; return $out; } /** \brief création des headers mime \param filename_list \param mimefilename_list */ function write_mimeheaders($filename_list, $mimefilename_list) { $out = "MIME-version: 1.0\n"; $out = $out . "Content-type: multipart/mixed; "; $out = $out . "boundary=\"$this->mime_boundary\"\n"; $out = $out . "Content-transfer-encoding: 7BIT\n"; for($i = 0; $i < count($filename_list); $i++) { if ($mimefilename_list[$i]) $filename_list[$i] = $mimefilename_list[$i]; $out = $out . "X-attachments: $filename_list[$i];\n\n"; } return $out; } /** \brief création des headers smtp */ function write_smtpheaders() { $out = "From: ".$this->addr_from."\n"; if ($this->addr_cc) $out = $out . "Cc: ".$this->addr_cc."\n"; if ($this->addr_bcc) $out = $out . "Bcc: ".$this->addr_bcc."\n"; $out = $out . "Reply-To: $addr_from\n"; $out = $out . "X-Mailer: Dolibarr version " . DOL_VERSION ."\n"; $out = $out . "X-Sender: $addr_from\n"; $out = $out . "Return-path: $addr_from\n"; return $out; } } /** \brief permet de diviser une chaine (RFC2045) \param str \remarks function chunk_split qui remplace celle de php si nécéssaire \remarks 76 caractères par ligne, terminé par "\r\n" */ function my_chunk_split($str) { $stmp = $str; $len = strlen($stmp); $out = ""; while ($len > 0) { if ($len >= 76) { $out = $out . substr($stmp, 0, 76) . "\r\n"; $stmp = substr($stmp, 76); $len = $len - 76; } else { $out = $out . $stmp . "\r\n"; $stmp = ""; $len = 0; } } return $out; } ?>