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