2 * ROX-Filer, filer for the ROX desktop project
3 * Copyright (C) 2006, Thomas Leonard and others (see changelog for details).
5 * This program is free software; you can redistribute it and/or modify it
6 * under the terms of the GNU General Public License as published by the Free
7 * Software Foundation; either version 2 of the License, or (at your option)
10 * This program is distributed in the hope that it will be useful, but WITHOUT
11 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
12 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
15 * You should have received a copy of the GNU General Public License along with
16 * this program; if not, write to the Free Software Foundation, Inc., 59 Temple
17 * Place, Suite 330, Boston, MA 02111-1307 USA
20 /* pixmaps.c - code for handling pixbufs (despite the name!) */
25 /* Remove pixmaps from the cache when they haven't been accessed for
26 * this period of time (seconds).
29 #define PIXMAP_PURGE_TIME 1200
30 #define PIXMAP_THUMB_SIZE 128
31 #define PIXMAP_THUMB_TOO_OLD_TIME 5
37 #include <sys/types.h>
47 #include "gui_support.h"
58 GFSCache
*pixmap_cache
= NULL
;
59 GFSCache
*desktop_icon_cache
= NULL
;
61 static const char * bad_xpm
[] = {
79 MaskedPixmap
*im_error
;
80 MaskedPixmap
*im_unknown
;
81 MaskedPixmap
*im_symlink
;
83 MaskedPixmap
*im_unmounted
;
84 MaskedPixmap
*im_mounted
;
85 MaskedPixmap
*im_appdir
;
86 MaskedPixmap
*im_xattr
;
88 MaskedPixmap
*im_dirs
;
90 typedef struct _ChildThumbnail ChildThumbnail
;
92 /* There is one of these for each active child process */
93 struct _ChildThumbnail
{
99 static const char *stocks
[] = {
100 ROX_STOCK_SHOW_DETAILS
,
101 ROX_STOCK_SHOW_HIDDEN
,
109 static GtkIconSize mount_icon_size
= -1;
111 /* Static prototypes */
113 static void load_default_pixmaps(void);
114 static gint
purge(gpointer data
);
115 static MaskedPixmap
*image_from_file(const char *path
);
116 static MaskedPixmap
*image_from_desktop_file(const char *path
);
117 static MaskedPixmap
*get_bad_image(void);
118 static GdkPixbuf
*scale_pixbuf_up(GdkPixbuf
*src
, int max_w
, int max_h
);
119 static GdkPixbuf
*get_thumbnail_for(const char *path
);
120 static void thumbnail_child_done(ChildThumbnail
*info
);
121 static void child_create_thumbnail(const gchar
*path
, MIME_type
*type
);
122 static GList
*thumbs_purge_cache(Option
*option
, xmlNode
*node
, guchar
*label
);
123 static gchar
*thumbnail_path(const gchar
*path
);
124 static gchar
*thumbnail_program(MIME_type
*type
);
125 static GdkPixbuf
*extract_tiff_thumbnail(const gchar
*path
);
127 /****************************************************************
128 * EXTERNAL INTERFACE *
129 ****************************************************************/
131 void pixmaps_init(void)
133 GtkIconFactory
*factory
;
136 gtk_widget_push_colormap(gdk_rgb_get_colormap());
138 pixmap_cache
= g_fscache_new((GFSLoadFunc
) image_from_file
, NULL
, NULL
);
139 desktop_icon_cache
= g_fscache_new((GFSLoadFunc
) image_from_desktop_file
, NULL
, NULL
);
141 g_timeout_add(10000, purge
, NULL
);
143 factory
= gtk_icon_factory_new();
144 for (i
= 0; i
< G_N_ELEMENTS(stocks
); i
++)
147 GError
*error
= NULL
;
150 const gchar
*name
= stocks
[i
];
152 path
= g_strconcat(app_dir
, "/images/", name
, ".png", NULL
);
153 pixbuf
= gdk_pixbuf_new_from_file(path
, &error
);
156 g_warning("%s", error
->message
);
158 pixbuf
= gdk_pixbuf_new_from_xpm_data(bad_xpm
);
162 iset
= gtk_icon_set_new_from_pixbuf(pixbuf
);
163 g_object_unref(G_OBJECT(pixbuf
));
164 gtk_icon_factory_add(factory
, name
, iset
);
165 gtk_icon_set_unref(iset
);
167 gtk_icon_factory_add_default(factory
);
169 mount_icon_size
= gtk_icon_size_register("rox-mount-size", 14, 14);
171 load_default_pixmaps();
173 option_register_widget("thumbs-purge-cache", thumbs_purge_cache
);
176 /* Load image <appdir>/images/name.png.
177 * Always returns with a valid image.
179 MaskedPixmap
*load_pixmap(const char *name
)
182 MaskedPixmap
*retval
;
184 path
= g_strconcat(app_dir
, "/images/", name
, ".png", NULL
);
185 retval
= image_from_file(path
);
189 retval
= get_bad_image();
194 /* Create a MaskedPixmap from a GTK stock ID. Always returns
197 static MaskedPixmap
*mp_from_stock(const char *stock_id
, int size
)
199 GtkIconSet
*icon_set
;
201 MaskedPixmap
*retval
;
203 icon_set
= gtk_icon_factory_lookup_default(stock_id
);
205 return get_bad_image();
207 pixbuf
= gtk_icon_set_render_icon(icon_set
,
208 gtk_widget_get_default_style(), /* Gtk bug */
214 retval
= masked_pixmap_new(pixbuf
);
215 gdk_pixbuf_unref(pixbuf
);
220 void pixmap_make_huge(MaskedPixmap
*mp
)
225 g_return_if_fail(mp
->src_pixbuf
!= NULL
);
227 /* Limit to small size now, otherwise they get scaled up in mixed mode.
230 mp
->huge_pixbuf
= scale_pixbuf_up(mp
->src_pixbuf
,
231 SMALL_WIDTH
, SMALL_HEIGHT
);
233 if (!mp
->huge_pixbuf
)
235 mp
->huge_pixbuf
= mp
->src_pixbuf
;
236 g_object_ref(mp
->huge_pixbuf
);
239 mp
->huge_width
= gdk_pixbuf_get_width(mp
->huge_pixbuf
);
240 mp
->huge_height
= gdk_pixbuf_get_height(mp
->huge_pixbuf
);
243 void pixmap_make_small(MaskedPixmap
*mp
)
248 g_return_if_fail(mp
->src_pixbuf
!= NULL
);
250 mp
->sm_pixbuf
= scale_pixbuf(mp
->src_pixbuf
, SMALL_WIDTH
, SMALL_HEIGHT
);
254 mp
->sm_pixbuf
= mp
->src_pixbuf
;
255 g_object_ref(mp
->sm_pixbuf
);
258 mp
->sm_width
= gdk_pixbuf_get_width(mp
->sm_pixbuf
);
259 mp
->sm_height
= gdk_pixbuf_get_height(mp
->sm_pixbuf
);
262 /* Load image 'path' in the background and insert into pixmap_cache.
263 * Call callback(data, path) when done (path is NULL => error).
264 * If the image is already uptodate, or being created already, calls the
265 * callback right away.
267 void pixmap_background_thumb(const gchar
*path
, GFunc callback
, gpointer data
)
273 ChildThumbnail
*info
;
278 image
= g_fscache_lookup_full(pixmap_cache
, path
,
279 FSCACHE_LOOKUP_ONLY_NEW
, &found
);
283 /* Thumbnail is known, or being created */
285 g_object_unref(image
);
286 callback(data
, NULL
);
290 g_return_if_fail(image
== NULL
);
292 pixbuf
= get_thumbnail_for(path
);
296 struct stat info1
, info2
;
299 // Skip zero-byte files. They're either empty, or special (may cause
300 // us to hang, e.g. /proc/kmsg).
301 if (mc_stat(path
, &info1
) == 0 && info1
.st_size
== 0) {
302 callback(data
, NULL
);
306 dir
= g_path_get_dirname(path
);
308 /* If the image itself is in ~/.thumbnails, load it now
309 * (ie, don't create thumbnails for thumbnails!).
311 if (mc_stat(dir
, &info1
) != 0)
313 callback(data
, NULL
);
319 if (mc_stat(make_path(home_dir
, ".thumbnails/normal"),
321 info1
.st_dev
== info2
.st_dev
&&
322 info1
.st_ino
== info2
.st_ino
)
324 pixbuf
= rox_pixbuf_new_from_file_at_scale(path
,
325 PIXMAP_THUMB_SIZE
, PIXMAP_THUMB_SIZE
, TRUE
, NULL
);
328 g_fscache_insert(pixmap_cache
,
330 callback(data
, NULL
);
340 image
= masked_pixmap_new(pixbuf
);
341 gdk_pixbuf_unref(pixbuf
);
342 g_fscache_insert(pixmap_cache
, path
, image
, TRUE
);
343 callback(data
, (gchar
*) path
);
344 g_object_unref(G_OBJECT(image
));
348 type
= type_from_path(path
);
352 /* Add an entry, set to NULL, so no-one else tries to load this
355 g_fscache_insert(pixmap_cache
, path
, NULL
, TRUE
);
357 thumb_prog
= thumbnail_program(type
);
359 /* Only attempt to load 'images' types ourselves */
360 if (thumb_prog
== NULL
&& strcmp(type
->media_type
, "image") != 0)
362 callback(data
, NULL
);
363 return; /* Don't know how to handle this type */
371 delayed_error("fork(): %s", g_strerror(errno
));
372 callback(data
, NULL
);
378 /* We are the child process. (We are sloppy with freeing
379 memory, but since we go away very quickly, that's ok.) */
384 item
= diritem_new(g_basename(thumb_prog
));
386 diritem_restat(thumb_prog
, item
, NULL
);
387 if (item
->flags
& ITEM_FLAG_APPDIR
)
388 thumb_prog
= g_strconcat(thumb_prog
, "/AppRun",
391 execl(thumb_prog
, thumb_prog
, path
,
392 thumbnail_path(path
),
393 g_strdup_printf("%d", PIXMAP_THUMB_SIZE
),
398 child_create_thumbnail(path
, type
);
404 info
= g_new(ChildThumbnail
, 1);
405 info
->path
= g_strdup(path
);
406 info
->callback
= callback
;
408 on_child_death(child
, (CallbackFn
) thumbnail_child_done
, info
);
411 /****************************************************************
412 * INTERNAL FUNCTIONS *
413 ****************************************************************/
415 /* Create a thumbnail file for this image */
416 static void save_thumbnail(const char *pathname
, GdkPixbuf
*full
)
420 int original_width
, original_height
;
422 char *md5
, *swidth
, *sheight
, *ssize
, *smtime
, *uri
;
427 thumb
= scale_pixbuf(full
, PIXMAP_THUMB_SIZE
, PIXMAP_THUMB_SIZE
);
429 original_width
= gdk_pixbuf_get_width(full
);
430 original_height
= gdk_pixbuf_get_height(full
);
432 if (mc_stat(pathname
, &info
) != 0)
435 swidth
= g_strdup_printf("%d", original_width
);
436 sheight
= g_strdup_printf("%d", original_height
);
437 ssize
= g_strdup_printf("%" SIZE_FMT
, info
.st_size
);
438 smtime
= g_strdup_printf("%ld", (long) info
.st_mtime
);
440 path
= pathdup(pathname
);
441 uri
= g_filename_to_uri(path
, NULL
, NULL
);
443 uri
= g_strconcat("file://", path
, NULL
);
447 to
= g_string_new(home_dir
);
448 g_string_append(to
, "/.thumbnails");
449 mkdir(to
->str
, 0700);
450 g_string_append(to
, "/normal/");
451 mkdir(to
->str
, 0700);
452 g_string_append(to
, md5
);
453 name_len
= to
->len
+ 4; /* Truncate to this length when renaming */
454 g_string_append_printf(to
, ".png.ROX-Filer-%ld", (long) getpid());
458 old_mask
= umask(0077);
459 gdk_pixbuf_save(thumb
, to
->str
, "png", NULL
,
460 "tEXt::Thumb::Image::Width", swidth
,
461 "tEXt::Thumb::Image::Height", sheight
,
462 "tEXt::Thumb::Size", ssize
,
463 "tEXt::Thumb::MTime", smtime
,
464 "tEXt::Thumb::URI", uri
,
465 "tEXt::Software", PROJECT
,
469 /* We create the file ###.png.ROX-Filer-PID and rename it to avoid
470 * a race condition if two programs create the same thumb at
476 final
= g_strndup(to
->str
, name_len
);
477 if (rename(to
->str
, final
))
478 g_warning("Failed to rename '%s' to '%s': %s",
479 to
->str
, final
, g_strerror(errno
));
483 g_string_free(to
, TRUE
);
491 static gchar
*thumbnail_path(const char *path
)
497 uri
= g_filename_to_uri(path
, NULL
, NULL
);
499 uri
= g_strconcat("file://", path
, NULL
);
502 to
= g_string_new(home_dir
);
503 g_string_append(to
, "/.thumbnails");
504 mkdir(to
->str
, 0700);
505 g_string_append(to
, "/normal/");
506 mkdir(to
->str
, 0700);
507 g_string_append(to
, md5
);
508 g_string_append(to
, ".png");
514 g_string_free(to
, FALSE
);
519 /* Return a program to create thumbnails for files of this type.
520 * NULL to try to make it ourself (using gdk).
523 static gchar
*thumbnail_program(MIME_type
*type
)
531 leaf
= g_strconcat(type
->media_type
, "_", type
->subtype
, NULL
);
532 path
= choices_find_xdg_path_load(leaf
, "MIME-thumb", SITE
);
539 path
= choices_find_xdg_path_load(type
->media_type
, "MIME-thumb",
545 /* Called in a subprocess. Load path and create the thumbnail
546 * file. Parent will notice when we die.
548 static void child_create_thumbnail(const gchar
*path
, MIME_type
*type
)
550 GdkPixbuf
*image
=NULL
;
552 if(strcmp(type
->subtype
, "jpeg")==0)
553 image
=extract_tiff_thumbnail(path
);
556 image
= rox_pixbuf_new_from_file_at_scale(path
,
557 PIXMAP_THUMB_SIZE
, PIXMAP_THUMB_SIZE
, TRUE
, NULL
);
560 save_thumbnail(path
, image
);
562 /* (no need to unref, as we're about to exit) */
565 /* Called when the child process exits */
566 static void thumbnail_child_done(ChildThumbnail
*info
)
570 thumb
= get_thumbnail_for(info
->path
);
576 image
= masked_pixmap_new(thumb
);
577 g_object_unref(thumb
);
579 g_fscache_insert(pixmap_cache
, info
->path
, image
, FALSE
);
580 g_object_unref(image
);
582 info
->callback(info
->data
, info
->path
);
585 info
->callback(info
->data
, NULL
);
591 /* Check if we have an up-to-date thumbnail for this image.
592 * If so, return it. Otherwise, returns NULL.
594 static GdkPixbuf
*get_thumbnail_for(const char *pathname
)
596 GdkPixbuf
*thumb
= NULL
;
597 char *thumb_path
, *md5
, *uri
, *path
;
598 const char *ssize
, *smtime
;
602 path
= pathdup(pathname
);
603 uri
= g_filename_to_uri(path
, NULL
, NULL
);
605 uri
= g_strconcat("file://", path
, NULL
);
609 thumb_path
= g_strdup_printf("%s/.thumbnails/normal/%s.png",
613 thumb
= gdk_pixbuf_new_from_file(thumb_path
, NULL
);
617 /* Note that these don't need freeing... */
618 ssize
= gdk_pixbuf_get_option(thumb
, "tEXt::Thumb::Size");
619 /* This is optional, so don't flag an error if it is missing */
621 smtime
= gdk_pixbuf_get_option(thumb
, "tEXt::Thumb::MTime");
625 if (mc_stat(path
, &info
) != 0)
628 ttime
=(time_t) atol(smtime
);
630 if (info
.st_mtime
!= ttime
&& now
>ttime
+PIXMAP_THUMB_TOO_OLD_TIME
)
633 if (ssize
&& info
.st_size
< atol(ssize
))
639 gdk_pixbuf_unref(thumb
);
647 /* Load the image 'path' and return a pointer to the resulting
648 * MaskedPixmap. NULL on failure.
649 * Doesn't check for thumbnails (this is for small icons).
651 static MaskedPixmap
*image_from_file(const char *path
)
655 GError
*error
= NULL
;
657 pixbuf
= gdk_pixbuf_new_from_file(path
, &error
);
660 g_warning("%s\n", error
->message
);
665 image
= masked_pixmap_new(pixbuf
);
667 gdk_pixbuf_unref(pixbuf
);
672 /* Load this icon named by this .desktop file from the current theme.
675 static MaskedPixmap
*image_from_desktop_file(const char *path
)
677 GError
*error
= NULL
;
678 MaskedPixmap
*image
= NULL
;
681 icon
= get_value_from_desktop_file(path
,
682 "Desktop Entry", "Icon", &error
);
685 g_warning("Failed to parse .desktop file '%s':\n%s",
686 path
, error
->message
);
693 image
= image_from_file(icon
);
700 /* For some unknown reason, some icon names have extensions.
703 extension
= strrchr(icon
, '.');
704 if (extension
&& (strcmp(extension
, ".png") == 0
705 || strcmp(extension
, ".xpm") == 0
706 || strcmp(extension
, ".svg") == 0))
711 /* SVG reader is very noisy, so redirect stderr to stdout */
714 pixbuf
= theme_load_icon(icon
, HUGE_WIDTH
, 0, NULL
);
719 goto err
; /* Might just not be in the theme */
721 image
= masked_pixmap_new(pixbuf
);
722 g_object_unref(pixbuf
);
732 /* Scale src down to fit in max_w, max_h and return the new pixbuf.
733 * If src is small enough, then ref it and return that.
735 GdkPixbuf
*scale_pixbuf(GdkPixbuf
*src
, int max_w
, int max_h
)
739 w
= gdk_pixbuf_get_width(src
);
740 h
= gdk_pixbuf_get_height(src
);
742 if (w
<= max_w
&& h
<= max_h
)
749 float scale_x
= ((float) w
) / max_w
;
750 float scale_y
= ((float) h
) / max_h
;
751 float scale
= MAX(scale_x
, scale_y
);
752 int dest_w
= w
/ scale
;
753 int dest_h
= h
/ scale
;
755 return gdk_pixbuf_scale_simple(src
,
758 GDK_INTERP_BILINEAR
);
762 /* Scale src up to fit in max_w, max_h and return the new pixbuf.
763 * If src is that size or bigger, then ref it and return that.
765 static GdkPixbuf
*scale_pixbuf_up(GdkPixbuf
*src
, int max_w
, int max_h
)
769 w
= gdk_pixbuf_get_width(src
);
770 h
= gdk_pixbuf_get_height(src
);
772 if (w
== 0 || h
== 0 || w
>= max_w
|| h
>= max_h
)
779 float scale_x
= max_w
/ ((float) w
);
780 float scale_y
= max_h
/ ((float) h
);
781 float scale
= MIN(scale_x
, scale_y
);
783 return gdk_pixbuf_scale_simple(src
,
786 GDK_INTERP_BILINEAR
);
790 /* Return a pointer to the (static) bad image. The ref counter will ensure
791 * that the image is never freed.
793 static MaskedPixmap
*get_bad_image(void)
798 bad
= gdk_pixbuf_new_from_xpm_data(bad_xpm
);
799 mp
= masked_pixmap_new(bad
);
800 gdk_pixbuf_unref(bad
);
805 /* Called now and then to clear out old pixmaps */
806 static gint
purge(gpointer data
)
808 g_fscache_purge(pixmap_cache
, PIXMAP_PURGE_TIME
);
813 static gpointer parent_class
;
815 static void masked_pixmap_finialize(GObject
*object
)
817 MaskedPixmap
*mp
= (MaskedPixmap
*) object
;
821 g_object_unref(mp
->src_pixbuf
);
822 mp
->src_pixbuf
= NULL
;
827 g_object_unref(mp
->huge_pixbuf
);
828 mp
->huge_pixbuf
= NULL
;
832 g_object_unref(mp
->pixbuf
);
838 g_object_unref(mp
->sm_pixbuf
);
839 mp
->sm_pixbuf
= NULL
;
842 G_OBJECT_CLASS(parent_class
)->finalize(object
);
845 static void masked_pixmap_class_init(gpointer gclass
, gpointer data
)
847 GObjectClass
*object
= (GObjectClass
*) gclass
;
849 parent_class
= g_type_class_peek_parent(gclass
);
851 object
->finalize
= masked_pixmap_finialize
;
854 static void masked_pixmap_init(GTypeInstance
*object
, gpointer gclass
)
856 MaskedPixmap
*mp
= (MaskedPixmap
*) object
;
858 mp
->src_pixbuf
= NULL
;
860 mp
->huge_pixbuf
= NULL
;
862 mp
->huge_height
= -1;
868 mp
->sm_pixbuf
= NULL
;
873 static GType
masked_pixmap_get_type(void)
875 static GType type
= 0;
879 static const GTypeInfo info
=
881 sizeof (MaskedPixmapClass
),
882 NULL
, /* base_init */
883 NULL
, /* base_finalise */
884 masked_pixmap_class_init
,
885 NULL
, /* class_finalise */
886 NULL
, /* class_data */
887 sizeof(MaskedPixmap
),
892 type
= g_type_register_static(G_TYPE_OBJECT
, "MaskedPixmap",
899 MaskedPixmap
*masked_pixmap_new(GdkPixbuf
*full_size
)
902 GdkPixbuf
*src_pixbuf
, *normal_pixbuf
;
904 g_return_val_if_fail(full_size
!= NULL
, NULL
);
906 src_pixbuf
= scale_pixbuf(full_size
, HUGE_WIDTH
, HUGE_HEIGHT
);
907 g_return_val_if_fail(src_pixbuf
!= NULL
, NULL
);
909 normal_pixbuf
= scale_pixbuf(src_pixbuf
, ICON_WIDTH
, ICON_HEIGHT
);
910 g_return_val_if_fail(normal_pixbuf
!= NULL
, NULL
);
912 mp
= g_object_new(masked_pixmap_get_type(), NULL
);
914 mp
->src_pixbuf
= src_pixbuf
;
916 mp
->pixbuf
= normal_pixbuf
;
917 mp
->width
= gdk_pixbuf_get_width(normal_pixbuf
);
918 mp
->height
= gdk_pixbuf_get_height(normal_pixbuf
);
923 /* Load all the standard pixmaps. Also sets the default window icon. */
924 static void load_default_pixmaps(void)
927 GError
*error
= NULL
;
929 im_error
= mp_from_stock(GTK_STOCK_DIALOG_WARNING
,
930 GTK_ICON_SIZE_DIALOG
);
931 im_unknown
= mp_from_stock(GTK_STOCK_DIALOG_QUESTION
,
932 GTK_ICON_SIZE_DIALOG
);
934 im_symlink
= mp_from_stock(ROX_STOCK_SYMLINK
, mount_icon_size
);
935 im_unmounted
= mp_from_stock(ROX_STOCK_MOUNT
, mount_icon_size
);
936 im_mounted
= mp_from_stock(ROX_STOCK_MOUNTED
, mount_icon_size
);
937 im_xattr
= mp_from_stock(ROX_STOCK_XATTR
, mount_icon_size
);
939 im_dirs
= load_pixmap("dirs");
940 im_appdir
= load_pixmap("application");
942 pixbuf
= gdk_pixbuf_new_from_file(
943 make_path(app_dir
, ".DirIcon"), &error
);
948 icon_list
= g_list_append(NULL
, pixbuf
);
949 gtk_window_set_default_icon_list(icon_list
);
950 g_list_free(icon_list
);
952 g_object_unref(G_OBJECT(pixbuf
));
956 g_warning("%s\n", error
->message
);
961 /* Also purges memory cache */
962 static void purge_disk_cache(GtkWidget
*button
, gpointer data
)
969 g_fscache_purge(pixmap_cache
, 0);
971 path
= g_strconcat(home_dir
, "/.thumbnails/normal/", NULL
);
976 report_error(_("Can't delete thumbnails in %s:\n%s"),
977 path
, g_strerror(errno
));
981 while ((ent
= readdir(dir
)))
983 if (ent
->d_name
[0] == '.')
985 list
= g_list_prepend(list
,
986 g_strconcat(path
, ent
->d_name
, NULL
));
994 destroy_glist(&list
);
997 info_message(_("There are no thumbnails to delete"));
1002 static GList
*thumbs_purge_cache(Option
*option
, xmlNode
*node
, guchar
*label
)
1004 GtkWidget
*button
, *align
;
1006 g_return_val_if_fail(option
== NULL
, NULL
);
1008 align
= gtk_alignment_new(0, 0.5, 0, 0);
1009 button
= button_new_mixed(GTK_STOCK_CLEAR
,
1010 _("Purge thumbnails disk cache"));
1011 gtk_container_add(GTK_CONTAINER(align
), button
);
1012 g_signal_connect(button
, "clicked", G_CALLBACK(purge_disk_cache
), NULL
);
1014 return g_list_append(NULL
, align
);
1018 * Based on Thierry Bousch's public domain exifdump.py.
1021 #define JPEG_FORMAT 0x201
1022 #define JPEG_FORMAT_LENGTH 0x202
1025 * Extract n-byte integer in Motorola (big-endian) format
1027 static inline long long s2n_motorola(const unsigned char *p
, int len
)
1032 for(i
=0; i
<len
; i
++)
1033 a
=(a
<<8) | (int)(p
[i
]);
1039 * Extract n-byte integer in Intel (little-endian) format
1041 static inline long long s2n_intel(const unsigned char *p
, int len
)
1046 for(i
=0; i
<len
; i
++)
1047 a
=a
| (((int) p
[i
]) << (i
*8));
1053 * Extract n-byte integer from data
1055 static int s2n(const unsigned char *dat
, int off
, int len
, char format
)
1057 const unsigned char *p
=dat
+off
;
1061 return s2n_intel(p
, len
);
1064 return s2n_motorola(p
, len
);
1071 * Load header of JPEG/Exif file and attempt to extract the embedded
1072 * thumbnail. Return NULL on failure.
1074 static GdkPixbuf
*extract_tiff_thumbnail(const gchar
*path
)
1077 unsigned char header
[256];
1080 unsigned char *data
;
1083 int thumb
=0, tlength
=0;
1084 GdkPixbuf
*buf
=NULL
;
1086 in
=fopen(path
, "rb");
1091 /* Check for Exif format */
1092 n
=fread(header
, 1, 12, in
);
1093 if(n
!=12 || strncmp((char *) header
, "\377\330\377\341", 4)!=0 ||
1094 strncmp((char *)header
+6, "Exif", 4)!=0) {
1100 length
=header
[4]*256+header
[5];
1101 data
=g_new(unsigned char, length
);
1102 n
=fread(data
, 1, length
, in
);
1103 fclose(in
); /* File no longer needed */
1109 /* Big or little endian (as 'M' or 'I') */
1112 /* Skip over main section */
1113 ifd
=s2n(data
, 4, 4, format
);
1114 entries
=s2n(data
, ifd
, 2, format
);
1116 /* Second section contains data on thumbnail */
1117 ifd
=s2n(data
, ifd
+2+12*entries
, 4, format
);
1118 entries
=s2n(data
, ifd
, 2, format
);
1120 /* Loop over the entries */
1121 for(i
=0; i
<entries
; i
++) {
1122 int entry
=ifd
+2+12*i
;
1123 int tag
=s2n(data
, entry
, 2, format
);
1124 int type
=s2n(data
, entry
+2, 2, format
);
1127 count
=s2n(data
, entry
+4, 4, format
);
1131 int val
=(int) s2n(data
, offset
, 4, format
);
1133 /* Only interested in two entries, the location of the thumbnail
1136 case JPEG_FORMAT
: thumb
=val
; break;
1137 case JPEG_FORMAT_LENGTH
: tlength
=val
; break;
1142 if(thumb
&& tlength
) {
1144 GdkPixbufLoader
*loader
;
1146 /* Don't read outside the header (some files have incorrect data) */
1147 if(thumb
+tlength
>length
)
1148 tlength
=length
-thumb
;
1150 loader
=gdk_pixbuf_loader_new();
1151 gdk_pixbuf_loader_write(loader
, data
+thumb
, tlength
, &err
);
1157 gdk_pixbuf_loader_close(loader
, &err
);
1163 buf
=gdk_pixbuf_loader_get_pixbuf(loader
);
1164 g_object_ref(buf
); /* Ref the image before we unref the loader */
1165 g_object_unref(loader
);