X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fbsd-os.h;h=18c29512f38ecc6e24d7bb9d4bbd8e1b6c92886f;hb=01044af1b8d69fc3899dc0417064c1512223223d;hp=9862141a6e2f22d0e46c23306a5bbce2bbf81766;hpb=a530bbe337109d898d5b4a001fc8f1afa3b5dc39;p=sbcl.git diff --git a/src/runtime/bsd-os.h b/src/runtime/bsd-os.h index 9862141..18c2951 100644 --- a/src/runtime/bsd-os.h +++ b/src/runtime/bsd-os.h @@ -9,10 +9,6 @@ * files for more information. */ -/* - * $Header$ - */ - #ifdef __FreeBSD__ #include #endif @@ -22,24 +18,68 @@ #include typedef caddr_t os_vm_address_t; +#ifdef __NetBSD__ +typedef vsize_t os_vm_size_t; +#else typedef vm_size_t os_vm_size_t; +#endif typedef off_t os_vm_offset_t; typedef int os_vm_prot_t; +typedef int os_context_register_t; + +#if defined __OpenBSD__ +/* name defined for compatibility between OpenBSD 3.1 sigaltstack(2) and + * Linux sigaltstack(2) */ +typedef struct sigaltstack stack_t; +#elif defined __FreeBSD__ +/* FreeBSD 4.6 and NetBSD 1.6 already have stack_t defined. */ +#endif #if defined __FreeBSD__ /* Note: The man page for sigaction(2) in FreeBSD 4.0 says that this * is an mcontext_t, but according to comments by Raymond Wiker in the * original FreeBSD port of SBCL, that's wrong, it's actually a * ucontext_t. */ + +#include typedef ucontext_t os_context_t; +/* As the sbcl-devel message from Raymond Wiker 2000-12-01, FreeBSD + * (unlike Linux and OpenBSD) doesn't let us tweak the CPU's single + * step flag bit by messing with the flags stored in a signal context, + * so we need to implement single stepping in a more roundabout way. */ +#define CANNOT_GET_TO_SINGLE_STEP_FLAG +#define SIG_MEMORY_FAULT SIGBUS + #elif defined __OpenBSD__ + typedef struct sigcontext os_context_t; +#define SIG_MEMORY_FAULT SIGSEGV + +#elif defined __NetBSD__ + +#include +typedef ucontext_t os_context_t; +#define SIG_MEMORY_FAULT SIGSEGV + +#elif defined LISP_FEATURE_DARWIN + /* man pages claim that the third argument is a sigcontext struct, + but ucontext_t is defined, matches sigcontext where sensible, + offers better access to mcontext, and is of course the SUSv2- + mandated type of the third argument, so we use that instead. + If Apple is going to break ucontext_t out of spite, I'm going + to be cross with them ;) -- PRM */ + +#include +typedef ucontext_t os_context_t; +#define SIG_MEMORY_FAULT SIGBUS + #else #error unsupported BSD variant #endif +#include "target-arch-os.h" +#include "target-arch.h" + #define OS_VM_PROT_READ PROT_READ #define OS_VM_PROT_WRITE PROT_WRITE #define OS_VM_PROT_EXECUTE PROT_EXEC - -#define OS_VM_DEFAULT_PAGESIZE 4096