private function archive($uids, $verbose = true)
{
global $E_SESSION;
$rcmail = rcmail::get_instance();
$path = getcwd();
chdir(str_replace(array('/modules/CRM/Roundcube/RC', '\\modules\\CRM\\Roundcube\\RC'), '', $path));
$msgs = array();
if (!is_array($uids)) {
$uids = $uids->get();
}
foreach ($uids as $uid) {
$msg = new rcube_message($uid);
if ($msg === null || empty($msg->headers)) {
if ($verbose) {
$rcmail->output->command('display_message', 'messageopenerror', 'error');
}
return false;
} else {
$msgs[$uid] = $msg;
}
}
$map = array();
foreach ($msgs as $k => $msg) {
$sends = $rcmail->storage->decode_address_list($msg->headers->to);
$map[$k] = array();
foreach ($sends as $send) {
$addr = $send['mailto'];
$ret = $this->look_contact($addr);
$map[$k] = array_merge($map[$k], $ret);
}
$addr = $rcmail->storage->decode_address_list($msg->headers->from);
if ($addr) {
$addr = array_shift($addr);
}
if (!isset($addr['mailto']) || !$addr['mailto']) {
$map[$k] = false;
continue;
}
$ret = $this->look_contact($addr['mailto']);
$map[$k] = array_merge($map[$k], $ret);
}
if (!isset($_SESSION['force_archive'])) {
$_SESSION['force_archive'] = array();
}
foreach ($map as $k => $ret) {
if (!$ret && !isset($_SESSION['force_archive'][$k]) && $verbose) {
$_SESSION['force_archive'][$k] = 1;
$rcmail->output->command('display_message', $this->gettext('contactnotfound'), 'error');
return false;
}
}
$attachments_dir = DATA_DIR . '/CRM_Roundcube/attachments/';
$epesi_mails = array();
if (!file_exists($attachments_dir)) {
mkdir($attachments_dir);
}
foreach ($msgs as $k => $msg) {
$contacts = $map[$k];
$mime_map = array();
foreach ($msg->mime_parts as $mid => $m) {
$mime_map[$m->mime_id] = md5($k . microtime(true) . $mid);
}
if ($msg->has_html_part()) {
// $body = $msg->first_html_part();
foreach ($msg->mime_parts as $mime_id => $part) {
$mimetype = strtolower($part->ctype_primary . '/' . $part->ctype_secondary);
if ($mimetype == 'text/html') {
$body = $rcmail->storage->get_message_part($msg->uid, $mime_id, $part);
if (isset($part->replaces)) {
$cid_map = $part->replaces;
} else {
$cid_map = array();
}
break;
}
}
foreach ($cid_map as $k => &$v) {
if (preg_match('/_part=(.*?)&/', $v, $matches)) {
$mid = $matches[1];
if (isset($mime_map[$mid])) {
$v = 'get.php?' . http_build_query(array('mail_id' => '__MAIL_ID__', 'mime_id' => $mime_map[$mid]));
}
} else {
unset($cid_map[$k]);
}
}
$body = rcmail_wash_html($body, array('safe' => true, 'inline_html' => true), $cid_map);
} else {
$body = '<pre>' . $msg->first_text_part() . '</pre>';
}
$date = rcube_imap_generic::strToTime($msg->get_header('DATE'));
$headers = array();
foreach ($msg->headers as $k => $v) {
if (is_string($v) && $k != 'from' && $k != 'to' && $k != 'body_structure') {
$headers[] = $k . ': ' . rcube_mime::decode_mime_string((string) $v);
}
}
$message_id = str_replace(array('<', '>'), '', $msg->get_header('MESSAGE-ID'));
if (Utils_RecordBrowserCommon::get_records_count('rc_mails', array('message_id' => $message_id)) > 0) {
$rcmail->output->command('display_message', $this->gettext('archived_duplicate'), 'warning');
return false;
}
$employee = DB::GetOne('SELECT id FROM contact_data_1 WHERE active=1 AND f_login=%d', array($E_SESSION['user']));
$data = array('message_id' => $message_id, 'references' => $msg->get_header('REFERENCES'), 'contacts' => $contacts, 'date' => $date, 'subject' => substr($msg->subject, 0, 256), 'body' => $body, 'headers_data' => implode("\n", $headers), 'from' => $rcmail->storage->decode_header($msg->headers->from), 'to' => $rcmail->storage->decode_header($msg->headers->to), 'employee' => $employee);
$id = Utils_RecordBrowserCommon::new_record('rc_mails', $data);
$epesi_mails[] = $id;
foreach ($contacts as $c) {
list($rs, $con_id) = explode(':', $c);
if ($rs == 'P') {
Utils_WatchdogCommon::new_event('contact', $con_id, 'N_New mail');
} else {
Utils_WatchdogCommon::new_event('company', $con_id, 'N_New mail');
}
}
Utils_WatchdogCommon::new_event('contact', $employee, 'N_New mail');
/*DB::Execute('INSERT INTO rc_mails_data_1(created_on,created_by,f_contacts,f_date,f_employee,f_subject,f_body,f_headers_data,f_direction) VALUES(%T,%d,%s,%T,%d,%s,%s,%s,%b)',array(
time(),$E_SESSION['user'],$contacts,$date,$employee,substr($msg->subject,0,256),$body,implode("\n",$headers),$sent_mbox));
$id = DB::Insert_ID('rc_mails_data_1','id');*/
foreach ($msg->mime_parts as $mid => $m) {
if (!$m->disposition) {
continue;
}
if (isset($cid_map['cid:' . $m->content_id])) {
$attachment = 0;
} else {
$attachment = 1;
}
DB::Execute('INSERT INTO rc_mails_attachments(mail_id,type,name,mime_id,attachment) VALUES(%d,%s,%s,%s,%b)', array($id, $m->mimetype, $m->filename, $mime_map[$m->mime_id], $attachment));
if (!file_exists($attachments_dir . $id)) {
mkdir($attachments_dir . $id);
}
$fp = fopen($attachments_dir . $id . '/' . $mime_map[$m->mime_id], 'w');
$msg->get_part_content($m->mime_id, $fp);
fclose($fp);
}
}
//$rcmail->output->command('delete_messages');
$E_SESSION['rc_mails_cp'] = $epesi_mails;
chdir($path);
return true;
}
