/**
* Add single mail
*
* @access public
* @param void
* @return null
*/
function add_mail()
{
if (logged_user()->isGuest()) {
flash_error(lang('no access permissions'));
ajx_current("empty");
return;
}
$this->addHelper('textile');
$mail_accounts = MailAccounts::getMailAccountsByUser(logged_user());
if (count($mail_accounts) < 1) {
flash_error(lang('no mail accounts set'));
ajx_current("empty");
return;
}
$this->setTemplate('add_mail');
$mail_data = array_var($_POST, 'mail');
$sendBtnClick = array_var($mail_data, 'sendBtnClick', '') == 'true' ? true : false;
$isDraft = array_var($mail_data, 'isDraft', '') == 'true' ? true : false;
$isUpload = array_var($mail_data, 'isUpload', '') == 'true' ? true : false;
$autosave = array_var($mail_data, 'autosave', '') == 'true';
$id = array_var($mail_data, 'id');
$mail = MailContents::findById($id);
$isNew = false;
if (!$mail) {
$isNew = true;
$mail = new MailContent();
}
tpl_assign('mail_to', urldecode(array_var($_GET, 'to')));
tpl_assign('link_to_objects', array_var($_GET, 'link_to_objects'));
$def_acc_id = $this->getDefaultAccountId();
if ($def_acc_id > 0) {
$def_acc = MailAccounts::getAccountById($def_acc_id);
if ($def_acc instanceof MailAccount) {
tpl_assign('default_account', $def_acc);
}
}
tpl_assign('mail', $mail);
tpl_assign('mail_data', $mail_data);
tpl_assign('mail_accounts', $mail_accounts);
Hook::fire('send_to', array_var($_GET, 'ids'), array_var($_GET, 'me'));
// Form is submited
if (is_array($mail_data)) {
$account = MailAccounts::findById(array_var($mail_data, 'account_id'));
if (!$account instanceof MailAccount) {
flash_error(lang('mail account dnx'));
ajx_current("empty");
return;
}
$accountUser = MailAccountContacts::getByAccountAndContact($account, logged_user());
if (!$accountUser instanceof MailAccountContact) {
flash_error(lang('no access permissions'));
ajx_current("empty");
return;
}
if ($account->getOutgoingTrasnportType() == 'ssl' || $account->getOutgoingTrasnportType() == 'tls') {
$available_transports = stream_get_transports();
if (array_search($account->getOutgoingTrasnportType(), $available_transports) === FALSE) {
flash_error('The server does not support SSL.');
ajx_current("empty");
return;
}
}
$cp_errs = $this->checkRequiredCustomPropsBeforeSave(array_var($_POST, 'object_custom_properties', array()));
if (is_array($cp_errs) && count($cp_errs) > 0) {
foreach ($cp_errs as $err) {
flash_error($err);
}
ajx_current("empty");
return;
}
$subject = array_var($mail_data, 'subject');
$body = array_var($mail_data, 'body');
if (($pre_body_fname = array_var($mail_data, 'pre_body_fname')) != "") {
$body = str_replace(lang('content too long not loaded'), '', $body, $count = 1);
$tmp_filename = ROOT . "/tmp/{$pre_body_fname}";
if (is_file($tmp_filename)) {
$body .= file_get_contents($tmp_filename);
if (!$isDraft) {
@unlink($tmp_filename);
}
}
}
if (array_var($mail_data, 'format') == 'html') {
$css = "font-family:sans-serif,Arial,Verdana; font-size:14px; line-height:1.6; color:#222;";
Hook::fire('email_base_css', null, $css);
str_replace(array("\r", "\n"), "", $css);
$body = '<div style="' . $css . '">' . $body . '</div>';
$body = str_replace('<blockquote>', '<blockquote style="border-left:1px solid #987ADD;padding-left:10px;">', $body);
}
$type = 'text/' . array_var($mail_data, 'format');
$to = trim(array_var($mail_data, 'to'));
if (str_ends_with($to, ",") || str_ends_with($to, ";")) {
$to = substr($to, 0, strlen($to) - 1);
}
$mail_data['to'] = $to;
$cc = trim(array_var($mail_data, 'cc'));
if (str_ends_with($cc, ",") || str_ends_with($cc, ";")) {
$cc = substr($cc, 0, strlen($cc) - 1);
}
$mail_data['cc'] = $cc;
$bcc = trim(array_var($mail_data, 'bcc'));
if (str_ends_with($bcc, ",") || str_ends_with($bcc, ";")) {
$bcc = substr($bcc, 0, strlen($bcc) - 1);
}
$mail_data['bcc'] = $bcc;
if (!$isDraft && trim($to . $cc . $bcc) == '') {
flash_error(lang('recipient must be specified'));
ajx_current("empty");
return;
}
$invalid_to = MailUtilities::validate_email_addresses($to);
if (is_array($invalid_to)) {
flash_error(lang('error invalid recipients', lang('mail to'), implode(", ", $invalid_to)));
ajx_current("empty");
return;
}
$invalid_cc = MailUtilities::validate_email_addresses($cc);
if (is_array($invalid_cc)) {
flash_error(lang('error invalid recipients', lang('mail CC'), implode(", ", $invalid_cc)));
ajx_current("empty");
return;
}
$invalid_bcc = MailUtilities::validate_email_addresses($bcc);
if (is_array($invalid_bcc)) {
flash_error(lang('error invalid recipients', lang('mail BCC'), implode(", ", $invalid_bcc)));
ajx_current("empty");
return;
}
$last_mail_in_conversation = array_var($mail_data, 'last_mail_in_conversation');
$conversation_id = array_var($mail_data, 'conversation_id');
if ($last_mail_in_conversation && $conversation_id) {
$new_mail_in_conversation = MailContents::getLastMailIdInConversation($conversation_id, true);
if ($new_mail_in_conversation != $last_mail_in_conversation) {
ajx_current("empty");
evt_add("new email in conversation", array('id' => $new_mail_in_conversation, 'genid' => array_var($_POST, 'instanceName')));
return;
}
}
$mail->setFromAttributes($mail_data);
$mail->setTo($to);
$mail->setCc($cc);
$mail->setBcc($bcc);
$mail->setSubject($mail_data['subject']);
$utils = new MailUtilities();
// attachment
$linked_attachments = array();
$attachments = array();
$project_files_attachments = array();
$objects = array_var($_POST, 'linked_objects');
$attach_contents = array_var($_POST, 'attach_contents', array());
$original_email = isset($mail_data['original_id']) ? MailContents::findById($mail_data['original_id']) : null;
if (is_array($objects)) {
$err = 0;
$count = -1;
foreach ($objects as $objid) {
$count++;
$split = explode(":", $objid);
if (count($split) == 2) {
$object = Objects::instance()->findObject($split[1]);
} else {
if (count($split) == 4) {
if ($split[0] == 'FwdMailAttach') {
$tmp_filename = ROOT . "/tmp/" . logged_user()->getId() . "_" . ($original_email ? $original_email->getAccountId() : $mail_data['account_id']) . "_FwdMailAttach_" . $split[3];
if (is_file($tmp_filename)) {
$attachments[] = array("data" => file_get_contents($tmp_filename), "name" => $split[1], "type" => $split[2]);
continue;
}
}
}
}
if (!isset($object) || !$object) {
flash_error(lang('file dnx'));
$err++;
} else {
if (isset($attach_contents[$count])) {
if ($split[0] == 'ProjectFiles') {
$file = ProjectFiles::findById($object->getId());
if (!$file instanceof ProjectFile) {
flash_error(lang('file dnx'));
$err++;
}
// if
// if(!$file->canDownload(logged_user())) {
// flash_error(lang('no access permissions'));
// $err++;
// } // if
$project_files_attachments[] = $file;
$attachments[] = array("data" => $file->getFileContent(), "name" => $file->getFilename(), "type" => $file->getTypeString());
} else {
if ($split[0] == 'MailContents') {
$email = MailContents::findById($object->getId());
if (!$email instanceof MailContent) {
flash_error(lang('email dnx'));
$err++;
}
// if
if (!$email->canView(logged_user())) {
flash_error(lang('no access permissions'));
$err++;
}
// if
$attachments[] = array("data" => $email->getContent(), "name" => $email->getSubject() . ".eml", "type" => 'message/rfc822');
}
}
} else {
$linked_attachments[] = array("data" => $object->getViewUrl(), "name" => clean($object->getObjectName()), "type" => lang($object->getObjectTypeName()), "id" => $object->getId());
}
}
}
if ($err > 0) {
flash_error(lang('some objects could not be linked', $err));
ajx_current('empty');
return;
}
}
$to = preg_split('/;|,/', $to);
$to = $utils->parse_to($to);
if ($body == '') {
$body .= ' ';
}
try {
$linked_users = array();
//create contacts from recipients of email
if (user_config_option('create_contacts_from_email_recipients') || can_manage_contacts(logged_user())) {
foreach ($to as $to_user) {
$linked_user = Contacts::getByEmail($to_user[1]);
if (!$linked_user instanceof Contact) {
try {
DB::beginWork();
$linked_user = create_user_from_email($to_user[1], $to_user[0], null, false);
DB::commit();
} catch (Exception $e) {
Logger::log($e->getMessage());
DB::rollback();
}
}
if ($linked_user instanceof Contact) {
$linked_users[] = $linked_user;
}
}
}
if (count($linked_attachments)) {
$linked_atts = $type == 'text/html' ? '<div style="font-family:arial;"><br><br><br><span style="font-size:12pt;font-weight:bold;color:#777">' . lang('linked attachments') . '</span><ul>' : "\n\n\n-----------------------------------------\n" . lang('linked attachments') . "\n\n";
foreach ($linked_attachments as $att) {
$linked_atts .= $type == 'text/html' ? '<li><a href="' . $att['data'] . '">' . $att['name'] . ' (' . $att['type'] . ')</a></li>' : $att['name'] . ' (' . $att['type'] . '): ' . $att['data'] . "\n";
foreach ($linked_users as $linked_user) {
try {
$linked_user->giveAccessToObject(Objects::findObject($att['id']));
} catch (Exception $e) {
//Logger::log($e->getMessage());
}
}
}
$linked_atts .= $type == 'text/html' ? '</ul></div>' : '';
} else {
$linked_atts = '';
}
$body .= $linked_atts;
if (count($attachments) > 0) {
$i = 0;
$str = "";
/* foreach ($attachments as $att) {
$str .= "--000000000000000000000000000$i\n";
$str .= "Name: ".$att['name'] .";\n";
$str .= "Type: ".$att['type'] .";\n";
//$str .= "Encoding: ".$att['type'] .";\n";
$str .= base64_encode($att['data']) ."\n";
$str .= "--000000000000000000000000000$i--\n";
$i++;
}
*/
$str = "#att_ver 2\n";
foreach ($attachments as $att) {
$rep_id = $utils->saveContent($att['data']);
if (str_starts_with($att['name'], "#")) {
$att['name'] = str_replace_first("#", "@@sharp@@", $att['name']);
}
$str .= $att['name'] . "|" . $att['type'] . "|" . $rep_id . "\n";
}
// save attachments, when mail is sent this file is deleted and full content is saved
$repository_id = $utils->saveContent($str);
if (!$isNew) {
if (FileRepository::isInRepository($mail->getContentFileId())) {
// delete old attachments
$content = FileRepository::getFileContent($mail->getContentFileId());
if (str_starts_with($content, "#att_ver")) {
$lines = explode("\n", $content);
foreach ($lines as $line) {
if (!str_starts_with($line, "#") && trim($line) !== "") {
$data = explode("|", $line);
if (isset($data[2]) && FileRepository::isInRepository($data[2])) {
FileRepository::deleteFile($data[2]);
}
}
}
}
FileRepository::deleteFile($mail->getContentFileId());
}
}
$mail->setContentFileId($repository_id);
}
$mail->setHasAttachments(is_array($attachments) && count($attachments) > 0 ? 1 : 0);
$mail->setAccountEmail($account->getEmailAddress());
$mail->setSentDate(DateTimeValueLib::now());
$mail->setReceivedDate(DateTimeValueLib::now());
DB::beginWork();
$msg_id = MailUtilities::generateMessageId($account->getEmailAddress());
$conversation_id = array_var($mail_data, 'conversation_id');
$in_reply_to_id = array_var($mail_data, 'in_reply_to_id');
if ($conversation_id) {
$in_reply_to = MailContents::findById(array_var($mail_data, 'original_id'));
if ($in_reply_to instanceof MailContent && $in_reply_to->getSubject() && strpos(strtolower($mail->getSubject()), strtolower($in_reply_to->getSubject())) === false) {
$conversation_id = null;
$in_reply_to_id = '';
}
}
if (!$conversation_id) {
$conversation_id = MailContents::getNextConversationId($account->getId());
}
$mail->setMessageId($msg_id);
$mail->setConversationId($conversation_id);
$mail->setInReplyToId($in_reply_to_id);
$mail->setUid(gen_id());
$mail->setState($isDraft && !$sendBtnClick ? 2 : 200);
set_user_config_option('last_mail_format', array_var($mail_data, 'format', 'plain'), logged_user()->getId());
$body = utf8_safe($body);
if (array_var($mail_data, 'format') == 'html') {
$body = preg_replace("/<body*[^>]*>/i", '<body>', $body);
// commented because sometimes brokes the html and leaves the body in blank
//$body = convert_to_links(preg_replace("/<body*[^>]*>/i",'<body>', $body));
$mail->setBodyHtml($body);
$mail->setBodyPlain(utf8_safe(html_to_text($body)));
} else {
$mail->setBodyPlain($body);
$mail->setBodyHtml('');
}
$mail->setFrom($account->getEmailAddress());
if ($accountUser->getIsDefault() && $accountUser->getSenderName() == "") {
$mail->setFromName(logged_user()->getObjectName());
} else {
$mail->setFromName($accountUser->getSenderName());
}
$mail->save();
//$mail->setIsRead(logged_user()->getId(), true);
if (Plugins::instance()->isActivePlugin('mail_rules')) {
if (array_var($mail_data, 'format') == 'html') {
$img = MailTracks::get_track_mark_img($mail->getId());
$body = $body . $img;
$mail->setBodyHtml($body);
$mail->setBodyPlain(utf8_safe(html_to_text($body)));
$mail->save();
}
}
foreach ($project_files_attachments as $pfatt) {
if ($pfatt instanceof ProjectFile) {
$pfatt->setMailId($mail->getId());
$pfatt->save();
$pfatt->addToSharingTable();
}
}
$member_ids = active_context_members(false);
// if replying a classified email classify on same workspace
$classified_with_conversation = false;
if (array_var($mail_data, 'original_id')) {
$in_reply_to = MailContents::findById(array_var($mail_data, 'original_id'));
if ($in_reply_to instanceof MailContent) {
$member_ids = array_merge($member_ids, $in_reply_to->getMemberIds());
$classified_with_conversation = true;
}
}
// autoclassify sent email if not classified
if (!$classified_with_conversation) {
$acc_mem_ids = explode(',', $account->getMemberId());
foreach ($acc_mem_ids as $acc_mem_id) {
$member_ids[] = $acc_mem_id;
}
}
$object_controller = new ObjectController();
foreach ($member_ids as $k => &$mem_id) {
if ($mem_id == "") {
unset($member_ids[$k]);
}
}
if (count($member_ids) > 0) {
//$object_controller->add_to_members($mail, $member_ids);
$members = Members::instance()->findAll(array('conditions' => 'id IN (' . implode(',', $member_ids) . ')'));
$mail->addToMembers($members, true);
$mail->addToSharingTable();
}
$object_controller->link_to_new_object($mail);
$object_controller->add_subscribers($mail);
/*
if (array_var($mail_data, 'link_to_objects') != ''){
$lto = explode('|', array_var($mail_data, 'link_to_objects'));
foreach ($lto as $object_string){
$split_object = explode('-', $object_string);
$object = Objects::findObject($split_object[1]);
if ($object instanceof ContentDataObject){
$mail->linkObject($object);
}
}
}*/
//subscribe user
$user = Contacts::findById($account->getContactId());
if ($user instanceof Contact) {
$mail->subscribeUser($user);
}
/*if (user_config_option('create_contacts_from_email_recipients') && can_manage_contacts(logged_user())) {
// automatically create contacts
foreach ($to as $recipient) {
$recipient_name = trim($recipient[0]);
$recipient_address = trim($recipient[1]);
if (!$recipient_address) continue;
$contact = Contacts::getByEmail($recipient_address);
if (!$contact instanceof Contact) {
try {
$contact = new Contact();
$contact->addEmail($recipient_address, 'personal');
if ($recipient_name && $recipient_name != $recipient_address) {
$contact->setFirstName($recipient_name);
} else {
$index = strpos($recipient_address, "@");
$recipient_name = substr($recipient_address, 0, $index);
$contact->setFirstName($recipient_name);
}
$contact->save();
} catch (Exception $e) {
Logger::log($e->getMessage());
}
}
}
}*/
$mail->addToSharingTable();
$mail->orderConversation();
DB::commit();
ApplicationLogs::createLog($mail, ApplicationLogs::ACTION_ADD, false, true);
$mail->setIsRead(logged_user()->getId(), true);
if (!$autosave) {
if ($isDraft && !$sendBtnClick) {
flash_success(lang('success save mail'));
ajx_current("empty");
} else {
evt_add("must send mails", array("account" => $mail->getAccountId()));
//flash_success(lang('mail is being sent'));
ajx_current("back");
}
evt_add("email saved", array("id" => $mail->getId(), "instance" => array_var($_POST, 'instanceName')));
} else {
evt_add("draft mail autosaved", array("id" => $mail->getId(), "hf_id" => $mail_data['hf_id']));
flash_success(lang('success autosave draft'));
ajx_current("empty");
}
} catch (Exception $e) {
DB::rollback();
flash_error($e->getMessage());
ajx_current("empty");
}
// try
}
// if
}
