]> git.jsancho.org Git - lugaru.git/blob - jpeg-6b/jccolor.c
JPG support.
[lugaru.git] / jpeg-6b / jccolor.c
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 }