WebPaws.com

function prepareEmails( $EMaddr ) {
//with each email name/address pair, prepare it in email format
if( !is_array( $EMaddr[0] ) ) { $EMaddr = Array( $EMaddr ); }
$EMstr = "; foreach( $EMaddr as $key => $emComb ) {
$EMstr .= ( $EMstr ? ‘, ‘ : " ).( $emComb[0] ? ( ‘"‘.addslashes(preg_replace( "/[..n..r.."]/", ", $emComb[0] )).'" ‘ ) : " ).'<'.addslashes(preg_replace( "/[..n..r<>]/", ", $emComb[1] )).">";
}
return $EMstr;
}

//prepare basic headers
$extraHeaders = "From: ".$senderEmail."..n".
( $replyTo ? ( "Reply-To: ".preg_replace( "/[..n..r]/", ", $replyTo )."..n" ) : " ).
( $ccEmailList ? ( "Cc: ".$ccEmailList."..n" ) : " ).
( $bccEmailList ? ( "Bcc: ".$bccEmailList."..n" ) : " ).
( $priority ? ( "X-Priority: ".preg_replace( "/[..n..r]/", ", $priority )."..n" ) : " ).
‘X-Mailer: makeMIME v2.1 in PHP by MTWJ'.
( $extraHeaders ? ( "..n".$extraHeaders ) : " );

//use UNIX linebreaking (works on all platforms and resolves problems with some platforms)
$usrMailBody = preg_replace( "/..r..n?/", "..n", $usrMailBody );
$mailHTML = preg_replace( "/..r..n?/", "..n", $mailHTML );

if( !$fileNamesAndPaths && !$mailHTML ) {

//no attachments or HTML - all that we need to do is wrap the body text
$mailBody = $doWrap ? wordwrap( $usrMailBody ) : $usrMailBody;

} else {

//I forbid the use of HTML-only emails
if( !$usrMailBody && $mailHTML ) { $usrMailBody = ( $doWrap = !function_exists( ‘html2text' ) ) ? strip_tags( $mailHTML ) : html2text( $mailHTML ); }

//prepare MIME boundaries that do not appear in the message body(s) (or base64 encoded attachments - hence the use of _)
$MIMEboundary = ‘MTWJ_mixed_Bound_0?; $MIMEAboundary = ‘MTWJ_alt_Bound_0?; $MIMERboundary = ‘MTWJ_rel_Bound_0?; $MIMEcid = ‘MTWJ_cnid_0?; $randChars = Array('A','B');
while( substr_count( $mailBody , $MIMEboundary ) || substr_count( $mailBody , $MIMEAboundary ) || substr_count( $mailBody , $MIMERboundary ) || substr_count( $mailBody , $MIMEcid ) || substr_count( $mailHTML , $MIMEboundary ) || substr_count( $mailHTML , $MIMEAboundary ) || substr_count( $mailHTML , $MIMERboundary ) || substr_count( $mailHTML , $MIMEcid ) ) { }

//prepare the MIME declaration headers - the multipart/mixed boundary means that I can add attachments
$extraHeaders .= "..nMime-Version: 1.0..nContent-Type: multipart/mixed; boundary=.."$MIMEboundary.."";

//prepare the multipart/alternative header [allowing HTML / text alternatives] and the plain body
$mailBody = "..nThis is a MIME email - please upgrade to a MIME compatible email client..n".
"..n-$MIMEboundary..nContent-Type: multipart/alternative; boundary=.."$MIMEAboundary.."..n".
"..n-$MIMEAboundary..nContent-Type: text/plain; charset=.."us-ascii.."..n".
"Content-Transfer-Encoding: 7bit..n..n".( $doWrap ? wordwrap( $usrMailBody ) : $usrMailBody )."..n";

//prepare the HTML body and embedded files
if( $mailHTML ) {

//if they only provide one embed, put it in an array as if they provided more than one
if( !is_array( $embedNamesAndPaths ) || ( is_string( $embedNamesAndPaths['name'] ) && is_string( $embedNamesAndPaths['tmp_name'] ) ) ) {
$embedNamesAndPaths = Array( $embedNamesAndPaths );
}

//use correct Content-ID for embeds
for( $x = 0; $embedNamesAndPaths[$x]; $x++ ) {
$mailHTML = str_replace( "@makeMIMEembed', $mailHTML );
}

//put in the modified HTML body with multipart/related header, allowing embedded files
$mailBody .= "..n-$MIMEAboundary..nContent-Type: multipart/related; boundary=.."$MIMERboundary.."..n".
"..n-$MIMERboundary..nContent-Type: text/html; charset=.."us-ascii.."..n".
"Content-Transfer-Encoding: 7bit..n..n".$mailHTML."..n";

//for each embed, get the file type for MIMEtyping and encode the file
$x = 0; foreach( $embedNamesAndPaths as $key => $fullPath ) { if( $fullPath ) {
//if it was an upload, use its tmp_name, else use the path
if( is_array( $fullPath ) ) { $fullPath = $fullPath['tmp_name']; }
$mailBody .= "..n-$MIMERboundary..nContent-Type: ".solveMimeType( $fullPath )."..n".
"Content-ID: <..nContent-Transfer-Encoding">".$MIMEcid.'_'.( ++$x )."@makeMIMEembed>..nContent-Transfer-Encoding: base64..n..n".
chunk_split(base64_encode(fread(fopen($fullPath,'rb'),filesize($fullPath))))."..n";
} }

$mailBody .= "..n-$MIMERboundary-..n"; //end of HTML and embedded files

}

$mailBody .= "..n-$MIMEAboundary-..n"; //end of text and HTML alternatives

//if they only provide one attachment, put it in an array as if they provided more than one
if( !is_array( $fileNamesAndPaths ) || ( is_string( $fileNamesAndPaths['name'] ) && is_string( $fileNamesAndPaths['tmp_name'] ) ) ) {
$fileNamesAndPaths = Array( $fileNamesAndPaths );
}

//for each attachment, get the file name for sending to the recipient and encode the file
foreach( $fileNamesAndPaths as $key => $fullPath ) { if( $fullPath ) {
//if it was an upload, use its tmp_name and name, else use the name with and without the path
if( is_array( $fullPath ) ) { $justFileName = $fullPath['name']; $fullPath = $fullPath['tmp_name'];
} else { $justFileName = preg_replace( "/.*..//", ", str_replace( "....", ‘/', $fullPath ) ); }
$mailBody .= "..n-$MIMEboundary..nContent-Type: ".solveMimeType( $fullPath )."; name=.."".$justFileName.".."..n".
"Content-Transfer-Encoding: base64..nContent-Disposition: attachment; name=.."".$justFileName.".."..n..n".
chunk_split(base64_encode(fread(fopen($fullPath,'rb'),filesize($fullPath))))."..n";
} }

$mailBody .= "..n-$MIMEboundary-..n"; //end of MIME email

}

//send the email
if( $debug ) { return print "

".htmlspecialchars("To: ".$recipientEmail."..nSubject: $subject..n$extraHeaders..n..n$mailBody")."

";

} else { return mail($recipientEmail,$subject,$mailBody,$extraHeaders); }

}