mono/mini/mini-sparc.h

   1 #ifndef __MONO_MINI_SPARC_H__
   2 #define __MONO_MINI_SPARC_H__
   3
   4 #include <mono/arch/sparc/sparc-codegen.h>
   5
   6 #include <glib.h>
   7
   8 #define MONO_MAX_IREGS 32
   9 #define MONO_MAX_FREGS 32
  10
  11 #define MONO_ARCH_FRAME_ALIGNMENT (sizeof (gpointer) * 2)
  12
  13 #define MONO_ARCH_CODE_ALIGNMENT 32
  14
  15 #define MONO_ARCH_BASEREG sparc_fp
  16 #define MONO_ARCH_RETREG1 sparc_i0
  17
  18 #ifdef SPARCV9
  19 #define MONO_SPARC_STACK_BIAS 2047
  20 #else
  21 #define MONO_SPARC_STACK_BIAS 0
  22 #endif
  23
  24 struct MonoLMF {
  25         gpointer    previous_lmf;
  26         gpointer    lmf_addr;
  27         MonoMethod *method;
  28         gpointer    ip;
  29         gpointer    sp;
  30         gpointer    ebp;
  31 };
  32
  33 typedef struct MonoContext {
  34         guint8 *ip;
  35         gpointer *sp;
  36         gpointer *fp;
  37 } MonoContext;
  38
  39 typedef struct MonoCompileArch {
  40         gint32 lmf_offset;
  41         gint32 localloc_offset;
  42 } MonoCompileArch;
  43
  44 #define MONO_CONTEXT_SET_IP(ctx,eip) do { (ctx)->ip = (gpointer)(eip); } while (0);
  45 #define MONO_CONTEXT_SET_BP(ctx,ebp) do { (ctx)->fp = (gpointer*)(ebp); } while (0);
  46 #define MONO_CONTEXT_SET_SP(ctx,esp) do { (ctx)->sp = (gpointer*)(esp); } while (0);
  47
  48 #define MONO_CONTEXT_GET_IP(ctx) ((gpointer)((ctx)->ip))
  49 #define MONO_CONTEXT_GET_BP(ctx) ((gpointer)((ctx)->fp))
  50 #define MONO_CONTEXT_GET_SP(ctx) ((gpointer)((ctx)->sp))
  51
  52 #define MONO_INIT_CONTEXT_FROM_FUNC(ctx,start_func) do {        \
  53                 mono_arch_flush_register_windows ();    \
  54                 MONO_CONTEXT_SET_IP ((ctx), (start_func));      \
  55                 MONO_CONTEXT_SET_BP ((ctx), __builtin_frame_address (0));       \
  56         } while (0)
  57
  58 #define MONO_ARCH_USE_SIGACTION 1
  59
  60 //#define MONO_ARCH_SIGSEGV_ON_ALTSTACK
  61
  62 #define MONO_ARCH_EMULATE_FCONV_TO_I8   1
  63 #define MONO_ARCH_EMULATE_LCONV_TO_R8   1
  64 #define MONO_ARCH_EMULATE_LCONV_TO_R4   1
  65 #define MONO_ARCH_EMULATE_CONV_R8_UN    1
  66 #define MONO_ARCH_EMULATE_LCONV_TO_R8_UN 1
  67 #define MONO_ARCH_EMULATE_FREM 1
  68 #define MONO_ARCH_NEED_DIV_CHECK 1
  69 #define MONO_ARCH_HAVE_OUT_OF_LINE_BBLOCKS 1
  70
  71 #ifdef SPARCV9
  72 #define MONO_ARCH_NO_EMULATE_LONG_SHIFT_OPS
  73 #endif
  74
  75 #ifndef __GNUC__
  76 /* assume Sun compiler if not GCC */
  77 static void * __builtin_return_address(int depth)
  78 {
  79         asm("ta      3");
  80         asm("tst     %i0");
  81         asm("be      retAddr_End");
  82         asm("mov     %fp, %l0");
  83         asm("retAddr_Start:");
  84         asm("sub     %i0, 1, %i0");
  85         asm("tst     %i0");
  86         asm("bne     retAddr_Start");
  87 #if SPARCV9
  88         asm("ldx     [%l0+2159], %l0");
  89         asm("retAddr_End:");
  90         asm("ldx     [%l0+2167], %i0");
  91 #else
  92         asm("ld      [%l0+56], %l0");
  93         asm("retAddr_End:");
  94         asm("ld      [%l0+60], %i0");
  95 #endif
  96 }
  97
  98 static void * __builtin_frame_address(int depth)
  99 {
 100         asm("ta      3");
 101         asm("tst     %i0");
 102         asm("be      frameAddr_End");
 103         asm("mov     %fp, %l0");
 104         asm("frameAddr_Start:");
 105         asm("sub     %i0, 1, %i0");
 106         asm("tst     %i0");
 107         asm("bne     frameAddr_Start");
 108 #if SPARCV9
 109         asm("ldx     [%l0+2159], %l0");
 110         asm("frameAddr_End:");
 111         asm("ldx     [%l0+2159], %i0");
 112 #else
 113         asm("ld      [%l0+56], %l0");
 114         asm("frameAddr_End:");
 115         asm("ld      [%l0+56], %i0");
 116 #endif
 117 }
 118 #endif
 119
 120 gboolean mono_sparc_is_virtual_call (guint32 *code);
 121
 122 gpointer* mono_sparc_get_vcall_slot_addr (guint32 *code, gpointer *fp);
 123
 124 void mono_sparc_flushw (void);
 125
 126 gboolean mono_sparc_is_v9 (void);
 127
 128 gboolean mono_sparc_is_sparc64 (void);
 129
 130 struct MonoCompile;
 131
 132 guint32* mono_sparc_emit_save_lmf (guint32* code, guint32 lmf_offset);
 133
 134 guint32* mono_sparc_emit_restore_lmf (guint32 *code, guint32 lmf_offset);
 135
 136 #endif /* __MONO_MINI_SPARC_H__ */