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.
7 * Copyright (c) 2002-2014, Universite catholique de Louvain (UCL), Belgium
8 * Copyright (c) 2002-2014, Professor Benoit Macq
9 * Copyright (c) 2001-2003, David Janssens
10 * Copyright (c) 2002-2003, Yannick Verschueren
11 * Copyright (c) 2003-2007, Francois-Olivier Devaux
12 * Copyright (c) 2003-2014, Antonin Descampe
13 * Copyright (c) 2005, Herve Drolon, FreeImage Team
14 * All rights reserved.
16 * Redistribution and use in source and binary forms, with or without
17 * modification, are permitted provided that the following conditions
19 * 1. Redistributions of source code must retain the above copyright
20 * notice, this list of conditions and the following disclaimer.
21 * 2. Redistributions in binary form must reproduce the above copyright
22 * notice, this list of conditions and the following disclaimer in the
23 * documentation and/or other materials provided with the distribution.
25 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS `AS IS'
26 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
27 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
28 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
29 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
30 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
31 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
32 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
33 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
34 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
35 * POSSIBILITY OF SUCH DAMAGE.
44 #include "opj_apps_config.h"
48 #ifdef OPJ_HAVE_LIBLCMS2
51 #ifdef OPJ_HAVE_LIBLCMS1
56 #define OPJ_CLRSPC_GRAY CLRSPC_GRAY
57 #define OPJ_CLRSPC_SRGB CLRSPC_SRGB
60 /*--------------------------------------------------------
61 Matrix for sYCC, Amendment 1 to IEC 61966-2-1
63 Y : 0.299 0.587 0.114 :R
64 Cb: -0.1687 -0.3312 0.5 :G
65 Cr: 0.5 -0.4187 -0.0812 :B
69 R: 1 -3.68213e-05 1.40199 :Y
70 G: 1.00003 -0.344125 -0.714128 :Cb - 2^(prec - 1)
71 B: 0.999823 1.77204 -8.04142e-06 :Cr - 2^(prec - 1)
73 -----------------------------------------------------------*/
74 static void sycc_to_rgb(int offset, int upb, int y, int cb, int cr,
75 int *out_r, int *out_g, int *out_b)
81 r = y + (int)(1.402 * (float)cr);
89 g = y - (int)(0.344 * (float)cb + 0.714 * (float)cr);
97 b = y + (int)(1.772 * (float)cb);
100 } else if (b > upb) {
106 static void sycc444_to_rgb(opj_image_t *img)
108 int *d0, *d1, *d2, *r, *g, *b;
109 const int *y, *cb, *cr;
110 size_t maxw, maxh, max, i;
113 upb = (int)img->comps[0].prec;
114 offset = 1 << (upb - 1);
115 upb = (1 << upb) - 1;
117 maxw = (size_t)img->comps[0].w;
118 maxh = (size_t)img->comps[0].h;
121 y = img->comps[0].data;
122 cb = img->comps[1].data;
123 cr = img->comps[2].data;
125 d0 = r = (int*)opj_image_data_alloc(sizeof(int) * max);
126 d1 = g = (int*)opj_image_data_alloc(sizeof(int) * max);
127 d2 = b = (int*)opj_image_data_alloc(sizeof(int) * max);
129 if (r == NULL || g == NULL || b == NULL) {
133 for (i = 0U; i < max; ++i) {
134 sycc_to_rgb(offset, upb, *y, *cb, *cr, r, g, b);
142 opj_image_data_free(img->comps[0].data);
143 img->comps[0].data = d0;
144 opj_image_data_free(img->comps[1].data);
145 img->comps[1].data = d1;
146 opj_image_data_free(img->comps[2].data);
147 img->comps[2].data = d2;
148 img->color_space = OPJ_CLRSPC_SRGB;
152 opj_image_data_free(r);
153 opj_image_data_free(g);
154 opj_image_data_free(b);
155 }/* sycc444_to_rgb() */
157 static void sycc422_to_rgb(opj_image_t *img)
159 int *d0, *d1, *d2, *r, *g, *b;
160 const int *y, *cb, *cr;
161 size_t maxw, maxh, max, offx, loopmaxw;
165 upb = (int)img->comps[0].prec;
166 offset = 1 << (upb - 1);
167 upb = (1 << upb) - 1;
169 maxw = (size_t)img->comps[0].w;
170 maxh = (size_t)img->comps[0].h;
173 y = img->comps[0].data;
174 cb = img->comps[1].data;
175 cr = img->comps[2].data;
177 d0 = r = (int*)opj_image_data_alloc(sizeof(int) * max);
178 d1 = g = (int*)opj_image_data_alloc(sizeof(int) * max);
179 d2 = b = (int*)opj_image_data_alloc(sizeof(int) * max);
181 if (r == NULL || g == NULL || b == NULL) {
185 /* if img->x0 is odd, then first column shall use Cb/Cr = 0 */
187 loopmaxw = maxw - offx;
189 for (i = 0U; i < maxh; ++i) {
193 sycc_to_rgb(offset, upb, *y, 0, 0, r, g, b);
200 for (j = 0U; j < (loopmaxw & ~(size_t)1U); j += 2U) {
201 sycc_to_rgb(offset, upb, *y, *cb, *cr, r, g, b);
206 sycc_to_rgb(offset, upb, *y, *cb, *cr, r, g, b);
215 sycc_to_rgb(offset, upb, *y, *cb, *cr, r, g, b);
225 opj_image_data_free(img->comps[0].data);
226 img->comps[0].data = d0;
227 opj_image_data_free(img->comps[1].data);
228 img->comps[1].data = d1;
229 opj_image_data_free(img->comps[2].data);
230 img->comps[2].data = d2;
232 img->comps[1].w = img->comps[2].w = img->comps[0].w;
233 img->comps[1].h = img->comps[2].h = img->comps[0].h;
234 img->comps[1].dx = img->comps[2].dx = img->comps[0].dx;
235 img->comps[1].dy = img->comps[2].dy = img->comps[0].dy;
236 img->color_space = OPJ_CLRSPC_SRGB;
240 opj_image_data_free(r);
241 opj_image_data_free(g);
242 opj_image_data_free(b);
243 }/* sycc422_to_rgb() */
245 static void sycc420_to_rgb(opj_image_t *img)
247 int *d0, *d1, *d2, *r, *g, *b, *nr, *ng, *nb;
248 const int *y, *cb, *cr, *ny;
249 size_t maxw, maxh, max, offx, loopmaxw, offy, loopmaxh;
253 upb = (int)img->comps[0].prec;
254 offset = 1 << (upb - 1);
255 upb = (1 << upb) - 1;
257 maxw = (size_t)img->comps[0].w;
258 maxh = (size_t)img->comps[0].h;
261 y = img->comps[0].data;
262 cb = img->comps[1].data;
263 cr = img->comps[2].data;
265 d0 = r = (int*)opj_image_data_alloc(sizeof(int) * max);
266 d1 = g = (int*)opj_image_data_alloc(sizeof(int) * max);
267 d2 = b = (int*)opj_image_data_alloc(sizeof(int) * max);
269 if (r == NULL || g == NULL || b == NULL) {
273 /* if img->x0 is odd, then first column shall use Cb/Cr = 0 */
275 loopmaxw = maxw - offx;
276 /* if img->y0 is odd, then first line shall use Cb/Cr = 0 */
278 loopmaxh = maxh - offy;
283 for (j = 0; j < maxw; ++j) {
284 sycc_to_rgb(offset, upb, *y, 0, 0, r, g, b);
292 for (i = 0U; i < (loopmaxh & ~(size_t)1U); i += 2U) {
301 sycc_to_rgb(offset, upb, *y, 0, 0, r, g, b);
306 sycc_to_rgb(offset, upb, *ny, *cb, *cr, nr, ng, nb);
313 for (j = 0; j < (loopmaxw & ~(size_t)1U); j += 2U) {
314 sycc_to_rgb(offset, upb, *y, *cb, *cr, r, g, b);
319 sycc_to_rgb(offset, upb, *y, *cb, *cr, r, g, b);
325 sycc_to_rgb(offset, upb, *ny, *cb, *cr, nr, ng, nb);
330 sycc_to_rgb(offset, upb, *ny, *cb, *cr, nr, ng, nb);
339 sycc_to_rgb(offset, upb, *y, *cb, *cr, r, g, b);
345 sycc_to_rgb(offset, upb, *ny, *cb, *cr, nr, ng, nb);
361 for (j = 0U; j < (maxw & ~(size_t)1U); j += 2U) {
362 sycc_to_rgb(offset, upb, *y, *cb, *cr, r, g, b);
369 sycc_to_rgb(offset, upb, *y, *cb, *cr, r, g, b);
379 sycc_to_rgb(offset, upb, *y, *cb, *cr, r, g, b);
383 opj_image_data_free(img->comps[0].data);
384 img->comps[0].data = d0;
385 opj_image_data_free(img->comps[1].data);
386 img->comps[1].data = d1;
387 opj_image_data_free(img->comps[2].data);
388 img->comps[2].data = d2;
390 img->comps[1].w = img->comps[2].w = img->comps[0].w;
391 img->comps[1].h = img->comps[2].h = img->comps[0].h;
392 img->comps[1].dx = img->comps[2].dx = img->comps[0].dx;
393 img->comps[1].dy = img->comps[2].dy = img->comps[0].dy;
394 img->color_space = OPJ_CLRSPC_SRGB;
398 opj_image_data_free(r);
399 opj_image_data_free(g);
400 opj_image_data_free(b);
401 }/* sycc420_to_rgb() */
403 void color_sycc_to_rgb(opj_image_t *img)
405 if (img->numcomps < 3) {
406 img->color_space = OPJ_CLRSPC_GRAY;
410 if ((img->comps[0].dx == 1)
411 && (img->comps[1].dx == 2)
412 && (img->comps[2].dx == 2)
413 && (img->comps[0].dy == 1)
414 && (img->comps[1].dy == 2)
415 && (img->comps[2].dy == 2)) { /* horizontal and vertical sub-sample */
417 } else if ((img->comps[0].dx == 1)
418 && (img->comps[1].dx == 2)
419 && (img->comps[2].dx == 2)
420 && (img->comps[0].dy == 1)
421 && (img->comps[1].dy == 1)
422 && (img->comps[2].dy == 1)) { /* horizontal sub-sample only */
424 } else if ((img->comps[0].dx == 1)
425 && (img->comps[1].dx == 1)
426 && (img->comps[2].dx == 1)
427 && (img->comps[0].dy == 1)
428 && (img->comps[1].dy == 1)
429 && (img->comps[2].dy == 1)) { /* no sub-sample */
432 fprintf(stderr, "%s:%d:color_sycc_to_rgb\n\tCAN NOT CONVERT\n", __FILE__,
436 }/* color_sycc_to_rgb() */
438 #if defined(OPJ_HAVE_LIBLCMS2) || defined(OPJ_HAVE_LIBLCMS1)
440 #ifdef OPJ_HAVE_LIBLCMS1
441 /* Bob Friesenhahn proposed:*/
442 #define cmsSigXYZData icSigXYZData
443 #define cmsSigLabData icSigLabData
444 #define cmsSigCmykData icSigCmykData
445 #define cmsSigYCbCrData icSigYCbCrData
446 #define cmsSigLuvData icSigLuvData
447 #define cmsSigGrayData icSigGrayData
448 #define cmsSigRgbData icSigRgbData
449 #define cmsUInt32Number DWORD
451 #define cmsColorSpaceSignature icColorSpaceSignature
452 #define cmsGetHeaderRenderingIntent cmsTakeRenderingIntent
454 #endif /* OPJ_HAVE_LIBLCMS1 */
456 /*#define DEBUG_PROFILE*/
457 void color_apply_icc_profile(opj_image_t *image)
459 cmsHPROFILE in_prof, out_prof;
460 cmsHTRANSFORM transform;
461 cmsColorSpaceSignature in_space, out_space;
462 cmsUInt32Number intent, in_type, out_type;
464 size_t nr_samples, i, max, max_w, max_h;
466 OPJ_COLOR_SPACE new_space;
468 in_prof = cmsOpenProfileFromMem(image->icc_profile_buf, image->icc_profile_len);
470 FILE *icm = fopen("debug.icm", "wb");
471 fwrite(image->icc_profile_buf, 1, image->icc_profile_len, icm);
475 if (in_prof == NULL) {
479 in_space = cmsGetPCS(in_prof);
480 out_space = cmsGetColorSpace(in_prof);
481 intent = cmsGetHeaderRenderingIntent(in_prof);
484 max_w = image->comps[0].w;
485 max_h = image->comps[0].h;
486 prec = (int)image->comps[0].prec;
488 if (out_space == cmsSigRgbData) { /* enumCS 16 */
489 unsigned int i, nr_comp = image->numcomps;
494 for (i = 1; i < nr_comp; ++i) { /* AFL test */
495 if (image->comps[0].dx != image->comps[i].dx) {
499 if (image->comps[0].dy != image->comps[i].dy) {
503 if (image->comps[0].prec != image->comps[i].prec) {
507 if (image->comps[0].sgnd != image->comps[i].sgnd) {
513 cmsCloseProfile(in_prof);
518 in_type = TYPE_RGB_8;
519 out_type = TYPE_RGB_8;
521 in_type = TYPE_RGB_16;
522 out_type = TYPE_RGB_16;
524 out_prof = cmsCreate_sRGBProfile();
525 new_space = OPJ_CLRSPC_SRGB;
526 } else if (out_space == cmsSigGrayData) { /* enumCS 17 */
527 in_type = TYPE_GRAY_8;
528 out_type = TYPE_RGB_8;
529 out_prof = cmsCreate_sRGBProfile();
530 new_space = OPJ_CLRSPC_SRGB;
531 } else if (out_space == cmsSigYCbCrData) { /* enumCS 18 */
532 in_type = TYPE_YCbCr_16;
533 out_type = TYPE_RGB_16;
534 out_prof = cmsCreate_sRGBProfile();
535 new_space = OPJ_CLRSPC_SRGB;
538 fprintf(stderr, "%s:%d: color_apply_icc_profile\n\tICC Profile has unknown "
539 "output colorspace(%#x)(%c%c%c%c)\n\tICC Profile ignored.\n",
540 __FILE__, __LINE__, out_space,
541 (out_space >> 24) & 0xff, (out_space >> 16) & 0xff,
542 (out_space >> 8) & 0xff, out_space & 0xff);
544 cmsCloseProfile(in_prof);
548 if (out_prof == NULL) {
549 cmsCloseProfile(in_prof);
555 "%s:%d:color_apply_icc_profile\n\tchannels(%d) prec(%d) w(%d) h(%d)"
556 "\n\tprofile: in(%p) out(%p)\n", __FILE__, __LINE__, image->numcomps, prec,
557 max_w, max_h, (void*)in_prof, (void*)out_prof);
559 fprintf(stderr, "\trender_intent (%u)\n\t"
560 "color_space: in(%#x)(%c%c%c%c) out:(%#x)(%c%c%c%c)\n\t"
561 " type: in(%u) out:(%u)\n",
564 (in_space >> 24) & 0xff, (in_space >> 16) & 0xff,
565 (in_space >> 8) & 0xff, in_space & 0xff,
568 (out_space >> 24) & 0xff, (out_space >> 16) & 0xff,
569 (out_space >> 8) & 0xff, out_space & 0xff,
576 #endif /* DEBUG_PROFILE */
578 transform = cmsCreateTransform(in_prof, in_type, out_prof, out_type, intent, 0);
580 #ifdef OPJ_HAVE_LIBLCMS2
581 /* Possible for: LCMS_VERSION >= 2000 :*/
582 cmsCloseProfile(in_prof);
583 cmsCloseProfile(out_prof);
586 if (transform == NULL) {
588 fprintf(stderr, "%s:%d:color_apply_icc_profile\n\tcmsCreateTransform failed. "
589 "ICC Profile ignored.\n", __FILE__, __LINE__);
592 #ifdef OPJ_HAVE_LIBLCMS1
593 cmsCloseProfile(in_prof);
594 cmsCloseProfile(out_prof);
599 if (image->numcomps > 2) { /* RGB, RGBA */
601 unsigned char *inbuf, *outbuf, *in, *out;
604 nr_samples = (size_t)(max * 3U * sizeof(unsigned char));
605 in = inbuf = (unsigned char*)opj_image_data_alloc(nr_samples);
606 out = outbuf = (unsigned char*)opj_image_data_alloc(nr_samples);
608 if (inbuf == NULL || outbuf == NULL) {
612 r = image->comps[0].data;
613 g = image->comps[1].data;
614 b = image->comps[2].data;
616 for (i = 0U; i < max; ++i) {
617 *in++ = (unsigned char) * r++;
618 *in++ = (unsigned char) * g++;
619 *in++ = (unsigned char) * b++;
622 cmsDoTransform(transform, inbuf, outbuf, (cmsUInt32Number)max);
624 r = image->comps[0].data;
625 g = image->comps[1].data;
626 b = image->comps[2].data;
628 for (i = 0U; i < max; ++i) {
629 *r++ = (int) * out++;
630 *g++ = (int) * out++;
631 *b++ = (int) * out++;
636 opj_image_data_free(inbuf);
637 opj_image_data_free(outbuf);
638 } else { /* prec > 8 */
639 unsigned short *inbuf, *outbuf, *in, *out;
642 nr_samples = (size_t)(max * 3U * sizeof(unsigned short));
643 in = inbuf = (unsigned short*)opj_image_data_alloc(nr_samples);
644 out = outbuf = (unsigned short*)opj_image_data_alloc(nr_samples);
646 if (inbuf == NULL || outbuf == NULL) {
650 r = image->comps[0].data;
651 g = image->comps[1].data;
652 b = image->comps[2].data;
654 for (i = 0U ; i < max; ++i) {
655 *in++ = (unsigned short) * r++;
656 *in++ = (unsigned short) * g++;
657 *in++ = (unsigned short) * b++;
660 cmsDoTransform(transform, inbuf, outbuf, (cmsUInt32Number)max);
662 r = image->comps[0].data;
663 g = image->comps[1].data;
664 b = image->comps[2].data;
666 for (i = 0; i < max; ++i) {
667 *r++ = (int) * out++;
668 *g++ = (int) * out++;
669 *b++ = (int) * out++;
674 opj_image_data_free(inbuf);
675 opj_image_data_free(outbuf);
677 } else { /* image->numcomps <= 2 : GRAY, GRAYA */
679 unsigned char *in, *inbuf, *out, *outbuf;
680 opj_image_comp_t *new_comps;
683 nr_samples = (size_t)(max * 3 * sizeof(unsigned char));
684 in = inbuf = (unsigned char*)opj_image_data_alloc(nr_samples);
685 out = outbuf = (unsigned char*)opj_image_data_alloc(nr_samples);
686 g = (int*)opj_image_data_alloc((size_t)max * sizeof(int));
687 b = (int*)opj_image_data_alloc((size_t)max * sizeof(int));
689 if (inbuf == NULL || outbuf == NULL || g == NULL || b == NULL) {
693 new_comps = (opj_image_comp_t*)realloc(image->comps,
694 (image->numcomps + 2) * sizeof(opj_image_comp_t));
696 if (new_comps == NULL) {
700 image->comps = new_comps;
702 if (image->numcomps == 2) {
703 image->comps[3] = image->comps[1];
706 image->comps[1] = image->comps[0];
707 image->comps[2] = image->comps[0];
709 image->comps[1].data = g;
710 image->comps[2].data = b;
712 image->numcomps += 2;
714 r = image->comps[0].data;
716 for (i = 0U; i < max; ++i) {
717 *in++ = (unsigned char) * r++;
719 cmsDoTransform(transform, inbuf, outbuf, (cmsUInt32Number)max);
721 r = image->comps[0].data;
722 g = image->comps[1].data;
723 b = image->comps[2].data;
725 for (i = 0U; i < max; ++i) {
726 *r++ = (int) * out++;
727 *g++ = (int) * out++;
728 *b++ = (int) * out++;
734 opj_image_data_free(inbuf);
735 opj_image_data_free(outbuf);
736 opj_image_data_free(g);
737 opj_image_data_free(b);
738 } else { /* prec > 8 */
739 unsigned short *in, *inbuf, *out, *outbuf;
740 opj_image_comp_t *new_comps;
743 nr_samples = (size_t)(max * 3U * sizeof(unsigned short));
744 in = inbuf = (unsigned short*)opj_image_data_alloc(nr_samples);
745 out = outbuf = (unsigned short*)opj_image_data_alloc(nr_samples);
746 g = (int*)opj_image_data_alloc((size_t)max * sizeof(int));
747 b = (int*)opj_image_data_alloc((size_t)max * sizeof(int));
749 if (inbuf == NULL || outbuf == NULL || g == NULL || b == NULL) {
753 new_comps = (opj_image_comp_t*)realloc(image->comps,
754 (image->numcomps + 2) * sizeof(opj_image_comp_t));
756 if (new_comps == NULL) {
760 image->comps = new_comps;
762 if (image->numcomps == 2) {
763 image->comps[3] = image->comps[1];
766 image->comps[1] = image->comps[0];
767 image->comps[2] = image->comps[0];
769 image->comps[1].data = g;
770 image->comps[2].data = b;
772 image->numcomps += 2;
774 r = image->comps[0].data;
776 for (i = 0U; i < max; ++i) {
777 *in++ = (unsigned short) * r++;
779 cmsDoTransform(transform, inbuf, outbuf, (cmsUInt32Number)max);
781 r = image->comps[0].data;
782 g = image->comps[1].data;
783 b = image->comps[2].data;
785 for (i = 0; i < max; ++i) {
786 *r++ = (int) * out++;
787 *g++ = (int) * out++;
788 *b++ = (int) * out++;
794 opj_image_data_free(inbuf);
795 opj_image_data_free(outbuf);
796 opj_image_data_free(g);
797 opj_image_data_free(b);
799 }/* if(image->numcomps > 2) */
801 cmsDeleteTransform(transform);
803 #ifdef OPJ_HAVE_LIBLCMS1
804 cmsCloseProfile(in_prof);
805 cmsCloseProfile(out_prof);
808 image->color_space = new_space;
810 }/* color_apply_icc_profile() */
812 static int are_comps_same_dimensions(opj_image_t * image)
815 for (i = 1; i < image->numcomps; i++) {
816 if (image->comps[0].dx != image->comps[i].dx ||
817 image->comps[0].dy != image->comps[i].dy) {
824 void color_cielab_to_rgb(opj_image_t *image)
827 int enumcs, numcomps;
828 OPJ_COLOR_SPACE new_space;
830 numcomps = (int)image->numcomps;
833 fprintf(stderr, "%s:%d:\n\tnumcomps %d not handled. Quitting.\n",
834 __FILE__, __LINE__, numcomps);
837 if (!are_comps_same_dimensions(image)) {
839 "%s:%d:\n\tcomponents are not all of the same dimension. Quitting.\n",
844 row = (int*)image->icc_profile_buf;
847 if (enumcs == 14) { /* CIELab */
848 int *L, *a, *b, *red, *green, *blue;
849 int *src0, *src1, *src2, *dst0, *dst1, *dst2;
850 double rl, ol, ra, oa, rb, ob, prec0, prec1, prec2;
851 double minL, maxL, mina, maxa, minb, maxb;
852 unsigned int default_type;
855 cmsHTRANSFORM transform;
856 cmsUInt16Number RGB[3];
859 in = cmsCreateLab4Profile(NULL);
863 out = cmsCreate_sRGBProfile();
868 transform = cmsCreateTransform(in, TYPE_Lab_DBL, out, TYPE_RGB_16,
869 INTENT_PERCEPTUAL, 0);
871 #ifdef OPJ_HAVE_LIBLCMS2
873 cmsCloseProfile(out);
875 if (transform == NULL) {
876 #ifdef OPJ_HAVE_LIBLCMS1
878 cmsCloseProfile(out);
882 new_space = OPJ_CLRSPC_SRGB;
884 prec0 = (double)image->comps[0].prec;
885 prec1 = (double)image->comps[1].prec;
886 prec2 = (double)image->comps[2].prec;
888 default_type = (unsigned int)row[1];
890 if (default_type == 0x44454600) { /* DEF : default */
895 oa = pow(2, prec1 - 1);
896 ob = pow(2, prec2 - 2) + pow(2, prec2 - 3);
906 L = src0 = image->comps[0].data;
907 a = src1 = image->comps[1].data;
908 b = src2 = image->comps[2].data;
910 max = image->comps[0].w * image->comps[0].h;
912 red = dst0 = (int*)opj_image_data_alloc(max * sizeof(int));
913 green = dst1 = (int*)opj_image_data_alloc(max * sizeof(int));
914 blue = dst2 = (int*)opj_image_data_alloc(max * sizeof(int));
916 if (red == NULL || green == NULL || blue == NULL) {
920 minL = -(rl * ol) / (pow(2, prec0) - 1);
923 mina = -(ra * oa) / (pow(2, prec1) - 1);
926 minb = -(rb * ob) / (pow(2, prec2) - 1);
929 for (i = 0; i < max; ++i) {
930 Lab.L = minL + (double)(*L) * (maxL - minL) / (pow(2, prec0) - 1);
932 Lab.a = mina + (double)(*a) * (maxa - mina) / (pow(2, prec1) - 1);
934 Lab.b = minb + (double)(*b) * (maxb - minb) / (pow(2, prec2) - 1);
937 cmsDoTransform(transform, &Lab, RGB, 1);
943 cmsDeleteTransform(transform);
944 #ifdef OPJ_HAVE_LIBLCMS1
946 cmsCloseProfile(out);
948 opj_image_data_free(src0);
949 image->comps[0].data = dst0;
950 opj_image_data_free(src1);
951 image->comps[1].data = dst1;
952 opj_image_data_free(src2);
953 image->comps[2].data = dst2;
955 image->color_space = new_space;
956 image->comps[0].prec = 16;
957 image->comps[1].prec = 16;
958 image->comps[2].prec = 16;
963 cmsDeleteTransform(transform);
964 #ifdef OPJ_HAVE_LIBLCMS1
966 cmsCloseProfile(out);
969 opj_image_data_free(red);
972 opj_image_data_free(green);
975 opj_image_data_free(blue);
980 fprintf(stderr, "%s:%d:\n\tenumCS %d not handled. Ignoring.\n", __FILE__,
982 }/* color_cielab_to_rgb() */
984 #endif /* OPJ_HAVE_LIBLCMS2 || OPJ_HAVE_LIBLCMS1 */
986 void color_cmyk_to_rgb(opj_image_t *image)
989 float sC, sM, sY, sK;
990 unsigned int w, h, max, i;
992 w = image->comps[0].w;
993 h = image->comps[0].h;
996 (image->numcomps < 4)
997 || (image->comps[0].dx != image->comps[1].dx) ||
998 (image->comps[0].dx != image->comps[2].dx) ||
999 (image->comps[0].dx != image->comps[3].dx)
1000 || (image->comps[0].dy != image->comps[1].dy) ||
1001 (image->comps[0].dy != image->comps[2].dy) ||
1002 (image->comps[0].dy != image->comps[3].dy)
1004 fprintf(stderr, "%s:%d:color_cmyk_to_rgb\n\tCAN NOT CONVERT\n", __FILE__,
1011 sC = 1.0F / (float)((1 << image->comps[0].prec) - 1);
1012 sM = 1.0F / (float)((1 << image->comps[1].prec) - 1);
1013 sY = 1.0F / (float)((1 << image->comps[2].prec) - 1);
1014 sK = 1.0F / (float)((1 << image->comps[3].prec) - 1);
1016 for (i = 0; i < max; ++i) {
1017 /* CMYK values from 0 to 1 */
1018 C = (float)(image->comps[0].data[i]) * sC;
1019 M = (float)(image->comps[1].data[i]) * sM;
1020 Y = (float)(image->comps[2].data[i]) * sY;
1021 K = (float)(image->comps[3].data[i]) * sK;
1023 /* Invert all CMYK values */
1029 /* CMYK -> RGB : RGB results from 0 to 255 */
1030 image->comps[0].data[i] = (int)(255.0F * C * K); /* R */
1031 image->comps[1].data[i] = (int)(255.0F * M * K); /* G */
1032 image->comps[2].data[i] = (int)(255.0F * Y * K); /* B */
1035 opj_image_data_free(image->comps[3].data);
1036 image->comps[3].data = NULL;
1037 image->comps[0].prec = 8;
1038 image->comps[1].prec = 8;
1039 image->comps[2].prec = 8;
1040 image->numcomps -= 1;
1041 image->color_space = OPJ_CLRSPC_SRGB;
1043 for (i = 3; i < image->numcomps; ++i) {
1044 memcpy(&(image->comps[i]), &(image->comps[i + 1]), sizeof(image->comps[i]));
1047 }/* color_cmyk_to_rgb() */
1050 * This code has been adopted from sjpx_openjpeg.c of ghostscript
1052 void color_esycc_to_rgb(opj_image_t *image)
1054 int y, cb, cr, sign1, sign2, val;
1055 unsigned int w, h, max, i;
1056 int flip_value = (1 << (image->comps[0].prec - 1));
1057 int max_value = (1 << image->comps[0].prec) - 1;
1060 (image->numcomps < 3)
1061 || (image->comps[0].dx != image->comps[1].dx) ||
1062 (image->comps[0].dx != image->comps[2].dx)
1063 || (image->comps[0].dy != image->comps[1].dy) ||
1064 (image->comps[0].dy != image->comps[2].dy)
1066 fprintf(stderr, "%s:%d:color_esycc_to_rgb\n\tCAN NOT CONVERT\n", __FILE__,
1071 w = image->comps[0].w;
1072 h = image->comps[0].h;
1074 sign1 = (int)image->comps[1].sgnd;
1075 sign2 = (int)image->comps[2].sgnd;
1079 for (i = 0; i < max; ++i) {
1081 y = image->comps[0].data[i];
1082 cb = image->comps[1].data[i];
1083 cr = image->comps[2].data[i];
1093 ((float)y - (float)0.0000368 * (float)cb
1094 + (float)1.40199 * (float)cr + (float)0.5);
1096 if (val > max_value) {
1098 } else if (val < 0) {
1101 image->comps[0].data[i] = val;
1104 ((float)1.0003 * (float)y - (float)0.344125 * (float)cb
1105 - (float)0.7141128 * (float)cr + (float)0.5);
1107 if (val > max_value) {
1109 } else if (val < 0) {
1112 image->comps[1].data[i] = val;
1115 ((float)0.999823 * (float)y + (float)1.77204 * (float)cb
1116 - (float)0.000008 * (float)cr + (float)0.5);
1118 if (val > max_value) {
1120 } else if (val < 0) {
1123 image->comps[2].data[i] = val;
1125 image->color_space = OPJ_CLRSPC_SRGB;
1127 }/* color_esycc_to_rgb() */