Add some wrappers in view_dir.c and simplify even more.
[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 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 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 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 void vdtree_row_expanded(GtkTreeView *treeview, GtkTreeIter *iter, GtkTreePath *tpath, gpointer data)
867 {
868         ViewDir *vd = data;
869
870         vdtree_populate_path_by_iter(vd, iter, FALSE, NULL);
871         vdtree_icon_set_by_iter(vd, iter, vd->pf->open);
872 }
873
874 static void vdtree_row_collapsed(GtkTreeView *treeview, GtkTreeIter *iter, GtkTreePath *tpath, gpointer data)
875 {
876         ViewDir *vd = data;
877
878         vdtree_icon_set_by_iter(vd, iter, vd->pf->close);
879 }
880
881 static gint vdtree_sort_cb(GtkTreeModel *store, GtkTreeIter *a, GtkTreeIter *b, gpointer data)
882 {
883         NodeData *nda;
884         NodeData *ndb;
885
886         gtk_tree_model_get(store, a, DIR_COLUMN_POINTER, &nda, -1);
887         gtk_tree_model_get(store, b, DIR_COLUMN_POINTER, &ndb, -1);
888
889         return CASE_SORT(nda->fd->name, ndb->fd->name);
890 }
891
892 /*
893  *----------------------------------------------------------------------------
894  * core
895  *----------------------------------------------------------------------------
896  */
897
898 static void vdtree_setup_root(ViewDir *vd)
899 {
900         const gchar *path = "/";
901         FileData *fd;
902
903
904         fd = file_data_new_simple(path);
905         vdtree_add_by_data(vd, fd, NULL);
906
907         vdtree_expand_by_data(vd, fd, TRUE);
908         vdtree_populate_path(vd, path, FALSE, FALSE);
909 }
910
911 static gboolean vdtree_destroy_node_cb(GtkTreeModel *store, GtkTreePath *tpath, GtkTreeIter *iter, gpointer data)
912 {
913         NodeData *nd;
914
915         gtk_tree_model_get(store, iter, DIR_COLUMN_POINTER, &nd, -1);
916         vdtree_node_free(nd);
917
918         return FALSE;
919 }
920
921 void vdtree_destroy_cb(GtkWidget *widget, gpointer data)
922 {
923         ViewDir *vd = data;
924         GtkTreeModel *store;
925
926         vdtree_dnd_drop_expand_cancel(vd);
927         vd_dnd_drop_scroll_cancel(vd);
928         widget_auto_scroll_stop(vd->view);
929
930         store = gtk_tree_view_get_model(GTK_TREE_VIEW(vd->view));
931         gtk_tree_model_foreach(store, vdtree_destroy_node_cb, vd);
932 }
933
934 ViewDir *vdtree_new(ViewDir *vd, const gchar *path)
935 {
936         GtkTreeStore *store;
937         GtkTreeSelection *selection;
938         GtkTreeViewColumn *column;
939         GtkCellRenderer *renderer;
940
941         vd->info = g_new0(ViewDirInfoTree, 1);
942         vd->type = DIRVIEW_TREE;
943
944         VDTREE_INFO(vd, drop_expand_id) = -1;
945
946         VDTREE_INFO(vd, busy_ref) = 0;
947
948         store = gtk_tree_store_new(4, G_TYPE_POINTER, GDK_TYPE_PIXBUF, G_TYPE_STRING, G_TYPE_INT);
949         vd->view = gtk_tree_view_new_with_model(GTK_TREE_MODEL(store));
950         g_object_unref(store);
951
952         gtk_tree_view_set_headers_visible(GTK_TREE_VIEW(vd->view), FALSE);
953         gtk_tree_view_set_enable_search(GTK_TREE_VIEW(vd->view), FALSE);
954         gtk_tree_sortable_set_default_sort_func(GTK_TREE_SORTABLE(store), vdtree_sort_cb, vd, NULL);
955         gtk_tree_sortable_set_sort_column_id(GTK_TREE_SORTABLE(store),
956                                              GTK_TREE_SORTABLE_DEFAULT_SORT_COLUMN_ID, GTK_SORT_ASCENDING);
957
958         g_signal_connect(G_OBJECT(vd->view), "row_activated",
959                          G_CALLBACK(vd_activate_cb), vd);
960         g_signal_connect(G_OBJECT(vd->view), "row_expanded",
961                          G_CALLBACK(vdtree_row_expanded), vd);
962         g_signal_connect(G_OBJECT(vd->view), "row_collapsed",
963                          G_CALLBACK(vdtree_row_collapsed), vd);
964 #if 0
965         g_signal_connect(G_OBJECT(store), "row_deleted",
966                          G_CALLBACK(vdtree_row_deleted_cb), vd);
967 #endif
968
969         selection = gtk_tree_view_get_selection(GTK_TREE_VIEW(vd->view));
970         gtk_tree_selection_set_mode(selection, GTK_SELECTION_SINGLE);
971         gtk_tree_selection_set_select_function(selection, vdtree_select_cb, vd, NULL);
972
973         column = gtk_tree_view_column_new();
974         gtk_tree_view_column_set_sizing(column, GTK_TREE_VIEW_COLUMN_GROW_ONLY);
975
976         renderer = gtk_cell_renderer_pixbuf_new();
977         gtk_tree_view_column_pack_start(column, renderer, FALSE);
978         gtk_tree_view_column_add_attribute(column, renderer, "pixbuf", DIR_COLUMN_ICON);
979         gtk_tree_view_column_set_cell_data_func(column, renderer, vd_color_cb, vd, NULL);
980
981         renderer = gtk_cell_renderer_text_new();
982         gtk_tree_view_column_pack_start(column, renderer, TRUE);
983         gtk_tree_view_column_add_attribute(column, renderer, "text", DIR_COLUMN_NAME);
984         gtk_tree_view_column_set_cell_data_func(column, renderer, vd_color_cb, vd, NULL);
985
986         gtk_tree_view_append_column(GTK_TREE_VIEW(vd->view), column);
987
988         g_signal_connect(G_OBJECT(vd->view), "key_press_event",
989                          G_CALLBACK(vd_press_key_cb), vd);
990
991         gtk_container_add(GTK_CONTAINER(vd->widget), vd->view);
992         gtk_widget_show(vd->view);
993
994         vd->pf = folder_icons_new();
995
996         vdtree_setup_root(vd);
997
998         vd_dnd_init(vd);
999
1000         g_signal_connect(G_OBJECT(vd->view), "button_press_event",
1001                          G_CALLBACK(vd_press_cb), vd);
1002         g_signal_connect(G_OBJECT(vd->view), "button_release_event",
1003                          G_CALLBACK(vd_release_cb), vd);
1004
1005         vdtree_set_path(vd, path);
1006
1007         return vd;
1008 }
1009
1010 #if 0
1011 void vdtree_set_click_func(ViewDir *vd,
1012                            void (*func)(ViewDir *vd, GdkEventButton *event, FileData *fd, gpointer), gpointer data)
1013 {
1014         if (!td) return;
1015         vd->click_func = func;
1016         vd->click_data = data;
1017 }
1018 #endif
1019
1020