private static function parseMessage($message, $charset)
{
$headerP = strpos($message, "\r\n\r\n");
$rawHeader = substr($message, 0, $headerP);
$body = substr($message, $headerP+4);
$header = CMailMessage::ParseHeader($rawHeader, $charset);
$htmlBody = '';
$textBody = '';
$parts = array();
if ($header->IsMultipart())
{
$startB = "\r\n--" . $header->GetBoundary() . "\r\n";
$endB = "\r\n--" . $header->GetBoundary() . "--\r\n";
$startP = strpos($message, $startB)+strlen($startB);
$endP = strpos($message, $endB);
$data = substr($message, $startP, $endP-$startP);
$isHtml = false;
$rawParts = preg_split("/\r\n--".preg_quote($header->GetBoundary(), '/')."\r\n/s", $data);
$tmpParts = array();
foreach ($rawParts as $part)
{
if (substr($part, 0, 2) == "\r\n")
$part = "\r\n" . $part;
list(, $subHtml, $subText, $subParts) = CMailMessage::parseMessage($part, $charset);
if ($subHtml)
$isHtml = true;
if ($subText)
$tmpParts[] = array($subHtml, $subText);
$parts = array_merge($parts, $subParts);
}
if (strtolower($header->MultipartType()) == 'alternative')
{
foreach ($tmpParts as $part)
{
if ($part[0])
{
if (!$textBody || $htmlBody && (strlen($htmlBody) < strlen($part[0])))
{
$htmlBody = $part[0];
$textBody = $part[1];
}
}
else
{
if (!$textBody || strlen($textBody) < strlen($part[1]))
{
$htmlBody = '';
$textBody = $part[1];
}
}
}
}
else
{
foreach ($tmpParts as $part)
{
if ($textBody)
$textBody .= "\r\n\r\n";
$textBody .= $part[1];
if ($isHtml)
{
if ($htmlBody)
$htmlBody .= "\r\n\r\n";
$htmlBody .= $part[0] ?: $part[1];
}
}
}
}
else
{
$bodyPart = CMailMessage::decodeMessageBody($header, $body, $charset);
if (!$bodyPart['FILENAME'] && strpos(strtolower($bodyPart['CONTENT-TYPE']), 'text/') === 0)
{
if (strtolower($bodyPart['CONTENT-TYPE']) == 'text/html')
{
$htmlBody = $bodyPart['BODY'];
$textBody = htmlToTxt($bodyPart['BODY']);
}
else
{
$textBody = $bodyPart['BODY'];
}
}
else
{
$parts[] = $bodyPart;
}
}
return array($header, $htmlBody, $textBody, $parts);
}
function AddMessage($mailbox_id, $message, $charset)
{
global $DB;
// replace all /n -> /r/n
//$message = str_replace("\r\n", "\n", $message);
//$message = str_replace("\n", "\r\n", $message);
$header_pos = strpos($message, "\r\n\r\n");
// spliting message to header and body
$message_header = substr($message, 0, $header_pos);
$message_body = substr($message, $header_pos + 4);
$message_body_html = false;
// parsing header and convert
$arMessageParts = array();
$obHeader = CMailMessage::ParseHeader($message_header, $charset);
if ($obHeader->IsMultipart()) {
//echo 'obHeader="<pre>';print_r($obHeader);echo '/obHeader</pre>';
$arMessagePartsTmp = preg_split("/" . preg_quote("--" . $obHeader->GetBoundary(), "/") . "(--|\r\n)/s", $message_body);
$message_body = "";
for ($i = 0; $i < count($arMessagePartsTmp); $i++) {
if (strlen($arMessagePartsTmp[$i]) <= 0) {
continue;
}
$message_part = $arMessagePartsTmp[$i];
if (substr($message_part, 0, 2) == "\r\n") {
$message_part = "\r\n" . $message_part;
}
$p = strpos($message_part, "\r\n\r\n");
$message_part_header = substr($message_part, 0, $p);
if (strlen(trim($message_part_header)) <= 0 && count($arMessagePartsTmp) > 1) {
continue;
}
$message_part_body = substr($message_part, $p + 4);
if (strlen(trim($message_part_body)) <= 0) {
continue;
}
$obMPHeader = CMailMessage::ParseHeader($message_part_header, $charset);
if (strtolower($obHeader->MultipartType()) == "alternative" && $obMPHeader->IsMultipart()) {
continue;
}
if (strtolower($obMPHeader->MultipartType()) == "alternative" && $obMPHeader->IsMultipart()) {
$arMessagePartsRelTmp = preg_split("/" . preg_quote("--" . $obMPHeader->GetBoundary(), "/") . "(--|\r\n)/s", $message_part_body);
$bFound = false;
$obMPHeaderHTML = false;
for ($j = 0; $j < count($arMessagePartsRelTmp); $j++) {
if (strlen(trim($arMessagePartsRelTmp[$j])) <= 0) {
continue;
}
$p = strpos($arMessagePartsRelTmp[$j], "\r\n\r\n");
$message_part_rel_header = substr($arMessagePartsRelTmp[$j], 0, $p);
$message_part_rel_body = substr($arMessagePartsRelTmp[$j], $p + 4);
$obMPRelHeader = CMailMessage::ParseHeader($message_part_rel_header, $charset);
$rel_content_type = strtolower($obMPRelHeader->content_type);
if ($rel_content_type == "text/plain") {
$bFound = true;
$obMPHeader = $obMPRelHeader;
$message_part_body = $message_part_rel_body;
break;
} elseif ($rel_content_type == "text/html" && !is_object($obMPHeaderHTML)) {
$obMPHeaderHTML = $obMPRelHeader;
$message_part_body_html = $message_part_rel_body;
}
}
// for($j=0; $j<count($arMessagePartsRelTmp); $j++)
if (!$bFound && is_object($obMPHeaderHTML)) {
$obMPHeader = $obMPHeaderHTML;
$message_part_body = HTMLToTxt($message_part_body_html);
$bFound = true;
}
}
// if(strtolower($obMPHeader->MultipartType() ...
$content_type = strtolower($obMPHeader->content_type);
//print_r($obMPHeader);
$encoding = strtolower($obMPHeader->GetHeader("CONTENT-TRANSFER-ENCODING"));
if ($encoding == "base64") {
$message_part_body = base64_decode($message_part_body);
} elseif ($encoding == "quoted-printable") {
$message_part_body = quoted_printable_decode($message_part_body);
} elseif ($encoding == "x-uue") {
$message_part_body = CMailUtil::uue_decode($message_part_body);
}
//?
$msg_charset = $obMPHeader->charset;
$filename = $obMPHeader->filename;
if ((strpos($content_type, "plain") !== false || strpos($content_type, "html") !== false || strpos($content_type, "text") !== false) && strpos($content_type, "x-vcard") === false) {
$message_part_body_converted = CMailUtil::ConvertCharset($message_part_body, $msg_charset, $charset);
} else {
$message_part_body_converted = $message_part_body;
}
$arMessageParts[] = array("CONTENT-TYPE" => $content_type, "CONTENT-ID" => $obMPHeader->content_id, "CHARSET" => $charset, "BODY" => $message_part_body_converted, "FILENAME" => $filename);
}
//for($i=0; $i<count($arMessagePartsTmp); $i++)
for ($i = 0; $i < count($arMessageParts); $i++) {
if (strlen($arMessageParts[$i]["FILENAME"]) <= 0 && strpos(strtolower($arMessageParts[$i]["CONTENT-TYPE"]), "text/") === 0) {
if (strtolower($arMessageParts[$i]["CONTENT-TYPE"]) == "text/html") {
$message_body_html = $arMessageParts[$i]["BODY"];
$message_body = HTMLToTxt($arMessageParts[$i]["BODY"]);
} else {
$message_body = $arMessageParts[$i]["BODY"];
}
unset($arMessageParts[$i]);
break;
}
}
//print_r($arMessageParts);
} else {
$encoding = strtolower($obHeader->GetHeader("CONTENT-TRANSFER-ENCODING"));
if ($encoding == "base64") {
$message_body = base64_decode($message_body);
} elseif ($encoding == "quoted-printable") {
$message_body = quoted_printable_decode($message_body);
} elseif ($encoding == "x-uue") {
$message_body = CMailUtil::uue_decode($message_body);
}
//?
$message_body = CMailUtil::ConvertCharset($message_body, $obHeader->charset, $charset);
if (strtolower($obHeader->content_type) == "text/html") {
$message_body_html = $message_body;
$message_body = HTMLToTxt($message_body);
}
}
//if($obHeader->IsMultipart())
$arFields = array("MAILBOX_ID" => $mailbox_id, "HEADER" => $obHeader->strHeader, "FIELD_DATE_ORIGINAL" => $obHeader->GetHeader("DATE"), "NEW_MESSAGE" => "Y", "FIELD_FROM" => $obHeader->GetHeader("FROM"), "FIELD_REPLY_TO" => $obHeader->GetHeader("REPLY-TO"), "FIELD_TO" => $obHeader->GetHeader("TO"), "FIELD_CC" => $obHeader->GetHeader("CC"), "FIELD_BCC" => ($obHeader->GetHeader('X-Original-Rcpt-to') != '' ? $obHeader->GetHeader('X-Original-Rcpt-to') . ($obHeader->GetHeader("BCC") != '' ? ', ' : '') : '') . $obHeader->GetHeader("BCC"), "MSG_ID" => trim($obHeader->GetHeader("MESSAGE-ID"), " <>"), "IN_REPLY_TO" => trim($obHeader->GetHeader("IN-REPLY-TO"), " <>"), "FIELD_PRIORITY" => IntVal($obHeader->GetHeader("X-PRIORITY")), "MESSAGE_SIZE" => strlen($message), "SUBJECT" => $obHeader->GetHeader("SUBJECT"), "BODY" => RTrim($message_body));
//print_r($arMessageParts); print_r($arFields); die();
if (COption::GetOptionString("mail", "save_src", B_MAIL_SAVE_SRC) == "Y") {
$arFields["FULL_TEXT"] = $message;
}
if ($message_body_html !== false) {
$arFields["FOR_SPAM_TEST"] = $obHeader->strHeader . " " . $message_body_html;
} else {
$arFields["FOR_SPAM_TEST"] = $obHeader->strHeader . " " . $message_body;
}
$arFields["SPAM"] = "?";
if (COption::GetOptionString("mail", "spam_check", B_MAIL_CHECK_SPAM) == "Y") {
$arSpam = CMailFilter::GetSpamRating($arFields["FOR_SPAM_TEST"]);
$arFields["SPAM_RATING"] = $arSpam["RATING"];
$arFields["SPAM_WORDS"] = $arSpam["WORDS"];
$arFields["SPAM_LAST_RESULT"] = "Y";
}
if (CMailUtil::IsSizeAllowed(strlen(implode(",", $arFields)))) {
$MESSAGE_ID = CMailMessage::Add($arFields);
CMailLog::AddMessage(array("MAILBOX_ID" => $mailbox_id, "MESSAGE_ID" => $MESSAGE_ID, "STATUS_GOOD" => "Y", "LOG_TYPE" => "NEW_MESSAGE", "MESSAGE" => $arFields["SUBJECT"] . " (" . $arFields["MESSAGE_SIZE"] . ") " . (COption::GetOptionString("mail", "spam_check", B_MAIL_CHECK_SPAM) == "Y" ? "[" . Round($arFields["SPAM_RATING"], 3) . "]" : "")));
if (COption::GetOptionString("mail", "save_attachments", B_MAIL_SAVE_ATTACHMENTS) == "Y") {
$n = 0;
foreach ($arMessageParts as $part) {
$arField = array("MESSAGE_ID" => $MESSAGE_ID, "FILE_NAME" => $part["FILENAME"], "CONTENT_TYPE" => $part["CONTENT-TYPE"], "FILE_DATA" => $part["BODY"], "CONTENT_ID" => $part["CONTENT-ID"]);
CMailMessage::AddAttachment($arField);
}
// foreach($arMessageParts as $part)
}
CMailFilter::FilterMessage($MESSAGE_ID, "R");
return $MESSAGE_ID;
} else {
CMailLog::AddMessage(array("MAILBOX_ID" => $mailbox_id, "STATUS_GOOD" => "N", "LOG_TYPE" => "NEW_MESSAGE", "MESSAGE" => "Big message size, check mysql max_allow_packet."));
}
}
