ViewVC Help
View File | Revision Log | Show Annotations | Revision Graph | Root Listing
root/cebix/BasiliskII/src/emul_op.cpp
(Generate patch)

Comparing BasiliskII/src/emul_op.cpp (file contents):
Revision 1.1.1.1 by cebix, 1999-10-03T14:16:25Z vs.
Revision 1.37 by cebix, 2010-02-21T12:00:01Z

# Line 1 | Line 1
1   /*
2   *  emul_op.cpp - 68k opcodes for ROM patches
3   *
4 < *  Basilisk II (C) 1997-1999 Christian Bauer
4 > *  Basilisk II (C) 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
# Line 39 | Line 39
39   #include "video.h"
40   #include "audio.h"
41   #include "ether.h"
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  
# Line 55 | Line 60 | void EmulOp(uint16 opcode, M68kRegisters
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 +                        VideoQuitFullScreen();
72 + #ifdef ENABLE_MON
73 +                        const char *arg[4] = {"mon", "-m", "-r", NULL};
74 +                        mon(3, arg);
75 + #endif
76                          QuitEmulator();
77                          break;
78                  }
# Line 75 | Line 85 | void EmulOp(uint16 opcode, M68kRegisters
85                          D(bug("*** RESET ***\n"));
86                          TimerReset();
87                          EtherReset();
88 +                        AudioReset();
89  
90                          // Create BootGlobs at top of memory
91 <                        memset((void *)(RAMBaseHost + RAMSize - 4096), 0, 4096);
91 >                        Mac_memset(RAMBaseMac + RAMSize - 4096, 0, 4096);
92                          uint32 boot_globs = RAMBaseMac + RAMSize - 0x1c;
93                          WriteMacInt32(boot_globs + 0x00, RAMBaseMac);   // First RAM bank
94                          WriteMacInt32(boot_globs + 0x04, RAMSize);
# Line 152 | Line 163 | void EmulOp(uint16 opcode, M68kRegisters
163                                          }
164                                  } else if (reg < 0x08 && is_read) {
165                                          uint32 t = TimerDateTime();
166 <                                        uint8 b;
166 >                                        uint8 b = t;
167                                          switch (reg & 3) {
157                                                case 0: b = t; break;
168                                                  case 1: b = t >> 8; break;
169                                                  case 2: b = t >> 16; break;
170                                                  case 3: b = t >> 24; break;
# Line 187 | Line 197 | void EmulOp(uint16 opcode, M68kRegisters
197                          break;
198  
199                  case M68K_EMUL_OP_FIX_BOOTSTACK:        // Set boot stack to 3/4 of RAM (7.5)
190                        D(bug("Fix boot stack\n"));
200                          r->a[1] = RAMBaseMac + RAMSize * 3 / 4;
201 +                        D(bug("Fix boot stack %08x\n", r->a[1]));
202                          break;
203  
204                  case M68K_EMUL_OP_FIX_MEMSIZE: {        // Set correct logical and physical memory size
# Line 226 | Line 236 | void EmulOp(uint16 opcode, M68kRegisters
236  
237                          // Install PutScrap() patch
238                          M68kRegisters r;
239 <                        r.d[0] = 0xa9fe;
240 <                        r.a[0] = PutScrapPatch;
241 <                        Execute68kTrap(0xa647, &r);             // SetToolTrap()
239 >                        if (PutScrapPatch) {
240 >                                r.d[0] = 0xa9fe;
241 >                                r.a[0] = PutScrapPatch;
242 >                                Execute68kTrap(0xa647, &r);     // SetToolTrap()
243 >                        }
244 >
245 >                        // Install GetScrap() patch
246 >                        if (GetScrapPatch) {
247 >                                r.d[0] = 0xa9fd;
248 >                                r.a[0] = GetScrapPatch;
249 >                                Execute68kTrap(0xa647, &r);     // SetToolTrap()
250 >                        }
251  
252                          // Setup fake ASC registers
253                          if (ROMVersion == ROM_VERSION_32) {
# Line 296 | Line 315 | void EmulOp(uint16 opcode, M68kRegisters
315                          break;
316  
317                  case M68K_EMUL_OP_VIDEO_OPEN:           // Video driver functions
318 <                        r->d[0] = VideoOpen(r->a[0], r->a[1]);
318 >                        r->d[0] = VideoDriverOpen(r->a[0], r->a[1]);
319                          break;
320  
321                  case M68K_EMUL_OP_VIDEO_CONTROL:
322 <                        r->d[0] = VideoControl(r->a[0], r->a[1]);
322 >                        r->d[0] = VideoDriverControl(r->a[0], r->a[1]);
323                          break;
324  
325                  case M68K_EMUL_OP_VIDEO_STATUS:
326 <                        r->d[0] = VideoStatus(r->a[0], r->a[1]);
326 >                        r->d[0] = VideoDriverStatus(r->a[0], r->a[1]);
327                          break;
328  
329                  case M68K_EMUL_OP_SERIAL_OPEN:          // Serial driver functions
# Line 336 | Line 355 | void EmulOp(uint16 opcode, M68kRegisters
355                          break;
356  
357                  case M68K_EMUL_OP_ETHER_READ_PACKET:
358 <                        EtherReadPacket((uint8 **)&r->a[0], r->a[3], r->d[3], r->d[1]);
358 >                        EtherReadPacket(r->a[0], r->a[3], r->d[3], r->d[1]);
359 >                        break;
360 >
361 >                case M68K_EMUL_OP_SOUNDIN_OPEN:         // Sound input driver functions
362 >                        r->d[0] = SoundInOpen(r->a[0], r->a[1]);
363 >                        break;
364 >
365 >                case M68K_EMUL_OP_SOUNDIN_PRIME:
366 >                        r->d[0] = SoundInPrime(r->a[0], r->a[1]);
367 >                        break;
368 >
369 >                case M68K_EMUL_OP_SOUNDIN_CONTROL:
370 >                        r->d[0] = SoundInControl(r->a[0], r->a[1]);
371 >                        break;
372 >
373 >                case M68K_EMUL_OP_SOUNDIN_STATUS:
374 >                        r->d[0] = SoundInStatus(r->a[0], r->a[1]);
375 >                        break;
376 >
377 >                case M68K_EMUL_OP_SOUNDIN_CLOSE:
378 >                        r->d[0] = SoundInClose(r->a[0], r->a[1]);
379                          break;
380  
381                  case M68K_EMUL_OP_SCSI_DISPATCH: {      // SCSIDispatch() replacement
# Line 402 | Line 441 | void EmulOp(uint16 opcode, M68kRegisters
441                          break;
442                  }
443  
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
444                  case M68K_EMUL_OP_IRQ:                  // Level 1 interrupt
445                          r->d[0] = 0;
446 +
447                          if (InterruptFlags & INTFLAG_60HZ) {
448                                  ClearInterruptFlag(INTFLAG_60HZ);
449 +
450 +                                // Increment Ticks variable
451 +                                WriteMacInt32(0x16a, ReadMacInt32(0x16a) + 1);
452 +
453                                  if (HasMacStarted()) {
454  
455 <                                        // Mac has started, execute video, ADB and Time Manager interrupt functions
439 <                                        ADBInterrupt();
455 >                                        // Mac has started, execute all 60Hz interrupt functions
456                                          TimerInterrupt();
457                                          VideoInterrupt();
458  
# Line 450 | Line 466 | void EmulOp(uint16 opcode, M68kRegisters
466                                          r->d[0] = 1;                    // Flag: 68k interrupt routine executes VBLTasks etc.
467                                  }
468                          }
469 +
470 +                        if (InterruptFlags & INTFLAG_1HZ) {
471 +                                ClearInterruptFlag(INTFLAG_1HZ);
472 +                                if (HasMacStarted()) {
473 +                                        SonyInterrupt();
474 +                                        DiskInterrupt();
475 +                                        CDROMInterrupt();
476 +                                }
477 +                        }
478 +
479                          if (InterruptFlags & INTFLAG_SERIAL) {
480                                  ClearInterruptFlag(INTFLAG_SERIAL);
481                                  SerialInterrupt();
482                          }
483 +
484                          if (InterruptFlags & INTFLAG_ETHER) {
485                                  ClearInterruptFlag(INTFLAG_ETHER);
486                                  EtherInterrupt();
487                          }
488 +
489                          if (InterruptFlags & INTFLAG_AUDIO) {
490                                  ClearInterruptFlag(INTFLAG_AUDIO);
491                                  AudioInterrupt();
492                          }
493 +
494 +                        if (InterruptFlags & INTFLAG_ADB) {
495 +                                ClearInterruptFlag(INTFLAG_ADB);
496 +                                if (HasMacStarted())
497 +                                        ADBInterrupt();
498 +                        }
499 +
500 +                        if (InterruptFlags & INTFLAG_NMI) {
501 +                                ClearInterruptFlag(INTFLAG_NMI);
502 +                                if (HasMacStarted())
503 +                                        TriggerNMI();
504 +                        }
505                          break;
506  
507                  case M68K_EMUL_OP_PUT_SCRAP: {          // PutScrap() patch
# Line 472 | Line 512 | void EmulOp(uint16 opcode, M68kRegisters
512                          break;
513                  }
514  
515 +                case M68K_EMUL_OP_GET_SCRAP: {          // GetScrap() patch
516 +                        void **scrap_handle = (void **)Mac2HostAddr(ReadMacInt32(r->a[7] + 4));
517 +                        uint32 type = ReadMacInt32(r->a[7] + 8);
518 +                        int32 length = ReadMacInt32(r->a[7] + 12);
519 +                        GetScrap(scrap_handle, type, length);
520 +                        break;
521 +                }
522 +
523                  case M68K_EMUL_OP_CHECKLOAD: {          // vCheckLoad() patch (resource loader)
524                          uint32 type = r->d[1];
525                          int16 id = ReadMacInt16(r->a[2]);
# Line 490 | Line 538 | void EmulOp(uint16 opcode, M68kRegisters
538                          r->d[0] = AudioDispatch(r->a[3], r->a[4]);
539                          break;
540  
541 + #if SUPPORTS_EXTFS
542 +                case M68K_EMUL_OP_EXTFS_COMM:           // External file system routines
543 +                        WriteMacInt16(r->a[7] + 14, ExtFSComm(ReadMacInt16(r->a[7] + 12), ReadMacInt32(r->a[7] + 8), ReadMacInt32(r->a[7] + 4)));
544 +                        break;
545 +
546 +                case M68K_EMUL_OP_EXTFS_HFS:
547 +                        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)));
548 +                        break;
549 + #endif
550 +
551 +                case M68K_EMUL_OP_BLOCK_MOVE:           // BlockMove() cache flushing
552 +                        FlushCodeCache(Mac2HostAddr(r->a[0]), r->a[1]);
553 +                        break;
554 +
555 +                case M68K_EMUL_OP_DEBUGUTIL:
556 +                //      printf("DebugUtil d0=%08lx  a5=%08lx\n", r->d[0], r->a[5]);
557 +                        r->d[0] = DebugUtil(r->d[0]);
558 +                        break;
559 +
560 +                case M68K_EMUL_OP_IDLE_TIME:    // SynchIdleTime() patch
561 +                        // Sleep if no events pending
562 +                        if (ReadMacInt32(0x14c) == 0)
563 +                                idle_wait();
564 +                        r->a[0] = ReadMacInt32(0x2b6);
565 +                        break;
566 +
567                  default:
568                          printf("FATAL: EMUL_OP called with bogus opcode %08x\n", opcode);
569 <                        printf("d0 %08lx d1 %08lx d2 %08lx d3 %08lx\n"
570 <                                   "d4 %08lx d5 %08lx d6 %08lx d7 %08lx\n"
571 <                                   "a0 %08lx a1 %08lx a2 %08lx a3 %08lx\n"
572 <                                   "a4 %08lx a5 %08lx a6 %08lx a7 %08lx\n"
569 >                        printf("d0 %08x d1 %08x d2 %08x d3 %08x\n"
570 >                                   "d4 %08x d5 %08x d6 %08x d7 %08x\n"
571 >                                   "a0 %08x a1 %08x a2 %08x a3 %08x\n"
572 >                                   "a4 %08x a5 %08x a6 %08x a7 %08x\n"
573                                     "sr %04x\n",
574                                     r->d[0], r->d[1], r->d[2], r->d[3], r->d[4], r->d[5], r->d[6], r->d[7],
575                                     r->a[0], r->a[1], r->a[2], r->a[3], r->a[4], r->a[5], r->a[6], r->a[7],
576                                     r->sr);
577 + #ifdef ENABLE_MON
578 +                        const char *arg[4] = {"mon", "-m", "-r", NULL};
579 +                        mon(3, arg);
580 + #endif
581                          QuitEmulator();
582                          break;
583          }

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines