204 Zeilen
5.4 KiB
PHP
204 Zeilen
5.4 KiB
PHP
<?php
|
|
/* vim: set expandtab tabstop=4 shiftwidth=4 softtabstop=4: */
|
|
|
|
/**
|
|
* Send the files attached to a mail.
|
|
*
|
|
* PHP versions 4 and 5
|
|
*
|
|
* This library is free software; you can redistribute it and/or
|
|
* modify it under the terms of the GNU Lesser General Public
|
|
* License as published by the Free Software Foundation; either
|
|
* version 2.1 of the License, or (at your option) any later version.
|
|
*
|
|
* This library is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
* Lesser General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU Lesser General Public
|
|
* License along with this library; if not, write to the Free Software
|
|
* Foundation, Inc., 59 Temple Place, Suite 330,Boston,MA 02111-1307 USA
|
|
*
|
|
* @category File Formats
|
|
* @package File_Archive
|
|
* @author Vincent Lascaux <vincentlascaux@php.net>
|
|
* @copyright 1997-2005 The PHP Group
|
|
* @license http://www.gnu.org/copyleft/lesser.html LGPL
|
|
* @version CVS: $Id: Mail.php 2 2010-11-23 14:32:26Z oldperl $
|
|
* @link http://pear.php.net/package/File_Archive
|
|
*/
|
|
|
|
require_once "File/Archive/Writer.php";
|
|
require_once "Mail.php";
|
|
require_once "Mail/mime.php";
|
|
|
|
/**
|
|
* Send the files attached to a mail.
|
|
*/
|
|
class File_Archive_Writer_Mail extends File_Archive_Writer
|
|
{
|
|
/**
|
|
* @var Mail_mime object
|
|
* @access private
|
|
*/
|
|
var $mime;
|
|
|
|
/**
|
|
* @var Mail object used to send email (built thanks to the factory)
|
|
* @access private
|
|
*/
|
|
var $mail;
|
|
|
|
/**
|
|
* @var Array or String An array or a string with comma separated recipients
|
|
* @access private
|
|
*/
|
|
var $to;
|
|
|
|
/**
|
|
* @var Array The headers that will be passed to the Mail_mime object
|
|
* @access private
|
|
*/
|
|
var $headers;
|
|
|
|
/**
|
|
* @var String Data read from the current file so far
|
|
* @access private
|
|
*/
|
|
var $currentData = null;
|
|
|
|
/**
|
|
* @var String Name of the file being attached
|
|
* @access private
|
|
*/
|
|
var $currentFilename = null;
|
|
|
|
/**
|
|
* @var String MIME of the file being attached
|
|
* @access private
|
|
*/
|
|
var $currentMime = null;
|
|
|
|
/**
|
|
* @param Mail $mail Object used to send mail (see Mail::factory)
|
|
* @param array or string $to An array or a string with comma separated
|
|
* recipients
|
|
* @param array $headers The headers that will be passed to the Mail_mime
|
|
* object
|
|
* @param string $message Text body of the mail
|
|
*/
|
|
function File_Archive_Writer_Mail($to, $headers, $message, &$mail)
|
|
{
|
|
$this->mime = new Mail_mime();
|
|
$this->mime->setTXTBody($message);
|
|
if (!empty($htmlMessage)) {
|
|
$this->mime->setHTMLBody($htmlMessage);
|
|
}
|
|
|
|
if ($mail === null)
|
|
$this->mail = Mail::factory("mail");
|
|
else
|
|
$this->mail =& $mail;
|
|
|
|
$this->to = $to;
|
|
$this->headers = $headers;
|
|
}
|
|
|
|
/**
|
|
* @see Mail_Mime::setHTMLBody()
|
|
*/
|
|
function setHTMLBody($data, $isfile = false)
|
|
{
|
|
return $this->mime->setHTMLBody($data, $isfile);
|
|
}
|
|
/**
|
|
* @see Mail_Mime::addHTMLImage()
|
|
*/
|
|
function addHTMLImage($file, $c_type = 'application/octet-stream',
|
|
$name = '', $isfile = true)
|
|
{
|
|
return $this->mime->addHTMLImage($file, $c_type, $name, $isfile);
|
|
}
|
|
|
|
/**
|
|
* @see File_Archive_Writer::writeData()
|
|
*
|
|
* This function just put the data in $currentData until the end of file
|
|
* At that time, addCurrentData is called to attach $currentData to the mail
|
|
* and to clear $currentData for a new file
|
|
*/
|
|
function writeData($data)
|
|
{
|
|
$this->currentData .= $data;
|
|
}
|
|
/**
|
|
* Called when a file is finished and must be added as attachment to the mail
|
|
*/
|
|
function addCurrentData()
|
|
{
|
|
if ($this->currentFilename === null) {
|
|
return;
|
|
}
|
|
|
|
$error = $this->mime->addAttachment(
|
|
$this->currentData,
|
|
$this->currentMime,
|
|
$this->currentFilename,
|
|
false);
|
|
$this->currentData = '';
|
|
return $error;
|
|
}
|
|
/**
|
|
* @see File_Archive_Writer::newFile()
|
|
*/
|
|
function newFile($filename, $stat, $mime = "application/octet-stream")
|
|
{
|
|
$error = $this->addCurrentData();
|
|
if (PEAR::isError($error)) {
|
|
return $error;
|
|
}
|
|
|
|
if (substr($filename, -1) == '/') {
|
|
$this->currentFilename = null;
|
|
} else {
|
|
$this->currentFilename = $filename;
|
|
$this->currentMime = $mime;
|
|
}
|
|
}
|
|
/**
|
|
* @see File_Archive_Writer::newFileNeedsMIME()
|
|
*/
|
|
function newFileNeedsMIME()
|
|
{
|
|
return true;
|
|
}
|
|
|
|
/**
|
|
* @see File_Archive_Writer::close()
|
|
*/
|
|
function close()
|
|
{
|
|
$error = parent::close();
|
|
if (PEAR::isError($error)) {
|
|
return $error;
|
|
}
|
|
$error = $this->addCurrentData();
|
|
if (PEAR::isError($error)) {
|
|
return $error;
|
|
}
|
|
|
|
$body = $this->mime->get();
|
|
$headers = $this->mime->headers($this->headers);
|
|
|
|
if (!$this->mail->send(
|
|
$this->to,
|
|
$headers,
|
|
$body)
|
|
) {
|
|
return PEAR::raiseError("Error sending mail");
|
|
}
|
|
}
|
|
}
|
|
|
|
?>
|