function SocnetEMailMessageCheck($arMessageFields, $ACTION_VARS)
{
//print_r($arMessageFields);
$arEmails = CMailUtil::ExtractAllMailAddresses($arMessageFields["FIELD_TO"] . "," . $arMessageFields["FIELD_CC"] . "," . $arMessageFields["FIELD_BCC"]);
$dbMbx = CMailBox::GetById($arMessageFields["MAIL_FILTER"]["MAILBOX_ID"]);
$arMbx = $dbMbx->Fetch();
$dbRes = CForumEMail::GetMailFilters($arMessageFields["MAIL_FILTER"]["ID"]);
while ($arRes = $dbRes->Fetch()) {
if ($arRes["EMAIL_FORUM_ACTIVE"] == "Y") {
if ($arMbx["SERVER_TYPE"] == "smtp" && !in_array(CMailUtil::ExtractMailAddress($arRes["EMAIL"]), $arEmails)) {
continue;
}
if ($arRes["EMAIL_GROUP"] != '' && !in_array(CMailUtil::ExtractMailAddress($arRes["EMAIL_GROUP"]), $arEmails)) {
continue;
}
if ($arRes["SUBJECT_SUF"] != '' && strpos($arMessageFields["SUBJECT"], $arRes["SUBJECT_SUF"]) === false) {
continue;
}
$arMessageFields["FORUM_EMAIL_FILTER"] = $arRes;
return true;
}
}
return false;
}
public static function EmailMessageAdd($arMessageFields, $ACTION_VARS)
{
if (!CModule::IncludeModule('crm')) {
return false;
}
$date = isset($arMessageFields['FIELD_DATE']) ? $arMessageFields['FIELD_DATE'] : '';
$maxAgeDays = intval(COption::GetOptionString('crm', 'email_max_age', 7));
$maxAge = $maxAgeDays > 0 ? $maxAgeDays * 86400 : 0;
if ($maxAge > 0 && $date !== '') {
$now = time() + CTimeZone::GetOffset();
$timestamp = MakeTimeStamp($date, FORMAT_DATETIME);
if ($now - $timestamp > $maxAge) {
//Time threshold is exceeded
return false;
}
}
$crmEmail = strtolower(trim(COption::GetOptionString('crm', 'mail', '')));
$msgID = isset($arMessageFields['ID']) ? intval($arMessageFields['ID']) : 0;
$mailboxID = isset($arMessageFields['MAILBOX_ID']) ? intval($arMessageFields['MAILBOX_ID']) : 0;
$from = isset($arMessageFields['FIELD_FROM']) ? $arMessageFields['FIELD_FROM'] : '';
$replyTo = isset($arMessageFields['FIELD_REPLY_TO']) ? $arMessageFields['FIELD_REPLY_TO'] : '';
if ($replyTo !== '') {
// Ignore FROM if REPLY_TO EXISTS
$from = $replyTo;
}
$addresserInfo = CCrmMailHelper::ParseEmail($from);
if ($crmEmail !== '' && strcasecmp($addresserInfo['EMAIL'], $crmEmail) === 0) {
// Ignore emails from ourselves
return false;
}
$to = isset($arMessageFields['FIELD_TO']) ? $arMessageFields['FIELD_TO'] : '';
$cc = isset($arMessageFields['FIELD_CC']) ? $arMessageFields['FIELD_CC'] : '';
$bcc = isset($arMessageFields['FIELD_BCC']) ? $arMessageFields['FIELD_BCC'] : '';
$addresseeEmails = array_unique(array_merge($to !== '' ? CMailUtil::ExtractAllMailAddresses($to) : array(), $cc !== '' ? CMailUtil::ExtractAllMailAddresses($cc) : array(), $bcc !== '' ? CMailUtil::ExtractAllMailAddresses($bcc) : array()), SORT_STRING);
if ($mailboxID > 0) {
$dbMailbox = CMailBox::GetById($mailboxID);
$arMailbox = $dbMailbox->Fetch();
// POP3 mailboxes are ignored - they bound to single email
if ($arMailbox && $arMailbox['SERVER_TYPE'] === 'smtp' && (empty($crmEmail) || !in_array($crmEmail, $addresseeEmails, true))) {
return false;
}
}
$subject = isset($arMessageFields['SUBJECT']) ? $arMessageFields['SUBJECT'] : '';
$body = isset($arMessageFields['BODY']) ? $arMessageFields['BODY'] : '';
$arBodyEmails = null;
$userID = 0;
$parentID = 0;
$ownerTypeID = CCrmOwnerType::Undefined;
$ownerID = 0;
$addresserID = self::FindUserIDByEmail($addresserInfo['EMAIL']);
if ($addresserID > 0 && Bitrix\Crm\Integration\IntranetManager::isExternalUser($addresserID)) {
//Forget about extranet user
$addresserID = 0;
}
$arCommEmails = $addresserID <= 0 ? array($addresserInfo['EMAIL']) : ($crmEmail !== '' ? array_diff($addresseeEmails, array($crmEmail)) : $addresseeEmails);
//Trying to fix strange behaviour of array_diff under OPcache (issue #60862)
$arCommEmails = array_filter($arCommEmails);
$targInfo = CCrmActivity::ParseUrn(CCrmActivity::ExtractUrnFromMessage($arMessageFields, CCrmEMailCodeAllocation::GetCurrent()));
$targActivity = $targInfo['ID'] > 0 ? CCrmActivity::GetByID($targInfo['ID'], false) : null;
// Check URN
if (!$targActivity && (!isset($targActivity['URN']) || strtoupper($targActivity['URN']) !== strtoupper($targInfo['URN']))) {
$targActivity = null;
}
if ($targActivity) {
$postingID = self::ExtractPostingID($arMessageFields);
if ($postingID > 0 && isset($targActivity['ASSOCIATED_ENTITY_ID']) && intval($targActivity['ASSOCIATED_ENTITY_ID']) === $postingID) {
// Ignore - it is our message.
return false;
}
$parentID = $targActivity['ID'];
$subject = CCrmActivity::ClearUrn($subject);
if ($addresserID > 0) {
$userID = $addresserID;
} elseif (isset($targActivity['RESPONSIBLE_ID'])) {
$userID = $targActivity['RESPONSIBLE_ID'];
}
if (isset($targActivity['OWNER_TYPE_ID'])) {
$ownerTypeID = intval($targActivity['OWNER_TYPE_ID']);
}
if (isset($targActivity['OWNER_ID'])) {
$ownerID = intval($targActivity['OWNER_ID']);
}
$arCommData = self::ExtractCommsFromEmails($arCommEmails);
if ($ownerTypeID > 0 && $ownerID > 0) {
if (empty($arCommData)) {
if ($addresserID > 0) {
foreach ($addresseeEmails as $email) {
if ($email === $crmEmail) {
continue;
}
$arCommData = array(self::CreateComm($ownerTypeID, $ownerID, $email));
}
} else {
$arCommData = array(self::CreateComm($ownerTypeID, $ownerID, $addresserInfo['EMAIL']));
}
} elseif ($ownerTypeID !== CCrmOwnerType::Deal) {
//Check if owner in communications. Otherwise clear owner.
//There is only one exception for DEAL - it entity has no communications
$isOwnerInComms = false;
foreach ($arCommData as &$arCommItem) {
$commEntityTypeID = isset($arCommItem['ENTITY_TYPE_ID']) ? $arCommItem['ENTITY_TYPE_ID'] : CCrmOwnerType::Undefined;
$commEntityID = isset($arCommItem['ENTITY_ID']) ? $arCommItem['ENTITY_ID'] : 0;
if ($commEntityTypeID === $ownerTypeID && $commEntityID === $ownerID) {
$isOwnerInComms = true;
break;
}
}
unset($arCommItem);
if (!$isOwnerInComms) {
$ownerTypeID = CCrmOwnerType::Undefined;
$ownerID = 0;
}
}
}
} else {
if ($addresserID > 0) {
//It is email from registred user
$userID = $addresserID;
if (empty($arCommEmails)) {
$arBodyEmails = self::ExtractEmailsFromBody($body);
//Clear system user emails
if (!empty($arBodyEmails)) {
foreach ($arBodyEmails as $email) {
if (self::FindUserIDByEmail($email) <= 0) {
$arCommEmails[] = $email;
}
}
}
}
// Try to resolve communications
$arCommData = self::ExtractCommsFromEmails($arCommEmails);
} else {
//It is email from unknown user
//Try to resolve bindings from addresser
$arCommData = self::ExtractCommsFromEmails($arCommEmails);
if (!empty($arCommData)) {
// Try to resolve responsible user
foreach ($arCommData as &$arComm) {
$userID = self::ResolveResponsibleID($arComm['ENTITY_TYPE_ID'], $arComm['ENTITY_ID']);
if ($userID > 0) {
break;
}
}
unset($arComm);
}
}
// Try to resolve owner by old-style method-->
$arACTION_VARS = explode('&', $ACTION_VARS);
for ($i = 0, $ic = count($arACTION_VARS); $i < $ic; $i++) {
$v = $arACTION_VARS[$i];
if ($pos = strpos($v, '=')) {
$name = substr($v, 0, $pos);
${$name} = urldecode(substr($v, $pos + 1));
}
}
$arTypeNames = CCrmOwnerType::GetNames(array(CCrmOwnerType::Lead, CCrmOwnerType::Deal, CCrmOwnerType::Contact, CCrmOwnerType::Company));
foreach ($arTypeNames as $typeName) {
$regexVar = 'W_CRM_ENTITY_REGEXP_' . $typeName;
if (empty(${$regexVar})) {
continue;
}
$match = array();
if (preg_match('/' . ${$regexVar} . '/i' . BX_UTF_PCRE_MODIFIER, $subject, $match) === 1) {
$ownerID = intval($match[1]);
$ownerTypeID = CCrmOwnerType::ResolveID($typeName);
break;
}
}
// <-- Try to resolve owner by old-style method
// Filter communications by owner
if ($ownerTypeID > 0 && $ownerID > 0) {
if (!empty($arCommData)) {
foreach ($arCommData as $commKey => $arComm) {
if ($arComm['ENTITY_TYPE_ID'] === $ownerTypeID && $arComm['ENTITY_ID'] === $ownerID) {
continue;
}
unset($arCommData[$commKey]);
}
$arCommData = array_values($arCommData);
}
if (empty($arCommData)) {
if ($addresserID > 0) {
foreach ($addresseeEmails as $email) {
if ($email === $crmEmail) {
continue;
}
$arCommData = array(self::CreateComm($ownerTypeID, $ownerID, $email));
}
} else {
$arCommData = array(self::CreateComm($ownerTypeID, $ownerID, $addresserInfo['EMAIL']));
}
}
}
}
$arBindingData = self::ConvertCommsToBindings($arCommData);
// Check bindings for converted leads -->
// Not Existed entities are ignored. Converted leads are ignored if their associated entities (contacts, companies, deals) are contained in bindings.
$arCorrectedBindingData = array();
$arConvertedLeadData = array();
foreach ($arBindingData as $bindingKey => &$arBinding) {
if ($arBinding['TYPE_ID'] !== CCrmOwnerType::Lead) {
if (self::IsEntityExists($arBinding['TYPE_ID'], $arBinding['ID'])) {
$arCorrectedBindingData[$bindingKey] = $arBinding;
}
continue;
}
$arFields = self::GetEntity(CCrmOwnerType::Lead, $arBinding['ID'], array('STATUS_ID'));
if (!is_array($arFields)) {
continue;
}
if (isset($arFields['STATUS_ID']) && $arFields['STATUS_ID'] === 'CONVERTED') {
$arConvertedLeadData[$bindingKey] = $arBinding;
} else {
$arCorrectedBindingData[$bindingKey] = $arBinding;
}
}
unset($arBinding);
foreach ($arConvertedLeadData as &$arConvertedLead) {
$leadID = $arConvertedLead['ID'];
$exists = false;
$dbRes = CCrmCompany::GetListEx(array(), array('LEAD_ID' => $leadID, 'CHECK_PERMISSIONS' => 'N'), false, false, array('ID'));
if ($dbRes) {
while ($arRes = $dbRes->Fetch()) {
if (isset($arCorrectedBindingData[self::PrepareEntityKey(CCrmOwnerType::Company, $arRes['ID'])])) {
$exists = true;
break;
}
}
}
if ($exists) {
continue;
}
$dbRes = CCrmContact::GetListEx(array(), array('LEAD_ID' => $leadID, 'CHECK_PERMISSIONS' => 'N'), false, false, array('ID'));
if ($dbRes) {
while ($arRes = $dbRes->Fetch()) {
if (isset($arCorrectedBindingData[self::PrepareEntityKey(CCrmOwnerType::Contact, $arRes['ID'])])) {
$exists = true;
break;
}
}
}
if ($exists) {
continue;
}
$dbRes = CCrmDeal::GetListEx(array(), array('LEAD_ID' => $leadID, 'CHECK_PERMISSIONS' => 'N'), false, false, array('ID'));
if ($dbRes) {
while ($arRes = $dbRes->Fetch()) {
if (isset($arCorrectedBindingData[self::PrepareEntityKey(CCrmOwnerType::Deal, $arRes['ID'])])) {
$exists = true;
break;
}
}
}
if ($exists) {
continue;
}
$arCorrectedBindingData[self::PrepareEntityKey(CCrmOwnerType::Lead, $leadID)] = $arConvertedLead;
}
unset($arConvertedLead);
$arBindingData = $arCorrectedBindingData;
// <-- Check bindings for converted leads
// If no bindings are found then create new lead from this message
// Skip lead creation if email list is empty. Otherwise we will create lead with no email-addresses. It is absolutely useless.
$emailQty = count($arCommEmails);
if (empty($arBindingData) && $emailQty > 0) {
if (strtoupper(COption::GetOptionString('crm', 'email_create_lead_for_new_addresser', 'Y')) !== 'Y') {
// Creation of new lead is not allowed
return true;
}
//"Lead from forwarded email..." or "Lead from email..."
$title = $subject !== '' ? $subject : GetMessage($addresserID > 0 ? 'CRM_MAIL_LEAD_FROM_USER_EMAIL_TITLE' : 'CRM_MAIL_LEAD_FROM_EMAIL_TITLE', array('%SENDER%' => $addresserInfo['ORIGINAL']));
$comment = '';
if ($body !== '') {
// Remove extra new lines (fix for #31807)
$comment = preg_replace("/(\r\n|\n|\r)+/", '<br/>', htmlspecialcharsbx($body));
}
if ($comment === '') {
$comment = htmlspecialcharsbx($subject);
}
$name = '';
if ($addresserID <= 0) {
$name = $addresserInfo['NAME'];
} else {
//Try get name from body
for ($i = 0; $i < $emailQty; $i++) {
$email = $arCommEmails[$i];
$match = array();
if (preg_match('/"([^"]+)"\\s*<' . $email . '>/i' . BX_UTF_PCRE_MODIFIER, $body, $match) === 1 && count($match) > 1) {
$name = $match[1];
break;
}
if (preg_match('/"([^"]+)"\\s*[\\s*mailto\\:\\s*' . $email . ']/i' . BX_UTF_PCRE_MODIFIER, $body, $match) === 1 && count($match) > 1) {
$name = $match[1];
break;
}
}
if ($name === '') {
$name = $arCommEmails[0];
}
}
$arLeadFields = array('TITLE' => $title, 'NAME' => $name, 'STATUS_ID' => 'NEW', 'COMMENTS' => $comment, 'SOURCE_DESCRIPTION' => GetMessage('CRM_MAIL_LEAD_FROM_EMAIL_SOURCE', array('%SENDER%' => $addresserInfo['ORIGINAL'])), 'OPENED' => 'Y', 'FM' => array('EMAIL' => array()));
$sourceList = CCrmStatus::GetStatusList('SOURCE');
$sourceID = COption::GetOptionString('crm', 'email_lead_source_id', '');
if ($sourceID === '' || !isset($sourceList[$sourceID])) {
if (isset($sourceList['EMAIL'])) {
$sourceID = 'EMAIL';
} elseif (isset($sourceList['OTHER'])) {
$sourceID = 'OTHER';
}
}
if ($sourceID !== '') {
$arLeadFields['SOURCE_ID'] = $sourceID;
}
$responsibleID = intval(COption::GetOptionString('crm', 'email_lead_responsible_id', 0));
if ($responsibleID > 0) {
$arLeadFields['CREATED_BY_ID'] = $arLeadFields['MODIFY_BY_ID'] = $arLeadFields['ASSIGNED_BY_ID'] = $responsibleID;
if ($userID === 0) {
$userID = $responsibleID;
}
}
for ($i = 0; $i < $emailQty; $i++) {
$arLeadFields['FM']['EMAIL']['n' . ($i + 1)] = array('VALUE_TYPE' => 'WORK', 'VALUE' => $arCommEmails[$i]);
}
$leadEntity = new CCrmLead(false);
$leadID = $leadEntity->Add($arLeadFields, true, array('DISABLE_USER_FIELD_CHECK' => true, 'REGISTER_SONET_EVENT' => true, 'CURRENT_USER' => $responsibleID));
// TODO: log error
if ($leadID > 0) {
$arBizProcErrors = array();
CCrmBizProcHelper::AutoStartWorkflows(CCrmOwnerType::Lead, $leadID, CCrmBizProcEventType::Create, $arBizProcErrors);
$arCommData = array();
for ($i = 0; $i < $emailQty; $i++) {
$arCommData[] = self::CreateComm(CCrmOwnerType::Lead, $leadID, $arCommEmails[$i]);
}
$arBindingData = array(self::PrepareEntityKey(CCrmOwnerType::Lead, $leadID) => self::CreateBinding(CCrmOwnerType::Lead, $leadID));
}
}
// Terminate processing if no bindings are found.
if (empty($arBindingData)) {
// Try to export vcf-files before exit if email from registered user
if ($addresserID > 0) {
$dbAttachment = CMailAttachment::GetList(array(), array('MESSAGE_ID' => $msgID));
while ($arAttachment = $dbAttachment->Fetch()) {
if (GetFileExtension(strtolower($arAttachment['FILE_NAME'])) === 'vcf') {
if ($arAttachment['FILE_ID']) {
$arAttachment['FILE_DATA'] = CMailAttachment::getContents($arAttachment);
}
self::TryImportVCard($arAttachment['FILE_DATA']);
}
}
}
return false;
}
// If owner info not defined set it by default
if ($ownerID <= 0 || $ownerTypeID <= 0) {
if (count($arBindingData) > 1) {
// Search owner in specified order: Contact, Company, Lead.
$arTypeIDs = array(CCrmOwnerType::Contact, CCrmOwnerType::Company, CCrmOwnerType::Lead);
foreach ($arTypeIDs as $typeID) {
foreach ($arBindingData as &$arBinding) {
if ($arBinding['TYPE_ID'] === $typeID) {
$ownerTypeID = $typeID;
$ownerID = $arBinding['ID'];
break;
}
}
unset($arBinding);
if ($ownerID > 0 && $ownerTypeID > 0) {
break;
}
}
}
if ($ownerID <= 0 || $ownerTypeID <= 0) {
$arBinding = array_shift(array_values($arBindingData));
$ownerTypeID = $arBinding['TYPE_ID'];
$ownerID = $arBinding['ID'];
}
}
// Precessing of attachments -->
$attachmentMaxSizeMb = intval(COption::GetOptionString('crm', 'email_attachment_max_size', 16));
$attachmentMaxSize = $attachmentMaxSizeMb > 0 ? $attachmentMaxSizeMb * 1048576 : 0;
$arFilesData = array();
$dbAttachment = CMailAttachment::GetList(array(), array('MESSAGE_ID' => $msgID));
$arBannedAttachments = array();
while ($arAttachment = $dbAttachment->Fetch()) {
if ($arAttachment['FILE_NAME'] === '1.tmp') {
// HACK: For bug in module 'Mail'
continue;
} elseif (GetFileExtension(strtolower($arAttachment['FILE_NAME'])) === 'vcf') {
if ($arAttachment['FILE_ID']) {
$arAttachment['FILE_DATA'] = CMailAttachment::getContents($arAttachment);
}
self::TryImportVCard($arAttachment['FILE_DATA']);
}
$fileSize = isset($arAttachment['FILE_SIZE']) ? intval($arAttachment['FILE_SIZE']) : 0;
if ($fileSize <= 0) {
//Skip zero lenth files
continue;
}
if ($attachmentMaxSize > 0 && $fileSize > $attachmentMaxSize) {
//File size limit is exceeded
$arBannedAttachments[] = array('name' => $arAttachment['FILE_NAME'], 'size' => $fileSize);
continue;
}
if ($arAttachment['FILE_ID'] && empty($arAttachment['FILE_DATA'])) {
$arAttachment['FILE_DATA'] = CMailAttachment::getContents($arAttachment);
}
$arFilesData[] = array('name' => $arAttachment['FILE_NAME'], 'type' => $arAttachment['CONTENT_TYPE'], 'content' => $arAttachment['FILE_DATA'], 'MODULE_ID' => 'crm');
}
//<-- Precessing of attachments
// Remove extra new lines (fix for #31807)
$body = preg_replace("/(\r\n|\n|\r)+/", PHP_EOL, $body);
$encodedBody = htmlspecialcharsbx($body);
// Creating of new event -->
$arEventBindings = array();
foreach ($arBindingData as &$arBinding) {
$arEventBindings[] = array('ENTITY_TYPE' => $arBinding['TYPE_NAME'], 'ENTITY_ID' => $arBinding['ID']);
}
unset($arBinding);
$eventText = '';
$eventText .= '<b>' . GetMessage('CRM_EMAIL_SUBJECT') . '</b>: ' . $subject . PHP_EOL;
$eventText .= '<b>' . GetMessage('CRM_EMAIL_FROM') . '</b>: ' . $addresserInfo['EMAIL'] . PHP_EOL;
$eventText .= '<b>' . GetMessage('CRM_EMAIL_TO') . '</b>: ' . implode($addresseeEmails, '; ') . PHP_EOL;
if (!empty($arBannedAttachments)) {
$eventText .= '<b>' . GetMessage('CRM_EMAIL_BANNENED_ATTACHMENTS', array('%MAX_SIZE%' => $attachmentMaxSizeMb)) . '</b>: ';
foreach ($arBannedAttachments as &$attachmentInfo) {
$eventText .= GetMessage('CRM_EMAIL_BANNENED_ATTACHMENT_INFO', array('%NAME%' => $attachmentInfo['name'], '%SIZE%' => round($attachmentInfo['size'] / 1048576, 1)));
}
unset($attachmentInfo);
$eventText .= PHP_EOL;
}
$eventText .= $encodedBody;
$CCrmEvent = new CCrmEvent();
$CCrmEvent->Add(array('USER_ID' => $userID, 'ENTITY' => array_values($arEventBindings), 'ENTITY_TYPE' => CCrmOwnerType::ResolveName($ownerTypeID), 'ENTITY_ID' => $ownerID, 'EVENT_NAME' => GetMessage('CRM_EMAIL_GET_EMAIL'), 'EVENT_TYPE' => 2, 'EVENT_TEXT_1' => $eventText, 'FILES' => $arFilesData), false);
// <-- Creating of new event
// Creating new activity -->
$siteID = '';
$dbSites = CSite::GetList($by = 'sort', $order = 'desc', array('DEFAULT' => 'Y', 'ACTIVE' => 'Y'));
$defaultSite = is_object($dbSites) ? $dbSites->Fetch() : null;
if (is_array($defaultSite)) {
$siteID = $defaultSite['LID'];
}
if ($siteID === '') {
$siteID = 's1';
}
$storageTypeID = CCrmActivity::GetDefaultStorageTypeID();
$arElementIDs = array();
foreach ($arFilesData as $fileData) {
$fileID = CFile::SaveFile($fileData, 'crm');
if ($fileID > 0) {
$elementID = StorageManager::saveEmailAttachment(CFile::GetFileArray($fileID), $storageTypeID, $siteID);
if ($elementID > 0) {
$arElementIDs[] = (int) $elementID;
}
}
}
$descr = preg_replace("/(\r\n|\n|\r)+/", '<br/>', $encodedBody);
$now = ConvertTimeStamp(time() + CTimeZone::GetOffset(), 'FULL', $siteID);
$direction = CCrmActivityDirection::Incoming;
$completed = 'N';
// Incomming emails must be marked as 'Not Completed'.
if ($addresserID > 0 && ActivitySettings::getValue(ActivitySettings::MARK_FORWARDED_EMAIL_AS_OUTGOING)) {
$direction = CCrmActivityDirection::Outgoing;
$completed = 'Y';
}
$arActivityFields = array('OWNER_ID' => $ownerID, 'OWNER_TYPE_ID' => $ownerTypeID, 'TYPE_ID' => CCrmActivityType::Email, 'ASSOCIATED_ENTITY_ID' => 0, 'PARENT_ID' => $parentID, 'SUBJECT' => $subject, 'START_TIME' => $now, 'END_TIME' => $now, 'COMPLETED' => $completed, 'AUTHOR_ID' => $userID, 'RESPONSIBLE_ID' => $userID, 'PRIORITY' => CCrmActivityPriority::Medium, 'DESCRIPTION' => $descr, 'DESCRIPTION_TYPE' => CCrmContentType::Html, 'DIRECTION' => $direction, 'LOCATION' => '', 'NOTIFY_TYPE' => CCrmActivityNotifyType::None, 'STORAGE_TYPE_ID' => $storageTypeID, 'STORAGE_ELEMENT_IDS' => $arElementIDs);
$arActivityFields['BINDINGS'] = array();
foreach ($arBindingData as &$arBinding) {
$entityTypeID = $arBinding['TYPE_ID'];
$entityID = $arBinding['ID'];
if ($entityTypeID <= 0 || $entityID <= 0) {
continue;
}
$arActivityFields['BINDINGS'][] = array('OWNER_TYPE_ID' => $entityTypeID, 'OWNER_ID' => $entityID);
}
unset($arBinding);
$activityID = CCrmActivity::Add($arActivityFields, false, false, array('REGISTER_SONET_EVENT' => true));
if ($activityID > 0 && !empty($arCommData)) {
CCrmActivity::SaveCommunications($activityID, $arCommData, $arActivityFields, false, false);
$arActivityFields['COMMUNICATIONS'] = $arCommData;
}
//Notity responsible user
if ($userID > 0 && $direction === CCrmActivityDirection::Incoming) {
CCrmActivity::Notify($arActivityFields, CCrmNotifierSchemeType::IncomingEmail);
}
// <-- Creating new activity
return true;
}
if (count($domains) > 0) {
$arFields["EMAIL"] = $arFields["EMAIL"] . "@" . $_POST['EMAIL_DOMAIN'];
}
}
$arFields["MAIL_FILTER_ID"] = $_POST["EMAIL_FORUM_MAILBOX"];
if (CForumEMail::Set($arFields) > 0) {
LocalRedirect(CComponentEngine::MakePathFromTemplate($arParams["URL_TEMPLATES_TOPIC_LIST"], array("FID" => $arParams["FID"], "UID" => $arParams["USER_ID"], "GID" => $arParams["SOCNET_GROUP_ID"])));
}
}
} else {
if ($_POST["EMAIL_FORUM_MAILBOX"] == "!") {
$arMailboxFields = array("LID" => SITE_ID, "SERVER_TYPE" => "pop3", "ACTIVE" => "Y", "NAME" => $_POST["EMAIL_FORUM_MAILBOX_NAME"], "SERVER" => $_POST["EMAIL_FORUM_MAILBOX_SERVER"], "PORT" => $_POST["EMAIL_FORUM_MAILBOX_PORT"], "LOGIN" => $_POST["EMAIL_FORUM_MAILBOX_LOGIN"], "PASSWORD" => $_POST["EMAIL_FORUM_MAILBOX_PASSWORD"], "USE_TLS" => $_POST["EMAIL_FORUM_MAILBOX_SSL"], "DELETE_MESSAGES" => $_POST["EMAIL_FORUM_MAILBOX_DELETE_MESSAGES"], "PERIOD_CHECK" => 5);
$MAILBOX_ID = CMailBox::Add($arMailboxFields);
} elseif (substr($_POST["EMAIL_FORUM_MAILBOX"], 0, 1) == 'M') {
$MAILBOX_ID = substr($_POST["EMAIL_FORUM_MAILBOX"], 1);
$dbrMailF = CMailBox::GetById($MAILBOX_ID);
if (($arMailF = $dbrMailF->GetNext()) && $arMailF['SERVER_TYPE'] == 'smtp') {
$arFields["EMAIL_GROUP"] = '';
$domains = preg_split("/[\r\n]+/", $arMailF['DOMAINS'], -1, PREG_SPLIT_NO_EMPTY);
if (count($domains) > 0) {
$arFields["EMAIL"] = $arFields["EMAIL"] . "@" . $_POST['EMAIL_DOMAIN'];
}
} else {
$MAILBOX_ID = 0;
}
}
if ($MAILBOX_ID > 0) {
$arMailFilterFields = array("MAILBOX_ID" => $MAILBOX_ID, "NAME" => GetMessage("SOCNET_FORUM_TL_EMAIL_RULE"), "ACTION_TYPE" => "forumsocnet", "ACTION_VARS" => "", "WHEN_MAIL_RECEIVED" => "Y", "WHEN_MANUALLY_RUN" => "Y");
$MAIL_FILTER_ID = CMailFilter::Add($arMailFilterFields);
$arFields["MAIL_FILTER_ID"] = $MAIL_FILTER_ID;
if (CForumEMail::Set($arFields) > 0) {
if ($arSettings['SERVER_TYPE'] === 'pop3' && isset($arSettings['SERVER']) && $arSettings['SERVER'] !== '' && isset($arSettings['LOGIN']) && $arSettings['LOGIN'] !== '') {
$mailBoxEntity = new CMailBox(false);
$arCheck = $mailBoxEntity->Check($arSettings['SERVER'], $arSettings['PORT'], $arSettings['USE_TLS'], $arSettings['LOGIN'], $arSettings['PASSWORD']);
if (!$arCheck[0]) {
ShowError(GetMessage('CRM_ERROR_CHECK_SERVER_CONNECTION', array('#SERVER#' => $arSettings['SERVER'], '#ERROR#' => $arCheck[1])));
}
}
// Preparing mail box list
$arResult['MAILBOXES_LIST'] = array('-1' => GetMessage('CRM_EMAIL_MAILBOX_SEL'));
// a. Selection of smtp servers
$rsMailFilter = CMailFilter::GetList(array(), array('SERVER_TYPE' => 'smtp', 'EMPTY' => 'Y'));
while ($arMailF = $rsMailFilter->Fetch()) {
$arResult['MAILBOXES_LIST'][$arMailF['MAILBOX_ID']] = $arMailF['MAILBOX_NAME'];
if ($arMailF['MAILBOX_TYPE'] == 'smtp' && count($arMailF['DOMAINS']) > 0) {
$mailBoxID = $arMailF['MAILBOX_ID'];
$rsMailbox = CMailBox::GetById($mailBoxID);
$arMailbox = $rsMailbox->Fetch();
if (!is_array($arMailbox)) {
continue;
}
$arSettings['MAILBOXES'][$mailBoxID] = array('ID' => $mailBoxID, 'SERVER_TYPE' => 'smtp', 'SMTP_DOMAIN' => preg_split("/[\r\n]+/", $arMailF['DOMAINS'], -1, PREG_SPLIT_NO_EMPTY), 'SMTP_EMAIL' => $mailBoxID === $arSettings['MAILBOX_ID'] ? $arSettings['EMAIL_LOCAL_PART'] : '');
}
}
// b. Selection of pop3 servers
$pop3MailBoxExist = false;
//$rsMailFilter = CMailFilter::GetList(array(), array('SERVER_TYPE' => 'pop3'));
//while($arMailF = $rsMailFilter->Fetch())
$rsMailBoxes = CMailBox::GetList(array(), array('SERVER_TYPE' => 'pop3'));
while ($arMailBox = $rsMailBoxes->Fetch()) {
//$mailBoxID = intval($arMailF['MAILBOX_ID']);
//$rsMailbox = CMailBox::GetById($mailBoxID);