--- SheepShaver/src/BeOS/main_beos.cpp 2003/12/04 23:37:35 1.7 +++ SheepShaver/src/BeOS/main_beos.cpp 2005/06/30 10:17:58 1.18 @@ -1,7 +1,7 @@ /* * main_beos.cpp - Emulation core, BeOS implementation * - * SheepShaver (C) 1997-2002 Christian Bauer and Marc Hellwig + * SheepShaver (C) 1997-2005 Christian Bauer and Marc Hellwig * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by @@ -74,21 +74,11 @@ #include "xpram.h" #include "timer.h" #include "adb.h" -#include "sony.h" -#include "disk.h" -#include "cdrom.h" -#include "scsi.h" #include "video.h" -#include "audio.h" -#include "ether.h" -#include "serial.h" -#include "clip.h" -#include "extfs.h" #include "sys.h" #include "macos_util.h" #include "rom_patches.h" #include "user_strings.h" -#include "thunks.h" #include "sheep_driver.h" @@ -117,6 +107,7 @@ const char KERNEL_AREA2_NAME[] = "Macint const char RAM_AREA_NAME[] = "Macintosh RAM"; const char ROM_AREA_NAME[] = "Macintosh ROM"; const char DR_CACHE_AREA_NAME[] = "Macintosh DR Cache"; +const char DR_EMULATOR_AREA_NAME[] = "Macintosh DR Emulator"; const char SHEEP_AREA_NAME[] = "SheepShaver Virtual Stack"; const uint32 SIG_STACK_SIZE = 8192; // Size of signal stack @@ -142,7 +133,7 @@ public: // Initialize other variables sheep_fd = -1; emulator_data = NULL; - kernel_area = kernel_area2 = rom_area = ram_area = dr_cache_area = -1; + kernel_area = kernel_area2 = rom_area = ram_area = dr_cache_area = dr_emulator_area = -1; emul_thread = nvram_thread = tick_thread = -1; ReadyForSignals = false; AllowQuitting = true; @@ -190,6 +181,7 @@ private: area_id rom_area; // ROM area ID area_id ram_area; // RAM area ID area_id dr_cache_area; // DR Cache area ID + area_id dr_emulator_area; // DR Emulator area ID struct sigaction sigusr1_action; // Interrupt signal (of emulator thread) struct sigaction sigsegv_action; // Data access exception signal (of emulator thread) @@ -213,15 +205,22 @@ uint32 RAMSize; // Size of Mac RAM uint32 KernelDataAddr; // Address of Kernel Data uint32 BootGlobsAddr; // Address of BootGlobs structure at top of Mac RAM uint32 DRCacheAddr; // Address of DR Cache +uint32 DREmulatorAddr; // Address of DR Emulator uint32 PVR; // Theoretical PVR int64 CPUClockSpeed; // Processor clock speed (Hz) int64 BusClockSpeed; // Bus clock speed (Hz) +int64 TimebaseSpeed; // Timebase clock speed (Hz) system_info SysInfo; // System information +uint8 *RAMBaseHost; // Base address of Mac RAM (host address space) +uint8 *ROMBaseHost; // Base address of Mac ROM (host address space) static void *sig_stack = NULL; // Stack for signal handlers static void *extra_stack = NULL; // Stack for SIGSEGV inside interrupt handler -static uintptr SheepMem::base; // Address of SheepShaver data -static uintptr SheepMem::top; // Top of SheepShaver data (stack like storage) +uint32 SheepMem::page_size; // Size of a native page +uintptr SheepMem::zero_page = 0; // Address of ro page filled in with zeros +uintptr SheepMem::base; // Address of SheepShaver data +uintptr SheepMem::proc; // Bottom address of SheepShave procedures +uintptr SheepMem::data; // Top of SheepShaver data (stack like storage) static area_id SheepMemArea; // SheepShaver data area ID @@ -294,6 +293,7 @@ void SheepShaver::ReadyToRun(void) } CPUClockSpeed = SysInfo.cpu_clock_speed; BusClockSpeed = SysInfo.bus_clock_speed; + TimebaseSpeed = BusClockSpeed / 4; // Delete old areas area_id old_kernel_area = find_area(KERNEL_AREA_NAME); @@ -311,6 +311,9 @@ void SheepShaver::ReadyToRun(void) area_id old_dr_cache_area = find_area(DR_CACHE_AREA_NAME); if (old_dr_cache_area > 0) delete_area(old_dr_cache_area); + area_id old_dr_emulator_area = find_area(DR_EMULATOR_AREA_NAME); + if (old_dr_emulator_area > 0) + delete_area(old_dr_emulator_area); // Read preferences int argc = 0; @@ -358,7 +361,6 @@ void SheepShaver::MessageReceived(BMessa void SheepShaver::StartEmulator(void) { char str[256]; - int16 i16; // Open sheep driver and remap low memory sheep_fd = open("/dev/sheep", 0); @@ -401,7 +403,7 @@ void SheepShaver::StartEmulator(void) // Create area for SheepShaver data if (!SheepMem::Init()) { - sprintf(str, GetString(STR_NO_SHEEP_MEM_AREA_ERR)); + sprintf(str, GetString(STR_NO_SHEEP_MEM_AREA_ERR), strerror(SheepMemArea), SheepMemArea); ErrorAlert(str); PostMessage(B_QUIT_REQUESTED); return; @@ -422,7 +424,8 @@ void SheepShaver::StartEmulator(void) PostMessage(B_QUIT_REQUESTED); return; } - D(bug("RAM area %ld at %p\n", ram_area, RAMBase)); + RAMBaseHost = (uint8 *)RAMBase + D(bug("RAM area %ld at %p\n", ram_area, RAMBaseHost)); // Create area and load Mac ROM try { @@ -456,139 +459,34 @@ void SheepShaver::StartEmulator(void) } D(bug("DR Cache area %ld at %p\n", dr_cache_area, DRCacheAddr)); - // Load NVRAM - XPRAMInit(); - - // Set boot volume - i16 = PrefsFindInt32("bootdrive"); - XPRAM[0x1378] = i16 >> 8; - XPRAM[0x1379] = i16 & 0xff; - i16 = PrefsFindInt32("bootdriver"); - XPRAM[0x137a] = i16 >> 8; - XPRAM[0x137b] = i16 & 0xff; - - // Create BootGlobs at top of Mac memory - memset((void *)(RAMBase + RAMSize - 4096), 0, 4096); - BootGlobsAddr = RAMBase + RAMSize - 0x1c; - uint32 *boot_globs = (uint32 *)BootGlobsAddr; - boot_globs[-5] = htonl(RAMBase + RAMSize); // MemTop - boot_globs[0] = htonl(RAMBase); // First RAM bank - boot_globs[1] = htonl(RAMSize); - boot_globs[2] = htonl((uint32)-1); // End of bank table - - // Init thunks - if (!InitThunks()) { - PostMessage(B_QUIT_REQUESTED); - return; - } - - // Init drivers - SonyInit(); - DiskInit(); - CDROMInit(); - SCSIInit(); - - // Init external file system - ExtFSInit(); - - // Init audio - AudioInit(); - - // Init network - EtherInit(); - - // Init serial ports - SerialInit(); - - // Init Time Manager - TimerInit(); - - // Init clipboard - ClipInit(); - - // Init video - if (!VideoInit()) { + // Create area for DR Emulator + DREmulatorAddr = DR_EMULATOR_BASE; + 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); + if (dr_emulator_area < 0) { + sprintf(str, GetString(STR_NO_KERNEL_DATA_ERR), strerror(dr_emulator_area), dr_emulator_area); + ErrorAlert(str); PostMessage(B_QUIT_REQUESTED); return; } + D(bug("DR Emulator area %ld at %p\n", dr_emulator_area, DREmulatorAddr)); - // Install ROM patches - if (!PatchROM()) { - ErrorAlert(GetString(STR_UNSUPPORTED_ROM_TYPE_ERR)); + // Initialize everything + if (!InitAll()) { PostMessage(B_QUIT_REQUESTED); return; } + D(bug("Initialization complete\n")); // Clear caches (as we loaded and patched code) and write protect ROM #if !EMULATED_PPC - clear_caches((void *)ROM_BASE, ROM_AREA_SIZE, B_INVALIDATE_ICACHE | B_FLUSH_DCACHE); + clear_caches(ROMBaseHost, ROM_AREA_SIZE, B_INVALIDATE_ICACHE | B_FLUSH_DCACHE); #endif set_area_protection(rom_area, B_READ_AREA); - // Initialize Kernel Data - memset(kernel_data, 0, sizeof(KernelData)); - if (ROMType == ROMTYPE_NEWWORLD) { - static uint32 of_dev_tree[4] = {0, 0, 0, 0}; - static uint8 vector_lookup_tbl[128]; - static uint8 vector_mask_tbl[64]; - memset((uint8 *)kernel_data + 0xb80, 0x3d, 0x80); - memset(vector_lookup_tbl, 0, 128); - memset(vector_mask_tbl, 0, 64); - kernel_data->v[0xb80 >> 2] = htonl(ROM_BASE); - kernel_data->v[0xb84 >> 2] = htonl((uint32)of_dev_tree); // OF device tree base - kernel_data->v[0xb90 >> 2] = htonl((uint32)vector_lookup_tbl); - kernel_data->v[0xb94 >> 2] = htonl((uint32)vector_mask_tbl); - kernel_data->v[0xb98 >> 2] = htonl(ROM_BASE); // OpenPIC base - kernel_data->v[0xbb0 >> 2] = htonl(0); // ADB base - kernel_data->v[0xc20 >> 2] = htonl(RAMSize); - kernel_data->v[0xc24 >> 2] = htonl(RAMSize); - kernel_data->v[0xc30 >> 2] = htonl(RAMSize); - kernel_data->v[0xc34 >> 2] = htonl(RAMSize); - kernel_data->v[0xc38 >> 2] = htonl(0x00010020); - kernel_data->v[0xc3c >> 2] = htonl(0x00200001); - kernel_data->v[0xc40 >> 2] = htonl(0x00010000); - kernel_data->v[0xc50 >> 2] = htonl(RAMBase); - kernel_data->v[0xc54 >> 2] = htonl(RAMSize); - kernel_data->v[0xf60 >> 2] = htonl(PVR); - kernel_data->v[0xf64 >> 2] = htonl(CPUClockSpeed); - kernel_data->v[0xf68 >> 2] = htonl(BusClockSpeed); - kernel_data->v[0xf6c >> 2] = htonl(CPUClockSpeed); - } else { - kernel_data->v[0xc80 >> 2] = htonl(RAMSize); - kernel_data->v[0xc84 >> 2] = htonl(RAMSize); - kernel_data->v[0xc90 >> 2] = htonl(RAMSize); - kernel_data->v[0xc94 >> 2] = htonl(RAMSize); - kernel_data->v[0xc98 >> 2] = htonl(0x00010020); - kernel_data->v[0xc9c >> 2] = htonl(0x00200001); - kernel_data->v[0xca0 >> 2] = htonl(0x00010000); - kernel_data->v[0xcb0 >> 2] = htonl(RAMBase); - kernel_data->v[0xcb4 >> 2] = htonl(RAMSize); - kernel_data->v[0xf80 >> 2] = htonl(PVR); - kernel_data->v[0xf84 >> 2] = htonl(CPUClockSpeed); - kernel_data->v[0xf88 >> 2] = htonl(BusClockSpeed); - kernel_data->v[0xf8c >> 2] = htonl(CPUClockSpeed); - } - // Initialize extra low memory - D(bug("Initializing Low Memory...\n")); - memset(NULL, 0, 0x3000); - WriteMacInt32(XLM_SIGNATURE, 'Baah'); // Signature to detect SheepShaver - WriteMacInt32(XLM_KERNEL_DATA, (uint32)kernel_data); // For trap replacement routines + D(bug("Initializing extra Low Memory...\n")); WriteMacInt32(XLM_SHEEP_OBJ, (uint32)this); // Pointer to SheepShaver object - WriteMacInt32(XLM_PVR, PVR); // Theoretical PVR - WriteMacInt32(XLM_BUS_CLOCK, BusClockSpeed); // For DriverServicesLib patch - WriteMacInt16(XLM_EXEC_RETURN_OPCODE, M68K_EXEC_RETURN); // For Execute68k() (RTS from the executed 68k code will jump here and end 68k mode) -#if !EMULATED_PPC - WriteMacInt32(XLM_TOC, (uint32)TOC); // TOC pointer of emulator - WriteMacInt32(XLM_ETHER_INIT, *(uint32 *)InitStreamModule); // DLPI ethernet driver functions - WriteMacInt32(XLM_ETHER_TERM, *(uint32 *)TerminateStreamModule); - WriteMacInt32(XLM_ETHER_OPEN, *(uint32 *)ether_open); - WriteMacInt32(XLM_ETHER_CLOSE, *(uint32 *)ether_close); - WriteMacInt32(XLM_ETHER_WPUT, *(uint32 *)ether_wput); - WriteMacInt32(XLM_ETHER_RSRV, *(uint32 *)ether_rsrv); - WriteMacInt32(XLM_VIDEO_DOIO, *(uint32 *)VideoDoDriverIO); -#endif - D(bug("Low Memory initialized\n")); + D(bug("Extra Low Memory initialized\n")); // Disallow quitting with Alt-Q from now on AllowQuitting = false; @@ -644,39 +542,16 @@ void SheepShaver::Quit(void) if (emul_thread > 0) wait_for_thread(emul_thread, &l); - // Save NVRAM - XPRAMExit(); - - // Exit clipboard - ClipExit(); - - // Exit Time Manager - TimerExit(); - - // Exit serial - SerialExit(); - - // Exit network - EtherExit(); - - // Exit audio - AudioExit(); - - // Exit video - VideoExit(); - - // Exit external file system - ExtFSExit(); - - // Exit drivers - SCSIExit(); - CDROMExit(); - DiskExit(); - SonyExit(); + // Deinitialize everything + ExitAll(); // Delete SheepShaver globals SheepMem::Exit(); + // Delete DR Emulator area + if (dr_emulator_area >= 0) + delete_area(dr_emulator_area); + // Delete DR Cache area if (dr_cache_area >= 0) delete_area(dr_cache_area); @@ -721,9 +596,12 @@ void SheepShaver::Quit(void) void SheepShaver::init_rom(void) { + // Size of a native page + page_size = B_PAGE_SIZE; + // Create area for ROM - void *rom_addr = (void *)ROM_BASE; - rom_area = create_area(ROM_AREA_NAME, &rom_addr, B_EXACT_ADDRESS, ROM_AREA_SIZE, B_NO_LOCK, B_READ_AREA | B_WRITE_AREA); + ROMBaseHost = (uint8 *)ROM_BASE; + rom_area = create_area(ROM_AREA_NAME, (void **)&ROMBaseHost, B_EXACT_ADDRESS, ROM_AREA_SIZE, B_NO_LOCK, B_READ_AREA | B_WRITE_AREA); if (rom_area < 0) throw area_error(); D(bug("ROM area %ld at %p\n", rom_area, rom_addr)); @@ -1305,22 +1183,11 @@ void Dump68kRegs(M68kRegisters *r) * Make code executable */ -void MakeExecutable(int dummy, void *start, uint32 length) +void MakeExecutable(int dummy, uint32 start, uint32 length) { - if (((uint32)start >= ROM_BASE) && ((uint32)start < (ROM_BASE + ROM_SIZE))) + if ((start >= ROM_BASE) && (start < (ROM_BASE + ROM_SIZE))) return; - clear_caches(start, length, B_INVALIDATE_ICACHE | B_FLUSH_DCACHE); -} - - -/* - * Patch things after system startup (gets called by disk driver accRun routine) - */ - -void PatchAfterStartup(void) -{ - ExecuteNative(NATIVE_VIDEO_INSTALL_ACCEL); - InstallExtFS(); + clear_caches((void *)start, length, B_INVALIDATE_ICACHE | B_FLUSH_DCACHE); } @@ -1381,6 +1248,7 @@ status_t SheepShaver::tick_func(void *ar void TriggerInterrupt(void) { + idle_resume(); #if 0 WriteMacInt32(0x16a, ReadMacInt32(0x16a) + 1); #else @@ -2074,13 +1942,17 @@ bool SheepMem::Init(void) delete_area(old_sheep_area); // Create area for SheepShaver data - base = 0x60000000; + proc = base = 0x60000000; SheepMemArea = create_area(SHEEP_AREA_NAME, (void **)&base, B_BASE_ADDRESS, size, B_NO_LOCK, B_READ_AREA | B_WRITE_AREA); if (SheepMemArea < 0) return false; + // Create read-only area with all bits set to 0 + static const uint8 const_zero_page[4096] = {0,}; + zero_page = const_zero_page; + D(bug("SheepShaver area %ld at %p\n", SheepMemArea, base)); - top = base + size; + data = base + size; return true; }