nuclear@14: /* nuclear@14: * jccolor.c nuclear@14: * nuclear@14: * Copyright (C) 1991-1996, Thomas G. Lane. nuclear@14: * This file is part of the Independent JPEG Group's software. nuclear@14: * For conditions of distribution and use, see the accompanying README file. nuclear@14: * nuclear@14: * This file contains input colorspace conversion routines. nuclear@14: */ nuclear@14: nuclear@14: #define JPEG_INTERNALS nuclear@14: #include "jinclude.h" nuclear@14: #include "jpeglib.h" nuclear@14: nuclear@14: nuclear@14: /* Private subobject */ nuclear@14: nuclear@14: typedef struct { nuclear@14: struct jpeg_color_converter pub; /* public fields */ nuclear@14: nuclear@14: /* Private state for RGB->YCC conversion */ nuclear@14: INT32 * rgb_ycc_tab; /* => table for RGB to YCbCr conversion */ nuclear@14: } my_color_converter; nuclear@14: nuclear@14: typedef my_color_converter * my_cconvert_ptr; nuclear@14: nuclear@14: nuclear@14: /**************** RGB -> YCbCr conversion: most common case **************/ nuclear@14: nuclear@14: /* nuclear@14: * YCbCr is defined per CCIR 601-1, except that Cb and Cr are nuclear@14: * normalized to the range 0..MAXJSAMPLE rather than -0.5 .. 0.5. nuclear@14: * The conversion equations to be implemented are therefore nuclear@14: * Y = 0.29900 * R + 0.58700 * G + 0.11400 * B nuclear@14: * Cb = -0.16874 * R - 0.33126 * G + 0.50000 * B + CENTERJSAMPLE nuclear@14: * Cr = 0.50000 * R - 0.41869 * G - 0.08131 * B + CENTERJSAMPLE nuclear@14: * (These numbers are derived from TIFF 6.0 section 21, dated 3-June-92.) nuclear@14: * Note: older versions of the IJG code used a zero offset of MAXJSAMPLE/2, nuclear@14: * rather than CENTERJSAMPLE, for Cb and Cr. This gave equal positive and nuclear@14: * negative swings for Cb/Cr, but meant that grayscale values (Cb=Cr=0) nuclear@14: * were not represented exactly. Now we sacrifice exact representation of nuclear@14: * maximum red and maximum blue in order to get exact grayscales. nuclear@14: * nuclear@14: * To avoid floating-point arithmetic, we represent the fractional constants nuclear@14: * as integers scaled up by 2^16 (about 4 digits precision); we have to divide nuclear@14: * the products by 2^16, with appropriate rounding, to get the correct answer. nuclear@14: * nuclear@14: * For even more speed, we avoid doing any multiplications in the inner loop nuclear@14: * by precalculating the constants times R,G,B for all possible values. nuclear@14: * For 8-bit JSAMPLEs this is very reasonable (only 256 entries per table); nuclear@14: * for 12-bit samples it is still acceptable. It's not very reasonable for nuclear@14: * 16-bit samples, but if you want lossless storage you shouldn't be changing nuclear@14: * colorspace anyway. nuclear@14: * The CENTERJSAMPLE offsets and the rounding fudge-factor of 0.5 are included nuclear@14: * in the tables to save adding them separately in the inner loop. nuclear@14: */ nuclear@14: nuclear@14: #define SCALEBITS 16 /* speediest right-shift on some machines */ nuclear@14: #define CBCR_OFFSET ((INT32) CENTERJSAMPLE << SCALEBITS) nuclear@14: #define ONE_HALF ((INT32) 1 << (SCALEBITS-1)) nuclear@14: #define FIX(x) ((INT32) ((x) * (1L< Y section */ nuclear@14: #define G_Y_OFF (1*(MAXJSAMPLE+1)) /* offset to G => Y section */ nuclear@14: #define B_Y_OFF (2*(MAXJSAMPLE+1)) /* etc. */ nuclear@14: #define R_CB_OFF (3*(MAXJSAMPLE+1)) nuclear@14: #define G_CB_OFF (4*(MAXJSAMPLE+1)) nuclear@14: #define B_CB_OFF (5*(MAXJSAMPLE+1)) nuclear@14: #define R_CR_OFF B_CB_OFF /* B=>Cb, R=>Cr are the same */ nuclear@14: #define G_CR_OFF (6*(MAXJSAMPLE+1)) nuclear@14: #define B_CR_OFF (7*(MAXJSAMPLE+1)) nuclear@14: #define TABLE_SIZE (8*(MAXJSAMPLE+1)) nuclear@14: nuclear@14: nuclear@14: /* nuclear@14: * Initialize for RGB->YCC colorspace conversion. nuclear@14: */ nuclear@14: nuclear@14: METHODDEF(void) nuclear@14: rgb_ycc_start (j_compress_ptr cinfo) nuclear@14: { nuclear@14: my_cconvert_ptr cconvert = (my_cconvert_ptr) cinfo->cconvert; nuclear@14: INT32 * rgb_ycc_tab; nuclear@14: INT32 i; nuclear@14: nuclear@14: /* Allocate and fill in the conversion tables. */ nuclear@14: cconvert->rgb_ycc_tab = rgb_ycc_tab = (INT32 *) nuclear@14: (*cinfo->mem->alloc_small) ((j_common_ptr) cinfo, JPOOL_IMAGE, nuclear@14: (TABLE_SIZE * SIZEOF(INT32))); nuclear@14: nuclear@14: for (i = 0; i <= MAXJSAMPLE; i++) { nuclear@14: rgb_ycc_tab[i+R_Y_OFF] = FIX(0.29900) * i; nuclear@14: rgb_ycc_tab[i+G_Y_OFF] = FIX(0.58700) * i; nuclear@14: rgb_ycc_tab[i+B_Y_OFF] = FIX(0.11400) * i + ONE_HALF; nuclear@14: rgb_ycc_tab[i+R_CB_OFF] = (-FIX(0.16874)) * i; nuclear@14: rgb_ycc_tab[i+G_CB_OFF] = (-FIX(0.33126)) * i; nuclear@14: /* We use a rounding fudge-factor of 0.5-epsilon for Cb and Cr. nuclear@14: * This ensures that the maximum output will round to MAXJSAMPLE nuclear@14: * not MAXJSAMPLE+1, and thus that we don't have to range-limit. nuclear@14: */ nuclear@14: rgb_ycc_tab[i+B_CB_OFF] = FIX(0.50000) * i + CBCR_OFFSET + ONE_HALF-1; nuclear@14: /* B=>Cb and R=>Cr tables are the same nuclear@14: rgb_ycc_tab[i+R_CR_OFF] = FIX(0.50000) * i + CBCR_OFFSET + ONE_HALF-1; nuclear@14: */ nuclear@14: rgb_ycc_tab[i+G_CR_OFF] = (-FIX(0.41869)) * i; nuclear@14: rgb_ycc_tab[i+B_CR_OFF] = (-FIX(0.08131)) * i; nuclear@14: } nuclear@14: } nuclear@14: nuclear@14: nuclear@14: /* nuclear@14: * Convert some rows of samples to the JPEG colorspace. nuclear@14: * nuclear@14: * Note that we change from the application's interleaved-pixel format nuclear@14: * to our internal noninterleaved, one-plane-per-component format. nuclear@14: * The input buffer is therefore three times as wide as the output buffer. nuclear@14: * nuclear@14: * A starting row offset is provided only for the output buffer. The caller nuclear@14: * can easily adjust the passed input_buf value to accommodate any row nuclear@14: * offset required on that side. nuclear@14: */ nuclear@14: nuclear@14: METHODDEF(void) nuclear@14: rgb_ycc_convert (j_compress_ptr cinfo, nuclear@14: JSAMPARRAY input_buf, JSAMPIMAGE output_buf, nuclear@14: JDIMENSION output_row, int num_rows) nuclear@14: { nuclear@14: my_cconvert_ptr cconvert = (my_cconvert_ptr) cinfo->cconvert; nuclear@14: register int r, g, b; nuclear@14: register INT32 * ctab = cconvert->rgb_ycc_tab; nuclear@14: register JSAMPROW inptr; nuclear@14: register JSAMPROW outptr0, outptr1, outptr2; nuclear@14: register JDIMENSION col; nuclear@14: JDIMENSION num_cols = cinfo->image_width; nuclear@14: nuclear@14: while (--num_rows >= 0) { nuclear@14: inptr = *input_buf++; nuclear@14: outptr0 = output_buf[0][output_row]; nuclear@14: outptr1 = output_buf[1][output_row]; nuclear@14: outptr2 = output_buf[2][output_row]; nuclear@14: output_row++; nuclear@14: for (col = 0; col < num_cols; col++) { nuclear@14: r = GETJSAMPLE(inptr[RGB_RED]); nuclear@14: g = GETJSAMPLE(inptr[RGB_GREEN]); nuclear@14: b = GETJSAMPLE(inptr[RGB_BLUE]); nuclear@14: inptr += RGB_PIXELSIZE; nuclear@14: /* If the inputs are 0..MAXJSAMPLE, the outputs of these equations nuclear@14: * must be too; we do not need an explicit range-limiting operation. nuclear@14: * Hence the value being shifted is never negative, and we don't nuclear@14: * need the general RIGHT_SHIFT macro. nuclear@14: */ nuclear@14: /* Y */ nuclear@14: outptr0[col] = (JSAMPLE) nuclear@14: ((ctab[r+R_Y_OFF] + ctab[g+G_Y_OFF] + ctab[b+B_Y_OFF]) nuclear@14: >> SCALEBITS); nuclear@14: /* Cb */ nuclear@14: outptr1[col] = (JSAMPLE) nuclear@14: ((ctab[r+R_CB_OFF] + ctab[g+G_CB_OFF] + ctab[b+B_CB_OFF]) nuclear@14: >> SCALEBITS); nuclear@14: /* Cr */ nuclear@14: outptr2[col] = (JSAMPLE) nuclear@14: ((ctab[r+R_CR_OFF] + ctab[g+G_CR_OFF] + ctab[b+B_CR_OFF]) nuclear@14: >> SCALEBITS); nuclear@14: } nuclear@14: } nuclear@14: } nuclear@14: nuclear@14: nuclear@14: /**************** Cases other than RGB -> YCbCr **************/ nuclear@14: nuclear@14: nuclear@14: /* nuclear@14: * Convert some rows of samples to the JPEG colorspace. nuclear@14: * This version handles RGB->grayscale conversion, which is the same nuclear@14: * as the RGB->Y portion of RGB->YCbCr. nuclear@14: * We assume rgb_ycc_start has been called (we only use the Y tables). nuclear@14: */ nuclear@14: nuclear@14: METHODDEF(void) nuclear@14: rgb_gray_convert (j_compress_ptr cinfo, nuclear@14: JSAMPARRAY input_buf, JSAMPIMAGE output_buf, nuclear@14: JDIMENSION output_row, int num_rows) nuclear@14: { nuclear@14: my_cconvert_ptr cconvert = (my_cconvert_ptr) cinfo->cconvert; nuclear@14: register int r, g, b; nuclear@14: register INT32 * ctab = cconvert->rgb_ycc_tab; nuclear@14: register JSAMPROW inptr; nuclear@14: register JSAMPROW outptr; nuclear@14: register JDIMENSION col; nuclear@14: JDIMENSION num_cols = cinfo->image_width; nuclear@14: nuclear@14: while (--num_rows >= 0) { nuclear@14: inptr = *input_buf++; nuclear@14: outptr = output_buf[0][output_row]; nuclear@14: output_row++; nuclear@14: for (col = 0; col < num_cols; col++) { nuclear@14: r = GETJSAMPLE(inptr[RGB_RED]); nuclear@14: g = GETJSAMPLE(inptr[RGB_GREEN]); nuclear@14: b = GETJSAMPLE(inptr[RGB_BLUE]); nuclear@14: inptr += RGB_PIXELSIZE; nuclear@14: /* Y */ nuclear@14: outptr[col] = (JSAMPLE) nuclear@14: ((ctab[r+R_Y_OFF] + ctab[g+G_Y_OFF] + ctab[b+B_Y_OFF]) nuclear@14: >> SCALEBITS); nuclear@14: } nuclear@14: } nuclear@14: } nuclear@14: nuclear@14: nuclear@14: /* nuclear@14: * Convert some rows of samples to the JPEG colorspace. nuclear@14: * This version handles Adobe-style CMYK->YCCK conversion, nuclear@14: * where we convert R=1-C, G=1-M, and B=1-Y to YCbCr using the same nuclear@14: * conversion as above, while passing K (black) unchanged. nuclear@14: * We assume rgb_ycc_start has been called. nuclear@14: */ nuclear@14: nuclear@14: METHODDEF(void) nuclear@14: cmyk_ycck_convert (j_compress_ptr cinfo, nuclear@14: JSAMPARRAY input_buf, JSAMPIMAGE output_buf, nuclear@14: JDIMENSION output_row, int num_rows) nuclear@14: { nuclear@14: my_cconvert_ptr cconvert = (my_cconvert_ptr) cinfo->cconvert; nuclear@14: register int r, g, b; nuclear@14: register INT32 * ctab = cconvert->rgb_ycc_tab; nuclear@14: register JSAMPROW inptr; nuclear@14: register JSAMPROW outptr0, outptr1, outptr2, outptr3; nuclear@14: register JDIMENSION col; nuclear@14: JDIMENSION num_cols = cinfo->image_width; nuclear@14: nuclear@14: while (--num_rows >= 0) { nuclear@14: inptr = *input_buf++; nuclear@14: outptr0 = output_buf[0][output_row]; nuclear@14: outptr1 = output_buf[1][output_row]; nuclear@14: outptr2 = output_buf[2][output_row]; nuclear@14: outptr3 = output_buf[3][output_row]; nuclear@14: output_row++; nuclear@14: for (col = 0; col < num_cols; col++) { nuclear@14: r = MAXJSAMPLE - GETJSAMPLE(inptr[0]); nuclear@14: g = MAXJSAMPLE - GETJSAMPLE(inptr[1]); nuclear@14: b = MAXJSAMPLE - GETJSAMPLE(inptr[2]); nuclear@14: /* K passes through as-is */ nuclear@14: outptr3[col] = inptr[3]; /* don't need GETJSAMPLE here */ nuclear@14: inptr += 4; nuclear@14: /* If the inputs are 0..MAXJSAMPLE, the outputs of these equations nuclear@14: * must be too; we do not need an explicit range-limiting operation. nuclear@14: * Hence the value being shifted is never negative, and we don't nuclear@14: * need the general RIGHT_SHIFT macro. nuclear@14: */ nuclear@14: /* Y */ nuclear@14: outptr0[col] = (JSAMPLE) nuclear@14: ((ctab[r+R_Y_OFF] + ctab[g+G_Y_OFF] + ctab[b+B_Y_OFF]) nuclear@14: >> SCALEBITS); nuclear@14: /* Cb */ nuclear@14: outptr1[col] = (JSAMPLE) nuclear@14: ((ctab[r+R_CB_OFF] + ctab[g+G_CB_OFF] + ctab[b+B_CB_OFF]) nuclear@14: >> SCALEBITS); nuclear@14: /* Cr */ nuclear@14: outptr2[col] = (JSAMPLE) nuclear@14: ((ctab[r+R_CR_OFF] + ctab[g+G_CR_OFF] + ctab[b+B_CR_OFF]) nuclear@14: >> SCALEBITS); nuclear@14: } nuclear@14: } nuclear@14: } nuclear@14: nuclear@14: nuclear@14: /* nuclear@14: * Convert some rows of samples to the JPEG colorspace. nuclear@14: * This version handles grayscale output with no conversion. nuclear@14: * The source can be either plain grayscale or YCbCr (since Y == gray). nuclear@14: */ nuclear@14: nuclear@14: METHODDEF(void) nuclear@14: grayscale_convert (j_compress_ptr cinfo, nuclear@14: JSAMPARRAY input_buf, JSAMPIMAGE output_buf, nuclear@14: JDIMENSION output_row, int num_rows) nuclear@14: { nuclear@14: register JSAMPROW inptr; nuclear@14: register JSAMPROW outptr; nuclear@14: register JDIMENSION col; nuclear@14: JDIMENSION num_cols = cinfo->image_width; nuclear@14: int instride = cinfo->input_components; nuclear@14: nuclear@14: while (--num_rows >= 0) { nuclear@14: inptr = *input_buf++; nuclear@14: outptr = output_buf[0][output_row]; nuclear@14: output_row++; nuclear@14: for (col = 0; col < num_cols; col++) { nuclear@14: outptr[col] = inptr[0]; /* don't need GETJSAMPLE() here */ nuclear@14: inptr += instride; nuclear@14: } nuclear@14: } nuclear@14: } nuclear@14: nuclear@14: nuclear@14: /* nuclear@14: * Convert some rows of samples to the JPEG colorspace. nuclear@14: * This version handles multi-component colorspaces without conversion. nuclear@14: * We assume input_components == num_components. nuclear@14: */ nuclear@14: nuclear@14: METHODDEF(void) nuclear@14: null_convert (j_compress_ptr cinfo, nuclear@14: JSAMPARRAY input_buf, JSAMPIMAGE output_buf, nuclear@14: JDIMENSION output_row, int num_rows) nuclear@14: { nuclear@14: register JSAMPROW inptr; nuclear@14: register JSAMPROW outptr; nuclear@14: register JDIMENSION col; nuclear@14: register int ci; nuclear@14: int nc = cinfo->num_components; nuclear@14: JDIMENSION num_cols = cinfo->image_width; nuclear@14: nuclear@14: while (--num_rows >= 0) { nuclear@14: /* It seems fastest to make a separate pass for each component. */ nuclear@14: for (ci = 0; ci < nc; ci++) { nuclear@14: inptr = *input_buf; nuclear@14: outptr = output_buf[ci][output_row]; nuclear@14: for (col = 0; col < num_cols; col++) { nuclear@14: outptr[col] = inptr[ci]; /* don't need GETJSAMPLE() here */ nuclear@14: inptr += nc; nuclear@14: } nuclear@14: } nuclear@14: input_buf++; nuclear@14: output_row++; nuclear@14: } nuclear@14: } nuclear@14: nuclear@14: nuclear@14: /* nuclear@14: * Empty method for start_pass. nuclear@14: */ nuclear@14: nuclear@14: METHODDEF(void) nuclear@14: null_method (j_compress_ptr cinfo) nuclear@14: { nuclear@14: /* no work needed */ nuclear@14: } nuclear@14: nuclear@14: nuclear@14: /* nuclear@14: * Module initialization routine for input colorspace conversion. nuclear@14: */ nuclear@14: nuclear@14: GLOBAL(void) nuclear@14: jinit_color_converter (j_compress_ptr cinfo) nuclear@14: { nuclear@14: my_cconvert_ptr cconvert; nuclear@14: nuclear@14: cconvert = (my_cconvert_ptr) nuclear@14: (*cinfo->mem->alloc_small) ((j_common_ptr) cinfo, JPOOL_IMAGE, nuclear@14: SIZEOF(my_color_converter)); nuclear@14: cinfo->cconvert = (struct jpeg_color_converter *) cconvert; nuclear@14: /* set start_pass to null method until we find out differently */ nuclear@14: cconvert->pub.start_pass = null_method; nuclear@14: nuclear@14: /* Make sure input_components agrees with in_color_space */ nuclear@14: switch (cinfo->in_color_space) { nuclear@14: case JCS_GRAYSCALE: nuclear@14: if (cinfo->input_components != 1) nuclear@14: ERREXIT(cinfo, JERR_BAD_IN_COLORSPACE); nuclear@14: break; nuclear@14: nuclear@14: case JCS_RGB: nuclear@14: #if RGB_PIXELSIZE != 3 nuclear@14: if (cinfo->input_components != RGB_PIXELSIZE) nuclear@14: ERREXIT(cinfo, JERR_BAD_IN_COLORSPACE); nuclear@14: break; nuclear@14: #endif /* else share code with YCbCr */ nuclear@14: nuclear@14: case JCS_YCbCr: nuclear@14: if (cinfo->input_components != 3) nuclear@14: ERREXIT(cinfo, JERR_BAD_IN_COLORSPACE); nuclear@14: break; nuclear@14: nuclear@14: case JCS_CMYK: nuclear@14: case JCS_YCCK: nuclear@14: if (cinfo->input_components != 4) nuclear@14: ERREXIT(cinfo, JERR_BAD_IN_COLORSPACE); nuclear@14: break; nuclear@14: nuclear@14: default: /* JCS_UNKNOWN can be anything */ nuclear@14: if (cinfo->input_components < 1) nuclear@14: ERREXIT(cinfo, JERR_BAD_IN_COLORSPACE); nuclear@14: break; nuclear@14: } nuclear@14: nuclear@14: /* Check num_components, set conversion method based on requested space */ nuclear@14: switch (cinfo->jpeg_color_space) { nuclear@14: case JCS_GRAYSCALE: nuclear@14: if (cinfo->num_components != 1) nuclear@14: ERREXIT(cinfo, JERR_BAD_J_COLORSPACE); nuclear@14: if (cinfo->in_color_space == JCS_GRAYSCALE) nuclear@14: cconvert->pub.color_convert = grayscale_convert; nuclear@14: else if (cinfo->in_color_space == JCS_RGB) { nuclear@14: cconvert->pub.start_pass = rgb_ycc_start; nuclear@14: cconvert->pub.color_convert = rgb_gray_convert; nuclear@14: } else if (cinfo->in_color_space == JCS_YCbCr) nuclear@14: cconvert->pub.color_convert = grayscale_convert; nuclear@14: else nuclear@14: ERREXIT(cinfo, JERR_CONVERSION_NOTIMPL); nuclear@14: break; nuclear@14: nuclear@14: case JCS_RGB: nuclear@14: if (cinfo->num_components != 3) nuclear@14: ERREXIT(cinfo, JERR_BAD_J_COLORSPACE); nuclear@14: if (cinfo->in_color_space == JCS_RGB && RGB_PIXELSIZE == 3) nuclear@14: cconvert->pub.color_convert = null_convert; nuclear@14: else nuclear@14: ERREXIT(cinfo, JERR_CONVERSION_NOTIMPL); nuclear@14: break; nuclear@14: nuclear@14: case JCS_YCbCr: nuclear@14: if (cinfo->num_components != 3) nuclear@14: ERREXIT(cinfo, JERR_BAD_J_COLORSPACE); nuclear@14: if (cinfo->in_color_space == JCS_RGB) { nuclear@14: cconvert->pub.start_pass = rgb_ycc_start; nuclear@14: cconvert->pub.color_convert = rgb_ycc_convert; nuclear@14: } else if (cinfo->in_color_space == JCS_YCbCr) nuclear@14: cconvert->pub.color_convert = null_convert; nuclear@14: else nuclear@14: ERREXIT(cinfo, JERR_CONVERSION_NOTIMPL); nuclear@14: break; nuclear@14: nuclear@14: case JCS_CMYK: nuclear@14: if (cinfo->num_components != 4) nuclear@14: ERREXIT(cinfo, JERR_BAD_J_COLORSPACE); nuclear@14: if (cinfo->in_color_space == JCS_CMYK) nuclear@14: cconvert->pub.color_convert = null_convert; nuclear@14: else nuclear@14: ERREXIT(cinfo, JERR_CONVERSION_NOTIMPL); nuclear@14: break; nuclear@14: nuclear@14: case JCS_YCCK: nuclear@14: if (cinfo->num_components != 4) nuclear@14: ERREXIT(cinfo, JERR_BAD_J_COLORSPACE); nuclear@14: if (cinfo->in_color_space == JCS_CMYK) { nuclear@14: cconvert->pub.start_pass = rgb_ycc_start; nuclear@14: cconvert->pub.color_convert = cmyk_ycck_convert; nuclear@14: } else if (cinfo->in_color_space == JCS_YCCK) nuclear@14: cconvert->pub.color_convert = null_convert; nuclear@14: else nuclear@14: ERREXIT(cinfo, JERR_CONVERSION_NOTIMPL); nuclear@14: break; nuclear@14: nuclear@14: default: /* allow null conversion of JCS_UNKNOWN */ nuclear@14: if (cinfo->jpeg_color_space != cinfo->in_color_space || nuclear@14: cinfo->num_components != cinfo->input_components) nuclear@14: ERREXIT(cinfo, JERR_CONVERSION_NOTIMPL); nuclear@14: cconvert->pub.color_convert = null_convert; nuclear@14: break; nuclear@14: } nuclear@14: }