\n\n";
}
function checkInput ($show) {
/** I implemented the $show variable because the error messages
were getting sent before the page header. So, I check once
using $show=false, and then when i'm ready to display the
error message, show=true **/
global $body, $send_to, $subject, $color;
if ($send_to == "") {
if ($show)
plain_error_message(_("You have not filled in the \"To:\" field."), $color);
return false;
}
return true;
} // function checkInput()
// True if FAILURE
function saveAttachedFiles() {
global $HTTP_POST_FILES, $attachment_dir, $attachments;
$localfilename = GenerateRandomString(32, '', 7);
while (file_exists($attachment_dir . $localfilename))
$localfilename = GenerateRandomString(32, '', 7);
if (!@rename($HTTP_POST_FILES['attachfile']['tmp_name'], $attachment_dir.$localfilename)) {
if (!@copy($HTTP_POST_FILES['attachfile']['tmp_name'], $attachment_dir.$localfilename)) {
return true;
}
}
$newAttachment['localfilename'] = $localfilename;
$newAttachment['remotefilename'] = $HTTP_POST_FILES['attachfile']['name'];
$newAttachment['type'] =
strtolower($HTTP_POST_FILES['attachfile']['type']);
$attachments[] = $newAttachment;
}
function SqConvertRussianCharsets(){
//
// This function is here because Russian Apache is a bastard when it comes to
// attachments. The solution is to turn off attachment recoding for multipart
// forms and do it manually.
// See graf@relhum.org for support.
//
global $CHARSET, $SOURCE_CHARSET, $send_to, $send_to_cc, $send_to_bcc, $subject, $body;
$charset_ary = array("koi8-r" => "k",
"windows-1251" => "w",
"ibm866" => "a",
"ISO-8859-5" => "i");
$body = convert_cyr_string($body, $charset_ary[$CHARSET], $charset_ary[$SOURCE_CHARSET]);
$send_to = convert_cyr_string($send_to, $charset_ary[$CHARSET], $charset_ary[$SOURCE_CHARSET]);
$send_to_cc = convert_cyr_string($send_to_cc, $charset_ary[$CHARSET], $charset_ary[$SOURCE_CHARSET]);
$send_to_bcc = convert_cyr_string($send_to_bcc, $charset_ary[$CHARSET], $charset_ary[$SOURCE_CHARSET]);
$subject = convert_cyr_string($subject, $charset_ary[$CHARSET], $charset_ary[$SOURCE_CHARSET]);
} // end SqConvertRussianCharsets()
// Russian Apache sets $CHARSET. See if this is Russian Apache.
// If so, check if the source charset (koi8-r) is different from the
// one submitted by the browser. If so, recode the parts of the form
// to the needed format so SM can proceed and not mangle the cyrillic
// input.
// See graf@relhum.org for support.
//
if (isset($CHARSET) && $CHARSET != $SOURCE_CHARSET) SqConvertRussianCharsets();
if (!isset($mailbox) || $mailbox == "" || ($mailbox == "None"))
$mailbox = "INBOX";
if (isset($send)) {
if (isset($HTTP_POST_FILES['attachfile']) &&
$HTTP_POST_FILES['attachfile']['tmp_name'] &&
$HTTP_POST_FILES['attachfile']['tmp_name'] != 'none')
$AttachFailure = saveAttachedFiles();
if (checkInput(false) && !isset($AttachFailure)) {
$urlMailbox = urlencode (trim($mailbox));
if (! isset($reply_id))
$reply_id = 0;
// Set $default_charset to correspond with the user's selection
// of language interface.
set_my_charset();
sendMessage($send_to, $send_to_cc, $send_to_bcc, $subject, $body, $reply_id);
header ("Location: right_main.php?mailbox=$urlMailbox&sort=$sort&startMessage=1");
} else {
//$imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0);
displayPageHeader($color, $mailbox);
if ($AttachFailure)
plain_error_message(_("Could not move/copy file. File not attached"), $color);
checkInput(true);
showInputForm();
//sqimap_logout($imapConnection);
}
} else if (isset($html_addr_search_done)) {
displayPageHeader($color, $mailbox);
if (isset($send_to_search) && is_array($send_to_search))
{
for ($i=0; $i < count($send_to_search); $i++) {
if ($send_to)
$send_to .= ", ";
$send_to .= $send_to_search[$i];
}
}
if (isset($send_to_cc_search) && is_array($send_to_cc_search))
{
for ($i=0; $i < count($send_to_cc_search); $i++) {
if ($send_to_cc)
$send_to_cc .= ", ";
$send_to_cc .= $send_to_cc_search[$i];
}
}
if (isset($send_to_bcc_search) && is_array($send_to_bcc_search))
{
for ($i=0; $i < count($send_to_bcc_search); $i++) {
if ($send_to_bcc)
$send_to_bcc .= ", ";
$send_to_bcc .= $send_to_bcc_search[$i];
}
}
showInputForm();
} else if (isset($html_addr_search)) {
// I am using an include so as to elminiate an extra unnecessary click. If you
// can think of a better way, please implement it.
include ("./addrbook_search_html.php");
} else if (isset($attach)) {
if (saveAttachedFiles())
plain_error_message(_("Could not move/copy file. File not attached"), $color);
displayPageHeader($color, $mailbox);
showInputForm();
} else if (isset($do_delete)) {
displayPageHeader($color, $mailbox);
if (isset($delete) && is_array($delete))
{
foreach($delete as $index)
{
unlink ($attachment_dir.$attachments[$index]['localfilename']);
unset ($attachments[$index]);
}
}
showInputForm();
} else {
// This handles the default case as well as the error case
// (they had the same code) --> if (isset($smtpErrors))
$imapConnection = sqimap_login($username, $key, $imapServerAddress,
$imapPort, 0);
displayPageHeader($color, $mailbox);
$newmail = true;
ClearAttachments();
if (isset($forward_id) && $forward_id && isset($ent_num) && $ent_num)
getAttachments(0);
newMail();
showInputForm();
sqimap_logout($imapConnection);
}
function ClearAttachments()
{
global $attachments, $attachment_dir;
foreach ($attachments as $info)
{
if (file_exists($attachment_dir . $info['localfilename']))
{
unlink($attachment_dir . $info['localfilename']);
}
}
$attachments = array();
}
?>