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.21 by gbeauche, 2003-12-31T18:16:55Z vs.
Revision 1.70 by gbeauche, 2005-07-06T04:58: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 "thunks.h"
112 > #include "sigregs.h"
113  
114   #define DEBUG 0
115   #include "debug.h"
116  
117  
118 + #ifdef HAVE_DIRENT_H
119 + #include <dirent.h>
120 + #endif
121 +
122 + #ifdef USE_SDL
123 + #include <SDL.h>
124 + #endif
125 +
126 + #ifndef USE_SDL_VIDEO
127   #include <X11/Xlib.h>
128 + #endif
129  
130   #ifdef ENABLE_GTK
131   #include <gtk/gtk.h>
# Line 132 | Line 142
142   #endif
143  
144  
145 + // Enable emulation of unaligned lmw/stmw?
146 + #define EMULATE_UNALIGNED_LOADSTORE_MULTIPLE 1
147 +
148   // Enable Execute68k() safety checks?
149   #define SAFE_EXEC_68K 0
150  
# Line 146 | Line 159
159   const char ROM_FILE_NAME[] = "ROM";
160   const char ROM_FILE_NAME2[] = "Mac OS ROM";
161  
162 + #if REAL_ADDRESSING
163   const uintptr RAM_BASE = 0x20000000;            // Base address of RAM
164 < const uint32 SIG_STACK_SIZE = 0x10000;          // Size of signal stack
165 <
166 <
153 < #if !EMULATED_PPC
154 < // Structure in which registers are saved in a signal handler;
155 < // sigcontext->regs points to it
156 < // (see arch/ppc/kernel/signal.c)
157 < typedef struct {
158 <        uint32 u[4];
159 < } __attribute((aligned(16))) vector128;
160 < #include <linux/elf.h>
161 <
162 < struct sigregs {
163 <        elf_gregset_t   gp_regs;                                // Identical to pt_regs
164 <        double                  fp_regs[ELF_NFPREG];    // f0..f31 and fpsrc
165 <        //more (uninteresting) stuff following here
166 < };
164 > #else
165 > // FIXME: needs to be >= 0x04000000
166 > const uintptr RAM_BASE = 0x10000000;            // Base address of RAM
167   #endif
168 + const uint32 SIG_STACK_SIZE = 0x10000;          // Size of signal stack
169  
170  
171   // Global variables (exported)
172   #if !EMULATED_PPC
173 < void *TOC;                              // Small data pointer (r13)
173 > void *TOC = NULL;               // Pointer to Thread Local Storage (r2)
174 > void *R13 = NULL;               // Pointer to .sdata section (r13 under Linux)
175   #endif
176   uint32 RAMBase;                 // Base address of Mac RAM
177   uint32 RAMSize;                 // Size of Mac RAM
178   uint32 KernelDataAddr;  // Address of Kernel Data
179   uint32 BootGlobsAddr;   // Address of BootGlobs structure at top of Mac RAM
180 + uint32 DRCacheAddr;             // Address of DR Cache
181   uint32 PVR;                             // Theoretical PVR
182   int64 CPUClockSpeed;    // Processor clock speed (Hz)
183   int64 BusClockSpeed;    // Bus clock speed (Hz)
184 + int64 TimebaseSpeed;    // Timebase clock speed (Hz)
185 + uint8 *RAMBaseHost;             // Base address of Mac RAM (host address space)
186 + uint8 *ROMBaseHost;             // Base address of Mac ROM (host address space)
187  
188  
189   // Global variables
190 + #ifndef USE_SDL_VIDEO
191   char *x_display_name = NULL;                            // X11 display name
192   Display *x_display = NULL;                                      // X11 display handle
193   #ifdef X11_LOCK_TYPE
194   X11_LOCK_TYPE x_display_lock = X11_LOCK_INIT; // X11 display lock
195   #endif
196 + #endif
197  
198   static int zero_fd = 0;                                         // FD of /dev/zero
199   static bool lm_area_mapped = false;                     // Flag: Low Memory area mmap()ped
200   static int kernel_area = -1;                            // SHM ID of Kernel Data area
201   static bool rom_area_mapped = false;            // Flag: Mac ROM mmap()ped
202   static bool ram_area_mapped = false;            // Flag: Mac RAM mmap()ped
203 + static bool dr_cache_area_mapped = false;       // Flag: Mac DR Cache mmap()ped
204 + static bool dr_emulator_area_mapped = false;// Flag: Mac DR Emulator mmap()ped
205   static KernelData *kernel_data;                         // Pointer to Kernel Data
206   static EmulatorData *emulator_data;
207  
208   static uint8 last_xpram[XPRAM_SIZE];            // Buffer for monitoring XPRAM changes
209  
210   static bool nvram_thread_active = false;        // Flag: NVRAM watchdog installed
211 + static volatile bool nvram_thread_cancel;       // Flag: Cancel NVRAM thread
212   static pthread_t nvram_thread;                          // NVRAM watchdog
213   static bool tick_thread_active = false;         // Flag: MacOS thread installed
214 + static volatile bool tick_thread_cancel;        // Flag: Cancel 60Hz thread
215   static pthread_t tick_thread;                           // 60Hz thread
216   static pthread_t emul_thread;                           // MacOS thread
217  
# Line 212 | Line 224 | static uintptr sig_stack = 0;                          // Stac
224   #else
225   static struct sigaction sigsegv_action;         // Data access exception signal (of emulator thread)
226   static struct sigaction sigill_action;          // Illegal instruction signal (of emulator thread)
227 < static void *sig_stack = NULL;                          // Stack for signal handlers
228 < static void *extra_stack = NULL;                        // Stack for SIGSEGV inside interrupt handler
227 > static struct sigaltstack sig_stack;            // Stack for signal handlers
228 > static struct sigaltstack extra_stack;          // Stack for SIGSEGV inside interrupt handler
229   static bool emul_thread_fatal = false;          // Flag: MacOS thread crashed, tick thread shall dump debug output
230   static sigregs sigsegv_regs;                            // Register dump when crashed
231 + static const char *crash_reason = NULL;         // Reason of the crash (SIGSEGV, SIGBUS, SIGILL)
232   #endif
233  
234 + uint32  SheepMem::page_size;                            // Size of a native page
235   uintptr SheepMem::zero_page = 0;                        // Address of ro page filled in with zeros
236   uintptr SheepMem::base = 0x60000000;            // Address of SheepShaver data
237 < uintptr SheepMem::top = 0;                                      // Top of SheepShaver data (stack like storage)
237 > uintptr SheepMem::proc;                                         // Bottom address of SheepShave procedures
238 > uintptr SheepMem::data;                                         // Top of SheepShaver data (stack like storage)
239  
240  
241   // Prototypes
242 + static bool kernel_data_init(void);
243 + static void kernel_data_exit(void);
244   static void Quit(void);
245   static void *emul_func(void *arg);
246   static void *nvram_func(void *arg);
247   static void *tick_func(void *arg);
248   #if EMULATED_PPC
232 static void sigusr2_handler(int sig);
249   extern void emul_ppc(uint32 start);
250   extern void init_emul_ppc(void);
251   extern void exit_emul_ppc(void);
252 + sigsegv_return_t sigsegv_handler(sigsegv_address_t, sigsegv_address_t);
253   #else
254 < static void sigusr2_handler(int sig, sigcontext_struct *sc);
255 < static void sigsegv_handler(int sig, sigcontext_struct *sc);
256 < static void sigill_handler(int sig, sigcontext_struct *sc);
254 > extern "C" void sigusr2_handler_init(int sig, siginfo_t *sip, void *scp);
255 > extern "C" void sigusr2_handler(int sig, siginfo_t *sip, void *scp);
256 > static void sigsegv_handler(int sig, siginfo_t *sip, void *scp);
257 > static void sigill_handler(int sig, siginfo_t *sip, void *scp);
258   #endif
259  
260  
261   // From asm_linux.S
262   #if !EMULATED_PPC
245 extern "C" void *get_toc(void);
263   extern "C" void *get_sp(void);
264 < extern "C" void flush_icache_range(void *start, void *end);
264 > extern "C" void *get_r2(void);
265 > extern "C" void set_r2(void *);
266 > extern "C" void *get_r13(void);
267 > extern "C" void set_r13(void *);
268 > extern "C" void flush_icache_range(uint32 start, uint32 end);
269   extern "C" void jump_to_rom(uint32 entry, uint32 context);
270   extern "C" void quit_emulator(void);
271   extern "C" void execute_68k(uint32 pc, M68kRegisters *r);
# Line 308 | Line 329 | int atomic_or(int *var, int v)
329  
330  
331   /*
332 + *  Memory management helpers
333 + */
334 +
335 + static inline int vm_mac_acquire(uint32 addr, uint32 size)
336 + {
337 +        return vm_acquire_fixed(Mac2HostAddr(addr), size);
338 + }
339 +
340 + static inline int vm_mac_release(uint32 addr, uint32 size)
341 + {
342 +        return vm_release(Mac2HostAddr(addr), size);
343 + }
344 +
345 +
346 + /*
347   *  Main program
348   */
349  
# Line 323 | Line 359 | static void usage(const char *prg_name)
359   int main(int argc, char **argv)
360   {
361          char str[256];
326        uint32 *boot_globs;
327        int16 i16;
362          int rom_fd;
363          FILE *proc_file;
364          const char *rom_path;
# Line 341 | Line 375 | int main(int argc, char **argv)
375          printf(" %s\n", GetString(STR_ABOUT_TEXT2));
376  
377   #if !EMULATED_PPC
378 + #ifdef SYSTEM_CLOBBERS_R2
379          // Get TOC pointer
380 <        TOC = get_toc();
380 >        TOC = get_r2();
381 > #endif
382 > #ifdef SYSTEM_CLOBBERS_R13
383 >        // Get r13 register
384 >        R13 = get_r13();
385 > #endif
386   #endif
387  
388   #ifdef ENABLE_GTK
# Line 358 | Line 398 | int main(int argc, char **argv)
398          for (int i=1; i<argc; i++) {
399                  if (strcmp(argv[i], "--help") == 0) {
400                          usage(argv[0]);
401 + #ifndef USE_SDL_VIDEO
402                  } else if (strcmp(argv[i], "--display") == 0) {
403                          i++;
404                          if (i < argc)
405                                  x_display_name = strdup(argv[i]);
406 + #endif
407                  } else if (argv[i][0] == '-') {
408                          fprintf(stderr, "Unrecognized option '%s'\n", argv[i]);
409                          usage(argv[0]);
410                  }
411          }
412  
413 + #ifdef USE_SDL
414 +        // Initialize SDL system
415 +        int sdl_flags = 0;
416 + #ifdef USE_SDL_VIDEO
417 +        sdl_flags |= SDL_INIT_VIDEO;
418 + #endif
419 + #ifdef USE_SDL_AUDIO
420 +        sdl_flags |= SDL_INIT_AUDIO;
421 + #endif
422 +        assert(sdl_flags != 0);
423 +        if (SDL_Init(sdl_flags) == -1) {
424 +                char str[256];
425 +                sprintf(str, "Could not initialize SDL: %s.\n", SDL_GetError());
426 +                ErrorAlert(str);
427 +                goto quit;
428 +        }
429 +        atexit(SDL_Quit);
430 + #endif
431 +
432 + #ifndef USE_SDL_VIDEO
433          // Open display
434          x_display = XOpenDisplay(x_display_name);
435          if (x_display == NULL) {
# Line 381 | Line 443 | int main(int argc, char **argv)
443          // Fork out, so we can return from fullscreen mode when things get ugly
444          XF86DGAForkApp(DefaultScreen(x_display));
445   #endif
446 + #endif
447  
448   #ifdef ENABLE_MON
449          // Initialize mon
450          mon_init();
451   #endif
452  
453 + #if !EMULATED_PPC
454 +        // Create and install stacks for signal handlers
455 +        sig_stack.ss_sp = malloc(SIG_STACK_SIZE);
456 +        D(bug("Signal stack at %p\n", sig_stack.ss_sp));
457 +        if (sig_stack.ss_sp == NULL) {
458 +                ErrorAlert(GetString(STR_NOT_ENOUGH_MEMORY_ERR));
459 +                goto quit;
460 +        }
461 +        sig_stack.ss_flags = 0;
462 +        sig_stack.ss_size = SIG_STACK_SIZE;
463 +        if (sigaltstack(&sig_stack, NULL) < 0) {
464 +                sprintf(str, GetString(STR_SIGALTSTACK_ERR), strerror(errno));
465 +                ErrorAlert(str);
466 +                goto quit;
467 +        }
468 +        extra_stack.ss_sp = malloc(SIG_STACK_SIZE);
469 +        D(bug("Extra stack at %p\n", extra_stack.ss_sp));
470 +        if (extra_stack.ss_sp == NULL) {
471 +                ErrorAlert(GetString(STR_NOT_ENOUGH_MEMORY_ERR));
472 +                goto quit;
473 +        }
474 +        extra_stack.ss_flags = 0;
475 +        extra_stack.ss_size = SIG_STACK_SIZE;
476 + #endif
477 +
478 + #if !EMULATED_PPC
479 +        // Install SIGSEGV and SIGBUS handlers
480 +        sigemptyset(&sigsegv_action.sa_mask);   // Block interrupts during SEGV handling
481 +        sigaddset(&sigsegv_action.sa_mask, SIGUSR2);
482 +        sigsegv_action.sa_sigaction = sigsegv_handler;
483 +        sigsegv_action.sa_flags = SA_ONSTACK | SA_SIGINFO;
484 + #ifdef HAVE_SIGNAL_SA_RESTORER
485 +        sigsegv_action.sa_restorer = NULL;
486 + #endif
487 +        if (sigaction(SIGSEGV, &sigsegv_action, NULL) < 0) {
488 +                sprintf(str, GetString(STR_SIGSEGV_INSTALL_ERR), strerror(errno));
489 +                ErrorAlert(str);
490 +                goto quit;
491 +        }
492 +        if (sigaction(SIGBUS, &sigsegv_action, NULL) < 0) {
493 +                sprintf(str, GetString(STR_SIGSEGV_INSTALL_ERR), strerror(errno));
494 +                ErrorAlert(str);
495 +                goto quit;
496 +        }
497 + #else
498 +        // Install SIGSEGV handler for CPU emulator
499 +        if (!sigsegv_install_handler(sigsegv_handler)) {
500 +                sprintf(str, GetString(STR_SIGSEGV_INSTALL_ERR), strerror(errno));
501 +                ErrorAlert(str);
502 +                goto quit;
503 +        }
504 + #endif
505 +
506 +        // Initialize VM system
507 +        vm_init();
508 +
509          // Get system info
510          PVR = 0x00040000;                       // Default: 604
511          CPUClockSpeed = 100000000;      // Default: 100MHz
512          BusClockSpeed = 100000000;      // Default: 100MHz
513 < #if !EMULATED_PPC
513 >        TimebaseSpeed =  25000000;      // Default:  25MHz
514 > #if EMULATED_PPC
515 >        PVR = 0x000c0000;                       // Default: 7400 (with AltiVec)
516 > #elif defined(__APPLE__) && defined(__MACH__)
517 >        proc_file = popen("ioreg -c IOPlatformDevice", "r");
518 >        if (proc_file) {
519 >                char line[256];
520 >                bool powerpc_node = false;
521 >                while (fgets(line, sizeof(line) - 1, proc_file)) {
522 >                        // Read line
523 >                        int len = strlen(line);
524 >                        if (len == 0)
525 >                                continue;
526 >                        line[len - 1] = 0;
527 >
528 >                        // Parse line
529 >                        if (strstr(line, "o PowerPC,"))
530 >                                powerpc_node = true;
531 >                        else if (powerpc_node) {
532 >                                uint32 value;
533 >                                char head[256];
534 >                                if (sscanf(line, "%[ |]\"cpu-version\" = <%x>", head, &value) == 2)
535 >                                        PVR = value;
536 >                                else if (sscanf(line, "%[ |]\"clock-frequency\" = <%x>", head, &value) == 2)
537 >                                        CPUClockSpeed = value;
538 >                                else if (sscanf(line, "%[ |]\"bus-frequency\" = <%x>", head, &value) == 2)
539 >                                        BusClockSpeed = value;
540 >                                else if (sscanf(line, "%[ |]\"timebase-frequency\" = <%x>", head, &value) == 2)
541 >                                        TimebaseSpeed = value;
542 >                                else if (strchr(line, '}'))
543 >                                        powerpc_node = false;
544 >                        }
545 >                }
546 >                fclose(proc_file);
547 >        } else {
548 >                sprintf(str, GetString(STR_PROC_CPUINFO_WARN), strerror(errno));
549 >                WarningAlert(str);
550 >        }
551 > #else
552          proc_file = fopen("/proc/cpuinfo", "r");
553          if (proc_file) {
554 +                // CPU specs from Linux kernel
555 +                // TODO: make it more generic with features (e.g. AltiVec) and
556 +                // cache information and friends for NameRegistry
557 +                static const struct {
558 +                        uint32 pvr_mask;
559 +                        uint32 pvr_value;
560 +                        const char *cpu_name;
561 +                }
562 +                cpu_specs[] = {
563 +                        { 0xffff0000, 0x00010000, "601" },
564 +                        { 0xffff0000, 0x00030000, "603" },
565 +                        { 0xffff0000, 0x00060000, "603e" },
566 +                        { 0xffff0000, 0x00070000, "603ev" },
567 +                        { 0xffff0000, 0x00040000, "604" },
568 +                        { 0xfffff000, 0x00090000, "604e" },
569 +                        { 0xffff0000, 0x00090000, "604r" },
570 +                        { 0xffff0000, 0x000a0000, "604ev" },
571 +                        { 0xffffffff, 0x00084202, "740/750" },
572 +                        { 0xfffff000, 0x00083000, "745/755" },
573 +                        { 0xfffffff0, 0x00080100, "750CX" },
574 +                        { 0xfffffff0, 0x00082200, "750CX" },
575 +                        { 0xfffffff0, 0x00082210, "750CXe" },
576 +                        { 0xffffff00, 0x70000100, "750FX" },
577 +                        { 0xffffffff, 0x70000200, "750FX" },
578 +                        { 0xffff0000, 0x70000000, "750FX" },
579 +                        { 0xffff0000, 0x70020000, "750GX" },
580 +                        { 0xffff0000, 0x00080000, "740/750" },
581 +                        { 0xffffffff, 0x000c1101, "7400 (1.1)" },
582 +                        { 0xffff0000, 0x000c0000, "7400" },
583 +                        { 0xffff0000, 0x800c0000, "7410" },
584 +                        { 0xffffffff, 0x80000200, "7450" },
585 +                        { 0xffffffff, 0x80000201, "7450" },
586 +                        { 0xffff0000, 0x80000000, "7450" },
587 +                        { 0xffffff00, 0x80010100, "7455" },
588 +                        { 0xffffffff, 0x80010200, "7455" },
589 +                        { 0xffff0000, 0x80010000, "7455" },
590 +                        { 0xffff0000, 0x80020000, "7457" },
591 +                        { 0xffff0000, 0x80030000, "7447A" },
592 +                        { 0x7fff0000, 0x00810000, "82xx" },
593 +                        { 0x7fff0000, 0x00820000, "8280" },
594 +                        { 0xffff0000, 0x00400000, "Power3 (630)" },
595 +                        { 0xffff0000, 0x00410000, "Power3 (630+)" },
596 +                        { 0xffff0000, 0x00360000, "I-star" },
597 +                        { 0xffff0000, 0x00370000, "S-star" },
598 +                        { 0xffff0000, 0x00350000, "Power4" },
599 +                        { 0xffff0000, 0x00390000, "PPC970" },
600 +                        { 0xffff0000, 0x003a0000, "POWER5" },
601 +                        { 0, 0, 0 }
602 +                };
603 +
604                  char line[256];
605                  while(fgets(line, 255, proc_file)) {
606                          // Read line
# Line 405 | Line 612 | int main(int argc, char **argv)
612                          // Parse line
613                          int i;
614                          char value[256];
615 <                        if (sscanf(line, "cpu : %s", value) == 1) {
616 <                                if (strcmp(value, "601") == 0)
617 <                                        PVR = 0x00010000;
618 <                                else if (strcmp(value, "603") == 0)
619 <                                        PVR = 0x00030000;
620 <                                else if (strcmp(value, "604") == 0)
621 <                                        PVR = 0x00040000;
622 <                                else if (strcmp(value, "603e") == 0)
623 <                                        PVR = 0x00060000;
624 <                                else if (strcmp(value, "603ev") == 0)
625 <                                        PVR = 0x00070000;
419 <                                else if (strcmp(value, "604e") == 0)
420 <                                        PVR = 0x00090000;
421 <                                else if (strcmp(value, "604ev5") == 0)
422 <                                        PVR = 0x000a0000;
423 <                                else if (strcmp(value, "750") == 0)
424 <                                        PVR = 0x00080000;
425 <                                else if (strcmp(value, "821") == 0)
426 <                                        PVR = 0x00320000;
427 <                                else if (strcmp(value, "860") == 0)
428 <                                        PVR = 0x00500000;
429 <                                else
615 >                        if (sscanf(line, "cpu : %[0-9A-Za-a]", value) == 1) {
616 >                                // Search by name
617 >                                const char *cpu_name = NULL;
618 >                                for (int i = 0; cpu_specs[i].pvr_mask != 0; i++) {
619 >                                        if (strcmp(cpu_specs[i].cpu_name, value) == 0) {
620 >                                                cpu_name = cpu_specs[i].cpu_name;
621 >                                                PVR = cpu_specs[i].pvr_value;
622 >                                                break;
623 >                                        }
624 >                                }
625 >                                if (cpu_name == NULL)
626                                          printf("WARNING: Unknown CPU type '%s', assuming 604\n", value);
627 +                                else
628 +                                        printf("Found a PowerPC %s processor\n", cpu_name);
629                          }
630                          if (sscanf(line, "clock : %dMHz", &i) == 1)
631                                  CPUClockSpeed = BusClockSpeed = i * 1000000;
# Line 437 | Line 635 | int main(int argc, char **argv)
635                  sprintf(str, GetString(STR_PROC_CPUINFO_WARN), strerror(errno));
636                  WarningAlert(str);
637          }
638 +
639 +        // Get actual bus frequency
640 +        proc_file = fopen("/proc/device-tree/clock-frequency", "r");
641 +        if (proc_file) {
642 +                union { uint8 b[4]; uint32 l; } value;
643 +                if (fread(value.b, sizeof(value), 1, proc_file) == 1)
644 +                        BusClockSpeed = value.l;
645 +                fclose(proc_file);
646 +        }
647 +
648 +        // Get actual timebase frequency
649 +        TimebaseSpeed = BusClockSpeed / 4;
650 +        DIR *cpus_dir;
651 +        if ((cpus_dir = opendir("/proc/device-tree/cpus")) != NULL) {
652 +                struct dirent *cpu_entry;
653 +                while ((cpu_entry = readdir(cpus_dir)) != NULL) {
654 +                        if (strstr(cpu_entry->d_name, "PowerPC,") == cpu_entry->d_name) {
655 +                                char timebase_freq_node[256];
656 +                                sprintf(timebase_freq_node, "/proc/device-tree/cpus/%s/timebase-frequency", cpu_entry->d_name);
657 +                                proc_file = fopen(timebase_freq_node, "r");
658 +                                if (proc_file) {
659 +                                        union { uint8 b[4]; uint32 l; } value;
660 +                                        if (fread(value.b, sizeof(value), 1, proc_file) == 1)
661 +                                                TimebaseSpeed = value.l;
662 +                                        fclose(proc_file);
663 +                                }
664 +                        }
665 +                }
666 +                closedir(cpus_dir);
667 +        }
668   #endif
669 +        // Remap any newer G4/G5 processor to plain G4 for compatibility
670 +        switch (PVR >> 16) {
671 +        case 0x8000:                            // 7450
672 +        case 0x8001:                            // 7455
673 +        case 0x8002:                            // 7457
674 +        case 0x8003:                            // 7447A
675 +        case 0x0039:                            //  970
676 +                PVR = 0x000c0000;               // 7400
677 +                break;
678 +        }
679          D(bug("PVR: %08x (assumed)\n", PVR));
680  
681          // Init system routines
# Line 461 | Line 699 | int main(int argc, char **argv)
699                  goto quit;
700          }
701  
702 + #ifndef PAGEZERO_HACK
703          // Create Low Memory area (0x0000..0x3000)
704 <        if (vm_acquire_fixed((char *)0, 0x3000) < 0) {
704 >        if (vm_mac_acquire(0, 0x3000) < 0) {
705                  sprintf(str, GetString(STR_LOW_MEM_MMAP_ERR), strerror(errno));
706                  ErrorAlert(str);
707                  goto quit;
708          }
709          lm_area_mapped = true;
710 + #endif
711  
712          // Create areas for Kernel Data
713 <        kernel_area = shmget(IPC_PRIVATE, KERNEL_AREA_SIZE, 0600);
714 <        if (kernel_area == -1) {
715 <                sprintf(str, GetString(STR_KD_SHMGET_ERR), strerror(errno));
713 >        if (!kernel_data_init())
714 >                goto quit;
715 >        kernel_data = (KernelData *)Mac2HostAddr(KERNEL_DATA_BASE);
716 >        emulator_data = &kernel_data->ed;
717 >        KernelDataAddr = KERNEL_DATA_BASE;
718 >        D(bug("Kernel Data at %p (%08x)\n", kernel_data, KERNEL_DATA_BASE));
719 >        D(bug("Emulator Data at %p (%08x)\n", emulator_data, KERNEL_DATA_BASE + offsetof(KernelData, ed)));
720 >
721 >        // Create area for DR Cache
722 >        if (vm_mac_acquire(DR_EMULATOR_BASE, DR_EMULATOR_SIZE) < 0) {
723 >                sprintf(str, GetString(STR_DR_EMULATOR_MMAP_ERR), strerror(errno));
724                  ErrorAlert(str);
725                  goto quit;
726          }
727 <        if (shmat(kernel_area, (void *)KERNEL_DATA_BASE, 0) < 0) {
728 <                sprintf(str, GetString(STR_KD_SHMAT_ERR), strerror(errno));
727 >        dr_emulator_area_mapped = true;
728 >        if (vm_mac_acquire(DR_CACHE_BASE, DR_CACHE_SIZE) < 0) {
729 >                sprintf(str, GetString(STR_DR_CACHE_MMAP_ERR), strerror(errno));
730                  ErrorAlert(str);
731                  goto quit;
732          }
733 <        if (shmat(kernel_area, (void *)KERNEL_DATA2_BASE, 0) < 0) {
734 <                sprintf(str, GetString(STR_KD2_SHMAT_ERR), strerror(errno));
733 >        dr_cache_area_mapped = true;
734 > #if !EMULATED_PPC
735 >        if (vm_protect((char *)DR_CACHE_BASE, DR_CACHE_SIZE, VM_PAGE_READ | VM_PAGE_WRITE | VM_PAGE_EXECUTE) < 0) {
736 >                sprintf(str, GetString(STR_DR_CACHE_MMAP_ERR), strerror(errno));
737                  ErrorAlert(str);
738                  goto quit;
739          }
740 <        kernel_data = (KernelData *)KERNEL_DATA_BASE;
741 <        emulator_data = &kernel_data->ed;
742 <        KernelDataAddr = KERNEL_DATA_BASE;
492 <        D(bug("Kernel Data at %p, Emulator Data at %p\n", kernel_data, emulator_data));
740 > #endif
741 >        DRCacheAddr = DR_CACHE_BASE;
742 >        D(bug("DR Cache at %p\n", DRCacheAddr));
743  
744          // Create area for SheepShaver data
745          if (!SheepMem::Init()) {
# Line 499 | Line 749 | int main(int argc, char **argv)
749          }
750  
751          // Create area for Mac ROM
752 <        if (vm_acquire_fixed((char *)ROM_BASE, ROM_AREA_SIZE) < 0) {
752 >        if (vm_mac_acquire(ROM_BASE, ROM_AREA_SIZE) < 0) {
753                  sprintf(str, GetString(STR_ROM_MMAP_ERR), strerror(errno));
754                  ErrorAlert(str);
755                  goto quit;
756          }
757 < #if !EMULATED_PPC || defined(__powerpc__)
758 <        if (vm_protect((char *)ROM_BASE, ROM_AREA_SIZE, VM_PAGE_READ | VM_PAGE_WRITE | VM_PAGE_EXECUTE) < 0) {
757 >        ROMBaseHost = Mac2HostAddr(ROM_BASE);
758 > #if !EMULATED_PPC
759 >        if (vm_protect(ROMBaseHost, ROM_AREA_SIZE, VM_PAGE_READ | VM_PAGE_WRITE | VM_PAGE_EXECUTE) < 0) {
760                  sprintf(str, GetString(STR_ROM_MMAP_ERR), strerror(errno));
761                  ErrorAlert(str);
762                  goto quit;
763          }
764   #endif
765          rom_area_mapped = true;
766 <        D(bug("ROM area at %08x\n", ROM_BASE));
766 >        D(bug("ROM area at %p (%08x)\n", ROMBaseHost, ROM_BASE));
767  
768          // Create area for Mac RAM
769          RAMSize = PrefsFindInt32("ramsize");
# Line 521 | Line 772 | int main(int argc, char **argv)
772                  RAMSize = 8*1024*1024;
773          }
774  
775 <        if (vm_acquire_fixed((char *)RAM_BASE, RAMSize) < 0) {
775 >        if (vm_mac_acquire(RAM_BASE, RAMSize) < 0) {
776                  sprintf(str, GetString(STR_RAM_MMAP_ERR), strerror(errno));
777                  ErrorAlert(str);
778                  goto quit;
779          }
780 +        RAMBaseHost = Mac2HostAddr(RAM_BASE);
781   #if !EMULATED_PPC
782 <        if (vm_protect((char *)RAM_BASE, RAMSize, VM_PAGE_READ | VM_PAGE_WRITE | VM_PAGE_EXECUTE) < 0) {
782 >        if (vm_protect(RAMBaseHost, RAMSize, VM_PAGE_READ | VM_PAGE_WRITE | VM_PAGE_EXECUTE) < 0) {
783                  sprintf(str, GetString(STR_RAM_MMAP_ERR), strerror(errno));
784                  ErrorAlert(str);
785                  goto quit;
# Line 535 | Line 787 | int main(int argc, char **argv)
787   #endif
788          RAMBase = RAM_BASE;
789          ram_area_mapped = true;
790 <        D(bug("RAM area at %08x\n", RAMBase));
790 >        D(bug("RAM area at %p (%08x)\n", RAMBaseHost, RAMBase));
791  
792          if (RAMBase > ROM_BASE) {
793                  ErrorAlert(GetString(STR_RAM_HIGHER_THAN_ROM_ERR));
# Line 571 | Line 823 | int main(int argc, char **argv)
823          }
824          delete[] rom_tmp;
825  
826 <        // Load NVRAM
827 <        XPRAMInit();
576 <
577 <        // Set boot volume
578 <        i16 = PrefsFindInt32("bootdrive");
579 <        XPRAM[0x1378] = i16 >> 8;
580 <        XPRAM[0x1379] = i16 & 0xff;
581 <        i16 = PrefsFindInt32("bootdriver");
582 <        XPRAM[0x137a] = i16 >> 8;
583 <        XPRAM[0x137b] = i16 & 0xff;
584 <
585 <        // Create BootGlobs at top of Mac memory
586 <        memset((void *)(RAMBase + RAMSize - 4096), 0, 4096);
587 <        BootGlobsAddr = RAMBase + RAMSize - 0x1c;
588 <        boot_globs = (uint32 *)BootGlobsAddr;
589 <        boot_globs[-5] = htonl(RAMBase + RAMSize);      // MemTop
590 <        boot_globs[0] = htonl(RAMBase);                         // First RAM bank
591 <        boot_globs[1] = htonl(RAMSize);
592 <        boot_globs[2] = htonl((uint32)-1);                      // End of bank table
593 <
594 <        // Init thunks
595 <        if (!ThunksInit())
826 >        // Initialize everything
827 >        if (!InitAll())
828                  goto quit;
829 <
598 <        // Init drivers
599 <        SonyInit();
600 <        DiskInit();
601 <        CDROMInit();
602 <        SCSIInit();
603 <
604 <        // Init external file system
605 <        ExtFSInit();
606 <
607 <        // Init audio
608 <        AudioInit();
609 <
610 <        // Init network
611 <        EtherInit();
612 <
613 <        // Init serial ports
614 <        SerialInit();
615 <
616 <        // Init Time Manager
617 <        TimerInit();
618 <
619 <        // Init clipboard
620 <        ClipInit();
621 <
622 <        // Init video
623 <        if (!VideoInit())
624 <                goto quit;
625 <
626 <        // Install ROM patches
627 <        if (!PatchROM()) {
628 <                ErrorAlert(GetString(STR_UNSUPPORTED_ROM_TYPE_ERR));
629 <                goto quit;
630 <        }
829 >        D(bug("Initialization complete\n"));
830  
831          // Clear caches (as we loaded and patched code) and write protect ROM
832   #if !EMULATED_PPC
833 <        MakeExecutable(0, (void *)ROM_BASE, ROM_AREA_SIZE);
635 < #endif
636 <        vm_protect((char *)ROM_BASE, ROM_AREA_SIZE, VM_PAGE_READ | VM_PAGE_EXECUTE);
637 <
638 <        // Initialize Kernel Data
639 <        memset(kernel_data, 0, sizeof(KernelData));
640 <        if (ROMType == ROMTYPE_NEWWORLD) {
641 <                uintptr of_dev_tree = SheepMem::Reserve(4 * sizeof(uint32));
642 <                memset((void *)of_dev_tree, 0, 4 * sizeof(uint32));
643 <                uintptr vector_lookup_tbl = SheepMem::Reserve(128);
644 <                uintptr vector_mask_tbl = SheepMem::Reserve(64);
645 <                memset((uint8 *)kernel_data + 0xb80, 0x3d, 0x80);
646 <                memset((void *)vector_lookup_tbl, 0, 128);
647 <                memset((void *)vector_mask_tbl, 0, 64);
648 <                kernel_data->v[0xb80 >> 2] = htonl(ROM_BASE);
649 <                kernel_data->v[0xb84 >> 2] = htonl(of_dev_tree);                        // OF device tree base
650 <                kernel_data->v[0xb90 >> 2] = htonl(vector_lookup_tbl);
651 <                kernel_data->v[0xb94 >> 2] = htonl(vector_mask_tbl);
652 <                kernel_data->v[0xb98 >> 2] = htonl(ROM_BASE);                           // OpenPIC base
653 <                kernel_data->v[0xbb0 >> 2] = htonl(0);                                          // ADB base
654 <                kernel_data->v[0xc20 >> 2] = htonl(RAMSize);
655 <                kernel_data->v[0xc24 >> 2] = htonl(RAMSize);
656 <                kernel_data->v[0xc30 >> 2] = htonl(RAMSize);
657 <                kernel_data->v[0xc34 >> 2] = htonl(RAMSize);
658 <                kernel_data->v[0xc38 >> 2] = htonl(0x00010020);
659 <                kernel_data->v[0xc3c >> 2] = htonl(0x00200001);
660 <                kernel_data->v[0xc40 >> 2] = htonl(0x00010000);
661 <                kernel_data->v[0xc50 >> 2] = htonl(RAMBase);
662 <                kernel_data->v[0xc54 >> 2] = htonl(RAMSize);
663 <                kernel_data->v[0xf60 >> 2] = htonl(PVR);
664 <                kernel_data->v[0xf64 >> 2] = htonl(CPUClockSpeed);
665 <                kernel_data->v[0xf68 >> 2] = htonl(BusClockSpeed);
666 <                kernel_data->v[0xf6c >> 2] = htonl(CPUClockSpeed);
667 <        } else {
668 <                kernel_data->v[0xc80 >> 2] = htonl(RAMSize);
669 <                kernel_data->v[0xc84 >> 2] = htonl(RAMSize);
670 <                kernel_data->v[0xc90 >> 2] = htonl(RAMSize);
671 <                kernel_data->v[0xc94 >> 2] = htonl(RAMSize);
672 <                kernel_data->v[0xc98 >> 2] = htonl(0x00010020);
673 <                kernel_data->v[0xc9c >> 2] = htonl(0x00200001);
674 <                kernel_data->v[0xca0 >> 2] = htonl(0x00010000);
675 <                kernel_data->v[0xcb0 >> 2] = htonl(RAMBase);
676 <                kernel_data->v[0xcb4 >> 2] = htonl(RAMSize);
677 <                kernel_data->v[0xf80 >> 2] = htonl(PVR);
678 <                kernel_data->v[0xf84 >> 2] = htonl(CPUClockSpeed);
679 <                kernel_data->v[0xf88 >> 2] = htonl(BusClockSpeed);
680 <                kernel_data->v[0xf8c >> 2] = htonl(CPUClockSpeed);
681 <        }
682 <
683 <        // Initialize extra low memory
684 <        D(bug("Initializing Low Memory...\n"));
685 <        memset(NULL, 0, 0x3000);
686 <        WriteMacInt32(XLM_SIGNATURE, FOURCC('B','a','a','h'));                  // Signature to detect SheepShaver
687 <        WriteMacInt32(XLM_KERNEL_DATA, KernelDataAddr);                                 // For trap replacement routines
688 <        WriteMacInt32(XLM_PVR, PVR);                                                                    // Theoretical PVR
689 <        WriteMacInt32(XLM_BUS_CLOCK, BusClockSpeed);                                    // For DriverServicesLib patch
690 <        WriteMacInt16(XLM_EXEC_RETURN_OPCODE, M68K_EXEC_RETURN);                // For Execute68k() (RTS from the executed 68k code will jump here and end 68k mode)
691 <        WriteMacInt32(XLM_ZERO_PAGE, SheepMem::ZeroPage());                             // Pointer to read-only page with all bits set to 0
692 < #if !EMULATED_PPC
693 <        WriteMacInt32(XLM_TOC, (uint32)TOC);                                                            // TOC pointer of emulator
833 >        flush_icache_range(ROM_BASE, ROM_BASE + ROM_AREA_SIZE);
834   #endif
835 <        WriteMacInt32(XLM_ETHER_INIT, NativeFunction(NATIVE_ETHER_INIT));       // DLPI ethernet driver functions
696 <        WriteMacInt32(XLM_ETHER_TERM, NativeFunction(NATIVE_ETHER_TERM));
697 <        WriteMacInt32(XLM_ETHER_OPEN, NativeFunction(NATIVE_ETHER_OPEN));
698 <        WriteMacInt32(XLM_ETHER_CLOSE, NativeFunction(NATIVE_ETHER_CLOSE));
699 <        WriteMacInt32(XLM_ETHER_WPUT, NativeFunction(NATIVE_ETHER_WPUT));
700 <        WriteMacInt32(XLM_ETHER_RSRV, NativeFunction(NATIVE_ETHER_RSRV));
701 <        WriteMacInt32(XLM_VIDEO_DOIO, NativeFunction(NATIVE_VIDEO_DO_DRIVER_IO));
702 <        D(bug("Low Memory initialized\n"));
835 >        vm_protect(ROMBaseHost, ROM_AREA_SIZE, VM_PAGE_READ | VM_PAGE_EXECUTE);
836  
837          // Start 60Hz thread
838 +        tick_thread_cancel = false;
839          tick_thread_active = (pthread_create(&tick_thread, NULL, tick_func, NULL) == 0);
840          D(bug("Tick thread installed (%ld)\n", tick_thread));
841  
842          // Start NVRAM watchdog thread
843          memcpy(last_xpram, XPRAM, XPRAM_SIZE);
844 +        nvram_thread_cancel = false;
845          nvram_thread_active = (pthread_create(&nvram_thread, NULL, nvram_func, NULL) == 0);
846          D(bug("NVRAM thread installed (%ld)\n", nvram_thread));
847  
848   #if !EMULATED_PPC
714        // Create and install stacks for signal handlers
715        sig_stack = malloc(SIG_STACK_SIZE);
716        D(bug("Signal stack at %p\n", sig_stack));
717        if (sig_stack == NULL) {
718                ErrorAlert(GetString(STR_NOT_ENOUGH_MEMORY_ERR));
719                goto quit;
720        }
721        extra_stack = malloc(SIG_STACK_SIZE);
722        D(bug("Extra stack at %p\n", extra_stack));
723        if (extra_stack == NULL) {
724                ErrorAlert(GetString(STR_NOT_ENOUGH_MEMORY_ERR));
725                goto quit;
726        }
727        struct sigaltstack new_stack;
728        new_stack.ss_sp = sig_stack;
729        new_stack.ss_flags = 0;
730        new_stack.ss_size = SIG_STACK_SIZE;
731        if (sigaltstack(&new_stack, NULL) < 0) {
732                sprintf(str, GetString(STR_SIGALTSTACK_ERR), strerror(errno));
733                ErrorAlert(str);
734                goto quit;
735        }
736 #endif
737
738 #if !EMULATED_PPC
739        // Install SIGSEGV handler
740        sigemptyset(&sigsegv_action.sa_mask);   // Block interrupts during SEGV handling
741        sigaddset(&sigsegv_action.sa_mask, SIGUSR2);
742        sigsegv_action.sa_handler = (__sighandler_t)sigsegv_handler;
743        sigsegv_action.sa_flags = SA_ONSTACK;
744        sigsegv_action.sa_restorer = NULL;
745        if (sigaction(SIGSEGV, &sigsegv_action, NULL) < 0) {
746                sprintf(str, GetString(STR_SIGSEGV_INSTALL_ERR), strerror(errno));
747                ErrorAlert(str);
748                goto quit;
749        }
750
849          // Install SIGILL handler
850          sigemptyset(&sigill_action.sa_mask);    // Block interrupts during ILL handling
851          sigaddset(&sigill_action.sa_mask, SIGUSR2);
852 <        sigill_action.sa_handler = (__sighandler_t)sigill_handler;
853 <        sigill_action.sa_flags = SA_ONSTACK;
852 >        sigill_action.sa_sigaction = sigill_handler;
853 >        sigill_action.sa_flags = SA_ONSTACK | SA_SIGINFO;
854 > #ifdef HAVE_SIGNAL_SA_RESTORER
855          sigill_action.sa_restorer = NULL;
856 + #endif
857          if (sigaction(SIGILL, &sigill_action, NULL) < 0) {
858                  sprintf(str, GetString(STR_SIGILL_INSTALL_ERR), strerror(errno));
859                  ErrorAlert(str);
# Line 761 | Line 861 | int main(int argc, char **argv)
861          }
862   #endif
863  
864 + #if !EMULATED_PPC
865          // Install interrupt signal handler
866          sigemptyset(&sigusr2_action.sa_mask);
867 <        sigusr2_action.sa_handler = (__sighandler_t)sigusr2_handler;
868 <        sigusr2_action.sa_flags = 0;
869 < #if !EMULATED_PPC
769 <        sigusr2_action.sa_flags = SA_ONSTACK | SA_RESTART;
770 < #endif
867 >        sigusr2_action.sa_sigaction = sigusr2_handler_init;
868 >        sigusr2_action.sa_flags = SA_ONSTACK | SA_RESTART | SA_SIGINFO;
869 > #ifdef HAVE_SIGNAL_SA_RESTORER
870          sigusr2_action.sa_restorer = NULL;
871 + #endif
872          if (sigaction(SIGUSR2, &sigusr2_action, NULL) < 0) {
873                  sprintf(str, GetString(STR_SIGUSR2_INSTALL_ERR), strerror(errno));
874                  ErrorAlert(str);
875                  goto quit;
876          }
877 + #endif
878  
879          // Get my thread ID and execute MacOS thread function
880          emul_thread = pthread_self();
# Line 799 | Line 900 | static void Quit(void)
900  
901          // Stop 60Hz thread
902          if (tick_thread_active) {
903 +                tick_thread_cancel = true;
904                  pthread_cancel(tick_thread);
905                  pthread_join(tick_thread, NULL);
906          }
907  
908          // Stop NVRAM watchdog thread
909          if (nvram_thread_active) {
910 +                nvram_thread_cancel = true;
911                  pthread_cancel(nvram_thread);
912                  pthread_join(nvram_thread, NULL);
913          }
914  
915   #if !EMULATED_PPC
916 <        // Uninstall SIGSEGV handler
916 >        // Uninstall SIGSEGV and SIGBUS handlers
917          sigemptyset(&sigsegv_action.sa_mask);
918          sigsegv_action.sa_handler = SIG_DFL;
919          sigsegv_action.sa_flags = 0;
920          sigaction(SIGSEGV, &sigsegv_action, NULL);
921 +        sigaction(SIGBUS, &sigsegv_action, NULL);
922  
923          // Uninstall SIGILL handler
924          sigemptyset(&sigill_action.sa_mask);
925          sigill_action.sa_handler = SIG_DFL;
926          sigill_action.sa_flags = 0;
927          sigaction(SIGILL, &sigill_action, NULL);
824 #endif
825
826        // Save NVRAM
827        XPRAMExit();
828
829        // Exit clipboard
830        ClipExit();
831
832        // Exit Time Manager
833        TimerExit();
834
835        // Exit serial
836        SerialExit();
928  
929 <        // Exit network
930 <        EtherExit();
931 <
932 <        // Exit audio
933 <        AudioExit();
934 <
844 <        // Exit video
845 <        VideoExit();
846 <
847 <        // Exit external file system
848 <        ExtFSExit();
929 >        // Delete stacks for signal handlers
930 >        if (sig_stack.ss_sp)
931 >                free(sig_stack.ss_sp);
932 >        if (extra_stack.ss_sp)
933 >                free(extra_stack.ss_sp);
934 > #endif
935  
936 <        // Exit drivers
937 <        SCSIExit();
852 <        CDROMExit();
853 <        DiskExit();
854 <        SonyExit();
936 >        // Deinitialize everything
937 >        ExitAll();
938  
939          // Delete SheepShaver globals
940          SheepMem::Exit();
941  
942          // Delete RAM area
943          if (ram_area_mapped)
944 <                vm_release((char *)RAM_BASE, RAMSize);
944 >                vm_mac_release(RAM_BASE, RAMSize);
945  
946          // Delete ROM area
947          if (rom_area_mapped)
948 <                vm_release((char *)ROM_BASE, ROM_AREA_SIZE);
948 >                vm_mac_release(ROM_BASE, ROM_AREA_SIZE);
949 >
950 >        // Delete DR cache areas
951 >        if (dr_emulator_area_mapped)
952 >                vm_mac_release(DR_EMULATOR_BASE, DR_EMULATOR_SIZE);
953 >        if (dr_cache_area_mapped)
954 >                vm_mac_release(DR_CACHE_BASE, DR_CACHE_SIZE);
955  
956          // Delete Kernel Data area
957 <        if (kernel_area >= 0) {
869 <                shmdt((void *)KERNEL_DATA_BASE);
870 <                shmdt((void *)KERNEL_DATA2_BASE);
871 <                shmctl(kernel_area, IPC_RMID, NULL);
872 <        }
957 >        kernel_data_exit();
958  
959          // Delete Low Memory area
960          if (lm_area_mapped)
961 <                munmap((char *)0x0000, 0x3000);
961 >                vm_mac_release(0, 0x3000);
962  
963          // Close /dev/zero
964          if (zero_fd > 0)
# Line 891 | Line 976 | static void Quit(void)
976   #endif
977  
978          // Close X11 server connection
979 + #ifndef USE_SDL_VIDEO
980          if (x_display)
981                  XCloseDisplay(x_display);
982 + #endif
983  
984          exit(0);
985   }
986  
987  
988   /*
989 + *  Initialize Kernel Data segments
990 + */
991 +
992 + #if defined(__CYGWIN__)
993 + #define WIN32_LEAN_AND_MEAN
994 + #include <windows.h>
995 +
996 + static HANDLE kernel_handle;                            // Shared memory handle for Kernel Data
997 + static DWORD allocation_granule;                        // Minimum size of allocateable are (64K)
998 + static DWORD kernel_area_size;                          // Size of Kernel Data area
999 + #endif
1000 +
1001 + static bool kernel_data_init(void)
1002 + {
1003 +        char str[256];
1004 + #ifdef _WIN32
1005 +        SYSTEM_INFO si;
1006 +        GetSystemInfo(&si);
1007 +        allocation_granule = si.dwAllocationGranularity;
1008 +        kernel_area_size = (KERNEL_AREA_SIZE + allocation_granule - 1) & -allocation_granule;
1009 +
1010 +        char rcs[10];
1011 +        LPVOID kernel_addr;
1012 +        kernel_handle = CreateFileMapping(INVALID_HANDLE_VALUE, NULL, PAGE_READWRITE, 0, kernel_area_size, NULL);
1013 +        if (kernel_handle == NULL) {
1014 +                sprintf(rcs, "%d", GetLastError());
1015 +                sprintf(str, GetString(STR_KD_SHMGET_ERR), rcs);
1016 +                ErrorAlert(str);
1017 +                return false;
1018 +        }
1019 +        kernel_addr = (LPVOID)Mac2HostAddr(KERNEL_DATA_BASE & -allocation_granule);
1020 +        if (MapViewOfFileEx(kernel_handle, FILE_MAP_READ | FILE_MAP_WRITE, 0, 0, kernel_area_size, kernel_addr) != kernel_addr) {
1021 +                sprintf(rcs, "%d", GetLastError());
1022 +                sprintf(str, GetString(STR_KD_SHMAT_ERR), rcs);
1023 +                ErrorAlert(str);
1024 +                return false;
1025 +        }
1026 +        kernel_addr = (LPVOID)Mac2HostAddr(KERNEL_DATA2_BASE & -allocation_granule);
1027 +        if (MapViewOfFileEx(kernel_handle, FILE_MAP_READ | FILE_MAP_WRITE, 0, 0, kernel_area_size, kernel_addr) != kernel_addr) {
1028 +                sprintf(rcs, "%d", GetLastError());
1029 +                sprintf(str, GetString(STR_KD2_SHMAT_ERR), rcs);
1030 +                ErrorAlert(str);
1031 +                return false;
1032 +        }
1033 + #else
1034 +        kernel_area = shmget(IPC_PRIVATE, KERNEL_AREA_SIZE, 0600);
1035 +        if (kernel_area == -1) {
1036 +                sprintf(str, GetString(STR_KD_SHMGET_ERR), strerror(errno));
1037 +                ErrorAlert(str);
1038 +                return false;
1039 +        }
1040 +        if (shmat(kernel_area, Mac2HostAddr(KERNEL_DATA_BASE), 0) < 0) {
1041 +                sprintf(str, GetString(STR_KD_SHMAT_ERR), strerror(errno));
1042 +                ErrorAlert(str);
1043 +                return false;
1044 +        }
1045 +        if (shmat(kernel_area, Mac2HostAddr(KERNEL_DATA2_BASE), 0) < 0) {
1046 +                sprintf(str, GetString(STR_KD2_SHMAT_ERR), strerror(errno));
1047 +                ErrorAlert(str);
1048 +                return false;
1049 +        }
1050 + #endif
1051 +        return true;
1052 + }
1053 +
1054 +
1055 + /*
1056 + *  Deallocate Kernel Data segments
1057 + */
1058 +
1059 + static void kernel_data_exit(void)
1060 + {
1061 + #ifdef _WIN32
1062 +        if (kernel_handle) {
1063 +                UnmapViewOfFile(Mac2HostAddr(KERNEL_DATA_BASE & -allocation_granule));
1064 +                UnmapViewOfFile(Mac2HostAddr(KERNEL_DATA2_BASE & -allocation_granule));
1065 +                CloseHandle(kernel_handle);
1066 +        }
1067 + #else
1068 +        if (kernel_area >= 0) {
1069 +                shmdt(Mac2HostAddr(KERNEL_DATA_BASE));
1070 +                shmdt(Mac2HostAddr(KERNEL_DATA2_BASE));
1071 +                shmctl(kernel_area, IPC_RMID, NULL);
1072 +        }
1073 + #endif
1074 + }
1075 +
1076 +
1077 + /*
1078   *  Jump into Mac ROM, start 680x0 emulator
1079   */
1080  
# Line 985 | Line 1161 | void QuitEmulator(void)
1161  
1162  
1163   /*
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 /*
1164   *  Dump 68k registers
1165   */
1166  
# Line 1027 | Line 1188 | void Dump68kRegs(M68kRegisters *r)
1188   *  Make code executable
1189   */
1190  
1191 < void MakeExecutable(int dummy, void *start, uint32 length)
1191 > void MakeExecutable(int dummy, uint32 start, uint32 length)
1192   {
1193 <        if (((uintptr)start >= ROM_BASE) && ((uintptr)start < (ROM_BASE + ROM_SIZE)))
1193 >        if ((start >= ROM_BASE) && (start < (ROM_BASE + ROM_SIZE)))
1194                  return;
1195   #if EMULATED_PPC
1196 <        FlushCodeCache((uintptr)start, (uintptr)start + length);
1196 >        FlushCodeCache(start, start + length);
1197   #else
1198 <        flush_icache_range(start, (void *)((uintptr)start + length));
1198 >        flush_icache_range(start, start + length);
1199   #endif
1200   }
1201  
1202  
1203   /*
1204 < *  Patch things after system startup (gets called by disk driver accRun routine)
1204 > *  NVRAM watchdog thread (saves NVRAM every minute)
1205   */
1206  
1207 < void PatchAfterStartup(void)
1207 > static void nvram_watchdog(void)
1208   {
1209 <        ExecuteNative(NATIVE_VIDEO_INSTALL_ACCEL);
1210 <        InstallExtFS();
1209 >        if (memcmp(last_xpram, XPRAM, XPRAM_SIZE)) {
1210 >                memcpy(last_xpram, XPRAM, XPRAM_SIZE);
1211 >                SaveXPRAM();
1212 >        }
1213   }
1214  
1052
1053 /*
1054 *  NVRAM watchdog thread (saves NVRAM every minute)
1055 */
1056
1215   static void *nvram_func(void *arg)
1216   {
1217 <        struct timespec req = {60, 0};  // 1 minute
1218 <
1219 <        for (;;) {
1220 <                pthread_testcancel();
1063 <                nanosleep(&req, NULL);
1064 <                pthread_testcancel();
1065 <                if (memcmp(last_xpram, XPRAM, XPRAM_SIZE)) {
1066 <                        memcpy(last_xpram, XPRAM, XPRAM_SIZE);
1067 <                        SaveXPRAM();
1068 <                }
1217 >        while (!nvram_thread_cancel) {
1218 >                for (int i=0; i<60 && !nvram_thread_cancel; i++)
1219 >                        Delay_usec(999999);             // Only wait 1 second so we quit promptly when nvram_thread_cancel becomes true
1220 >                nvram_watchdog();
1221          }
1222          return NULL;
1223   }
# Line 1078 | Line 1230 | static void *nvram_func(void *arg)
1230   static void *tick_func(void *arg)
1231   {
1232          int tick_counter = 0;
1233 <        struct timespec req = {0, 16625000};
1233 >        uint64 start = GetTicks_usec();
1234 >        int64 ticks = 0;
1235 >        uint64 next = GetTicks_usec();
1236  
1237 <        for (;;) {
1237 >        while (!tick_thread_cancel) {
1238  
1239                  // Wait
1240 <                nanosleep(&req, NULL);
1240 >                next += 16625;
1241 >                int64 delay = next - GetTicks_usec();
1242 >                if (delay > 0)
1243 >                        Delay_usec(delay);
1244 >                else if (delay < -16625)
1245 >                        next = GetTicks_usec();
1246 >                ticks++;
1247  
1248   #if !EMULATED_PPC
1249                  // Did we crash?
1250                  if (emul_thread_fatal) {
1251  
1252                          // Yes, dump registers
1253 <                        pt_regs *r = (pt_regs *)&sigsegv_regs;
1253 >                        sigregs *r = &sigsegv_regs;
1254                          char str[256];
1255 <                        sprintf(str, "SIGSEGV\n"
1255 >                        if (crash_reason == NULL)
1256 >                                crash_reason = "SIGSEGV";
1257 >                        sprintf(str, "%s\n"
1258                                  "   pc %08lx     lr %08lx    ctr %08lx    msr %08lx\n"
1259                                  "  xer %08lx     cr %08lx  \n"
1260                                  "   r0 %08lx     r1 %08lx     r2 %08lx     r3 %08lx\n"
# Line 1103 | Line 1265 | static void *tick_func(void *arg)
1265                                  "  r20 %08lx    r21 %08lx    r22 %08lx    r23 %08lx\n"
1266                                  "  r24 %08lx    r25 %08lx    r26 %08lx    r27 %08lx\n"
1267                                  "  r28 %08lx    r29 %08lx    r30 %08lx    r31 %08lx\n",
1268 +                                crash_reason,
1269                                  r->nip, r->link, r->ctr, r->msr,
1270                                  r->xer, r->ccr,
1271                                  r->gpr[0], r->gpr[1], r->gpr[2], r->gpr[3],
# Line 1138 | Line 1301 | static void *tick_func(void *arg)
1301                          TriggerInterrupt();
1302                  }
1303          }
1304 +
1305 +        uint64 end = GetTicks_usec();
1306 +        D(bug("%lld ticks in %lld usec = %f ticks/sec\n", ticks, end - start, ticks * 1000000.0 / (end - start)));
1307          return NULL;
1308   }
1309  
# Line 1187 | Line 1353 | struct B2_mutex {
1353              pthread_mutexattr_init(&attr);
1354              // Initialize the mutex for priority inheritance --
1355              // required for accurate timing.
1356 < #ifdef HAVE_PTHREAD_MUTEXATTR_SETPROTOCOL
1356 > #if defined(HAVE_PTHREAD_MUTEXATTR_SETPROTOCOL) && !defined(__CYGWIN__)
1357              pthread_mutexattr_setprotocol(&attr, PTHREAD_PRIO_INHERIT);
1358   #endif
1359   #if defined(HAVE_PTHREAD_MUTEXATTR_SETTYPE) && defined(PTHREAD_MUTEX_NORMAL)
# Line 1258 | Line 1424 | void B2_delete_mutex(B2_mutex *mutex)
1424   *  Trigger signal USR2 from another thread
1425   */
1426  
1427 < #if !EMULATED_PPC || ASYNC_IRQ
1427 > #if !EMULATED_PPC
1428   void TriggerInterrupt(void)
1429   {
1430 <        if (ready_for_signals)
1430 >        if (ready_for_signals) {
1431 >                idle_resume();
1432                  pthread_kill(emul_thread, SIGUSR2);
1433 +        }
1434   }
1435   #endif
1436  
# Line 1290 | Line 1458 | void ClearInterruptFlag(uint32 flag)
1458  
1459   void DisableInterrupt(void)
1460   {
1461 + #if EMULATED_PPC
1462 +        WriteMacInt32(XLM_IRQ_NEST, int32(ReadMacInt32(XLM_IRQ_NEST)) + 1);
1463 + #else
1464          atomic_add((int *)XLM_IRQ_NEST, 1);
1465 + #endif
1466   }
1467  
1468  
# Line 1300 | Line 1472 | void DisableInterrupt(void)
1472  
1473   void EnableInterrupt(void)
1474   {
1475 + #if EMULATED_PPC
1476 +        WriteMacInt32(XLM_IRQ_NEST, int32(ReadMacInt32(XLM_IRQ_NEST)) - 1);
1477 + #else
1478          atomic_add((int *)XLM_IRQ_NEST, -1);
1479 + #endif
1480   }
1481  
1482  
# Line 1308 | Line 1484 | void EnableInterrupt(void)
1484   *  USR2 handler
1485   */
1486  
1487 < #if EMULATED_PPC
1488 < static void sigusr2_handler(int sig)
1487 > #if !EMULATED_PPC
1488 > void sigusr2_handler(int sig, siginfo_t *sip, void *scp)
1489   {
1490 < #if ASYNC_IRQ
1491 <        extern void HandleInterrupt(void);
1492 <        HandleInterrupt();
1490 >        machine_regs *r = MACHINE_REGISTERS(scp);
1491 >
1492 > #ifdef SYSTEM_CLOBBERS_R2
1493 >        // Restore pointer to Thread Local Storage
1494 >        set_r2(TOC);
1495 > #endif
1496 > #ifdef SYSTEM_CLOBBERS_R13
1497 >        // Restore pointer to .sdata section
1498 >        set_r13(R13);
1499 > #endif
1500 >
1501 > #ifdef USE_SDL_VIDEO
1502 >        // We must fill in the events queue in the same thread that did call SDL_SetVideoMode()
1503 >        SDL_PumpEvents();
1504   #endif
1318 }
1319 #else
1320 static void sigusr2_handler(int sig, sigcontext_struct *sc)
1321 {
1322        pt_regs *r = sc->regs;
1505  
1506          // Do nothing if interrupts are disabled
1507          if (*(int32 *)XLM_IRQ_NEST > 0)
# Line 1333 | Line 1515 | static void sigusr2_handler(int sig, sig
1515                  case MODE_68K:
1516                          // 68k emulator active, trigger 68k interrupt level 1
1517                          WriteMacInt16(ntohl(kernel_data->v[0x67c >> 2]), 1);
1518 <                        r->ccr |= ntohl(kernel_data->v[0x674 >> 2]);
1518 >                        r->cr() |= ntohl(kernel_data->v[0x674 >> 2]);
1519                          break;
1520  
1521   #if INTERRUPTS_IN_NATIVE_MODE
1522                  case MODE_NATIVE:
1523                          // 68k emulator inactive, in nanokernel?
1524 <                        if (r->gpr[1] != KernelDataAddr) {
1524 >                        if (r->gpr(1) != KernelDataAddr) {
1525 >
1526 >                                // Set extra stack for SIGSEGV handler
1527 >                                sigaltstack(&extra_stack, NULL);
1528 >                                
1529                                  // Prepare for 68k interrupt level 1
1530                                  WriteMacInt16(ntohl(kernel_data->v[0x67c >> 2]), 1);
1531                                  WriteMacInt32(ntohl(kernel_data->v[0x658 >> 2]) + 0xdc, ReadMacInt32(ntohl(kernel_data->v[0x658 >> 2]) + 0xdc) | ntohl(kernel_data->v[0x674 >> 2]));
1532  
1533                                  // Execute nanokernel interrupt routine (this will activate the 68k emulator)
1534 <                                atomic_add((int32 *)XLM_IRQ_NEST, 1);
1534 >                                DisableInterrupt();
1535                                  if (ROMType == ROMTYPE_NEWWORLD)
1536                                          ppc_interrupt(ROM_BASE + 0x312b1c, KernelDataAddr);
1537                                  else
1538                                          ppc_interrupt(ROM_BASE + 0x312a3c, KernelDataAddr);
1539 +
1540 +                                // Reset normal stack
1541 +                                sigaltstack(&sig_stack, NULL);
1542                          }
1543                          break;
1544   #endif
# Line 1360 | Line 1549 | static void sigusr2_handler(int sig, sig
1549                          if ((ReadMacInt32(XLM_68K_R25) & 7) == 0) {
1550  
1551                                  // Set extra stack for SIGSEGV handler
1552 <                                struct sigaltstack new_stack;
1364 <                                new_stack.ss_sp = extra_stack;
1365 <                                new_stack.ss_flags = 0;
1366 <                                new_stack.ss_size = SIG_STACK_SIZE;
1367 <                                sigaltstack(&new_stack, NULL);
1552 >                                sigaltstack(&extra_stack, NULL);
1553   #if 1
1554                                  // Execute full 68k interrupt routine
1555                                  M68kRegisters r;
# Line 1390 | Line 1575 | static void sigusr2_handler(int sig, sig
1575                                          }
1576                                  }
1577   #endif
1578 <                                // Reset normal signal stack
1579 <                                new_stack.ss_sp = sig_stack;
1395 <                                new_stack.ss_flags = 0;
1396 <                                new_stack.ss_size = SIG_STACK_SIZE;
1397 <                                sigaltstack(&new_stack, NULL);
1578 >                                // Reset normal stack
1579 >                                sigaltstack(&sig_stack, NULL);
1580                          }
1581                          break;
1582   #endif
# Line 1408 | Line 1590 | static void sigusr2_handler(int sig, sig
1590   */
1591  
1592   #if !EMULATED_PPC
1593 < static void sigsegv_handler(int sig, sigcontext_struct *sc)
1593 > static void sigsegv_handler(int sig, siginfo_t *sip, void *scp)
1594   {
1595 <        pt_regs *r = sc->regs;
1595 >        machine_regs *r = MACHINE_REGISTERS(scp);
1596  
1597          // Get effective address
1598 <        uint32 addr = r->dar;
1598 >        uint32 addr = r->dar();
1599          
1600 + #ifdef SYSTEM_CLOBBERS_R2
1601 +        // Restore pointer to Thread Local Storage
1602 +        set_r2(TOC);
1603 + #endif
1604 + #ifdef SYSTEM_CLOBBERS_R13
1605 +        // Restore pointer to .sdata section
1606 +        set_r13(R13);
1607 + #endif
1608 +
1609   #if ENABLE_VOSF
1610          // Handle screen fault.
1611          extern bool Screen_fault_handler(sigsegv_address_t fault_address, sigsegv_address_t fault_instruction);
1612 <        if (Screen_fault_handler((sigsegv_address_t)addr, (sigsegv_address_t)r->nip))
1612 >        if (Screen_fault_handler((sigsegv_address_t)addr, (sigsegv_address_t)r->pc()))
1613                  return;
1614   #endif
1615  
1616          num_segv++;
1617  
1618 <        // Fault in Mac ROM or RAM?
1619 <        bool mac_fault = (r->nip >= ROM_BASE) && (r->nip < (ROM_BASE + ROM_AREA_SIZE)) || (r->nip >= RAMBase) && (r->nip < (RAMBase + RAMSize));
1618 >        // Fault in Mac ROM or RAM or DR Cache?
1619 >        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));
1620          if (mac_fault) {
1621  
1622                  // "VM settings" during MacOS 8 installation
1623 <                if (r->nip == ROM_BASE + 0x488160 && r->gpr[20] == 0xf8000000) {
1624 <                        r->nip += 4;
1625 <                        r->gpr[8] = 0;
1623 >                if (r->pc() == ROM_BASE + 0x488160 && r->gpr(20) == 0xf8000000) {
1624 >                        r->pc() += 4;
1625 >                        r->gpr(8) = 0;
1626                          return;
1627          
1628                  // MacOS 8.5 installation
1629 <                } else if (r->nip == ROM_BASE + 0x488140 && r->gpr[16] == 0xf8000000) {
1630 <                        r->nip += 4;
1631 <                        r->gpr[8] = 0;
1629 >                } else if (r->pc() == ROM_BASE + 0x488140 && r->gpr(16) == 0xf8000000) {
1630 >                        r->pc() += 4;
1631 >                        r->gpr(8) = 0;
1632                          return;
1633          
1634                  // MacOS 8 serial drivers on startup
1635 <                } else if (r->nip == ROM_BASE + 0x48e080 && (r->gpr[8] == 0xf3012002 || r->gpr[8] == 0xf3012000)) {
1636 <                        r->nip += 4;
1637 <                        r->gpr[8] = 0;
1635 >                } else if (r->pc() == ROM_BASE + 0x48e080 && (r->gpr(8) == 0xf3012002 || r->gpr(8) == 0xf3012000)) {
1636 >                        r->pc() += 4;
1637 >                        r->gpr(8) = 0;
1638                          return;
1639          
1640                  // MacOS 8.1 serial drivers on startup
1641 <                } else if (r->nip == ROM_BASE + 0x48c5e0 && (r->gpr[20] == 0xf3012002 || r->gpr[20] == 0xf3012000)) {
1642 <                        r->nip += 4;
1641 >                } else if (r->pc() == ROM_BASE + 0x48c5e0 && (r->gpr(20) == 0xf3012002 || r->gpr(20) == 0xf3012000)) {
1642 >                        r->pc() += 4;
1643 >                        return;
1644 >                } else if (r->pc() == ROM_BASE + 0x4a10a0 && (r->gpr(20) == 0xf3012002 || r->gpr(20) == 0xf3012000)) {
1645 >                        r->pc() += 4;
1646                          return;
1647 <                } else if (r->nip == ROM_BASE + 0x4a10a0 && (r->gpr[20] == 0xf3012002 || r->gpr[20] == 0xf3012000)) {
1648 <                        r->nip += 4;
1647 >        
1648 >                // MacOS 8.6 serial drivers on startup (with DR Cache and OldWorld ROM)
1649 >                } else if ((r->pc() - DR_CACHE_BASE) < DR_CACHE_SIZE && (r->gpr(16) == 0xf3012002 || r->gpr(16) == 0xf3012000)) {
1650 >                        r->pc() += 4;
1651 >                        return;
1652 >                } else if ((r->pc() - DR_CACHE_BASE) < DR_CACHE_SIZE && (r->gpr(20) == 0xf3012002 || r->gpr(20) == 0xf3012000)) {
1653 >                        r->pc() += 4;
1654                          return;
1655                  }
1656  
1657                  // Get opcode and divide into fields
1658 <                uint32 opcode = *((uint32 *)r->nip);
1658 >                uint32 opcode = *((uint32 *)r->pc());
1659                  uint32 primop = opcode >> 26;
1660                  uint32 exop = (opcode >> 1) & 0x3ff;
1661                  uint32 ra = (opcode >> 16) & 0x1f;
# Line 1545 | Line 1744 | static void sigsegv_handler(int sig, sig
1744                                  transfer_type = TYPE_STORE; transfer_size = SIZE_HALFWORD; addr_mode = MODE_NORM; break;
1745                          case 45:        // sthu
1746                                  transfer_type = TYPE_STORE; transfer_size = SIZE_HALFWORD; addr_mode = MODE_U; break;
1747 + #if EMULATE_UNALIGNED_LOADSTORE_MULTIPLE
1748 +                        case 46:        // lmw
1749 +                                if ((addr % 4) != 0) {
1750 +                                        uint32 ea = addr;
1751 +                                        D(bug("WARNING: unaligned lmw to EA=%08x from IP=%08x\n", ea, r->pc()));
1752 +                                        for (int i = rd; i <= 31; i++) {
1753 +                                                r->gpr(i) = ReadMacInt32(ea);
1754 +                                                ea += 4;
1755 +                                        }
1756 +                                        r->pc() += 4;
1757 +                                        goto rti;
1758 +                                }
1759 +                                break;
1760 +                        case 47:        // stmw
1761 +                                if ((addr % 4) != 0) {
1762 +                                        uint32 ea = addr;
1763 +                                        D(bug("WARNING: unaligned stmw to EA=%08x from IP=%08x\n", ea, r->pc()));
1764 +                                        for (int i = rd; i <= 31; i++) {
1765 +                                                WriteMacInt32(ea, r->gpr(i));
1766 +                                                ea += 4;
1767 +                                        }
1768 +                                        r->pc() += 4;
1769 +                                        goto rti;
1770 +                                }
1771 +                                break;
1772 + #endif
1773                  }
1774          
1775 <                // Ignore ROM writes
1776 <                if (transfer_type == TYPE_STORE && addr >= ROM_BASE && addr < ROM_BASE + ROM_SIZE) {
1777 < //                      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));
1775 >                // Ignore ROM writes (including to the zero page, which is read-only)
1776 >                if (transfer_type == TYPE_STORE &&
1777 >                        ((addr >= ROM_BASE && addr < ROM_BASE + ROM_SIZE) ||
1778 >                         (addr >= SheepMem::ZeroPage() && addr < SheepMem::ZeroPage() + SheepMem::PageSize()))) {
1779 > //                      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()));
1780                          if (addr_mode == MODE_U || addr_mode == MODE_UX)
1781 <                                r->gpr[ra] = addr;
1782 <                        r->nip += 4;
1781 >                                r->gpr(ra) = addr;
1782 >                        r->pc() += 4;
1783                          goto rti;
1784                  }
1785  
1786                  // Ignore illegal memory accesses?
1787                  if (PrefsFindBool("ignoresegv")) {
1788                          if (addr_mode == MODE_U || addr_mode == MODE_UX)
1789 <                                r->gpr[ra] = addr;
1789 >                                r->gpr(ra) = addr;
1790                          if (transfer_type == TYPE_LOAD)
1791 <                                r->gpr[rd] = 0;
1792 <                        r->nip += 4;
1791 >                                r->gpr(rd) = 0;
1792 >                        r->pc() += 4;
1793                          goto rti;
1794                  }
1795  
# Line 1570 | Line 1797 | static void sigsegv_handler(int sig, sig
1797                  if (!PrefsFindBool("nogui")) {
1798                          char str[256];
1799                          if (transfer_type == TYPE_LOAD || transfer_type == TYPE_STORE)
1800 <                                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]);
1800 >                                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));
1801                          else
1802 <                                sprintf(str, GetString(STR_UNKNOWN_SEGV_ERR), r->nip, r->gpr[24], r->gpr[1], opcode);
1802 >                                sprintf(str, GetString(STR_UNKNOWN_SEGV_ERR), r->pc(), r->gpr(24), r->gpr(1), opcode);
1803                          ErrorAlert(str);
1804                          QuitEmulator();
1805                          return;
# Line 1580 | Line 1807 | static void sigsegv_handler(int sig, sig
1807          }
1808  
1809          // For all other errors, jump into debugger (sort of...)
1810 +        crash_reason = (sig == SIGBUS) ? "SIGBUS" : "SIGSEGV";
1811          if (!ready_for_signals) {
1812 <                printf("SIGSEGV\n");
1813 <                printf(" sigcontext %p, pt_regs %p\n", sc, r);
1812 >                printf("%s\n");
1813 >                printf(" sigcontext %p, machine_regs %p\n", scp, r);
1814                  printf(
1815                          "   pc %08lx     lr %08lx    ctr %08lx    msr %08lx\n"
1816                          "  xer %08lx     cr %08lx  \n"
# Line 1594 | Line 1822 | static void sigsegv_handler(int sig, sig
1822                          "  r20 %08lx    r21 %08lx    r22 %08lx    r23 %08lx\n"
1823                          "  r24 %08lx    r25 %08lx    r26 %08lx    r27 %08lx\n"
1824                          "  r28 %08lx    r29 %08lx    r30 %08lx    r31 %08lx\n",
1825 <                        r->nip, r->link, r->ctr, r->msr,
1826 <                        r->xer, r->ccr,
1827 <                        r->gpr[0], r->gpr[1], r->gpr[2], r->gpr[3],
1828 <                        r->gpr[4], r->gpr[5], r->gpr[6], r->gpr[7],
1829 <                        r->gpr[8], r->gpr[9], r->gpr[10], r->gpr[11],
1830 <                        r->gpr[12], r->gpr[13], r->gpr[14], r->gpr[15],
1831 <                        r->gpr[16], r->gpr[17], r->gpr[18], r->gpr[19],
1832 <                        r->gpr[20], r->gpr[21], r->gpr[22], r->gpr[23],
1833 <                        r->gpr[24], r->gpr[25], r->gpr[26], r->gpr[27],
1834 <                        r->gpr[28], r->gpr[29], r->gpr[30], r->gpr[31]);
1825 >                        crash_reason,
1826 >                        r->pc(), r->lr(), r->ctr(), r->msr(),
1827 >                        r->xer(), r->cr(),
1828 >                        r->gpr(0), r->gpr(1), r->gpr(2), r->gpr(3),
1829 >                        r->gpr(4), r->gpr(5), r->gpr(6), r->gpr(7),
1830 >                        r->gpr(8), r->gpr(9), r->gpr(10), r->gpr(11),
1831 >                        r->gpr(12), r->gpr(13), r->gpr(14), r->gpr(15),
1832 >                        r->gpr(16), r->gpr(17), r->gpr(18), r->gpr(19),
1833 >                        r->gpr(20), r->gpr(21), r->gpr(22), r->gpr(23),
1834 >                        r->gpr(24), r->gpr(25), r->gpr(26), r->gpr(27),
1835 >                        r->gpr(28), r->gpr(29), r->gpr(30), r->gpr(31));
1836                  exit(1);
1837                  QuitEmulator();
1838                  return;
1839          } else {
1840                  // We crashed. Save registers, tell tick thread and loop forever
1841 <                sigsegv_regs = *(sigregs *)r;
1841 >                build_sigregs(&sigsegv_regs, r);
1842                  emul_thread_fatal = true;
1843                  for (;;) ;
1844          }
# Line 1621 | Line 1850 | rti:;
1850   *  SIGILL handler
1851   */
1852  
1853 < static void sigill_handler(int sig, sigcontext_struct *sc)
1853 > static void sigill_handler(int sig, siginfo_t *sip, void *scp)
1854   {
1855 <        pt_regs *r = sc->regs;
1855 >        machine_regs *r = MACHINE_REGISTERS(scp);
1856          char str[256];
1857  
1858 + #ifdef SYSTEM_CLOBBERS_R2
1859 +        // Restore pointer to Thread Local Storage
1860 +        set_r2(TOC);
1861 + #endif
1862 + #ifdef SYSTEM_CLOBBERS_R13
1863 +        // Restore pointer to .sdata section
1864 +        set_r13(R13);
1865 + #endif
1866 +
1867          // Fault in Mac ROM or RAM?
1868 <        bool mac_fault = (r->nip >= ROM_BASE) && (r->nip < (ROM_BASE + ROM_AREA_SIZE)) || (r->nip >= RAMBase) && (r->nip < (RAMBase + RAMSize));
1868 >        bool mac_fault = (r->pc() >= ROM_BASE) && (r->pc() < (ROM_BASE + ROM_AREA_SIZE)) || (r->pc() >= RAMBase) && (r->pc() < (RAMBase + RAMSize));
1869          if (mac_fault) {
1870  
1871                  // Get opcode and divide into fields
1872 <                uint32 opcode = *((uint32 *)r->nip);
1872 >                uint32 opcode = *((uint32 *)r->pc());
1873                  uint32 primop = opcode >> 26;
1874                  uint32 exop = (opcode >> 1) & 0x3ff;
1875                  uint32 ra = (opcode >> 16) & 0x1f;
# Line 1642 | Line 1880 | static void sigill_handler(int sig, sigc
1880                  switch (primop) {
1881                          case 9:         // POWER instructions
1882                          case 22:
1883 < power_inst:             sprintf(str, GetString(STR_POWER_INSTRUCTION_ERR), r->nip, r->gpr[1], opcode);
1883 > power_inst:             sprintf(str, GetString(STR_POWER_INSTRUCTION_ERR), r->pc(), r->gpr(1), opcode);
1884                                  ErrorAlert(str);
1885                                  QuitEmulator();
1886                                  return;
# Line 1650 | Line 1888 | power_inst:            sprintf(str, GetString(STR_
1888                          case 31:
1889                                  switch (exop) {
1890                                          case 83:        // mfmsr
1891 <                                                r->gpr[rd] = 0xf072;
1892 <                                                r->nip += 4;
1891 >                                                r->gpr(rd) = 0xf072;
1892 >                                                r->pc() += 4;
1893                                                  goto rti;
1894  
1895                                          case 210:       // mtsr
1896                                          case 242:       // mtsrin
1897                                          case 306:       // tlbie
1898 <                                                r->nip += 4;
1898 >                                                r->pc() += 4;
1899                                                  goto rti;
1900  
1901                                          case 339: {     // mfspr
# Line 1673 | Line 1911 | power_inst:            sprintf(str, GetString(STR_
1911                                                          case 957:       // PMC3
1912                                                          case 958:       // PMC4
1913                                                          case 959:       // SDA
1914 <                                                                r->nip += 4;
1914 >                                                                r->pc() += 4;
1915                                                                  goto rti;
1916                                                          case 25:        // SDR1
1917 <                                                                r->gpr[rd] = 0xdead001f;
1918 <                                                                r->nip += 4;
1917 >                                                                r->gpr(rd) = 0xdead001f;
1918 >                                                                r->pc() += 4;
1919                                                                  goto rti;
1920                                                          case 287:       // PVR
1921 <                                                                r->gpr[rd] = PVR;
1922 <                                                                r->nip += 4;
1921 >                                                                r->gpr(rd) = PVR;
1922 >                                                                r->pc() += 4;
1923                                                                  goto rti;
1924                                                  }
1925                                                  break;
# Line 1717 | Line 1955 | power_inst:            sprintf(str, GetString(STR_
1955                                                          case 957:       // PMC3
1956                                                          case 958:       // PMC4
1957                                                          case 959:       // SDA
1958 <                                                                r->nip += 4;
1958 >                                                                r->pc() += 4;
1959                                                                  goto rti;
1960                                                  }
1961                                                  break;
# Line 1736 | Line 1974 | power_inst:            sprintf(str, GetString(STR_
1974  
1975                  // In GUI mode, show error alert
1976                  if (!PrefsFindBool("nogui")) {
1977 <                        sprintf(str, GetString(STR_UNKNOWN_SEGV_ERR), r->nip, r->gpr[24], r->gpr[1], opcode);
1977 >                        sprintf(str, GetString(STR_UNKNOWN_SEGV_ERR), r->pc(), r->gpr(24), r->gpr(1), opcode);
1978                          ErrorAlert(str);
1979                          QuitEmulator();
1980                          return;
# Line 1744 | Line 1982 | power_inst:            sprintf(str, GetString(STR_
1982          }
1983  
1984          // For all other errors, jump into debugger (sort of...)
1985 +        crash_reason = "SIGILL";
1986          if (!ready_for_signals) {
1987 <                printf("SIGILL\n");
1988 <                printf(" sigcontext %p, pt_regs %p\n", sc, r);
1987 >                printf("%s\n");
1988 >                printf(" sigcontext %p, machine_regs %p\n", scp, r);
1989                  printf(
1990                          "   pc %08lx     lr %08lx    ctr %08lx    msr %08lx\n"
1991                          "  xer %08lx     cr %08lx  \n"
# Line 1758 | Line 1997 | power_inst:            sprintf(str, GetString(STR_
1997                          "  r20 %08lx    r21 %08lx    r22 %08lx    r23 %08lx\n"
1998                          "  r24 %08lx    r25 %08lx    r26 %08lx    r27 %08lx\n"
1999                          "  r28 %08lx    r29 %08lx    r30 %08lx    r31 %08lx\n",
2000 <                        r->nip, r->link, r->ctr, r->msr,
2001 <                        r->xer, r->ccr,
2002 <                        r->gpr[0], r->gpr[1], r->gpr[2], r->gpr[3],
2003 <                        r->gpr[4], r->gpr[5], r->gpr[6], r->gpr[7],
2004 <                        r->gpr[8], r->gpr[9], r->gpr[10], r->gpr[11],
2005 <                        r->gpr[12], r->gpr[13], r->gpr[14], r->gpr[15],
2006 <                        r->gpr[16], r->gpr[17], r->gpr[18], r->gpr[19],
2007 <                        r->gpr[20], r->gpr[21], r->gpr[22], r->gpr[23],
2008 <                        r->gpr[24], r->gpr[25], r->gpr[26], r->gpr[27],
2009 <                        r->gpr[28], r->gpr[29], r->gpr[30], r->gpr[31]);
2000 >                        crash_reason,
2001 >                        r->pc(), r->lr(), r->ctr(), r->msr(),
2002 >                        r->xer(), r->cr(),
2003 >                        r->gpr(0), r->gpr(1), r->gpr(2), r->gpr(3),
2004 >                        r->gpr(4), r->gpr(5), r->gpr(6), r->gpr(7),
2005 >                        r->gpr(8), r->gpr(9), r->gpr(10), r->gpr(11),
2006 >                        r->gpr(12), r->gpr(13), r->gpr(14), r->gpr(15),
2007 >                        r->gpr(16), r->gpr(17), r->gpr(18), r->gpr(19),
2008 >                        r->gpr(20), r->gpr(21), r->gpr(22), r->gpr(23),
2009 >                        r->gpr(24), r->gpr(25), r->gpr(26), r->gpr(27),
2010 >                        r->gpr(28), r->gpr(29), r->gpr(30), r->gpr(31));
2011                  exit(1);
2012                  QuitEmulator();
2013                  return;
2014          } else {
2015                  // We crashed. Save registers, tell tick thread and loop forever
2016 <                sigsegv_regs = *(sigregs *)r;
2016 >                build_sigregs(&sigsegv_regs, r);
2017                  emul_thread_fatal = true;
2018                  for (;;) ;
2019          }
# Line 1788 | Line 2028 | rti:;
2028  
2029   bool SheepMem::Init(void)
2030   {
2031 <        const int page_size = getpagesize();
2031 >        // Size of a native page
2032 >        page_size = getpagesize();
2033  
2034          // Allocate SheepShaver globals
2035 <        if (vm_acquire_fixed((char *)base, size) < 0)
2035 >        proc = base;
2036 >        if (vm_mac_acquire(base, size) < 0)
2037                  return false;
2038  
2039 <        // Allocate page with all bits set to 0
2040 <        zero_page = base + size;
2041 <        if (vm_acquire_fixed((char *)zero_page, page_size) < 0)
2042 <                return false;
2043 <        memset((char *)zero_page, 0, page_size);
1802 <        if (vm_protect((char *)zero_page, page_size, VM_PAGE_READ) < 0)
2039 >        // Allocate page with all bits set to 0, right in the middle
2040 >        // This is also used to catch undesired overlaps between proc and data areas
2041 >        zero_page = proc + (size / 2);
2042 >        Mac_memset(zero_page, 0, page_size);
2043 >        if (vm_protect(Mac2HostAddr(zero_page), page_size, VM_PAGE_READ) < 0)
2044                  return false;
2045  
2046   #if EMULATED_PPC
2047          // Allocate alternate stack for PowerPC interrupt routine
2048 <        sig_stack = zero_page + page_size;
2049 <        if (vm_acquire_fixed((char *)sig_stack, SIG_STACK_SIZE) < 0)
2048 >        sig_stack = base + size;
2049 >        if (vm_mac_acquire(sig_stack, SIG_STACK_SIZE) < 0)
2050                  return false;
2051   #endif
2052  
2053 <        top = base + size;
2053 >        data = base + size;
2054          return true;
2055   }
2056  
2057   void SheepMem::Exit(void)
2058   {
2059 <        if (top) {
1819 <                const int page_size = getpagesize();
1820 <
2059 >        if (data) {
2060                  // Delete SheepShaver globals
2061 <                vm_release((void *)base, size);
1823 <
1824 <                // Delete zero page
1825 <                vm_release((void *)zero_page, page_size);
2061 >                vm_mac_release(base, size);
2062  
2063   #if EMULATED_PPC
2064                  // Delete alternate stack for PowerPC interrupt routine
2065 <                vm_release((void *)sig_stack, SIG_STACK_SIZE);
2065 >                vm_mac_release(sig_stack, SIG_STACK_SIZE);
2066   #endif
2067          }
2068   }
# Line 1881 | Line 2117 | void display_alert(int title_id, int pre
2117  
2118   void ErrorAlert(const char *text)
2119   {
2120 < #ifdef ENABLE_GTK
2120 > #if defined(ENABLE_GTK) && !defined(USE_SDL_VIDEO)
2121          if (PrefsFindBool("nogui") || x_display == NULL) {
2122                  printf(GetString(STR_SHELL_ERROR_PREFIX), text);
2123                  return;
# Line 1900 | Line 2136 | void ErrorAlert(const char *text)
2136  
2137   void WarningAlert(const char *text)
2138   {
2139 < #ifdef ENABLE_GTK
2139 > #if defined(ENABLE_GTK) && !defined(USE_SDL_VIDEO)
2140          if (PrefsFindBool("nogui") || x_display == NULL) {
2141                  printf(GetString(STR_SHELL_WARNING_PREFIX), text);
2142                  return;

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines