added DBG_OPT_LEA( to report Lea craetion to the firm statistic module
[libfirm] / ir / be / ia32 / ia32_map_regs.c
index 7067c1f..c6efb8d 100644 (file)
@@ -8,6 +8,8 @@
 
 #include <stdlib.h>
 
+#include "pmap.h"
+
 #include "ia32_map_regs.h"
 #include "ia32_new_nodes.h"
 #include "gen_ia32_regalloc_if.h"
@@ -36,26 +38,26 @@ const arch_register_t *gpreg_param_reg_this[] = {
 };
 
 const arch_register_t *fpreg_param_reg_std[] = {
-       &ia32_fp_regs[REG_XMM0],
-       &ia32_fp_regs[REG_XMM1],
-       &ia32_fp_regs[REG_XMM2],
-       &ia32_fp_regs[REG_XMM3],
-       &ia32_fp_regs[REG_XMM4],
-       &ia32_fp_regs[REG_XMM5],
-       &ia32_fp_regs[REG_XMM6],
-       &ia32_fp_regs[REG_XMM7]
+       &ia32_xmm_regs[REG_XMM0],
+       &ia32_xmm_regs[REG_XMM1],
+       &ia32_xmm_regs[REG_XMM2],
+       &ia32_xmm_regs[REG_XMM3],
+       &ia32_xmm_regs[REG_XMM4],
+       &ia32_xmm_regs[REG_XMM5],
+       &ia32_xmm_regs[REG_XMM6],
+       &ia32_xmm_regs[REG_XMM7]
 };
 
 const arch_register_t *fpreg_param_reg_this[] = {
        NULL,  /* in case of a "this" pointer, the first parameter must not be a float */
-       &ia32_fp_regs[REG_XMM0],
-       &ia32_fp_regs[REG_XMM1],
-       &ia32_fp_regs[REG_XMM2],
-       &ia32_fp_regs[REG_XMM3],
-       &ia32_fp_regs[REG_XMM4],
-       &ia32_fp_regs[REG_XMM5],
-       &ia32_fp_regs[REG_XMM6],
-       &ia32_fp_regs[REG_XMM7]
+       &ia32_xmm_regs[REG_XMM0],
+       &ia32_xmm_regs[REG_XMM1],
+       &ia32_xmm_regs[REG_XMM2],
+       &ia32_xmm_regs[REG_XMM3],
+       &ia32_xmm_regs[REG_XMM4],
+       &ia32_xmm_regs[REG_XMM5],
+       &ia32_xmm_regs[REG_XMM6],
+       &ia32_xmm_regs[REG_XMM7]
 };
 
 
@@ -95,7 +97,31 @@ const arch_register_t *ia32_get_firm_reg(const ir_node *irn, set *reg_set) {
        return assoc->reg;
 }
 
+void ia32_build_16bit_reg_map(pmap *reg_map) {
+       pmap_insert(reg_map, &ia32_gp_regs[REG_EAX], "ax");
+       pmap_insert(reg_map, &ia32_gp_regs[REG_EBX], "bx");
+       pmap_insert(reg_map, &ia32_gp_regs[REG_ECX], "cx");
+       pmap_insert(reg_map, &ia32_gp_regs[REG_EDX], "dx");
+       pmap_insert(reg_map, &ia32_gp_regs[REG_ESI], "si");
+       pmap_insert(reg_map, &ia32_gp_regs[REG_EDI], "di");
+       pmap_insert(reg_map, &ia32_gp_regs[REG_EBP], "bp");
+       pmap_insert(reg_map, &ia32_gp_regs[REG_ESP], "sp");
+}
+
+void ia32_build_8bit_reg_map(pmap *reg_map) {
+       pmap_insert(reg_map, &ia32_gp_regs[REG_EAX], "al");
+       pmap_insert(reg_map, &ia32_gp_regs[REG_EBX], "bl");
+       pmap_insert(reg_map, &ia32_gp_regs[REG_ECX], "cl");
+       pmap_insert(reg_map, &ia32_gp_regs[REG_EDX], "dl");
+}
+
+char *ia32_get_mapped_reg_name(pmap *reg_map, const arch_register_t *reg) {
+       pmap_entry *e = pmap_find(reg_map, (void *)reg);
+
+       assert(e && "missing map init?");
 
+       return e->value;
+}
 
 /**
  * Check all parameters and determine the maximum number of parameters
@@ -110,8 +136,11 @@ const arch_register_t *ia32_get_firm_reg(const ir_node *irn, set *reg_set) {
 int ia32_get_n_regparam_class(int n, ir_mode **modes, int *n_int, int *n_float) {
        int i, finished = 0;
 
+       *n_int   = 0;
+       *n_float = 0;
+
        for (i = 0; i < n && !finished; i++) {
-               if (mode_is_int(modes[i])) {
+               if (mode_is_int(modes[i]) || mode_is_reference(modes[i])) {
                        *n_int = *n_int + 1;
                }
                else if (mode_is_float(modes[i])) {
@@ -163,7 +192,7 @@ const arch_register_t *ia32_get_RegParam_reg(int n, ir_mode **modes, long nr, un
 
                /* loop over all parameters and determine whether its a int or float register parameter */
                for (i = 0; i < nr && !done && (cc & cc_reg_param); i++) {
-                       if (mode_is_int(modes[i]) && cur_gp_idx < maxnum_gpreg_args) {
+                       if ((mode_is_int(modes[i]) || mode_is_reference(modes[i])) && cur_gp_idx < maxnum_gpreg_args) {
                                /* param can be passed in general purpose register and we have some registers left */
                                cur_gp_idx++;
                        }
@@ -175,7 +204,7 @@ const arch_register_t *ia32_get_RegParam_reg(int n, ir_mode **modes, long nr, un
                }
 
                /* now: i == nr, that's the parameter requirement we want */
-               if (mode_is_int(modes[i]) && cur_gp_idx < maxnum_gpreg_args) {
+               if ((mode_is_int(modes[i]) || mode_is_reference(modes[i])) && cur_gp_idx < maxnum_gpreg_args) {
                        /* parameter #nr can be passed in general purpose register */
                        param_reg = current_gpreg_param_reg[i];
                }
@@ -202,7 +231,7 @@ long ia32_translate_proj_pos(const ir_node *proj) {
        long nr       = get_Proj_proj(proj);
 
        if (is_ia32_Ld(pred)) {
-               if (nr == pn_Load_res)
+               if (nr == pn_Load_res || nr == 0)
                        return 0;
                assert(0 && "unsupported Proj(Load) number");
        }
@@ -222,10 +251,11 @@ long ia32_translate_proj_pos(const ir_node *proj) {
                        return 1;
        }
        else if (is_ia32_DivMod(pred)) {
-               if (nr == pn_DivMod_res_div || pn_Div_res)
+               if (nr == pn_DivMod_res_div)
                        return 0;
-               if (nr == pn_DivMod_res_mod || pn_Mod_res)
+               if (nr == pn_DivMod_res_mod)
                        return 1;
+               assert(0 && "unsupported DivMod");
        }
        else if (is_ia32_fDiv(pred)) {
                if (nr == pn_Quot_res)