X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=ir%2Fbe%2FTEMPLATE%2Fbearch_TEMPLATE.c;h=8e8991d292b13eb2b84bd2d03d9474396cebc58c;hb=0860cafaff791b93c568c77739bd7d9c7240ee2f;hp=633115f9c59c93e1b5a8b9931774ab196bf6827f;hpb=1ce363f80e6a204d4011f85813362d9bd1d0e7e4;p=libfirm diff --git a/ir/be/TEMPLATE/bearch_TEMPLATE.c b/ir/be/TEMPLATE/bearch_TEMPLATE.c index 633115f9c..8e8991d29 100644 --- a/ir/be/TEMPLATE/bearch_TEMPLATE.c +++ b/ir/be/TEMPLATE/bearch_TEMPLATE.c @@ -22,9 +22,7 @@ * @brief The main TEMPLATE backend driver file. * @version $Id$ */ -#ifdef HAVE_CONFIG_H #include "config.h" -#endif #include "pseudo_irg.h" #include "irgwalk.h" @@ -36,14 +34,15 @@ #include "bitset.h" #include "debug.h" -#include "../bearch_t.h" +#include "be.h" +#include "../bearch.h" #include "../benode_t.h" #include "../belower.h" -#include "../besched_t.h" -#include "be.h" +#include "../besched.h" #include "../beabi.h" #include "../bemodule.h" #include "../begnuas.h" +#include "../belistsched.h" #include "bearch_TEMPLATE_t.h" @@ -67,138 +66,21 @@ static set *cur_reg_set = NULL; * |___/ **************************************************/ -/** - * Return register requirements for a TEMPLATE node. - * If the node returns a tuple (mode_T) then the proj's - * will be asked for this information. - */ -static const -arch_register_req_t *TEMPLATE_get_irn_reg_req(const void *self, - const ir_node *node, int pos) { - long node_pos = pos == -1 ? 0 : pos; - ir_mode *mode = get_irn_mode(node); - (void) self; - - if (mode == mode_T || mode == mode_M) { - return arch_no_register_req; - } - - if (is_Proj(node)) { - /* in case of a proj, we need to get the correct OUT slot */ - /* of the node corresponding to the proj number */ - if (pos == -1) { - node_pos = TEMPLATE_translate_proj_pos(node); - } else { - node_pos = pos; - } - - node = skip_Proj_const(node); - } - - /* get requirements for our own nodes */ - if (is_TEMPLATE_irn(node)) { - const arch_register_req_t *req; - if (pos >= 0) { - req = get_TEMPLATE_in_req(node, pos); - } else { - req = get_TEMPLATE_out_req(node, node_pos); - } - - assert(req != NULL); - - return req; - } - - /* unknowns should be transformed already */ - assert(!is_Unknown(node)); - - return arch_no_register_req; -} - -static void TEMPLATE_set_irn_reg(const void *self, ir_node *irn, const arch_register_t *reg) +static arch_irn_class_t TEMPLATE_classify(const ir_node *irn) { - int pos = 0; - (void) self; - - if (is_Proj(irn)) { - pos = TEMPLATE_translate_proj_pos(irn); - irn = skip_Proj(irn); - } - - if (is_TEMPLATE_irn(irn)) { - const arch_register_t **slots; - - slots = get_TEMPLATE_slots(irn); - slots[pos] = reg; - } - else { - /* here we set the registers for the Phi nodes */ - TEMPLATE_set_firm_reg(irn, reg, cur_reg_set); - } -} - -static -const arch_register_t *TEMPLATE_get_irn_reg(const void *self, - const ir_node *irn) -{ - int pos = 0; - const arch_register_t *reg = NULL; - (void) self; - - if (is_Proj(irn)) { - pos = TEMPLATE_translate_proj_pos(irn); - irn = skip_Proj_const(irn); - } - - if (is_TEMPLATE_irn(irn)) { - const arch_register_t * const *slots; - slots = get_TEMPLATE_slots_const(irn); - reg = slots[pos]; - } - else { - reg = TEMPLATE_get_firm_reg(irn, cur_reg_set); - } - - return reg; -} - -static arch_irn_class_t TEMPLATE_classify(const void *self, const ir_node *irn) { - irn = skip_Proj_const(irn); - (void) self; - - if (is_cfop(irn)) { - return arch_irn_class_branch; - } - else if (is_TEMPLATE_irn(irn)) { - return arch_irn_class_normal; - } - - return 0; -} - -static arch_irn_flags_t TEMPLATE_get_flags(const void *self, const ir_node *irn) { - irn = skip_Proj_const(irn); - (void) self; - - if (is_TEMPLATE_irn(irn)) { - return get_TEMPLATE_flags(irn); - } - else if (is_Unknown(irn)) { - return arch_irn_flags_ignore; - } - + (void) irn; return 0; } -static ir_entity *TEMPLATE_get_frame_entity(const void *self, const ir_node *node) { - (void) self; +static ir_entity *TEMPLATE_get_frame_entity(const ir_node *node) +{ (void) node; /* TODO: return the ir_entity assigned to the frame */ return NULL; } -static void TEMPLATE_set_frame_entity(const void *self, ir_node *node, ir_entity *ent) { - (void) self; +static void TEMPLATE_set_frame_entity(ir_node *node, ir_entity *ent) +{ (void) node; (void) ent; /* TODO: set the ir_entity assigned to the frame */ @@ -208,27 +90,25 @@ static void TEMPLATE_set_frame_entity(const void *self, ir_node *node, ir_entity * This function is called by the generic backend to correct offsets for * nodes accessing the stack. */ -static void TEMPLATE_set_frame_offset(const void *self, ir_node *irn, int offset) { - (void) self; +static void TEMPLATE_set_frame_offset(ir_node *irn, int offset) +{ (void) irn; (void) offset; /* TODO: correct offset if irn accesses the stack */ } -static int TEMPLATE_get_sp_bias(const void *self, const ir_node *irn) { - (void) self; +static int TEMPLATE_get_sp_bias(const ir_node *irn) +{ (void) irn; return 0; } /* fill register allocator interface */ -static const arch_irn_ops_if_t TEMPLATE_irn_ops_if = { - TEMPLATE_get_irn_reg_req, - TEMPLATE_set_irn_reg, - TEMPLATE_get_irn_reg, +static const arch_irn_ops_t TEMPLATE_irn_ops = { + get_TEMPLATE_in_req, + get_TEMPLATE_out_req, TEMPLATE_classify, - TEMPLATE_get_flags, TEMPLATE_get_frame_entity, TEMPLATE_set_frame_entity, TEMPLATE_set_frame_offset, @@ -239,13 +119,6 @@ static const arch_irn_ops_if_t TEMPLATE_irn_ops_if = { NULL, /* perform_memory_operand */ }; -TEMPLATE_irn_ops_t TEMPLATE_irn_ops = { - &TEMPLATE_irn_ops_if, - NULL -}; - - - /************************************************** * _ _ __ * | | (_)/ _| @@ -280,14 +153,6 @@ static void TEMPLATE_finish_irg(void *self) { } -/** - * These are some hooks which must be filled but are probably not needed. - */ -static void TEMPLATE_before_sched(void *self) { - (void) self; - /* Some stuff you need to do after scheduling but before register allocation */ -} - static void TEMPLATE_before_ra(void *self) { (void) self; /* Some stuff you need to do after scheduling but before register allocation */ @@ -321,10 +186,10 @@ static void *TEMPLATE_cg_init(be_irg_t *birg); static const arch_code_generator_if_t TEMPLATE_code_gen_if = { TEMPLATE_cg_init, + NULL, /* get_pic_base hook */ NULL, /* before abi introduce hook */ TEMPLATE_prepare_graph, NULL, /* spill hook */ - TEMPLATE_before_sched, /* before scheduling hook */ TEMPLATE_before_ra, /* before register allocation hook */ TEMPLATE_after_ra, /* after register allocation hook */ TEMPLATE_finish_irg, @@ -336,21 +201,18 @@ static const arch_code_generator_if_t TEMPLATE_code_gen_if = { */ static void *TEMPLATE_cg_init(be_irg_t *birg) { const arch_env_t *arch_env = be_get_birg_arch_env(birg); - TEMPLATE_isa_t *isa = (TEMPLATE_isa_t *) arch_env->isa; - TEMPLATE_code_gen_t *cg = xmalloc(sizeof(*cg)); + TEMPLATE_isa_t *isa = (TEMPLATE_isa_t *) arch_env; + TEMPLATE_code_gen_t *cg = XMALLOC(TEMPLATE_code_gen_t); cg->impl = &TEMPLATE_code_gen_if; cg->irg = be_get_birg_irg(birg); cg->reg_set = new_set(TEMPLATE_cmp_irn_reg_assoc, 1024); - cg->arch_env = arch_env; cg->isa = isa; cg->birg = birg; FIRM_DBG_REGISTER(cg->mod, "firm.be.TEMPLATE.cg"); cur_reg_set = cg->reg_set; - TEMPLATE_irn_ops.cg = cg; - return (arch_code_generator_t *)cg; } @@ -371,7 +233,9 @@ static TEMPLATE_isa_t TEMPLATE_isa_template = { &TEMPLATE_isa_if, /* isa interface implementation */ &TEMPLATE_general_purpose_regs[REG_SP], /* stack pointer register */ &TEMPLATE_general_purpose_regs[REG_BP], /* base pointer register */ + &TEMPLATE_reg_classes[CLASS_TEMPLATE_general_purpose], /* link pointer register class */ -1, /* stack direction */ + 2, /* power of two stack alignment for calls, 2^2 == 4 */ NULL, /* main environment */ 7, /* costs for a spill instruction */ 5, /* costs for a reload instruction */ @@ -381,7 +245,7 @@ static TEMPLATE_isa_t TEMPLATE_isa_template = { /** * Initializes the backend ISA and opens the output file. */ -static void *TEMPLATE_init(FILE *outfile) { +static arch_env_t *TEMPLATE_init(FILE *outfile) { static int run_once = 0; TEMPLATE_isa_t *isa; @@ -389,15 +253,15 @@ static void *TEMPLATE_init(FILE *outfile) { return NULL; run_once = 1; - isa = xcalloc(1, sizeof(*isa)); + isa = XMALLOC(TEMPLATE_isa_t); memcpy(isa, &TEMPLATE_isa_template, sizeof(*isa)); be_emit_init(outfile); TEMPLATE_register_init(); - TEMPLATE_create_opcodes(); + TEMPLATE_create_opcodes(&TEMPLATE_irn_ops); - return isa; + return &isa->arch_env; } @@ -409,7 +273,7 @@ static void TEMPLATE_done(void *self) { TEMPLATE_isa_t *isa = self; /* emit now all global declarations */ - be_gas_emit_decls(isa->arch_isa.main_env, 0); + be_gas_emit_decls(isa->arch_env.main_env, 0); be_emit_exit(); free(self); @@ -454,18 +318,16 @@ const arch_register_class_t *TEMPLATE_get_reg_class_for_mode(const void *self, typedef struct { be_abi_call_flags_bits_t flags; const arch_env_t *arch_env; - const arch_isa_t *isa; ir_graph *irg; } TEMPLATE_abi_env_t; static void *TEMPLATE_abi_init(const be_abi_call_t *call, const arch_env_t *arch_env, ir_graph *irg) { - TEMPLATE_abi_env_t *env = xmalloc(sizeof(env[0])); + TEMPLATE_abi_env_t *env = XMALLOC(TEMPLATE_abi_env_t); be_abi_call_flags_t fl = be_abi_call_get_flags(call); env->flags = fl.bits; env->irg = irg; env->arch_env = arch_env; - env->isa = arch_env->isa; return env; } @@ -497,28 +359,20 @@ static ir_type *TEMPLATE_get_between_type(void *self) return between_type; } -static void TEMPLATE_abi_dont_save_regs(void *self, pset *s) -{ - TEMPLATE_abi_env_t *env = self; - if (env->flags.try_omit_fp) { - /* insert the BP register into the ignore set */ - pset_insert_ptr(s, env->isa->bp); - } -} - /** * Build the prolog, return the BASE POINTER register */ static const arch_register_t *TEMPLATE_abi_prologue(void *self, ir_node **mem, - pmap *reg_map) + pmap *reg_map, int *stack_bias) { TEMPLATE_abi_env_t *env = self; (void) reg_map; (void) mem; + (void) stack_bias; if(env->flags.try_omit_fp) - return env->isa->sp; - return env->isa->bp; + return env->arch_env->sp; + return env->arch_env->bp; } /* Build the epilog */ @@ -535,7 +389,6 @@ static const be_abi_callbacks_t TEMPLATE_abi_callbacks = { TEMPLATE_abi_init, free, TEMPLATE_get_between_type, - TEMPLATE_abi_dont_save_regs, TEMPLATE_abi_prologue, TEMPLATE_abi_epilogue, }; @@ -587,24 +440,6 @@ void TEMPLATE_get_call_abi(const void *self, ir_type *method_type, } } -static const void *TEMPLATE_get_irn_ops(const arch_irn_handler_t *self, - const ir_node *irn) -{ - (void) self; - (void) irn; - return &TEMPLATE_irn_ops; -} - -const arch_irn_handler_t TEMPLATE_irn_handler = { - TEMPLATE_get_irn_ops -}; - -const arch_irn_handler_t *TEMPLATE_get_irn_handler(const void *self) -{ - (void) self; - return &TEMPLATE_irn_handler; -} - int TEMPLATE_to_appear_in_schedule(void *block_env, const ir_node *irn) { (void) block_env; @@ -665,11 +500,15 @@ static const backend_params *TEMPLATE_get_backend_params(void) { static backend_params p = { 0, /* no dword lowering */ 0, /* no inline assembly */ - NULL, /* no additional opcodes */ NULL, /* will be set later */ NULL, /* no creator function */ NULL, /* context for create_intrinsic_fkt */ NULL, /* parameter for if conversion */ + NULL, /* float arithmetic mode */ + 0, /* no trampoline support: size 0 */ + 0, /* no trampoline support: align 0 */ + NULL, /* no trampoline support: no trampoline builder */ + 4 /* alignment of stack parameter: typically 4 (32bit) or 8 (64bit) */ }; return &p; } @@ -700,15 +539,29 @@ static ir_graph **TEMPLATE_get_backend_irg_list(const void *self, return NULL; } +static asm_constraint_flags_t TEMPLATE_parse_asm_constraint(const void *self, + const char **c) +{ + (void) self; + (void) c; + return ASM_CONSTRAINT_FLAG_INVALID; +} + +static int TEMPLATE_is_valid_clobber(const void *self, const char *clobber) +{ + (void) self; + (void) clobber; + return 0; +} const arch_isa_if_t TEMPLATE_isa_if = { TEMPLATE_init, TEMPLATE_done, + NULL, /* handle intrinsics */ TEMPLATE_get_n_reg_class, TEMPLATE_get_reg_class, TEMPLATE_get_reg_class_for_mode, TEMPLATE_get_call_abi, - TEMPLATE_get_irn_handler, TEMPLATE_get_code_generator_if, TEMPLATE_get_list_sched_selector, TEMPLATE_get_ilp_sched_selector, @@ -716,7 +569,10 @@ const arch_isa_if_t TEMPLATE_isa_if = { TEMPLATE_get_backend_params, TEMPLATE_get_allowed_execution_units, TEMPLATE_get_machine, - TEMPLATE_get_backend_irg_list + TEMPLATE_get_backend_irg_list, + NULL, /* mark remat */ + TEMPLATE_parse_asm_constraint, + TEMPLATE_is_valid_clobber }; void be_init_arch_TEMPLATE(void)