2008-04-01 [colin] 3.3.1cvs48
[claws.git] / src / imap_gtk.c
index 63618322838f25e7d0a3cc2164c2130ca88cd7e8..228936c1cab27ff7e0655a8c158990f56eb276e4 100644 (file)
@@ -1,10 +1,10 @@
 /*
  * Sylpheed -- a GTK+ based, lightweight, and fast e-mail client
- * Copyright (C) 1999-2004 Hiroyuki Yamamoto & the Sylpheed-Claws Team
+ * Copyright (C) 1999-2007 Hiroyuki Yamamoto & the Claws Mail Team
  *
  * This program is free software; you can redistribute it and/or modify
  * it under the terms of the GNU General Public License as published by
- * the Free Software Foundation; either version 2 of the License, or
+ * the Free Software Foundation; either version 3 of the License, or
  * (at your option) any later version.
  *
  * This program is distributed in the hope that it will be useful,
@@ -13,8 +13,8 @@
  * GNU General Public License for more details.
  *
  * You should have received a copy of the GNU General Public License
- * along with this program; if not, write to the Free Software
- * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
+ * along with this program. If not, see <http://www.gnu.org/licenses/>.
+ * 
  */
 
 #ifdef HAVE_CONFIG_H
 #include "imap.h"
 #include "inc.h"
 #include "prefs_common.h"
+#include "statusbar.h"
 #include "summaryview.h"
 
 static void new_folder_cb(FolderView *folderview, guint action, GtkWidget *widget);
 static void rename_folder_cb(FolderView *folderview, guint action, GtkWidget *widget);
 static void move_folder_cb(FolderView *folderview, guint action, GtkWidget *widget);
-static void imap_settings_cb(FolderView *folderview, guint action, GtkWidget *widget);
-static void remove_server_cb(FolderView *folderview, guint action, GtkWidget *widget);
 static void delete_folder_cb(FolderView *folderview, guint action, GtkWidget *widget);
 static void update_tree_cb(FolderView *folderview, guint action, GtkWidget *widget);
 static void download_cb(FolderView *folderview, guint action, GtkWidget *widget);
 static void sync_cb(FolderView *folderview, guint action, GtkWidget *widget);
+static void subscribed_cb(FolderView *folderview, guint action, GtkWidget *widget);
+static void subscribe_cb(FolderView *folderview, guint action, GtkWidget *widget);
 
 static GtkItemFactoryEntry imap_popup_entries[] =
 {
        {N_("/Create _new folder..."),   NULL, new_folder_cb,    0, NULL},
+       {"/---",                         NULL, NULL,             0, "<Separator>"},
        {N_("/_Rename folder..."),       NULL, rename_folder_cb, 0, NULL},
        {N_("/M_ove folder..."),         NULL, move_folder_cb,   0, NULL},
+       {N_("/Cop_y folder..."),         NULL, move_folder_cb,   1, NULL},
+       {"/---",                         NULL, NULL,             0, "<Separator>"},
        {N_("/_Delete folder..."),       NULL, delete_folder_cb, 0, NULL},
-       {N_("/---"),                     NULL, NULL,             0, "<Separator>"},
-       {N_("/Synchronise"),             NULL, sync_cb,         0, NULL},
+       {"/---",                         NULL, NULL,             0, "<Separator>"},
+       {N_("/_Synchronise"),            NULL, sync_cb,          0, NULL},
        {N_("/Down_load messages"),      NULL, download_cb,      0, NULL},
-       {N_("/---"),                     NULL, NULL,             0, "<Separator>"},
+       {"/---",                         NULL, NULL,             0, "<Separator>"},
+       {N_("/S_ubscriptions"),          NULL, NULL,             0, "<Branch>"},
+       {N_("/Subscriptions/Show only subscribed _folders"),    
+                                        NULL, subscribed_cb,    0, "<ToggleItem>"},
+       {N_("/Subscriptions/---"),       NULL, NULL,             0, "<Separator>"},
+       {N_("/Subscriptions/_Subscribe..."),NULL, subscribe_cb,          1, NULL},
+       {N_("/Subscriptions/_Unsubscribe..."),    
+                                        NULL, subscribe_cb,     0, NULL},
+       {"/---",                         NULL, NULL,             0, "<Separator>"},
        {N_("/_Check for new messages"), NULL, update_tree_cb,   0, NULL},
        {N_("/C_heck for new folders"),  NULL, update_tree_cb,   1, NULL},
        {N_("/R_ebuild folder tree"),    NULL, update_tree_cb,   2, NULL},
-       {N_("/---"),                     NULL, NULL,             0, "<Separator>"},
-       {N_("/IMAP4 _account settings"), NULL, imap_settings_cb, 0, NULL},
-       {N_("/Remove _IMAP4 account"),   NULL, remove_server_cb, 0, NULL},
-       {N_("/---"),                     NULL, NULL,             0, "<Separator>"},
+       {"/---",                         NULL, NULL,             0, "<Separator>"},
 };
 
 static void set_sensitivity(GtkItemFactory *factory, FolderItem *item);
@@ -102,6 +111,7 @@ static void set_sensitivity(GtkItemFactory *factory, FolderItem *item)
                        !folder_has_parent_of_type(item, F_DRAFT) &&
                        !folder_has_parent_of_type(item, F_QUEUE) &&
                        !folder_has_parent_of_type(item, F_TRASH);
+
 #define SET_SENS(name, sens) \
        menu_set_sensitive(factory, name, sens)
 
@@ -110,11 +120,18 @@ static void set_sensitivity(GtkItemFactory *factory, FolderItem *item)
        SET_SENS("/Move folder...",         folder_is_normal && folder_item_parent(item) != NULL);
        SET_SENS("/Delete folder...",       item->stype == F_NORMAL && folder_item_parent(item) != NULL);
 
+       SET_SENS("/Synchronise",            item ? (folder_item_parent(item) == NULL && folder_want_synchronise(item->folder))
+                                               : FALSE);
        SET_SENS("/Check for new messages", folder_item_parent(item) == NULL);
        SET_SENS("/Check for new folders",  folder_item_parent(item) == NULL);
        SET_SENS("/Rebuild folder tree",    folder_item_parent(item) == NULL);
-
-       SET_SENS("/Remove IMAP4 account",   folder_item_parent(item) == NULL);
+       
+       SET_SENS("/Subscriptions/Unsubscribe...",    item->stype == F_NORMAL && folder_item_parent(item) != NULL);
+       SET_SENS("/Subscriptions/Subscribe...",    TRUE);
+       if (item->folder && item->folder->account)
+               menu_set_active(factory, 
+                       "/Subscriptions/Show only subscribed folders", 
+                       item->folder->account->imap_subsonly);
 
 #undef SET_SENS
 }
@@ -128,7 +145,8 @@ static void new_folder_cb(FolderView *folderview, guint action,
        gchar *new_folder;
        gchar *name;
        gchar *p;
-
+       gchar separator = '/';
+       
        if (!folderview->selected) return;
 
        item = gtk_ctree_node_get_row_data(ctree, folderview->selected);
@@ -140,15 +158,23 @@ static void new_folder_cb(FolderView *folderview, guint action,
                (_("New folder"),
                 _("Input the name of new folder:\n"
                   "(if you want to create a folder to store subfolders\n"
-                  "and no mails, append '/' at the end of the name)"),
+                  "only and no mail, append '/' to the folder name)"),
                 _("NewFolder"));
        if (!new_folder) return;
        AUTORELEASE_STR(new_folder, {g_free(new_folder); return;});
 
-       p = strchr(new_folder, G_DIR_SEPARATOR);
+       separator = imap_get_path_separator_for_item(item);
+
+       p = strchr(new_folder, separator);
+       if (p && *(p + 1) != '\0') {
+               alertpanel_error(_("'%c' can't be included in folder name."),
+                                separator);
+               return;
+       }
+       p = strchr(new_folder, '/');
        if (p && *(p + 1) != '\0') {
                alertpanel_error(_("'%c' can't be included in folder name."),
-                                G_DIR_SEPARATOR);
+                                '/');
                return;
        }
 
@@ -180,6 +206,7 @@ static void rename_folder_cb(FolderView *folderview, guint action,
        gchar *old_id;
        gchar *new_id;
        gchar *base;
+       gchar separator = '/';
 
        item = folderview_get_selected_item(folderview);
        g_return_if_fail(item != NULL);
@@ -196,14 +223,18 @@ static void rename_folder_cb(FolderView *folderview, guint action,
        if (!new_folder) return;
        AUTORELEASE_STR(new_folder, {g_free(new_folder); return;});
 
-/*
-       TODO: check new name for IMAP namespace separator
-       if (strchr(new_folder, G_DIR_SEPARATOR) != NULL) {
+       separator = imap_get_path_separator_for_item(item);
+       if (strchr(new_folder, separator) != NULL) {
+               alertpanel_error(_("'%c' can't be included in folder name."),
+                                separator);
+               return;
+       }
+       if (strchr(new_folder, '/') != NULL) {
                alertpanel_error(_("`%c' can't be included in folder name."),
-                                G_DIR_SEPARATOR);
+                                '/');
                return;
        }
-*/
+
        if (folder_find_child_item_by_name(folder_item_parent(item), new_folder)) {
                name = trim_string(new_folder, 32);
                alertpanel_error(_("The folder '%s' already exists."), name);
@@ -222,15 +253,14 @@ static void rename_folder_cb(FolderView *folderview, guint action,
                return;
        }
 
-       /* if (FOLDER_TYPE(item->folder) == F_MH)
-               prefs_filtering_rename_path(old_path, item->path); */
        new_id = folder_item_get_identifier(item);
        prefs_filtering_rename_path(old_id, new_id);
+       account_rename_path(old_id, new_id);
 
        g_free(old_id);
        g_free(new_id);
 
-       folder_item_prefs_save_config(item);
+       folder_item_prefs_save_config_recursive(item);
        folder_write_list();
 }
 
@@ -242,66 +272,11 @@ static void move_folder_cb(FolderView *folderview, guint action, GtkWidget *widg
        if (!from_folder || from_folder->folder->klass != imap_get_class())
                return;
 
-       to_folder = foldersel_folder_sel(from_folder->folder, FOLDER_SEL_MOVE, NULL);
+       to_folder = foldersel_folder_sel(from_folder->folder, FOLDER_SEL_MOVE, NULL, TRUE);
        if (!to_folder)
                return;
        
-       folderview_move_folder(folderview, from_folder, to_folder);
-}
-
-static void imap_settings_cb(FolderView *folderview, guint action, GtkWidget *widget)
-{
-       FolderItem *item;
-
-       item = folderview_get_selected_item(folderview);
-       if (item == NULL)
-               return;
-
-       account_open(item->folder->account);
-}
-
-static void remove_server_cb(FolderView *folderview, guint action, GtkWidget *widget)
-{
-       GtkCTree *ctree = GTK_CTREE(folderview->ctree);
-       FolderItem *item;
-       PrefsAccount *account;
-       gchar *name;
-       gchar *message;
-       AlertValue avalue;
-
-       if (!folderview->selected) return;
-
-       item = gtk_ctree_node_get_row_data(ctree, folderview->selected);
-       g_return_if_fail(item != NULL);
-       g_return_if_fail(item->folder != NULL);
-       g_return_if_fail(item->folder->account != NULL);
-
-       name = trim_string(item->folder->name, 32);
-       message = g_strdup_printf(_("Really delete IMAP4 account '%s'?"), name);
-       avalue = alertpanel_full(_("Delete IMAP4 account"), message,
-                                GTK_STOCK_YES, GTK_STOCK_NO, NULL, FALSE,
-                                NULL, ALERT_WARNING, G_ALERTALTERNATE);
-       g_free(message);
-       g_free(name);
-
-       if (avalue != G_ALERTDEFAULT) return;
-
-       if (folderview->opened == folderview->selected ||
-           gtk_ctree_is_ancestor(ctree,
-                                 folderview->selected,
-                                 folderview->opened)) {
-               summary_clear_all(folderview->summaryview);
-               folderview->opened = NULL;
-       }
-
-       account = item->folder->account;
-       folderview_unselect(folderview);
-       summary_clear_all(folderview->summaryview);
-       folder_destroy(item->folder);
-       account_destroy(account);
-       account_set_menu();
-       main_window_reflect_prefs_all();
-       folder_write_list();
+       folderview_move_folder(folderview, from_folder, to_folder, action);
 }
 
 static void delete_folder_cb(FolderView *folderview, guint action,
@@ -323,15 +298,15 @@ static void delete_folder_cb(FolderView *folderview, guint action,
 
        name = trim_string(item->name, 32);
        AUTORELEASE_STR(name, {g_free(name); return;});
-       message = g_strdup_printf
+       message = g_markup_printf_escaped
                (_("All folders and messages under '%s' will be permanently deleted. "
                   "Recovery will not be possible.\n\n"
                   "Do you really want to delete?"), name);
        avalue = alertpanel_full(_("Delete folder"), message,
-                                GTK_STOCK_YES, GTK_STOCK_NO, NULL, FALSE,
-                                NULL, ALERT_WARNING, G_ALERTALTERNATE);
+                                GTK_STOCK_CANCEL, GTK_STOCK_DELETE, NULL, FALSE,
+                                NULL, ALERT_WARNING, G_ALERTDEFAULT);
        g_free(message);
-       if (avalue != G_ALERTDEFAULT) return;
+       if (avalue != G_ALERTALTERNATE) return;
 
        Xstrdup_a(old_path, item->path, return);
        old_id = folder_item_get_identifier(item);
@@ -388,7 +363,7 @@ static void sync_cb(FolderView *folderview, guint action,
        folder_synchronise(item->folder);
 }
 
-void imap_gtk_synchronise(FolderItem *item)
+void imap_gtk_synchronise(FolderItem *item, gint days)
 {
        MainWindow *mainwin = mainwindow_get_mainwindow();
        FolderView *folderview = mainwin->folderview;
@@ -402,21 +377,193 @@ void imap_gtk_synchronise(FolderItem *item)
        gtk_widget_set_sensitive(folderview->ctree, FALSE);
        main_window_progress_on(mainwin);
        GTK_EVENTS_FLUSH();
-       if (folder_item_fetch_all_msg(item) < 0) {
-               gchar *name;
-
-               name = trim_string(item->name, 32);
-               alertpanel_error(_("Error occurred while downloading messages in '%s'."), name);
-               g_free(name);
+       if (item->no_select == FALSE) {
+               GSList *mlist;
+               GSList *cur;
+               gint num = 0;
+               gint total = item->total_msgs;
+               time_t t = time(NULL);
+
+               mlist = folder_item_get_msg_list(item);
+               for (cur = mlist; cur != NULL; cur = cur->next) {
+                       MsgInfo *msginfo = (MsgInfo *)cur->data;
+                       gint age = (t - msginfo->date_t) / (60*60*24);
+                       if (days == 0 || age <= days)
+                               imap_cache_msg(msginfo->folder, msginfo->msgnum);
+                       statusbar_progress_all(num++,total, 100);
+                       if (num % 100 == 0)
+                               GTK_EVENTS_FLUSH();
+               }
+
+               statusbar_progress_all(0,0,0);
+               procmsg_msg_list_free(mlist);
        }
+
        folder_set_ui_func(item->folder, NULL, NULL);
        main_window_progress_off(mainwin);
        gtk_widget_set_sensitive(folderview->ctree, TRUE);
        main_window_unlock(mainwin);
        inc_unlock();
        main_window_cursor_normal(mainwin);
+}
+
+static void chk_update_val(GtkWidget *widget, gpointer data)
+{
+        gboolean *val = (gboolean *)data;
+       *val = gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(widget));
+}
+
+static gboolean imap_gtk_subscribe_func(GNode *node, gpointer data)
+{
+       FolderItem *item = node->data;
+       gboolean action = GPOINTER_TO_INT(data);
+       
+       if (item->path)
+               imap_subscribe(item->folder, item, NULL, action);
 
+       return FALSE;
 }
+
+static void subscribe_cb(FolderView *folderview, guint action,
+                          GtkWidget *widget)
+{
+       GtkCTree *ctree = GTK_CTREE(folderview->ctree);
+       FolderItem *item;
+       gchar *message, *name;
+       AlertValue avalue;
+       GtkWidget *rec_chk;
+       gboolean recurse = FALSE;
+
+       if (!folderview->selected) return;
+
+       item = gtk_ctree_node_get_row_data(ctree, folderview->selected);
+       g_return_if_fail(item != NULL);
+       g_return_if_fail(item->folder != NULL);
+
+       name = trim_string(item->name, 32);
+       AUTORELEASE_STR(name, {g_free(name); return;});
+       
+       if (action && item->folder->account->imap_subsonly) {
+               GList *child_list = NULL;
+               GList *transc_list = NULL;
+
+               message = g_markup_printf_escaped
+                       (_("Do you want to search for unsubscribed subfolders of '%s'?"),
+                        name);
+
+               rec_chk = gtk_check_button_new_with_label(_("Search recursively"));
+
+               g_signal_connect(G_OBJECT(rec_chk), "toggled", 
+                               G_CALLBACK(chk_update_val), &recurse);
+
+               avalue = alertpanel_full(_("Subscriptions"), message,
+                                        GTK_STOCK_CANCEL, _("+_Search"), NULL, FALSE,
+                                        rec_chk, ALERT_QUESTION, G_ALERTDEFAULT);
+               g_free(message);
+               if (avalue != G_ALERTALTERNATE) return;
+               
+               child_list = imap_scan_subtree(item->folder, item, TRUE, recurse);
+               
+               if (child_list) {
+                       GList *cur;
+                       int r = -1;
+                       gchar *msg = g_strdup_printf(_("Choose a subfolder of %s to subscribe to: "),
+                                       item->name); 
+                       gchar *child_folder = NULL;
+                       
+                       for (cur = child_list; cur; cur = cur->next) {
+                               transc_list = g_list_append(transc_list, 
+                                       imap_modified_utf7_to_utf8(cur->data, FALSE));
+                       }
+
+                       child_folder = input_dialog_combo(_("Subscribe"), 
+                                       msg,
+                                       transc_list->next?_("All of them"):transc_list->data, transc_list);
+                       g_free(msg);
+                       if (child_folder && strcmp(child_folder, _("All of them"))) {
+                               gchar *transc_folder = imap_utf8_to_modified_utf7(child_folder, FALSE);
+                               r = imap_subscribe(item->folder, NULL, transc_folder, TRUE);
+                               g_free(transc_folder);
+                       } else if (child_folder) {
+                               for (cur = child_list; cur; cur = cur->next) 
+                                       r = imap_subscribe(item->folder, NULL, (gchar *)cur->data, TRUE);
+                       }
+                       g_free(child_folder);
+                       for (cur = child_list; cur; cur = cur->next) 
+                               g_free((gchar *)cur->data);
+                       for (cur = transc_list; cur; cur = cur->next) 
+                               g_free((gchar *)cur->data);
+                       if (r == 0)
+                               folderview_fast_rescan_tree(item->folder);
+               } else {
+                       alertpanel_notice(_("This folder is already subscribed and "
+                                 "has no unsubscribed subfolders.\n\nIf there are new folders, "
+                                 "created and subscribed to from another client, use \"Check "
+                                 "for new folders\" at the mailbox's root folder."));
+               }
+               g_list_free(child_list);
+               return;
+       }
+       message = g_markup_printf_escaped
+               (_("Do you want to %s the '%s' folder?"),
+                  action?_("subscribe"):_("unsubscribe"), name);
+       
+       rec_chk = gtk_check_button_new_with_label(_("Apply to subfolders"));
+       
+       g_signal_connect(G_OBJECT(rec_chk), "toggled", 
+                       G_CALLBACK(chk_update_val), &recurse);
+
+       avalue = alertpanel_full(_("Subscriptions"), message,
+                                GTK_STOCK_CANCEL, action?_("+_Subscribe"):_("+_Unsubscribe"), NULL, FALSE,
+                                rec_chk, ALERT_QUESTION, G_ALERTDEFAULT);
+       g_free(message);
+       if (avalue != G_ALERTALTERNATE) return;
+       
+       
+       if (!action) {
+               if (folderview->opened == folderview->selected ||
+                   gtk_ctree_is_ancestor(ctree,
+                                         folderview->selected,
+                                         folderview->opened)) {
+                       summary_clear_all(folderview->summaryview);
+                       folderview->opened = NULL;
+               }
+       }
+
+       if (recurse) {
+               g_node_traverse(item->node, G_PRE_ORDER,
+                       G_TRAVERSE_ALL, -1, imap_gtk_subscribe_func, GINT_TO_POINTER(action));
+       } else {
+               imap_subscribe(item->folder, item, NULL, action);
+       }
+
+       if (!action && item->folder->account->imap_subsonly)
+               folderview_fast_rescan_tree(item->folder);
+}
+
+static void subscribed_cb(FolderView *folderview, guint action,
+                          GtkWidget *widget)
+{
+       GtkCTree *ctree = GTK_CTREE(folderview->ctree);
+       FolderItem *item = gtk_ctree_node_get_row_data(ctree, folderview->selected);
+       
+       if (!item || !item->folder || !item->folder->account)
+               return;
+       if (item->folder->account->imap_subsonly == GTK_CHECK_MENU_ITEM(widget)->active)
+               return;
+
+       if (folderview->opened == folderview->selected ||
+           gtk_ctree_is_ancestor(ctree,
+                                 folderview->selected,
+                                 folderview->opened)) {
+               summary_clear_all(folderview->summaryview);
+               folderview->opened = NULL;
+       }
+
+       item->folder->account->imap_subsonly = GTK_CHECK_MENU_ITEM(widget)->active;
+       folderview_fast_rescan_tree(item->folder);
+}
+
 static void download_cb(FolderView *folderview, guint action,
                        GtkWidget *widget)
 {
@@ -426,5 +573,5 @@ static void download_cb(FolderView *folderview, guint action,
        if (!folderview->selected) return;
 
        item = gtk_ctree_node_get_row_data(ctree, folderview->selected);
-       imap_gtk_synchronise(item);
+       imap_gtk_synchronise(item, 0);
 }