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.13 by gbeauche, 2003-11-03T21:28:25Z vs.
Revision 1.74 by gbeauche, 2006-05-01T22:33:34Z

# 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 + #include "sigregs.h"
113 + #include "rpc.h"
114  
115   #define DEBUG 0
116   #include "debug.h"
117  
118  
119 + #ifdef HAVE_DIRENT_H
120 + #include <dirent.h>
121 + #endif
122 +
123 + #ifdef USE_SDL
124 + #include <SDL.h>
125 + #endif
126 +
127 + #ifndef USE_SDL_VIDEO
128   #include <X11/Xlib.h>
129 + #endif
130  
131   #ifdef ENABLE_GTK
132   #include <gtk/gtk.h>
# Line 131 | Line 143
143   #endif
144  
145  
146 + // Enable emulation of unaligned lmw/stmw?
147 + #define EMULATE_UNALIGNED_LOADSTORE_MULTIPLE 1
148 +
149   // Enable Execute68k() safety checks?
150   #define SAFE_EXEC_68K 0
151  
# Line 145 | Line 160
160   const char ROM_FILE_NAME[] = "ROM";
161   const char ROM_FILE_NAME2[] = "Mac OS ROM";
162  
163 < const uint32 RAM_BASE = 0x20000000;                     // Base address of RAM
164 < const uint32 SIG_STACK_SIZE = 0x10000;          // Size of signal stack
165 <
166 <
167 < #if !EMULATED_PPC
153 < // Structure in which registers are saved in a signal handler;
154 < // sigcontext->regs points to it
155 < // (see arch/ppc/kernel/signal.c)
156 < typedef struct {
157 <        uint32 u[4];
158 < } __attribute((aligned(16))) vector128;
159 < #include <linux/elf.h>
160 <
161 < struct sigregs {
162 <        elf_gregset_t   gp_regs;                                // Identical to pt_regs
163 <        double                  fp_regs[ELF_NFPREG];    // f0..f31 and fpsrc
164 <        //more (uninteresting) stuff following here
165 < };
163 > #if REAL_ADDRESSING
164 > const uintptr RAM_BASE = 0x20000000;            // Base address of RAM
165 > #else
166 > // FIXME: needs to be >= 0x04000000
167 > const uintptr RAM_BASE = 0x10000000;            // Base address of RAM
168   #endif
169 + const uint32 SIG_STACK_SIZE = 0x10000;          // Size of signal stack
170  
171  
172   // Global variables (exported)
173   #if !EMULATED_PPC
174 < void *TOC;                              // Small data pointer (r13)
174 > void *TOC = NULL;               // Pointer to Thread Local Storage (r2)
175 > void *R13 = NULL;               // Pointer to .sdata section (r13 under Linux)
176   #endif
177   uint32 RAMBase;                 // Base address of Mac RAM
178   uint32 RAMSize;                 // Size of Mac RAM
175 uint32 SheepStack1Base; // SheepShaver first alternate stack base
176 uint32 SheepStack2Base; // SheepShaver second alternate stack base
177 uint32 SheepThunksBase; // SheepShaver thunks base
179   uint32 KernelDataAddr;  // Address of Kernel Data
180   uint32 BootGlobsAddr;   // Address of BootGlobs structure at top of Mac RAM
181 + uint32 DRCacheAddr;             // Address of DR Cache
182   uint32 PVR;                             // Theoretical PVR
183   int64 CPUClockSpeed;    // Processor clock speed (Hz)
184   int64 BusClockSpeed;    // Bus clock speed (Hz)
185 + int64 TimebaseSpeed;    // Timebase clock speed (Hz)
186 + uint8 *RAMBaseHost;             // Base address of Mac RAM (host address space)
187 + uint8 *ROMBaseHost;             // Base address of Mac ROM (host address space)
188  
189  
190   // Global variables
191 + #ifndef USE_SDL_VIDEO
192   char *x_display_name = NULL;                            // X11 display name
193   Display *x_display = NULL;                                      // X11 display handle
194 + #ifdef X11_LOCK_TYPE
195 + X11_LOCK_TYPE x_display_lock = X11_LOCK_INIT; // X11 display lock
196 + #endif
197 + #endif
198  
199   static int zero_fd = 0;                                         // FD of /dev/zero
190 static bool sheep_area_mapped = false;          // Flag: SheepShaver data area mmap()ed
200   static bool lm_area_mapped = false;                     // Flag: Low Memory area mmap()ped
201   static int kernel_area = -1;                            // SHM ID of Kernel Data area
202   static bool rom_area_mapped = false;            // Flag: Mac ROM mmap()ped
203   static bool ram_area_mapped = false;            // Flag: Mac RAM mmap()ped
204 + static bool dr_cache_area_mapped = false;       // Flag: Mac DR Cache mmap()ped
205 + static bool dr_emulator_area_mapped = false;// Flag: Mac DR Emulator mmap()ped
206   static KernelData *kernel_data;                         // Pointer to Kernel Data
207   static EmulatorData *emulator_data;
208  
209   static uint8 last_xpram[XPRAM_SIZE];            // Buffer for monitoring XPRAM changes
210  
211   static bool nvram_thread_active = false;        // Flag: NVRAM watchdog installed
212 + static volatile bool nvram_thread_cancel;       // Flag: Cancel NVRAM thread
213   static pthread_t nvram_thread;                          // NVRAM watchdog
214   static bool tick_thread_active = false;         // Flag: MacOS thread installed
215 + static volatile bool tick_thread_cancel;        // Flag: Cancel 60Hz thread
216   static pthread_t tick_thread;                           // 60Hz thread
217   static pthread_t emul_thread;                           // MacOS thread
218  
# Line 207 | Line 220 | static bool ready_for_signals = false;
220   static int64 num_segv = 0;                                      // Number of handled SEGV signals
221  
222   static struct sigaction sigusr2_action;         // Interrupt signal (of emulator thread)
223 < #if !EMULATED_PPC
223 > #if EMULATED_PPC
224 > static uintptr sig_stack = 0;                           // Stack for PowerPC interrupt routine
225 > #else
226   static struct sigaction sigsegv_action;         // Data access exception signal (of emulator thread)
227   static struct sigaction sigill_action;          // Illegal instruction signal (of emulator thread)
228 < static void *sig_stack = NULL;                          // Stack for signal handlers
229 < static void *extra_stack = NULL;                        // Stack for SIGSEGV inside interrupt handler
228 > static struct sigaltstack sig_stack;            // Stack for signal handlers
229 > static struct sigaltstack extra_stack;          // Stack for SIGSEGV inside interrupt handler
230   static bool emul_thread_fatal = false;          // Flag: MacOS thread crashed, tick thread shall dump debug output
231   static sigregs sigsegv_regs;                            // Register dump when crashed
232 + static const char *crash_reason = NULL;         // Reason of the crash (SIGSEGV, SIGBUS, SIGILL)
233   #endif
234  
235 + static rpc_connection_t *gui_connection = NULL; // RPC connection to the GUI
236 + static const char *gui_connection_path = NULL;  // GUI connection identifier
237 +
238 + uint32  SheepMem::page_size;                            // Size of a native page
239 + uintptr SheepMem::zero_page = 0;                        // Address of ro page filled in with zeros
240 + uintptr SheepMem::base = 0x60000000;            // Address of SheepShaver data
241 + uintptr SheepMem::proc;                                         // Bottom address of SheepShave procedures
242 + uintptr SheepMem::data;                                         // Top of SheepShaver data (stack like storage)
243 +
244  
245   // Prototypes
246 + static bool kernel_data_init(void);
247 + static void kernel_data_exit(void);
248   static void Quit(void);
249   static void *emul_func(void *arg);
250   static void *nvram_func(void *arg);
251   static void *tick_func(void *arg);
252   #if EMULATED_PPC
226 static void sigusr2_handler(int sig);
253   extern void emul_ppc(uint32 start);
254   extern void init_emul_ppc(void);
255   extern void exit_emul_ppc(void);
256 + sigsegv_return_t sigsegv_handler(sigsegv_address_t, sigsegv_address_t);
257   #else
258 < static void sigusr2_handler(int sig, sigcontext_struct *sc);
259 < static void sigsegv_handler(int sig, sigcontext_struct *sc);
260 < static void sigill_handler(int sig, sigcontext_struct *sc);
258 > extern "C" void sigusr2_handler_init(int sig, siginfo_t *sip, void *scp);
259 > extern "C" void sigusr2_handler(int sig, siginfo_t *sip, void *scp);
260 > static void sigsegv_handler(int sig, siginfo_t *sip, void *scp);
261 > static void sigill_handler(int sig, siginfo_t *sip, void *scp);
262   #endif
263  
264  
265   // From asm_linux.S
266   #if !EMULATED_PPC
239 extern "C" void *get_toc(void);
267   extern "C" void *get_sp(void);
268 < extern "C" void flush_icache_range(void *start, void *end);
268 > extern "C" void *get_r2(void);
269 > extern "C" void set_r2(void *);
270 > extern "C" void *get_r13(void);
271 > extern "C" void set_r13(void *);
272 > extern "C" void flush_icache_range(uint32 start, uint32 end);
273   extern "C" void jump_to_rom(uint32 entry, uint32 context);
274   extern "C" void quit_emulator(void);
275   extern "C" void execute_68k(uint32 pc, M68kRegisters *r);
# Line 252 | Line 283 | extern void paranoia_check(void);
283  
284   #if EMULATED_PPC
285   /*
286 + *  Return signal stack base
287 + */
288 +
289 + uintptr SignalStackBase(void)
290 + {
291 +        return sig_stack + SIG_STACK_SIZE;
292 + }
293 +
294 +
295 + /*
296   *  Atomic operations
297   */
298  
# Line 292 | Line 333 | int atomic_or(int *var, int v)
333  
334  
335   /*
336 + *  Memory management helpers
337 + */
338 +
339 + static inline int vm_mac_acquire(uint32 addr, uint32 size)
340 + {
341 +        return vm_acquire_fixed(Mac2HostAddr(addr), size);
342 + }
343 +
344 + static inline int vm_mac_release(uint32 addr, uint32 size)
345 + {
346 +        return vm_release(Mac2HostAddr(addr), size);
347 + }
348 +
349 +
350 + /*
351   *  Main program
352   */
353  
# Line 307 | Line 363 | static void usage(const char *prg_name)
363   int main(int argc, char **argv)
364   {
365          char str[256];
310        uint32 *boot_globs;
311        int16 i16;
366          int rom_fd;
367          FILE *proc_file;
368          const char *rom_path;
# Line 325 | Line 379 | int main(int argc, char **argv)
379          printf(" %s\n", GetString(STR_ABOUT_TEXT2));
380  
381   #if !EMULATED_PPC
382 + #ifdef SYSTEM_CLOBBERS_R2
383          // Get TOC pointer
384 <        TOC = get_toc();
384 >        TOC = get_r2();
385 > #endif
386 > #ifdef SYSTEM_CLOBBERS_R13
387 >        // Get r13 register
388 >        R13 = get_r13();
389   #endif
331
332 #ifdef ENABLE_GTK
333        // Init GTK
334        gtk_set_locale();
335        gtk_init(&argc, &argv);
390   #endif
337
338        // Read preferences
339        PrefsInit(argc, argv);
391  
392          // Parse command line arguments
393          for (int i=1; i<argc; i++) {
394                  if (strcmp(argv[i], "--help") == 0) {
395                          usage(argv[0]);
396 + #ifndef USE_SDL_VIDEO
397                  } else if (strcmp(argv[i], "--display") == 0) {
398                          i++;
399                          if (i < argc)
400                                  x_display_name = strdup(argv[i]);
401 <                } else if (argv[i][0] == '-') {
401 > #endif
402 >                } else if (strcmp(argv[i], "--gui-connection") == 0) {
403 >                        argv[i++] = NULL;
404 >                        if (i < argc) {
405 >                                gui_connection_path = argv[i];
406 >                                argv[i] = NULL;
407 >                        }
408 >                }
409 >        }
410 >
411 >        // Remove processed arguments
412 >        for (int i=1; i<argc; i++) {
413 >                int k;
414 >                for (k=i; k<argc; k++)
415 >                        if (argv[k] != NULL)
416 >                                break;
417 >                if (k > i) {
418 >                        k -= i;
419 >                        for (int j=i+k; j<argc; j++)
420 >                                argv[j-k] = argv[j];
421 >                        argc -= k;
422 >                }
423 >        }
424 >
425 >        // Connect to the external GUI
426 >        if (gui_connection_path) {
427 >                if ((gui_connection = rpc_init_client(gui_connection_path)) == NULL) {
428 >                        fprintf(stderr, "Failed to initialize RPC client connection to the GUI\n");
429 >                        return 1;
430 >                }
431 >        }
432 >
433 > #ifdef ENABLE_GTK
434 >        if (!gui_connection) {
435 >                // Init GTK
436 >                gtk_set_locale();
437 >                gtk_init(&argc, &argv);
438 >        }
439 > #endif
440 >
441 >        // Read preferences
442 >        PrefsInit(argc, argv);
443 >
444 >        // Any command line arguments left?
445 >        for (int i=1; i<argc; i++) {
446 >                if (argv[i][0] == '-') {
447                          fprintf(stderr, "Unrecognized option '%s'\n", argv[i]);
448                          usage(argv[0]);
449                  }
450          }
451  
452 + #ifdef USE_SDL
453 +        // Initialize SDL system
454 +        int sdl_flags = 0;
455 + #ifdef USE_SDL_VIDEO
456 +        sdl_flags |= SDL_INIT_VIDEO;
457 + #endif
458 + #ifdef USE_SDL_AUDIO
459 +        sdl_flags |= SDL_INIT_AUDIO;
460 + #endif
461 +        assert(sdl_flags != 0);
462 +        if (SDL_Init(sdl_flags) == -1) {
463 +                char str[256];
464 +                sprintf(str, "Could not initialize SDL: %s.\n", SDL_GetError());
465 +                ErrorAlert(str);
466 +                goto quit;
467 +        }
468 +        atexit(SDL_Quit);
469 + #endif
470 +
471 + #ifndef USE_SDL_VIDEO
472          // Open display
473          x_display = XOpenDisplay(x_display_name);
474          if (x_display == NULL) {
# Line 365 | Line 482 | int main(int argc, char **argv)
482          // Fork out, so we can return from fullscreen mode when things get ugly
483          XF86DGAForkApp(DefaultScreen(x_display));
484   #endif
485 + #endif
486  
487   #ifdef ENABLE_MON
488          // Initialize mon
489          mon_init();
490   #endif
491  
492 + #if !EMULATED_PPC
493 +        // Create and install stacks for signal handlers
494 +        sig_stack.ss_sp = malloc(SIG_STACK_SIZE);
495 +        D(bug("Signal stack at %p\n", sig_stack.ss_sp));
496 +        if (sig_stack.ss_sp == NULL) {
497 +                ErrorAlert(GetString(STR_NOT_ENOUGH_MEMORY_ERR));
498 +                goto quit;
499 +        }
500 +        sig_stack.ss_flags = 0;
501 +        sig_stack.ss_size = SIG_STACK_SIZE;
502 +        if (sigaltstack(&sig_stack, NULL) < 0) {
503 +                sprintf(str, GetString(STR_SIGALTSTACK_ERR), strerror(errno));
504 +                ErrorAlert(str);
505 +                goto quit;
506 +        }
507 +        extra_stack.ss_sp = malloc(SIG_STACK_SIZE);
508 +        D(bug("Extra stack at %p\n", extra_stack.ss_sp));
509 +        if (extra_stack.ss_sp == NULL) {
510 +                ErrorAlert(GetString(STR_NOT_ENOUGH_MEMORY_ERR));
511 +                goto quit;
512 +        }
513 +        extra_stack.ss_flags = 0;
514 +        extra_stack.ss_size = SIG_STACK_SIZE;
515 + #endif
516 +
517 + #if !EMULATED_PPC
518 +        // Install SIGSEGV and SIGBUS handlers
519 +        sigemptyset(&sigsegv_action.sa_mask);   // Block interrupts during SEGV handling
520 +        sigaddset(&sigsegv_action.sa_mask, SIGUSR2);
521 +        sigsegv_action.sa_sigaction = sigsegv_handler;
522 +        sigsegv_action.sa_flags = SA_ONSTACK | SA_SIGINFO;
523 + #ifdef HAVE_SIGNAL_SA_RESTORER
524 +        sigsegv_action.sa_restorer = NULL;
525 + #endif
526 +        if (sigaction(SIGSEGV, &sigsegv_action, NULL) < 0) {
527 +                sprintf(str, GetString(STR_SIG_INSTALL_ERR), "SIGSEGV", strerror(errno));
528 +                ErrorAlert(str);
529 +                goto quit;
530 +        }
531 +        if (sigaction(SIGBUS, &sigsegv_action, NULL) < 0) {
532 +                sprintf(str, GetString(STR_SIG_INSTALL_ERR), "SIGBUS", strerror(errno));
533 +                ErrorAlert(str);
534 +                goto quit;
535 +        }
536 + #else
537 +        // Install SIGSEGV handler for CPU emulator
538 +        if (!sigsegv_install_handler(sigsegv_handler)) {
539 +                sprintf(str, GetString(STR_SIG_INSTALL_ERR), "SIGSEGV", strerror(errno));
540 +                ErrorAlert(str);
541 +                goto quit;
542 +        }
543 + #endif
544 +
545 +        // Initialize VM system
546 +        vm_init();
547 +
548          // Get system info
549          PVR = 0x00040000;                       // Default: 604
550          CPUClockSpeed = 100000000;      // Default: 100MHz
551          BusClockSpeed = 100000000;      // Default: 100MHz
552 < #if !EMULATED_PPC
552 >        TimebaseSpeed =  25000000;      // Default:  25MHz
553 > #if EMULATED_PPC
554 >        PVR = 0x000c0000;                       // Default: 7400 (with AltiVec)
555 > #elif defined(__APPLE__) && defined(__MACH__)
556 >        proc_file = popen("ioreg -c IOPlatformDevice", "r");
557 >        if (proc_file) {
558 >                char line[256];
559 >                bool powerpc_node = false;
560 >                while (fgets(line, sizeof(line) - 1, proc_file)) {
561 >                        // Read line
562 >                        int len = strlen(line);
563 >                        if (len == 0)
564 >                                continue;
565 >                        line[len - 1] = 0;
566 >
567 >                        // Parse line
568 >                        if (strstr(line, "o PowerPC,"))
569 >                                powerpc_node = true;
570 >                        else if (powerpc_node) {
571 >                                uint32 value;
572 >                                char head[256];
573 >                                if (sscanf(line, "%[ |]\"cpu-version\" = <%x>", head, &value) == 2)
574 >                                        PVR = value;
575 >                                else if (sscanf(line, "%[ |]\"clock-frequency\" = <%x>", head, &value) == 2)
576 >                                        CPUClockSpeed = value;
577 >                                else if (sscanf(line, "%[ |]\"bus-frequency\" = <%x>", head, &value) == 2)
578 >                                        BusClockSpeed = value;
579 >                                else if (sscanf(line, "%[ |]\"timebase-frequency\" = <%x>", head, &value) == 2)
580 >                                        TimebaseSpeed = value;
581 >                                else if (strchr(line, '}'))
582 >                                        powerpc_node = false;
583 >                        }
584 >                }
585 >                fclose(proc_file);
586 >        } else {
587 >                sprintf(str, GetString(STR_PROC_CPUINFO_WARN), strerror(errno));
588 >                WarningAlert(str);
589 >        }
590 > #else
591          proc_file = fopen("/proc/cpuinfo", "r");
592          if (proc_file) {
593 +                // CPU specs from Linux kernel
594 +                // TODO: make it more generic with features (e.g. AltiVec) and
595 +                // cache information and friends for NameRegistry
596 +                static const struct {
597 +                        uint32 pvr_mask;
598 +                        uint32 pvr_value;
599 +                        const char *cpu_name;
600 +                }
601 +                cpu_specs[] = {
602 +                        { 0xffff0000, 0x00010000, "601" },
603 +                        { 0xffff0000, 0x00030000, "603" },
604 +                        { 0xffff0000, 0x00060000, "603e" },
605 +                        { 0xffff0000, 0x00070000, "603ev" },
606 +                        { 0xffff0000, 0x00040000, "604" },
607 +                        { 0xfffff000, 0x00090000, "604e" },
608 +                        { 0xffff0000, 0x00090000, "604r" },
609 +                        { 0xffff0000, 0x000a0000, "604ev" },
610 +                        { 0xffffffff, 0x00084202, "740/750" },
611 +                        { 0xfffff000, 0x00083000, "745/755" },
612 +                        { 0xfffffff0, 0x00080100, "750CX" },
613 +                        { 0xfffffff0, 0x00082200, "750CX" },
614 +                        { 0xfffffff0, 0x00082210, "750CXe" },
615 +                        { 0xffffff00, 0x70000100, "750FX" },
616 +                        { 0xffffffff, 0x70000200, "750FX" },
617 +                        { 0xffff0000, 0x70000000, "750FX" },
618 +                        { 0xffff0000, 0x70020000, "750GX" },
619 +                        { 0xffff0000, 0x00080000, "740/750" },
620 +                        { 0xffffffff, 0x000c1101, "7400 (1.1)" },
621 +                        { 0xffff0000, 0x000c0000, "7400" },
622 +                        { 0xffff0000, 0x800c0000, "7410" },
623 +                        { 0xffffffff, 0x80000200, "7450" },
624 +                        { 0xffffffff, 0x80000201, "7450" },
625 +                        { 0xffff0000, 0x80000000, "7450" },
626 +                        { 0xffffff00, 0x80010100, "7455" },
627 +                        { 0xffffffff, 0x80010200, "7455" },
628 +                        { 0xffff0000, 0x80010000, "7455" },
629 +                        { 0xffff0000, 0x80020000, "7457" },
630 +                        { 0xffff0000, 0x80030000, "7447A" },
631 +                        { 0xffff0000, 0x80040000, "7448" },
632 +                        { 0x7fff0000, 0x00810000, "82xx" },
633 +                        { 0x7fff0000, 0x00820000, "8280" },
634 +                        { 0xffff0000, 0x00400000, "Power3 (630)" },
635 +                        { 0xffff0000, 0x00410000, "Power3 (630+)" },
636 +                        { 0xffff0000, 0x00360000, "I-star" },
637 +                        { 0xffff0000, 0x00370000, "S-star" },
638 +                        { 0xffff0000, 0x00350000, "Power4" },
639 +                        { 0xffff0000, 0x00390000, "PPC970" },
640 +                        { 0xffff0000, 0x003c0000, "PPC970FX" },
641 +                        { 0xffff0000, 0x003a0000, "POWER5 (gr)" },
642 +                        { 0xffff0000, 0x003b0000, "POWER5 (gs)" },
643 +                        { 0, 0, 0 }
644 +                };
645 +
646                  char line[256];
647                  while(fgets(line, 255, proc_file)) {
648                          // Read line
# Line 389 | Line 654 | int main(int argc, char **argv)
654                          // Parse line
655                          int i;
656                          char value[256];
657 <                        if (sscanf(line, "cpu : %s", value) == 1) {
658 <                                if (strcmp(value, "601") == 0)
659 <                                        PVR = 0x00010000;
660 <                                else if (strcmp(value, "603") == 0)
661 <                                        PVR = 0x00030000;
662 <                                else if (strcmp(value, "604") == 0)
663 <                                        PVR = 0x00040000;
664 <                                else if (strcmp(value, "603e") == 0)
665 <                                        PVR = 0x00060000;
666 <                                else if (strcmp(value, "603ev") == 0)
667 <                                        PVR = 0x00070000;
403 <                                else if (strcmp(value, "604e") == 0)
404 <                                        PVR = 0x00090000;
405 <                                else if (strcmp(value, "604ev5") == 0)
406 <                                        PVR = 0x000a0000;
407 <                                else if (strcmp(value, "750") == 0)
408 <                                        PVR = 0x00080000;
409 <                                else if (strcmp(value, "821") == 0)
410 <                                        PVR = 0x00320000;
411 <                                else if (strcmp(value, "860") == 0)
412 <                                        PVR = 0x00500000;
413 <                                else
657 >                        if (sscanf(line, "cpu : %[0-9A-Za-a]", value) == 1) {
658 >                                // Search by name
659 >                                const char *cpu_name = NULL;
660 >                                for (int i = 0; cpu_specs[i].pvr_mask != 0; i++) {
661 >                                        if (strcmp(cpu_specs[i].cpu_name, value) == 0) {
662 >                                                cpu_name = cpu_specs[i].cpu_name;
663 >                                                PVR = cpu_specs[i].pvr_value;
664 >                                                break;
665 >                                        }
666 >                                }
667 >                                if (cpu_name == NULL)
668                                          printf("WARNING: Unknown CPU type '%s', assuming 604\n", value);
669 +                                else
670 +                                        printf("Found a PowerPC %s processor\n", cpu_name);
671                          }
672                          if (sscanf(line, "clock : %dMHz", &i) == 1)
673                                  CPUClockSpeed = BusClockSpeed = i * 1000000;
# Line 421 | Line 677 | int main(int argc, char **argv)
677                  sprintf(str, GetString(STR_PROC_CPUINFO_WARN), strerror(errno));
678                  WarningAlert(str);
679          }
680 +
681 +        // Get actual bus frequency
682 +        proc_file = fopen("/proc/device-tree/clock-frequency", "r");
683 +        if (proc_file) {
684 +                union { uint8 b[4]; uint32 l; } value;
685 +                if (fread(value.b, sizeof(value), 1, proc_file) == 1)
686 +                        BusClockSpeed = value.l;
687 +                fclose(proc_file);
688 +        }
689 +
690 +        // Get actual timebase frequency
691 +        TimebaseSpeed = BusClockSpeed / 4;
692 +        DIR *cpus_dir;
693 +        if ((cpus_dir = opendir("/proc/device-tree/cpus")) != NULL) {
694 +                struct dirent *cpu_entry;
695 +                while ((cpu_entry = readdir(cpus_dir)) != NULL) {
696 +                        if (strstr(cpu_entry->d_name, "PowerPC,") == cpu_entry->d_name) {
697 +                                char timebase_freq_node[256];
698 +                                sprintf(timebase_freq_node, "/proc/device-tree/cpus/%s/timebase-frequency", cpu_entry->d_name);
699 +                                proc_file = fopen(timebase_freq_node, "r");
700 +                                if (proc_file) {
701 +                                        union { uint8 b[4]; uint32 l; } value;
702 +                                        if (fread(value.b, sizeof(value), 1, proc_file) == 1)
703 +                                                TimebaseSpeed = value.l;
704 +                                        fclose(proc_file);
705 +                                }
706 +                        }
707 +                }
708 +                closedir(cpus_dir);
709 +        }
710   #endif
711 +        // Remap any newer G4/G5 processor to plain G4 for compatibility
712 +        switch (PVR >> 16) {
713 +        case 0x8000:                            // 7450
714 +        case 0x8001:                            // 7455
715 +        case 0x8002:                            // 7457
716 +        case 0x8003:                            // 7447A
717 +        case 0x8004:                            // 7448
718 +        case 0x0039:                            //  970
719 +        case 0x003c:                            //  970FX
720 +                PVR = 0x000c0000;               // 7400
721 +                break;
722 +        }
723          D(bug("PVR: %08x (assumed)\n", PVR));
724  
725          // Init system routines
# Line 445 | Line 743 | int main(int argc, char **argv)
743                  goto quit;
744          }
745  
746 + #ifndef PAGEZERO_HACK
747          // Create Low Memory area (0x0000..0x3000)
748 <        if (vm_acquire_fixed((char *)0, 0x3000) < 0) {
748 >        if (vm_mac_acquire(0, 0x3000) < 0) {
749                  sprintf(str, GetString(STR_LOW_MEM_MMAP_ERR), strerror(errno));
750                  ErrorAlert(str);
751                  goto quit;
752          }
753          lm_area_mapped = true;
754 + #endif
755  
756          // Create areas for Kernel Data
757 <        kernel_area = shmget(IPC_PRIVATE, KERNEL_AREA_SIZE, 0600);
758 <        if (kernel_area == -1) {
759 <                sprintf(str, GetString(STR_KD_SHMGET_ERR), strerror(errno));
757 >        if (!kernel_data_init())
758 >                goto quit;
759 >        kernel_data = (KernelData *)Mac2HostAddr(KERNEL_DATA_BASE);
760 >        emulator_data = &kernel_data->ed;
761 >        KernelDataAddr = KERNEL_DATA_BASE;
762 >        D(bug("Kernel Data at %p (%08x)\n", kernel_data, KERNEL_DATA_BASE));
763 >        D(bug("Emulator Data at %p (%08x)\n", emulator_data, KERNEL_DATA_BASE + offsetof(KernelData, ed)));
764 >
765 >        // Create area for DR Cache
766 >        if (vm_mac_acquire(DR_EMULATOR_BASE, DR_EMULATOR_SIZE) < 0) {
767 >                sprintf(str, GetString(STR_DR_EMULATOR_MMAP_ERR), strerror(errno));
768                  ErrorAlert(str);
769                  goto quit;
770          }
771 <        if (shmat(kernel_area, (void *)KERNEL_DATA_BASE, 0) < 0) {
772 <                sprintf(str, GetString(STR_KD_SHMAT_ERR), strerror(errno));
771 >        dr_emulator_area_mapped = true;
772 >        if (vm_mac_acquire(DR_CACHE_BASE, DR_CACHE_SIZE) < 0) {
773 >                sprintf(str, GetString(STR_DR_CACHE_MMAP_ERR), strerror(errno));
774                  ErrorAlert(str);
775                  goto quit;
776          }
777 <        if (shmat(kernel_area, (void *)KERNEL_DATA2_BASE, 0) < 0) {
778 <                sprintf(str, GetString(STR_KD2_SHMAT_ERR), strerror(errno));
777 >        dr_cache_area_mapped = true;
778 > #if !EMULATED_PPC
779 >        if (vm_protect((char *)DR_CACHE_BASE, DR_CACHE_SIZE, VM_PAGE_READ | VM_PAGE_WRITE | VM_PAGE_EXECUTE) < 0) {
780 >                sprintf(str, GetString(STR_DR_CACHE_MMAP_ERR), strerror(errno));
781                  ErrorAlert(str);
782                  goto quit;
783          }
784 <        kernel_data = (KernelData *)0x68ffe000;
785 <        emulator_data = &kernel_data->ed;
786 <        KernelDataAddr = (uint32)kernel_data;
476 <        D(bug("Kernel Data at %p, Emulator Data at %p\n", kernel_data, emulator_data));
784 > #endif
785 >        DRCacheAddr = DR_CACHE_BASE;
786 >        D(bug("DR Cache at %p\n", DRCacheAddr));
787  
788          // Create area for SheepShaver data
789 <        if (vm_acquire_fixed((char *)SHEEP_BASE, SHEEP_SIZE) < 0) {
789 >        if (!SheepMem::Init()) {
790                  sprintf(str, GetString(STR_SHEEP_MEM_MMAP_ERR), strerror(errno));
791                  ErrorAlert(str);
792                  goto quit;
793          }
484        SheepStack1Base = SHEEP_BASE + 0x10000;
485        SheepStack2Base = SheepStack1Base + 0x10000;
486        SheepThunksBase = SheepStack2Base + 0x1000;
487        sheep_area_mapped = true;
794  
795          // Create area for Mac ROM
796 <        if (vm_acquire_fixed((char *)ROM_BASE, ROM_AREA_SIZE) < 0) {
796 >        if (vm_mac_acquire(ROM_BASE, ROM_AREA_SIZE) < 0) {
797                  sprintf(str, GetString(STR_ROM_MMAP_ERR), strerror(errno));
798                  ErrorAlert(str);
799                  goto quit;
800          }
801 < #if !EMULATED_PPC || defined(__powerpc__)
802 <        if (vm_protect((char *)ROM_BASE, ROM_AREA_SIZE, VM_PAGE_READ | VM_PAGE_WRITE | VM_PAGE_EXECUTE) < 0) {
801 >        ROMBaseHost = Mac2HostAddr(ROM_BASE);
802 > #if !EMULATED_PPC
803 >        if (vm_protect(ROMBaseHost, ROM_AREA_SIZE, VM_PAGE_READ | VM_PAGE_WRITE | VM_PAGE_EXECUTE) < 0) {
804                  sprintf(str, GetString(STR_ROM_MMAP_ERR), strerror(errno));
805                  ErrorAlert(str);
806                  goto quit;
807          }
808   #endif
809          rom_area_mapped = true;
810 <        D(bug("ROM area at %08x\n", ROM_BASE));
810 >        D(bug("ROM area at %p (%08x)\n", ROMBaseHost, ROM_BASE));
811  
812          // Create area for Mac RAM
813          RAMSize = PrefsFindInt32("ramsize");
# Line 509 | Line 816 | int main(int argc, char **argv)
816                  RAMSize = 8*1024*1024;
817          }
818  
819 <        if (vm_acquire_fixed((char *)RAM_BASE, RAMSize) < 0) {
819 >        if (vm_mac_acquire(RAM_BASE, RAMSize) < 0) {
820                  sprintf(str, GetString(STR_RAM_MMAP_ERR), strerror(errno));
821                  ErrorAlert(str);
822                  goto quit;
823          }
824 +        RAMBaseHost = Mac2HostAddr(RAM_BASE);
825   #if !EMULATED_PPC
826 <        if (vm_protect((char *)RAM_BASE, RAMSize, VM_PAGE_READ | VM_PAGE_WRITE | VM_PAGE_EXECUTE) < 0) {
826 >        if (vm_protect(RAMBaseHost, RAMSize, VM_PAGE_READ | VM_PAGE_WRITE | VM_PAGE_EXECUTE) < 0) {
827                  sprintf(str, GetString(STR_RAM_MMAP_ERR), strerror(errno));
828                  ErrorAlert(str);
829                  goto quit;
# Line 523 | Line 831 | int main(int argc, char **argv)
831   #endif
832          RAMBase = RAM_BASE;
833          ram_area_mapped = true;
834 <        D(bug("RAM area at %08x\n", RAMBase));
834 >        D(bug("RAM area at %p (%08x)\n", RAMBaseHost, RAMBase));
835  
836          if (RAMBase > ROM_BASE) {
837                  ErrorAlert(GetString(STR_RAM_HIGHER_THAN_ROM_ERR));
# Line 559 | Line 867 | int main(int argc, char **argv)
867          }
868          delete[] rom_tmp;
869  
870 <        // Load NVRAM
871 <        XPRAMInit();
564 <
565 <        // Set boot volume
566 <        i16 = PrefsFindInt32("bootdrive");
567 <        XPRAM[0x1378] = i16 >> 8;
568 <        XPRAM[0x1379] = i16 & 0xff;
569 <        i16 = PrefsFindInt32("bootdriver");
570 <        XPRAM[0x137a] = i16 >> 8;
571 <        XPRAM[0x137b] = i16 & 0xff;
572 <
573 <        // Create BootGlobs at top of Mac memory
574 <        memset((void *)(RAMBase + RAMSize - 4096), 0, 4096);
575 <        BootGlobsAddr = RAMBase + RAMSize - 0x1c;
576 <        boot_globs = (uint32 *)BootGlobsAddr;
577 <        boot_globs[-5] = htonl(RAMBase + RAMSize);      // MemTop
578 <        boot_globs[0] = htonl(RAMBase);                         // First RAM bank
579 <        boot_globs[1] = htonl(RAMSize);
580 <        boot_globs[2] = htonl((uint32)-1);                      // End of bank table
581 <
582 <        // Init drivers
583 <        SonyInit();
584 <        DiskInit();
585 <        CDROMInit();
586 <        SCSIInit();
587 <
588 <        // Init external file system
589 <        ExtFSInit();
590 <
591 <        // Init audio
592 <        AudioInit();
593 <
594 <        // Init network
595 <        EtherInit();
596 <
597 <        // Init serial ports
598 <        SerialInit();
599 <
600 <        // Init Time Manager
601 <        TimerInit();
602 <
603 <        // Init clipboard
604 <        ClipInit();
605 <
606 <        // Init video
607 <        if (!VideoInit())
608 <                goto quit;
609 <
610 <        // Install ROM patches
611 <        if (!PatchROM()) {
612 <                ErrorAlert(GetString(STR_UNSUPPORTED_ROM_TYPE_ERR));
870 >        // Initialize everything
871 >        if (!InitAll())
872                  goto quit;
873 <        }
873 >        D(bug("Initialization complete\n"));
874  
875          // Clear caches (as we loaded and patched code) and write protect ROM
876   #if !EMULATED_PPC
877 <        MakeExecutable(0, (void *)ROM_BASE, ROM_AREA_SIZE);
619 < #endif
620 <        vm_protect((char *)ROM_BASE, ROM_AREA_SIZE, VM_PAGE_READ | VM_PAGE_EXECUTE);
621 <
622 <        // Initialize Kernel Data
623 <        memset(kernel_data, 0, sizeof(KernelData));
624 <        if (ROMType == ROMTYPE_NEWWORLD) {
625 <                static uint32 of_dev_tree[4] = {0, 0, 0, 0};
626 <                static uint8 vector_lookup_tbl[128];
627 <                static uint8 vector_mask_tbl[64];
628 <                memset((uint8 *)kernel_data + 0xb80, 0x3d, 0x80);
629 <                memset(vector_lookup_tbl, 0, 128);
630 <                memset(vector_mask_tbl, 0, 64);
631 <                kernel_data->v[0xb80 >> 2] = htonl(ROM_BASE);
632 <                kernel_data->v[0xb84 >> 2] = htonl((uint32)of_dev_tree);        // OF device tree base
633 <                kernel_data->v[0xb90 >> 2] = htonl((uint32)vector_lookup_tbl);
634 <                kernel_data->v[0xb94 >> 2] = htonl((uint32)vector_mask_tbl);
635 <                kernel_data->v[0xb98 >> 2] = htonl(ROM_BASE);                           // OpenPIC base
636 <                kernel_data->v[0xbb0 >> 2] = htonl(0);                                          // ADB base
637 <                kernel_data->v[0xc20 >> 2] = htonl(RAMSize);
638 <                kernel_data->v[0xc24 >> 2] = htonl(RAMSize);
639 <                kernel_data->v[0xc30 >> 2] = htonl(RAMSize);
640 <                kernel_data->v[0xc34 >> 2] = htonl(RAMSize);
641 <                kernel_data->v[0xc38 >> 2] = htonl(0x00010020);
642 <                kernel_data->v[0xc3c >> 2] = htonl(0x00200001);
643 <                kernel_data->v[0xc40 >> 2] = htonl(0x00010000);
644 <                kernel_data->v[0xc50 >> 2] = htonl(RAMBase);
645 <                kernel_data->v[0xc54 >> 2] = htonl(RAMSize);
646 <                kernel_data->v[0xf60 >> 2] = htonl(PVR);
647 <                kernel_data->v[0xf64 >> 2] = htonl(CPUClockSpeed);
648 <                kernel_data->v[0xf68 >> 2] = htonl(BusClockSpeed);
649 <                kernel_data->v[0xf6c >> 2] = htonl(CPUClockSpeed);
650 <        } else {
651 <                kernel_data->v[0xc80 >> 2] = htonl(RAMSize);
652 <                kernel_data->v[0xc84 >> 2] = htonl(RAMSize);
653 <                kernel_data->v[0xc90 >> 2] = htonl(RAMSize);
654 <                kernel_data->v[0xc94 >> 2] = htonl(RAMSize);
655 <                kernel_data->v[0xc98 >> 2] = htonl(0x00010020);
656 <                kernel_data->v[0xc9c >> 2] = htonl(0x00200001);
657 <                kernel_data->v[0xca0 >> 2] = htonl(0x00010000);
658 <                kernel_data->v[0xcb0 >> 2] = htonl(RAMBase);
659 <                kernel_data->v[0xcb4 >> 2] = htonl(RAMSize);
660 <                kernel_data->v[0xf80 >> 2] = htonl(PVR);
661 <                kernel_data->v[0xf84 >> 2] = htonl(CPUClockSpeed);
662 <                kernel_data->v[0xf88 >> 2] = htonl(BusClockSpeed);
663 <                kernel_data->v[0xf8c >> 2] = htonl(CPUClockSpeed);
664 <        }
665 <
666 <        // Initialize extra low memory
667 <        D(bug("Initializing Low Memory...\n"));
668 <        memset(NULL, 0, 0x3000);
669 <        WriteMacInt32(XLM_SIGNATURE, FOURCC('B','a','a','h'));                  // Signature to detect SheepShaver
670 <        WriteMacInt32(XLM_KERNEL_DATA, (uint32)kernel_data);                    // For trap replacement routines
671 <        WriteMacInt32(XLM_PVR, PVR);                                                                    // Theoretical PVR
672 <        WriteMacInt32(XLM_BUS_CLOCK, BusClockSpeed);                                    // For DriverServicesLib patch
673 <        WriteMacInt16(XLM_EXEC_RETURN_OPCODE, M68K_EXEC_RETURN);                // For Execute68k() (RTS from the executed 68k code will jump here and end 68k mode)
674 < #if EMULATED_PPC
675 <        WriteMacInt32(XLM_ETHER_INIT, POWERPC_NATIVE_OP_FUNC(NATIVE_ETHER_INIT));
676 <        WriteMacInt32(XLM_ETHER_TERM, POWERPC_NATIVE_OP_FUNC(NATIVE_ETHER_TERM));
677 <        WriteMacInt32(XLM_ETHER_OPEN, POWERPC_NATIVE_OP_FUNC(NATIVE_ETHER_OPEN));
678 <        WriteMacInt32(XLM_ETHER_CLOSE, POWERPC_NATIVE_OP_FUNC(NATIVE_ETHER_CLOSE));
679 <        WriteMacInt32(XLM_ETHER_WPUT, POWERPC_NATIVE_OP_FUNC(NATIVE_ETHER_WPUT));
680 <        WriteMacInt32(XLM_ETHER_RSRV, POWERPC_NATIVE_OP_FUNC(NATIVE_ETHER_RSRV));
681 <        WriteMacInt32(XLM_VIDEO_DOIO, POWERPC_NATIVE_OP_FUNC(NATIVE_VIDEO_DO_DRIVER_IO));
682 < #else
683 <        WriteMacInt32(XLM_TOC, (uint32)TOC);                                                    // TOC pointer of emulator
684 <        WriteMacInt32(XLM_ETHER_INIT, (uint32)InitStreamModule);                // DLPI ethernet driver functions
685 <        WriteMacInt32(XLM_ETHER_TERM, (uint32)TerminateStreamModule);
686 <        WriteMacInt32(XLM_ETHER_OPEN, (uint32)ether_open);
687 <        WriteMacInt32(XLM_ETHER_CLOSE, (uint32)ether_close);
688 <        WriteMacInt32(XLM_ETHER_WPUT, (uint32)ether_wput);
689 <        WriteMacInt32(XLM_ETHER_RSRV, (uint32)ether_rsrv);
690 <        WriteMacInt32(XLM_VIDEO_DOIO, (uint32)VideoDoDriverIO);
877 >        flush_icache_range(ROM_BASE, ROM_BASE + ROM_AREA_SIZE);
878   #endif
879 <        D(bug("Low Memory initialized\n"));
879 >        vm_protect(ROMBaseHost, ROM_AREA_SIZE, VM_PAGE_READ | VM_PAGE_EXECUTE);
880  
881          // Start 60Hz thread
882 +        tick_thread_cancel = false;
883          tick_thread_active = (pthread_create(&tick_thread, NULL, tick_func, NULL) == 0);
884          D(bug("Tick thread installed (%ld)\n", tick_thread));
885  
886          // Start NVRAM watchdog thread
887          memcpy(last_xpram, XPRAM, XPRAM_SIZE);
888 +        nvram_thread_cancel = false;
889          nvram_thread_active = (pthread_create(&nvram_thread, NULL, nvram_func, NULL) == 0);
890          D(bug("NVRAM thread installed (%ld)\n", nvram_thread));
891  
892   #if !EMULATED_PPC
704        // Create and install stacks for signal handlers
705        sig_stack = malloc(SIG_STACK_SIZE);
706        D(bug("Signal stack at %p\n", sig_stack));
707        if (sig_stack == NULL) {
708                ErrorAlert(GetString(STR_NOT_ENOUGH_MEMORY_ERR));
709                goto quit;
710        }
711        extra_stack = malloc(SIG_STACK_SIZE);
712        D(bug("Extra stack at %p\n", extra_stack));
713        if (extra_stack == NULL) {
714                ErrorAlert(GetString(STR_NOT_ENOUGH_MEMORY_ERR));
715                goto quit;
716        }
717        struct sigaltstack new_stack;
718        new_stack.ss_sp = sig_stack;
719        new_stack.ss_flags = 0;
720        new_stack.ss_size = SIG_STACK_SIZE;
721        if (sigaltstack(&new_stack, NULL) < 0) {
722                sprintf(str, GetString(STR_SIGALTSTACK_ERR), strerror(errno));
723                ErrorAlert(str);
724                goto quit;
725        }
726 #endif
727
728 #if !EMULATED_PPC
729        // Install SIGSEGV handler
730        sigemptyset(&sigsegv_action.sa_mask);   // Block interrupts during SEGV handling
731        sigaddset(&sigsegv_action.sa_mask, SIGUSR2);
732        sigsegv_action.sa_handler = (__sighandler_t)sigsegv_handler;
733        sigsegv_action.sa_flags = SA_ONSTACK;
734        sigsegv_action.sa_restorer = NULL;
735        if (sigaction(SIGSEGV, &sigsegv_action, NULL) < 0) {
736                sprintf(str, GetString(STR_SIGSEGV_INSTALL_ERR), strerror(errno));
737                ErrorAlert(str);
738                goto quit;
739        }
740
893          // Install SIGILL handler
894          sigemptyset(&sigill_action.sa_mask);    // Block interrupts during ILL handling
895          sigaddset(&sigill_action.sa_mask, SIGUSR2);
896 <        sigill_action.sa_handler = (__sighandler_t)sigill_handler;
897 <        sigill_action.sa_flags = SA_ONSTACK;
896 >        sigill_action.sa_sigaction = sigill_handler;
897 >        sigill_action.sa_flags = SA_ONSTACK | SA_SIGINFO;
898 > #ifdef HAVE_SIGNAL_SA_RESTORER
899          sigill_action.sa_restorer = NULL;
900 + #endif
901          if (sigaction(SIGILL, &sigill_action, NULL) < 0) {
902 <                sprintf(str, GetString(STR_SIGILL_INSTALL_ERR), strerror(errno));
902 >                sprintf(str, GetString(STR_SIG_INSTALL_ERR), "SIGILL", strerror(errno));
903                  ErrorAlert(str);
904                  goto quit;
905          }
906   #endif
907  
908 + #if !EMULATED_PPC
909          // Install interrupt signal handler
910          sigemptyset(&sigusr2_action.sa_mask);
911 <        sigusr2_action.sa_handler = (__sighandler_t)sigusr2_handler;
912 <        sigusr2_action.sa_flags = 0;
913 < #if !EMULATED_PPC
759 <        sigusr2_action.sa_flags = SA_ONSTACK | SA_RESTART;
760 < #endif
911 >        sigusr2_action.sa_sigaction = sigusr2_handler_init;
912 >        sigusr2_action.sa_flags = SA_ONSTACK | SA_RESTART | SA_SIGINFO;
913 > #ifdef HAVE_SIGNAL_SA_RESTORER
914          sigusr2_action.sa_restorer = NULL;
915 + #endif
916          if (sigaction(SIGUSR2, &sigusr2_action, NULL) < 0) {
917 <                sprintf(str, GetString(STR_SIGUSR2_INSTALL_ERR), strerror(errno));
917 >                sprintf(str, GetString(STR_SIG_INSTALL_ERR), "SIGUSR2", strerror(errno));
918                  ErrorAlert(str);
919                  goto quit;
920          }
921 + #endif
922  
923          // Get my thread ID and execute MacOS thread function
924          emul_thread = pthread_self();
# Line 789 | Line 944 | static void Quit(void)
944  
945          // Stop 60Hz thread
946          if (tick_thread_active) {
947 +                tick_thread_cancel = true;
948                  pthread_cancel(tick_thread);
949                  pthread_join(tick_thread, NULL);
950          }
951  
952          // Stop NVRAM watchdog thread
953          if (nvram_thread_active) {
954 +                nvram_thread_cancel = true;
955                  pthread_cancel(nvram_thread);
956                  pthread_join(nvram_thread, NULL);
957          }
958  
959   #if !EMULATED_PPC
960 <        // Uninstall SIGSEGV handler
960 >        // Uninstall SIGSEGV and SIGBUS handlers
961          sigemptyset(&sigsegv_action.sa_mask);
962          sigsegv_action.sa_handler = SIG_DFL;
963          sigsegv_action.sa_flags = 0;
964          sigaction(SIGSEGV, &sigsegv_action, NULL);
965 +        sigaction(SIGBUS, &sigsegv_action, NULL);
966  
967          // Uninstall SIGILL handler
968          sigemptyset(&sigill_action.sa_mask);
969          sigill_action.sa_handler = SIG_DFL;
970          sigill_action.sa_flags = 0;
971          sigaction(SIGILL, &sigill_action, NULL);
814 #endif
815
816        // Save NVRAM
817        XPRAMExit();
818
819        // Exit clipboard
820        ClipExit();
821
822        // Exit Time Manager
823        TimerExit();
824
825        // Exit serial
826        SerialExit();
827
828        // Exit network
829        EtherExit();
830
831        // Exit audio
832        AudioExit();
972  
973 <        // Exit video
974 <        VideoExit();
973 >        // Delete stacks for signal handlers
974 >        if (sig_stack.ss_sp)
975 >                free(sig_stack.ss_sp);
976 >        if (extra_stack.ss_sp)
977 >                free(extra_stack.ss_sp);
978 > #endif
979  
980 <        // Exit external file system
981 <        ExtFSExit();
980 >        // Deinitialize everything
981 >        ExitAll();
982  
983 <        // Exit drivers
984 <        SCSIExit();
842 <        CDROMExit();
843 <        DiskExit();
844 <        SonyExit();
983 >        // Delete SheepShaver globals
984 >        SheepMem::Exit();
985  
986          // Delete RAM area
987          if (ram_area_mapped)
988 <                vm_release((char *)RAM_BASE, RAMSize);
988 >                vm_mac_release(RAM_BASE, RAMSize);
989  
990          // Delete ROM area
991          if (rom_area_mapped)
992 <                vm_release((char *)ROM_BASE, ROM_AREA_SIZE);
992 >                vm_mac_release(ROM_BASE, ROM_AREA_SIZE);
993 >
994 >        // Delete DR cache areas
995 >        if (dr_emulator_area_mapped)
996 >                vm_mac_release(DR_EMULATOR_BASE, DR_EMULATOR_SIZE);
997 >        if (dr_cache_area_mapped)
998 >                vm_mac_release(DR_CACHE_BASE, DR_CACHE_SIZE);
999  
1000          // Delete Kernel Data area
1001 <        if (kernel_area >= 0) {
856 <                shmdt((void *)KERNEL_DATA_BASE);
857 <                shmdt((void *)KERNEL_DATA2_BASE);
858 <                shmctl(kernel_area, IPC_RMID, NULL);
859 <        }
1001 >        kernel_data_exit();
1002  
1003          // Delete Low Memory area
1004          if (lm_area_mapped)
1005 <                munmap((char *)0x0000, 0x3000);
1005 >                vm_mac_release(0, 0x3000);
1006  
1007          // Close /dev/zero
1008          if (zero_fd > 0)
# Line 878 | Line 1020 | static void Quit(void)
1020   #endif
1021  
1022          // Close X11 server connection
1023 + #ifndef USE_SDL_VIDEO
1024          if (x_display)
1025                  XCloseDisplay(x_display);
1026 + #endif
1027 +
1028 +        // Notify GUI we are about to leave
1029 +        if (gui_connection) {
1030 +                if (rpc_method_invoke(gui_connection, RPC_METHOD_EXIT, RPC_TYPE_INVALID) == RPC_ERROR_NO_ERROR)
1031 +                        rpc_method_wait_for_reply(gui_connection, RPC_TYPE_INVALID);
1032 +        }
1033  
1034          exit(0);
1035   }
1036  
1037  
1038   /*
1039 + *  Initialize Kernel Data segments
1040 + */
1041 +
1042 + static bool kernel_data_init(void)
1043 + {
1044 +        char str[256];
1045 +        uint32 kernel_area_size = (KERNEL_AREA_SIZE + SHMLBA - 1) & -SHMLBA;
1046 +
1047 +        kernel_area = shmget(IPC_PRIVATE, kernel_area_size, 0600);
1048 +        if (kernel_area == -1) {
1049 +                sprintf(str, GetString(STR_KD_SHMGET_ERR), strerror(errno));
1050 +                ErrorAlert(str);
1051 +                return false;
1052 +        }
1053 +        void *kernel_addr = Mac2HostAddr(KERNEL_DATA_BASE & -SHMLBA);
1054 +        if (shmat(kernel_area, kernel_addr, 0) != kernel_addr) {
1055 +                sprintf(str, GetString(STR_KD_SHMAT_ERR), strerror(errno));
1056 +                ErrorAlert(str);
1057 +                return false;
1058 +        }
1059 +        kernel_addr = Mac2HostAddr(KERNEL_DATA2_BASE & -SHMLBA);
1060 +        if (shmat(kernel_area, kernel_addr, 0) != kernel_addr) {
1061 +                sprintf(str, GetString(STR_KD2_SHMAT_ERR), strerror(errno));
1062 +                ErrorAlert(str);
1063 +                return false;
1064 +        }
1065 +        return true;
1066 + }
1067 +
1068 +
1069 + /*
1070 + *  Deallocate Kernel Data segments
1071 + */
1072 +
1073 + static void kernel_data_exit(void)
1074 + {
1075 +        if (kernel_area >= 0) {
1076 +                shmdt(Mac2HostAddr(KERNEL_DATA_BASE & -SHMLBA));
1077 +                shmdt(Mac2HostAddr(KERNEL_DATA2_BASE & -SHMLBA));
1078 +                shmctl(kernel_area, IPC_RMID, NULL);
1079 +        }
1080 + }
1081 +
1082 +
1083 + /*
1084   *  Jump into Mac ROM, start 680x0 emulator
1085   */
1086  
# Line 954 | Line 1149 | void Execute68kTrap(uint16 trap, M68kReg
1149          uint16 proc[2] = {trap, M68K_RTS};
1150          Execute68k((uint32)proc, r);
1151   }
957
958
959 /*
960 *  Execute PPC code from EMUL_OP routine (real mode switch)
961 */
962
963 void ExecutePPC(void (*func)())
964 {
965        uint32 tvect[2] = {(uint32)func, 0};    // Fake TVECT
966        RoutineDescriptor desc = BUILD_PPC_ROUTINE_DESCRIPTOR(0, tvect);
967        M68kRegisters r;
968        Execute68k((uint32)&desc, &r);
969 }
1152   #endif
1153  
1154  
# Line 985 | Line 1167 | void QuitEmulator(void)
1167  
1168  
1169   /*
988 *  Pause/resume emulator
989 */
990
991 void PauseEmulator(void)
992 {
993        pthread_kill(emul_thread, SIGSTOP);
994 }
995
996 void ResumeEmulator(void)
997 {
998        pthread_kill(emul_thread, SIGCONT);
999 }
1000
1001
1002 /*
1170   *  Dump 68k registers
1171   */
1172  
# Line 1027 | Line 1194 | void Dump68kRegs(M68kRegisters *r)
1194   *  Make code executable
1195   */
1196  
1197 < void MakeExecutable(int dummy, void *start, uint32 length)
1197 > void MakeExecutable(int dummy, uint32 start, uint32 length)
1198   {
1199 <        if (((uintptr)start >= ROM_BASE) && ((uintptr)start < (ROM_BASE + ROM_SIZE)))
1199 >        if ((start >= ROM_BASE) && (start < (ROM_BASE + ROM_SIZE)))
1200                  return;
1201   #if EMULATED_PPC
1202 <        FlushCodeCache((uintptr)start, (uintptr)start + length);
1202 >        FlushCodeCache(start, start + length);
1203   #else
1204 <        flush_icache_range(start, (void *)((uintptr)start + length));
1204 >        flush_icache_range(start, start + length);
1205   #endif
1206   }
1207  
1208  
1209   /*
1210 < *  Patch things after system startup (gets called by disk driver accRun routine)
1210 > *  NVRAM watchdog thread (saves NVRAM every minute)
1211   */
1212  
1213 < void PatchAfterStartup(void)
1213 > static void nvram_watchdog(void)
1214   {
1215 < #if EMULATED_PPC
1216 <        ExecuteNative(NATIVE_VIDEO_INSTALL_ACCEL);
1217 < #else
1218 <        ExecutePPC(VideoInstallAccel);
1052 < #endif
1053 <        InstallExtFS();
1215 >        if (memcmp(last_xpram, XPRAM, XPRAM_SIZE)) {
1216 >                memcpy(last_xpram, XPRAM, XPRAM_SIZE);
1217 >                SaveXPRAM();
1218 >        }
1219   }
1220  
1056
1057 /*
1058 *  NVRAM watchdog thread (saves NVRAM every minute)
1059 */
1060
1221   static void *nvram_func(void *arg)
1222   {
1223 <        struct timespec req = {60, 0};  // 1 minute
1224 <
1225 <        for (;;) {
1226 <                pthread_testcancel();
1067 <                nanosleep(&req, NULL);
1068 <                pthread_testcancel();
1069 <                if (memcmp(last_xpram, XPRAM, XPRAM_SIZE)) {
1070 <                        memcpy(last_xpram, XPRAM, XPRAM_SIZE);
1071 <                        SaveXPRAM();
1072 <                }
1223 >        while (!nvram_thread_cancel) {
1224 >                for (int i=0; i<60 && !nvram_thread_cancel; i++)
1225 >                        Delay_usec(999999);             // Only wait 1 second so we quit promptly when nvram_thread_cancel becomes true
1226 >                nvram_watchdog();
1227          }
1228          return NULL;
1229   }
# Line 1082 | Line 1236 | static void *nvram_func(void *arg)
1236   static void *tick_func(void *arg)
1237   {
1238          int tick_counter = 0;
1239 <        struct timespec req = {0, 16625000};
1239 >        uint64 start = GetTicks_usec();
1240 >        int64 ticks = 0;
1241 >        uint64 next = GetTicks_usec();
1242  
1243 <        for (;;) {
1243 >        while (!tick_thread_cancel) {
1244  
1245                  // Wait
1246 <                nanosleep(&req, NULL);
1246 >                next += 16625;
1247 >                int64 delay = next - GetTicks_usec();
1248 >                if (delay > 0)
1249 >                        Delay_usec(delay);
1250 >                else if (delay < -16625)
1251 >                        next = GetTicks_usec();
1252 >                ticks++;
1253  
1254   #if !EMULATED_PPC
1255                  // Did we crash?
1256                  if (emul_thread_fatal) {
1257  
1258                          // Yes, dump registers
1259 <                        pt_regs *r = (pt_regs *)&sigsegv_regs;
1259 >                        sigregs *r = &sigsegv_regs;
1260                          char str[256];
1261 <                        sprintf(str, "SIGSEGV\n"
1261 >                        if (crash_reason == NULL)
1262 >                                crash_reason = "SIGSEGV";
1263 >                        sprintf(str, "%s\n"
1264                                  "   pc %08lx     lr %08lx    ctr %08lx    msr %08lx\n"
1265                                  "  xer %08lx     cr %08lx  \n"
1266                                  "   r0 %08lx     r1 %08lx     r2 %08lx     r3 %08lx\n"
# Line 1107 | Line 1271 | static void *tick_func(void *arg)
1271                                  "  r20 %08lx    r21 %08lx    r22 %08lx    r23 %08lx\n"
1272                                  "  r24 %08lx    r25 %08lx    r26 %08lx    r27 %08lx\n"
1273                                  "  r28 %08lx    r29 %08lx    r30 %08lx    r31 %08lx\n",
1274 +                                crash_reason,
1275                                  r->nip, r->link, r->ctr, r->msr,
1276                                  r->xer, r->ccr,
1277                                  r->gpr[0], r->gpr[1], r->gpr[2], r->gpr[3],
# Line 1142 | Line 1307 | static void *tick_func(void *arg)
1307                          TriggerInterrupt();
1308                  }
1309          }
1310 +
1311 +        uint64 end = GetTicks_usec();
1312 +        D(bug("%lld ticks in %lld usec = %f ticks/sec\n", ticks, end - start, ticks * 1000000.0 / (end - start)));
1313          return NULL;
1314   }
1315  
# Line 1152 | Line 1320 | static void *tick_func(void *arg)
1320  
1321   void Set_pthread_attr(pthread_attr_t *attr, int priority)
1322   {
1323 <        // nothing to do
1323 > #ifdef HAVE_PTHREADS
1324 >        pthread_attr_init(attr);
1325 > #if defined(_POSIX_THREAD_PRIORITY_SCHEDULING)
1326 >        // Some of these only work for superuser
1327 >        if (geteuid() == 0) {
1328 >                pthread_attr_setinheritsched(attr, PTHREAD_EXPLICIT_SCHED);
1329 >                pthread_attr_setschedpolicy(attr, SCHED_FIFO);
1330 >                struct sched_param fifo_param;
1331 >                fifo_param.sched_priority = ((sched_get_priority_min(SCHED_FIFO) +
1332 >                                              sched_get_priority_max(SCHED_FIFO)) / 2 +
1333 >                                             priority);
1334 >                pthread_attr_setschedparam(attr, &fifo_param);
1335 >        }
1336 >        if (pthread_attr_setscope(attr, PTHREAD_SCOPE_SYSTEM) != 0) {
1337 > #ifdef PTHREAD_SCOPE_BOUND_NP
1338 >            // If system scope is not available (eg. we're not running
1339 >            // with CAP_SCHED_MGT capability on an SGI box), try bound
1340 >            // scope.  It exposes pthread scheduling to the kernel,
1341 >            // without setting realtime priority.
1342 >            pthread_attr_setscope(attr, PTHREAD_SCOPE_BOUND_NP);
1343 > #endif
1344 >        }
1345 > #endif
1346 > #endif
1347   }
1348  
1349  
# Line 1168 | Line 1359 | struct B2_mutex {
1359              pthread_mutexattr_init(&attr);
1360              // Initialize the mutex for priority inheritance --
1361              // required for accurate timing.
1362 < #ifdef HAVE_PTHREAD_MUTEXATTR_SETPROTOCOL
1362 > #if defined(HAVE_PTHREAD_MUTEXATTR_SETPROTOCOL) && !defined(__CYGWIN__)
1363              pthread_mutexattr_setprotocol(&attr, PTHREAD_PRIO_INHERIT);
1364   #endif
1365   #if defined(HAVE_PTHREAD_MUTEXATTR_SETTYPE) && defined(PTHREAD_MUTEX_NORMAL)
# Line 1239 | Line 1430 | void B2_delete_mutex(B2_mutex *mutex)
1430   *  Trigger signal USR2 from another thread
1431   */
1432  
1433 < #if !EMULATED_PPC || ASYNC_IRQ
1433 > #if !EMULATED_PPC
1434   void TriggerInterrupt(void)
1435   {
1436 <        if (ready_for_signals)
1436 >        if (ready_for_signals) {
1437 >                idle_resume();
1438                  pthread_kill(emul_thread, SIGUSR2);
1439 +        }
1440   }
1441   #endif
1442  
# Line 1271 | Line 1464 | void ClearInterruptFlag(uint32 flag)
1464  
1465   void DisableInterrupt(void)
1466   {
1467 + #if EMULATED_PPC
1468 +        WriteMacInt32(XLM_IRQ_NEST, int32(ReadMacInt32(XLM_IRQ_NEST)) + 1);
1469 + #else
1470          atomic_add((int *)XLM_IRQ_NEST, 1);
1471 + #endif
1472   }
1473  
1474  
# Line 1281 | Line 1478 | void DisableInterrupt(void)
1478  
1479   void EnableInterrupt(void)
1480   {
1481 + #if EMULATED_PPC
1482 +        WriteMacInt32(XLM_IRQ_NEST, int32(ReadMacInt32(XLM_IRQ_NEST)) - 1);
1483 + #else
1484          atomic_add((int *)XLM_IRQ_NEST, -1);
1485 + #endif
1486   }
1487  
1488  
# Line 1289 | Line 1490 | void EnableInterrupt(void)
1490   *  USR2 handler
1491   */
1492  
1493 < #if EMULATED_PPC
1494 < static void sigusr2_handler(int sig)
1493 > #if !EMULATED_PPC
1494 > void sigusr2_handler(int sig, siginfo_t *sip, void *scp)
1495   {
1496 < #if ASYNC_IRQ
1497 <        extern void HandleInterrupt(void);
1498 <        HandleInterrupt();
1496 >        machine_regs *r = MACHINE_REGISTERS(scp);
1497 >
1498 > #ifdef SYSTEM_CLOBBERS_R2
1499 >        // Restore pointer to Thread Local Storage
1500 >        set_r2(TOC);
1501 > #endif
1502 > #ifdef SYSTEM_CLOBBERS_R13
1503 >        // Restore pointer to .sdata section
1504 >        set_r13(R13);
1505 > #endif
1506 >
1507 > #ifdef USE_SDL_VIDEO
1508 >        // We must fill in the events queue in the same thread that did call SDL_SetVideoMode()
1509 >        SDL_PumpEvents();
1510   #endif
1299 }
1300 #else
1301 static void sigusr2_handler(int sig, sigcontext_struct *sc)
1302 {
1303        pt_regs *r = sc->regs;
1511  
1512          // Do nothing if interrupts are disabled
1513          if (*(int32 *)XLM_IRQ_NEST > 0)
# Line 1314 | Line 1521 | static void sigusr2_handler(int sig, sig
1521                  case MODE_68K:
1522                          // 68k emulator active, trigger 68k interrupt level 1
1523                          WriteMacInt16(ntohl(kernel_data->v[0x67c >> 2]), 1);
1524 <                        r->ccr |= ntohl(kernel_data->v[0x674 >> 2]);
1524 >                        r->cr() |= ntohl(kernel_data->v[0x674 >> 2]);
1525                          break;
1526  
1527   #if INTERRUPTS_IN_NATIVE_MODE
1528                  case MODE_NATIVE:
1529                          // 68k emulator inactive, in nanokernel?
1530 <                        if (r->gpr[1] != KernelDataAddr) {
1530 >                        if (r->gpr(1) != KernelDataAddr) {
1531 >
1532 >                                // Set extra stack for SIGSEGV handler
1533 >                                sigaltstack(&extra_stack, NULL);
1534 >                                
1535                                  // Prepare for 68k interrupt level 1
1536                                  WriteMacInt16(ntohl(kernel_data->v[0x67c >> 2]), 1);
1537                                  WriteMacInt32(ntohl(kernel_data->v[0x658 >> 2]) + 0xdc, ReadMacInt32(ntohl(kernel_data->v[0x658 >> 2]) + 0xdc) | ntohl(kernel_data->v[0x674 >> 2]));
1538  
1539                                  // Execute nanokernel interrupt routine (this will activate the 68k emulator)
1540 <                                atomic_add((int32 *)XLM_IRQ_NEST, 1);
1540 >                                DisableInterrupt();
1541                                  if (ROMType == ROMTYPE_NEWWORLD)
1542                                          ppc_interrupt(ROM_BASE + 0x312b1c, KernelDataAddr);
1543                                  else
1544                                          ppc_interrupt(ROM_BASE + 0x312a3c, KernelDataAddr);
1545 +
1546 +                                // Reset normal stack
1547 +                                sigaltstack(&sig_stack, NULL);
1548                          }
1549                          break;
1550   #endif
# Line 1341 | Line 1555 | static void sigusr2_handler(int sig, sig
1555                          if ((ReadMacInt32(XLM_68K_R25) & 7) == 0) {
1556  
1557                                  // Set extra stack for SIGSEGV handler
1558 <                                struct sigaltstack new_stack;
1345 <                                new_stack.ss_sp = extra_stack;
1346 <                                new_stack.ss_flags = 0;
1347 <                                new_stack.ss_size = SIG_STACK_SIZE;
1348 <                                sigaltstack(&new_stack, NULL);
1558 >                                sigaltstack(&extra_stack, NULL);
1559   #if 1
1560                                  // Execute full 68k interrupt routine
1561                                  M68kRegisters r;
# Line 1367 | Line 1577 | static void sigusr2_handler(int sig, sig
1577                                          if (InterruptFlags & INTFLAG_VIA) {
1578                                                  ClearInterruptFlag(INTFLAG_VIA);
1579                                                  ADBInterrupt();
1580 <                                                ExecutePPC(VideoVBL);
1580 >                                                ExecuteNative(NATIVE_VIDEO_VBL);
1581                                          }
1582                                  }
1583   #endif
1584 <                                // Reset normal signal stack
1585 <                                new_stack.ss_sp = sig_stack;
1376 <                                new_stack.ss_flags = 0;
1377 <                                new_stack.ss_size = SIG_STACK_SIZE;
1378 <                                sigaltstack(&new_stack, NULL);
1584 >                                // Reset normal stack
1585 >                                sigaltstack(&sig_stack, NULL);
1586                          }
1587                          break;
1588   #endif
# Line 1389 | Line 1596 | static void sigusr2_handler(int sig, sig
1596   */
1597  
1598   #if !EMULATED_PPC
1599 < static void sigsegv_handler(int sig, sigcontext_struct *sc)
1599 > static void sigsegv_handler(int sig, siginfo_t *sip, void *scp)
1600   {
1601 <        pt_regs *r = sc->regs;
1601 >        machine_regs *r = MACHINE_REGISTERS(scp);
1602  
1603          // Get effective address
1604 <        uint32 addr = r->dar;
1604 >        uint32 addr = r->dar();
1605          
1606 + #ifdef SYSTEM_CLOBBERS_R2
1607 +        // Restore pointer to Thread Local Storage
1608 +        set_r2(TOC);
1609 + #endif
1610 + #ifdef SYSTEM_CLOBBERS_R13
1611 +        // Restore pointer to .sdata section
1612 +        set_r13(R13);
1613 + #endif
1614 +
1615   #if ENABLE_VOSF
1616          // Handle screen fault.
1617          extern bool Screen_fault_handler(sigsegv_address_t fault_address, sigsegv_address_t fault_instruction);
1618 <        if (Screen_fault_handler((sigsegv_address_t)addr, (sigsegv_address_t)r->nip))
1618 >        if (Screen_fault_handler((sigsegv_address_t)addr, (sigsegv_address_t)r->pc()))
1619                  return;
1620   #endif
1621  
1622          num_segv++;
1623  
1624 <        // Fault in Mac ROM or RAM?
1625 <        bool mac_fault = (r->nip >= ROM_BASE) && (r->nip < (ROM_BASE + ROM_AREA_SIZE)) || (r->nip >= RAMBase) && (r->nip < (RAMBase + RAMSize));
1624 >        // Fault in Mac ROM or RAM or DR Cache?
1625 >        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));
1626          if (mac_fault) {
1627  
1628                  // "VM settings" during MacOS 8 installation
1629 <                if (r->nip == ROM_BASE + 0x488160 && r->gpr[20] == 0xf8000000) {
1630 <                        r->nip += 4;
1631 <                        r->gpr[8] = 0;
1629 >                if (r->pc() == ROM_BASE + 0x488160 && r->gpr(20) == 0xf8000000) {
1630 >                        r->pc() += 4;
1631 >                        r->gpr(8) = 0;
1632                          return;
1633          
1634                  // MacOS 8.5 installation
1635 <                } else if (r->nip == ROM_BASE + 0x488140 && r->gpr[16] == 0xf8000000) {
1636 <                        r->nip += 4;
1637 <                        r->gpr[8] = 0;
1635 >                } else if (r->pc() == ROM_BASE + 0x488140 && r->gpr(16) == 0xf8000000) {
1636 >                        r->pc() += 4;
1637 >                        r->gpr(8) = 0;
1638                          return;
1639          
1640                  // MacOS 8 serial drivers on startup
1641 <                } else if (r->nip == ROM_BASE + 0x48e080 && (r->gpr[8] == 0xf3012002 || r->gpr[8] == 0xf3012000)) {
1642 <                        r->nip += 4;
1643 <                        r->gpr[8] = 0;
1641 >                } else if (r->pc() == ROM_BASE + 0x48e080 && (r->gpr(8) == 0xf3012002 || r->gpr(8) == 0xf3012000)) {
1642 >                        r->pc() += 4;
1643 >                        r->gpr(8) = 0;
1644                          return;
1645          
1646                  // MacOS 8.1 serial drivers on startup
1647 <                } else if (r->nip == ROM_BASE + 0x48c5e0 && (r->gpr[20] == 0xf3012002 || r->gpr[20] == 0xf3012000)) {
1648 <                        r->nip += 4;
1647 >                } else if (r->pc() == ROM_BASE + 0x48c5e0 && (r->gpr(20) == 0xf3012002 || r->gpr(20) == 0xf3012000)) {
1648 >                        r->pc() += 4;
1649 >                        return;
1650 >                } else if (r->pc() == ROM_BASE + 0x4a10a0 && (r->gpr(20) == 0xf3012002 || r->gpr(20) == 0xf3012000)) {
1651 >                        r->pc() += 4;
1652 >                        return;
1653 >        
1654 >                // MacOS 8.6 serial drivers on startup (with DR Cache and OldWorld ROM)
1655 >                } else if ((r->pc() - DR_CACHE_BASE) < DR_CACHE_SIZE && (r->gpr(16) == 0xf3012002 || r->gpr(16) == 0xf3012000)) {
1656 >                        r->pc() += 4;
1657                          return;
1658 <                } else if (r->nip == ROM_BASE + 0x4a10a0 && (r->gpr[20] == 0xf3012002 || r->gpr[20] == 0xf3012000)) {
1659 <                        r->nip += 4;
1658 >                } else if ((r->pc() - DR_CACHE_BASE) < DR_CACHE_SIZE && (r->gpr(20) == 0xf3012002 || r->gpr(20) == 0xf3012000)) {
1659 >                        r->pc() += 4;
1660                          return;
1661                  }
1662  
1663                  // Get opcode and divide into fields
1664 <                uint32 opcode = *((uint32 *)r->nip);
1664 >                uint32 opcode = *((uint32 *)r->pc());
1665                  uint32 primop = opcode >> 26;
1666                  uint32 exop = (opcode >> 1) & 0x3ff;
1667                  uint32 ra = (opcode >> 16) & 0x1f;
# Line 1526 | Line 1750 | static void sigsegv_handler(int sig, sig
1750                                  transfer_type = TYPE_STORE; transfer_size = SIZE_HALFWORD; addr_mode = MODE_NORM; break;
1751                          case 45:        // sthu
1752                                  transfer_type = TYPE_STORE; transfer_size = SIZE_HALFWORD; addr_mode = MODE_U; break;
1753 + #if EMULATE_UNALIGNED_LOADSTORE_MULTIPLE
1754 +                        case 46:        // lmw
1755 +                                if ((addr % 4) != 0) {
1756 +                                        uint32 ea = addr;
1757 +                                        D(bug("WARNING: unaligned lmw to EA=%08x from IP=%08x\n", ea, r->pc()));
1758 +                                        for (int i = rd; i <= 31; i++) {
1759 +                                                r->gpr(i) = ReadMacInt32(ea);
1760 +                                                ea += 4;
1761 +                                        }
1762 +                                        r->pc() += 4;
1763 +                                        goto rti;
1764 +                                }
1765 +                                break;
1766 +                        case 47:        // stmw
1767 +                                if ((addr % 4) != 0) {
1768 +                                        uint32 ea = addr;
1769 +                                        D(bug("WARNING: unaligned stmw to EA=%08x from IP=%08x\n", ea, r->pc()));
1770 +                                        for (int i = rd; i <= 31; i++) {
1771 +                                                WriteMacInt32(ea, r->gpr(i));
1772 +                                                ea += 4;
1773 +                                        }
1774 +                                        r->pc() += 4;
1775 +                                        goto rti;
1776 +                                }
1777 +                                break;
1778 + #endif
1779                  }
1780          
1781 <                // Ignore ROM writes
1782 <                if (transfer_type == TYPE_STORE && addr >= ROM_BASE && addr < ROM_BASE + ROM_SIZE) {
1783 < //                      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));
1781 >                // Ignore ROM writes (including to the zero page, which is read-only)
1782 >                if (transfer_type == TYPE_STORE &&
1783 >                        ((addr >= ROM_BASE && addr < ROM_BASE + ROM_SIZE) ||
1784 >                         (addr >= SheepMem::ZeroPage() && addr < SheepMem::ZeroPage() + SheepMem::PageSize()))) {
1785 > //                      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()));
1786                          if (addr_mode == MODE_U || addr_mode == MODE_UX)
1787 <                                r->gpr[ra] = addr;
1788 <                        r->nip += 4;
1787 >                                r->gpr(ra) = addr;
1788 >                        r->pc() += 4;
1789                          goto rti;
1790                  }
1791  
1792                  // Ignore illegal memory accesses?
1793                  if (PrefsFindBool("ignoresegv")) {
1794                          if (addr_mode == MODE_U || addr_mode == MODE_UX)
1795 <                                r->gpr[ra] = addr;
1795 >                                r->gpr(ra) = addr;
1796                          if (transfer_type == TYPE_LOAD)
1797 <                                r->gpr[rd] = 0;
1798 <                        r->nip += 4;
1797 >                                r->gpr(rd) = 0;
1798 >                        r->pc() += 4;
1799                          goto rti;
1800                  }
1801  
# Line 1551 | Line 1803 | static void sigsegv_handler(int sig, sig
1803                  if (!PrefsFindBool("nogui")) {
1804                          char str[256];
1805                          if (transfer_type == TYPE_LOAD || transfer_type == TYPE_STORE)
1806 <                                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]);
1806 >                                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));
1807                          else
1808 <                                sprintf(str, GetString(STR_UNKNOWN_SEGV_ERR), r->nip, r->gpr[24], r->gpr[1], opcode);
1808 >                                sprintf(str, GetString(STR_UNKNOWN_SEGV_ERR), r->pc(), r->gpr(24), r->gpr(1), opcode);
1809                          ErrorAlert(str);
1810                          QuitEmulator();
1811                          return;
# Line 1561 | Line 1813 | static void sigsegv_handler(int sig, sig
1813          }
1814  
1815          // For all other errors, jump into debugger (sort of...)
1816 +        crash_reason = (sig == SIGBUS) ? "SIGBUS" : "SIGSEGV";
1817          if (!ready_for_signals) {
1818 <                printf("SIGSEGV\n");
1819 <                printf(" sigcontext %p, pt_regs %p\n", sc, r);
1818 >                printf("%s\n");
1819 >                printf(" sigcontext %p, machine_regs %p\n", scp, r);
1820                  printf(
1821                          "   pc %08lx     lr %08lx    ctr %08lx    msr %08lx\n"
1822                          "  xer %08lx     cr %08lx  \n"
# Line 1575 | Line 1828 | static void sigsegv_handler(int sig, sig
1828                          "  r20 %08lx    r21 %08lx    r22 %08lx    r23 %08lx\n"
1829                          "  r24 %08lx    r25 %08lx    r26 %08lx    r27 %08lx\n"
1830                          "  r28 %08lx    r29 %08lx    r30 %08lx    r31 %08lx\n",
1831 <                        r->nip, r->link, r->ctr, r->msr,
1832 <                        r->xer, r->ccr,
1833 <                        r->gpr[0], r->gpr[1], r->gpr[2], r->gpr[3],
1834 <                        r->gpr[4], r->gpr[5], r->gpr[6], r->gpr[7],
1835 <                        r->gpr[8], r->gpr[9], r->gpr[10], r->gpr[11],
1836 <                        r->gpr[12], r->gpr[13], r->gpr[14], r->gpr[15],
1837 <                        r->gpr[16], r->gpr[17], r->gpr[18], r->gpr[19],
1838 <                        r->gpr[20], r->gpr[21], r->gpr[22], r->gpr[23],
1839 <                        r->gpr[24], r->gpr[25], r->gpr[26], r->gpr[27],
1840 <                        r->gpr[28], r->gpr[29], r->gpr[30], r->gpr[31]);
1831 >                        crash_reason,
1832 >                        r->pc(), r->lr(), r->ctr(), r->msr(),
1833 >                        r->xer(), r->cr(),
1834 >                        r->gpr(0), r->gpr(1), r->gpr(2), r->gpr(3),
1835 >                        r->gpr(4), r->gpr(5), r->gpr(6), r->gpr(7),
1836 >                        r->gpr(8), r->gpr(9), r->gpr(10), r->gpr(11),
1837 >                        r->gpr(12), r->gpr(13), r->gpr(14), r->gpr(15),
1838 >                        r->gpr(16), r->gpr(17), r->gpr(18), r->gpr(19),
1839 >                        r->gpr(20), r->gpr(21), r->gpr(22), r->gpr(23),
1840 >                        r->gpr(24), r->gpr(25), r->gpr(26), r->gpr(27),
1841 >                        r->gpr(28), r->gpr(29), r->gpr(30), r->gpr(31));
1842                  exit(1);
1843                  QuitEmulator();
1844                  return;
1845          } else {
1846                  // We crashed. Save registers, tell tick thread and loop forever
1847 <                sigsegv_regs = *(sigregs *)r;
1847 >                build_sigregs(&sigsegv_regs, r);
1848                  emul_thread_fatal = true;
1849                  for (;;) ;
1850          }
# Line 1602 | Line 1856 | rti:;
1856   *  SIGILL handler
1857   */
1858  
1859 < static void sigill_handler(int sig, sigcontext_struct *sc)
1859 > static void sigill_handler(int sig, siginfo_t *sip, void *scp)
1860   {
1861 <        pt_regs *r = sc->regs;
1861 >        machine_regs *r = MACHINE_REGISTERS(scp);
1862          char str[256];
1863  
1864 + #ifdef SYSTEM_CLOBBERS_R2
1865 +        // Restore pointer to Thread Local Storage
1866 +        set_r2(TOC);
1867 + #endif
1868 + #ifdef SYSTEM_CLOBBERS_R13
1869 +        // Restore pointer to .sdata section
1870 +        set_r13(R13);
1871 + #endif
1872 +
1873          // Fault in Mac ROM or RAM?
1874 <        bool mac_fault = (r->nip >= ROM_BASE) && (r->nip < (ROM_BASE + ROM_AREA_SIZE)) || (r->nip >= RAMBase) && (r->nip < (RAMBase + RAMSize));
1874 >        bool mac_fault = (r->pc() >= ROM_BASE) && (r->pc() < (ROM_BASE + ROM_AREA_SIZE)) || (r->pc() >= RAMBase) && (r->pc() < (RAMBase + RAMSize));
1875          if (mac_fault) {
1876  
1877                  // Get opcode and divide into fields
1878 <                uint32 opcode = *((uint32 *)r->nip);
1878 >                uint32 opcode = *((uint32 *)r->pc());
1879                  uint32 primop = opcode >> 26;
1880                  uint32 exop = (opcode >> 1) & 0x3ff;
1881                  uint32 ra = (opcode >> 16) & 0x1f;
# Line 1623 | Line 1886 | static void sigill_handler(int sig, sigc
1886                  switch (primop) {
1887                          case 9:         // POWER instructions
1888                          case 22:
1889 < power_inst:             sprintf(str, GetString(STR_POWER_INSTRUCTION_ERR), r->nip, r->gpr[1], opcode);
1889 > power_inst:             sprintf(str, GetString(STR_POWER_INSTRUCTION_ERR), r->pc(), r->gpr(1), opcode);
1890                                  ErrorAlert(str);
1891                                  QuitEmulator();
1892                                  return;
# Line 1631 | Line 1894 | power_inst:            sprintf(str, GetString(STR_
1894                          case 31:
1895                                  switch (exop) {
1896                                          case 83:        // mfmsr
1897 <                                                r->gpr[rd] = 0xf072;
1898 <                                                r->nip += 4;
1897 >                                                r->gpr(rd) = 0xf072;
1898 >                                                r->pc() += 4;
1899                                                  goto rti;
1900  
1901                                          case 210:       // mtsr
1902                                          case 242:       // mtsrin
1903                                          case 306:       // tlbie
1904 <                                                r->nip += 4;
1904 >                                                r->pc() += 4;
1905                                                  goto rti;
1906  
1907                                          case 339: {     // mfspr
# Line 1654 | Line 1917 | power_inst:            sprintf(str, GetString(STR_
1917                                                          case 957:       // PMC3
1918                                                          case 958:       // PMC4
1919                                                          case 959:       // SDA
1920 <                                                                r->nip += 4;
1920 >                                                                r->pc() += 4;
1921                                                                  goto rti;
1922                                                          case 25:        // SDR1
1923 <                                                                r->gpr[rd] = 0xdead001f;
1924 <                                                                r->nip += 4;
1923 >                                                                r->gpr(rd) = 0xdead001f;
1924 >                                                                r->pc() += 4;
1925                                                                  goto rti;
1926                                                          case 287:       // PVR
1927 <                                                                r->gpr[rd] = PVR;
1928 <                                                                r->nip += 4;
1927 >                                                                r->gpr(rd) = PVR;
1928 >                                                                r->pc() += 4;
1929                                                                  goto rti;
1930                                                  }
1931                                                  break;
# Line 1698 | Line 1961 | power_inst:            sprintf(str, GetString(STR_
1961                                                          case 957:       // PMC3
1962                                                          case 958:       // PMC4
1963                                                          case 959:       // SDA
1964 <                                                                r->nip += 4;
1964 >                                                                r->pc() += 4;
1965                                                                  goto rti;
1966                                                  }
1967                                                  break;
# Line 1717 | Line 1980 | power_inst:            sprintf(str, GetString(STR_
1980  
1981                  // In GUI mode, show error alert
1982                  if (!PrefsFindBool("nogui")) {
1983 <                        sprintf(str, GetString(STR_UNKNOWN_SEGV_ERR), r->nip, r->gpr[24], r->gpr[1], opcode);
1983 >                        sprintf(str, GetString(STR_UNKNOWN_SEGV_ERR), r->pc(), r->gpr(24), r->gpr(1), opcode);
1984                          ErrorAlert(str);
1985                          QuitEmulator();
1986                          return;
# Line 1725 | Line 1988 | power_inst:            sprintf(str, GetString(STR_
1988          }
1989  
1990          // For all other errors, jump into debugger (sort of...)
1991 +        crash_reason = "SIGILL";
1992          if (!ready_for_signals) {
1993 <                printf("SIGILL\n");
1994 <                printf(" sigcontext %p, pt_regs %p\n", sc, r);
1993 >                printf("%s\n");
1994 >                printf(" sigcontext %p, machine_regs %p\n", scp, r);
1995                  printf(
1996                          "   pc %08lx     lr %08lx    ctr %08lx    msr %08lx\n"
1997                          "  xer %08lx     cr %08lx  \n"
# Line 1739 | Line 2003 | power_inst:            sprintf(str, GetString(STR_
2003                          "  r20 %08lx    r21 %08lx    r22 %08lx    r23 %08lx\n"
2004                          "  r24 %08lx    r25 %08lx    r26 %08lx    r27 %08lx\n"
2005                          "  r28 %08lx    r29 %08lx    r30 %08lx    r31 %08lx\n",
2006 <                        r->nip, r->link, r->ctr, r->msr,
2007 <                        r->xer, r->ccr,
2008 <                        r->gpr[0], r->gpr[1], r->gpr[2], r->gpr[3],
2009 <                        r->gpr[4], r->gpr[5], r->gpr[6], r->gpr[7],
2010 <                        r->gpr[8], r->gpr[9], r->gpr[10], r->gpr[11],
2011 <                        r->gpr[12], r->gpr[13], r->gpr[14], r->gpr[15],
2012 <                        r->gpr[16], r->gpr[17], r->gpr[18], r->gpr[19],
2013 <                        r->gpr[20], r->gpr[21], r->gpr[22], r->gpr[23],
2014 <                        r->gpr[24], r->gpr[25], r->gpr[26], r->gpr[27],
2015 <                        r->gpr[28], r->gpr[29], r->gpr[30], r->gpr[31]);
2006 >                        crash_reason,
2007 >                        r->pc(), r->lr(), r->ctr(), r->msr(),
2008 >                        r->xer(), r->cr(),
2009 >                        r->gpr(0), r->gpr(1), r->gpr(2), r->gpr(3),
2010 >                        r->gpr(4), r->gpr(5), r->gpr(6), r->gpr(7),
2011 >                        r->gpr(8), r->gpr(9), r->gpr(10), r->gpr(11),
2012 >                        r->gpr(12), r->gpr(13), r->gpr(14), r->gpr(15),
2013 >                        r->gpr(16), r->gpr(17), r->gpr(18), r->gpr(19),
2014 >                        r->gpr(20), r->gpr(21), r->gpr(22), r->gpr(23),
2015 >                        r->gpr(24), r->gpr(25), r->gpr(26), r->gpr(27),
2016 >                        r->gpr(28), r->gpr(29), r->gpr(30), r->gpr(31));
2017                  exit(1);
2018                  QuitEmulator();
2019                  return;
2020          } else {
2021                  // We crashed. Save registers, tell tick thread and loop forever
2022 <                sigsegv_regs = *(sigregs *)r;
2022 >                build_sigregs(&sigsegv_regs, r);
2023                  emul_thread_fatal = true;
2024                  for (;;) ;
2025          }
# Line 1764 | Line 2029 | rti:;
2029  
2030  
2031   /*
2032 + *  Helpers to share 32-bit addressable data with MacOS
2033 + */
2034 +
2035 + bool SheepMem::Init(void)
2036 + {
2037 +        // Size of a native page
2038 +        page_size = getpagesize();
2039 +
2040 +        // Allocate SheepShaver globals
2041 +        proc = base;
2042 +        if (vm_mac_acquire(base, size) < 0)
2043 +                return false;
2044 +
2045 +        // Allocate page with all bits set to 0, right in the middle
2046 +        // This is also used to catch undesired overlaps between proc and data areas
2047 +        zero_page = proc + (size / 2);
2048 +        Mac_memset(zero_page, 0, page_size);
2049 +        if (vm_protect(Mac2HostAddr(zero_page), page_size, VM_PAGE_READ) < 0)
2050 +                return false;
2051 +
2052 + #if EMULATED_PPC
2053 +        // Allocate alternate stack for PowerPC interrupt routine
2054 +        sig_stack = base + size;
2055 +        if (vm_mac_acquire(sig_stack, SIG_STACK_SIZE) < 0)
2056 +                return false;
2057 + #endif
2058 +
2059 +        data = base + size;
2060 +        return true;
2061 + }
2062 +
2063 + void SheepMem::Exit(void)
2064 + {
2065 +        if (data) {
2066 +                // Delete SheepShaver globals
2067 +                vm_mac_release(base, size);
2068 +
2069 + #if EMULATED_PPC
2070 +                // Delete alternate stack for PowerPC interrupt routine
2071 +                vm_mac_release(sig_stack, SIG_STACK_SIZE);
2072 + #endif
2073 +        }
2074 + }
2075 +
2076 +
2077 + /*
2078   *  Display alert
2079   */
2080  
# Line 1812 | Line 2123 | void display_alert(int title_id, int pre
2123  
2124   void ErrorAlert(const char *text)
2125   {
2126 < #ifdef ENABLE_GTK
2126 >        if (gui_connection) {
2127 >                if (rpc_method_invoke(gui_connection, RPC_METHOD_ERROR_ALERT, RPC_TYPE_STRING, text, RPC_TYPE_INVALID) == RPC_ERROR_NO_ERROR &&
2128 >                        rpc_method_wait_for_reply(gui_connection, RPC_TYPE_INVALID) == RPC_ERROR_NO_ERROR)
2129 >                        return;
2130 >        }
2131 > #if defined(ENABLE_GTK) && !defined(USE_SDL_VIDEO)
2132          if (PrefsFindBool("nogui") || x_display == NULL) {
2133                  printf(GetString(STR_SHELL_ERROR_PREFIX), text);
2134                  return;
# Line 1831 | Line 2147 | void ErrorAlert(const char *text)
2147  
2148   void WarningAlert(const char *text)
2149   {
2150 < #ifdef ENABLE_GTK
2150 >        if (gui_connection) {
2151 >                if (rpc_method_invoke(gui_connection, RPC_METHOD_WARNING_ALERT, RPC_TYPE_STRING, text, RPC_TYPE_INVALID) == RPC_ERROR_NO_ERROR &&
2152 >                        rpc_method_wait_for_reply(gui_connection, RPC_TYPE_INVALID) == RPC_ERROR_NO_ERROR)
2153 >                        return;
2154 >        }
2155 > #if defined(ENABLE_GTK) && !defined(USE_SDL_VIDEO)
2156          if (PrefsFindBool("nogui") || x_display == NULL) {
2157                  printf(GetString(STR_SHELL_WARNING_PREFIX), text);
2158                  return;

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines