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.19 by gbeauche, 2003-12-05T12:41:19Z vs.
Revision 1.60 by gbeauche, 2005-02-27T21:52:06Z

# Line 1 | Line 1
1   /*
2   *  main_unix.cpp - Emulation core, Unix implementation
3   *
4 < *  SheepShaver (C) 1997-2002 Christian Bauer and Marc Hellwig
4 > *  SheepShaver (C) 1997-2005 Christian Bauer and Marc Hellwig
5   *
6   *  This program is free software; you can redistribute it and/or modify
7   *  it under the terms of the GNU General Public License as published by
# 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 + *  There is apparently another problem when processing signals. In
71 + *  fullscreen mode, we get quick updates of the mouse position. This
72 + *  causes an increased number of calls to TriggerInterrupt(). And,
73 + *  since IRQ_NEST is not fully handled atomically, nested calls to
74 + *  ppc_interrupt() may cause stack corruption to eventually crash the
75 + *  emulator.
76 + *
77 + *  FIXME:
78 + *  The current solution is to allocate another signal stack when
79 + *  processing ppc_interrupt(). However, it may be better to detect
80 + *  the INTFLAG_ADB case and handle it specifically with some extra mutex?
81 + *
82   *  TODO:
83   *    check if SIGSEGV handler works for all registers (including FP!)
84   */
# Line 93 | Line 107
107   #include "xpram.h"
108   #include "timer.h"
109   #include "adb.h"
96 #include "sony.h"
97 #include "disk.h"
98 #include "cdrom.h"
99 #include "scsi.h"
110   #include "video.h"
101 #include "audio.h"
102 #include "ether.h"
103 #include "serial.h"
104 #include "clip.h"
105 #include "extfs.h"
111   #include "sys.h"
112   #include "macos_util.h"
113   #include "rom_patches.h"
114   #include "user_strings.h"
115   #include "vm_alloc.h"
116   #include "sigsegv.h"
112 #include "thunks.h"
117  
118   #define DEBUG 0
119   #include "debug.h"
120  
121  
122 + #ifdef HAVE_DIRENT_H
123 + #include <dirent.h>
124 + #endif
125 +
126 + #ifdef USE_SDL
127 + #include <SDL.h>
128 + #endif
129 +
130 + #ifndef USE_SDL_VIDEO
131   #include <X11/Xlib.h>
132 + #endif
133  
134   #ifdef ENABLE_GTK
135   #include <gtk/gtk.h>
# Line 132 | Line 146
146   #endif
147  
148  
149 + // Enable emulation of unaligned lmw/stmw?
150 + #define EMULATE_UNALIGNED_LOADSTORE_MULTIPLE 1
151 +
152   // Enable Execute68k() safety checks?
153   #define SAFE_EXEC_68K 0
154  
# Line 141 | Line 158
158   // Interrupts in native mode?
159   #define INTERRUPTS_IN_NATIVE_MODE 1
160  
161 + // Number of alternate stacks for signal handlers?
162 + #define SIG_STACK_COUNT 4
163 +
164  
165   // Constants
166   const char ROM_FILE_NAME[] = "ROM";
167   const char ROM_FILE_NAME2[] = "Mac OS ROM";
168  
169 + #if REAL_ADDRESSING
170   const uintptr RAM_BASE = 0x20000000;            // Base address of RAM
171 + #else
172 + // FIXME: needs to be >= 0x04000000
173 + const uintptr RAM_BASE = 0x10000000;            // Base address of RAM
174 + #endif
175   const uint32 SIG_STACK_SIZE = 0x10000;          // Size of signal stack
176  
177  
178   #if !EMULATED_PPC
154 // Structure in which registers are saved in a signal handler;
155 // sigcontext->regs points to it
156 // (see arch/ppc/kernel/signal.c)
157 typedef struct {
158        uint32 u[4];
159 } __attribute((aligned(16))) vector128;
160 #include <linux/elf.h>
161
179   struct sigregs {
180 <        elf_gregset_t   gp_regs;                                // Identical to pt_regs
181 <        double                  fp_regs[ELF_NFPREG];    // f0..f31 and fpsrc
182 <        //more (uninteresting) stuff following here
180 >        uint32 nip;
181 >        uint32 link;
182 >        uint32 ctr;
183 >        uint32 msr;
184 >        uint32 xer;
185 >        uint32 ccr;
186 >        uint32 gpr[32];
187 > };
188 >
189 > #if defined(__linux__)
190 > #include <sys/ucontext.h>
191 > #define MACHINE_REGISTERS(scp)  ((machine_regs *)(((ucontext_t *)scp)->uc_mcontext.regs))
192 >
193 > struct machine_regs : public pt_regs
194 > {
195 >        u_long & cr()                           { return pt_regs::ccr; }
196 >        uint32 cr() const                       { return pt_regs::ccr; }
197 >        uint32 lr() const                       { return pt_regs::link; }
198 >        uint32 ctr() const                      { return pt_regs::ctr; }
199 >        uint32 xer() const                      { return pt_regs::xer; }
200 >        uint32 msr() const                      { return pt_regs::msr; }
201 >        uint32 dar() const                      { return pt_regs::dar; }
202 >        u_long & pc()                           { return pt_regs::nip; }
203 >        uint32 pc() const                       { return pt_regs::nip; }
204 >        u_long & gpr(int i)                     { return pt_regs::gpr[i]; }
205 >        uint32 gpr(int i) const         { return pt_regs::gpr[i]; }
206 > };
207 > #endif
208 >
209 > #if defined(__NetBSD__)
210 > #include <sys/ucontext.h>
211 > #define MACHINE_REGISTERS(scp)  ((machine_regs *)&(((ucontext_t *)scp)->uc_mcontext))
212 >
213 > struct machine_regs : public mcontext_t
214 > {
215 >        long & cr()                                     { return __gregs[_REG_CR]; }
216 >        uint32 cr() const                       { return __gregs[_REG_CR]; }
217 >        uint32 lr() const                       { return __gregs[_REG_LR]; }
218 >        uint32 ctr() const                      { return __gregs[_REG_CTR]; }
219 >        uint32 xer() const                      { return __gregs[_REG_XER]; }
220 >        uint32 msr() const                      { return __gregs[_REG_MSR]; }
221 >        uint32 dar() const                      { return (uint32)(((siginfo_t *)(((unsigned long)this) - offsetof(ucontext_t, uc_mcontext))) - 1)->si_addr; } /* HACK */
222 >        long & pc()                                     { return __gregs[_REG_PC]; }
223 >        uint32 pc() const                       { return __gregs[_REG_PC]; }
224 >        long & gpr(int i)                       { return __gregs[_REG_R0 + i]; }
225 >        uint32 gpr(int i) const         { return __gregs[_REG_R0 + i]; }
226   };
227   #endif
228  
229 + #if defined(__APPLE__) && defined(__MACH__)
230 + #include <sys/signal.h>
231 + extern "C" int sigaltstack(const struct sigaltstack *ss, struct sigaltstack *oss);
232 +
233 + #include <sys/ucontext.h>
234 + #define MACHINE_REGISTERS(scp)  ((machine_regs *)(((ucontext_t *)scp)->uc_mcontext))
235 +
236 + struct machine_regs : public mcontext
237 + {
238 +        uint32 & cr()                           { return ss.cr; }
239 +        uint32 cr() const                       { return ss.cr; }
240 +        uint32 lr() const                       { return ss.lr; }
241 +        uint32 ctr() const                      { return ss.ctr; }
242 +        uint32 xer() const                      { return ss.xer; }
243 +        uint32 msr() const                      { return ss.srr1; }
244 +        uint32 dar() const                      { return es.dar; }
245 +        uint32 & pc()                           { return ss.srr0; }
246 +        uint32 pc() const                       { return ss.srr0; }
247 +        uint32 & gpr(int i)                     { return (&ss.r0)[i]; }
248 +        uint32 gpr(int i) const         { return (&ss.r0)[i]; }
249 + };
250 + #endif
251 +
252 + static void build_sigregs(sigregs *srp, machine_regs *mrp)
253 + {
254 +        srp->nip = mrp->pc();
255 +        srp->link = mrp->lr();
256 +        srp->ctr = mrp->ctr();
257 +        srp->msr = mrp->msr();
258 +        srp->xer = mrp->xer();
259 +        srp->ccr = mrp->cr();
260 +        for (int i = 0; i < 32; i++)
261 +                srp->gpr[i] = mrp->gpr(i);
262 + }
263 +
264 + static struct sigaltstack sig_stacks[SIG_STACK_COUNT];  // Stacks for signal handlers
265 + static int sig_stack_id = 0;                                                    // Stack slot currently used
266 +
267 + static inline void sig_stack_acquire(void)
268 + {
269 +        if (++sig_stack_id == SIG_STACK_COUNT) {
270 +                printf("FATAL: signal stack overflow\n");
271 +                return;
272 +        }
273 +        sigaltstack(&sig_stacks[sig_stack_id], NULL);
274 + }
275 +
276 + static inline void sig_stack_release(void)
277 + {
278 +        if (--sig_stack_id < 0) {
279 +                printf("FATAL: signal stack underflow\n");
280 +                return;
281 +        }
282 +        sigaltstack(&sig_stacks[sig_stack_id], NULL);
283 + }
284 + #endif
285 +
286  
287   // Global variables (exported)
288   #if !EMULATED_PPC
289 < void *TOC;                              // Small data pointer (r13)
289 > void *TOC;                              // Pointer to Thread Local Storage (r2)
290 > void *R13;                              // Pointer to .sdata section (r13 under Linux)
291   #endif
292   uint32 RAMBase;                 // Base address of Mac RAM
293   uint32 RAMSize;                 // Size of Mac RAM
294   uint32 KernelDataAddr;  // Address of Kernel Data
295   uint32 BootGlobsAddr;   // Address of BootGlobs structure at top of Mac RAM
296 + uint32 DRCacheAddr;             // Address of DR Cache
297   uint32 PVR;                             // Theoretical PVR
298   int64 CPUClockSpeed;    // Processor clock speed (Hz)
299   int64 BusClockSpeed;    // Bus clock speed (Hz)
300 + int64 TimebaseSpeed;    // Timebase clock speed (Hz)
301 + uint8 *RAMBaseHost;             // Base address of Mac RAM (host address space)
302 + uint8 *ROMBaseHost;             // Base address of Mac ROM (host address space)
303  
304  
305   // Global variables
306 + #ifndef USE_SDL_VIDEO
307   char *x_display_name = NULL;                            // X11 display name
308   Display *x_display = NULL;                                      // X11 display handle
309 + #ifdef X11_LOCK_TYPE
310 + X11_LOCK_TYPE x_display_lock = X11_LOCK_INIT; // X11 display lock
311 + #endif
312 + #endif
313  
314   static int zero_fd = 0;                                         // FD of /dev/zero
315   static bool lm_area_mapped = false;                     // Flag: Low Memory area mmap()ped
316   static int kernel_area = -1;                            // SHM ID of Kernel Data area
317   static bool rom_area_mapped = false;            // Flag: Mac ROM mmap()ped
318   static bool ram_area_mapped = false;            // Flag: Mac RAM mmap()ped
319 + static bool dr_cache_area_mapped = false;       // Flag: Mac DR Cache mmap()ped
320 + static bool dr_emulator_area_mapped = false;// Flag: Mac DR Emulator mmap()ped
321   static KernelData *kernel_data;                         // Pointer to Kernel Data
322   static EmulatorData *emulator_data;
323  
324   static uint8 last_xpram[XPRAM_SIZE];            // Buffer for monitoring XPRAM changes
325  
326   static bool nvram_thread_active = false;        // Flag: NVRAM watchdog installed
327 + static volatile bool nvram_thread_cancel;       // Flag: Cancel NVRAM thread
328   static pthread_t nvram_thread;                          // NVRAM watchdog
329   static bool tick_thread_active = false;         // Flag: MacOS thread installed
330 + static volatile bool tick_thread_cancel;        // Flag: Cancel 60Hz thread
331   static pthread_t tick_thread;                           // 60Hz thread
332   static pthread_t emul_thread;                           // MacOS thread
333  
# Line 204 | Line 335 | static bool ready_for_signals = false;
335   static int64 num_segv = 0;                                      // Number of handled SEGV signals
336  
337   static struct sigaction sigusr2_action;         // Interrupt signal (of emulator thread)
338 < #if !EMULATED_PPC
338 > #if EMULATED_PPC
339 > static uintptr sig_stack = 0;                           // Stack for PowerPC interrupt routine
340 > #else
341   static struct sigaction sigsegv_action;         // Data access exception signal (of emulator thread)
342   static struct sigaction sigill_action;          // Illegal instruction signal (of emulator thread)
210 static void *sig_stack = NULL;                          // Stack for signal handlers
211 static void *extra_stack = NULL;                        // Stack for SIGSEGV inside interrupt handler
343   static bool emul_thread_fatal = false;          // Flag: MacOS thread crashed, tick thread shall dump debug output
344   static sigregs sigsegv_regs;                            // Register dump when crashed
345 + static const char *crash_reason = NULL;         // Reason of the crash (SIGSEGV, SIGBUS, SIGILL)
346   #endif
347  
348 + uint32  SheepMem::page_size;                            // Size of a native page
349   uintptr SheepMem::zero_page = 0;                        // Address of ro page filled in with zeros
350   uintptr SheepMem::base = 0x60000000;            // Address of SheepShaver data
351 < uintptr SheepMem::top = 0;                                      // Top of SheepShaver data (stack like storage)
351 > uintptr SheepMem::proc;                                         // Bottom address of SheepShave procedures
352 > uintptr SheepMem::data;                                         // Top of SheepShaver data (stack like storage)
353  
354  
355   // Prototypes
356 + static bool kernel_data_init(void);
357 + static void kernel_data_exit(void);
358   static void Quit(void);
359   static void *emul_func(void *arg);
360   static void *nvram_func(void *arg);
361   static void *tick_func(void *arg);
362   #if EMULATED_PPC
227 static void sigusr2_handler(int sig);
363   extern void emul_ppc(uint32 start);
364   extern void init_emul_ppc(void);
365   extern void exit_emul_ppc(void);
366 + sigsegv_return_t sigsegv_handler(sigsegv_address_t, sigsegv_address_t);
367   #else
368 < static void sigusr2_handler(int sig, sigcontext_struct *sc);
369 < static void sigsegv_handler(int sig, sigcontext_struct *sc);
370 < static void sigill_handler(int sig, sigcontext_struct *sc);
368 > static void sigusr2_handler(int sig, siginfo_t *sip, void *scp);
369 > static void sigsegv_handler(int sig, siginfo_t *sip, void *scp);
370 > static void sigill_handler(int sig, siginfo_t *sip, void *scp);
371   #endif
372  
373  
374   // From asm_linux.S
375   #if !EMULATED_PPC
240 extern "C" void *get_toc(void);
376   extern "C" void *get_sp(void);
377 < extern "C" void flush_icache_range(void *start, void *end);
377 > extern "C" void *get_r2(void);
378 > extern "C" void set_r2(void *);
379 > extern "C" void *get_r13(void);
380 > extern "C" void set_r13(void *);
381 > extern "C" void flush_icache_range(uint32 start, uint32 end);
382   extern "C" void jump_to_rom(uint32 entry, uint32 context);
383   extern "C" void quit_emulator(void);
384   extern "C" void execute_68k(uint32 pc, M68kRegisters *r);
# Line 253 | Line 392 | extern void paranoia_check(void);
392  
393   #if EMULATED_PPC
394   /*
395 + *  Return signal stack base
396 + */
397 +
398 + uintptr SignalStackBase(void)
399 + {
400 +        return sig_stack + SIG_STACK_SIZE;
401 + }
402 +
403 +
404 + /*
405   *  Atomic operations
406   */
407  
# Line 293 | Line 442 | int atomic_or(int *var, int v)
442  
443  
444   /*
445 + *  Memory management helpers
446 + */
447 +
448 + static inline int vm_mac_acquire(uint32 addr, uint32 size)
449 + {
450 +        return vm_acquire_fixed(Mac2HostAddr(addr), size);
451 + }
452 +
453 + static inline int vm_mac_release(uint32 addr, uint32 size)
454 + {
455 +        return vm_release(Mac2HostAddr(addr), size);
456 + }
457 +
458 +
459 + /*
460   *  Main program
461   */
462  
# Line 308 | Line 472 | static void usage(const char *prg_name)
472   int main(int argc, char **argv)
473   {
474          char str[256];
311        uint32 *boot_globs;
312        int16 i16;
475          int rom_fd;
476          FILE *proc_file;
477          const char *rom_path;
# Line 326 | Line 488 | int main(int argc, char **argv)
488          printf(" %s\n", GetString(STR_ABOUT_TEXT2));
489  
490   #if !EMULATED_PPC
491 + #ifdef SYSTEM_CLOBBERS_R2
492          // Get TOC pointer
493 <        TOC = get_toc();
493 >        TOC = get_r2();
494 > #endif
495 > #ifdef SYSTEM_CLOBBERS_R13
496 >        // Get r13 register
497 >        R13 = get_r13();
498 > #endif
499   #endif
500  
501   #ifdef ENABLE_GTK
# Line 343 | Line 511 | int main(int argc, char **argv)
511          for (int i=1; i<argc; i++) {
512                  if (strcmp(argv[i], "--help") == 0) {
513                          usage(argv[0]);
514 + #ifndef USE_SDL_VIDEO
515                  } else if (strcmp(argv[i], "--display") == 0) {
516                          i++;
517                          if (i < argc)
518                                  x_display_name = strdup(argv[i]);
519 + #endif
520                  } else if (argv[i][0] == '-') {
521                          fprintf(stderr, "Unrecognized option '%s'\n", argv[i]);
522                          usage(argv[0]);
523                  }
524          }
525  
526 + #ifdef USE_SDL
527 +        // Initialize SDL system
528 +        int sdl_flags = 0;
529 + #ifdef USE_SDL_VIDEO
530 +        sdl_flags |= SDL_INIT_VIDEO;
531 + #endif
532 + #ifdef USE_SDL_AUDIO
533 +        sdl_flags |= SDL_INIT_AUDIO;
534 + #endif
535 +        assert(sdl_flags != 0);
536 +        if (SDL_Init(sdl_flags) == -1) {
537 +                char str[256];
538 +                sprintf(str, "Could not initialize SDL: %s.\n", SDL_GetError());
539 +                ErrorAlert(str);
540 +                goto quit;
541 +        }
542 +        atexit(SDL_Quit);
543 + #endif
544 +
545 + #ifndef USE_SDL_VIDEO
546          // Open display
547          x_display = XOpenDisplay(x_display_name);
548          if (x_display == NULL) {
# Line 366 | Line 556 | int main(int argc, char **argv)
556          // Fork out, so we can return from fullscreen mode when things get ugly
557          XF86DGAForkApp(DefaultScreen(x_display));
558   #endif
559 + #endif
560  
561   #ifdef ENABLE_MON
562          // Initialize mon
563          mon_init();
564   #endif
565  
566 + #if !EMULATED_PPC
567 +        // Create and install stacks for signal handlers
568 +        for (int i = 0; i < SIG_STACK_COUNT; i++) {
569 +                void *sig_stack = malloc(SIG_STACK_SIZE);
570 +                D(bug("Signal stack %d at %p\n", i, sig_stack));
571 +                if (sig_stack == NULL) {
572 +                        ErrorAlert(GetString(STR_NOT_ENOUGH_MEMORY_ERR));
573 +                        goto quit;
574 +                }
575 +                sig_stacks[i].ss_sp = sig_stack;
576 +                sig_stacks[i].ss_flags = 0;
577 +                sig_stacks[i].ss_size = SIG_STACK_SIZE;
578 +        }
579 +        sig_stack_id = 0;
580 +        if (sigaltstack(&sig_stacks[0], NULL) < 0) {
581 +                sprintf(str, GetString(STR_SIGALTSTACK_ERR), strerror(errno));
582 +                ErrorAlert(str);
583 +                goto quit;
584 +        }
585 + #endif
586 +
587 + #if !EMULATED_PPC
588 +        // Install SIGSEGV and SIGBUS handlers
589 +        sigemptyset(&sigsegv_action.sa_mask);   // Block interrupts during SEGV handling
590 +        sigaddset(&sigsegv_action.sa_mask, SIGUSR2);
591 +        sigsegv_action.sa_sigaction = sigsegv_handler;
592 +        sigsegv_action.sa_flags = SA_ONSTACK | SA_SIGINFO;
593 + #ifdef HAVE_SIGNAL_SA_RESTORER
594 +        sigsegv_action.sa_restorer = NULL;
595 + #endif
596 +        if (sigaction(SIGSEGV, &sigsegv_action, NULL) < 0) {
597 +                sprintf(str, GetString(STR_SIGSEGV_INSTALL_ERR), strerror(errno));
598 +                ErrorAlert(str);
599 +                goto quit;
600 +        }
601 +        if (sigaction(SIGBUS, &sigsegv_action, NULL) < 0) {
602 +                sprintf(str, GetString(STR_SIGSEGV_INSTALL_ERR), strerror(errno));
603 +                ErrorAlert(str);
604 +                goto quit;
605 +        }
606 + #else
607 +        // Install SIGSEGV handler for CPU emulator
608 +        if (!sigsegv_install_handler(sigsegv_handler)) {
609 +                sprintf(str, GetString(STR_SIGSEGV_INSTALL_ERR), strerror(errno));
610 +                ErrorAlert(str);
611 +                goto quit;
612 +        }
613 + #endif
614 +
615 +        // Initialize VM system
616 +        vm_init();
617 +
618          // Get system info
619          PVR = 0x00040000;                       // Default: 604
620          CPUClockSpeed = 100000000;      // Default: 100MHz
621          BusClockSpeed = 100000000;      // Default: 100MHz
622 < #if !EMULATED_PPC
622 >        TimebaseSpeed =  25000000;      // Default:  25MHz
623 > #if EMULATED_PPC
624 >        PVR = 0x000c0000;                       // Default: 7400 (with AltiVec)
625 > #elif defined(__APPLE__) && defined(__MACH__)
626 >        proc_file = popen("ioreg -c IOPlatformDevice", "r");
627 >        if (proc_file) {
628 >                char line[256];
629 >                bool powerpc_node = false;
630 >                while (fgets(line, sizeof(line) - 1, proc_file)) {
631 >                        // Read line
632 >                        int len = strlen(line);
633 >                        if (len == 0)
634 >                                continue;
635 >                        line[len - 1] = 0;
636 >
637 >                        // Parse line
638 >                        if (strstr(line, "o PowerPC,"))
639 >                                powerpc_node = true;
640 >                        else if (powerpc_node) {
641 >                                uint32 value;
642 >                                char head[256];
643 >                                if (sscanf(line, "%[ |]\"cpu-version\" = <%x>", head, &value) == 2)
644 >                                        PVR = value;
645 >                                else if (sscanf(line, "%[ |]\"clock-frequency\" = <%x>", head, &value) == 2)
646 >                                        CPUClockSpeed = value;
647 >                                else if (sscanf(line, "%[ |]\"bus-frequency\" = <%x>", head, &value) == 2)
648 >                                        BusClockSpeed = value;
649 >                                else if (sscanf(line, "%[ |]\"timebase-frequency\" = <%x>", head, &value) == 2)
650 >                                        TimebaseSpeed = value;
651 >                                else if (strchr(line, '}'))
652 >                                        powerpc_node = false;
653 >                        }
654 >                }
655 >                fclose(proc_file);
656 >        } else {
657 >                sprintf(str, GetString(STR_PROC_CPUINFO_WARN), strerror(errno));
658 >                WarningAlert(str);
659 >        }
660 > #else
661          proc_file = fopen("/proc/cpuinfo", "r");
662          if (proc_file) {
663 +                // CPU specs from Linux kernel
664 +                // TODO: make it more generic with features (e.g. AltiVec) and
665 +                // cache information and friends for NameRegistry
666 +                static const struct {
667 +                        uint32 pvr_mask;
668 +                        uint32 pvr_value;
669 +                        const char *cpu_name;
670 +                }
671 +                cpu_specs[] = {
672 +                        { 0xffff0000, 0x00010000, "601" },
673 +                        { 0xffff0000, 0x00030000, "603" },
674 +                        { 0xffff0000, 0x00060000, "603e" },
675 +                        { 0xffff0000, 0x00070000, "603ev" },
676 +                        { 0xffff0000, 0x00040000, "604" },
677 +                        { 0xfffff000, 0x00090000, "604e" },
678 +                        { 0xffff0000, 0x00090000, "604r" },
679 +                        { 0xffff0000, 0x000a0000, "604ev" },
680 +                        { 0xffffffff, 0x00084202, "740/750" },
681 +                        { 0xfffff000, 0x00083000, "745/755" },
682 +                        { 0xfffffff0, 0x00080100, "750CX" },
683 +                        { 0xfffffff0, 0x00082200, "750CX" },
684 +                        { 0xfffffff0, 0x00082210, "750CXe" },
685 +                        { 0xffffff00, 0x70000100, "750FX" },
686 +                        { 0xffffffff, 0x70000200, "750FX" },
687 +                        { 0xffff0000, 0x70000000, "750FX" },
688 +                        { 0xffff0000, 0x70020000, "750GX" },
689 +                        { 0xffff0000, 0x00080000, "740/750" },
690 +                        { 0xffffffff, 0x000c1101, "7400 (1.1)" },
691 +                        { 0xffff0000, 0x000c0000, "7400" },
692 +                        { 0xffff0000, 0x800c0000, "7410" },
693 +                        { 0xffffffff, 0x80000200, "7450" },
694 +                        { 0xffffffff, 0x80000201, "7450" },
695 +                        { 0xffff0000, 0x80000000, "7450" },
696 +                        { 0xffffff00, 0x80010100, "7455" },
697 +                        { 0xffffffff, 0x80010200, "7455" },
698 +                        { 0xffff0000, 0x80010000, "7455" },
699 +                        { 0xffff0000, 0x80020000, "7457" },
700 +                        { 0xffff0000, 0x80030000, "7447A" },
701 +                        { 0x7fff0000, 0x00810000, "82xx" },
702 +                        { 0x7fff0000, 0x00820000, "8280" },
703 +                        { 0xffff0000, 0x00400000, "Power3 (630)" },
704 +                        { 0xffff0000, 0x00410000, "Power3 (630+)" },
705 +                        { 0xffff0000, 0x00360000, "I-star" },
706 +                        { 0xffff0000, 0x00370000, "S-star" },
707 +                        { 0xffff0000, 0x00350000, "Power4" },
708 +                        { 0xffff0000, 0x00390000, "PPC970" },
709 +                        { 0, 0, 0 }
710 +                };
711 +
712                  char line[256];
713                  while(fgets(line, 255, proc_file)) {
714                          // Read line
# Line 390 | Line 720 | int main(int argc, char **argv)
720                          // Parse line
721                          int i;
722                          char value[256];
723 <                        if (sscanf(line, "cpu : %s", value) == 1) {
724 <                                if (strcmp(value, "601") == 0)
725 <                                        PVR = 0x00010000;
726 <                                else if (strcmp(value, "603") == 0)
727 <                                        PVR = 0x00030000;
728 <                                else if (strcmp(value, "604") == 0)
729 <                                        PVR = 0x00040000;
730 <                                else if (strcmp(value, "603e") == 0)
731 <                                        PVR = 0x00060000;
732 <                                else if (strcmp(value, "603ev") == 0)
733 <                                        PVR = 0x00070000;
404 <                                else if (strcmp(value, "604e") == 0)
405 <                                        PVR = 0x00090000;
406 <                                else if (strcmp(value, "604ev5") == 0)
407 <                                        PVR = 0x000a0000;
408 <                                else if (strcmp(value, "750") == 0)
409 <                                        PVR = 0x00080000;
410 <                                else if (strcmp(value, "821") == 0)
411 <                                        PVR = 0x00320000;
412 <                                else if (strcmp(value, "860") == 0)
413 <                                        PVR = 0x00500000;
414 <                                else
723 >                        if (sscanf(line, "cpu : %[0-9A-Za-a]", value) == 1) {
724 >                                // Search by name
725 >                                const char *cpu_name = NULL;
726 >                                for (int i = 0; cpu_specs[i].pvr_mask != 0; i++) {
727 >                                        if (strcmp(cpu_specs[i].cpu_name, value) == 0) {
728 >                                                cpu_name = cpu_specs[i].cpu_name;
729 >                                                PVR = cpu_specs[i].pvr_value;
730 >                                                break;
731 >                                        }
732 >                                }
733 >                                if (cpu_name == NULL)
734                                          printf("WARNING: Unknown CPU type '%s', assuming 604\n", value);
735 +                                else
736 +                                        printf("Found a PowerPC %s processor\n", cpu_name);
737                          }
738                          if (sscanf(line, "clock : %dMHz", &i) == 1)
739                                  CPUClockSpeed = BusClockSpeed = i * 1000000;
# Line 422 | Line 743 | int main(int argc, char **argv)
743                  sprintf(str, GetString(STR_PROC_CPUINFO_WARN), strerror(errno));
744                  WarningAlert(str);
745          }
746 +
747 +        // Get actual bus frequency
748 +        proc_file = fopen("/proc/device-tree/clock-frequency", "r");
749 +        if (proc_file) {
750 +                union { uint8 b[4]; uint32 l; } value;
751 +                if (fread(value.b, sizeof(value), 1, proc_file) == 1)
752 +                        BusClockSpeed = value.l;
753 +                fclose(proc_file);
754 +        }
755 +
756 +        // Get actual timebase frequency
757 +        TimebaseSpeed = BusClockSpeed / 4;
758 +        DIR *cpus_dir;
759 +        if ((cpus_dir = opendir("/proc/device-tree/cpus")) != NULL) {
760 +                struct dirent *cpu_entry;
761 +                while ((cpu_entry = readdir(cpus_dir)) != NULL) {
762 +                        if (strstr(cpu_entry->d_name, "PowerPC,") == cpu_entry->d_name) {
763 +                                char timebase_freq_node[256];
764 +                                sprintf(timebase_freq_node, "/proc/device-tree/cpus/%s/timebase-frequency", cpu_entry->d_name);
765 +                                proc_file = fopen(timebase_freq_node, "r");
766 +                                if (proc_file) {
767 +                                        union { uint8 b[4]; uint32 l; } value;
768 +                                        if (fread(value.b, sizeof(value), 1, proc_file) == 1)
769 +                                                TimebaseSpeed = value.l;
770 +                                        fclose(proc_file);
771 +                                }
772 +                        }
773 +                }
774 +                closedir(cpus_dir);
775 +        }
776   #endif
777 +        // Remap any newer G4/G5 processor to plain G4 for compatibility
778 +        switch (PVR >> 16) {
779 +        case 0x8000:                            // 7450
780 +        case 0x8001:                            // 7455
781 +        case 0x8002:                            // 7457
782 +        case 0x0039:                            //  970
783 +                PVR = 0x000c0000;               // 7400
784 +                break;
785 +        }
786          D(bug("PVR: %08x (assumed)\n", PVR));
787  
788          // Init system routines
# Line 446 | Line 806 | int main(int argc, char **argv)
806                  goto quit;
807          }
808  
809 + #ifndef PAGEZERO_HACK
810          // Create Low Memory area (0x0000..0x3000)
811 <        if (vm_acquire_fixed((char *)0, 0x3000) < 0) {
811 >        if (vm_mac_acquire(0, 0x3000) < 0) {
812                  sprintf(str, GetString(STR_LOW_MEM_MMAP_ERR), strerror(errno));
813                  ErrorAlert(str);
814                  goto quit;
815          }
816          lm_area_mapped = true;
817 + #endif
818  
819          // Create areas for Kernel Data
820 <        kernel_area = shmget(IPC_PRIVATE, KERNEL_AREA_SIZE, 0600);
821 <        if (kernel_area == -1) {
822 <                sprintf(str, GetString(STR_KD_SHMGET_ERR), strerror(errno));
820 >        if (!kernel_data_init())
821 >                goto quit;
822 >        kernel_data = (KernelData *)Mac2HostAddr(KERNEL_DATA_BASE);
823 >        emulator_data = &kernel_data->ed;
824 >        KernelDataAddr = KERNEL_DATA_BASE;
825 >        D(bug("Kernel Data at %p (%08x)\n", kernel_data, KERNEL_DATA_BASE));
826 >        D(bug("Emulator Data at %p (%08x)\n", emulator_data, KERNEL_DATA_BASE + offsetof(KernelData, ed)));
827 >
828 >        // Create area for DR Cache
829 >        if (vm_mac_acquire(DR_EMULATOR_BASE, DR_EMULATOR_SIZE) < 0) {
830 >                sprintf(str, GetString(STR_DR_EMULATOR_MMAP_ERR), strerror(errno));
831                  ErrorAlert(str);
832                  goto quit;
833          }
834 <        if (shmat(kernel_area, (void *)KERNEL_DATA_BASE, 0) < 0) {
835 <                sprintf(str, GetString(STR_KD_SHMAT_ERR), strerror(errno));
834 >        dr_emulator_area_mapped = true;
835 >        if (vm_mac_acquire(DR_CACHE_BASE, DR_CACHE_SIZE) < 0) {
836 >                sprintf(str, GetString(STR_DR_CACHE_MMAP_ERR), strerror(errno));
837                  ErrorAlert(str);
838                  goto quit;
839          }
840 <        if (shmat(kernel_area, (void *)KERNEL_DATA2_BASE, 0) < 0) {
841 <                sprintf(str, GetString(STR_KD2_SHMAT_ERR), strerror(errno));
840 >        dr_cache_area_mapped = true;
841 > #if !EMULATED_PPC
842 >        if (vm_protect((char *)DR_CACHE_BASE, DR_CACHE_SIZE, VM_PAGE_READ | VM_PAGE_WRITE | VM_PAGE_EXECUTE) < 0) {
843 >                sprintf(str, GetString(STR_DR_CACHE_MMAP_ERR), strerror(errno));
844                  ErrorAlert(str);
845                  goto quit;
846          }
847 <        kernel_data = (KernelData *)KERNEL_DATA_BASE;
848 <        emulator_data = &kernel_data->ed;
849 <        KernelDataAddr = KERNEL_DATA_BASE;
477 <        D(bug("Kernel Data at %p, Emulator Data at %p\n", kernel_data, emulator_data));
847 > #endif
848 >        DRCacheAddr = DR_CACHE_BASE;
849 >        D(bug("DR Cache at %p\n", DRCacheAddr));
850  
851          // Create area for SheepShaver data
852          if (!SheepMem::Init()) {
# Line 484 | Line 856 | int main(int argc, char **argv)
856          }
857  
858          // Create area for Mac ROM
859 <        if (vm_acquire_fixed((char *)ROM_BASE, ROM_AREA_SIZE) < 0) {
859 >        if (vm_mac_acquire(ROM_BASE, ROM_AREA_SIZE) < 0) {
860                  sprintf(str, GetString(STR_ROM_MMAP_ERR), strerror(errno));
861                  ErrorAlert(str);
862                  goto quit;
863          }
864 < #if !EMULATED_PPC || defined(__powerpc__)
865 <        if (vm_protect((char *)ROM_BASE, ROM_AREA_SIZE, VM_PAGE_READ | VM_PAGE_WRITE | VM_PAGE_EXECUTE) < 0) {
864 >        ROMBaseHost = Mac2HostAddr(ROM_BASE);
865 > #if !EMULATED_PPC
866 >        if (vm_protect(ROMBaseHost, ROM_AREA_SIZE, VM_PAGE_READ | VM_PAGE_WRITE | VM_PAGE_EXECUTE) < 0) {
867                  sprintf(str, GetString(STR_ROM_MMAP_ERR), strerror(errno));
868                  ErrorAlert(str);
869                  goto quit;
870          }
871   #endif
872          rom_area_mapped = true;
873 <        D(bug("ROM area at %08x\n", ROM_BASE));
873 >        D(bug("ROM area at %p (%08x)\n", ROMBaseHost, ROM_BASE));
874  
875          // Create area for Mac RAM
876          RAMSize = PrefsFindInt32("ramsize");
# Line 506 | Line 879 | int main(int argc, char **argv)
879                  RAMSize = 8*1024*1024;
880          }
881  
882 <        if (vm_acquire_fixed((char *)RAM_BASE, RAMSize) < 0) {
882 >        if (vm_mac_acquire(RAM_BASE, RAMSize) < 0) {
883                  sprintf(str, GetString(STR_RAM_MMAP_ERR), strerror(errno));
884                  ErrorAlert(str);
885                  goto quit;
886          }
887 +        RAMBaseHost = Mac2HostAddr(RAM_BASE);
888   #if !EMULATED_PPC
889 <        if (vm_protect((char *)RAM_BASE, RAMSize, VM_PAGE_READ | VM_PAGE_WRITE | VM_PAGE_EXECUTE) < 0) {
889 >        if (vm_protect(RAMBaseHost, RAMSize, VM_PAGE_READ | VM_PAGE_WRITE | VM_PAGE_EXECUTE) < 0) {
890                  sprintf(str, GetString(STR_RAM_MMAP_ERR), strerror(errno));
891                  ErrorAlert(str);
892                  goto quit;
# Line 520 | Line 894 | int main(int argc, char **argv)
894   #endif
895          RAMBase = RAM_BASE;
896          ram_area_mapped = true;
897 <        D(bug("RAM area at %08x\n", RAMBase));
897 >        D(bug("RAM area at %p (%08x)\n", RAMBaseHost, RAMBase));
898  
899          if (RAMBase > ROM_BASE) {
900                  ErrorAlert(GetString(STR_RAM_HIGHER_THAN_ROM_ERR));
# Line 556 | Line 930 | int main(int argc, char **argv)
930          }
931          delete[] rom_tmp;
932  
933 <        // Load NVRAM
934 <        XPRAMInit();
561 <
562 <        // Set boot volume
563 <        i16 = PrefsFindInt32("bootdrive");
564 <        XPRAM[0x1378] = i16 >> 8;
565 <        XPRAM[0x1379] = i16 & 0xff;
566 <        i16 = PrefsFindInt32("bootdriver");
567 <        XPRAM[0x137a] = i16 >> 8;
568 <        XPRAM[0x137b] = i16 & 0xff;
569 <
570 <        // Create BootGlobs at top of Mac memory
571 <        memset((void *)(RAMBase + RAMSize - 4096), 0, 4096);
572 <        BootGlobsAddr = RAMBase + RAMSize - 0x1c;
573 <        boot_globs = (uint32 *)BootGlobsAddr;
574 <        boot_globs[-5] = htonl(RAMBase + RAMSize);      // MemTop
575 <        boot_globs[0] = htonl(RAMBase);                         // First RAM bank
576 <        boot_globs[1] = htonl(RAMSize);
577 <        boot_globs[2] = htonl((uint32)-1);                      // End of bank table
578 <
579 <        // Init thunks
580 <        if (!ThunksInit())
581 <                goto quit;
582 <
583 <        // Init drivers
584 <        SonyInit();
585 <        DiskInit();
586 <        CDROMInit();
587 <        SCSIInit();
588 <
589 <        // Init external file system
590 <        ExtFSInit();
591 <
592 <        // Init audio
593 <        AudioInit();
594 <
595 <        // Init network
596 <        EtherInit();
597 <
598 <        // Init serial ports
599 <        SerialInit();
600 <
601 <        // Init Time Manager
602 <        TimerInit();
603 <
604 <        // Init clipboard
605 <        ClipInit();
606 <
607 <        // Init video
608 <        if (!VideoInit())
609 <                goto quit;
610 <
611 <        // Install ROM patches
612 <        if (!PatchROM()) {
613 <                ErrorAlert(GetString(STR_UNSUPPORTED_ROM_TYPE_ERR));
933 >        // Initialize everything
934 >        if (!InitAll())
935                  goto quit;
936 <        }
936 >        D(bug("Initialization complete\n"));
937  
938          // Clear caches (as we loaded and patched code) and write protect ROM
939   #if !EMULATED_PPC
940 <        MakeExecutable(0, (void *)ROM_BASE, ROM_AREA_SIZE);
620 < #endif
621 <        vm_protect((char *)ROM_BASE, ROM_AREA_SIZE, VM_PAGE_READ | VM_PAGE_EXECUTE);
622 <
623 <        // Initialize Kernel Data
624 <        memset(kernel_data, 0, sizeof(KernelData));
625 <        if (ROMType == ROMTYPE_NEWWORLD) {
626 <                uintptr of_dev_tree = SheepMem::Reserve(4 * sizeof(uint32));
627 <                memset((void *)of_dev_tree, 0, 4 * sizeof(uint32));
628 <                uintptr vector_lookup_tbl = SheepMem::Reserve(128);
629 <                uintptr vector_mask_tbl = SheepMem::Reserve(64);
630 <                memset((uint8 *)kernel_data + 0xb80, 0x3d, 0x80);
631 <                memset((void *)vector_lookup_tbl, 0, 128);
632 <                memset((void *)vector_mask_tbl, 0, 64);
633 <                kernel_data->v[0xb80 >> 2] = htonl(ROM_BASE);
634 <                kernel_data->v[0xb84 >> 2] = htonl(of_dev_tree);                        // OF device tree base
635 <                kernel_data->v[0xb90 >> 2] = htonl(vector_lookup_tbl);
636 <                kernel_data->v[0xb94 >> 2] = htonl(vector_mask_tbl);
637 <                kernel_data->v[0xb98 >> 2] = htonl(ROM_BASE);                           // OpenPIC base
638 <                kernel_data->v[0xbb0 >> 2] = htonl(0);                                          // ADB base
639 <                kernel_data->v[0xc20 >> 2] = htonl(RAMSize);
640 <                kernel_data->v[0xc24 >> 2] = htonl(RAMSize);
641 <                kernel_data->v[0xc30 >> 2] = htonl(RAMSize);
642 <                kernel_data->v[0xc34 >> 2] = htonl(RAMSize);
643 <                kernel_data->v[0xc38 >> 2] = htonl(0x00010020);
644 <                kernel_data->v[0xc3c >> 2] = htonl(0x00200001);
645 <                kernel_data->v[0xc40 >> 2] = htonl(0x00010000);
646 <                kernel_data->v[0xc50 >> 2] = htonl(RAMBase);
647 <                kernel_data->v[0xc54 >> 2] = htonl(RAMSize);
648 <                kernel_data->v[0xf60 >> 2] = htonl(PVR);
649 <                kernel_data->v[0xf64 >> 2] = htonl(CPUClockSpeed);
650 <                kernel_data->v[0xf68 >> 2] = htonl(BusClockSpeed);
651 <                kernel_data->v[0xf6c >> 2] = htonl(CPUClockSpeed);
652 <        } else {
653 <                kernel_data->v[0xc80 >> 2] = htonl(RAMSize);
654 <                kernel_data->v[0xc84 >> 2] = htonl(RAMSize);
655 <                kernel_data->v[0xc90 >> 2] = htonl(RAMSize);
656 <                kernel_data->v[0xc94 >> 2] = htonl(RAMSize);
657 <                kernel_data->v[0xc98 >> 2] = htonl(0x00010020);
658 <                kernel_data->v[0xc9c >> 2] = htonl(0x00200001);
659 <                kernel_data->v[0xca0 >> 2] = htonl(0x00010000);
660 <                kernel_data->v[0xcb0 >> 2] = htonl(RAMBase);
661 <                kernel_data->v[0xcb4 >> 2] = htonl(RAMSize);
662 <                kernel_data->v[0xf80 >> 2] = htonl(PVR);
663 <                kernel_data->v[0xf84 >> 2] = htonl(CPUClockSpeed);
664 <                kernel_data->v[0xf88 >> 2] = htonl(BusClockSpeed);
665 <                kernel_data->v[0xf8c >> 2] = htonl(CPUClockSpeed);
666 <        }
667 <
668 <        // Initialize extra low memory
669 <        D(bug("Initializing Low Memory...\n"));
670 <        memset(NULL, 0, 0x3000);
671 <        WriteMacInt32(XLM_SIGNATURE, FOURCC('B','a','a','h'));                  // Signature to detect SheepShaver
672 <        WriteMacInt32(XLM_KERNEL_DATA, KernelDataAddr);                                 // For trap replacement routines
673 <        WriteMacInt32(XLM_PVR, PVR);                                                                    // Theoretical PVR
674 <        WriteMacInt32(XLM_BUS_CLOCK, BusClockSpeed);                                    // For DriverServicesLib patch
675 <        WriteMacInt16(XLM_EXEC_RETURN_OPCODE, M68K_EXEC_RETURN);                // For Execute68k() (RTS from the executed 68k code will jump here and end 68k mode)
676 <        WriteMacInt32(XLM_ZERO_PAGE, SheepMem::ZeroPage());                             // Pointer to read-only page with all bits set to 0
677 < #if !EMULATED_PPC
678 <        WriteMacInt32(XLM_TOC, (uint32)TOC);                                                            // TOC pointer of emulator
940 >        flush_icache_range(ROM_BASE, ROM_BASE + ROM_AREA_SIZE);
941   #endif
942 <        WriteMacInt32(XLM_ETHER_INIT, NativeFunction(NATIVE_ETHER_INIT));       // DLPI ethernet driver functions
681 <        WriteMacInt32(XLM_ETHER_TERM, NativeFunction(NATIVE_ETHER_TERM));
682 <        WriteMacInt32(XLM_ETHER_OPEN, NativeFunction(NATIVE_ETHER_OPEN));
683 <        WriteMacInt32(XLM_ETHER_CLOSE, NativeFunction(NATIVE_ETHER_CLOSE));
684 <        WriteMacInt32(XLM_ETHER_WPUT, NativeFunction(NATIVE_ETHER_WPUT));
685 <        WriteMacInt32(XLM_ETHER_RSRV, NativeFunction(NATIVE_ETHER_RSRV));
686 <        WriteMacInt32(XLM_VIDEO_DOIO, NativeFunction(NATIVE_VIDEO_DO_DRIVER_IO));
687 <        D(bug("Low Memory initialized\n"));
942 >        vm_protect(ROMBaseHost, ROM_AREA_SIZE, VM_PAGE_READ | VM_PAGE_EXECUTE);
943  
944          // Start 60Hz thread
945 +        tick_thread_cancel = false;
946          tick_thread_active = (pthread_create(&tick_thread, NULL, tick_func, NULL) == 0);
947          D(bug("Tick thread installed (%ld)\n", tick_thread));
948  
949          // Start NVRAM watchdog thread
950          memcpy(last_xpram, XPRAM, XPRAM_SIZE);
951 +        nvram_thread_cancel = false;
952          nvram_thread_active = (pthread_create(&nvram_thread, NULL, nvram_func, NULL) == 0);
953          D(bug("NVRAM thread installed (%ld)\n", nvram_thread));
954  
955   #if !EMULATED_PPC
699        // Create and install stacks for signal handlers
700        sig_stack = malloc(SIG_STACK_SIZE);
701        D(bug("Signal stack at %p\n", sig_stack));
702        if (sig_stack == NULL) {
703                ErrorAlert(GetString(STR_NOT_ENOUGH_MEMORY_ERR));
704                goto quit;
705        }
706        extra_stack = malloc(SIG_STACK_SIZE);
707        D(bug("Extra stack at %p\n", extra_stack));
708        if (extra_stack == NULL) {
709                ErrorAlert(GetString(STR_NOT_ENOUGH_MEMORY_ERR));
710                goto quit;
711        }
712        struct sigaltstack new_stack;
713        new_stack.ss_sp = sig_stack;
714        new_stack.ss_flags = 0;
715        new_stack.ss_size = SIG_STACK_SIZE;
716        if (sigaltstack(&new_stack, NULL) < 0) {
717                sprintf(str, GetString(STR_SIGALTSTACK_ERR), strerror(errno));
718                ErrorAlert(str);
719                goto quit;
720        }
721 #endif
722
723 #if !EMULATED_PPC
724        // Install SIGSEGV handler
725        sigemptyset(&sigsegv_action.sa_mask);   // Block interrupts during SEGV handling
726        sigaddset(&sigsegv_action.sa_mask, SIGUSR2);
727        sigsegv_action.sa_handler = (__sighandler_t)sigsegv_handler;
728        sigsegv_action.sa_flags = SA_ONSTACK;
729        sigsegv_action.sa_restorer = NULL;
730        if (sigaction(SIGSEGV, &sigsegv_action, NULL) < 0) {
731                sprintf(str, GetString(STR_SIGSEGV_INSTALL_ERR), strerror(errno));
732                ErrorAlert(str);
733                goto quit;
734        }
735
956          // Install SIGILL handler
957          sigemptyset(&sigill_action.sa_mask);    // Block interrupts during ILL handling
958          sigaddset(&sigill_action.sa_mask, SIGUSR2);
959 <        sigill_action.sa_handler = (__sighandler_t)sigill_handler;
960 <        sigill_action.sa_flags = SA_ONSTACK;
959 >        sigill_action.sa_sigaction = sigill_handler;
960 >        sigill_action.sa_flags = SA_ONSTACK | SA_SIGINFO;
961 > #ifdef HAVE_SIGNAL_SA_RESTORER
962          sigill_action.sa_restorer = NULL;
963 + #endif
964          if (sigaction(SIGILL, &sigill_action, NULL) < 0) {
965                  sprintf(str, GetString(STR_SIGILL_INSTALL_ERR), strerror(errno));
966                  ErrorAlert(str);
# Line 746 | Line 968 | int main(int argc, char **argv)
968          }
969   #endif
970  
971 + #if !EMULATED_PPC
972          // Install interrupt signal handler
973          sigemptyset(&sigusr2_action.sa_mask);
974 <        sigusr2_action.sa_handler = (__sighandler_t)sigusr2_handler;
975 <        sigusr2_action.sa_flags = 0;
976 < #if !EMULATED_PPC
754 <        sigusr2_action.sa_flags = SA_ONSTACK | SA_RESTART;
755 < #endif
974 >        sigusr2_action.sa_sigaction = sigusr2_handler;
975 >        sigusr2_action.sa_flags = SA_ONSTACK | SA_RESTART | SA_SIGINFO;
976 > #ifdef HAVE_SIGNAL_SA_RESTORER
977          sigusr2_action.sa_restorer = NULL;
978 + #endif
979          if (sigaction(SIGUSR2, &sigusr2_action, NULL) < 0) {
980                  sprintf(str, GetString(STR_SIGUSR2_INSTALL_ERR), strerror(errno));
981                  ErrorAlert(str);
982                  goto quit;
983          }
984 + #endif
985  
986          // Get my thread ID and execute MacOS thread function
987          emul_thread = pthread_self();
# Line 784 | Line 1007 | static void Quit(void)
1007  
1008          // Stop 60Hz thread
1009          if (tick_thread_active) {
1010 +                tick_thread_cancel = true;
1011                  pthread_cancel(tick_thread);
1012                  pthread_join(tick_thread, NULL);
1013          }
1014  
1015          // Stop NVRAM watchdog thread
1016          if (nvram_thread_active) {
1017 +                nvram_thread_cancel = true;
1018                  pthread_cancel(nvram_thread);
1019                  pthread_join(nvram_thread, NULL);
1020          }
1021  
1022   #if !EMULATED_PPC
1023 <        // Uninstall SIGSEGV handler
1023 >        // Uninstall SIGSEGV and SIGBUS handlers
1024          sigemptyset(&sigsegv_action.sa_mask);
1025          sigsegv_action.sa_handler = SIG_DFL;
1026          sigsegv_action.sa_flags = 0;
1027          sigaction(SIGSEGV, &sigsegv_action, NULL);
1028 +        sigaction(SIGBUS, &sigsegv_action, NULL);
1029  
1030          // Uninstall SIGILL handler
1031          sigemptyset(&sigill_action.sa_mask);
1032          sigill_action.sa_handler = SIG_DFL;
1033          sigill_action.sa_flags = 0;
1034          sigaction(SIGILL, &sigill_action, NULL);
809 #endif
1035  
1036 <        // Save NVRAM
1037 <        XPRAMExit();
1038 <
1039 <        // Exit clipboard
1040 <        ClipExit();
1041 <
1042 <        // Exit Time Manager
818 <        TimerExit();
819 <
820 <        // Exit serial
821 <        SerialExit();
822 <
823 <        // Exit network
824 <        EtherExit();
825 <
826 <        // Exit audio
827 <        AudioExit();
828 <
829 <        // Exit video
830 <        VideoExit();
831 <
832 <        // Exit external file system
833 <        ExtFSExit();
1036 >        // Delete stacks for signal handlers
1037 >        for (int i = 0; i < SIG_STACK_COUNT; i++) {
1038 >                void *sig_stack = sig_stacks[i].ss_sp;
1039 >                if (sig_stack)
1040 >                        free(sig_stack);
1041 >        }
1042 > #endif
1043  
1044 <        // Exit drivers
1045 <        SCSIExit();
837 <        CDROMExit();
838 <        DiskExit();
839 <        SonyExit();
1044 >        // Deinitialize everything
1045 >        ExitAll();
1046  
1047          // Delete SheepShaver globals
1048          SheepMem::Exit();
1049  
1050          // Delete RAM area
1051          if (ram_area_mapped)
1052 <                vm_release((char *)RAM_BASE, RAMSize);
1052 >                vm_mac_release(RAM_BASE, RAMSize);
1053  
1054          // Delete ROM area
1055          if (rom_area_mapped)
1056 <                vm_release((char *)ROM_BASE, ROM_AREA_SIZE);
1056 >                vm_mac_release(ROM_BASE, ROM_AREA_SIZE);
1057 >
1058 >        // Delete DR cache areas
1059 >        if (dr_emulator_area_mapped)
1060 >                vm_mac_release(DR_EMULATOR_BASE, DR_EMULATOR_SIZE);
1061 >        if (dr_cache_area_mapped)
1062 >                vm_mac_release(DR_CACHE_BASE, DR_CACHE_SIZE);
1063  
1064          // Delete Kernel Data area
1065 <        if (kernel_area >= 0) {
854 <                shmdt((void *)KERNEL_DATA_BASE);
855 <                shmdt((void *)KERNEL_DATA2_BASE);
856 <                shmctl(kernel_area, IPC_RMID, NULL);
857 <        }
1065 >        kernel_data_exit();
1066  
1067          // Delete Low Memory area
1068          if (lm_area_mapped)
1069 <                munmap((char *)0x0000, 0x3000);
1069 >                vm_mac_release(0, 0x3000);
1070  
1071          // Close /dev/zero
1072          if (zero_fd > 0)
# Line 876 | Line 1084 | static void Quit(void)
1084   #endif
1085  
1086          // Close X11 server connection
1087 + #ifndef USE_SDL_VIDEO
1088          if (x_display)
1089                  XCloseDisplay(x_display);
1090 + #endif
1091  
1092          exit(0);
1093   }
1094  
1095  
1096   /*
1097 + *  Initialize Kernel Data segments
1098 + */
1099 +
1100 + #if defined(__CYGWIN__)
1101 + #define WIN32_LEAN_AND_MEAN
1102 + #include <windows.h>
1103 +
1104 + static HANDLE kernel_handle;                            // Shared memory handle for Kernel Data
1105 + static DWORD allocation_granule;                        // Minimum size of allocateable are (64K)
1106 + static DWORD kernel_area_size;                          // Size of Kernel Data area
1107 + #endif
1108 +
1109 + static bool kernel_data_init(void)
1110 + {
1111 +        char str[256];
1112 + #ifdef _WIN32
1113 +        SYSTEM_INFO si;
1114 +        GetSystemInfo(&si);
1115 +        allocation_granule = si.dwAllocationGranularity;
1116 +        kernel_area_size = (KERNEL_AREA_SIZE + allocation_granule - 1) & -allocation_granule;
1117 +
1118 +        char rcs[10];
1119 +        LPVOID kernel_addr;
1120 +        kernel_handle = CreateFileMapping(INVALID_HANDLE_VALUE, NULL, PAGE_READWRITE, 0, kernel_area_size, NULL);
1121 +        if (kernel_handle == NULL) {
1122 +                sprintf(rcs, "%d", GetLastError());
1123 +                sprintf(str, GetString(STR_KD_SHMGET_ERR), rcs);
1124 +                ErrorAlert(str);
1125 +                return false;
1126 +        }
1127 +        kernel_addr = (LPVOID)Mac2HostAddr(KERNEL_DATA_BASE & -allocation_granule);
1128 +        if (MapViewOfFileEx(kernel_handle, FILE_MAP_READ | FILE_MAP_WRITE, 0, 0, kernel_area_size, kernel_addr) != kernel_addr) {
1129 +                sprintf(rcs, "%d", GetLastError());
1130 +                sprintf(str, GetString(STR_KD_SHMAT_ERR), rcs);
1131 +                ErrorAlert(str);
1132 +                return false;
1133 +        }
1134 +        kernel_addr = (LPVOID)Mac2HostAddr(KERNEL_DATA2_BASE & -allocation_granule);
1135 +        if (MapViewOfFileEx(kernel_handle, FILE_MAP_READ | FILE_MAP_WRITE, 0, 0, kernel_area_size, kernel_addr) != kernel_addr) {
1136 +                sprintf(rcs, "%d", GetLastError());
1137 +                sprintf(str, GetString(STR_KD2_SHMAT_ERR), rcs);
1138 +                ErrorAlert(str);
1139 +                return false;
1140 +        }
1141 + #else
1142 +        kernel_area = shmget(IPC_PRIVATE, KERNEL_AREA_SIZE, 0600);
1143 +        if (kernel_area == -1) {
1144 +                sprintf(str, GetString(STR_KD_SHMGET_ERR), strerror(errno));
1145 +                ErrorAlert(str);
1146 +                return false;
1147 +        }
1148 +        if (shmat(kernel_area, Mac2HostAddr(KERNEL_DATA_BASE), 0) < 0) {
1149 +                sprintf(str, GetString(STR_KD_SHMAT_ERR), strerror(errno));
1150 +                ErrorAlert(str);
1151 +                return false;
1152 +        }
1153 +        if (shmat(kernel_area, Mac2HostAddr(KERNEL_DATA2_BASE), 0) < 0) {
1154 +                sprintf(str, GetString(STR_KD2_SHMAT_ERR), strerror(errno));
1155 +                ErrorAlert(str);
1156 +                return false;
1157 +        }
1158 + #endif
1159 +        return true;
1160 + }
1161 +
1162 +
1163 + /*
1164 + *  Deallocate Kernel Data segments
1165 + */
1166 +
1167 + static void kernel_data_exit(void)
1168 + {
1169 + #ifdef _WIN32
1170 +        if (kernel_handle) {
1171 +                UnmapViewOfFile(Mac2HostAddr(KERNEL_DATA_BASE & -allocation_granule));
1172 +                UnmapViewOfFile(Mac2HostAddr(KERNEL_DATA2_BASE & -allocation_granule));
1173 +                CloseHandle(kernel_handle);
1174 +        }
1175 + #else
1176 +        if (kernel_area >= 0) {
1177 +                shmdt(Mac2HostAddr(KERNEL_DATA_BASE));
1178 +                shmdt(Mac2HostAddr(KERNEL_DATA2_BASE));
1179 +                shmctl(kernel_area, IPC_RMID, NULL);
1180 +        }
1181 + #endif
1182 + }
1183 +
1184 +
1185 + /*
1186   *  Jump into Mac ROM, start 680x0 emulator
1187   */
1188  
# Line 1012 | Line 1311 | void Dump68kRegs(M68kRegisters *r)
1311   *  Make code executable
1312   */
1313  
1314 < void MakeExecutable(int dummy, void *start, uint32 length)
1314 > void MakeExecutable(int dummy, uint32 start, uint32 length)
1315   {
1316 <        if (((uintptr)start >= ROM_BASE) && ((uintptr)start < (ROM_BASE + ROM_SIZE)))
1316 >        if ((start >= ROM_BASE) && (start < (ROM_BASE + ROM_SIZE)))
1317                  return;
1318   #if EMULATED_PPC
1319 <        FlushCodeCache((uintptr)start, (uintptr)start + length);
1319 >        FlushCodeCache(start, start + length);
1320   #else
1321 <        flush_icache_range(start, (void *)((uintptr)start + length));
1321 >        flush_icache_range(start, start + length);
1322   #endif
1323   }
1324  
1325  
1326   /*
1327 < *  Patch things after system startup (gets called by disk driver accRun routine)
1327 > *  NVRAM watchdog thread (saves NVRAM every minute)
1328   */
1329  
1330 < void PatchAfterStartup(void)
1330 > static void nvram_watchdog(void)
1331   {
1332 <        ExecuteNative(NATIVE_VIDEO_INSTALL_ACCEL);
1333 <        InstallExtFS();
1332 >        if (memcmp(last_xpram, XPRAM, XPRAM_SIZE)) {
1333 >                memcpy(last_xpram, XPRAM, XPRAM_SIZE);
1334 >                SaveXPRAM();
1335 >        }
1336   }
1337  
1037
1038 /*
1039 *  NVRAM watchdog thread (saves NVRAM every minute)
1040 */
1041
1338   static void *nvram_func(void *arg)
1339   {
1340 <        struct timespec req = {60, 0};  // 1 minute
1341 <
1342 <        for (;;) {
1343 <                pthread_testcancel();
1048 <                nanosleep(&req, NULL);
1049 <                pthread_testcancel();
1050 <                if (memcmp(last_xpram, XPRAM, XPRAM_SIZE)) {
1051 <                        memcpy(last_xpram, XPRAM, XPRAM_SIZE);
1052 <                        SaveXPRAM();
1053 <                }
1340 >        while (!nvram_thread_cancel) {
1341 >                for (int i=0; i<60 && !nvram_thread_cancel; i++)
1342 >                        Delay_usec(999999);             // Only wait 1 second so we quit promptly when nvram_thread_cancel becomes true
1343 >                nvram_watchdog();
1344          }
1345          return NULL;
1346   }
# Line 1063 | Line 1353 | static void *nvram_func(void *arg)
1353   static void *tick_func(void *arg)
1354   {
1355          int tick_counter = 0;
1356 <        struct timespec req = {0, 16625000};
1356 >        uint64 start = GetTicks_usec();
1357 >        int64 ticks = 0;
1358 >        uint64 next = GetTicks_usec();
1359  
1360 <        for (;;) {
1360 >        while (!tick_thread_cancel) {
1361  
1362                  // Wait
1363 <                nanosleep(&req, NULL);
1363 >                next += 16625;
1364 >                int64 delay = next - GetTicks_usec();
1365 >                if (delay > 0)
1366 >                        Delay_usec(delay);
1367 >                else if (delay < -16625)
1368 >                        next = GetTicks_usec();
1369 >                ticks++;
1370  
1371   #if !EMULATED_PPC
1372                  // Did we crash?
1373                  if (emul_thread_fatal) {
1374  
1375                          // Yes, dump registers
1376 <                        pt_regs *r = (pt_regs *)&sigsegv_regs;
1376 >                        sigregs *r = &sigsegv_regs;
1377                          char str[256];
1378 <                        sprintf(str, "SIGSEGV\n"
1378 >                        if (crash_reason == NULL)
1379 >                                crash_reason = "SIGSEGV";
1380 >                        sprintf(str, "%s\n"
1381                                  "   pc %08lx     lr %08lx    ctr %08lx    msr %08lx\n"
1382                                  "  xer %08lx     cr %08lx  \n"
1383                                  "   r0 %08lx     r1 %08lx     r2 %08lx     r3 %08lx\n"
# Line 1088 | Line 1388 | static void *tick_func(void *arg)
1388                                  "  r20 %08lx    r21 %08lx    r22 %08lx    r23 %08lx\n"
1389                                  "  r24 %08lx    r25 %08lx    r26 %08lx    r27 %08lx\n"
1390                                  "  r28 %08lx    r29 %08lx    r30 %08lx    r31 %08lx\n",
1391 +                                crash_reason,
1392                                  r->nip, r->link, r->ctr, r->msr,
1393                                  r->xer, r->ccr,
1394                                  r->gpr[0], r->gpr[1], r->gpr[2], r->gpr[3],
# Line 1123 | Line 1424 | static void *tick_func(void *arg)
1424                          TriggerInterrupt();
1425                  }
1426          }
1427 +
1428 +        uint64 end = GetTicks_usec();
1429 +        D(bug("%Ld ticks in %Ld usec = %f ticks/sec\n", ticks, end - start, ticks * 1000000.0 / (end - start)));
1430          return NULL;
1431   }
1432  
# Line 1172 | Line 1476 | struct B2_mutex {
1476              pthread_mutexattr_init(&attr);
1477              // Initialize the mutex for priority inheritance --
1478              // required for accurate timing.
1479 < #ifdef HAVE_PTHREAD_MUTEXATTR_SETPROTOCOL
1479 > #if defined(HAVE_PTHREAD_MUTEXATTR_SETPROTOCOL) && !defined(__CYGWIN__)
1480              pthread_mutexattr_setprotocol(&attr, PTHREAD_PRIO_INHERIT);
1481   #endif
1482   #if defined(HAVE_PTHREAD_MUTEXATTR_SETTYPE) && defined(PTHREAD_MUTEX_NORMAL)
# Line 1243 | Line 1547 | void B2_delete_mutex(B2_mutex *mutex)
1547   *  Trigger signal USR2 from another thread
1548   */
1549  
1550 < #if !EMULATED_PPC || ASYNC_IRQ
1550 > #if !EMULATED_PPC
1551   void TriggerInterrupt(void)
1552   {
1553          if (ready_for_signals)
# Line 1275 | Line 1579 | void ClearInterruptFlag(uint32 flag)
1579  
1580   void DisableInterrupt(void)
1581   {
1582 + #if EMULATED_PPC
1583 +        WriteMacInt32(XLM_IRQ_NEST, int32(ReadMacInt32(XLM_IRQ_NEST)) + 1);
1584 + #else
1585          atomic_add((int *)XLM_IRQ_NEST, 1);
1586 + #endif
1587   }
1588  
1589  
# Line 1285 | Line 1593 | void DisableInterrupt(void)
1593  
1594   void EnableInterrupt(void)
1595   {
1596 + #if EMULATED_PPC
1597 +        WriteMacInt32(XLM_IRQ_NEST, int32(ReadMacInt32(XLM_IRQ_NEST)) - 1);
1598 + #else
1599          atomic_add((int *)XLM_IRQ_NEST, -1);
1600 + #endif
1601   }
1602  
1603  
# Line 1293 | Line 1605 | void EnableInterrupt(void)
1605   *  USR2 handler
1606   */
1607  
1608 < #if EMULATED_PPC
1609 < static void sigusr2_handler(int sig)
1608 > #if !EMULATED_PPC
1609 > static void sigusr2_handler(int sig, siginfo_t *sip, void *scp)
1610   {
1611 < #if ASYNC_IRQ
1612 <        extern void HandleInterrupt(void);
1613 <        HandleInterrupt();
1611 >        machine_regs *r = MACHINE_REGISTERS(scp);
1612 >
1613 > #ifdef USE_SDL_VIDEO
1614 >        // We must fill in the events queue in the same thread that did call SDL_SetVideoMode()
1615 >        SDL_PumpEvents();
1616   #endif
1303 }
1304 #else
1305 static void sigusr2_handler(int sig, sigcontext_struct *sc)
1306 {
1307        pt_regs *r = sc->regs;
1617  
1618          // Do nothing if interrupts are disabled
1619          if (*(int32 *)XLM_IRQ_NEST > 0)
1620                  return;
1621  
1622 + #ifdef SYSTEM_CLOBBERS_R2
1623 +        // Restore pointer to Thread Local Storage
1624 +        set_r2(TOC);
1625 + #endif
1626 + #ifdef SYSTEM_CLOBBERS_R13
1627 +        // Restore pointer to .sdata section
1628 +        set_r13(R13);
1629 + #endif
1630 +
1631          // Disable MacOS stack sniffer
1632          WriteMacInt32(0x110, 0);
1633  
# Line 1318 | Line 1636 | static void sigusr2_handler(int sig, sig
1636                  case MODE_68K:
1637                          // 68k emulator active, trigger 68k interrupt level 1
1638                          WriteMacInt16(ntohl(kernel_data->v[0x67c >> 2]), 1);
1639 <                        r->ccr |= ntohl(kernel_data->v[0x674 >> 2]);
1639 >                        r->cr() |= ntohl(kernel_data->v[0x674 >> 2]);
1640                          break;
1641  
1642   #if INTERRUPTS_IN_NATIVE_MODE
1643                  case MODE_NATIVE:
1644                          // 68k emulator inactive, in nanokernel?
1645 <                        if (r->gpr[1] != KernelDataAddr) {
1645 >                        if (r->gpr(1) != KernelDataAddr) {
1646 >
1647 >                                // Set extra stack for nested interrupts
1648 >                                sig_stack_acquire();
1649 >                                
1650                                  // Prepare for 68k interrupt level 1
1651                                  WriteMacInt16(ntohl(kernel_data->v[0x67c >> 2]), 1);
1652                                  WriteMacInt32(ntohl(kernel_data->v[0x658 >> 2]) + 0xdc, ReadMacInt32(ntohl(kernel_data->v[0x658 >> 2]) + 0xdc) | ntohl(kernel_data->v[0x674 >> 2]));
1653  
1654                                  // Execute nanokernel interrupt routine (this will activate the 68k emulator)
1655 <                                atomic_add((int32 *)XLM_IRQ_NEST, 1);
1655 >                                DisableInterrupt();
1656                                  if (ROMType == ROMTYPE_NEWWORLD)
1657                                          ppc_interrupt(ROM_BASE + 0x312b1c, KernelDataAddr);
1658                                  else
1659                                          ppc_interrupt(ROM_BASE + 0x312a3c, KernelDataAddr);
1660 +
1661 +                                // Reset normal signal stack
1662 +                                sig_stack_release();
1663                          }
1664                          break;
1665   #endif
# Line 1345 | Line 1670 | static void sigusr2_handler(int sig, sig
1670                          if ((ReadMacInt32(XLM_68K_R25) & 7) == 0) {
1671  
1672                                  // Set extra stack for SIGSEGV handler
1673 <                                struct sigaltstack new_stack;
1349 <                                new_stack.ss_sp = extra_stack;
1350 <                                new_stack.ss_flags = 0;
1351 <                                new_stack.ss_size = SIG_STACK_SIZE;
1352 <                                sigaltstack(&new_stack, NULL);
1673 >                                sig_stack_acquire();
1674   #if 1
1675                                  // Execute full 68k interrupt routine
1676                                  M68kRegisters r;
# Line 1376 | Line 1697 | static void sigusr2_handler(int sig, sig
1697                                  }
1698   #endif
1699                                  // Reset normal signal stack
1700 <                                new_stack.ss_sp = sig_stack;
1380 <                                new_stack.ss_flags = 0;
1381 <                                new_stack.ss_size = SIG_STACK_SIZE;
1382 <                                sigaltstack(&new_stack, NULL);
1700 >                                sig_stack_release();
1701                          }
1702                          break;
1703   #endif
# Line 1393 | Line 1711 | static void sigusr2_handler(int sig, sig
1711   */
1712  
1713   #if !EMULATED_PPC
1714 < static void sigsegv_handler(int sig, sigcontext_struct *sc)
1714 > static void sigsegv_handler(int sig, siginfo_t *sip, void *scp)
1715   {
1716 <        pt_regs *r = sc->regs;
1716 >        machine_regs *r = MACHINE_REGISTERS(scp);
1717  
1718          // Get effective address
1719 <        uint32 addr = r->dar;
1719 >        uint32 addr = r->dar();
1720          
1721 + #ifdef SYSTEM_CLOBBERS_R2
1722 +        // Restore pointer to Thread Local Storage
1723 +        set_r2(TOC);
1724 + #endif
1725 + #ifdef SYSTEM_CLOBBERS_R13
1726 +        // Restore pointer to .sdata section
1727 +        set_r13(R13);
1728 + #endif
1729 +
1730   #if ENABLE_VOSF
1731          // Handle screen fault.
1732          extern bool Screen_fault_handler(sigsegv_address_t fault_address, sigsegv_address_t fault_instruction);
1733 <        if (Screen_fault_handler((sigsegv_address_t)addr, (sigsegv_address_t)r->nip))
1733 >        if (Screen_fault_handler((sigsegv_address_t)addr, (sigsegv_address_t)r->pc()))
1734                  return;
1735   #endif
1736  
1737          num_segv++;
1738  
1739 <        // Fault in Mac ROM or RAM?
1740 <        bool mac_fault = (r->nip >= ROM_BASE) && (r->nip < (ROM_BASE + ROM_AREA_SIZE)) || (r->nip >= RAMBase) && (r->nip < (RAMBase + RAMSize));
1739 >        // Fault in Mac ROM or RAM or DR Cache?
1740 >        bool mac_fault = (r->pc() >= ROM_BASE) && (r->pc() < (ROM_BASE + ROM_AREA_SIZE)) || (r->pc() >= RAMBase) && (r->pc() < (RAMBase + RAMSize)) || (r->pc() >= DR_CACHE_BASE && r->pc() < (DR_CACHE_BASE + DR_CACHE_SIZE));
1741          if (mac_fault) {
1742  
1743                  // "VM settings" during MacOS 8 installation
1744 <                if (r->nip == ROM_BASE + 0x488160 && r->gpr[20] == 0xf8000000) {
1745 <                        r->nip += 4;
1746 <                        r->gpr[8] = 0;
1744 >                if (r->pc() == ROM_BASE + 0x488160 && r->gpr(20) == 0xf8000000) {
1745 >                        r->pc() += 4;
1746 >                        r->gpr(8) = 0;
1747                          return;
1748          
1749                  // MacOS 8.5 installation
1750 <                } else if (r->nip == ROM_BASE + 0x488140 && r->gpr[16] == 0xf8000000) {
1751 <                        r->nip += 4;
1752 <                        r->gpr[8] = 0;
1750 >                } else if (r->pc() == ROM_BASE + 0x488140 && r->gpr(16) == 0xf8000000) {
1751 >                        r->pc() += 4;
1752 >                        r->gpr(8) = 0;
1753                          return;
1754          
1755                  // MacOS 8 serial drivers on startup
1756 <                } else if (r->nip == ROM_BASE + 0x48e080 && (r->gpr[8] == 0xf3012002 || r->gpr[8] == 0xf3012000)) {
1757 <                        r->nip += 4;
1758 <                        r->gpr[8] = 0;
1756 >                } else if (r->pc() == ROM_BASE + 0x48e080 && (r->gpr(8) == 0xf3012002 || r->gpr(8) == 0xf3012000)) {
1757 >                        r->pc() += 4;
1758 >                        r->gpr(8) = 0;
1759                          return;
1760          
1761                  // MacOS 8.1 serial drivers on startup
1762 <                } else if (r->nip == ROM_BASE + 0x48c5e0 && (r->gpr[20] == 0xf3012002 || r->gpr[20] == 0xf3012000)) {
1763 <                        r->nip += 4;
1762 >                } else if (r->pc() == ROM_BASE + 0x48c5e0 && (r->gpr(20) == 0xf3012002 || r->gpr(20) == 0xf3012000)) {
1763 >                        r->pc() += 4;
1764 >                        return;
1765 >                } else if (r->pc() == ROM_BASE + 0x4a10a0 && (r->gpr(20) == 0xf3012002 || r->gpr(20) == 0xf3012000)) {
1766 >                        r->pc() += 4;
1767 >                        return;
1768 >        
1769 >                // MacOS 8.6 serial drivers on startup (with DR Cache and OldWorld ROM)
1770 >                } else if ((r->pc() - DR_CACHE_BASE) < DR_CACHE_SIZE && (r->gpr(16) == 0xf3012002 || r->gpr(16) == 0xf3012000)) {
1771 >                        r->pc() += 4;
1772                          return;
1773 <                } else if (r->nip == ROM_BASE + 0x4a10a0 && (r->gpr[20] == 0xf3012002 || r->gpr[20] == 0xf3012000)) {
1774 <                        r->nip += 4;
1773 >                } else if ((r->pc() - DR_CACHE_BASE) < DR_CACHE_SIZE && (r->gpr(20) == 0xf3012002 || r->gpr(20) == 0xf3012000)) {
1774 >                        r->pc() += 4;
1775                          return;
1776                  }
1777  
1778                  // Get opcode and divide into fields
1779 <                uint32 opcode = *((uint32 *)r->nip);
1779 >                uint32 opcode = *((uint32 *)r->pc());
1780                  uint32 primop = opcode >> 26;
1781                  uint32 exop = (opcode >> 1) & 0x3ff;
1782                  uint32 ra = (opcode >> 16) & 0x1f;
# Line 1530 | Line 1865 | static void sigsegv_handler(int sig, sig
1865                                  transfer_type = TYPE_STORE; transfer_size = SIZE_HALFWORD; addr_mode = MODE_NORM; break;
1866                          case 45:        // sthu
1867                                  transfer_type = TYPE_STORE; transfer_size = SIZE_HALFWORD; addr_mode = MODE_U; break;
1868 + #if EMULATE_UNALIGNED_LOADSTORE_MULTIPLE
1869 +                        case 46:        // lmw
1870 +                                if ((addr % 4) != 0) {
1871 +                                        uint32 ea = addr;
1872 +                                        D(bug("WARNING: unaligned lmw to EA=%08x from IP=%08x\n", ea, r->pc()));
1873 +                                        for (int i = rd; i <= 31; i++) {
1874 +                                                r->gpr(i) = ReadMacInt32(ea);
1875 +                                                ea += 4;
1876 +                                        }
1877 +                                        r->pc() += 4;
1878 +                                        goto rti;
1879 +                                }
1880 +                                break;
1881 +                        case 47:        // stmw
1882 +                                if ((addr % 4) != 0) {
1883 +                                        uint32 ea = addr;
1884 +                                        D(bug("WARNING: unaligned stmw to EA=%08x from IP=%08x\n", ea, r->pc()));
1885 +                                        for (int i = rd; i <= 31; i++) {
1886 +                                                WriteMacInt32(ea, r->gpr(i));
1887 +                                                ea += 4;
1888 +                                        }
1889 +                                        r->pc() += 4;
1890 +                                        goto rti;
1891 +                                }
1892 +                                break;
1893 + #endif
1894                  }
1895          
1896 <                // Ignore ROM writes
1897 <                if (transfer_type == TYPE_STORE && addr >= ROM_BASE && addr < ROM_BASE + ROM_SIZE) {
1898 < //                      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->nip));
1896 >                // Ignore ROM writes (including to the zero page, which is read-only)
1897 >                if (transfer_type == TYPE_STORE &&
1898 >                        ((addr >= ROM_BASE && addr < ROM_BASE + ROM_SIZE) ||
1899 >                         (addr >= SheepMem::ZeroPage() && addr < SheepMem::ZeroPage() + SheepMem::PageSize()))) {
1900 > //                      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()));
1901                          if (addr_mode == MODE_U || addr_mode == MODE_UX)
1902 <                                r->gpr[ra] = addr;
1903 <                        r->nip += 4;
1902 >                                r->gpr(ra) = addr;
1903 >                        r->pc() += 4;
1904                          goto rti;
1905                  }
1906  
1907                  // Ignore illegal memory accesses?
1908                  if (PrefsFindBool("ignoresegv")) {
1909                          if (addr_mode == MODE_U || addr_mode == MODE_UX)
1910 <                                r->gpr[ra] = addr;
1910 >                                r->gpr(ra) = addr;
1911                          if (transfer_type == TYPE_LOAD)
1912 <                                r->gpr[rd] = 0;
1913 <                        r->nip += 4;
1912 >                                r->gpr(rd) = 0;
1913 >                        r->pc() += 4;
1914                          goto rti;
1915                  }
1916  
# Line 1555 | Line 1918 | static void sigsegv_handler(int sig, sig
1918                  if (!PrefsFindBool("nogui")) {
1919                          char str[256];
1920                          if (transfer_type == TYPE_LOAD || transfer_type == TYPE_STORE)
1921 <                                sprintf(str, GetString(STR_MEM_ACCESS_ERR), transfer_size == SIZE_BYTE ? "byte" : transfer_size == SIZE_HALFWORD ? "halfword" : "word", transfer_type == TYPE_LOAD ? GetString(STR_MEM_ACCESS_READ) : GetString(STR_MEM_ACCESS_WRITE), addr, r->nip, r->gpr[24], r->gpr[1]);
1921 >                                sprintf(str, GetString(STR_MEM_ACCESS_ERR), transfer_size == SIZE_BYTE ? "byte" : transfer_size == SIZE_HALFWORD ? "halfword" : "word", transfer_type == TYPE_LOAD ? GetString(STR_MEM_ACCESS_READ) : GetString(STR_MEM_ACCESS_WRITE), addr, r->pc(), r->gpr(24), r->gpr(1));
1922                          else
1923 <                                sprintf(str, GetString(STR_UNKNOWN_SEGV_ERR), r->nip, r->gpr[24], r->gpr[1], opcode);
1923 >                                sprintf(str, GetString(STR_UNKNOWN_SEGV_ERR), r->pc(), r->gpr(24), r->gpr(1), opcode);
1924                          ErrorAlert(str);
1925                          QuitEmulator();
1926                          return;
# Line 1565 | Line 1928 | static void sigsegv_handler(int sig, sig
1928          }
1929  
1930          // For all other errors, jump into debugger (sort of...)
1931 +        crash_reason = (sig == SIGBUS) ? "SIGBUS" : "SIGSEGV";
1932          if (!ready_for_signals) {
1933 <                printf("SIGSEGV\n");
1934 <                printf(" sigcontext %p, pt_regs %p\n", sc, r);
1933 >                printf("%s\n");
1934 >                printf(" sigcontext %p, machine_regs %p\n", scp, r);
1935                  printf(
1936                          "   pc %08lx     lr %08lx    ctr %08lx    msr %08lx\n"
1937                          "  xer %08lx     cr %08lx  \n"
# Line 1579 | Line 1943 | static void sigsegv_handler(int sig, sig
1943                          "  r20 %08lx    r21 %08lx    r22 %08lx    r23 %08lx\n"
1944                          "  r24 %08lx    r25 %08lx    r26 %08lx    r27 %08lx\n"
1945                          "  r28 %08lx    r29 %08lx    r30 %08lx    r31 %08lx\n",
1946 <                        r->nip, r->link, r->ctr, r->msr,
1947 <                        r->xer, r->ccr,
1948 <                        r->gpr[0], r->gpr[1], r->gpr[2], r->gpr[3],
1949 <                        r->gpr[4], r->gpr[5], r->gpr[6], r->gpr[7],
1950 <                        r->gpr[8], r->gpr[9], r->gpr[10], r->gpr[11],
1951 <                        r->gpr[12], r->gpr[13], r->gpr[14], r->gpr[15],
1952 <                        r->gpr[16], r->gpr[17], r->gpr[18], r->gpr[19],
1953 <                        r->gpr[20], r->gpr[21], r->gpr[22], r->gpr[23],
1954 <                        r->gpr[24], r->gpr[25], r->gpr[26], r->gpr[27],
1955 <                        r->gpr[28], r->gpr[29], r->gpr[30], r->gpr[31]);
1946 >                        crash_reason,
1947 >                        r->pc(), r->lr(), r->ctr(), r->msr(),
1948 >                        r->xer(), r->cr(),
1949 >                        r->gpr(0), r->gpr(1), r->gpr(2), r->gpr(3),
1950 >                        r->gpr(4), r->gpr(5), r->gpr(6), r->gpr(7),
1951 >                        r->gpr(8), r->gpr(9), r->gpr(10), r->gpr(11),
1952 >                        r->gpr(12), r->gpr(13), r->gpr(14), r->gpr(15),
1953 >                        r->gpr(16), r->gpr(17), r->gpr(18), r->gpr(19),
1954 >                        r->gpr(20), r->gpr(21), r->gpr(22), r->gpr(23),
1955 >                        r->gpr(24), r->gpr(25), r->gpr(26), r->gpr(27),
1956 >                        r->gpr(28), r->gpr(29), r->gpr(30), r->gpr(31));
1957                  exit(1);
1958                  QuitEmulator();
1959                  return;
1960          } else {
1961                  // We crashed. Save registers, tell tick thread and loop forever
1962 <                sigsegv_regs = *(sigregs *)r;
1962 >                build_sigregs(&sigsegv_regs, r);
1963                  emul_thread_fatal = true;
1964                  for (;;) ;
1965          }
# Line 1606 | Line 1971 | rti:;
1971   *  SIGILL handler
1972   */
1973  
1974 < static void sigill_handler(int sig, sigcontext_struct *sc)
1974 > static void sigill_handler(int sig, siginfo_t *sip, void *scp)
1975   {
1976 <        pt_regs *r = sc->regs;
1976 >        machine_regs *r = MACHINE_REGISTERS(scp);
1977          char str[256];
1978  
1979 + #ifdef SYSTEM_CLOBBERS_R2
1980 +        // Restore pointer to Thread Local Storage
1981 +        set_r2(TOC);
1982 + #endif
1983 + #ifdef SYSTEM_CLOBBERS_R13
1984 +        // Restore pointer to .sdata section
1985 +        set_r13(R13);
1986 + #endif
1987 +
1988          // Fault in Mac ROM or RAM?
1989 <        bool mac_fault = (r->nip >= ROM_BASE) && (r->nip < (ROM_BASE + ROM_AREA_SIZE)) || (r->nip >= RAMBase) && (r->nip < (RAMBase + RAMSize));
1989 >        bool mac_fault = (r->pc() >= ROM_BASE) && (r->pc() < (ROM_BASE + ROM_AREA_SIZE)) || (r->pc() >= RAMBase) && (r->pc() < (RAMBase + RAMSize));
1990          if (mac_fault) {
1991  
1992                  // Get opcode and divide into fields
1993 <                uint32 opcode = *((uint32 *)r->nip);
1993 >                uint32 opcode = *((uint32 *)r->pc());
1994                  uint32 primop = opcode >> 26;
1995                  uint32 exop = (opcode >> 1) & 0x3ff;
1996                  uint32 ra = (opcode >> 16) & 0x1f;
# Line 1627 | Line 2001 | static void sigill_handler(int sig, sigc
2001                  switch (primop) {
2002                          case 9:         // POWER instructions
2003                          case 22:
2004 < power_inst:             sprintf(str, GetString(STR_POWER_INSTRUCTION_ERR), r->nip, r->gpr[1], opcode);
2004 > power_inst:             sprintf(str, GetString(STR_POWER_INSTRUCTION_ERR), r->pc(), r->gpr(1), opcode);
2005                                  ErrorAlert(str);
2006                                  QuitEmulator();
2007                                  return;
# Line 1635 | Line 2009 | power_inst:            sprintf(str, GetString(STR_
2009                          case 31:
2010                                  switch (exop) {
2011                                          case 83:        // mfmsr
2012 <                                                r->gpr[rd] = 0xf072;
2013 <                                                r->nip += 4;
2012 >                                                r->gpr(rd) = 0xf072;
2013 >                                                r->pc() += 4;
2014                                                  goto rti;
2015  
2016                                          case 210:       // mtsr
2017                                          case 242:       // mtsrin
2018                                          case 306:       // tlbie
2019 <                                                r->nip += 4;
2019 >                                                r->pc() += 4;
2020                                                  goto rti;
2021  
2022                                          case 339: {     // mfspr
# Line 1658 | Line 2032 | power_inst:            sprintf(str, GetString(STR_
2032                                                          case 957:       // PMC3
2033                                                          case 958:       // PMC4
2034                                                          case 959:       // SDA
2035 <                                                                r->nip += 4;
2035 >                                                                r->pc() += 4;
2036                                                                  goto rti;
2037                                                          case 25:        // SDR1
2038 <                                                                r->gpr[rd] = 0xdead001f;
2039 <                                                                r->nip += 4;
2038 >                                                                r->gpr(rd) = 0xdead001f;
2039 >                                                                r->pc() += 4;
2040                                                                  goto rti;
2041                                                          case 287:       // PVR
2042 <                                                                r->gpr[rd] = PVR;
2043 <                                                                r->nip += 4;
2042 >                                                                r->gpr(rd) = PVR;
2043 >                                                                r->pc() += 4;
2044                                                                  goto rti;
2045                                                  }
2046                                                  break;
# Line 1702 | Line 2076 | power_inst:            sprintf(str, GetString(STR_
2076                                                          case 957:       // PMC3
2077                                                          case 958:       // PMC4
2078                                                          case 959:       // SDA
2079 <                                                                r->nip += 4;
2079 >                                                                r->pc() += 4;
2080                                                                  goto rti;
2081                                                  }
2082                                                  break;
# Line 1721 | Line 2095 | power_inst:            sprintf(str, GetString(STR_
2095  
2096                  // In GUI mode, show error alert
2097                  if (!PrefsFindBool("nogui")) {
2098 <                        sprintf(str, GetString(STR_UNKNOWN_SEGV_ERR), r->nip, r->gpr[24], r->gpr[1], opcode);
2098 >                        sprintf(str, GetString(STR_UNKNOWN_SEGV_ERR), r->pc(), r->gpr(24), r->gpr(1), opcode);
2099                          ErrorAlert(str);
2100                          QuitEmulator();
2101                          return;
# Line 1729 | Line 2103 | power_inst:            sprintf(str, GetString(STR_
2103          }
2104  
2105          // For all other errors, jump into debugger (sort of...)
2106 +        crash_reason = "SIGILL";
2107          if (!ready_for_signals) {
2108 <                printf("SIGILL\n");
2109 <                printf(" sigcontext %p, pt_regs %p\n", sc, r);
2108 >                printf("%s\n");
2109 >                printf(" sigcontext %p, machine_regs %p\n", scp, r);
2110                  printf(
2111                          "   pc %08lx     lr %08lx    ctr %08lx    msr %08lx\n"
2112                          "  xer %08lx     cr %08lx  \n"
# Line 1743 | Line 2118 | power_inst:            sprintf(str, GetString(STR_
2118                          "  r20 %08lx    r21 %08lx    r22 %08lx    r23 %08lx\n"
2119                          "  r24 %08lx    r25 %08lx    r26 %08lx    r27 %08lx\n"
2120                          "  r28 %08lx    r29 %08lx    r30 %08lx    r31 %08lx\n",
2121 <                        r->nip, r->link, r->ctr, r->msr,
2122 <                        r->xer, r->ccr,
2123 <                        r->gpr[0], r->gpr[1], r->gpr[2], r->gpr[3],
2124 <                        r->gpr[4], r->gpr[5], r->gpr[6], r->gpr[7],
2125 <                        r->gpr[8], r->gpr[9], r->gpr[10], r->gpr[11],
2126 <                        r->gpr[12], r->gpr[13], r->gpr[14], r->gpr[15],
2127 <                        r->gpr[16], r->gpr[17], r->gpr[18], r->gpr[19],
2128 <                        r->gpr[20], r->gpr[21], r->gpr[22], r->gpr[23],
2129 <                        r->gpr[24], r->gpr[25], r->gpr[26], r->gpr[27],
2130 <                        r->gpr[28], r->gpr[29], r->gpr[30], r->gpr[31]);
2121 >                        crash_reason,
2122 >                        r->pc(), r->lr(), r->ctr(), r->msr(),
2123 >                        r->xer(), r->cr(),
2124 >                        r->gpr(0), r->gpr(1), r->gpr(2), r->gpr(3),
2125 >                        r->gpr(4), r->gpr(5), r->gpr(6), r->gpr(7),
2126 >                        r->gpr(8), r->gpr(9), r->gpr(10), r->gpr(11),
2127 >                        r->gpr(12), r->gpr(13), r->gpr(14), r->gpr(15),
2128 >                        r->gpr(16), r->gpr(17), r->gpr(18), r->gpr(19),
2129 >                        r->gpr(20), r->gpr(21), r->gpr(22), r->gpr(23),
2130 >                        r->gpr(24), r->gpr(25), r->gpr(26), r->gpr(27),
2131 >                        r->gpr(28), r->gpr(29), r->gpr(30), r->gpr(31));
2132                  exit(1);
2133                  QuitEmulator();
2134                  return;
2135          } else {
2136                  // We crashed. Save registers, tell tick thread and loop forever
2137 <                sigsegv_regs = *(sigregs *)r;
2137 >                build_sigregs(&sigsegv_regs, r);
2138                  emul_thread_fatal = true;
2139                  for (;;) ;
2140          }
# Line 1773 | Line 2149 | rti:;
2149  
2150   bool SheepMem::Init(void)
2151   {
2152 <        if (vm_acquire_fixed((char *)base, size) < 0)
2153 <                return false;
2152 >        // Size of a native page
2153 >        page_size = getpagesize();
2154  
2155 <        zero_page = base + size;
2155 >        // Allocate SheepShaver globals
2156 >        proc = base;
2157 >        if (vm_mac_acquire(base, size) < 0)
2158 >                return false;
2159  
2160 <        int page_size = getpagesize();
2161 <        if (vm_acquire_fixed((char *)zero_page, page_size) < 0)
2160 >        // Allocate page with all bits set to 0, right in the middle
2161 >        // This is also used to catch undesired overlaps between proc and data areas
2162 >        zero_page = proc + (size / 2);
2163 >        Mac_memset(zero_page, 0, page_size);
2164 >        if (vm_protect(Mac2HostAddr(zero_page), page_size, VM_PAGE_READ) < 0)
2165                  return false;
2166 <        memset((char *)zero_page, 0, page_size);
2167 <        if (vm_protect((char *)zero_page, page_size, VM_PAGE_READ) < 0)
2166 >
2167 > #if EMULATED_PPC
2168 >        // Allocate alternate stack for PowerPC interrupt routine
2169 >        sig_stack = base + size;
2170 >        if (vm_mac_acquire(sig_stack, SIG_STACK_SIZE) < 0)
2171                  return false;
2172 + #endif
2173  
2174 <        top = base + size;
2174 >        data = base + size;
2175          return true;
2176   }
2177  
2178   void SheepMem::Exit(void)
2179   {
2180 <        if (top) {
2181 <                // The zero page is next to SheepShaver globals
2182 <                vm_release((void *)base, size + getpagesize());
2180 >        if (data) {
2181 >                // Delete SheepShaver globals
2182 >                vm_mac_release(base, size);
2183 >
2184 > #if EMULATED_PPC
2185 >                // Delete alternate stack for PowerPC interrupt routine
2186 >                vm_mac_release(sig_stack, SIG_STACK_SIZE);
2187 > #endif
2188          }
2189   }
2190  
# Line 1847 | Line 2238 | void display_alert(int title_id, int pre
2238  
2239   void ErrorAlert(const char *text)
2240   {
2241 < #ifdef ENABLE_GTK
2241 > #if defined(ENABLE_GTK) && !defined(USE_SDL_VIDEO)
2242          if (PrefsFindBool("nogui") || x_display == NULL) {
2243                  printf(GetString(STR_SHELL_ERROR_PREFIX), text);
2244                  return;
# Line 1866 | Line 2257 | void ErrorAlert(const char *text)
2257  
2258   void WarningAlert(const char *text)
2259   {
2260 < #ifdef ENABLE_GTK
2260 > #if defined(ENABLE_GTK) && !defined(USE_SDL_VIDEO)
2261          if (PrefsFindBool("nogui") || x_display == NULL) {
2262                  printf(GetString(STR_SHELL_WARNING_PREFIX), text);
2263                  return;

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines