workaround for xpm loader
[geeqie.git] / src / image-load.c
1 /*
2  * Geeqie
3  * (C) 2004 John Ellis
4  * Copyright (C) 2008 - 2009 The Geeqie Team
5  *
6  * Author: John Ellis
7  *
8  * This software is released under the GNU General Public License (GNU GPL).
9  * Please read the included file COPYING for more information.
10  * This software comes with no warranty of any kind, use at your own risk!
11  */
12
13
14 #include "main.h"
15 #include "image-load.h"
16
17 #include "exif.h"
18 #include "filedata.h"
19 #include "ui_fileops.h"
20 #include "gq-marshal.h"
21
22 #include <fcntl.h>
23 #include <sys/mman.h>
24
25 #define IMAGE_LOADER_READ_BUFFER_SIZE_DEFAULT   4096
26 #define IMAGE_LOADER_IDLE_READ_LOOP_COUNT_DEFAULT       1
27
28
29 /**************************************************************************************/
30 /* image loader class */
31
32
33 enum {
34         SIGNAL_AREA_READY = 0,
35         SIGNAL_ERROR,
36         SIGNAL_DONE,
37         SIGNAL_PERCENT,
38         SIGNAL_COUNT
39 };
40
41 static guint signals[SIGNAL_COUNT] = { 0 };
42
43 static void image_loader_init(GTypeInstance *instance, gpointer g_class);
44 static void image_loader_class_init(ImageLoaderClass *class);
45 static void image_loader_finalize(GObject *object);
46 static void image_loader_stop(ImageLoader *il);
47
48 GType image_loader_get_type(void)
49 {
50         static GType type = 0;
51         if (type == 0) 
52                 {
53                 static const GTypeInfo info = {
54                         sizeof(ImageLoaderClass),
55                         NULL,   /* base_init */
56                         NULL,   /* base_finalize */
57                         (GClassInitFunc)image_loader_class_init, /* class_init */
58                         NULL,   /* class_finalize */
59                         NULL,   /* class_data */
60                         sizeof(ImageLoader),
61                         0,      /* n_preallocs */
62                         (GInstanceInitFunc)image_loader_init, /* instance_init */
63                         NULL    /* value_table */
64                         };
65                 type = g_type_register_static(G_TYPE_OBJECT, "ImageLoaderType", &info, 0);
66                 }
67         return type;
68 }
69
70 static void image_loader_init(GTypeInstance *instance, gpointer g_class)
71 {
72         ImageLoader *il = (ImageLoader *)instance;
73
74         il->pixbuf = NULL;
75         il->idle_id = 0;
76         il->idle_priority = G_PRIORITY_DEFAULT_IDLE;
77         il->done = FALSE;
78         il->loader = NULL;
79
80         il->bytes_read = 0;
81         il->bytes_total = 0;
82
83         il->idle_done_id = 0;
84
85         il->idle_read_loop_count = IMAGE_LOADER_IDLE_READ_LOOP_COUNT_DEFAULT;
86         il->read_buffer_size = IMAGE_LOADER_READ_BUFFER_SIZE_DEFAULT;
87         il->mapped_file = NULL;
88
89         il->requested_width = 0;
90         il->requested_height = 0;
91         il->shrunk = FALSE;
92
93         il->can_destroy = TRUE;
94
95 #ifdef HAVE_GTHREAD
96         il->data_mutex = g_mutex_new();
97         il->can_destroy_cond = g_cond_new();
98 #endif
99         DEBUG_1("new image loader %p, bufsize=%" G_GSIZE_FORMAT " idle_loop=%u", il, il->read_buffer_size, il->idle_read_loop_count);
100 }
101
102 static void image_loader_class_init(ImageLoaderClass *class)
103 {
104         GObjectClass *gobject_class = G_OBJECT_CLASS (class);
105
106 //      gobject_class->set_property = image_loader_set_property;
107 //      gobject_class->get_property = image_loader_get_property;
108
109         gobject_class->finalize = image_loader_finalize;
110
111
112         signals[SIGNAL_AREA_READY] =
113                 g_signal_new("area_ready",
114                              G_OBJECT_CLASS_TYPE(gobject_class),
115                              G_SIGNAL_RUN_LAST,
116                              G_STRUCT_OFFSET(ImageLoaderClass, area_ready),
117                              NULL, NULL,
118                              gq_marshal_VOID__INT_INT_INT_INT,
119                              G_TYPE_NONE, 4,
120                              G_TYPE_INT,
121                              G_TYPE_INT,
122                              G_TYPE_INT,
123                              G_TYPE_INT);
124
125         signals[SIGNAL_ERROR] =
126                 g_signal_new("error",
127                              G_OBJECT_CLASS_TYPE(gobject_class),
128                              G_SIGNAL_RUN_LAST,
129                              G_STRUCT_OFFSET(ImageLoaderClass, error),
130                              NULL, NULL,
131                              g_cclosure_marshal_VOID__VOID,
132                              G_TYPE_NONE, 0);
133
134         signals[SIGNAL_DONE] =
135                 g_signal_new("done",
136                              G_OBJECT_CLASS_TYPE(gobject_class),
137                              G_SIGNAL_RUN_LAST,
138                              G_STRUCT_OFFSET(ImageLoaderClass, done),
139                              NULL, NULL,
140                              g_cclosure_marshal_VOID__VOID,
141                              G_TYPE_NONE, 0);
142
143         signals[SIGNAL_PERCENT] =
144                 g_signal_new("percent",
145                              G_OBJECT_CLASS_TYPE(gobject_class),
146                              G_SIGNAL_RUN_LAST,
147                              G_STRUCT_OFFSET(ImageLoaderClass, percent),
148                              NULL, NULL,
149                              g_cclosure_marshal_VOID__DOUBLE,
150                              G_TYPE_NONE, 1,
151                              G_TYPE_DOUBLE);
152
153 }
154
155 static void image_loader_finalize(GObject *object)
156 {
157         ImageLoader *il = (ImageLoader *)object;
158
159         image_loader_stop(il);
160
161         if (il->error) DEBUG_1("%s", image_loader_get_error(il));
162
163         DEBUG_1("freeing image loader %p bytes_read=%" G_GSIZE_FORMAT, il, il->bytes_read);
164
165         if (il->idle_done_id)
166                 {
167                 g_source_remove(il->idle_done_id);
168                 il->idle_done_id = 0;
169                 }
170
171         while (g_source_remove_by_user_data(il)) 
172                 {
173                 DEBUG_2("pending signals detected");
174                 }
175         
176         while (il->area_param_list) 
177                 {
178                 DEBUG_1("pending area_ready signals detected");
179                 while (g_source_remove_by_user_data(il->area_param_list->data)) {}
180                 g_free(il->area_param_list->data);
181                 il->area_param_list = g_list_delete_link(il->area_param_list, il->area_param_list);
182                 }
183
184         while (il->area_param_delayed_list) 
185                 {
186                 g_free(il->area_param_delayed_list->data);
187                 il->area_param_delayed_list = g_list_delete_link(il->area_param_delayed_list, il->area_param_delayed_list);
188                 }
189
190         if (il->pixbuf) g_object_unref(il->pixbuf);
191         
192         if (il->error) g_error_free(il->error);
193
194         file_data_unref(il->fd);
195 #ifdef HAVE_GTHREAD
196         g_mutex_free(il->data_mutex);
197         g_cond_free(il->can_destroy_cond);
198 #endif
199 }
200
201 void image_loader_free(ImageLoader *il)
202 {
203         if (!il) return;
204         g_object_unref(G_OBJECT(il));
205 }
206
207
208 ImageLoader *image_loader_new(FileData *fd)
209 {
210         ImageLoader *il;
211
212         if (!fd) return NULL;
213
214         il = (ImageLoader *) g_object_new(TYPE_IMAGE_LOADER, NULL);
215         
216         il->fd = file_data_ref(fd);
217         
218         return il;
219 }
220
221 /**************************************************************************************/
222 /* send signals via idle calbacks - the callback are executed in the main thread */
223
224 typedef struct _ImageLoaderAreaParam ImageLoaderAreaParam;
225 struct _ImageLoaderAreaParam {
226         ImageLoader *il;
227         guint x;
228         guint y;
229         guint w;
230         guint h;
231 };
232
233
234 static gboolean image_loader_emit_area_ready_cb(gpointer data)
235 {
236         ImageLoaderAreaParam *par = data;
237         ImageLoader *il = par->il;
238         g_signal_emit(il, signals[SIGNAL_AREA_READY], 0, par->x, par->y, par->w, par->h);
239         g_mutex_lock(il->data_mutex);
240         il->area_param_list = g_list_remove(il->area_param_list, par);
241         g_free(par);
242         g_mutex_unlock(il->data_mutex);
243         
244         return FALSE;
245 }
246
247 static gboolean image_loader_emit_done_cb(gpointer data)
248 {
249         ImageLoader *il = data;
250         g_signal_emit(il, signals[SIGNAL_DONE], 0);
251         return FALSE;
252 }
253
254 static gboolean image_loader_emit_error_cb(gpointer data)
255 {
256         ImageLoader *il = data;
257         g_signal_emit(il, signals[SIGNAL_ERROR], 0);
258         return FALSE;
259 }
260
261 static gboolean image_loader_emit_percent_cb(gpointer data)
262 {
263         ImageLoader *il = data;
264         g_signal_emit(il, signals[SIGNAL_PERCENT], 0, image_loader_get_percent(il));
265         return FALSE;
266 }
267
268 /* DONE and ERROR are emited only once, thus they can have normal priority
269    PERCENT and AREA_READY should be processed ASAP
270 */
271
272 static void image_loader_emit_done(ImageLoader *il)
273 {
274         g_idle_add_full(il->idle_priority, image_loader_emit_done_cb, il, NULL);
275 }
276
277 static void image_loader_emit_error(ImageLoader *il)
278 {
279         g_idle_add_full(il->idle_priority, image_loader_emit_error_cb, il, NULL);
280 }
281
282 static void image_loader_emit_percent(ImageLoader *il)
283 {
284         g_idle_add_full(G_PRIORITY_HIGH, image_loader_emit_percent_cb, il, NULL);
285 }
286
287 /* this function expects that il->data_mutex is locked by caller */
288 static void image_loader_emit_area_ready(ImageLoader *il, guint x, guint y, guint w, guint h)
289 {
290         ImageLoaderAreaParam *par = g_new0(ImageLoaderAreaParam, 1);
291         par->il = il;
292         par->x = x;
293         par->y = y;
294         par->w = w;
295         par->h = h;
296         
297         il->area_param_list = g_list_prepend(il->area_param_list, par);
298         
299         g_idle_add_full(G_PRIORITY_HIGH, image_loader_emit_area_ready_cb, par, NULL);
300 }
301
302 /**************************************************************************************/
303 /* the following functions may be executed in separate thread */
304
305 /* this function expects that il->data_mutex is locked by caller */
306 static void image_loader_queue_delayed_erea_ready(ImageLoader *il, guint x, guint y, guint w, guint h)
307 {
308         ImageLoaderAreaParam *par = g_new0(ImageLoaderAreaParam, 1);
309         par->il = il;
310         par->x = x;
311         par->y = y;
312         par->w = w;
313         par->h = h;
314         
315         il->area_param_delayed_list = g_list_prepend(il->area_param_delayed_list, par);
316 }
317
318
319
320 static gboolean image_loader_get_stopping(ImageLoader *il)
321 {
322         gboolean ret;
323         if (!il) return FALSE;
324
325         g_mutex_lock(il->data_mutex);
326         ret = il->stopping;
327         g_mutex_unlock(il->data_mutex);
328
329         return ret;
330 }
331
332
333 static void image_loader_sync_pixbuf(ImageLoader *il)
334 {
335         GdkPixbuf *pb;
336         
337         g_mutex_lock(il->data_mutex);
338         
339         if (!il->loader) 
340                 {
341                 g_mutex_unlock(il->data_mutex);
342                 return;
343                 }
344
345         pb = gdk_pixbuf_loader_get_pixbuf(il->loader);
346
347         if (pb == il->pixbuf)
348                 {
349                 g_mutex_unlock(il->data_mutex);
350                 return;
351                 }
352
353         if (il->pixbuf) g_object_unref(il->pixbuf);
354
355         il->pixbuf = pb;
356         if (il->pixbuf) g_object_ref(il->pixbuf);
357
358         g_mutex_unlock(il->data_mutex);
359 }
360
361 static void image_loader_area_updated_cb(GdkPixbufLoader *loader,
362                                  guint x, guint y, guint w, guint h,
363                                  gpointer data)
364 {
365         ImageLoader *il = data;
366
367         if (!image_loader_get_pixbuf(il))
368                 {
369                 image_loader_sync_pixbuf(il);
370                 if (!image_loader_get_pixbuf(il))
371                         {
372                         log_printf("critical: area_ready signal with NULL pixbuf (out of mem?)\n");
373                         }
374                 }
375
376         g_mutex_lock(il->data_mutex);
377         if (il->delay_area_ready)
378                 image_loader_queue_delayed_erea_ready(il, x, y, w, h);
379         else
380                 image_loader_emit_area_ready(il, x, y, w, h);
381         g_mutex_unlock(il->data_mutex);
382 }
383
384 static void image_loader_area_prepared_cb(GdkPixbufLoader *loader, gpointer data)
385 {
386         GdkPixbuf *pb;
387         guchar *pix;
388         size_t h, rs;
389         
390         /* a workaround for 
391            http://bugzilla.gnome.org/show_bug.cgi?id=547669 
392            http://bugzilla.gnome.org/show_bug.cgi?id=589334
393         */
394         gchar *format = gdk_pixbuf_format_get_name(gdk_pixbuf_loader_get_format(loader));
395         if (strcmp(format, "svg") == 0 ||
396             strcmp(format, "xpm") == 0)
397                 {
398                 g_free(format);
399                 return;
400                 }
401         
402         g_free(format);
403
404         pb = gdk_pixbuf_loader_get_pixbuf(loader);
405         
406         h = gdk_pixbuf_get_height(pb);
407         rs = gdk_pixbuf_get_rowstride(pb);
408         pix = gdk_pixbuf_get_pixels(pb);
409         
410         memset(pix, 0, rs * h); /*this should be faster than pixbuf_fill */
411
412 }
413
414 static void image_loader_size_cb(GdkPixbufLoader *loader,
415                                  gint width, gint height, gpointer data)
416 {
417         ImageLoader *il = data;
418         GdkPixbufFormat *format;
419         gchar **mime_types;
420         gboolean scale = FALSE;
421         gint n;
422
423         g_mutex_lock(il->data_mutex);
424         if (il->requested_width < 1 || il->requested_height < 1) 
425                 {
426                 g_mutex_unlock(il->data_mutex);
427                 return;
428                 }
429         g_mutex_unlock(il->data_mutex);
430
431         format = gdk_pixbuf_loader_get_format(loader);
432         if (!format) return;
433
434         mime_types = gdk_pixbuf_format_get_mime_types(format);
435         n = 0;
436         while (mime_types[n])
437                 {
438                 if (strstr(mime_types[n], "jpeg")) scale = TRUE;
439                 n++;
440                 }
441         g_strfreev(mime_types);
442
443         if (!scale) return;
444
445         g_mutex_lock(il->data_mutex);
446
447         if (width > il->requested_width || height > il->requested_height)
448                 {
449                 gint nw, nh;
450
451                 if (((gdouble)il->requested_width / width) < ((gdouble)il->requested_height / height))
452                         {
453                         nw = il->requested_width;
454                         nh = (gdouble)nw / width * height;
455                         if (nh < 1) nh = 1;
456                         }
457                 else
458                         {
459                         nh = il->requested_height;
460                         nw = (gdouble)nh / height * width;
461                         if (nw < 1) nw = 1;
462                         }
463
464                 gdk_pixbuf_loader_set_size(loader, nw, nh);
465                 il->shrunk = TRUE;
466                 }
467         g_mutex_unlock(il->data_mutex);
468
469 }
470
471 static void image_loader_stop_loader(ImageLoader *il)
472 {
473         if (!il) return;
474
475         if (il->loader)
476                 {
477                 /* some loaders do not have a pixbuf till close, order is important here */
478                 gdk_pixbuf_loader_close(il->loader, il->error ? NULL : &il->error); /* we are interested in the first error only */
479                 image_loader_sync_pixbuf(il);
480                 g_object_unref(G_OBJECT(il->loader));
481                 il->loader = NULL;
482                 }
483         g_mutex_lock(il->data_mutex);
484         il->done = TRUE;
485         g_mutex_unlock(il->data_mutex);
486 }
487
488 static void image_loader_setup_loader(ImageLoader *il)
489 {
490         g_mutex_lock(il->data_mutex);
491         il->loader = gdk_pixbuf_loader_new();
492
493         g_signal_connect(G_OBJECT(il->loader), "area_updated",
494                          G_CALLBACK(image_loader_area_updated_cb), il);
495         g_signal_connect(G_OBJECT(il->loader), "size_prepared",
496                          G_CALLBACK(image_loader_size_cb), il);
497         g_signal_connect(G_OBJECT(il->loader), "area_prepared",
498                          G_CALLBACK(image_loader_area_prepared_cb), il);
499         g_mutex_unlock(il->data_mutex);
500 }
501
502
503 static void image_loader_done(ImageLoader *il)
504 {
505         image_loader_stop_loader(il);
506
507         image_loader_emit_done(il);
508 }
509
510 static void image_loader_error(ImageLoader *il)
511 {
512         image_loader_stop_loader(il);
513
514         DEBUG_1("pixbuf_loader reported load error for: %s", il->fd->path);
515
516         image_loader_emit_error(il);
517 }
518
519 static gboolean image_loader_continue(ImageLoader *il)
520 {
521         gint b;
522         gint c;
523
524         if (!il) return FALSE;
525
526         c = il->idle_read_loop_count ? il->idle_read_loop_count : 1;
527         while (c > 0 && !image_loader_get_stopping(il))
528                 {
529                 b = MIN(il->read_buffer_size, il->bytes_total - il->bytes_read);
530
531                 if (b == 0)
532                         {
533                         image_loader_done(il);
534                         return FALSE;
535                         }
536
537                 if (b < 0 || (b > 0 && !gdk_pixbuf_loader_write(il->loader, il->mapped_file + il->bytes_read, b, &il->error)))
538                         {
539                         image_loader_error(il);
540                         return FALSE;
541                         }
542
543                 il->bytes_read += b;
544
545                 c--;
546                 }
547
548         if (il->bytes_total > 0)
549                 {
550                 image_loader_emit_percent(il);
551                 }
552
553         return TRUE;
554 }
555
556 static gboolean image_loader_begin(ImageLoader *il)
557 {
558         gssize b;
559         
560         if (il->pixbuf) return FALSE;
561
562         b = MIN(il->read_buffer_size, il->bytes_total - il->bytes_read);
563         if (b < 1) return FALSE;
564
565         image_loader_setup_loader(il);
566
567         if (!gdk_pixbuf_loader_write(il->loader, il->mapped_file + il->bytes_read, b, &il->error))
568                 {
569                 image_loader_stop_loader(il);
570                 return FALSE;
571                 }
572
573         il->bytes_read += b;
574
575         /* read until size is known */
576         while (il->loader && !gdk_pixbuf_loader_get_pixbuf(il->loader) && b > 0 && !image_loader_get_stopping(il))
577                 {
578                 b = MIN(il->read_buffer_size, il->bytes_total - il->bytes_read);
579                 if (b < 0 || (b > 0 && !gdk_pixbuf_loader_write(il->loader, il->mapped_file + il->bytes_read, b, &il->error)))
580                         {
581                         image_loader_stop_loader(il);
582                         return FALSE;
583                         }
584                 il->bytes_read += b;
585                 }
586         if (!il->pixbuf) image_loader_sync_pixbuf(il);
587
588         if (il->bytes_read == il->bytes_total || b < 1)
589                 {
590                 /* done, handle (broken) loaders that do not have pixbuf till close */
591                 image_loader_stop_loader(il);
592
593                 if (!il->pixbuf) return FALSE;
594
595                 image_loader_done(il);
596                 return TRUE;
597                 }
598
599         if (!il->pixbuf)
600                 {
601                 image_loader_stop_loader(il);
602                 return FALSE;
603                 }
604
605         return TRUE;
606 }
607
608 /**************************************************************************************/
609 /* the following functions are always executed in the main thread */
610
611
612 static gboolean image_loader_setup_source(ImageLoader *il)
613 {
614         struct stat st;
615         gchar *pathl;
616
617         if (!il || il->loader || il->mapped_file) return FALSE;
618
619         il->mapped_file = NULL;
620
621         if (il->fd)
622                 {
623                 ExifData *exif = exif_read_fd(il->fd);
624
625                 if (options->thumbnails.use_exif)
626                         il->mapped_file = exif_get_preview(exif, (guint *)&il->bytes_total, il->requested_width, il->requested_height);
627                 else
628                         il->mapped_file = exif_get_preview(exif, (guint *)&il->bytes_total, 0, 0); /* get the largest available preview image or NULL for normal images*/
629
630                 if (il->mapped_file)
631                         {
632                         il->preview = TRUE;
633                         DEBUG_1("Usable reduced size (preview) image loaded from file %s", il->fd->path);
634                         }
635                 exif_free_fd(il->fd, exif);
636                 }
637
638         
639         if (!il->mapped_file)
640                 {
641                 /* normal file */
642                 gint load_fd;
643         
644                 pathl = path_from_utf8(il->fd->path);
645                 load_fd = open(pathl, O_RDONLY | O_NONBLOCK);
646                 g_free(pathl);
647                 if (load_fd == -1) return FALSE;
648
649                 if (fstat(load_fd, &st) == 0)
650                         {
651                         il->bytes_total = st.st_size;
652                         }
653                 else
654                         {
655                         close(load_fd);
656                         return FALSE;
657                         }
658                 
659                 il->mapped_file = mmap(0, il->bytes_total, PROT_READ|PROT_WRITE, MAP_PRIVATE, load_fd, 0);
660                 close(load_fd);
661                 if (il->mapped_file == MAP_FAILED)
662                         {
663                         il->mapped_file = 0;
664                         return FALSE;
665                         }
666                 il->preview = FALSE;
667                 }
668                 
669         return TRUE;
670 }
671
672 static void image_loader_stop_source(ImageLoader *il)
673 {
674         if (!il) return;
675         
676         if (il->mapped_file)
677                 {
678                 if (il->preview)
679                         {
680                         exif_free_preview(il->mapped_file);
681                         }
682                 else
683                         {
684                         munmap(il->mapped_file, il->bytes_total);
685                         }
686                 il->mapped_file = NULL;
687                 }
688 }
689
690 static void image_loader_stop(ImageLoader *il)
691 {
692         if (!il) return;
693
694         if (il->idle_id)
695                 {
696                 g_source_remove(il->idle_id);
697                 il->idle_id = 0;
698                 }
699                 
700         if (il->thread)
701                 {
702                 /* stop loader in the other thread */
703                 g_mutex_lock(il->data_mutex);
704                 il->stopping = TRUE;
705                 while (!il->can_destroy) g_cond_wait(il->can_destroy_cond, il->data_mutex);
706                 g_mutex_unlock(il->data_mutex);
707                 }
708
709         image_loader_stop_loader(il);
710         image_loader_stop_source(il);
711         
712 }
713
714 void image_loader_delay_area_ready(ImageLoader *il, gboolean enable)
715 {
716         g_mutex_lock(il->data_mutex);
717         il->delay_area_ready = enable;
718         if (!enable)
719                 {
720                 /* send delayed */
721                 GList *list, *work;
722                 list = g_list_reverse(il->area_param_delayed_list);
723                 il->area_param_delayed_list = NULL;
724                 g_mutex_unlock(il->data_mutex);
725
726                 work = list;
727
728                 while (work)
729                         {
730                         ImageLoaderAreaParam *par = work->data;
731                         work = work->next;
732                         
733                         g_signal_emit(il, signals[SIGNAL_AREA_READY], 0, par->x, par->y, par->w, par->h);
734                         g_free(par);
735                         }
736                 g_list_free(list);
737                 }
738         else
739                 {
740                 /* just unlock */
741                 g_mutex_unlock(il->data_mutex);
742                 }
743 }
744
745
746 /**************************************************************************************/
747 /* execution via idle calls */
748
749 static gboolean image_loader_idle_cb(gpointer data)
750 {
751         gboolean ret = FALSE;
752         ImageLoader *il = data;
753
754         if (il->idle_id)
755                 {
756                 ret = image_loader_continue(il);
757                 }
758         
759         if (!ret)
760                 {
761                 image_loader_stop_source(il);
762                 }
763         
764         return ret;
765 }
766
767
768 static gboolean image_loader_start_idle(ImageLoader *il)
769 {
770         gboolean ret;
771         
772         if (!il) return FALSE;
773
774         if (!il->fd) return FALSE;
775
776         if (!image_loader_setup_source(il)) return FALSE;
777         
778         ret = image_loader_begin(il);
779
780         if (ret && !il->done) il->idle_id = g_idle_add_full(il->idle_priority, image_loader_idle_cb, il, NULL);
781         return ret;
782 }
783
784 /**************************************************************************************/
785 /* execution via thread */
786
787 #ifdef HAVE_GTHREAD
788 static GThreadPool *image_loader_thread_pool = NULL;
789
790 static GCond *image_loader_prio_cond = NULL;
791 static GMutex *image_loader_prio_mutex = NULL;
792 static gint image_loader_prio_num = 0;
793
794
795 static void image_loader_thread_enter_high(void)
796 {
797         g_mutex_lock(image_loader_prio_mutex);
798         image_loader_prio_num++;
799         g_mutex_unlock(image_loader_prio_mutex);
800 }
801
802 static void image_loader_thread_leave_high(void)
803 {
804         g_mutex_lock(image_loader_prio_mutex);
805         image_loader_prio_num--;
806         if (image_loader_prio_num == 0) g_cond_broadcast(image_loader_prio_cond); /* wake up all low prio threads */
807         g_mutex_unlock(image_loader_prio_mutex);
808 }
809
810 static void image_loader_thread_wait_high(void)
811 {
812         g_mutex_lock(image_loader_prio_mutex);
813         while (image_loader_prio_num) 
814                 {
815                 g_cond_wait(image_loader_prio_cond, image_loader_prio_mutex);
816                 }
817
818         g_mutex_unlock(image_loader_prio_mutex);
819 }
820
821
822 static void image_loader_thread_run(gpointer data, gpointer user_data)
823 {
824         ImageLoader *il = data;
825         gboolean cont;
826         
827         if (il->idle_priority > G_PRIORITY_DEFAULT_IDLE) 
828                 {
829                 /* low prio, wait untill high prio tasks finishes */
830                 image_loader_thread_wait_high();
831                 }
832         else
833                 {
834                 /* high prio */
835                 image_loader_thread_enter_high();
836                 }
837         
838         cont = image_loader_begin(il);
839         
840         if (!cont && !image_loader_get_pixbuf(il))
841                 {
842                 /* 
843                 loader failed, we have to send signal 
844                 (idle mode returns the image_loader_begin return value directly)
845                 (success is always reported indirectly from image_loader_begin)
846                 */
847                 image_loader_emit_error(il);
848                 }
849         
850         while (cont && !image_loader_get_is_done(il) && !image_loader_get_stopping(il))
851                 {
852                 if (il->idle_priority > G_PRIORITY_DEFAULT_IDLE) 
853                         {
854                         /* low prio, wait untill high prio tasks finishes */
855                         image_loader_thread_wait_high();
856                         }
857                 cont = image_loader_continue(il);
858                 }
859         image_loader_stop_loader(il);
860
861         if (il->idle_priority <= G_PRIORITY_DEFAULT_IDLE) 
862                 {
863                 /* high prio */
864                 image_loader_thread_leave_high();
865                 }
866
867         g_mutex_lock(il->data_mutex);
868         il->can_destroy = TRUE;
869         g_cond_signal(il->can_destroy_cond);
870         g_mutex_unlock(il->data_mutex);
871
872 }
873
874
875 static gboolean image_loader_start_thread(ImageLoader *il)
876 {
877         if (!il) return FALSE;
878
879         if (!il->fd) return FALSE;
880
881         il->thread = TRUE;
882         
883         if (!image_loader_setup_source(il)) return FALSE;
884
885         if (!image_loader_thread_pool) 
886                 {
887                 image_loader_thread_pool = g_thread_pool_new(image_loader_thread_run, NULL, -1, FALSE, NULL);
888                 image_loader_prio_cond = g_cond_new();
889                 image_loader_prio_mutex = g_mutex_new();
890                 }
891
892         il->can_destroy = FALSE; /* ImageLoader can't be freed until image_loader_thread_run finishes */
893
894         g_thread_pool_push(image_loader_thread_pool, il, NULL);
895         DEBUG_1("Thread pool num threads: %d", g_thread_pool_get_num_threads(image_loader_thread_pool));
896                 
897         return TRUE;
898 }
899 #endif /* HAVE_GTHREAD */
900
901
902 /**************************************************************************************/
903 /* public interface */
904
905
906 gboolean image_loader_start(ImageLoader *il)
907 {
908         if (!il) return FALSE;
909
910         if (!il->fd) return FALSE;
911
912 #ifdef HAVE_GTHREAD
913         return image_loader_start_thread(il);
914 #else
915         return image_loader_start_idle(il);
916 #endif
917 }
918
919
920 /* don't forget to gdk_pixbuf_ref() it if you want to use it after image_loader_free() */
921 GdkPixbuf *image_loader_get_pixbuf(ImageLoader *il)
922 {
923         GdkPixbuf *ret;
924         if (!il) return NULL;
925         
926         g_mutex_lock(il->data_mutex);
927         ret = il->pixbuf;
928         g_mutex_unlock(il->data_mutex);
929         return ret;
930 }
931
932 gchar *image_loader_get_format(ImageLoader *il)
933 {
934         GdkPixbufFormat *format;
935         gchar **mimev;
936         gchar *mime;
937
938         if (!il || !il->loader) return NULL;
939
940         format = gdk_pixbuf_loader_get_format(il->loader);
941         if (!format) return NULL;
942
943         mimev = gdk_pixbuf_format_get_mime_types(format);
944         if (!mimev) return NULL;
945
946         /* return first member of mimev, as GdkPixbufLoader has no way to tell us which exact one ? */
947         mime = g_strdup(mimev[0]);
948         g_strfreev(mimev);
949
950         return mime;
951 }
952
953 void image_loader_set_requested_size(ImageLoader *il, gint width, gint height)
954 {
955         if (!il) return;
956
957         g_mutex_lock(il->data_mutex);
958         il->requested_width = width;
959         il->requested_height = height;
960         g_mutex_unlock(il->data_mutex);
961 }
962
963 void image_loader_set_buffer_size(ImageLoader *il, guint count)
964 {
965         if (!il) return;
966
967         g_mutex_lock(il->data_mutex);
968         il->idle_read_loop_count = count ? count : 1;
969         g_mutex_unlock(il->data_mutex);
970 }
971
972 void image_loader_set_priority(ImageLoader *il, gint priority)
973 {
974         if (!il) return;
975
976         if (il->thread) return; /* can't change prio if the thread already runs */
977         il->idle_priority = priority;
978 }
979
980
981 gdouble image_loader_get_percent(ImageLoader *il)
982 {
983         gdouble ret;
984         if (!il) return 0.0;
985         
986         g_mutex_lock(il->data_mutex);
987         if (il->bytes_total == 0) 
988                 {
989                 ret = 0.0;
990                 }
991         else
992                 {
993                 ret = (gdouble)il->bytes_read / il->bytes_total;
994                 }
995         g_mutex_unlock(il->data_mutex);
996         return ret;
997 }
998
999 gboolean image_loader_get_is_done(ImageLoader *il)
1000 {
1001         gboolean ret;
1002         if (!il) return FALSE;
1003
1004         g_mutex_lock(il->data_mutex);
1005         ret = il->done;
1006         g_mutex_unlock(il->data_mutex);
1007
1008         return ret;
1009 }
1010
1011 FileData *image_loader_get_fd(ImageLoader *il)
1012 {
1013         FileData *ret;
1014         if (!il) return NULL;
1015
1016         g_mutex_lock(il->data_mutex);
1017         ret = il->fd;
1018         g_mutex_unlock(il->data_mutex);
1019
1020         return ret;
1021 }
1022
1023 gboolean image_loader_get_shrunk(ImageLoader *il)
1024 {
1025         gboolean ret;
1026         if (!il) return FALSE;
1027
1028         g_mutex_lock(il->data_mutex);
1029         ret = il->shrunk;
1030         g_mutex_unlock(il->data_mutex);
1031         return ret;
1032 }
1033
1034 const gchar *image_loader_get_error(ImageLoader *il)
1035 {
1036         const gchar *ret = NULL;
1037         if (!il) return NULL;
1038         g_mutex_lock(il->data_mutex);
1039         if (il->error) ret = il->error->message;
1040         g_mutex_unlock(il->data_mutex);
1041         return ret;
1042 }
1043
1044
1045 /* FIXME - this can be rather slow and blocks until the size is known */
1046 gboolean image_load_dimensions(FileData *fd, gint *width, gint *height)
1047 {
1048         ImageLoader *il;
1049         gboolean success;
1050
1051         il = image_loader_new(fd);
1052
1053         success = image_loader_start_idle(il);
1054
1055         if (success && il->pixbuf)
1056                 {
1057                 if (width) *width = gdk_pixbuf_get_width(il->pixbuf);
1058                 if (height) *height = gdk_pixbuf_get_height(il->pixbuf);;
1059                 }
1060         else
1061                 {
1062                 if (width) *width = -1;
1063                 if (height) *height = -1;
1064                 }
1065
1066         image_loader_free(il);
1067
1068         return success;
1069 }
1070 /* vim: set shiftwidth=8 softtabstop=0 cindent cinoptions={1s: */