RaySollium99/picodrive
1
0
Fork 0
mirror of https://github.com/RaySollium99/picodrive.git synced 2025-09-05 07:17:45 -04:00
Code Issues Projects Releases Packages Wiki Activity Actions

1.31 release

Browse source 
git-svn-id: file:///home/notaz/opt/svn/PicoDrive@80 be3aeb3a-fb24-0410-a615-afba39da0efa
This commit is contained in:
notaz 2007-03-25 22:21:21 +00:00
parent 782f8f2211
commit c008977e8e
12 changed files with 160 additions and 50 deletions
Download patch file Download diff file Expand all files Collapse all files

3
cpu/Cyclone/Cyclone.h
View file

@ -53,6 +53,9 @@ void CycloneRun(struct Cyclone *pcy);
void CycloneSetSr(struct Cyclone *pcy, unsigned int sr); // auto-swaps a7<->osp if detects supervisor change
unsigned int CycloneGetSr(struct Cyclone *pcy);
// genesis: if 1, switch to normal TAS handlers
void CycloneSetRealTAS(int use_real);
#ifdef __cplusplus
} // End of extern "C"
#endif

73
cpu/Cyclone/Main.cpp
View file

@ -32,6 +32,51 @@ void ltorg()
else ot(" .ltorg\n");
}
#if CYCLONE_FOR_GENESIS
// r12=ptr to tas in table, trashes r0,r1
static void ChangeTAS(int norm)
{
ot(" ldr r0,=Op4ad0%s\n",norm?"_":"");
ot(" mov r1,#8\n");
ot("setrtas_loop%i0%s ;@ 4ad0-4ad7\n",norm,ms?"":":");
ot(" subs r1,r1,#1\n");
ot(" str r0,[r12],#4\n");
ot(" bne setrtas_loop%i0\n",norm);
ot(" ldr r0,=Op4ad8%s\n",norm?"_":"");
ot(" mov r1,#7\n");
ot("setrtas_loop%i1%s ;@ 4ad8-4ade\n",norm,ms?"":":");
ot(" subs r1,r1,#1\n");
ot(" str r0,[r12],#4\n");
ot(" bne setrtas_loop%i1\n",norm);
ot(" ldr r0,=Op4adf%s\n",norm?"_":"");
ot(" str r0,[r12],#4\n");
ot(" ldr r0,=Op4ae0%s\n",norm?"_":"");
ot(" mov r1,#7\n");
ot("setrtas_loop%i2%s ;@ 4ae0-4ae6\n",norm,ms?"":":");
ot(" subs r1,r1,#1\n");
ot(" str r0,[r12],#4\n");
ot(" bne setrtas_loop%i2\n",norm);
ot(" ldr r0,=Op4ae7%s\n",norm?"_":"");
ot(" str r0,[r12],#4\n");
ot(" ldr r0,=Op4ae8%s\n",norm?"_":"");
ot(" mov r1,#8\n");
ot("setrtas_loop%i3%s ;@ 4ae8-4aef\n",norm,ms?"":":");
ot(" subs r1,r1,#1\n");
ot(" str r0,[r12],#4\n");
ot(" bne setrtas_loop%i3\n",norm);
ot(" ldr r0,=Op4af0%s\n",norm?"_":"");
ot(" mov r1,#8\n");
ot("setrtas_loop%i4%s ;@ 4af0-4af7\n",norm,ms?"":":");
ot(" subs r1,r1,#1\n");
ot(" str r0,[r12],#4\n");
ot(" bne setrtas_loop%i4\n",norm);
ot(" ldr r0,=Op4af8%s\n",norm?"_":"");
ot(" str r0,[r12],#4\n");
ot(" ldr r0,=Op4af9%s\n",norm?"_":"");
ot(" str r0,[r12],#4\n");
}
#endif
// trashes all temp regs
static void PrintException(int ints)
{
@ -259,6 +304,26 @@ static void PrintFramework()
ot(" bx lr\n");
ot("\n");
if (ms) ot("CycloneSetRealTAS\n");
else ot("CycloneSetRealTAS:\n");
#if CYCLONE_FOR_GENESIS
ot(" ldr r12,=CycloneJumpTab\n");
ot(" tst r0,r0\n");
ot(" add r12,r12,#0x4a00*4\n");
ot(" add r12,r12,#0x00d0*4\n");
ot(" beq setrtas_off\n");
ChangeTAS(1);
ot(" bx lr\n");
ot("setrtas_off%s\n",ms?"":":");
ChangeTAS(0);
ot(" bx lr\n");
ltorg();
ot("\n");
#else
ot(" bx lr\n");
ot("\n");
#endif
ot(";@ DoInterrupt - r0=IRQ number\n");
ot("CycloneDoInterrupt%s\n", ms?"":":");
ot(" stmdb sp!,{lr} ;@ Push ARM return address\n");
@ -470,6 +535,9 @@ static void PrintJumpTable()
ot(";@ -------------------------- Jump Table --------------------------\n");
// space for decompressed table
ot(ms?" area |.data|, data\n":" .data\n .align 4\n\n");
#if COMPRESS_JUMPTABLE
int handlers=0,reps=0,*indexes,ip,u,out;
// use some weird compression on the jump table
@ -477,9 +545,6 @@ static void PrintJumpTable()
if(!indexes) { printf("ERROR: out of memory\n"); exit(1); }
len=0x10000;
// space for decompressed table
ot(ms?" area |.data|, data\n":" .data\n .align 4\n\n");
ot("CycloneJumpTab%s\n", ms?"":":");
if(ms) {
for(i = 0; i < 0xa000/8; i++)
@ -607,6 +672,7 @@ static int CycloneMake()
ot(" export CycloneRun\n");
ot(" export CycloneSetSr\n");
ot(" export CycloneGetSr\n");
ot(" export CycloneSetRealTAS\n");
ot(" export CycloneVer\n");
ot("\n");
ot("CycloneVer dcd 0x%.4x\n",CycloneVer);
@ -617,6 +683,7 @@ static int CycloneMake()
ot(" .global CycloneRun\n");
ot(" .global CycloneSetSr\n");
ot(" .global CycloneGetSr\n");
ot(" .global CycloneSetRealTAS\n");
ot(" .global CycloneVer\n");
#ifdef CYCLONE_FOR_PICODRIVE
ot(" .global CycloneDoInterrupt\n");

17
cpu/Cyclone/OpLogic.cpp
View file

@ -632,7 +632,7 @@ int OpAsrEa(int op)
return 0;
}
int OpTas(int op)
int OpTas(int op, int gen_special)
{
int ea=0;
int use=0;
@ -645,7 +645,11 @@ int OpTas(int op)
use=OpBase(op);
if (op!=use) { OpUse(op,use); return 0; } // Use existing handler
OpStart(op); Cycles=4;
if (!gen_special) OpStart(op);
else
ot("Op%.4x_%s\n", op, ms?"":":");
Cycles=4;
if(ea>=8) Cycles+=10;
EaCalc (10,0x003f,ea,0,1);
@ -657,7 +661,7 @@ int OpTas(int op)
#if CYCLONE_FOR_GENESIS
// the original Sega hardware ignores write-back phase (to memory only)
if (ea < 0x10) {
if (ea < 0x10 || gen_special) {
#endif
ot(" orr r1,r1,#0x80000000 ;@ set bit7\n");
@ -667,6 +671,13 @@ int OpTas(int op)
#endif
OpEnd();
#if CYCLONE_FOR_GENESIS
if (!gen_special && ea >= 0x10) {
OpTas(op, 1);
}
#endif
return 0;
}

2
cpu/Cyclone/app.h
View file

@ -79,7 +79,7 @@ int OpExt(int op);
int OpSet(int op);
int OpAsr(int op);
int OpAsrEa(int op);
int OpTas(int op);
int OpTas(int op, int gen_special=0);
// OpMove.cpp
int OpMove(int op);