2 * Copyright (c) 2002-2007, Communications and Remote Sensing Laboratory, Universite catholique de Louvain (UCL), Belgium
3 * Copyright (c) 2002-2007, Professor Benoit Macq
4 * Copyright (c) 2001-2003, David Janssens
5 * Copyright (c) 2002-2003, Yannick Verschueren
6 * Copyright (c) 2003-2007, Francois-Olivier Devaux and Antonin Descampe
7 * Copyright (c) 2005, Herve Drolon, FreeImage Team
8 * Copyright (c) 2006-2007, Parvatha Elangovan
11 * Redistribution and use in source and binary forms, with or without
12 * modification, are permitted provided that the following conditions
14 * 1. Redistributions of source code must retain the above copyright
15 * notice, this list of conditions and the following disclaimer.
16 * 2. Redistributions in binary form must reproduce the above copyright
17 * notice, this list of conditions and the following disclaimer in the
18 * documentation and/or other materials provided with the distribution.
20 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS `AS IS'
21 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
24 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
25 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
26 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
27 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
28 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
29 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
30 * POSSIBILITY OF SUCH DAMAGE.
33 #include "opj_includes.h"
35 /** @defgroup PI PI - Implementation of a packet iterator */
38 /** @name Local static functions */
42 Get next packet in layer-resolution-component-precinct order.
43 @param pi packet iterator to modify
44 @return returns false if pi pointed to the last packet or else returns true
46 static bool pi_next_lrcp(opj_pi_iterator_t * pi);
48 Get next packet in resolution-layer-component-precinct order.
49 @param pi packet iterator to modify
50 @return returns false if pi pointed to the last packet or else returns true
52 static bool pi_next_rlcp(opj_pi_iterator_t * pi);
54 Get next packet in resolution-precinct-component-layer order.
55 @param pi packet iterator to modify
56 @return returns false if pi pointed to the last packet or else returns true
58 static bool pi_next_rpcl(opj_pi_iterator_t * pi);
60 Get next packet in precinct-component-resolution-layer order.
61 @param pi packet iterator to modify
62 @return returns false if pi pointed to the last packet or else returns true
64 static bool pi_next_pcrl(opj_pi_iterator_t * pi);
66 Get next packet in component-precinct-resolution-layer order.
67 @param pi packet iterator to modify
68 @return returns false if pi pointed to the last packet or else returns true
70 static bool pi_next_cprl(opj_pi_iterator_t * pi);
77 ==========================================================
79 ==========================================================
82 static bool pi_next_lrcp(opj_pi_iterator_t * pi) {
83 opj_pi_comp_t *comp = NULL;
84 opj_pi_resolution_t *res = NULL;
88 comp = &pi->comps[pi->compno];
89 res = &comp->resolutions[pi->resno];
95 for (pi->layno = pi->poc.layno0; pi->layno < pi->poc.layno1; pi->layno++) {
96 for (pi->resno = pi->poc.resno0; pi->resno < pi->poc.resno1;
98 for (pi->compno = pi->poc.compno0; pi->compno < pi->poc.compno1; pi->compno++) {
99 comp = &pi->comps[pi->compno];
100 if (pi->resno >= comp->numresolutions) {
103 res = &comp->resolutions[pi->resno];
105 pi->poc.precno1 = res->pw * res->ph;
107 for (pi->precno = pi->poc.precno0; pi->precno < pi->poc.precno1; pi->precno++) {
108 index = pi->layno * pi->step_l + pi->resno * pi->step_r + pi->compno * pi->step_c + pi->precno * pi->step_p;
109 if (!pi->include[index]) {
110 pi->include[index] = 1;
122 static bool pi_next_rlcp(opj_pi_iterator_t * pi) {
123 opj_pi_comp_t *comp = NULL;
124 opj_pi_resolution_t *res = NULL;
128 comp = &pi->comps[pi->compno];
129 res = &comp->resolutions[pi->resno];
135 for (pi->resno = pi->poc.resno0; pi->resno < pi->poc.resno1; pi->resno++) {
136 for (pi->layno = pi->poc.layno0; pi->layno < pi->poc.layno1; pi->layno++) {
137 for (pi->compno = pi->poc.compno0; pi->compno < pi->poc.compno1; pi->compno++) {
138 comp = &pi->comps[pi->compno];
139 if (pi->resno >= comp->numresolutions) {
142 res = &comp->resolutions[pi->resno];
144 pi->poc.precno1 = res->pw * res->ph;
146 for (pi->precno = pi->poc.precno0; pi->precno < pi->poc.precno1; pi->precno++) {
147 index = pi->layno * pi->step_l + pi->resno * pi->step_r + pi->compno * pi->step_c + pi->precno * pi->step_p;
148 if (!pi->include[index]) {
149 pi->include[index] = 1;
161 static bool pi_next_rpcl(opj_pi_iterator_t * pi) {
162 opj_pi_comp_t *comp = NULL;
163 opj_pi_resolution_t *res = NULL;
173 for (compno = 0; compno < pi->numcomps; compno++) {
174 comp = &pi->comps[compno];
175 for (resno = 0; resno < comp->numresolutions; resno++) {
177 res = &comp->resolutions[resno];
178 dx = comp->dx * (1 << (res->pdx + comp->numresolutions - 1 - resno));
179 dy = comp->dy * (1 << (res->pdy + comp->numresolutions - 1 - resno));
180 pi->dx = !pi->dx ? dx : int_min(pi->dx, dx);
181 pi->dy = !pi->dy ? dy : int_min(pi->dy, dy);
186 pi->poc.ty0 = pi->ty0;
187 pi->poc.tx0 = pi->tx0;
188 pi->poc.ty1 = pi->ty1;
189 pi->poc.tx1 = pi->tx1;
191 for (pi->resno = pi->poc.resno0; pi->resno < pi->poc.resno1; pi->resno++) {
192 for (pi->y = pi->poc.ty0; pi->y < pi->poc.ty1; pi->y += pi->dy - (pi->y % pi->dy)) {
193 for (pi->x = pi->poc.tx0; pi->x < pi->poc.tx1; pi->x += pi->dx - (pi->x % pi->dx)) {
194 for (pi->compno = pi->poc.compno0; pi->compno < pi->poc.compno1; pi->compno++) {
200 comp = &pi->comps[pi->compno];
201 if (pi->resno >= comp->numresolutions) {
204 res = &comp->resolutions[pi->resno];
205 levelno = comp->numresolutions - 1 - pi->resno;
206 trx0 = int_ceildiv(pi->tx0, comp->dx << levelno);
207 try0 = int_ceildiv(pi->ty0, comp->dy << levelno);
208 trx1 = int_ceildiv(pi->tx1, comp->dx << levelno);
209 try1 = int_ceildiv(pi->ty1, comp->dy << levelno);
210 rpx = res->pdx + levelno;
211 rpy = res->pdy + levelno;
212 if (!((pi->y % (comp->dy << rpy) == 0) || ((pi->y == pi->ty0) && ((try0 << levelno) % (1 << rpx))))){
215 if (!((pi->x % (comp->dx << rpx) == 0) || ((pi->x == pi->tx0) && ((trx0 << levelno) % (1 << rpx))))){
219 if ((res->pw==0)||(res->pw==0)) continue;
221 if ((trx0==trx1)||(try0==try1)) continue;
223 prci = int_floordivpow2(int_ceildiv(pi->x, comp->dx << levelno), res->pdx)
224 - int_floordivpow2(trx0, res->pdx);
225 prcj = int_floordivpow2(int_ceildiv(pi->y, comp->dy << levelno), res->pdy)
226 - int_floordivpow2(try0, res->pdy);
227 pi->precno = prci + prcj * res->pw;
228 for (pi->layno = pi->poc.layno0; pi->layno < pi->poc.layno1; pi->layno++) {
229 index = pi->layno * pi->step_l + pi->resno * pi->step_r + pi->compno * pi->step_c + pi->precno * pi->step_p;
230 if (!pi->include[index]) {
231 pi->include[index] = 1;
244 static bool pi_next_pcrl(opj_pi_iterator_t * pi) {
245 opj_pi_comp_t *comp = NULL;
246 opj_pi_resolution_t *res = NULL;
250 comp = &pi->comps[pi->compno];
257 for (compno = 0; compno < pi->numcomps; compno++) {
258 comp = &pi->comps[compno];
259 for (resno = 0; resno < comp->numresolutions; resno++) {
261 res = &comp->resolutions[resno];
262 dx = comp->dx * (1 << (res->pdx + comp->numresolutions - 1 - resno));
263 dy = comp->dy * (1 << (res->pdy + comp->numresolutions - 1 - resno));
264 pi->dx = !pi->dx ? dx : int_min(pi->dx, dx);
265 pi->dy = !pi->dy ? dy : int_min(pi->dy, dy);
270 pi->poc.ty0 = pi->ty0;
271 pi->poc.tx0 = pi->tx0;
272 pi->poc.ty1 = pi->ty1;
273 pi->poc.tx1 = pi->tx1;
275 for (pi->y = pi->poc.ty0; pi->y < pi->poc.ty1; pi->y += pi->dy - (pi->y % pi->dy)) {
276 for (pi->x = pi->poc.tx0; pi->x < pi->poc.tx1; pi->x += pi->dx - (pi->x % pi->dx)) {
277 for (pi->compno = pi->poc.compno0; pi->compno < pi->poc.compno1; pi->compno++) {
278 comp = &pi->comps[pi->compno];
279 for (pi->resno = pi->poc.resno0; pi->resno < int_min(pi->poc.resno1, comp->numresolutions); pi->resno++) {
285 res = &comp->resolutions[pi->resno];
286 levelno = comp->numresolutions - 1 - pi->resno;
287 trx0 = int_ceildiv(pi->tx0, comp->dx << levelno);
288 try0 = int_ceildiv(pi->ty0, comp->dy << levelno);
289 trx1 = int_ceildiv(pi->tx1, comp->dx << levelno);
290 try1 = int_ceildiv(pi->ty1, comp->dy << levelno);
291 rpx = res->pdx + levelno;
292 rpy = res->pdy + levelno;
293 if (!((pi->y % (comp->dy << rpy) == 0) || ((pi->y == pi->ty0) && ((try0 << levelno) % (1 << rpx))))){
296 if (!((pi->x % (comp->dx << rpx) == 0) || ((pi->x == pi->tx0) && ((trx0 << levelno) % (1 << rpx))))){
300 if ((res->pw==0)||(res->pw==0)) continue;
302 if ((trx0==trx1)||(try0==try1)) continue;
304 prci = int_floordivpow2(int_ceildiv(pi->x, comp->dx << levelno), res->pdx)
305 - int_floordivpow2(trx0, res->pdx);
306 prcj = int_floordivpow2(int_ceildiv(pi->y, comp->dy << levelno), res->pdy)
307 - int_floordivpow2(try0, res->pdy);
308 pi->precno = prci + prcj * res->pw;
309 for (pi->layno = pi->poc.layno0; pi->layno < pi->poc.layno1; pi->layno++) {
310 index = pi->layno * pi->step_l + pi->resno * pi->step_r + pi->compno * pi->step_c + pi->precno * pi->step_p;
311 if (!pi->include[index]) {
312 pi->include[index] = 1;
325 static bool pi_next_cprl(opj_pi_iterator_t * pi) {
326 opj_pi_comp_t *comp = NULL;
327 opj_pi_resolution_t *res = NULL;
331 comp = &pi->comps[pi->compno];
337 for (pi->compno = pi->poc.compno0; pi->compno < pi->poc.compno1; pi->compno++) {
339 comp = &pi->comps[pi->compno];
342 for (resno = 0; resno < comp->numresolutions; resno++) {
344 res = &comp->resolutions[resno];
345 dx = comp->dx * (1 << (res->pdx + comp->numresolutions - 1 - resno));
346 dy = comp->dy * (1 << (res->pdy + comp->numresolutions - 1 - resno));
347 pi->dx = !pi->dx ? dx : int_min(pi->dx, dx);
348 pi->dy = !pi->dy ? dy : int_min(pi->dy, dy);
351 pi->poc.ty0 = pi->ty0;
352 pi->poc.tx0 = pi->tx0;
353 pi->poc.ty1 = pi->ty1;
354 pi->poc.tx1 = pi->tx1;
356 for (pi->y = pi->poc.ty0; pi->y < pi->poc.ty1; pi->y += pi->dy - (pi->y % pi->dy)) {
357 for (pi->x = pi->poc.tx0; pi->x < pi->poc.tx1; pi->x += pi->dx - (pi->x % pi->dx)) {
358 for (pi->resno = pi->poc.resno0; pi->resno < int_min(pi->poc.resno1, comp->numresolutions); pi->resno++) {
364 res = &comp->resolutions[pi->resno];
365 levelno = comp->numresolutions - 1 - pi->resno;
366 trx0 = int_ceildiv(pi->tx0, comp->dx << levelno);
367 try0 = int_ceildiv(pi->ty0, comp->dy << levelno);
368 trx1 = int_ceildiv(pi->tx1, comp->dx << levelno);
369 try1 = int_ceildiv(pi->ty1, comp->dy << levelno);
370 rpx = res->pdx + levelno;
371 rpy = res->pdy + levelno;
372 if (!((pi->y % (comp->dy << rpy) == 0) || ((pi->y == pi->ty0) && ((try0 << levelno) % (1 << rpx))))){
375 if (!((pi->x % (comp->dx << rpx) == 0) || ((pi->x == pi->tx0) && ((trx0 << levelno) % (1 << rpx))))){
379 if ((res->pw==0)||(res->pw==0)) continue;
381 if ((trx0==trx1)||(try0==try1)) continue;
383 prci = int_floordivpow2(int_ceildiv(pi->x, comp->dx << levelno), res->pdx)
384 - int_floordivpow2(trx0, res->pdx);
385 prcj = int_floordivpow2(int_ceildiv(pi->y, comp->dy << levelno), res->pdy)
386 - int_floordivpow2(try0, res->pdy);
387 pi->precno = prci + prcj * res->pw;
388 for (pi->layno = pi->poc.layno0; pi->layno < pi->poc.layno1; pi->layno++) {
389 index = pi->layno * pi->step_l + pi->resno * pi->step_r + pi->compno * pi->step_c + pi->precno * pi->step_p;
390 if (!pi->include[index]) {
391 pi->include[index] = 1;
405 ==========================================================
406 Packet iterator interface
407 ==========================================================
410 opj_pi_iterator_t *pi_create_decode(opj_image_t *image, opj_cp_t *cp, int tileno) {
412 int compno, resno, pino;
413 opj_pi_iterator_t *pi = NULL;
414 opj_tcp_t *tcp = NULL;
415 opj_tccp_t *tccp = NULL;
418 tcp = &cp->tcps[tileno];
420 array_size = (tcp->numpocs + 1) * sizeof(opj_pi_iterator_t);
421 pi = (opj_pi_iterator_t *) opj_malloc(array_size);
423 /* TODO: throw an error */
427 for (pino = 0; pino < tcp->numpocs + 1; pino++) { /* change */
433 pi[pino].tx0 = int_max(cp->tx0 + p * cp->tdx, image->x0);
434 pi[pino].ty0 = int_max(cp->ty0 + q * cp->tdy, image->y0);
435 pi[pino].tx1 = int_min(cp->tx0 + (p + 1) * cp->tdx, image->x1);
436 pi[pino].ty1 = int_min(cp->ty0 + (q + 1) * cp->tdy, image->y1);
437 pi[pino].numcomps = image->numcomps;
439 array_size = image->numcomps * sizeof(opj_pi_comp_t);
440 pi[pino].comps = (opj_pi_comp_t *) opj_malloc(array_size);
441 if(!pi[pino].comps) {
442 /* TODO: throw an error */
443 pi_destroy(pi, cp, tileno);
446 memset(pi[pino].comps, 0, array_size);
448 for (compno = 0; compno < pi->numcomps; compno++) {
449 int tcx0, tcy0, tcx1, tcy1;
450 opj_pi_comp_t *comp = &pi[pino].comps[compno];
451 tccp = &tcp->tccps[compno];
452 comp->dx = image->comps[compno].dx;
453 comp->dy = image->comps[compno].dy;
454 comp->numresolutions = tccp->numresolutions;
456 array_size = comp->numresolutions * sizeof(opj_pi_resolution_t);
457 comp->resolutions = (opj_pi_resolution_t *) opj_malloc(array_size);
458 if(!comp->resolutions) {
459 /* TODO: throw an error */
460 pi_destroy(pi, cp, tileno);
464 tcx0 = int_ceildiv(pi->tx0, comp->dx);
465 tcy0 = int_ceildiv(pi->ty0, comp->dy);
466 tcx1 = int_ceildiv(pi->tx1, comp->dx);
467 tcy1 = int_ceildiv(pi->ty1, comp->dy);
468 if (comp->numresolutions > maxres) {
469 maxres = comp->numresolutions;
472 for (resno = 0; resno < comp->numresolutions; resno++) {
474 int rx0, ry0, rx1, ry1;
475 int px0, py0, px1, py1;
476 opj_pi_resolution_t *res = &comp->resolutions[resno];
477 if (tccp->csty & J2K_CCP_CSTY_PRT) {
478 res->pdx = tccp->prcw[resno];
479 res->pdy = tccp->prch[resno];
484 levelno = comp->numresolutions - 1 - resno;
485 rx0 = int_ceildivpow2(tcx0, levelno);
486 ry0 = int_ceildivpow2(tcy0, levelno);
487 rx1 = int_ceildivpow2(tcx1, levelno);
488 ry1 = int_ceildivpow2(tcy1, levelno);
489 px0 = int_floordivpow2(rx0, res->pdx) << res->pdx;
490 py0 = int_floordivpow2(ry0, res->pdy) << res->pdy;
491 px1 = int_ceildivpow2(rx1, res->pdx) << res->pdx;
492 py1 = int_ceildivpow2(ry1, res->pdy) << res->pdy;
493 res->pw = (rx0==rx1)?0:((px1 - px0) >> res->pdx);
494 res->ph = (ry0==ry1)?0:((py1 - py0) >> res->pdy);
496 if (res->pw*res->ph > maxprec) {
497 maxprec = res->pw*res->ph;
503 tccp = &tcp->tccps[0];
505 pi[pino].step_c = maxprec * pi[pino].step_p;
506 pi[pino].step_r = image->numcomps * pi[pino].step_c;
507 pi[pino].step_l = maxres * pi[pino].step_r;
510 array_size = image->numcomps * maxres * tcp->numlayers * maxprec * sizeof(short int);
511 pi[pino].include = (short int *) opj_malloc(array_size);
512 if(!pi[pino].include) {
513 /* TODO: throw an error */
514 pi_destroy(pi, cp, tileno);
519 pi[pino].include = pi[pino - 1].include;
524 pi[pino].poc.resno0 = 0;
525 pi[pino].poc.compno0 = 0;
526 pi[pino].poc.layno1 = tcp->numlayers;
527 pi[pino].poc.resno1 = maxres;
528 pi[pino].poc.compno1 = image->numcomps;
529 pi[pino].poc.prg = tcp->prg;
532 pi[pino].poc.resno0 = tcp->pocs[pino].resno0;
533 pi[pino].poc.compno0 = tcp->pocs[pino].compno0;
534 pi[pino].poc.layno1 = tcp->pocs[pino].layno1;
535 pi[pino].poc.resno1 = tcp->pocs[pino].resno1;
536 pi[pino].poc.compno1 = tcp->pocs[pino].compno1;
537 pi[pino].poc.prg = tcp->pocs[pino].prg;
539 pi[pino].poc.layno0 = 0;
540 pi[pino].poc.precno0 = 0;
541 pi[pino].poc.precno1 = maxprec;
549 opj_pi_iterator_t *pi_initialise_encode(opj_image_t *image, opj_cp_t *cp, int tileno, int pino){
554 opj_pi_iterator_t *pi = NULL;
555 opj_tcp_t *tcp = NULL;
556 opj_tccp_t *tccp = NULL;
559 tcp = &cp->tcps[tileno];
561 array_size = (tcp->numpocs + 1) * sizeof(opj_pi_iterator_t);
562 pi = (opj_pi_iterator_t *) opj_malloc(array_size);
563 pi->tp_on = cp->tp_on;
564 if(!pi) { return NULL;}
565 for(pino = 0;pino < tcp->numpocs+1 ; pino ++){
569 pi[pino].tx0 = int_max(cp->tx0 + p * cp->tdx, image->x0);
570 pi[pino].ty0 = int_max(cp->ty0 + q * cp->tdy, image->y0);
571 pi[pino].tx1 = int_min(cp->tx0 + (p + 1) * cp->tdx, image->x1);
572 pi[pino].ty1 = int_min(cp->ty0 + (q + 1) * cp->tdy, image->y1);
573 pi[pino].numcomps = image->numcomps;
575 array_size = image->numcomps * sizeof(opj_pi_comp_t);
576 pi[pino].comps = (opj_pi_comp_t *) opj_malloc(array_size);
577 if(!pi[pino].comps) {
578 pi_destroy(pi, cp, tileno);
581 memset(pi[pino].comps, 0, array_size);
583 for (compno = 0; compno < pi->numcomps; compno++) {
584 int tcx0, tcy0, tcx1, tcy1;
585 opj_pi_comp_t *comp = &pi[pino].comps[compno];
586 tccp = &tcp->tccps[compno];
587 comp->dx = image->comps[compno].dx;
588 comp->dy = image->comps[compno].dy;
589 comp->numresolutions = tccp->numresolutions;
591 array_size = comp->numresolutions * sizeof(opj_pi_resolution_t);
592 comp->resolutions = (opj_pi_resolution_t *) opj_malloc(array_size);
593 if(!comp->resolutions) {
594 pi_destroy(pi, cp, tileno);
598 tcx0 = int_ceildiv(pi->tx0, comp->dx);
599 tcy0 = int_ceildiv(pi->ty0, comp->dy);
600 tcx1 = int_ceildiv(pi->tx1, comp->dx);
601 tcy1 = int_ceildiv(pi->ty1, comp->dy);
602 if (comp->numresolutions > maxres) {
603 maxres = comp->numresolutions;
606 for (resno = 0; resno < comp->numresolutions; resno++) {
608 int rx0, ry0, rx1, ry1;
609 int px0, py0, px1, py1;
610 opj_pi_resolution_t *res = &comp->resolutions[resno];
611 if (tccp->csty & J2K_CCP_CSTY_PRT) {
612 res->pdx = tccp->prcw[resno];
613 res->pdy = tccp->prch[resno];
618 levelno = comp->numresolutions - 1 - resno;
619 rx0 = int_ceildivpow2(tcx0, levelno);
620 ry0 = int_ceildivpow2(tcy0, levelno);
621 rx1 = int_ceildivpow2(tcx1, levelno);
622 ry1 = int_ceildivpow2(tcy1, levelno);
623 px0 = int_floordivpow2(rx0, res->pdx) << res->pdx;
624 py0 = int_floordivpow2(ry0, res->pdy) << res->pdy;
625 px1 = int_ceildivpow2(rx1, res->pdx) << res->pdx;
626 py1 = int_ceildivpow2(ry1, res->pdy) << res->pdy;
627 res->pw = (rx0==rx1)?0:((px1 - px0) >> res->pdx);
628 res->ph = (ry0==ry1)?0:((py1 - py0) >> res->pdy);
630 if (res->pw*res->ph > maxprec) {
631 maxprec = res->pw * res->ph;
636 tccp = &tcp->tccps[0];
638 pi[pino].step_c = maxprec * pi[pino].step_p;
639 pi[pino].step_r = image->numcomps * pi[pino].step_c;
640 pi[pino].step_l = maxres * pi[pino].step_r;
642 for (compno = 0; compno < pi->numcomps; compno++) {
643 opj_pi_comp_t *comp = &pi->comps[compno];
644 for (resno = 0; resno < comp->numresolutions; resno++) {
646 opj_pi_resolution_t *res = &comp->resolutions[resno];
647 dx = comp->dx * (1 << (res->pdx + comp->numresolutions - 1 - resno));
648 dy = comp->dy * (1 << (res->pdy + comp->numresolutions - 1 - resno));
649 pi[pino].dx = !pi->dx ? dx : int_min(pi->dx, dx);
650 pi[pino].dy = !pi->dy ? dy : int_min(pi->dy, dy);
655 array_size = (tcp->numpocs+1) * tcp->numlayers * pi[pino].step_l * sizeof(short int);
656 pi[pino].include = (short int *) opj_malloc(array_size);
657 if(!pi[pino].include) {
658 pi_destroy(pi, cp, tileno);
663 pi[pino].include = pi[pino - 1].include;
666 /* Generation of boundaries for each prog flag*/
668 tcp->pocs[pino].compS= tcp->pocs[pino].compno0;
669 tcp->pocs[pino].compE= tcp->pocs[pino].compno1;
670 tcp->pocs[pino].resS = tcp->pocs[pino].resno0;
671 tcp->pocs[pino].resE = tcp->pocs[pino].resno1;
672 tcp->pocs[pino].layE = tcp->pocs[pino].layno1;
673 tcp->pocs[pino].prg = tcp->pocs[pino].prg;
675 tcp->pocs[pino].compS= 0;
676 tcp->pocs[pino].compE= image->numcomps;
677 tcp->pocs[pino].resS = 0;
678 tcp->pocs[pino].resE = maxres;
679 tcp->pocs[pino].layE = tcp->numlayers;
680 tcp->pocs[pino].prg = tcp->prg;
682 tcp->pocs[pino].layS = 0;
683 tcp->pocs[pino].prcS = 0;
684 tcp->pocs[pino].prcE = maxprec;;
685 tcp->pocs[pino].txS = pi[pino].tx0;
686 tcp->pocs[pino].txE = pi[pino].tx1;
687 tcp->pocs[pino].tyS = pi[pino].ty0;
688 tcp->pocs[pino].tyE = pi[pino].ty1;
689 tcp->pocs[pino].dx = pi[pino].dx;
690 tcp->pocs[pino].dy = pi[pino].dy;
697 void pi_destroy(opj_pi_iterator_t *pi, opj_cp_t *cp, int tileno) {
699 opj_tcp_t *tcp = &cp->tcps[tileno];
701 for (pino = 0; pino < tcp->numpocs + 1; pino++) {
703 for (compno = 0; compno < pi->numcomps; compno++) {
704 opj_pi_comp_t *comp = &pi[pino].comps[compno];
705 if(comp->resolutions) {
706 opj_free(comp->resolutions);
709 opj_free(pi[pino].comps);
713 opj_free(pi->include);
719 bool pi_next(opj_pi_iterator_t * pi) {
720 switch (pi->poc.prg) {
722 return pi_next_lrcp(pi);
724 return pi_next_rlcp(pi);
726 return pi_next_rpcl(pi);
728 return pi_next_pcrl(pi);
730 return pi_next_cprl(pi);
738 int pi_check_next_level(int pos,opj_cp_t *cp,int tileno, int pino, char *prog){
740 opj_tcp_t *tcps =&cp->tcps[tileno];
741 opj_poc_t *tcp = &tcps->pocs[pino];
743 for(i=pos;pos>=0;i--){
746 if(tcp->res_t==tcp->resE){
747 l=pi_check_next_level(pos-1,cp,tileno,pino,prog);
758 if(tcp->comp_t==tcp->compE){
759 l=pi_check_next_level(pos-1,cp,tileno,pino,prog);
770 if(tcp->lay_t==tcp->layE){
771 l=pi_check_next_level(pos-1,cp,tileno,pino,prog);
784 if(tcp->prc_t == tcp->prcE){
785 l=pi_check_next_level(i-1,cp,tileno,pino,prog);
796 if(tcp->tx0_t == tcp->txE){
798 if(tcp->ty0_t == tcp->tyE){
799 l=pi_check_next_level(i-1,cp,tileno,pino,prog);
820 void pi_create_encode( opj_pi_iterator_t *pi, opj_cp_t *cp,int tileno, int pino,int tpnum, int tppos,char final_encoding) {
823 int incr_top=1,resetX=0;
824 opj_tcp_t *tcps =&cp->tcps[tileno];
825 opj_poc_t *tcp= &tcps->pocs[pino];
826 prog = j2k_convert_progression_order(tcp->prg);
829 pi[pino].poc.prg = tcp->prg;
831 if(!(cp->tp_on & final_encoding)){
832 pi[pino].poc.resno0 = tcp->resS;
833 pi[pino].poc.resno1 = tcp->resE;
834 pi[pino].poc.compno0 = tcp->compS;
835 pi[pino].poc.compno1 = tcp->compE;
836 pi[pino].poc.layno0 = tcp->layS;
837 pi[pino].poc.layno1 = tcp->layE;
838 pi[pino].poc.precno0 = tcp->prcS;
839 pi[pino].poc.precno1 = tcp->prcE;
840 pi[pino].poc.tx0 = tcp->txS;
841 pi[pino].poc.ty0 = tcp->tyS;
842 pi[pino].poc.tx1 = tcp->txE;
843 pi[pino].poc.ty1 = tcp->tyE;
845 for(i=tppos+1;i<4;i++){
848 pi[pino].poc.resno0 = tcp->resS;
849 pi[pino].poc.resno1 = tcp->resE;
852 pi[pino].poc.compno0 = tcp->compS;
853 pi[pino].poc.compno1 = tcp->compE;
856 pi[pino].poc.layno0 = tcp->layS;
857 pi[pino].poc.layno1 = tcp->layE;
863 pi[pino].poc.precno0 = tcp->prcS;
864 pi[pino].poc.precno1 = tcp->prcE;
867 pi[pino].poc.tx0 = tcp->txS;
868 pi[pino].poc.ty0 = tcp->tyS;
869 pi[pino].poc.tx1 = tcp->txE;
870 pi[pino].poc.ty1 = tcp->tyE;
878 for(i=tppos;i>=0;i--){
881 tcp->comp_t = tcp->compS;
882 pi[pino].poc.compno0 = tcp->comp_t;
883 pi[pino].poc.compno1 = tcp->comp_t+1;
887 tcp->res_t = tcp->resS;
888 pi[pino].poc.resno0 = tcp->res_t;
889 pi[pino].poc.resno1 = tcp->res_t+1;
893 tcp->lay_t = tcp->layS;
894 pi[pino].poc.layno0 = tcp->lay_t;
895 pi[pino].poc.layno1 = tcp->lay_t+1;
902 tcp->prc_t = tcp->prcS;
903 pi[pino].poc.precno0 = tcp->prc_t;
904 pi[pino].poc.precno1 = tcp->prc_t+1;
908 tcp->tx0_t = tcp->txS;
909 tcp->ty0_t = tcp->tyS;
910 pi[pino].poc.tx0 = tcp->tx0_t;
911 pi[pino].poc.tx1 = tcp->tx0_t + tcp->dx - (tcp->tx0_t % tcp->dx);
912 pi[pino].poc.ty0 = tcp->ty0_t;
913 pi[pino].poc.ty1 = tcp->ty0_t + tcp->dy - (tcp->ty0_t % tcp->dy);
914 tcp->tx0_t = pi[pino].poc.tx1;
915 tcp->ty0_t = pi[pino].poc.ty1;
923 for(i=tppos;i>=0;i--){
926 pi[pino].poc.compno0 = tcp->comp_t-1;
927 pi[pino].poc.compno1 = tcp->comp_t;
930 pi[pino].poc.resno0 = tcp->res_t-1;
931 pi[pino].poc.resno1 = tcp->res_t;
934 pi[pino].poc.layno0 = tcp->lay_t-1;
935 pi[pino].poc.layno1 = tcp->lay_t;
941 pi[pino].poc.precno0 = tcp->prc_t-1;
942 pi[pino].poc.precno1 = tcp->prc_t;
945 pi[pino].poc.tx0 = tcp->tx0_t - tcp->dx - (tcp->tx0_t % tcp->dx);
946 pi[pino].poc.tx1 = tcp->tx0_t ;
947 pi[pino].poc.ty0 = tcp->ty0_t - tcp->dy - (tcp->ty0_t % tcp->dy);
948 pi[pino].poc.ty1 = tcp->ty0_t ;
956 if(tcp->res_t==tcp->resE){
957 l=pi_check_next_level(i-1,cp,tileno,pino,prog);
959 tcp->res_t = tcp->resS;
960 pi[pino].poc.resno0 = tcp->res_t;
961 pi[pino].poc.resno1 = tcp->res_t+1;
968 pi[pino].poc.resno0 = tcp->res_t;
969 pi[pino].poc.resno1 = tcp->res_t+1;
975 if(tcp->comp_t ==tcp->compE){
976 l=pi_check_next_level(i-1,cp,tileno,pino,prog);
978 tcp->comp_t = tcp->compS;
979 pi[pino].poc.compno0 = tcp->comp_t;
980 pi[pino].poc.compno1 = tcp->comp_t+1;
987 pi[pino].poc.compno0 = tcp->comp_t;
988 pi[pino].poc.compno1 = tcp->comp_t+1;
994 if(tcp->lay_t == tcp->layE){
995 l=pi_check_next_level(i-1,cp,tileno,pino,prog);
997 tcp->lay_t = tcp->layS;
998 pi[pino].poc.layno0 = tcp->lay_t;
999 pi[pino].poc.layno1 = tcp->lay_t+1;
1006 pi[pino].poc.layno0 = tcp->lay_t;
1007 pi[pino].poc.layno1 = tcp->lay_t+1;
1016 if(tcp->prc_t == tcp->prcE){
1017 l=pi_check_next_level(i-1,cp,tileno,pino,prog);
1019 tcp->prc_t = tcp->prcS;
1020 pi[pino].poc.precno0 = tcp->prc_t;
1021 pi[pino].poc.precno1 = tcp->prc_t+1;
1028 pi[pino].poc.precno0 = tcp->prc_t;
1029 pi[pino].poc.precno1 = tcp->prc_t+1;
1035 if(tcp->tx0_t >= tcp->txE){
1036 if(tcp->ty0_t >= tcp->tyE){
1037 l=pi_check_next_level(i-1,cp,tileno,pino,prog);
1039 tcp->ty0_t = tcp->tyS;
1040 pi[pino].poc.ty0 = tcp->ty0_t;
1041 pi[pino].poc.ty1 = tcp->ty0_t + tcp->dy - (tcp->ty0_t % tcp->dy);
1042 tcp->ty0_t = pi[pino].poc.ty1;
1043 incr_top=1;resetX=1;
1045 incr_top=0;resetX=0;
1048 pi[pino].poc.ty0 = tcp->ty0_t;
1049 pi[pino].poc.ty1 = tcp->ty0_t + tcp->dy - (tcp->ty0_t % tcp->dy);
1050 tcp->ty0_t = pi[pino].poc.ty1;
1051 incr_top=0;resetX=1;
1054 tcp->tx0_t = tcp->txS;
1055 pi[pino].poc.tx0 = tcp->tx0_t;
1056 pi[pino].poc.tx1 = tcp->tx0_t + tcp->dx- (tcp->tx0_t % tcp->dx);
1057 tcp->tx0_t = pi[pino].poc.tx1;
1060 pi[pino].poc.tx0 = tcp->tx0_t;
1061 pi[pino].poc.tx1 = tcp->tx0_t + tcp->dx- (tcp->tx0_t % tcp->dx);
1062 tcp->tx0_t = pi[pino].poc.tx1;