1 // (c) Copyright 2006 notaz, All rights reserved.
4 #include "../PicoInt.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 dprintf("s68kACK %i -> %i", level, level_new);
44 PicoCpuCS68k.irq = level_new;
45 return CYCLONE_INT_ACK_AUTOVECTOR;
48 static void SekResetAckS68k(void)
50 dprintf("s68k: Reset encountered @ %06x", SekPcS68k);
53 static int SekUnrecognizedOpcodeS68k(void)
57 op = PicoCpuCS68k.read16(pc);
58 dprintf("Unrecognized Opcode %04x @ %06x", op, pc);
65 static int SekIntAckMS68k(int level)
67 int level_new = new_irq_level(level);
68 dprintf("s68kACK %i -> %i", level, level_new);
69 CPU_INT_LEVEL = level_new << 8;
70 return M68K_INT_ACK_AUTOVECTOR;
75 static void SekIntAckFS68k(unsigned level)
77 int level_new = new_irq_level(level);
78 dprintf("s68kACK %i -> %i", level, level_new);
79 PicoCpuFS68k.interrupts[0] = level_new;
84 PICO_INTERNAL int SekInitS68k()
88 memset(&PicoCpuCS68k,0,sizeof(PicoCpuCS68k));
89 PicoCpuCS68k.IrqCallback=SekIntAckS68k;
90 PicoCpuCS68k.ResetCallback=SekResetAckS68k;
91 PicoCpuCS68k.UnrecognizedCallback=SekUnrecognizedOpcodeS68k;
95 // Musashi is not very context friendly..
96 void *oldcontext = m68ki_cpu_p;
97 m68k_set_context(&PicoCpuMS68k);
98 m68k_set_cpu_type(M68K_CPU_TYPE_68000);
100 m68k_set_int_ack_callback(SekIntAckMS68k);
101 // m68k_pulse_reset(); // not yet, memmap is not set up
102 m68k_set_context(oldcontext);
107 void *oldcontext = g_m68kcontext;
108 g_m68kcontext = &PicoCpuFS68k;
109 memset(&PicoCpuFS68k, 0, sizeof(PicoCpuFS68k));
111 PicoCpuFS68k.iack_handler = SekIntAckFS68k;
112 g_m68kcontext = oldcontext;
120 PICO_INTERNAL int SekResetS68k()
122 if (Pico.rom==NULL) return 1;
125 PicoCpuCS68k.state_flags=0;
127 PicoCpuCS68k.srh =0x27; // Supervisor mode
128 PicoCpuCS68k.flags=4; // Z set
130 PicoCpuCS68k.a[7]=PicoCpuCS68k.read32(0); // Stack Pointer
131 PicoCpuCS68k.membase=0;
132 PicoCpuCS68k.pc=PicoCpuCS68k.checkpc(PicoCpuCS68k.read32(4)); // Program Counter
136 void *oldcontext = m68ki_cpu_p;
138 m68k_set_context(&PicoCpuMS68k);
142 m68k_set_context(oldcontext);
147 void *oldcontext = g_m68kcontext;
148 g_m68kcontext = &PicoCpuFS68k;
150 g_m68kcontext = oldcontext;
157 PICO_INTERNAL int SekInterruptS68k(int irq)
159 int irqs, real_irq = 1;
160 Pico_mcd->m.s68k_pend_ints |= 1 << irq;
161 irqs = Pico_mcd->m.s68k_pend_ints >> 1;
162 while ((irqs >>= 1)) real_irq++;
165 PicoCpuCS68k.irq=real_irq;
168 void *oldcontext = m68ki_cpu_p;
169 m68k_set_context(&PicoCpuMS68k);
170 m68k_set_irq(real_irq);
171 m68k_set_context(oldcontext);
174 PicoCpuFS68k.interrupts[0]=real_irq;