X-Git-Url: http://wien.tomnetworks.com/gitweb/?a=blobdiff_plain;f=mono%2Fmini%2Fmini-ppc.h;h=45e5dc3e60acc2d8147222b66a121de57e5a22b0;hb=e1849e070703c17113eea43e475431d5bd224c53;hp=e456456d585d940b486cbd994d91586f54bea698;hpb=ba62bdf862560a85e2d637a0762d0e4fdd0db8b0;p=mono.git diff --git a/mono/mini/mini-ppc.h b/mono/mini/mini-ppc.h index e456456d585..45e5dc3e60a 100644 --- a/mono/mini/mini-ppc.h +++ b/mono/mini/mini-ppc.h @@ -4,12 +4,13 @@ #include #include #include +#include #include #ifdef __mono_ppc64__ -#define MONO_ARCH_CPU_SPEC ppc64_cpu_desc +#define MONO_ARCH_CPU_SPEC mono_ppc64_cpu_desc #else -#define MONO_ARCH_CPU_SPEC ppcg4 +#define MONO_ARCH_CPU_SPEC mono_ppcg4 #endif #define MONO_MAX_IREGS 32 @@ -78,19 +79,10 @@ typedef struct MonoCompileArch { #ifndef __mono_ilp32__ #define MONO_ARCH_HAVE_TLS_GET 1 -#define MONO_ARCH_ENABLE_MONITOR_IL_FASTPATH 1 #endif #else /* must be __mono_ppc__ */ -#if 0 -/* enabling this for PPC32 causes hangs in the thread/delegate tests. - So disable for now. */ -#if defined(__linux__) -#define MONO_ARCH_ENABLE_MONITOR_IL_FASTPATH 1 -#endif -#endif - #define MONO_ARCH_HAVE_TLS_GET 1 #define MONO_ARCH_EMULATE_FCONV_TO_I8 1 #define MONO_ARCH_EMULATE_LCONV_TO_R8 1 @@ -99,7 +91,6 @@ typedef struct MonoCompileArch { #define MONO_ARCH_EMULATE_LCONV_TO_R8_UN 1 #define MONO_ARCH_EMULATE_FREM 1 -#define MONO_ARCH_BIGMUL_INTRINS 1 #define MONO_ARCH_GC_MAPS_SUPPORTED 1 /* Parameters used by the register allocator */ @@ -139,52 +130,29 @@ typedef struct MonoCompileArch { #define PPC_STACK_PARAM_OFFSET 24 #define PPC_MINIMAL_STACK_SIZE 24 #define PPC_MINIMAL_PARAM_AREA_SIZE 0 -#define PPC_LARGEST_STRUCT_SIZE_TO_RETURN_VIA_REGISTERS 0 -#define PPC_MOST_FLOAT_STRUCT_MEMBERS_TO_RETURN_VIA_REGISTERS 0 #define PPC_FIRST_ARG_REG ppc_r3 #define PPC_LAST_ARG_REG ppc_r10 #define PPC_FIRST_FPARG_REG ppc_f1 #define PPC_LAST_FPARG_REG ppc_f13 #define PPC_PASS_STRUCTS_BY_VALUE 1 -#define PPC_PASS_SMALL_FLOAT_STRUCTS_IN_FR_REGS 0 -#define PPC_RETURN_SMALL_FLOAT_STRUCTS_IN_FR_REGS 0 -#define PPC_RETURN_SMALL_STRUCTS_IN_REGS 0 -#define MONO_ARCH_HAVE_DECOMPOSE_VTYPE_OPTS 0 -#define MONO_ARCH_RETURN_CAN_USE_MULTIPLE_REGISTERS 0 #else /* Linux */ #ifdef __mono_ppc64__ #define PPC_RET_ADDR_OFFSET 16 - // PowerPC64 ELFv2 ABI + // Power LE abvi2 #if (_CALL_ELF == 2) #define PPC_STACK_PARAM_OFFSET 32 #define PPC_MINIMAL_STACK_SIZE 32 - #define PPC_LARGEST_STRUCT_SIZE_TO_RETURN_VIA_REGISTERS 16 - #define PPC_MOST_FLOAT_STRUCT_MEMBERS_TO_RETURN_VIA_REGISTERS 8 - #define PPC_PASS_SMALL_FLOAT_STRUCTS_IN_FR_REGS 1 - #define PPC_RETURN_SMALL_FLOAT_STRUCTS_IN_FR_REGS 1 - #define PPC_RETURN_SMALL_STRUCTS_IN_REGS 1 - #define MONO_ARCH_HAVE_DECOMPOSE_VTYPE_OPTS 1 - #define MONO_ARCH_RETURN_CAN_USE_MULTIPLE_REGISTERS 1 -// FIXME: To get the test case finally_block_ending_in_dead_bb to work properly we need to define the following -// and then implement the fuction mono_arch_create_handler_block_trampoline. -// #define MONO_ARCH_HAVE_HANDLER_BLOCK_GUARD 1 -// #define DEBUG_ELFABIV2 #else - #define PPC_MINIMAL_STACK_SIZE 48 #define PPC_STACK_PARAM_OFFSET 48 - #define PPC_LARGEST_STRUCT_SIZE_TO_RETURN_VIA_REGISTERS 0 - #define PPC_MOST_FLOAT_STRUCT_MEMBERS_TO_RETURN_VIA_REGISTERS 0 - #define PPC_PASS_SMALL_FLOAT_STRUCTS_IN_FR_REGS 0 - #define PPC_RETURN_SMALL_FLOAT_STRUCTS_IN_FR_REGS 0 - #define PPC_RETURN_SMALL_STRUCTS_IN_REGS 0 - #define MONO_ARCH_HAVE_DECOMPOSE_VTYPE_OPTS 0 - #define MONO_ARCH_RETURN_CAN_USE_MULTIPLE_REGISTERS 0 + #define PPC_MINIMAL_STACK_SIZE 48 #endif +#define MONO_ARCH_HAVE_SETUP_ASYNC_CALLBACK 1 #define PPC_MINIMAL_PARAM_AREA_SIZE 64 #define PPC_LAST_FPARG_REG ppc_f13 #define PPC_PASS_STRUCTS_BY_VALUE 1 #define PPC_THREAD_PTR_REG ppc_r13 +#define MONO_ARCH_HAVE_SIGCTX_TO_MONOCTX 1 #else #define PPC_RET_ADDR_OFFSET 4 #define PPC_STACK_PARAM_OFFSET 8 @@ -192,13 +160,6 @@ typedef struct MonoCompileArch { #define PPC_MINIMAL_PARAM_AREA_SIZE 0 #define PPC_LAST_FPARG_REG ppc_f8 #define PPC_PASS_STRUCTS_BY_VALUE 0 -#define PPC_LARGEST_STRUCT_SIZE_TO_RETURN_VIA_REGISTERS 0 -#define PPC_MOST_FLOAT_STRUCT_MEMBERS_TO_RETURN_VIA_REGISTERS 0 -#define PPC_PASS_SMALL_FLOAT_STRUCTS_IN_FR_REGS 0 -#define PPC_RETURN_SMALL_FLOAT_STRUCTS_IN_FR_REGS 0 -#define PPC_RETURN_SMALL_STRUCTS_IN_REGS 0 -#define MONO_ARCH_HAVE_DECOMPOSE_VTYPE_OPTS 0 -#define MONO_ARCH_RETURN_CAN_USE_MULTIPLE_REGISTERS 0 #define PPC_THREAD_PTR_REG ppc_r2 #endif #define PPC_FIRST_ARG_REG ppc_r3 @@ -213,7 +174,6 @@ typedef struct MonoCompileArch { #define MONO_ARCH_SIGNAL_STACK_SIZE (12 * 1024) #endif /* HAVE_WORKING_SIGALTSTACK */ -#define MONO_ARCH_HAVE_CREATE_DELEGATE_TRAMPOLINE #define MONO_ARCH_IMT_REG ppc_r11 #define MONO_ARCH_VTABLE_REG ppc_r11 @@ -238,7 +198,6 @@ typedef struct MonoCompileArch { #define MONO_ARCH_HAVE_OP_TAIL_CALL 1 #define PPC_NUM_REG_ARGS (PPC_LAST_ARG_REG-PPC_FIRST_ARG_REG+1) -#define PPC_NUM_REG_FPARGS (PPC_LAST_FPARG_REG-PPC_FIRST_FPARG_REG+1) #ifdef MONO_CROSS_COMPILE @@ -311,7 +270,7 @@ typedef struct { } MonoPPCFunctionDescriptor; #define PPC_FTNPTR_SIZE sizeof (MonoPPCFunctionDescriptor) -extern guint8* mono_ppc_create_pre_code_ftnptr (guint8 *code) MONO_INTERNAL; +extern guint8* mono_ppc_create_pre_code_ftnptr (guint8 *code); #else #define PPC_FTNPTR_SIZE 0 #define mono_ppc_create_pre_code_ftnptr(c) c @@ -343,13 +302,13 @@ extern guint8* mono_ppc_create_pre_code_ftnptr (guint8 *code) MONO_INTERNAL; #endif gboolean -mono_ppc_tail_call_supported (MonoMethodSignature *caller_sig, MonoMethodSignature *callee_sig) MONO_INTERNAL; +mono_ppc_tail_call_supported (MonoMethodSignature *caller_sig, MonoMethodSignature *callee_sig); void -mono_ppc_patch (guchar *code, const guchar *target) MONO_INTERNAL; +mono_ppc_patch (guchar *code, const guchar *target); void -mono_ppc_throw_exception (MonoObject *exc, unsigned long eip, unsigned long esp, mgreg_t *int_regs, gdouble *fp_regs, gboolean rethrow) MONO_INTERNAL; +mono_ppc_throw_exception (MonoObject *exc, unsigned long eip, unsigned long esp, mgreg_t *int_regs, gdouble *fp_regs, gboolean rethrow); #ifdef __mono_ppc64__ #define MONO_PPC_32_64_CASE(c32,c64) c64 @@ -358,61 +317,10 @@ extern void mono_ppc_emitted (guint8 *code, gint64 length, const char *format, . #define MONO_PPC_32_64_CASE(c32,c64) c32 #endif -gboolean mono_ppc_is_direct_call_sequence (guint32 *code) MONO_INTERNAL; - -void mono_ppc_patch_plt_entry (guint8 *code, gpointer *got, mgreg_t *regs, guint8 *addr) MONO_INTERNAL; - -void mono_ppc_set_func_into_sigctx (void *sigctx, void *func) MONO_INTERNAL; - -// -- -#if PPC_RETURN_SMALL_FLOAT_STRUCTS_IN_FR_REGS -gboolean is_float_struct_returnable_via_regs (MonoClass *klass); -#else -#define is_float_struct_returnable_via_regs(a) (FALSE) -#endif - -#if PPC_RETURN_SMALL_STRUCTS_IN_REGS -gboolean is_struct_returnable_via_regs (MonoClass *klass, gboolean is_pinvoke); -#else -#define is_struct_returnable_via_regs(a,b) (FALSE) -#endif - -gint member_count (MonoClass *klass); -gint float_member_size (MonoClass *klass); -// -- - -#if PPC_RETURN_SMALL_STRUCTS_IN_REGS -// If the value is being returned via registers we don't need to allocate a temporary variable for it. -gboolean function_return_value_requires_temporary (MonoMethodSignature *sig); -#else -#define function_return_value_requires_temporary(a) (TRUE) -#endif - -// Debugging macros for ELF ABI v2 -#ifdef DEBUG_ELFABIV2 - -#define DEBUG_ELFABIV2_printf(a, ...) \ -{if (getenv("DEBUG_ELFABIV2")) { printf(a, ##__VA_ARGS__); fflush(stdout); } } - -#define DEBUG_ELFABIV2_mono_print_ins(a) \ -{if (getenv("DEBUG_ELFABIV2")) { if (!a) {printf("null\n");} else {mono_print_ins(a);} fflush(stdout); } } +gboolean mono_ppc_is_direct_call_sequence (guint32 *code); -extern char* mono_type_full_name (MonoType *type); - -#define DEBUG_ELFABIV2_mono_print_type(a) \ -{if (getenv("DEBUG_ELFABIV2")) { printf("%s, size: %d\n", mono_type_get_name(&a->klass->byval_arg), mini_type_stack_size (NULL, a, 0)); fflush(stdout); } } - -#define DEBUG_ELFABIV2_mono_print_klass(a) \ -{if (getenv("DEBUG_ELFABIV2")) { printf("%s\n", mono_type_get_name(&a->byval_arg)); fflush(stdout); } } - -#else - -#define DEBUG_ELFABIV2_printf(a, ...) -#define DEBUG_ELFABIV2_mono_print_ins(a) -#define DEBUG_ELFABIV2_mono_print_type(a) -#define DEBUG_ELFABIV2_mono_print_klass(a) - -#endif +void mono_ppc_patch_plt_entry (guint8 *code, gpointer *got, mgreg_t *regs, guint8 *addr); +void mono_ppc_set_func_into_sigctx (void *sigctx, void *func); #endif /* __MONO_MINI_PPC_H__ */