| | |
| | | // 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)) { |
| | | list($_uid, $mbox) = explode('-', $_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; |
| | | $_REQUEST['_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); |
| | |
| | | |
| | | |
| | | /** |
| | | * Returns message UID(s) and IMAP folder(s) from GET/POST data |
| | | * |
| | | * @return array List of message UIDs per folder |
| | | * Sets storage properties and session |
| | | */ |
| | | function rcmail_get_uids() |
| | | function rcmail_init_env() |
| | | { |
| | | // message UID (or comma-separated list of IDs) is provided in |
| | | // the form of <ID>-<MBOX>[,<ID>-<MBOX>]* |
| | | global $RCMAIL; |
| | | |
| | | $_uid = get_input_value('_uid', RCUBE_INPUT_GPC); |
| | | $_mbox = (string)get_input_value('_mbox', RCUBE_INPUT_GPC); |
| | | $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'); |
| | | |
| | | if (is_array($uid)) { |
| | | return $uid; |
| | | // 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; |
| | | } |
| | | |
| | | // create a per-folder UIDs array |
| | | $result = array(); |
| | | foreach (explode(',', $_uid) as $uid) { |
| | | list($uid, $mbox) = explode('-', $uid, 2); |
| | | if (empty($mbox)) |
| | | $mbox = $_mbox; |
| | | $result[$mbox][] = $uid; |
| | | $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'; |
| | | } |
| | | |
| | | return $result; |
| | | // 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']]); |
| | | } |
| | | |
| | | /** |
| | |
| | | $OUTPUT->set_env('sort_col', $_SESSION['sort_col']); |
| | | $OUTPUT->set_env('sort_order', $_SESSION['sort_order']); |
| | | $OUTPUT->set_env('messages', array()); |
| | | $OUTPUT->set_env('coltypes', $a_show_cols); |
| | | $OUTPUT->set_env('listcols', $a_show_cols); |
| | | |
| | | $OUTPUT->include_script('list.js'); |
| | | |
| | |
| | | |
| | | $OUTPUT->command('set_message_coltypes', $a_show_cols, $thead, $smart_col); |
| | | |
| | | if ($multifolder) { |
| | | if ($multifolder && $_SESSION['search_scope'] == 'all') { |
| | | $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 = ''; |
| | | } |
| | | |
| | | $cells = array(); |
| | | $cells = $coltypes = array(); |
| | | |
| | | // get name of smart From/To column in folder context |
| | | if (array_search('fromto', $a_show_cols) !== false) { |
| | |
| | | } |
| | | |
| | | foreach ($a_show_cols as $col) { |
| | | $label = ''; |
| | | $sortable = false; |
| | | |
| | | // get column name |
| | | switch ($col) { |
| | | case 'flag': |
| | | $col_name = '<span class="flagged"> </span>'; |
| | | $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 = '<span class="' . $col .'"> </span>'; |
| | | $col_name = html::span($col, $RCMAIL->gettext('readstatus')); |
| | | break; |
| | | case 'threads': |
| | | $col_name = $list_menu; |
| | | break; |
| | | case 'fromto': |
| | | $col_name = rcube::Q($RCMAIL->gettext($smart_col)); |
| | | $label = $RCMAIL->gettext($smart_col); |
| | | $col_name = rcube::Q($label); |
| | | break; |
| | | default: |
| | | $col_name = rcube::Q($RCMAIL->gettext($col)); |
| | | $label = $RCMAIL->gettext($col); |
| | | $col_name = rcube::Q($label); |
| | | } |
| | | |
| | | // make sort links |
| | | if (in_array($col, $a_sort_cols)) { |
| | | $sortable = true; |
| | | $col_name = html::a(array( |
| | | 'href' => "./#sort", |
| | | 'onclick' => 'return '.rcmail_output::JS_OBJECT_NAME.".command('sort','".$col."',this)", |
| | | 'title' => $RCMAIL->gettext('sortby') |
| | | 'href' => "./#sort", |
| | | 'class' => 'sortcol', |
| | | 'rel' => $col, |
| | | 'title' => $RCMAIL->gettext('sortby') |
| | | ), $col_name); |
| | | } |
| | | else if ($col_name[0] != '<') { |
| | |
| | | |
| | | // put it all together |
| | | $cells[] = array('className' => $class_name, 'id' => "rcm$col", 'html' => $col_name); |
| | | $coltypes[$col] = array('className' => $class_name, 'id' => "rcm$col", 'label' => $label, 'sortable' => $sortable); |
| | | } |
| | | |
| | | $RCMAIL->output->set_env('coltypes', $coltypes); |
| | | return $cells; |
| | | } |
| | | |
| | |
| | | |
| | | // 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'; |
| | |
| | | { |
| | | $parts = array(); |
| | | foreach ($p as $key => $val) { |
| | | $parts[] = $key . '=' . ($key == 'folder' ? base64_encode($val) : $val); |
| | | $encode = $key == 'folder' || strpos($val, ';') !== false; |
| | | $parts[] = $key . '=' . ($encode ? 'B::' . base64_encode($val) : $val); |
| | | } |
| | | |
| | | return join('; ', $parts); |
| | |
| | | |
| | | foreach (preg_split('/;\s+/', $str) as $part) { |
| | | list($key, $val) = explode('=', $part, 2); |
| | | if ($key == 'folder') { |
| | | if (strpos($val, 'B::') === 0) { |
| | | $val = base64_decode(substr($val, 3)); |
| | | } |
| | | else if ($key == 'folder') { |
| | | $val = base64_decode($val); |
| | | } |
| | | |
| | |
| | | $ctypes = array('application/', 'multipart/m', 'multipart/signed', 'multipart/report'); |
| | | |
| | | // Build search string of "with attachment" filter |
| | | $attachment = str_repeat(' OR', count($ctypes)-1); |
| | | $attachment = trim(str_repeat(' OR', count($ctypes)-1)); |
| | | foreach ($ctypes as $type) { |
| | | $attachment .= ' HEADER Content-Type ' . rcube_imap_generic::escape($type); |
| | | } |