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