#include "stdafx.h"
#include "XFStructs.h"
#include "Render.h"
#include "main.h"
#include "VertexHandler.h"
#include "Utils.h"

float rawViewPort[6];
float rawProjection[7];

#define BEGINSAVELOAD char *optr=ptr;
#define SAVELOAD(what,size) memcpy((void*)((save)?(void*)(ptr):(void*)(what)),(void*)((save)?(void*)(what):(void*)(ptr)),(size)); ptr+=(size);
#define ENDSAVELOAD return ptr-optr;

// __________________________________________________________________________________________________
// LoadXFReg 0x10
//
void LoadXFReg(u32 transferSize, u32 baseAddress, u32 *pData)
{	
    DVSTARTPROFILE();
	u32 address = baseAddress;
	for (int i=0; i<(int)transferSize; i++)
	{
		address = baseAddress + i;

		// Setup a Matrix
		if (address < 0x1000)
		{
			u32* p1 = &xfmem[address];
			memcpy(p1, &pData[i], transferSize*4);
			i += transferSize;
		}
		else if (address<0x2000)
		{
			u32 data = pData[i];	
			switch (address)
			{
			case 0x1006:
				//SetGPMetric
				break;
			case 0x1008: //__GXXfVtxSpecs, wrote 0004
				break;
			case 0x1009: //GXSetNumChans (no)
				break;
			case 0x100a: xfregs.colChans[0].ambColor = data; break; //GXSetChanAmbientcolor
			case 0x100b: xfregs.colChans[1].ambColor = data; break; //GXSetChanAmbientcolor
			case 0x100c: xfregs.colChans[0].matColor = data; break; //GXSetChanMatcolor (rgba)
			case 0x100d: xfregs.colChans[1].matColor = data; break; //GXSetChanMatcolor (rgba)

			case 0x100e: xfregs.colChans[0].color.hex = data; break; //color0
			case 0x100f: xfregs.colChans[1].color.hex = data; break; //color1
			case 0x1010: xfregs.colChans[0].alpha.hex = data; break; //alpha0
			case 0x1011: xfregs.colChans[1].alpha.hex = data; break; //alpha1

			case 0x1018:
				break;

			case 0x101a: 
				CVertexHandler::Flush();
				memcpy(rawViewPort, &pData[i], sizeof(rawViewPort)); 
				XFUpdateVP(); 
				i += 6;
				break;

			case 0x1020: 
				CVertexHandler::Flush();
				memcpy(rawProjection, &pData[i], sizeof(rawProjection)); 
				XFUpdatePJ(); 
				i += 7;
				return;

			case 0x103f: 
				xfregs.numTexGens = data;
				break;

			case 0x1040: xfregs.texcoords[0].texmtxinfo.hex = data; break;
			case 0x1041: xfregs.texcoords[1].texmtxinfo.hex = data; break;
			case 0x1042: xfregs.texcoords[2].texmtxinfo.hex = data; break;
			case 0x1043: xfregs.texcoords[3].texmtxinfo.hex = data; break;
			case 0x1044: xfregs.texcoords[4].texmtxinfo.hex = data; break;
			case 0x1045: xfregs.texcoords[5].texmtxinfo.hex = data; break;
			case 0x1046: xfregs.texcoords[6].texmtxinfo.hex = data; break;
			case 0x1047: xfregs.texcoords[7].texmtxinfo.hex = data; break;

			case 0x1050: xfregs.texcoords[0].postmtxinfo.hex = data; break;
			case 0x1051: xfregs.texcoords[1].postmtxinfo.hex = data; break;
			case 0x1052: xfregs.texcoords[2].postmtxinfo.hex = data; break;
			case 0x1053: xfregs.texcoords[3].postmtxinfo.hex = data; break;
			case 0x1054: xfregs.texcoords[4].postmtxinfo.hex = data; break;
			case 0x1055: xfregs.texcoords[5].postmtxinfo.hex = data; break;
			case 0x1056: xfregs.texcoords[6].postmtxinfo.hex = data; break;
			case 0x1057: xfregs.texcoords[7].postmtxinfo.hex = data; break;

			default:
				break;
			}
		}
		else if (address>=0x4000)
		{
			// MessageBox(NULL, "1", "1", MB_OK);
			//4010 __GXSetGenMode
		}
	}
}

// Check docs for this sucker...
void LoadIndexedXF(u32 val, int array)
{
    DVSTARTPROFILE();

	int index = val >> 16;
	int address = val & 0xFFF; //check mask
	int size = ((val >> 12) & 0xF)+1;
	//load stuff from array to address in xf mem
	for (int i = 0; i < size; i++)
		xfmem[address + i] = Memory_Read_U32(arraybases[array] + arraystrides[array]*index + i*4);
}

void XFUpdateVP()
{
	Renderer::SetViewport(rawViewPort); 
}
void XFUpdatePJ()
{
	Renderer::SetProjection(rawProjection,0); 
}

size_t XFSaveLoadState(char *ptr, BOOL save)
{
	BEGINSAVELOAD;
	SAVELOAD(xfregs.colChans,2*sizeof(ColorChannel));
	SAVELOAD(xfregs.texcoords,16*sizeof(TexCoordInfo));
	SAVELOAD(rawViewPort,sizeof(rawViewPort));
	SAVELOAD(rawProjection,sizeof(rawProjection));
	SAVELOAD(xfmem,XFMEM_SIZE*sizeof(u32));

	if (!save)
	{
		XFUpdateVP();
		XFUpdatePJ();
	}

	ENDSAVELOAD;
}