RELOC_PTRS_END
/* Get the concrete space for a Separation space. */
static const gs_color_space *
gx_concrete_space_Separation(const gs_color_space * pcs,
const gs_imager_state * pis)
{
bool is_lab = false;
#ifdef DEBUG
/*
* Verify that the color space and imager state info match.
*/
if (pcs->id != pis->color_component_map.cspace_id)
dprintf("gx_concretze_space_Separation: color space id mismatch");
#endif
/*
* Check if we are using the alternate color space.
*/
if (pis->color_component_map.use_alt_cspace) {
/* Need to handle PS CIE space */
if (gs_color_space_is_PSCIE(pcs->base_space)) {
if (pcs->base_space->icc_equivalent == NULL) {
gs_colorspace_set_icc_equivalent(pcs->base_space,
&is_lab, pis->memory);
}
return (pcs->base_space->icc_equivalent);
}
return cs_concrete_space(pcs->base_space, pis);
}
/*
* Separation color spaces are concrete (when not using alt. color space).
*/
return pcs;
}
/*
* Return the concrete space to which this color space will map. If the
* ICCBased color space is being used in native mode, the concrete space
* will be dependent on the current color rendering dictionary, as it is
* for all CIE bases. If the alternate color space is being used, then
* this question is passed on to the appropriate method of that space.
*/
static const gs_color_space *
gx_concrete_space_CIEICC(const gs_color_space * pcs, const gs_imager_state * pis)
{
if (pcs->params.icc.picc_info->picc == NULL) {
const gs_color_space * pacs = pcs->base_space;
return cs_concrete_space(pacs, pis);
} else
return gx_concrete_space_CIE(NULL, pis);
}
static int
gx_remap_DeviceN(const gs_client_color * pcc, const gs_color_space * pcs,
gx_device_color * pdc, const gs_imager_state * pis, gx_device * dev,
gs_color_select_t select)
{
frac conc[GS_CLIENT_COLOR_MAX_COMPONENTS];
const gs_color_space *pconcs;
int i = pcs->type->num_components(pcs),k;
int code = 0;
const gs_color_space *pacs = pcs->base_space;
gs_client_color temp;
bool mapped = false;
if ( pcs->cmm_icc_profile_data != NULL && pis->color_component_map.use_alt_cspace) {
/* This is the case where we have placed a N-CLR source profile for
this color space */
if (pcs->cmm_icc_profile_data->devicen_permute_needed) {
for ( k = 0; k < i; k++) {
temp.paint.values[k] = pcc->paint.values[pcs->cmm_icc_profile_data->devicen_permute[k]];
}
code = pacs->type->remap_color(&temp, pacs, pdc, pis, dev, select);
} else {
code = pacs->type->remap_color(pcc, pacs, pdc, pis, dev, select);
}
return(code);
} else {
/* Check if we are doing any named color management. This check happens
regardless if we are doing the alternate tint transform or not. If
desired, that check could be made in gsicc_transform_named_color and
a decision made to return true or false */
if (pis->icc_manager->device_named != NULL) {
/* Try to apply the direct replacement */
mapped = gx_remap_named_color(pcc, pcs, pdc, pis, dev, select);
}
if (!mapped) {
code = (*pcs->type->concretize_color)(pcc, pcs, conc, pis, dev);
if (code < 0)
return code;
pconcs = cs_concrete_space(pcs, pis);
code = (*pconcs->type->remap_concrete_color)(conc, pconcs, pdc, pis, dev, select);
}
/* Save original color space and color info into dev color */
i = any_abs(i);
for (i--; i >= 0; i--)
pdc->ccolor.paint.values[i] = pcc->paint.values[i];
pdc->ccolor_valid = true;
return code;
}
}
static int
gx_remap_DeviceN(const gs_client_color * pcc, const gs_color_space * pcs,
gx_device_color * pdc, const gs_imager_state * pis, gx_device * dev,
gs_color_select_t select)
{
frac conc[GS_CLIENT_COLOR_MAX_COMPONENTS];
const gs_color_space *pconcs;
int i = pcs->type->num_components(pcs),k;
int code;
const gs_color_space *pacs = pcs->base_space;
gs_client_color temp;
if ( pcs->cmm_icc_profile_data != NULL && pis->color_component_map.use_alt_cspace) {
/* If needed, reorganize the data. The ICC colorants tag drives the
the laydown order */
if (pcs->cmm_icc_profile_data->devicen_permute_needed) {
for ( k = 0; k < i; k++) {
temp.paint.values[k] = pcc->paint.values[pcs->cmm_icc_profile_data->devicen_permute[k]];
}
code = pacs->type->remap_color(&temp, pacs, pdc, pis, dev, select);
} else {
code = pacs->type->remap_color(pcc, pacs, pdc, pis, dev, select);
}
return(code);
} else {
code = (*pcs->type->concretize_color)(pcc, pcs, conc, pis, dev);
if (code < 0)
return code;
pconcs = cs_concrete_space(pcs, pis);
code = (*pconcs->type->remap_concrete_color)(conc, pconcs, pdc, pis, dev, select);
/* Save original color space and color info into dev color */
i = any_abs(i);
for (i--; i >= 0; i--)
pdc->ccolor.paint.values[i] = pcc->paint.values[i];
pdc->ccolor_valid = true;
return code;
}
}
/* Remap a DeviceN color. */
static const gs_color_space *
gx_concrete_space_DeviceN(const gs_color_space * pcs,
const gs_imager_state * pis)
{
#ifdef DEBUG
/*
* Verify that the color space and imager state info match.
*/
if (pcs->id != pis->color_component_map.cspace_id)
dprintf("gx_concrete_space_DeviceN: color space id mismatch");
#endif
/*
* Check if we are using the alternate color space.
*/
if (pis->color_component_map.use_alt_cspace) {
return cs_concrete_space(pcs->base_space, pis);
}
/*
* DeviceN color spaces are concrete (when not using alt. color space).
*/
return pcs;
}
int
gs_begin_transparency_group(gs_state *pgs,
const gs_transparency_group_params_t *ptgp,
const gs_rect *pbbox)
{
gs_pdf14trans_params_t params = { 0 };
const gs_color_space *blend_color_space;
gs_imager_state * pis = (gs_imager_state *)pgs;
cmm_profile_t *profile;
if (check_for_nontrans_pattern(pgs,
(unsigned char *)"gs_begin_transparency_group")) {
return(0);
}
/*
* Put parameters into a compositor parameter and then call the
* create_compositor. This will pass the data to the PDF 1.4
* transparency device.
*/
params.pdf14_op = PDF14_BEGIN_TRANS_GROUP;
params.Isolated = ptgp->Isolated;
params.Knockout = ptgp->Knockout;
params.image_with_SMask = ptgp->image_with_SMask;
params.opacity = pgs->opacity;
params.shape = pgs->shape;
params.blend_mode = pgs->blend_mode;
/* This function is called during the c-list writer side.
Store some information so that we know what the color space is
so that we can adjust according later during the clist reader.
We currently will use the concrete space for any space other than a
device space. However, if the device is a sep device it will blend
in DeviceN color space as required. */
blend_color_space = gs_currentcolorspace_inline(pgs);
if (gs_color_space_get_index(blend_color_space) > gs_color_space_index_DeviceCMYK) {
/* ICC and PS CIE based case. Note that unidirectional PS CIE color
spaces should not be allowed but end up occuring when processing
PDF files with -dUseCIEColor. We will end up using the appropriate
ICC default color space in these cases. */
blend_color_space = gs_currentcolorspace_inline(pgs);
} else {
blend_color_space = cs_concrete_space(blend_color_space, pis);
}
/* Note that if the /CS parameter was NOT present in the push
of the transparency group, then we must actually inherent
the previous group color space, or the color space of the
target device (process color model). Here we just want
to set it as a unknown type for clist writing, as we will take care
of using the parent group color space later during clist reading.
Also, if the group was not isolated we MUST use the parent group
color space regardless of what the group color space is specified to be
*/
if (ptgp->ColorSpace == NULL || params.Isolated != true) {
params.group_color = UNKNOWN;
params.group_color_numcomps = 0;
} else {
/* The /CS parameter was present. Use what was set. Currently
all our Device spaces are actually ICC based. The other options
are if -dUseCIEColor is set, in which case it could be
coming in as a PS CIE color space, which should not be allowed
but should default to one of the default ICC color spaces. Note
that CalRGB and CalGray, which are valid bidirectional color spaces
are converted to ICC profiles during installation. PS CIE building
to ICC is delayed. */
if ( gs_color_space_is_ICC(blend_color_space) ) {
/* Blending space is ICC based. If we are doing c-list rendering
we will need to write this color space into the clist.
*/
params.group_color = ICC;
params.group_color_numcomps =
blend_color_space->cmm_icc_profile_data->num_comps;
/* Get the ICC profile */
params.iccprofile = blend_color_space->cmm_icc_profile_data;
params.icc_hash = blend_color_space->cmm_icc_profile_data->hashcode;
} else {
/* Color space was NOT ICC based. PS CIE space and DeviceN are the only
other option. Use the ICC default based upon the component count. */
switch (cs_num_components(blend_color_space)) {
case 1:
profile = pgs->icc_manager->default_gray;
break;
case 3:
profile = pgs->icc_manager->default_rgb;
break;
case 4:
profile = pgs->icc_manager->default_cmyk;
break;
default:
/* We can end up here if we are in a deviceN color space and
we have a sep output device */
profile = NULL;
params.group_color = DEVICEN;
params.group_color_numcomps = cs_num_components(blend_color_space);
break;
}
if (profile != NULL) {
params.group_color = ICC;
params.group_color_numcomps = profile->num_comps;
params.iccprofile = profile;
params.icc_hash = profile->hashcode;
}
}
}
#ifdef DEBUG
if (gs_debug_c('v')) {
static const char *const cs_names[] = {
GS_COLOR_SPACE_TYPE_NAMES
};
dmlprintf6(pgs->memory, "[v](0x%lx)begin_transparency_group [%g %g %g %g] Num_grp_clr_comp = %d\n",
(ulong)pgs, pbbox->p.x, pbbox->p.y, pbbox->q.x, pbbox->q.y,params.group_color_numcomps);
if (ptgp->ColorSpace)
dmprintf1(pgs->memory, " CS = %s",
cs_names[(int)gs_color_space_get_index(ptgp->ColorSpace)]);
else
dmputs(pgs->memory, " (no CS)");
dmprintf2(pgs->memory, " Isolated = %d Knockout = %d\n",
ptgp->Isolated, ptgp->Knockout);
}
#endif
params.bbox = *pbbox;
return gs_state_update_pdf14trans(pgs, ¶ms);
}