inc/phpmailer/class.phpmailer.php

   1 <?php
   2 /*~ class.phpmailer.php
   3 .---------------------------------------------------------------------------.
   4 |  Software: PHPMailer - PHP email class                                    |
   5 |   Version: 2.0.2                                                          |
   6 |   Contact: via sourceforge.net support pages (also www.codeworxtech.com)  |
   7 |      Info: http://phpmailer.sourceforge.net                               |
   8 |   Support: http://sourceforge.net/projects/phpmailer/                     |
   9 | ------------------------------------------------------------------------- |
  10 |    Author: Andy Prevost (project admininistrator)                         |
  11 |    Author: Brent R. Matzelle (original founder)                           |
  12 | Copyright (c) 2004-2007, Andy Prevost. All Rights Reserved.               |
  13 | Copyright (c) 2001-2003, Brent R. Matzelle                                |
  14 | ------------------------------------------------------------------------- |
  15 |   License: Distributed under the Lesser General Public License (LGPL)     |
  16 |            http://www.gnu.org/copyleft/lesser.html                        |
  17 | This program is distributed in the hope that it will be useful - WITHOUT  |
  18 | ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or     |
  19 | FITNESS FOR A PARTICULAR PURPOSE.                                         |
  20 | ------------------------------------------------------------------------- |
  21 | We offer a number of paid services (www.codeworxtech.com):                |
  22 | - Web Hosting on highly optimized fast and secure servers                 |
  23 | - Technology Consulting                                                   |
  24 | - Oursourcing (highly qualified programmers and graphic designers)        |
  25 '---------------------------------------------------------------------------'
  26
  27 /**
  28  * PHPMailer - PHP email transport class
  29  * @package PHPMailer
  30  * @author Andy Prevost
  31  * @copyright 2004 - 2008 Andy Prevost
  32  */
  33
  34 class PHPMailer {
  35
  36   /////////////////////////////////////////////////
  37   // PROPERTIES, PUBLIC
  38   /////////////////////////////////////////////////
  39
  40   /**
  41    * Email priority (1 = High, 3 = Normal, 5 = low).
  42    * @var int
  43    */
  44   var $Priority          = 3;
  45
  46   /**
  47    * Sets the CharSet of the message.
  48    * @var string
  49    */
  50   var $CharSet           = 'iso-8859-1';
  51
  52   /**
  53    * Sets the Content-type of the message.
  54    * @var string
  55    */
  56   var $ContentType        = 'text/plain';
  57
  58   /**
  59    * Sets the Encoding of the message. Options for this are "8bit",
  60    * "7bit", "binary", "base64", and "quoted-printable".
  61    * @var string
  62    */
  63   var $Encoding          = '8bit';
  64
  65   /**
  66    * Holds the most recent mailer error message.
  67    * @var string
  68    */
  69   var $ErrorInfo         = '';
  70
  71   /**
  72    * Sets the From email address for the message.
  73    * @var string
  74    */
  75   var $From              = 'root@localhost';
  76
  77   /**
  78    * Sets the From name of the message.
  79    * @var string
  80    */
  81   var $FromName          = 'Root User';
  82
  83   /**
  84    * Sets the Sender email (Return-Path) of the message.  If not empty,
  85    * will be sent via -f to sendmail or as 'MAIL FROM' in smtp mode.
  86    * @var string
  87    */
  88   var $Sender            = '';
  89
  90   /**
  91    * Sets the Subject of the message.
  92    * @var string
  93    */
  94   var $Subject           = '';
  95
  96   /**
  97    * Sets the Body of the message.  This can be either an HTML or text body.
  98    * If HTML then run IsHTML(true).
  99    * @var string
 100    */
 101   var $Body              = '';
 102
 103   /**
 104    * Sets the text-only body of the message.  This automatically sets the
 105    * email to multipart/alternative.  This body can be read by mail
 106    * clients that do not have HTML email capability such as mutt. Clients
 107    * that can read HTML will view the normal Body.
 108    * @var string
 109    */
 110   var $AltBody           = '';
 111
 112   /**
 113    * Sets word wrapping on the body of the message to a given number of
 114    * characters.
 115    * @var int
 116    */
 117   var $WordWrap          = 0;
 118
 119   /**
 120    * Method to send mail: ("mail", "sendmail", or "smtp").
 121    * @var string
 122    */
 123   var $Mailer            = 'mail';
 124
 125   /**
 126    * Sets the path of the sendmail program.
 127    * @var string
 128    */
 129   var $Sendmail          = '/usr/sbin/sendmail';
 130
 131   /**
 132    * Path to PHPMailer plugins.  This is now only useful if the SMTP class
 133    * is in a different directory than the PHP include path.
 134    * @var string
 135    */
 136   var $PluginDir         = '';
 137
 138   /**
 139    * Holds PHPMailer version.
 140    * @var string
 141    */
 142   var $Version           = "2.0.2";
 143
 144   /**
 145    * Sets the email address that a reading confirmation will be sent.
 146    * @var string
 147    */
 148   var $ConfirmReadingTo  = '';
 149
 150   /**
 151    * Sets the hostname to use in Message-Id and Received headers
 152    * and as default HELO string. If empty, the value returned
 153    * by SERVER_NAME is used or 'localhost.localdomain'.
 154    * @var string
 155    */
 156   var $Hostname          = '';
 157
 158   /**
 159    * Sets the message ID to be used in the Message-Id header.
 160    * If empty, a unique id will be generated.
 161    * @var string
 162    */
 163   var $MessageID         = '';
 164
 165   /////////////////////////////////////////////////
 166   // PROPERTIES FOR SMTP
 167   /////////////////////////////////////////////////
 168
 169   /**
 170    * Sets the SMTP hosts.  All hosts must be separated by a
 171    * semicolon.  You can also specify a different port
 172    * for each host by using this format: [hostname:port]
 173    * (e.g. "smtp1.example.com:25;smtp2.example.com").
 174    * Hosts will be tried in order.
 175    * @var string
 176    */
 177   var $Host        = 'localhost';
 178
 179   /**
 180    * Sets the default SMTP server port.
 181    * @var int
 182    */
 183   var $Port        = 25;
 184
 185   /**
 186    * Sets the SMTP HELO of the message (Default is $Hostname).
 187    * @var string
 188    */
 189   var $Helo        = '';
 190
 191   /**
 192    * Sets connection prefix.
 193    * Options are "", "ssl" or "tls"
 194    * @var string
 195    */
 196   var $SMTPSecure = "";
 197
 198   /**
 199    * Sets SMTP authentication. Utilizes the Username and Password variables.
 200    * @var bool
 201    */
 202   var $SMTPAuth     = false;
 203
 204   /**
 205    * Sets SMTP username.
 206    * @var string
 207    */
 208   var $Username     = '';
 209
 210   /**
 211    * Sets SMTP password.
 212    * @var string
 213    */
 214   var $Password     = '';
 215
 216   /**
 217    * Sets the SMTP server timeout in seconds. This function will not
 218    * work with the win32 version.
 219    * @var int
 220    */
 221   var $Timeout      = 10;
 222
 223   /**
 224    * Sets SMTP class debugging on or off.
 225    * @var bool
 226    */
 227   var $SMTPDebug    = false;
 228
 229   /**
 230    * Prevents the SMTP connection from being closed after each mail
 231    * sending.  If this is set to true then to close the connection
 232    * requires an explicit call to SmtpClose().
 233    * @var bool
 234    */
 235   var $SMTPKeepAlive = false;
 236
 237   /**
 238    * Provides the ability to have the TO field process individual
 239    * emails, instead of sending to entire TO addresses
 240    * @var bool
 241    */
 242   var $SingleTo = false;
 243
 244   /////////////////////////////////////////////////
 245   // PROPERTIES, PRIVATE
 246   /////////////////////////////////////////////////
 247
 248   var $smtp            = NULL;
 249   var $to              = array();
 250   var $cc              = array();
 251   var $bcc             = array();
 252   var $ReplyTo         = array();
 253   var $attachment      = array();
 254   var $CustomHeader    = array();
 255   var $message_type    = '';
 256   var $boundary        = array();
 257   var $language        = array();
 258   var $error_count     = 0;
 259   var $LE              = "\n";
 260   var $sign_key_file   = "";
 261   var $sign_key_pass   = "";
 262
 263   /////////////////////////////////////////////////
 264   // METHODS, VARIABLES
 265   /////////////////////////////////////////////////
 266
 267   /**
 268    * Sets message type to HTML.
 269    * @param bool $bool
 270    * @return void
 271    */
 272   function IsHTML($bool) {
 273     if($bool == true) {
 274       $this->ContentType = 'text/html';
 275     } else {
 276       $this->ContentType = 'text/plain';
 277     }
 278   }
 279
 280   /**
 281    * Sets Mailer to send message using SMTP.
 282    * @return void
 283    */
 284   function IsSMTP() {
 285     $this->Mailer = 'smtp';
 286   }
 287
 288   /**
 289    * Sets Mailer to send message using PHP mail() function.
 290    * @return void
 291    */
 292   function IsMail() {
 293     $this->Mailer = 'mail';
 294   }
 295
 296   /**
 297    * Sets Mailer to send message using the $Sendmail program.
 298    * @return void
 299    */
 300   function IsSendmail() {
 301     $this->Mailer = 'sendmail';
 302   }
 303
 304   /**
 305    * Sets Mailer to send message using the qmail MTA.
 306    * @return void
 307    */
 308   function IsQmail() {
 309     $this->Sendmail = '/var/qmail/bin/sendmail';
 310     $this->Mailer = 'sendmail';
 311   }
 312
 313   /////////////////////////////////////////////////
 314   // METHODS, RECIPIENTS
 315   /////////////////////////////////////////////////
 316
 317   /**
 318    * Adds a "To" address.
 319    * @param string $address
 320    * @param string $name
 321    * @return void
 322    */
 323   function AddAddress($address, $name = '') {
 324     $cur = count($this->to);
 325     $this->to[$cur][0] = trim($address);
 326     $this->to[$cur][1] = $name;
 327   }
 328
 329   /**
 330    * Adds a "Cc" address. Note: this function works
 331    * with the SMTP mailer on win32, not with the "mail"
 332    * mailer.
 333    * @param string $address
 334    * @param string $name
 335    * @return void
 336    */
 337   function AddCC($address, $name = '') {
 338     $cur = count($this->cc);
 339     $this->cc[$cur][0] = trim($address);
 340     $this->cc[$cur][1] = $name;
 341   }
 342
 343   /**
 344    * Adds a "Bcc" address. Note: this function works
 345    * with the SMTP mailer on win32, not with the "mail"
 346    * mailer.
 347    * @param string $address
 348    * @param string $name
 349    * @return void
 350    */
 351   function AddBCC($address, $name = '') {
 352     $cur = count($this->bcc);
 353     $this->bcc[$cur][0] = trim($address);
 354     $this->bcc[$cur][1] = $name;
 355   }
 356
 357   /**
 358    * Adds a "Reply-To" address.
 359    * @param string $address
 360    * @param string $name
 361    * @return void
 362    */
 363   function AddReplyTo($address, $name = '') {
 364     $cur = count($this->ReplyTo);
 365     $this->ReplyTo[$cur][0] = trim($address);
 366     $this->ReplyTo[$cur][1] = $name;
 367   }
 368
 369   /////////////////////////////////////////////////
 370   // METHODS, MAIL SENDING
 371   /////////////////////////////////////////////////
 372
 373   /**
 374    * Creates message and assigns Mailer. If the message is
 375    * not sent successfully then it returns false.  Use the ErrorInfo
 376    * variable to view description of the error.
 377    * @return bool
 378    */
 379   function Send() {
 380     $header = '';
 381     $body = '';
 382     $result = true;
 383
 384     if((count($this->to) + count($this->cc) + count($this->bcc)) < 1) {
 385       $this->SetError($this->Lang('provide_address'));
 386       return false;
 387     }
 388
 389     /* Set whether the message is multipart/alternative */
 390     if(!empty($this->AltBody)) {
 391       $this->ContentType = 'multipart/alternative';
 392     }
 393
 394     $this->error_count = 0; // reset errors
 395     $this->SetMessageType();
 396     $header .= $this->CreateHeader();
 397     $body = $this->CreateBody();
 398
 399     if($body == '') {
 400       return false;
 401     }
 402
 403     /* Choose the mailer */
 404     switch($this->Mailer) {
 405       case 'sendmail':
 406         $result = $this->SendmailSend($header, $body);
 407         break;
 408       case 'smtp':
 409         $result = $this->SmtpSend($header, $body);
 410         break;
 411       case 'mail':
 412         $result = $this->MailSend($header, $body);
 413         break;
 414       default:
 415         $result = $this->MailSend($header, $body);
 416         break;
 417         //$this->SetError($this->Mailer . $this->Lang('mailer_not_supported'));
 418         //$result = false;
 419         //break;
 420     }
 421
 422     return $result;
 423   }
 424
 425   /**
 426    * Sends mail using the $Sendmail program.
 427    * @access private
 428    * @return bool
 429    */
 430   function SendmailSend($header, $body) {
 431     if ($this->Sender != '') {
 432       $sendmail = sprintf("%s -oi -f %s -t", escapeshellcmd($this->Sendmail), escapeshellarg($this->Sender));
 433     } else {
 434       $sendmail = sprintf("%s -oi -t", escapeshellcmd($this->Sendmail));
 435     }
 436
 437     if(!@$mail = popen($sendmail, 'w')) {
 438       $this->SetError($this->Lang('execute') . $this->Sendmail);
 439       return false;
 440     }
 441
 442     fputs($mail, $header);
 443     fputs($mail, $body);
 444
 445     $result = pclose($mail);
 446     if (version_compare(phpversion(), '4.2.3') == -1) {
 447       $result = $result >> 8 & 0xFF;
 448     }
 449     if($result != 0) {
 450       $this->SetError($this->Lang('execute') . $this->Sendmail);
 451       return false;
 452     }
 453     return true;
 454   }
 455
 456   /**
 457    * Sends mail using the PHP mail() function.
 458    * @access private
 459    * @return bool
 460    */
 461   function MailSend($header, $body) {
 462
 463     $to = '';
 464     for($i = 0; $i < count($this->to); $i++) {
 465       if($i != 0) { $to .= ', '; }
 466       $to .= $this->AddrFormat($this->to[$i]);
 467     }
 468
 469     $toArr = split(',', $to);
 470
 471     $params = sprintf("-oi -f %s", $this->Sender);
 472     if ($this->Sender != '' && strlen(ini_get('safe_mode')) < 1) {
 473       $old_from = ini_get('sendmail_from');
 474       ini_set('sendmail_from', $this->Sender);
 475       if ($this->SingleTo === true && count($toArr) > 1) {
 476         foreach ($toArr as $key => $val) {
 477           $rt = @mail($val, $this->EncodeHeader($this->SecureHeader($this->Subject)), $body, $header, $params);
 478         }
 479       } else {
 480         $rt = @mail($to, $this->EncodeHeader($this->SecureHeader($this->Subject)), $body, $header, $params);
 481       }
 482     } else {
 483       if ($this->SingleTo === true && count($toArr) > 1) {
 484         foreach ($toArr as $key => $val) {
 485           $rt = @mail($val, $this->EncodeHeader($this->SecureHeader($this->Subject)), $body, $header, $params);
 486         }
 487       } else {
 488         $rt = @mail($to, $this->EncodeHeader($this->SecureHeader($this->Subject)), $body, $header);
 489       }
 490     }
 491
 492     if (isset($old_from)) {
 493       ini_set('sendmail_from', $old_from);
 494     }
 495
 496     if(!$rt) {
 497       $this->SetError($this->Lang('instantiate'));
 498       return false;
 499     }
 500
 501     return true;
 502   }
 503
 504   /**
 505    * Sends mail via SMTP using PhpSMTP (Author:
 506    * Chris Ryan).  Returns bool.  Returns false if there is a
 507    * bad MAIL FROM, RCPT, or DATA input.
 508    * @access private
 509    * @return bool
 510    */
 511   function SmtpSend($header, $body) {
 512     include_once($this->PluginDir . 'class.smtp.php');
 513     $error = '';
 514     $bad_rcpt = array();
 515
 516     if(!$this->SmtpConnect()) {
 517       return false;
 518     }
 519
 520     $smtp_from = ($this->Sender == '') ? $this->From : $this->Sender;
 521     if(!$this->smtp->Mail($smtp_from)) {
 522       $error = $this->Lang('from_failed') . $smtp_from;
 523       $this->SetError($error);
 524       $this->smtp->Reset();
 525       return false;
 526     }
 527
 528     /* Attempt to send attach all recipients */
 529     for($i = 0; $i < count($this->to); $i++) {
 530       if(!$this->smtp->Recipient($this->to[$i][0])) {
 531         $bad_rcpt[] = $this->to[$i][0];
 532       }
 533     }
 534     for($i = 0; $i < count($this->cc); $i++) {
 535       if(!$this->smtp->Recipient($this->cc[$i][0])) {
 536         $bad_rcpt[] = $this->cc[$i][0];
 537       }
 538     }
 539     for($i = 0; $i < count($this->bcc); $i++) {
 540       if(!$this->smtp->Recipient($this->bcc[$i][0])) {
 541         $bad_rcpt[] = $this->bcc[$i][0];
 542       }
 543     }
 544
 545     if(count($bad_rcpt) > 0) { // Create error message
 546       for($i = 0; $i < count($bad_rcpt); $i++) {
 547         if($i != 0) {
 548           $error .= ', ';
 549         }
 550         $error .= $bad_rcpt[$i];
 551       }
 552       $error = $this->Lang('recipients_failed') . $error;
 553       $this->SetError($error);
 554       $this->smtp->Reset();
 555       return false;
 556     }
 557
 558     if(!$this->smtp->Data($header . $body)) {
 559       $this->SetError($this->Lang('data_not_accepted'));
 560       $this->smtp->Reset();
 561       return false;
 562     }
 563     if($this->SMTPKeepAlive == true) {
 564       $this->smtp->Reset();
 565     } else {
 566       $this->SmtpClose();
 567     }
 568
 569     return true;
 570   }
 571
 572   /**
 573    * Initiates a connection to an SMTP server.  Returns false if the
 574    * operation failed.
 575    * @access private
 576    * @return bool
 577    */
 578   function SmtpConnect() {
 579     if($this->smtp == NULL) {
 580       $this->smtp = new SMTP();
 581     }
 582
 583     $this->smtp->do_debug = $this->SMTPDebug;
 584     $hosts = explode(';', $this->Host);
 585     $index = 0;
 586     $connection = ($this->smtp->Connected());
 587
 588     /* Retry while there is no connection */
 589     while($index < count($hosts) && $connection == false) {
 590       $hostinfo = array();
 591       if(eregi('^(.+):([0-9]+)$', $hosts[$index], $hostinfo)) {
 592         $host = $hostinfo[1];
 593         $port = $hostinfo[2];
 594       } else {
 595         $host = $hosts[$index];
 596         $port = $this->Port;
 597       }
 598
 599       if($this->smtp->Connect(((!empty($this->SMTPSecure))?$this->SMTPSecure.'://':'').$host, $port, $this->Timeout)) {
 600         if ($this->Helo != '') {
 601           $this->smtp->Hello($this->Helo);
 602         } else {
 603           $this->smtp->Hello($this->ServerHostname());
 604         }
 605
 606         $connection = true;
 607         if($this->SMTPAuth) {
 608           if(!$this->smtp->Authenticate($this->Username, $this->Password)) {
 609             $this->SetError($this->Lang('authenticate'));
 610             $this->smtp->Reset();
 611             $connection = false;
 612           }
 613         }
 614       }
 615       $index++;
 616     }
 617     if(!$connection) {
 618       $this->SetError($this->Lang('connect_host'));
 619     }
 620
 621     return $connection;
 622   }
 623
 624   /**
 625    * Closes the active SMTP session if one exists.
 626    * @return void
 627    */
 628   function SmtpClose() {
 629     if($this->smtp != NULL) {
 630       if($this->smtp->Connected()) {
 631         $this->smtp->Quit();
 632         $this->smtp->Close();
 633       }
 634     }
 635   }
 636
 637   /**
 638    * Sets the language for all class error messages.  Returns false
 639    * if it cannot load the language file.  The default language type
 640    * is English.
 641    * @param string $lang_type Type of language (e.g. Portuguese: "br")
 642    * @param string $lang_path Path to the language file directory
 643    * @access public
 644    * @return bool
 645    */
 646   function SetLanguage($lang_type, $lang_path = 'language/') {
 647     if(file_exists($lang_path.'phpmailer.lang-'.$lang_type.'.php')) {
 648       include($lang_path.'phpmailer.lang-'.$lang_type.'.php');
 649     } elseif (file_exists($lang_path.'phpmailer.lang-en.php')) {
 650       include($lang_path.'phpmailer.lang-en.php');
 651     } else {
 652       $this->SetError('Could not load language file');
 653       return false;
 654     }
 655     $this->language = $PHPMAILER_LANG;
 656
 657     return true;
 658   }
 659
 660   /////////////////////////////////////////////////
 661   // METHODS, MESSAGE CREATION
 662   /////////////////////////////////////////////////
 663
 664   /**
 665    * Creates recipient headers.
 666    * @access private
 667    * @return string
 668    */
 669   function AddrAppend($type, $addr) {
 670     $addr_str = $type . ': ';
 671     $addr_str .= $this->AddrFormat($addr[0]);
 672     if(count($addr) > 1) {
 673       for($i = 1; $i < count($addr); $i++) {
 674         $addr_str .= ', ' . $this->AddrFormat($addr[$i]);
 675       }
 676     }
 677     $addr_str .= $this->LE;
 678
 679     return $addr_str;
 680   }
 681
 682   /**
 683    * Formats an address correctly.
 684    * @access private
 685    * @return string
 686    */
 687   function AddrFormat($addr) {
 688     if(empty($addr[1])) {
 689       $formatted = $this->SecureHeader($addr[0]);
 690     } else {
 691       $formatted = $this->EncodeHeader($this->SecureHeader($addr[1]), 'phrase') . " <" . $this->SecureHeader($addr[0]) . ">";
 692     }
 693
 694     return $formatted;
 695   }
 696
 697   /**
 698    * Wraps message for use with mailers that do not
 699    * automatically perform wrapping and for quoted-printable.
 700    * Original written by philippe.
 701    * @access private
 702    * @return string
 703    */
 704   function WrapText($message, $length, $qp_mode = false) {
 705     $soft_break = ($qp_mode) ? sprintf(" =%s", $this->LE) : $this->LE;
 706     // If utf-8 encoding is used, we will need to make sure we don't
 707     // split multibyte characters when we wrap
 708     $is_utf8 = (strtolower($this->CharSet) == "utf-8");
 709
 710     $message = $this->FixEOL($message);
 711     if (substr($message, -1) == $this->LE) {
 712       $message = substr($message, 0, -1);
 713     }
 714
 715     $line = explode($this->LE, $message);
 716     $message = '';
 717     for ($i=0 ;$i < count($line); $i++) {
 718       $line_part = explode(' ', $line[$i]);
 719       $buf = '';
 720       for ($e = 0; $e<count($line_part); $e++) {
 721         $word = $line_part[$e];
 722         if ($qp_mode and (strlen($word) > $length)) {
 723           $space_left = $length - strlen($buf) - 1;
 724           if ($e != 0) {
 725             if ($space_left > 20) {
 726               $len = $space_left;
 727               if ($is_utf8) {
 728                 $len = $this->UTF8CharBoundary($word, $len);
 729               } elseif (substr($word, $len - 1, 1) == "=") {
 730                 $len--;
 731               } elseif (substr($word, $len - 2, 1) == "=") {
 732                 $len -= 2;
 733               }
 734               $part = substr($word, 0, $len);
 735               $word = substr($word, $len);
 736               $buf .= ' ' . $part;
 737               $message .= $buf . sprintf("=%s", $this->LE);
 738             } else {
 739               $message .= $buf . $soft_break;
 740             }
 741             $buf = '';
 742           }
 743           while (strlen($word) > 0) {
 744             $len = $length;
 745             if ($is_utf8) {
 746               $len = $this->UTF8CharBoundary($word, $len);
 747             } elseif (substr($word, $len - 1, 1) == "=") {
 748               $len--;
 749             } elseif (substr($word, $len - 2, 1) == "=") {
 750               $len -= 2;
 751             }
 752             $part = substr($word, 0, $len);
 753             $word = substr($word, $len);
 754
 755             if (strlen($word) > 0) {
 756               $message .= $part . sprintf("=%s", $this->LE);
 757             } else {
 758               $buf = $part;
 759             }
 760           }
 761         } else {
 762           $buf_o = $buf;
 763           $buf .= ($e == 0) ? $word : (' ' . $word);
 764
 765           if (strlen($buf) > $length and $buf_o != '') {
 766             $message .= $buf_o . $soft_break;
 767             $buf = $word;
 768           }
 769         }
 770       }
 771       $message .= $buf . $this->LE;
 772     }
 773
 774     return $message;
 775   }
 776
 777   /**
 778    * Finds last character boundary prior to maxLength in a utf-8
 779    * quoted (printable) encoded string.
 780    * Original written by Colin Brown.
 781    * @access private
 782    * @param string $encodedText utf-8 QP text
 783    * @param int    $maxLength   find last character boundary prior to this length
 784    * @return int
 785    */
 786   function UTF8CharBoundary($encodedText, $maxLength) {
 787     $foundSplitPos = false;
 788     $lookBack = 3;
 789     while (!$foundSplitPos) {
 790       $lastChunk = substr($encodedText, $maxLength - $lookBack, $lookBack);
 791       $encodedCharPos = strpos($lastChunk, "=");
 792       if ($encodedCharPos !== false) {
 793         // Found start of encoded character byte within $lookBack block.
 794         // Check the encoded byte value (the 2 chars after the '=')
 795         $hex = substr($encodedText, $maxLength - $lookBack + $encodedCharPos + 1, 2);
 796         $dec = hexdec($hex);
 797         if ($dec < 128) { // Single byte character.
 798           // If the encoded char was found at pos 0, it will fit
 799           // otherwise reduce maxLength to start of the encoded char
 800           $maxLength = ($encodedCharPos == 0) ? $maxLength :
 801           $maxLength - ($lookBack - $encodedCharPos);
 802           $foundSplitPos = true;
 803         } elseif ($dec >= 192) { // First byte of a multi byte character
 804           // Reduce maxLength to split at start of character
 805           $maxLength = $maxLength - ($lookBack - $encodedCharPos);
 806           $foundSplitPos = true;
 807         } elseif ($dec < 192) { // Middle byte of a multi byte character, look further back
 808           $lookBack += 3;
 809         }
 810       } else {
 811         // No encoded character found
 812         $foundSplitPos = true;
 813       }
 814     }
 815     return $maxLength;
 816   }
 817
 818   /**
 819    * Set the body wrapping.
 820    * @access private
 821    * @return void
 822    */
 823   function SetWordWrap() {
 824     if($this->WordWrap < 1) {
 825       return;
 826     }
 827
 828     switch($this->message_type) {
 829       case 'alt':
 830         /* fall through */
 831       case 'alt_attachments':
 832         $this->AltBody = $this->WrapText($this->AltBody, $this->WordWrap);
 833         break;
 834       default:
 835         $this->Body = $this->WrapText($this->Body, $this->WordWrap);
 836         break;
 837     }
 838   }
 839
 840   /**
 841    * Assembles message header.
 842    * @access private
 843    * @return string
 844    */
 845   function CreateHeader() {
 846     $result = '';
 847
 848     /* Set the boundaries */
 849     $uniq_id = md5(uniqid(time()));
 850     $this->boundary[1] = 'b1_' . $uniq_id;
 851     $this->boundary[2] = 'b2_' . $uniq_id;
 852
 853     $result .= $this->HeaderLine('Date', $this->RFCDate());
 854     if($this->Sender == '') {
 855       $result .= $this->HeaderLine('Return-Path', trim($this->From));
 856     } else {
 857       $result .= $this->HeaderLine('Return-Path', trim($this->Sender));
 858     }
 859
 860     /* To be created automatically by mail() */
 861     if($this->Mailer != 'mail') {
 862       if(count($this->to) > 0) {
 863         $result .= $this->AddrAppend('To', $this->to);
 864       } elseif (count($this->cc) == 0) {
 865         $result .= $this->HeaderLine('To', 'undisclosed-recipients:;');
 866       }
 867       if(count($this->cc) > 0) {
 868         $result .= $this->AddrAppend('Cc', $this->cc);
 869       }
 870     }
 871
 872     $from = array();
 873     $from[0][0] = trim($this->From);
 874     $from[0][1] = $this->FromName;
 875     $result .= $this->AddrAppend('From', $from);
 876
 877     /* sendmail and mail() extract Cc from the header before sending */
 878     if((($this->Mailer == 'sendmail') || ($this->Mailer == 'mail')) && (count($this->cc) > 0)) {
 879       $result .= $this->AddrAppend('Cc', $this->cc);
 880     }
 881
 882     /* sendmail and mail() extract Bcc from the header before sending */
 883     if((($this->Mailer == 'sendmail') || ($this->Mailer == 'mail')) && (count($this->bcc) > 0)) {
 884       $result .= $this->AddrAppend('Bcc', $this->bcc);
 885     }
 886
 887     if(count($this->ReplyTo) > 0) {
 888       $result .= $this->AddrAppend('Reply-To', $this->ReplyTo);
 889     }
 890
 891     /* mail() sets the subject itself */
 892     if($this->Mailer != 'mail') {
 893       $result .= $this->HeaderLine('Subject', $this->EncodeHeader($this->SecureHeader($this->Subject)));
 894     }
 895
 896     if($this->MessageID != '') {
 897       $result .= $this->HeaderLine('Message-ID',$this->MessageID);
 898     } else {
 899       $result .= sprintf("Message-ID: <%s@%s>%s", $uniq_id, $this->ServerHostname(), $this->LE);
 900     }
 901     $result .= $this->HeaderLine('X-Priority', $this->Priority);
 902     $result .= $this->HeaderLine('X-Mailer', 'PHPMailer (phpmailer.sourceforge.net) [version ' . $this->Version . ']');
 903
 904     if($this->ConfirmReadingTo != '') {
 905       $result .= $this->HeaderLine('Disposition-Notification-To', '<' . trim($this->ConfirmReadingTo) . '>');
 906     }
 907
 908     // Add custom headers
 909     for($index = 0; $index < count($this->CustomHeader); $index++) {
 910       $result .= $this->HeaderLine(trim($this->CustomHeader[$index][0]), $this->EncodeHeader(trim($this->CustomHeader[$index][1])));
 911     }
 912     if (!$this->sign_key_file) {
 913       $result .= $this->HeaderLine('MIME-Version', '1.0');
 914       $result .= $this->GetMailMIME();
 915     }
 916
 917     return $result;
 918   }
 919
 920   /**
 921    * Returns the message MIME.
 922    * @access private
 923    * @return string
 924    */
 925   function GetMailMIME() {
 926     $result = '';
 927     switch($this->message_type) {
 928       case 'plain':
 929         $result .= $this->HeaderLine('Content-Transfer-Encoding', $this->Encoding);
 930         $result .= sprintf("Content-Type: %s; charset=\"%s\"", $this->ContentType, $this->CharSet);
 931         break;
 932       case 'attachments':
 933         /* fall through */
 934       case 'alt_attachments':
 935         if($this->InlineImageExists()){
 936           $result .= sprintf("Content-Type: %s;%s\ttype=\"text/html\";%s\tboundary=\"%s\"%s", 'multipart/related', $this->LE, $this->LE, $this->boundary[1], $this->LE);
 937         } else {
 938           $result .= $this->HeaderLine('Content-Type', 'multipart/mixed;');
 939           $result .= $this->TextLine("\tboundary=\"" . $this->boundary[1] . '"');
 940         }
 941         break;
 942       case 'alt':
 943         $result .= $this->HeaderLine('Content-Type', 'multipart/alternative;');
 944         $result .= $this->TextLine("\tboundary=\"" . $this->boundary[1] . '"');
 945         break;
 946     }
 947
 948     if($this->Mailer != 'mail') {
 949       $result .= $this->LE.$this->LE;
 950     }
 951
 952     return $result;
 953   }
 954
 955   /**
 956    * Assembles the message body.  Returns an empty string on failure.
 957    * @access private
 958    * @return string
 959    */
 960   function CreateBody() {
 961     $result = '';
 962     if ($this->sign_key_file) {
 963       $result .= $this->GetMailMIME();
 964     }
 965
 966     $this->SetWordWrap();
 967
 968     switch($this->message_type) {
 969       case 'alt':
 970         $result .= $this->GetBoundary($this->boundary[1], '', 'text/plain', '');
 971         $result .= $this->EncodeString($this->AltBody, $this->Encoding);
 972         $result .= $this->LE.$this->LE;
 973         $result .= $this->GetBoundary($this->boundary[1], '', 'text/html', '');
 974         $result .= $this->EncodeString($this->Body, $this->Encoding);
 975         $result .= $this->LE.$this->LE;
 976         $result .= $this->EndBoundary($this->boundary[1]);
 977         break;
 978       case 'plain':
 979         $result .= $this->EncodeString($this->Body, $this->Encoding);
 980         break;
 981       case 'attachments':
 982         $result .= $this->GetBoundary($this->boundary[1], '', '', '');
 983         $result .= $this->EncodeString($this->Body, $this->Encoding);
 984         $result .= $this->LE;
 985         $result .= $this->AttachAll();
 986         break;
 987       case 'alt_attachments':
 988         $result .= sprintf("--%s%s", $this->boundary[1], $this->LE);
 989         $result .= sprintf("Content-Type: %s;%s" . "\tboundary=\"%s\"%s", 'multipart/alternative', $this->LE, $this->boundary[2], $this->LE.$this->LE);
 990         $result .= $this->GetBoundary($this->boundary[2], '', 'text/plain', '') . $this->LE; // Create text body
 991         $result .= $this->EncodeString($this->AltBody, $this->Encoding);
 992         $result .= $this->LE.$this->LE;
 993         $result .= $this->GetBoundary($this->boundary[2], '', 'text/html', '') . $this->LE; // Create the HTML body
 994         $result .= $this->EncodeString($this->Body, $this->Encoding);
 995         $result .= $this->LE.$this->LE;
 996         $result .= $this->EndBoundary($this->boundary[2]);
 997         $result .= $this->AttachAll();
 998         break;
 999     }
1000
1001     if($this->IsError()) {
1002       $result = '';
1003     } else if ($this->sign_key_file) {
1004       $file = tempnam("", "mail");
1005       $fp = fopen($file, "w");
1006       fwrite($fp, $result);
1007       fclose($fp);
1008       $signed = tempnam("", "signed");
1009
1010       if (@openssl_pkcs7_sign($file, $signed, "file://".$this->sign_key_file, array("file://".$this->sign_key_file, $this->sign_key_pass), null)) {
1011         $fp = fopen($signed, "r");
1012         $result = fread($fp, filesize($this->sign_key_file));
1013         fclose($fp);
1014       } else {
1015         $this->SetError($this->Lang("signing").openssl_error_string());
1016         $result = '';
1017       }
1018
1019       unlink($file);
1020       unlink($signed);
1021     }
1022
1023     return $result;
1024   }
1025
1026   /**
1027    * Returns the start of a message boundary.
1028    * @access private
1029    */
1030   function GetBoundary($boundary, $charSet, $contentType, $encoding) {
1031     $result = '';
1032     if($charSet == '') {
1033       $charSet = $this->CharSet;
1034     }
1035     if($contentType == '') {
1036       $contentType = $this->ContentType;
1037     }
1038     if($encoding == '') {
1039       $encoding = $this->Encoding;
1040     }
1041     $result .= $this->TextLine('--' . $boundary);
1042     $result .= sprintf("Content-Type: %s; charset = \"%s\"", $contentType, $charSet);
1043     $result .= $this->LE;
1044     $result .= $this->HeaderLine('Content-Transfer-Encoding', $encoding);
1045     $result .= $this->LE;
1046
1047     return $result;
1048   }
1049
1050   /**
1051    * Returns the end of a message boundary.
1052    * @access private
1053    */
1054   function EndBoundary($boundary) {
1055     return $this->LE . '--' . $boundary . '--' . $this->LE;
1056   }
1057
1058   /**
1059    * Sets the message type.
1060    * @access private
1061    * @return void
1062    */
1063   function SetMessageType() {
1064     if(count($this->attachment) < 1 && strlen($this->AltBody) < 1) {
1065       $this->message_type = 'plain';
1066     } else {
1067       if(count($this->attachment) > 0) {
1068         $this->message_type = 'attachments';
1069       }
1070       if(strlen($this->AltBody) > 0 && count($this->attachment) < 1) {
1071         $this->message_type = 'alt';
1072       }
1073       if(strlen($this->AltBody) > 0 && count($this->attachment) > 0) {
1074         $this->message_type = 'alt_attachments';
1075       }
1076     }
1077   }
1078
1079   /* Returns a formatted header line.
1080    * @access private
1081    * @return string
1082    */
1083   function HeaderLine($name, $value) {
1084     return $name . ': ' . $value . $this->LE;
1085   }
1086
1087   /**
1088    * Returns a formatted mail line.
1089    * @access private
1090    * @return string
1091    */
1092   function TextLine($value) {
1093     return $value . $this->LE;
1094   }
1095
1096   /////////////////////////////////////////////////
1097   // CLASS METHODS, ATTACHMENTS
1098   /////////////////////////////////////////////////
1099
1100   /**
1101    * Adds an attachment from a path on the filesystem.
1102    * Returns false if the file could not be found
1103    * or accessed.
1104    * @param string $path Path to the attachment.
1105    * @param string $name Overrides the attachment name.
1106    * @param string $encoding File encoding (see $Encoding).
1107    * @param string $type File extension (MIME) type.
1108    * @return bool
1109    */
1110   function AddAttachment($path, $name = '', $encoding = 'base64', $type = 'application/octet-stream') {
1111     if(!@is_file($path)) {
1112       $this->SetError($this->Lang('file_access') . $path);
1113       return false;
1114     }
1115
1116     $filename = basename($path);
1117     if($name == '') {
1118       $name = $filename;
1119     }
1120
1121     $cur = count($this->attachment);
1122     $this->attachment[$cur][0] = $path;
1123     $this->attachment[$cur][1] = $filename;
1124     $this->attachment[$cur][2] = $name;
1125     $this->attachment[$cur][3] = $encoding;
1126     $this->attachment[$cur][4] = $type;
1127     $this->attachment[$cur][5] = false; // isStringAttachment
1128     $this->attachment[$cur][6] = 'attachment';
1129     $this->attachment[$cur][7] = 0;
1130
1131     return true;
1132   }
1133
1134   /**
1135    * Attaches all fs, string, and binary attachments to the message.
1136    * Returns an empty string on failure.
1137    * @access private
1138    * @return string
1139    */
1140   function AttachAll() {
1141     /* Return text of body */
1142     $mime = array();
1143
1144     /* Add all attachments */
1145     for($i = 0; $i < count($this->attachment); $i++) {
1146       /* Check for string attachment */
1147       $bString = $this->attachment[$i][5];
1148       if ($bString) {
1149         $string = $this->attachment[$i][0];
1150       } else {
1151         $path = $this->attachment[$i][0];
1152       }
1153
1154       $filename    = $this->attachment[$i][1];
1155       $name        = $this->attachment[$i][2];
1156       $encoding    = $this->attachment[$i][3];
1157       $type        = $this->attachment[$i][4];
1158       $disposition = $this->attachment[$i][6];
1159       $cid         = $this->attachment[$i][7];
1160
1161       $mime[] = sprintf("--%s%s", $this->boundary[1], $this->LE);
1162       $mime[] = sprintf("Content-Type: %s; name=\"%s\"%s", $type, $name, $this->LE);
1163       $mime[] = sprintf("Content-Transfer-Encoding: %s%s", $encoding, $this->LE);
1164
1165       if($disposition == 'inline') {
1166         $mime[] = sprintf("Content-ID: <%s>%s", $cid, $this->LE);
1167       }
1168
1169       $mime[] = sprintf("Content-Disposition: %s; filename=\"%s\"%s", $disposition, $name, $this->LE.$this->LE);
1170
1171       /* Encode as string attachment */
1172       if($bString) {
1173         $mime[] = $this->EncodeString($string, $encoding);
1174         if($this->IsError()) {
1175           return '';
1176         }
1177         $mime[] = $this->LE.$this->LE;
1178       } else {
1179         $mime[] = $this->EncodeFile($path, $encoding);
1180         if($this->IsError()) {
1181           return '';
1182         }
1183         $mime[] = $this->LE.$this->LE;
1184       }
1185     }
1186
1187     $mime[] = sprintf("--%s--%s", $this->boundary[1], $this->LE);
1188
1189     return join('', $mime);
1190   }
1191
1192   /**
1193    * Encodes attachment in requested format.  Returns an
1194    * empty string on failure.
1195    * @access private
1196    * @return string
1197    */
1198   function EncodeFile ($path, $encoding = 'base64') {
1199     if(!@$fd = fopen($path, 'rb')) {
1200       $this->SetError($this->Lang('file_open') . $path);
1201       return '';
1202     }
1203     $magic_quotes = get_magic_quotes_runtime();
1204     set_magic_quotes_runtime(0);
1205     $file_buffer = fread($fd, filesize($path));
1206     $file_buffer = $this->EncodeString($file_buffer, $encoding);
1207     fclose($fd);
1208     set_magic_quotes_runtime($magic_quotes);
1209
1210     return $file_buffer;
1211   }
1212
1213   /**
1214    * Encodes string to requested format. Returns an
1215    * empty string on failure.
1216    * @access private
1217    * @return string
1218    */
1219   function EncodeString ($str, $encoding = 'base64') {
1220     $encoded = '';
1221     switch(strtolower($encoding)) {
1222       case 'base64':
1223         /* chunk_split is found in PHP >= 3.0.6 */
1224         $encoded = chunk_split(base64_encode($str), 76, $this->LE);
1225         break;
1226       case '7bit':
1227       case '8bit':
1228         $encoded = $this->FixEOL($str);
1229         if (substr($encoded, -(strlen($this->LE))) != $this->LE)
1230           $encoded .= $this->LE;
1231         break;
1232       case 'binary':
1233         $encoded = $str;
1234         break;
1235       case 'quoted-printable':
1236         $encoded = $this->EncodeQP($str);
1237         break;
1238       default:
1239         $this->SetError($this->Lang('encoding') . $encoding);
1240         break;
1241     }
1242     return $encoded;
1243   }
1244
1245   /**
1246    * Encode a header string to best of Q, B, quoted or none.
1247    * @access private
1248    * @return string
1249    */
1250   function EncodeHeader ($str, $position = 'text') {
1251     $x = 0;
1252
1253     switch (strtolower($position)) {
1254       case 'phrase':
1255         if (!preg_match('/[\200-\377]/', $str)) {
1256           /* Can't use addslashes as we don't know what value has magic_quotes_sybase. */
1257           $encoded = addcslashes($str, "\0..\37\177\\\"");
1258           if (($str == $encoded) && !preg_match('/[^A-Za-z0-9!#$%&\'*+\/=?^_`{|}~ -]/', $str)) {
1259             return ($encoded);
1260           } else {
1261             return ("\"$encoded\"");
1262           }
1263         }
1264         $x = preg_match_all('/[^\040\041\043-\133\135-\176]/', $str, $matches);
1265         break;
1266       case 'comment':
1267         $x = preg_match_all('/[()"]/', $str, $matches);
1268         /* Fall-through */
1269       case 'text':
1270       default:
1271         $x += preg_match_all('/[\000-\010\013\014\016-\037\177-\377]/', $str, $matches);
1272         break;
1273     }
1274
1275     if ($x == 0) {
1276       return ($str);
1277     }
1278
1279     $maxlen = 75 - 7 - strlen($this->CharSet);
1280     /* Try to select the encoding which should produce the shortest output */
1281     if (strlen($str)/3 < $x) {
1282       $encoding = 'B';
1283       if (function_exists('mb_strlen') && $this->HasMultiBytes($str)) {
1284      // Use a custom function which correctly encodes and wraps long
1285      // multibyte strings without breaking lines within a character
1286         $encoded = $this->Base64EncodeWrapMB($str);
1287       } else {
1288         $encoded = base64_encode($str);
1289         $maxlen -= $maxlen % 4;
1290         $encoded = trim(chunk_split($encoded, $maxlen, "\n"));
1291       }
1292     } else {
1293       $encoding = 'Q';
1294       $encoded = $this->EncodeQ($str, $position);
1295       $encoded = $this->WrapText($encoded, $maxlen, true);
1296       $encoded = str_replace('='.$this->LE, "\n", trim($encoded));
1297     }
1298
1299     $encoded = preg_replace('/^(.*)$/m', " =?".$this->CharSet."?$encoding?\\1?=", $encoded);
1300     $encoded = trim(str_replace("\n", $this->LE, $encoded));
1301
1302     return $encoded;
1303   }
1304
1305   /**
1306    * Checks if a string contains multibyte characters.
1307    * @access private
1308    * @param string $str multi-byte text to wrap encode
1309    * @return bool
1310    */
1311   function HasMultiBytes($str) {
1312     if (function_exists('mb_strlen')) {
1313       return (strlen($str) > mb_strlen($str, $this->CharSet));
1314     } else { // Assume no multibytes (we can't handle without mbstring functions anyway)
1315       return False;
1316     }
1317   }
1318
1319   /**
1320    * Correctly encodes and wraps long multibyte strings for mail headers
1321    * without breaking lines within a character.
1322    * Adapted from a function by paravoid at http://uk.php.net/manual/en/function.mb-encode-mimeheader.php
1323    * @access private
1324    * @param string $str multi-byte text to wrap encode
1325    * @return string
1326    */
1327   function Base64EncodeWrapMB($str) {
1328     $start = "=?".$this->CharSet."?B?";
1329     $end = "?=";
1330     $encoded = "";
1331
1332     $mb_length = mb_strlen($str, $this->CharSet);
1333     // Each line must have length <= 75, including $start and $end
1334     $length = 75 - strlen($start) - strlen($end);
1335     // Average multi-byte ratio
1336     $ratio = $mb_length / strlen($str);
1337     // Base64 has a 4:3 ratio
1338     $offset = $avgLength = floor($length * $ratio * .75);
1339
1340     for ($i = 0; $i < $mb_length; $i += $offset) {
1341       $lookBack = 0;
1342
1343       do {
1344         $offset = $avgLength - $lookBack;
1345         $chunk = mb_substr($str, $i, $offset, $this->CharSet);
1346         $chunk = base64_encode($chunk);
1347         $lookBack++;
1348       }
1349       while (strlen($chunk) > $length);
1350
1351       $encoded .= $chunk . $this->LE;
1352     }
1353
1354     // Chomp the last linefeed
1355     $encoded = substr($encoded, 0, -strlen($this->LE));
1356     return $encoded;
1357   }
1358
1359   /**
1360    * Encode string to quoted-printable.
1361    * @access private
1362    * @return string
1363    */
1364   function EncodeQP( $input = '', $line_max = 76, $space_conv = false ) {
1365     $hex = array('0','1','2','3','4','5','6','7','8','9','A','B','C','D','E','F');
1366     $lines = preg_split('/(?:\r\n|\r|\n)/', $input);
1367     $eol = "\r\n";
1368     $escape = '=';
1369     $output = '';
1370     while( list(, $line) = each($lines) ) {
1371       $linlen = strlen($line);
1372       $newline = '';
1373       for($i = 0; $i < $linlen; $i++) {
1374         $c = substr( $line, $i, 1 );
1375         $dec = ord( $c );
1376         if ( ( $i == 0 ) && ( $dec == 46 ) ) { // convert first point in the line into =2E
1377           $c = '=2E';
1378         }
1379         if ( $dec == 32 ) {
1380           if ( $i == ( $linlen - 1 ) ) { // convert space at eol only
1381             $c = '=20';
1382           } else if ( $space_conv ) {
1383             $c = '=20';
1384           }
1385         } elseif ( ($dec == 61) || ($dec < 32 ) || ($dec > 126) ) { // always encode "\t", which is *not* required
1386           $h2 = floor($dec/16);
1387           $h1 = floor($dec%16);
1388           $c = $escape.$hex[$h2].$hex[$h1];
1389         }
1390         if ( (strlen($newline) + strlen($c)) >= $line_max ) { // CRLF is not counted
1391           $output .= $newline.$escape.$eol; //  soft line break; " =\r\n" is okay
1392           $newline = '';
1393           // check if newline first character will be point or not
1394           if ( $dec == 46 ) {
1395             $c = '=2E';
1396           }
1397         }
1398         $newline .= $c;
1399       } // end of for
1400       $output .= $newline.$eol;
1401     } // end of while
1402     return trim($output);
1403   }
1404
1405   /**
1406    * Encode string to q encoding.
1407    * @access private
1408    * @return string
1409    */
1410   function EncodeQ ($str, $position = 'text') {
1411     /* There should not be any EOL in the string */
1412     $encoded = preg_replace("[\r\n]", '', $str);
1413
1414     switch (strtolower($position)) {
1415       case 'phrase':
1416         $encoded = preg_replace("/([^A-Za-z0-9!*+\/ -])/e", "'='.sprintf('%02X', ord('\\1'))", $encoded);
1417         break;
1418       case 'comment':
1419         $encoded = preg_replace("/([\(\)\"])/e", "'='.sprintf('%02X', ord('\\1'))", $encoded);
1420       case 'text':
1421       default:
1422         /* Replace every high ascii, control =, ? and _ characters */
1423         $encoded = preg_replace('/([\000-\011\013\014\016-\037\075\077\137\177-\377])/e',
1424               "'='.sprintf('%02X', ord('\\1'))", $encoded);
1425         break;
1426     }
1427
1428     /* Replace every spaces to _ (more readable than =20) */
1429     $encoded = str_replace(' ', '_', $encoded);
1430
1431     return $encoded;
1432   }
1433
1434   /**
1435    * Adds a string or binary attachment (non-filesystem) to the list.
1436    * This method can be used to attach ascii or binary data,
1437    * such as a BLOB record from a database.
1438    * @param string $string String attachment data.
1439    * @param string $filename Name of the attachment.
1440    * @param string $encoding File encoding (see $Encoding).
1441    * @param string $type File extension (MIME) type.
1442    * @return void
1443    */
1444   function AddStringAttachment($string, $filename, $encoding = 'base64', $type = 'application/octet-stream') {
1445     /* Append to $attachment array */
1446     $cur = count($this->attachment);
1447     $this->attachment[$cur][0] = $string;
1448     $this->attachment[$cur][1] = $filename;
1449     $this->attachment[$cur][2] = $filename;
1450     $this->attachment[$cur][3] = $encoding;
1451     $this->attachment[$cur][4] = $type;
1452     $this->attachment[$cur][5] = true; // isString
1453     $this->attachment[$cur][6] = 'attachment';
1454     $this->attachment[$cur][7] = 0;
1455   }
1456
1457   /**
1458    * Adds an embedded attachment.  This can include images, sounds, and
1459    * just about any other document.  Make sure to set the $type to an
1460    * image type.  For JPEG images use "image/jpeg" and for GIF images
1461    * use "image/gif".
1462    * @param string $path Path to the attachment.
1463    * @param string $cid Content ID of the attachment.  Use this to identify
1464    *        the Id for accessing the image in an HTML form.
1465    * @param string $name Overrides the attachment name.
1466    * @param string $encoding File encoding (see $Encoding).
1467    * @param string $type File extension (MIME) type.
1468    * @return bool
1469    */
1470   function AddEmbeddedImage($path, $cid, $name = '', $encoding = 'base64', $type = 'application/octet-stream') {
1471
1472     if(!@is_file($path)) {
1473       $this->SetError($this->Lang('file_access') . $path);
1474       return false;
1475     }
1476
1477     $filename = basename($path);
1478     if($name == '') {
1479       $name = $filename;
1480     }
1481
1482     /* Append to $attachment array */
1483     $cur = count($this->attachment);
1484     $this->attachment[$cur][0] = $path;
1485     $this->attachment[$cur][1] = $filename;
1486     $this->attachment[$cur][2] = $name;
1487     $this->attachment[$cur][3] = $encoding;
1488     $this->attachment[$cur][4] = $type;
1489     $this->attachment[$cur][5] = false;
1490     $this->attachment[$cur][6] = 'inline';
1491     $this->attachment[$cur][7] = $cid;
1492
1493     return true;
1494   }
1495
1496   /**
1497    * Returns true if an inline attachment is present.
1498    * @access private
1499    * @return bool
1500    */
1501   function InlineImageExists() {
1502     $result = false;
1503     for($i = 0; $i < count($this->attachment); $i++) {
1504       if($this->attachment[$i][6] == 'inline') {
1505         $result = true;
1506         break;
1507       }
1508     }
1509
1510     return $result;
1511   }
1512
1513   /////////////////////////////////////////////////
1514   // CLASS METHODS, MESSAGE RESET
1515   /////////////////////////////////////////////////
1516
1517   /**
1518    * Clears all recipients assigned in the TO array.  Returns void.
1519    * @return void
1520    */
1521   function ClearAddresses() {
1522     $this->to = array();
1523   }
1524
1525   /**
1526    * Clears all recipients assigned in the CC array.  Returns void.
1527    * @return void
1528    */
1529   function ClearCCs() {
1530     $this->cc = array();
1531   }
1532
1533   /**
1534    * Clears all recipients assigned in the BCC array.  Returns void.
1535    * @return void
1536    */
1537   function ClearBCCs() {
1538     $this->bcc = array();
1539   }
1540
1541   /**
1542    * Clears all recipients assigned in the ReplyTo array.  Returns void.
1543    * @return void
1544    */
1545   function ClearReplyTos() {
1546     $this->ReplyTo = array();
1547   }
1548
1549   /**
1550    * Clears all recipients assigned in the TO, CC and BCC
1551    * array.  Returns void.
1552    * @return void
1553    */
1554   function ClearAllRecipients() {
1555     $this->to = array();
1556     $this->cc = array();
1557     $this->bcc = array();
1558   }
1559
1560   /**
1561    * Clears all previously set filesystem, string, and binary
1562    * attachments.  Returns void.
1563    * @return void
1564    */
1565   function ClearAttachments() {
1566     $this->attachment = array();
1567   }
1568
1569   /**
1570    * Clears all custom headers.  Returns void.
1571    * @return void
1572    */
1573   function ClearCustomHeaders() {
1574     $this->CustomHeader = array();
1575   }
1576
1577   /////////////////////////////////////////////////
1578   // CLASS METHODS, MISCELLANEOUS
1579   /////////////////////////////////////////////////
1580
1581   /**
1582    * Adds the error message to the error container.
1583    * Returns void.
1584    * @access private
1585    * @return void
1586    */
1587   function SetError($msg) {
1588     $this->error_count++;
1589     $this->ErrorInfo = $msg;
1590   }
1591
1592   /**
1593    * Returns the proper RFC 822 formatted date.
1594    * @access private
1595    * @return string
1596    */
1597   function RFCDate() {
1598     $tz = date('Z');
1599     $tzs = ($tz < 0) ? '-' : '+';
1600     $tz = abs($tz);
1601     $tz = (int)($tz/3600)*100 + ($tz%3600)/60;
1602     $result = sprintf("%s %s%04d", date('D, j M Y H:i:s'), $tzs, $tz);
1603
1604     return $result;
1605   }
1606
1607   /**
1608    * Returns the appropriate server variable.  Should work with both
1609    * PHP 4.1.0+ as well as older versions.  Returns an empty string
1610    * if nothing is found.
1611    * @access private
1612    * @return mixed
1613    */
1614   function ServerVar($varName) {
1615     global $HTTP_SERVER_VARS;
1616     global $HTTP_ENV_VARS;
1617
1618     if(!isset($_SERVER)) {
1619       $_SERVER = $HTTP_SERVER_VARS;
1620       if(!isset($_SERVER['REMOTE_ADDR'])) {
1621         $_SERVER = $HTTP_ENV_VARS; // must be Apache
1622       }
1623     }
1624
1625     if(isset($_SERVER[$varName])) {
1626       return $_SERVER[$varName];
1627     } else {
1628       return '';
1629     }
1630   }
1631
1632   /**
1633    * Returns the server hostname or 'localhost.localdomain' if unknown.
1634    * @access private
1635    * @return string
1636    */
1637   function ServerHostname() {
1638     if ($this->Hostname != '') {
1639       $result = $this->Hostname;
1640     } elseif ($this->ServerVar('SERVER_NAME') != '') {
1641       $result = $this->ServerVar('SERVER_NAME');
1642     } else {
1643       $result = 'localhost.localdomain';
1644     }
1645
1646     return $result;
1647   }
1648
1649   /**
1650    * Returns a message in the appropriate language.
1651    * @access private
1652    * @return string
1653    */
1654   function Lang($key) {
1655     if(count($this->language) < 1) {
1656       $this->SetLanguage('en'); // set the default language
1657     }
1658
1659     if(isset($this->language[$key])) {
1660       return $this->language[$key];
1661     } else {
1662       return 'Language string failed to load: ' . $key;
1663     }
1664   }
1665
1666   /**
1667    * Returns true if an error occurred.
1668    * @return bool
1669    */
1670   function IsError() {
1671     return ($this->error_count > 0);
1672   }
1673
1674   /**
1675    * Changes every end of line from CR or LF to CRLF.
1676    * @access private
1677    * @return string
1678    */
1679   function FixEOL($str) {
1680     $str = str_replace("\r\n", "\n", $str);
1681     $str = str_replace("\r", "\n", $str);
1682     $str = str_replace("\n", $this->LE, $str);
1683     return $str;
1684   }
1685
1686   /**
1687    * Adds a custom header.
1688    * @return void
1689    */
1690   function AddCustomHeader($custom_header) {
1691     $this->CustomHeader[] = explode(':', $custom_header, 2);
1692   }
1693
1694   /**
1695    * Evaluates the message and returns modifications for inline images and backgrounds
1696    * @access public
1697    * @return $message
1698    */
1699   function MsgHTML($message,$basedir='') {
1700     preg_match_all("/(src|background)=\"(.*)\"/Ui", $message, $images);
1701     if(isset($images[2])) {
1702       foreach($images[2] as $i => $url) {
1703         // do not change urls for absolute images (thanks to corvuscorax)
1704         if (!preg_match('/^[A-z][A-z]*:\/\//',$url)) {
1705           $filename = basename($url);
1706           $directory = dirname($url);
1707           ($directory == '.')?$directory='':'';
1708           $cid = 'cid:' . md5($filename);
1709           $fileParts = split("\.", $filename);
1710           $ext = $fileParts[1];
1711           $mimeType = $this->_mime_types($ext);
1712           if ( strlen($basedir) > 1 && substr($basedir,-1) != '/') { $basedir .= '/'; }
1713           if ( strlen($directory) > 1 && substr($basedir,-1) != '/') { $directory .= '/'; }
1714           $this->AddEmbeddedImage($basedir.$directory.$filename, md5($filename), $filename, 'base64', $mimeType);
1715           if ( $this->AddEmbeddedImage($basedir.$directory.$filename, md5($filename), $filename, 'base64',$mimeType) ) {
1716             $message = preg_replace("/".$images[1][$i]."=\"".preg_quote($url, '/')."\"/Ui", $images[1][$i]."=\"".$cid."\"", $message);
1717           }
1718         }
1719       }
1720     }
1721     $this->IsHTML(true);
1722     $this->Body = $message;
1723     $textMsg = trim(strip_tags(preg_replace('/<(head|title|style|script)[^>]*>.*?<\/\\1>/s','',$message)));
1724     if ( !empty($textMsg) && empty($this->AltBody) ) {
1725       $this->AltBody = $textMsg;
1726     }
1727     if ( empty($this->AltBody) ) {
1728       $this->AltBody = 'To view this email message, open the email in with HTML compatibility!' . "\n\n";
1729     }
1730   }
1731
1732   /**
1733    * Gets the mime type of the embedded or inline image
1734    * @access private
1735    * @return mime type of ext
1736    */
1737   function _mime_types($ext = '') {
1738     $mimes = array(
1739       'hqx'  =>  'application/mac-binhex40',
1740       'cpt'   =>  'application/mac-compactpro',
1741       'doc'   =>  'application/msword',
1742       'bin'   =>  'application/macbinary',
1743       'dms'   =>  'application/octet-stream',
1744       'lha'   =>  'application/octet-stream',
1745       'lzh'   =>  'application/octet-stream',
1746       'exe'   =>  'application/octet-stream',
1747       'class' =>  'application/octet-stream',
1748       'psd'   =>  'application/octet-stream',
1749       'so'    =>  'application/octet-stream',
1750       'sea'   =>  'application/octet-stream',
1751       'dll'   =>  'application/octet-stream',
1752       'oda'   =>  'application/oda',
1753       'pdf'   =>  'application/pdf',
1754       'ai'    =>  'application/postscript',
1755       'eps'   =>  'application/postscript',
1756       'ps'    =>  'application/postscript',
1757       'smi'   =>  'application/smil',
1758       'smil'  =>  'application/smil',
1759       'mif'   =>  'application/vnd.mif',
1760       'xls'   =>  'application/vnd.ms-excel',
1761       'ppt'   =>  'application/vnd.ms-powerpoint',
1762       'wbxml' =>  'application/vnd.wap.wbxml',
1763       'wmlc'  =>  'application/vnd.wap.wmlc',
1764       'dcr'   =>  'application/x-director',
1765       'dir'   =>  'application/x-director',
1766       'dxr'   =>  'application/x-director',
1767       'dvi'   =>  'application/x-dvi',
1768       'gtar'  =>  'application/x-gtar',
1769       'php'   =>  'application/x-httpd-php',
1770       'php4'  =>  'application/x-httpd-php',
1771       'php3'  =>  'application/x-httpd-php',
1772       'phtml' =>  'application/x-httpd-php',
1773       'phps'  =>  'application/x-httpd-php-source',
1774       'js'    =>  'application/x-javascript',
1775       'swf'   =>  'application/x-shockwave-flash',
1776       'sit'   =>  'application/x-stuffit',
1777       'tar'   =>  'application/x-tar',
1778       'tgz'   =>  'application/x-tar',
1779       'xhtml' =>  'application/xhtml+xml',
1780       'xht'   =>  'application/xhtml+xml',
1781       'zip'   =>  'application/zip',
1782       'mid'   =>  'audio/midi',
1783       'midi'  =>  'audio/midi',
1784       'mpga'  =>  'audio/mpeg',
1785       'mp2'   =>  'audio/mpeg',
1786       'mp3'   =>  'audio/mpeg',
1787       'aif'   =>  'audio/x-aiff',
1788       'aiff'  =>  'audio/x-aiff',
1789       'aifc'  =>  'audio/x-aiff',
1790       'ram'   =>  'audio/x-pn-realaudio',
1791       'rm'    =>  'audio/x-pn-realaudio',
1792       'rpm'   =>  'audio/x-pn-realaudio-plugin',
1793       'ra'    =>  'audio/x-realaudio',
1794       'rv'    =>  'video/vnd.rn-realvideo',
1795       'wav'   =>  'audio/x-wav',
1796       'bmp'   =>  'image/bmp',
1797       'gif'   =>  'image/gif',
1798       'jpeg'  =>  'image/jpeg',
1799       'jpg'   =>  'image/jpeg',
1800       'jpe'   =>  'image/jpeg',
1801       'png'   =>  'image/png',
1802       'tiff'  =>  'image/tiff',
1803       'tif'   =>  'image/tiff',
1804       'css'   =>  'text/css',
1805       'html'  =>  'text/html',
1806       'htm'   =>  'text/html',
1807       'shtml' =>  'text/html',
1808       'txt'   =>  'text/plain',
1809       'text'  =>  'text/plain',
1810       'log'   =>  'text/plain',
1811       'rtx'   =>  'text/richtext',
1812       'rtf'   =>  'text/rtf',
1813       'xml'   =>  'text/xml',
1814       'xsl'   =>  'text/xml',
1815       'mpeg'  =>  'video/mpeg',
1816       'mpg'   =>  'video/mpeg',
1817       'mpe'   =>  'video/mpeg',
1818       'qt'    =>  'video/quicktime',
1819       'mov'   =>  'video/quicktime',
1820       'avi'   =>  'video/x-msvideo',
1821       'movie' =>  'video/x-sgi-movie',
1822       'doc'   =>  'application/msword',
1823       'word'  =>  'application/msword',
1824       'xl'    =>  'application/excel',
1825       'eml'   =>  'message/rfc822'
1826     );
1827     return ( ! isset($mimes[strtolower($ext)])) ? 'application/octet-stream' : $mimes[strtolower($ext)];
1828   }
1829
1830   /**
1831    * Set (or reset) Class Objects (variables)
1832    *
1833    * Usage Example:
1834    * $page->set('X-Priority', '3');
1835    *
1836    * @access public
1837    * @param string $name Parameter Name
1838    * @param mixed $value Parameter Value
1839    * NOTE: will not work with arrays, there are no arrays to set/reset
1840    */
1841   function set ( $name, $value = '' ) {
1842     if ( isset($this->$name) ) {
1843       $this->$name = $value;
1844     } else {
1845       $this->SetError('Cannot set or reset variable ' . $name);
1846       return false;
1847     }
1848   }
1849
1850   /**
1851    * Read a file from a supplied filename and return it.
1852    *
1853    * @access public
1854    * @param string $filename Parameter File Name
1855    */
1856   function getFile($filename) {
1857     $return = '';
1858     if ($fp = fopen($filename, 'rb')) {
1859       while (!feof($fp)) {
1860         $return .= fread($fp, 1024);
1861       }
1862       fclose($fp);
1863       return $return;
1864     } else {
1865       return false;
1866     }
1867   }
1868
1869   /**
1870    * Strips newlines to prevent header injection.
1871    * @access private
1872    * @param string $str String
1873    * @return string
1874    */
1875   function SecureHeader($str) {
1876     $str = trim($str);
1877     $str = str_replace("\r", "", $str);
1878     $str = str_replace("\n", "", $str);
1879     return $str;
1880   }
1881
1882   /**
1883    * Set the private key file and password to sign the message.
1884    *
1885    * @access public
1886    * @param string $key_filename Parameter File Name
1887    * @param string $key_pass Password for private key
1888    */
1889   function Sign($key_filename, $key_pass) {
1890     $this->sign_key_file = $key_filename;
1891     $this->sign_key_pass = $key_pass;
1892   }
1893
1894 }
1895
1896 ?>