nsz Git - libfirm/blob - ir/be/TEMPLATE/TEMPLATE_map_regs.c

   1 /*
   2  * Copyright (C) 1995-2008 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  * @version $Id$
  24  */
  25 #ifdef HAVE_CONFIG_H
  26 #include "config.h"
  27 #endif
  28
  29 #include <stdlib.h>
  30
  31 #include "TEMPLATE_map_regs.h"
  32 #include "TEMPLATE_new_nodes.h"
  33
  34 /* Mapping to store registers in firm nodes */
  35
  36 struct TEMPLATE_irn_reg_assoc {
  37         const ir_node *irn;
  38         const arch_register_t *reg;
  39 };
  40
  41 int TEMPLATE_cmp_irn_reg_assoc(const void *a, const void *b, size_t size) {
  42         const struct TEMPLATE_irn_reg_assoc *x = a;
  43         const struct TEMPLATE_irn_reg_assoc *y = b;
  44         (void) size;
  45
  46         return x->irn != y->irn;
  47 }
  48
  49 static struct TEMPLATE_irn_reg_assoc *get_irn_reg_assoc(const ir_node *irn, set *reg_set) {
  50         struct TEMPLATE_irn_reg_assoc templ;
  51         unsigned int hash;
  52
  53         templ.irn = irn;
  54         templ.reg = NULL;
  55         hash = HASH_PTR(irn);
  56
  57         return set_insert(reg_set, &templ, sizeof(templ), hash);
  58 }
  59
  60 void TEMPLATE_set_firm_reg(ir_node *irn, const arch_register_t *reg, set *reg_set) {
  61         struct TEMPLATE_irn_reg_assoc *assoc = get_irn_reg_assoc(irn, reg_set);
  62         assoc->reg = reg;
  63 }
  64
  65 const arch_register_t *TEMPLATE_get_firm_reg(const ir_node *irn, set *reg_set) {
  66         struct TEMPLATE_irn_reg_assoc *assoc = get_irn_reg_assoc(irn, reg_set);
  67         return assoc->reg;
  68 }
  69
  70
  71
  72 /**
  73  * Translates the projnum into a "real" argument position for register
  74  * requirements dependend on the predecessor.
  75  */
  76 long TEMPLATE_translate_proj_pos(const ir_node *proj) {
  77         ir_node *pred = get_Proj_pred(proj);
  78         long nr       = get_Proj_proj(proj);
  79
  80         if (is_TEMPLATE_Load(pred)) {
  81                 if (nr == pn_Load_res)
  82                         return 0;
  83                 assert(0 && "unsupported Proj(Load) number");
  84         }
  85         else if (is_TEMPLATE_Store(pred)) {
  86                 return 0;
  87         }
  88         else if (is_TEMPLATE_fDiv(pred)) {
  89                 if (nr == pn_Quot_res)
  90                         return 0;
  91                 else
  92                         assert(0 && "there should be no more Projs for a fDiv");
  93         }
  94
  95 //      assert(0 && "unsupported Proj(X)");
  96         return nr;
  97 }