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