htdocs/lib/CMailFile.class.php

<?php
/* notes from Dan Potter:
Sure. I changed a few other things in here too though. One is that I let
you specify what the destination filename is (i.e., what is shows up as in
the attachment). This is useful since in a web submission you often can't
tell what the filename was supposed to be from the submission itself. I
also added my own version of chunk_split because our production version of
PHP doesn't have it. You can change that back or whatever though =).
Finally, I added an extra "\n" before the message text gets added into the
MIME output because otherwise the message text wasn't showing up.
/*
note: someone mentioned a command-line utility called 'mutt' that 
can mail attachments.
*/
/* 
If chunk_split works on your system, change the call to my_chunk_split
to chunk_split 
*/
/* Note: if you don't have base64_encode on your sytem it will not work */

/*
  Éric Seigne <eric.seigne@ryxeo.com> 2004.01.08
  - ajout de la gestion du Cc
  - ajout de l'expédition de plusieurs fichiers

  Laurent Destailleur 2004.02.10
  - Correction d'un disfonctionnement suite à modif précédente sur la gestion
  des attachements multi-fichiers
*/

// simple class that encapsulates mail() with addition of mime file attachment.
class CMailFile 
{
  var $subject;
  var $addr_to;
  var $addr_cc;
  var $text_body;
  var $text_encoded;
  var $mime_headers;
  var $mime_boundary = "--==================_846811060==_";
  var $smtp_headers;
  
  // CMail("sujet","email_to","email_from","email_msg",tableau du path de fichiers,tableau de type mime,tableau de noms fichiers,"chaine cc")
  function CMailFile($subject,$to,$from,$msg,$filename_list,$mimetype_list,$mimefilename_list,$addr_cc = "")
    {
      $this->subject = $subject;
      $this->addr_to = $to;
      $this->smtp_headers = $this->write_smtpheaders($from,$addr_cc);
      $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);
      }
    }

  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
    }

  function encode_file($sourcefile)
    {
      //      print "<pre> on encode $sourcefile </pre>\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;
  }
  
  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);
    }
  
  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;
    }
  
  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;
  }
  
  function write_smtpheaders($addr_from,$addr_cc)
    {
      $out = "From: $addr_from\n";
      if($addr_cc != "")
    $out = $out . "Cc: $addr_cc\n";
      $out = $out . "Reply-To: $addr_from\n";
      $out = $out . "X-Mailer: Dolibarr version " . DOL_VERSION ."\n";
      $out = $out . "X-Sender: $addr_from\n";
      return $out;
    }
}

// usage - mimetype example "image/gif"
// $mailfile = new CMailFile($subject,$sendto,$replyto,$message,$filename,$mimetype);
// $mailfile->sendfile();

// Splits a string by RFC2045 semantics (76 chars per line, end with \r\n).
// This is not in all PHP versions so I define one here manuall.
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;
}

// end script
?>

---