Commit | Line | Data |
---|---|---|
a85d7ed0 | 1 | /* s390-opc.c -- S390 opcode list |
9b201bb5 | 2 | Copyright 2000, 2001, 2003, 2007 Free Software Foundation, Inc. |
a85d7ed0 NC |
3 | Contributed by Martin Schwidefsky (schwidefsky@de.ibm.com). |
4 | ||
9b201bb5 | 5 | This file is part of the GNU opcodes library. |
a85d7ed0 | 6 | |
9b201bb5 | 7 | This library is free software; you can redistribute it and/or modify |
a85d7ed0 | 8 | it under the terms of the GNU General Public License as published by |
9b201bb5 NC |
9 | the Free Software Foundation; either version 3, or (at your option) |
10 | any later version. | |
a85d7ed0 | 11 | |
9b201bb5 NC |
12 | It is distributed in the hope that it will be useful, but WITHOUT |
13 | ANY WARRANTY; without even the implied warranty of MERCHANTABILITY | |
14 | or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public | |
15 | License for more details. | |
a85d7ed0 NC |
16 | |
17 | You should have received a copy of the GNU General Public License | |
9b201bb5 NC |
18 | along with this file; see the file COPYING. If not, write to the |
19 | Free Software Foundation, 51 Franklin Street - Fifth Floor, Boston, | |
20 | MA 02110-1301, USA. */ | |
a85d7ed0 NC |
21 | |
22 | #include <stdio.h> | |
23 | #include "ansidecl.h" | |
24 | #include "opcode/s390.h" | |
25 | ||
26 | /* This file holds the S390 opcode table. The opcode table | |
27 | includes almost all of the extended instruction mnemonics. This | |
28 | permits the disassembler to use them, and simplifies the assembler | |
29 | logic, at the cost of increasing the table size. The table is | |
30 | strictly constant data, so the compiler should be able to put it in | |
31 | the .text section. | |
32 | ||
33 | This file also holds the operand table. All knowledge about | |
34 | inserting operands into instructions and vice-versa is kept in this | |
35 | file. */ | |
36 | ||
37 | /* The operands table. | |
38 | The fields are bits, shift, insert, extract, flags. */ | |
39 | ||
40 | const struct s390_operand s390_operands[] = | |
41 | { | |
42 | #define UNUSED 0 | |
43 | { 0, 0, 0 }, /* Indicates the end of the operand list */ | |
44 | ||
5746fb46 AK |
45 | /* General purpose register operands. */ |
46 | ||
a85d7ed0 NC |
47 | #define R_8 1 /* GPR starting at position 8 */ |
48 | { 4, 8, S390_OPERAND_GPR }, | |
49 | #define R_12 2 /* GPR starting at position 12 */ | |
355d475e | 50 | { 4, 12, S390_OPERAND_GPR }, |
a85d7ed0 | 51 | #define R_16 3 /* GPR starting at position 16 */ |
355d475e | 52 | { 4, 16, S390_OPERAND_GPR }, |
a85d7ed0 | 53 | #define R_20 4 /* GPR starting at position 20 */ |
355d475e | 54 | { 4, 20, S390_OPERAND_GPR }, |
a85d7ed0 | 55 | #define R_24 5 /* GPR starting at position 24 */ |
355d475e | 56 | { 4, 24, S390_OPERAND_GPR }, |
a85d7ed0 | 57 | #define R_28 6 /* GPR starting at position 28 */ |
355d475e | 58 | { 4, 28, S390_OPERAND_GPR }, |
5746fb46 AK |
59 | #define RO_28 7 /* optional GPR starting at position 28 */ |
60 | { 4, 28, (S390_OPERAND_GPR | S390_OPERAND_OPTIONAL) }, | |
61 | #define R_32 8 /* GPR starting at position 32 */ | |
a85d7ed0 NC |
62 | { 4, 32, S390_OPERAND_GPR }, |
63 | ||
5746fb46 AK |
64 | /* Floating point register operands. */ |
65 | ||
66 | #define F_8 9 /* FPR starting at position 8 */ | |
a85d7ed0 | 67 | { 4, 8, S390_OPERAND_FPR }, |
5746fb46 | 68 | #define F_12 10 /* FPR starting at position 12 */ |
a85d7ed0 | 69 | { 4, 12, S390_OPERAND_FPR }, |
5746fb46 | 70 | #define F_16 11 /* FPR starting at position 16 */ |
a85d7ed0 | 71 | { 4, 16, S390_OPERAND_FPR }, |
5746fb46 | 72 | #define F_20 12 /* FPR starting at position 16 */ |
a85d7ed0 | 73 | { 4, 16, S390_OPERAND_FPR }, |
5746fb46 | 74 | #define F_24 13 /* FPR starting at position 24 */ |
a85d7ed0 | 75 | { 4, 24, S390_OPERAND_FPR }, |
5746fb46 | 76 | #define F_28 14 /* FPR starting at position 28 */ |
a85d7ed0 | 77 | { 4, 28, S390_OPERAND_FPR }, |
5746fb46 | 78 | #define F_32 15 /* FPR starting at position 32 */ |
a85d7ed0 NC |
79 | { 4, 32, S390_OPERAND_FPR }, |
80 | ||
5746fb46 AK |
81 | /* Access register operands. */ |
82 | ||
83 | #define A_8 16 /* Access reg. starting at position 8 */ | |
a85d7ed0 | 84 | { 4, 8, S390_OPERAND_AR }, |
5746fb46 | 85 | #define A_12 17 /* Access reg. starting at position 12 */ |
a85d7ed0 | 86 | { 4, 12, S390_OPERAND_AR }, |
5746fb46 | 87 | #define A_24 18 /* Access reg. starting at position 24 */ |
a85d7ed0 | 88 | { 4, 24, S390_OPERAND_AR }, |
5746fb46 | 89 | #define A_28 19 /* Access reg. starting at position 28 */ |
a85d7ed0 NC |
90 | { 4, 28, S390_OPERAND_AR }, |
91 | ||
5746fb46 AK |
92 | /* Control register operands. */ |
93 | ||
94 | #define C_8 20 /* Control reg. starting at position 8 */ | |
a85d7ed0 | 95 | { 4, 8, S390_OPERAND_CR }, |
5746fb46 | 96 | #define C_12 21 /* Control reg. starting at position 12 */ |
a85d7ed0 NC |
97 | { 4, 12, S390_OPERAND_CR }, |
98 | ||
5746fb46 AK |
99 | /* Base register operands. */ |
100 | ||
101 | #define B_16 22 /* Base register starting at position 16 */ | |
355d475e | 102 | { 4, 16, S390_OPERAND_BASE|S390_OPERAND_GPR }, |
5746fb46 | 103 | #define B_32 23 /* Base register starting at position 32 */ |
355d475e | 104 | { 4, 32, S390_OPERAND_BASE|S390_OPERAND_GPR }, |
a85d7ed0 | 105 | |
5746fb46 | 106 | #define X_12 24 /* Index register starting at position 12 */ |
355d475e | 107 | { 4, 12, S390_OPERAND_INDEX|S390_OPERAND_GPR }, |
a85d7ed0 | 108 | |
5746fb46 AK |
109 | /* Address displacement operands. */ |
110 | ||
111 | #define D_20 25 /* Displacement starting at position 20 */ | |
355d475e | 112 | { 12, 20, S390_OPERAND_DISP }, |
5746fb46 | 113 | #define D_36 26 /* Displacement starting at position 36 */ |
355d475e | 114 | { 12, 36, S390_OPERAND_DISP }, |
5746fb46 | 115 | #define D20_20 27 /* 20 bit displacement starting at 20 */ |
bac02689 | 116 | { 20, 20, S390_OPERAND_DISP|S390_OPERAND_SIGNED }, |
a85d7ed0 | 117 | |
5746fb46 AK |
118 | /* Length operands. */ |
119 | ||
120 | #define L4_8 28 /* 4 bit length starting at position 8 */ | |
355d475e | 121 | { 4, 8, S390_OPERAND_LENGTH }, |
5746fb46 | 122 | #define L4_12 29 /* 4 bit length starting at position 12 */ |
a85d7ed0 | 123 | { 4, 12, S390_OPERAND_LENGTH }, |
5746fb46 | 124 | #define L8_8 30 /* 8 bit length starting at position 8 */ |
355d475e | 125 | { 8, 8, S390_OPERAND_LENGTH }, |
a85d7ed0 | 126 | |
5746fb46 AK |
127 | /* Signed immediate operands. */ |
128 | ||
129 | #define I8_8 31 /* 8 bit signed value starting at 8 */ | |
130 | { 8, 8, S390_OPERAND_SIGNED }, | |
131 | #define I8_32 32 /* 8 bit signed value starting at 32 */ | |
132 | { 8, 32, S390_OPERAND_SIGNED }, | |
133 | #define I16_16 33 /* 16 bit signed value starting at 16 */ | |
134 | { 16, 16, S390_OPERAND_SIGNED }, | |
135 | #define I16_32 34 /* 16 bit signed value starting at 32 */ | |
136 | { 16, 32, S390_OPERAND_SIGNED }, | |
137 | #define I32_16 35 /* 32 bit signed value starting at 16 */ | |
138 | { 32, 16, S390_OPERAND_SIGNED }, | |
139 | ||
140 | /* Unsigned immediate operands. */ | |
141 | ||
142 | #define U4_8 36 /* 4 bit unsigned value starting at 8 */ | |
a85d7ed0 | 143 | { 4, 8, 0 }, |
5746fb46 | 144 | #define U4_12 37 /* 4 bit unsigned value starting at 12 */ |
a85d7ed0 | 145 | { 4, 12, 0 }, |
5746fb46 | 146 | #define U4_16 38 /* 4 bit unsigned value starting at 16 */ |
a85d7ed0 | 147 | { 4, 16, 0 }, |
5746fb46 | 148 | #define U4_20 39 /* 4 bit unsigned value starting at 20 */ |
a85d7ed0 | 149 | { 4, 20, 0 }, |
5746fb46 AK |
150 | #define U4_32 40 /* 4 bit unsigned value starting at 32 */ |
151 | { 4, 32, 0 }, | |
152 | #define U8_8 41 /* 8 bit unsigned value starting at 8 */ | |
355d475e | 153 | { 8, 8, 0 }, |
5746fb46 | 154 | #define U8_16 42 /* 8 bit unsigned value starting at 16 */ |
a85d7ed0 | 155 | { 8, 16, 0 }, |
5746fb46 AK |
156 | #define U8_24 43 /* 8 bit unsigned value starting at 24 */ |
157 | { 8, 24, 0 }, | |
158 | #define U8_32 44 /* 8 bit unsigned value starting at 32 */ | |
159 | { 8, 32, 0 }, | |
160 | #define U16_16 45 /* 16 bit unsigned value starting at 16 */ | |
355d475e | 161 | { 16, 16, 0 }, |
5746fb46 AK |
162 | #define U16_32 46 /* 16 bit unsigned value starting at 32 */ |
163 | { 16, 32, 0 }, | |
164 | #define U32_16 47 /* 32 bit unsigned value starting at 16 */ | |
165 | { 32, 16, 0 }, | |
166 | ||
167 | /* PC-relative address operands. */ | |
168 | ||
169 | #define J16_16 48 /* PC relative jump offset at 16 */ | |
355d475e | 170 | { 16, 16, S390_OPERAND_PCREL }, |
5746fb46 | 171 | #define J32_16 49 /* PC relative long offset at 16 */ |
ad101263 | 172 | { 32, 16, S390_OPERAND_PCREL }, |
5746fb46 AK |
173 | |
174 | /* Conditional mask operands. */ | |
175 | ||
176 | #define M_16 50 /* 4 bit optional mask starting at 16 */ | |
b8e55848 | 177 | { 4, 16, S390_OPERAND_OPTIONAL }, |
b8e55848 | 178 | |
a85d7ed0 NC |
179 | }; |
180 | ||
181 | ||
182 | /* Macros used to form opcodes. */ | |
183 | ||
b6849f55 | 184 | /* 8/16/48 bit opcodes. */ |
a85d7ed0 | 185 | #define OP8(x) { x, 0x00, 0x00, 0x00, 0x00, 0x00 } |
82b66b23 NC |
186 | #define OP16(x) { x >> 8, x & 255, 0x00, 0x00, 0x00, 0x00 } |
187 | #define OP48(x) { x >> 40, (x >> 32) & 255, (x >> 24) & 255, \ | |
188 | (x >> 16) & 255, (x >> 8) & 255, x & 255} | |
a85d7ed0 | 189 | |
b6849f55 NC |
190 | /* The new format of the INSTR_x_y and MASK_x_y defines is based |
191 | on the following rules: | |
192 | 1) the middle part of the definition (x in INSTR_x_y) is the official | |
193 | names of the instruction format that you can find in the principals | |
194 | of operation. | |
195 | 2) the last part of the definition (y in INSTR_x_y) gives you an idea | |
196 | which operands the binary represenation of the instruction has. | |
197 | The meanings of the letters in y are: | |
198 | a - access register | |
199 | c - control register | |
200 | d - displacement, 12 bit | |
201 | f - floating pointer register | |
ad101263 | 202 | i - signed integer, 4, 8, 16 or 32 bit |
b6849f55 NC |
203 | l - length, 4 or 8 bit |
204 | p - pc relative | |
205 | r - general purpose register | |
ad101263 MS |
206 | u - unsigned integer, 4, 8, 16 or 32 bit |
207 | m - mode field, 4 bit | |
b6849f55 NC |
208 | 0 - operand skipped. |
209 | The order of the letters reflects the layout of the format in | |
210 | storage and not the order of the paramaters of the instructions. | |
211 | The use of the letters is not a 100% match with the PoP but it is | |
212 | quite close. | |
213 | ||
214 | For example the instruction "mvo" is defined in the PoP as follows: | |
215 | ||
216 | MVO D1(L1,B1),D2(L2,B2) [SS] | |
217 | ||
218 | -------------------------------------- | |
219 | | 'F1' | L1 | L2 | B1 | D1 | B2 | D2 | | |
220 | -------------------------------------- | |
221 | 0 8 12 16 20 32 36 | |
222 | ||
223 | The instruction format is: INSTR_SS_LLRDRD / MASK_SS_LLRDRD. */ | |
224 | ||
225 | #define INSTR_E 2, { 0,0,0,0,0,0 } /* e.g. pr */ | |
226 | #define INSTR_RIE_RRP 6, { R_8,R_12,J16_16,0,0,0 } /* e.g. brxhg */ | |
5746fb46 AK |
227 | #define INSTR_RIE_RRPU 6, { R_8,R_12,U4_32,J16_16,0,0 } /* e.g. crj */ |
228 | #define INSTR_RIE_RRP0 6, { R_8,R_12,J16_16,0,0,0 } /* e.g. crjne */ | |
229 | #define INSTR_RIE_RUPI 6, { R_8,I8_32,U4_12,J16_16,0,0 } /* e.g. cij */ | |
230 | #define INSTR_RIE_R0PI 6, { R_8,I8_32,J16_16,0,0,0 } /* e.g. cijne */ | |
231 | #define INSTR_RIE_RUPU 6, { R_8,U8_32,U4_12,J16_16,0,0 } /* e.g. clij */ | |
232 | #define INSTR_RIE_R0PU 6, { R_8,U8_32,J16_16,0,0,0 } /* e.g. clijne */ | |
233 | #define INSTR_RIE_R0IU 6, { R_8,I16_16,U4_32,0,0,0 } /* e.g. cit */ | |
234 | #define INSTR_RIE_R0I0 6, { R_8,I16_16,0,0,0,0 } /* e.g. citne */ | |
235 | #define INSTR_RIE_R0UU 6, { R_8,U16_16,U4_32,0,0,0 } /* e.g. clfit */ | |
236 | #define INSTR_RIE_R0U0 6, { R_8,U16_16,0,0,0,0 } /* e.g. clfitne */ | |
237 | #define INSTR_RIE_RRUUU 6, { R_8,R_12,U8_16,U8_24,U8_32,0 } /* e.g. rnsbg */ | |
b6849f55 NC |
238 | #define INSTR_RIL_0P 6, { J32_16,0,0,0,0 } /* e.g. jg */ |
239 | #define INSTR_RIL_RP 6, { R_8,J32_16,0,0,0,0 } /* e.g. brasl */ | |
240 | #define INSTR_RIL_UP 6, { U4_8,J32_16,0,0,0,0 } /* e.g. brcl */ | |
ad101263 MS |
241 | #define INSTR_RIL_RI 6, { R_8,I32_16,0,0,0,0 } /* e.g. afi */ |
242 | #define INSTR_RIL_RU 6, { R_8,U32_16,0,0,0,0 } /* e.g. alfi */ | |
b6849f55 NC |
243 | #define INSTR_RI_0P 4, { J16_16,0,0,0,0,0 } /* e.g. j */ |
244 | #define INSTR_RI_RI 4, { R_8,I16_16,0,0,0,0 } /* e.g. ahi */ | |
245 | #define INSTR_RI_RP 4, { R_8,J16_16,0,0,0,0 } /* e.g. brct */ | |
246 | #define INSTR_RI_RU 4, { R_8,U16_16,0,0,0,0 } /* e.g. tml */ | |
247 | #define INSTR_RI_UP 4, { U4_8,J16_16,0,0,0,0 } /* e.g. brc */ | |
5746fb46 AK |
248 | #define INSTR_RIS_RURDI 6, { R_8,I8_32,U4_12,D_20,B_16,0 } /* e.g. cib */ |
249 | #define INSTR_RIS_R0RDI 6, { R_8,I8_32,D_20,B_16,0,0 } /* e.g. cibne */ | |
250 | #define INSTR_RIS_RURDU 6, { R_8,U8_32,U4_12,D_20,B_16,0 } /* e.g. clib */ | |
251 | #define INSTR_RIS_R0RDU 6, { R_8,U8_32,D_20,B_16,0,0 } /* e.g. clibne*/ | |
b6849f55 NC |
252 | #define INSTR_RRE_00 4, { 0,0,0,0,0,0 } /* e.g. palb */ |
253 | #define INSTR_RRE_0R 4, { R_28,0,0,0,0,0 } /* e.g. tb */ | |
254 | #define INSTR_RRE_AA 4, { A_24,A_28,0,0,0,0 } /* e.g. cpya */ | |
255 | #define INSTR_RRE_AR 4, { A_24,R_28,0,0,0,0 } /* e.g. sar */ | |
256 | #define INSTR_RRE_F0 4, { F_24,0,0,0,0,0 } /* e.g. sqer */ | |
257 | #define INSTR_RRE_FF 4, { F_24,F_28,0,0,0,0 } /* e.g. debr */ | |
258 | #define INSTR_RRE_R0 4, { R_24,0,0,0,0,0 } /* e.g. ipm */ | |
259 | #define INSTR_RRE_RA 4, { R_24,A_28,0,0,0,0 } /* e.g. ear */ | |
260 | #define INSTR_RRE_RF 4, { R_24,F_28,0,0,0,0 } /* e.g. cefbr */ | |
261 | #define INSTR_RRE_RR 4, { R_24,R_28,0,0,0,0 } /* e.g. lura */ | |
b5639b37 | 262 | #define INSTR_RRE_FR 4, { F_24,R_28,0,0,0,0 } /* e.g. ldgr */ |
b8e55848 MS |
263 | /* Actually efpc and sfpc do not take an optional operand. |
264 | This is just a workaround for existing code e.g. glibc. */ | |
265 | #define INSTR_RRE_RR_OPT 4, { R_24,RO_28,0,0,0,0 } /* efpc, sfpc */ | |
b6849f55 | 266 | #define INSTR_RRF_F0FF 4, { F_16,F_24,F_28,0,0,0 } /* e.g. madbr */ |
b5639b37 MS |
267 | #define INSTR_RRF_F0FF2 4, { F_24,F_16,F_28,0,0,0 } /* e.g. cpsdr */ |
268 | #define INSTR_RRF_F0FR 4, { F_24,F_16,R_28,0,0,0 } /* e.g. iedtr */ | |
b6849f55 NC |
269 | #define INSTR_RRF_FUFF 4, { F_24,F_16,F_28,U4_20,0,0 } /* e.g. didbr */ |
270 | #define INSTR_RRF_RURR 4, { R_24,R_28,R_16,U4_20,0,0 } /* e.g. .insn */ | |
725a9891 | 271 | #define INSTR_RRF_R0RR 4, { R_24,R_16,R_28,0,0,0 } /* e.g. idte */ |
929e4d1a MS |
272 | #define INSTR_RRF_U0FF 4, { F_24,U4_16,F_28,0,0,0 } /* e.g. fixr */ |
273 | #define INSTR_RRF_U0RF 4, { R_24,U4_16,F_28,0,0,0 } /* e.g. cfebr */ | |
b5639b37 MS |
274 | #define INSTR_RRF_UUFF 4, { F_24,U4_16,F_28,U4_20,0,0 } /* e.g. fidtr */ |
275 | #define INSTR_RRF_0UFF 4, { F_24,F_28,U4_20,0,0,0 } /* e.g. ldetr */ | |
276 | #define INSTR_RRF_FFFU 4, { F_24,F_16,F_28,U4_20,0,0 } /* e.g. qadtr */ | |
ad101263 | 277 | #define INSTR_RRF_M0RR 4, { R_24,R_28,M_16,0,0,0 } /* e.g. sske */ |
5746fb46 AK |
278 | #define INSTR_RRF_U0RR 4, { R_24,R_28,U4_16,0,0,0 } /* e.g. clrt */ |
279 | #define INSTR_RRF_00RR 4, { R_24,R_28,0,0,0,0 } /* e.g. clrtne */ | |
b6849f55 NC |
280 | #define INSTR_RR_0R 2, { R_12, 0,0,0,0,0 } /* e.g. br */ |
281 | #define INSTR_RR_FF 2, { F_8,F_12,0,0,0,0 } /* e.g. adr */ | |
282 | #define INSTR_RR_R0 2, { R_8, 0,0,0,0,0 } /* e.g. spm */ | |
283 | #define INSTR_RR_RR 2, { R_8,R_12,0,0,0,0 } /* e.g. lr */ | |
284 | #define INSTR_RR_U0 2, { U8_8, 0,0,0,0,0 } /* e.g. svc */ | |
285 | #define INSTR_RR_UR 2, { U4_8,R_12,0,0,0,0 } /* e.g. bcr */ | |
b5639b37 | 286 | #define INSTR_RRR_F0FF 4, { F_24,F_28,F_16,0,0,0 } /* e.g. ddtr */ |
5746fb46 AK |
287 | #define INSTR_RRS_RRRDU 6, { R_8,R_12,U4_32,D_20,B_16 } /* e.g. crb */ |
288 | #define INSTR_RRS_RRRD0 6, { R_8,R_12,D_20,B_16,0 } /* e.g. crbne */ | |
b6849f55 | 289 | #define INSTR_RSE_RRRD 6, { R_8,R_12,D_20,B_16,0,0 } /* e.g. lmh */ |
ad101263 | 290 | #define INSTR_RSE_CCRD 6, { C_8,C_12,D_20,B_16,0,0 } /* e.g. lmh */ |
b6849f55 | 291 | #define INSTR_RSE_RURD 6, { R_8,U4_12,D_20,B_16,0,0 } /* e.g. icmh */ |
98c3d905 | 292 | #define INSTR_RSL_R0RD 6, { D_20,L4_8,B_16,0,0,0 } /* e.g. tp */ |
b6849f55 | 293 | #define INSTR_RSI_RRP 4, { R_8,R_12,J16_16,0,0,0 } /* e.g. brxh */ |
bac02689 MS |
294 | #define INSTR_RSY_RRRD 6, { R_8,R_12,D20_20,B_16,0,0 } /* e.g. stmy */ |
295 | #define INSTR_RSY_RURD 6, { R_8,U4_12,D20_20,B_16,0,0 } /* e.g. icmh */ | |
296 | #define INSTR_RSY_AARD 6, { A_8,A_12,D20_20,B_16,0,0 } /* e.g. lamy */ | |
ad101263 | 297 | #define INSTR_RSY_CCRD 6, { C_8,C_12,D20_20,B_16,0,0 } /* e.g. lamy */ |
b6849f55 NC |
298 | #define INSTR_RS_AARD 4, { A_8,A_12,D_20,B_16,0,0 } /* e.g. lam */ |
299 | #define INSTR_RS_CCRD 4, { C_8,C_12,D_20,B_16,0,0 } /* e.g. lctl */ | |
300 | #define INSTR_RS_R0RD 4, { R_8,D_20,B_16,0,0,0 } /* e.g. sll */ | |
301 | #define INSTR_RS_RRRD 4, { R_8,R_12,D_20,B_16,0,0 } /* e.g. cs */ | |
302 | #define INSTR_RS_RURD 4, { R_8,U4_12,D_20,B_16,0,0 } /* e.g. icm */ | |
303 | #define INSTR_RXE_FRRD 6, { F_8,D_20,X_12,B_16,0,0 } /* e.g. axbr */ | |
304 | #define INSTR_RXE_RRRD 6, { R_8,D_20,X_12,B_16,0,0 } /* e.g. lg */ | |
305 | #define INSTR_RXF_FRRDF 6, { F_32,F_8,D_20,X_12,B_16,0 } /* e.g. madb */ | |
306 | #define INSTR_RXF_RRRDR 6, { R_32,R_8,D_20,X_12,B_16,0 } /* e.g. .insn */ | |
bac02689 MS |
307 | #define INSTR_RXY_RRRD 6, { R_8,D20_20,X_12,B_16,0,0 } /* e.g. ly */ |
308 | #define INSTR_RXY_FRRD 6, { F_8,D20_20,X_12,B_16,0,0 } /* e.g. ley */ | |
5746fb46 | 309 | #define INSTR_RXY_URRD 6, { U4_8,D20_20,X_12,B_16,0,0 } /* e.g. pfd */ |
b6849f55 NC |
310 | #define INSTR_RX_0RRD 4, { D_20,X_12,B_16,0,0,0 } /* e.g. be */ |
311 | #define INSTR_RX_FRRD 4, { F_8,D_20,X_12,B_16,0,0 } /* e.g. ae */ | |
312 | #define INSTR_RX_RRRD 4, { R_8,D_20,X_12,B_16,0,0 } /* e.g. l */ | |
313 | #define INSTR_RX_URRD 4, { U4_8,D_20,X_12,B_16,0,0 } /* e.g. bc */ | |
314 | #define INSTR_SI_URD 4, { D_20,B_16,U8_8,0,0,0 } /* e.g. cli */ | |
bac02689 | 315 | #define INSTR_SIY_URD 6, { D20_20,B_16,U8_8,0,0,0 } /* e.g. tmy */ |
5746fb46 AK |
316 | #define INSTR_SIY_IRD 6, { D20_20,B_16,I8_8,0,0,0 } /* e.g. asi */ |
317 | #define INSTR_SIL_RDI 6, { D_20,B_16,I16_32,0,0,0 } /* e.g. chhsi */ | |
318 | #define INSTR_SIL_RDU 6, { D_20,B_16,U16_32,0,0,0 } /* e.g. clfhsi */ | |
b6849f55 NC |
319 | #define INSTR_SSE_RDRD 6, { D_20,B_16,D_36,B_32,0,0 } /* e.g. mvsdk */ |
320 | #define INSTR_SS_L0RDRD 6, { D_20,L8_8,B_16,D_36,B_32,0 } /* e.g. mvc */ | |
b2e818b7 | 321 | #define INSTR_SS_L2RDRD 6, { D_20,B_16,D_36,L8_8,B_32,0 } /* e.g. pka */ |
b6849f55 NC |
322 | #define INSTR_SS_LIRDRD 6, { D_20,L4_8,B_16,D_36,B_32,U4_12 } /* e.g. srp */ |
323 | #define INSTR_SS_LLRDRD 6, { D_20,L4_8,B_16,D_36,L4_12,B_32 } /* e.g. pack */ | |
324 | #define INSTR_SS_RRRDRD 6, { D_20,R_8,B_16,D_36,B_32,R_12 } /* e.g. mvck */ | |
325 | #define INSTR_SS_RRRDRD2 6, { R_8,D_20,B_16,R_12,D_36,B_32 } /* e.g. plo */ | |
326 | #define INSTR_SS_RRRDRD3 6, { R_8,R_12,D_20,B_16,D_36,B_32 } /* e.g. lmd */ | |
5746fb46 | 327 | #define INSTR_SSF_RRDRD 6, { D_20,B_16,D_36,B_32,R_8,0 } /* e.g. mvcos */ |
b6849f55 NC |
328 | #define INSTR_S_00 4, { 0,0,0,0,0,0 } /* e.g. hsch */ |
329 | #define INSTR_S_RD 4, { D_20,B_16,0,0,0,0 } /* e.g. lpsw */ | |
330 | ||
331 | #define MASK_E { 0xff, 0xff, 0x00, 0x00, 0x00, 0x00 } | |
332 | #define MASK_RIE_RRP { 0xff, 0x00, 0x00, 0x00, 0x00, 0xff } | |
5746fb46 AK |
333 | #define MASK_RIE_RRPU { 0xff, 0x00, 0x00, 0x00, 0x00, 0xff } |
334 | #define MASK_RIE_RRP0 { 0xff, 0x00, 0x00, 0x00, 0xf0, 0xff } | |
335 | #define MASK_RIE_RUPI { 0xff, 0x00, 0x00, 0x00, 0x00, 0xff } | |
336 | #define MASK_RIE_R0PI { 0xff, 0x00, 0x00, 0x00, 0xf0, 0xff } | |
337 | #define MASK_RIE_RUPU { 0xff, 0x00, 0x00, 0x00, 0x00, 0xff } | |
338 | #define MASK_RIE_R0PU { 0xff, 0x00, 0x00, 0x00, 0xf0, 0xff } | |
339 | #define MASK_RIE_R0IU { 0xff, 0x0f, 0x00, 0x00, 0x0f, 0xff } | |
340 | #define MASK_RIE_R0I0 { 0xff, 0x0f, 0x00, 0x00, 0xff, 0xff } | |
341 | #define MASK_RIE_R0UU { 0xff, 0x0f, 0x00, 0x00, 0x0f, 0xff } | |
342 | #define MASK_RIE_R0U0 { 0xff, 0x0f, 0x00, 0x00, 0xff, 0xff } | |
343 | #define MASK_RIE_RRUUU { 0xff, 0x00, 0x00, 0x00, 0x00, 0xff } | |
b6849f55 NC |
344 | #define MASK_RIL_0P { 0xff, 0xff, 0x00, 0x00, 0x00, 0x00 } |
345 | #define MASK_RIL_RP { 0xff, 0x0f, 0x00, 0x00, 0x00, 0x00 } | |
346 | #define MASK_RIL_UP { 0xff, 0x0f, 0x00, 0x00, 0x00, 0x00 } | |
ad101263 MS |
347 | #define MASK_RIL_RI { 0xff, 0x0f, 0x00, 0x00, 0x00, 0x00 } |
348 | #define MASK_RIL_RU { 0xff, 0x0f, 0x00, 0x00, 0x00, 0x00 } | |
b6849f55 NC |
349 | #define MASK_RI_0P { 0xff, 0xff, 0x00, 0x00, 0x00, 0x00 } |
350 | #define MASK_RI_RI { 0xff, 0x0f, 0x00, 0x00, 0x00, 0x00 } | |
351 | #define MASK_RI_RP { 0xff, 0x0f, 0x00, 0x00, 0x00, 0x00 } | |
352 | #define MASK_RI_RU { 0xff, 0x0f, 0x00, 0x00, 0x00, 0x00 } | |
353 | #define MASK_RI_UP { 0xff, 0x0f, 0x00, 0x00, 0x00, 0x00 } | |
5746fb46 AK |
354 | #define MASK_RIS_RURDI { 0xff, 0x00, 0x00, 0x00, 0x00, 0xff } |
355 | #define MASK_RIS_R0RDI { 0xff, 0x0f, 0x00, 0x00, 0x00, 0xff } | |
356 | #define MASK_RIS_RURDU { 0xff, 0x00, 0x00, 0x00, 0x00, 0xff } | |
357 | #define MASK_RIS_R0RDU { 0xff, 0x0f, 0x00, 0x00, 0x00, 0xff } | |
b6849f55 NC |
358 | #define MASK_RRE_00 { 0xff, 0xff, 0xff, 0xff, 0x00, 0x00 } |
359 | #define MASK_RRE_0R { 0xff, 0xff, 0xff, 0xf0, 0x00, 0x00 } | |
360 | #define MASK_RRE_AA { 0xff, 0xff, 0xff, 0x00, 0x00, 0x00 } | |
361 | #define MASK_RRE_AR { 0xff, 0xff, 0xff, 0x00, 0x00, 0x00 } | |
362 | #define MASK_RRE_F0 { 0xff, 0xff, 0xff, 0x0f, 0x00, 0x00 } | |
363 | #define MASK_RRE_FF { 0xff, 0xff, 0xff, 0x00, 0x00, 0x00 } | |
364 | #define MASK_RRE_R0 { 0xff, 0xff, 0xff, 0x0f, 0x00, 0x00 } | |
365 | #define MASK_RRE_RA { 0xff, 0xff, 0xff, 0x00, 0x00, 0x00 } | |
366 | #define MASK_RRE_RF { 0xff, 0xff, 0xff, 0x00, 0x00, 0x00 } | |
367 | #define MASK_RRE_RR { 0xff, 0xff, 0xff, 0x00, 0x00, 0x00 } | |
b5639b37 | 368 | #define MASK_RRE_FR { 0xff, 0xff, 0xff, 0x00, 0x00, 0x00 } |
b8e55848 | 369 | #define MASK_RRE_RR_OPT { 0xff, 0xff, 0xff, 0x00, 0x00, 0x00 } |
b6849f55 | 370 | #define MASK_RRF_F0FF { 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00 } |
b5639b37 MS |
371 | #define MASK_RRF_F0FF2 { 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00 } |
372 | #define MASK_RRF_F0FR { 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00 } | |
b6849f55 NC |
373 | #define MASK_RRF_FUFF { 0xff, 0xff, 0x00, 0x00, 0x00, 0x00 } |
374 | #define MASK_RRF_RURR { 0xff, 0xff, 0x00, 0x00, 0x00, 0x00 } | |
bac02689 | 375 | #define MASK_RRF_R0RR { 0xff, 0xff, 0x00, 0x00, 0x00, 0x00 } |
b6849f55 | 376 | #define MASK_RRF_U0FF { 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00 } |
929e4d1a | 377 | #define MASK_RRF_U0RF { 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00 } |
b5639b37 MS |
378 | #define MASK_RRF_UUFF { 0xff, 0xff, 0x00, 0x00, 0x00, 0x00 } |
379 | #define MASK_RRF_0UFF { 0xff, 0xff, 0xf0, 0x00, 0x00, 0x00 } | |
380 | #define MASK_RRF_FFFU { 0xff, 0xff, 0x00, 0x00, 0x00, 0x00 } | |
ad101263 | 381 | #define MASK_RRF_M0RR { 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00 } |
5746fb46 AK |
382 | #define MASK_RRF_U0RR { 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00 } |
383 | #define MASK_RRF_00RR { 0xff, 0xff, 0xff, 0x00, 0x00, 0x00 } | |
b6849f55 NC |
384 | #define MASK_RR_0R { 0xff, 0xf0, 0x00, 0x00, 0x00, 0x00 } |
385 | #define MASK_RR_FF { 0xff, 0x00, 0x00, 0x00, 0x00, 0x00 } | |
386 | #define MASK_RR_R0 { 0xff, 0x0f, 0x00, 0x00, 0x00, 0x00 } | |
387 | #define MASK_RR_RR { 0xff, 0x00, 0x00, 0x00, 0x00, 0x00 } | |
388 | #define MASK_RR_U0 { 0xff, 0x00, 0x00, 0x00, 0x00, 0x00 } | |
389 | #define MASK_RR_UR { 0xff, 0x00, 0x00, 0x00, 0x00, 0x00 } | |
b5639b37 | 390 | #define MASK_RRR_F0FF { 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00 } |
5746fb46 AK |
391 | #define MASK_RRS_RRRDU { 0xff, 0x00, 0x00, 0x00, 0x0f, 0xff } |
392 | #define MASK_RRS_RRRD0 { 0xff, 0x00, 0x00, 0x00, 0xff, 0xff } | |
b6849f55 | 393 | #define MASK_RSE_RRRD { 0xff, 0x00, 0x00, 0x00, 0x00, 0xff } |
ad101263 | 394 | #define MASK_RSE_CCRD { 0xff, 0x00, 0x00, 0x00, 0x00, 0xff } |
b6849f55 | 395 | #define MASK_RSE_RURD { 0xff, 0x00, 0x00, 0x00, 0x00, 0xff } |
bac02689 | 396 | #define MASK_RSL_R0RD { 0xff, 0x00, 0x00, 0x00, 0x00, 0xff } |
b6849f55 NC |
397 | #define MASK_RSI_RRP { 0xff, 0x00, 0x00, 0x00, 0x00, 0x00 } |
398 | #define MASK_RS_AARD { 0xff, 0x00, 0x00, 0x00, 0x00, 0x00 } | |
399 | #define MASK_RS_CCRD { 0xff, 0x00, 0x00, 0x00, 0x00, 0x00 } | |
400 | #define MASK_RS_R0RD { 0xff, 0x0f, 0x00, 0x00, 0x00, 0x00 } | |
401 | #define MASK_RS_RRRD { 0xff, 0x00, 0x00, 0x00, 0x00, 0x00 } | |
402 | #define MASK_RS_RURD { 0xff, 0x00, 0x00, 0x00, 0x00, 0x00 } | |
bac02689 MS |
403 | #define MASK_RSY_RRRD { 0xff, 0x00, 0x00, 0x00, 0x00, 0xff } |
404 | #define MASK_RSY_RURD { 0xff, 0x00, 0x00, 0x00, 0x00, 0xff } | |
405 | #define MASK_RSY_AARD { 0xff, 0x00, 0x00, 0x00, 0x00, 0xff } | |
ad101263 | 406 | #define MASK_RSY_CCRD { 0xff, 0x00, 0x00, 0x00, 0x00, 0xff } |
b6849f55 NC |
407 | #define MASK_RXE_FRRD { 0xff, 0x00, 0x00, 0x00, 0x00, 0xff } |
408 | #define MASK_RXE_RRRD { 0xff, 0x00, 0x00, 0x00, 0x00, 0xff } | |
409 | #define MASK_RXF_FRRDF { 0xff, 0x00, 0x00, 0x00, 0x00, 0xff } | |
410 | #define MASK_RXF_RRRDR { 0xff, 0x00, 0x00, 0x00, 0x00, 0xff } | |
bac02689 MS |
411 | #define MASK_RXY_RRRD { 0xff, 0x00, 0x00, 0x00, 0x00, 0xff } |
412 | #define MASK_RXY_FRRD { 0xff, 0x00, 0x00, 0x00, 0x00, 0xff } | |
5746fb46 | 413 | #define MASK_RXY_URRD { 0xff, 0x00, 0x00, 0x00, 0x00, 0xff } |
b6849f55 NC |
414 | #define MASK_RX_0RRD { 0xff, 0xf0, 0x00, 0x00, 0x00, 0x00 } |
415 | #define MASK_RX_FRRD { 0xff, 0x00, 0x00, 0x00, 0x00, 0x00 } | |
416 | #define MASK_RX_RRRD { 0xff, 0x00, 0x00, 0x00, 0x00, 0x00 } | |
417 | #define MASK_RX_URRD { 0xff, 0x00, 0x00, 0x00, 0x00, 0x00 } | |
418 | #define MASK_SI_URD { 0xff, 0x00, 0x00, 0x00, 0x00, 0x00 } | |
bac02689 | 419 | #define MASK_SIY_URD { 0xff, 0x00, 0x00, 0x00, 0x00, 0xff } |
5746fb46 AK |
420 | #define MASK_SIY_IRD { 0xff, 0x00, 0x00, 0x00, 0x00, 0xff } |
421 | #define MASK_SIL_RDI { 0xff, 0xff, 0x00, 0x00, 0x00, 0x00 } | |
422 | #define MASK_SIL_RDU { 0xff, 0xff, 0x00, 0x00, 0x00, 0x00 } | |
b6849f55 NC |
423 | #define MASK_SSE_RDRD { 0xff, 0xff, 0x00, 0x00, 0x00, 0x00 } |
424 | #define MASK_SS_L0RDRD { 0xff, 0x00, 0x00, 0x00, 0x00, 0x00 } | |
b2e818b7 | 425 | #define MASK_SS_L2RDRD { 0xff, 0x00, 0x00, 0x00, 0x00, 0x00 } |
b6849f55 NC |
426 | #define MASK_SS_LIRDRD { 0xff, 0x00, 0x00, 0x00, 0x00, 0x00 } |
427 | #define MASK_SS_LLRDRD { 0xff, 0x00, 0x00, 0x00, 0x00, 0x00 } | |
428 | #define MASK_SS_RRRDRD { 0xff, 0x00, 0x00, 0x00, 0x00, 0x00 } | |
429 | #define MASK_SS_RRRDRD2 { 0xff, 0x00, 0x00, 0x00, 0x00, 0x00 } | |
430 | #define MASK_SS_RRRDRD3 { 0xff, 0x00, 0x00, 0x00, 0x00, 0x00 } | |
5746fb46 | 431 | #define MASK_SSF_RRDRD { 0xff, 0x0f, 0x00, 0x00, 0x00, 0x00 } |
b6849f55 NC |
432 | #define MASK_S_00 { 0xff, 0xff, 0xff, 0xff, 0x00, 0x00 } |
433 | #define MASK_S_RD { 0xff, 0xff, 0x00, 0x00, 0x00, 0x00 } | |
5746fb46 | 434 | |
b6849f55 NC |
435 | |
436 | /* The opcode formats table (blueprints for .insn pseudo mnemonic). */ | |
a85d7ed0 | 437 | |
82b66b23 NC |
438 | const struct s390_opcode s390_opformats[] = |
439 | { | |
af169f23 MS |
440 | { "e", OP8(0x00LL), MASK_E, INSTR_E, 3, 0 }, |
441 | { "ri", OP8(0x00LL), MASK_RI_RI, INSTR_RI_RI, 3, 0 }, | |
442 | { "rie", OP8(0x00LL), MASK_RIE_RRP, INSTR_RIE_RRP, 3, 0 }, | |
443 | { "ril", OP8(0x00LL), MASK_RIL_RP, INSTR_RIL_RP, 3, 0 }, | |
ad101263 | 444 | { "rilu", OP8(0x00LL), MASK_RIL_RU, INSTR_RIL_RU, 3, 0 }, |
5746fb46 | 445 | { "ris", OP8(0x00LL), MASK_RIS_RURDI, INSTR_RIS_RURDI,3, 6 }, |
af169f23 MS |
446 | { "rr", OP8(0x00LL), MASK_RR_RR, INSTR_RR_RR, 3, 0 }, |
447 | { "rre", OP8(0x00LL), MASK_RRE_RR, INSTR_RRE_RR, 3, 0 }, | |
448 | { "rrf", OP8(0x00LL), MASK_RRF_RURR, INSTR_RRF_RURR, 3, 0 }, | |
5746fb46 | 449 | { "rrs", OP8(0x00LL), MASK_RRS_RRRDU, INSTR_RRS_RRRDU,3, 6 }, |
af169f23 MS |
450 | { "rs", OP8(0x00LL), MASK_RS_RRRD, INSTR_RS_RRRD, 3, 0 }, |
451 | { "rse", OP8(0x00LL), MASK_RSE_RRRD, INSTR_RSE_RRRD, 3, 0 }, | |
452 | { "rsi", OP8(0x00LL), MASK_RSI_RRP, INSTR_RSI_RRP, 3, 0 }, | |
bac02689 | 453 | { "rsy", OP8(0x00LL), MASK_RSY_RRRD, INSTR_RSY_RRRD, 3, 3 }, |
af169f23 MS |
454 | { "rx", OP8(0x00LL), MASK_RX_RRRD, INSTR_RX_RRRD, 3, 0 }, |
455 | { "rxe", OP8(0x00LL), MASK_RXE_RRRD, INSTR_RXE_RRRD, 3, 0 }, | |
456 | { "rxf", OP8(0x00LL), MASK_RXF_RRRDR, INSTR_RXF_RRRDR,3, 0 }, | |
bac02689 | 457 | { "rxy", OP8(0x00LL), MASK_RXY_RRRD, INSTR_RXY_RRRD, 3, 3 }, |
af169f23 MS |
458 | { "s", OP8(0x00LL), MASK_S_RD, INSTR_S_RD, 3, 0 }, |
459 | { "si", OP8(0x00LL), MASK_SI_URD, INSTR_SI_URD, 3, 0 }, | |
bac02689 | 460 | { "siy", OP8(0x00LL), MASK_SIY_URD, INSTR_SIY_URD, 3, 3 }, |
5746fb46 | 461 | { "sil", OP8(0x00LL), MASK_SIL_RDI, INSTR_SIL_RDI, 3, 6 }, |
af169f23 MS |
462 | { "ss", OP8(0x00LL), MASK_SS_RRRDRD, INSTR_SS_RRRDRD,3, 0 }, |
463 | { "sse", OP8(0x00LL), MASK_SSE_RDRD, INSTR_SSE_RDRD, 3, 0 }, | |
ad101263 | 464 | { "ssf", OP8(0x00LL), MASK_SSF_RRDRD, INSTR_SSF_RRDRD,3, 0 }, |
a85d7ed0 NC |
465 | }; |
466 | ||
467 | const int s390_num_opformats = | |
468 | sizeof (s390_opformats) / sizeof (s390_opformats[0]); | |
469 | ||
b6849f55 | 470 | #include "s390-opc.tab" |