1 |
|
/* |
2 |
|
* emul_op.cpp - 68k opcodes for ROM patches |
3 |
|
* |
4 |
< |
* Basilisk II (C) 1997-1999 Christian Bauer |
4 |
> |
* Basilisk II (C) 1997-2000 Christian Bauer |
5 |
|
* |
6 |
|
* This program is free software; you can redistribute it and/or modify |
7 |
|
* it under the terms of the GNU General Public License as published by |
42 |
|
#include "extfs.h" |
43 |
|
#include "emul_op.h" |
44 |
|
|
45 |
< |
#if ENABLE_MON |
45 |
> |
#ifdef ENABLE_MON |
46 |
|
#include "mon.h" |
47 |
|
#endif |
48 |
|
|
60 |
|
switch (opcode) { |
61 |
|
case M68K_EMUL_BREAK: { // Breakpoint |
62 |
|
printf("*** Breakpoint\n"); |
63 |
< |
printf("d0 %08lx d1 %08lx d2 %08lx d3 %08lx\n" |
64 |
< |
"d4 %08lx d5 %08lx d6 %08lx d7 %08lx\n" |
65 |
< |
"a0 %08lx a1 %08lx a2 %08lx a3 %08lx\n" |
66 |
< |
"a4 %08lx a5 %08lx a6 %08lx a7 %08lx\n" |
63 |
> |
printf("d0 %08x d1 %08x d2 %08x d3 %08x\n" |
64 |
> |
"d4 %08x d5 %08x d6 %08x d7 %08x\n" |
65 |
> |
"a0 %08x a1 %08x a2 %08x a3 %08x\n" |
66 |
> |
"a4 %08x a5 %08x a6 %08x a7 %08x\n" |
67 |
|
"sr %04x\n", |
68 |
|
r->d[0], r->d[1], r->d[2], r->d[3], r->d[4], r->d[5], r->d[6], r->d[7], |
69 |
|
r->a[0], r->a[1], r->a[2], r->a[3], r->a[4], r->a[5], r->a[6], r->a[7], |
70 |
|
r->sr); |
71 |
< |
#if ENABLE_MON |
71 |
> |
#ifdef ENABLE_MON |
72 |
|
char *arg[2] = {"rmon", NULL}; |
73 |
|
mon(1, arg); |
74 |
|
#endif |
84 |
|
D(bug("*** RESET ***\n")); |
85 |
|
TimerReset(); |
86 |
|
EtherReset(); |
87 |
+ |
AudioReset(); |
88 |
|
|
89 |
|
// Create BootGlobs at top of memory |
90 |
|
Mac_memset(RAMBaseMac + RAMSize - 4096, 0, 4096); |
196 |
|
break; |
197 |
|
|
198 |
|
case M68K_EMUL_OP_FIX_BOOTSTACK: // Set boot stack to 3/4 of RAM (7.5) |
198 |
– |
D(bug("Fix boot stack\n")); |
199 |
|
r->a[1] = RAMBaseMac + RAMSize * 3 / 4; |
200 |
+ |
D(bug("Fix boot stack %08x\n", r->a[1])); |
201 |
|
break; |
202 |
|
|
203 |
|
case M68K_EMUL_OP_FIX_MEMSIZE: { // Set correct logical and physical memory size |
348 |
|
EtherReadPacket((uint8 **)&r->a[0], r->a[3], r->d[3], r->d[1]); |
349 |
|
break; |
350 |
|
|
351 |
+ |
case M68K_EMUL_OP_SOUNDIN_OPEN: // Sound input driver functions |
352 |
+ |
r->d[0] = SoundInOpen(r->a[0], r->a[1]); |
353 |
+ |
break; |
354 |
+ |
|
355 |
+ |
case M68K_EMUL_OP_SOUNDIN_PRIME: |
356 |
+ |
r->d[0] = SoundInPrime(r->a[0], r->a[1]); |
357 |
+ |
break; |
358 |
+ |
|
359 |
+ |
case M68K_EMUL_OP_SOUNDIN_CONTROL: |
360 |
+ |
r->d[0] = SoundInControl(r->a[0], r->a[1]); |
361 |
+ |
break; |
362 |
+ |
|
363 |
+ |
case M68K_EMUL_OP_SOUNDIN_STATUS: |
364 |
+ |
r->d[0] = SoundInStatus(r->a[0], r->a[1]); |
365 |
+ |
break; |
366 |
+ |
|
367 |
+ |
case M68K_EMUL_OP_SOUNDIN_CLOSE: |
368 |
+ |
r->d[0] = SoundInClose(r->a[0], r->a[1]); |
369 |
+ |
break; |
370 |
+ |
|
371 |
|
case M68K_EMUL_OP_SCSI_DISPATCH: { // SCSIDispatch() replacement |
372 |
|
uint32 ret = ReadMacInt32(r->a[7]); // Get return address |
373 |
|
uint16 sel = ReadMacInt16(r->a[7] + 4); // Get selector |
433 |
|
|
434 |
|
case M68K_EMUL_OP_IRQ: // Level 1 interrupt |
435 |
|
r->d[0] = 0; |
436 |
+ |
|
437 |
|
if (InterruptFlags & INTFLAG_60HZ) { |
438 |
|
ClearInterruptFlag(INTFLAG_60HZ); |
439 |
|
if (HasMacStarted()) { |
442 |
|
ADBInterrupt(); |
443 |
|
TimerInterrupt(); |
444 |
|
VideoInterrupt(); |
423 |
– |
SonyInterrupt(); |
424 |
– |
DiskInterrupt(); |
425 |
– |
CDROMInterrupt(); |
445 |
|
|
446 |
|
// Call DoVBLTask(0) |
447 |
|
if (ROMVersion == ROM_VERSION_32) { |
453 |
|
r->d[0] = 1; // Flag: 68k interrupt routine executes VBLTasks etc. |
454 |
|
} |
455 |
|
} |
456 |
+ |
|
457 |
+ |
if (InterruptFlags & INTFLAG_1HZ) { |
458 |
+ |
ClearInterruptFlag(INTFLAG_1HZ); |
459 |
+ |
|
460 |
+ |
if (HasMacStarted()) { |
461 |
+ |
SonyInterrupt(); |
462 |
+ |
DiskInterrupt(); |
463 |
+ |
CDROMInterrupt(); |
464 |
+ |
} |
465 |
+ |
} |
466 |
+ |
|
467 |
|
if (InterruptFlags & INTFLAG_SERIAL) { |
468 |
|
ClearInterruptFlag(INTFLAG_SERIAL); |
469 |
|
SerialInterrupt(); |
470 |
|
} |
471 |
+ |
|
472 |
|
if (InterruptFlags & INTFLAG_ETHER) { |
473 |
|
ClearInterruptFlag(INTFLAG_ETHER); |
474 |
|
EtherInterrupt(); |
475 |
|
} |
476 |
+ |
|
477 |
|
if (InterruptFlags & INTFLAG_AUDIO) { |
478 |
|
ClearInterruptFlag(INTFLAG_AUDIO); |
479 |
|
AudioInterrupt(); |
521 |
|
break; |
522 |
|
|
523 |
|
default: |
524 |
< |
printf("FATAL: EMUL_OP called with bogus opcode %08x\n", opcode); |
525 |
< |
printf("d0 %08lx d1 %08lx d2 %08lx d3 %08lx\n" |
526 |
< |
"d4 %08lx d5 %08lx d6 %08lx d7 %08lx\n" |
527 |
< |
"a0 %08lx a1 %08lx a2 %08lx a3 %08lx\n" |
528 |
< |
"a4 %08lx a5 %08lx a6 %08lx a7 %08lx\n" |
524 |
> |
printf("FATAL: EMUL_OP called with bogus opcode %04x\n", opcode); |
525 |
> |
printf("d0 %08x d1 %08x d2 %08x d3 %08x\n" |
526 |
> |
"d4 %08x d5 %08x d6 %08x d7 %08x\n" |
527 |
> |
"a0 %08x a1 %08x a2 %08x a3 %08x\n" |
528 |
> |
"a4 %08x a5 %08x a6 %08x a7 %08x\n" |
529 |
|
"sr %04x\n", |
530 |
|
r->d[0], r->d[1], r->d[2], r->d[3], r->d[4], r->d[5], r->d[6], r->d[7], |
531 |
|
r->a[0], r->a[1], r->a[2], r->a[3], r->a[4], r->a[5], r->a[6], r->a[7], |
532 |
|
r->sr); |
533 |
< |
#if ENABLE_MON |
533 |
> |
#ifdef ENABLE_MON |
534 |
|
char *arg[2] = {"rmon", NULL}; |
535 |
|
mon(1, arg); |
536 |
|
#endif |