| | |
| | | */ |
| | | |
| | | require_once('Mail/mimeDecode.php'); |
| | | require_once('lib/html2text.inc'); |
| | | |
| | | // define constants for message compose mode |
| | | define('RCUBE_COMPOSE_REPLY', 0x0106); |
| | |
| | | $_SESSION['compose'] = array('id' => uniqid(rand())); |
| | | |
| | | // add some labels to client |
| | | rcube_add_label('nosubject', 'norecipientwarning', 'nosubjectwarning', 'nobodywarning', 'notsentwarning', 'savingmessage', 'sendingmessage', 'messagesaved'); |
| | | rcube_add_label('nosubject', 'norecipientwarning', 'nosubjectwarning', 'nobodywarning', 'notsentwarning', 'savingmessage', 'sendingmessage', 'messagesaved', 'converting'); |
| | | |
| | | // add config parameter to client script |
| | | $OUTPUT->add_script(sprintf("%s.set_env('draft_autosave', %d);", $JS_OBJECT_NAME, !empty($CONFIG['drafts_mbox']) ? $CONFIG['draft_autosave'] : 0)); |
| | | |
| | | |
| | | // get reference message and set compose mode |
| | |
| | | $MESSAGE['structure'] = &$IMAP->get_structure($msg_uid); |
| | | $MESSAGE['subject'] = $IMAP->decode_header($MESSAGE['headers']->subject); |
| | | $MESSAGE['parts'] = $IMAP->get_mime_numbers($MESSAGE['structure']); |
| | | |
| | | |
| | | if ($compose_mode == RCUBE_COMPOSE_REPLY) |
| | | { |
| | | $_SESSION['compose']['reply_uid'] = $msg_uid; |
| | |
| | | { |
| | | // get recipent address(es) out of the message headers |
| | | if ($header=='to' && !empty($MESSAGE['headers']->replyto)) |
| | | $fvalue = $IMAP->decode_header($MESSAGE['headers']->replyto); |
| | | $fvalue = $MESSAGE['headers']->replyto; |
| | | |
| | | else if ($header=='to' && !empty($MESSAGE['headers']->from)) |
| | | $fvalue = $IMAP->decode_header($MESSAGE['headers']->from); |
| | | $fvalue = $MESSAGE['headers']->from; |
| | | |
| | | // add recipent of original message if reply to all |
| | | else if ($header=='cc' && !empty($MESSAGE['reply_all'])) |
| | | { |
| | | if ($v = $IMAP->decode_header($MESSAGE['headers']->to)) |
| | | if ($v = $MESSAGE['headers']->to) |
| | | $fvalue .= $v; |
| | | |
| | | if ($v = $IMAP->decode_header($MESSAGE['headers']->cc)) |
| | | if ($v = $MESSAGE['headers']->cc) |
| | | $fvalue .= (!empty($fvalue) ? ', ' : '') . $v; |
| | | } |
| | | |
| | |
| | | |
| | | if ($header=='bcc' && !empty($MESSAGE['headers']->bcc)) |
| | | $fvalue = $IMAP->decode_header($MESSAGE['headers']->bcc); |
| | | |
| | | } |
| | | |
| | | |
| | |
| | | { |
| | | $MESSAGE['FROM'] = array(); |
| | | |
| | | $a_to = $IMAP->decode_address_list($MESSAGE['headers']->to); |
| | | $a_to = $IMAP->decode_address_list($MESSAGE['headers']->to); |
| | | foreach ($a_to as $addr) |
| | | { |
| | | if (!empty($addr['mailto'])) |
| | |
| | | } |
| | | |
| | | // get this user's identities |
| | | $sql_result = $DB->query("SELECT identity_id, name, email, signature |
| | | $sql_result = $DB->query("SELECT identity_id, name, email, signature, html_signature |
| | | FROM ".get_table_name('identities')." |
| | | WHERE user_id=? |
| | | AND del<>1 |
| | | ORDER BY ".$DB->quoteIdentifier('standard')." DESC, name ASC", |
| | | $_SESSION['user_id']); |
| | | |
| | | |
| | | if ($DB->num_rows($sql_result)) |
| | | { |
| | | $from_id = 0; |
| | | $a_signatures = array(); |
| | | |
| | | |
| | | $field_attrib['onchange'] = "$JS_OBJECT_NAME.change_identity(this)"; |
| | | $select_from = new select($field_attrib); |
| | | |
| | | |
| | | while ($sql_arr = $DB->fetch_assoc($sql_result)) |
| | | { |
| | | $select_from->add(format_email_recipient($sql_arr['email'], $sql_arr['name']), $sql_arr['identity_id']); |
| | | $identity_id = $sql_arr['identity_id']; |
| | | $select_from->add(format_email_recipient($sql_arr['email'], $sql_arr['name']), $identity_id); |
| | | |
| | | // add signature to array |
| | | if (!empty($sql_arr['signature'])) |
| | | $a_signatures[$sql_arr['identity_id']] = $sql_arr['signature']; |
| | | |
| | | { |
| | | $a_signatures[$identity_id]['text'] = $sql_arr['signature']; |
| | | $a_signatures[$identity_id]['is_html'] = ($sql_arr['html_signature'] == 1) ? true : false; |
| | | if ($a_signatures[$identity_id]['is_html']) |
| | | { |
| | | $h2t = new html2text($a_signatures[$identity_id]['text'], false, false); |
| | | $plainTextPart = $h2t->get_text(); |
| | | $a_signatures[$identity_id]['plain_text'] = trim($plainTextPart); |
| | | } |
| | | } |
| | | |
| | | // set identity if it's one of the reply-message recipients |
| | | if (in_array($sql_arr['email'], $a_recipients)) |
| | | $from_id = $sql_arr['identity_id']; |
| | | |
| | | |
| | | if ($compose_mode == RCUBE_COMPOSE_REPLY && is_array($MESSAGE['FROM'])) |
| | | $MESSAGE['FROM'][] = $sql_arr['email']; |
| | | |
| | | if ($compose_mode == RCUBE_COMPOSE_DRAFT && strstr($MESSAGE['headers']->from, $sql_arr['email'])) |
| | | $from_id = $sql_arr['identity_id']; |
| | | |
| | | } |
| | | |
| | | // overwrite identity selection with post parameter |
| | |
| | | $from_id = get_input_value('_from', RCUBE_INPUT_POST); |
| | | |
| | | $out = $select_from->show($from_id); |
| | | |
| | | |
| | | // add signatures to client |
| | | $OUTPUT->add_script(sprintf("%s.set_env('signatures', %s);", $JS_OBJECT_NAME, array2js($a_signatures))); |
| | |
| | | |
| | | if (empty($attrib['id'])) |
| | | $attrib['id'] = 'rcmComposeMessage'; |
| | | |
| | | |
| | | $attrib['name'] = '_message'; |
| | | $textarea = new textarea($attrib); |
| | | |
| | | if ($CONFIG['htmleditor']) |
| | | $isHtml = true; |
| | | else |
| | | $isHtml = false; |
| | | |
| | | $body = ''; |
| | | |
| | | |
| | | // use posted message body |
| | | if (!empty($_POST['_message'])) |
| | | { |
| | | $body = get_input_value('_message', RCUBE_INPUT_POST, TRUE); |
| | | |
| | | } |
| | | // compose reply-body |
| | | else if ($compose_mode == RCUBE_COMPOSE_REPLY) |
| | | { |
| | | $body = rcmail_first_text_part($MESSAGE); |
| | | $hasHtml = rcmail_has_html_part($MESSAGE['parts']); |
| | | if ($hasHtml && $CONFIG['htmleditor']) |
| | | { |
| | | $body = rcmail_first_html_part($MESSAGE); |
| | | $isHtml = true; |
| | | } |
| | | else |
| | | { |
| | | $body = rcmail_first_text_part($MESSAGE); |
| | | $isHtml = false; |
| | | } |
| | | if (strlen($body)) |
| | | $body = rcmail_create_reply_body($body); |
| | | $body = rcmail_create_reply_body($body, $isHtml); |
| | | } |
| | | |
| | | // forward message body inline |
| | | else if ($compose_mode == RCUBE_COMPOSE_FORWARD) |
| | | { |
| | | $body = rcmail_first_text_part($MESSAGE); |
| | | $hasHtml = rcmail_has_html_part($MESSAGE['parts']); |
| | | if ($hasHtml && $CONFIG['htmleditor']) |
| | | { |
| | | $body = rcmail_first_html_part($MESSAGE); |
| | | $isHtml = true; |
| | | } |
| | | else |
| | | { |
| | | $body = rcmail_first_text_part($MESSAGE); |
| | | $isHtml = false; |
| | | } |
| | | if (strlen($body)) |
| | | $body = rcmail_create_forward_body($body); |
| | | $body = rcmail_create_forward_body($body, $isHtml); |
| | | } |
| | | |
| | | // forward message body inline |
| | | else if ($compose_mode == RCUBE_COMPOSE_DRAFT) |
| | | { |
| | | $body = rcmail_first_text_part($MESSAGE); |
| | | $hasHtml = rcmail_has_html_part($MESSAGE['parts']); |
| | | if ($hasHtml && $CONFIG['htmleditor']) |
| | | { |
| | | $body = rcmail_first_html_part($MESSAGE); |
| | | $isHtml = true; |
| | | } |
| | | else |
| | | { |
| | | $body = rcmail_first_text_part($MESSAGE); |
| | | $isHtml = false; |
| | | } |
| | | if (strlen($body)) |
| | | $body = rcmail_create_draft_body($body); |
| | | $body = rcmail_create_draft_body($body, $isHtml); |
| | | } |
| | | |
| | | |
| | | $OUTPUT->include_script('tiny_mce/tiny_mce.js'); |
| | | $OUTPUT->include_script("editor.js"); |
| | | $OUTPUT->add_script('rcmail_editor_init("$__skin_path");'); |
| | | |
| | | $out = $form_start ? "$form_start\n" : ''; |
| | | |
| | | $saveid = new hiddenfield(array('name' => '_draft_saveid', 'value' => str_replace(array('<','>'),"",$MESSAGE['headers']->messageID) )); |
| | | $saveid = new hiddenfield(array('name' => '_draft_saveid', 'value' => $compose_mode==RCUBE_COMPOSE_DRAFT ? str_replace(array('<','>'), "", $MESSAGE['headers']->messageID) : '')); |
| | | $out .= $saveid->show(); |
| | | |
| | | $drafttoggle = new hiddenfield(array('name' => '_draft', 'value' => 'yes')); |
| | | $out .= $drafttoggle->show(); |
| | | |
| | | $msgtype = new hiddenfield(array('name' => '_is_html', 'value' => ($isHtml?"1":"0"))); |
| | | $out .= $msgtype->show(); |
| | | |
| | | // If desired, set this text area to be editable by TinyMCE |
| | | if ($isHtml) |
| | | $attrib['mce_editable'] = "true"; |
| | | $textarea = new textarea($attrib); |
| | | $out .= $textarea->show($body); |
| | | $out .= $form_end ? "\n$form_end" : ''; |
| | | |
| | | |
| | | // include GoogieSpell |
| | | if (!empty($CONFIG['enable_spellcheck'])) |
| | | if (!empty($CONFIG['enable_spellcheck']) && !$isHtml) |
| | | { |
| | | $lang_set = ''; |
| | | if (!empty($CONFIG['spellcheck_languages']) && is_array($CONFIG['spellcheck_languages'])) |
| | | $lang_set = "googie.setLanguages(".array2js($CONFIG['spellcheck_languages']).");\n"; |
| | | |
| | | $OUTPUT->include_script('googiespell.js'); |
| | | $OUTPUT->add_script(sprintf("var googie = new GoogieSpell('\$__skin_path/images/googiespell/','%s&_action=spell&lang=');\n". |
| | | "googie.lang_chck_spell = \"%s\";\n". |
| | | "googie.lang_rsm_edt = \"%s\";\n". |
| | | "googie.lang_close = \"%s\";\n". |
| | | "googie.lang_revert = \"%s\";\n". |
| | | "googie.lang_no_error_found = \"%s\";\n". |
| | | "googie.lang_no_error_found = \"%s\";\n%s". |
| | | "googie.setCurrentLanguage('%s');\n". |
| | | "googie.decorateTextarea('%s');\n". |
| | | "%s.set_env('spellcheck', googie);", |
| | | $GLOBALS['COMM_PATH'], |
| | |
| | | rep_specialchars_output(rcube_label('close')), |
| | | rep_specialchars_output(rcube_label('revertto')), |
| | | rep_specialchars_output(rcube_label('nospellerrors')), |
| | | $lang_set, |
| | | substr($_SESSION['user_lang'], 0, 2), |
| | | $attrib['id'], |
| | | $JS_OBJECT_NAME), 'foot'); |
| | | |
| | |
| | | } |
| | | |
| | | |
| | | function rcmail_create_reply_body($body) |
| | | function rcmail_create_reply_body($body, $bodyIsHtml) |
| | | { |
| | | global $IMAP, $MESSAGE; |
| | | |
| | | // soft-wrap message first |
| | | $body = wordwrap($body, 75); |
| | | if (! $bodyIsHtml) |
| | | { |
| | | // soft-wrap message first |
| | | $body = wordwrap($body, 75); |
| | | |
| | | // split body into single lines |
| | | $a_lines = preg_split('/\r?\n/', $body); |
| | | // split body into single lines |
| | | $a_lines = preg_split('/\r?\n/', $body); |
| | | |
| | | // add > to each line |
| | | for($n=0; $n<sizeof($a_lines); $n++) |
| | | { |
| | | if (strpos($a_lines[$n], '>')===0) |
| | | $a_lines[$n] = '>'.$a_lines[$n]; |
| | | else |
| | | $a_lines[$n] = '> '.$a_lines[$n]; |
| | | } |
| | | // add > to each line |
| | | for($n=0; $n<sizeof($a_lines); $n++) |
| | | { |
| | | if (strpos($a_lines[$n], '>')===0) |
| | | $a_lines[$n] = '>'.$a_lines[$n]; |
| | | else |
| | | $a_lines[$n] = '> '.$a_lines[$n]; |
| | | } |
| | | |
| | | $body = join("\n", $a_lines); |
| | | $body = join("\n", $a_lines); |
| | | |
| | | // add title line |
| | | $pefix = sprintf("\n\n\nOn %s, %s wrote:\n", |
| | | $MESSAGE['headers']->date, |
| | | $IMAP->decode_header($MESSAGE['headers']->from)); |
| | | |
| | | // add title line |
| | | $prefix = sprintf("\n\n\nOn %s, %s wrote:\n", |
| | | $MESSAGE['headers']->date, |
| | | $IMAP->decode_header($MESSAGE['headers']->from)); |
| | | |
| | | // try to remove the signature |
| | | if ($sp = strrpos($body, '-- ')) |
| | | { |
| | | if ($body{$sp+3}==' ' || $body{$sp+3}=="\n" || $body{$sp+3}=="\r") |
| | | $body = substr($body, 0, $sp-1); |
| | | } |
| | | // try to remove the signature |
| | | if ($sp = strrstr($body, '-- ')) |
| | | { |
| | | if ($body{$sp+3}==' ' || $body{$sp+3}=="\n" || $body{$sp+3}=="\r") |
| | | $body = substr($body, 0, $sp-1); |
| | | } |
| | | $suffix = ''; |
| | | } |
| | | else |
| | | { |
| | | $prefix = sprintf("<br><br>On %s, %s wrote:<br><blockquote type=\"cite\" " . |
| | | "style=\"padding-left: 5px; border-left: #1010ff 2px solid; " . |
| | | "margin-left: 5px; width: 100%%\">", |
| | | $MESSAGE['headers']->date, |
| | | $IMAP->decode_header($MESSAGE['headers']->from)); |
| | | |
| | | return $pefix.$body; |
| | | $suffix = "</blockquote>"; |
| | | } |
| | | |
| | | return $prefix.$body.$suffix; |
| | | } |
| | | |
| | | |
| | | function rcmail_create_forward_body($body) |
| | | function rcmail_create_forward_body($body, $bodyIsHtml) |
| | | { |
| | | global $IMAP, $MESSAGE; |
| | | |
| | | // soft-wrap message first |
| | | $body = wordwrap($body, 80); |
| | | if (! $bodyIsHtml) |
| | | { |
| | | // soft-wrap message first |
| | | $body = wordwrap($body, 80); |
| | | |
| | | $prefix = sprintf("\n\n\n-------- Original Message --------\nSubject: %s\nDate: %s\nFrom: %s\nTo: %s\n\n", |
| | | $MESSAGE['subject'], |
| | | $MESSAGE['headers']->date, |
| | | $IMAP->decode_header($MESSAGE['headers']->from), |
| | | $IMAP->decode_header($MESSAGE['headers']->to)); |
| | | |
| | | $prefix = sprintf("\n\n\n-------- Original Message --------\nSubject: %s\nDate: %s\nFrom: %s\nTo: %s\n\n", |
| | | $MESSAGE['subject'], |
| | | $MESSAGE['headers']->date, |
| | | $IMAP->decode_header($MESSAGE['headers']->from), |
| | | $IMAP->decode_header($MESSAGE['headers']->to)); |
| | | } |
| | | else |
| | | { |
| | | $prefix = sprintf( |
| | | "<br><br>-------- Original Message --------" . |
| | | "<table border=\"0\" cellpadding=\"0\" cellspacing=\"0\"><tbody>" . |
| | | "<tr><th align=\"right\" nowrap=\"nowrap\" valign=\"baseline\">Subject: </th><td>%s</td></tr>" . |
| | | "<tr><th align=\"right\" nowrap=\"nowrap\" valign=\"baseline\">Date: </th><td>%s</td></tr>" . |
| | | "<tr><th align=\"right\" nowrap=\"nowrap\" valign=\"baseline\">From: </th><td>%s</td></tr>" . |
| | | "<tr><th align=\"right\" nowrap=\"nowrap\" valign=\"baseline\">To: </th><td>%s</td></tr>" . |
| | | "</tbody></table><br>", |
| | | rep_specialchars_output($MESSAGE['subject']), |
| | | rep_specialchars_output($MESSAGE['headers']->date), |
| | | rep_specialchars_output($IMAP->decode_header($MESSAGE['headers']->from)), |
| | | rep_specialchars_output($IMAP->decode_header($MESSAGE['headers']->to))); |
| | | } |
| | | |
| | | // add attachments |
| | | if (!isset($_SESSION['compose']['forward_attachments']) && |
| | | is_array($MESSAGE['parts']) && sizeof($MESSAGE['parts'])>1) |
| | |
| | | } |
| | | |
| | | |
| | | function rcmail_create_draft_body($body) |
| | | function rcmail_create_draft_body($body, $bodyIsHtml) |
| | | { |
| | | global $IMAP, $MESSAGE; |
| | | |
| | |
| | | |
| | | function rcmail_write_compose_attachments(&$message) |
| | | { |
| | | global $IMAP; |
| | | |
| | | $temp_dir = rcmail_create_compose_tempdir(); |
| | | global $IMAP, $CONFIG; |
| | | |
| | | $temp_dir = unslashify($CONFIG['temp_dir']); |
| | | |
| | | if (!is_array($_SESSION['compose']['attachments'])) |
| | | $_SESSION['compose']['attachments'] = array(); |
| | |
| | | |
| | | function rcmail_compose_attachment_list($attrib) |
| | | { |
| | | global $OUTPUT, $JS_OBJECT_NAME; |
| | | global $OUTPUT, $JS_OBJECT_NAME, $CONFIG; |
| | | |
| | | // add ID if not given |
| | | if (!$attrib['id']) |
| | |
| | | } |
| | | |
| | | |
| | | function rcmail_editor_selector($attrib) |
| | | { |
| | | global $CONFIG, $MESSAGE, $compose_mode; |
| | | |
| | | $choices = array( |
| | | 'html' => 'htmltoggle', |
| | | 'plain' => 'plaintoggle' |
| | | ); |
| | | |
| | | // determine whether HTML or plain text should be checked |
| | | if ($CONFIG['htmleditor']) |
| | | $useHtml = true; |
| | | else |
| | | $useHtml = false; |
| | | |
| | | if ($compose_mode == RCUBE_COMPOSE_REPLY || |
| | | $compose_mode == RCUBE_COMPOSE_FORWARD || |
| | | $compose_mode == RCUBE_COMPOSE_DRAFT) |
| | | { |
| | | $hasHtml = rcmail_has_html_part($MESSAGE['parts']); |
| | | $useHtml = ($hasHtml && $CONFIG['htmleditor']); |
| | | } |
| | | |
| | | $selector = ''; |
| | | |
| | | $attrib['name'] = '_editorSelect'; |
| | | $attrib['onclick'] = 'return rcmail_toggle_editor(this)'; |
| | | foreach ($choices as $value => $text) |
| | | { |
| | | $checked = ''; |
| | | if ((($value == 'html') && $useHtml) || |
| | | (($value != 'html') && !$useHtml)) |
| | | $attrib['checked'] = 'true'; |
| | | else |
| | | unset($attrib['checked']); |
| | | |
| | | $attrib['id'] = '_' . $value; |
| | | $rb = new radiobutton($attrib); |
| | | $selector .= sprintf("<td>%s</td><td class=\"title\"><label for=\"%s\">%s</label></td>", |
| | | $rb->show($value), |
| | | $attrib['id'], |
| | | rcube_label($text)); |
| | | } |
| | | |
| | | return $selector; |
| | | } |
| | | |
| | | |
| | | function get_form_tags($attrib) |
| | | { |
| | | global $CONFIG, $OUTPUT, $JS_OBJECT_NAME, $MESSAGE_FORM, $SESS_HIDDEN_FIELD; |