memlink.c File Reference

#include "General.h"
#include "MemLink.h"
#include <time.h>

Go to the source code of this file.

Defines
#define	CMHelperICC2int16Const(a, b)   (*((UINT16 *)(a))) = (UINT16)(b);
#define	CMHelperICC2int32Const(a, b)   (*((UINT32 *)(a))) = (UINT32)(b);
#define	Round(a)   (((a)>0.)?((a)+.5):((a)-.5))
#define	MyTagCount   9
#define	MyTagCountLink   5
#define	LINK_BUFFER_MAX   3000
Functions
CMError	MyAdd_NL_Header (UINT32 theSize, icHeader *linkHeader, UINT32 aIntent, UINT32 aClass, UINT32 aColorSpace, UINT32 aConnectionSpace)
CMError	MyAdd_NL_HeaderMS (UINT32 theSize, icHeader *linkHeader, unsigned long aIntent, icColorSpaceSignature sCS, icColorSpaceSignature dCS)
CMError	MyAdd_NL_DescriptionTag (LHTextDescriptionType *descPtr, unsigned char *theText)
CMError	MyAdd_NL_ColorantTag (icXYZType *descPtr, MyXYZNumber *aColor)
CMError	MyAdd_NL_CurveTag (icCurveType *descPtr, unsigned short Gamma)
CMError	MyAdd_NL_CopyrightTag (unsigned char *copyrightText, LHTextType *aLHTextType)
CMError	Fill_mft1_InputTable (Ptr theElut, icLut8 *lutPtr, CMMModelPtr modelData)
CMError	Fill_mft1_OutputTable (Ptr theAlut, icLut8 *lutPtr, long offset, CMMModelPtr modelData)
CMError	Fill_mft2_InputTable (Ptr theElut, icLut16 *lutPtr, CMMModelPtr modelData)
CMError	Fill_mft2_OutputTable (Ptr theAlut, icLut16 *lutPtr, long offset, CMMModelPtr modelData)
CMError	Fill_mft2_ColorTable (Ptr theClut, icLut16 *lutPtr, long offset, long count)
CMError	MyAdd_NL_AToB0Tag_mft1 (CMMModelPtr cw, icLut8Type *lutPtr, long colorLutSize)
UINT32	GetSizes (CMMModelPtr cw, UINT32 *clutSize)
CMError	MyAdd_NL_AToB0Tag_mft2 (CMMModelPtr cw, icLut16Type *lutPtr, long colorLutSize)
CMError	MyGetColorSpaces (CMConcatProfileSet *profileSet, UINT32 *sCS, UINT32 *dCS)
CMError	MyAdd_NL_SequenceDescTag (CMConcatProfileSet *profileSet, icProfileSequenceDescType *pSeqPtr, long *aSize)
MyXYZNumber	MakeXYZNumber (MyXYZNumber *x)
void	MakeMyDoubleXYZ (MyXYZNumber *x, MyDoubleXYZ *ret)
Boolean	doubMatrixInvert (double inpMat[3][3], double outMat[3][3])
void	TransposeMatrix (double inpMat[3][3])
double	GetMatrixedVal (double m[3][3], long color, MyDoubleXYZ *aXYZ)
void	NormalizeColor (MyXYZNumber *r, MyXYZNumber *g, MyXYZNumber *b, MyDoubleXYZ *Illuminant, MyXYZNumber *resR, MyXYZNumber *resG, MyXYZNumber *resB)
void	NormalizeWithWhiteAdaption (MyXYZNumber *r, MyXYZNumber *g, MyXYZNumber *b, MyDoubleXYZ *Illuminant, MyXYZNumber *resR, MyXYZNumber *resG, MyXYZNumber *resB)
CMError	DeviceLinkFill (CMMModelPtr cw, CMConcatProfileSet *profileSet, icProfile **theProf, unsigned long aIntent)

---

Define Documentation

#define CMHelperICC2int16Const (  a, b   )     (*((UINT16 *)(a))) = (UINT16)(b);

Definition at line 41 of file w98/lh_core/memlink.c.

#define CMHelperICC2int32Const (  a, b   )     (*((UINT32 *)(a))) = (UINT32)(b);

Definition at line 43 of file w98/lh_core/memlink.c.

#define LINK_BUFFER_MAX   3000

Definition at line 1280 of file w98/lh_core/memlink.c.

#define MyTagCount   9

Definition at line 942 of file w98/lh_core/memlink.c.

#define MyTagCountLink   5

Definition at line 1279 of file w98/lh_core/memlink.c.

#define Round (  a   )     (((a)>0.)?((a)+.5):((a)-.5))

Definition at line 864 of file w98/lh_core/memlink.c.

---

Function Documentation

CMError DeviceLinkFill (  CMMModelPtr  cw, CMConcatProfileSet *  profileSet, icProfile **  theProf, unsigned long  aIntent )

Definition at line 1282 of file w98/lh_core/memlink.c. References BlockMove(), CMError, CMHelperICC2int32Const, CMMModelPtr, cmProfileError, icTagList::count, DisposeIfPtr(), GetSizes(), icSigAToB0Tag, icSigCopyrightTag, icSigLinkClass, icSigMediaWhitePointTag, icSigProfileDescriptionTag, icSigProfileSequenceDescTag, LINK_BUFFER_MAX, MyAdd_NL_AToB0Tag_mft1(), MyAdd_NL_AToB0Tag_mft2(), MyAdd_NL_ColorantTag(), MyAdd_NL_CopyrightTag(), MyAdd_NL_DescriptionTag(), MyAdd_NL_Header(), MyAdd_NL_SequenceDescTag(), MyGetColorSpaces(), MyTagCountLink, noErr, NoNamedColorProfile, icTag::offset, OSErr, OSType, Ptr, icTag::sig, icTag::size, SmartNewPtr(), SmartNewPtrClear(), icProfile::tagList, icTagList::tags, UINT32, unimpErr, and WriteProf(). { CMError err = unimpErr; OSErr aOSerr = unimpErr; #ifdef __MWERKS__ unsigned char theText[] = "\pDeviceLink profile "; char copyrightText[] = "\p©1996 by Heidelberger Druckmaschinen AG U.J.K."; #elif __IS_MSDOS char theText[] = "\030DeviceLink profile "; char copyrightText[] = "\060©1996 by Heidelberger Druckmaschinen AG U.J.K."; #else char theText[] = "\030DeviceLink profile "; char copyrightText[] = "\060©1996 by Heidelberger Druckmaschinen AG U.J.K."; #endif icProfile *aProf=0; long theTagTabSize; long theHeaderSize; long theDescSize; long theMediaSize; long theSequenceDescSize; long theA2B0Size; long theCopyRightSize; long currentSize=0; long theTotalSize=0; icTag aTag; UINT32 sCS,dCS,clutSize; Ptr aPtr=0; MyDoubleXYZ D50XYZ = { 0.9642, 1.0000, 0.8249 }; MyXYZNumber D50 = { (unsigned long)(0.9642 * 65536), (unsigned long)(1.0000 * 65536), (unsigned long)(0.8249 * 65536)}; theHeaderSize = sizeof(icHeader); theDescSize = sizeof(OSType) /* type descriptor */ + sizeof(unsigned long) /* reserved */ + sizeof(unsigned long) /* ASCII length */ + theText[0] /* ASCII profile description */ + sizeof(unsigned long) /* Unicode code */ + sizeof(unsigned long) /* Unicode character count */ + sizeof(unsigned short) /* Macintosh script code */ + sizeof(unsigned char) /* Macintosh string length */ + 67 /* Macintosh string */ ; theCopyRightSize = sizeof(OSType) /* type descriptor */ + sizeof(unsigned long) /* reserved */ + copyrightText[0] /* ASCII profile description */ ; theMediaSize = sizeof( icXYZType );; theTagTabSize = MyTagCountLink * sizeof( icTag ) + sizeof( unsigned long ); *theProf = 0; if( cw->hasNamedColorProf != NoNamedColorProfile ){ err = cmProfileError; goto CleanupAndExit; } err = MyGetColorSpaces( profileSet, &sCS, &dCS ); if (err) goto CleanupAndExit; aProf = (icProfile *)SmartNewPtrClear( LINK_BUFFER_MAX, &aOSerr ); err = aOSerr; if (err) goto CleanupAndExit; err = MyAdd_NL_Header(theTotalSize, (icHeader*)((Ptr)aProf+currentSize), aIntent, icSigLinkClass, sCS, dCS ); if (err) goto CleanupAndExit; /*----------------------------------------------------------------------------------------- cmProfileDescriptionTag */ currentSize = theHeaderSize + theTagTabSize; CMHelperICC2int32Const(&(aProf->tagList.count ), MyTagCountLink); CMHelperICC2int32Const(&(aTag.sig ), icSigProfileDescriptionTag); CMHelperICC2int32Const(&(aTag.offset ), currentSize); CMHelperICC2int32Const(&(aTag.size ), theDescSize); aProf->tagList.tags[0] = aTag; err =MyAdd_NL_DescriptionTag ( (LHTextDescriptionType *)((Ptr)aProf+currentSize), (unsigned char *)theText ); if (err) goto CleanupAndExit; currentSize += theDescSize; currentSize = ( currentSize + 3 ) & ~ 3; CMHelperICC2int32Const(&(aTag.sig ), icSigMediaWhitePointTag); CMHelperICC2int32Const(&(aTag.offset ), currentSize ); CMHelperICC2int32Const(&(aTag.size ), theMediaSize); aProf->tagList.tags[1] = aTag; MyAdd_NL_ColorantTag((icXYZType *)((Ptr)aProf+currentSize), &D50); currentSize += theMediaSize; currentSize = ( currentSize + 3 ) & ~ 3; CMHelperICC2int32Const(&(aTag.sig ), icSigCopyrightTag); CMHelperICC2int32Const(&(aTag.offset ), currentSize ); CMHelperICC2int32Const(&(aTag.size ), theCopyRightSize); aProf->tagList.tags[2] = aTag; err = MyAdd_NL_CopyrightTag( (unsigned char *)copyrightText, (LHTextType *)((Ptr)aProf+currentSize)); if (err) goto CleanupAndExit; currentSize += theCopyRightSize; currentSize = ( currentSize + 3 ) & ~ 3; err = MyAdd_NL_SequenceDescTag( profileSet, (icProfileSequenceDescType *)((Ptr)aProf+currentSize), &theSequenceDescSize ); CMHelperICC2int32Const(&(aTag.sig ), icSigProfileSequenceDescTag); CMHelperICC2int32Const(&(aTag.offset ), currentSize ); CMHelperICC2int32Const(&(aTag.size ), theSequenceDescSize); aProf->tagList.tags[3] = aTag; currentSize += theSequenceDescSize; currentSize = ( currentSize + 3 ) & ~ 3; theA2B0Size = GetSizes( (CMMModelPtr)cw, &clutSize ); CMHelperICC2int32Const(&(aTag.sig ), icSigAToB0Tag); CMHelperICC2int32Const(&(aTag.offset ), currentSize ); CMHelperICC2int32Const(&(aTag.size ), theA2B0Size); aProf->tagList.tags[4] = aTag; #if __IS_MSDOS aPtr = GlobalAllocPtr( GHND, theA2B0Size+currentSize ); if( aPtr == 0 ){ err = GetLastError(); goto CleanupAndExit; } #else aPtr = SmartNewPtr( theA2B0Size+currentSize, &aOSerr ); err = aOSerr; if( err ){ goto CleanupAndExit; } #endif if ( cw->lutParam.colorLutWordSize == 8 ) err = MyAdd_NL_AToB0Tag_mft1( (CMMModelPtr)cw, (icLut8Type *)(aPtr+currentSize), clutSize ); else err = MyAdd_NL_AToB0Tag_mft2( (CMMModelPtr)cw, (icLut16Type *)(aPtr+currentSize), clutSize ); if (err) goto CleanupAndExit; BlockMove( (Ptr)aProf, aPtr, currentSize ); aProf = (icProfile *)DisposeIfPtr( (Ptr)aProf ); CMHelperICC2int32Const( aPtr, theA2B0Size+currentSize ); *theProf = (icProfile *)aPtr; #ifdef WRITE_PROFILE WriteProf( "DeviceLinkFill.pf", (icProfile *)aPtr, theA2B0Size+currentSize ); #endif return noErr; CleanupAndExit: *theProf = (icProfile *)DisposeIfPtr( (Ptr)aProf ); #if __IS_MSDOS if( aPtr )GlobalFreePtr( aPtr ); #else aPtr = DisposeIfPtr( (Ptr)aPtr ); #endif return err; }

Boolean doubMatrixInvert (  double  inpMat[3][3], double  outMat[3][3] )

Definition at line 389 of file lh_core/fragment.c. References Boolean, CMError, FALSE, LH_END_PROC, LH_START_PROC, noErr, and TRUE. Referenced by CombiMatrix(), Extract_TRC_Matrix(), MakeGamut16or32ForMonitor(), and NormalizeWithWhiteAdaption(). { double detm, hilf1, hilf2, hilf3, hilf4, hilf5, hilf6; double *a; Boolean success = TRUE; #ifdef DEBUG_OUTPUT CMError err=noErr; #endif LH_START_PROC("doubMatrixInvert") a = (double *)MatHin; hilf1 = a[0] * a[4]; hilf2 = a[1] * a[5]; hilf3 = a[2] * a[3]; hilf4 = a[2] * a[4]; hilf5 = a[1] * a[3]; hilf6 = a[0] * a[5]; detm = hilf1 * a[8] + hilf2 * a[6] + hilf3 * a[7] - hilf4 * a[6] - hilf5 * a[8] - hilf6 * a[7]; /* if(fabs(detm) < 1.E-9) */ if ( (detm < 1.E-9) && (detm > -1.E-9) ) success = FALSE; else { detm = 1. / detm; MatRueck[0][0] = (a[4] * a[8] - a[5] * a[7]) * detm; MatRueck[0][1] = (a[7] * a[2] - a[8] * a[1]) * detm; MatRueck[0][2] = (hilf2 - hilf4 ) * detm; MatRueck[1][0] = (a[5] * a[6] - a[3] * a[8]) * detm; MatRueck[1][1] = (a[8] * a[0] - a[6] * a[2]) * detm; MatRueck[1][2] = (hilf3 - hilf6 ) * detm; MatRueck[2][0] = (a[3] * a[7] - a[4] * a[6]) * detm; MatRueck[2][1] = (a[6] * a[1] - a[7] * a[0]) * detm; MatRueck[2][2] = (hilf1 - hilf5 ) * detm; } LH_END_PROC("doubMatrixInvert") return(success); }

CMError Fill_mft1_InputTable (  Ptr  theElut, icLut8 *  lutPtr, CMMModelPtr  modelData )

Referenced by MyAdd_NL_AToB0Tag_mft1().

CMError Fill_mft1_OutputTable (  Ptr  theAlut, icLut8 *  lutPtr, long  offset, CMMModelPtr  modelData )

Referenced by MyAdd_NL_AToB0Tag_mft1().

CMError Fill_mft2_ColorTable (  Ptr  theClut, icLut16 *  lutPtr, long  offset, long  count )

Referenced by MyAdd_NL_AToB0Tag_mft2().

CMError Fill_mft2_InputTable (  Ptr  theElut, icLut16 *  lutPtr, CMMModelPtr  modelData )

Referenced by MyAdd_NL_AToB0Tag_mft2().

CMError Fill_mft2_OutputTable (  Ptr  theAlut, icLut16 *  lutPtr, long  offset, CMMModelPtr  modelData )

Referenced by MyAdd_NL_AToB0Tag_mft2().

double GetMatrixedVal (  double  m[3][3], long  color, MyDoubleXYZ *  aXYZ )

Referenced by NormalizeWithWhiteAdaption().

UINT32 GetSizes (  CMMModelPtr  cw, UINT32 *  clutSize )

void MakeMyDoubleXYZ (  MyXYZNumber *  x, MyDoubleXYZ *  ret )

MyXYZNumber MakeXYZNumber (  MyXYZNumber *  x  )

CMError MyAdd_NL_AToB0Tag_mft1 (  CMMModelPtr  cw, icLut8Type *  lutPtr, long  colorLutSize )

Definition at line 522 of file w98/lh_core/memlink.c. References icLut8Type::base, BlockMoveData, icLut8::clutPoints, CMError, CMHelperICC2int32Const, icLut8::data, DATA_2_PTR, DebugPrint, icLut8::e00, icLut8::e01, icLut8::e02, icLut8::e10, icLut8::e11, icLut8::e12, icLut8::e20, icLut8::e21, icLut8::e22, Fill_mft1_InputTable(), Fill_mft1_OutputTable(), icSigLut8Type, icLut8::inputChan, LH_END_PROC, LH_START_PROC, LOCK_DATA, icLut8Type::lut, OSType, icLut8::outputChan, Ptr, UINT16, UINT8, and UNLOCK_DATA. Referenced by DeviceLinkFill(), and MyNewDeviceLinkFill(). { CMError err; icLut8 *tempLutPtr; long offset; UINT16 inputChannels; UINT16 outputChannels; UINT16 gridPoints; LH_START_PROC("Add_NL_AToB0Tag_mft1") LOCK_DATA(cw->lutParam.inputLut); LOCK_DATA(cw->lutParam.colorLut); LOCK_DATA(cw->lutParam.outputLut); inputChannels = (UINT16)cw->lutParam.colorLutInDim; outputChannels = (UINT16)cw->lutParam.colorLutOutDim; gridPoints = (UINT16)cw->lutParam.colorLutGridPoints; tempLutPtr = &lutPtr->lut; CMHelperICC2int32Const(&(lutPtr->base ), icSigLut8Type); CMHelperICC2int32Const((OSType*)&(lutPtr->base )+1, 0); tempLutPtr->inputChan = (UINT8)inputChannels; tempLutPtr->outputChan = (UINT8)outputChannels; tempLutPtr->clutPoints = (UINT8)gridPoints; tempLutPtr->e00 = tempLutPtr->e01 = tempLutPtr->e02 = 0; tempLutPtr->e10 = tempLutPtr->e11 = tempLutPtr->e12 = 0; tempLutPtr->e20 = tempLutPtr->e21 = tempLutPtr->e22 = 0; CMHelperICC2int32Const(&(tempLutPtr->e00 ), 0x10000); CMHelperICC2int32Const(&(tempLutPtr->e11 ), 0x10000); CMHelperICC2int32Const(&(tempLutPtr->e22 ), 0x10000); err = Fill_mft1_InputTable((Ptr)DATA_2_PTR(cw->lutParam.inputLut), tempLutPtr, cw); if (err) goto CleanupAndExit; offset = 256 * inputChannels; BlockMoveData( DATA_2_PTR(cw->lutParam.colorLut), & tempLutPtr->data[0] + offset, colorLutSize); offset = offset + colorLutSize; err = Fill_mft1_OutputTable((Ptr)DATA_2_PTR(cw->lutParam.outputLut), tempLutPtr, offset, cw); if (err) goto CleanupAndExit; CleanupAndExit: #ifdef DEBUG_OUTPUT if ( err ) DebugPrint("¥ MyAdd_NL_AToB0Tag_mft1-Error: result = %d\n",err); #endif UNLOCK_DATA(cw->lutParam.inputLut); UNLOCK_DATA(cw->lutParam.colorLut); UNLOCK_DATA(cw->lutParam.outputLut); LH_END_PROC("Add_NL_AToB0Tag_mft1") return err; }

CMError MyAdd_NL_AToB0Tag_mft2 (  CMMModelPtr  cw, icLut16Type *  lutPtr, long  colorLutSize )

Definition at line 620 of file w98/lh_core/memlink.c. References icLut16Type::base, icLut16::clutPoints, CMError, CMHelperICC2int16Const, CMHelperICC2int32Const, DATA_2_PTR, DebugPrint, icLut16::e00, icLut16::e01, icLut16::e02, icLut16::e10, icLut16::e11, icLut16::e12, icLut16::e20, icLut16::e21, icLut16::e22, Fill_mft2_ColorTable(), Fill_mft2_InputTable(), Fill_mft2_OutputTable(), icSigLut16Type, icLut16::inputChan, icLut16::inputEnt, LH_END_PROC, LH_START_PROC, LOCK_DATA, icLut16Type::lut, OSType, icLut16::outputChan, icLut16::outputEnt, Ptr, UINT16, UINT8, and UNLOCK_DATA. Referenced by DeviceLinkFill(), and MyNewDeviceLinkFill(). { CMError err; icLut16 *tempLutPtr; long offset; UINT16 inputChannels; UINT16 outputChannels; UINT16 gridPoints; LH_START_PROC("Add_NL_AToB0Tag_mft2") LOCK_DATA(cw->lutParam.inputLut); LOCK_DATA(cw->lutParam.colorLut); LOCK_DATA(cw->lutParam.outputLut); inputChannels = (UINT16)cw->lutParam.colorLutInDim; outputChannels = (UINT16)cw->lutParam.colorLutOutDim; gridPoints = (UINT16)cw->lutParam.colorLutGridPoints; tempLutPtr = &lutPtr->lut; CMHelperICC2int32Const(&(lutPtr->base ), icSigLut16Type); CMHelperICC2int32Const((OSType*)&(lutPtr->base )+1, 0); tempLutPtr->inputChan = (UINT8)inputChannels; tempLutPtr->outputChan = (UINT8)outputChannels; tempLutPtr->clutPoints = (UINT8)((gridPoints>255)?255:gridPoints); tempLutPtr->e00 = tempLutPtr->e01 = tempLutPtr->e02 = 0; tempLutPtr->e10 = tempLutPtr->e11 = tempLutPtr->e12 = 0; tempLutPtr->e20 = tempLutPtr->e21 = tempLutPtr->e22 = 0; CMHelperICC2int32Const(&(tempLutPtr->e00 ), 0x10000); CMHelperICC2int32Const(&(tempLutPtr->e11 ), 0x10000); CMHelperICC2int32Const(&(tempLutPtr->e22 ), 0x10000); tempLutPtr->inputEnt = (UINT16)cw->lutParam.inputLutEntryCount; tempLutPtr->outputEnt = (UINT16)cw->lutParam.outputLutEntryCount; err = Fill_mft2_InputTable((Ptr)DATA_2_PTR(cw->lutParam.inputLut), tempLutPtr, cw); if (err) goto CleanupAndExit; offset = cw->lutParam.inputLutEntryCount * inputChannels; Fill_mft2_ColorTable( (Ptr)DATA_2_PTR(cw->lutParam.colorLut), tempLutPtr, offset, colorLutSize); offset = offset + colorLutSize; err = Fill_mft2_OutputTable((Ptr)DATA_2_PTR(cw->lutParam.outputLut), tempLutPtr, offset, cw); if (err) goto CleanupAndExit; CMHelperICC2int16Const(&(tempLutPtr->inputEnt ), (UINT16)cw->lutParam.inputLutEntryCount); CMHelperICC2int16Const(&(tempLutPtr->outputEnt ), (UINT16)cw->lutParam.outputLutEntryCount); CleanupAndExit: #ifdef DEBUG_OUTPUT if ( err ) DebugPrint("¥ MyAdd_NL_AToB0Tag_mft2-Error: result = %d\n",err); #endif UNLOCK_DATA(cw->lutParam.inputLut); UNLOCK_DATA(cw->lutParam.colorLut); UNLOCK_DATA(cw->lutParam.outputLut); LH_END_PROC("Add_NL_AToB0Tag_mft2") return err; }

CMError MyAdd_NL_ColorantTag (  icXYZType *  descPtr, MyXYZNumber *  aColor )

Definition at line 222 of file w98/lh_core/memlink.c. References icXYZType::base, CMError, CMHelperICC2int32, CMHelperICC2int32Const, icXYZArray::data, icXYZType::data, icSigXYZType, MyXYZNumber, noErr, OSErr, OSType, icXYZNumber::X, icXYZNumber::Y, and icXYZNumber::Z. Referenced by DeviceLinkFill(), and MyNewDeviceLinkFill(). { OSErr err = noErr; CMHelperICC2int32Const(&(descPtr->base ), icSigXYZType); CMHelperICC2int32Const((OSType*)&(descPtr->base )+1, 0); CMHelperICC2int32(&(descPtr->data.data[0].X ), &aColor->X); CMHelperICC2int32(&(descPtr->data.data[0].Y ), &aColor->Y); CMHelperICC2int32(&(descPtr->data.data[0].Z ), &aColor->Z); return err; }

CMError MyAdd_NL_CopyrightTag (  unsigned char *  copyrightText, LHTextType *  aLHTextType )

Definition at line 245 of file w98/lh_core/memlink.c. References LHTextType::base, BlockMove(), CMError, CMHelperICC2int32Const, DebugPrint, icSigTextType, noErr, OSErr, OSType, and LHTextType::text. Referenced by DeviceLinkFill(), and MyNewDeviceLinkFill(). { OSErr err=noErr; copyrightText[copyrightText[0]] = 0x00; CMHelperICC2int32Const(&(aLHTextType->base ), icSigTextType); CMHelperICC2int32Const((OSType*)&(aLHTextType->base )+1, 0); BlockMove(&copyrightText[1], &aLHTextType->text[0], copyrightText[0]); #ifdef DEBUG_OUTPUT if ( err && DebugCheck(kThisFile, kDebugErrorInfo) ) DebugPrint("¥ MyAdd_NL_CopyrightTag-Error: result = %d\n",err); #endif return err; }

CMError MyAdd_NL_CurveTag (  icCurveType *  descPtr, unsigned short  Gamma )

Definition at line 234 of file w98/lh_core/memlink.c. References icCurveType::base, CMError, CMHelperICC2int16, CMHelperICC2int32Const, icCurve::count, icCurveType::curve, icCurve::data, icSigCurveType, noErr, OSErr, and OSType. { OSErr err = noErr; CMHelperICC2int32Const(&(descPtr->base ), icSigCurveType); CMHelperICC2int32Const((OSType*)&(descPtr->base )+1, 0); CMHelperICC2int32Const(&(descPtr->curve.count ), 1); CMHelperICC2int16(&(descPtr->curve.data[0] ), &Gamma ); return err; }

CMError MyAdd_NL_DescriptionTag (  LHTextDescriptionType *  descPtr, unsigned char *  theText )

Definition at line 178 of file w98/lh_core/memlink.c. References LHTextDescriptionType::ASCIICount, LHTextDescriptionType::ASCIIName, BlockMove(), CMError, CMHelperICC2int32Const, icSigTextDescriptionType, noErr, OSErr, Ptr, LHTextDescriptionType::reserved, and LHTextDescriptionType::typeDescriptor. Referenced by DeviceLinkFill(), and MyNewDeviceLinkFill(). { Ptr thePtr; OSErr err = noErr; theText[theText[0]] = 0x00; /*descPtr = (LHTextDescriptionType*)NewPtrClear( theSize ); */ if (descPtr == 0) return -1; /*------------------------------------------------------------------------ ASCII */ CMHelperICC2int32Const(&(descPtr->typeDescriptor ), icSigTextDescriptionType); CMHelperICC2int32Const(&(descPtr->reserved ), 0); CMHelperICC2int32Const(&(descPtr->ASCIICount ), (long)theText[0]); thePtr = (Ptr) &descPtr->ASCIIName[0]; BlockMove(&theText[1], thePtr, theText[0]); thePtr += theText[0]; /*------------------------------------------------------------------------ Unicode */ /*thePtr+=sizeof(unsigned long); */ *thePtr++ = 0; *thePtr++ = 0; *thePtr++ = 0; *thePtr++ = 0; /*thePtr+=sizeof(unsigned long); */ *thePtr++ = 0; *thePtr++ = 0; *thePtr++ = 0; *thePtr++ = 0; /*BlockMove(&theText[1], thePtr, theText[0]); //Unicode string */ /*thePtr += theText[0]; */ /*------------------------------------------------------------------------ Macintosh */ *thePtr++ = 0; *thePtr++ = 0; BlockMove(&theText[0], thePtr, theText[0]+1); return err; }

CMError MyAdd_NL_Header (  UINT32  theSize, icHeader *  linkHeader, UINT32  aIntent, UINT32  aClass, UINT32  aColorSpace, UINT32  aConnectionSpace )

Definition at line 53 of file w98/lh_core/memlink.c. References icHeader::attributes, CMError, CMHelperICC2int16, CMHelperICC2int32Const, icHeader::cmmId, icHeader::colorSpace, icHeader::creator, icHeader::date, icDateTimeNumber::day, DateTimeRec::day, icHeader::deviceClass, icHeader::flags, GetDateTime(), DateTimeRec::hour, icDateTimeNumber::hours, icMagicNumber, icSigMicrosoft, icVersionNumber, icHeader::illuminant, icHeader::magic, icHeader::manufacturer, DateTimeRec::minute, icDateTimeNumber::minutes, icHeader::model, icDateTimeNumber::month, DateTimeRec::month, noErr, OSErr, icHeader::pcs, icHeader::platform, icHeader::renderingIntent, DateTimeRec::second, icDateTimeNumber::seconds, SecondsToDate(), icHeader::size, icHeader::version, icXYZNumber::X, icXYZNumber::Y, icDateTimeNumber::year, DateTimeRec::year, and icXYZNumber::Z. Referenced by DeviceLinkFill(). { OSErr err = noErr; #if ! __IS_MSDOS unsigned long secs; #endif DateTimeRec datetimeRec; /*icHeader linkHeader; */ #if __IS_MSDOS SYSTEMTIME aSystemTime; GetLocalTime( (SYSTEMTIME *)&aSystemTime); datetimeRec.year = aSystemTime.wYear; datetimeRec.month = aSystemTime.wMonth; datetimeRec.day = aSystemTime.wDay; datetimeRec.hour = aSystemTime.wHour; datetimeRec.minute = aSystemTime.wMinute; datetimeRec.second = aSystemTime.wSecond; #else #if __IS_MAC GetDateTime(&secs); SecondsToDate(secs, &datetimeRec);/* Secs2Date (link.*)=(.*); CMHelperICC2int32(\&(\1),\2); */ #else struct tm* loctime; time_t long_time; time( &long_time ); /* Get time as long integer. */ loctime = localtime(&long_time); datetimeRec.year = loctime->tm_year; datetimeRec.month = loctime->tm_mon+1; datetimeRec.day = loctime->tm_mday; datetimeRec.hour = loctime->tm_hour; datetimeRec.minute = loctime->tm_min; datetimeRec.second = loctime->tm_sec; #endif #endif CMHelperICC2int32Const(&(linkHeader->size ), theSize); /* This is the total size of the CMProfileRef */ CMHelperICC2int32Const(&(linkHeader->cmmId ), 'Win '); /* CMM signature, Registered with ICC consortium */ CMHelperICC2int32Const(&(linkHeader->version ), icVersionNumber); /* Version of CMProfile format */ CMHelperICC2int32Const(&(linkHeader->deviceClass ), aClass); /* input, display, output, devicelink, abstract, or color conversion profile type */ CMHelperICC2int32Const(&(linkHeader->colorSpace ), aColorSpace); /* color space of data = dataColorSpace of first profile*/ CMHelperICC2int32Const(&(linkHeader->pcs ), aConnectionSpace); /* profile connection color space = dataColorSpace of last profile*/ CMHelperICC2int16(&(linkHeader->date.year ), &datetimeRec.year); /* date and time of profile creation */ CMHelperICC2int16(&(linkHeader->date.month ), &datetimeRec.month); CMHelperICC2int16(&(linkHeader->date.day ), &datetimeRec.day); CMHelperICC2int16(&(linkHeader->date.hours ), &datetimeRec.hour); CMHelperICC2int16(&(linkHeader->date.minutes ), &datetimeRec.minute); CMHelperICC2int16(&(linkHeader->date.seconds ), &datetimeRec.second); CMHelperICC2int32Const(&(linkHeader->magic ), icMagicNumber); /* 'acsp' constant ICC file ID */ CMHelperICC2int32Const(&(linkHeader->platform ), icSigMicrosoft); /* primary profile platform, Registered with ICC consortium */ CMHelperICC2int32Const(&(linkHeader->flags ), 0); /* profile flags */ CMHelperICC2int32Const(&(linkHeader->manufacturer ), icSigMicrosoft); /* Registered with ICC consortium */ CMHelperICC2int32Const(&(linkHeader->model ), 0); /* Registered with ICC consortium */ CMHelperICC2int32Const(&(linkHeader->attributes[0] ), 0); /* Attributes like paper type */ CMHelperICC2int32Const(&(linkHeader->attributes[1] ), 0); CMHelperICC2int32Const(&(linkHeader->renderingIntent ), aIntent ); /* preferred rendering intent of tagged object */ CMHelperICC2int32Const(&(linkHeader->illuminant.X ), 0.9642 * 65536); /* profile illuminant */ CMHelperICC2int32Const(&(linkHeader->illuminant.Y ), 1.0000 * 65536); CMHelperICC2int32Const(&(linkHeader->illuminant.Z ), 0.8249 * 65536); CMHelperICC2int32Const(&(linkHeader->creator ), 'UJK '); return err; }

CMError MyAdd_NL_HeaderMS (  UINT32  theSize, icHeader *  linkHeader, unsigned long  aIntent, icColorSpaceSignature  sCS, icColorSpaceSignature  dCS )

CMError MyAdd_NL_SequenceDescTag (  CMConcatProfileSet *  profileSet, icProfileSequenceDescType *  pSeqPtr, long *  aSize )

Definition at line 725 of file w98/lh_core/memlink.c. References icHeader::attributes, icProfileSequenceDescType::base, BlockMoveData, CMError, CMGetProfileElement(), CMGetProfileHeader(), CMHelperICC2int32Const, icProfileSequenceDesc::count, CMConcatProfileSet::count, icProfileSequenceDescType::desc, DisposeIfPtr(), icSigDeviceMfgDescTag, icSigDeviceModelDescTag, icSigProfileSequenceDescType, icSigTechnologyTag, icSigTextDescriptionType, LH_END_PROC, LH_START_PROC, icHeader::manufacturer, icHeader::model, nil, noErr, OSErr, OSType, CMConcatProfileSet::profileSet, Ptr, icSignatureType::signature, SINT32, SmartNewPtr(), and UINT32. Referenced by DeviceLinkFill(), and MyNewDeviceLinkFill(). { CMError err; OSErr aOSerr; /*icProfileSequenceDescType* pSeqPtr = nil;*/ Ptr thePtr = nil; icHeader profHeader; SINT32 loop; OSType technology; UINT32 elementSize; icSignatureType theSignature; icTextDescriptionType* descPtr = nil; char descPtrNull[90]={0}; LH_START_PROC("MyAdd_NL_SequenceDescTag") CMHelperICC2int32Const(&(((icTextDescriptionType*)descPtrNull)->base ), icSigTextDescriptionType ); CMHelperICC2int32Const(((OSType*)&((icTextDescriptionType*)descPtrNull)->base )+1, 0); CMHelperICC2int32Const(&(((icTextDescriptionType*)descPtrNull)->desc.count ), 1 ); /*pSeqPtr = (icProfileSequenceDescType*)SmartNewPtrClear(5000, &aOSerr); err = aOSerr; if (err) goto CleanupAndExit;*/ CMHelperICC2int32Const(&(pSeqPtr->base ), icSigProfileSequenceDescType); CMHelperICC2int32Const((OSType*)&(pSeqPtr->base )+1, 0); CMHelperICC2int32Const(&(pSeqPtr->desc.count ), profileSet->count ); thePtr = (Ptr)( (SIZE_T)&(pSeqPtr->desc.count) + sizeof(SINT32) ) ; for (loop = 0; loop < (SINT32)profileSet->count; loop++) { err = CMGetProfileHeader(profileSet->profileSet[loop], (CMCoreProfileHeader *)&profHeader); if (err) goto CleanupAndExit; CMHelperICC2int32Const(thePtr, profHeader.manufacturer); thePtr += sizeof(OSType); CMHelperICC2int32Const(thePtr, profHeader.model); thePtr += sizeof(OSType); CMHelperICC2int32Const(thePtr, profHeader.attributes[0]); thePtr += sizeof(UINT32); CMHelperICC2int32Const(thePtr, profHeader.attributes[1]); thePtr += sizeof(UINT32); /* ----------------------------------------------------------------- icSigTechnologyTag */ technology = 0; if ( CMGetProfileElement(profileSet->profileSet[loop], icSigTechnologyTag, &elementSize, nil) == noErr) { if (elementSize == sizeof(icSigTechnologyTag)) { if ( CMGetProfileElement(profileSet->profileSet[loop], icSigTechnologyTag, &elementSize, &theSignature) == noErr) technology = theSignature.signature; } } *((OSType*)thePtr) = technology; /* signature */ thePtr += sizeof(OSType); /* ----------------------------------------------------------------- icSigDeviceMfgDescTag */ if ( CMGetProfileElement(profileSet->profileSet[loop], icSigDeviceMfgDescTag, &elementSize, nil) == noErr) { descPtr = (icTextDescriptionType*)SmartNewPtr(elementSize,&aOSerr); err = aOSerr; if (err) goto CleanupAndExit; if ( CMGetProfileElement(profileSet->profileSet[loop], icSigDeviceMfgDescTag, &elementSize, descPtr) == noErr) { BlockMoveData( descPtr, thePtr, elementSize); thePtr += elementSize; } descPtr = (icTextDescriptionType*)DisposeIfPtr((Ptr)descPtr); } else { BlockMoveData( descPtrNull, thePtr, sizeof(descPtrNull)); thePtr += sizeof(descPtrNull); } /* ----------------------------------------------------------------- icSigDeviceModelDescTag */ if ( CMGetProfileElement(profileSet->profileSet[loop], icSigDeviceModelDescTag, &elementSize, nil) == noErr) { descPtr = (icTextDescriptionType*)SmartNewPtr(elementSize,&aOSerr); err = aOSerr; if (err) goto CleanupAndExit; if ( CMGetProfileElement(profileSet->profileSet[loop], icSigDeviceModelDescTag, &elementSize, descPtr) == noErr) { BlockMoveData( descPtr, thePtr, elementSize); thePtr += elementSize; } descPtr = (icTextDescriptionType*)DisposeIfPtr((Ptr)descPtr); } else { BlockMoveData( descPtrNull, thePtr, sizeof(descPtrNull)); thePtr += sizeof(descPtrNull); } /* ----------------------------------------------------------------- */ } //Sundown safe truncation *aSize = (LONG)((ULONG_PTR)thePtr - (ULONG_PTR)pSeqPtr); CleanupAndExit: descPtr = (icTextDescriptionType*)DisposeIfPtr((Ptr)descPtr); LH_END_PROC("MyAdd_NL_SequenceDescTag") return err; }

CMError MyGetColorSpaces (  CMConcatProfileSet *  profileSet, UINT32 *  sCS, UINT32 *  dCS )

void NormalizeColor (  MyXYZNumber *  r, MyXYZNumber *  g, MyXYZNumber *  b, MyDoubleXYZ *  Illuminant, MyXYZNumber *  resR, MyXYZNumber *  resG, MyXYZNumber *  resB )

void NormalizeWithWhiteAdaption (  MyXYZNumber *  r, MyXYZNumber *  g, MyXYZNumber *  b, MyDoubleXYZ *  Illuminant, MyXYZNumber *  resR, MyXYZNumber *  resG, MyXYZNumber *  resB )

void TransposeMatrix (  double  inpMat[3][3]  )

Referenced by NormalizeWithWhiteAdaption().

---