ShuriZma
/
project64
mirror of https://github.com/project64/project64.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity
project64/Source/RSP/Interpreter Ops.c

1905 lines
58 KiB
C
Raw Blame History

/*
* RSP Compiler plug in for Project 64 (A Nintendo 64 emulator).
*
* (c) Copyright 2001 jabo (jabo@emulation64.com) and
* zilmar (zilmar@emulation64.com)
*
* pj64 homepage: www.pj64.net
*
* Permission to use, copy, modify and distribute Project64 in both binary and
* source form, for non-commercial purposes, is hereby granted without fee,
* providing that this license information and copyright notice appear with
* all copies and any derived work.
*
* This software is provided 'as-is', without any express or implied
* warranty. In no event shall the authors be held liable for any damages
* arising from the use of this software.
*
* Project64 is freeware for PERSONAL USE only. Commercial users should
* seek permission of the copyright holders first. Commercial use includes
* charging money for Project64 or software derived from Project64.
*
* The copyright holders request that bug fixes and improvements to the code
* should be forwarded to them so if they want them.
*
*/
#include <windows.h>
#include <stdio.h>
#include <math.h>
#include <float.h>
#include "RSP.h"
#include "CPU.h"
#include "RSP Command.h"
#include "RSP Registers.h"
#include "Interpreter CPU.h"
#include "memory.h"
#include "dma.h"
#include "log.h"
#include "x86.h"
extern UWORD32 Recp, RecpResult, SQroot, SQrootResult;
/************************* OpCode functions *************************/
void RSP_Opcode_SPECIAL ( void ) {
((void (*)()) RSP_Special[ RSPOpC.funct ])();
}
void RSP_Opcode_REGIMM ( void ) {
((void (*)()) RSP_RegImm[ RSPOpC.rt ])();
}
void RSP_Opcode_J ( void ) {
RSP_NextInstruction = DELAY_SLOT;
RSP_JumpTo = (RSPOpC.target << 2) & 0xFFC;
}
void RSP_Opcode_JAL ( void ) {
RSP_NextInstruction = DELAY_SLOT;
RSP_GPR[31].UW = ( *PrgCount + 8 ) & 0xFFC;
RSP_JumpTo = (RSPOpC.target << 2) & 0xFFC;
}
void RSP_Opcode_BEQ ( void ) {
RSP_NextInstruction = DELAY_SLOT;
if (RSP_GPR[RSPOpC.rs].W == RSP_GPR[RSPOpC.rt].W) {
RSP_JumpTo = ( *PrgCount + ((short)RSPOpC.offset << 2) + 4 ) & 0xFFC;
} else {
RSP_JumpTo = ( *PrgCount + 8 ) & 0xFFC;
}
}
void RSP_Opcode_BNE ( void ) {
RSP_NextInstruction = DELAY_SLOT;
if (RSP_GPR[RSPOpC.rs].W != RSP_GPR[RSPOpC.rt].W) {
RSP_JumpTo = ( *PrgCount + ((short)RSPOpC.offset << 2) + 4 ) & 0xFFC;
} else {
RSP_JumpTo = ( *PrgCount + 8 ) & 0xFFC;
}
}
void RSP_Opcode_BLEZ ( void ) {
RSP_NextInstruction = DELAY_SLOT;
if (RSP_GPR[RSPOpC.rs].W <= 0) {
RSP_JumpTo = ( *PrgCount + ((short)RSPOpC.offset << 2) + 4 ) & 0xFFC;
} else {
RSP_JumpTo = ( *PrgCount + 8 ) & 0xFFC;
}
}
void RSP_Opcode_BGTZ ( void ) {
RSP_NextInstruction = DELAY_SLOT;
if (RSP_GPR[RSPOpC.rs].W > 0) {
RSP_JumpTo = ( *PrgCount + ((short)RSPOpC.offset << 2) + 4 ) & 0xFFC;
} else {
RSP_JumpTo = ( *PrgCount + 8 ) & 0xFFC;
}
}
void RSP_Opcode_ADDI ( void ) {
if (RSPOpC.rt != 0) {
RSP_GPR[RSPOpC.rt].W = RSP_GPR[RSPOpC.rs].W + (short)RSPOpC.immediate;
}
}
void RSP_Opcode_ADDIU ( void ) {
if (RSPOpC.rt != 0) {
RSP_GPR[RSPOpC.rt].UW = RSP_GPR[RSPOpC.rs].UW + (DWORD)((short)RSPOpC.immediate);
}
}
void RSP_Opcode_SLTI (void) {
if (RSPOpC.rt == 0) { return; }
if (RSP_GPR[RSPOpC.rs].W < (short)RSPOpC.immediate) {
RSP_GPR[RSPOpC.rt].W = 1;
} else {
RSP_GPR[RSPOpC.rt].W = 0;
}
}
void RSP_Opcode_SLTIU (void) {
if (RSPOpC.rt == 0) { return; }
if (RSP_GPR[RSPOpC.rs].UW < (DWORD)(short)RSPOpC.immediate) {
RSP_GPR[RSPOpC.rt].W = 1;
} else {
RSP_GPR[RSPOpC.rt].W = 0;
}
}
void RSP_Opcode_ANDI ( void ) {
if (RSPOpC.rt != 0) {
RSP_GPR[RSPOpC.rt].W = RSP_GPR[RSPOpC.rs].W & RSPOpC.immediate;
}
}
void RSP_Opcode_ORI ( void ) {
if (RSPOpC.rt != 0) {
RSP_GPR[RSPOpC.rt].W = RSP_GPR[RSPOpC.rs].W | RSPOpC.immediate;
}
}
void RSP_Opcode_XORI ( void ) {
if (RSPOpC.rt != 0) {
RSP_GPR[RSPOpC.rt].W = RSP_GPR[RSPOpC.rs].W ^ RSPOpC.immediate;
}
}
void RSP_Opcode_LUI (void) {
if (RSPOpC.rt != 0) {
RSP_GPR[RSPOpC.rt].W = (short)RSPOpC.offset << 16;
}
}
void RSP_Opcode_COP0 (void) {
((void (*)()) RSP_Cop0[ RSPOpC.rs ])();
}
void RSP_Opcode_COP2 (void) {
((void (*)()) RSP_Cop2[ RSPOpC.rs ])();
}
void RSP_Opcode_LB ( void ) {
DWORD Address = ((RSP_GPR[RSPOpC.base].UW + (short)RSPOpC.offset) & 0xFFF);
RSP_LB_DMEM( Address, &RSP_GPR[RSPOpC.rt].UB[0] );
RSP_GPR[RSPOpC.rt].W = RSP_GPR[RSPOpC.rt].B[0];
}
void RSP_Opcode_LH ( void ) {
DWORD Address = ((RSP_GPR[RSPOpC.base].UW + (short)RSPOpC.offset) & 0xFFF);
RSP_LH_DMEM( Address, &RSP_GPR[RSPOpC.rt].UHW[0] );
RSP_GPR[RSPOpC.rt].W = RSP_GPR[RSPOpC.rt].HW[0];
}
void RSP_Opcode_LW ( void ) {
DWORD Address = ((RSP_GPR[RSPOpC.base].UW + (short)RSPOpC.offset) & 0xFFF);
RSP_LW_DMEM( Address, &RSP_GPR[RSPOpC.rt].UW );
}
void RSP_Opcode_LBU ( void ) {
DWORD Address = ((RSP_GPR[RSPOpC.base].UW + (short)RSPOpC.offset) & 0xFFF);
RSP_LB_DMEM( Address, &RSP_GPR[RSPOpC.rt].UB[0] );
RSP_GPR[RSPOpC.rt].UW = RSP_GPR[RSPOpC.rt].UB[0];
}
void RSP_Opcode_LHU ( void ) {
DWORD Address = ((RSP_GPR[RSPOpC.base].UW + (short)RSPOpC.offset) & 0xFFF);
RSP_LH_DMEM( Address, &RSP_GPR[RSPOpC.rt].UHW[0] );
RSP_GPR[RSPOpC.rt].UW = RSP_GPR[RSPOpC.rt].UHW[0];
}
void RSP_Opcode_SB ( void ) {
DWORD Address = ((RSP_GPR[RSPOpC.base].UW + (short)RSPOpC.offset) & 0xFFF);
RSP_SB_DMEM( Address, RSP_GPR[RSPOpC.rt].UB[0] );
}
void RSP_Opcode_SH ( void ) {
DWORD Address = ((RSP_GPR[RSPOpC.base].UW + (short)RSPOpC.offset) & 0xFFF);
RSP_SH_DMEM( Address, RSP_GPR[RSPOpC.rt].UHW[0] );
}
void RSP_Opcode_SW ( void ) {
DWORD Address = ((RSP_GPR[RSPOpC.base].UW + (short)RSPOpC.offset) & 0xFFF);
RSP_SW_DMEM( Address, RSP_GPR[RSPOpC.rt].UW );
}
void RSP_Opcode_LC2 (void) {
((void (*)()) RSP_Lc2 [ RSPOpC.rd ])();
}
void RSP_Opcode_SC2 (void) {
((void (*)()) RSP_Sc2 [ RSPOpC.rd ])();
}
/********************** R4300i OpCodes: Special **********************/
void RSP_Special_SLL ( void ) {
if (RSPOpC.rd != 0) {
RSP_GPR[RSPOpC.rd].W = RSP_GPR[RSPOpC.rt].W << RSPOpC.sa;
}
}
void RSP_Special_SRL ( void ) {
if (RSPOpC.rd != 0) {
RSP_GPR[RSPOpC.rd].UW = RSP_GPR[RSPOpC.rt].UW >> RSPOpC.sa;
}
}
void RSP_Special_SRA ( void ) {
if (RSPOpC.rd != 0) {
RSP_GPR[RSPOpC.rd].W = RSP_GPR[RSPOpC.rt].W >> RSPOpC.sa;
}
}
void RSP_Special_SLLV (void) {
if (RSPOpC.rd != 0) {
RSP_GPR[RSPOpC.rd].W = RSP_GPR[RSPOpC.rt].W << (RSP_GPR[RSPOpC.rs].W & 0x1F);
}
}
void RSP_Special_SRLV (void) {
if (RSPOpC.rd != 0) {
RSP_GPR[RSPOpC.rd].UW = RSP_GPR[RSPOpC.rt].UW >> (RSP_GPR[RSPOpC.rs].W & 0x1F);
}
}
void RSP_Special_SRAV (void) {
if (RSPOpC.rd != 0) {
RSP_GPR[RSPOpC.rd].W = RSP_GPR[RSPOpC.rt].W >> (RSP_GPR[RSPOpC.rs].W & 0x1F);
}
}
void RSP_Special_JR (void) {
RSP_NextInstruction = DELAY_SLOT;
RSP_JumpTo = (RSP_GPR[RSPOpC.rs].W & 0xFFC);
}
void RSP_Special_JALR (void) {
RSP_NextInstruction = DELAY_SLOT;
RSP_GPR[RSPOpC.rd].W = (*PrgCount + 8) & 0xFFC;
RSP_JumpTo = (RSP_GPR[RSPOpC.rs].W & 0xFFC);
}
void RSP_Special_BREAK ( void ) {
RSP_Running = FALSE;
*RSPInfo.SP_STATUS_REG |= (SP_STATUS_HALT | SP_STATUS_BROKE );
if ((*RSPInfo.SP_STATUS_REG & SP_STATUS_INTR_BREAK) != 0 ) {
*RSPInfo.MI_INTR_REG |= R4300i_SP_Intr;
RSPInfo.CheckInterrupts();
}
}
void RSP_Special_ADD (void) {
if (RSPOpC.rd != 0) {
RSP_GPR[RSPOpC.rd].W = RSP_GPR[RSPOpC.rs].W + RSP_GPR[RSPOpC.rt].W;
}
}
void RSP_Special_ADDU (void) {
if (RSPOpC.rd != 0) {
RSP_GPR[RSPOpC.rd].UW = RSP_GPR[RSPOpC.rs].UW + RSP_GPR[RSPOpC.rt].UW;
}
}
void RSP_Special_SUB (void) {
if (RSPOpC.rd != 0) {
RSP_GPR[RSPOpC.rd].W = RSP_GPR[RSPOpC.rs].W - RSP_GPR[RSPOpC.rt].W;
}
}
void RSP_Special_SUBU (void) {
if (RSPOpC.rd != 0) {
RSP_GPR[RSPOpC.rd].UW = RSP_GPR[RSPOpC.rs].UW - RSP_GPR[RSPOpC.rt].UW;
}
}
void RSP_Special_AND (void) {
if (RSPOpC.rd != 0) {
RSP_GPR[RSPOpC.rd].UW = RSP_GPR[RSPOpC.rs].UW & RSP_GPR[RSPOpC.rt].UW;
}
}
void RSP_Special_OR (void) {
if (RSPOpC.rd != 0) {
RSP_GPR[RSPOpC.rd].UW = RSP_GPR[RSPOpC.rs].UW | RSP_GPR[RSPOpC.rt].UW;
}
}
void RSP_Special_XOR (void) {
if (RSPOpC.rd != 0) {
RSP_GPR[RSPOpC.rd].UW = RSP_GPR[RSPOpC.rs].UW ^ RSP_GPR[RSPOpC.rt].UW;
}
}
void RSP_Special_NOR (void) {
if (RSPOpC.rd != 0) {
RSP_GPR[RSPOpC.rd].UW = ~(RSP_GPR[RSPOpC.rs].UW | RSP_GPR[RSPOpC.rt].UW);
}
}
void RSP_Special_SLT (void) {
if (RSPOpC.rd == 0) { return; }
if (RSP_GPR[RSPOpC.rs].W < RSP_GPR[RSPOpC.rt].W) {
RSP_GPR[RSPOpC.rd].UW = 1;
} else {
RSP_GPR[RSPOpC.rd].UW = 0;
}
}
void RSP_Special_SLTU (void) {
if (RSPOpC.rd == 0) { return; }
if (RSP_GPR[RSPOpC.rs].UW < RSP_GPR[RSPOpC.rt].UW) {
RSP_GPR[RSPOpC.rd].UW = 1;
} else {
RSP_GPR[RSPOpC.rd].UW = 0;
}
}
/********************** R4300i OpCodes: RegImm **********************/
void RSP_Opcode_BLTZ ( void ) {
RSP_NextInstruction = DELAY_SLOT;
if (RSP_GPR[RSPOpC.rs].W < 0) {
RSP_JumpTo = ( *PrgCount + ((short)RSPOpC.offset << 2) + 4 ) & 0xFFC;
} else {
RSP_JumpTo = ( *PrgCount + 8 ) & 0xFFC;
}
}
void RSP_Opcode_BGEZ ( void ) {
RSP_NextInstruction = DELAY_SLOT;
if (RSP_GPR[RSPOpC.rs].W >= 0) {
RSP_JumpTo = ( *PrgCount + ((short)RSPOpC.offset << 2) + 4 ) & 0xFFC;
} else {
RSP_JumpTo = ( *PrgCount + 8 ) & 0xFFC;
}
}
void RSP_Opcode_BLTZAL ( void ) {
RSP_NextInstruction = DELAY_SLOT;
RSP_GPR[31].UW = ( *PrgCount + 8 ) & 0xFFC;
if (RSP_GPR[RSPOpC.rs].W < 0) {
RSP_JumpTo = ( *PrgCount + ((short)RSPOpC.offset << 2) + 4 ) & 0xFFC;
} else {
RSP_JumpTo = ( *PrgCount + 8 ) & 0xFFC;
}
}
void RSP_Opcode_BGEZAL ( void ) {
RSP_NextInstruction = DELAY_SLOT;
RSP_GPR[31].UW = ( *PrgCount + 8 ) & 0xFFC;
if (RSP_GPR[RSPOpC.rs].W >= 0) {
RSP_JumpTo = ( *PrgCount + ((short)RSPOpC.offset << 2) + 4 ) & 0xFFC;
} else {
RSP_JumpTo = ( *PrgCount + 8 ) & 0xFFC;
}
}
/************************** Cop0 functions *************************/
void RSP_Cop0_MF (void) {
if (LogRDP && CPUCore == InterpreterCPU)
{
RDP_LogMF0(*PrgCount,RSPOpC.rd);
}
switch (RSPOpC.rd) {
case 0: RSP_GPR[RSPOpC.rt].UW = *RSPInfo.SP_MEM_ADDR_REG; break;
case 1: RSP_GPR[RSPOpC.rt].UW = *RSPInfo.SP_DRAM_ADDR_REG; break;
case 4: RSP_GPR[RSPOpC.rt].UW = *RSPInfo.SP_STATUS_REG; break;
case 5: RSP_GPR[RSPOpC.rt].UW = *RSPInfo.SP_DMA_FULL_REG; break;
case 6: RSP_GPR[RSPOpC.rt].UW = *RSPInfo.SP_DMA_BUSY_REG; break;
case 7:
RSP_GPR[RSPOpC.rt].W = 0;
//RSP_GPR[RSPOpC.rt].W = *RSPInfo.SP_SEMAPHORE_REG;
//*RSPInfo.SP_SEMAPHORE_REG = 1;
break;
case 8: RSP_GPR[RSPOpC.rt].UW = *RSPInfo.DPC_START_REG ; break;
case 9: RSP_GPR[RSPOpC.rt].UW = *RSPInfo.DPC_END_REG ; break;
case 10: RSP_GPR[RSPOpC.rt].UW = *RSPInfo.DPC_CURRENT_REG; break;
case 11: RSP_GPR[RSPOpC.rt].W = *RSPInfo.DPC_STATUS_REG; break;
case 12: RSP_GPR[RSPOpC.rt].W = *RSPInfo.DPC_CLOCK_REG; break;
default:
DisplayError("have not implemented RSP MF CP0 reg %s (%d)",COP0_Name(RSPOpC.rd),RSPOpC.rd);
}
}
void RSP_Cop0_MT (void) {
if (LogRDP && CPUCore == InterpreterCPU)
{
RDP_LogMT0(*PrgCount,RSPOpC.rd, RSP_GPR[RSPOpC.rt].UW);
}
switch (RSPOpC.rd) {
case 0: *RSPInfo.SP_MEM_ADDR_REG = RSP_GPR[RSPOpC.rt].UW; break;
case 1: *RSPInfo.SP_DRAM_ADDR_REG = RSP_GPR[RSPOpC.rt].UW; break;
case 2:
*RSPInfo.SP_RD_LEN_REG = RSP_GPR[RSPOpC.rt].UW;
SP_DMA_READ();
break;
case 3:
*RSPInfo.SP_WR_LEN_REG = RSP_GPR[RSPOpC.rt].UW;
SP_DMA_WRITE();
break;
case 4:
if ( ( RSP_GPR[RSPOpC.rt].W & SP_CLR_HALT ) != 0) { *RSPInfo.SP_STATUS_REG &= ~SP_STATUS_HALT; }
if ( ( RSP_GPR[RSPOpC.rt].W & SP_SET_HALT ) != 0) { *RSPInfo.SP_STATUS_REG |= SP_STATUS_HALT; }
if ( ( RSP_GPR[RSPOpC.rt].W & SP_CLR_BROKE ) != 0) { *RSPInfo.SP_STATUS_REG &= ~SP_STATUS_BROKE; }
if ( ( RSP_GPR[RSPOpC.rt].W & SP_CLR_INTR ) != 0) { *RSPInfo.MI_INTR_REG &= ~R4300i_SP_Intr; }
if ( ( RSP_GPR[RSPOpC.rt].W & SP_SET_INTR ) != 0) { DisplayError("SP_SET_INTR"); }
if ( ( RSP_GPR[RSPOpC.rt].W & SP_CLR_SSTEP ) != 0) { *RSPInfo.SP_STATUS_REG &= ~SP_STATUS_SSTEP; }
if ( ( RSP_GPR[RSPOpC.rt].W & SP_SET_SSTEP ) != 0) { *RSPInfo.SP_STATUS_REG |= SP_STATUS_SSTEP; }
if ( ( RSP_GPR[RSPOpC.rt].W & SP_CLR_INTR_BREAK ) != 0) { *RSPInfo.SP_STATUS_REG &= ~SP_STATUS_INTR_BREAK; }
if ( ( RSP_GPR[RSPOpC.rt].W & SP_SET_INTR_BREAK ) != 0) { *RSPInfo.SP_STATUS_REG |= SP_STATUS_INTR_BREAK; }
if ( ( RSP_GPR[RSPOpC.rt].W & SP_CLR_SIG0 ) != 0) { *RSPInfo.SP_STATUS_REG &= ~SP_STATUS_SIG0; }
if ( ( RSP_GPR[RSPOpC.rt].W & SP_SET_SIG0 ) != 0) { *RSPInfo.SP_STATUS_REG |= SP_STATUS_SIG0; }
if ( ( RSP_GPR[RSPOpC.rt].W & SP_CLR_SIG1 ) != 0) { *RSPInfo.SP_STATUS_REG &= ~SP_STATUS_SIG1; }
if ( ( RSP_GPR[RSPOpC.rt].W & SP_SET_SIG1 ) != 0) { *RSPInfo.SP_STATUS_REG |= SP_STATUS_SIG1; }
if ( ( RSP_GPR[RSPOpC.rt].W & SP_CLR_SIG2 ) != 0) { *RSPInfo.SP_STATUS_REG &= ~SP_STATUS_SIG2; }
if ( ( RSP_GPR[RSPOpC.rt].W & SP_SET_SIG2 ) != 0) { *RSPInfo.SP_STATUS_REG |= SP_STATUS_SIG2; }
if ( ( RSP_GPR[RSPOpC.rt].W & SP_CLR_SIG3 ) != 0) { *RSPInfo.SP_STATUS_REG &= ~SP_STATUS_SIG3; }
if ( ( RSP_GPR[RSPOpC.rt].W & SP_SET_SIG3 ) != 0) { *RSPInfo.SP_STATUS_REG |= SP_STATUS_SIG3; }
if ( ( RSP_GPR[RSPOpC.rt].W & SP_CLR_SIG4 ) != 0) { *RSPInfo.SP_STATUS_REG &= ~SP_STATUS_SIG4; }
if ( ( RSP_GPR[RSPOpC.rt].W & SP_SET_SIG4 ) != 0) { *RSPInfo.SP_STATUS_REG |= SP_STATUS_SIG4; }
if ( ( RSP_GPR[RSPOpC.rt].W & SP_CLR_SIG5 ) != 0) { *RSPInfo.SP_STATUS_REG &= ~SP_STATUS_SIG5; }
if ( ( RSP_GPR[RSPOpC.rt].W & SP_SET_SIG5 ) != 0) { *RSPInfo.SP_STATUS_REG |= SP_STATUS_SIG5; }
if ( ( RSP_GPR[RSPOpC.rt].W & SP_CLR_SIG6 ) != 0) { *RSPInfo.SP_STATUS_REG &= ~SP_STATUS_SIG6; }
if ( ( RSP_GPR[RSPOpC.rt].W & SP_SET_SIG6 ) != 0) { *RSPInfo.SP_STATUS_REG |= SP_STATUS_SIG6; }
if ( ( RSP_GPR[RSPOpC.rt].W & SP_CLR_SIG7 ) != 0) { *RSPInfo.SP_STATUS_REG &= ~SP_STATUS_SIG7; }
if ( ( RSP_GPR[RSPOpC.rt].W & SP_SET_SIG7 ) != 0) { *RSPInfo.SP_STATUS_REG |= SP_STATUS_SIG7; }
break;
case 7: *RSPInfo.SP_SEMAPHORE_REG = 0; break;
case 8:
*RSPInfo.DPC_START_REG = RSP_GPR[RSPOpC.rt].UW;
*RSPInfo.DPC_CURRENT_REG = RSP_GPR[RSPOpC.rt].UW;
break;
case 9:
*RSPInfo.DPC_END_REG = RSP_GPR[RSPOpC.rt].UW;
RDP_LogDlist();
if (RSPInfo.ProcessRdpList != NULL) { RSPInfo.ProcessRdpList(); }
break;
case 10: *RSPInfo.DPC_CURRENT_REG = RSP_GPR[RSPOpC.rt].UW; break;
case 11:
if ( ( RSP_GPR[RSPOpC.rt].W & DPC_CLR_XBUS_DMEM_DMA ) != 0) { *RSPInfo.DPC_STATUS_REG &= ~DPC_STATUS_XBUS_DMEM_DMA; }
if ( ( RSP_GPR[RSPOpC.rt].W & DPC_SET_XBUS_DMEM_DMA ) != 0) { *RSPInfo.DPC_STATUS_REG |= DPC_STATUS_XBUS_DMEM_DMA; }
if ( ( RSP_GPR[RSPOpC.rt].W & DPC_CLR_FREEZE ) != 0) { *RSPInfo.DPC_STATUS_REG &= ~DPC_STATUS_FREEZE; }
if ( ( RSP_GPR[RSPOpC.rt].W & DPC_SET_FREEZE ) != 0) { *RSPInfo.DPC_STATUS_REG |= DPC_STATUS_FREEZE; }
if ( ( RSP_GPR[RSPOpC.rt].W & DPC_CLR_FLUSH ) != 0) { *RSPInfo.DPC_STATUS_REG &= ~DPC_STATUS_FLUSH; }
if ( ( RSP_GPR[RSPOpC.rt].W & DPC_SET_FLUSH ) != 0) { *RSPInfo.DPC_STATUS_REG |= DPC_STATUS_FLUSH; }
if ( ( RSP_GPR[RSPOpC.rt].W & DPC_CLR_TMEM_CTR ) != 0) { /* DisplayError("RSP: DPC_STATUS_REG: DPC_CLR_TMEM_CTR"); */ }
if ( ( RSP_GPR[RSPOpC.rt].W & DPC_CLR_PIPE_CTR ) != 0) { DisplayError("RSP: DPC_STATUS_REG: DPC_CLR_PIPE_CTR"); }
if ( ( RSP_GPR[RSPOpC.rt].W & DPC_CLR_CMD_CTR ) != 0) { DisplayError("RSP: DPC_STATUS_REG: DPC_CLR_CMD_CTR"); }
if ( ( RSP_GPR[RSPOpC.rt].W & DPC_CLR_CLOCK_CTR ) != 0) { /* DisplayError("RSP: DPC_STATUS_REG: DPC_CLR_CLOCK_CTR"); */ }
break;
default:
DisplayError("have not implemented RSP MT CP0 reg %s (%d)",COP0_Name(RSPOpC.rd),RSPOpC.rd);
}
}
/************************** Cop2 functions *************************/
void RSP_Cop2_MF (void) {
int element = (RSPOpC.sa >> 1);
RSP_GPR[RSPOpC.rt].B[1] = RSP_Vect[RSPOpC.rd].B[15 - element];
RSP_GPR[RSPOpC.rt].B[0] = RSP_Vect[RSPOpC.rd].B[15 - ((element + 1) % 16)];
RSP_GPR[RSPOpC.rt].W = RSP_GPR[RSPOpC.rt].HW[0];
}
void RSP_Cop2_CF (void) {
switch ((RSPOpC.rd & 0x03)) {
case 0: RSP_GPR[RSPOpC.rt].W = RSP_Flags[0].UHW[0]; break;
case 1: RSP_GPR[RSPOpC.rt].W = RSP_Flags[1].UHW[0]; break;
case 2: RSP_GPR[RSPOpC.rt].W = RSP_Flags[2].UHW[0]; break;
case 3: RSP_GPR[RSPOpC.rt].W = RSP_Flags[2].UHW[0]; break;
}
}
void RSP_Cop2_MT (void) {
int element = 15 - (RSPOpC.sa >> 1);
RSP_Vect[RSPOpC.rd].B[element] = RSP_GPR[RSPOpC.rt].B[1];
if (element != 0) {
RSP_Vect[RSPOpC.rd].B[element - 1] = RSP_GPR[RSPOpC.rt].B[0];
}
}
void RSP_Cop2_CT (void) {
switch ((RSPOpC.rd & 0x03)) {
case 0: RSP_Flags[0].HW[0] = RSP_GPR[RSPOpC.rt].HW[0]; break;
case 1: RSP_Flags[1].HW[0] = RSP_GPR[RSPOpC.rt].HW[0]; break;
case 2: RSP_Flags[2].B[0] = RSP_GPR[RSPOpC.rt].B[0]; break;
case 3: RSP_Flags[2].B[0] = RSP_GPR[RSPOpC.rt].B[0]; break;
}
}
void RSP_COP2_VECTOR (void) {
((void (*)()) RSP_Vector[ RSPOpC.funct ])();
}
/************************** Vect functions **************************/
void RSP_Vector_VMULF (void) {
int count, el, del;
UWORD32 temp;
for (count = 0; count < 8; count ++ ) {
el = Indx[RSPOpC.rs].B[count];
del = EleSpec[RSPOpC.rs].B[el];
if (RSP_Vect[RSPOpC.rd].UHW[el] != 0x8000 || RSP_Vect[RSPOpC.rt].UHW[del] != 0x8000) {
temp.W = ((long)RSP_Vect[RSPOpC.rd].HW[el] * (long)RSP_Vect[RSPOpC.rt].HW[del]) << 1;
temp.UW += 0x8000;
RSP_ACCUM[el].HW[2] = temp.HW[1];
RSP_ACCUM[el].HW[1] = temp.HW[0];
if ( RSP_ACCUM[el].HW[2] < 0 ) {
RSP_ACCUM[el].HW[3] = -1;
} else {
RSP_ACCUM[el].HW[3] = 0;
}
RSP_Vect[RSPOpC.sa].HW[el] = RSP_ACCUM[el].HW[2];
} else {
temp.W = 0x80000000;
RSP_ACCUM[el].UHW[3] = 0;
RSP_ACCUM[el].UHW[2] = 0x8000;
RSP_ACCUM[el].UHW[1] = 0x8000;
RSP_Vect[RSPOpC.sa].HW[el] = 0x7FFF;
}
}
}
void RSP_Vector_VMULU (void) {
int count, el, del;
for (count = 0; count < 8; count ++ ) {
el = Indx[RSPOpC.rs].B[count];
del = EleSpec[RSPOpC.rs].B[el];
RSP_ACCUM[el].DW = (__int64)(RSP_Vect[RSPOpC.rd].HW[el] * RSP_Vect[RSPOpC.rt].HW[del]) << 17;
RSP_ACCUM[el].DW += 0x80000000;
if (RSP_ACCUM[el].DW < 0) {
RSP_Vect[RSPOpC.sa].HW[el] = 0;
} else if ((short)(RSP_ACCUM[el].UHW[3] ^ RSP_ACCUM[el].UHW[2]) < 0) {
RSP_Vect[RSPOpC.sa].HW[el] = -1;
} else {
RSP_Vect[RSPOpC.sa].HW[el] = RSP_ACCUM[el].HW[2];
}
}
}
void RSP_Vector_VMUDL (void) {
int count, el, del;
UWORD32 temp;
for (count = 0; count < 8; count ++ ) {
el = Indx[RSPOpC.rs].B[count];
del = EleSpec[RSPOpC.rs].B[el];
temp.UW = (DWORD)RSP_Vect[RSPOpC.rd].UHW[el] * (DWORD)RSP_Vect[RSPOpC.rt].UHW[del];
RSP_ACCUM[el].W[1] = 0;
RSP_ACCUM[el].HW[1] = temp.HW[1];
RSP_Vect[RSPOpC.sa].HW[el] = RSP_ACCUM[el].HW[1];
}
}
void RSP_Vector_VMUDM (void) {
int count, el, del;
UWORD32 temp;
for (count = 0; count < 8; count ++ ) {
el = Indx[RSPOpC.rs].B[count];
del = EleSpec[RSPOpC.rs].B[el];
temp.UW = (DWORD)((long)RSP_Vect[RSPOpC.rd].HW[el]) * (DWORD)RSP_Vect[RSPOpC.rt].UHW[del];
if (temp.W < 0) {
RSP_ACCUM[el].HW[3] = -1;
} else {
RSP_ACCUM[el].HW[3] = 0;
}
RSP_ACCUM[el].HW[2] = temp.HW[1];
RSP_ACCUM[el].HW[1] = temp.HW[0];
RSP_Vect[RSPOpC.sa].HW[el] = RSP_ACCUM[el].HW[2];
}
}
void RSP_Vector_VMUDN (void) {
int count, el, del;
UWORD32 temp;
for (count = 0; count < 8; count ++ ) {
el = Indx[RSPOpC.rs].B[count];
del = EleSpec[RSPOpC.rs].B[el];
temp.UW = (DWORD)RSP_Vect[RSPOpC.rd].UHW[el] * (DWORD)(long)(RSP_Vect[RSPOpC.rt].HW[del]);
if (temp.W < 0) {
RSP_ACCUM[el].HW[3] = -1;
} else {
RSP_ACCUM[el].HW[3] = 0;
}
RSP_ACCUM[el].HW[2] = temp.HW[1];
RSP_ACCUM[el].HW[1] = temp.HW[0];
RSP_Vect[RSPOpC.sa].HW[el] = RSP_ACCUM[el].HW[1];
}
}
void RSP_Vector_VMUDH (void) {
int count, el, del;
for (count = 0; count < 8; count ++ ) {
el = Indx[RSPOpC.rs].B[count];
del = EleSpec[RSPOpC.rs].B[el];
RSP_ACCUM[el].W[1] = (long)RSP_Vect[RSPOpC.rd].HW[el] * (long)RSP_Vect[RSPOpC.rt].HW[del];
RSP_ACCUM[el].HW[1] = 0;
if (RSP_ACCUM[el].HW[3] < 0) {
if (RSP_ACCUM[el].UHW[3] != 0xFFFF) {
RSP_Vect[RSPOpC.sa].HW[el] = (WORD)0x8000;
} else {
if (RSP_ACCUM[el].HW[2] >= 0) {
RSP_Vect[RSPOpC.sa].HW[el] = (WORD)0x8000;
} else {
RSP_Vect[RSPOpC.sa].HW[el] = RSP_ACCUM[el].HW[2];
}
}
} else {
if (RSP_ACCUM[el].UHW[3] != 0) {
RSP_Vect[RSPOpC.sa].HW[el] = 0x7FFF;
} else {
if (RSP_ACCUM[el].HW[2] < 0) {
RSP_Vect[RSPOpC.sa].HW[el] = 0x7FFF;
} else {
RSP_Vect[RSPOpC.sa].HW[el] = RSP_ACCUM[el].HW[2];
}
}
}
}
}
void RSP_Vector_VMACF (void) {
int count, el, del;
//UWORD32 temp, temp2;
UWORD32 temp;
for (count = 0; count < 8; count ++ ) {
el = Indx[RSPOpC.rs].B[count];
del = EleSpec[RSPOpC.rs].B[el];
/*temp.W = (long)RSP_Vect[RSPOpC.rd].HW[el] * (long)(DWORD)RSP_Vect[RSPOpC.rt].HW[del];
RSP_ACCUM[el].UHW[3] += (WORD)(temp.W >> 31);
temp.UW = temp.UW << 1;
temp2.UW = temp.UHW[0] + RSP_ACCUM[el].UHW[1];
RSP_ACCUM[el].HW[1] = temp2.HW[0];
temp2.UW = temp.UHW[1] + RSP_ACCUM[el].UHW[2] + temp2.UHW[1];
RSP_ACCUM[el].HW[2] = temp2.HW[0];
RSP_ACCUM[el].HW[3] += temp2.HW[1];*/
temp.W = (long)RSP_Vect[RSPOpC.rd].HW[el] * (long)(DWORD)RSP_Vect[RSPOpC.rt].HW[del];
RSP_ACCUM[el].DW += ((__int64)temp.W) << 17;
if (RSP_ACCUM[el].HW[3] < 0) {
if (RSP_ACCUM[el].UHW[3] != 0xFFFF) {
RSP_Vect[RSPOpC.sa].HW[el] = (WORD)0x8000;
} else {
if (RSP_ACCUM[el].HW[2] >= 0) {
RSP_Vect[RSPOpC.sa].HW[el] = (WORD)0x8000;
} else {
RSP_Vect[RSPOpC.sa].HW[el] = RSP_ACCUM[el].HW[2];
}
}
} else {
if (RSP_ACCUM[el].UHW[3] != 0) {
RSP_Vect[RSPOpC.sa].HW[el] = 0x7FFF;
} else {
if (RSP_ACCUM[el].HW[2] < 0) {
RSP_Vect[RSPOpC.sa].HW[el] = 0x7FFF;
} else {
RSP_Vect[RSPOpC.sa].HW[el] = RSP_ACCUM[el].HW[2];
}
}
}
}
}
void RSP_Vector_VMACU (void) {
int count, el, del;
UWORD32 temp, temp2;
for (count = 0; count < 8; count ++ ) {
el = Indx[RSPOpC.rs].B[count];
del = EleSpec[RSPOpC.rs].B[el];
temp.W = (long)RSP_Vect[RSPOpC.rd].HW[el] * (long)(DWORD)RSP_Vect[RSPOpC.rt].HW[del];
RSP_ACCUM[el].UHW[3] += (WORD)(temp.W >> 31);
temp.UW = temp.UW << 1;
temp2.UW = temp.UHW[0] + RSP_ACCUM[el].UHW[1];
RSP_ACCUM[el].HW[1] = temp2.HW[0];
temp2.UW = temp.UHW[1] + RSP_ACCUM[el].UHW[2] + temp2.UHW[1];
RSP_ACCUM[el].HW[2] = temp2.HW[0];
RSP_ACCUM[el].HW[3] += temp2.HW[1];
if (RSP_ACCUM[el].HW[3] < 0) {
RSP_Vect[RSPOpC.sa].HW[el] = 0;
} else {
if (RSP_ACCUM[el].UHW[3] != 0) {
RSP_Vect[RSPOpC.sa].UHW[el] = 0xFFFF;
} else {
if (RSP_ACCUM[el].HW[2] < 0) {
RSP_Vect[RSPOpC.sa].UHW[el] = 0xFFFF;
} else {
RSP_Vect[RSPOpC.sa].HW[el] = RSP_ACCUM[el].HW[2];
}
}
}
}
}
void RSP_Vector_VMACQ (void) {
int count, el, del;
UWORD32 temp;
for (count = 0; count < 8; count ++ ) {
el = Indx[RSPOpC.rs].B[count];
del = EleSpec[RSPOpC.rs].B[el];
if (RSP_ACCUM[el].W[1] > 0x20) {
if ((RSP_ACCUM[el].W[1] & 0x20) == 0) {
RSP_ACCUM[el].W[1] -= 0x20;
}
} else if (RSP_ACCUM[el].W[1] < -0x20) {
if ((RSP_ACCUM[el].W[1] & 0x20) == 0) {
RSP_ACCUM[el].W[1] += 0x20;
}
}
temp.W = RSP_ACCUM[el].W[1] >> 1;
if (temp.HW[1] < 0) {
if (temp.UHW[1] != 0xFFFF) {
RSP_Vect[RSPOpC.sa].HW[el] = (WORD)0x8000;
} else {
if (temp.HW[0] >= 0) {
RSP_Vect[RSPOpC.sa].HW[el] = (WORD)0x8000;
} else {
RSP_Vect[RSPOpC.sa].HW[el] = (WORD)(temp.UW & 0xFFF0);
}
}
} else {
if (temp.UHW[1] != 0) {
RSP_Vect[RSPOpC.sa].HW[el] = 0x7FF0;
} else {
if (temp.HW[0] < 0) {
RSP_Vect[RSPOpC.sa].HW[el] = 0x7FF0;
} else {
RSP_Vect[RSPOpC.sa].HW[el] = (WORD)(temp.UW & 0xFFF0);
}
}
}
}
}
void RSP_Vector_VMADL (void) {
int count, el, del;
UWORD32 temp, temp2;
for (count = 0; count < 8; count ++ ) {
el = Indx[RSPOpC.rs].B[count];
del = EleSpec[RSPOpC.rs].B[el];
temp.UW = (DWORD)RSP_Vect[RSPOpC.rd].UHW[el] * (DWORD)RSP_Vect[RSPOpC.rt].UHW[del];
temp2.UW = temp.UHW[1] + RSP_ACCUM[el].UHW[1];
RSP_ACCUM[el].HW[1] = temp2.HW[0];
temp2.UW = RSP_ACCUM[el].UHW[2] + temp2.UHW[1];
RSP_ACCUM[el].HW[2] = temp2.HW[0];
RSP_ACCUM[el].HW[3] += temp2.HW[1];
if (RSP_ACCUM[el].HW[3] < 0) {
if (RSP_ACCUM[el].UHW[3] != 0xFFFF) {
RSP_Vect[RSPOpC.sa].HW[el] = 0;
} else {
if (RSP_ACCUM[el].HW[2] >= 0) {
RSP_Vect[RSPOpC.sa].HW[el] = 0;
} else {
RSP_Vect[RSPOpC.sa].HW[el] = RSP_ACCUM[el].HW[1];
}
}
} else {
if (RSP_ACCUM[el].UHW[3] != 0) {
RSP_Vect[RSPOpC.sa].UHW[el] = 0xFFFF;
} else {
if (RSP_ACCUM[el].HW[2] < 0) {
RSP_Vect[RSPOpC.sa].UHW[el] = 0xFFFF;
} else {
RSP_Vect[RSPOpC.sa].HW[el] = RSP_ACCUM[el].HW[1];
}
}
}
}
}
void RSP_Vector_VMADM (void) {
int count, el, del;
UWORD32 temp, temp2;
for (count = 0; count < 8; count ++ ) {
el = Indx[RSPOpC.rs].B[count];
del = EleSpec[RSPOpC.rs].B[el];
temp.UW = (DWORD)((long)RSP_Vect[RSPOpC.rd].HW[el]) * (DWORD)RSP_Vect[RSPOpC.rt].UHW[del];
temp2.UW = temp.UHW[0] + RSP_ACCUM[el].UHW[1];
RSP_ACCUM[el].HW[1] = temp2.HW[0];
temp2.UW = temp.UHW[1] + RSP_ACCUM[el].UHW[2] + temp2.UHW[1];
RSP_ACCUM[el].HW[2] = temp2.HW[0];
RSP_ACCUM[el].HW[3] += temp2.HW[1];
if (temp.W < 0) {
RSP_ACCUM[el].HW[3] -= 1;
}
if (RSP_ACCUM[el].HW[3] < 0) {
if (RSP_ACCUM[el].UHW[3] != 0xFFFF) {
RSP_Vect[RSPOpC.sa].HW[el] = (WORD)0x8000;
} else {
if (RSP_ACCUM[el].HW[2] >= 0) {
RSP_Vect[RSPOpC.sa].HW[el] = (WORD)0x8000;
} else {
RSP_Vect[RSPOpC.sa].HW[el] = RSP_ACCUM[el].HW[2];
}
}
} else {
if (RSP_ACCUM[el].UHW[3] != 0) {
RSP_Vect[RSPOpC.sa].HW[el] = 0x7FFF;
} else {
if (RSP_ACCUM[el].HW[2] < 0) {
RSP_Vect[RSPOpC.sa].HW[el] = 0x7FFF;
} else {
RSP_Vect[RSPOpC.sa].HW[el] = RSP_ACCUM[el].HW[2];
}
}
}
//RSP_Vect[RSPOpC.sa].HW[el] = RSP_ACCUM[el].HW[2];
}
}
void RSP_Vector_VMADN (void) {
int count, el, del;
UWORD32 temp, temp2;
for (count = 0; count < 8; count ++ ) {
el = Indx[RSPOpC.rs].B[count];
del = EleSpec[RSPOpC.rs].B[el];
temp.UW = (DWORD)RSP_Vect[RSPOpC.rd].UHW[el] * (DWORD)((long)RSP_Vect[RSPOpC.rt].HW[del]);
temp2.UW = temp.UHW[0] + RSP_ACCUM[el].UHW[1];
RSP_ACCUM[el].HW[1] = temp2.HW[0];
temp2.UW = temp.UHW[1] + RSP_ACCUM[el].UHW[2] + temp2.UHW[1];
RSP_ACCUM[el].HW[2] = temp2.HW[0];
RSP_ACCUM[el].HW[3] += temp2.HW[1];
if (temp.W < 0) {
RSP_ACCUM[el].HW[3] -= 1;
}
if (RSP_ACCUM[el].HW[3] < 0) {
if (RSP_ACCUM[el].UHW[3] != 0xFFFF) {
RSP_Vect[RSPOpC.sa].HW[el] = 0;
} else {
if (RSP_ACCUM[el].HW[2] >= 0) {
RSP_Vect[RSPOpC.sa].HW[el] = 0;
} else {
RSP_Vect[RSPOpC.sa].HW[el] = RSP_ACCUM[el].HW[1];
}
}
} else {
if (RSP_ACCUM[el].UHW[3] != 0) {
RSP_Vect[RSPOpC.sa].UHW[el] = 0xFFFF;
} else {
if (RSP_ACCUM[el].HW[2] < 0) {
RSP_Vect[RSPOpC.sa].UHW[el] = 0xFFFF;
} else {
RSP_Vect[RSPOpC.sa].HW[el] = RSP_ACCUM[el].HW[1];
}
}
}
}
}
void RSP_Vector_VMADH (void) {
int count, el, del;
for (count = 0; count < 8; count ++ ) {
el = Indx[RSPOpC.rs].B[count];
del = EleSpec[RSPOpC.rs].B[el];
RSP_ACCUM[el].W[1] += (long)RSP_Vect[RSPOpC.rd].HW[el] * (long)RSP_Vect[RSPOpC.rt].HW[del];
if (RSP_ACCUM[el].HW[3] < 0) {
if (RSP_ACCUM[el].UHW[3] != 0xFFFF) {
RSP_Vect[RSPOpC.sa].HW[el] = (WORD)0x8000;
} else {
if (RSP_ACCUM[el].HW[2] >= 0) {
RSP_Vect[RSPOpC.sa].HW[el] = (WORD)0x8000;
} else {
RSP_Vect[RSPOpC.sa].HW[el] = RSP_ACCUM[el].HW[2];
}
}
} else {
if (RSP_ACCUM[el].UHW[3] != 0) {
RSP_Vect[RSPOpC.sa].HW[el] = 0x7FFF;
} else {
if (RSP_ACCUM[el].HW[2] < 0) {
RSP_Vect[RSPOpC.sa].HW[el] = 0x7FFF;
} else {
RSP_Vect[RSPOpC.sa].HW[el] = RSP_ACCUM[el].HW[2];
}
}
}
}
}
void RSP_Vector_VADD (void) {
int count, el, del;
UWORD32 temp;
for ( count = 0; count < 8; count++ ) {
el = Indx[RSPOpC.rs].B[count];
del = EleSpec[RSPOpC.rs].B[el];
temp.W = (int)RSP_Vect[RSPOpC.rd].HW[el] + (int)RSP_Vect[RSPOpC.rt].HW[del] +
((RSP_Flags[0].UW >> (7 - el)) & 0x1);
RSP_ACCUM[el].HW[1] = temp.HW[0];
if ((temp.HW[0] & 0x8000) == 0) {
if (temp.HW[1] != 0) {
RSP_Vect[RSPOpC.sa].HW[el] = (WORD)0x8000;
} else {
RSP_Vect[RSPOpC.sa].HW[el] = temp.HW[0];
}
} else {
if (temp.HW[1] != -1 ) {
RSP_Vect[RSPOpC.sa].HW[el] = 0x7FFF;
} else {
RSP_Vect[RSPOpC.sa].HW[el] = temp.HW[0];
}
}
}
RSP_Flags[0].UW = 0;
}
void RSP_Vector_VSUB (void) {
int count, el, del;
UWORD32 temp;
for ( count = 0; count < 8; count++ ) {
el = Indx[RSPOpC.rs].B[count];
del = EleSpec[RSPOpC.rs].B[el];
temp.W = (int)RSP_Vect[RSPOpC.rd].HW[el] - (int)RSP_Vect[RSPOpC.rt].HW[del] -
((RSP_Flags[0].UW >> (7 - el)) & 0x1);
RSP_ACCUM[el].HW[1] = temp.HW[0];
if ((temp.HW[0] & 0x8000) == 0) {
if (temp.HW[1] != 0) {
RSP_Vect[RSPOpC.sa].HW[el] = (WORD)0x8000;
} else {
RSP_Vect[RSPOpC.sa].HW[el] = temp.HW[0];
}
} else {
if (temp.HW[1] != -1 ) {
RSP_Vect[RSPOpC.sa].HW[el] = 0x7FFF;
} else {
RSP_Vect[RSPOpC.sa].HW[el] = temp.HW[0];
}
}
}
RSP_Flags[0].UW = 0;
}
void RSP_Vector_VABS (void) {
int count, el, del;
for ( count = 0; count < 8; count++ ) {
el = Indx[RSPOpC.rs].B[count];
del = EleSpec[RSPOpC.rs].B[el];
if (RSP_Vect[RSPOpC.rd].HW[el] > 0) {
RSP_Vect[RSPOpC.sa].HW[el] = RSP_Vect[RSPOpC.rt].UHW[del];
} else if (RSP_Vect[RSPOpC.rd].HW[el] < 0) {
if (RSP_Vect[RSPOpC.rt].UHW[EleSpec[RSPOpC.rs].B[el]] == 0x8000) {
RSP_Vect[RSPOpC.sa].HW[el] = 0x7FFF;
} else {
RSP_Vect[RSPOpC.sa].HW[el] = RSP_Vect[RSPOpC.rt].HW[del] * -1;
}
} else {
RSP_Vect[RSPOpC.sa].HW[el] = 0;
}
RSP_ACCUM[el].HW[1] = RSP_Vect[RSPOpC.sa].HW[el];
}
}
void RSP_Vector_VADDC (void) {
int count, el, del;
UWORD32 temp;
RSP_Flags[0].UW = 0;
for ( count = 0; count < 8; count++ ) {
el = Indx[RSPOpC.rs].B[count];
del = EleSpec[RSPOpC.rs].B[el];
temp.UW = (int)RSP_Vect[RSPOpC.rd].UHW[el] + (int)RSP_Vect[RSPOpC.rt].UHW[del];
RSP_ACCUM[el].HW[1] = temp.HW[0];
RSP_Vect[RSPOpC.sa].HW[el] = temp.HW[0];
if (temp.UW & 0xffff0000) {
RSP_Flags[0].UW |= ( 1 << (7 - el) );
}
}
}
void RSP_Vector_VSUBC (void) {
int count, el, del;
UWORD32 temp;
RSP_Flags[0].UW = 0x0;
for ( count = 0; count < 8; count++ ) {
el = Indx[RSPOpC.rs].B[count];
del = EleSpec[RSPOpC.rs].B[el];
temp.UW = (int)RSP_Vect[RSPOpC.rd].UHW[el] - (int)RSP_Vect[RSPOpC.rt].UHW[del];
RSP_ACCUM[el].HW[1] = temp.HW[0];
RSP_Vect[RSPOpC.sa].HW[el] = temp.HW[0];
if (temp.HW[0] != 0) {
RSP_Flags[0].UW |= ( 0x1 << (15 - el) );
}
if (temp.UW & 0xffff0000) {
RSP_Flags[0].UW |= ( 0x1 << (7 - el) );
}
}
}
void RSP_Vector_VSAW (void) {
switch ((RSPOpC.rs & 0xF)) {
case 8:
RSP_Vect[RSPOpC.sa].HW[0] = RSP_ACCUM[0].HW[3];
RSP_Vect[RSPOpC.sa].HW[1] = RSP_ACCUM[1].HW[3];
RSP_Vect[RSPOpC.sa].HW[2] = RSP_ACCUM[2].HW[3];
RSP_Vect[RSPOpC.sa].HW[3] = RSP_ACCUM[3].HW[3];
RSP_Vect[RSPOpC.sa].HW[4] = RSP_ACCUM[4].HW[3];
RSP_Vect[RSPOpC.sa].HW[5] = RSP_ACCUM[5].HW[3];
RSP_Vect[RSPOpC.sa].HW[6] = RSP_ACCUM[6].HW[3];
RSP_Vect[RSPOpC.sa].HW[7] = RSP_ACCUM[7].HW[3];
break;
case 9:
RSP_Vect[RSPOpC.sa].HW[0] = RSP_ACCUM[0].HW[2];
RSP_Vect[RSPOpC.sa].HW[1] = RSP_ACCUM[1].HW[2];
RSP_Vect[RSPOpC.sa].HW[2] = RSP_ACCUM[2].HW[2];
RSP_Vect[RSPOpC.sa].HW[3] = RSP_ACCUM[3].HW[2];
RSP_Vect[RSPOpC.sa].HW[4] = RSP_ACCUM[4].HW[2];
RSP_Vect[RSPOpC.sa].HW[5] = RSP_ACCUM[5].HW[2];
RSP_Vect[RSPOpC.sa].HW[6] = RSP_ACCUM[6].HW[2];
RSP_Vect[RSPOpC.sa].HW[7] = RSP_ACCUM[7].HW[2];
break;
case 10:
RSP_Vect[RSPOpC.sa].HW[0] = RSP_ACCUM[0].HW[1];
RSP_Vect[RSPOpC.sa].HW[1] = RSP_ACCUM[1].HW[1];
RSP_Vect[RSPOpC.sa].HW[2] = RSP_ACCUM[2].HW[1];
RSP_Vect[RSPOpC.sa].HW[3] = RSP_ACCUM[3].HW[1];
RSP_Vect[RSPOpC.sa].HW[4] = RSP_ACCUM[4].HW[1];
RSP_Vect[RSPOpC.sa].HW[5] = RSP_ACCUM[5].HW[1];
RSP_Vect[RSPOpC.sa].HW[6] = RSP_ACCUM[6].HW[1];
RSP_Vect[RSPOpC.sa].HW[7] = RSP_ACCUM[7].HW[1];
break;
default:
RSP_Vect[RSPOpC.sa].DW[1] = 0;
RSP_Vect[RSPOpC.sa].DW[0] = 0;
}
}
void RSP_Vector_VLT (void) {
int count, el, del;
RSP_Flags[1].UW = 0;
for ( count = 0; count < 8; count++ ) {
el = Indx[RSPOpC.rs].B[count];
del = EleSpec[RSPOpC.rs].B[el];
if (RSP_Vect[RSPOpC.rd].HW[el] < RSP_Vect[RSPOpC.rt].HW[del]) {
RSP_Vect[RSPOpC.sa].HW[el] = RSP_Vect[RSPOpC.rd].UHW[el];
RSP_Flags[1].UW |= ( 1 << (7 - el) );
} else if (RSP_Vect[RSPOpC.rd].HW[el] != RSP_Vect[RSPOpC.rt].HW[del]) {
RSP_Vect[RSPOpC.sa].HW[el] = RSP_Vect[RSPOpC.rt].UHW[del];
RSP_Flags[1].UW &= ~( 1 << (7 - el) );
} else {
RSP_Vect[RSPOpC.sa].HW[el] = RSP_Vect[RSPOpC.rd].UHW[el];
if ( (RSP_Flags[0].UW & (0x101 << (7 - el))) == (WORD)(0x101 << (7 - el))) {
RSP_Flags[1].UW |= ( 1 << (7 - el) );
} else {
RSP_Flags[1].UW &= ~( 1 << (7 - el) );
}
}
RSP_ACCUM[el].HW[1] = RSP_Vect[RSPOpC.sa].HW[el];
}
RSP_Flags[0].UW = 0;
}
void RSP_Vector_VEQ (void) {
int count, el, del;
RSP_Flags[1].UW = 0;
for ( count = 0; count < 8; count++ ) {
el = Indx[RSPOpC.rs].B[count];
del = EleSpec[RSPOpC.rs].B[el];
if (RSP_Vect[RSPOpC.rd].UHW[el] == RSP_Vect[RSPOpC.rt].UHW[del]) {
if ( (RSP_Flags[0].UW & (1 << (15 - el))) == 0) {
RSP_Flags[1].UW |= ( 1 << (7 - el));
}
}
RSP_Vect[RSPOpC.sa].HW[el] = RSP_Vect[RSPOpC.rt].UHW[del];
RSP_ACCUM[el].HW[1] = RSP_Vect[RSPOpC.rt].UHW[del];
}
RSP_Flags[0].UW = 0;
}
void RSP_Vector_VNE (void) {
int count, el, del;
RSP_Flags[1].UW = 0;
for ( count = 0; count < 8; count++ ) {
el = Indx[RSPOpC.rs].B[count];
del = EleSpec[RSPOpC.rs].B[el];
if (RSP_Vect[RSPOpC.rd].UHW[el] != RSP_Vect[RSPOpC.rt].UHW[del]) {
RSP_Flags[1].UW |= ( 1 << (7 - el) );
} else {
if ( (RSP_Flags[0].UW & (1 << (15 - el))) != 0) {
RSP_Flags[1].UW |= ( 1 << (7 - el) );
}
}
RSP_Vect[RSPOpC.sa].HW[el] = RSP_Vect[RSPOpC.rd].UHW[el];
RSP_ACCUM[el].HW[1] = RSP_Vect[RSPOpC.rd].UHW[el];
}
RSP_Flags[0].UW = 0;
}
void RSP_Vector_VGE (void) {
int count, el, del;
RSP_Flags[1].UW = 0;
for ( count = 0; count < 8; count++ ) {
el = Indx[RSPOpC.rs].B[count];
del = EleSpec[RSPOpC.rs].B[el];
if (RSP_Vect[RSPOpC.rd].HW[el] == RSP_Vect[RSPOpC.rt].HW[del]) {
RSP_Vect[RSPOpC.sa].HW[el] = RSP_Vect[RSPOpC.rd].UHW[el];
if ( (RSP_Flags[0].UW & (0x101 << (7 - el))) == (WORD)(0x101 << (7 - el))) {
RSP_Flags[1].UW &= ~( 1 << (7 - el) );
} else {
RSP_Flags[1].UW |= ( 1 << (7 - el) );
}
} else if (RSP_Vect[RSPOpC.rd].HW[el] > RSP_Vect[RSPOpC.rt].HW[del]) {
RSP_Vect[RSPOpC.sa].HW[el] = RSP_Vect[RSPOpC.rd].UHW[el];
RSP_Flags[1].UW |= ( 1 << (7 - el) );
} else {
RSP_Vect[RSPOpC.sa].HW[el] = RSP_Vect[RSPOpC.rt].UHW[del];
RSP_Flags[1].UW &= ~( 1 << (7 - el) );
}
RSP_ACCUM[el].HW[1] = RSP_Vect[RSPOpC.sa].HW[el];
}
RSP_Flags[0].UW = 0;
}
/*void RSP_Vector_VCL (void) {
int count, el, del;
for ( count = 0; count < 8; count++ ) {
el = Indx[RSPOpC.rs].B[count];
del = EleSpec[RSPOpC.rs].B[el];
if ((RSP_Flags[0].UW & ( 1 << (7 - el))) != 0 ) {
if ((RSP_Flags[0].UW & ( 1 << (15 - el))) != 0 ) {
if ((RSP_Flags[1].UW & ( 1 << (7 - el))) != 0 ) {
RSP_Vect[RSPOpC.sa].HW[el] = -RSP_Vect[RSPOpC.rt].UHW[del];
} else {
RSP_Vect[RSPOpC.sa].HW[el] = RSP_Vect[RSPOpC.rd].HW[el];
}
} else {
if ((RSP_Flags[2].UW & ( 1 << (7 - el)))) {
if (RSP_Vect[RSPOpC.rt].HW[del] == 0){
RSP_Vect[RSPOpC.sa].HW[el] = -RSP_Vect[RSPOpC.rt].UHW[del];
RSP_Flags[1].UW |= (1 << (7 - el));
} else if ((WORD)(-RSP_Vect[RSPOpC.rt].HW[del]) >= RSP_Vect[RSPOpC.rd].UHW[el]) {
RSP_Vect[RSPOpC.sa].HW[el] = -RSP_Vect[RSPOpC.rt].UHW[del];
RSP_Flags[1].UW |= (1 << (7 - el));
} else {
RSP_Vect[RSPOpC.sa].HW[el] = RSP_Vect[RSPOpC.rd].HW[el];
RSP_Flags[1].UW &= ~(1 << (7 - el));
}
} else {
if (RSP_Vect[RSPOpC.rt].HW[del] == 0 && RSP_Vect[RSPOpC.rd].UHW[el] == 0) {
RSP_Flags[1].UW |= (1 << (7 - el));
} else {
RSP_Flags[1].UW &= ~(1 << (7 - el));
}
RSP_Vect[RSPOpC.sa].HW[el] = RSP_Vect[RSPOpC.rd].HW[el];
}
}
} else {
if ((RSP_Flags[0].UW & ( 1 << (15 - el))) != 0 ) {
if ((RSP_Flags[1].UW & ( 1 << (15 - el))) != 0 ) {
RSP_Vect[RSPOpC.sa].HW[el] = RSP_Vect[RSPOpC.rt].UHW[del];
} else {
RSP_Vect[RSPOpC.sa].HW[el] = RSP_Vect[RSPOpC.rd].HW[el];
}
} else {
if ( RSP_Vect[RSPOpC.rd].UHW[el] >= RSP_Vect[RSPOpC.rt].UHW[del]) {
RSP_Vect[RSPOpC.sa].HW[el] = RSP_Vect[RSPOpC.rt].UHW[del];
RSP_Flags[1].UW |= (1 << (15 - el));
} else {
RSP_Vect[RSPOpC.sa].HW[el] = RSP_Vect[RSPOpC.rd].HW[el];
RSP_Flags[1].UW &= ~(1 << (15 - el));
}
}
}
RSP_ACCUM[el].HW[1] = RSP_Vect[RSPOpC.sa].HW[el];
}
RSP_Flags[0].UW = 0;
RSP_Flags[2].UW = 0;
}
void RSP_Vector_VCH (void) {
int count, el, del;
RSP_Flags[0].UW = 0;
RSP_Flags[1].UW = 0;
RSP_Flags[2].UW = 0;
for ( count = 0; count < 8; count++ ) {
el = Indx[RSPOpC.rs].B[count];
del = EleSpec[RSPOpC.rs].B[el];
if (abs(RSP_Vect[RSPOpC.rd].HW[el]) != abs(RSP_Vect[RSPOpC.rt].HW[del])) {
if (RSP_Vect[RSPOpC.rd].HW[el] == ~RSP_Vect[RSPOpC.rt].HW[del]) {
RSP_Flags[2].UW |= ( 1 << (7 - el) );
} else {
RSP_Flags[0].UW |= ( 1 << (15 - el));
}
}
if (RSP_Vect[RSPOpC.rd].HW[el] < 0) {
if (RSP_Vect[RSPOpC.rt].HW[del] >= 0) {
if (RSP_Vect[RSPOpC.rd].HW[el] > -RSP_Vect[RSPOpC.rt].HW[del]) {
RSP_Vect[RSPOpC.sa].HW[el] = RSP_Vect[RSPOpC.rd].HW[el];
} else {
RSP_Vect[RSPOpC.sa].HW[el] = -RSP_Vect[RSPOpC.rt].UHW[del];
}
RSP_Flags[0].UW |= ( 1 << (7 - el));
} else {
if (RSP_Vect[RSPOpC.rd].HW[el] < RSP_Vect[RSPOpC.rt].HW[del]) {
RSP_Vect[RSPOpC.sa].HW[el] = RSP_Vect[RSPOpC.rd].HW[el];
} else {
RSP_Vect[RSPOpC.sa].HW[el] = RSP_Vect[RSPOpC.rt].UHW[del];
}
}
} else {
if (RSP_Vect[RSPOpC.rt].HW[del] < 0) {
if (RSP_Vect[RSPOpC.rd].HW[el] > -RSP_Vect[RSPOpC.rt].HW[del]) {
RSP_Vect[RSPOpC.sa].HW[el] = RSP_Vect[RSPOpC.rd].HW[el];
} else {
RSP_Vect[RSPOpC.sa].HW[el] = -RSP_Vect[RSPOpC.rt].UHW[del];
}
RSP_Flags[0].UW |= ( 1 << (7 - el));
} else {
if (RSP_Vect[RSPOpC.rd].HW[el] < RSP_Vect[RSPOpC.rt].HW[del]) {
RSP_Vect[RSPOpC.sa].HW[el] = RSP_Vect[RSPOpC.rd].HW[el];
} else {
RSP_Vect[RSPOpC.sa].HW[el] = RSP_Vect[RSPOpC.rt].UHW[del];
}
}
}
if (RSP_Vect[RSPOpC.rd].HW[el] >= RSP_Vect[RSPOpC.rt].HW[del]) {
RSP_Flags[1].UW |= ( 1 << (15 - el));
}
if (RSP_Vect[RSPOpC.rd].HW[el] <= -RSP_Vect[RSPOpC.rt].HW[del]) {
if (RSP_Vect[RSPOpC.rd].HW[el] != 0 || RSP_Vect[RSPOpC.rt].HW[del] != 0) {
RSP_Flags[1].UW |= ( 1 << (7 - el));
}
}
RSP_ACCUM[el].HW[1] = RSP_Vect[RSPOpC.sa].HW[el];
}
}
void RSP_Vector_VCR (void) {
int count, el, del;
for ( count = 0; count < 8; count++ ) {
el = Indx[RSPOpC.rs].B[count];
del = EleSpec[RSPOpC.rs].B[el];
if (RSP_Vect[RSPOpC.rd].HW[el] < RSP_Vect[RSPOpC.rt].HW[del]) {
RSP_Flags[1].UW &= ~( 1 << (15 - el));
} else {
RSP_Flags[1].UW |= ( 1 << (15 - el));
}
if (RSP_Vect[RSPOpC.rd].HW[el] + RSP_Vect[RSPOpC.rt].HW[del] < 0) {
RSP_Flags[1].UW |= ( 1 << (7 - el));
} else {
RSP_Flags[1].UW &= ~( 1 << (7 - el));
}
if (RSP_Vect[RSPOpC.rd].HW[el] >= 0) {
if (RSP_Vect[RSPOpC.rt].HW[del] >= 0) {
if (RSP_Vect[RSPOpC.rd].HW[el] < RSP_Vect[RSPOpC.rt].HW[del]) {
RSP_Vect[RSPOpC.sa].HW[el] = RSP_Vect[RSPOpC.rd].HW[el];
} else {
RSP_Vect[RSPOpC.sa].HW[el] = RSP_Vect[RSPOpC.rt].UHW[del];
}
} else {
if (RSP_Vect[RSPOpC.rd].HW[el] + RSP_Vect[RSPOpC.rt].HW[del] < 0) {
RSP_Vect[RSPOpC.sa].HW[el] = ~RSP_Vect[RSPOpC.rt].UHW[del];
} else {
RSP_Vect[RSPOpC.sa].HW[el] = RSP_Vect[RSPOpC.rd].HW[el];
}
}
} else {
if (RSP_Vect[RSPOpC.rt].HW[del] < 0) {
if (RSP_Vect[RSPOpC.rd].HW[el] < RSP_Vect[RSPOpC.rt].HW[del]) {
RSP_Vect[RSPOpC.sa].HW[el] = RSP_Vect[RSPOpC.rd].HW[el];
} else {
RSP_Vect[RSPOpC.sa].HW[el] = RSP_Vect[RSPOpC.rt].UHW[del];
}
} else {
if (RSP_Vect[RSPOpC.rd].HW[el] + RSP_Vect[RSPOpC.rt].HW[del] < 0) {
RSP_Vect[RSPOpC.sa].HW[el] = ~RSP_Vect[RSPOpC.rt].UHW[del];
} else {
RSP_Vect[RSPOpC.sa].HW[el] = RSP_Vect[RSPOpC.rd].HW[el];
}
}
}
RSP_ACCUM[el].HW[1] = RSP_Vect[RSPOpC.sa].HW[el];
}
RSP_Flags[0].UW = 0;
RSP_Flags[2].UW = 0;
}*/
void RSP_Vector_VCL (void) {
int count, el, del;
for (count = 0;count < 8; count++) {
el = Indx[RSPOpC.rs].B[count];
del = EleSpec[RSPOpC.rs].B[el];
if ((RSP_Flags[0].UW & ( 1 << (7 - el))) != 0 ) {
if ((RSP_Flags[0].UW & ( 1 << (15 - el))) != 0 ) {
if ((RSP_Flags[1].UW & ( 1 << (7 - el))) != 0 ) {
RSP_ACCUM[el].HW[1] = -RSP_Vect[RSPOpC.rt].UHW[del];
} else {
RSP_ACCUM[el].HW[1] = RSP_Vect[RSPOpC.rd].HW[el];
}
} else {
if ((RSP_Flags[2].UW & ( 1 << (7 - el)))) {
if ( RSP_Vect[RSPOpC.rd].UHW[el] + RSP_Vect[RSPOpC.rt].UHW[del] > 0x10000) {
RSP_ACCUM[el].HW[1] = RSP_Vect[RSPOpC.rd].HW[el];
RSP_Flags[1].UW &= ~(1 << (7 - el));
} else {
RSP_ACCUM[el].HW[1] = -RSP_Vect[RSPOpC.rt].UHW[del];
RSP_Flags[1].UW |= (1 << (7 - el));
}
} else {
if (RSP_Vect[RSPOpC.rt].UHW[del] + RSP_Vect[RSPOpC.rd].UHW[el] != 0) {
RSP_ACCUM[el].HW[1] = RSP_Vect[RSPOpC.rd].HW[el];
RSP_Flags[1].UW &= ~(1 << (7 - el));
} else {
RSP_ACCUM[el].HW[1] = -RSP_Vect[RSPOpC.rt].UHW[del];
RSP_Flags[1].UW |= (1 << (7 - el));
}
}
}
} else {
if ((RSP_Flags[0].UW & ( 1 << (15 - el))) != 0 ) {
if ((RSP_Flags[1].UW & ( 1 << (15 - el))) != 0 ) {
RSP_ACCUM[el].HW[1] = RSP_Vect[RSPOpC.rt].HW[del];
} else {
RSP_ACCUM[el].HW[1] = RSP_Vect[RSPOpC.rd].HW[el];
}
} else {
if ( RSP_Vect[RSPOpC.rd].UHW[el] - RSP_Vect[RSPOpC.rt].UHW[del] >= 0) {
RSP_ACCUM[el].HW[1] = RSP_Vect[RSPOpC.rt].UHW[del];
RSP_Flags[1].UW |= (1 << (15 - el));
} else {
RSP_ACCUM[el].HW[1] = RSP_Vect[RSPOpC.rd].HW[el];
RSP_Flags[1].UW &= ~(1 << (15 - el));
}
}
}
RSP_Vect[RSPOpC.sa].HW[el] = RSP_ACCUM[el].HW[1];
}
RSP_Flags[0].UW = 0;
RSP_Flags[2].UW = 0;
}
void RSP_Vector_VCH (void) {
int count, el, del;
RSP_Flags[0].UW = 0;
RSP_Flags[1].UW = 0;
RSP_Flags[2].UW = 0;
for (count = 0;count < 8; count++) {
el = Indx[RSPOpC.rs].B[count];
del = EleSpec[RSPOpC.rs].B[el];
if ((RSP_Vect[RSPOpC.rd].HW[el] ^ RSP_Vect[RSPOpC.rt].HW[del]) < 0) {
RSP_Flags[0].UW |= ( 1 << (7 - el));
if (RSP_Vect[RSPOpC.rt].HW[del] < 0) {
RSP_Flags[1].UW |= ( 1 << (15 - el));
}
if (RSP_Vect[RSPOpC.rd].HW[el] + RSP_Vect[RSPOpC.rt].HW[del] <= 0) {
if (RSP_Vect[RSPOpC.rd].HW[el] + RSP_Vect[RSPOpC.rt].HW[del] == -1) {
RSP_Flags[2].UW |= ( 1 << (7 - el));
}
RSP_Flags[1].UW |= ( 1 << (7 - el));
RSP_ACCUM[el].HW[1] = -RSP_Vect[RSPOpC.rt].UHW[del];
} else {
RSP_ACCUM[el].HW[1] = RSP_Vect[RSPOpC.rd].HW[el];
}
if (RSP_Vect[RSPOpC.rd].HW[el] + RSP_Vect[RSPOpC.rt].HW[del] != 0) {
if (RSP_Vect[RSPOpC.rd].HW[el] != ~RSP_Vect[RSPOpC.rt].HW[del]) {
RSP_Flags[0].UW |= ( 1 << (15 - el));
}
}
} else {
if (RSP_Vect[RSPOpC.rt].HW[del] < 0) {
RSP_Flags[1].UW |= ( 1 << (7 - el));
}
if (RSP_Vect[RSPOpC.rd].HW[el] - RSP_Vect[RSPOpC.rt].HW[del] >= 0) {
RSP_Flags[1].UW |= ( 1 << (15 - el));
RSP_ACCUM[el].HW[1] = RSP_Vect[RSPOpC.rt].UHW[del];
} else {
RSP_ACCUM[el].HW[1] = RSP_Vect[RSPOpC.rd].HW[el];
}
if (RSP_Vect[RSPOpC.rd].HW[el] - RSP_Vect[RSPOpC.rt].HW[del] != 0) {
if (RSP_Vect[RSPOpC.rd].HW[el] != ~RSP_Vect[RSPOpC.rt].HW[del]) {
RSP_Flags[0].UW |= ( 1 << (15 - el));
}
}
}
RSP_Vect[RSPOpC.sa].HW[el] = RSP_ACCUM[el].HW[1];
}
}
void RSP_Vector_VCR (void) {
int count, el, del;
RSP_Flags[0].UW = 0;
RSP_Flags[1].UW = 0;
RSP_Flags[2].UW = 0;
for (count = 0;count < 8; count++) {
el = Indx[RSPOpC.rs].B[count];
del = EleSpec[RSPOpC.rs].B[el];
if ((RSP_Vect[RSPOpC.rd].HW[el] ^ RSP_Vect[RSPOpC.rt].HW[del]) < 0) {
if (RSP_Vect[RSPOpC.rt].HW[del] < 0) {
RSP_Flags[1].UW |= ( 1 << (15 - el));
}
if (RSP_Vect[RSPOpC.rd].HW[el] + RSP_Vect[RSPOpC.rt].HW[del] <= 0) {
RSP_ACCUM[el].HW[1] = ~RSP_Vect[RSPOpC.rt].UHW[del];
RSP_Flags[1].UW |= ( 1 << (7 - el));
} else {
RSP_ACCUM[el].HW[1] = RSP_Vect[RSPOpC.rd].HW[el];
}
} else {
if (RSP_Vect[RSPOpC.rt].HW[del] < 0) {
RSP_Flags[1].UW |= ( 1 << (7 - el));
}
if (RSP_Vect[RSPOpC.rd].HW[el] - RSP_Vect[RSPOpC.rt].HW[del] >= 0) {
RSP_ACCUM[el].HW[1] = RSP_Vect[RSPOpC.rt].UHW[del];
RSP_Flags[1].UW |= ( 1 << (15 - el));
} else {
RSP_ACCUM[el].HW[1] = RSP_Vect[RSPOpC.rd].HW[el];
}
}
RSP_Vect[RSPOpC.sa].HW[el] = RSP_ACCUM[el].HW[1];
}
}
void RSP_Vector_VMRG (void) {
int count, el, del;
for ( count = 0; count < 8; count ++ ){
el = Indx[RSPOpC.rs].B[count];
del = EleSpec[RSPOpC.rs].B[el];
if ((RSP_Flags[1].UW & ( 1 << (7 - el))) != 0) {
RSP_Vect[RSPOpC.sa].HW[el] = RSP_Vect[RSPOpC.rd].HW[el];
} else {
RSP_Vect[RSPOpC.sa].HW[el] = RSP_Vect[RSPOpC.rt].HW[del];
}
RSP_ACCUM[el].HW[1] = RSP_Vect[RSPOpC.sa].HW[el]; //suggested by angrylion
}
}
void RSP_Vector_VAND (void) {
int count, el, del;
for ( count = 0; count < 8; count ++ ){
el = Indx[RSPOpC.rs].B[count];
del = EleSpec[RSPOpC.rs].B[el];
RSP_Vect[RSPOpC.sa].HW[el] = RSP_Vect[RSPOpC.rd].HW[el] & RSP_Vect[RSPOpC.rt].HW[del];
RSP_ACCUM[el].HW[1] = RSP_Vect[RSPOpC.sa].HW[el];
}
}
void RSP_Vector_VNAND (void) {
int count, el, del;
for ( count = 0; count < 8; count ++ ){
el = 7 - count;
del = EleSpec[RSPOpC.rs].B[el];
RSP_Vect[RSPOpC.sa].HW[el] = ~(RSP_Vect[RSPOpC.rd].HW[el] & RSP_Vect[RSPOpC.rt].HW[del]);
RSP_ACCUM[el].HW[1] = RSP_Vect[RSPOpC.sa].HW[el];
}
}
void RSP_Vector_VOR (void) {
int count, el, del;
for ( count = 0; count < 8; count ++ ){
el = Indx[RSPOpC.rs].B[count];
del = EleSpec[RSPOpC.rs].B[el];
RSP_Vect[RSPOpC.sa].HW[el] = RSP_Vect[RSPOpC.rd].HW[el] | RSP_Vect[RSPOpC.rt].HW[del];
RSP_ACCUM[el].HW[1] = RSP_Vect[RSPOpC.sa].HW[el];
}
}
void RSP_Vector_VNOR (void) {
int count, el, del;
for ( count = 0; count < 8; count ++ ){
el = Indx[RSPOpC.rs].B[count];
del = EleSpec[RSPOpC.rs].B[el];
RSP_Vect[RSPOpC.sa].HW[el] = ~(RSP_Vect[RSPOpC.rd].HW[el] | RSP_Vect[RSPOpC.rt].HW[del]);
RSP_ACCUM[el].HW[1] = RSP_Vect[RSPOpC.sa].HW[el];
}
}
void RSP_Vector_VXOR (void) {
int count, el, del;
for ( count = 0; count < 8; count ++ ){
el = Indx[RSPOpC.rs].B[count];
del = EleSpec[RSPOpC.rs].B[el];
RSP_Vect[RSPOpC.sa].HW[el] = RSP_Vect[RSPOpC.rd].HW[el] ^ RSP_Vect[RSPOpC.rt].HW[del];
RSP_ACCUM[el].HW[1] = RSP_Vect[RSPOpC.sa].HW[el];
}
}
void RSP_Vector_VNXOR (void) {
int count, el, del;
for ( count = 0; count < 8; count ++ ){
el = Indx[RSPOpC.rs].B[count];
del = EleSpec[RSPOpC.rs].B[el];
RSP_Vect[RSPOpC.sa].HW[el] = ~(RSP_Vect[RSPOpC.rd].HW[el] ^ RSP_Vect[RSPOpC.rt].HW[del]);
RSP_ACCUM[el].HW[1] = RSP_Vect[RSPOpC.sa].HW[el];
}
}
void RSP_Vector_VRCP (void) {
int count, neg;
RecpResult.W = RSP_Vect[RSPOpC.rt].HW[EleSpec[RSPOpC.rs].B[(RSPOpC.rd & 0x7)]];
if (RecpResult.UW == 0) {
RecpResult.UW = 0x7FFFFFFF;
} else {
if (RecpResult.W < 0) {
neg = TRUE;
RecpResult.W = ~RecpResult.W + 1;
} else {
neg = FALSE;
}
for (count = 15; count > 0; count--) {
if ((RecpResult.W & (1 << count))) {
RecpResult.W &= (0xFFC0 >> (15 - count) );
count = 0;
}
}
{
DWORD RoundMethod = _RC_CHOP;
DWORD OldModel = _controlfp(RoundMethod, _MCW_RC);
RecpResult.W = (long)((0x7FFFFFFF / (double)RecpResult.W));
OldModel = _controlfp(OldModel, _MCW_RC);
}
for (count = 31; count > 0; count--) {
if ((RecpResult.W & (1 << count))) {
RecpResult.W &= (0xFFFF8000 >> (31 - count) );
count = 0;
}
}
if (neg == TRUE) {
RecpResult.W = ~RecpResult.W;
}
}
for ( count = 0; count < 8; count++ ) {
RSP_ACCUM[count].HW[1] = RSP_Vect[RSPOpC.rt].UHW[EleSpec[RSPOpC.rs].B[count]];
}
RSP_Vect[RSPOpC.sa].HW[7 - (RSPOpC.rd & 0x7)] = RecpResult.UHW[0];
}
void RSP_Vector_VRCPL (void) {
int count, neg;
RecpResult.UW = RSP_Vect[RSPOpC.rt].UHW[EleSpec[RSPOpC.rs].B[(RSPOpC.rd & 0x7)]] | Recp.W;
if (RecpResult.UW == 0) {
RecpResult.UW = 0x7FFFFFFF;
} else {
if (RecpResult.W < 0) {
neg = TRUE;
if (RecpResult.UHW[1] == 0xFFFF && RecpResult.HW[0] < 0) {
RecpResult.W = ~RecpResult.W + 1;
} else {
RecpResult.W = ~RecpResult.W;
}
} else {
neg = FALSE;
}
for (count = 31; count > 0; count--) {
if ((RecpResult.W & (1 << count))) {
RecpResult.W &= (0xFFC00000 >> (31 - count) );
count = 0;
}
}
{
DWORD OldModel = _controlfp(_RC_CHOP, _MCW_RC);
//RecpResult.W = 0x7FFFFFFF / RecpResult.W;
RecpResult.W = (long)((0x7FFFFFFF / (double)RecpResult.W));
OldModel = _controlfp(OldModel, _MCW_RC);
}
for (count = 31; count > 0; count--) {
if ((RecpResult.W & (1 << count))) {
RecpResult.W &= (0xFFFF8000 >> (31 - count) );
count = 0;
}
}
if (neg == TRUE) {
RecpResult.W = ~RecpResult.W;
}
}
for ( count = 0; count < 8; count++ ) {
RSP_ACCUM[count].HW[1] = RSP_Vect[RSPOpC.rt].UHW[EleSpec[RSPOpC.rs].B[count]];
}
RSP_Vect[RSPOpC.sa].HW[7 - (RSPOpC.rd & 0x7)] = RecpResult.UHW[0];
}
void RSP_Vector_VRCPH (void) {
int count;
Recp.UHW[1] = RSP_Vect[RSPOpC.rt].UHW[EleSpec[RSPOpC.rs].B[(RSPOpC.rd & 0x7)]];
for ( count = 0; count < 8; count++ ) {
RSP_ACCUM[count].HW[1] = RSP_Vect[RSPOpC.rt].UHW[EleSpec[RSPOpC.rs].B[count]];
}
RSP_Vect[RSPOpC.sa].UHW[7 - (RSPOpC.rd & 0x7)] = RecpResult.UHW[1];
}
void RSP_Vector_VMOV (void) {
int count;
for ( count = 0; count < 8; count++ ) {
RSP_ACCUM[count].HW[1] = RSP_Vect[RSPOpC.rt].UHW[EleSpec[RSPOpC.rs].B[count]];
}
RSP_Vect[RSPOpC.sa].UHW[7 - (RSPOpC.rd & 0x7)] =
RSP_Vect[RSPOpC.rt].UHW[EleSpec[RSPOpC.rs].B[(RSPOpC.rd & 0x7)]];
}
void RSP_Vector_VRSQ (void) {
int count, neg;
SQrootResult.W = RSP_Vect[RSPOpC.rt].HW[EleSpec[RSPOpC.rs].B[(RSPOpC.rd & 0x7)]];
if (SQrootResult.UW == 0) {
SQrootResult.UW = 0x7FFFFFFF;
} else if (SQrootResult.UW == 0xFFFF8000) {
SQrootResult.UW = 0xFFFF0000;
} else {
if (SQrootResult.W < 0) {
neg = TRUE;
SQrootResult.W = ~SQrootResult.W + 1;
} else {
neg = FALSE;
}
for (count = 15; count > 0; count--) {
if ((SQrootResult.W & (1 << count))) {
SQrootResult.W &= (0xFF80 >> (15 - count) );
count = 0;
}
}
{
DWORD RoundMethod = _RC_CHOP;
DWORD OldModel = _controlfp(RoundMethod, _MCW_RC);
SQrootResult.W = (long)(0x7FFFFFFF / sqrt(SQrootResult.W));
OldModel = _controlfp(OldModel, _MCW_RC);
}
for (count = 31; count > 0; count--) {
if ((SQrootResult.W & (1 << count))) {
SQrootResult.W &= (0xFFFF8000 >> (31 - count) );
count = 0;
}
}
if (neg == TRUE) {
SQrootResult.W = ~SQrootResult.W;
}
}
for ( count = 0; count < 8; count++ ) {
RSP_ACCUM[count].HW[1] = RSP_Vect[RSPOpC.rt].UHW[EleSpec[RSPOpC.rs].B[count]];
}
RSP_Vect[RSPOpC.sa].HW[7 - (RSPOpC.rd & 0x7)] = SQrootResult.UHW[0];
}
void RSP_Vector_VRSQL (void) {
int count, neg;
SQrootResult.UW = RSP_Vect[RSPOpC.rt].UHW[EleSpec[RSPOpC.rs].B[(RSPOpC.rd & 0x7)]] | SQroot.W;
if (SQrootResult.UW == 0) {
SQrootResult.UW = 0x7FFFFFFF;
} else if (SQrootResult.UW == 0xFFFF8000) {
SQrootResult.UW = 0xFFFF0000;
} else {
if (SQrootResult.W < 0) {
neg = TRUE;
if (SQrootResult.UHW[1] == 0xFFFF && SQrootResult.HW[0] < 0) {
SQrootResult.W = ~SQrootResult.W + 1;
} else {
SQrootResult.W = ~SQrootResult.W;
}
} else {
neg = FALSE;
}
for (count = 31; count > 0; count--) {
if ((SQrootResult.W & (1 << count))) {
SQrootResult.W &= (0xFF800000 >> (31 - count) );
count = 0;
}
}
{
DWORD OldModel = _controlfp(_RC_CHOP, _MCW_RC);
SQrootResult.W = (long)(0x7FFFFFFF / sqrt(SQrootResult.W));
OldModel = _controlfp(OldModel, _MCW_RC);
}
for (count = 31; count > 0; count--) {
if ((SQrootResult.W & (1 << count))) {
SQrootResult.W &= (0xFFFF8000 >> (31 - count) );
count = 0;
}
}
if (neg == TRUE) {
SQrootResult.W = ~SQrootResult.W;
}
}
for ( count = 0; count < 8; count++ ) {
RSP_ACCUM[count].HW[1] = RSP_Vect[RSPOpC.rt].UHW[EleSpec[RSPOpC.rs].B[count]];
}
RSP_Vect[RSPOpC.sa].HW[7 - (RSPOpC.rd & 0x7)] = SQrootResult.UHW[0];
}
void RSP_Vector_VRSQH (void) {
int count;
SQroot.UHW[1] = RSP_Vect[RSPOpC.rt].UHW[EleSpec[RSPOpC.rs].B[(RSPOpC.rd & 0x7)]];
for ( count = 0; count < 8; count++ ) {
RSP_ACCUM[count].HW[1] = RSP_Vect[RSPOpC.rt].UHW[EleSpec[RSPOpC.rs].B[count]];
}
RSP_Vect[RSPOpC.sa].UHW[7 - (RSPOpC.rd & 0x7)] = SQrootResult.UHW[1];
}
void RSP_Vector_VNOOP (void) {}
/************************** lc2 functions **************************/
void RSP_Opcode_LBV ( void ) {
DWORD Address = ((RSP_GPR[RSPOpC.base].UW + (DWORD)(RSPOpC.voffset)) &0xFFF);
RSP_LBV_DMEM( Address, RSPOpC.rt, RSPOpC.del);
}
void RSP_Opcode_LSV ( void ) {
DWORD Address = ((RSP_GPR[RSPOpC.base].UW + (DWORD)(RSPOpC.voffset << 1)) &0xFFF);
RSP_LSV_DMEM( Address, RSPOpC.rt, RSPOpC.del);
}
void RSP_Opcode_LLV ( void ) {
DWORD Address = ((RSP_GPR[RSPOpC.base].UW + (DWORD)(RSPOpC.voffset << 2)) &0xFFF);
RSP_LLV_DMEM( Address, RSPOpC.rt, RSPOpC.del);
}
void RSP_Opcode_LDV ( void ) {
DWORD Address = ((RSP_GPR[RSPOpC.base].UW + (DWORD)(RSPOpC.voffset << 3)) &0xFFF);
RSP_LDV_DMEM( Address, RSPOpC.rt, RSPOpC.del);
}
void RSP_Opcode_LQV ( void ) {
DWORD Address = ((RSP_GPR[RSPOpC.base].UW + (DWORD)(RSPOpC.voffset << 4)) &0xFFF);
RSP_LQV_DMEM( Address, RSPOpC.rt, RSPOpC.del);
}
void RSP_Opcode_LRV ( void ) {
DWORD Address = ((RSP_GPR[RSPOpC.base].UW + (DWORD)(RSPOpC.voffset << 4)) &0xFFF);
RSP_LRV_DMEM( Address, RSPOpC.rt, RSPOpC.del);
}
void RSP_Opcode_LPV ( void ) {
DWORD Address = ((RSP_GPR[RSPOpC.base].UW + (DWORD)(RSPOpC.voffset << 3)) &0xFFF);
RSP_LPV_DMEM( Address, RSPOpC.rt, RSPOpC.del);
}
void RSP_Opcode_LUV ( void ) {
DWORD Address = ((RSP_GPR[RSPOpC.base].UW + (DWORD)(RSPOpC.voffset << 3)) &0xFFF);
RSP_LUV_DMEM( Address, RSPOpC.rt, RSPOpC.del);
}
void RSP_Opcode_LHV ( void ) {
DWORD Address = ((RSP_GPR[RSPOpC.base].UW + (DWORD)(RSPOpC.voffset << 4)) &0xFFF);
RSP_LHV_DMEM( Address, RSPOpC.rt, RSPOpC.del);
}
void RSP_Opcode_LFV ( void ) {
DWORD Address = ((RSP_GPR[RSPOpC.base].UW + (DWORD)(RSPOpC.voffset << 4)) &0xFFF);
RSP_LFV_DMEM( Address, RSPOpC.rt, RSPOpC.del);
}
void RSP_Opcode_LTV ( void ) {
DWORD Address = ((RSP_GPR[RSPOpC.base].UW + (DWORD)(RSPOpC.voffset << 4)) &0xFFF);
RSP_LTV_DMEM( Address, RSPOpC.rt, RSPOpC.del);
}
/************************** sc2 functions **************************/
void RSP_Opcode_SBV ( void ) {
DWORD Address = ((RSP_GPR[RSPOpC.base].UW + (DWORD)(RSPOpC.voffset)) &0xFFF);
RSP_SBV_DMEM( Address, RSPOpC.rt, RSPOpC.del);
}
void RSP_Opcode_SSV ( void ) {
DWORD Address = ((RSP_GPR[RSPOpC.base].UW + (DWORD)(RSPOpC.voffset << 1)) &0xFFF);
RSP_SSV_DMEM( Address, RSPOpC.rt, RSPOpC.del);
}
void RSP_Opcode_SLV ( void ) {
DWORD Address = ((RSP_GPR[RSPOpC.base].UW + (DWORD)(RSPOpC.voffset << 2)) &0xFFF);
RSP_SLV_DMEM( Address, RSPOpC.rt, RSPOpC.del);
}
void RSP_Opcode_SDV ( void ) {
DWORD Address = ((RSP_GPR[RSPOpC.base].UW + (DWORD)(RSPOpC.voffset << 3)) &0xFFF);
RSP_SDV_DMEM( Address, RSPOpC.rt, RSPOpC.del);
}
void RSP_Opcode_SQV ( void ) {
DWORD Address = ((RSP_GPR[RSPOpC.base].UW + (DWORD)(RSPOpC.voffset << 4)) &0xFFF);
RSP_SQV_DMEM( Address, RSPOpC.rt, RSPOpC.del);
}
void RSP_Opcode_SRV ( void ) {
DWORD Address = ((RSP_GPR[RSPOpC.base].UW + (DWORD)(RSPOpC.voffset << 4)) &0xFFF);
RSP_SRV_DMEM( Address, RSPOpC.rt, RSPOpC.del);
}
void RSP_Opcode_SPV ( void ) {
DWORD Address = ((RSP_GPR[RSPOpC.base].UW + (DWORD)(RSPOpC.voffset << 3)) &0xFFF);
RSP_SPV_DMEM( Address, RSPOpC.rt, RSPOpC.del);
}
void RSP_Opcode_SUV ( void ) {
DWORD Address = ((RSP_GPR[RSPOpC.base].UW + (DWORD)(RSPOpC.voffset << 3)) &0xFFF);
RSP_SUV_DMEM( Address, RSPOpC.rt, RSPOpC.del);
}
void RSP_Opcode_SHV ( void ) {
DWORD Address = ((RSP_GPR[RSPOpC.base].UW + (DWORD)(RSPOpC.voffset << 4)) &0xFFF);
RSP_SHV_DMEM( Address, RSPOpC.rt, RSPOpC.del);
}
void RSP_Opcode_SFV ( void ) {
DWORD Address = ((RSP_GPR[RSPOpC.base].UW + (DWORD)(RSPOpC.voffset << 4)) &0xFFF);
RSP_SFV_DMEM( Address, RSPOpC.rt, RSPOpC.del);
}
void RSP_Opcode_STV ( void ) {
DWORD Address = ((RSP_GPR[RSPOpC.base].UW + (DWORD)(RSPOpC.voffset << 4)) &0xFFF);
RSP_STV_DMEM( Address, RSPOpC.rt, RSPOpC.del);
}
void RSP_Opcode_SWV ( void ) {
DWORD Address = ((RSP_GPR[RSPOpC.base].UW + (DWORD)(RSPOpC.voffset << 4)) &0xFFF);
RSP_SWV_DMEM( Address, RSPOpC.rt, RSPOpC.del);
}
/************************** Other functions **************************/
void rsp_UnknownOpcode (void) {
char Message[200];
int response;
if (InRSPCommandsWindow) {
SetRSPCommandViewto( *PrgCount );
DisplayError("Unhandled Opcode\n%s\n\nStoping Emulation!", RSPOpcodeName(RSPOpC.Hex,*PrgCount));
} else {
sprintf(Message,"Unhandled Opcode\n%s\n\nStoping Emulation!\n\nDo you wish to enter the debugger ?",
RSPOpcodeName(RSPOpC.Hex,*PrgCount));
response = MessageBox(NULL,Message,"Error", MB_YESNO | MB_ICONERROR );
if (response == IDYES) {
Enter_RSP_Commands_Window ();
}
}
ExitThread(0);
}
Reference in New Issue View Git Blame Copy Permalink