0705f962efda4539935ede375fe40a1b3e576069
[squirrelmail.git] / src / read_body.php
1 <?php
2
3 /**
4 * read_body.php
5 *
6 * This file is used for reading the msgs array and displaying
7 * the resulting emails in the right frame.
8 *
9 * @copyright &copy; 1999-2006 The SquirrelMail Project Team
10 * @license http://opensource.org/licenses/gpl-license.php GNU Public License
11 * @version $Id$
12 * @package squirrelmail
13 */
14
15 /**
16 * Include the SquirrelMail initialization file.
17 */
18 require('../include/init.php');
19
20 /* SquirrelMail required files. */
21 require_once(SM_PATH . 'functions/imap.php');
22 require_once(SM_PATH . 'functions/imap_asearch.php'); // => move to mailbox_display
23 require_once(SM_PATH . 'functions/mime.php');
24 require_once(SM_PATH . 'functions/date.php');
25 require_once(SM_PATH . 'functions/url_parser.php');
26 require_once(SM_PATH . 'functions/identity.php');
27 require_once(SM_PATH . 'functions/mailbox_display.php');
28 require_once(SM_PATH . 'functions/forms.php');
29 require_once(SM_PATH . 'functions/attachment_common.php');
30
31 /**
32 * Given an IMAP message id number, this will look it up in the cached
33 * and sorted msgs array and return the index of the next message
34 *
35 * @param int $passed_id The current message UID
36 * @return the index of the next valid message from the array
37 */
38 function findNextMessage($uidset,$passed_id='backwards') {
39 if (!is_array($uidset)) {
40 return -1;
41 }
42 if ($passed_id=='backwards' || !is_array($uidset)) { // check for backwards compattibilty gpg plugin
43 $passed_id = $uidset;
44 }
45 $result = sqm_array_get_value_by_offset($uidset,$passed_id,1);
46 if ($result === false) {
47 return -1;
48 } else {
49 return $result;
50 }
51 }
52
53 /**
54 * Given an IMAP message id number, this will look it up in the cached
55 * and sorted msgs array and return the index of the previous message
56 *
57 * @param int $passed_id The current message UID
58 * @return the index of the next valid message from the array
59 */
60
61 function findPreviousMessage($uidset, $passed_id) {
62 if (!is_array($uidset)) {
63 return -1;
64 }
65 $result = sqm_array_get_value_by_offset($uidset,$passed_id,-1);
66 if ($result === false) {
67 return -1;
68 } else {
69 return $result;
70 }
71 }
72
73 function html_toggle_href ($mailbox, $passed_id, $passed_ent_id, $message) {
74 global $base_uri, $show_html_default;
75
76 $has_html = false;
77 if ($message->header->type0 == 'message' && $message->header->type1 == 'rfc822') {
78 $type0 = $message->rfc822_header->content_type->type0;
79 $type1 = $message->rfc822_header->content_type->type1;
80 } else {
81 $type0 = $message->header->type0;
82 $type1 = $message->header->type1;
83 }
84 if($type0 == 'multipart' &&
85 ($type1 == 'alternative' || $type1 == 'mixed' || $type1 == 'related' || $type1=='signed')) {
86 if ($message->findDisplayEntity(array(), array('text/html'), true)) {
87 $has_html = true;
88 }
89 }
90 /*
91 * Normal single part message so check its type.
92 */
93 else {
94 if($type0 == 'text' && $type1 == 'html') {
95 $has_html = true;
96 }
97 }
98 if($has_html == true) {
99 $vars = array('passed_ent_id', 'show_more', 'show_more_cc', 'override_type0', 'override_type1', 'startMessage','where', 'what');
100
101 $new_link = $base_uri . 'src/read_body.php?passed_id=' . urlencode($passed_id) .
102 '&amp;passed_ent_id=' . urlencode($passed_ent_id) .
103 '&amp;mailbox=' . urlencode($mailbox);
104 foreach($vars as $var) {
105 if(sqgetGlobalVar($var, $temp)) {
106 $new_link .= '&amp;' . $var . '=' . urlencode($temp);
107 }
108 }
109
110 if($show_html_default == 1) {
111 $new_link .= '&amp;show_html_default=0';
112 } else {
113 $new_link .= '&amp;show_html_default=1';
114 }
115 return $new_link;
116 }
117 return '';
118 }
119
120 function ServerMDNSupport($aFlags) {
121 /* escaping $ doesn't work -> \x36 */
122 return ( in_array('$mdnsent',$aFlags,true) ||
123 in_array('\\*',$aFlags,true) ) ;
124 }
125
126 function SendMDN ( $mailbox, $passed_id, $sender, $message, $imapConnection) {
127 global $username, $attachment_dir, $popuser, $username, $color,
128 $version, $squirrelmail_language, $default_charset,
129 $languages, $useSendmail, $domain, $sent_folder;
130
131 sqgetGlobalVar('SERVER_NAME', $SERVER_NAME, SQ_SERVER);
132
133 $header = $message->rfc822_header;
134
135 $rfc822_header = new Rfc822Header();
136 $content_type = new ContentType('multipart/report');
137 $content_type->properties['report-type']='disposition-notification';
138
139 set_my_charset();
140 if ($default_charset) {
141 $content_type->properties['charset']=$default_charset;
142 }
143 $rfc822_header->content_type = $content_type;
144 $rfc822_header->to[] = $header->dnt;
145 $rfc822_header->subject = _("Read:") . ' ' . encodeHeader($header->subject);
146
147 // Patch #793504 Return Receipt Failing with <@> from Tim Craig (burny_md)
148 // This merely comes from compose.php and only happens when there is no
149 // email_addr specified in user's identity (which is the startup config)
150 if (ereg("^([^@%/]+)[@%/](.+)$", $username, $usernamedata)) {
151 $popuser = $usernamedata[1];
152 $domain = $usernamedata[2];
153 unset($usernamedata);
154 } else {
155 $popuser = $username;
156 }
157
158 $reply_to = '';
159 $ident = get_identities();
160 if(!isset($identity)) $identity = 0;
161 $full_name = $ident[$identity]['full_name'];
162 $from_mail = $ident[$identity]['email_address'];
163 $from_addr = '"'.$full_name.'" <'.$from_mail.'>';
164 $reply_to = $ident[$identity]['reply_to'];
165
166 if (!$from_mail) {
167 $from_mail = "$popuser@$domain";
168 $from_addr = $from_mail;
169 }
170 $rfc822_header->from = $rfc822_header->parseAddress($from_addr,true);
171 if ($reply_to) {
172 $rfc822_header->reply_to = $rfc822_header->parseAddress($reply_to,true);
173 }
174
175 // part 1 (RFC2298)
176 $senton = getLongDateString( $header->date );
177 $to_array = $header->to;
178 $to = '';
179 foreach ($to_array as $line) {
180 $to .= ' '.$line->getAddress();
181 }
182 $now = getLongDateString( time() );
183 set_my_charset();
184 $body = _("Your message") . "\r\n\r\n" .
185 "\t" . _("To") . ': ' . decodeHeader($to,false,false) . "\r\n" .
186 "\t" . _("Subject") . ': ' . decodeHeader($header->subject,false,false) . "\r\n" .
187 "\t" . _("Sent") . ': ' . $senton . "\r\n" .
188 "\r\n" .
189 sprintf( _("Was displayed on %s"), $now );
190
191 $special_encoding = '';
192 if (isset($languages[$squirrelmail_language]['XTRA_CODE']) &&
193 function_exists($languages[$squirrelmail_language]['XTRA_CODE'] . '_encode')) {
194 $body = call_user_func($languages[$squirrelmail_language]['XTRA_CODE'] . '_encode', $body);
195 if (strtolower($default_charset) == 'iso-2022-jp') {
196 if (mb_detect_encoding($body) == 'ASCII') {
197 $special_encoding = '8bit';
198 } else {
199 $body = mb_convert_encoding($body, 'JIS');
200 $special_encoding = '7bit';
201 }
202 }
203 } elseif (sq_is8bit($body)) {
204 $special_encoding = '8bit';
205 }
206 $part1 = new Message();
207 $part1->setBody($body);
208 $mime_header = new MessageHeader;
209 $mime_header->type0 = 'text';
210 $mime_header->type1 = 'plain';
211 if ($special_encoding) {
212 $mime_header->encoding = $special_encoding;
213 } else {
214 $mime_header->encoding = 'us-ascii';
215 }
216 if ($default_charset) {
217 $mime_header->parameters['charset'] = $default_charset;
218 }
219 $part1->mime_header = $mime_header;
220
221 // part2 (RFC2298)
222 $original_recipient = $to;
223 $original_message_id = $header->message_id;
224
225 $report = "Reporting-UA : $SERVER_NAME ; SquirrelMail (version $version) \r\n";
226 if ($original_recipient != '') {
227 $report .= "Original-Recipient : $original_recipient\r\n";
228 }
229 $final_recipient = $sender;
230 $report .= "Final-Recipient: rfc822; $final_recipient\r\n" .
231 "Original-Message-ID : $original_message_id\r\n" .
232 "Disposition: manual-action/MDN-sent-manually; displayed\r\n";
233
234 $part2 = new Message();
235 $part2->setBody($report);
236 $mime_header = new MessageHeader;
237 $mime_header->type0 = 'message';
238 $mime_header->type1 = 'disposition-notification';
239 $mime_header->encoding = 'us-ascii';
240 $part2->mime_header = $mime_header;
241
242 $composeMessage = new Message();
243 $composeMessage->rfc822_header = $rfc822_header;
244 $composeMessage->addEntity($part1);
245 $composeMessage->addEntity($part2);
246
247
248 if ($useSendmail) {
249 require_once(SM_PATH . 'class/deliver/Deliver_SendMail.class.php');
250 global $sendmail_path, $sendmail_args;
251 // Check for outdated configuration
252 if (!isset($sendmail_args)) {
253 if ($sendmail_path=='/var/qmail/bin/qmail-inject') {
254 $sendmail_args = '';
255 } else {
256 $sendmail_args = '-i -t';
257 }
258 }
259 $deliver = new Deliver_SendMail(array('sendmail_args'=>$sendmail_args));
260 $stream = $deliver->initStream($composeMessage,$sendmail_path);
261 } else {
262 require_once(SM_PATH . 'class/deliver/Deliver_SMTP.class.php');
263 $deliver = new Deliver_SMTP();
264 global $smtpServerAddress, $smtpPort, $pop_before_smtp;
265 $authPop = (isset($pop_before_smtp) && $pop_before_smtp) ? true : false;
266 get_smtp_user($user, $pass);
267 $stream = $deliver->initStream($composeMessage,$domain,0,
268 $smtpServerAddress, $smtpPort, $user, $pass, $authPop);
269 }
270 $success = false;
271 if ($stream) {
272 $length = $deliver->mail($composeMessage, $stream);
273 $success = $deliver->finalizeStream($stream);
274 }
275 if (!$success) {
276 $msg = $deliver->dlv_msg;
277 if (! empty($deliver->dlv_server_msg)) {
278 $msg.= '<br />' .
279 _("Server replied:") . ' ' . $deliver->dlv_ret_nr . ' ' .
280 nl2br(htmlspecialchars($deliver->dlv_server_msg));
281 }
282 plain_error_message($msg, $color);
283 } else {
284 unset ($deliver);
285 if (sqimap_mailbox_exists ($imapConnection, $sent_folder)) {
286 $sid = sqimap_append ($imapConnection, $sent_folder, $length);
287 require_once(SM_PATH . 'class/deliver/Deliver_IMAP.class.php');
288 $imap_deliver = new Deliver_IMAP();
289 $imap_deliver->mail($composeMessage, $imapConnection);
290 sqimap_append_done ($imapConnection, $sent_folder);
291 unset ($imap_deliver);
292 }
293 }
294 return $success;
295 }
296
297 function ToggleMDNflag ($set ,$imapConnection, $mailbox, $passed_id) {
298 $sg = $set?'+':'-';
299 $cmd = 'STORE ' . $passed_id . ' ' . $sg . 'FLAGS ($MDNSent)';
300 $read = sqimap_run_command ($imapConnection, $cmd, true, $response,
301 $readmessage, TRUE);
302 }
303
304 function formatRecipientString($recipients, $item ) {
305 global $show_more_cc, $show_more, $show_more_bcc,
306 $PHP_SELF, $oTemplate;
307
308 $string = '';
309 if ((is_array($recipients)) && (isset($recipients[0]))) {
310 $show = false;
311
312 if ($item == 'to') {
313 if ($show_more) {
314 $show = true;
315 $url = set_url_var($PHP_SELF, 'show_more',0);
316 } else {
317 $url = set_url_var($PHP_SELF, 'show_more',1);
318 }
319 } else if ($item == 'cc') {
320 if ($show_more_cc) {
321 $show = true;
322 $url = set_url_var($PHP_SELF, 'show_more_cc',0);
323 } else {
324 $url = set_url_var($PHP_SELF, 'show_more_cc',1);
325 }
326 } else if ($item == 'bcc') {
327 if ($show_more_bcc) {
328 $show = true;
329 $url = set_url_var($PHP_SELF, 'show_more_bcc',0);
330 } else {
331 $url = set_url_var($PHP_SELF, 'show_more_bcc',1);
332 }
333 }
334
335 $a = array();
336 foreach ($recipients as $r) {
337 $a[] = array(
338 'Name' => htmlspecialchars($r->getAddress(false)),
339 'Email' => htmlspecialchars($r->getEmail()),
340 'Full' => htmlspecialchars($r->getAddress(true))
341 );
342 }
343
344 $oTemplate->assign('which_field', $item);
345 $oTemplate->assign('recipients', $a);
346 $oTemplate->assign('more_less_toggle_href', $url);
347 $oTemplate->assign('show_more', $show);
348
349 $string = $oTemplate->fetch('read_recipient_list.tpl');
350 }
351 return $string;
352 }
353
354 function formatEnvheader($aMailbox, $passed_id, $passed_ent_id, $message,
355 $color, $FirstTimeSee) {
356 global $default_use_mdn, $default_use_priority,
357 $show_xmailer_default, $mdn_user_support, $PHP_SELF, $javascript_on,
358 $squirrelmail_language, $oTemplate;
359
360 $mailbox = $aMailbox['NAME'];
361
362 $header = $message->rfc822_header;
363 $env = array();
364 $env[_("Subject")] = str_replace("&nbsp;"," ",decodeHeader($header->subject));
365
366 $from_name = $header->getAddr_s('from');
367 if (!$from_name)
368 $from_name = $header->getAddr_s('sender');
369 if (!$from_name)
370 $env[_("From")] = _("Unknown sender");
371 else
372 $env[_("From")] = decodeHeader($from_name);
373 $env[_("Date")] = getLongDateString($header->date);
374 $env[_("To")] = formatRecipientString($header->to, "to");
375 $env[_("Cc")] = formatRecipientString($header->cc, "cc");
376 $env[_("Bcc")] = formatRecipientString($header->bcc, "bcc");
377 if ($default_use_priority) {
378 $oTemplate->assign('message_priority', $header->priority);
379 $env[_("Priority")] = $oTemplate->fetch('read_message_priority.tpl');
380 }
381 if ($show_xmailer_default) {
382 $oTemplate->assign('xmailer', decodeHeader($header->xmailer));
383 $env[_("Mailer")] = $oTemplate->fetch('read_xmailer.tpl');
384 }
385 if ($default_use_mdn) {
386 if ($mdn_user_support) {
387 if ($header->dnt) {
388 $mdn_url = $PHP_SELF;
389 $mdn_url = set_url_var($PHP_SELF, 'mailbox', urlencode($mailbox));
390 $mdn_url = set_url_var($PHP_SELF, 'passed_id', $passed_id);
391 $mdn_url = set_url_var($PHP_SELF, 'passed_ent_id', $passed_ent_id);
392 $mdn_url = set_url_var($PHP_SELF, 'sendreceipt', 1);
393
394 $oTemplate->assign('read_receipt_sent', $message->is_mdnsent);
395 $oTemplate->assign('first_time_reading', $FirstTimeSee);
396 $oTemplate->assign('send_receipt_href', $mdn_url);
397
398 $env[_("Read Receipt")] = $oTemplate->fetch('read_handle_receipt.tpl');
399 }
400 }
401 }
402 $env[_("Options")] = formatToolbar($mailbox, $passed_id, $passed_ent_id, $message, $color);
403
404 $oTemplate->assign('headers_to_display', $env);
405
406 $oTemplate->display('read_headers.tpl');
407 }
408
409 /**
410 * Format message toolbar
411 *
412 * @param string $mailbox Name of current mailbox
413 * @param int $passed_id UID of current message
414 * @param int $passed_ent_id Id of entity within message
415 * @param object $message Current message object
416 * @param object $mbx_response
417 */
418 function formatMenubar($aMailbox, $passed_id, $passed_ent_id, $message, $removedVar, $nav_on_top = TRUE) {
419 global $base_uri, $draft_folder, $where, $what, $sort,
420 $startMessage, $PHP_SELF, $save_as_draft,
421 $enable_forward_as_attachment, $imapConnection, $lastTargetMailbox,
422 $delete_prev_next_display, $show_copy_buttons,
423 $compose_new_win, $javascript_on, $compose_width, $compose_height,
424 $oTemplate;
425
426 //FIXME cleanup argument list, use $aMailbox where possible
427 $mailbox = $aMailbox['NAME'];
428
429 $urlMailbox = urlencode($mailbox);
430
431 $msgs_url = $base_uri . 'src/';
432
433 // Create Prev & Next links
434 // Handle nested entities first (i.e. Mime Attach parts)
435 $prev_href = $next_href = $up_href = $del_href = $del_prev_href = $del_next_href = '';
436 $msg_list_href = $search_href = $view_msg_href = '';
437 if (isset($passed_ent_id) && $passed_ent_id) {
438 // code for navigating through attached message/rfc822 messages
439 $url = set_url_var($PHP_SELF, 'passed_ent_id',0);
440 $entities = array();
441 $entity_count = array();
442 $c = 0;
443
444 foreach($message->parent->entities as $ent) {
445 if ($ent->type0 == 'message' && $ent->type1 == 'rfc822') {
446
447 $c++;
448 $entity_count[$c] = $ent->entity_id;
449 $entities[$ent->entity_id] = $c;
450 }
451 }
452
453 if(isset($entities[$passed_ent_id]) && $entities[$passed_ent_id] > 1) {
454 $prev_ent_id = $entity_count[$entities[$passed_ent_id] - 1];
455 $prev_href = set_url_var($PHP_SELF, 'passed_ent_id', $prev_ent_id);
456 }
457
458 if(isset($entities[$passed_ent_id]) && $entities[$passed_ent_id] < $c) {
459 $next_ent_id = $entity_count[$entities[$passed_ent_id] + 1];
460 $next_href = set_url_var($PHP_SELF, 'passed_ent_id', $next_ent_id);
461 }
462
463 $par_ent_id = $message->parent->entity_id;
464 if ($par_ent_id) {
465 $par_ent_id = substr($par_ent_id,0,-2);
466 if ( $par_ent_id != 0 ) {
467 $up_href = set_url_var($PHP_SELF, 'passed_ent_id',$par_ent_id);
468 }
469 }
470
471 $view_msg_href = $url;
472
473 // Prev/Next links for regular messages
474 } else if ( true ) { //!(isset($where) && isset($what)) ) {
475 $prev = findPreviousMessage($aMailbox['UIDSET'][$what], $passed_id);
476 $next = findNextMessage($aMailbox['UIDSET'][$what],$passed_id);
477
478 if ($prev >= 0) {
479 $prev_href = $base_uri . 'src/read_body.php?passed_id='.$prev.
480 '&amp;mailbox='.$urlMailbox.'&amp;sort='.$sort.
481 "&amp;where=$where&amp;what=$what" .
482 '&amp;startMessage='.$startMessage.'&amp;show_more=0';
483 }
484
485 if ($next >= 0) {
486 $next_href = $base_uri . 'src/read_body.php?passed_id='.$next.
487 '&amp;mailbox='.$urlMailbox.'&amp;sort='.$sort.
488 "&amp;where=$where&amp;what=$what" .
489 '&amp;startMessage='.$startMessage.'&amp;show_more=0';
490 }
491
492 // Only bother with Delete & Prev and Delete & Next IF
493 // top display is enabled.
494 if ( $delete_prev_next_display == 1 &&
495 in_array('\\deleted', $aMailbox['PERMANENTFLAGS'],true) ) {
496 if ($prev >= 0) {
497 $del_prev_href = $base_uri . 'src/read_body.php?passed_id='.$prev.
498 '&amp;mailbox='.$urlMailbox.'&amp;sort='.$sort.
499 '&amp;startMessage='.$startMessage.'&amp;show_more=0'.
500 "&amp;where=$where&amp;what=$what" .
501 '&amp;delete_id='.$passed_id;
502 }
503
504 if ($next >= 0) {
505 $del_next_href = $base_uri . 'src/read_body.php?passed_id='.$next.
506 '&amp;mailbox='.$urlMailbox.'&amp;sort='.$sort.
507 '&amp;startMessage='.$startMessage.'&amp;show_more=0'.
508 "&amp;where=$where&amp;what=$what" .
509 '&amp;delete_id='.$passed_id;
510 }
511 }
512 }
513
514 // Start with Search Results or Message List link.
515 $list_xtra = "?where=read_body.php&amp;what=$what&amp;mailbox=" . $urlMailbox.
516 "&amp;startMessage=$startMessage";
517 $msg_list_href = $base_uri .'src/right_main.php'. $list_xtra;
518 $search_href = $where=='search.php' ? $base_uri .'src/search.php?'.$list_xtra : '';
519
520 $comp_uri = $base_uri.'src/compose.php' .
521 '?passed_id=' . $passed_id .
522 '&amp;mailbox=' . $urlMailbox .
523 '&amp;startMessage=' . $startMessage .
524 (isset($passed_ent_id) ? '&amp;passed_ent_id='.$passed_ent_id : '');
525
526 // Start form for reply/reply all/forward..
527 $target = '';
528 $on_click='';
529 $method='method="post" ';
530 $onsubmit='';
531 if ($compose_new_win == '1') {
532 if (!preg_match("/^[0-9]{3,4}$/", $compose_width)) {
533 $compose_width = '640';
534 }
535 if (!preg_match("/^[0-9]{3,4}$/", $compose_height)) {
536 $compose_height = '550';
537 }
538 if ( $javascript_on ) {
539 $on_click=' onclick="comp_in_new_form(\''.$comp_uri.'\', this, this.form,'. $compose_width .',' . $compose_height .')"';
540 $comp_uri = 'javascript:void(0)';
541 $method='method="get" ';
542 $onsubmit = 'onsubmit="return false" ';
543 } else {
544 $target = 'target="_blank"';
545 }
546 }
547
548 $oTemplate->assign('nav_on_top', $nav_on_top);
549
550 $oTemplate->assign('prev_href', $prev_href);
551 $oTemplate->assign('up_href', $up_href);
552 $oTemplate->assign('next_href', $next_href);
553 $oTemplate->assign('del_prev_href', $del_prev_href);
554 $oTemplate->assign('del_next_href', $del_next_href);
555 $oTemplate->assign('view_msg_href', $view_msg_href);
556
557 $oTemplate->assign('message_list_href', $msg_list_href);
558 $oTemplate->assign('search_href', $search_href);
559
560 $oTemplate->assign('form_extra', $method . $target . $onsubmit);
561 $oTemplate->assign('compose_href', $comp_uri);
562 $oTemplate->assign('button_onclick', $on_click);
563 $oTemplate->assign('forward_as_attachment_enabled', $enable_forward_as_attachment==1);
564
565 // If Draft folder - create Resume link
566 $resume_draft = $edit_as_new = false;
567 if (($mailbox == $draft_folder) && ($save_as_draft)) {
568 $resume_draft = true; 'smaction_draft';
569 } else if (handleAsSent($mailbox)) {
570 $edit_as_new = true;
571 }
572 $oTemplate->assign('can_resume_draft', $resume_draft);
573 $oTemplate->assign('can_edit_as_new', $edit_as_new);
574
575 $oTemplate->assign('mailboxes', sqimap_mailbox_option_array($imapConnection));
576 if (in_array('\\deleted', $aMailbox['PERMANENTFLAGS'],true)) {
577 $delete_url = $base_uri . "src/$where";
578 $oTemplate->assign('can_be_deleted', true);
579 $oTemplate->assign('move_delete_form_action', $base_uri.'src/'.$where);
580 $oTemplate->assign('delete_form_extra', addHidden('mailbox', $aMailbox['NAME'])."\n" .
581 addHidden('msg[0]', $passed_id)."\n" .
582 addHidden('startMessage', $startMessage)."\n" );
583 if (!(isset($passed_ent_id) && $passed_ent_id)) {
584 $oTemplate->assign('can_be_moved', true);
585 $oTemplate->assign('move_form_extra', addHidden('mailbox', $aMailbox['NAME'])."\n" .
586 addHidden('msg[0]', $passed_id)."\n" );
587 $oTemplate->assign('last_move_target', isset($lastTargetMailbox) && !empty($lastTargetMailbox) ? $lastTargetMailbox : '');
588 $oTemplate->assign('can_be_copied', $show_copy_buttons==1);
589 } else {
590 $oTemplate->assign('can_be_moved', false);
591 $oTemplate->assign('move_form_extra', '');
592 $oTemplate->assign('last_move_target', '');
593 $oTemplate->assign('can_be_copied', false);
594 }
595 } else {
596 $oTemplate->assign('can_be_deleted', false);
597 $oTemplate->assign('move_delete_form_action', '');
598 $oTemplate->assign('delete_form_extra', '');
599 $oTemplate->assign('can_be_moved', false);
600 $oTemplate->assign('move_form_extra', '');
601 $oTemplate->assign('last_move_target', '');
602 $oTemplate->assign('can_be_copied', false);
603 }
604
605 if ($nav_on_top) {
606 $oTemplate->display('read_menubar_nav.tpl');
607 $oTemplate->display('read_menubar_buttons.tpl');
608 } else {
609 $oTemplate->display('read_menubar_buttons.tpl');
610 $oTemplate->display('read_menubar_nav.tpl');
611 }
612
613 global $null;
614 do_hook('read_body_menu_bottom', $null);
615 }
616
617 function formatToolbar($mailbox, $passed_id, $passed_ent_id, $message, $color) {
618 global $base_uri, $where, $what, $show_html_default,
619 $oTemplate, $javascript_on, $download_href,
620 $unsafe_image_toggle_href, $unsafe_image_toggle_text;
621
622 $urlMailbox = urlencode($mailbox);
623 $urlPassed_id = urlencode($passed_id);
624 $urlPassed_ent_id = urlencode($passed_ent_id);
625
626 $query_string = 'mailbox=' . $urlMailbox . '&amp;passed_id=' . $urlPassed_id . '&amp;passed_ent_id=' . $urlPassed_ent_id;
627 if (!empty($where)) {
628 $query_string .= '&amp;where=' . urlencode($where);
629 }
630 if (!empty($what)) {
631 $query_string .= '&amp;what=' . urlencode($what);
632 }
633 $url = $base_uri.'src/view_header.php?'.$query_string;
634
635
636 // Build the printer friend link
637 /* hackydiehack */
638 if( !sqgetGlobalVar('view_unsafe_images', $view_unsafe_images, SQ_GET) ) {
639 $view_unsafe_images = false;
640 } else {
641 $view_unsafe_images = true;
642 }
643 $pf_params = '?passed_ent_id=' . $urlPassed_ent_id .
644 '&mailbox=' . $urlMailbox .
645 '&passed_id=' . $urlPassed_id .
646 '&view_unsafe_images='. (bool) $view_unsafe_images .
647 '&show_html_default=' . $show_html_default;
648 $links = array();
649 $links[] = array (
650 'URL' => $url,
651 'Text' => _("View Full Header")
652 );
653 $links[] = array (
654 'URL' => $pf_params,
655 'Text' => _("View Printable Version")
656 );
657 $links[] = array (
658 'URL' => $download_href,
659 'Text' => _("Download this as a file")
660 );
661 $toggle = html_toggle_href($mailbox, $passed_id, $passed_ent_id, $message);
662 if (!empty($toggle)) {
663 $links[] = array (
664 'URL' => $toggle,
665 'Text' => $show_html_default==1 ? _("View as plain text") : _("View as HTML")
666 );
667 }
668 if (!empty($unsafe_image_toggle_href)) {
669 $links[] = array (
670 'URL' => $unsafe_image_toggle_href,
671 'Text' => $unsafe_image_toggle_text
672 );
673 }
674
675 do_hook('read_body_header_right', $links);
676
677 $oTemplate->assign('links', $links);
678
679 return $oTemplate->fetch('read_toolbar.tpl');
680 }
681
682 /***************************/
683 /* Main of read_body.php */
684 /***************************/
685
686 /* get the globals we may need */
687
688 sqgetGlobalVar('delimiter', $delimiter, SQ_SESSION);
689 sqgetGlobalVar('lastTargetMailbox', $lastTargetMailbox, SQ_SESSION);
690 if (!sqgetGlobalVar('messages', $messages, SQ_SESSION) ) {
691 $messages = array();
692 }
693 sqgetGlobalVar('delayed_errors', $delayed_errors, SQ_SESSION);
694 if (is_array($delayed_errors)) {
695 $oErrorHandler->AssignDelayedErrors($delayed_errors);
696 sqsession_unregister("delayed_errors");
697 }
698 /** GET VARS */
699 sqgetGlobalVar('sendreceipt', $sendreceipt, SQ_GET);
700 if (!sqgetGlobalVar('where', $where, SQ_GET) ) {
701 $where = 'right_main.php';
702 }
703 /*
704 * Used as entry key to the list of uid's cached in the mailbox cache
705 * we use the cached uid's to get the next and prev message.
706 */
707 if (!sqgetGlobalVar('what', $what, SQ_GET) ){
708 $what = 0;
709 }
710 if ( sqgetGlobalVar('show_more', $temp, SQ_GET) ) {
711 $show_more = (int) $temp;
712 }
713 if ( sqgetGlobalVar('show_more_cc', $temp, SQ_GET) ) {
714 $show_more_cc = (int) $temp;
715 }
716 if ( sqgetGlobalVar('show_more_bcc', $temp, SQ_GET) ) {
717 $show_more_bcc = (int) $temp;
718 }
719 if ( sqgetGlobalVar('view_hdr', $temp, SQ_GET) ) {
720 $view_hdr = (int) $temp;
721 }
722
723 if ( sqgetGlobalVar('account', $temp, SQ_GET) ) {
724 $iAccount = (int) $temp;
725 } else {
726 $iAccount = 0;
727 }
728
729 /** GET/POST VARS */
730 sqgetGlobalVar('passed_ent_id', $passed_ent_id);
731 sqgetGlobalVar('mailbox', $mailbox);
732
733 if ( sqgetGlobalVar('passed_id', $temp) ) {
734 $passed_id = (int) $temp;
735 }
736 if ( sqgetGlobalVar('sort', $temp) ) {
737 $sort = (int) $temp;
738 }
739 if ( sqgetGlobalVar('startMessage', $temp) ) {
740 $startMessage = (int) $temp;
741 } else {
742 $startMessage = 1;
743 }
744 if(sqgetGlobalVar('show_html_default', $temp)) {
745 $show_html_default = (int) $temp;
746 }
747
748 if(sqgetGlobalVar('view_unsafe_images', $temp)) {
749 $view_unsafe_images = (int) $temp;
750 if($view_unsafe_images == 1) {
751 $show_html_default = 1;
752 }
753 } else {
754 $view_unsafe_images = 0;
755 }
756 /**
757 * Retrieve mailbox cache
758 */
759 sqgetGlobalVar('mailbox_cache',$mailbox_cache,SQ_SESSION);
760
761 /* end of get globals */
762 global $sqimap_capabilities, $lastTargetMailbox;
763
764 $imapConnection = sqimap_login($username, false, $imapServerAddress, $imapPort, 0);
765 $aMailbox = sqm_api_mailbox_select($imapConnection, $iAccount, $mailbox,array('setindex' => $what, 'offset' => $startMessage),array());
766
767
768 /**
769 Start code to set the columns to fetch in case of hitting the next/prev link
770 The reason for this is the fact that the cache can be invalidated which means that the headers
771 to fetch aren't there anymore. Before they got calculated when the messagelist was shown.
772
773 Todo, better central handling of setting the mailbox options so we do not need to do the stuff below
774 */
775
776 /**
777 * Replace From => To in case it concerns a draft or sent folder
778 */
779 $aColumns = array();
780 if (($mailbox == $sent_folder || $mailbox == $draft_folder) &&
781 !in_array(SQM_COL_TO,$index_order)) {
782 $aNewOrder = array(); // nice var name ;)
783 foreach($index_order as $iCol) {
784 if ($iCol == SQM_COL_FROM) {
785 $iCol = SQM_COL_TO;
786 }
787 $aColumns[$iCol] = array();
788 }
789 } else {
790 foreach ($index_order as $iCol) {
791 $aColumns[$iCol] = array();
792 }
793 }
794
795 $aProps = array(
796 'columns' => $aColumns, // columns bound settings
797 'config' => array(
798 'highlight_list' => $message_highlight_list, // row highlighting rules
799 'trash_folder' => $trash_folder,
800 'sent_folder' => $sent_folder,
801 'draft_folder' => $draft_folder));
802
803 calcFetchColumns($aMailbox,$aProps);
804
805 /**
806 End code to set the columns to fetch in case of hitting the next/prev link
807 */
808
809
810
811 /**
812 * Check if cache is still valid, $what contains the key
813 * which gives us acces to the array with uid's. At this moment
814 * 0 is used for a normal message list and search uses 1 as key. This can be
815 * changed / extended in the future.
816 * If on a select of a mailbox we detect that the cache should be invalidated due to
817 * the delete of messages or due to new messages we empty the list with uid's and
818 * that's what we detect below.
819 */
820 if (!is_array($aMailbox['UIDSET'][$what])) {
821 fetchMessageHeaders($imapConnection, $aMailbox);
822 }
823
824 $iSetIndex = $aMailbox['SETINDEX'];
825 $aMailbox['CURRENT_MSG'][$iSetIndex] = $passed_id;
826
827 /**
828 * Update the seen state
829 * and ignore in_array('\\seen',$aMailbox['PERMANENTFLAGS'],true)
830 */
831 if (isset($aMailbox['MSG_HEADERS'][$passed_id]['FLAGS'])) {
832 $aMailbox['MSG_HEADERS'][$passed_id]['FLAGS']['\\seen'] = true;
833 }
834
835 /**
836 * Process Delete from delete-move-next
837 * but only if delete_id was set
838 */
839 if ( sqgetGlobalVar('delete_id', $delete_id, SQ_GET) ) {
840 handleMessageListForm($imapConnection,$aMailbox,$sButton='setDeleted', array($delete_id));
841 }
842
843 /**
844 * $message contains all information about the message
845 * including header and body
846 */
847
848 if (isset($aMailbox['MSG_HEADERS'][$passed_id]['MESSAGE_OBJECT'])) {
849 $message = $aMailbox['MSG_HEADERS'][$passed_id]['MESSAGE_OBJECT'];
850 $FirstTimeSee = !$message->is_seen;
851 } else {
852 $message = sqimap_get_message($imapConnection, $passed_id, $mailbox);
853 $FirstTimeSee = !$message->is_seen;
854 $message->is_seen = true;
855 $aMailbox['MSG_HEADERS'][$passed_id]['MESSAGE_OBJECT'] = $message;
856 }
857 if (isset($passed_ent_id) && $passed_ent_id) {
858 $message = $message->getEntity($passed_ent_id);
859 if ($message->type0 != 'message' && $message->type1 != 'rfc822') {
860 $message = $message->parent;
861 }
862 $read = sqimap_run_command ($imapConnection, "FETCH $passed_id BODY[$passed_ent_id.HEADER]", true, $response, $msg, TRUE);
863 $rfc822_header = new Rfc822Header();
864 $rfc822_header->parseHeader($read);
865 $message->rfc822_header = $rfc822_header;
866 } else if ($message->type0 == 'message' && $message->type1 == 'rfc822' && isset($message->entities[0])) {
867 $read = sqimap_run_command ($imapConnection, "FETCH $passed_id BODY[1.HEADER]", true, $response, $msg, TRUE);
868 $rfc822_header = new Rfc822Header();
869 $rfc822_header->parseHeader($read);
870 $message->rfc822_header = $rfc822_header;
871 } else {
872 $passed_ent_id = 0;
873 }
874 $header = $message->header;
875
876
877 /****************************************/
878 /* Block for handling incoming url vars */
879 /****************************************/
880
881 if (isset($sendreceipt)) {
882 if ( !$message->is_mdnsent ) {
883 $final_recipient = '';
884 if ((isset($identity)) && ($identity != 0)) //Main identity
885 $final_recipient = trim(getPref($data_dir, $username, 'email_address' . $identity, '' ));
886 if ($final_recipient == '' )
887 $final_recipient = trim(getPref($data_dir, $username, 'email_address', '' ));
888 $supportMDN = ServerMDNSupport($aMailbox["PERMANENTFLAGS"]);
889 if ( SendMDN( $mailbox, $passed_id, $final_recipient, $message, $imapConnection ) > 0 && $supportMDN ) {
890 ToggleMDNflag( true, $imapConnection, $mailbox, $passed_id);
891 $message->is_mdnsent = true;
892 $aMailbox['MSG_HEADERS'][$passed_id]['MESSAGE_OBJECT'] = $message;
893 }
894 }
895 }
896 /***********************************************/
897 /* End of block for handling incoming url vars */
898 /***********************************************/
899
900 $messagebody = '';
901 do_hook('read_body_top', $null);
902 if ($show_html_default == 1) {
903 $ent_ar = $message->findDisplayEntity(array());
904 } else {
905 $ent_ar = $message->findDisplayEntity(array(), array('text/plain'));
906 }
907 $cnt = count($ent_ar);
908 for ($i = 0; $i < $cnt; $i++) {
909 $messagebody .= formatBody($imapConnection, $message, $color, $wrap_at, $ent_ar[$i], $passed_id, $mailbox);
910 if ($i != $cnt-1) {
911 $messagebody .= '<hr />';
912 }
913 }
914
915 /**
916 * Write mailbox with updated seen flag information back to cache.
917 */
918 $mailbox_cache[$iAccount.'_'.$aMailbox['NAME']] = $aMailbox;
919 sqsession_register($mailbox_cache,'mailbox_cache');
920 $_SESSION['mailbox_cache'] = $mailbox_cache;
921
922 displayPageHeader($color, $mailbox,'','');
923 formatMenuBar($aMailbox, $passed_id, $passed_ent_id, $message,false);
924 formatEnvheader($aMailbox, $passed_id, $passed_ent_id, $message, $color, $FirstTimeSee);
925
926 $oTemplate->assign('message_body', $messagebody);
927 $oTemplate->display('read_message_body.tpl');
928
929 formatAttachments($message,$ent_ar,$mailbox, $passed_id);
930
931 /* show attached images inline -- if pref'fed so */
932 if ($attachment_common_show_images && is_array($attachment_common_show_images_list)) {
933 $images = array();
934 foreach ($attachment_common_show_images_list as $img) {
935 $imgurl = SM_PATH . 'src/download.php' .
936 '?' .
937 'passed_id=' . urlencode($img['passed_id']) .
938 '&amp;mailbox=' . urlencode($mailbox) .
939 '&amp;ent_id=' . urlencode($img['ent_id']) .
940 '&amp;absolute_dl=true';
941 $a = array();
942 $a['Name'] = $img['name'];
943 $a['DisplayURL'] = $imgurl;
944 $a['DownloadURL'] = $img['download_href'];
945 $images[] = $a;
946 }
947
948 $oTemplate->assign('images', $images);
949 $oTemplate->display('read_display_images_inline.tpl');
950 }
951
952 formatMenuBar($aMailbox, $passed_id, $passed_ent_id, $message, false, FALSE);
953
954 do_hook('read_body_bottom', $null);
955 sqimap_logout($imapConnection);
956 $oTemplate->display('footer.tpl');
957 ?>