| | |
| | | // always instantiate storage object (but not connect to server yet) |
| | | $RCMAIL->storage_init(); |
| | | |
| | | // set imap properties and session vars |
| | | if (strlen(trim($mbox = rcube_utils::get_input_value('_mbox', rcube_utils::INPUT_GPC, true)))) { |
| | | $RCMAIL->storage->set_folder(($_SESSION['mbox'] = $mbox)); |
| | | } |
| | | else if ($RCMAIL->storage) { |
| | | $_SESSION['mbox'] = $RCMAIL->storage->get_folder(); |
| | | } |
| | | |
| | | if (!empty($_GET['_page'])) { |
| | | $RCMAIL->storage->set_page(($_SESSION['page'] = intval($_GET['_page']))); |
| | | } |
| | | |
| | | $a_threading = $RCMAIL->config->get('message_threading', array()); |
| | | $message_sort_col = $RCMAIL->config->get('message_sort_col'); |
| | | $message_sort_order = $RCMAIL->config->get('message_sort_order'); |
| | | |
| | | // set default sort col/order to session |
| | | if (!isset($_SESSION['sort_col'])) { |
| | | $_SESSION['sort_col'] = $message_sort_col ? $message_sort_col : ''; |
| | | } |
| | | if (!isset($_SESSION['sort_order'])) { |
| | | $_SESSION['sort_order'] = strtoupper($message_sort_order) == 'ASC' ? 'ASC' : 'DESC'; |
| | | } |
| | | |
| | | // set threads mode |
| | | if (isset($_GET['_threads'])) { |
| | | if ($_GET['_threads']) |
| | | $a_threading[$_SESSION['mbox']] = true; |
| | | else |
| | | unset($a_threading[$_SESSION['mbox']]); |
| | | |
| | | $RCMAIL->user->save_prefs(array('message_threading' => $a_threading)); |
| | | } |
| | | $RCMAIL->storage->set_threading($a_threading[$_SESSION['mbox']]); |
| | | // init environment - set current folder, page, list mode |
| | | rcmail_init_env(); |
| | | |
| | | // set message set for search result |
| | | if (!empty($_REQUEST['_search']) && isset($_SESSION['search']) |
| | |
| | | } |
| | | |
| | | // remove mbox part from _uid |
| | | if (($_uid = get_input_value('_uid', RCUBE_INPUT_GPC)) && preg_match('/^\d+-[^,]+$/', $_uid)) { |
| | | if (($_uid = rcube_utils::get_input_value('_uid', RCUBE_INPUT_GPC)) && !is_array($_uid) && preg_match('/^\d+-.+/', $_uid)) { |
| | | list($_uid, $mbox) = explode('-', $_uid, 2); |
| | | if (isset($_GET['_uid'])) $_GET['_uid'] = $_uid; |
| | | if (isset($_POST['_uid'])) $_POST['_uid'] = $_uid; |
| | |
| | | } |
| | | } |
| | | |
| | | if (!empty($_SESSION['browser_caps']) && !$OUTPUT->ajax_call) { |
| | | $OUTPUT->set_env('browser_capabilities', $_SESSION['browser_caps']); |
| | | } |
| | | |
| | | // set main env variables, labels and page title |
| | | if (empty($RCMAIL->action) || $RCMAIL->action == 'list') { |
| | |
| | | $RCMAIL->set_env_config(array('delete_junk', 'flag_for_deletion', 'read_when_deleted', |
| | | 'skip_deleted', 'display_next', 'message_extwin', 'compose_extwin', 'forward_attachment')); |
| | | |
| | | if (!empty($_SESSION['browser_caps'])) { |
| | | $OUTPUT->set_env('browser_capabilities', $_SESSION['browser_caps']); |
| | | } |
| | | |
| | | if (!$OUTPUT->ajax_call) { |
| | | $OUTPUT->add_label('checkingmail', 'deletemessage', 'movemessagetotrash', |
| | | 'movingmessage', 'copyingmessage', 'deletingmessage', 'markingmessage', |
| | | 'copy', 'move', 'quota', 'replyall', 'replylist'); |
| | | 'copy', 'move', 'quota', 'replyall', 'replylist', 'stillsearching', |
| | | 'flagged', 'unflagged', 'unread', 'deleted', 'replied', 'forwarded', |
| | | 'priority', 'withattachment'); |
| | | } |
| | | |
| | | $pagetitle = $RCMAIL->localize_foldername($RCMAIL->storage->mod_folder($mbox_name), true); |
| | | $pagetitle = $RCMAIL->localize_foldername($mbox_name, true); |
| | | $pagetitle = str_replace($delimiter, " \xC2\xBB ", $pagetitle); |
| | | |
| | | $OUTPUT->set_pagetitle($pagetitle); |
| | |
| | | 'group-expand' => 'autocomplete.inc', |
| | | )); |
| | | |
| | | |
| | | /** |
| | | * Sets storage properties and session |
| | | */ |
| | | function rcmail_init_env() |
| | | { |
| | | global $RCMAIL; |
| | | |
| | | $a_threading = $RCMAIL->config->get('message_threading', array()); |
| | | $message_sort_col = $RCMAIL->config->get('message_sort_col'); |
| | | $message_sort_order = $RCMAIL->config->get('message_sort_order'); |
| | | |
| | | // set imap properties and session vars |
| | | if (!strlen($mbox = rcube_utils::get_input_value('_mbox', rcube_utils::INPUT_GPC, true))) { |
| | | $mbox = strlen($_SESSION['mbox']) ? $_SESSION['mbox'] : 'INBOX'; |
| | | } |
| | | if (!($page = intval($_GET['_page']))) { |
| | | $page = $_SESSION['page'] ? $_SESSION['page'] : 1; |
| | | } |
| | | |
| | | $RCMAIL->storage->set_folder($_SESSION['mbox'] = $mbox); |
| | | $RCMAIL->storage->set_page($_SESSION['page'] = $page); |
| | | |
| | | // set default sort col/order to session |
| | | if (!isset($_SESSION['sort_col'])) { |
| | | $_SESSION['sort_col'] = $message_sort_col ? $message_sort_col : ''; |
| | | } |
| | | if (!isset($_SESSION['sort_order'])) { |
| | | $_SESSION['sort_order'] = strtoupper($message_sort_order) == 'ASC' ? 'ASC' : 'DESC'; |
| | | } |
| | | |
| | | // set threads mode |
| | | if (isset($_GET['_threads'])) { |
| | | if ($_GET['_threads']) { |
| | | // re-set current page number when listing mode changes |
| | | if (!$a_threading[$_SESSION['mbox']]) { |
| | | $RCMAIL->storage->set_page($_SESSION['page'] = 1); |
| | | } |
| | | |
| | | $a_threading[$_SESSION['mbox']] = true; |
| | | } |
| | | else { |
| | | // re-set current page number when listing mode changes |
| | | if ($a_threading[$_SESSION['mbox']]) { |
| | | $RCMAIL->storage->set_page($_SESSION['page'] = 1); |
| | | } |
| | | |
| | | unset($a_threading[$_SESSION['mbox']]); |
| | | } |
| | | |
| | | $RCMAIL->user->save_prefs(array('message_threading' => $a_threading)); |
| | | } |
| | | |
| | | $RCMAIL->storage->set_threading($a_threading[$_SESSION['mbox']]); |
| | | } |
| | | |
| | | /** |
| | | * Returns default search mods |
| | |
| | | $OUTPUT->command('select_folder', ''); |
| | | } |
| | | |
| | | $OUTPUT->set_env('multifolder_listing', $multifolder); |
| | | |
| | | if (empty($a_headers)) { |
| | | return; |
| | | } |
| | |
| | | $a_sort_cols = array('subject', 'date', 'from', 'to', 'fromto', 'size', 'cc'); |
| | | |
| | | if (!empty($attrib['optionsmenuicon'])) { |
| | | $onclick = 'return ' . rcmail_output::JS_OBJECT_NAME . ".command('menu-open', 'messagelistmenu')"; |
| | | if ($attrib['optionsmenuicon'] === true || $attrib['optionsmenuicon'] == 'true') |
| | | $list_menu = html::div(array('onclick' => $onclick, 'class' => 'listmenu', |
| | | 'id' => 'listmenulink', 'title' => $RCMAIL->gettext('listoptions'))); |
| | | else |
| | | $list_menu = html::a(array('href' => '#', 'onclick' => $onclick), |
| | | html::img(array('src' => $skin_path . $attrib['optionsmenuicon'], |
| | | 'id' => 'listmenulink', 'title' => $RCMAIL->gettext('listoptions')))); |
| | | $onclick = 'return ' . rcmail_output::JS_OBJECT_NAME . ".command('menu-open', 'messagelistmenu', this, event)"; |
| | | $inner = $RCMAIL->gettext('listoptions'); |
| | | if (is_string($attrib['optionsmenuicon']) && $attrib['optionsmenuicon'] != 'true') { |
| | | $inner = html::img(array('src' => $skin_path . $attrib['optionsmenuicon'], 'alt' => $RCMAIL->gettext('listoptions'))); |
| | | } |
| | | $list_menu = html::a(array( |
| | | 'href' => '#list-options', |
| | | 'onclick' => $onclick, |
| | | 'class' => 'listmenu', |
| | | 'id' => 'listmenulink', |
| | | 'title' => $RCMAIL->gettext('listoptions'), |
| | | 'tabindex' => '0', |
| | | ), $inner); |
| | | } |
| | | else { |
| | | $list_menu = ''; |
| | |
| | | // get column name |
| | | switch ($col) { |
| | | case 'flag': |
| | | $col_name = html::span('flagged', ' '); |
| | | $col_name = html::span('flagged', $RCMAIL->gettext('flagged')); |
| | | break; |
| | | case 'attachment': |
| | | case 'priority': |
| | | $col_name = html::span($col, $RCMAIL->gettext($col)); |
| | | break; |
| | | case 'status': |
| | | $col_name = html::span($col, ' '); |
| | | $col_name = html::span($col, $RCMAIL->gettext('readstatus')); |
| | | break; |
| | | case 'threads': |
| | | $col_name = $list_menu; |
| | |
| | | |
| | | // plaintext postprocessing |
| | | if ($part->ctype_secondary == 'plain') { |
| | | if ($part->ctype_secondary == 'plain' && $part->ctype_parameters['format'] == 'flowed') { |
| | | $body = rcube_mime::unfold_flowed($body); |
| | | } |
| | | |
| | | $body = rcmail_plain_body($body); |
| | | $body = rcmail_plain_body($body, $part->ctype_parameters['format'] == 'flowed'); |
| | | } |
| | | |
| | | // allow post-processing of the message body |
| | | $data = $RCMAIL->plugins->exec_hook('message_part_after', |
| | | array('type' => $part->ctype_secondary, 'body' => $body, 'id' => $part->mime_id) + $data); |
| | | |
| | | return $data['type'] == 'html' ? $data['body'] : html::tag('pre', array(), $data['body']); |
| | | return $data['body']; |
| | | } |
| | | |
| | | /** |
| | | * Handle links and citation marks in plain text message |
| | | * |
| | | * @param string Plain text string |
| | | * @param boolean Set to True if the source text is in format=flowed |
| | | * |
| | | * @return string Formatted HTML string |
| | | */ |
| | | function rcmail_plain_body($body) |
| | | function rcmail_plain_body($body, $flowed = false) |
| | | { |
| | | global $RCMAIL; |
| | | |
| | | // make links and email-addresses clickable |
| | | $attribs = array('link_attribs' => array('rel' => 'noreferrer', 'target' => '_blank')); |
| | | $replacer = new rcmail_string_replacer($attribs); |
| | | |
| | | // search for patterns like links and e-mail addresses and replace with tokens |
| | | $body = $replacer->replace($body); |
| | | |
| | | // split body into single lines |
| | | $body = preg_split('/\r?\n/', $body); |
| | | $quote_level = 0; |
| | | $last = -1; |
| | | |
| | | // find/mark quoted lines... |
| | | for ($n=0, $cnt=count($body); $n < $cnt; $n++) { |
| | | if ($body[$n][0] == '>' && preg_match('/^(>+ {0,1})+/', $body[$n], $regs)) { |
| | | $q = substr_count($regs[0], '>'); |
| | | $body[$n] = substr($body[$n], strlen($regs[0])); |
| | | |
| | | if ($q > $quote_level) { |
| | | $body[$n] = $replacer->get_replacement($replacer->add( |
| | | str_repeat('<blockquote>', $q - $quote_level))) . $body[$n]; |
| | | $last = $n; |
| | | } |
| | | else if ($q < $quote_level) { |
| | | $body[$n] = $replacer->get_replacement($replacer->add( |
| | | str_repeat('</blockquote>', $quote_level - $q))) . $body[$n]; |
| | | $last = $n; |
| | | } |
| | | } |
| | | else { |
| | | $q = 0; |
| | | if ($quote_level > 0) |
| | | $body[$n] = $replacer->get_replacement($replacer->add( |
| | | str_repeat('</blockquote>', $quote_level))) . $body[$n]; |
| | | } |
| | | |
| | | $quote_level = $q; |
| | | } |
| | | |
| | | $body = join("\n", $body); |
| | | |
| | | // quote plain text (don't use rcube::Q() here, to display entities "as is") |
| | | $table = get_html_translation_table(HTML_SPECIALCHARS); |
| | | unset($table['?']); |
| | | $body = strtr($body, $table); |
| | | |
| | | // colorize signature (up to <sig_max_lines> lines) |
| | | $len = strlen($body); |
| | | $sig_max_lines = $RCMAIL->config->get('sig_max_lines', 15); |
| | | |
| | | while (($sp = strrpos($body, "-- \n", $sp ? -$len+$sp-1 : 0)) !== false) { |
| | | if ($sp == 0 || $body[$sp-1] == "\n") { |
| | | // do not touch blocks with more that X lines |
| | | if (substr_count($body, "\n", $sp) < $sig_max_lines) { |
| | | $body = substr($body, 0, max(0, $sp)) |
| | | . '<span class="sig">'.substr($body, $sp).'</span>'; |
| | | } |
| | | |
| | | break; |
| | | } |
| | | } |
| | | |
| | | // insert url/mailto links and citation tags |
| | | $body = $replacer->resolve($body); |
| | | $options = array('flowed' => $flowed, 'wrap' => !$flowed); |
| | | $text2html = new rcube_text2html($body, false, $options); |
| | | $body = $text2html->get_html(); |
| | | |
| | | return $body; |
| | | } |
| | |
| | | $plugin = $RCMAIL->plugins->exec_hook('message_headers_output', array( |
| | | 'output' => $output_headers, |
| | | 'headers' => $headers_obj, |
| | | 'exclude' => $exclude_headers |
| | | 'exclude' => $exclude_headers, // readonly |
| | | 'folder' => $MESSAGE->folder, // readonly |
| | | 'uid' => $MESSAGE->uid, // readonly |
| | | )); |
| | | |
| | | // single header value is requested |
| | |
| | | $plugin = $RCMAIL->plugins->exec_hook('message_body_prefix', |
| | | array('part' => $MESSAGE, 'prefix' => '')); |
| | | |
| | | $out .= html::div('message-part', $plugin['prefix'] . html::tag('pre', array(), |
| | | rcmail_plain_body(rcube::Q($MESSAGE->body, 'strict', false)))); |
| | | $out .= html::div('message-part', |
| | | $plugin['prefix'] . rcmail_plain_body($MESSAGE->body)); |
| | | } |
| | | } |
| | | |
| | |
| | | |
| | | function rcmail_part_image_type($part) |
| | | { |
| | | $rcmail = rcmail::get_instance(); |
| | | |
| | | // Skip TIFF images if browser doesn't support this format... |
| | | $tiff_support = !empty($_SESSION['browser_caps']) && !empty($_SESSION['browser_caps']['tif']); |
| | | // until we can convert them to JPEG |
| | | $tiff_support = $tiff_support || $rcmail->config->get('im_convert_path'); |
| | | $tiff_support = $tiff_support || rcube_image::is_convertable('image/tiff'); |
| | | |
| | | // Content-type regexp |
| | | $mime_regex = $tiff_support ? '/^image\//i' : '/^image\/(?!tif)/i'; |