+++ /dev/null
-/*
- Copyright (C) 1999-2007 id Software, Inc. and contributors.
- For a list of contributors, see the accompanying CONTRIBUTORS file.
-
- This file is part of GtkRadiant.
-
- GtkRadiant 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.
-
- GtkRadiant 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 GtkRadiant; if not, write to the Free Software
- Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
- */
-
-// lbmlib.c
-
-#include "cmdlib.h"
-#include "inout.h"
-#include "lbmlib.h"
-
-// Ups the palette values so no pixels except 0 appear transparent
-// Need a value of 8 to cater for 16bit renderers
-
-typedef struct
-{
- byte r;
- byte g;
- byte b;
-} paletteRGB_t;
-
-
-void CorrectPalette( byte *pal ){
- paletteRGB_t *p;
-
- p = (paletteRGB_t *)pal;
- // Color 0 always transparent
- p->r = 0;
- p->g = 0;
- p->b = 0;
-}
-
-/*
- ============================================================================
-
- LBM STUFF
-
- ============================================================================
- */
-
-
-typedef unsigned char UBYTE;
-//conflicts with windows typedef short WORD;
-typedef unsigned short UWORD;
-typedef long LONG;
-
-typedef enum
-{
- ms_none,
- ms_mask,
- ms_transcolor,
- ms_lasso
-} mask_t;
-
-typedef enum
-{
- cm_none,
- cm_rle1
-} compress_t;
-
-typedef struct
-{
- UWORD w,h;
- short x,y;
- UBYTE nPlanes;
- UBYTE masking;
- UBYTE compression;
- UBYTE pad1;
- UWORD transparentColor;
- UBYTE xAspect,yAspect;
- short pageWidth,pageHeight;
-} bmhd_t;
-
-extern bmhd_t bmhd; // will be in native byte order
-
-
-
-#define FORMID ( 'F' + ( 'O' << 8 ) + ( (int)'R' << 16 ) + ( (int)'M' << 24 ) )
-#define ILBMID ( 'I' + ( 'L' << 8 ) + ( (int)'B' << 16 ) + ( (int)'M' << 24 ) )
-#define PBMID ( 'P' + ( 'B' << 8 ) + ( (int)'M' << 16 ) + ( (int)' ' << 24 ) )
-#define BMHDID ( 'B' + ( 'M' << 8 ) + ( (int)'H' << 16 ) + ( (int)'D' << 24 ) )
-#define BODYID ( 'B' + ( 'O' << 8 ) + ( (int)'D' << 16 ) + ( (int)'Y' << 24 ) )
-#define CMAPID ( 'C' + ( 'M' << 8 ) + ( (int)'A' << 16 ) + ( (int)'P' << 24 ) )
-
-
-bmhd_t bmhd;
-
-int Align( int l ){
- if ( l & 1 ) {
- return l + 1;
- }
- return l;
-}
-
-
-
-/*
- ================
- LBMRLEdecompress
-
- Source must be evenly aligned!
- ================
- */
-byte *LBMRLEDecompress( byte *source,byte *unpacked, int bpwidth ){
- int count;
- byte b,rept;
-
- count = 0;
-
- do
- {
- rept = *source++;
-
- if ( rept > 0x80 ) {
- rept = ( rept ^ 0xff ) + 2;
- b = *source++;
- memset( unpacked,b,rept );
- unpacked += rept;
- }
- else if ( rept < 0x80 ) {
- rept++;
- memcpy( unpacked,source,rept );
- unpacked += rept;
- source += rept;
- }
- else{
- rept = 0; // rept of 0x80 is NOP
-
- }
- count += rept;
-
- } while ( count < bpwidth );
-
- if ( count > bpwidth ) {
- Error( "Decompression exceeded width!\n" );
- }
-
-
- return source;
-}
-
-
-/*
- =================
- LoadLBM
- =================
- */
-void LoadLBM( char *filename, byte **picture, byte **palette ){
- byte *LBMbuffer, *picbuffer, *cmapbuffer;
- int y;
- byte *LBM_P, *LBMEND_P;
- byte *pic_p;
- byte *body_p;
-
- int formtype,formlength;
- int chunktype,chunklength;
-
-// qiet compiler warnings
- picbuffer = NULL;
- cmapbuffer = NULL;
-
-//
-// load the LBM
-//
- LoadFile( filename, (void **)&LBMbuffer );
-
-//
-// parse the LBM header
-//
- LBM_P = LBMbuffer;
- if ( *(int *)LBMbuffer != LittleLong( FORMID ) ) {
- Error( "No FORM ID at start of file!\n" );
- }
-
- LBM_P += 4;
- formlength = BigLong( *(int *)LBM_P );
- LBM_P += 4;
- LBMEND_P = LBM_P + Align( formlength );
-
- formtype = LittleLong( *(int *)LBM_P );
-
- if ( formtype != ILBMID && formtype != PBMID ) {
- Error( "Unrecognized form type: %c%c%c%c\n", formtype & 0xff
- ,( formtype >> 8 ) & 0xff,( formtype >> 16 ) & 0xff,( formtype >> 24 ) & 0xff );
- }
-
- LBM_P += 4;
-
-//
-// parse chunks
-//
-
- while ( LBM_P < LBMEND_P )
- {
- chunktype = LBM_P[0] + ( LBM_P[1] << 8 ) + ( LBM_P[2] << 16 ) + ( LBM_P[3] << 24 );
- LBM_P += 4;
- chunklength = LBM_P[3] + ( LBM_P[2] << 8 ) + ( LBM_P[1] << 16 ) + ( LBM_P[0] << 24 );
- LBM_P += 4;
-
- switch ( chunktype )
- {
- case BMHDID:
- memcpy( &bmhd,LBM_P,sizeof( bmhd ) );
- bmhd.w = BigShort( bmhd.w );
- bmhd.h = BigShort( bmhd.h );
- bmhd.x = BigShort( bmhd.x );
- bmhd.y = BigShort( bmhd.y );
- bmhd.pageWidth = BigShort( bmhd.pageWidth );
- bmhd.pageHeight = BigShort( bmhd.pageHeight );
- break;
-
- case CMAPID:
- cmapbuffer = malloc( 768 );
- memset( cmapbuffer, 0, 768 );
- memcpy( cmapbuffer, LBM_P, chunklength );
- CorrectPalette( cmapbuffer );
- break;
-
- case BODYID:
- body_p = LBM_P;
-
- pic_p = picbuffer = malloc( bmhd.w * bmhd.h );
- if ( formtype == PBMID ) {
- //
- // unpack PBM
- //
- for ( y = 0 ; y < bmhd.h ; y++, pic_p += bmhd.w )
- {
- if ( bmhd.compression == cm_rle1 ) {
- body_p = LBMRLEDecompress( (byte *)body_p
- , pic_p, bmhd.w );
- }
- else if ( bmhd.compression == cm_none ) {
- memcpy( pic_p,body_p,bmhd.w );
- body_p += Align( bmhd.w );
- }
- }
-
- }
- else
- {
- //
- // unpack ILBM
- //
- Error( "%s is an interlaced LBM, not packed", filename );
- }
- break;
- }
-
- LBM_P += Align( chunklength );
- }
-
- free( LBMbuffer );
-
- *picture = picbuffer;
-
- if ( palette ) {
- *palette = cmapbuffer;
- }
-}
-
-
-/*
- ============================================================================
-
- WRITE LBM
-
- ============================================================================
- */
-
-/*
- ==============
- WriteLBMfile
- ==============
- */
-void WriteLBMfile( char *filename, byte *data,
- int width, int height, byte *palette ){
- byte *lbm, *lbmptr;
- int *formlength, *bmhdlength, *cmaplength, *bodylength;
- int length;
- bmhd_t basebmhd;
-
- lbm = lbmptr = malloc( width * height + 1000 );
-
-//
-// start FORM
-//
- *lbmptr++ = 'F';
- *lbmptr++ = 'O';
- *lbmptr++ = 'R';
- *lbmptr++ = 'M';
-
- formlength = (int*)lbmptr;
- lbmptr += 4; // leave space for length
-
- *lbmptr++ = 'P';
- *lbmptr++ = 'B';
- *lbmptr++ = 'M';
- *lbmptr++ = ' ';
-
-//
-// write BMHD
-//
- *lbmptr++ = 'B';
- *lbmptr++ = 'M';
- *lbmptr++ = 'H';
- *lbmptr++ = 'D';
-
- bmhdlength = (int *)lbmptr;
- lbmptr += 4; // leave space for length
-
- memset( &basebmhd,0,sizeof( basebmhd ) );
- basebmhd.w = BigShort( (short)width );
- basebmhd.h = BigShort( (short)height );
- basebmhd.nPlanes = BigShort( 8 );
- basebmhd.xAspect = BigShort( 5 );
- basebmhd.yAspect = BigShort( 6 );
- basebmhd.pageWidth = BigShort( (short)width );
- basebmhd.pageHeight = BigShort( (short)height );
-
- memcpy( lbmptr,&basebmhd,sizeof( basebmhd ) );
- lbmptr += sizeof( basebmhd );
-
- length = lbmptr - (byte *)bmhdlength - 4;
- *bmhdlength = BigLong( length );
- if ( length & 1 ) {
- *lbmptr++ = 0; // pad chunk to even offset
-
- }
-//
-// write CMAP
-//
- *lbmptr++ = 'C';
- *lbmptr++ = 'M';
- *lbmptr++ = 'A';
- *lbmptr++ = 'P';
-
- cmaplength = (int *)lbmptr;
- lbmptr += 4; // leave space for length
-
- memcpy( lbmptr,palette,768 );
- lbmptr += 768;
-
- length = lbmptr - (byte *)cmaplength - 4;
- *cmaplength = BigLong( length );
- if ( length & 1 ) {
- *lbmptr++ = 0; // pad chunk to even offset
-
- }
-//
-// write BODY
-//
- *lbmptr++ = 'B';
- *lbmptr++ = 'O';
- *lbmptr++ = 'D';
- *lbmptr++ = 'Y';
-
- bodylength = (int *)lbmptr;
- lbmptr += 4; // leave space for length
-
- memcpy( lbmptr,data,width * height );
- lbmptr += width * height;
-
- length = lbmptr - (byte *)bodylength - 4;
- *bodylength = BigLong( length );
- if ( length & 1 ) {
- *lbmptr++ = 0; // pad chunk to even offset
-
- }
-//
-// done
-//
- length = lbmptr - (byte *)formlength - 4;
- *formlength = BigLong( length );
- if ( length & 1 ) {
- *lbmptr++ = 0; // pad chunk to even offset
-
- }
-//
-// write output file
-//
- SaveFile( filename, lbm, lbmptr - lbm );
- free( lbm );
-}
-
-
-/*
- ============================================================================
-
- LOAD PCX
-
- ============================================================================
- */
-
-typedef struct
-{
- char manufacturer;
- char version;
- char encoding;
- char bits_per_pixel;
- unsigned short xmin,ymin,xmax,ymax;
- unsigned short hres,vres;
- unsigned char palette[48];
- char reserved;
- char color_planes;
- unsigned short bytes_per_line;
- unsigned short palette_type;
- char filler[58];
- unsigned char data; // unbounded
-} pcx_t;
-
-/*
- ==============
- LoadPCX
- ==============
- */
-void LoadPCX( char *filename, byte **pic, byte **palette, int *width, int *height ){
- byte *raw;
- pcx_t *pcx;
- int x, y;
- int len;
- int dataByte, runLength;
- byte *out, *pix;
-
- //
- // load the file
- //
- len = LoadFile( filename, (void **)&raw );
-
- //
- // parse the PCX file
- //
- pcx = (pcx_t *)raw;
- raw = &pcx->data;
-
- pcx->xmin = LittleShort( pcx->xmin );
- pcx->ymin = LittleShort( pcx->ymin );
- pcx->xmax = LittleShort( pcx->xmax );
- pcx->ymax = LittleShort( pcx->ymax );
- pcx->hres = LittleShort( pcx->hres );
- pcx->vres = LittleShort( pcx->vres );
- pcx->bytes_per_line = LittleShort( pcx->bytes_per_line );
- pcx->palette_type = LittleShort( pcx->palette_type );
-
- if ( pcx->manufacturer != 0x0a
- || pcx->version != 5
- || pcx->encoding != 1
- || pcx->bits_per_pixel != 8
- || pcx->xmax >= 640
- || pcx->ymax >= 480 ) {
- Error( "Bad pcx file %s", filename );
- }
-
- if ( palette ) {
- *palette = malloc( 768 );
- memcpy( *palette, (byte *)pcx + len - 768, 768 );
- CorrectPalette( *palette );
- }
-
- if ( width ) {
- *width = pcx->xmax + 1;
- }
- if ( height ) {
- *height = pcx->ymax + 1;
- }
-
- if ( !pic ) {
- return;
- }
-
- out = malloc( ( pcx->ymax + 1 ) * ( pcx->xmax + 1 ) );
- if ( !out ) {
- Error( "Skin_Cache: couldn't allocate" );
- }
-
- *pic = out;
-
- pix = out;
-
- for ( y = 0 ; y <= pcx->ymax ; y++, pix += pcx->xmax + 1 )
- {
- for ( x = 0 ; x <= pcx->xmax ; )
- {
- dataByte = *raw++;
-
- if ( ( dataByte & 0xC0 ) == 0xC0 ) {
- runLength = dataByte & 0x3F;
- dataByte = *raw++;
- }
- else{
- runLength = 1;
- }
-
- while ( runLength-- > 0 )
- pix[x++] = dataByte;
- }
-
- }
-
- if ( raw - (byte *)pcx > len ) {
- Error( "PCX file %s was malformed", filename );
- }
-
- free( pcx );
-}
-
-/*
- ==============
- WritePCXfile
- ==============
- */
-
-void StuffPackedByte( int curRepCount, byte curByte, byte** packPtr ){
- byte* pack;
-
- pack = *packPtr;
-
- while ( curRepCount > 0 )
- {
- if ( curRepCount == 1 ) {
- if ( ( curByte & 0xc0 ) != 0xc0 ) {
- *pack++ = curByte;
- }
- else
- {
- *pack++ = 0xc1;
- *pack++ = curByte;
- }
- break;
- }
- if ( curRepCount < 0x0040 ) {
- *pack++ = ( 0x00c0 | curRepCount );
- curRepCount = 0;
- }
- else
- {
- *pack++ = 0xff;
- curRepCount -= 0x003f;
- }
- *pack++ = curByte;
- }
- *packPtr = pack;
-}
-
-void WritePCXfile( char *filename, byte *data,
- int width, int height, byte *palette ){
- int i, j, length;
- pcx_t *pcx;
- byte *pack;
- byte curByte;
- int curRepCount;
-
- pcx = malloc( width * height * 2 + 1000 );
- memset( pcx, 0, sizeof( *pcx ) );
-
- pcx->manufacturer = 0x0a; // PCX id
- pcx->version = 5; // 256 color
- pcx->encoding = 1; // RLE
- pcx->bits_per_pixel = 8; // 256 color
- pcx->xmin = 0;
- pcx->ymin = 0;
- pcx->xmax = LittleShort( (short)( width - 1 ) );
- pcx->ymax = LittleShort( (short)( height - 1 ) );
- pcx->hres = LittleShort( (short)width );
- pcx->vres = LittleShort( (short)height );
- pcx->color_planes = 1; // chunky image
- pcx->bytes_per_line = LittleShort( (short)width );
- pcx->palette_type = LittleShort( 1 ); // not a grey scale
-
- // pack the image
- pack = &pcx->data;
-
-/* for (i=0 ; i<height ; i++)
- {
- for (j=0 ; j<width ; j++)
- {
- if ( (*data & 0xc0) != 0xc0)
- *pack++ = *data++;
- else
- {
- *pack++ = 0xc1;
- *pack++ = *data++;
- }
- }
- }
- */
- for ( i = 0 ; i < height ; i++ )
- {
- curByte = *data;
- curRepCount = 0;
- for ( j = 0 ; j < width ; j++ )
- {
- if ( *data == curByte ) {
- curRepCount++;
- data++;
- continue;
- }
- StuffPackedByte( curRepCount, curByte, &pack );
- curByte = *data++;
- curRepCount = 1;
- }
- StuffPackedByte( curRepCount, curByte, &pack );
- }
- // write the palette
- *pack++ = 0x0c; // palette ID byte
- for ( i = 0 ; i < 768 ; i++ )
- *pack++ = *palette++;
-
-// write output file
- length = pack - (byte *)pcx;
- SaveFile( filename, pcx, length );
-
- free( pcx );
-}
-
-
-/*
- ============================================================================
-
- LOAD IMAGE
-
- ============================================================================
- */
-
-/*
- ==============
- Load256Image
-
- Will load either an lbm or pcx, depending on extension.
- Any of the return pointers can be NULL if you don't want them.
- ==============
- */
-void Load256Image( char *name, byte **pixels, byte **palette,
- int *width, int *height ){
- char ext[128];
-
- ExtractFileExtension( name, ext );
- if ( !Q_strcasecmp( ext, "lbm" ) ) {
- LoadLBM( name, pixels, palette );
- if ( width ) {
- *width = bmhd.w;
- }
- if ( height ) {
- *height = bmhd.h;
- }
- }
- else if ( !Q_strcasecmp( ext, "pcx" ) ) {
- LoadPCX( name, pixels, palette, width, height );
- }
- else{
- Error( "%s doesn't have a known image extension", name );
- }
-}
-
-
-/*
- ==============
- Save256Image
-
- Will save either an lbm or pcx, depending on extension.
- ==============
- */
-void Save256Image( char *name, byte *pixels, byte *palette,
- int width, int height ){
- char ext[128];
-
- ExtractFileExtension( name, ext );
- if ( !Q_strcasecmp( ext, "lbm" ) ) {
- WriteLBMfile( name, pixels, width, height, palette );
- }
- else if ( !Q_strcasecmp( ext, "pcx" ) ) {
- WritePCXfile( name, pixels, width, height, palette );
- }
- else{
- Error( "%s doesn't have a known image extension", name );
- }
-}
-
-
-
-
-/*
- ============================================================================
-
- TARGA IMAGE
-
- ============================================================================
- */
-
-typedef struct _TargaHeader
-{
- unsigned char id_length, colormap_type, image_type;
- unsigned short colormap_index, colormap_length;
- unsigned char colormap_size;
- unsigned short x_origin, y_origin, width, height;
- unsigned char pixel_size, attributes;
-} TargaHeader;
-
-int fgetLittleShort( FILE *f ){
- byte b1, b2;
-
- b1 = fgetc( f );
- b2 = fgetc( f );
-
- return( (short)( b1 + ( b2 << 8 ) ) );
-}
-
-int fgetLittleLong( FILE *f ){
- byte b1, b2, b3, b4;
-
- b1 = fgetc( f );
- b2 = fgetc( f );
- b3 = fgetc( f );
- b4 = fgetc( f );
-
- return( b1 + ( b2 << 8 ) + ( b3 << 16 ) + ( b4 << 24 ) );
-}
-
-
-/*
- =============
- LoadTGA
- =============
- */
-void LoadTGA( char *name, byte **pixels, int *width, int *height ){
- int columns, rows, numPixels;
- byte *pixbuf;
- byte *rowBuf;
- int row, column;
- FILE *fin;
- byte *targa_rgba;
- TargaHeader targa_header;
- unsigned char red, green, blue, alphabyte;
- unsigned char packetHeader, packetSize, j;
- int flip;
- int mirror;
- int rowOffset;
- int pixDirection;
-
- fin = fopen( name, "rb" );
- if ( !fin ) {
- Error( "Couldn't read %s", name );
- }
-
- targa_header.id_length = fgetc( fin );
- targa_header.colormap_type = fgetc( fin );
- targa_header.image_type = fgetc( fin );
-
- targa_header.colormap_index = fgetLittleShort( fin );
- targa_header.colormap_length = fgetLittleShort( fin );
- targa_header.colormap_size = fgetc( fin );
- targa_header.x_origin = fgetLittleShort( fin );
- targa_header.y_origin = fgetLittleShort( fin );
- targa_header.width = fgetLittleShort( fin );
- targa_header.height = fgetLittleShort( fin );
- targa_header.pixel_size = fgetc( fin );
- targa_header.attributes = fgetc( fin );
- flip = ( targa_header.attributes & 0x020 ) == 0;
- mirror = ( targa_header.attributes & 0x010 ) != 0;
-
- if ( ( targa_header.image_type != 2 ) && ( targa_header.image_type != 10 ) ) {
- Error( "LoadTGA: Only type 2 and 10 targa RGB images supported\n" );
- }
-
- if ( targa_header.colormap_type || ( ( targa_header.pixel_size != 32 ) && ( targa_header.pixel_size != 24 ) ) ) {
- Error( "Texture_LoadTGA: Only 32 or 24 bit images supported (no colormaps)\n" );
- }
-
- columns = targa_header.width;
- rows = targa_header.height;
- numPixels = columns * rows;
-
- if ( width ) {
- *width = columns;
- }
- if ( height ) {
- *height = rows;
- }
-
- if ( !pixels ) {
- return;
- }
-
- targa_rgba = malloc( numPixels * 4 );
- *pixels = targa_rgba;
-
- if ( flip ) {
- pixbuf = targa_rgba + ( ( rows - 1 ) * columns * 4 );
- rowOffset = -columns * 4;
- }
- else
- {
- pixbuf = targa_rgba;
- rowOffset = columns * 4;
- }
- if ( mirror ) {
- pixDirection = -4;
- pixbuf += ( ( columns - 1 ) * 4 );
- }
- else
- {
- pixDirection = 4;
- }
-
- if ( targa_header.id_length ) {
- fseek( fin, targa_header.id_length, SEEK_CUR ); // skip TARGA image comment
-
- }
- if ( targa_header.image_type == 2 ) { // Uncompressed, RGB images
- for ( row = 0; row < rows; row++ )
- {
- rowBuf = pixbuf;
- for ( column = 0; column < columns; column++ )
- {
- switch ( targa_header.pixel_size )
- {
- case 24:
- blue = getc( fin );
- green = getc( fin );
- red = getc( fin );
- rowBuf[0] = red;
- rowBuf[1] = green;
- rowBuf[2] = blue;
- rowBuf[3] = 255;
- rowBuf += pixDirection;
- break;
- case 32:
- blue = getc( fin );
- green = getc( fin );
- red = getc( fin );
- alphabyte = getc( fin );
- rowBuf[0] = red;
- rowBuf[1] = green;
- rowBuf[2] = blue;
- rowBuf[3] = alphabyte;
- rowBuf += pixDirection;
- break;
- }
- }
- pixbuf += rowOffset;
- }
- }
- else if ( targa_header.image_type == 10 ) { // Runlength encoded RGB images
- for ( row = 0; row < rows; row++ )
- {
- rowBuf = pixbuf;
- for ( column = 0; column < columns; )
- {
- packetHeader = getc( fin );
- packetSize = 1 + ( packetHeader & 0x7f );
- if ( packetHeader & 0x80 ) { // run-length packet
- switch ( targa_header.pixel_size )
- {
- case 24:
- blue = getc( fin );
- green = getc( fin );
- red = getc( fin );
- alphabyte = 255;
- break;
- case 32:
- blue = getc( fin );
- green = getc( fin );
- red = getc( fin );
- alphabyte = getc( fin );
- break;
- }
-
- for ( j = 0; j < packetSize; j++ )
- {
- rowBuf[0] = red;
- rowBuf[1] = green;
- rowBuf[2] = blue;
- rowBuf[3] = alphabyte;
- rowBuf += pixDirection;
- column++;
- if ( column == columns ) { // run spans across rows
- column = 0;
- row++;
- if ( row >= rows ) {
- goto breakOut;
- }
- pixbuf += rowOffset;
- rowBuf = pixbuf;
- }
- }
- }
- else
- { // non run-length packet
- for ( j = 0; j < packetSize; j++ )
- {
- switch ( targa_header.pixel_size )
- {
- case 24:
- blue = getc( fin );
- green = getc( fin );
- red = getc( fin );
- rowBuf[0] = red;
- rowBuf[1] = green;
- rowBuf[2] = blue;
- rowBuf[3] = 255;
- rowBuf += pixDirection;
- break;
- case 32:
- blue = getc( fin );
- green = getc( fin );
- red = getc( fin );
- alphabyte = getc( fin );
- rowBuf[0] = red;
- rowBuf[1] = green;
- rowBuf[2] = blue;
- rowBuf[3] = alphabyte;
- rowBuf += pixDirection;
- break;
- }
- column++;
- if ( column == columns ) { // pixel packet run spans across rows
- column = 0;
- row++;
- if ( row >= rows ) {
- goto breakOut;
- }
- pixbuf += rowOffset;
- rowBuf = pixbuf;
- }
- }
- }
- }
-breakOut:;
- pixbuf += rowOffset;
- }
- }
- fclose( fin );
-}
-
-void MergeAlpha( byte *pix, byte *alpha, byte *pal, byte **out, int width, int height ){
- int size, i;
- byte *data, *src, *srca;
-
- size = width * height;
- data = malloc( size * 4 );
- if ( !data ) {
- Error( "Could not allocate memory for true color image" );
- }
-
- *out = data;
- src = pix;
- srca = alpha;
-
- for ( i = 0; i < size; i++, src++, srca++ )
- {
- *data++ = pal[*src * 3 + 0]; // r
- *data++ = pal[*src * 3 + 1]; // g
- *data++ = pal[*src * 3 + 2]; // b
- *data++ = *srca; // a
- }
- free( pix );
- free( alpha );
- free( pal );
-}
-
-/*
- ==============
- LoadAnyImage
-
- Return Value:
- false: paletted texture
- true: true color RGBA image (no palette)
- ==============
- */
-qboolean LoadAnyImage( char *name, byte **pixels, byte **palette, int *width, int *height ){
- char ext[128];
- int len;
- int alpha_width, alpha_height;
- char alpha_name[128];
- byte *alpha_pixels;
-
- ExtractFileExtension( name, ext );
-
- if ( palette ) {
- *palette = NULL;
- }
-
- if ( !Q_strcasecmp( ext, "lbm" ) ) {
- LoadLBM( name, pixels, palette );
- if ( width ) {
- *width = bmhd.w;
- }
- if ( height ) {
- *height = bmhd.h;
- }
- return false;
- }
- else if ( !Q_strcasecmp( ext, "pcx" ) ) {
- len = strlen( name );
- strcpy( alpha_name, name );
- strcpy( &alpha_name[len - 4], "_a.pcx" ); // Alpha map name (may not exist)
-
- if ( FileExists( alpha_name ) ) {
- LoadPCX( name, pixels, palette, width, height ); // Load in image
- LoadPCX( alpha_name, &alpha_pixels, NULL, &alpha_width, &alpha_height ); // Load in alpha map
- if ( ( *width != alpha_width ) || ( *height != alpha_height ) ) {
- Error( "Alpha image dimensions not equal to graphic image dimensions" );
- }
- MergeAlpha( *pixels, alpha_pixels, *palette, pixels, *width, *height );
- *palette = NULL; //Merge Frees pal
- return true;
- }
- else
- {
- LoadPCX( name, pixels, palette, width, height ); // Load in image
- return false;
- }
- }
- else if ( !Q_strcasecmp( ext, "tga" ) ) {
- LoadTGA( name, pixels, width, height );
- if ( palette ) {
- *palette = NULL;
- }
-
- return true;
- }
- else{
- Error( "%s doesn't have a known image extension", name );
- }
-
- return false;
-}