89bb75a552630ab832486989d806f82217a93a6b
[pdfium.git] / core / src / fxcodec / fx_libopenjpeg / libopenjpeg20 / 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(HANDLE 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         memset(l_codec, 0, sizeof(opj_codec_private_t));
173
174         l_codec->is_decompressor = 1;
175
176         switch (p_format) {
177                 case OPJ_CODEC_J2K:
178                         l_codec->opj_dump_codec = (void (*) (void*, OPJ_INT32, FILE*)) j2k_dump;
179
180                         l_codec->opj_get_codec_info = (opj_codestream_info_v2_t* (*) (void*) ) j2k_get_cstr_info;
181
182                         l_codec->opj_get_codec_index = (opj_codestream_index_t* (*) (void*) ) j2k_get_cstr_index;
183
184                         l_codec->m_codec_data.m_decompression.opj_decode =
185                                         (OPJ_BOOL (*) ( void *,
186                                                                         struct opj_stream_private *,
187                                                                         opj_image_t*, struct opj_event_mgr * )) opj_j2k_decode;
188
189                         l_codec->m_codec_data.m_decompression.opj_end_decompress =
190                                         (OPJ_BOOL (*) ( void *,
191                                                                         struct opj_stream_private *,
192                                                                         struct opj_event_mgr *)) opj_j2k_end_decompress;
193
194                         l_codec->m_codec_data.m_decompression.opj_read_header =
195                                         (OPJ_BOOL (*) ( struct opj_stream_private *,
196                                                                         void *,
197                                                                         opj_image_t **,
198                                                                         struct opj_event_mgr * )) opj_j2k_read_header;
199
200                         l_codec->m_codec_data.m_decompression.opj_destroy =
201                                         (void (*) (void *))opj_j2k_destroy;
202
203                         l_codec->m_codec_data.m_decompression.opj_setup_decoder =
204                                         (void (*) (void * , opj_dparameters_t * )) opj_j2k_setup_decoder;
205
206                         l_codec->m_codec_data.m_decompression.opj_read_tile_header =
207                                         (OPJ_BOOL (*) ( void *,
208                                                                         OPJ_UINT32*,
209                                                                         OPJ_UINT32*,
210                                                                         OPJ_INT32*, OPJ_INT32*,
211                                                                         OPJ_INT32*, OPJ_INT32*,
212                                                                         OPJ_UINT32*,
213                                                                         OPJ_BOOL*,
214                                                                         struct opj_stream_private *,
215                                                                         struct opj_event_mgr * )) opj_j2k_read_tile_header;
216
217                         l_codec->m_codec_data.m_decompression.opj_decode_tile_data =
218                                         (OPJ_BOOL (*) ( void *, 
219                                     OPJ_UINT32, 
220                                     OPJ_BYTE*, 
221                                     OPJ_UINT32, 
222                                     struct opj_stream_private *,
223                                     struct opj_event_mgr *)) opj_j2k_decode_tile;
224
225                         l_codec->m_codec_data.m_decompression.opj_set_decode_area =
226                                         (OPJ_BOOL (*) ( void *, 
227                                     opj_image_t*, 
228                                     OPJ_INT32, OPJ_INT32, OPJ_INT32, OPJ_INT32, 
229                                     struct opj_event_mgr *)) opj_j2k_set_decode_area;
230
231                         l_codec->m_codec_data.m_decompression.opj_get_decoded_tile = 
232                     (OPJ_BOOL (*) ( void *p_codec,
233                                                                     opj_stream_private_t *p_cio,
234                                                                     opj_image_t *p_image,
235                                                                     struct opj_event_mgr * p_manager,
236                                                                     OPJ_UINT32 tile_index)) opj_j2k_get_tile;
237
238                         l_codec->m_codec_data.m_decompression.opj_set_decoded_resolution_factor = 
239                     (OPJ_BOOL (*) ( void * p_codec,
240                                                                         OPJ_UINT32 res_factor,
241                                                                         struct opj_event_mgr * p_manager)) opj_j2k_set_decoded_resolution_factor;
242
243                         l_codec->m_codec = opj_j2k_create_decompress();
244
245                         if (! l_codec->m_codec) {
246                                 opj_free(l_codec);
247                                 return NULL;
248                         }
249
250                         break;
251
252                 case OPJ_CODEC_JP2:
253                         /* get a JP2 decoder handle */
254                         l_codec->opj_dump_codec = (void (*) (void*, OPJ_INT32, FILE*)) jp2_dump;
255
256                         l_codec->opj_get_codec_info = (opj_codestream_info_v2_t* (*) (void*) ) jp2_get_cstr_info;
257
258                         l_codec->opj_get_codec_index = (opj_codestream_index_t* (*) (void*) ) jp2_get_cstr_index;
259
260                         l_codec->m_codec_data.m_decompression.opj_decode =
261                                         (OPJ_BOOL (*) ( void *,
262                                                                         struct opj_stream_private *,
263                                                                         opj_image_t*,
264                                                                         struct opj_event_mgr * )) opj_jp2_decode;
265
266                         l_codec->m_codec_data.m_decompression.opj_end_decompress =  
267                     (OPJ_BOOL (*) ( void *,
268                                     struct opj_stream_private *,
269                                     struct opj_event_mgr *)) opj_jp2_end_decompress;
270
271                         l_codec->m_codec_data.m_decompression.opj_read_header =  
272                     (OPJ_BOOL (*) ( struct opj_stream_private *,
273                                                         void *,
274                                                         opj_image_t **,
275                                                         struct opj_event_mgr * )) opj_jp2_read_header;
276
277                         l_codec->m_codec_data.m_decompression.opj_read_tile_header = 
278                     (OPJ_BOOL (*) ( void *,
279                                                         OPJ_UINT32*,
280                                                         OPJ_UINT32*,
281                                                         OPJ_INT32*,
282                                                         OPJ_INT32*,
283                                                         OPJ_INT32 * ,
284                                                         OPJ_INT32 * ,
285                                                         OPJ_UINT32 * ,
286                                                         OPJ_BOOL *,
287                                                         struct opj_stream_private *,
288                                                         struct opj_event_mgr * )) opj_jp2_read_tile_header;
289
290                         l_codec->m_codec_data.m_decompression.opj_decode_tile_data = 
291                     (OPJ_BOOL (*) ( void *,
292                                     OPJ_UINT32,OPJ_BYTE*,OPJ_UINT32,
293                                     struct opj_stream_private *,
294                                     struct opj_event_mgr * )) opj_jp2_decode_tile;
295
296                         l_codec->m_codec_data.m_decompression.opj_destroy = (void (*) (void *))opj_jp2_destroy;
297
298                         l_codec->m_codec_data.m_decompression.opj_setup_decoder = 
299                     (void (*) (void * ,opj_dparameters_t * )) opj_jp2_setup_decoder;
300
301                         l_codec->m_codec_data.m_decompression.opj_set_decode_area = 
302                     (OPJ_BOOL (*) ( void *,
303                                     opj_image_t*, 
304                                     OPJ_INT32,OPJ_INT32,OPJ_INT32,OPJ_INT32,
305                                     struct opj_event_mgr * )) opj_jp2_set_decode_area;
306
307                         l_codec->m_codec_data.m_decompression.opj_get_decoded_tile = 
308                     (OPJ_BOOL (*) ( void *p_codec,
309                                                                         opj_stream_private_t *p_cio,
310                                                                         opj_image_t *p_image,
311                                                                         struct opj_event_mgr * p_manager,
312                                                                         OPJ_UINT32 tile_index)) opj_jp2_get_tile;
313
314                         l_codec->m_codec_data.m_decompression.opj_set_decoded_resolution_factor = 
315                     (OPJ_BOOL (*) ( void * p_codec,
316                                                                 OPJ_UINT32 res_factor,
317                                                                 opj_event_mgr_t * p_manager)) opj_jp2_set_decoded_resolution_factor;
318
319                         l_codec->m_codec = opj_jp2_create(OPJ_TRUE);
320
321                         if (! l_codec->m_codec) {
322                                 opj_free(l_codec);
323                                 return 00;
324                         }
325
326                         break;
327                 case OPJ_CODEC_UNKNOWN:
328                 case OPJ_CODEC_JPT:
329                 default:
330                         opj_free(l_codec);
331                         return 00;
332         }
333
334         opj_set_default_event_handler(&(l_codec->m_event_mgr));
335         return (opj_codec_t*) l_codec;
336 }
337
338 void OPJ_CALLCONV opj_set_default_decoder_parameters(opj_dparameters_t *parameters) {
339         if(parameters) {
340                 memset(parameters, 0, sizeof(opj_dparameters_t));
341                 /* default decoding parameters */
342                 parameters->cp_layer = 0;
343                 parameters->cp_reduce = 0;
344
345                 parameters->decod_format = -1;
346                 parameters->cod_format = -1;
347                 parameters->flags = 0;          
348 /* UniPG>> */
349 #ifdef USE_JPWL
350                 parameters->jpwl_correct = OPJ_FALSE;
351                 parameters->jpwl_exp_comps = JPWL_EXPECTED_COMPONENTS;
352                 parameters->jpwl_max_tiles = JPWL_MAXIMUM_TILES;
353 #endif /* USE_JPWL */
354 /* <<UniPG */
355         }
356 }
357
358 OPJ_BOOL OPJ_CALLCONV opj_setup_decoder(opj_codec_t *p_codec,
359                                         opj_dparameters_t *parameters 
360                                                                                 )
361 {
362         if (p_codec && parameters) { 
363                 opj_codec_private_t * l_codec = (opj_codec_private_t *) p_codec;
364
365                 if (! l_codec->is_decompressor) {
366                         opj_event_msg(&(l_codec->m_event_mgr), EVT_ERROR, 
367                 "Codec provided to the opj_setup_decoder function is not a decompressor handler.\n");
368                         return OPJ_FALSE;
369                 }
370
371                 l_codec->m_codec_data.m_decompression.opj_setup_decoder(l_codec->m_codec,
372                                                                                                                                 parameters);
373                 return OPJ_TRUE;
374         }
375         return OPJ_FALSE;
376 }
377
378 OPJ_BOOL OPJ_CALLCONV opj_read_header ( opj_stream_t *p_stream,
379                                                                                 opj_codec_t *p_codec,
380                                                                                 opj_image_t **p_image )
381 {
382         if (p_codec && p_stream) {
383                 opj_codec_private_t* l_codec = (opj_codec_private_t*) p_codec;
384                 opj_stream_private_t* l_stream = (opj_stream_private_t*) p_stream;
385
386                 if(! l_codec->is_decompressor) {
387                         opj_event_msg(&(l_codec->m_event_mgr), EVT_ERROR, 
388                 "Codec provided to the opj_read_header function is not a decompressor handler.\n");
389                         return OPJ_FALSE;
390                 }
391
392                 return l_codec->m_codec_data.m_decompression.opj_read_header(   l_stream,
393                                                                                                                                                 l_codec->m_codec,
394                                                                                                                                                 p_image,
395                                                                                                                                                 &(l_codec->m_event_mgr) );
396         }
397
398         return OPJ_FALSE;
399 }
400
401 OPJ_BOOL OPJ_CALLCONV opj_decode(   opj_codec_t *p_codec,
402                                     opj_stream_t *p_stream,
403                                     opj_image_t* p_image)
404 {
405         if (p_codec && p_stream) {
406                 opj_codec_private_t * l_codec = (opj_codec_private_t *) p_codec;
407                 opj_stream_private_t * l_stream = (opj_stream_private_t *) p_stream;
408
409                 if (! l_codec->is_decompressor) {
410                         return OPJ_FALSE;
411                 }
412
413                 return l_codec->m_codec_data.m_decompression.opj_decode(l_codec->m_codec,
414                                                                                                                                 l_stream,
415                                                                                                                                 p_image,
416                                                                                                                                 &(l_codec->m_event_mgr) );
417         }
418
419         return OPJ_FALSE;
420 }
421
422 OPJ_BOOL OPJ_CALLCONV opj_set_decode_area(      opj_codec_t *p_codec,
423                                                                                         opj_image_t* p_image,
424                                                                                         OPJ_INT32 p_start_x, OPJ_INT32 p_start_y,
425                                                                                         OPJ_INT32 p_end_x, OPJ_INT32 p_end_y
426                                                                                         )
427 {
428         if (p_codec) {
429                 opj_codec_private_t * l_codec = (opj_codec_private_t *) p_codec;
430                 
431                 if (! l_codec->is_decompressor) {
432                         return OPJ_FALSE;
433                 }
434
435                 return  l_codec->m_codec_data.m_decompression.opj_set_decode_area(      l_codec->m_codec,
436                                                                                                                                                         p_image,
437                                                                                                                                                         p_start_x, p_start_y,
438                                                                                                                                                         p_end_x, p_end_y,
439                                                                                                                                                         &(l_codec->m_event_mgr) );
440         }
441         return OPJ_FALSE;
442 }
443
444 OPJ_BOOL OPJ_CALLCONV opj_read_tile_header(     opj_codec_t *p_codec,
445                                                                                         opj_stream_t * p_stream,
446                                                                                         OPJ_UINT32 * p_tile_index,
447                                                                                         OPJ_UINT32 * p_data_size,
448                                                                                         OPJ_INT32 * p_tile_x0, OPJ_INT32 * p_tile_y0,
449                                                                                         OPJ_INT32 * p_tile_x1, OPJ_INT32 * p_tile_y1,
450                                                                                         OPJ_UINT32 * p_nb_comps,
451                                                                                         OPJ_BOOL * p_should_go_on)
452 {
453         if (p_codec && p_stream && p_data_size && p_tile_index) {
454                 opj_codec_private_t * l_codec = (opj_codec_private_t *) p_codec;
455                 opj_stream_private_t * l_stream = (opj_stream_private_t *) p_stream;
456
457                 if (! l_codec->is_decompressor) {
458                         return OPJ_FALSE;
459                 }
460
461                 return l_codec->m_codec_data.m_decompression.opj_read_tile_header(      l_codec->m_codec,
462                                                                                                                                                         p_tile_index,
463                                                                                                                                                         p_data_size,
464                                                                                                                                                         p_tile_x0, p_tile_y0,
465                                                                                                                                                         p_tile_x1, p_tile_y1,
466                                                                                                                                                         p_nb_comps,
467                                                                                                                                                         p_should_go_on,
468                                                                                                                                                         l_stream,
469                                                                                                                                                         &(l_codec->m_event_mgr));
470         }
471         return OPJ_FALSE;
472 }
473
474 OPJ_BOOL OPJ_CALLCONV opj_decode_tile_data(     opj_codec_t *p_codec,
475                                                                                         OPJ_UINT32 p_tile_index,
476                                                                                         OPJ_BYTE * p_data,
477                                                                                         OPJ_UINT32 p_data_size,
478                                                                                         opj_stream_t *p_stream
479                                                                                         )
480 {
481         if (p_codec && p_data && p_stream) {
482                 opj_codec_private_t * l_codec = (opj_codec_private_t *) p_codec;
483                 opj_stream_private_t * l_stream = (opj_stream_private_t *) p_stream;
484
485                 if (! l_codec->is_decompressor) {
486                         return OPJ_FALSE;
487                 }
488
489                 return l_codec->m_codec_data.m_decompression.opj_decode_tile_data(      l_codec->m_codec,
490                                                                                                                                                         p_tile_index,
491                                                                                                                                                         p_data,
492                                                                                                                                                         p_data_size,
493                                                                                                                                                         l_stream,
494                                                                                                                                                         &(l_codec->m_event_mgr) );
495         }
496         return OPJ_FALSE;
497 }
498
499 OPJ_BOOL OPJ_CALLCONV opj_get_decoded_tile(     opj_codec_t *p_codec,
500                                                                                         opj_stream_t *p_stream,
501                                                                                         opj_image_t *p_image,
502                                                                                         OPJ_UINT32 tile_index)
503 {
504         if (p_codec && p_stream) {
505                 opj_codec_private_t * l_codec = (opj_codec_private_t *) p_codec;
506                 opj_stream_private_t * l_stream = (opj_stream_private_t *) p_stream;
507
508                 if (! l_codec->is_decompressor) {
509                         return OPJ_FALSE;
510                 }
511                 
512                 return l_codec->m_codec_data.m_decompression.opj_get_decoded_tile(      l_codec->m_codec,
513                                                                                                                                                         l_stream,
514                                                                                                                                                         p_image,
515                                                                                                                                                         &(l_codec->m_event_mgr),
516                                                                                                                                                         tile_index);
517         }
518
519         return OPJ_FALSE;
520 }
521
522 OPJ_BOOL OPJ_CALLCONV opj_set_decoded_resolution_factor(opj_codec_t *p_codec, 
523                                                                                                                 OPJ_UINT32 res_factor )
524 {
525         opj_codec_private_t * l_codec = (opj_codec_private_t *) p_codec;
526
527         if ( !l_codec ){
528                 fprintf(stderr, "[ERROR] Input parameters of the setup_decoder function are incorrect.\n");
529                 return OPJ_FALSE;
530         }
531
532         l_codec->m_codec_data.m_decompression.opj_set_decoded_resolution_factor(l_codec->m_codec, 
533                                                                                                                                                         res_factor,
534                                                                                                                                                         &(l_codec->m_event_mgr) );
535         return OPJ_TRUE;
536 }
537
538 /* ---------------------------------------------------------------------- */
539 /* COMPRESSION FUNCTIONS*/
540
541 opj_codec_t* OPJ_CALLCONV opj_create_compress(OPJ_CODEC_FORMAT p_format)
542 {
543         opj_codec_private_t *l_codec = 00;
544
545         l_codec = (opj_codec_private_t*)opj_calloc(1, sizeof(opj_codec_private_t));
546         if (!l_codec) {
547                 return 00;
548         }
549         memset(l_codec, 0, sizeof(opj_codec_private_t));
550         
551         l_codec->is_decompressor = 0;
552
553         switch(p_format) {
554                 case OPJ_CODEC_J2K:
555                         l_codec->m_codec_data.m_compression.opj_encode = (OPJ_BOOL (*) (void *,
556                                                                                                                                                         struct opj_stream_private *,
557                                                                                                                                                         struct opj_event_mgr * )) opj_j2k_encode;
558
559                         l_codec->m_codec_data.m_compression.opj_end_compress = (OPJ_BOOL (*) (  void *,
560                                                                                                                                                                         struct opj_stream_private *,
561                                                                                                                                                                         struct opj_event_mgr *)) opj_j2k_end_compress;
562
563                         l_codec->m_codec_data.m_compression.opj_start_compress = (OPJ_BOOL (*) (void *,
564                                                                                                                                                                         struct opj_stream_private *,
565                                                                                                                                                                         struct opj_image * ,
566                                                                                                                                                                         struct opj_event_mgr *)) opj_j2k_start_compress;
567
568                         l_codec->m_codec_data.m_compression.opj_write_tile = (OPJ_BOOL (*) (void *,
569                                                                                                                                                                 OPJ_UINT32,
570                                                                                                                                                                 OPJ_BYTE*,
571                                                                                                                                                                 OPJ_UINT32,
572                                                                                                                                                                 struct opj_stream_private *,
573                                                                                                                                                                 struct opj_event_mgr *) ) opj_j2k_write_tile;
574
575                         l_codec->m_codec_data.m_compression.opj_destroy = (void (*) (void *)) opj_j2k_destroy;
576
577                         l_codec->m_codec_data.m_compression.opj_setup_encoder = (void (*) (     void *,
578                                                                                                                                                                 opj_cparameters_t *,
579                                                                                                                                                                 struct opj_image *,
580                                                                                                                                                                 struct opj_event_mgr * )) opj_j2k_setup_encoder;
581
582                         l_codec->m_codec = opj_j2k_create_compress();
583                         if (! l_codec->m_codec) {
584                                 opj_free(l_codec);
585                                 return 00;
586                         }
587
588                         break;
589
590                 case OPJ_CODEC_JP2:
591                         /* get a JP2 decoder handle */
592                         l_codec->m_codec_data.m_compression.opj_encode = (OPJ_BOOL (*) (void *,
593                                                                                                                                                         struct opj_stream_private *,
594                                                                                                                                                         struct opj_event_mgr * )) opj_jp2_encode;
595
596                         l_codec->m_codec_data.m_compression.opj_end_compress = (OPJ_BOOL (*) (  void *,
597                                                                                                                                                                         struct opj_stream_private *,
598                                                                                                                                                                         struct opj_event_mgr *)) opj_jp2_end_compress;
599
600                         l_codec->m_codec_data.m_compression.opj_start_compress = (OPJ_BOOL (*) (void *,
601                                                                                                                                                                         struct opj_stream_private *,
602                                                                                                                                                                         struct opj_image * ,
603                                                                                                                                                                         struct opj_event_mgr *))  opj_jp2_start_compress;
604
605                         l_codec->m_codec_data.m_compression.opj_write_tile = (OPJ_BOOL (*) (void *,
606                                                                                                                                                                 OPJ_UINT32,
607                                                                                                                                                                 OPJ_BYTE*,
608                                                                                                                                                                 OPJ_UINT32,
609                                                                                                                                                                 struct opj_stream_private *,
610                                                                                                                                                                 struct opj_event_mgr *)) opj_jp2_write_tile;
611
612                         l_codec->m_codec_data.m_compression.opj_destroy = (void (*) (void *)) opj_jp2_destroy;
613
614                         l_codec->m_codec_data.m_compression.opj_setup_encoder = (void (*) (     void *,
615                                                                                                                                                                 opj_cparameters_t *,
616                                                                                                                                                                 struct opj_image *,
617                                                                                                                                                                 struct opj_event_mgr * )) opj_jp2_setup_encoder;
618
619                         l_codec->m_codec = opj_jp2_create(OPJ_FALSE);
620                         if (! l_codec->m_codec) {
621                                 opj_free(l_codec);
622                                 return 00;
623                         }
624
625                         break;
626
627                 case OPJ_CODEC_UNKNOWN:
628                 case OPJ_CODEC_JPT:
629                 default:
630                         opj_free(l_codec);
631                         return 00;
632         }
633
634         opj_set_default_event_handler(&(l_codec->m_event_mgr));
635         return (opj_codec_t*) l_codec;
636 }
637
638 void OPJ_CALLCONV opj_set_default_encoder_parameters(opj_cparameters_t *parameters) {
639         if(parameters) {
640                 memset(parameters, 0, sizeof(opj_cparameters_t));
641                 /* default coding parameters */
642                 parameters->cp_cinema = OPJ_OFF; 
643                 parameters->max_comp_size = 0;
644                 parameters->numresolution = 6;
645                 parameters->cp_rsiz = OPJ_STD_RSIZ;
646                 parameters->cblockw_init = 64;
647                 parameters->cblockh_init = 64;
648                 parameters->prog_order = OPJ_LRCP;
649                 parameters->roi_compno = -1;            /* no ROI */
650                 parameters->subsampling_dx = 1;
651                 parameters->subsampling_dy = 1;
652                 parameters->tp_on = 0;
653                 parameters->decod_format = -1;
654                 parameters->cod_format = -1;
655                 parameters->tcp_rates[0] = 0;   
656                 parameters->tcp_numlayers = 0;
657                 parameters->cp_disto_alloc = 0;
658                 parameters->cp_fixed_alloc = 0;
659                 parameters->cp_fixed_quality = 0;
660                 parameters->jpip_on = OPJ_FALSE;
661 /* UniPG>> */
662 #ifdef USE_JPWL
663                 parameters->jpwl_epc_on = OPJ_FALSE;
664                 parameters->jpwl_hprot_MH = -1; /* -1 means unassigned */
665                 {
666                         int i;
667                         for (i = 0; i < JPWL_MAX_NO_TILESPECS; i++) {
668                                 parameters->jpwl_hprot_TPH_tileno[i] = -1; /* unassigned */
669                                 parameters->jpwl_hprot_TPH[i] = 0; /* absent */
670                         }
671                 };
672                 {
673                         int i;
674                         for (i = 0; i < JPWL_MAX_NO_PACKSPECS; i++) {
675                                 parameters->jpwl_pprot_tileno[i] = -1; /* unassigned */
676                                 parameters->jpwl_pprot_packno[i] = -1; /* unassigned */
677                                 parameters->jpwl_pprot[i] = 0; /* absent */
678                         }
679                 };
680                 parameters->jpwl_sens_size = 0; /* 0 means no ESD */
681                 parameters->jpwl_sens_addr = 0; /* 0 means auto */
682                 parameters->jpwl_sens_range = 0; /* 0 means packet */
683                 parameters->jpwl_sens_MH = -1; /* -1 means unassigned */
684                 {
685                         int i;
686                         for (i = 0; i < JPWL_MAX_NO_TILESPECS; i++) {
687                                 parameters->jpwl_sens_TPH_tileno[i] = -1; /* unassigned */
688                                 parameters->jpwl_sens_TPH[i] = -1; /* absent */
689                         }
690                 };
691 #endif /* USE_JPWL */
692 /* <<UniPG */
693         }
694 }
695
696 OPJ_BOOL OPJ_CALLCONV opj_setup_encoder(opj_codec_t *p_codec, 
697                                                                                 opj_cparameters_t *parameters, 
698                                                                                 opj_image_t *p_image)
699 {
700         if (p_codec && parameters && p_image) {
701                 opj_codec_private_t * l_codec = (opj_codec_private_t *) p_codec;
702
703                 if (! l_codec->is_decompressor) {
704                         l_codec->m_codec_data.m_compression.opj_setup_encoder(  l_codec->m_codec,
705                                                                                                                                         parameters,
706                                                                                                                                         p_image,
707                                                                                                                                         &(l_codec->m_event_mgr) );
708                         return OPJ_TRUE;
709                 }
710         }
711
712         return OPJ_FALSE;
713 }
714
715 OPJ_BOOL OPJ_CALLCONV opj_start_compress (      opj_codec_t *p_codec,
716                                                                                         opj_image_t * p_image,
717                                                                                         opj_stream_t *p_stream)
718 {
719         if (p_codec && p_stream) {
720                 opj_codec_private_t * l_codec = (opj_codec_private_t *) p_codec;
721                 opj_stream_private_t * l_stream = (opj_stream_private_t *) p_stream;
722
723                 if (! l_codec->is_decompressor) {
724                         return l_codec->m_codec_data.m_compression.opj_start_compress(  l_codec->m_codec,
725                                                                                                                                                         l_stream,
726                                                                                                                                                         p_image,
727                                                                                                                                                         &(l_codec->m_event_mgr));
728                 }
729         }
730
731         return OPJ_FALSE;
732 }
733
734 OPJ_BOOL OPJ_CALLCONV opj_encode(opj_codec_t *p_info, opj_stream_t *p_stream)
735 {
736         if (p_info && p_stream) {
737                 opj_codec_private_t * l_codec = (opj_codec_private_t *) p_info;
738                 opj_stream_private_t * l_stream = (opj_stream_private_t *) p_stream;
739
740                 if (! l_codec->is_decompressor) {
741                         return l_codec->m_codec_data.m_compression.opj_encode(  l_codec->m_codec,
742                                                                                                                         l_stream,
743                                                                                                                         &(l_codec->m_event_mgr));
744                 }
745         }
746
747         return OPJ_FALSE;
748
749 }
750
751 OPJ_BOOL OPJ_CALLCONV opj_end_compress (opj_codec_t *p_codec,
752                                                                                 opj_stream_t *p_stream)
753 {
754         if (p_codec && p_stream) {
755                 opj_codec_private_t * l_codec = (opj_codec_private_t *) p_codec;
756                 opj_stream_private_t * l_stream = (opj_stream_private_t *) p_stream;
757
758                 if (! l_codec->is_decompressor) {
759                         return l_codec->m_codec_data.m_compression.opj_end_compress(l_codec->m_codec,
760                                                                                                                                                 l_stream,
761                                                                                                                                                 &(l_codec->m_event_mgr));
762                 }
763         }
764         return OPJ_FALSE;
765
766 }
767
768 OPJ_BOOL OPJ_CALLCONV opj_end_decompress (      opj_codec_t *p_codec,
769                                                                                         opj_stream_t *p_stream)
770 {
771         if (p_codec && p_stream) {
772                 opj_codec_private_t * l_codec = (opj_codec_private_t *) p_codec;
773                 opj_stream_private_t * l_stream = (opj_stream_private_t *) p_stream;
774
775                 if (! l_codec->is_decompressor) {
776                         return OPJ_FALSE;
777                 }
778                 
779                 return l_codec->m_codec_data.m_decompression.opj_end_decompress(l_codec->m_codec,
780                                                                                                                                                 l_stream,
781                                                                                                                                                 &(l_codec->m_event_mgr) );
782         }
783
784         return OPJ_FALSE;
785 }
786
787 OPJ_BOOL OPJ_CALLCONV opj_set_MCT(opj_cparameters_t *parameters,
788                                   OPJ_FLOAT32 * pEncodingMatrix,
789                                   OPJ_INT32 * p_dc_shift,OPJ_UINT32 pNbComp)
790 {
791         OPJ_UINT32 l_matrix_size = pNbComp * pNbComp * (OPJ_UINT32)sizeof(OPJ_FLOAT32);
792         OPJ_UINT32 l_dc_shift_size = pNbComp * (OPJ_UINT32)sizeof(OPJ_INT32);
793         OPJ_UINT32 l_mct_total_size = l_matrix_size + l_dc_shift_size;
794
795         /* add MCT capability */
796         OPJ_INT32 rsiz = (OPJ_INT32)parameters->cp_rsiz | (OPJ_INT32)OPJ_MCT;
797         parameters->cp_rsiz = (OPJ_RSIZ_CAPABILITIES)rsiz;
798         parameters->irreversible = 1;
799
800         /* use array based MCT */
801         parameters->tcp_mct = 2;
802         parameters->mct_data = opj_malloc(l_mct_total_size);
803         if (! parameters->mct_data) {
804                 return OPJ_FALSE;
805         }
806
807         memcpy(parameters->mct_data,pEncodingMatrix,l_matrix_size);
808         memcpy(((OPJ_BYTE *) parameters->mct_data) +  l_matrix_size,p_dc_shift,l_dc_shift_size);
809
810         return OPJ_TRUE;
811 }
812
813 OPJ_BOOL OPJ_CALLCONV opj_write_tile (  opj_codec_t *p_codec,
814                                                                                 OPJ_UINT32 p_tile_index,
815                                                                                 OPJ_BYTE * p_data,
816                                                                                 OPJ_UINT32 p_data_size,
817                                                                                 opj_stream_t *p_stream )
818 {
819         if (p_codec && p_stream && p_data) {
820                 opj_codec_private_t * l_codec = (opj_codec_private_t *) p_codec;
821                 opj_stream_private_t * l_stream = (opj_stream_private_t *) p_stream;
822
823                 if (l_codec->is_decompressor) {
824                         return OPJ_FALSE;
825                 }
826
827                 return l_codec->m_codec_data.m_compression.opj_write_tile(      l_codec->m_codec,
828                                                                                                                                         p_tile_index,
829                                                                                                                                         p_data,
830                                                                                                                                         p_data_size,
831                                                                                                                                         l_stream,
832                                                                                                                                         &(l_codec->m_event_mgr) );
833         }
834
835         return OPJ_FALSE;
836 }
837
838 /* ---------------------------------------------------------------------- */
839
840 void OPJ_CALLCONV opj_destroy_codec(opj_codec_t *p_codec)
841 {
842         if (p_codec) {
843                 opj_codec_private_t * l_codec = (opj_codec_private_t *) p_codec;
844
845                 if (l_codec->is_decompressor) {
846                         l_codec->m_codec_data.m_decompression.opj_destroy(l_codec->m_codec);
847                 }
848                 else {
849                         l_codec->m_codec_data.m_compression.opj_destroy(l_codec->m_codec);
850                 }
851
852                 l_codec->m_codec = 00;
853                 opj_free(l_codec);
854         }
855 }
856
857 /* ---------------------------------------------------------------------- */
858
859 void OPJ_CALLCONV opj_dump_codec(       opj_codec_t *p_codec,
860                                                                         OPJ_INT32 info_flag,
861                                                                         FILE* output_stream)
862 {
863         if (p_codec) {
864                 opj_codec_private_t* l_codec = (opj_codec_private_t*) p_codec;
865
866                 l_codec->opj_dump_codec(l_codec->m_codec, info_flag, output_stream);
867                 return;
868         }
869
870         fprintf(stderr, "[ERROR] Input parameter of the dump_codec function are incorrect.\n");
871         return;
872 }
873
874 opj_codestream_info_v2_t* OPJ_CALLCONV opj_get_cstr_info(opj_codec_t *p_codec)
875 {
876         if (p_codec) {
877                 opj_codec_private_t* l_codec = (opj_codec_private_t*) p_codec;
878
879                 return l_codec->opj_get_codec_info(l_codec->m_codec);
880         }
881
882         return NULL;
883 }
884
885 void OPJ_CALLCONV opj_destroy_cstr_info(opj_codestream_info_v2_t **cstr_info) {
886         if (cstr_info) {
887
888                 if ((*cstr_info)->m_default_tile_info.tccp_info){
889                         opj_free((*cstr_info)->m_default_tile_info.tccp_info);
890                 }
891
892                 if ((*cstr_info)->tile_info){
893                         /* FIXME not used for the moment*/
894                 }
895
896                 opj_free((*cstr_info));
897                 (*cstr_info) = NULL;
898         }
899 }
900
901 opj_codestream_index_t * OPJ_CALLCONV opj_get_cstr_index(opj_codec_t *p_codec)
902 {
903         if (p_codec) {
904                 opj_codec_private_t* l_codec = (opj_codec_private_t*) p_codec;
905
906                 return l_codec->opj_get_codec_index(l_codec->m_codec);
907         }
908
909         return NULL;
910 }
911
912 void OPJ_CALLCONV opj_destroy_cstr_index(opj_codestream_index_t **p_cstr_index)
913 {
914         if (*p_cstr_index){
915                 j2k_destroy_cstr_index(*p_cstr_index);
916                 (*p_cstr_index) = NULL;
917         }
918 }
919
920 opj_stream_t* OPJ_CALLCONV opj_stream_create_default_file_stream_v3 (const char *fname, OPJ_BOOL p_is_read_stream)
921 {
922     return opj_stream_create_file_stream_v3(fname, OPJ_J2K_STREAM_CHUNK_SIZE, p_is_read_stream);
923 }
924
925 opj_stream_t* OPJ_CALLCONV opj_stream_create_file_stream_v3 (
926         const char *fname, 
927                 OPJ_SIZE_T p_size, 
928         OPJ_BOOL p_is_read_stream)
929 {
930     opj_stream_t* l_stream = 00;
931     FILE *p_file;
932     const char *mode;
933
934     if (! fname) {
935         return NULL;
936     }
937     
938     if(p_is_read_stream) mode = "rb"; else mode = "wb";
939
940     p_file = fopen(fname, mode);
941
942     if (! p_file) {
943             return NULL;
944     }
945
946     l_stream = opj_stream_create(p_size,p_is_read_stream);
947     if (! l_stream) {
948         fclose(p_file);
949         return NULL;
950     }
951
952     opj_stream_set_user_data_v3(l_stream, p_file, (opj_stream_free_user_data_fn) fclose);
953     opj_stream_set_user_data_length(l_stream, opj_get_data_length_from_file(p_file));
954     opj_stream_set_read_function(l_stream, (opj_stream_read_fn) opj_read_from_file);
955     opj_stream_set_write_function(l_stream, (opj_stream_write_fn) opj_write_from_file);
956     opj_stream_set_skip_function(l_stream, (opj_stream_skip_fn) opj_skip_from_file);
957     opj_stream_set_seek_function(l_stream, (opj_stream_seek_fn) opj_seek_from_file);
958
959     return l_stream;
960 }