githubFork/roundcubemail.git

			@@ -1,125 +1,115 @@
			<?php
			// +-----------------------------------------------------------------------+
			// \| Copyright (c) 2002-2003 Richard Heyes \|
			// \| All rights reserved. \|
			// \| \|
			// \| Redistribution and use in source and binary forms, with or without \|
			// \| modification, are permitted provided that the following conditions \|
			// \| are met: \|
			// \| \|
			// \| o Redistributions of source code must retain the above copyright \|
			// \| notice, this list of conditions and the following disclaimer. \|
			// \| o 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.\|
			// \| o The names of the authors may not 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. \|
			// \| \|
			// +-----------------------------------------------------------------------+
			// \| Author: Richard Heyes <richard@phpguru.org> \|
			// +-----------------------------------------------------------------------+
			/**
			* The Mail_mimePart class is used to create MIME E-mail messages
			*
			* This class enables you to manipulate and build a mime email
			* from the ground up. The Mail_Mime class is a userfriendly api
			* to this class for people who aren't interested in the internals
			* of mime mail.
			* This class however allows full control over the email.
			*
			* 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 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 CVS: $Id$
			* @link http://pear.php.net/package/Mail_mime
			*/


			/**
			*
			* Raw mime encoding class
			*
			* What is it?
			* This class enables you to manipulate and build
			* a mime email from the ground up.
			*
			* Why use this instead of mime.php?
			* mime.php is a userfriendly api to this class for
			* people who aren't interested in the internals of
			* mime mail. This class however allows full control
			* over the email.
			*
			* Eg.
			*
			* // Since multipart/mixed has no real body, (the body is
			* // the subpart), we set the body argument to blank.
			*
			* $params['content_type'] = 'multipart/mixed';
			* $email = new Mail_mimePart('', $params);
			*
			* // Here we add a text part to the multipart we have
			* // already. Assume $body contains plain text.
			*
			* $params['content_type'] = 'text/plain';
			* $params['encoding'] = '7bit';
			* $text = $email->addSubPart($body, $params);
			*
			* // Now add an attachment. Assume $attach is
			* the contents of the attachment
			*
			* $params['content_type'] = 'application/zip';
			* $params['encoding'] = 'base64';
			* $params['disposition'] = 'attachment';
			* $params['dfilename'] = 'example.zip';
			* $attach =& $email->addSubPart($body, $params);
			*
			* // Now build the email. Note that the encode
			* // function returns an associative array containing two
			* // elements, body and headers. You will need to add extra
			* // headers, (eg. Mime-Version) before sending.
			*
			* $email = $message->encode();
			* $email['headers'][] = 'Mime-Version: 1.0';
			*
			*
			* Further examples are available at http://www.phpguru.org
			*
			* TODO:
			* - Set encode() to return the $obj->encoded if encode()
			* has already been run. Unless a flag is passed to specifically
			* re-build the message.
			*
			* @author Richard Heyes <richard@phpguru.org>
			* @version $Revision$
			* @package Mail
			*/

			* The Mail_mimePart class is used to create MIME E-mail messages
			*
			* This class enables you to manipulate and build a mime email
			* from the ground up. The Mail_Mime class is a userfriendly api
			* to this class for people who aren't interested in the internals
			* of mime mail.
			* This class however allows full control over the email.
			*
			* @category Mail
			* @package Mail_Mime
			* @author Richard Heyes <richard@phpguru.org>
			* @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_mimePart {

			/**
			* The encoding type of this part
			*
			* @var string
			* @access private
			*/
			var $_encoding;

			/**
			* An array of subparts
			*
			* @var array
			* @access private
			*/
			var $_subparts;

			/**
			* The output of this part after being built
			*
			* @var string
			* @access private
			*/
			var $_encoded;

			/**
			* Headers for this part
			*
			* @var array
			* @access private
			*/
			var $_headers;

			/**
			* The body of this part (not encoded)
			*
			* @var string
			* @access private
			*/
			var $_body;

			@@ -145,10 +135,13 @@
			define('MAIL_MIMEPART_CRLF', defined('MAIL_MIME_CRLF') ? MAIL_MIME_CRLF : "\r\n", TRUE);
			}

			$contentType = array();
			$contentDisp = array();
			foreach ($params as $key => $value) {
			switch ($key) {
			case 'content_type':
			$headers['Content-Type'] = $value . (isset($charset) ? '; charset="' . $charset . '"' : '');
			$contentType['type'] = $value;
			//$headers['Content-Type'] = $value . (isset($charset) ? '; charset="' . $charset . '"' : '');
			break;

			case 'encoding':
			@@ -161,15 +154,12 @@
			break;

			case 'disposition':
			$headers['Content-Disposition'] = $value . (isset($dfilename) ? '; filename="' . $dfilename . '"' : '');
			$contentDisp['disp'] = $value;
			break;

			case 'dfilename':
			if (isset($headers['Content-Disposition'])) {
			$headers['Content-Disposition'] .= '; filename="' . $value . '"';
			} else {
			$dfilename = $value;
			}
			$contentDisp['filename'] = $value;
			$contentType['name'] = $value;
			break;

			case 'description':
			@@ -177,15 +167,47 @@
			break;

			case 'charset':
			if (isset($headers['Content-Type'])) {
			$headers['Content-Type'] .= '; charset="' . $value . '"';
			} else {
			$charset = $value;
			}
			$contentType['charset'] = $value;
			$contentDisp['charset'] = $value;
			break;

			case 'language':
			$contentType['language'] = $value;
			$contentDisp['language'] = $value;
			break;

			case 'location':
			$headers['Content-Location'] = $value;
			break;

			}
			}
			if (isset($contentType['type'])) {
			$headers['Content-Type'] = $contentType['type'];
			if (isset($contentType['name'])) {
			$headers['Content-Type'] .= ';' . MAIL_MIMEPART_CRLF;
			$headers['Content-Type'] .= $this->_buildHeaderParam('name', $contentType['name'],
			isset($contentType['charset']) ? $contentType['charset'] : 'US-ASCII',
			isset($contentType['language']) ? $contentType['language'] : NULL);
			} elseif (isset($contentType['charset'])) {
			$headers['Content-Type'] .= "; charset=\"{$contentType['charset']}\"";
			}
			}


			if (isset($contentDisp['disp'])) {
			$headers['Content-Disposition'] = $contentDisp['disp'];
			if (isset($contentDisp['filename'])) {
			$headers['Content-Disposition'] .= ';' . MAIL_MIMEPART_CRLF;
			$headers['Content-Disposition'] .= $this->_buildHeaderParam('filename', $contentDisp['filename'],
			isset($contentDisp['charset']) ? $contentDisp['charset'] : 'US-ASCII',
			isset($contentDisp['language']) ? $contentDisp['language'] : NULL);
			}
			}




			// Default content-type
			if (!isset($headers['Content-Type'])) {
			$headers['Content-Type'] = 'text/plain';
			@@ -217,7 +239,7 @@
			{
			$encoded =& $this->_encoded;

			if (!empty($this->_subparts)) {
			if (count($this->_subparts)) {
			srand((double)microtime()*1000000);
			$boundary = '=_' . md5(rand() . microtime());
			$this->_headers['Content-Type'] .= ';' . MAIL_MIMEPART_CRLF . "\t" . 'boundary="' . $boundary . '"';
			@@ -229,15 +251,15 @@
			foreach ($tmp['headers'] as $key => $value) {
			$headers[] = $key . ': ' . $value;
			}
			$subparts[] = implode(MAIL_MIMEPART_CRLF, $headers) . MAIL_MIMEPART_CRLF . MAIL_MIMEPART_CRLF . $tmp['body'];
			$subparts[] = implode(MAIL_MIMEPART_CRLF, $headers) . MAIL_MIMEPART_CRLF . MAIL_MIMEPART_CRLF . $tmp['body'] . MAIL_MIMEPART_CRLF;
			}

			$encoded['body'] = '--' . $boundary . MAIL_MIMEPART_CRLF .
			implode('--' . $boundary . MAIL_MIMEPART_CRLF, $subparts) .
			$encoded['body'] = '--' . $boundary . MAIL_MIMEPART_CRLF .
			rtrim(implode('--' . $boundary . MAIL_MIMEPART_CRLF , $subparts), MAIL_MIMEPART_CRLF) . MAIL_MIMEPART_CRLF .
			'--' . $boundary.'--' . MAIL_MIMEPART_CRLF;

			} else {
			$encoded['body'] = $this->_getEncodedData($this->_body, $this->_encoding) . MAIL_MIMEPART_CRLF;
			$encoded['body'] = $this->_getEncodedData($this->_body, $this->_encoding);
			}

			// Add headers to $encoded
			@@ -299,7 +321,7 @@
			}

			/**
			* quoteadPrintableEncode()
			* quotedPrintableEncode()
			*
			* Encodes data to quoted-printable standard.
			*
			@@ -316,26 +338,35 @@
			$escape = '=';
			$output = '';

			while(list(, $line) = each($lines)){
			while (list(, $line) = each($lines)) {

			$linlen = strlen($line);
			$line = preg_split('\|\|', $line, -1, PREG_SPLIT_NO_EMPTY);
			$linlen = count($line);
			$newline = '';

			for ($i = 0; $i < $linlen; $i++) {
			$char = substr($line, $i, 1);
			$char = $line[$i];
			$dec = ord($char);

			if (($dec == 32) AND ($i == ($linlen - 1))){ // convert space at eol only
			if (($dec == 32) AND ($i == ($linlen - 1))) { // convert space at eol only
			$char = '=20';

			} elseif(($dec == 9) AND ($i == ($linlen - 1))) { // convert tab at eol only
			} elseif (($dec == 9) AND ($i == ($linlen - 1))) { // convert tab at eol only
			$char = '=09';
			} elseif($dec == 9) {
			} elseif ($dec == 9) {
			; // Do nothing if a tab.
			} elseif(($dec == 61) OR ($dec < 32 ) OR ($dec > 126)) {
			} elseif (($dec == 61) OR ($dec < 32 ) OR ($dec > 126)) {
			$char = $escape . strtoupper(sprintf('%02s', dechex($dec)));
			} elseif (($dec == 46) AND (($newline == '') \|\| ((strlen($newline) + strlen("=2E")) >= $line_max))) {
			//Bug #9722: convert full-stop at bol,
			//some Windows servers need this, won't break anything (cipri)
			//Bug #11731: full-stop at bol also needs to be encoded
			//if this line would push us over the line_max limit.
			$char = '=2E';
			}

			//Note, when changing this line, also change the ($dec == 46)
			//check line, as it mimics this line due to Bug #11731
			if ((strlen($newline) + strlen($char)) >= $line_max) { // MAIL_MIMEPART_CRLF is not counted
			$output .= $newline . $escape . $eol; // soft line break; " =\r\n" is okay
			$newline = '';
			@@ -347,5 +378,66 @@
			$output = substr($output, 0, -1 * strlen($eol)); // Don't want last crlf
			return $output;
			}

			/**
			* _buildHeaderParam()
			*
			* Encodes the paramater of a header.
			*
			* @param $name The name of the header-parameter
			* @param $value The value of the paramter
			* @param $charset The characterset of $value
			* @param $language The language used in $value
			* @param $maxLength The maximum length of a line. Defauls to 75
			*
			* @access private
			*/
			function _buildHeaderParam($name, $value, $charset=NULL, $language=NULL, $maxLength=75)
			{
			//If we find chars to encode, or if charset or language
			//is not any of the defaults, we need to encode the value.
			$shouldEncode = 0;
			$secondAsterisk = '';
			if (preg_match('#([\x80-\xFF]){1}#', $value)) {
			$shouldEncode = 1;
			} elseif ($charset && (strtolower($charset) != 'us-ascii')) {
			$shouldEncode = 1;
			} elseif ($language && ($language != 'en' && $language != 'en-us')) {
			$shouldEncode = 1;
			}
			if ($shouldEncode) {
			$search = array('%', ' ', "\t");
			$replace = array('%25', '%20', '%09');
			$encValue = str_replace($search, $replace, $value);
			$encValue = preg_replace('#([\x80-\xFF])#e', '"%" . strtoupper(dechex(ord("\1")))', $encValue);
			$value = "$charset'$language'$encValue";
			$secondAsterisk = '*';
			}
			$header = " {$name}{$secondAsterisk}=\"{$value}\"; ";
			if (strlen($header) <= $maxLength) {
			return $header;
			}

			$preLength = strlen(" {$name}*0{$secondAsterisk}=\"");
			$sufLength = strlen("\";");
			$maxLength = MAX(16, $maxLength - $preLength - $sufLength - 2);
			$maxLengthReg = "\|(.{0,$maxLength}[^\%][^\%])\|";

			$headers = array();
			$headCount = 0;
			while ($value) {
			$matches = array();
			$found = preg_match($maxLengthReg, $value, $matches);
			if ($found) {
			$headers[] = " {$name}*{$headCount}{$secondAsterisk}=\"{$matches[0]}\"";
			$value = substr($value, strlen($matches[0]));
			} else {
			$headers[] = " {$name}*{$headCount}{$secondAsterisk}=\"{$value}\"";
			$value = "";
			}
			$headCount++;
			}
			$headers = implode(MAIL_MIMEPART_CRLF, $headers) . ';';
			return $headers;
			}
			} // End of class
			?>