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