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 |
+ |
#ifdef ENABLE_MON |
46 |
+ |
#include "mon.h" |
47 |
+ |
#endif |
48 |
+ |
|
49 |
|
#define DEBUG 0 |
50 |
|
#include "debug.h" |
51 |
|
|
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 |
+ |
#ifdef ENABLE_MON |
72 |
+ |
char *arg[2] = {"rmon", NULL}; |
73 |
+ |
mon(1, arg); |
74 |
+ |
#endif |
75 |
|
QuitEmulator(); |
76 |
|
break; |
77 |
|
} |
84 |
|
D(bug("*** RESET ***\n")); |
85 |
|
TimerReset(); |
86 |
|
EtherReset(); |
87 |
+ |
AudioReset(); |
88 |
|
|
89 |
|
// Create BootGlobs at top of memory |
90 |
< |
memset((void *)(RAMBaseHost + RAMSize - 4096), 0, 4096); |
90 |
> |
Mac_memset(RAMBaseMac + RAMSize - 4096, 0, 4096); |
91 |
|
uint32 boot_globs = RAMBaseMac + RAMSize - 0x1c; |
92 |
|
WriteMacInt32(boot_globs + 0x00, RAMBaseMac); // First RAM bank |
93 |
|
WriteMacInt32(boot_globs + 0x04, RAMSize); |
196 |
|
break; |
197 |
|
|
198 |
|
case M68K_EMUL_OP_FIX_BOOTSTACK: // Set boot stack to 3/4 of RAM (7.5) |
190 |
– |
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 |
431 |
|
break; |
432 |
|
} |
433 |
|
|
405 |
– |
case M68K_EMUL_OP_MEMORY_DISPATCH: { // MemoryDispatch() replacement routine |
406 |
– |
int16 sel = r->d[0]; |
407 |
– |
D(bug("MemoryDispatch(%d)\n", sel)); |
408 |
– |
switch (sel) { |
409 |
– |
case -6: // GetLogicalRAMSize |
410 |
– |
r->d[0] = RAMSize; |
411 |
– |
break; |
412 |
– |
case -3: |
413 |
– |
r->d[0] = 0x1000; |
414 |
– |
break; |
415 |
– |
case 0: // HoldMemory |
416 |
– |
case 1: // UnholdMemory |
417 |
– |
case 2: // LockMemory |
418 |
– |
case 3: // UnlockMemory |
419 |
– |
case 4: // LockMemoryContiguous |
420 |
– |
case 6: // ProtectMemory |
421 |
– |
case 7: // UnprotectMemory |
422 |
– |
r->d[0] = 0; |
423 |
– |
break; |
424 |
– |
default: |
425 |
– |
printf("FATAL: MemoryDispatch(%d): illegal selector\n", sel); |
426 |
– |
r->d[0] = (uint32)-502; |
427 |
– |
break; |
428 |
– |
} |
429 |
– |
break; |
430 |
– |
} |
431 |
– |
|
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(); |
442 |
– |
SonyInterrupt(); |
443 |
– |
DiskInterrupt(); |
444 |
– |
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(); |
506 |
|
r->d[0] = AudioDispatch(r->a[3], r->a[4]); |
507 |
|
break; |
508 |
|
|
509 |
+ |
#if SUPPORTS_EXTFS |
510 |
|
case M68K_EMUL_OP_EXTFS_COMM: // External file system routines |
511 |
|
WriteMacInt16(r->a[7] + 14, ExtFSComm(ReadMacInt16(r->a[7] + 12), ReadMacInt32(r->a[7] + 8), ReadMacInt32(r->a[7] + 4))); |
512 |
|
break; |
514 |
|
case M68K_EMUL_OP_EXTFS_HFS: |
515 |
|
WriteMacInt16(r->a[7] + 20, ExtFSHFS(ReadMacInt32(r->a[7] + 16), ReadMacInt16(r->a[7] + 14), ReadMacInt32(r->a[7] + 10), ReadMacInt32(r->a[7] + 6), ReadMacInt16(r->a[7] + 4))); |
516 |
|
break; |
517 |
+ |
#endif |
518 |
+ |
|
519 |
+ |
case M68K_EMUL_OP_BLOCK_MOVE: // BlockMove() replacement |
520 |
+ |
memmove(Mac2HostAddr(r->a[1]), Mac2HostAddr(r->a[0]), r->d[0]); |
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 |
+ |
#ifdef ENABLE_MON |
534 |
+ |
char *arg[2] = {"rmon", NULL}; |
535 |
+ |
mon(1, arg); |
536 |
+ |
#endif |
537 |
|
QuitEmulator(); |
538 |
|
break; |
539 |
|
} |