#include <u.h>#include <libc.h>#include <stdio.h>#include "dat.h"#include "fns.h"  #define	MAX_RIMAGES	1024image_t		r_images[MAX_RIMAGES];int			numr_images;  /*===============R_ImageList_f===============*/void	R_ImageList_f (void){	int		i;	image_t	*image;	int		texels; 	ri.Con_Printf (PRINT_ALL, "------------------\n");	texels = 0; 	for (i=0, image=r_images ; i<numr_images ; i++, image++)	{		if (image->registration_sequence <= 0)			continue;		texels += image->width*image->height;		switch (image->type)		{		case it_skin:			ri.Con_Printf (PRINT_ALL, "M");			break;		case it_sprite:			ri.Con_Printf (PRINT_ALL, "S");			break;		case it_wall:			ri.Con_Printf (PRINT_ALL, "W");			break;		case it_pic:			ri.Con_Printf (PRINT_ALL, "P");			break;		default:			ri.Con_Printf (PRINT_ALL, " ");			break;		} 		ri.Con_Printf (PRINT_ALL,  " %3i %3i : %s\n",			image->width, image->height, image->name);	}	ri.Con_Printf (PRINT_ALL, "Total texel count: %i\n", texels);}  /*================================================================= PCX LOADING =================================================================*/ /*==============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; 	*pic = NULL; 	//	// load the file	//	len = ri.FS_LoadFile (filename, (void **)&raw);	if (!raw)	{		ri.Con_Printf (PRINT_DEVELOPER, "Bad pcx file %s\n", filename);		return;	} 	//	// parse the PCX file	//	pcx = (pcx_t *)raw;     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); 	raw = &pcx->data; 	if (pcx->manufacturer != 0x0a		|| pcx->version != 5		|| pcx->encoding != 1		|| pcx->bits_per_pixel != 8		|| pcx->xmax >= 640		|| pcx->ymax >= 480)	{		ri.Con_Printf (PRINT_ALL, "Bad pcx file %s\n", filename);		return;	} 	out = malloc ( (pcx->ymax+1) * (pcx->xmax+1) ); 	*pic = out; 	pix = out; 	if (palette)	{		*palette = malloc(768);		memcpy (*palette, (byte *)pcx + len - 768, 768);	} 	if (width)		*width = pcx->xmax+1;	if (height)		*height = pcx->ymax+1; 	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)	{		ri.Con_Printf (PRINT_DEVELOPER, "PCX file %s was malformed", filename);		free (*pic);		*pic = NULL;	} 	ri.FS_FreeFile (pcx);} /*========================================================= TARGA LOADING =========================================================*/ 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;  /*=============LoadTGA=============*/void LoadTGA (char *name, byte **pic, int *width, int *height){	int		columns, rows, numPixels;	byte	*pixbuf;	int		row, column;	byte	*buf_p;	byte	*buffer;	TargaHeader		targa_header;	byte			*targa_rgba;	uchar	red = 0, green = 0, blue = 0, alphabyte = 0, packetHeader, packetSize, j; 	*pic = NULL; 	//	// load the file	//	ri.FS_LoadFile (name, (void **)&buffer);	/* int length = */	if (!buffer)	{		ri.Con_Printf (PRINT_DEVELOPER, "Bad tga file %s\n", name);		return;	} 	buf_p = buffer; 	targa_header.id_length = *buf_p++;	targa_header.colormap_type = *buf_p++;	targa_header.image_type = *buf_p++;		targa_header.colormap_index = LittleShort ( *((short *)buf_p) );	buf_p+=2;	targa_header.colormap_length = LittleShort ( *((short *)buf_p) );	buf_p+=2;	targa_header.colormap_size = *buf_p++;	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.image_type!=10) 		ri.Sys_Error (ERR_DROP, "LoadTGA: Only type 2 and 10 targa RGB images supported\n"); 	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"); 	columns = targa_header.width;	rows = targa_header.height;	numPixels = columns * rows; 	if (width)		*width = columns;	if (height)		*height = rows; 	targa_rgba = malloc (numPixels*4);	*pic = targa_rgba; 	if (targa_header.id_length != 0)		buf_p += targa_header.id_length;  // skip TARGA image comment		if (targa_header.image_type==2) {  // Uncompressed, RGB images		for(row=rows-1; row>=0; row--) {			pixbuf = targa_rgba + row*columns*4;			for(column=0; column<columns; column++) {				switch (targa_header.pixel_size) {					case 24:														blue = *buf_p++;							green = *buf_p++;							red = *buf_p++;							*pixbuf++ = red;							*pixbuf++ = green;							*pixbuf++ = blue;							*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;				}			}		}	}	else if (targa_header.image_type==10) {   // Runlength encoded RGB images		for(row=rows-1; row>=0; row--) {			pixbuf = targa_rgba + row*columns*4;			for(column=0; column<columns; ) {				packetHeader= *buf_p++;				packetSize = 1 + (packetHeader & 0x7f);				if (packetHeader & 0x80) {        // run-length packet					switch (targa_header.pixel_size) {						case 24:								blue = *buf_p++;								green = *buf_p++;								red = *buf_p++;								alphabyte = 255;								break;						case 32:								blue = *buf_p++;								green = *buf_p++;								red = *buf_p++;								alphabyte = *buf_p++;								break;					}						for(j=0;j<packetSize;j++) {						*pixbuf++=red;						*pixbuf++=green;						*pixbuf++=blue;						*pixbuf++=alphabyte;						column++;						if (column==columns) { // run spans across rows							column=0;							if (row>0)								row--;							else								goto breakOut;							pixbuf = targa_rgba + row*columns*4;						}					}				}				else {                            // non run-length packet					for(j=0;j<packetSize;j++) {						switch (targa_header.pixel_size) {							case 24:									blue = *buf_p++;									green = *buf_p++;									red = *buf_p++;									*pixbuf++ = red;									*pixbuf++ = green;									*pixbuf++ = blue;									*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++;						if (column==columns) { // pixel packet run spans across rows							column=0;							if (row>0)								row--;							else								goto breakOut;							pixbuf = targa_rgba + row*columns*4;						}											}				}			}			breakOut:;		}	} 	ri.FS_FreeFile (buffer);}  //======================================================= image_t *R_FindFreeImage (void){	image_t		*image;	int			i; 	// find a free image_t	for (i=0, image=r_images ; i<numr_images ; i++,image++)	{		if (!image->registration_sequence)			break;	}	if (i == numr_images)	{		if (numr_images == MAX_RIMAGES)			ri.Sys_Error (ERR_DROP, "MAX_RIMAGES");		numr_images++;	}	image = &r_images[i]; 	return image;} /*================GL_LoadPic ================*/image_t *GL_LoadPic (char *name, byte *pic, int width, int height, imagetype_t type){	image_t		*image;	int			i, c, b; 	image = R_FindFreeImage ();	if (strlen(name) >= sizeof(image->name))		ri.Sys_Error (ERR_DROP, "Draw_LoadPic: \"%s\" is too long", name);	strcpy (image->name, name);	image->registration_sequence = registration_sequence; 	image->width = width;	image->height = height;	image->type = type; 	c = width*height;	image->pixels[0] = malloc (c);	image->transparent = false;	for (i=0 ; i<c ; i++)	{		b = pic[i];		if (b == 255)			image->transparent = true;		image->pixels[0][i] = b;	} 	return image;} /*================R_LoadWal================*/image_t *R_LoadWal (char *name){	miptex_t	*mt;	int			ofs;	image_t		*image;	int			size; 	ri.FS_LoadFile (name, (void **)&mt);	if (!mt)	{		ri.Con_Printf (PRINT_ALL, "R_LoadWal: can't load %s\n", name);		return r_notexture_mip;	} 	image = R_FindFreeImage ();	strcpy (image->name, name);	image->width = LittleLong (mt->width);	image->height = LittleLong (mt->height);	image->type = it_wall;	image->registration_sequence = registration_sequence; 	size = image->width*image->height * (256+64+16+4)/256;	image->pixels[0] = malloc (size);	image->pixels[1] = image->pixels[0] + image->width*image->height;	image->pixels[2] = image->pixels[1] + image->width*image->height/4;	image->pixels[3] = image->pixels[2] + image->width*image->height/16; 	ofs = LittleLong (mt->offsets[0]);	memcpy ( image->pixels[0], (byte *)mt + ofs, size); 	ri.FS_FreeFile ((void *)mt); 	return image;}  /*===============R_FindImage Finds or loads the given image===============*/image_t	*R_FindImage (char *name, imagetype_t type){	image_t	*image;	int		i, len;	byte	*pic, *palette;	int		width, height; 	if (!name)		return NULL;	// ri.Sys_Error (ERR_DROP, "R_FindImage: NULL name");	len = strlen(name);	if (len<5)		return NULL;	// ri.Sys_Error (ERR_DROP, "R_FindImage: bad name: %s", name); 	// look for it	for (i=0, image=r_images ; i<numr_images ; i++,image++)	{		if (!strcmp(name, image->name))		{			image->registration_sequence = registration_sequence;			return image;		}	} 	//	// load the pic from disk	//	pic = NULL;	palette = NULL;

Lines 1–500 of 581. Load more