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