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.2 by cebix, 2002-02-21T15:12:12Z vs.
Revision 1.66 by gbeauche, 2005-06-28T16:50:30Z

# 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 + *  Note that POSIX standard says you can't modify the alternate
71 + *  signal stack while the process is executing on it. There is a
72 + *  hackaround though: we install a trampoline SIGUSR2 handler that
73 + *  sets up an alternate stack itself and calls the real handler.
74 + *  Then, when we call sigaltstack() there, we no longer get an EPERM,
75 + *  i.e. it now works.
76 + *
77   *  TODO:
78   *    check if SIGSEGV handler works for all registers (including FP!)
79   */
# Line 93 | Line 102
102   #include "xpram.h"
103   #include "timer.h"
104   #include "adb.h"
96 #include "sony.h"
97 #include "disk.h"
98 #include "cdrom.h"
99 #include "scsi.h"
105   #include "video.h"
101 #include "audio.h"
102 #include "ether.h"
103 #include "serial.h"
104 #include "clip.h"
105 #include "extfs.h"
106   #include "sys.h"
107   #include "macos_util.h"
108   #include "rom_patches.h"
109   #include "user_strings.h"
110 + #include "vm_alloc.h"
111 + #include "sigsegv.h"
112  
113   #define DEBUG 0
114   #include "debug.h"
115  
116  
117 + #ifdef HAVE_DIRENT_H
118 + #include <dirent.h>
119 + #endif
120 +
121 + #ifdef USE_SDL
122 + #include <SDL.h>
123 + #endif
124 +
125 + #ifndef USE_SDL_VIDEO
126   #include <X11/Xlib.h>
127 + #endif
128  
129   #ifdef ENABLE_GTK
130   #include <gtk/gtk.h>
# Line 129 | Line 141
141   #endif
142  
143  
144 + // Enable emulation of unaligned lmw/stmw?
145 + #define EMULATE_UNALIGNED_LOADSTORE_MULTIPLE 1
146 +
147   // Enable Execute68k() safety checks?
148   #define SAFE_EXEC_68K 0
149  
# Line 143 | Line 158
158   const char ROM_FILE_NAME[] = "ROM";
159   const char ROM_FILE_NAME2[] = "Mac OS ROM";
160  
161 < const uint32 ROM_AREA_SIZE = 0x500000;          // Size of ROM area
162 < const uint32 ROM_END = ROM_BASE + ROM_SIZE;     // End of ROM
163 <
164 < const uint32 KERNEL_DATA_BASE = 0x68ffe000;     // Address of Kernel Data
165 < const uint32 KERNEL_DATA2_BASE = 0x5fffe000;    // Alternate address of Kernel Data
166 < const uint32 KERNEL_AREA_SIZE = 0x2000;         // Size of Kernel Data area
152 <
161 > #if REAL_ADDRESSING
162 > const uintptr RAM_BASE = 0x20000000;            // Base address of RAM
163 > #else
164 > // FIXME: needs to be >= 0x04000000
165 > const uintptr RAM_BASE = 0x10000000;            // Base address of RAM
166 > #endif
167   const uint32 SIG_STACK_SIZE = 0x10000;          // Size of signal stack
168  
169  
170 < // 68k Emulator Data
171 < struct EmulatorData {
172 <        uint32  v[0x400];      
170 > #if !EMULATED_PPC
171 > struct sigregs {
172 >        uint32 nip;
173 >        uint32 link;
174 >        uint32 ctr;
175 >        uint32 msr;
176 >        uint32 xer;
177 >        uint32 ccr;
178 >        uint32 gpr[32];
179   };
180  
181 <
182 < // Kernel Data
183 < struct KernelData {
184 <        uint32  v[0x400];
185 <        EmulatorData ed;
181 > #if defined(__linux__)
182 > #include <sys/ucontext.h>
183 > #define MACHINE_REGISTERS(scp)  ((machine_regs *)(((ucontext_t *)scp)->uc_mcontext.regs))
184 >
185 > struct machine_regs : public pt_regs
186 > {
187 >        u_long & cr()                           { return pt_regs::ccr; }
188 >        uint32 cr() const                       { return pt_regs::ccr; }
189 >        uint32 lr() const                       { return pt_regs::link; }
190 >        uint32 ctr() const                      { return pt_regs::ctr; }
191 >        uint32 xer() const                      { return pt_regs::xer; }
192 >        uint32 msr() const                      { return pt_regs::msr; }
193 >        uint32 dar() const                      { return pt_regs::dar; }
194 >        u_long & pc()                           { return pt_regs::nip; }
195 >        uint32 pc() const                       { return pt_regs::nip; }
196 >        u_long & gpr(int i)                     { return pt_regs::gpr[i]; }
197 >        uint32 gpr(int i) const         { return pt_regs::gpr[i]; }
198   };
199 + #endif
200  
201 + #if defined(__NetBSD__)
202 + #include <sys/ucontext.h>
203 + #define MACHINE_REGISTERS(scp)  ((machine_regs *)&(((ucontext_t *)scp)->uc_mcontext))
204 +
205 + struct machine_regs : public mcontext_t
206 + {
207 +        long & cr()                                     { return __gregs[_REG_CR]; }
208 +        uint32 cr() const                       { return __gregs[_REG_CR]; }
209 +        uint32 lr() const                       { return __gregs[_REG_LR]; }
210 +        uint32 ctr() const                      { return __gregs[_REG_CTR]; }
211 +        uint32 xer() const                      { return __gregs[_REG_XER]; }
212 +        uint32 msr() const                      { return __gregs[_REG_MSR]; }
213 +        uint32 dar() const                      { return (uint32)(((siginfo_t *)(((unsigned long)this) - offsetof(ucontext_t, uc_mcontext))) - 1)->si_addr; } /* HACK */
214 +        long & pc()                                     { return __gregs[_REG_PC]; }
215 +        uint32 pc() const                       { return __gregs[_REG_PC]; }
216 +        long & gpr(int i)                       { return __gregs[_REG_R0 + i]; }
217 +        uint32 gpr(int i) const         { return __gregs[_REG_R0 + i]; }
218 + };
219 + #endif
220  
221 < #if !EMULATED_PPC
222 < // Structure in which registers are saved in a signal handler;
223 < // sigcontext->regs points to it
224 < // (see arch/ppc/kernel/signal.c)
225 < typedef struct {
226 <        uint32 u[4];
227 < } __attribute((aligned(16))) vector128;
228 < #include <linux/elf.h>
229 <
230 < struct sigregs {
231 <        elf_gregset_t   gp_regs;                                // Identical to pt_regs
232 <        double                  fp_regs[ELF_NFPREG];    // f0..f31 and fpsrc
233 <        //more (uninteresting) stuff following here
221 > #if defined(__APPLE__) && defined(__MACH__)
222 > #include <sys/signal.h>
223 > extern "C" int sigaltstack(const struct sigaltstack *ss, struct sigaltstack *oss);
224 >
225 > #include <sys/ucontext.h>
226 > #define MACHINE_REGISTERS(scp)  ((machine_regs *)(((ucontext_t *)scp)->uc_mcontext))
227 >
228 > struct machine_regs : public mcontext
229 > {
230 >        uint32 & cr()                           { return ss.cr; }
231 >        uint32 cr() const                       { return ss.cr; }
232 >        uint32 lr() const                       { return ss.lr; }
233 >        uint32 ctr() const                      { return ss.ctr; }
234 >        uint32 xer() const                      { return ss.xer; }
235 >        uint32 msr() const                      { return ss.srr1; }
236 >        uint32 dar() const                      { return es.dar; }
237 >        uint32 & pc()                           { return ss.srr0; }
238 >        uint32 pc() const                       { return ss.srr0; }
239 >        uint32 & gpr(int i)                     { return (&ss.r0)[i]; }
240 >        uint32 gpr(int i) const         { return (&ss.r0)[i]; }
241   };
242   #endif
243  
244 + static void build_sigregs(sigregs *srp, machine_regs *mrp)
245 + {
246 +        srp->nip = mrp->pc();
247 +        srp->link = mrp->lr();
248 +        srp->ctr = mrp->ctr();
249 +        srp->msr = mrp->msr();
250 +        srp->xer = mrp->xer();
251 +        srp->ccr = mrp->cr();
252 +        for (int i = 0; i < 32; i++)
253 +                srp->gpr[i] = mrp->gpr(i);
254 + }
255 + #endif
256 +
257  
258   // Global variables (exported)
259   #if !EMULATED_PPC
260 < void *TOC;                              // Small data pointer (r13)
260 > void *TOC = NULL;               // Pointer to Thread Local Storage (r2)
261 > void *R13 = NULL;               // Pointer to .sdata section (r13 under Linux)
262   #endif
263   uint32 RAMBase;                 // Base address of Mac RAM
264   uint32 RAMSize;                 // Size of Mac RAM
265   uint32 KernelDataAddr;  // Address of Kernel Data
266   uint32 BootGlobsAddr;   // Address of BootGlobs structure at top of Mac RAM
267 + uint32 DRCacheAddr;             // Address of DR Cache
268   uint32 PVR;                             // Theoretical PVR
269   int64 CPUClockSpeed;    // Processor clock speed (Hz)
270   int64 BusClockSpeed;    // Bus clock speed (Hz)
271 + int64 TimebaseSpeed;    // Timebase clock speed (Hz)
272 + uint8 *RAMBaseHost;             // Base address of Mac RAM (host address space)
273 + uint8 *ROMBaseHost;             // Base address of Mac ROM (host address space)
274  
275  
276   // Global variables
277 < static char *x_display_name = NULL;                     // X11 display name
277 > #ifndef USE_SDL_VIDEO
278 > char *x_display_name = NULL;                            // X11 display name
279   Display *x_display = NULL;                                      // X11 display handle
280 + #ifdef X11_LOCK_TYPE
281 + X11_LOCK_TYPE x_display_lock = X11_LOCK_INIT; // X11 display lock
282 + #endif
283 + #endif
284  
285   static int zero_fd = 0;                                         // FD of /dev/zero
286   static bool lm_area_mapped = false;                     // Flag: Low Memory area mmap()ped
287   static int kernel_area = -1;                            // SHM ID of Kernel Data area
288   static bool rom_area_mapped = false;            // Flag: Mac ROM mmap()ped
289   static bool ram_area_mapped = false;            // Flag: Mac RAM mmap()ped
290 < static void *mmap_RAMBase = NULL;                       // Base address of mmap()ed RAM area
290 > static bool dr_cache_area_mapped = false;       // Flag: Mac DR Cache mmap()ped
291 > static bool dr_emulator_area_mapped = false;// Flag: Mac DR Emulator mmap()ped
292   static KernelData *kernel_data;                         // Pointer to Kernel Data
293   static EmulatorData *emulator_data;
294  
295   static uint8 last_xpram[XPRAM_SIZE];            // Buffer for monitoring XPRAM changes
296  
297   static bool nvram_thread_active = false;        // Flag: NVRAM watchdog installed
298 + static volatile bool nvram_thread_cancel;       // Flag: Cancel NVRAM thread
299   static pthread_t nvram_thread;                          // NVRAM watchdog
300   static bool tick_thread_active = false;         // Flag: MacOS thread installed
301 + static volatile bool tick_thread_cancel;        // Flag: Cancel 60Hz thread
302   static pthread_t tick_thread;                           // 60Hz thread
303   static pthread_t emul_thread;                           // MacOS thread
304  
305   static bool ready_for_signals = false;          // Handler installed, signals can be sent
306   static int64 num_segv = 0;                                      // Number of handled SEGV signals
307  
223 #if !EMULATED_PPC
308   static struct sigaction sigusr2_action;         // Interrupt signal (of emulator thread)
309 + #if EMULATED_PPC
310 + static uintptr sig_stack = 0;                           // Stack for PowerPC interrupt routine
311 + #else
312   static struct sigaction sigsegv_action;         // Data access exception signal (of emulator thread)
313   static struct sigaction sigill_action;          // Illegal instruction signal (of emulator thread)
314 < static void *sig_stack = NULL;                          // Stack for signal handlers
315 < static void *extra_stack = NULL;                        // Stack for SIGSEGV inside interrupt handler
314 > static struct sigaltstack sig_stack;            // Stack for signal handlers
315 > static struct sigaltstack extra_stack;          // Stack for SIGSEGV inside interrupt handler
316   static bool emul_thread_fatal = false;          // Flag: MacOS thread crashed, tick thread shall dump debug output
317   static sigregs sigsegv_regs;                            // Register dump when crashed
318 + static const char *crash_reason = NULL;         // Reason of the crash (SIGSEGV, SIGBUS, SIGILL)
319   #endif
320  
321 + uint32  SheepMem::page_size;                            // Size of a native page
322 + uintptr SheepMem::zero_page = 0;                        // Address of ro page filled in with zeros
323 + uintptr SheepMem::base = 0x60000000;            // Address of SheepShaver data
324 + uintptr SheepMem::proc;                                         // Bottom address of SheepShave procedures
325 + uintptr SheepMem::data;                                         // Top of SheepShaver data (stack like storage)
326 +
327  
328   // Prototypes
329 + static bool kernel_data_init(void);
330 + static void kernel_data_exit(void);
331   static void Quit(void);
332   static void *emul_func(void *arg);
333   static void *nvram_func(void *arg);
334   static void *tick_func(void *arg);
335 < #if !EMULATED_PPC
336 < static void sigusr2_handler(int sig, sigcontext_struct *sc);
337 < static void sigsegv_handler(int sig, sigcontext_struct *sc);
338 < static void sigill_handler(int sig, sigcontext_struct *sc);
335 > #if EMULATED_PPC
336 > extern void emul_ppc(uint32 start);
337 > extern void init_emul_ppc(void);
338 > extern void exit_emul_ppc(void);
339 > sigsegv_return_t sigsegv_handler(sigsegv_address_t, sigsegv_address_t);
340 > #else
341 > extern "C" void sigusr2_handler_init(int sig, siginfo_t *sip, void *scp);
342 > extern "C" void sigusr2_handler(int sig, siginfo_t *sip, void *scp);
343 > static void sigsegv_handler(int sig, siginfo_t *sip, void *scp);
344 > static void sigill_handler(int sig, siginfo_t *sip, void *scp);
345   #endif
346  
347  
348   // From asm_linux.S
349 < #if EMULATED_PPC
248 < extern int atomic_add(int *var, int v);
249 < extern int atomic_and(int *var, int v);
250 < extern int atomic_or(int *var, int v);
251 < #else
252 < extern "C" void *get_toc(void);
349 > #if !EMULATED_PPC
350   extern "C" void *get_sp(void);
351 < extern "C" void flush_icache_range(void *start, void *end);
351 > extern "C" void *get_r2(void);
352 > extern "C" void set_r2(void *);
353 > extern "C" void *get_r13(void);
354 > extern "C" void set_r13(void *);
355 > extern "C" void flush_icache_range(uint32 start, uint32 end);
356   extern "C" void jump_to_rom(uint32 entry, uint32 context);
357   extern "C" void quit_emulator(void);
358   extern "C" void execute_68k(uint32 pc, M68kRegisters *r);
# Line 263 | Line 364 | extern void paranoia_check(void);
364   #endif
365  
366  
367 < // Decode LZSS data
368 < static void decode_lzss(const uint8 *src, uint8 *dest, int size)
367 > #if EMULATED_PPC
368 > /*
369 > *  Return signal stack base
370 > */
371 >
372 > uintptr SignalStackBase(void)
373   {
374 <        char dict[0x1000];
375 <        int run_mask = 0, dict_idx = 0xfee;
376 <        for (;;) {
377 <                if (run_mask < 0x100) {
378 <                        // Start new run
379 <                        if (--size < 0)
380 <                                break;
381 <                        run_mask = *src++ | 0xff00;
382 <                }
383 <                bool bit = run_mask & 1;
384 <                run_mask >>= 1;
385 <                if (bit) {
386 <                        // Verbatim copy
387 <                        if (--size < 0)
388 <                                break;
389 <                        int c = *src++;
390 <                        dict[dict_idx++] = c;
391 <                        *dest++ = c;
392 <                        dict_idx &= 0xfff;
393 <                } else {
394 <                        // Copy from dictionary
395 <                        if (--size < 0)
396 <                                break;
397 <                        int idx = *src++;
398 <                        if (--size < 0)
399 <                                break;
400 <                        int cnt = *src++;
401 <                        idx |= (cnt << 4) & 0xf00;
402 <                        cnt = (cnt & 0x0f) + 3;
403 <                        while (cnt--) {
404 <                                char c = dict[idx++];
405 <                                dict[dict_idx++] = c;
406 <                                *dest++ = c;
407 <                                idx &= 0xfff;
408 <                                dict_idx &= 0xfff;
409 <                        }
410 <                }
411 <        }
374 >        return sig_stack + SIG_STACK_SIZE;
375 > }
376 >
377 >
378 > /*
379 > *  Atomic operations
380 > */
381 >
382 > #if HAVE_SPINLOCKS
383 > static spinlock_t atomic_ops_lock = SPIN_LOCK_UNLOCKED;
384 > #else
385 > #define spin_lock(LOCK)
386 > #define spin_unlock(LOCK)
387 > #endif
388 >
389 > int atomic_add(int *var, int v)
390 > {
391 >        spin_lock(&atomic_ops_lock);
392 >        int ret = *var;
393 >        *var += v;
394 >        spin_unlock(&atomic_ops_lock);
395 >        return ret;
396 > }
397 >
398 > int atomic_and(int *var, int v)
399 > {
400 >        spin_lock(&atomic_ops_lock);
401 >        int ret = *var;
402 >        *var &= v;
403 >        spin_unlock(&atomic_ops_lock);
404 >        return ret;
405 > }
406 >
407 > int atomic_or(int *var, int v)
408 > {
409 >        spin_lock(&atomic_ops_lock);
410 >        int ret = *var;
411 >        *var |= v;
412 >        spin_unlock(&atomic_ops_lock);
413 >        return ret;
414 > }
415 > #endif
416 >
417 >
418 > /*
419 > *  Memory management helpers
420 > */
421 >
422 > static inline int vm_mac_acquire(uint32 addr, uint32 size)
423 > {
424 >        return vm_acquire_fixed(Mac2HostAddr(addr), size);
425 > }
426 >
427 > static inline int vm_mac_release(uint32 addr, uint32 size)
428 > {
429 >        return vm_release(Mac2HostAddr(addr), size);
430   }
431  
432  
# Line 323 | Line 446 | static void usage(const char *prg_name)
446   int main(int argc, char **argv)
447   {
448          char str[256];
326        uint32 *boot_globs;
327        int16 i16;
328        int drive, driver;
449          int rom_fd;
450          FILE *proc_file;
451          const char *rom_path;
# Line 335 | Line 455 | int main(int argc, char **argv)
455  
456          // Initialize variables
457          RAMBase = 0;
338        mmap_RAMBase = NULL;
458          tzset();
459  
460          // Print some info
# Line 343 | Line 462 | int main(int argc, char **argv)
462          printf(" %s\n", GetString(STR_ABOUT_TEXT2));
463  
464   #if !EMULATED_PPC
465 + #ifdef SYSTEM_CLOBBERS_R2
466          // Get TOC pointer
467 <        TOC = get_toc();
467 >        TOC = get_r2();
468 > #endif
469 > #ifdef SYSTEM_CLOBBERS_R13
470 >        // Get r13 register
471 >        R13 = get_r13();
472 > #endif
473   #endif
474  
475   #ifdef ENABLE_GTK
# Line 360 | Line 485 | int main(int argc, char **argv)
485          for (int i=1; i<argc; i++) {
486                  if (strcmp(argv[i], "--help") == 0) {
487                          usage(argv[0]);
488 + #ifndef USE_SDL_VIDEO
489                  } else if (strcmp(argv[i], "--display") == 0) {
490                          i++;
491                          if (i < argc)
492                                  x_display_name = strdup(argv[i]);
493 + #endif
494                  } else if (argv[i][0] == '-') {
495                          fprintf(stderr, "Unrecognized option '%s'\n", argv[i]);
496                          usage(argv[0]);
497                  }
498          }
499  
500 + #ifdef USE_SDL
501 +        // Initialize SDL system
502 +        int sdl_flags = 0;
503 + #ifdef USE_SDL_VIDEO
504 +        sdl_flags |= SDL_INIT_VIDEO;
505 + #endif
506 + #ifdef USE_SDL_AUDIO
507 +        sdl_flags |= SDL_INIT_AUDIO;
508 + #endif
509 +        assert(sdl_flags != 0);
510 +        if (SDL_Init(sdl_flags) == -1) {
511 +                char str[256];
512 +                sprintf(str, "Could not initialize SDL: %s.\n", SDL_GetError());
513 +                ErrorAlert(str);
514 +                goto quit;
515 +        }
516 +        atexit(SDL_Quit);
517 + #endif
518 +
519 + #ifndef USE_SDL_VIDEO
520          // Open display
521          x_display = XOpenDisplay(x_display_name);
522          if (x_display == NULL) {
# Line 383 | Line 530 | int main(int argc, char **argv)
530          // Fork out, so we can return from fullscreen mode when things get ugly
531          XF86DGAForkApp(DefaultScreen(x_display));
532   #endif
533 + #endif
534  
535   #ifdef ENABLE_MON
536          // Initialize mon
537          mon_init();
538   #endif
539  
540 + #if !EMULATED_PPC
541 +        // Create and install stacks for signal handlers
542 +        sig_stack.ss_sp = malloc(SIG_STACK_SIZE);
543 +        D(bug("Signal stack at %p\n", sig_stack.ss_sp));
544 +        if (sig_stack.ss_sp == NULL) {
545 +                ErrorAlert(GetString(STR_NOT_ENOUGH_MEMORY_ERR));
546 +                goto quit;
547 +        }
548 +        sig_stack.ss_flags = 0;
549 +        sig_stack.ss_size = SIG_STACK_SIZE;
550 +        if (sigaltstack(&sig_stack, NULL) < 0) {
551 +                sprintf(str, GetString(STR_SIGALTSTACK_ERR), strerror(errno));
552 +                ErrorAlert(str);
553 +                goto quit;
554 +        }
555 +        extra_stack.ss_sp = malloc(SIG_STACK_SIZE);
556 +        D(bug("Extra stack at %p\n", extra_stack.ss_sp));
557 +        if (extra_stack.ss_sp == NULL) {
558 +                ErrorAlert(GetString(STR_NOT_ENOUGH_MEMORY_ERR));
559 +                goto quit;
560 +        }
561 +        extra_stack.ss_flags = 0;
562 +        extra_stack.ss_size = SIG_STACK_SIZE;
563 + #endif
564 +
565 + #if !EMULATED_PPC
566 +        // Install SIGSEGV and SIGBUS handlers
567 +        sigemptyset(&sigsegv_action.sa_mask);   // Block interrupts during SEGV handling
568 +        sigaddset(&sigsegv_action.sa_mask, SIGUSR2);
569 +        sigsegv_action.sa_sigaction = sigsegv_handler;
570 +        sigsegv_action.sa_flags = SA_ONSTACK | SA_SIGINFO;
571 + #ifdef HAVE_SIGNAL_SA_RESTORER
572 +        sigsegv_action.sa_restorer = NULL;
573 + #endif
574 +        if (sigaction(SIGSEGV, &sigsegv_action, NULL) < 0) {
575 +                sprintf(str, GetString(STR_SIGSEGV_INSTALL_ERR), strerror(errno));
576 +                ErrorAlert(str);
577 +                goto quit;
578 +        }
579 +        if (sigaction(SIGBUS, &sigsegv_action, NULL) < 0) {
580 +                sprintf(str, GetString(STR_SIGSEGV_INSTALL_ERR), strerror(errno));
581 +                ErrorAlert(str);
582 +                goto quit;
583 +        }
584 + #else
585 +        // Install SIGSEGV handler for CPU emulator
586 +        if (!sigsegv_install_handler(sigsegv_handler)) {
587 +                sprintf(str, GetString(STR_SIGSEGV_INSTALL_ERR), strerror(errno));
588 +                ErrorAlert(str);
589 +                goto quit;
590 +        }
591 + #endif
592 +
593 +        // Initialize VM system
594 +        vm_init();
595 +
596          // Get system info
597          PVR = 0x00040000;                       // Default: 604
598          CPUClockSpeed = 100000000;      // Default: 100MHz
599          BusClockSpeed = 100000000;      // Default: 100MHz
600 < #if !EMULATED_PPC
600 >        TimebaseSpeed =  25000000;      // Default:  25MHz
601 > #if EMULATED_PPC
602 >        PVR = 0x000c0000;                       // Default: 7400 (with AltiVec)
603 > #elif defined(__APPLE__) && defined(__MACH__)
604 >        proc_file = popen("ioreg -c IOPlatformDevice", "r");
605 >        if (proc_file) {
606 >                char line[256];
607 >                bool powerpc_node = false;
608 >                while (fgets(line, sizeof(line) - 1, proc_file)) {
609 >                        // Read line
610 >                        int len = strlen(line);
611 >                        if (len == 0)
612 >                                continue;
613 >                        line[len - 1] = 0;
614 >
615 >                        // Parse line
616 >                        if (strstr(line, "o PowerPC,"))
617 >                                powerpc_node = true;
618 >                        else if (powerpc_node) {
619 >                                uint32 value;
620 >                                char head[256];
621 >                                if (sscanf(line, "%[ |]\"cpu-version\" = <%x>", head, &value) == 2)
622 >                                        PVR = value;
623 >                                else if (sscanf(line, "%[ |]\"clock-frequency\" = <%x>", head, &value) == 2)
624 >                                        CPUClockSpeed = value;
625 >                                else if (sscanf(line, "%[ |]\"bus-frequency\" = <%x>", head, &value) == 2)
626 >                                        BusClockSpeed = value;
627 >                                else if (sscanf(line, "%[ |]\"timebase-frequency\" = <%x>", head, &value) == 2)
628 >                                        TimebaseSpeed = value;
629 >                                else if (strchr(line, '}'))
630 >                                        powerpc_node = false;
631 >                        }
632 >                }
633 >                fclose(proc_file);
634 >        } else {
635 >                sprintf(str, GetString(STR_PROC_CPUINFO_WARN), strerror(errno));
636 >                WarningAlert(str);
637 >        }
638 > #else
639          proc_file = fopen("/proc/cpuinfo", "r");
640          if (proc_file) {
641 +                // CPU specs from Linux kernel
642 +                // TODO: make it more generic with features (e.g. AltiVec) and
643 +                // cache information and friends for NameRegistry
644 +                static const struct {
645 +                        uint32 pvr_mask;
646 +                        uint32 pvr_value;
647 +                        const char *cpu_name;
648 +                }
649 +                cpu_specs[] = {
650 +                        { 0xffff0000, 0x00010000, "601" },
651 +                        { 0xffff0000, 0x00030000, "603" },
652 +                        { 0xffff0000, 0x00060000, "603e" },
653 +                        { 0xffff0000, 0x00070000, "603ev" },
654 +                        { 0xffff0000, 0x00040000, "604" },
655 +                        { 0xfffff000, 0x00090000, "604e" },
656 +                        { 0xffff0000, 0x00090000, "604r" },
657 +                        { 0xffff0000, 0x000a0000, "604ev" },
658 +                        { 0xffffffff, 0x00084202, "740/750" },
659 +                        { 0xfffff000, 0x00083000, "745/755" },
660 +                        { 0xfffffff0, 0x00080100, "750CX" },
661 +                        { 0xfffffff0, 0x00082200, "750CX" },
662 +                        { 0xfffffff0, 0x00082210, "750CXe" },
663 +                        { 0xffffff00, 0x70000100, "750FX" },
664 +                        { 0xffffffff, 0x70000200, "750FX" },
665 +                        { 0xffff0000, 0x70000000, "750FX" },
666 +                        { 0xffff0000, 0x70020000, "750GX" },
667 +                        { 0xffff0000, 0x00080000, "740/750" },
668 +                        { 0xffffffff, 0x000c1101, "7400 (1.1)" },
669 +                        { 0xffff0000, 0x000c0000, "7400" },
670 +                        { 0xffff0000, 0x800c0000, "7410" },
671 +                        { 0xffffffff, 0x80000200, "7450" },
672 +                        { 0xffffffff, 0x80000201, "7450" },
673 +                        { 0xffff0000, 0x80000000, "7450" },
674 +                        { 0xffffff00, 0x80010100, "7455" },
675 +                        { 0xffffffff, 0x80010200, "7455" },
676 +                        { 0xffff0000, 0x80010000, "7455" },
677 +                        { 0xffff0000, 0x80020000, "7457" },
678 +                        { 0xffff0000, 0x80030000, "7447A" },
679 +                        { 0x7fff0000, 0x00810000, "82xx" },
680 +                        { 0x7fff0000, 0x00820000, "8280" },
681 +                        { 0xffff0000, 0x00400000, "Power3 (630)" },
682 +                        { 0xffff0000, 0x00410000, "Power3 (630+)" },
683 +                        { 0xffff0000, 0x00360000, "I-star" },
684 +                        { 0xffff0000, 0x00370000, "S-star" },
685 +                        { 0xffff0000, 0x00350000, "Power4" },
686 +                        { 0xffff0000, 0x00390000, "PPC970" },
687 +                        { 0xffff0000, 0x003a0000, "POWER5" },
688 +                        { 0, 0, 0 }
689 +                };
690 +
691                  char line[256];
692                  while(fgets(line, 255, proc_file)) {
693                          // Read line
# Line 407 | Line 699 | int main(int argc, char **argv)
699                          // Parse line
700                          int i;
701                          char value[256];
702 <                        if (sscanf(line, "cpu : %s", value) == 1) {
703 <                                if (strcmp(value, "601") == 0)
704 <                                        PVR = 0x00010000;
705 <                                else if (strcmp(value, "603") == 0)
706 <                                        PVR = 0x00030000;
707 <                                else if (strcmp(value, "604") == 0)
708 <                                        PVR = 0x00040000;
709 <                                else if (strcmp(value, "603e") == 0)
710 <                                        PVR = 0x00060000;
711 <                                else if (strcmp(value, "603ev") == 0)
712 <                                        PVR = 0x00070000;
421 <                                else if (strcmp(value, "604e") == 0)
422 <                                        PVR = 0x00090000;
423 <                                else if (strcmp(value, "604ev5") == 0)
424 <                                        PVR = 0x000a0000;
425 <                                else if (strcmp(value, "750") == 0)
426 <                                        PVR = 0x00080000;
427 <                                else if (strcmp(value, "821") == 0)
428 <                                        PVR = 0x00320000;
429 <                                else if (strcmp(value, "860") == 0)
430 <                                        PVR = 0x00500000;
431 <                                else
702 >                        if (sscanf(line, "cpu : %[0-9A-Za-a]", value) == 1) {
703 >                                // Search by name
704 >                                const char *cpu_name = NULL;
705 >                                for (int i = 0; cpu_specs[i].pvr_mask != 0; i++) {
706 >                                        if (strcmp(cpu_specs[i].cpu_name, value) == 0) {
707 >                                                cpu_name = cpu_specs[i].cpu_name;
708 >                                                PVR = cpu_specs[i].pvr_value;
709 >                                                break;
710 >                                        }
711 >                                }
712 >                                if (cpu_name == NULL)
713                                          printf("WARNING: Unknown CPU type '%s', assuming 604\n", value);
714 +                                else
715 +                                        printf("Found a PowerPC %s processor\n", cpu_name);
716                          }
717                          if (sscanf(line, "clock : %dMHz", &i) == 1)
718                                  CPUClockSpeed = BusClockSpeed = i * 1000000;
# Line 439 | Line 722 | int main(int argc, char **argv)
722                  sprintf(str, GetString(STR_PROC_CPUINFO_WARN), strerror(errno));
723                  WarningAlert(str);
724          }
725 +
726 +        // Get actual bus frequency
727 +        proc_file = fopen("/proc/device-tree/clock-frequency", "r");
728 +        if (proc_file) {
729 +                union { uint8 b[4]; uint32 l; } value;
730 +                if (fread(value.b, sizeof(value), 1, proc_file) == 1)
731 +                        BusClockSpeed = value.l;
732 +                fclose(proc_file);
733 +        }
734 +
735 +        // Get actual timebase frequency
736 +        TimebaseSpeed = BusClockSpeed / 4;
737 +        DIR *cpus_dir;
738 +        if ((cpus_dir = opendir("/proc/device-tree/cpus")) != NULL) {
739 +                struct dirent *cpu_entry;
740 +                while ((cpu_entry = readdir(cpus_dir)) != NULL) {
741 +                        if (strstr(cpu_entry->d_name, "PowerPC,") == cpu_entry->d_name) {
742 +                                char timebase_freq_node[256];
743 +                                sprintf(timebase_freq_node, "/proc/device-tree/cpus/%s/timebase-frequency", cpu_entry->d_name);
744 +                                proc_file = fopen(timebase_freq_node, "r");
745 +                                if (proc_file) {
746 +                                        union { uint8 b[4]; uint32 l; } value;
747 +                                        if (fread(value.b, sizeof(value), 1, proc_file) == 1)
748 +                                                TimebaseSpeed = value.l;
749 +                                        fclose(proc_file);
750 +                                }
751 +                        }
752 +                }
753 +                closedir(cpus_dir);
754 +        }
755   #endif
756 +        // Remap any newer G4/G5 processor to plain G4 for compatibility
757 +        switch (PVR >> 16) {
758 +        case 0x8000:                            // 7450
759 +        case 0x8001:                            // 7455
760 +        case 0x8002:                            // 7457
761 +        case 0x0039:                            //  970
762 +                PVR = 0x000c0000;               // 7400
763 +                break;
764 +        }
765          D(bug("PVR: %08x (assumed)\n", PVR));
766  
767          // Init system routines
# Line 463 | Line 785 | int main(int argc, char **argv)
785                  goto quit;
786          }
787  
788 + #ifndef PAGEZERO_HACK
789          // Create Low Memory area (0x0000..0x3000)
790 <        if (mmap((char *)0x0000, 0x3000, PROT_READ | PROT_WRITE, MAP_FIXED | MAP_PRIVATE, zero_fd, 0) == (void *)-1) {
790 >        if (vm_mac_acquire(0, 0x3000) < 0) {
791                  sprintf(str, GetString(STR_LOW_MEM_MMAP_ERR), strerror(errno));
792                  ErrorAlert(str);
793                  goto quit;
794          }
795          lm_area_mapped = true;
796 + #endif
797  
798          // Create areas for Kernel Data
799 <        kernel_area = shmget(IPC_PRIVATE, KERNEL_AREA_SIZE, 0600);
800 <        if (kernel_area == -1) {
801 <                sprintf(str, GetString(STR_KD_SHMGET_ERR), strerror(errno));
799 >        if (!kernel_data_init())
800 >                goto quit;
801 >        kernel_data = (KernelData *)Mac2HostAddr(KERNEL_DATA_BASE);
802 >        emulator_data = &kernel_data->ed;
803 >        KernelDataAddr = KERNEL_DATA_BASE;
804 >        D(bug("Kernel Data at %p (%08x)\n", kernel_data, KERNEL_DATA_BASE));
805 >        D(bug("Emulator Data at %p (%08x)\n", emulator_data, KERNEL_DATA_BASE + offsetof(KernelData, ed)));
806 >
807 >        // Create area for DR Cache
808 >        if (vm_mac_acquire(DR_EMULATOR_BASE, DR_EMULATOR_SIZE) < 0) {
809 >                sprintf(str, GetString(STR_DR_EMULATOR_MMAP_ERR), strerror(errno));
810                  ErrorAlert(str);
811                  goto quit;
812          }
813 <        if (shmat(kernel_area, (void *)KERNEL_DATA_BASE, 0) < 0) {
814 <                sprintf(str, GetString(STR_KD_SHMAT_ERR), strerror(errno));
813 >        dr_emulator_area_mapped = true;
814 >        if (vm_mac_acquire(DR_CACHE_BASE, DR_CACHE_SIZE) < 0) {
815 >                sprintf(str, GetString(STR_DR_CACHE_MMAP_ERR), strerror(errno));
816                  ErrorAlert(str);
817                  goto quit;
818          }
819 <        if (shmat(kernel_area, (void *)KERNEL_DATA2_BASE, 0) < 0) {
820 <                sprintf(str, GetString(STR_KD2_SHMAT_ERR), strerror(errno));
819 >        dr_cache_area_mapped = true;
820 > #if !EMULATED_PPC
821 >        if (vm_protect((char *)DR_CACHE_BASE, DR_CACHE_SIZE, VM_PAGE_READ | VM_PAGE_WRITE | VM_PAGE_EXECUTE) < 0) {
822 >                sprintf(str, GetString(STR_DR_CACHE_MMAP_ERR), strerror(errno));
823 >                ErrorAlert(str);
824 >                goto quit;
825 >        }
826 > #endif
827 >        DRCacheAddr = DR_CACHE_BASE;
828 >        D(bug("DR Cache at %p\n", DRCacheAddr));
829 >
830 >        // Create area for SheepShaver data
831 >        if (!SheepMem::Init()) {
832 >                sprintf(str, GetString(STR_SHEEP_MEM_MMAP_ERR), strerror(errno));
833                  ErrorAlert(str);
834                  goto quit;
835          }
491        kernel_data = (KernelData *)0x68ffe000;
492        emulator_data = &kernel_data->ed;
493        KernelDataAddr = (uint32)kernel_data;
494        D(bug("Kernel Data at %p, Emulator Data at %p\n", kernel_data, emulator_data));
836  
837          // Create area for Mac ROM
838 <        if (mmap((char *)ROM_BASE, ROM_AREA_SIZE, PROT_EXEC | PROT_READ | PROT_WRITE, MAP_FIXED | MAP_PRIVATE, zero_fd, 0) == (void *)-1) {
838 >        if (vm_mac_acquire(ROM_BASE, ROM_AREA_SIZE) < 0) {
839                  sprintf(str, GetString(STR_ROM_MMAP_ERR), strerror(errno));
840                  ErrorAlert(str);
841                  goto quit;
842          }
843 +        ROMBaseHost = Mac2HostAddr(ROM_BASE);
844 + #if !EMULATED_PPC
845 +        if (vm_protect(ROMBaseHost, ROM_AREA_SIZE, VM_PAGE_READ | VM_PAGE_WRITE | VM_PAGE_EXECUTE) < 0) {
846 +                sprintf(str, GetString(STR_ROM_MMAP_ERR), strerror(errno));
847 +                ErrorAlert(str);
848 +                goto quit;
849 +        }
850 + #endif
851          rom_area_mapped = true;
852 <        D(bug("ROM area at %08x\n", ROM_BASE));
852 >        D(bug("ROM area at %p (%08x)\n", ROMBaseHost, ROM_BASE));
853  
854          // Create area for Mac RAM
855          RAMSize = PrefsFindInt32("ramsize");
# Line 509 | Line 858 | int main(int argc, char **argv)
858                  RAMSize = 8*1024*1024;
859          }
860  
861 <        mmap_RAMBase = mmap((void *)0x20000000, RAMSize, PROT_EXEC | PROT_READ | PROT_WRITE, MAP_FIXED | MAP_PRIVATE, zero_fd, 0);
513 <        if (mmap_RAMBase == (void *)-1) {
861 >        if (vm_mac_acquire(RAM_BASE, RAMSize) < 0) {
862                  sprintf(str, GetString(STR_RAM_MMAP_ERR), strerror(errno));
863                  ErrorAlert(str);
864                  goto quit;
865          }
866 <        RAMBase = (uint32)mmap_RAMBase;
866 >        RAMBaseHost = Mac2HostAddr(RAM_BASE);
867 > #if !EMULATED_PPC
868 >        if (vm_protect(RAMBaseHost, RAMSize, VM_PAGE_READ | VM_PAGE_WRITE | VM_PAGE_EXECUTE) < 0) {
869 >                sprintf(str, GetString(STR_RAM_MMAP_ERR), strerror(errno));
870 >                ErrorAlert(str);
871 >                goto quit;
872 >        }
873 > #endif
874 >        RAMBase = RAM_BASE;
875          ram_area_mapped = true;
876 <        D(bug("RAM area at %08x\n", RAMBase));
876 >        D(bug("RAM area at %p (%08x)\n", RAMBaseHost, RAMBase));
877  
878          if (RAMBase > ROM_BASE) {
879                  ErrorAlert(GetString(STR_RAM_HIGHER_THAN_ROM_ERR));
# Line 540 | Line 896 | int main(int argc, char **argv)
896          rom_tmp = new uint8[ROM_SIZE];
897          actual = read(rom_fd, (void *)rom_tmp, ROM_SIZE);
898          close(rom_fd);
899 <        if (actual == ROM_SIZE) {
900 <                // Plain ROM image
901 <                memcpy((void *)ROM_BASE, rom_tmp, ROM_SIZE);
902 <                delete[] rom_tmp;
547 <        } else {
548 <                if (strncmp((char *)rom_tmp, "<CHRP-BOOT>", 11) == 0) {
549 <                        // CHRP compressed ROM image
550 <                        D(bug("CHRP ROM image\n"));
551 <                        uint32 lzss_offset, lzss_size;
552 <
553 <                        char *s = strstr((char *)rom_tmp, "constant lzss-offset");
554 <                        if (s == NULL) {
555 <                                ErrorAlert(GetString(STR_ROM_SIZE_ERR));
556 <                                goto quit;
557 <                        }
558 <                        s -= 7;
559 <                        if (sscanf(s, "%06x", &lzss_offset) != 1) {
560 <                                ErrorAlert(GetString(STR_ROM_SIZE_ERR));
561 <                                goto quit;
562 <                        }
563 <                        s = strstr((char *)rom_tmp, "constant lzss-size");
564 <                        if (s == NULL) {
565 <                                ErrorAlert(GetString(STR_ROM_SIZE_ERR));
566 <                                goto quit;
567 <                        }
568 <                        s -= 7;
569 <                        if (sscanf(s, "%06x", &lzss_size) != 1) {
570 <                                ErrorAlert(GetString(STR_ROM_SIZE_ERR));
571 <                                goto quit;
572 <                        }
573 <                        D(bug("Offset of compressed data: %08x\n", lzss_offset));
574 <                        D(bug("Size of compressed data: %08x\n", lzss_size));
575 <
576 <                        D(bug("Uncompressing ROM...\n"));
577 <                        decode_lzss(rom_tmp + lzss_offset, (uint8 *)ROM_BASE, lzss_size);
578 <                        delete[] rom_tmp;
579 <                } else if (rom_size != 4*1024*1024) {
899 >        
900 >        // Decode Mac ROM
901 >        if (!DecodeROM(rom_tmp, actual)) {
902 >                if (rom_size != 4*1024*1024) {
903                          ErrorAlert(GetString(STR_ROM_SIZE_ERR));
904                          goto quit;
905                  } else {
# Line 584 | Line 907 | int main(int argc, char **argv)
907                          goto quit;
908                  }
909          }
910 +        delete[] rom_tmp;
911  
912 <        // Load NVRAM
913 <        XPRAMInit();
590 <
591 <        // Set boot volume
592 <        drive = PrefsFindInt32("bootdrive");
593 <        XPRAM[0x1378] = i16 >> 8;
594 <        XPRAM[0x1379] = i16 & 0xff;
595 <        driver = PrefsFindInt32("bootdriver");
596 <        XPRAM[0x137a] = i16 >> 8;
597 <        XPRAM[0x137b] = i16 & 0xff;
598 <
599 <        // Create BootGlobs at top of Mac memory
600 <        memset((void *)(RAMBase + RAMSize - 4096), 0, 4096);
601 <        BootGlobsAddr = RAMBase + RAMSize - 0x1c;
602 <        boot_globs = (uint32 *)BootGlobsAddr;
603 <        boot_globs[-5] = htonl(RAMBase + RAMSize);      // MemTop
604 <        boot_globs[0] = htonl(RAMBase);                         // First RAM bank
605 <        boot_globs[1] = htonl(RAMSize);
606 <        boot_globs[2] = htonl((uint32)-1);                      // End of bank table
607 <
608 <        // Init drivers
609 <        SonyInit();
610 <        DiskInit();
611 <        CDROMInit();
612 <        SCSIInit();
613 <
614 <        // Init external file system
615 <        ExtFSInit();
616 <
617 <        // Init audio
618 <        AudioInit();
619 <
620 <        // Init network
621 <        EtherInit();
622 <
623 <        // Init serial ports
624 <        SerialInit();
625 <
626 <        // Init Time Manager
627 <        TimerInit();
628 <
629 <        // Init clipboard
630 <        ClipInit();
631 <
632 <        // Init video
633 <        if (!VideoInit())
634 <                goto quit;
635 <
636 <        // Install ROM patches
637 <        if (!PatchROM()) {
638 <                ErrorAlert(GetString(STR_UNSUPPORTED_ROM_TYPE_ERR));
912 >        // Initialize everything
913 >        if (!InitAll())
914                  goto quit;
915 <        }
915 >        D(bug("Initialization complete\n"));
916  
917          // Clear caches (as we loaded and patched code) and write protect ROM
918   #if !EMULATED_PPC
919 <        MakeExecutable(0, (void *)ROM_BASE, ROM_AREA_SIZE);
645 < #endif
646 <        mprotect((char *)ROM_BASE, ROM_AREA_SIZE, PROT_EXEC | PROT_READ);
647 <
648 <        // Initialize Kernel Data
649 <        memset(kernel_data, 0, sizeof(KernelData));
650 <        if (ROMType == ROMTYPE_NEWWORLD) {
651 <                static uint32 of_dev_tree[4] = {0, 0, 0, 0};
652 <                static uint8 vector_lookup_tbl[128];
653 <                static uint8 vector_mask_tbl[64];
654 <                memset((uint8 *)kernel_data + 0xb80, 0x3d, 0x80);
655 <                memset(vector_lookup_tbl, 0, 128);
656 <                memset(vector_mask_tbl, 0, 64);
657 <                kernel_data->v[0xb80 >> 2] = htonl(ROM_BASE);
658 <                kernel_data->v[0xb84 >> 2] = htonl((uint32)of_dev_tree);        // OF device tree base
659 <                kernel_data->v[0xb90 >> 2] = htonl((uint32)vector_lookup_tbl);
660 <                kernel_data->v[0xb94 >> 2] = htonl((uint32)vector_mask_tbl);
661 <                kernel_data->v[0xb98 >> 2] = htonl(ROM_BASE);                           // OpenPIC base
662 <                kernel_data->v[0xbb0 >> 2] = htonl(0);                                          // ADB base
663 <                kernel_data->v[0xc20 >> 2] = htonl(RAMSize);
664 <                kernel_data->v[0xc24 >> 2] = htonl(RAMSize);
665 <                kernel_data->v[0xc30 >> 2] = htonl(RAMSize);
666 <                kernel_data->v[0xc34 >> 2] = htonl(RAMSize);
667 <                kernel_data->v[0xc38 >> 2] = htonl(0x00010020);
668 <                kernel_data->v[0xc3c >> 2] = htonl(0x00200001);
669 <                kernel_data->v[0xc40 >> 2] = htonl(0x00010000);
670 <                kernel_data->v[0xc50 >> 2] = htonl(RAMBase);
671 <                kernel_data->v[0xc54 >> 2] = htonl(RAMSize);
672 <                kernel_data->v[0xf60 >> 2] = htonl(PVR);
673 <                kernel_data->v[0xf64 >> 2] = htonl(CPUClockSpeed);
674 <                kernel_data->v[0xf68 >> 2] = htonl(BusClockSpeed);
675 <                kernel_data->v[0xf6c >> 2] = htonl(CPUClockSpeed);
676 <        } else {
677 <                kernel_data->v[0xc80 >> 2] = htonl(RAMSize);
678 <                kernel_data->v[0xc84 >> 2] = htonl(RAMSize);
679 <                kernel_data->v[0xc90 >> 2] = htonl(RAMSize);
680 <                kernel_data->v[0xc94 >> 2] = htonl(RAMSize);
681 <                kernel_data->v[0xc98 >> 2] = htonl(0x00010020);
682 <                kernel_data->v[0xc9c >> 2] = htonl(0x00200001);
683 <                kernel_data->v[0xca0 >> 2] = htonl(0x00010000);
684 <                kernel_data->v[0xcb0 >> 2] = htonl(RAMBase);
685 <                kernel_data->v[0xcb4 >> 2] = htonl(RAMSize);
686 <                kernel_data->v[0xf80 >> 2] = htonl(PVR);
687 <                kernel_data->v[0xf84 >> 2] = htonl(CPUClockSpeed);
688 <                kernel_data->v[0xf88 >> 2] = htonl(BusClockSpeed);
689 <                kernel_data->v[0xf8c >> 2] = htonl(CPUClockSpeed);
690 <        }
691 <
692 <        // Initialize extra low memory
693 <        D(bug("Initializing Low Memory...\n"));
694 <        memset(NULL, 0, 0x3000);
695 <        WriteMacInt32(XLM_SIGNATURE, FOURCC('B','a','a','h'));                  // Signature to detect SheepShaver
696 <        WriteMacInt32(XLM_KERNEL_DATA, (uint32)kernel_data);                    // For trap replacement routines
697 <        WriteMacInt32(XLM_PVR, PVR);                                                                    // Theoretical PVR
698 <        WriteMacInt32(XLM_BUS_CLOCK, BusClockSpeed);                                    // For DriverServicesLib patch
699 <        WriteMacInt16(XLM_EXEC_RETURN_OPCODE, M68K_EXEC_RETURN);                // For Execute68k() (RTS from the executed 68k code will jump here and end 68k mode)
700 < #if !EMULATED_PPC
701 <        WriteMacInt32(XLM_TOC, (uint32)TOC);                                                    // TOC pointer of emulator
702 <        WriteMacInt32(XLM_ETHER_INIT, (uint32)InitStreamModule);                // DLPI ethernet driver functions
703 <        WriteMacInt32(XLM_ETHER_TERM, (uint32)TerminateStreamModule);
704 <        WriteMacInt32(XLM_ETHER_OPEN, (uint32)ether_open);
705 <        WriteMacInt32(XLM_ETHER_CLOSE, (uint32)ether_close);
706 <        WriteMacInt32(XLM_ETHER_WPUT, (uint32)ether_wput);
707 <        WriteMacInt32(XLM_ETHER_RSRV, (uint32)ether_rsrv);
708 <        WriteMacInt32(XLM_VIDEO_DOIO, (uint32)VideoDoDriverIO);
919 >        flush_icache_range(ROM_BASE, ROM_BASE + ROM_AREA_SIZE);
920   #endif
921 <        D(bug("Low Memory initialized\n"));
921 >        vm_protect(ROMBaseHost, ROM_AREA_SIZE, VM_PAGE_READ | VM_PAGE_EXECUTE);
922  
923          // Start 60Hz thread
924 +        tick_thread_cancel = false;
925          tick_thread_active = (pthread_create(&tick_thread, NULL, tick_func, NULL) == 0);
926          D(bug("Tick thread installed (%ld)\n", tick_thread));
927  
928          // Start NVRAM watchdog thread
929          memcpy(last_xpram, XPRAM, XPRAM_SIZE);
930 +        nvram_thread_cancel = false;
931          nvram_thread_active = (pthread_create(&nvram_thread, NULL, nvram_func, NULL) == 0);
932          D(bug("NVRAM thread installed (%ld)\n", nvram_thread));
933  
934   #if !EMULATED_PPC
722        // Create and install stacks for signal handlers
723        sig_stack = malloc(SIG_STACK_SIZE);
724        D(bug("Signal stack at %p\n", sig_stack));
725        if (sig_stack == NULL) {
726                ErrorAlert(GetString(STR_NOT_ENOUGH_MEMORY_ERR));
727                goto quit;
728        }
729        extra_stack = malloc(SIG_STACK_SIZE);
730        D(bug("Extra stack at %p\n", extra_stack));
731        if (extra_stack == NULL) {
732                ErrorAlert(GetString(STR_NOT_ENOUGH_MEMORY_ERR));
733                goto quit;
734        }
735        struct sigaltstack new_stack;
736        new_stack.ss_sp = sig_stack;
737        new_stack.ss_flags = 0;
738        new_stack.ss_size = SIG_STACK_SIZE;
739        if (sigaltstack(&new_stack, NULL) < 0) {
740                sprintf(str, GetString(STR_SIGALTSTACK_ERR), strerror(errno));
741                ErrorAlert(str);
742                goto quit;
743        }
744 #endif
745
746 #if !EMULATED_PPC
747        // Install SIGSEGV handler
748        sigemptyset(&sigsegv_action.sa_mask);   // Block interrupts during SEGV handling
749        sigaddset(&sigsegv_action.sa_mask, SIGUSR2);
750        sigsegv_action.sa_handler = (__sighandler_t)sigsegv_handler;
751        sigsegv_action.sa_flags = SA_ONSTACK;
752        sigsegv_action.sa_restorer = NULL;
753        if (sigaction(SIGSEGV, &sigsegv_action, NULL) < 0) {
754                sprintf(str, GetString(STR_SIGSEGV_INSTALL_ERR), strerror(errno));
755                ErrorAlert(str);
756                goto quit;
757        }
758
935          // Install SIGILL handler
936          sigemptyset(&sigill_action.sa_mask);    // Block interrupts during ILL handling
937          sigaddset(&sigill_action.sa_mask, SIGUSR2);
938 <        sigill_action.sa_handler = (__sighandler_t)sigill_handler;
939 <        sigill_action.sa_flags = SA_ONSTACK;
938 >        sigill_action.sa_sigaction = sigill_handler;
939 >        sigill_action.sa_flags = SA_ONSTACK | SA_SIGINFO;
940 > #ifdef HAVE_SIGNAL_SA_RESTORER
941          sigill_action.sa_restorer = NULL;
942 + #endif
943          if (sigaction(SIGILL, &sigill_action, NULL) < 0) {
944                  sprintf(str, GetString(STR_SIGILL_INSTALL_ERR), strerror(errno));
945                  ErrorAlert(str);
946                  goto quit;
947          }
948 + #endif
949  
950 + #if !EMULATED_PPC
951          // Install interrupt signal handler
952          sigemptyset(&sigusr2_action.sa_mask);
953 <        sigusr2_action.sa_handler = (__sighandler_t)sigusr2_handler;
954 <        sigusr2_action.sa_flags = SA_ONSTACK | SA_RESTART;
953 >        sigusr2_action.sa_sigaction = sigusr2_handler_init;
954 >        sigusr2_action.sa_flags = SA_ONSTACK | SA_RESTART | SA_SIGINFO;
955 > #ifdef HAVE_SIGNAL_SA_RESTORER
956          sigusr2_action.sa_restorer = NULL;
957 + #endif
958          if (sigaction(SIGUSR2, &sigusr2_action, NULL) < 0) {
959                  sprintf(str, GetString(STR_SIGUSR2_INSTALL_ERR), strerror(errno));
960                  ErrorAlert(str);
# Line 797 | Line 979 | quit:
979  
980   static void Quit(void)
981   {
982 + #if EMULATED_PPC
983 +        // Exit PowerPC emulation
984 +        exit_emul_ppc();
985 + #endif
986 +
987          // Stop 60Hz thread
988          if (tick_thread_active) {
989 +                tick_thread_cancel = true;
990                  pthread_cancel(tick_thread);
991                  pthread_join(tick_thread, NULL);
992          }
993  
994          // Stop NVRAM watchdog thread
995          if (nvram_thread_active) {
996 +                nvram_thread_cancel = true;
997                  pthread_cancel(nvram_thread);
998                  pthread_join(nvram_thread, NULL);
999          }
1000  
1001   #if !EMULATED_PPC
1002 <        // Uninstall SIGSEGV handler
1002 >        // Uninstall SIGSEGV and SIGBUS handlers
1003          sigemptyset(&sigsegv_action.sa_mask);
1004          sigsegv_action.sa_handler = SIG_DFL;
1005          sigsegv_action.sa_flags = 0;
1006          sigaction(SIGSEGV, &sigsegv_action, NULL);
1007 +        sigaction(SIGBUS, &sigsegv_action, NULL);
1008  
1009          // Uninstall SIGILL handler
1010          sigemptyset(&sigill_action.sa_mask);
1011          sigill_action.sa_handler = SIG_DFL;
1012          sigill_action.sa_flags = 0;
1013          sigaction(SIGILL, &sigill_action, NULL);
824 #endif
825
826        // Save NVRAM
827        XPRAMExit();
1014  
1015 <        // Exit clipboard
1016 <        ClipExit();
1017 <
1018 <        // Exit Time Manager
1019 <        TimerExit();
1020 <
835 <        // Exit serial
836 <        SerialExit();
837 <
838 <        // Exit network
839 <        EtherExit();
840 <
841 <        // Exit audio
842 <        AudioExit();
843 <
844 <        // Exit video
845 <        VideoExit();
1015 >        // Delete stacks for signal handlers
1016 >        if (sig_stack.ss_sp)
1017 >                free(sig_stack.ss_sp);
1018 >        if (extra_stack.ss_sp)
1019 >                free(extra_stack.ss_sp);
1020 > #endif
1021  
1022 <        // Exit external file system
1023 <        ExtFSExit();
1022 >        // Deinitialize everything
1023 >        ExitAll();
1024  
1025 <        // Exit drivers
1026 <        SCSIExit();
852 <        CDROMExit();
853 <        DiskExit();
854 <        SonyExit();
1025 >        // Delete SheepShaver globals
1026 >        SheepMem::Exit();
1027  
1028          // Delete RAM area
1029          if (ram_area_mapped)
1030 <                munmap(mmap_RAMBase, RAMSize);
1030 >                vm_mac_release(RAM_BASE, RAMSize);
1031  
1032          // Delete ROM area
1033          if (rom_area_mapped)
1034 <                munmap((char *)ROM_BASE, ROM_AREA_SIZE);
1034 >                vm_mac_release(ROM_BASE, ROM_AREA_SIZE);
1035 >
1036 >        // Delete DR cache areas
1037 >        if (dr_emulator_area_mapped)
1038 >                vm_mac_release(DR_EMULATOR_BASE, DR_EMULATOR_SIZE);
1039 >        if (dr_cache_area_mapped)
1040 >                vm_mac_release(DR_CACHE_BASE, DR_CACHE_SIZE);
1041  
1042          // Delete Kernel Data area
1043 <        if (kernel_area >= 0) {
866 <                shmdt((void *)KERNEL_DATA_BASE);
867 <                shmdt((void *)KERNEL_DATA2_BASE);
868 <                shmctl(kernel_area, IPC_RMID, NULL);
869 <        }
1043 >        kernel_data_exit();
1044  
1045          // Delete Low Memory area
1046          if (lm_area_mapped)
1047 <                munmap((char *)0x0000, 0x3000);
1047 >                vm_mac_release(0, 0x3000);
1048  
1049          // Close /dev/zero
1050          if (zero_fd > 0)
# Line 888 | Line 1062 | static void Quit(void)
1062   #endif
1063  
1064          // Close X11 server connection
1065 + #ifndef USE_SDL_VIDEO
1066          if (x_display)
1067                  XCloseDisplay(x_display);
1068 + #endif
1069  
1070          exit(0);
1071   }
1072  
1073  
1074   /*
1075 + *  Initialize Kernel Data segments
1076 + */
1077 +
1078 + #if defined(__CYGWIN__)
1079 + #define WIN32_LEAN_AND_MEAN
1080 + #include <windows.h>
1081 +
1082 + static HANDLE kernel_handle;                            // Shared memory handle for Kernel Data
1083 + static DWORD allocation_granule;                        // Minimum size of allocateable are (64K)
1084 + static DWORD kernel_area_size;                          // Size of Kernel Data area
1085 + #endif
1086 +
1087 + static bool kernel_data_init(void)
1088 + {
1089 +        char str[256];
1090 + #ifdef _WIN32
1091 +        SYSTEM_INFO si;
1092 +        GetSystemInfo(&si);
1093 +        allocation_granule = si.dwAllocationGranularity;
1094 +        kernel_area_size = (KERNEL_AREA_SIZE + allocation_granule - 1) & -allocation_granule;
1095 +
1096 +        char rcs[10];
1097 +        LPVOID kernel_addr;
1098 +        kernel_handle = CreateFileMapping(INVALID_HANDLE_VALUE, NULL, PAGE_READWRITE, 0, kernel_area_size, NULL);
1099 +        if (kernel_handle == NULL) {
1100 +                sprintf(rcs, "%d", GetLastError());
1101 +                sprintf(str, GetString(STR_KD_SHMGET_ERR), rcs);
1102 +                ErrorAlert(str);
1103 +                return false;
1104 +        }
1105 +        kernel_addr = (LPVOID)Mac2HostAddr(KERNEL_DATA_BASE & -allocation_granule);
1106 +        if (MapViewOfFileEx(kernel_handle, FILE_MAP_READ | FILE_MAP_WRITE, 0, 0, kernel_area_size, kernel_addr) != kernel_addr) {
1107 +                sprintf(rcs, "%d", GetLastError());
1108 +                sprintf(str, GetString(STR_KD_SHMAT_ERR), rcs);
1109 +                ErrorAlert(str);
1110 +                return false;
1111 +        }
1112 +        kernel_addr = (LPVOID)Mac2HostAddr(KERNEL_DATA2_BASE & -allocation_granule);
1113 +        if (MapViewOfFileEx(kernel_handle, FILE_MAP_READ | FILE_MAP_WRITE, 0, 0, kernel_area_size, kernel_addr) != kernel_addr) {
1114 +                sprintf(rcs, "%d", GetLastError());
1115 +                sprintf(str, GetString(STR_KD2_SHMAT_ERR), rcs);
1116 +                ErrorAlert(str);
1117 +                return false;
1118 +        }
1119 + #else
1120 +        kernel_area = shmget(IPC_PRIVATE, KERNEL_AREA_SIZE, 0600);
1121 +        if (kernel_area == -1) {
1122 +                sprintf(str, GetString(STR_KD_SHMGET_ERR), strerror(errno));
1123 +                ErrorAlert(str);
1124 +                return false;
1125 +        }
1126 +        if (shmat(kernel_area, Mac2HostAddr(KERNEL_DATA_BASE), 0) < 0) {
1127 +                sprintf(str, GetString(STR_KD_SHMAT_ERR), strerror(errno));
1128 +                ErrorAlert(str);
1129 +                return false;
1130 +        }
1131 +        if (shmat(kernel_area, Mac2HostAddr(KERNEL_DATA2_BASE), 0) < 0) {
1132 +                sprintf(str, GetString(STR_KD2_SHMAT_ERR), strerror(errno));
1133 +                ErrorAlert(str);
1134 +                return false;
1135 +        }
1136 + #endif
1137 +        return true;
1138 + }
1139 +
1140 +
1141 + /*
1142 + *  Deallocate Kernel Data segments
1143 + */
1144 +
1145 + static void kernel_data_exit(void)
1146 + {
1147 + #ifdef _WIN32
1148 +        if (kernel_handle) {
1149 +                UnmapViewOfFile(Mac2HostAddr(KERNEL_DATA_BASE & -allocation_granule));
1150 +                UnmapViewOfFile(Mac2HostAddr(KERNEL_DATA2_BASE & -allocation_granule));
1151 +                CloseHandle(kernel_handle);
1152 +        }
1153 + #else
1154 +        if (kernel_area >= 0) {
1155 +                shmdt(Mac2HostAddr(KERNEL_DATA_BASE));
1156 +                shmdt(Mac2HostAddr(KERNEL_DATA2_BASE));
1157 +                shmctl(kernel_area, IPC_RMID, NULL);
1158 +        }
1159 + #endif
1160 + }
1161 +
1162 +
1163 + /*
1164   *  Jump into Mac ROM, start 680x0 emulator
1165   */
1166  
1167   #if EMULATED_PPC
903 extern void emul_ppc(uint32 start);
904 extern void init_emul_ppc(void);
1168   void jump_to_rom(uint32 entry)
1169   {
1170          init_emul_ppc();
# Line 970 | Line 1233 | void Execute68kTrap(uint16 trap, M68kReg
1233  
1234  
1235   /*
973 *  Execute PPC code from EMUL_OP routine (real mode switch)
974 */
975
976 void ExecutePPC(void (*func)())
977 {
978        uint32 tvect[2] = {(uint32)func, 0};    // Fake TVECT
979        RoutineDescriptor desc = BUILD_PPC_ROUTINE_DESCRIPTOR(0, tvect);
980        M68kRegisters r;
981        Execute68k((uint32)&desc, &r);
982 }
983
984
985 /*
1236   *  Quit emulator (cause return from jump_to_rom)
1237   */
1238  
# Line 997 | Line 1247 | void QuitEmulator(void)
1247  
1248  
1249   /*
1000 *  Pause/resume emulator
1001 */
1002
1003 void PauseEmulator(void)
1004 {
1005        pthread_kill(emul_thread, SIGSTOP);
1006 }
1007
1008 void ResumeEmulator(void)
1009 {
1010        pthread_kill(emul_thread, SIGCONT);
1011 }
1012
1013
1014 /*
1250   *  Dump 68k registers
1251   */
1252  
# Line 1039 | Line 1274 | void Dump68kRegs(M68kRegisters *r)
1274   *  Make code executable
1275   */
1276  
1277 < void MakeExecutable(int dummy, void *start, uint32 length)
1277 > void MakeExecutable(int dummy, uint32 start, uint32 length)
1278   {
1279 < #if !EMULATED_PPC
1045 <        if (((uint32)start >= ROM_BASE) && ((uint32)start < (ROM_BASE + ROM_SIZE)))
1279 >        if ((start >= ROM_BASE) && (start < (ROM_BASE + ROM_SIZE)))
1280                  return;
1281 <        flush_icache_range(start, (void *)((uint32)start + length));
1281 > #if EMULATED_PPC
1282 >        FlushCodeCache(start, start + length);
1283 > #else
1284 >        flush_icache_range(start, start + length);
1285   #endif
1286   }
1287  
1288  
1289   /*
1290 < *  Patch things after system startup (gets called by disk driver accRun routine)
1290 > *  NVRAM watchdog thread (saves NVRAM every minute)
1291   */
1292  
1293 < void PatchAfterStartup(void)
1293 > static void nvram_watchdog(void)
1294   {
1295 <        ExecutePPC(VideoInstallAccel);
1296 <        InstallExtFS();
1295 >        if (memcmp(last_xpram, XPRAM, XPRAM_SIZE)) {
1296 >                memcpy(last_xpram, XPRAM, XPRAM_SIZE);
1297 >                SaveXPRAM();
1298 >        }
1299   }
1300  
1062
1063 /*
1064 *  NVRAM watchdog thread (saves NVRAM every minute)
1065 */
1066
1301   static void *nvram_func(void *arg)
1302   {
1303 <        struct timespec req = {60, 0};  // 1 minute
1304 <
1305 <        for (;;) {
1306 <                pthread_testcancel();
1073 <                nanosleep(&req, NULL);
1074 <                pthread_testcancel();
1075 <                if (memcmp(last_xpram, XPRAM, XPRAM_SIZE)) {
1076 <                        memcpy(last_xpram, XPRAM, XPRAM_SIZE);
1077 <                        SaveXPRAM();
1078 <                }
1303 >        while (!nvram_thread_cancel) {
1304 >                for (int i=0; i<60 && !nvram_thread_cancel; i++)
1305 >                        Delay_usec(999999);             // Only wait 1 second so we quit promptly when nvram_thread_cancel becomes true
1306 >                nvram_watchdog();
1307          }
1308          return NULL;
1309   }
# Line 1088 | Line 1316 | static void *nvram_func(void *arg)
1316   static void *tick_func(void *arg)
1317   {
1318          int tick_counter = 0;
1319 <        struct timespec req = {0, 16625000};
1319 >        uint64 start = GetTicks_usec();
1320 >        int64 ticks = 0;
1321 >        uint64 next = GetTicks_usec();
1322  
1323 <        for (;;) {
1323 >        while (!tick_thread_cancel) {
1324  
1325                  // Wait
1326 <                nanosleep(&req, NULL);
1326 >                next += 16625;
1327 >                int64 delay = next - GetTicks_usec();
1328 >                if (delay > 0)
1329 >                        Delay_usec(delay);
1330 >                else if (delay < -16625)
1331 >                        next = GetTicks_usec();
1332 >                ticks++;
1333  
1334   #if !EMULATED_PPC
1335                  // Did we crash?
1336                  if (emul_thread_fatal) {
1337  
1338                          // Yes, dump registers
1339 <                        pt_regs *r = (pt_regs *)&sigsegv_regs;
1339 >                        sigregs *r = &sigsegv_regs;
1340                          char str[256];
1341 <                        sprintf(str, "SIGSEGV\n"
1341 >                        if (crash_reason == NULL)
1342 >                                crash_reason = "SIGSEGV";
1343 >                        sprintf(str, "%s\n"
1344                                  "   pc %08lx     lr %08lx    ctr %08lx    msr %08lx\n"
1345                                  "  xer %08lx     cr %08lx  \n"
1346                                  "   r0 %08lx     r1 %08lx     r2 %08lx     r3 %08lx\n"
# Line 1113 | Line 1351 | static void *tick_func(void *arg)
1351                                  "  r20 %08lx    r21 %08lx    r22 %08lx    r23 %08lx\n"
1352                                  "  r24 %08lx    r25 %08lx    r26 %08lx    r27 %08lx\n"
1353                                  "  r28 %08lx    r29 %08lx    r30 %08lx    r31 %08lx\n",
1354 +                                crash_reason,
1355                                  r->nip, r->link, r->ctr, r->msr,
1356                                  r->xer, r->ccr,
1357                                  r->gpr[0], r->gpr[1], r->gpr[2], r->gpr[3],
# Line 1148 | Line 1387 | static void *tick_func(void *arg)
1387                          TriggerInterrupt();
1388                  }
1389          }
1390 +
1391 +        uint64 end = GetTicks_usec();
1392 +        D(bug("%lld ticks in %lld usec = %f ticks/sec\n", ticks, end - start, ticks * 1000000.0 / (end - start)));
1393          return NULL;
1394   }
1395  
# Line 1158 | Line 1400 | static void *tick_func(void *arg)
1400  
1401   void Set_pthread_attr(pthread_attr_t *attr, int priority)
1402   {
1403 <        // nothing to do
1403 > #ifdef HAVE_PTHREADS
1404 >        pthread_attr_init(attr);
1405 > #if defined(_POSIX_THREAD_PRIORITY_SCHEDULING)
1406 >        // Some of these only work for superuser
1407 >        if (geteuid() == 0) {
1408 >                pthread_attr_setinheritsched(attr, PTHREAD_EXPLICIT_SCHED);
1409 >                pthread_attr_setschedpolicy(attr, SCHED_FIFO);
1410 >                struct sched_param fifo_param;
1411 >                fifo_param.sched_priority = ((sched_get_priority_min(SCHED_FIFO) +
1412 >                                              sched_get_priority_max(SCHED_FIFO)) / 2 +
1413 >                                             priority);
1414 >                pthread_attr_setschedparam(attr, &fifo_param);
1415 >        }
1416 >        if (pthread_attr_setscope(attr, PTHREAD_SCOPE_SYSTEM) != 0) {
1417 > #ifdef PTHREAD_SCOPE_BOUND_NP
1418 >            // If system scope is not available (eg. we're not running
1419 >            // with CAP_SCHED_MGT capability on an SGI box), try bound
1420 >            // scope.  It exposes pthread scheduling to the kernel,
1421 >            // without setting realtime priority.
1422 >            pthread_attr_setscope(attr, PTHREAD_SCOPE_BOUND_NP);
1423 > #endif
1424 >        }
1425 > #endif
1426 > #endif
1427   }
1428  
1429  
# Line 1166 | Line 1431 | void Set_pthread_attr(pthread_attr_t *at
1431   *  Mutexes
1432   */
1433  
1434 + #ifdef HAVE_PTHREADS
1435 +
1436 + struct B2_mutex {
1437 +        B2_mutex() {
1438 +            pthread_mutexattr_t attr;
1439 +            pthread_mutexattr_init(&attr);
1440 +            // Initialize the mutex for priority inheritance --
1441 +            // required for accurate timing.
1442 + #if defined(HAVE_PTHREAD_MUTEXATTR_SETPROTOCOL) && !defined(__CYGWIN__)
1443 +            pthread_mutexattr_setprotocol(&attr, PTHREAD_PRIO_INHERIT);
1444 + #endif
1445 + #if defined(HAVE_PTHREAD_MUTEXATTR_SETTYPE) && defined(PTHREAD_MUTEX_NORMAL)
1446 +            pthread_mutexattr_settype(&attr, PTHREAD_MUTEX_NORMAL);
1447 + #endif
1448 + #ifdef HAVE_PTHREAD_MUTEXATTR_SETPSHARED
1449 +            pthread_mutexattr_setpshared(&attr, PTHREAD_PROCESS_PRIVATE);
1450 + #endif
1451 +            pthread_mutex_init(&m, &attr);
1452 +            pthread_mutexattr_destroy(&attr);
1453 +        }
1454 +        ~B2_mutex() {
1455 +            pthread_mutex_trylock(&m); // Make sure it's locked before
1456 +            pthread_mutex_unlock(&m);  // unlocking it.
1457 +            pthread_mutex_destroy(&m);
1458 +        }
1459 +        pthread_mutex_t m;
1460 + };
1461 +
1462 + B2_mutex *B2_create_mutex(void)
1463 + {
1464 +        return new B2_mutex;
1465 + }
1466 +
1467 + void B2_lock_mutex(B2_mutex *mutex)
1468 + {
1469 +        pthread_mutex_lock(&mutex->m);
1470 + }
1471 +
1472 + void B2_unlock_mutex(B2_mutex *mutex)
1473 + {
1474 +        pthread_mutex_unlock(&mutex->m);
1475 + }
1476 +
1477 + void B2_delete_mutex(B2_mutex *mutex)
1478 + {
1479 +        delete mutex;
1480 + }
1481 +
1482 + #else
1483 +
1484   struct B2_mutex {
1485          int dummy;
1486   };
# Line 1188 | Line 1503 | void B2_delete_mutex(B2_mutex *mutex)
1503          delete mutex;
1504   }
1505  
1506 + #endif
1507 +
1508  
1509   /*
1510   *  Trigger signal USR2 from another thread
1511   */
1512  
1513 + #if !EMULATED_PPC
1514   void TriggerInterrupt(void)
1515   {
1198 #if EMULATED_PPC
1199        WriteMacInt32(0x16a, ReadMacInt32(0x16a) + 1);
1200 #else
1201 #if 0
1202        WriteMacInt32(0x16a, ReadMacInt32(0x16a) + 1);
1203 #else
1516          if (ready_for_signals)
1517                  pthread_kill(emul_thread, SIGUSR2);
1206 #endif
1207 #endif
1518   }
1519 + #endif
1520  
1521  
1522   /*
# Line 1231 | Line 1542 | void ClearInterruptFlag(uint32 flag)
1542  
1543   void DisableInterrupt(void)
1544   {
1545 + #if EMULATED_PPC
1546 +        WriteMacInt32(XLM_IRQ_NEST, int32(ReadMacInt32(XLM_IRQ_NEST)) + 1);
1547 + #else
1548          atomic_add((int *)XLM_IRQ_NEST, 1);
1549 + #endif
1550   }
1551  
1552  
# Line 1241 | Line 1556 | void DisableInterrupt(void)
1556  
1557   void EnableInterrupt(void)
1558   {
1559 + #if EMULATED_PPC
1560 +        WriteMacInt32(XLM_IRQ_NEST, int32(ReadMacInt32(XLM_IRQ_NEST)) - 1);
1561 + #else
1562          atomic_add((int *)XLM_IRQ_NEST, -1);
1563 + #endif
1564   }
1565  
1566  
1248 #if !EMULATED_PPC
1567   /*
1568   *  USR2 handler
1569   */
1570  
1571 < static void sigusr2_handler(int sig, sigcontext_struct *sc)
1571 > #if !EMULATED_PPC
1572 > void sigusr2_handler(int sig, siginfo_t *sip, void *scp)
1573   {
1574 <        pt_regs *r = sc->regs;
1574 >        machine_regs *r = MACHINE_REGISTERS(scp);
1575 >
1576 > #ifdef USE_SDL_VIDEO
1577 >        // We must fill in the events queue in the same thread that did call SDL_SetVideoMode()
1578 >        SDL_PumpEvents();
1579 > #endif
1580  
1581          // Do nothing if interrupts are disabled
1582          if (*(int32 *)XLM_IRQ_NEST > 0)
1583                  return;
1584  
1585 + #ifdef SYSTEM_CLOBBERS_R2
1586 +        // Restore pointer to Thread Local Storage
1587 +        set_r2(TOC);
1588 + #endif
1589 + #ifdef SYSTEM_CLOBBERS_R13
1590 +        // Restore pointer to .sdata section
1591 +        set_r13(R13);
1592 + #endif
1593 +
1594          // Disable MacOS stack sniffer
1595          WriteMacInt32(0x110, 0);
1596  
# Line 1266 | Line 1599 | static void sigusr2_handler(int sig, sig
1599                  case MODE_68K:
1600                          // 68k emulator active, trigger 68k interrupt level 1
1601                          WriteMacInt16(ntohl(kernel_data->v[0x67c >> 2]), 1);
1602 <                        r->ccr |= ntohl(kernel_data->v[0x674 >> 2]);
1602 >                        r->cr() |= ntohl(kernel_data->v[0x674 >> 2]);
1603                          break;
1604  
1605   #if INTERRUPTS_IN_NATIVE_MODE
1606                  case MODE_NATIVE:
1607                          // 68k emulator inactive, in nanokernel?
1608 <                        if (r->gpr[1] != KernelDataAddr) {
1608 >                        if (r->gpr(1) != KernelDataAddr) {
1609 >
1610 >                                // Set extra stack for SIGSEGV handler
1611 >                                sigaltstack(&extra_stack, NULL);
1612 >                                
1613                                  // Prepare for 68k interrupt level 1
1614                                  WriteMacInt16(ntohl(kernel_data->v[0x67c >> 2]), 1);
1615                                  WriteMacInt32(ntohl(kernel_data->v[0x658 >> 2]) + 0xdc, ReadMacInt32(ntohl(kernel_data->v[0x658 >> 2]) + 0xdc) | ntohl(kernel_data->v[0x674 >> 2]));
1616  
1617                                  // Execute nanokernel interrupt routine (this will activate the 68k emulator)
1618 <                                atomic_add((int32 *)XLM_IRQ_NEST, 1);
1618 >                                DisableInterrupt();
1619                                  if (ROMType == ROMTYPE_NEWWORLD)
1620                                          ppc_interrupt(ROM_BASE + 0x312b1c, KernelDataAddr);
1621                                  else
1622                                          ppc_interrupt(ROM_BASE + 0x312a3c, KernelDataAddr);
1623 +
1624 +                                // Reset normal stack
1625 +                                sigaltstack(&sig_stack, NULL);
1626                          }
1627                          break;
1628   #endif
# Line 1293 | Line 1633 | static void sigusr2_handler(int sig, sig
1633                          if ((ReadMacInt32(XLM_68K_R25) & 7) == 0) {
1634  
1635                                  // Set extra stack for SIGSEGV handler
1636 <                                struct sigaltstack new_stack;
1297 <                                new_stack.ss_sp = extra_stack;
1298 <                                new_stack.ss_flags = 0;
1299 <                                new_stack.ss_size = SIG_STACK_SIZE;
1300 <                                sigaltstack(&new_stack, NULL);
1636 >                                sigaltstack(&extra_stack, NULL);
1637   #if 1
1638                                  // Execute full 68k interrupt routine
1639                                  M68kRegisters r;
# Line 1319 | Line 1655 | static void sigusr2_handler(int sig, sig
1655                                          if (InterruptFlags & INTFLAG_VIA) {
1656                                                  ClearInterruptFlag(INTFLAG_VIA);
1657                                                  ADBInterrupt();
1658 <                                                ExecutePPC(VideoVBL);
1658 >                                                ExecuteNative(NATIVE_VIDEO_VBL);
1659                                          }
1660                                  }
1661   #endif
1662 <                                // Reset normal signal stack
1663 <                                new_stack.ss_sp = sig_stack;
1328 <                                new_stack.ss_flags = 0;
1329 <                                new_stack.ss_size = SIG_STACK_SIZE;
1330 <                                sigaltstack(&new_stack, NULL);
1662 >                                // Reset normal stack
1663 >                                sigaltstack(&sig_stack, NULL);
1664                          }
1665                          break;
1666   #endif
1334
1667          }
1668   }
1669 + #endif
1670  
1671  
1672   /*
1673   *  SIGSEGV handler
1674   */
1675  
1676 < static void sigsegv_handler(int sig, sigcontext_struct *sc)
1676 > #if !EMULATED_PPC
1677 > static void sigsegv_handler(int sig, siginfo_t *sip, void *scp)
1678   {
1679 <        pt_regs *r = sc->regs;
1679 >        machine_regs *r = MACHINE_REGISTERS(scp);
1680 >
1681 >        // Get effective address
1682 >        uint32 addr = r->dar();
1683 >        
1684 > #ifdef SYSTEM_CLOBBERS_R2
1685 >        // Restore pointer to Thread Local Storage
1686 >        set_r2(TOC);
1687 > #endif
1688 > #ifdef SYSTEM_CLOBBERS_R13
1689 >        // Restore pointer to .sdata section
1690 >        set_r13(R13);
1691 > #endif
1692 >
1693 > #if ENABLE_VOSF
1694 >        // Handle screen fault.
1695 >        extern bool Screen_fault_handler(sigsegv_address_t fault_address, sigsegv_address_t fault_instruction);
1696 >        if (Screen_fault_handler((sigsegv_address_t)addr, (sigsegv_address_t)r->pc()))
1697 >                return;
1698 > #endif
1699 >
1700          num_segv++;
1701  
1702 <        // Fault in Mac ROM or RAM?
1703 <        bool mac_fault = (r->nip >= ROM_BASE) && (r->nip < (ROM_BASE + ROM_AREA_SIZE)) || (r->nip >= RAMBase) && (r->nip < (RAMBase + RAMSize));
1702 >        // Fault in Mac ROM or RAM or DR Cache?
1703 >        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));
1704          if (mac_fault) {
1705  
1352                // Get opcode and divide into fields
1353                uint32 opcode = *((uint32 *)r->nip);
1354                uint32 primop = opcode >> 26;
1355                uint32 exop = (opcode >> 1) & 0x3ff;
1356                uint32 ra = (opcode >> 16) & 0x1f;
1357                uint32 rb = (opcode >> 11) & 0x1f;
1358                uint32 rd = (opcode >> 21) & 0x1f;
1359                int32 imm = (int16)(opcode & 0xffff);
1360
1706                  // "VM settings" during MacOS 8 installation
1707 <                if (r->nip == ROM_BASE + 0x488160 && r->gpr[20] == 0xf8000000) {
1708 <                        r->nip += 4;
1709 <                        r->gpr[8] = 0;
1707 >                if (r->pc() == ROM_BASE + 0x488160 && r->gpr(20) == 0xf8000000) {
1708 >                        r->pc() += 4;
1709 >                        r->gpr(8) = 0;
1710                          return;
1711          
1712                  // MacOS 8.5 installation
1713 <                } else if (r->nip == ROM_BASE + 0x488140 && r->gpr[16] == 0xf8000000) {
1714 <                        r->nip += 4;
1715 <                        r->gpr[8] = 0;
1713 >                } else if (r->pc() == ROM_BASE + 0x488140 && r->gpr(16) == 0xf8000000) {
1714 >                        r->pc() += 4;
1715 >                        r->gpr(8) = 0;
1716                          return;
1717          
1718                  // MacOS 8 serial drivers on startup
1719 <                } else if (r->nip == ROM_BASE + 0x48e080 && (r->gpr[8] == 0xf3012002 || r->gpr[8] == 0xf3012000)) {
1720 <                        r->nip += 4;
1721 <                        r->gpr[8] = 0;
1719 >                } else if (r->pc() == ROM_BASE + 0x48e080 && (r->gpr(8) == 0xf3012002 || r->gpr(8) == 0xf3012000)) {
1720 >                        r->pc() += 4;
1721 >                        r->gpr(8) = 0;
1722                          return;
1723          
1724                  // MacOS 8.1 serial drivers on startup
1725 <                } else if (r->nip == ROM_BASE + 0x48c5e0 && (r->gpr[20] == 0xf3012002 || r->gpr[20] == 0xf3012000)) {
1726 <                        r->nip += 4;
1725 >                } else if (r->pc() == ROM_BASE + 0x48c5e0 && (r->gpr(20) == 0xf3012002 || r->gpr(20) == 0xf3012000)) {
1726 >                        r->pc() += 4;
1727                          return;
1728 <                } else if (r->nip == ROM_BASE + 0x4a10a0 && (r->gpr[20] == 0xf3012002 || r->gpr[20] == 0xf3012000)) {
1729 <                        r->nip += 4;
1728 >                } else if (r->pc() == ROM_BASE + 0x4a10a0 && (r->gpr(20) == 0xf3012002 || r->gpr(20) == 0xf3012000)) {
1729 >                        r->pc() += 4;
1730 >                        return;
1731 >        
1732 >                // MacOS 8.6 serial drivers on startup (with DR Cache and OldWorld ROM)
1733 >                } else if ((r->pc() - DR_CACHE_BASE) < DR_CACHE_SIZE && (r->gpr(16) == 0xf3012002 || r->gpr(16) == 0xf3012000)) {
1734 >                        r->pc() += 4;
1735 >                        return;
1736 >                } else if ((r->pc() - DR_CACHE_BASE) < DR_CACHE_SIZE && (r->gpr(20) == 0xf3012002 || r->gpr(20) == 0xf3012000)) {
1737 >                        r->pc() += 4;
1738                          return;
1739                  }
1740  
1741 +                // Get opcode and divide into fields
1742 +                uint32 opcode = *((uint32 *)r->pc());
1743 +                uint32 primop = opcode >> 26;
1744 +                uint32 exop = (opcode >> 1) & 0x3ff;
1745 +                uint32 ra = (opcode >> 16) & 0x1f;
1746 +                uint32 rb = (opcode >> 11) & 0x1f;
1747 +                uint32 rd = (opcode >> 21) & 0x1f;
1748 +                int32 imm = (int16)(opcode & 0xffff);
1749 +
1750                  // Analyze opcode
1751                  enum {
1752                          TYPE_UNKNOWN,
# Line 1466 | Line 1828 | static void sigsegv_handler(int sig, sig
1828                                  transfer_type = TYPE_STORE; transfer_size = SIZE_HALFWORD; addr_mode = MODE_NORM; break;
1829                          case 45:        // sthu
1830                                  transfer_type = TYPE_STORE; transfer_size = SIZE_HALFWORD; addr_mode = MODE_U; break;
1831 <                }
1832 <        
1833 <                // Calculate effective address
1834 <                uint32 addr = 0;
1835 <                switch (addr_mode) {
1836 <                        case MODE_X:
1837 <                        case MODE_UX:
1838 <                                if (ra == 0)
1839 <                                        addr = r->gpr[rb];
1840 <                                else
1841 <                                        addr = r->gpr[ra] + r->gpr[rb];
1842 <                                break;
1481 <                        case MODE_NORM:
1482 <                        case MODE_U:
1483 <                                if (ra == 0)
1484 <                                        addr = (int32)(int16)imm;
1485 <                                else
1486 <                                        addr = r->gpr[ra] + (int32)(int16)imm;
1831 > #if EMULATE_UNALIGNED_LOADSTORE_MULTIPLE
1832 >                        case 46:        // lmw
1833 >                                if ((addr % 4) != 0) {
1834 >                                        uint32 ea = addr;
1835 >                                        D(bug("WARNING: unaligned lmw to EA=%08x from IP=%08x\n", ea, r->pc()));
1836 >                                        for (int i = rd; i <= 31; i++) {
1837 >                                                r->gpr(i) = ReadMacInt32(ea);
1838 >                                                ea += 4;
1839 >                                        }
1840 >                                        r->pc() += 4;
1841 >                                        goto rti;
1842 >                                }
1843                                  break;
1844 <                        default:
1844 >                        case 47:        // stmw
1845 >                                if ((addr % 4) != 0) {
1846 >                                        uint32 ea = addr;
1847 >                                        D(bug("WARNING: unaligned stmw to EA=%08x from IP=%08x\n", ea, r->pc()));
1848 >                                        for (int i = rd; i <= 31; i++) {
1849 >                                                WriteMacInt32(ea, r->gpr(i));
1850 >                                                ea += 4;
1851 >                                        }
1852 >                                        r->pc() += 4;
1853 >                                        goto rti;
1854 >                                }
1855                                  break;
1856 + #endif
1857                  }
1858 <
1859 <                // Ignore ROM writes
1860 <                if (transfer_type == TYPE_STORE && addr >= ROM_BASE && addr < ROM_BASE + ROM_SIZE) {
1861 < //                      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));
1858 >        
1859 >                // Ignore ROM writes (including to the zero page, which is read-only)
1860 >                if (transfer_type == TYPE_STORE &&
1861 >                        ((addr >= ROM_BASE && addr < ROM_BASE + ROM_SIZE) ||
1862 >                         (addr >= SheepMem::ZeroPage() && addr < SheepMem::ZeroPage() + SheepMem::PageSize()))) {
1863 > //                      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()));
1864                          if (addr_mode == MODE_U || addr_mode == MODE_UX)
1865 <                                r->gpr[ra] = addr;
1866 <                        r->nip += 4;
1865 >                                r->gpr(ra) = addr;
1866 >                        r->pc() += 4;
1867                          goto rti;
1868                  }
1869  
1870                  // Ignore illegal memory accesses?
1871                  if (PrefsFindBool("ignoresegv")) {
1872                          if (addr_mode == MODE_U || addr_mode == MODE_UX)
1873 <                                r->gpr[ra] = addr;
1873 >                                r->gpr(ra) = addr;
1874                          if (transfer_type == TYPE_LOAD)
1875 <                                r->gpr[rd] = 0;
1876 <                        r->nip += 4;
1875 >                                r->gpr(rd) = 0;
1876 >                        r->pc() += 4;
1877                          goto rti;
1878                  }
1879  
# Line 1512 | Line 1881 | static void sigsegv_handler(int sig, sig
1881                  if (!PrefsFindBool("nogui")) {
1882                          char str[256];
1883                          if (transfer_type == TYPE_LOAD || transfer_type == TYPE_STORE)
1884 <                                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]);
1884 >                                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));
1885                          else
1886 <                                sprintf(str, GetString(STR_UNKNOWN_SEGV_ERR), r->nip, r->gpr[24], r->gpr[1], opcode);
1886 >                                sprintf(str, GetString(STR_UNKNOWN_SEGV_ERR), r->pc(), r->gpr(24), r->gpr(1), opcode);
1887                          ErrorAlert(str);
1888                          QuitEmulator();
1889                          return;
# Line 1522 | Line 1891 | static void sigsegv_handler(int sig, sig
1891          }
1892  
1893          // For all other errors, jump into debugger (sort of...)
1894 +        crash_reason = (sig == SIGBUS) ? "SIGBUS" : "SIGSEGV";
1895          if (!ready_for_signals) {
1896 <                printf("SIGSEGV\n");
1897 <                printf(" sigcontext %p, pt_regs %p\n", sc, r);
1896 >                printf("%s\n");
1897 >                printf(" sigcontext %p, machine_regs %p\n", scp, r);
1898                  printf(
1899                          "   pc %08lx     lr %08lx    ctr %08lx    msr %08lx\n"
1900                          "  xer %08lx     cr %08lx  \n"
# Line 1536 | Line 1906 | static void sigsegv_handler(int sig, sig
1906                          "  r20 %08lx    r21 %08lx    r22 %08lx    r23 %08lx\n"
1907                          "  r24 %08lx    r25 %08lx    r26 %08lx    r27 %08lx\n"
1908                          "  r28 %08lx    r29 %08lx    r30 %08lx    r31 %08lx\n",
1909 <                        r->nip, r->link, r->ctr, r->msr,
1910 <                        r->xer, r->ccr,
1911 <                        r->gpr[0], r->gpr[1], r->gpr[2], r->gpr[3],
1912 <                        r->gpr[4], r->gpr[5], r->gpr[6], r->gpr[7],
1913 <                        r->gpr[8], r->gpr[9], r->gpr[10], r->gpr[11],
1914 <                        r->gpr[12], r->gpr[13], r->gpr[14], r->gpr[15],
1915 <                        r->gpr[16], r->gpr[17], r->gpr[18], r->gpr[19],
1916 <                        r->gpr[20], r->gpr[21], r->gpr[22], r->gpr[23],
1917 <                        r->gpr[24], r->gpr[25], r->gpr[26], r->gpr[27],
1918 <                        r->gpr[28], r->gpr[29], r->gpr[30], r->gpr[31]);
1909 >                        crash_reason,
1910 >                        r->pc(), r->lr(), r->ctr(), r->msr(),
1911 >                        r->xer(), r->cr(),
1912 >                        r->gpr(0), r->gpr(1), r->gpr(2), r->gpr(3),
1913 >                        r->gpr(4), r->gpr(5), r->gpr(6), r->gpr(7),
1914 >                        r->gpr(8), r->gpr(9), r->gpr(10), r->gpr(11),
1915 >                        r->gpr(12), r->gpr(13), r->gpr(14), r->gpr(15),
1916 >                        r->gpr(16), r->gpr(17), r->gpr(18), r->gpr(19),
1917 >                        r->gpr(20), r->gpr(21), r->gpr(22), r->gpr(23),
1918 >                        r->gpr(24), r->gpr(25), r->gpr(26), r->gpr(27),
1919 >                        r->gpr(28), r->gpr(29), r->gpr(30), r->gpr(31));
1920                  exit(1);
1921                  QuitEmulator();
1922                  return;
1923          } else {
1924                  // We crashed. Save registers, tell tick thread and loop forever
1925 <                sigsegv_regs = *(sigregs *)r;
1925 >                build_sigregs(&sigsegv_regs, r);
1926                  emul_thread_fatal = true;
1927                  for (;;) ;
1928          }
# Line 1563 | Line 1934 | rti:;
1934   *  SIGILL handler
1935   */
1936  
1937 < static void sigill_handler(int sig, sigcontext_struct *sc)
1937 > static void sigill_handler(int sig, siginfo_t *sip, void *scp)
1938   {
1939 <        pt_regs *r = sc->regs;
1939 >        machine_regs *r = MACHINE_REGISTERS(scp);
1940          char str[256];
1941  
1942 + #ifdef SYSTEM_CLOBBERS_R2
1943 +        // Restore pointer to Thread Local Storage
1944 +        set_r2(TOC);
1945 + #endif
1946 + #ifdef SYSTEM_CLOBBERS_R13
1947 +        // Restore pointer to .sdata section
1948 +        set_r13(R13);
1949 + #endif
1950 +
1951          // Fault in Mac ROM or RAM?
1952 <        bool mac_fault = (r->nip >= ROM_BASE) && (r->nip < (ROM_BASE + ROM_AREA_SIZE)) || (r->nip >= RAMBase) && (r->nip < (RAMBase + RAMSize));
1952 >        bool mac_fault = (r->pc() >= ROM_BASE) && (r->pc() < (ROM_BASE + ROM_AREA_SIZE)) || (r->pc() >= RAMBase) && (r->pc() < (RAMBase + RAMSize));
1953          if (mac_fault) {
1954  
1955                  // Get opcode and divide into fields
1956 <                uint32 opcode = *((uint32 *)r->nip);
1956 >                uint32 opcode = *((uint32 *)r->pc());
1957                  uint32 primop = opcode >> 26;
1958                  uint32 exop = (opcode >> 1) & 0x3ff;
1959                  uint32 ra = (opcode >> 16) & 0x1f;
# Line 1584 | Line 1964 | static void sigill_handler(int sig, sigc
1964                  switch (primop) {
1965                          case 9:         // POWER instructions
1966                          case 22:
1967 < power_inst:             sprintf(str, GetString(STR_POWER_INSTRUCTION_ERR), r->nip, r->gpr[1], opcode);
1967 > power_inst:             sprintf(str, GetString(STR_POWER_INSTRUCTION_ERR), r->pc(), r->gpr(1), opcode);
1968                                  ErrorAlert(str);
1969                                  QuitEmulator();
1970                                  return;
# Line 1592 | Line 1972 | power_inst:            sprintf(str, GetString(STR_
1972                          case 31:
1973                                  switch (exop) {
1974                                          case 83:        // mfmsr
1975 <                                                r->gpr[rd] = 0xf072;
1976 <                                                r->nip += 4;
1975 >                                                r->gpr(rd) = 0xf072;
1976 >                                                r->pc() += 4;
1977                                                  goto rti;
1978  
1979                                          case 210:       // mtsr
1980                                          case 242:       // mtsrin
1981                                          case 306:       // tlbie
1982 <                                                r->nip += 4;
1982 >                                                r->pc() += 4;
1983                                                  goto rti;
1984  
1985                                          case 339: {     // mfspr
# Line 1615 | Line 1995 | power_inst:            sprintf(str, GetString(STR_
1995                                                          case 957:       // PMC3
1996                                                          case 958:       // PMC4
1997                                                          case 959:       // SDA
1998 <                                                                r->nip += 4;
1998 >                                                                r->pc() += 4;
1999                                                                  goto rti;
2000                                                          case 25:        // SDR1
2001 <                                                                r->gpr[rd] = 0xdead001f;
2002 <                                                                r->nip += 4;
2001 >                                                                r->gpr(rd) = 0xdead001f;
2002 >                                                                r->pc() += 4;
2003                                                                  goto rti;
2004                                                          case 287:       // PVR
2005 <                                                                r->gpr[rd] = PVR;
2006 <                                                                r->nip += 4;
2005 >                                                                r->gpr(rd) = PVR;
2006 >                                                                r->pc() += 4;
2007                                                                  goto rti;
2008                                                  }
2009                                                  break;
# Line 1659 | Line 2039 | power_inst:            sprintf(str, GetString(STR_
2039                                                          case 957:       // PMC3
2040                                                          case 958:       // PMC4
2041                                                          case 959:       // SDA
2042 <                                                                r->nip += 4;
2042 >                                                                r->pc() += 4;
2043                                                                  goto rti;
2044                                                  }
2045                                                  break;
# Line 1678 | Line 2058 | power_inst:            sprintf(str, GetString(STR_
2058  
2059                  // In GUI mode, show error alert
2060                  if (!PrefsFindBool("nogui")) {
2061 <                        sprintf(str, GetString(STR_UNKNOWN_SEGV_ERR), r->nip, r->gpr[24], r->gpr[1], opcode);
2061 >                        sprintf(str, GetString(STR_UNKNOWN_SEGV_ERR), r->pc(), r->gpr(24), r->gpr(1), opcode);
2062                          ErrorAlert(str);
2063                          QuitEmulator();
2064                          return;
# Line 1686 | Line 2066 | power_inst:            sprintf(str, GetString(STR_
2066          }
2067  
2068          // For all other errors, jump into debugger (sort of...)
2069 +        crash_reason = "SIGILL";
2070          if (!ready_for_signals) {
2071 <                printf("SIGILL\n");
2072 <                printf(" sigcontext %p, pt_regs %p\n", sc, r);
2071 >                printf("%s\n");
2072 >                printf(" sigcontext %p, machine_regs %p\n", scp, r);
2073                  printf(
2074                          "   pc %08lx     lr %08lx    ctr %08lx    msr %08lx\n"
2075                          "  xer %08lx     cr %08lx  \n"
# Line 1700 | Line 2081 | power_inst:            sprintf(str, GetString(STR_
2081                          "  r20 %08lx    r21 %08lx    r22 %08lx    r23 %08lx\n"
2082                          "  r24 %08lx    r25 %08lx    r26 %08lx    r27 %08lx\n"
2083                          "  r28 %08lx    r29 %08lx    r30 %08lx    r31 %08lx\n",
2084 <                        r->nip, r->link, r->ctr, r->msr,
2085 <                        r->xer, r->ccr,
2086 <                        r->gpr[0], r->gpr[1], r->gpr[2], r->gpr[3],
2087 <                        r->gpr[4], r->gpr[5], r->gpr[6], r->gpr[7],
2088 <                        r->gpr[8], r->gpr[9], r->gpr[10], r->gpr[11],
2089 <                        r->gpr[12], r->gpr[13], r->gpr[14], r->gpr[15],
2090 <                        r->gpr[16], r->gpr[17], r->gpr[18], r->gpr[19],
2091 <                        r->gpr[20], r->gpr[21], r->gpr[22], r->gpr[23],
2092 <                        r->gpr[24], r->gpr[25], r->gpr[26], r->gpr[27],
2093 <                        r->gpr[28], r->gpr[29], r->gpr[30], r->gpr[31]);
2084 >                        crash_reason,
2085 >                        r->pc(), r->lr(), r->ctr(), r->msr(),
2086 >                        r->xer(), r->cr(),
2087 >                        r->gpr(0), r->gpr(1), r->gpr(2), r->gpr(3),
2088 >                        r->gpr(4), r->gpr(5), r->gpr(6), r->gpr(7),
2089 >                        r->gpr(8), r->gpr(9), r->gpr(10), r->gpr(11),
2090 >                        r->gpr(12), r->gpr(13), r->gpr(14), r->gpr(15),
2091 >                        r->gpr(16), r->gpr(17), r->gpr(18), r->gpr(19),
2092 >                        r->gpr(20), r->gpr(21), r->gpr(22), r->gpr(23),
2093 >                        r->gpr(24), r->gpr(25), r->gpr(26), r->gpr(27),
2094 >                        r->gpr(28), r->gpr(29), r->gpr(30), r->gpr(31));
2095                  exit(1);
2096                  QuitEmulator();
2097                  return;
2098          } else {
2099                  // We crashed. Save registers, tell tick thread and loop forever
2100 <                sigsegv_regs = *(sigregs *)r;
2100 >                build_sigregs(&sigsegv_regs, r);
2101                  emul_thread_fatal = true;
2102                  for (;;) ;
2103          }
# Line 1725 | Line 2107 | rti:;
2107  
2108  
2109   /*
2110 + *  Helpers to share 32-bit addressable data with MacOS
2111 + */
2112 +
2113 + bool SheepMem::Init(void)
2114 + {
2115 +        // Size of a native page
2116 +        page_size = getpagesize();
2117 +
2118 +        // Allocate SheepShaver globals
2119 +        proc = base;
2120 +        if (vm_mac_acquire(base, size) < 0)
2121 +                return false;
2122 +
2123 +        // Allocate page with all bits set to 0, right in the middle
2124 +        // This is also used to catch undesired overlaps between proc and data areas
2125 +        zero_page = proc + (size / 2);
2126 +        Mac_memset(zero_page, 0, page_size);
2127 +        if (vm_protect(Mac2HostAddr(zero_page), page_size, VM_PAGE_READ) < 0)
2128 +                return false;
2129 +
2130 + #if EMULATED_PPC
2131 +        // Allocate alternate stack for PowerPC interrupt routine
2132 +        sig_stack = base + size;
2133 +        if (vm_mac_acquire(sig_stack, SIG_STACK_SIZE) < 0)
2134 +                return false;
2135 + #endif
2136 +
2137 +        data = base + size;
2138 +        return true;
2139 + }
2140 +
2141 + void SheepMem::Exit(void)
2142 + {
2143 +        if (data) {
2144 +                // Delete SheepShaver globals
2145 +                vm_mac_release(base, size);
2146 +
2147 + #if EMULATED_PPC
2148 +                // Delete alternate stack for PowerPC interrupt routine
2149 +                vm_mac_release(sig_stack, SIG_STACK_SIZE);
2150 + #endif
2151 +        }
2152 + }
2153 +
2154 +
2155 + /*
2156   *  Display alert
2157   */
2158  
# Line 1773 | Line 2201 | void display_alert(int title_id, int pre
2201  
2202   void ErrorAlert(const char *text)
2203   {
2204 < #ifdef ENABLE_GTK
2204 > #if defined(ENABLE_GTK) && !defined(USE_SDL_VIDEO)
2205          if (PrefsFindBool("nogui") || x_display == NULL) {
2206                  printf(GetString(STR_SHELL_ERROR_PREFIX), text);
2207                  return;
# Line 1792 | Line 2220 | void ErrorAlert(const char *text)
2220  
2221   void WarningAlert(const char *text)
2222   {
2223 < #ifdef ENABLE_GTK
2223 > #if defined(ENABLE_GTK) && !defined(USE_SDL_VIDEO)
2224          if (PrefsFindBool("nogui") || x_display == NULL) {
2225                  printf(GetString(STR_SHELL_WARNING_PREFIX), text);
2226                  return;

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines