Commit | Line | Data |
---|---|---|
ab0bd049 DE |
1 | /* Generic opcode table support for targets using CGEN. -*- C -*- |
2 | CGEN: Cpu tools GENerator | |
3 | ||
4 | This file is used to generate @arch@-opc.c. | |
5 | ||
6 | Copyright (C) 1998 Free Software Foundation, Inc. | |
7 | ||
8 | This file is part of the GNU Binutils and GDB, the GNU debugger. | |
9 | ||
10 | This program is free software; you can redistribute it and/or modify | |
11 | it under the terms of the GNU General Public License as published by | |
12 | the Free Software Foundation; either version 2, or (at your option) | |
13 | any later version. | |
14 | ||
15 | This program is distributed in the hope that it will be useful, | |
16 | but WITHOUT ANY WARRANTY; without even the implied warranty of | |
17 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
18 | GNU General Public License for more details. | |
19 | ||
20 | You should have received a copy of the GNU General Public License | |
21 | along with this program; if not, write to the Free Software | |
22 | Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ | |
23 | ||
24 | #include "sysdep.h" | |
25 | #include <stdio.h> | |
26 | #include "ansidecl.h" | |
27 | #include "libiberty.h" | |
28 | #include "bfd.h" | |
29 | #include "symcat.h" | |
30 | #include "@arch@-opc.h" | |
31 | ||
32 | /* Look up instruction INSN_VALUE and extract its fields. | |
33 | If non-null INSN is the insn table entry. | |
34 | Otherwise INSN_VALUE is examined to compute it. | |
35 | LENGTH is the bit length of INSN_VALUE if known, otherwise 0. | |
36 | The result a pointer to the insn table entry, or NULL if the instruction | |
37 | wasn't recognized. */ | |
38 | ||
39 | const CGEN_INSN * | |
40 | @arch@_cgen_lookup_insn (insn, insn_value, length, fields) | |
41 | const CGEN_INSN *insn; | |
42 | cgen_insn_t insn_value; | |
43 | int length; | |
44 | CGEN_FIELDS *fields; | |
45 | { | |
46 | char buf[4]; | |
47 | ||
48 | if (!insn) | |
49 | { | |
50 | const CGEN_INSN_LIST *insn_list; | |
51 | ||
52 | #ifdef CGEN_INT_INSN | |
53 | switch (length) | |
54 | { | |
55 | case 8: | |
56 | buf[0] = insn_value; | |
57 | break; | |
58 | case 16: | |
59 | if (cgen_current_endian == CGEN_ENDIAN_BIG) | |
60 | bfd_putb16 (insn_value, buf); | |
61 | else | |
62 | bfd_putl16 (insn_value, buf); | |
63 | break; | |
64 | case 32: | |
65 | if (cgen_current_endian == CGEN_ENDIAN_BIG) | |
66 | bfd_putb32 (insn_value, buf); | |
67 | else | |
68 | bfd_putl32 (insn_value, buf); | |
69 | break; | |
70 | default: | |
71 | abort (); | |
72 | } | |
73 | #else | |
74 | abort (); /* FIXME: unfinished */ | |
75 | #endif | |
76 | ||
77 | /* The instructions are stored in hash lists. | |
78 | Pick the first one and keep trying until we find the right one. */ | |
79 | ||
80 | insn_list = CGEN_DIS_LOOKUP_INSN (buf, insn_value); | |
81 | while (insn_list != NULL) | |
82 | { | |
83 | insn = insn_list->insn; | |
84 | ||
85 | /* Basic bit mask must be correct. */ | |
86 | /* ??? May wish to allow target to defer this check until the extract | |
87 | handler. */ | |
88 | if ((insn_value & CGEN_INSN_MASK (insn)) == CGEN_INSN_VALUE (insn)) | |
89 | { | |
90 | length = (*CGEN_EXTRACT_FN (insn)) (insn, NULL, insn_value, fields); | |
91 | if (length > 0) | |
92 | return insn; | |
93 | } | |
94 | ||
95 | insn_list = CGEN_DIS_NEXT_INSN (insn_list); | |
96 | } | |
97 | } | |
98 | else | |
99 | { | |
100 | length = (*CGEN_EXTRACT_FN (insn)) (insn, NULL, insn_value, fields); | |
101 | if (length > 0) | |
102 | return insn; | |
103 | } | |
104 | ||
105 | return NULL; | |
106 | } | |
107 | ||
108 | /* Fill in the operand instances used by insn INSN_VALUE. | |
109 | If non-null INS is the insn table entry. | |
110 | Otherwise INSN_VALUE is examined to compute it. | |
111 | LENGTH is the number of bits in INSN_VALUE if known, otherwise 0. | |
112 | INDICES is a pointer to a buffer of MAX_OPERANDS ints to be filled in. | |
113 | The result a pointer to the insn table entry, or NULL if the instruction | |
114 | wasn't recognized. */ | |
115 | ||
116 | const CGEN_INSN * | |
117 | @arch@_cgen_get_insn_operands (insn, insn_value, length, indices) | |
118 | const CGEN_INSN *insn; | |
119 | cgen_insn_t insn_value; | |
120 | int length; | |
121 | int *indices; | |
122 | { | |
123 | CGEN_FIELDS fields; | |
124 | const CGEN_OPERAND_INSTANCE *opinst; | |
125 | int i; | |
126 | ||
127 | insn = @arch@_cgen_lookup_insn (insn, insn_value, length, &fields); | |
128 | if (! insn) | |
129 | return NULL; | |
130 | ||
131 | for (i = 0, opinst = CGEN_INSN_OPERANDS (insn); | |
132 | CGEN_OPERAND_INSTANCE_TYPE (opinst) != CGEN_OPERAND_INSTANCE_END; | |
133 | ++i, ++opinst) | |
134 | { | |
135 | const CGEN_OPERAND *op = CGEN_OPERAND_INSTANCE_OPERAND (opinst); | |
136 | if (op == NULL) | |
137 | indices[i] = CGEN_OPERAND_INSTANCE_INDEX (opinst); | |
138 | else | |
139 | indices[i] = @arch@_cgen_get_operand (CGEN_OPERAND_INDEX (op), &fields); | |
140 | } | |
141 | ||
142 | return insn; | |
143 | } |