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; } 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); } $bodyTop = str_pad(' '._("Original Message").' ',$editor_size -2,'-',STR_PAD_BOTH) . "\n". $display[_("Subject")] . decodeHeader($orig_header->subject) . "\n" . $display[_("From")] . decodeHeader($orig_header->getAddr_s('from',"\n$indent")) . "\n" . $display[_("Date")] . getLongDateString( $orig_header->date ). "\n" . $display[_("To")] . decodeHeader($orig_header->getAddr_s('to',"\n$indent")) ."\n"; if ($orig_header->cc != array() && $orig_header->cc !='') { $bodyTop .= $display[_("Cc")] . decodeHeader($orig_header->getAddr_s('cc',"\n$indent")) . "\n"; } $bodyTop .= str_pad('', $editor_size -2 , '-') . "\n"; return $bodyTop; } /* ----------------------------------------------------------------------- */ /* * If the session is expired during a post this restores the compose session * vars. */ if (sqsession_is_registered('session_expired_post')) { $session_expired_post = $_SESSION['session_expired_post']; /* * 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 = ''; } } $compose_messages = unserialize(urldecode($restoremessages)); sqsession_register($compose_messages,'compose_messages'); sqsession_register($composesession,'composesession'); if (isset($send)) { unset($send); } $session_expired = true; } unset($session_expired_post); sqsession_unregister('session_expired_post'); session_write_close(); if (!isset($mailbox)) { $mailbox = ''; } if ($compose_new_win == '1') { compose_Header($color, $mailbox); } else { displayPageHeader($color, $mailbox); } showInputForm($session, false); exit(); } if (!isset($composesession)) { $composesession = 0; sqsession_register(0,'composesession'); } if (!isset($session) || (isset($newmessage) && $newmessage)) { sqsession_unregister('composesession'); $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'); } else { $composeMessage=$compose_messages[$session]; } if (!isset($mailbox) || $mailbox == '' || ($mailbox == 'None')) { $mailbox = 'INBOX'; } if ($draft) { /* * Set $default_charset to correspond with the user's selection * 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(); } else { if ($compose_new_win == '1') { Header("Location: compose.php?saved_draft=yes&session=$composesession"); exit(); } else { Header("Location: right_main.php?mailbox=$draft_folder&sort=$sort". "&startMessage=1¬e=".urlencode($draft_message)); exit(); } } } } if ($send) { if (isset($_FILES['attachfile']) && $_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 (! 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); } if (strlen($line) <= $editor_size + 1) { $newBody .= $line . "\n"; } else { sqWordWrap($line, $editor_size); $newBody .= $line . "\n"; } } $body = $newBody; do_hook('compose_send'); $composeMessage=$compose_messages[$session]; $Result = deliverMessage($composeMessage); if (! $Result) { showInputForm($session); exit(); } unset($compose_messages[$session]); if ( isset($delete_draft)) { Header("Location: delete_message.php?mailbox=" . urlencode( $draft_folder ). "&message=$delete_draft&sort=$sort&startMessage=1&mail_sent=yes"); exit(); } if ($compose_new_win == '1') { Header("Location: compose.php?mail_sent=yes"); } else { Header("Location: right_main.php?mailbox=$urlMailbox&sort=$sort". "&startMessage=1"); } } else { if ($compose_new_win == '1') { compose_Header($color, $mailbox); } else { displayPageHeader($color, $mailbox); } if (isset($AttachFailure)) { 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 (isset($send_to_search) && is_array($send_to_search)) { foreach ($send_to_search as $k => $v) { if (substr($k, 0, 1) == 'T') { if ($send_to) { $send_to .= ', '; } $send_to .= $v; } elseif (substr($k, 0, 1) == 'C') { if ($send_to_cc) { $send_to_cc .= ', '; } $send_to_cc .= $v; } elseif (substr($k, 0, 1) == 'B') { if ($send_to_bcc) { $send_to_bcc .= ', '; } $send_to_bcc .= $v; } } } showInputForm($session); } elseif (isset($html_addr_search)) { if (isset($_FILES['attachfile']) && $_FILES['attachfile']['tmp_name'] && $_FILES['attachfile']['tmp_name'] != 'none') { if(saveAttachedFiles($session)) { plain_error_message(_("Could not move/copy file. File not attached"), $color); } } /* * 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_once('./addrbook_search_html.php'); } elseif (isset($attach)) { if (saveAttachedFiles($session)) { plain_error_message(_("Could not move/copy file. File not attached"), $color); } 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); } $body .= "\n\n".($prefix_sig==true? "-- \n":'').$signature; if ($compose_new_win == '1') { 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 (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]); } $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)) */ if ($compose_new_win == '1') { compose_Header($color, $mailbox); } else { displayPageHeader($color, $mailbox); } $newmail = true; if (!isset($passed_ent_id)) { $passed_ent_id = ''; } if (!isset($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; } if (isset($send_to_cc)) { $values['send_to_cc'] = $send_to_cc; } if (isset($send_to_bcc)) { $values['send_to_bcc'] = $send_to_bcc; } showInputForm($session, $values); } exit(); /**************** Only function definitions go below *************/ /* 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; $send_to = $send_to_cc = $send_to_bcc = $subject = $identity = ''; $mailprio = 3; if ($passed_id) { $imapConnection = sqimap_login($username, $key, $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 */ $entities = $message->entities[0]->findDisplayEntity (array(), $alt_order = array('text/plain')); if (!count($entities)) { $entities = $message->entities[0]->findDisplayEntity (array(), $alt_order = array('text/plain','html/plain')); } $orig_header = $message->rfc822_header; /* here is the envelope located */ /* redefine the message for picking up the attachments */ $message = $message->entities[0]; } else { $entities = $message->findDisplayEntity (array(), $alt_order = array('text/plain')); if (!count($entities)) { $entities = $message->findDisplayEntity (array(), $alt_order = array('text/plain','html/plain')); } $orig_header = $message->rfc822_header; } $encoding = $message->header->encoding; $type0 = $message->type0; $type1 = $message->type1; foreach ($entities as $ent) { $unencoded_bodypart = mime_fetch_body($imapConnection, $passed_id, $ent); $body_part_entity = $message->getEntity($ent); $bodypart = decodeBody($unencoded_bodypart, $body_part_entity->header->encoding); if ($type1 == 'html') { $bodypart = strip_tags($bodypart); } $body .= $bodypart; } if ($default_use_priority) { $mailprio = substr($orig_header->priority,0,1); if (!$mailprio) { $mailprio = 3; } } else { $mailprio = ''; } //ClearAttachments($session); $identity = ''; $idents = getPref($data_dir, $username, 'identities'); $from_o = $orig_header->from; 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; break; } $identities[] = $enc_from_name; } $identity_match = $orig_header->findAddress($identities); if ($identity_match) { $identity = $identity_match; } } switch ($action) { case ('draft'): $use_signature = FALSE; $send_to = decodeHeader($orig_header->getAddr_s('to')); $send_to_cc = decodeHeader($orig_header->getAddr_s('cc')); $send_to_bcc = decodeHeader($orig_header->getAddr_s('bcc')); $subject = decodeHeader($orig_header->subject); $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 = decodeHeader($orig_header->getAddr_s('to')); $send_to_cc = decodeHeader($orig_header->getAddr_s('cc')); $send_to_bcc = decodeHeader($orig_header->getAddr_s('bcc')); $subject = decodeHeader($orig_header->subject); $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); 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 = decodeHeader($orig_header->getAddr_s('reply_to')); } else if (is_object($send_to)) { /* unnessecarry, just for falesafe purpose */ $send_to = decodeHeader($orig_header->getAddr_s('reply_to')); } else { $send_to = decodeHeader($orig_header->getAddr_s('from')); } $subject = decodeHeader($orig_header->subject); $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"; } else { $body .= '> ' . str_replace("\n", "\n> ", rtrim($rewrap_body[$i])) . "\n"; } unset($rewrap_body[$i]); } $composeMessage->reply_rfc822_header = $orig_header; break; default: break; } $compose_messages[$session] = $composeMessage; sqsession_register($compose_messages, 'compose_messages'); 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 ); return ($ret); } /* function newMail() */ 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')) { if ( !in_array($message->entity_id, $entities) && $message->entity_id) { switch ($message->type0) { case 'message': if ($message->type1 == 'rfc822') { $filename = decodeHeader($message->rfc822_header->subject.'.eml'); if ($filename == "") { $filename = "untitled-".$message->entity_id.'.eml'; } } else { $filename = decodeHeader($message->getFilename()); } break; default: $filename = decodeHeader($message->getFilename()); break; } 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); } } else { for ($i=0, $entCount=count($message->entities); $i<$entCount;$i++) { $composeMessage=getAttachments($message->entities[$i], $composeMessage, $passed_id, $entities, $imapConnection); } } // setPref($data_dir, $username, 'attachments', serialize($attachments)); 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); if (!$passed_ent_id) { $body_a = sqimap_run_command($imapConnection, 'FETCH '.$passed_id.' RFC822', TRUE, $response, $readmessage, $uid_support); } else { $body_a = sqimap_run_command($imapConnection, 'FETCH '.$passed_id.' BODY['.$passed_ent_id.']', TRUE, $response, $readmessage, $uid_support); $message = $message->parent; } if ($response = 'OK') { $subject = encodeHeader($message->rfc822_header->subject); array_shift($body_a); $body = implode('', $body_a) . "\r\n"; $localfilename = GenerateRandomString(32, 'FILE', 7); $full_localfilename = "$hashed_attachment_dir/$localfilename"; $fp = fopen( $full_localfilename, 'w'); fwrite ($fp, $body); fclose($fp); $composeMessage->initAttachment('message/rfc822',$subject.'.eml', $full_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]; $subject = decodeHeader($subject, false); 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']; } if ($use_javascript_addr_book) { echo "\n". '' . "\n\n"; } echo "\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"; } do_hook('compose_bottom'); echo '