Sending email module
| > Module written by Matt Mecham
| > Date started: 26th February 2002
|
| > Module Version Number: 1.0.0
+--------------------------------------------------------------------------
|
| QUOTE OF THE MODULE: (Taken from "Shrek" (c) Dreamworks Pictures)
| --------------------
| DONKEY: We can stay up late, swap manly stories and in the morning,
| I'm making waffles!
|
+--------------------------------------------------------------------------
*/
// This module is fairly basic, more functionality is expected in future
// versions (such as MIME attachments, SMTP stuff, etc)
class emailer {
var $from = "";
var $to = "";
var $subject = "";
var $message = "";
var $header = "";
var $footer = "";
var $template = "";
var $error = "";
var $parts = array();
var $bcc = "";
var $mail_headers = array();
var $multipart = "";
var $boundry = "";
var $temp_dump = 0;
function emailer() {
global $ibforums;
// Assign $from as the admin out email address, this can be
// over-riden at any time.
$this->from = $ibforums->vars['email_out'];
// Temporarily assign $header and $footer, this can be over-riden
// also
$this->header = $ibforums->vars['email_header'];
$this->footer = $ibforums->vars['email_footer'];
$this->boundry = "----=_NextPart_000_0022_01C1BD6C.D0C0F9F0"; //"b".md5(uniqid(time()));
}
function add_attachment($data = "", $name = "", $ctype='application/octet-stream') {
$this->parts[] = array( 'ctype' => $ctype,
'data' => $data,
'encode' => 'base64',
'name' => $name
);
}
function build_headers() {
$this->mail_headers = "From: ".$this->from. "\n";
$this->mail_headers .= "X-Priority: 3\n";
$this->mail_headers .= "X-Mailer: IBForums PHP Mailer\n";
if (is_array( $this->bcc ) )
{
$this->mail_headers .= "BCC: ".implode( "," , $this->bcc ) . "\n";
}
if ( count ($this->parts) > 0 )
{
$this->mail_headers .= "MIME-Version: 1.0\n";
$this->mail_headers .= "Content-Type: multipart/mixed;\n\tboundary=\"".$this->boundry."\"\n\nThis is a MIME encoded message.\n\n--".$this->boundry;
$this->mail_headers .= "\nContent-Type: text/plain;\n\tcharset=\"iso-8859-1\"\nContent-Transfer-Encoding: quoted-printable\n\n".$this->message."\n\n--".$this->boundry;
$this->mail_headers .= $this->build_multipart();
$this->message = "";
}
}
function encode_attachment($part) {
$msg = chunk_split(base64_encode($part['data']));
return "Content-Type: ".$part['ctype']. ($part['name'] ? ";\n\tname =\"".$part['name']."\"" : "").
"\nContent-Transfer-Encoding: ".$part['encode']."\nContent-Disposition: attachment;\n\tfilename=\"".$part['name']."\"\n\n".$msg."\n";
}
function build_multipart() {
$multipart = "";
for ($i = sizeof($this->parts) - 1 ; $i >= 0 ; $i--)
{
$multipart .= "\n".$this->encode_attachment($this->parts[$i]) . "--".$this->boundry;
}
return $multipart . "--\n";
}
//+--------------------------------------------------------------------------
// send_mail:
// Physically sends the email
//+--------------------------------------------------------------------------
function send_mail() {
$this->to = preg_replace( "/[ \t]+/" , " " , $this->to );
$this->from = preg_replace( "/[ \t]+/" , " " , $this->from );
$this->to = preg_replace( "/,,/" , "," , $this->to );
$this->from = preg_replace( "/,,/" , "," , $this->from );
$this->to = preg_replace( "#\#\[\]'\"\(\):;/\$!£%\^&\*\{\}#" , "", $this->to );
$this->from = preg_replace( "#\#\[\]'\"\(\):;/\$!£%\^&\*\{\}#" , "", $this->from);
$this->subject = $this->clean_message($this->subject);
$this->build_headers();
if ( ($this->from) and ($this->subject) )
{
if ($this->temp_dump == 1)
{
$blah = $this->to."\n".$this->from."\n".$this->subject."\n".$this->mail_headers."\n\n".$this->message;
$pathy = '/Library/WebServer/Documents/mail/'.date("js.F.Y.h:i.A"); // OS X rules!
$fh = fopen ($pathy, 'w');
fputs ($fh, $blah, strlen($blah) );
fclose($fh);
}
else
{
if ( ! @mail( $this->to, $this->subject, $this->message, $this->mail_headers ) )
{
$this->fatal_error("Could not sent the email", "Failed at 'mail' command");
}
}
}
else
{
return FALSE;
}
}
//+--------------------------------------------------------------------------
// get_template:
// Queries the database, and stores the template we wish to use in memory
//+--------------------------------------------------------------------------
function get_template($name="", $language="en") {
global $IB, $DB;
if ($name == "")
{
$this->error++;
$this->fatal_error("A valid email template ID was not passed to the email library during template parsing", "");
}
if (! file_exists("./lang/$language/email_content.php") )
{
require "./lang/en/email_content.php";
}
else
{
require "./lang/$language/email_content.php";
}
if (! isset($EMAIL[ $name ]) ) {
$this->fatal_error("Could not find an email template with an ID of '$name'", "");
}
$this->template = $EMAIL[ $name ];
}
//+--------------------------------------------------------------------------
// build_message:
// Swops template tags into the corresponding string held in $words array.
// Also joins header and footer to message and cleans the message for sending
//+--------------------------------------------------------------------------
function build_message($words) {
global $ibforums;
if ($this->template == "") {
$this->error++;
$this->fatal_error("Could not build the email message, no template assigned", "Make sure a template is assigned first.");
}
$this->message = $this->template;
// Add some default words
$words['BOARD_ADDRESS'] = $ibforums->vars['board_url'] . '/index.' . $ibforums->vars['php_ext'];
$words['WEB_ADDRESS'] = $ibforums->vars['home_url'];
$words['BOARD_NAME'] = $ibforums->vars['board_name'];
$words['SIGNATURE'] = $ibforums->vars['signature'];
// Swop the words
$this->message = preg_replace( "/<#(.+?)#>/e", "\$words[\\1]", $this->message );
$this->message = $this->clean_message( $this->message );
}
//+--------------------------------------------------------------------------
// clean_message: (Mainly used internally)
// Ensures that \n and
are converted into CRLF (\r\n)
// Also unconverts some iB_CODE.
//+--------------------------------------------------------------------------
function clean_message($message = "" ) {
$message = preg_replace( "#(.+?)#" , "\\1", $message );
$message = preg_replace( "#(.+?)#" , "\\1", $message );
$message = preg_replace( "#(.+?)#" , "--\\1--", $message );
$message = preg_replace( "#(.+?)#" , "-\\1-" , $message );
$message = preg_replace( "#.+?#", "\\1" , $message );
$message = preg_replace( "#(.+?)#", "\n\n------------ CODE SAMPLE ----------\n" , $message );
$message = preg_replace( "#(.+?)#", "\n-----------------------------------\n\n" , $message );
$message = preg_replace( "#(.+?)#" , "\n\n------------ QUOTE ----------\n" , $message );
$message = preg_replace( "#(.+?)#" , "\n\n------------ QUOTE ----------\n" , $message );
$message = preg_replace( "#(.+?)#" , "\n-----------------------------\n\n" , $message );
$message = preg_replace( "#.+?#e" , "(FLASH MOVIE)" , $message );
$message = preg_replace( "#![]([\"'](\S+?)['\"].+?".")
#" , "(IMAGE: \\1)" , $message );
$message = preg_replace( "#(.+?)#" , "(URL: \\1)" , $message );
$message = preg_replace( "#(.+?)#" , "(EMAIL: \\2)" , $message );
$message = preg_replace( "#(.+?)(.+?)(.+?)#e" , "\n\n--------------- SQL -----------\n\\2\n----------------\n\n", $message);
$message = preg_replace( "#(.+?)(.+?)(.+?)#e", "\n\n-------------- HTML -----------\n\\2\n----------------\n\n", $message);
$message = preg_replace( "##" , "" , $message );
$message = preg_replace( "#<.+?".">#" , "" , $message );
$message = preg_replace( "/(
|\n)/" , "\r\n", $message );
$message = str_replace( """, "\"", $message );
$message = str_replace( "\", "\\", $message );
$message = str_replace( "$", "\$", $message );
$message = str_replace( "!" , "!", $message );
$message = str_replace( "'" , "'", $message );
$message = str_replace( "<" , "<", $message );
$message = str_replace( ">" , ">", $message );
$message = str_replace( "&" , "&", $message );
return $message;
}
function fatal_error($msg, $help="")
{
echo("Mail Error!
$msg
$help");
exit();
}
}
?>