src/runtime/bsd-os.h

   1 /*
   2  * This software is part of the SBCL system. See the README file for
   3  * more information.
   4  *
   5  * This software is derived from the CMU CL system, which was
   6  * written at Carnegie Mellon University and released into the
   7  * public domain. The software is in the public domain and is
   8  * provided with absolutely no warranty. See the COPYING and CREDITS
   9  * files for more information.
  10  */
  11
  12 #ifdef __FreeBSD__
  13 #include <osreldate.h>
  14 #endif
  15
  16 #include <sys/types.h>
  17 #include <sys/mman.h>
  18 #include <sys/signal.h>
  19
  20 #ifdef LISP_FEATURE_DARWIN
  21 #include <mach/mach_types.h>
  22 #endif
  23
  24 typedef caddr_t os_vm_address_t;
  25 #if defined __NetBSD__
  26 typedef vsize_t os_vm_size_t;
  27 #elif defined __OpenBSD__
  28 typedef size_t os_vm_size_t;
  29 #else
  30 typedef vm_size_t os_vm_size_t;
  31 #endif
  32 typedef off_t os_vm_offset_t;
  33 typedef int os_vm_prot_t;
  34 typedef int os_context_register_t;
  35
  36 #if defined __OpenBSD__
  37 /* name defined for compatibility between OpenBSD 3.1 sigaltstack(2) and
  38  * Linux sigaltstack(2) */
  39 typedef struct sigaltstack stack_t;
  40 #elif defined __FreeBSD__
  41 /* FreeBSD 4.6 and NetBSD 1.6 already have stack_t defined. */
  42 #endif
  43
  44 #if defined __FreeBSD__
  45 /* Note: The man page for sigaction(2) in FreeBSD 4.0 says that this
  46  * is an mcontext_t, but according to comments by Raymond Wiker in the
  47  * original FreeBSD port of SBCL, that's wrong, it's actually a
  48  * ucontext_t. */
  49
  50 #include <sys/ucontext.h>
  51 typedef ucontext_t os_context_t;
  52 /* As the sbcl-devel message from Raymond Wiker 2000-12-01, FreeBSD
  53  * (unlike Linux and OpenBSD) doesn't let us tweak the CPU's single
  54  * step flag bit by messing with the flags stored in a signal context,
  55  * so we need to implement single stepping in a more roundabout way. */
  56 #define CANNOT_GET_TO_SINGLE_STEP_FLAG
  57 #define SIG_MEMORY_FAULT SIGSEGV
  58 /* Sometime in late 2005 FreeBSD was changed to signal SIGSEGV instead
  59  * of SIGBUS for memory faults, as required by POSIX. In order to
  60  * support both new and old FreeBSD at the same time, both signals are
  61  * hooked to the GC write barrier machinery. If you're reading this
  62  * message in the far future where FreeBSD 6 and earlier are just
  63  * quaint memories, feel free to delete this hack (and any code that's
  64  * #ifdef SIG_MEMORY_FAULT2'ed). -- JES, 2005-12-30
  65  */
  66 #define SIG_MEMORY_FAULT2 SIGBUS
  67
  68 #elif defined __OpenBSD__
  69
  70 typedef struct sigcontext os_context_t;
  71 #define SIG_MEMORY_FAULT SIGSEGV
  72
  73 #elif defined __NetBSD__
  74
  75 #include <ucontext.h>
  76 typedef ucontext_t os_context_t;
  77 #define SIG_MEMORY_FAULT SIGSEGV
  78
  79 #elif defined LISP_FEATURE_DARWIN
  80   /* man pages claim that the third argument is a sigcontext struct,
  81      but ucontext_t is defined, matches sigcontext where sensible,
  82      offers better access to mcontext, and is of course the SUSv2-
  83      mandated type of the third argument, so we use that instead.
  84      If Apple is going to break ucontext_t out of spite, I'm going
  85      to be cross with them ;) -- PRM */
  86
  87 #if defined(LISP_FEATURE_X86)
  88 #include <sys/ucontext.h>
  89 #include <sys/_types.h>
  90 typedef struct ucontext os_context_t;
  91 #else
  92 #include <ucontext.h>
  93 typedef ucontext_t os_context_t;
  94 #endif
  95
  96 #define SIG_MEMORY_FAULT SIGBUS
  97
  98 #else
  99 #error unsupported BSD variant
 100 #endif
 101
 102 #include "target-arch-os.h"
 103 #include "target-arch.h"
 104
 105 #define OS_VM_PROT_READ PROT_READ
 106 #define OS_VM_PROT_WRITE PROT_WRITE
 107 #define OS_VM_PROT_EXECUTE PROT_EXEC