mirror of
https://github.com/UberGames/lilium-voyager.git
synced 2024-12-15 06:30:49 +00:00
2485 lines
40 KiB
C
2485 lines
40 KiB
C
/*
|
|
===========================================================================
|
|
ioquake3 png decoder
|
|
Copyright (C) 2007,2008 Joerg Dietrich
|
|
|
|
This program is free software; you can redistribute it and/or
|
|
modify it under the terms of the GNU General Public License
|
|
as published by the Free Software Foundation; either version 2
|
|
of the License, or (at your option) any later version.
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
GNU General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with this program; if not, write to the Free Software
|
|
Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
|
|
===========================================================================
|
|
*/
|
|
|
|
#include "tr_common.h"
|
|
|
|
#include "../qcommon/puff.h"
|
|
|
|
// we could limit the png size to a lower value here
|
|
#ifndef INT_MAX
|
|
#define INT_MAX 0x1fffffff
|
|
#endif
|
|
|
|
/*
|
|
=================
|
|
PNG LOADING
|
|
=================
|
|
*/
|
|
|
|
/*
|
|
* Quake 3 image format : RGBA
|
|
*/
|
|
|
|
#define Q3IMAGE_BYTESPERPIXEL (4)
|
|
|
|
/*
|
|
* PNG specifications
|
|
*/
|
|
|
|
/*
|
|
* The first 8 Bytes of every PNG-File are a fixed signature
|
|
* to identify the file as a PNG.
|
|
*/
|
|
|
|
#define PNG_Signature "\x89\x50\x4E\x47\xD\xA\x1A\xA"
|
|
#define PNG_Signature_Size (8)
|
|
|
|
/*
|
|
* After the signature diverse chunks follow.
|
|
* A chunk consists of a header and if Length
|
|
* is bigger than 0 a body and a CRC of the body follow.
|
|
*/
|
|
|
|
struct PNG_ChunkHeader
|
|
{
|
|
uint32_t Length;
|
|
uint32_t Type;
|
|
};
|
|
|
|
#define PNG_ChunkHeader_Size (8)
|
|
|
|
typedef uint32_t PNG_ChunkCRC;
|
|
|
|
#define PNG_ChunkCRC_Size (4)
|
|
|
|
/*
|
|
* We use the following ChunkTypes.
|
|
* All others are ignored.
|
|
*/
|
|
|
|
#define MAKE_CHUNKTYPE(a,b,c,d) (((a) << 24) | ((b) << 16) | ((c) << 8) | ((d)))
|
|
|
|
#define PNG_ChunkType_IHDR MAKE_CHUNKTYPE('I', 'H', 'D', 'R')
|
|
#define PNG_ChunkType_PLTE MAKE_CHUNKTYPE('P', 'L', 'T', 'E')
|
|
#define PNG_ChunkType_IDAT MAKE_CHUNKTYPE('I', 'D', 'A', 'T')
|
|
#define PNG_ChunkType_IEND MAKE_CHUNKTYPE('I', 'E', 'N', 'D')
|
|
#define PNG_ChunkType_tRNS MAKE_CHUNKTYPE('t', 'R', 'N', 'S')
|
|
|
|
/*
|
|
* Per specification the first chunk after the signature SHALL be IHDR.
|
|
*/
|
|
|
|
struct PNG_Chunk_IHDR
|
|
{
|
|
uint32_t Width;
|
|
uint32_t Height;
|
|
uint8_t BitDepth;
|
|
uint8_t ColourType;
|
|
uint8_t CompressionMethod;
|
|
uint8_t FilterMethod;
|
|
uint8_t InterlaceMethod;
|
|
};
|
|
|
|
#define PNG_Chunk_IHDR_Size (13)
|
|
|
|
/*
|
|
* ColourTypes
|
|
*/
|
|
|
|
#define PNG_ColourType_Grey (0)
|
|
#define PNG_ColourType_True (2)
|
|
#define PNG_ColourType_Indexed (3)
|
|
#define PNG_ColourType_GreyAlpha (4)
|
|
#define PNG_ColourType_TrueAlpha (6)
|
|
|
|
/*
|
|
* number of colour components
|
|
*
|
|
* Grey : 1 grey
|
|
* True : 1 R, 1 G, 1 B
|
|
* Indexed : 1 index
|
|
* GreyAlpha : 1 grey, 1 alpha
|
|
* TrueAlpha : 1 R, 1 G, 1 B, 1 alpha
|
|
*/
|
|
|
|
#define PNG_NumColourComponents_Grey (1)
|
|
#define PNG_NumColourComponents_True (3)
|
|
#define PNG_NumColourComponents_Indexed (1)
|
|
#define PNG_NumColourComponents_GreyAlpha (2)
|
|
#define PNG_NumColourComponents_TrueAlpha (4)
|
|
|
|
/*
|
|
* For the different ColourTypes
|
|
* different BitDepths are specified.
|
|
*/
|
|
|
|
#define PNG_BitDepth_1 ( 1)
|
|
#define PNG_BitDepth_2 ( 2)
|
|
#define PNG_BitDepth_4 ( 4)
|
|
#define PNG_BitDepth_8 ( 8)
|
|
#define PNG_BitDepth_16 (16)
|
|
|
|
/*
|
|
* Only one valid CompressionMethod is standardized.
|
|
*/
|
|
|
|
#define PNG_CompressionMethod_0 (0)
|
|
|
|
/*
|
|
* Only one valid FilterMethod is currently standardized.
|
|
*/
|
|
|
|
#define PNG_FilterMethod_0 (0)
|
|
|
|
/*
|
|
* This FilterMethod defines 5 FilterTypes
|
|
*/
|
|
|
|
#define PNG_FilterType_None (0)
|
|
#define PNG_FilterType_Sub (1)
|
|
#define PNG_FilterType_Up (2)
|
|
#define PNG_FilterType_Average (3)
|
|
#define PNG_FilterType_Paeth (4)
|
|
|
|
/*
|
|
* Two InterlaceMethods are standardized :
|
|
* 0 - NonInterlaced
|
|
* 1 - Interlaced
|
|
*/
|
|
|
|
#define PNG_InterlaceMethod_NonInterlaced (0)
|
|
#define PNG_InterlaceMethod_Interlaced (1)
|
|
|
|
/*
|
|
* The Adam7 interlace method uses 7 passes.
|
|
*/
|
|
|
|
#define PNG_Adam7_NumPasses (7)
|
|
|
|
/*
|
|
* The compressed data starts with a header ...
|
|
*/
|
|
|
|
struct PNG_ZlibHeader
|
|
{
|
|
uint8_t CompressionMethod;
|
|
uint8_t Flags;
|
|
};
|
|
|
|
#define PNG_ZlibHeader_Size (2)
|
|
|
|
/*
|
|
* ... and is followed by a check value
|
|
*/
|
|
|
|
#define PNG_ZlibCheckValue_Size (4)
|
|
|
|
/*
|
|
* Some support functions for buffered files follow.
|
|
*/
|
|
|
|
/*
|
|
* buffered file representation
|
|
*/
|
|
|
|
struct BufferedFile
|
|
{
|
|
byte *Buffer;
|
|
int Length;
|
|
byte *Ptr;
|
|
int BytesLeft;
|
|
};
|
|
|
|
/*
|
|
* Read a file into a buffer.
|
|
*/
|
|
|
|
static struct BufferedFile *ReadBufferedFile(const char *name)
|
|
{
|
|
struct BufferedFile *BF;
|
|
union {
|
|
byte *b;
|
|
void *v;
|
|
} buffer;
|
|
|
|
/*
|
|
* input verification
|
|
*/
|
|
|
|
if(!name)
|
|
{
|
|
return(NULL);
|
|
}
|
|
|
|
/*
|
|
* Allocate control struct.
|
|
*/
|
|
|
|
BF = ri.Malloc(sizeof(struct BufferedFile));
|
|
if(!BF)
|
|
{
|
|
return(NULL);
|
|
}
|
|
|
|
/*
|
|
* Initialize the structs components.
|
|
*/
|
|
|
|
BF->Length = 0;
|
|
BF->Buffer = NULL;
|
|
BF->Ptr = NULL;
|
|
BF->BytesLeft = 0;
|
|
|
|
/*
|
|
* Read the file.
|
|
*/
|
|
|
|
BF->Length = ri.FS_ReadFile((char *) name, &buffer.v);
|
|
BF->Buffer = buffer.b;
|
|
|
|
/*
|
|
* Did we get it? Is it big enough?
|
|
*/
|
|
|
|
if(!(BF->Buffer && (BF->Length > 0)))
|
|
{
|
|
ri.Free(BF);
|
|
|
|
return(NULL);
|
|
}
|
|
|
|
/*
|
|
* Set the pointers and counters.
|
|
*/
|
|
|
|
BF->Ptr = BF->Buffer;
|
|
BF->BytesLeft = BF->Length;
|
|
|
|
return(BF);
|
|
}
|
|
|
|
/*
|
|
* Close a buffered file.
|
|
*/
|
|
|
|
static void CloseBufferedFile(struct BufferedFile *BF)
|
|
{
|
|
if(BF)
|
|
{
|
|
if(BF->Buffer)
|
|
{
|
|
ri.FS_FreeFile(BF->Buffer);
|
|
}
|
|
|
|
ri.Free(BF);
|
|
}
|
|
}
|
|
|
|
/*
|
|
* Get a pointer to the requested bytes.
|
|
*/
|
|
|
|
static void *BufferedFileRead(struct BufferedFile *BF, unsigned Length)
|
|
{
|
|
void *RetVal;
|
|
|
|
/*
|
|
* input verification
|
|
*/
|
|
|
|
if(!(BF && Length))
|
|
{
|
|
return(NULL);
|
|
}
|
|
|
|
/*
|
|
* not enough bytes left
|
|
*/
|
|
|
|
if(Length > BF->BytesLeft)
|
|
{
|
|
return(NULL);
|
|
}
|
|
|
|
/*
|
|
* the pointer to the requested data
|
|
*/
|
|
|
|
RetVal = BF->Ptr;
|
|
|
|
/*
|
|
* Raise the pointer and counter.
|
|
*/
|
|
|
|
BF->Ptr += Length;
|
|
BF->BytesLeft -= Length;
|
|
|
|
return(RetVal);
|
|
}
|
|
|
|
/*
|
|
* Rewind the buffer.
|
|
*/
|
|
|
|
static qboolean BufferedFileRewind(struct BufferedFile *BF, unsigned Offset)
|
|
{
|
|
unsigned BytesRead;
|
|
|
|
/*
|
|
* input verification
|
|
*/
|
|
|
|
if(!BF)
|
|
{
|
|
return(qfalse);
|
|
}
|
|
|
|
/*
|
|
* special trick to rewind to the beginning of the buffer
|
|
*/
|
|
|
|
if(Offset == (unsigned)-1)
|
|
{
|
|
BF->Ptr = BF->Buffer;
|
|
BF->BytesLeft = BF->Length;
|
|
|
|
return(qtrue);
|
|
}
|
|
|
|
/*
|
|
* How many bytes do we have already read?
|
|
*/
|
|
|
|
BytesRead = BF->Ptr - BF->Buffer;
|
|
|
|
/*
|
|
* We can only rewind to the beginning of the BufferedFile.
|
|
*/
|
|
|
|
if(Offset > BytesRead)
|
|
{
|
|
return(qfalse);
|
|
}
|
|
|
|
/*
|
|
* lower the pointer and counter.
|
|
*/
|
|
|
|
BF->Ptr -= Offset;
|
|
BF->BytesLeft += Offset;
|
|
|
|
return(qtrue);
|
|
}
|
|
|
|
/*
|
|
* Skip some bytes.
|
|
*/
|
|
|
|
static qboolean BufferedFileSkip(struct BufferedFile *BF, unsigned Offset)
|
|
{
|
|
/*
|
|
* input verification
|
|
*/
|
|
|
|
if(!BF)
|
|
{
|
|
return(qfalse);
|
|
}
|
|
|
|
/*
|
|
* We can only skip to the end of the BufferedFile.
|
|
*/
|
|
|
|
if(Offset > BF->BytesLeft)
|
|
{
|
|
return(qfalse);
|
|
}
|
|
|
|
/*
|
|
* lower the pointer and counter.
|
|
*/
|
|
|
|
BF->Ptr += Offset;
|
|
BF->BytesLeft -= Offset;
|
|
|
|
return(qtrue);
|
|
}
|
|
|
|
/*
|
|
* Find a chunk
|
|
*/
|
|
|
|
static qboolean FindChunk(struct BufferedFile *BF, uint32_t ChunkType)
|
|
{
|
|
struct PNG_ChunkHeader *CH;
|
|
|
|
uint32_t Length;
|
|
uint32_t Type;
|
|
|
|
/*
|
|
* input verification
|
|
*/
|
|
|
|
if(!BF)
|
|
{
|
|
return(qfalse);
|
|
}
|
|
|
|
/*
|
|
* cycle trough the chunks
|
|
*/
|
|
|
|
while(qtrue)
|
|
{
|
|
/*
|
|
* Read the chunk-header.
|
|
*/
|
|
|
|
CH = BufferedFileRead(BF, PNG_ChunkHeader_Size);
|
|
if(!CH)
|
|
{
|
|
return(qfalse);
|
|
}
|
|
|
|
/*
|
|
* Do not swap the original types
|
|
* they might be needed later.
|
|
*/
|
|
|
|
Length = BigLong(CH->Length);
|
|
Type = BigLong(CH->Type);
|
|
|
|
/*
|
|
* We found it!
|
|
*/
|
|
|
|
if(Type == ChunkType)
|
|
{
|
|
/*
|
|
* Rewind to the start of the chunk.
|
|
*/
|
|
|
|
BufferedFileRewind(BF, PNG_ChunkHeader_Size);
|
|
|
|
break;
|
|
}
|
|
else
|
|
{
|
|
/*
|
|
* Skip the rest of the chunk.
|
|
*/
|
|
|
|
if(Length)
|
|
{
|
|
if(!BufferedFileSkip(BF, Length + PNG_ChunkCRC_Size))
|
|
{
|
|
return(qfalse);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
return(qtrue);
|
|
}
|
|
|
|
/*
|
|
* Decompress all IDATs
|
|
*/
|
|
|
|
static uint32_t DecompressIDATs(struct BufferedFile *BF, uint8_t **Buffer)
|
|
{
|
|
uint8_t *DecompressedData;
|
|
uint32_t DecompressedDataLength;
|
|
|
|
uint8_t *CompressedData;
|
|
uint8_t *CompressedDataPtr;
|
|
uint32_t CompressedDataLength;
|
|
|
|
struct PNG_ChunkHeader *CH;
|
|
|
|
uint32_t Length;
|
|
uint32_t Type;
|
|
|
|
int BytesToRewind;
|
|
|
|
int32_t puffResult;
|
|
uint8_t *puffDest;
|
|
uint32_t puffDestLen;
|
|
uint8_t *puffSrc;
|
|
uint32_t puffSrcLen;
|
|
|
|
/*
|
|
* input verification
|
|
*/
|
|
|
|
if(!(BF && Buffer))
|
|
{
|
|
return(-1);
|
|
}
|
|
|
|
/*
|
|
* some zeroing
|
|
*/
|
|
|
|
DecompressedData = NULL;
|
|
*Buffer = DecompressedData;
|
|
|
|
CompressedData = NULL;
|
|
CompressedDataLength = 0;
|
|
|
|
BytesToRewind = 0;
|
|
|
|
/*
|
|
* Find the first IDAT chunk.
|
|
*/
|
|
|
|
if(!FindChunk(BF, PNG_ChunkType_IDAT))
|
|
{
|
|
return(-1);
|
|
}
|
|
|
|
/*
|
|
* Count the size of the uncompressed data
|
|
*/
|
|
|
|
while(qtrue)
|
|
{
|
|
/*
|
|
* Read chunk header
|
|
*/
|
|
|
|
CH = BufferedFileRead(BF, PNG_ChunkHeader_Size);
|
|
if(!CH)
|
|
{
|
|
/*
|
|
* Rewind to the start of this adventure
|
|
* and return unsuccessfull
|
|
*/
|
|
|
|
BufferedFileRewind(BF, BytesToRewind);
|
|
|
|
return(-1);
|
|
}
|
|
|
|
/*
|
|
* Length and Type of chunk
|
|
*/
|
|
|
|
Length = BigLong(CH->Length);
|
|
Type = BigLong(CH->Type);
|
|
|
|
/*
|
|
* We have reached the end of the IDAT chunks
|
|
*/
|
|
|
|
if(!(Type == PNG_ChunkType_IDAT))
|
|
{
|
|
BufferedFileRewind(BF, PNG_ChunkHeader_Size);
|
|
|
|
break;
|
|
}
|
|
|
|
/*
|
|
* Add chunk header to count.
|
|
*/
|
|
|
|
BytesToRewind += PNG_ChunkHeader_Size;
|
|
|
|
/*
|
|
* Skip to next chunk
|
|
*/
|
|
|
|
if(Length)
|
|
{
|
|
if(!BufferedFileSkip(BF, Length + PNG_ChunkCRC_Size))
|
|
{
|
|
BufferedFileRewind(BF, BytesToRewind);
|
|
|
|
return(-1);
|
|
}
|
|
|
|
BytesToRewind += Length + PNG_ChunkCRC_Size;
|
|
CompressedDataLength += Length;
|
|
}
|
|
}
|
|
|
|
BufferedFileRewind(BF, BytesToRewind);
|
|
|
|
CompressedData = ri.Malloc(CompressedDataLength);
|
|
if(!CompressedData)
|
|
{
|
|
return(-1);
|
|
}
|
|
|
|
CompressedDataPtr = CompressedData;
|
|
|
|
/*
|
|
* Collect the compressed Data
|
|
*/
|
|
|
|
while(qtrue)
|
|
{
|
|
/*
|
|
* Read chunk header
|
|
*/
|
|
|
|
CH = BufferedFileRead(BF, PNG_ChunkHeader_Size);
|
|
if(!CH)
|
|
{
|
|
ri.Free(CompressedData);
|
|
|
|
return(-1);
|
|
}
|
|
|
|
/*
|
|
* Length and Type of chunk
|
|
*/
|
|
|
|
Length = BigLong(CH->Length);
|
|
Type = BigLong(CH->Type);
|
|
|
|
/*
|
|
* We have reached the end of the IDAT chunks
|
|
*/
|
|
|
|
if(!(Type == PNG_ChunkType_IDAT))
|
|
{
|
|
BufferedFileRewind(BF, PNG_ChunkHeader_Size);
|
|
|
|
break;
|
|
}
|
|
|
|
/*
|
|
* Copy the Data
|
|
*/
|
|
|
|
if(Length)
|
|
{
|
|
uint8_t *OrigCompressedData;
|
|
|
|
OrigCompressedData = BufferedFileRead(BF, Length);
|
|
if(!OrigCompressedData)
|
|
{
|
|
ri.Free(CompressedData);
|
|
|
|
return(-1);
|
|
}
|
|
|
|
if(!BufferedFileSkip(BF, PNG_ChunkCRC_Size))
|
|
{
|
|
ri.Free(CompressedData);
|
|
|
|
return(-1);
|
|
}
|
|
|
|
memcpy(CompressedDataPtr, OrigCompressedData, Length);
|
|
CompressedDataPtr += Length;
|
|
}
|
|
}
|
|
|
|
/*
|
|
* Let puff() calculate the decompressed data length.
|
|
*/
|
|
|
|
puffDest = NULL;
|
|
puffDestLen = 0;
|
|
|
|
/*
|
|
* The zlib header and checkvalue don't belong to the compressed data.
|
|
*/
|
|
|
|
puffSrc = CompressedData + PNG_ZlibHeader_Size;
|
|
puffSrcLen = CompressedDataLength - PNG_ZlibHeader_Size - PNG_ZlibCheckValue_Size;
|
|
|
|
/*
|
|
* first puff() to calculate the size of the uncompressed data
|
|
*/
|
|
|
|
puffResult = puff(puffDest, &puffDestLen, puffSrc, &puffSrcLen);
|
|
if(!((puffResult == 0) && (puffDestLen > 0)))
|
|
{
|
|
ri.Free(CompressedData);
|
|
|
|
return(-1);
|
|
}
|
|
|
|
/*
|
|
* Allocate the buffer for the uncompressed data.
|
|
*/
|
|
|
|
DecompressedData = ri.Malloc(puffDestLen);
|
|
if(!DecompressedData)
|
|
{
|
|
ri.Free(CompressedData);
|
|
|
|
return(-1);
|
|
}
|
|
|
|
/*
|
|
* Set the input again in case something was changed by the last puff() .
|
|
*/
|
|
|
|
puffDest = DecompressedData;
|
|
puffSrc = CompressedData + PNG_ZlibHeader_Size;
|
|
puffSrcLen = CompressedDataLength - PNG_ZlibHeader_Size - PNG_ZlibCheckValue_Size;
|
|
|
|
/*
|
|
* decompression puff()
|
|
*/
|
|
|
|
puffResult = puff(puffDest, &puffDestLen, puffSrc, &puffSrcLen);
|
|
|
|
/*
|
|
* The compressed data is not needed anymore.
|
|
*/
|
|
|
|
ri.Free(CompressedData);
|
|
|
|
/*
|
|
* Check if the last puff() was successfull.
|
|
*/
|
|
|
|
if(!((puffResult == 0) && (puffDestLen > 0)))
|
|
{
|
|
ri.Free(DecompressedData);
|
|
|
|
return(-1);
|
|
}
|
|
|
|
/*
|
|
* Set the output of this function.
|
|
*/
|
|
|
|
DecompressedDataLength = puffDestLen;
|
|
*Buffer = DecompressedData;
|
|
|
|
return(DecompressedDataLength);
|
|
}
|
|
|
|
/*
|
|
* the Paeth predictor
|
|
*/
|
|
|
|
static uint8_t PredictPaeth(uint8_t a, uint8_t b, uint8_t c)
|
|
{
|
|
/*
|
|
* a == Left
|
|
* b == Up
|
|
* c == UpLeft
|
|
*/
|
|
|
|
uint8_t Pr;
|
|
int p;
|
|
int pa, pb, pc;
|
|
|
|
p = ((int) a) + ((int) b) - ((int) c);
|
|
pa = abs(p - ((int) a));
|
|
pb = abs(p - ((int) b));
|
|
pc = abs(p - ((int) c));
|
|
|
|
if((pa <= pb) && (pa <= pc))
|
|
{
|
|
Pr = a;
|
|
}
|
|
else if(pb <= pc)
|
|
{
|
|
Pr = b;
|
|
}
|
|
else
|
|
{
|
|
Pr = c;
|
|
}
|
|
|
|
return(Pr);
|
|
|
|
}
|
|
|
|
/*
|
|
* Reverse the filters.
|
|
*/
|
|
|
|
static qboolean UnfilterImage(uint8_t *DecompressedData,
|
|
uint32_t ImageHeight,
|
|
uint32_t BytesPerScanline,
|
|
uint32_t BytesPerPixel)
|
|
{
|
|
uint8_t *DecompPtr;
|
|
uint8_t FilterType;
|
|
uint8_t *PixelLeft, *PixelUp, *PixelUpLeft;
|
|
uint32_t w, h, p;
|
|
|
|
/*
|
|
* some zeros for the filters
|
|
*/
|
|
|
|
uint8_t Zeros[8] = {0, 0, 0, 0, 0, 0, 0, 0};
|
|
|
|
/*
|
|
* input verification
|
|
*/
|
|
|
|
if(!(DecompressedData && BytesPerPixel))
|
|
{
|
|
return(qfalse);
|
|
}
|
|
|
|
/*
|
|
* ImageHeight and BytesPerScanline can be zero in small interlaced images.
|
|
*/
|
|
|
|
if((!ImageHeight) || (!BytesPerScanline))
|
|
{
|
|
return(qtrue);
|
|
}
|
|
|
|
/*
|
|
* Set the pointer to the start of the decompressed Data.
|
|
*/
|
|
|
|
DecompPtr = DecompressedData;
|
|
|
|
/*
|
|
* Un-filtering is done in place.
|
|
*/
|
|
|
|
/*
|
|
* Go trough all scanlines.
|
|
*/
|
|
|
|
for(h = 0; h < ImageHeight; h++)
|
|
{
|
|
/*
|
|
* Every scanline starts with a FilterType byte.
|
|
*/
|
|
|
|
FilterType = *DecompPtr;
|
|
DecompPtr++;
|
|
|
|
/*
|
|
* Left pixel of the first byte in a scanline is zero.
|
|
*/
|
|
|
|
PixelLeft = Zeros;
|
|
|
|
/*
|
|
* Set PixelUp to previous line only if we are on the second line or above.
|
|
*
|
|
* Plus one byte for the FilterType
|
|
*/
|
|
|
|
if(h > 0)
|
|
{
|
|
PixelUp = DecompPtr - (BytesPerScanline + 1);
|
|
}
|
|
else
|
|
{
|
|
PixelUp = Zeros;
|
|
}
|
|
|
|
/*
|
|
* The pixel left to the first pixel of the previous scanline is zero too.
|
|
*/
|
|
|
|
PixelUpLeft = Zeros;
|
|
|
|
/*
|
|
* Cycle trough all pixels of the scanline.
|
|
*/
|
|
|
|
for(w = 0; w < (BytesPerScanline / BytesPerPixel); w++)
|
|
{
|
|
/*
|
|
* Cycle trough the bytes of the pixel.
|
|
*/
|
|
|
|
for(p = 0; p < BytesPerPixel; p++)
|
|
{
|
|
switch(FilterType)
|
|
{
|
|
case PNG_FilterType_None :
|
|
{
|
|
/*
|
|
* The byte is unfiltered.
|
|
*/
|
|
|
|
break;
|
|
}
|
|
|
|
case PNG_FilterType_Sub :
|
|
{
|
|
DecompPtr[p] += PixelLeft[p];
|
|
|
|
break;
|
|
}
|
|
|
|
case PNG_FilterType_Up :
|
|
{
|
|
DecompPtr[p] += PixelUp[p];
|
|
|
|
break;
|
|
}
|
|
|
|
case PNG_FilterType_Average :
|
|
{
|
|
DecompPtr[p] += ((uint8_t) ((((uint16_t) PixelLeft[p]) + ((uint16_t) PixelUp[p])) / 2));
|
|
|
|
break;
|
|
}
|
|
|
|
case PNG_FilterType_Paeth :
|
|
{
|
|
DecompPtr[p] += PredictPaeth(PixelLeft[p], PixelUp[p], PixelUpLeft[p]);
|
|
|
|
break;
|
|
}
|
|
|
|
default :
|
|
{
|
|
return(qfalse);
|
|
}
|
|
}
|
|
}
|
|
|
|
PixelLeft = DecompPtr;
|
|
|
|
/*
|
|
* We only have an upleft pixel if we are on the second line or above.
|
|
*/
|
|
|
|
if(h > 0)
|
|
{
|
|
PixelUpLeft = DecompPtr - (BytesPerScanline + 1);
|
|
}
|
|
|
|
/*
|
|
* Skip to the next pixel.
|
|
*/
|
|
|
|
DecompPtr += BytesPerPixel;
|
|
|
|
/*
|
|
* We only have a previous line if we are on the second line and above.
|
|
*/
|
|
|
|
if(h > 0)
|
|
{
|
|
PixelUp = DecompPtr - (BytesPerScanline + 1);
|
|
}
|
|
}
|
|
}
|
|
|
|
return(qtrue);
|
|
}
|
|
|
|
/*
|
|
* Convert a raw input pixel to Quake 3 RGA format.
|
|
*/
|
|
|
|
static qboolean ConvertPixel(struct PNG_Chunk_IHDR *IHDR,
|
|
byte *OutPtr,
|
|
uint8_t *DecompPtr,
|
|
qboolean HasTransparentColour,
|
|
uint8_t *TransparentColour,
|
|
uint8_t *OutPal)
|
|
{
|
|
/*
|
|
* input verification
|
|
*/
|
|
|
|
if(!(IHDR && OutPtr && DecompPtr && TransparentColour && OutPal))
|
|
{
|
|
return(qfalse);
|
|
}
|
|
|
|
switch(IHDR->ColourType)
|
|
{
|
|
case PNG_ColourType_Grey :
|
|
{
|
|
switch(IHDR->BitDepth)
|
|
{
|
|
case PNG_BitDepth_1 :
|
|
case PNG_BitDepth_2 :
|
|
case PNG_BitDepth_4 :
|
|
{
|
|
uint8_t Step;
|
|
uint8_t GreyValue;
|
|
|
|
Step = 0xFF / ((1 << IHDR->BitDepth) - 1);
|
|
|
|
GreyValue = DecompPtr[0] * Step;
|
|
|
|
OutPtr[0] = GreyValue;
|
|
OutPtr[1] = GreyValue;
|
|
OutPtr[2] = GreyValue;
|
|
OutPtr[3] = 0xFF;
|
|
|
|
/*
|
|
* Grey supports full transparency for one specified colour
|
|
*/
|
|
|
|
if(HasTransparentColour)
|
|
{
|
|
if(TransparentColour[1] == DecompPtr[0])
|
|
{
|
|
OutPtr[3] = 0x00;
|
|
}
|
|
}
|
|
|
|
|
|
break;
|
|
}
|
|
|
|
case PNG_BitDepth_8 :
|
|
case PNG_BitDepth_16 :
|
|
{
|
|
OutPtr[0] = DecompPtr[0];
|
|
OutPtr[1] = DecompPtr[0];
|
|
OutPtr[2] = DecompPtr[0];
|
|
OutPtr[3] = 0xFF;
|
|
|
|
/*
|
|
* Grey supports full transparency for one specified colour
|
|
*/
|
|
|
|
if(HasTransparentColour)
|
|
{
|
|
if(IHDR->BitDepth == PNG_BitDepth_8)
|
|
{
|
|
if(TransparentColour[1] == DecompPtr[0])
|
|
{
|
|
OutPtr[3] = 0x00;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
if((TransparentColour[0] == DecompPtr[0]) && (TransparentColour[1] == DecompPtr[1]))
|
|
{
|
|
OutPtr[3] = 0x00;
|
|
}
|
|
}
|
|
}
|
|
|
|
break;
|
|
}
|
|
|
|
default :
|
|
{
|
|
return(qfalse);
|
|
}
|
|
}
|
|
|
|
break;
|
|
}
|
|
|
|
case PNG_ColourType_True :
|
|
{
|
|
switch(IHDR->BitDepth)
|
|
{
|
|
case PNG_BitDepth_8 :
|
|
{
|
|
OutPtr[0] = DecompPtr[0];
|
|
OutPtr[1] = DecompPtr[1];
|
|
OutPtr[2] = DecompPtr[2];
|
|
OutPtr[3] = 0xFF;
|
|
|
|
/*
|
|
* True supports full transparency for one specified colour
|
|
*/
|
|
|
|
if(HasTransparentColour)
|
|
{
|
|
if((TransparentColour[1] == DecompPtr[0]) &&
|
|
(TransparentColour[3] == DecompPtr[1]) &&
|
|
(TransparentColour[5] == DecompPtr[2]))
|
|
{
|
|
OutPtr[3] = 0x00;
|
|
}
|
|
}
|
|
|
|
break;
|
|
}
|
|
|
|
case PNG_BitDepth_16 :
|
|
{
|
|
/*
|
|
* We use only the upper byte.
|
|
*/
|
|
|
|
OutPtr[0] = DecompPtr[0];
|
|
OutPtr[1] = DecompPtr[2];
|
|
OutPtr[2] = DecompPtr[4];
|
|
OutPtr[3] = 0xFF;
|
|
|
|
/*
|
|
* True supports full transparency for one specified colour
|
|
*/
|
|
|
|
if(HasTransparentColour)
|
|
{
|
|
if((TransparentColour[0] == DecompPtr[0]) && (TransparentColour[1] == DecompPtr[1]) &&
|
|
(TransparentColour[2] == DecompPtr[2]) && (TransparentColour[3] == DecompPtr[3]) &&
|
|
(TransparentColour[4] == DecompPtr[4]) && (TransparentColour[5] == DecompPtr[5]))
|
|
{
|
|
OutPtr[3] = 0x00;
|
|
}
|
|
}
|
|
|
|
break;
|
|
}
|
|
|
|
default :
|
|
{
|
|
return(qfalse);
|
|
}
|
|
}
|
|
|
|
break;
|
|
}
|
|
|
|
case PNG_ColourType_Indexed :
|
|
{
|
|
OutPtr[0] = OutPal[DecompPtr[0] * Q3IMAGE_BYTESPERPIXEL + 0];
|
|
OutPtr[1] = OutPal[DecompPtr[0] * Q3IMAGE_BYTESPERPIXEL + 1];
|
|
OutPtr[2] = OutPal[DecompPtr[0] * Q3IMAGE_BYTESPERPIXEL + 2];
|
|
OutPtr[3] = OutPal[DecompPtr[0] * Q3IMAGE_BYTESPERPIXEL + 3];
|
|
|
|
break;
|
|
}
|
|
|
|
case PNG_ColourType_GreyAlpha :
|
|
{
|
|
switch(IHDR->BitDepth)
|
|
{
|
|
case PNG_BitDepth_8 :
|
|
{
|
|
OutPtr[0] = DecompPtr[0];
|
|
OutPtr[1] = DecompPtr[0];
|
|
OutPtr[2] = DecompPtr[0];
|
|
OutPtr[3] = DecompPtr[1];
|
|
|
|
break;
|
|
}
|
|
|
|
case PNG_BitDepth_16 :
|
|
{
|
|
/*
|
|
* We use only the upper byte.
|
|
*/
|
|
|
|
OutPtr[0] = DecompPtr[0];
|
|
OutPtr[1] = DecompPtr[0];
|
|
OutPtr[2] = DecompPtr[0];
|
|
OutPtr[3] = DecompPtr[2];
|
|
|
|
break;
|
|
}
|
|
|
|
default :
|
|
{
|
|
return(qfalse);
|
|
}
|
|
}
|
|
|
|
break;
|
|
}
|
|
|
|
case PNG_ColourType_TrueAlpha :
|
|
{
|
|
switch(IHDR->BitDepth)
|
|
{
|
|
case PNG_BitDepth_8 :
|
|
{
|
|
OutPtr[0] = DecompPtr[0];
|
|
OutPtr[1] = DecompPtr[1];
|
|
OutPtr[2] = DecompPtr[2];
|
|
OutPtr[3] = DecompPtr[3];
|
|
|
|
break;
|
|
}
|
|
|
|
case PNG_BitDepth_16 :
|
|
{
|
|
/*
|
|
* We use only the upper byte.
|
|
*/
|
|
|
|
OutPtr[0] = DecompPtr[0];
|
|
OutPtr[1] = DecompPtr[2];
|
|
OutPtr[2] = DecompPtr[4];
|
|
OutPtr[3] = DecompPtr[6];
|
|
|
|
break;
|
|
}
|
|
|
|
default :
|
|
{
|
|
return(qfalse);
|
|
}
|
|
}
|
|
|
|
break;
|
|
}
|
|
|
|
default :
|
|
{
|
|
return(qfalse);
|
|
}
|
|
}
|
|
|
|
return(qtrue);
|
|
}
|
|
|
|
|
|
/*
|
|
* Decode a non-interlaced image.
|
|
*/
|
|
|
|
static qboolean DecodeImageNonInterlaced(struct PNG_Chunk_IHDR *IHDR,
|
|
byte *OutBuffer,
|
|
uint8_t *DecompressedData,
|
|
uint32_t DecompressedDataLength,
|
|
qboolean HasTransparentColour,
|
|
uint8_t *TransparentColour,
|
|
uint8_t *OutPal)
|
|
{
|
|
uint32_t IHDR_Width;
|
|
uint32_t IHDR_Height;
|
|
uint32_t BytesPerScanline, BytesPerPixel, PixelsPerByte;
|
|
uint32_t w, h, p;
|
|
byte *OutPtr;
|
|
uint8_t *DecompPtr;
|
|
|
|
/*
|
|
* input verification
|
|
*/
|
|
|
|
if(!(IHDR && OutBuffer && DecompressedData && DecompressedDataLength && TransparentColour && OutPal))
|
|
{
|
|
return(qfalse);
|
|
}
|
|
|
|
/*
|
|
* byte swapping
|
|
*/
|
|
|
|
IHDR_Width = BigLong(IHDR->Width);
|
|
IHDR_Height = BigLong(IHDR->Height);
|
|
|
|
/*
|
|
* information for un-filtering
|
|
*/
|
|
|
|
switch(IHDR->ColourType)
|
|
{
|
|
case PNG_ColourType_Grey :
|
|
{
|
|
switch(IHDR->BitDepth)
|
|
{
|
|
case PNG_BitDepth_1 :
|
|
case PNG_BitDepth_2 :
|
|
case PNG_BitDepth_4 :
|
|
{
|
|
BytesPerPixel = 1;
|
|
PixelsPerByte = 8 / IHDR->BitDepth;
|
|
|
|
break;
|
|
}
|
|
|
|
case PNG_BitDepth_8 :
|
|
case PNG_BitDepth_16 :
|
|
{
|
|
BytesPerPixel = (IHDR->BitDepth / 8) * PNG_NumColourComponents_Grey;
|
|
PixelsPerByte = 1;
|
|
|
|
break;
|
|
}
|
|
|
|
default :
|
|
{
|
|
return(qfalse);
|
|
}
|
|
}
|
|
|
|
break;
|
|
}
|
|
|
|
case PNG_ColourType_True :
|
|
{
|
|
switch(IHDR->BitDepth)
|
|
{
|
|
case PNG_BitDepth_8 :
|
|
case PNG_BitDepth_16 :
|
|
{
|
|
BytesPerPixel = (IHDR->BitDepth / 8) * PNG_NumColourComponents_True;
|
|
PixelsPerByte = 1;
|
|
|
|
break;
|
|
}
|
|
|
|
default :
|
|
{
|
|
return(qfalse);
|
|
}
|
|
}
|
|
|
|
break;
|
|
}
|
|
|
|
case PNG_ColourType_Indexed :
|
|
{
|
|
switch(IHDR->BitDepth)
|
|
{
|
|
case PNG_BitDepth_1 :
|
|
case PNG_BitDepth_2 :
|
|
case PNG_BitDepth_4 :
|
|
{
|
|
BytesPerPixel = 1;
|
|
PixelsPerByte = 8 / IHDR->BitDepth;
|
|
|
|
break;
|
|
}
|
|
|
|
case PNG_BitDepth_8 :
|
|
{
|
|
BytesPerPixel = PNG_NumColourComponents_Indexed;
|
|
PixelsPerByte = 1;
|
|
|
|
break;
|
|
}
|
|
|
|
default :
|
|
{
|
|
return(qfalse);
|
|
}
|
|
}
|
|
|
|
break;
|
|
}
|
|
|
|
case PNG_ColourType_GreyAlpha :
|
|
{
|
|
switch(IHDR->BitDepth)
|
|
{
|
|
case PNG_BitDepth_8 :
|
|
case PNG_BitDepth_16 :
|
|
{
|
|
BytesPerPixel = (IHDR->BitDepth / 8) * PNG_NumColourComponents_GreyAlpha;
|
|
PixelsPerByte = 1;
|
|
|
|
break;
|
|
}
|
|
|
|
default :
|
|
{
|
|
return(qfalse);
|
|
}
|
|
}
|
|
|
|
break;
|
|
}
|
|
|
|
case PNG_ColourType_TrueAlpha :
|
|
{
|
|
switch(IHDR->BitDepth)
|
|
{
|
|
case PNG_BitDepth_8 :
|
|
case PNG_BitDepth_16 :
|
|
{
|
|
BytesPerPixel = (IHDR->BitDepth / 8) * PNG_NumColourComponents_TrueAlpha;
|
|
PixelsPerByte = 1;
|
|
|
|
break;
|
|
}
|
|
|
|
default :
|
|
{
|
|
return(qfalse);
|
|
}
|
|
}
|
|
|
|
break;
|
|
}
|
|
|
|
default :
|
|
{
|
|
return(qfalse);
|
|
}
|
|
}
|
|
|
|
/*
|
|
* Calculate the size of one scanline
|
|
*/
|
|
|
|
BytesPerScanline = (IHDR_Width * BytesPerPixel + (PixelsPerByte - 1)) / PixelsPerByte;
|
|
|
|
/*
|
|
* Check if we have enough data for the whole image.
|
|
*/
|
|
|
|
if(!(DecompressedDataLength == ((BytesPerScanline + 1) * IHDR_Height)))
|
|
{
|
|
return(qfalse);
|
|
}
|
|
|
|
/*
|
|
* Unfilter the image.
|
|
*/
|
|
|
|
if(!UnfilterImage(DecompressedData, IHDR_Height, BytesPerScanline, BytesPerPixel))
|
|
{
|
|
return(qfalse);
|
|
}
|
|
|
|
/*
|
|
* Set the working pointers to the beginning of the buffers.
|
|
*/
|
|
|
|
OutPtr = OutBuffer;
|
|
DecompPtr = DecompressedData;
|
|
|
|
/*
|
|
* Create the output image.
|
|
*/
|
|
|
|
for(h = 0; h < IHDR_Height; h++)
|
|
{
|
|
/*
|
|
* Count the pixels on the scanline for those multipixel bytes
|
|
*/
|
|
|
|
uint32_t CurrPixel;
|
|
|
|
/*
|
|
* skip FilterType
|
|
*/
|
|
|
|
DecompPtr++;
|
|
|
|
/*
|
|
* Reset the pixel count.
|
|
*/
|
|
|
|
CurrPixel = 0;
|
|
|
|
for(w = 0; w < (BytesPerScanline / BytesPerPixel); w++)
|
|
{
|
|
if(PixelsPerByte > 1)
|
|
{
|
|
uint8_t Mask;
|
|
uint32_t Shift;
|
|
uint8_t SinglePixel;
|
|
|
|
for(p = 0; p < PixelsPerByte; p++)
|
|
{
|
|
if(CurrPixel < IHDR_Width)
|
|
{
|
|
Mask = (1 << IHDR->BitDepth) - 1;
|
|
Shift = (PixelsPerByte - 1 - p) * IHDR->BitDepth;
|
|
|
|
SinglePixel = ((DecompPtr[0] & (Mask << Shift)) >> Shift);
|
|
|
|
if(!ConvertPixel(IHDR, OutPtr, &SinglePixel, HasTransparentColour, TransparentColour, OutPal))
|
|
{
|
|
return(qfalse);
|
|
}
|
|
|
|
OutPtr += Q3IMAGE_BYTESPERPIXEL;
|
|
CurrPixel++;
|
|
}
|
|
}
|
|
|
|
}
|
|
else
|
|
{
|
|
if(!ConvertPixel(IHDR, OutPtr, DecompPtr, HasTransparentColour, TransparentColour, OutPal))
|
|
{
|
|
return(qfalse);
|
|
}
|
|
|
|
|
|
OutPtr += Q3IMAGE_BYTESPERPIXEL;
|
|
}
|
|
|
|
DecompPtr += BytesPerPixel;
|
|
}
|
|
}
|
|
|
|
return(qtrue);
|
|
}
|
|
|
|
/*
|
|
* Decode an interlaced image.
|
|
*/
|
|
|
|
static qboolean DecodeImageInterlaced(struct PNG_Chunk_IHDR *IHDR,
|
|
byte *OutBuffer,
|
|
uint8_t *DecompressedData,
|
|
uint32_t DecompressedDataLength,
|
|
qboolean HasTransparentColour,
|
|
uint8_t *TransparentColour,
|
|
uint8_t *OutPal)
|
|
{
|
|
uint32_t IHDR_Width;
|
|
uint32_t IHDR_Height;
|
|
uint32_t BytesPerScanline[PNG_Adam7_NumPasses], BytesPerPixel, PixelsPerByte;
|
|
uint32_t PassWidth[PNG_Adam7_NumPasses], PassHeight[PNG_Adam7_NumPasses];
|
|
uint32_t WSkip[PNG_Adam7_NumPasses], WOffset[PNG_Adam7_NumPasses], HSkip[PNG_Adam7_NumPasses], HOffset[PNG_Adam7_NumPasses];
|
|
uint32_t w, h, p, a;
|
|
byte *OutPtr;
|
|
uint8_t *DecompPtr;
|
|
uint32_t TargetLength;
|
|
|
|
/*
|
|
* input verification
|
|
*/
|
|
|
|
if(!(IHDR && OutBuffer && DecompressedData && DecompressedDataLength && TransparentColour && OutPal))
|
|
{
|
|
return(qfalse);
|
|
}
|
|
|
|
/*
|
|
* byte swapping
|
|
*/
|
|
|
|
IHDR_Width = BigLong(IHDR->Width);
|
|
IHDR_Height = BigLong(IHDR->Height);
|
|
|
|
/*
|
|
* Skip and Offset for the passes.
|
|
*/
|
|
|
|
WSkip[0] = 8;
|
|
WOffset[0] = 0;
|
|
HSkip[0] = 8;
|
|
HOffset[0] = 0;
|
|
|
|
WSkip[1] = 8;
|
|
WOffset[1] = 4;
|
|
HSkip[1] = 8;
|
|
HOffset[1] = 0;
|
|
|
|
WSkip[2] = 4;
|
|
WOffset[2] = 0;
|
|
HSkip[2] = 8;
|
|
HOffset[2] = 4;
|
|
|
|
WSkip[3] = 4;
|
|
WOffset[3] = 2;
|
|
HSkip[3] = 4;
|
|
HOffset[3] = 0;
|
|
|
|
WSkip[4] = 2;
|
|
WOffset[4] = 0;
|
|
HSkip[4] = 4;
|
|
HOffset[4] = 2;
|
|
|
|
WSkip[5] = 2;
|
|
WOffset[5] = 1;
|
|
HSkip[5] = 2;
|
|
HOffset[5] = 0;
|
|
|
|
WSkip[6] = 1;
|
|
WOffset[6] = 0;
|
|
HSkip[6] = 2;
|
|
HOffset[6] = 1;
|
|
|
|
/*
|
|
* Calculate the sizes of the passes.
|
|
*/
|
|
|
|
PassWidth[0] = (IHDR_Width + 7) / 8;
|
|
PassHeight[0] = (IHDR_Height + 7) / 8;
|
|
|
|
PassWidth[1] = (IHDR_Width + 3) / 8;
|
|
PassHeight[1] = (IHDR_Height + 7) / 8;
|
|
|
|
PassWidth[2] = (IHDR_Width + 3) / 4;
|
|
PassHeight[2] = (IHDR_Height + 3) / 8;
|
|
|
|
PassWidth[3] = (IHDR_Width + 1) / 4;
|
|
PassHeight[3] = (IHDR_Height + 3) / 4;
|
|
|
|
PassWidth[4] = (IHDR_Width + 1) / 2;
|
|
PassHeight[4] = (IHDR_Height + 1) / 4;
|
|
|
|
PassWidth[5] = (IHDR_Width + 0) / 2;
|
|
PassHeight[5] = (IHDR_Height + 1) / 2;
|
|
|
|
PassWidth[6] = (IHDR_Width + 0) / 1;
|
|
PassHeight[6] = (IHDR_Height + 0) / 2;
|
|
|
|
/*
|
|
* information for un-filtering
|
|
*/
|
|
|
|
switch(IHDR->ColourType)
|
|
{
|
|
case PNG_ColourType_Grey :
|
|
{
|
|
switch(IHDR->BitDepth)
|
|
{
|
|
case PNG_BitDepth_1 :
|
|
case PNG_BitDepth_2 :
|
|
case PNG_BitDepth_4 :
|
|
{
|
|
BytesPerPixel = 1;
|
|
PixelsPerByte = 8 / IHDR->BitDepth;
|
|
|
|
break;
|
|
}
|
|
|
|
case PNG_BitDepth_8 :
|
|
case PNG_BitDepth_16 :
|
|
{
|
|
BytesPerPixel = (IHDR->BitDepth / 8) * PNG_NumColourComponents_Grey;
|
|
PixelsPerByte = 1;
|
|
|
|
break;
|
|
}
|
|
|
|
default :
|
|
{
|
|
return(qfalse);
|
|
}
|
|
}
|
|
|
|
break;
|
|
}
|
|
|
|
case PNG_ColourType_True :
|
|
{
|
|
switch(IHDR->BitDepth)
|
|
{
|
|
case PNG_BitDepth_8 :
|
|
case PNG_BitDepth_16 :
|
|
{
|
|
BytesPerPixel = (IHDR->BitDepth / 8) * PNG_NumColourComponents_True;
|
|
PixelsPerByte = 1;
|
|
|
|
break;
|
|
}
|
|
|
|
default :
|
|
{
|
|
return(qfalse);
|
|
}
|
|
}
|
|
|
|
break;
|
|
}
|
|
|
|
case PNG_ColourType_Indexed :
|
|
{
|
|
switch(IHDR->BitDepth)
|
|
{
|
|
case PNG_BitDepth_1 :
|
|
case PNG_BitDepth_2 :
|
|
case PNG_BitDepth_4 :
|
|
{
|
|
BytesPerPixel = 1;
|
|
PixelsPerByte = 8 / IHDR->BitDepth;
|
|
|
|
break;
|
|
}
|
|
|
|
case PNG_BitDepth_8 :
|
|
{
|
|
BytesPerPixel = PNG_NumColourComponents_Indexed;
|
|
PixelsPerByte = 1;
|
|
|
|
break;
|
|
}
|
|
|
|
default :
|
|
{
|
|
return(qfalse);
|
|
}
|
|
}
|
|
|
|
break;
|
|
}
|
|
|
|
case PNG_ColourType_GreyAlpha :
|
|
{
|
|
switch(IHDR->BitDepth)
|
|
{
|
|
case PNG_BitDepth_8 :
|
|
case PNG_BitDepth_16 :
|
|
{
|
|
BytesPerPixel = (IHDR->BitDepth / 8) * PNG_NumColourComponents_GreyAlpha;
|
|
PixelsPerByte = 1;
|
|
|
|
break;
|
|
}
|
|
|
|
default :
|
|
{
|
|
return(qfalse);
|
|
}
|
|
}
|
|
|
|
break;
|
|
}
|
|
|
|
case PNG_ColourType_TrueAlpha :
|
|
{
|
|
switch(IHDR->BitDepth)
|
|
{
|
|
case PNG_BitDepth_8 :
|
|
case PNG_BitDepth_16 :
|
|
{
|
|
BytesPerPixel = (IHDR->BitDepth / 8) * PNG_NumColourComponents_TrueAlpha;
|
|
PixelsPerByte = 1;
|
|
|
|
break;
|
|
}
|
|
|
|
default :
|
|
{
|
|
return(qfalse);
|
|
}
|
|
}
|
|
|
|
break;
|
|
}
|
|
|
|
default :
|
|
{
|
|
return(qfalse);
|
|
}
|
|
}
|
|
|
|
/*
|
|
* Calculate the size of the scanlines per pass
|
|
*/
|
|
|
|
for(a = 0; a < PNG_Adam7_NumPasses; a++)
|
|
{
|
|
BytesPerScanline[a] = (PassWidth[a] * BytesPerPixel + (PixelsPerByte - 1)) / PixelsPerByte;
|
|
}
|
|
|
|
/*
|
|
* Calculate the size of all passes
|
|
*/
|
|
|
|
TargetLength = 0;
|
|
|
|
for(a = 0; a < PNG_Adam7_NumPasses; a++)
|
|
{
|
|
TargetLength += ((BytesPerScanline[a] + (BytesPerScanline[a] ? 1 : 0)) * PassHeight[a]);
|
|
}
|
|
|
|
/*
|
|
* Check if we have enough data for the whole image.
|
|
*/
|
|
|
|
if(!(DecompressedDataLength == TargetLength))
|
|
{
|
|
return(qfalse);
|
|
}
|
|
|
|
/*
|
|
* Unfilter the image.
|
|
*/
|
|
|
|
DecompPtr = DecompressedData;
|
|
|
|
for(a = 0; a < PNG_Adam7_NumPasses; a++)
|
|
{
|
|
if(!UnfilterImage(DecompPtr, PassHeight[a], BytesPerScanline[a], BytesPerPixel))
|
|
{
|
|
return(qfalse);
|
|
}
|
|
|
|
DecompPtr += ((BytesPerScanline[a] + (BytesPerScanline[a] ? 1 : 0)) * PassHeight[a]);
|
|
}
|
|
|
|
/*
|
|
* Set the working pointers to the beginning of the buffers.
|
|
*/
|
|
|
|
DecompPtr = DecompressedData;
|
|
|
|
/*
|
|
* Create the output image.
|
|
*/
|
|
|
|
for(a = 0; a < PNG_Adam7_NumPasses; a++)
|
|
{
|
|
for(h = 0; h < PassHeight[a]; h++)
|
|
{
|
|
/*
|
|
* Count the pixels on the scanline for those multipixel bytes
|
|
*/
|
|
|
|
uint32_t CurrPixel;
|
|
|
|
/*
|
|
* skip FilterType
|
|
* but only when the pass has a width bigger than zero
|
|
*/
|
|
|
|
if(BytesPerScanline[a])
|
|
{
|
|
DecompPtr++;
|
|
}
|
|
|
|
/*
|
|
* Reset the pixel count.
|
|
*/
|
|
|
|
CurrPixel = 0;
|
|
|
|
for(w = 0; w < (BytesPerScanline[a] / BytesPerPixel); w++)
|
|
{
|
|
if(PixelsPerByte > 1)
|
|
{
|
|
uint8_t Mask;
|
|
uint32_t Shift;
|
|
uint8_t SinglePixel;
|
|
|
|
for(p = 0; p < PixelsPerByte; p++)
|
|
{
|
|
if(CurrPixel < PassWidth[a])
|
|
{
|
|
Mask = (1 << IHDR->BitDepth) - 1;
|
|
Shift = (PixelsPerByte - 1 - p) * IHDR->BitDepth;
|
|
|
|
SinglePixel = ((DecompPtr[0] & (Mask << Shift)) >> Shift);
|
|
|
|
OutPtr = OutBuffer + (((((h * HSkip[a]) + HOffset[a]) * IHDR_Width) + ((CurrPixel * WSkip[a]) + WOffset[a])) * Q3IMAGE_BYTESPERPIXEL);
|
|
|
|
if(!ConvertPixel(IHDR, OutPtr, &SinglePixel, HasTransparentColour, TransparentColour, OutPal))
|
|
{
|
|
return(qfalse);
|
|
}
|
|
|
|
CurrPixel++;
|
|
}
|
|
}
|
|
|
|
}
|
|
else
|
|
{
|
|
OutPtr = OutBuffer + (((((h * HSkip[a]) + HOffset[a]) * IHDR_Width) + ((w * WSkip[a]) + WOffset[a])) * Q3IMAGE_BYTESPERPIXEL);
|
|
|
|
if(!ConvertPixel(IHDR, OutPtr, DecompPtr, HasTransparentColour, TransparentColour, OutPal))
|
|
{
|
|
return(qfalse);
|
|
}
|
|
}
|
|
|
|
DecompPtr += BytesPerPixel;
|
|
}
|
|
}
|
|
}
|
|
|
|
return(qtrue);
|
|
}
|
|
|
|
/*
|
|
* The PNG loader
|
|
*/
|
|
|
|
void R_LoadPNG(const char *name, byte **pic, int *width, int *height)
|
|
{
|
|
struct BufferedFile *ThePNG;
|
|
byte *OutBuffer;
|
|
uint8_t *Signature;
|
|
struct PNG_ChunkHeader *CH;
|
|
uint32_t ChunkHeaderLength;
|
|
uint32_t ChunkHeaderType;
|
|
struct PNG_Chunk_IHDR *IHDR;
|
|
uint32_t IHDR_Width;
|
|
uint32_t IHDR_Height;
|
|
PNG_ChunkCRC *CRC;
|
|
uint8_t *InPal;
|
|
uint8_t *DecompressedData;
|
|
uint32_t DecompressedDataLength;
|
|
uint32_t i;
|
|
|
|
/*
|
|
* palette with 256 RGBA entries
|
|
*/
|
|
|
|
uint8_t OutPal[1024];
|
|
|
|
/*
|
|
* transparent colour from the tRNS chunk
|
|
*/
|
|
|
|
qboolean HasTransparentColour = qfalse;
|
|
uint8_t TransparentColour[6] = {0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF};
|
|
|
|
/*
|
|
* input verification
|
|
*/
|
|
|
|
if(!(name && pic))
|
|
{
|
|
return;
|
|
}
|
|
|
|
/*
|
|
* Zero out return values.
|
|
*/
|
|
|
|
*pic = NULL;
|
|
|
|
if(width)
|
|
{
|
|
*width = 0;
|
|
}
|
|
|
|
if(height)
|
|
{
|
|
*height = 0;
|
|
}
|
|
|
|
/*
|
|
* Read the file.
|
|
*/
|
|
|
|
ThePNG = ReadBufferedFile(name);
|
|
if(!ThePNG)
|
|
{
|
|
return;
|
|
}
|
|
|
|
/*
|
|
* Read the siganture of the file.
|
|
*/
|
|
|
|
Signature = BufferedFileRead(ThePNG, PNG_Signature_Size);
|
|
if(!Signature)
|
|
{
|
|
CloseBufferedFile(ThePNG);
|
|
|
|
return;
|
|
}
|
|
|
|
/*
|
|
* Is it a PNG?
|
|
*/
|
|
|
|
if(memcmp(Signature, PNG_Signature, PNG_Signature_Size))
|
|
{
|
|
CloseBufferedFile(ThePNG);
|
|
|
|
return;
|
|
}
|
|
|
|
/*
|
|
* Read the first chunk-header.
|
|
*/
|
|
|
|
CH = BufferedFileRead(ThePNG, PNG_ChunkHeader_Size);
|
|
if(!CH)
|
|
{
|
|
CloseBufferedFile(ThePNG);
|
|
|
|
return;
|
|
}
|
|
|
|
/*
|
|
* PNG multi-byte types are in Big Endian
|
|
*/
|
|
|
|
ChunkHeaderLength = BigLong(CH->Length);
|
|
ChunkHeaderType = BigLong(CH->Type);
|
|
|
|
/*
|
|
* Check if the first chunk is an IHDR.
|
|
*/
|
|
|
|
if(!((ChunkHeaderType == PNG_ChunkType_IHDR) && (ChunkHeaderLength == PNG_Chunk_IHDR_Size)))
|
|
{
|
|
CloseBufferedFile(ThePNG);
|
|
|
|
return;
|
|
}
|
|
|
|
/*
|
|
* Read the IHDR.
|
|
*/
|
|
|
|
IHDR = BufferedFileRead(ThePNG, PNG_Chunk_IHDR_Size);
|
|
if(!IHDR)
|
|
{
|
|
CloseBufferedFile(ThePNG);
|
|
|
|
return;
|
|
}
|
|
|
|
/*
|
|
* Read the CRC for IHDR
|
|
*/
|
|
|
|
CRC = BufferedFileRead(ThePNG, PNG_ChunkCRC_Size);
|
|
if(!CRC)
|
|
{
|
|
CloseBufferedFile(ThePNG);
|
|
|
|
return;
|
|
}
|
|
|
|
/*
|
|
* Here we could check the CRC if we wanted to.
|
|
*/
|
|
|
|
/*
|
|
* multi-byte type swapping
|
|
*/
|
|
|
|
IHDR_Width = BigLong(IHDR->Width);
|
|
IHDR_Height = BigLong(IHDR->Height);
|
|
|
|
/*
|
|
* Check if Width and Height are valid.
|
|
*/
|
|
|
|
if(!((IHDR_Width > 0) && (IHDR_Height > 0))
|
|
|| IHDR_Width > INT_MAX / Q3IMAGE_BYTESPERPIXEL / IHDR_Height)
|
|
{
|
|
CloseBufferedFile(ThePNG);
|
|
|
|
ri.Printf( PRINT_WARNING, "%s: invalid image size\n", name );
|
|
|
|
return;
|
|
}
|
|
|
|
/*
|
|
* Do we need to check if the dimensions of the image are valid for Quake3?
|
|
*/
|
|
|
|
/*
|
|
* Check if CompressionMethod and FilterMethod are valid.
|
|
*/
|
|
|
|
if(!((IHDR->CompressionMethod == PNG_CompressionMethod_0) && (IHDR->FilterMethod == PNG_FilterMethod_0)))
|
|
{
|
|
CloseBufferedFile(ThePNG);
|
|
|
|
return;
|
|
}
|
|
|
|
/*
|
|
* Check if InterlaceMethod is valid.
|
|
*/
|
|
|
|
if(!((IHDR->InterlaceMethod == PNG_InterlaceMethod_NonInterlaced) || (IHDR->InterlaceMethod == PNG_InterlaceMethod_Interlaced)))
|
|
{
|
|
CloseBufferedFile(ThePNG);
|
|
|
|
return;
|
|
}
|
|
|
|
/*
|
|
* Read palette for an indexed image.
|
|
*/
|
|
|
|
if(IHDR->ColourType == PNG_ColourType_Indexed)
|
|
{
|
|
/*
|
|
* We need the palette first.
|
|
*/
|
|
|
|
if(!FindChunk(ThePNG, PNG_ChunkType_PLTE))
|
|
{
|
|
CloseBufferedFile(ThePNG);
|
|
|
|
return;
|
|
}
|
|
|
|
/*
|
|
* Read the chunk-header.
|
|
*/
|
|
|
|
CH = BufferedFileRead(ThePNG, PNG_ChunkHeader_Size);
|
|
if(!CH)
|
|
{
|
|
CloseBufferedFile(ThePNG);
|
|
|
|
return;
|
|
}
|
|
|
|
/*
|
|
* PNG multi-byte types are in Big Endian
|
|
*/
|
|
|
|
ChunkHeaderLength = BigLong(CH->Length);
|
|
ChunkHeaderType = BigLong(CH->Type);
|
|
|
|
/*
|
|
* Check if the chunk is a PLTE.
|
|
*/
|
|
|
|
if(!(ChunkHeaderType == PNG_ChunkType_PLTE))
|
|
{
|
|
CloseBufferedFile(ThePNG);
|
|
|
|
return;
|
|
}
|
|
|
|
/*
|
|
* Check if Length is divisible by 3
|
|
*/
|
|
|
|
if(ChunkHeaderLength % 3)
|
|
{
|
|
CloseBufferedFile(ThePNG);
|
|
|
|
return;
|
|
}
|
|
|
|
/*
|
|
* Read the raw palette data
|
|
*/
|
|
|
|
InPal = BufferedFileRead(ThePNG, ChunkHeaderLength);
|
|
if(!InPal)
|
|
{
|
|
CloseBufferedFile(ThePNG);
|
|
|
|
return;
|
|
}
|
|
|
|
/*
|
|
* Read the CRC for the palette
|
|
*/
|
|
|
|
CRC = BufferedFileRead(ThePNG, PNG_ChunkCRC_Size);
|
|
if(!CRC)
|
|
{
|
|
CloseBufferedFile(ThePNG);
|
|
|
|
return;
|
|
}
|
|
|
|
/*
|
|
* Set some default values.
|
|
*/
|
|
|
|
for(i = 0; i < 256; i++)
|
|
{
|
|
OutPal[i * Q3IMAGE_BYTESPERPIXEL + 0] = 0x00;
|
|
OutPal[i * Q3IMAGE_BYTESPERPIXEL + 1] = 0x00;
|
|
OutPal[i * Q3IMAGE_BYTESPERPIXEL + 2] = 0x00;
|
|
OutPal[i * Q3IMAGE_BYTESPERPIXEL + 3] = 0xFF;
|
|
}
|
|
|
|
/*
|
|
* Convert to the Quake3 RGBA-format.
|
|
*/
|
|
|
|
for(i = 0; i < (ChunkHeaderLength / 3); i++)
|
|
{
|
|
OutPal[i * Q3IMAGE_BYTESPERPIXEL + 0] = InPal[i*3+0];
|
|
OutPal[i * Q3IMAGE_BYTESPERPIXEL + 1] = InPal[i*3+1];
|
|
OutPal[i * Q3IMAGE_BYTESPERPIXEL + 2] = InPal[i*3+2];
|
|
OutPal[i * Q3IMAGE_BYTESPERPIXEL + 3] = 0xFF;
|
|
}
|
|
}
|
|
|
|
/*
|
|
* transparency information is sometimes stored in a tRNS chunk
|
|
*/
|
|
|
|
/*
|
|
* Let's see if there is a tRNS chunk
|
|
*/
|
|
|
|
if(FindChunk(ThePNG, PNG_ChunkType_tRNS))
|
|
{
|
|
uint8_t *Trans;
|
|
|
|
/*
|
|
* Read the chunk-header.
|
|
*/
|
|
|
|
CH = BufferedFileRead(ThePNG, PNG_ChunkHeader_Size);
|
|
if(!CH)
|
|
{
|
|
CloseBufferedFile(ThePNG);
|
|
|
|
return;
|
|
}
|
|
|
|
/*
|
|
* PNG multi-byte types are in Big Endian
|
|
*/
|
|
|
|
ChunkHeaderLength = BigLong(CH->Length);
|
|
ChunkHeaderType = BigLong(CH->Type);
|
|
|
|
/*
|
|
* Check if the chunk is a tRNS.
|
|
*/
|
|
|
|
if(!(ChunkHeaderType == PNG_ChunkType_tRNS))
|
|
{
|
|
CloseBufferedFile(ThePNG);
|
|
|
|
return;
|
|
}
|
|
|
|
/*
|
|
* Read the transparency information.
|
|
*/
|
|
|
|
Trans = BufferedFileRead(ThePNG, ChunkHeaderLength);
|
|
if(!Trans)
|
|
{
|
|
CloseBufferedFile(ThePNG);
|
|
|
|
return;
|
|
}
|
|
|
|
/*
|
|
* Read the CRC.
|
|
*/
|
|
|
|
CRC = BufferedFileRead(ThePNG, PNG_ChunkCRC_Size);
|
|
if(!CRC)
|
|
{
|
|
CloseBufferedFile(ThePNG);
|
|
|
|
return;
|
|
}
|
|
|
|
/*
|
|
* Only for Grey, True and Indexed ColourType should tRNS exist.
|
|
*/
|
|
|
|
switch(IHDR->ColourType)
|
|
{
|
|
case PNG_ColourType_Grey :
|
|
{
|
|
if(!ChunkHeaderLength == 2)
|
|
{
|
|
CloseBufferedFile(ThePNG);
|
|
|
|
return;
|
|
}
|
|
|
|
HasTransparentColour = qtrue;
|
|
|
|
/*
|
|
* Grey can have one colour which is completely transparent.
|
|
* This colour is always stored in 16 bits.
|
|
*/
|
|
|
|
TransparentColour[0] = Trans[0];
|
|
TransparentColour[1] = Trans[1];
|
|
|
|
break;
|
|
}
|
|
|
|
case PNG_ColourType_True :
|
|
{
|
|
if(!ChunkHeaderLength == 6)
|
|
{
|
|
CloseBufferedFile(ThePNG);
|
|
|
|
return;
|
|
}
|
|
|
|
HasTransparentColour = qtrue;
|
|
|
|
/*
|
|
* True can have one colour which is completely transparent.
|
|
* This colour is always stored in 16 bits.
|
|
*/
|
|
|
|
TransparentColour[0] = Trans[0];
|
|
TransparentColour[1] = Trans[1];
|
|
TransparentColour[2] = Trans[2];
|
|
TransparentColour[3] = Trans[3];
|
|
TransparentColour[4] = Trans[4];
|
|
TransparentColour[5] = Trans[5];
|
|
|
|
break;
|
|
}
|
|
|
|
case PNG_ColourType_Indexed :
|
|
{
|
|
/*
|
|
* Maximum of 256 one byte transparency entries.
|
|
*/
|
|
|
|
if(ChunkHeaderLength > 256)
|
|
{
|
|
CloseBufferedFile(ThePNG);
|
|
|
|
return;
|
|
}
|
|
|
|
HasTransparentColour = qtrue;
|
|
|
|
/*
|
|
* alpha values for palette entries
|
|
*/
|
|
|
|
for(i = 0; i < ChunkHeaderLength; i++)
|
|
{
|
|
OutPal[i * Q3IMAGE_BYTESPERPIXEL + 3] = Trans[i];
|
|
}
|
|
|
|
break;
|
|
}
|
|
|
|
/*
|
|
* All other ColourTypes should not have tRNS chunks
|
|
*/
|
|
|
|
default :
|
|
{
|
|
CloseBufferedFile(ThePNG);
|
|
|
|
return;
|
|
}
|
|
}
|
|
}
|
|
|
|
/*
|
|
* Rewind to the start of the file.
|
|
*/
|
|
|
|
if(!BufferedFileRewind(ThePNG, -1))
|
|
{
|
|
CloseBufferedFile(ThePNG);
|
|
|
|
return;
|
|
}
|
|
|
|
/*
|
|
* Skip the signature
|
|
*/
|
|
|
|
if(!BufferedFileSkip(ThePNG, PNG_Signature_Size))
|
|
{
|
|
CloseBufferedFile(ThePNG);
|
|
|
|
return;
|
|
}
|
|
|
|
/*
|
|
* Decompress all IDAT chunks
|
|
*/
|
|
|
|
DecompressedDataLength = DecompressIDATs(ThePNG, &DecompressedData);
|
|
if(!(DecompressedDataLength && DecompressedData))
|
|
{
|
|
CloseBufferedFile(ThePNG);
|
|
|
|
return;
|
|
}
|
|
|
|
/*
|
|
* Allocate output buffer.
|
|
*/
|
|
|
|
OutBuffer = ri.Malloc(IHDR_Width * IHDR_Height * Q3IMAGE_BYTESPERPIXEL);
|
|
if(!OutBuffer)
|
|
{
|
|
ri.Free(DecompressedData);
|
|
CloseBufferedFile(ThePNG);
|
|
|
|
return;
|
|
}
|
|
|
|
/*
|
|
* Interlaced and Non-interlaced images need to be handled differently.
|
|
*/
|
|
|
|
switch(IHDR->InterlaceMethod)
|
|
{
|
|
case PNG_InterlaceMethod_NonInterlaced :
|
|
{
|
|
if(!DecodeImageNonInterlaced(IHDR, OutBuffer, DecompressedData, DecompressedDataLength, HasTransparentColour, TransparentColour, OutPal))
|
|
{
|
|
ri.Free(OutBuffer);
|
|
ri.Free(DecompressedData);
|
|
CloseBufferedFile(ThePNG);
|
|
|
|
return;
|
|
}
|
|
|
|
break;
|
|
}
|
|
|
|
case PNG_InterlaceMethod_Interlaced :
|
|
{
|
|
if(!DecodeImageInterlaced(IHDR, OutBuffer, DecompressedData, DecompressedDataLength, HasTransparentColour, TransparentColour, OutPal))
|
|
{
|
|
ri.Free(OutBuffer);
|
|
ri.Free(DecompressedData);
|
|
CloseBufferedFile(ThePNG);
|
|
|
|
return;
|
|
}
|
|
|
|
break;
|
|
}
|
|
|
|
default :
|
|
{
|
|
ri.Free(OutBuffer);
|
|
ri.Free(DecompressedData);
|
|
CloseBufferedFile(ThePNG);
|
|
|
|
return;
|
|
}
|
|
}
|
|
|
|
/*
|
|
* update the pointer to the image data
|
|
*/
|
|
|
|
*pic = OutBuffer;
|
|
|
|
/*
|
|
* Fill width and height.
|
|
*/
|
|
|
|
if(width)
|
|
{
|
|
*width = IHDR_Width;
|
|
}
|
|
|
|
if(height)
|
|
{
|
|
*height = IHDR_Height;
|
|
}
|
|
|
|
/*
|
|
* DecompressedData is not needed anymore.
|
|
*/
|
|
|
|
ri.Free(DecompressedData);
|
|
|
|
/*
|
|
* We have all data, so close the file.
|
|
*/
|
|
|
|
CloseBufferedFile(ThePNG);
|
|
}
|