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

Comparing SheepShaver/src/Unix/main_unix.cpp (file contents):
Revision 1.27 by gbeauche, 2004-01-18T22:22:28Z vs.
Revision 1.98 by asvitkine, 2011-12-30T17:38:39Z

# Line 1 | Line 1
1   /*
2   *  main_unix.cpp - Emulation core, Unix implementation
3   *
4 < *  SheepShaver (C) 1997-2004 Christian Bauer and Marc Hellwig
4 > *  SheepShaver (C) 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
# Line 27 | Line 27
27   *  is slightly different from the SysV ABI used by Linux:
28   *    - Stack frames are different (e.g. LR is stored in 8(r1) under
29   *      MacOS, but in 4(r1) under Linux)
30 < *    - There is no TOC under Linux; r2 is free for the user
30 > *    - There is a pointer to Thread Local Storage (TLS) under Linux with
31 > *      recent enough glibc. This is r2 in 32-bit mode and r13 in
32 > *      64-bit mode (PowerOpen/AIX ABI)
33   *    - r13 is used as a small data pointer under Linux (but appearently
34   *      it is not used this way? To be sure, we specify -msdata=none
35   *      in the Makefile)
36 < *    - As there is no TOC, there are also no TVECTs under Linux;
37 < *      function pointers point directly to the function code
36 > *    - There are no TVECTs under Linux; function pointers point
37 > *      directly to the function code
38   *  The Execute*() functions have to account for this. Additionally, we
39   *  cannot simply call MacOS functions by getting their TVECT and jumping
40   *  to it. Such calls are done via the call_macos*() functions in
# Line 65 | Line 67
67   *  ExecutePPC (or any function that might cause a mode switch). The signal
68   *  stack is restored before exiting the SIGUSR2 handler.
69   *
70 + *  Note that POSIX standard says you can't modify the alternate
71 + *  signal stack while the process is executing on it. There is a
72 + *  hackaround though: we install a trampoline SIGUSR2 handler that
73 + *  sets up an alternate stack itself and calls the real handler.
74 + *  Then, when we call sigaltstack() there, we no longer get an EPERM,
75 + *  i.e. it now works.
76 + *
77   *  TODO:
78   *    check if SIGSEGV handler works for all registers (including FP!)
79   */
# Line 80 | Line 89
89   #include <sys/mman.h>
90   #include <sys/ipc.h>
91   #include <sys/shm.h>
92 + #include <sys/stat.h>
93   #include <signal.h>
94  
95   #include "sysdeps.h"
# Line 93 | Line 103
103   #include "xpram.h"
104   #include "timer.h"
105   #include "adb.h"
96 #include "sony.h"
97 #include "disk.h"
98 #include "cdrom.h"
99 #include "scsi.h"
106   #include "video.h"
101 #include "audio.h"
102 #include "ether.h"
103 #include "serial.h"
104 #include "clip.h"
105 #include "extfs.h"
107   #include "sys.h"
108   #include "macos_util.h"
109   #include "rom_patches.h"
110   #include "user_strings.h"
111   #include "vm_alloc.h"
112   #include "sigsegv.h"
113 < #include "thunks.h"
113 > #include "sigregs.h"
114 > #include "rpc.h"
115  
116   #define DEBUG 0
117   #include "debug.h"
118  
119  
120 + #ifdef HAVE_DIRENT_H
121 + #include <dirent.h>
122 + #endif
123 +
124 + #ifdef USE_SDL
125 + #include <SDL.h>
126 + #endif
127 +
128 + #ifndef USE_SDL_VIDEO
129   #include <X11/Xlib.h>
130 + #endif
131  
132   #ifdef ENABLE_GTK
133   #include <gtk/gtk.h>
# Line 124 | Line 136
136   #ifdef ENABLE_XF86_DGA
137   #include <X11/Xlib.h>
138   #include <X11/Xutil.h>
139 < #include <X11/extensions/xf86dga.h>
139 > #include <X11/extensions/Xxf86dga.h>
140   #endif
141  
142   #ifdef ENABLE_MON
# Line 149 | Line 161
161   const char ROM_FILE_NAME[] = "ROM";
162   const char ROM_FILE_NAME2[] = "Mac OS ROM";
163  
164 < const uintptr RAM_BASE = 0x20000000;            // Base address of RAM
165 < const uint32 SIG_STACK_SIZE = 0x10000;          // Size of signal stack
166 <
167 <
168 < #if !EMULATED_PPC
169 < struct sigregs {
170 <        uint32 nip;
159 <        uint32 link;
160 <        uint32 ctr;
161 <        uint32 msr;
162 <        uint32 xer;
163 <        uint32 ccr;
164 <        uint32 gpr[32];
165 < };
166 <
167 < #if defined(__linux__)
168 < struct machine_regs : public pt_regs
169 < {
170 <        u_long & cr()                           { return pt_regs::ccr; }
171 <        uint32 cr() const                       { return pt_regs::ccr; }
172 <        uint32 lr() const                       { return pt_regs::link; }
173 <        uint32 ctr() const                      { return pt_regs::ctr; }
174 <        uint32 xer() const                      { return pt_regs::xer; }
175 <        uint32 msr() const                      { return pt_regs::msr; }
176 <        uint32 dar() const                      { return pt_regs::dar; }
177 <        u_long & pc()                           { return pt_regs::nip; }
178 <        uint32 pc() const                       { return pt_regs::nip; }
179 <        u_long & gpr(int i)                     { return pt_regs::gpr[i]; }
180 <        uint32 gpr(int i) const         { return pt_regs::gpr[i]; }
181 < };
182 <
183 < #include <sys/ucontext.h>
184 < #define MACHINE_REGISTERS(scp)  ((machine_regs *)(((ucontext_t *)scp)->uc_mcontext.regs))
185 < #endif
186 <
187 < #if defined(__APPLE__) && defined(__MACH__)
188 < struct machine_regs : public mcontext
189 < {
190 <        uint32 & cr()                           { return ss.cr; }
191 <        uint32 cr() const                       { return ss.cr; }
192 <        uint32 lr() const                       { return ss.lr; }
193 <        uint32 ctr() const                      { return ss.ctr; }
194 <        uint32 xer() const                      { return ss.xer; }
195 <        uint32 msr() const                      { return ss.srr1; }
196 <        uint32 dar() const                      { return es.dar; }
197 <        uint32 & pc()                           { return ss.srr0; }
198 <        uint32 pc() const                       { return ss.srr0; }
199 <        uint32 & gpr(int i)                     { return (&ss.r0)[i]; }
200 <        uint32 gpr(int i) const         { return (&ss.r0)[i]; }
201 < };
202 <
203 < #include <sys/ucontext.h>
204 < #define MACHINE_REGISTERS(scp)  ((machine_regs *)(((ucontext_t *)scp)->uc_mcontext))
205 <
206 < #include <sys/signal.h>
207 < extern "C" int sigaltstack(const struct sigaltstack *ss, struct sigaltstack *oss);
208 < #endif
209 <
210 < static void build_sigregs(sigregs *srp, machine_regs *mrp)
211 < {
212 <        srp->nip = mrp->pc();
213 <        srp->link = mrp->lr();
214 <        srp->ctr = mrp->ctr();
215 <        srp->msr = mrp->msr();
216 <        srp->xer = mrp->xer();
217 <        srp->ccr = mrp->cr();
218 <        for (int i = 0; i < 32; i++)
219 <                srp->gpr[i] = mrp->gpr(i);
220 < }
164 > #if !REAL_ADDRESSING
165 > // FIXME: needs to be >= 0x04000000
166 > const uintptr RAM_BASE = 0x10000000;            // Base address of RAM
167 > #endif
168 > const uintptr ROM_BASE = 0x40800000;            // Base address of ROM
169 > #if REAL_ADDRESSING
170 > const uint32 ROM_ALIGNMENT = 0x100000;          // ROM must be aligned to a 1MB boundary
171   #endif
172 + const uint32 SIG_STACK_SIZE = 0x10000;          // Size of signal stack
173  
174  
175   // Global variables (exported)
176   #if !EMULATED_PPC
177 < void *TOC;                              // Small data pointer (r13)
177 > void *TOC = NULL;               // Pointer to Thread Local Storage (r2)
178 > void *R13 = NULL;               // Pointer to .sdata section (r13 under Linux)
179   #endif
180   uint32 RAMBase;                 // Base address of Mac RAM
181   uint32 RAMSize;                 // Size of Mac RAM
182 + uint32 ROMBase;                 // Base address of Mac ROM
183   uint32 KernelDataAddr;  // Address of Kernel Data
184   uint32 BootGlobsAddr;   // Address of BootGlobs structure at top of Mac RAM
185 + uint32 DRCacheAddr;             // Address of DR Cache
186   uint32 PVR;                             // Theoretical PVR
187   int64 CPUClockSpeed;    // Processor clock speed (Hz)
188   int64 BusClockSpeed;    // Bus clock speed (Hz)
189 + int64 TimebaseSpeed;    // Timebase clock speed (Hz)
190 + uint8 *RAMBaseHost;             // Base address of Mac RAM (host address space)
191 + uint8 *ROMBaseHost;             // Base address of Mac ROM (host address space)
192  
193  
194   // Global variables
195 + #ifndef USE_SDL_VIDEO
196   char *x_display_name = NULL;                            // X11 display name
197   Display *x_display = NULL;                                      // X11 display handle
198   #ifdef X11_LOCK_TYPE
199   X11_LOCK_TYPE x_display_lock = X11_LOCK_INIT; // X11 display lock
200   #endif
201 + #endif
202  
203   static int zero_fd = 0;                                         // FD of /dev/zero
204   static bool lm_area_mapped = false;                     // Flag: Low Memory area mmap()ped
205   static int kernel_area = -1;                            // SHM ID of Kernel Data area
206   static bool rom_area_mapped = false;            // Flag: Mac ROM mmap()ped
207   static bool ram_area_mapped = false;            // Flag: Mac RAM mmap()ped
208 + static bool dr_cache_area_mapped = false;       // Flag: Mac DR Cache mmap()ped
209 + static bool dr_emulator_area_mapped = false;// Flag: Mac DR Emulator mmap()ped
210   static KernelData *kernel_data;                         // Pointer to Kernel Data
211   static EmulatorData *emulator_data;
212  
213   static uint8 last_xpram[XPRAM_SIZE];            // Buffer for monitoring XPRAM changes
214  
215   static bool nvram_thread_active = false;        // Flag: NVRAM watchdog installed
216 + static volatile bool nvram_thread_cancel;       // Flag: Cancel NVRAM thread
217   static pthread_t nvram_thread;                          // NVRAM watchdog
218   static bool tick_thread_active = false;         // Flag: MacOS thread installed
219 + static volatile bool tick_thread_cancel;        // Flag: Cancel 60Hz thread
220   static pthread_t tick_thread;                           // 60Hz thread
221   static pthread_t emul_thread;                           // MacOS thread
222  
# Line 266 | Line 229 | static uintptr sig_stack = 0;                          // Stac
229   #else
230   static struct sigaction sigsegv_action;         // Data access exception signal (of emulator thread)
231   static struct sigaction sigill_action;          // Illegal instruction signal (of emulator thread)
232 < static void *sig_stack = NULL;                          // Stack for signal handlers
233 < static void *extra_stack = NULL;                        // Stack for SIGSEGV inside interrupt handler
232 > static stack_t sig_stack;                                       // Stack for signal handlers
233 > static stack_t extra_stack;                                     // Stack for SIGSEGV inside interrupt handler
234   static bool emul_thread_fatal = false;          // Flag: MacOS thread crashed, tick thread shall dump debug output
235   static sigregs sigsegv_regs;                            // Register dump when crashed
236   static const char *crash_reason = NULL;         // Reason of the crash (SIGSEGV, SIGBUS, SIGILL)
237   #endif
238  
239 + static rpc_connection_t *gui_connection = NULL; // RPC connection to the GUI
240 + static const char *gui_connection_path = NULL;  // GUI connection identifier
241 +
242 + uint32  SheepMem::page_size;                            // Size of a native page
243   uintptr SheepMem::zero_page = 0;                        // Address of ro page filled in with zeros
244   uintptr SheepMem::base = 0x60000000;            // Address of SheepShaver data
245 < uintptr SheepMem::top = 0;                                      // Top of SheepShaver data (stack like storage)
245 > uintptr SheepMem::proc;                                         // Bottom address of SheepShave procedures
246 > uintptr SheepMem::data;                                         // Top of SheepShaver data (stack like storage)
247  
248  
249   // Prototypes
250 + static bool kernel_data_init(void);
251 + static void kernel_data_exit(void);
252   static void Quit(void);
253   static void *emul_func(void *arg);
254   static void *nvram_func(void *arg);
255   static void *tick_func(void *arg);
256   #if EMULATED_PPC
287 static void sigusr2_handler(int sig);
257   extern void emul_ppc(uint32 start);
258   extern void init_emul_ppc(void);
259   extern void exit_emul_ppc(void);
260 + sigsegv_return_t sigsegv_handler(sigsegv_info_t *sip);
261   #else
262 < static void sigusr2_handler(int sig, siginfo_t *sip, void *scp);
262 > extern "C" void sigusr2_handler_init(int sig, siginfo_t *sip, void *scp);
263 > extern "C" void sigusr2_handler(int sig, siginfo_t *sip, void *scp);
264   static void sigsegv_handler(int sig, siginfo_t *sip, void *scp);
265   static void sigill_handler(int sig, siginfo_t *sip, void *scp);
266   #endif
# Line 297 | Line 268 | static void sigill_handler(int sig, sigi
268  
269   // From asm_linux.S
270   #if !EMULATED_PPC
300 extern "C" void *get_toc(void);
271   extern "C" void *get_sp(void);
272 < extern "C" void flush_icache_range(void *start, void *end);
272 > extern "C" void *get_r2(void);
273 > extern "C" void set_r2(void *);
274 > extern "C" void *get_r13(void);
275 > extern "C" void set_r13(void *);
276 > extern "C" void flush_icache_range(uint32 start, uint32 end);
277   extern "C" void jump_to_rom(uint32 entry, uint32 context);
278   extern "C" void quit_emulator(void);
279   extern "C" void execute_68k(uint32 pc, M68kRegisters *r);
# Line 363 | Line 337 | int atomic_or(int *var, int v)
337  
338  
339   /*
340 + *  Memory management helpers
341 + */
342 +
343 + static inline uint8 *vm_mac_acquire(uint32 size)
344 + {
345 +        return (uint8 *)vm_acquire(size);
346 + }
347 +
348 + static inline int vm_mac_acquire_fixed(uint32 addr, uint32 size)
349 + {
350 +        return vm_acquire_fixed(Mac2HostAddr(addr), size);
351 + }
352 +
353 + static inline int vm_mac_release(uint32 addr, uint32 size)
354 + {
355 +        return vm_release(Mac2HostAddr(addr), size);
356 + }
357 +
358 +
359 + /*
360   *  Main program
361   */
362  
# Line 375 | Line 369 | static void usage(const char *prg_name)
369          exit(0);
370   }
371  
372 < int main(int argc, char **argv)
372 > static bool valid_vmdir(const char *path)
373   {
374 <        char str[256];
375 <        uint32 *boot_globs;
376 <        int16 i16;
377 <        int rom_fd;
374 >        const int suffix_len = sizeof(".sheepvm") - 1;
375 >        int len = strlen(path);
376 >        if (len && path[len - 1] == '/') // to support both ".sheepvm" and ".sheepvm/"
377 >                len--;
378 >        if (len > suffix_len && !strncmp(path + len - suffix_len, ".sheepvm", suffix_len)) {
379 >                struct stat d;
380 >                if (!stat(path, &d) && S_ISDIR(d.st_mode)) {
381 >                        return true;
382 >                }
383 >        }
384 >        return false;
385 > }
386 >
387 > static void get_system_info(void)
388 > {
389 > #if !EMULATED_PPC
390          FILE *proc_file;
391 <        const char *rom_path;
391 > #endif
392 >
393 >        PVR = 0x00040000;                       // Default: 604
394 >        CPUClockSpeed = 100000000;      // Default: 100MHz
395 >        BusClockSpeed = 100000000;      // Default: 100MHz
396 >        TimebaseSpeed =  25000000;      // Default:  25MHz
397 >
398 > #if EMULATED_PPC
399 >        PVR = 0x000c0000;                       // Default: 7400 (with AltiVec)
400 > #elif defined(__APPLE__) && defined(__MACH__)
401 >        proc_file = popen("ioreg -c IOPlatformDevice", "r");
402 >        if (proc_file) {
403 >                char line[256];
404 >                bool powerpc_node = false;
405 >                while (fgets(line, sizeof(line) - 1, proc_file)) {
406 >                        // Read line
407 >                        int len = strlen(line);
408 >                        if (len == 0)
409 >                                continue;
410 >                        line[len - 1] = 0;
411 >
412 >                        // Parse line
413 >                        if (strstr(line, "o PowerPC,"))
414 >                                powerpc_node = true;
415 >                        else if (powerpc_node) {
416 >                                uint32 value;
417 >                                char head[256];
418 >                                if (sscanf(line, "%[ |]\"cpu-version\" = <%x>", head, &value) == 2)
419 >                                        PVR = value;
420 >                                else if (sscanf(line, "%[ |]\"clock-frequency\" = <%x>", head, &value) == 2)
421 >                                        CPUClockSpeed = value;
422 >                                else if (sscanf(line, "%[ |]\"bus-frequency\" = <%x>", head, &value) == 2)
423 >                                        BusClockSpeed = value;
424 >                                else if (sscanf(line, "%[ |]\"timebase-frequency\" = <%x>", head, &value) == 2)
425 >                                        TimebaseSpeed = value;
426 >                                else if (strchr(line, '}'))
427 >                                        powerpc_node = false;
428 >                        }
429 >                }
430 >                fclose(proc_file);
431 >        } else {
432 >                char str[256];
433 >                sprintf(str, GetString(STR_PROC_CPUINFO_WARN), strerror(errno));
434 >                WarningAlert(str);
435 >        }
436 > #else
437 >        proc_file = fopen("/proc/cpuinfo", "r");
438 >        if (proc_file) {
439 >                // CPU specs from Linux kernel
440 >                // TODO: make it more generic with features (e.g. AltiVec) and
441 >                // cache information and friends for NameRegistry
442 >                static const struct {
443 >                        uint32 pvr_mask;
444 >                        uint32 pvr_value;
445 >                        const char *cpu_name;
446 >                }
447 >                cpu_specs[] = {
448 >                        { 0xffff0000, 0x00010000, "601" },
449 >                        { 0xffff0000, 0x00030000, "603" },
450 >                        { 0xffff0000, 0x00060000, "603e" },
451 >                        { 0xffff0000, 0x00070000, "603ev" },
452 >                        { 0xffff0000, 0x00040000, "604" },
453 >                        { 0xfffff000, 0x00090000, "604e" },
454 >                        { 0xffff0000, 0x00090000, "604r" },
455 >                        { 0xffff0000, 0x000a0000, "604ev" },
456 >                        { 0xffffffff, 0x00084202, "740/750" },
457 >                        { 0xfffff000, 0x00083000, "745/755" },
458 >                        { 0xfffffff0, 0x00080100, "750CX" },
459 >                        { 0xfffffff0, 0x00082200, "750CX" },
460 >                        { 0xfffffff0, 0x00082210, "750CXe" },
461 >                        { 0xffffff00, 0x70000100, "750FX" },
462 >                        { 0xffffffff, 0x70000200, "750FX" },
463 >                        { 0xffff0000, 0x70000000, "750FX" },
464 >                        { 0xffff0000, 0x70020000, "750GX" },
465 >                        { 0xffff0000, 0x00080000, "740/750" },
466 >                        { 0xffffffff, 0x000c1101, "7400 (1.1)" },
467 >                        { 0xffff0000, 0x000c0000, "7400" },
468 >                        { 0xffff0000, 0x800c0000, "7410" },
469 >                        { 0xffffffff, 0x80000200, "7450" },
470 >                        { 0xffffffff, 0x80000201, "7450" },
471 >                        { 0xffff0000, 0x80000000, "7450" },
472 >                        { 0xffffff00, 0x80010100, "7455" },
473 >                        { 0xffffffff, 0x80010200, "7455" },
474 >                        { 0xffff0000, 0x80010000, "7455" },
475 >                        { 0xffff0000, 0x80020000, "7457" },
476 >                        { 0xffff0000, 0x80030000, "7447A" },
477 >                        { 0xffff0000, 0x80040000, "7448" },
478 >                        { 0x7fff0000, 0x00810000, "82xx" },
479 >                        { 0x7fff0000, 0x00820000, "8280" },
480 >                        { 0xffff0000, 0x00400000, "Power3 (630)" },
481 >                        { 0xffff0000, 0x00410000, "Power3 (630+)" },
482 >                        { 0xffff0000, 0x00360000, "I-star" },
483 >                        { 0xffff0000, 0x00370000, "S-star" },
484 >                        { 0xffff0000, 0x00350000, "Power4" },
485 >                        { 0xffff0000, 0x00390000, "PPC970" },
486 >                        { 0xffff0000, 0x003c0000, "PPC970FX" },
487 >                        { 0xffff0000, 0x00440000, "PPC970MP" },
488 >                        { 0xffff0000, 0x003a0000, "POWER5 (gr)" },
489 >                        { 0xffff0000, 0x003b0000, "POWER5+ (gs)" },
490 >                        { 0xffff0000, 0x003e0000, "POWER6" },
491 >                        { 0xffff0000, 0x00700000, "Cell Broadband Engine" },
492 >                        { 0x7fff0000, 0x00900000, "PA6T" },
493 >                        { 0, 0, 0 }
494 >                };
495 >
496 >                char line[256];
497 >                while(fgets(line, 255, proc_file)) {
498 >                        // Read line
499 >                        int len = strlen(line);
500 >                        if (len == 0)
501 >                                continue;
502 >                        line[len-1] = 0;
503 >
504 >                        // Parse line
505 >                        int i;
506 >                        float f;
507 >                        char value[256];
508 >                        if (sscanf(line, "cpu : %[^,]", value) == 1) {
509 >                                // Search by name
510 >                                const char *cpu_name = NULL;
511 >                                for (int i = 0; cpu_specs[i].pvr_mask != 0; i++) {
512 >                                        if (strcmp(cpu_specs[i].cpu_name, value) == 0) {
513 >                                                cpu_name = cpu_specs[i].cpu_name;
514 >                                                PVR = cpu_specs[i].pvr_value;
515 >                                                break;
516 >                                        }
517 >                                }
518 >                                if (cpu_name == NULL)
519 >                                        printf("WARNING: Unknown CPU type '%s', assuming 604\n", value);
520 >                                else
521 >                                        printf("Found a PowerPC %s processor\n", cpu_name);
522 >                        }
523 >                        if (sscanf(line, "clock : %fMHz", &f) == 1)
524 >                                CPUClockSpeed = BusClockSpeed = ((int64)f) * 1000000;
525 >                        else if (sscanf(line, "clock : %dMHz", &i) == 1)
526 >                                CPUClockSpeed = BusClockSpeed = i * 1000000;
527 >                }
528 >                fclose(proc_file);
529 >        } else {
530 >                sprintf(str, GetString(STR_PROC_CPUINFO_WARN), strerror(errno));
531 >                WarningAlert(str);
532 >        }
533 >
534 >        // Get actual bus frequency
535 >        proc_file = fopen("/proc/device-tree/clock-frequency", "r");
536 >        if (proc_file) {
537 >                union { uint8 b[4]; uint32 l; } value;
538 >                if (fread(value.b, sizeof(value), 1, proc_file) == 1)
539 >                        BusClockSpeed = value.l;
540 >                fclose(proc_file);
541 >        }
542 >
543 >        // Get actual timebase frequency
544 >        TimebaseSpeed = BusClockSpeed / 4;
545 >        DIR *cpus_dir;
546 >        if ((cpus_dir = opendir("/proc/device-tree/cpus")) != NULL) {
547 >                struct dirent *cpu_entry;
548 >                while ((cpu_entry = readdir(cpus_dir)) != NULL) {
549 >                        if (strstr(cpu_entry->d_name, "PowerPC,") == cpu_entry->d_name) {
550 >                                char timebase_freq_node[256];
551 >                                sprintf(timebase_freq_node, "/proc/device-tree/cpus/%s/timebase-frequency", cpu_entry->d_name);
552 >                                proc_file = fopen(timebase_freq_node, "r");
553 >                                if (proc_file) {
554 >                                        union { uint8 b[4]; uint32 l; } value;
555 >                                        if (fread(value.b, sizeof(value), 1, proc_file) == 1)
556 >                                                TimebaseSpeed = value.l;
557 >                                        fclose(proc_file);
558 >                                }
559 >                        }
560 >                }
561 >                closedir(cpus_dir);
562 >        }
563 > #endif
564 >
565 >        // Remap any newer G4/G5 processor to plain G4 for compatibility
566 >        switch (PVR >> 16) {
567 >        case 0x8000:                            // 7450
568 >        case 0x8001:                            // 7455
569 >        case 0x8002:                            // 7457
570 >        case 0x8003:                            // 7447A
571 >        case 0x8004:                            // 7448
572 >        case 0x0039:                            //  970
573 >        case 0x003c:                            //  970FX
574 >        case 0x0044:                            //  970MP
575 >                PVR = 0x000c0000;               // 7400
576 >                break;
577 >        }
578 >        D(bug("PVR: %08x (assumed)\n", PVR));
579 > }
580 >
581 > static bool load_mac_rom(void)
582 > {
583          uint32 rom_size, actual;
584          uint8 *rom_tmp;
585 <        time_t now, expire;
585 >        const char *rom_path = PrefsFindString("rom");
586 >        int rom_fd = open(rom_path && *rom_path ? rom_path : ROM_FILE_NAME, O_RDONLY);
587 >        if (rom_fd < 0) {
588 >                rom_fd = open(ROM_FILE_NAME2, O_RDONLY);
589 >                if (rom_fd < 0) {
590 >                        ErrorAlert(GetString(STR_NO_ROM_FILE_ERR));
591 >                        return false;
592 >                }
593 >        }
594 >        printf("%s", GetString(STR_READING_ROM_FILE));
595 >        rom_size = lseek(rom_fd, 0, SEEK_END);
596 >        lseek(rom_fd, 0, SEEK_SET);
597 >        rom_tmp = new uint8[ROM_SIZE];
598 >        actual = read(rom_fd, (void *)rom_tmp, ROM_SIZE);
599 >        close(rom_fd);
600 >        
601 >        // Decode Mac ROM
602 >        if (!DecodeROM(rom_tmp, actual)) {
603 >                if (rom_size != 4*1024*1024) {
604 >                        ErrorAlert(GetString(STR_ROM_SIZE_ERR));
605 >                        return false;
606 >                } else {
607 >                        ErrorAlert(GetString(STR_ROM_FILE_READ_ERR));
608 >                        return false;
609 >                }
610 >        }
611 >        delete[] rom_tmp;
612 >        return true;
613 > }
614 >
615 > static bool install_signal_handlers(void)
616 > {
617 >        char str[256];
618 > #if !EMULATED_PPC
619 >        // Create and install stacks for signal handlers
620 >        sig_stack.ss_sp = malloc(SIG_STACK_SIZE);
621 >        D(bug("Signal stack at %p\n", sig_stack.ss_sp));
622 >        if (sig_stack.ss_sp == NULL) {
623 >                ErrorAlert(GetString(STR_NOT_ENOUGH_MEMORY_ERR));
624 >                return false;
625 >        }
626 >        sig_stack.ss_flags = 0;
627 >        sig_stack.ss_size = SIG_STACK_SIZE;
628 >        if (sigaltstack(&sig_stack, NULL) < 0) {
629 >                sprintf(str, GetString(STR_SIGALTSTACK_ERR), strerror(errno));
630 >                ErrorAlert(str);
631 >                return false;
632 >        }
633 >        extra_stack.ss_sp = malloc(SIG_STACK_SIZE);
634 >        D(bug("Extra stack at %p\n", extra_stack.ss_sp));
635 >        if (extra_stack.ss_sp == NULL) {
636 >                ErrorAlert(GetString(STR_NOT_ENOUGH_MEMORY_ERR));
637 >                return false;
638 >        }
639 >        extra_stack.ss_flags = 0;
640 >        extra_stack.ss_size = SIG_STACK_SIZE;
641 >
642 >        // Install SIGSEGV and SIGBUS handlers
643 >        sigemptyset(&sigsegv_action.sa_mask);   // Block interrupts during SEGV handling
644 >        sigaddset(&sigsegv_action.sa_mask, SIGUSR2);
645 >        sigsegv_action.sa_sigaction = sigsegv_handler;
646 >        sigsegv_action.sa_flags = SA_ONSTACK | SA_SIGINFO;
647 > #ifdef HAVE_SIGNAL_SA_RESTORER
648 >        sigsegv_action.sa_restorer = NULL;
649 > #endif
650 >        if (sigaction(SIGSEGV, &sigsegv_action, NULL) < 0) {
651 >                sprintf(str, GetString(STR_SIG_INSTALL_ERR), "SIGSEGV", strerror(errno));
652 >                ErrorAlert(str);
653 >                return false;
654 >        }
655 >        if (sigaction(SIGBUS, &sigsegv_action, NULL) < 0) {
656 >                sprintf(str, GetString(STR_SIG_INSTALL_ERR), "SIGBUS", strerror(errno));
657 >                ErrorAlert(str);
658 >                return false;
659 >        }
660 > #else
661 >        // Install SIGSEGV handler for CPU emulator
662 >        if (!sigsegv_install_handler(sigsegv_handler)) {
663 >                sprintf(str, GetString(STR_SIG_INSTALL_ERR), "SIGSEGV", strerror(errno));
664 >                ErrorAlert(str);
665 >                return false;
666 >        }
667 > #endif
668 >        return true;
669 > }
670 >
671 > static bool init_sdl()
672 > {
673 >        int sdl_flags = 0;
674 > #ifdef USE_SDL_VIDEO
675 >        sdl_flags |= SDL_INIT_VIDEO;
676 > #endif
677 > #ifdef USE_SDL_AUDIO
678 >        sdl_flags |= SDL_INIT_AUDIO;
679 > #endif
680 >        assert(sdl_flags != 0);
681 >
682 > #ifdef USE_SDL_VIDEO
683 >        // Don't let SDL block the screensaver
684 >        setenv("SDL_VIDEO_ALLOW_SCREENSAVER", "1", TRUE);
685 >
686 >        // Make SDL pass through command-clicks and option-clicks unaltered
687 >        setenv("SDL_HAS3BUTTONMOUSE", "1", TRUE);
688 > #endif
689 >
690 >        if (SDL_Init(sdl_flags) == -1) {
691 >                char str[256];
692 >                sprintf(str, "Could not initialize SDL: %s.\n", SDL_GetError());
693 >                ErrorAlert(str);
694 >                return false;
695 >        }
696 >        atexit(SDL_Quit);
697 >
698 >        // Don't let SDL catch SIGINT and SIGTERM signals
699 >        signal(SIGINT, SIG_DFL);
700 >        signal(SIGTERM, SIG_DFL);
701 >        return true;
702 > }
703 >
704 > int main(int argc, char **argv)
705 > {
706 >        char str[256];
707 >        bool memory_mapped_from_zero, ram_rom_areas_contiguous;
708 >        const char *vmdir = NULL;
709  
710          // Initialize variables
711          RAMBase = 0;
# Line 396 | Line 716 | int main(int argc, char **argv)
716          printf(" %s\n", GetString(STR_ABOUT_TEXT2));
717  
718   #if !EMULATED_PPC
719 + #ifdef SYSTEM_CLOBBERS_R2
720          // Get TOC pointer
721 <        TOC = get_toc();
721 >        TOC = get_r2();
722 > #endif
723 > #ifdef SYSTEM_CLOBBERS_R13
724 >        // Get r13 register
725 >        R13 = get_r13();
726   #endif
402
403 #ifdef ENABLE_GTK
404        // Init GTK
405        gtk_set_locale();
406        gtk_init(&argc, &argv);
727   #endif
408
409        // Read preferences
410        PrefsInit(argc, argv);
728  
729          // Parse command line arguments
730          for (int i=1; i<argc; i++) {
731                  if (strcmp(argv[i], "--help") == 0) {
732                          usage(argv[0]);
733 + #ifndef USE_SDL_VIDEO
734                  } else if (strcmp(argv[i], "--display") == 0) {
735                          i++;
736                          if (i < argc)
737                                  x_display_name = strdup(argv[i]);
738 <                } else if (argv[i][0] == '-') {
738 > #endif
739 >                } else if (strcmp(argv[i], "--gui-connection") == 0) {
740 >                        argv[i++] = NULL;
741 >                        if (i < argc) {
742 >                                gui_connection_path = argv[i];
743 >                                argv[i] = NULL;
744 >                        }
745 >                } else if (valid_vmdir(argv[i])) {
746 >                        vmdir = argv[i];
747 >                        argv[i] = NULL;
748 >                        printf("Using %s as vmdir.\n", vmdir);
749 >                        if (chdir(vmdir)) {
750 >                                printf("Failed to chdir to %s. Good bye.", vmdir);
751 >                                exit(1);
752 >                        }
753 >                        break;
754 >                }
755 >        }
756 >
757 >        // Remove processed arguments
758 >        for (int i=1; i<argc; i++) {
759 >                int k;
760 >                for (k=i; k<argc; k++)
761 >                        if (argv[k] != NULL)
762 >                                break;
763 >                if (k > i) {
764 >                        k -= i;
765 >                        for (int j=i+k; j<argc; j++)
766 >                                argv[j-k] = argv[j];
767 >                        argc -= k;
768 >                }
769 >        }
770 >
771 >        // Connect to the external GUI
772 >        if (gui_connection_path) {
773 >                if ((gui_connection = rpc_init_client(gui_connection_path)) == NULL) {
774 >                        fprintf(stderr, "Failed to initialize RPC client connection to the GUI\n");
775 >                        return 1;
776 >                }
777 >        }
778 >
779 > #ifdef ENABLE_GTK
780 >        if (!gui_connection) {
781 >                // Init GTK
782 >                gtk_set_locale();
783 >                gtk_init(&argc, &argv);
784 >        }
785 > #endif
786 >
787 >        // Read preferences
788 >        PrefsInit(vmdir, argc, argv);
789 >
790 >        // Any command line arguments left?
791 >        for (int i=1; i<argc; i++) {
792 >                if (argv[i][0] == '-') {
793                          fprintf(stderr, "Unrecognized option '%s'\n", argv[i]);
794                          usage(argv[0]);
795                  }
796          }
797  
798 + #ifdef USE_SDL
799 +        // Initialize SDL system
800 +        if (!init_sdl())
801 +                goto quit;
802 + #endif
803 +
804 + #ifndef USE_SDL_VIDEO
805          // Open display
806          x_display = XOpenDisplay(x_display_name);
807          if (x_display == NULL) {
# Line 436 | Line 815 | int main(int argc, char **argv)
815          // Fork out, so we can return from fullscreen mode when things get ugly
816          XF86DGAForkApp(DefaultScreen(x_display));
817   #endif
818 + #endif
819  
820   #ifdef ENABLE_MON
821          // Initialize mon
822          mon_init();
823   #endif
824  
825 <        // Get system info
826 <        PVR = 0x00040000;                       // Default: 604
827 <        CPUClockSpeed = 100000000;      // Default: 100MHz
448 <        BusClockSpeed = 100000000;      // Default: 100MHz
449 < #if !EMULATED_PPC
450 <        proc_file = fopen("/proc/cpuinfo", "r");
451 <        if (proc_file) {
452 <                char line[256];
453 <                while(fgets(line, 255, proc_file)) {
454 <                        // Read line
455 <                        int len = strlen(line);
456 <                        if (len == 0)
457 <                                continue;
458 <                        line[len-1] = 0;
825 >  // Install signal handlers
826 >        if (!install_signal_handlers())
827 >                goto quit;
828  
829 <                        // Parse line
830 <                        int i;
831 <                        char value[256];
832 <                        if (sscanf(line, "cpu : %s", value) == 1) {
833 <                                if (strcmp(value, "601") == 0)
465 <                                        PVR = 0x00010000;
466 <                                else if (strcmp(value, "603") == 0)
467 <                                        PVR = 0x00030000;
468 <                                else if (strcmp(value, "604") == 0)
469 <                                        PVR = 0x00040000;
470 <                                else if (strcmp(value, "603e") == 0)
471 <                                        PVR = 0x00060000;
472 <                                else if (strcmp(value, "603ev") == 0)
473 <                                        PVR = 0x00070000;
474 <                                else if (strcmp(value, "604e") == 0)
475 <                                        PVR = 0x00090000;
476 <                                else if (strcmp(value, "604ev5") == 0)
477 <                                        PVR = 0x000a0000;
478 <                                else if (strcmp(value, "750") == 0)
479 <                                        PVR = 0x00080000;
480 <                                else if (strcmp(value, "821") == 0)
481 <                                        PVR = 0x00320000;
482 <                                else if (strcmp(value, "860") == 0)
483 <                                        PVR = 0x00500000;
484 <                                else
485 <                                        printf("WARNING: Unknown CPU type '%s', assuming 604\n", value);
486 <                        }
487 <                        if (sscanf(line, "clock : %dMHz", &i) == 1)
488 <                                CPUClockSpeed = BusClockSpeed = i * 1000000;
489 <                }
490 <                fclose(proc_file);
491 <        } else {
492 <                sprintf(str, GetString(STR_PROC_CPUINFO_WARN), strerror(errno));
493 <                WarningAlert(str);
494 <        }
495 < #endif
496 <        D(bug("PVR: %08x (assumed)\n", PVR));
829 >        // Initialize VM system
830 >        vm_init();
831 >
832 >        // Get system info
833 >        get_system_info();
834  
835          // Init system routines
836          SysInit();
# Line 516 | Line 853 | int main(int argc, char **argv)
853                  goto quit;
854          }
855  
856 < #ifndef PAGEZERO_HACK
857 <        // Create Low Memory area (0x0000..0x3000)
521 <        if (vm_acquire_fixed((char *)0, 0x3000) < 0) {
522 <                sprintf(str, GetString(STR_LOW_MEM_MMAP_ERR), strerror(errno));
523 <                ErrorAlert(str);
856 >        // Create areas for Kernel Data
857 >        if (!kernel_data_init())
858                  goto quit;
859 <        }
860 <        lm_area_mapped = true;
861 < #endif
859 >        kernel_data = (KernelData *)Mac2HostAddr(KERNEL_DATA_BASE);
860 >        emulator_data = &kernel_data->ed;
861 >        KernelDataAddr = KERNEL_DATA_BASE;
862 >        D(bug("Kernel Data at %p (%08x)\n", kernel_data, KERNEL_DATA_BASE));
863 >        D(bug("Emulator Data at %p (%08x)\n", emulator_data, KERNEL_DATA_BASE + offsetof(KernelData, ed)));
864  
865 <        // Create areas for Kernel Data
866 <        kernel_area = shmget(IPC_PRIVATE, KERNEL_AREA_SIZE, 0600);
867 <        if (kernel_area == -1) {
532 <                sprintf(str, GetString(STR_KD_SHMGET_ERR), strerror(errno));
865 >        // Create area for DR Cache
866 >        if (vm_mac_acquire_fixed(DR_EMULATOR_BASE, DR_EMULATOR_SIZE) < 0) {
867 >                sprintf(str, GetString(STR_DR_EMULATOR_MMAP_ERR), strerror(errno));
868                  ErrorAlert(str);
869                  goto quit;
870          }
871 <        if (shmat(kernel_area, (void *)KERNEL_DATA_BASE, 0) < 0) {
872 <                sprintf(str, GetString(STR_KD_SHMAT_ERR), strerror(errno));
871 >        dr_emulator_area_mapped = true;
872 >        if (vm_mac_acquire_fixed(DR_CACHE_BASE, DR_CACHE_SIZE) < 0) {
873 >                sprintf(str, GetString(STR_DR_CACHE_MMAP_ERR), strerror(errno));
874                  ErrorAlert(str);
875                  goto quit;
876          }
877 <        if (shmat(kernel_area, (void *)KERNEL_DATA2_BASE, 0) < 0) {
878 <                sprintf(str, GetString(STR_KD2_SHMAT_ERR), strerror(errno));
877 >        dr_cache_area_mapped = true;
878 > #if !EMULATED_PPC
879 >        if (vm_protect((char *)DR_CACHE_BASE, DR_CACHE_SIZE, VM_PAGE_READ | VM_PAGE_WRITE | VM_PAGE_EXECUTE) < 0) {
880 >                sprintf(str, GetString(STR_DR_CACHE_MMAP_ERR), strerror(errno));
881                  ErrorAlert(str);
882                  goto quit;
883          }
884 <        kernel_data = (KernelData *)KERNEL_DATA_BASE;
885 <        emulator_data = &kernel_data->ed;
886 <        KernelDataAddr = KERNEL_DATA_BASE;
549 <        D(bug("Kernel Data at %p, Emulator Data at %p\n", kernel_data, emulator_data));
884 > #endif
885 >        DRCacheAddr = DR_CACHE_BASE;
886 >        D(bug("DR Cache at %p\n", DRCacheAddr));
887  
888          // Create area for SheepShaver data
889          if (!SheepMem::Init()) {
# Line 554 | Line 891 | int main(int argc, char **argv)
891                  ErrorAlert(str);
892                  goto quit;
893          }
894 <
558 <        // Create area for Mac ROM
559 <        if (vm_acquire_fixed((char *)ROM_BASE, ROM_AREA_SIZE) < 0) {
560 <                sprintf(str, GetString(STR_ROM_MMAP_ERR), strerror(errno));
561 <                ErrorAlert(str);
562 <                goto quit;
563 <        }
564 < #if !EMULATED_PPC
565 <        if (vm_protect((char *)ROM_BASE, ROM_AREA_SIZE, VM_PAGE_READ | VM_PAGE_WRITE | VM_PAGE_EXECUTE) < 0) {
566 <                sprintf(str, GetString(STR_ROM_MMAP_ERR), strerror(errno));
567 <                ErrorAlert(str);
568 <                goto quit;
569 <        }
570 < #endif
571 <        rom_area_mapped = true;
572 <        D(bug("ROM area at %08x\n", ROM_BASE));
573 <
894 >        
895          // Create area for Mac RAM
896          RAMSize = PrefsFindInt32("ramsize");
897          if (RAMSize < 8*1024*1024) {
898                  WarningAlert(GetString(STR_SMALL_RAM_WARN));
899                  RAMSize = 8*1024*1024;
900          }
901 <
902 <        if (vm_acquire_fixed((char *)RAM_BASE, RAMSize) < 0) {
903 <                sprintf(str, GetString(STR_RAM_MMAP_ERR), strerror(errno));
904 <                ErrorAlert(str);
905 <                goto quit;
901 >        memory_mapped_from_zero = false;
902 >        ram_rom_areas_contiguous = false;
903 > #if REAL_ADDRESSING && HAVE_LINKER_SCRIPT
904 >        if (vm_mac_acquire_fixed(0, RAMSize) == 0) {
905 >                D(bug("Could allocate RAM from 0x0000\n"));
906 >                RAMBase = 0;
907 >                RAMBaseHost = Mac2HostAddr(RAMBase);
908 >                memory_mapped_from_zero = true;
909 >        }
910 > #endif
911 >        if (!memory_mapped_from_zero) {
912 > #ifndef PAGEZERO_HACK
913 >                // Create Low Memory area (0x0000..0x3000)
914 >                if (vm_mac_acquire_fixed(0, 0x3000) < 0) {
915 >                        sprintf(str, GetString(STR_LOW_MEM_MMAP_ERR), strerror(errno));
916 >                        ErrorAlert(str);
917 >                        goto quit;
918 >                }
919 >                lm_area_mapped = true;
920 > #endif
921 > #if REAL_ADDRESSING
922 >                // Allocate RAM at any address. Since ROM must be higher than RAM, allocate the RAM
923 >                // and ROM areas contiguously, plus a little extra to allow for ROM address alignment.
924 >                RAMBaseHost = vm_mac_acquire(RAMSize + ROM_AREA_SIZE + ROM_ALIGNMENT);
925 >                if (RAMBaseHost == VM_MAP_FAILED) {
926 >                        sprintf(str, GetString(STR_RAM_ROM_MMAP_ERR), strerror(errno));
927 >                        ErrorAlert(str);
928 >                        goto quit;
929 >                }
930 >                RAMBase = Host2MacAddr(RAMBaseHost);
931 >                ROMBase = (RAMBase + RAMSize + ROM_ALIGNMENT -1) & -ROM_ALIGNMENT;
932 >                ROMBaseHost = Mac2HostAddr(ROMBase);
933 >                ram_rom_areas_contiguous = true;
934 > #else
935 >                if (vm_mac_acquire_fixed(RAM_BASE, RAMSize) < 0) {
936 >                        sprintf(str, GetString(STR_RAM_MMAP_ERR), strerror(errno));
937 >                        ErrorAlert(str);
938 >                        goto quit;
939 >                }
940 >                RAMBase = RAM_BASE;
941 >                RAMBaseHost = Mac2HostAddr(RAMBase);
942 > #endif
943          }
944   #if !EMULATED_PPC
945 <        if (vm_protect((char *)RAM_BASE, RAMSize, VM_PAGE_READ | VM_PAGE_WRITE | VM_PAGE_EXECUTE) < 0) {
945 >        if (vm_protect(RAMBaseHost, RAMSize, VM_PAGE_READ | VM_PAGE_WRITE | VM_PAGE_EXECUTE) < 0) {
946                  sprintf(str, GetString(STR_RAM_MMAP_ERR), strerror(errno));
947                  ErrorAlert(str);
948                  goto quit;
949          }
950   #endif
593        RAMBase = RAM_BASE;
951          ram_area_mapped = true;
952 <        D(bug("RAM area at %08x\n", RAMBase));
952 >        D(bug("RAM area at %p (%08x)\n", RAMBaseHost, RAMBase));
953  
954 <        if (RAMBase > ROM_BASE) {
955 <                ErrorAlert(GetString(STR_RAM_HIGHER_THAN_ROM_ERR));
954 >        if (RAMBase > KernelDataAddr) {
955 >                ErrorAlert(GetString(STR_RAM_AREA_TOO_HIGH_ERR));
956                  goto quit;
957          }
601
602        // Load Mac ROM
603        rom_path = PrefsFindString("rom");
604        rom_fd = open(rom_path ? rom_path : ROM_FILE_NAME, O_RDONLY);
605        if (rom_fd < 0) {
606                rom_fd = open(rom_path ? rom_path : ROM_FILE_NAME2, O_RDONLY);
607                if (rom_fd < 0) {
608                        ErrorAlert(GetString(STR_NO_ROM_FILE_ERR));
609                        goto quit;
610                }
611        }
612        printf(GetString(STR_READING_ROM_FILE));
613        rom_size = lseek(rom_fd, 0, SEEK_END);
614        lseek(rom_fd, 0, SEEK_SET);
615        rom_tmp = new uint8[ROM_SIZE];
616        actual = read(rom_fd, (void *)rom_tmp, ROM_SIZE);
617        close(rom_fd);
958          
959 <        // Decode Mac ROM
960 <        if (!DecodeROM(rom_tmp, actual)) {
961 <                if (rom_size != 4*1024*1024) {
962 <                        ErrorAlert(GetString(STR_ROM_SIZE_ERR));
963 <                        goto quit;
624 <                } else {
625 <                        ErrorAlert(GetString(STR_ROM_FILE_READ_ERR));
959 >        // Create area for Mac ROM
960 >        if (!ram_rom_areas_contiguous) {
961 >                if (vm_mac_acquire_fixed(ROM_BASE, ROM_AREA_SIZE) < 0) {
962 >                        sprintf(str, GetString(STR_ROM_MMAP_ERR), strerror(errno));
963 >                        ErrorAlert(str);
964                          goto quit;
965                  }
966 +                ROMBase = ROM_BASE;
967 +                ROMBaseHost = Mac2HostAddr(ROMBase);
968          }
969 <        delete[] rom_tmp;
970 <
971 <        // Load NVRAM
972 <        XPRAMInit();
633 <
634 <        // Set boot volume
635 <        i16 = PrefsFindInt32("bootdrive");
636 <        XPRAM[0x1378] = i16 >> 8;
637 <        XPRAM[0x1379] = i16 & 0xff;
638 <        i16 = PrefsFindInt32("bootdriver");
639 <        XPRAM[0x137a] = i16 >> 8;
640 <        XPRAM[0x137b] = i16 & 0xff;
641 <
642 <        // Create BootGlobs at top of Mac memory
643 <        memset((void *)(RAMBase + RAMSize - 4096), 0, 4096);
644 <        BootGlobsAddr = RAMBase + RAMSize - 0x1c;
645 <        boot_globs = (uint32 *)BootGlobsAddr;
646 <        boot_globs[-5] = htonl(RAMBase + RAMSize);      // MemTop
647 <        boot_globs[0] = htonl(RAMBase);                         // First RAM bank
648 <        boot_globs[1] = htonl(RAMSize);
649 <        boot_globs[2] = htonl((uint32)-1);                      // End of bank table
650 <
651 <        // Init thunks
652 <        if (!ThunksInit())
969 > #if !EMULATED_PPC
970 >        if (vm_protect(ROMBaseHost, ROM_AREA_SIZE, VM_PAGE_READ | VM_PAGE_WRITE | VM_PAGE_EXECUTE) < 0) {
971 >                sprintf(str, GetString(STR_ROM_MMAP_ERR), strerror(errno));
972 >                ErrorAlert(str);
973                  goto quit;
974 +        }
975 + #endif
976 +        rom_area_mapped = true;
977 +        D(bug("ROM area at %p (%08x)\n", ROMBaseHost, ROMBase));
978  
979 <        // Init drivers
980 <        SonyInit();
981 <        DiskInit();
982 <        CDROMInit();
659 <        SCSIInit();
660 <
661 <        // Init external file system
662 <        ExtFSInit();
663 <
664 <        // Init ADB
665 <        ADBInit();
666 <
667 <        // Init audio
668 <        AudioInit();
669 <
670 <        // Init network
671 <        EtherInit();
672 <
673 <        // Init serial ports
674 <        SerialInit();
675 <
676 <        // Init Time Manager
677 <        TimerInit();
678 <
679 <        // Init clipboard
680 <        ClipInit();
979 >        if (RAMBase > ROMBase) {
980 >                ErrorAlert(GetString(STR_RAM_HIGHER_THAN_ROM_ERR));
981 >                goto quit;
982 >        }
983  
984 <        // Init video
985 <        if (!VideoInit())
984 >        // Load Mac ROM
985 >        if (!load_mac_rom())
986                  goto quit;
987  
988 <        // Install ROM patches
989 <        if (!PatchROM()) {
688 <                ErrorAlert(GetString(STR_UNSUPPORTED_ROM_TYPE_ERR));
988 >        // Initialize everything
989 >        if (!InitAll(vmdir))
990                  goto quit;
991 <        }
991 >        D(bug("Initialization complete\n"));
992  
993          // Clear caches (as we loaded and patched code) and write protect ROM
994   #if !EMULATED_PPC
995 <        MakeExecutable(0, (void *)ROM_BASE, ROM_AREA_SIZE);
695 < #endif
696 <        vm_protect((char *)ROM_BASE, ROM_AREA_SIZE, VM_PAGE_READ | VM_PAGE_EXECUTE);
697 <
698 <        // Initialize Kernel Data
699 <        memset(kernel_data, 0, sizeof(KernelData));
700 <        if (ROMType == ROMTYPE_NEWWORLD) {
701 <                uintptr of_dev_tree = SheepMem::Reserve(4 * sizeof(uint32));
702 <                memset((void *)of_dev_tree, 0, 4 * sizeof(uint32));
703 <                uintptr vector_lookup_tbl = SheepMem::Reserve(128);
704 <                uintptr vector_mask_tbl = SheepMem::Reserve(64);
705 <                memset((uint8 *)kernel_data + 0xb80, 0x3d, 0x80);
706 <                memset((void *)vector_lookup_tbl, 0, 128);
707 <                memset((void *)vector_mask_tbl, 0, 64);
708 <                kernel_data->v[0xb80 >> 2] = htonl(ROM_BASE);
709 <                kernel_data->v[0xb84 >> 2] = htonl(of_dev_tree);                        // OF device tree base
710 <                kernel_data->v[0xb90 >> 2] = htonl(vector_lookup_tbl);
711 <                kernel_data->v[0xb94 >> 2] = htonl(vector_mask_tbl);
712 <                kernel_data->v[0xb98 >> 2] = htonl(ROM_BASE);                           // OpenPIC base
713 <                kernel_data->v[0xbb0 >> 2] = htonl(0);                                          // ADB base
714 <                kernel_data->v[0xc20 >> 2] = htonl(RAMSize);
715 <                kernel_data->v[0xc24 >> 2] = htonl(RAMSize);
716 <                kernel_data->v[0xc30 >> 2] = htonl(RAMSize);
717 <                kernel_data->v[0xc34 >> 2] = htonl(RAMSize);
718 <                kernel_data->v[0xc38 >> 2] = htonl(0x00010020);
719 <                kernel_data->v[0xc3c >> 2] = htonl(0x00200001);
720 <                kernel_data->v[0xc40 >> 2] = htonl(0x00010000);
721 <                kernel_data->v[0xc50 >> 2] = htonl(RAMBase);
722 <                kernel_data->v[0xc54 >> 2] = htonl(RAMSize);
723 <                kernel_data->v[0xf60 >> 2] = htonl(PVR);
724 <                kernel_data->v[0xf64 >> 2] = htonl(CPUClockSpeed);
725 <                kernel_data->v[0xf68 >> 2] = htonl(BusClockSpeed);
726 <                kernel_data->v[0xf6c >> 2] = htonl(CPUClockSpeed);
727 <        } else {
728 <                kernel_data->v[0xc80 >> 2] = htonl(RAMSize);
729 <                kernel_data->v[0xc84 >> 2] = htonl(RAMSize);
730 <                kernel_data->v[0xc90 >> 2] = htonl(RAMSize);
731 <                kernel_data->v[0xc94 >> 2] = htonl(RAMSize);
732 <                kernel_data->v[0xc98 >> 2] = htonl(0x00010020);
733 <                kernel_data->v[0xc9c >> 2] = htonl(0x00200001);
734 <                kernel_data->v[0xca0 >> 2] = htonl(0x00010000);
735 <                kernel_data->v[0xcb0 >> 2] = htonl(RAMBase);
736 <                kernel_data->v[0xcb4 >> 2] = htonl(RAMSize);
737 <                kernel_data->v[0xf80 >> 2] = htonl(PVR);
738 <                kernel_data->v[0xf84 >> 2] = htonl(CPUClockSpeed);
739 <                kernel_data->v[0xf88 >> 2] = htonl(BusClockSpeed);
740 <                kernel_data->v[0xf8c >> 2] = htonl(CPUClockSpeed);
741 <        }
742 <
743 <        // Initialize extra low memory
744 <        D(bug("Initializing Low Memory...\n"));
745 <        memset(NULL, 0, 0x3000);
746 <        WriteMacInt32(XLM_SIGNATURE, FOURCC('B','a','a','h'));                  // Signature to detect SheepShaver
747 <        WriteMacInt32(XLM_KERNEL_DATA, KernelDataAddr);                                 // For trap replacement routines
748 <        WriteMacInt32(XLM_PVR, PVR);                                                                    // Theoretical PVR
749 <        WriteMacInt32(XLM_BUS_CLOCK, BusClockSpeed);                                    // For DriverServicesLib patch
750 <        WriteMacInt16(XLM_EXEC_RETURN_OPCODE, M68K_EXEC_RETURN);                // For Execute68k() (RTS from the executed 68k code will jump here and end 68k mode)
751 <        WriteMacInt32(XLM_ZERO_PAGE, SheepMem::ZeroPage());                             // Pointer to read-only page with all bits set to 0
752 < #if !EMULATED_PPC
753 <        WriteMacInt32(XLM_TOC, (uint32)TOC);                                                            // TOC pointer of emulator
995 >        flush_icache_range(ROMBase, ROMBase + ROM_AREA_SIZE);
996   #endif
997 <        WriteMacInt32(XLM_ETHER_INIT, NativeFunction(NATIVE_ETHER_INIT));       // DLPI ethernet driver functions
756 <        WriteMacInt32(XLM_ETHER_TERM, NativeFunction(NATIVE_ETHER_TERM));
757 <        WriteMacInt32(XLM_ETHER_OPEN, NativeFunction(NATIVE_ETHER_OPEN));
758 <        WriteMacInt32(XLM_ETHER_CLOSE, NativeFunction(NATIVE_ETHER_CLOSE));
759 <        WriteMacInt32(XLM_ETHER_WPUT, NativeFunction(NATIVE_ETHER_WPUT));
760 <        WriteMacInt32(XLM_ETHER_RSRV, NativeFunction(NATIVE_ETHER_RSRV));
761 <        WriteMacInt32(XLM_VIDEO_DOIO, NativeFunction(NATIVE_VIDEO_DO_DRIVER_IO));
762 <        D(bug("Low Memory initialized\n"));
997 >        vm_protect(ROMBaseHost, ROM_AREA_SIZE, VM_PAGE_READ | VM_PAGE_EXECUTE);
998  
999          // Start 60Hz thread
1000 +        tick_thread_cancel = false;
1001          tick_thread_active = (pthread_create(&tick_thread, NULL, tick_func, NULL) == 0);
1002          D(bug("Tick thread installed (%ld)\n", tick_thread));
1003  
1004          // Start NVRAM watchdog thread
1005          memcpy(last_xpram, XPRAM, XPRAM_SIZE);
1006 +        nvram_thread_cancel = false;
1007          nvram_thread_active = (pthread_create(&nvram_thread, NULL, nvram_func, NULL) == 0);
1008          D(bug("NVRAM thread installed (%ld)\n", nvram_thread));
1009  
1010   #if !EMULATED_PPC
774        // Create and install stacks for signal handlers
775        sig_stack = malloc(SIG_STACK_SIZE);
776        D(bug("Signal stack at %p\n", sig_stack));
777        if (sig_stack == NULL) {
778                ErrorAlert(GetString(STR_NOT_ENOUGH_MEMORY_ERR));
779                goto quit;
780        }
781        extra_stack = malloc(SIG_STACK_SIZE);
782        D(bug("Extra stack at %p\n", extra_stack));
783        if (extra_stack == NULL) {
784                ErrorAlert(GetString(STR_NOT_ENOUGH_MEMORY_ERR));
785                goto quit;
786        }
787        struct sigaltstack new_stack;
788        new_stack.ss_sp = sig_stack;
789        new_stack.ss_flags = 0;
790        new_stack.ss_size = SIG_STACK_SIZE;
791        if (sigaltstack(&new_stack, NULL) < 0) {
792                sprintf(str, GetString(STR_SIGALTSTACK_ERR), strerror(errno));
793                ErrorAlert(str);
794                goto quit;
795        }
796 #endif
797
798 #if !EMULATED_PPC
799        // Install SIGSEGV and SIGBUS handlers
800        sigemptyset(&sigsegv_action.sa_mask);   // Block interrupts during SEGV handling
801        sigaddset(&sigsegv_action.sa_mask, SIGUSR2);
802        sigsegv_action.sa_sigaction = sigsegv_handler;
803        sigsegv_action.sa_flags = SA_ONSTACK | SA_SIGINFO;
804 #ifdef HAVE_SIGNAL_SA_RESTORER
805        sigsegv_action.sa_restorer = NULL;
806 #endif
807        if (sigaction(SIGSEGV, &sigsegv_action, NULL) < 0) {
808                sprintf(str, GetString(STR_SIGSEGV_INSTALL_ERR), strerror(errno));
809                ErrorAlert(str);
810                goto quit;
811        }
812        if (sigaction(SIGBUS, &sigsegv_action, NULL) < 0) {
813                sprintf(str, GetString(STR_SIGSEGV_INSTALL_ERR), strerror(errno));
814                ErrorAlert(str);
815                goto quit;
816        }
817
1011          // Install SIGILL handler
1012          sigemptyset(&sigill_action.sa_mask);    // Block interrupts during ILL handling
1013          sigaddset(&sigill_action.sa_mask, SIGUSR2);
# Line 824 | Line 1017 | int main(int argc, char **argv)
1017          sigill_action.sa_restorer = NULL;
1018   #endif
1019          if (sigaction(SIGILL, &sigill_action, NULL) < 0) {
1020 <                sprintf(str, GetString(STR_SIGILL_INSTALL_ERR), strerror(errno));
1020 >                sprintf(str, GetString(STR_SIG_INSTALL_ERR), "SIGILL", strerror(errno));
1021                  ErrorAlert(str);
1022                  goto quit;
1023          }
# Line 833 | Line 1026 | int main(int argc, char **argv)
1026   #if !EMULATED_PPC
1027          // Install interrupt signal handler
1028          sigemptyset(&sigusr2_action.sa_mask);
1029 <        sigusr2_action.sa_sigaction = sigusr2_handler;
1029 >        sigusr2_action.sa_sigaction = sigusr2_handler_init;
1030          sigusr2_action.sa_flags = SA_ONSTACK | SA_RESTART | SA_SIGINFO;
1031   #ifdef HAVE_SIGNAL_SA_RESTORER
1032          sigusr2_action.sa_restorer = NULL;
1033   #endif
1034          if (sigaction(SIGUSR2, &sigusr2_action, NULL) < 0) {
1035 <                sprintf(str, GetString(STR_SIGUSR2_INSTALL_ERR), strerror(errno));
1035 >                sprintf(str, GetString(STR_SIG_INSTALL_ERR), "SIGUSR2", strerror(errno));
1036                  ErrorAlert(str);
1037                  goto quit;
1038          }
# Line 869 | Line 1062 | static void Quit(void)
1062  
1063          // Stop 60Hz thread
1064          if (tick_thread_active) {
1065 +                tick_thread_cancel = true;
1066                  pthread_cancel(tick_thread);
1067                  pthread_join(tick_thread, NULL);
1068          }
1069  
1070          // Stop NVRAM watchdog thread
1071          if (nvram_thread_active) {
1072 +                nvram_thread_cancel = true;
1073                  pthread_cancel(nvram_thread);
1074                  pthread_join(nvram_thread, NULL);
1075          }
# Line 892 | Line 1087 | static void Quit(void)
1087          sigill_action.sa_handler = SIG_DFL;
1088          sigill_action.sa_flags = 0;
1089          sigaction(SIGILL, &sigill_action, NULL);
895 #endif
896
897        // Save NVRAM
898        XPRAMExit();
899
900        // Exit clipboard
901        ClipExit();
1090  
1091 <        // Exit Time Manager
1092 <        TimerExit();
1093 <
1094 <        // Exit serial
1095 <        SerialExit();
1096 <
909 <        // Exit network
910 <        EtherExit();
911 <
912 <        // Exit audio
913 <        AudioExit();
914 <
915 <        // Exit ADB
916 <        ADBExit();
917 <
918 <        // Exit video
919 <        VideoExit();
920 <
921 <        // Exit external file system
922 <        ExtFSExit();
923 <
924 <        // Exit drivers
925 <        SCSIExit();
926 <        CDROMExit();
927 <        DiskExit();
928 <        SonyExit();
1091 >        // Delete stacks for signal handlers
1092 >        if (sig_stack.ss_sp)
1093 >                free(sig_stack.ss_sp);
1094 >        if (extra_stack.ss_sp)
1095 >                free(extra_stack.ss_sp);
1096 > #endif
1097  
1098 <        // Delete thunks
1099 <        ThunksExit();
1098 >        // Deinitialize everything
1099 >        ExitAll();
1100  
1101          // Delete SheepShaver globals
1102          SheepMem::Exit();
1103  
1104          // Delete RAM area
1105          if (ram_area_mapped)
1106 <                vm_release((char *)RAM_BASE, RAMSize);
1106 >                vm_mac_release(RAMBase, RAMSize);
1107  
1108          // Delete ROM area
1109          if (rom_area_mapped)
1110 <                vm_release((char *)ROM_BASE, ROM_AREA_SIZE);
1110 >                vm_mac_release(ROMBase, ROM_AREA_SIZE);
1111 >
1112 >        // Delete DR cache areas
1113 >        if (dr_emulator_area_mapped)
1114 >                vm_mac_release(DR_EMULATOR_BASE, DR_EMULATOR_SIZE);
1115 >        if (dr_cache_area_mapped)
1116 >                vm_mac_release(DR_CACHE_BASE, DR_CACHE_SIZE);
1117  
1118          // Delete Kernel Data area
1119 <        if (kernel_area >= 0) {
946 <                shmdt((void *)KERNEL_DATA_BASE);
947 <                shmdt((void *)KERNEL_DATA2_BASE);
948 <                shmctl(kernel_area, IPC_RMID, NULL);
949 <        }
1119 >        kernel_data_exit();
1120  
1121          // Delete Low Memory area
1122          if (lm_area_mapped)
1123 <                munmap((char *)0x0000, 0x3000);
1123 >                vm_mac_release(0, 0x3000);
1124  
1125          // Close /dev/zero
1126          if (zero_fd > 0)
# Line 968 | Line 1138 | static void Quit(void)
1138   #endif
1139  
1140          // Close X11 server connection
1141 + #ifndef USE_SDL_VIDEO
1142          if (x_display)
1143                  XCloseDisplay(x_display);
1144 + #endif
1145 +
1146 +        // Notify GUI we are about to leave
1147 +        if (gui_connection) {
1148 +                if (rpc_method_invoke(gui_connection, RPC_METHOD_EXIT, RPC_TYPE_INVALID) == RPC_ERROR_NO_ERROR)
1149 +                        rpc_method_wait_for_reply(gui_connection, RPC_TYPE_INVALID);
1150 +        }
1151  
1152          exit(0);
1153   }
1154  
1155  
1156   /*
1157 + *  Initialize Kernel Data segments
1158 + */
1159 +
1160 + static bool kernel_data_init(void)
1161 + {
1162 +        char str[256];
1163 +        uint32 kernel_area_size = (KERNEL_AREA_SIZE + SHMLBA - 1) & -SHMLBA;
1164 +
1165 +        kernel_area = shmget(IPC_PRIVATE, kernel_area_size, 0600);
1166 +        if (kernel_area == -1) {
1167 +                sprintf(str, GetString(STR_KD_SHMGET_ERR), strerror(errno));
1168 +                ErrorAlert(str);
1169 +                return false;
1170 +        }
1171 +        void *kernel_addr = Mac2HostAddr(KERNEL_DATA_BASE & -SHMLBA);
1172 +        if (shmat(kernel_area, kernel_addr, 0) != kernel_addr) {
1173 +                sprintf(str, GetString(STR_KD_SHMAT_ERR), strerror(errno));
1174 +                ErrorAlert(str);
1175 +                return false;
1176 +        }
1177 +        kernel_addr = Mac2HostAddr(KERNEL_DATA2_BASE & -SHMLBA);
1178 +        if (shmat(kernel_area, kernel_addr, 0) != kernel_addr) {
1179 +                sprintf(str, GetString(STR_KD2_SHMAT_ERR), strerror(errno));
1180 +                ErrorAlert(str);
1181 +                return false;
1182 +        }
1183 +        return true;
1184 + }
1185 +
1186 +
1187 + /*
1188 + *  Deallocate Kernel Data segments
1189 + */
1190 +
1191 + static void kernel_data_exit(void)
1192 + {
1193 +        if (kernel_area >= 0) {
1194 +                shmdt(Mac2HostAddr(KERNEL_DATA_BASE & -SHMLBA));
1195 +                shmdt(Mac2HostAddr(KERNEL_DATA2_BASE & -SHMLBA));
1196 +                shmctl(kernel_area, IPC_RMID, NULL);
1197 +        }
1198 + }
1199 +
1200 +
1201 + /*
1202   *  Jump into Mac ROM, start 680x0 emulator
1203   */
1204  
# Line 1003 | Line 1226 | static void *emul_func(void *arg)
1226          // Jump to ROM boot routine
1227          D(bug("Jumping to ROM\n"));
1228   #if EMULATED_PPC
1229 <        jump_to_rom(ROM_BASE + 0x310000);
1229 >        jump_to_rom(ROMBase + 0x310000);
1230   #else
1231 <        jump_to_rom(ROM_BASE + 0x310000, (uint32)emulator_data);
1231 >        jump_to_rom(ROMBase + 0x310000, (uint32)emulator_data);
1232   #endif
1233          D(bug("Returned from ROM\n"));
1234  
# Line 1062 | Line 1285 | void QuitEmulator(void)
1285  
1286  
1287   /*
1065 *  Pause/resume emulator
1066 */
1067
1068 void PauseEmulator(void)
1069 {
1070        pthread_kill(emul_thread, SIGSTOP);
1071 }
1072
1073 void ResumeEmulator(void)
1074 {
1075        pthread_kill(emul_thread, SIGCONT);
1076 }
1077
1078
1079 /*
1288   *  Dump 68k registers
1289   */
1290  
# Line 1104 | Line 1312 | void Dump68kRegs(M68kRegisters *r)
1312   *  Make code executable
1313   */
1314  
1315 < void MakeExecutable(int dummy, void *start, uint32 length)
1315 > void MakeExecutable(int dummy, uint32 start, uint32 length)
1316   {
1317 <        if (((uintptr)start >= ROM_BASE) && ((uintptr)start < (ROM_BASE + ROM_SIZE)))
1317 >        if ((start >= ROMBase) && (start < (ROMBase + ROM_SIZE)))
1318                  return;
1319   #if EMULATED_PPC
1320 <        FlushCodeCache((uintptr)start, (uintptr)start + length);
1320 >        FlushCodeCache(start, start + length);
1321   #else
1322 <        flush_icache_range(start, (void *)((uintptr)start + length));
1322 >        flush_icache_range(start, start + length);
1323   #endif
1324   }
1325  
1326  
1327   /*
1328 < *  Patch things after system startup (gets called by disk driver accRun routine)
1328 > *  NVRAM watchdog thread (saves NVRAM every minute)
1329   */
1330  
1331 < void PatchAfterStartup(void)
1331 > static void nvram_watchdog(void)
1332   {
1333 <        ExecuteNative(NATIVE_VIDEO_INSTALL_ACCEL);
1334 <        InstallExtFS();
1333 >        if (memcmp(last_xpram, XPRAM, XPRAM_SIZE)) {
1334 >                memcpy(last_xpram, XPRAM, XPRAM_SIZE);
1335 >                SaveXPRAM();
1336 >        }
1337   }
1338  
1129
1130 /*
1131 *  NVRAM watchdog thread (saves NVRAM every minute)
1132 */
1133
1339   static void *nvram_func(void *arg)
1340   {
1341 <        struct timespec req = {60, 0};  // 1 minute
1342 <
1343 <        for (;;) {
1344 <                pthread_testcancel();
1140 <                nanosleep(&req, NULL);
1141 <                pthread_testcancel();
1142 <                if (memcmp(last_xpram, XPRAM, XPRAM_SIZE)) {
1143 <                        memcpy(last_xpram, XPRAM, XPRAM_SIZE);
1144 <                        SaveXPRAM();
1145 <                }
1341 >        while (!nvram_thread_cancel) {
1342 >                for (int i=0; i<60 && !nvram_thread_cancel; i++)
1343 >                        Delay_usec(999999);             // Only wait 1 second so we quit promptly when nvram_thread_cancel becomes true
1344 >                nvram_watchdog();
1345          }
1346          return NULL;
1347   }
# Line 1155 | Line 1354 | static void *nvram_func(void *arg)
1354   static void *tick_func(void *arg)
1355   {
1356          int tick_counter = 0;
1357 <        struct timespec req = {0, 16625000};
1357 >        uint64 start = GetTicks_usec();
1358 >        int64 ticks = 0;
1359 >        uint64 next = GetTicks_usec();
1360  
1361 <        for (;;) {
1361 >        while (!tick_thread_cancel) {
1362  
1363                  // Wait
1364 <                nanosleep(&req, NULL);
1364 >                next += 16625;
1365 >                int64 delay = next - GetTicks_usec();
1366 >                if (delay > 0)
1367 >                        Delay_usec(delay);
1368 >                else if (delay < -16625)
1369 >                        next = GetTicks_usec();
1370 >                ticks++;
1371  
1372   #if !EMULATED_PPC
1373                  // Did we crash?
# Line 1218 | Line 1425 | static void *tick_func(void *arg)
1425                          TriggerInterrupt();
1426                  }
1427          }
1428 +
1429 +        uint64 end = GetTicks_usec();
1430 +        D(bug("%lld ticks in %lld usec = %f ticks/sec\n", ticks, end - start, ticks * 1000000.0 / (end - start)));
1431          return NULL;
1432   }
1433  
# Line 1267 | Line 1477 | struct B2_mutex {
1477              pthread_mutexattr_init(&attr);
1478              // Initialize the mutex for priority inheritance --
1479              // required for accurate timing.
1480 < #ifdef HAVE_PTHREAD_MUTEXATTR_SETPROTOCOL
1480 > #if defined(HAVE_PTHREAD_MUTEXATTR_SETPROTOCOL) && !defined(__CYGWIN__)
1481              pthread_mutexattr_setprotocol(&attr, PTHREAD_PRIO_INHERIT);
1482   #endif
1483   #if defined(HAVE_PTHREAD_MUTEXATTR_SETTYPE) && defined(PTHREAD_MUTEX_NORMAL)
# Line 1338 | Line 1548 | void B2_delete_mutex(B2_mutex *mutex)
1548   *  Trigger signal USR2 from another thread
1549   */
1550  
1551 < #if !EMULATED_PPC || ASYNC_IRQ
1551 > #if !EMULATED_PPC
1552   void TriggerInterrupt(void)
1553   {
1554 <        if (ready_for_signals)
1554 >        if (ready_for_signals) {
1555 >                idle_resume();
1556                  pthread_kill(emul_thread, SIGUSR2);
1557 +        }
1558   }
1559   #endif
1560  
# Line 1370 | Line 1582 | void ClearInterruptFlag(uint32 flag)
1582  
1583   void DisableInterrupt(void)
1584   {
1585 + #if EMULATED_PPC
1586 +        WriteMacInt32(XLM_IRQ_NEST, int32(ReadMacInt32(XLM_IRQ_NEST)) + 1);
1587 + #else
1588          atomic_add((int *)XLM_IRQ_NEST, 1);
1589 + #endif
1590   }
1591  
1592  
# Line 1380 | Line 1596 | void DisableInterrupt(void)
1596  
1597   void EnableInterrupt(void)
1598   {
1599 + #if EMULATED_PPC
1600 +        WriteMacInt32(XLM_IRQ_NEST, int32(ReadMacInt32(XLM_IRQ_NEST)) - 1);
1601 + #else
1602          atomic_add((int *)XLM_IRQ_NEST, -1);
1603 + #endif
1604   }
1605  
1606  
# Line 1388 | Line 1608 | void EnableInterrupt(void)
1608   *  USR2 handler
1609   */
1610  
1611 < #if EMULATED_PPC
1612 < static void sigusr2_handler(int sig)
1393 < {
1394 < #if ASYNC_IRQ
1395 <        extern void HandleInterrupt(void);
1396 <        HandleInterrupt();
1397 < #endif
1398 < }
1399 < #else
1400 < static void sigusr2_handler(int sig, siginfo_t *sip, void *scp)
1611 > #if !EMULATED_PPC
1612 > void sigusr2_handler(int sig, siginfo_t *sip, void *scp)
1613   {
1614          machine_regs *r = MACHINE_REGISTERS(scp);
1615  
1616 + #ifdef SYSTEM_CLOBBERS_R2
1617 +        // Restore pointer to Thread Local Storage
1618 +        set_r2(TOC);
1619 + #endif
1620 + #ifdef SYSTEM_CLOBBERS_R13
1621 +        // Restore pointer to .sdata section
1622 +        set_r13(R13);
1623 + #endif
1624 +
1625 + #ifdef USE_SDL_VIDEO
1626 +        // We must fill in the events queue in the same thread that did call SDL_SetVideoMode()
1627 +        SDL_PumpEvents();
1628 + #endif
1629 +
1630          // Do nothing if interrupts are disabled
1631          if (*(int32 *)XLM_IRQ_NEST > 0)
1632                  return;
# Line 1420 | Line 1646 | static void sigusr2_handler(int sig, sig
1646                  case MODE_NATIVE:
1647                          // 68k emulator inactive, in nanokernel?
1648                          if (r->gpr(1) != KernelDataAddr) {
1649 +
1650 +                                // Set extra stack for SIGSEGV handler
1651 +                                sigaltstack(&extra_stack, NULL);
1652 +                                
1653                                  // Prepare for 68k interrupt level 1
1654                                  WriteMacInt16(ntohl(kernel_data->v[0x67c >> 2]), 1);
1655                                  WriteMacInt32(ntohl(kernel_data->v[0x658 >> 2]) + 0xdc, ReadMacInt32(ntohl(kernel_data->v[0x658 >> 2]) + 0xdc) | ntohl(kernel_data->v[0x674 >> 2]));
1656  
1657                                  // Execute nanokernel interrupt routine (this will activate the 68k emulator)
1658 <                                atomic_add((int32 *)XLM_IRQ_NEST, 1);
1658 >                                DisableInterrupt();
1659                                  if (ROMType == ROMTYPE_NEWWORLD)
1660 <                                        ppc_interrupt(ROM_BASE + 0x312b1c, KernelDataAddr);
1660 >                                        ppc_interrupt(ROMBase + 0x312b1c, KernelDataAddr);
1661                                  else
1662 <                                        ppc_interrupt(ROM_BASE + 0x312a3c, KernelDataAddr);
1662 >                                        ppc_interrupt(ROMBase + 0x312a3c, KernelDataAddr);
1663 >
1664 >                                // Reset normal stack
1665 >                                sigaltstack(&sig_stack, NULL);
1666                          }
1667                          break;
1668   #endif
# Line 1440 | Line 1673 | static void sigusr2_handler(int sig, sig
1673                          if ((ReadMacInt32(XLM_68K_R25) & 7) == 0) {
1674  
1675                                  // Set extra stack for SIGSEGV handler
1676 <                                struct sigaltstack new_stack;
1444 <                                new_stack.ss_sp = extra_stack;
1445 <                                new_stack.ss_flags = 0;
1446 <                                new_stack.ss_size = SIG_STACK_SIZE;
1447 <                                sigaltstack(&new_stack, NULL);
1676 >                                sigaltstack(&extra_stack, NULL);
1677   #if 1
1678                                  // Execute full 68k interrupt routine
1679                                  M68kRegisters r;
# Line 1470 | Line 1699 | static void sigusr2_handler(int sig, sig
1699                                          }
1700                                  }
1701   #endif
1702 <                                // Reset normal signal stack
1703 <                                new_stack.ss_sp = sig_stack;
1475 <                                new_stack.ss_flags = 0;
1476 <                                new_stack.ss_size = SIG_STACK_SIZE;
1477 <                                sigaltstack(&new_stack, NULL);
1702 >                                // Reset normal stack
1703 >                                sigaltstack(&sig_stack, NULL);
1704                          }
1705                          break;
1706   #endif
# Line 1495 | Line 1721 | static void sigsegv_handler(int sig, sig
1721          // Get effective address
1722          uint32 addr = r->dar();
1723          
1724 + #ifdef SYSTEM_CLOBBERS_R2
1725 +        // Restore pointer to Thread Local Storage
1726 +        set_r2(TOC);
1727 + #endif
1728 + #ifdef SYSTEM_CLOBBERS_R13
1729 +        // Restore pointer to .sdata section
1730 +        set_r13(R13);
1731 + #endif
1732 +
1733   #if ENABLE_VOSF
1734 <        // Handle screen fault.
1735 <        extern bool Screen_fault_handler(sigsegv_address_t fault_address, sigsegv_address_t fault_instruction);
1736 <        if (Screen_fault_handler((sigsegv_address_t)addr, (sigsegv_address_t)r->pc()))
1734 >        // Handle screen fault
1735 > #if SIGSEGV_CHECK_VERSION(1,0,0)
1736 >        sigsegv_info_t si;
1737 >        si.addr = (sigsegv_address_t)addr;
1738 >        si.pc = (sigsegv_address_t)r->pc();
1739 > #endif
1740 >        extern bool Screen_fault_handler(sigsegv_info_t *sip);
1741 >        if (Screen_fault_handler(&si))
1742                  return;
1743   #endif
1744  
1745          num_segv++;
1746  
1747 <        // Fault in Mac ROM or RAM?
1748 <        bool mac_fault = (r->pc() >= ROM_BASE) && (r->pc() < (ROM_BASE + ROM_AREA_SIZE)) || (r->pc() >= RAMBase) && (r->pc() < (RAMBase + RAMSize));
1747 >        // Fault in Mac ROM or RAM or DR Cache?
1748 >        bool mac_fault = (r->pc() >= ROMBase) && (r->pc() < (ROMBase + ROM_AREA_SIZE)) || (r->pc() >= RAMBase) && (r->pc() < (RAMBase + RAMSize)) || (r->pc() >= DR_CACHE_BASE && r->pc() < (DR_CACHE_BASE + DR_CACHE_SIZE));
1749          if (mac_fault) {
1750  
1751                  // "VM settings" during MacOS 8 installation
1752 <                if (r->pc() == ROM_BASE + 0x488160 && r->gpr(20) == 0xf8000000) {
1752 >                if (r->pc() == ROMBase + 0x488160 && r->gpr(20) == 0xf8000000) {
1753                          r->pc() += 4;
1754                          r->gpr(8) = 0;
1755                          return;
1756          
1757                  // MacOS 8.5 installation
1758 <                } else if (r->pc() == ROM_BASE + 0x488140 && r->gpr(16) == 0xf8000000) {
1758 >                } else if (r->pc() == ROMBase + 0x488140 && r->gpr(16) == 0xf8000000) {
1759                          r->pc() += 4;
1760                          r->gpr(8) = 0;
1761                          return;
1762          
1763                  // MacOS 8 serial drivers on startup
1764 <                } else if (r->pc() == ROM_BASE + 0x48e080 && (r->gpr(8) == 0xf3012002 || r->gpr(8) == 0xf3012000)) {
1764 >                } else if (r->pc() == ROMBase + 0x48e080 && (r->gpr(8) == 0xf3012002 || r->gpr(8) == 0xf3012000)) {
1765                          r->pc() += 4;
1766                          r->gpr(8) = 0;
1767                          return;
1768          
1769                  // MacOS 8.1 serial drivers on startup
1770 <                } else if (r->pc() == ROM_BASE + 0x48c5e0 && (r->gpr(20) == 0xf3012002 || r->gpr(20) == 0xf3012000)) {
1770 >                } else if (r->pc() == ROMBase + 0x48c5e0 && (r->gpr(20) == 0xf3012002 || r->gpr(20) == 0xf3012000)) {
1771                          r->pc() += 4;
1772                          return;
1773 <                } else if (r->pc() == ROM_BASE + 0x4a10a0 && (r->gpr(20) == 0xf3012002 || r->gpr(20) == 0xf3012000)) {
1773 >                } else if (r->pc() == ROMBase + 0x4a10a0 && (r->gpr(20) == 0xf3012002 || r->gpr(20) == 0xf3012000)) {
1774 >                        r->pc() += 4;
1775 >                        return;
1776 >        
1777 >                // MacOS 8.6 serial drivers on startup (with DR Cache and OldWorld ROM)
1778 >                } else if ((r->pc() - DR_CACHE_BASE) < DR_CACHE_SIZE && (r->gpr(16) == 0xf3012002 || r->gpr(16) == 0xf3012000)) {
1779 >                        r->pc() += 4;
1780 >                        return;
1781 >                } else if ((r->pc() - DR_CACHE_BASE) < DR_CACHE_SIZE && (r->gpr(20) == 0xf3012002 || r->gpr(20) == 0xf3012000)) {
1782                          r->pc() += 4;
1783                          return;
1784                  }
# Line 1653 | Line 1901 | static void sigsegv_handler(int sig, sig
1901   #endif
1902                  }
1903          
1904 <                // Ignore ROM writes
1905 <                if (transfer_type == TYPE_STORE && addr >= ROM_BASE && addr < ROM_BASE + ROM_SIZE) {
1904 >                // Ignore ROM writes (including to the zero page, which is read-only)
1905 >                if (transfer_type == TYPE_STORE &&
1906 >                        ((addr >= ROMBase && addr < ROMBase + ROM_SIZE) ||
1907 >                         (addr >= SheepMem::ZeroPage() && addr < SheepMem::ZeroPage() + SheepMem::PageSize()))) {
1908   //                      D(bug("WARNING: %s write access to ROM at %08lx, pc %08lx\n", transfer_size == SIZE_BYTE ? "Byte" : transfer_size == SIZE_HALFWORD ? "Halfword" : "Word", addr, r->pc()));
1909                          if (addr_mode == MODE_U || addr_mode == MODE_UX)
1910                                  r->gpr(ra) = addr;
# Line 1734 | Line 1984 | static void sigill_handler(int sig, sigi
1984          machine_regs *r = MACHINE_REGISTERS(scp);
1985          char str[256];
1986  
1987 + #ifdef SYSTEM_CLOBBERS_R2
1988 +        // Restore pointer to Thread Local Storage
1989 +        set_r2(TOC);
1990 + #endif
1991 + #ifdef SYSTEM_CLOBBERS_R13
1992 +        // Restore pointer to .sdata section
1993 +        set_r13(R13);
1994 + #endif
1995 +
1996          // Fault in Mac ROM or RAM?
1997 <        bool mac_fault = (r->pc() >= ROM_BASE) && (r->pc() < (ROM_BASE + ROM_AREA_SIZE)) || (r->pc() >= RAMBase) && (r->pc() < (RAMBase + RAMSize));
1997 >        bool mac_fault = (r->pc() >= ROMBase) && (r->pc() < (ROMBase + ROM_AREA_SIZE)) || (r->pc() >= RAMBase) && (r->pc() < (RAMBase + RAMSize));
1998          if (mac_fault) {
1999  
2000                  // Get opcode and divide into fields
# Line 1898 | Line 2157 | rti:;
2157  
2158   bool SheepMem::Init(void)
2159   {
2160 <        const int page_size = getpagesize();
2160 >        // Size of a native page
2161 >        page_size = getpagesize();
2162  
2163          // Allocate SheepShaver globals
2164 <        if (vm_acquire_fixed((char *)base, size) < 0)
2164 >        proc = base;
2165 >        if (vm_mac_acquire_fixed(base, size) < 0)
2166                  return false;
2167  
2168 <        // Allocate page with all bits set to 0
2169 <        zero_page = base + size;
2170 <        if (vm_acquire_fixed((char *)zero_page, page_size) < 0)
2171 <                return false;
2172 <        memset((char *)zero_page, 0, page_size);
1912 <        if (vm_protect((char *)zero_page, page_size, VM_PAGE_READ) < 0)
2168 >        // Allocate page with all bits set to 0, right in the middle
2169 >        // This is also used to catch undesired overlaps between proc and data areas
2170 >        zero_page = proc + (size / 2);
2171 >        Mac_memset(zero_page, 0, page_size);
2172 >        if (vm_protect(Mac2HostAddr(zero_page), page_size, VM_PAGE_READ) < 0)
2173                  return false;
2174  
2175   #if EMULATED_PPC
2176          // Allocate alternate stack for PowerPC interrupt routine
2177 <        sig_stack = zero_page + page_size;
2178 <        if (vm_acquire_fixed((char *)sig_stack, SIG_STACK_SIZE) < 0)
2177 >        sig_stack = base + size;
2178 >        if (vm_mac_acquire_fixed(sig_stack, SIG_STACK_SIZE) < 0)
2179                  return false;
2180   #endif
2181  
2182 <        top = base + size;
2182 >        data = base + size;
2183          return true;
2184   }
2185  
2186   void SheepMem::Exit(void)
2187   {
2188 <        if (top) {
1929 <                const int page_size = getpagesize();
1930 <
2188 >        if (data) {
2189                  // Delete SheepShaver globals
2190 <                vm_release((void *)base, size);
1933 <
1934 <                // Delete zero page
1935 <                vm_release((void *)zero_page, page_size);
2190 >                vm_mac_release(base, size);
2191  
2192   #if EMULATED_PPC
2193                  // Delete alternate stack for PowerPC interrupt routine
2194 <                vm_release((void *)sig_stack, SIG_STACK_SIZE);
2194 >                vm_mac_release(sig_stack, SIG_STACK_SIZE);
2195   #endif
2196          }
2197   }
# Line 1991 | Line 2246 | void display_alert(int title_id, int pre
2246  
2247   void ErrorAlert(const char *text)
2248   {
2249 < #ifdef ENABLE_GTK
2249 >        if (gui_connection) {
2250 >                if (rpc_method_invoke(gui_connection, RPC_METHOD_ERROR_ALERT, RPC_TYPE_STRING, text, RPC_TYPE_INVALID) == RPC_ERROR_NO_ERROR &&
2251 >                        rpc_method_wait_for_reply(gui_connection, RPC_TYPE_INVALID) == RPC_ERROR_NO_ERROR)
2252 >                        return;
2253 >        }
2254 > #if defined(ENABLE_GTK) && !defined(USE_SDL_VIDEO)
2255          if (PrefsFindBool("nogui") || x_display == NULL) {
2256                  printf(GetString(STR_SHELL_ERROR_PREFIX), text);
2257                  return;
# Line 2010 | Line 2270 | void ErrorAlert(const char *text)
2270  
2271   void WarningAlert(const char *text)
2272   {
2273 < #ifdef ENABLE_GTK
2273 >        if (gui_connection) {
2274 >                if (rpc_method_invoke(gui_connection, RPC_METHOD_WARNING_ALERT, RPC_TYPE_STRING, text, RPC_TYPE_INVALID) == RPC_ERROR_NO_ERROR &&
2275 >                        rpc_method_wait_for_reply(gui_connection, RPC_TYPE_INVALID) == RPC_ERROR_NO_ERROR)
2276 >                        return;
2277 >        }
2278 > #if defined(ENABLE_GTK) && !defined(USE_SDL_VIDEO)
2279          if (PrefsFindBool("nogui") || x_display == NULL) {
2280                  printf(GetString(STR_SHELL_WARNING_PREFIX), text);
2281                  return;

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines