+++ /dev/null
-/*
- * Geeqie
- * (C) 2004 John Ellis
- * Copyright (C) 2008 - 2011 The Geeqie Team
- *
- * Author: Vladimir Nadvornik
- *
- * This software is released under the GNU General Public License (GNU GPL).
- * Please read the included file COPYING for more information.
- * This software comes with no warranty of any kind, use at your own risk!
- */
-
-/* based on code from GdkPixbuf library - JPEG image loader
- *
- * Copyright (C) 1999 Michael Zucchi
- * Copyright (C) 1999 The Free Software Foundation
- *
- * Progressive loading code Copyright (C) 1999 Red Hat, Inc.
- *
- * Authors: Michael Zucchi <zucchi@zedzone.mmc.com.au>
- * Federico Mena-Quintero <federico@gimp.org>
- * Michael Fulbright <drmike@redhat.com>
- *
- * This library is free software; you can redistribute it and/or
- * modify it under the terms of the GNU Lesser General Public
- * License as published by the Free Software Foundation; either
- * version 2 of the License, or (at your option) any later version.
- *
- * This library is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
- * Lesser General Public License for more details.
- *
- * You should have received a copy of the GNU Lesser General Public
- * License along with this library; if not, write to the
- * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
- * Boston, MA 02111-1307, USA.
- */
-
-
-#include "main.h"
-
-#include "image-load.h"
-#include "image_load_jpeg.h"
-#include "jpeg_parser.h"
-
-#ifdef HAVE_JPEG
-
-#include <setjmp.h>
-#include <jpeglib.h>
-#include <jerror.h>
-
-typedef struct _ImageLoaderJpeg ImageLoaderJpeg;
-struct _ImageLoaderJpeg {
- ImageLoaderBackendCbAreaUpdated area_updated_cb;
- ImageLoaderBackendCbSize size_cb;
- ImageLoaderBackendCbAreaPrepared area_prepared_cb;
-
- gpointer data;
-
- GdkPixbuf *pixbuf;
- guint requested_width;
- guint requested_height;
-
- gboolean abort;
- gboolean stereo;
-
-};
-
-/* error handler data */
-struct error_handler_data {
- struct jpeg_error_mgr pub;
- sigjmp_buf setjmp_buffer;
- GError **error;
-};
-
-/* explode gray image data from jpeg library into rgb components in pixbuf */
-static void
-explode_gray_into_buf (struct jpeg_decompress_struct *cinfo,
- guchar **lines)
-{
- gint i, j;
- guint w;
-
- g_return_if_fail (cinfo != NULL);
- g_return_if_fail (cinfo->output_components == 1);
- g_return_if_fail (cinfo->out_color_space == JCS_GRAYSCALE);
-
- /* Expand grey->colour. Expand from the end of the
- * memory down, so we can use the same buffer.
- */
- w = cinfo->output_width;
- for (i = cinfo->rec_outbuf_height - 1; i >= 0; i--) {
- guchar *from, *to;
-
- from = lines[i] + w - 1;
- to = lines[i] + (w - 1) * 3;
- for (j = w - 1; j >= 0; j--) {
- to[0] = from[0];
- to[1] = from[0];
- to[2] = from[0];
- to -= 3;
- from--;
- }
- }
-}
-
-
-static void
-convert_cmyk_to_rgb (struct jpeg_decompress_struct *cinfo,
- guchar **lines)
-{
- gint i, j;
-
- g_return_if_fail (cinfo != NULL);
- g_return_if_fail (cinfo->output_components == 4);
- g_return_if_fail (cinfo->out_color_space == JCS_CMYK);
-
- for (i = cinfo->rec_outbuf_height - 1; i >= 0; i--) {
- guchar *p;
-
- p = lines[i];
- for (j = 0; j < cinfo->output_width; j++) {
- int c, m, y, k;
- c = p[0];
- m = p[1];
- y = p[2];
- k = p[3];
- if (cinfo->saw_Adobe_marker) {
- p[0] = k*c / 255;
- p[1] = k*m / 255;
- p[2] = k*y / 255;
- }
- else {
- p[0] = (255 - k)*(255 - c) / 255;
- p[1] = (255 - k)*(255 - m) / 255;
- p[2] = (255 - k)*(255 - y) / 255;
- }
- p[3] = 255;
- p += 4;
- }
- }
-}
-
-
-static gpointer image_loader_jpeg_new(ImageLoaderBackendCbAreaUpdated area_updated_cb, ImageLoaderBackendCbSize size_cb, ImageLoaderBackendCbAreaPrepared area_prepared_cb, gpointer data)
-{
- ImageLoaderJpeg *loader = g_new0(ImageLoaderJpeg, 1);
-
- loader->area_updated_cb = area_updated_cb;
- loader->size_cb = size_cb;
- loader->area_prepared_cb = area_prepared_cb;
- loader->data = data;
- return (gpointer) loader;
-}
-
-static void
-fatal_error_handler (j_common_ptr cinfo)
-{
- struct error_handler_data *errmgr;
- char buffer[JMSG_LENGTH_MAX];
-
- errmgr = (struct error_handler_data *) cinfo->err;
-
- /* Create the message */
- (* cinfo->err->format_message) (cinfo, buffer);
-
- /* broken check for *error == NULL for robustness against
- * crappy JPEG library
- */
- if (errmgr->error && *errmgr->error == NULL) {
- g_set_error (errmgr->error,
- GDK_PIXBUF_ERROR,
- cinfo->err->msg_code == JERR_OUT_OF_MEMORY
- ? GDK_PIXBUF_ERROR_INSUFFICIENT_MEMORY
- : GDK_PIXBUF_ERROR_CORRUPT_IMAGE,
- _("Error interpreting JPEG image file (%s)"),
- buffer);
- }
-
- siglongjmp (errmgr->setjmp_buffer, 1);
-
- g_assert_not_reached ();
-}
-
-static void
-output_message_handler (j_common_ptr cinfo)
-{
- /* This method keeps libjpeg from dumping crap to stderr */
-
- /* do nothing */
-}
-
-
-void image_loader_jpeg_read_scanline(struct jpeg_decompress_struct *cinfo, guchar **dptr, guint rowstride)
-{
- guchar *lines[4];
- guchar **lptr;
- gint i;
-
- lptr = lines;
- for (i = 0; i < cinfo->rec_outbuf_height; i++)
- {
- *lptr++ = *dptr;
- *dptr += rowstride;
- }
-
- jpeg_read_scanlines (cinfo, lines, cinfo->rec_outbuf_height);
-
- switch (cinfo->out_color_space)
- {
- case JCS_GRAYSCALE:
- explode_gray_into_buf (cinfo, lines);
- break;
- case JCS_RGB:
- /* do nothing */
- break;
- case JCS_CMYK:
- convert_cmyk_to_rgb (cinfo, lines);
- break;
- default:
- break;
- }
-}
-
-
-static void init_source (j_decompress_ptr cinfo) {}
-static boolean fill_input_buffer (j_decompress_ptr cinfo)
-{
- ERREXIT(cinfo, JERR_INPUT_EMPTY);
- return TRUE;
-}
-static void skip_input_data (j_decompress_ptr cinfo, long num_bytes)
-{
- struct jpeg_source_mgr* src = (struct jpeg_source_mgr*) cinfo->src;
-
- if (num_bytes > src->bytes_in_buffer)
- {
- ERREXIT(cinfo, JERR_INPUT_EOF);
- }
- else if (num_bytes > 0)
- {
- src->next_input_byte += (size_t) num_bytes;
- src->bytes_in_buffer -= (size_t) num_bytes;
- }
-}
-static void term_source (j_decompress_ptr cinfo) {}
-static void set_mem_src (j_decompress_ptr cinfo, void* buffer, long nbytes)
-{
- struct jpeg_source_mgr* src;
-
- if (cinfo->src == NULL)
- { /* first time for this JPEG object? */
- cinfo->src = (struct jpeg_source_mgr *) (*cinfo->mem->alloc_small) (
- (j_common_ptr) cinfo, JPOOL_PERMANENT,
- sizeof(struct jpeg_source_mgr));
- }
-
- src = (struct jpeg_source_mgr*) cinfo->src;
- src->init_source = init_source;
- src->fill_input_buffer = fill_input_buffer;
- src->skip_input_data = skip_input_data;
- src->resync_to_restart = jpeg_resync_to_restart; /* use default method */
- src->term_source = term_source;
- src->bytes_in_buffer = nbytes;
- src->next_input_byte = (JOCTET*)buffer;
-}
-
-
-static gboolean image_loader_jpeg_load (gpointer loader, const guchar *buf, gsize count, GError **error)
-{
- ImageLoaderJpeg *lj = (ImageLoaderJpeg *) loader;
- struct jpeg_decompress_struct cinfo;
- struct jpeg_decompress_struct cinfo2;
- guchar *dptr, *dptr2;
- guint rowstride;
- guchar *stereo_buf2 = NULL;
- guint stereo_length = 0;
-
- struct error_handler_data jerr;
-
- lj->stereo = FALSE;
-
- MPOData *mpo = jpeg_get_mpo_data(buf, count);
- if (mpo && mpo->num_images > 1)
- {
- guint i;
- gint idx1 = -1, idx2 = -1;
- guint num2 = 1;
-
- for (i = 0; i < mpo->num_images; i++)
- {
- if (mpo->images[i].type_code == 0x20002)
- {
- if (mpo->images[i].MPIndividualNum == 1)
- {
- idx1 = i;
- }
- else if (mpo->images[i].MPIndividualNum > num2)
- {
- idx2 = i;
- num2 = mpo->images[i].MPIndividualNum;
- }
- }
- }
-
- if (idx1 >= 0 && idx2 >= 0)
- {
- lj->stereo = TRUE;
- stereo_buf2 = (unsigned char *)buf + mpo->images[idx2].offset;
- stereo_length = mpo->images[idx2].length;
- buf = (unsigned char *)buf + mpo->images[idx1].offset;
- count = mpo->images[idx1].length;
- }
- }
- jpeg_mpo_data_free(mpo);
-
- /* setup error handler */
- cinfo.err = jpeg_std_error (&jerr.pub);
- if (lj->stereo) cinfo2.err = jpeg_std_error (&jerr.pub);
- jerr.pub.error_exit = fatal_error_handler;
- jerr.pub.output_message = output_message_handler;
-
- jerr.error = error;
-
-
- if (setjmp(jerr.setjmp_buffer))
- {
- /* If we get here, the JPEG code has signaled an error.
- * We need to clean up the JPEG object, close the input file, and return.
- */
- jpeg_destroy_decompress(&cinfo);
- if (lj->stereo) jpeg_destroy_decompress(&cinfo2);
- return FALSE;
- }
-
- jpeg_create_decompress(&cinfo);
-
- set_mem_src(&cinfo, (unsigned char *)buf, count);
-
-
- jpeg_read_header(&cinfo, TRUE);
-
- if (lj->stereo)
- {
- jpeg_create_decompress(&cinfo2);
- set_mem_src(&cinfo2, stereo_buf2, stereo_length);
- jpeg_read_header(&cinfo2, TRUE);
-
- if (cinfo.image_width != cinfo2.image_width ||
- cinfo.image_height != cinfo2.image_height)
- {
- DEBUG_1("stereo data with different size");
- jpeg_destroy_decompress(&cinfo2);
- lj->stereo = FALSE;
- }
- }
-
-
-
- lj->requested_width = lj->stereo ? cinfo.image_width * 2: cinfo.image_width;
- lj->requested_height = cinfo.image_height;
- lj->size_cb(loader, lj->requested_width, lj->requested_height, lj->data);
-
- cinfo.scale_num = 1;
- for (cinfo.scale_denom = 2; cinfo.scale_denom <= 8; cinfo.scale_denom *= 2) {
- jpeg_calc_output_dimensions(&cinfo);
- if (cinfo.output_width < (lj->stereo ? lj->requested_width / 2 : lj->requested_width) || cinfo.output_height < lj->requested_height) {
- cinfo.scale_denom /= 2;
- break;
- }
- }
- jpeg_calc_output_dimensions(&cinfo);
- if (lj->stereo)
- {
- cinfo2.scale_num = cinfo.scale_num;
- cinfo2.scale_denom = cinfo.scale_denom;
- jpeg_calc_output_dimensions(&cinfo2);
- jpeg_start_decompress(&cinfo2);
- }
-
-
- jpeg_start_decompress(&cinfo);
-
-
- if (lj->stereo)
- {
- if (cinfo.output_width != cinfo2.output_width ||
- cinfo.output_height != cinfo2.output_height ||
- cinfo.out_color_components != cinfo2.out_color_components)
- {
- DEBUG_1("stereo data with different output size");
- jpeg_destroy_decompress(&cinfo2);
- lj->stereo = FALSE;
- }
- }
-
-
- lj->pixbuf = gdk_pixbuf_new (GDK_COLORSPACE_RGB,
- cinfo.out_color_components == 4 ? TRUE : FALSE,
- 8, lj->stereo ? cinfo.output_width * 2: cinfo.output_width, cinfo.output_height);
-
- if (!lj->pixbuf)
- {
- jpeg_destroy_decompress (&cinfo);
- if (lj->stereo) jpeg_destroy_decompress (&cinfo2);
- return 0;
- }
- if (lj->stereo) g_object_set_data(G_OBJECT(lj->pixbuf), "stereo_data", GINT_TO_POINTER(STEREO_PIXBUF_CROSS));
- lj->area_prepared_cb(loader, lj->data);
-
- rowstride = gdk_pixbuf_get_rowstride(lj->pixbuf);
- dptr = gdk_pixbuf_get_pixels(lj->pixbuf);
- dptr2 = gdk_pixbuf_get_pixels(lj->pixbuf) + ((cinfo.out_color_components == 4) ? 4 * cinfo.output_width : 3 * cinfo.output_width);
-
-
- while (cinfo.output_scanline < cinfo.output_height && !lj->abort)
- {
- guint scanline = cinfo.output_scanline;
- image_loader_jpeg_read_scanline(&cinfo, &dptr, rowstride);
- lj->area_updated_cb(loader, 0, scanline, cinfo.output_width, cinfo.rec_outbuf_height, lj->data);
- if (lj->stereo)
- {
- guint scanline = cinfo2.output_scanline;
- image_loader_jpeg_read_scanline(&cinfo2, &dptr2, rowstride);
- lj->area_updated_cb(loader, cinfo.output_width, scanline, cinfo2.output_width, cinfo2.rec_outbuf_height, lj->data);
- }
- }
-
- jpeg_finish_decompress(&cinfo);
- jpeg_destroy_decompress(&cinfo);
- if (lj->stereo)
- {
- jpeg_finish_decompress(&cinfo);
- jpeg_destroy_decompress(&cinfo);
- }
-
- return TRUE;
-}
-
-static void image_loader_jpeg_set_size(gpointer loader, int width, int height)
-{
- ImageLoaderJpeg *lj = (ImageLoaderJpeg *) loader;
- lj->requested_width = width;
- lj->requested_height = height;
-}
-
-static GdkPixbuf* image_loader_jpeg_get_pixbuf(gpointer loader)
-{
- ImageLoaderJpeg *lj = (ImageLoaderJpeg *) loader;
- return lj->pixbuf;
-}
-
-static gchar* image_loader_jpeg_get_format_name(gpointer loader)
-{
- return g_strdup("jpeg");
-}
-static gchar** image_loader_jpeg_get_format_mime_types(gpointer loader)
-{
- static gchar *mime[] = {"image/jpeg", NULL};
- return g_strdupv(mime);
-}
-
-static gboolean image_loader_jpeg_close(gpointer loader, GError **error)
-{
- return TRUE;
-}
-
-static void image_loader_jpeg_abort(gpointer loader)
-{
- ImageLoaderJpeg *lj = (ImageLoaderJpeg *) loader;
- lj->abort = TRUE;
-}
-
-static void image_loader_jpeg_free(gpointer loader)
-{
- ImageLoaderJpeg *lj = (ImageLoaderJpeg *) loader;
- if (lj->pixbuf) g_object_unref(lj->pixbuf);
- g_free(lj);
-}
-
-
-void image_loader_backend_set_jpeg(ImageLoaderBackend *funcs)
-{
- funcs->loader_new = image_loader_jpeg_new;
- funcs->set_size = image_loader_jpeg_set_size;
- funcs->load = image_loader_jpeg_load;
- funcs->write = NULL;
- funcs->get_pixbuf = image_loader_jpeg_get_pixbuf;
- funcs->close = image_loader_jpeg_close;
- funcs->abort = image_loader_jpeg_abort;
- funcs->free = image_loader_jpeg_free;
-
- funcs->get_format_name = image_loader_jpeg_get_format_name;
- funcs->get_format_mime_types = image_loader_jpeg_get_format_mime_types;
-}
-
-
-
-#endif
-
-
-/* vim: set shiftwidth=8 softtabstop=0 cindent cinoptions={1s: */