X-Git-Url: https://vcs.fsf.org/?p=squirrelmail.git;a=blobdiff_plain;f=src%2Fcompose.php;h=89f6d12da201c075eaa2f02ae8c11e641ab82023;hp=d1ebff502e6f9762a09a8cc795c7d03f68792094;hb=39cf816fd934b26f5312fd9ac10238d5aae543b8;hpb=480b84a77f27daa312081bd65287311f91a02e93 diff --git a/src/compose.php b/src/compose.php index d1ebff50..302f2f03 100644 --- a/src/compose.php +++ b/src/compose.php @@ -1,11 +1,7 @@ setDelayedErrors(true); + +/** SESSION/POST/GET VARS */ +sqgetGlobalVar('send', $send, SQ_POST); +// Send can only be achieved by setting $_POST var. If Send = true then +// retrieve other form fields from $_POST +if (isset($send) && $send) { + $SQ_GLOBAL = SQ_POST; +} else { + $SQ_GLOBAL = SQ_FORM; } -if ( isset($_POST['addr_search_done']) ) { - $html_addr_search_done = $_POST['addr_search_done']; +sqgetGlobalVar('session',$session, $SQ_GLOBAL); +sqgetGlobalVar('mailbox',$mailbox, $SQ_GLOBAL); +if(!sqgetGlobalVar('identity',$identity, $SQ_GLOBAL)) { + $identity=0; } -if ( isset($_POST['send_to_search']) ) { - $send_to_search = &$_POST['send_to_search']; +sqgetGlobalVar('send_to',$send_to, $SQ_GLOBAL); +sqgetGlobalVar('send_to_cc',$send_to_cc, $SQ_GLOBAL); +sqgetGlobalVar('send_to_bcc',$send_to_bcc, $SQ_GLOBAL); +sqgetGlobalVar('subject',$subject, $SQ_GLOBAL); +sqgetGlobalVar('body',$body, $SQ_GLOBAL); +sqgetGlobalVar('mailprio',$mailprio, $SQ_GLOBAL); +sqgetGlobalVar('request_mdn',$request_mdn, $SQ_GLOBAL); +sqgetGlobalVar('request_dr',$request_dr, $SQ_GLOBAL); +sqgetGlobalVar('html_addr_search',$html_addr_search, $SQ_GLOBAL); +sqgetGlobalVar('mail_sent',$mail_sent, $SQ_GLOBAL); +sqgetGlobalVar('passed_id',$passed_id, $SQ_GLOBAL); +sqgetGlobalVar('passed_ent_id',$passed_ent_id, $SQ_GLOBAL); + +sqgetGlobalVar('attach',$attach, SQ_POST); +sqgetGlobalVar('draft',$draft, SQ_POST); +sqgetGlobalVar('draft_id',$draft_id, $SQ_GLOBAL); +sqgetGlobalVar('ent_num',$ent_num, $SQ_GLOBAL); +sqgetGlobalVar('saved_draft',$saved_draft, SQ_FORM); + +if ( sqgetGlobalVar('delete_draft',$delete_draft) ) { + $delete_draft = (int)$delete_draft; } -/* Attachments */ -sqgetGlobalVar('attach',$attach); -if ( isset($_POST['do_delete']) ) { - $do_delete = $_POST['do_delete']; +if ( sqgetGlobalVar('startMessage',$startMessage) ) { + $startMessage = (int)$startMessage; +} else { + $startMessage = 1; } -if ( isset($_POST['delete']) ) { - $delete = &$_POST['delete']; + + +/** POST VARS */ +sqgetGlobalVar('sigappend', $sigappend, SQ_POST); +sqgetGlobalVar('from_htmladdr_search', $from_htmladdr_search, SQ_POST); +sqgetGlobalVar('addr_search_done', $html_addr_search_done, SQ_POST); +sqgetGlobalVar('addr_search_cancel', $html_addr_search_cancel, SQ_POST); +sqgetGlobalVar('send_to_search', $send_to_search, SQ_POST); +sqgetGlobalVar('do_delete', $do_delete, SQ_POST); +sqgetGlobalVar('delete', $delete, SQ_POST); +sqgetGlobalVar('attachments', $attachments, SQ_POST); +if ( sqgetGlobalVar('return', $temp, SQ_POST) ) { + $html_addr_search_done = 'Use Addresses'; } -if ( isset($_SESSION['compose_messages']) ) { - $compose_messages = &$_SESSION['compose_messages']; + +/** GET VARS */ +if ( sqgetGlobalVar('account', $temp, SQ_GET) ) { + $iAccount = (int) $temp; +} else { + $iAccount = 0; } -/* Forward message as attachment */ -if ( isset($_GET['attachedmessages']) ) { - $attachedmessages = $_GET['attachedmessages']; +/** get smaction */ +if ( !sqgetGlobalVar('smaction',$action) ) +{ + if ( sqgetGlobalVar('smaction_reply',$tmp) ) $action = 'reply'; + if ( sqgetGlobalVar('smaction_reply_all',$tmp) ) $action = 'reply_all'; + if ( sqgetGlobalVar('smaction_forward',$tmp) ) $action = 'forward'; + if ( sqgetGlobalVar('smaction_attache',$tmp) ) $action = 'forward_as_attachment'; + if ( sqgetGlobalVar('smaction_draft',$tmp) ) $action = 'draft'; + if ( sqgetGlobalVar('smaction_edit_new',$tmp) ) $action = 'edit_as_new'; } -/* Drafts */ -sqgetGlobalVar('draft',$draft); -sqgetGlobalVar('draft_id',$draft_id); -sqgetGlobalVar('ent_num',$ent_num); -sqgetGlobalVar('saved_draft',$saved_draft); -sqgetGlobalVar('delete_draft',$delete_draft); +/** + * Here we decode the data passed in from mailto.php. + */ +if ( sqgetGlobalVar('mailtodata', $mailtodata, SQ_GET) ) { + $trtable = array('to' => 'send_to', + 'cc' => 'send_to_cc', + 'bcc' => 'send_to_bcc', + 'body' => 'body', + 'subject' => 'subject'); + $mtdata = unserialize($mailtodata); + + foreach ($trtable as $f => $t) { + if ( !empty($mtdata[$f]) ) { + $$t = $mtdata[$f]; + } + } + unset($mailtodata,$mtdata, $trtable); +} -$key = $_COOKIE['key']; +/* Location (For HTTP 1.1 header("Location: ...") redirects) */ +$location = get_location(); +/* Identities (fetch only once) */ +$idents = get_identities(); /* --------------------- Specific Functions ------------------------------ */ function replyAllString($header) { - global $include_self_reply_all, $username, $data_dir; - $excl_ar = array(); - /** - * 1) Remove the addresses we'll be sending the message 'to' - */ - $url_replytoall_avoid_addrs = ''; - if (isset($header->replyto)) { - $excl_ar = $header->getAddr_a('replyto'); - } - /** - * 2) Remove our identities from the CC list (they still can be in the - * TO list) only if $include_self_reply_all is turned off - */ - if (!$include_self_reply_all) { - $email_address = strtolower(trim(getPref($data_dir, $username, 'email_address'))); - $excl_ar[$email_address] = ''; - $idents = getPref($data_dir, $username, 'identities'); - if ($idents != '' && $idents > 1) { - $first_id = false; - for ($i = 1; $i < $idents; $i ++) { - $cur_email_address = getPref($data_dir, $username, - 'email_address' . $i); - $cur_email_address = strtolower(trim($cur_email_address)); - $excl_ar[$cur_email_address] = ''; - } - } - } - - /** - * 3) get the addresses. - */ - $url_replytoall_ar = $header->getAddr_a(array('to','cc'), $excl_ar); - - /** - * 4) generate the string. - */ - $url_replytoallcc = ''; - foreach( $url_replytoall_ar as $email => $personal) { - if ($personal) { - $url_replytoallcc .= ", \"$personal\" <$email>"; - } else { - $url_replytoallcc .= ', '. $email; - } - } - $url_replytoallcc = substr($url_replytoallcc,2); - return $url_replytoallcc; + global $include_self_reply_all, $idents; + $excl_ar = array(); + /** + * 1) Remove the addresses we'll be sending the message 'to' + */ + if (isset($header->reply_to)) { + $excl_ar = $header->getAddr_a('reply_to'); + } + /** + * 2) Remove our identities from the CC list (they still can be in the + * TO list) only if $include_self_reply_all is turned off + */ + if (!$include_self_reply_all) { + foreach($idents as $id) { + $excl_ar[strtolower(trim($id['email_address']))] = ''; + } + } + + /** + * 3) get the addresses. + */ + $url_replytoall_ar = $header->getAddr_a(array('to','cc'), $excl_ar); + + /** + * 4) generate the string. + */ + $url_replytoallcc = ''; + foreach( $url_replytoall_ar as $email => $personal) { + if ($personal) { + // if personal name contains address separator then surround + // the personal name with double quotes. + if (strpos($personal,',') !== false) { + $personal = '"'.$personal.'"'; + } + $url_replytoallcc .= ", $personal <$email>"; + } else { + $url_replytoallcc .= ', '. $email; + } + } + $url_replytoallcc = substr($url_replytoallcc,2); + + return $url_replytoallcc; +} + +/** + * creates top line in reply citations + * + * Line style depends on user preferences. + * $orig_date argument is available only from 1.4.3 and 1.5.1 version. + * @param object $orig_from From: header object. + * @param integer $orig_date email's timestamp + * @return string reply citation + */ +function getReplyCitation($orig_from, $orig_date) { + global $reply_citation_style, $reply_citation_start, $reply_citation_end; + + if (!is_object($orig_from)) { + $sOrig_from = ''; + } else { + $sOrig_from = decodeHeader($orig_from->getAddress(false),false,false,true); + } + + /* First, return an empty string when no citation style selected. */ + if (($reply_citation_style == '') || ($reply_citation_style == 'none')) { + return ''; + } + + /* Make sure our final value isn't an empty string. */ + if ($sOrig_from == '') { + return ''; + } + + /* Otherwise, try to select the desired citation style. */ + switch ($reply_citation_style) { + case 'author_said': + /** + * To translators: %s is for author's name + */ + $full_reply_citation = sprintf(_("%s wrote:"),$sOrig_from); + break; + case 'quote_who': + $start = ''; + $full_reply_citation = $start . $sOrig_from . $end; + break; + case 'date_time_author': + /** + * To translators: + * first %s is for date string, second %s is for author's name. Date uses + * formating from "D, F j, Y g:i a" and "D, F j, Y H:i" translations. + * Example string: + * "On Sat, December 24, 2004 23:59, Santa wrote:" + * If you have to put author's name in front of date string, check comments about + * argument swapping at http://www.php.net/sprintf + */ + $full_reply_citation = sprintf(_("On %s, %s wrote:"), getLongDateString($orig_date), $sOrig_from); + break; + case 'user-defined': + $start = $reply_citation_start . + ($reply_citation_start == '' ? '' : ' '); + $end = $reply_citation_end; + $full_reply_citation = $start . $sOrig_from . $end; + break; + default: + return ''; + } + + /* Add line feed and return the citation string. */ + return ($full_reply_citation . "\n"); } +/** + * Creates header fields in forwarded email body + * + * $default_charset global must be set correctly before you call this function. + * @param object $orig_header + * @return $string + */ function getforwardHeader($orig_header) { - global $editor_size; - - $display = array( _("Subject") => strlen(_("Subject")), - _("From") => strlen(_("From")), - _("Date") => strlen(_("Date")), - _("To") => strlen(_("To")), - _("Cc") => strlen(_("Cc")) ); - $maxsize = max($display); - $indent = str_pad('',$maxsize+2); - foreach($display as $key => $val) { - $display[$key] = $key .': '. str_pad('', $maxsize - $val); - } - $from = decodeHeader($orig_header->getAddr_s('from',"\n$indent"),false,false); - $from = str_replace(' ',' ',$from); - $to = decodeHeader($orig_header->getAddr_s('to',"\n$indent"),false,false); - $to = str_replace(' ',' ',$to); - $subject = decodeHeader($orig_header->subject,false,false); - $subject = str_replace(' ',' ',$subject); - $bodyTop = str_pad(' '._("Original Message").' ',$editor_size -2,'-',STR_PAD_BOTH) . - "\n\n". $display[_("Subject")] . $subject . "\n" . - $display[_("From")] . $from . "\n" . - $display[_("Date")] . getLongDateString( $orig_header->date ). "\n" . - $display[_("To")] . $to . "\n"; - if ($orig_header->cc != array() && $orig_header->cc !='') { - $cc = decodeHeader($orig_header->getAddr_s('cc',"\n$indent"),false,false); - $cc = str_replace(' ',' ',$cc); - $bodyTop .= $display[_("Cc")] .$cc . "\n"; - } - $bodyTop .= str_pad('', $editor_size -2 , '-') . - "\n\n"; - return $bodyTop; + global $editor_size, $default_charset; + + // using own strlen function in order to detect correct string length + $display = array( _("Subject") => sq_strlen(_("Subject"),$default_charset), + _("From") => sq_strlen(_("From"),$default_charset), + _("Date") => sq_strlen(_("Date"),$default_charset), + _("To") => sq_strlen(_("To"),$default_charset), + _("Cc") => sq_strlen(_("Cc"),$default_charset) ); + $maxsize = max($display); + $indent = str_pad('',$maxsize+2); + foreach($display as $key => $val) { + $display[$key] = $key .': '. str_pad('', $maxsize - $val); + } + $from = decodeHeader($orig_header->getAddr_s('from',"\n$indent"),false,false,true); + $from = str_replace(' ',' ',$from); + $to = decodeHeader($orig_header->getAddr_s('to',"\n$indent"),false,false,true); + $to = str_replace(' ',' ',$to); + $subject = decodeHeader($orig_header->subject,false,false,true); + $subject = str_replace(' ',' ',$subject); + + // using own str_pad function in order to create correct string pad + $bodyTop = sq_str_pad(' '._("Original Message").' ',$editor_size -2,'-',STR_PAD_BOTH,$default_charset) . + "\n". $display[_("Subject")] . $subject . "\n" . + $display[_("From")] . $from . "\n" . + $display[_("Date")] . getLongDateString( $orig_header->date, $orig_header->date_unparsed ). "\n" . + $display[_("To")] . $to . "\n"; + if ($orig_header->cc != array() && $orig_header->cc !='') { + $cc = decodeHeader($orig_header->getAddr_s('cc',"\n$indent"),false,false,true); + $cc = str_replace(' ',' ',$cc); + $bodyTop .= $display[_("Cc")] .$cc . "\n"; + } + $bodyTop .= str_pad('', $editor_size -2 , '-') . + "\n\n"; + return $bodyTop; } /* ----------------------------------------------------------------------- */ /* - * If the session is expired during a post this restores the compose session + * If the session is expired during a post this restores the compose session * vars. */ +$session_expired = false; if (sqsession_is_registered('session_expired_post')) { - $session_expired_post = $_SESSION['session_expired_post']; - /* + sqgetGlobalVar('session_expired_post', $session_expired_post, SQ_SESSION); + /* * extra check for username so we don't display previous post data from * another user during this session. */ - if ($session_expired_post['username'] != $username) { - unset($session_expired_post); - sqsession_unregister('session_expired_post'); - session_write_close(); - } else { - foreach ($session_expired_post as $postvar => $val) { - if (isset($val)) { - $$postvar = $val; - } else { - $$postvar = ''; + if (!empty($session_expired_post['username']) + && $session_expired_post['username'] == $username) { + // these are the vars that we can set from the expired composed session + $compo_var_list = array ('send_to', 'send_to_cc', 'body', + 'startMessage', 'passed_body', 'use_signature', 'signature', + 'subject', 'newmail', 'send_to_bcc', 'passed_id', 'mailbox', + 'from_htmladdr_search', 'identity', 'draft_id', 'delete_draft', + 'mailprio', 'edit_as_new', 'attachments', 'composesession', + 'request_mdn', 'request_dr'); + + foreach ($compo_var_list as $var) { + if ( isset($session_expired_post[$var]) && !isset($$var) ) { + $$var = $session_expired_post[$var]; } } - $compose_messages = unserialize(urldecode($restoremessages)); - sqsession_register($compose_messages,'compose_messages'); + + if (!empty($attachments)) + $attachments = unserialize(urldecode($attachments)); + sqsession_register($composesession,'composesession'); + if (isset($send)) { unset($send); } @@ -226,38 +364,50 @@ if (sqsession_is_registered('session_expired_post')) { if ($compose_new_win == '1') { compose_Header($color, $mailbox); } else { - displayPageHeader($color, $mailbox); + $sHeaderJs = (isset($sHeaderJs)) ? $sHeaderJs : ''; + if (strpos($action, 'reply') !== false && $reply_focus) { + $sBodyTagJs = 'onload="checkForm(\''.$replyfocus.'\');"'; + } else { + $sBodyTagJs = 'onload="checkForm();"'; + } + displayPageHeader($color, $mailbox,$sHeaderJs,$sBodyTagJs); } showInputForm($session, false); exit(); } + if (!isset($composesession)) { $composesession = 0; sqsession_register(0,'composesession'); +} else { + $composesession = (int)$composesession; } if (!isset($session) || (isset($newmessage) && $newmessage)) { sqsession_unregister('composesession'); - $session = "$composesession" +1; + $session = "$composesession" +1; $composesession = $session; sqsession_register($composesession,'composesession'); -} -if (!isset($compose_messages)) { - $compose_messages = array(); } -if (!isset($compose_messages[$session]) || ($compose_messages[$session] == NULL)) { -/* if (!array_key_exists($session, $compose_messages)) { /* We can only do this in PHP >= 4.1 */ - $composeMessage = new Message(); - $rfc822_header = new Rfc822Header(); - $composeMessage->rfc822_header = $rfc822_header; - $composeMessage->reply_rfc822_header = ''; - $compose_messages[$session] = $composeMessage; - sqsession_register($compose_messages,'compose_messages'); +if (!empty($compose_messages[$session])) { + $composeMessage = $compose_messages[$session]; } else { - $composeMessage=$compose_messages[$session]; + $composeMessage = new Message(); + $rfc822_header = new Rfc822Header(); + $composeMessage->rfc822_header = $rfc822_header; + $composeMessage->reply_rfc822_header = ''; +} + +// re-add attachments that were already in this message +// FIXME: note that technically this is very bad form - +// should never directly manipulate an object like this +if (!empty($attachments)) { + $attachments = unserialize(urldecode($attachments)); + if (!empty($attachments) && is_array($attachments)) + $composeMessage->entities = $attachments; } -if (!isset($mailbox) || $mailbox == '' || ($mailbox == 'None')) { +if (empty($mailbox)) { $mailbox = 'INBOX'; } @@ -267,100 +417,159 @@ if ($draft) { * of language interface. */ set_my_charset(); - $composeMessage=$compose_messages[$session]; if (! deliverMessage($composeMessage, true)) { showInputForm($session); exit(); } else { - unset($compose_messages[$session]); $draft_message = _("Draft Email Saved"); /* If this is a resumed draft, then delete the original */ if(isset($delete_draft)) { - Header("Location: delete_message.php?mailbox=" . urlencode($draft_folder) . - "&message=$delete_draft&sort=$sort&startMessage=1&saved_draft=yes"); - exit(); + $imap_stream = sqimap_login($username, false, $imapServerAddress, $imapPort, false); + sqimap_mailbox_select($imap_stream, $draft_folder); + // force bypass_trash=true because message should be saved when deliverMessage() returns true. + // in current implementation of sqimap_msgs_list_flag() single message id can + // be submitted as string. docs state that it should be array. + sqimap_msgs_list_delete($imap_stream, $draft_folder, $delete_draft, true); + if ($auto_expunge) { + sqimap_mailbox_expunge($imap_stream, $draft_folder, true); + } + sqimap_logout($imap_stream); } - else { - if ($compose_new_win == '1') { - Header("Location: compose.php?saved_draft=yes&session=$composesession"); - exit(); + + $oErrorHandler->saveDelayedErrors(); + session_write_close(); + + if ($compose_new_win == '1') { + if ( !isset($pageheader_sent) || !$pageheader_sent ) { + header("Location: $location/compose.php?saved_draft=yes&session=$composesession"); + } else { +//FIXME: DON'T ECHO HTML FROM CORE! + echo '

' + . _("Return") . '
'; } - else { - Header("Location: right_main.php?mailbox=$draft_folder&sort=$sort". - "&startMessage=1¬e=".urlencode($draft_message)); - exit(); + exit(); + } else { + if ( !isset($pageheader_sent) || !$pageheader_sent ) { + header("Location: $location/right_main.php?mailbox=" . urlencode($draft_folder) . + "&startMessage=1¬e=".urlencode($draft_message)); + } else { +//FIXME: DON'T ECHO HTML FROM CORE! + echo '

' + . _("Return") . '
'; } + exit(); } } } if ($send) { if (isset($_FILES['attachfile']) && - $_FILES['attachfile']['tmp_name'] && - $_FILES['attachfile']['tmp_name'] != 'none') { + $_FILES['attachfile']['tmp_name'] && + $_FILES['attachfile']['tmp_name'] != 'none') { $AttachFailure = saveAttachedFiles($session); } if (checkInput(false) && !isset($AttachFailure)) { - if ($mailbox == "All Folders") { - /* We entered compose via the search results page */ - $mailbox="INBOX"; /* Send 'em to INBOX, that's safe enough */ - } - $urlMailbox = urlencode (trim($mailbox)); + if ($mailbox == "All Folders") { + /* We entered compose via the search results page */ + $mailbox = 'INBOX'; /* Send 'em to INBOX, that's safe enough */ + } + $urlMailbox = urlencode($mailbox); if (! isset($passed_id)) { $passed_id = 0; } - /* + /** * Set $default_charset to correspond with the user's selection * of language interface. */ set_my_charset(); - /* + /** * This is to change all newlines to \n * We'll change them to \r\n later (in the sendMessage function) */ $body = str_replace("\r\n", "\n", $body); $body = str_replace("\r", "\n", $body); - /* + /** * Rewrap $body so that no line is bigger than $editor_size - * This should only really kick in the sqWordWrap function - * if the browser doesn't support "VIRTUAL" as the wrap type. */ $body = explode("\n", $body); $newBody = ''; foreach ($body as $line) { if( $line <> '-- ' ) { - $line = rtrim($line); + $line = rtrim($line); } - if (strlen($line) <= $editor_size + 1) { + if (sq_strlen($line, $default_charset) <= $editor_size + 1) { $newBody .= $line . "\n"; } else { - sqWordWrap($line, $editor_size); + sqWordWrap($line, $editor_size, $default_charset); $newBody .= $line . "\n"; + } + } $body = $newBody; - do_hook('compose_send'); - $composeMessage=$compose_messages[$session]; $Result = deliverMessage($composeMessage); + + if ($Result) + $mail_sent = 'yes'; + else + $mail_sent = 'no'; + + // NOTE: this hook changed in 1.5.2 from sending $Result and + // $composeMessage as args #2 and #3 to being in an array + // under arg #2 + $temp = array(&$Result, &$composeMessage, &$mail_sent); + do_hook('compose_send_after', $temp); if (! $Result) { showInputForm($session); exit(); } - unset($compose_messages[$session]); + + /* if it is resumed draft, delete draft message */ if ( isset($delete_draft)) { - Header("Location: delete_message.php?mailbox=" . urlencode( $draft_folder ). - "&message=$delete_draft&sort=$sort&startMessage=1&mail_sent=yes"); - exit(); + $imap_stream = sqimap_login($username, false, $imapServerAddress, $imapPort, false); + sqimap_mailbox_select($imap_stream, $draft_folder); + // bypass_trash=true because message should be saved when deliverMessage() returns true. + // in current implementation of sqimap_msgs_list_flag() single message id can + // be submitted as string. docs state that it should be array. + sqimap_msgs_list_delete($imap_stream, $draft_folder, $delete_draft, true); + if ($auto_expunge) { + sqimap_mailbox_expunge($imap_stream, $draft_folder, true); + } + sqimap_logout($imap_stream); } - if ($compose_new_win == '1') { + /* + * Store the error array in the session because they will be lost on a redirect + */ + $oErrorHandler->saveDelayedErrors(); + session_write_close(); - Header("Location: compose.php?mail_sent=yes"); - } - else { - Header("Location: right_main.php?mailbox=$urlMailbox&sort=$sort". - "&startMessage=1"); + if ($compose_new_win == '1') { + if ( !isset($pageheader_sent) || !$pageheader_sent ) { + header("Location: $location/compose.php?mail_sent=$mail_sent"); + } else { +//FIXME: DON'T ECHO HTML FROM CORE! + echo '

' + . _("Return") . '
'; + } + exit(); + } else { + if ( !isset($pageheader_sent) || !$pageheader_sent ) { + header("Location: $location/right_main.php?mailbox=$urlMailbox". + "&startMessage=$startMessage&mail_sent=$mail_sent"); + } else { +//FIXME: DON'T ECHO HTML FROM CORE! + echo '

" + . _("Return") . '
'; + } + exit(); } } else { if ($compose_new_win == '1') { @@ -370,20 +579,20 @@ if ($send) { displayPageHeader($color, $mailbox); } if (isset($AttachFailure)) { - plain_error_message(_("Could not move/copy file. File not attached"), - $color); + plain_error_message(_("Could not move/copy file. File not attached"), + $color); } checkInput(true); showInputForm($session); /* sqimap_logout($imapConnection); */ } } elseif (isset($html_addr_search_done)) { - if ($compose_new_win == '1') { - compose_Header($color, $mailbox); - } - else { - displayPageHeader($color, $mailbox); - } + if ($compose_new_win == '1') { + compose_Header($color, $mailbox); + } + else { + displayPageHeader($color, $mailbox); + } if (isset($send_to_search) && is_array($send_to_search)) { foreach ($send_to_search as $k => $v) { @@ -408,12 +617,12 @@ if ($send) { } } showInputForm($session); -} elseif (isset($html_addr_search)) { +} elseif (isset($html_addr_search) && !isset($html_addr_search_cancel)) { if (isset($_FILES['attachfile']) && - $_FILES['attachfile']['tmp_name'] && - $_FILES['attachfile']['tmp_name'] != 'none') { + $_FILES['attachfile']['tmp_name'] && + $_FILES['attachfile']['tmp_name'] != 'none') { if(saveAttachedFiles($session)) { - plain_error_message(_("Could not move/copy file. File not attached"), $color); + plain_error_message(_("Could not move/copy file. File not attached")); } } /* @@ -422,68 +631,57 @@ if ($send) { */ include_once('./addrbook_search_html.php'); } elseif (isset($attach)) { + if ($compose_new_win == '1') { + compose_Header($color, $mailbox); + } else { + displayPageHeader($color, $mailbox); + } if (saveAttachedFiles($session)) { - plain_error_message(_("Could not move/copy file. File not attached"), $color); + plain_error_message(_("Could not move/copy file. File not attached")); } - if ($compose_new_win == '1') { - compose_Header($color, $mailbox); - } - else { - displayPageHeader($color, $mailbox); - } showInputForm($session); } elseif (isset($sigappend)) { - $idents = getPref($data_dir, $username, 'identities', 0); - if ($idents > 1) { - if ($identity == 'default') { - $no = 'g'; - } else { - $no = $identity; - } - $signature = getSig($data_dir, $username, $no); - } + $signature = $idents[$identity]['signature']; + $body .= "\n\n".($prefix_sig==true? "-- \n":'').$signature; if ($compose_new_win == '1') { - compose_Header($color, $mailbox); + compose_Header($color, $mailbox); } else { displayPageHeader($color, $mailbox); } showInputForm($session); } elseif (isset($do_delete)) { - if ($compose_new_win == '1') { - compose_Header($color, $mailbox); - } - else { - displayPageHeader($color, $mailbox); - } + if ($compose_new_win == '1') { + compose_Header($color, $mailbox); + } else { + displayPageHeader($color, $mailbox); + } if (isset($delete) && is_array($delete)) { - $composeMessage = $compose_messages[$session]; foreach($delete as $index) { - $attached_file = $composeMessage->entities[$index]->att_local_name; - unlink ($attached_file); - unset ($composeMessage->entities[$index]); + if (!empty($composeMessage->entities) && isset($composeMessage->entities[$index])) { + $composeMessage->entities[$index]->purgeAttachments(); + unset ($composeMessage->entities[$index]); + } } $new_entities = array(); foreach ($composeMessage->entities as $entity) { $new_entities[] = $entity; } $composeMessage->entities = $new_entities; - $compose_messages[$session] = $composeMessage; - sqsession_register($compose_messages, 'compose_messages'); } showInputForm($session); } else { /* * This handles the default case as well as the error case - * (they had the same code) --> if (isset($smtpErrors)) + * (they had the same code) --> if (isset($smtpErrors)) */ if ($compose_new_win == '1') { - compose_Header($color, $mailbox); + compose_Header($color, $mailbox); } else { - displayPageHeader($color, $mailbox); + displayPageHeader($color, $mailbox); } $newmail = true; @@ -492,26 +690,29 @@ elseif (isset($sigappend)) { $passed_ent_id = ''; } if (!isset($passed_id)) { - $passed_id = ''; + $passed_id = ''; } if (!isset($mailbox)) { $mailbox = ''; - } + } if (!isset($action)) { $action = ''; } - + $values = newMail($mailbox,$passed_id,$passed_ent_id, $action, $session); /* in case the origin is not read_body.php */ if (isset($send_to)) { - $values['send_to'] = $send_to; + $values['send_to'] = $send_to; } if (isset($send_to_cc)) { - $values['send_to_cc'] = $send_to_cc; + $values['send_to_cc'] = $send_to_cc; } if (isset($send_to_bcc)) { - $values['send_to_bcc'] = $send_to_bcc; + $values['send_to_bcc'] = $send_to_bcc; + } + if (isset($subject)) { + $values['subject'] = $subject; } showInputForm($session, $values); } @@ -520,38 +721,56 @@ exit(); /**************** Only function definitions go below *************/ +function getforwardSubject($subject) +{ + if ((substr(strtolower($subject), 0, 4) != 'fwd:') && + (substr(strtolower($subject), 0, 5) != '[fwd:') && + (substr(strtolower($subject), 0, 6) != '[ fwd:')) { + $subject = '[Fwd: ' . $subject . ']'; + } + return $subject; +} /* This function is used when not sending or adding attachments */ function newMail ($mailbox='', $passed_id='', $passed_ent_id='', $action='', $session='') { - global $editor_size, $default_use_priority, $body, - $use_signature, $composesession, $data_dir, $username, - $username, $key, $imapServerAddress, $imapPort, $compose_messages, - $composeMessage; + global $editor_size, $default_use_priority, $body, $idents, + $use_signature, $data_dir, $username, + $key, $imapServerAddress, $imapPort, + $composeMessage, $body_quote, $request_mdn, $request_dr, + $mdn_user_support, $languages, $squirrelmail_language, + $default_charset; + + /* + * Set $default_charset to correspond with the user's selection + * of language interface. $default_charset global is not correct, + * if message is composed in new window. + */ + set_my_charset(); $send_to = $send_to_cc = $send_to_bcc = $subject = $identity = ''; $mailprio = 3; if ($passed_id) { - $imapConnection = sqimap_login($username, $key, $imapServerAddress, - $imapPort, 0); + $imapConnection = sqimap_login($username, false, $imapServerAddress, + $imapPort, 0); sqimap_mailbox_select($imapConnection, $mailbox); $message = sqimap_get_message($imapConnection, $passed_id, $mailbox); - + $body = ''; if ($passed_ent_id) { /* redefine the messsage in case of message/rfc822 */ $message = $message->getEntity($passed_ent_id); /* message is an entity which contains the envelope and type0=message - * and type1=rfc822. The actual entities are childs from - * $message->entities[0]. That's where the encoding and is located - */ + * and type1=rfc822. The actual entities are childs from + * $message->entities[0]. That's where the encoding and is located + */ $entities = $message->entities[0]->findDisplayEntity - (array(), $alt_order = array('text/plain')); + (array(), $alt_order = array('text/plain')); if (!count($entities)) { $entities = $message->entities[0]->findDisplayEntity - (array(), $alt_order = array('text/plain','html/plain')); + (array(), $alt_order = array('text/plain','text/html')); } $orig_header = $message->rfc822_header; /* here is the envelope located */ /* redefine the message for picking up the attachments */ @@ -560,22 +779,46 @@ function newMail ($mailbox='', $passed_id='', $passed_ent_id='', $action='', $se } else { $entities = $message->findDisplayEntity (array(), $alt_order = array('text/plain')); if (!count($entities)) { - $entities = $message->findDisplayEntity (array(), $alt_order = array('text/plain','html/plain')); + $entities = $message->findDisplayEntity (array(), $alt_order = array('text/plain','text/html')); } $orig_header = $message->rfc822_header; } - - $encoding = $message->header->encoding; + $type0 = $message->type0; $type1 = $message->type1; foreach ($entities as $ent) { + $msg = $message->getEntity($ent); + $type0 = $msg->type0; + $type1 = $msg->type1; $unencoded_bodypart = mime_fetch_body($imapConnection, $passed_id, $ent); $body_part_entity = $message->getEntity($ent); $bodypart = decodeBody($unencoded_bodypart, - $body_part_entity->header->encoding); + $body_part_entity->header->encoding); if ($type1 == 'html') { + $bodypart = str_replace("\n", ' ', $bodypart); + $bodypart = preg_replace(array('/<\/?p>/i','/
<\/div>/i','//i','/<\/?div>/i'), "\n", $bodypart); + $bodypart = str_replace(array(' ','>','<'),array(' ','>','<'),$bodypart); $bodypart = strip_tags($bodypart); } + if (isset($languages[$squirrelmail_language]['XTRA_CODE']) && + function_exists($languages[$squirrelmail_language]['XTRA_CODE'] . '_decode')) { + if (mb_detect_encoding($bodypart) != 'ASCII') { + $bodypart = call_user_func($languages[$squirrelmail_language]['XTRA_CODE'] . '_decode', $bodypart); + } + } + + // charset encoding in compose form stuff + if (isset($body_part_entity->header->parameters['charset'])) { + $actual = $body_part_entity->header->parameters['charset']; + } else { + $actual = 'us-ascii'; + } + + if ( $actual && is_conversion_safe($actual) && $actual != $default_charset){ + $bodypart = charset_convert($actual,$bodypart,$default_charset,false); + } + // end of charset encoding in compose + $body .= $bodypart; } if ($default_use_priority) { @@ -586,31 +829,30 @@ function newMail ($mailbox='', $passed_id='', $passed_ent_id='', $action='', $se } else { $mailprio = ''; } - //ClearAttachments($session); - $identity = ''; - $idents = getPref($data_dir, $username, 'identities'); $from_o = $orig_header->from; + if (is_array($from_o)) { + if (isset($from_o[0])) { + $from_o = $from_o[0]; + } + } if (is_object($from_o)) { $orig_from = $from_o->getAddress(); } else { $orig_from = ''; } + $identities = array(); - if (!empty($idents) && $idents > 1) { - $identities[] = '"'. getPref($data_dir, $username, 'full_name') - . '" <' . getPref($data_dir, $username, 'email_address') . '>'; - for ($i = 1; $i < $idents; $i++) { - $enc_from_name = '"'. - getPref($data_dir, $username, 'full_name' . $i) . - '" <' . - getPref($data_dir, $username, 'email_address' . $i) . '>'; - if ($enc_from_name == $orig_from && $i) { - $identity = $i; + if (count($idents) > 1) { + foreach($idents as $nr=>$data) { + $enc_from_name = '"'.$data['full_name'].'" <'. $data['email_address'].'>'; + if(strtolower($enc_from_name) == strtolower($orig_from)) { + $identity = $nr; break; } $identities[] = $enc_from_name; } + $identity_match = $orig_header->findAddress($identities); if ($identity_match) { $identity = $identity_match; @@ -618,152 +860,179 @@ function newMail ($mailbox='', $passed_id='', $passed_ent_id='', $action='', $se } switch ($action) { - case ('draft'): - $use_signature = FALSE; - $send_to = $orig_header->getAddr_s('to'); - $send_to_cc = $orig_header->getAddr_s('cc'); - $send_to_bcc = $orig_header->getAddr_s('bcc'); - $subject = decodeHeader($orig_header->subject,true,false); - $body_ary = explode("\n", $body); - $cnt = count($body_ary) ; - $body = ''; - for ($i=0; $i < $cnt; $i++) { - if (!ereg("^[>\\s]*$", $body_ary[$i]) || !$body_ary[$i]) { - sqWordWrap($body_ary[$i], $editor_size ); - $body .= $body_ary[$i] . "\n"; - } - unset($body_ary[$i]); - } - sqUnWordWrap($body); - $composeMessage = getAttachments($message, $composeMessage, $passed_id, $entities, $imapConnection); - break; - case ('edit_as_new'): - $send_to = $orig_header->getAddr_s('to'); - $send_to_cc = $orig_header->getAddr_s('cc'); - $send_to_bcc = $orig_header->getAddr_s('bcc'); - $subject = decodeHeader($orig_header->subject,true,false); - $mailprio = $orig_header->priority; - $orig_from = ''; - $composeMessage = getAttachments($message, $composeMessage, $passed_id, $entities, $imapConnection); - sqUnWordWrap($body); - break; - case ('forward'): - $send_to = ''; - $subject = decodeHeader($orig_header->subject,true,false); - if ((substr(strtolower($subject), 0, 4) != 'fwd:') && - (substr(strtolower($subject), 0, 5) != '[fwd:') && - (substr(strtolower($subject), 0, 6) != '[ fwd:')) { - $subject = '[Fwd: ' . $subject . ']'; - } - $body = getforwardHeader($orig_header) . $body; - sqUnWordWrap($body); - $composeMessage = getAttachments($message, $composeMessage, $passed_id, $entities, $imapConnection); - $body = "\n" . $body; - break; - case ('forward_as_attachment'): - $composeMessage = getMessage_RFC822_Attachment($message, $composeMessage, $passed_id, $passed_ent_id, $imapConnection); - $body = ''; - break; - case ('reply_all'): - $send_to_cc = replyAllString($orig_header); - case ('reply'): - $send_to = $orig_header->reply_to; - if (is_array($send_to) && count($send_to)) { - $send_to = $orig_header->getAddr_s('reply_to'); - } else if (is_object($send_to)) { /* unnessecarry, just for falesafe purpose */ - $send_to = $orig_header->getAddr_s('reply_to'); - } else { - $send_to = $orig_header->getAddr_s('from'); - } - $subject = decodeHeader($orig_header->subject,true,false); - $subject = str_replace('"', "'", $subject); - $subject = trim($subject); - if (substr(strtolower($subject), 0, 3) != 're:') { - $subject = 'Re: ' . $subject; - } - /* this corrects some wrapping/quoting problems on replies */ - $rewrap_body = explode("\n", $body); - $from = (is_array($orig_header->from)) ? - $orig_header->from[0] : $orig_header->from; - $body = getReplyCitation($from->getAddress(false)); - sqUnWordWrap($body); - $cnt = count($rewrap_body); - for ($i=0;$i<$cnt;$i++) { - sqWordWrap($rewrap_body[$i], ($editor_size)); - if (preg_match("/^(>+)/", $rewrap_body[$i], $matches)) { - $gt = $matches[1]; - $body .= '>' . str_replace("\n", "\n>$gt ", rtrim($rewrap_body[$i])) ."\n"; + case ('draft'): + $use_signature = FALSE; + $composeMessage->rfc822_header = $orig_header; + $send_to = decodeHeader($orig_header->getAddr_s('to'),false,false,true); + $send_to_cc = decodeHeader($orig_header->getAddr_s('cc'),false,false,true); + $send_to_bcc = decodeHeader($orig_header->getAddr_s('bcc'),false,false,true); + $send_from = $orig_header->getAddr_s('from'); + $send_from_parts = new AddressStructure(); + $send_from_parts = $orig_header->parseAddress($send_from); + $send_from_add = $send_from_parts->mailbox . '@' . $send_from_parts->host; + $identity = find_identity(array($send_from_add)); + $subject = decodeHeader($orig_header->subject,false,false,true); + + // Remember the receipt settings + $request_mdn = $mdn_user_support && !empty($orig_header->dnt) ? '1' : '0'; + $request_dr = $mdn_user_support && !empty($orig_header->drnt) ? '1' : '0'; + + /* remember the references and in-reply-to headers in case of an reply */ +//FIXME: it would be better to fiddle with headers inside of the message object or possibly when delivering the message to its destination (drafts folder?); is this possible? + $composeMessage->rfc822_header->more_headers['References'] = $orig_header->references; + $composeMessage->rfc822_header->more_headers['In-Reply-To'] = $orig_header->in_reply_to; + // rewrap the body to clean up quotations and line lengths + sqBodyWrap($body, $editor_size); + $composeMessage = getAttachments($message, $composeMessage, $passed_id, $entities, $imapConnection); + break; + case ('edit_as_new'): + $send_to = decodeHeader($orig_header->getAddr_s('to'),false,false,true); + $send_to_cc = decodeHeader($orig_header->getAddr_s('cc'),false,false,true); + $send_to_bcc = decodeHeader($orig_header->getAddr_s('bcc'),false,false,true); + $subject = decodeHeader($orig_header->subject,false,false,true); + $mailprio = $orig_header->priority; + $orig_from = ''; + $composeMessage = getAttachments($message, $composeMessage, $passed_id, $entities, $imapConnection); + // rewrap the body to clean up quotations and line lengths + sqBodyWrap($body, $editor_size); + break; + case ('forward'): + $send_to = ''; + $subject = getforwardSubject(decodeHeader($orig_header->subject,false,false,true)); + $body = getforwardHeader($orig_header) . $body; + // the logic for calling sqUnWordWrap here would be to allow the browser to wrap the lines + // forwarded message text should be as undisturbed as possible, so commenting out this call + // sqUnWordWrap($body); + $composeMessage = getAttachments($message, $composeMessage, $passed_id, $entities, $imapConnection); + + //add a blank line after the forward headers + $body = "\n" . $body; + break; + case ('forward_as_attachment'): + $subject = getforwardSubject(decodeHeader($orig_header->subject,false,false,true)); + $composeMessage = getMessage_RFC822_Attachment($message, $composeMessage, $passed_id, $passed_ent_id, $imapConnection); + $body = ''; + break; + case ('reply_all'): + if(isset($orig_header->mail_followup_to) && $orig_header->mail_followup_to) { + $send_to = $orig_header->getAddr_s('mail_followup_to'); } else { - $body .= '> ' . str_replace("\n", "\n> ", rtrim($rewrap_body[$i])) . "\n"; + $send_to_cc = replyAllString($orig_header); + $send_to_cc = decodeHeader($send_to_cc,false,false,true); } - unset($rewrap_body[$i]); - } - $composeMessage->reply_rfc822_header = $orig_header; - break; + case ('reply'): + // skip this if send_to was already set right above here + if(!$send_to) { + $send_to = $orig_header->reply_to; + if (is_array($send_to) && count($send_to)) { + $send_to = $orig_header->getAddr_s('reply_to'); + } else if (is_object($send_to)) { /* unneccesarry, just for failsafe purpose */ + $send_to = $orig_header->getAddr_s('reply_to'); + } else { + $send_to = $orig_header->getAddr_s('from'); + } + } + $send_to = decodeHeader($send_to,false,false,true); + $subject = decodeHeader($orig_header->subject,false,false,true); + $subject = str_replace('"', "'", $subject); + $subject = trim($subject); + if (substr(strtolower($subject), 0, 3) != 're:') { + $subject = 'Re: ' . $subject; + } + /* this corrects some wrapping/quoting problems on replies */ + $rewrap_body = explode("\n", $body); + $from = (is_array($orig_header->from) && !empty($orig_header->from)) ? $orig_header->from[0] : $orig_header->from; + $body = ''; + $strip_sigs = getPref($data_dir, $username, 'strip_sigs'); + foreach ($rewrap_body as $line) { + if ($strip_sigs && substr($line,0,3) == '-- ') { + break; + } + if (preg_match("/^(>+)/", $line, $matches)) { + $gt = $matches[1]; + $body .= $body_quote . str_replace("\n", "\n$body_quote$gt ", rtrim($line)) ."\n"; + } else { + $body .= $body_quote . (!empty($body_quote) ? ' ' : '') . str_replace("\n", "\n$body_quote" . (!empty($body_quote) ? ' ' : ''), rtrim($line)) . "\n"; + } + } + + //rewrap the body to clean up quotations and line lengths + $body = sqBodyWrap ($body, $editor_size); + + $body = getReplyCitation($from , $orig_header->date) . $body; + $composeMessage->reply_rfc822_header = $orig_header; + + break; default: - break; + break; } - $compose_messages[$session] = $composeMessage; - sqsession_register($compose_messages, 'compose_messages'); +//FIXME: we used to register $compose_messages in the session here, but not any more - so do we still need the session_write_close() and sqimap_logout() here? We probably need the IMAP logout, but what about the session closure? session_write_close(); sqimap_logout($imapConnection); } $ret = array( 'send_to' => $send_to, - 'send_to_cc' => $send_to_cc, - 'send_to_bcc' => $send_to_bcc, - 'subject' => $subject, - 'mailprio' => $mailprio, - 'body' => $body, - 'identity' => $identity ); + 'send_to_cc' => $send_to_cc, + 'send_to_bcc' => $send_to_bcc, + 'subject' => $subject, + 'mailprio' => $mailprio, + 'body' => $body, + 'identity' => $identity ); return ($ret); } /* function newMail() */ +/** + * downloads attachments from original message, stores them in attachment directory and adds + * them to composed message. + * @param object $message + * @param object $composeMessage + * @param integer $passed_id + * @param mixed $entities + * @param mixed $imapConnection + * @return object + */ function getAttachments($message, &$composeMessage, $passed_id, $entities, $imapConnection) { - global $attachment_dir, $username, $data_dir, $squirrelmail_language; - $hashed_attachment_dir = getHashedDir($username, $attachment_dir); - if (!count($message->entities) || - ($message->type0 == 'message' && $message->type1 == 'rfc822')) { + global $squirrelmail_language, $languages, $username, $attachment_dir; + + if (!count($message->entities) || + ($message->type0 == 'message' && $message->type1 == 'rfc822')) { if ( !in_array($message->entity_id, $entities) && $message->entity_id) { - switch ($message->type0) { - case 'message': - if ($message->type1 == 'rfc822') { - $filename = $message->rfc822_header->subject.'.eml'; - if ($filename == "") { - $filename = "untitled-".$message->entity_id.'.eml'; - } - } else { - $filename = $message->getFilename(); - } - break; - default: - $filename = $message->getFilename(); - break; - } - $filename = decodeHeader($filename); - if (isset($languages[$squirrelmail_language]['XTRA_CODE']) && - function_exists($languages[$squirrelmail_language]['XTRA_CODE'])) { - $filename = $languages[$squirrelmail_language]['XTRA_CODE']('encode', $filename); - } - $localfilename = GenerateRandomString(32, '', 7); - $full_localfilename = "$hashed_attachment_dir/$localfilename"; - while (file_exists($full_localfilename)) { - $localfilename = GenerateRandomString(32, '', 7); - $full_localfilename = "$hashed_attachment_dir/$localfilename"; - } - $message->att_local_name = $full_localfilename; - if (!$message->mime_header) { /* temporary hack */ - $message->mime_header = $message->header; - } - - $composeMessage->addEntity($message); - - /* Write Attachment to file */ - $fp = fopen ("$hashed_attachment_dir/$localfilename", 'wb'); - fputs($fp, decodeBody(mime_fetch_body($imapConnection, - $passed_id, $message->entity_id), - $message->header->encoding)); - fclose ($fp); + switch ($message->type0) { + case 'message': + if ($message->type1 == 'rfc822') { + $filename = $message->rfc822_header->subject; + if ($filename == "") { + $filename = "untitled-".$message->entity_id; + } + $filename .= '.msg'; + } else { + $filename = $message->getFilename(); + } + break; + default: + if (!$message->mime_header) { /* temporary hack */ + $message->mime_header = $message->header; + } + $filename = $message->getFilename(); + break; + } + $filename = str_replace(' ', ' ', decodeHeader($filename)); + if (isset($languages[$squirrelmail_language]['XTRA_CODE']) && + function_exists($languages[$squirrelmail_language]['XTRA_CODE'] . '_encode')) { + $filename = call_user_func($languages[$squirrelmail_language]['XTRA_CODE'] . '_encode', $filename); + } + + $hashed_attachment_dir = getHashedDir($username, $attachment_dir); + $localfilename = sq_get_attach_tempfile(); + $message->att_local_name = $localfilename; + + $composeMessage->initAttachment($message->type0.'/'.$message->type1,$filename, + $localfilename); + + /* Write Attachment to file */ + $fp = fopen ($hashed_attachment_dir . '/' . $localfilename, 'wb'); + mime_print_body_lines ($imapConnection, $passed_id, $message->entity_id, $message->header->encoding, $fp); + fclose ($fp); } } else { for ($i=0, $entCount=count($message->entities); $i<$entCount;$i++) { @@ -773,373 +1042,348 @@ function getAttachments($message, &$composeMessage, $passed_id, $entities, $imap return $composeMessage; } -function getMessage_RFC822_Attachment($message, $composeMessage, $passed_id, - $passed_ent_id='', $imapConnection) { - global $attachments, $attachment_dir, $username, $data_dir, $uid_support; - $hashed_attachment_dir = getHashedDir($username, $attachment_dir); +function getMessage_RFC822_Attachment($message, $composeMessage, $passed_id, + $passed_ent_id='', $imapConnection) { if (!$passed_ent_id) { - $body_a = sqimap_run_command($imapConnection, - 'FETCH '.$passed_id.' RFC822', - TRUE, $response, $readmessage, - $uid_support); + $body_a = sqimap_run_command($imapConnection, + 'FETCH '.$passed_id.' RFC822', + TRUE, $response, $readmessage, + TRUE); } else { - $body_a = sqimap_run_command($imapConnection, - 'FETCH '.$passed_id.' BODY['.$passed_ent_id.']', - TRUE, $response, $readmessage, $uid_support); + $body_a = sqimap_run_command($imapConnection, + 'FETCH '.$passed_id.' BODY['.$passed_ent_id.']', + TRUE, $response, $readmessage, TRUE); $message = $message->parent; } - if ($response = 'OK') { + if ($response == 'OK') { $subject = encodeHeader($message->rfc822_header->subject); array_shift($body_a); + array_pop($body_a); $body = implode('', $body_a) . "\r\n"; - - $localfilename = GenerateRandomString(32, 'FILE', 7); - $full_localfilename = "$hashed_attachment_dir/$localfilename"; - - $fp = fopen( $full_localfilename, 'w'); + + global $username, $attachment_dir; + $hashed_attachment_dir = getHashedDir($username, $attachment_dir); + $localfilename = sq_get_attach_tempfile(); + $fp = fopen($hashed_attachment_dir . '/' . $localfilename, 'wb'); fwrite ($fp, $body); fclose($fp); - $composeMessage->initAttachment('message/rfc822',$subject.'.eml', - $full_localfilename); + $composeMessage->initAttachment('message/rfc822',$subject.'.msg', + $localfilename); } return $composeMessage; } function showInputForm ($session, $values=false) { - global $send_to, $send_to_cc, $body, - $passed_body, $color, $use_signature, $signature, $prefix_sig, - $editor_size, $attachments, $subject, $newmail, - $use_javascript_addr_book, $send_to_bcc, $passed_id, $mailbox, - $from_htmladdr_search, $location_of_buttons, $attachment_dir, - $username, $data_dir, $identity, $draft_id, $delete_draft, - $mailprio, $default_use_mdn, $mdn_user_support, $compose_new_win, - $saved_draft, $mail_sent, $sig_first, $edit_as_new, $action, - $username, $compose_messages, $composesession, $default_charset; - - $composeMessage = $compose_messages[$session]; + global $send_to, $send_to_cc, $send_to_bcc, + $body, $startMessage, $action, $attachments, + $use_signature, $signature, $prefix_sig, $session_expired, + $editor_size, $editor_height, $subject, $newmail, + $use_javascript_addr_book, $passed_id, $mailbox, + $from_htmladdr_search, $location_of_buttons, $attachment_dir, + $username, $data_dir, $identity, $idents, $delete_draft, + $mailprio, $compose_new_win, $saved_draft, $mail_sent, $sig_first, + $composeMessage, $composesession, $default_charset, + $compose_onsubmit, $oTemplate, $oErrorHandler; + + if (checkForJavascript()) { + $onfocus = ' onfocus="alreadyFocused=true;"'; + $onfocus_array = array('onfocus' => 'alreadyFocused=true;'); + } + else { + $onfocus = ''; + $onfocus_array = array(); + } if ($values) { - $send_to = $values['send_to']; - $send_to_cc = $values['send_to_cc']; - $send_to_bcc = $values['send_to_bcc']; - $subject = $values['subject']; - $mailprio = $values['mailprio']; - $body = $values['body']; - $identity = (int) $values['identity']; + $send_to = $values['send_to']; + $send_to_cc = $values['send_to_cc']; + $send_to_bcc = $values['send_to_bcc']; + $subject = $values['subject']; + $mailprio = $values['mailprio']; + $body = $values['body']; + $identity = (int) $values['identity']; + } else { + $send_to = decodeHeader($send_to, true, false); + $send_to_cc = decodeHeader($send_to_cc, true, false); + $send_to_bcc = decodeHeader($send_to_bcc, true, false); } - + if ($use_javascript_addr_book) { - echo "\n". '' . "\n\n"; - } - - echo "\n" . '
'."\n\n\n\n"; + } + +//FIXME: NO HTML IN CORE! + echo "\n" . '\n"; +//FIXME: DON'T ECHO HTML FROM CORE! + echo addHidden('startMessage', $startMessage); + if ($action == 'draft') { - echo '\n"; +//FIXME: DON'T ECHO HTML FROM CORE! + echo addHidden('delete_draft', $passed_id); } if (isset($delete_draft)) { - echo '\n"; +//FIXME: DON'T ECHO HTML FROM CORE! + echo addHidden('delete_draft', $delete_draft); } if (isset($session)) { - echo '\n"; +//FIXME: DON'T ECHO HTML FROM CORE! + echo addHidden('session', $session); } - + if (isset($passed_id)) { - echo '\n"; +//FIXME: DON'T ECHO HTML FROM CORE! + echo addHidden('passed_id', $passed_id); } if ($saved_draft == 'yes') { - echo '
'. _("Draft Saved").'
'; + $oTemplate->assign('note', _("Your draft has been saved.")); + $oTemplate->display('note.tpl'); } if ($mail_sent == 'yes') { - echo '
'. _("Your Message has been sent").'
'; + $oTemplate->assign('note', _("Your mail has been sent.")); + $oTemplate->display('note.tpl'); } - echo '' . "\n"; if ($compose_new_win == '1') { - echo '
'."\n" . - ' '. html_tag( 'td', '', 'right' ) . ''."\n"; + $oTemplate->display('compose_newwin_close.tpl'); } + if ($location_of_buttons == 'top') { +//FIXME: DON'T ECHO HTML FROM CORE! showComposeButtonRow(); } - $idents = getPref($data_dir, $username, 'identities', 0); - if ($idents > 1) { - echo ' ' . "\n" . - html_tag( 'td', '', 'right', $color[4], 'WIDTH="10%"' ) . - _("From:") . '' . "\n" . - html_tag( 'td', '', 'left', $color[4], 'WIDTH="90%"' ) . - ' ' . "\n" . - ' ' . "\n" . - ' ' . "\n"; - } - echo ' ' . "\n" . - html_tag( 'td', '', 'right', $color[4], 'WIDTH="10%"' ) . - _("To:") . '' . "\n" . - html_tag( 'td', '', 'left', $color[4], 'WIDTH="90%"' ) . - '
' . "\n" . - ' ' . "\n" . - ' ' . "\n" . - ' ' . "\n" . - html_tag( 'td', '', 'right', $color[4] ) . - _("CC:") . '' . "\n" . - html_tag( 'td', '', 'left', $color[4] ) . - '
' . "\n" . - ' ' . "\n" . - ' ' . "\n" . - ' ' . "\n" . - html_tag( 'td', '', 'right', $color[4] ) . - _("BCC:") . '' . "\n" . - html_tag( 'td', '', 'left', $color[4] ) . - '
' . "\n" . - ' ' . "\n" . - ' ' . "\n" . - ' ' . "\n" . - html_tag( 'td', '', 'right', $color[4] ) . - _("Subject:") . '' . "\n" . - html_tag( 'td', '', 'left', $color[4] ) . "\n"; - echo ' ' . "\n" . - ' ' . "\n" . - ' ' . "\n\n"; + } + + $oTemplate->assign('identities', $identities); + $oTemplate->assign('identity_def', $identity); + $oTemplate->assign('input_onfocus', 'onfocus="'.join(' ', $onfocus_array).'"'); + + $oTemplate->assign('to', htmlspecialchars($send_to)); + $oTemplate->assign('cc', htmlspecialchars($send_to_cc)); + $oTemplate->assign('bcc', htmlspecialchars($send_to_bcc)); + $oTemplate->assign('subject', htmlspecialchars($subject)); + + $oTemplate->display('compose_header.tpl'); if ($location_of_buttons == 'between') { +//FIXME: DON'T ECHO HTML FROM CORE! showComposeButtonRow(); } - if ($compose_new_win == '1') { - echo ' ' . "\n" . - ' ' . "\n" . - ' ' . "\n"; + + $oTemplate->assign('editor_width', (int)$editor_size); + $oTemplate->assign('editor_height', (int)$editor_height); + $oTemplate->assign('input_onfocus', 'onfocus="'.join(' ', $onfocus_array).'"'); + $oTemplate->assign('body', $body_str); + $oTemplate->assign('show_bottom_send', $location_of_buttons!='bottom'); + + $oTemplate->display ('compose_body.tpl'); if ($location_of_buttons == 'bottom') { +//FIXME: DON'T ECHO HTML FROM CORE! showComposeButtonRow(); - } else { - echo ' ' . "\n" . - html_tag( 'td', '', 'right', '', 'COLSPAN=2' ) . "\n" . - ' ' . "\n" . - '     

' . "\n" . - ' ' . "\n" . - ' ' . "\n"; } + // composeMessage can be empty when coming from a restored session + if (is_object($composeMessage) && $composeMessage->entities) + $attach_array = $composeMessage->entities; + if ($session_expired && !empty($attachments) && is_array($attachments)) + $attach_array = $attachments; + /* This code is for attachments */ - if ((bool) ini_get('file_uploads')) { - echo ' ' . "\n" . - ' ' . "\n" . - ' ' . "\n" . - '
' . "\n" . - '
' . "\n" . - '
' . "\n" . - ' ' . "\n" . - ' ' . "\n" . - ' ' . html_tag( 'td', '', 'left', $color[0], 'colspan="2"' ) . $s .''; - } - echo ''; - } - echo '
' . "\n" . - ' ' . "\n" . - ' ' . "\n" . - html_tag( 'td', '', 'right', '', 'VALIGN=MIDDLE' ) . - _("Attach:") . '' . "\n" . - html_tag( 'td', '', 'left', '', 'VALIGN=MIDDLE' ) . - ' ' . "\n" . - '   ' . "\n" . - ' ' . "\n" . - ' ' . "\n"; - + if ((bool) ini_get('file_uploads')) { + + /* Calculate the max size for an uploaded file. + * This is advisory for the user because we can't actually prevent + * people to upload too large files. */ + $sizes = array(); + /* php.ini vars which influence the max for uploads */ + $configvars = array('post_max_size', 'memory_limit', 'upload_max_filesize'); + foreach($configvars as $var) { + /* skip 0 or empty values, and -1 which means 'unlimited' */ + if( $size = getByteSize(ini_get($var)) ) { + if ( $size != '-1' ) { + $sizes[] = $size; + } + } + } - $s_a = array(); - if ($composeMessage->entities) { - foreach ($composeMessage->entities as $key => $attachment) { - $attached_file = $attachment->att_local_name; - if ($attachment->att_local_name || $attachment->body_part) { - $attached_filename = decodeHeader($attachment->mime_header->getParameter('name')); - $type = $attachment->mime_header->type0.'/'. + $attach = array(); + global $username, $attachment_dir; + $hashed_attachment_dir = getHashedDir($username, $attachment_dir); + if (!empty($attach_array)) { + foreach ($attach_array as $key => $attachment) { + $attached_file = $attachment->att_local_name; + if ($attachment->att_local_name || $attachment->body_part) { + $attached_filename = decodeHeader($attachment->mime_header->getParameter('name')); + $type = $attachment->mime_header->type0.'/'. $attachment->mime_header->type1; - - $s_a[] = '
\n" . $attached_filename . - '- ' . $type . '('. - show_readable_size( filesize( $attached_file ) ) . ')
'."\n"; - } + + $a = array(); + $a['Key'] = $key; + $a['FileName'] = $attached_filename; + $a['ContentType'] = $type; + $a['Size'] = filesize($hashed_attachment_dir . '/' . $attached_file); + $attach[$key] = $a; + } + } } - } - if (count($s_a)) { - foreach ($s_a as $s) { - echo '
\n" . - '
' . "\n" . - '
' . "\n" . - ' ' . "\n" . - ' ' . "\n"; - } // End of file_uploads if-block + + $max = min($sizes); + $oTemplate->assign('max_file_size', empty($max) ? -1 : $max); + $oTemplate->assign('attachments', $attach); + + $oTemplate->display('compose_attachments.tpl'); + } // End of file_uploads if-block /* End of attachment code */ - if ($compose_new_win == '1') { - echo ''."\n"; - } - - echo '' . "\n" . - '\n" . - '\n" . - '\n"; - /* - store the complete ComposeMessages array in a hidden input value - so we can restore them in case of a session timeout. - */ - echo '\n"; - echo '\n"; - echo '\n"; - echo '
'; + +//FIXME: no direct echoing to browser, no HTML output in core! + echo addHidden('username', $username). + addHidden('smaction', $action). + addHidden('mailbox', $mailbox); + sqgetGlobalVar('QUERY_STRING', $queryString, SQ_SERVER); +//FIXME: no direct echoing to browser, no HTML output in core! + echo addHidden('composesession', $composesession). + addHidden('querystring', $queryString). + (!empty($attach_array) ? + addHidden('attachments', urlencode(serialize($attach_array))) : ''). + "\n"; if (!(bool) ini_get('file_uploads')) { - /* File uploads are off, so we didn't show that part of the form. - To avoid bogus bug reports, tell the user why. */ - echo 'Because PHP file uploads are turned off, you can not attach files '; - echo "to this message. Please see your system administrator for details.\r\n"; + /* File uploads are off, so we didn't show that part of the form. + To avoid bogus bug reports, tell the user why. */ +//FIXME: no direct echoing to browser, no HTML output in core! + echo '

' + . _("Because PHP file uploads are turned off, you can not attach files to this message. Please see your system administrator for details.") + . "

\r\n"; + } + + if ($compose_new_win=='1') { + $oTemplate->display('compose_newwin_close.tpl'); } + do_hook('compose_bottom', $null); - do_hook('compose_bottom'); - echo '' . "\n"; + $oErrorHandler->setDelayedErrors(false); + $oTemplate->display('footer.tpl'); } function showComposeButtonRow() { global $use_javascript_addr_book, $save_as_draft, - $default_use_priority, $mailprio, $default_use_mdn, - $request_mdn, $request_dr, - $data_dir, $username; + $default_use_priority, $mailprio, $default_use_mdn, + $request_mdn, $request_dr, + $data_dir, $username; + + global $oTemplate, $buffer_hook; - echo ' ' . "\n" . - ' ' . "\n" . - ' ' . "\n"; if ($default_use_priority) { - if(!isset($mailprio)) { - $mailprio = "3"; - } - echo ' ' . _("Priority") .': ' . "\n"; + $priorities = array('1'=>_("High"), '3'=>_("Normal"), '5'=>_("Low")); + $priority = isset($mailprio) ? $mailprio : 3; + } else { + $priorities = array(); + $priority = NULL; } + $mdn_user_support=getPref($data_dir, $username, 'mdn_user_support',$default_use_mdn); - if ($default_use_mdn) { - if ($mdn_user_support) { - echo ' ' . _("Receipt") .': '. - ''. _("On Read"). - ' '. _("On Delivery"); - } - } - echo ' ' . "\n" . - ' ' . "\n" . - ' ' . "\n" . - ' ' . "\n" . - ' ' . "\n" . - ' ' . "\n"; - if ($use_javascript_addr_book) { - echo " \n"; + if ($use_javascript_addr_book && checkForJavascript()) { + $addr_book = addButton(_("Addresses"), null, array('onclick' => 'javascript:open_abook();')); } else { - echo ' ' . "\n"; + $addr_book = addSubmit(_("Addresses"), 'html_addr_search'); } - if ($save_as_draft) { - echo ' \n"; - } + $oTemplate->assign('allow_priority', $default_use_priority==1); + $oTemplate->assign('priority_list', $priorities); + $oTemplate->assign('current_priority', $priority); - echo ' ' . "\n"; - do_hook('compose_button_row'); + $oTemplate->assign('notifications_enabled', $mdn_user_support==1); + $oTemplate->assign('read_receipt', $request_mdn=='1'); + $oTemplate->assign('delivery_receipt', $request_dr=='1'); - echo ' ' . "\n" . - ' ' . "\n\n"; + $oTemplate->assign('drafts_enabled', $save_as_draft); + $oTemplate->assign('address_book_button', $addr_book); + + $oTemplate->display('compose_buttons.tpl'); } function checkInput ($show) { @@ -1149,11 +1393,14 @@ function checkInput ($show) { * using $show=false, and then when i'm ready to display the error * message, show=true */ - global $body, $send_to, $send_to_bcc, $subject, $color; + global $send_to, $send_to_cc, $send_to_bcc; - if ($send_to == '' && $send_to_bcc == '') { + $send_to = trim($send_to); + $send_to_cc = trim($send_to_cc); + $send_to_bcc = trim($send_to_bcc); + if (empty($send_to) && empty($send_to_cc) && empty($send_to_bcc)) { if ($show) { - plain_error_message(_("You have not filled in the \"To:\" field."), $color); + plain_error_message(_("You have not filled in the \"To:\" field.")); } return false; } @@ -1163,8 +1410,7 @@ function checkInput ($show) { /* True if FAILURE */ function saveAttachedFiles($session) { - global $_FILES, $attachment_dir, $attachments, $username, - $data_dir, $compose_messages; + global $composeMessage, $username, $attachment_dir; /* get out of here if no file was attached at all */ if (! is_uploaded_file($_FILES['attachfile']['tmp_name']) ) { @@ -1172,89 +1418,68 @@ function saveAttachedFiles($session) { } $hashed_attachment_dir = getHashedDir($username, $attachment_dir); - $localfilename = GenerateRandomString(32, '', 7); - $full_localfilename = "$hashed_attachment_dir/$localfilename"; - while (file_exists($full_localfilename)) { - $localfilename = GenerateRandomString(32, '', 7); - $full_localfilename = "$hashed_attachment_dir/$localfilename"; - } - - // FIXME: we SHOULD prefer move_uploaded_file over rename because - // m_u_f works better with restricted PHP installes (safe_mode, open_basedir) - if (!@rename($_FILES['attachfile']['tmp_name'], $full_localfilename)) { - if (!@move_uploaded_file($_FILES['attachfile']['tmp_name'],$full_localfilename)) { - return true; - } + $localfilename = sq_get_attach_tempfile(); + $fullpath = $hashed_attachment_dir . '/' . $localfilename; + + // m_u_f works better with restricted PHP installs (safe_mode, open_basedir), + // if that doesn't work, try a simple rename. + if (!sq_call_function_suppress_errors('move_uploaded_file', array($_FILES['attachfile']['tmp_name'], $fullpath))) { + if (!sq_call_function_suppress_errors('rename', array($_FILES['attachfile']['tmp_name'], $fullpath))) { + return true; + } } - $message = $compose_messages[$session]; $type = strtolower($_FILES['attachfile']['type']); $name = $_FILES['attachfile']['name']; - $message->initAttachment($type, $name, $full_localfilename); - $compose_messages[$session] = $message; -} - -function ClearAttachments($composeMessage) { - if ($composeMessage->att_local_name) { - $attached_file = $composeMessage->att_local_name; - if (file_exists($attached_file)) { - unlink($attached_file); - } - } - for ($i=0, $entCount=count($composeMessage->entities);$i< $entCount; ++$i) { - ClearAttachments($composeMessage->entities[$i]); - } + $composeMessage->initAttachment($type, $name, $localfilename); } +/* parse values like 8M and 2k into bytes */ +function getByteSize($ini_size) { + if(!$ini_size) { + return FALSE; + } -function getReplyCitation($orig_from) { - global $reply_citation_style, $reply_citation_start, $reply_citation_end; + $ini_size = trim($ini_size); - /* First, return an empty string when no citation style selected. */ - if (($reply_citation_style == '') || ($reply_citation_style == 'none')) { - return ''; - } + // if there's some kind of letter at the end of the string we need to multiply. + if(!is_numeric(substr($ini_size, -1))) { - /* Make sure our final value isn't an empty string. */ - if ($orig_from == '') { - return ''; - } + switch(strtoupper(substr($ini_size, -1))) { + case 'G': + $bytesize = 1073741824; + break; + case 'M': + $bytesize = 1048576; + break; + case 'K': + $bytesize = 1024; + break; + } - /* Otherwise, try to select the desired citation style. */ - switch ($reply_citation_style) { - case 'author_said': - $start = ''; - $end = ' ' . _("said") . ':'; - break; - case 'quote_who': - $start = '<' . _("quote") . ' ' . _("who") . '="'; - $end = '">'; - break; - case 'user-defined': - $start = $reply_citation_start . - ($reply_citation_start == '' ? '' : ' '); - $end = $reply_citation_end; - break; - default: - return ''; + return ($bytesize * (int)substr($ini_size, 0, -1)); } - /* Build and return the citation string. */ - return ($start . $orig_from . $end . "\n"); + return $ini_size; } -/* temporary function to make use of the deliver class. - In the future the responsable backend should be automaticly loaded - and conf.pl should show a list of available backends. - The message also should be constructed by the message class. -*/ +/** + * temporary function to make use of the deliver class. + * In the future the responsible backend should be automaticly loaded + * and conf.pl should show a list of available backends. + * The message also should be constructed by the message class. + * + * @return boolean FALSE if delivery failed, or some non-FALSE value + * upon success. + * + */ function deliverMessage($composeMessage, $draft=false) { global $send_to, $send_to_cc, $send_to_bcc, $mailprio, $subject, $body, - $username, $popuser, $usernamedata, $identity, $data_dir, - $request_mdn, $request_dr, $default_charset, $color, $useSendmail, - $domain, $action; - global $imapServerAddress, $imapPort, $sent_folder, $key; + $username, $identity, $idents, $data_dir, $message_id, + $request_mdn, $request_dr, $default_charset, $useSendmail, + $domain, $action, $default_move_to_sent, $move_to_sent, + $imapServerAddress, $imapPort, $sent_folder, $key; $rfc822_header = $composeMessage->rfc822_header; @@ -1264,6 +1489,7 @@ function deliverMessage($composeMessage, $draft=false) { $rfc822_header->bcc = $rfc822_header->parseAddress($send_to_bcc,true, array(), '',$domain, array(&$abook,'lookup')); $rfc822_header->priority = $mailprio; $rfc822_header->subject = $subject; + $special_encoding=''; if (strtolower($default_charset) == 'iso-2022-jp') { if (mb_detect_encoding($body) == 'ASCII') { @@ -1275,45 +1501,29 @@ function deliverMessage($composeMessage, $draft=false) { } $composeMessage->setBody($body); - if (ereg("^([^@%/]+)[@%/](.+)$", $username, $usernamedata)) { - $popuser = $usernamedata[1]; - $domain = $usernamedata[2]; - unset($usernamedata); - } else { - $popuser = $username; - } $reply_to = ''; - if (isset($identity) && $identity != 'default') { - $from_mail = getPref($data_dir, $username,'email_address' . $identity); - $full_name = getPref($data_dir, $username,'full_name' . $identity); - $reply_to = getPref($data_dir, $username,'reply_to' . $identity); - } else { - $from_mail = getPref($data_dir, $username, 'email_address'); - $full_name = getPref($data_dir, $username, 'full_name'); - $reply_to = getPref($data_dir, $username,'reply_to'); - } - if (!$from_mail) { - $from_mail = "$popuser@$domain"; - $full_name = ''; - } - $rfc822_header->from = $rfc822_header->parseAddress($from_mail,true); - if ($full_name) { - $from = $rfc822_header->from[0]; - if (!$from->host) $from->host = $domain; - $from_addr = '"'.$full_name .'" <'.$from->mailbox.'@'.$from->host.'>'; - $rfc822_header->from = $rfc822_header->parseAddress($from_addr,true); - } + $reply_to = $idents[$identity]['reply_to']; + + $from_addr = build_from_header($identity); + $rfc822_header->from = $rfc822_header->parseAddress($from_addr,true); if ($reply_to) { - $rfc822_header->reply_to = $rfc822_header->parseAddress($reply_to,true); + $rfc822_header->reply_to = $rfc822_header->parseAddress($reply_to,true); } /* Receipt: On Read */ if (isset($request_mdn) && $request_mdn) { - $rfc822_header->dnt = $rfc822_header->parseAddress($from_mail,true); + $rfc822_header->dnt = $rfc822_header->parseAddress($from_addr,true); + } elseif (isset($rfc822_header->dnt)) { + unset($rfc822_header->dnt); } + /* Receipt: On Delivery */ - if (isset($request_dr) && $request_dr) { - $rfc822_header->more_headers['Return-Receipt-To'] = $from_mail; + if (!empty($request_dr)) { +//FIXME: it would be better to fiddle with headers inside of the message object or possibly when delivering the message to its destination; is this possible? + $rfc822_header->more_headers['Return-Receipt-To'] = $from->mailbox.'@'.$from->domain; + } elseif (isset($rfc822_header->more_headers['Return-Receipt-To'])) { + unset($rfc822_header->more_headers['Return-Receipt-To']); } + /* multipart messages */ if (count($composeMessage->entities)) { $message_body = new Message(); @@ -1324,99 +1534,197 @@ function deliverMessage($composeMessage, $draft=false) { $mime_header->type1 = 'plain'; if ($special_encoding) { $mime_header->encoding = $special_encoding; - } else { - $mime_header->encoding = 'us-ascii'; + } else { + $mime_header->encoding = '8bit'; } if ($default_charset) { $mime_header->parameters['charset'] = $default_charset; } - $message_body->mime_header = $mime_header; + $message_body->mime_header = $mime_header; array_unshift($composeMessage->entities, $message_body); $content_type = new ContentType('multipart/mixed'); } else { - $content_type = new ContentType('text/plain'); - } - if ($default_charset) { - $content_type->properties['charset']=$default_charset; + $content_type = new ContentType('text/plain'); + if ($special_encoding) { + $rfc822_header->encoding = $special_encoding; + } else { + $rfc822_header->encoding = '8bit'; + } + if ($default_charset) { + $content_type->properties['charset']=$default_charset; + } } - + $rfc822_header->content_type = $content_type; $composeMessage->rfc822_header = $rfc822_header; + if ($action == 'reply' || $action == 'reply_all') { + global $passed_id, $passed_ent_id; + $reply_id = $passed_id; + $reply_ent_id = $passed_ent_id; + } else { + $reply_id = ''; + $reply_ent_id = ''; + } + + /* Here you can modify the message structure just before we hand + it over to deliver; plugin authors note that $composeMessage + is sent and modified by reference since 1.5.2 */ + do_hook('compose_send', $composeMessage); if (!$useSendmail && !$draft) { require_once(SM_PATH . 'class/deliver/Deliver_SMTP.class.php'); $deliver = new Deliver_SMTP(); - global $smtpServerAddress, $smtpPort, $pop_before_smtp, $smtp_auth_mech; - - if ($smtp_auth_mech == 'none') { - $user = ''; - $pass = ''; - } else { - global $key, $onetimepad; - $user = $username; - $pass = OneTimePadDecrypt($key, $onetimepad); - } + global $smtpServerAddress, $smtpPort, $pop_before_smtp; $authPop = (isset($pop_before_smtp) && $pop_before_smtp) ? true : false; + get_smtp_user($user, $pass); $stream = $deliver->initStream($composeMessage,$domain,0, - $smtpServerAddress, $smtpPort, $user, $pass, $authPop); + $smtpServerAddress, $smtpPort, $user, $pass, $authPop); } elseif (!$draft) { - require_once(SM_PATH . 'class/deliver/Deliver_SendMail.class.php'); - global $sendmail_path; - $deliver = new Deliver_SendMail(); - $stream = $deliver->initStream($composeMessage,$sendmail_path); + require_once(SM_PATH . 'class/deliver/Deliver_SendMail.class.php'); + global $sendmail_path, $sendmail_args; + // Check for outdated configuration + if (!isset($sendmail_args)) { + if ($sendmail_path=='/var/qmail/bin/qmail-inject') { + $sendmail_args = ''; + } else { + $sendmail_args = '-i -t'; + } + } + $deliver = new Deliver_SendMail(array('sendmail_args'=>$sendmail_args)); + $stream = $deliver->initStream($composeMessage,$sendmail_path); } elseif ($draft) { - global $draft_folder; - require_once(SM_PATH . 'class/deliver/Deliver_IMAP.class.php'); - $imap_stream = sqimap_login($username, $key, $imapServerAddress, - $imapPort, 0); - if (sqimap_mailbox_exists ($imap_stream, $draft_folder)) { - require_once(SM_PATH . 'class/deliver/Deliver_IMAP.class.php'); - $imap_deliver = new Deliver_IMAP(); - $length = $imap_deliver->mail($composeMessage); - sqimap_append ($imap_stream, $draft_folder, $length); - $imap_deliver->mail($composeMessage, $imap_stream); - sqimap_append_done ($imap_stream, $draft_folder); - sqimap_logout($imap_stream); - unset ($imap_deliver); - return $length; + global $draft_folder; + $imap_stream = sqimap_login($username, false, $imapServerAddress, + $imapPort, 0); + if (sqimap_mailbox_exists ($imap_stream, $draft_folder)) { + require_once(SM_PATH . 'class/deliver/Deliver_IMAP.class.php'); + $imap_deliver = new Deliver_IMAP(); + list($success, $ignore) = $imap_deliver->mail($composeMessage, $imap_stream, $reply_id, $reply_ent_id, $draft_folder); + sqimap_logout($imap_stream); + unset ($imap_deliver); + $composeMessage->purgeAttachments(); + return $success; } else { - $msg = '
Error: '._("Draft folder")." $draft_folder" . ' does not exist.'; - plain_error_message($msg, $color); - return false; + $msg = '
'.sprintf(_("Error: Draft folder %s does not exist."), htmlspecialchars($draft_folder)); + plain_error_message($msg); + return false; } } - $succes = false; + $success = false; if ($stream) { - $length = $deliver->mail($composeMessage, $stream); - $succes = $deliver->finalizeStream($stream); - } - if (!$succes) { - $msg = $deliver->dlv_msg . '
' . - _("Server replied: ") . $deliver->dlv_ret_nr . ' '. - $deliver->dlv_server_msg; - plain_error_message($msg, $color); + list($ignore, $message_id) = $deliver->mail($composeMessage, $stream, $reply_id, $reply_ent_id); + $success = $deliver->finalizeStream($stream); + } + if (!$success) { + // $deliver->dlv_server_msg is not always server's reply + $msg = _("Message not sent.") . "
\n" . + $deliver->dlv_msg; + if (!empty($deliver->dlv_server_msg)) { + // add 'server replied' part only when it is not empty. + // Delivery error can be generated by delivery class itself + $msg.='
' . + _("Server replied:") . ' ' . $deliver->dlv_ret_nr . ' ' . + nl2br(htmlspecialchars($deliver->dlv_server_msg)); + } + plain_error_message($msg); } else { unset ($deliver); - $imap_stream = sqimap_login($username, $key, $imapServerAddress, - $imapPort, 0); - if (sqimap_mailbox_exists ($imap_stream, $sent_folder)) { - sqimap_append ($imap_stream, $sent_folder, $length); + $imap_stream = sqimap_login($username, false, $imapServerAddress, $imapPort, 0); + + + // mark as replied or forwarded if applicable + // + global $what, $iAccount, $startMessage, $passed_id, $mailbox; + + if ($action=='reply' || $action=='reply_all' || $action=='forward' || $action=='forward_as_attachment') { + require(SM_PATH . 'functions/mailbox_display.php'); + $aMailbox = sqm_api_mailbox_select($imap_stream, $iAccount, $mailbox,array('setindex' => $what, 'offset' => $startMessage),array()); + switch($action) { + case 'reply': + case 'reply_all': + // check if we are allowed to set the \\Answered flag + if (in_array('\\answered',$aMailbox['PERMANENTFLAGS'], true)) { + $aUpdatedMsgs = sqimap_toggle_flag($imap_stream, array($passed_id), '\\Answered', true, false); + if (isset($aUpdatedMsgs[$passed_id]['FLAGS'])) { + /** + * Only update the cached headers if the header is + * cached. + */ + if (isset($aMailbox['MSG_HEADERS'][$passed_id])) { + $aMailbox['MSG_HEADERS'][$passed_id]['FLAGS'] = $aMsg['FLAGS']; + } + } + } + break; + case 'forward': + case 'forward_as_attachment': + // check if we are allowed to set the $Forwarded flag (RFC 4550 paragraph 2.8) + if (in_array('$forwarded',$aMailbox['PERMANENTFLAGS'], true) || + in_array('\\*',$aMailbox['PERMANENTFLAGS'])) { + + $aUpdatedMsgs = sqimap_toggle_flag($imap_stream, array($passed_id), '$Forwarded', true, false); + if (isset($aUpdatedMsgs[$passed_id]['FLAGS'])) { + if (isset($aMailbox['MSG_HEADERS'][$passed_id])) { + $aMailbox['MSG_HEADERS'][$passed_id]['FLAGS'] = $aMsg['FLAGS']; + } + } + } + break; + } + + /** + * Write mailbox with updated seen flag information back to cache. + */ + if(isset($aUpdatedMsgs[$passed_id])) { + $mailbox_cache[$iAccount.'_'.$aMailbox['NAME']] = $aMailbox; + sqsession_register($mailbox_cache,'mailbox_cache'); + } + + } + + + // move to sent folder + // + $move_to_sent = getPref($data_dir,$username,'move_to_sent'); + if (isset($default_move_to_sent) && ($default_move_to_sent != 0)) { + $svr_allow_sent = true; + } else { + $svr_allow_sent = false; + } + + if (isset($sent_folder) && (($sent_folder != '') || ($sent_folder != 'none')) + && sqimap_mailbox_exists( $imap_stream, $sent_folder)) { + $fld_sent = true; + } else { + $fld_sent = false; + } + + if ((isset($move_to_sent) && ($move_to_sent != 0)) || (!isset($move_to_sent))) { + $lcl_allow_sent = true; + } else { + $lcl_allow_sent = false; + } + + if (($fld_sent && $svr_allow_sent && !$lcl_allow_sent) || ($fld_sent && $lcl_allow_sent)) { + if ($action == 'reply' || $action == 'reply_all') { + $save_reply_with_orig=getPref($data_dir,$username,'save_reply_with_orig'); + if ($save_reply_with_orig) { + $sent_folder = $mailbox; + } + } require_once(SM_PATH . 'class/deliver/Deliver_IMAP.class.php'); $imap_deliver = new Deliver_IMAP(); - $imap_deliver->mail($composeMessage, $imap_stream); - sqimap_append_done ($imap_stream, $sent_folder); + $imap_deliver->mail($composeMessage, $imap_stream, $reply_id, $reply_ent_id, $sent_folder); unset ($imap_deliver); } - global $passed_id, $mailbox, $action; - ClearAttachments($composeMessage); - if ($action == 'reply' || $action == 'reply_all') { - sqimap_mailbox_select ($imap_stream, $mailbox); - sqimap_messages_flag ($imap_stream, $passed_id, $passed_id, 'Answered', true); - } - sqimap_logout($imap_stream); + + + // final cleanup + // + $composeMessage->purgeAttachments(); + sqimap_logout($imap_stream); + } - return $succes; + return $success; } - -?>