Implement binary emitter for Perm.
[libfirm] / ir / be / mips / mips_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  * @author  Matthias Braun, Mehdi
24  * @version $Id$
25  */
26 #include "config.h"
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 size) {
41         const struct mips_irn_reg_assoc *x = a;
42         const struct mips_irn_reg_assoc *y = b;
43         (void) size;
44
45         return x->irn != y->irn;
46 }
47
48 static struct mips_irn_reg_assoc *get_irn_reg_assoc(const ir_node *irn, set *reg_set) {
49         struct mips_irn_reg_assoc templ;
50         unsigned int hash;
51
52         templ.irn = irn;
53         templ.reg = NULL;
54         hash = HASH_PTR(irn);
55
56         return set_insert(reg_set, &templ, sizeof(templ), hash);
57 }
58
59 void mips_set_firm_reg(ir_node *irn, const arch_register_t *reg, set *reg_set) {
60         struct mips_irn_reg_assoc *assoc = get_irn_reg_assoc(irn, reg_set);
61         assoc->reg = reg;
62 }
63
64 const arch_register_t *mips_get_firm_reg(const ir_node *irn, set *reg_set) {
65         struct mips_irn_reg_assoc *assoc = get_irn_reg_assoc(irn, reg_set);
66         return assoc->reg;
67 }
68
69 /**
70  * Translates the projnum into a "real" argument position for register
71  * requirements dependend on the predecessor.
72  */
73 long mips_translate_proj_pos(const ir_node *proj) {
74         return get_Proj_proj(proj);
75 }