quakeforge-old/common/pcx.c
2000-08-20 13:33:48 +00:00

137 lines
3 KiB
C

/*
pcx.c
PCX loading/saving functions
Copyright (C) 1996-1997 Id Software, Inc.
Copyright (C) 1999,2000 contributors of the QuakeForge project
Please see the file "AUTHORS" for a list of contributors
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:
Free Software Foundation, Inc.
59 Temple Place - Suite 330
Boston, MA 02111-1307, USA
$Id$
*/
#include <string.h>
#include <stdlib.h>
#include <qtypes.h>
#include <quakeio.h>
#include <console.h>
#include <image.h>
#include <zone.h>
#include <quakefs.h>
#include <sys.h>
#ifdef HAVE_STRING_H
#include <string.h>
#endif
/*
LoadPCX
*/
byte *
LoadPCX ( char *file, cache_user_t *cache, int buf_x, int buf_y)
{
pcx_t *pcx;
byte *pix;
byte *raw, *out;
int x, y;
int dataByte, runLength;
/*
Parse PCX file
*/
out = Cache_Check (cache);
if (out)
{
Con_Printf("Using cached version of %s\n", file);
return out;
}
raw = COM_LoadTempFile (file);
if (!raw) {
Con_Printf("Can not open %s\n", file);
return NULL;
}
pcx = (pcx_t *)raw;
raw = &pcx->data;
if (pcx->manufacturer != 0x0a
|| pcx->version != 5
|| pcx->encoding != 1
|| pcx->bits_per_pixel != 8
|| pcx->xmax >= 320
|| pcx->ymax >= 200)
{
Con_Printf ("Bad PCX file\n");
return NULL;
}
if (!buf_x)
buf_x = pcx->ymax;
if (!buf_y)
buf_y = pcx->ymax;
Con_DPrintf("PCX file %s %dx%d\n", file, buf_x, buf_y);
out = Cache_Alloc (cache, buf_x * buf_y, file);
if (!out)
Sys_Error("LoadPCX: couldn't allocate.");
pix = out;
memset(out, 0, buf_x * buf_y);
for (y=0 ; y<=pcx->ymax ; y++, pix += buf_x) {
for (x=0 ; x<=pcx->xmax ; ) {
if (raw - (byte*)pcx > com_filesize) {
Cache_Free(cache);
Con_Printf("PCX file %s was malformed. You should delete it.\n", file);
return NULL;
}
dataByte = *raw++;
if ((dataByte & 0xC0) == 0xC0) {
runLength = dataByte & 0x3F;
if (raw - (byte*)pcx > com_filesize) {
Cache_Free(cache);
Con_Printf("PCX file %s was malformed. You should delete it.\n", file);
return NULL;
}
dataByte = *raw++;
} else
runLength = 1;
if (runLength + x > pcx->xmax + 2) {
Cache_Free(cache);
Con_Printf("PCX file %s was malformed. You should delete it.\n", file);
return NULL;
}
while(runLength-- > 0)
pix[x++] = dataByte;
}
}
if (raw - (byte*)pcx > com_filesize) {
Cache_Free(cache);
Con_Printf("PCX file %s was malformed. You should delete it.\n", file);
return NULL;
}
return out;
}