// Internal function used to check if the HEADER is a valid DICOM header.
ILboolean iCheckDicom(DICOMHEAD *Header)
{
// Always has the signature "DICM" at position 0x80.
if (strncmp((const char*)Header->Signature, "DICM", 4))
return IL_FALSE;
// Does not make sense to have any dimension = 0.
if (Header->Width == 0 || Header->Height == 0 || Header->Depth == 0)
return IL_FALSE;
// We can only deal with images that have byte-aligned data.
//@TODO: Take care of any others?
if (Header->BitsAllocated % 8)
return IL_FALSE;
// Check for an invalid format being set (or not set at all).
if (ilGetBppFormat(Header->Format) == 0)
return IL_FALSE;
// Check for an invalid type being set (or not set at all).
if (ilGetBpcType(Header->Type) == 0)
return IL_FALSE;
return IL_TRUE;
}
ILAPI void ILAPIENTRY il2SetPixels(ILimage* image, ILint XOff, ILint YOff, ILint ZOff, ILuint Width, ILuint Height, ILuint Depth, ILenum Format, ILenum Type, void *Data)
{
void *Converted;
if (image == NULL) {
il2SetError(IL_ILLEGAL_OPERATION);
return;
}
if (Data == NULL) {
il2SetError(IL_INVALID_PARAM);
return;
}
if (Format == image->Format && Type == image->Type) {
Converted = (void*)Data;
}
else {
Converted = ilConvertBuffer(Width * Height * Depth * ilGetBppFormat(Format) * ilGetBpcType(Type), Format, image->Format, Type, image->Type, NULL, Data);
if (!Converted)
return;
}
if (YOff + Height <= 1) {
ilSetPixels1D(image, XOff, Width, Converted);
}
else if (ZOff + Depth <= 1) {
ilSetPixels2D(image, XOff, YOff, Width, Height, Converted);
}
else {
ilSetPixels3D(image, XOff, YOff, ZOff, Width, Height, Depth, Converted);
}
if (Format == image->Format && Type == image->Type) {
return;
}
if (Converted != Data)
ifree(Converted);
return;
}
ILAPI ILboolean ILAPIENTRY ilInitImage(ILimage *Image, ILuint Width, ILuint Height, ILuint Depth, ILubyte Bpp, ILenum Format, ILenum Type, void *Data)
{
ILubyte BpcType = ilGetBpcType(Type);
if (BpcType == 0) {
ilSetError(IL_INVALID_PARAM);
return IL_FALSE;
}
memset(Image, 0, sizeof(ILimage));
////
if (Width == 0) Width = 1;
if (Height == 0) Height = 1;
if (Depth == 0) Depth = 1;
Image->Width = Width;
Image->Height = Height;
Image->Depth = Depth;
Image->Bpp = Bpp;
Image->Bpc = BpcType;
Image->Bps = Width * Bpp * Image->Bpc;
Image->SizeOfPlane = Image->Bps * Height;
Image->SizeOfData = Image->SizeOfPlane * Depth;
Image->Format = Format;
Image->Type = Type;
Image->Origin = IL_ORIGIN_LOWER_LEFT;
Image->Pal.PalType = IL_PAL_NONE;
Image->DxtcFormat = IL_DXT_NO_COMP;
Image->DxtcData = NULL;
Image->Data = (ILubyte*)ialloc(Image->SizeOfData);
if (Image->Data == NULL) {
return IL_FALSE;
}
if (Data != NULL) {
memcpy(Image->Data, Data, Image->SizeOfData);
}
return IL_TRUE;
}
/*! \param Image Specifies the image. The function fails if this is zero.
\param Width Specifies the new image width. This cannot be 0.
\param Height Specifies the new image height. This cannot be 0.
\param Depth Specifies the new image depth. This cannot be 0.
\param Bpp Number of channels (ex. 3 for RGB)
\param Format Enum of the desired format. Any format values are accepted.
\param Type Enum of the desired type. Any type values are accepted.
\param Data Specifies data that should be copied to the new image. If this parameter is NULL, no data is copied, and the new image data consists of undefined values.
\exception IL_ILLEGAL_OPERATION No currently bound image.
\exception IL_INVALID_PARAM One of the parameters is incorrect, such as one of the dimensions being 0.
\exception IL_OUT_OF_MEMORY Could not allocate enough memory.
\return Boolean value of failure or success*/
ILAPI ILboolean ILAPIENTRY il2TexImage(ILimage *Image, ILuint Width,
ILuint Height, ILuint Depth, ILubyte Bpp, ILenum Format, ILenum Type,
void *Data)
{
if (Image == NULL) {
il2SetError(IL_ILLEGAL_OPERATION);
return IL_FALSE;
}
ILubyte BpcType = ilGetBpcType(Type);
if (BpcType == 0) {
il2SetError(IL_INVALID_PARAM);
return IL_FALSE;
}
// Reset palette
Image->Pal.clear();
ilCloseImage(Image->Mipmaps);
Image->Mipmaps = NULL;
ilCloseImage(Image->Next);
Image->Next = NULL;
ilCloseImage(Image->Faces);
Image->Faces = NULL;
ilCloseImage(Image->Layers);
Image->Layers = NULL;
if (Image->AnimList) ifree(Image->AnimList);
if (Image->Profile) ifree(Image->Profile);
if (Image->DxtcData) ifree(Image->DxtcData);
if (Image->Data) ifree(Image->Data);
////
//@TODO: Also check against format?
/*if (Width == 0 || Height == 0 || Depth == 0 || Bpp == 0) {
il2SetError(IL_INVALID_PARAM);
return IL_FALSE;
}*/
////
if (Width == 0) Width = 1;
if (Height == 0) Height = 1;
if (Depth == 0) Depth = 1;
Image->Width = Width;
Image->Height = Height;
Image->Depth = Depth;
Image->Bpp = Bpp;
Image->Bpc = BpcType;
Image->Bps = Width * Bpp * Image->Bpc;
Image->SizeOfPlane = Image->Bps * Height;
Image->SizeOfData = Image->SizeOfPlane * Depth;
Image->Format = Format;
Image->Type = Type;
Image->Data = (ILubyte*)ialloc(Image->SizeOfData);
if (Image->Data != NULL) {
if (Data != NULL) {
memcpy(Image->Data, Data, Image->SizeOfData);
}
return IL_TRUE;
} else {
return IL_FALSE;
}
}
ILAPI ILubyte* ILAPIENTRY il2GetAlpha(ILimage* image, ILenum Type)
{
ILimage *TempImage;
ILubyte *Alpha;
ILushort *AlphaShort;
ILuint *AlphaInt;
ILdouble *AlphaDbl;
ILuint i, j, Bpc, Size, AlphaOff;
if (image == NULL) {
il2SetError(IL_ILLEGAL_OPERATION);
return IL_FALSE;
}
Bpc = ilGetBpcType(Type);
if (Bpc == 0) {
il2SetError(IL_INVALID_PARAM);
return NULL;
}
if (image->Type == Type) {
TempImage = image;
} else {
TempImage = iConvertImage(image, image->Format, Type);
if (TempImage == NULL)
return NULL;
}
Size = image->Width * image->Height * image->Depth * TempImage->Bpp;
Alpha = (ILubyte*)ialloc(Size / TempImage->Bpp * Bpc);
if (Alpha == NULL) {
if (TempImage != image)
ilCloseImage(TempImage);
return NULL;
}
switch (TempImage->Format)
{
case IL_RGB:
case IL_BGR:
case IL_LUMINANCE:
case IL_COLOUR_INDEX: // @TODO: Make IL_COLOUR_INDEX separate.
memset(Alpha, 0xFF, Size / TempImage->Bpp * Bpc);
if (TempImage != image)
ilCloseImage(TempImage);
return Alpha;
}
// If our format is alpha, just return a copy.
if (TempImage->Format == IL_ALPHA) {
memcpy(Alpha, TempImage->Data, TempImage->SizeOfData);
return Alpha;
}
if (TempImage->Format == IL_LUMINANCE_ALPHA)
AlphaOff = 2;
else
AlphaOff = 4;
switch (TempImage->Type)
{
case IL_BYTE:
case IL_UNSIGNED_BYTE:
for (i = AlphaOff-1, j = 0; i < Size; i += AlphaOff, j++)
Alpha[j] = TempImage->Data[i];
break;
case IL_SHORT:
case IL_UNSIGNED_SHORT:
AlphaShort = (ILushort*)Alpha;
for (i = AlphaOff-1, j = 0; i < Size; i += AlphaOff, j++)
AlphaShort[j] = ((ILushort*)TempImage->Data)[i];
break;
case IL_INT:
case IL_UNSIGNED_INT:
case IL_FLOAT: // Can throw float in here, because it's the same size.
AlphaInt = (ILuint*)Alpha;
for (i = AlphaOff-1, j = 0; i < Size; i += AlphaOff, j++)
AlphaInt[j] = ((ILuint*)TempImage->Data)[i];
break;
case IL_DOUBLE:
AlphaDbl = (ILdouble*)Alpha;
for (i = AlphaOff-1, j = 0; i < Size; i += AlphaOff, j++)
AlphaDbl[j] = ((ILdouble*)TempImage->Data)[i];
break;
}
if (TempImage != image)
ilCloseImage(TempImage);
return Alpha;
}
ILAPI ILuint ILAPIENTRY il2CopyPixels(ILimage* image, ILuint XOff, ILuint YOff, ILuint ZOff, ILuint Width, ILuint Height, ILuint Depth, ILenum Format, ILenum Type, void *Data)
{
void *Converted = NULL;
ILubyte *TempBuff = NULL;
ILuint SrcSize, DestSize;
if (image == NULL) {
il2SetError(IL_ILLEGAL_OPERATION);
return 0;
}
DestSize = Width * Height * Depth * ilGetBppFormat(Format) * ilGetBpcType(Type);
if (DestSize == 0) {
return DestSize;
}
if (Data == NULL || Format == IL_COLOUR_INDEX) {
il2SetError(IL_INVALID_PARAM);
return 0;
}
SrcSize = Width * Height * Depth * image->Bpp * image->Bpc;
if (Format == image->Format && Type == image->Type) {
TempBuff = (ILubyte*)Data;
}
else {
TempBuff = (ILubyte*)ialloc(SrcSize);
if (TempBuff == NULL) {
return 0;
}
}
if (YOff + Height <= 1) {
if (!ilCopyPixels1D(image, XOff, Width, TempBuff)) {
goto failed;
}
}
else if (ZOff + Depth <= 1) {
if (!ilCopyPixels2D(image, XOff, YOff, Width, Height, TempBuff)) {
goto failed;
}
}
else {
if (!ilCopyPixels3D(image, XOff, YOff, ZOff, Width, Height, Depth, TempBuff)) {
goto failed;
}
}
if (Format == image->Format && Type == image->Type) {
return DestSize;
}
Converted = ilConvertBuffer(SrcSize, image->Format, Format, image->Type, Type, &image->Pal, TempBuff);
if (Converted == NULL)
goto failed;
memcpy(Data, Converted, DestSize);
ifree(Converted);
if (TempBuff != Data)
ifree(TempBuff);
return DestSize;
failed:
if (TempBuff != Data)
ifree(TempBuff);
ifree(Converted);
return 0;
}
