[llvm] Fix the loadable llvm build.
[mono.git] / mono / utils / mono-context.c
index 7c95d65e81ffc80d1f33e32ce1af4a4ccf83e640..bc0286485fc008a9d5d7cdf3ba8e2dde36e92a80 100644 (file)
@@ -11,7 +11,7 @@
 #include <ucontext.h>
 #endif
 
-#if defined(__i386__)
+#if (defined(__i386__) && !defined(MONO_CROSS_COMPILE)) || (defined(TARGET_X86))
 
 #include <mono/utils/mono-context.h>
 
@@ -100,4 +100,253 @@ mono_monoctx_to_sigctx (MonoContext *mctx, void *sigctx)
 #endif /* __native_client__ */
 }
 
+#elif (defined(__x86_64__) && !defined(MONO_CROSS_COMPILE)) || (defined(TARGET_AMD64)) /* defined(__i386__) */
+
+#include <mono/utils/mono-context.h>
+
+void
+mono_sigctx_to_monoctx (void *sigctx, MonoContext *mctx)
+{
+#if defined(__native_client_codegen__) || defined(__native_client__)
+       printf("WARNING: mono_arch_sigctx_to_monoctx() called!\n");
+#endif
+
+#if defined(MONO_SIGNAL_USE_SIGACTION)
+       ucontext_t *ctx = (ucontext_t*)sigctx;
+
+       mctx->rax = UCONTEXT_REG_RAX (ctx);
+       mctx->rbx = UCONTEXT_REG_RBX (ctx);
+       mctx->rcx = UCONTEXT_REG_RCX (ctx);
+       mctx->rdx = UCONTEXT_REG_RDX (ctx);
+       mctx->rbp = UCONTEXT_REG_RBP (ctx);
+       mctx->rsp = UCONTEXT_REG_RSP (ctx);
+       mctx->rsi = UCONTEXT_REG_RSI (ctx);
+       mctx->rdi = UCONTEXT_REG_RDI (ctx);
+       mctx->r8 = UCONTEXT_REG_R8 (ctx);
+       mctx->r9 = UCONTEXT_REG_R9 (ctx);
+       mctx->r10 = UCONTEXT_REG_R10 (ctx);
+       mctx->r11 = UCONTEXT_REG_R11 (ctx);
+       mctx->r12 = UCONTEXT_REG_R12 (ctx);
+       mctx->r13 = UCONTEXT_REG_R13 (ctx);
+       mctx->r14 = UCONTEXT_REG_R14 (ctx);
+       mctx->r15 = UCONTEXT_REG_R15 (ctx);
+       mctx->rip = UCONTEXT_REG_RIP (ctx);
+#else
+       MonoContext *ctx = (MonoContext *)sigctx;
+
+       mctx->rax = ctx->rax;
+       mctx->rbx = ctx->rbx;
+       mctx->rcx = ctx->rcx;
+       mctx->rdx = ctx->rdx;
+       mctx->rbp = ctx->rbp;
+       mctx->rsp = ctx->rsp;
+       mctx->rsi = ctx->rsi;
+       mctx->rdi = ctx->rdi;
+       mctx->r8 = ctx->r8;
+       mctx->r9 = ctx->r9;
+       mctx->r10 = ctx->r10;
+       mctx->r11 = ctx->r11;
+       mctx->r12 = ctx->r12;
+       mctx->r13 = ctx->r13;
+       mctx->r14 = ctx->r14;
+       mctx->r15 = ctx->r15;
+       mctx->rip = ctx->rip;
+#endif
+}
+
+void
+mono_monoctx_to_sigctx (MonoContext *mctx, void *sigctx)
+{
+#if defined(__native_client__) || defined(__native_client_codegen__)
+  printf("WARNING: mono_arch_monoctx_to_sigctx() called!\n");
+#endif
+
+#if defined(MONO_SIGNAL_USE_SIGACTION)
+       ucontext_t *ctx = (ucontext_t*)sigctx;
+
+       UCONTEXT_REG_RAX (ctx) = mctx->rax;
+       UCONTEXT_REG_RBX (ctx) = mctx->rbx;
+       UCONTEXT_REG_RCX (ctx) = mctx->rcx;
+       UCONTEXT_REG_RDX (ctx) = mctx->rdx;
+       UCONTEXT_REG_RBP (ctx) = mctx->rbp;
+       UCONTEXT_REG_RSP (ctx) = mctx->rsp;
+       UCONTEXT_REG_RSI (ctx) = mctx->rsi;
+       UCONTEXT_REG_RDI (ctx) = mctx->rdi;
+       UCONTEXT_REG_R8 (ctx) = mctx->r8;
+       UCONTEXT_REG_R9 (ctx) = mctx->r9;
+       UCONTEXT_REG_R10 (ctx) = mctx->r10;
+       UCONTEXT_REG_R11 (ctx) = mctx->r11;
+       UCONTEXT_REG_R12 (ctx) = mctx->r12;
+       UCONTEXT_REG_R13 (ctx) = mctx->r13;
+       UCONTEXT_REG_R14 (ctx) = mctx->r14;
+       UCONTEXT_REG_R15 (ctx) = mctx->r15;
+       UCONTEXT_REG_RIP (ctx) = mctx->rip;
+#else
+       MonoContext *ctx = (MonoContext *)sigctx;
+
+       ctx->rax = mctx->rax;
+       ctx->rbx = mctx->rbx;
+       ctx->rcx = mctx->rcx;
+       ctx->rdx = mctx->rdx;
+       ctx->rbp = mctx->rbp;
+       ctx->rsp = mctx->rsp;
+       ctx->rsi = mctx->rsi;
+       ctx->rdi = mctx->rdi;
+       ctx->r8 = mctx->r8;
+       ctx->r9 = mctx->r9;
+       ctx->r10 = mctx->r10;
+       ctx->r11 = mctx->r11;
+       ctx->r12 = mctx->r12;
+       ctx->r13 = mctx->r13;
+       ctx->r14 = mctx->r14;
+       ctx->r15 = mctx->r15;
+       ctx->rip = mctx->rip;
+#endif
+}
+
+#elif defined(__s390x__)
+
+#include <mono/utils/mono-context.h>
+
+/*------------------------------------------------------------------*/
+/*                                                                  */
+/* Name                - mono_arch_sigctx_to_monoctx.                      */
+/*                                                                  */
+/* Function    - Called from the signal handler to convert signal  */
+/*                context to MonoContext.                           */
+/*                                                                  */
+/*------------------------------------------------------------------*/
+
+void
+mono_sigctx_to_monoctx (void *ctx, MonoContext *mctx)
+{
+       memcpy (mctx, ctx, sizeof(MonoContext));
+}
+
+/*========================= End of Function ========================*/
+
+/*------------------------------------------------------------------*/
+/*                                                                  */
+/* Name                - mono_arch_monoctx_to_sigctx.                      */
+/*                                                                  */
+/* Function    - Convert MonoContext structure to signal context.  */
+/*                                                                  */
+/*------------------------------------------------------------------*/
+
+void
+mono_monoctx_to_sigctx (MonoContext *mctx, void *ctx)
+{
+       memcpy (ctx, mctx, sizeof(MonoContext));
+}
+
+/*========================= End of Function ========================*/
+
+#elif (defined(__arm__) && !defined(MONO_CROSS_COMPILE)) || (defined(TARGET_ARM))
+
+#include <mono/utils/mono-context.h>
+#include <mono/arch/arm/arm-codegen.h>
+#include <mono/arch/arm/arm-vfp-codegen.h>
+
+void
+mono_sigctx_to_monoctx (void *sigctx, MonoContext *mctx)
+{
+#ifdef MONO_CROSS_COMPILE
+       g_assert_not_reached ();
+#elif defined(__native_client__)
+       g_assert_not_reached ();
+#else
+       arm_ucontext *my_uc = sigctx;
+
+       mctx->pc = UCONTEXT_REG_PC (my_uc);
+       mctx->regs [ARMREG_SP] = UCONTEXT_REG_SP (my_uc);
+       mctx->cpsr = UCONTEXT_REG_CPSR (my_uc);
+       memcpy (&mctx->regs, &UCONTEXT_REG_R0 (my_uc), sizeof (mgreg_t) * 16);
+#ifdef UCONTEXT_REG_VFPREGS
+       memcpy (&mctx->fregs, UCONTEXT_REG_VFPREGS (my_uc), sizeof (double) * 16);
+#endif
+#endif
+}
+
+void
+mono_monoctx_to_sigctx (MonoContext *mctx, void *ctx)
+{
+#ifdef MONO_CROSS_COMPILE
+       g_assert_not_reached ();
+#elif defined(__native_client__)
+       g_assert_not_reached ();
+#else
+       arm_ucontext *my_uc = ctx;
+
+       UCONTEXT_REG_PC (my_uc) = mctx->pc;
+       UCONTEXT_REG_SP (my_uc) = mctx->regs [ARMREG_SP];
+       UCONTEXT_REG_CPSR (my_uc) = mctx->cpsr;
+       /* The upper registers are not guaranteed to be valid */
+       memcpy (&UCONTEXT_REG_R0 (my_uc), &mctx->regs, sizeof (mgreg_t) * 12);
+#ifdef UCONTEXT_REG_VFPREGS
+       memcpy (UCONTEXT_REG_VFPREGS (my_uc), &mctx->fregs, sizeof (double) * 16);
+#endif
+#endif
+}
+
+#elif (defined(__aarch64__) && !defined(MONO_CROSS_COMPILE)) || (defined(TARGET_ARM64))
+
+#include <mono/utils/mono-context.h>
+
+void
+mono_sigctx_to_monoctx (void *sigctx, MonoContext *mctx)
+{
+#ifdef MONO_CROSS_COMPILE
+       g_assert_not_reached ();
+#else
+       memcpy (mctx->regs, UCONTEXT_GREGS (sigctx), sizeof (mgreg_t) * 31);
+       mctx->pc = UCONTEXT_REG_PC (sigctx);
+       mctx->regs [ARMREG_SP] = UCONTEXT_REG_SP (sigctx);
+       /*
+        * We don't handle fp regs, this is not currrently a
+        * problem, since we don't allocate them globally.
+        */
+#endif
+}
+
+void
+mono_monoctx_to_sigctx (MonoContext *mctx, void *sigctx)
+{
+#ifdef MONO_CROSS_COMPILE
+       g_assert_not_reached ();
+#else
+       memcpy (UCONTEXT_GREGS (sigctx), mctx->regs, sizeof (mgreg_t) * 31);
+       UCONTEXT_REG_PC (sigctx) = mctx->pc;
+       UCONTEXT_REG_SP (sigctx) = mctx->regs [ARMREG_SP];
+#endif
+}
+
+#elif (defined(__mips__) && !defined(MONO_CROSS_COMPILE)) || (defined(TARGET_MIPS))
+
+#include <mono/utils/mono-context.h>
+#include <mono/arch/mips/mips-codegen.h>
+
+void
+mono_sigctx_to_monoctx (void *sigctx, MonoContext *mctx)
+{
+       int i;
+
+       mctx->sc_pc = UCONTEXT_REG_PC (sigctx);
+       for (i = 0; i < 32; ++i) {
+               mctx->sc_regs[i] = UCONTEXT_GREGS (sigctx) [i];
+               mctx->sc_fpregs[i] = UCONTEXT_FPREGS (sigctx) [i];
+       }
+}
+
+void
+mono_monoctx_to_sigctx (MonoContext *mctx, void *sigctx)
+{
+       int i;
+
+       UCONTEXT_REG_PC (sigctx) = mctx->sc_pc;
+       for (i = 0; i < 32; ++i) {
+               UCONTEXT_GREGS (sigctx) [i] = mctx->sc_regs[i];
+               UCONTEXT_FPREGS (sigctx) [i] = mctx->sc_fpregs[i];
+       }
+}
+
 #endif /* #if defined(__i386__) */