1
mouacy
mail users in HTML format
  • 2007/3/29 15:25

  • mouacy

  • Not too shy to talk

  • Posts: 138

  • Since: 2002/11/2


Is there a place in XOOPS where I can enable or disable HTML email? I want to be able to send email to members in HTML like this:



To show them the news update.

2
tmreg
Re: mail users in HTML format
  • 2007/4/3 13:46

  • tmreg

  • Not too shy to talk

  • Posts: 137

  • Since: 2006/7/20


Yes there is. If you replace the code in class/mail/phpmailer/class.phpmailer.php with the following code. Keep in mind though, you will need to change the mail templates in language/english/mail templates because it will send all mail in html format. I am 90% sure this is the only file I changed. If it doesn't work, email me and I will send you a zip of my mail directory.
////////////////////////////////////////////////////
// PHPMailer - PHP email class
//
// Class for sending email using either
// sendmail, PHP mail(), or SMTP.  Methods are
// based upon the standard AspEmail(tm) classes.
//
// Copyright (C) 2001 - 2003  Brent R. Matzelle
//
// License: LGPL, see LICENSE
////////////////////////////////////////////////////

/**
 * PHPMailer - PHP email transport class
 * @package PHPMailer
 * @author Brent R. Matzelle
 * @copyright 2001 - 2003 Brent R. Matzelle
 */
class PHPMailer
{
    
/////////////////////////////////////////////////
    // PUBLIC VARIABLES
    /////////////////////////////////////////////////

    /**
     * Email priority (1 = High, 3 = Normal, 5 = low).
     * @var int
     */
    
var $Priority          3;

    
/**
     * Sets the CharSet of the message.
     * @var string
     */
    
var $CharSet           "iso-8859-1";

    
/**
     * Sets the Content-type of the message.
     * @var string
     */
    
var $ContentType        "text/html";

    
/**
     * Sets the Encoding of the message. Options for this are "8bit",
     * "7bit", "binary", "base64", and "quoted-printable".
     * @var string
     */
    
var $Encoding          "8bit";

    
/**
     * Holds the most recent mailer error message.
     * @var string
     */
    
var $ErrorInfo         "";

    
/**
     * Sets the From email address for the message.
     * @var string
     */
    
var $From               "root@localhost";

    
/**
     * Sets the From name of the message.
     * @var string
     */
    
var $FromName           "Root User";

    
/**
     * Sets the Sender email (Return-Path) of the message.  If not empty,
     * will be sent via -f to sendmail or as 'MAIL FROM' in smtp mode.
     * @var string
     */
    
var $Sender            "";

    
/**
     * Sets the Subject of the message.
     * @var string
     */
    
var $Subject           "";

    
/**
     * Sets the Body of the message.  This can be either an HTML or text body.
     * If HTML then run IsHTML(true).
     * @var string
     */
    
var $Body               "";

    
/**
     * Sets the text-only body of the message.  This automatically sets the
     * email to multipart/alternative.  This body can be read by mail
     * clients that do not have HTML email capability such as mutt. Clients
     * that can read HTML will view the normal Body.
     * @var string
     */
    
var $AltBody           "";

    
/**
     * Sets word wrapping on the body of the message to a given number of 
     * characters.
     * @var int
     */
    
var $WordWrap          0;

    
/**
     * Method to send mail: ("mail", "sendmail", or "smtp").
     * @var string
     */
    
var $Mailer            "mail";

    
/**
     * Sets the path of the sendmail program.
     * @var string
     */
    
var $Sendmail          "/usr/sbin/sendmail";
    
    
/**
     * Path to PHPMailer plugins.  This is now only useful if the SMTP class 
     * is in a different directory than the PHP include path.  
     * @var string
     */
    
var $PluginDir         "";

    
/**
     *  Holds PHPMailer version.
     *  @var string
     */
    
var $Version           "1.73";

    
/**
     * Sets the email address that a reading confirmation will be sent.
     * @var string
     */
    
var $ConfirmReadingTo  "";

    
/**
     *  Sets the hostname to use in Message-Id and Received headers
     *  and as default HELO string. If empty, the value returned
     *  by SERVER_NAME is used or 'localhost.localdomain'.
     *  @var string
     */
    
var $Hostname          "";

    
/////////////////////////////////////////////////
    // SMTP VARIABLES
    /////////////////////////////////////////////////

    /**
     *  Sets the SMTP hosts.  All hosts must be separated by a
     *  semicolon.  You can also specify a different port
     *  for each host by using this format: [hostname:port]
     *  (e.g. "smtp1.example.com:25;smtp2.example.com").
     *  Hosts will be tried in order.
     *  @var string
     */
    
var $Host        "localhost";

    
/**
     *  Sets the default SMTP server port.
     *  @var int
     */
    
var $Port        25;

    
/**
     *  Sets the SMTP HELO of the message (Default is $Hostname).
     *  @var string
     */
    
var $Helo        "";

    
/**
     *  Sets SMTP authentication. Utilizes the Username and Password variables.
     *  @var bool
     */
    
var $SMTPAuth     false;

    
/**
     *  Sets SMTP username.
     *  @var string
     */
    
var $Username     "";

    
/**
     *  Sets SMTP password.
     *  @var string
     */
    
var $Password     "";

    
/**
     *  Sets the SMTP server timeout in seconds. This function will not 
     *  work with the win32 version.
     *  @var int
     */
    
var $Timeout      10;

    
/**
     *  Sets SMTP class debugging on or off.
     *  @var bool
     */
    
var $SMTPDebug    false;

    
/**
     * Prevents the SMTP connection from being closed after each mail 
     * sending.  If this is set to true then to close the connection 
     * requires an explicit call to SmtpClose(). 
     * @var bool
     */
    
var $SMTPKeepAlive false;

    
/**#@+
     * @access private
     */
    
var $smtp            NULL;
    var 
$to              = array();
    var 
$cc              = array();
    var 
$bcc             = array();
    var 
$ReplyTo         = array();
    var 
$attachment      = array();
    var 
$CustomHeader    = array();
    var 
$message_type    "";
    var 
$boundary        = array();
    var 
$language        = array();
    var 
$error_count     0;
    var 
$LE              "n";
    
/**#@-*/
    
    /////////////////////////////////////////////////
    // VARIABLE METHODS
    /////////////////////////////////////////////////

    /**
     * Sets message type to HTML.  
     * @param bool $bool
     * @return void
     */
    
function IsHTML($bool) {
        if(
$bool == true)
            
$this->ContentType "text/html";
        else
            
$this->ContentType "text/plain";
    }

    
/**
     * Sets Mailer to send message using SMTP.
     * @return void
     */
    
function IsSMTP() {
        
$this->Mailer "smtp";
    }

    
/**
     * Sets Mailer to send message using PHP mail() function.
     * @return void
     */
    
function IsMail() {
        
$this->Mailer "mail";
    }

    
/**
     * Sets Mailer to send message using the $Sendmail program.
     * @return void
     */
    
function IsSendmail() {
        
$this->Mailer "sendmail";
    }

    
/**
     * Sets Mailer to send message using the qmail MTA. 
     * @return void
     */
    
function IsQmail() {
        
$this->Sendmail "/var/qmail/bin/sendmail";
        
$this->Mailer "sendmail";
    }


    
/////////////////////////////////////////////////
    // RECIPIENT METHODS
    /////////////////////////////////////////////////

    /**
     * Adds a "To" address.  
     * @param string $address
     * @param string $name
     * @return void
     */
    
function AddAddress($address$name "") {
        
$cur count($this->to);
        
$this->to[$cur][0] = trim($address);
        
$this->to[$cur][1] = $name;
    }

    
/**
     * Adds a "Cc" address. Note: this function works
     * with the SMTP mailer on win32, not with the "mail"
     * mailer.  
     * @param string $address
     * @param string $name
     * @return void
    */
    
function AddCC($address$name "") {
        
$cur count($this->cc);
        
$this->cc[$cur][0] = trim($address);
        
$this->cc[$cur][1] = $name;
    }

    
/**
     * Adds a "Bcc" address. Note: this function works
     * with the SMTP mailer on win32, not with the "mail"
     * mailer.  
     * @param string $address
     * @param string $name
     * @return void
     */
    
function AddBCC($address$name "") {
        
$cur count($this->bcc);
        
$this->bcc[$cur][0] = trim($address);
        
$this->bcc[$cur][1] = $name;
    }

    
/**
     * Adds a "Reply-to" address.  
     * @param string $address
     * @param string $name
     * @return void
     */
    
function AddReplyTo($address$name "") {
        
$cur count($this->ReplyTo);
        
$this->ReplyTo[$cur][0] = trim($address);
        
$this->ReplyTo[$cur][1] = $name;
    }


    
/////////////////////////////////////////////////
    // MAIL SENDING METHODS
    /////////////////////////////////////////////////

    /**
     * Creates message and assigns Mailer. If the message is
     * not sent successfully then it returns false.  Use the ErrorInfo
     * variable to view description of the error.  
     * @return bool
     */
    
function Send() {
        
$header "";
        
$body "";
        
$result true;

        if((
count($this->to) + count($this->cc) + count($this->bcc)) < 1)
        {
            
$this->SetError($this->Lang("provide_address"));
            return 
false;
        }

        
// Set whether the message is multipart/alternative
        
if(!empty($this->AltBody))
            
$this->ContentType "multipart/alternative";

        
$this->error_count 0// reset errors
        
$this->SetMessageType();
        
$header .= $this->CreateHeader();
        
$body $this->CreateBody();

        if(
$body == "") { return false; }

        
// Choose the mailer
        
switch($this->Mailer)
        {
            case 
"sendmail":
                
$result $this->SendmailSend($header$body);
                break;
            case 
"mail":
                
$result $this->MailSend($header$body);
                break;
            case 
"smtp":
                
$result $this->SmtpSend($header$body);
                break;
            default:
            
$this->SetError($this->Mailer $this->Lang("mailer_not_supported"));
                
$result false;
                break;
        }

        return 
$result;
    }
    
    
/**
     * Sends mail using the $Sendmail program.  
     * @access private
     * @return bool
     */
    
function SendmailSend($header$body) {
        if (
$this->Sender != "")
            
$sendmail sprintf("%s -oi -f %s -t"$this->Sendmail$this->Sender);
        else
            
$sendmail sprintf("%s -oi -t"$this->Sendmail);

        if(!@
$mail popen($sendmail"w"))
        {
            
$this->SetError($this->Lang("execute") . $this->Sendmail);
            return 
false;
        }

        
fputs($mail$header);
        
fputs($mail$body);
        
        
$result pclose($mail) >> 0xFF;
        if(
$result != 0)
        {
            
$this->SetError($this->Lang("execute") . $this->Sendmail);
            return 
false;
        }

        return 
true;
    }

    
/**
     * Sends mail using the PHP mail() function.  
     * @access private
     * @return bool
     */
    
function MailSend($header$body) {
        
$to "";
        for(
$i 0$i count($this->to); $i++)
        {
            if(
$i != 0) { $to .= ", "; }
            
$to .= $this->to[$i][0];
        }

        if (
$this->Sender != "" && strlen(ini_get("safe_mode"))< 1)
        {
            
$old_from ini_get("sendmail_from");
            
ini_set("sendmail_from"$this->Sender);
            
$params sprintf("-oi -f %s"$this->Sender);
            
$rt = @mail($to$this->EncodeHeader($this->Subject), $body
                        
$header$params);
        }
        else
            
$rt = @mail($to$this->EncodeHeader($this->Subject), $body$header);

        if (isset(
$old_from))
            
ini_set("sendmail_from"$old_from);

        if(!
$rt)
        {
            
$this->SetError($this->Lang("instantiate"));
            return 
false;
        }

        return 
true;
    }

    
/**
     * Sends mail via SMTP using PhpSMTP (Author:
     * Chris Ryan).  Returns bool.  Returns false if there is a
     * bad MAIL FROM, RCPT, or DATA input.
     * @access private
     * @return bool
     */
    
function SmtpSend($header$body) {
        include_once(
$this->PluginDir "class.smtp.php");
        
$error "";
        
$bad_rcpt = array();

        if(!
$this->SmtpConnect())
            return 
false;

        
$smtp_from = ($this->Sender == "") ? $this->From $this->Sender;
        if(!
$this->smtp->Mail($smtp_from))
        {
            
$error $this->Lang("from_failed") . $smtp_from;
            
$this->SetError($error);
            
$this->smtp->Reset();
            return 
false;
        }

        
// Attempt to send attach all recipients
        
for($i 0$i count($this->to); $i++)
        {
            if(!
$this->smtp->Recipient($this->to[$i][0]))
                
$bad_rcpt[] = $this->to[$i][0];
        }
        for(
$i 0$i count($this->cc); $i++)
        {
            if(!
$this->smtp->Recipient($this->cc[$i][0]))
                
$bad_rcpt[] = $this->cc[$i][0];
        }
        for(
$i 0$i count($this->bcc); $i++)
        {
            if(!
$this->smtp->Recipient($this->bcc[$i][0]))
                
$bad_rcpt[] = $this->bcc[$i][0];
        }

        if(
count($bad_rcpt) > 0// Create error message
        
{
            for(
$i 0$i count($bad_rcpt); $i++)
            {
                if(
$i != 0) { $error .= ", "; }
                
$error .= $bad_rcpt[$i];
            }
            
$error $this->Lang("recipients_failed") . $error;
            
$this->SetError($error);
            
$this->smtp->Reset();
            return 
false;
        }

        if(!
$this->smtp->Data($header $body))
        {
            
$this->SetError($this->Lang("data_not_accepted"));
            
$this->smtp->Reset();
            return 
false;
        }
        if(
$this->SMTPKeepAlive == true)
            
$this->smtp->Reset();
        else
            
$this->SmtpClose();

        return 
true;
    }

    
/**
     * Initiates a connection to an SMTP server.  Returns false if the 
     * operation failed.
     * @access private
     * @return bool
     */
    
function SmtpConnect() {
        if(
$this->smtp == NULL) { $this->smtp = new SMTP(); }

        
$this->smtp->do_debug $this->SMTPDebug;
        
$hosts explode(";"$this->Host);
        
$index 0;
        
$connection = ($this->smtp->Connected()); 

        
// Retry while there is no connection
        
while($index count($hosts) && $connection == false)
        {
            if(
strstr($hosts[$index], ":"))
                list(
$host$port) = explode(":"$hosts[$index]);
            else
            {
                
$host $hosts[$index];
                
$port $this->Port;
            }

            if(
$this->smtp->Connect($host$port$this->Timeout))
            {
                if (
$this->Helo != '')
                    
$this->smtp->Hello($this->Helo);
                else
                    
$this->smtp->Hello($this->ServerHostname());
        
                if(
$this->SMTPAuth)
                {
                    if(!
$this->smtp->Authenticate($this->Username
                                                  
$this->Password))
                    {
                        
$this->SetError($this->Lang("authenticate"));
                        
$this->smtp->Reset();
                        
$connection false;
                    }
                }
                
$connection true;
            }
            
$index++;
        }
        if(!
$connection)
            
$this->SetError($this->Lang("connect_host"));

        return 
$connection;
    }

    
/**
     * Closes the active SMTP session if one exists.
     * @return void
     */
    
function SmtpClose() {
        if(
$this->smtp != NULL)
        {
            if(
$this->smtp->Connected())
            {
                
$this->smtp->Quit();
                
$this->smtp->Close();
            }
        }
    }

    
/**
     * Sets the language for all class error messages.  Returns false 
     * if it cannot load the language file.  The default language type
     * is English.
     * @param string $lang_type Type of language (e.g. Portuguese: "br")
     * @param string $lang_path Path to the language file directory
     * @access public
     * @return bool
     */
    
function SetLanguage($lang_type$lang_path "language/") {
        if(
file_exists($lang_path.'phpmailer.lang-'.$lang_type.'.php'))
            include(
$lang_path.'phpmailer.lang-'.$lang_type.'.php');
        else if(
file_exists($lang_path.'phpmailer.lang-en.php'))
            include(
$lang_path.'phpmailer.lang-en.php');
        else
        {
            
$this->SetError("Could not load language file");
            return 
false;
        }
        
$this->language $PHPMAILER_LANG;
    
        return 
true;
    }

    
/////////////////////////////////////////////////
    // MESSAGE CREATION METHODS
    /////////////////////////////////////////////////

    /**
     * Creates recipient headers.  
     * @access private
     * @return string
     */
    
function AddrAppend($type$addr) {
        
$addr_str $type ": ";
        
$addr_str .= $this->AddrFormat($addr[0]);
        if(
count($addr) > 1)
        {
            for(
$i 1$i count($addr); $i++)
                
$addr_str .= ", " $this->AddrFormat($addr[$i]);
        }
        
$addr_str .= $this->LE;

        return 
$addr_str;
    }
    
    
/**
     * Formats an address correctly. 
     * @access private
     * @return string
     */
    
function AddrFormat($addr) {
        if(empty(
$addr[1]))
            
$formatted $addr[0];
        else
        {
            
$formatted $this->EncodeHeader($addr[1], 'phrase') . " <" 
                         
$addr[0] . ">";
        }

        return 
$formatted;
    }

    
/**
     * Wraps message for use with mailers that do not
     * automatically perform wrapping and for quoted-printable.
     * Original written by philippe.  
     * @access private
     * @return string
     */
    
function WrapText($message$length$qp_mode false) {
        
$soft_break = ($qp_mode) ? sprintf(" =%s"$this->LE) : $this->LE;

        
$message $this->FixEOL($message);
        if (
substr($message, -1) == $this->LE)
            
$message substr($message0, -1);

        
$line explode($this->LE$message);
        
$message "";
        for (
$i=;$i count($line); $i++)
        {
          
$line_part explode(" "$line[$i]);
          
$buf "";
          for (
$e 0$e<count($line_part); $e++)
          {
              
$word $line_part[$e];
              if (
$qp_mode and (strlen($word) > $length))
              {
                
$space_left $length strlen($buf) - 1;
                if (
$e != 0)
                {
                    if (
$space_left 20)
                    {
                        
$len $space_left;
                        if (
substr($word$len 11) == "=")
                          
$len--;
                        elseif (
substr($word$len 21) == "=")
                          
$len -= 2;
                        
$part substr($word0$len);
                        
$word substr($word$len);
                        
$buf .= " " $part;
                        
$message .= $buf sprintf("=%s"$this->LE);
                    }
                    else
                    {
                        
$message .= $buf $soft_break;
                    }
                    
$buf "";
                }
                while (
strlen($word) > 0)
                {
                    
$len $length;
                    if (
substr($word$len 11) == "=")
                        
$len--;
                    elseif (
substr($word$len 21) == "=")
                        
$len -= 2;
                    
$part substr($word0$len);
                    
$word substr($word$len);

                    if (
strlen($word) > 0)
                        
$message .= $part sprintf("=%s"$this->LE);
                    else
                        
$buf $part;
                }
              }
              else
              {
                
$buf_o $buf;
                
$buf .= ($e == 0) ? $word : (" " $word); 

                if (
strlen($buf) > $length and $buf_o != "")
                {
                    
$message .= $buf_o $soft_break;
                    
$buf $word;
                }
              }
          }
          
$message .= $buf $this->LE;
        }

        return 
$message;
    }
    
    
/**
     * Set the body wrapping.
     * @access private
     * @return void
     */
    
function SetWordWrap() {
        if(
$this->WordWrap 1)
            return;
            
        switch(
$this->message_type)
        {
           case 
"alt":
              
// fall through
           
case "alt_attachments":
              
$this->AltBody $this->WrapText($this->AltBody$this->WordWrap);
              break;
           default:
              
$this->Body $this->WrapText($this->Body$this->WordWrap);
              break;
        }
    }

    
/**
     * Assembles message header.  
     * @access private
     * @return string
     */
    
function CreateHeader() {
        
$result "";
        
        
// Set the boundaries
        
$uniq_id md5(uniqid(time()));
        
$this->boundary[1] = "b1_" $uniq_id;
        
$this->boundary[2] = "b2_" $uniq_id;

        
$result .= $this->HeaderLine("Date"$this->RFCDate());
        if(
$this->Sender == "")
            
$result .= $this->HeaderLine("Return-Path"trim($this->From));
        else
            
$result .= $this->HeaderLine("Return-Path"trim($this->Sender));
        
        
// To be created automatically by mail()
        
if($this->Mailer != "mail")
        {
            if(
count($this->to) > 0)
                
$result .= $this->AddrAppend("To"$this->to);
            else if (
count($this->cc) == 0)
                
$result .= $this->HeaderLine("To""undisclosed-recipients:;");
            if(
count($this->cc) > 0)
                
$result .= $this->AddrAppend("Cc"$this->cc);
        }

        
$from = array();
        
$from[0][0] = trim($this->From);
        
$from[0][1] = $this->FromName;
        
$result .= $this->AddrAppend("From"$from); 

        
// sendmail and mail() extract Bcc from the header before sending
        
if((($this->Mailer == "sendmail") || ($this->Mailer == "mail")) && (count($this->bcc) > 0))
            
$result .= $this->AddrAppend("Bcc"$this->bcc);

        if(
count($this->ReplyTo) > 0)
            
$result .= $this->AddrAppend("Reply-to"$this->ReplyTo);

        
// mail() sets the subject itself
        
if($this->Mailer != "mail")
            
$result .= $this->HeaderLine("Subject"$this->EncodeHeader(trim($this->Subject)));

        
$result .= sprintf("Message-ID: <%s@%s>%s"$uniq_id$this->ServerHostname(), $this->LE);
        
$result .= $this->HeaderLine("X-Priority"$this->Priority);
        
$result .= $this->HeaderLine("X-Mailer""PHPMailer [version " $this->Version "]");
        
        if(
$this->ConfirmReadingTo != "")
        {
            
$result .= $this->HeaderLine("Disposition-Notification-To"
                       
"<" trim($this->ConfirmReadingTo) . ">");
        }

        
// Add custom headers
        
for($index 0$index count($this->CustomHeader); $index++)
        {
            
$result .= $this->HeaderLine(trim($this->CustomHeader[$index][0]), 
                       
$this->EncodeHeader(trim($this->CustomHeader[$index][1])));
        }
        
$result .= $this->HeaderLine("MIME-Version""1.0");

        switch(
$this->message_type)
        {
            case 
"plain":
                
$result .= $this->HeaderLine("Content-Transfer-Encoding"$this->Encoding);
                
$result .= sprintf("Content-Type: %s; charset="%s"",
                                    
$this->ContentType$this->CharSet);
                break;
            case 
"attachments":
                
// fall through
            
case "alt_attachments":
                if(
$this->InlineImageExists())
                {
                    
$result .= sprintf("Content-Type: %s;%sttype="text/html";%stboundary="%s"%s"
                                    
"multipart/related"$this->LE$this->LE
                                    
$this->boundary[1], $this->LE);
                }
                else
                {
                    
$result .= $this->HeaderLine("Content-Type""multipart/mixed;");
                    
$result .= $this->TextLine("tboundary="" . $this->boundary[1] . '"');
                }
                break;
            case "alt":
                $result .= $this->HeaderLine("Content-Type", "multipart/alternative;");
                $result .= $this->TextLine("tboundary="" . $this->boundary[1] . '"');
                break;
        }

        if(
$this->Mailer != "mail")
            
$result .= $this->LE.$this->LE;

        return 
$result;
    }

    /**
     * Assembles the message body.  Returns an empty string on failure.
     * @access private
     * @return string
     */
    function CreateBody() {
        
$result = "";

        
$this->SetWordWrap();

        switch(
$this->message_type)
        {
            case "
alt":
                
$result .= $this->GetBoundary($this->boundary[1], "", 
                                              "
text/plain", "");
                
$result .= $this->EncodeString($this->AltBody$this->Encoding);
                
$result .= $this->LE.$this->LE;
                
$result .= $this->GetBoundary($this->boundary[1], "", 
                                              "
text/html", "");
                
                
$result .= $this->EncodeString($this->Body$this->Encoding);
                
$result .= $this->LE.$this->LE;
    
                
$result .= $this->EndBoundary($this->boundary[1]);
                break;
            case "
plain":
                
$result .= $this->EncodeString($this->Body$this->Encoding);
                break;
            case "
attachments":
                
$result .= $this->GetBoundary($this->boundary[1], "", "", "");
                
$result .= $this->EncodeString($this->Body$this->Encoding);
                
$result .= $this->LE;
     
                
$result .= $this->AttachAll();
                break;
            case "
alt_attachments":
                
$result .= sprintf("--%s%s", $this->boundary[1], $this->LE);
                
$result .= sprintf("Content-Type: %s;%s" .
                                   "
tboundary="%s"%s",
                                   "
multipart/alternative", $this->LE
                                   
$this->boundary[2], $this->LE.$this->LE);
    
                // Create text body
                
$result .= $this->GetBoundary($this->boundary[2], "", 
                                              "
text/plain", "") . $this->LE;

                
$result .= $this->EncodeString($this->AltBody$this->Encoding);
                
$result .= $this->LE.$this->LE;
    
                // Create the HTML body
                
$result .= $this->GetBoundary($this->boundary[2], "", 
                                              "
text/html", "") . $this->LE;
    
                
$result .= $this->EncodeString($this->Body$this->Encoding);
                
$result .= $this->LE.$this->LE;

                
$result .= $this->EndBoundary($this->boundary[2]);
                
                
$result .= $this->AttachAll();
                break;
        }
        if(
$this->IsError())
            
$result = "";

        return 
$result;
    }

    /**
     * Returns the start of a message boundary.
     * @access private
     */
    function GetBoundary(
$boundary$charSet$contentType$encoding) {
        
$result = "";
        if(
$charSet == "") { $charSet = $this->CharSet; }
        if(
$contentType == "") { $contentType = $this->ContentType; }
        if(
$encoding == "") { $encoding = $this->Encoding; }

        
$result .= $this->TextLine("--" . $boundary);
        
$result .= sprintf("Content-Type: %scharset "%s"", 
                            
$contentType$charSet);
        
$result .= $this->LE;
        
$result .= $this->HeaderLine("Content-Transfer-Encoding", $encoding);
        
$result .= $this->LE;
       
        return 
$result;
    }
    
    /**
     * Returns the end of a message boundary.
     * @access private
     */
    function EndBoundary(
$boundary) {
        return 
$this->LE . "--" . $boundary . "--" . $this->LE
    }
    
    /**
     * Sets the message type.
     * @access private
     * @return void
     */
    function SetMessageType() {
        if(count(
$this->attachment) < 1 && strlen($this->AltBody) < 1)
            
$this->message_type = "plain";
        else
        {
            if(count(
$this->attachment) > 0)
                
$this->message_type = "attachments";
            if(strlen(
$this->AltBody) > 0 && count($this->attachment) < 1)
                
$this->message_type = "alt";
            if(strlen(
$this->AltBody) > 0 && count($this->attachment) > 0)
                
$this->message_type = "alt_attachments";
        }
    }

    /**
     * Returns a formatted header line.
     * @access private
     * @return string
     */
    function HeaderLine(
$name$value) {
        return 
$name . "" . $value . $this->LE;
    }

    /**
     * Returns a formatted mail line.
     * @access private
     * @return string
     */
    function TextLine(
$value) {
        return 
$value . $this->LE;
    }

    /////////////////////////////////////////////////
    // ATTACHMENT METHODS
    /////////////////////////////////////////////////

    /**
     * Adds an attachment from a path on the filesystem.
     * Returns false if the file could not be found
     * or accessed.
     * @param string 
$path Path to the attachment.
     * @param string 
$name Overrides the attachment name.
     * @param string 
$encoding File encoding (see $Encoding).
     * @param string 
$type File extension (MIME) type.
     * @return bool
     */
    function AddAttachment(
$path$name = "", $encoding = "base64", 
                           
$type = "application/octet-stream") {
        if(!@is_file(
$path))
        {
            
$this->SetError($this->Lang("file_access") . $path);
            return false;
        }

        
$filename = basename($path);
        if(
$name == "")
            
$name = $filename;

        
$cur = count($this->attachment);
        
$this->attachment[$cur][0] = $path;
        
$this->attachment[$cur][1] = $filename;
        
$this->attachment[$cur][2] = $name;
        
$this->attachment[$cur][3] = $encoding;
        
$this->attachment[$cur][4] = $type;
        
$this->attachment[$cur][5] = false; // isStringAttachment
        
$this->attachment[$cur][6] = "attachment";
        
$this->attachment[$cur][7] = 0;

        return true;
    }

    /**
     * Attaches all fs, string, and binary attachments to the message.
     * Returns an empty string on failure.
     * @access private
     * @return string
     */
    function AttachAll() {
        // Return text of body
        
$mime = array();

        // Add all attachments
        for(
$i = 0; $i < count($this->attachment); $i++)
        {
            // Check for string attachment
            
$bString = $this->attachment[$i][5];
            if (
$bString)
                
$string = $this->attachment[$i][0];
            else
                
$path = $this->attachment[$i][0];

            
$filename    = $this->attachment[$i][1];
            
$name        = $this->attachment[$i][2];
            
$encoding    = $this->attachment[$i][3];
            
$type        = $this->attachment[$i][4];
            
$disposition = $this->attachment[$i][6];
            
$cid         = $this->attachment[$i][7];
            
            
$mime[] = sprintf("--%s%s", $this->boundary[1], $this->LE);
            
$mime[] = sprintf("Content-Type: %sname="%s"%s", $type$name$this->LE);
            
$mime[] = sprintf("Content-Transfer-Encoding: %s%s", $encoding$this->LE);

            if(
$disposition == "inline")
                
$mime[] = sprintf("Content-ID: <%s>%s", $cid$this->LE);

            
$mime[] = sprintf("Content-Disposition: %sfilename="%s"%s", 
                              
$disposition$name$this->LE.$this->LE);

            // Encode as string attachment
            if(
$bString)
            {
                
$mime[] = $this->EncodeString($string$encoding);
                if(
$this->IsError()) { return ""; }
                
$mime[] = $this->LE.$this->LE;
            }
            else
            {
                
$mime[] = $this->EncodeFile($path$encoding);                
                if(
$this->IsError()) { return ""; }
                
$mime[] = $this->LE.$this->LE;
            }
        }

        
$mime[] = sprintf("--%s--%s", $this->boundary[1], $this->LE);

        return join("", 
$mime);
    }
    
    /**
     * Encodes attachment in requested format.  Returns an
     * empty string on failure.
     * @access private
     * @return string
     */
    function EncodeFile (
$path$encoding = "base64") {
        if(!@
$fd = fopen($path, "rb"))
        {
            
$this->SetError($this->Lang("file_open") . $path);
            return "";
        }
        
$magic_quotes = get_magic_quotes_runtime();
        set_magic_quotes_runtime(0);
        
$file_buffer = fread($fd, filesize($path));
        
$file_buffer = $this->EncodeString($file_buffer$encoding);
        fclose(
$fd);
        set_magic_quotes_runtime(
$magic_quotes);

        return 
$file_buffer;
    }

    /**
     * Encodes string to requested format. Returns an
     * empty string on failure.
     * @access private
     * @return string
     */
    function EncodeString (
$str$encoding = "base64") {
        
$encoded = "";
        switch(strtolower(
$encoding)) {
          case "
base64":
              // chunk_split is found in PHP >= 3.0.6
              
$encoded = chunk_split(base64_encode($str), 76, $this->LE);
              break;
          case "
7bit":
          case "
8bit":
              
$encoded = $this->FixEOL($str);
              if (substr(
$encoded, -(strlen($this->LE))) != $this->LE)
                
$encoded .= $this->LE;
              break;
          case "
binary":
              
$encoded = $str;
              break;
          case "
quoted-printable":
              
$encoded = $this->EncodeQP($str);
              break;
          default:
              
$this->SetError($this->Lang("encoding") . $encoding);
              break;
        }
        return 
$encoded;
    }

    /**
     * Encode a header string to best of Q, B, quoted or none.  
     * @access private
     * @return string
     */
    function EncodeHeader (
$str$position = 'text') {
      
$x = 0;
      
      switch (strtolower(
$position)) {
        case 'phrase':
          if (!preg_match('/[200-377]/', 
$str)) {
            // Can't use addslashes as we don't know what value has magic_quotes_sybase.
            
$encoded = addcslashes($str, "..37177\"");

            if ((
$str == $encoded) && !preg_match('/[^A-Za-z0-9!#$%&'*+/=?^_`{|}~ -]/', $str))
              return (
$encoded);
            else
              return (""
$encoded"");
          }
          
$x = preg_match_all('/[^404143-133135-176]/', $str$matches);
          break;
        case 'comment':
          
$x = preg_match_all('/[()"]/', $str$matches);
          // Fall-through
        case 'text':
        default:
          
$x += preg_match_all('/[00-10131416-37177-377]/', $str$matches);
          break;
      }

      if (
$x == 0)
        return (
$str);

      
$maxlen = 75 - 7 - strlen($this->CharSet);
      // Try to select the encoding which should produce the shortest output
      if (strlen(
$str)/3 < $x) {
        
$encoding = 'B';
        
$encoded = base64_encode($str);
        
$maxlen -= $maxlen % 4;
        
$encoded = trim(chunk_split($encoded$maxlen, "n"));
      } else {
        
$encoding = 'Q';
        
$encoded = $this->EncodeQ($str$position);
        
$encoded = $this->WrapText($encoded$maxlen, true);
        
$encoded = str_replace("=".$this->LE, "n", trim($encoded));
      }

      
$encoded = preg_replace('/^(.*)$/m', " =?".$this->CharSet."?$encoding?\1?=", $encoded);
      
$encoded = trim(str_replace("n", $this->LE$encoded));
      
      return 
$encoded;
    }
    
    /**
     * Encode string to quoted-printable.  
     * @access private
     * @return string
     */
    function EncodeQP (
$str) {
        
$encoded = $this->FixEOL($str);
        if (substr(
$encoded, -(strlen($this->LE))) != $this->LE)
            
$encoded .= $this->LE;

        // Replace every high ascii, control and = characters
        
$encoded = preg_replace('/([00-10131416-3775177-377])/e',
                  "'='.sprintf('%02X', ord('\1'))", 
$encoded);
        // Replace every spaces and tabs when it's the last character on a line
        
$encoded = preg_replace("/([1140])".$this->LE."/e",
                  "'='.sprintf('%02X', ord('\1')).'".
$this->LE."'", $encoded);

        // Maximum line length of 76 characters before CRLF (74 + space + '=')
        
$encoded = $this->WrapText($encoded, 74, true);

        return 
$encoded;
    }

    /**
     * Encode string to q encoding.  
     * @access private
     * @return string
     */
    function EncodeQ (
$str$position = "text") {
        // There should not be any EOL in the string
        
$encoded = preg_replace("[rn]", "", $str);

        switch (strtolower(
$position)) {
          case "phrase":
            
$encoded = preg_replace("/([^A-Za-z0-9!*+/ -])/e", "'='.sprintf('%02X', ord('\1'))", $encoded);
            break;
          case "comment":
            
$encoded = preg_replace("/([()"])/e", "'='.sprintf('%02X', ord('\1'))", $encoded);
          case "text":
          default:
            // Replace every high ascii, control =, ? and _ characters
            
$encoded = preg_replace('/([00-11131416-377577137177-377])/e',
                  "'='.sprintf('%02X', ord('\1'))", 
$encoded);
            break;
        }
        
        // Replace every spaces to _ (more readable than =20)
        
$encoded = str_replace(" ", "_", $encoded);

        return 
$encoded;
    }

    /**
     * Adds a string or binary attachment (non-filesystem) to the list.
     * This method can be used to attach ascii or binary data,
     * such as a BLOB record from a database.
     * @param string 
$string String attachment data.
     * @param string 
$filename Name of the attachment.
     * @param string 
$encoding File encoding (see $Encoding).
     * @param string 
$type File extension (MIME) type.
     * @return void
     */
    function AddStringAttachment(
$string$filename$encoding = "base64", 
                                 
$type = "application/octet-stream") {
        // Append to 
$attachment array
        
$cur = count($this->attachment);
        
$this->attachment[$cur][0] = $string;
        
$this->attachment[$cur][1] = $filename;
        
$this->attachment[$cur][2] = $filename;
        
$this->attachment[$cur][3] = $encoding;
        
$this->attachment[$cur][4] = $type;
        
$this->attachment[$cur][5] = true; // isString
        
$this->attachment[$cur][6] = "attachment";
        
$this->attachment[$cur][7] = 0;
    }
    
    /**
     * Adds an embedded attachment.  This can include images, sounds, and 
     * just about any other document.  Make sure to set the 
$type to an 
     * image type.  For JPEG images use "image/jpeg" and for GIF images 
     * use "image/gif".
     * @param string 
$path Path to the attachment.
     * @param string 
$cid Content ID of the attachment.  Use this to identify 
     *        the Id for accessing the image in an HTML form.
     * @param string 
$name Overrides the attachment name.
     * @param string 
$encoding File encoding (see $Encoding).
     * @param string 
$type File extension (MIME) type.  
     * @return bool
     */
    function AddEmbeddedImage(
$path$cid$name = "", $encoding = "base64", 
                              
$type = "application/octet-stream") {
    
        if(!@is_file(
$path))
        {
            
$this->SetError($this->Lang("file_access") . $path);
            return false;
        }

        
$filename = basename($path);
        if(
$name == "")
            
$name = $filename;

        // Append to 
$attachment array
        
$cur = count($this->attachment);
        
$this->attachment[$cur][0] = $path;
        
$this->attachment[$cur][1] = $filename;
        
$this->attachment[$cur][2] = $name;
        
$this->attachment[$cur][3] = $encoding;
        
$this->attachment[$cur][4] = $type;
        
$this->attachment[$cur][5] = false; // isStringAttachment
        
$this->attachment[$cur][6] = "inline";
        
$this->attachment[$cur][7] = $cid;
    
        return true;
    }
    
    /**
     * Returns true if an inline attachment is present.
     * @access private
     * @return bool
     */
    function InlineImageExists() {
        
$result = false;
        for(
$i = 0; $i < count($this->attachment); $i++)
        {
            if(
$this->attachment[$i][6] == "inline")
            {
                
$result = true;
                break;
            }
        }
        
        return 
$result;
    }

    /////////////////////////////////////////////////
    // MESSAGE RESET METHODS
    /////////////////////////////////////////////////

    /**
     * Clears all recipients assigned in the TO array.  Returns void.
     * @return void
     */
    function ClearAddresses() {
        
$this->to = array();
    }

    /**
     * Clears all recipients assigned in the CC array.  Returns void.
     * @return void
     */
    function ClearCCs() {
        
$this->cc = array();
    }

    /**
     * Clears all recipients assigned in the BCC array.  Returns void.
     * @return void
     */
    function ClearBCCs() {
        
$this->bcc = array();
    }

    /**
     * Clears all recipients assigned in the ReplyTo array.  Returns void.
     * @return void
     */
    function ClearReplyTos() {
        
$this->ReplyTo = array();
    }

    /**
     * Clears all recipients assigned in the TO, CC and BCC
     * array.  Returns void.
     * @return void
     */
    function ClearAllRecipients() {
        
$this->to = array();
        
$this->cc = array();
        
$this->bcc = array();
    }

    /**
     * Clears all previously set filesystem, string, and binary
     * attachments.  Returns void.
     * @return void
     */
    function ClearAttachments() {
        
$this->attachment = array();
    }

    /**
     * Clears all custom headers.  Returns void.
     * @return void
     */
    function ClearCustomHeaders() {
        
$this->CustomHeader = array();
    }


    /////////////////////////////////////////////////
    // MISCELLANEOUS METHODS
    /////////////////////////////////////////////////

    /**
     * Adds the error message to the error container.
     * Returns void.
     * @access private
     * @return void
     */
    function SetError(
$msg) {
        
$this->error_count++;
        
$this->ErrorInfo = $msg;
    }

    /**
     * Returns the proper RFC 822 formatted date. 
     * @access private
     * @return string
     */
    function RFCDate() {
        
$tz = date("Z");
        
$tzs = ($tz < 0) ? "-" : "+";
        
$tz = abs($tz);
        
$tz = ($tz/3600)*100 + ($tz%3600)/60;
        
$result = sprintf("%s %s%04d", date("D, j M Y H:i:s"), $tzs$tz);

        return 
$result;
    }
    
    /**
     * Returns the appropriate server variable.  Should work with both 
     * PHP 4.1.0+ as well as older versions.  Returns an empty string 
     * if nothing is found.
     * @access private
     * @return mixed
     */
    function ServerVar(
$varName) {
        global 
$HTTP_SERVER_VARS;
        global 
$HTTP_ENV_VARS;

        if(!isset(
$_SERVER))
        {
            
$_SERVER = $HTTP_SERVER_VARS;
            if(!isset(
$_SERVER["REMOTE_ADDR"]))
                
$_SERVER = $HTTP_ENV_VARS; // must be Apache
        }
        
        if(isset(
$_SERVER[$varName]))
            return 
$_SERVER[$varName];
        else
            return "";
    }

    /**
     * Returns the server hostname or 'localhost.localdomain' if unknown.
     * @access private
     * @return string
     */
    function ServerHostname() {
        if (
$this->Hostname != "")
            
$result = $this->Hostname;
        elseif (
$this->ServerVar('SERVER_NAME') != "")
            
$result = $this->ServerVar('SERVER_NAME');
        else
            
$result = "localhost.localdomain";

        return 
$result;
    }

    /**
     * Returns a message in the appropriate language.
     * @access private
     * @return string
     */
    function Lang(
$key) {
        if(count(
$this->language) < 1)
            
$this->SetLanguage("en"); // set the default language
    
        if(isset(
$this->language[$key]))
            return 
$this->language[$key];
        else
            return "Language string failed to load: " . 
$key;
    }
    
    /**
     * Returns true if an error occurred.
     * @return bool
     */
    function IsError() {
        return (
$this->error_count > 0);
    }

    /**
     * Changes every end of line from CR or LF to CRLF.  
     * @access private
     * @return string
     */
    function FixEOL(
$str) {
        
$str = str_replace("rn", "n", $str);
        
$str = str_replace("r", "n", $str);
        
$str = str_replace("n", $this->LE$str);
        return 
$str;
    }

    /**
     * Adds a custom header. 
     * @return void
     */
    function AddCustomHeader(
$custom_header) {
        
$this->CustomHeader[] = explode(":", $custom_header, 2);
    }
}

?>
-Matt

3
adium
Re: mail users in HTML format
  • 2009/3/19 4:29

  • adium

  • Just popping in

  • Posts: 99

  • Since: 2005/1/18


This post is garbled..., is there a chance you can re-post this?

Login

Who's Online

214 user(s) are online (104 user(s) are browsing Support Forums)


Members: 0


Guests: 214


more...

Donat-O-Meter

Stats
Goal: $100.00
Due Date: Nov 30
Gross Amount: $0.00
Net Balance: $0.00
Left to go: $100.00
Make donations with PayPal!

Latest GitHub Commits