1/*
2 * Copyright (c) 2005, Herve Drolon, FreeImage Team
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 *    notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 *    notice, this list of conditions and the following disclaimer in the
12 *    documentation and/or other materials provided with the distribution.
13 *
14 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS `AS IS'
15 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17 * ARE DISCLAIMED.  IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
18 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
19 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
20 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
21 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
22 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
23 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
24 * POSSIBILITY OF SUCH DAMAGE.
25 */
26
27#ifdef _WIN32
28#include <windows.h>
29#endif /* _WIN32 */
30
31#include "opj_config.h"
32#include "opj_includes.h"
33
34/* ---------------------------------------------------------------------- */
35#ifdef _WIN32
36#ifndef OPJ_STATIC
37BOOL APIENTRY
38DllMain(HANDLE hModule, DWORD ul_reason_for_call, LPVOID lpReserved) {
39
40	OPJ_ARG_NOT_USED(lpReserved);
41	OPJ_ARG_NOT_USED(hModule);
42
43	switch (ul_reason_for_call) {
44		case DLL_PROCESS_ATTACH :
45			break;
46		case DLL_PROCESS_DETACH :
47			break;
48		case DLL_THREAD_ATTACH :
49		case DLL_THREAD_DETACH :
50			break;
51    }
52
53    return TRUE;
54}
55#endif /* OPJ_STATIC */
56#endif /* _WIN32 */
57
58/* ---------------------------------------------------------------------- */
59
60
61const char* OPJ_CALLCONV opj_version(void) {
62    return PACKAGE_VERSION;
63}
64
65opj_dinfo_t* OPJ_CALLCONV opj_create_decompress(OPJ_CODEC_FORMAT format) {
66	opj_dinfo_t *dinfo = (opj_dinfo_t*)opj_calloc(1, sizeof(opj_dinfo_t));
67	if(!dinfo) return NULL;
68	dinfo->is_decompressor = OPJ_TRUE;
69	switch(format) {
70		case CODEC_J2K:
71		case CODEC_JPT:
72			/* get a J2K decoder handle */
73			dinfo->j2k_handle = (void*)j2k_create_decompress((opj_common_ptr)dinfo);
74			if(!dinfo->j2k_handle) {
75				opj_free(dinfo);
76				return NULL;
77			}
78			break;
79		case CODEC_JP2:
80			/* get a JP2 decoder handle */
81			dinfo->jp2_handle = (void*)jp2_create_decompress((opj_common_ptr)dinfo);
82			if(!dinfo->jp2_handle) {
83				opj_free(dinfo);
84				return NULL;
85			}
86			break;
87		case CODEC_UNKNOWN:
88		default:
89			opj_free(dinfo);
90			return NULL;
91	}
92
93	dinfo->codec_format = format;
94
95	return dinfo;
96}
97
98void OPJ_CALLCONV opj_destroy_decompress(opj_dinfo_t *dinfo) {
99	if(dinfo) {
100		/* destroy the codec */
101		switch(dinfo->codec_format) {
102			case CODEC_J2K:
103			case CODEC_JPT:
104				j2k_destroy_decompress((opj_j2k_t*)dinfo->j2k_handle);
105				break;
106			case CODEC_JP2:
107				jp2_destroy_decompress((opj_jp2_t*)dinfo->jp2_handle);
108				break;
109			case CODEC_UNKNOWN:
110			default:
111				break;
112		}
113		/* destroy the decompressor */
114		opj_free(dinfo);
115	}
116}
117
118void OPJ_CALLCONV opj_set_default_decoder_parameters(opj_dparameters_t *parameters) {
119	if(parameters) {
120		memset(parameters, 0, sizeof(opj_dparameters_t));
121		/* default decoding parameters */
122		parameters->cp_layer = 0;
123		parameters->cp_reduce = 0;
124		parameters->cp_limit_decoding = NO_LIMITATION;
125
126		parameters->decod_format = -1;
127		parameters->cod_format = -1;
128		parameters->flags = 0;
129/* UniPG>> */
130#ifdef USE_JPWL
131		parameters->jpwl_correct = OPJ_FALSE;
132		parameters->jpwl_exp_comps = JPWL_EXPECTED_COMPONENTS;
133		parameters->jpwl_max_tiles = JPWL_MAXIMUM_TILES;
134#endif /* USE_JPWL */
135/* <<UniPG */
136	}
137}
138
139void OPJ_CALLCONV opj_setup_decoder(opj_dinfo_t *dinfo, opj_dparameters_t *parameters) {
140	if(dinfo && parameters) {
141		switch(dinfo->codec_format) {
142			case CODEC_J2K:
143			case CODEC_JPT:
144				j2k_setup_decoder((opj_j2k_t*)dinfo->j2k_handle, parameters);
145				break;
146			case CODEC_JP2:
147				jp2_setup_decoder((opj_jp2_t*)dinfo->jp2_handle, parameters);
148				break;
149			case CODEC_UNKNOWN:
150			default:
151				break;
152		}
153	}
154}
155
156opj_image_t* OPJ_CALLCONV opj_decode(opj_dinfo_t *dinfo, opj_cio_t *cio) {
157	return opj_decode_with_info(dinfo, cio, NULL);
158}
159
160opj_image_t* OPJ_CALLCONV opj_decode_with_info(opj_dinfo_t *dinfo, opj_cio_t *cio, opj_codestream_info_t *cstr_info) {
161	if(dinfo && cio) {
162		switch(dinfo->codec_format) {
163			case CODEC_J2K:
164				return j2k_decode((opj_j2k_t*)dinfo->j2k_handle, cio, cstr_info);
165			case CODEC_JPT:
166				return j2k_decode_jpt_stream((opj_j2k_t*)dinfo->j2k_handle, cio, cstr_info);
167			case CODEC_JP2:
168				return opj_jp2_decode((opj_jp2_t*)dinfo->jp2_handle, cio, cstr_info);
169			case CODEC_UNKNOWN:
170			default:
171				break;
172		}
173	}
174	return NULL;
175}
176
177opj_cinfo_t* OPJ_CALLCONV opj_create_compress(OPJ_CODEC_FORMAT format) {
178	opj_cinfo_t *cinfo = (opj_cinfo_t*)opj_calloc(1, sizeof(opj_cinfo_t));
179	if(!cinfo) return NULL;
180	cinfo->is_decompressor = OPJ_FALSE;
181	switch(format) {
182		case CODEC_J2K:
183			/* get a J2K coder handle */
184			cinfo->j2k_handle = (void*)j2k_create_compress((opj_common_ptr)cinfo);
185			if(!cinfo->j2k_handle) {
186				opj_free(cinfo);
187				return NULL;
188			}
189			break;
190		case CODEC_JP2:
191			/* get a JP2 coder handle */
192			cinfo->jp2_handle = (void*)jp2_create_compress((opj_common_ptr)cinfo);
193			if(!cinfo->jp2_handle) {
194				opj_free(cinfo);
195				return NULL;
196			}
197			break;
198		case CODEC_JPT:
199		case CODEC_UNKNOWN:
200		default:
201			opj_free(cinfo);
202			return NULL;
203	}
204
205	cinfo->codec_format = format;
206
207	return cinfo;
208}
209
210void OPJ_CALLCONV opj_destroy_compress(opj_cinfo_t *cinfo) {
211	if(cinfo) {
212		/* destroy the codec */
213		switch(cinfo->codec_format) {
214			case CODEC_J2K:
215				j2k_destroy_compress((opj_j2k_t*)cinfo->j2k_handle);
216				break;
217			case CODEC_JP2:
218				jp2_destroy_compress((opj_jp2_t*)cinfo->jp2_handle);
219				break;
220			case CODEC_JPT:
221			case CODEC_UNKNOWN:
222			default:
223				break;
224		}
225		/* destroy the decompressor */
226		opj_free(cinfo);
227	}
228}
229
230void OPJ_CALLCONV opj_set_default_encoder_parameters(opj_cparameters_t *parameters) {
231	if(parameters) {
232		memset(parameters, 0, sizeof(opj_cparameters_t));
233		/* default coding parameters */
234		parameters->cp_cinema = OFF;
235		parameters->max_comp_size = 0;
236		parameters->numresolution = 6;
237		parameters->cp_rsiz = STD_RSIZ;
238		parameters->cblockw_init = 64;
239		parameters->cblockh_init = 64;
240		parameters->prog_order = LRCP;
241		parameters->roi_compno = -1;		/* no ROI */
242		parameters->subsampling_dx = 1;
243		parameters->subsampling_dy = 1;
244		parameters->tp_on = 0;
245		parameters->decod_format = -1;
246		parameters->cod_format = -1;
247		parameters->tcp_rates[0] = 0;
248		parameters->tcp_numlayers = 0;
249    parameters->cp_disto_alloc = 0;
250		parameters->cp_fixed_alloc = 0;
251		parameters->cp_fixed_quality = 0;
252		parameters->jpip_on = OPJ_FALSE;
253/* UniPG>> */
254#ifdef USE_JPWL
255		parameters->jpwl_epc_on = OPJ_FALSE;
256		parameters->jpwl_hprot_MH = -1; /* -1 means unassigned */
257		{
258			int i;
259			for (i = 0; i < JPWL_MAX_NO_TILESPECS; i++) {
260				parameters->jpwl_hprot_TPH_tileno[i] = -1; /* unassigned */
261				parameters->jpwl_hprot_TPH[i] = 0; /* absent */
262			}
263		};
264		{
265			int i;
266			for (i = 0; i < JPWL_MAX_NO_PACKSPECS; i++) {
267				parameters->jpwl_pprot_tileno[i] = -1; /* unassigned */
268				parameters->jpwl_pprot_packno[i] = -1; /* unassigned */
269				parameters->jpwl_pprot[i] = 0; /* absent */
270			}
271		};
272		parameters->jpwl_sens_size = 0; /* 0 means no ESD */
273		parameters->jpwl_sens_addr = 0; /* 0 means auto */
274		parameters->jpwl_sens_range = 0; /* 0 means packet */
275		parameters->jpwl_sens_MH = -1; /* -1 means unassigned */
276		{
277			int i;
278			for (i = 0; i < JPWL_MAX_NO_TILESPECS; i++) {
279				parameters->jpwl_sens_TPH_tileno[i] = -1; /* unassigned */
280				parameters->jpwl_sens_TPH[i] = -1; /* absent */
281			}
282		};
283#endif /* USE_JPWL */
284/* <<UniPG */
285	}
286}
287
288void OPJ_CALLCONV opj_setup_encoder(opj_cinfo_t *cinfo, opj_cparameters_t *parameters, opj_image_t *image) {
289	if(cinfo && parameters && image) {
290		switch(cinfo->codec_format) {
291			case CODEC_J2K:
292				j2k_setup_encoder((opj_j2k_t*)cinfo->j2k_handle, parameters, image);
293				break;
294			case CODEC_JP2:
295				jp2_setup_encoder((opj_jp2_t*)cinfo->jp2_handle, parameters, image);
296				break;
297			case CODEC_JPT:
298			case CODEC_UNKNOWN:
299			default:
300				break;
301		}
302	}
303}
304
305opj_bool OPJ_CALLCONV opj_encode(opj_cinfo_t *cinfo, opj_cio_t *cio, opj_image_t *image, char *index) {
306	if (index != NULL)
307		opj_event_msg((opj_common_ptr)cinfo, EVT_WARNING, "Set index to NULL when calling the opj_encode function.\n"
308		"To extract the index, use the opj_encode_with_info() function.\n"
309		"No index will be generated during this encoding\n");
310	return opj_encode_with_info(cinfo, cio, image, NULL);
311}
312
313opj_bool OPJ_CALLCONV opj_encode_with_info(opj_cinfo_t *cinfo, opj_cio_t *cio, opj_image_t *image, opj_codestream_info_t *cstr_info) {
314	if(cinfo && cio && image) {
315		switch(cinfo->codec_format) {
316			case CODEC_J2K:
317				return j2k_encode((opj_j2k_t*)cinfo->j2k_handle, cio, image, cstr_info);
318			case CODEC_JP2:
319				return opj_jp2_encode((opj_jp2_t*)cinfo->jp2_handle, cio, image, cstr_info);
320			case CODEC_JPT:
321			case CODEC_UNKNOWN:
322			default:
323				break;
324		}
325	}
326	return OPJ_FALSE;
327}
328
329void OPJ_CALLCONV opj_destroy_cstr_info(opj_codestream_info_t *cstr_info) {
330	if (cstr_info) {
331		int tileno;
332		for (tileno = 0; tileno < cstr_info->tw * cstr_info->th; tileno++) {
333			opj_tile_info_t *tile_info = &cstr_info->tile[tileno];
334			opj_free(tile_info->thresh);
335			opj_free(tile_info->packet);
336			opj_free(tile_info->tp);
337			opj_free(tile_info->marker);
338		}
339		opj_free(cstr_info->tile);
340		opj_free(cstr_info->marker);
341		opj_free(cstr_info->numdecompos);
342	}
343}
344