2 * Copyright (C) 1999 Michael Zucchi
3 * Copyright (C) 1999 The Free Software Foundation
4 * Copyright (C) 2004 John Ellis
5 * Copyright (C) 2008 - 2016 The Geeqie Team
7 * Authors: Michael Zucchi <zucchi@zedzone.mmc.com.au>
8 * Federico Mena-Quintero <federico@gimp.org>
9 * Michael Fulbright <drmike@redhat.com>
12 * This program is free software; you can redistribute it and/or modify
13 * it under the terms of the GNU General Public License as published by
14 * the Free Software Foundation; either version 2 of the License, or
15 * (at your option) any later version.
17 * This program is distributed in the hope that it will be useful,
18 * but WITHOUT ANY WARRANTY; without even the implied warranty of
19 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
20 * GNU General Public License for more details.
22 * You should have received a copy of the GNU General Public License along
23 * with this program; if not, write to the Free Software Foundation, Inc.,
24 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
27 /** This is a Will Not Fix */
28 #pragma GCC diagnostic ignored "-Wclobbered"
30 #include "image-load-jpeg.h"
33 #include <cstdio> // for FILE and size_t in jpeglib.h
35 #include <gdk-pixbuf/gdk-pixbuf.h>
36 #include <glib-object.h>
42 #include "image-load.h"
44 #include "jpeg-parser.h"
47 /* error handler data */
48 struct error_handler_data {
49 struct jpeg_error_mgr pub;
50 sigjmp_buf setjmp_buffer;
54 /* explode gray image data from jpeg library into rgb components in pixbuf */
56 explode_gray_into_buf (struct jpeg_decompress_struct *cinfo,
63 g_return_if_fail (cinfo != nullptr);
64 g_return_if_fail (cinfo->output_components == 1);
65 g_return_if_fail (cinfo->out_color_space == JCS_GRAYSCALE);
67 /* Expand grey->colour. Expand from the end of the
68 * memory down, so we can use the same buffer.
70 w = cinfo->output_width;
71 for (i = cinfo->rec_outbuf_height - 1; i >= 0; i--) {
75 from = lines[i] + w - 1;
76 to = lines[i] + (w - 1) * 3;
77 for (j = w - 1; j >= 0; j--) {
89 convert_cmyk_to_rgb (struct jpeg_decompress_struct *cinfo,
95 g_return_if_fail (cinfo != nullptr);
96 g_return_if_fail (cinfo->output_components == 4);
97 g_return_if_fail (cinfo->out_color_space == JCS_CMYK);
99 for (i = cinfo->rec_outbuf_height - 1; i >= 0; i--) {
103 for (j = 0; j < cinfo->output_width; j++) {
112 if (cinfo->saw_Adobe_marker) {
118 p[0] = (255 - k)*(255 - c) / 255;
119 p[1] = (255 - k)*(255 - m) / 255;
120 p[2] = (255 - k)*(255 - y) / 255;
129 void ImageLoaderJpeg::init(AreaUpdatedCb area_updated_cb, SizePreparedCb size_prepared_cb, AreaPreparedCb area_prepared_cb, gpointer data)
131 this->area_updated_cb = area_updated_cb;
132 this->size_prepared_cb = size_prepared_cb;
133 this->area_prepared_cb = area_prepared_cb;
138 fatal_error_handler (j_common_ptr cinfo)
140 struct error_handler_data *errmgr;
141 char buffer[JMSG_LENGTH_MAX];
143 errmgr = reinterpret_cast<struct error_handler_data *>(cinfo->err);
145 /* Create the message */
146 (* cinfo->err->format_message) (cinfo, buffer);
148 /* broken check for *error == NULL for robustness against
149 * crappy JPEG library
151 if (errmgr->error && *errmgr->error == nullptr) {
152 g_set_error (errmgr->error,
154 cinfo->err->msg_code == JERR_OUT_OF_MEMORY
155 ? GDK_PIXBUF_ERROR_INSUFFICIENT_MEMORY
156 : GDK_PIXBUF_ERROR_CORRUPT_IMAGE,
157 _("Error interpreting JPEG image file (%s)"),
161 siglongjmp (errmgr->setjmp_buffer, 1);
163 g_assert_not_reached ();
167 output_message_handler (j_common_ptr)
169 /* This method keeps libjpeg from dumping crap to stderr */
175 void image_loader_jpeg_read_scanline(struct jpeg_decompress_struct *cinfo, guchar **dptr, guint rowstride)
182 for (i = 0; i < cinfo->rec_outbuf_height; i++)
188 jpeg_read_scanlines (cinfo, lines, cinfo->rec_outbuf_height);
190 switch (cinfo->out_color_space)
193 explode_gray_into_buf (cinfo, lines);
199 convert_cmyk_to_rgb (cinfo, lines);
207 static void init_source (j_decompress_ptr) {}
208 static boolean fill_input_buffer (j_decompress_ptr cinfo)
210 ERREXIT(cinfo, JERR_INPUT_EMPTY);
213 static void skip_input_data (j_decompress_ptr cinfo, long num_bytes)
215 auto src = static_cast<struct jpeg_source_mgr*>(cinfo->src);
217 if (static_cast<gulong>(num_bytes) > src->bytes_in_buffer)
219 ERREXIT(cinfo, JERR_INPUT_EOF);
221 else if (num_bytes > 0)
223 src->next_input_byte += static_cast<size_t>(num_bytes);
224 src->bytes_in_buffer -= static_cast<size_t>(num_bytes);
227 static void term_source (j_decompress_ptr) {}
228 static void set_mem_src (j_decompress_ptr cinfo, void* buffer, long nbytes)
230 struct jpeg_source_mgr* src;
232 if (cinfo->src == nullptr)
233 { /* first time for this JPEG object? */
234 cinfo->src = static_cast<struct jpeg_source_mgr *>((*cinfo->mem->alloc_small) (
235 reinterpret_cast<j_common_ptr>(cinfo), JPOOL_PERMANENT,
236 sizeof(struct jpeg_source_mgr)));
239 src = static_cast<struct jpeg_source_mgr*>(cinfo->src);
240 src->init_source = init_source;
241 src->fill_input_buffer = fill_input_buffer;
242 src->skip_input_data = skip_input_data;
243 src->resync_to_restart = jpeg_resync_to_restart; /* use default method */
244 src->term_source = term_source;
245 src->bytes_in_buffer = nbytes;
246 src->next_input_byte = static_cast<JOCTET*>(buffer);
250 gboolean ImageLoaderJpeg::write(const guchar *buf, gsize &chunk_size, gsize count, GError **error)
252 struct jpeg_decompress_struct cinfo;
253 struct jpeg_decompress_struct cinfo2;
257 guchar *stereo_buf2 = nullptr;
258 guint stereo_length = 0;
260 struct error_handler_data jerr;
264 MPOData *mpo = jpeg_get_mpo_data(buf, count);
265 if (mpo && mpo->num_images > 1)
272 for (i = 0; i < mpo->num_images; i++)
274 if (mpo->images[i].type_code == 0x20002)
276 if (mpo->images[i].MPIndividualNum == 1)
280 else if (mpo->images[i].MPIndividualNum > num2)
283 num2 = mpo->images[i].MPIndividualNum;
288 if (idx1 >= 0 && idx2 >= 0)
291 stereo_buf2 = const_cast<unsigned char *>(buf) + mpo->images[idx2].offset;
292 stereo_length = mpo->images[idx2].length;
293 buf = const_cast<unsigned char *>(buf) + mpo->images[idx1].offset;
294 count = mpo->images[idx1].length;
297 jpeg_mpo_data_free(mpo);
299 /* setup error handler */
300 cinfo.err = jpeg_std_error (&jerr.pub);
301 if (stereo) cinfo2.err = jpeg_std_error (&jerr.pub);
302 jerr.pub.error_exit = fatal_error_handler;
303 jerr.pub.output_message = output_message_handler;
308 if (sigsetjmp(jerr.setjmp_buffer, 0))
310 /* If we get here, the JPEG code has signaled an error.
311 * We need to clean up the JPEG object, close the input file, and return.
313 jpeg_destroy_decompress(&cinfo);
314 if (stereo) jpeg_destroy_decompress(&cinfo2);
318 jpeg_create_decompress(&cinfo);
320 set_mem_src(&cinfo, const_cast<unsigned char *>(buf), count);
323 jpeg_read_header(&cinfo, TRUE);
327 jpeg_create_decompress(&cinfo2);
328 set_mem_src(&cinfo2, stereo_buf2, stereo_length);
329 jpeg_read_header(&cinfo2, TRUE);
331 if (cinfo.image_width != cinfo2.image_width ||
332 cinfo.image_height != cinfo2.image_height)
334 DEBUG_1("stereo data with different size");
335 jpeg_destroy_decompress(&cinfo2);
341 requested_width = stereo ? cinfo.image_width * 2: cinfo.image_width;
342 requested_height = cinfo.image_height;
343 size_prepared_cb(nullptr, requested_width, requested_height, data);
346 for (cinfo.scale_denom = 2; cinfo.scale_denom <= 8; cinfo.scale_denom *= 2) {
347 jpeg_calc_output_dimensions(&cinfo);
348 if (cinfo.output_width < (stereo ? requested_width / 2 : requested_width) || cinfo.output_height < requested_height) {
349 cinfo.scale_denom /= 2;
353 jpeg_calc_output_dimensions(&cinfo);
356 cinfo2.scale_num = cinfo.scale_num;
357 cinfo2.scale_denom = cinfo.scale_denom;
358 jpeg_calc_output_dimensions(&cinfo2);
359 jpeg_start_decompress(&cinfo2);
363 jpeg_start_decompress(&cinfo);
368 if (cinfo.output_width != cinfo2.output_width ||
369 cinfo.output_height != cinfo2.output_height ||
370 cinfo.out_color_components != cinfo2.out_color_components)
372 DEBUG_1("stereo data with different output size");
373 jpeg_destroy_decompress(&cinfo2);
379 pixbuf = gdk_pixbuf_new (GDK_COLORSPACE_RGB,
380 cinfo.out_color_components == 4 ? TRUE : FALSE,
381 8, stereo ? cinfo.output_width * 2: cinfo.output_width, cinfo.output_height);
385 jpeg_destroy_decompress (&cinfo);
386 if (stereo) jpeg_destroy_decompress (&cinfo2);
389 if (stereo) g_object_set_data(G_OBJECT(pixbuf), "stereo_data", GINT_TO_POINTER(STEREO_PIXBUF_CROSS));
390 area_prepared_cb(nullptr, data);
392 rowstride = gdk_pixbuf_get_rowstride(pixbuf);
393 dptr = gdk_pixbuf_get_pixels(pixbuf);
394 dptr2 = gdk_pixbuf_get_pixels(pixbuf) + ((cinfo.out_color_components == 4) ? 4 * cinfo.output_width : 3 * cinfo.output_width);
397 while (cinfo.output_scanline < cinfo.output_height && !aborted)
399 guint scanline = cinfo.output_scanline;
400 image_loader_jpeg_read_scanline(&cinfo, &dptr, rowstride);
401 area_updated_cb(nullptr, 0, scanline, cinfo.output_width, cinfo.rec_outbuf_height, data);
404 guint scanline = cinfo2.output_scanline;
405 image_loader_jpeg_read_scanline(&cinfo2, &dptr2, rowstride);
406 area_updated_cb(nullptr, cinfo.output_width, scanline, cinfo2.output_width, cinfo2.rec_outbuf_height, data);
410 jpeg_finish_decompress(&cinfo);
411 jpeg_destroy_decompress(&cinfo);
414 jpeg_finish_decompress(&cinfo);
415 jpeg_destroy_decompress(&cinfo);
422 void ImageLoaderJpeg::set_size(int width, int height)
424 requested_width = width;
425 requested_height = height;
428 GdkPixbuf *ImageLoaderJpeg::get_pixbuf()
433 gchar *ImageLoaderJpeg::get_format_name()
435 return g_strdup("jpeg");
438 gchar **ImageLoaderJpeg::get_format_mime_types()
440 static const gchar *mime[] = {"image/jpeg", nullptr};
441 return g_strdupv(const_cast<gchar **>(mime));
444 void ImageLoaderJpeg::abort()
449 ImageLoaderJpeg::~ImageLoaderJpeg()
451 if (pixbuf) g_object_unref(pixbuf);
454 std::unique_ptr<ImageLoaderBackend> get_image_loader_backend_jpeg()
456 return std::make_unique<ImageLoaderJpeg>();
459 /* vim: set shiftwidth=8 softtabstop=0 cindent cinoptions={1s: */