You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
1594 lines
55 KiB
PHP
1594 lines
55 KiB
PHP
<?php
|
|
/**
|
|
* The Mail_Mime class is used to create MIME E-mail messages
|
|
*
|
|
* The Mail_Mime class provides an OO interface to create MIME
|
|
* enabled email messages. This way you can create emails that
|
|
* contain plain-text bodies, HTML bodies, attachments, inline
|
|
* images and specific headers.
|
|
*
|
|
* Compatible with PHP versions 4 and 5
|
|
*
|
|
* LICENSE: This LICENSE is in the BSD license style.
|
|
* Copyright (c) 2002-2003, Richard Heyes <richard@phpguru.org>
|
|
* Copyright (c) 2003-2006, PEAR <pear-group@php.net>
|
|
* All rights reserved.
|
|
*
|
|
* Redistribution and use in source and binary forms, with or
|
|
* without modification, are permitted provided that the following
|
|
* conditions are met:
|
|
*
|
|
* - Redistributions of source code must retain the above copyright
|
|
* notice, this list of conditions and the following disclaimer.
|
|
* - Redistributions in binary form must reproduce the above copyright
|
|
* notice, this list of conditions and the following disclaimer in the
|
|
* documentation and/or other materials provided with the distribution.
|
|
* - Neither the name of the authors, nor the names of its contributors
|
|
* may be used to endorse or promote products derived from this
|
|
* software without specific prior written permission.
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
|
|
* AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
|
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
|
* ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
|
|
* LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
|
|
* CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
|
|
* SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
|
|
* INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
|
|
* CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
|
|
* ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF
|
|
* THE POSSIBILITY OF SUCH DAMAGE.
|
|
*
|
|
* @category Mail
|
|
* @package Mail_Mime
|
|
* @author Richard Heyes <richard@phpguru.org>
|
|
* @author Tomas V.V. Cox <cox@idecnet.com>
|
|
* @author Cipriano Groenendal <cipri@php.net>
|
|
* @author Sean Coates <sean@php.net>
|
|
* @author Aleksander Machniak <alec@php.net>
|
|
* @copyright 2003-2006 PEAR <pear-group@php.net>
|
|
* @license http://www.opensource.org/licenses/bsd-license.php BSD License
|
|
* @version CVS: $Id$
|
|
* @link http://pear.php.net/package/Mail_mime
|
|
*
|
|
* This class is based on HTML Mime Mail class from
|
|
* Richard Heyes <richard@phpguru.org> which was based also
|
|
* in the mime_mail.class by Tobias Ratschiller <tobias@dnet.it>
|
|
* and Sascha Schumann <sascha@schumann.cx>
|
|
*/
|
|
|
|
|
|
/**
|
|
* require PEAR
|
|
*
|
|
* This package depends on PEAR to raise errors.
|
|
*/
|
|
require_once 'PEAR.php';
|
|
|
|
/**
|
|
* require Mail_mimePart
|
|
*
|
|
* Mail_mimePart contains the code required to
|
|
* create all the different parts a mail can
|
|
* consist of.
|
|
*/
|
|
require_once 'Mail/mimePart.php';
|
|
|
|
|
|
/**
|
|
* The Mail_Mime class provides an OO interface to create MIME
|
|
* enabled email messages. This way you can create emails that
|
|
* contain plain-text bodies, HTML bodies, attachments, inline
|
|
* images and specific headers.
|
|
*
|
|
* @category Mail
|
|
* @package Mail_Mime
|
|
* @author Richard Heyes <richard@phpguru.org>
|
|
* @author Tomas V.V. Cox <cox@idecnet.com>
|
|
* @author Cipriano Groenendal <cipri@php.net>
|
|
* @author Sean Coates <sean@php.net>
|
|
* @copyright 2003-2006 PEAR <pear-group@php.net>
|
|
* @license http://www.opensource.org/licenses/bsd-license.php BSD License
|
|
* @version Release: @package_version@
|
|
* @link http://pear.php.net/package/Mail_mime
|
|
*/
|
|
class Mail_mime
|
|
{
|
|
/**
|
|
* Contains the plain text part of the email
|
|
*
|
|
* @var string
|
|
* @access private
|
|
*/
|
|
var $_txtbody;
|
|
|
|
/**
|
|
* Contains the html part of the email
|
|
*
|
|
* @var string
|
|
* @access private
|
|
*/
|
|
var $_htmlbody;
|
|
|
|
/**
|
|
* list of the attached images
|
|
*
|
|
* @var array
|
|
* @access private
|
|
*/
|
|
var $_html_images = array();
|
|
|
|
/**
|
|
* list of the attachements
|
|
*
|
|
* @var array
|
|
* @access private
|
|
*/
|
|
var $_parts = array();
|
|
|
|
/**
|
|
* Headers for the mail
|
|
*
|
|
* @var array
|
|
* @access private
|
|
*/
|
|
var $_headers = array();
|
|
|
|
/**
|
|
* Build parameters
|
|
*
|
|
* @var array
|
|
* @access private
|
|
*/
|
|
var $_build_params = array(
|
|
// What encoding to use for the headers
|
|
// Options: quoted-printable or base64
|
|
'head_encoding' => 'quoted-printable',
|
|
// What encoding to use for plain text
|
|
// Options: 7bit, 8bit, base64, or quoted-printable
|
|
'text_encoding' => 'quoted-printable',
|
|
// What encoding to use for html
|
|
// Options: 7bit, 8bit, base64, or quoted-printable
|
|
'html_encoding' => 'quoted-printable',
|
|
// The character set to use for html
|
|
'html_charset' => 'ISO-8859-1',
|
|
// The character set to use for text
|
|
'text_charset' => 'ISO-8859-1',
|
|
// The character set to use for headers
|
|
'head_charset' => 'ISO-8859-1',
|
|
// End-of-line sequence
|
|
'eol' => "\r\n",
|
|
// Delay attachment files IO until building the message
|
|
'delay_file_io' => false
|
|
);
|
|
|
|
/**
|
|
* Constructor function
|
|
*
|
|
* @param mixed $params Build parameters that change the way the email
|
|
* is built. Should be an associative array.
|
|
* See $_build_params.
|
|
*
|
|
* @return void
|
|
* @access public
|
|
*/
|
|
function Mail_mime($params = array())
|
|
{
|
|
// Backward-compatible EOL setting
|
|
if (is_string($params)) {
|
|
$this->_build_params['eol'] = $params;
|
|
} else if (defined('MAIL_MIME_CRLF') && !isset($params['eol'])) {
|
|
$this->_build_params['eol'] = MAIL_MIME_CRLF;
|
|
}
|
|
|
|
// Update build parameters
|
|
if (!empty($params) && is_array($params)) {
|
|
while (list($key, $value) = each($params)) {
|
|
$this->_build_params[$key] = $value;
|
|
}
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Set build parameter value
|
|
*
|
|
* @param string $name Parameter name
|
|
* @param string $value Parameter value
|
|
*
|
|
* @return void
|
|
* @access public
|
|
* @since 1.6.0
|
|
*/
|
|
function setParam($name, $value)
|
|
{
|
|
$this->_build_params[$name] = $value;
|
|
}
|
|
|
|
/**
|
|
* Get build parameter value
|
|
*
|
|
* @param string $name Parameter name
|
|
*
|
|
* @return mixed Parameter value
|
|
* @access public
|
|
* @since 1.6.0
|
|
*/
|
|
function getParam($name)
|
|
{
|
|
return isset($this->_build_params[$name]) ? $this->_build_params[$name] : null;
|
|
}
|
|
|
|
/**
|
|
* Accessor function to set the body text. Body text is used if
|
|
* it's not an html mail being sent or else is used to fill the
|
|
* text/plain part that emails clients who don't support
|
|
* html should show.
|
|
*
|
|
* @param string $data Either a string or
|
|
* the file name with the contents
|
|
* @param bool $isfile If true the first param should be treated
|
|
* as a file name, else as a string (default)
|
|
* @param bool $append If true the text or file is appended to
|
|
* the existing body, else the old body is
|
|
* overwritten
|
|
*
|
|
* @return mixed True on success or PEAR_Error object
|
|
* @access public
|
|
*/
|
|
function setTXTBody($data, $isfile = false, $append = false)
|
|
{
|
|
if (!$isfile) {
|
|
if (!$append) {
|
|
$this->_txtbody = $data;
|
|
} else {
|
|
$this->_txtbody .= $data;
|
|
}
|
|
} else {
|
|
$cont = $this->_file2str($data);
|
|
if (PEAR::isError($cont)) {
|
|
return $cont;
|
|
}
|
|
if (!$append) {
|
|
$this->_txtbody = $cont;
|
|
} else {
|
|
$this->_txtbody .= $cont;
|
|
}
|
|
}
|
|
return true;
|
|
}
|
|
|
|
/**
|
|
* Get message text body
|
|
*
|
|
* @return string Text body
|
|
* @access public
|
|
* @since 1.6.0
|
|
*/
|
|
function getTXTBody()
|
|
{
|
|
return $this->_txtbody;
|
|
}
|
|
|
|
/**
|
|
* Adds a html part to the mail.
|
|
*
|
|
* @param string $data Either a string or the file name with the
|
|
* contents
|
|
* @param bool $isfile A flag that determines whether $data is a
|
|
* filename, or a string(false, default)
|
|
*
|
|
* @return bool True on success
|
|
* @access public
|
|
*/
|
|
function setHTMLBody($data, $isfile = false)
|
|
{
|
|
if (!$isfile) {
|
|
$this->_htmlbody = $data;
|
|
} else {
|
|
$cont = $this->_file2str($data);
|
|
if (PEAR::isError($cont)) {
|
|
return $cont;
|
|
}
|
|
$this->_htmlbody = $cont;
|
|
}
|
|
|
|
return true;
|
|
}
|
|
|
|
/**
|
|
* Get message HTML body
|
|
*
|
|
* @return string HTML body
|
|
* @access public
|
|
* @since 1.6.0
|
|
*/
|
|
function getHTMLBody()
|
|
{
|
|
return $this->_htmlbody;
|
|
}
|
|
|
|
/**
|
|
* Adds an image to the list of embedded images.
|
|
*
|
|
* @param string $file The image file name OR image data itself
|
|
* @param string $c_type The content type
|
|
* @param string $name The filename of the image.
|
|
* Only used if $file is the image data.
|
|
* @param bool $isfile Whether $file is a filename or not.
|
|
* Defaults to true
|
|
* @param string $content_id Desired Content-ID of MIME part
|
|
* Defaults to generated unique ID
|
|
*
|
|
* @return bool True on success
|
|
* @access public
|
|
*/
|
|
function addHTMLImage($file,
|
|
$c_type='application/octet-stream',
|
|
$name = '',
|
|
$isfile = true,
|
|
$content_id = null
|
|
) {
|
|
$bodyfile = null;
|
|
|
|
if ($isfile) {
|
|
// Don't load file into memory
|
|
if ($this->_build_params['delay_file_io']) {
|
|
$filedata = null;
|
|
$bodyfile = $file;
|
|
} else {
|
|
if (PEAR::isError($filedata = $this->_file2str($file))) {
|
|
return $filedata;
|
|
}
|
|
}
|
|
$filename = ($name ? $name : $file);
|
|
} else {
|
|
$filedata = $file;
|
|
$filename = $name;
|
|
}
|
|
|
|
if (!$content_id) {
|
|
$content_id = md5(uniqid(time()));
|
|
}
|
|
|
|
$this->_html_images[] = array(
|
|
'body' => $filedata,
|
|
'body_file' => $bodyfile,
|
|
'name' => $filename,
|
|
'c_type' => $c_type,
|
|
'cid' => $content_id
|
|
);
|
|
|
|
return true;
|
|
}
|
|
|
|
/**
|
|
* Adds a file to the list of attachments.
|
|
*
|
|
* @param string $file The file name of the file to attach
|
|
* OR the file contents itself
|
|
* @param string $c_type The content type
|
|
* @param string $name The filename of the attachment
|
|
* Only use if $file is the contents
|
|
* @param bool $isfile Whether $file is a filename or not
|
|
* Defaults to true
|
|
* @param string $encoding The type of encoding to use.
|
|
* Defaults to base64.
|
|
* Possible values: 7bit, 8bit, base64,
|
|
* or quoted-printable.
|
|
* @param string $disposition The content-disposition of this file
|
|
* Defaults to attachment.
|
|
* Possible values: attachment, inline.
|
|
* @param string $charset The character set used in the filename
|
|
* of this attachment.
|
|
* @param string $language The language of the attachment
|
|
* @param string $location The RFC 2557.4 location of the attachment
|
|
* @param string $n_encoding Encoding for attachment name (Content-Type)
|
|
* By default filenames are encoded using RFC2231 method
|
|
* Here you can set RFC2047 encoding (quoted-printable
|
|
* or base64) instead
|
|
* @param string $f_encoding Encoding for attachment filename (Content-Disposition)
|
|
* See $n_encoding description
|
|
*
|
|
* @return mixed True on success or PEAR_Error object
|
|
* @access public
|
|
*/
|
|
function addAttachment($file,
|
|
$c_type = 'application/octet-stream',
|
|
$name = '',
|
|
$isfile = true,
|
|
$encoding = 'base64',
|
|
$disposition = 'attachment',
|
|
$charset = '',
|
|
$language = '',
|
|
$location = '',
|
|
$n_encoding = null,
|
|
$f_encoding = null
|
|
) {
|
|
$bodyfile = null;
|
|
|
|
if ($isfile) {
|
|
// Don't load file into memory
|
|
if ($this->_build_params['delay_file_io']) {
|
|
$filedata = null;
|
|
$bodyfile = $file;
|
|
} else {
|
|
if (PEAR::isError($filedata = $this->_file2str($file))) {
|
|
return $filedata;
|
|
}
|
|
}
|
|
// Force the name the user supplied, otherwise use $file
|
|
$filename = ($name ? $name : $file);
|
|
} else {
|
|
$filedata = $file;
|
|
$filename = $name;
|
|
}
|
|
|
|
if (!strlen($filename)) {
|
|
$msg = "The supplied filename for the attachment can't be empty";
|
|
$err = PEAR::raiseError($msg);
|
|
return $err;
|
|
}
|
|
$filename = $this->_basename($filename);
|
|
|
|
$this->_parts[] = array(
|
|
'body' => $filedata,
|
|
'body_file' => $bodyfile,
|
|
'name' => $filename,
|
|
'c_type' => $c_type,
|
|
'encoding' => $encoding,
|
|
'charset' => $charset,
|
|
'language' => $language,
|
|
'location' => $location,
|
|
'disposition' => $disposition,
|
|
'name_encoding' => $n_encoding,
|
|
'filename_encoding' => $f_encoding
|
|
);
|
|
|
|
return true;
|
|
}
|
|
|
|
/**
|
|
* Get the contents of the given file name as string
|
|
*
|
|
* @param string $file_name Path of file to process
|
|
*
|
|
* @return string Contents of $file_name
|
|
* @access private
|
|
*/
|
|
function &_file2str($file_name)
|
|
{
|
|
// Check state of file and raise an error properly
|
|
if (!file_exists($file_name)) {
|
|
$err = PEAR::raiseError('File not found: ' . $file_name);
|
|
return $err;
|
|
}
|
|
if (!is_file($file_name)) {
|
|
$err = PEAR::raiseError('Not a regular file: ' . $file_name);
|
|
return $err;
|
|
}
|
|
if (!is_readable($file_name)) {
|
|
$err = PEAR::raiseError('File is not readable: ' . $file_name);
|
|
return $err;
|
|
}
|
|
|
|
// Temporarily reset magic_quotes_runtime and read file contents
|
|
if ($magic_quote_setting = get_magic_quotes_runtime()) {
|
|
@ini_set('magic_quotes_runtime', 0);
|
|
}
|
|
$cont = file_get_contents($file_name);
|
|
if ($magic_quote_setting) {
|
|
@ini_set('magic_quotes_runtime', $magic_quote_setting);
|
|
}
|
|
|
|
return $cont;
|
|
}
|
|
|
|
/**
|
|
* Adds a text subpart to the mimePart object and
|
|
* returns it during the build process.
|
|
*
|
|
* @param mixed &$obj The object to add the part to, or
|
|
* null if a new object is to be created.
|
|
* @param string $text The text to add.
|
|
*
|
|
* @return object The text mimePart object
|
|
* @access private
|
|
*/
|
|
function &_addTextPart(&$obj, $text)
|
|
{
|
|
$params['content_type'] = 'text/plain';
|
|
$params['encoding'] = $this->_build_params['text_encoding'];
|
|
$params['charset'] = $this->_build_params['text_charset'];
|
|
$params['eol'] = $this->_build_params['eol'];
|
|
|
|
if (is_object($obj)) {
|
|
$ret = $obj->addSubpart($text, $params);
|
|
return $ret;
|
|
} else {
|
|
$ret = new Mail_mimePart($text, $params);
|
|
return $ret;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Adds a html subpart to the mimePart object and
|
|
* returns it during the build process.
|
|
*
|
|
* @param mixed &$obj The object to add the part to, or
|
|
* null if a new object is to be created.
|
|
*
|
|
* @return object The html mimePart object
|
|
* @access private
|
|
*/
|
|
function &_addHtmlPart(&$obj)
|
|
{
|
|
$params['content_type'] = 'text/html';
|
|
$params['encoding'] = $this->_build_params['html_encoding'];
|
|
$params['charset'] = $this->_build_params['html_charset'];
|
|
$params['eol'] = $this->_build_params['eol'];
|
|
|
|
if (is_object($obj)) {
|
|
$ret = $obj->addSubpart($this->_htmlbody, $params);
|
|
return $ret;
|
|
} else {
|
|
$ret = new Mail_mimePart($this->_htmlbody, $params);
|
|
return $ret;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Creates a new mimePart object, using multipart/mixed as
|
|
* the initial content-type and returns it during the
|
|
* build process.
|
|
*
|
|
* @return object The multipart/mixed mimePart object
|
|
* @access private
|
|
*/
|
|
function &_addMixedPart()
|
|
{
|
|
$params = array();
|
|
$params['content_type'] = 'multipart/mixed';
|
|
$params['eol'] = $this->_build_params['eol'];
|
|
|
|
// Create empty multipart/mixed Mail_mimePart object to return
|
|
$ret = new Mail_mimePart('', $params);
|
|
return $ret;
|
|
}
|
|
|
|
/**
|
|
* Adds a multipart/alternative part to a mimePart
|
|
* object (or creates one), and returns it during
|
|
* the build process.
|
|
*
|
|
* @param mixed &$obj The object to add the part to, or
|
|
* null if a new object is to be created.
|
|
*
|
|
* @return object The multipart/mixed mimePart object
|
|
* @access private
|
|
*/
|
|
function &_addAlternativePart(&$obj)
|
|
{
|
|
$params['content_type'] = 'multipart/alternative';
|
|
$params['eol'] = $this->_build_params['eol'];
|
|
|
|
if (is_object($obj)) {
|
|
return $obj->addSubpart('', $params);
|
|
} else {
|
|
$ret = new Mail_mimePart('', $params);
|
|
return $ret;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Adds a multipart/related part to a mimePart
|
|
* object (or creates one), and returns it during
|
|
* the build process.
|
|
*
|
|
* @param mixed &$obj The object to add the part to, or
|
|
* null if a new object is to be created
|
|
*
|
|
* @return object The multipart/mixed mimePart object
|
|
* @access private
|
|
*/
|
|
function &_addRelatedPart(&$obj)
|
|
{
|
|
$params['content_type'] = 'multipart/related';
|
|
$params['eol'] = $this->_build_params['eol'];
|
|
|
|
if (is_object($obj)) {
|
|
return $obj->addSubpart('', $params);
|
|
} else {
|
|
$ret = new Mail_mimePart('', $params);
|
|
return $ret;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Adds an html image subpart to a mimePart object
|
|
* and returns it during the build process.
|
|
*
|
|
* @param object &$obj The mimePart to add the image to
|
|
* @param array $value The image information
|
|
*
|
|
* @return object The image mimePart object
|
|
* @access private
|
|
*/
|
|
function &_addHtmlImagePart(&$obj, $value)
|
|
{
|
|
$params['content_type'] = $value['c_type'];
|
|
$params['encoding'] = 'base64';
|
|
$params['disposition'] = 'inline';
|
|
$params['dfilename'] = $value['name'];
|
|
$params['cid'] = $value['cid'];
|
|
$params['body_file'] = $value['body_file'];
|
|
$params['eol'] = $this->_build_params['eol'];
|
|
|
|
if (!empty($value['name_encoding'])) {
|
|
$params['name_encoding'] = $value['name_encoding'];
|
|
}
|
|
if (!empty($value['filename_encoding'])) {
|
|
$params['filename_encoding'] = $value['filename_encoding'];
|
|
}
|
|
|
|
$ret = $obj->addSubpart($value['body'], $params);
|
|
return $ret;
|
|
}
|
|
|
|
/**
|
|
* Adds an attachment subpart to a mimePart object
|
|
* and returns it during the build process.
|
|
*
|
|
* @param object &$obj The mimePart to add the image to
|
|
* @param array $value The attachment information
|
|
*
|
|
* @return object The image mimePart object
|
|
* @access private
|
|
*/
|
|
function &_addAttachmentPart(&$obj, $value)
|
|
{
|
|
$params['eol'] = $this->_build_params['eol'];
|
|
$params['dfilename'] = $value['name'];
|
|
$params['encoding'] = $value['encoding'];
|
|
$params['content_type'] = $value['c_type'];
|
|
$params['body_file'] = $value['body_file'];
|
|
$params['disposition'] = isset($value['disposition']) ?
|
|
$value['disposition'] : 'attachment';
|
|
if ($value['charset']) {
|
|
$params['charset'] = $value['charset'];
|
|
}
|
|
if ($value['language']) {
|
|
$params['language'] = $value['language'];
|
|
}
|
|
if ($value['location']) {
|
|
$params['location'] = $value['location'];
|
|
}
|
|
if (!empty($value['name_encoding'])) {
|
|
$params['name_encoding'] = $value['name_encoding'];
|
|
}
|
|
if (!empty($value['filename_encoding'])) {
|
|
$params['filename_encoding'] = $value['filename_encoding'];
|
|
}
|
|
|
|
$ret = $obj->addSubpart($value['body'], $params);
|
|
return $ret;
|
|
}
|
|
|
|
/**
|
|
* Returns the complete e-mail, ready to send using an alternative
|
|
* mail delivery method. Note that only the mailpart that is made
|
|
* with Mail_Mime is created. This means that,
|
|
* YOU WILL HAVE NO TO: HEADERS UNLESS YOU SET IT YOURSELF
|
|
* using the $headers parameter!
|
|
*
|
|
* @param string $separation The separation between these two parts.
|
|
* @param array $params The Build parameters passed to the
|
|
* &get() function. See &get for more info.
|
|
* @param array $headers The extra headers that should be passed
|
|
* to the &headers() function.
|
|
* See that function for more info.
|
|
* @param bool $overwrite Overwrite the existing headers with new.
|
|
*
|
|
* @return mixed The complete e-mail or PEAR error object
|
|
* @access public
|
|
*/
|
|
function getMessage($separation = null, $params = null, $headers = null,
|
|
$overwrite = false
|
|
) {
|
|
if ($separation === null) {
|
|
$separation = $this->_build_params['eol'];
|
|
}
|
|
|
|
$body = $this->get($params);
|
|
|
|
if (PEAR::isError($body)) {
|
|
return $body;
|
|
}
|
|
|
|
$head = $this->txtHeaders($headers, $overwrite);
|
|
$mail = $head . $separation . $body;
|
|
return $mail;
|
|
}
|
|
|
|
/**
|
|
* Returns the complete e-mail body, ready to send using an alternative
|
|
* mail delivery method.
|
|
*
|
|
* @param array $params The Build parameters passed to the
|
|
* &get() function. See &get for more info.
|
|
*
|
|
* @return mixed The e-mail body or PEAR error object
|
|
* @access public
|
|
* @since 1.6.0
|
|
*/
|
|
function getMessageBody($params = null)
|
|
{
|
|
return $this->get($params, null, true);
|
|
}
|
|
|
|
/**
|
|
* Writes (appends) the complete e-mail into file.
|
|
*
|
|
* @param string $filename Output file location
|
|
* @param array $params The Build parameters passed to the
|
|
* &get() function. See &get for more info.
|
|
* @param array $headers The extra headers that should be passed
|
|
* to the &headers() function.
|
|
* See that function for more info.
|
|
* @param bool $overwrite Overwrite the existing headers with new.
|
|
*
|
|
* @return mixed True or PEAR error object
|
|
* @access public
|
|
* @since 1.6.0
|
|
*/
|
|
function saveMessage($filename, $params = null, $headers = null, $overwrite = false)
|
|
{
|
|
// Check state of file and raise an error properly
|
|
if (file_exists($filename) && !is_writable($filename)) {
|
|
$err = PEAR::raiseError('File is not writable: ' . $filename);
|
|
return $err;
|
|
}
|
|
|
|
// Temporarily reset magic_quotes_runtime and read file contents
|
|
if ($magic_quote_setting = get_magic_quotes_runtime()) {
|
|
@ini_set('magic_quotes_runtime', 0);
|
|
}
|
|
|
|
if (!($fh = fopen($filename, 'ab'))) {
|
|
$err = PEAR::raiseError('Unable to open file: ' . $filename);
|
|
return $err;
|
|
}
|
|
|
|
// Write message headers into file (skipping Content-* headers)
|
|
$head = $this->txtHeaders($headers, $overwrite, true);
|
|
if (fwrite($fh, $head) === false) {
|
|
$err = PEAR::raiseError('Error writing to file: ' . $filename);
|
|
return $err;
|
|
}
|
|
|
|
fclose($fh);
|
|
|
|
if ($magic_quote_setting) {
|
|
@ini_set('magic_quotes_runtime', $magic_quote_setting);
|
|
}
|
|
|
|
// Write the rest of the message into file
|
|
$res = $this->get($params, $filename);
|
|
|
|
return $res ? $res : true;
|
|
}
|
|
|
|
/**
|
|
* Writes (appends) the complete e-mail body into file.
|
|
*
|
|
* @param string $filename Output file location
|
|
* @param array $params The Build parameters passed to the
|
|
* &get() function. See &get for more info.
|
|
*
|
|
* @return mixed True or PEAR error object
|
|
* @access public
|
|
* @since 1.6.0
|
|
*/
|
|
function saveMessageBody($filename, $params = null)
|
|
{
|
|
// Check state of file and raise an error properly
|
|
if (file_exists($filename) && !is_writable($filename)) {
|
|
$err = PEAR::raiseError('File is not writable: ' . $filename);
|
|
return $err;
|
|
}
|
|
|
|
// Temporarily reset magic_quotes_runtime and read file contents
|
|
if ($magic_quote_setting = get_magic_quotes_runtime()) {
|
|
@ini_set('magic_quotes_runtime', 0);
|
|
}
|
|
|
|
if (!($fh = fopen($filename, 'ab'))) {
|
|
$err = PEAR::raiseError('Unable to open file: ' . $filename);
|
|
return $err;
|
|
}
|
|
|
|
// Write the rest of the message into file
|
|
$res = $this->get($params, $filename, true);
|
|
|
|
return $res ? $res : true;
|
|
}
|
|
|
|
/**
|
|
* Builds the multipart message from the list ($this->_parts) and
|
|
* returns the mime content.
|
|
*
|
|
* @param array $params Build parameters that change the way the email
|
|
* is built. Should be associative. See $_build_params.
|
|
* @param resource $filename Output file where to save the message instead of
|
|
* returning it
|
|
* @param boolean $skip_head True if you want to return/save only the message
|
|
* without headers
|
|
*
|
|
* @return mixed The MIME message content string, null or PEAR error object
|
|
* @access public
|
|
*/
|
|
function &get($params = null, $filename = null, $skip_head = false)
|
|
{
|
|
if (isset($params)) {
|
|
while (list($key, $value) = each($params)) {
|
|
$this->_build_params[$key] = $value;
|
|
}
|
|
}
|
|
|
|
if (isset($this->_headers['From'])) {
|
|
// Bug #11381: Illegal characters in domain ID
|
|
if (preg_match("|(@[0-9a-zA-Z\-\.]+)|", $this->_headers['From'], $matches)) {
|
|
$domainID = $matches[1];
|
|
} else {
|
|
$domainID = "@localhost";
|
|
}
|
|
foreach ($this->_html_images as $i => $img) {
|
|
$this->_html_images[$i]['cid']
|
|
= $this->_html_images[$i]['cid'] . $domainID;
|
|
}
|
|
}
|
|
|
|
if (count($this->_html_images) && isset($this->_htmlbody)) {
|
|
foreach ($this->_html_images as $key => $value) {
|
|
$regex = array();
|
|
$regex[] = '#(\s)((?i)src|background|href(?-i))\s*=\s*(["\']?)' .
|
|
preg_quote($value['name'], '#') . '\3#';
|
|
$regex[] = '#(?i)url(?-i)\(\s*(["\']?)' .
|
|
preg_quote($value['name'], '#') . '\1\s*\)#';
|
|
|
|
$rep = array();
|
|
$rep[] = '\1\2=\3cid:' . $value['cid'] .'\3';
|
|
$rep[] = 'url(\1cid:' . $value['cid'] . '\1)';
|
|
|
|
$this->_htmlbody = preg_replace($regex, $rep, $this->_htmlbody);
|
|
$this->_html_images[$key]['name']
|
|
= $this->_basename($this->_html_images[$key]['name']);
|
|
}
|
|
}
|
|
|
|
$null = null;
|
|
$attachments = count($this->_parts) ? true : false;
|
|
$html_images = count($this->_html_images) ? true : false;
|
|
$html = strlen($this->_htmlbody) ? true : false;
|
|
$text = (!$html && strlen($this->_txtbody)) ? true : false;
|
|
|
|
switch (true) {
|
|
case $text && !$attachments:
|
|
$message =& $this->_addTextPart($null, $this->_txtbody);
|
|
break;
|
|
|
|
case !$text && !$html && $attachments:
|
|
$message =& $this->_addMixedPart();
|
|
for ($i = 0; $i < count($this->_parts); $i++) {
|
|
$this->_addAttachmentPart($message, $this->_parts[$i]);
|
|
}
|
|
break;
|
|
|
|
case $text && $attachments:
|
|
$message =& $this->_addMixedPart();
|
|
$this->_addTextPart($message, $this->_txtbody);
|
|
for ($i = 0; $i < count($this->_parts); $i++) {
|
|
$this->_addAttachmentPart($message, $this->_parts[$i]);
|
|
}
|
|
break;
|
|
|
|
case $html && !$attachments && !$html_images:
|
|
if (isset($this->_txtbody)) {
|
|
$message =& $this->_addAlternativePart($null);
|
|
$this->_addTextPart($message, $this->_txtbody);
|
|
$this->_addHtmlPart($message);
|
|
} else {
|
|
$message =& $this->_addHtmlPart($null);
|
|
}
|
|
break;
|
|
|
|
case $html && !$attachments && $html_images:
|
|
// * Content-Type: multipart/alternative;
|
|
// * text
|
|
// * Content-Type: multipart/related;
|
|
// * html
|
|
// * image...
|
|
if (isset($this->_txtbody)) {
|
|
$message =& $this->_addAlternativePart($null);
|
|
$this->_addTextPart($message, $this->_txtbody);
|
|
|
|
$ht =& $this->_addRelatedPart($message);
|
|
$this->_addHtmlPart($ht);
|
|
for ($i = 0; $i < count($this->_html_images); $i++) {
|
|
$this->_addHtmlImagePart($ht, $this->_html_images[$i]);
|
|
}
|
|
} else {
|
|
// * Content-Type: multipart/related;
|
|
// * html
|
|
// * image...
|
|
$message =& $this->_addRelatedPart($null);
|
|
$this->_addHtmlPart($message);
|
|
for ($i = 0; $i < count($this->_html_images); $i++) {
|
|
$this->_addHtmlImagePart($message, $this->_html_images[$i]);
|
|
}
|
|
}
|
|
/*
|
|
// #13444, #9725: the code below was a non-RFC compliant hack
|
|
// * Content-Type: multipart/related;
|
|
// * Content-Type: multipart/alternative;
|
|
// * text
|
|
// * html
|
|
// * image...
|
|
$message =& $this->_addRelatedPart($null);
|
|
if (isset($this->_txtbody)) {
|
|
$alt =& $this->_addAlternativePart($message);
|
|
$this->_addTextPart($alt, $this->_txtbody);
|
|
$this->_addHtmlPart($alt);
|
|
} else {
|
|
$this->_addHtmlPart($message);
|
|
}
|
|
for ($i = 0; $i < count($this->_html_images); $i++) {
|
|
$this->_addHtmlImagePart($message, $this->_html_images[$i]);
|
|
}
|
|
*/
|
|
break;
|
|
|
|
case $html && $attachments && !$html_images:
|
|
$message =& $this->_addMixedPart();
|
|
if (isset($this->_txtbody)) {
|
|
$alt =& $this->_addAlternativePart($message);
|
|
$this->_addTextPart($alt, $this->_txtbody);
|
|
$this->_addHtmlPart($alt);
|
|
} else {
|
|
$this->_addHtmlPart($message);
|
|
}
|
|
for ($i = 0; $i < count($this->_parts); $i++) {
|
|
$this->_addAttachmentPart($message, $this->_parts[$i]);
|
|
}
|
|
break;
|
|
|
|
case $html && $attachments && $html_images:
|
|
$message =& $this->_addMixedPart();
|
|
if (isset($this->_txtbody)) {
|
|
$alt =& $this->_addAlternativePart($message);
|
|
$this->_addTextPart($alt, $this->_txtbody);
|
|
$rel =& $this->_addRelatedPart($alt);
|
|
} else {
|
|
$rel =& $this->_addRelatedPart($message);
|
|
}
|
|
$this->_addHtmlPart($rel);
|
|
for ($i = 0; $i < count($this->_html_images); $i++) {
|
|
$this->_addHtmlImagePart($rel, $this->_html_images[$i]);
|
|
}
|
|
for ($i = 0; $i < count($this->_parts); $i++) {
|
|
$this->_addAttachmentPart($message, $this->_parts[$i]);
|
|
}
|
|
break;
|
|
|
|
}
|
|
|
|
if (!isset($message)) {
|
|
$ret = null;
|
|
return $ret;
|
|
}
|
|
|
|
// Use saved boundary
|
|
if (!empty($this->_build_params['boundary'])) {
|
|
$boundary = $this->_build_params['boundary'];
|
|
} else {
|
|
$boundary = null;
|
|
}
|
|
|
|
// Write output to file
|
|
if ($filename) {
|
|
// Append mimePart message headers and body into file
|
|
$headers = $message->encodeToFile($filename, $boundary, $skip_head);
|
|
if (PEAR::isError($headers)) {
|
|
return $headers;
|
|
}
|
|
$this->_headers = array_merge($this->_headers, $headers);
|
|
$ret = null;
|
|
return $ret;
|
|
} else {
|
|
$output = $message->encode($boundary, $skip_head);
|
|
if (PEAR::isError($output)) {
|
|
return $output;
|
|
}
|
|
$this->_headers = array_merge($this->_headers, $output['headers']);
|
|
$body = $output['body'];
|
|
return $body;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Returns an array with the headers needed to prepend to the email
|
|
* (MIME-Version and Content-Type). Format of argument is:
|
|
* $array['header-name'] = 'header-value';
|
|
*
|
|
* @param array $xtra_headers Assoc array with any extra headers (optional)
|
|
* @param bool $overwrite Overwrite already existing headers.
|
|
* @param bool $skip_content Don't return content headers: Content-Type,
|
|
* Content-Disposition and Content-Transfer-Encoding
|
|
*
|
|
* @return array Assoc array with the mime headers
|
|
* @access public
|
|
*/
|
|
function &headers($xtra_headers = null, $overwrite = false, $skip_content = false)
|
|
{
|
|
// Add mime version header
|
|
$headers['MIME-Version'] = '1.0';
|
|
|
|
// Content-Type and Content-Transfer-Encoding headers should already
|
|
// be present if get() was called, but we'll re-set them to make sure
|
|
// we got them when called before get() or something in the message
|
|
// has been changed after get() [#14780]
|
|
if (!$skip_content) {
|
|
$headers += $this->_contentHeaders();
|
|
}
|
|
|
|
if (!empty($xtra_headers)) {
|
|
$headers = array_merge($headers, $xtra_headers);
|
|
}
|
|
|
|
if ($overwrite) {
|
|
$this->_headers = array_merge($this->_headers, $headers);
|
|
} else {
|
|
$this->_headers = array_merge($headers, $this->_headers);
|
|
}
|
|
|
|
$headers = $this->_headers;
|
|
|
|
if ($skip_content) {
|
|
unset($headers['Content-Type']);
|
|
unset($headers['Content-Transfer-Encoding']);
|
|
unset($headers['Content-Disposition']);
|
|
}
|
|
|
|
$encodedHeaders = $this->_encodeHeaders($headers);
|
|
return $encodedHeaders;
|
|
}
|
|
|
|
/**
|
|
* Get the text version of the headers
|
|
* (usefull if you want to use the PHP mail() function)
|
|
*
|
|
* @param array $xtra_headers Assoc array with any extra headers (optional)
|
|
* @param bool $overwrite Overwrite the existing headers with new.
|
|
* @param bool $skip_content Don't return content headers: Content-Type,
|
|
* Content-Disposition and Content-Transfer-Encoding
|
|
*
|
|
* @return string Plain text headers
|
|
* @access public
|
|
*/
|
|
function txtHeaders($xtra_headers = null, $overwrite = false, $skip_content = false)
|
|
{
|
|
$headers = $this->headers($xtra_headers, $overwrite, $skip_content);
|
|
|
|
// Place Received: headers at the beginning of the message
|
|
// Spam detectors often flag messages with it after the Subject: as spam
|
|
if (isset($headers['Received'])) {
|
|
$received = $headers['Received'];
|
|
unset($headers['Received']);
|
|
$headers = array('Received' => $received) + $headers;
|
|
}
|
|
|
|
$ret = '';
|
|
$eol = $this->_build_params['eol'];
|
|
|
|
foreach ($headers as $key => $val) {
|
|
if (is_array($val)) {
|
|
foreach ($val as $value) {
|
|
$ret .= "$key: $value" . $eol;
|
|
}
|
|
} else {
|
|
$ret .= "$key: $val" . $eol;
|
|
}
|
|
}
|
|
|
|
return $ret;
|
|
}
|
|
|
|
/**
|
|
* Sets the Subject header
|
|
*
|
|
* @param string $subject String to set the subject to.
|
|
*
|
|
* @return void
|
|
* @access public
|
|
*/
|
|
function setSubject($subject)
|
|
{
|
|
$this->_headers['Subject'] = $subject;
|
|
}
|
|
|
|
/**
|
|
* Set an email to the From (the sender) header
|
|
*
|
|
* @param string $email The email address to use
|
|
*
|
|
* @return void
|
|
* @access public
|
|
*/
|
|
function setFrom($email)
|
|
{
|
|
$this->_headers['From'] = $email;
|
|
}
|
|
|
|
/**
|
|
* Add an email to the Cc (carbon copy) header
|
|
* (multiple calls to this method are allowed)
|
|
*
|
|
* @param string $email The email direction to add
|
|
*
|
|
* @return void
|
|
* @access public
|
|
*/
|
|
function addCc($email)
|
|
{
|
|
if (isset($this->_headers['Cc'])) {
|
|
$this->_headers['Cc'] .= ", $email";
|
|
} else {
|
|
$this->_headers['Cc'] = $email;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Add an email to the Bcc (blank carbon copy) header
|
|
* (multiple calls to this method are allowed)
|
|
*
|
|
* @param string $email The email direction to add
|
|
*
|
|
* @return void
|
|
* @access public
|
|
*/
|
|
function addBcc($email)
|
|
{
|
|
if (isset($this->_headers['Bcc'])) {
|
|
$this->_headers['Bcc'] .= ", $email";
|
|
} else {
|
|
$this->_headers['Bcc'] = $email;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Since the PHP send function requires you to specify
|
|
* recipients (To: header) separately from the other
|
|
* headers, the To: header is not properly encoded.
|
|
* To fix this, you can use this public method to
|
|
* encode your recipients before sending to the send
|
|
* function
|
|
*
|
|
* @param string $recipients A comma-delimited list of recipients
|
|
*
|
|
* @return string Encoded data
|
|
* @access public
|
|
*/
|
|
function encodeRecipients($recipients)
|
|
{
|
|
$input = array("To" => $recipients);
|
|
$retval = $this->_encodeHeaders($input);
|
|
return $retval["To"] ;
|
|
}
|
|
|
|
/**
|
|
* Encodes headers as per RFC2047
|
|
*
|
|
* @param array $input The header data to encode
|
|
* @param array $params Extra build parameters
|
|
*
|
|
* @return array Encoded data
|
|
* @access private
|
|
*/
|
|
function _encodeHeaders($input, $params = array())
|
|
{
|
|
$build_params = $this->_build_params;
|
|
while (list($key, $value) = each($params)) {
|
|
$build_params[$key] = $value;
|
|
}
|
|
|
|
foreach ($input as $hdr_name => $hdr_value) {
|
|
if (is_array($hdr_value)) {
|
|
foreach ($hdr_value as $idx => $value) {
|
|
$input[$hdr_name][$idx] = $this->encodeHeader(
|
|
$hdr_name, $value,
|
|
$build_params['head_charset'], $build_params['head_encoding']
|
|
);
|
|
}
|
|
} else {
|
|
$input[$hdr_name] = $this->encodeHeader(
|
|
$hdr_name, $hdr_value,
|
|
$build_params['head_charset'], $build_params['head_encoding']
|
|
);
|
|
}
|
|
}
|
|
|
|
return $input;
|
|
}
|
|
|
|
/**
|
|
* Encodes a header as per RFC2047
|
|
*
|
|
* @param string $name The header name
|
|
* @param string $value The header data to encode
|
|
* @param string $charset Character set name
|
|
* @param string $encoding Encoding name (base64 or quoted-printable)
|
|
*
|
|
* @return string Encoded header data (without a name)
|
|
* @access public
|
|
* @since 1.5.3
|
|
*/
|
|
function encodeHeader($name, $value, $charset, $encoding)
|
|
{
|
|
// Structured headers
|
|
$comma_headers = array(
|
|
'from', 'to', 'cc', 'bcc', 'sender', 'reply-to',
|
|
'resent-from', 'resent-to', 'resent-cc', 'resent-bcc',
|
|
'resent-sender', 'resent-reply-to',
|
|
'return-receipt-to', 'disposition-notification-to',
|
|
);
|
|
$other_headers = array(
|
|
'references', 'in-reply-to', 'message-id', 'resent-message-id',
|
|
);
|
|
|
|
$name = strtolower($name);
|
|
$eol = $this->_build_params['eol'];
|
|
|
|
if (in_array($name, $comma_headers)) {
|
|
$separator = ',';
|
|
} else if (in_array($name, $other_headers)) {
|
|
$separator = ' ';
|
|
}
|
|
|
|
if (!$charset) {
|
|
$charset = 'ISO-8859-1';
|
|
}
|
|
|
|
// Structured header (make sure addr-spec inside is not encoded)
|
|
if (!empty($separator)) {
|
|
$parts = $this->_explodeQuotedString($separator, $value);
|
|
$value = '';
|
|
|
|
foreach ($parts as $part) {
|
|
$part = preg_replace('/\r?\n[\s\t]*/', $eol . ' ', $part);
|
|
$part = trim($part);
|
|
|
|
if (!$part) {
|
|
continue;
|
|
}
|
|
if ($value) {
|
|
$value .= $separator==',' ? $separator.' ' : ' ';
|
|
} else {
|
|
$value = $name . ': ';
|
|
}
|
|
|
|
// let's find phrase (name) and/or addr-spec
|
|
if (preg_match('/^<\S+@\S+>$/', $part)) {
|
|
$value .= $part;
|
|
} else if (preg_match('/^\S+@\S+$/', $part)) {
|
|
// address without brackets and without name
|
|
$value .= $part;
|
|
} else if (preg_match('/<*\S+@\S+>*$/', $part, $matches)) {
|
|
// address with name (handle name)
|
|
$address = $matches[0];
|
|
$word = str_replace($address, '', $part);
|
|
$word = trim($word);
|
|
// check if phrase requires quoting
|
|
if ($word) {
|
|
// non-ASCII: require encoding
|
|
if (preg_match('#([\x80-\xFF]){1}#', $word)) {
|
|
if ($word[0] == '"' && $word[strlen($word)-1] == '"') {
|
|
// de-quote quoted-string, encoding changes
|
|
// string to atom
|
|
$search = array("\\\"", "\\\\");
|
|
$replace = array("\"", "\\");
|
|
$word = str_replace($search, $replace, $word);
|
|
$word = substr($word, 1, -1);
|
|
}
|
|
// find length of last line
|
|
if (($pos = strrpos($value, $eol)) !== false) {
|
|
$last_len = strlen($value) - $pos;
|
|
} else {
|
|
$last_len = strlen($value);
|
|
}
|
|
$word = $this->_encodeString(
|
|
$word, $charset, $encoding, $last_len
|
|
);
|
|
} else if (($word[0] != '"' || $word[strlen($word)-1] != '"')
|
|
&& preg_match('/[\(\)\<\>\\\.\[\]@,;:"]/', $word)
|
|
) {
|
|
// ASCII: quote string if needed
|
|
$word = '"'.addcslashes($word, '\\"').'"';
|
|
}
|
|
}
|
|
$value .= $word.' '.$address;
|
|
} else {
|
|
// addr-spec not found, don't encode (?)
|
|
$value .= $part;
|
|
}
|
|
|
|
// RFC2822 recommends 78 characters limit, use 76 from RFC2047
|
|
$value = wordwrap($value, 76, $eol . ' ');
|
|
}
|
|
|
|
// remove header name prefix (there could be EOL too)
|
|
$value = preg_replace(
|
|
'/^'.$name.':('.preg_quote($eol, '/').')* /', '', $value
|
|
);
|
|
|
|
} else {
|
|
// Unstructured header
|
|
// non-ASCII: require encoding
|
|
if (preg_match('#([\x80-\xFF]){1}#', $value)) {
|
|
if ($value[0] == '"' && $value[strlen($value)-1] == '"') {
|
|
// de-quote quoted-string, encoding changes
|
|
// string to atom
|
|
$search = array("\\\"", "\\\\");
|
|
$replace = array("\"", "\\");
|
|
$value = str_replace($search, $replace, $value);
|
|
$value = substr($value, 1, -1);
|
|
}
|
|
$value = $this->_encodeString(
|
|
$value, $charset, $encoding, strlen($name) + 2
|
|
);
|
|
} else if (strlen($name.': '.$value) > 78) {
|
|
// ASCII: check if header line isn't too long and use folding
|
|
$value = preg_replace('/\r?\n[\s\t]*/', $eol . ' ', $value);
|
|
$tmp = wordwrap($name.': '.$value, 78, $eol . ' ');
|
|
$value = preg_replace('/^'.$name.':\s*/', '', $tmp);
|
|
// hard limit 998 (RFC2822)
|
|
$value = wordwrap($value, 998, $eol . ' ', true);
|
|
}
|
|
}
|
|
|
|
return $value;
|
|
}
|
|
|
|
/**
|
|
* Encodes a header value as per RFC2047
|
|
*
|
|
* @param string $value The header data to encode
|
|
* @param string $charset Character set name
|
|
* @param string $encoding Encoding name (base64 or quoted-printable)
|
|
* @param int $prefix_len Prefix length
|
|
*
|
|
* @return string Encoded header data
|
|
* @access private
|
|
*/
|
|
function _encodeString($value, $charset, $encoding, $prefix_len=0)
|
|
{
|
|
if ($encoding == 'base64') {
|
|
// Base64 encode the entire string
|
|
$value = base64_encode($value);
|
|
|
|
// Generate the header using the specified params and dynamicly
|
|
// determine the maximum length of such strings.
|
|
// 75 is the value specified in the RFC.
|
|
$prefix = '=?' . $charset . '?B?';
|
|
$suffix = '?=';
|
|
$maxLength = 75 - strlen($prefix . $suffix) - 2;
|
|
$maxLength1stLine = $maxLength - $prefix_len;
|
|
|
|
// We can cut base4 every 4 characters, so the real max
|
|
// we can get must be rounded down.
|
|
$maxLength = $maxLength - ($maxLength % 4);
|
|
$maxLength1stLine = $maxLength1stLine - ($maxLength1stLine % 4);
|
|
|
|
$cutpoint = $maxLength1stLine;
|
|
$value_out = $value;
|
|
$output = '';
|
|
while ($value_out) {
|
|
// Split translated string at every $maxLength
|
|
$part = substr($value_out, 0, $cutpoint);
|
|
$value_out = substr($value_out, $cutpoint);
|
|
$cutpoint = $maxLength;
|
|
// RFC 2047 specifies that any split header should
|
|
// be seperated by a CRLF SPACE.
|
|
if ($output) {
|
|
$output .= $this->_build_params['eol'] . ' ';
|
|
}
|
|
$output .= $prefix . $part . $suffix;
|
|
}
|
|
$value = $output;
|
|
} else {
|
|
// quoted-printable encoding has been selected
|
|
$value = Mail_mimePart::encodeQP($value);
|
|
|
|
// Generate the header using the specified params and dynamicly
|
|
// determine the maximum length of such strings.
|
|
// 75 is the value specified in the RFC.
|
|
$prefix = '=?' . $charset . '?Q?';
|
|
$suffix = '?=';
|
|
$maxLength = 75 - strlen($prefix . $suffix) - 3;
|
|
$maxLength1stLine = $maxLength - $prefix_len;
|
|
$maxLength = $maxLength - 1;
|
|
|
|
// This regexp will break QP-encoded text at every $maxLength
|
|
// but will not break any encoded letters.
|
|
$reg1st = "|(.{0,$maxLength1stLine}[^\=][^\=])|";
|
|
$reg2nd = "|(.{0,$maxLength}[^\=][^\=])|";
|
|
|
|
$value_out = $value;
|
|
$realMax = $maxLength1stLine + strlen($prefix . $suffix);
|
|
if (strlen($value_out) >= $realMax) {
|
|
// Begin with the regexp for the first line.
|
|
$reg = $reg1st;
|
|
$output = '';
|
|
while ($value_out) {
|
|
// Split translated string at every $maxLength
|
|
// But make sure not to break any translated chars.
|
|
$found = preg_match($reg, $value_out, $matches);
|
|
|
|
// After this first line, we need to use a different
|
|
// regexp for the first line.
|
|
$reg = $reg2nd;
|
|
|
|
// Save the found part and encapsulate it in the
|
|
// prefix & suffix. Then remove the part from the
|
|
// $value_out variable.
|
|
if ($found) {
|
|
$part = $matches[0];
|
|
$len = strlen($matches[0]);
|
|
$value_out = substr($value_out, $len);
|
|
} else {
|
|
$part = $value_out;
|
|
$value_out = "";
|
|
}
|
|
|
|
// RFC 2047 specifies that any split header should
|
|
// be seperated by a CRLF SPACE
|
|
if ($output) {
|
|
$output .= $this->_build_params['eol'] . ' ';
|
|
}
|
|
$output .= $prefix . $part . $suffix;
|
|
}
|
|
$value_out = $output;
|
|
} else {
|
|
$value_out = $prefix . $value_out . $suffix;
|
|
}
|
|
$value = $value_out;
|
|
}
|
|
|
|
return $value;
|
|
}
|
|
|
|
/**
|
|
* Explode quoted string
|
|
*
|
|
* @param string $delimiter Delimiter expression string for preg_match()
|
|
* @param string $string Input string
|
|
*
|
|
* @return array String tokens array
|
|
* @access private
|
|
*/
|
|
function _explodeQuotedString($delimiter, $string)
|
|
{
|
|
$result = array();
|
|
$strlen = strlen($string);
|
|
|
|
for ($q=$p=$i=0; $i < $strlen; $i++) {
|
|
if ($string[$i] == "\""
|
|
&& (empty($string[$i-1]) || $string[$i-1] != "\\")
|
|
) {
|
|
$q = $q ? false : true;
|
|
} else if (!$q && preg_match("/$delimiter/", $string[$i])) {
|
|
$result[] = substr($string, $p, $i - $p);
|
|
$p = $i + 1;
|
|
}
|
|
}
|
|
|
|
$result[] = substr($string, $p);
|
|
return $result;
|
|
}
|
|
|
|
/**
|
|
* Get file's basename (locale independent)
|
|
*
|
|
* @param string $filename Filename
|
|
*
|
|
* @return string Basename
|
|
* @access private
|
|
*/
|
|
function _basename($filename)
|
|
{
|
|
// basename() is not unicode safe and locale dependent
|
|
if (stristr(PHP_OS, 'win') || stristr(PHP_OS, 'netware')) {
|
|
return preg_replace('/^.*[\\\\\\/]/', '', $filename);
|
|
} else {
|
|
return preg_replace('/^.*[\/]/', '', $filename);
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Get Content-Type and Content-Transfer-Encoding headers of the message
|
|
*
|
|
* @return array Headers array
|
|
* @access private
|
|
*/
|
|
function _contentHeaders()
|
|
{
|
|
$attachments = count($this->_parts) ? true : false;
|
|
$html_images = count($this->_html_images) ? true : false;
|
|
$html = strlen($this->_htmlbody) ? true : false;
|
|
$text = (!$html && strlen($this->_txtbody)) ? true : false;
|
|
$headers = array();
|
|
|
|
// See get()
|
|
switch (true) {
|
|
case $text && !$attachments:
|
|
$headers['Content-Type'] = 'text/plain';
|
|
break;
|
|
|
|
case !$text && !$html && $attachments:
|
|
case $text && $attachments:
|
|
case $html && $attachments && !$html_images:
|
|
case $html && $attachments && $html_images:
|
|
$headers['Content-Type'] = 'multipart/mixed';
|
|
break;
|
|
|
|
case $html && !$attachments && !$html_images && isset($this->_txtbody):
|
|
case $html && !$attachments && $html_images && isset($this->_txtbody):
|
|
$headers['Content-Type'] = 'multipart/alternative';
|
|
break;
|
|
|
|
case $html && !$attachments && !$html_images && !isset($this->_txtbody):
|
|
$headers['Content-Type'] = 'text/html';
|
|
break;
|
|
|
|
case $html && !$attachments && $html_images && !isset($this->_txtbody):
|
|
$headers['Content-Type'] = 'multipart/related';
|
|
break;
|
|
|
|
default:
|
|
return $headers;
|
|
}
|
|
|
|
$eol = !empty($this->_build_params['eol'])
|
|
? $this->_build_params['eol'] : "\r\n";
|
|
|
|
if ($headers['Content-Type'] == 'text/plain') {
|
|
// single-part message: add charset and encoding
|
|
$headers['Content-Type']
|
|
.= ";$eol charset=" . $this->_build_params['text_charset'];
|
|
$headers['Content-Transfer-Encoding']
|
|
= $this->_build_params['text_encoding'];
|
|
} else if ($headers['Content-Type'] == 'text/html') {
|
|
// single-part message: add charset and encoding
|
|
$headers['Content-Type']
|
|
.= ";$eol charset=" . $this->_build_params['html_charset'];
|
|
$headers['Content-Transfer-Encoding']
|
|
= $this->_build_params['html_encoding'];
|
|
} else {
|
|
// multipart message: add charset and boundary
|
|
if (!empty($this->_build_params['boundary'])) {
|
|
$boundary = $this->_build_params['boundary'];
|
|
} else if (!empty($this->_headers['Content-Type'])
|
|
&& preg_match('/boundary="([^"]+)"/', $this->_headers['Content-Type'], $m)
|
|
) {
|
|
$boundary = $m[1];
|
|
} else {
|
|
$boundary = '=_' . md5(rand() . microtime());
|
|
}
|
|
|
|
$this->_build_params['boundary'] = $boundary;
|
|
$headers['Content-Type'] .= ";$eol boundary=\"$boundary\"";
|
|
}
|
|
|
|
return $headers;
|
|
}
|
|
|
|
} // End of class
|