Home | History | Annotate | Download | only in libjpeg
      1 /*
      2  * jccolor.c
      3  *
      4  * Copyright (C) 1991-1996, Thomas G. Lane.
      5  * This file is part of the Independent JPEG Group's software.
      6  * For conditions of distribution and use, see the accompanying README file.
      7  *
      8  * This file contains input colorspace conversion routines.
      9  */
     10 
     11 #define JPEG_INTERNALS
     12 #include "jinclude.h"
     13 #include "jpeglib.h"
     14 
     15 
     16 /* Private subobject */
     17 
     18 typedef struct {
     19   struct jpeg_color_converter pub; /* public fields */
     20 
     21   /* Private state for RGB->YCC conversion */
     22   INT32 * rgb_ycc_tab;		/* => table for RGB to YCbCr conversion */
     23 } my_color_converter;
     24 
     25 typedef my_color_converter * my_cconvert_ptr;
     26 
     27 
     28 /**************** RGB -> YCbCr conversion: most common case **************/
     29 
     30 /*
     31  * YCbCr is defined per CCIR 601-1, except that Cb and Cr are
     32  * normalized to the range 0..MAXJSAMPLE rather than -0.5 .. 0.5.
     33  * The conversion equations to be implemented are therefore
     34  *	Y  =  0.29900 * R + 0.58700 * G + 0.11400 * B
     35  *	Cb = -0.16874 * R - 0.33126 * G + 0.50000 * B  + CENTERJSAMPLE
     36  *	Cr =  0.50000 * R - 0.41869 * G - 0.08131 * B  + CENTERJSAMPLE
     37  * (These numbers are derived from TIFF 6.0 section 21, dated 3-June-92.)
     38  * Note: older versions of the IJG code used a zero offset of MAXJSAMPLE/2,
     39  * rather than CENTERJSAMPLE, for Cb and Cr.  This gave equal positive and
     40  * negative swings for Cb/Cr, but meant that grayscale values (Cb=Cr=0)
     41  * were not represented exactly.  Now we sacrifice exact representation of
     42  * maximum red and maximum blue in order to get exact grayscales.
     43  *
     44  * To avoid floating-point arithmetic, we represent the fractional constants
     45  * as integers scaled up by 2^16 (about 4 digits precision); we have to divide
     46  * the products by 2^16, with appropriate rounding, to get the correct answer.
     47  *
     48  * For even more speed, we avoid doing any multiplications in the inner loop
     49  * by precalculating the constants times R,G,B for all possible values.
     50  * For 8-bit JSAMPLEs this is very reasonable (only 256 entries per table);
     51  * for 12-bit samples it is still acceptable.  It's not very reasonable for
     52  * 16-bit samples, but if you want lossless storage you shouldn't be changing
     53  * colorspace anyway.
     54  * The CENTERJSAMPLE offsets and the rounding fudge-factor of 0.5 are included
     55  * in the tables to save adding them separately in the inner loop.
     56  */
     57 
     58 #define SCALEBITS	16	/* speediest right-shift on some machines */
     59 #define CBCR_OFFSET	((INT32) CENTERJSAMPLE << SCALEBITS)
     60 #define ONE_HALF	((INT32) 1 << (SCALEBITS-1))
     61 #define FIX(x)		((INT32) ((x) * (1L<<SCALEBITS) + 0.5))
     62 
     63 /* We allocate one big table and divide it up into eight parts, instead of
     64  * doing eight alloc_small requests.  This lets us use a single table base
     65  * address, which can be held in a register in the inner loops on many
     66  * machines (more than can hold all eight addresses, anyway).
     67  */
     68 
     69 #define R_Y_OFF		0			/* offset to R => Y section */
     70 #define G_Y_OFF		(1*(MAXJSAMPLE+1))	/* offset to G => Y section */
     71 #define B_Y_OFF		(2*(MAXJSAMPLE+1))	/* etc. */
     72 #define R_CB_OFF	(3*(MAXJSAMPLE+1))
     73 #define G_CB_OFF	(4*(MAXJSAMPLE+1))
     74 #define B_CB_OFF	(5*(MAXJSAMPLE+1))
     75 #define R_CR_OFF	B_CB_OFF		/* B=>Cb, R=>Cr are the same */
     76 #define G_CR_OFF	(6*(MAXJSAMPLE+1))
     77 #define B_CR_OFF	(7*(MAXJSAMPLE+1))
     78 #define TABLE_SIZE	(8*(MAXJSAMPLE+1))
     79 
     80 
     81 /*
     82  * Initialize for RGB->YCC colorspace conversion.
     83  */
     84 
     85 METHODDEF(void)
     86 rgb_ycc_start (j_compress_ptr cinfo)
     87 {
     88   my_cconvert_ptr cconvert = (my_cconvert_ptr) cinfo->cconvert;
     89   INT32 * rgb_ycc_tab;
     90   INT32 i;
     91 
     92   /* Allocate and fill in the conversion tables. */
     93   cconvert->rgb_ycc_tab = rgb_ycc_tab = (INT32 *)
     94     (*cinfo->mem->alloc_small) ((j_common_ptr) cinfo, JPOOL_IMAGE,
     95 				(TABLE_SIZE * SIZEOF(INT32)));
     96 
     97   for (i = 0; i <= MAXJSAMPLE; i++) {
     98     rgb_ycc_tab[i+R_Y_OFF] = FIX(0.29900) * i;
     99     rgb_ycc_tab[i+G_Y_OFF] = FIX(0.58700) * i;
    100     rgb_ycc_tab[i+B_Y_OFF] = FIX(0.11400) * i     + ONE_HALF;
    101     rgb_ycc_tab[i+R_CB_OFF] = (-FIX(0.16874)) * i;
    102     rgb_ycc_tab[i+G_CB_OFF] = (-FIX(0.33126)) * i;
    103     /* We use a rounding fudge-factor of 0.5-epsilon for Cb and Cr.
    104      * This ensures that the maximum output will round to MAXJSAMPLE
    105      * not MAXJSAMPLE+1, and thus that we don't have to range-limit.
    106      */
    107     rgb_ycc_tab[i+B_CB_OFF] = FIX(0.50000) * i    + CBCR_OFFSET + ONE_HALF-1;
    108 /*  B=>Cb and R=>Cr tables are the same
    109     rgb_ycc_tab[i+R_CR_OFF] = FIX(0.50000) * i    + CBCR_OFFSET + ONE_HALF-1;
    110 */
    111     rgb_ycc_tab[i+G_CR_OFF] = (-FIX(0.41869)) * i;
    112     rgb_ycc_tab[i+B_CR_OFF] = (-FIX(0.08131)) * i;
    113   }
    114 }
    115 
    116 
    117 /*
    118  * Convert some rows of samples to the JPEG colorspace.
    119  *
    120  * Note that we change from the application's interleaved-pixel format
    121  * to our internal noninterleaved, one-plane-per-component format.
    122  * The input buffer is therefore three times as wide as the output buffer.
    123  *
    124  * A starting row offset is provided only for the output buffer.  The caller
    125  * can easily adjust the passed input_buf value to accommodate any row
    126  * offset required on that side.
    127  */
    128 
    129 METHODDEF(void)
    130 rgb_ycc_convert (j_compress_ptr cinfo,
    131 		 JSAMPARRAY input_buf, JSAMPIMAGE output_buf,
    132 		 JDIMENSION output_row, int num_rows)
    133 {
    134   my_cconvert_ptr cconvert = (my_cconvert_ptr) cinfo->cconvert;
    135   register int r, g, b;
    136   register INT32 * ctab = cconvert->rgb_ycc_tab;
    137   register JSAMPROW inptr;
    138   register JSAMPROW outptr0, outptr1, outptr2;
    139   register JDIMENSION col;
    140   JDIMENSION num_cols = cinfo->image_width;
    141 
    142   while (--num_rows >= 0) {
    143     inptr = *input_buf++;
    144     outptr0 = output_buf[0][output_row];
    145     outptr1 = output_buf[1][output_row];
    146     outptr2 = output_buf[2][output_row];
    147     output_row++;
    148     for (col = 0; col < num_cols; col++) {
    149       r = GETJSAMPLE(inptr[RGB_RED]);
    150       g = GETJSAMPLE(inptr[RGB_GREEN]);
    151       b = GETJSAMPLE(inptr[RGB_BLUE]);
    152       inptr += RGB_PIXELSIZE;
    153       /* If the inputs are 0..MAXJSAMPLE, the outputs of these equations
    154        * must be too; we do not need an explicit range-limiting operation.
    155        * Hence the value being shifted is never negative, and we don't
    156        * need the general RIGHT_SHIFT macro.
    157        */
    158       /* Y */
    159       outptr0[col] = (JSAMPLE)
    160 		((ctab[r+R_Y_OFF] + ctab[g+G_Y_OFF] + ctab[b+B_Y_OFF])
    161 		 >> SCALEBITS);
    162       /* Cb */
    163       outptr1[col] = (JSAMPLE)
    164 		((ctab[r+R_CB_OFF] + ctab[g+G_CB_OFF] + ctab[b+B_CB_OFF])
    165 		 >> SCALEBITS);
    166       /* Cr */
    167       outptr2[col] = (JSAMPLE)
    168 		((ctab[r+R_CR_OFF] + ctab[g+G_CR_OFF] + ctab[b+B_CR_OFF])
    169 		 >> SCALEBITS);
    170     }
    171   }
    172 }
    173 
    174 
    175 /**************** Cases other than RGB -> YCbCr **************/
    176 
    177 
    178 /*
    179  * Convert some rows of samples to the JPEG colorspace.
    180  * This version handles RGB->grayscale conversion, which is the same
    181  * as the RGB->Y portion of RGB->YCbCr.
    182  * We assume rgb_ycc_start has been called (we only use the Y tables).
    183  */
    184 
    185 METHODDEF(void)
    186 rgb_gray_convert (j_compress_ptr cinfo,
    187 		  JSAMPARRAY input_buf, JSAMPIMAGE output_buf,
    188 		  JDIMENSION output_row, int num_rows)
    189 {
    190   my_cconvert_ptr cconvert = (my_cconvert_ptr) cinfo->cconvert;
    191   register int r, g, b;
    192   register INT32 * ctab = cconvert->rgb_ycc_tab;
    193   register JSAMPROW inptr;
    194   register JSAMPROW outptr;
    195   register JDIMENSION col;
    196   JDIMENSION num_cols = cinfo->image_width;
    197 
    198   while (--num_rows >= 0) {
    199     inptr = *input_buf++;
    200     outptr = output_buf[0][output_row];
    201     output_row++;
    202     for (col = 0; col < num_cols; col++) {
    203       r = GETJSAMPLE(inptr[RGB_RED]);
    204       g = GETJSAMPLE(inptr[RGB_GREEN]);
    205       b = GETJSAMPLE(inptr[RGB_BLUE]);
    206       inptr += RGB_PIXELSIZE;
    207       /* Y */
    208       outptr[col] = (JSAMPLE)
    209 		((ctab[r+R_Y_OFF] + ctab[g+G_Y_OFF] + ctab[b+B_Y_OFF])
    210 		 >> SCALEBITS);
    211     }
    212   }
    213 }
    214 
    215 
    216 /*
    217  * Convert some rows of samples to the JPEG colorspace.
    218  * This version handles Adobe-style CMYK->YCCK conversion,
    219  * where we convert R=1-C, G=1-M, and B=1-Y to YCbCr using the same
    220  * conversion as above, while passing K (black) unchanged.
    221  * We assume rgb_ycc_start has been called.
    222  */
    223 
    224 METHODDEF(void)
    225 cmyk_ycck_convert (j_compress_ptr cinfo,
    226 		   JSAMPARRAY input_buf, JSAMPIMAGE output_buf,
    227 		   JDIMENSION output_row, int num_rows)
    228 {
    229   my_cconvert_ptr cconvert = (my_cconvert_ptr) cinfo->cconvert;
    230   register int r, g, b;
    231   register INT32 * ctab = cconvert->rgb_ycc_tab;
    232   register JSAMPROW inptr;
    233   register JSAMPROW outptr0, outptr1, outptr2, outptr3;
    234   register JDIMENSION col;
    235   JDIMENSION num_cols = cinfo->image_width;
    236 
    237   while (--num_rows >= 0) {
    238     inptr = *input_buf++;
    239     outptr0 = output_buf[0][output_row];
    240     outptr1 = output_buf[1][output_row];
    241     outptr2 = output_buf[2][output_row];
    242     outptr3 = output_buf[3][output_row];
    243     output_row++;
    244     for (col = 0; col < num_cols; col++) {
    245       r = MAXJSAMPLE - GETJSAMPLE(inptr[0]);
    246       g = MAXJSAMPLE - GETJSAMPLE(inptr[1]);
    247       b = MAXJSAMPLE - GETJSAMPLE(inptr[2]);
    248       /* K passes through as-is */
    249       outptr3[col] = inptr[3];	/* don't need GETJSAMPLE here */
    250       inptr += 4;
    251       /* If the inputs are 0..MAXJSAMPLE, the outputs of these equations
    252        * must be too; we do not need an explicit range-limiting operation.
    253        * Hence the value being shifted is never negative, and we don't
    254        * need the general RIGHT_SHIFT macro.
    255        */
    256       /* Y */
    257       outptr0[col] = (JSAMPLE)
    258 		((ctab[r+R_Y_OFF] + ctab[g+G_Y_OFF] + ctab[b+B_Y_OFF])
    259 		 >> SCALEBITS);
    260       /* Cb */
    261       outptr1[col] = (JSAMPLE)
    262 		((ctab[r+R_CB_OFF] + ctab[g+G_CB_OFF] + ctab[b+B_CB_OFF])
    263 		 >> SCALEBITS);
    264       /* Cr */
    265       outptr2[col] = (JSAMPLE)
    266 		((ctab[r+R_CR_OFF] + ctab[g+G_CR_OFF] + ctab[b+B_CR_OFF])
    267 		 >> SCALEBITS);
    268     }
    269   }
    270 }
    271 
    272 
    273 /*
    274  * Convert some rows of samples to the JPEG colorspace.
    275  * This version handles grayscale output with no conversion.
    276  * The source can be either plain grayscale or YCbCr (since Y == gray).
    277  */
    278 
    279 METHODDEF(void)
    280 grayscale_convert (j_compress_ptr cinfo,
    281 		   JSAMPARRAY input_buf, JSAMPIMAGE output_buf,
    282 		   JDIMENSION output_row, int num_rows)
    283 {
    284   register JSAMPROW inptr;
    285   register JSAMPROW outptr;
    286   register JDIMENSION col;
    287   JDIMENSION num_cols = cinfo->image_width;
    288   int instride = cinfo->input_components;
    289 
    290   while (--num_rows >= 0) {
    291     inptr = *input_buf++;
    292     outptr = output_buf[0][output_row];
    293     output_row++;
    294     for (col = 0; col < num_cols; col++) {
    295       outptr[col] = inptr[0];	/* don't need GETJSAMPLE() here */
    296       inptr += instride;
    297     }
    298   }
    299 }
    300 
    301 
    302 /*
    303  * Convert some rows of samples to the JPEG colorspace.
    304  * This version handles multi-component colorspaces without conversion.
    305  * We assume input_components == num_components.
    306  */
    307 
    308 METHODDEF(void)
    309 null_convert (j_compress_ptr cinfo,
    310 	      JSAMPARRAY input_buf, JSAMPIMAGE output_buf,
    311 	      JDIMENSION output_row, int num_rows)
    312 {
    313   register JSAMPROW inptr;
    314   register JSAMPROW outptr;
    315   register JDIMENSION col;
    316   register int ci;
    317   int nc = cinfo->num_components;
    318   JDIMENSION num_cols = cinfo->image_width;
    319 
    320   while (--num_rows >= 0) {
    321     /* It seems fastest to make a separate pass for each component. */
    322     for (ci = 0; ci < nc; ci++) {
    323       inptr = *input_buf;
    324       outptr = output_buf[ci][output_row];
    325       for (col = 0; col < num_cols; col++) {
    326 	outptr[col] = inptr[ci]; /* don't need GETJSAMPLE() here */
    327 	inptr += nc;
    328       }
    329     }
    330     input_buf++;
    331     output_row++;
    332   }
    333 }
    334 
    335 
    336 /*
    337  * Empty method for start_pass.
    338  */
    339 
    340 METHODDEF(void)
    341 null_method (j_compress_ptr cinfo)
    342 {
    343   /* no work needed */
    344 }
    345 
    346 
    347 /*
    348  * Module initialization routine for input colorspace conversion.
    349  */
    350 
    351 GLOBAL(void)
    352 jinit_color_converter (j_compress_ptr cinfo)
    353 {
    354   my_cconvert_ptr cconvert;
    355 
    356   cconvert = (my_cconvert_ptr)
    357     (*cinfo->mem->alloc_small) ((j_common_ptr) cinfo, JPOOL_IMAGE,
    358 				SIZEOF(my_color_converter));
    359   cinfo->cconvert = (struct jpeg_color_converter *) cconvert;
    360   /* set start_pass to null method until we find out differently */
    361   cconvert->pub.start_pass = null_method;
    362 
    363   /* Make sure input_components agrees with in_color_space */
    364   switch (cinfo->in_color_space) {
    365   case JCS_GRAYSCALE:
    366     if (cinfo->input_components != 1)
    367       ERREXIT(cinfo, JERR_BAD_IN_COLORSPACE);
    368     break;
    369 
    370   case JCS_RGB:
    371 #if RGB_PIXELSIZE != 3
    372     if (cinfo->input_components != RGB_PIXELSIZE)
    373       ERREXIT(cinfo, JERR_BAD_IN_COLORSPACE);
    374     break;
    375 #endif /* else share code with YCbCr */
    376 
    377   case JCS_YCbCr:
    378     if (cinfo->input_components != 3)
    379       ERREXIT(cinfo, JERR_BAD_IN_COLORSPACE);
    380     break;
    381 
    382   case JCS_CMYK:
    383   case JCS_YCCK:
    384     if (cinfo->input_components != 4)
    385       ERREXIT(cinfo, JERR_BAD_IN_COLORSPACE);
    386     break;
    387 
    388   default:			/* JCS_UNKNOWN can be anything */
    389     if (cinfo->input_components < 1)
    390       ERREXIT(cinfo, JERR_BAD_IN_COLORSPACE);
    391     break;
    392   }
    393 
    394   /* Check num_components, set conversion method based on requested space */
    395   switch (cinfo->jpeg_color_space) {
    396   case JCS_GRAYSCALE:
    397     if (cinfo->num_components != 1)
    398       ERREXIT(cinfo, JERR_BAD_J_COLORSPACE);
    399     if (cinfo->in_color_space == JCS_GRAYSCALE)
    400       cconvert->pub.color_convert = grayscale_convert;
    401     else if (cinfo->in_color_space == JCS_RGB) {
    402       cconvert->pub.start_pass = rgb_ycc_start;
    403       cconvert->pub.color_convert = rgb_gray_convert;
    404     } else if (cinfo->in_color_space == JCS_YCbCr)
    405       cconvert->pub.color_convert = grayscale_convert;
    406     else
    407       ERREXIT(cinfo, JERR_CONVERSION_NOTIMPL);
    408     break;
    409 
    410   case JCS_RGB:
    411     if (cinfo->num_components != 3)
    412       ERREXIT(cinfo, JERR_BAD_J_COLORSPACE);
    413     if (cinfo->in_color_space == JCS_RGB && RGB_PIXELSIZE == 3)
    414       cconvert->pub.color_convert = null_convert;
    415     else
    416       ERREXIT(cinfo, JERR_CONVERSION_NOTIMPL);
    417     break;
    418 
    419   case JCS_YCbCr:
    420     if (cinfo->num_components != 3)
    421       ERREXIT(cinfo, JERR_BAD_J_COLORSPACE);
    422     if (cinfo->in_color_space == JCS_RGB) {
    423       cconvert->pub.start_pass = rgb_ycc_start;
    424       cconvert->pub.color_convert = rgb_ycc_convert;
    425     } else if (cinfo->in_color_space == JCS_YCbCr)
    426       cconvert->pub.color_convert = null_convert;
    427     else
    428       ERREXIT(cinfo, JERR_CONVERSION_NOTIMPL);
    429     break;
    430 
    431   case JCS_CMYK:
    432     if (cinfo->num_components != 4)
    433       ERREXIT(cinfo, JERR_BAD_J_COLORSPACE);
    434     if (cinfo->in_color_space == JCS_CMYK)
    435       cconvert->pub.color_convert = null_convert;
    436     else
    437       ERREXIT(cinfo, JERR_CONVERSION_NOTIMPL);
    438     break;
    439 
    440   case JCS_YCCK:
    441     if (cinfo->num_components != 4)
    442       ERREXIT(cinfo, JERR_BAD_J_COLORSPACE);
    443     if (cinfo->in_color_space == JCS_CMYK) {
    444       cconvert->pub.start_pass = rgb_ycc_start;
    445       cconvert->pub.color_convert = cmyk_ycck_convert;
    446     } else if (cinfo->in_color_space == JCS_YCCK)
    447       cconvert->pub.color_convert = null_convert;
    448     else
    449       ERREXIT(cinfo, JERR_CONVERSION_NOTIMPL);
    450     break;
    451 
    452   default:			/* allow null conversion of JCS_UNKNOWN */
    453     if (cinfo->jpeg_color_space != cinfo->in_color_space ||
    454 	cinfo->num_components != cinfo->input_components)
    455       ERREXIT(cinfo, JERR_CONVERSION_NOTIMPL);
    456     cconvert->pub.color_convert = null_convert;
    457     break;
    458   }
    459 }
    460