diff options
Diffstat (limited to 'webmail/program/steps/mail/folders.inc')
| -rw-r--r-- | webmail/program/steps/mail/folders.inc | 82 |
1 files changed, 82 insertions, 0 deletions
diff --git a/webmail/program/steps/mail/folders.inc b/webmail/program/steps/mail/folders.inc new file mode 100644 index 0000000..574d6e9 --- /dev/null +++ b/webmail/program/steps/mail/folders.inc @@ -0,0 +1,82 @@ +<?php + +/* + +-----------------------------------------------------------------------+ + | program/steps/mail/folders.inc | + | | + | This file is part of the Roundcube Webmail client | + | Copyright (C) 2005-2009, The Roundcube Dev Team | + | | + | Licensed under the GNU General Public License version 3 or | + | any later version with exceptions for skins & plugins. | + | See the README file for a full license statement. | + | | + | PURPOSE: | + | Implement folder operations line EXPUNGE and Clear | + | | + +-----------------------------------------------------------------------+ + | Author: Thomas Bruederli <roundcube@gmail.com> | + +-----------------------------------------------------------------------+ +*/ + +// only process ajax requests +if (!$OUTPUT->ajax_call) + return; + +$mbox = get_input_value('_mbox', RCUBE_INPUT_POST, true); + +// send EXPUNGE command +if ($RCMAIL->action == 'expunge') { + + $success = $RCMAIL->storage->expunge_folder($mbox); + + // reload message list if current mailbox + if ($success) { + $OUTPUT->show_message('folderexpunged', 'confirmation'); + + if (!empty($_REQUEST['_reload'])) { + $OUTPUT->command('set_quota', rcmail_quota_content()); + $OUTPUT->command('message_list.clear'); + $RCMAIL->action = 'list'; + return; + } + } + else { + rcmail_display_server_error(); + } +} + +// clear mailbox +else if ($RCMAIL->action == 'purge') +{ + $delimiter = $RCMAIL->storage->get_hierarchy_delimiter(); + $trash_regexp = '/^' . preg_quote($CONFIG['trash_mbox'] . $delimiter, '/') . '/'; + $junk_regexp = '/^' . preg_quote($CONFIG['junk_mbox'] . $delimiter, '/') . '/'; + + // we should only be purging trash and junk (or their subfolders) + if ($mbox == $CONFIG['trash_mbox'] || $mbox == $CONFIG['junk_mbox'] + || preg_match($trash_regexp, $mbox) || preg_match($junk_regexp, $mbox) + ) { + $success = $RCMAIL->storage->clear_folder($mbox); + + if ($success) { + $OUTPUT->show_message('folderpurged', 'confirmation'); + + if (!empty($_REQUEST['_reload'])) { + $OUTPUT->set_env('messagecount', 0); + $OUTPUT->set_env('pagecount', 0); + $OUTPUT->set_env('exists', 0); + $OUTPUT->command('message_list.clear'); + $OUTPUT->command('set_rowcount', rcmail_get_messagecount_text(), $mbox); + $OUTPUT->command('set_unread_count', $mbox, 0); + $OUTPUT->command('set_quota', rcmail_quota_content()); + rcmail_set_unseen_count($mbox, 0); + } + } + else { + rcmail_display_server_error(); + } + } +} + +$OUTPUT->send(); |