502 lines
16 KiB
C++
502 lines
16 KiB
C++
/*M///////////////////////////////////////////////////////////////////////////////////////
|
|
//
|
|
// IMPORTANT: READ BEFORE DOWNLOADING, COPYING, INSTALLING OR USING.
|
|
//
|
|
// By downloading, copying, installing or using the software you agree to this license.
|
|
// If you do not agree to this license, do not download, install,
|
|
// copy or use the software.
|
|
//
|
|
//
|
|
// Intel License Agreement
|
|
// For Open Source Computer Vision Library
|
|
//
|
|
// Copyright (C) 2000, Intel Corporation, all rights reserved.
|
|
// Third party copyrights are property of their respective owners.
|
|
//
|
|
// Redistribution and use in source and binary forms, with or without modification,
|
|
// are permitted provided that the following conditions are met:
|
|
//
|
|
// * Redistribution's of source code must retain the above copyright notice,
|
|
// this list of conditions and the following disclaimer.
|
|
//
|
|
// * Redistribution's 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.
|
|
//
|
|
// * The name of Intel Corporation may not be used to endorse or promote products
|
|
// derived from this software without specific prior written permission.
|
|
//
|
|
// 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 Intel Corporation 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.
|
|
//
|
|
//M*/
|
|
|
|
#include "_highgui.h"
|
|
|
|
#ifdef HAVE_JASPER
|
|
|
|
#include "grfmt_jpeg2000.h"
|
|
|
|
// JPEG-2000 Filter Factory
|
|
GrFmtJpeg2000::GrFmtJpeg2000()
|
|
{
|
|
m_sign_len = 12;
|
|
m_signature = "\x00\x00\x00\x0cjP \r\n\x87\n";
|
|
m_description = "JPEG-2000 files (*.jp2)";
|
|
jas_init();
|
|
}
|
|
|
|
|
|
GrFmtJpeg2000::~GrFmtJpeg2000()
|
|
{
|
|
jas_cleanup();
|
|
}
|
|
|
|
|
|
GrFmtReader* GrFmtJpeg2000::NewReader( const char* filename )
|
|
{
|
|
return new GrFmtJpeg2000Reader( filename );
|
|
}
|
|
|
|
|
|
GrFmtWriter* GrFmtJpeg2000::NewWriter( const char* filename )
|
|
{
|
|
return new GrFmtJpeg2000Writer( filename );
|
|
}
|
|
|
|
|
|
/////////////////////// GrFmtJpeg2000Reader ///////////////////
|
|
|
|
GrFmtJpeg2000Reader::GrFmtJpeg2000Reader( const char* filename ) : GrFmtReader( filename )
|
|
{
|
|
m_stream = 0;
|
|
m_image = 0;
|
|
}
|
|
|
|
|
|
GrFmtJpeg2000Reader::~GrFmtJpeg2000Reader()
|
|
{
|
|
}
|
|
|
|
|
|
void GrFmtJpeg2000Reader::Close()
|
|
{
|
|
if( m_stream )
|
|
{
|
|
jas_stream_close( m_stream );
|
|
m_stream = 0;
|
|
}
|
|
|
|
if( m_image )
|
|
{
|
|
jas_image_destroy( m_image );
|
|
m_image = 0;
|
|
}
|
|
GrFmtReader::Close();
|
|
}
|
|
|
|
|
|
bool GrFmtJpeg2000Reader::ReadHeader()
|
|
{
|
|
bool result = false;
|
|
|
|
Close();
|
|
|
|
m_stream = jas_stream_fopen( m_filename, "rb" );
|
|
if( m_stream )
|
|
{
|
|
m_image = jas_image_decode( m_stream, -1, 0 );
|
|
if( m_image ) {
|
|
m_width = jas_image_width( m_image );
|
|
m_height = jas_image_height( m_image );
|
|
|
|
int cntcmpts = 0; // count the known components
|
|
int numcmpts = jas_image_numcmpts( m_image );
|
|
for( int i = 0; i < numcmpts; i++ )
|
|
{
|
|
int depth = jas_image_cmptprec( m_image, i );
|
|
if( depth > m_bit_depth )
|
|
m_bit_depth = depth;
|
|
if( m_bit_depth > 8 )
|
|
m_bit_depth = 16;
|
|
|
|
if( jas_image_cmpttype( m_image, i ) > 2 )
|
|
continue;
|
|
cntcmpts++;
|
|
}
|
|
|
|
if( cntcmpts )
|
|
{
|
|
m_iscolor = (cntcmpts > 1);
|
|
|
|
result = true;
|
|
}
|
|
}
|
|
}
|
|
|
|
if( !result )
|
|
Close();
|
|
|
|
return result;
|
|
}
|
|
|
|
|
|
bool GrFmtJpeg2000Reader::ReadData( uchar* data, int step, int color )
|
|
{
|
|
bool result = false;
|
|
|
|
color = color > 0 || ( m_iscolor && color < 0 );
|
|
|
|
if( m_stream && m_image )
|
|
{
|
|
bool convert;
|
|
int colorspace;
|
|
if( color )
|
|
{
|
|
convert = (jas_image_clrspc( m_image ) != JAS_CLRSPC_SRGB);
|
|
colorspace = JAS_CLRSPC_SRGB;
|
|
}
|
|
else
|
|
{
|
|
convert = (jas_clrspc_fam( jas_image_clrspc( m_image ) ) != JAS_CLRSPC_FAM_GRAY);
|
|
colorspace = JAS_CLRSPC_SGRAY; // TODO GENGRAY or SGRAY?
|
|
}
|
|
|
|
// convert to the desired colorspace
|
|
if( convert )
|
|
{
|
|
jas_cmprof_t *clrprof = jas_cmprof_createfromclrspc( colorspace );
|
|
if( clrprof )
|
|
{
|
|
jas_image_t *img = jas_image_chclrspc( m_image, clrprof, JAS_CMXFORM_INTENT_RELCLR );
|
|
if( img )
|
|
{
|
|
jas_image_destroy( m_image );
|
|
m_image = img;
|
|
result = true;
|
|
}
|
|
else
|
|
fprintf(stderr, "JPEG 2000 LOADER ERROR: cannot convert colorspace\n");
|
|
jas_cmprof_destroy( clrprof );
|
|
}
|
|
else
|
|
fprintf(stderr, "JPEG 2000 LOADER ERROR: unable to create colorspace\n");
|
|
}
|
|
else
|
|
result = true;
|
|
|
|
if( result )
|
|
{
|
|
int ncmpts;
|
|
int cmptlut[3];
|
|
if( color )
|
|
{
|
|
cmptlut[0] = jas_image_getcmptbytype( m_image, JAS_IMAGE_CT_RGB_B );
|
|
cmptlut[1] = jas_image_getcmptbytype( m_image, JAS_IMAGE_CT_RGB_G );
|
|
cmptlut[2] = jas_image_getcmptbytype( m_image, JAS_IMAGE_CT_RGB_R );
|
|
if( cmptlut[0] < 0 || cmptlut[1] < 0 || cmptlut[0] < 0 )
|
|
result = false;
|
|
ncmpts = 3;
|
|
}
|
|
else
|
|
{
|
|
cmptlut[0] = jas_image_getcmptbytype( m_image, JAS_IMAGE_CT_GRAY_Y );
|
|
if( cmptlut[0] < 0 )
|
|
result = false;
|
|
ncmpts = 1;
|
|
}
|
|
|
|
if( result )
|
|
{
|
|
for( int i = 0; i < ncmpts; i++ )
|
|
{
|
|
int maxval = 1 << jas_image_cmptprec( m_image, cmptlut[i] );
|
|
int offset = jas_image_cmptsgnd( m_image, cmptlut[i] ) ? maxval / 2 : 0;
|
|
|
|
int yend = jas_image_cmptbry( m_image, cmptlut[i] );
|
|
int ystep = jas_image_cmptvstep( m_image, cmptlut[i] );
|
|
int xend = jas_image_cmptbrx( m_image, cmptlut[i] );
|
|
int xstep = jas_image_cmpthstep( m_image, cmptlut[i] );
|
|
|
|
jas_matrix_t *buffer = jas_matrix_create( yend / ystep, xend / xstep );
|
|
if( buffer )
|
|
{
|
|
if( !jas_image_readcmpt( m_image, cmptlut[i], 0, 0, xend / xstep, yend / ystep, buffer ))
|
|
{
|
|
if( m_bit_depth == 8 || !m_native_depth )
|
|
result = ReadComponent8u( data + i, buffer, step, cmptlut[i], maxval, offset, ncmpts );
|
|
else
|
|
result = ReadComponent16u( ((unsigned short *)data) + i, buffer, step / 2, cmptlut[i], maxval, offset, ncmpts );
|
|
if( !result )
|
|
{
|
|
i = ncmpts;
|
|
result = false;
|
|
}
|
|
}
|
|
jas_matrix_destroy( buffer );
|
|
}
|
|
}
|
|
}
|
|
}
|
|
else
|
|
fprintf(stderr, "JPEG2000 LOADER ERROR: colorspace conversion failed\n" );
|
|
}
|
|
|
|
Close();
|
|
|
|
return result;
|
|
}
|
|
|
|
|
|
bool GrFmtJpeg2000Reader::ReadComponent8u( uchar *data, jas_matrix_t *buffer,
|
|
int step, int cmpt,
|
|
int maxval, int offset, int ncmpts )
|
|
{
|
|
int xstart = jas_image_cmpttlx( m_image, cmpt );
|
|
int xend = jas_image_cmptbrx( m_image, cmpt );
|
|
int xstep = jas_image_cmpthstep( m_image, cmpt );
|
|
int xoffset = jas_image_tlx( m_image );
|
|
int ystart = jas_image_cmpttly( m_image, cmpt );
|
|
int yend = jas_image_cmptbry( m_image, cmpt );
|
|
int ystep = jas_image_cmptvstep( m_image, cmpt );
|
|
int yoffset = jas_image_tly( m_image );
|
|
int x, y, x1, y1, j;
|
|
int rshift = cvRound(log(maxval/256.)/log(2.));
|
|
int lshift = MAX(0, -rshift);
|
|
rshift = MAX(0, rshift);
|
|
int delta = (rshift > 0 ? 1 << (rshift - 1) : 0) + offset;
|
|
|
|
for( y = 0; y < yend - ystart; )
|
|
{
|
|
jas_seqent_t* pix_row = &jas_matrix_get( buffer, y / ystep, 0 );
|
|
uchar* dst = data + (y - yoffset) * step - xoffset;
|
|
|
|
if( xstep == 1 )
|
|
{
|
|
if( maxval == 256 && offset == 0 )
|
|
for( x = 0; x < xend - xstart; x++ )
|
|
{
|
|
int pix = pix_row[x];
|
|
dst[x*ncmpts] = CV_CAST_8U(pix);
|
|
}
|
|
else
|
|
for( x = 0; x < xend - xstart; x++ )
|
|
{
|
|
int pix = ((pix_row[x] + delta) >> rshift) << lshift;
|
|
dst[x*ncmpts] = CV_CAST_8U(pix);
|
|
}
|
|
}
|
|
else if( xstep == 2 && offset == 0 )
|
|
for( x = 0, j = 0; x < xend - xstart; x += 2, j++ )
|
|
{
|
|
int pix = ((pix_row[j] + delta) >> rshift) << lshift;
|
|
dst[x*ncmpts] = dst[(x+1)*ncmpts] = CV_CAST_8U(pix);
|
|
}
|
|
else
|
|
for( x = 0, j = 0; x < xend - xstart; j++ )
|
|
{
|
|
int pix = ((pix_row[j] + delta) >> rshift) << lshift;
|
|
pix = CV_CAST_8U(pix);
|
|
for( x1 = x + xstep; x < x1; x++ )
|
|
dst[x*ncmpts] = (uchar)pix;
|
|
}
|
|
y1 = y + ystep;
|
|
for( ++y; y < y1; y++, dst += step )
|
|
for( x = 0; x < xend - xstart; x++ )
|
|
dst[x*ncmpts + step] = dst[x*ncmpts];
|
|
}
|
|
|
|
return true;
|
|
}
|
|
|
|
|
|
bool GrFmtJpeg2000Reader::ReadComponent16u( unsigned short *data, jas_matrix_t *buffer,
|
|
int step, int cmpt,
|
|
int maxval, int offset, int ncmpts )
|
|
{
|
|
int xstart = jas_image_cmpttlx( m_image, cmpt );
|
|
int xend = jas_image_cmptbrx( m_image, cmpt );
|
|
int xstep = jas_image_cmpthstep( m_image, cmpt );
|
|
int xoffset = jas_image_tlx( m_image );
|
|
int ystart = jas_image_cmpttly( m_image, cmpt );
|
|
int yend = jas_image_cmptbry( m_image, cmpt );
|
|
int ystep = jas_image_cmptvstep( m_image, cmpt );
|
|
int yoffset = jas_image_tly( m_image );
|
|
int x, y, x1, y1, j;
|
|
int rshift = cvRound(log(maxval/65536.)/log(2.));
|
|
int lshift = MAX(0, -rshift);
|
|
rshift = MAX(0, rshift);
|
|
int delta = (rshift > 0 ? 1 << (rshift - 1) : 0) + offset;
|
|
|
|
for( y = 0; y < yend - ystart; )
|
|
{
|
|
jas_seqent_t* pix_row = &jas_matrix_get( buffer, y / ystep, 0 );
|
|
ushort* dst = data + (y - yoffset) * step - xoffset;
|
|
|
|
if( xstep == 1 )
|
|
{
|
|
if( maxval == 65536 && offset == 0 )
|
|
for( x = 0; x < xend - xstart; x++ )
|
|
{
|
|
int pix = pix_row[x];
|
|
dst[x*ncmpts] = CV_CAST_16U(pix);
|
|
}
|
|
else
|
|
for( x = 0; x < xend - xstart; x++ )
|
|
{
|
|
int pix = ((pix_row[x] + delta) >> rshift) << lshift;
|
|
dst[x*ncmpts] = CV_CAST_16U(pix);
|
|
}
|
|
}
|
|
else if( xstep == 2 && offset == 0 )
|
|
for( x = 0, j = 0; x < xend - xstart; x += 2, j++ )
|
|
{
|
|
int pix = ((pix_row[j] + delta) >> rshift) << lshift;
|
|
dst[x*ncmpts] = dst[(x+1)*ncmpts] = CV_CAST_16U(pix);
|
|
}
|
|
else
|
|
for( x = 0, j = 0; x < xend - xstart; j++ )
|
|
{
|
|
int pix = ((pix_row[j] + delta) >> rshift) << lshift;
|
|
pix = CV_CAST_16U(pix);
|
|
for( x1 = x + xstep; x < x1; x++ )
|
|
dst[x*ncmpts] = (ushort)pix;
|
|
}
|
|
y1 = y + ystep;
|
|
for( ++y; y < y1; y++, dst += step )
|
|
for( x = 0; x < xend - xstart; x++ )
|
|
dst[x*ncmpts + step] = dst[x*ncmpts];
|
|
}
|
|
|
|
return true;
|
|
}
|
|
|
|
|
|
/////////////////////// GrFmtJpeg2000Writer ///////////////////
|
|
|
|
|
|
GrFmtJpeg2000Writer::GrFmtJpeg2000Writer( const char* filename ) : GrFmtWriter( filename )
|
|
{
|
|
}
|
|
|
|
|
|
GrFmtJpeg2000Writer::~GrFmtJpeg2000Writer()
|
|
{
|
|
}
|
|
|
|
|
|
bool GrFmtJpeg2000Writer::IsFormatSupported( int depth )
|
|
{
|
|
return depth == IPL_DEPTH_8U || depth == IPL_DEPTH_16U;
|
|
}
|
|
|
|
|
|
bool GrFmtJpeg2000Writer::WriteImage( const uchar* data, int step,
|
|
int width, int height, int depth, int channels )
|
|
{
|
|
if( channels > 3 || channels < 1 )
|
|
return false;
|
|
|
|
jas_image_cmptparm_t component_info[3];
|
|
for( int i = 0; i < channels; i++ )
|
|
{
|
|
component_info[i].tlx = 0;
|
|
component_info[i].tly = 0;
|
|
component_info[i].hstep = 1;
|
|
component_info[i].vstep = 1;
|
|
component_info[i].width = width;
|
|
component_info[i].height = height;
|
|
component_info[i].prec = depth;
|
|
component_info[i].sgnd = 0;
|
|
}
|
|
jas_image_t *img = jas_image_create( channels, component_info, (channels == 1) ? JAS_CLRSPC_SGRAY : JAS_CLRSPC_SRGB );
|
|
if( !img )
|
|
return false;
|
|
|
|
if(channels == 1)
|
|
jas_image_setcmpttype( img, 0, JAS_IMAGE_CT_GRAY_Y );
|
|
else
|
|
{
|
|
jas_image_setcmpttype( img, 0, JAS_IMAGE_CT_RGB_B );
|
|
jas_image_setcmpttype( img, 1, JAS_IMAGE_CT_RGB_G );
|
|
jas_image_setcmpttype( img, 2, JAS_IMAGE_CT_RGB_R );
|
|
}
|
|
|
|
bool result;
|
|
if( depth == 8 )
|
|
result = WriteComponent8u( img, data, step, channels, width, height );
|
|
else
|
|
result = WriteComponent16u( img, (const unsigned short *)data, step / 2, channels, width, height );
|
|
if( result )
|
|
{
|
|
jas_stream_t *stream = jas_stream_fopen( m_filename, "wb" );
|
|
if( stream )
|
|
{
|
|
result = !jas_image_encode( img, stream, jas_image_strtofmt( "jp2" ), "" );
|
|
|
|
jas_stream_close( stream );
|
|
}
|
|
|
|
}
|
|
jas_image_destroy( img );
|
|
|
|
return result;
|
|
}
|
|
|
|
|
|
bool GrFmtJpeg2000Writer::WriteComponent8u( jas_image_t *img, const uchar *data,
|
|
int step, int ncmpts, int w, int h )
|
|
{
|
|
jas_matrix_t *row = jas_matrix_create( 1, w );
|
|
if(!row)
|
|
return false;
|
|
|
|
for( int y = 0; y < h; y++, data += step )
|
|
{
|
|
for( int i = 0; i < ncmpts; i++ )
|
|
{
|
|
for( int x = 0; x < w; x++)
|
|
jas_matrix_setv( row, x, data[x * ncmpts + i] );
|
|
jas_image_writecmpt( img, i, 0, y, w, 1, row );
|
|
}
|
|
}
|
|
|
|
jas_matrix_destroy( row );
|
|
|
|
return true;
|
|
}
|
|
|
|
|
|
bool GrFmtJpeg2000Writer::WriteComponent16u( jas_image_t *img, const unsigned short *data,
|
|
int step, int ncmpts, int w, int h )
|
|
{
|
|
jas_matrix_t *row = jas_matrix_create( 1, w );
|
|
if(!row)
|
|
return false;
|
|
|
|
for( int y = 0; y < h; y++, data += step )
|
|
{
|
|
for( int i = 0; i < ncmpts; i++ )
|
|
{
|
|
for( int x = 0; x < w; x++)
|
|
jas_matrix_setv( row, x, data[x * ncmpts + i] );
|
|
jas_image_writecmpt( img, i, 0, y, w, 1, row );
|
|
}
|
|
}
|
|
|
|
jas_matrix_destroy( row );
|
|
|
|
return true;
|
|
}
|
|
|
|
#endif
|
|
|
|
/* End of file. */
|