3e801adf23e2064a5509c38d1e60bb71e8263ac0
[claws.git] / src / mh_gtk.c
1 /*
2  * Sylpheed -- a GTK+ based, lightweight, and fast e-mail client
3  * Copyright (C) 1999-2004 Hiroyuki Yamamoto & the Sylpheed-Claws Team
4  *
5  * This program is free software; you can redistribute it and/or modify
6  * it under the terms of the GNU General Public License as published by
7  * the Free Software Foundation; either version 2 of the License, or
8  * (at your option) any later version.
9  *
10  * This program is distributed in the hope that it will be useful,
11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13  * GNU General Public License for more details.
14  *
15  * You should have received a copy of the GNU General Public License
16  * along with this program; if not, write to the Free Software
17  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
18  */
19
20 #ifdef HAVE_CONFIG_H
21 #  include "config.h"
22 #endif
23
24 #include "defs.h"
25
26 #include <glib.h>
27
28 #include <gtk/gtk.h>
29
30 #include "intl.h"
31 #include "utils.h"
32 #include "folder.h"
33 #include "folderview.h"
34 #include "menu.h"
35 #include "account.h"
36 #include "alertpanel.h"
37 #include "inputdialog.h"
38 #include "mh.h"
39 #include "foldersel.h"
40
41 static void new_folder_cb(FolderView *folderview, guint action, GtkWidget *widget);
42 static void delete_folder_cb(FolderView *folderview, guint action, GtkWidget *widget);
43 static void rename_folder_cb(FolderView *folderview, guint action, GtkWidget *widget);
44 static void move_folder_cb(FolderView *folderview, guint action, GtkWidget *widget);
45 static void update_tree_cb(FolderView *folderview, guint action, GtkWidget *widget);
46 static void remove_mailbox_cb(FolderView *folderview, guint action, GtkWidget *widget);
47
48 static GtkItemFactoryEntry mh_popup_entries[] =
49 {
50         {N_("/Create _new folder..."),   NULL, new_folder_cb,     0, NULL},
51         {N_("/_Rename folder..."),       NULL, rename_folder_cb,  0, NULL},
52         {N_("/M_ove folder..."),         NULL, move_folder_cb,    0, NULL},
53         {N_("/_Delete folder"),          NULL, delete_folder_cb,  0, NULL},
54         {N_("/---"),                     NULL, NULL,              0, "<Separator>"},
55         {N_("/_Check for new messages"), NULL, update_tree_cb,    0, NULL},
56         {N_("/R_ebuild folder tree"),    NULL, update_tree_cb,    1, NULL},
57         {N_("/---"),                     NULL, NULL,              0, "<Separator>"},
58         {N_("/Remove _mailbox"),         NULL, remove_mailbox_cb, 0, NULL},
59         {N_("/---"),                     NULL, NULL,              0, "<Separator>"},
60 };
61
62 static void set_sensitivity(GtkItemFactory *factory, FolderItem *item);
63
64 static FolderViewPopup mh_popup =
65 {
66         "mh",
67         "<MHFolder>",
68         NULL,
69         set_sensitivity
70 };
71
72 void mh_gtk_init(void)
73 {
74         guint i, n_entries;
75
76         n_entries = sizeof(mh_popup_entries) /
77                 sizeof(mh_popup_entries[0]);
78         for (i = 0; i < n_entries; i++)
79                 mh_popup.entries = g_slist_append(mh_popup.entries, &mh_popup_entries[i]);
80
81         folderview_register_popup(&mh_popup);
82 }
83
84 static void set_sensitivity(GtkItemFactory *factory, FolderItem *item)
85 {
86 #define SET_SENS(name, sens) \
87         menu_set_sensitive(factory, name, sens)
88
89         SET_SENS("/Create new folder...",   TRUE);
90         SET_SENS("/Rename folder...",       item->stype == F_NORMAL && folder_item_parent(item) != NULL);
91         SET_SENS("/Move folder...",         item->stype == F_NORMAL && folder_item_parent(item) != NULL);
92         SET_SENS("/Delete folder",          item->stype == F_NORMAL && folder_item_parent(item) != NULL);
93
94         SET_SENS("/Check for new messages", folder_item_parent(item) == NULL);
95         SET_SENS("/Rebuild folder tree",    folder_item_parent(item) == NULL);
96
97         SET_SENS("/Remove mailbox",         folder_item_parent(item) == NULL);
98
99 #undef SET_SENS
100 }
101
102 static void new_folder_cb(FolderView *folderview, guint action,
103                           GtkWidget *widget)
104 {
105         GtkCTree *ctree = GTK_CTREE(folderview->ctree);
106         FolderItem *item;
107         FolderItem *new_item;
108         gchar *new_folder;
109         gchar *name;
110         gchar *p;
111
112         if (!folderview->selected) return;
113
114         item = gtk_ctree_node_get_row_data(ctree, folderview->selected);
115         g_return_if_fail(item != NULL);
116         g_return_if_fail(item->folder != NULL);
117         if (FOLDER_TYPE(item->folder) == F_IMAP)
118                 g_return_if_fail(item->folder->account != NULL);
119
120         new_folder = input_dialog(_("New folder"),
121                                   _("Input the name of new folder:"),
122                                   _("NewFolder"));
123         if (!new_folder) return;
124         AUTORELEASE_STR(new_folder, {g_free(new_folder); return;});
125
126         p = strchr(new_folder, G_DIR_SEPARATOR);
127         if (p) {
128                 alertpanel_error(_("`%c' can't be included in folder name."),
129                                  G_DIR_SEPARATOR);
130                 return;
131         }
132
133         name = trim_string(new_folder, 32);
134         AUTORELEASE_STR(name, {g_free(name); return;});
135
136         /* find whether the directory already exists */
137         if (folder_find_child_item_by_name(item, new_folder)) {
138                 alertpanel_error(_("The folder `%s' already exists."), name);
139                 return;
140         }
141
142         new_item = folder_create_folder(item, new_folder);
143         if (!new_item) {
144                 alertpanel_error(_("Can't create the folder `%s'."), name);
145                 return;
146         }
147
148         folder_write_list();
149 }
150
151 static void delete_folder_cb(FolderView *folderview, guint action,
152                              GtkWidget *widget)
153 {
154         GtkCTree *ctree = GTK_CTREE(folderview->ctree);
155         FolderItem *item;
156         gchar *message, *name;
157         AlertValue avalue;
158         gchar *old_path;
159         gchar *old_id;
160
161         item = folderview_get_selected(folderview);
162         g_return_if_fail(item != NULL);
163         g_return_if_fail(item->path != NULL);
164         g_return_if_fail(item->folder != NULL);
165
166         name = trim_string(item->name, 32);
167         AUTORELEASE_STR(name, {g_free(name); return;});
168         message = g_strdup_printf
169                 (_("All folder(s) and message(s) under `%s' will be deleted.\n"
170                    "Do you really want to delete?"), name);
171         avalue = alertpanel(_("Delete folder"), message,
172                             _("Yes"), _("+No"), NULL);
173         g_free(message);
174         if (avalue != G_ALERTDEFAULT) return;
175
176         Xstrdup_a(old_path, item->path, return);
177         old_id = folder_item_get_identifier(item);
178
179         if (folderview->opened == folderview->selected ||
180             gtk_ctree_is_ancestor(ctree,
181                                   folderview->selected,
182                                   folderview->opened)) {
183                 summary_clear_all(folderview->summaryview);
184                 folderview->opened = NULL;
185         }
186
187         if (item->folder->klass->remove_folder(item->folder, item) < 0) {
188                 alertpanel_error(_("Can't remove the folder `%s'."), name);
189                 if (folderview->opened == folderview->selected)
190                         summary_show(folderview->summaryview,
191                                      folderview->summaryview->folder_item);
192                 g_free(old_id);
193                 return;
194         }
195
196         folder_write_list();
197
198         prefs_filtering_delete_path(old_id);
199         g_free(old_id);
200
201 }
202
203 static void rename_folder_cb(FolderView *folderview, guint action,
204                              GtkWidget *widget)
205 {
206         FolderItem *item;
207         gchar *new_folder;
208         gchar *name;
209         gchar *message;
210         gchar *old_path;
211         gchar *old_id;
212         gchar *new_id;
213
214         item = folderview_get_selected(folderview);
215         g_return_if_fail(item != NULL);
216         g_return_if_fail(item->path != NULL);
217         g_return_if_fail(item->folder != NULL);
218
219         name = trim_string(item->name, 32);
220         message = g_strdup_printf(_("Input new name for `%s':"), name);
221         new_folder = input_dialog(_("Rename folder"), message,
222                                   g_basename(item->path));
223         g_free(message);
224         g_free(name);
225         if (!new_folder) return;
226         AUTORELEASE_STR(new_folder, {g_free(new_folder); return;});
227
228         if (strchr(new_folder, G_DIR_SEPARATOR) != NULL) {
229                 alertpanel_error(_("`%c' can't be included in folder name."),
230                                  G_DIR_SEPARATOR);
231                 return;
232         }
233
234         if (folder_find_child_item_by_name(folder_item_parent(item), new_folder)) {
235                 name = trim_string(new_folder, 32);
236                 alertpanel_error(_("The folder `%s' already exists."), name);
237                 g_free(name);
238                 return;
239         }
240
241         Xstrdup_a(old_path, item->path, {g_free(new_folder); return;});
242
243         old_id = folder_item_get_identifier(item);
244         
245         if (folder_item_rename(item, new_folder) < 0) {
246                 alertpanel_error(_("The folder could not be renamed.\n"
247                                    "The new folder name is not allowed."));
248                 g_free(old_id);
249                 return;
250         }
251
252         /* if (FOLDER_TYPE(item->folder) == F_MH)
253                 prefs_filtering_rename_path(old_path, item->path); */
254         new_id = folder_item_get_identifier(item);
255         prefs_filtering_rename_path(old_id, new_id);
256
257         g_free(old_id);
258         g_free(new_id);
259
260         folder_item_prefs_save_config(item);
261         folder_write_list();
262 }
263
264 static void move_folder_cb(FolderView *folderview, guint action, GtkWidget *widget)
265 {
266         FolderItem *from_folder = NULL, *to_folder = NULL;
267
268         from_folder = folderview_get_selected(folderview);
269         if (!from_folder || from_folder->folder->klass != mh_get_class())
270                 return;
271
272         to_folder = foldersel_folder_sel(from_folder->folder, FOLDER_SEL_MOVE, NULL);
273         if (!to_folder)
274                 return;
275         
276         folderview_move_folder(folderview, from_folder, to_folder);
277 }
278
279 static void update_tree_cb(FolderView *folderview, guint action,
280                            GtkWidget *widget)
281 {
282         FolderItem *item;
283
284         item = folderview_get_selected(folderview);
285         g_return_if_fail(item != NULL);
286
287         summary_show(folderview->summaryview, NULL);
288
289         g_return_if_fail(item->folder != NULL);
290
291         if (action == 0)
292                 folderview_check_new(item->folder);
293         else
294                 folderview_rescan_tree(item->folder);
295 }
296
297 static void remove_mailbox_cb(FolderView *folderview, guint action,
298                               GtkWidget *widget)
299 {
300         GtkCTree *ctree = GTK_CTREE(folderview->ctree);
301         GtkCTreeNode *node;
302         FolderItem *item;
303         gchar *name;
304         gchar *message;
305         AlertValue avalue;
306
307         item = folderview_get_selected(folderview);
308         g_return_if_fail(item != NULL);
309         g_return_if_fail(item->folder != NULL);
310         if (folder_item_parent(item)) return;
311
312         name = trim_string(item->folder->name, 32);
313         message = g_strdup_printf
314                 (_("Really remove the mailbox `%s' ?\n"
315                    "(The messages are NOT deleted from the disk)"), name);
316         avalue = alertpanel(_("Remove mailbox"), message,
317                             _("Yes"), _("+No"), NULL);
318         g_free(message);
319         g_free(name);
320         if (avalue != G_ALERTDEFAULT) return;
321
322         folderview_unselect(folderview);
323         summary_clear_all(folderview->summaryview);
324
325         folder_destroy(item->folder);
326 }
327