Import the Quake III Arena TGA loader and replace out implementation

with it. The Q3A is about ~40% faster and supports more types of TGA
files, including bottom to top encoded images.
This commit is contained in:
Yamagi Burmeister 2012-03-12 09:16:59 +00:00
parent 43fcc8eb99
commit 7db2d76833

View file

@ -36,116 +36,138 @@ typedef struct _TargaHeader
} TargaHeader; } TargaHeader;
void void
LoadTGA ( char *origname, byte **pic, int *width, int *height ) LoadTGA(char *origname, byte **pic, int *width, int *height)
{ {
int columns, rows, numPixels; unsigned rows, numPixels;
byte *pixbuf; byte *pixbuf;
int row, column; int row, column, columns;
byte *buf_p; byte *buf_p;
byte *buffer; byte *buffer;
int length;
int len;
TargaHeader targa_header; TargaHeader targa_header;
byte *targa_rgba; byte *targa_rgba;
byte tmp [ 2 ]; int length;
int pixel_size;
char name[256]; char name[256];
int len;
/* Add the extension */ /* Add the extension */
len = strlen( origname ); len = strlen(origname);
if ( strcmp( origname + len - 4, ".tga" ) ) if (strcmp(origname + len - 4, ".tga"))
{ {
strncpy( name, origname, 256 ); strncpy(name, origname, 256);
strncat(name, ".tga", 255); strncat(name, ".tga", 255);
} }
else else
{ {
strncpy( name, origname, 256 ); strncpy(name, origname, 256);
} }
*pic = NULL;
/* load the file */ /* load the file */
length = ri.FS_LoadFile( name, (void **) &buffer ); length = ri.FS_LoadFile(name, (void **)&buffer);
if ( !buffer ) if (!buffer)
{ {
ri.Con_Printf( PRINT_DEVELOPER, "Bad tga file %s\n", name );
return; return;
} }
if (length < 18)
{
ri.Sys_Error(ERR_DROP, "LoadTGA: %s has an invalid file size", name);
}
buf_p = buffer; buf_p = buffer;
targa_header.id_length = *buf_p++; targa_header.id_length = buf_p[0];
targa_header.colormap_type = *buf_p++; targa_header.colormap_type = buf_p[1];
targa_header.image_type = *buf_p++; targa_header.image_type = buf_p[2];
tmp [ 0 ] = buf_p [ 0 ]; memcpy(&targa_header.colormap_index, &buf_p[3], 2);
tmp [ 1 ] = buf_p [ 1 ]; memcpy(&targa_header.colormap_length, &buf_p[5], 2);
targa_header.colormap_index = LittleShort( *( (short *) tmp ) ); targa_header.colormap_size = buf_p[7];
buf_p += 2; memcpy(&targa_header.x_origin, &buf_p[8], 2);
tmp [ 0 ] = buf_p [ 0 ]; memcpy(&targa_header.y_origin, &buf_p[10], 2);
tmp [ 1 ] = buf_p [ 1 ]; memcpy(&targa_header.width, &buf_p[12], 2);
targa_header.colormap_length = LittleShort( *( (short *) tmp ) ); memcpy(&targa_header.height, &buf_p[14], 2);
buf_p += 2; targa_header.pixel_size = buf_p[16];
targa_header.colormap_size = *buf_p++; targa_header.attributes = buf_p[17];
targa_header.x_origin = LittleShort( *( (short *) buf_p ) );
buf_p += 2;
targa_header.y_origin = LittleShort( *( (short *) buf_p ) );
buf_p += 2;
targa_header.width = LittleShort( *( (short *) buf_p ) );
buf_p += 2;
targa_header.height = LittleShort( *( (short *) buf_p ) );
buf_p += 2;
targa_header.pixel_size = *buf_p++;
targa_header.attributes = *buf_p++;
if ( ( targa_header.image_type != 2 ) && targa_header.colormap_index = LittleShort(targa_header.colormap_index);
( targa_header.image_type != 10 ) ) targa_header.colormap_length = LittleShort(targa_header.colormap_length);
targa_header.x_origin = LittleShort(targa_header.x_origin);
targa_header.y_origin = LittleShort(targa_header.y_origin);
targa_header.width = LittleShort(targa_header.width);
targa_header.height = LittleShort(targa_header.height);
buf_p += 18;
if ((targa_header.image_type != 2) &&
(targa_header.image_type != 10) &&
(targa_header.image_type != 3))
{ {
ri.Sys_Error( ERR_DROP, "LoadTGA: Only type 2 and 10 targa RGB images supported\n" ); ri.Sys_Error( ERR_DROP, "LoadTGA (%s): Only type 2 (RGB), 3 (gray), and 10 (RGB) TGA images supported", name);
} }
if ( ( targa_header.colormap_type != 0 ) || if (targa_header.colormap_type != 0)
( ( targa_header.pixel_size != 32 ) && ( targa_header.pixel_size != 24 ) ) )
{ {
ri.Sys_Error( ERR_DROP, "LoadTGA: Only 32 or 24 bit images supported (no colormaps)\n" ); ri.Sys_Error(ERR_DROP, "LoadTGA (%s): colormaps not supported", name);
}
if (((targa_header.pixel_size != 32) && (targa_header.pixel_size != 24)) && (targa_header.image_type != 3))
{
ri.Sys_Error( ERR_DROP, "LoadTGA (%s): Only 32 or 24 bit images supported (no colormaps)", name);
} }
columns = targa_header.width; columns = targa_header.width;
rows = targa_header.height; rows = targa_header.height;
numPixels = columns * rows; numPixels = columns * rows * 4;
if ( width ) if (width)
{ {
*width = columns; *width = columns;
} }
if ( height ) if (height)
{ {
*height = rows; *height = rows;
} }
targa_rgba = malloc( numPixels * 4 ); if (!columns || !rows || (numPixels > 0x7FFFFFFF) || (numPixels / columns / 4 != rows))
{
ri.Sys_Error(ERR_DROP, "LoadTGA (%s): Invalid image size", name);
}
targa_rgba = malloc(numPixels);
*pic = targa_rgba; *pic = targa_rgba;
if ( targa_header.id_length != 0 ) if (targa_header.id_length != 0)
{ {
buf_p += targa_header.id_length; /* skip TARGA image comment */ buf_p += targa_header.id_length; /* skip TARGA image comment */
} }
if ( targa_header.image_type == 2 ) /* Uncompressed, RGB images */ pixel_size = targa_header.pixel_size;
if ((targa_header.image_type == 2) || (targa_header.image_type == 3))
{ {
for ( row = rows - 1; row >= 0; row-- ) /* Uncompressed RGB or gray scale image */
switch (pixel_size)
{
case 24:
if (buf_p - buffer + (3 * columns * rows) > length)
{
ri.Sys_Error( ERR_DROP, "LoadTGA: (%s): Pointer passed end of file - corrupt TGA file", name);
}
for (row = rows - 1; row >= 0; row--)
{ {
pixbuf = targa_rgba + row * columns * 4; pixbuf = targa_rgba + row * columns * 4;
for ( column = 0; column < columns; column++ ) for (column = 0; column < columns; column++)
{ {
unsigned char red, green, blue, alphabyte; unsigned char red, green, blue;
switch ( targa_header.pixel_size )
{
case 24:
blue = *buf_p++; blue = *buf_p++;
green = *buf_p++; green = *buf_p++;
@ -154,8 +176,26 @@ LoadTGA ( char *origname, byte **pic, int *width, int *height )
*pixbuf++ = green; *pixbuf++ = green;
*pixbuf++ = blue; *pixbuf++ = blue;
*pixbuf++ = 255; *pixbuf++ = 255;
}
}
break; break;
case 32: case 32:
if (buf_p - buffer + (4 * columns * rows) > length)
{
ri.Sys_Error( ERR_DROP, "LoadTGA: (%s): Pointer passed end of file - corrupt TGA file", name);
}
for (row = rows - 1; row >= 0; row--)
{
pixbuf = targa_rgba + row * columns * 4;
for (column = 0; column < columns; column++)
{
unsigned char red, green, blue, alphabyte;
blue = *buf_p++; blue = *buf_p++;
green = *buf_p++; green = *buf_p++;
red = *buf_p++; red = *buf_p++;
@ -164,49 +204,93 @@ LoadTGA ( char *origname, byte **pic, int *width, int *height )
*pixbuf++ = green; *pixbuf++ = green;
*pixbuf++ = blue; *pixbuf++ = blue;
*pixbuf++ = alphabyte; *pixbuf++ = alphabyte;
break;
} }
} }
}
}
else if ( targa_header.image_type == 10 ) /* Runlength encoded RGB images */
{
unsigned char red, green, blue, alphabyte, packetHeader, packetSize, j;
for ( row = rows - 1; row >= 0; row-- ) break;
case 8:
if (buf_p - buffer + (1 * columns * rows) > length)
{
ri.Sys_Error( ERR_DROP, "LoadTGA: (%s): Pointer passed end of file - corrupt TGA file", name);
}
for (row = rows - 1; row >= 0; row--)
{ {
pixbuf = targa_rgba + row * columns * 4; pixbuf = targa_rgba + row * columns * 4;
for ( column = 0; column < columns; ) for (column = 0; column < columns; column++)
{
unsigned char red, green, blue;
blue = *buf_p++;
green = blue;
red = blue;
*pixbuf++ = red;
*pixbuf++ = green;
*pixbuf++ = blue;
*pixbuf++ = 255;
}
}
break;
}
}
else if (targa_header.image_type == 10)
{
/* Runlength encoded RGB images */
byte red, green, blue, alphabyte, packetHeader;
unsigned packetSize, j;
red = 0;
green = 0;
blue = 0;
alphabyte = 0xff;
for (row = rows - 1; row >= 0; row--)
{
pixbuf = targa_rgba + row * columns * 4;
for (column = 0; column < columns; )
{ {
packetHeader = *buf_p++; packetHeader = *buf_p++;
packetSize = 1 + ( packetHeader & 0x7f ); packetSize = 1 + (packetHeader & 0x7f);
if ( packetHeader & 0x80 ) /* run-length packet */ if (packetHeader & 0x80)
{ {
switch ( targa_header.pixel_size ) /* run-length packet */
switch (pixel_size)
{ {
case 24: case 24:
if (buf_p - buffer + (3) > length)
{
ri.Sys_Error( ERR_DROP, "LoadTGA: (%s): Pointer passed end of file - corrupt TGA file", name);
}
blue = *buf_p++; blue = *buf_p++;
green = *buf_p++; green = *buf_p++;
red = *buf_p++; red = *buf_p++;
alphabyte = 255; alphabyte = 255;
break; break;
case 32: case 32:
if (buf_p - buffer + (4) > length)
{
ri.Sys_Error( ERR_DROP, "LoadTGA: (%s): Pointer passed end of file - corrupt TGA file", name);
}
blue = *buf_p++; blue = *buf_p++;
green = *buf_p++; green = *buf_p++;
red = *buf_p++; red = *buf_p++;
alphabyte = *buf_p++; alphabyte = *buf_p++;
break; break;
default: default:
blue = 0;
green = 0;
red = 0;
alphabyte = 0;
break; break;
} }
for ( j = 0; j < packetSize; j++ ) for (j = 0; j < packetSize; j++)
{ {
*pixbuf++ = red; *pixbuf++ = red;
*pixbuf++ = green; *pixbuf++ = green;
@ -214,12 +298,12 @@ LoadTGA ( char *origname, byte **pic, int *width, int *height )
*pixbuf++ = alphabyte; *pixbuf++ = alphabyte;
column++; column++;
/* run spans across rows */ if (column == columns)
if ( column == columns )
{ {
/* run spans across rows */
column = 0; column = 0;
if ( row > 0 ) if (row > 0)
{ {
row--; row--;
} }
@ -232,13 +316,20 @@ LoadTGA ( char *origname, byte **pic, int *width, int *height )
} }
} }
} }
else /* non run-length packet */ else
{ {
for ( j = 0; j < packetSize; j++ ) /* non run-length packet */
{ switch (pixel_size)
switch ( targa_header.pixel_size )
{ {
case 24: case 24:
if (buf_p - buffer + (3 * packetSize) > length)
{
ri.Sys_Error( ERR_DROP, "LoadTGA: (%s): Pointer passed end of file - corrupt TGA file", name);
}
for (j = 0; j < packetSize; j++)
{
blue = *buf_p++; blue = *buf_p++;
green = *buf_p++; green = *buf_p++;
red = *buf_p++; red = *buf_p++;
@ -246,26 +337,15 @@ LoadTGA ( char *origname, byte **pic, int *width, int *height )
*pixbuf++ = green; *pixbuf++ = green;
*pixbuf++ = blue; *pixbuf++ = blue;
*pixbuf++ = 255; *pixbuf++ = 255;
break;
case 32:
blue = *buf_p++;
green = *buf_p++;
red = *buf_p++;
alphabyte = *buf_p++;
*pixbuf++ = red;
*pixbuf++ = green;
*pixbuf++ = blue;
*pixbuf++ = alphabyte;
break;
}
column++; column++;
if ( column == columns ) /* pixel packet run spans across rows */ if (column == columns)
{ {
/* pixel packet run spans across rows */
column = 0; column = 0;
if ( row > 0 ) if (row > 0)
{ {
row--; row--;
} }
@ -277,6 +357,52 @@ LoadTGA ( char *origname, byte **pic, int *width, int *height )
pixbuf = targa_rgba + row * columns * 4; pixbuf = targa_rgba + row * columns * 4;
} }
} }
break;
case 32:
if (buf_p - buffer + (4 * packetSize) > length)
{
ri.Sys_Error( ERR_DROP, "LoadTGA: (%s): Pointer passed end of file - corrupt TGA file", name);
}
for (j = 0; j < packetSize; j++)
{
blue = *buf_p++;
green = *buf_p++;
red = *buf_p++;
alphabyte = *buf_p++;
*pixbuf++ = red;
*pixbuf++ = green;
*pixbuf++ = blue;
*pixbuf++ = alphabyte;
column++;
if (column == columns)
{
/* pixel packet run spans across rows */
column = 0;
if (row > 0)
{
row--;
}
else
{
goto breakOut;
}
pixbuf = targa_rgba + row * columns * 4;
}
}
break;
default:
break;
}
} }
} }
@ -284,6 +410,27 @@ LoadTGA ( char *origname, byte **pic, int *width, int *height )
} }
} }
ri.FS_FreeFile( buffer ); if (targa_header.attributes & 0x20)
{
byte *temp;
temp = malloc(numPixels);
if (!temp)
{
ri.Sys_Error(ERR_FATAL, "LoadTGA: not enough memory");
}
ri.Con_Printf(PRINT_DEVELOPER, "LoadTGA: Bottom-to-top TGA file (slow): %s\n", name);
memcpy(temp, targa_rgba, numPixels);
for (row = 0; row < rows; row++)
{
memcpy(targa_rgba + (row * columns * 4), temp + (rows - row - 1) * columns * 4, columns * 4);
}
free(temp);
}
ri.FS_FreeFile(buffer);
} }