Chromium Code Reviews
chromiumcodereview-hr@appspot.gserviceaccount.com (chromiumcodereview-hr) | Please choose your nickname with Settings | Help | Chromium Project | Gerrit Changes | Sign out
(84)

Unified Diff: third_party/qcms/transform.c

Issue 8079005: Remove unused qcms library. (Closed) Base URL: svn://svn.chromium.org/chrome/trunk/src/
Patch Set: Created 9 years, 3 months ago
Use n/p to move between diff chunks; N/P to move between comments. Draft comments are only viewable by you.
Jump to:
View side-by-side diff with in-line comments
Download patch
« no previous file with comments | « third_party/qcms/qcmstypes.h ('k') | third_party/qcms/transform-sse1.c » ('j') | no next file with comments »
Expand Comments ('e') | Collapse Comments ('c') | Show Comments Hide Comments ('s')
Index: third_party/qcms/transform.c
===================================================================
--- third_party/qcms/transform.c (revision 103192)
+++ third_party/qcms/transform.c (working copy)
@@ -1,1372 +0,0 @@
-// qcms
-// Copyright (C) 2009 Mozilla Corporation
-// Copyright (C) 1998-2007 Marti Maria
-//
-// Permission is hereby granted, free of charge, to any person obtaining
-// a copy of this software and associated documentation files (the "Software"),
-// to deal in the Software without restriction, including without limitation
-// the rights to use, copy, modify, merge, publish, distribute, sublicense,
-// and/or sell copies of the Software, and to permit persons to whom the Software
-// is furnished to do so, subject to the following conditions:
-//
-// The above copyright notice and this permission notice shall be included in
-// all copies or substantial portions of the Software.
-//
-// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
-// EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO
-// THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
-// NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
-// LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
-// OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
-// WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
-
-#include <stdlib.h>
-#include <math.h>
-#include <assert.h>
-#include "qcmsint.h"
-
-/* for MSVC, GCC, Intel, and Sun compilers */
-#if defined(_M_IX86) || defined(__i386__) || defined(__i386) || defined(_M_AMD64) || defined(__x86_64__) || defined(__x86_64)
-#define X86
-#endif /* _M_IX86 || __i386__ || __i386 || _M_AMD64 || __x86_64__ || __x86_64 */
-
-//XXX: could use a bettername
-typedef uint16_t uint16_fract_t;
-
-/* value must be a value between 0 and 1 */
-//XXX: is the above a good restriction to have?
-float lut_interp_linear(double value, uint16_t *table, int length)
-{
- int upper, lower;
- value = value * (length - 1); // scale to length of the array
- upper = ceil(value);
- lower = floor(value);
- //XXX: can we be more performant here?
- value = table[upper]*(1. - (upper - value)) + table[lower]*(upper - value);
- /* scale the value */
- return value * (1./65535.);
-}
-
-/* same as above but takes and returns a uint16_t value representing a range from 0..1 */
-uint16_t lut_interp_linear16(uint16_t input_value, uint16_t *table, int length)
-{
- /* Start scaling input_value to the length of the array: 65535*(length-1).
- * We'll divide out the 65535 next */
- uint32_t value = (input_value * (length - 1));
- uint32_t upper = (value + 65534) / 65535; /* equivalent to ceil(value/65535) */
- uint32_t lower = value / 65535; /* equivalent to floor(value/65535) */
- /* interp is the distance from upper to value scaled to 0..65535 */
- uint32_t interp = value % 65535;
-
- value = (table[upper]*(interp) + table[lower]*(65535 - interp))/65535; // 0..65535*65535
-
- return value;
-}
-
-/* same as above but takes an input_value from 0..PRECACHE_OUTPUT_MAX
- * and returns a uint8_t value representing a range from 0..1 */
-static
-uint8_t lut_interp_linear_precache_output(uint32_t input_value, uint16_t *table, int length)
-{
- /* Start scaling input_value to the length of the array: PRECACHE_OUTPUT_MAX*(length-1).
- * We'll divide out the PRECACHE_OUTPUT_MAX next */
- uint32_t value = (input_value * (length - 1));
-
- /* equivalent to ceil(value/PRECACHE_OUTPUT_MAX) */
- uint32_t upper = (value + PRECACHE_OUTPUT_MAX-1) / PRECACHE_OUTPUT_MAX;
- /* equivalent to floor(value/PRECACHE_OUTPUT_MAX) */
- uint32_t lower = value / PRECACHE_OUTPUT_MAX;
- /* interp is the distance from upper to value scaled to 0..PRECACHE_OUTPUT_MAX */
- uint32_t interp = value % PRECACHE_OUTPUT_MAX;
-
- /* the table values range from 0..65535 */
- value = (table[upper]*(interp) + table[lower]*(PRECACHE_OUTPUT_MAX - interp)); // 0..(65535*PRECACHE_OUTPUT_MAX)
-
- /* round and scale */
- value += (PRECACHE_OUTPUT_MAX*65535/255)/2;
- value /= (PRECACHE_OUTPUT_MAX*65535/255); // scale to 0..255
- return value;
-}
-
-#if 0
-/* if we use a different representation i.e. one that goes from 0 to 0x1000 we can be more efficient
- * because we can avoid the divisions and use a shifting instead */
-/* same as above but takes and returns a uint16_t value representing a range from 0..1 */
-uint16_t lut_interp_linear16(uint16_t input_value, uint16_t *table, int length)
-{
- uint32_t value = (input_value * (length - 1));
- uint32_t upper = (value + 4095) / 4096; /* equivalent to ceil(value/4096) */
- uint32_t lower = value / 4096; /* equivalent to floor(value/4096) */
- uint32_t interp = value % 4096;
-
- value = (table[upper]*(interp) + table[lower]*(4096 - interp))/4096; // 0..4096*4096
-
- return value;
-}
-#endif
-
-void compute_curve_gamma_table_type1(float gamma_table[256], double gamma)
-{
- unsigned int i;
- for (i = 0; i < 256; i++) {
- gamma_table[i] = pow(i/255., gamma);
- }
-}
-
-void compute_curve_gamma_table_type2(float gamma_table[256], uint16_t *table, int length)
-{
- unsigned int i;
- for (i = 0; i < 256; i++) {
- gamma_table[i] = lut_interp_linear(i/255., table, length);
- }
-}
-
-void compute_curve_gamma_table_type0(float gamma_table[256])
-{
- unsigned int i;
- for (i = 0; i < 256; i++) {
- gamma_table[i] = i/255.;
- }
-}
-
-unsigned char clamp_u8(float v)
-{
- if (v > 255.)
- return 255;
- else if (v < 0)
- return 0;
- else
- return floor(v+.5);
-}
-
-struct vector {
- float v[3];
-};
-
-struct matrix {
- float m[3][3];
- bool invalid;
-};
-
-struct vector matrix_eval(struct matrix mat, struct vector v)
-{
- struct vector result;
- result.v[0] = mat.m[0][0]*v.v[0] + mat.m[0][1]*v.v[1] + mat.m[0][2]*v.v[2];
- result.v[1] = mat.m[1][0]*v.v[0] + mat.m[1][1]*v.v[1] + mat.m[1][2]*v.v[2];
- result.v[2] = mat.m[2][0]*v.v[0] + mat.m[2][1]*v.v[1] + mat.m[2][2]*v.v[2];
- return result;
-}
-
-//XXX: should probably pass by reference and we could
-//probably reuse this computation in matrix_invert
-float matrix_det(struct matrix mat)
-{
- float det;
- det = mat.m[0][0]*mat.m[1][1]*mat.m[2][2] +
- mat.m[0][1]*mat.m[1][2]*mat.m[2][0] +
- mat.m[0][2]*mat.m[1][0]*mat.m[2][1] -
- mat.m[0][0]*mat.m[1][2]*mat.m[2][1] -
- mat.m[0][1]*mat.m[1][0]*mat.m[2][2] -
- mat.m[0][2]*mat.m[1][1]*mat.m[2][0];
- return det;
-}
-
-/* from pixman and cairo and Mathematics for Game Programmers */
-/* lcms uses gauss-jordan elimination with partial pivoting which is
- * less efficient and not as numerically stable. See Mathematics for
- * Game Programmers. */
-struct matrix matrix_invert(struct matrix mat)
-{
- struct matrix dest_mat;
- int i,j;
- static int a[3] = { 2, 2, 1 };
- static int b[3] = { 1, 0, 0 };
-
- /* inv (A) = 1/det (A) * adj (A) */
- float det = matrix_det(mat);
-
- if (det == 0) {
- dest_mat.invalid = true;
- } else {
- dest_mat.invalid = false;
- }
-
- det = 1/det;
-
- for (j = 0; j < 3; j++) {
- for (i = 0; i < 3; i++) {
- double p;
- int ai = a[i];
- int aj = a[j];
- int bi = b[i];
- int bj = b[j];
-
- p = mat.m[ai][aj] * mat.m[bi][bj] -
- mat.m[ai][bj] * mat.m[bi][aj];
- if (((i + j) & 1) != 0)
- p = -p;
-
- dest_mat.m[j][i] = det * p;
- }
- }
- return dest_mat;
-}
-
-struct matrix matrix_identity(void)
-{
- struct matrix i;
- i.m[0][0] = 1;
- i.m[0][1] = 0;
- i.m[0][2] = 0;
- i.m[1][0] = 0;
- i.m[1][1] = 1;
- i.m[1][2] = 0;
- i.m[2][0] = 0;
- i.m[2][1] = 0;
- i.m[2][2] = 1;
- i.invalid = false;
- return i;
-}
-
-static struct matrix matrix_invalid(void)
-{
- struct matrix inv = matrix_identity();
- inv.invalid = true;
- return inv;
-}
-
-
-/* from pixman */
-/* MAT3per... */
-struct matrix matrix_multiply(struct matrix a, struct matrix b)
-{
- struct matrix result;
- int dx, dy;
- int o;
- for (dy = 0; dy < 3; dy++) {
- for (dx = 0; dx < 3; dx++) {
- double v = 0;
- for (o = 0; o < 3; o++) {
- v += a.m[dy][o] * b.m[o][dx];
- }
- result.m[dy][dx] = v;
- }
- }
- result.invalid = a.invalid || b.invalid;
- return result;
-}
-
-float u8Fixed8Number_to_float(uint16_t x)
-{
- // 0x0000 = 0.
- // 0x0100 = 1.
- // 0xffff = 255 + 255/256
- return x/256.;
-}
-
-float *build_input_gamma_table(struct curveType *TRC)
-{
- float *gamma_table = malloc(sizeof(float)*256);
- if (gamma_table) {
- if (TRC->count == 0) {
- compute_curve_gamma_table_type0(gamma_table);
- } else if (TRC->count == 1) {
- compute_curve_gamma_table_type1(gamma_table, u8Fixed8Number_to_float(TRC->data[0]));
- } else {
- compute_curve_gamma_table_type2(gamma_table, TRC->data, TRC->count);
- }
- }
- return gamma_table;
-}
-
-struct matrix build_colorant_matrix(qcms_profile *p)
-{
- struct matrix result;
- result.m[0][0] = s15Fixed16Number_to_float(p->redColorant.X);
- result.m[0][1] = s15Fixed16Number_to_float(p->greenColorant.X);
- result.m[0][2] = s15Fixed16Number_to_float(p->blueColorant.X);
- result.m[1][0] = s15Fixed16Number_to_float(p->redColorant.Y);
- result.m[1][1] = s15Fixed16Number_to_float(p->greenColorant.Y);
- result.m[1][2] = s15Fixed16Number_to_float(p->blueColorant.Y);
- result.m[2][0] = s15Fixed16Number_to_float(p->redColorant.Z);
- result.m[2][1] = s15Fixed16Number_to_float(p->greenColorant.Z);
- result.m[2][2] = s15Fixed16Number_to_float(p->blueColorant.Z);
- result.invalid = false;
- return result;
-}
-
-/* The following code is copied nearly directly from lcms.
- * I think it could be much better. For example, Argyll seems to have better code in
- * icmTable_lookup_bwd and icmTable_setup_bwd. However, for now this is a quick way
- * to a working solution and allows for easy comparing with lcms. */
-uint16_fract_t lut_inverse_interp16(uint16_t Value, uint16_t LutTable[], int length)
-{
- int l = 1;
- int r = 0x10000;
- int x = 0, res; // 'int' Give spacing for negative values
- int NumZeroes, NumPoles;
- int cell0, cell1;
- double val2;
- double y0, y1, x0, x1;
- double a, b, f;
-
- // July/27 2001 - Expanded to handle degenerated curves with an arbitrary
- // number of elements containing 0 at the begining of the table (Zeroes)
- // and another arbitrary number of poles (FFFFh) at the end.
- // First the zero and pole extents are computed, then value is compared.
-
- NumZeroes = 0;
- while (LutTable[NumZeroes] == 0 && NumZeroes < length-1)
- NumZeroes++;
-
- // There are no zeros at the beginning and we are trying to find a zero, so
- // return anything. It seems zero would be the less destructive choice
- /* I'm not sure that this makes sense, but oh well... */
- if (NumZeroes == 0 && Value == 0)
- return 0;
-
- NumPoles = 0;
- while (LutTable[length-1- NumPoles] == 0xFFFF && NumPoles < length-1)
- NumPoles++;
-
- // Does the curve belong to this case?
- if (NumZeroes > 1 || NumPoles > 1)
- {
- int a, b;
-
- // Identify if value fall downto 0 or FFFF zone
- if (Value == 0) return 0;
- // if (Value == 0xFFFF) return 0xFFFF;
-
- // else restrict to valid zone
-
- a = ((NumZeroes-1) * 0xFFFF) / (length-1);
- b = ((length-1 - NumPoles) * 0xFFFF) / (length-1);
-
- l = a - 1;
- r = b + 1;
- }
-
-
- // Seems not a degenerated case... apply binary search
-
- while (r > l) {
-
- x = (l + r) / 2;
-
- res = (int) lut_interp_linear16((uint16_fract_t) (x-1), LutTable, length);
-
- if (res == Value) {
-
- // Found exact match.
-
- return (uint16_fract_t) (x - 1);
- }
-
- if (res > Value) r = x - 1;
- else l = x + 1;
- }
-
- // Not found, should we interpolate?
-
-
- // Get surrounding nodes
-
- val2 = (length-1) * ((double) (x - 1) / 65535.0);
-
- cell0 = (int) floor(val2);
- cell1 = (int) ceil(val2);
-
- if (cell0 == cell1) return (uint16_fract_t) x;
-
- y0 = LutTable[cell0] ;
- x0 = (65535.0 * cell0) / (length-1);
-
- y1 = LutTable[cell1] ;
- x1 = (65535.0 * cell1) / (length-1);
-
- a = (y1 - y0) / (x1 - x0);
- b = y0 - a * x0;
-
- if (fabs(a) < 0.01) return (uint16_fract_t) x;
-
- f = ((Value - b) / a);
-
- if (f < 0.0) return (uint16_fract_t) 0;
- if (f >= 65535.0) return (uint16_fract_t) 0xFFFF;
-
- return (uint16_fract_t) floor(f + 0.5);
-
-}
-
-// Build a White point, primary chromas transfer matrix from RGB to CIE XYZ
-// This is just an approximation, I am not handling all the non-linear
-// aspects of the RGB to XYZ process, and assumming that the gamma correction
-// has transitive property in the tranformation chain.
-//
-// the alghoritm:
-//
-// - First I build the absolute conversion matrix using
-// primaries in XYZ. This matrix is next inverted
-// - Then I eval the source white point across this matrix
-// obtaining the coeficients of the transformation
-// - Then, I apply these coeficients to the original matrix
-static struct matrix build_RGB_to_XYZ_transfer_matrix(qcms_CIE_xyY white, qcms_CIE_xyYTRIPLE primrs)
-{
- struct matrix primaries;
- struct matrix primaries_invert;
- struct matrix result;
- struct vector white_point;
- struct vector coefs;
-
- double xn, yn;
- double xr, yr;
- double xg, yg;
- double xb, yb;
-
- xn = white.x;
- yn = white.y;
-
- if (yn == 0.0)
- return matrix_invalid();
-
- xr = primrs.red.x;
- yr = primrs.red.y;
- xg = primrs.green.x;
- yg = primrs.green.y;
- xb = primrs.blue.x;
- yb = primrs.blue.y;
-
- primaries.m[0][0] = xr;
- primaries.m[0][1] = xg;
- primaries.m[0][2] = xb;
-
- primaries.m[1][0] = yr;
- primaries.m[1][1] = yg;
- primaries.m[1][2] = yb;
-
- primaries.m[2][0] = 1 - xr - yr;
- primaries.m[2][1] = 1 - xg - yg;
- primaries.m[2][2] = 1 - xb - yb;
- primaries.invalid = false;
-
- white_point.v[0] = xn/yn;
- white_point.v[1] = 1.;
- white_point.v[2] = (1.0-xn-yn)/yn;
-
- primaries_invert = matrix_invert(primaries);
-
- coefs = matrix_eval(primaries_invert, white_point);
-
- result.m[0][0] = coefs.v[0]*xr;
- result.m[0][1] = coefs.v[1]*xg;
- result.m[0][2] = coefs.v[2]*xb;
-
- result.m[1][0] = coefs.v[0]*yr;
- result.m[1][1] = coefs.v[1]*yg;
- result.m[1][2] = coefs.v[2]*yb;
-
- result.m[2][0] = coefs.v[0]*(1.-xr-yr);
- result.m[2][1] = coefs.v[1]*(1.-xg-yg);
- result.m[2][2] = coefs.v[2]*(1.-xb-yb);
- result.invalid = primaries_invert.invalid;
-
- return result;
-}
-
-struct CIE_XYZ {
- double X;
- double Y;
- double Z;
-};
-
-/* CIE Illuminant D50 */
-static const struct CIE_XYZ D50_XYZ = {
- 0.9642,
- 1.0000,
- 0.8249
-};
-
-/* from lcms: xyY2XYZ()
- * corresponds to argyll: icmYxy2XYZ() */
-static struct CIE_XYZ xyY2XYZ(qcms_CIE_xyY source)
-{
- struct CIE_XYZ dest;
- dest.X = (source.x / source.y) * source.Y;
- dest.Y = source.Y;
- dest.Z = ((1 - source.x - source.y) / source.y) * source.Y;
- return dest;
-}
-
-/* from lcms: ComputeChromaticAdaption */
-// Compute chromatic adaption matrix using chad as cone matrix
-static struct matrix
-compute_chromatic_adaption(struct CIE_XYZ source_white_point,
- struct CIE_XYZ dest_white_point,
- struct matrix chad)
-{
- struct matrix chad_inv;
- struct vector cone_source_XYZ, cone_source_rgb;
- struct vector cone_dest_XYZ, cone_dest_rgb;
- struct matrix cone, tmp;
-
- tmp = chad;
- chad_inv = matrix_invert(tmp);
-
- cone_source_XYZ.v[0] = source_white_point.X;
- cone_source_XYZ.v[1] = source_white_point.Y;
- cone_source_XYZ.v[2] = source_white_point.Z;
-
- cone_dest_XYZ.v[0] = dest_white_point.X;
- cone_dest_XYZ.v[1] = dest_white_point.Y;
- cone_dest_XYZ.v[2] = dest_white_point.Z;
-
- cone_source_rgb = matrix_eval(chad, cone_source_XYZ);
- cone_dest_rgb = matrix_eval(chad, cone_dest_XYZ);
-
- cone.m[0][0] = cone_dest_rgb.v[0]/cone_source_rgb.v[0];
- cone.m[0][1] = 0;
- cone.m[0][2] = 0;
- cone.m[1][0] = 0;
- cone.m[1][1] = cone_dest_rgb.v[1]/cone_source_rgb.v[1];
- cone.m[1][2] = 0;
- cone.m[2][0] = 0;
- cone.m[2][1] = 0;
- cone.m[2][2] = cone_dest_rgb.v[2]/cone_source_rgb.v[2];
- cone.invalid = false;
-
- // Normalize
- return matrix_multiply(chad_inv, matrix_multiply(cone, chad));
-}
-
-/* from lcms: cmsAdaptionMatrix */
-// Returns the final chrmatic adaptation from illuminant FromIll to Illuminant ToIll
-// Bradford is assumed
-static struct matrix
-adaption_matrix(struct CIE_XYZ source_illumination, struct CIE_XYZ target_illumination)
-{
- struct matrix lam_rigg = {{ // Bradford matrix
- { 0.8951, 0.2664, -0.1614 },
- { -0.7502, 1.7135, 0.0367 },
- { 0.0389, -0.0685, 1.0296 }
- }};
- return compute_chromatic_adaption(source_illumination, target_illumination, lam_rigg);
-}
-
-/* from lcms: cmsAdaptMatrixToD50 */
-static struct matrix adapt_matrix_to_D50(struct matrix r, qcms_CIE_xyY source_white_pt)
-{
- struct CIE_XYZ Dn;
- struct matrix Bradford;
-
- if (source_white_pt.y == 0.0)
- return matrix_invalid();
-
- Dn = xyY2XYZ(source_white_pt);
-
- Bradford = adaption_matrix(Dn, D50_XYZ);
- return matrix_multiply(Bradford, r);
-}
-
-qcms_bool set_rgb_colorants(qcms_profile *profile, qcms_CIE_xyY white_point, qcms_CIE_xyYTRIPLE primaries)
-{
- struct matrix colorants;
- colorants = build_RGB_to_XYZ_transfer_matrix(white_point, primaries);
- colorants = adapt_matrix_to_D50(colorants, white_point);
-
- if (colorants.invalid)
- return false;
-
- /* note: there's a transpose type of operation going on here */
- profile->redColorant.X = double_to_s15Fixed16Number(colorants.m[0][0]);
- profile->redColorant.Y = double_to_s15Fixed16Number(colorants.m[1][0]);
- profile->redColorant.Z = double_to_s15Fixed16Number(colorants.m[2][0]);
-
- profile->greenColorant.X = double_to_s15Fixed16Number(colorants.m[0][1]);
- profile->greenColorant.Y = double_to_s15Fixed16Number(colorants.m[1][1]);
- profile->greenColorant.Z = double_to_s15Fixed16Number(colorants.m[2][1]);
-
- profile->blueColorant.X = double_to_s15Fixed16Number(colorants.m[0][2]);
- profile->blueColorant.Y = double_to_s15Fixed16Number(colorants.m[1][2]);
- profile->blueColorant.Z = double_to_s15Fixed16Number(colorants.m[2][2]);
-
- return true;
-}
-
-/*
- The number of entries needed to invert a lookup table should not
- necessarily be the same as the original number of entries. This is
- especially true of lookup tables that have a small number of entries.
-
- For example:
- Using a table like:
- {0, 3104, 14263, 34802, 65535}
- invert_lut will produce an inverse of:
- {3, 34459, 47529, 56801, 65535}
- which has an maximum error of about 9855 (pixel difference of ~38.346)
-
- For now, we punt the decision of output size to the caller. */
-static uint16_t *invert_lut(uint16_t *table, int length, int out_length)
-{
- int i;
- /* for now we invert the lut by creating a lut of size out_length
- * and attempting to lookup a value for each entry using lut_inverse_interp16 */
- uint16_t *output = malloc(sizeof(uint16_t)*out_length);
- if (!output)
- return NULL;
-
- for (i = 0; i < out_length; i++) {
- double x = ((double) i * 65535.) / (double) (out_length - 1);
- uint16_fract_t input = floor(x + .5);
- output[i] = lut_inverse_interp16(input, table, length);
- }
- return output;
-}
-
-static uint16_t *build_linear_table(int length)
-{
- int i;
- uint16_t *output = malloc(sizeof(uint16_t)*length);
- if (!output)
- return NULL;
-
- for (i = 0; i < length; i++) {
- double x = ((double) i * 65535.) / (double) (length - 1);
- uint16_fract_t input = floor(x + .5);
- output[i] = input;
- }
- return output;
-}
-
-static uint16_t *build_pow_table(float gamma, int length)
-{
- int i;
- uint16_t *output = malloc(sizeof(uint16_t)*length);
- if (!output)
- return NULL;
-
- for (i = 0; i < length; i++) {
- uint16_fract_t result;
- double x = ((double) i) / (double) (length - 1);
- x = pow(x, gamma);
- //XXX turn this conversion into a function
- result = floor(x*65535. + .5);
- output[i] = result;
- }
- return output;
-}
-
-static float clamp_float(float a)
-{
- if (a > 1.)
- return 1.;
- else if (a < 0)
- return 0;
- else
- return a;
-}
-
-#if 0
-static void qcms_transform_data_rgb_out_pow(qcms_transform *transform, unsigned char *src, unsigned char *dest, size_t length)
-{
- int i;
- float (*mat)[4] = transform->matrix;
- for (i=0; i<length; i++) {
- unsigned char device_r = *src++;
- unsigned char device_g = *src++;
- unsigned char device_b = *src++;
-
- float linear_r = transform->input_gamma_table_r[device_r];
- float linear_g = transform->input_gamma_table_g[device_g];
- float linear_b = transform->input_gamma_table_b[device_b];
-
- float out_linear_r = mat[0][0]*linear_r + mat[1][0]*linear_g + mat[2][0]*linear_b;
- float out_linear_g = mat[0][1]*linear_r + mat[1][1]*linear_g + mat[2][1]*linear_b;
- float out_linear_b = mat[0][2]*linear_r + mat[1][2]*linear_g + mat[2][2]*linear_b;
-
- float out_device_r = pow(out_linear_r, transform->out_gamma_r);
- float out_device_g = pow(out_linear_g, transform->out_gamma_g);
- float out_device_b = pow(out_linear_b, transform->out_gamma_b);
-
- *dest++ = clamp_u8(255*out_device_r);
- *dest++ = clamp_u8(255*out_device_g);
- *dest++ = clamp_u8(255*out_device_b);
- }
-}
-#endif
-
-static void qcms_transform_data_gray_out_lut(qcms_transform *transform, unsigned char *src, unsigned char *dest, size_t length)
-{
- unsigned int i;
- for (i = 0; i < length; i++) {
- float out_device_r, out_device_g, out_device_b;
- unsigned char device = *src++;
-
- float linear = transform->input_gamma_table_gray[device];
-
- out_device_r = lut_interp_linear(linear, transform->output_gamma_lut_r, transform->output_gamma_lut_r_length);
- out_device_g = lut_interp_linear(linear, transform->output_gamma_lut_g, transform->output_gamma_lut_g_length);
- out_device_b = lut_interp_linear(linear, transform->output_gamma_lut_b, transform->output_gamma_lut_b_length);
-
- *dest++ = clamp_u8(out_device_r*255);
- *dest++ = clamp_u8(out_device_g*255);
- *dest++ = clamp_u8(out_device_b*255);
- }
-}
-
-/* Alpha is not corrected.
- A rationale for this is found in Alvy Ray's "Should Alpha Be Nonlinear If
- RGB Is?" Tech Memo 17 (December 14, 1998).
- See: ftp://ftp.alvyray.com/Acrobat/17_Nonln.pdf
-*/
-
-static void qcms_transform_data_graya_out_lut(qcms_transform *transform, unsigned char *src, unsigned char *dest, size_t length)
-{
- unsigned int i;
- for (i = 0; i < length; i++) {
- float out_device_r, out_device_g, out_device_b;
- unsigned char device = *src++;
- unsigned char alpha = *src++;
-
- float linear = transform->input_gamma_table_gray[device];
-
- out_device_r = lut_interp_linear(linear, transform->output_gamma_lut_r, transform->output_gamma_lut_r_length);
- out_device_g = lut_interp_linear(linear, transform->output_gamma_lut_g, transform->output_gamma_lut_g_length);
- out_device_b = lut_interp_linear(linear, transform->output_gamma_lut_b, transform->output_gamma_lut_b_length);
-
- *dest++ = clamp_u8(out_device_r*255);
- *dest++ = clamp_u8(out_device_g*255);
- *dest++ = clamp_u8(out_device_b*255);
- *dest++ = alpha;
- }
-}
-
-
-static void qcms_transform_data_gray_out_precache(qcms_transform *transform, unsigned char *src, unsigned char *dest, size_t length)
-{
- unsigned int i;
- for (i = 0; i < length; i++) {
- unsigned char device = *src++;
- uint16_t gray;
-
- float linear = transform->input_gamma_table_gray[device];
-
- /* we could round here... */
- gray = linear * PRECACHE_OUTPUT_MAX;
-
- *dest++ = transform->output_table_r->data[gray];
- *dest++ = transform->output_table_g->data[gray];
- *dest++ = transform->output_table_b->data[gray];
- }
-}
-
-static void qcms_transform_data_graya_out_precache(qcms_transform *transform, unsigned char *src, unsigned char *dest, size_t length)
-{
- unsigned int i;
- for (i = 0; i < length; i++) {
- unsigned char device = *src++;
- unsigned char alpha = *src++;
- uint16_t gray;
-
- float linear = transform->input_gamma_table_gray[device];
-
- /* we could round here... */
- gray = linear * PRECACHE_OUTPUT_MAX;
-
- *dest++ = transform->output_table_r->data[gray];
- *dest++ = transform->output_table_g->data[gray];
- *dest++ = transform->output_table_b->data[gray];
- *dest++ = alpha;
- }
-}
-
-static void qcms_transform_data_rgb_out_lut_precache(qcms_transform *transform, unsigned char *src, unsigned char *dest, size_t length)
-{
- unsigned int i;
- float (*mat)[4] = transform->matrix;
- for (i = 0; i < length; i++) {
- unsigned char device_r = *src++;
- unsigned char device_g = *src++;
- unsigned char device_b = *src++;
- uint16_t r, g, b;
-
- float linear_r = transform->input_gamma_table_r[device_r];
- float linear_g = transform->input_gamma_table_g[device_g];
- float linear_b = transform->input_gamma_table_b[device_b];
-
- float out_linear_r = mat[0][0]*linear_r + mat[1][0]*linear_g + mat[2][0]*linear_b;
- float out_linear_g = mat[0][1]*linear_r + mat[1][1]*linear_g + mat[2][1]*linear_b;
- float out_linear_b = mat[0][2]*linear_r + mat[1][2]*linear_g + mat[2][2]*linear_b;
-
- out_linear_r = clamp_float(out_linear_r);
- out_linear_g = clamp_float(out_linear_g);
- out_linear_b = clamp_float(out_linear_b);
-
- /* we could round here... */
- r = out_linear_r * PRECACHE_OUTPUT_MAX;
- g = out_linear_g * PRECACHE_OUTPUT_MAX;
- b = out_linear_b * PRECACHE_OUTPUT_MAX;
-
- *dest++ = transform->output_table_r->data[r];
- *dest++ = transform->output_table_g->data[g];
- *dest++ = transform->output_table_b->data[b];
- }
-}
-
-static void qcms_transform_data_rgba_out_lut_precache(qcms_transform *transform, unsigned char *src, unsigned char *dest, size_t length)
-{
- unsigned int i;
- float (*mat)[4] = transform->matrix;
- for (i = 0; i < length; i++) {
- unsigned char device_r = *src++;
- unsigned char device_g = *src++;
- unsigned char device_b = *src++;
- unsigned char alpha = *src++;
- uint16_t r, g, b;
-
- float linear_r = transform->input_gamma_table_r[device_r];
- float linear_g = transform->input_gamma_table_g[device_g];
- float linear_b = transform->input_gamma_table_b[device_b];
-
- float out_linear_r = mat[0][0]*linear_r + mat[1][0]*linear_g + mat[2][0]*linear_b;
- float out_linear_g = mat[0][1]*linear_r + mat[1][1]*linear_g + mat[2][1]*linear_b;
- float out_linear_b = mat[0][2]*linear_r + mat[1][2]*linear_g + mat[2][2]*linear_b;
-
- out_linear_r = clamp_float(out_linear_r);
- out_linear_g = clamp_float(out_linear_g);
- out_linear_b = clamp_float(out_linear_b);
-
- /* we could round here... */
- r = out_linear_r * PRECACHE_OUTPUT_MAX;
- g = out_linear_g * PRECACHE_OUTPUT_MAX;
- b = out_linear_b * PRECACHE_OUTPUT_MAX;
-
- *dest++ = transform->output_table_r->data[r];
- *dest++ = transform->output_table_g->data[g];
- *dest++ = transform->output_table_b->data[b];
- *dest++ = alpha;
- }
-}
-
-static void qcms_transform_data_rgb_out_lut(qcms_transform *transform, unsigned char *src, unsigned char *dest, size_t length)
-{
- unsigned int i;
- float (*mat)[4] = transform->matrix;
- for (i = 0; i < length; i++) {
- unsigned char device_r = *src++;
- unsigned char device_g = *src++;
- unsigned char device_b = *src++;
- float out_device_r, out_device_g, out_device_b;
-
- float linear_r = transform->input_gamma_table_r[device_r];
- float linear_g = transform->input_gamma_table_g[device_g];
- float linear_b = transform->input_gamma_table_b[device_b];
-
- float out_linear_r = mat[0][0]*linear_r + mat[1][0]*linear_g + mat[2][0]*linear_b;
- float out_linear_g = mat[0][1]*linear_r + mat[1][1]*linear_g + mat[2][1]*linear_b;
- float out_linear_b = mat[0][2]*linear_r + mat[1][2]*linear_g + mat[2][2]*linear_b;
-
- out_linear_r = clamp_float(out_linear_r);
- out_linear_g = clamp_float(out_linear_g);
- out_linear_b = clamp_float(out_linear_b);
-
- out_device_r = lut_interp_linear(out_linear_r, transform->output_gamma_lut_r, transform->output_gamma_lut_r_length);
- out_device_g = lut_interp_linear(out_linear_g, transform->output_gamma_lut_g, transform->output_gamma_lut_g_length);
- out_device_b = lut_interp_linear(out_linear_b, transform->output_gamma_lut_b, transform->output_gamma_lut_b_length);
-
- *dest++ = clamp_u8(out_device_r*255);
- *dest++ = clamp_u8(out_device_g*255);
- *dest++ = clamp_u8(out_device_b*255);
- }
-}
-
-static void qcms_transform_data_rgba_out_lut(qcms_transform *transform, unsigned char *src, unsigned char *dest, size_t length)
-{
- unsigned int i;
- float (*mat)[4] = transform->matrix;
- for (i = 0; i < length; i++) {
- unsigned char device_r = *src++;
- unsigned char device_g = *src++;
- unsigned char device_b = *src++;
- unsigned char alpha = *src++;
- float out_device_r, out_device_g, out_device_b;
-
- float linear_r = transform->input_gamma_table_r[device_r];
- float linear_g = transform->input_gamma_table_g[device_g];
- float linear_b = transform->input_gamma_table_b[device_b];
-
- float out_linear_r = mat[0][0]*linear_r + mat[1][0]*linear_g + mat[2][0]*linear_b;
- float out_linear_g = mat[0][1]*linear_r + mat[1][1]*linear_g + mat[2][1]*linear_b;
- float out_linear_b = mat[0][2]*linear_r + mat[1][2]*linear_g + mat[2][2]*linear_b;
-
- out_linear_r = clamp_float(out_linear_r);
- out_linear_g = clamp_float(out_linear_g);
- out_linear_b = clamp_float(out_linear_b);
-
- out_device_r = lut_interp_linear(out_linear_r, transform->output_gamma_lut_r, transform->output_gamma_lut_r_length);
- out_device_g = lut_interp_linear(out_linear_g, transform->output_gamma_lut_g, transform->output_gamma_lut_g_length);
- out_device_b = lut_interp_linear(out_linear_b, transform->output_gamma_lut_b, transform->output_gamma_lut_b_length);
-
- *dest++ = clamp_u8(out_device_r*255);
- *dest++ = clamp_u8(out_device_g*255);
- *dest++ = clamp_u8(out_device_b*255);
- *dest++ = alpha;
- }
-}
-
-#if 0
-static void qcms_transform_data_rgb_out_linear(qcms_transform *transform, unsigned char *src, unsigned char *dest, size_t length)
-{
- int i;
- float (*mat)[4] = transform->matrix;
- for (i = 0; i < length; i++) {
- unsigned char device_r = *src++;
- unsigned char device_g = *src++;
- unsigned char device_b = *src++;
-
- float linear_r = transform->input_gamma_table_r[device_r];
- float linear_g = transform->input_gamma_table_g[device_g];
- float linear_b = transform->input_gamma_table_b[device_b];
-
- float out_linear_r = mat[0][0]*linear_r + mat[1][0]*linear_g + mat[2][0]*linear_b;
- float out_linear_g = mat[0][1]*linear_r + mat[1][1]*linear_g + mat[2][1]*linear_b;
- float out_linear_b = mat[0][2]*linear_r + mat[1][2]*linear_g + mat[2][2]*linear_b;
-
- *dest++ = clamp_u8(out_linear_r*255);
- *dest++ = clamp_u8(out_linear_g*255);
- *dest++ = clamp_u8(out_linear_b*255);
- }
-}
-#endif
-
-static struct precache_output *precache_reference(struct precache_output *p)
-{
- p->ref_count++;
- return p;
-}
-
-static struct precache_output *precache_create()
-{
- struct precache_output *p = malloc(sizeof(struct precache_output));
- if (p)
- p->ref_count = 1;
- return p;
-}
-
-void precache_release(struct precache_output *p)
-{
- if (--p->ref_count == 0) {
- free(p);
- }
-}
-
-#ifdef HAS_POSIX_MEMALIGN
-static qcms_transform *transform_alloc(void)
-{
- qcms_transform *t;
- if (!posix_memalign(&t, 16, sizeof(*t))) {
- return t;
- } else {
- return NULL;
- }
-}
-static void transform_free(qcms_transform *t)
-{
- free(t);
-}
-#else
-static qcms_transform *transform_alloc(void)
-{
- /* transform needs to be aligned on a 16byte boundrary */
- char *original_block = calloc(sizeof(qcms_transform) + sizeof(void*) + 16, 1);
- /* make room for a pointer to the block returned by calloc */
- void *transform_start = original_block + sizeof(void*);
- /* align transform_start */
- qcms_transform *transform_aligned = (qcms_transform*)(((uintptr_t)transform_start + 15) & ~0xf);
-
- /* store a pointer to the block returned by calloc so that we can free it later */
- void **(original_block_ptr) = (void**)transform_aligned;
- if (!original_block)
- return NULL;
- original_block_ptr--;
- *original_block_ptr = original_block;
-
- return transform_aligned;
-}
-static void transform_free(qcms_transform *t)
-{
- /* get at the pointer to the unaligned block returned by calloc */
- void **p = (void**)t;
- p--;
- free(*p);
-}
-#endif
-
-void qcms_transform_release(qcms_transform *t)
-{
- /* ensure we only free the gamma tables once even if there are
- * multiple references to the same data */
-
- if (t->output_table_r)
- precache_release(t->output_table_r);
- if (t->output_table_g)
- precache_release(t->output_table_g);
- if (t->output_table_b)
- precache_release(t->output_table_b);
-
- free(t->input_gamma_table_r);
- if (t->input_gamma_table_g != t->input_gamma_table_r)
- free(t->input_gamma_table_g);
- if (t->input_gamma_table_g != t->input_gamma_table_r &&
- t->input_gamma_table_g != t->input_gamma_table_b)
- free(t->input_gamma_table_b);
-
- free(t->input_gamma_table_gray);
-
- free(t->output_gamma_lut_r);
- free(t->output_gamma_lut_g);
- free(t->output_gamma_lut_b);
-
- transform_free(t);
-}
-
-static void compute_precache_pow(uint8_t *output, float gamma)
-{
- uint32_t v = 0;
- for (v = 0; v < PRECACHE_OUTPUT_SIZE; v++) {
- //XXX: don't do integer/float conversion... and round?
- output[v] = 255. * pow(v/(double)PRECACHE_OUTPUT_MAX, gamma);
- }
-}
-
-void compute_precache_lut(uint8_t *output, uint16_t *table, int length)
-{
- uint32_t v = 0;
- for (v = 0; v < PRECACHE_OUTPUT_SIZE; v++) {
- output[v] = lut_interp_linear_precache_output(v, table, length);
- }
-}
-
-void compute_precache_linear(uint8_t *output)
-{
- uint32_t v = 0;
- for (v = 0; v < PRECACHE_OUTPUT_SIZE; v++) {
- //XXX: round?
- output[v] = v / (PRECACHE_OUTPUT_SIZE/256);
- }
-}
-
-qcms_bool compute_precache(struct curveType *trc, uint8_t *output)
-{
- if (trc->count == 0) {
- compute_precache_linear(output);
- } else if (trc->count == 1) {
- compute_precache_pow(output, 1./u8Fixed8Number_to_float(trc->data[0]));
- } else {
- uint16_t *inverted;
- int inverted_size = trc->count;
- //XXX: the choice of a minimum of 256 here is not backed by any theory, measurement or data, however it is what lcms uses.
- // the maximum number we would need is 65535 because that's the accuracy used for computing the precache table
- if (inverted_size < 256)
- inverted_size = 256;
-
- inverted = invert_lut(trc->data, trc->count, inverted_size);
- if (!inverted)
- return false;
- compute_precache_lut(output, inverted, inverted_size);
- free(inverted);
- }
- return true;
-}
-
-#ifdef X86
-// Determine if we can build with SSE2 (this was partly copied from jmorecfg.h in
-// mozilla/jpeg)
- // -------------------------------------------------------------------------
-#if defined(_M_IX86) && defined(_MSC_VER)
-#define HAS_CPUID
-/* Get us a CPUID function. Avoid clobbering EBX because sometimes it's the PIC
- register - I'm not sure if that ever happens on windows, but cpuid isn't
- on the critical path so we just preserve the register to be safe and to be
- consistent with the non-windows version. */
-static void cpuid(uint32_t fxn, uint32_t *a, uint32_t *b, uint32_t *c, uint32_t *d) {
- uint32_t a_, b_, c_, d_;
- __asm {
- xchg ebx, esi
- mov eax, fxn
- cpuid
- mov a_, eax
- mov b_, ebx
- mov c_, ecx
- mov d_, edx
- xchg ebx, esi
- }
- *a = a_;
- *b = b_;
- *c = c_;
- *d = d_;
-}
-#elif (defined(__GNUC__) || defined(__SUNPRO_C)) && (defined(__i386__) || defined(__i386))
-#define HAS_CPUID
-/* Get us a CPUID function. We can't use ebx because it's the PIC register on
- some platforms, so we use ESI instead and save ebx to avoid clobbering it. */
-static void cpuid(uint32_t fxn, uint32_t *a, uint32_t *b, uint32_t *c, uint32_t *d) {
-
- uint32_t a_, b_, c_, d_;
- __asm__ __volatile__ ("xchgl %%ebx, %%esi; cpuid; xchgl %%ebx, %%esi;"
- : "=a" (a_), "=S" (b_), "=c" (c_), "=d" (d_) : "a" (fxn));
- *a = a_;
- *b = b_;
- *c = c_;
- *d = d_;
-}
-#endif
-
-// -------------------------Runtime SSEx Detection-----------------------------
-
-/* MMX is always supported per
- * Gecko v1.9.1 minimum CPU requirements */
-#define SSE1_EDX_MASK (1UL << 25)
-#define SSE2_EDX_MASK (1UL << 26)
-#define SSE3_ECX_MASK (1UL << 0)
-
-static int sse_version_available(void)
-{
-#if defined(__x86_64__) || defined(__x86_64) || defined(_M_AMD64)
- /* we know at build time that 64-bit CPUs always have SSE2
- * this tells the compiler that non-SSE2 branches will never be
- * taken (i.e. OK to optimze away the SSE1 and non-SIMD code */
- return 2;
-#elif defined(HAS_CPUID)
- static int sse_version = -1;
- uint32_t a, b, c, d;
- uint32_t function = 0x00000001;
-
- if (sse_version == -1) {
- sse_version = 0;
- cpuid(function, &a, &b, &c, &d);
- if (c & SSE3_ECX_MASK)
- sse_version = 3;
- else if (d & SSE2_EDX_MASK)
- sse_version = 2;
- else if (d & SSE1_EDX_MASK)
- sse_version = 1;
- }
-
- return sse_version;
-#else
- return 0;
-#endif
-}
-#endif
-
-void build_output_lut(struct curveType *trc,
- uint16_t **output_gamma_lut, size_t *output_gamma_lut_length)
-{
- if (trc->count == 0) {
- *output_gamma_lut = build_linear_table(4096);
- *output_gamma_lut_length = 4096;
- } else if (trc->count == 1) {
- float gamma = 1./u8Fixed8Number_to_float(trc->data[0]);
- *output_gamma_lut = build_pow_table(gamma, 4096);
- *output_gamma_lut_length = 4096;
- } else {
- //XXX: the choice of a minimum of 256 here is not backed by any theory, measurement or data, however it is what lcms uses.
- *output_gamma_lut_length = trc->count;
- if (*output_gamma_lut_length < 256)
- *output_gamma_lut_length = 256;
-
- *output_gamma_lut = invert_lut(trc->data, trc->count, *output_gamma_lut_length);
- }
-
-}
-
-void qcms_profile_precache_output_transform(qcms_profile *profile)
-{
- /* we only support precaching on rgb profiles */
- if (profile->color_space != RGB_SIGNATURE)
- return;
-
- if (!profile->output_table_r) {
- profile->output_table_r = precache_create();
- if (profile->output_table_r &&
- !compute_precache(profile->redTRC, profile->output_table_r->data)) {
- precache_release(profile->output_table_r);
- profile->output_table_r = NULL;
- }
- }
- if (!profile->output_table_g) {
- profile->output_table_g = precache_create();
- if (profile->output_table_g &&
- !compute_precache(profile->greenTRC, profile->output_table_g->data)) {
- precache_release(profile->output_table_g);
- profile->output_table_g = NULL;
- }
- }
- if (!profile->output_table_b) {
- profile->output_table_b = precache_create();
- if (profile->output_table_b &&
- !compute_precache(profile->blueTRC, profile->output_table_b->data)) {
- precache_release(profile->output_table_b);
- profile->output_table_b = NULL;
- }
- }
-}
-
-#define NO_MEM_TRANSFORM NULL
-
-qcms_transform* qcms_transform_create(
- qcms_profile *in, qcms_data_type in_type,
- qcms_profile* out, qcms_data_type out_type,
- qcms_intent intent)
-{
- bool precache = false;
-
- qcms_transform *transform = transform_alloc();
- if (!transform) {
- return NULL;
- }
- if (out_type != QCMS_DATA_RGB_8 &&
- out_type != QCMS_DATA_RGBA_8) {
- assert(0 && "output type");
- transform_free(transform);
- return NULL;
- }
-
- if (out->output_table_r &&
- out->output_table_g &&
- out->output_table_b) {
- precache = true;
- }
-
- if (precache) {
- transform->output_table_r = precache_reference(out->output_table_r);
- transform->output_table_g = precache_reference(out->output_table_g);
- transform->output_table_b = precache_reference(out->output_table_b);
- } else {
- build_output_lut(out->redTRC, &transform->output_gamma_lut_r, &transform->output_gamma_lut_r_length);
- build_output_lut(out->greenTRC, &transform->output_gamma_lut_g, &transform->output_gamma_lut_g_length);
- build_output_lut(out->blueTRC, &transform->output_gamma_lut_b, &transform->output_gamma_lut_b_length);
- if (!transform->output_gamma_lut_r || !transform->output_gamma_lut_g || !transform->output_gamma_lut_b) {
- qcms_transform_release(transform);
- return NO_MEM_TRANSFORM;
- }
- }
-
- if (in->color_space == RGB_SIGNATURE) {
- struct matrix in_matrix, out_matrix, result;
-
- if (in_type != QCMS_DATA_RGB_8 &&
- in_type != QCMS_DATA_RGBA_8){
- assert(0 && "input type");
- transform_free(transform);
- return NULL;
- }
- if (precache) {
-#ifdef X86
- if (sse_version_available() >= 2) {
- if (in_type == QCMS_DATA_RGB_8)
- transform->transform_fn = qcms_transform_data_rgb_out_lut_sse2;
- else
- transform->transform_fn = qcms_transform_data_rgba_out_lut_sse2;
-
-#if !(defined(_MSC_VER) && defined(_M_AMD64))
- /* Microsoft Compiler for x64 doesn't support MMX.
- * SSE code uses MMX so that we disable on x64 */
- } else
- if (sse_version_available() >= 1) {
- if (in_type == QCMS_DATA_RGB_8)
- transform->transform_fn = qcms_transform_data_rgb_out_lut_sse1;
- else
- transform->transform_fn = qcms_transform_data_rgba_out_lut_sse1;
-#endif
- } else
-#endif
- {
- if (in_type == QCMS_DATA_RGB_8)
- transform->transform_fn = qcms_transform_data_rgb_out_lut_precache;
- else
- transform->transform_fn = qcms_transform_data_rgba_out_lut_precache;
- }
- } else {
- if (in_type == QCMS_DATA_RGB_8)
- transform->transform_fn = qcms_transform_data_rgb_out_lut;
- else
- transform->transform_fn = qcms_transform_data_rgba_out_lut;
- }
-
- //XXX: avoid duplicating tables if we can
- transform->input_gamma_table_r = build_input_gamma_table(in->redTRC);
- transform->input_gamma_table_g = build_input_gamma_table(in->greenTRC);
- transform->input_gamma_table_b = build_input_gamma_table(in->blueTRC);
-
- if (!transform->input_gamma_table_r || !transform->input_gamma_table_g || !transform->input_gamma_table_b) {
- qcms_transform_release(transform);
- return NO_MEM_TRANSFORM;
- }
-
- /* build combined colorant matrix */
- in_matrix = build_colorant_matrix(in);
- out_matrix = build_colorant_matrix(out);
- out_matrix = matrix_invert(out_matrix);
- if (out_matrix.invalid) {
- qcms_transform_release(transform);
- return NULL;
- }
- result = matrix_multiply(out_matrix, in_matrix);
-
- /* store the results in column major mode
- * this makes doing the multiplication with sse easier */
- transform->matrix[0][0] = result.m[0][0];
- transform->matrix[1][0] = result.m[0][1];
- transform->matrix[2][0] = result.m[0][2];
- transform->matrix[0][1] = result.m[1][0];
- transform->matrix[1][1] = result.m[1][1];
- transform->matrix[2][1] = result.m[1][2];
- transform->matrix[0][2] = result.m[2][0];
- transform->matrix[1][2] = result.m[2][1];
- transform->matrix[2][2] = result.m[2][2];
-
- } else if (in->color_space == GRAY_SIGNATURE) {
- if (in_type != QCMS_DATA_GRAY_8 &&
- in_type != QCMS_DATA_GRAYA_8){
- assert(0 && "input type");
- transform_free(transform);
- return NULL;
- }
-
- transform->input_gamma_table_gray = build_input_gamma_table(in->grayTRC);
- if (!transform->input_gamma_table_gray) {
- qcms_transform_release(transform);
- return NO_MEM_TRANSFORM;
- }
-
- if (precache) {
- if (in_type == QCMS_DATA_GRAY_8) {
- transform->transform_fn = qcms_transform_data_gray_out_precache;
- } else {
- transform->transform_fn = qcms_transform_data_graya_out_precache;
- }
- } else {
- if (in_type == QCMS_DATA_GRAY_8) {
- transform->transform_fn = qcms_transform_data_gray_out_lut;
- } else {
- transform->transform_fn = qcms_transform_data_graya_out_lut;
- }
- }
- } else {
- assert(0 && "unexpected colorspace");
- qcms_transform_release(transform);
- return NO_MEM_TRANSFORM;
- }
- return transform;
-}
-
-#if defined(__GNUC__) && !defined(__x86_64__) && !defined(__amd64__)
-/* we need this to avoid crashes when gcc assumes the stack is 128bit aligned */
-__attribute__((__force_align_arg_pointer__))
-#endif
-void qcms_transform_data(qcms_transform *transform, void *src, void *dest, size_t length)
-{
- transform->transform_fn(transform, src, dest, length);
-}
« no previous file with comments | « third_party/qcms/qcmstypes.h ('k') | third_party/qcms/transform-sse1.c » ('j') | no next file with comments »

Powered by Google App Engine
This is Rietveld 408576698