Trim trailing white spaces.
[geeqie.git] / src / image-load.c
index fb8066b..2c00f00 100644 (file)
@@ -1,6 +1,7 @@
 /*
- * GQview
+ * Geeqie
  * (C) 2004 John Ellis
+ * Copyright (C) 2008 - 2012 The Geeqie Team
  *
  * Author: John Ellis
  *
  */
 
 
-#include "gqview.h"
+#include "main.h"
 #include "image-load.h"
+#include "image_load_gdk.h"
+#include "image_load_jpeg.h"
+#include "image_load_tiff.h"
 
+#include "exif.h"
+#include "filedata.h"
 #include "ui_fileops.h"
+#include "gq-marshal.h"
 
 #include <fcntl.h>
+#include <sys/mman.h>
 
+#define IMAGE_LOADER_READ_BUFFER_SIZE_DEFAULT  4096
+#define IMAGE_LOADER_IDLE_READ_LOOP_COUNT_DEFAULT      1
 
-/* bytes to read from file per read() */
-#define IMAGE_LOADER_BUFFER_SIZE 512
 
-/* the number of bytes to read per idle call (define x IMAGE_LOADER_BUFFER_SIZE) */
-#define IMAGE_LOADER_BUFFER_DEFAULT_COUNT 1
+/**************************************************************************************/
+/* image loader class */
+
+
+enum {
+       SIGNAL_AREA_READY = 0,
+       SIGNAL_ERROR,
+       SIGNAL_DONE,
+       SIGNAL_PERCENT,
+       SIGNAL_SIZE,
+       SIGNAL_COUNT
+};
+
+static guint signals[SIGNAL_COUNT] = { 0 };
+
+static void image_loader_init(GTypeInstance *instance, gpointer g_class);
+static void image_loader_class_init(ImageLoaderClass *class);
+static void image_loader_finalize(GObject *object);
+static void image_loader_stop(ImageLoader *il);
+
+GType image_loader_get_type(void)
+{
+       static GType type = 0;
+       if (type == 0)
+               {
+               static const GTypeInfo info = {
+                       sizeof(ImageLoaderClass),
+                       NULL,   /* base_init */
+                       NULL,   /* base_finalize */
+                       (GClassInitFunc)image_loader_class_init, /* class_init */
+                       NULL,   /* class_finalize */
+                       NULL,   /* class_data */
+                       sizeof(ImageLoader),
+                       0,      /* n_preallocs */
+                       (GInstanceInitFunc)image_loader_init, /* instance_init */
+                       NULL    /* value_table */
+                       };
+               type = g_type_register_static(G_TYPE_OBJECT, "ImageLoaderType", &info, 0);
+               }
+       return type;
+}
+
+static void image_loader_init(GTypeInstance *instance, gpointer g_class)
+{
+       ImageLoader *il = (ImageLoader *)instance;
+
+       il->pixbuf = NULL;
+       il->idle_id = 0;
+       il->idle_priority = G_PRIORITY_DEFAULT_IDLE;
+       il->done = FALSE;
+       il->loader = NULL;
+
+       il->bytes_read = 0;
+       il->bytes_total = 0;
+
+       il->idle_done_id = 0;
+
+       il->idle_read_loop_count = IMAGE_LOADER_IDLE_READ_LOOP_COUNT_DEFAULT;
+       il->read_buffer_size = IMAGE_LOADER_READ_BUFFER_SIZE_DEFAULT;
+       il->mapped_file = NULL;
+
+       il->requested_width = 0;
+       il->requested_height = 0;
+       il->actual_width = 0;
+       il->actual_height = 0;
+       il->shrunk = FALSE;
+
+       il->can_destroy = TRUE;
+
+#ifdef HAVE_GTHREAD
+       il->data_mutex = g_mutex_new();
+       il->can_destroy_cond = g_cond_new();
+#endif
+       DEBUG_1("new image loader %p, bufsize=%" G_GSIZE_FORMAT " idle_loop=%u", il, il->read_buffer_size, il->idle_read_loop_count);
+}
+
+static void image_loader_class_init(ImageLoaderClass *class)
+{
+       GObjectClass *gobject_class = G_OBJECT_CLASS (class);
+
+//     gobject_class->set_property = image_loader_set_property;
+//     gobject_class->get_property = image_loader_get_property;
+
+       gobject_class->finalize = image_loader_finalize;
+
+
+       signals[SIGNAL_AREA_READY] =
+               g_signal_new("area_ready",
+                            G_OBJECT_CLASS_TYPE(gobject_class),
+                            G_SIGNAL_RUN_LAST,
+                            G_STRUCT_OFFSET(ImageLoaderClass, area_ready),
+                            NULL, NULL,
+                            gq_marshal_VOID__INT_INT_INT_INT,
+                            G_TYPE_NONE, 4,
+                            G_TYPE_INT,
+                            G_TYPE_INT,
+                            G_TYPE_INT,
+                            G_TYPE_INT);
+
+       signals[SIGNAL_ERROR] =
+               g_signal_new("error",
+                            G_OBJECT_CLASS_TYPE(gobject_class),
+                            G_SIGNAL_RUN_LAST,
+                            G_STRUCT_OFFSET(ImageLoaderClass, error),
+                            NULL, NULL,
+                            g_cclosure_marshal_VOID__VOID,
+                            G_TYPE_NONE, 0);
+
+       signals[SIGNAL_DONE] =
+               g_signal_new("done",
+                            G_OBJECT_CLASS_TYPE(gobject_class),
+                            G_SIGNAL_RUN_LAST,
+                            G_STRUCT_OFFSET(ImageLoaderClass, done),
+                            NULL, NULL,
+                            g_cclosure_marshal_VOID__VOID,
+                            G_TYPE_NONE, 0);
+
+       signals[SIGNAL_PERCENT] =
+               g_signal_new("percent",
+                            G_OBJECT_CLASS_TYPE(gobject_class),
+                            G_SIGNAL_RUN_LAST,
+                            G_STRUCT_OFFSET(ImageLoaderClass, percent),
+                            NULL, NULL,
+                            g_cclosure_marshal_VOID__DOUBLE,
+                            G_TYPE_NONE, 1,
+                            G_TYPE_DOUBLE);
+
+       signals[SIGNAL_SIZE] =
+               g_signal_new("size_prepared",
+                            G_OBJECT_CLASS_TYPE(gobject_class),
+                            G_SIGNAL_RUN_LAST,
+                            G_STRUCT_OFFSET(ImageLoaderClass, area_ready),
+                            NULL, NULL,
+                            gq_marshal_VOID__INT_INT,
+                            G_TYPE_NONE, 2,
+                            G_TYPE_INT,
+                            G_TYPE_INT);
+
+}
+
+static void image_loader_finalize(GObject *object)
+{
+       ImageLoader *il = (ImageLoader *)object;
+
+       image_loader_stop(il);
+
+       if (il->error) DEBUG_1("%s", image_loader_get_error(il));
+
+       DEBUG_1("freeing image loader %p bytes_read=%" G_GSIZE_FORMAT, il, il->bytes_read);
+
+       if (il->idle_done_id)
+               {
+               g_source_remove(il->idle_done_id);
+               il->idle_done_id = 0;
+               }
+
+       while (g_source_remove_by_user_data(il))
+               {
+               DEBUG_2("pending signals detected");
+               }
+       
+       while (il->area_param_list)
+               {
+               DEBUG_1("pending area_ready signals detected");
+               while (g_source_remove_by_user_data(il->area_param_list->data)) {}
+               g_free(il->area_param_list->data);
+               il->area_param_list = g_list_delete_link(il->area_param_list, il->area_param_list);
+               }
+
+       while (il->area_param_delayed_list)
+               {
+               g_free(il->area_param_delayed_list->data);
+               il->area_param_delayed_list = g_list_delete_link(il->area_param_delayed_list, il->area_param_delayed_list);
+               }
+
+       if (il->pixbuf) g_object_unref(il->pixbuf);
+       
+       if (il->error) g_error_free(il->error);
+
+       file_data_unref(il->fd);
+#ifdef HAVE_GTHREAD
+       g_mutex_free(il->data_mutex);
+       g_cond_free(il->can_destroy_cond);
+#endif
+}
+
+void image_loader_free(ImageLoader *il)
+{
+       if (!il) return;
+       g_object_unref(G_OBJECT(il));
+}
+
+
+ImageLoader *image_loader_new(FileData *fd)
+{
+       ImageLoader *il;
+
+       if (!fd) return NULL;
+
+       il = (ImageLoader *) g_object_new(TYPE_IMAGE_LOADER, NULL);
+       
+       il->fd = file_data_ref(fd);
+       
+       return il;
+}
+
+/**************************************************************************************/
+/* send signals via idle calbacks - the callback are executed in the main thread */
+
+typedef struct _ImageLoaderAreaParam ImageLoaderAreaParam;
+struct _ImageLoaderAreaParam {
+       ImageLoader *il;
+       guint x;
+       guint y;
+       guint w;
+       guint h;
+};
+
+
+static gboolean image_loader_emit_area_ready_cb(gpointer data)
+{
+       ImageLoaderAreaParam *par = data;
+       ImageLoader *il = par->il;
+       guint x, y, w, h;
+       g_mutex_lock(il->data_mutex);
+       il->area_param_list = g_list_remove(il->area_param_list, par);
+       x = par->x;
+       y = par->y;
+       w = par->w;
+       h = par->h;
+       g_free(par);
+       g_mutex_unlock(il->data_mutex);
+
+       g_signal_emit(il, signals[SIGNAL_AREA_READY], 0, x, y, w, h);
+       
+       return FALSE;
+}
+
+static gboolean image_loader_emit_done_cb(gpointer data)
+{
+       ImageLoader *il = data;
+       g_signal_emit(il, signals[SIGNAL_DONE], 0);
+       return FALSE;
+}
+
+static gboolean image_loader_emit_error_cb(gpointer data)
+{
+       ImageLoader *il = data;
+       g_signal_emit(il, signals[SIGNAL_ERROR], 0);
+       return FALSE;
+}
+
+static gboolean image_loader_emit_percent_cb(gpointer data)
+{
+       ImageLoader *il = data;
+       g_signal_emit(il, signals[SIGNAL_PERCENT], 0, image_loader_get_percent(il));
+       return FALSE;
+}
+
+static gboolean image_loader_emit_size_cb(gpointer data)
+{
+       gint width, height;
+       ImageLoader *il = data;
+       g_mutex_lock(il->data_mutex);
+       width = il->actual_width;
+       height = il->actual_height;
+       g_mutex_unlock(il->data_mutex);
+       g_signal_emit(il, signals[SIGNAL_SIZE], 0, width, height);
+       return FALSE;
+}
+
+
+/* DONE and ERROR are emited only once, thus they can have normal priority
+   PERCENT and AREA_READY should be processed ASAP
+*/
+
+static void image_loader_emit_done(ImageLoader *il)
+{
+       g_idle_add_full(il->idle_priority, image_loader_emit_done_cb, il, NULL);
+}
+
+static void image_loader_emit_error(ImageLoader *il)
+{
+       g_idle_add_full(il->idle_priority, image_loader_emit_error_cb, il, NULL);
+}
+
+static void image_loader_emit_percent(ImageLoader *il)
+{
+       g_idle_add_full(G_PRIORITY_HIGH, image_loader_emit_percent_cb, il, NULL);
+}
+
+static void image_loader_emit_size(ImageLoader *il)
+{
+       g_idle_add_full(G_PRIORITY_HIGH, image_loader_emit_size_cb, il, NULL);
+}
+
+static ImageLoaderAreaParam *image_loader_queue_area_ready(ImageLoader *il, GList **list, guint x, guint y, guint w, guint h)
+{
+       if (*list)
+               {
+               ImageLoaderAreaParam *prev_par = (*list)->data;
+               if (prev_par->x == x && prev_par->w == w &&
+                   prev_par->y + prev_par->h == y)
+                       {
+                       /* we can merge the notifications */
+                       prev_par->h += h;
+                       return NULL;
+                       }
+               if (prev_par->x == x && prev_par->w == w &&
+                   y + h == prev_par->y)
+                       {
+                       /* we can merge the notifications */
+                       prev_par->h += h;
+                       prev_par->y = y;
+                       return NULL;
+                       }
+               if (prev_par->y == y && prev_par->h == h &&
+                   prev_par->x + prev_par->w == x)
+                       {
+                       /* we can merge the notifications */
+                       prev_par->w += w;
+                       return NULL;
+                       }
+               if (prev_par->y == y && prev_par->h == h &&
+                   x + w == prev_par->x)
+                       {
+                       /* we can merge the notifications */
+                       prev_par->w += w;
+                       prev_par->x = x;
+                       return NULL;
+                       }
+               }
+       
+       ImageLoaderAreaParam *par = g_new0(ImageLoaderAreaParam, 1);
+       par->il = il;
+       par->x = x;
+       par->y = y;
+       par->w = w;
+       par->h = h;
+       
+       *list = g_list_prepend(*list, par);
+       return par;
+}
+
+/* this function expects that il->data_mutex is locked by caller */
+static void image_loader_emit_area_ready(ImageLoader *il, guint x, guint y, guint w, guint h)
+{
+       ImageLoaderAreaParam *par = image_loader_queue_area_ready(il, &il->area_param_list, x, y, w, h);
+       
+       if (par)
+               {
+               g_idle_add_full(G_PRIORITY_HIGH, image_loader_emit_area_ready_cb, par, NULL);
+               }
+}
+
+/**************************************************************************************/
+/* the following functions may be executed in separate thread */
+
+/* this function expects that il->data_mutex is locked by caller */
+static void image_loader_queue_delayed_area_ready(ImageLoader *il, guint x, guint y, guint w, guint h)
+{
+       image_loader_queue_area_ready(il, &il->area_param_delayed_list, x, y, w, h);
+}
+
+
+
+static gboolean image_loader_get_stopping(ImageLoader *il)
+{
+       gboolean ret;
+       if (!il) return FALSE;
+
+       g_mutex_lock(il->data_mutex);
+       ret = il->stopping;
+       g_mutex_unlock(il->data_mutex);
+
+       return ret;
+}
+
 
 static void image_loader_sync_pixbuf(ImageLoader *il)
 {
        GdkPixbuf *pb;
+       
+       g_mutex_lock(il->data_mutex);
+       
+       if (!il->loader)
+               {
+               g_mutex_unlock(il->data_mutex);
+               return;
+               }
 
-       if (!il->loader) return;
+       pb = il->backend.get_pixbuf(il->loader);
 
-       pb = gdk_pixbuf_loader_get_pixbuf(il->loader);
+       if (pb == il->pixbuf)
+               {
+               g_mutex_unlock(il->data_mutex);
+               return;
+               }
+
+       if (g_ascii_strcasecmp(".jps", il->fd->extension) == 0)
+               {
+               g_object_set_data(G_OBJECT(pb), "stereo_data", GINT_TO_POINTER(STEREO_PIXBUF_CROSS));
+               }
 
-       if (pb == il->pixbuf) return;
+       if (il->pixbuf) g_object_unref(il->pixbuf);
 
-       if (il->pixbuf) gdk_pixbuf_unref(il->pixbuf);
        il->pixbuf = pb;
-       if (il->pixbuf) gdk_pixbuf_ref(il->pixbuf);
+       if (il->pixbuf) g_object_ref(il->pixbuf);
+
+       g_mutex_unlock(il->data_mutex);
 }
 
-static void image_loader_area_cb(GdkPixbufLoader *loader,
+static void image_loader_area_updated_cb(gpointer loader,
                                 guint x, guint y, guint w, guint h,
                                 gpointer data)
 {
        ImageLoader *il = data;
 
-       if (il->func_area_ready)
+       if (!image_loader_get_pixbuf(il))
                {
-               if (!il->pixbuf)
+               image_loader_sync_pixbuf(il);
+               if (!image_loader_get_pixbuf(il))
                        {
-                       image_loader_sync_pixbuf(il);
-                       if (!il->pixbuf)
-                               {
-                               printf("critical: area_ready signal with NULL pixbuf (out of mem?)\n");
-                               }
+                       log_printf("critical: area_ready signal with NULL pixbuf (out of mem?)\n");
                        }
-               il->func_area_ready(il, x, y, w, h, il->data_area_ready);
                }
+
+       g_mutex_lock(il->data_mutex);
+       if (il->delay_area_ready)
+               image_loader_queue_delayed_area_ready(il, x, y, w, h);
+       else
+               image_loader_emit_area_ready(il, x, y, w, h);
+       
+       if (il->stopping) il->backend.abort(il->loader);
+
+       g_mutex_unlock(il->data_mutex);
+}
+
+static void image_loader_area_prepared_cb(gpointer loader, gpointer data)
+{
+       ImageLoader *il = data;
+       GdkPixbuf *pb;
+       guchar *pix;
+       size_t h, rs;
+       
+       /* a workaround for
+          http://bugzilla.gnome.org/show_bug.cgi?id=547669
+          http://bugzilla.gnome.org/show_bug.cgi?id=589334
+       */
+       gchar *format = il->backend.get_format_name(loader);
+       if (strcmp(format, "svg") == 0 ||
+           strcmp(format, "xpm") == 0)
+               {
+               g_free(format);
+               return;
+               }
+       
+       g_free(format);
+
+       pb = il->backend.get_pixbuf(loader);
+       
+       h = gdk_pixbuf_get_height(pb);
+       rs = gdk_pixbuf_get_rowstride(pb);
+       pix = gdk_pixbuf_get_pixels(pb);
+       
+       memset(pix, 0, rs * h); /*this should be faster than pixbuf_fill */
+
 }
 
-static void image_loader_size_cb(GdkPixbufLoader *loader,
+static void image_loader_size_cb(gpointer loader,
                                 gint width, gint height, gpointer data)
 {
        ImageLoader *il = data;
-       GdkPixbufFormat *format;
        gchar **mime_types;
-       gint scale = FALSE;
+       gboolean scale = FALSE;
        gint n;
 
-       if (il->requested_width < 1 || il->requested_height < 1) return;
-
-       format = gdk_pixbuf_loader_get_format(loader);
-       if (!format) return;
+       g_mutex_lock(il->data_mutex);
+       il->actual_width = width;
+       il->actual_height = height;
+       if (il->requested_width < 1 || il->requested_height < 1)
+               {
+               g_mutex_unlock(il->data_mutex);
+               image_loader_emit_size(il);
+               return;
+               }
+       g_mutex_unlock(il->data_mutex);
 
-       mime_types = gdk_pixbuf_format_get_mime_types(format);
+       mime_types = il->backend.get_format_mime_types(loader);
        n = 0;
        while (mime_types[n])
                {
@@ -81,12 +525,18 @@ static void image_loader_size_cb(GdkPixbufLoader *loader,
                n++;
                }
        g_strfreev(mime_types);
-       
-       if (!scale) return;
 
+       if (!scale)
+               {
+               image_loader_emit_size(il);
+               return;
+               }
+
+       g_mutex_lock(il->data_mutex);
+
+       gint nw, nh;
        if (width > il->requested_width || height > il->requested_height)
                {
-               gint nw, nh;
 
                if (((gdouble)il->requested_width / width) < ((gdouble)il->requested_height / height))
                        {
@@ -100,86 +550,89 @@ static void image_loader_size_cb(GdkPixbufLoader *loader,
                        nw = (gdouble)nh / height * width;
                        if (nw < 1) nw = 1;
                        }
-               
-               gdk_pixbuf_loader_set_size(loader, nw, nh);
+
+               il->actual_width = nw;
+               il->actual_height = nh;
+               il->backend.set_size(loader, nw, nh);
                il->shrunk = TRUE;
                }
+
+       g_mutex_unlock(il->data_mutex);
+       image_loader_emit_size(il);
 }
 
-static void image_loader_stop(ImageLoader *il)
+static void image_loader_stop_loader(ImageLoader *il)
 {
        if (!il) return;
 
-       if (il->idle_id != -1)
-               {
-               g_source_remove(il->idle_id);
-               il->idle_id = -1;
-               }
-
        if (il->loader)
                {
                /* some loaders do not have a pixbuf till close, order is important here */
-               gdk_pixbuf_loader_close(il->loader, NULL);
+               il->backend.close(il->loader, il->error ? NULL : &il->error); /* we are interested in the first error only */
                image_loader_sync_pixbuf(il);
-               g_object_unref(G_OBJECT(il->loader));
+               il->backend.free(il->loader);
                il->loader = NULL;
                }
-
-       if (il->load_fd != -1)
-               {
-               close(il->load_fd);
-               il->load_fd = -1;
-               }
-
+       g_mutex_lock(il->data_mutex);
        il->done = TRUE;
+       g_mutex_unlock(il->data_mutex);
 }
 
-static void image_loader_done(ImageLoader *il)
+static void image_loader_setup_loader(ImageLoader *il)
 {
-       image_loader_stop(il);
+       g_mutex_lock(il->data_mutex);
+#ifdef HAVE_JPEG
+       if (il->bytes_total >= 2 && il->mapped_file[0] == 0xff && il->mapped_file[1] == 0xd8)
+               {
+               DEBUG_1("Using custom jpeg loader");
+               image_loader_backend_set_jpeg(&il->backend);
+               }
+       else
+#endif
+#ifdef HAVE_TIFF
+       if (il->bytes_total >= 10 &&
+           (memcmp(il->mapped_file, "MM\0*", 4) == 0 ||
+            memcmp(il->mapped_file, "II*\0", 4) == 0))
+               {
+               DEBUG_1("Using custom tiff loader");
+               image_loader_backend_set_tiff(&il->backend);
+               }
+       else
+#endif
+               image_loader_backend_set_default(&il->backend);
 
-       if (il->func_done) il->func_done(il, il->data_done);
+       il->loader = il->backend.loader_new(image_loader_area_updated_cb, image_loader_size_cb, image_loader_area_prepared_cb, il);
+       g_mutex_unlock(il->data_mutex);
 }
 
-static gint image_loader_done_delay_cb(gpointer data)
-{
-       ImageLoader *il = data;
 
-       il->idle_done_id = -1;
-       image_loader_done(il);
-       return FALSE;
-}
-
-static void image_loader_done_delay(ImageLoader *il)
+static void image_loader_done(ImageLoader *il)
 {
-       if (il->idle_done_id == -1) il->idle_done_id = g_idle_add_full(il->idle_priority,
-                                                                      image_loader_done_delay_cb, il, NULL);
+       image_loader_stop_loader(il);
+
+       image_loader_emit_done(il);
 }
 
 static void image_loader_error(ImageLoader *il)
 {
-       image_loader_stop(il);
+       image_loader_stop_loader(il);
 
-       if (debug) printf("pixbuf_loader reported load error for: %s\n", il->path);
+       DEBUG_1("pixbuf_loader reported load error for: %s", il->fd->path);
 
-       if (il->func_error) il->func_error(il, il->data_error);
+       image_loader_emit_error(il);
 }
 
-static gint image_loader_idle_cb(gpointer data)
+static gboolean image_loader_continue(ImageLoader *il)
 {
-       ImageLoader *il = data;
-       guchar buf[IMAGE_LOADER_BUFFER_SIZE];
        gint b;
        gint c;
 
        if (!il) return FALSE;
 
-       if (il->idle_id == -1) return FALSE;
-
-       c = il->buffer_size ? il->buffer_size : 1;
-       while (c > 0)
+       c = il->idle_read_loop_count ? il->idle_read_loop_count : 1;
+       while (c > 0 && !image_loader_get_stopping(il))
                {
-               b = read(il->load_fd, &buf, sizeof(buf));
+               b = MIN(il->read_buffer_size, il->bytes_total - il->bytes_read);
 
                if (b == 0)
                        {
@@ -187,7 +640,7 @@ static gint image_loader_idle_cb(gpointer data)
                        return FALSE;
                        }
 
-               if (b < 0 || (b > 0 && !gdk_pixbuf_loader_write(il->loader, buf, b, NULL)))
+               if (b < 0 || (b > 0 && !il->backend.write(il->loader, il->mapped_file + il->bytes_read, b, &il->error)))
                        {
                        image_loader_error(il);
                        return FALSE;
@@ -198,275 +651,520 @@ static gint image_loader_idle_cb(gpointer data)
                c--;
                }
 
-       if (il->func_percent && il->bytes_total > 0)
+       if (il->bytes_total > 0)
                {
-               il->func_percent(il, (gdouble)il->bytes_read / il->bytes_total, il->data_percent);
+               image_loader_emit_percent(il);
                }
 
        return TRUE;
 }
 
-static gint image_loader_begin(ImageLoader *il)
+static gboolean image_loader_begin(ImageLoader *il)
 {
-       guchar buf[IMAGE_LOADER_BUFFER_SIZE];
-       int b;
-
-       if (!il->loader || il->pixbuf) return FALSE;
+       gssize b;
+       
+       if (il->pixbuf) return FALSE;
 
-       b = read(il->load_fd, &buf, sizeof(buf));
+       b = MIN(il->read_buffer_size, il->bytes_total - il->bytes_read);
+       if (b < 1) return FALSE;
 
-       if (b < 1)
+       image_loader_setup_loader(il);
+       
+       g_assert(il->bytes_read == 0);
+       if (il->backend.load) {
+               b = il->bytes_total;
+               if (!il->backend.load(il->loader, il->mapped_file, b, &il->error))
+                       {
+                       image_loader_stop_loader(il);
+                       return FALSE;
+                       }
+       }
+       else if (!il->backend.write(il->loader, il->mapped_file, b, &il->error))
                {
-               image_loader_stop(il);
+               image_loader_stop_loader(il);
                return FALSE;
                }
 
-       if (gdk_pixbuf_loader_write(il->loader, buf, b, NULL))
-               {
-               il->bytes_read += b;
+       il->bytes_read += b;
 
-               if (b < sizeof(buf))
+       /* read until size is known */
+       while (il->loader && !il->backend.get_pixbuf(il->loader) && b > 0 && !image_loader_get_stopping(il))
+               {
+               b = MIN(il->read_buffer_size, il->bytes_total - il->bytes_read);
+               if (b < 0 || (b > 0 && !il->backend.write(il->loader, il->mapped_file + il->bytes_read, b, &il->error)))
                        {
-                       /* end of file already */
+                       image_loader_stop_loader(il);
+                       return FALSE;
+                       }
+               il->bytes_read += b;
+               }
+       if (!il->pixbuf) image_loader_sync_pixbuf(il);
 
-                       image_loader_stop(il);
+       if (il->bytes_read == il->bytes_total || b < 1)
+               {
+               /* done, handle (broken) loaders that do not have pixbuf till close */
+               image_loader_stop_loader(il);
 
-                       if (!il->pixbuf) return FALSE;
+               if (!il->pixbuf) return FALSE;
 
-                       image_loader_done_delay(il);
-                       return TRUE;
-                       }
-               else
-                       {
-                       /* larger file */
-
-                       /* read until size is known */
-                       while(il->loader && !gdk_pixbuf_loader_get_pixbuf(il->loader) && b > 0)
-                               {
-                               b = read(il->load_fd, &buf, sizeof(buf));
-                               if (b < 0 || (b > 0 && !gdk_pixbuf_loader_write(il->loader, buf, b, NULL)))
-                                       {
-                                       image_loader_stop(il);
-                                       return FALSE;
-                                       }
-                               il->bytes_read += b;
-                               }
-                       if (!il->pixbuf) image_loader_sync_pixbuf(il);
-
-                       if (il->bytes_read == il->bytes_total || b < sizeof(buf))
-                               {
-                               /* done, handle (broken) loaders that do not have pixbuf till close */
-                               image_loader_stop(il);
-
-                               if (!il->pixbuf) return FALSE;
-
-                               image_loader_done_delay(il);
-                               return TRUE;
-                               }
-
-                       if (!il->pixbuf)
-                               {
-                               image_loader_stop(il);
-                               return FALSE;
-                               }
-
-                       /* finally, progressive loading :) */
-                       il->idle_id = g_idle_add_full(il->idle_priority, image_loader_idle_cb, il, NULL);
-                       return TRUE;
-                       }
+               image_loader_done(il);
+               return TRUE;
                }
-       else
+
+       if (!il->pixbuf)
                {
-               image_loader_stop(il);
+               image_loader_stop_loader(il);
                return FALSE;
                }
 
        return TRUE;
 }
 
-static gint image_loader_setup(ImageLoader *il)
+/**************************************************************************************/
+/* the following functions are always executed in the main thread */
+
+
+static gboolean image_loader_setup_source(ImageLoader *il)
 {
        struct stat st;
        gchar *pathl;
 
-       if (!il || il->load_fd != -1 || il->loader) return FALSE;
+       if (!il || il->loader || il->mapped_file) return FALSE;
 
-       pathl = path_from_utf8(il->path);
-       il->load_fd = open(pathl, O_RDONLY | O_NONBLOCK);
-       g_free(pathl);
-       if (il->load_fd == -1) return FALSE;
+       il->mapped_file = NULL;
 
-       if (fstat(il->load_fd, &st) == 0)
+       if (il->fd)
                {
-               il->bytes_total = st.st_size;
+               ExifData *exif = exif_read_fd(il->fd);
+
+               if (options->thumbnails.use_exif)
+                       il->mapped_file = exif_get_preview(exif, (guint *)&il->bytes_total, il->requested_width, il->requested_height);
+               else
+                       il->mapped_file = exif_get_preview(exif, (guint *)&il->bytes_total, 0, 0); /* get the largest available preview image or NULL for normal images*/
+
+               if (il->mapped_file)
+                       {
+                       il->preview = TRUE;
+                       DEBUG_1("Usable reduced size (preview) image loaded from file %s", il->fd->path);
+                       }
+               exif_free_fd(il->fd, exif);
                }
 
-       il->loader = gdk_pixbuf_loader_new();
-       g_signal_connect(G_OBJECT(il->loader), "area_updated",
-                        G_CALLBACK(image_loader_area_cb), il);
-       g_signal_connect(G_OBJECT(il->loader), "size_prepared",
-                        G_CALLBACK(image_loader_size_cb), il);
+       
+       if (!il->mapped_file)
+               {
+               /* normal file */
+               gint load_fd;
+       
+               pathl = path_from_utf8(il->fd->path);
+               load_fd = open(pathl, O_RDONLY | O_NONBLOCK);
+               g_free(pathl);
+               if (load_fd == -1) return FALSE;
 
-       il->shrunk = FALSE;
+               if (fstat(load_fd, &st) == 0)
+                       {
+                       il->bytes_total = st.st_size;
+                       }
+               else
+                       {
+                       close(load_fd);
+                       return FALSE;
+                       }
+               
+               il->mapped_file = mmap(0, il->bytes_total, PROT_READ|PROT_WRITE, MAP_PRIVATE, load_fd, 0);
+               close(load_fd);
+               if (il->mapped_file == MAP_FAILED)
+                       {
+                       il->mapped_file = 0;
+                       return FALSE;
+                       }
+               il->preview = FALSE;
+               }
+               
+       return TRUE;
+}
 
-       return image_loader_begin(il);
+static void image_loader_stop_source(ImageLoader *il)
+{
+       if (!il) return;
+       
+       if (il->mapped_file)
+               {
+               if (il->preview)
+                       {
+                       exif_free_preview(il->mapped_file);
+                       }
+               else
+                       {
+                       munmap(il->mapped_file, il->bytes_total);
+                       }
+               il->mapped_file = NULL;
+               }
 }
 
-ImageLoader *image_loader_new(const gchar *path)
+static void image_loader_stop(ImageLoader *il)
 {
-       ImageLoader *il;
+       if (!il) return;
+
+       if (il->idle_id)
+               {
+               g_source_remove(il->idle_id);
+               il->idle_id = 0;
+               }
+               
+       if (il->thread)
+               {
+               /* stop loader in the other thread */
+               g_mutex_lock(il->data_mutex);
+               il->stopping = TRUE;
+               while (!il->can_destroy) g_cond_wait(il->can_destroy_cond, il->data_mutex);
+               g_mutex_unlock(il->data_mutex);
+               }
 
-       if (!path) return NULL;
+       image_loader_stop_loader(il);
+       image_loader_stop_source(il);
+       
+}
 
-       il = g_new0(ImageLoader, 1);
-       if (path) il->path = g_strdup(path);
-       il->pixbuf = NULL;
-       il->idle_id = -1;
-       il->idle_priority = G_PRIORITY_DEFAULT_IDLE;
-       il->done = FALSE;
-       il->loader = NULL;
-       il->load_fd = -1;
+void image_loader_delay_area_ready(ImageLoader *il, gboolean enable)
+{
+       g_mutex_lock(il->data_mutex);
+       il->delay_area_ready = enable;
+       if (!enable)
+               {
+               /* send delayed */
+               GList *list, *work;
+               list = g_list_reverse(il->area_param_delayed_list);
+               il->area_param_delayed_list = NULL;
+               g_mutex_unlock(il->data_mutex);
 
-       il->bytes_read = 0;
-       il->bytes_total = 0;
+               work = list;
+
+               while (work)
+                       {
+                       ImageLoaderAreaParam *par = work->data;
+                       work = work->next;
+                       
+                       g_signal_emit(il, signals[SIGNAL_AREA_READY], 0, par->x, par->y, par->w, par->h);
+                       g_free(par);
+                       }
+               g_list_free(list);
+               }
+       else
+               {
+               /* just unlock */
+               g_mutex_unlock(il->data_mutex);
+               }
+}
 
-       il->idle_done_id = -1;
 
-       il->buffer_size = IMAGE_LOADER_BUFFER_DEFAULT_COUNT;
+/**************************************************************************************/
+/* execution via idle calls */
 
-       il->requested_width = 0;
-       il->requested_height = 0;
-       il->shrunk = FALSE;
+static gboolean image_loader_idle_cb(gpointer data)
+{
+       gboolean ret = FALSE;
+       ImageLoader *il = data;
 
-       return il;
+       if (il->idle_id)
+               {
+               ret = image_loader_continue(il);
+               }
+       
+       if (!ret)
+               {
+               image_loader_stop_source(il);
+               }
+       
+       return ret;
 }
 
-void image_loader_free(ImageLoader *il)
+
+static gboolean image_loader_start_idle(ImageLoader *il)
 {
-       if (!il) return;
+       gboolean ret;
+       
+       if (!il) return FALSE;
 
-       image_loader_stop(il);
-       if (il->idle_done_id != -1) g_source_remove(il->idle_done_id);
-       if (il->pixbuf) gdk_pixbuf_unref(il->pixbuf);
-       g_free(il->path);
-       g_free(il);
+       if (!il->fd) return FALSE;
+
+       if (!image_loader_setup_source(il)) return FALSE;
+       
+       ret = image_loader_begin(il);
+
+       if (ret && !il->done) il->idle_id = g_idle_add_full(il->idle_priority, image_loader_idle_cb, il, NULL);
+       return ret;
 }
 
-/* don't forget to gdk_pixbuf_ref() it if you want to use it after image_loader_free() */
-GdkPixbuf *image_loader_get_pixbuf(ImageLoader *il)
+/**************************************************************************************/
+/* execution via thread */
+
+#ifdef HAVE_GTHREAD
+static GThreadPool *image_loader_thread_pool = NULL;
+
+static GCond *image_loader_prio_cond = NULL;
+static GMutex *image_loader_prio_mutex = NULL;
+static gint image_loader_prio_num = 0;
+
+
+static void image_loader_thread_enter_high(void)
 {
-       if (!il) return NULL;
+       g_mutex_lock(image_loader_prio_mutex);
+       image_loader_prio_num++;
+       g_mutex_unlock(image_loader_prio_mutex);
+}
 
-       return il->pixbuf;
+static void image_loader_thread_leave_high(void)
+{
+       g_mutex_lock(image_loader_prio_mutex);
+       image_loader_prio_num--;
+       if (image_loader_prio_num == 0) g_cond_broadcast(image_loader_prio_cond); /* wake up all low prio threads */
+       g_mutex_unlock(image_loader_prio_mutex);
 }
 
-gchar *image_loader_get_format(ImageLoader *il)
+static void image_loader_thread_wait_high(void)
 {
-       GdkPixbufFormat *format;
-       gchar **mimev;
-       gchar *mime;
+       g_mutex_lock(image_loader_prio_mutex);
+       while (image_loader_prio_num)
+               {
+               g_cond_wait(image_loader_prio_cond, image_loader_prio_mutex);
+               }
 
-       if (!il || !il->loader) return NULL;
+       g_mutex_unlock(image_loader_prio_mutex);
+}
 
-       format = gdk_pixbuf_loader_get_format(il->loader);
-       if (!format) return NULL;
 
-       mimev = gdk_pixbuf_format_get_mime_types(format);
-       if (!mimev) return NULL;
+static void image_loader_thread_run(gpointer data, gpointer user_data)
+{
+       ImageLoader *il = data;
+       gboolean cont;
+       gboolean err;
+       
+       if (il->idle_priority > G_PRIORITY_DEFAULT_IDLE)
+               {
+               /* low prio, wait untill high prio tasks finishes */
+               image_loader_thread_wait_high();
+               }
+       else
+               {
+               /* high prio */
+               image_loader_thread_enter_high();
+               }
+       
+       err = !image_loader_begin(il);
+       
+       if (err)
+               {
+               /*
+               loader failed, we have to send signal
+               (idle mode returns the image_loader_begin return value directly)
+               (success is always reported indirectly from image_loader_begin)
+               */
+               image_loader_emit_error(il);
+               }
+       
+       cont = !err;
+       
+       while (cont && !image_loader_get_is_done(il) && !image_loader_get_stopping(il))
+               {
+               if (il->idle_priority > G_PRIORITY_DEFAULT_IDLE)
+                       {
+                       /* low prio, wait untill high prio tasks finishes */
+                       image_loader_thread_wait_high();
+                       }
+               cont = image_loader_continue(il);
+               }
+       image_loader_stop_loader(il);
 
-       /* return first member of mimev, as GdkPixbufLoader has no way to tell us which exact one ? */
-       mime = g_strdup(mimev[0]);
-       g_strfreev(mimev);
+       if (il->idle_priority <= G_PRIORITY_DEFAULT_IDLE)
+               {
+               /* high prio */
+               image_loader_thread_leave_high();
+               }
+
+       g_mutex_lock(il->data_mutex);
+       il->can_destroy = TRUE;
+       g_cond_signal(il->can_destroy_cond);
+       g_mutex_unlock(il->data_mutex);
 
-       return mime;
 }
 
-void image_loader_set_area_ready_func(ImageLoader *il,
-                                     void (*func_area_ready)(ImageLoader *, guint, guint, guint, guint, gpointer),
-                                     gpointer data_area_ready)
+
+static gboolean image_loader_start_thread(ImageLoader *il)
 {
-       if (!il) return;
+       if (!il) return FALSE;
+
+       if (!il->fd) return FALSE;
+
+       il->thread = TRUE;
+       
+       if (!image_loader_setup_source(il)) return FALSE;
+
+        if (!image_loader_thread_pool)
+               {
+               image_loader_thread_pool = g_thread_pool_new(image_loader_thread_run, NULL, -1, FALSE, NULL);
+               image_loader_prio_cond = g_cond_new();
+               image_loader_prio_mutex = g_mutex_new();
+               }
+
+       il->can_destroy = FALSE; /* ImageLoader can't be freed until image_loader_thread_run finishes */
 
-       il->func_area_ready = func_area_ready;
-       il->data_area_ready = data_area_ready;
+       g_thread_pool_push(image_loader_thread_pool, il, NULL);
+       DEBUG_1("Thread pool num threads: %d", g_thread_pool_get_num_threads(image_loader_thread_pool));
+               
+       return TRUE;
 }
+#endif /* HAVE_GTHREAD */
+
+
+/**************************************************************************************/
+/* public interface */
+
 
-void image_loader_set_error_func(ImageLoader *il,
-                                void (*func_error)(ImageLoader *, gpointer),
-                                gpointer data_error)
+gboolean image_loader_start(ImageLoader *il)
 {
-       if (!il) return;
+       if (!il) return FALSE;
+
+       if (!il->fd) return FALSE;
+
+#ifdef HAVE_GTHREAD
+       return image_loader_start_thread(il);
+#else
+       return image_loader_start_idle(il);
+#endif
+}
+
 
-       il->func_error = func_error;
-       il->data_error = data_error;
+/* don't forget to gdk_pixbuf_ref() it if you want to use it after image_loader_free() */
+GdkPixbuf *image_loader_get_pixbuf(ImageLoader *il)
+{
+       GdkPixbuf *ret;
+       if (!il) return NULL;
+       
+       g_mutex_lock(il->data_mutex);
+       ret = il->pixbuf;
+       g_mutex_unlock(il->data_mutex);
+       return ret;
 }
 
-void image_loader_set_percent_func(ImageLoader *il,
-                                  void (*func_percent)(ImageLoader *, gdouble, gpointer),
-                                  gpointer data_percent)
+gchar *image_loader_get_format(ImageLoader *il)
 {
-       if (!il) return;
+       gchar **mimev;
+       gchar *mime;
+
+       if (!il || !il->loader) return NULL;
+
+       mimev = il->backend.get_format_mime_types(il->loader);
+       if (!mimev) return NULL;
 
-       il->func_percent = func_percent;
-       il->data_percent = data_percent;
+       /* return first member of mimev, as GdkPixbufLoader has no way to tell us which exact one ? */
+       mime = g_strdup(mimev[0]);
+       g_strfreev(mimev);
+
+       return mime;
 }
 
 void image_loader_set_requested_size(ImageLoader *il, gint width, gint height)
 {
        if (!il) return;
 
+       g_mutex_lock(il->data_mutex);
        il->requested_width = width;
        il->requested_height = height;
+       g_mutex_unlock(il->data_mutex);
 }
 
-void image_loader_set_buffer_size(ImageLoader *il, guint size)
+void image_loader_set_buffer_size(ImageLoader *il, guint count)
 {
        if (!il) return;
 
-       il->buffer_size = size ? size : 1;
+       g_mutex_lock(il->data_mutex);
+       il->idle_read_loop_count = count ? count : 1;
+       g_mutex_unlock(il->data_mutex);
 }
 
 void image_loader_set_priority(ImageLoader *il, gint priority)
 {
        if (!il) return;
 
+       if (il->thread) return; /* can't change prio if the thread already runs */
        il->idle_priority = priority;
 }
 
-gint image_loader_start(ImageLoader *il, void (*func_done)(ImageLoader *, gpointer), gpointer data_done)
+
+gdouble image_loader_get_percent(ImageLoader *il)
 {
-       if (!il) return FALSE;
+       gdouble ret;
+       if (!il) return 0.0;
+       
+       g_mutex_lock(il->data_mutex);
+       if (il->bytes_total == 0)
+               {
+               ret = 0.0;
+               }
+       else
+               {
+               ret = (gdouble)il->bytes_read / il->bytes_total;
+               }
+       g_mutex_unlock(il->data_mutex);
+       return ret;
+}
 
-       if (!il->path) return FALSE;
+gboolean image_loader_get_is_done(ImageLoader *il)
+{
+       gboolean ret;
+       if (!il) return FALSE;
 
-       il->func_done = func_done;
-       il->data_done = data_done;
+       g_mutex_lock(il->data_mutex);
+       ret = il->done;
+       g_mutex_unlock(il->data_mutex);
 
-       return image_loader_setup(il);
+       return ret;
 }
 
-gdouble image_loader_get_percent(ImageLoader *il)
+FileData *image_loader_get_fd(ImageLoader *il)
 {
-       if (!il || il->bytes_total == 0) return 0.0;
+       FileData *ret;
+       if (!il) return NULL;
+
+       g_mutex_lock(il->data_mutex);
+       ret = il->fd;
+       g_mutex_unlock(il->data_mutex);
 
-       return (gdouble)il->bytes_read / il->bytes_total;
+       return ret;
 }
 
-gint image_loader_get_is_done(ImageLoader *il)
+gboolean image_loader_get_shrunk(ImageLoader *il)
 {
+       gboolean ret;
        if (!il) return FALSE;
 
-       return il->done;
+       g_mutex_lock(il->data_mutex);
+       ret = il->shrunk;
+       g_mutex_unlock(il->data_mutex);
+       return ret;
 }
 
-gint image_load_dimensions(const gchar *path, gint *width, gint *height)
+const gchar *image_loader_get_error(ImageLoader *il)
+{
+       const gchar *ret = NULL;
+       if (!il) return NULL;
+       g_mutex_lock(il->data_mutex);
+       if (il->error) ret = il->error->message;
+       g_mutex_unlock(il->data_mutex);
+       return ret;
+}
+
+
+/* FIXME - this can be rather slow and blocks until the size is known */
+gboolean image_load_dimensions(FileData *fd, gint *width, gint *height)
 {
        ImageLoader *il;
-       gint success;
+       gboolean success;
 
-       il = image_loader_new(path);
+       il = image_loader_new(fd);
 
-       success = image_loader_start(il, NULL, NULL);
+       success = image_loader_start_idle(il);
 
        if (success && il->pixbuf)
                {
@@ -483,4 +1181,4 @@ gint image_load_dimensions(const gchar *path, gint *width, gint *height)
 
        return success;
 }
-
+/* vim: set shiftwidth=8 softtabstop=0 cindent cinoptions={1s: */