jas_cmprof_t *jas_cmprof_createfromiccprof(jas_iccprof_t *iccprof)
{
jas_cmprof_t *prof;
jas_icchdr_t icchdr;
jas_cmpxformseq_t *fwdpxformseq;
jas_cmpxformseq_t *revpxformseq;
if (!(prof = jas_cmprof_create()))
goto error;
jas_iccprof_gethdr(iccprof, &icchdr);
if (!(prof->iccprof = jas_iccprof_copy(iccprof)))
goto error;
prof->clrspc = icctoclrspc(icchdr.colorspc, 0);
prof->refclrspc = icctoclrspc(icchdr.refcolorspc, 1);
prof->numchans = jas_clrspc_numchans(prof->clrspc);
prof->numrefchans = jas_clrspc_numchans(prof->refclrspc);
if (prof->numchans == 1) {
if (mono(prof->iccprof, 0, &fwdpxformseq))
goto error;
if (mono(prof->iccprof, 1, &revpxformseq))
goto error;
} else if (prof->numchans == 3) {
if (triclr(prof->iccprof, 0, &fwdpxformseq))
goto error;
if (triclr(prof->iccprof, 1, &revpxformseq))
goto error;
}
prof->pxformseqs[SEQFWD(0)] = fwdpxformseq;
prof->pxformseqs[SEQREV(0)] = revpxformseq;
#if 0
if (prof->numchans > 1) {
lut(prof->iccprof, 0, PER, &pxformseq);
pxformseqs_set(prof, SEQFWD(PER), pxformseq);
lut(prof->iccprof, 1, PER, &pxformseq);
pxformseqs_set(prof, SEQREV(PER), pxformseq);
lut(prof->iccprof, 0, CLR, &pxformseq);
pxformseqs_set(prof, SEQREV(CLR), pxformseq);
lut(prof->iccprof, 1, CLR, &pxformseq);
pxformseqs_set(prof, SEQREV(CLR), pxformseq);
lut(prof->iccprof, 0, SAT, &pxformseq);
pxformseqs_set(prof, SEQREV(SAT), pxformseq);
lut(prof->iccprof, 1, SAT, &pxformseq);
pxformseqs_set(prof, SEQREV(SAT), pxformseq);
}
#endif
return prof;
error:
return 0;
}
static jas_cmprof_t *jas_cmprof_createsycc()
{
jas_cmprof_t *prof;
jas_cmpxform_t *fwdpxform;
jas_cmpxform_t *revpxform;
jas_cmshapmat_t *fwdshapmat;
jas_cmshapmat_t *revshapmat;
int i;
int j;
if (!(prof = jas_cmprof_createfromclrspc(JAS_CLRSPC_SRGB)))
goto error;
prof->clrspc = JAS_CLRSPC_SYCBCR;
assert(prof->numchans == 3 && prof->numrefchans == 3);
assert(prof->refclrspc == JAS_CLRSPC_CIEXYZ);
if (!(fwdpxform = jas_cmpxform_createshapmat()))
goto error;
fwdpxform->numinchans = 3;
fwdpxform->numoutchans = 3;
fwdshapmat = &fwdpxform->data.shapmat;
fwdshapmat->mono = 0;
fwdshapmat->order = 0;
fwdshapmat->useluts = 0;
fwdshapmat->usemat = 1;
fwdshapmat->mat[0][0] = 1.0;
fwdshapmat->mat[0][1] = 0.0;
fwdshapmat->mat[0][2] = 1.402;
fwdshapmat->mat[1][0] = 1.0;
fwdshapmat->mat[1][1] = -0.34413;
fwdshapmat->mat[1][2] = -0.71414;
fwdshapmat->mat[2][0] = 1.0;
fwdshapmat->mat[2][1] = 1.772;
fwdshapmat->mat[2][2] = 0.0;
fwdshapmat->mat[0][3] = -0.5 * (1.402);
fwdshapmat->mat[1][3] = -0.5 * (-0.34413 - 0.71414);
fwdshapmat->mat[2][3] = -0.5 * (1.772);
if (!(revpxform = jas_cmpxform_createshapmat()))
goto error;
revpxform->numinchans = 3;
revpxform->numoutchans = 3;
revshapmat = &revpxform->data.shapmat;
revshapmat->mono = 0;
revshapmat->order = 1;
revshapmat->useluts = 0;
revshapmat->usemat = 1;
jas_cmshapmat_invmat(revshapmat->mat, fwdshapmat->mat);
for (i = 0; i < JAS_CMXFORM_NUMINTENTS; ++i) {
j = SEQFWD(i);
if (prof->pxformseqs[j]) {
if (jas_cmpxformseq_insertpxform(prof->pxformseqs[j], 0,
fwdpxform))
goto error;
}
j = SEQREV(i);
if (prof->pxformseqs[j]) {
if (jas_cmpxformseq_insertpxform(prof->pxformseqs[j],
-1, revpxform))
goto error;
}
}
jas_cmpxform_destroy(fwdpxform);
jas_cmpxform_destroy(revpxform);
return prof;
error:
return 0;
}
