Fix #469: Exif rotation problems
[geeqie.git] / src / image.c
1 /*
2  * Copyright (C) 2006 John Ellis
3  * Copyright (C) 2008 - 2016 The Geeqie Team
4  *
5  * Author: John Ellis
6  *
7  * This program is free software; you can redistribute it and/or modify
8  * it under the terms of the GNU General Public License as published by
9  * the Free Software Foundation; either version 2 of the License, or
10  * (at your option) any later version.
11  *
12  * This program is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15  * GNU General Public License for more details.
16  *
17  * You should have received a copy of the GNU General Public License along
18  * with this program; if not, write to the Free Software Foundation, Inc.,
19  * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
20  */
21
22 #include "main.h"
23 #include "image.h"
24
25
26 #include "collect.h"
27 #include "color-man.h"
28 #include "exif.h"
29 #include "metadata.h"
30 #include "histogram.h"
31 #include "image-load.h"
32 #include "image-overlay.h"
33 #include "layout.h"
34 #include "layout_image.h"
35 #include "pixbuf-renderer.h"
36 #include "pixbuf_util.h"
37 #include "ui_fileops.h"
38
39 #include "filedata.h"
40 #include "filecache.h"
41
42 #include <math.h>
43
44 static GList *image_list = NULL;
45
46 static void image_update_title(ImageWindow *imd);
47 static void image_read_ahead_start(ImageWindow *imd);
48 static void image_cache_set(ImageWindow *imd, FileData *fd);
49
50 /*
51  *-------------------------------------------------------------------
52  * 'signals'
53  *-------------------------------------------------------------------
54  */
55
56 static void image_click_cb(PixbufRenderer *pr, GdkEventButton *event, gpointer data)
57 {
58         ImageWindow *imd = data;
59
60         if (imd->func_button)
61                 {
62                 imd->func_button(imd, event, imd->data_button);
63                 }
64 }
65
66 static void image_drag_cb(PixbufRenderer *pr, GdkEventButton *event, gpointer data)
67 {
68         ImageWindow *imd = data;
69         gint width, height;
70
71         pixbuf_renderer_get_scaled_size(pr, &width, &height);
72
73         if (imd->func_drag)
74                 {
75                 imd->func_drag(imd, event,
76                                (gfloat)(pr->drag_last_x - event->x) / width,
77                                (gfloat)(pr->drag_last_y - event->y) / height,
78                                imd->data_button);
79                 }
80 }
81
82 static void image_scroll_notify_cb(PixbufRenderer *pr, gpointer data)
83 {
84         ImageWindow *imd = data;
85
86         if (imd->func_scroll_notify && pr->scale)
87                 {
88                 imd->func_scroll_notify(imd,
89                                         (gint)((gdouble)pr->x_scroll / pr->scale),
90                                         (gint)((gdouble)pr->y_scroll / pr->scale),
91                                         (gint)((gdouble)pr->image_width - pr->vis_width / pr->scale),
92                                         (gint)((gdouble)pr->image_height - pr->vis_height / pr->scale),
93                                         imd->data_scroll_notify);
94                 }
95 }
96
97 static void image_update_util(ImageWindow *imd)
98 {
99         if (imd->func_update) imd->func_update(imd, imd->data_update);
100 }
101
102
103 static void image_complete_util(ImageWindow *imd, gboolean preload)
104 {
105         if (imd->il && image_get_pixbuf(imd) != image_loader_get_pixbuf(imd->il)) return;
106
107         DEBUG_1("%s image load completed \"%s\" (%s)", get_exec_time(),
108                           (preload) ? (imd->read_ahead_fd ? imd->read_ahead_fd->path : "null") :
109                                       (imd->image_fd ? imd->image_fd->path : "null"),
110                           (preload) ? "preload" : "current");
111
112         if (!preload) imd->completed = TRUE;
113         if (imd->func_complete) imd->func_complete(imd, preload, imd->data_complete);
114 }
115
116 static void image_render_complete_cb(PixbufRenderer *pr, gpointer data)
117 {
118         ImageWindow *imd = data;
119
120         image_complete_util(imd, FALSE);
121 }
122
123 static void image_state_set(ImageWindow *imd, ImageState state)
124 {
125         if (state == IMAGE_STATE_NONE)
126                 {
127                 imd->state = state;
128                 }
129         else
130                 {
131                 imd->state |= state;
132                 }
133         if (imd->func_state) imd->func_state(imd, state, imd->data_state);
134 }
135
136 static void image_state_unset(ImageWindow *imd, ImageState state)
137 {
138         imd->state &= ~state;
139         if (imd->func_state) imd->func_state(imd, state, imd->data_state);
140 }
141
142 static void image_zoom_cb(PixbufRenderer *pr, gdouble zoom, gpointer data)
143 {
144         ImageWindow *imd = data;
145
146         if (imd->title_show_zoom) image_update_title(imd);
147         image_state_set(imd, IMAGE_STATE_IMAGE);
148         image_update_util(imd);
149 }
150
151 /*
152  *-------------------------------------------------------------------
153  * misc
154  *-------------------------------------------------------------------
155  */
156
157 static void image_update_title(ImageWindow *imd)
158 {
159         gchar *title = NULL;
160         gchar *zoom = NULL;
161         gchar *collection = NULL;
162
163         if (!imd->top_window) return;
164
165         if (imd->collection && collection_to_number(imd->collection) >= 0)
166                 {
167                 const gchar *name = imd->collection->name;
168                 if (!name) name = _("Untitled");
169                 collection = g_strdup_printf(_(" (Collection %s)"), name);
170                 }
171
172         if (imd->title_show_zoom)
173                 {
174                 gchar *buf = image_zoom_get_as_text(imd);
175                 zoom = g_strconcat(" [", buf, "]", NULL);
176                 g_free(buf);
177                 }
178
179         title = g_strdup_printf("%s%s%s%s%s%s",
180                 imd->title ? imd->title : "",
181                 imd->image_fd ? imd->image_fd->name : "",
182                 zoom ? zoom : "",
183                 collection ? collection : "",
184                 imd->image_fd ? " - " : "",
185                 imd->title_right ? imd->title_right : "");
186
187         gtk_window_set_title(GTK_WINDOW(imd->top_window), title);
188
189         g_free(title);
190         g_free(zoom);
191         g_free(collection);
192 }
193
194 /*
195  *-------------------------------------------------------------------
196  * rotation, flip, etc.
197  *-------------------------------------------------------------------
198  */
199 static gboolean image_get_x11_screen_profile(ImageWindow *imd, guchar **screen_profile, gint *screen_profile_len)
200 {
201         GdkScreen *screen = gtk_widget_get_screen(imd->widget);;
202         GdkAtom    type   = GDK_NONE;
203         gint       format = 0;
204
205         return (gdk_property_get(gdk_screen_get_root_window(screen),
206                                  gdk_atom_intern ("_ICC_PROFILE", FALSE),
207                                  GDK_NONE,
208                                  0, 64 * 1024 * 1024, FALSE,
209                                  &type, &format, screen_profile_len, screen_profile) && *screen_profile_len > 0);
210 }
211
212 static gboolean image_post_process_color(ImageWindow *imd, gint start_row, gboolean run_in_bg)
213 {
214         ColorMan *cm;
215         ColorManProfileType input_type;
216         ColorManProfileType screen_type;
217         const gchar *input_file = NULL;
218         const gchar *screen_file = NULL;
219         guchar *profile = NULL;
220         guint profile_len;
221         guchar *screen_profile = NULL;
222         gint screen_profile_len;
223         ExifData *exif;
224
225         if (imd->cm) return FALSE;
226
227         if (imd->color_profile_input >= COLOR_PROFILE_FILE &&
228             imd->color_profile_input <  COLOR_PROFILE_FILE + COLOR_PROFILE_INPUTS)
229                 {
230                 const gchar *file = options->color_profile.input_file[imd->color_profile_input - COLOR_PROFILE_FILE];
231
232                 if (!is_readable_file(file)) return FALSE;
233
234                 input_type = COLOR_PROFILE_FILE;
235                 input_file = file;
236                 }
237         else if (imd->color_profile_input >= COLOR_PROFILE_SRGB &&
238                  imd->color_profile_input <  COLOR_PROFILE_FILE)
239                 {
240                 input_type = imd->color_profile_input;
241                 input_file = NULL;
242                 }
243         else
244                 {
245                 return FALSE;
246                 }
247
248         if (options->color_profile.use_x11_screen_profile &&
249             image_get_x11_screen_profile(imd, &screen_profile, &screen_profile_len))
250                 {
251                 screen_type = COLOR_PROFILE_MEM;
252                 DEBUG_1("Using X11 screen profile, length: %d", screen_profile_len);
253                 }
254         else if (options->color_profile.screen_file &&
255             is_readable_file(options->color_profile.screen_file))
256                 {
257                 screen_type = COLOR_PROFILE_FILE;
258                 screen_file = options->color_profile.screen_file;
259                 }
260         else
261                 {
262                 screen_type = COLOR_PROFILE_SRGB;
263                 screen_file = NULL;
264                 }
265
266
267         imd->color_profile_from_image = COLOR_PROFILE_NONE;
268
269         exif = exif_read_fd(imd->image_fd);
270
271         if (exif)
272                 {
273                 profile = exif_get_color_profile(exif, &profile_len);
274                 if (profile)
275                         {
276                         if (!imd->color_profile_use_image)
277                                 {
278                                 g_free(profile);
279                                 profile = NULL;
280                                 }
281                         DEBUG_1("Found embedded color profile");
282                         imd->color_profile_from_image = COLOR_PROFILE_MEM;
283                         }
284                 else
285                         {
286                         gchar *interop_index = exif_get_data_as_text(exif, "Exif.Iop.InteroperabilityIndex");
287
288                         if (interop_index)
289                                 {
290                                 /* Exif 2.21 specification */
291                                 if (!strcmp(interop_index, "R98"))
292                                         {
293                                         imd->color_profile_from_image = COLOR_PROFILE_SRGB;
294                                         DEBUG_1("Found EXIF 2.21 ColorSpace of sRGB");
295                                         }
296                                 else if (!strcmp(interop_index, "R03"))
297                                         {
298                                         imd->color_profile_from_image = COLOR_PROFILE_ADOBERGB;
299                                         DEBUG_1("Found EXIF 2.21 ColorSpace of AdobeRGB");
300                                         }
301                                 g_free(interop_index);
302                                 }
303                         else
304                                 {
305                                 gint cs;
306
307                                 /* ColorSpace == 1 specifies sRGB per EXIF 2.2 */
308                                 if (!exif_get_integer(exif, "Exif.Photo.ColorSpace", &cs)) cs = 0;
309                                 if (cs == 1)
310                                         {
311                                         imd->color_profile_from_image = COLOR_PROFILE_SRGB;
312                                         DEBUG_1("Found EXIF 2.2 ColorSpace of sRGB");
313                                         }
314                                 else if (cs == 2)
315                                         {
316                                         /* non-standard way of specifying AdobeRGB (used by some software) */
317                                         imd->color_profile_from_image = COLOR_PROFILE_ADOBERGB;
318                                         DEBUG_1("Found EXIF 2.2 ColorSpace of AdobeRGB");
319                                         }
320                                 }
321
322                         if (imd->color_profile_use_image && imd->color_profile_from_image != COLOR_PROFILE_NONE)
323                                {
324                                input_type = imd->color_profile_from_image;
325                                input_file = NULL;
326                                }
327                         }
328
329                 exif_free_fd(imd->image_fd, exif);
330                 }
331
332
333         if (profile)
334                 {
335                 cm = color_man_new_embedded(run_in_bg ? imd : NULL, NULL,
336                                             profile, profile_len,
337                                             screen_type, screen_file, screen_profile, screen_profile_len);
338                 g_free(profile);
339                 }
340         else
341                 {
342                 cm = color_man_new(run_in_bg ? imd : NULL, NULL,
343                                    input_type, input_file,
344                                    screen_type, screen_file, screen_profile, screen_profile_len);
345                 }
346
347         if (cm)
348                 {
349                 if (start_row > 0)
350                         {
351                         cm->row = start_row;
352                         cm->incremental_sync = TRUE;
353                         }
354
355                 imd->cm = (gpointer)cm;
356                 }
357
358         image_update_util(imd);
359
360         if (screen_profile)
361                 {
362                 g_free(screen_profile);
363                 screen_profile = NULL;
364                 }
365
366         return !!cm;
367 }
368
369
370 static void image_post_process_tile_color_cb(PixbufRenderer *pr, GdkPixbuf **pixbuf, gint x, gint y, gint w, gint h, gpointer data)
371 {
372         ImageWindow *imd = (ImageWindow *)data;
373         if (imd->cm) color_man_correct_region(imd->cm, *pixbuf, x, y, w, h);
374         if (imd->desaturate) pixbuf_desaturate_rect(*pixbuf, x, y, w, h);
375
376 }
377
378 void image_alter_orientation(ImageWindow *imd, AlterType type)
379 {
380         static const gint rotate_90[]    = {1,   6, 7, 8, 5, 2, 3, 4, 1};
381         static const gint rotate_90_cc[] = {1,   8, 5, 6, 7, 4, 1, 2, 3};
382         static const gint rotate_180[]   = {1,   3, 4, 1, 2, 7, 8, 5, 6};
383         static const gint mirror[]       = {1,   2, 1, 4, 3, 6, 5, 8, 7};
384         static const gint flip[]         = {1,   4, 3, 2, 1, 8, 7, 6, 5};
385
386
387         if (!imd || !imd->pr || !imd->image_fd) return;
388
389         if (imd->orientation < 1 || imd->orientation > 8) imd->orientation = 1;
390
391         switch (type)
392                 {
393                 case ALTER_ROTATE_90:
394                         imd->orientation = rotate_90[imd->orientation];
395                         break;
396                 case ALTER_ROTATE_90_CC:
397                         imd->orientation = rotate_90_cc[imd->orientation];
398                         break;
399                 case ALTER_ROTATE_180:
400                         imd->orientation = rotate_180[imd->orientation];
401                         break;
402                 case ALTER_MIRROR:
403                         imd->orientation = mirror[imd->orientation];
404                         break;
405                 case ALTER_FLIP:
406                         imd->orientation = flip[imd->orientation];
407                         break;
408                 case ALTER_NONE:
409                         imd->orientation = imd->image_fd->exif_orientation ? imd->image_fd->exif_orientation : 1;
410                         break;
411                 default:
412                         return;
413                         break;
414                 }
415
416         if (imd->orientation != (imd->image_fd->exif_orientation ? imd->image_fd->exif_orientation : 1))
417                 {
418                 if (!options->metadata.write_orientation)
419                         {
420                         /* user_orientation does not work together with options->metadata.write_orientation,
421                            use either one or the other.
422                            we must however handle switching metadata.write_orientation on and off, therefore
423                            we just disable referencing new fd's, not unreferencing the old ones
424                         */
425                         if (imd->image_fd->user_orientation == 0) file_data_ref(imd->image_fd);
426                         imd->image_fd->user_orientation = imd->orientation;
427                         }
428                 }
429         else
430                 {
431                 if (imd->image_fd->user_orientation != 0) file_data_unref(imd->image_fd);
432                 imd->image_fd->user_orientation = 0;
433                 }
434
435         if (options->metadata.write_orientation)
436                 {
437                 if (type == ALTER_NONE)
438                         {
439                         metadata_write_revert(imd->image_fd, ORIENTATION_KEY);
440                         }
441                 else
442                         {
443                         metadata_write_int(imd->image_fd, ORIENTATION_KEY, imd->orientation);
444                         }
445                 }
446
447         pixbuf_renderer_set_orientation((PixbufRenderer *)imd->pr, imd->orientation);
448 }
449
450 void image_set_desaturate(ImageWindow *imd, gboolean desaturate)
451 {
452         imd->desaturate = desaturate;
453         if (imd->cm || imd->desaturate)
454                 pixbuf_renderer_set_post_process_func((PixbufRenderer *)imd->pr, image_post_process_tile_color_cb, (gpointer) imd, (imd->cm != NULL) );
455         else
456                 pixbuf_renderer_set_post_process_func((PixbufRenderer *)imd->pr, NULL, NULL, TRUE);
457         pixbuf_renderer_set_orientation((PixbufRenderer *)imd->pr, imd->orientation);
458 }
459
460 gboolean image_get_desaturate(ImageWindow *imd)
461 {
462         return imd->desaturate;
463 }
464
465 /*
466  *-------------------------------------------------------------------
467  * read ahead (prebuffer)
468  *-------------------------------------------------------------------
469  */
470
471 static void image_read_ahead_cancel(ImageWindow *imd)
472 {
473         DEBUG_1("%s read ahead cancelled for :%s", get_exec_time(), imd->read_ahead_fd ? imd->read_ahead_fd->path : "null");
474
475         image_loader_free(imd->read_ahead_il);
476         imd->read_ahead_il = NULL;
477
478         file_data_unref(imd->read_ahead_fd);
479         imd->read_ahead_fd = NULL;
480 }
481
482 static void image_read_ahead_done_cb(ImageLoader *il, gpointer data)
483 {
484         ImageWindow *imd = data;
485
486         if (!imd->read_ahead_fd || !imd->read_ahead_il) return;
487
488         DEBUG_1("%s read ahead done for :%s", get_exec_time(), imd->read_ahead_fd->path);
489
490         if (!imd->read_ahead_fd->pixbuf)
491                 {
492                 imd->read_ahead_fd->pixbuf = image_loader_get_pixbuf(imd->read_ahead_il);
493                 if (imd->read_ahead_fd->pixbuf)
494                         {
495                         g_object_ref(imd->read_ahead_fd->pixbuf);
496                         image_cache_set(imd, imd->read_ahead_fd);
497                         }
498                 }
499         image_loader_free(imd->read_ahead_il);
500         imd->read_ahead_il = NULL;
501
502         image_complete_util(imd, TRUE);
503 }
504
505 static void image_read_ahead_error_cb(ImageLoader *il, gpointer data)
506 {
507         /* we even treat errors as success, maybe at least some of the file was ok */
508         image_read_ahead_done_cb(il, data);
509 }
510
511 static void image_read_ahead_start(ImageWindow *imd)
512 {
513         /* already started ? */
514         if (!imd->read_ahead_fd || imd->read_ahead_il || imd->read_ahead_fd->pixbuf) return;
515
516         /* still loading ?, do later */
517         if (imd->il /*|| imd->cm*/) return;
518
519         DEBUG_1("%s read ahead started for :%s", get_exec_time(), imd->read_ahead_fd->path);
520
521         imd->read_ahead_il = image_loader_new(imd->read_ahead_fd);
522
523         image_loader_delay_area_ready(imd->read_ahead_il, TRUE); /* we will need the area_ready signals later */
524
525         g_signal_connect(G_OBJECT(imd->read_ahead_il), "error", (GCallback)image_read_ahead_error_cb, imd);
526         g_signal_connect(G_OBJECT(imd->read_ahead_il), "done", (GCallback)image_read_ahead_done_cb, imd);
527
528         if (!image_loader_start(imd->read_ahead_il))
529                 {
530                 image_read_ahead_cancel(imd);
531                 image_complete_util(imd, TRUE);
532                 }
533 }
534
535 static void image_read_ahead_set(ImageWindow *imd, FileData *fd)
536 {
537         if (imd->read_ahead_fd && fd && imd->read_ahead_fd == fd) return;
538
539         image_read_ahead_cancel(imd);
540
541         imd->read_ahead_fd = file_data_ref(fd);
542
543         DEBUG_1("read ahead set to :%s", imd->read_ahead_fd->path);
544
545         image_read_ahead_start(imd);
546 }
547
548 /*
549  *-------------------------------------------------------------------
550  * post buffering
551  *-------------------------------------------------------------------
552  */
553
554 static void image_cache_release_cb(FileData *fd)
555 {
556         g_object_unref(fd->pixbuf);
557         fd->pixbuf = NULL;
558 }
559
560 static FileCacheData *image_get_cache(void)
561 {
562         static FileCacheData *cache = NULL;
563         if (!cache) cache = file_cache_new(image_cache_release_cb, 1);
564         file_cache_set_max_size(cache, (gulong)options->image.image_cache_max * 1048576); /* update from options */
565         return cache;
566 }
567
568 static void image_cache_set(ImageWindow *imd, FileData *fd)
569 {
570         g_assert(fd->pixbuf);
571
572         file_cache_put(image_get_cache(), fd, (gulong)gdk_pixbuf_get_rowstride(fd->pixbuf) * (gulong)gdk_pixbuf_get_height(fd->pixbuf));
573         file_data_send_notification(fd, NOTIFY_PIXBUF); /* to update histogram */
574 }
575
576 static gint image_cache_get(ImageWindow *imd)
577 {
578         gint success;
579
580         success = file_cache_get(image_get_cache(), imd->image_fd);
581         if (success)
582                 {
583                 g_assert(imd->image_fd->pixbuf);
584                 image_change_pixbuf(imd, imd->image_fd->pixbuf, image_zoom_get(imd), FALSE);
585                 }
586
587 //      file_cache_dump(image_get_cache());
588         return success;
589 }
590
591 /*
592  *-------------------------------------------------------------------
593  * loading
594  *-------------------------------------------------------------------
595  */
596
597 static void image_load_pixbuf_ready(ImageWindow *imd)
598 {
599         if (image_get_pixbuf(imd) || !imd->il) return;
600
601         image_change_pixbuf(imd, image_loader_get_pixbuf(imd->il), image_zoom_get(imd), FALSE);
602 }
603
604 static void image_load_area_cb(ImageLoader *il, guint x, guint y, guint w, guint h, gpointer data)
605 {
606         ImageWindow *imd = data;
607         PixbufRenderer *pr;
608
609         pr = (PixbufRenderer *)imd->pr;
610
611         if (imd->delay_flip &&
612             pr->pixbuf != image_loader_get_pixbuf(il))
613                 {
614                 return;
615                 }
616
617         if (!pr->pixbuf) image_change_pixbuf(imd, image_loader_get_pixbuf(imd->il), image_zoom_get(imd), TRUE);
618
619         pixbuf_renderer_area_changed(pr, x, y, w, h);
620 }
621
622 static void image_load_done_cb(ImageLoader *il, gpointer data)
623 {
624         ImageWindow *imd = data;
625
626         DEBUG_1("%s image done", get_exec_time());
627
628         if (options->image.enable_read_ahead && imd->image_fd && !imd->image_fd->pixbuf && image_loader_get_pixbuf(imd->il))
629                 {
630                 imd->image_fd->pixbuf = g_object_ref(image_loader_get_pixbuf(imd->il));
631                 image_cache_set(imd, imd->image_fd);
632                 }
633         /* call the callback triggered by image_state after fd->pixbuf is set */
634         g_object_set(G_OBJECT(imd->pr), "loading", FALSE, NULL);
635         image_state_unset(imd, IMAGE_STATE_LOADING);
636
637         if (!image_loader_get_pixbuf(imd->il))
638                 {
639                 GdkPixbuf *pixbuf;
640
641                 pixbuf = pixbuf_inline(PIXBUF_INLINE_BROKEN);
642                 image_change_pixbuf(imd, pixbuf, image_zoom_get(imd), FALSE);
643                 g_object_unref(pixbuf);
644
645                 imd->unknown = TRUE;
646                 }
647         else if (imd->delay_flip &&
648             image_get_pixbuf(imd) != image_loader_get_pixbuf(imd->il))
649                 {
650                 g_object_set(G_OBJECT(imd->pr), "complete", FALSE, NULL);
651                 image_change_pixbuf(imd, image_loader_get_pixbuf(imd->il), image_zoom_get(imd), FALSE);
652                 }
653
654         image_loader_free(imd->il);
655         imd->il = NULL;
656
657 //      image_post_process(imd, TRUE);
658
659         image_read_ahead_start(imd);
660 }
661
662 static void image_load_size_cb(ImageLoader *il, guint width, guint height, gpointer data)
663 {
664         ImageWindow *imd = data;
665
666         DEBUG_1("image_load_size_cb: %dx%d", width, height);
667         pixbuf_renderer_set_size_early((PixbufRenderer *)imd->pr, width, height);
668 }
669
670 static void image_load_error_cb(ImageLoader *il, gpointer data)
671 {
672         DEBUG_1("%s image error", get_exec_time());
673
674         /* even on error handle it like it was done,
675          * since we have a pixbuf with _something_ */
676
677         image_load_done_cb(il, data);
678 }
679
680 static void image_load_set_signals(ImageWindow *imd, gboolean override_old_signals)
681 {
682         g_assert(imd->il);
683         if (override_old_signals)
684                 {
685                 /* override the old signals */
686                 g_signal_handlers_disconnect_matched(G_OBJECT(imd->il), G_SIGNAL_MATCH_DATA, 0, 0, NULL, NULL, imd);
687                 }
688
689         g_signal_connect(G_OBJECT(imd->il), "area_ready", (GCallback)image_load_area_cb, imd);
690         g_signal_connect(G_OBJECT(imd->il), "error", (GCallback)image_load_error_cb, imd);
691         g_signal_connect(G_OBJECT(imd->il), "done", (GCallback)image_load_done_cb, imd);
692         g_signal_connect(G_OBJECT(imd->il), "size_prepared", (GCallback)image_load_size_cb, imd);
693 }
694
695 /* this read ahead is located here merely for the callbacks, above */
696
697 static gboolean image_read_ahead_check(ImageWindow *imd)
698 {
699         if (!imd->read_ahead_fd) return FALSE;
700         if (imd->il) return FALSE;
701
702         if (!imd->image_fd || imd->read_ahead_fd != imd->image_fd)
703                 {
704                 image_read_ahead_cancel(imd);
705                 return FALSE;
706                 }
707
708         if (imd->read_ahead_il)
709                 {
710                 imd->il = imd->read_ahead_il;
711                 imd->read_ahead_il = NULL;
712
713                 image_load_set_signals(imd, TRUE);
714
715                 g_object_set(G_OBJECT(imd->pr), "loading", TRUE, NULL);
716                 image_state_set(imd, IMAGE_STATE_LOADING);
717
718                 if (!imd->delay_flip)
719                         {
720                         image_change_pixbuf(imd, image_loader_get_pixbuf(imd->il), image_zoom_get(imd), TRUE);
721                         }
722
723                 image_loader_delay_area_ready(imd->il, FALSE); /* send the delayed area_ready signals */
724
725                 file_data_unref(imd->read_ahead_fd);
726                 imd->read_ahead_fd = NULL;
727                 return TRUE;
728                 }
729         else if (imd->read_ahead_fd->pixbuf)
730                 {
731                 image_change_pixbuf(imd, imd->read_ahead_fd->pixbuf, image_zoom_get(imd), FALSE);
732
733                 file_data_unref(imd->read_ahead_fd);
734                 imd->read_ahead_fd = NULL;
735
736 //              image_post_process(imd, FALSE);
737                 return TRUE;
738                 }
739
740         image_read_ahead_cancel(imd);
741         return FALSE;
742 }
743
744 static gboolean image_load_begin(ImageWindow *imd, FileData *fd)
745 {
746         DEBUG_1("%s image begin", get_exec_time());
747
748         if (imd->il) return FALSE;
749
750         imd->completed = FALSE;
751         g_object_set(G_OBJECT(imd->pr), "complete", FALSE, NULL);
752
753         if (image_cache_get(imd))
754                 {
755                 DEBUG_1("from cache: %s", imd->image_fd->path);
756                 return TRUE;
757                 }
758
759         if (image_read_ahead_check(imd))
760                 {
761                 DEBUG_1("from read ahead buffer: %s", imd->image_fd->path);
762                 return TRUE;
763                 }
764
765         if (!imd->delay_flip && image_get_pixbuf(imd))
766                 {
767                 PixbufRenderer *pr;
768
769                 pr = PIXBUF_RENDERER(imd->pr);
770                 if (pr->pixbuf) g_object_unref(pr->pixbuf);
771                 pr->pixbuf = NULL;
772                 }
773
774         g_object_set(G_OBJECT(imd->pr), "loading", TRUE, NULL);
775
776         imd->il = image_loader_new(fd);
777
778         image_load_set_signals(imd, FALSE);
779
780         if (!image_loader_start(imd->il))
781                 {
782                 DEBUG_1("image start error");
783
784                 g_object_set(G_OBJECT(imd->pr), "loading", FALSE, NULL);
785
786                 image_loader_free(imd->il);
787                 imd->il = NULL;
788
789                 image_complete_util(imd, FALSE);
790
791                 return FALSE;
792                 }
793
794         image_state_set(imd, IMAGE_STATE_LOADING);
795
796 /*
797         if (!imd->delay_flip && !image_get_pixbuf(imd) && image_loader_get_pixbuf(imd->il))
798                 {
799                 image_change_pixbuf(imd, image_loader_get_pixbuf(imd->il), image_zoom_get(imd), TRUE);
800                 }
801 */
802         return TRUE;
803 }
804
805 static void image_reset(ImageWindow *imd)
806 {
807         /* stops anything currently being done */
808
809         DEBUG_1("%s image reset", get_exec_time());
810
811         g_object_set(G_OBJECT(imd->pr), "loading", FALSE, NULL);
812
813         image_loader_free(imd->il);
814         imd->il = NULL;
815
816         color_man_free((ColorMan *)imd->cm);
817         imd->cm = NULL;
818
819         imd->delay_alter_type = ALTER_NONE;
820
821         image_state_set(imd, IMAGE_STATE_NONE);
822 }
823
824 /*
825  *-------------------------------------------------------------------
826  * image changer
827  *-------------------------------------------------------------------
828  */
829
830 static void image_change_complete(ImageWindow *imd, gdouble zoom)
831 {
832         image_reset(imd);
833         imd->unknown = TRUE;
834
835         if (!imd->image_fd)
836                 {
837                 image_change_pixbuf(imd, NULL, zoom, FALSE);
838                 }
839         else
840                 {
841
842                 if (is_readable_file(imd->image_fd->path))
843                         {
844                         PixbufRenderer *pr;
845
846                         pr = PIXBUF_RENDERER(imd->pr);
847                         pr->zoom = zoom;        /* store the zoom, needed by the loader */
848
849                         if (image_load_begin(imd, imd->image_fd))
850                                 {
851                                 imd->unknown = FALSE;
852                                 }
853                         }
854
855                 if (imd->unknown == TRUE)
856                         {
857                         GdkPixbuf *pixbuf;
858
859                         pixbuf = pixbuf_inline(PIXBUF_INLINE_BROKEN);
860                         image_change_pixbuf(imd, pixbuf, zoom, FALSE);
861                         g_object_unref(pixbuf);
862                         }
863                 }
864
865         image_update_util(imd);
866 }
867
868 static void image_change_real(ImageWindow *imd, FileData *fd,
869                               CollectionData *cd, CollectInfo *info, gdouble zoom)
870 {
871
872         imd->collection = cd;
873         imd->collection_info = info;
874
875         if (imd->auto_refresh && imd->image_fd)
876                 file_data_unregister_real_time_monitor(imd->image_fd);
877
878         file_data_unref(imd->image_fd);
879         imd->image_fd = file_data_ref(fd);
880
881
882         image_change_complete(imd, zoom);
883
884         image_update_title(imd);
885         image_state_set(imd, IMAGE_STATE_IMAGE);
886
887         if (imd->auto_refresh && imd->image_fd)
888                 file_data_register_real_time_monitor(imd->image_fd);
889 }
890
891 /*
892  *-------------------------------------------------------------------
893  * focus stuff
894  *-------------------------------------------------------------------
895  */
896
897 static gboolean image_focus_in_cb(GtkWidget *widget, GdkEventFocus *event, gpointer data)
898 {
899         ImageWindow *imd = data;
900
901         if (imd->func_focus_in)
902                 {
903                 imd->func_focus_in(imd, imd->data_focus_in);
904                 }
905
906         return TRUE;
907 }
908
909 static gboolean image_scroll_cb(GtkWidget *widget, GdkEventScroll *event, gpointer data)
910 {
911         ImageWindow *imd = data;
912
913         if (imd->func_scroll &&
914             event && event->type == GDK_SCROLL)
915                 {
916                 imd->func_scroll(imd, event, imd->data_scroll);
917                 return TRUE;
918                 }
919
920         return FALSE;
921 }
922
923 /*
924  *-------------------------------------------------------------------
925  * public interface
926  *-------------------------------------------------------------------
927  */
928
929 void image_attach_window(ImageWindow *imd, GtkWidget *window,
930                          const gchar *title, const gchar *title_right, gboolean show_zoom)
931 {
932         imd->top_window = window;
933         g_free(imd->title);
934         imd->title = g_strdup(title);
935         g_free(imd->title_right);
936         imd->title_right = g_strdup(title_right);
937         imd->title_show_zoom = show_zoom;
938
939         if (!options->image.fit_window_to_image) window = NULL;
940
941         pixbuf_renderer_set_parent((PixbufRenderer *)imd->pr, (GtkWindow *)window);
942
943         image_update_title(imd);
944 }
945
946 void image_set_update_func(ImageWindow *imd,
947                            void (*func)(ImageWindow *imd, gpointer data),
948                            gpointer data)
949 {
950         imd->func_update = func;
951         imd->data_update = data;
952 }
953
954 void image_set_complete_func(ImageWindow *imd,
955                              void (*func)(ImageWindow *imd, gboolean preload, gpointer data),
956                              gpointer data)
957 {
958         imd->func_complete = func;
959         imd->data_complete = data;
960 }
961
962 void image_set_state_func(ImageWindow *imd,
963                         void (*func)(ImageWindow *imd, ImageState state, gpointer data),
964                         gpointer data)
965 {
966         imd->func_state = func;
967         imd->data_state = data;
968 }
969
970
971 void image_set_button_func(ImageWindow *imd,
972                            void (*func)(ImageWindow *, GdkEventButton *event, gpointer),
973                            gpointer data)
974 {
975         imd->func_button = func;
976         imd->data_button = data;
977 }
978
979 void image_set_drag_func(ImageWindow *imd,
980                            void (*func)(ImageWindow *, GdkEventButton *event, gdouble dx, gdouble dy, gpointer),
981                            gpointer data)
982 {
983         imd->func_drag = func;
984         imd->data_drag = data;
985 }
986
987 void image_set_scroll_func(ImageWindow *imd,
988                            void (*func)(ImageWindow *, GdkEventScroll *event, gpointer),
989                            gpointer data)
990 {
991         imd->func_scroll = func;
992         imd->data_scroll = data;
993 }
994
995 void image_set_scroll_notify_func(ImageWindow *imd,
996                                   void (*func)(ImageWindow *imd, gint x, gint y, gint width, gint height, gpointer data),
997                                   gpointer data)
998 {
999         imd->func_scroll_notify = func;
1000         imd->data_scroll_notify = data;
1001 }
1002
1003 void image_set_focus_in_func(ImageWindow *imd,
1004                            void (*func)(ImageWindow *, gpointer),
1005                            gpointer data)
1006 {
1007         imd->func_focus_in = func;
1008         imd->data_focus_in = data;
1009 }
1010
1011 /* path, name */
1012
1013 const gchar *image_get_path(ImageWindow *imd)
1014 {
1015         if (imd->image_fd == NULL) return NULL;
1016         return imd->image_fd->path;
1017 }
1018
1019 const gchar *image_get_name(ImageWindow *imd)
1020 {
1021         if (imd->image_fd == NULL) return NULL;
1022         return imd->image_fd->name;
1023 }
1024
1025 FileData *image_get_fd(ImageWindow *imd)
1026 {
1027         return imd->image_fd;
1028 }
1029
1030 /* merely changes path string, does not change the image! */
1031 void image_set_fd(ImageWindow *imd, FileData *fd)
1032 {
1033         if (imd->auto_refresh && imd->image_fd)
1034                 file_data_unregister_real_time_monitor(imd->image_fd);
1035
1036         file_data_unref(imd->image_fd);
1037         imd->image_fd = file_data_ref(fd);
1038
1039         image_update_title(imd);
1040         image_state_set(imd, IMAGE_STATE_IMAGE);
1041
1042         if (imd->auto_refresh && imd->image_fd)
1043                 file_data_register_real_time_monitor(imd->image_fd);
1044 }
1045
1046 /* load a new image */
1047
1048 void image_change_fd(ImageWindow *imd, FileData *fd, gdouble zoom)
1049 {
1050         if (imd->image_fd == fd) return;
1051
1052         image_change_real(imd, fd, NULL, NULL, zoom);
1053 }
1054
1055 gboolean image_get_image_size(ImageWindow *imd, gint *width, gint *height)
1056 {
1057         return pixbuf_renderer_get_image_size(PIXBUF_RENDERER(imd->pr), width, height);
1058 }
1059
1060 GdkPixbuf *image_get_pixbuf(ImageWindow *imd)
1061 {
1062         return pixbuf_renderer_get_pixbuf((PixbufRenderer *)imd->pr);
1063 }
1064
1065 void image_change_pixbuf(ImageWindow *imd, GdkPixbuf *pixbuf, gdouble zoom, gboolean lazy)
1066 {
1067         StereoPixbufData stereo_data = STEREO_PIXBUF_DEFAULT;
1068         /* read_exif and similar functions can actually notice that the file has changed and trigger
1069            a notification that removes the pixbuf from cache and unrefs it. Therefore we must ref it
1070            here before it is taken over by the renderer. */
1071         if (pixbuf) g_object_ref(pixbuf);
1072
1073         imd->orientation = EXIF_ORIENTATION_TOP_LEFT;
1074         if (imd->image_fd)
1075                 {
1076                 if (imd->image_fd->user_orientation)
1077                         {
1078                         imd->orientation = imd->image_fd->user_orientation;
1079                         }
1080                 else if (options->image.exif_rotate_enable)
1081                         {
1082                         imd->orientation = metadata_read_int(imd->image_fd, ORIENTATION_KEY, EXIF_ORIENTATION_TOP_LEFT);
1083                         imd->image_fd->exif_orientation = imd->orientation;
1084                         }
1085                 }
1086
1087         if (pixbuf)
1088                 {
1089                 stereo_data = imd->user_stereo;
1090                 if (stereo_data == STEREO_PIXBUF_DEFAULT)
1091                         {
1092                         stereo_data = GPOINTER_TO_INT(g_object_get_data(G_OBJECT(pixbuf), "stereo_data"));
1093                         }
1094                 }
1095
1096         pixbuf_renderer_set_post_process_func((PixbufRenderer *)imd->pr, NULL, NULL, FALSE);
1097         if (imd->cm)
1098                 {
1099                 color_man_free(imd->cm);
1100                 imd->cm = NULL;
1101                 }
1102
1103         if (lazy)
1104                 {
1105                 pixbuf_renderer_set_pixbuf_lazy((PixbufRenderer *)imd->pr, pixbuf, zoom, imd->orientation, stereo_data);
1106                 }
1107         else
1108                 {
1109                 pixbuf_renderer_set_pixbuf((PixbufRenderer *)imd->pr, pixbuf, zoom);
1110                 pixbuf_renderer_set_orientation((PixbufRenderer *)imd->pr, imd->orientation);
1111                 pixbuf_renderer_set_stereo_data((PixbufRenderer *)imd->pr, stereo_data);
1112                 }
1113
1114         if (pixbuf) g_object_unref(pixbuf);
1115
1116         if (imd->color_profile_enable)
1117                 {
1118                 image_post_process_color(imd, 0, FALSE); /* TODO: error handling */
1119                 }
1120
1121         if (imd->cm || imd->desaturate)
1122                 pixbuf_renderer_set_post_process_func((PixbufRenderer *)imd->pr, image_post_process_tile_color_cb, (gpointer) imd, (imd->cm != NULL) );
1123
1124         image_state_set(imd, IMAGE_STATE_IMAGE);
1125 }
1126
1127 void image_change_from_collection(ImageWindow *imd, CollectionData *cd, CollectInfo *info, gdouble zoom)
1128 {
1129         if (!cd || !info || !g_list_find(cd->list, info)) return;
1130
1131         image_change_real(imd, info->fd, cd, info, zoom);
1132 }
1133
1134 CollectionData *image_get_collection(ImageWindow *imd, CollectInfo **info)
1135 {
1136         if (collection_to_number(imd->collection) >= 0)
1137                 {
1138                 if (g_list_find(imd->collection->list, imd->collection_info) != NULL)
1139                         {
1140                         if (info) *info = imd->collection_info;
1141                         }
1142                 else
1143                         {
1144                         if (info) *info = NULL;
1145                         }
1146                 return imd->collection;
1147                 }
1148
1149         if (info) *info = NULL;
1150         return NULL;
1151 }
1152
1153 static void image_loader_sync_read_ahead_data(ImageLoader *il, gpointer old_data, gpointer data)
1154 {
1155         if (g_signal_handlers_disconnect_by_func(G_OBJECT(il), (GCallback)image_read_ahead_error_cb, old_data))
1156                 g_signal_connect(G_OBJECT(il), "error", (GCallback)image_read_ahead_error_cb, data);
1157
1158         if (g_signal_handlers_disconnect_by_func(G_OBJECT(il), (GCallback)image_read_ahead_done_cb, old_data))
1159                 g_signal_connect(G_OBJECT(il), "done", (GCallback)image_read_ahead_done_cb, data);
1160 }
1161
1162 static void image_loader_sync_data(ImageLoader *il, gpointer old_data, gpointer data)
1163 {
1164         if (g_signal_handlers_disconnect_by_func(G_OBJECT(il), (GCallback)image_load_area_cb, old_data))
1165                 g_signal_connect(G_OBJECT(il), "area_ready", (GCallback)image_load_area_cb, data);
1166
1167         if (g_signal_handlers_disconnect_by_func(G_OBJECT(il), (GCallback)image_load_error_cb, old_data))
1168                 g_signal_connect(G_OBJECT(il), "error", (GCallback)image_load_error_cb, data);
1169
1170         if (g_signal_handlers_disconnect_by_func(G_OBJECT(il), (GCallback)image_load_done_cb, old_data))
1171                 g_signal_connect(G_OBJECT(il), "done", (GCallback)image_load_done_cb, data);
1172 }
1173
1174 /* this is more like a move function
1175  * it moves most data from source to imd
1176  */
1177 void image_move_from_image(ImageWindow *imd, ImageWindow *source)
1178 {
1179         if (imd == source) return;
1180
1181         imd->unknown = source->unknown;
1182
1183         imd->collection = source->collection;
1184         imd->collection_info = source->collection_info;
1185
1186         image_loader_free(imd->il);
1187         imd->il = NULL;
1188
1189         image_set_fd(imd, image_get_fd(source));
1190
1191
1192         if (source->il)
1193                 {
1194                 imd->il = source->il;
1195                 source->il = NULL;
1196
1197                 image_loader_sync_data(imd->il, source, imd);
1198
1199                 imd->delay_alter_type = source->delay_alter_type;
1200                 source->delay_alter_type = ALTER_NONE;
1201                 }
1202
1203         imd->color_profile_enable = source->color_profile_enable;
1204         imd->color_profile_input = source->color_profile_input;
1205         imd->color_profile_use_image = source->color_profile_use_image;
1206         color_man_free((ColorMan *)imd->cm);
1207         imd->cm = NULL;
1208         if (source->cm)
1209                 {
1210                 ColorMan *cm;
1211
1212                 imd->cm = source->cm;
1213                 source->cm = NULL;
1214
1215                 cm = (ColorMan *)imd->cm;
1216                 cm->imd = imd;
1217                 cm->func_done_data = imd;
1218                 }
1219
1220         file_data_unref(imd->read_ahead_fd);
1221         source->read_ahead_fd = NULL;
1222
1223         imd->orientation = source->orientation;
1224         imd->desaturate = source->desaturate;
1225
1226         imd->user_stereo = source->user_stereo;
1227
1228         pixbuf_renderer_move(PIXBUF_RENDERER(imd->pr), PIXBUF_RENDERER(source->pr));
1229
1230         if (imd->cm || imd->desaturate)
1231                 pixbuf_renderer_set_post_process_func((PixbufRenderer *)imd->pr, image_post_process_tile_color_cb, (gpointer) imd, (imd->cm != NULL) );
1232         else
1233                 pixbuf_renderer_set_post_process_func((PixbufRenderer *)imd->pr, NULL, NULL, TRUE);
1234
1235 }
1236
1237 /* this is  a copy function
1238  * source stays unchanged
1239  */
1240 void image_copy_from_image(ImageWindow *imd, ImageWindow *source)
1241 {
1242         if (imd == source) return;
1243
1244         imd->unknown = source->unknown;
1245
1246         imd->collection = source->collection;
1247         imd->collection_info = source->collection_info;
1248
1249         image_loader_free(imd->il);
1250         imd->il = NULL;
1251
1252         image_set_fd(imd, image_get_fd(source));
1253
1254
1255         imd->color_profile_enable = source->color_profile_enable;
1256         imd->color_profile_input = source->color_profile_input;
1257         imd->color_profile_use_image = source->color_profile_use_image;
1258         color_man_free((ColorMan *)imd->cm);
1259         imd->cm = NULL;
1260         if (source->cm)
1261                 {
1262                 ColorMan *cm;
1263
1264                 imd->cm = source->cm;
1265                 source->cm = NULL;
1266
1267                 cm = (ColorMan *)imd->cm;
1268                 cm->imd = imd;
1269                 cm->func_done_data = imd;
1270                 }
1271
1272         image_loader_free(imd->read_ahead_il);
1273         imd->read_ahead_il = source->read_ahead_il;
1274         source->read_ahead_il = NULL;
1275         if (imd->read_ahead_il) image_loader_sync_read_ahead_data(imd->read_ahead_il, source, imd);
1276
1277         file_data_unref(imd->read_ahead_fd);
1278         imd->read_ahead_fd = source->read_ahead_fd;
1279         source->read_ahead_fd = NULL;
1280
1281         imd->completed = source->completed;
1282         imd->state = source->state;
1283         source->state = IMAGE_STATE_NONE;
1284
1285         imd->orientation = source->orientation;
1286         imd->desaturate = source->desaturate;
1287
1288         imd->user_stereo = source->user_stereo;
1289
1290         pixbuf_renderer_copy(PIXBUF_RENDERER(imd->pr), PIXBUF_RENDERER(source->pr));
1291
1292         if (imd->cm || imd->desaturate)
1293                 pixbuf_renderer_set_post_process_func((PixbufRenderer *)imd->pr, image_post_process_tile_color_cb, (gpointer) imd, (imd->cm != NULL) );
1294         else
1295                 pixbuf_renderer_set_post_process_func((PixbufRenderer *)imd->pr, NULL, NULL, TRUE);
1296
1297 }
1298
1299
1300 /* manipulation */
1301
1302 void image_area_changed(ImageWindow *imd, gint x, gint y, gint width, gint height)
1303 {
1304         pixbuf_renderer_area_changed((PixbufRenderer *)imd->pr, x, y, width, height);
1305 }
1306
1307 void image_reload(ImageWindow *imd)
1308 {
1309         if (pixbuf_renderer_get_tiles((PixbufRenderer *)imd->pr)) return;
1310
1311         image_change_complete(imd, image_zoom_get(imd));
1312 }
1313
1314 void image_scroll(ImageWindow *imd, gint x, gint y)
1315 {
1316         pixbuf_renderer_scroll((PixbufRenderer *)imd->pr, x, y);
1317 }
1318
1319 void image_scroll_to_point(ImageWindow *imd, gint x, gint y,
1320                            gdouble x_align, gdouble y_align)
1321 {
1322         pixbuf_renderer_scroll_to_point((PixbufRenderer *)imd->pr, x, y, x_align, y_align);
1323 }
1324
1325 void image_get_scroll_center(ImageWindow *imd, gdouble *x, gdouble *y)
1326 {
1327         pixbuf_renderer_get_scroll_center(PIXBUF_RENDERER(imd->pr), x, y);
1328 }
1329
1330 void image_set_scroll_center(ImageWindow *imd, gdouble x, gdouble y)
1331 {
1332         pixbuf_renderer_set_scroll_center(PIXBUF_RENDERER(imd->pr), x, y);
1333 }
1334
1335 void image_zoom_adjust(ImageWindow *imd, gdouble increment)
1336 {
1337         pixbuf_renderer_zoom_adjust((PixbufRenderer *)imd->pr, increment);
1338 }
1339
1340 void image_zoom_adjust_at_point(ImageWindow *imd, gdouble increment, gint x, gint y)
1341 {
1342         pixbuf_renderer_zoom_adjust_at_point((PixbufRenderer *)imd->pr, increment, x, y);
1343 }
1344
1345 void image_zoom_set_limits(ImageWindow *imd, gdouble min, gdouble max)
1346 {
1347         pixbuf_renderer_zoom_set_limits((PixbufRenderer *)imd->pr, min, max);
1348 }
1349
1350 void image_zoom_set(ImageWindow *imd, gdouble zoom)
1351 {
1352         pixbuf_renderer_zoom_set((PixbufRenderer *)imd->pr, zoom);
1353 }
1354
1355 void image_zoom_set_fill_geometry(ImageWindow *imd, gboolean vertical)
1356 {
1357         PixbufRenderer *pr;
1358         gdouble zoom;
1359         gint width, height;
1360
1361         pr = (PixbufRenderer *)imd->pr;
1362
1363         if (!pixbuf_renderer_get_pixbuf(pr) ||
1364             !pixbuf_renderer_get_image_size(pr, &width, &height)) return;
1365
1366         if (vertical)
1367                 {
1368                 zoom = (gdouble)pr->viewport_height / height;
1369                 }
1370         else
1371                 {
1372                 zoom = (gdouble)pr->viewport_width / width;
1373                 }
1374
1375         if (zoom < 1.0)
1376                 {
1377                 zoom = 0.0 - 1.0 / zoom;
1378                 }
1379
1380         pixbuf_renderer_zoom_set(pr, zoom);
1381 }
1382
1383 gdouble image_zoom_get(ImageWindow *imd)
1384 {
1385         return pixbuf_renderer_zoom_get((PixbufRenderer *)imd->pr);
1386 }
1387
1388 gdouble image_zoom_get_real(ImageWindow *imd)
1389 {
1390         return pixbuf_renderer_zoom_get_scale((PixbufRenderer *)imd->pr);
1391 }
1392
1393 gchar *image_zoom_get_as_text(ImageWindow *imd)
1394 {
1395         gdouble zoom;
1396         gdouble scale;
1397         gdouble l = 1.0;
1398         gdouble r = 1.0;
1399         gint pl = 0;
1400         gint pr = 0;
1401         gchar *approx = " ";
1402
1403         zoom = image_zoom_get(imd);
1404         scale = image_zoom_get_real(imd);
1405
1406         if (zoom > 0.0)
1407                 {
1408                 l = zoom;
1409                 }
1410         else if (zoom < 0.0)
1411                 {
1412                 r = 0.0 - zoom;
1413                 }
1414         else if (zoom == 0.0 && scale != 0.0)
1415                 {
1416                 if (scale >= 1.0)
1417                         {
1418                         l = scale;
1419                         }
1420                 else
1421                         {
1422                         r = 1.0 / scale;
1423                         }
1424                 approx = "~";
1425                 }
1426
1427         if (rint(l) != l) pl = 2;
1428         if (rint(r) != r) pr = 2;
1429
1430         return g_strdup_printf("%.*f :%s%.*f", pl, l, approx, pr, r);
1431 }
1432
1433 gdouble image_zoom_get_default(ImageWindow *imd)
1434 {
1435         gdouble zoom = 1.0;
1436
1437         switch (options->image.zoom_mode)
1438         {
1439         case ZOOM_RESET_ORIGINAL:
1440                 break;
1441         case ZOOM_RESET_FIT_WINDOW:
1442                 zoom = 0.0;
1443                 break;
1444         case ZOOM_RESET_NONE:
1445                 if (imd) zoom = image_zoom_get(imd);
1446                 break;
1447         }
1448
1449         return zoom;
1450 }
1451
1452 /* stereo */
1453 gint image_stereo_get(ImageWindow *imd)
1454 {
1455         return pixbuf_renderer_stereo_get((PixbufRenderer *)imd->pr);
1456 }
1457
1458 void image_stereo_set(ImageWindow *imd, gint stereo_mode)
1459 {
1460         DEBUG_1("Setting stereo mode %04x for imd %p", stereo_mode, imd);
1461         pixbuf_renderer_stereo_set((PixbufRenderer *)imd->pr, stereo_mode);
1462 }
1463
1464 void image_stereo_swap(ImageWindow *imd)
1465 {
1466         gint stereo_mode = pixbuf_renderer_stereo_get((PixbufRenderer *)imd->pr);
1467         stereo_mode ^= PR_STEREO_SWAP;
1468         pixbuf_renderer_stereo_set((PixbufRenderer *)imd->pr, stereo_mode);
1469 }
1470
1471 StereoPixbufData image_stereo_pixbuf_get(ImageWindow *imd)
1472 {
1473         return imd->user_stereo;
1474 }
1475
1476 void image_stereo_pixbuf_set(ImageWindow *imd, StereoPixbufData stereo_mode)
1477 {
1478         imd->user_stereo = stereo_mode;
1479         image_reload(imd);
1480 }
1481
1482 /* read ahead */
1483
1484 void image_prebuffer_set(ImageWindow *imd, FileData *fd)
1485 {
1486         if (pixbuf_renderer_get_tiles((PixbufRenderer *)imd->pr)) return;
1487
1488         if (fd)
1489                 {
1490                 if (!file_cache_get(image_get_cache(), fd))
1491                         {
1492                         image_read_ahead_set(imd, fd);
1493                         }
1494                 }
1495         else
1496                 {
1497                 image_read_ahead_cancel(imd);
1498                 }
1499 }
1500
1501 static void image_notify_cb(FileData *fd, NotifyType type, gpointer data)
1502 {
1503         ImageWindow *imd = data;
1504
1505         if (!imd || !image_get_pixbuf(imd) ||
1506             /* imd->il || */ /* loading in progress - do not check - it should start from the beginning anyway */
1507             !imd->image_fd || /* nothing to reload */
1508             imd->state == IMAGE_STATE_NONE /* loading not started, no need to reload */
1509             ) return;
1510
1511         if ((type & NOTIFY_REREAD) && fd == imd->image_fd)
1512                 {
1513                 /* there is no need to reload on NOTIFY_CHANGE,
1514                    modified files should be detacted anyway and NOTIFY_REREAD should be recieved
1515                    or they are removed from the filelist completely on "move" and "delete"
1516                 */
1517                 DEBUG_1("Notify image: %s %04x", fd->path, type);
1518                 image_reload(imd);
1519                 }
1520 }
1521
1522 void image_auto_refresh_enable(ImageWindow *imd, gboolean enable)
1523 {
1524         if (!enable && imd->auto_refresh && imd->image_fd)
1525                 file_data_unregister_real_time_monitor(imd->image_fd);
1526
1527         if (enable && !imd->auto_refresh && imd->image_fd)
1528                 file_data_register_real_time_monitor(imd->image_fd);
1529
1530         imd->auto_refresh = enable;
1531 }
1532
1533 void image_top_window_set_sync(ImageWindow *imd, gboolean allow_sync)
1534 {
1535         imd->top_window_sync = allow_sync;
1536
1537         g_object_set(G_OBJECT(imd->pr), "window_fit", allow_sync, NULL);
1538 }
1539
1540 void image_background_set_color(ImageWindow *imd, GdkColor *color)
1541 {
1542         pixbuf_renderer_set_color((PixbufRenderer *)imd->pr, color);
1543 }
1544
1545 void image_background_set_color_from_options(ImageWindow *imd, gboolean fullscreen)
1546 {
1547         GdkColor *color = NULL;
1548
1549         if ((options->image.use_custom_border_color && !fullscreen) ||
1550             (options->image.use_custom_border_color_in_fullscreen && fullscreen))
1551                 {
1552                 color = &options->image.border_color;
1553                 }
1554
1555         image_background_set_color(imd, color);
1556 }
1557
1558 void image_color_profile_set(ImageWindow *imd,
1559                              gint input_type,
1560                              gboolean use_image)
1561 {
1562         if (!imd) return;
1563
1564         if (input_type < 0 || input_type >= COLOR_PROFILE_FILE + COLOR_PROFILE_INPUTS)
1565                 {
1566                 return;
1567                 }
1568
1569         imd->color_profile_input = input_type;
1570         imd->color_profile_use_image = use_image;
1571 }
1572
1573 gboolean image_color_profile_get(ImageWindow *imd,
1574                                  gint *input_type,
1575                                  gboolean *use_image)
1576 {
1577         if (!imd) return FALSE;
1578
1579         if (input_type) *input_type = imd->color_profile_input;
1580         if (use_image) *use_image = imd->color_profile_use_image;
1581
1582         return TRUE;
1583 }
1584
1585 void image_color_profile_set_use(ImageWindow *imd, gboolean enable)
1586 {
1587         if (!imd) return;
1588
1589         if (imd->color_profile_enable == enable) return;
1590
1591         imd->color_profile_enable = enable;
1592 }
1593
1594 gboolean image_color_profile_get_use(ImageWindow *imd)
1595 {
1596         if (!imd) return FALSE;
1597
1598         return imd->color_profile_enable;
1599 }
1600
1601 gboolean image_color_profile_get_status(ImageWindow *imd, gchar **image_profile, gchar **screen_profile)
1602 {
1603         ColorMan *cm;
1604         if (!imd) return FALSE;
1605
1606         cm = imd->cm;
1607         if (!cm) return FALSE;
1608         return color_man_get_status(cm, image_profile, screen_profile);
1609
1610 }
1611
1612 void image_set_delay_flip(ImageWindow *imd, gboolean delay)
1613 {
1614         if (!imd ||
1615             imd->delay_flip == delay) return;
1616
1617         imd->delay_flip = delay;
1618
1619         g_object_set(G_OBJECT(imd->pr), "delay_flip", delay, NULL);
1620
1621         if (!imd->delay_flip && imd->il)
1622                 {
1623                 PixbufRenderer *pr;
1624
1625                 pr = PIXBUF_RENDERER(imd->pr);
1626                 if (pr->pixbuf) g_object_unref(pr->pixbuf);
1627                 pr->pixbuf = NULL;
1628
1629                 image_load_pixbuf_ready(imd);
1630                 }
1631 }
1632
1633 void image_to_root_window(ImageWindow *imd, gboolean scaled)
1634 {
1635 #if !GTK_CHECK_VERSION(3,0,0)
1636         GdkScreen *screen;
1637         GdkWindow *rootwindow;
1638         GdkPixmap *pixmap;
1639         GdkPixbuf *pixbuf;
1640         GdkPixbuf *pb;
1641         gint width, height;
1642
1643         if (!imd) return;
1644
1645         pixbuf = image_get_pixbuf(imd);
1646         if (!pixbuf) return;
1647
1648         screen = gtk_widget_get_screen(imd->widget);
1649         rootwindow = gdk_screen_get_root_window(screen);
1650         if (gdk_window_get_visual(rootwindow) != gdk_visual_get_system()) return;
1651
1652         if (scaled)
1653                 {
1654                 width = gdk_screen_width();
1655                 height = gdk_screen_height();
1656                 }
1657         else
1658                 {
1659                 pixbuf_renderer_get_scaled_size((PixbufRenderer *)imd->pr, &width, &height);
1660                 }
1661
1662         pb = gdk_pixbuf_scale_simple(pixbuf, width, height, (GdkInterpType)options->image.zoom_quality);
1663
1664         gdk_pixbuf_render_pixmap_and_mask(pb, &pixmap, NULL, 128);
1665         gdk_window_set_back_pixmap(rootwindow, pixmap, FALSE);
1666         gdk_window_clear(rootwindow);
1667         g_object_unref(pb);
1668         g_object_unref(pixmap);
1669
1670         gdk_flush();
1671 #endif
1672 }
1673
1674 void image_select(ImageWindow *imd, gboolean select)
1675 {
1676         if (!imd->has_frame) return;
1677
1678         if (select)
1679                 {
1680                 gtk_widget_set_state(imd->widget, GTK_STATE_SELECTED);
1681                 gtk_widget_set_state(imd->pr, GTK_STATE_NORMAL); /* do not propagate */
1682                 }
1683         else
1684                 gtk_widget_set_state(imd->widget, GTK_STATE_NORMAL);
1685 }
1686
1687 void image_set_selectable(ImageWindow *imd, gboolean selectable)
1688 {
1689         if (!imd->has_frame) return;
1690
1691         gtk_frame_set_shadow_type(GTK_FRAME(imd->frame), GTK_SHADOW_NONE);
1692         gtk_container_set_border_width(GTK_CONTAINER(imd->frame), selectable ? 4 : 0);
1693 }
1694
1695 void image_grab_focus(ImageWindow *imd)
1696 {
1697         if (imd->has_frame)
1698                 {
1699                 gtk_widget_grab_focus(imd->frame);
1700                 }
1701         else
1702                 {
1703                 gtk_widget_grab_focus(imd->widget);
1704                 }
1705 }
1706
1707
1708 /*
1709  *-------------------------------------------------------------------
1710  * prefs sync
1711  *-------------------------------------------------------------------
1712  */
1713
1714 static void image_options_set(ImageWindow *imd)
1715 {
1716         g_object_set(G_OBJECT(imd->pr), "zoom_quality", options->image.zoom_quality,
1717                                         "zoom_2pass", options->image.zoom_2pass,
1718                                         "zoom_expand", options->image.zoom_to_fit_allow_expand,
1719                                         "scroll_reset", options->image.scroll_reset_method,
1720                                         "cache_display", options->image.tile_cache_max,
1721                                         "window_fit", (imd->top_window_sync && options->image.fit_window_to_image),
1722                                         "window_limit", options->image.limit_window_size,
1723                                         "window_limit_value", options->image.max_window_size,
1724                                         "autofit_limit", options->image.limit_autofit_size,
1725                                         "autofit_limit_value", options->image.max_autofit_size,
1726
1727                                         NULL);
1728
1729         pixbuf_renderer_set_parent((PixbufRenderer *)imd->pr, (GtkWindow *)imd->top_window);
1730
1731         image_stereo_set(imd, options->stereo.mode);
1732         pixbuf_renderer_stereo_fixed_set((PixbufRenderer *)imd->pr,
1733                                         options->stereo.fixed_w, options->stereo.fixed_h,
1734                                         options->stereo.fixed_x1, options->stereo.fixed_y1,
1735                                         options->stereo.fixed_x2, options->stereo.fixed_y2);
1736 }
1737
1738 void image_options_sync(void)
1739 {
1740         GList *work;
1741
1742         work = image_list;
1743         while (work)
1744                 {
1745                 ImageWindow *imd;
1746
1747                 imd = work->data;
1748                 work = work->next;
1749
1750                 image_options_set(imd);
1751                 }
1752 }
1753
1754 /*
1755  *-------------------------------------------------------------------
1756  * init / destroy
1757  *-------------------------------------------------------------------
1758  */
1759
1760 static void image_free(ImageWindow *imd)
1761 {
1762         image_list = g_list_remove(image_list, imd);
1763
1764         if (imd->auto_refresh && imd->image_fd)
1765                 file_data_unregister_real_time_monitor(imd->image_fd);
1766
1767         file_data_unregister_notify_func(image_notify_cb, imd);
1768
1769         image_reset(imd);
1770
1771         image_read_ahead_cancel(imd);
1772
1773         file_data_unref(imd->image_fd);
1774         g_free(imd->title);
1775         g_free(imd->title_right);
1776         g_free(imd);
1777 }
1778
1779 static void image_destroy_cb(GtkWidget *widget, gpointer data)
1780 {
1781         ImageWindow *imd = data;
1782         image_free(imd);
1783 }
1784 #if GTK_CHECK_VERSION(3,0,0)
1785 gboolean selectable_frame_draw_cb(GtkWidget *widget, cairo_t *cr, gpointer data)
1786 {
1787         GtkAllocation allocation;
1788         gtk_widget_get_allocation(widget, &allocation);
1789         gtk_paint_flat_box(gtk_widget_get_style(widget),
1790                            cr,
1791                            gtk_widget_get_state(widget),
1792                            gtk_frame_get_shadow_type(GTK_FRAME(widget)),
1793                            widget,
1794                            NULL,
1795                            allocation.x + 3, allocation.y + 3,
1796                            allocation.width - 6, allocation.height - 6);
1797
1798         if (gtk_widget_has_focus(widget))
1799                 {
1800                 gtk_paint_focus(gtk_widget_get_style(widget), cr, GTK_STATE_ACTIVE,
1801                                 widget, "image_window",
1802                                 allocation.x, allocation.y,
1803                                 allocation.width - 1, allocation.height - 1);
1804                 }
1805         else
1806                 {
1807                 gtk_paint_shadow(gtk_widget_get_style(widget), cr, GTK_STATE_NORMAL, GTK_SHADOW_IN,
1808                                  widget, "image_window",
1809                                  allocation.x, allocation.y,
1810                                  allocation.width - 1, allocation.height - 1);
1811                 }
1812         return FALSE;
1813 }
1814
1815 #else
1816 gboolean selectable_frame_expose_cb(GtkWidget *widget, GdkEventExpose *event, gpointer data)
1817 {
1818         GtkAllocation allocation;
1819         gtk_widget_get_allocation(widget, &allocation);
1820         gtk_paint_flat_box(gtk_widget_get_style(widget),
1821                            gtk_widget_get_window(widget),
1822                            gtk_widget_get_state(widget),
1823                            gtk_frame_get_shadow_type(GTK_FRAME(widget)),
1824                            NULL,
1825                            widget,
1826                            NULL,
1827                            allocation.x + 3, allocation.y + 3,
1828                            allocation.width - 6, allocation.height - 6);
1829
1830         if (gtk_widget_has_focus(widget))
1831                 {
1832                 gtk_paint_focus(gtk_widget_get_style(widget), gtk_widget_get_window(widget), GTK_STATE_ACTIVE,
1833                                 &event->area, widget, "image_window",
1834                                 allocation.x, allocation.y,
1835                                 allocation.width - 1, allocation.height - 1);
1836                 }
1837         else
1838                 {
1839                 gtk_paint_shadow(gtk_widget_get_style(widget), gtk_widget_get_window(widget), GTK_STATE_NORMAL, GTK_SHADOW_IN,
1840                                  &event->area, widget, "image_window",
1841                                  allocation.x, allocation.y,
1842                                  allocation.width - 1, allocation.height - 1);
1843                 }
1844         return FALSE;
1845 }
1846 #endif
1847
1848
1849 void image_set_frame(ImageWindow *imd, gboolean frame)
1850 {
1851         frame = !!frame;
1852
1853         if (frame == imd->has_frame) return;
1854
1855         gtk_widget_hide(imd->pr);
1856
1857         if (frame)
1858                 {
1859                 imd->frame = gtk_frame_new(NULL);
1860                 g_object_ref(imd->pr);
1861                 if (imd->has_frame != -1) gtk_container_remove(GTK_CONTAINER(imd->widget), imd->pr);
1862                 gtk_container_add(GTK_CONTAINER(imd->frame), imd->pr);
1863
1864                 g_object_unref(imd->pr);
1865                 gtk_widget_set_can_focus(imd->frame, TRUE);
1866                 gtk_widget_set_app_paintable(imd->frame, TRUE);
1867
1868 #if GTK_CHECK_VERSION(3,0,0)
1869                 g_signal_connect(G_OBJECT(imd->frame), "draw",
1870                                  G_CALLBACK(selectable_frame_draw_cb), NULL);
1871 #else
1872                 g_signal_connect(G_OBJECT(imd->frame), "expose_event",
1873                                  G_CALLBACK(selectable_frame_expose_cb), NULL);
1874 #endif
1875                 g_signal_connect(G_OBJECT(imd->frame), "focus_in_event",
1876                                  G_CALLBACK(image_focus_in_cb), imd);
1877
1878                 gtk_box_pack_start(GTK_BOX(imd->widget), imd->frame, TRUE, TRUE, 0);
1879                 gtk_widget_show(imd->frame);
1880                 }
1881         else
1882                 {
1883                 g_object_ref(imd->pr);
1884                 if (imd->frame)
1885                         {
1886                         gtk_container_remove(GTK_CONTAINER(imd->frame), imd->pr);
1887                         gtk_widget_destroy(imd->frame);
1888                         imd->frame = NULL;
1889                         }
1890                 gtk_box_pack_start(GTK_BOX(imd->widget), imd->pr, TRUE, TRUE, 0);
1891
1892                 g_object_unref(imd->pr);
1893                 }
1894
1895         gtk_widget_show(imd->pr);
1896
1897         imd->has_frame = frame;
1898 }
1899
1900 ImageWindow *image_new(gboolean frame)
1901 {
1902         ImageWindow *imd;
1903
1904         imd = g_new0(ImageWindow, 1);
1905
1906         imd->unknown = TRUE;
1907         imd->has_frame = -1; /* not initialized; for image_set_frame */
1908         imd->delay_alter_type = ALTER_NONE;
1909         imd->state = IMAGE_STATE_NONE;
1910         imd->color_profile_from_image = COLOR_PROFILE_NONE;
1911         imd->orientation = 1;
1912
1913         imd->pr = GTK_WIDGET(pixbuf_renderer_new());
1914
1915         image_options_set(imd);
1916
1917         imd->widget = gtk_vbox_new(0, 0);
1918
1919         image_set_frame(imd, frame);
1920
1921         image_set_selectable(imd, 0);
1922
1923         g_signal_connect(G_OBJECT(imd->pr), "clicked",
1924                          G_CALLBACK(image_click_cb), imd);
1925         g_signal_connect(G_OBJECT(imd->pr), "scroll_notify",
1926                          G_CALLBACK(image_scroll_notify_cb), imd);
1927
1928         g_signal_connect(G_OBJECT(imd->pr), "scroll_event",
1929                          G_CALLBACK(image_scroll_cb), imd);
1930
1931         g_signal_connect(G_OBJECT(imd->pr), "destroy",
1932                          G_CALLBACK(image_destroy_cb), imd);
1933
1934         g_signal_connect(G_OBJECT(imd->pr), "zoom",
1935                          G_CALLBACK(image_zoom_cb), imd);
1936         g_signal_connect(G_OBJECT(imd->pr), "render_complete",
1937                          G_CALLBACK(image_render_complete_cb), imd);
1938         g_signal_connect(G_OBJECT(imd->pr), "drag",
1939                          G_CALLBACK(image_drag_cb), imd);
1940
1941         file_data_register_notify_func(image_notify_cb, imd, NOTIFY_PRIORITY_LOW);
1942
1943         image_list = g_list_append(image_list, imd);
1944
1945         return imd;
1946 }
1947 /* vim: set shiftwidth=8 softtabstop=0 cindent cinoptions={1s: */