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