nsz Git - libfirm/blob - ir/be/arm/arm_map_regs.c

   1 /*
   2  * Copyright (C) 1995-2007 University of Karlsruhe.  All right reserved.
   3  *
   4  * This file is part of libFirm.
   5  *
   6  * This file may be distributed and/or modified under the terms of the
   7  * GNU General Public License version 2 as published by the Free Software
   8  * Foundation and appearing in the file LICENSE.GPL included in the
   9  * packaging of this file.
  10  *
  11  * Licensees holding valid libFirm Professional Edition licenses may use
  12  * this file in accordance with the libFirm Commercial License.
  13  * Agreement provided with the Software.
  14  *
  15  * This file is provided AS IS with NO WARRANTY OF ANY KIND, INCLUDING THE
  16  * WARRANTY OF DESIGN, MERCHANTABILITY AND FITNESS FOR A PARTICULAR
  17  * PURPOSE.
  18  */
  19
  20 /**
  21  * @file
  22  * @brief   Register mapping for firm nodes. Stolen from bearch_firm :)
  23  * @author  Oliver Richter, Tobias Gneist
  24  * @version $Id$
  25  */
  26 #ifdef HAVE_CONFIG_H
  27 #include "config.h"
  28 #endif
  29
  30 #include <stdlib.h>
  31
  32 #include "arm_map_regs.h"
  33 #include "arm_new_nodes.h"
  34
  35 #include "gen_arm_regalloc_if.h"
  36
  37
  38 static const arch_register_t *gpreg_param_reg_std[] = {
  39         &arm_gp_regs[REG_R0],
  40         &arm_gp_regs[REG_R1],
  41         &arm_gp_regs[REG_R2],
  42         &arm_gp_regs[REG_R3],
  43 };
  44
  45 const arch_register_t *arm_get_RegParam_reg(int n) {
  46         assert(n < 4 && n >=0 && "register param > 3 angefordert");
  47         return gpreg_param_reg_std[n];
  48 }
  49
  50 /* Mapping to store registers in firm nodes */
  51
  52 struct arm_irn_reg_assoc {
  53         const ir_node *irn;
  54         const arch_register_t *reg;
  55 };
  56
  57 int arm_cmp_irn_reg_assoc(const void *a, const void *b, size_t len) {
  58         const struct arm_irn_reg_assoc *x = a;
  59         const struct arm_irn_reg_assoc *y = b;
  60
  61         return x->irn != y->irn;
  62 }
  63
  64 static struct arm_irn_reg_assoc *get_irn_reg_assoc(const ir_node *irn, set *reg_set) {
  65         struct arm_irn_reg_assoc templ;
  66         unsigned int hash;
  67
  68         templ.irn = irn;
  69         templ.reg = NULL;
  70         hash = HASH_PTR(irn);
  71
  72         return set_insert(reg_set, &templ, sizeof(templ), hash);
  73 }
  74
  75 void arm_set_firm_reg(ir_node *irn, const arch_register_t *reg, set *reg_set) {
  76         struct arm_irn_reg_assoc *assoc = get_irn_reg_assoc(irn, reg_set);
  77         assoc->reg = reg;
  78 }
  79
  80 const arch_register_t *arm_get_firm_reg(const ir_node *irn, set *reg_set) {
  81         struct arm_irn_reg_assoc *assoc = get_irn_reg_assoc(irn, reg_set);
  82         return assoc->reg;
  83 }
  84
  85
  86
  87 /**
  88  * Translates the proj number into a "real" argument position for register
  89  * requirements depended on the predecessor.
  90  */
  91 long arm_translate_proj_pos(const ir_node *proj) {
  92         ir_node *pred = get_Proj_pred(proj);
  93         long nr       = get_Proj_proj(proj);
  94
  95         if (is_irn_machine_op(pred)) {
  96                 switch (get_arm_irn_opcode(pred)) {
  97
  98                 case iro_arm_Loadb:
  99                 case iro_arm_Loadbs:
 100                 case iro_arm_Loadh:
 101                 case iro_arm_Loadhs:
 102                 case iro_arm_Load:
 103                 case iro_arm_fpaLdf:
 104                         if (nr == pn_Load_res)
 105                                 return 0;
 106                         assert(0 && "unsupported Proj(Load) number");
 107                         break;
 108                 case iro_arm_Storeb:
 109                 case iro_arm_Storebs:
 110                 case iro_arm_Storeh:
 111                 case iro_arm_Storehs:
 112                 case iro_arm_Store:
 113                 case iro_arm_fpaStf:
 114                         return 0;
 115                 case iro_arm_fpaDiv:
 116                 case iro_arm_fpaRdv:
 117                         if (nr == pn_Quot_res)
 118                                 return 0;
 119                         assert(0 && "there should be no more Projs for a fDiv");
 120                         break;
 121                 default:
 122                         break;
 123                 }
 124         }
 125
 126 //      assert(0 && "unsupported Proj(X)");
 127         return nr;
 128 }