/*
	Haiku S3 Trio64 driver adapted from the X.org S3 driver.

	Copyright 2001	Ani Joshi <ajoshi@unixbox.com>

	Copyright 2008 Haiku, Inc.  All rights reserved.
	Distributed under the terms of the MIT license.

	Authors:
	Gerald Zajac 2008
*/


#include "accel.h"
#include "trio64.h"



void 
Trio64_FillRectangle(engine_token* et, uint32 color, fill_rect_params* pList,
					 uint32 count)
{
	(void)et;		// avoid compiler warning for unused arg

	gInfo.WaitQueue(3);
	WriteReg16(MULTIFUNC_CNTL, 0xa000);
	WriteReg32(FRGD_COLOR, color);
	WriteReg16(FRGD_MIX, FSS_FRGDCOL | 0x07);		// 7 = GXcopy rop

	while (count--) {
		int x = pList->left;
		int y = pList->top;
		int w = pList->right - x;
		int h = pList->bottom - y;

		gInfo.WaitQueue(5);
		WriteReg16(CUR_X, x);
		WriteReg16(CUR_Y, y);
		WriteReg16(CUR_WIDTH, w);
		WriteReg16(MULTIFUNC_CNTL, h);
		WriteReg16(CMD, CMD_RECT | DRAW | INC_X | INC_Y | WRTDATA);

		pList++;
	}
}


void 
Trio64_FillSpan(engine_token* et, uint32 color, uint16* pList, uint32 count)
{
	(void)et;		// avoid compiler warning for unused arg

	gInfo.WaitQueue(3);
	WriteReg16(MULTIFUNC_CNTL, 0xa000);
	WriteReg32(FRGD_COLOR, color);
	WriteReg16(FRGD_MIX, FSS_FRGDCOL | 0x07);		// 7 = GXcopy rop

	while (count--) {
		int y = *pList++;
		int x = *pList++;
		int w = *pList++ - x;

		// Some S3 chips display a line completely across the screen when a
		// span has zero width;  thus, the following if statement discards any
		// span with zero or negative width.

		if (w < 0)
			continue;

		// Draw the span as a rectangle with a height of 1 to avoid the
		// extra complexity of drawing a line.

		gInfo.WaitQueue(5);
		WriteReg16(CUR_X, x);
		WriteReg16(CUR_Y, y);
		WriteReg16(CUR_WIDTH, w);
		WriteReg16(MULTIFUNC_CNTL, 0);	// height is 1; but as computed it is 0
		WriteReg16(CMD, CMD_RECT | DRAW | INC_X | INC_Y | WRTDATA);
	}
}


void 
Trio64_InvertRectangle(engine_token* et, fill_rect_params* pList, uint32 count)
{
	(void)et;		// avoid compiler warning for unused arg

	gInfo.WaitQueue(2);
	WriteReg16(MULTIFUNC_CNTL, 0xa000);
	WriteReg16(FRGD_MIX, FSS_FRGDCOL | 0x00);		// 0 = GXinvert rop

	while (count--) {
		int x = pList->left;
		int y = pList->top;
		int w = pList->right - x;
		int h = pList->bottom - y;

		gInfo.WaitQueue(5);
		WriteReg16(CUR_X, x);
		WriteReg16(CUR_Y, y);
		WriteReg16(CUR_WIDTH, w);
		WriteReg16(MULTIFUNC_CNTL, h);
		WriteReg16(CMD, CMD_RECT | DRAW | INC_X | INC_Y | WRTDATA);

		pList++;
	}
}


void 
Trio64_ScreenToScreenBlit(engine_token* et, blit_params* pList, uint32 count)
{
	(void)et;		// avoid compiler warning for unused arg

	gInfo.WaitQueue(2);
	WriteReg16(MULTIFUNC_CNTL, 0xa000);
	WriteReg16(FRGD_MIX, FSS_BITBLT | 0x07);		// 7 = GXcopy rop

	while (count--) {
		int src_x = pList->src_left;
		int src_y = pList->src_top;
		int dest_x = pList->dest_left;
		int dest_y = pList->dest_top;
		int width = pList->width;
		int height = pList->height;

		if (src_x == dest_x &&  src_y == dest_y)
			continue;

		int cmd = CMD_BITBLT | DRAW | INC_X | INC_Y | WRTDATA;

		if (src_x < dest_x) {
			src_x += width;
			dest_x += width;
			cmd &= ~INC_X;
		}

		if (src_y < dest_y) {
			src_y += height;
			dest_y += height;
			cmd &= ~INC_Y;
		}

		gInfo.WaitQueue(7);
		WriteReg16(CUR_X, src_x);
		WriteReg16(CUR_Y, src_y);
		WriteReg16(DESTX_DIASTP, dest_x);
		WriteReg16(DESTY_AXSTP, dest_y);
		WriteReg16(CUR_WIDTH, width);
		WriteReg16(MULTIFUNC_CNTL, height);
		WriteReg16(CMD, cmd);

		pList ++;
	}
}