-//---------------------------------------------------------------------------------
-//
-// Little Color Management System
-// Copyright (c) 1998-2010 Marti Maria Saguer
-//
-// 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 "utils.h"
-
-
-int Verbose = 0;
-
-static char ProgramName[256] = "";
-
-void FatalError(const char *frm, ...)
-{
- va_list args;
-
- va_start(args, frm);
- fprintf(stderr, "[%s fatal error]: ", ProgramName);
- vfprintf(stderr, frm, args);
- fprintf(stderr, "\n");
- va_end(args);
-
- exit(1);
-}
-
-// Show errors to the end user (unless quiet option)
-static
-void MyErrorLogHandler(cmsContext ContextID, cmsUInt32Number ErrorCode, const char *Text)
-{
- if (Verbose >= 0)
- fprintf(stderr, "[%s]: %s\n", ProgramName, Text);
-
- UTILS_UNUSED_PARAMETER(ErrorCode);
- UTILS_UNUSED_PARAMETER(ContextID);
-}
-
-
-void InitUtils(const char* PName)
-{
- strncpy(ProgramName, PName, sizeof(ProgramName));
- ProgramName[sizeof(ProgramName)-1] = 0;
-
- cmsSetLogErrorHandler(MyErrorLogHandler);
-}
-
-
-// Virtual profiles are handled here.
-cmsHPROFILE OpenStockProfile(cmsContext ContextID, const char* File)
-{
- if (!File)
- return cmsCreate_sRGBProfileTHR(ContextID);
-
- if (cmsstrcasecmp(File, "*Lab2") == 0)
- return cmsCreateLab2ProfileTHR(ContextID, NULL);
-
- if (cmsstrcasecmp(File, "*Lab4") == 0)
- return cmsCreateLab4ProfileTHR(ContextID, NULL);
-
- if (cmsstrcasecmp(File, "*Lab") == 0)
- return cmsCreateLab4ProfileTHR(ContextID, NULL);
-
- if (cmsstrcasecmp(File, "*LabD65") == 0) {
-
- cmsCIExyY D65xyY;
-
- cmsWhitePointFromTemp( &D65xyY, 6504);
- return cmsCreateLab4ProfileTHR(ContextID, &D65xyY);
- }
-
- if (cmsstrcasecmp(File, "*XYZ") == 0)
- return cmsCreateXYZProfileTHR(ContextID);
-
- if (cmsstrcasecmp(File, "*Gray22") == 0) {
-
- cmsToneCurve* Curve = cmsBuildGamma(ContextID, 2.2);
- cmsHPROFILE hProfile = cmsCreateGrayProfileTHR(ContextID, cmsD50_xyY(), Curve);
- cmsFreeToneCurve(Curve);
- return hProfile;
- }
-
- if (cmsstrcasecmp(File, "*Gray30") == 0) {
-
- cmsToneCurve* Curve = cmsBuildGamma(ContextID, 3.0);
- cmsHPROFILE hProfile = cmsCreateGrayProfileTHR(ContextID, cmsD50_xyY(), Curve);
- cmsFreeToneCurve(Curve);
- return hProfile;
- }
-
- if (cmsstrcasecmp(File, "*srgb") == 0)
- return cmsCreate_sRGBProfileTHR(ContextID);
-
- if (cmsstrcasecmp(File, "*null") == 0)
- return cmsCreateNULLProfileTHR(ContextID);
-
-
- if (cmsstrcasecmp(File, "*Lin2222") == 0) {
-
- cmsToneCurve* Gamma = cmsBuildGamma(0, 2.2);
- cmsToneCurve* Gamma4[4];
- cmsHPROFILE hProfile;
-
- Gamma4[0] = Gamma4[1] = Gamma4[2] = Gamma4[3] = Gamma;
- hProfile = cmsCreateLinearizationDeviceLink(cmsSigCmykData, Gamma4);
- cmsFreeToneCurve(Gamma);
- return hProfile;
- }
-
-
- return cmsOpenProfileFromFileTHR(ContextID, File, "r");
-}
-
-// Help on available built-ins
-void PrintBuiltins(void)
-{
- fprintf(stderr, "\nBuilt-in profiles:\n\n");
- fprintf(stderr, "\t*Lab2 -- D50-based v2 CIEL*a*b\n"
- "\t*Lab4 -- D50-based v4 CIEL*a*b\n"
- "\t*Lab -- D50-based v4 CIEL*a*b\n"
- "\t*XYZ -- CIE XYZ (PCS)\n"
- "\t*sRGB -- sRGB color space\n"
- "\t*Gray22 - Monochrome of Gamma 2.2\n"
- "\t*Gray30 - Monochrome of Gamma 3.0\n"
- "\t*null - Monochrome black for all input\n"
- "\t*Lin2222- CMYK linearization of gamma 2.2 on each channel\n");
-}
-
-
-// Auxiliar for printing information on profile
-static
-void PrintInfo(cmsHPROFILE h, cmsInfoType Info)
-{
- char* text;
- int len;
-
- len = cmsGetProfileInfoASCII(h, Info, "en", "US", NULL, 0);
- if (len == 0) return;
-
- text = malloc(len * sizeof(char));
- if (text == NULL) return;
-
- cmsGetProfileInfoASCII(h, Info, "en", "US", text, len);
-
- if (strlen(text) > 0)
- printf("%s\n", text);
-
- free(text);
-}
-
-
-
-// Displays the colorant table
-static
-void PrintColorantTable(cmsHPROFILE hInput, cmsTagSignature Sig, const char* Title)
-{
- cmsNAMEDCOLORLIST* list;
- int i, n;
-
- if (cmsIsTag(hInput, Sig)) {
-
- printf("%s:\n", Title);
-
- list = cmsReadTag(hInput, Sig);
- if (list == NULL) {
- printf("(Unavailable)\n");
- return;
- }
-
- n = cmsNamedColorCount(list);
- for (i=0; i < n; i++) {
-
- char Name[cmsMAX_PATH];
-
- cmsNamedColorInfo(list, i, Name, NULL, NULL, NULL, NULL);
- printf("\t%s\n", Name);
- }
-
- printf("\n");
- }
-
-}
-
-
-void PrintProfileInformation(cmsHPROFILE hInput)
-{
- PrintInfo(hInput, cmsInfoDescription);
- PrintInfo(hInput, cmsInfoManufacturer);
- PrintInfo(hInput, cmsInfoModel);
- PrintInfo(hInput, cmsInfoCopyright);
-
- if (Verbose > 2) {
-
- PrintColorantTable(hInput, cmsSigColorantTableTag, "Input colorant table");
- PrintColorantTable(hInput, cmsSigColorantTableOutTag, "Input colorant out table");
- }
-
- printf("\n");
-}
-
-// -----------------------------------------------------------------------------
-
-
-void PrintRenderingIntents(void)
-{
- cmsUInt32Number Codes[200];
- char* Descriptions[200];
- cmsUInt32Number n, i;
-
- fprintf(stderr, "%ct<n> rendering intent:\n\n", SW);
-
- n = cmsGetSupportedIntents(200, Codes, Descriptions);
-
- for (i=0; i < n; i++) {
- fprintf(stderr, "\t%d - %s\n", Codes[i], Descriptions[i]);
- }
- fprintf(stderr, "\n");
-}
-
-
-
-// ------------------------------------------------------------------------------
-
-cmsBool SaveMemoryBlock(const cmsUInt8Number* Buffer, cmsUInt32Number dwLen, const char* Filename)
-{
- FILE* out = fopen(Filename, "wb");
- if (out == NULL) {
- FatalError("Cannot create '%s'", Filename);
- return FALSE;
- }
-
- if (fwrite(Buffer, 1, dwLen, out) != dwLen) {
- FatalError("Cannot write %ld bytes to %s", dwLen, Filename);
- return FALSE;
- }
-
- if (fclose(out) != 0) {
- FatalError("Error flushing file '%s'", Filename);
- return FALSE;
- }
-
- return TRUE;
-}
-
-// ------------------------------------------------------------------------------
-
-// Return a pixel type on depending on the number of channels
-int PixelTypeFromChanCount(int ColorChannels)
-{
- switch (ColorChannels) {
-
- case 1: return PT_GRAY;
- case 2: return PT_MCH2;
- case 3: return PT_MCH3;
- case 4: return PT_CMYK;
- case 5: return PT_MCH5;
- case 6: return PT_MCH6;
- case 7: return PT_MCH7;
- case 8: return PT_MCH8;
- case 9: return PT_MCH9;
- case 10: return PT_MCH10;
- case 11: return PT_MCH11;
- case 12: return PT_MCH12;
- case 13: return PT_MCH13;
- case 14: return PT_MCH14;
- case 15: return PT_MCH15;
-
- default:
-
- FatalError("What a weird separation of %d channels?!?!", ColorChannels);
- return -1;
- }
-}
-
-
-// ------------------------------------------------------------------------------
-
-// Return number of channels of pixel type
-int ChanCountFromPixelType(int ColorChannels)
-{
- switch (ColorChannels) {
-
- case PT_GRAY: return 1;
-
- case PT_RGB:
- case PT_CMY:
- case PT_Lab:
- case PT_YUV:
- case PT_YCbCr: return 3;
-
- case PT_CMYK: return 4 ;
- case PT_MCH2: return 2 ;
- case PT_MCH3: return 3 ;
- case PT_MCH4: return 4 ;
- case PT_MCH5: return 5 ;
- case PT_MCH6: return 6 ;
- case PT_MCH7: return 7 ;
- case PT_MCH8: return 8 ;
- case PT_MCH9: return 9 ;
- case PT_MCH10: return 10;
- case PT_MCH11: return 11;
- case PT_MCH12: return 12;
- case PT_MCH13: return 12;
- case PT_MCH14: return 14;
- case PT_MCH15: return 15;
-
- default:
-
- FatalError("Unsupported color space of %d channels", ColorChannels);
- return -1;
- }
-}
-
-
+//---------------------------------------------------------------------------------\r
+//\r
+// Little Color Management System\r
+// Copyright (c) 1998-2010 Marti Maria Saguer\r
+//\r
+// Permission is hereby granted, free of charge, to any person obtaining\r
+// a copy of this software and associated documentation files (the "Software"),\r
+// to deal in the Software without restriction, including without limitation\r
+// the rights to use, copy, modify, merge, publish, distribute, sublicense,\r
+// and/or sell copies of the Software, and to permit persons to whom the Software\r
+// is furnished to do so, subject to the following conditions:\r
+//\r
+// The above copyright notice and this permission notice shall be included in\r
+// all copies or substantial portions of the Software.\r
+//\r
+// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,\r
+// EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO\r
+// THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND\r
+// NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE\r
+// LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION\r
+// OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION\r
+// WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.\r
+//\r
+//---------------------------------------------------------------------------------\r
+//\r
+\r
+#include "utils.h"\r
+\r
+\r
+int Verbose = 0;\r
+\r
+static char ProgramName[256] = "";\r
+\r
+void FatalError(const char *frm, ...)\r
+{\r
+ va_list args;\r
+\r
+ va_start(args, frm);\r
+ fprintf(stderr, "[%s fatal error]: ", ProgramName);\r
+ vfprintf(stderr, frm, args);\r
+ fprintf(stderr, "\n");\r
+ va_end(args);\r
+\r
+ exit(1);\r
+}\r
+\r
+// Show errors to the end user (unless quiet option)\r
+static\r
+void MyErrorLogHandler(cmsContext ContextID, cmsUInt32Number ErrorCode, const char *Text)\r
+{\r
+ if (Verbose >= 0)\r
+ fprintf(stderr, "[%s]: %s\n", ProgramName, Text);\r
+\r
+ UTILS_UNUSED_PARAMETER(ErrorCode);\r
+ UTILS_UNUSED_PARAMETER(ContextID);\r
+}\r
+\r
+\r
+void InitUtils(const char* PName)\r
+{\r
+ strncpy(ProgramName, PName, sizeof(ProgramName));\r
+ ProgramName[sizeof(ProgramName)-1] = 0;\r
+\r
+ cmsSetLogErrorHandler(MyErrorLogHandler);\r
+}\r
+\r
+\r
+// Virtual profiles are handled here.\r
+cmsHPROFILE OpenStockProfile(cmsContext ContextID, const char* File)\r
+{\r
+ if (!File)\r
+ return cmsCreate_sRGBProfileTHR(ContextID);\r
+\r
+ if (cmsstrcasecmp(File, "*Lab2") == 0)\r
+ return cmsCreateLab2ProfileTHR(ContextID, NULL);\r
+\r
+ if (cmsstrcasecmp(File, "*Lab4") == 0)\r
+ return cmsCreateLab4ProfileTHR(ContextID, NULL);\r
+\r
+ if (cmsstrcasecmp(File, "*Lab") == 0)\r
+ return cmsCreateLab4ProfileTHR(ContextID, NULL);\r
+\r
+ if (cmsstrcasecmp(File, "*LabD65") == 0) {\r
+\r
+ cmsCIExyY D65xyY;\r
+\r
+ cmsWhitePointFromTemp( &D65xyY, 6504);\r
+ return cmsCreateLab4ProfileTHR(ContextID, &D65xyY);\r
+ }\r
+\r
+ if (cmsstrcasecmp(File, "*XYZ") == 0)\r
+ return cmsCreateXYZProfileTHR(ContextID);\r
+\r
+ if (cmsstrcasecmp(File, "*Gray22") == 0) {\r
+\r
+ cmsToneCurve* Curve = cmsBuildGamma(ContextID, 2.2);\r
+ cmsHPROFILE hProfile = cmsCreateGrayProfileTHR(ContextID, cmsD50_xyY(), Curve);\r
+ cmsFreeToneCurve(Curve);\r
+ return hProfile;\r
+ }\r
+\r
+ if (cmsstrcasecmp(File, "*Gray30") == 0) {\r
+\r
+ cmsToneCurve* Curve = cmsBuildGamma(ContextID, 3.0);\r
+ cmsHPROFILE hProfile = cmsCreateGrayProfileTHR(ContextID, cmsD50_xyY(), Curve);\r
+ cmsFreeToneCurve(Curve);\r
+ return hProfile;\r
+ }\r
+\r
+ if (cmsstrcasecmp(File, "*srgb") == 0)\r
+ return cmsCreate_sRGBProfileTHR(ContextID);\r
+\r
+ if (cmsstrcasecmp(File, "*null") == 0)\r
+ return cmsCreateNULLProfileTHR(ContextID);\r
+\r
+\r
+ if (cmsstrcasecmp(File, "*Lin2222") == 0) {\r
+\r
+ cmsToneCurve* Gamma = cmsBuildGamma(0, 2.2);\r
+ cmsToneCurve* Gamma4[4];\r
+ cmsHPROFILE hProfile;\r
+\r
+ Gamma4[0] = Gamma4[1] = Gamma4[2] = Gamma4[3] = Gamma;\r
+ hProfile = cmsCreateLinearizationDeviceLink(cmsSigCmykData, Gamma4);\r
+ cmsFreeToneCurve(Gamma);\r
+ return hProfile;\r
+ }\r
+\r
+\r
+ return cmsOpenProfileFromFileTHR(ContextID, File, "r");\r
+}\r
+\r
+// Help on available built-ins\r
+void PrintBuiltins(void)\r
+{\r
+ fprintf(stderr, "\nBuilt-in profiles:\n\n");\r
+ fprintf(stderr, "\t*Lab2 -- D50-based v2 CIEL*a*b\n"\r
+ "\t*Lab4 -- D50-based v4 CIEL*a*b\n"\r
+ "\t*Lab -- D50-based v4 CIEL*a*b\n"\r
+ "\t*XYZ -- CIE XYZ (PCS)\n"\r
+ "\t*sRGB -- sRGB color space\n"\r
+ "\t*Gray22 - Monochrome of Gamma 2.2\n"\r
+ "\t*Gray30 - Monochrome of Gamma 3.0\n"\r
+ "\t*null - Monochrome black for all input\n"\r
+ "\t*Lin2222- CMYK linearization of gamma 2.2 on each channel\n");\r
+}\r
+\r
+\r
+// Auxiliar for printing information on profile\r
+static\r
+void PrintInfo(cmsHPROFILE h, cmsInfoType Info)\r
+{\r
+ char* text;\r
+ int len;\r
+\r
+ len = cmsGetProfileInfoASCII(h, Info, "en", "US", NULL, 0);\r
+ if (len == 0) return;\r
+\r
+ text = malloc(len * sizeof(char));\r
+ if (text == NULL) return;\r
+\r
+ cmsGetProfileInfoASCII(h, Info, "en", "US", text, len);\r
+\r
+ if (strlen(text) > 0)\r
+ printf("%s\n", text);\r
+\r
+ free(text);\r
+}\r
+\r
+\r
+\r
+// Displays the colorant table\r
+static\r
+void PrintColorantTable(cmsHPROFILE hInput, cmsTagSignature Sig, const char* Title)\r
+{\r
+ cmsNAMEDCOLORLIST* list;\r
+ int i, n;\r
+\r
+ if (cmsIsTag(hInput, Sig)) {\r
+\r
+ printf("%s:\n", Title);\r
+\r
+ list = cmsReadTag(hInput, Sig);\r
+ if (list == NULL) {\r
+ printf("(Unavailable)\n");\r
+ return;\r
+ }\r
+\r
+ n = cmsNamedColorCount(list);\r
+ for (i=0; i < n; i++) {\r
+\r
+ char Name[cmsMAX_PATH];\r
+\r
+ cmsNamedColorInfo(list, i, Name, NULL, NULL, NULL, NULL);\r
+ printf("\t%s\n", Name);\r
+ }\r
+\r
+ printf("\n");\r
+ }\r
+\r
+}\r
+\r
+\r
+void PrintProfileInformation(cmsHPROFILE hInput)\r
+{\r
+ PrintInfo(hInput, cmsInfoDescription);\r
+ PrintInfo(hInput, cmsInfoManufacturer);\r
+ PrintInfo(hInput, cmsInfoModel);\r
+ PrintInfo(hInput, cmsInfoCopyright);\r
+\r
+ if (Verbose > 2) {\r
+\r
+ PrintColorantTable(hInput, cmsSigColorantTableTag, "Input colorant table");\r
+ PrintColorantTable(hInput, cmsSigColorantTableOutTag, "Input colorant out table");\r
+ }\r
+\r
+ printf("\n");\r
+}\r
+\r
+// -----------------------------------------------------------------------------\r
+\r
+\r
+void PrintRenderingIntents(void)\r
+{\r
+ cmsUInt32Number Codes[200];\r
+ char* Descriptions[200];\r
+ cmsUInt32Number n, i;\r
+\r
+ fprintf(stderr, "%ct<n> rendering intent:\n\n", SW);\r
+\r
+ n = cmsGetSupportedIntents(200, Codes, Descriptions);\r
+\r
+ for (i=0; i < n; i++) {\r
+ fprintf(stderr, "\t%d - %s\n", Codes[i], Descriptions[i]);\r
+ }\r
+ fprintf(stderr, "\n");\r
+}\r
+\r
+\r
+\r
+// ------------------------------------------------------------------------------\r
+\r
+cmsBool SaveMemoryBlock(const cmsUInt8Number* Buffer, cmsUInt32Number dwLen, const char* Filename)\r
+{\r
+ FILE* out = fopen(Filename, "wb");\r
+ if (out == NULL) {\r
+ FatalError("Cannot create '%s'", Filename);\r
+ return FALSE;\r
+ }\r
+\r
+ if (fwrite(Buffer, 1, dwLen, out) != dwLen) {\r
+ FatalError("Cannot write %ld bytes to %s", dwLen, Filename);\r
+ return FALSE;\r
+ }\r
+\r
+ if (fclose(out) != 0) {\r
+ FatalError("Error flushing file '%s'", Filename);\r
+ return FALSE;\r
+ }\r
+\r
+ return TRUE;\r
+}\r
+\r
+// ------------------------------------------------------------------------------\r
+\r
+// Return a pixel type on depending on the number of channels\r
+int PixelTypeFromChanCount(int ColorChannels)\r
+{\r
+ switch (ColorChannels) {\r
+\r
+ case 1: return PT_GRAY;\r
+ case 2: return PT_MCH2;\r
+ case 3: return PT_MCH3;\r
+ case 4: return PT_CMYK;\r
+ case 5: return PT_MCH5;\r
+ case 6: return PT_MCH6;\r
+ case 7: return PT_MCH7;\r
+ case 8: return PT_MCH8;\r
+ case 9: return PT_MCH9;\r
+ case 10: return PT_MCH10;\r
+ case 11: return PT_MCH11;\r
+ case 12: return PT_MCH12;\r
+ case 13: return PT_MCH13;\r
+ case 14: return PT_MCH14;\r
+ case 15: return PT_MCH15;\r
+\r
+ default:\r
+\r
+ FatalError("What a weird separation of %d channels?!?!", ColorChannels);\r
+ return -1;\r
+ }\r
+}\r
+\r
+\r
+// ------------------------------------------------------------------------------\r
+\r
+// Return number of channels of pixel type\r
+int ChanCountFromPixelType(int ColorChannels)\r
+{\r
+ switch (ColorChannels) {\r
+\r
+ case PT_GRAY: return 1;\r
+\r
+ case PT_RGB:\r
+ case PT_CMY:\r
+ case PT_Lab:\r
+ case PT_YUV:\r
+ case PT_YCbCr: return 3;\r
+\r
+ case PT_CMYK: return 4 ;\r
+ case PT_MCH2: return 2 ;\r
+ case PT_MCH3: return 3 ;\r
+ case PT_MCH4: return 4 ;\r
+ case PT_MCH5: return 5 ;\r
+ case PT_MCH6: return 6 ;\r
+ case PT_MCH7: return 7 ;\r
+ case PT_MCH8: return 8 ;\r
+ case PT_MCH9: return 9 ;\r
+ case PT_MCH10: return 10;\r
+ case PT_MCH11: return 11;\r
+ case PT_MCH12: return 12;\r
+ case PT_MCH13: return 12;\r
+ case PT_MCH14: return 14;\r
+ case PT_MCH15: return 15;\r
+\r
+ default:\r
+\r
+ FatalError("Unsupported color space of %d channels", ColorChannels);\r
+ return -1;\r
+ }\r
+}\r
+\r
+\r