X-Git-Url: https://vcs.fsf.org/?p=squirrelmail.git;a=blobdiff_plain;f=src%2Fread_body.php;h=de61e2d8a2a53dc67036b1b7fc2c233a1a5fdf1b;hp=e8bb590bf5370b1aa2b8d913afe0bf95753716a3;hb=15e6162eacc97158393bc75aed3afeb7b19c24a6;hpb=b8ea4ed629e58fb57a4b110867b4e1b84c82610f
diff --git a/src/read_body.php b/src/read_body.php
index e8bb590b..9e315719 100644
--- a/src/read_body.php
+++ b/src/read_body.php
@@ -1,70 +1,658 @@
-
- include("../config/config.php");
- include("../functions/strings.php");
- include("../functions/page_header.php");
- include("../functions/imap.php");
- include("../functions/mailbox.php");
- include("../functions/date.php");
-
- $imapConnection = loginToImapServer($username, $key, $imapServerAddress);
- selectMailbox($imapConnection, $mailbox, $numMessages);
-
- echo "
\n";
- displayPageHeader($mailbox);
- $body = fetchBody($imapConnection, $passed_id);
- getMessageHeaders($imapConnection, $passed_id, $passed_id, $f, $s, $d);
-// setMessageFlag($imapConnection, $passed_id, $passed_id, "Seen");
-
- $subject = $s[0];
- $d[0] = ereg_replace(" ", " ", $d[0]);
-// $date = explode(" ", trim($d[0]));
-// $date = getDateString($date);
- $date = $d[0];
- $from_name = getSenderName($f[0]);
- $urlMailbox = urlencode($mailbox);
-
- echo "
";
- echo "\n";
- echo " ";
- echo " Message List ";
- echo " |
";
- echo " ";
- echo " \n";
- echo " \n";
- /** subject **/
- echo " \n";
- echo " Subject:\n";
- echo " | \n";
- echo " $subject\n";
- echo " | \n";
- echo " \n";
- /** from **/
- echo " \n";
- echo " \n";
- echo " From:\n";
- echo " | \n";
- echo " $from_name\n";
- echo " | \n";
- echo " \n";
- /** date **/
- echo " \n";
- echo " \n";
- echo " Date:\n";
- echo " | \n";
- echo " $date\n";
- echo " | \n";
- echo " \n";
-
- echo " |
\n";
-
- echo " \n";
- $i = 0;
- while ($i < count($body)) {
- echo "$body[$i]";
- $i++;
- }
- echo "
|
\n";
- echo " |
";
- echo "
\n";
-
-?>
\ No newline at end of file
+' . "\n" .
+ ' ' . "\n" .
+ ' ' . "\n" .
+ ' | '."\n";
+ } else {
+ /* The link is subtle, below "view full header". */
+ $result = " \n";
+ }
+
+ /* Output the link. */
+ if ($javascript_on) {
+ $result .= '\n" .
+ "$print_text\n";
+ } else {
+ $result .= '$print_text\n";
+ }
+
+ if (!$pf_subtle_link) {
+ /* The link is large, on the bottom of the header panel. */
+ $result .= ' | ' . "\n" .
+ ' ' . "\n";
+ }
+
+ return ($result);
+ }
+
+ /*****************************/
+ /*** Main of read_boby.php ***/
+ /*****************************/
+
+ $imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0);
+ sqimap_mailbox_select($imapConnection, $mailbox);
+ do_hook('html_top');
+ displayPageHeader($color, $mailbox);
+
+ if (isset($view_hdr)) {
+ fputs ($imapConnection, sqimap_session_id() . " FETCH $passed_id BODY[HEADER]\r\n");
+ $read = sqimap_read_data ($imapConnection, sqimap_session_id(), true, $a, $b);
+
+ echo '
' .
+ '\n" .
+ "\n" .
+ '';
+
+ $cnum = 0;
+ for ($i=1; $i < count($read); $i++) {
+ $line = htmlspecialchars($read[$i]);
+ if (eregi("^>", $line)) {
+ $second[$i] = $line;
+ $first[$i] = ' ';
+ $cnum++;
+ } else if (eregi("^[ |\t]", $line)) {
+ $second[$i] = $line;
+ $first[$i] = '';
+ } else if (eregi("^([^:]+):(.+)", $line, $regs)) {
+ $first[$i] = $regs[1] . ':';
+ $second[$i] = $regs[2];
+ $cnum++;
+ } else {
+ $second[$i] = trim($line);
+ $first[$i] = '';
+ }
+ }
+ for ($i=0; $i < count($second); $i = $j) {
+ if (isset($first[$i])) {
+ $f = $first[$i];
+ }
+ if (isset($second[$i])) {
+ $s = nl2br($second[$i]);
+ }
+ $j = $i + 1;
+ while (($first[$j] == '') && ($j < count($first))) {
+ $s .= ' ' . nl2br($second[$j]);
+ $j++;
+ }
+ parseEmail($s);
+ if (isset($f)) echo "$f$s";
+ }
+ echo " |
\n";
+ echo '';
+ sqimap_logout($imapConnection);
+ exit;
+ }
+
+ if (isset($msgs)) {
+ $currentArrayIndex = $passed_id;
+ } else {
+ $currentArrayIndex = -1;
+ }
+
+ for ($i = 0; $i < count($msgs); $i++) {
+ if ($msgs[$i]['ID'] == $passed_id) {
+ $msgs[$i]['FLAG_SEEN'] = true;
+ }
+ }
+
+ // $message contains all information about the message
+ // including header and body
+ $message = sqimap_get_message($imapConnection, $passed_id, $mailbox);
+
+ /** translate the subject and mailbox into url-able text **/
+ $url_subj = urlencode(trim($message->header->subject));
+ $urlMailbox = urlencode($mailbox);
+ $url_replyto = '';
+ if (isset($message->header->replyto)) {
+ $url_replyto = urlencode($message->header->replyto);
+ }
+
+ $url_replytoall = $url_replyto;
+
+ // If we are replying to all, then find all other addresses and
+ // add them to the list. Remove duplicates.
+ // This is somewhat messy, so I'll explain:
+ // 1) Take all addresses (from, to, cc) (avoid nasty join errors here)
+ $url_replytoall_extra_addrs = array_merge(
+ array($message->header->from),
+ $message->header->to,
+ $message->header->cc
+ );
+
+ // 2) Make one big string out of them
+ $url_replytoall_extra_addrs = join(';', $url_replytoall_extra_addrs);
+
+ // 3) Parse that into an array of addresses
+ $url_replytoall_extra_addrs = parseAddrs($url_replytoall_extra_addrs);
+
+ // 4) Make them unique -- weed out duplicates
+ // (Coded for PHP 4.0.0)
+ $url_replytoall_extra_addrs =
+ array_keys(array_flip($url_replytoall_extra_addrs));
+
+ // 5) Remove the addresses we'll be sending the message 'to'
+ $url_replytoall_avoid_addrs = '';
+ if (isset($message->header->replyto)) {
+ $url_replytoall_avoid_addrs = $message->header->replyto;
+ }
+
+ $url_replytoall_avoid_addrs = parseAddrs($url_replytoall_avoid_addrs);
+ foreach ($url_replytoall_avoid_addrs as $addr) {
+ RemoveAddress($url_replytoall_extra_addrs, $addr);
+ }
+
+ // 6) 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) {
+ RemoveAddress($url_replytoall_extra_addrs,
+ getPref($data_dir, $username, 'email_address'));
+ $idents = getPref($data_dir, $username, 'identities');
+ if ($idents != '' && $idents > 1) {
+ for ($i = 1; $i < $idents; $i ++) {
+ $cur_email_address = getPref($data_dir, $username, 'email_address' . $i);
+ RemoveAddress($url_replytoall_extra_addrs, $cur_email_address);
+ }
+ }
+ }
+
+ // 7) Smoosh back into one nice line
+ $url_replytoallcc = getLineOfAddrs($url_replytoall_extra_addrs);
+
+ // 8) urlencode() it
+ $url_replytoallcc = urlencode($url_replytoallcc);
+
+ $dateString = getLongDateString($message->header->date);
+
+ // What do we reply to -- text only, if possible
+ $ent_num = findDisplayEntity($message);
+
+ /** TEXT STRINGS DEFINITIONS **/
+ $echo_more = _("more");
+ $echo_less = _("less");
+
+ if (!isset($show_more_cc)) $show_more_cc = false;
+
+ /** FORMAT THE TO STRING **/
+ $i = 0;
+ $to_string = '';
+ $to_ary = $message->header->to;
+ while ($i < count($to_ary)) {
+ $to_ary[$i] = htmlspecialchars(decodeHeader($to_ary[$i]));
+
+ if ($to_string) {
+ $to_string = "$to_string
$to_ary[$i]";
+ } else {
+ $to_string = "$to_ary[$i]";
+ }
+
+ $i++;
+ if (count($to_ary) > 1) {
+ if ($show_more == false) {
+ if ($i == 1) {
+ /* From a search... */
+ if (isset($where) && isset($what)) {
+ $to_string = "$to_string ($echo_more)";
+ } else {
+ $to_string = "$to_string ($echo_more)";
+ }
+ $i = count($to_ary);
+ }
+ } else if ($i == 1) {
+ /* From a search... */
+ if (isset($where) && isset($what)) {
+ $to_string = "$to_string ($echo_less)";
+ } else {
+ $to_string = "$to_string ($echo_less)";
+ }
+ }
+ }
+ }
+
+ /** FORMAT THE CC STRING **/
+ $i = 0;
+ if (isset ($message->header->cc[0]) && trim($message->header->cc[0])) {
+ $cc_string = "";
+ $cc_ary = $message->header->cc;
+ while ($i < count(decodeHeader($cc_ary))) {
+ $cc_ary[$i] = htmlspecialchars($cc_ary[$i]);
+ if ($cc_string) {
+ $cc_string = "$cc_string
$cc_ary[$i]";
+ } else {
+ $cc_string = "$cc_ary[$i]";
+ }
+
+ $i++;
+ if (count($cc_ary) > 1) {
+ if ($show_more_cc == false) {
+ if ($i == 1) {
+ /* From a search... */
+ if (isset($where) && isset($what)) {
+ $cc_string = "$cc_string ($echo_more)";
+ } else {
+ $cc_string = "$cc_string ($echo_more)";
+ }
+ $i = count($cc_ary);
+ }
+ } else if ($i == 1) {
+ /* From a search... */
+ if (isset($where) && isset($what)) {
+ $cc_string = "$cc_string ($echo_less)";
+ } else {
+ $cc_string = "$cc_string ($echo_less)";
+ }
+ }
+ }
+ }
+ }
+
+ /** FORMAT THE BCC STRING **/
+ $i = 0;
+ if (isset ($message->header->bcc[0]) && trim($message->header->bcc[0])){
+ $bcc_string = "";
+ $bcc_ary = $message->header->bcc;
+ while ($i < count(decodeHeader($bcc_ary))) {
+ $bcc_ary[$i] = htmlspecialchars($bcc_ary[$i]);
+ if ($bcc_string) {
+ $bcc_string = "$bcc_string
$bcc_ary[$i]";
+ } else {
+ $bcc_string = "$bcc_ary[$i]";
+ }
+
+ $i++;
+ if (count($bcc_ary) > 1) {
+ if ($show_more_cc == false) {
+ if ($i == 1) {
+ /* From a search... */
+ if (isset($where) && isset($what)) {
+ $bcc_string = "$bcc_string ($echo_more)";
+ } else {
+ $bcc_string = "$bcc_string ($echo_more)";
+ }
+ $i = count($bcc_ary);
+ }
+ } else if ($i == 1) {
+ /* From a search... */
+ if (isset($where) && isset($what)) {
+ $bcc_string = "$bcc_string ($echo_less)";
+ } else {
+ $bcc_string = "$bcc_string ($echo_less)";
+ }
+ }
+ }
+ }
+ }
+
+ if ($default_use_priority) {
+ switch(substr($message->header->priority,0,1)) {
+ /* First, check for a higher then normal priority. */
+ case "1":
+ case "2": $priority_string = _("High"); break;
+
+ /* Second, check for a normal priority. */
+ case "3": $priority_string = _("Normal"); break;
+
+ /* Last, check for a lower then normal priority. */
+ case "4":
+ case "5": $priority_string = _("Low"); break;
+ }
+ }
+
+ /** make sure everything will display in HTML format **/
+ $from_name = decodeHeader(htmlspecialchars($message->header->from));
+ $subject = decodeHeader(htmlspecialchars($message->header->subject));
+
+ do_hook('read_body_top');
+ echo '
' .
+ '' . "\n" .
+ ' ' . "\n" .
+ ' ' .
+ ' |
' .
+ ' ' .
+ ' ' . "\n" .
+ ' ' . "\n";
+
+ /** subject **/
+ echo " \n" .
+ _("Subject:") .
+ " | \n" .
+ " $subject \n" .
+ " | \n" .
+ ' ' . "\n";
+
+ /* From a search... */
+ if ($where && $what) {
+ echo "" . _("View Full Header") . "\n";
+ } else {
+ echo "" . _("View Full Header") . "\n";
+ }
+
+ /* Output the printer friendly link if we are in subtle mode. */
+ if ($pf_subtle_link) {
+ echo printer_friendly_link(true);
+ }
+
+ do_hook("read_body_header_right");
+ echo ' | ' . "\n" .
+ ' ' ."\n";
+
+ /** from **/
+ echo ' ' . "\n" .
+ ' ' . "\n" .
+ _("From:") .
+ ' | ' . "\n" .
+ " $from_name \n" .
+ ' | ' . "\n" .
+ ' ' . "\n";
+ /** date **/
+ echo ' ' . "\n" .
+ ' ' . "\n" .
+ _("Date:") .
+ " | \n" .
+ " $dateString \n" .
+ ' | ' . "\n" .
+ ' ' . "\n";
+
+ /** to **/
+ echo " \n" .
+ " \n" .
+ _("To:") .
+ ' | ' . "\n" .
+ " $to_string \n" .
+ ' | ' . "\n" .
+ ' ' . "\n";
+ /** cc **/
+ if (isset($cc_string)) {
+ echo " \n" .
+ " \n" .
+ ' Cc:' . "\n" .
+ " | \n" .
+ " $cc_string \n" .
+ ' | ' . "\n" .
+ ' ' . "\n";
+ }
+
+ /** bcc **/
+ if (isset($bcc_string)) {
+ echo " \n" .
+ " \n" .
+ ' Bcc:' . "\n" .
+ " | \n" .
+ " $bcc_string \n" .
+ ' | ' . "\n" .
+ ' ' . "\n";
+ }
+ if ($default_use_priority) {
+ if (isset($priority_string)) {
+ echo " \n" .
+ " \n" .
+ " "._("Priority").": \n".
+ " | \n" .
+ " $priority_string \n" .
+ " | " . "\n" .
+ " " . "\n";
+ }
+ }
+
+ if ($show_xmailer_default) {
+ fputs ($imapConnection, sqimap_session_id() .
+ " FETCH $passed_id BODY.PEEK[HEADER.FIELDS (X-Mailer User-Agent)]\r\n");
+ $read = sqimap_read_data ($imapConnection, sqimap_session_id(), true,
+ $response, $readmessage);
+ $mailer = substr($read[1], strpos($read[1], " "));
+ if (trim($mailer)) {
+ echo " \n" .
+ " \n" .
+ " "._("Mailer").": \n".
+ " | \n" .
+ " $mailer \n" .
+ " | " . "\n" .
+ " " . "\n";
+ }
+ }
+
+ /* Output the printer friendly link if we are not in subtle mode. */
+ if (!$pf_subtle_link) {
+ echo printer_friendly_link(true);
+ }
+
+ do_hook("read_body_header");
+ echo ' ' .
+ ' |
' .
+ '
';
+ flush();
+ echo "\n" .
+ " \n" .
+ ' ';
+
+ $body = formatBody($imapConnection, $message, $color, $wrap_at);
+
+ echo $body .
+ ' |
' .
+ '' . "\n";
+
+ /* show attached images inline -- if pref'fed so */
+ if (($attachment_common_show_images) and
+ is_array($attachment_common_show_images_list)) {
+ foreach ($attachment_common_show_images_list as $img) {
+ echo "\n" .
+ " \n" .
+ " \n" .
+ ' ' . "\n" .
+ " | \n" .
+ "
\n" .
+ "
\n";
+ }
+ }
+
+ do_hook('read_body_bottom');
+ do_hook('html_bottom');
+ sqimap_logout($imapConnection);
+?>