1 |
|
/* |
2 |
|
* main_beos.cpp - Emulation core, BeOS implementation |
3 |
|
* |
4 |
< |
* SheepShaver (C) 1997-2002 Christian Bauer and Marc Hellwig |
4 |
> |
* SheepShaver (C) 1997-2005 Christian Bauer and Marc Hellwig |
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 |
74 |
|
#include "xpram.h" |
75 |
|
#include "timer.h" |
76 |
|
#include "adb.h" |
77 |
– |
#include "sony.h" |
78 |
– |
#include "disk.h" |
79 |
– |
#include "cdrom.h" |
80 |
– |
#include "scsi.h" |
77 |
|
#include "video.h" |
82 |
– |
#include "audio.h" |
83 |
– |
#include "ether.h" |
84 |
– |
#include "serial.h" |
85 |
– |
#include "clip.h" |
86 |
– |
#include "extfs.h" |
78 |
|
#include "sys.h" |
79 |
|
#include "macos_util.h" |
80 |
|
#include "rom_patches.h" |
81 |
|
#include "user_strings.h" |
91 |
– |
#include "thunks.h" |
82 |
|
|
83 |
|
#include "sheep_driver.h" |
84 |
|
|
107 |
|
const char RAM_AREA_NAME[] = "Macintosh RAM"; |
108 |
|
const char ROM_AREA_NAME[] = "Macintosh ROM"; |
109 |
|
const char DR_CACHE_AREA_NAME[] = "Macintosh DR Cache"; |
110 |
+ |
const char DR_EMULATOR_AREA_NAME[] = "Macintosh DR Emulator"; |
111 |
|
const char SHEEP_AREA_NAME[] = "SheepShaver Virtual Stack"; |
112 |
|
|
113 |
|
const uint32 SIG_STACK_SIZE = 8192; // Size of signal stack |
133 |
|
// Initialize other variables |
134 |
|
sheep_fd = -1; |
135 |
|
emulator_data = NULL; |
136 |
< |
kernel_area = kernel_area2 = rom_area = ram_area = dr_cache_area = -1; |
136 |
> |
kernel_area = kernel_area2 = rom_area = ram_area = dr_cache_area = dr_emulator_area = -1; |
137 |
|
emul_thread = nvram_thread = tick_thread = -1; |
138 |
|
ReadyForSignals = false; |
139 |
|
AllowQuitting = true; |
181 |
|
area_id rom_area; // ROM area ID |
182 |
|
area_id ram_area; // RAM area ID |
183 |
|
area_id dr_cache_area; // DR Cache area ID |
184 |
+ |
area_id dr_emulator_area; // DR Emulator area ID |
185 |
|
|
186 |
|
struct sigaction sigusr1_action; // Interrupt signal (of emulator thread) |
187 |
|
struct sigaction sigsegv_action; // Data access exception signal (of emulator thread) |
205 |
|
uint32 KernelDataAddr; // Address of Kernel Data |
206 |
|
uint32 BootGlobsAddr; // Address of BootGlobs structure at top of Mac RAM |
207 |
|
uint32 DRCacheAddr; // Address of DR Cache |
208 |
+ |
uint32 DREmulatorAddr; // Address of DR Emulator |
209 |
|
uint32 PVR; // Theoretical PVR |
210 |
|
int64 CPUClockSpeed; // Processor clock speed (Hz) |
211 |
|
int64 BusClockSpeed; // Bus clock speed (Hz) |
212 |
+ |
int64 TimebaseSpeed; // Timebase clock speed (Hz) |
213 |
|
system_info SysInfo; // System information |
214 |
+ |
uint8 *RAMBaseHost; // Base address of Mac RAM (host address space) |
215 |
+ |
uint8 *ROMBaseHost; // Base address of Mac ROM (host address space) |
216 |
|
|
217 |
|
static void *sig_stack = NULL; // Stack for signal handlers |
218 |
|
static void *extra_stack = NULL; // Stack for SIGSEGV inside interrupt handler |
219 |
+ |
uint32 SheepMem::page_size; // Size of a native page |
220 |
|
uintptr SheepMem::zero_page = 0; // Address of ro page filled in with zeros |
221 |
|
uintptr SheepMem::base; // Address of SheepShaver data |
222 |
< |
uintptr SheepMem::top; // Top of SheepShaver data (stack like storage) |
222 |
> |
uintptr SheepMem::proc; // Bottom address of SheepShave procedures |
223 |
> |
uintptr SheepMem::data; // Top of SheepShaver data (stack like storage) |
224 |
|
static area_id SheepMemArea; // SheepShaver data area ID |
225 |
|
|
226 |
|
|
293 |
|
} |
294 |
|
CPUClockSpeed = SysInfo.cpu_clock_speed; |
295 |
|
BusClockSpeed = SysInfo.bus_clock_speed; |
296 |
+ |
TimebaseSpeed = BusClockSpeed / 4; |
297 |
|
|
298 |
|
// Delete old areas |
299 |
|
area_id old_kernel_area = find_area(KERNEL_AREA_NAME); |
311 |
|
area_id old_dr_cache_area = find_area(DR_CACHE_AREA_NAME); |
312 |
|
if (old_dr_cache_area > 0) |
313 |
|
delete_area(old_dr_cache_area); |
314 |
+ |
area_id old_dr_emulator_area = find_area(DR_EMULATOR_AREA_NAME); |
315 |
+ |
if (old_dr_emulator_area > 0) |
316 |
+ |
delete_area(old_dr_emulator_area); |
317 |
|
|
318 |
|
// Read preferences |
319 |
|
int argc = 0; |
361 |
|
void SheepShaver::StartEmulator(void) |
362 |
|
{ |
363 |
|
char str[256]; |
362 |
– |
int16 i16; |
364 |
|
|
365 |
|
// Open sheep driver and remap low memory |
366 |
|
sheep_fd = open("/dev/sheep", 0); |
403 |
|
|
404 |
|
// Create area for SheepShaver data |
405 |
|
if (!SheepMem::Init()) { |
406 |
< |
sprintf(str, GetString(STR_NO_SHEEP_MEM_AREA_ERR)); |
406 |
> |
sprintf(str, GetString(STR_NO_SHEEP_MEM_AREA_ERR), strerror(SheepMemArea), SheepMemArea); |
407 |
|
ErrorAlert(str); |
408 |
|
PostMessage(B_QUIT_REQUESTED); |
409 |
|
return; |
424 |
|
PostMessage(B_QUIT_REQUESTED); |
425 |
|
return; |
426 |
|
} |
427 |
< |
D(bug("RAM area %ld at %p\n", ram_area, RAMBase)); |
427 |
> |
RAMBaseHost = (uint8 *)RAMBase |
428 |
> |
D(bug("RAM area %ld at %p\n", ram_area, RAMBaseHost)); |
429 |
|
|
430 |
|
// Create area and load Mac ROM |
431 |
|
try { |
459 |
|
} |
460 |
|
D(bug("DR Cache area %ld at %p\n", dr_cache_area, DRCacheAddr)); |
461 |
|
|
462 |
< |
// Load NVRAM |
463 |
< |
XPRAMInit(); |
464 |
< |
|
465 |
< |
// Set boot volume |
466 |
< |
i16 = PrefsFindInt32("bootdrive"); |
467 |
< |
XPRAM[0x1378] = i16 >> 8; |
466 |
< |
XPRAM[0x1379] = i16 & 0xff; |
467 |
< |
i16 = PrefsFindInt32("bootdriver"); |
468 |
< |
XPRAM[0x137a] = i16 >> 8; |
469 |
< |
XPRAM[0x137b] = i16 & 0xff; |
470 |
< |
|
471 |
< |
// Create BootGlobs at top of Mac memory |
472 |
< |
memset((void *)(RAMBase + RAMSize - 4096), 0, 4096); |
473 |
< |
BootGlobsAddr = RAMBase + RAMSize - 0x1c; |
474 |
< |
uint32 *boot_globs = (uint32 *)BootGlobsAddr; |
475 |
< |
boot_globs[-5] = htonl(RAMBase + RAMSize); // MemTop |
476 |
< |
boot_globs[0] = htonl(RAMBase); // First RAM bank |
477 |
< |
boot_globs[1] = htonl(RAMSize); |
478 |
< |
boot_globs[2] = htonl((uint32)-1); // End of bank table |
479 |
< |
|
480 |
< |
// Init thunks |
481 |
< |
if (!InitThunks()) { |
482 |
< |
PostMessage(B_QUIT_REQUESTED); |
483 |
< |
return; |
484 |
< |
} |
485 |
< |
|
486 |
< |
// Init drivers |
487 |
< |
SonyInit(); |
488 |
< |
DiskInit(); |
489 |
< |
CDROMInit(); |
490 |
< |
SCSIInit(); |
491 |
< |
|
492 |
< |
// Init external file system |
493 |
< |
ExtFSInit(); |
494 |
< |
|
495 |
< |
// Init audio |
496 |
< |
AudioInit(); |
497 |
< |
|
498 |
< |
// Init network |
499 |
< |
EtherInit(); |
500 |
< |
|
501 |
< |
// Init serial ports |
502 |
< |
SerialInit(); |
503 |
< |
|
504 |
< |
// Init Time Manager |
505 |
< |
TimerInit(); |
506 |
< |
|
507 |
< |
// Init clipboard |
508 |
< |
ClipInit(); |
509 |
< |
|
510 |
< |
// Init video |
511 |
< |
if (!VideoInit()) { |
462 |
> |
// Create area for DR Emulator |
463 |
> |
DREmulatorAddr = DR_EMULATOR_BASE; |
464 |
> |
dr_emulator_area = create_area(DR_EMULATOR_AREA_NAME, (void **)&DREmulatorAddr, B_EXACT_ADDRESS, DR_EMULATOR_SIZE, B_NO_LOCK, B_READ_AREA | B_WRITE_AREA); |
465 |
> |
if (dr_emulator_area < 0) { |
466 |
> |
sprintf(str, GetString(STR_NO_KERNEL_DATA_ERR), strerror(dr_emulator_area), dr_emulator_area); |
467 |
> |
ErrorAlert(str); |
468 |
|
PostMessage(B_QUIT_REQUESTED); |
469 |
|
return; |
470 |
|
} |
471 |
+ |
D(bug("DR Emulator area %ld at %p\n", dr_emulator_area, DREmulatorAddr)); |
472 |
|
|
473 |
< |
// Install ROM patches |
474 |
< |
if (!PatchROM()) { |
518 |
< |
ErrorAlert(GetString(STR_UNSUPPORTED_ROM_TYPE_ERR)); |
473 |
> |
// Initialize everything |
474 |
> |
if (!InitAll()) { |
475 |
|
PostMessage(B_QUIT_REQUESTED); |
476 |
|
return; |
477 |
|
} |
478 |
+ |
D(bug("Initialization complete\n")); |
479 |
|
|
480 |
|
// Clear caches (as we loaded and patched code) and write protect ROM |
481 |
|
#if !EMULATED_PPC |
482 |
< |
clear_caches((void *)ROM_BASE, ROM_AREA_SIZE, B_INVALIDATE_ICACHE | B_FLUSH_DCACHE); |
482 |
> |
clear_caches(ROMBaseHost, ROM_AREA_SIZE, B_INVALIDATE_ICACHE | B_FLUSH_DCACHE); |
483 |
|
#endif |
484 |
|
set_area_protection(rom_area, B_READ_AREA); |
485 |
|
|
529 |
– |
// Initialize Kernel Data |
530 |
– |
memset(kernel_data, 0, sizeof(KernelData)); |
531 |
– |
if (ROMType == ROMTYPE_NEWWORLD) { |
532 |
– |
static uint32 of_dev_tree[4] = {0, 0, 0, 0}; |
533 |
– |
static uint8 vector_lookup_tbl[128]; |
534 |
– |
static uint8 vector_mask_tbl[64]; |
535 |
– |
memset((uint8 *)kernel_data + 0xb80, 0x3d, 0x80); |
536 |
– |
memset(vector_lookup_tbl, 0, 128); |
537 |
– |
memset(vector_mask_tbl, 0, 64); |
538 |
– |
kernel_data->v[0xb80 >> 2] = htonl(ROM_BASE); |
539 |
– |
kernel_data->v[0xb84 >> 2] = htonl((uint32)of_dev_tree); // OF device tree base |
540 |
– |
kernel_data->v[0xb90 >> 2] = htonl((uint32)vector_lookup_tbl); |
541 |
– |
kernel_data->v[0xb94 >> 2] = htonl((uint32)vector_mask_tbl); |
542 |
– |
kernel_data->v[0xb98 >> 2] = htonl(ROM_BASE); // OpenPIC base |
543 |
– |
kernel_data->v[0xbb0 >> 2] = htonl(0); // ADB base |
544 |
– |
kernel_data->v[0xc20 >> 2] = htonl(RAMSize); |
545 |
– |
kernel_data->v[0xc24 >> 2] = htonl(RAMSize); |
546 |
– |
kernel_data->v[0xc30 >> 2] = htonl(RAMSize); |
547 |
– |
kernel_data->v[0xc34 >> 2] = htonl(RAMSize); |
548 |
– |
kernel_data->v[0xc38 >> 2] = htonl(0x00010020); |
549 |
– |
kernel_data->v[0xc3c >> 2] = htonl(0x00200001); |
550 |
– |
kernel_data->v[0xc40 >> 2] = htonl(0x00010000); |
551 |
– |
kernel_data->v[0xc50 >> 2] = htonl(RAMBase); |
552 |
– |
kernel_data->v[0xc54 >> 2] = htonl(RAMSize); |
553 |
– |
kernel_data->v[0xf60 >> 2] = htonl(PVR); |
554 |
– |
kernel_data->v[0xf64 >> 2] = htonl(CPUClockSpeed); |
555 |
– |
kernel_data->v[0xf68 >> 2] = htonl(BusClockSpeed); |
556 |
– |
kernel_data->v[0xf6c >> 2] = htonl(CPUClockSpeed); |
557 |
– |
} else { |
558 |
– |
kernel_data->v[0xc80 >> 2] = htonl(RAMSize); |
559 |
– |
kernel_data->v[0xc84 >> 2] = htonl(RAMSize); |
560 |
– |
kernel_data->v[0xc90 >> 2] = htonl(RAMSize); |
561 |
– |
kernel_data->v[0xc94 >> 2] = htonl(RAMSize); |
562 |
– |
kernel_data->v[0xc98 >> 2] = htonl(0x00010020); |
563 |
– |
kernel_data->v[0xc9c >> 2] = htonl(0x00200001); |
564 |
– |
kernel_data->v[0xca0 >> 2] = htonl(0x00010000); |
565 |
– |
kernel_data->v[0xcb0 >> 2] = htonl(RAMBase); |
566 |
– |
kernel_data->v[0xcb4 >> 2] = htonl(RAMSize); |
567 |
– |
kernel_data->v[0xf80 >> 2] = htonl(PVR); |
568 |
– |
kernel_data->v[0xf84 >> 2] = htonl(CPUClockSpeed); |
569 |
– |
kernel_data->v[0xf88 >> 2] = htonl(BusClockSpeed); |
570 |
– |
kernel_data->v[0xf8c >> 2] = htonl(CPUClockSpeed); |
571 |
– |
} |
572 |
– |
|
486 |
|
// Initialize extra low memory |
487 |
< |
D(bug("Initializing Low Memory...\n")); |
575 |
< |
memset(NULL, 0, 0x3000); |
576 |
< |
WriteMacInt32(XLM_SIGNATURE, 'Baah'); // Signature to detect SheepShaver |
577 |
< |
WriteMacInt32(XLM_KERNEL_DATA, (uint32)kernel_data); // For trap replacement routines |
487 |
> |
D(bug("Initializing extra Low Memory...\n")); |
488 |
|
WriteMacInt32(XLM_SHEEP_OBJ, (uint32)this); // Pointer to SheepShaver object |
489 |
< |
WriteMacInt32(XLM_PVR, PVR); // Theoretical PVR |
580 |
< |
WriteMacInt32(XLM_BUS_CLOCK, BusClockSpeed); // For DriverServicesLib patch |
581 |
< |
WriteMacInt16(XLM_EXEC_RETURN_OPCODE, M68K_EXEC_RETURN); // For Execute68k() (RTS from the executed 68k code will jump here and end 68k mode) |
582 |
< |
WriteMacInt32(XLM_ZERO_PAGE, SheepMem::ZeroPage()); // Pointer to read-only page with all bits set to 0 |
583 |
< |
#if !EMULATED_PPC |
584 |
< |
WriteMacInt32(XLM_TOC, (uint32)TOC); // TOC pointer of emulator |
585 |
< |
WriteMacInt32(XLM_ETHER_INIT, *(uint32 *)InitStreamModule); // DLPI ethernet driver functions |
586 |
< |
WriteMacInt32(XLM_ETHER_TERM, *(uint32 *)TerminateStreamModule); |
587 |
< |
WriteMacInt32(XLM_ETHER_OPEN, *(uint32 *)ether_open); |
588 |
< |
WriteMacInt32(XLM_ETHER_CLOSE, *(uint32 *)ether_close); |
589 |
< |
WriteMacInt32(XLM_ETHER_WPUT, *(uint32 *)ether_wput); |
590 |
< |
WriteMacInt32(XLM_ETHER_RSRV, *(uint32 *)ether_rsrv); |
591 |
< |
WriteMacInt32(XLM_VIDEO_DOIO, *(uint32 *)VideoDoDriverIO); |
592 |
< |
#endif |
593 |
< |
D(bug("Low Memory initialized\n")); |
489 |
> |
D(bug("Extra Low Memory initialized\n")); |
490 |
|
|
491 |
|
// Disallow quitting with Alt-Q from now on |
492 |
|
AllowQuitting = false; |
542 |
|
if (emul_thread > 0) |
543 |
|
wait_for_thread(emul_thread, &l); |
544 |
|
|
545 |
< |
// Save NVRAM |
546 |
< |
XPRAMExit(); |
651 |
< |
|
652 |
< |
// Exit clipboard |
653 |
< |
ClipExit(); |
654 |
< |
|
655 |
< |
// Exit Time Manager |
656 |
< |
TimerExit(); |
657 |
< |
|
658 |
< |
// Exit serial |
659 |
< |
SerialExit(); |
660 |
< |
|
661 |
< |
// Exit network |
662 |
< |
EtherExit(); |
663 |
< |
|
664 |
< |
// Exit audio |
665 |
< |
AudioExit(); |
666 |
< |
|
667 |
< |
// Exit video |
668 |
< |
VideoExit(); |
669 |
< |
|
670 |
< |
// Exit external file system |
671 |
< |
ExtFSExit(); |
672 |
< |
|
673 |
< |
// Exit drivers |
674 |
< |
SCSIExit(); |
675 |
< |
CDROMExit(); |
676 |
< |
DiskExit(); |
677 |
< |
SonyExit(); |
678 |
< |
|
679 |
< |
// Delete thunks |
680 |
< |
ThunksExit(); |
545 |
> |
// Deinitialize everything |
546 |
> |
ExitAll(); |
547 |
|
|
548 |
|
// Delete SheepShaver globals |
549 |
|
SheepMem::Exit(); |
550 |
|
|
551 |
+ |
// Delete DR Emulator area |
552 |
+ |
if (dr_emulator_area >= 0) |
553 |
+ |
delete_area(dr_emulator_area); |
554 |
+ |
|
555 |
|
// Delete DR Cache area |
556 |
|
if (dr_cache_area >= 0) |
557 |
|
delete_area(dr_cache_area); |
596 |
|
|
597 |
|
void SheepShaver::init_rom(void) |
598 |
|
{ |
599 |
+ |
// Size of a native page |
600 |
+ |
page_size = B_PAGE_SIZE; |
601 |
+ |
|
602 |
|
// Create area for ROM |
603 |
< |
void *rom_addr = (void *)ROM_BASE; |
604 |
< |
rom_area = create_area(ROM_AREA_NAME, &rom_addr, B_EXACT_ADDRESS, ROM_AREA_SIZE, B_NO_LOCK, B_READ_AREA | B_WRITE_AREA); |
603 |
> |
ROMBaseHost = (uint8 *)ROM_BASE; |
604 |
> |
rom_area = create_area(ROM_AREA_NAME, (void **)&ROMBaseHost, B_EXACT_ADDRESS, ROM_AREA_SIZE, B_NO_LOCK, B_READ_AREA | B_WRITE_AREA); |
605 |
|
if (rom_area < 0) |
606 |
|
throw area_error(); |
607 |
|
D(bug("ROM area %ld at %p\n", rom_area, rom_addr)); |
1183 |
|
* Make code executable |
1184 |
|
*/ |
1185 |
|
|
1186 |
< |
void MakeExecutable(int dummy, void *start, uint32 length) |
1186 |
> |
void MakeExecutable(int dummy, uint32 start, uint32 length) |
1187 |
|
{ |
1188 |
< |
if (((uint32)start >= ROM_BASE) && ((uint32)start < (ROM_BASE + ROM_SIZE))) |
1188 |
> |
if ((start >= ROM_BASE) && (start < (ROM_BASE + ROM_SIZE))) |
1189 |
|
return; |
1190 |
< |
clear_caches(start, length, B_INVALIDATE_ICACHE | B_FLUSH_DCACHE); |
1318 |
< |
} |
1319 |
< |
|
1320 |
< |
|
1321 |
< |
/* |
1322 |
< |
* Patch things after system startup (gets called by disk driver accRun routine) |
1323 |
< |
*/ |
1324 |
< |
|
1325 |
< |
void PatchAfterStartup(void) |
1326 |
< |
{ |
1327 |
< |
ExecuteNative(NATIVE_VIDEO_INSTALL_ACCEL); |
1328 |
< |
InstallExtFS(); |
1190 |
> |
clear_caches((void *)start, length, B_INVALIDATE_ICACHE | B_FLUSH_DCACHE); |
1191 |
|
} |
1192 |
|
|
1193 |
|
|
1248 |
|
|
1249 |
|
void TriggerInterrupt(void) |
1250 |
|
{ |
1251 |
+ |
idle_resume(); |
1252 |
|
#if 0 |
1253 |
|
WriteMacInt32(0x16a, ReadMacInt32(0x16a) + 1); |
1254 |
|
#else |
1942 |
|
delete_area(old_sheep_area); |
1943 |
|
|
1944 |
|
// Create area for SheepShaver data |
1945 |
< |
base = 0x60000000; |
1945 |
> |
proc = base = 0x60000000; |
1946 |
|
SheepMemArea = create_area(SHEEP_AREA_NAME, (void **)&base, B_BASE_ADDRESS, size, B_NO_LOCK, B_READ_AREA | B_WRITE_AREA); |
1947 |
|
if (SheepMemArea < 0) |
1948 |
|
return false; |
1952 |
|
zero_page = const_zero_page; |
1953 |
|
|
1954 |
|
D(bug("SheepShaver area %ld at %p\n", SheepMemArea, base)); |
1955 |
< |
top = base + size; |
1955 |
> |
data = base + size; |
1956 |
|
return true; |
1957 |
|
} |
1958 |
|
|