mirror of
https://github.com/phpbb/phpbb.git
synced 2025-02-20 16:15:00 +01:00
504 lines
13 KiB
PHP
Executable File
504 lines
13 KiB
PHP
Executable File
<?php
|
|
/***************************************************************************
|
|
emailer.php
|
|
-------------------
|
|
begin : Sunday Aug. 12, 2001
|
|
copyright : (C) 2001 The phpBB Group
|
|
email : support@phpbb.com
|
|
|
|
$Id$
|
|
|
|
***************************************************************************/
|
|
|
|
/***************************************************************************
|
|
*
|
|
* This program is free software; you can redistribute it and/or modify
|
|
* it under the terms of the GNU General Public License as published by
|
|
* the Free Software Foundation; either version 2 of the License, or
|
|
* (at your option) any later version.
|
|
*
|
|
***************************************************************************/
|
|
|
|
//
|
|
// The emailer class has support for attaching files, that isn't implemented
|
|
// in the 2.0 release but we can probable find some way of using it in a future
|
|
// release
|
|
//
|
|
class emailer
|
|
{
|
|
var $tpl_file;
|
|
var $use_smtp;
|
|
var $msg;
|
|
var $mimeOut;
|
|
var $arrPlaceHolders = array(); // an associative array that has the key = placeHolderName and val = placeHolderValue.
|
|
var $subject, $extra_headers, $address;
|
|
|
|
function emailer($use_smtp)
|
|
{
|
|
$this->use_smtp = $use_smtp;
|
|
$this->tpl_file = NULL;
|
|
$this->address = NULL;
|
|
$this->msg = '';
|
|
$this->mimeOut = '';
|
|
}
|
|
|
|
//
|
|
// Resets all the data (address, template file, etc etc to default
|
|
//
|
|
function reset()
|
|
{
|
|
$this->tpl_file = '';
|
|
$this->address = '';
|
|
$this->msg = '';
|
|
$this->memOut = '';
|
|
$this->vars = '';
|
|
}
|
|
|
|
//
|
|
// Sets an email address to send to
|
|
//
|
|
function email_address($address)
|
|
{
|
|
$this->address = '';
|
|
$this->address .= $address;
|
|
}
|
|
|
|
//
|
|
// set up subject for mail
|
|
//
|
|
function set_subject($subject = '')
|
|
{
|
|
$this->subject = $subject;
|
|
}
|
|
|
|
//
|
|
// set up extra mail headers
|
|
//
|
|
function extra_headers($headers)
|
|
{
|
|
$this->extra_headers = $headers;
|
|
}
|
|
|
|
function use_template($template_file, $template_lang = '')
|
|
{
|
|
global $board_config, $phpbb_root_path;
|
|
|
|
if ( $template_lang == '' )
|
|
{
|
|
$template_lang = $board_config['default_lang'];
|
|
}
|
|
|
|
$this->tpl_file = $phpbb_root_path . 'language/lang_' . $template_lang . '/email/' . $template_file . '.tpl';
|
|
if ( !file_exists($this->tpl_file) )
|
|
{
|
|
message_die(ERROR, 'Could not find email template file ' . $template_file);
|
|
}
|
|
|
|
if ( !$this->load_msg() )
|
|
{
|
|
message_die(ERROR, 'Could not load email template file ' . $template_file);
|
|
}
|
|
|
|
return true;
|
|
}
|
|
|
|
//
|
|
// Open the template file and read in the message
|
|
//
|
|
function load_msg()
|
|
{
|
|
if ( $this->tpl_file == NULL )
|
|
{
|
|
message_die(ERROR, 'No template file set');
|
|
}
|
|
|
|
if ( !($fd = fopen($this->tpl_file, 'r')) )
|
|
{
|
|
message_die(ERROR, 'Failed opening template file');
|
|
}
|
|
|
|
$this->msg .= fread($fd, filesize($this->tpl_file));
|
|
fclose($fd);
|
|
|
|
return true;
|
|
}
|
|
|
|
function assign_vars($vars)
|
|
{
|
|
$this->vars = ( empty($this->vars) ) ? $vars : $this->vars . $vars;
|
|
}
|
|
|
|
function parse_email()
|
|
{
|
|
@reset($this->vars);
|
|
while (list($key, $val) = @each($this->vars))
|
|
{
|
|
$$key = $val;
|
|
}
|
|
|
|
// Escape all quotes, else the eval will fail.
|
|
$this->msg = str_replace ("'", "\'", $this->msg);
|
|
$this->msg = preg_replace('#\{([a-z0-9\-_]*?)\}#is', "' . $\\1 . '", $this->msg);
|
|
|
|
eval("\$this->msg = '$this->msg';");
|
|
|
|
//
|
|
// We now try and pull a subject from the email body ... if it exists,
|
|
// do this here because the subject may contain a variable
|
|
//
|
|
$match = array();
|
|
preg_match("/^(Subject:(.*?)[\r\n]+?)?(Charset:(.*?)[\r\n]+?)?(.*?)$/is", $this->msg, $match);
|
|
|
|
$this->msg = ( isset($match[5]) ) ? trim($match[5]) : '';
|
|
$this->subject = ( $this->subject != '' ) ? $this->subject : trim($match[2]);
|
|
$this->encoding = ( trim($match[4]) != '' ) ? trim($match[4]) : 'iso-8859-1';
|
|
|
|
return true;
|
|
}
|
|
|
|
//
|
|
// Send the mail out to the recipients set previously in var $this->address
|
|
//
|
|
function send()
|
|
{
|
|
global $phpEx, $phpbb_root_path;
|
|
|
|
if ( $this->address == NULL )
|
|
{
|
|
message_die(ERROR, 'No email address set');
|
|
}
|
|
|
|
if ( !$this->parse_email() )
|
|
{
|
|
return false;
|
|
}
|
|
|
|
//
|
|
// Add date and encoding type
|
|
//
|
|
$universal_extra = "MIME-Version: 1.0\nContent-type: text/plain; charset=" . $this->encoding . "\nContent-transfer-encoding: 8bit\nDate: " . gmdate('D, d M Y H:i:s', time()) . " UT\n";
|
|
$this->extra_headers = $universal_extra . $this->extra_headers;
|
|
|
|
$result = ( $this->use_smtp ) ? smtpmail($this->address, $this->subject, $this->msg, $this->extra_headers) : @mail($this->address, $this->subject, $this->msg, $this->extra_headers);
|
|
|
|
if ( !$result )
|
|
{
|
|
message_die(ERROR, 'Failed sending email');
|
|
}
|
|
|
|
return true;
|
|
}
|
|
|
|
|
|
//
|
|
// Attach files via MIME.
|
|
//
|
|
function attachFile($filename, $mimetype = "application/octet-stream", $szFromAddress, $szFilenameToDisplay)
|
|
{
|
|
$mime_boundary = "--==================_846811060==_";
|
|
|
|
$this->mailMsg = '--' . $mime_boundary . "\nContent-Type: text/plain;\n\tcharset=\"iso-8859-1\"\n\n" . $this->mailMsg;
|
|
|
|
if ($mime_filename)
|
|
{
|
|
$filename = $mime_filename;
|
|
$encoded = $this->encode_file($filename);
|
|
}
|
|
|
|
$fd = fopen($filename, "r");
|
|
$contents = fread($fd, filesize($filename));
|
|
|
|
$this->mimeOut = "--" . $mime_boundary . "\n";
|
|
$this->mimeOut .= "Content-Type: " . $mimetype . ";\n\tname=\"$szFilenameToDisplay\"\n";
|
|
$this->mimeOut .= "Content-Transfer-Encoding: quoted-printable\n";
|
|
$this->mimeOut .= "Content-Disposition: attachment;\n\tfilename=\"$szFilenameToDisplay\"\n\n";
|
|
|
|
if ( $mimetype == "message/rfc822" )
|
|
{
|
|
$this->mimeOut .= "From: ".$szFromAddress."\n";
|
|
$this->mimeOut .= "To: ".$this->emailAddress."\n";
|
|
$this->mimeOut .= "Date: ".date("D, d M Y H:i:s") . " UT\n";
|
|
$this->mimeOut .= "Reply-To:".$szFromAddress."\n";
|
|
$this->mimeOut .= "Subject: ".$this->mailSubject."\n";
|
|
$this->mimeOut .= "X-Mailer: PHP/".phpversion()."\n";
|
|
$this->mimeOut .= "MIME-Version: 1.0\n";
|
|
}
|
|
|
|
$this->mimeOut .= $contents."\n";
|
|
$this->mimeOut .= "--" . $mime_boundary . "--" . "\n";
|
|
|
|
return $out;
|
|
// added -- to notify email client attachment is done
|
|
}
|
|
|
|
function getMimeHeaders($filename, $mime_filename="")
|
|
{
|
|
$mime_boundary = "--==================_846811060==_";
|
|
|
|
if ($mime_filename)
|
|
{
|
|
$filename = $mime_filename;
|
|
}
|
|
|
|
$out = "MIME-Version: 1.0\n";
|
|
$out .= "Content-Type: multipart/mixed;\n\tboundary=\"$mime_boundary\"\n\n";
|
|
$out .= "This message is in MIME format. Since your mail reader does not understand\n";
|
|
$out .= "this format, some or all of this message may not be legible.";
|
|
|
|
return $out;
|
|
}
|
|
|
|
//
|
|
// Split string by RFC 2045 semantics (76 chars per line, end with \r\n).
|
|
//
|
|
function myChunkSplit($str)
|
|
{
|
|
$stmp = $str;
|
|
$len = strlen($stmp);
|
|
$out = "";
|
|
|
|
while ($len > 0)
|
|
{
|
|
if ($len >= 76)
|
|
{
|
|
$out .= substr($stmp, 0, 76) . "\r\n";
|
|
$stmp = substr($stmp, 76);
|
|
$len = $len - 76;
|
|
}
|
|
else
|
|
{
|
|
$out .= $stmp . "\r\n";
|
|
$stmp = "";
|
|
$len = 0;
|
|
}
|
|
}
|
|
return $out;
|
|
}
|
|
|
|
//
|
|
// Split the specified file up into a string and return it
|
|
//
|
|
function encode_file($sourcefile)
|
|
{
|
|
if (is_readable($sourcefile))
|
|
{
|
|
$fd = fopen($sourcefile, "r");
|
|
$contents = fread($fd, filesize($sourcefile));
|
|
$encoded = $this->myChunkSplit(base64_encode($contents));
|
|
fclose($fd);
|
|
}
|
|
|
|
return $encoded;
|
|
}
|
|
|
|
} // class emailer
|
|
|
|
//
|
|
// This function has been modified as provided
|
|
// by SirSir to allow multiline responses when
|
|
// using SMTP Extensions
|
|
//
|
|
function server_parse($socket, $response)
|
|
{
|
|
while ( substr($server_response,3,1) != ' ' )
|
|
{
|
|
if( !( $server_response = fgets($socket, 256) ) )
|
|
{
|
|
message_die(ERROR, 'Could not get mail server response codes');
|
|
}
|
|
}
|
|
|
|
if( !( substr($server_response, 0, 3) == $response ) )
|
|
{
|
|
message_die(ERROR, "Ran into problems sending Mail. Response: $server_response");
|
|
}
|
|
}
|
|
|
|
/****************************************************************************
|
|
* Function: smtpmail
|
|
* Description: This is a functional replacement for php's builtin mail
|
|
* function, that uses smtp.
|
|
* Usage: The usage for this function is identical to that of php's
|
|
* built in mail function.
|
|
****************************************************************************/
|
|
function smtpmail($mail_to, $subject, $message, $headers = '')
|
|
{
|
|
// For now I'm using an array based $smtp_vars to hold the smtp server
|
|
// info, but it should probably change to $board_config...
|
|
// then the relevant info would be $board_config['smtp_host'] and
|
|
// $board_config['smtp_port'].
|
|
global $board_config;
|
|
|
|
//
|
|
// Fix any bare linefeeds in the message to make it RFC821 Compliant.
|
|
//
|
|
$message = preg_replace("/(?<!\r)\n/si", "\r\n", $message);
|
|
|
|
if ($headers != '')
|
|
{
|
|
if(is_array($headers))
|
|
{
|
|
if(sizeof($headers) > 1)
|
|
{
|
|
$headers = join("\r\n", $headers);
|
|
}
|
|
else
|
|
{
|
|
$headers = $headers[0];
|
|
}
|
|
}
|
|
$headers = chop($headers);
|
|
|
|
//
|
|
// Make sure there are no bare linefeeds in the headers
|
|
//
|
|
$headers = preg_replace("/(?<!\r)\n/si", "\r\n", $headers);
|
|
//
|
|
// Ok this is rather confusing all things considered,
|
|
// but we have to grab bcc and cc headers and treat them differently
|
|
// Something we really didn't take into consideration originally
|
|
//
|
|
$header_array = explode("\r\n", $headers);
|
|
@reset($header_array);
|
|
$headers = "";
|
|
while( list(, $header) = each($header_array) )
|
|
{
|
|
if( preg_match("/^cc:/si", $header) )
|
|
{
|
|
$cc = preg_replace("/^cc:(.*)/si", "\\1", $header);
|
|
}
|
|
else if( preg_match("/^bcc:/si", $header ))
|
|
{
|
|
$bcc = preg_replace("/^bcc:(.*)/si", "\\1", $header);
|
|
$header = "";
|
|
}
|
|
$headers .= $header . "\r\n";
|
|
}
|
|
$headers = chop($headers);
|
|
$cc = explode(",", $cc);
|
|
$bcc = explode(",", $bcc);
|
|
}
|
|
if(trim($mail_to) == '')
|
|
{
|
|
message_die(ERROR, 'No email address specified');
|
|
}
|
|
if(trim($subject) == '')
|
|
{
|
|
message_die(ERROR, 'No email Subject specified');
|
|
}
|
|
if(trim($message) == '')
|
|
{
|
|
message_die(ERROR, 'Email message was blank');
|
|
}
|
|
$mail_to_array = explode(",", $mail_to);
|
|
|
|
//
|
|
// Ok we have error checked as much as we can to this point let's get on
|
|
// it already.
|
|
//
|
|
if( !$socket = fsockopen($board_config['smtp_host'], 25, $errno, $errstr, 20) )
|
|
{
|
|
message_die(ERROR, "Could not connect to smtp host : $errno : $errstr");
|
|
}
|
|
server_parse($socket, "220");
|
|
|
|
if( !empty($board_config['smtp_username']) && !empty($board_config['smtp_password']) )
|
|
{
|
|
// Send the RFC2554 specified EHLO.
|
|
// This improved as provided by SirSir to accomodate
|
|
// both SMTP AND ESMTP capable servers
|
|
fputs($socket, "EHLO " . $board_config['smtp_host'] . "\r\n");
|
|
server_parse($socket, "250");
|
|
|
|
fputs($socket, "AUTH LOGIN\r\n");
|
|
server_parse($socket, "334");
|
|
fputs($socket, base64_encode($board_config['smtp_username']) . "\r\n");
|
|
server_parse($socket, "334");
|
|
fputs($socket, base64_encode($board_config['smtp_password']) . "\r\n");
|
|
server_parse($socket, "235");
|
|
}
|
|
else
|
|
{
|
|
// Send the RFC821 specified HELO.
|
|
fputs($socket, "HELO " . $board_config['smtp_host'] . "\r\n");
|
|
server_parse($socket, "250");
|
|
}
|
|
|
|
// From this point onward most server response codes should be 250
|
|
// Specify who the mail is from....
|
|
fputs($socket, "MAIL FROM: <" . $board_config['board_email'] . ">\r\n");
|
|
server_parse($socket, "250");
|
|
|
|
// Specify each user to send to and build to header.
|
|
$to_header = "To: ";
|
|
@reset( $mail_to_array );
|
|
while( list( , $mail_to_address ) = each( $mail_to_array ))
|
|
{
|
|
//
|
|
// Add an additional bit of error checking to the To field.
|
|
//
|
|
$mail_to_address = trim($mail_to_address);
|
|
if ( preg_match('/[^ ]+\@[^ ]+/', $mail_to_address) )
|
|
{
|
|
fputs( $socket, "RCPT TO: <$mail_to_address>\r\n" );
|
|
server_parse( $socket, "250" );
|
|
}
|
|
$to_header .= "<$mail_to_address>, ";
|
|
}
|
|
// Ok now do the CC and BCC fields...
|
|
@reset( $bcc );
|
|
while( list( , $bcc_address ) = each( $bcc ))
|
|
{
|
|
//
|
|
// Add an additional bit of error checking to bcc header...
|
|
//
|
|
$bcc_address = trim( $bcc_address );
|
|
if ( preg_match('/[^ ]+\@[^ ]+/', $bcc_address) )
|
|
{
|
|
fputs( $socket, "RCPT TO: <$bcc_address>\r\n" );
|
|
server_parse( $socket, "250" );
|
|
}
|
|
}
|
|
@reset( $cc );
|
|
while( list( , $cc_address ) = each( $cc ))
|
|
{
|
|
//
|
|
// Add an additional bit of error checking to cc header
|
|
//
|
|
$cc_address = trim( $cc_address );
|
|
if ( preg_match('/[^ ]+\@[^ ]+/', $cc_address) )
|
|
{
|
|
fputs($socket, "RCPT TO: <$cc_address>\r\n");
|
|
server_parse($socket, "250");
|
|
}
|
|
}
|
|
// Ok now we tell the server we are ready to start sending data
|
|
fputs($socket, "DATA\r\n");
|
|
|
|
// This is the last response code we look for until the end of the message.
|
|
server_parse($socket, "354");
|
|
|
|
// Send the Subject Line...
|
|
fputs($socket, "Subject: $subject\r\n");
|
|
|
|
// Now the To Header.
|
|
fputs($socket, "$to_header\r\n");
|
|
|
|
// Now any custom headers....
|
|
fputs($socket, "$headers\r\n\r\n");
|
|
|
|
// Ok now we are ready for the message...
|
|
fputs($socket, "$message\r\n");
|
|
|
|
// Ok the all the ingredients are mixed in let's cook this puppy...
|
|
fputs($socket, ".\r\n");
|
|
server_parse($socket, "250");
|
|
|
|
// Now tell the server we are done and close the socket...
|
|
fputs($socket, "QUIT\r\n");
|
|
fclose($socket);
|
|
|
|
return TRUE;
|
|
}
|
|
|
|
?>
|