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_ARCH_USE_SIGACTION 1
  53
  54 //#define MONO_ARCH_SIGSEGV_ON_ALTSTACK
  55
  56 #define MONO_ARCH_EMULATE_FCONV_TO_I8   1
  57 #define MONO_ARCH_EMULATE_LCONV_TO_R8   1
  58 #define MONO_ARCH_EMULATE_LCONV_TO_R4   1
  59 #define MONO_ARCH_EMULATE_CONV_R8_UN    1
  60 #define MONO_ARCH_EMULATE_LCONV_TO_R8_UN 1
  61 #define MONO_ARCH_EMULATE_FREM 1
  62 #define MONO_ARCH_NEED_DIV_CHECK 1
  63
  64 #ifdef SPARCV9
  65 #define MONO_ARCH_NO_EMULATE_LONG_SHIFT_OPS
  66 #endif
  67
  68 #ifndef __GNUC__
  69 /* assume Sun compiler if not GCC */
  70 static void * __builtin_return_address(int depth)
  71 {
  72         asm("ta      3");
  73         asm("tst     %i0");
  74         asm("be      retAddr_End");
  75         asm("mov     %fp, %l0");
  76         asm("retAddr_Start:");
  77         asm("sub     %i0, 1, %i0");
  78         asm("tst     %i0");
  79         asm("bne     retAddr_Start");
  80 #if SPARCV9
  81         asm("ldx     [%l0+2159], %l0");
  82         asm("retAddr_End:");
  83         asm("ldx     [%l0+2167], %i0");
  84 #else
  85         asm("ld      [%l0+56], %l0");
  86         asm("retAddr_End:");
  87         asm("ld      [%l0+60], %i0");
  88 #endif
  89 }
  90
  91 static void * __builtin_frame_address(int depth)
  92 {
  93         asm("ta      3");
  94         asm("tst     %i0");
  95         asm("be      frameAddr_End");
  96         asm("mov     %fp, %l0");
  97         asm("frameAddr_Start:");
  98         asm("sub     %i0, 1, %i0");
  99         asm("tst     %i0");
 100         asm("bne     frameAddr_Start");
 101 #if SPARCV9
 102         asm("ldx     [%l0+2159], %l0");
 103         asm("frameAddr_End:");
 104         asm("ldx     [%l0+2159], %i0");
 105 #else
 106         asm("ld      [%l0+56], %l0");
 107         asm("frameAddr_End:");
 108         asm("ld      [%l0+56], %i0");
 109 #endif
 110 }
 111 #endif
 112
 113 gboolean mono_sparc_is_virtual_call (guint32 *code);
 114
 115 gpointer* mono_sparc_get_vcall_slot_addr (guint32 *code, gpointer *fp);
 116
 117 void mono_sparc_flushw (void);
 118
 119 gboolean mono_sparc_is_v9 (void);
 120
 121 gboolean mono_sparc_is_sparc64 (void);
 122
 123 struct MonoCompile;
 124
 125 guint32* mono_sparc_emit_save_lmf (guint32* code, guint32 lmf_offset);
 126
 127 guint32* mono_sparc_emit_restore_lmf (guint32 *code, guint32 lmf_offset);
 128
 129 #endif /* __MONO_MINI_SPARC_H__ */