program/steps/mail/show.inc

   1 <?php
   2
   3 /*
   4  +-----------------------------------------------------------------------+
   5  | program/steps/mail/show.inc                                           |
   6  |                                                                       |
   7  | This file is part of the RoundCube Webmail client                     |
   8  | Copyright (C) 2005-2008, RoundCube Dev. - Switzerland                 |
   9  | Licensed under the GNU GPL                                            |
  10  |                                                                       |
  11  | PURPOSE:                                                              |
  12  |   Display a mail message similar as a usual mail application does     |
  13  |                                                                       |
  14  +-----------------------------------------------------------------------+
  15  | Author: Thomas Bruederli <roundcube@gmail.com>                        |
  16  +-----------------------------------------------------------------------+
  17
  18  $Id: show.inc 1400 2008-05-17 17:46:43Z thomasb $
  19
  20 */
  21
  22 $PRINT_MODE = $RCMAIL->action=='print' ? TRUE : FALSE;
  23
  24 // similar code as in program/steps/mail/get.inc
  25 if ($_GET['_uid']) {
  26   $MESSAGE = new rcube_message(get_input_value('_uid', RCUBE_INPUT_GET));
  27
  28   // set message charset as default
  29   if (!empty($MESSAGE->headers->charset))
  30     $IMAP->set_charset($MESSAGE->headers->charset);
  31
  32   // go back to list if message not found (wrong UID)
  33   if (empty($MESSAGE->headers)) {
  34     $OUTPUT->show_message('messageopenerror', 'error');
  35     if ($RCMAIL->action=='preview' && template_exists('messagepreview'))
  36         $OUTPUT->send('messagepreview');
  37     else {
  38       $RCMAIL->action = 'list';
  39       return;
  40     }
  41   }
  42
  43   $mbox_name = $IMAP->get_mailbox_name();
  44
  45   // calculate Etag for this request
  46   $etag = md5($MESSAGE->uid.$mbox_name.session_id().intval($MESSAGE->headers->mdn_sent).intval($MESSAGE->is_safe).intval($PRINT_MODE));
  47
  48   // allow caching, unless remote images are present
  49   if ((bool)$MESSAGE->is_safe)
  50     send_nocacheing_headers();
  51   else if (empty($CONFIG['devel_mode']))
  52     send_modified_header($_SESSION['login_time'], $etag, !$MESSAGE->headers->seen);
  53
  54   $OUTPUT->set_pagetitle($MESSAGE->subject);
  55
  56   // mark message as read
  57   if (!$MESSAGE->headers->seen)
  58   {
  59     $marked = $IMAP->set_flag($MESSAGE->uid, 'SEEN');
  60     if($RCMAIL->action == 'preview' && $marked != -1)
  61     {
  62       $OUTPUT->command('set_unread_count_from_preview', $mbox_name, $IMAP->messagecount($mbox_name, 'UNSEEN'), ($mbox_name == 'INBOX'));
  63       $OUTPUT->command('mark_as_read_from_preview', $MESSAGE->uid);
  64     }
  65   }
  66
  67   // give message uid to the client
  68   $OUTPUT->set_env('uid', $MESSAGE->uid);
  69   $OUTPUT->set_env('safemode', $MESSAGE->is_safe);
  70
  71   // check for unset disposition notification
  72   if ($MESSAGE->headers->mdn_to && !$MESSAGE->headers->mdn_sent &&
  73       $mbox_name != $CONFIG['drafts_mbox'] && $mbox_name != $CONFIG['sent_mbox'])
  74   {
  75     if (intval($CONFIG['mdn_requests']) === 1)
  76     {
  77       if (rcmail_send_mdn($MESSAGE->uid))
  78         $OUTPUT->show_message('receiptsent', 'confirmation');
  79     }
  80     else if (empty($CONFIG['mdn_requests']))
  81     {
  82       rcube_add_label('mdnrequest');
  83       $OUTPUT->set_env('mdn_request', true);
  84     }
  85   }
  86
  87
  88   $next = $prev = $first = $last = -1;
  89   // get previous, first, next and last message UID
  90   if ((!($_SESSION['sort_col'] == 'date' && $_SESSION['sort_order'] == 'DESC') &&
  91       $IMAP->get_capability('sort')) || !empty($_REQUEST['_search']))
  92     {
  93     // Only if we use custom sorting
  94     $a_msg_index = $IMAP->message_index(NULL, $_SESSION['sort_col'], $_SESSION['sort_order']);
  95
  96     $MESSAGE->index = array_search((string)$MESSAGE->uid, $a_msg_index, TRUE);
  97     $prev = isset($a_msg_index[$MESSAGE->index-1]) ? $a_msg_index[$MESSAGE->index-1] : -1 ;
  98     $first = count($a_msg_index)>0 ? $a_msg_index[0] : -1;
  99     $next = isset($a_msg_index[$MESSAGE->index+1]) ? $a_msg_index[$MESSAGE->index+1] : -1 ;
 100     $last = count($a_msg_index)>0 ? $a_msg_index[count($a_msg_index)-1] : -1;
 101     }
 102   else
 103     {
 104     // this assumes that we are sorted by date_DESC
 105     $seq = $IMAP->get_id($MESSAGE->uid);
 106     $prev = $IMAP->get_uid($seq + 1);
 107     $first = $IMAP->get_uid($IMAP->messagecount());
 108     $next = $IMAP->get_uid($seq - 1);
 109     $last = $IMAP->get_uid(1);
 110     $MESSAGE->index = $IMAP->messagecount() - $seq;
 111     }
 112
 113   if ($prev > 0)
 114     $OUTPUT->set_env('prev_uid', $prev);
 115   if ($first >0)
 116     $OUTPUT->set_env('first_uid', $first);
 117   if ($next > 0)
 118     $OUTPUT->set_env('next_uid', $next);
 119   if ($last >0)
 120     $OUTPUT->set_env('last_uid', $last);
 121   }
 122
 123
 124
 125 function rcmail_message_attachments($attrib)
 126 {
 127   global $PRINT_MODE, $MESSAGE;
 128
 129   $out = $ol = '';
 130
 131   if (sizeof($MESSAGE->attachments)) {
 132     foreach ($MESSAGE->attachments as $attach_prop) {
 133       if ($PRINT_MODE) {
 134         $ol .= html::tag('li', null, sprintf("%s (%s)", Q($attach_prop->filename), Q(show_bytes($attach_prop->size))));
 135       }
 136       else {
 137         $ol .= html::tag('li', null,
 138           html::a(array(
 139             'href' => $MESSAGE->get_part_url($attach_prop->mime_id),
 140             'onclick' => sprintf(
 141               'return %s.command(\'load-attachment\',{part:\'%s\', mimetype:\'%s\'},this)',
 142               JS_OBJECT_NAME,
 143               $attach_prop->mime_id,
 144               $attach_prop->mimetype),
 145             ),
 146             Q($attach_prop->filename)));
 147       }
 148     }
 149
 150     $out = html::tag('ul', $attrib, $ol, html::$common_attrib);
 151   }
 152
 153   return $out;
 154 }
 155
 156
 157
 158 function rcmail_remote_objects_msg($attrib)
 159   {
 160   global $CONFIG, $OUTPUT;
 161
 162   if (!$attrib['id'])
 163     $attrib['id'] = 'rcmremoteobjmsg';
 164
 165   // allow the following attributes to be added to the <div> tag
 166   $attrib_str = create_attrib_string($attrib, array('style', 'class', 'id'));
 167   $out = '<div' . $attrib_str . ">";
 168
 169   $out .= sprintf('%s&nbsp;<a href="#loadimages" onclick="%s.command(\'load-images\')">%s</a>',
 170                   Q(rcube_label('blockedimages')),
 171                   JS_OBJECT_NAME,
 172                   Q(rcube_label('showimages')));
 173
 174   $out .= '</div>';
 175
 176   $OUTPUT->add_gui_object('remoteobjectsmsg', $attrib['id']);
 177   return $out;
 178   }
 179
 180
 181 $OUTPUT->add_handlers(array(
 182   'messageattachments' => 'rcmail_message_attachments',
 183   'blockedobjects' => 'rcmail_remote_objects_msg'));
 184
 185
 186 if ($RCMAIL->action=='print' && template_exists('printmessage'))
 187   $OUTPUT->send('printmessage');
 188 else if ($RCMAIL->action=='preview' && template_exists('messagepreview'))
 189     $OUTPUT->send('messagepreview');
 190 else
 191   $OUTPUT->send('message');
 192 ?>