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