| 1 |
#ifndef lint
|
| 2 |
static const char RCSid[] = "$Id$";
|
| 3 |
#endif
|
| 4 |
/*
|
| 5 |
* Convert MGF color to RGB representation defined below.
|
| 6 |
*/
|
| 7 |
|
| 8 |
#include <stdio.h>
|
| 9 |
#include <stdlib.h>
|
| 10 |
|
| 11 |
#include "parser.h"
|
| 12 |
|
| 13 |
/* Change the following to suit your standard */
|
| 14 |
#define CIE_x_r 0.640 /* nominal CRT primaries */
|
| 15 |
#define CIE_y_r 0.330
|
| 16 |
#define CIE_x_g 0.290
|
| 17 |
#define CIE_y_g 0.600
|
| 18 |
#define CIE_x_b 0.150
|
| 19 |
#define CIE_y_b 0.060
|
| 20 |
#define CIE_x_w 0.3333 /* use true white */
|
| 21 |
#define CIE_y_w 0.3333
|
| 22 |
|
| 23 |
#define CIE_C_rD ( (1./CIE_y_w) * \
|
| 24 |
( CIE_x_w*(CIE_y_g - CIE_y_b) - \
|
| 25 |
CIE_y_w*(CIE_x_g - CIE_x_b) + \
|
| 26 |
CIE_x_g*CIE_y_b - CIE_x_b*CIE_y_g ) )
|
| 27 |
#define CIE_C_gD ( (1./CIE_y_w) * \
|
| 28 |
( CIE_x_w*(CIE_y_b - CIE_y_r) - \
|
| 29 |
CIE_y_w*(CIE_x_b - CIE_x_r) - \
|
| 30 |
CIE_x_r*CIE_y_b + CIE_x_b*CIE_y_r ) )
|
| 31 |
#define CIE_C_bD ( (1./CIE_y_w) * \
|
| 32 |
( CIE_x_w*(CIE_y_r - CIE_y_g) - \
|
| 33 |
CIE_y_w*(CIE_x_r - CIE_x_g) + \
|
| 34 |
CIE_x_r*CIE_y_g - CIE_x_g*CIE_y_r ) )
|
| 35 |
|
| 36 |
|
| 37 |
float xyz2rgbmat[3][3] = { /* XYZ to RGB conversion matrix */
|
| 38 |
{(CIE_y_g - CIE_y_b - CIE_x_b*CIE_y_g + CIE_y_b*CIE_x_g)/CIE_C_rD,
|
| 39 |
(CIE_x_b - CIE_x_g - CIE_x_b*CIE_y_g + CIE_x_g*CIE_y_b)/CIE_C_rD,
|
| 40 |
(CIE_x_g*CIE_y_b - CIE_x_b*CIE_y_g)/CIE_C_rD},
|
| 41 |
{(CIE_y_b - CIE_y_r - CIE_y_b*CIE_x_r + CIE_y_r*CIE_x_b)/CIE_C_gD,
|
| 42 |
(CIE_x_r - CIE_x_b - CIE_x_r*CIE_y_b + CIE_x_b*CIE_y_r)/CIE_C_gD,
|
| 43 |
(CIE_x_b*CIE_y_r - CIE_x_r*CIE_y_b)/CIE_C_gD},
|
| 44 |
{(CIE_y_r - CIE_y_g - CIE_y_r*CIE_x_g + CIE_y_g*CIE_x_r)/CIE_C_bD,
|
| 45 |
(CIE_x_g - CIE_x_r - CIE_x_g*CIE_y_r + CIE_x_r*CIE_y_g)/CIE_C_bD,
|
| 46 |
(CIE_x_r*CIE_y_g - CIE_x_g*CIE_y_r)/CIE_C_bD}
|
| 47 |
};
|
| 48 |
|
| 49 |
|
| 50 |
mgf2rgb(cin, intensity, cout) /* convert MGF color to RGB */
|
| 51 |
register C_COLOR *cin; /* input MGF chrominance */
|
| 52 |
double intensity; /* input luminance or reflectance */
|
| 53 |
register float cout[3]; /* output RGB color */
|
| 54 |
{
|
| 55 |
static double cie[3];
|
| 56 |
/* get CIE XYZ representation */
|
| 57 |
c_ccvt(cin, C_CSXY);
|
| 58 |
cie[0] = intensity*cin->cx/cin->cy;
|
| 59 |
cie[1] = intensity;
|
| 60 |
cie[2] = intensity*(1./cin->cy - 1.) - cie[0];
|
| 61 |
/* convert to RGB */
|
| 62 |
cout[0] = xyz2rgbmat[0][0]*cie[0] + xyz2rgbmat[0][1]*cie[1]
|
| 63 |
+ xyz2rgbmat[0][2]*cie[2];
|
| 64 |
if(cout[0] < 0.) cout[0] = 0.;
|
| 65 |
cout[1] = xyz2rgbmat[1][0]*cie[0] + xyz2rgbmat[1][1]*cie[1]
|
| 66 |
+ xyz2rgbmat[1][2]*cie[2];
|
| 67 |
if(cout[1] < 0.) cout[1] = 0.;
|
| 68 |
cout[2] = xyz2rgbmat[2][0]*cie[0] + xyz2rgbmat[2][1]*cie[1]
|
| 69 |
+ xyz2rgbmat[2][2]*cie[2];
|
| 70 |
if(cout[2] < 0.) cout[2] = 0.;
|
| 71 |
}
|
