mirror of
https://github.com/TorqueGameEngines/Torque3D.git
synced 2026-01-20 04:34:48 +00:00
c19a70814c
Rephrase the macros so that they can be used in expressions, and properly require semicolons. And add the semicolons where missing.
490 lines
14 KiB
C++
490 lines
14 KiB
C++
//-----------------------------------------------------------------------------
|
|
// Copyright (c) 2012 GarageGames, LLC
|
|
//
|
|
// Permission is hereby granted, free of charge, to any person obtaining a copy
|
|
// of this software and associated documentation files (the "Software"), to
|
|
// deal in the Software without restriction, including without limitation the
|
|
// rights to use, copy, modify, merge, publish, distribute, sublicense, and/or
|
|
// sell copies of the Software, and to permit persons to whom the Software is
|
|
// furnished to do so, subject to the following conditions:
|
|
//
|
|
// The above copyright notice and this permission notice shall be included in
|
|
// all copies or substantial portions of the Software.
|
|
//
|
|
// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
|
// IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
|
// FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
|
|
// AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
|
// LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
|
|
// FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS
|
|
// IN THE SOFTWARE.
|
|
//-----------------------------------------------------------------------------
|
|
|
|
#include "core/stream/stream.h"
|
|
|
|
#include "gfx/bitmap/gBitmap.h"
|
|
|
|
|
|
static bool sReadTGA(Stream &stream, GBitmap *bitmap);
|
|
static bool sWriteTGA(GBitmap *bitmap, Stream &stream, U32 compressionLevel);
|
|
|
|
static struct _privateRegisterTGA
|
|
{
|
|
_privateRegisterTGA()
|
|
{
|
|
GBitmap::Registration reg;
|
|
|
|
reg.extensions.push_back( "tga" );
|
|
|
|
reg.readFunc = sReadTGA;
|
|
reg.writeFunc = sWriteTGA;
|
|
|
|
GBitmap::sRegisterFormat( reg );
|
|
}
|
|
} sStaticRegisterTGA;
|
|
|
|
|
|
//------------------------------------------------------------------------------
|
|
//-------------------------------------- Supplementary I/O
|
|
//
|
|
|
|
enum eImageType
|
|
{
|
|
TypeNoData = 0,
|
|
TypeUncPaletted = 1,
|
|
TypeUncTruecolor = 2,
|
|
TypeUncGrayscale = 3,
|
|
TypeRlePaletted = 9,
|
|
TypeRleTruecolor = 10,
|
|
TypeRleGrayscale = 11
|
|
};
|
|
|
|
enum ePixelMap
|
|
{
|
|
MapLowerLeft = 0,
|
|
MapLowerRight = 1,
|
|
MapUpperLeft = 2,
|
|
MapUpperRight = 3,
|
|
};
|
|
|
|
static void tga_write_pixel_to_mem( U8 * dat, U8 img_spec, U32 number,
|
|
U32 w, U32 h, U32 pixel, U32 bppOut )
|
|
{
|
|
// write the pixel to the data regarding how the
|
|
// header says the data is ordered.
|
|
|
|
U32 x, y;
|
|
|
|
switch( (img_spec & 0x30) >> 4 )
|
|
{
|
|
case MapLowerRight:
|
|
x = w - 1 - (number % w);
|
|
y = h - 1 - (number / w);
|
|
break;
|
|
|
|
case MapUpperLeft:
|
|
x = number % w;
|
|
y = number / w;
|
|
break;
|
|
|
|
case MapUpperRight:
|
|
x = w - 1 - (number % w);
|
|
y = number / w;
|
|
break;
|
|
|
|
case MapLowerLeft:
|
|
default:
|
|
x = number % w;
|
|
y = h - 1 - (number / w);
|
|
break;
|
|
|
|
}
|
|
|
|
U32 addy = (y * w + x) * bppOut;
|
|
for ( U32 j = 0; j < bppOut; j++ )
|
|
dat[addy + j] = (U8)((pixel >> (j * 8)) & 0xFF);
|
|
}
|
|
|
|
static U32 tga_get_pixel( Stream& stream, U8 bppIn,
|
|
U8 * colormap, U8 cmapBytesEntry )
|
|
{
|
|
/* get the image data value out */
|
|
|
|
U32 tmp_int32 = 0;
|
|
|
|
for ( U32 j = 0; j < bppIn; j++ )
|
|
{
|
|
U8 tmp_byte;
|
|
if ( !stream.read( &tmp_byte ) )
|
|
tmp_int32 = 0;
|
|
else
|
|
tmp_int32 += tmp_byte << (j * 8);
|
|
}
|
|
|
|
/* byte-order correct the thing */
|
|
switch( bppIn )
|
|
{
|
|
case 2:
|
|
tmp_int32 = convertLEndianToHost( (U16)tmp_int32 );
|
|
break;
|
|
|
|
case 3: /* intentional fall-thru */
|
|
case 4:
|
|
tmp_int32 = convertLEndianToHost( tmp_int32 );
|
|
break;
|
|
}
|
|
|
|
U32 tmp_col;
|
|
|
|
if ( colormap )
|
|
{
|
|
/* need to look up value to get real color */
|
|
tmp_col = 0;
|
|
for ( U32 j = 0; j < cmapBytesEntry; j++ )
|
|
tmp_col += colormap[cmapBytesEntry * tmp_int32 + j] << (8 * j);
|
|
}
|
|
else
|
|
{
|
|
tmp_col = tmp_int32;
|
|
}
|
|
|
|
return tmp_col;
|
|
}
|
|
|
|
static U32 tga_convert_color( U32 pixel, U32 bppIn, U8 alphabits, U32 bppOut )
|
|
{
|
|
// this is not only responsible for converting from different depths
|
|
// to other depths, it also switches BGR to RGB.
|
|
|
|
// this thing will also premultiply alpha, on a pixel by pixel basis.
|
|
|
|
U8 r, g, b, a;
|
|
|
|
switch( bppIn )
|
|
{
|
|
case 32:
|
|
if ( alphabits == 0 )
|
|
goto is_24_bit_in_disguise;
|
|
// 32-bit to 32-bit -- nop.
|
|
break;
|
|
|
|
case 24:
|
|
is_24_bit_in_disguise:
|
|
// 24-bit to 32-bit; (only force alpha to full)
|
|
pixel |= 0xFF000000;
|
|
break;
|
|
|
|
case 15:
|
|
is_15_bit_in_disguise:
|
|
r = (U8)(((F32)((pixel & 0x7C00) >> 10)) * 8.2258f);
|
|
g = (U8)(((F32)((pixel & 0x03E0) >> 5 )) * 8.2258f);
|
|
b = (U8)(((F32)(pixel & 0x001F)) * 8.2258f);
|
|
// 15-bit to 32-bit; (force alpha to full)
|
|
pixel = 0xFF000000 + (r << 16) + (g << 8) + b;
|
|
break;
|
|
|
|
case 16:
|
|
if ( alphabits == 1 )
|
|
goto is_15_bit_in_disguise;
|
|
|
|
// 16-bit to 32-bit; (force alpha to full)
|
|
r = (U8)(((F32)((pixel & 0xF800) >> 11)) * 8.2258f);
|
|
g = (U8)(((F32)((pixel & 0x07E0) >> 5 )) * 4.0476f);
|
|
b = (U8)(((F32)(pixel & 0x001F)) * 8.2258f);
|
|
pixel = 0xFF000000 + (r << 16) + (g << 8) + b;
|
|
break;
|
|
}
|
|
|
|
// convert the 32-bit pixel from BGR to RGB.
|
|
pixel = (pixel & 0xFF00FF00) + ((pixel & 0xFF) << 16) + ((pixel & 0xFF0000) >> 16);
|
|
|
|
r = pixel & 0x000000FF;
|
|
g = (pixel & 0x0000FF00) >> 8;
|
|
b = (pixel & 0x00FF0000) >> 16;
|
|
a = (pixel & 0xFF000000) >> 24;
|
|
|
|
// not premultiplied alpha -- multiply.
|
|
r = (U8)(((F32)r / 255.0f) * ((F32)a / 255.0f) * 255.0f);
|
|
g = (U8)(((F32)g / 255.0f) * ((F32)a / 255.0f) * 255.0f);
|
|
b = (U8)(((F32)b / 255.0f) * ((F32)a / 255.0f) * 255.0f);
|
|
|
|
pixel = r + (g << 8) + (b << 16) + (a << 24);
|
|
|
|
/* now convert from 32-bit to whatever they want. */
|
|
switch( bppOut )
|
|
{
|
|
case 4:
|
|
// 32 to 32 -- nop.
|
|
break;
|
|
|
|
case 3:
|
|
// 32 to 24 -- discard alpha.
|
|
pixel &= 0x00FFFFFF;
|
|
break;
|
|
}
|
|
|
|
return pixel;
|
|
}
|
|
|
|
static bool sReadTGA(Stream &stream, GBitmap *bitmap)
|
|
{
|
|
struct Header
|
|
{
|
|
U8 idLength; // length of the image_id string below.
|
|
U8 cmapType; // paletted image <=> cmapType
|
|
U8 imageType; // can be any of the IMG_TYPE constants above.
|
|
U16 cmapFirst; //
|
|
U16 cmapLength; // how long the colormap is
|
|
U8 cmapEntrySize; // how big a palette entry is.
|
|
U16 xOrigin; // the x origin of the image in the image data.
|
|
U16 yOrigin; // the y origin of the image in the image data.
|
|
U16 width; // the width of the image.
|
|
U16 height; // the height of the image.
|
|
U8 pixelDepth; // the depth of a pixel in the image.
|
|
U8 imageDesc; // the image descriptor.
|
|
};
|
|
|
|
// Read header
|
|
Header header;
|
|
stream.read( &header.idLength );
|
|
stream.read( &header.cmapType );
|
|
stream.read( &header.imageType );
|
|
stream.read( &header.cmapFirst );
|
|
stream.read( &header.cmapLength );
|
|
stream.read( &header.cmapEntrySize );
|
|
stream.read( &header.xOrigin );
|
|
stream.read( &header.yOrigin );
|
|
stream.read( &header.width );
|
|
stream.read( &header.height );
|
|
stream.read( &header.pixelDepth );
|
|
stream.read( &header.imageDesc );
|
|
|
|
U32 numPixels = header.width * header.height;
|
|
if ( numPixels == 0 )
|
|
{
|
|
//Con::errorf( "Texture has width and/or height set to 0" );
|
|
return false;
|
|
}
|
|
|
|
U8 alphabits = header.imageDesc & 0x0F;
|
|
|
|
/* seek past the image id, if there is one */
|
|
if ( header.idLength )
|
|
{
|
|
if ( !stream.setPosition( stream.getPosition() + header.idLength ) )
|
|
{
|
|
//Con::errorf( "Unexpected end of stream encountered" );
|
|
return false;
|
|
}
|
|
}
|
|
|
|
/* if this is a 'nodata' image, just jump out. */
|
|
if ( header.imageType == TypeNoData )
|
|
{
|
|
//Con::errorf( "Texture contains no data" );
|
|
return false;
|
|
}
|
|
|
|
/* deal with the colormap, if there is one. */
|
|
U8* colormap = NULL;
|
|
U32 cmapBytes = 0;
|
|
U8 cmapBytesEntry = 0;
|
|
|
|
if ( header.cmapType )
|
|
{
|
|
switch( header.imageType )
|
|
{
|
|
case TypeUncPaletted:
|
|
case TypeRlePaletted:
|
|
break;
|
|
|
|
case TypeUncTruecolor:
|
|
case TypeRleTruecolor:
|
|
// this should really be an error, but some really old
|
|
// crusty targas might actually be like this (created by TrueVision, no less!)
|
|
// so, we'll hack our way through it.
|
|
break;
|
|
|
|
case TypeUncGrayscale:
|
|
case TypeRleGrayscale:
|
|
//Con::errorf( "Found colormap for a grayscale image" );
|
|
return false;
|
|
}
|
|
|
|
/* ensure colormap entry size is something we support */
|
|
if ( !(header.cmapEntrySize == 15 ||
|
|
header.cmapEntrySize == 16 ||
|
|
header.cmapEntrySize == 24 ||
|
|
header.cmapEntrySize == 32) )
|
|
{
|
|
//Con::errorf( "Unsupported colormap entry size" );
|
|
return false;
|
|
}
|
|
|
|
/* allocate memory for a colormap */
|
|
if ( header.cmapEntrySize & 0x07 )
|
|
cmapBytesEntry = (((8 - (header.cmapEntrySize & 0x07)) + header.cmapEntrySize) >> 3);
|
|
else
|
|
cmapBytesEntry = (header.cmapEntrySize >> 3);
|
|
|
|
cmapBytes = cmapBytesEntry * header.cmapLength;
|
|
colormap = new U8[ cmapBytes ];
|
|
|
|
for ( U32 i = 0; i < header.cmapLength; i++ )
|
|
{
|
|
/* seek ahead to first entry used */
|
|
if ( header.cmapFirst != 0 )
|
|
stream.setPosition( stream.getPosition() + header.cmapFirst * cmapBytesEntry );
|
|
|
|
U32 tmp_int32 = 0;
|
|
for ( U32 j = 0; j < cmapBytesEntry; j++ )
|
|
{
|
|
U8 tmp_byte;
|
|
if ( !stream.read( &tmp_byte ) )
|
|
{
|
|
delete [] colormap;
|
|
//Con::errorf( "Bad colormap" );
|
|
return false;
|
|
}
|
|
tmp_int32 += tmp_byte << (j * 8);
|
|
}
|
|
|
|
// byte order correct.
|
|
tmp_int32 = convertLEndianToHost( tmp_int32 );
|
|
|
|
for ( U32 j = 0; j < cmapBytesEntry; j++ )
|
|
colormap[i * cmapBytesEntry + j] = (tmp_int32 >> (8 * j)) & 0xFF;
|
|
}
|
|
}
|
|
|
|
// compute number of bytes in an image data unit (either index or BGR triple)
|
|
U8 inBytesPerPixel = 0;
|
|
if ( header.pixelDepth & 0x07 )
|
|
inBytesPerPixel = (((8 - (header.pixelDepth & 0x07)) + header.pixelDepth) >> 3);
|
|
else
|
|
inBytesPerPixel = (header.pixelDepth >> 3);
|
|
|
|
/* assume that there's one byte per pixel */
|
|
if ( inBytesPerPixel == 0 )
|
|
inBytesPerPixel = 1;
|
|
|
|
GFXFormat gfxFmt;
|
|
U32 outBytesPerPixel;
|
|
switch ( header.pixelDepth )
|
|
{
|
|
case 32:
|
|
gfxFmt = GFXFormatR8G8B8A8;
|
|
outBytesPerPixel = 4;
|
|
break;
|
|
|
|
case 24:
|
|
default:
|
|
gfxFmt = GFXFormatR8G8B8;
|
|
outBytesPerPixel = 3;
|
|
break;
|
|
}
|
|
|
|
bitmap->allocateBitmap( header.width, header.height, false, gfxFmt );
|
|
|
|
// compute the true number of bits per pixel
|
|
U8 trueBitsPerPixel = header.cmapType ? header.cmapEntrySize : header.pixelDepth;
|
|
|
|
// Override the number of alpha bits if necessary
|
|
// Some apps generate transparent TGAs with alphabits set to 0 in the image descriptor
|
|
if ( ( trueBitsPerPixel == 32 ) && ( alphabits == 0 ) )
|
|
alphabits = 8;
|
|
|
|
switch( header.imageType )
|
|
{
|
|
case TypeUncTruecolor:
|
|
case TypeUncGrayscale:
|
|
case TypeUncPaletted:
|
|
|
|
/* FIXME: support grayscale */
|
|
|
|
for ( U32 i = 0; i < numPixels; i++ )
|
|
{
|
|
// get the color value.
|
|
U32 tmp_col = tga_get_pixel( stream, inBytesPerPixel, colormap, cmapBytesEntry );
|
|
tmp_col = tga_convert_color( tmp_col, trueBitsPerPixel, alphabits, outBytesPerPixel );
|
|
|
|
// now write the data out.
|
|
tga_write_pixel_to_mem( bitmap->getAddress( 0, 0 ), header.imageDesc,
|
|
i, header.width, header.height, tmp_col, outBytesPerPixel );
|
|
}
|
|
break;
|
|
|
|
case TypeRleTruecolor:
|
|
case TypeRleGrayscale:
|
|
case TypeRlePaletted:
|
|
|
|
// FIXME: handle grayscale..
|
|
|
|
for ( U32 i = 0; i < numPixels; )
|
|
{
|
|
/* a bit of work to do to read the data.. */
|
|
U8 packet_header;
|
|
if ( !stream.read( 1, &packet_header ) )
|
|
{
|
|
// well, just let them fill the rest with null pixels then...
|
|
packet_header = 1;
|
|
}
|
|
|
|
if ( packet_header & 0x80 )
|
|
{
|
|
/* run length packet */
|
|
U32 tmp_col = tga_get_pixel( stream, inBytesPerPixel, colormap, cmapBytesEntry );
|
|
tmp_col = tga_convert_color( tmp_col, trueBitsPerPixel, alphabits, outBytesPerPixel );
|
|
|
|
U8 repcount = (packet_header & 0x7F) + 1;
|
|
|
|
/* write all the data out */
|
|
for ( U32 j = 0; j < repcount; j++ )
|
|
{
|
|
tga_write_pixel_to_mem( bitmap->getAddress( 0, 0 ), header.imageDesc,
|
|
i + j, header.width, header.height, tmp_col, outBytesPerPixel );
|
|
}
|
|
|
|
i += repcount;
|
|
|
|
}
|
|
else
|
|
{
|
|
/* raw packet */
|
|
/* get pixel from file */
|
|
U8 repcount = (packet_header & 0x7F) + 1;
|
|
|
|
for ( U32 j = 0; j < repcount; j++ )
|
|
{
|
|
U32 tmp_col = tga_get_pixel( stream, inBytesPerPixel, colormap, cmapBytesEntry );
|
|
tmp_col = tga_convert_color( tmp_col, trueBitsPerPixel, alphabits, outBytesPerPixel );
|
|
|
|
tga_write_pixel_to_mem( bitmap->getAddress( 0, 0 ), header.imageDesc,
|
|
i + j, header.width, header.height, tmp_col, outBytesPerPixel );
|
|
}
|
|
|
|
i += repcount;
|
|
}
|
|
}
|
|
break;
|
|
|
|
default:
|
|
//Con::errorf( "Unknown image type" );
|
|
return false;
|
|
}
|
|
|
|
delete [] colormap;
|
|
|
|
// 32-bit tgas have an alpha channel
|
|
bitmap->setHasTransparency( header.pixelDepth == 32 );
|
|
|
|
return true;
|
|
}
|
|
|
|
static bool sWriteTGA(GBitmap *bitmap, Stream &stream, U32 compressionLevel)
|
|
{
|
|
AssertISV(false, "GBitmap::writeTGA - doesn't support writing tga files!");
|
|
|
|
return false;
|
|
}
|