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