Move common menu position callback to view_dir.c.
[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 gint vdtree_press_key_cb(GtkWidget *widget, GdkEventKey *event, gpointer data)
742 {
743         ViewDir *vd = data;
744         GtkTreePath *tpath;
745         GtkTreeIter iter;
746         FileData *fd = NULL;
747
748         gtk_tree_view_get_cursor(GTK_TREE_VIEW(vd->view), &tpath, NULL);
749         if (tpath)
750                 {
751                 GtkTreeModel *store;
752                 NodeData *nd;
753
754                 store = gtk_tree_view_get_model(GTK_TREE_VIEW(widget));
755                 gtk_tree_model_get_iter(store, &iter, tpath);
756                 gtk_tree_model_get(store, &iter, DIR_COLUMN_POINTER, &nd, -1);
757
758                 gtk_tree_path_free(tpath);
759
760                 fd = (nd) ? nd->fd : NULL;
761                 }
762
763         switch (event->keyval)
764                 {
765                 case GDK_Menu:
766                         vd->click_fd = fd;
767                         vd_color_set(vd, vd->click_fd, TRUE);
768
769                         vd->popup = vd_pop_menu(vd, vd->click_fd);
770                         gtk_menu_popup(GTK_MENU(vd->popup), NULL, NULL, vd_menu_position_cb, vd, 0, GDK_CURRENT_TIME);
771
772                         return TRUE;
773                         break;
774                 case GDK_plus:
775                 case GDK_Right:
776                 case GDK_KP_Add:
777                         if (fd)
778                                 {
779                                 vdtree_populate_path_by_iter(vd, &iter, FALSE, vd->path);
780                                 vdtree_icon_set_by_iter(vd, &iter, vd->pf->open);
781                                 }
782                         break;
783                 }
784
785         return FALSE;
786 }
787
788 static gint vdtree_clicked_on_expander(GtkTreeView *treeview, GtkTreePath *tpath,
789                                        GtkTreeViewColumn *column, gint x, gint y, gint *left_of_expander)
790 {
791         gint depth;
792         gint size;
793         gint sep;
794         gint exp_width;
795
796         if (column != gtk_tree_view_get_expander_column(treeview)) return FALSE;
797
798         gtk_widget_style_get(GTK_WIDGET(treeview), "expander-size", &size, "horizontal-separator", &sep, NULL);
799         depth = gtk_tree_path_get_depth(tpath);
800
801         exp_width = sep + size + sep;
802
803         if (x <= depth * exp_width)
804                 {
805                 if (left_of_expander) *left_of_expander = !(x >= (depth - 1) * exp_width);
806                 return TRUE;
807                 }
808
809         return FALSE;
810 }
811
812 static gint vdtree_press_cb(GtkWidget *widget, GdkEventButton *bevent, gpointer data)
813 {
814         ViewDir *vd = data;
815         GtkTreePath *tpath;
816         GtkTreeViewColumn *column;
817         GtkTreeIter iter;
818         NodeData *nd = NULL;
819
820         if (gtk_tree_view_get_path_at_pos(GTK_TREE_VIEW(widget), bevent->x, bevent->y,
821                                           &tpath, &column, NULL, NULL))
822                 {
823                 GtkTreeModel *store;
824                 gint left_of_expander;
825
826                 store = gtk_tree_view_get_model(GTK_TREE_VIEW(widget));
827                 gtk_tree_model_get_iter(store, &iter, tpath);
828                 gtk_tree_model_get(store, &iter, DIR_COLUMN_POINTER, &nd, -1);
829                 gtk_tree_view_set_cursor(GTK_TREE_VIEW(widget), tpath, NULL, FALSE);
830
831                 if (vdtree_clicked_on_expander(GTK_TREE_VIEW(widget), tpath, column, bevent->x, bevent->y, &left_of_expander))
832                         {
833                         vd->click_fd = NULL;
834
835                         /* clicking this region should automatically reveal an expander, if necessary
836                          * treeview bug: the expander will not expand until a button_motion_event highlights it.
837                          */
838                         if (bevent->button == 1 &&
839                             !left_of_expander &&
840                             !gtk_tree_view_row_expanded(GTK_TREE_VIEW(vd->view), tpath))
841                                 {
842                                 vdtree_populate_path_by_iter(vd, &iter, FALSE, vd->path);
843                                 vdtree_icon_set_by_iter(vd, &iter, vd->pf->open);
844                                 }
845
846                         gtk_tree_path_free(tpath);
847                         return FALSE;
848                         }
849
850                 gtk_tree_path_free(tpath);
851                 }
852
853         vd->click_fd = (nd) ? nd->fd : NULL;
854         vd_color_set(vd, vd->click_fd, TRUE);
855
856         if (bevent->button == 3)
857                 {
858                 vd->popup = vd_pop_menu(vd, vd->click_fd);
859                 gtk_menu_popup(GTK_MENU(vd->popup), NULL, NULL, NULL, NULL,
860                                bevent->button, bevent->time);
861                 }
862
863         return (bevent->button != 1);
864 }
865
866 static gint vdtree_release_cb(GtkWidget *widget, GdkEventButton *bevent, gpointer data)
867 {
868         ViewDir *vd = data;
869         GtkTreePath *tpath;
870         GtkTreeIter iter;
871         NodeData *nd = NULL;
872
873         if (!vd->click_fd) return FALSE;
874         vd_color_set(vd, vd->click_fd, FALSE);
875
876         if (bevent->button != 1) return TRUE;
877
878         if ((bevent->x != 0 || bevent->y != 0) &&
879             gtk_tree_view_get_path_at_pos(GTK_TREE_VIEW(widget), bevent->x, bevent->y,
880                                           &tpath, NULL, NULL, NULL))
881                 {
882                 GtkTreeModel *store;
883
884                 store = gtk_tree_view_get_model(GTK_TREE_VIEW(widget));
885                 gtk_tree_model_get_iter(store, &iter, tpath);
886                 gtk_tree_model_get(store, &iter, DIR_COLUMN_POINTER, &nd, -1);
887                 gtk_tree_path_free(tpath);
888                 }
889
890         if (nd && vd->click_fd == nd->fd)
891                 {
892                 vdtree_select_row(vd, vd->click_fd);
893                 }
894
895         return FALSE;
896 }
897
898 static void vdtree_row_expanded(GtkTreeView *treeview, GtkTreeIter *iter, GtkTreePath *tpath, gpointer data)
899 {
900         ViewDir *vd = data;
901
902         vdtree_populate_path_by_iter(vd, iter, FALSE, NULL);
903         vdtree_icon_set_by_iter(vd, iter, vd->pf->open);
904 }
905
906 static void vdtree_row_collapsed(GtkTreeView *treeview, GtkTreeIter *iter, GtkTreePath *tpath, gpointer data)
907 {
908         ViewDir *vd = data;
909
910         vdtree_icon_set_by_iter(vd, iter, vd->pf->close);
911 }
912
913 static gint vdtree_sort_cb(GtkTreeModel *store, GtkTreeIter *a, GtkTreeIter *b, gpointer data)
914 {
915         NodeData *nda;
916         NodeData *ndb;
917
918         gtk_tree_model_get(store, a, DIR_COLUMN_POINTER, &nda, -1);
919         gtk_tree_model_get(store, b, DIR_COLUMN_POINTER, &ndb, -1);
920
921         return CASE_SORT(nda->fd->name, ndb->fd->name);
922 }
923
924 /*
925  *----------------------------------------------------------------------------
926  * core
927  *----------------------------------------------------------------------------
928  */
929
930 static void vdtree_setup_root(ViewDir *vd)
931 {
932         const gchar *path = "/";
933         FileData *fd;
934
935
936         fd = file_data_new_simple(path);
937         vdtree_add_by_data(vd, fd, NULL);
938
939         vdtree_expand_by_data(vd, fd, TRUE);
940         vdtree_populate_path(vd, path, FALSE, FALSE);
941 }
942
943 static void vdtree_activate_cb(GtkTreeView *tview, GtkTreePath *tpath, GtkTreeViewColumn *column, gpointer data)
944 {
945         ViewDir *vd = data;
946         GtkTreeModel *store;
947         GtkTreeIter iter;
948         NodeData *nd;
949
950         store = gtk_tree_view_get_model(tview);
951         gtk_tree_model_get_iter(store, &iter, tpath);
952         gtk_tree_model_get(store, &iter, DIR_COLUMN_POINTER, &nd, -1);
953
954         vdtree_select_row(vd, nd->fd);
955 }
956
957 static GdkColor *vdtree_color_shifted(GtkWidget *widget)
958 {
959         static GdkColor color;
960         static GtkWidget *done = NULL;
961
962         if (done != widget)
963                 {
964                 GtkStyle *style;
965
966                 style = gtk_widget_get_style(widget);
967                 memcpy(&color, &style->base[GTK_STATE_NORMAL], sizeof(color));
968                 shift_color(&color, -1, 0);
969                 done = widget;
970                 }
971
972         return &color;
973 }
974
975 static void vdtree_color_cb(GtkTreeViewColumn *tree_column, GtkCellRenderer *cell,
976                             GtkTreeModel *tree_model, GtkTreeIter *iter, gpointer data)
977 {
978         ViewDir *vd = data;
979         gboolean set;
980
981         gtk_tree_model_get(tree_model, iter, DIR_COLUMN_COLOR, &set, -1);
982         g_object_set(G_OBJECT(cell),
983                      "cell-background-gdk", vdtree_color_shifted(vd->view),
984                      "cell-background-set", set, NULL);
985 }
986
987 static gboolean vdtree_destroy_node_cb(GtkTreeModel *store, GtkTreePath *tpath, GtkTreeIter *iter, gpointer data)
988 {
989         NodeData *nd;
990
991         gtk_tree_model_get(store, iter, DIR_COLUMN_POINTER, &nd, -1);
992         vdtree_node_free(nd);
993
994         return FALSE;
995 }
996
997 static void vdtree_destroy_cb(GtkWidget *widget, gpointer data)
998 {
999         ViewDir *vd = data;
1000         GtkTreeModel *store;
1001
1002         vdtree_dnd_drop_expand_cancel(vd);
1003         vd_dnd_drop_scroll_cancel(vd);
1004         widget_auto_scroll_stop(vd->view);
1005
1006         store = gtk_tree_view_get_model(GTK_TREE_VIEW(vd->view));
1007         gtk_tree_model_foreach(store, vdtree_destroy_node_cb, vd);
1008 }
1009
1010 ViewDir *vdtree_new(ViewDir *vd, const gchar *path)
1011 {
1012         GtkTreeStore *store;
1013         GtkTreeSelection *selection;
1014         GtkTreeViewColumn *column;
1015         GtkCellRenderer *renderer;
1016
1017         vd->info = g_new0(ViewDirInfoTree, 1);
1018         vd->type = DIRVIEW_TREE;
1019         vd->widget_destroy_cb = vdtree_destroy_cb;
1020
1021         VDTREE_INFO(vd, drop_expand_id) = -1;
1022
1023         VDTREE_INFO(vd, busy_ref) = 0;
1024
1025         store = gtk_tree_store_new(4, G_TYPE_POINTER, GDK_TYPE_PIXBUF, G_TYPE_STRING, G_TYPE_INT);
1026         vd->view = gtk_tree_view_new_with_model(GTK_TREE_MODEL(store));
1027         g_object_unref(store);
1028
1029         gtk_tree_view_set_headers_visible(GTK_TREE_VIEW(vd->view), FALSE);
1030         gtk_tree_view_set_enable_search(GTK_TREE_VIEW(vd->view), FALSE);
1031         gtk_tree_sortable_set_default_sort_func(GTK_TREE_SORTABLE(store), vdtree_sort_cb, vd, NULL);
1032         gtk_tree_sortable_set_sort_column_id(GTK_TREE_SORTABLE(store),
1033                                              GTK_TREE_SORTABLE_DEFAULT_SORT_COLUMN_ID, GTK_SORT_ASCENDING);
1034
1035         g_signal_connect(G_OBJECT(vd->view), "row_activated",
1036                          G_CALLBACK(vdtree_activate_cb), vd);
1037         g_signal_connect(G_OBJECT(vd->view), "row_expanded",
1038                          G_CALLBACK(vdtree_row_expanded), vd);
1039         g_signal_connect(G_OBJECT(vd->view), "row_collapsed",
1040                          G_CALLBACK(vdtree_row_collapsed), vd);
1041 #if 0
1042         g_signal_connect(G_OBJECT(store), "row_deleted",
1043                          G_CALLBACK(vdtree_row_deleted_cb), vd);
1044 #endif
1045
1046         selection = gtk_tree_view_get_selection(GTK_TREE_VIEW(vd->view));
1047         gtk_tree_selection_set_mode(selection, GTK_SELECTION_SINGLE);
1048         gtk_tree_selection_set_select_function(selection, vdtree_select_cb, vd, NULL);
1049
1050         column = gtk_tree_view_column_new();
1051         gtk_tree_view_column_set_sizing(column, GTK_TREE_VIEW_COLUMN_GROW_ONLY);
1052
1053         renderer = gtk_cell_renderer_pixbuf_new();
1054         gtk_tree_view_column_pack_start(column, renderer, FALSE);
1055         gtk_tree_view_column_add_attribute(column, renderer, "pixbuf", DIR_COLUMN_ICON);
1056         gtk_tree_view_column_set_cell_data_func(column, renderer, vdtree_color_cb, vd, NULL);
1057
1058         renderer = gtk_cell_renderer_text_new();
1059         gtk_tree_view_column_pack_start(column, renderer, TRUE);
1060         gtk_tree_view_column_add_attribute(column, renderer, "text", DIR_COLUMN_NAME);
1061         gtk_tree_view_column_set_cell_data_func(column, renderer, vdtree_color_cb, vd, NULL);
1062
1063         gtk_tree_view_append_column(GTK_TREE_VIEW(vd->view), column);
1064
1065         g_signal_connect(G_OBJECT(vd->view), "key_press_event",
1066                          G_CALLBACK(vdtree_press_key_cb), vd);
1067
1068         gtk_container_add(GTK_CONTAINER(vd->widget), vd->view);
1069         gtk_widget_show(vd->view);
1070
1071         vd->pf = folder_icons_new();
1072
1073         vdtree_setup_root(vd);
1074
1075         vd_dnd_init(vd);
1076
1077         g_signal_connect(G_OBJECT(vd->view), "button_press_event",
1078                          G_CALLBACK(vdtree_press_cb), vd);
1079         g_signal_connect(G_OBJECT(vd->view), "button_release_event",
1080                          G_CALLBACK(vdtree_release_cb), vd);
1081
1082         vdtree_set_path(vd, path);
1083
1084         return vd;
1085 }
1086
1087 #if 0
1088 void vdtree_set_click_func(ViewDir *vd,
1089                            void (*func)(ViewDir *vd, GdkEventButton *event, FileData *fd, gpointer), gpointer data)
1090 {
1091         if (!td) return;
1092         vd->click_func = func;
1093         vd->click_data = data;
1094 }
1095 #endif
1096
1097