#include <stdio.h>
#include <string.h>
#include "MIPS.h"
#include "COP_SCU.h"

const char* CMIPS::m_sGPRName[] =
{
	"R0",	"AT",	"V0",	"V1",	"A0",	"A1",	"A2",	"A3",
	"T0",	"T1",	"T2",	"T3",	"T4",	"T5",	"T6",	"T7",
	"S0",	"S1",	"S2",	"S3",	"S4",	"S5",	"S6",	"S7",
	"T8",	"T9",	"K0",	"K1",	"GP",	"SP",	"FP",	"RA"
};

CMIPS::CMIPS(MEMORYMAP_ENDIANESS nEnd) 
: m_pAddrTranslator(nullptr)
, m_pArch(nullptr)
, m_analysis(nullptr)
, m_pMemoryMap(nullptr)
{
	m_analysis = new CMIPSAnalysis(this);
	switch(nEnd)
	{
	case MEMORYMAP_ENDIAN_LSBF:
		m_pMemoryMap = new CMemoryMap_LSBF;
		break;
	case MEMORYMAP_ENDIAN_MSBF:
		//
		break;
	}

	m_pCOP[0] = NULL;
	m_pCOP[1] = NULL;
	m_pCOP[2] = NULL;
	m_pCOP[3] = NULL;

	Reset();
}

CMIPS::~CMIPS()
{
	delete m_pMemoryMap;
	delete m_analysis;
}

void CMIPS::Reset()
{
	memset(&m_State, 0, sizeof(MIPSSTATE));
	m_State.nDelayedJumpAddr = MIPS_INVALID_PC;

	//Set VF0[w] to 1.0
	m_State.nCOP2[0].nV3 = 0x3F800000;
}

void CMIPS::ToggleBreakpoint(uint32 address)
{
	if(m_breakpoints.find(address) != m_breakpoints.end())
	{
		m_breakpoints.erase(address);
		return;
	}
	m_breakpoints.insert(address);
}

long CMIPS::GetBranch(uint16 nData)
{
	if(nData & 0x8000)
	{
		return -((0x10000 - nData) * 4);
	}
	else
	{
		return ((nData & 0x7FFF) * 4);
	}
}

bool CMIPS::IsBranch(uint32 nAddress)
{
	uint32 nOpcode = m_pMemoryMap->GetInstruction(nAddress);
	return m_pArch->IsInstructionBranch(this, nAddress, nOpcode) == MIPS_BRANCH_NORMAL;
}

uint32 CMIPS::TranslateAddress64(CMIPS* pC, uint32 nVAddrLO)
{
	//Proper address translation?
	return nVAddrLO & 0x1FFFFFFF;
}

bool CMIPS::GenerateInterrupt(uint32 nAddress)
{
	//Check if interrupts are enabled
	if(!(m_State.nCOP0[CCOP_SCU::STATUS] & STATUS_IE)) return false;

	//Check if we're in exception mode (interrupts are disabled in exception mode)
	if(m_State.nCOP0[CCOP_SCU::STATUS] & STATUS_EXL) return false;

	return CMIPS::GenerateException(nAddress);
}

bool CMIPS::GenerateException(uint32 nAddress)
{
	//Save exception PC
	if(m_State.nDelayedJumpAddr != MIPS_INVALID_PC)
	{
		m_State.nCOP0[CCOP_SCU::EPC] = m_State.nPC - 4;
		//m_State.nCOP0[CCOP_SCU::EPC] = m_State.nDelayedJumpAddr;
	}
	else
	{
		m_State.nCOP0[CCOP_SCU::EPC] = m_State.nPC;
	}

	m_State.nDelayedJumpAddr = MIPS_INVALID_PC;

	m_State.nPC = nAddress;

	//Set in exception mode
	m_State.nCOP0[CCOP_SCU::STATUS] |= STATUS_EXL;

	return true;
}