nsz Git - libfirm/blob - ir/be/mips/mips_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  * Register mapping for firm nodes. Stolen from bearch_firm :)
  22  * $Id$
  23  */
  24 #ifdef HAVE_CONFIG_H
  25 #include "config.h"
  26 #endif
  27
  28 #include <stdlib.h>
  29
  30 #include "mips_map_regs.h"
  31 #include "mips_new_nodes.h"
  32
  33 /* Mapping to store registers in firm nodes */
  34
  35 struct mips_irn_reg_assoc {
  36         const ir_node *irn;
  37         const arch_register_t *reg;
  38 };
  39
  40 int mips_cmp_irn_reg_assoc(const void *a, const void *b, size_t len) {
  41         const struct mips_irn_reg_assoc *x = a;
  42         const struct mips_irn_reg_assoc *y = b;
  43
  44         return x->irn != y->irn;
  45 }
  46
  47 static struct mips_irn_reg_assoc *get_irn_reg_assoc(const ir_node *irn, set *reg_set) {
  48         struct mips_irn_reg_assoc templ;
  49         unsigned int hash;
  50
  51         templ.irn = irn;
  52         templ.reg = NULL;
  53         hash = HASH_PTR(irn);
  54
  55         return set_insert(reg_set, &templ, sizeof(templ), hash);
  56 }
  57
  58 void mips_set_firm_reg(ir_node *irn, const arch_register_t *reg, set *reg_set) {
  59         struct mips_irn_reg_assoc *assoc = get_irn_reg_assoc(irn, reg_set);
  60         assoc->reg = reg;
  61 }
  62
  63 const arch_register_t *mips_get_firm_reg(const ir_node *irn, set *reg_set) {
  64         struct mips_irn_reg_assoc *assoc = get_irn_reg_assoc(irn, reg_set);
  65         return assoc->reg;
  66 }
  67
  68 /**
  69  * Translates the projnum into a "real" argument position for register
  70  * requirements dependend on the predecessor.
  71  */
  72 long mips_translate_proj_pos(const ir_node *proj) {
  73         return get_Proj_proj(proj);
  74 }