X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=ir%2Fbe%2Fbemain.c;h=23e0261de225e39088220a71f545912a5221dc94;hb=fc2759fa267ba4b074c2ac570c1b9d47cc943612;hp=b4ccce504c510c94f7a7081d1ca5e638534e3098;hpb=4aebe57b73efb9a659a4c25aafe9b77924bdec75;p=libfirm diff --git a/ir/be/bemain.c b/ir/be/bemain.c index b4ccce504..23e0261de 100644 --- a/ir/be/bemain.c +++ b/ir/be/bemain.c @@ -176,6 +176,136 @@ static const lc_opt_table_entry_t be_main_options[] = { static be_module_list_entry_t *isa_ifs = NULL; + +unsigned short asm_constraint_flags[256]; + +void be_init_default_asm_constraint_flags(void) +{ + asm_constraint_flags['?'] = ASM_CONSTRAINT_FLAG_NO_SUPPORT; + asm_constraint_flags['!'] = ASM_CONSTRAINT_FLAG_NO_SUPPORT; + asm_constraint_flags['&'] = ASM_CONSTRAINT_FLAG_NO_SUPPORT + | ASM_CONSTRAINT_FLAG_MODIFIER_EARLYCLOBBER; + asm_constraint_flags['%'] = ASM_CONSTRAINT_FLAG_NO_SUPPORT + | ASM_CONSTRAINT_FLAG_MODIFIER_COMMUTATIVE; + asm_constraint_flags['!'] = ASM_CONSTRAINT_FLAG_NO_SUPPORT; + + asm_constraint_flags['='] = ASM_CONSTRAINT_FLAG_MODIFIER_WRITE + | ASM_CONSTRAINT_FLAG_MODIFIER_NO_READ; + asm_constraint_flags['+'] = ASM_CONSTRAINT_FLAG_MODIFIER_READ + | ASM_CONSTRAINT_FLAG_MODIFIER_WRITE; + + asm_constraint_flags['i'] = ASM_CONSTRAINT_FLAG_SUPPORTS_IMMEDIATE; + asm_constraint_flags['s'] = ASM_CONSTRAINT_FLAG_SUPPORTS_IMMEDIATE; + asm_constraint_flags['E'] = ASM_CONSTRAINT_FLAG_SUPPORTS_IMMEDIATE; + asm_constraint_flags['F'] = ASM_CONSTRAINT_FLAG_SUPPORTS_IMMEDIATE; + asm_constraint_flags['G'] = ASM_CONSTRAINT_FLAG_SUPPORTS_IMMEDIATE; + asm_constraint_flags['H'] = ASM_CONSTRAINT_FLAG_SUPPORTS_IMMEDIATE; + asm_constraint_flags['I'] = ASM_CONSTRAINT_FLAG_SUPPORTS_IMMEDIATE; + asm_constraint_flags['J'] = ASM_CONSTRAINT_FLAG_SUPPORTS_IMMEDIATE; + asm_constraint_flags['K'] = ASM_CONSTRAINT_FLAG_SUPPORTS_IMMEDIATE; + asm_constraint_flags['L'] = ASM_CONSTRAINT_FLAG_SUPPORTS_IMMEDIATE; + asm_constraint_flags['M'] = ASM_CONSTRAINT_FLAG_SUPPORTS_IMMEDIATE; + asm_constraint_flags['N'] = ASM_CONSTRAINT_FLAG_SUPPORTS_IMMEDIATE; + asm_constraint_flags['O'] = ASM_CONSTRAINT_FLAG_SUPPORTS_IMMEDIATE; + asm_constraint_flags['P'] = ASM_CONSTRAINT_FLAG_SUPPORTS_IMMEDIATE; + + asm_constraint_flags['m'] = ASM_CONSTRAINT_FLAG_SUPPORTS_MEMOP; + asm_constraint_flags['o'] = ASM_CONSTRAINT_FLAG_SUPPORTS_MEMOP; + asm_constraint_flags['V'] = ASM_CONSTRAINT_FLAG_SUPPORTS_MEMOP; + asm_constraint_flags['<'] = ASM_CONSTRAINT_FLAG_SUPPORTS_MEMOP; + asm_constraint_flags['>'] = ASM_CONSTRAINT_FLAG_SUPPORTS_MEMOP; + + asm_constraint_flags['p'] = ASM_CONSTRAINT_FLAG_SUPPORTS_REGISTER; + asm_constraint_flags['0'] = ASM_CONSTRAINT_FLAG_SUPPORTS_REGISTER; + asm_constraint_flags['1'] = ASM_CONSTRAINT_FLAG_SUPPORTS_REGISTER; + asm_constraint_flags['2'] = ASM_CONSTRAINT_FLAG_SUPPORTS_REGISTER; + asm_constraint_flags['3'] = ASM_CONSTRAINT_FLAG_SUPPORTS_REGISTER; + asm_constraint_flags['4'] = ASM_CONSTRAINT_FLAG_SUPPORTS_REGISTER; + asm_constraint_flags['5'] = ASM_CONSTRAINT_FLAG_SUPPORTS_REGISTER; + asm_constraint_flags['6'] = ASM_CONSTRAINT_FLAG_SUPPORTS_REGISTER; + asm_constraint_flags['7'] = ASM_CONSTRAINT_FLAG_SUPPORTS_REGISTER; + asm_constraint_flags['8'] = ASM_CONSTRAINT_FLAG_SUPPORTS_REGISTER; + asm_constraint_flags['9'] = ASM_CONSTRAINT_FLAG_SUPPORTS_REGISTER; + + asm_constraint_flags['X'] = ASM_CONSTRAINT_FLAG_SUPPORTS_REGISTER + | ASM_CONSTRAINT_FLAG_SUPPORTS_MEMOP + | ASM_CONSTRAINT_FLAG_SUPPORTS_IMMEDIATE; + + /* these should have been catched by the parsing code already */ + asm_constraint_flags['#'] = ASM_CONSTRAINT_FLAG_NO_SUPPORT; + asm_constraint_flags['*'] = ASM_CONSTRAINT_FLAG_NO_SUPPORT; + asm_constraint_flags[' '] = ASM_CONSTRAINT_FLAG_NO_SUPPORT; + asm_constraint_flags['\t'] = ASM_CONSTRAINT_FLAG_NO_SUPPORT; + asm_constraint_flags['\n'] = ASM_CONSTRAINT_FLAG_NO_SUPPORT; + asm_constraint_flags['\r'] = ASM_CONSTRAINT_FLAG_NO_SUPPORT; +} + +asm_constraint_flags_t be_parse_asm_constraints(const char *constraint) +{ + asm_constraint_flags_t flags = 0; + const char *c; + asm_constraint_flags_t tflags; + + for (c = constraint; *c != '\0'; ++c) { + switch (*c) { + case '#': + /* 'comment' stuff */ + while(*c != 0 && *c != ',') + ++c; + break; + case '*': + /* 'comment' character */ + ++c; + break; + case ' ': + case '\t': + case '\n': + case '\r': + break; + default: + tflags = asm_constraint_flags[(int) *c]; + if (tflags != 0) { + flags |= tflags; + } else { + flags |= isa_if->parse_asm_constraint(isa_if, &c); + } + break; + } + } + + if (( + flags & ASM_CONSTRAINT_FLAG_MODIFIER_WRITE && + flags & ASM_CONSTRAINT_FLAG_MODIFIER_NO_WRITE + ) || ( + flags & ASM_CONSTRAINT_FLAG_MODIFIER_READ && + flags & ASM_CONSTRAINT_FLAG_MODIFIER_NO_READ + )) { + flags |= ASM_CONSTRAINT_FLAG_INVALID; + } + if (!(flags & (ASM_CONSTRAINT_FLAG_MODIFIER_READ | + ASM_CONSTRAINT_FLAG_MODIFIER_WRITE | + ASM_CONSTRAINT_FLAG_MODIFIER_NO_WRITE | + ASM_CONSTRAINT_FLAG_MODIFIER_NO_READ) + )) { + flags |= ASM_CONSTRAINT_FLAG_MODIFIER_READ; + } + + return flags; +} + +int be_is_valid_clobber(const char *clobber) +{ + /* memory is a valid clobber. (the frontend has to detect this case too, + * because it has to add memory edges to the asm) */ + if (strcmp(clobber, "memory") == 0) + return 1; + /* cc (condition code) is always valid */ + if (strcmp(clobber, "cc") == 0) + return 1; + + return isa_if->is_valid_clobber(isa_if, clobber); +} + void be_register_isa_if(const char *name, const arch_isa_if_t *isa) { if (isa_if == NULL) @@ -242,6 +372,12 @@ void firm_be_init(void) be_init_modules(); } +/* Finalize the Firm backend. */ +void firm_be_finish(void) +{ + be_quit_modules(); +} + /* Returns the backend parameter */ const backend_params *be_get_backend_param(void) { @@ -269,6 +405,7 @@ static be_main_env_t *be_init_env(be_main_env_t *env, FILE *file_handle) remove_irp_type(env->pic_symbols_type); set_class_final(env->pic_trampolines_type, 1); + memset(asm_constraint_flags, 0, sizeof(asm_constraint_flags)); env->arch_env = arch_env_init(isa_if, file_handle, env); be_phi_handler_new(env); @@ -552,8 +689,12 @@ static void be_main_loop(FILE *file_handle, const char *cup_name) */ if (ir_profile_has_data()) birg->exec_freq = ir_create_execfreqs_from_profile(irg); - else + else { + /* TODO: edges are corrupt for EDGE_KIND_BLOCK after the local + * optimize graph phase merges blocks in the x86 backend */ + edges_deactivate(irg); birg->exec_freq = compute_execfreq(irg, 10); + } BE_TIMER_POP(t_execfreq); @@ -762,10 +903,10 @@ void be_main(FILE *file_handle, const char *cup_name) ir_timer_t *t = NULL; /* The user specified another config file to read. do that now. */ - if(strlen(config_file) > 0) { + if (config_file[0] != '\0') { FILE *f; - if((f = fopen(config_file, "rt")) != NULL) { + if ((f = fopen(config_file, "rt")) != NULL) { lc_opt_from_file(config_file, f, NULL); fclose(f); }