uint16_t * oyProfileGetWhitePointRamp( int width,
oyProfile_s * p,
oyOptions_s * options )
{
uint16_t * ramp = calloc( sizeof(uint16_t), width*3);
oyImage_s * input = oyImage_Create( width, 1, ramp, OY_TYPE_123_16, p, 0 );
oyImage_s * output = oyImage_Create( width, 1, ramp, OY_TYPE_123_16, p, 0 );
int i,j, error, mul = 65536/width;
oyConversion_s * cc = oyConversion_CreateBasicPixels( input, output, options, NULL);
for(i = 0; i < width; ++i)
{
for(j = 0; j < 3; ++j)
ramp[i*3 + j] = i * mul;
}
if(getenv("OY_DEBUG_WRITE"))
oyImage_WritePPM( input, "wtpt-effect-raw.ppm", "unaltered gray ramp" );
oyConversion_Correct( cc, "//" OY_TYPE_STD "/icc_color", 0, NULL);
error = oyConversion_RunPixels( cc, 0 );
if(error)
oyMessageFunc_p( oyMSG_WARN,(oyStruct_s*)p, OY_DBG_FORMAT_
"found issue while converting ramp: %d", OY_DBG_ARGS_, error );
if(getenv("OY_DEBUG_WRITE"))
{
oyFilterGraph_s * cc_graph = oyConversion_GetGraph( cc );
oyFilterNode_s * icc = oyFilterGraph_GetNode( cc_graph, -1, "///icc_color", 0 );
char * comment = oyjlStringCopy("gray ramp", oyAllocateFunc_);
const char * ndesc = oyFilterNode_GetText( icc, oyNAME_NAME );
oyjlStringAdd( &comment, oyAllocateFunc_, oyDeAllocateFunc_, "\n%s", ndesc );
oyImage_WritePPM( input, "wtpt-effect-gray.ppm", comment );
oyFree_m_(comment);
oyFilterGraph_Release( &cc_graph );
oyFilterNode_Release( &icc );
}
oyImage_Release( &input );
oyImage_Release( &output );
return ramp;
}
/**
* @internal
* Function: oyColorConvert_
* @memberof oyNamedColor_s
* @brief convert colors
*
* The options are passed to oyConversion_CreateBasicPixels();
* The function does the lookups for the profiles and the modules contexts
* in the Oyranos cache on the fly. The allocated oyImage_s and
* oyConversion_s structures are not cheap as they are not cached.
*
* @version Oyranos: 0.1.11
* @since 2007/12/23 (Oyranos: 0.1.8)
* @date 2010/09/10
*/
int oyColorConvert_ ( oyProfile_s * p_in,
oyProfile_s * p_out,
oyPointer buf_in,
oyPointer buf_out,
oyDATATYPE_e buf_type_in,
oyDATATYPE_e buf_type_out,
oyOptions_s * options,
int count )
{
oyImage_s * in = NULL,
* out = NULL;
oyConversion_s * conv = NULL;
int error = 0;
in = oyImage_Create( count, 1,
buf_in ,
oyChannels_m(oyProfile_GetChannelsCount(p_in)) |
oyDataType_m(buf_type_in),
p_in,
0 );
out = oyImage_Create( count, 1,
buf_out ,
oyChannels_m(oyProfile_GetChannelsCount(p_out)) |
oyDataType_m(buf_type_out),
p_out,
0 );
conv = oyConversion_CreateBasicPixels( in,out, options, 0 );
error = oyConversion_RunPixels( conv, 0 );
oyConversion_Release( &conv );
oyImage_Release( &in );
oyImage_Release( &out );
return error;
}
int oyProfile_CreateEffectVCGT ( oyProfile_s * prof )
{
int error = 0;
/* 2. get user effect profile and display white point effect */
/* 2.1. get effect profile and decide if it can be embedded into a VGCT tag */
oyOptions_s * module_options = NULL;
error = oyAddLinearDisplayEffect( &module_options );
if(error)
oyMessageFunc_p( oyMSG_WARN,(oyStruct_s*)prof, OY_DBG_FORMAT_
"No display effect for monitor profile %d",
OY_DBG_ARGS_,
error );
/* 2.2. get the display white point effect */
error = oyProfileAddWhitePointEffect( prof, &module_options );
if(error)
oyMessageFunc_p( oyMSG_WARN,(oyStruct_s*)prof, OY_DBG_FORMAT_
"No white for monitor profile %d",
OY_DBG_ARGS_,
error );
/* 3. extract a existing VCGT */
int width = 256;
uint16_t * vcgt = oyProfile_GetVCGT( prof, &width );
oyImage_s * img;
if(vcgt && getenv("OY_DEBUG_WRITE"))
{
img = oyImage_Create( width, 1, vcgt, OY_TYPE_123_16, prof, 0 );
oyImage_WritePPM( img, "wtpt-vcgt.ppm", "vcgt ramp" );
oyImage_Release( &img );
}
/* 4. create conversion, fill ramp and convert */
uint16_t * ramp = oyProfileGetWhitePointRamp( width, prof, module_options );
if(ramp && getenv("OY_DEBUG_WRITE"))
{
img = oyImage_Create( width, 1, ramp, OY_TYPE_123_16, prof, 0 );
oyImage_WritePPM( img, "wtpt-effect.ppm", "white point ramp" );
oyImage_Release( &img );
}
/* 5. mix the two ramps */
uint16_t * mix = NULL;
if(vcgt)
mix = calloc( sizeof(uint16_t), width*3);
int i,j;
if(mix)
for(i = 0; i < width; ++i)
for(j = 0; j < 3; ++j)
{
uint16_t v = oyLinInterpolateRampU16c( ramp, width, j, 3, (double)i/(double)width );
double vd = v / 65535.0;
mix[i*3+j] = OY_ROUNDp( oyLinInterpolateRampU16c( vcgt, width, j,3, vd ) );
}
if(mix && getenv("OY_DEBUG_WRITE"))
{
img = oyImage_Create( width, 1, mix, OY_TYPE_123_16, prof, 0 );
oyImage_WritePPM( img, "wtpt-mix.ppm", "white point + vcgt" );
oyImage_Release( &img );
}
/* 6. create a new VCGT tag and exchange the tag */
if((mix || ramp) && oyProfile_SetVCGT( prof, mix?mix:ramp, width ))
{
oyMessageFunc_p( oyMSG_WARN,(oyStruct_s*)prof, OY_DBG_FORMAT_
"Alter VCGT tag failed",
OY_DBG_ARGS_ );
error = 1;
}
if(mix) oyDeAllocateFunc_(mix);
if(ramp) oyDeAllocateFunc_(ramp);
if(vcgt) oyDeAllocateFunc_(vcgt);
return error;
}
void ColorContext::setupColorLookupTable(bool advanced)
{
kDebug() << m_outputName;
oyProfile_s *dummyProfile = 0;
oyOptions_s *options = 0;
if (!m_dstProfile)
m_dstProfile = dummyProfile = oyProfile_FromStd(oyASSUMED_WEB, icc_profile_flags, 0);
/* skip dummyProfile to dummyProfile conversion */
if (!m_srcProfile && dummyProfile) {
if (dummyProfile)
oyProfile_Release(&dummyProfile);
return;
}
if (!m_srcProfile) {
m_srcProfile = oyProfile_FromStd(oyASSUMED_WEB, icc_profile_flags, 0);
if (!m_srcProfile) {
kError() << "Output" << m_outputName << ":" << "no assumed dummyProfile source profile";
kWarning() << "Output" << m_outputName << "using dummy clut";
buildDummyClut(m_clut);
return;
}
}
int error = 0;
int flags = 0;
// Optionally set advanced options from Oyranos
if (advanced)
flags = oyOPTIONATTRIBUTE_ADVANCED;
// Allocate memory for clut data
m_clut.resize(CLUT_ELEMENT_COUNT);
kDebug() << "Color conversion for" << m_outputName << "flags" << flags << (advanced ? "advanced" : "");
oyImage_s *imageIn = oyImage_Create(
LUT_GRID_POINTS,
LUT_GRID_POINTS * LUT_GRID_POINTS,
m_clut.data(),
OY_TYPE_123_16,
m_srcProfile,
0);
oyImage_s *imageOut = oyImage_Create(
LUT_GRID_POINTS,
LUT_GRID_POINTS * LUT_GRID_POINTS,
m_clut.data(),
OY_TYPE_123_16,
m_dstProfile,
0);
oyConversion_s *conversion = oyConversion_CreateBasicPixels(imageIn, imageOut, options, 0);
if (!conversion) {
kWarning() << "No conversion created for" << m_outputName;
if (dummyProfile)
oyProfile_Release(&dummyProfile);
return;
}
oyOptions_Release(&options);
error = oyOptions_SetFromText(&options, "//"OY_TYPE_STD"/config/display_mode", "1", OY_CREATE_NEW);
if (error) {
kWarning() << "Oy options error:" << error;
if (dummyProfile)
oyProfile_Release(&dummyProfile);
return;
}
error = oyConversion_Correct(conversion, "//"OY_TYPE_STD"/icc", flags, options);
if (error) {
kWarning() << "Failed to correct conversion for" << m_outputName << "flags" << flags;
if (dummyProfile)
oyProfile_Release(&dummyProfile);
return;
}
oyFilterGraph_s *conversionGraph = oyConversion_GetGraph(conversion);
oyFilterNode_s *iccNode = oyFilterGraph_GetNode(conversionGraph, -1, "///icc", 0);
// See what to search for in the cache
QByteArray entryText;
const char *t = oyFilterNode_GetText(iccNode, oyNAME_NAME);
if (t)
entryText = t;
oyStructList_s *cache = Display::getInstance()->cache();
oyHash_s *entry = oyStructList_GetHash(cache, 0, entryText.constData());
oyArray2d_s *oyClut = (oyArray2d_s*) oyHash_GetPointer(entry, oyOBJECT_ARRAY2D_S);
char ** array2d = (char**)oyArray2d_GetData( oyClut );
oyFilterNode_Release(&iccNode);
oyFilterGraph_Release(&conversionGraph);
if (oyClut) {
// Found in cache
kDebug() << "clut" << oyClut << "obtained from cache using entry" << entryText;
memcpy(m_clut.data(), array2d[0], CLUT_DATA_SIZE);
} else {
kDebug() << "clut not found in cache using entry" << entryText << ", doing conversion";
// Create dummy / identity clut data for conversion input
buildDummyClut(m_clut);
// Do conversion
error = oyConversion_RunPixels(conversion, 0);
if (error) {
kWarning() << "Output" << m_outputName << "Error" << error << "in conversion run pixels";
if (dummyProfile)
oyProfile_Release(&dummyProfile);
return;
}
// Save to cache
oyClut = oyArray2d_Create(
NULL,
LUT_GRID_POINTS * 3,
LUT_GRID_POINTS * LUT_GRID_POINTS,
oyUINT16,
NULL);
array2d = (char**)oyArray2d_GetData( oyClut );
memcpy(array2d[0], m_clut.data(), CLUT_DATA_SIZE);
oyHash_SetPointer(entry, (oyStruct_s*) oyClut);
}
oyOptions_Release(&options);
oyImage_Release(&imageIn);
oyImage_Release(&imageOut);
oyConversion_Release(&conversion);
if (!m_dstProfile)
kDebug() << "Output" << m_outputName << "no profile";
}
