do not allocate new buffer for thumbnails with correct orientation
[geeqie.git] / src / thumb_standard.c
1 /*
2  * Geeqie
3  * (C) 2006 John Ellis
4  * Copyright (C) 2008 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 "thumb_standard.h"
16
17 #include "cache.h"      /* for cache_ensure_dir_exists */
18 #include "image-load.h"
19 #include "md5-util.h"
20 #include "pixbuf_util.h"
21 #include "ui_fileops.h"
22 #include "filedata.h"
23 #include "exif.h"
24
25
26 /*
27  * This thumbnail caching implementation attempts to conform
28  * to the Thumbnail Managing Standard proposed on freedesktop.org
29  * The standard is documented here:
30  *   http://triq.net/~jens/thumbnail-spec/index.html
31  *  (why isn't it actually hosted on freedesktop.org?)
32  *
33  * This code attempts to conform to version 0.7.0 of the standard.
34  *
35  * Notes:
36  *   > Validation of the thumb's embedded uri is a simple strcmp between our
37  *     version of the escaped uri and the thumb's escaped uri. But not all uri
38  *     escape functions escape the same set of chars, comparing the unescaped
39  *     versions may be more accurate.
40  *   > Only Thumb::URI and Thumb::MTime are stored in a thumb at this time.
41  *     Storing the Size, Width, Height should probably be implemented.
42  */
43
44
45 #define THUMB_SIZE_NORMAL 128
46 #define THUMB_SIZE_LARGE  256
47
48 #define THUMB_MARKER_URI    "tEXt::Thumb::URI"
49 #define THUMB_MARKER_MTIME  "tEXt::Thumb::MTime"
50 #define THUMB_MARKER_SIZE   "tEXt::Thumb::Size"
51 #define THUMB_MARKER_WIDTH  "tEXt::Thumb::Image::Width"
52 #define THUMB_MARKER_HEIGHT "tEXt::Thumb::Image::Height"
53 #define THUMB_MARKER_APP    "tEXt::Software"
54
55 #define THUMB_PERMS_FOLDER 0700
56 #define THUMB_PERMS_THUMB  0600
57
58
59
60 /*
61  *-----------------------------------------------------------------------------
62  * thumbnail loader
63  *-----------------------------------------------------------------------------
64  */
65
66
67 static void thumb_loader_std_error_cb(ImageLoader *il, gpointer data);
68 static gint thumb_loader_std_setup(ThumbLoaderStd *tl, const gchar *path);
69
70
71 ThumbLoaderStd *thumb_loader_std_new(gint width, gint height)
72 {
73         ThumbLoaderStd *tl;
74
75         tl = g_new0(ThumbLoaderStd, 1);
76
77         tl->standard_loader = TRUE;
78
79         tl->requested_width = width;
80         tl->requested_height = height;
81
82         tl->il = NULL;
83         tl->fd = NULL;
84
85         tl->cache_enable = options->thumbnails.enable_caching;
86         tl->cache_local = FALSE;
87         tl->cache_retry = FALSE;
88
89         return tl;
90 }
91
92 void thumb_loader_std_set_callbacks(ThumbLoaderStd *tl,
93                                     ThumbLoaderStdFunc func_done,
94                                     ThumbLoaderStdFunc func_error,
95                                     ThumbLoaderStdFunc func_progress,
96                                     gpointer data)
97 {
98         if (!tl) return;
99
100         tl->func_done = func_done;
101         tl->func_error = func_error;
102         tl->func_progress = func_progress;
103         tl->data = data;
104 }
105
106 static void thumb_loader_std_reset(ThumbLoaderStd *tl)
107 {
108         image_loader_free(tl->il);
109         tl->il = NULL;
110
111         file_data_unref(tl->fd);
112         tl->fd = NULL;
113
114         g_free(tl->thumb_path);
115         tl->thumb_path = NULL;
116
117         g_free(tl->thumb_uri);
118         tl->thumb_uri = NULL;
119         tl->local_uri = NULL;
120
121         tl->thumb_path_local = FALSE;
122
123         tl->cache_hit = FALSE;
124
125         tl->source_mtime = 0;
126         tl->source_size = 0;
127         tl->source_mode = 0;
128
129         tl->progress = 0.0;
130 }
131
132 static gchar *thumb_std_cache_path(const gchar *path, const gchar *uri, gint local,
133                                    const gchar *cache_subfolder)
134 {
135         gchar *result = NULL;
136         gchar *md5_text;
137         guchar digest[16];
138         gchar *name;
139
140         if (!path || !uri || !cache_subfolder) return NULL;
141
142         md5_get_digest((guchar *)uri, strlen(uri), digest);
143         md5_text = md5_digest_to_text(digest);
144
145         if (!md5_text) return NULL;
146
147         name = g_strconcat(md5_text, THUMB_NAME_EXTENSION, NULL);
148
149         if (local)
150                 {
151                 gchar *base = remove_level_from_path(path);
152
153                 result = g_build_filename(base, THUMB_FOLDER_LOCAL, cache_subfolder, name, NULL);
154                 g_free(base);
155                 }
156         else
157                 {
158                 result = g_build_filename(homedir(), THUMB_FOLDER_GLOBAL, cache_subfolder, name, NULL);
159                 }
160
161         g_free(name);
162         g_free(md5_text);
163
164         return result;
165 }
166
167 static gchar *thumb_loader_std_cache_path(ThumbLoaderStd *tl, gint local, GdkPixbuf *pixbuf, gint fail)
168 {
169         const gchar *folder;
170         gint w, h;
171
172         if (!tl->fd || !tl->thumb_uri) return NULL;
173
174         if (pixbuf)
175                 {
176                 w = gdk_pixbuf_get_width(pixbuf);
177                 h = gdk_pixbuf_get_height(pixbuf);
178                 }
179         else
180                 {
181                 w = tl->requested_width;
182                 h = tl->requested_height;
183                 }
184
185         if (fail)
186                 {
187                 folder = THUMB_FOLDER_FAIL;
188                 }
189         else if (w > THUMB_SIZE_NORMAL || h > THUMB_SIZE_NORMAL)
190                 {
191                 folder = THUMB_FOLDER_LARGE;
192                 }
193         else
194                 {
195                 folder = THUMB_FOLDER_NORMAL;
196                 }
197
198         return thumb_std_cache_path(tl->fd->path,
199                                     (local) ?  tl->local_uri : tl->thumb_uri,
200                                     local, folder);
201 }
202
203 static gint thumb_loader_std_fail_check(ThumbLoaderStd *tl)
204 {
205         gchar *fail_path;
206         gint result = FALSE;
207
208         fail_path = thumb_loader_std_cache_path(tl, FALSE, NULL, TRUE);
209         if (isfile(fail_path))
210                 {
211                 GdkPixbuf *pixbuf;
212
213                 if (tl->cache_retry)
214                         {
215                         pixbuf = NULL;
216                         }
217                 else
218                         {
219                         gchar *pathl;
220
221                         pathl = path_from_utf8(fail_path);
222                         pixbuf = gdk_pixbuf_new_from_file(pathl, NULL);
223                         g_free(pathl);
224                         }
225
226                 if (pixbuf)
227                         {
228                         const gchar *mtime_str;
229
230                         mtime_str = gdk_pixbuf_get_option(pixbuf, THUMB_MARKER_MTIME);
231                         if (mtime_str && strtol(mtime_str, NULL, 10) == tl->source_mtime)
232                                 {
233                                 result = TRUE;
234                                 DEBUG_1("thumb fail valid: %s", tl->fd->path);
235                                 DEBUG_1("           thumb: %s", fail_path);
236                                 }
237
238                         g_object_unref(G_OBJECT(pixbuf));
239                         }
240
241                 if (!result) unlink_file(fail_path);
242                 }
243         g_free(fail_path);
244
245         return result;
246 }
247
248 static gint thumb_loader_std_validate(ThumbLoaderStd *tl, GdkPixbuf *pixbuf)
249 {
250         const gchar *valid_uri;
251         const gchar *uri;
252         const gchar *mtime_str;
253         time_t mtime;
254         gint w, h;
255
256         if (!pixbuf) return FALSE;
257
258         w = gdk_pixbuf_get_width(pixbuf);
259         h = gdk_pixbuf_get_height(pixbuf);
260
261         if (w != THUMB_SIZE_NORMAL && w != THUMB_SIZE_LARGE &&
262             h != THUMB_SIZE_NORMAL && h != THUMB_SIZE_LARGE) return FALSE;
263
264         valid_uri = (tl->thumb_path_local) ? tl->local_uri : tl->thumb_uri;
265
266         uri = gdk_pixbuf_get_option(pixbuf, THUMB_MARKER_URI);
267         mtime_str = gdk_pixbuf_get_option(pixbuf, THUMB_MARKER_MTIME);
268
269         if (!mtime_str || !uri || !valid_uri) return FALSE;
270         if (strcmp(uri, valid_uri) != 0) return FALSE;
271
272         mtime = strtol(mtime_str, NULL, 10);
273         if (tl->source_mtime != mtime) return FALSE;
274
275         return TRUE;
276 }
277
278 static void thumb_loader_std_save(ThumbLoaderStd *tl, GdkPixbuf *pixbuf)
279 {
280         gchar *base_path;
281         gchar *tmp_path;
282         gint fail;
283
284         if (!tl->cache_enable || tl->cache_hit) return;
285         if (tl->thumb_path) return;
286
287         if (!pixbuf)
288                 {
289                 /* local failures are not stored */
290                 if (tl->cache_local) return;
291
292                 pixbuf = gdk_pixbuf_new(GDK_COLORSPACE_RGB, TRUE, 8, 1, 1);
293                 fail = TRUE;
294                 }
295         else
296                 {
297                 g_object_ref(G_OBJECT(pixbuf));
298                 fail = FALSE;
299                 }
300
301         tl->thumb_path = thumb_loader_std_cache_path(tl, tl->cache_local, pixbuf, fail);
302         if (!tl->thumb_path)
303                 {
304                 g_object_unref(G_OBJECT(pixbuf));
305                 return;
306                 }
307         tl->thumb_path_local = tl->cache_local;
308
309         /* create thumbnail dir if needed */
310         base_path = remove_level_from_path(tl->thumb_path);
311         if (tl->cache_local)
312                 {
313                 if (!isdir(base_path))
314                         {
315                         struct stat st;
316                         gchar *source_base;
317
318                         source_base = remove_level_from_path(tl->fd->path);
319                         if (stat_utf8(source_base, &st))
320                                 {
321                                 cache_ensure_dir_exists(base_path, st.st_mode);
322                                 }
323                         g_free(source_base);
324                         }
325                 }
326         else
327                 {
328                 cache_ensure_dir_exists(base_path, THUMB_PERMS_FOLDER);
329                 }
330         g_free(base_path);
331
332         DEBUG_1("thumb saving: %s", tl->fd->path);
333         DEBUG_1("       saved: %s", tl->thumb_path);
334
335         /* save thumb, using a temp file then renaming into place */
336         tmp_path = unique_filename(tl->thumb_path, ".tmp", "_", 2);
337         if (tmp_path)
338                 {
339                 const gchar *mark_uri;
340                 gchar *mark_app;
341                 gchar *mark_mtime;
342                 gchar *pathl;
343                 gint success;
344
345                 mark_uri = (tl->cache_local) ? tl->local_uri :tl->thumb_uri;
346
347                 mark_app = g_strdup_printf("%s %s", GQ_APPNAME, VERSION);
348                 mark_mtime = g_strdup_printf("%lu", tl->source_mtime);
349
350                 pathl = path_from_utf8(tmp_path);
351                 success = gdk_pixbuf_save(pixbuf, pathl, "png", NULL,
352                                           THUMB_MARKER_URI, mark_uri,
353                                           THUMB_MARKER_MTIME, mark_mtime,
354                                           THUMB_MARKER_APP, mark_app,
355                                           NULL);
356                 if (success)
357                         {
358                         chmod(pathl, (tl->cache_local) ? tl->source_mode : THUMB_PERMS_THUMB);
359                         success = rename_file(tmp_path, tl->thumb_path);
360                         }
361
362                 g_free(pathl);
363
364                 g_free(mark_mtime);
365                 g_free(mark_app);
366
367                 g_free(tmp_path);
368                 if (!success)
369                         {
370                         DEBUG_1("thumb save failed: %s", tl->fd->path);
371                         DEBUG_1("            thumb: %s", tl->thumb_path);
372                         }
373
374                 }
375
376         g_object_unref(G_OBJECT(pixbuf));
377 }
378
379 static gint thumb_loader_std_scale_aspect(gint req_w, gint req_h, gint old_w, gint old_h,
380                                           gint *new_w, gint *new_h)
381 {
382         if (((gdouble)req_w / old_w) < ((gdouble)req_h / old_h))
383                 {
384                 *new_w = req_w;
385                 *new_h = (gdouble)*new_w / old_w * old_h;
386                 if (*new_h < 1) *new_h = 1;
387                 }
388         else
389                 {
390                 *new_h = req_h;
391                 *new_w = (gdouble)*new_h / old_h * old_w;
392                 if (*new_w < 1) *new_w = 1;
393                 }
394
395         return (*new_w != old_w || *new_h != old_h);
396 }
397
398 static GdkPixbuf *thumb_loader_std_finish(ThumbLoaderStd *tl, GdkPixbuf *pixbuf, gint shrunk)
399 {
400         GdkPixbuf *pixbuf_thumb = NULL;
401         GdkPixbuf *result;
402         GdkPixbuf *rotated = NULL;
403         gint sw, sh;
404
405
406         if (!tl->cache_hit && options->image.exif_rotate_enable)
407                 {
408                 if (!tl->fd->exif_orientation)
409                         {
410                         ExifData *exif = exif_read_fd(tl->fd);
411                         gint orientation;
412
413                         if (exif && exif_get_integer(exif, "Exif.Image.Orientation", &orientation))
414                                 tl->fd->exif_orientation = orientation;
415                         else
416                                 tl->fd->exif_orientation = EXIF_ORIENTATION_TOP_LEFT;
417                         exif_free(exif);
418                         }
419                 
420                 if (tl->fd->exif_orientation != EXIF_ORIENTATION_TOP_LEFT)
421                         {
422                         rotated = pixbuf_apply_orientation(pixbuf, tl->fd->exif_orientation);
423                         pixbuf = rotated;
424                         }
425                 }
426
427         sw = gdk_pixbuf_get_width(pixbuf);
428         sh = gdk_pixbuf_get_height(pixbuf);
429
430         if (tl->cache_enable)
431                 {
432                 if (!tl->cache_hit)
433                         {
434                         gint cache_w, cache_h;
435
436                         if (tl->requested_width > THUMB_SIZE_NORMAL || tl->requested_height > THUMB_SIZE_NORMAL)
437                                 {
438                                 cache_w = cache_h = THUMB_SIZE_LARGE;
439                                 }
440                         else
441                                 {
442                                 cache_w = cache_h = THUMB_SIZE_NORMAL;
443                                 }
444
445                         if (sw > cache_w || sh > cache_h || shrunk)
446                                 {
447                                 gint thumb_w, thumb_h;
448
449                                 if (thumb_loader_std_scale_aspect(cache_w, cache_h, sw, sh,
450                                                                   &thumb_w, &thumb_h))
451                                         {
452                                         pixbuf_thumb = gdk_pixbuf_scale_simple(pixbuf, thumb_w, thumb_h,
453                                                                                (GdkInterpType)options->thumbnails.quality);
454                                         }
455                                 else
456                                         {
457                                         pixbuf_thumb = pixbuf;
458                                         g_object_ref(G_OBJECT(pixbuf_thumb));
459                                         }
460
461                                 thumb_loader_std_save(tl, pixbuf_thumb);
462                                 }
463                         }
464                 else if (tl->cache_hit &&
465                          tl->cache_local && !tl->thumb_path_local)
466                         {
467                         /* A local cache save was requested, but a valid thumb is in $HOME,
468                          * so specifically save as a local thumbnail.
469                          */
470                         g_free(tl->thumb_path);
471                         tl->thumb_path = NULL;
472
473                         tl->cache_hit = FALSE;
474
475                         DEBUG_1("thumb copied: %s", tl->fd->path);
476
477                         thumb_loader_std_save(tl, pixbuf);
478                         }
479                 }
480
481         if (sw <= tl->requested_width && sh <= tl->requested_height)
482                 {
483                 result = pixbuf;
484                 g_object_ref(result);
485                 }
486         else
487                 {
488                 gint thumb_w, thumb_h;
489
490                 if (pixbuf_thumb)
491                         {
492                         pixbuf = pixbuf_thumb;
493                         sw = gdk_pixbuf_get_width(pixbuf);
494                         sh = gdk_pixbuf_get_height(pixbuf);
495                         }
496
497                 if (thumb_loader_std_scale_aspect(tl->requested_width, tl->requested_height, sw, sh,
498                                                   &thumb_w, &thumb_h))
499                         {
500                         result = gdk_pixbuf_scale_simple(pixbuf, thumb_w, thumb_h,
501                                                          (GdkInterpType)options->thumbnails.quality);
502                         }
503                 else
504                         {
505                         result = pixbuf;
506                         g_object_ref(result);
507                         }
508                 }
509
510         if (pixbuf_thumb) g_object_unref(pixbuf_thumb);
511         if (rotated) g_object_unref(rotated);
512
513         return result;
514 }
515
516 static gint thumb_loader_std_next_source(ThumbLoaderStd *tl, gint remove_broken)
517 {
518         image_loader_free(tl->il);
519         tl->il = NULL;
520
521         if (tl->thumb_path)
522                 {
523                 if (!tl->thumb_path_local && remove_broken)
524                         {
525                         DEBUG_1("thumb broken, unlinking: %s", tl->thumb_path);
526                         unlink_file(tl->thumb_path);
527                         }
528
529                 g_free(tl->thumb_path);
530                 tl->thumb_path = NULL;
531
532                 if (!tl->thumb_path_local)
533                         {
534                         tl->thumb_path = thumb_loader_std_cache_path(tl, TRUE, NULL, FALSE);
535                         if (isfile(tl->thumb_path) && thumb_loader_std_setup(tl, tl->thumb_path))
536                                 {
537                                 tl->thumb_path_local = TRUE;
538                                 return TRUE;
539                                 }
540
541                         g_free(tl->thumb_path);
542                         tl->thumb_path = NULL;
543                         }
544
545                 if (thumb_loader_std_setup(tl, tl->fd->path)) return TRUE;
546                 }
547
548         thumb_loader_std_save(tl, NULL);
549         return FALSE;
550 }
551
552 static void thumb_loader_std_done_cb(ImageLoader *il, gpointer data)
553 {
554         ThumbLoaderStd *tl = data;
555         GdkPixbuf *pixbuf;
556
557         DEBUG_1("thumb image done: %s", tl->fd->path);
558         DEBUG_1("            from: %s", tl->il->path);
559
560         pixbuf = image_loader_get_pixbuf(tl->il);
561         if (!pixbuf)
562                 {
563                 DEBUG_1("...but no pixbuf");
564                 thumb_loader_std_error_cb(il, data);
565                 return;
566                 }
567
568         if (tl->thumb_path && !thumb_loader_std_validate(tl, pixbuf))
569                 {
570                 if (thumb_loader_std_next_source(tl, TRUE)) return;
571
572                 if (tl->func_error) tl->func_error(tl, tl->data);
573                 return;
574                 }
575
576         tl->cache_hit = (tl->thumb_path != NULL);
577
578         if (tl->fd)
579                 {
580                 if (tl->fd->pixbuf) g_object_unref(tl->fd->pixbuf);
581                 tl->fd->pixbuf = thumb_loader_std_finish(tl, pixbuf, il->shrunk);
582                 }
583
584         if (tl->func_done) tl->func_done(tl, tl->data);
585 }
586
587 static void thumb_loader_std_error_cb(ImageLoader *il, gpointer data)
588 {
589         ThumbLoaderStd *tl = data;
590
591         /* if at least some of the image is available, go to done */
592         if (image_loader_get_pixbuf(tl->il) != NULL)
593                 {
594                 thumb_loader_std_done_cb(il, data);
595                 return;
596                 }
597         
598         DEBUG_1("thumb image error: %s", tl->fd->path);
599         DEBUG_1("             from: %s", tl->il->fd->path);
600
601         if (thumb_loader_std_next_source(tl, TRUE)) return;
602
603         if (tl->func_error) tl->func_error(tl, tl->data);
604 }
605
606 static void thumb_loader_std_progress_cb(ImageLoader *il, gdouble percent, gpointer data)
607 {
608         ThumbLoaderStd *tl = data;
609
610         tl->progress = (gdouble)percent;
611
612         if (tl->func_progress) tl->func_progress(tl, tl->data);
613 }
614
615 static gint thumb_loader_std_setup(ThumbLoaderStd *tl, const gchar *path)
616 {
617         tl->il = image_loader_new_from_path(path);
618
619         if (options->thumbnails.fast)
620                 {
621                 /* this will speed up jpegs by up to 3x in some cases */
622                 if (tl->requested_width <= THUMB_SIZE_NORMAL &&
623                     tl->requested_height <= THUMB_SIZE_NORMAL)
624                         {
625                         image_loader_set_requested_size(tl->il, THUMB_SIZE_NORMAL, THUMB_SIZE_NORMAL);
626                         }
627                 else
628                         {
629                         image_loader_set_requested_size(tl->il, THUMB_SIZE_LARGE, THUMB_SIZE_LARGE);
630                         }
631                 }
632
633         image_loader_set_error_func(tl->il, thumb_loader_std_error_cb, tl);
634         if (tl->func_progress)
635                 {
636                 image_loader_set_percent_func(tl->il, thumb_loader_std_progress_cb, tl);
637                 }
638
639         if (image_loader_start(tl->il, thumb_loader_std_done_cb, tl))
640                 {
641                 return TRUE;
642                 }
643
644         image_loader_free(tl->il);
645         tl->il = NULL;
646         return FALSE;
647 }
648
649 /*
650  * Note: Currently local_cache only specifies where to save a _new_ thumb, if
651  *       a valid existing thumb is found anywhere the local thumb will not be created.
652  */
653 void thumb_loader_std_set_cache(ThumbLoaderStd *tl, gint enable_cache, gint local, gint retry_failed)
654 {
655         if (!tl) return;
656
657         tl->cache_enable = enable_cache;
658         tl->cache_local = local;
659         tl->cache_retry = retry_failed;
660 }
661
662 gint thumb_loader_std_start(ThumbLoaderStd *tl, FileData *fd)
663 {
664         static gchar *thumb_cache = NULL;
665         struct stat st;
666
667         if (!tl || !fd) return FALSE;
668
669         thumb_loader_std_reset(tl);
670
671         if (!stat_utf8(fd->path, &st)) return FALSE;
672
673         tl->fd = file_data_ref(fd);
674         tl->source_mtime = st.st_mtime;
675         tl->source_size = st.st_size;
676         tl->source_mode = st.st_mode;
677
678         if (!thumb_cache) thumb_cache = g_build_filename(homedir(), THUMB_FOLDER_GLOBAL, NULL);
679         if (strncmp(tl->fd->path, thumb_cache, strlen(thumb_cache)) != 0)
680                 {
681                 gchar *pathl;
682
683                 pathl = path_from_utf8(fd->path);
684                 tl->thumb_uri = g_filename_to_uri(pathl, NULL, NULL);
685                 tl->local_uri = filename_from_path(tl->thumb_uri);
686                 g_free(pathl);
687                 }
688
689         if (tl->cache_enable)
690                 {
691                 gint found;
692
693                 tl->thumb_path = thumb_loader_std_cache_path(tl, FALSE, NULL, FALSE);
694                 tl->thumb_path_local = FALSE;
695
696                 found = isfile(tl->thumb_path);
697                 if (found && thumb_loader_std_setup(tl, tl->thumb_path)) return TRUE;
698
699                 if (thumb_loader_std_fail_check(tl)) return FALSE;
700
701                 return thumb_loader_std_next_source(tl, found);
702                 }
703
704         if (!thumb_loader_std_setup(tl, tl->fd->path))
705                 {
706                 thumb_loader_std_save(tl, NULL);
707                 return FALSE;
708                 }
709
710         return TRUE;
711 }
712
713 void thumb_loader_std_free(ThumbLoaderStd *tl)
714 {
715         if (!tl) return;
716
717         thumb_loader_std_reset(tl);
718         g_free(tl);
719 }
720
721 GdkPixbuf *thumb_loader_std_get_pixbuf(ThumbLoaderStd *tl, gint with_fallback)
722 {
723         GdkPixbuf *pixbuf;
724
725         if (tl && tl->fd && tl->fd->pixbuf)
726                 {
727                 pixbuf = tl->fd->pixbuf;
728                 g_object_ref(pixbuf);
729                 }
730         else if (with_fallback)
731                 {
732                 gint w, h;
733
734                 pixbuf = pixbuf_inline(PIXBUF_INLINE_BROKEN);
735                 w = gdk_pixbuf_get_width(pixbuf);
736                 h = gdk_pixbuf_get_height(pixbuf);
737
738                 if (w > tl->requested_width || h > tl->requested_height)
739                         {
740                         gint nw, nh;
741
742                         if (thumb_loader_std_scale_aspect(tl->requested_width, tl->requested_height,
743                                                           w, h, &nw, &nh))
744                                 {
745                                 GdkPixbuf *tmp;
746
747                                 tmp = pixbuf;
748                                 pixbuf = gdk_pixbuf_scale_simple(tmp, nw, nh, GDK_INTERP_TILES);
749                                 g_object_unref(G_OBJECT(tmp));
750                                 }
751                         }
752                 }
753         else
754                 {
755                 pixbuf = NULL;
756                 }
757
758         return pixbuf;
759 }
760
761
762 typedef struct _ThumbValidate ThumbValidate;
763 struct _ThumbValidate
764 {
765         ThumbLoaderStd *tl;
766         gchar *path;
767         gint days;
768
769         void (*func_valid)(const gchar *path, gint valid, gpointer data);
770         gpointer data;
771
772         gint idle_id;
773 };
774
775 static void thumb_loader_std_thumb_file_validate_free(ThumbValidate *tv)
776 {
777         thumb_loader_std_free(tv->tl);
778         g_free(tv->path);
779         g_free(tv);
780 }
781
782 void thumb_loader_std_thumb_file_validate_cancel(ThumbLoaderStd *tl)
783 {
784         ThumbValidate *tv;
785
786         if (!tl) return;
787
788         tv = tl->data;
789
790         if (tv->idle_id != -1) g_source_remove(tv->idle_id);
791         tv->idle_id = -1;
792
793         thumb_loader_std_thumb_file_validate_free(tv);
794 }
795
796 static void thumb_loader_std_thumb_file_validate_finish(ThumbValidate *tv, gint valid)
797 {
798         if (tv->func_valid) tv->func_valid(tv->path, valid, tv->data);
799
800         thumb_loader_std_thumb_file_validate_free(tv);
801 }
802
803 static void thumb_loader_std_thumb_file_validate_done_cb(ThumbLoaderStd *tl, gpointer data)
804 {
805         ThumbValidate *tv = data;
806         GdkPixbuf *pixbuf;
807         gint valid = FALSE;
808
809         pixbuf = thumb_loader_std_get_pixbuf(tv->tl, FALSE);
810         if (pixbuf)
811                 {
812                 const gchar *uri;
813                 const gchar *mtime_str;
814
815                 uri = gdk_pixbuf_get_option(pixbuf, THUMB_MARKER_URI);
816                 mtime_str = gdk_pixbuf_get_option(pixbuf, THUMB_MARKER_MTIME);
817                 if (uri && mtime_str)
818                         {
819                         if (strncmp(uri, "file:", strlen("file:")) == 0)
820                                 {
821                                 struct stat st;
822                                 gchar *target;
823
824                                 target = g_filename_from_uri(uri, NULL, NULL);
825                                 if (stat(target, &st) == 0 &&
826                                     st.st_mtime == strtol(mtime_str, NULL, 10))
827                                         {
828                                         valid = TRUE;
829                                         }
830                                 g_free(target);
831                                 }
832                         else
833                                 {
834                                 struct stat st;
835
836                                 DEBUG_1("thumb uri foreign, doing day check: %s", uri);
837
838                                 if (stat_utf8(tv->path, &st))
839                                         {
840                                         time_t now;
841
842                                         now = time(NULL);
843                                         if (st.st_atime >= now - (time_t)tv->days * 24 * 60 * 60)
844                                                 {
845                                                 valid = TRUE;
846                                                 }
847                                         }
848                                 }
849                         }
850
851                 g_object_unref(pixbuf);
852                 }
853
854         thumb_loader_std_thumb_file_validate_finish(tv, valid);
855 }
856
857 static void thumb_loader_std_thumb_file_validate_error_cb(ThumbLoaderStd *tl, gpointer data)
858 {
859         ThumbValidate *tv = data;
860
861         thumb_loader_std_thumb_file_validate_finish(tv, FALSE);
862 }
863
864 static gint thumb_loader_std_thumb_file_validate_idle_cb(gpointer data)
865 {
866         ThumbValidate *tv = data;
867
868         tv->idle_id = -1;
869         thumb_loader_std_thumb_file_validate_finish(tv, FALSE);
870
871         return FALSE;
872 }
873
874 ThumbLoaderStd *thumb_loader_std_thumb_file_validate(const gchar *thumb_path, gint allowed_days,
875                                                      void (*func_valid)(const gchar *path, gint valid, gpointer data),
876                                                      gpointer data)
877 {
878         ThumbValidate *tv;
879
880         tv = g_new0(ThumbValidate, 1);
881
882         tv->tl = thumb_loader_std_new(THUMB_SIZE_LARGE, THUMB_SIZE_LARGE);
883         thumb_loader_std_set_callbacks(tv->tl,
884                                        thumb_loader_std_thumb_file_validate_done_cb,
885                                        thumb_loader_std_thumb_file_validate_error_cb,
886                                        NULL,
887                                        tv);
888         thumb_loader_std_reset(tv->tl);
889
890         tv->path = g_strdup(thumb_path);
891         tv->days = allowed_days;
892         tv->func_valid = func_valid;
893         tv->data = data;
894
895         if (!thumb_loader_std_setup(tv->tl, thumb_path))
896                 {
897                 tv->idle_id = g_idle_add(thumb_loader_std_thumb_file_validate_idle_cb, tv);
898                 }
899         else
900                 {
901                 tv->idle_id = -1;
902                 }
903
904         return tv->tl;
905 }
906
907 static void thumb_std_maint_remove_one(const gchar *source, const gchar *uri, gint local,
908                                        const gchar *subfolder)
909 {
910         gchar *thumb_path;
911
912         thumb_path = thumb_std_cache_path(source,
913                                           (local) ? filename_from_path(uri) : uri,
914                                           local, subfolder);
915         if (isfile(thumb_path))
916                 {
917                 DEBUG_1("thumb removing: %s", thumb_path);
918                 unlink_file(thumb_path);
919                 }
920         g_free(thumb_path);
921 }
922
923 /* this also removes local thumbnails (the source is gone so it makes sense) */
924 void thumb_std_maint_removed(const gchar *source)
925 {
926         gchar *uri;
927         gchar *sourcel;
928
929         sourcel = path_from_utf8(source);
930         uri = g_filename_to_uri(sourcel, NULL, NULL);
931         g_free(sourcel);
932
933         /* all this to remove a thumbnail? */
934
935         thumb_std_maint_remove_one(source, uri, FALSE, THUMB_FOLDER_NORMAL);
936         thumb_std_maint_remove_one(source, uri, FALSE, THUMB_FOLDER_LARGE);
937         thumb_std_maint_remove_one(source, uri, FALSE, THUMB_FOLDER_FAIL);
938         thumb_std_maint_remove_one(source, uri, TRUE, THUMB_FOLDER_NORMAL);
939         thumb_std_maint_remove_one(source, uri, TRUE, THUMB_FOLDER_LARGE);
940
941         g_free(uri);
942 }
943
944 typedef struct _TMaintMove TMaintMove;
945 struct _TMaintMove
946 {
947         gchar *source;
948         gchar *dest;
949
950         ThumbLoaderStd *tl;
951         gchar *source_uri;
952         gchar *thumb_path;
953
954         gint pass;
955 };
956
957 static GList *thumb_std_maint_move_list = NULL;
958 static GList *thumb_std_maint_move_tail = NULL;
959
960
961 static void thumb_std_maint_move_step(TMaintMove *tm);
962 static gint thumb_std_maint_move_idle(gpointer data);
963
964
965 static void thumb_std_maint_move_validate_cb(const gchar *path, gint valid, gpointer data)
966 {
967         TMaintMove *tm = data;
968         GdkPixbuf *pixbuf;
969
970         pixbuf = thumb_loader_std_get_pixbuf(tm->tl, FALSE);
971         if (pixbuf)
972                 {
973                 const gchar *uri;
974                 const gchar *mtime_str;
975
976                 uri = gdk_pixbuf_get_option(pixbuf, THUMB_MARKER_URI);
977                 mtime_str = gdk_pixbuf_get_option(pixbuf, THUMB_MARKER_MTIME);
978
979                 if (uri && mtime_str && strcmp(uri, tm->source_uri) == 0)
980                         {
981                         gchar *pathl;
982
983                         /* The validation utility abuses ThumbLoader, and we
984                          * abuse the utility just to load the thumbnail,
985                          * but the loader needs to look sane for the save to complete.
986                          */
987
988                         tm->tl->cache_enable = TRUE;
989                         tm->tl->cache_hit = FALSE;
990                         tm->tl->cache_local = FALSE;
991
992                         file_data_unref(tm->tl->fd);
993                         tm->tl->fd = file_data_new_simple(tm->dest);
994                         tm->tl->source_mtime = strtol(mtime_str, NULL, 10);
995
996                         pathl = path_from_utf8(tm->tl->fd->path);
997                         g_free(tm->tl->thumb_uri);
998                         tm->tl->thumb_uri = g_filename_to_uri(pathl, NULL, NULL);
999                         tm->tl->local_uri = filename_from_path(tm->tl->thumb_uri);
1000                         g_free(pathl);
1001
1002                         g_free(tm->tl->thumb_path);
1003                         tm->tl->thumb_path = NULL;
1004                         tm->tl->thumb_path_local = FALSE;
1005
1006                         DEBUG_1("thumb move attempting save:");
1007
1008                         thumb_loader_std_save(tm->tl, pixbuf);
1009                         }
1010
1011                 DEBUG_1("thumb move unlink: %s", tm->thumb_path);
1012                 unlink_file(tm->thumb_path);
1013                 }
1014
1015         thumb_std_maint_move_step(tm);
1016 }
1017
1018 static void thumb_std_maint_move_step(TMaintMove *tm)
1019 {
1020         const gchar *folder;
1021
1022         tm->pass++;
1023         if (tm->pass > 2)
1024                 {
1025                 g_free(tm->source);
1026                 g_free(tm->dest);
1027                 g_free(tm->source_uri);
1028                 g_free(tm->thumb_path);
1029                 g_free(tm);
1030
1031                 if (thumb_std_maint_move_list)
1032                         {
1033                         g_idle_add_full(G_PRIORITY_LOW, thumb_std_maint_move_idle, NULL, NULL);
1034                         }
1035
1036                 return;
1037                 }
1038
1039         folder = (tm->pass == 1) ? THUMB_FOLDER_NORMAL : THUMB_FOLDER_LARGE;
1040
1041         g_free(tm->thumb_path);
1042         tm->thumb_path = thumb_std_cache_path(tm->source, tm->source_uri, FALSE, folder);
1043         tm->tl = thumb_loader_std_thumb_file_validate(tm->thumb_path, 0,
1044                                                       thumb_std_maint_move_validate_cb, tm);
1045 }
1046
1047 static gint thumb_std_maint_move_idle(gpointer data)
1048 {
1049         TMaintMove *tm;
1050         gchar *pathl;
1051
1052         if (!thumb_std_maint_move_list) return FALSE;
1053
1054         tm = thumb_std_maint_move_list->data;
1055
1056         thumb_std_maint_move_list = g_list_remove(thumb_std_maint_move_list, tm);
1057         if (!thumb_std_maint_move_list) thumb_std_maint_move_tail = NULL;
1058
1059         pathl = path_from_utf8(tm->source);
1060         tm->source_uri = g_filename_to_uri(pathl, NULL, NULL);
1061         g_free(pathl);
1062
1063         tm->pass = 0;
1064
1065         thumb_std_maint_move_step(tm);
1066
1067         return FALSE;
1068 }
1069
1070 /* This will schedule a move of the thumbnail for source image to dest when idle.
1071  * We do this so that file renaming or moving speed is not sacrificed by
1072  * moving the thumbnails at the same time because:
1073  *
1074  * This cache design requires the tedious task of loading the png thumbnails and saving them.
1075  *
1076  * The thumbnails are processed when the app is idle. If the app
1077  * exits early well too bad - they can simply be regenerated from scratch.
1078  *
1079  * This does not manage local thumbnails (fixme ?)
1080  */
1081 void thumb_std_maint_moved(const gchar *source, const gchar *dest)
1082 {
1083         TMaintMove *tm;
1084
1085         tm = g_new0(TMaintMove, 1);
1086         tm->source = g_strdup(source);
1087         tm->dest = g_strdup(dest);
1088
1089         if (!thumb_std_maint_move_list)
1090                 {
1091                 g_idle_add_full(G_PRIORITY_LOW, thumb_std_maint_move_idle, NULL, NULL);
1092                 }
1093
1094         if (thumb_std_maint_move_tail)
1095                 {
1096                 thumb_std_maint_move_tail = g_list_append(thumb_std_maint_move_tail, tm);
1097                 thumb_std_maint_move_tail = thumb_std_maint_move_tail->next;
1098                 }
1099         else
1100                 {
1101                 thumb_std_maint_move_list = g_list_append(thumb_std_maint_move_list, tm);
1102                 thumb_std_maint_move_tail = thumb_std_maint_move_list;
1103                 }
1104 }