//
// Little cms
// Copyright (C) 1998-2001 Marti Maria
//
// THIS SOFTWARE IS PROVIDED "AS-IS" AND WITHOUT WARRANTY OF ANY KIND,
// EXPRESS, IMPLIED OR OTHERWISE, INCLUDING WITHOUT LIMITATION, ANY
// WARRANTY OF MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE.
//
// IN NO EVENT SHALL MARTI MARIA BE LIABLE FOR ANY SPECIAL, INCIDENTAL,
// INDIRECT OR CONSEQUENTIAL DAMAGES OF ANY KIND,
// OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS,
// WHETHER OR NOT ADVISED OF THE POSSIBILITY OF DAMAGE, AND ON ANY THEORY OF
// LIABILITY, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE
// OF THIS SOFTWARE.
//
//
// This library is free software; you can redistribute it and/or
// modify it under the terms of the GNU Lesser General Public
// License as published by the Free Software Foundation; either
// version 2 of the License, or (at your option) any later version.
//
// This library is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
// Lesser General Public License for more details.
//
// You should have received a copy of the GNU Lesser General Public
// License along with this library; if not, write to the Free Software
// Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
#include "lcms.h"
#include <stdarg.h>
#include <ctype.h>
// xgetopt() interface -----------------------------------------------------
extern int xoptind;
extern char *xoptarg;
extern int xopterr;
extern char SW;
int cdecl xgetopt(int argc, char *argv[], char *optionS);
// ------------------------------------------------------------------------
static BOOL InHexa = FALSE;
static int Verbose = 0;
static char *cInProf = NULL;
static char *cOutProf = NULL;
static int Intent = INTENT_PERCEPTUAL;
static BOOL Width16 = FALSE;
static BOOL WhiteBlackCompensation = FALSE;
static BOOL lDoPrecalc = FALSE;
static cmsHPROFILE hInput, hOutput, hLab, hXYZ;
static cmsHTRANSFORM hTrans, hTransXYZ, hTransLab;
static icColorSpaceSignature InputColorSpace, OutputColorSpace;
static cmsCIEXYZ xyz;
static cmsCIELab Lab;
#ifdef _MS_VER
#define xisatty(x) _isatty( _fileno( (x) ) )
#else
#define xisatty(x) isatty( fileno( (x) ) )
#endif
#ifdef NON_WINDOWS
# ifndef stricmp
# define stricmp strcasecmp
# endif
#endif
static
void FatalError(const char *frm, ...)
{
va_list args;
va_start(args, frm);
vfprintf(stderr, frm, args);
va_end(args);
exit(1);
}
// The toggles stuff
static
void HandleSwitches(int argc, char *argv[])
{
int s;
while ((s = xgetopt(argc,argv,"PpVvWwxXhHbBI:i:O:o:T:t:")) != EOF) {
switch (s){
case 'b':
case 'B':
WhiteBlackCompensation = TRUE;
break;
case 'p':
case 'P':
lDoPrecalc = TRUE;
break;
case 'x':
case 'X':
InHexa = TRUE;
break;
case 'v':
case 'V':
Verbose = TRUE;
break;
case 'i':
case 'I':
cInProf = xoptarg;
break;
case 'o':
case 'O':
cOutProf = xoptarg;
break;
case 't':
case 'T':
Intent = atoi(xoptarg);
if (Intent > 3) Intent = 3;
if (Intent < 0) Intent = 0;
break;
case 'W':
case 'w':
Width16 = TRUE;
break;
default:
FatalError("Unknown option - run without args to see valid ones.\n");
}
}
}
static
cmsHPROFILE OpenProfile(const char* File)
{
if (!File)
return cmsCreate_sRGBProfile();
if (stricmp(File, "*Lab") == 0)
return cmsCreateLabProfile(NULL);
if (stricmp(File, "*XYZ") == 0)
return cmsCreateXYZProfile();
return cmsOpenProfileFromFile(File, "r");
}
static
void OpenTransforms(void)
{
DWORD dwIn, dwOut, dwFlags;
hInput = OpenProfile(cInProf);
hOutput = OpenProfile(cOutProf);
hXYZ = cmsCreateXYZProfile();
hLab = cmsCreateLabProfile(NULL);
if (Verbose) {
printf("From: %s\n", cmsTakeProductName(hInput));
printf("To: %s\n\n", cmsTakeProductName(hOutput));
}
InputColorSpace = cmsGetColorSpace(hInput);
OutputColorSpace = cmsGetColorSpace(hOutput);
dwIn = BYTES_SH(2) | CHANNELS_SH(_cmsChannelsOf(InputColorSpace));
dwOut = BYTES_SH(2) | CHANNELS_SH(_cmsChannelsOf(OutputColorSpace));
dwFlags = 0;
if (!lDoPrecalc)
dwFlags |= cmsFLAGS_NOTPRECALC;
if (WhiteBlackCompensation)
dwFlags |= cmsFLAGS_WHITEBLACKCOMPENSATION;
hTrans = cmsCreateTransform(hInput, dwIn,
hOutput, dwOut,
Intent, dwFlags);
hTransXYZ = cmsCreateTransform(hInput, dwIn,
hXYZ, TYPE_XYZ_16,
Intent, cmsFLAGS_NOTPRECALC);
hTransLab = cmsCreateTransform(hInput, dwIn,
hLab, TYPE_Lab_16,
Intent, cmsFLAGS_NOTPRECALC);
}
static
void CloseTransforms(void)
{
cmsDeleteTransform(hTrans);
cmsDeleteTransform(hTransLab);
cmsDeleteTransform(hTransXYZ);
cmsCloseProfile(hInput);
cmsCloseProfile(hOutput);
cmsCloseProfile(hXYZ);
cmsCloseProfile(hLab);
}
static
void PrintOne(const char* C, double v)
{
if (InHexa)
{
if (Width16)
printf("%s=0x%x ", C, (int) floor(v + .5));
else
printf("%s=0x%x ", C, (int) floor(v / 257. + .5));
}
else
{
printf("%s=%.2f ", C, v / 257.);
}
}
static
void PrintCooked(const char* C, double v)
{
printf("%s=%.4f ", C, v);
}
static
void PrintResults(WORD Encoded[], icColorSpaceSignature ColorSpace)
{
int i;
switch (ColorSpace) {
case icSigXYZData:
cmsXYZEncoded2Float(&xyz, Encoded);
PrintCooked("X", xyz.X * 100.); PrintCooked("Y", xyz.Y * 100.); PrintCooked("Z", xyz.Z * 100.);
break;
case icSigLabData:
cmsLabEncoded2Float(&Lab, Encoded);
PrintCooked("L*", Lab.L); PrintCooked("a*", Lab.a); PrintCooked("b*", Lab.b);
break;
case icSigLuvData:
PrintOne("L", Encoded[0]); PrintOne("u", Encoded[1]); PrintOne("v", Encoded[2]);
break;
case icSigYCbCrData:
PrintOne("Y", Encoded[0]); PrintOne("Cb", Encoded[1]); PrintOne("Cr", Encoded[2]);
break;
case icSigYxyData:
PrintOne("Y", Encoded[0]); PrintOne("x", Encoded[1]); PrintOne("y", Encoded[2]);
break;
case icSigRgbData:
PrintOne("R", Encoded[0]); PrintOne("G", Encoded[1]); PrintOne("B", Encoded[2]);
break;
case icSigGrayData:
PrintOne("L", Encoded[0]);
break;
case icSigHsvData:
PrintOne("H", Encoded[0]); PrintOne("s", Encoded[1]); PrintOne("v", Encoded[2]);
break;
case icSigHlsData:
PrintOne("H", Encoded[0]); PrintOne("l", Encoded[1]); PrintOne("s", Encoded[2]);
break;
case icSigCmykData:
PrintOne("C", Encoded[0]); PrintOne("M", Encoded[1]); PrintOne("Y", Encoded[2]); PrintOne("K", Encoded[3]);
break;
case icSigCmyData:
PrintOne("C", Encoded[0]); PrintOne("M", Encoded[1]); PrintOne("Y", Encoded[2]);
break;
case icSig6colorData:
PrintOne("C", Encoded[0]); PrintOne("M", Encoded[1]); PrintOne("Y", Encoded[2]);
PrintOne("K", Encoded[3]); PrintOne("c", Encoded[1]); PrintOne("m", Encoded[2]);
break;
default:
for (i=0; i < _cmsChannelsOf(OutputColorSpace); i++) {
char Buffer[10];
sprintf(Buffer, "CHAN%d", i + 1);
PrintOne(Buffer, Encoded[i]);
}
}
}
static
int GetVal(const char* AskFor)
{
char Buffer[256];
int tmp;
char *Max;
char* MaxTbl[] = { "255",
"65535",
"FF",
"FFFF" };
Max = MaxTbl[InHexa * 2 + Width16];
if (xisatty(stdin))
printf("%s (%s)? ", AskFor, Max);
scanf("%s", Buffer);
// Quit?
if (toupper(Buffer[0]) == 'Q') {
CloseTransforms();
if (xisatty(stdin))
printf("Done.\n");
exit(0);
}
sscanf(Buffer, (InHexa ? "%x" : "%d"), &tmp);
if (!Width16)
tmp *= 257;
return tmp;
}
static
double GetDbl(const char* AskFor)
{
char Buffer[256];
if (xisatty(stdin))
printf("%s? ", AskFor);
scanf("%s", Buffer);
// Quit?
if (toupper(Buffer[0]) == 'Q') {
CloseTransforms();
if (xisatty(stdin))
printf("Done.\n");
exit(0);
}
return atof(Buffer);
}
static
void TakeValues(WORD Encoded[])
{
switch (InputColorSpace) {
case icSigXYZData:
xyz.X = GetDbl("X"); xyz.Y = GetDbl("Y"); xyz.Z = GetDbl("Z");
cmsFloat2XYZEncoded(Encoded, &xyz);
break;
case icSigLabData:
Lab.L= GetDbl("L*"); Lab.a= GetDbl("a*"); Lab.b = GetDbl("b*");
cmsFloat2LabEncoded(Encoded, &Lab);
break;
case icSigLuvData:
Encoded[0] = GetVal("L"); Encoded[1] = GetVal("u"); Encoded[2] = GetVal("v");
break;
case icSigYCbCrData:
Encoded[0] = GetVal("Y"); Encoded[1] = GetVal("Cb"); Encoded[2] = GetVal("Cr");
break;
case icSigYxyData:
Encoded[0] = GetVal("Y"); Encoded[1] = GetVal("x"); Encoded[2] = GetVal("y");
break;
case icSigRgbData:
Encoded[0] = GetVal("R"); Encoded[1] = GetVal("G"); Encoded[2] = GetVal("B");
break;
case icSigGrayData:
Encoded[0] = GetVal("L");
break;
case icSigHsvData:
Encoded[0] = GetVal("H"); Encoded[1] = GetVal("s"); Encoded[2] = GetVal("v");
break;
case icSigHlsData:
Encoded[0] = GetVal("H"); Encoded[1] = GetVal("l"); Encoded[2] = GetVal("s");
break;
case icSigCmykData:
Encoded[0] = GetVal("C"); Encoded[1] = GetVal("M"); Encoded[2] = GetVal("Y"); Encoded[3] = GetVal("K");
break;
case icSigCmyData:
Encoded[0] = GetVal("C"); Encoded[1] = GetVal("M"); Encoded[2] = GetVal("Y");
break;
case icSig6colorData:
FatalError("Hexachrome separations unsupported on input");
break;
default:
FatalError("Unsupported %d channel profile", _cmsChannelsOf(InputColorSpace));
}
}
static
void Help(void)
{
fprintf(stderr, "usage: icctrans [flags]\n\n");
fprintf(stderr, "flags:\n\n");
fprintf(stderr, "%cv - Verbose\n", SW);
fprintf(stderr, "%ci<profile> - Input profile (defaults to sRGB)\n", SW);
fprintf(stderr, "%co<profile> - Output profile (defaults to sRGB)\n", SW);
fprintf(stderr, "\nYou can use '*Lab' and '*xyz' as built-in profiles\n\n");
fprintf(stderr, "%ct<0,1,2,3> - Intent (0=Perceptual, 1=Colorimetric, 2=Saturation, 3=Absolute)\n", SW);
fprintf(stderr, "%cw - use 16 bits\n", SW);
fprintf(stderr, "%cx - Hexadecimal\n\n", SW);
fprintf(stderr, "%cb - Black/White compensation\n", SW);
fprintf(stderr, "%cp - Precalculate device-link\n\n", SW);
fprintf(stderr, "This program is intended to be a demo of the little cms\n"
"engine. Both lcms and this program are freeware. You can\n"
"obtain both in source code at http://www.littlecms.com\n"
"For suggestions, comments, bug reports etc. send mail to\n"
"marti@littlecms.com\n\n");
exit(0);
}
int main(int argc, char *argv[])
{
WORD Input[MAXCHANNELS], Output[MAXCHANNELS], PCSLab[MAXCHANNELS], PCSxyz[MAXCHANNELS];
fprintf(stderr, "little cms ColorSpace conversion calculator - v1.2\n\n");
if (argc == 1)
Help();
HandleSwitches(argc, argv);
OpenTransforms();
for(;;) {
if (xisatty(stdin))
printf("\nEnter values, 'q' to quit\n");
if (feof(stdin))
break;
TakeValues(Input);
cmsDoTransform(hTrans, Input, Output, 1);
cmsDoTransform(hTransXYZ, Input, PCSxyz, 1);
cmsDoTransform(hTransLab, Input, PCSLab, 1);
if (xisatty(stdin))
printf("\n\n");
PrintResults(Output, OutputColorSpace); printf("\n");
if (Verbose) {
PrintResults(PCSxyz, icSigXYZData); printf("\n");
PrintResults(PCSLab, icSigLabData); printf("\n");
}
}
return 0;
}
