function EMailMessageAdd($arMessageFields, $ACTION_VARS)
{
$arActionVars = explode("&", $ACTION_VARS);
$countAr = count($arActionVars);
for ($i = 0; $i < $countAr; $i++) {
$v = $arActionVars[$i];
if ($pos = strpos($v, "=")) {
${substr($v, 0, $pos)} = urldecode(substr($v, $pos + 1));
}
}
if (!CModule::IncludeModule("support")) {
return false;
}
if (strlen($W_SUPPORT_SITE_ID) > 0) {
$rs = CSite::GetByID($W_SUPPORT_SITE_ID);
if ($ar = $rs->Fetch()) {
$SITE_ID = $ar["LID"];
}
}
if (strlen($SITE_ID) <= 0) {
$SITE_ID = $arMessageFields["LID"];
}
$sourceMail = COption::GetOptionString("support", "SOURCE_MAIL");
$dbr = CTicketDictionary::GetBySID($sourceMail, "SR", $SITE_ID);
if (!($ar = $dbr->Fetch())) {
return false;
}
$TICKET_SOURCE_ID = $ar["ID"];
$ID = $arMessageFields["ID"];
$message_email = strlen($arMessageFields["FIELD_REPLY_TO"]) > 0 ? $arMessageFields["FIELD_REPLY_TO"] : $arMessageFields["FIELD_FROM"];
$message_email_addr = strtolower(CMailUtil::ExtractMailAddress($message_email));
$TID = 0;
$arSubjects = explode("\n", trim($W_SUPPORT_SUBJECT));
$countAr = count($arSubjects);
for ($i = 0; $i < $countAr; $i++) {
$arSubjects[$i] = Trim($arSubjects[$i]);
if (strlen($arSubjects[$i]) > 0) {
if (preg_match("/" . $arSubjects[$i] . "/" . BX_UTF_PCRE_MODIFIER, $arMessageFields["SUBJECT"], $regs)) {
$TID = IntVal($regs[1]);
break;
}
}
}
if ($TID > 0) {
$db_ticket = CTicket::GetByID($TID, $SITE_ID, "N", "N", "N");
if ($ar_ticket = $db_ticket->Fetch()) {
//check user email address limits
if ($W_SUPPORT_SEC == "domain" || $W_SUPPORT_SEC == "email") {
$bEMailOK = false;
if ($TICKET_SOURCE_ID == $ar_ticket["SOURCE_ID"]) {
$ticket_email = strtolower(CMailUtil::ExtractMailAddress($ar_ticket["OWNER_SID"]));
if ($W_SUPPORT_SEC == "domain") {
$ticket_email = substr($ticket_email, strpos($ticket_email, "@"));
}
if (strpos($message_email_addr, $ticket_email) !== false) {
$bEMailOK = true;
}
}
if (!$bEMailOK && $ar_ticket["OWNER_USER_ID"] > 0) {
$db_user = CUser::GetByID($ar_ticket["OWNER_USER_ID"]);
if ($arUser = $db_user->Fetch()) {
$ticket_email = strtolower(CMailUtil::ExtractMailAddress($arUser["EMAIL"]));
if ($check_type == "domain") {
$ticket_email = substr($ticket_email, strpos($ticket_email, "@"));
}
if (strpos($message_email_addr, $ticket_email) !== false) {
$bEMailOK = true;
}
}
}
if (!$bEMailOK) {
$TID = 0;
}
}
} else {
$TID = 0;
}
}
//when message subject is empty - generate it from message body
$title = trim($arMessageFields["SUBJECT"]);
if (strlen($title) <= 0) {
$title = trim($arMessageFields["BODY"]);
$title = preg_replace("/[\n\r\t ]+/s" . BX_UTF_PCRE_MODIFIER, " ", $title);
$title = substr($title, 0, 50);
}
$arFieldsTicket = array("CLOSE" => "N", "TITLE" => $title, "MESSAGE" => $arMessageFields["BODY"], "MESSAGE_AUTHOR_SID" => $message_email, "MESSAGE_SOURCE_SID" => "email", "MODIFIED_MODULE_NAME" => "mail", "EXTERNAL_ID" => $ID, "EXTERNAL_FIELD_1" => $arMessageFields["HEADER"]);
if ($W_SUPPORT_USER_FIND == "Y") {
$o = "LAST_LOGIN";
$b = "DESC";
$res = CUser::GetList($o, $b, array("ACTIVE" => "Y", "=EMAIL" => $message_email_addr));
if (($arr = $res->Fetch()) && strtolower(CMailUtil::ExtractMailAddress($arr["EMAIL"])) == $message_email_addr) {
$AUTHOR_USER_ID = $arr["ID"];
}
}
// process attach files
$arFILES = array();
$rsAttach = CMailAttachment::GetList(array(), array("MESSAGE_ID" => $ID));
while ($arAttach = $rsAttach->Fetch()) {
// save from db to hdd
$filename = CTempFile::GetFileName(md5(uniqid("")) . ".tmp");
CheckDirPath($filename);
if (file_put_contents($filename, $arAttach["FILE_DATA"]) !== false) {
$arFILES[] = array("name" => $arAttach["FILE_NAME"], "type" => $arAttach["CONTENT_TYPE"], "size" => filesize($filename), "tmp_name" => $filename, "MODULE_ID" => "support");
}
}
if (count($arFILES) > 0) {
$arFieldsTicket["FILES"] = $arFILES;
}
$arFieldsTicket["CURRENT_USER_ID"] = null;
if (intval($AUTHOR_USER_ID) > 0) {
$resU = CUser::GetByID(intval($AUTHOR_USER_ID));
if ($arU = $resU->Fetch()) {
$arFieldsTicket["CURRENT_USER_ID"] = $arU["ID"];
}
}
if ($TID > 0) {
$arFieldsTicket["MESSAGE_AUTHOR_USER_ID"] = $AUTHOR_USER_ID;
if ($W_SUPPORT_ADD_MESSAGE_AS_HIDDEN == "Y") {
$arFieldsTicket["HIDDEN"] = "Y";
}
if ($arMessageFields["SPAM"] == "Y") {
$arFieldsTicket["IS_SPAM"] = "Y";
}
$TID = CTicket::Set($arFieldsTicket, $MESSAGE_ID, $TID, "N");
} else {
$arFieldsTicket["SITE_ID"] = $SITE_ID;
$arFieldsTicket["OWNER_USER_ID"] = $AUTHOR_USER_ID;
$arFieldsTicket["OWNER_SID"] = $message_email;
$arFieldsTicket["CREATED_MODULE_NAME"] = "mail";
$arFieldsTicket["SOURCE_SID"] = "email";
if ($arMessageFields["SPAM"] == "Y") {
$arFieldsTicket["IS_SPAM"] = "Y";
}
if ($W_SUPPORT_CATEGORY > 0) {
$arFieldsTicket["CATEGORY_ID"] = $W_SUPPORT_CATEGORY;
}
if ($W_SUPPORT_CRITICALITY > 0) {
$arFieldsTicket["CRITICALITY_ID"] = $W_SUPPORT_CRITICALITY;
}
if (strlen(trim($arFieldsTicket["TITLE"])) <= 0) {
$arFieldsTicket["TITLE"] = " ";
}
if (strlen(trim($arFieldsTicket["MESSAGE"])) <= 0) {
$arFieldsTicket["MESSAGE"] = " ";
}
$TID = CTicket::Set($arFieldsTicket, $MESSAGE_ID, "", "N");
}
}
function Set_InitVar(&$arFields, $id, $checkRights, $sendEmailToAuthor, $sendEmailToTechsupport)
{
global $APPLICATION, $USER, $DB;
$f = self::GetCSupportTableFields("b_ticket");
$v = (object) array();
if (!is_object($USER)) {
$USER = new CUser();
}
$uid = $USER->GetID();
if (isset($arFields["CURRENT_USER_ID"]) && intval($arFields["CURRENT_USER_ID"]) > 0) {
$uid = intval($arFields["CURRENT_USER_ID"]);
}
$f->ID = intval($id);
$v->isNew = $f->ID <= 0;
$v->CHECK_RIGHTS = $checkRights == "Y" ? "Y" : "N";
$v->SEND_EMAIL_TO_AUTHOR = $sendEmailToAuthor == "Y" ? "Y" : "N";
$v->SEND_EMAIL_TO_TECHSUPPORT = $sendEmailToTechsupport == "Y" ? "Y" : "N";
$v->newSLA = false;
// заголовок и сообщение - обязательные поля для нового обращения
if ($v->isNew) {
if (strlen($arFields["TITLE"]) <= 0) {
$APPLICATION->ThrowException(GetMessage('SUP_ERROR_EMPTY_TITLE'));
return false;
}
if (strlen($arFields["MESSAGE"]) <= 0) {
$APPLICATION->ThrowException(GetMessage('SUP_ERROR_EMPTY_MESSAGE'));
return false;
}
}
if (is_object($APPLICATION)) {
$APPLICATION->ResetException();
}
if (!$GLOBALS["USER_FIELD_MANAGER"]->CheckFields("SUPPORT", $f->ID, $arFields)) {
if (is_object($APPLICATION) && $APPLICATION->GetException()) {
return false;
} else {
$APPLICATION->ThrowException("Unknown error. ");
return false;
}
}
// установка прав
$v->bAdmin = $v->bSupportTeam = $v->bSupportClient = $v->bDemo = $v->bOwner = false;
if ($v->CHECK_RIGHTS == "Y") {
$v->uid = $uid;
$v->bAdmin = CTicket::IsAdmin($uid);
$v->bSupportTeam = CTicket::IsSupportTeam($uid);
$v->bSupportClient = CTicket::IsSupportClient($uid);
$v->bDemo = CTicket::IsDemo($uid);
if ($v->isNew) {
$v->bOwner = true;
} else {
$v->bOwner = CTicket::IsOwner($f->ID, $v->uid);
}
} else {
$v->bAdmin = $v->bSupportTeam = $v->bSupportClient = $v->bDemo = $v->bOwner = true;
$v->uid = 0;
}
if (!$v->bAdmin && !$v->bSupportTeam && !$v->bSupportClient) {
return false;
}
if (!$v->bAdmin && !$v->bSupportTeam && ($v->bDemo && !$v->bOwner)) {
return false;
}
// Это спам?
$f->FromArray($arFields, "IS_SPAM");
$v->bActiveCoupon = false;
$f->FromArray($_SESSION, array("MODIFIED_GUEST_ID" => "SESS_GUEST_ID"), array(CSupportTableFields::MORE0));
$f->FromArray($arFields, "OWNER_USER_ID,OWNER_SID,HOLD_ON", array(CSupportTableFields::MORE0, CSupportTableFields::NOT_EMTY_STR));
// получим SITE_ID
if (strlen($arFields["SITE_ID"]) > 0) {
$f->SITE_ID = $arFields["SITE_ID"];
} elseif (strlen($arFields["SITE"]) > 0) {
$f->SITE_ID = $arFields["SITE"];
} elseif (strlen($arFields["LANG"]) > 0) {
$f->SITE_ID = $arFields["LANG"];
} else {
$f->SITE_ID = SITE_ID;
}
// получаем ID записей справочника по SID
$arr = array("CATEGORY" => "C", "CRITICALITY" => "K", "STATUS" => "S", "MARK" => "M", "SOURCE" => "SR", "MESSAGE_SOURCE" => "SR", "DIFFICULTY" => "D");
foreach ($arr as $key => $value) {
if ((array_key_exists($key . "_ID", $arFields) || intval($arFields[$key . "_ID"]) <= 0) && array_key_exists($key . "_SID", $arFields) && strlen($arFields[$key . "_SID"]) > 0) {
$z = CTicketDictionary::GetBySID($arFields[$key . "_SID"], $value, $f->SITE_ID);
$zr = $z->Fetch();
$arFields[$key . "_ID"] = $zr["ID"];
}
}
return array("v" => $v, "f" => $f);
}
