src/view_dir_tree.c

   1 /*
   2  * GQview
   3  * (C) 2006 John Ellis
   4  *
   5  * Author: John Ellis
   6  *
   7  * This software is released under the GNU General Public License (GNU GPL).
   8  * Please read the included file COPYING for more information.
   9  * This software comes with no warranty of any kind, use at your own risk!
  10  */
  11
  12 #include "gqview.h"
  13 #include "view_dir_tree.h"
  14
  15
  16 #include "dnd.h"
  17 #include "dupe.h"
  18 #include "filelist.h"
  19 #include "layout.h"
  20 #include "layout_image.h"
  21 #include "layout_util.h"
  22 #include "utilops.h"
  23 #include "ui_bookmark.h"
  24 #include "ui_fileops.h"
  25 #include "ui_menu.h"
  26 #include "ui_tree_edit.h"
  27
  28 #include <gdk/gdkkeysyms.h> /* for keyboard values */
  29
  30
  31 #define VDTREE_INDENT 14
  32 #define VDTREE_PAD 4
  33
  34 enum {
  35         DIR_COLUMN_POINTER = 0,
  36         DIR_COLUMN_ICON,
  37         DIR_COLUMN_NAME,
  38         DIR_COLUMN_COLOR,
  39         DIR_COLUMN_COUNT
  40 };
  41
  42
  43 typedef struct _PathData PathData;
  44 struct _PathData
  45 {
  46         gchar *name;
  47         FileData *node;
  48 };
  49
  50 typedef struct _NodeData NodeData;
  51 struct _NodeData
  52 {
  53         FileData *fd;
  54         gint expanded;
  55         time_t last_update;
  56 };
  57
  58
  59 static gint vdtree_populate_path_by_iter(ViewDirTree *vdt, GtkTreeIter *iter, gint force, const gchar *target_path);
  60 static FileData *vdtree_populate_path(ViewDirTree *vdt, const gchar *path, gint expand, gint force);
  61
  62
  63 /*
  64  *----------------------------------------------------------------------------
  65  * utils
  66  *----------------------------------------------------------------------------
  67  */
  68
  69 static void set_cursor(GtkWidget *widget, GdkCursorType cursor_type)
  70 {
  71         GdkCursor *cursor = NULL;
  72
  73         if (!widget || !widget->window) return;
  74
  75         if (cursor_type > -1) cursor = gdk_cursor_new (cursor_type);
  76         gdk_window_set_cursor (widget->window, cursor);
  77         if (cursor) gdk_cursor_unref(cursor);
  78         gdk_flush();
  79 }
  80
  81 static void vdtree_busy_push(ViewDirTree *vdt)
  82 {
  83         if (vdt->busy_ref == 0) set_cursor(vdt->treeview, GDK_WATCH);
  84         vdt->busy_ref++;
  85 }
  86
  87 static void vdtree_busy_pop(ViewDirTree *vdt)
  88 {
  89         if (vdt->busy_ref == 1) set_cursor(vdt->treeview, -1);
  90         if (vdt->busy_ref > 0) vdt->busy_ref--;
  91 }
  92
  93 static gint vdtree_find_row(ViewDirTree *vdt, FileData *fd, GtkTreeIter *iter, GtkTreeIter *parent)
  94 {
  95         GtkTreeModel *store;
  96         gint valid;
  97
  98         store = gtk_tree_view_get_model(GTK_TREE_VIEW(vdt->treeview));
  99         if (parent)
 100                 {
 101                 valid = gtk_tree_model_iter_children(store, iter, parent);
 102                 }
 103         else
 104                 {
 105                 valid = gtk_tree_model_get_iter_first(store, iter);
 106                 }
 107         while (valid)
 108                 {
 109                 NodeData *nd;
 110                 GtkTreeIter found;
 111
 112                 gtk_tree_model_get(GTK_TREE_MODEL(store), iter, DIR_COLUMN_POINTER, &nd, -1);
 113                 if (nd->fd == fd) return TRUE;
 114
 115                 if (vdtree_find_row(vdt, fd, &found, iter))
 116                         {
 117                         memcpy(iter, &found, sizeof(found));
 118                         return TRUE;
 119                         }
 120
 121                 valid = gtk_tree_model_iter_next(GTK_TREE_MODEL(store), iter);
 122                 }
 123
 124         return FALSE;
 125 }
 126
 127 static void vdtree_icon_set_by_iter(ViewDirTree *vdt, GtkTreeIter *iter, GdkPixbuf *pixbuf)
 128 {
 129         GtkTreeModel *store;
 130         GdkPixbuf *old;
 131
 132         store = gtk_tree_view_get_model(GTK_TREE_VIEW(vdt->treeview));
 133         gtk_tree_model_get(store, iter, DIR_COLUMN_ICON, &old, -1);
 134         if (old != vdt->pf->deny)
 135                 {
 136                 gtk_tree_store_set(GTK_TREE_STORE(store), iter, DIR_COLUMN_ICON, pixbuf, -1);
 137                 }
 138 }
 139
 140 static void vdtree_expand_by_iter(ViewDirTree *vdt, GtkTreeIter *iter, gint expand)
 141 {
 142         GtkTreeModel *store;
 143         GtkTreePath *tpath;
 144
 145         store = gtk_tree_view_get_model(GTK_TREE_VIEW(vdt->treeview));
 146         tpath = gtk_tree_model_get_path(store, iter);
 147         if (expand)
 148                 {
 149                 gtk_tree_view_expand_row(GTK_TREE_VIEW(vdt->treeview), tpath, FALSE);
 150                 vdtree_icon_set_by_iter(vdt, iter, vdt->pf->open);
 151                 }
 152         else
 153                 {
 154                 gtk_tree_view_collapse_row(GTK_TREE_VIEW(vdt->treeview), tpath);
 155                 }
 156         gtk_tree_path_free(tpath);
 157 }
 158
 159 static void vdtree_expand_by_data(ViewDirTree *vdt, FileData *fd, gint expand)
 160 {
 161         GtkTreeIter iter;
 162
 163         if (vdtree_find_row(vdt, fd, &iter, NULL))
 164                 {
 165                 vdtree_expand_by_iter(vdt, &iter, expand);
 166                 }
 167 }
 168
 169 static void vdtree_color_set(ViewDirTree *vdt, FileData *fd, gint color_set)
 170 {
 171         GtkTreeModel *store;
 172         GtkTreeIter iter;
 173
 174         if (!vdtree_find_row(vdt, fd, &iter, NULL)) return;
 175         store = gtk_tree_view_get_model(GTK_TREE_VIEW(vdt->treeview));
 176         gtk_tree_store_set(GTK_TREE_STORE(store), &iter, DIR_COLUMN_COLOR, color_set, -1);
 177 }
 178
 179 static gint vdtree_rename_row_cb(TreeEditData *td, const gchar *old, const gchar *new, gpointer data)
 180 {
 181         ViewDirTree *vdt = data;
 182         GtkTreeModel *store;
 183         GtkTreeIter iter;
 184         NodeData *nd;
 185         gchar *old_path;
 186         gchar *new_path;
 187         gchar *base;
 188
 189         store = gtk_tree_view_get_model(GTK_TREE_VIEW(vdt->treeview));
 190         if (!gtk_tree_model_get_iter(store, &iter, td->path)) return FALSE;
 191         gtk_tree_model_get(store, &iter, DIR_COLUMN_POINTER, &nd, -1);
 192         if (!nd) return FALSE;
 193
 194         old_path = g_strdup(nd->fd->path);
 195
 196         base = remove_level_from_path(old_path);
 197         new_path = concat_dir_and_file(base, new);
 198         g_free(base);
 199
 200         if (file_util_rename_dir(old_path, new_path, vdt->treeview))
 201                 {
 202                 vdtree_populate_path(vdt, new_path, TRUE, TRUE);
 203
 204                 if (vdt->layout && strcmp(vdt->path, old_path) == 0)
 205                         {
 206                         layout_set_path(vdt->layout, new_path);
 207                         }
 208                 }
 209
 210         g_free(old_path);
 211         g_free(new_path);
 212
 213         return FALSE;
 214 }
 215
 216 static void vdtree_rename_by_data(ViewDirTree *vdt, FileData *fd)
 217 {
 218         GtkTreeModel *store;
 219         GtkTreePath *tpath;
 220         GtkTreeIter iter;
 221
 222         if (!fd ||
 223             !vdtree_find_row(vdt, fd, &iter, NULL)) return;
 224
 225         store = gtk_tree_view_get_model(GTK_TREE_VIEW(vdt->treeview));
 226         tpath = gtk_tree_model_get_path(store, &iter);
 227
 228         tree_edit_by_path(GTK_TREE_VIEW(vdt->treeview), tpath, 0, fd->name,
 229                           vdtree_rename_row_cb, vdt);
 230         gtk_tree_path_free(tpath);
 231 }
 232
 233 static void vdtree_node_free(NodeData *nd)
 234 {
 235         if (!nd) return;
 236
 237         file_data_free(nd->fd);
 238         g_free(nd);
 239 }
 240
 241 static void vdtree_popup_destroy_cb(GtkWidget *widget, gpointer data)
 242 {
 243         ViewDirTree *vdt = data;
 244
 245         vdtree_color_set(vdt, vdt->click_fd, FALSE);
 246         vdt->click_fd = NULL;
 247         vdt->popup = NULL;
 248
 249         vdtree_color_set(vdt, vdt->drop_fd, FALSE);
 250         path_list_free(vdt->drop_list);
 251         vdt->drop_list = NULL;
 252         vdt->drop_fd = NULL;
 253 }
 254
 255 /*
 256  *-----------------------------------------------------------------------------
 257  * drop menu (from dnd)
 258  *-----------------------------------------------------------------------------
 259  */
 260
 261 static void vdtree_drop_menu_copy_cb(GtkWidget *widget, gpointer data)
 262 {
 263         ViewDirTree *vdt = data;
 264         const gchar *path;
 265         GList *list;
 266
 267         if (!vdt->drop_fd) return;
 268
 269         path = vdt->drop_fd->path;
 270         list = vdt->drop_list;
 271
 272         vdt->drop_list = NULL;
 273
 274         file_util_copy_simple(list, path);
 275 }
 276
 277 static void vdtree_drop_menu_move_cb(GtkWidget *widget, gpointer data)
 278 {
 279         ViewDirTree *vdt = data;
 280         const gchar *path;
 281         GList *list;
 282
 283         if (!vdt->drop_fd) return;
 284
 285         path = vdt->drop_fd->path;
 286         list = vdt->drop_list;
 287
 288         vdt->drop_list = NULL;
 289
 290         file_util_move_simple(list, path);
 291 }
 292
 293 static GtkWidget *vdtree_drop_menu(ViewDirTree *vdt, gint active)
 294 {
 295         GtkWidget *menu;
 296
 297         menu = popup_menu_short_lived();
 298         g_signal_connect(G_OBJECT(menu), "destroy",
 299                          G_CALLBACK(vdtree_popup_destroy_cb), vdt);
 300
 301         menu_item_add_stock_sensitive(menu, _("_Copy"), GTK_STOCK_COPY, active,
 302                                       G_CALLBACK(vdtree_drop_menu_copy_cb), vdt);
 303         menu_item_add_sensitive(menu, _("_Move"), active, G_CALLBACK(vdtree_drop_menu_move_cb), vdt);
 304
 305         menu_item_add_divider(menu);
 306         menu_item_add_stock(menu, _("Cancel"), GTK_STOCK_CANCEL, NULL, vdt);
 307
 308         return menu;
 309 }
 310
 311 /*
 312  *-----------------------------------------------------------------------------
 313  * pop-up menu
 314  *-----------------------------------------------------------------------------
 315  */
 316
 317 static void vdtree_pop_menu_up_cb(GtkWidget *widget, gpointer data)
 318 {
 319         ViewDirTree *vdt = data;
 320         gchar *path;
 321
 322         if (!vdt->path || strcmp(vdt->path, "/") == 0) return;
 323         path = remove_level_from_path(vdt->path);
 324
 325         if (vdt->select_func)
 326                 {
 327                 vdt->select_func(vdt, path, vdt->select_data);
 328                 }
 329
 330         g_free(path);
 331 }
 332
 333 static void vdtree_pop_menu_slide_cb(GtkWidget *widget, gpointer data)
 334 {
 335         ViewDirTree *vdt = data;
 336         gchar *path;
 337
 338         if (!vdt->layout) return;
 339
 340         if (!vdt->click_fd) return;
 341         path = g_strdup(vdt->click_fd->path);
 342
 343         layout_set_path(vdt->layout, path);
 344         layout_select_none(vdt->layout);
 345         layout_image_slideshow_stop(vdt->layout);
 346         layout_image_slideshow_start(vdt->layout);
 347
 348         g_free(path);
 349 }
 350
 351 static void vdtree_pop_menu_slide_rec_cb(GtkWidget *widget, gpointer data)
 352 {
 353         ViewDirTree *vdt = data;
 354         gchar *path;
 355         GList *list;
 356
 357         if (!vdt->layout) return;
 358
 359         if (!vdt->click_fd) return;
 360         path = g_strdup(vdt->click_fd->path);
 361
 362         list = path_list_recursive(path);
 363
 364         layout_image_slideshow_stop(vdt->layout);
 365         layout_image_slideshow_start_from_list(vdt->layout, list);
 366
 367         g_free(path);
 368 }
 369
 370 static void vdtree_pop_menu_dupe(ViewDirTree *vdt, gint recursive)
 371 {
 372         DupeWindow *dw;
 373         const gchar *path;
 374         GList *list = NULL;
 375
 376         if (!vdt->click_fd) return;
 377         path = vdt->click_fd->path;
 378
 379         if (recursive)
 380                 {
 381                 list = g_list_append(list, g_strdup(path));
 382                 }
 383         else
 384                 {
 385                 path_list(path, &list, NULL);
 386                 list = path_list_filter(list, FALSE);
 387                 }
 388
 389         dw = dupe_window_new(DUPE_MATCH_NAME);
 390         dupe_window_add_files(dw, list, recursive);
 391
 392         path_list_free(list);
 393 }
 394
 395 static void vdtree_pop_menu_dupe_cb(GtkWidget *widget, gpointer data)
 396 {
 397         ViewDirTree *vdt = data;
 398         vdtree_pop_menu_dupe(vdt, FALSE);
 399 }
 400
 401 static void vdtree_pop_menu_dupe_rec_cb(GtkWidget *widget, gpointer data)
 402 {
 403         ViewDirTree *vdt = data;
 404         vdtree_pop_menu_dupe(vdt, TRUE);
 405 }
 406
 407 static void vdtree_pop_menu_new_cb(GtkWidget *widget, gpointer data)
 408 {
 409         ViewDirTree *vdt = data;
 410         const gchar *path;
 411         gchar *new_path;
 412         gchar *buf;
 413
 414         if (!vdt->click_fd) return;
 415         path = vdt->click_fd->path;
 416
 417         buf = concat_dir_and_file(path, _("new_folder"));
 418         new_path = unique_filename(buf, NULL, NULL, FALSE);
 419         g_free(buf);
 420         if (!new_path) return;
 421
 422         if (!mkdir_utf8(new_path, 0755))
 423                 {
 424                 gchar *text;
 425
 426                 text = g_strdup_printf(_("Unable to create folder:\n%s"), new_path);
 427                 file_util_warning_dialog(_("Error creating folder"), text, GTK_STOCK_DIALOG_ERROR, vdt->treeview);
 428                 g_free(text);
 429                 }
 430         else
 431                 {
 432                 FileData *fd;
 433
 434                 fd = vdtree_populate_path(vdt, new_path, TRUE, TRUE);
 435
 436                 vdtree_rename_by_data(vdt, fd);
 437                 }
 438
 439         g_free(new_path);
 440 }
 441
 442 static void vdtree_pop_menu_rename_cb(GtkWidget *widget, gpointer data)
 443 {
 444         ViewDirTree *vdt = data;
 445
 446         vdtree_rename_by_data(vdt, vdt->click_fd);
 447 }
 448
 449 static void vdtree_pop_menu_delete_cb(GtkWidget *widget, gpointer data)
 450 {
 451         ViewDirTree *vdt = data;
 452
 453         if (!vdt->click_fd) return;
 454         file_util_delete_dir(vdt->click_fd->path, vdt->widget);
 455 }
 456
 457 static void vdtree_pop_menu_tree_cb(GtkWidget *widget, gpointer data)
 458 {
 459         ViewDirTree *vdt = data;
 460
 461         if (vdt->layout) layout_views_set(vdt->layout, FALSE, vdt->layout->icon_view);
 462 }
 463
 464 static void vdtree_pop_menu_refresh_cb(GtkWidget *widget, gpointer data)
 465 {
 466         ViewDirTree *vdt = data;
 467
 468         if (vdt->layout) layout_refresh(vdt->layout);
 469 }
 470
 471 static GtkWidget *vdtree_pop_menu(ViewDirTree *vdt, FileData *fd)
 472 {
 473         GtkWidget *menu;
 474         gint active;
 475         gint parent_active = FALSE;
 476
 477         active = (fd != NULL);
 478         if (fd)
 479                 {
 480                 gchar *parent;
 481
 482                 parent = remove_level_from_path(fd->path);
 483                 parent_active = access_file(parent, W_OK | X_OK);
 484                 g_free(parent);
 485                 }
 486
 487         menu = popup_menu_short_lived();
 488         g_signal_connect(G_OBJECT(menu), "destroy",
 489                          G_CALLBACK(vdtree_popup_destroy_cb), vdt);
 490
 491         menu_item_add_stock_sensitive(menu, _("_Up to parent"), GTK_STOCK_GO_UP,
 492                                       (vdt->path && strcmp(vdt->path, "/") != 0),
 493                                       G_CALLBACK(vdtree_pop_menu_up_cb), vdt);
 494
 495         menu_item_add_divider(menu);
 496         menu_item_add_sensitive(menu, _("_Slideshow"), active,
 497                                 G_CALLBACK(vdtree_pop_menu_slide_cb), vdt);
 498         menu_item_add_sensitive(menu, _("Slideshow recursive"), active,
 499                                 G_CALLBACK(vdtree_pop_menu_slide_rec_cb), vdt);
 500
 501         menu_item_add_divider(menu);
 502         menu_item_add_stock_sensitive(menu, _("Find _duplicates..."), GTK_STOCK_FIND, active,
 503                                       G_CALLBACK(vdtree_pop_menu_dupe_cb), vdt);
 504         menu_item_add_stock_sensitive(menu, _("Find duplicates recursive..."), GTK_STOCK_FIND, active,
 505                                       G_CALLBACK(vdtree_pop_menu_dupe_rec_cb), vdt);
 506
 507         menu_item_add_divider(menu);
 508
 509         active = (fd &&
 510                   access_file(fd->path, W_OK | X_OK));
 511         menu_item_add_sensitive(menu, _("_New folder..."), active,
 512                                 G_CALLBACK(vdtree_pop_menu_new_cb), vdt);
 513
 514         menu_item_add_sensitive(menu, _("_Rename..."), parent_active,
 515                                 G_CALLBACK(vdtree_pop_menu_rename_cb), vdt);
 516         menu_item_add_stock_sensitive(menu, _("_Delete..."), GTK_STOCK_DELETE, parent_active,
 517                                       G_CALLBACK(vdtree_pop_menu_delete_cb), vdt);
 518
 519         menu_item_add_divider(menu);
 520         menu_item_add_check(menu, _("View as _tree"), TRUE,
 521                             G_CALLBACK(vdtree_pop_menu_tree_cb), vdt);
 522         menu_item_add_stock(menu, _("Re_fresh"), GTK_STOCK_REFRESH,
 523                             G_CALLBACK(vdtree_pop_menu_refresh_cb), vdt);
 524
 525         return menu;
 526 }
 527
 528 /*
 529  *----------------------------------------------------------------------------
 530  * dnd
 531  *----------------------------------------------------------------------------
 532  */
 533
 534 static GtkTargetEntry vdtree_dnd_drop_types[] = {
 535         { "text/uri-list", 0, TARGET_URI_LIST }
 536 };
 537 static gint vdtree_dnd_drop_types_count = 1;
 538
 539
 540 static void vdtree_dest_set(ViewDirTree *vdt, gint enable)
 541 {
 542         if (enable)
 543                 {
 544                 gtk_drag_dest_set(vdt->treeview,
 545                                   GTK_DEST_DEFAULT_MOTION | GTK_DEST_DEFAULT_DROP,
 546                                   vdtree_dnd_drop_types, vdtree_dnd_drop_types_count,
 547                                   GDK_ACTION_MOVE | GDK_ACTION_COPY);
 548                 }
 549         else
 550                 {
 551                 gtk_drag_dest_unset(vdt->treeview);
 552                 }
 553 }
 554
 555 static void vdtree_dnd_get(GtkWidget *widget, GdkDragContext *context,
 556                            GtkSelectionData *selection_data, guint info,
 557                            guint time, gpointer data)
 558 {
 559         ViewDirTree *vdt = data;
 560         gchar *path;
 561         GList *list;
 562         gchar *uri_text = NULL;
 563         gint length = 0;
 564
 565         if (!vdt->click_fd) return;
 566         path = vdt->click_fd->path;
 567
 568         switch (info)
 569                 {
 570                 case TARGET_URI_LIST:
 571                 case TARGET_TEXT_PLAIN:
 572                         list = g_list_prepend(NULL, path);
 573                         uri_text = uri_text_from_list(list, &length, (info == TARGET_TEXT_PLAIN));
 574                         g_list_free(list);
 575                         break;
 576                 }
 577
 578         if (uri_text)
 579                 {
 580                 gtk_selection_data_set(selection_data, selection_data->target,
 581                                        8, (guchar *)uri_text, length);
 582                 g_free(uri_text);
 583                 }
 584 }
 585
 586 static void vdtree_dnd_begin(GtkWidget *widget, GdkDragContext *context, gpointer data)
 587 {
 588         ViewDirTree *vdt = data;
 589
 590         vdtree_color_set(vdt, vdt->click_fd, TRUE);
 591         vdtree_dest_set(vdt, FALSE);
 592 }
 593
 594 static void vdtree_dnd_end(GtkWidget *widget, GdkDragContext *context, gpointer data)
 595 {
 596         ViewDirTree *vdt = data;
 597
 598         vdtree_color_set(vdt, vdt->click_fd, FALSE);
 599         vdtree_dest_set(vdt, TRUE);
 600 }
 601
 602 static void vdtree_dnd_drop_receive(GtkWidget *widget,
 603                                     GdkDragContext *context, gint x, gint y,
 604                                     GtkSelectionData *selection_data, guint info,
 605                                     guint time, gpointer data)
 606 {
 607         ViewDirTree *vdt = data;
 608         GtkTreePath *tpath;
 609         GtkTreeIter iter;
 610         FileData *fd = NULL;
 611
 612         vdt->click_fd = NULL;
 613
 614         if (gtk_tree_view_get_path_at_pos(GTK_TREE_VIEW(widget), x, y,
 615                                           &tpath, NULL, NULL, NULL))
 616                 {
 617                 GtkTreeModel *store;
 618                 NodeData *nd;
 619
 620                 store = gtk_tree_view_get_model(GTK_TREE_VIEW(widget));
 621                 gtk_tree_model_get_iter(store, &iter, tpath);
 622                 gtk_tree_model_get(store, &iter, DIR_COLUMN_POINTER, &nd, -1);
 623                 gtk_tree_path_free(tpath);
 624
 625                 fd = (nd) ? nd->fd : NULL;
 626                 }
 627
 628         if (!fd) return;
 629
 630         if (info == TARGET_URI_LIST)
 631                 {
 632                 GList *list;
 633                 gint active;
 634
 635                 list = uri_list_from_text((gchar *)selection_data->data, TRUE);
 636                 if (!list) return;
 637
 638                 active = access_file(fd->path, W_OK | X_OK);
 639
 640                 vdtree_color_set(vdt, fd, TRUE);
 641                 vdt->popup = vdtree_drop_menu(vdt, active);
 642                 gtk_menu_popup(GTK_MENU(vdt->popup), NULL, NULL, NULL, NULL, 0, time);
 643
 644                 vdt->drop_fd = fd;
 645                 vdt->drop_list = list;
 646                 }
 647 }
 648
 649 static gint vdtree_dnd_drop_expand_cb(gpointer data)
 650 {
 651         ViewDirTree *vdt = data;
 652         GtkTreeIter iter;
 653
 654         if (vdt->drop_fd &&
 655             vdtree_find_row(vdt, vdt->drop_fd, &iter, NULL))
 656                 {
 657                 vdtree_populate_path_by_iter(vdt, &iter, FALSE, vdt->path);
 658                 vdtree_expand_by_data(vdt, vdt->drop_fd, TRUE);
 659                 }
 660
 661         vdt->drop_expand_id = -1;
 662         return FALSE;
 663 }
 664
 665 static void vdtree_dnd_drop_expand_cancel(ViewDirTree *vdt)
 666 {
 667         if (vdt->drop_expand_id != -1) g_source_remove(vdt->drop_expand_id);
 668         vdt->drop_expand_id = -1;
 669 }
 670
 671 static void vdtree_dnd_drop_expand(ViewDirTree *vdt)
 672 {
 673         vdtree_dnd_drop_expand_cancel(vdt);
 674         vdt->drop_expand_id = g_timeout_add(1000, vdtree_dnd_drop_expand_cb, vdt);
 675 }
 676
 677 static void vdtree_drop_update(ViewDirTree *vdt, gint x, gint y)
 678 {
 679         GtkTreePath *tpath;
 680         GtkTreeIter iter;
 681         FileData *fd = NULL;
 682
 683         if (gtk_tree_view_get_path_at_pos(GTK_TREE_VIEW(vdt->treeview), x, y,
 684                                           &tpath, NULL, NULL, NULL))
 685                 {
 686                 GtkTreeModel *store;
 687                 NodeData *nd;
 688
 689                 store = gtk_tree_view_get_model(GTK_TREE_VIEW(vdt->treeview));
 690                 gtk_tree_model_get_iter(store, &iter, tpath);
 691                 gtk_tree_model_get(store, &iter, DIR_COLUMN_POINTER, &nd, -1);
 692                 gtk_tree_path_free(tpath);
 693
 694                 fd = (nd) ? nd->fd : NULL;
 695                 }
 696
 697         if (fd != vdt->drop_fd)
 698                 {
 699                 vdtree_color_set(vdt, vdt->drop_fd, FALSE);
 700                 vdtree_color_set(vdt, fd, TRUE);
 701                 if (fd) vdtree_dnd_drop_expand(vdt);
 702                 }
 703
 704         vdt->drop_fd = fd;
 705 }
 706
 707 static void vdtree_dnd_drop_scroll_cancel(ViewDirTree *vdt)
 708 {
 709         if (vdt->drop_scroll_id != -1) g_source_remove(vdt->drop_scroll_id);
 710         vdt->drop_scroll_id = -1;
 711 }
 712
 713 static gint vdtree_auto_scroll_idle_cb(gpointer data)
 714 {
 715         ViewDirTree *vdt = data;
 716
 717         if (vdt->drop_fd)
 718                 {
 719                 GdkWindow *window;
 720                 gint x, y;
 721                 gint w, h;
 722
 723                 window = vdt->treeview->window;
 724                 gdk_window_get_pointer(window, &x, &y, NULL);
 725                 gdk_drawable_get_size(window, &w, &h);
 726                 if (x >= 0 && x < w && y >= 0 && y < h)
 727                         {
 728                         vdtree_drop_update(vdt, x, y);
 729                         }
 730                 }
 731
 732         vdt->drop_scroll_id = -1;
 733         return FALSE;
 734 }
 735
 736 static gint vdtree_auto_scroll_notify_cb(GtkWidget *widget, gint x, gint y, gpointer data)
 737 {
 738         ViewDirTree *vdt = data;
 739
 740         if (!vdt->drop_fd || vdt->drop_list) return FALSE;
 741
 742         if (vdt->drop_scroll_id == -1) vdt->drop_scroll_id = g_idle_add(vdtree_auto_scroll_idle_cb, vdt);
 743
 744         return TRUE;
 745 }
 746
 747 static gint vdtree_dnd_drop_motion(GtkWidget *widget, GdkDragContext *context,
 748                                    gint x, gint y, guint time, gpointer data)
 749 {
 750         ViewDirTree *vdt = data;
 751
 752         vdt->click_fd = NULL;
 753
 754         if (gtk_drag_get_source_widget(context) == vdt->treeview)
 755                 {
 756                 gdk_drag_status(context, 0, time);
 757                 return TRUE;
 758                 }
 759         else
 760                 {
 761                 gdk_drag_status(context, context->suggested_action, time);
 762                 }
 763
 764         vdtree_drop_update(vdt, x, y);
 765
 766         if (vdt->drop_fd)
 767                 {
 768                 GtkAdjustment *adj = gtk_tree_view_get_vadjustment(GTK_TREE_VIEW(vdt->treeview));
 769                 widget_auto_scroll_start(vdt->treeview, adj, -1, -1, vdtree_auto_scroll_notify_cb, vdt);
 770                 }
 771
 772         return FALSE;
 773 }
 774
 775 static void vdtree_dnd_drop_leave(GtkWidget *widget, GdkDragContext *context, guint time, gpointer data)
 776 {
 777         ViewDirTree *vdt = data;
 778
 779         if (vdt->drop_fd != vdt->click_fd) vdtree_color_set(vdt, vdt->drop_fd, FALSE);
 780
 781         vdt->drop_fd = NULL;
 782
 783         vdtree_dnd_drop_expand_cancel(vdt);
 784 }
 785
 786 static void vdtree_dnd_init(ViewDirTree *vdt)
 787 {
 788         gtk_drag_source_set(vdt->treeview, GDK_BUTTON1_MASK | GDK_BUTTON2_MASK,
 789                             dnd_file_drag_types, dnd_file_drag_types_count,
 790                             GDK_ACTION_COPY | GDK_ACTION_MOVE | GDK_ACTION_ASK);
 791         g_signal_connect(G_OBJECT(vdt->treeview), "drag_data_get",
 792                          G_CALLBACK(vdtree_dnd_get), vdt);
 793         g_signal_connect(G_OBJECT(vdt->treeview), "drag_begin",
 794                          G_CALLBACK(vdtree_dnd_begin), vdt);
 795         g_signal_connect(G_OBJECT(vdt->treeview), "drag_end",
 796                          G_CALLBACK(vdtree_dnd_end), vdt);
 797
 798         vdtree_dest_set(vdt, TRUE);
 799         g_signal_connect(G_OBJECT(vdt->treeview), "drag_data_received",
 800                          G_CALLBACK(vdtree_dnd_drop_receive), vdt);
 801         g_signal_connect(G_OBJECT(vdt->treeview), "drag_motion",
 802                          G_CALLBACK(vdtree_dnd_drop_motion), vdt);
 803         g_signal_connect(G_OBJECT(vdt->treeview), "drag_leave",
 804                          G_CALLBACK(vdtree_dnd_drop_leave), vdt);
 805 }
 806
 807 /*
 808  *----------------------------------------------------------------------------
 809  * parts lists
 810  *----------------------------------------------------------------------------
 811  */
 812
 813 static GList *parts_list(const gchar *path)
 814 {
 815         GList *list = NULL;
 816         const gchar *strb, *strp;
 817         gint l;
 818
 819         strp = path;
 820
 821         if (*strp != '/') return NULL;
 822
 823         strp++;
 824         strb = strp;
 825         l = 0;
 826
 827         while (*strp != '\0')
 828                 {
 829                 if (*strp == '/')
 830                         {
 831                         if (l > 0) list = g_list_prepend(list, g_strndup(strb, l));
 832                         strp++;
 833                         strb = strp;
 834                         l = 0;
 835                         }
 836                 else
 837                         {
 838                         strp++;
 839                         l++;
 840                         }
 841                 }
 842         if (l > 0) list = g_list_prepend(list, g_strndup(strb, l));
 843
 844         list = g_list_reverse(list);
 845
 846         list = g_list_prepend(list, g_strdup("/"));
 847
 848         return list;
 849 }
 850
 851 static void parts_list_free(GList *list)
 852 {
 853         GList *work = list;
 854         while (work)
 855                 {
 856                 PathData *pd = work->data;
 857                 g_free(pd->name);
 858                 g_free(pd);
 859                 work = work->next;
 860                 }
 861
 862         g_list_free(list);
 863 }
 864
 865 static GList *parts_list_add_node_points(ViewDirTree *vdt, GList *list)
 866 {
 867         GList *work;
 868         GtkTreeModel *store;
 869         GtkTreeIter iter;
 870         gint valid;
 871
 872         store = gtk_tree_view_get_model(GTK_TREE_VIEW(vdt->treeview));
 873         valid = gtk_tree_model_get_iter_first(store, &iter);
 874
 875         work = list;
 876         while (work)
 877                 {
 878                 PathData *pd;
 879                 FileData *fd = NULL;
 880
 881                 pd = g_new0(PathData, 1);
 882                 pd->name = work->data;
 883
 884                 while (valid && !fd)
 885                         {
 886                         NodeData *nd;
 887
 888                         gtk_tree_model_get(store, &iter, DIR_COLUMN_POINTER, &nd, -1);
 889                         if (strcmp(nd->fd->name, pd->name) == 0)
 890                                 {
 891                                 fd = nd->fd;
 892                                 }
 893                         else
 894                                 {
 895                                 valid = gtk_tree_model_iter_next(store, &iter);
 896                                 }
 897                         }
 898
 899                 pd->node = fd;
 900                 work->data = pd;
 901
 902                 if (fd)
 903                         {
 904                         GtkTreeIter parent;
 905                         memcpy(&parent, &iter, sizeof(parent));
 906                         valid = gtk_tree_model_iter_children(store, &iter, &parent);
 907                         }
 908
 909                 work = work->next;
 910                 }
 911
 912         return list;
 913 }
 914
 915 /*
 916  *----------------------------------------------------------------------------
 917  * misc
 918  *----------------------------------------------------------------------------
 919  */
 920
 921 #if 0
 922 static void vdtree_row_deleted_cb(GtkTreeModel *tree_model, GtkTreePath *tpath, gpointer data)
 923 {
 924         GtkTreeIter iter;
 925         NodeData *nd;
 926
 927         gtk_tree_model_get_iter(tree_model, &iter, tpath);
 928         gtk_tree_model_get(tree_model, &iter, DIR_COLUMN_POINTER, &nd, -1);
 929
 930         if (!nd) return;
 931
 932         file_data_free(nd->fd);
 933         g_free(nd);
 934 }
 935 #endif
 936
 937 /*
 938  *----------------------------------------------------------------------------
 939  * node traversal, management
 940  *----------------------------------------------------------------------------
 941  */
 942
 943 static gint vdtree_find_iter_by_data(ViewDirTree *vdt, GtkTreeIter *parent, NodeData *nd, GtkTreeIter *iter)
 944 {
 945         GtkTreeModel *store;
 946
 947         store = gtk_tree_view_get_model(GTK_TREE_VIEW(vdt->treeview));
 948         if (!nd || !gtk_tree_model_iter_children(store, iter, parent)) return -1;
 949         do      {
 950                 NodeData *cnd;
 951
 952                 gtk_tree_model_get(store, iter, DIR_COLUMN_POINTER, &cnd, -1);
 953                 if (cnd == nd) return TRUE;
 954                 } while (gtk_tree_model_iter_next(store, iter));
 955
 956         return FALSE;
 957 }
 958
 959 static NodeData *vdtree_find_iter_by_name(ViewDirTree *vdt, GtkTreeIter *parent, const gchar *name, GtkTreeIter *iter)
 960 {
 961         GtkTreeModel *store;
 962
 963         store = gtk_tree_view_get_model(GTK_TREE_VIEW(vdt->treeview));
 964         if (!name || !gtk_tree_model_iter_children(store, iter, parent)) return NULL;
 965         do      {
 966                 NodeData *nd;
 967
 968                 gtk_tree_model_get(store, iter, DIR_COLUMN_POINTER, &nd, -1);
 969                 if (nd && strcmp(nd->fd->name, name) == 0) return nd;
 970                 } while (gtk_tree_model_iter_next(store, iter));
 971
 972         return NULL;
 973 }
 974
 975 static void vdtree_add_by_data(ViewDirTree *vdt, FileData *fd, GtkTreeIter *parent)
 976 {
 977         GtkTreeStore *store;
 978         GtkTreeIter child;
 979         GList *list;
 980         NodeData *nd;
 981         GdkPixbuf *pixbuf;
 982         NodeData *end;
 983         GtkTreeIter empty;
 984
 985         if (!fd) return;
 986
 987         list = parts_list(fd->path);
 988         if (!list) return;
 989
 990         if (access_file(fd->path, R_OK | X_OK))
 991                 {
 992                 pixbuf = vdt->pf->close;
 993                 }
 994         else
 995                 {
 996                 pixbuf = vdt->pf->deny;
 997                 }
 998
 999         nd = g_new0(NodeData, 1);
1000         nd->fd = fd;
1001         nd->expanded = FALSE;
1002         nd->last_update = time(NULL);
1003
1004         store = GTK_TREE_STORE(gtk_tree_view_get_model(GTK_TREE_VIEW(vdt->treeview)));
1005         gtk_tree_store_append(store, &child, parent);
1006         gtk_tree_store_set(store, &child, DIR_COLUMN_POINTER, nd,
1007                                          DIR_COLUMN_ICON, pixbuf,
1008                                          DIR_COLUMN_NAME, nd->fd->name,
1009                                          DIR_COLUMN_COLOR, FALSE, -1);
1010
1011         /* all nodes are created with an "empty" node, so that the expander is shown
1012          * this is removed when the child is populated */
1013         end = g_new0(NodeData, 1);
1014         end->fd = g_new0(FileData, 1);
1015         end->fd->path = g_strdup("");
1016         end->fd->name = end->fd->path;
1017         end->expanded = TRUE;
1018
1019         gtk_tree_store_append(store, &empty, &child);
1020         gtk_tree_store_set(store, &empty, DIR_COLUMN_POINTER, end,
1021                                           DIR_COLUMN_NAME, "empty", -1);
1022
1023         if (parent)
1024                 {
1025                 NodeData *pnd;
1026                 GtkTreePath *tpath;
1027
1028                 gtk_tree_model_get(GTK_TREE_MODEL(store), parent, DIR_COLUMN_POINTER, &pnd, -1);
1029                 tpath = gtk_tree_model_get_path(GTK_TREE_MODEL(store), parent);
1030                 if (tree_descend_subdirs &&
1031                     gtk_tree_view_row_expanded(GTK_TREE_VIEW(vdt->treeview), tpath) &&
1032                     !nd->expanded)
1033                         {
1034                         vdtree_populate_path_by_iter(vdt, &child, FALSE, vdt->path);
1035                         }
1036                 gtk_tree_path_free(tpath);
1037                 }
1038 }
1039
1040 static gint vdtree_populate_path_by_iter(ViewDirTree *vdt, GtkTreeIter *iter, gint force, const gchar *target_path)
1041 {
1042         GtkTreeModel *store;
1043         GList *list;
1044         GList *work;
1045         GList *old;
1046         time_t current_time;
1047         GtkTreeIter child;
1048         NodeData *nd;
1049
1050         store = gtk_tree_view_get_model(GTK_TREE_VIEW(vdt->treeview));
1051         gtk_tree_model_get(store, iter, DIR_COLUMN_POINTER, &nd, -1);
1052
1053         if (!nd) return FALSE;
1054
1055         current_time = time(NULL);
1056
1057         if (nd->expanded)
1058                 {
1059                 if (!force && current_time - nd->last_update < 10) return TRUE;
1060                 if (!isdir(nd->fd->path))
1061                         {
1062                         if (vdt->click_fd == nd->fd) vdt->click_fd = NULL;
1063                         if (vdt->drop_fd == nd->fd) vdt->drop_fd = NULL;
1064                         gtk_tree_store_remove(GTK_TREE_STORE(store), iter);
1065                         vdtree_node_free(nd);
1066                         return FALSE;
1067                         }
1068                 if (!force && filetime(nd->fd->path) == nd->fd->date) return TRUE;
1069                 }
1070
1071         vdtree_busy_push(vdt);
1072
1073         list = NULL;
1074         filelist_read(nd->fd->path, NULL, &list);
1075
1076         /* when hidden files are not enabled, and the user enters a hidden path,
1077          * allow the tree to display that path by specifically inserting the hidden entries
1078          */
1079         if (!show_dot_files &&
1080             target_path &&
1081             strncmp(nd->fd->path, target_path, strlen(nd->fd->path)) == 0)
1082                 {
1083                 gint n;
1084
1085                 n = strlen(nd->fd->path);
1086                 if (target_path[n] == '/' && target_path[n+1] == '.')
1087                         {
1088                         gchar *name8;
1089                         gchar *namel;
1090                         struct stat sbuf;
1091
1092                         n++;
1093
1094                         while (target_path[n] != '\0' && target_path[n] != '/') n++;
1095                         name8 = g_strndup(target_path, n);
1096                         namel = path_from_utf8(name8);
1097
1098                         if (stat_utf8(name8, &sbuf))
1099                                 {
1100                                 list = g_list_prepend(list, file_data_new(namel, &sbuf));
1101                                 }
1102
1103                         g_free(namel);
1104                         g_free(name8);
1105                         }
1106                 }
1107
1108         old = NULL;
1109         if (gtk_tree_model_iter_children(store, &child, iter))
1110                 {
1111                 do      {
1112                         NodeData *cnd;
1113
1114                         gtk_tree_model_get(store, &child, DIR_COLUMN_POINTER, &cnd, -1);
1115                         old = g_list_prepend(old, cnd);
1116                         } while (gtk_tree_model_iter_next(store, &child));
1117                 }
1118
1119         work = list;
1120         while (work)
1121                 {
1122                 FileData *fd;
1123
1124                 fd = work->data;
1125                 work = work->next;
1126
1127                 if (strcmp(fd->name, ".") == 0 || strcmp(fd->name, "..") == 0)
1128                         {
1129                         file_data_free(fd);
1130                         }
1131                 else
1132                         {
1133                         NodeData *cnd;
1134
1135                         cnd = vdtree_find_iter_by_name(vdt, iter, fd->name, &child);
1136                         if (cnd)
1137                                 {
1138                                 old = g_list_remove(old, cnd);
1139                                 if (cnd->expanded && cnd->fd->date != fd->date &&
1140                                     vdtree_populate_path_by_iter(vdt, &child, FALSE, target_path))
1141                                         {
1142                                         cnd->fd->size = fd->size;
1143                                         cnd->fd->date = fd->date;
1144                                         }
1145
1146                                 file_data_free(fd);
1147                                 }
1148                         else
1149                                 {
1150                                 vdtree_add_by_data(vdt, fd, iter);
1151                                 }
1152                         }
1153                 }
1154
1155         work = old;
1156         while (work)
1157                 {
1158                 NodeData *cnd = work->data;
1159                 work = work->next;
1160
1161                 if (vdt->click_fd == cnd->fd) vdt->click_fd = NULL;
1162                 if (vdt->drop_fd == cnd->fd) vdt->drop_fd = NULL;
1163
1164                 if (vdtree_find_iter_by_data(vdt, iter, cnd, &child))
1165                         {
1166                         gtk_tree_store_remove(GTK_TREE_STORE(store), &child);
1167                         vdtree_node_free(cnd);
1168                         }
1169                 }
1170
1171         g_list_free(old);
1172         g_list_free(list);
1173
1174         vdtree_busy_pop(vdt);
1175
1176         nd->expanded = TRUE;
1177         nd->last_update = current_time;
1178
1179         return TRUE;
1180 }
1181
1182 static FileData *vdtree_populate_path(ViewDirTree *vdt, const gchar *path, gint expand, gint force)
1183 {
1184         GList *list;
1185         GList *work;
1186         FileData *fd = NULL;
1187
1188         if (!path) return NULL;
1189
1190         vdtree_busy_push(vdt);
1191
1192         list = parts_list(path);
1193         list = parts_list_add_node_points(vdt, list);
1194
1195         work = list;
1196         while (work)
1197                 {
1198                 PathData *pd = work->data;
1199                 if (pd->node == NULL)
1200                         {
1201                         PathData *parent_pd;
1202                         GtkTreeIter parent_iter;
1203                         GtkTreeIter iter;
1204                         NodeData *nd;
1205
1206                         if (work == list)
1207                                 {
1208                                 /* should not happen */
1209                                 printf("vdtree warning, root node not found\n");
1210                                 parts_list_free(list);
1211                                 vdtree_busy_pop(vdt);
1212                                 return NULL;
1213                                 }
1214
1215                         parent_pd = work->prev->data;
1216
1217                         if (!vdtree_find_row(vdt, parent_pd->node, &parent_iter, NULL) ||
1218                             !vdtree_populate_path_by_iter(vdt, &parent_iter, force, path) ||
1219                             (nd = vdtree_find_iter_by_name(vdt, &parent_iter, pd->name, &iter)) == NULL)
1220                                 {
1221                                 printf("vdtree warning, aborted at %s\n", parent_pd->name);
1222                                 parts_list_free(list);
1223                                 vdtree_busy_pop(vdt);
1224                                 return NULL;
1225                                 }
1226
1227                         pd->node = nd->fd;
1228
1229                         if (pd->node)
1230                                 {
1231                                 if (expand)
1232                                         {
1233                                         vdtree_expand_by_iter(vdt, &parent_iter, TRUE);
1234                                         vdtree_expand_by_iter(vdt, &iter, TRUE);
1235                                         }
1236                                 vdtree_populate_path_by_iter(vdt, &iter, force, path);
1237                                 }
1238                         }
1239                 else
1240                         {
1241                         GtkTreeIter iter;
1242
1243                         if (vdtree_find_row(vdt, pd->node, &iter, NULL))
1244                                 {
1245                                 if (expand) vdtree_expand_by_iter(vdt, &iter, TRUE);
1246                                 vdtree_populate_path_by_iter(vdt, &iter, force, path);
1247                                 }
1248                         }
1249
1250                 work = work->next;
1251                 }
1252
1253         work = g_list_last(list);
1254         if (work)
1255                 {
1256                 PathData *pd = work->data;
1257                 fd = pd->node;
1258                 }
1259         parts_list_free(list);
1260
1261         vdtree_busy_pop(vdt);
1262
1263         return fd;
1264 }
1265
1266 /*
1267  *----------------------------------------------------------------------------
1268  * access
1269  *----------------------------------------------------------------------------
1270  */
1271
1272 static gint selection_is_ok = FALSE;
1273
1274 static gboolean vdtree_select_cb(GtkTreeSelection *selection, GtkTreeModel *store, GtkTreePath *tpath,
1275                                  gboolean path_currently_selected, gpointer data)
1276 {
1277         return selection_is_ok;
1278 }
1279
1280 static void vdtree_select_row(ViewDirTree *vdt, FileData *fd)
1281 {
1282         GtkTreeSelection *selection;
1283         GtkTreeIter iter;
1284
1285         if (!vdtree_find_row(vdt, fd, &iter, NULL)) return;
1286         selection = gtk_tree_view_get_selection(GTK_TREE_VIEW(vdt->treeview));
1287
1288         /* hack, such that selection is only allowed to be changed from here */
1289         selection_is_ok = TRUE;
1290         gtk_tree_selection_select_iter(selection, &iter);
1291         selection_is_ok = FALSE;
1292
1293         if (!vdtree_populate_path_by_iter(vdt, &iter, FALSE, vdt->path)) return;
1294
1295         vdtree_expand_by_iter(vdt, &iter, TRUE);
1296
1297         if (fd && vdt->select_func)
1298                 {
1299                 vdt->select_func(vdt, fd->path, vdt->select_data);
1300                 }
1301 }
1302
1303 gint vdtree_set_path(ViewDirTree *vdt, const gchar *path)
1304 {
1305         FileData *fd;
1306         GtkTreeIter iter;
1307
1308         if (!path) return FALSE;
1309         if (vdt->path && strcmp(path, vdt->path) == 0) return TRUE;
1310
1311         g_free(vdt->path);
1312         vdt->path = g_strdup(path);
1313
1314         fd = vdtree_populate_path(vdt, vdt->path, TRUE, FALSE);
1315
1316         if (!fd) return FALSE;
1317
1318         if (vdtree_find_row(vdt, fd, &iter, NULL))
1319                 {
1320                 GtkTreeModel *store;
1321                 GtkTreePath *tpath;
1322
1323                 tree_view_row_make_visible(GTK_TREE_VIEW(vdt->treeview), &iter, TRUE);
1324
1325                 store = gtk_tree_view_get_model(GTK_TREE_VIEW(vdt->treeview));
1326                 tpath = gtk_tree_model_get_path(store, &iter);
1327                 gtk_tree_view_set_cursor(GTK_TREE_VIEW(vdt->treeview), tpath, NULL, FALSE);
1328                 gtk_tree_path_free(tpath);
1329
1330                 vdtree_select_row(vdt, fd);
1331                 }
1332
1333         return TRUE;
1334 }
1335
1336 #if 0
1337 const gchar *vdtree_get_path(ViewDirTree *vdt)
1338 {
1339         return vdt->path;
1340 }
1341 #endif
1342
1343 void vdtree_refresh(ViewDirTree *vdt)
1344 {
1345         vdtree_populate_path(vdt, vdt->path, FALSE, TRUE);
1346 }
1347
1348 const gchar *vdtree_row_get_path(ViewDirTree *vdt, gint row)
1349 {
1350         printf("FIXME: no get row path\n");
1351         return NULL;
1352 }
1353
1354 /*
1355  *----------------------------------------------------------------------------
1356  * callbacks
1357  *----------------------------------------------------------------------------
1358  */
1359
1360 static void vdtree_menu_position_cb(GtkMenu *menu, gint *x, gint *y, gboolean *push_in, gpointer data)
1361 {
1362         ViewDirTree *vdt = data;
1363         GtkTreeModel *store;
1364         GtkTreeIter iter;
1365         GtkTreePath *tpath;
1366         gint cw, ch;
1367
1368         if (vdtree_find_row(vdt, vdt->click_fd, &iter, NULL) < 0) return;
1369         store = gtk_tree_view_get_model(GTK_TREE_VIEW(vdt->treeview));
1370         tpath = gtk_tree_model_get_path(store, &iter);
1371         tree_view_get_cell_clamped(GTK_TREE_VIEW(vdt->treeview), tpath, 0, TRUE, x, y, &cw, &ch);
1372         gtk_tree_path_free(tpath);
1373         *y += ch;
1374         popup_menu_position_clamp(menu, x, y, 0);
1375 }
1376
1377 static gint vdtree_press_key_cb(GtkWidget *widget, GdkEventKey *event, gpointer data)
1378 {
1379         ViewDirTree *vdt = data;
1380         GtkTreePath *tpath;
1381         GtkTreeIter iter;
1382         FileData *fd = NULL;
1383
1384         gtk_tree_view_get_cursor(GTK_TREE_VIEW(vdt->treeview), &tpath, NULL);
1385         if (tpath)
1386                 {
1387                 GtkTreeModel *store;
1388                 NodeData *nd;
1389
1390                 store = gtk_tree_view_get_model(GTK_TREE_VIEW(widget));
1391                 gtk_tree_model_get_iter(store, &iter, tpath);
1392                 gtk_tree_model_get(store, &iter, DIR_COLUMN_POINTER, &nd, -1);
1393
1394                 gtk_tree_path_free(tpath);
1395
1396                 fd = (nd) ? nd->fd : NULL;
1397                 }
1398
1399         switch (event->keyval)
1400                 {
1401                 case GDK_Menu:
1402                         vdt->click_fd = fd;
1403                         vdtree_color_set(vdt, vdt->click_fd, TRUE);
1404
1405                         vdt->popup = vdtree_pop_menu(vdt, vdt->click_fd);
1406                         gtk_menu_popup(GTK_MENU(vdt->popup), NULL, NULL, vdtree_menu_position_cb, vdt, 0, GDK_CURRENT_TIME);
1407
1408                         return TRUE;
1409                         break;
1410                 case GDK_plus:
1411                 case GDK_Right:
1412                 case GDK_KP_Add:
1413                         if (fd)
1414                                 {
1415                                 vdtree_populate_path_by_iter(vdt, &iter, FALSE, vdt->path);
1416                                 vdtree_icon_set_by_iter(vdt, &iter, vdt->pf->open);
1417                                 }
1418                         break;
1419                 }
1420
1421         return FALSE;
1422 }
1423
1424 static gint vdtree_clicked_on_expander(GtkTreeView *treeview, GtkTreePath *tpath,
1425                                        GtkTreeViewColumn *column, gint x, gint y, gint *left_of_expander)
1426 {
1427         gint depth;
1428         gint size;
1429         gint sep;
1430         gint exp_width;
1431
1432         if (column != gtk_tree_view_get_expander_column(treeview)) return FALSE;
1433
1434         gtk_widget_style_get(GTK_WIDGET(treeview), "expander-size", &size, "horizontal-separator", &sep, NULL);
1435         depth = gtk_tree_path_get_depth(tpath);
1436
1437         exp_width = sep + size + sep;
1438
1439         if (x <= depth * exp_width)
1440                 {
1441                 if (left_of_expander) *left_of_expander = !(x >= (depth - 1) * exp_width);
1442                 return TRUE;
1443                 }
1444
1445         return FALSE;
1446 }
1447
1448 static gint vdtree_press_cb(GtkWidget *widget, GdkEventButton *bevent, gpointer data)
1449 {
1450         ViewDirTree *vdt = data;
1451         GtkTreePath *tpath;
1452         GtkTreeViewColumn *column;
1453         GtkTreeIter iter;
1454         NodeData *nd = NULL;
1455
1456         if (gtk_tree_view_get_path_at_pos(GTK_TREE_VIEW(widget), bevent->x, bevent->y,
1457                                           &tpath, &column, NULL, NULL))
1458                 {
1459                 GtkTreeModel *store;
1460                 gint left_of_expander;
1461
1462                 store = gtk_tree_view_get_model(GTK_TREE_VIEW(widget));
1463                 gtk_tree_model_get_iter(store, &iter, tpath);
1464                 gtk_tree_model_get(store, &iter, DIR_COLUMN_POINTER, &nd, -1);
1465                 gtk_tree_view_set_cursor(GTK_TREE_VIEW(widget), tpath, NULL, FALSE);
1466
1467                 if (vdtree_clicked_on_expander(GTK_TREE_VIEW(widget), tpath, column, bevent->x, bevent->y, &left_of_expander))
1468                         {
1469                         vdt->click_fd = NULL;
1470
1471                         /* clicking this region should automatically reveal an expander, if necessary
1472                          * treeview bug: the expander will not expand until a button_motion_event highlights it.
1473                          */
1474                         if (bevent->button == 1 &&
1475                             !left_of_expander &&
1476                             !gtk_tree_view_row_expanded(GTK_TREE_VIEW(vdt->treeview), tpath))
1477                                 {
1478                                 vdtree_populate_path_by_iter(vdt, &iter, FALSE, vdt->path);
1479                                 vdtree_icon_set_by_iter(vdt, &iter, vdt->pf->open);
1480                                 }
1481
1482                         gtk_tree_path_free(tpath);
1483                         return FALSE;
1484                         }
1485
1486                 gtk_tree_path_free(tpath);
1487                 }
1488
1489         vdt->click_fd = (nd) ? nd->fd : NULL;
1490         vdtree_color_set(vdt, vdt->click_fd, TRUE);
1491
1492         if (bevent->button == 3)
1493                 {
1494                 vdt->popup = vdtree_pop_menu(vdt, vdt->click_fd);
1495                 gtk_menu_popup(GTK_MENU(vdt->popup), NULL, NULL, NULL, NULL,
1496                                bevent->button, bevent->time);
1497                 }
1498
1499         return (bevent->button != 1);
1500 }
1501
1502 static gint vdtree_release_cb(GtkWidget *widget, GdkEventButton *bevent, gpointer data)
1503 {
1504         ViewDirTree *vdt = data;
1505         GtkTreePath *tpath;
1506         GtkTreeIter iter;
1507         NodeData *nd = NULL;
1508
1509         if (!vdt->click_fd) return FALSE;
1510         vdtree_color_set(vdt, vdt->click_fd, FALSE);
1511
1512         if (bevent->button != 1) return TRUE;
1513
1514         if ((bevent->x != 0 || bevent->y != 0) &&
1515             gtk_tree_view_get_path_at_pos(GTK_TREE_VIEW(widget), bevent->x, bevent->y,
1516                                           &tpath, NULL, NULL, NULL))
1517                 {
1518                 GtkTreeModel *store;
1519
1520                 store = gtk_tree_view_get_model(GTK_TREE_VIEW(widget));
1521                 gtk_tree_model_get_iter(store, &iter, tpath);
1522                 gtk_tree_model_get(store, &iter, DIR_COLUMN_POINTER, &nd, -1);
1523                 gtk_tree_path_free(tpath);
1524                 }
1525
1526         if (nd && vdt->click_fd == nd->fd)
1527                 {
1528                 vdtree_select_row(vdt, vdt->click_fd);
1529                 }
1530
1531         return FALSE;
1532 }
1533
1534 static void vdtree_row_expanded(GtkTreeView *treeview, GtkTreeIter *iter, GtkTreePath *tpath, gpointer data)
1535 {
1536         ViewDirTree *vdt = data;
1537
1538         vdtree_populate_path_by_iter(vdt, iter, FALSE, NULL);
1539         vdtree_icon_set_by_iter(vdt, iter, vdt->pf->open);
1540 }
1541
1542 static void vdtree_row_collapsed(GtkTreeView *treeview, GtkTreeIter *iter, GtkTreePath *tpath, gpointer data)
1543 {
1544         ViewDirTree *vdt = data;
1545
1546         vdtree_icon_set_by_iter(vdt, iter, vdt->pf->close);
1547 }
1548
1549 static gint vdtree_sort_cb(GtkTreeModel *store, GtkTreeIter *a, GtkTreeIter *b, gpointer data)
1550 {
1551         NodeData *nda;
1552         NodeData *ndb;
1553
1554         gtk_tree_model_get(store, a, DIR_COLUMN_POINTER, &nda, -1);
1555         gtk_tree_model_get(store, b, DIR_COLUMN_POINTER, &ndb, -1);
1556
1557         return CASE_SORT(nda->fd->name, ndb->fd->name);
1558 }
1559
1560 /*
1561  *----------------------------------------------------------------------------
1562  * core
1563  *----------------------------------------------------------------------------
1564  */
1565
1566 static void vdtree_setup_root(ViewDirTree *vdt)
1567 {
1568         const gchar *path = "/";
1569         FileData *fd;
1570
1571         fd = g_new0(FileData, 1);
1572         fd->path = g_strdup(path);
1573         fd->name = fd->path;
1574         fd->size = 0;
1575         fd->date = filetime(path);
1576         vdtree_add_by_data(vdt, fd, NULL);
1577
1578         vdtree_expand_by_data(vdt, fd, TRUE);
1579         vdtree_populate_path(vdt, path, FALSE, FALSE);
1580 }
1581
1582 static void vdtree_activate_cb(GtkTreeView *tview, GtkTreePath *tpath, GtkTreeViewColumn *column, gpointer data)
1583 {
1584         ViewDirTree *vdt = data;
1585         GtkTreeModel *store;
1586         GtkTreeIter iter;
1587         NodeData *nd;
1588
1589         store = gtk_tree_view_get_model(tview);
1590         gtk_tree_model_get_iter(store, &iter, tpath);
1591         gtk_tree_model_get(store, &iter, DIR_COLUMN_POINTER, &nd, -1);
1592
1593         vdtree_select_row(vdt, nd->fd);
1594 }
1595
1596 static GdkColor *vdtree_color_shifted(GtkWidget *widget)
1597 {
1598         static GdkColor color;
1599         static GtkWidget *done = NULL;
1600
1601         if (done != widget)
1602                 {
1603                 GtkStyle *style;
1604
1605                 style = gtk_widget_get_style(widget);
1606                 memcpy(&color, &style->base[GTK_STATE_NORMAL], sizeof(color));
1607                 shift_color(&color, -1, 0);
1608                 done = widget;
1609                 }
1610
1611         return &color;
1612 }
1613
1614 static void vdtree_color_cb(GtkTreeViewColumn *tree_column, GtkCellRenderer *cell,
1615                             GtkTreeModel *tree_model, GtkTreeIter *iter, gpointer data)
1616 {
1617         ViewDirTree *vdt = data;
1618         gboolean set;
1619
1620         gtk_tree_model_get(tree_model, iter, DIR_COLUMN_COLOR, &set, -1);
1621         g_object_set(G_OBJECT(cell),
1622                      "cell-background-gdk", vdtree_color_shifted(vdt->treeview),
1623                      "cell-background-set", set, NULL);
1624 }
1625
1626 static gboolean vdtree_destroy_node_cb(GtkTreeModel *store, GtkTreePath *tpath, GtkTreeIter *iter, gpointer data)
1627 {
1628         NodeData *nd;
1629
1630         gtk_tree_model_get(store, iter, DIR_COLUMN_POINTER, &nd, -1);
1631         vdtree_node_free(nd);
1632
1633         return FALSE;
1634 }
1635
1636 static void vdtree_destroy_cb(GtkWidget *widget, gpointer data)
1637 {
1638         ViewDirTree *vdt = data;
1639         GtkTreeModel *store;
1640
1641         if (vdt->popup)
1642                 {
1643                 g_signal_handlers_disconnect_matched(G_OBJECT(vdt->popup), G_SIGNAL_MATCH_DATA,
1644                                                      0, 0, 0, NULL, vdt);
1645                 gtk_widget_destroy(vdt->popup);
1646                 }
1647
1648         vdtree_dnd_drop_expand_cancel(vdt);
1649         vdtree_dnd_drop_scroll_cancel(vdt);
1650         widget_auto_scroll_stop(vdt->treeview);
1651
1652         store = gtk_tree_view_get_model(GTK_TREE_VIEW(vdt->treeview));
1653         gtk_tree_model_foreach(store, vdtree_destroy_node_cb, vdt);
1654
1655         path_list_free(vdt->drop_list);
1656
1657         folder_icons_free(vdt->pf);
1658
1659         g_free(vdt->path);
1660         g_free(vdt);
1661 }
1662
1663 ViewDirTree *vdtree_new(const gchar *path, gint expand)
1664 {
1665         ViewDirTree *vdt;
1666         GtkTreeStore *store;
1667         GtkTreeSelection *selection;
1668         GtkTreeViewColumn *column;
1669         GtkCellRenderer *renderer;
1670
1671         vdt = g_new0(ViewDirTree, 1);
1672
1673         vdt->path = NULL;
1674         vdt->click_fd = NULL;
1675
1676         vdt->drop_fd = NULL;
1677         vdt->drop_list = NULL;
1678         vdt->drop_scroll_id = -1;
1679         vdt->drop_expand_id = -1;
1680
1681         vdt->popup = NULL;
1682
1683         vdt->busy_ref = 0;
1684
1685         vdt->widget = gtk_scrolled_window_new(NULL, NULL);
1686         gtk_scrolled_window_set_shadow_type(GTK_SCROLLED_WINDOW(vdt->widget), GTK_SHADOW_IN);
1687         gtk_scrolled_window_set_policy(GTK_SCROLLED_WINDOW(vdt->widget),
1688                                        GTK_POLICY_AUTOMATIC, GTK_POLICY_ALWAYS);
1689         g_signal_connect(G_OBJECT(vdt->widget), "destroy",
1690                          G_CALLBACK(vdtree_destroy_cb), vdt);
1691
1692         store = gtk_tree_store_new(4, G_TYPE_POINTER, GDK_TYPE_PIXBUF, G_TYPE_STRING, G_TYPE_INT);
1693         vdt->treeview = gtk_tree_view_new_with_model(GTK_TREE_MODEL(store));
1694         g_object_unref(store);
1695
1696         gtk_tree_view_set_headers_visible(GTK_TREE_VIEW(vdt->treeview), FALSE);
1697         gtk_tree_view_set_enable_search(GTK_TREE_VIEW(vdt->treeview), FALSE);
1698         gtk_tree_sortable_set_default_sort_func(GTK_TREE_SORTABLE(store), vdtree_sort_cb, vdt, NULL);
1699         gtk_tree_sortable_set_sort_column_id(GTK_TREE_SORTABLE(store),
1700                                              GTK_TREE_SORTABLE_DEFAULT_SORT_COLUMN_ID, GTK_SORT_ASCENDING);
1701
1702         g_signal_connect(G_OBJECT(vdt->treeview), "row_activated",
1703                          G_CALLBACK(vdtree_activate_cb), vdt);
1704         g_signal_connect(G_OBJECT(vdt->treeview), "row_expanded",
1705                          G_CALLBACK(vdtree_row_expanded), vdt);
1706         g_signal_connect(G_OBJECT(vdt->treeview), "row_collapsed",
1707                          G_CALLBACK(vdtree_row_collapsed), vdt);
1708 #if 0
1709         g_signal_connect(G_OBJECT(store), "row_deleted",
1710                          G_CALLBACK(vdtree_row_deleted_cb), vdt);
1711 #endif
1712
1713         selection = gtk_tree_view_get_selection(GTK_TREE_VIEW(vdt->treeview));
1714         gtk_tree_selection_set_mode(selection, GTK_SELECTION_SINGLE);
1715         gtk_tree_selection_set_select_function(selection, vdtree_select_cb, vdt, NULL);
1716
1717         column = gtk_tree_view_column_new();
1718         gtk_tree_view_column_set_sizing(column, GTK_TREE_VIEW_COLUMN_GROW_ONLY);
1719
1720         renderer = gtk_cell_renderer_pixbuf_new();
1721         gtk_tree_view_column_pack_start(column, renderer, FALSE);
1722         gtk_tree_view_column_add_attribute(column, renderer, "pixbuf", DIR_COLUMN_ICON);
1723         gtk_tree_view_column_set_cell_data_func(column, renderer, vdtree_color_cb, vdt, NULL);
1724
1725         renderer = gtk_cell_renderer_text_new();
1726         gtk_tree_view_column_pack_start(column, renderer, TRUE);
1727         gtk_tree_view_column_add_attribute(column, renderer, "text", DIR_COLUMN_NAME);
1728         gtk_tree_view_column_set_cell_data_func(column, renderer, vdtree_color_cb, vdt, NULL);
1729
1730         gtk_tree_view_append_column(GTK_TREE_VIEW(vdt->treeview), column);
1731
1732         g_signal_connect(G_OBJECT(vdt->treeview), "key_press_event",
1733                          G_CALLBACK(vdtree_press_key_cb), vdt);
1734
1735         gtk_container_add(GTK_CONTAINER(vdt->widget), vdt->treeview);
1736         gtk_widget_show(vdt->treeview);
1737
1738         vdt->pf = folder_icons_new();
1739
1740         vdtree_setup_root(vdt);
1741
1742         vdtree_dnd_init(vdt);
1743
1744         g_signal_connect(G_OBJECT(vdt->treeview), "button_press_event",
1745                          G_CALLBACK(vdtree_press_cb), vdt);
1746         g_signal_connect(G_OBJECT(vdt->treeview), "button_release_event",
1747                          G_CALLBACK(vdtree_release_cb), vdt);
1748
1749         vdtree_set_path(vdt, path);
1750
1751         return vdt;
1752 }
1753
1754 void vdtree_set_select_func(ViewDirTree *vdt,
1755                             void (*func)(ViewDirTree *vdt, const gchar *path, gpointer data), gpointer data)
1756 {
1757         vdt->select_func = func;
1758         vdt->select_data = data;
1759 }
1760
1761 #if 0
1762 void vdtree_set_click_func(ViewDirTree *vdt,
1763                            void (*func)(ViewDirTree *vdt, GdkEventButton *event, FileData *fd, gpointer), gpointer data)
1764 {
1765         if (!td) return;
1766         vdt->click_func = func;
1767         vdt->click_data = data;
1768 }
1769 #endif
1770
1771 void vdtree_set_layout(ViewDirTree *vdt, LayoutWindow *layout)
1772 {
1773         vdt->layout = layout;
1774 }
1775