353 lines
10 KiB
C++
353 lines
10 KiB
C++
/*
|
|
* Copyright (c) 2007, Digital Signal Processing Laboratory, Università degli studi di Perugia (UPG), Italy
|
|
* All rights reserved.
|
|
*
|
|
* Redistribution and use in source and binary forms, with or without
|
|
* modification, are permitted provided that the following conditions
|
|
* are met:
|
|
* 1. Redistributions of source code must retain the above copyright
|
|
* notice, this list of conditions and the following disclaimer.
|
|
* 2. Redistributions in binary form must reproduce the above copyright
|
|
* notice, this list of conditions and the following disclaimer in the
|
|
* documentation and/or other materials provided with the distribution.
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS `AS IS'
|
|
* AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
|
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
|
* ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
|
|
* LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
|
|
* CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
|
|
* SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
|
|
* INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
|
|
* CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
|
|
* ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
|
|
* POSSIBILITY OF SUCH DAMAGE.
|
|
*/
|
|
/////////////////////////////////////////////////////////////////////////////
|
|
// Name: imagj2k.cpp
|
|
// Purpose: wxImage JPEG 2000 codestream handler
|
|
// Author: Giuseppe Baruffa - based on imagjpeg.cpp, Vaclav Slavik
|
|
// RCS-ID: $Id: imagj2k.cpp,v 0.00 2007/02/08 23:59:00 MW Exp $
|
|
// Copyright: (c) Giuseppe Baruffa
|
|
// Licence: wxWindows licence
|
|
/////////////////////////////////////////////////////////////////////////////
|
|
|
|
// For compilers that support precompilation, includes "wx.h".
|
|
#include "wx/wxprec.h"
|
|
|
|
#ifdef __BORLANDC__
|
|
#pragma hdrstop
|
|
#endif
|
|
|
|
#if wxUSE_IMAGE && wxUSE_LIBOPENJPEG
|
|
|
|
#include "imagj2k.h"
|
|
|
|
#ifndef WX_PRECOMP
|
|
#include "wx/log.h"
|
|
#include "wx/app.h"
|
|
#include "wx/intl.h"
|
|
#include "wx/bitmap.h"
|
|
#include "wx/module.h"
|
|
#endif
|
|
|
|
#include "wx/filefn.h"
|
|
#include "wx/wfstream.h"
|
|
|
|
// ----------------------------------------------------------------------------
|
|
// types
|
|
// ----------------------------------------------------------------------------
|
|
|
|
|
|
//-----------------------------------------------------------------------------
|
|
// wxJ2KHandler
|
|
//-----------------------------------------------------------------------------
|
|
|
|
IMPLEMENT_DYNAMIC_CLASS(wxJ2KHandler,wxImageHandler)
|
|
|
|
#if wxUSE_STREAMS
|
|
|
|
//------------- JPEG 2000 Data Source Manager
|
|
|
|
#define J2K_CFMT 0
|
|
#define JP2_CFMT 1
|
|
#define JPT_CFMT 2
|
|
#define MJ2_CFMT 3
|
|
#define PXM_DFMT 0
|
|
#define PGX_DFMT 1
|
|
#define BMP_DFMT 2
|
|
#define YUV_DFMT 3
|
|
|
|
#define MAX_MESSAGE_LEN 200
|
|
|
|
/* sample error callback expecting a FILE* client object */
|
|
void j2k_error_callback(const char *msg, void *client_data) {
|
|
int message_len = strlen(msg) - 1;
|
|
if (msg[message_len] != '\n')
|
|
message_len = MAX_MESSAGE_LEN;
|
|
wxMutexGuiEnter();
|
|
wxLogMessage(wxT("[ERROR] %.*s"), message_len, msg);
|
|
wxMutexGuiLeave();
|
|
}
|
|
/* sample warning callback expecting a FILE* client object */
|
|
void j2k_warning_callback(const char *msg, void *client_data) {
|
|
int message_len = strlen(msg) - 1;
|
|
if (msg[message_len] != '\n')
|
|
message_len = MAX_MESSAGE_LEN;
|
|
wxMutexGuiEnter();
|
|
wxLogMessage(wxT("[WARNING] %.*s"), message_len, msg);
|
|
wxMutexGuiLeave();
|
|
}
|
|
/* sample debug callback expecting no client object */
|
|
void j2k_info_callback(const char *msg, void *client_data) {
|
|
int message_len = strlen(msg) - 1;
|
|
if (msg[message_len] != '\n')
|
|
message_len = MAX_MESSAGE_LEN;
|
|
wxMutexGuiEnter();
|
|
wxLogMessage(wxT("[INFO] %.*s"), message_len, msg);
|
|
wxMutexGuiLeave();
|
|
}
|
|
|
|
// load the j2k codestream
|
|
bool wxJ2KHandler::LoadFile(wxImage *image, wxInputStream& stream, bool verbose, int index)
|
|
{
|
|
opj_dparameters_t parameters; /* decompression parameters */
|
|
opj_event_mgr_t event_mgr; /* event manager */
|
|
opj_image_t *opjimage = NULL;
|
|
unsigned char *src = NULL;
|
|
unsigned char *ptr;
|
|
int file_length;
|
|
int shiftbpp;
|
|
int c, tempcomps;
|
|
|
|
// destroy the image
|
|
image->Destroy();
|
|
|
|
/* handle to a decompressor */
|
|
opj_dinfo_t* dinfo = NULL;
|
|
opj_cio_t *cio = NULL;
|
|
|
|
|
|
/* configure the event callbacks (not required) */
|
|
memset(&event_mgr, 0, sizeof(opj_event_mgr_t));
|
|
event_mgr.error_handler = j2k_error_callback;
|
|
event_mgr.warning_handler = j2k_warning_callback;
|
|
event_mgr.info_handler = j2k_info_callback;
|
|
|
|
/* set decoding parameters to default values */
|
|
opj_set_default_decoder_parameters(¶meters);
|
|
|
|
/* prepare parameters */
|
|
strncpy(parameters.infile, "", sizeof(parameters.infile)-1);
|
|
strncpy(parameters.outfile, "", sizeof(parameters.outfile)-1);
|
|
parameters.decod_format = J2K_CFMT;
|
|
parameters.cod_format = BMP_DFMT;
|
|
if (m_reducefactor)
|
|
parameters.cp_reduce = m_reducefactor;
|
|
if (m_qualitylayers)
|
|
parameters.cp_layer = m_qualitylayers;
|
|
/*if (n_components)
|
|
parameters. = n_components;*/
|
|
|
|
/* JPWL only */
|
|
#ifdef USE_JPWL
|
|
parameters.jpwl_exp_comps = m_expcomps;
|
|
parameters.jpwl_max_tiles = m_maxtiles;
|
|
parameters.jpwl_correct = m_enablejpwl;
|
|
#endif /* USE_JPWL */
|
|
|
|
/* get a decoder handle */
|
|
dinfo = opj_create_decompress(CODEC_J2K);
|
|
|
|
/* find length of the stream */
|
|
stream.SeekI(0, wxFromEnd);
|
|
file_length = (int) stream.TellI();
|
|
|
|
/* get data */
|
|
stream.SeekI(0, wxFromStart);
|
|
src = (unsigned char *) malloc(file_length);
|
|
stream.Read(src, file_length);
|
|
|
|
/* catch events using our callbacks and give a local context */
|
|
opj_set_event_mgr((opj_common_ptr)dinfo, &event_mgr, stderr);
|
|
|
|
/* setup the decoder decoding parameters using user parameters */
|
|
opj_setup_decoder(dinfo, ¶meters);
|
|
|
|
/* open a byte stream */
|
|
cio = opj_cio_open((opj_common_ptr)dinfo, src, file_length);
|
|
|
|
/* decode the stream and fill the image structure */
|
|
opjimage = opj_decode(dinfo, cio);
|
|
if (!opjimage) {
|
|
wxMutexGuiEnter();
|
|
wxLogError(wxT("J2K: failed to decode image!"));
|
|
wxMutexGuiLeave();
|
|
opj_destroy_decompress(dinfo);
|
|
opj_cio_close(cio);
|
|
opj_image_destroy(opjimage);
|
|
free(src);
|
|
return false;
|
|
}
|
|
|
|
/* close the byte stream */
|
|
opj_cio_close(cio);
|
|
|
|
// check image components
|
|
|
|
// check image depth (only on the first one, for now)
|
|
shiftbpp = opjimage->comps[0].prec - 8;
|
|
|
|
// prepare image size
|
|
image->Create(opjimage->comps[0].w, opjimage->comps[0].h, true );
|
|
|
|
// access image raw data
|
|
image->SetMask( false );
|
|
ptr = image->GetData();
|
|
|
|
// workaround for components different from 1 or 3
|
|
if ((opjimage->numcomps != 1) && (opjimage->numcomps != 3)) {
|
|
wxMutexGuiEnter();
|
|
wxLogMessage(wxT("J2K: weird number of components"));
|
|
tempcomps = 1;
|
|
wxMutexGuiLeave();
|
|
} else
|
|
tempcomps = opjimage->numcomps;
|
|
|
|
// workaround for subsampled components
|
|
for (c = 1; c < tempcomps; c++) {
|
|
if ((opjimage->comps[c].w != opjimage->comps[c - 1].w) || (opjimage->comps[c].h != opjimage->comps[c - 1].h)) {
|
|
tempcomps = 1;
|
|
break;
|
|
}
|
|
}
|
|
|
|
// workaround for different precision components
|
|
for (c = 1; c < tempcomps; c++) {
|
|
if (opjimage->comps[c].bpp != opjimage->comps[c - 1].bpp) {
|
|
tempcomps = 1;
|
|
break;
|
|
}
|
|
}
|
|
|
|
|
|
// RGB color picture
|
|
if (tempcomps == 3) {
|
|
int row, col;
|
|
int *r = opjimage->comps[0].data;
|
|
int *g = opjimage->comps[1].data;
|
|
int *b = opjimage->comps[2].data;
|
|
if (shiftbpp > 0) {
|
|
for (row = 0; row < opjimage->comps[0].h; row++) {
|
|
for (col = 0; col < opjimage->comps[0].w; col++) {
|
|
|
|
*(ptr++) = (*(r++)) >> shiftbpp;
|
|
*(ptr++) = (*(g++)) >> shiftbpp;
|
|
*(ptr++) = (*(b++)) >> shiftbpp;
|
|
|
|
}
|
|
}
|
|
|
|
} else if (shiftbpp < 0) {
|
|
for (row = 0; row < opjimage->comps[0].h; row++) {
|
|
for (col = 0; col < opjimage->comps[0].w; col++) {
|
|
|
|
*(ptr++) = (*(r++)) << -shiftbpp;
|
|
*(ptr++) = (*(g++)) << -shiftbpp;
|
|
*(ptr++) = (*(b++)) << -shiftbpp;
|
|
|
|
}
|
|
}
|
|
|
|
} else {
|
|
for (row = 0; row < opjimage->comps[0].h; row++) {
|
|
for (col = 0; col < opjimage->comps[0].w; col++) {
|
|
|
|
*(ptr++) = *(r++);
|
|
*(ptr++) = *(g++);
|
|
*(ptr++) = *(b++);
|
|
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
// B/W picture
|
|
if (tempcomps == 1) {
|
|
int row, col;
|
|
int *y = opjimage->comps[0].data;
|
|
if (shiftbpp > 0) {
|
|
for (row = 0; row < opjimage->comps[0].h; row++) {
|
|
for (col = 0; col < opjimage->comps[0].w; col++) {
|
|
|
|
*(ptr++) = (*(y)) >> shiftbpp;
|
|
*(ptr++) = (*(y)) >> shiftbpp;
|
|
*(ptr++) = (*(y++)) >> shiftbpp;
|
|
|
|
}
|
|
}
|
|
} else if (shiftbpp < 0) {
|
|
for (row = 0; row < opjimage->comps[0].h; row++) {
|
|
for (col = 0; col < opjimage->comps[0].w; col++) {
|
|
|
|
*(ptr++) = (*(y)) << -shiftbpp;
|
|
*(ptr++) = (*(y)) << -shiftbpp;
|
|
*(ptr++) = (*(y++)) << -shiftbpp;
|
|
|
|
}
|
|
}
|
|
} else {
|
|
for (row = 0; row < opjimage->comps[0].h; row++) {
|
|
for (col = 0; col < opjimage->comps[0].w; col++) {
|
|
|
|
*(ptr++) = *(y);
|
|
*(ptr++) = *(y);
|
|
*(ptr++) = *(y++);
|
|
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
wxMutexGuiEnter();
|
|
wxLogMessage(wxT("J2K: image loaded."));
|
|
wxMutexGuiLeave();
|
|
|
|
/* close openjpeg structs */
|
|
opj_destroy_decompress(dinfo);
|
|
opj_image_destroy(opjimage);
|
|
free(src);
|
|
|
|
if (!image->Ok())
|
|
return false;
|
|
else
|
|
return true;
|
|
|
|
}
|
|
|
|
// save the j2k codestream
|
|
bool wxJ2KHandler::SaveFile( wxImage *image, wxOutputStream& stream, bool verbose )
|
|
{
|
|
wxLogError(wxT("J2K: Couldn't save image -> not implemented."));
|
|
return false;
|
|
}
|
|
|
|
#ifdef __VISUALC__
|
|
#pragma warning(default:4611)
|
|
#endif /* VC++ */
|
|
|
|
// recognize the 0xFF4F JPEG 2000 SOC marker
|
|
bool wxJ2KHandler::DoCanRead( wxInputStream& stream )
|
|
{
|
|
unsigned char hdr[2];
|
|
|
|
if ( !stream.Read(hdr, WXSIZEOF(hdr)) )
|
|
return false;
|
|
|
|
return hdr[0] == 0xFF && hdr[1] == 0x4F;
|
|
}
|
|
|
|
#endif // wxUSE_STREAMS
|
|
|
|
#endif // wxUSE_LIBOPENJPEG
|