src/lib/openjp2/openjpeg.c

   1 /*
   2  * The copyright in this software is being made available under the 2-clauses
   3  * BSD License, included below. This software may be subject to other third
   4  * party and contributor rights, including patent rights, and no such rights
   5  * are granted under this license.
   6  *
   7  * Copyright (c) 2005, Herve Drolon, FreeImage Team
   8  * Copyright (c) 2008, 2011-2012, Centre National d'Etudes Spatiales (CNES), FR
   9  * Copyright (c) 2012, CS Systemes d'Information, France
  10  * All rights reserved.
  11  *
  12  * Redistribution and use in source and binary forms, with or without
  13  * modification, are permitted provided that the following conditions
  14  * are met:
  15  * 1. Redistributions of source code must retain the above copyright
  16  *    notice, this list of conditions and the following disclaimer.
  17  * 2. Redistributions in binary form must reproduce the above copyright
  18  *    notice, this list of conditions and the following disclaimer in the
  19  *    documentation and/or other materials provided with the distribution.
  20  *
  21  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS `AS IS'
  22  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  24  * ARE DISCLAIMED.  IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
  25  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
  26  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
  27  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
  28  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
  29  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
  30  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
  31  * POSSIBILITY OF SUCH DAMAGE.
  32  */
  33
  34 #ifdef _WIN32
  35 #include <windows.h>
  36 #endif /* _WIN32 */
  37
  38 #include "opj_includes.h"
  39
  40
  41 /* ---------------------------------------------------------------------- */
  42 /* Functions to set the message handlers */
  43
  44 OPJ_BOOL OPJ_CALLCONV opj_set_info_handler(     opj_codec_t * p_codec,
  45                                                                                         opj_msg_callback p_callback,
  46                                                                                         void * p_user_data)
  47 {
  48         opj_codec_private_t * l_codec = (opj_codec_private_t *) p_codec;
  49         if(! l_codec){
  50                 return OPJ_FALSE;
  51         }
  52
  53         l_codec->m_event_mgr.info_handler = p_callback;
  54         l_codec->m_event_mgr.m_info_data = p_user_data;
  55
  56         return OPJ_TRUE;
  57 }
  58
  59 OPJ_BOOL OPJ_CALLCONV opj_set_warning_handler(  opj_codec_t * p_codec,
  60                                                                                                 opj_msg_callback p_callback,
  61                                                                                                 void * p_user_data)
  62 {
  63         opj_codec_private_t * l_codec = (opj_codec_private_t *) p_codec;
  64         if (! l_codec) {
  65                 return OPJ_FALSE;
  66         }
  67
  68         l_codec->m_event_mgr.warning_handler = p_callback;
  69         l_codec->m_event_mgr.m_warning_data = p_user_data;
  70
  71         return OPJ_TRUE;
  72 }
  73
  74 OPJ_BOOL OPJ_CALLCONV opj_set_error_handler(opj_codec_t * p_codec,
  75                                                                                         opj_msg_callback p_callback,
  76                                                                                         void * p_user_data)
  77 {
  78         opj_codec_private_t * l_codec = (opj_codec_private_t *) p_codec;
  79         if (! l_codec) {
  80                 return OPJ_FALSE;
  81         }
  82
  83         l_codec->m_event_mgr.error_handler = p_callback;
  84         l_codec->m_event_mgr.m_error_data = p_user_data;
  85
  86         return OPJ_TRUE;
  87 }
  88
  89 /* ---------------------------------------------------------------------- */
  90
  91 static OPJ_SIZE_T opj_read_from_file (void * p_buffer, OPJ_SIZE_T p_nb_bytes, FILE * p_file)
  92 {
  93         OPJ_SIZE_T l_nb_read = fread(p_buffer,1,p_nb_bytes,p_file);
  94         return l_nb_read ? l_nb_read : (OPJ_SIZE_T)-1;
  95 }
  96
  97 static OPJ_UINT64 opj_get_data_length_from_file (FILE * p_file)
  98 {
  99         OPJ_OFF_T file_length = 0;
 100
 101         OPJ_FSEEK(p_file, 0, SEEK_END);
 102         file_length = (OPJ_OFF_T)OPJ_FTELL(p_file);
 103         OPJ_FSEEK(p_file, 0, SEEK_SET);
 104
 105         return (OPJ_UINT64)file_length;
 106 }
 107
 108 static OPJ_SIZE_T opj_write_from_file (void * p_buffer, OPJ_SIZE_T p_nb_bytes, FILE * p_file)
 109 {
 110         return fwrite(p_buffer,1,p_nb_bytes,p_file);
 111 }
 112
 113 static OPJ_OFF_T opj_skip_from_file (OPJ_OFF_T p_nb_bytes, FILE * p_user_data)
 114 {
 115         if (OPJ_FSEEK(p_user_data,p_nb_bytes,SEEK_CUR)) {
 116                 return -1;
 117         }
 118
 119         return p_nb_bytes;
 120 }
 121
 122 static OPJ_BOOL opj_seek_from_file (OPJ_OFF_T p_nb_bytes, FILE * p_user_data)
 123 {
 124         if (OPJ_FSEEK(p_user_data,p_nb_bytes,SEEK_SET)) {
 125                 return OPJ_FALSE;
 126         }
 127
 128         return OPJ_TRUE;
 129 }
 130
 131 /* ---------------------------------------------------------------------- */
 132 #ifdef _WIN32
 133 #ifndef OPJ_STATIC
 134 BOOL APIENTRY
 135 DllMain(HINSTANCE hModule, DWORD ul_reason_for_call, LPVOID lpReserved) {
 136
 137         OPJ_ARG_NOT_USED(lpReserved);
 138         OPJ_ARG_NOT_USED(hModule);
 139
 140         switch (ul_reason_for_call) {
 141                 case DLL_PROCESS_ATTACH :
 142                         break;
 143                 case DLL_PROCESS_DETACH :
 144                         break;
 145                 case DLL_THREAD_ATTACH :
 146                 case DLL_THREAD_DETACH :
 147                         break;
 148     }
 149
 150     return TRUE;
 151 }
 152 #endif /* OPJ_STATIC */
 153 #endif /* _WIN32 */
 154
 155 /* ---------------------------------------------------------------------- */
 156
 157 const char* OPJ_CALLCONV opj_version(void) {
 158     return OPJ_PACKAGE_VERSION;
 159 }
 160
 161 /* ---------------------------------------------------------------------- */
 162 /* DECOMPRESSION FUNCTIONS*/
 163
 164 opj_codec_t* OPJ_CALLCONV opj_create_decompress(OPJ_CODEC_FORMAT p_format)
 165 {
 166         opj_codec_private_t *l_codec = 00;
 167
 168         l_codec = (opj_codec_private_t*) opj_calloc(1, sizeof(opj_codec_private_t));
 169         if (!l_codec){
 170                 return 00;
 171         }
 172
 173         l_codec->is_decompressor = 1;
 174
 175         switch (p_format) {
 176                 case OPJ_CODEC_J2K:
 177                         l_codec->opj_dump_codec = (void (*) (void*, OPJ_INT32, FILE*)) j2k_dump;
 178
 179                         l_codec->opj_get_codec_info = (opj_codestream_info_v2_t* (*) (void*) ) j2k_get_cstr_info;
 180
 181                         l_codec->opj_get_codec_index = (opj_codestream_index_t* (*) (void*) ) j2k_get_cstr_index;
 182
 183                         l_codec->m_codec_data.m_decompression.opj_decode =
 184                                         (OPJ_BOOL (*) ( void *,
 185                                                                         struct opj_stream_private *,
 186                                                                         opj_image_t*, struct opj_event_mgr * )) opj_j2k_decode;
 187
 188                         l_codec->m_codec_data.m_decompression.opj_end_decompress =
 189                                         (OPJ_BOOL (*) ( void *,
 190                                                                         struct opj_stream_private *,
 191                                                                         struct opj_event_mgr *)) opj_j2k_end_decompress;
 192
 193                         l_codec->m_codec_data.m_decompression.opj_read_header =
 194                                         (OPJ_BOOL (*) ( struct opj_stream_private *,
 195                                                                         void *,
 196                                                                         opj_image_t **,
 197                                                                         struct opj_event_mgr * )) opj_j2k_read_header;
 198
 199                         l_codec->m_codec_data.m_decompression.opj_destroy =
 200                                         (void (*) (void *))opj_j2k_destroy;
 201
 202                         l_codec->m_codec_data.m_decompression.opj_setup_decoder =
 203                                         (void (*) (void * , opj_dparameters_t * )) opj_j2k_setup_decoder;
 204
 205                         l_codec->m_codec_data.m_decompression.opj_read_tile_header =
 206                                         (OPJ_BOOL (*) ( void *,
 207                                                                         OPJ_UINT32*,
 208                                                                         OPJ_UINT32*,
 209                                                                         OPJ_INT32*, OPJ_INT32*,
 210                                                                         OPJ_INT32*, OPJ_INT32*,
 211                                                                         OPJ_UINT32*,
 212                                                                         OPJ_BOOL*,
 213                                                                         struct opj_stream_private *,
 214                                                                         struct opj_event_mgr * )) opj_j2k_read_tile_header;
 215
 216                         l_codec->m_codec_data.m_decompression.opj_decode_tile_data =
 217                                         (OPJ_BOOL (*) ( void *,
 218                                     OPJ_UINT32,
 219                                     OPJ_BYTE*,
 220                                     OPJ_UINT32,
 221                                     struct opj_stream_private *,
 222                                     struct opj_event_mgr *)) opj_j2k_decode_tile;
 223
 224                         l_codec->m_codec_data.m_decompression.opj_set_decode_area =
 225                                         (OPJ_BOOL (*) ( void *,
 226                                     opj_image_t*,
 227                                     OPJ_INT32, OPJ_INT32, OPJ_INT32, OPJ_INT32,
 228                                     struct opj_event_mgr *)) opj_j2k_set_decode_area;
 229
 230                         l_codec->m_codec_data.m_decompression.opj_get_decoded_tile =
 231                     (OPJ_BOOL (*) ( void *p_codec,
 232                                                                     opj_stream_private_t *p_cio,
 233                                                                     opj_image_t *p_image,
 234                                                                     struct opj_event_mgr * p_manager,
 235                                                                     OPJ_UINT32 tile_index)) opj_j2k_get_tile;
 236
 237                         l_codec->m_codec_data.m_decompression.opj_set_decoded_resolution_factor =
 238                     (OPJ_BOOL (*) ( void * p_codec,
 239                                                                         OPJ_UINT32 res_factor,
 240                                                                         struct opj_event_mgr * p_manager)) opj_j2k_set_decoded_resolution_factor;
 241
 242             l_codec->opj_set_threads =
 243                     (OPJ_BOOL (*) ( void * p_codec, OPJ_UINT32 num_threads )) opj_j2k_set_threads;
 244
 245                         l_codec->m_codec = opj_j2k_create_decompress();
 246
 247                         if (! l_codec->m_codec) {
 248                                 opj_free(l_codec);
 249                                 return NULL;
 250                         }
 251
 252                         break;
 253
 254                 case OPJ_CODEC_JP2:
 255                         /* get a JP2 decoder handle */
 256                         l_codec->opj_dump_codec = (void (*) (void*, OPJ_INT32, FILE*)) jp2_dump;
 257
 258                         l_codec->opj_get_codec_info = (opj_codestream_info_v2_t* (*) (void*) ) jp2_get_cstr_info;
 259
 260                         l_codec->opj_get_codec_index = (opj_codestream_index_t* (*) (void*) ) jp2_get_cstr_index;
 261
 262                         l_codec->m_codec_data.m_decompression.opj_decode =
 263                                         (OPJ_BOOL (*) ( void *,
 264                                                                         struct opj_stream_private *,
 265                                                                         opj_image_t*,
 266                                                                         struct opj_event_mgr * )) opj_jp2_decode;
 267
 268                         l_codec->m_codec_data.m_decompression.opj_end_decompress =
 269                     (OPJ_BOOL (*) ( void *,
 270                                     struct opj_stream_private *,
 271                                     struct opj_event_mgr *)) opj_jp2_end_decompress;
 272
 273                         l_codec->m_codec_data.m_decompression.opj_read_header =
 274                     (OPJ_BOOL (*) ( struct opj_stream_private *,
 275                                                         void *,
 276                                                         opj_image_t **,
 277                                                         struct opj_event_mgr * )) opj_jp2_read_header;
 278
 279                         l_codec->m_codec_data.m_decompression.opj_read_tile_header =
 280                     (OPJ_BOOL (*) ( void *,
 281                                                         OPJ_UINT32*,
 282                                                         OPJ_UINT32*,
 283                                                         OPJ_INT32*,
 284                                                         OPJ_INT32*,
 285                                                         OPJ_INT32 * ,
 286                                                         OPJ_INT32 * ,
 287                                                         OPJ_UINT32 * ,
 288                                                         OPJ_BOOL *,
 289                                                         struct opj_stream_private *,
 290                                                         struct opj_event_mgr * )) opj_jp2_read_tile_header;
 291
 292                         l_codec->m_codec_data.m_decompression.opj_decode_tile_data =
 293                     (OPJ_BOOL (*) ( void *,
 294                                     OPJ_UINT32,OPJ_BYTE*,OPJ_UINT32,
 295                                     struct opj_stream_private *,
 296                                     struct opj_event_mgr * )) opj_jp2_decode_tile;
 297
 298                         l_codec->m_codec_data.m_decompression.opj_destroy = (void (*) (void *))opj_jp2_destroy;
 299
 300                         l_codec->m_codec_data.m_decompression.opj_setup_decoder =
 301                     (void (*) (void * ,opj_dparameters_t * )) opj_jp2_setup_decoder;
 302
 303                         l_codec->m_codec_data.m_decompression.opj_set_decode_area =
 304                     (OPJ_BOOL (*) ( void *,
 305                                     opj_image_t*,
 306                                     OPJ_INT32,OPJ_INT32,OPJ_INT32,OPJ_INT32,
 307                                     struct opj_event_mgr * )) opj_jp2_set_decode_area;
 308
 309                         l_codec->m_codec_data.m_decompression.opj_get_decoded_tile =
 310                     (OPJ_BOOL (*) ( void *p_codec,
 311                                                                         opj_stream_private_t *p_cio,
 312                                                                         opj_image_t *p_image,
 313                                                                         struct opj_event_mgr * p_manager,
 314                                                                         OPJ_UINT32 tile_index)) opj_jp2_get_tile;
 315
 316                         l_codec->m_codec_data.m_decompression.opj_set_decoded_resolution_factor =
 317                     (OPJ_BOOL (*) ( void * p_codec,
 318                                                                 OPJ_UINT32 res_factor,
 319                                                                 opj_event_mgr_t * p_manager)) opj_jp2_set_decoded_resolution_factor;
 320
 321             l_codec->opj_set_threads =
 322                     (OPJ_BOOL (*) ( void * p_codec, OPJ_UINT32 num_threads )) opj_jp2_set_threads;
 323
 324                         l_codec->m_codec = opj_jp2_create(OPJ_TRUE);
 325
 326                         if (! l_codec->m_codec) {
 327                                 opj_free(l_codec);
 328                                 return 00;
 329                         }
 330
 331                         break;
 332                 case OPJ_CODEC_UNKNOWN:
 333                 case OPJ_CODEC_JPT:
 334                 default:
 335                         opj_free(l_codec);
 336                         return 00;
 337         }
 338
 339         opj_set_default_event_handler(&(l_codec->m_event_mgr));
 340         return (opj_codec_t*) l_codec;
 341 }
 342
 343 void OPJ_CALLCONV opj_set_default_decoder_parameters(opj_dparameters_t *parameters) {
 344         if(parameters) {
 345                 memset(parameters, 0, sizeof(opj_dparameters_t));
 346                 /* default decoding parameters */
 347                 parameters->cp_layer = 0;
 348                 parameters->cp_reduce = 0;
 349
 350                 parameters->decod_format = -1;
 351                 parameters->cod_format = -1;
 352                 parameters->flags = 0;
 353 /* UniPG>> */
 354 #ifdef USE_JPWL
 355                 parameters->jpwl_correct = OPJ_FALSE;
 356                 parameters->jpwl_exp_comps = JPWL_EXPECTED_COMPONENTS;
 357                 parameters->jpwl_max_tiles = JPWL_MAXIMUM_TILES;
 358 #endif /* USE_JPWL */
 359 /* <<UniPG */
 360         }
 361 }
 362
 363
 364 OPJ_API OPJ_CALLCONV opj_codec_set_threads(opj_codec_t *p_codec,
 365                                                     int num_threads)
 366 {
 367   if (p_codec ) {
 368         opj_codec_private_t * l_codec = (opj_codec_private_t *) p_codec;
 369
 370         return l_codec->opj_set_threads(l_codec->m_codec, num_threads);
 371     }
 372     return OPJ_FALSE;
 373 }
 374
 375 OPJ_BOOL OPJ_CALLCONV opj_setup_decoder(opj_codec_t *p_codec,
 376                                         opj_dparameters_t *parameters
 377                                                                                 )
 378 {
 379         if (p_codec && parameters) {
 380                 opj_codec_private_t * l_codec = (opj_codec_private_t *) p_codec;
 381
 382                 if (! l_codec->is_decompressor) {
 383                         opj_event_msg(&(l_codec->m_event_mgr), EVT_ERROR,
 384                 "Codec provided to the opj_setup_decoder function is not a decompressor handler.\n");
 385                         return OPJ_FALSE;
 386                 }
 387
 388                 l_codec->m_codec_data.m_decompression.opj_setup_decoder(l_codec->m_codec,
 389                                                                                                                                 parameters);
 390                 return OPJ_TRUE;
 391         }
 392         return OPJ_FALSE;
 393 }
 394
 395 OPJ_BOOL OPJ_CALLCONV opj_read_header ( opj_stream_t *p_stream,
 396                                                                                 opj_codec_t *p_codec,
 397                                                                                 opj_image_t **p_image )
 398 {
 399         if (p_codec && p_stream) {
 400                 opj_codec_private_t* l_codec = (opj_codec_private_t*) p_codec;
 401                 opj_stream_private_t* l_stream = (opj_stream_private_t*) p_stream;
 402
 403                 if(! l_codec->is_decompressor) {
 404                         opj_event_msg(&(l_codec->m_event_mgr), EVT_ERROR,
 405                 "Codec provided to the opj_read_header function is not a decompressor handler.\n");
 406                         return OPJ_FALSE;
 407                 }
 408
 409                 return l_codec->m_codec_data.m_decompression.opj_read_header(   l_stream,
 410                                                                                                                                                 l_codec->m_codec,
 411                                                                                                                                                 p_image,
 412                                                                                                                                                 &(l_codec->m_event_mgr) );
 413         }
 414
 415         return OPJ_FALSE;
 416 }
 417
 418 OPJ_BOOL OPJ_CALLCONV opj_decode(   opj_codec_t *p_codec,
 419                                     opj_stream_t *p_stream,
 420                                     opj_image_t* p_image)
 421 {
 422         if (p_codec && p_stream) {
 423                 opj_codec_private_t * l_codec = (opj_codec_private_t *) p_codec;
 424                 opj_stream_private_t * l_stream = (opj_stream_private_t *) p_stream;
 425
 426                 if (! l_codec->is_decompressor) {
 427                         return OPJ_FALSE;
 428                 }
 429
 430                 return l_codec->m_codec_data.m_decompression.opj_decode(l_codec->m_codec,
 431                                                                                                                                 l_stream,
 432                                                                                                                                 p_image,
 433                                                                                                                                 &(l_codec->m_event_mgr) );
 434         }
 435
 436         return OPJ_FALSE;
 437 }
 438
 439 OPJ_BOOL OPJ_CALLCONV opj_set_decode_area(      opj_codec_t *p_codec,
 440                                                                                         opj_image_t* p_image,
 441                                                                                         OPJ_INT32 p_start_x, OPJ_INT32 p_start_y,
 442                                                                                         OPJ_INT32 p_end_x, OPJ_INT32 p_end_y
 443                                                                                         )
 444 {
 445         if (p_codec) {
 446                 opj_codec_private_t * l_codec = (opj_codec_private_t *) p_codec;
 447
 448                 if (! l_codec->is_decompressor) {
 449                         return OPJ_FALSE;
 450                 }
 451
 452                 return  l_codec->m_codec_data.m_decompression.opj_set_decode_area(      l_codec->m_codec,
 453                                                                                                                                                         p_image,
 454                                                                                                                                                         p_start_x, p_start_y,
 455                                                                                                                                                         p_end_x, p_end_y,
 456                                                                                                                                                         &(l_codec->m_event_mgr) );
 457         }
 458         return OPJ_FALSE;
 459 }
 460
 461 OPJ_BOOL OPJ_CALLCONV opj_read_tile_header(     opj_codec_t *p_codec,
 462                                                                                         opj_stream_t * p_stream,
 463                                                                                         OPJ_UINT32 * p_tile_index,
 464                                                                                         OPJ_UINT32 * p_data_size,
 465                                                                                         OPJ_INT32 * p_tile_x0, OPJ_INT32 * p_tile_y0,
 466                                                                                         OPJ_INT32 * p_tile_x1, OPJ_INT32 * p_tile_y1,
 467                                                                                         OPJ_UINT32 * p_nb_comps,
 468                                                                                         OPJ_BOOL * p_should_go_on)
 469 {
 470         if (p_codec && p_stream && p_data_size && p_tile_index) {
 471                 opj_codec_private_t * l_codec = (opj_codec_private_t *) p_codec;
 472                 opj_stream_private_t * l_stream = (opj_stream_private_t *) p_stream;
 473
 474                 if (! l_codec->is_decompressor) {
 475                         return OPJ_FALSE;
 476                 }
 477
 478                 return l_codec->m_codec_data.m_decompression.opj_read_tile_header(      l_codec->m_codec,
 479                                                                                                                                                         p_tile_index,
 480                                                                                                                                                         p_data_size,
 481                                                                                                                                                         p_tile_x0, p_tile_y0,
 482                                                                                                                                                         p_tile_x1, p_tile_y1,
 483                                                                                                                                                         p_nb_comps,
 484                                                                                                                                                         p_should_go_on,
 485                                                                                                                                                         l_stream,
 486                                                                                                                                                         &(l_codec->m_event_mgr));
 487         }
 488         return OPJ_FALSE;
 489 }
 490
 491 OPJ_BOOL OPJ_CALLCONV opj_decode_tile_data(     opj_codec_t *p_codec,
 492                                                                                         OPJ_UINT32 p_tile_index,
 493                                                                                         OPJ_BYTE * p_data,
 494                                                                                         OPJ_UINT32 p_data_size,
 495                                                                                         opj_stream_t *p_stream
 496                                                                                         )
 497 {
 498         if (p_codec && p_data && p_stream) {
 499                 opj_codec_private_t * l_codec = (opj_codec_private_t *) p_codec;
 500                 opj_stream_private_t * l_stream = (opj_stream_private_t *) p_stream;
 501
 502                 if (! l_codec->is_decompressor) {
 503                         return OPJ_FALSE;
 504                 }
 505
 506                 return l_codec->m_codec_data.m_decompression.opj_decode_tile_data(      l_codec->m_codec,
 507                                                                                                                                                         p_tile_index,
 508                                                                                                                                                         p_data,
 509                                                                                                                                                         p_data_size,
 510                                                                                                                                                         l_stream,
 511                                                                                                                                                         &(l_codec->m_event_mgr) );
 512         }
 513         return OPJ_FALSE;
 514 }
 515
 516 OPJ_BOOL OPJ_CALLCONV opj_get_decoded_tile(     opj_codec_t *p_codec,
 517                                                                                         opj_stream_t *p_stream,
 518                                                                                         opj_image_t *p_image,
 519                                                                                         OPJ_UINT32 tile_index)
 520 {
 521         if (p_codec && p_stream) {
 522                 opj_codec_private_t * l_codec = (opj_codec_private_t *) p_codec;
 523                 opj_stream_private_t * l_stream = (opj_stream_private_t *) p_stream;
 524
 525                 if (! l_codec->is_decompressor) {
 526                         return OPJ_FALSE;
 527                 }
 528
 529                 return l_codec->m_codec_data.m_decompression.opj_get_decoded_tile(      l_codec->m_codec,
 530                                                                                                                                                         l_stream,
 531                                                                                                                                                         p_image,
 532                                                                                                                                                         &(l_codec->m_event_mgr),
 533                                                                                                                                                         tile_index);
 534         }
 535
 536         return OPJ_FALSE;
 537 }
 538
 539 OPJ_BOOL OPJ_CALLCONV opj_set_decoded_resolution_factor(opj_codec_t *p_codec,
 540                                                                                                                 OPJ_UINT32 res_factor )
 541 {
 542         opj_codec_private_t * l_codec = (opj_codec_private_t *) p_codec;
 543
 544         if ( !l_codec ){
 545                 return OPJ_FALSE;
 546         }
 547
 548         return l_codec->m_codec_data.m_decompression.opj_set_decoded_resolution_factor(l_codec->m_codec,
 549                                                                                                                                                         res_factor,
 550                                                                                                                                                         &(l_codec->m_event_mgr) );
 551 }
 552
 553 /* ---------------------------------------------------------------------- */
 554 /* COMPRESSION FUNCTIONS*/
 555
 556 opj_codec_t* OPJ_CALLCONV opj_create_compress(OPJ_CODEC_FORMAT p_format)
 557 {
 558         opj_codec_private_t *l_codec = 00;
 559
 560         l_codec = (opj_codec_private_t*)opj_calloc(1, sizeof(opj_codec_private_t));
 561         if (!l_codec) {
 562                 return 00;
 563         }
 564
 565         l_codec->is_decompressor = 0;
 566
 567         switch(p_format) {
 568                 case OPJ_CODEC_J2K:
 569                         l_codec->m_codec_data.m_compression.opj_encode = (OPJ_BOOL (*) (void *,
 570                                                                                                                                                         struct opj_stream_private *,
 571                                                                                                                                                         struct opj_event_mgr * )) opj_j2k_encode;
 572
 573                         l_codec->m_codec_data.m_compression.opj_end_compress = (OPJ_BOOL (*) (  void *,
 574                                                                                                                                                                         struct opj_stream_private *,
 575                                                                                                                                                                         struct opj_event_mgr *)) opj_j2k_end_compress;
 576
 577                         l_codec->m_codec_data.m_compression.opj_start_compress = (OPJ_BOOL (*) (void *,
 578                                                                                                                                                                         struct opj_stream_private *,
 579                                                                                                                                                                         struct opj_image * ,
 580                                                                                                                                                                         struct opj_event_mgr *)) opj_j2k_start_compress;
 581
 582                         l_codec->m_codec_data.m_compression.opj_write_tile = (OPJ_BOOL (*) (void *,
 583                                                                                                                                                                 OPJ_UINT32,
 584                                                                                                                                                                 OPJ_BYTE*,
 585                                                                                                                                                                 OPJ_UINT32,
 586                                                                                                                                                                 struct opj_stream_private *,
 587                                                                                                                                                                 struct opj_event_mgr *) ) opj_j2k_write_tile;
 588
 589                         l_codec->m_codec_data.m_compression.opj_destroy = (void (*) (void *)) opj_j2k_destroy;
 590
 591                         l_codec->m_codec_data.m_compression.opj_setup_encoder = (OPJ_BOOL (*) ( void *,
 592                                                                                                                                                                 opj_cparameters_t *,
 593                                                                                                                                                                 struct opj_image *,
 594                                                                                                                                                                 struct opj_event_mgr * )) opj_j2k_setup_encoder;
 595
 596                         l_codec->m_codec = opj_j2k_create_compress();
 597                         if (! l_codec->m_codec) {
 598                                 opj_free(l_codec);
 599                                 return 00;
 600                         }
 601
 602                         break;
 603
 604                 case OPJ_CODEC_JP2:
 605                         /* get a JP2 decoder handle */
 606                         l_codec->m_codec_data.m_compression.opj_encode = (OPJ_BOOL (*) (void *,
 607                                                                                                                                                         struct opj_stream_private *,
 608                                                                                                                                                         struct opj_event_mgr * )) opj_jp2_encode;
 609
 610                         l_codec->m_codec_data.m_compression.opj_end_compress = (OPJ_BOOL (*) (  void *,
 611                                                                                                                                                                         struct opj_stream_private *,
 612                                                                                                                                                                         struct opj_event_mgr *)) opj_jp2_end_compress;
 613
 614                         l_codec->m_codec_data.m_compression.opj_start_compress = (OPJ_BOOL (*) (void *,
 615                                                                                                                                                                         struct opj_stream_private *,
 616                                                                                                                                                                         struct opj_image * ,
 617                                                                                                                                                                         struct opj_event_mgr *))  opj_jp2_start_compress;
 618
 619                         l_codec->m_codec_data.m_compression.opj_write_tile = (OPJ_BOOL (*) (void *,
 620                                                                                                                                                                 OPJ_UINT32,
 621                                                                                                                                                                 OPJ_BYTE*,
 622                                                                                                                                                                 OPJ_UINT32,
 623                                                                                                                                                                 struct opj_stream_private *,
 624                                                                                                                                                                 struct opj_event_mgr *)) opj_jp2_write_tile;
 625
 626                         l_codec->m_codec_data.m_compression.opj_destroy = (void (*) (void *)) opj_jp2_destroy;
 627
 628                         l_codec->m_codec_data.m_compression.opj_setup_encoder = (OPJ_BOOL (*) ( void *,
 629                                                                                                                                                                 opj_cparameters_t *,
 630                                                                                                                                                                 struct opj_image *,
 631                                                                                                                                                                 struct opj_event_mgr * )) opj_jp2_setup_encoder;
 632
 633                         l_codec->m_codec = opj_jp2_create(OPJ_FALSE);
 634                         if (! l_codec->m_codec) {
 635                                 opj_free(l_codec);
 636                                 return 00;
 637                         }
 638
 639                         break;
 640
 641                 case OPJ_CODEC_UNKNOWN:
 642                 case OPJ_CODEC_JPT:
 643                 default:
 644                         opj_free(l_codec);
 645                         return 00;
 646         }
 647
 648         opj_set_default_event_handler(&(l_codec->m_event_mgr));
 649         return (opj_codec_t*) l_codec;
 650 }
 651
 652 void OPJ_CALLCONV opj_set_default_encoder_parameters(opj_cparameters_t *parameters) {
 653         if(parameters) {
 654                 memset(parameters, 0, sizeof(opj_cparameters_t));
 655                 /* default coding parameters */
 656         parameters->cp_cinema = OPJ_OFF; /* DEPRECATED */
 657         parameters->rsiz = OPJ_PROFILE_NONE;
 658                 parameters->max_comp_size = 0;
 659                 parameters->numresolution = 6;
 660         parameters->cp_rsiz = OPJ_STD_RSIZ; /* DEPRECATED */
 661                 parameters->cblockw_init = 64;
 662                 parameters->cblockh_init = 64;
 663                 parameters->prog_order = OPJ_LRCP;
 664                 parameters->roi_compno = -1;            /* no ROI */
 665                 parameters->subsampling_dx = 1;
 666                 parameters->subsampling_dy = 1;
 667                 parameters->tp_on = 0;
 668                 parameters->decod_format = -1;
 669                 parameters->cod_format = -1;
 670                 parameters->tcp_rates[0] = 0;
 671                 parameters->tcp_numlayers = 0;
 672                 parameters->cp_disto_alloc = 0;
 673                 parameters->cp_fixed_alloc = 0;
 674                 parameters->cp_fixed_quality = 0;
 675                 parameters->jpip_on = OPJ_FALSE;
 676 /* UniPG>> */
 677 #ifdef USE_JPWL
 678                 parameters->jpwl_epc_on = OPJ_FALSE;
 679                 parameters->jpwl_hprot_MH = -1; /* -1 means unassigned */
 680                 {
 681                         int i;
 682                         for (i = 0; i < JPWL_MAX_NO_TILESPECS; i++) {
 683                                 parameters->jpwl_hprot_TPH_tileno[i] = -1; /* unassigned */
 684                                 parameters->jpwl_hprot_TPH[i] = 0; /* absent */
 685                         }
 686                 };
 687                 {
 688                         int i;
 689                         for (i = 0; i < JPWL_MAX_NO_PACKSPECS; i++) {
 690                                 parameters->jpwl_pprot_tileno[i] = -1; /* unassigned */
 691                                 parameters->jpwl_pprot_packno[i] = -1; /* unassigned */
 692                                 parameters->jpwl_pprot[i] = 0; /* absent */
 693                         }
 694                 };
 695                 parameters->jpwl_sens_size = 0; /* 0 means no ESD */
 696                 parameters->jpwl_sens_addr = 0; /* 0 means auto */
 697                 parameters->jpwl_sens_range = 0; /* 0 means packet */
 698                 parameters->jpwl_sens_MH = -1; /* -1 means unassigned */
 699                 {
 700                         int i;
 701                         for (i = 0; i < JPWL_MAX_NO_TILESPECS; i++) {
 702                                 parameters->jpwl_sens_TPH_tileno[i] = -1; /* unassigned */
 703                                 parameters->jpwl_sens_TPH[i] = -1; /* absent */
 704                         }
 705                 };
 706 #endif /* USE_JPWL */
 707 /* <<UniPG */
 708         }
 709 }
 710
 711 OPJ_BOOL OPJ_CALLCONV opj_setup_encoder(opj_codec_t *p_codec,
 712                                                                                 opj_cparameters_t *parameters,
 713                                                                                 opj_image_t *p_image)
 714 {
 715         if (p_codec && parameters && p_image) {
 716                 opj_codec_private_t * l_codec = (opj_codec_private_t *) p_codec;
 717
 718                 if (! l_codec->is_decompressor) {
 719                         return l_codec->m_codec_data.m_compression.opj_setup_encoder(   l_codec->m_codec,
 720                                                                                                                                         parameters,
 721                                                                                                                                         p_image,
 722                                                                                                                                         &(l_codec->m_event_mgr) );
 723                 }
 724         }
 725
 726         return OPJ_FALSE;
 727 }
 728
 729 OPJ_BOOL OPJ_CALLCONV opj_start_compress (      opj_codec_t *p_codec,
 730                                                                                         opj_image_t * p_image,
 731                                                                                         opj_stream_t *p_stream)
 732 {
 733         if (p_codec && p_stream) {
 734                 opj_codec_private_t * l_codec = (opj_codec_private_t *) p_codec;
 735                 opj_stream_private_t * l_stream = (opj_stream_private_t *) p_stream;
 736
 737                 if (! l_codec->is_decompressor) {
 738                         return l_codec->m_codec_data.m_compression.opj_start_compress(  l_codec->m_codec,
 739                                                                                                                                                         l_stream,
 740                                                                                                                                                         p_image,
 741                                                                                                                                                         &(l_codec->m_event_mgr));
 742                 }
 743         }
 744
 745         return OPJ_FALSE;
 746 }
 747
 748 OPJ_BOOL OPJ_CALLCONV opj_encode(opj_codec_t *p_info, opj_stream_t *p_stream)
 749 {
 750         if (p_info && p_stream) {
 751                 opj_codec_private_t * l_codec = (opj_codec_private_t *) p_info;
 752                 opj_stream_private_t * l_stream = (opj_stream_private_t *) p_stream;
 753
 754                 if (! l_codec->is_decompressor) {
 755                         return l_codec->m_codec_data.m_compression.opj_encode(  l_codec->m_codec,
 756                                                                                                                         l_stream,
 757                                                                                                                         &(l_codec->m_event_mgr));
 758                 }
 759         }
 760
 761         return OPJ_FALSE;
 762
 763 }
 764
 765 OPJ_BOOL OPJ_CALLCONV opj_end_compress (opj_codec_t *p_codec,
 766                                                                                 opj_stream_t *p_stream)
 767 {
 768         if (p_codec && p_stream) {
 769                 opj_codec_private_t * l_codec = (opj_codec_private_t *) p_codec;
 770                 opj_stream_private_t * l_stream = (opj_stream_private_t *) p_stream;
 771
 772                 if (! l_codec->is_decompressor) {
 773                         return l_codec->m_codec_data.m_compression.opj_end_compress(l_codec->m_codec,
 774                                                                                                                                                 l_stream,
 775                                                                                                                                                 &(l_codec->m_event_mgr));
 776                 }
 777         }
 778         return OPJ_FALSE;
 779
 780 }
 781
 782 OPJ_BOOL OPJ_CALLCONV opj_end_decompress (      opj_codec_t *p_codec,
 783                                                                                         opj_stream_t *p_stream)
 784 {
 785         if (p_codec && p_stream) {
 786                 opj_codec_private_t * l_codec = (opj_codec_private_t *) p_codec;
 787                 opj_stream_private_t * l_stream = (opj_stream_private_t *) p_stream;
 788
 789                 if (! l_codec->is_decompressor) {
 790                         return OPJ_FALSE;
 791                 }
 792
 793                 return l_codec->m_codec_data.m_decompression.opj_end_decompress(l_codec->m_codec,
 794                                                                                                                                                 l_stream,
 795                                                                                                                                                 &(l_codec->m_event_mgr) );
 796         }
 797
 798         return OPJ_FALSE;
 799 }
 800
 801 OPJ_BOOL OPJ_CALLCONV opj_set_MCT(opj_cparameters_t *parameters,
 802                                   OPJ_FLOAT32 * pEncodingMatrix,
 803                                   OPJ_INT32 * p_dc_shift,OPJ_UINT32 pNbComp)
 804 {
 805         OPJ_UINT32 l_matrix_size = pNbComp * pNbComp * (OPJ_UINT32)sizeof(OPJ_FLOAT32);
 806         OPJ_UINT32 l_dc_shift_size = pNbComp * (OPJ_UINT32)sizeof(OPJ_INT32);
 807         OPJ_UINT32 l_mct_total_size = l_matrix_size + l_dc_shift_size;
 808
 809         /* add MCT capability */
 810     if (OPJ_IS_PART2(parameters->rsiz)) {
 811         parameters->rsiz |= OPJ_EXTENSION_MCT;
 812     } else {
 813         parameters->rsiz = ((OPJ_PROFILE_PART2) | (OPJ_EXTENSION_MCT));
 814     }
 815         parameters->irreversible = 1;
 816
 817         /* use array based MCT */
 818         parameters->tcp_mct = 2;
 819         parameters->mct_data = opj_malloc(l_mct_total_size);
 820         if (! parameters->mct_data) {
 821                 return OPJ_FALSE;
 822         }
 823
 824         memcpy(parameters->mct_data,pEncodingMatrix,l_matrix_size);
 825         memcpy(((OPJ_BYTE *) parameters->mct_data) +  l_matrix_size,p_dc_shift,l_dc_shift_size);
 826
 827         return OPJ_TRUE;
 828 }
 829
 830 OPJ_BOOL OPJ_CALLCONV opj_write_tile (  opj_codec_t *p_codec,
 831                                                                                 OPJ_UINT32 p_tile_index,
 832                                                                                 OPJ_BYTE * p_data,
 833                                                                                 OPJ_UINT32 p_data_size,
 834                                                                                 opj_stream_t *p_stream )
 835 {
 836         if (p_codec && p_stream && p_data) {
 837                 opj_codec_private_t * l_codec = (opj_codec_private_t *) p_codec;
 838                 opj_stream_private_t * l_stream = (opj_stream_private_t *) p_stream;
 839
 840                 if (l_codec->is_decompressor) {
 841                         return OPJ_FALSE;
 842                 }
 843
 844                 return l_codec->m_codec_data.m_compression.opj_write_tile(      l_codec->m_codec,
 845                                                                                                                                         p_tile_index,
 846                                                                                                                                         p_data,
 847                                                                                                                                         p_data_size,
 848                                                                                                                                         l_stream,
 849                                                                                                                                         &(l_codec->m_event_mgr) );
 850         }
 851
 852         return OPJ_FALSE;
 853 }
 854
 855 /* ---------------------------------------------------------------------- */
 856
 857 void OPJ_CALLCONV opj_destroy_codec(opj_codec_t *p_codec)
 858 {
 859         if (p_codec) {
 860                 opj_codec_private_t * l_codec = (opj_codec_private_t *) p_codec;
 861
 862                 if (l_codec->is_decompressor) {
 863                         l_codec->m_codec_data.m_decompression.opj_destroy(l_codec->m_codec);
 864                 }
 865                 else {
 866                         l_codec->m_codec_data.m_compression.opj_destroy(l_codec->m_codec);
 867                 }
 868
 869                 l_codec->m_codec = 00;
 870                 opj_free(l_codec);
 871         }
 872 }
 873
 874 /* ---------------------------------------------------------------------- */
 875
 876 void OPJ_CALLCONV opj_dump_codec(       opj_codec_t *p_codec,
 877                                                                         OPJ_INT32 info_flag,
 878                                                                         FILE* output_stream)
 879 {
 880         if (p_codec) {
 881                 opj_codec_private_t* l_codec = (opj_codec_private_t*) p_codec;
 882
 883                 l_codec->opj_dump_codec(l_codec->m_codec, info_flag, output_stream);
 884                 return;
 885         }
 886
 887         /* TODO return error */
 888         /* fprintf(stderr, "[ERROR] Input parameter of the dump_codec function are incorrect.\n"); */
 889         return;
 890 }
 891
 892 opj_codestream_info_v2_t* OPJ_CALLCONV opj_get_cstr_info(opj_codec_t *p_codec)
 893 {
 894         if (p_codec) {
 895                 opj_codec_private_t* l_codec = (opj_codec_private_t*) p_codec;
 896
 897                 return l_codec->opj_get_codec_info(l_codec->m_codec);
 898         }
 899
 900         return NULL;
 901 }
 902
 903 void OPJ_CALLCONV opj_destroy_cstr_info(opj_codestream_info_v2_t **cstr_info) {
 904         if (cstr_info) {
 905
 906                 if ((*cstr_info)->m_default_tile_info.tccp_info){
 907                         opj_free((*cstr_info)->m_default_tile_info.tccp_info);
 908                 }
 909
 910                 if ((*cstr_info)->tile_info){
 911                         /* FIXME not used for the moment*/
 912                 }
 913
 914                 opj_free((*cstr_info));
 915                 (*cstr_info) = NULL;
 916         }
 917 }
 918
 919 opj_codestream_index_t * OPJ_CALLCONV opj_get_cstr_index(opj_codec_t *p_codec)
 920 {
 921         if (p_codec) {
 922                 opj_codec_private_t* l_codec = (opj_codec_private_t*) p_codec;
 923
 924                 return l_codec->opj_get_codec_index(l_codec->m_codec);
 925         }
 926
 927         return NULL;
 928 }
 929
 930 void OPJ_CALLCONV opj_destroy_cstr_index(opj_codestream_index_t **p_cstr_index)
 931 {
 932         if (*p_cstr_index){
 933                 j2k_destroy_cstr_index(*p_cstr_index);
 934                 (*p_cstr_index) = NULL;
 935         }
 936 }
 937
 938 opj_stream_t* OPJ_CALLCONV opj_stream_create_default_file_stream (const char *fname, OPJ_BOOL p_is_read_stream)
 939 {
 940     return opj_stream_create_file_stream(fname, OPJ_J2K_STREAM_CHUNK_SIZE, p_is_read_stream);
 941 }
 942
 943 opj_stream_t* OPJ_CALLCONV opj_stream_create_file_stream (
 944         const char *fname,
 945                 OPJ_SIZE_T p_size,
 946         OPJ_BOOL p_is_read_stream)
 947 {
 948     opj_stream_t* l_stream = 00;
 949     FILE *p_file;
 950     const char *mode;
 951
 952     if (! fname) {
 953         return NULL;
 954     }
 955
 956     if(p_is_read_stream) mode = "rb"; else mode = "wb";
 957
 958     p_file = fopen(fname, mode);
 959
 960     if (! p_file) {
 961             return NULL;
 962     }
 963
 964     l_stream = opj_stream_create(p_size,p_is_read_stream);
 965     if (! l_stream) {
 966         fclose(p_file);
 967         return NULL;
 968     }
 969
 970     opj_stream_set_user_data(l_stream, p_file, (opj_stream_free_user_data_fn) fclose);
 971     opj_stream_set_user_data_length(l_stream, opj_get_data_length_from_file(p_file));
 972     opj_stream_set_read_function(l_stream, (opj_stream_read_fn) opj_read_from_file);
 973     opj_stream_set_write_function(l_stream, (opj_stream_write_fn) opj_write_from_file);
 974     opj_stream_set_skip_function(l_stream, (opj_stream_skip_fn) opj_skip_from_file);
 975     opj_stream_set_seek_function(l_stream, (opj_stream_seek_fn) opj_seek_from_file);
 976
 977     return l_stream;
 978 }