Revert "Revert "Merge branch 'master' of https://github.com/mono/mono""
[mono.git] / mono / metadata / sgen-archdep.h
old mode 100644 (file)
new mode 100755 (executable)
index 5ff4cec..b86ec31
 /*
- * SGen is licensed under the terms of the MIT X11 license
+ * sgen-archdep.h: Architecture dependent parts of SGen.
  *
  * Copyright 2001-2003 Ximian, Inc
  * Copyright 2003-2010 Novell, Inc.
- * 
- * Permission is hereby granted, free of charge, to any person obtaining
- * a copy of this software and associated documentation files (the
- * "Software"), to deal in the Software without restriction, including
- * without limitation the rights to use, copy, modify, merge, publish,
- * distribute, sublicense, and/or sell copies of the Software, and to
- * permit persons to whom the Software is furnished to do so, subject to
- * the following conditions:
- * 
- * The above copyright notice and this permission notice shall be
- * included in all copies or substantial portions of the Software.
- * 
- * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
- * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
- * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
- * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
- * LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
- * OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
- * WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+ * Copyright (C) 2012 Xamarin Inc
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License 2.0 as published by the Free Software Foundation;
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License 2.0 along with this library; if not, write to the Free
+ * Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  */
 #ifndef __MONO_SGENARCHDEP_H__
 #define __MONO_SGENARCHDEP_H__
 
 #include <mono/utils/mono-sigcontext.h>
 
-#ifdef __i386__
+#if defined(MONO_CROSS_COMPILE)
 
 #define REDZONE_SIZE   0
 
-#define ARCH_NUM_REGS 7                /* we're never storing ESP */
-#define ARCH_STORE_REGS(ptr)   \
-       __asm__ __volatile__(   \
-               "mov %%ecx, 0x00(%0)\n" \
-               "mov %%edx, 0x04(%0)\n" \
-               "mov %%ebx, 0x08(%0)\n" \
-               "mov %%edi, 0x0c(%0)\n" \
-               "mov %%esi, 0x10(%0)\n" \
-               "mov %%ebp, 0x14(%0)\n" \
-               : "=&a" (ptr)   \
-               : "0" (cur_thread_regs) \
-               : "memory"      \
-       )
-#define ARCH_SIGCTX_SP(ctx)    (UCONTEXT_REG_ESP ((ctx)))
-#define ARCH_SIGCTX_IP(ctx)    (UCONTEXT_REG_EIP ((ctx)))
-#define ARCH_COPY_SIGCTX_REGS(a,ctx) do {                      \
-       (a)[0] = (gpointer) UCONTEXT_REG_EAX ((ctx));           \
-       (a)[1] = (gpointer) UCONTEXT_REG_EBX ((ctx));           \
-       (a)[2] = (gpointer) UCONTEXT_REG_ECX ((ctx));           \
-       (a)[3] = (gpointer) UCONTEXT_REG_EDX ((ctx));           \
-       (a)[4] = (gpointer) UCONTEXT_REG_ESI ((ctx));           \
-       (a)[5] = (gpointer) UCONTEXT_REG_EDI ((ctx));           \
-       (a)[6] = (gpointer) UCONTEXT_REG_EBP ((ctx));           \
-       } while (0)
+#define ARCH_NUM_REGS 0
+#define ARCH_STORE_REGS(ptr)
+#define ARCH_SIGCTX_SP(ctx) NULL
+#define ARCH_SIGCTX_IP(ctx) NULL
+#define ARCH_COPY_SIGCTX_REGS(a,ctx)
+
+#elif defined(TARGET_X86)
+
+#include <mono/utils/mono-context.h>
+
+#define REDZONE_SIZE   0
+
+#define ARCH_NUM_REGS 8
+
+#ifdef MONO_ARCH_HAS_MONO_CONTEXT
+#define USE_MONO_CTX
+#else
+#error 0
+#endif
+
+/*FIXME, move this to mono-sigcontext as this is generaly useful.*/
+#define ARCH_SIGCTX_SP(ctx)    (UCONTEXT_REG_ESP ((ctx)))
+#define ARCH_SIGCTX_IP(ctx)    (UCONTEXT_REG_EIP ((ctx)))
 
-#elif defined(__x86_64__)
+#elif defined(TARGET_AMD64)
+
+#include <mono/utils/mono-context.h>
 
 #define REDZONE_SIZE   128
 
-#define ARCH_NUM_REGS 15       /* we're never storing RSP */
-#define ARCH_STORE_REGS(ptr)   \
-       __asm__ __volatile__(   \
-               "movq %%rcx, 0x00(%0)\n"        \
-               "movq %%rdx, 0x08(%0)\n"        \
-               "movq %%rbx, 0x10(%0)\n"        \
-               "movq %%rdi, 0x18(%0)\n"        \
-               "movq %%rsi, 0x20(%0)\n"        \
-               "movq %%rbp, 0x28(%0)\n"        \
-               "movq %%r8, 0x30(%0)\n" \
-               "movq %%r9, 0x38(%0)\n" \
-               "movq %%r10, 0x40(%0)\n"        \
-               "movq %%r11, 0x48(%0)\n"        \
-               "movq %%r12, 0x50(%0)\n"        \
-               "movq %%r13, 0x58(%0)\n"        \
-               "movq %%r14, 0x60(%0)\n"        \
-               "movq %%r15, 0x68(%0)\n"        \
-               : "=&a" (ptr)   \
-               : "0" (cur_thread_regs) \
-               : "memory"      \
-       )
+#define ARCH_NUM_REGS 16
+#define USE_MONO_CTX
+
+/*FIXME, move this to mono-sigcontext as this is generaly useful.*/
 #define ARCH_SIGCTX_SP(ctx)    (UCONTEXT_REG_RSP (ctx))
 #define ARCH_SIGCTX_IP(ctx)    (UCONTEXT_REG_RIP (ctx))
-#define ARCH_COPY_SIGCTX_REGS(a,ctx) do {      \
-       ((a)[0] = (gpointer) (UCONTEXT_REG_RAX (ctx))); \
-       ((a)[1] = (gpointer) (UCONTEXT_REG_RBX (ctx))); \
-       ((a)[2] = (gpointer) (UCONTEXT_REG_RCX (ctx))); \
-       ((a)[3] = (gpointer) (UCONTEXT_REG_RDX (ctx))); \
-       ((a)[4] = (gpointer) (UCONTEXT_REG_RSI (ctx))); \
-       ((a)[5] = (gpointer) (UCONTEXT_REG_RDI (ctx))); \
-       ((a)[6] = (gpointer) (UCONTEXT_REG_RBP (ctx))); \
-       ((a)[7] = (gpointer) (UCONTEXT_REG_R8 (ctx)));  \
-       ((a)[8] = (gpointer) (UCONTEXT_REG_R9 (ctx)));  \
-       ((a)[9] = (gpointer) (UCONTEXT_REG_R10 (ctx))); \
-       ((a)[10] = (gpointer) (UCONTEXT_REG_R11 (ctx)));        \
-       ((a)[11] = (gpointer) (UCONTEXT_REG_R12 (ctx)));        \
-       ((a)[12] = (gpointer) (UCONTEXT_REG_R13 (ctx)));        \
-       ((a)[13] = (gpointer) (UCONTEXT_REG_R14 (ctx)));        \
-       ((a)[14] = (gpointer) (UCONTEXT_REG_R15 (ctx)));        \
-       } while (0)
 
-#elif defined(__ppc__) || defined(__powerpc__) || defined(__powerpc64__)
+#elif defined(TARGET_POWERPC)
 
 #define REDZONE_SIZE   224
 
 #define ARCH_COPY_SIGCTX_REGS(a,ctx) do {      \
        int __i;        \
        for (__i = 0; __i < 32; ++__i)  \
-               ((a)[__i]) = UCONTEXT_REG_Rn((ctx), __i);       \
+               ((a)[__i]) = (gpointer) UCONTEXT_REG_Rn((ctx), __i);    \
        } while (0)
 
-#elif defined(__arm__)
+#elif defined(TARGET_ARM)
 
 #define REDZONE_SIZE   0
+#define USE_MONO_CTX
 
 /* We dont store ip, sp */
 #define ARCH_NUM_REGS 14
-#define ARCH_STORE_REGS(ptr)                           \
-       __asm__ __volatile__(                           \
-               "ldr r12, %0\n"                         \
-               "push {r0}\n"                           \
-               "push {r12}\n"                          \
-               "stmia r12!, {r0-r11}\n"                \
-               "pop {r0}\n"                            \
-               "stmia r12!, {r0, lr}\n"                \
-               "mov r12, r0\n"                         \
-               "pop {r0}\n"                            \
-               :                                       \
-               : "m" (ptr)                             \
+#define ARCH_STORE_REGS(ptr)           \
+       __asm__ __volatile__(                   \
+               "push {lr}\n"                           \
+               "mov lr, %0\n"                          \
+               "stmia lr!, {r0-r12}\n"         \
+               "pop {lr}\n"                            \
+               :                                                       \
+               : "r" (ptr)                                     \
        )
 
 #define ARCH_SIGCTX_SP(ctx)    (UCONTEXT_REG_SP((ctx)))
        ((a)[13]) = (gpointer) (UCONTEXT_REG_LR((ctx)));        \
        } while (0)
 
+#elif defined(TARGET_ARM64)
+
+#include <mono/utils/mono-sigcontext.h>
+
+#ifdef __linux__
+#define REDZONE_SIZE    0
+#elif defined(__APPLE__)
+#define REDZONE_SIZE   128
+#else
+#error "Not implemented."
+#endif
+#define USE_MONO_CTX
+#define ARCH_NUM_REGS 31
+
+#define ARCH_STORE_REGS(ptr) do { g_assert_not_reached (); } while (0)
+
+#define ARCH_SIGCTX_SP(ctx)    UCONTEXT_REG_SP (ctx)
+#define ARCH_SIGCTX_IP(ctx)    UCONTEXT_REG_PC (ctx)
+#define ARCH_COPY_SIGCTX_REGS(a,ctx) do { g_assert_not_reached (); } while (0)
+
+#elif defined(__mips__)
+
+#define REDZONE_SIZE   0
+
+#define USE_MONO_CTX
+#define ARCH_NUM_REGS 32
+
+/*
+ * These casts are necessary since glibc always makes the
+ * gregs 64-bit values in userland.
+ */
+#define ARCH_SIGCTX_SP(ctx)    ((gsize) UCONTEXT_GREGS((ctx))[29])
+#define ARCH_SIGCTX_IP(ctx)    ((gsize) UCONTEXT_REG_PC((ctx)))
+
 #elif defined(__s390x__)
 
 #define REDZONE_SIZE   0
 
+#include <mono/utils/mono-context.h>
+
+#define USE_MONO_CTX
 #define ARCH_NUM_REGS 16       
+#define ARCH_SIGCTX_SP(ctx)    ((UCONTEXT_GREGS((ctx))) [15])
+#define ARCH_SIGCTX_IP(ctx)    ((ucontext_t *) (ctx))->uc_mcontext.psw.addr
+
+#elif defined(__sparc__)
+
+#define REDZONE_SIZE   0
+
+/* Don't bother with %g0 (%r0), it's always hard-coded to zero */
+#define ARCH_NUM_REGS 15       
+#ifdef __sparcv9
 #define ARCH_STORE_REGS(ptr)   \
        __asm__ __volatile__(   \
-               "stg    %%r0,0x00(%0)\n\t"      \
-               "stg    %%r1,0x08(%0)\n\t"      \
-               "stg    %%r2,0x10(%0)\n\t"      \
-               "stg    %%r3,0x18(%0)\n\t"      \
-               "stg    %%r4,0x20(%0)\n\t"      \
-               "stg    %%r5,0x28(%0)\n\t"      \
-               "stg    %%r6,0x30(%0)\n\t"      \
-               "stg    %%r7,0x38(%0)\n\t"      \
-               "stg    %%r8,0x40(%0)\n\t"      \
-               "stg    %%r9,0x48(%0)\n\t"      \
-               "stg    %%r10,0x50(%0)\n\t"     \
-               "stg    %%r11,0x58(%0)\n\t"     \
-               "stg    %%r12,0x60(%0)\n\t"     \
-               "stg    %%r13,0x68(%0)\n\t"     \
-               "stg    %%r14,0x70(%0)\n\t"     \
-               "stg    %%r15,0x78(%0)\n"       \
-               : "=&a" (ptr)                   \
-               : "0" (cur_thread_regs)         \
+               "st %%g1,[%0]\n\t"      \
+               "st %%g2,[%0+0x08]\n\t" \
+               "st %%g3,[%0+0x10]\n\t" \
+               "st %%g4,[%0+0x18]\n\t" \
+               "st %%g5,[%0+0x20]\n\t" \
+               "st %%g6,[%0+0x28]\n\t" \
+               "st %%g7,[%0+0x30]\n\t" \
+               "st %%o0,[%0+0x38]\n\t" \
+               "st %%o1,[%0+0x40]\n\t" \
+               "st %%o2,[%0+0x48]\n\t" \
+               "st %%o3,[%0+0x50]\n\t" \
+               "st %%o4,[%0+0x58]\n\t" \
+               "st %%o5,[%0+0x60]\n\t" \
+               "st %%o6,[%0+0x68]\n\t" \
+               "st %%o7,[%0+0x70]\n\t" \
+               :                       \
+               : "r" (ptr)             \
                : "memory"                      \
        )
-#define ARCH_SIGCTX_SP(ctx)    ((UCONTEXT_GREGS((ctx))) [15])
-#define ARCH_SIGCTX_IP(ctx)    ((ucontext_t *) (ctx))->uc_mcontext.psw.addr
-#define ARCH_COPY_SIGCTX_REGS(a,ctx) do {              \
-       ((a)[0] = (gpointer) (UCONTEXT_GREGS((ctx))) [0]);              \
-       ((a)[1] = (gpointer) (UCONTEXT_GREGS((ctx))) [1]);              \
-       ((a)[2] = (gpointer) (UCONTEXT_GREGS((ctx))) [2]);              \
-       ((a)[3] = (gpointer) (UCONTEXT_GREGS((ctx))) [3]);              \
-       ((a)[4] = (gpointer) (UCONTEXT_GREGS((ctx))) [4]);              \
-       ((a)[5] = (gpointer) (UCONTEXT_GREGS((ctx))) [5]);              \
-       ((a)[6] = (gpointer) (UCONTEXT_GREGS((ctx))) [6]);              \
-       ((a)[7] = (gpointer) (UCONTEXT_GREGS((ctx))) [7]);              \
-       ((a)[8] = (gpointer) (UCONTEXT_GREGS((ctx))) [8]);              \
-       ((a)[9] = (gpointer) (UCONTEXT_GREGS((ctx))) [9]);              \
-       ((a)[10] = (gpointer) (UCONTEXT_GREGS((ctx))) [10]);            \
-       ((a)[11] = (gpointer) (UCONTEXT_GREGS((ctx))) [11]);            \
-       ((a)[12] = (gpointer) (UCONTEXT_GREGS((ctx))) [12]);            \
-       ((a)[13] = (gpointer) (UCONTEXT_GREGS((ctx))) [13]);            \
-       ((a)[14] = (gpointer) (UCONTEXT_GREGS((ctx))) [14]);            \
-       ((a)[15] = (gpointer) (UCONTEXT_GREGS((ctx))) [15]);            \
+#else
+#define ARCH_STORE_REGS(ptr)   \
+       __asm__ __volatile__(   \
+               "st %%g1,[%0]\n\t"      \
+               "st %%g2,[%0+0x04]\n\t" \
+               "st %%g3,[%0+0x08]\n\t" \
+               "st %%g4,[%0+0x0c]\n\t" \
+               "st %%g5,[%0+0x10]\n\t" \
+               "st %%g6,[%0+0x14]\n\t" \
+               "st %%g7,[%0+0x18]\n\t" \
+               "st %%o0,[%0+0x1c]\n\t" \
+               "st %%o1,[%0+0x20]\n\t" \
+               "st %%o2,[%0+0x24]\n\t" \
+               "st %%o3,[%0+0x28]\n\t" \
+               "st %%o4,[%0+0x2c]\n\t" \
+               "st %%o5,[%0+0x30]\n\t" \
+               "st %%o6,[%0+0x34]\n\t" \
+               "st %%o7,[%0+0x38]\n\t" \
+               :                       \
+               : "r" (ptr)             \
+               : "memory"                      \
+       )
+#endif
+
+#ifndef REG_SP
+#define REG_SP REG_O6
+#endif
+
+#define ARCH_SIGCTX_SP(ctx)    (((ucontext_t *)(ctx))->uc_mcontext.gregs [REG_SP])
+#define ARCH_SIGCTX_IP(ctx)    (((ucontext_t *)(ctx))->uc_mcontext.gregs [REG_PC])
+#define ARCH_COPY_SIGCTX_REGS(a,ctx) do {      \
+       (a)[0] = (gpointer) (((ucontext_t *)(ctx))->uc_mcontext.gregs [REG_G1]);        \
+       (a)[1] = (gpointer) (((ucontext_t *)(ctx))->uc_mcontext.gregs [REG_G2]);        \
+       (a)[2] = (gpointer) (((ucontext_t *)(ctx))->uc_mcontext.gregs [REG_G3]);        \
+       (a)[3] = (gpointer) (((ucontext_t *)(ctx))->uc_mcontext.gregs [REG_G4]);        \
+       (a)[4] = (gpointer) (((ucontext_t *)(ctx))->uc_mcontext.gregs [REG_G5]);        \
+       (a)[5] = (gpointer) (((ucontext_t *)(ctx))->uc_mcontext.gregs [REG_G6]);        \
+       (a)[6] = (gpointer) (((ucontext_t *)(ctx))->uc_mcontext.gregs [REG_G7]);        \
+       (a)[7] = (gpointer) (((ucontext_t *)(ctx))->uc_mcontext.gregs [REG_O0]);        \
+       (a)[8] = (gpointer) (((ucontext_t *)(ctx))->uc_mcontext.gregs [REG_O1]);        \
+       (a)[9] = (gpointer) (((ucontext_t *)(ctx))->uc_mcontext.gregs [REG_O2]);        \
+       (a)[10] = (gpointer) (((ucontext_t *)(ctx))->uc_mcontext.gregs [REG_O3]);       \
+       (a)[11] = (gpointer) (((ucontext_t *)(ctx))->uc_mcontext.gregs [REG_O4]);       \
+       (a)[12] = (gpointer) (((ucontext_t *)(ctx))->uc_mcontext.gregs [REG_O5]);       \
+       (a)[13] = (gpointer) (((ucontext_t *)(ctx))->uc_mcontext.gregs [REG_O6]);       \
+       (a)[14] = (gpointer) (((ucontext_t *)(ctx))->uc_mcontext.gregs [REG_O7]);       \
        } while (0)
 
 #endif