2005-09-01 [paul] 1.9.13cvs76
[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 #include <glib/gi18n.h>
28
29 #include <gtk/gtk.h>
30
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         gboolean folder_is_normal = 
87                         item != NULL &&
88                         item->stype == F_NORMAL &&
89                         !folder_has_parent_of_type(item, F_OUTBOX) &&
90                         !folder_has_parent_of_type(item, F_DRAFT) &&
91                         !folder_has_parent_of_type(item, F_QUEUE) &&
92                         !folder_has_parent_of_type(item, F_TRASH);
93 #define SET_SENS(name, sens) \
94         menu_set_sensitive(factory, name, sens)
95
96         SET_SENS("/Create new folder...",   TRUE);
97         SET_SENS("/Rename folder...",       item->stype == F_NORMAL && folder_item_parent(item) != NULL);
98         SET_SENS("/Move folder...",         folder_is_normal && folder_item_parent(item) != NULL);
99         SET_SENS("/Delete folder",          item->stype == F_NORMAL && folder_item_parent(item) != NULL);
100
101         SET_SENS("/Check for new messages", folder_item_parent(item) == NULL);
102         SET_SENS("/Rebuild folder tree",    folder_item_parent(item) == NULL);
103
104         SET_SENS("/Remove mailbox",         folder_item_parent(item) == NULL);
105
106 #undef SET_SENS
107 }
108
109 static void new_folder_cb(FolderView *folderview, guint action,
110                           GtkWidget *widget)
111 {
112         GtkCTree *ctree = GTK_CTREE(folderview->ctree);
113         FolderItem *item;
114         FolderItem *new_item;
115         gchar *new_folder;
116         gchar *name;
117         gchar *p;
118
119         if (!folderview->selected) return;
120
121         item = gtk_ctree_node_get_row_data(ctree, folderview->selected);
122         g_return_if_fail(item != NULL);
123         g_return_if_fail(item->folder != NULL);
124
125         new_folder = input_dialog(_("New folder"),
126                                   _("Input the name of new folder:"),
127                                   _("NewFolder"));
128         if (!new_folder) return;
129         AUTORELEASE_STR(new_folder, {g_free(new_folder); return;});
130
131         p = strchr(new_folder, G_DIR_SEPARATOR);
132         if (p) {
133                 alertpanel_error(_("'%c' can't be included in folder name."),
134                                  G_DIR_SEPARATOR);
135                 return;
136         }
137
138         name = trim_string(new_folder, 32);
139         AUTORELEASE_STR(name, {g_free(name); return;});
140
141         /* find whether the directory already exists */
142         if (folder_find_child_item_by_name(item, new_folder)) {
143                 alertpanel_error(_("The folder '%s' already exists."), name);
144                 return;
145         }
146
147         new_item = folder_create_folder(item, new_folder);
148         if (!new_item) {
149                 alertpanel_error(_("Can't create the folder '%s'."), name);
150                 return;
151         }
152
153         folder_write_list();
154 }
155
156 static void delete_folder_cb(FolderView *folderview, guint action,
157                              GtkWidget *widget)
158 {
159         GtkCTree *ctree = GTK_CTREE(folderview->ctree);
160         FolderItem *item;
161         gchar *message, *name;
162         AlertValue avalue;
163         gchar *old_path;
164         gchar *old_id;
165
166         item = folderview_get_selected_item(folderview);
167         g_return_if_fail(item != NULL);
168         g_return_if_fail(item->path != NULL);
169         g_return_if_fail(item->folder != NULL);
170
171         name = trim_string(item->name, 32);
172         AUTORELEASE_STR(name, {g_free(name); return;});
173         message = g_strdup_printf
174                 (_("All folders and messages under '%s' will be permanently deleted. "
175                    "Recovery will not be possible.\n\n"
176                    "Do you really want to delete?"), name);
177         avalue = alertpanel_full(_("Delete folder"), message,
178                                  GTK_STOCK_YES, GTK_STOCK_NO, NULL, FALSE,
179                                  NULL, ALERT_WARNING, G_ALERTALTERNATE);
180         g_free(message);
181         if (avalue != G_ALERTDEFAULT) return;
182
183         Xstrdup_a(old_path, item->path, return);
184         old_id = folder_item_get_identifier(item);
185
186         if (folderview->opened == folderview->selected ||
187             gtk_ctree_is_ancestor(ctree,
188                                   folderview->selected,
189                                   folderview->opened)) {
190                 summary_clear_all(folderview->summaryview);
191                 folderview->opened = NULL;
192         }
193
194         if (item->folder->klass->remove_folder(item->folder, item) < 0) {
195                 folder_item_scan(item);
196                 alertpanel_error(_("Can't remove the folder '%s'."), name);
197                 g_free(old_id);
198                 return;
199         }
200
201         folder_write_list();
202
203         prefs_filtering_delete_path(old_id);
204         g_free(old_id);
205
206 }
207
208 static void rename_folder_cb(FolderView *folderview, guint action,
209                              GtkWidget *widget)
210 {
211         FolderItem *item;
212         gchar *new_folder;
213         gchar *name;
214         gchar *message;
215         gchar *old_path;
216         gchar *old_id;
217         gchar *new_id;
218         gchar *base;
219
220         item = folderview_get_selected_item(folderview);
221         g_return_if_fail(item != NULL);
222         g_return_if_fail(item->path != NULL);
223         g_return_if_fail(item->folder != NULL);
224
225         name = trim_string(item->name, 32);
226         message = g_strdup_printf(_("Input new name for '%s':"), name);
227         base = g_path_get_basename(item->path);
228         new_folder = input_dialog(_("Rename folder"), message, base);
229         g_free(message);
230         g_free(name);
231         g_free(base);
232         if (!new_folder) return;
233         AUTORELEASE_STR(new_folder, {g_free(new_folder); return;});
234
235         if (strchr(new_folder, G_DIR_SEPARATOR) != NULL) {
236                 alertpanel_error(_("'%c' can't be included in folder name."),
237                                  G_DIR_SEPARATOR);
238                 return;
239         }
240
241         if (folder_find_child_item_by_name(folder_item_parent(item), new_folder)) {
242                 name = trim_string(new_folder, 32);
243                 alertpanel_error(_("The folder '%s' already exists."), name);
244                 g_free(name);
245                 return;
246         }
247
248         Xstrdup_a(old_path, item->path, {g_free(new_folder); return;});
249
250         old_id = folder_item_get_identifier(item);
251         
252         if (folder_item_rename(item, new_folder) < 0) {
253                 alertpanel_error(_("The folder could not be renamed.\n"
254                                    "The new folder name is not allowed."));
255                 g_free(old_id);
256                 return;
257         }
258
259         /* if (FOLDER_TYPE(item->folder) == F_MH)
260                 prefs_filtering_rename_path(old_path, item->path); */
261         new_id = folder_item_get_identifier(item);
262         prefs_filtering_rename_path(old_id, new_id);
263
264         g_free(old_id);
265         g_free(new_id);
266
267         folder_item_prefs_save_config(item);
268         folder_write_list();
269 }
270
271 static void move_folder_cb(FolderView *folderview, guint action, GtkWidget *widget)
272 {
273         FolderItem *from_folder = NULL, *to_folder = NULL;
274
275         from_folder = folderview_get_selected_item(folderview);
276         if (!from_folder || from_folder->folder->klass != mh_get_class())
277                 return;
278
279         to_folder = foldersel_folder_sel(from_folder->folder, FOLDER_SEL_MOVE, NULL);
280         if (!to_folder)
281                 return;
282         
283         folderview_move_folder(folderview, from_folder, to_folder);
284 }
285
286 static void update_tree_cb(FolderView *folderview, guint action,
287                            GtkWidget *widget)
288 {
289         FolderItem *item;
290
291         item = folderview_get_selected_item(folderview);
292         g_return_if_fail(item != NULL);
293
294         summary_show(folderview->summaryview, NULL);
295
296         g_return_if_fail(item->folder != NULL);
297
298         if (action == 0)
299                 folderview_check_new(item->folder);
300         else
301                 folderview_rescan_tree(item->folder);
302 }
303
304 static void remove_mailbox_cb(FolderView *folderview, guint action,
305                               GtkWidget *widget)
306 {
307         FolderItem *item;
308         gchar *name;
309         gchar *message;
310         AlertValue avalue;
311
312         item = folderview_get_selected_item(folderview);
313         g_return_if_fail(item != NULL);
314         g_return_if_fail(item->folder != NULL);
315         if (folder_item_parent(item)) return;
316
317         name = trim_string(item->folder->name, 32);
318         message = g_strdup_printf
319                 (_("Really remove the mailbox '%s' ?\n"
320                    "(The messages are NOT deleted from the disk)"), name);
321         avalue = alertpanel_full(_("Remove mailbox"), message,
322                                  GTK_STOCK_YES, GTK_STOCK_NO, NULL, FALSE,
323                                  NULL, ALERT_WARNING, G_ALERTALTERNATE);
324                             
325         g_free(message);
326         g_free(name);
327         if (avalue != G_ALERTDEFAULT) return;
328
329         folderview_unselect(folderview);
330         summary_clear_all(folderview->summaryview);
331
332         folder_destroy(item->folder);
333 }
334