Rename vd_drop_update() to vd_dnd_drop_update().
[geeqie.git] / src / view_dir.c
1 /*
2  * Geeqie
3  * (C) 2008 Vladimir Nadvornik
4  *
5  * Author: Laurent Monin
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 "main.h"
13 #include "view_dir.h"
14
15 #include "dnd.h"
16 #include "dupe.h"
17 #include "filelist.h"
18 #include "layout_image.h"
19 #include "layout_util.h"
20 #include "ui_bookmark.h"
21 #include "ui_fileops.h"
22 #include "ui_tree_edit.h"
23 #include "ui_menu.h"
24 #include "utilops.h"
25 #include "view_dir_list.h"
26 #include "view_dir_tree.h"
27
28 GtkRadioActionEntry menu_view_dir_radio_entries[] = {
29   { "FolderList",       NULL,           N_("_List"),            "<meta>L",      NULL, DIRVIEW_LIST },
30   { "FolderTree",       NULL,           N_("_Tree"),            "<control>T",   NULL, DIRVIEW_TREE },
31 };
32
33 static void vd_destroy_cb(GtkWidget *widget, gpointer data)
34 {
35         ViewDir *vd = data;
36
37         if (vd->popup)
38                 {
39                 g_signal_handlers_disconnect_matched(G_OBJECT(vd->popup), G_SIGNAL_MATCH_DATA,
40                                                      0, 0, 0, NULL, vd);
41                 gtk_widget_destroy(vd->popup);
42                 }
43
44         switch(vd->type)
45         {
46         case DIRVIEW_LIST: vdlist_destroy_cb(widget, data); break;
47         case DIRVIEW_TREE: vdtree_destroy_cb(widget, data); break;
48         }
49         
50         if (vd->pf) folder_icons_free(vd->pf);
51         if (vd->drop_list) filelist_free(vd->drop_list);
52
53         if (vd->path) g_free(vd->path);
54         if (vd->info) g_free(vd->info);
55
56         g_free(vd);
57 }
58
59 ViewDir *vd_new(DirViewType type, const gchar *path)
60 {
61         ViewDir *vd = g_new0(ViewDir, 1);
62
63         vd->path = NULL;
64         vd->click_fd = NULL;
65
66         vd->drop_fd = NULL;
67         vd->drop_list = NULL;
68         vd->drop_scroll_id = -1;
69         vd->drop_list = NULL;
70
71         vd->popup = NULL;
72
73         vd->dnd_drop_leave_func = NULL;
74         vd->dnd_drop_update_func = NULL;
75
76         vd->widget = gtk_scrolled_window_new(NULL, NULL);
77         gtk_scrolled_window_set_shadow_type(GTK_SCROLLED_WINDOW(vd->widget), GTK_SHADOW_IN);
78         gtk_scrolled_window_set_policy(GTK_SCROLLED_WINDOW(vd->widget),
79                                        GTK_POLICY_AUTOMATIC, GTK_POLICY_ALWAYS);
80
81         vd->pf = folder_icons_new();
82
83         switch(type)
84         {
85         case DIRVIEW_LIST: vd = vdlist_new(vd, path); break;
86         case DIRVIEW_TREE: vd = vdtree_new(vd, path); break;
87         }
88
89         gtk_container_add(GTK_CONTAINER(vd->widget), vd->view);
90         
91         vd_dnd_init(vd);
92
93         g_signal_connect(G_OBJECT(vd->view), "row_activated",
94                          G_CALLBACK(vd_activate_cb), vd);
95         g_signal_connect(G_OBJECT(vd->widget), "destroy",
96                          G_CALLBACK(vd_destroy_cb), vd);
97         g_signal_connect(G_OBJECT(vd->view), "key_press_event",
98                          G_CALLBACK(vd_press_key_cb), vd);
99         g_signal_connect(G_OBJECT(vd->view), "button_press_event",
100                          G_CALLBACK(vd_press_cb), vd);
101         g_signal_connect(G_OBJECT(vd->view), "button_release_event",
102                          G_CALLBACK(vd_release_cb), vd);
103
104         if (path) vd_set_path(vd, path);
105
106         gtk_widget_show(vd->view);
107
108         return vd;
109 }
110         
111 void vd_set_select_func(ViewDir *vd,
112                         void (*func)(ViewDir *vd, const gchar *path, gpointer data), gpointer data)
113 {
114         vd->select_func = func;
115         vd->select_data = data;
116 }
117
118 void vd_set_layout(ViewDir *vd, LayoutWindow *layout)
119 {
120         vd->layout = layout;
121 }
122
123 gint vd_set_path(ViewDir *vd, const gchar *path)
124 {
125         gint ret = FALSE;
126
127         switch(vd->type)
128         {
129         case DIRVIEW_LIST: ret = vdlist_set_path(vd, path); break;
130         case DIRVIEW_TREE: ret = vdtree_set_path(vd, path); break;
131         }
132
133         return ret;
134 }
135
136 void vd_refresh(ViewDir *vd)
137 {
138         switch(vd->type)
139         {
140         case DIRVIEW_LIST: return vdlist_refresh(vd);
141         case DIRVIEW_TREE: return vdtree_refresh(vd);
142         }
143 }
144
145 const gchar *vd_row_get_path(ViewDir *vd, gint row)
146 {
147         const gchar *ret = NULL;
148
149         switch(vd->type)
150         {
151         case DIRVIEW_LIST: ret = vdlist_row_get_path(vd, row); break;
152         case DIRVIEW_TREE: ret = vdtree_row_get_path(vd, row); break;
153         }
154
155         return ret;
156 }
157
158 void vd_select_row(ViewDir *vd, FileData *fd)
159 {
160         switch(vd->type)
161         {
162         case DIRVIEW_LIST: vdlist_select_row(vd, fd); break;
163         case DIRVIEW_TREE: vdtree_select_row(vd, fd); break;
164         }
165 }
166
167 gint vd_find_row(ViewDir *vd, FileData *fd, GtkTreeIter *iter)
168 {
169         gint ret = FALSE;
170
171         switch(vd->type)
172         {
173         case DIRVIEW_LIST: ret = vdlist_find_row(vd, fd, iter); break;
174         case DIRVIEW_TREE: ret = vdtree_find_row(vd, fd, iter, NULL); break;
175         }
176
177         return ret;
178 }
179
180 FileData *vd_get_fd_from_tree_path(ViewDir *vd, GtkTreeView *tview, GtkTreePath *tpath)
181 {
182         GtkTreeIter iter;
183         FileData *fd = NULL;
184         GtkTreeModel *store;
185
186         store = gtk_tree_view_get_model(tview);
187         gtk_tree_model_get_iter(store, &iter, tpath);
188         switch (vd->type)
189                 {
190                 case DIRVIEW_LIST:
191                         gtk_tree_model_get(store, &iter, DIR_COLUMN_POINTER, &fd, -1);
192                         break;
193                 case DIRVIEW_TREE:
194                         {
195                         NodeData *nd;
196                         gtk_tree_model_get(store, &iter, DIR_COLUMN_POINTER, &nd, -1);
197                         fd = (nd) ? nd->fd : NULL;
198                         };
199                         break;
200                 }
201
202         return fd;
203 }
204
205 static gint vd_rename_cb(TreeEditData *td, const gchar *old, const gchar *new, gpointer data)
206 {
207         ViewDir *vd = data;
208         FileData *fd;
209         gchar *old_path;
210         gchar *new_path;
211         gchar *base;
212
213         fd = vd_get_fd_from_tree_path(vd, GTK_TREE_VIEW(vd->view), td->path);
214         if (!fd) return FALSE;
215
216         old_path = g_strdup(fd->path);
217
218         base = remove_level_from_path(old_path);
219         new_path = concat_dir_and_file(base, new);
220         g_free(base);
221
222         if (file_util_rename_dir(fd, new_path, vd->view))
223                 {
224
225                 if (vd->type == DIRVIEW_TREE) vdtree_populate_path(vd, new_path, TRUE, TRUE);
226                 if (vd->layout && strcmp(vd->path, old_path) == 0)
227                         {
228                         layout_set_path(vd->layout, new_path);
229                         }
230                 else
231                         {
232                         if (vd->type == DIRVIEW_LIST) vd_refresh(vd);
233                         }
234                 }
235
236         g_free(old_path);
237         g_free(new_path);
238
239         return FALSE;
240 }
241
242 static void vd_rename_by_data(ViewDir *vd, FileData *fd)
243 {
244         GtkTreeModel *store;
245         GtkTreePath *tpath;
246         GtkTreeIter iter;
247
248         if (!fd || vd_find_row(vd, fd, &iter) < 0) return;
249         store = gtk_tree_view_get_model(GTK_TREE_VIEW(vd->view));
250         tpath = gtk_tree_model_get_path(store, &iter);
251
252         tree_edit_by_path(GTK_TREE_VIEW(vd->view), tpath, 0, fd->name,
253                           vd_rename_cb, vd);
254         gtk_tree_path_free(tpath);
255 }
256
257
258 void vd_color_set(ViewDir *vd, FileData *fd, gint color_set)
259 {
260         GtkTreeModel *store;
261         GtkTreeIter iter;
262
263         if (vd_find_row(vd, fd, &iter) < 0) return;
264         store = gtk_tree_view_get_model(GTK_TREE_VIEW(vd->view));
265
266         switch(vd->type)
267         {
268         case DIRVIEW_LIST:
269                 gtk_list_store_set(GTK_LIST_STORE(store), &iter, DIR_COLUMN_COLOR, color_set, -1);
270                 break;
271         case DIRVIEW_TREE:
272                 gtk_tree_store_set(GTK_TREE_STORE(store), &iter, DIR_COLUMN_COLOR, color_set, -1);
273                 break;
274         }
275 }
276
277 void vd_popup_destroy_cb(GtkWidget *widget, gpointer data)
278 {
279         ViewDir *vd = data;
280
281         vd_color_set(vd, vd->click_fd, FALSE);
282         vd->click_fd = NULL;
283         vd->popup = NULL;
284
285         vd_color_set(vd, vd->drop_fd, FALSE);
286         filelist_free(vd->drop_list);
287         vd->drop_list = NULL;
288         vd->drop_fd = NULL;
289 }
290
291 /*
292  *-----------------------------------------------------------------------------
293  * drop menu (from dnd)
294  *-----------------------------------------------------------------------------
295  */
296
297 static void vd_drop_menu_copy_cb(GtkWidget *widget, gpointer data)
298 {
299         ViewDir *vd = data;
300         const gchar *path;
301         GList *list;
302
303         if (!vd->drop_fd) return;
304
305         path = vd->drop_fd->path;
306         list = vd->drop_list;
307         vd->drop_list = NULL;
308
309         file_util_copy_simple(list, path);
310 }
311
312 static void vd_drop_menu_move_cb(GtkWidget *widget, gpointer data)
313 {
314         ViewDir *vd = data;
315         const gchar *path;
316         GList *list;
317
318         if (!vd->drop_fd) return;
319
320         path = vd->drop_fd->path;
321         list = vd->drop_list;
322
323         vd->drop_list = NULL;
324
325         file_util_move_simple(list, path);
326 }
327
328 GtkWidget *vd_drop_menu(ViewDir *vd, gint active)
329 {
330         GtkWidget *menu;
331
332         menu = popup_menu_short_lived();
333         g_signal_connect(G_OBJECT(menu), "destroy",
334                          G_CALLBACK(vd_popup_destroy_cb), vd);
335
336         menu_item_add_stock_sensitive(menu, _("_Copy"), GTK_STOCK_COPY, active,
337                                       G_CALLBACK(vd_drop_menu_copy_cb), vd);
338         menu_item_add_sensitive(menu, _("_Move"), active, G_CALLBACK(vd_drop_menu_move_cb), vd);
339
340         menu_item_add_divider(menu);
341         menu_item_add_stock(menu, _("Cancel"), GTK_STOCK_CANCEL, NULL, vd);
342
343         return menu;
344 }
345
346 /*
347  *-----------------------------------------------------------------------------
348  * pop-up menu
349  *-----------------------------------------------------------------------------
350  */ 
351
352 static void vd_pop_menu_up_cb(GtkWidget *widget, gpointer data)
353 {
354         ViewDir *vd = data;
355         gchar *path;
356
357         if (!vd->path || strcmp(vd->path, "/") == 0) return;
358         path = remove_level_from_path(vd->path);
359
360         if (vd->select_func)
361                 {
362                 vd->select_func(vd, path, vd->select_data);
363                 }
364
365         g_free(path);
366 }
367
368 static void vd_pop_menu_slide_cb(GtkWidget *widget, gpointer data)
369 {
370         ViewDir *vd = data;
371         gchar *path;
372
373         if (!vd->layout) return;
374         if (!vd->click_fd) return;
375
376         path = vd->click_fd->path;
377
378         layout_set_path(vd->layout, path);
379         layout_select_none(vd->layout);
380         layout_image_slideshow_stop(vd->layout);
381         layout_image_slideshow_start(vd->layout);
382 }
383
384 static void vd_pop_menu_slide_rec_cb(GtkWidget *widget, gpointer data)
385 {
386         ViewDir *vd = data;
387         gchar *path;
388         GList *list;
389
390         if (!vd->layout) return;
391         if (!vd->click_fd) return;
392
393         path = vd->click_fd->path;
394
395         list = filelist_recursive(path);
396
397         layout_image_slideshow_stop(vd->layout);
398         layout_image_slideshow_start_from_list(vd->layout, list);
399 }
400
401 static void vd_pop_menu_dupe(ViewDir *vd, gint recursive)
402 {
403         DupeWindow *dw;
404         GList *list = NULL;
405
406         if (!vd->click_fd) return;
407
408         if (recursive)
409                 {
410                 list = g_list_append(list, file_data_ref(vd->click_fd));
411                 }
412         else
413                 {
414                 filelist_read(vd->click_fd->path, &list, NULL);
415                 list = filelist_filter(list, FALSE);
416                 }
417
418         dw = dupe_window_new(DUPE_MATCH_NAME);
419         dupe_window_add_files(dw, list, recursive);
420
421         filelist_free(list);
422 }
423
424 static void vd_pop_menu_dupe_cb(GtkWidget *widget, gpointer data)
425 {
426         ViewDir *vd = data;
427         vd_pop_menu_dupe(vd, FALSE);
428 }
429
430 static void vd_pop_menu_dupe_rec_cb(GtkWidget *widget, gpointer data)
431 {
432         ViewDir *vd = data;
433         vd_pop_menu_dupe(vd, TRUE);
434 }
435
436 static void vd_pop_menu_delete_cb(GtkWidget *widget, gpointer data)
437 {
438         ViewDir *vd = data;
439
440         if (!vd->click_fd) return;
441         file_util_delete_dir(vd->click_fd, vd->widget);
442 }
443
444 static void vd_pop_menu_dir_view_as_cb(GtkWidget *widget, gpointer data)
445 {
446         ViewDir *vd = data;
447         DirViewType new_type = DIRVIEW_LIST;
448
449         if (!vd->layout) return;
450
451         switch(vd->type)
452         {
453         case DIRVIEW_LIST: new_type = DIRVIEW_TREE; break;
454         case DIRVIEW_TREE: new_type = DIRVIEW_LIST; break;
455         }
456         
457         layout_views_set(vd->layout, new_type, vd->layout->icon_view);
458 }
459
460 static void vd_pop_menu_refresh_cb(GtkWidget *widget, gpointer data)
461 {
462         ViewDir *vd = data;
463
464         if (vd->layout) layout_refresh(vd->layout);
465 }
466
467 static void vd_toggle_show_hidden_files_cb(GtkWidget *widget, gpointer data)
468 {
469         ViewDir *vd = data;
470
471         options->file_filter.show_hidden_files = !options->file_filter.show_hidden_files;
472         if (vd->layout) layout_refresh(vd->layout);
473 }
474
475 static void vd_pop_menu_new_cb(GtkWidget *widget, gpointer data)
476 {
477         ViewDir *vd = data;
478         const gchar *path = NULL;
479         gchar *new_path;
480         gchar *buf;
481
482         switch(vd->type)
483                 {
484                 case DIRVIEW_LIST:
485                         {
486                         if (!vd->path) return;
487                         path = vd->path;
488                         };
489                         break;
490                 case DIRVIEW_TREE:
491                         {
492                         if (!vd->click_fd) return;
493                         path = vd->click_fd->path;
494                         };
495                         break;
496                 }
497
498         buf = concat_dir_and_file(path, _("new_folder"));
499         new_path = unique_filename(buf, NULL, NULL, FALSE);
500         g_free(buf);
501         if (!new_path) return;
502
503         if (!mkdir_utf8(new_path, 0755))
504                 {
505                 gchar *text;
506
507                 text = g_strdup_printf(_("Unable to create folder:\n%s"), new_path);
508                 file_util_warning_dialog(_("Error creating folder"), text, GTK_STOCK_DIALOG_ERROR, vd->view);
509                 g_free(text);
510                 }
511         else
512                 {
513                 FileData *fd = NULL;
514
515                 switch(vd->type)
516                         {
517                         case DIRVIEW_LIST:
518                                 {
519                                 vd_refresh(vd);
520                                 fd = vdlist_row_by_path(vd, new_path, NULL);
521                                 };
522                                 break;
523                         case DIRVIEW_TREE:
524                                 fd = vdtree_populate_path(vd, new_path, TRUE, TRUE);
525                                 break;
526                         }
527                 vd_rename_by_data(vd, fd);
528                 }
529
530         g_free(new_path);
531 }
532
533 static void vd_pop_menu_rename_cb(GtkWidget *widget, gpointer data)
534 {
535         ViewDir *vd = data;
536         
537         vd_rename_by_data(vd, vd->click_fd);
538 }
539
540 GtkWidget *vd_pop_menu(ViewDir *vd, FileData *fd)
541 {
542         GtkWidget *menu;
543         gint active;
544         gint rename_delete_active = FALSE;
545         gint new_folder_active = FALSE;
546
547         active = (fd != NULL);
548         switch(vd->type)
549                 {
550                 case DIRVIEW_LIST:
551                         {
552                         /* check using . (always row 0) */
553                         new_folder_active = (vd->path && access_file(vd->path , W_OK | X_OK));
554
555                         /* ignore .. and . */
556                         rename_delete_active = (new_folder_active && fd &&
557                                 strcmp(fd->name, ".") != 0 &&
558                                 strcmp(fd->name, "..") != 0 &&
559                                 access_file(fd->path, W_OK | X_OK));
560                         };
561                         break;
562                 case DIRVIEW_TREE:
563                         {
564                         if (fd)
565                                 {
566                                 gchar *parent;
567                                 new_folder_active = (fd && access_file(fd->path, W_OK | X_OK));
568                                 parent = remove_level_from_path(fd->path);
569                                 rename_delete_active = access_file(parent, W_OK | X_OK);
570                                 g_free(parent);
571                                 };
572                         }
573                         break;
574                 }
575
576         menu = popup_menu_short_lived();
577         g_signal_connect(G_OBJECT(menu), "destroy",
578                          G_CALLBACK(vd_popup_destroy_cb), vd);
579
580         menu_item_add_stock_sensitive(menu, _("_Up to parent"), GTK_STOCK_GO_UP,
581                                       (vd->path && strcmp(vd->path, "/") != 0),
582                                       G_CALLBACK(vd_pop_menu_up_cb), vd);
583
584         menu_item_add_divider(menu);
585         menu_item_add_sensitive(menu, _("_Slideshow"), active,
586                                 G_CALLBACK(vd_pop_menu_slide_cb), vd);
587         menu_item_add_sensitive(menu, _("Slideshow recursive"), active,
588                                 G_CALLBACK(vd_pop_menu_slide_rec_cb), vd);
589
590         menu_item_add_divider(menu);
591         menu_item_add_stock_sensitive(menu, _("Find _duplicates..."), GTK_STOCK_FIND, active,
592                                       G_CALLBACK(vd_pop_menu_dupe_cb), vd);
593         menu_item_add_stock_sensitive(menu, _("Find duplicates recursive..."), GTK_STOCK_FIND, active,
594                                       G_CALLBACK(vd_pop_menu_dupe_rec_cb), vd);
595
596         menu_item_add_divider(menu);
597
598         menu_item_add_sensitive(menu, _("_New folder..."), new_folder_active,
599                                 G_CALLBACK(vd_pop_menu_new_cb), vd);
600
601         menu_item_add_sensitive(menu, _("_Rename..."), rename_delete_active,
602                                 G_CALLBACK(vd_pop_menu_rename_cb), vd);
603         menu_item_add_stock_sensitive(menu, _("_Delete..."), GTK_STOCK_DELETE, rename_delete_active,
604                                       G_CALLBACK(vd_pop_menu_delete_cb), vd);
605
606         menu_item_add_divider(menu);
607         /* FIXME */
608         menu_item_add_check(menu, _("View as _tree"), vd->type,
609                             G_CALLBACK(vd_pop_menu_dir_view_as_cb), vd);
610         menu_item_add_check(menu, _("Show _hidden files"), options->file_filter.show_hidden_files,
611                             G_CALLBACK(vd_toggle_show_hidden_files_cb), vd);
612
613         menu_item_add_stock(menu, _("Re_fresh"), GTK_STOCK_REFRESH,
614                             G_CALLBACK(vd_pop_menu_refresh_cb), vd);
615
616         return menu;
617 }
618
619 /*
620  *-----------------------------------------------------------------------------
621  * dnd
622  *-----------------------------------------------------------------------------
623  */
624
625 static GtkTargetEntry vd_dnd_drop_types[] = {
626         { "text/uri-list", 0, TARGET_URI_LIST }
627 };
628 static gint vd_dnd_drop_types_count = 1;
629
630 static void vd_dest_set(ViewDir *vd, gint enable)
631 {
632         if (enable)
633                 {
634                 gtk_drag_dest_set(vd->view,
635                                   GTK_DEST_DEFAULT_MOTION | GTK_DEST_DEFAULT_DROP,
636                                   vd_dnd_drop_types, vd_dnd_drop_types_count,
637                                   GDK_ACTION_MOVE | GDK_ACTION_COPY);
638                 }
639         else
640                 {
641                 gtk_drag_dest_unset(vd->view);
642                 }
643 }
644
645 static void vd_dnd_get(GtkWidget *widget, GdkDragContext *context,
646                            GtkSelectionData *selection_data, guint info,
647                            guint time, gpointer data)
648 {
649         ViewDir *vd = data;
650         GList *list;
651         gchar *uritext = NULL;
652         gint length = 0;
653
654         if (!vd->click_fd) return;
655
656         switch (info)
657                 {
658                 case TARGET_URI_LIST:
659                 case TARGET_TEXT_PLAIN:
660                         list = g_list_prepend(NULL, vd->click_fd);
661                         uritext = uri_text_from_filelist(list, &length, (info == TARGET_TEXT_PLAIN));
662                         g_list_free(list);
663                         break;
664                 }
665         if (uritext)
666                 {
667                 gtk_selection_data_set (selection_data, selection_data->target,
668                                 8, (guchar *)uritext, length);
669                 g_free(uritext);
670                 }
671 }
672
673 static void vd_dnd_begin(GtkWidget *widget, GdkDragContext *context, gpointer data)
674 {
675         ViewDir *vd = data;
676
677         vd_color_set(vd, vd->click_fd, TRUE);
678         vd_dest_set(vd, FALSE);
679 }
680
681 static void vd_dnd_end(GtkWidget *widget, GdkDragContext *context, gpointer data)
682 {
683         ViewDir *vd = data;
684
685         vd_color_set(vd, vd->click_fd, FALSE);
686
687         if (vd->type == DIRVIEW_LIST && context->action == GDK_ACTION_MOVE)
688                 {
689                 vd_refresh(vd);
690                 }
691         vd_dest_set(vd, TRUE);
692 }
693
694 static void vd_dnd_drop_receive(GtkWidget *widget,
695                                     GdkDragContext *context, gint x, gint y,
696                                     GtkSelectionData *selection_data, guint info,
697                                     guint time, gpointer data)
698 {
699         ViewDir *vd = data;
700         GtkTreePath *tpath;
701         FileData *fd = NULL;
702
703         vd->click_fd = NULL;
704
705         if (gtk_tree_view_get_path_at_pos(GTK_TREE_VIEW(widget), x, y,
706                                           &tpath, NULL, NULL, NULL))
707                 {
708                 fd = vd_get_fd_from_tree_path(vd, GTK_TREE_VIEW(widget), tpath);
709                 gtk_tree_path_free(tpath);
710                 }
711
712         if (!fd) return;
713
714         if (info == TARGET_URI_LIST)
715                 {
716                 GList *list;
717                 gint active;
718
719                 list = uri_filelist_from_text((gchar *)selection_data->data, TRUE);
720                 if (!list) return;
721
722                 active = access_file(fd->path, W_OK | X_OK);
723
724                 vd_color_set(vd, fd, TRUE);
725                 vd->popup = vd_drop_menu(vd, active);
726                 gtk_menu_popup(GTK_MENU(vd->popup), NULL, NULL, NULL, NULL, 0, time);
727
728                 vd->drop_fd = fd;
729                 vd->drop_list = list;
730                 }
731 }
732
733 static void vd_dnd_drop_update(ViewDir *vd, gint x, gint y)
734 {
735         GtkTreePath *tpath;
736         FileData *fd = NULL;
737
738         if (gtk_tree_view_get_path_at_pos(GTK_TREE_VIEW(vd->view), x, y,
739                                           &tpath, NULL, NULL, NULL))
740                 {
741                 fd = vd_get_fd_from_tree_path(vd, GTK_TREE_VIEW(vd->view), tpath);
742                 gtk_tree_path_free(tpath);
743                 }
744
745         if (fd != vd->drop_fd)
746                 {
747                 vd_color_set(vd, vd->drop_fd, FALSE);
748                 vd_color_set(vd, fd, TRUE);
749                 if (fd && vd->dnd_drop_update_func) vd->dnd_drop_update_func(vd);
750                 }
751
752         vd->drop_fd = fd;
753 }
754
755 void vd_dnd_drop_scroll_cancel(ViewDir *vd)
756 {
757         if (vd->drop_scroll_id != -1) g_source_remove(vd->drop_scroll_id);
758         vd->drop_scroll_id = -1;
759 }
760
761 static gint vd_auto_scroll_idle_cb(gpointer data)
762 {
763         ViewDir *vd = data;
764
765         if (vd->drop_fd)
766                 {
767                 GdkWindow *window;
768                 gint x, y;
769                 gint w, h;
770
771                 window = vd->view->window;
772                 gdk_window_get_pointer(window, &x, &y, NULL);
773                 gdk_drawable_get_size(window, &w, &h);
774                 if (x >= 0 && x < w && y >= 0 && y < h)
775                         {
776                         vd_dnd_drop_update(vd, x, y);
777                         }
778                 }
779
780         vd->drop_scroll_id = -1;
781         return FALSE;
782 }
783
784 static gint vd_auto_scroll_notify_cb(GtkWidget *widget, gint x, gint y, gpointer data)
785 {
786         ViewDir *vd = data;
787
788         if (!vd->drop_fd || vd->drop_list) return FALSE;
789
790         if (vd->drop_scroll_id == -1) vd->drop_scroll_id = g_idle_add(vd_auto_scroll_idle_cb, vd);
791
792         return TRUE;
793 }
794
795 static gint vd_dnd_drop_motion(GtkWidget *widget, GdkDragContext *context,
796                                    gint x, gint y, guint time, gpointer data)
797 {
798         ViewDir *vd = data;
799
800         vd->click_fd = NULL;
801
802         if (gtk_drag_get_source_widget(context) == vd->view)
803                 {
804                 /* from same window */
805                 gdk_drag_status(context, 0, time);
806                 return TRUE;
807                 }
808         else
809                 {
810                 gdk_drag_status(context, context->suggested_action, time);
811                 }
812
813         vd_dnd_drop_update(vd, x, y);
814
815         if (vd->drop_fd)
816                 {
817                 GtkAdjustment *adj = gtk_tree_view_get_vadjustment(GTK_TREE_VIEW(vd->view));
818                 widget_auto_scroll_start(vd->view, adj, -1, -1, vd_auto_scroll_notify_cb, vd);
819                 }
820
821         return FALSE;
822 }
823
824 static void vd_dnd_drop_leave(GtkWidget *widget, GdkDragContext *context, guint time, gpointer data)
825 {
826         ViewDir *vd = data;
827
828         if (vd->drop_fd != vd->click_fd) vd_color_set(vd, vd->drop_fd, FALSE);
829
830         vd->drop_fd = NULL;
831
832         if (vd->dnd_drop_leave_func) vd->dnd_drop_leave_func(vd);
833 }
834
835 void vd_dnd_init(ViewDir *vd)
836 {
837         gtk_drag_source_set(vd->view, GDK_BUTTON1_MASK | GDK_BUTTON2_MASK,
838                             dnd_file_drag_types, dnd_file_drag_types_count,
839                             GDK_ACTION_COPY | GDK_ACTION_MOVE | GDK_ACTION_ASK);
840         g_signal_connect(G_OBJECT(vd->view), "drag_data_get",
841                          G_CALLBACK(vd_dnd_get), vd);
842         g_signal_connect(G_OBJECT(vd->view), "drag_begin",
843                          G_CALLBACK(vd_dnd_begin), vd);
844         g_signal_connect(G_OBJECT(vd->view), "drag_end",
845                          G_CALLBACK(vd_dnd_end), vd);
846
847         vd_dest_set(vd, TRUE);
848         g_signal_connect(G_OBJECT(vd->view), "drag_data_received",
849                          G_CALLBACK(vd_dnd_drop_receive), vd);
850         g_signal_connect(G_OBJECT(vd->view), "drag_motion",
851                          G_CALLBACK(vd_dnd_drop_motion), vd);
852         g_signal_connect(G_OBJECT(vd->view), "drag_leave",
853                          G_CALLBACK(vd_dnd_drop_leave), vd);
854 }
855
856 /*
857  *----------------------------------------------------------------------------
858  * callbacks
859  *----------------------------------------------------------------------------
860  */
861
862 void vd_menu_position_cb(GtkMenu *menu, gint *x, gint *y, gboolean *push_in, gpointer data)
863 {
864         ViewDir *vd = data;
865         GtkTreeModel *store;
866         GtkTreeIter iter;
867         GtkTreePath *tpath;
868         gint cw, ch;
869
870         if (vd_find_row(vd, vd->click_fd, &iter) < 0) return;
871         store = gtk_tree_view_get_model(GTK_TREE_VIEW(vd->view));
872         tpath = gtk_tree_model_get_path(store, &iter);
873         tree_view_get_cell_clamped(GTK_TREE_VIEW(vd->view), tpath, 0, TRUE, x, y, &cw, &ch);
874         gtk_tree_path_free(tpath);
875         *y += ch;
876         popup_menu_position_clamp(menu, x, y, 0);
877 }
878
879 void vd_activate_cb(GtkTreeView *tview, GtkTreePath *tpath, GtkTreeViewColumn *column, gpointer data)
880 {
881         ViewDir *vd = data;
882         FileData *fd = vd_get_fd_from_tree_path(vd, tview, tpath);
883
884         vd_select_row(vd, fd);
885 }
886
887 static GdkColor *vd_color_shifted(GtkWidget *widget)
888 {
889         static GdkColor color;
890         static GtkWidget *done = NULL;
891
892         if (done != widget)
893                 {
894                 GtkStyle *style;
895
896                 style = gtk_widget_get_style(widget);
897                 memcpy(&color, &style->base[GTK_STATE_NORMAL], sizeof(color));
898                 shift_color(&color, -1, 0);
899                 done = widget;
900                 }
901
902         return &color;
903 }
904
905 void vd_color_cb(GtkTreeViewColumn *tree_column, GtkCellRenderer *cell,
906                  GtkTreeModel *tree_model, GtkTreeIter *iter, gpointer data)
907 {
908         ViewDir *vd = data;
909         gboolean set;
910
911         gtk_tree_model_get(tree_model, iter, DIR_COLUMN_COLOR, &set, -1);
912         g_object_set(G_OBJECT(cell),
913                      "cell-background-gdk", vd_color_shifted(vd->view),
914                      "cell-background-set", set, NULL);
915 }
916
917 gint vd_release_cb(GtkWidget *widget, GdkEventButton *bevent, gpointer data)
918 {
919         ViewDir *vd = data;
920         GtkTreePath *tpath;
921         FileData *fd = NULL;
922
923         if (!vd->click_fd) return FALSE;
924         vd_color_set(vd, vd->click_fd, FALSE);
925
926         if (bevent->button != 1) return TRUE;
927
928         if ((bevent->x != 0 || bevent->y != 0) &&
929             gtk_tree_view_get_path_at_pos(GTK_TREE_VIEW(widget), bevent->x, bevent->y,
930                                           &tpath, NULL, NULL, NULL))
931                 {
932                 fd = vd_get_fd_from_tree_path(vd, GTK_TREE_VIEW(widget), tpath);
933                 gtk_tree_path_free(tpath);
934                 }
935
936         if (fd && vd->click_fd == fd)
937                 {
938                 vdlist_select_row(vd, vd->click_fd);
939                 }
940
941         return FALSE;
942 }
943
944 gint vd_press_key_cb(GtkWidget *widget, GdkEventKey *event, gpointer data)
945 {
946         ViewDir *vd = data;
947         gint ret = FALSE;
948
949         switch(vd->type)
950         {
951         case DIRVIEW_LIST: ret = vdlist_press_key_cb(widget, event, data); break;
952         case DIRVIEW_TREE: ret = vdtree_press_key_cb(widget, event, data); break;
953         }
954
955         return ret;
956 }
957
958 gint vd_press_cb(GtkWidget *widget, GdkEventButton *bevent, gpointer data)
959 {
960         ViewDir *vd = data;
961         gint ret = FALSE;
962
963         switch(vd->type)
964         {
965         case DIRVIEW_LIST: ret = vdlist_press_cb(widget, bevent, data); break;
966         case DIRVIEW_TREE: ret = vdtree_press_cb(widget, bevent, data); break;
967         }
968
969         return ret;
970 }