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