/*
	d_fill.c

	clears a specified rectangle to the specified color

	Copyright (C) 1996-1997  Id Software, Inc.

	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

*/
#ifdef HAVE_CONFIG_H
# include "config.h"
#endif

static __attribute__ ((used)) const char rcsid[] = 
	"$Id$";

#include "QF/sys.h"

#include "d_iface.h"
#include "r_internal.h"


void
D_FillRect (vrect_t *rect, int color)
{
	switch (r_pixbytes)
	{
	case 1:
		{
			unsigned int rx, ry, rwidth, rheight;
			byte *dest, pix;

			pix = color;

			rx = rect->x;
			ry = rect->y;
			rwidth = rect->width;
			rheight = rect->height;

			if (rx < 0) {
				rwidth += rx;
				rx = 0;
			}
			if (ry < 0) {
				rheight += ry;
				ry = 0;
			}
			if (rx + rwidth > vid.width)
				rwidth = vid.width - rx;
			if (ry + rheight > vid.height)
				rheight = vid.height - rx;

			if (rwidth < 1 || rheight < 1)
				return;

			dest = (byte *) vid.buffer + ry * vid.rowbytes + rx;

			for (ry = 0; ry < rheight; ry++)
			{
				for (rx = 0; rx < rwidth; rx++)
					dest[rx] = pix;
				dest += vid.rowbytes;
			}
		}
		break;
	case 2:
		{
			unsigned int rx, ry, rwidth, rheight;
			unsigned short *dest, pix;

			pix = d_8to16table[color];

			rx = rect->x;
			ry = rect->y;
			rwidth = rect->width;
			rheight = rect->height;

			if (rx < 0) {
				rwidth += rx;
				rx = 0;
			}
			if (ry < 0) {
				rheight += ry;
				ry = 0;
			}
			if (rx + rwidth > vid.width)
				rwidth = vid.width - rx;
			if (ry + rheight > vid.height)
				rheight = vid.height - rx;

			if (rwidth < 1 || rheight < 1)
				return;

			dest = (unsigned short *) vid.buffer + ry * (vid.rowbytes >> 1) +
				rx;

			for (ry = 0; ry < rheight; ry++)
			{
				for (rx = 0; rx < rwidth; rx++)
					dest[rx] = pix;
				dest += (vid.rowbytes >> 1);
			}
		}
		break;
	case 4:
		{
			unsigned int rx, ry, rwidth, rheight;
			unsigned int *dest, pix;

			pix = d_8to24table[color];

			rx = rect->x;
			ry = rect->y;
			rwidth = rect->width;
			rheight = rect->height;

			if (rx < 0) {
				rwidth += rx;
				rx = 0;
			}
			if (ry < 0) {
				rheight += ry;
				ry = 0;
			}
			if (rx + rwidth > vid.width)
				rwidth = vid.width - rx;
			if (ry + rheight > vid.height)
				rheight = vid.height - rx;

			if (rwidth < 1 || rheight < 1)
				return;

			dest = (unsigned int *) vid.buffer + ry * (vid.rowbytes >> 2) + rx;

			for (ry = 0; ry < rheight; ry++)
			{
				for (rx = 0; rx < rwidth; rx++)
					dest[rx] = pix;
				dest += (vid.rowbytes >> 2);
			}
		}
		break;
	default:
		Sys_Error("D_FillRect: unsupported r_pixbytes %i", r_pixbytes);
	}
}