replaced directory path with FileData* dir_fd
[geeqie.git] / src / view_dir_tree.c
1 /*
2  * Geeqie
3  * (C) 2006 John Ellis
4  * Copyright (C) 2008 The Geeqie Team
5  *
6  * Author: John Ellis
7  *
8  * This software is released under the GNU General Public License (GNU GPL).
9  * Please read the included file COPYING for more information.
10  * This software comes with no warranty of any kind, use at your own risk!
11  */
12
13 #include "main.h"
14 #include "view_dir_tree.h"
15
16
17 #include "dnd.h"
18 #include "dupe.h"
19 #include "filedata.h"
20 #include "layout.h"
21 #include "layout_image.h"
22 #include "layout_util.h"
23 #include "utilops.h"
24 #include "ui_bookmark.h"
25 #include "ui_fileops.h"
26 #include "ui_menu.h"
27 #include "ui_tree_edit.h"
28 #include "view_dir.h"
29
30 #include <gdk/gdkkeysyms.h> /* for keyboard values */
31
32
33 #define VDTREE_INFO(_vd_, _part_) (((ViewDirInfoTree *)(_vd_->info))->_part_)
34
35
36 typedef struct _PathData PathData;
37 struct _PathData
38 {
39         gchar *name;
40         FileData *node;
41 };
42
43
44
45 static gint vdtree_populate_path_by_iter(ViewDir *vd, GtkTreeIter *iter, gint force, FileData *target_fd);
46
47
48 /*
49  *----------------------------------------------------------------------------
50  * utils
51  *----------------------------------------------------------------------------
52  */
53
54 static void set_cursor(GtkWidget *widget, GdkCursorType cursor_type)
55 {
56         GdkCursor *cursor = NULL;
57
58         if (!widget || !widget->window) return;
59
60         if (cursor_type > -1) cursor = gdk_cursor_new(cursor_type);
61         gdk_window_set_cursor(widget->window, cursor);
62         if (cursor) gdk_cursor_unref(cursor);
63         gdk_flush();
64 }
65
66 static void vdtree_busy_push(ViewDir *vd)
67 {
68         if (VDTREE_INFO(vd, busy_ref) == 0) set_cursor(vd->view, GDK_WATCH);
69         VDTREE_INFO(vd, busy_ref)++;
70 }
71
72 static void vdtree_busy_pop(ViewDir *vd)
73 {
74         if (VDTREE_INFO(vd, busy_ref) == 1) set_cursor(vd->view, -1);
75         if (VDTREE_INFO(vd, busy_ref) > 0) VDTREE_INFO(vd, busy_ref)--;
76 }
77
78 gint vdtree_find_row(ViewDir *vd, FileData *fd, GtkTreeIter *iter, GtkTreeIter *parent)
79 {
80         GtkTreeModel *store;
81         gint valid;
82
83         store = gtk_tree_view_get_model(GTK_TREE_VIEW(vd->view));
84         if (parent)
85                 {
86                 valid = gtk_tree_model_iter_children(store, iter, parent);
87                 }
88         else
89                 {
90                 valid = gtk_tree_model_get_iter_first(store, iter);
91                 }
92         while (valid)
93                 {
94                 NodeData *nd;
95                 GtkTreeIter found;
96
97                 gtk_tree_model_get(GTK_TREE_MODEL(store), iter, DIR_COLUMN_POINTER, &nd, -1);
98                 if (nd->fd == fd) return TRUE;
99
100                 if (vdtree_find_row(vd, fd, &found, iter))
101                         {
102                         memcpy(iter, &found, sizeof(found));
103                         return TRUE;
104                         }
105
106                 valid = gtk_tree_model_iter_next(GTK_TREE_MODEL(store), iter);
107                 }
108
109         return FALSE;
110 }
111
112 static void vdtree_icon_set_by_iter(ViewDir *vd, GtkTreeIter *iter, GdkPixbuf *pixbuf)
113 {
114         GtkTreeModel *store;
115         GdkPixbuf *old;
116
117         store = gtk_tree_view_get_model(GTK_TREE_VIEW(vd->view));
118         gtk_tree_model_get(store, iter, DIR_COLUMN_ICON, &old, -1);
119         if (old != vd->pf->deny)
120                 {
121                 gtk_tree_store_set(GTK_TREE_STORE(store), iter, DIR_COLUMN_ICON, pixbuf, -1);
122                 }
123 }
124
125 static void vdtree_expand_by_iter(ViewDir *vd, GtkTreeIter *iter, gint expand)
126 {
127         GtkTreeModel *store;
128         GtkTreePath *tpath;
129
130         store = gtk_tree_view_get_model(GTK_TREE_VIEW(vd->view));
131         tpath = gtk_tree_model_get_path(store, iter);
132         if (expand)
133                 {
134                 gtk_tree_view_expand_row(GTK_TREE_VIEW(vd->view), tpath, FALSE);
135                 vdtree_icon_set_by_iter(vd, iter, vd->pf->open);
136                 }
137         else
138                 {
139                 gtk_tree_view_collapse_row(GTK_TREE_VIEW(vd->view), tpath);
140                 }
141         gtk_tree_path_free(tpath);
142 }
143
144 static void vdtree_expand_by_data(ViewDir *vd, FileData *fd, gint expand)
145 {
146         GtkTreeIter iter;
147
148         if (vd_find_row(vd, fd, &iter))
149                 {
150                 vdtree_expand_by_iter(vd, &iter, expand);
151                 }
152 }
153
154 static void vdtree_node_free(NodeData *nd)
155 {
156         if (!nd) return;
157
158         file_data_unref(nd->fd);
159         g_free(nd);
160 }
161
162 /*
163  *----------------------------------------------------------------------------
164  * dnd
165  *----------------------------------------------------------------------------
166  */
167
168 static gint vdtree_dnd_drop_expand_cb(gpointer data)
169 {
170         ViewDir *vd = data;
171         GtkTreeIter iter;
172
173         if (vd->drop_fd && vd_find_row(vd, vd->drop_fd, &iter))
174                 {
175                 vdtree_populate_path_by_iter(vd, &iter, FALSE, vd->dir_fd);
176                 vdtree_expand_by_data(vd, vd->drop_fd, TRUE);
177                 }
178
179         VDTREE_INFO(vd, drop_expand_id) = -1;
180         return FALSE;
181 }
182
183 static void vdtree_dnd_drop_expand_cancel(ViewDir *vd)
184 {
185         if (VDTREE_INFO(vd, drop_expand_id) != -1) g_source_remove(VDTREE_INFO(vd, drop_expand_id));
186         VDTREE_INFO(vd, drop_expand_id) = -1;
187 }
188
189 static void vdtree_dnd_drop_expand(ViewDir *vd)
190 {
191         vdtree_dnd_drop_expand_cancel(vd);
192         VDTREE_INFO(vd, drop_expand_id) = g_timeout_add(1000, vdtree_dnd_drop_expand_cb, vd);
193 }
194
195 /*
196  *----------------------------------------------------------------------------
197  * parts lists
198  *----------------------------------------------------------------------------
199  */
200
201 static GList *parts_list(const gchar *path)
202 {
203         GList *list = NULL;
204         const gchar *strb, *strp;
205         gint l;
206
207         strp = path;
208
209         if (*strp != G_DIR_SEPARATOR) return NULL;
210
211         strp++;
212         strb = strp;
213         l = 0;
214
215         while (*strp != '\0')
216                 {
217                 if (*strp == G_DIR_SEPARATOR)
218                         {
219                         if (l > 0) list = g_list_prepend(list, g_strndup(strb, l));
220                         strp++;
221                         strb = strp;
222                         l = 0;
223                         }
224                 else
225                         {
226                         strp++;
227                         l++;
228                         }
229                 }
230         if (l > 0) list = g_list_prepend(list, g_strndup(strb, l));
231
232         list = g_list_reverse(list);
233
234         list = g_list_prepend(list, g_strdup(G_DIR_SEPARATOR_S));
235
236         return list;
237 }
238
239 static void parts_list_free(GList *list)
240 {
241         GList *work = list;
242         while (work)
243                 {
244                 PathData *pd = work->data;
245                 g_free(pd->name);
246                 g_free(pd);
247                 work = work->next;
248                 }
249
250         g_list_free(list);
251 }
252
253 static GList *parts_list_add_node_points(ViewDir *vd, GList *list)
254 {
255         GList *work;
256         GtkTreeModel *store;
257         GtkTreeIter iter;
258         gint valid;
259
260         store = gtk_tree_view_get_model(GTK_TREE_VIEW(vd->view));
261         valid = gtk_tree_model_get_iter_first(store, &iter);
262
263         work = list;
264         while (work)
265                 {
266                 PathData *pd;
267                 FileData *fd = NULL;
268
269                 pd = g_new0(PathData, 1);
270                 pd->name = work->data;
271
272                 while (valid && !fd)
273                         {
274                         NodeData *nd;
275
276                         gtk_tree_model_get(store, &iter, DIR_COLUMN_POINTER, &nd, -1);
277                         if (strcmp(nd->fd->name, pd->name) == 0)
278                                 {
279                                 fd = nd->fd;
280                                 }
281                         else
282                                 {
283                                 valid = gtk_tree_model_iter_next(store, &iter);
284                                 }
285                         }
286
287                 pd->node = fd;
288                 work->data = pd;
289
290                 if (fd)
291                         {
292                         GtkTreeIter parent;
293                         memcpy(&parent, &iter, sizeof(parent));
294                         valid = gtk_tree_model_iter_children(store, &iter, &parent);
295                         }
296
297                 work = work->next;
298                 }
299
300         return list;
301 }
302
303 /*
304  *----------------------------------------------------------------------------
305  * misc
306  *----------------------------------------------------------------------------
307  */
308
309 #if 0
310 static void vdtree_row_deleted_cb(GtkTreeModel *tree_model, GtkTreePath *tpath, gpointer data)
311 {
312         GtkTreeIter iter;
313         NodeData *nd;
314
315         gtk_tree_model_get_iter(tree_model, &iter, tpath);
316         gtk_tree_model_get(tree_model, &iter, DIR_COLUMN_POINTER, &nd, -1);
317
318         if (!nd) return;
319
320         file_data_unref(nd->fd);
321         g_free(nd);
322 }
323 #endif
324
325 /*
326  *----------------------------------------------------------------------------
327  * node traversal, management
328  *----------------------------------------------------------------------------
329  */
330
331 static gint vdtree_find_iter_by_data(ViewDir *vd, GtkTreeIter *parent, NodeData *nd, GtkTreeIter *iter)
332 {
333         GtkTreeModel *store;
334
335         store = gtk_tree_view_get_model(GTK_TREE_VIEW(vd->view));
336         if (!nd || !gtk_tree_model_iter_children(store, iter, parent)) return -1;
337         do      {
338                 NodeData *cnd;
339
340                 gtk_tree_model_get(store, iter, DIR_COLUMN_POINTER, &cnd, -1);
341                 if (cnd == nd) return TRUE;
342                 } while (gtk_tree_model_iter_next(store, iter));
343
344         return FALSE;
345 }
346
347 static NodeData *vdtree_find_iter_by_name(ViewDir *vd, GtkTreeIter *parent, const gchar *name, GtkTreeIter *iter)
348 {
349         GtkTreeModel *store;
350
351         store = gtk_tree_view_get_model(GTK_TREE_VIEW(vd->view));
352         if (!name || !gtk_tree_model_iter_children(store, iter, parent)) return NULL;
353         do      {
354                 NodeData *nd;
355
356                 gtk_tree_model_get(store, iter, DIR_COLUMN_POINTER, &nd, -1);
357                 if (nd && strcmp(nd->fd->name, name) == 0) return nd;
358                 } while (gtk_tree_model_iter_next(store, iter));
359
360         return NULL;
361 }
362
363 static void vdtree_add_by_data(ViewDir *vd, FileData *fd, GtkTreeIter *parent)
364 {
365         GtkTreeStore *store;
366         GtkTreeIter child;
367         NodeData *nd;
368         GdkPixbuf *pixbuf;
369         NodeData *end;
370         GtkTreeIter empty;
371
372         if (!fd) return;
373
374         if (access_file(fd->path, R_OK | X_OK))
375                 {
376                 pixbuf = vd->pf->close;
377                 }
378         else
379                 {
380                 pixbuf = vd->pf->deny;
381                 }
382
383         nd = g_new0(NodeData, 1);
384         nd->fd = fd;
385         nd->expanded = FALSE;
386         nd->last_update = time(NULL);
387
388         store = GTK_TREE_STORE(gtk_tree_view_get_model(GTK_TREE_VIEW(vd->view)));
389         gtk_tree_store_append(store, &child, parent);
390         gtk_tree_store_set(store, &child, DIR_COLUMN_POINTER, nd,
391                                          DIR_COLUMN_ICON, pixbuf,
392                                          DIR_COLUMN_NAME, nd->fd->name,
393                                          DIR_COLUMN_COLOR, FALSE, -1);
394
395         /* all nodes are created with an "empty" node, so that the expander is shown
396          * this is removed when the child is populated */
397         end = g_new0(NodeData, 1);
398         end->fd = file_data_new_simple("");
399         end->expanded = TRUE;
400
401         gtk_tree_store_append(store, &empty, &child);
402         gtk_tree_store_set(store, &empty, DIR_COLUMN_POINTER, end,
403                                           DIR_COLUMN_NAME, "empty", -1);
404
405         if (parent)
406                 {
407                 NodeData *pnd;
408                 GtkTreePath *tpath;
409
410                 gtk_tree_model_get(GTK_TREE_MODEL(store), parent, DIR_COLUMN_POINTER, &pnd, -1);
411                 tpath = gtk_tree_model_get_path(GTK_TREE_MODEL(store), parent);
412                 if (options->tree_descend_subdirs &&
413                     gtk_tree_view_row_expanded(GTK_TREE_VIEW(vd->view), tpath) &&
414                     !nd->expanded)
415                         {
416                         vdtree_populate_path_by_iter(vd, &child, FALSE, vd->dir_fd);
417                         }
418                 gtk_tree_path_free(tpath);
419                 }
420 }
421
422 static gint vdtree_populate_path_by_iter(ViewDir *vd, GtkTreeIter *iter, gint force, FileData *target_fd)
423 {
424         GtkTreeModel *store;
425         GList *list;
426         GList *work;
427         GList *old;
428         time_t current_time;
429         GtkTreeIter child;
430         NodeData *nd;
431
432         store = gtk_tree_view_get_model(GTK_TREE_VIEW(vd->view));
433         gtk_tree_model_get(store, iter, DIR_COLUMN_POINTER, &nd, -1);
434
435         if (!nd) return FALSE;
436
437         current_time = time(NULL);
438
439         if (nd->expanded)
440                 {
441                 if (!force && current_time - nd->last_update < 10) return TRUE;
442                 if (!isdir(nd->fd->path))
443                         {
444                         if (vd->click_fd == nd->fd) vd->click_fd = NULL;
445                         if (vd->drop_fd == nd->fd) vd->drop_fd = NULL;
446                         gtk_tree_store_remove(GTK_TREE_STORE(store), iter);
447                         vdtree_node_free(nd);
448                         return FALSE;
449                         }
450                 if (!force && filetime(nd->fd->path) == nd->fd->date) return TRUE;
451                 }
452
453         vdtree_busy_push(vd);
454
455         filelist_read(nd->fd, NULL, &list);
456
457         /* when hidden files are not enabled, and the user enters a hidden path,
458          * allow the tree to display that path by specifically inserting the hidden entries
459          */
460         if (!options->file_filter.show_hidden_files &&
461             target_fd &&
462             strncmp(nd->fd->path, target_fd->path, strlen(nd->fd->path)) == 0)
463                 {
464                 gint n;
465
466                 n = strlen(nd->fd->path);
467                 if (target_fd->path[n] == G_DIR_SEPARATOR && target_fd->path[n+1] == '.')
468                         {
469                         gchar *name8;
470                         struct stat sbuf;
471
472                         n++;
473
474                         while (target_fd->path[n] != '\0' && target_fd->path[n] != G_DIR_SEPARATOR) n++;
475                         name8 = g_strndup(target_fd->path, n);
476
477                         if (stat_utf8(name8, &sbuf))
478                                 {
479                                 list = g_list_prepend(list, file_data_new_simple(name8));
480                                 }
481
482                         g_free(name8);
483                         }
484                 }
485
486         old = NULL;
487         if (gtk_tree_model_iter_children(store, &child, iter))
488                 {
489                 do      {
490                         NodeData *cnd;
491
492                         gtk_tree_model_get(store, &child, DIR_COLUMN_POINTER, &cnd, -1);
493                         old = g_list_prepend(old, cnd);
494                         } while (gtk_tree_model_iter_next(store, &child));
495                 }
496
497         work = list;
498         while (work)
499                 {
500                 FileData *fd;
501
502                 fd = work->data;
503                 work = work->next;
504
505                 if (strcmp(fd->name, ".") == 0 || strcmp(fd->name, "..") == 0)
506                         {
507                         file_data_unref(fd);
508                         }
509                 else
510                         {
511                         NodeData *cnd;
512
513                         cnd = vdtree_find_iter_by_name(vd, iter, fd->name, &child);
514                         if (cnd)
515                                 {
516                                 old = g_list_remove(old, cnd);
517                                 if (cnd->expanded && cnd->fd->date != fd->date &&
518                                     vdtree_populate_path_by_iter(vd, &child, FALSE, target_fd))
519                                         {
520                                         cnd->fd->size = fd->size;
521                                         cnd->fd->date = fd->date;
522                                         }
523
524                                 file_data_unref(fd);
525                                 }
526                         else
527                                 {
528                                 vdtree_add_by_data(vd, fd, iter);
529                                 }
530                         }
531                 }
532
533         work = old;
534         while (work)
535                 {
536                 NodeData *cnd = work->data;
537                 work = work->next;
538
539                 if (vd->click_fd == cnd->fd) vd->click_fd = NULL;
540                 if (vd->drop_fd == cnd->fd) vd->drop_fd = NULL;
541
542                 if (vdtree_find_iter_by_data(vd, iter, cnd, &child))
543                         {
544                         gtk_tree_store_remove(GTK_TREE_STORE(store), &child);
545                         vdtree_node_free(cnd);
546                         }
547                 }
548
549         g_list_free(old);
550         g_list_free(list);
551
552         vdtree_busy_pop(vd);
553
554         nd->expanded = TRUE;
555         nd->last_update = current_time;
556
557         return TRUE;
558 }
559
560 FileData *vdtree_populate_path(ViewDir *vd, FileData *target_fd, gint expand, gint force)
561 {
562         GList *list;
563         GList *work;
564         FileData *fd = NULL;
565
566         if (!target_fd) return NULL;
567
568         vdtree_busy_push(vd);
569
570         list = parts_list(target_fd->path);
571         list = parts_list_add_node_points(vd, list);
572
573         work = list;
574         while (work)
575                 {
576                 PathData *pd = work->data;
577                 if (pd->node == NULL)
578                         {
579                         PathData *parent_pd;
580                         GtkTreeIter parent_iter;
581                         GtkTreeIter iter;
582                         NodeData *nd;
583
584                         if (work == list)
585                                 {
586                                 /* should not happen */
587                                 log_printf("vdtree warning, root node not found\n");
588                                 parts_list_free(list);
589                                 vdtree_busy_pop(vd);
590                                 return NULL;
591                                 }
592
593                         parent_pd = work->prev->data;
594
595                         if (!vd_find_row(vd, parent_pd->node, &parent_iter) ||
596                             !vdtree_populate_path_by_iter(vd, &parent_iter, force, target_fd) ||
597                             (nd = vdtree_find_iter_by_name(vd, &parent_iter, pd->name, &iter)) == NULL)
598                                 {
599                                 log_printf("vdtree warning, aborted at %s\n", parent_pd->name);
600                                 parts_list_free(list);
601                                 vdtree_busy_pop(vd);
602                                 return NULL;
603                                 }
604
605                         pd->node = nd->fd;
606
607                         if (pd->node)
608                                 {
609                                 if (expand)
610                                         {
611                                         vdtree_expand_by_iter(vd, &parent_iter, TRUE);
612                                         vdtree_expand_by_iter(vd, &iter, TRUE);
613                                         }
614                                 vdtree_populate_path_by_iter(vd, &iter, force, target_fd);
615                                 }
616                         }
617                 else
618                         {
619                         GtkTreeIter iter;
620
621                         if (vd_find_row(vd, pd->node, &iter))
622                                 {
623                                 if (expand) vdtree_expand_by_iter(vd, &iter, TRUE);
624                                 vdtree_populate_path_by_iter(vd, &iter, force, target_fd);
625                                 }
626                         }
627
628                 work = work->next;
629                 }
630
631         work = g_list_last(list);
632         if (work)
633                 {
634                 PathData *pd = work->data;
635                 fd = pd->node;
636                 }
637         parts_list_free(list);
638
639         vdtree_busy_pop(vd);
640
641         return fd;
642 }
643
644 /*
645  *----------------------------------------------------------------------------
646  * access
647  *----------------------------------------------------------------------------
648  */
649
650 static gint selection_is_ok = FALSE;
651
652 static gboolean vdtree_select_cb(GtkTreeSelection *selection, GtkTreeModel *store, GtkTreePath *tpath,
653                                  gboolean path_currently_selected, gpointer data)
654 {
655         return selection_is_ok;
656 }
657
658 void vdtree_select_row(ViewDir *vd, FileData *fd)
659 {
660         GtkTreeSelection *selection;
661         GtkTreeIter iter;
662
663         if (!vd_find_row(vd, fd, &iter)) return;
664         selection = gtk_tree_view_get_selection(GTK_TREE_VIEW(vd->view));
665
666         /* hack, such that selection is only allowed to be changed from here */
667         selection_is_ok = TRUE;
668         gtk_tree_selection_select_iter(selection, &iter);
669         selection_is_ok = FALSE;
670
671         if (!vdtree_populate_path_by_iter(vd, &iter, FALSE, vd->dir_fd)) return;
672
673         vdtree_expand_by_iter(vd, &iter, TRUE);
674
675         if (fd && vd->select_func)
676                 {
677                 vd->select_func(vd, fd->path, vd->select_data);
678                 }
679 }
680
681 gint vdtree_set_fd(ViewDir *vd, FileData *dir_fd)
682 {
683         FileData *fd;
684         GtkTreeIter iter;
685
686         if (!dir_fd) return FALSE;
687         if (vd->dir_fd == dir_fd) return TRUE;
688
689         file_data_unref(vd->dir_fd);
690         vd->dir_fd = file_data_ref(dir_fd);;
691
692         fd = vdtree_populate_path(vd, vd->dir_fd, TRUE, FALSE);
693
694         if (!fd) return FALSE;
695
696         if (vd_find_row(vd, fd, &iter))
697                 {
698                 GtkTreeModel *store;
699                 GtkTreePath *tpath;
700
701                 tree_view_row_make_visible(GTK_TREE_VIEW(vd->view), &iter, TRUE);
702
703                 store = gtk_tree_view_get_model(GTK_TREE_VIEW(vd->view));
704                 tpath = gtk_tree_model_get_path(store, &iter);
705                 gtk_tree_view_set_cursor(GTK_TREE_VIEW(vd->view), tpath, NULL, FALSE);
706                 gtk_tree_path_free(tpath);
707
708                 vdtree_select_row(vd, fd);
709                 }
710
711         return TRUE;
712 }
713
714 #if 0
715 const gchar *vdtree_get_path(ViewDir *vd)
716 {
717         return vd->path;
718 }
719 #endif
720
721 void vdtree_refresh(ViewDir *vd)
722 {
723         vdtree_populate_path(vd, vd->dir_fd, FALSE, TRUE);
724 }
725
726 const gchar *vdtree_row_get_path(ViewDir *vd, gint row)
727 {
728         log_printf("FIXME: no get row path\n");
729         return NULL;
730 }
731
732 /*
733  *----------------------------------------------------------------------------
734  * callbacks
735  *----------------------------------------------------------------------------
736  */
737
738 gint vdtree_press_key_cb(GtkWidget *widget, GdkEventKey *event, gpointer data)
739 {
740         ViewDir *vd = data;
741         GtkTreePath *tpath;
742         GtkTreeIter iter;
743         FileData *fd = NULL;
744
745         gtk_tree_view_get_cursor(GTK_TREE_VIEW(vd->view), &tpath, NULL);
746         if (tpath)
747                 {
748                 GtkTreeModel *store;
749                 NodeData *nd;
750
751                 store = gtk_tree_view_get_model(GTK_TREE_VIEW(widget));
752                 gtk_tree_model_get_iter(store, &iter, tpath);
753                 gtk_tree_model_get(store, &iter, DIR_COLUMN_POINTER, &nd, -1);
754
755                 gtk_tree_path_free(tpath);
756
757                 fd = (nd) ? nd->fd : NULL;
758                 }
759
760         switch (event->keyval)
761                 {
762                 case GDK_Menu:
763                         vd->click_fd = fd;
764                         vd_color_set(vd, vd->click_fd, TRUE);
765
766                         vd->popup = vd_pop_menu(vd, vd->click_fd);
767                         gtk_menu_popup(GTK_MENU(vd->popup), NULL, NULL, vd_menu_position_cb, vd, 0, GDK_CURRENT_TIME);
768
769                         return TRUE;
770                         break;
771                 case GDK_plus:
772                 case GDK_Right:
773                 case GDK_KP_Add:
774                         if (fd)
775                                 {
776                                 vdtree_populate_path_by_iter(vd, &iter, FALSE, vd->dir_fd);
777                                 vdtree_icon_set_by_iter(vd, &iter, vd->pf->open);
778                                 }
779                         break;
780                 }
781
782         return FALSE;
783 }
784
785 static gint vdtree_clicked_on_expander(GtkTreeView *treeview, GtkTreePath *tpath,
786                                        GtkTreeViewColumn *column, gint x, gint y, gint *left_of_expander)
787 {
788         gint depth;
789         gint size;
790         gint sep;
791         gint exp_width;
792
793         if (column != gtk_tree_view_get_expander_column(treeview)) return FALSE;
794
795         gtk_widget_style_get(GTK_WIDGET(treeview), "expander-size", &size, "horizontal-separator", &sep, NULL);
796         depth = gtk_tree_path_get_depth(tpath);
797
798         exp_width = sep + size + sep;
799
800         if (x <= depth * exp_width)
801                 {
802                 if (left_of_expander) *left_of_expander = !(x >= (depth - 1) * exp_width);
803                 return TRUE;
804                 }
805
806         return FALSE;
807 }
808
809 gint vdtree_press_cb(GtkWidget *widget, GdkEventButton *bevent, gpointer data)
810 {
811         ViewDir *vd = data;
812         GtkTreePath *tpath;
813         GtkTreeViewColumn *column;
814         GtkTreeIter iter;
815         NodeData *nd = NULL;
816
817         if (gtk_tree_view_get_path_at_pos(GTK_TREE_VIEW(widget), bevent->x, bevent->y,
818                                           &tpath, &column, NULL, NULL))
819                 {
820                 GtkTreeModel *store;
821                 gint left_of_expander;
822
823                 store = gtk_tree_view_get_model(GTK_TREE_VIEW(widget));
824                 gtk_tree_model_get_iter(store, &iter, tpath);
825                 gtk_tree_model_get(store, &iter, DIR_COLUMN_POINTER, &nd, -1);
826                 gtk_tree_view_set_cursor(GTK_TREE_VIEW(widget), tpath, NULL, FALSE);
827
828                 if (vdtree_clicked_on_expander(GTK_TREE_VIEW(widget), tpath, column, bevent->x, bevent->y, &left_of_expander))
829                         {
830                         vd->click_fd = NULL;
831
832                         /* clicking this region should automatically reveal an expander, if necessary
833                          * treeview bug: the expander will not expand until a button_motion_event highlights it.
834                          */
835                         if (bevent->button == MOUSE_BUTTON_LEFT &&
836                             !left_of_expander &&
837                             !gtk_tree_view_row_expanded(GTK_TREE_VIEW(vd->view), tpath))
838                                 {
839                                 vdtree_populate_path_by_iter(vd, &iter, FALSE, vd->dir_fd);
840                                 vdtree_icon_set_by_iter(vd, &iter, vd->pf->open);
841                                 }
842
843                         gtk_tree_path_free(tpath);
844                         return FALSE;
845                         }
846
847                 gtk_tree_path_free(tpath);
848                 }
849
850         vd->click_fd = (nd) ? nd->fd : NULL;
851         vd_color_set(vd, vd->click_fd, TRUE);
852
853         if (bevent->button == MOUSE_BUTTON_RIGHT)
854                 {
855                 vd->popup = vd_pop_menu(vd, vd->click_fd);
856                 gtk_menu_popup(GTK_MENU(vd->popup), NULL, NULL, NULL, NULL,
857                                bevent->button, bevent->time);
858                 }
859
860         return (bevent->button != MOUSE_BUTTON_LEFT);
861 }
862
863 static void vdtree_row_expanded(GtkTreeView *treeview, GtkTreeIter *iter, GtkTreePath *tpath, gpointer data)
864 {
865         ViewDir *vd = data;
866
867         vdtree_populate_path_by_iter(vd, iter, FALSE, NULL);
868         vdtree_icon_set_by_iter(vd, iter, vd->pf->open);
869 }
870
871 static void vdtree_row_collapsed(GtkTreeView *treeview, GtkTreeIter *iter, GtkTreePath *tpath, gpointer data)
872 {
873         ViewDir *vd = data;
874
875         vdtree_icon_set_by_iter(vd, iter, vd->pf->close);
876 }
877
878 static gint vdtree_sort_cb(GtkTreeModel *store, GtkTreeIter *a, GtkTreeIter *b, gpointer data)
879 {
880         NodeData *nda;
881         NodeData *ndb;
882
883         gtk_tree_model_get(store, a, DIR_COLUMN_POINTER, &nda, -1);
884         gtk_tree_model_get(store, b, DIR_COLUMN_POINTER, &ndb, -1);
885
886         return CASE_SORT(nda->fd->name, ndb->fd->name);
887 }
888
889 /*
890  *----------------------------------------------------------------------------
891  * core
892  *----------------------------------------------------------------------------
893  */
894
895 static void vdtree_setup_root(ViewDir *vd)
896 {
897         const gchar *path = G_DIR_SEPARATOR_S;
898         FileData *fd;
899
900
901         fd = file_data_new_simple(path);
902         vdtree_add_by_data(vd, fd, NULL);
903
904         vdtree_expand_by_data(vd, fd, TRUE);
905         vdtree_populate_path(vd, fd, FALSE, FALSE);
906 }
907
908 static gboolean vdtree_destroy_node_cb(GtkTreeModel *store, GtkTreePath *tpath, GtkTreeIter *iter, gpointer data)
909 {
910         NodeData *nd;
911
912         gtk_tree_model_get(store, iter, DIR_COLUMN_POINTER, &nd, -1);
913         vdtree_node_free(nd);
914
915         return FALSE;
916 }
917
918 void vdtree_destroy_cb(GtkWidget *widget, gpointer data)
919 {
920         ViewDir *vd = data;
921         GtkTreeModel *store;
922
923         vdtree_dnd_drop_expand_cancel(vd);
924         vd_dnd_drop_scroll_cancel(vd);
925         widget_auto_scroll_stop(vd->view);
926
927         store = gtk_tree_view_get_model(GTK_TREE_VIEW(vd->view));
928         gtk_tree_model_foreach(store, vdtree_destroy_node_cb, vd);
929 }
930
931 ViewDir *vdtree_new(ViewDir *vd, FileData *dir_fd)
932 {
933         GtkTreeStore *store;
934         GtkTreeSelection *selection;
935         GtkTreeViewColumn *column;
936         GtkCellRenderer *renderer;
937
938         vd->info = g_new0(ViewDirInfoTree, 1);
939         vd->type = DIRVIEW_TREE;
940
941         VDTREE_INFO(vd, drop_expand_id) = -1;
942         VDTREE_INFO(vd, busy_ref) = 0;
943
944         vd->dnd_drop_leave_func = vdtree_dnd_drop_expand_cancel;
945         vd->dnd_drop_update_func = vdtree_dnd_drop_expand;
946
947         store = gtk_tree_store_new(4, G_TYPE_POINTER, GDK_TYPE_PIXBUF, G_TYPE_STRING, G_TYPE_INT);
948         vd->view = gtk_tree_view_new_with_model(GTK_TREE_MODEL(store));
949         g_object_unref(store);
950
951         gtk_tree_view_set_headers_visible(GTK_TREE_VIEW(vd->view), FALSE);
952         gtk_tree_view_set_enable_search(GTK_TREE_VIEW(vd->view), FALSE);
953         gtk_tree_sortable_set_default_sort_func(GTK_TREE_SORTABLE(store), vdtree_sort_cb, vd, NULL);
954         gtk_tree_sortable_set_sort_column_id(GTK_TREE_SORTABLE(store),
955                                              GTK_TREE_SORTABLE_DEFAULT_SORT_COLUMN_ID, GTK_SORT_ASCENDING);
956
957         selection = gtk_tree_view_get_selection(GTK_TREE_VIEW(vd->view));
958         gtk_tree_selection_set_mode(selection, GTK_SELECTION_SINGLE);
959         gtk_tree_selection_set_select_function(selection, vdtree_select_cb, vd, NULL);
960
961         column = gtk_tree_view_column_new();
962         gtk_tree_view_column_set_sizing(column, GTK_TREE_VIEW_COLUMN_GROW_ONLY);
963
964         renderer = gtk_cell_renderer_pixbuf_new();
965         gtk_tree_view_column_pack_start(column, renderer, FALSE);
966         gtk_tree_view_column_add_attribute(column, renderer, "pixbuf", DIR_COLUMN_ICON);
967         gtk_tree_view_column_set_cell_data_func(column, renderer, vd_color_cb, vd, NULL);
968
969         renderer = gtk_cell_renderer_text_new();
970         gtk_tree_view_column_pack_start(column, renderer, TRUE);
971         gtk_tree_view_column_add_attribute(column, renderer, "text", DIR_COLUMN_NAME);
972         gtk_tree_view_column_set_cell_data_func(column, renderer, vd_color_cb, vd, NULL);
973
974         gtk_tree_view_append_column(GTK_TREE_VIEW(vd->view), column);
975
976         vdtree_setup_root(vd);
977
978         g_signal_connect(G_OBJECT(vd->view), "row_expanded",
979                          G_CALLBACK(vdtree_row_expanded), vd);
980         g_signal_connect(G_OBJECT(vd->view), "row_collapsed",
981                          G_CALLBACK(vdtree_row_collapsed), vd);
982
983         return vd;
984 }