64a8ae421c1a5e23e52b3b2ae151e4a921f00447
[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 do_hook('read_body_menu_bottom');
614 }
615
616 function formatToolbar($mailbox, $passed_id, $passed_ent_id, $message, $color) {
617 global $base_uri, $where, $what, $show_html_default,
618 $oTemplate, $javascript_on, $download_href,
619 $unsafe_image_toggle_href, $unsafe_image_toggle_text;
620
621 $urlMailbox = urlencode($mailbox);
622 $urlPassed_id = urlencode($passed_id);
623 $urlPassed_ent_id = urlencode($passed_ent_id);
624
625 $query_string = 'mailbox=' . $urlMailbox . '&amp;passed_id=' . $urlPassed_id . '&amp;passed_ent_id=' . $urlPassed_ent_id;
626 if (!empty($where)) {
627 $query_string .= '&amp;where=' . urlencode($where);
628 }
629 if (!empty($what)) {
630 $query_string .= '&amp;what=' . urlencode($what);
631 }
632 $url = $base_uri.'src/view_header.php?'.$query_string;
633
634
635 // Build the printer friend link
636 /* hackydiehack */
637 if( !sqgetGlobalVar('view_unsafe_images', $view_unsafe_images, SQ_GET) ) {
638 $view_unsafe_images = false;
639 } else {
640 $view_unsafe_images = true;
641 }
642 $pf_params = '?passed_ent_id=' . $urlPassed_ent_id .
643 '&mailbox=' . $urlMailbox .
644 '&passed_id=' . $urlPassed_id .
645 '&view_unsafe_images='. (bool) $view_unsafe_images .
646 '&show_html_default=' . $show_html_default;
647 $links = array();
648 $links[] = array (
649 'URL' => $url,
650 'Text' => _("View Full Header")
651 );
652 $links[] = array (
653 'URL' => $pf_params,
654 'Text' => _("View Printable Version")
655 );
656 $links[] = array (
657 'URL' => $download_href,
658 'Text' => _("Download this as a file")
659 );
660 $toggle = html_toggle_href($mailbox, $passed_id, $passed_ent_id, $message);
661 if (!empty($toggle)) {
662 $links[] = array (
663 'URL' => $toggle,
664 'Text' => $show_html_default==1 ? _("View as plain text") : _("View as HTML")
665 );
666 }
667 if (!empty($unsafe_image_toggle_href)) {
668 $links[] = array (
669 'URL' => $unsafe_image_toggle_href,
670 'Text' => $unsafe_image_toggle_text
671 );
672 }
673
674 do_hook('read_body_header_right', $links);
675
676 $oTemplate->assign('links', $links);
677
678 return $oTemplate->fetch('read_toolbar.tpl');
679 }
680
681 /***************************/
682 /* Main of read_body.php */
683 /***************************/
684
685 /* get the globals we may need */
686
687 sqgetGlobalVar('delimiter', $delimiter, SQ_SESSION);
688 sqgetGlobalVar('lastTargetMailbox', $lastTargetMailbox, SQ_SESSION);
689 if (!sqgetGlobalVar('messages', $messages, SQ_SESSION) ) {
690 $messages = array();
691 }
692 sqgetGlobalVar('delayed_errors', $delayed_errors, SQ_SESSION);
693 if (is_array($delayed_errors)) {
694 $oErrorHandler->AssignDelayedErrors($delayed_errors);
695 sqsession_unregister("delayed_errors");
696 }
697 /** GET VARS */
698 sqgetGlobalVar('sendreceipt', $sendreceipt, SQ_GET);
699 if (!sqgetGlobalVar('where', $where, SQ_GET) ) {
700 $where = 'right_main.php';
701 }
702 /*
703 * Used as entry key to the list of uid's cached in the mailbox cache
704 * we use the cached uid's to get the next and prev message.
705 */
706 if (!sqgetGlobalVar('what', $what, SQ_GET) ){
707 $what = 0;
708 }
709 if ( sqgetGlobalVar('show_more', $temp, SQ_GET) ) {
710 $show_more = (int) $temp;
711 }
712 if ( sqgetGlobalVar('show_more_cc', $temp, SQ_GET) ) {
713 $show_more_cc = (int) $temp;
714 }
715 if ( sqgetGlobalVar('show_more_bcc', $temp, SQ_GET) ) {
716 $show_more_bcc = (int) $temp;
717 }
718 if ( sqgetGlobalVar('view_hdr', $temp, SQ_GET) ) {
719 $view_hdr = (int) $temp;
720 }
721
722 if ( sqgetGlobalVar('account', $temp, SQ_GET) ) {
723 $iAccount = (int) $temp;
724 } else {
725 $iAccount = 0;
726 }
727
728 /** GET/POST VARS */
729 sqgetGlobalVar('passed_ent_id', $passed_ent_id);
730 sqgetGlobalVar('mailbox', $mailbox);
731
732 if ( sqgetGlobalVar('passed_id', $temp) ) {
733 $passed_id = (int) $temp;
734 }
735 if ( sqgetGlobalVar('sort', $temp) ) {
736 $sort = (int) $temp;
737 }
738 if ( sqgetGlobalVar('startMessage', $temp) ) {
739 $startMessage = (int) $temp;
740 } else {
741 $startMessage = 1;
742 }
743 if(sqgetGlobalVar('show_html_default', $temp)) {
744 $show_html_default = (int) $temp;
745 }
746
747 if(sqgetGlobalVar('view_unsafe_images', $temp)) {
748 $view_unsafe_images = (int) $temp;
749 if($view_unsafe_images == 1) {
750 $show_html_default = 1;
751 }
752 } else {
753 $view_unsafe_images = 0;
754 }
755 /**
756 * Retrieve mailbox cache
757 */
758 sqgetGlobalVar('mailbox_cache',$mailbox_cache,SQ_SESSION);
759
760 /* end of get globals */
761 global $sqimap_capabilities, $lastTargetMailbox;
762
763 $imapConnection = sqimap_login($username, false, $imapServerAddress, $imapPort, 0);
764 $aMailbox = sqm_api_mailbox_select($imapConnection, $iAccount, $mailbox,array('setindex' => $what, 'offset' => $startMessage),array());
765
766
767 /**
768 Start code to set the columns to fetch in case of hitting the next/prev link
769 The reason for this is the fact that the cache can be invalidated which means that the headers
770 to fetch aren't there anymore. Before they got calculated when the messagelist was shown.
771
772 Todo, better central handling of setting the mailbox options so we do not need to do the stuff below
773 */
774
775 /**
776 * Replace From => To in case it concerns a draft or sent folder
777 */
778 $aColumns = array();
779 if (($mailbox == $sent_folder || $mailbox == $draft_folder) &&
780 !in_array(SQM_COL_TO,$index_order)) {
781 $aNewOrder = array(); // nice var name ;)
782 foreach($index_order as $iCol) {
783 if ($iCol == SQM_COL_FROM) {
784 $iCol = SQM_COL_TO;
785 }
786 $aColumns[$iCol] = array();
787 }
788 } else {
789 foreach ($index_order as $iCol) {
790 $aColumns[$iCol] = array();
791 }
792 }
793
794 $aProps = array(
795 'columns' => $aColumns, // columns bound settings
796 'config' => array(
797 'highlight_list' => $message_highlight_list, // row highlighting rules
798 'trash_folder' => $trash_folder,
799 'sent_folder' => $sent_folder,
800 'draft_folder' => $draft_folder));
801
802 calcFetchColumns($aMailbox,$aProps);
803
804 /**
805 End code to set the columns to fetch in case of hitting the next/prev link
806 */
807
808
809
810 /**
811 * Check if cache is still valid, $what contains the key
812 * which gives us acces to the array with uid's. At this moment
813 * 0 is used for a normal message list and search uses 1 as key. This can be
814 * changed / extended in the future.
815 * If on a select of a mailbox we detect that the cache should be invalidated due to
816 * the delete of messages or due to new messages we empty the list with uid's and
817 * that's what we detect below.
818 */
819 if (!is_array($aMailbox['UIDSET'][$what])) {
820 fetchMessageHeaders($imapConnection, $aMailbox);
821 }
822
823 $iSetIndex = $aMailbox['SETINDEX'];
824 $aMailbox['CURRENT_MSG'][$iSetIndex] = $passed_id;
825
826 /**
827 * Update the seen state
828 * and ignore in_array('\\seen',$aMailbox['PERMANENTFLAGS'],true)
829 */
830 if (isset($aMailbox['MSG_HEADERS'][$passed_id]['FLAGS'])) {
831 $aMailbox['MSG_HEADERS'][$passed_id]['FLAGS']['\\seen'] = true;
832 }
833
834 /**
835 * Process Delete from delete-move-next
836 * but only if delete_id was set
837 */
838 if ( sqgetGlobalVar('delete_id', $delete_id, SQ_GET) ) {
839 handleMessageListForm($imapConnection,$aMailbox,$sButton='setDeleted', array($delete_id));
840 }
841
842 /**
843 * $message contains all information about the message
844 * including header and body
845 */
846
847 if (isset($aMailbox['MSG_HEADERS'][$passed_id]['MESSAGE_OBJECT'])) {
848 $message = $aMailbox['MSG_HEADERS'][$passed_id]['MESSAGE_OBJECT'];
849 $FirstTimeSee = !$message->is_seen;
850 } else {
851 $message = sqimap_get_message($imapConnection, $passed_id, $mailbox);
852 $FirstTimeSee = !$message->is_seen;
853 $message->is_seen = true;
854 $aMailbox['MSG_HEADERS'][$passed_id]['MESSAGE_OBJECT'] = $message;
855 }
856 if (isset($passed_ent_id) && $passed_ent_id) {
857 $message = $message->getEntity($passed_ent_id);
858 if ($message->type0 != 'message' && $message->type1 != 'rfc822') {
859 $message = $message->parent;
860 }
861 $read = sqimap_run_command ($imapConnection, "FETCH $passed_id BODY[$passed_ent_id.HEADER]", true, $response, $msg, TRUE);
862 $rfc822_header = new Rfc822Header();
863 $rfc822_header->parseHeader($read);
864 $message->rfc822_header = $rfc822_header;
865 } else if ($message->type0 == 'message' && $message->type1 == 'rfc822' && isset($message->entities[0])) {
866 $read = sqimap_run_command ($imapConnection, "FETCH $passed_id BODY[1.HEADER]", true, $response, $msg, TRUE);
867 $rfc822_header = new Rfc822Header();
868 $rfc822_header->parseHeader($read);
869 $message->rfc822_header = $rfc822_header;
870 } else {
871 $passed_ent_id = 0;
872 }
873 $header = $message->header;
874
875
876 /****************************************/
877 /* Block for handling incoming url vars */
878 /****************************************/
879
880 if (isset($sendreceipt)) {
881 if ( !$message->is_mdnsent ) {
882 $final_recipient = '';
883 if ((isset($identity)) && ($identity != 0)) //Main identity
884 $final_recipient = trim(getPref($data_dir, $username, 'email_address' . $identity, '' ));
885 if ($final_recipient == '' )
886 $final_recipient = trim(getPref($data_dir, $username, 'email_address', '' ));
887 $supportMDN = ServerMDNSupport($aMailbox["PERMANENTFLAGS"]);
888 if ( SendMDN( $mailbox, $passed_id, $final_recipient, $message, $imapConnection ) > 0 && $supportMDN ) {
889 ToggleMDNflag( true, $imapConnection, $mailbox, $passed_id);
890 $message->is_mdnsent = true;
891 $aMailbox['MSG_HEADERS'][$passed_id]['MESSAGE_OBJECT'] = $message;
892 }
893 }
894 }
895 /***********************************************/
896 /* End of block for handling incoming url vars */
897 /***********************************************/
898
899 $messagebody = '';
900 do_hook('read_body_top');
901 if ($show_html_default == 1) {
902 $ent_ar = $message->findDisplayEntity(array());
903 } else {
904 $ent_ar = $message->findDisplayEntity(array(), array('text/plain'));
905 }
906 $cnt = count($ent_ar);
907 for ($i = 0; $i < $cnt; $i++) {
908 $messagebody .= formatBody($imapConnection, $message, $color, $wrap_at, $ent_ar[$i], $passed_id, $mailbox);
909 if ($i != $cnt-1) {
910 $messagebody .= '<hr />';
911 }
912 }
913
914 /**
915 * Write mailbox with updated seen flag information back to cache.
916 */
917 $mailbox_cache[$iAccount.'_'.$aMailbox['NAME']] = $aMailbox;
918 sqsession_register($mailbox_cache,'mailbox_cache');
919 $_SESSION['mailbox_cache'] = $mailbox_cache;
920
921 displayPageHeader($color, $mailbox,'','');
922 formatMenuBar($aMailbox, $passed_id, $passed_ent_id, $message,false);
923 formatEnvheader($aMailbox, $passed_id, $passed_ent_id, $message, $color, $FirstTimeSee);
924
925 $oTemplate->assign('message_body', $messagebody);
926 $oTemplate->display('read_message_body.tpl');
927
928 formatAttachments($message,$ent_ar,$mailbox, $passed_id);
929
930 /* show attached images inline -- if pref'fed so */
931 if ($attachment_common_show_images && is_array($attachment_common_show_images_list)) {
932 $images = array();
933 foreach ($attachment_common_show_images_list as $img) {
934 $imgurl = SM_PATH . 'src/download.php' .
935 '?' .
936 'passed_id=' . urlencode($img['passed_id']) .
937 '&amp;mailbox=' . urlencode($mailbox) .
938 '&amp;ent_id=' . urlencode($img['ent_id']) .
939 '&amp;absolute_dl=true';
940 $a = array();
941 $a['Name'] = $img['name'];
942 $a['DisplayURL'] = $imgurl;
943 $a['DownloadURL'] = $img['download_href'];
944 $images[] = $a;
945 }
946
947 $oTemplate->assign('images', $images);
948 $oTemplate->display('read_display_images_inline.tpl');
949 }
950
951 formatMenuBar($aMailbox, $passed_id, $passed_ent_id, $message, false, FALSE);
952
953 do_hook('read_body_bottom');
954 sqimap_logout($imapConnection);
955 $oTemplate->display('footer.tpl');
956 ?>