/**
* compose.php
*
- * Copyright (c) 1999-2004 The SquirrelMail Project Team
- * Licensed under the GNU GPL. For full terms see the file COPYING.
- *
* This code sends a mail.
*
* There are 4 modes of operation:
* - Send mail
* - Save As Draft
*
+ * @copyright © 1999-2005 The SquirrelMail Project Team
+ * @license http://opensource.org/licenses/gpl-license.php GNU Public License
* @version $Id$
* @package squirrelmail
*/
require_once(SM_PATH . 'functions/display_messages.php');
require_once(SM_PATH . 'class/deliver/Deliver.class.php');
require_once(SM_PATH . 'functions/addressbook.php');
-require_once(SM_PATH . 'functions/identity.php');
require_once(SM_PATH . 'functions/forms.php');
+require_once(SM_PATH . 'functions/identity.php');
/* --------------------- Get globals ------------------------------------- */
/** COOKIE VARS */
sqgetGlobalVar('ent_num',$ent_num);
sqgetGlobalVar('saved_draft',$saved_draft);
sqgetGlobalVar('delete_draft',$delete_draft);
-sqgetGlobalVar('startMessage',$startMessage);
+if ( sqgetGlobalVar('startMessage',$startMessage) ) {
+ $startMessage = (int)$startMessage;
+} else {
+ $startMessage = 1;
+}
+
/** POST VARS */
sqgetGlobalVar('sigappend', $sigappend, SQ_POST);
/** GET VARS */
sqgetGlobalVar('attachedmessages', $attachedmessages, SQ_GET);
+if ( sqgetGlobalVar('account', $temp, SQ_GET) ) {
+ $iAccount = (int) $temp;
+} else {
+ $iAccount = 0;
+}
+
/** get smaction */
if ( !sqgetGlobalVar('smaction',$action) )
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;
- $orig_from = decodeHeader($orig_from->getAddress(false),false,false,true);
+
+ if (!is_object($orig_from)) {
+ $sOrig_from = '';
+ } else {
+ $sOrig_from = decodeHeader($orig_from->getAddress(false),false,false,true);
+ }
+
// $from = decodeHeader($orig_header->getAddr_s('from',"\n$indent"),false,false);
+
/* 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 ($orig_from == '') {
+ if ($sOrig_from == '') {
return '';
}
/* 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 'date_time_author':
- $start = 'On ' . getLongDateString($orig_date) . ', ';
- $end = ' ' . _("said") . ':';
- break;
- case 'user-defined':
- $start = $reply_citation_start .
- ($reply_citation_start == '' ? '' : ' ');
- $end = $reply_citation_end;
- break;
- default:
- return '';
- }
-
- /* Build and return the citation string. */
- return ($start . $orig_from . $end . "\n");
+ case 'author_said':
+ /**
+ * To translators: %s is for author's name
+ */
+ $full_reply_citation = sprintf(_("%s wrote:"),$sOrig_from);
+ break;
+ case 'quote_who':
+ // FIXME: do we have to translate xml formating?
+ $start = '<' . _("quote") . ' ' . _("who") . '="';
+ $end = '">';
+ $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")) );
+ 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) {
$to = str_replace(' ',' ',$to);
$subject = decodeHeader($orig_header->subject,false,false,true);
$subject = str_replace(' ',' ',$subject);
- $bodyTop = str_pad(' '._("Original Message").' ',$editor_size -2,'-',STR_PAD_BOTH) .
+
+ // 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 ). "\n" .
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($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();
$composeMessage->rfc822_header = $rfc822_header;
$composeMessage->reply_rfc822_header = '';
$compose_messages[$session] = $composeMessage;
+
sqsession_register($compose_messages,'compose_messages');
} else {
$composeMessage=$compose_messages[$session];
$draft_message = _("Draft Email Saved");
/* If this is a resumed draft, then delete the original */
if(isset($delete_draft)) {
- Header("Location: $location/delete_message.php?mailbox=" . urlencode($draft_folder) .
- "&message=$delete_draft&startMessage=1&saved_draft=yes");
- exit();
+ $imap_stream = sqimap_login($username, $key, $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') {
+ if ($compose_new_win == '1') {
+ if ( !isset($pageheader_sent) || !$pageheader_sent ) {
Header("Location: $location/compose.php?saved_draft=yes&session=$composesession");
- exit();
+ } else {
+ echo ' <br><br><center><a href="' . $location
+ . '/compose.php?saved_sent=yes&session=' . $composesession . '">'
+ . _("Return") . '</a></center>';
}
- else {
+ exit();
+ } else {
+ if ( !isset($pageheader_sent) || !$pageheader_sent ) {
Header("Location: $location/right_main.php?mailbox=" . urlencode($draft_folder) .
- "&startMessage=1¬e=".urlencode($draft_message));
- exit();
+ "&startMessage=1¬e=".urlencode($draft_message));
+ } else {
+ echo ' <br><br><center><a href="' . $location
+ . '/right_main.php?mailbox=' . urlencode($draft_folder)
+ . '&startMessage=1&note=' . urlencode($draft_message) .'">'
+ . _("Return") . '</a></center>';
}
+ exit();
}
}
}
if( $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";
}
exit();
}
unset($compose_messages[$session]);
+ /* if it is resumed draft, delete draft message */
if ( isset($delete_draft)) {
- Header("Location: $location/delete_message.php?mailbox=" . urlencode( $draft_folder ).
- "&message=$delete_draft&startMessage=1&mail_sent=yes");
- exit();
+ $imap_stream = sqimap_login($username, $key, $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') {
-
- Header("Location: $location/compose.php?mail_sent=yes");
- }
- else {
- Header("Location: $location/right_main.php?mailbox=$urlMailbox".
+ if ( !isset($pageheader_sent) || !$pageheader_sent ) {
+ Header("Location: $location/compose.php?mail_sent=yes");
+ } else {
+ echo ' <br><br><center><a href="' . $location
+ . '/compose.php?mail_sent=yes">'
+ . _("Return") . '</a></center>';
+ }
+ exit();
+ } else {
+ if ( !isset($pageheader_sent) || !$pageheader_sent ) {
+ Header("Location: $location/right_main.php?mailbox=$urlMailbox".
"&startMessage=$startMessage&mail_sent=yes");
+ } else {
+ echo ' <br><br><center><a href="' . $location
+ . "/right_main.php?mailbox=$urlMailbox"
+ . "&startMessage=$startMessage&mail_sent=yes\">"
+ . _("Return") . '</a></center>';
+ }
+ exit();
}
} else {
if ($compose_new_win == '1') {
}
}
+ // charset encoding in compose form stuff
if (isset($body_part_entity->header->parameters['charset'])) {
$actual = $body_part_entity->header->parameters['charset'];
} else {
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;
}
// 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;
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, $languages;
$hashed_attachment_dir = getHashedDir($username, $attachment_dir);
/* 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));
+ mime_print_body_lines ($imapConnection, $passed_id, $message->entity_id, $message->header->encoding, $fp);
fclose ($fp);
}
} else {
$mailprio, $compose_new_win, $saved_draft, $mail_sent, $sig_first,
$username, $compose_messages, $composesession, $default_charset;
+ if (checkForJavascript()) {
+ $onfocus = ' onfocus="alreadyFocused=true;"';
+ $onfocus_array = array('onfocus' => 'alreadyFocused=true;');
+ }
+ else {
+ $onfocus = '';
+ $onfocus_array = array();
+ }
+
$composeMessage = $compose_messages[$session];
if ($values) {
$send_to = $values['send_to'];
if ($mail_sent == 'yes') {
echo '<br /><center><b>'. _("Your Message has been sent.").'</center></b>';
}
- echo '<table align="center" cellspacing="0" border="0">' . "\n";
if ($compose_new_win == '1') {
echo '<table align="center" bgcolor="'.$color[0].'" width="100%" border="0">'."\n" .
' <tr><td></td>'.html_tag( 'td', '', 'right' ).
- '<input type="button" name="Close" onClick="return self.close()" value="'.
+ '<input type="button" name="Close" onclick="return self.close()" value="'.
_("Close").'" /></td></tr>'."\n";
+ } else {
+ echo '<table align="center" cellspacing="0" border="0">' . "\n";
}
if ($location_of_buttons == 'top') {
showComposeButtonRow();
html_tag( 'td', '', 'right', $color[4], 'width="10%"' ) .
_("To") . ':</td>' . "\n" .
html_tag( 'td', '', 'left', $color[4], 'width="90%"' ) .
- addInput('send_to', $send_to, 60). '<br />' . "\n" .
+ addInput('send_to', $send_to, 60, 0, $onfocus_array). '<br />' . "\n" .
' </td>' . "\n" .
' </tr>' . "\n" .
' <tr>' . "\n" .
html_tag( 'td', '', 'right', $color[4] ) .
_("Cc") . ':</td>' . "\n" .
html_tag( 'td', '', 'left', $color[4] ) .
- addInput('send_to_cc', $send_to_cc, 60). '<br />' . "\n" .
+ addInput('send_to_cc', $send_to_cc, 60, 0, $onfocus_array). '<br />' . "\n" .
' </td>' . "\n" .
' </tr>' . "\n" .
' <tr>' . "\n" .
html_tag( 'td', '', 'right', $color[4] ) .
_("Bcc") . ':</td>' . "\n" .
html_tag( 'td', '', 'left', $color[4] ) .
- addInput('send_to_bcc', $send_to_bcc, 60).'<br />' . "\n" .
+ addInput('send_to_bcc', $send_to_bcc, 60, 0, $onfocus_array).'<br />' . "\n" .
' </td>' . "\n" .
' </tr>' . "\n" .
' <tr>' . "\n" .
html_tag( 'td', '', 'right', $color[4] ) .
_("Subject") . ':</td>' . "\n" .
html_tag( 'td', '', 'left', $color[4] ) . "\n";
- echo ' '.addInput('subject', $subject, 60).
+ echo ' '.addInput('subject', $subject, 60, 0, $onfocus_array).
' </td>' . "\n" .
' </tr>' . "\n\n";
echo ' <tr>' . "\n" .
' <td bgcolor="' . $color[0] . '" colspan="2" align="center">' . "\n" .
' <textarea name="body" id="body" rows="' . (int)$editor_height .
- '" cols="' . (int)$editor_size . '" wrap="virtual">';
+ '" cols="' . (int)$editor_size . '" wrap="virtual"' . $onfocus . '>';
}
else {
echo ' <tr>' . "\n" .
' <td bgcolor="' . $color[4] . '" colspan="2">' . "\n" .
' <textarea name="body" id="body" rows="' . (int)$editor_height .
- '" cols="' . (int)$editor_size . '" wrap="virtual">';
+ '" cols="' . (int)$editor_size . '" wrap="virtual"' . $onfocus . '>';
}
if ($use_signature == true && $newmail == true && !isset($from_htmladdr_search)) {
$signature = $idents[$identity]['signature'];
if ($sig_first == '1') {
+ /*
+ * FIXME: test is specific to ja_JP translation implementation.
+ * This test might apply incorrect conversion to other translations, but
+ * use of 7bit iso-2022-jp charset in other translations might have other
+ * issues too.
+ */
if ($default_charset == 'iso-2022-jp') {
echo "\n\n".($prefix_sig==true? "-- \n":'').mb_convert_encoding($signature, 'EUC-JP');
} else {
}
else {
echo "\n\n".htmlspecialchars(decodeHeader($body,false,false));
+ // FIXME: test is specific to ja_JP translation implementation. See above comments.
if ($default_charset == 'iso-2022-jp') {
echo "\n\n".($prefix_sig==true? "-- \n":'').mb_convert_encoding($signature, 'EUC-JP');
}else{
/* 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 */
+ /* skip 0 or empty values, and -1 which means 'unlimited' */
if( $size = getByteSize(ini_get($var)) ) {
- $sizes[] = $size;
+ if ( $size != '-1' ) {
+ $sizes[] = $size;
+ }
}
}
if(count($sizes) > 0) {
$maxsize = '(max. ' . show_readable_size( min( $sizes ) ) . ')';
+ echo addHidden('MAX_FILE_SIZE', min( $sizes ));
} else {
$maxsize = '';
}
- echo addHidden('MAX_FILE_SIZE', min( $sizes )).
- ' <tr>' . "\n" .
+ echo ' <tr>' . "\n" .
' <td colspan="2">' . "\n" .
' <table width="100%" cellpadding="1" cellspacing="0" align="center"'.
' border="0" bgcolor="'.$color[9].'">' . "\n" .
' </tr>' . "\n";
} // End of file_uploads if-block
/* End of attachment code */
- if ($compose_new_win == '1') {
- echo '</table>'."\n";
- }
-
echo '</table>' . "\n" .
addHidden('username', $username).
addHidden('smaction', $action).
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";
+ echo '<p style="text-align:center">'
+ . _("Because PHP file uploads are turned off, you can not attach files to this message. Please see your system administrator for details.")
+ . "</p>\r\n";
}
do_hook('compose_bottom');
}
// FIXME: we SHOULD prefer move_uploaded_file over rename because
- // m_u_f works better with restricted PHP installes (safe_mode, open_basedir)
+ // m_u_f works better with restricted PHP installs (safe_mode, open_basedir)
if (!@rename($_FILES['attachfile']['tmp_name'], $full_localfilename)) {
if (!@move_uploaded_file($_FILES['attachfile']['tmp_name'],$full_localfilename)) {
return true;
}
-/* 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 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.
*/
-
function deliverMessage($composeMessage, $draft=false) {
global $send_to, $send_to_cc, $send_to_bcc, $mailprio, $subject, $body,
$username, $popuser, $usernamedata, $identity, $idents, $data_dir,
}
if (!$succes) {
$msg = $deliver->dlv_msg . '<br />' .
- _("Server replied: ") . $deliver->dlv_ret_nr . ' '.
+ _("Server replied:") . ' ' . $deliver->dlv_ret_nr . ' ' .
$deliver->dlv_server_msg;
plain_error_message($msg, $color);
} else {
sqimap_append_done ($imap_stream, $sent_folder);
unset ($imap_deliver);
}
- global $passed_id, $mailbox, $action;
+
+ global $passed_id, $mailbox, $action, $what, $iAccount,$startMessage;
+
ClearAttachments($composeMessage);
if ($action == 'reply' || $action == 'reply_all') {
- sqimap_mailbox_select ($imap_stream, $mailbox);
- sqimap_messages_flag ($imap_stream, $passed_id, $passed_id, 'Answered', false);
+ $aMailbox = sqm_api_mailbox_select($imap_stream, $iAccount, $mailbox,array('setindex' => $what, 'offset' => $startMessage),array());
+ //sqimap_mailbox_select ($imap_stream, $mailbox);
+ $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'];
+ }
+ }
+ /**
+ * Write mailbox with updated seen flag information back to cache.
+ */
+ $mailbox_cache[$iAccount.'_'.$aMailbox['NAME']] = $aMailbox;
+ sqsession_register($mailbox_cache,'mailbox_cache');
}
sqimap_logout($imap_stream);
}
return $succes;
}
-// vim: et ts=4
?>
\ No newline at end of file
projects / squirrelmail.git / blobdiff