1 // (c) Copyright 2007 notaz, All rights reserved.
4 #include "../pico_int.h"
7 int SekCycleCntS68k=0; // cycles done in this frame
8 int SekCycleAimS68k=0; // cycle aim
14 struct Cyclone PicoCpuCS68k;
18 m68ki_cpu_core PicoCpuMS68k;
22 M68K_CONTEXT PicoCpuFS68k;
26 static int new_irq_level(int level)
28 int level_new = 0, irqs;
29 Pico_mcd->m.s68k_pend_ints &= ~(1 << level);
30 irqs = Pico_mcd->m.s68k_pend_ints;
31 irqs &= Pico_mcd->s68k_regs[0x33];
32 while ((irqs >>= 1)) level_new++;
38 // interrupt acknowledgement
39 static int SekIntAckS68k(int level)
41 int level_new = new_irq_level(level);
43 elprintf(EL_INTS, "s68kACK %i -> %i", level, level_new);
44 PicoCpuCS68k.irq = level_new;
45 return CYCLONE_INT_ACK_AUTOVECTOR;
48 static void SekResetAckS68k(void)
50 elprintf(EL_ANOMALY, "s68k: Reset encountered @ %06x", SekPcS68k);
53 static int SekUnrecognizedOpcodeS68k(void)
55 elprintf(EL_ANOMALY, "Unrecognized Opcode @ %06x", SekPcS68k);
62 static int SekIntAckMS68k(int level)
64 #ifndef EMU_CORE_DEBUG
65 int level_new = new_irq_level(level);
66 elprintf(EL_INTS, "s68kACK %i -> %i", level, level_new);
67 CPU_INT_LEVEL = level_new << 8;
71 return M68K_INT_ACK_AUTOVECTOR;
76 static void SekIntAckFS68k(unsigned level)
78 int level_new = new_irq_level(level);
79 elprintf(EL_INTS, "s68kACK %i -> %i", level, level_new);
80 #ifndef EMU_CORE_DEBUG
81 PicoCpuFS68k.interrupts[0] = level_new;
84 extern int dbg_irq_level_sub;
85 dbg_irq_level_sub = level_new;
86 PicoCpuFS68k.interrupts[0] = 0;
93 PICO_INTERNAL void SekInitS68k(void)
97 memset(&PicoCpuCS68k,0,sizeof(PicoCpuCS68k));
98 PicoCpuCS68k.IrqCallback=SekIntAckS68k;
99 PicoCpuCS68k.ResetCallback=SekResetAckS68k;
100 PicoCpuCS68k.UnrecognizedCallback=SekUnrecognizedOpcodeS68k;
104 // Musashi is not very context friendly..
105 void *oldcontext = m68ki_cpu_p;
106 m68k_set_context(&PicoCpuMS68k);
107 m68k_set_cpu_type(M68K_CPU_TYPE_68000);
109 m68k_set_int_ack_callback(SekIntAckMS68k);
110 // m68k_pulse_reset(); // not yet, memmap is not set up
111 m68k_set_context(oldcontext);
116 void *oldcontext = g_m68kcontext;
117 g_m68kcontext = &PicoCpuFS68k;
118 memset(&PicoCpuFS68k, 0, sizeof(PicoCpuFS68k));
120 PicoCpuFS68k.iack_handler = SekIntAckFS68k;
121 PicoCpuFS68k.sr = 0x2704; // Z flag
122 g_m68kcontext = oldcontext;
128 PICO_INTERNAL int SekResetS68k(void)
130 if (Pico.rom==NULL) return 1;
133 CycloneReset(&PicoCpuCS68k);
137 void *oldcontext = m68ki_cpu_p;
139 m68k_set_context(&PicoCpuMS68k);
143 m68k_set_context(oldcontext);
148 void *oldcontext = g_m68kcontext;
149 g_m68kcontext = &PicoCpuFS68k;
151 g_m68kcontext = oldcontext;
158 PICO_INTERNAL int SekInterruptS68k(int irq)
160 int irqs, real_irq = 1;
161 Pico_mcd->m.s68k_pend_ints |= 1 << irq;
162 irqs = Pico_mcd->m.s68k_pend_ints >> 1;
163 while ((irqs >>= 1)) real_irq++;
165 #ifdef EMU_CORE_DEBUG
167 extern int dbg_irq_level_sub;
168 dbg_irq_level_sub=real_irq;
173 PicoCpuCS68k.irq=real_irq;
176 void *oldcontext = m68ki_cpu_p;
177 m68k_set_context(&PicoCpuMS68k);
178 m68k_set_irq(real_irq);
179 m68k_set_context(oldcontext);
182 PicoCpuFS68k.interrupts[0]=real_irq;