1 // This is part of Pico Library
\r
3 // (c) Copyright 2004 Dave, All rights reserved.
\r
4 // (c) Copyright 2006 notaz, All rights reserved.
\r
5 // Free for non-commercial use.
\r
7 // For commercial use, separate licencing terms must be obtained.
\r
10 #include "PicoInt.h"
\r
13 int SekCycleCnt=0; // cycles done in this frame
\r
14 int SekCycleAim=0; // cycle aim
\r
15 unsigned int SekCycleCntT=0;
\r
18 // ---------------------- Cyclone 68000 ----------------------
\r
19 struct Cyclone PicoCpu;
\r
23 // ---------------------- MUSASHI 68000 ----------------------
\r
24 m68ki_cpu_core PicoM68kCPU; // MD's CPU
\r
28 // ---------------------- A68K ----------------------
\r
30 void __cdecl M68000_RESET();
\r
32 unsigned int mem_amask=0xffffff; // 24-bit bus
\r
33 unsigned int mame_debug=0,cur_mrhard=0,m68k_illegal_opcode=0,illegal_op=0,illegal_pc=0,opcode_entry=0; // filler
\r
35 static int IrqCallback(int i) { i; return -1; }
\r
36 static int DoReset() { return 0; }
\r
37 static int (*ResetCallback)()=DoReset;
\r
39 #pragma warning (disable:4152)
\r
45 // interrupt acknowledgment
\r
46 static int SekIntAck(int level)
\r
48 // try to emulate VDP's reaction to 68000 int ack
\r
49 if (level == 4) Pico.video.pending_ints = 0;
\r
50 else if(level == 6) Pico.video.pending_ints &= ~0x20;
\r
52 return CYCLONE_INT_ACK_AUTOVECTOR;
\r
55 static void SekResetAck()
\r
57 #if defined(__DEBUG_PRINT) || defined(WIN32)
\r
58 dprintf("Reset encountered @ %06x", SekPc);
\r
62 static int SekUnrecognizedOpcode()
\r
64 unsigned int pc, op;
\r
66 op = PicoCpu.read16(pc);
\r
67 #if defined(__DEBUG_PRINT) || defined(WIN32)
\r
68 dprintf("Unrecognized Opcode %04x @ %06x", op, pc);
\r
70 // see if we are not executing trash
\r
71 if (pc < 0x200 || (pc > Pico.romsize+4 && (pc&0xe00000)!=0xe00000)) {
\r
73 PicoCpu.state_flags |= 1;
\r
76 #ifdef EMU_M68K // debugging cyclone
\r
78 extern int have_illegal;
\r
89 static int SekIntAckM68K(int level)
\r
91 if (level == 4) { Pico.video.pending_ints = 0; dprintf("hack: [%i|%i]", Pico.m.scanline, SekCyclesDone()); }
\r
92 else if(level == 6) { Pico.video.pending_ints &= ~0x20; dprintf("vack: [%i|%i]", Pico.m.scanline, SekCyclesDone()); }
\r
94 return M68K_INT_ACK_AUTOVECTOR;
\r
97 static int SekTasCallback(void)
\r
99 return 0; // no writeback
\r
105 PICO_INTERNAL int SekInit()
\r
109 memset(&PicoCpu,0,sizeof(PicoCpu));
\r
110 PicoCpu.IrqCallback=SekIntAck;
\r
111 PicoCpu.ResetCallback=SekResetAck;
\r
112 PicoCpu.UnrecognizedCallback=SekUnrecognizedOpcode;
\r
115 memset(&M68000_regs,0,sizeof(M68000_regs));
\r
116 M68000_regs.IrqCallback=IrqCallback;
\r
117 M68000_regs.pResetCallback=ResetCallback;
\r
118 M68000_RESET(); // Init cpu emulator
\r
122 void *oldcontext = m68ki_cpu_p;
\r
123 m68k_set_context(&PicoM68kCPU);
\r
124 m68k_set_cpu_type(M68K_CPU_TYPE_68000);
\r
126 m68k_set_int_ack_callback(SekIntAckM68K);
\r
127 m68k_set_tas_instr_callback(SekTasCallback);
\r
128 m68k_pulse_reset(); // Init cpu emulator
\r
129 m68k_set_context(oldcontext);
\r
136 // Reset the 68000:
\r
137 PICO_INTERNAL int SekReset()
\r
139 if (Pico.rom==NULL) return 1;
\r
142 PicoCpu.state_flags=0;
\r
144 PicoCpu.srh =0x27; // Supervisor mode
\r
145 PicoCpu.flags=4; // Z set
\r
147 PicoCpu.a[7]=PicoCpu.read32(0); // Stack Pointer
\r
149 PicoCpu.pc=PicoCpu.checkpc(PicoCpu.read32(4)); // Program Counter
\r
152 // Reset CPU: fetch SP and PC
\r
153 M68000_regs.srh=0x27; // Supervisor mode
\r
154 M68000_regs.a[7]=PicoRead32(0);
\r
155 M68000_regs.pc =PicoRead32(4);
\r
156 PicoInitPc(M68000_regs.pc);
\r
159 m68k_set_context(&PicoM68kCPU); // if we ever reset m68k, we always need it's context to be set
\r
162 m68k_pulse_reset();
\r
169 PICO_INTERNAL int SekInterrupt(int irq)
\r
171 #if defined(EMU_C68K) && defined(EMU_M68K)
\r
173 extern unsigned int dbg_irq_level;
\r
182 M68000_regs.irq=irq; // raise irq (gets lowered after taken)
\r
186 void *oldcontext = m68ki_cpu_p;
\r
187 m68k_set_context(&PicoM68kCPU);
\r
188 m68k_set_irq(irq); // raise irq (gets lowered after taken or must be done in ack)
\r
189 m68k_set_context(oldcontext);
\r
195 //int SekPc() { return PicoCpu.pc-PicoCpu.membase; }
\r
196 //int SekPc() { return M68000_regs.pc; }
\r
197 //int SekPc() { return m68k_get_reg(NULL, M68K_REG_PC); }
\r
199 PICO_INTERNAL void SekState(unsigned char *data)
\r
202 memcpy(data,PicoCpu.d,0x44);
\r
203 #elif defined(EMU_A68K)
\r
204 memcpy(data, M68000_regs.d, 0x40);
\r
205 memcpy(data+0x40,&M68000_regs.pc,0x04);
\r
206 #elif defined(EMU_M68K)
\r
207 memcpy(data, PicoM68kCPU.dar,0x40);
\r
208 memcpy(data+0x40,&PicoM68kCPU.pc, 0x04);
\r
212 PICO_INTERNAL void SekSetRealTAS(int use_real)
\r
215 CycloneSetRealTAS(use_real);
\r