Microsoft/Windows2000
Microsoft/Windows2000
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity
45f4a58588
Windows2000/private/ntos/w32/ntgdi/icm/mscms/profile.c

3664 lines
88 KiB
C
Raw Normal View History

First commit
2001-01-01 00:00:00 +01:00
/**Module*Header**\
* Module Name: PROFILE.C
* Module Descripton: Profile data manipulation functions
* Warnings:
* Issues:
* Public Routines:
* Created: 11 January 1996
* Author: Srinivasan Chandrasekar [srinivac]
* Copyright (c) 1996, 1997 Microsoft Corporation
*/
#include "mscms.h"
#define PROFILE_GROWTHCUSHION 16*1024
// Local functions
HPROFILE InternalOpenColorProfile(PPROFILE, DWORD, DWORD, DWORD);
BOOL InternalCreateProfileFromLCS(LPLOGCOLORSPACE, PBYTE*, BOOL);
BOOL FreeProfileObject(HPROFILE);
BOOL AddTagTableEntry(PPROFOBJ, TAGTYPE, DWORD, DWORD, BOOL);
BOOL AddTaggedElement(PPROFOBJ, TAGTYPE, DWORD);
BOOL DeleteTaggedElement(PPROFOBJ, PTAGDATA);
BOOL ChangeTaggedElementSize(PPROFOBJ, PTAGDATA, DWORD);
BOOL GrowProfile(PPROFOBJ, DWORD);
void MoveProfileData(PPROFOBJ, PBYTE, PBYTE, LONG, BOOL);
BOOL IsReferenceTag(PPROFOBJ, PTAGDATA);
/*
* OpenColorProfile
* Function:
* These are the ANSI & Unicode wrappers for InternalOpenColorProfile.
* Please see InternalOpenColorProfile for more details on this function.
* Returns:
* Handle to open profile on success, zero on failure.
*/
#ifdef UNICODE // Windows NT versions
HPROFILE WINAPI OpenColorProfileA(
PPROFILE pProfile,
DWORD dwDesiredAccess,
DWORD dwShareMode,
DWORD dwCreationMode
)
{
PROFILE wProfile; // Unicode version
HPROFILE rc = NULL;
// Validate parameters before touching them
if (!pProfile ||
IsBadReadPtr(pProfile, sizeof(PROFILE)) ||
(pProfile->pProfileData &&
IsBadReadPtr(pProfile->pProfileData, pProfile->cbDataSize)) ||
(!pProfile->pProfileData &&
(pProfile->cbDataSize != 0)) ||
(pProfile->dwType != PROFILE_FILENAME &&
pProfile->dwType != PROFILE_MEMBUFFER
)
)
{
WARNING((__TEXT("Invalid parameter to OpenColorProfile\n")));
SetLastError(ERROR_INVALID_PARAMETER);
return NULL;
}
if (pProfile->dwType == PROFILE_FILENAME)
{
// Convert the profile name to Unicode and call the Unicode version
wProfile.dwType = pProfile->dwType;
if (!pProfile->pProfileData || pProfile->cbDataSize == 0)
{
WARNING((__TEXT("Invalid parameter to OpenColorProfile\n")));
SetLastError(ERROR_INVALID_PARAMETER);
return NULL;
}
wProfile.pProfileData = (WCHAR*)MemAlloc(pProfile->cbDataSize * sizeof(WCHAR));
if (!wProfile.pProfileData)
{
WARNING((__TEXT("Error allocating memory for Unicode profile structure\n")));
SetLastError(ERROR_NOT_ENOUGH_MEMORY);
return NULL;
}
if (! MultiByteToWideChar(CP_ACP, 0, pProfile->pProfileData, pProfile->cbDataSize,
wProfile.pProfileData, pProfile->cbDataSize))
{
WARNING((__TEXT("Error converting profile structure to Unicode\n")));
goto EndOpenColorProfileA;
}
wProfile.cbDataSize = pProfile->cbDataSize * sizeof(WCHAR);
}
else
{
// It is a memory based profile, so no ANSI/Unicode conversion
wProfile = *pProfile;
}
rc = InternalOpenColorProfile(&wProfile, dwDesiredAccess,
dwShareMode, dwCreationMode);
EndOpenColorProfileA:
if (pProfile->dwType == PROFILE_FILENAME)
{
MemFree(wProfile.pProfileData);
}
return rc;
}
HPROFILE WINAPI OpenColorProfileW(
PPROFILE pProfile,
DWORD dwDesiredAccess,
DWORD dwShareMode,
DWORD dwCreationMode
)
{
// Internal function is Unicode in Windows NT, call it directly.
return InternalOpenColorProfile(pProfile, dwDesiredAccess,
dwShareMode, dwCreationMode);
}
#else // Windows 95 versions
HPROFILE WINAPI OpenColorProfileA(
PPROFILE pProfile,
DWORD dwDesiredAccess,
DWORD dwShareMode,
DWORD dwCreationMode
)
{
// Internal function is ANSI in Windows 95, call it directly.
return InternalOpenColorProfile(pProfile, dwDesiredAccess,
dwShareMode, dwCreationMode);
}
HPROFILE WINAPI OpenColorProfileW(
PPROFILE pProfile,
DWORD dwDesiredAccess,
DWORD dwShareMode,
DWORD dwCreationMode
)
{
PROFILE aProfile; // ANSI version
HPROFILE rc = NULL;
BOOL bUsedDefaultChar;
// Validate parameters before touching them
if (!pProfile ||
IsBadReadPtr(pProfile, sizeof(PROFILE)) ||
(pProfile->pProfileData &&
IsBadReadPtr(pProfile->pProfileData, pProfile->cbDataSize)) ||
(!pProfile->pProfileData &&
(pProfile->cbDataSize != 0)) ||
(pProfile->dwType != PROFILE_FILENAME &&
pProfile->dwType != PROFILE_MEMBUFFER
)
)
{
WARNING((__TEXT("Invalid parameter to OpenColorProfile\n")));
SetLastError(ERROR_INVALID_PARAMETER);
return NULL;
}
if (pProfile->dwType == PROFILE_FILENAME)
{
// Convert the profile name to ANSI and call the ANSI version
aProfile.dwType = pProfile->dwType;
if (!pProfile->pProfileData || pProfile->cbDataSize == 0)
{
WARNING((__TEXT("Invalid parameter to OpenColorProfile\n")));
SetLastError(ERROR_INVALID_PARAMETER);
return NULL;
}
aProfile.pProfileData = (char*)MemAlloc(pProfile->cbDataSize * sizeof(char));
if (!aProfile.pProfileData)
{
WARNING((__TEXT("Error allocating memory for ANSI profile structure\n")));
SetLastError(ERROR_NOT_ENOUGH_MEMORY);
return NULL;
}
if (! WideCharToMultiByte(CP_ACP, 0, pProfile->pProfileData, pProfile->cbDataSize/sizeof(WCHAR),
aProfile.pProfileData, pProfile->cbDataSize,
NULL, &bUsedDefaultChar) || bUsedDefaultChar)
{
WARNING((__TEXT("Error converting profile structure to ANSI\n")));
goto EndOpenColorProfileW;
}
aProfile.cbDataSize = pProfile->cbDataSize * sizeof(char);
}
else
{
// It is a memory based profile, so no ANSI/Unicode conversion
aProfile = *pProfile;
}
rc = InternalOpenColorProfile(&aProfile, dwDesiredAccess,
dwShareMode, dwCreationMode);
EndOpenColorProfileW:
if (pProfile->dwType == PROFILE_FILENAME)
{
MemFree(aProfile.pProfileData);
}
return rc;
}
#endif // ! UNICODE
/*
* CloseColorProfile
* Function:
* This functions closes a color profile object, and frees all memory
* associated with it.
* Arguments:
* hProfile - handle identifing the profile object
* Returns:
* TRUE if successful, FALSE otherwise
*/
BOOL WINAPI CloseColorProfile(
HPROFILE hProfile
)
{
TRACEAPI((__TEXT("CloseColorProfile\n")));
// Validate parameters
if (!ValidHandle(hProfile, OBJ_PROFILE))
{
WARNING((__TEXT("Invalid parameter to CloseColorProfile\n")));
SetLastError(ERROR_INVALID_PARAMETER);
return FALSE;
}
return FreeProfileObject(hProfile);
}
/*
* GetColorProfileFromHandle
* Function:
* This functions returns a buffer filled with the profile contents.
* Arguments:
* hProfile - handle identifing the profile object
* pProfileData - pointer to buffer to receive the data. Can be NULL.
* pcbData - pointer to size of buffer. On return it is size
* filled/needed.
* Returns:
* TRUE if successful, FALSE otherwise
*/
BOOL WINAPI GetColorProfileFromHandle(
HPROFILE hProfile,
PBYTE pProfileData,
PDWORD pcbSize
)
{
PPROFOBJ pProfObj;
DWORD dwFileSize;
BOOL rc = FALSE;
// ValidatePrameters
if (!ValidHandle(hProfile, OBJ_PROFILE) ||
!pcbSize ||
IsBadWritePtr(pcbSize, sizeof(DWORD)) ||
(pProfileData &&
IsBadWritePtr(pProfileData, *pcbSize)))
{
WARNING((__TEXT("Invalid parameter to CloseColorProfile\n")));
SetLastError(ERROR_INVALID_PARAMETER);
return FALSE;
}
pProfObj = (PPROFOBJ)HDLTOPTR(hProfile);
ASSERT(pProfObj != NULL);
dwFileSize = FIX_ENDIAN(HEADER(pProfObj)->phSize);
if (pProfileData && *pcbSize >= dwFileSize)
{
CopyMemory(pProfileData, pProfObj->pView, dwFileSize);
rc = TRUE;
}
else
{
SetLastError(ERROR_INSUFFICIENT_BUFFER);
}
*pcbSize = dwFileSize;
return rc;
}
/*
* IsColorProfileValid
* Function:
* This functions checks if a given profile is a valid ICC profile
* that can be used for color matching
* Arguments:
* hProfile - handle identifing the profile object
* pbValid - Pointer to variable that receives TRUE if it is a
* valid profile, FALSE otherwise
* Returns:
* TRUE if successful, FALSE otherwise
*/
BOOL WINAPI IsColorProfileValid(
HPROFILE hProfile,
PBOOL pbValid
)
{
PPROFOBJ pProfObj;
PCMMOBJ pCMMObj;
DWORD cmmID;
BOOL rc = FALSE;
TRACEAPI((__TEXT("IsColorProfileValid\n")));
// Validate parameters
if (!ValidHandle(hProfile, OBJ_PROFILE) ||
!pbValid ||
IsBadWritePtr(pbValid, sizeof(BOOL)))
{
WARNING((__TEXT("Invalid parameter to IsColorProfileValid\n")));
SetLastError(ERROR_INVALID_PARAMETER);
return FALSE;
}
pProfObj = (PPROFOBJ)HDLTOPTR(hProfile);
ASSERT(pProfObj != NULL);
// Quick check on the integrity of the profile before calling the CMM
if (!ValidProfile(pProfObj))
{
*pbValid = FALSE;
return TRUE;
}
// Get CMM associated with profile. If it does not exist or does not
// support the CMValidate function, get default CMM.
cmmID = HEADER(pProfObj)->phCMMType;
cmmID = FIX_ENDIAN(cmmID);
pCMMObj = GetColorMatchingModule(cmmID);
if (!pCMMObj || !pCMMObj->fns.pCMIsProfileValid)
{
TERSE((__TEXT("CMM associated with profile could not be used")));
if (pCMMObj)
{
ReleaseColorMatchingModule(pCMMObj);
}
pCMMObj = GetColorMatchingModule(CMM_WINDOWS_DEFAULT);
if (!pCMMObj || !pCMMObj->fns.pCMIsProfileValid)
{
RIP((__TEXT("Default CMM doesn't support CMValidateProfile")));
SetLastError(ERROR_INVALID_CMM);
goto EndIsColorProfileValid;
}
}
ASSERT(pProfObj->pView != NULL);
rc = pCMMObj->fns.pCMIsProfileValid(hProfile, pbValid);
EndIsColorProfileValid:
if (pCMMObj)
{
ReleaseColorMatchingModule(pCMMObj);
}
return rc;
}
/*
* CreateProfileFromLogColorSpace
* Function:
* These are the ANSI & Unicode wrappers for InternalCreateProfileFromLCS.
* Please see InternalCreateProfileFromLCS for more details on this
* function.
* Returns:
* TRUE if successful, FALSE otherwise
*/
#ifdef UNICODE // Windows NT versions
BOOL WINAPI CreateProfileFromLogColorSpaceA(
LPLOGCOLORSPACEA pLogColorSpace,
PBYTE *pBuffer
)
{
LOGCOLORSPACEW lcs;
// Validate Parameters
if (! pLogColorSpace ||
IsBadReadPtr(pLogColorSpace, sizeof(LOGCOLORSPACEA)) ||
pLogColorSpace->lcsFilename[0] != '\0')
{
WARNING((__TEXT("Invalid parameter to CreateProfileFromLogColorSpace\n")));
SetLastError(ERROR_INVALID_PARAMETER);
return FALSE;
}
*((LPLOGCOLORSPACEA)&lcs) = *pLogColorSpace;
lcs.lcsFilename[0] = '\0';
return InternalCreateProfileFromLCS(&lcs, pBuffer, FALSE);
}
BOOL WINAPI CreateProfileFromLogColorSpaceW(
LPLOGCOLORSPACEW pLogColorSpace,
PBYTE *pBuffer
)
{
// Internal function is Unicode in Windows NT, call it directly.
return InternalCreateProfileFromLCS(pLogColorSpace, pBuffer, TRUE);
}
#else // Windows 95 versions
BOOL WINAPI CreateProfileFromLogColorSpaceA(
LPLOGCOLORSPACEA pLogColorSpace,
PBYTE *pBuffer
)
{
// Internal function is ANSI in Windows 95, call it directly.
return InternalCreateProfileFromLCS(pLogColorSpace, pBuffer, TRUE);
}
BOOL WINAPI CreateProfileFromLogColorSpaceW(
LPLOGCOLORSPACEW pLogColorSpace,
PBYTE *pBuffer
)
{
LOGCOLORSPACEA lcs;
// Validate Parameters
if (! pLogColorSpace ||
IsBadReadPtr(pLogColorSpace, sizeof(LOGCOLORSPACEW)) ||
pLogColorSpace->lcsFilename[0] != '\0')
{
WARNING((__TEXT("Invalid parameter to CreateProfileFromLogColorSpace\n")));
SetLastError(ERROR_INVALID_PARAMETER);
return FALSE;
}
lcs = *((LPLOGCOLORSPACEA)pLogColorSpace);
lcs.lcsFilename[0] = '\0';
return InternalCreateProfileFromLCS(&lcs, pBuffer, FALSE);
}
#endif // ! UNICODE
/*
* IsColorProfileTagPresent
* Function:
* This functions checks if a given tag is present in the profile
* Arguments:
* hProfile - handle identifing the profile object
* tagType - the tag to check for
* pbPrent - pointer to variable that receives TRUE if it the tag is
* present, FALSE otherwise
* Returns:
* TRUE if successful, FALSE otherwise
*/
BOOL WINAPI IsColorProfileTagPresent(
HPROFILE hProfile,
TAGTYPE tagType,
PBOOL pbPresent
)
{
PPROFOBJ pProfObj;
PTAGDATA pTagData;
DWORD nCount, i;
TRACEAPI((__TEXT("IsColorProfileTagPresent\n")));
// Validate parameters
if (!ValidHandle(hProfile, OBJ_PROFILE) ||
!pbPresent ||
IsBadWritePtr(pbPresent, sizeof(BOOL)))
{
WARNING((__TEXT("Invalid parameter to IsColorProfileTagPresent\n")));
SetLastError(ERROR_INVALID_PARAMETER);
return FALSE;
}
pProfObj = (PPROFOBJ)HDLTOPTR(hProfile);
ASSERT(pProfObj != NULL);
// Check the integrity of the profile
if (!ValidProfile(pProfObj))
{
WARNING((__TEXT("Invalid profile passed to IsColorProfileTagPresent\n")));
SetLastError(ERROR_INVALID_PROFILE);
return FALSE;
}
// Get count of tag items - it is right after the profile header
nCount = TAG_COUNT(pProfObj);
nCount = FIX_ENDIAN(nCount);
VERBOSE((__TEXT("Profile 0x%x has 0x%x(%d) tags\n"), hProfile, nCount, nCount));
// Tag data records follow the count.
pTagData = TAG_DATA(pProfObj);
// Check if any of these records match the tag passed in.
*pbPresent = FALSE;
tagType = FIX_ENDIAN(tagType); // to match tags in profile
for (i=0; i<nCount; i++)
{
if (pTagData->tagType == tagType)
{
*pbPresent = TRUE;
break;
}
pTagData++; // Next record
}
return TRUE;
}
/*
* GetCountColorProfileElements
* Function:
* This functions returns the number of tagged elements in the profile
* Arguments:
* hProfile - handle identifing the profile object
* pnCount - pointer to variable to receive number of tagged elements
* Returns:
* TRUE if successful, FALSE otherwise
*/
BOOL WINAPI GetCountColorProfileElements(
HPROFILE hProfile,
PDWORD pnCount
)
{
PPROFOBJ pProfObj;
TRACEAPI((__TEXT("GetCountColorProfileElements\n")));
// Validate parameters
if (!ValidHandle(hProfile, OBJ_PROFILE) ||
!pnCount ||
IsBadWritePtr(pnCount, sizeof(DWORD)))
{
WARNING((__TEXT("Invalid parameter to GetCountColorProfileElements\n")));
SetLastError(ERROR_INVALID_PARAMETER);
return FALSE;
}
pProfObj = (PPROFOBJ)HDLTOPTR(hProfile);
ASSERT(pProfObj != NULL);
// Check the integrity of the profile
if (!ValidProfile(pProfObj))
{
WARNING((__TEXT("Invalid profile passed to GetCountColorProfileElements\n")));
SetLastError(ERROR_INVALID_PROFILE);
return FALSE;
}
// Get count of tag items - it is right after the profile header
*pnCount = TAG_COUNT(pProfObj);
*pnCount = FIX_ENDIAN(*pnCount);
return TRUE;
}
/*
* GetColorProfileElementTag
* Function:
* This functions retrieves the tag name of the dwIndex'th element
* in the profile
* Arguments:
* hProfile - handle identifing the profile object
* dwIndex - one-based index of the tag whose name is required
* pTagType - gets the name of the tag on return
* Returns:
* TRUE if successful, FALSE otherwise
*/
BOOL WINAPI GetColorProfileElementTag(
HPROFILE hProfile,
DWORD dwIndex,
PTAGTYPE pTagType
)
{
PPROFOBJ pProfObj;
PTAGDATA pTagData;
DWORD nCount;
BOOL rc = FALSE;
TRACEAPI((__TEXT("GetColorProfileElementTag\n")));
// Validate parameters
if (!ValidHandle(hProfile, OBJ_PROFILE) ||
IsBadWritePtr(pTagType, sizeof(TAGTYPE)) ||
dwIndex <= 0)
{
WARNING((__TEXT("Invalid parameter to GetColorProfileElementTag\n")));
SetLastError(ERROR_INVALID_PARAMETER);
return FALSE;
}
pProfObj = (PPROFOBJ)HDLTOPTR(hProfile);
ASSERT(pProfObj != NULL);
// Check the integrity of the profile
if (!ValidProfile(pProfObj))
{
WARNING((__TEXT("Invalid profile passed to GetColorProfileElementTag\n")));
SetLastError(ERROR_INVALID_PROFILE);
return FALSE;
}
// Get count of tag items - it is right after the profile header
nCount = TAG_COUNT(pProfObj);
nCount = FIX_ENDIAN(nCount);
if (dwIndex > nCount)
{
WARNING((__TEXT("GetColorProfileElementTag:index (%d) invalid\n"), dwIndex));
SetLastError(ERROR_INVALID_PARAMETER);
return FALSE;
}
// Tag data records follow the count.
pTagData = TAG_DATA(pProfObj);
*pTagType = FIX_ENDIAN(pTagData[dwIndex-1].tagType); // 1-based index
return TRUE;
}
/*
* GetColorProfileElement
* Function:
* This functions retrieves the data that a tagged element refers to
* starting from the given offset.
* Arguments:
* hProfile - handle identifing the profile object
* tagType - the tag name of the element whose data is required
* dwOffset - offset within the element data from which to retrieve
* pcbSize - number of bytes to get. On return it is the number of
* bytes retrieved
* pBuffer - pointer to buffer to recieve data
* Returns:
* TRUE if successful, FALSE otherwise
* Comments:
* If pBuffer is NULL, it returns size of data in *pcbSize and ignores
* dwOffset.
*/
BOOL WINAPI GetColorProfileElement(
HPROFILE hProfile,
TAGTYPE tagType,
DWORD dwOffset,
PDWORD pcbSize,
PVOID pBuffer,
PBOOL pbReference
)
{
PPROFOBJ pProfObj;
PTAGDATA pTagData;
DWORD nCount, nBytes, i;
BOOL found;
BOOL rc = FALSE; // Assume failure
TRACEAPI((__TEXT("GetColorProfileElement\n")));
// Validate parameters
if (!ValidHandle(hProfile, OBJ_PROFILE) ||
!pcbSize ||
IsBadWritePtr(pcbSize, sizeof(DWORD)) ||
!pbReference ||
IsBadWritePtr(pbReference, sizeof(BOOL))
)
{
WARNING((__TEXT("Invalid parameter to GetColorProfileElement\n")));
SetLastError(ERROR_INVALID_PARAMETER);
return FALSE;
}
pProfObj = (PPROFOBJ)HDLTOPTR(hProfile);
ASSERT(pProfObj != NULL);
// Check the integrity of the profile
if (!ValidProfile(pProfObj))
{
WARNING((__TEXT("Invalid profile passed to GetColorProfileElement\n")));
SetLastError(ERROR_INVALID_PROFILE);
return FALSE;
}
// Get count of tag items - it is right after the profile header
nCount = TAG_COUNT(pProfObj);
nCount = FIX_ENDIAN(nCount);
// Tag data records follow the count.
pTagData = TAG_DATA(pProfObj);
// Check if any of these records match the tag passed in.
found = FALSE;
tagType = FIX_ENDIAN(tagType); // to match tags in profile
for (i=0; i<nCount; i++)
{
if (pTagData->tagType == tagType)
{
found = TRUE;
break;
}
pTagData++; // next record
}
if (found)
{
// If pBuffer is NULL, copy size of data
if (!pBuffer)
{
*pcbSize = FIX_ENDIAN(pTagData->cbSize);
SetLastError(ERROR_INSUFFICIENT_BUFFER);
}
else
{
// pBuffer is not NULL, get number of bytes to copy
if (dwOffset >= FIX_ENDIAN(pTagData->cbSize))
{
WARNING((__TEXT("dwOffset too large for GetColorProfileElement\n")));
SetLastError(ERROR_INVALID_PARAMETER);
return FALSE;
}
else if (dwOffset + *pcbSize > FIX_ENDIAN(pTagData->cbSize))
{
nBytes = FIX_ENDIAN(pTagData->cbSize) - dwOffset;
}
else
{
nBytes = *pcbSize;
}
// Check if output buffer is large enough
if (IsBadWritePtr(pBuffer, nBytes))
{
WARNING((__TEXT("Bad buffer passed to GetColorProfileElement\n")));
SetLastError(ERROR_INVALID_PARAMETER);
return FALSE;
}
// Copy the data into user supplied buffer
CopyMemory((PVOID)pBuffer,
(PVOID)(pProfObj->pView + FIX_ENDIAN(pTagData->dwOffset)
+ dwOffset), nBytes);
*pcbSize = nBytes;
rc = TRUE; // Success!
}
// Check if multiple tags reference this tag's data
*pbReference = IsReferenceTag(pProfObj, pTagData);
}
else
{
SetLastError(ERROR_TAG_NOT_FOUND);
}
return rc;
}
/*
* SetColorProfileElementSize
* Function:
* This functions sets the data size of a tagged element. If the element
* is already present in the profile it's size is changed, and the data
* is truncated or extended as the case may be. If the element is not
* present, it is created and the data is filled with zeroes.
* Arguments:
* hProfile - handle identifing the profile object
* tagType - the tag name of the element
* cbSize - new size for the element data
* Returns:
* TRUE if successful, FALSE otherwise
* Comments:
* If cbSize is 0, and the element is present, it is deleted.
*/
BOOL WINAPI SetColorProfileElementSize(
HPROFILE hProfile,
TAGTYPE tagType,
DWORD cbSize
)
{
PTAGDATA pTagData;
PPROFOBJ pProfObj;
DWORD i, nCount, newSize;
TAGTYPE rawTag;
BOOL found, rc = FALSE;
TRACEAPI((__TEXT("SetColorProfileElementSize\n")));
// Validate parameters
if (!ValidHandle(hProfile, OBJ_PROFILE))
{
WARNING((__TEXT("Invalid parameter to SetColorProfileElementSize\n")));
SetLastError(ERROR_INVALID_PARAMETER);
return FALSE;
}
pProfObj = (PPROFOBJ)HDLTOPTR(hProfile);
ASSERT(pProfObj != NULL);
// Check the integrity of the profile
if (!ValidProfile(pProfObj))
{
WARNING((__TEXT("Invalid profile passed to SetColorProfileElementSize\n")));
SetLastError(ERROR_INVALID_PROFILE);
return FALSE;
}
// Check if profile has write access
if (!(pProfObj->dwFlags & READWRITE_ACCESS))
{
WARNING((__TEXT("Writing to a profile without read/write access\n")));
SetLastError(ERROR_ACCESS_DENIED);
return FALSE;
}
// Get count of tag items - it is right after the profile header
nCount = TAG_COUNT(pProfObj);
nCount = FIX_ENDIAN(nCount);
// Tag data records follow the count.
pTagData = TAG_DATA(pProfObj);
// Check if any of these records match the tag passed in.
found = FALSE;
rawTag = FIX_ENDIAN(tagType);
for (i=0; i<nCount; i++)
{
if (pTagData->tagType == rawTag)
{
found = TRUE;
break;
}
pTagData++; // Next record
}
if (found)
{
// If it is a reference tag, create data area for it
if (IsReferenceTag(pProfObj, pTagData))
{
if (cbSize == 0)
{
PTAGDATA pTemp;
// Move everything after the tag table entry up
// by size of one tag table entry.
MoveProfileData(pProfObj, (PBYTE)(pTagData+1), (PBYTE)pTagData,
PROFILE_SIZE(pProfObj) - (LONG)((PBYTE)(pTagData+1) - VIEW(pProfObj)), TRUE);
// Go through the tag table and update the pointers
pTemp = TAG_DATA(pProfObj);
// Get count of tag items - it is right after the profile header
nCount = TAG_COUNT(pProfObj);
nCount = FIX_ENDIAN(nCount) - 1;
TAG_COUNT(pProfObj) = FIX_ENDIAN(nCount);
for (i=0; i<nCount; i++)
{
DWORD dwTemp = FIX_ENDIAN(pTemp->dwOffset);
dwTemp -= sizeof(TAGDATA);
pTemp->dwOffset = FIX_ENDIAN(dwTemp);
pTemp++; // Next record
}
// Use nCount as a placeholder to calculate file size
nCount = FIX_ENDIAN(HEADER(pProfObj)->phSize) - sizeof(TAGDATA);
HEADER(pProfObj)->phSize = FIX_ENDIAN(nCount);
}
else
{
DWORD dwOffset;
// Resize the profile if needed. For memory buffers, we have to realloc,
// and for mapped objects, we have to close and reopen the view.
newSize = FIX_ENDIAN(HEADER(pProfObj)->phSize);
newSize = DWORD_ALIGN(newSize) + cbSize;
// Check for overflow
if (newSize < FIX_ENDIAN(HEADER(pProfObj)->phSize) ||
newSize < cbSize)
{
WARNING((__TEXT("Overflow in setting reference element size\n")));
SetLastError(ERROR_ARITHMETIC_OVERFLOW);
return FALSE;
}
if (newSize > pProfObj->dwMapSize)
{
//Sundown: dwOffset should not be over 4gb
DWORD dwOffset = (ULONG)(ULONG_PTR)(pTagData - TAG_DATA(pProfObj));
if (! GrowProfile(pProfObj, newSize))
{
return FALSE;
}
// Recalculate pointers as mapping or memory pointer
// could have changed when growing profile
pTagData = TAG_DATA(pProfObj) + dwOffset;
}
// Calculate location of new data - should be DWORD aligned
dwOffset = DWORD_ALIGN(FIX_ENDIAN(HEADER(pProfObj)->phSize));
pTagData->dwOffset = FIX_ENDIAN(dwOffset);
// Set final file size
HEADER(pProfObj)->phSize = FIX_ENDIAN(dwOffset+cbSize);
}
rc = TRUE;
}
else
{
if (cbSize == 0)
{
rc = DeleteTaggedElement(pProfObj, pTagData);
}
else
{
DWORD cbOldSize;
// Get current size of element
cbOldSize = FIX_ENDIAN(pTagData->cbSize);
// Compress or expand the file as the case may be.
if (cbSize > cbOldSize)
{
//Sundown: dwOffset should be safe to truncate
DWORD dwOffset = (ULONG)(ULONG_PTR)(pTagData - TAG_DATA(pProfObj));
// Check for overflow
newSize = PROFILE_SIZE(pProfObj) + DWORD_ALIGN(cbSize) -
DWORD_ALIGN(cbOldSize);
if (newSize < PROFILE_SIZE(pProfObj))
{
WARNING((__TEXT("Overflow in increasing element size\n")));
SetLastError(ERROR_ARITHMETIC_OVERFLOW);
return FALSE;
}
if (!GrowProfile(pProfObj, newSize))
{
return FALSE;
}
// Recompute pointers
pTagData = TAG_DATA(pProfObj) + dwOffset;
}
rc = ChangeTaggedElementSize(pProfObj, pTagData, cbSize);
}
}
}
else
{
if (cbSize == 0)
{
WARNING((__TEXT("SetColorProfileElementSize (deleting): Tag not found\n")));
SetLastError(ERROR_TAG_NOT_FOUND);
}
else
{
rc = AddTaggedElement(pProfObj, tagType, cbSize);
}
}
return rc;
}
/*
* SetColorProfileElement
* Function:
* This functions sets the data for a tagged element. It does not
* change the size of the element, and only writes as much data as
* would fit within the current size, overwriting any existing data.
* Arguments:
* hProfile - handle identifing the profile object
* tagType - the tag name of the element
* dwOffset - offset within the element data from which to write
* pcbSize - number of bytes to write. On return it is the number of
* bytes written.
* pBuffer - pointer to buffer having data to write
* Returns:
* TRUE if successful, FALSE otherwise
*/
BOOL WINAPI SetColorProfileElement(
HPROFILE hProfile,
TAGTYPE tagType,
DWORD dwOffset,
PDWORD pcbSize,
PVOID pBuffer
)
{
PPROFOBJ pProfObj;
PTAGDATA pTagData;
DWORD nCount, nBytes, i;
BOOL found;
BOOL rc = FALSE; // Assume failure
TRACEAPI((__TEXT("SetColorProfileElement\n")));
// Validate parameters
if (!ValidHandle(hProfile, OBJ_PROFILE) ||
!pcbSize ||
IsBadWritePtr(pcbSize, sizeof(DWORD)) ||
!pBuffer ||
IsBadReadPtr(pBuffer, *pcbSize)
)
{
WARNING((__TEXT("Invalid parameter to SetColorProfileElement\n")));
SetLastError(ERROR_INVALID_PARAMETER);
return FALSE;
}
pProfObj = (PPROFOBJ)HDLTOPTR(hProfile);
ASSERT(pProfObj != NULL);
// Check the integrity of the profile
if (!ValidProfile(pProfObj))
{
WARNING((__TEXT("Invalid profile passed to SetColorProfileElement\n")));
SetLastError(ERROR_INVALID_PROFILE);
return FALSE;
}
// Check if profile has write access
if (!(pProfObj->dwFlags & READWRITE_ACCESS))
{
WARNING((__TEXT("Writing to a profile without read/write access\n")));
SetLastError(ERROR_ACCESS_DENIED);
return FALSE;
}
// Get count of tag items - it is right after the profile header
nCount = TAG_COUNT(pProfObj);
nCount = FIX_ENDIAN(nCount);
// Tag data records follow the count.
pTagData = TAG_DATA(pProfObj);
// Check if any of these records match the tag passed in
found = FALSE;
tagType = FIX_ENDIAN(tagType);
for (i=0; i<nCount; i++)
{
if (pTagData->tagType == tagType)
{
found = TRUE;
break;
}
pTagData++; // Next record
}
if (found)
{
// If it is a reference tag, create new space for it
if (IsReferenceTag(pProfObj, pTagData))
{
SetColorProfileElementSize(hProfile, tagType, FIX_ENDIAN(pTagData->cbSize));
}
// Get number of bytes to set
if (dwOffset >= FIX_ENDIAN(pTagData->cbSize))
{
WARNING((__TEXT("dwOffset too large for SetColorProfileElement\n")));
SetLastError(ERROR_INVALID_PARAMETER);
return FALSE;
}
else if (dwOffset + *pcbSize > FIX_ENDIAN(pTagData->cbSize))
{
nBytes = FIX_ENDIAN(pTagData->cbSize) - dwOffset;
}
else
{
nBytes = *pcbSize;
}
// Copy the data into the profile
CopyMemory((PVOID)(pProfObj->pView + FIX_ENDIAN(pTagData->dwOffset)
+ dwOffset), (PVOID)pBuffer, nBytes);
*pcbSize = nBytes;
rc = TRUE;
}
else
{
WARNING((__TEXT("SetColorProfileElement: Tag not found\n")));
SetLastError(ERROR_TAG_NOT_FOUND);
}
return rc;
}
/*
* SetColorProfileElementReference
* Function:
* This functions creates a new tag and makes it refer to the same
* data as an existing tag.
* Arguments:
* hProfile - handle identifing the profile object
* newTag - new tag to create
* refTag - reference tag whose data newTag should refer to
* Returns:
* TRUE if successful, FALSE otherwise
*/
BOOL WINAPI SetColorProfileElementReference(
HPROFILE hProfile,
TAGTYPE newTag,
TAGTYPE refTag
)
{
PPROFOBJ pProfObj;
PTAGDATA pTagData, pOrigTag;
DWORD nCount, i;
BOOL found;
BOOL rc = FALSE; // Assume failure
TRACEAPI((__TEXT("SetColorProfileElementReference\n")));
// Validate parameters
if (!ValidHandle(hProfile, OBJ_PROFILE))
{
WARNING((__TEXT("Invalid parameter to SetColorProfileElementReference\n")));
SetLastError(ERROR_INVALID_PARAMETER);
return FALSE;
}
pProfObj = (PPROFOBJ)HDLTOPTR(hProfile);
ASSERT(pProfObj != NULL);
// Check the integrity of the profile
if (!ValidProfile(pProfObj))
{
WARNING((__TEXT("Invalid profile passed to SetColorProfileElementReference\n")));
SetLastError(ERROR_INVALID_PROFILE);
return FALSE;
}
// Check if profile has write access
if (!(pProfObj->dwFlags & READWRITE_ACCESS))
{
WARNING((__TEXT("Writing to a profile without read/write access\n")));
SetLastError(ERROR_ACCESS_DENIED);
return FALSE;
}
// Get count of tag items - it is right after the profile header
nCount = TAG_COUNT(pProfObj);
nCount = FIX_ENDIAN(nCount);
// Tag data records follow the count.
pTagData = TAG_DATA(pProfObj);
// Check if any of these records match the tag passed in
found = FALSE;
refTag = FIX_ENDIAN(refTag);
for (i=0; i<nCount; i++)
{
if (pTagData->tagType == refTag)
{
pOrigTag = pTagData;
found = TRUE;
}
if (pTagData->tagType == FIX_ENDIAN(newTag))
{
WARNING((__TEXT("Duplicate tag present in SetColorProfileElementReference %x\n"), newTag));
SetLastError(ERROR_DUPLICATE_TAG);
return FALSE;
}
pTagData++; // Next record
}
if (found)
{
DWORD newSize;
// Grow profile if needed
newSize = FIX_ENDIAN(HEADER(pProfObj)->phSize);
newSize = DWORD_ALIGN(newSize) + sizeof(TAGDATA);
// Check for overflow
if (newSize < FIX_ENDIAN(HEADER(pProfObj)->phSize))
{
WARNING((__TEXT("Overflow in adding element\n")));
SetLastError(ERROR_ARITHMETIC_OVERFLOW);
return FALSE;
}
if (newSize > pProfObj->dwMapSize)
{
//Sundown: safe truncation
DWORD dwOffset = (ULONG)(ULONG_PTR)(pOrigTag - TAG_DATA(pProfObj));
if (! GrowProfile(pProfObj, newSize))
{
return FALSE;
}
// Recalculate pointers as mapping or memory pointer
// could have changed when growing profile
pOrigTag = TAG_DATA(pProfObj) + dwOffset;
}
rc = AddTagTableEntry(pProfObj, newTag, FIX_ENDIAN(pOrigTag->dwOffset),
FIX_ENDIAN(pOrigTag->cbSize), FALSE);
}
else
{
WARNING((__TEXT("SetColorProfileElementReference: Tag 0x%x not found\n"),
FIX_ENDIAN(refTag))); // Re-fix it to reflect data passed in
SetLastError(ERROR_TAG_NOT_FOUND);
}
return rc;
}
/*
* GetColorProfileHeader
* Function:
* This functions retrieves the header of a profile
* Arguments:
* hProfile - handle identifing the profile object
* pHeader - pointer to buffer to recieve the header
* Returns:
* TRUE if successful, FALSE otherwise
*/
BOOL WINAPI GetColorProfileHeader(
HPROFILE hProfile,
PPROFILEHEADER pHeader
)
{
PPROFOBJ pProfObj;
DWORD nCount, i, temp;
TRACEAPI((__TEXT("GetColorProfileHeader\n")));
// Validate parameters
if (!ValidHandle(hProfile, OBJ_PROFILE) ||
IsBadWritePtr(pHeader, sizeof(PROFILEHEADER)))
{
WARNING((__TEXT("Invalid parameter to GetColorProfileHeader\n")));
SetLastError(ERROR_INVALID_PARAMETER);
return FALSE;
}
pProfObj = (PPROFOBJ)HDLTOPTR(hProfile);
ASSERT(pProfObj != NULL);
// Check the integrity of the profile.
if (!ValidProfile(pProfObj))
{
WARNING((__TEXT("Invalid profile passed to GetColorProfileHeader\n")));
SetLastError(ERROR_INVALID_PROFILE);
return FALSE;
}
CopyMemory((PVOID)pHeader, (PVOID)pProfObj->pView,
sizeof(PROFILEHEADER));
// Fix up all fields to platform specific values.
// The following code assumes that the profile header is a
// multiple of DWORDs which it is!
ASSERT(sizeof(PROFILEHEADER) % sizeof(DWORD) == 0);
nCount = sizeof(PROFILEHEADER)/sizeof(DWORD);
for (i=0; i<nCount;i++)
{
temp = (DWORD)((PDWORD)pHeader)[i];
((PDWORD)pHeader)[i] = FIX_ENDIAN(temp);
}
return TRUE;
}
/*
* SetColorProfileHeader
* Function:
* This functions sets the header of a profile
* Arguments:
* hProfile - handle identifing the profile object
* pHeader - pointer to buffer identifing the header
* Returns:
* TRUE if successful, FALSE otherwise
*/
BOOL WINAPI SetColorProfileHeader(
HPROFILE hProfile,
PPROFILEHEADER pHeader
)
{
PPROFOBJ pProfObj;
DWORD nCount, i, temp;
TRACEAPI((__TEXT("SetColorProfileHeader\n")));
// Validate parameters
if (!ValidHandle(hProfile, OBJ_PROFILE) ||
IsBadReadPtr(pHeader, sizeof(PROFILEHEADER)))
{
WARNING((__TEXT("Invalid parameter to SetColorProfileHeader\n")));
SetLastError(ERROR_INVALID_PARAMETER);
return FALSE;
}
pProfObj = (PPROFOBJ)HDLTOPTR(hProfile);
ASSERT(pProfObj != NULL);
// Check if profile has write access
if (!(pProfObj->dwFlags & READWRITE_ACCESS))
{
WARNING((__TEXT("Writing to a profile without read/write access\n")));
SetLastError(ERROR_ACCESS_DENIED);
return FALSE;
}
// Fix up all fields to BIG-ENDIAN.
// The following code assumes that the profile header is a
// multiple of DWORDs which it is!
ASSERT(sizeof(PROFILEHEADER) % sizeof(DWORD) == 0);
nCount = sizeof(PROFILEHEADER)/sizeof(DWORD);
for (i=0; i<nCount;i++)
{
temp = (DWORD)((PDWORD)pHeader)[i];
((PDWORD)pHeader)[i] = FIX_ENDIAN(temp);
}
CopyMemory((PVOID)pProfObj->pView, (PVOID)pHeader,
sizeof(PROFILEHEADER));
// Put back app supplied buffer the way it came in
for (i=0; i<nCount;i++)
{
temp = (DWORD)((PDWORD)pHeader)[i];
((PDWORD)pHeader)[i] = FIX_ENDIAN(temp);
}
return TRUE;
}
/*
* GetPS2ColorSpaceArray
* Function:
* This functions retrieves the PostScript Level 2 CSA from the profile
* Arguments:
* hProfile - handle identifing the profile object
* dwIntent - rendering intent of CSA
* dwCSAType - type of CSA
* pbuffer - pointer to receive the CSA
* pcbSize - pointer to size of buffer. If function fails because
* buffer is not big enough, it is filled with required size.
* pcbBinary - TRUE if binary data is requested. On return it is set to
* reflect the data returned
* Returns:
* TRUE if successful, FALSE otherwise
*/
BOOL WINAPI
GetPS2ColorSpaceArray (
HPROFILE hProfile,
DWORD dwIntent,
DWORD dwCSAType,
PBYTE pBuffer,
PDWORD pcbSize,
LPBOOL pbBinary
)
{
PPROFOBJ pProfObj;
PCMMOBJ pCMMObj;
DWORD cmmID;
BOOL rc;
TRACEAPI((__TEXT("GetPS2ColorSpaceArray\n")));
// Validate parameters
if (!ValidHandle(hProfile, OBJ_PROFILE) ||
IsBadWritePtr(pcbSize, sizeof(DWORD)) ||
(pBuffer &&
IsBadWritePtr(pBuffer, *pcbSize)
) ||
IsBadWritePtr(pbBinary, sizeof(BOOL))
)
{
WARNING((__TEXT("Invalid parameter to GetPS2ColorSpaceArray\n")));
SetLastError(ERROR_INVALID_PARAMETER);
return FALSE;
}
pProfObj = (PPROFOBJ)HDLTOPTR(hProfile);
ASSERT(pProfObj != NULL);
// Check the integrity of the profile
if (!ValidProfile(pProfObj))
{
WARNING((__TEXT("Invalid profile passed to GetPS2ColorSpaceArray\n")));
SetLastError(ERROR_INVALID_PROFILE);
return FALSE;
}
// Check if application specified CMM is present
pCMMObj = GetPreferredCMM();
if (!pCMMObj || (pCMMObj->dwFlags & CMM_DONT_USE_PS2_FNS) ||
!pCMMObj->fns.pCMGetPS2ColorSpaceArray)
{
if (pCMMObj)
{
pCMMObj->dwFlags |= CMM_DONT_USE_PS2_FNS;
ReleaseColorMatchingModule(pCMMObj);
}
// Get CMM associated with profile. If it does not exist or does not
// support the CMGetPS2ColorSpaceArray function, get default CMM.
cmmID = HEADER(pProfObj)->phCMMType;
cmmID = FIX_ENDIAN(cmmID);
pCMMObj = GetColorMatchingModule(cmmID);
if (!pCMMObj || (pCMMObj->dwFlags & CMM_DONT_USE_PS2_FNS) ||
!pCMMObj->fns.pCMGetPS2ColorSpaceArray)
{
TERSE((__TEXT("CMM associated with profile could not be used")));
if (pCMMObj)
{
pCMMObj->dwFlags |= CMM_DONT_USE_PS2_FNS;
ReleaseColorMatchingModule(pCMMObj);
}
pCMMObj = GetColorMatchingModule(CMM_WINDOWS_DEFAULT);
if (!pCMMObj || !pCMMObj->fns.pCMGetPS2ColorSpaceArray)
{
WARNING((__TEXT("Default CMM doesn't support CMGetPS2ColorSpaceArray\n")));
if (pCMMObj)
{
ReleaseColorMatchingModule(pCMMObj);
pCMMObj = NULL;
}
}
}
}
ASSERT(pProfObj->pView != NULL);
if (pCMMObj)
{
rc = pCMMObj->fns.pCMGetPS2ColorSpaceArray(hProfile, dwIntent, dwCSAType,
pBuffer, pcbSize, pbBinary);
}
else
{
rc = InternalGetPS2ColorSpaceArray(pProfObj->pView, dwIntent,
dwCSAType, pBuffer, pcbSize, pbBinary);
}
if (pCMMObj)
{
ReleaseColorMatchingModule(pCMMObj);
}
VERBOSE((__TEXT("GetPS2ColorSpaceArray returning %s\n"),
rc ? "TRUE" : "FALSE"));
return rc;
}
/*
* GetPS2ColorRenderingIntent
* Function:
* This functions retrieves the PostScript Level 2 color rendering intent
* from the profile
* Arguments:
* hProfile - handle identifing the profile object
* pbuffer - pointer to receive the color rendering intent
* pcbSize - pointer to size of buffer. If function fails because
* buffer is not big enough, it is filled with required size.
* pcbBinary - TRUE if binary data is requested. On return it is set to
* reflect the data returned
* Returns:
* TRUE if successful, FALSE otherwise
*/
BOOL WINAPI GetPS2ColorRenderingIntent(
HPROFILE hProfile,
DWORD dwIntent,
PBYTE pBuffer,
PDWORD pcbSize
)
{
PPROFOBJ pProfObj;
PCMMOBJ pCMMObj;
DWORD cmmID;
BOOL rc;
TRACEAPI((__TEXT("GetPS2ColorRenderingIntent\n")));
// Validate parameters
if (!ValidHandle(hProfile, OBJ_PROFILE) ||
IsBadWritePtr(pcbSize, sizeof(DWORD)) ||
(pBuffer &&
IsBadWritePtr(pBuffer, *pcbSize)
)
)
{
WARNING((__TEXT("Invalid parameter to GetPS2ColorRenderingIntent\n")));
SetLastError(ERROR_INVALID_PARAMETER);
return FALSE;
}
pProfObj = (PPROFOBJ)HDLTOPTR(hProfile);
ASSERT(pProfObj != NULL);
// Check the integrity of the profile
if (!ValidProfile(pProfObj))
{
WARNING((__TEXT("Invalid profile passed to GetPS2ColorRenderingIntent\n")));
SetLastError(ERROR_INVALID_PROFILE);
return FALSE;
}
// Check if application specified CMM is present
pCMMObj = GetPreferredCMM();
if (!pCMMObj || (pCMMObj->dwFlags & CMM_DONT_USE_PS2_FNS) ||
!pCMMObj->fns.pCMGetPS2ColorRenderingIntent)
{
if (pCMMObj)
{
pCMMObj->dwFlags |= CMM_DONT_USE_PS2_FNS;
ReleaseColorMatchingModule(pCMMObj);
}
// Get CMM associated with profile. If it does not exist or does not
// support the CMGetPS2ColorSpaceArray function, get default CMM.
cmmID = HEADER(pProfObj)->phCMMType;
cmmID = FIX_ENDIAN(cmmID);
pCMMObj = GetColorMatchingModule(cmmID);
if (!pCMMObj || (pCMMObj->dwFlags & CMM_DONT_USE_PS2_FNS) ||
!pCMMObj->fns.pCMGetPS2ColorRenderingIntent)
{
TERSE((__TEXT("CMM associated with profile could not be used")));
if (pCMMObj)
{
pCMMObj->dwFlags |= CMM_DONT_USE_PS2_FNS;
ReleaseColorMatchingModule(pCMMObj);
}
pCMMObj = GetColorMatchingModule(CMM_WINDOWS_DEFAULT);
if (!pCMMObj || !pCMMObj->fns.pCMGetPS2ColorRenderingIntent)
{
WARNING((__TEXT("Default CMM doesn't support CMGetPS2ColorRenderingIntent\n")));
if (pCMMObj)
{
ReleaseColorMatchingModule(pCMMObj);
pCMMObj = NULL;
}
}
}
}
ASSERT(pProfObj->pView != NULL);
if (pCMMObj)
{
rc = pCMMObj->fns.pCMGetPS2ColorRenderingIntent(hProfile,
dwIntent, pBuffer, pcbSize);
}
else
{
rc = InternalGetPS2ColorRenderingIntent(pProfObj->pView, dwIntent,
pBuffer, pcbSize);
}
if (pCMMObj)
{
ReleaseColorMatchingModule(pCMMObj);
}
VERBOSE((__TEXT("GetPS2ColorRenderingIntent returning %s\n"),
rc ? "TRUE" : "FALSE"));
return rc;
}
/*
* GetPS2ColorRenderingDictionary
* Function:
* This functions retrieves the PostScript Level 2 CRD from the profile
* Arguments:
* hProfile - handle identifing the profile object
* dwIntent - intent whose CRD is required
* pbuffer - pointer to receive the CSA
* pcbSize - pointer to size of buffer. If function fails because
* buffer is not big enough, it is filled with required size.
* pcbBinary - TRUE if binary data is requested. On return it is set to
* reflect the data returned
* Returns:
* TRUE if successful, FALSE otherwise
*/
BOOL WINAPI GetPS2ColorRenderingDictionary(
HPROFILE hProfile,
DWORD dwIntent,
PBYTE pBuffer,
PDWORD pcbSize,
PBOOL pbBinary
)
{
PPROFOBJ pProfObj;
PCMMOBJ pCMMObj;
DWORD cmmID;
BOOL rc;
TRACEAPI((__TEXT("GetPS2ColorRenderingDictionary\n")));
// Validate parameters
if (!ValidHandle(hProfile, OBJ_PROFILE) ||
IsBadWritePtr(pcbSize, sizeof(DWORD)) ||
(pBuffer &&
IsBadWritePtr(pBuffer, *pcbSize)
) ||
IsBadWritePtr(pbBinary, sizeof(BOOL))
)
{
WARNING((__TEXT("Invalid parameter to GetPS2ColorRenderingDictionary\n")));
SetLastError(ERROR_INVALID_PARAMETER);
return FALSE;
}
pProfObj = (PPROFOBJ)HDLTOPTR(hProfile);
ASSERT(pProfObj != NULL);
// Check the integrity of the profile
if (!ValidProfile(pProfObj))
{
WARNING((__TEXT("Invalid profile passed to GetPS2ColorRenderingDictionary\n")));
SetLastError(ERROR_INVALID_PROFILE);
return FALSE;
}
// Check if application specified CMM is present
pCMMObj = GetPreferredCMM();
if (!pCMMObj || (pCMMObj->dwFlags & CMM_DONT_USE_PS2_FNS) ||
!pCMMObj->fns.pCMGetPS2ColorRenderingDictionary)
{
if (pCMMObj)
{
pCMMObj->dwFlags |= CMM_DONT_USE_PS2_FNS;
ReleaseColorMatchingModule(pCMMObj);
}
// Get CMM associated with profile. If it does not exist or does not
// support the CMGetPS2ColorSpaceArray function, get default CMM.
cmmID = HEADER(pProfObj)->phCMMType;
cmmID = FIX_ENDIAN(cmmID);
pCMMObj = GetColorMatchingModule(cmmID);
if (!pCMMObj || (pCMMObj->dwFlags & CMM_DONT_USE_PS2_FNS) ||
!pCMMObj->fns.pCMGetPS2ColorRenderingDictionary)
{
TERSE((__TEXT("CMM associated with profile could not be used")));
if (pCMMObj)
{
pCMMObj->dwFlags |= CMM_DONT_USE_PS2_FNS;
ReleaseColorMatchingModule(pCMMObj);
}
pCMMObj = GetColorMatchingModule(CMM_WINDOWS_DEFAULT);
if (!pCMMObj || !pCMMObj->fns.pCMGetPS2ColorRenderingDictionary)
{
WARNING((__TEXT("Default CMM doesn't support CMGetPS2ColorRenderingDictionary\n")));
if (pCMMObj)
{
ReleaseColorMatchingModule(pCMMObj);
pCMMObj = NULL;
}
}
}
}
ASSERT(pProfObj->pView != NULL);
if (pCMMObj)
{
rc = pCMMObj->fns.pCMGetPS2ColorRenderingDictionary(hProfile, dwIntent,
pBuffer, pcbSize, pbBinary);
}
else
{
rc = InternalGetPS2ColorRenderingDictionary(pProfObj->pView, dwIntent,
pBuffer, pcbSize, pbBinary);
}
if (pCMMObj)
{
ReleaseColorMatchingModule(pCMMObj);
}
VERBOSE((__TEXT("GetPS2ColorRenderingDictionary returning %s\n"),
rc ? "TRUE" : "FALSE"));
return rc;
}
/*
* GetNamedProfileInfo
* Function:
* This functions returns information about the given named color space
* profile. If fails if the given profile is not a named color space profile.
* Arguments:
* hProfile - handle identifying the named color space profile object
* pNamedProfileInfo - pointer to NAMED_PROFILE_INFO structure that is
* filled on retun if successful.
* Returns:
* TRUE if successful, FALSE otherwise
*/
BOOL WINAPI GetNamedProfileInfo(
HPROFILE hProfile,
PNAMED_PROFILE_INFO pNamedProfileInfo
)
{
PPROFOBJ pProfObj;
PCMMOBJ pCMMObj;
DWORD cmmID;
BOOL rc;
TRACEAPI((__TEXT("GetNamedProfileInfo\n")));
// Validate parameters
if (!ValidHandle(hProfile, OBJ_PROFILE) ||
!pNamedProfileInfo ||
IsBadWritePtr(pNamedProfileInfo, sizeof(NAMED_PROFILE_INFO)))
{
WARNING((__TEXT("Invalid parameter to GetNamedProfileInfo\n")));
SetLastError(ERROR_INVALID_PARAMETER);
return FALSE;
}
pProfObj = (PPROFOBJ)HDLTOPTR(hProfile);
ASSERT(pProfObj != NULL);
// Check the integrity of the profile
if (!ValidProfile(pProfObj))
{
WARNING((__TEXT("Invalid profile passed to GetNamedProfileInfo\n")));
SetLastError(ERROR_INVALID_PROFILE);
return FALSE;
}
// Check if application specified CMM is present
pCMMObj = GetPreferredCMM();
if (!pCMMObj ||
!pCMMObj->fns.pCMGetNamedProfileInfo)
{
if (pCMMObj)
{
ReleaseColorMatchingModule(pCMMObj);
}
// Get CMM associated with profile. If it does not exist or does not
// support the CMGetNamedProfileInfo function, get default CMM.
cmmID = HEADER(pProfObj)->phCMMType;
cmmID = FIX_ENDIAN(cmmID);
pCMMObj = GetColorMatchingModule(cmmID);
if (!pCMMObj ||
!pCMMObj->fns.pCMGetNamedProfileInfo)
{
TERSE((__TEXT("CMM associated with profile could not be used")));
if (pCMMObj)
{
ReleaseColorMatchingModule(pCMMObj);
}
pCMMObj = GetColorMatchingModule(CMM_WINDOWS_DEFAULT);
if (!pCMMObj || !pCMMObj->fns.pCMGetNamedProfileInfo)
{
RIP((__TEXT("Default CMM doesn't support CMValidateProfile")));
SetLastError(ERROR_INVALID_CMM);
if (pCMMObj)
{
ReleaseColorMatchingModule(pCMMObj);
}
return FALSE;
}
}
}
ASSERT(pProfObj->pView != NULL);
rc = pCMMObj->fns.pCMGetNamedProfileInfo(hProfile, pNamedProfileInfo);
ReleaseColorMatchingModule(pCMMObj);
return rc;
}
/*
* ConvertColorNameToIndex
* Function:
* This functions converts a given array of color names to color indices
* using the specified named color space profile
* Arguments:
* hProfile - handle identifing the named color space profile object
* paColorName - pointer to array of COLOR_NAME structures
* paIndex - pointer to array of DWORDs to receive the indices
* dwCount - number of color names to convert
* Returns:
* TRUE if successful, FALSE otherwise
*/
BOOL WINAPI ConvertColorNameToIndex(
HPROFILE hProfile,
PCOLOR_NAME paColorName,
PDWORD paIndex,
DWORD dwCount
)
{
PPROFOBJ pProfObj;
PCMMOBJ pCMMObj;
DWORD cmmID;
BOOL rc;
TRACEAPI((__TEXT("ConvertColorNameToIndex\n")));
// Validate parameters
if (!ValidHandle(hProfile, OBJ_PROFILE) ||
!paColorName ||
dwCount == 0 ||
IsBadReadPtr(paColorName, dwCount*sizeof(COLOR_NAME)) ||
!paIndex ||
IsBadWritePtr(paIndex, dwCount*sizeof(DWORD)))
{
WARNING((__TEXT("Invalid parameter to ConvertColorNameToIndex\n")));
SetLastError(ERROR_INVALID_PARAMETER);
return FALSE;
}
pProfObj = (PPROFOBJ)HDLTOPTR(hProfile);
ASSERT(pProfObj != NULL);
// Check the integrity of the profile
if (!ValidProfile(pProfObj))
{
WARNING((__TEXT("Invalid profile passed to ConvertColorNameToIndex\n")));
SetLastError(ERROR_INVALID_PROFILE);
return FALSE;
}
// Check if application specified CMM is present
pCMMObj = GetPreferredCMM();
if (!pCMMObj ||
!pCMMObj->fns.pCMConvertColorNameToIndex)
{
if (pCMMObj)
{
ReleaseColorMatchingModule(pCMMObj);
}
// Get CMM associated with profile. If it does not exist or does not
// support the CMConvertColorNameToIndex function, get default CMM.
cmmID = HEADER(pProfObj)->phCMMType;
cmmID = FIX_ENDIAN(cmmID);
pCMMObj = GetColorMatchingModule(cmmID);
if (!pCMMObj ||
!pCMMObj->fns.pCMConvertColorNameToIndex)
{
TERSE((__TEXT("CMM associated with profile could not be used")));
if (pCMMObj)
{
ReleaseColorMatchingModule(pCMMObj);
}
pCMMObj = GetColorMatchingModule(CMM_WINDOWS_DEFAULT);
if (!pCMMObj || !pCMMObj->fns.pCMConvertColorNameToIndex)
{
RIP((__TEXT("Default CMM doesn't support CMConvertColorNameToIndex")));
SetLastError(ERROR_INVALID_CMM);
if (pCMMObj)
{
ReleaseColorMatchingModule(pCMMObj);
}
return FALSE;
}
}
}
ASSERT(pProfObj->pView != NULL);
rc = pCMMObj->fns.pCMConvertColorNameToIndex(
hProfile,
paColorName,
paIndex,
dwCount);
ReleaseColorMatchingModule(pCMMObj);
return rc;
}
/*
* ConvertIndexToColorName
* Function:
* This functions converts a given array of color indices to color names
* using the specified named color space profile
* Arguments:
* hProfile - handle identifing the named color space profile object
* paIndex - pointer to array of color indices
* paColorName - pointer to array of COLOR_NAME structures
* dwCount - number of color indices to convert
* Returns:
* TRUE if successful, FALSE otherwise
*/
BOOL WINAPI ConvertIndexToColorName(
HPROFILE hProfile,
PDWORD paIndex,
PCOLOR_NAME paColorName,
DWORD dwCount
)
{
PPROFOBJ pProfObj;
PCMMOBJ pCMMObj;
DWORD cmmID;
BOOL rc;
TRACEAPI((__TEXT("ConvertIndexToColorName\n")));
// Validate parameters
if (!ValidHandle(hProfile, OBJ_PROFILE) ||
!paIndex ||
dwCount == 0 ||
IsBadWritePtr(paIndex, dwCount*sizeof(DWORD)) ||
!paColorName ||
IsBadReadPtr(paColorName, dwCount*sizeof(COLOR_NAME)))
{
WARNING((__TEXT("Invalid parameter to ConvertIndexToColorName\n")));
SetLastError(ERROR_INVALID_PARAMETER);
return FALSE;
}
pProfObj = (PPROFOBJ)HDLTOPTR(hProfile);
ASSERT(pProfObj != NULL);
// Check the integrity of the profile
if (!ValidProfile(pProfObj))
{
WARNING((__TEXT("Invalid profile passed to ConvertIndexToColorName\n")));
SetLastError(ERROR_INVALID_PROFILE);
return FALSE;
}
// Check if application specified CMM is present
pCMMObj = GetPreferredCMM();
if (!pCMMObj ||
!pCMMObj->fns.pCMConvertIndexToColorName)
{
if (pCMMObj)
{
ReleaseColorMatchingModule(pCMMObj);
}
// Get CMM associated with profile. If it does not exist or does not
// support the CMConvertIndexToColorName function, get default CMM.
cmmID = HEADER(pProfObj)->phCMMType;
cmmID = FIX_ENDIAN(cmmID);
pCMMObj = GetColorMatchingModule(cmmID);
if (!pCMMObj ||
!pCMMObj->fns.pCMConvertIndexToColorName)
{
TERSE((__TEXT("CMM associated with profile could not be used")));
if (pCMMObj)
{
ReleaseColorMatchingModule(pCMMObj);
}
pCMMObj = GetColorMatchingModule(CMM_WINDOWS_DEFAULT);
if (!pCMMObj || !pCMMObj->fns.pCMConvertIndexToColorName)
{
RIP((__TEXT("Default CMM doesn't support CMConvertIndexToColorName")));
SetLastError(ERROR_INVALID_CMM);
if (pCMMObj)
{
ReleaseColorMatchingModule(pCMMObj);
}
return FALSE;
}
}
}
ASSERT(pProfObj->pView != NULL);
rc = pCMMObj->fns.pCMConvertIndexToColorName(
hProfile,
paIndex,
paColorName,
dwCount);
ReleaseColorMatchingModule(pCMMObj);
return rc;
}
/*
* CreateDeviceLinkProfile
* Function:
* This functions creates a device link profile from the given set
* of profiles, using specified intents.
* Arguments:
* pahProfiles - pointer to array of handles of profiles
* nProfiles - number of profiles in array
* padwIntent - array of intents to use
* nIntents - size of array - can be 1 or nProfiles
* dwFlags - optimization flags
* pProfileData - pointer to pointer to buffer to receive data which
* this function allocates; caller needs to free.
* indexPreferredCMM - zero based index of profile which specifies
* preferred CMM to use.
* Returns:
* TRUE if successful, FALSE otherwise
*/
BOOL WINAPI CreateDeviceLinkProfile(
PHPROFILE pahProfiles,
DWORD nProfiles,
PDWORD padwIntent,
DWORD nIntents,
DWORD dwFlags,
PBYTE *pProfileData,
DWORD indexPreferredCMM
)
{
PPROFOBJ pProfObj;
PCMMOBJ pCMMObj;
DWORD cmmID, i;
BOOL rc;
TRACEAPI((__TEXT("CreateDeviceLinkProfile\n")));
// Validate parameters
if (nProfiles <= 1 ||
indexPreferredCMM >= nProfiles ||
pahProfiles == NULL ||
IsBadReadPtr(pahProfiles, sizeof(HPROFILE) * nProfiles) ||
padwIntent == NULL ||
((nIntents != nProfiles) && (nIntents != 1)) ||
IsBadReadPtr(padwIntent, nIntents * sizeof(DWORD)))
{
WARNING((__TEXT("Invalid parameter to CreateDeviceLinkProfile\n")));
SetLastError(ERROR_INVALID_PARAMETER);
return FALSE;
}
for (i=0; i<nProfiles; i++)
{
if ((pahProfiles[i] == NULL) ||
! ValidHandle(pahProfiles[i], OBJ_PROFILE))
{
WARNING((__TEXT("Invalid profile passed to CreateDeviceLinkProfile\n")));
SetLastError(ERROR_INVALID_PARAMETER);
return FALSE;
}
pProfObj = (PPROFOBJ)HDLTOPTR(pahProfiles[i]);
ASSERT(pProfObj != NULL);
ASSERT(pProfObj->pView != NULL);
// Quick check on the integrity of the profile
if (!ValidProfile(pProfObj))
{
WARNING((__TEXT("Invalid profile passed to CreateDeviceLinkProfile\n")));
SetLastError(ERROR_INVALID_PROFILE);
return FALSE;
}
if (i == indexPreferredCMM)
{
// Get ID of preferred CMM
cmmID = HEADER(pProfObj)->phCMMType;
cmmID = FIX_ENDIAN(cmmID);
}
}
// Get CMM associated with preferred profile. If it does not exist,
// get default CMM.
pCMMObj = GetColorMatchingModule(cmmID);
if (!pCMMObj || !pCMMObj->fns.pCMCreateDeviceLinkProfile)
{
TERSE((__TEXT("CMM associated with profile could not be used")));
if (pCMMObj)
{
ReleaseColorMatchingModule(pCMMObj);
}
pCMMObj = GetColorMatchingModule(CMM_WINDOWS_DEFAULT);
if (!pCMMObj)
{
RIP((__TEXT("Default CMM not found\n")));
SetLastError(ERROR_INVALID_CMM);
return FALSE;
}
}
ASSERT(pCMMObj->fns.pCMCreateDeviceLinkProfile != NULL);
rc = pCMMObj->fns.pCMCreateDeviceLinkProfile(
pahProfiles,
nProfiles,
padwIntent,
nIntents,
dwFlags,
pProfileData);
ReleaseColorMatchingModule(pCMMObj);
return rc;
}
/** Internal Functions **/
/*
* InternalOpenColorProfile
* Function:
* This functions opens a color profile specified by the pProfile
* parameter, creates an internal profile object, and returns a handle
* to it.
* Arguments:
* pProfile - ptr to a profile structure that specifies the profile
* to open
* dwDesiredAccess - specifies the mode in which to open the profile.
* Any combination of these values can be used:
* PROFILE_READ: Allows the app to read the profile.
* PROFILE_READWRITE: Allows the app to read and write to the profile.
* dwShareMode - specifies the mode to share the profile with other
* processes if it is a file. Any combination of these
* values can be used.
* 0 : Prevents the file from being shared.
* FILE_SHARE_READ: Allows opening for read only by other processes.
* FILE_SHARE_WRITE: Allows opening for write by other processes.
* dwCreationMode - specifies which actions to take on the profile while
* opening it (if it is a file). Any one of the following
* values can be used.
* CREATE_NEW: Creates a new file. Fails if one exists already.
* CREATE_ALWAYS: Always create a new file. Overwriting existing.
* OPEN_EXISTING: Open exisiting file. Fail if not found.
* OPEN_ALWAYS: Open existing. If not found, create a new one.
* TRUNCATE_EXISTING: Open existing and truncate to zero bytes. Fail
* if not found.
* Returns:
* Handle to open profile on success, zero on failure.
*/
HPROFILE InternalOpenColorProfile(
PPROFILE pProfile,
DWORD dwDesiredAccess,
DWORD dwShareMode,
DWORD dwCreationMode
)
{
SECURITY_ATTRIBUTES sa;
PPROFOBJ pProfObj;
HPROFILE hProfile;
DWORD dwMapSize;
BOOL bNewFile = FALSE;
BOOL bError = TRUE; // Assume failure
TRACEAPI((__TEXT("OpenColorProfile\n")));
// Validate parameters
if (!pProfile ||
IsBadReadPtr(pProfile, sizeof(PROFILE)) ||
(pProfile->pProfileData &&
IsBadReadPtr(pProfile->pProfileData, pProfile->cbDataSize)) ||
(!pProfile->pProfileData &&
(pProfile->cbDataSize != 0)) ||
(pProfile->dwType != PROFILE_FILENAME &&
pProfile->dwType != PROFILE_MEMBUFFER
) ||
(dwDesiredAccess != PROFILE_READ &&
dwDesiredAccess != PROFILE_READWRITE
)
)
{
WARNING((__TEXT("Invalid parameter to OpenColorProfile\n")));
SetLastError(ERROR_INVALID_PARAMETER);
return NULL;
}
// Allocate an object on the heap for the profile
hProfile = AllocateHeapObject(OBJ_PROFILE);
if (!hProfile)
{
WARNING((__TEXT("Could not allocate profile object\n")));
SetLastError(ERROR_NOT_ENOUGH_MEMORY);
return NULL;
}
pProfObj = (PPROFOBJ)HDLTOPTR(hProfile);
ASSERT(pProfObj != NULL);
// Copy profile information to our object
pProfObj->objHdr.dwUseCount = 1;
pProfObj->dwType = pProfile->dwType;
pProfObj->cbDataSize = pProfile->cbDataSize;
pProfObj->pProfileData = (PBYTE)MemAlloc(pProfile->cbDataSize + sizeof(TCHAR));
if (!pProfObj->pProfileData)
{
WARNING((__TEXT("Could not allocate memory for profile data\n")));
SetLastError(ERROR_NOT_ENOUGH_MEMORY);
goto EndOpenColorProfile;
}
CopyMemory((PVOID)pProfObj->pProfileData,
(PVOID)pProfile->pProfileData,
pProfile->cbDataSize);
if (pProfObj->dwType == PROFILE_FILENAME)
{
LPTSTR lpFilename;
if (!pProfile->pProfileData ||
pProfile->cbDataSize == 0 ||
lstrlen((LPCTSTR)pProfile->pProfileData) > MAX_PATH ||
pProfile->cbDataSize > (MAX_PATH * sizeof(TCHAR)))
{
WARNING((__TEXT("Invalid parameter to OpenColorProfile\n")));
SetLastError(ERROR_INVALID_PARAMETER);
goto EndOpenColorProfile;
}
// If only filename is given, it is wrt color directory
lpFilename = GetFilenameFromPath((LPTSTR)pProfObj->pProfileData);
if (lpFilename == pProfObj->pProfileData)
{
DWORD dwLen = MAX_PATH;
lpFilename = MemAlloc(dwLen);
if (!lpFilename)
{
WARNING((__TEXT("Could not allocate memory for file name\n")));
SetLastError(ERROR_NOT_ENOUGH_MEMORY);
goto EndOpenColorProfile;
}
(VOID)GetColorDirectory(NULL, lpFilename, &dwLen);
lstrcat(lpFilename, gszBackslash);
lstrcat(lpFilename, (LPTSTR)pProfObj->pProfileData);
MemFree(pProfObj->pProfileData);
pProfObj->pProfileData = (PVOID)lpFilename;
pProfObj->cbDataSize = MAX_PATH;
}
// File name already null terminates as we used GHND flag which
// zero initializes the allocated memory
// Create file mapping
pProfObj->dwFlags |= MEMORY_MAPPED;
if (dwCreationMode == OPEN_ALWAYS)
{
// If we find a zero length profile, we should error out
// saying it is a bad profile. If we create a zero length
// profile, it is fine. To distinguish these two cases, we
// check for file's existence and if present, change the
// creation mode to OPEN_EXISTING
if (GetFileAttributes(pProfObj->pProfileData) != (DWORD)-1)
{
dwCreationMode = OPEN_EXISTING;
}
}
// Set security attribute structure
sa.nLength = sizeof(SECURITY_ATTRIBUTES);
sa.lpSecurityDescriptor = NULL; // default security
sa.bInheritHandle = FALSE;
pProfObj->hFile = CreateFile(pProfObj->pProfileData,
(dwDesiredAccess == PROFILE_READWRITE) ? GENERIC_READ | GENERIC_WRITE : GENERIC_READ,
dwShareMode, &sa, dwCreationMode, FILE_FLAG_RANDOM_ACCESS, 0);
if (pProfObj->hFile == INVALID_HANDLE_VALUE)
{
WARNING((__TEXT("Err %ld, could not open profile %s\n"),
GetLastError(), pProfObj->pProfileData));
goto EndOpenColorProfile;
}
// Get size of file mapping. Add a cushion so that profile can
// be grown. When closing the profile, the file size is truncated
// to the size of the actual data. If the profile size grows beyond
// the cushion, it is continually grown in chunks.
dwMapSize = GetFileSize(pProfObj->hFile, NULL);
if (dwMapSize == 0)
{
if (dwCreationMode == OPEN_EXISTING)
{
WARNING((__TEXT("Invalid profile - zero length\n")));
SetLastError(ERROR_INVALID_PROFILE);
goto EndOpenColorProfile;
}
else
{
dwMapSize = PROFILE_GROWTHCUSHION;
bNewFile = TRUE;
}
}
pProfObj->hMap = CreateFileMapping(pProfObj->hFile, 0, (dwDesiredAccess == PROFILE_READWRITE) ? PAGE_READWRITE : PAGE_READONLY, 0, dwMapSize, 0);
if (!pProfObj->hMap)
{
WARNING((__TEXT("Err %ld, could not create map of profile %s\n"), GetLastError(), pProfObj->pProfileData));
goto EndOpenColorProfile;
}
pProfObj->dwMapSize = dwMapSize;
pProfObj->pView = (PBYTE)MapViewOfFile(pProfObj->hMap,
(dwDesiredAccess == PROFILE_READWRITE) ? FILE_MAP_ALL_ACCESS : FILE_MAP_READ,
0, 0, 0);
if (!pProfObj->pView)
{
WARNING((__TEXT("Err %ld, could not create view of profile %s\n"),
GetLastError(), pProfObj->pProfileData));
goto EndOpenColorProfile;
}
// If a new profile has been created, initialize size
// and tag table count
if (bNewFile && dwDesiredAccess == PROFILE_READWRITE)
{
HEADER(pProfObj)->phSize = FIX_ENDIAN(sizeof(PROFILEHEADER) +
sizeof(DWORD));
HEADER(pProfObj)->phVersion = 0x02000000;
HEADER(pProfObj)->phSignature = PROFILE_SIGNATURE;
TAG_COUNT(pProfObj) = 0;
}
}
else
{
if (pProfile->cbDataSize == 0)
{
// Allocate a small buffer and create a new profile in it
pProfObj->cbDataSize = PROFILE_GROWTHCUSHION;
MemFree(pProfObj->pProfileData);
pProfObj->pView = pProfObj->pProfileData = MemAlloc(pProfObj->cbDataSize);
if (!pProfObj->pView)
{
WARNING((__TEXT("Could not allocate memory for profile data\n")));
SetLastError(ERROR_NOT_ENOUGH_MEMORY);
goto EndOpenColorProfile;
}
HEADER(pProfObj)->phSize = FIX_ENDIAN(sizeof(PROFILEHEADER) +
sizeof(DWORD));
HEADER(pProfObj)->phVersion = 0x02000000;
HEADER(pProfObj)->phSignature = PROFILE_SIGNATURE;
TAG_COUNT(pProfObj) = 0;
pProfObj->dwMapSize = pProfObj->cbDataSize;
}
else
{
// Treat buffer as view of file
pProfObj->pView = pProfObj->pProfileData;
pProfObj->dwMapSize = pProfObj->cbDataSize;
// Do a sanity check on the profile
if (!ValidProfile(pProfObj))
{
WARNING((__TEXT("Invalid profile passed to OpenColorProfile\n")));
SetLastError(ERROR_INVALID_PROFILE);
goto EndOpenColorProfile;
}
}
}
if (dwDesiredAccess == PROFILE_READWRITE)
pProfObj->dwFlags |= READWRITE_ACCESS;
bError = FALSE; // Success!
EndOpenColorProfile:
if (bError)
{
if (hProfile)
FreeProfileObject(hProfile);
hProfile = NULL;
}
return hProfile;
}
/*
* InternalCreateProfileFromLCS
* Function:
* This functions takes a logical color space and creates an ICC profile
* Arguments:
* pLogColorSpace - Pointer to LogColorSpace structure
* pBuffer - Pointer to pointer to buffer. This function allocates and
* fills this buffer with the profile on success.
* Returns:
* TRUE if successful, FALSE otherwise
*/
BOOL InternalCreateProfileFromLCS(
LPLOGCOLORSPACE pLogColorSpace,
PBYTE *pBuffer,
BOOL bValidateParams
)
{
PCMMOBJ pCMMObj = NULL;
BOOL rc;
// Validate parameters
if (bValidateParams &&
(! pLogColorSpace ||
IsBadReadPtr(pLogColorSpace, sizeof(LOGCOLORSPACE)) ||
pLogColorSpace->lcsFilename[0] != '\0'))
{
WARNING((__TEXT("Invalid parameter to CreateProfileFromLogColorSpace\n")));
SetLastError(ERROR_INVALID_PARAMETER);
return FALSE;
}
// We use the default CMM for this
pCMMObj = GetColorMatchingModule(CMM_WINDOWS_DEFAULT);
if (!pCMMObj)
{
RIP((__TEXT("Default CMM not found\n")));
SetLastError(ERROR_INVALID_CMM);
return FALSE;
}
ASSERT(pCMMObj->fns.pCMCreateProfile != NULL);
rc = pCMMObj->fns.pCMCreateProfile(pLogColorSpace, pBuffer);
ReleaseColorMatchingModule(pCMMObj);
return rc;
}
/*
* FreeProfileObject
* Function:
* This functions frees a profile object and associated memory
* Arguments:
* hProfile - handle identifing the profile object to free
* Returns:
* TRUE if successful, FALSE otherwise
*/
BOOL FreeProfileObject(
HANDLE hProfile
)
{
PPROFOBJ pProfObj;
DWORD dwFileSize;
DWORD dwErr;
ASSERT(hProfile != NULL);
pProfObj = (PPROFOBJ)HDLTOPTR(hProfile);
ASSERT(pProfObj != NULL);
dwErr = GetLastError(); // remember any errors we may have set
// Free memory associated with profile data
if (pProfObj->pProfileData)
MemFree((PVOID)pProfObj->pProfileData);
// If it a memory mapped profile, unmap it
if (pProfObj->dwFlags & MEMORY_MAPPED)
{
if (pProfObj->pView)
{
dwFileSize = FIX_ENDIAN(HEADER(pProfObj)->phSize);
UnmapViewOfFile(pProfObj->pView);
}
if (pProfObj->hMap)
CloseHandle(pProfObj->hMap);
if (pProfObj->hFile)
{
// Set the size of the file correctly
SetFilePointer(pProfObj->hFile, dwFileSize, NULL, FILE_BEGIN);
SetEndOfFile(pProfObj->hFile);
CloseHandle(pProfObj->hFile);
}
}
// Free heap object
pProfObj->objHdr.dwUseCount--; // decrement before freeing
FreeHeapObject(hProfile);
if (dwErr)
{
SetLastError(dwErr); // reset our error
}
return TRUE;
}
/*
* GrowProfile
* Function:
* This functions grows a profile to the new size
* Arguments:
* pProfObj - pointer to profile object
* dwNewSize - new size for the profile
* Returns:
* TRUE if successful, FALSE otherwise
*/
BOOL GrowProfile(
PPROFOBJ pProfObj,
DWORD dwNewSize
)
{
if (pProfObj->dwMapSize >= dwNewSize)
return TRUE;
// Add cushion for future growth
dwNewSize += PROFILE_GROWTHCUSHION;
if (pProfObj->dwFlags & MEMORY_MAPPED)
{
// Profile is a memory mapped file
// Close previous view and map
UnmapViewOfFile(pProfObj->pView);
CloseHandle(pProfObj->hMap);
pProfObj->hMap = CreateFileMapping(pProfObj->hFile, 0, PAGE_READWRITE, 0, dwNewSize, 0);
if (!pProfObj->hMap)
{
WARNING((__TEXT("Err %ld, could not recreate map of profile %s\n"), GetLastError(), pProfObj->pProfileData));
return FALSE;
}
pProfObj->pView = (PBYTE) MapViewOfFile(pProfObj->hMap, FILE_MAP_ALL_ACCESS, 0, 0, 0);
if (!pProfObj->pView)
{
WARNING((__TEXT("Err %ld, could not recreate view of profile %s\n"),
GetLastError(), pProfObj->pProfileData));
return FALSE;
}
// Set new size
pProfObj->dwMapSize = dwNewSize;
}
else
{
// Profile is an in-memory buffer
PVOID pTemp = MemReAlloc(pProfObj->pView, dwNewSize);
if (!pTemp)
{
WARNING((__TEXT("Error reallocating memory\n")));
return FALSE;
}
pProfObj->pView = pProfObj->pProfileData = pTemp;
pProfObj->cbDataSize = pProfObj->dwMapSize = dwNewSize;
}
return TRUE;
}
/*
* AddTagTableEntry
* Function:
* This functions adds a tag to the tag table
* Arguments:
* pProfObj - pointer to profile object
* tagType - tag to add
* dwOffset - offset of tag data from start of file
* cbSize - size of tag data
* bNewData - TRUE if new tag is not a reference to existing data
* Returns:
* TRUE if successful, FALSE otherwise
*/
BOOL AddTagTableEntry(
PPROFOBJ pProfObj,
TAGTYPE tagType,
DWORD dwOffset,
DWORD cbSize,
BOOL bNewData
)
{
PTAGDATA pTagData;
PBYTE src, dest;
DWORD nCount;
DWORD cnt, i;
// Get count of tag items - it is right after the profile header
nCount = TAG_COUNT(pProfObj);
nCount = FIX_ENDIAN(nCount);
// Increase count of tag elements by 1, and add new tag to end of
// tag table. Move all data below tag table downwards by the size
// of one tag table entry.
nCount++;
dest = (PBYTE)TAG_DATA(pProfObj) + nCount * sizeof(TAGDATA);
src = (PBYTE)TAG_DATA(pProfObj) + (nCount - 1) * sizeof(TAGDATA);
// # bytes to move = file size - header - tag count - tag table
cnt = FIX_ENDIAN(HEADER(pProfObj)->phSize) - sizeof(PROFILEHEADER) -
sizeof(DWORD) - (nCount - 1) * sizeof(TAGDATA);
if (cnt > 0)
{
// NOTE: CopyMemory() doesn't work for overlapped memory.
// Use internal function instead.
MyCopyMemory((PVOID)dest, (PVOID)src, cnt);
}
TAG_COUNT(pProfObj) = FIX_ENDIAN(nCount);
pTagData = (PTAGDATA)src;
pTagData->tagType = FIX_ENDIAN(tagType);
pTagData->cbSize = FIX_ENDIAN(cbSize);
pTagData->dwOffset = FIX_ENDIAN(dwOffset);
// Go through the tag table and update the offsets of all elements
// by the size of one tag table entry that we inserted.
pTagData = TAG_DATA(pProfObj);
for (i=0; i<nCount; i++)
{
cnt = FIX_ENDIAN(pTagData->dwOffset);
cnt += sizeof(TAGDATA);
pTagData->dwOffset = FIX_ENDIAN(cnt);
pTagData++; // Next element
}
// Set final file size
cnt = DWORD_ALIGN(FIX_ENDIAN(HEADER(pProfObj)->phSize)) + sizeof(TAGDATA);
if (bNewData)
{
// The new tag is not a reference to an old tag. Increment
// file size of size of new data also
cnt += cbSize;
}
HEADER(pProfObj)->phSize = FIX_ENDIAN(cnt);
return TRUE;
}
/*
* AddTaggedElement
* Function:
* This functions adds a new tagged element to a profile
* Arguments:
* pProfObj - pointer to profile object
* tagType - tag to add
* cbSize - size of tag data
* Returns:
* TRUE if successful, FALSE otherwise
*/
BOOL AddTaggedElement(
PPROFOBJ pProfObj,
TAGTYPE tagType,
DWORD cbSize
)
{
DWORD dwOffset, newSize;
ASSERT(pProfObj != NULL);
ASSERT(cbSize > 0);
// Resize the profile if needed. For memory buffers, we have to realloc,
// and for mapped objects, we have to close and reopen the view.
newSize = FIX_ENDIAN(HEADER(pProfObj)->phSize);
newSize = DWORD_ALIGN(newSize) + sizeof(TAGDATA) + cbSize;
// Check for overflow
if (newSize < FIX_ENDIAN(HEADER(pProfObj)->phSize) ||
newSize < cbSize)
{
WARNING((__TEXT("Overflow in adding element\n")));
SetLastError(ERROR_ARITHMETIC_OVERFLOW);
return FALSE;
}
if (newSize > pProfObj->dwMapSize)
{
if (! GrowProfile(pProfObj, newSize))
{
return FALSE;
}
}
// Calculate location of new data - should be DWORD aligned
dwOffset = FIX_ENDIAN(HEADER(pProfObj)->phSize);
dwOffset = DWORD_ALIGN(dwOffset);
return AddTagTableEntry(pProfObj, tagType, dwOffset, cbSize, TRUE);
}
/*
* DeleteTaggedElement
* Function:
* This functions deletes a tagged element from the profile
* Arguments:
* pProfObj - pointer to profile object
* pTagData - pointer to tagged element to delete
* Returns:
* TRUE if successful, FALSE otherwise
*/
BOOL DeleteTaggedElement(
PPROFOBJ pProfObj,
PTAGDATA pTagData
)
{
PBYTE pData;
PTAGDATA pTemp;
DWORD cbSize, nCount, dwOffset, i;
// Remember location of data and move everything upto the data upwards
// by size of one tag table entry. Then move everything below the tag data
// upward by size of data plus size of one tage table entry.
pData = VIEW(pProfObj) + FIX_ENDIAN(pTagData->dwOffset);
cbSize = FIX_ENDIAN(pTagData->cbSize);
cbSize = DWORD_ALIGN(cbSize);
dwOffset = FIX_ENDIAN(pTagData->dwOffset);
MoveProfileData(pProfObj, (PBYTE)(pTagData+1), (PBYTE)pTagData,
(LONG)(pData-(PBYTE)(pTagData+1)), FALSE);
// Do not attempt to move data past the tag if we are deleting the last tag
if (pData + cbSize < VIEW(pProfObj) + PROFILE_SIZE(pProfObj))
{
MoveProfileData(pProfObj, pData+cbSize, pData-sizeof(TAGDATA),
PROFILE_SIZE(pProfObj)-(LONG)(pData - VIEW(pProfObj)) - cbSize, TRUE);
}
// Get count of tag items - it is right after the profile header, and
// decrement it by one.
nCount = TAG_COUNT(pProfObj);
nCount = FIX_ENDIAN(nCount) - 1;
TAG_COUNT(pProfObj) = FIX_ENDIAN(nCount);
// Go through the tag table and update the pointers
pTemp = TAG_DATA(pProfObj);
for (i=0; i<nCount; i++)
{
DWORD dwTemp = FIX_ENDIAN(pTemp->dwOffset);
if (dwTemp > dwOffset)
{
dwTemp -= cbSize; // cbSize already DWORD aligned
}
dwTemp -= sizeof(TAGDATA);
pTemp->dwOffset = FIX_ENDIAN(dwTemp);
pTemp++; // Next record
}
// Use nCount as a placeholder to calculate file size
nCount = DWORD_ALIGN(FIX_ENDIAN(HEADER(pProfObj)->phSize));
nCount -= sizeof(TAGDATA) + cbSize;
HEADER(pProfObj)->phSize = FIX_ENDIAN(nCount);
return TRUE;
}
/*
* ChangeTaggedElementSize
* Function:
* This functions changes the size of a tagged element in the profile
* Arguments:
* pProfObj - pointer to profile object
* pTagData - pointer to tagged element whose size is to be changed
* cbSize - new size for the element
* Returns:
* TRUE if successful, FALSE otherwise
*/
BOOL ChangeTaggedElementSize(
PPROFOBJ pProfObj,
PTAGDATA pTagData,
DWORD cbSize
)
{
PTAGDATA pTemp;
PBYTE pData;
DWORD nCount, cbOldSize;
DWORD dwOffset, cnt, i;
ASSERT(pProfObj != NULL);
ASSERT(cbSize > 0);
// Get current size of element
cbOldSize = FIX_ENDIAN(pTagData->cbSize);
if (cbOldSize == cbSize)
{
return TRUE; // Sizes are the same - Do nothing
}
pData = VIEW(pProfObj) + FIX_ENDIAN(pTagData->dwOffset);
// Do not attempt to move data beyond end of file. There is no need to move
// anything if the last data item is being resized.
if (pData + DWORD_ALIGN(cbOldSize) < VIEW(pProfObj) + PROFILE_SIZE(pProfObj))
{
MoveProfileData(pProfObj, pData + DWORD_ALIGN(cbOldSize), pData + DWORD_ALIGN(cbSize),
PROFILE_SIZE(pProfObj) - (LONG)(pData - VIEW(pProfObj)) - DWORD_ALIGN(cbOldSize), TRUE);
}
pTagData->cbSize = FIX_ENDIAN(cbSize); // Set the new size
// Get count of tag items - it is right after the profile header
nCount = TAG_COUNT(pProfObj);
nCount = FIX_ENDIAN(nCount);
// Go through the tag table and update the pointers
pTemp = TAG_DATA(pProfObj);
dwOffset = FIX_ENDIAN(pTagData->dwOffset);
for (i=0; i<nCount; i++)
{
DWORD dwTemp = FIX_ENDIAN(pTemp->dwOffset);
if (dwTemp > dwOffset)
{
dwTemp += DWORD_ALIGN(cbSize) - DWORD_ALIGN(cbOldSize);
pTemp->dwOffset = FIX_ENDIAN(dwTemp);
}
pTemp++; // Next record
}
// Use cnt as a placeholder to calculate file size
cnt = FIX_ENDIAN(HEADER(pProfObj)->phSize);
cnt += DWORD_ALIGN(cbSize) - DWORD_ALIGN(cbOldSize);
HEADER(pProfObj)->phSize = FIX_ENDIAN(cnt);
return TRUE;
}
/*
* MoveProfileData
* Function:
* This function moves data in a profile up or down (from src to dest),
* and then zeroes out the end of the file or the extra space created.
* Arguments:
* pProfObj - pointer to profile object
* src - pointer to source of block to move
* dest - pointer to destination for block to move to
* cnt - number of bytes to move
* Returns:
* TRUE if successful, FALSE otherwise
*/
void MoveProfileData(
PPROFOBJ pProfObj,
PBYTE src,
PBYTE dest,
LONG cnt,
BOOL bZeroMemory
)
{
// NOTE: CopyMemory() doesn't work for overlapped memory.
// Use internal function instead.
MyCopyMemory((PVOID)dest, (PVOID)src, cnt);
if (bZeroMemory)
{
cnt = ABS((LONG)(dest - src));
if (dest < src)
{
// Size decreased, so zero out end of file
dest = VIEW(pProfObj) + FIX_ENDIAN(HEADER(pProfObj)->phSize) -
(src - dest);
}
else
{
// Size increased, so zero out the increased tagdata
dest = src;
}
ZeroMemory(dest, cnt);
}
return;
}
/*
* IsReferenceTag
* Function:
* This function checks if a given tag's data is referred to by another
* tag in the profile
* Arguments:
* pProfObj - pointer to profile object
* pTagData - pointer to tagdata which should be checked
* Returns:
* TRUE if it is a referece, FALSE otherwise
*/
BOOL IsReferenceTag(
PPROFOBJ pProfObj,
PTAGDATA pTagData
)
{
PTAGDATA pTemp;
DWORD nCount, i;
BOOL bReference = FALSE;
pTemp = TAG_DATA(pProfObj);
nCount = TAG_COUNT(pProfObj);
nCount = FIX_ENDIAN(nCount);
for (i=0; i<nCount; i++)
{
if ((pTagData->dwOffset == pTemp->dwOffset) &&
(pTagData->tagType != pTemp->tagType))
{
bReference = TRUE;
break;
}
pTemp++; // next record
}
return bReference;
}
Reference in New Issue Copy Permalink