| | |
| | | |
| | | rcmail_process_compose_params($COMPOSE); |
| | | |
| | | // add attachments listed by message_compose hook |
| | | if (is_array($plugin['attachments'])) { |
| | | foreach ($plugin['attachments'] as $attach) { |
| | | // we have structured data |
| | | if (is_array($attach)) { |
| | | $attachment = $attach; |
| | | } |
| | | // only a file path is given |
| | | else { |
| | | $filename = basename($attach); |
| | | $attachment = array( |
| | | 'group' => $COMPOSE_ID, |
| | | 'name' => $filename, |
| | | 'mimetype' => rcube_mime::file_content_type($attach, $filename), |
| | | 'path' => $attach, |
| | | ); |
| | | } |
| | | |
| | | // save attachment if valid |
| | | if (($attachment['data'] && $attachment['name']) || ($attachment['path'] && file_exists($attachment['path']))) { |
| | | $attachment = rcmail::get_instance()->plugins->exec_hook('attachment_save', $attachment); |
| | | } |
| | | |
| | | if ($attachment['status'] && !$attachment['abort']) { |
| | | unset($attachment['data'], $attachment['status'], $attachment['abort']); |
| | | $COMPOSE['attachments'][$attachment['id']] = $attachment; |
| | | } |
| | | } |
| | | } |
| | | |
| | | // check if folder for saving sent messages exists and is subscribed (#1486802) |
| | | if ($sent_folder = $COMPOSE['param']['sent_mbox']) { |
| | | rcmail_check_sent_folder($sent_folder, true); |
| | |
| | | 'nobodywarning', 'notsentwarning', 'notuploadedwarning', 'savingmessage', 'sendingmessage', |
| | | 'messagesaved', 'converting', 'editorwarning', 'searching', 'uploading', 'uploadingmany', |
| | | 'fileuploaderror', 'sendmessage', 'savenewresponse', 'responsename', 'responsetext', 'save', |
| | | 'savingresponse', 'restoresavedcomposedata', 'restoremessage', 'delete', 'restore', 'ignore'); |
| | | 'savingresponse', 'restoresavedcomposedata', 'restoremessage', 'delete', 'restore', 'ignore', |
| | | 'selectimportfile'); |
| | | |
| | | $OUTPUT->set_pagetitle($RCMAIL->gettext('compose')); |
| | | |
| | |
| | | $OUTPUT->set_env('top_posting', intval($RCMAIL->config->get('reply_mode')) > 0); |
| | | $OUTPUT->set_env('recipients_separator', trim($RCMAIL->config->get('recipients_separator', ','))); |
| | | |
| | | $drafts_mbox = $RCMAIL->config->get('drafts_mbox'); |
| | | $config_show_sig = $RCMAIL->config->get('show_sig', 1); |
| | | |
| | | // add config parameters to client script |
| | | if (!empty($CONFIG['drafts_mbox'])) { |
| | | $OUTPUT->set_env('drafts_mailbox', $CONFIG['drafts_mbox']); |
| | | $OUTPUT->set_env('draft_autosave', $CONFIG['draft_autosave']); |
| | | if (strlen($drafts_mbox)) { |
| | | $OUTPUT->set_env('drafts_mailbox', $drafts_mbox); |
| | | $OUTPUT->set_env('draft_autosave', $RCMAIL->config->get('draft_autosave')); |
| | | } |
| | | |
| | | // default font for HTML editor |
| | |
| | | if ($msg_uid = $COMPOSE['param']['draft_uid']) { |
| | | $compose_mode = RCUBE_COMPOSE_DRAFT; |
| | | $OUTPUT->set_env('draft_id', $msg_uid); |
| | | $RCMAIL->storage->set_folder($CONFIG['drafts_mbox']); |
| | | $RCMAIL->storage->set_folder($drafts_mbox); |
| | | } |
| | | else if ($msg_uid = $COMPOSE['param']['reply_uid']) { |
| | | $compose_mode = RCUBE_COMPOSE_REPLY; |
| | |
| | | $COMPOSE['mode'] = $compose_mode; |
| | | $OUTPUT->set_env('compose_mode', $compose_mode); |
| | | |
| | | $config_show_sig = $RCMAIL->config->get('show_sig', 1); |
| | | if ($compose_mode == RCUBE_COMPOSE_EDIT || $compose_mode == RCUBE_COMPOSE_DRAFT) { |
| | | // don't add signature in draft/edit mode, we'll also not remove the old-one |
| | | // but only on page display, later we should be able to change identity/sig (#1489229) |
| | |
| | | $RCMAIL->config->set('prefer_html', $_SESSION['msg_formats'][$mbox_name.':'.$msg_uid]); |
| | | } |
| | | else { |
| | | $prefer_html = $CONFIG['prefer_html'] || $CONFIG['htmleditor'] || $compose_mode == RCUBE_COMPOSE_DRAFT || $compose_mode == RCUBE_COMPOSE_EDIT; |
| | | $prefer_html = $RCMAIL->config->get('prefer_html') || $RCMAIL->config->get('htmleditor') |
| | | || $compose_mode == RCUBE_COMPOSE_DRAFT || $compose_mode == RCUBE_COMPOSE_EDIT; |
| | | |
| | | $RCMAIL->config->set('prefer_html', $prefer_html); |
| | | } |
| | | |
| | |
| | | } |
| | | } |
| | | |
| | | if (!empty($COMPOSE['reply_msgid'])) |
| | | $OUTPUT->set_env('reply_msgid', $COMPOSE['reply_msgid']); |
| | | |
| | | $MESSAGE->compose = array(); |
| | | |
| | | // get user's identities |
| | |
| | | $a_recipients = array(); |
| | | $parts = array('to', 'cc', 'bcc', 'replyto', 'followupto'); |
| | | $separator = trim($RCMAIL->config->get('recipients_separator', ',')) . ' '; |
| | | $from_email = @mb_strtolower($MESSAGE->compose['from_email']); |
| | | |
| | | foreach ($parts as $header) { |
| | | $fvalue = ''; |
| | | $decode_header = true; |
| | | $charset = $MESSAGE->headers->charset; |
| | | |
| | | // we have a set of recipients stored is session |
| | | if ($header == 'to' && ($mailto_id = $COMPOSE['param']['mailto']) |
| | |
| | | ) { |
| | | $fvalue = urldecode($_SESSION['mailto'][$mailto_id]); |
| | | $decode_header = false; |
| | | $charset = $RCMAIL->output->charset; |
| | | |
| | | // make session to not grow up too much |
| | | unset($_SESSION['mailto'][$mailto_id]); |
| | | $COMPOSE['param']['to'] = $fvalue; |
| | | } |
| | | else if (!empty($_POST['_'.$header])) { |
| | | $fvalue = rcube_utils::get_input_value('_'.$header, rcube_utils::INPUT_POST, TRUE); |
| | | $fvalue = rcube_utils::get_input_value('_'.$header, rcube_utils::INPUT_POST, TRUE); |
| | | $charset = $RCMAIL->output->charset; |
| | | } |
| | | else if (!empty($COMPOSE['param'][$header])) { |
| | | $fvalue = $COMPOSE['param'][$header]; |
| | | $fvalue = $COMPOSE['param'][$header]; |
| | | $charset = $RCMAIL->output->charset; |
| | | } |
| | | else if ($compose_mode == RCUBE_COMPOSE_REPLY) { |
| | | // get recipent address(es) out of the message headers |
| | |
| | | |
| | | // When To: and Reply-To: are the same we add From: address to the list (#1489037) |
| | | if ($v = $MESSAGE->headers->from) { |
| | | $from = rcube_mime::decode_address_list($v, null, false, $MESSAGE->headers->charset, true); |
| | | $to = rcube_mime::decode_address_list($MESSAGE->headers->to, null, false, $MESSAGE->headers->charset, true); |
| | | $replyto = rcube_mime::decode_address_list($MESSAGE->headers->replyto, null, false, $MESSAGE->headers->charset, true); |
| | | $from = rcube_mime::decode_address_list($v, null, false, $charset, true); |
| | | $to = rcube_mime::decode_address_list($MESSAGE->headers->to, null, false, $charset, true); |
| | | $replyto = rcube_mime::decode_address_list($MESSAGE->headers->replyto, null, false, $charset, true); |
| | | |
| | | if (count($replyto) && !count(array_diff($to, $replyto)) && count(array_diff($from, $to))) { |
| | | $fvalue .= (!empty($fvalue) ? $separator : '') . $v; |
| | |
| | | |
| | | // split recipients and put them back together in a unique way |
| | | if (!empty($fvalue) && in_array($header, array('to', 'cc', 'bcc'))) { |
| | | $to_addresses = rcube_mime::decode_address_list($fvalue, null, $decode_header, $MESSAGE->headers->charset); |
| | | $to_addresses = rcube_mime::decode_address_list($fvalue, null, $decode_header, $charset); |
| | | $fvalue = array(); |
| | | |
| | | foreach ($to_addresses as $addr_part) { |
| | |
| | | continue; |
| | | } |
| | | |
| | | $mailto = format_email(rcube_utils::idn_to_utf8($addr_part['mailto'])); |
| | | // According to RFC5321 local part of email address is case-sensitive |
| | | // however, here it is better to compare addresses in case-insensitive manner |
| | | $mailto = format_email(rcube_utils::idn_to_utf8($addr_part['mailto'])); |
| | | $mailto_lc = mb_strtolower($addr_part['mailto']); |
| | | |
| | | if (!in_array($mailto, $a_recipients) |
| | | && ($header == 'to' |
| | | || $compose_mode != RCUBE_COMPOSE_REPLY |
| | | || empty($MESSAGE->compose['from_email']) |
| | | || $mailto != $MESSAGE->compose['from_email']) |
| | | if (($header == 'to' || $compose_mode != RCUBE_COMPOSE_REPLY || $mailto_lc != $from_email) |
| | | && !in_array($mailto_lc, $a_recipients) |
| | | ) { |
| | | if ($addr_part['name'] && $addr_part['mailto'] != $addr_part['name']) |
| | | $string = format_email_recipient($mailto, $addr_part['name']); |
| | | else |
| | | $string = $mailto; |
| | | if ($addr_part['name'] && $mailto != $addr_part['name']) { |
| | | $mailto = format_email_recipient($mailto, $addr_part['name']); |
| | | } |
| | | |
| | | $fvalue[] = $string; |
| | | $a_recipients[] = $addr_part['mailto']; |
| | | $fvalue[] = $mailto; |
| | | $a_recipients[] = $mailto_lc; |
| | | } |
| | | } |
| | | |
| | |
| | | |
| | | // #1486037: remove "mailto:" prefix |
| | | $COMPOSE['param']['to'] = preg_replace('/^mailto:/i', '', $mailto[0]); |
| | | // #1490346: decode the recipient address |
| | | // #1490510: use raw encoding for correct "+" character handling as specified in RFC6068 |
| | | $COMPOSE['param']['to'] = rawurldecode($COMPOSE['param']['to']); |
| | | |
| | | // Supported case-insensitive tokens in mailto URL |
| | | $url_tokens = array('to', 'cc', 'bcc', 'reply-to', 'in-reply-to', 'references', 'subject', 'body'); |
| | |
| | | // pipe compose parameters thru plugins |
| | | $plugin = $RCMAIL->plugins->exec_hook('message_compose', $COMPOSE); |
| | | $COMPOSE['param'] = array_merge($COMPOSE['param'], $plugin['param']); |
| | | |
| | | // add attachments listed by message_compose hook |
| | | if (is_array($plugin['attachments'])) { |
| | | foreach ($plugin['attachments'] as $attach) { |
| | | // we have structured data |
| | | if (is_array($attach)) { |
| | | $attachment = $attach + array('group' => $COMPOSE_ID); |
| | | } |
| | | // only a file path is given |
| | | else { |
| | | $filename = basename($attach); |
| | | $attachment = array( |
| | | 'group' => $COMPOSE_ID, |
| | | 'name' => $filename, |
| | | 'mimetype' => rcube_mime::file_content_type($attach, $filename), |
| | | 'path' => $attach, |
| | | ); |
| | | } |
| | | |
| | | // save attachment if valid |
| | | if (($attachment['data'] && $attachment['name']) || ($attachment['path'] && file_exists($attachment['path']))) { |
| | | $attachment = rcmail::get_instance()->plugins->exec_hook('attachment_save', $attachment); |
| | | } |
| | | |
| | | if ($attachment['status'] && !$attachment['abort']) { |
| | | unset($attachment['data'], $attachment['status'], $attachment['abort']); |
| | | $COMPOSE['attachments'][$attachment['id']] = $attachment; |
| | | } |
| | | } |
| | | } |
| | | } |
| | | |
| | | function rcmail_compose_headers($attrib) |
| | |
| | | |
| | | if (!empty($MESSAGE->parts)) { |
| | | // collect IDs of message/rfc822 parts |
| | | if ($compose_mode == RCUBE_COMPOSE_EDIT || $compose_mode == RCUBE_COMPOSE_DRAFT) { |
| | | foreach ($MESSAGE->attachments as $part) { |
| | | if ($part->mimetype == 'message/rfc822') { |
| | | $messages[] = $part->mime_id; |
| | | } |
| | | foreach ($MESSAGE->mime_parts as $part) { |
| | | if ($part->mimetype == 'message/rfc822') { |
| | | $messages[] = $part->mime_id; |
| | | } |
| | | } |
| | | |
| | |
| | | continue; |
| | | } |
| | | |
| | | // skip all content parts inside the message/rfc822 part in DRAFT/EDIT mode |
| | | // skip all content parts inside the message/rfc822 part |
| | | foreach ($messages as $mimeid) { |
| | | if (strpos($part->mime_id, $mimeid . '.') === 0) { |
| | | continue 2; |
| | |
| | | |
| | | function rcmail_compose_body($attrib) |
| | | { |
| | | global $RCMAIL, $CONFIG, $OUTPUT, $HTML_MODE, $MESSAGE_BODY; |
| | | global $RCMAIL, $OUTPUT, $HTML_MODE, $MESSAGE_BODY; |
| | | |
| | | list($form_start, $form_end) = get_form_tags($attrib); |
| | | unset($attrib['form']); |
| | |
| | | $RCMAIL->html_editor(); |
| | | |
| | | // Set language list |
| | | if (!empty($CONFIG['enable_spellcheck'])) { |
| | | if ($RCMAIL->config->get('enable_spellcheck')) { |
| | | $engine = new rcube_spellchecker(); |
| | | $dictionary = (bool) $RCMAIL->config->get('spellcheck_dictionary'); |
| | | $spellcheck_langs = $engine->languages(); |
| | |
| | | ) |
| | | )); |
| | | |
| | | $reply_mode = intval($RCMAIL->config->get('reply_mode')); |
| | | |
| | | if (!$bodyIsHtml) { |
| | | $body = preg_replace('/\r?\n/', "\n", $body); |
| | | $body = trim($body, "\n"); |
| | |
| | | $body = rcmail_wrap_and_quote($body, $LINE_LENGTH); |
| | | |
| | | $prefix .= "\n"; |
| | | $suffix = ''; |
| | | |
| | | if (intval($RCMAIL->config->get('reply_mode')) > 0) { // top-posting |
| | | if ($reply_mode > 0) { // top-posting |
| | | $prefix = "\n\n\n" . $prefix; |
| | | $suffix = ''; |
| | | } |
| | | else { |
| | | $suffix = "\n"; |
| | | } |
| | | } |
| | | else { |
| | |
| | | $prefix = '<p>' . rcube::Q($prefix) . "</p>\n"; |
| | | $prefix .= '<blockquote>'; |
| | | |
| | | if (intval($RCMAIL->config->get('reply_mode')) > 0) { // top-posting |
| | | if ($reply_mode > 0) { // top-posting |
| | | $prefix = '<br>' . $prefix; |
| | | $suffix = '</blockquote>'; |
| | | } |
| | |
| | | $messages = array(); |
| | | |
| | | foreach ((array)$message->mime_parts as $pid => $part) { |
| | | if ($part->mimetype == 'message/rfc822') { |
| | | $messages[] = $part->mime_id; |
| | | } |
| | | |
| | | if ($part->disposition == 'attachment' || ($part->disposition == 'inline' && $bodyIsHtml) || $part->filename) { |
| | | // skip parts that aren't valid attachments |
| | | if ($part->ctype_primary == 'multipart' || $part->mimetype == 'application/ms-tnef') { |
| | |
| | | continue; |
| | | } |
| | | |
| | | // skip message/rfc822 attachments on forwards (#1489214) |
| | | // Thunderbird when forwarding in inline mode displays such attachments |
| | | // and skips any attachments from inside of such part, this however |
| | | // skipped e.g. images used in HTML body or other attachments. So, |
| | | // better to skip .eml attachments but not their content (included files). |
| | | if ($part->mimetype == 'message/rfc822') { |
| | | if ($compose_mode == RCUBE_COMPOSE_FORWARD) { |
| | | continue; |
| | | } |
| | | $messages[] = $part->mime_id; |
| | | } |
| | | else if ($compose_mode != RCUBE_COMPOSE_FORWARD) { |
| | | // skip attachments included in message/rfc822 attachment (#1486487) |
| | | foreach ($messages as $mimeid) { |
| | | if (strpos($part->mime_id, $mimeid . '.') === 0) { |
| | | continue 2; |
| | | } |
| | | // skip attachments included in message/rfc822 attachment (#1486487, #1490607) |
| | | foreach ($messages as $mimeid) { |
| | | if (strpos($part->mime_id, $mimeid . '.') === 0) { |
| | | continue 2; |
| | | } |
| | | } |
| | | |
| | |
| | | { |
| | | global $RCMAIL, $COMPOSE; |
| | | |
| | | $cid_map = array(); |
| | | $cid_map = array(); |
| | | $messages = array(); |
| | | |
| | | foreach ((array)$message->mime_parts as $pid => $part) { |
| | | if ($part->mimetype == 'message/rfc822') { |
| | | $messages[] = $part->mime_id; |
| | | } |
| | | |
| | | if (($part->content_id || $part->content_location) && $part->filename) { |
| | | // skip attachments included in message/rfc822 attachment (#1486487, #1490607) |
| | | foreach ($messages as $mimeid) { |
| | | if (strpos($part->mime_id, $mimeid . '.') === 0) { |
| | | continue 2; |
| | | } |
| | | } |
| | | |
| | | if ($attachment = rcmail_save_attachment($message, $pid)) { |
| | | $COMPOSE['attachments'][$attachment['id']] = $attachment; |
| | | $url = sprintf('%s&_id=%s&_action=display-attachment&_file=rcmfile%s', |
| | |
| | | if ($COMPOSE['forward_uid'] == '*') { |
| | | $index = $storage->index(null, rcmail_sort_column(), rcmail_sort_order()); |
| | | $COMPOSE['forward_uid'] = $index->get(); |
| | | } |
| | | else if (strpos($COMPOSE['forward_uid'], ':')) { |
| | | $COMPOSE['forward_uid'] = rcube_imap_generic::uncompressMessageSet($COMPOSE['forward_uid']); |
| | | } |
| | | else { |
| | | $COMPOSE['forward_uid'] = explode(',', $COMPOSE['forward_uid']); |
| | |
| | | |
| | | function rcmail_compose_attachment_list($attrib) |
| | | { |
| | | global $RCMAIL, $OUTPUT, $CONFIG, $COMPOSE; |
| | | global $RCMAIL, $OUTPUT, $COMPOSE; |
| | | |
| | | // add ID if not given |
| | | if (!$attrib['id']) |
| | | $attrib['id'] = 'rcmAttachmentList'; |
| | | |
| | | $out = "\n"; |
| | | $jslist = array(); |
| | | $button = ''; |
| | | $out = "\n"; |
| | | $jslist = array(); |
| | | $button = ''; |
| | | $skin_path = $RCMAIL->config->get('skin_path'); |
| | | |
| | | if (is_array($COMPOSE['attachments'])) { |
| | | if ($attrib['deleteicon']) { |
| | | $button = html::img(array( |
| | | 'src' => $CONFIG['skin_path'] . $attrib['deleteicon'], |
| | | 'src' => $skin_path . $attrib['deleteicon'], |
| | | 'alt' => $RCMAIL->gettext('delete') |
| | | )); |
| | | } |
| | |
| | | } |
| | | |
| | | if ($attrib['deleteicon']) |
| | | $COMPOSE['deleteicon'] = $CONFIG['skin_path'] . $attrib['deleteicon']; |
| | | $COMPOSE['deleteicon'] = $skin_path . $attrib['deleteicon']; |
| | | else if (rcube_utils::get_boolean($attrib['textbuttons'])) |
| | | $COMPOSE['textbuttons'] = true; |
| | | if ($attrib['cancelicon']) |
| | | $OUTPUT->set_env('cancelicon', $CONFIG['skin_path'] . $attrib['cancelicon']); |
| | | $OUTPUT->set_env('cancelicon', $skin_path . $attrib['cancelicon']); |
| | | if ($attrib['loadingicon']) |
| | | $OUTPUT->set_env('loadingicon', $CONFIG['skin_path'] . $attrib['loadingicon']); |
| | | $OUTPUT->set_env('loadingicon', $skin_path . $attrib['loadingicon']); |
| | | |
| | | $OUTPUT->set_env('attachments', $jslist); |
| | | $OUTPUT->add_gui_object('attachmentlist', $attrib['id']); |