rotate thumbnails by exif
[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 = 1;
417                         }
418                 
419                 rotated = pixbuf_apply_orientation(pixbuf, tl->fd->exif_orientation);
420                 pixbuf = rotated;
421                 }
422
423         sw = gdk_pixbuf_get_width(pixbuf);
424         sh = gdk_pixbuf_get_height(pixbuf);
425
426         if (tl->cache_enable)
427                 {
428                 if (!tl->cache_hit)
429                         {
430                         gint cache_w, cache_h;
431
432                         if (tl->requested_width > THUMB_SIZE_NORMAL || tl->requested_height > THUMB_SIZE_NORMAL)
433                                 {
434                                 cache_w = cache_h = THUMB_SIZE_LARGE;
435                                 }
436                         else
437                                 {
438                                 cache_w = cache_h = THUMB_SIZE_NORMAL;
439                                 }
440
441                         if (sw > cache_w || sh > cache_h || shrunk)
442                                 {
443                                 gint thumb_w, thumb_h;
444
445                                 if (thumb_loader_std_scale_aspect(cache_w, cache_h, sw, sh,
446                                                                   &thumb_w, &thumb_h))
447                                         {
448                                         pixbuf_thumb = gdk_pixbuf_scale_simple(pixbuf, thumb_w, thumb_h,
449                                                                                (GdkInterpType)options->thumbnails.quality);
450                                         }
451                                 else
452                                         {
453                                         pixbuf_thumb = pixbuf;
454                                         g_object_ref(G_OBJECT(pixbuf_thumb));
455                                         }
456
457                                 thumb_loader_std_save(tl, pixbuf_thumb);
458                                 }
459                         }
460                 else if (tl->cache_hit &&
461                          tl->cache_local && !tl->thumb_path_local)
462                         {
463                         /* A local cache save was requested, but a valid thumb is in $HOME,
464                          * so specifically save as a local thumbnail.
465                          */
466                         g_free(tl->thumb_path);
467                         tl->thumb_path = NULL;
468
469                         tl->cache_hit = FALSE;
470
471                         DEBUG_1("thumb copied: %s", tl->fd->path);
472
473                         thumb_loader_std_save(tl, pixbuf);
474                         }
475                 }
476
477         if (sw <= tl->requested_width && sh <= tl->requested_height)
478                 {
479                 result = pixbuf;
480                 g_object_ref(result);
481                 }
482         else
483                 {
484                 gint thumb_w, thumb_h;
485
486                 if (pixbuf_thumb)
487                         {
488                         pixbuf = pixbuf_thumb;
489                         sw = gdk_pixbuf_get_width(pixbuf);
490                         sh = gdk_pixbuf_get_height(pixbuf);
491                         }
492
493                 if (thumb_loader_std_scale_aspect(tl->requested_width, tl->requested_height, sw, sh,
494                                                   &thumb_w, &thumb_h))
495                         {
496                         result = gdk_pixbuf_scale_simple(pixbuf, thumb_w, thumb_h,
497                                                          (GdkInterpType)options->thumbnails.quality);
498                         }
499                 else
500                         {
501                         result = pixbuf;
502                         g_object_ref(result);
503                         }
504                 }
505
506         if (pixbuf_thumb) g_object_unref(pixbuf_thumb);
507         if (rotated) g_object_unref(rotated);
508
509         return result;
510 }
511
512 static gint thumb_loader_std_next_source(ThumbLoaderStd *tl, gint remove_broken)
513 {
514         image_loader_free(tl->il);
515         tl->il = NULL;
516
517         if (tl->thumb_path)
518                 {
519                 if (!tl->thumb_path_local && remove_broken)
520                         {
521                         DEBUG_1("thumb broken, unlinking: %s", tl->thumb_path);
522                         unlink_file(tl->thumb_path);
523                         }
524
525                 g_free(tl->thumb_path);
526                 tl->thumb_path = NULL;
527
528                 if (!tl->thumb_path_local)
529                         {
530                         tl->thumb_path = thumb_loader_std_cache_path(tl, TRUE, NULL, FALSE);
531                         if (isfile(tl->thumb_path) && thumb_loader_std_setup(tl, tl->thumb_path))
532                                 {
533                                 tl->thumb_path_local = TRUE;
534                                 return TRUE;
535                                 }
536
537                         g_free(tl->thumb_path);
538                         tl->thumb_path = NULL;
539                         }
540
541                 if (thumb_loader_std_setup(tl, tl->fd->path)) return TRUE;
542                 }
543
544         thumb_loader_std_save(tl, NULL);
545         return FALSE;
546 }
547
548 static void thumb_loader_std_done_cb(ImageLoader *il, gpointer data)
549 {
550         ThumbLoaderStd *tl = data;
551         GdkPixbuf *pixbuf;
552
553         DEBUG_1("thumb image done: %s", tl->fd->path);
554         DEBUG_1("            from: %s", tl->il->path);
555
556         pixbuf = image_loader_get_pixbuf(tl->il);
557         if (!pixbuf)
558                 {
559                 DEBUG_1("...but no pixbuf");
560                 thumb_loader_std_error_cb(il, data);
561                 return;
562                 }
563
564         if (tl->thumb_path && !thumb_loader_std_validate(tl, pixbuf))
565                 {
566                 if (thumb_loader_std_next_source(tl, TRUE)) return;
567
568                 if (tl->func_error) tl->func_error(tl, tl->data);
569                 return;
570                 }
571
572         tl->cache_hit = (tl->thumb_path != NULL);
573
574         if (tl->fd)
575                 {
576                 if (tl->fd->pixbuf) g_object_unref(tl->fd->pixbuf);
577                 tl->fd->pixbuf = thumb_loader_std_finish(tl, pixbuf, il->shrunk);
578                 }
579
580         if (tl->func_done) tl->func_done(tl, tl->data);
581 }
582
583 static void thumb_loader_std_error_cb(ImageLoader *il, gpointer data)
584 {
585         ThumbLoaderStd *tl = data;
586
587         /* if at least some of the image is available, go to done */
588         if (image_loader_get_pixbuf(tl->il) != NULL)
589                 {
590                 thumb_loader_std_done_cb(il, data);
591                 return;
592                 }
593         
594         DEBUG_1("thumb image error: %s", tl->fd->path);
595         DEBUG_1("             from: %s", tl->il->fd->path);
596
597         if (thumb_loader_std_next_source(tl, TRUE)) return;
598
599         if (tl->func_error) tl->func_error(tl, tl->data);
600 }
601
602 static void thumb_loader_std_progress_cb(ImageLoader *il, gdouble percent, gpointer data)
603 {
604         ThumbLoaderStd *tl = data;
605
606         tl->progress = (gdouble)percent;
607
608         if (tl->func_progress) tl->func_progress(tl, tl->data);
609 }
610
611 static gint thumb_loader_std_setup(ThumbLoaderStd *tl, const gchar *path)
612 {
613         tl->il = image_loader_new_from_path(path);
614
615         if (options->thumbnails.fast)
616                 {
617                 /* this will speed up jpegs by up to 3x in some cases */
618                 if (tl->requested_width <= THUMB_SIZE_NORMAL &&
619                     tl->requested_height <= THUMB_SIZE_NORMAL)
620                         {
621                         image_loader_set_requested_size(tl->il, THUMB_SIZE_NORMAL, THUMB_SIZE_NORMAL);
622                         }
623                 else
624                         {
625                         image_loader_set_requested_size(tl->il, THUMB_SIZE_LARGE, THUMB_SIZE_LARGE);
626                         }
627                 }
628
629         image_loader_set_error_func(tl->il, thumb_loader_std_error_cb, tl);
630         if (tl->func_progress)
631                 {
632                 image_loader_set_percent_func(tl->il, thumb_loader_std_progress_cb, tl);
633                 }
634
635         if (image_loader_start(tl->il, thumb_loader_std_done_cb, tl))
636                 {
637                 return TRUE;
638                 }
639
640         image_loader_free(tl->il);
641         tl->il = NULL;
642         return FALSE;
643 }
644
645 /*
646  * Note: Currently local_cache only specifies where to save a _new_ thumb, if
647  *       a valid existing thumb is found anywhere the local thumb will not be created.
648  */
649 void thumb_loader_std_set_cache(ThumbLoaderStd *tl, gint enable_cache, gint local, gint retry_failed)
650 {
651         if (!tl) return;
652
653         tl->cache_enable = enable_cache;
654         tl->cache_local = local;
655         tl->cache_retry = retry_failed;
656 }
657
658 gint thumb_loader_std_start(ThumbLoaderStd *tl, FileData *fd)
659 {
660         static gchar *thumb_cache = NULL;
661         struct stat st;
662
663         if (!tl || !fd) return FALSE;
664
665         thumb_loader_std_reset(tl);
666
667         if (!stat_utf8(fd->path, &st)) return FALSE;
668
669         tl->fd = file_data_ref(fd);
670         tl->source_mtime = st.st_mtime;
671         tl->source_size = st.st_size;
672         tl->source_mode = st.st_mode;
673
674         if (!thumb_cache) thumb_cache = g_build_filename(homedir(), THUMB_FOLDER_GLOBAL, NULL);
675         if (strncmp(tl->fd->path, thumb_cache, strlen(thumb_cache)) != 0)
676                 {
677                 gchar *pathl;
678
679                 pathl = path_from_utf8(fd->path);
680                 tl->thumb_uri = g_filename_to_uri(pathl, NULL, NULL);
681                 tl->local_uri = filename_from_path(tl->thumb_uri);
682                 g_free(pathl);
683                 }
684
685         if (tl->cache_enable)
686                 {
687                 gint found;
688
689                 tl->thumb_path = thumb_loader_std_cache_path(tl, FALSE, NULL, FALSE);
690                 tl->thumb_path_local = FALSE;
691
692                 found = isfile(tl->thumb_path);
693                 if (found && thumb_loader_std_setup(tl, tl->thumb_path)) return TRUE;
694
695                 if (thumb_loader_std_fail_check(tl)) return FALSE;
696
697                 return thumb_loader_std_next_source(tl, found);
698                 }
699
700         if (!thumb_loader_std_setup(tl, tl->fd->path))
701                 {
702                 thumb_loader_std_save(tl, NULL);
703                 return FALSE;
704                 }
705
706         return TRUE;
707 }
708
709 void thumb_loader_std_free(ThumbLoaderStd *tl)
710 {
711         if (!tl) return;
712
713         thumb_loader_std_reset(tl);
714         g_free(tl);
715 }
716
717 GdkPixbuf *thumb_loader_std_get_pixbuf(ThumbLoaderStd *tl, gint with_fallback)
718 {
719         GdkPixbuf *pixbuf;
720
721         if (tl && tl->fd && tl->fd->pixbuf)
722                 {
723                 pixbuf = tl->fd->pixbuf;
724                 g_object_ref(pixbuf);
725                 }
726         else if (with_fallback)
727                 {
728                 gint w, h;
729
730                 pixbuf = pixbuf_inline(PIXBUF_INLINE_BROKEN);
731                 w = gdk_pixbuf_get_width(pixbuf);
732                 h = gdk_pixbuf_get_height(pixbuf);
733
734                 if (w > tl->requested_width || h > tl->requested_height)
735                         {
736                         gint nw, nh;
737
738                         if (thumb_loader_std_scale_aspect(tl->requested_width, tl->requested_height,
739                                                           w, h, &nw, &nh))
740                                 {
741                                 GdkPixbuf *tmp;
742
743                                 tmp = pixbuf;
744                                 pixbuf = gdk_pixbuf_scale_simple(tmp, nw, nh, GDK_INTERP_TILES);
745                                 g_object_unref(G_OBJECT(tmp));
746                                 }
747                         }
748                 }
749         else
750                 {
751                 pixbuf = NULL;
752                 }
753
754         return pixbuf;
755 }
756
757
758 typedef struct _ThumbValidate ThumbValidate;
759 struct _ThumbValidate
760 {
761         ThumbLoaderStd *tl;
762         gchar *path;
763         gint days;
764
765         void (*func_valid)(const gchar *path, gint valid, gpointer data);
766         gpointer data;
767
768         gint idle_id;
769 };
770
771 static void thumb_loader_std_thumb_file_validate_free(ThumbValidate *tv)
772 {
773         thumb_loader_std_free(tv->tl);
774         g_free(tv->path);
775         g_free(tv);
776 }
777
778 void thumb_loader_std_thumb_file_validate_cancel(ThumbLoaderStd *tl)
779 {
780         ThumbValidate *tv;
781
782         if (!tl) return;
783
784         tv = tl->data;
785
786         if (tv->idle_id != -1) g_source_remove(tv->idle_id);
787         tv->idle_id = -1;
788
789         thumb_loader_std_thumb_file_validate_free(tv);
790 }
791
792 static void thumb_loader_std_thumb_file_validate_finish(ThumbValidate *tv, gint valid)
793 {
794         if (tv->func_valid) tv->func_valid(tv->path, valid, tv->data);
795
796         thumb_loader_std_thumb_file_validate_free(tv);
797 }
798
799 static void thumb_loader_std_thumb_file_validate_done_cb(ThumbLoaderStd *tl, gpointer data)
800 {
801         ThumbValidate *tv = data;
802         GdkPixbuf *pixbuf;
803         gint valid = FALSE;
804
805         pixbuf = thumb_loader_std_get_pixbuf(tv->tl, FALSE);
806         if (pixbuf)
807                 {
808                 const gchar *uri;
809                 const gchar *mtime_str;
810
811                 uri = gdk_pixbuf_get_option(pixbuf, THUMB_MARKER_URI);
812                 mtime_str = gdk_pixbuf_get_option(pixbuf, THUMB_MARKER_MTIME);
813                 if (uri && mtime_str)
814                         {
815                         if (strncmp(uri, "file:", strlen("file:")) == 0)
816                                 {
817                                 struct stat st;
818                                 gchar *target;
819
820                                 target = g_filename_from_uri(uri, NULL, NULL);
821                                 if (stat(target, &st) == 0 &&
822                                     st.st_mtime == strtol(mtime_str, NULL, 10))
823                                         {
824                                         valid = TRUE;
825                                         }
826                                 g_free(target);
827                                 }
828                         else
829                                 {
830                                 struct stat st;
831
832                                 DEBUG_1("thumb uri foreign, doing day check: %s", uri);
833
834                                 if (stat_utf8(tv->path, &st))
835                                         {
836                                         time_t now;
837
838                                         now = time(NULL);
839                                         if (st.st_atime >= now - (time_t)tv->days * 24 * 60 * 60)
840                                                 {
841                                                 valid = TRUE;
842                                                 }
843                                         }
844                                 }
845                         }
846
847                 g_object_unref(pixbuf);
848                 }
849
850         thumb_loader_std_thumb_file_validate_finish(tv, valid);
851 }
852
853 static void thumb_loader_std_thumb_file_validate_error_cb(ThumbLoaderStd *tl, gpointer data)
854 {
855         ThumbValidate *tv = data;
856
857         thumb_loader_std_thumb_file_validate_finish(tv, FALSE);
858 }
859
860 static gint thumb_loader_std_thumb_file_validate_idle_cb(gpointer data)
861 {
862         ThumbValidate *tv = data;
863
864         tv->idle_id = -1;
865         thumb_loader_std_thumb_file_validate_finish(tv, FALSE);
866
867         return FALSE;
868 }
869
870 ThumbLoaderStd *thumb_loader_std_thumb_file_validate(const gchar *thumb_path, gint allowed_days,
871                                                      void (*func_valid)(const gchar *path, gint valid, gpointer data),
872                                                      gpointer data)
873 {
874         ThumbValidate *tv;
875
876         tv = g_new0(ThumbValidate, 1);
877
878         tv->tl = thumb_loader_std_new(THUMB_SIZE_LARGE, THUMB_SIZE_LARGE);
879         thumb_loader_std_set_callbacks(tv->tl,
880                                        thumb_loader_std_thumb_file_validate_done_cb,
881                                        thumb_loader_std_thumb_file_validate_error_cb,
882                                        NULL,
883                                        tv);
884         thumb_loader_std_reset(tv->tl);
885
886         tv->path = g_strdup(thumb_path);
887         tv->days = allowed_days;
888         tv->func_valid = func_valid;
889         tv->data = data;
890
891         if (!thumb_loader_std_setup(tv->tl, thumb_path))
892                 {
893                 tv->idle_id = g_idle_add(thumb_loader_std_thumb_file_validate_idle_cb, tv);
894                 }
895         else
896                 {
897                 tv->idle_id = -1;
898                 }
899
900         return tv->tl;
901 }
902
903 static void thumb_std_maint_remove_one(const gchar *source, const gchar *uri, gint local,
904                                        const gchar *subfolder)
905 {
906         gchar *thumb_path;
907
908         thumb_path = thumb_std_cache_path(source,
909                                           (local) ? filename_from_path(uri) : uri,
910                                           local, subfolder);
911         if (isfile(thumb_path))
912                 {
913                 DEBUG_1("thumb removing: %s", thumb_path);
914                 unlink_file(thumb_path);
915                 }
916         g_free(thumb_path);
917 }
918
919 /* this also removes local thumbnails (the source is gone so it makes sense) */
920 void thumb_std_maint_removed(const gchar *source)
921 {
922         gchar *uri;
923         gchar *sourcel;
924
925         sourcel = path_from_utf8(source);
926         uri = g_filename_to_uri(sourcel, NULL, NULL);
927         g_free(sourcel);
928
929         /* all this to remove a thumbnail? */
930
931         thumb_std_maint_remove_one(source, uri, FALSE, THUMB_FOLDER_NORMAL);
932         thumb_std_maint_remove_one(source, uri, FALSE, THUMB_FOLDER_LARGE);
933         thumb_std_maint_remove_one(source, uri, FALSE, THUMB_FOLDER_FAIL);
934         thumb_std_maint_remove_one(source, uri, TRUE, THUMB_FOLDER_NORMAL);
935         thumb_std_maint_remove_one(source, uri, TRUE, THUMB_FOLDER_LARGE);
936
937         g_free(uri);
938 }
939
940 typedef struct _TMaintMove TMaintMove;
941 struct _TMaintMove
942 {
943         gchar *source;
944         gchar *dest;
945
946         ThumbLoaderStd *tl;
947         gchar *source_uri;
948         gchar *thumb_path;
949
950         gint pass;
951 };
952
953 static GList *thumb_std_maint_move_list = NULL;
954 static GList *thumb_std_maint_move_tail = NULL;
955
956
957 static void thumb_std_maint_move_step(TMaintMove *tm);
958 static gint thumb_std_maint_move_idle(gpointer data);
959
960
961 static void thumb_std_maint_move_validate_cb(const gchar *path, gint valid, gpointer data)
962 {
963         TMaintMove *tm = data;
964         GdkPixbuf *pixbuf;
965
966         pixbuf = thumb_loader_std_get_pixbuf(tm->tl, FALSE);
967         if (pixbuf)
968                 {
969                 const gchar *uri;
970                 const gchar *mtime_str;
971
972                 uri = gdk_pixbuf_get_option(pixbuf, THUMB_MARKER_URI);
973                 mtime_str = gdk_pixbuf_get_option(pixbuf, THUMB_MARKER_MTIME);
974
975                 if (uri && mtime_str && strcmp(uri, tm->source_uri) == 0)
976                         {
977                         gchar *pathl;
978
979                         /* The validation utility abuses ThumbLoader, and we
980                          * abuse the utility just to load the thumbnail,
981                          * but the loader needs to look sane for the save to complete.
982                          */
983
984                         tm->tl->cache_enable = TRUE;
985                         tm->tl->cache_hit = FALSE;
986                         tm->tl->cache_local = FALSE;
987
988                         file_data_unref(tm->tl->fd);
989                         tm->tl->fd = file_data_new_simple(tm->dest);
990                         tm->tl->source_mtime = strtol(mtime_str, NULL, 10);
991
992                         pathl = path_from_utf8(tm->tl->fd->path);
993                         g_free(tm->tl->thumb_uri);
994                         tm->tl->thumb_uri = g_filename_to_uri(pathl, NULL, NULL);
995                         tm->tl->local_uri = filename_from_path(tm->tl->thumb_uri);
996                         g_free(pathl);
997
998                         g_free(tm->tl->thumb_path);
999                         tm->tl->thumb_path = NULL;
1000                         tm->tl->thumb_path_local = FALSE;
1001
1002                         DEBUG_1("thumb move attempting save:");
1003
1004                         thumb_loader_std_save(tm->tl, pixbuf);
1005                         }
1006
1007                 DEBUG_1("thumb move unlink: %s", tm->thumb_path);
1008                 unlink_file(tm->thumb_path);
1009                 }
1010
1011         thumb_std_maint_move_step(tm);
1012 }
1013
1014 static void thumb_std_maint_move_step(TMaintMove *tm)
1015 {
1016         const gchar *folder;
1017
1018         tm->pass++;
1019         if (tm->pass > 2)
1020                 {
1021                 g_free(tm->source);
1022                 g_free(tm->dest);
1023                 g_free(tm->source_uri);
1024                 g_free(tm->thumb_path);
1025                 g_free(tm);
1026
1027                 if (thumb_std_maint_move_list)
1028                         {
1029                         g_idle_add_full(G_PRIORITY_LOW, thumb_std_maint_move_idle, NULL, NULL);
1030                         }
1031
1032                 return;
1033                 }
1034
1035         folder = (tm->pass == 1) ? THUMB_FOLDER_NORMAL : THUMB_FOLDER_LARGE;
1036
1037         g_free(tm->thumb_path);
1038         tm->thumb_path = thumb_std_cache_path(tm->source, tm->source_uri, FALSE, folder);
1039         tm->tl = thumb_loader_std_thumb_file_validate(tm->thumb_path, 0,
1040                                                       thumb_std_maint_move_validate_cb, tm);
1041 }
1042
1043 static gint thumb_std_maint_move_idle(gpointer data)
1044 {
1045         TMaintMove *tm;
1046         gchar *pathl;
1047
1048         if (!thumb_std_maint_move_list) return FALSE;
1049
1050         tm = thumb_std_maint_move_list->data;
1051
1052         thumb_std_maint_move_list = g_list_remove(thumb_std_maint_move_list, tm);
1053         if (!thumb_std_maint_move_list) thumb_std_maint_move_tail = NULL;
1054
1055         pathl = path_from_utf8(tm->source);
1056         tm->source_uri = g_filename_to_uri(pathl, NULL, NULL);
1057         g_free(pathl);
1058
1059         tm->pass = 0;
1060
1061         thumb_std_maint_move_step(tm);
1062
1063         return FALSE;
1064 }
1065
1066 /* This will schedule a move of the thumbnail for source image to dest when idle.
1067  * We do this so that file renaming or moving speed is not sacrificed by
1068  * moving the thumbnails at the same time because:
1069  *
1070  * This cache design requires the tedious task of loading the png thumbnails and saving them.
1071  *
1072  * The thumbnails are processed when the app is idle. If the app
1073  * exits early well too bad - they can simply be regenerated from scratch.
1074  *
1075  * This does not manage local thumbnails (fixme ?)
1076  */
1077 void thumb_std_maint_moved(const gchar *source, const gchar *dest)
1078 {
1079         TMaintMove *tm;
1080
1081         tm = g_new0(TMaintMove, 1);
1082         tm->source = g_strdup(source);
1083         tm->dest = g_strdup(dest);
1084
1085         if (!thumb_std_maint_move_list)
1086                 {
1087                 g_idle_add_full(G_PRIORITY_LOW, thumb_std_maint_move_idle, NULL, NULL);
1088                 }
1089
1090         if (thumb_std_maint_move_tail)
1091                 {
1092                 thumb_std_maint_move_tail = g_list_append(thumb_std_maint_move_tail, tm);
1093                 thumb_std_maint_move_tail = thumb_std_maint_move_tail->next;
1094                 }
1095         else
1096                 {
1097                 thumb_std_maint_move_list = g_list_append(thumb_std_maint_move_list, tm);
1098                 thumb_std_maint_move_tail = thumb_std_maint_move_list;
1099                 }
1100 }