static void opj_get_encoding_parameters(	const opj_image_t *p_image,
                                    const opj_cp_t *p_cp,
                                    OPJ_UINT32 p_tileno,
                                    OPJ_INT32 * p_tx0,
                                    OPJ_INT32  * p_tx1,
                                    OPJ_INT32  * p_ty0,
                                    OPJ_INT32  * p_ty1,
                                    OPJ_UINT32 * p_dx_min,
                                    OPJ_UINT32 * p_dy_min,
                                    OPJ_UINT32 * p_max_prec,
                                    OPJ_UINT32 * p_max_res )
{
	/* loop */
	OPJ_UINT32  compno, resno;
	/* pointers */
	const opj_tcp_t *l_tcp = 00;
	const opj_tccp_t * l_tccp = 00;
	const opj_image_comp_t * l_img_comp = 00;

	/* position in x and y of tile */
	OPJ_UINT32 p, q;

	/* preconditions */
	assert(p_cp != 00);
	assert(p_image != 00);
	assert(p_tileno < p_cp->tw * p_cp->th);

	/* initializations */
	l_tcp = &p_cp->tcps [p_tileno];
	l_img_comp = p_image->comps;
	l_tccp = l_tcp->tccps;

	/* here calculation of tx0, tx1, ty0, ty1, maxprec, dx and dy */
	p = p_tileno % p_cp->tw;
	q = p_tileno / p_cp->tw;

	/* find extent of tile */
	*p_tx0 = opj_int_max((OPJ_INT32)(p_cp->tx0 + p * p_cp->tdx), (OPJ_INT32)p_image->x0);
	*p_tx1 = opj_int_min((OPJ_INT32)(p_cp->tx0 + (p + 1) * p_cp->tdx), (OPJ_INT32)p_image->x1);
	*p_ty0 = opj_int_max((OPJ_INT32)(p_cp->ty0 + q * p_cp->tdy), (OPJ_INT32)p_image->y0);
	*p_ty1 = opj_int_min((OPJ_INT32)(p_cp->ty0 + (q + 1) * p_cp->tdy), (OPJ_INT32)p_image->y1);

	/* max precision is 0 (can only grow) */
	*p_max_prec = 0;
	*p_max_res = 0;

	/* take the largest value for dx_min and dy_min */
	*p_dx_min = 0x7fffffff;
	*p_dy_min  = 0x7fffffff;

	for (compno = 0; compno < p_image->numcomps; ++compno) {
		/* arithmetic variables to calculate */
		OPJ_UINT32 l_level_no;
		OPJ_INT32 l_rx0, l_ry0, l_rx1, l_ry1;
		OPJ_INT32 l_px0, l_py0, l_px1, py1;
		OPJ_UINT32 l_pdx, l_pdy;
		OPJ_UINT32 l_pw, l_ph;
		OPJ_UINT32 l_product;
		OPJ_INT32 l_tcx0, l_tcy0, l_tcx1, l_tcy1;

		l_tcx0 = opj_int_ceildiv(*p_tx0, (OPJ_INT32)l_img_comp->dx);
		l_tcy0 = opj_int_ceildiv(*p_ty0, (OPJ_INT32)l_img_comp->dy);
		l_tcx1 = opj_int_ceildiv(*p_tx1, (OPJ_INT32)l_img_comp->dx);
		l_tcy1 = opj_int_ceildiv(*p_ty1, (OPJ_INT32)l_img_comp->dy);

		if (l_tccp->numresolutions > *p_max_res) {
			*p_max_res = l_tccp->numresolutions;
		}

		/* use custom size for precincts */
		for (resno = 0; resno < l_tccp->numresolutions; ++resno) {
			OPJ_UINT32 l_dx, l_dy;

			/* precinct width and height */
			l_pdx = l_tccp->prcw[resno];
			l_pdy = l_tccp->prch[resno];

			l_dx = l_img_comp->dx * (1u << (l_pdx + l_tccp->numresolutions - 1 - resno));
			l_dy = l_img_comp->dy * (1u << (l_pdy + l_tccp->numresolutions - 1 - resno));

			/* take the minimum size for dx for each comp and resolution */
			*p_dx_min = opj_uint_min(*p_dx_min, l_dx);
			*p_dy_min = opj_uint_min(*p_dy_min, l_dy);

			/* various calculations of extents */
			l_level_no = l_tccp->numresolutions - 1 - resno;

			l_rx0 = opj_int_ceildivpow2(l_tcx0, (OPJ_INT32)l_level_no);
			l_ry0 = opj_int_ceildivpow2(l_tcy0, (OPJ_INT32)l_level_no);
			l_rx1 = opj_int_ceildivpow2(l_tcx1, (OPJ_INT32)l_level_no);
			l_ry1 = opj_int_ceildivpow2(l_tcy1, (OPJ_INT32)l_level_no);

			l_px0 = opj_int_floordivpow2(l_rx0, (OPJ_INT32)l_pdx) << l_pdx;
			l_py0 = opj_int_floordivpow2(l_ry0, (OPJ_INT32)l_pdy) << l_pdy;
			l_px1 = opj_int_ceildivpow2(l_rx1, (OPJ_INT32)l_pdx) << l_pdx;

			py1 = opj_int_ceildivpow2(l_ry1, (OPJ_INT32)l_pdy) << l_pdy;

			l_pw = (l_rx0==l_rx1)?0:(OPJ_UINT32)((l_px1 - l_px0) >> l_pdx);
			l_ph = (l_ry0==l_ry1)?0:(OPJ_UINT32)((py1 - l_py0) >> l_pdy);

			l_product = l_pw * l_ph;

			/* update precision */
			if (l_product > *p_max_prec) {
				*p_max_prec = l_product;
			}
		}
		++l_img_comp;
		++l_tccp;
	}
}