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 SIGBUS
  58
  59 #elif defined __OpenBSD__
  60
  61 typedef struct sigcontext os_context_t;
  62 #define SIG_MEMORY_FAULT SIGSEGV
  63
  64 #elif defined __NetBSD__
  65
  66 #include <ucontext.h>
  67 typedef ucontext_t os_context_t;
  68 #define SIG_MEMORY_FAULT SIGSEGV
  69
  70 #elif defined LISP_FEATURE_DARWIN
  71   /* man pages claim that the third argument is a sigcontext struct,
  72      but ucontext_t is defined, matches sigcontext where sensible,
  73      offers better access to mcontext, and is of course the SUSv2-
  74      mandated type of the third argument, so we use that instead.
  75      If Apple is going to break ucontext_t out of spite, I'm going
  76      to be cross with them ;) -- PRM */
  77
  78 #include <ucontext.h>
  79 typedef ucontext_t os_context_t;
  80 #define SIG_MEMORY_FAULT SIGBUS
  81
  82 #else
  83 #error unsupported BSD variant
  84 #endif
  85
  86 #include "target-arch-os.h"
  87 #include "target-arch.h"
  88
  89 #define OS_VM_PROT_READ PROT_READ
  90 #define OS_VM_PROT_WRITE PROT_WRITE
  91 #define OS_VM_PROT_EXECUTE PROT_EXEC