src/common/imagjpeg.cpp

/////////////////////////////////////////////////////////////////////////////
// Name:        imagjpeg.cpp
// Purpose:     wxImage JPEG handler
// Author:      Vaclav Slavik
// RCS-ID:      $Id$
// Copyright:   (c) Vaclav Slavik
// Licence:     wxWindows licence
/////////////////////////////////////////////////////////////////////////////

/*
   We don't put pragma implement in this file because it is already present in
   src/common/image.cpp

#ifdef __GNUG__
#pragma implementation "image.h"
#endif
*/

// For compilers that support precompilation, includes "wx.h".
#include "wx/wxprec.h"

#ifdef __BORLANDC__
#pragma hdrstop
#endif

#include "wx/image.h"
#include "wx/bitmap.h"
#include "wx/debug.h"
#include "wx/log.h"
#include "wx/app.h"
#if wxUSE_LIBJPEG
extern "C" {
#include <jpeglib.h>
}
#endif
#include "wx/filefn.h"
#include "wx/wfstream.h"
#include "wx/intl.h"
#include "wx/module.h"

// For memcpy
#include <string.h>
// For JPEG library error handling
#include <setjmp.h>

#ifdef __SALFORDC__
#ifdef FAR
#undef FAR
#endif
#endif

#ifdef __WXMSW__
#include <windows.h>
#endif

//-----------------------------------------------------------------------------
// wxJPEGHandler
//-----------------------------------------------------------------------------

#if wxUSE_LIBJPEG

#if !USE_SHARED_LIBRARIES
IMPLEMENT_DYNAMIC_CLASS(wxJPEGHandler,wxImageHandler)
#endif

#if wxUSE_STREAMS


//------------- JPEG Data Source Manager

typedef struct {
    struct jpeg_source_mgr pub;   /* public fields */

    JOCTET* buffer;               /* start of buffer */
} my_source_mgr;

typedef my_source_mgr * my_src_ptr;

METHODDEF(void) my_init_source ( j_decompress_ptr cinfo )
{
}

METHODDEF(boolean) my_fill_input_buffer ( j_decompress_ptr cinfo )
{
    return TRUE;
}

METHODDEF(void) my_skip_input_data ( j_decompress_ptr cinfo, long num_bytes )
{
    my_src_ptr src = (my_src_ptr) cinfo->src;

    src->pub.next_input_byte += (size_t) num_bytes;
    src->pub.bytes_in_buffer -= (size_t) num_bytes;
}

METHODDEF(void) my_term_source ( j_decompress_ptr cinfo )
{
    my_src_ptr src = (my_src_ptr) cinfo->src;

    free (src->buffer);
}

void jpeg_wxio_src( j_decompress_ptr cinfo, wxInputStream& infile )
{
    my_src_ptr 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(my_source_mgr));
        src = (my_src_ptr) cinfo->src;
    }
    src = (my_src_ptr) cinfo->src;
    src->pub.bytes_in_buffer = infile.StreamSize(); /* forces fill_input_buffer on first read */
    src->buffer = (JOCTET *) malloc (infile.StreamSize());
    src->pub.next_input_byte = src->buffer; /* until buffer loaded */
    infile.Read(src->buffer, infile.StreamSize());

    src->pub.init_source = my_init_source;
    src->pub.fill_input_buffer = my_fill_input_buffer;
    src->pub.skip_input_data = my_skip_input_data;
    src->pub.resync_to_restart = jpeg_resync_to_restart; /* use default method */
    src->pub.term_source = my_term_source;
}


// JPEG error manager:

struct my_error_mgr {
  struct jpeg_error_mgr pub;	/* "public" fields */

  jmp_buf setjmp_buffer;	/* for return to caller */
};

typedef struct my_error_mgr * my_error_ptr;

/*
 * Here's the routine that will replace the standard error_exit method:
 */

METHODDEF(void)
my_error_exit (j_common_ptr cinfo)
{
  /* cinfo->err really points to a my_error_mgr struct, so coerce pointer */
  my_error_ptr myerr = (my_error_ptr) cinfo->err;

  /* Always display the message. */
  /* We could postpone this until after returning, if we chose. */
  (*cinfo->err->output_message) (cinfo);

  /* Return control to the setjmp point */
  longjmp(myerr->setjmp_buffer, 1);
}


bool wxJPEGHandler::LoadFile( wxImage *image, wxInputStream& stream )
{
    struct jpeg_decompress_struct cinfo;
    struct my_error_mgr jerr;
    JSAMPARRAY tempbuf;
    unsigned char *ptr;
    unsigned stride;

    image->Destroy();
    cinfo.err = jpeg_std_error( &jerr.pub );
    jerr.pub.error_exit = my_error_exit;

    /* Establish the setjmp return context for my_error_exit to use. */
    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.
       */
      wxLogError(_("Couldn't load a JPEG image - probably file is corrupted."));
      jpeg_destroy_decompress(&cinfo);
      if (image->Ok()) image->Destroy();
      return FALSE;
    }

    jpeg_create_decompress( &cinfo );
    jpeg_wxio_src( &cinfo, stream );
    jpeg_read_header( &cinfo, TRUE );
    cinfo.out_color_space = JCS_RGB;
    jpeg_start_decompress( &cinfo );

    image->Create( cinfo.image_width, cinfo.image_height );
    if (!image->Ok()) {
        jpeg_finish_decompress( &cinfo );
        jpeg_destroy_decompress( &cinfo );
        return FALSE;
    }
    image->SetMask( FALSE );
    ptr = image->GetData();
    stride = cinfo.output_width * 3;
    tempbuf = (*cinfo.mem->alloc_sarray)
        ((j_common_ptr) &cinfo, JPOOL_IMAGE, stride, 1 );

    while ( cinfo.output_scanline < cinfo.output_height ) {
        jpeg_read_scanlines( &cinfo, tempbuf, 1 );
        memcpy( ptr, tempbuf[0], stride );
        ptr += stride;
    }
    jpeg_finish_decompress( &cinfo );
    jpeg_destroy_decompress( &cinfo );
    return TRUE;
}


typedef struct {
    struct jpeg_destination_mgr pub;

    wxOutputStream *stream;
    JOCTET * buffer;
} my_destination_mgr;

typedef my_destination_mgr * my_dest_ptr;

#define OUTPUT_BUF_SIZE  4096	/* choose an efficiently fwrite'able size */

METHODDEF(void) init_destination (j_compress_ptr cinfo)
{
    my_dest_ptr dest = (my_dest_ptr) cinfo->dest;

    /* Allocate the output buffer --- it will be released when done with image */
    dest->buffer = (JOCTET *)
        (*cinfo->mem->alloc_small) ((j_common_ptr) cinfo, JPOOL_IMAGE,
        OUTPUT_BUF_SIZE * sizeof(JOCTET));
    dest->pub.next_output_byte = dest->buffer;
    dest->pub.free_in_buffer = OUTPUT_BUF_SIZE;
}

METHODDEF(boolean) empty_output_buffer (j_compress_ptr cinfo)
{
    my_dest_ptr dest = (my_dest_ptr) cinfo->dest;

    dest->stream->Write(dest->buffer, OUTPUT_BUF_SIZE);
    dest->pub.next_output_byte = dest->buffer;
    dest->pub.free_in_buffer = OUTPUT_BUF_SIZE;
    return TRUE;
}

METHODDEF(void) term_destination (j_compress_ptr cinfo)
{
    my_dest_ptr dest = (my_dest_ptr) cinfo->dest;
    size_t datacount = OUTPUT_BUF_SIZE - dest->pub.free_in_buffer;
    /* Write any data remaining in the buffer */
    if (datacount > 0)
        dest->stream->Write(dest->buffer, datacount);
}

GLOBAL(void) jpeg_wxio_dest (j_compress_ptr cinfo, wxOutputStream& outfile)
{
    my_dest_ptr dest;

    if (cinfo->dest == NULL) {	/* first time for this JPEG object? */
        cinfo->dest = (struct jpeg_destination_mgr *)
            (*cinfo->mem->alloc_small) ((j_common_ptr) cinfo, JPOOL_PERMANENT,
            sizeof(my_destination_mgr));
    }

    dest = (my_dest_ptr) cinfo->dest;
    dest->pub.init_destination = init_destination;
    dest->pub.empty_output_buffer = empty_output_buffer;
    dest->pub.term_destination = term_destination;
    dest->stream = &outfile;
}

bool wxJPEGHandler::SaveFile( wxImage *image, wxOutputStream& stream )
{
    struct jpeg_compress_struct cinfo;
    struct my_error_mgr jerr;
    JSAMPROW row_pointer[1];	/* pointer to JSAMPLE row[s] */
    JSAMPLE *image_buffer;
    int stride;		        /* physical row width in image buffer */

    cinfo.err = jpeg_std_error(&jerr.pub);
    jerr.pub.error_exit = my_error_exit;

    /* Establish the setjmp return context for my_error_exit to use. */
    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.
       */
      wxLogError(_("Couldn't save a JPEG image - probably file is corrupted."));
      jpeg_destroy_compress(&cinfo);
      return FALSE;
    }

    jpeg_create_compress(&cinfo);
    jpeg_wxio_dest(&cinfo, stream);

    cinfo.image_width = image->GetWidth();
    cinfo.image_height = image->GetHeight();
    cinfo.input_components = 3;
    cinfo.in_color_space = JCS_RGB;
    jpeg_set_defaults(&cinfo);
    jpeg_start_compress(&cinfo, TRUE);

    stride = cinfo.image_width * 3;	/* JSAMPLEs per row in image_buffer */
    image_buffer = image->GetData();
    while (cinfo.next_scanline < cinfo.image_height) {
        row_pointer[0] = &image_buffer[cinfo.next_scanline * stride];
        jpeg_write_scanlines( &cinfo, row_pointer, 1 );
    }
    jpeg_finish_compress(&cinfo);
    jpeg_destroy_compress(&cinfo);

    return TRUE;
}
#endif // wxUSE_STREAMS

#endif

// wxUSE_LIBJPEG
Commit	Line	Data
	1	/////////////////////////////////////////////////////////////////////////////
	2	// Name: imagjpeg.cpp
	3	// Purpose: wxImage JPEG handler
	4	// Author: Vaclav Slavik
	5	// RCS-ID: $Id$
	6	// Copyright: (c) Vaclav Slavik
	7	// Licence: wxWindows licence
	8	/////////////////////////////////////////////////////////////////////////////
	9
	10	/*
	11	We don't put pragma implement in this file because it is already present in
	12	src/common/image.cpp
	13
	14	#ifdef __GNUG__
	15	#pragma implementation "image.h"
	16	#endif
	17	*/
	18
	19	// For compilers that support precompilation, includes "wx.h".
	20	#include "wx/wxprec.h"
	21
	22	#ifdef __BORLANDC__
	23	#pragma hdrstop
	24	#endif
	25
	26	#include "wx/image.h"
	27	#include "wx/bitmap.h"
	28	#include "wx/debug.h"
	29	#include "wx/log.h"
	30	#include "wx/app.h"
	31	#if wxUSE_LIBJPEG
	32	extern "C" {
	33	#include <jpeglib.h>
	34	}
	35	#endif
	36	#include "wx/filefn.h"
	37	#include "wx/wfstream.h"
	38	#include "wx/intl.h"
	39	#include "wx/module.h"
	40
	41	// For memcpy
	42	#include <string.h>
	43	// For JPEG library error handling
	44	#include <setjmp.h>
	45
	46	#ifdef __SALFORDC__
	47	#ifdef FAR
	48	#undef FAR
	49	#endif
	50	#endif
	51
	52	#ifdef __WXMSW__
	53	#include <windows.h>
	54	#endif
	55
	56	//-----------------------------------------------------------------------------
	57	// wxJPEGHandler
	58	//-----------------------------------------------------------------------------
	59
	60	#if wxUSE_LIBJPEG
	61
	62	#if !USE_SHARED_LIBRARIES
	63	IMPLEMENT_DYNAMIC_CLASS(wxJPEGHandler,wxImageHandler)
	64	#endif
	65
	66	#if wxUSE_STREAMS
	67
	68
	69	//------------- JPEG Data Source Manager
	70
	71	typedef struct {
	72	struct jpeg_source_mgr pub; /* public fields */
	73
	74	JOCTET* buffer; /* start of buffer */
	75	} my_source_mgr;
	76
	77	typedef my_source_mgr * my_src_ptr;
	78
	79	METHODDEF(void) my_init_source ( j_decompress_ptr cinfo )
	80	{
	81	}
	82
	83	METHODDEF(boolean) my_fill_input_buffer ( j_decompress_ptr cinfo )
	84	{
	85	return TRUE;
	86	}
	87
	88	METHODDEF(void) my_skip_input_data ( j_decompress_ptr cinfo, long num_bytes )
	89	{
	90	my_src_ptr src = (my_src_ptr) cinfo->src;
	91
	92	src->pub.next_input_byte += (size_t) num_bytes;
	93	src->pub.bytes_in_buffer -= (size_t) num_bytes;
	94	}
	95
	96	METHODDEF(void) my_term_source ( j_decompress_ptr cinfo )
	97	{
	98	my_src_ptr src = (my_src_ptr) cinfo->src;
	99
	100	free (src->buffer);
	101	}
	102
	103	void jpeg_wxio_src( j_decompress_ptr cinfo, wxInputStream& infile )
	104	{
	105	my_src_ptr src;
	106
	107	if (cinfo->src == NULL) { /* first time for this JPEG object? */
	108	cinfo->src = (struct jpeg_source_mgr *)
	109	(*cinfo->mem->alloc_small) ((j_common_ptr) cinfo, JPOOL_PERMANENT,
	110	sizeof(my_source_mgr));
	111	src = (my_src_ptr) cinfo->src;
	112	}
	113	src = (my_src_ptr) cinfo->src;
	114	src->pub.bytes_in_buffer = infile.StreamSize(); /* forces fill_input_buffer on first read */
	115	src->buffer = (JOCTET *) malloc (infile.StreamSize());
	116	src->pub.next_input_byte = src->buffer; /* until buffer loaded */
	117	infile.Read(src->buffer, infile.StreamSize());
	118
	119	src->pub.init_source = my_init_source;
	120	src->pub.fill_input_buffer = my_fill_input_buffer;
	121	src->pub.skip_input_data = my_skip_input_data;
	122	src->pub.resync_to_restart = jpeg_resync_to_restart; /* use default method */
	123	src->pub.term_source = my_term_source;
	124	}
	125
	126
	127	// JPEG error manager:
	128
	129	struct my_error_mgr {
	130	struct jpeg_error_mgr pub; /* "public" fields */
	131
	132	jmp_buf setjmp_buffer; /* for return to caller */
	133	};
	134
	135	typedef struct my_error_mgr * my_error_ptr;
	136
	137	/*
	138	* Here's the routine that will replace the standard error_exit method:
	139	*/
	140
	141	METHODDEF(void)
	142	my_error_exit (j_common_ptr cinfo)
	143	{
	144	/* cinfo->err really points to a my_error_mgr struct, so coerce pointer */
	145	my_error_ptr myerr = (my_error_ptr) cinfo->err;
	146
	147	/* Always display the message. */
	148	/* We could postpone this until after returning, if we chose. */
	149	(*cinfo->err->output_message) (cinfo);
	150
	151	/* Return control to the setjmp point */
	152	longjmp(myerr->setjmp_buffer, 1);
	153	}
	154
	155
	156
	157	bool wxJPEGHandler::LoadFile( wxImage *image, wxInputStream& stream )
	158	{
	159	struct jpeg_decompress_struct cinfo;
	160	struct my_error_mgr jerr;
	161	JSAMPARRAY tempbuf;
	162	unsigned char *ptr;
	163	unsigned stride;
	164
	165	image->Destroy();
	166	cinfo.err = jpeg_std_error( &jerr.pub );
	167	jerr.pub.error_exit = my_error_exit;
	168
	169	/* Establish the setjmp return context for my_error_exit to use. */
	170	if (setjmp(jerr.setjmp_buffer)) {
	171	/* If we get here, the JPEG code has signaled an error.
	172	* We need to clean up the JPEG object, close the input file, and return.
	173	*/
	174	wxLogError(_("Couldn't load a JPEG image - probably file is corrupted."));
	175	jpeg_destroy_decompress(&cinfo);
	176	if (image->Ok()) image->Destroy();
	177	return FALSE;
	178	}
	179
	180	jpeg_create_decompress( &cinfo );
	181	jpeg_wxio_src( &cinfo, stream );
	182	jpeg_read_header( &cinfo, TRUE );
	183	cinfo.out_color_space = JCS_RGB;
	184	jpeg_start_decompress( &cinfo );
	185
	186	image->Create( cinfo.image_width, cinfo.image_height );
	187	if (!image->Ok()) {
	188	jpeg_finish_decompress( &cinfo );
	189	jpeg_destroy_decompress( &cinfo );
	190	return FALSE;
	191	}
	192	image->SetMask( FALSE );
	193	ptr = image->GetData();
	194	stride = cinfo.output_width * 3;
	195	tempbuf = (*cinfo.mem->alloc_sarray)
	196	((j_common_ptr) &cinfo, JPOOL_IMAGE, stride, 1 );
	197
	198	while ( cinfo.output_scanline < cinfo.output_height ) {
	199	jpeg_read_scanlines( &cinfo, tempbuf, 1 );
	200	memcpy( ptr, tempbuf[0], stride );
	201	ptr += stride;
	202	}
	203	jpeg_finish_decompress( &cinfo );
	204	jpeg_destroy_decompress( &cinfo );
	205	return TRUE;
	206	}
	207
	208
	209
	210
	211
	212	typedef struct {
	213	struct jpeg_destination_mgr pub;
	214
	215	wxOutputStream *stream;
	216	JOCTET * buffer;
	217	} my_destination_mgr;
	218
	219	typedef my_destination_mgr * my_dest_ptr;
	220
	221	#define OUTPUT_BUF_SIZE 4096 /* choose an efficiently fwrite'able size */
	222
	223	METHODDEF(void) init_destination (j_compress_ptr cinfo)
	224	{
	225	my_dest_ptr dest = (my_dest_ptr) cinfo->dest;
	226
	227	/* Allocate the output buffer --- it will be released when done with image */
	228	dest->buffer = (JOCTET *)
	229	(*cinfo->mem->alloc_small) ((j_common_ptr) cinfo, JPOOL_IMAGE,
	230	OUTPUT_BUF_SIZE * sizeof(JOCTET));
	231	dest->pub.next_output_byte = dest->buffer;
	232	dest->pub.free_in_buffer = OUTPUT_BUF_SIZE;
	233	}
	234
	235	METHODDEF(boolean) empty_output_buffer (j_compress_ptr cinfo)
	236	{
	237	my_dest_ptr dest = (my_dest_ptr) cinfo->dest;
	238
	239	dest->stream->Write(dest->buffer, OUTPUT_BUF_SIZE);
	240	dest->pub.next_output_byte = dest->buffer;
	241	dest->pub.free_in_buffer = OUTPUT_BUF_SIZE;
	242	return TRUE;
	243	}
	244
	245	METHODDEF(void) term_destination (j_compress_ptr cinfo)
	246	{
	247	my_dest_ptr dest = (my_dest_ptr) cinfo->dest;
	248	size_t datacount = OUTPUT_BUF_SIZE - dest->pub.free_in_buffer;
	249	/* Write any data remaining in the buffer */
	250	if (datacount > 0)
	251	dest->stream->Write(dest->buffer, datacount);
	252	}
	253
	254	GLOBAL(void) jpeg_wxio_dest (j_compress_ptr cinfo, wxOutputStream& outfile)
	255	{
	256	my_dest_ptr dest;
	257
	258	if (cinfo->dest == NULL) { /* first time for this JPEG object? */
	259	cinfo->dest = (struct jpeg_destination_mgr *)
	260	(*cinfo->mem->alloc_small) ((j_common_ptr) cinfo, JPOOL_PERMANENT,
	261	sizeof(my_destination_mgr));
	262	}
	263
	264	dest = (my_dest_ptr) cinfo->dest;
	265	dest->pub.init_destination = init_destination;
	266	dest->pub.empty_output_buffer = empty_output_buffer;
	267	dest->pub.term_destination = term_destination;
	268	dest->stream = &outfile;
	269	}
	270
	271	bool wxJPEGHandler::SaveFile( wxImage *image, wxOutputStream& stream )
	272	{
	273	struct jpeg_compress_struct cinfo;
	274	struct my_error_mgr jerr;
	275	JSAMPROW row_pointer[1]; /* pointer to JSAMPLE row[s] */
	276	JSAMPLE *image_buffer;
	277	int stride; /* physical row width in image buffer */
	278
	279	cinfo.err = jpeg_std_error(&jerr.pub);
	280	jerr.pub.error_exit = my_error_exit;
	281
	282	/* Establish the setjmp return context for my_error_exit to use. */
	283	if (setjmp(jerr.setjmp_buffer)) {
	284	/* If we get here, the JPEG code has signaled an error.
	285	* We need to clean up the JPEG object, close the input file, and return.
	286	*/
	287	wxLogError(_("Couldn't save a JPEG image - probably file is corrupted."));
	288	jpeg_destroy_compress(&cinfo);
	289	return FALSE;
	290	}
	291
	292	jpeg_create_compress(&cinfo);
	293	jpeg_wxio_dest(&cinfo, stream);
	294
	295	cinfo.image_width = image->GetWidth();
	296	cinfo.image_height = image->GetHeight();
	297	cinfo.input_components = 3;
	298	cinfo.in_color_space = JCS_RGB;
	299	jpeg_set_defaults(&cinfo);
	300	jpeg_start_compress(&cinfo, TRUE);
	301
	302	stride = cinfo.image_width * 3; /* JSAMPLEs per row in image_buffer */
	303	image_buffer = image->GetData();
	304	while (cinfo.next_scanline < cinfo.image_height) {
	305	row_pointer[0] = &image_buffer[cinfo.next_scanline * stride];
	306	jpeg_write_scanlines( &cinfo, row_pointer, 1 );
	307	}
	308	jpeg_finish_compress(&cinfo);
	309	jpeg_destroy_compress(&cinfo);
	310
	311	return TRUE;
	312	}
	313	#endif // wxUSE_STREAMS
	314
	315	#endif
	316
	317	// wxUSE_LIBJPEG
	318
	319
	320
	321
	322
	323
	324