replaced gchar* path with FileData *fd
[geeqie.git] / src / view_dir_tree.c
1 /*
2  * GQview
3  * (C) 2006 John Ellis
4  *
5  * Author: John Ellis
6  *
7  * This software is released under the GNU General Public License (GNU GPL).
8  * Please read the included file COPYING for more information.
9  * This software comes with no warranty of any kind, use at your own risk!
10  */
11
12 #include "gqview.h"
13 #include "view_dir_tree.h"
14
15
16 #include "dnd.h"
17 #include "dupe.h"
18 #include "filelist.h"
19 #include "layout.h"
20 #include "layout_image.h"
21 #include "layout_util.h"
22 #include "utilops.h"
23 #include "ui_bookmark.h"
24 #include "ui_fileops.h"
25 #include "ui_menu.h"
26 #include "ui_tree_edit.h"
27
28 #include <gdk/gdkkeysyms.h> /* for keyboard values */
29
30
31 #define VDTREE_INDENT 14
32 #define VDTREE_PAD 4
33
34 enum {
35         DIR_COLUMN_POINTER = 0,
36         DIR_COLUMN_ICON,
37         DIR_COLUMN_NAME,
38         DIR_COLUMN_COLOR,
39         DIR_COLUMN_COUNT
40 };
41
42
43 typedef struct _PathData PathData;
44 struct _PathData
45 {
46         gchar *name;
47         FileData *node;
48 };
49
50 typedef struct _NodeData NodeData;
51 struct _NodeData
52 {
53         FileData *fd;
54         gint expanded;
55         time_t last_update;
56 };
57
58
59 static gint vdtree_populate_path_by_iter(ViewDirTree *vdt, GtkTreeIter *iter, gint force, const gchar *target_path);
60 static FileData *vdtree_populate_path(ViewDirTree *vdt, const gchar *path, gint expand, gint force);
61
62
63 /*
64  *----------------------------------------------------------------------------
65  * utils
66  *----------------------------------------------------------------------------
67  */
68
69 static void set_cursor(GtkWidget *widget, GdkCursorType cursor_type)
70 {
71         GdkCursor *cursor = NULL;
72
73         if (!widget || !widget->window) return;
74
75         if (cursor_type > -1) cursor = gdk_cursor_new (cursor_type);
76         gdk_window_set_cursor (widget->window, cursor);
77         if (cursor) gdk_cursor_unref(cursor);
78         gdk_flush();
79 }
80
81 static void vdtree_busy_push(ViewDirTree *vdt)
82 {
83         if (vdt->busy_ref == 0) set_cursor(vdt->treeview, GDK_WATCH);
84         vdt->busy_ref++;
85 }
86
87 static void vdtree_busy_pop(ViewDirTree *vdt)
88 {
89         if (vdt->busy_ref == 1) set_cursor(vdt->treeview, -1);
90         if (vdt->busy_ref > 0) vdt->busy_ref--;
91 }
92
93 static gint vdtree_find_row(ViewDirTree *vdt, FileData *fd, GtkTreeIter *iter, GtkTreeIter *parent)
94 {
95         GtkTreeModel *store;
96         gint valid;
97
98         store = gtk_tree_view_get_model(GTK_TREE_VIEW(vdt->treeview));
99         if (parent)
100                 {
101                 valid = gtk_tree_model_iter_children(store, iter, parent);
102                 }
103         else
104                 {
105                 valid = gtk_tree_model_get_iter_first(store, iter);
106                 }
107         while (valid)
108                 {
109                 NodeData *nd;
110                 GtkTreeIter found;
111
112                 gtk_tree_model_get(GTK_TREE_MODEL(store), iter, DIR_COLUMN_POINTER, &nd, -1);
113                 if (nd->fd == fd) return TRUE;
114
115                 if (vdtree_find_row(vdt, fd, &found, iter))
116                         {
117                         memcpy(iter, &found, sizeof(found));
118                         return TRUE;
119                         }
120
121                 valid = gtk_tree_model_iter_next(GTK_TREE_MODEL(store), iter);
122                 }
123
124         return FALSE;
125 }
126
127 static void vdtree_icon_set_by_iter(ViewDirTree *vdt, GtkTreeIter *iter, GdkPixbuf *pixbuf)
128 {
129         GtkTreeModel *store;
130         GdkPixbuf *old;
131
132         store = gtk_tree_view_get_model(GTK_TREE_VIEW(vdt->treeview));
133         gtk_tree_model_get(store, iter, DIR_COLUMN_ICON, &old, -1);
134         if (old != vdt->pf->deny)
135                 {
136                 gtk_tree_store_set(GTK_TREE_STORE(store), iter, DIR_COLUMN_ICON, pixbuf, -1);
137                 }
138 }
139
140 static void vdtree_expand_by_iter(ViewDirTree *vdt, GtkTreeIter *iter, gint expand)
141 {
142         GtkTreeModel *store;
143         GtkTreePath *tpath;
144
145         store = gtk_tree_view_get_model(GTK_TREE_VIEW(vdt->treeview));
146         tpath = gtk_tree_model_get_path(store, iter);
147         if (expand)
148                 {
149                 gtk_tree_view_expand_row(GTK_TREE_VIEW(vdt->treeview), tpath, FALSE);
150                 vdtree_icon_set_by_iter(vdt, iter, vdt->pf->open);
151                 }
152         else
153                 {
154                 gtk_tree_view_collapse_row(GTK_TREE_VIEW(vdt->treeview), tpath);
155                 }
156         gtk_tree_path_free(tpath);
157 }
158
159 static void vdtree_expand_by_data(ViewDirTree *vdt, FileData *fd, gint expand)
160 {
161         GtkTreeIter iter;
162
163         if (vdtree_find_row(vdt, fd, &iter, NULL))
164                 {
165                 vdtree_expand_by_iter(vdt, &iter, expand);
166                 }
167 }
168
169 static void vdtree_color_set(ViewDirTree *vdt, FileData *fd, gint color_set)
170 {
171         GtkTreeModel *store;
172         GtkTreeIter iter;
173
174         if (!vdtree_find_row(vdt, fd, &iter, NULL)) return;
175         store = gtk_tree_view_get_model(GTK_TREE_VIEW(vdt->treeview));
176         gtk_tree_store_set(GTK_TREE_STORE(store), &iter, DIR_COLUMN_COLOR, color_set, -1);
177 }
178
179 static gint vdtree_rename_row_cb(TreeEditData *td, const gchar *old, const gchar *new, gpointer data)
180 {
181         ViewDirTree *vdt = data;
182         GtkTreeModel *store;
183         GtkTreeIter iter;
184         NodeData *nd;
185         gchar *old_path;
186         gchar *new_path;
187         gchar *base;
188
189         store = gtk_tree_view_get_model(GTK_TREE_VIEW(vdt->treeview));
190         if (!gtk_tree_model_get_iter(store, &iter, td->path)) return FALSE;
191         gtk_tree_model_get(store, &iter, DIR_COLUMN_POINTER, &nd, -1);
192         if (!nd) return FALSE;
193
194         old_path = g_strdup(nd->fd->path);
195
196         base = remove_level_from_path(old_path);
197         new_path = concat_dir_and_file(base, new);
198         g_free(base);
199
200         if (file_util_rename_dir(nd->fd, new_path, vdt->treeview))
201                 {
202                 vdtree_populate_path(vdt, new_path, TRUE, TRUE);
203
204                 if (vdt->layout && strcmp(vdt->path, old_path) == 0)
205                         {
206                         layout_set_path(vdt->layout, new_path);
207                         }
208                 }
209
210         g_free(old_path);
211         g_free(new_path);
212
213         return FALSE;
214 }
215
216 static void vdtree_rename_by_data(ViewDirTree *vdt, FileData *fd)
217 {
218         GtkTreeModel *store;
219         GtkTreePath *tpath;
220         GtkTreeIter iter;
221
222         if (!fd ||
223             !vdtree_find_row(vdt, fd, &iter, NULL)) return;
224
225         store = gtk_tree_view_get_model(GTK_TREE_VIEW(vdt->treeview));
226         tpath = gtk_tree_model_get_path(store, &iter);
227
228         tree_edit_by_path(GTK_TREE_VIEW(vdt->treeview), tpath, 0, fd->name,
229                           vdtree_rename_row_cb, vdt);
230         gtk_tree_path_free(tpath);
231 }
232
233 static void vdtree_node_free(NodeData *nd)
234 {
235         if (!nd) return;
236
237         file_data_unref(nd->fd);
238         g_free(nd);
239 }
240
241 static void vdtree_popup_destroy_cb(GtkWidget *widget, gpointer data)
242 {
243         ViewDirTree *vdt = data;
244
245         vdtree_color_set(vdt, vdt->click_fd, FALSE);
246         vdt->click_fd = NULL;
247         vdt->popup = NULL;
248
249         vdtree_color_set(vdt, vdt->drop_fd, FALSE);
250         filelist_free(vdt->drop_list);
251         vdt->drop_list = NULL;
252         vdt->drop_fd = NULL;
253 }
254
255 /*
256  *-----------------------------------------------------------------------------
257  * drop menu (from dnd)
258  *-----------------------------------------------------------------------------
259  */
260
261 static void vdtree_drop_menu_copy_cb(GtkWidget *widget, gpointer data)
262 {
263         ViewDirTree *vdt = data;
264         const gchar *path;
265         GList *list;
266
267         if (!vdt->drop_fd) return;
268
269         path = vdt->drop_fd->path;
270         list = vdt->drop_list;
271
272         vdt->drop_list = NULL;
273
274         file_util_copy_simple(list, path);
275 }
276
277 static void vdtree_drop_menu_move_cb(GtkWidget *widget, gpointer data)
278 {
279         ViewDirTree *vdt = data;
280         const gchar *path;
281         GList *list;
282
283         if (!vdt->drop_fd) return;
284
285         path = vdt->drop_fd->path;
286         list = vdt->drop_list;
287
288         vdt->drop_list = NULL;
289
290         file_util_move_simple(list, path);
291 }
292
293 static GtkWidget *vdtree_drop_menu(ViewDirTree *vdt, gint active)
294 {
295         GtkWidget *menu;
296
297         menu = popup_menu_short_lived();
298         g_signal_connect(G_OBJECT(menu), "destroy",
299                          G_CALLBACK(vdtree_popup_destroy_cb), vdt);
300
301         menu_item_add_stock_sensitive(menu, _("_Copy"), GTK_STOCK_COPY, active,
302                                       G_CALLBACK(vdtree_drop_menu_copy_cb), vdt);
303         menu_item_add_sensitive(menu, _("_Move"), active, G_CALLBACK(vdtree_drop_menu_move_cb), vdt);
304
305         menu_item_add_divider(menu);
306         menu_item_add_stock(menu, _("Cancel"), GTK_STOCK_CANCEL, NULL, vdt);
307
308         return menu;
309 }
310
311 /*
312  *-----------------------------------------------------------------------------
313  * pop-up menu
314  *-----------------------------------------------------------------------------
315  */
316
317 static void vdtree_pop_menu_up_cb(GtkWidget *widget, gpointer data)
318 {
319         ViewDirTree *vdt = data;
320         gchar *path;
321
322         if (!vdt->path || strcmp(vdt->path, "/") == 0) return;
323         path = remove_level_from_path(vdt->path);
324
325         if (vdt->select_func)
326                 {
327                 vdt->select_func(vdt, path, vdt->select_data);
328                 }
329
330         g_free(path);
331 }
332
333 static void vdtree_pop_menu_slide_cb(GtkWidget *widget, gpointer data)
334 {
335         ViewDirTree *vdt = data;
336         gchar *path;
337
338         if (!vdt->layout) return;
339
340         if (!vdt->click_fd) return;
341         path = vdt->click_fd->path;
342
343         layout_set_path(vdt->layout, path);
344         layout_select_none(vdt->layout);
345         layout_image_slideshow_stop(vdt->layout);
346         layout_image_slideshow_start(vdt->layout);
347 }
348
349 static void vdtree_pop_menu_slide_rec_cb(GtkWidget *widget, gpointer data)
350 {
351         ViewDirTree *vdt = data;
352         gchar *path;
353         GList *list;
354
355         if (!vdt->layout) return;
356
357         if (!vdt->click_fd) return;
358         path = vdt->click_fd->path;
359
360         list = filelist_recursive(path);
361
362         layout_image_slideshow_stop(vdt->layout);
363         layout_image_slideshow_start_from_list(vdt->layout, list);
364 }
365
366 static void vdtree_pop_menu_dupe(ViewDirTree *vdt, gint recursive)
367 {
368         DupeWindow *dw;
369         GList *list = NULL;
370
371         if (!vdt->click_fd) return;
372
373         if (recursive)
374                 {
375                 list = g_list_append(list, file_data_ref(vdt->click_fd));
376                 }
377         else
378                 {
379                 filelist_read(vdt->click_fd->path, &list, NULL);
380                 list = filelist_filter(list, FALSE);
381                 }
382
383         dw = dupe_window_new(DUPE_MATCH_NAME);
384         dupe_window_add_files(dw, list, recursive);
385
386         filelist_free(list);
387 }
388
389 static void vdtree_pop_menu_dupe_cb(GtkWidget *widget, gpointer data)
390 {
391         ViewDirTree *vdt = data;
392         vdtree_pop_menu_dupe(vdt, FALSE);
393 }
394
395 static void vdtree_pop_menu_dupe_rec_cb(GtkWidget *widget, gpointer data)
396 {
397         ViewDirTree *vdt = data;
398         vdtree_pop_menu_dupe(vdt, TRUE);
399 }
400
401 static void vdtree_pop_menu_new_cb(GtkWidget *widget, gpointer data)
402 {
403         ViewDirTree *vdt = data;
404         const gchar *path;
405         gchar *new_path;
406         gchar *buf;
407
408         if (!vdt->click_fd) return;
409         path = vdt->click_fd->path;
410
411         buf = concat_dir_and_file(path, _("new_folder"));
412         new_path = unique_filename(buf, NULL, NULL, FALSE);
413         g_free(buf);
414         if (!new_path) return;
415
416         if (!mkdir_utf8(new_path, 0755))
417                 {
418                 gchar *text;
419
420                 text = g_strdup_printf(_("Unable to create folder:\n%s"), new_path);
421                 file_util_warning_dialog(_("Error creating folder"), text, GTK_STOCK_DIALOG_ERROR, vdt->treeview);
422                 g_free(text);
423                 }
424         else
425                 {
426                 FileData *fd;
427
428                 fd = vdtree_populate_path(vdt, new_path, TRUE, TRUE);
429
430                 vdtree_rename_by_data(vdt, fd);
431                 }
432
433         g_free(new_path);
434 }
435
436 static void vdtree_pop_menu_rename_cb(GtkWidget *widget, gpointer data)
437 {
438         ViewDirTree *vdt = data;
439
440         vdtree_rename_by_data(vdt, vdt->click_fd);
441 }
442
443 static void vdtree_pop_menu_delete_cb(GtkWidget *widget, gpointer data)
444 {
445         ViewDirTree *vdt = data;
446
447         if (!vdt->click_fd) return;
448         file_util_delete_dir(vdt->click_fd, vdt->widget);
449 }
450
451 static void vdtree_pop_menu_tree_cb(GtkWidget *widget, gpointer data)
452 {
453         ViewDirTree *vdt = data;
454
455         if (vdt->layout) layout_views_set(vdt->layout, FALSE, vdt->layout->icon_view);
456 }
457
458 static void vdtree_pop_menu_refresh_cb(GtkWidget *widget, gpointer data)
459 {
460         ViewDirTree *vdt = data;
461
462         if (vdt->layout) layout_refresh(vdt->layout);
463 }
464
465 static GtkWidget *vdtree_pop_menu(ViewDirTree *vdt, FileData *fd)
466 {
467         GtkWidget *menu;
468         gint active;
469         gint parent_active = FALSE;
470
471         active = (fd != NULL);
472         if (fd)
473                 {
474                 gchar *parent;
475
476                 parent = remove_level_from_path(fd->path);
477                 parent_active = access_file(parent, W_OK | X_OK);
478                 g_free(parent);
479                 }
480
481         menu = popup_menu_short_lived();
482         g_signal_connect(G_OBJECT(menu), "destroy",
483                          G_CALLBACK(vdtree_popup_destroy_cb), vdt);
484
485         menu_item_add_stock_sensitive(menu, _("_Up to parent"), GTK_STOCK_GO_UP,
486                                       (vdt->path && strcmp(vdt->path, "/") != 0),
487                                       G_CALLBACK(vdtree_pop_menu_up_cb), vdt);
488
489         menu_item_add_divider(menu);
490         menu_item_add_sensitive(menu, _("_Slideshow"), active,
491                                 G_CALLBACK(vdtree_pop_menu_slide_cb), vdt);
492         menu_item_add_sensitive(menu, _("Slideshow recursive"), active,
493                                 G_CALLBACK(vdtree_pop_menu_slide_rec_cb), vdt);
494
495         menu_item_add_divider(menu);
496         menu_item_add_stock_sensitive(menu, _("Find _duplicates..."), GTK_STOCK_FIND, active,
497                                       G_CALLBACK(vdtree_pop_menu_dupe_cb), vdt);
498         menu_item_add_stock_sensitive(menu, _("Find duplicates recursive..."), GTK_STOCK_FIND, active,
499                                       G_CALLBACK(vdtree_pop_menu_dupe_rec_cb), vdt);
500
501         menu_item_add_divider(menu);
502
503         active = (fd &&
504                   access_file(fd->path, W_OK | X_OK));
505         menu_item_add_sensitive(menu, _("_New folder..."), active,
506                                 G_CALLBACK(vdtree_pop_menu_new_cb), vdt);
507
508         menu_item_add_sensitive(menu, _("_Rename..."), parent_active,
509                                 G_CALLBACK(vdtree_pop_menu_rename_cb), vdt);
510         menu_item_add_stock_sensitive(menu, _("_Delete..."), GTK_STOCK_DELETE, parent_active,
511                                       G_CALLBACK(vdtree_pop_menu_delete_cb), vdt);
512
513         menu_item_add_divider(menu);
514         menu_item_add_check(menu, _("View as _tree"), TRUE,
515                             G_CALLBACK(vdtree_pop_menu_tree_cb), vdt);
516         menu_item_add_stock(menu, _("Re_fresh"), GTK_STOCK_REFRESH,
517                             G_CALLBACK(vdtree_pop_menu_refresh_cb), vdt);
518
519         return menu;
520 }
521
522 /*
523  *----------------------------------------------------------------------------
524  * dnd
525  *----------------------------------------------------------------------------
526  */
527
528 static GtkTargetEntry vdtree_dnd_drop_types[] = {
529         { "text/uri-list", 0, TARGET_URI_LIST }
530 };
531 static gint vdtree_dnd_drop_types_count = 1;
532
533
534 static void vdtree_dest_set(ViewDirTree *vdt, gint enable)
535 {
536         if (enable)
537                 {
538                 gtk_drag_dest_set(vdt->treeview,
539                                   GTK_DEST_DEFAULT_MOTION | GTK_DEST_DEFAULT_DROP,
540                                   vdtree_dnd_drop_types, vdtree_dnd_drop_types_count,
541                                   GDK_ACTION_MOVE | GDK_ACTION_COPY);
542                 }
543         else
544                 {
545                 gtk_drag_dest_unset(vdt->treeview);
546                 }
547 }
548
549 static void vdtree_dnd_get(GtkWidget *widget, GdkDragContext *context,
550                            GtkSelectionData *selection_data, guint info,
551                            guint time, gpointer data)
552 {
553         ViewDirTree *vdt = data;
554         gchar *path;
555         GList *list;
556         gchar *uri_text = NULL;
557         gint length = 0;
558
559         if (!vdt->click_fd) return;
560
561         switch (info)
562                 {
563                 case TARGET_URI_LIST:
564                 case TARGET_TEXT_PLAIN:
565                         list = g_list_prepend(NULL, vdt->click_fd);
566                         uri_text = uri_text_from_filelist(list, &length, (info == TARGET_TEXT_PLAIN));
567                         g_list_free(list);
568                         break;
569                 }
570
571         if (uri_text)
572                 {
573                 gtk_selection_data_set(selection_data, selection_data->target,
574                                        8, (guchar *)uri_text, length);
575                 g_free(uri_text);
576                 }
577 }
578
579 static void vdtree_dnd_begin(GtkWidget *widget, GdkDragContext *context, gpointer data)
580 {
581         ViewDirTree *vdt = data;
582
583         vdtree_color_set(vdt, vdt->click_fd, TRUE);
584         vdtree_dest_set(vdt, FALSE);
585 }
586
587 static void vdtree_dnd_end(GtkWidget *widget, GdkDragContext *context, gpointer data)
588 {
589         ViewDirTree *vdt = data;
590
591         vdtree_color_set(vdt, vdt->click_fd, FALSE);
592         vdtree_dest_set(vdt, TRUE);
593 }
594
595 static void vdtree_dnd_drop_receive(GtkWidget *widget,
596                                     GdkDragContext *context, gint x, gint y,
597                                     GtkSelectionData *selection_data, guint info,
598                                     guint time, gpointer data)
599 {
600         ViewDirTree *vdt = data;
601         GtkTreePath *tpath;
602         GtkTreeIter iter;
603         FileData *fd = NULL;
604
605         vdt->click_fd = NULL;
606
607         if (gtk_tree_view_get_path_at_pos(GTK_TREE_VIEW(widget), x, y,
608                                           &tpath, NULL, NULL, NULL))
609                 {
610                 GtkTreeModel *store;
611                 NodeData *nd;
612
613                 store = gtk_tree_view_get_model(GTK_TREE_VIEW(widget));
614                 gtk_tree_model_get_iter(store, &iter, tpath);
615                 gtk_tree_model_get(store, &iter, DIR_COLUMN_POINTER, &nd, -1);
616                 gtk_tree_path_free(tpath);
617
618                 fd = (nd) ? nd->fd : NULL;
619                 }
620
621         if (!fd) return;
622
623         if (info == TARGET_URI_LIST)
624                 {
625                 GList *list;
626                 gint active;
627
628                 list = uri_filelist_from_text((gchar *)selection_data->data, TRUE);
629                 if (!list) return;
630
631                 active = access_file(fd->path, W_OK | X_OK);
632
633                 vdtree_color_set(vdt, fd, TRUE);
634                 vdt->popup = vdtree_drop_menu(vdt, active);
635                 gtk_menu_popup(GTK_MENU(vdt->popup), NULL, NULL, NULL, NULL, 0, time);
636
637                 vdt->drop_fd = fd;
638                 vdt->drop_list = list;
639                 }
640 }
641
642 static gint vdtree_dnd_drop_expand_cb(gpointer data)
643 {
644         ViewDirTree *vdt = data;
645         GtkTreeIter iter;
646
647         if (vdt->drop_fd &&
648             vdtree_find_row(vdt, vdt->drop_fd, &iter, NULL))
649                 {
650                 vdtree_populate_path_by_iter(vdt, &iter, FALSE, vdt->path);
651                 vdtree_expand_by_data(vdt, vdt->drop_fd, TRUE);
652                 }
653
654         vdt->drop_expand_id = -1;
655         return FALSE;
656 }
657
658 static void vdtree_dnd_drop_expand_cancel(ViewDirTree *vdt)
659 {
660         if (vdt->drop_expand_id != -1) g_source_remove(vdt->drop_expand_id);
661         vdt->drop_expand_id = -1;
662 }
663
664 static void vdtree_dnd_drop_expand(ViewDirTree *vdt)
665 {
666         vdtree_dnd_drop_expand_cancel(vdt);
667         vdt->drop_expand_id = g_timeout_add(1000, vdtree_dnd_drop_expand_cb, vdt);
668 }
669
670 static void vdtree_drop_update(ViewDirTree *vdt, gint x, gint y)
671 {
672         GtkTreePath *tpath;
673         GtkTreeIter iter;
674         FileData *fd = NULL;
675
676         if (gtk_tree_view_get_path_at_pos(GTK_TREE_VIEW(vdt->treeview), x, y,
677                                           &tpath, NULL, NULL, NULL))
678                 {
679                 GtkTreeModel *store;
680                 NodeData *nd;
681
682                 store = gtk_tree_view_get_model(GTK_TREE_VIEW(vdt->treeview));
683                 gtk_tree_model_get_iter(store, &iter, tpath);
684                 gtk_tree_model_get(store, &iter, DIR_COLUMN_POINTER, &nd, -1);
685                 gtk_tree_path_free(tpath);
686
687                 fd = (nd) ? nd->fd : NULL;
688                 }
689
690         if (fd != vdt->drop_fd)
691                 {
692                 vdtree_color_set(vdt, vdt->drop_fd, FALSE);
693                 vdtree_color_set(vdt, fd, TRUE);
694                 if (fd) vdtree_dnd_drop_expand(vdt);
695                 }
696
697         vdt->drop_fd = fd;
698 }
699
700 static void vdtree_dnd_drop_scroll_cancel(ViewDirTree *vdt)
701 {
702         if (vdt->drop_scroll_id != -1) g_source_remove(vdt->drop_scroll_id);
703         vdt->drop_scroll_id = -1;
704 }
705
706 static gint vdtree_auto_scroll_idle_cb(gpointer data)
707 {
708         ViewDirTree *vdt = data;
709
710         if (vdt->drop_fd)
711                 {
712                 GdkWindow *window;
713                 gint x, y;
714                 gint w, h;
715
716                 window = vdt->treeview->window;
717                 gdk_window_get_pointer(window, &x, &y, NULL);
718                 gdk_drawable_get_size(window, &w, &h);
719                 if (x >= 0 && x < w && y >= 0 && y < h)
720                         {
721                         vdtree_drop_update(vdt, x, y);
722                         }
723                 }
724
725         vdt->drop_scroll_id = -1;
726         return FALSE;
727 }
728
729 static gint vdtree_auto_scroll_notify_cb(GtkWidget *widget, gint x, gint y, gpointer data)
730 {
731         ViewDirTree *vdt = data;
732
733         if (!vdt->drop_fd || vdt->drop_list) return FALSE;
734
735         if (vdt->drop_scroll_id == -1) vdt->drop_scroll_id = g_idle_add(vdtree_auto_scroll_idle_cb, vdt);
736
737         return TRUE;
738 }
739
740 static gint vdtree_dnd_drop_motion(GtkWidget *widget, GdkDragContext *context,
741                                    gint x, gint y, guint time, gpointer data)
742 {
743         ViewDirTree *vdt = data;
744
745         vdt->click_fd = NULL;
746
747         if (gtk_drag_get_source_widget(context) == vdt->treeview)
748                 {
749                 gdk_drag_status(context, 0, time);
750                 return TRUE;
751                 }
752         else
753                 {
754                 gdk_drag_status(context, context->suggested_action, time);
755                 }
756
757         vdtree_drop_update(vdt, x, y);
758
759         if (vdt->drop_fd)
760                 {
761                 GtkAdjustment *adj = gtk_tree_view_get_vadjustment(GTK_TREE_VIEW(vdt->treeview));
762                 widget_auto_scroll_start(vdt->treeview, adj, -1, -1, vdtree_auto_scroll_notify_cb, vdt);
763                 }
764
765         return FALSE;
766 }
767
768 static void vdtree_dnd_drop_leave(GtkWidget *widget, GdkDragContext *context, guint time, gpointer data)
769 {
770         ViewDirTree *vdt = data;
771
772         if (vdt->drop_fd != vdt->click_fd) vdtree_color_set(vdt, vdt->drop_fd, FALSE);
773
774         vdt->drop_fd = NULL;
775
776         vdtree_dnd_drop_expand_cancel(vdt);
777 }
778
779 static void vdtree_dnd_init(ViewDirTree *vdt)
780 {
781         gtk_drag_source_set(vdt->treeview, GDK_BUTTON1_MASK | GDK_BUTTON2_MASK,
782                             dnd_file_drag_types, dnd_file_drag_types_count,
783                             GDK_ACTION_COPY | GDK_ACTION_MOVE | GDK_ACTION_ASK);
784         g_signal_connect(G_OBJECT(vdt->treeview), "drag_data_get",
785                          G_CALLBACK(vdtree_dnd_get), vdt);
786         g_signal_connect(G_OBJECT(vdt->treeview), "drag_begin",
787                          G_CALLBACK(vdtree_dnd_begin), vdt);
788         g_signal_connect(G_OBJECT(vdt->treeview), "drag_end",
789                          G_CALLBACK(vdtree_dnd_end), vdt);
790
791         vdtree_dest_set(vdt, TRUE);
792         g_signal_connect(G_OBJECT(vdt->treeview), "drag_data_received",
793                          G_CALLBACK(vdtree_dnd_drop_receive), vdt);
794         g_signal_connect(G_OBJECT(vdt->treeview), "drag_motion",
795                          G_CALLBACK(vdtree_dnd_drop_motion), vdt);
796         g_signal_connect(G_OBJECT(vdt->treeview), "drag_leave",
797                          G_CALLBACK(vdtree_dnd_drop_leave), vdt);
798 }
799
800 /*
801  *----------------------------------------------------------------------------
802  * parts lists
803  *----------------------------------------------------------------------------
804  */
805
806 static GList *parts_list(const gchar *path)
807 {
808         GList *list = NULL;
809         const gchar *strb, *strp;
810         gint l;
811
812         strp = path;
813
814         if (*strp != '/') return NULL;
815
816         strp++;
817         strb = strp;
818         l = 0;
819
820         while (*strp != '\0')
821                 {
822                 if (*strp == '/')
823                         {
824                         if (l > 0) list = g_list_prepend(list, g_strndup(strb, l));
825                         strp++;
826                         strb = strp;
827                         l = 0;
828                         }
829                 else
830                         {
831                         strp++;
832                         l++;
833                         }
834                 }
835         if (l > 0) list = g_list_prepend(list, g_strndup(strb, l));
836
837         list = g_list_reverse(list);
838
839         list = g_list_prepend(list, g_strdup("/"));
840
841         return list;
842 }
843
844 static void parts_list_free(GList *list)
845 {
846         GList *work = list;
847         while (work)
848                 {
849                 PathData *pd = work->data;
850                 g_free(pd->name);
851                 g_free(pd);
852                 work = work->next;
853                 }
854
855         g_list_free(list);
856 }
857
858 static GList *parts_list_add_node_points(ViewDirTree *vdt, GList *list)
859 {
860         GList *work;
861         GtkTreeModel *store;
862         GtkTreeIter iter;
863         gint valid;
864
865         store = gtk_tree_view_get_model(GTK_TREE_VIEW(vdt->treeview));
866         valid = gtk_tree_model_get_iter_first(store, &iter);
867
868         work = list;
869         while (work)
870                 {
871                 PathData *pd;
872                 FileData *fd = NULL;
873
874                 pd = g_new0(PathData, 1);
875                 pd->name = work->data;
876
877                 while (valid && !fd)
878                         {
879                         NodeData *nd;
880
881                         gtk_tree_model_get(store, &iter, DIR_COLUMN_POINTER, &nd, -1);
882                         if (strcmp(nd->fd->name, pd->name) == 0)
883                                 {
884                                 fd = nd->fd;
885                                 }
886                         else
887                                 {
888                                 valid = gtk_tree_model_iter_next(store, &iter);
889                                 }
890                         }
891
892                 pd->node = fd;
893                 work->data = pd;
894
895                 if (fd)
896                         {
897                         GtkTreeIter parent;
898                         memcpy(&parent, &iter, sizeof(parent));
899                         valid = gtk_tree_model_iter_children(store, &iter, &parent);
900                         }
901
902                 work = work->next;
903                 }
904
905         return list;
906 }
907
908 /*
909  *----------------------------------------------------------------------------
910  * misc
911  *----------------------------------------------------------------------------
912  */
913
914 #if 0
915 static void vdtree_row_deleted_cb(GtkTreeModel *tree_model, GtkTreePath *tpath, gpointer data)
916 {
917         GtkTreeIter iter;
918         NodeData *nd;
919
920         gtk_tree_model_get_iter(tree_model, &iter, tpath);
921         gtk_tree_model_get(tree_model, &iter, DIR_COLUMN_POINTER, &nd, -1);
922
923         if (!nd) return;
924
925         file_data_unref(nd->fd);
926         g_free(nd);
927 }
928 #endif
929
930 /*
931  *----------------------------------------------------------------------------
932  * node traversal, management
933  *----------------------------------------------------------------------------
934  */
935
936 static gint vdtree_find_iter_by_data(ViewDirTree *vdt, GtkTreeIter *parent, NodeData *nd, GtkTreeIter *iter)
937 {
938         GtkTreeModel *store;
939
940         store = gtk_tree_view_get_model(GTK_TREE_VIEW(vdt->treeview));
941         if (!nd || !gtk_tree_model_iter_children(store, iter, parent)) return -1;
942         do      {
943                 NodeData *cnd;
944
945                 gtk_tree_model_get(store, iter, DIR_COLUMN_POINTER, &cnd, -1);
946                 if (cnd == nd) return TRUE;
947                 } while (gtk_tree_model_iter_next(store, iter));
948
949         return FALSE;
950 }
951
952 static NodeData *vdtree_find_iter_by_name(ViewDirTree *vdt, GtkTreeIter *parent, const gchar *name, GtkTreeIter *iter)
953 {
954         GtkTreeModel *store;
955
956         store = gtk_tree_view_get_model(GTK_TREE_VIEW(vdt->treeview));
957         if (!name || !gtk_tree_model_iter_children(store, iter, parent)) return NULL;
958         do      {
959                 NodeData *nd;
960
961                 gtk_tree_model_get(store, iter, DIR_COLUMN_POINTER, &nd, -1);
962                 if (nd && strcmp(nd->fd->name, name) == 0) return nd;
963                 } while (gtk_tree_model_iter_next(store, iter));
964
965         return NULL;
966 }
967
968 static void vdtree_add_by_data(ViewDirTree *vdt, FileData *fd, GtkTreeIter *parent)
969 {
970         GtkTreeStore *store;
971         GtkTreeIter child;
972         NodeData *nd;
973         GdkPixbuf *pixbuf;
974         NodeData *end;
975         GtkTreeIter empty;
976
977         if (!fd) return;
978
979         if (access_file(fd->path, R_OK | X_OK))
980                 {
981                 pixbuf = vdt->pf->close;
982                 }
983         else
984                 {
985                 pixbuf = vdt->pf->deny;
986                 }
987
988         nd = g_new0(NodeData, 1);
989         nd->fd = fd;
990         nd->expanded = FALSE;
991         nd->last_update = time(NULL);
992
993         store = GTK_TREE_STORE(gtk_tree_view_get_model(GTK_TREE_VIEW(vdt->treeview)));
994         gtk_tree_store_append(store, &child, parent);
995         gtk_tree_store_set(store, &child, DIR_COLUMN_POINTER, nd,
996                                          DIR_COLUMN_ICON, pixbuf,
997                                          DIR_COLUMN_NAME, nd->fd->name,
998                                          DIR_COLUMN_COLOR, FALSE, -1);
999
1000         /* all nodes are created with an "empty" node, so that the expander is shown
1001          * this is removed when the child is populated */
1002         end = g_new0(NodeData, 1);
1003         end->fd = file_data_new_simple("");
1004         end->expanded = TRUE;
1005
1006         gtk_tree_store_append(store, &empty, &child);
1007         gtk_tree_store_set(store, &empty, DIR_COLUMN_POINTER, end,
1008                                           DIR_COLUMN_NAME, "empty", -1);
1009
1010         if (parent)
1011                 {
1012                 NodeData *pnd;
1013                 GtkTreePath *tpath;
1014
1015                 gtk_tree_model_get(GTK_TREE_MODEL(store), parent, DIR_COLUMN_POINTER, &pnd, -1);
1016                 tpath = gtk_tree_model_get_path(GTK_TREE_MODEL(store), parent);
1017                 if (tree_descend_subdirs &&
1018                     gtk_tree_view_row_expanded(GTK_TREE_VIEW(vdt->treeview), tpath) &&
1019                     !nd->expanded)
1020                         {
1021                         vdtree_populate_path_by_iter(vdt, &child, FALSE, vdt->path);
1022                         }
1023                 gtk_tree_path_free(tpath);
1024                 }
1025 }
1026
1027 static gint vdtree_populate_path_by_iter(ViewDirTree *vdt, GtkTreeIter *iter, gint force, const gchar *target_path)
1028 {
1029         GtkTreeModel *store;
1030         GList *list;
1031         GList *work;
1032         GList *old;
1033         time_t current_time;
1034         GtkTreeIter child;
1035         NodeData *nd;
1036
1037         store = gtk_tree_view_get_model(GTK_TREE_VIEW(vdt->treeview));
1038         gtk_tree_model_get(store, iter, DIR_COLUMN_POINTER, &nd, -1);
1039
1040         if (!nd) return FALSE;
1041
1042         current_time = time(NULL);
1043         
1044         if (nd->expanded)
1045                 {
1046                 if (!force && current_time - nd->last_update < 10) return TRUE;
1047                 if (!isdir(nd->fd->path))
1048                         {
1049                         if (vdt->click_fd == nd->fd) vdt->click_fd = NULL;
1050                         if (vdt->drop_fd == nd->fd) vdt->drop_fd = NULL;
1051                         gtk_tree_store_remove(GTK_TREE_STORE(store), iter);
1052                         vdtree_node_free(nd);
1053                         return FALSE;
1054                         }
1055                 if (!force && filetime(nd->fd->path) == nd->fd->date) return TRUE;
1056                 }
1057
1058         vdtree_busy_push(vdt);
1059
1060         list = NULL;
1061         filelist_read(nd->fd->path, NULL, &list);
1062
1063         /* when hidden files are not enabled, and the user enters a hidden path,
1064          * allow the tree to display that path by specifically inserting the hidden entries
1065          */
1066         if (!show_dot_files &&
1067             target_path &&
1068             strncmp(nd->fd->path, target_path, strlen(nd->fd->path)) == 0)
1069                 {
1070                 gint n;
1071
1072                 n = strlen(nd->fd->path);
1073                 if (target_path[n] == '/' && target_path[n+1] == '.')
1074                         {
1075                         gchar *name8;
1076                         gchar *namel;
1077                         struct stat sbuf;
1078
1079                         n++;
1080
1081                         while (target_path[n] != '\0' && target_path[n] != '/') n++;
1082                         name8 = g_strndup(target_path, n);
1083                         namel = path_from_utf8(name8);
1084
1085                         if (stat_utf8(name8, &sbuf))
1086                                 {
1087                                 list = g_list_prepend(list, file_data_new_local(namel, &sbuf));
1088                                 }
1089
1090                         g_free(namel);
1091                         g_free(name8);
1092                         }
1093                 }
1094
1095         old = NULL;
1096         if (gtk_tree_model_iter_children(store, &child, iter))
1097                 {
1098                 do      {
1099                         NodeData *cnd;
1100
1101                         gtk_tree_model_get(store, &child, DIR_COLUMN_POINTER, &cnd, -1);
1102                         old = g_list_prepend(old, cnd);
1103                         } while (gtk_tree_model_iter_next(store, &child));
1104                 }
1105
1106         work = list;
1107         while (work)
1108                 {
1109                 FileData *fd;
1110
1111                 fd = work->data;
1112                 work = work->next;
1113
1114                 if (strcmp(fd->name, ".") == 0 || strcmp(fd->name, "..") == 0)
1115                         {
1116                         file_data_unref(fd);
1117                         }
1118                 else
1119                         {
1120                         NodeData *cnd;
1121
1122                         cnd = vdtree_find_iter_by_name(vdt, iter, fd->name, &child);
1123                         if (cnd)
1124                                 {
1125                                 old = g_list_remove(old, cnd);
1126                                 if (cnd->expanded && cnd->fd->date != fd->date &&
1127                                     vdtree_populate_path_by_iter(vdt, &child, FALSE, target_path))
1128                                         {
1129                                         cnd->fd->size = fd->size;
1130                                         cnd->fd->date = fd->date;
1131                                         }
1132
1133                                 file_data_unref(fd);
1134                                 }
1135                         else
1136                                 {
1137                                 vdtree_add_by_data(vdt, fd, iter);
1138                                 }
1139                         }
1140                 }
1141
1142         work = old;
1143         while (work)
1144                 {
1145                 NodeData *cnd = work->data;
1146                 work = work->next;
1147
1148                 if (vdt->click_fd == cnd->fd) vdt->click_fd = NULL;
1149                 if (vdt->drop_fd == cnd->fd) vdt->drop_fd = NULL;
1150
1151                 if (vdtree_find_iter_by_data(vdt, iter, cnd, &child))
1152                         {
1153                         gtk_tree_store_remove(GTK_TREE_STORE(store), &child);
1154                         vdtree_node_free(cnd);
1155                         }
1156                 }
1157
1158         g_list_free(old);
1159         g_list_free(list);
1160
1161         vdtree_busy_pop(vdt);
1162
1163         nd->expanded = TRUE;
1164         nd->last_update = current_time;
1165
1166         return TRUE;
1167 }
1168
1169 static FileData *vdtree_populate_path(ViewDirTree *vdt, const gchar *path, gint expand, gint force)
1170 {
1171         GList *list;
1172         GList *work;
1173         FileData *fd = NULL;
1174
1175         if (!path) return NULL;
1176
1177         vdtree_busy_push(vdt);
1178
1179         list = parts_list(path);
1180         list = parts_list_add_node_points(vdt, list);
1181
1182         work = list;
1183         while (work)
1184                 {
1185                 PathData *pd = work->data;
1186                 if (pd->node == NULL)
1187                         {
1188                         PathData *parent_pd;
1189                         GtkTreeIter parent_iter;
1190                         GtkTreeIter iter;
1191                         NodeData *nd;
1192
1193                         if (work == list)
1194                                 {
1195                                 /* should not happen */
1196                                 printf("vdtree warning, root node not found\n");
1197                                 parts_list_free(list);
1198                                 vdtree_busy_pop(vdt);
1199                                 return NULL;
1200                                 }
1201
1202                         parent_pd = work->prev->data;
1203
1204                         if (!vdtree_find_row(vdt, parent_pd->node, &parent_iter, NULL) ||
1205                             !vdtree_populate_path_by_iter(vdt, &parent_iter, force, path) ||
1206                             (nd = vdtree_find_iter_by_name(vdt, &parent_iter, pd->name, &iter)) == NULL)
1207                                 {
1208                                 printf("vdtree warning, aborted at %s\n", parent_pd->name);
1209                                 parts_list_free(list);
1210                                 vdtree_busy_pop(vdt);
1211                                 return NULL;
1212                                 }
1213
1214                         pd->node = nd->fd;
1215
1216                         if (pd->node)
1217                                 {
1218                                 if (expand)
1219                                         {
1220                                         vdtree_expand_by_iter(vdt, &parent_iter, TRUE);
1221                                         vdtree_expand_by_iter(vdt, &iter, TRUE);
1222                                         }
1223                                 vdtree_populate_path_by_iter(vdt, &iter, force, path);
1224                                 }
1225                         }
1226                 else
1227                         {
1228                         GtkTreeIter iter;
1229
1230                         if (vdtree_find_row(vdt, pd->node, &iter, NULL))
1231                                 {
1232                                 if (expand) vdtree_expand_by_iter(vdt, &iter, TRUE);
1233                                 vdtree_populate_path_by_iter(vdt, &iter, force, path);
1234                                 }
1235                         }
1236
1237                 work = work->next;
1238                 }
1239
1240         work = g_list_last(list);
1241         if (work)
1242                 {
1243                 PathData *pd = work->data;
1244                 fd = pd->node;
1245                 }
1246         parts_list_free(list);
1247
1248         vdtree_busy_pop(vdt);
1249
1250         return fd;
1251 }
1252
1253 /*
1254  *----------------------------------------------------------------------------
1255  * access
1256  *----------------------------------------------------------------------------
1257  */
1258
1259 static gint selection_is_ok = FALSE;
1260
1261 static gboolean vdtree_select_cb(GtkTreeSelection *selection, GtkTreeModel *store, GtkTreePath *tpath,
1262                                  gboolean path_currently_selected, gpointer data)
1263 {
1264         return selection_is_ok;
1265 }
1266
1267 static void vdtree_select_row(ViewDirTree *vdt, FileData *fd)
1268 {
1269         GtkTreeSelection *selection;
1270         GtkTreeIter iter;
1271                                                                                                                                
1272         if (!vdtree_find_row(vdt, fd, &iter, NULL)) return;
1273         selection = gtk_tree_view_get_selection(GTK_TREE_VIEW(vdt->treeview));
1274
1275         /* hack, such that selection is only allowed to be changed from here */
1276         selection_is_ok = TRUE;
1277         gtk_tree_selection_select_iter(selection, &iter);
1278         selection_is_ok = FALSE;
1279
1280         if (!vdtree_populate_path_by_iter(vdt, &iter, FALSE, vdt->path)) return;
1281
1282         vdtree_expand_by_iter(vdt, &iter, TRUE);
1283
1284         if (fd && vdt->select_func)
1285                 {
1286                 vdt->select_func(vdt, fd->path, vdt->select_data);
1287                 }
1288 }
1289
1290 gint vdtree_set_path(ViewDirTree *vdt, const gchar *path)
1291 {
1292         FileData *fd;
1293         GtkTreeIter iter;
1294
1295         if (!path) return FALSE;
1296         if (vdt->path && strcmp(path, vdt->path) == 0) return TRUE;
1297
1298         g_free(vdt->path);
1299         vdt->path = g_strdup(path);
1300
1301         fd = vdtree_populate_path(vdt, vdt->path, TRUE, FALSE);
1302
1303         if (!fd) return FALSE;
1304
1305         if (vdtree_find_row(vdt, fd, &iter, NULL))
1306                 {
1307                 GtkTreeModel *store;
1308                 GtkTreePath *tpath;
1309
1310                 tree_view_row_make_visible(GTK_TREE_VIEW(vdt->treeview), &iter, TRUE);
1311
1312                 store = gtk_tree_view_get_model(GTK_TREE_VIEW(vdt->treeview));
1313                 tpath = gtk_tree_model_get_path(store, &iter);
1314                 gtk_tree_view_set_cursor(GTK_TREE_VIEW(vdt->treeview), tpath, NULL, FALSE);
1315                 gtk_tree_path_free(tpath);
1316
1317                 vdtree_select_row(vdt, fd);
1318                 }
1319
1320         return TRUE;
1321 }
1322
1323 #if 0
1324 const gchar *vdtree_get_path(ViewDirTree *vdt)
1325 {
1326         return vdt->path;
1327 }
1328 #endif
1329
1330 void vdtree_refresh(ViewDirTree *vdt)
1331 {
1332         vdtree_populate_path(vdt, vdt->path, FALSE, TRUE);
1333 }
1334
1335 const gchar *vdtree_row_get_path(ViewDirTree *vdt, gint row)
1336 {
1337         printf("FIXME: no get row path\n");
1338         return NULL;
1339 }
1340
1341 /*
1342  *----------------------------------------------------------------------------
1343  * callbacks
1344  *----------------------------------------------------------------------------
1345  */
1346
1347 static void vdtree_menu_position_cb(GtkMenu *menu, gint *x, gint *y, gboolean *push_in, gpointer data)
1348 {
1349         ViewDirTree *vdt = data;
1350         GtkTreeModel *store;
1351         GtkTreeIter iter;
1352         GtkTreePath *tpath;
1353         gint cw, ch;
1354
1355         if (vdtree_find_row(vdt, vdt->click_fd, &iter, NULL) < 0) return;
1356         store = gtk_tree_view_get_model(GTK_TREE_VIEW(vdt->treeview));
1357         tpath = gtk_tree_model_get_path(store, &iter);
1358         tree_view_get_cell_clamped(GTK_TREE_VIEW(vdt->treeview), tpath, 0, TRUE, x, y, &cw, &ch);
1359         gtk_tree_path_free(tpath);
1360         *y += ch;
1361         popup_menu_position_clamp(menu, x, y, 0);
1362 }
1363
1364 static gint vdtree_press_key_cb(GtkWidget *widget, GdkEventKey *event, gpointer data)
1365 {
1366         ViewDirTree *vdt = data;
1367         GtkTreePath *tpath;
1368         GtkTreeIter iter;
1369         FileData *fd = NULL;
1370
1371         gtk_tree_view_get_cursor(GTK_TREE_VIEW(vdt->treeview), &tpath, NULL);
1372         if (tpath)
1373                 {
1374                 GtkTreeModel *store;
1375                 NodeData *nd;
1376
1377                 store = gtk_tree_view_get_model(GTK_TREE_VIEW(widget));
1378                 gtk_tree_model_get_iter(store, &iter, tpath);
1379                 gtk_tree_model_get(store, &iter, DIR_COLUMN_POINTER, &nd, -1);
1380
1381                 gtk_tree_path_free(tpath);
1382
1383                 fd = (nd) ? nd->fd : NULL;
1384                 }
1385
1386         switch (event->keyval)
1387                 {
1388                 case GDK_Menu:
1389                         vdt->click_fd = fd;
1390                         vdtree_color_set(vdt, vdt->click_fd, TRUE);
1391
1392                         vdt->popup = vdtree_pop_menu(vdt, vdt->click_fd);
1393                         gtk_menu_popup(GTK_MENU(vdt->popup), NULL, NULL, vdtree_menu_position_cb, vdt, 0, GDK_CURRENT_TIME);
1394
1395                         return TRUE;
1396                         break;
1397                 case GDK_plus:
1398                 case GDK_Right:
1399                 case GDK_KP_Add:
1400                         if (fd)
1401                                 {
1402                                 vdtree_populate_path_by_iter(vdt, &iter, FALSE, vdt->path);
1403                                 vdtree_icon_set_by_iter(vdt, &iter, vdt->pf->open);
1404                                 }
1405                         break;
1406                 }
1407
1408         return FALSE;
1409 }
1410
1411 static gint vdtree_clicked_on_expander(GtkTreeView *treeview, GtkTreePath *tpath,
1412                                        GtkTreeViewColumn *column, gint x, gint y, gint *left_of_expander)
1413 {
1414         gint depth;
1415         gint size;
1416         gint sep;
1417         gint exp_width;
1418
1419         if (column != gtk_tree_view_get_expander_column(treeview)) return FALSE;
1420
1421         gtk_widget_style_get(GTK_WIDGET(treeview), "expander-size", &size, "horizontal-separator", &sep, NULL);
1422         depth = gtk_tree_path_get_depth(tpath);
1423
1424         exp_width = sep + size + sep;
1425
1426         if (x <= depth * exp_width)
1427                 {
1428                 if (left_of_expander) *left_of_expander = !(x >= (depth - 1) * exp_width);
1429                 return TRUE;
1430                 }
1431
1432         return FALSE;
1433 }
1434
1435 static gint vdtree_press_cb(GtkWidget *widget, GdkEventButton *bevent, gpointer data)
1436 {
1437         ViewDirTree *vdt = data;
1438         GtkTreePath *tpath;
1439         GtkTreeViewColumn *column;
1440         GtkTreeIter iter;
1441         NodeData *nd = NULL;
1442
1443         if (gtk_tree_view_get_path_at_pos(GTK_TREE_VIEW(widget), bevent->x, bevent->y,
1444                                           &tpath, &column, NULL, NULL))
1445                 {
1446                 GtkTreeModel *store;
1447                 gint left_of_expander;
1448
1449                 store = gtk_tree_view_get_model(GTK_TREE_VIEW(widget));
1450                 gtk_tree_model_get_iter(store, &iter, tpath);
1451                 gtk_tree_model_get(store, &iter, DIR_COLUMN_POINTER, &nd, -1);
1452                 gtk_tree_view_set_cursor(GTK_TREE_VIEW(widget), tpath, NULL, FALSE);
1453
1454                 if (vdtree_clicked_on_expander(GTK_TREE_VIEW(widget), tpath, column, bevent->x, bevent->y, &left_of_expander))
1455                         {
1456                         vdt->click_fd = NULL;
1457
1458                         /* clicking this region should automatically reveal an expander, if necessary
1459                          * treeview bug: the expander will not expand until a button_motion_event highlights it.
1460                          */
1461                         if (bevent->button == 1 &&
1462                             !left_of_expander &&
1463                             !gtk_tree_view_row_expanded(GTK_TREE_VIEW(vdt->treeview), tpath))
1464                                 {
1465                                 vdtree_populate_path_by_iter(vdt, &iter, FALSE, vdt->path);
1466                                 vdtree_icon_set_by_iter(vdt, &iter, vdt->pf->open);
1467                                 }
1468
1469                         gtk_tree_path_free(tpath);
1470                         return FALSE;
1471                         }
1472
1473                 gtk_tree_path_free(tpath);
1474                 }
1475
1476         vdt->click_fd = (nd) ? nd->fd : NULL;
1477         vdtree_color_set(vdt, vdt->click_fd, TRUE);
1478
1479         if (bevent->button == 3)
1480                 {
1481                 vdt->popup = vdtree_pop_menu(vdt, vdt->click_fd);
1482                 gtk_menu_popup(GTK_MENU(vdt->popup), NULL, NULL, NULL, NULL,
1483                                bevent->button, bevent->time);
1484                 }
1485
1486         return (bevent->button != 1);
1487 }
1488
1489 static gint vdtree_release_cb(GtkWidget *widget, GdkEventButton *bevent, gpointer data)
1490 {
1491         ViewDirTree *vdt = data;
1492         GtkTreePath *tpath;
1493         GtkTreeIter iter;
1494         NodeData *nd = NULL;
1495
1496         if (!vdt->click_fd) return FALSE;
1497         vdtree_color_set(vdt, vdt->click_fd, FALSE);
1498
1499         if (bevent->button != 1) return TRUE;
1500
1501         if ((bevent->x != 0 || bevent->y != 0) &&
1502             gtk_tree_view_get_path_at_pos(GTK_TREE_VIEW(widget), bevent->x, bevent->y,
1503                                           &tpath, NULL, NULL, NULL))
1504                 {
1505                 GtkTreeModel *store;
1506
1507                 store = gtk_tree_view_get_model(GTK_TREE_VIEW(widget));
1508                 gtk_tree_model_get_iter(store, &iter, tpath);
1509                 gtk_tree_model_get(store, &iter, DIR_COLUMN_POINTER, &nd, -1);
1510                 gtk_tree_path_free(tpath);
1511                 }
1512
1513         if (nd && vdt->click_fd == nd->fd)
1514                 {
1515                 vdtree_select_row(vdt, vdt->click_fd);
1516                 }
1517
1518         return FALSE;
1519 }
1520
1521 static void vdtree_row_expanded(GtkTreeView *treeview, GtkTreeIter *iter, GtkTreePath *tpath, gpointer data)
1522 {
1523         ViewDirTree *vdt = data;
1524
1525         vdtree_populate_path_by_iter(vdt, iter, FALSE, NULL);
1526         vdtree_icon_set_by_iter(vdt, iter, vdt->pf->open);
1527 }
1528
1529 static void vdtree_row_collapsed(GtkTreeView *treeview, GtkTreeIter *iter, GtkTreePath *tpath, gpointer data)
1530 {
1531         ViewDirTree *vdt = data;
1532
1533         vdtree_icon_set_by_iter(vdt, iter, vdt->pf->close);
1534 }
1535
1536 static gint vdtree_sort_cb(GtkTreeModel *store, GtkTreeIter *a, GtkTreeIter *b, gpointer data)
1537 {
1538         NodeData *nda;
1539         NodeData *ndb;
1540
1541         gtk_tree_model_get(store, a, DIR_COLUMN_POINTER, &nda, -1);
1542         gtk_tree_model_get(store, b, DIR_COLUMN_POINTER, &ndb, -1);
1543
1544         return CASE_SORT(nda->fd->name, ndb->fd->name);
1545 }
1546
1547 /*
1548  *----------------------------------------------------------------------------
1549  * core
1550  *----------------------------------------------------------------------------
1551  */
1552
1553 static void vdtree_setup_root(ViewDirTree *vdt)
1554 {
1555         const gchar *path = "/";
1556         FileData *fd;
1557
1558
1559         fd = file_data_new_simple(path);
1560         vdtree_add_by_data(vdt, fd, NULL);
1561
1562         vdtree_expand_by_data(vdt, fd, TRUE);
1563         vdtree_populate_path(vdt, path, FALSE, FALSE);
1564 }
1565
1566 static void vdtree_activate_cb(GtkTreeView *tview, GtkTreePath *tpath, GtkTreeViewColumn *column, gpointer data)
1567 {
1568         ViewDirTree *vdt = data;
1569         GtkTreeModel *store;
1570         GtkTreeIter iter;
1571         NodeData *nd;
1572
1573         store = gtk_tree_view_get_model(tview);
1574         gtk_tree_model_get_iter(store, &iter, tpath);
1575         gtk_tree_model_get(store, &iter, DIR_COLUMN_POINTER, &nd, -1);
1576
1577         vdtree_select_row(vdt, nd->fd);
1578 }
1579
1580 static GdkColor *vdtree_color_shifted(GtkWidget *widget)
1581 {
1582         static GdkColor color;
1583         static GtkWidget *done = NULL;
1584
1585         if (done != widget)
1586                 {
1587                 GtkStyle *style;
1588
1589                 style = gtk_widget_get_style(widget);
1590                 memcpy(&color, &style->base[GTK_STATE_NORMAL], sizeof(color));
1591                 shift_color(&color, -1, 0);
1592                 done = widget;
1593                 }
1594
1595         return &color;
1596 }
1597
1598 static void vdtree_color_cb(GtkTreeViewColumn *tree_column, GtkCellRenderer *cell,
1599                             GtkTreeModel *tree_model, GtkTreeIter *iter, gpointer data)
1600 {
1601         ViewDirTree *vdt = data;
1602         gboolean set;
1603
1604         gtk_tree_model_get(tree_model, iter, DIR_COLUMN_COLOR, &set, -1);
1605         g_object_set(G_OBJECT(cell),
1606                      "cell-background-gdk", vdtree_color_shifted(vdt->treeview),
1607                      "cell-background-set", set, NULL);
1608 }
1609
1610 static gboolean vdtree_destroy_node_cb(GtkTreeModel *store, GtkTreePath *tpath, GtkTreeIter *iter, gpointer data)
1611 {
1612         NodeData *nd;
1613
1614         gtk_tree_model_get(store, iter, DIR_COLUMN_POINTER, &nd, -1);
1615         vdtree_node_free(nd);
1616
1617         return FALSE;
1618 }
1619
1620 static void vdtree_destroy_cb(GtkWidget *widget, gpointer data)
1621 {
1622         ViewDirTree *vdt = data;
1623         GtkTreeModel *store;
1624
1625         if (vdt->popup)
1626                 {
1627                 g_signal_handlers_disconnect_matched(G_OBJECT(vdt->popup), G_SIGNAL_MATCH_DATA,
1628                                                      0, 0, 0, NULL, vdt);
1629                 gtk_widget_destroy(vdt->popup);
1630                 }
1631
1632         vdtree_dnd_drop_expand_cancel(vdt);
1633         vdtree_dnd_drop_scroll_cancel(vdt);
1634         widget_auto_scroll_stop(vdt->treeview);
1635
1636         store = gtk_tree_view_get_model(GTK_TREE_VIEW(vdt->treeview));
1637         gtk_tree_model_foreach(store, vdtree_destroy_node_cb, vdt);
1638
1639         filelist_free(vdt->drop_list);
1640
1641         folder_icons_free(vdt->pf);
1642
1643         g_free(vdt->path);
1644         g_free(vdt);
1645 }
1646
1647 ViewDirTree *vdtree_new(const gchar *path, gint expand)
1648 {
1649         ViewDirTree *vdt;
1650         GtkTreeStore *store;
1651         GtkTreeSelection *selection;
1652         GtkTreeViewColumn *column;
1653         GtkCellRenderer *renderer;
1654
1655         vdt = g_new0(ViewDirTree, 1);
1656
1657         vdt->path = NULL;
1658         vdt->click_fd = NULL;
1659
1660         vdt->drop_fd = NULL;
1661         vdt->drop_list = NULL;
1662         vdt->drop_scroll_id = -1;
1663         vdt->drop_expand_id = -1;
1664
1665         vdt->popup = NULL;
1666
1667         vdt->busy_ref = 0;
1668
1669         vdt->widget = gtk_scrolled_window_new(NULL, NULL);
1670         gtk_scrolled_window_set_shadow_type(GTK_SCROLLED_WINDOW(vdt->widget), GTK_SHADOW_IN);
1671         gtk_scrolled_window_set_policy(GTK_SCROLLED_WINDOW(vdt->widget),
1672                                        GTK_POLICY_AUTOMATIC, GTK_POLICY_ALWAYS);
1673         g_signal_connect(G_OBJECT(vdt->widget), "destroy",
1674                          G_CALLBACK(vdtree_destroy_cb), vdt);
1675
1676         store = gtk_tree_store_new(4, G_TYPE_POINTER, GDK_TYPE_PIXBUF, G_TYPE_STRING, G_TYPE_INT);
1677         vdt->treeview = gtk_tree_view_new_with_model(GTK_TREE_MODEL(store));
1678         g_object_unref(store);
1679
1680         gtk_tree_view_set_headers_visible(GTK_TREE_VIEW(vdt->treeview), FALSE);
1681         gtk_tree_view_set_enable_search(GTK_TREE_VIEW(vdt->treeview), FALSE);
1682         gtk_tree_sortable_set_default_sort_func(GTK_TREE_SORTABLE(store), vdtree_sort_cb, vdt, NULL);
1683         gtk_tree_sortable_set_sort_column_id(GTK_TREE_SORTABLE(store),
1684                                              GTK_TREE_SORTABLE_DEFAULT_SORT_COLUMN_ID, GTK_SORT_ASCENDING);
1685
1686         g_signal_connect(G_OBJECT(vdt->treeview), "row_activated",
1687                          G_CALLBACK(vdtree_activate_cb), vdt);
1688         g_signal_connect(G_OBJECT(vdt->treeview), "row_expanded",
1689                          G_CALLBACK(vdtree_row_expanded), vdt);
1690         g_signal_connect(G_OBJECT(vdt->treeview), "row_collapsed",
1691                          G_CALLBACK(vdtree_row_collapsed), vdt);
1692 #if 0
1693         g_signal_connect(G_OBJECT(store), "row_deleted",
1694                          G_CALLBACK(vdtree_row_deleted_cb), vdt);
1695 #endif
1696
1697         selection = gtk_tree_view_get_selection(GTK_TREE_VIEW(vdt->treeview));
1698         gtk_tree_selection_set_mode(selection, GTK_SELECTION_SINGLE);
1699         gtk_tree_selection_set_select_function(selection, vdtree_select_cb, vdt, NULL);
1700
1701         column = gtk_tree_view_column_new();
1702         gtk_tree_view_column_set_sizing(column, GTK_TREE_VIEW_COLUMN_GROW_ONLY);
1703
1704         renderer = gtk_cell_renderer_pixbuf_new();
1705         gtk_tree_view_column_pack_start(column, renderer, FALSE);
1706         gtk_tree_view_column_add_attribute(column, renderer, "pixbuf", DIR_COLUMN_ICON);
1707         gtk_tree_view_column_set_cell_data_func(column, renderer, vdtree_color_cb, vdt, NULL);
1708
1709         renderer = gtk_cell_renderer_text_new();
1710         gtk_tree_view_column_pack_start(column, renderer, TRUE);
1711         gtk_tree_view_column_add_attribute(column, renderer, "text", DIR_COLUMN_NAME);
1712         gtk_tree_view_column_set_cell_data_func(column, renderer, vdtree_color_cb, vdt, NULL);
1713
1714         gtk_tree_view_append_column(GTK_TREE_VIEW(vdt->treeview), column);
1715
1716         g_signal_connect(G_OBJECT(vdt->treeview), "key_press_event",
1717                          G_CALLBACK(vdtree_press_key_cb), vdt);
1718
1719         gtk_container_add(GTK_CONTAINER(vdt->widget), vdt->treeview);
1720         gtk_widget_show(vdt->treeview);
1721
1722         vdt->pf = folder_icons_new();
1723
1724         vdtree_setup_root(vdt);
1725
1726         vdtree_dnd_init(vdt);
1727
1728         g_signal_connect(G_OBJECT(vdt->treeview), "button_press_event",
1729                          G_CALLBACK(vdtree_press_cb), vdt);
1730         g_signal_connect(G_OBJECT(vdt->treeview), "button_release_event",
1731                          G_CALLBACK(vdtree_release_cb), vdt);
1732
1733         vdtree_set_path(vdt, path);
1734
1735         return vdt;
1736 }
1737
1738 void vdtree_set_select_func(ViewDirTree *vdt,
1739                             void (*func)(ViewDirTree *vdt, const gchar *path, gpointer data), gpointer data)
1740 {
1741         vdt->select_func = func;
1742         vdt->select_data = data;
1743 }
1744
1745 #if 0
1746 void vdtree_set_click_func(ViewDirTree *vdt,
1747                            void (*func)(ViewDirTree *vdt, GdkEventButton *event, FileData *fd, gpointer), gpointer data)
1748 {
1749         if (!td) return;
1750         vdt->click_func = func;
1751         vdt->click_data = data;
1752 }
1753 #endif
1754
1755 void vdtree_set_layout(ViewDirTree *vdt, LayoutWindow *layout)
1756 {
1757         vdt->layout = layout;
1758 }
1759