| | |
| | | | program/steps/settings/manage_folders.inc | |
| | | | | |
| | | | This file is part of the RoundCube Webmail client | |
| | | | Copyright (C) 2005, RoundCube Dev. - Switzerland | |
| | | | Copyright (C) 2005-2008, RoundCube Dev. - Switzerland | |
| | | | Licensed under the GNU GPL | |
| | | | | |
| | | | PURPOSE: | |
| | |
| | | |
| | | */ |
| | | |
| | | // init IMAP connection |
| | | rcmail_imap_init(TRUE); |
| | | // WARNING: folder names in UI are encoded with UTF-8 |
| | | |
| | | // init IMAP connection |
| | | $RCMAIL->imap_init(true); |
| | | |
| | | // subscribe to one or more mailboxes |
| | | if ($_action=='subscribe') |
| | | if ($RCMAIL->action=='subscribe') |
| | | { |
| | | if (strlen($_GET['_mboxes'])) |
| | | $IMAP->subscribe(array($_GET['_mboxes'])); |
| | | |
| | | if ($REMOTE_REQUEST) |
| | | rcube_remote_response('// subscribed'); |
| | | if ($mbox = get_input_value('_mbox', RCUBE_INPUT_POST, false, 'UTF-7')) |
| | | $IMAP->subscribe(array($mbox)); |
| | | } |
| | | |
| | | // unsubscribe one or more mailboxes |
| | | else if ($_action=='unsubscribe') |
| | | else if ($RCMAIL->action=='unsubscribe') |
| | | { |
| | | if (strlen($_GET['_mboxes'])) |
| | | $IMAP->unsubscribe(array($_GET['_mboxes'])); |
| | | |
| | | if ($REMOTE_REQUEST) |
| | | rcube_remote_response('// unsubscribed'); |
| | | if ($mbox = get_input_value('_mbox', RCUBE_INPUT_POST, false, 'UTF-7')) |
| | | $IMAP->unsubscribe(array($mbox)); |
| | | } |
| | | |
| | | // create a new mailbox |
| | | else if ($_action=='create-folder') |
| | | else if ($RCMAIL->action=='create-folder') |
| | | { |
| | | if (!empty($_GET['_name'])) |
| | | $create = $IMAP->create_mailbox(trim(get_input_value('_name', RCUBE_INPUT_GET, FALSE, 'UTF-7')), TRUE); |
| | | |
| | | if ($create && $REMOTE_REQUEST) |
| | | if (!empty($_POST['_name'])) |
| | | { |
| | | $commands = sprintf("this.add_folder_row('%s','%s')", |
| | | rep_specialchars_output($create, 'js'), |
| | | rep_specialchars_output(rcube_charset_convert($create, 'UTF-7'), 'js')); |
| | | rcube_remote_response($commands); |
| | | $name = trim(get_input_value('_name', RCUBE_INPUT_POST, FALSE, 'UTF-7')); |
| | | // #1485036 (RFC3501, 5.1.3) TODO: it should be done on read not on write |
| | | $name = str_replace('&-', '&', $name); |
| | | $create = $IMAP->create_mailbox($name, TRUE); |
| | | } |
| | | else if (!$create && $REMOTE_REQUEST) |
| | | |
| | | if ($create && $OUTPUT->ajax_call) |
| | | { |
| | | $commands = show_message('errorsaving', 'error'); |
| | | rcube_remote_response($commands); |
| | | $delimiter = $IMAP->get_hierarchy_delimiter(); |
| | | $folderlist = $IMAP->list_unsubscribed(); |
| | | $index = array_search($create, $folderlist); |
| | | $before = $index !== false && isset($folderlist[$index+1]) ? rcube_charset_convert($folderlist[$index+1], 'UTF-7') : false; |
| | | |
| | | $create = rcube_charset_convert($create, 'UTF-7'); |
| | | $foldersplit = explode($delimiter, $create); |
| | | $display_create = str_repeat(' ', substr_count($create, $delimiter)) . $foldersplit[count($foldersplit)-1]; |
| | | |
| | | $OUTPUT->command('add_folder_row', $create, $display_create, false, $before); |
| | | } |
| | | else if (!$create) |
| | | show_message('errorsaving', 'error'); |
| | | { |
| | | $OUTPUT->show_message('errorsaving', 'error'); |
| | | } |
| | | } |
| | | |
| | | // rename a mailbox |
| | | else if ($_action=='rename-folder') |
| | | else if ($RCMAIL->action=='rename-folder') |
| | | { |
| | | if (!empty($_GET['_folder_oldname']) && !empty($_GET['_folder_newname'])) |
| | | $rename = $IMAP->rename_mailbox(get_input_value('_folder_oldname', RCUBE_INPUT_GET), trim(get_input_value('_folder_newname', RCUBE_INPUT_GET, FALSE, 'UTF-7'))); |
| | | |
| | | if ($rename && $REMOTE_REQUEST) |
| | | if (!empty($_POST['_folder_oldname']) && !empty($_POST['_folder_newname'])) |
| | | { |
| | | $commands = sprintf("this.replace_folder_row('%s','%s','%s');\n", |
| | | rep_specialchars_output(get_input_value('_folder_oldname', RCUBE_INPUT_GET), 'js'), |
| | | rep_specialchars_output($rename, 'js'), |
| | | rep_specialchars_output(rcube_charset_convert($rename, 'UTF-7'), 'js')); |
| | | $name_utf8 = trim(get_input_value('_folder_newname', RCUBE_INPUT_POST)); |
| | | $oldname_utf8 = get_input_value('_folder_oldname', RCUBE_INPUT_POST); |
| | | $name = rcube_charset_convert($name_utf8, 'UTF-8', 'UTF-7'); |
| | | $oldname = rcube_charset_convert($oldname_utf8, 'UTF-8', 'UTF-7'); |
| | | |
| | | $commands .= "this.reset_folder_rename();\n"; |
| | | |
| | | rcube_remote_response($commands); |
| | | // #1485036 (RFC3501, 5.1.3) TODO: it should be done on read not on write |
| | | $name = str_replace('&-', '&', $name); |
| | | |
| | | $rename = $IMAP->rename_mailbox($oldname, $name); |
| | | } |
| | | else if (!$rename && $REMOTE_REQUEST) |
| | | |
| | | if ($rename && $OUTPUT->ajax_call) |
| | | { |
| | | $commands = "this.reset_folder_rename();\n"; |
| | | $commands .= show_message('errorsaving', 'error'); |
| | | rcube_remote_response($commands); |
| | | $folderlist = $IMAP->list_unsubscribed(); |
| | | $delimiter = $IMAP->get_hierarchy_delimiter(); |
| | | |
| | | $regexp = '/^' . preg_quote($rename . $delimiter, '/') . '/'; |
| | | |
| | | // subfolders |
| | | for ($x=sizeof($folderlist)-1; $x>=0; $x--) |
| | | { |
| | | if (preg_match($regexp, $folderlist[$x])) |
| | | { |
| | | $oldfolder = $oldname . $delimiter . preg_replace($regexp, '', $folderlist[$x]); |
| | | $foldersplit = explode($delimiter, $folderlist[$x]); |
| | | $level = count($foldersplit) - 1; |
| | | $display_rename = str_repeat(' ', $level) |
| | | . rcube_charset_convert($foldersplit[$level], 'UTF-7'); |
| | | |
| | | $before = isset($folderlist[$x+1]) ? rcube_charset_convert($folderlist[$x+1], 'UTF-7') : false; |
| | | |
| | | $OUTPUT->command('replace_folder_row', rcube_charset_convert($oldfolder, 'UTF-7'), |
| | | rcube_charset_convert($folderlist[$x], 'UTF-7'), $display_rename, $before); |
| | | } |
| | | } |
| | | |
| | | $foldersplit = explode($delimiter, $rename); |
| | | $level = count($foldersplit) - 1; |
| | | $display_rename = str_repeat(' ', $level) . rcube_charset_convert($foldersplit[$level], 'UTF-7'); |
| | | $index = array_search($rename, $folderlist); |
| | | $before = $index !== false && isset($folderlist[$index+1]) ? rcube_charset_convert($folderlist[$index+1], 'UTF-7') : false; |
| | | |
| | | $OUTPUT->command('replace_folder_row', $oldname_utf8, rcube_charset_convert($rename, 'UTF-7'), $display_rename, $before); |
| | | |
| | | $OUTPUT->command('reset_folder_rename'); |
| | | } |
| | | else if (!$rename && $OUTPUT->ajax_call) |
| | | { |
| | | $OUTPUT->command('reset_folder_rename'); |
| | | $OUTPUT->show_message('errorsaving', 'error'); |
| | | } |
| | | else if (!$rename) |
| | | show_message('errorsaving', 'error'); |
| | | $OUTPUT->show_message('errorsaving', 'error'); |
| | | } |
| | | |
| | | // delete an existing IMAP mailbox |
| | | else if ($_action=='delete-folder') |
| | | else if ($RCMAIL->action=='delete-folder') |
| | | { |
| | | if (!empty($_GET['_mboxes'])) |
| | | $deleted = $IMAP->delete_mailbox(array(get_input_value('_mboxes', RCUBE_INPUT_GET))); |
| | | $a_mboxes = $IMAP->list_unsubscribed(); |
| | | $delimiter = $IMAP->get_hierarchy_delimiter(); |
| | | |
| | | $mboxes_utf8 = get_input_value('_mboxes', RCUBE_INPUT_POST); |
| | | $mboxes = rcube_charset_convert($mboxes_utf8, 'UTF-8', 'UTF-7'); |
| | | |
| | | if ($REMOTE_REQUEST && $deleted) |
| | | if ($mboxes) |
| | | $deleted = $IMAP->delete_mailbox(array($mboxes)); |
| | | |
| | | if ($OUTPUT->ajax_call && $deleted) |
| | | { |
| | | $commands = sprintf("this.remove_folder_row('%s');\n", rep_specialchars_output(get_input_value('_mboxes', RCUBE_INPUT_GET), 'js')); |
| | | $commands .= show_message('folderdeleted', 'confirmation'); |
| | | rcube_remote_response($commands); |
| | | $OUTPUT->command('remove_folder_row', $mboxes_utf8); |
| | | foreach ($a_mboxes as $mbox) |
| | | { |
| | | if (preg_match('/^'. preg_quote($mboxes.$delimiter, '/') .'/', $mbox)) |
| | | { |
| | | $OUTPUT->command('remove_folder_row', rcube_charset_convert($mbox, 'UTF-7')); |
| | | } |
| | | } |
| | | $OUTPUT->show_message('folderdeleted', 'confirmation'); |
| | | } |
| | | else if ($REMOTE_REQUEST) |
| | | else if (!$deleted) |
| | | { |
| | | $commands = show_message('errorsaving', 'error'); |
| | | rcube_remote_response($commands); |
| | | $OUTPUT->show_message('errorsaving', 'error'); |
| | | } |
| | | } |
| | | |
| | | if ($OUTPUT->ajax_call) |
| | | $OUTPUT->send(); |
| | | |
| | | |
| | | // build table with all folders listed by server |
| | | function rcube_subscription_form($attrib) |
| | | { |
| | | global $IMAP, $CONFIG, $OUTPUT, $JS_OBJECT_NAME; |
| | | global $IMAP, $CONFIG, $OUTPUT; |
| | | |
| | | list($form_start, $form_end) = get_form_tags($attrib, 'folders'); |
| | | unset($attrib['form']); |
| | | |
| | | |
| | | if (!$attrib['id']) |
| | | $attrib['id'] = 'rcmSubscriptionlist'; |
| | | |
| | | // allow the following attributes to be added to the <table> tag |
| | | $attrib_str = create_attrib_string($attrib, array('style', 'class', 'id', 'cellpadding', 'cellspacing', 'border', 'summary')); |
| | | |
| | | $out = "$form_start\n<table" . $attrib_str . ">\n"; |
| | | |
| | | $table = new html_table(); |
| | | |
| | | // add table header |
| | | $out .= "<thead><tr>\n"; |
| | | $out .= sprintf('<td class="name">%s</td><td class="subscribed">%s</td>'. |
| | | '<td class="rename"> </td><td class="delete"> </td>', |
| | | rcube_label('foldername'), rcube_label('subscribed')); |
| | | |
| | | $out .= "\n</tr></thead>\n<tbody>\n"; |
| | | $table->add_header('name', rcube_label('foldername')); |
| | | $table->add_header('msgcount', rcube_label('messagecount')); |
| | | $table->add_header('subscribed', rcube_label('subscribed')); |
| | | $table->add_header('rename', ' '); |
| | | $table->add_header('delete', ' '); |
| | | |
| | | |
| | | // get folders from server |
| | |
| | | |
| | | $a_unsubscribed = $IMAP->list_unsubscribed(); |
| | | $a_subscribed = $IMAP->list_mailboxes(); |
| | | $a_js_folders = array(); |
| | | |
| | | $checkbox_subscribe = new checkbox(array('name' => '_subscribed[]', 'onclick' => "$JS_OBJECT_NAME.command(this.checked?'subscribe':'unsubscribe',this.value)")); |
| | | $delimiter = $IMAP->get_hierarchy_delimiter(); |
| | | $a_js_folders = $seen_folders = $list_folders = array(); |
| | | |
| | | // pre-process folders list |
| | | foreach ($a_unsubscribed as $i => $folder) { |
| | | $foldersplit = explode($delimiter, $folder); |
| | | $name = rcube_charset_convert(array_pop($foldersplit), 'UTF-7'); |
| | | $parent_folder = join($delimiter, $foldersplit); |
| | | $level = count($foldersplit); |
| | | |
| | | // add a "virtual" parent folder |
| | | if ($parent_folder && !$seen[$parent_folder]++) { |
| | | $parent_name = rcube_charset_convert($foldersplit[$level-1], 'UTF-7'); |
| | | $list_folders[] = array('id' => $parent_folder, 'name' => $parent_name, 'level' => $level-1, 'virtual' => true); |
| | | } |
| | | |
| | | $list_folders[] = array('id' => $folder, 'name' => $name, 'level' => $level); |
| | | $seen[$folder]++; |
| | | } |
| | | |
| | | $checkbox_subscribe = new html_checkbox(array( |
| | | 'name' => '_subscribed[]', |
| | | 'onclick' => JS_OBJECT_NAME.".command(this.checked?'subscribe':'unsubscribe',this.value)", |
| | | )); |
| | | |
| | | if (!empty($attrib['deleteicon'])) |
| | | $del_button = sprintf('<img src="%s%s" alt="%s" border="0" />', $CONFIG['skin_path'], $attrib['deleteicon'], rcube_label('delete')); |
| | | $del_button = html::img(array('src' => $CONFIG['skin_path'] . $attrib['deleteicon'], 'alt' => rcube_label('delete'), 'border' => 0)); |
| | | else |
| | | $del_button = rcube_label('delete'); |
| | | |
| | | if (!empty($attrib['renameicon'])) |
| | | $edit_button = sprintf('<img src="%s%s" alt="%s" border="0" />', $CONFIG['skin_path'], $attrib['renameicon'], rcube_label('rename')); |
| | | $edit_button = html::img(array('src' => $CONFIG['skin_path'] . $attrib['renameicon'], 'alt' => rcube_label('rename'), 'border' => 0)); |
| | | else |
| | | $del_button = rcube_label('rename'); |
| | | |
| | | |
| | | // create list of available folders |
| | | foreach ($a_unsubscribed as $i => $folder) |
| | | { |
| | | $subscribed = in_array($folder, $a_subscribed); |
| | | $protected = ($CONFIG['protect_default_folders'] == TRUE && in_array($folder,$CONFIG['default_imap_folders'])); |
| | | $zebra_class = $i%2 ? 'even' : 'odd'; |
| | | $folder_js = rep_specialchars_output($folder, 'js'); |
| | | $folder_js_enc = rep_specialchars_output(rcube_charset_convert($folder, 'UTF-7'), 'js'); |
| | | $folder_html = $CONFIG['protect_default_folders'] && in_array($folder, $CONFIG['default_imap_folders']) ? rcube_label(strtolower($folder)) : rcube_charset_convert($folder, 'UTF-7'); |
| | | foreach ($list_folders as $i => $folder) { |
| | | $idx = $i + 1; |
| | | $subscribed = in_array($folder['id'], $a_subscribed); |
| | | $protected = ($folder['virtual'] || ($CONFIG['protect_default_folders'] == true && in_array($folder['id'], $CONFIG['default_imap_folders']))); |
| | | $classes = array($i%2 ? 'even' : 'odd'); |
| | | $folder_js = JQ($folder['id']); |
| | | $display_folder = str_repeat(' ', $folder['level']) . ($protected ? rcmail_localize_foldername($folder['id']) : $folder['name']); |
| | | $folder_utf8 = rcube_charset_convert($folder['id'], 'UTF-7'); |
| | | |
| | | if (!$protected) |
| | | $a_js_folders['rcmrow'.($i+1)] = array($folder_js, $folder_js_enc); |
| | | |
| | | $out .= sprintf('<tr id="rcmrow%d" class="%s"><td>%s</td>', |
| | | $i+1, |
| | | $zebra_class, |
| | | rep_specialchars_output($folder_html, 'html', 'all')); |
| | | |
| | | if ($protected) |
| | | $out .= '<td> '.($subscribed ? '•' : '-').'</td>'; |
| | | else |
| | | $out .= '<td>'.$checkbox_subscribe->show($subscribed?$folder:'', array('value' => $folder)).'</td>'; |
| | | |
| | | if ($folder['virtual']) |
| | | $classes[] = 'virtual'; |
| | | |
| | | $table->add_row(array('id' => 'rcmrow'.$idx, 'class' => join(' ', $classes))); |
| | | |
| | | $table->add('name', Q($display_folder)); |
| | | $table->add('msgcount', ($folder['virtual'] ? '' : $IMAP->messagecount($folder['id']))); |
| | | $table->add('subscribed', $protected ? ($subscribed ? ' •' : ' -') : |
| | | $checkbox_subscribe->show(($subscribed ? $folder_utf8 : ''), array('value' => $folder_utf8))); |
| | | |
| | | // add rename and delete buttons |
| | | if (!$protected) |
| | | $out .= sprintf('<td><a href="#rename" onclick="%s.command(\'rename-folder\',\'%s\')" title="%s">%s</a>'. |
| | | '<td><a href="#delete" onclick="%s.command(\'delete-folder\',\'%s\')" title="%s">%s</a></td>', |
| | | $JS_OBJECT_NAME, |
| | | $folder_js, |
| | | rcube_label('renamefolder'), |
| | | $edit_button, |
| | | $JS_OBJECT_NAME, |
| | | $folder_js, |
| | | rcube_label('deletefolder'), |
| | | $del_button); |
| | | else |
| | | $out .= '<td></td><td></td>'; |
| | | |
| | | $out .= "</tr>\n"; |
| | | if (!$protected) { |
| | | $table->add('rename', html::a(array('href' => "#rename", 'title' => rcube_label('renamefolder')), $edit_button)); |
| | | $table->add('delete', html::a(array('href' => "#delete", 'title' => rcube_label('deletefolder')), $del_button)); |
| | | } |
| | | |
| | | $out .= "</tbody>\n</table>"; |
| | | $out .= "\n$form_end"; |
| | | else { |
| | | $table->add(null, ''); |
| | | $table->add(null, ''); |
| | | } |
| | | |
| | | $a_js_folders['rcmrow'.$idx] = array($folder_utf8, $display_folder, $protected); |
| | | } |
| | | |
| | | |
| | | $javascript = sprintf("%s.gui_object('subscriptionlist', '%s');\n", $JS_OBJECT_NAME, $attrib['id']); |
| | | $javascript .= sprintf("%s.set_env('subscriptionrows', %s);", $JS_OBJECT_NAME, array2js($a_js_folders)); |
| | | $OUTPUT->add_script($javascript); |
| | | $OUTPUT->add_gui_object('subscriptionlist', $attrib['id']); |
| | | $OUTPUT->set_env('subscriptionrows', $a_js_folders); |
| | | $OUTPUT->set_env('defaultfolders', $CONFIG['default_imap_folders']); |
| | | $OUTPUT->set_env('delimiter', $delimiter); |
| | | |
| | | return $out; |
| | | return $form_start . $table->show($attrib) . $form_end; |
| | | } |
| | | |
| | | |
| | | function rcube_create_folder_form($attrib) |
| | | { |
| | | global $JS_OBJECT_NAME; |
| | | |
| | | global $OUTPUT; |
| | | |
| | | list($form_start, $form_end) = get_form_tags($attrib, 'create-folder'); |
| | | unset($attrib['form']); |
| | | |
| | | if ($attrib['hintbox']) |
| | | $OUTPUT->add_gui_object('createfolderhint', $attrib['hintbox']); |
| | | |
| | | // return the complete edit form as table |
| | | $out = "$form_start\n"; |
| | | |
| | | $input = new textfield(array('name' => '_folder_name')); |
| | | $input = new html_inputfield(array('name' => '_folder_name')); |
| | | $out .= $input->show(); |
| | | |
| | | if (get_boolean($attrib['button'])) |
| | | { |
| | | $button = new input_field(array('type' => 'button', |
| | | $button = new html_inputfield(array('type' => 'button', |
| | | 'value' => rcube_label('create'), |
| | | 'onclick' => "$JS_OBJECT_NAME.command('create-folder',this.form)")); |
| | | 'onclick' => JS_OBJECT_NAME.".command('create-folder',this.form)")); |
| | | $out .= $button->show(); |
| | | } |
| | | |
| | |
| | | |
| | | function rcube_rename_folder_form($attrib) |
| | | { |
| | | global $CONFIG, $IMAP, $JS_OBJECT_NAME; |
| | | global $CONFIG, $IMAP; |
| | | |
| | | list($form_start, $form_end) = get_form_tags($attrib, 'rename-folder'); |
| | | unset($attrib['form']); |
| | |
| | | $out = "$form_start\n"; |
| | | |
| | | $a_unsubscribed = $IMAP->list_unsubscribed(); |
| | | $select_folder = new select(array('name' => '_folder_oldname', 'id' => 'rcmfd_oldfolder')); |
| | | $select_folder = new html_select(array('name' => '_folder_oldname', 'id' => 'rcmfd_oldfolder')); |
| | | |
| | | foreach ($a_unsubscribed as $i => $folder) |
| | | { |
| | |
| | | $out .= $select_folder->show(); |
| | | |
| | | $out .= " to "; |
| | | $inputtwo = new textfield(array('name' => '_folder_newname')); |
| | | $inputtwo = new html_inputfield(array('name' => '_folder_newname')); |
| | | $out .= $inputtwo->show(); |
| | | |
| | | if (get_boolean($attrib['button'])) |
| | | { |
| | | $button = new input_field(array('type' => 'button', |
| | | $button = new html_inputfield(array('type' => 'button', |
| | | 'value' => rcube_label('rename'), |
| | | 'onclick' => "$JS_OBJECT_NAME.command('rename-folder',this.form)")); |
| | | 'onclick' => JS_OBJECT_NAME.".command('rename-folder',this.form)")); |
| | | $out .= $button->show(); |
| | | } |
| | | |
| | | $out .= "\n$form_end"; |
| | | |
| | | |
| | | return $out; |
| | | } |
| | | |
| | | $OUTPUT->set_pagetitle(rcube_label('folders')); |
| | | $OUTPUT->include_script('list.js'); |
| | | |
| | | // register UI objects |
| | | $OUTPUT->add_handlers(array( |
| | | 'foldersubscription' => 'rcube_subscription_form', |
| | | 'createfolder' => 'rcube_create_folder_form', |
| | | 'renamefolder' => 'rcube_rename_folder_form' |
| | | )); |
| | | |
| | | // add some labels to client |
| | | rcube_add_label('deletefolderconfirm'); |
| | | $OUTPUT->add_label('deletefolderconfirm','addsubfolderhint','forbiddencharacter','folderdeleting','folderrenaming','foldercreating'); |
| | | |
| | | |
| | | parse_template('managefolders'); |
| | | $OUTPUT->send('managefolders'); |
| | | ?> |