JD2022-TU1/main/extern/CaptureJpeg/Source/JDCOLOR.cpp

360 lines
12 KiB
C++

// * jdcolor.c
// *
// * Copyright (C) 1991-1995, Thomas G. Lane.
// * This file is part of the Independent JPEG Group's software.
// * For conditions of distribution and use, see the accompanying README file.
// *
// * This file contains output colorspace conversion routines.
#ifdef _MSC_VER
#pragma warning(push)
#pragma warning(disable: 4127)
#endif
#define JPEG_INTERNALS
#include "JINCLUDE.h"
#include "JPEGLIB.h"
// Private subobject
typedef struct {
struct jpeg_color_deconverter pub; // public fields
// Private state for YCC->RGB conversion
int * Cr_r_tab; // => table for Cr to R conversion
int * Cb_b_tab; // => table for Cb to B conversion
INT32 * Cr_g_tab; // => table for Cr to G conversion
INT32 * Cb_g_tab; // => table for Cb to G conversion
} my_color_deconverter;
typedef my_color_deconverter * my_cconvert_ptr;
// *************** YCbCr -> RGB conversion: most common case *************
// * YCbCr is defined per CCIR 601-1, except that Cb and Cr are
// * normalized to the range 0..MAXJSAMPLE rather than -0.5 .. 0.5.
// * The conversion equations to be implemented are therefore
// * R = Y + 1.40200 * Cr
// * G = Y - 0.34414 * Cb - 0.71414 * Cr
// * B = Y + 1.77200 * Cb
// * where Cb and Cr represent the incoming values less CENTERJSAMPLE.
// * (These numbers are derived from TIFF 6.0 section 21, dated 3-June-92.)
// *
// * To avoid floating-point arithmetic, we represent the fractional constants
// * as integers scaled up by 2^16 (about 4 digits precision); we have to divide
// * the products by 2^16, with appropriate rounding, to get the correct answer.
// * Notice that Y, being an integral input, does not contribute any fraction
// * so it need not participate in the rounding.
// *
// * For even more speed, we avoid doing any multiplications in the inner loop
// * by precalculating the constants times Cb and Cr for all possible values.
// * For 8-bit JSAMPLEs this is very reasonable (only 256 entries per table);
// * for 12-bit samples it is still acceptable. It's not very reasonable for
// * 16-bit samples, but if you want lossless storage you shouldn't be changing
// * colorspace anyway.
// * The Cr=>R and Cb=>B values can be rounded to integers in advance; the
// * values for the G calculation are left scaled up, since we must add them
// * together before rounding.
#define SCALEBITS 16 // speediest right-shift on some machines
#define ONE_HALF ((INT32) 1 << (SCALEBITS-1))
#define FIX(x) ((INT32) ((x) * (1L<<SCALEBITS) + 0.5))
// * Initialize tables for YCC->RGB colorspace conversion.
LOCAL void
build_ycc_rgb_table (j_decompress_ptr cinfo)
{
my_cconvert_ptr cconvert = (my_cconvert_ptr) cinfo->cconvert;
int i;
INT32 x;
SHIFT_TEMPS
cconvert->Cr_r_tab = (int *)
(*cinfo->mem->alloc_small) ((j_common_ptr) cinfo, JPOOL_IMAGE,
(MAXJSAMPLE+1) * SIZEOF(int));
cconvert->Cb_b_tab = (int *)
(*cinfo->mem->alloc_small) ((j_common_ptr) cinfo, JPOOL_IMAGE,
(MAXJSAMPLE+1) * SIZEOF(int));
cconvert->Cr_g_tab = (INT32 *)
(*cinfo->mem->alloc_small) ((j_common_ptr) cinfo, JPOOL_IMAGE,
(MAXJSAMPLE+1) * SIZEOF(INT32));
cconvert->Cb_g_tab = (INT32 *)
(*cinfo->mem->alloc_small) ((j_common_ptr) cinfo, JPOOL_IMAGE,
(MAXJSAMPLE+1) * SIZEOF(INT32));
for (i = 0, x = -CENTERJSAMPLE; i <= MAXJSAMPLE; i++, x++) {
// i is the actual input pixel value, in the range 0..MAXJSAMPLE
// The Cb or Cr value we are thinking of is x = i - CENTERJSAMPLE
// Cr=>R value is nearest int to 1.40200 * x
cconvert->Cr_r_tab[i] = (int)
RIGHT_SHIFT(FIX(1.40200) * x + ONE_HALF, SCALEBITS);
// Cb=>B value is nearest int to 1.77200 * x
cconvert->Cb_b_tab[i] = (int)
RIGHT_SHIFT(FIX(1.77200) * x + ONE_HALF, SCALEBITS);
// Cr=>G value is scaled-up -0.71414 * x
cconvert->Cr_g_tab[i] = (- FIX(0.71414)) * x;
// Cb=>G value is scaled-up -0.34414 * x
// We also add in ONE_HALF so that need not do it in inner loop
cconvert->Cb_g_tab[i] = (- FIX(0.34414)) * x + ONE_HALF;
}
}
// * Convert some rows of samples to the output colorspace.
// *
// * Note that we change from noninterleaved, one-plane-per-component format
// * to interleaved-pixel format. The output buffer is therefore three times
// * as wide as the input buffer.
// * A starting row offset is provided only for the input buffer. The caller
// * can easily adjust the passed output_buf value to accommodate any row
// * offset required on that side.
METHODDEF void
ycc_rgb_convert (j_decompress_ptr cinfo,
JSAMPIMAGE input_buf, JDIMENSION input_row,
JSAMPARRAY output_buf, int num_rows)
{
my_cconvert_ptr cconvert = (my_cconvert_ptr) cinfo->cconvert;
register int y, cb, cr;
register JSAMPROW outptr;
register JSAMPROW inptr0, inptr1, inptr2;
register JDIMENSION col;
JDIMENSION num_cols = cinfo->output_width;
// copy these pointers into registers if possible
register JSAMPLE * range_limit = cinfo->sample_range_limit;
register int * Crrtab = cconvert->Cr_r_tab;
register int * Cbbtab = cconvert->Cb_b_tab;
register INT32 * Crgtab = cconvert->Cr_g_tab;
register INT32 * Cbgtab = cconvert->Cb_g_tab;
SHIFT_TEMPS
while (--num_rows >= 0) {
inptr0 = input_buf[0][input_row];
inptr1 = input_buf[1][input_row];
inptr2 = input_buf[2][input_row];
input_row++;
outptr = *output_buf++;
for (col = 0; col < num_cols; col++) {
y = GETJSAMPLE(inptr0[col]);
cb = GETJSAMPLE(inptr1[col]);
cr = GETJSAMPLE(inptr2[col]);
// Range-limiting is essential due to noise introduced by DCT losses.
outptr[RGB_RED] = range_limit[y + Crrtab[cr]];
outptr[RGB_GREEN] = range_limit[y +
((int) RIGHT_SHIFT(Cbgtab[cb] + Crgtab[cr],
SCALEBITS))];
outptr[RGB_BLUE] = range_limit[y + Cbbtab[cb]];
outptr += RGB_PIXELSIZE;
}
}
}
// *************** Cases other than YCbCr -> RGB *************
// * Color conversion for no colorspace change: just copy the data,
// * converting from separate-planes to interleaved representation.
METHODDEF void
null_convert (j_decompress_ptr cinfo,
JSAMPIMAGE input_buf, JDIMENSION input_row,
JSAMPARRAY output_buf, int num_rows)
{
register JSAMPROW inptr, outptr;
register JDIMENSION count;
register int num_components = cinfo->num_components;
JDIMENSION num_cols = cinfo->output_width;
int ci;
while (--num_rows >= 0) {
for (ci = 0; ci < num_components; ci++) {
inptr = input_buf[ci][input_row];
outptr = output_buf[0] + ci;
for (count = num_cols; count > 0; count--) {
*outptr = *inptr++; // needn't bother with GETJSAMPLE() here
outptr += num_components;
}
}
input_row++;
output_buf++;
}
}
// * Color conversion for grayscale: just copy the data.
// * This also works for YCbCr -> grayscale conversion, in which
// * we just copy the Y (luminance) component and ignore chrominance.
METHODDEF void
grayscale_convert (j_decompress_ptr cinfo,
JSAMPIMAGE input_buf, JDIMENSION input_row,
JSAMPARRAY output_buf, int num_rows)
{
jcopy_sample_rows(input_buf[0], (int) input_row, output_buf, 0,
num_rows, cinfo->output_width);
}
// * Adobe-style YCCK->CMYK conversion.
// * We convert YCbCr to R=1-C, G=1-M, and B=1-Y using the same
// * conversion as above, while passing K (black) unchanged.
// * We assume build_ycc_rgb_table has been called.
METHODDEF void
ycck_cmyk_convert (j_decompress_ptr cinfo,
JSAMPIMAGE input_buf, JDIMENSION input_row,
JSAMPARRAY output_buf, int num_rows)
{
my_cconvert_ptr cconvert = (my_cconvert_ptr) cinfo->cconvert;
register int y, cb, cr;
register JSAMPROW outptr;
register JSAMPROW inptr0, inptr1, inptr2, inptr3;
register JDIMENSION col;
JDIMENSION num_cols = cinfo->output_width;
// copy these pointers into registers if possible
register JSAMPLE * range_limit = cinfo->sample_range_limit;
register int * Crrtab = cconvert->Cr_r_tab;
register int * Cbbtab = cconvert->Cb_b_tab;
register INT32 * Crgtab = cconvert->Cr_g_tab;
register INT32 * Cbgtab = cconvert->Cb_g_tab;
SHIFT_TEMPS
while (--num_rows >= 0) {
inptr0 = input_buf[0][input_row];
inptr1 = input_buf[1][input_row];
inptr2 = input_buf[2][input_row];
inptr3 = input_buf[3][input_row];
input_row++;
outptr = *output_buf++;
for (col = 0; col < num_cols; col++) {
y = GETJSAMPLE(inptr0[col]);
cb = GETJSAMPLE(inptr1[col]);
cr = GETJSAMPLE(inptr2[col]);
// Range-limiting is essential due to noise introduced by DCT losses.
outptr[0] = range_limit[MAXJSAMPLE - (y + Crrtab[cr])]; // red
outptr[1] = range_limit[MAXJSAMPLE - (y + // green
((int) RIGHT_SHIFT(Cbgtab[cb] + Crgtab[cr],
SCALEBITS)))];
outptr[2] = range_limit[MAXJSAMPLE - (y + Cbbtab[cb])]; // blue
// K passes through unchanged
outptr[3] = inptr3[col]; // don't need GETJSAMPLE here
outptr += 4;
}
}
}
// * Empty method for start_pass.
METHODDEF void
start_pass_dcolor (j_decompress_ptr cinfo)
{
// no work needed
}
// * Module initialization routine for output colorspace conversion.
GLOBAL void
jinit_color_deconverter (j_decompress_ptr cinfo)
{
my_cconvert_ptr cconvert;
int ci;
cconvert = (my_cconvert_ptr)
(*cinfo->mem->alloc_small) ((j_common_ptr) cinfo, JPOOL_IMAGE,
SIZEOF(my_color_deconverter));
cinfo->cconvert = (struct jpeg_color_deconverter *) cconvert;
cconvert->pub.start_pass = start_pass_dcolor;
// Make sure num_components agrees with jpeg_color_space
switch (cinfo->jpeg_color_space) {
case JCS_GRAYSCALE:
if (cinfo->num_components != 1)
ERREXIT(cinfo, JERR_BAD_J_COLORSPACE);
break;
case JCS_RGB:
case JCS_YCbCr:
if (cinfo->num_components != 3)
ERREXIT(cinfo, JERR_BAD_J_COLORSPACE);
break;
case JCS_CMYK:
case JCS_YCCK:
if (cinfo->num_components != 4)
ERREXIT(cinfo, JERR_BAD_J_COLORSPACE);
break;
default: // JCS_UNKNOWN can be anything
if (cinfo->num_components < 1)
ERREXIT(cinfo, JERR_BAD_J_COLORSPACE);
break;
}
// Set out_color_components and conversion method based on requested space.
// * Also clear the component_needed flags for any unused components,
// * so that earlier pipeline stages can avoid useless computation.
switch (cinfo->out_color_space) {
case JCS_GRAYSCALE:
cinfo->out_color_components = 1;
if (cinfo->jpeg_color_space == JCS_GRAYSCALE ||
cinfo->jpeg_color_space == JCS_YCbCr) {
cconvert->pub.color_convert = grayscale_convert;
// For color->grayscale conversion, only the Y (0) component is needed
for (ci = 1; ci < cinfo->num_components; ci++)
cinfo->comp_info[ci].component_needed = FALSE;
} else
ERREXIT(cinfo, JERR_CONVERSION_NOTIMPL);
break;
case JCS_RGB:
cinfo->out_color_components = RGB_PIXELSIZE;
if (cinfo->jpeg_color_space == JCS_YCbCr) {
cconvert->pub.color_convert = ycc_rgb_convert;
build_ycc_rgb_table(cinfo);
} else if (cinfo->jpeg_color_space == JCS_RGB && RGB_PIXELSIZE == 3) {
cconvert->pub.color_convert = null_convert;
} else
ERREXIT(cinfo, JERR_CONVERSION_NOTIMPL);
break;
case JCS_CMYK:
cinfo->out_color_components = 4;
if (cinfo->jpeg_color_space == JCS_YCCK) {
cconvert->pub.color_convert = ycck_cmyk_convert;
build_ycc_rgb_table(cinfo);
} else if (cinfo->jpeg_color_space == JCS_CMYK) {
cconvert->pub.color_convert = null_convert;
} else
ERREXIT(cinfo, JERR_CONVERSION_NOTIMPL);
break;
default:
// Permit null conversion to same output space
if (cinfo->out_color_space == cinfo->jpeg_color_space) {
cinfo->out_color_components = cinfo->num_components;
cconvert->pub.color_convert = null_convert;
} else // unsupported non-null conversion
ERREXIT(cinfo, JERR_CONVERSION_NOTIMPL);
break;
}
if (cinfo->quantize_colors)
cinfo->output_components = 1; // single colormapped output component
else
cinfo->output_components = cinfo->out_color_components;
}
#ifdef _MSC_VER
#pragma warning(pop)
#endif