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) { // 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; } 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); /* 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 == '') { 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"); } 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,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); $bodyTop = str_pad(' '._("Original Message").' ',$editor_size -2,'-',STR_PAD_BOTH) . "\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,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 * vars. */ if (sqsession_is_registered('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 = ''; } } $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: $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: $location/compose.php?saved_draft=yes&session=$composesession"); exit(); } else { Header("Location: $location/right_main.php?mailbox=" . urlencode($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; $composeMessage=$compose_messages[$session]; $Result = deliverMessage($composeMessage); if (! $Result) { showInputForm($session); exit(); } unset($compose_messages[$session]); if ( isset($delete_draft)) { Header("Location: $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: $location/compose.php?mail_sent=yes"); } else { Header("Location: $location/right_main.php?mailbox=$urlMailbox&sort=$sort". "&startMessage=$startMessage"); } } 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; } if (isset($subject)) { $values['subject'] = $subject; } 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; global $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); 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 = str_replace("\n", ' ', $bodypart); $bodypart = preg_replace(array('/

/i','//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'])) { if (mb_detect_encoding($bodypart) != 'ASCII') { $bodypart = $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) { $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_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; break; } $identities[] = $enc_from_name; } $identity_match = $orig_header->findAddress($identities); if ($identity_match) { $identity = $identity_match; } } switch ($action) { 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); $subject = decodeHeader($orig_header->subject,false,false,true); /* remember the references and in-reply-to headers in case of an reply */ $composeMessage->rfc822_header->more_headers['References'] = $orig_header->references; $composeMessage->rfc822_header->more_headers['In-Reply-To'] = $orig_header->in_reply_to; $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'),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); sqUnWordWrap($body); break; case ('forward'): $send_to = ''; $subject = decodeHeader($orig_header->subject,false,false,true); 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); $send_to_cc = decodeHeader($send_to_cc,false,false,true); 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'); } $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)) ? $orig_header->from[0] : $orig_header->from; sqUnWordWrap($body); $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]); } $body = getReplyCitation($from , $orig_header->date) . $body; $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, $languages; $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 = $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 = decodeHeader($filename, false, false); 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; $composeMessage->initAttachment($message->type0.'/'.$message->type1,$filename, $full_localfilename); /* 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); } } 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); 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'); fwrite ($fp, $body); fclose($fp); $composeMessage->initAttachment('message/rfc822',$subject.'.msg', $full_localfilename); } return $composeMessage; } function showInputForm ($session, $values=false) { global $send_to, $send_to_cc, $body, $startMessage, $passed_body, $color, $use_signature, $signature, $prefix_sig, $editor_size, $editor_height, $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]; 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']; } 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"; echo addHidden('startMessage', $startMessage); if ($action == 'draft') { echo addHidden('delete_draft', $passed_id); } if (isset($delete_draft)) { echo addHidden('delete_draft', $delete_draft); } if (isset($session)) { echo addHidden('session', $session); } if (isset($passed_id)) { echo addHidden('passed_id', $passed_id); } if ($saved_draft == 'yes') { echo '
'. _("Draft Saved").'
'; } if ($mail_sent == 'yes') { echo '
'. _("Your Message has been sent.").'
'; } echo '' . "\n"; if ($compose_new_win == '1') { echo '
'."\n" . ' '. html_tag( 'td', '', 'right' ) . ''."\n"; } if ($location_of_buttons == 'top') { showComposeButtonRow(); } /* display select list for identities */ $idents = getPref($data_dir, $username, 'identities', 0); if ($idents > 1) { $fn = getPref($data_dir, $username, 'full_name'); $em = getPref($data_dir, $username, 'email_address'); 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%"' ) . addInput('send_to', $send_to, 60). '
' . "\n" . ' ' . "\n" . ' ' . "\n" . ' ' . "\n" . html_tag( 'td', '', 'right', $color[4] ) . _("Cc") . ':' . "\n" . html_tag( 'td', '', 'left', $color[4] ) . addInput('send_to_cc', $send_to_cc, 60). '
' . "\n" . ' ' . "\n" . ' ' . "\n" . ' ' . "\n" . html_tag( 'td', '', 'right', $color[4] ) . _("Bcc") . ':' . "\n" . html_tag( 'td', '', 'left', $color[4] ) . addInput('send_to_bcc', $send_to_bcc, 60).'
' . "\n" . ' ' . "\n" . ' ' . "\n" . ' ' . "\n" . html_tag( 'td', '', 'right', $color[4] ) . _("Subject") . ':' . "\n" . html_tag( 'td', '', 'left', $color[4] ) . "\n"; echo ' '.addInput('subject', $subject, 60). ' ' . "\n" . ' ' . "\n\n"; if ($location_of_buttons == 'between') { showComposeButtonRow(); } /* why this distinction? */ if ($compose_new_win == '1') { echo ' ' . "\n" . ' ' . "\n" . ' ' . "\n"; if ($location_of_buttons == 'bottom') { showComposeButtonRow(); } else { echo ' ' . "\n" . html_tag( 'td', '', 'right', '', 'colspan="2"' ) . "\n" . ' ' . addSubmit(_("Send"), 'send'). '     

' . "\n" . ' ' . "\n" . ' ' . "\n"; } /* This code is for attachments */ 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; } } } if(count($sizes) > 0) { $maxsize = '(max. ' . show_readable_size( min( $sizes ) ) . ')'; echo addHidden('MAX_FILE_SIZE', min( $sizes )); } else { $maxsize = ''; } 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" . $maxsize . ' ' . "\n" . ' ' . "\n"; $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.'/'. $attachment->mime_header->type1; $s_a[] = '
'. addCheckBox('delete[]', FALSE, $key). "\n" . $attached_filename . '- ' . $type . '('. show_readable_size( filesize( $attached_file ) ) . ')
'."\n"; } } } if (count($s_a)) { foreach ($s_a as $s) { echo '
\n" . '
' . "\n" . '
' . "\n" . ' ' . "\n" . ' ' . "\n"; } // End of file_uploads if-block /* End of attachment code */ if ($compose_new_win == '1') { echo ''."\n"; } echo '' . "\n" . addHidden('username', $username). addHidden('smaction', $action). addHidden('mailbox', $mailbox); /* store the complete ComposeMessages array in a hidden input value so we can restore them in case of a session timeout. */ sqgetGlobalVar('QUERY_STRING', $queryString, SQ_SERVER); echo addHidden('restoremessages', serialize($compose_messages)). addHidden('composesession', $composesession). addHidden('querystring', $queryString). "
\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 '' . "\n"; } function showComposeButtonRow() { global $use_javascript_addr_book, $save_as_draft, $default_use_priority, $mailprio, $default_use_mdn, $request_mdn, $request_dr, $data_dir, $username; echo ' ' . "\n" . ' ' . "\n" . ' ' . "\n"; if ($default_use_priority) { if(!isset($mailprio)) { $mailprio = '3'; } echo ' ' . _("Priority") . addSelect('mailprio', array( '1' => _("High"), '3' => _("Normal"), '5' => _("Low") ), $mailprio, TRUE); } $mdn_user_support=getPref($data_dir, $username, 'mdn_user_support',$default_use_mdn); if ($default_use_mdn) { if ($mdn_user_support) { echo ' ' . _("Receipt") .': '. addCheckBox('request_mdn', $request_mdn == '1', '1'). _("On Read"). addCheckBox('request_dr', $request_dr == '1', '1'). _("On Delivery"); } } echo ' ' . "\n" . ' ' . "\n" . ' ' . "\n" . ' ' . "\n" . ' ' . "\n" . ' ' . "\n"; if ($use_javascript_addr_book) { echo " \n"; } else { echo ' ' . "\n"; } if ($save_as_draft) { echo ' \n"; } echo ' ' . "\n"; do_hook('compose_button_row'); echo ' ' . "\n" . ' ' . "\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, $send_to_bcc, $subject, $color; if ($send_to == '' && $send_to_bcc == '') { 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($session) { global $_FILES, $attachment_dir, $attachments, $username, $data_dir, $compose_messages; /* get out of here if no file was attached at all */ if (! is_uploaded_file($_FILES['attachfile']['tmp_name']) ) { return true; } $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; } } $message = $compose_messages[$session]; $type = strtolower($_FILES['attachfile']['type']); $name = $_FILES['attachfile']['name']; $message->initAttachment($type, $name, $full_localfilename); $compose_messages[$session] = $message; sqsession_register($compose_messages , 'compose_messages'); } 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]); } } /* parse values like 8M and 2k into bytes */ function getByteSize($ini_size) { if(!$ini_size) { return FALSE; } $ini_size = trim($ini_size); // if there's some kind of letter at the end of the string we need to multiply. if(!is_numeric(substr($ini_size, -1))) { switch(strtoupper(substr($ini_size, -1))) { case 'G': $bytesize = 1073741824; break; case 'M': $bytesize = 1048576; break; case 'K': $bytesize = 1024; break; } return ($bytesize * (int)substr($ini_size, 0, -1)); } 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. */ 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, $default_move_to_sent, $move_to_sent; global $imapServerAddress, $imapPort, $sent_folder, $key; $rfc822_header = $composeMessage->rfc822_header; $abook = addressbook_init(false, true); $rfc822_header->to = $rfc822_header->parseAddress($send_to,true, array(), '', $domain, array(&$abook,'lookup')); $rfc822_header->cc = $rfc822_header->parseAddress($send_to_cc,true,array(), '',$domain, array(&$abook,'lookup')); $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') { $special_encoding = '8bit'; } else { $body = mb_convert_encoding($body, 'JIS'); $special_encoding = '7bit'; } } $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"; } $rfc822_header->from = $rfc822_header->parseAddress($from_mail,true); if ($full_name) { $from = $rfc822_header->from[0]; if (!$from->host) $from->host = $domain; $full_name_encoded = encodeHeader($full_name); if ($full_name_encoded != $full_name) { $from_addr = $full_name_encoded .' <'.$from->mailbox.'@'.$from->host.'>'; } else { $from_addr = '"'.$full_name .'" <'.$from->mailbox.'@'.$from->host.'>'; } $rfc822_header->from = $rfc822_header->parseAddress($from_addr,true); } if ($reply_to) { $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); } /* Receipt: On Delivery */ if (isset($request_dr) && $request_dr) { $rfc822_header->more_headers['Return-Receipt-To'] = $from_mail; } /* multipart messages */ if (count($composeMessage->entities)) { $message_body = new Message(); $message_body->body_part = $composeMessage->body_part; $composeMessage->body_part = ''; $mime_header = new MessageHeader; $mime_header->type0 = 'text'; $mime_header->type1 = 'plain'; if ($special_encoding) { $mime_header->encoding = $special_encoding; } else { $mime_header->encoding = '8bit'; } if ($default_charset) { $mime_header->parameters['charset'] = $default_charset; } $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 ($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; /* Here you can modify the message structure just before we hand it over to deliver */ $hookReturn = do_hook('compose_send', $composeMessage); /* Get any changes made by plugins to $composeMessage. */ if ( is_object($hookReturn[1]) ) { $composeMessage = $hookReturn[1]; } 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; $authPop = (isset($pop_before_smtp) && $pop_before_smtp) ? true : false; if ($smtp_auth_mech == 'none' && !$authPop) { $user = ''; $pass = ''; } else { global $key, $onetimepad; $user = $username; $pass = OneTimePadDecrypt($key, $onetimepad); } $stream = $deliver->initStream($composeMessage,$domain,0, $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); } 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; } else { $msg = '
'.sprintf(_("Error: Draft folder %s does not exist."), $draft_folder); plain_error_message($msg, $color); return false; } } $succes = 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); } else { unset ($deliver); $move_to_sent = getPref($data_dir,$username,'move_to_sent'); $imap_stream = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0); /* Move to sent code */ 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)) { sqimap_append ($imap_stream, $sent_folder, $length); 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); 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', false); } sqimap_logout($imap_stream); } return $succes; } // vim: et ts=4 ?>