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

core, fix z80 irq handling, reset defaults (cz80, drz80)

Browse source
This commit is contained in:
kub 2024-02-22 21:01:37 +01:00
parent bfe516c3a9
commit ad43165afc
6 changed files with 35 additions and 40 deletions
Download patch file Download diff file Expand all files Collapse all files

20
cpu/DrZ80/drz80.S
View file

@ -855,7 +855,8 @@ z80_xmap_rebase_sp:
strb \reg,[z80sp,#-1]!
.else
mov r0,\reg
sub z80sp,z80sp,#2
subs z80sp,z80sp,#2
@ addcc z80sp,z80sp,#1<<16
mov r1,z80sp
writemem16
.endif
@ -872,7 +873,8 @@ z80_xmap_rebase_sp:
strb r1,[z80sp,#-1]!
.else
mov r0,\reg,lsr #16
sub z80sp,z80sp,#2
subs z80sp,z80sp,#2
@ addcc z80sp,z80sp,#1<<16
mov r1,z80sp
writemem16
.endif
@ -1472,7 +1474,7 @@ DoInterrupt:
;@ r0 == z80if
stmfd sp!,{r2,lr}
tst r0,#4 ;@ check halt
tst r0,#Z80_HALT ;@ check halt
addne z80pc,z80pc,#1
ldrb r1,[cpucontext,#z80im]
@ -1503,7 +1505,8 @@ DoInterrupt_mode0:
strb r1,[z80sp,#-1]!
strb r0,[z80sp,#-1]!
.else
sub z80sp,z80sp,#2
subs z80sp,z80sp,#2
@ addcc z80sp,z80sp,#1<<16
mov r1,z80sp
writemem16
ldr r2,[cpucontext, #z80irqvector]
@ -1577,7 +1580,9 @@ DoInterrupt_end:
;@ interupt accepted so callback irq interface
ldr r0,[cpucontext, #z80irqcallback]
tst r0,r0
streqb r0,[cpucontext,#z80irq] ;@ default handling
ldreqb r0,[cpucontext,#z80irq] ;@ default handling
biceq r0,r0,#1
streqb r0,[cpucontext,#z80irq]
ldmeqfd sp!,{r2,pc}
stmfd sp!,{r3,r12}
mov lr,pc
@ -5758,7 +5763,10 @@ opcode_F_3:
ldrb r1,[cpucontext,#z80if]
bic r1,r1,#(Z80_IF1)|(Z80_IF2)
strb r1,[cpucontext,#z80if]
fetch 4
ldrb r0,[z80pc],#1
eatcycles 4
ldr pc,[opcodes, r0, lsl #2]
;@CALL P,NN
opcode_F_4:
tst z80f,#1<<SFlag

2
cpu/cz80/cz80.c
View file

@ -212,6 +212,8 @@ void Cz80_Reset(cz80_struc *CPU)
{
// I, R, CPU and interrupts logic is reset, registers are untouched
memset(&CPU->R, 0, (FPTR)&CPU->BasePC - (FPTR)&CPU->R);
Cz80_Set_Reg(CPU, CZ80_FA, 0xffff);
Cz80_Set_Reg(CPU, CZ80_SP, 0xffff);
Cz80_Set_Reg(CPU, CZ80_PC, 0);
}

11
cpu/cz80/cz80_op.c
View file

@ -711,15 +711,6 @@ OP_EI:
USE_CYCLES(4)
if (!zIFF1)
{
zIFF1 = zIFF2 = (1 << 2);
while (GET_OP() == 0xfb)
{
USE_CYCLES(4)
PC++;
#if CZ80_EMULATE_R_EXACTLY
zR++;
#endif
}
if (CPU->IRQState)
{
CPU->Status |= CZ80_HAS_INT;
@ -727,7 +718,7 @@ OP_EI:
CPU->ICount = 0;
}
}
else zIFF2 = (1 << 2);
zIFF1 = zIFF2 = (1 << 2);
goto Cz80_Exec_nocheck;
/*-----------------------------------------

35
cpu/cz80/cz80_opED.c
View file

@ -407,29 +407,14 @@ OP_SBC16:
RET(8)
/*-----------------------------------------
RETN
RETI/RETN
-----------------------------------------*/
OPED(0x45): // RETN;
OPED(0x55): // RETN;
OPED(0x65): // RETN;
OPED(0x75): // RETN;
POP_16(res);
SET_PC(res);
if (!zIFF1 && zIFF2)
{
zIFF1 = (1 << 2);
if (CPU->IRQState)
{
CPU->Status |= CZ80_HAS_INT;
}
}
else zIFF1 = zIFF2;
RET(10)
/*-----------------------------------------
RETI
-----------------------------------------*/
// works the same, but Z80 PIO can detect the opcode
OPED(0x45): // RETN
OPED(0x55): // RETN
OPED(0x65): // RETN
OPED(0x75): // RETN
OPED(0x4d): // RETI
OPED(0x5d): // RETI
@ -437,6 +422,14 @@ OP_SBC16:
OPED(0x7d): // RETI
POP_16(res);
SET_PC(res);
if (!zIFF1 && zIFF2)
{
if (CPU->IRQState)
{
CPU->Status |= CZ80_HAS_INT;
}
}
zIFF1 = zIFF2;
RET(10)
/*-----------------------------------------