4305b0c21da53457fa93fea872816bff803ce6d9
[claws.git] / src / gtk / filesel.c
1 /*
2  * Sylpheed -- a GTK+ based, lightweight, and fast e-mail client
3  * Copyright (C) 1999-2003 Hiroyuki Yamamoto
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 #include <glib.h>
21 #include <gdk/gdkkeysyms.h>
22 #include <gtk/gtkwidget.h>
23 #include <gtk/gtkfilesel.h>
24 #include <gtk/gtkentry.h>
25 #include <gtk/gtkmain.h>
26 #include <gtk/gtksignal.h>
27 #include <gtk/gtkeditable.h>
28
29 #include "sylpheed.h"
30 #include "filesel.h"
31 #include "manage_window.h"
32 #include "gtkutils.h"
33 #include "utils.h"
34
35 static GtkWidget *filesel;
36 static gboolean filesel_ack;
37 static gboolean filesel_fin;
38 static gchar *filesel_oldfilename;
39
40 static void filesel_create(const gchar *title, gboolean multiple_files);
41 static void filesel_ok_cb(GtkWidget *widget, gpointer data);
42 static void filesel_cancel_cb(GtkWidget *widget, gpointer data);
43 static gint delete_event(GtkWidget *widget, GdkEventAny *event, gpointer data);
44 static gboolean key_pressed(GtkWidget *widget, GdkEventKey *event, gpointer data);
45
46 static void filesel_file_list_select_row_multi(GtkCList *clist, gint row, gint col,
47                                                GdkEventButton *event, gpointer userdata);
48 static void filesel_file_list_select_row_single(GtkCList *clist, gint row, gint col,
49                                                 GdkEventButton *event, gpointer userdata);
50
51 static void filesel_dir_list_select_row_multi(GtkCList *clist, gint row, gint col,
52                                               GdkEventButton *event, gpointer userdata);
53 static void filesel_dir_list_select_row_single(GtkCList *clist, gint row, gint col,
54                                                GdkEventButton *event, gpointer userdata);
55
56 static GList *filesel_get_multiple_filenames(void);
57
58 gchar *filesel_select_file(const gchar *title, const gchar *file)
59 {
60         static gchar *filename = NULL;
61         static gchar *cwd = NULL;
62
63         filesel_create(title, FALSE);
64
65         manage_window_set_transient(GTK_WINDOW(filesel));
66
67         if (filename) {
68                 g_free(filename);
69                 filename = NULL;
70         }
71
72         if (!cwd)
73                 cwd = g_strconcat(sylpheed_get_startup_dir(), G_DIR_SEPARATOR_S, NULL);
74
75         gtk_file_selection_set_filename(GTK_FILE_SELECTION(filesel), cwd);
76
77         if (file) {
78                 gtk_file_selection_set_filename(GTK_FILE_SELECTION(filesel),
79                                                 file);
80                 filesel_oldfilename = g_strdup(file);
81         } else {
82                 filesel_oldfilename = NULL;
83         }
84
85         gtk_widget_show(filesel);
86
87         filesel_ack = filesel_fin = FALSE;
88
89         while (filesel_fin == FALSE)
90                 gtk_main_iteration();
91
92         if (filesel_ack) {
93                 const gchar *str;
94
95                 str = gtk_file_selection_get_filename
96                         (GTK_FILE_SELECTION(filesel));
97                 if (str && str[0] != '\0') {
98                         gchar *dir;
99
100                         filename = g_strdup(str);
101                         dir = g_dirname(str);
102                         g_free(cwd);
103                         cwd = g_strconcat(dir, G_DIR_SEPARATOR_S, NULL);
104                         g_free(dir);
105                 }
106         }
107
108         if (filesel_oldfilename) 
109                 g_free(filesel_oldfilename);
110
111         manage_window_focus_out(filesel, NULL, NULL);
112         gtk_widget_destroy(filesel);
113         GTK_EVENTS_FLUSH();
114
115         return filename;
116 }
117
118 GList *filesel_select_multiple_files(const gchar *title, const gchar *file)
119 {
120         /* ALF - sorry for the exuberant code duping... need to 
121          * be cleaned up. */
122         static gchar *filename = NULL;
123         static gchar *cwd = NULL;
124         GList        *list = NULL;
125
126         filesel_create(title, TRUE);
127
128         manage_window_set_transient(GTK_WINDOW(filesel));
129
130         if (filename) {
131                 g_free(filename);
132                 filename = NULL;
133         }
134
135         if (!cwd)
136                 cwd = g_strconcat(sylpheed_get_startup_dir(), G_DIR_SEPARATOR_S, NULL);
137
138         gtk_file_selection_set_filename(GTK_FILE_SELECTION(filesel), cwd);
139
140         if (file)
141                 gtk_file_selection_set_filename(GTK_FILE_SELECTION(filesel),
142                                                 file);
143         gtk_widget_show(filesel);
144
145         filesel_ack = filesel_fin = FALSE;
146
147         while (filesel_fin == FALSE)
148                 gtk_main_iteration();
149
150         if (filesel_ack) {
151                 const gchar *fname = NULL;
152
153                 list = filesel_get_multiple_filenames();
154
155                 if (!list) {
156                         fname = gtk_file_selection_get_filename(GTK_FILE_SELECTION(filesel));
157                         list = g_list_append(list, g_strdup(fname));
158                 }
159                 /* store dir of first entry */
160                 if (NULL != (fname = list->data) && *fname) {
161                         gchar *dir;
162                         if (NULL != (dir = g_dirname(fname))) {
163                                 g_free(cwd);
164                                 cwd = g_strconcat(dir, G_DIR_SEPARATOR_S, NULL);
165                                 g_free(dir); 
166                         }
167                 }
168         }
169
170         manage_window_focus_out(filesel, NULL, NULL);
171         gtk_widget_destroy(filesel);
172         GTK_EVENTS_FLUSH();
173
174         return list;
175 }
176
177 static void filesel_create(const gchar *title, gboolean multiple_files)
178 {
179         filesel = gtk_file_selection_new(title);
180         gtk_window_set_position(GTK_WINDOW(filesel), GTK_WIN_POS_CENTER);
181         gtk_window_set_modal(GTK_WINDOW(filesel), TRUE);
182         gtk_window_set_wmclass
183                 (GTK_WINDOW(filesel), "file_selection", "Sylpheed");
184
185         g_signal_connect(G_OBJECT(GTK_FILE_SELECTION(filesel)->ok_button),
186                          "clicked", G_CALLBACK(filesel_ok_cb),
187                          NULL);
188         g_signal_connect
189                 (G_OBJECT(GTK_FILE_SELECTION(filesel)->cancel_button),
190                  "clicked", G_CALLBACK(filesel_cancel_cb),
191                  NULL);
192         g_signal_connect(G_OBJECT(filesel), "delete_event",
193                          G_CALLBACK(delete_event), NULL);
194         g_signal_connect(G_OBJECT(filesel), "key_press_event",
195                          G_CALLBACK(key_pressed), NULL);
196         MANAGE_WINDOW_SIGNALS_CONNECT(filesel);
197
198         if (multiple_files) {
199 #ifndef _MSC_VER
200 #warning GTK2 dir_list/file_list now GtkTreeView. selection handlers not working.
201 #endif
202 #if 1
203                 gtk_file_selection_set_select_multiple
204                         (GTK_FILE_SELECTION(filesel), TRUE);
205 #else
206                 gtk_clist_set_selection_mode
207                         (GTK_CLIST(GTK_FILE_SELECTION(filesel)->file_list),
208                          GTK_SELECTION_MULTIPLE);
209 #endif
210
211                 gtk_signal_connect(GTK_OBJECT(GTK_FILE_SELECTION(filesel)->file_list),
212                                    "select_row", 
213                                    GTK_SIGNAL_FUNC(filesel_file_list_select_row_multi),
214                                    NULL);
215                 gtk_signal_connect(GTK_OBJECT(GTK_FILE_SELECTION(filesel)->file_list),
216                                    "unselect_row",
217                                    GTK_SIGNAL_FUNC(filesel_file_list_select_row_multi),
218                                    NULL);
219                 gtk_signal_connect(GTK_OBJECT(GTK_FILE_SELECTION(filesel)->dir_list),
220                                    "select_row",
221                                    GTK_SIGNAL_FUNC(filesel_dir_list_select_row_multi),
222                                    NULL);
223         } else {
224                 gtk_signal_connect_after(GTK_OBJECT(GTK_FILE_SELECTION(filesel)->file_list),
225                                          "select_row", 
226                                          GTK_SIGNAL_FUNC(filesel_file_list_select_row_single),
227                                          NULL);
228                 gtk_signal_connect_after(GTK_OBJECT(GTK_FILE_SELECTION(filesel)->dir_list),
229                                          "select_row",
230                                          GTK_SIGNAL_FUNC(filesel_dir_list_select_row_single),
231                                          NULL);
232         }
233 }
234
235 static void filesel_ok_cb(GtkWidget *widget, gpointer data)
236 {
237         filesel_ack = TRUE;
238         filesel_fin = TRUE;
239 }
240
241 static void filesel_cancel_cb(GtkWidget *widget, gpointer data)
242 {
243         filesel_ack = FALSE;
244         filesel_fin = TRUE;
245 }
246
247 static gint delete_event(GtkWidget *widget, GdkEventAny *event, gpointer data)
248 {
249         filesel_cancel_cb(NULL, NULL);
250         if (filesel_oldfilename) {
251                 g_free(filesel_oldfilename);
252                 filesel_oldfilename = NULL;
253         }
254         return TRUE;
255 }
256
257 static gboolean key_pressed(GtkWidget *widget, GdkEventKey *event, gpointer data)
258 {
259         if (event && event->keyval == GDK_Escape)
260                 filesel_cancel_cb(NULL, NULL);
261         return FALSE;
262 }
263
264 /* handle both "select_row" and "unselect_row". note that we're using the
265  * entry box to put there the selected file names in. we're not using these
266  * entry box to get the selected file names. instead we use the clist selection.
267  * the entry box is used only to retrieve dir name. */
268 static void filesel_file_list_select_row_multi(GtkCList *clist, gint row, gint col,
269                                                GdkEventButton *event, gpointer userdata)
270 {
271         /* simple implementation in which we clear the file entry and refill it */
272         GList    *list  = clist->selection;
273         GtkEntry *entry = GTK_ENTRY(GTK_FILE_SELECTION(filesel)->selection_entry);
274
275         gtk_editable_delete_text(GTK_EDITABLE(entry), 0, -1);
276
277 #define INVALID_FILENAME_CHARS     " "
278         for (; list; list = list->next) {
279                 gint row = GPOINTER_TO_INT(list->data);
280                 gchar *text = NULL, *tmp;
281
282                 if (!gtk_clist_get_text(clist, row, 0, &text))
283                         break;
284
285                 /* NOTE: quick glance in source code of GtkCList
286                  * reveals we should not free the returned 'text' */
287                 
288                 tmp = g_strconcat(text, " ", NULL);
289                 text = tmp;
290                 gtk_entry_append_text(entry, text); 
291                 g_free(text);
292         }
293 #undef INVALID_FILENAME_CHARS
294 }
295
296 static void filesel_dir_list_select_row_multi(GtkCList *clist, gint row, gint col,
297                                               GdkEventButton *event, gpointer userdata)
298 {
299         GtkEntry *entry     = GTK_ENTRY(GTK_FILE_SELECTION(filesel)->selection_entry);
300         GtkCList *file_list = GTK_CLIST(GTK_FILE_SELECTION(filesel)->file_list);
301
302         /* if dir list is selected we clean everything */
303         gtk_editable_delete_text(GTK_EDITABLE(entry), 0, -1);
304         gtk_clist_unselect_all(file_list);
305 }
306
307 static void filesel_file_list_select_row_single(GtkCList *clist, gint row, gint col,
308                                          GdkEventButton *event, gpointer userdata)
309 {
310         gchar *text;
311
312         if(gtk_clist_get_text(clist, row, 0, &text)) {
313                 filesel_oldfilename = g_strdup(text);
314                 debug_print("%s\n", filesel_oldfilename);
315         } else {
316                 filesel_oldfilename = NULL;
317         }
318 }
319
320 static void filesel_dir_list_select_row_single(GtkCList *clist, gint row, gint col,
321                                         GdkEventButton *event, gpointer userdata)
322 {
323         gchar *buf;
324         GtkEntry *entry = GTK_ENTRY(GTK_FILE_SELECTION(filesel)->selection_entry);
325
326         buf = gtk_editable_get_chars(GTK_EDITABLE(entry), 0, -1);
327         if(filesel_oldfilename && !(*buf)) {
328                 gtk_editable_delete_text(GTK_EDITABLE(entry), 0, -1);
329                 gtk_entry_append_text(entry, filesel_oldfilename);
330         }
331         g_free(buf);
332 }
333
334 static GList *filesel_get_multiple_filenames(void)
335 {
336 #if 0
337         /* as noted before we are not using the entry text when selecting
338          * multiple files. to much hassle to parse out invalid chars (chars
339          * that need to be escaped). instead we use the file_list. the
340          * entry is only useful for extracting the current directory. */
341         GtkCList *file_list  = GTK_CLIST(GTK_FILE_SELECTION(filesel)->file_list);
342         GList    *list = NULL, *sel_list;
343         gchar    *cwd;   
344         gboolean  separator;
345
346         g_return_val_if_fail(file_list->selection != NULL, NULL);
347
348         cwd = g_dirname(gtk_file_selection_get_filename(GTK_FILE_SELECTION(filesel)));
349         g_return_val_if_fail(cwd != NULL, NULL);
350
351         /* only quick way to check the end of a multi byte string for our
352          * separator... */
353         g_strreverse(cwd);
354         separator = 0 == g_strncasecmp(cwd, G_DIR_SEPARATOR_S, strlen(G_DIR_SEPARATOR_S))
355                 ?  TRUE : FALSE;
356         g_strreverse(cwd);
357
358         /* fetch the selected file names */
359         for (sel_list = file_list->selection; sel_list; sel_list = sel_list->next) {
360                 gint   sel = GPOINTER_TO_INT(sel_list->data);
361                 gchar *sel_text = NULL;
362                 gchar *fname = NULL;
363                 
364                 gtk_clist_get_text(file_list, sel, 0, &sel_text);
365                 if (!sel_text) continue;
366                 sel_text = g_strdup(sel_text);
367
368                 if (separator)
369                         fname = g_strconcat(cwd, sel_text, NULL);
370                 else
371                         fname = g_strconcat(cwd, G_DIR_SEPARATOR_S, sel_text, NULL);
372                 
373                 list = g_list_append(list, fname);
374                 g_free(sel_text);
375         }
376         
377         g_free(cwd);
378         
379         return list;
380 #else
381 /* GTK2 : gtk_file_selection_get_selections() returns newly allocated gchar**
382  * all entries have complete path / are non-utf8 / are free()d in caller
383  */
384         GList *list = NULL;
385         gchar **file_list, **list_ptr;
386         
387         file_list = gtk_file_selection_get_selections (GTK_FILE_SELECTION(filesel));
388
389         /* fetch the selected file names */
390         for (list_ptr = file_list; list_ptr && *list_ptr; list_ptr++)
391                 list = g_list_append(list, *list_ptr);
392         g_free(file_list);
393         
394         return list;
395 #endif
396 }
397