00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019
00020
00021
00022
00023
00024
00025
00026 #include <stdio.h>
00027 #include "ansidecl.h"
00028 #include "opcode/s390.h"
00029
00030
00031
00032
00033
00034
00035
00036
00037
00038
00039
00040
00041
00042
00043
00044 const struct s390_operand s390_operands[] =
00045 {
00046 #define UNUSED 0
00047 { 0, 0, 0 },
00048
00049 #define R_8 1
00050 { 4, 8, S390_OPERAND_GPR },
00051 #define R_12 2
00052 { 4, 12, S390_OPERAND_GPR },
00053 #define R_16 3
00054 { 4, 16, S390_OPERAND_GPR },
00055 #define R_20 4
00056 { 4, 20, S390_OPERAND_GPR },
00057 #define R_24 5
00058 { 4, 24, S390_OPERAND_GPR },
00059 #define R_28 6
00060 { 4, 28, S390_OPERAND_GPR },
00061 #define R_32 7
00062 { 4, 32, S390_OPERAND_GPR },
00063
00064 #define F_8 8
00065 { 4, 8, S390_OPERAND_FPR },
00066 #define F_12 9
00067 { 4, 12, S390_OPERAND_FPR },
00068 #define F_16 10
00069 { 4, 16, S390_OPERAND_FPR },
00070 #define F_20 11
00071 { 4, 16, S390_OPERAND_FPR },
00072 #define F_24 12
00073 { 4, 24, S390_OPERAND_FPR },
00074 #define F_28 13
00075 { 4, 28, S390_OPERAND_FPR },
00076 #define F_32 14
00077 { 4, 32, S390_OPERAND_FPR },
00078
00079 #define A_8 15
00080 { 4, 8, S390_OPERAND_AR },
00081 #define A_12 16
00082 { 4, 12, S390_OPERAND_AR },
00083 #define A_24 17
00084 { 4, 24, S390_OPERAND_AR },
00085 #define A_28 18
00086 { 4, 28, S390_OPERAND_AR },
00087
00088 #define C_8 19
00089 { 4, 8, S390_OPERAND_CR },
00090 #define C_12 20
00091 { 4, 12, S390_OPERAND_CR },
00092
00093 #define B_16 21
00094 { 4, 16, S390_OPERAND_BASE|S390_OPERAND_GPR },
00095 #define B_32 22
00096 { 4, 32, S390_OPERAND_BASE|S390_OPERAND_GPR },
00097
00098 #define X_12 23
00099 { 4, 12, S390_OPERAND_INDEX|S390_OPERAND_GPR },
00100
00101 #define D_20 24
00102 { 12, 20, S390_OPERAND_DISP },
00103 #define D_36 25
00104 { 12, 36, S390_OPERAND_DISP },
00105 #define D20_20 26
00106 { 20, 20, S390_OPERAND_DISP|S390_OPERAND_SIGNED },
00107
00108 #define L4_8 27
00109 { 4, 8, S390_OPERAND_LENGTH },
00110 #define L4_12 28
00111 { 4, 12, S390_OPERAND_LENGTH },
00112 #define L8_8 29
00113 { 8, 8, S390_OPERAND_LENGTH },
00114
00115 #define U4_8 30
00116 { 4, 8, 0 },
00117 #define U4_12 31
00118 { 4, 12, 0 },
00119 #define U4_16 32
00120 { 4, 16, 0 },
00121 #define U4_20 33
00122 { 4, 20, 0 },
00123 #define U8_8 34
00124 { 8, 8, 0 },
00125 #define U8_16 35
00126 { 8, 16, 0 },
00127 #define I16_16 36
00128 { 16, 16, S390_OPERAND_SIGNED },
00129 #define U16_16 37
00130 { 16, 16, 0 },
00131 #define J16_16 38
00132 { 16, 16, S390_OPERAND_PCREL },
00133 #define J32_16 39
00134 { 32, 16, S390_OPERAND_PCREL }
00135 };
00136
00137
00138
00139
00140
00141 #define OP8(x) { x, 0x00, 0x00, 0x00, 0x00, 0x00 }
00142 #define OP16(x) { x >> 8, x & 255, 0x00, 0x00, 0x00, 0x00 }
00143 #define OP48(x) { x >> 40, (x >> 32) & 255, (x >> 24) & 255, \
00144 (x >> 16) & 255, (x >> 8) & 255, x & 255}
00145
00146
00147
00148
00149
00150
00151
00152
00153
00154
00155
00156
00157
00158
00159
00160
00161
00162
00163
00164
00165
00166
00167
00168
00169
00170
00171
00172
00173
00174
00175
00176
00177
00178
00179
00180 #define INSTR_E 2, { 0,0,0,0,0,0 }
00181 #define INSTR_RIE_RRP 6, { R_8,R_12,J16_16,0,0,0 }
00182 #define INSTR_RIL_0P 6, { J32_16,0,0,0,0 }
00183 #define INSTR_RIL_RP 6, { R_8,J32_16,0,0,0,0 }
00184 #define INSTR_RIL_UP 6, { U4_8,J32_16,0,0,0,0 }
00185 #define INSTR_RI_0P 4, { J16_16,0,0,0,0,0 }
00186 #define INSTR_RI_RI 4, { R_8,I16_16,0,0,0,0 }
00187 #define INSTR_RI_RP 4, { R_8,J16_16,0,0,0,0 }
00188 #define INSTR_RI_RU 4, { R_8,U16_16,0,0,0,0 }
00189 #define INSTR_RI_UP 4, { U4_8,J16_16,0,0,0,0 }
00190 #define INSTR_RRE_00 4, { 0,0,0,0,0,0 }
00191 #define INSTR_RRE_0R 4, { R_28,0,0,0,0,0 }
00192 #define INSTR_RRE_AA 4, { A_24,A_28,0,0,0,0 }
00193 #define INSTR_RRE_AR 4, { A_24,R_28,0,0,0,0 }
00194 #define INSTR_RRE_F0 4, { F_24,0,0,0,0,0 }
00195 #define INSTR_RRE_FF 4, { F_24,F_28,0,0,0,0 }
00196 #define INSTR_RRE_R0 4, { R_24,0,0,0,0,0 }
00197 #define INSTR_RRE_RA 4, { R_24,A_28,0,0,0,0 }
00198 #define INSTR_RRE_RF 4, { R_24,F_28,0,0,0,0 }
00199 #define INSTR_RRE_RR 4, { R_24,R_28,0,0,0,0 }
00200 #define INSTR_RRF_F0FF 4, { F_16,F_24,F_28,0,0,0 }
00201 #define INSTR_RRF_FUFF 4, { F_24,F_16,F_28,U4_20,0,0 }
00202 #define INSTR_RRF_RURR 4, { R_24,R_28,R_16,U4_20,0,0 }
00203 #define INSTR_RRF_R0RR 4, { R_24,R_28,R_16,0,0,0 }
00204 #define INSTR_RRF_U0FF 4, { F_24,U4_16,F_28,0,0,0 }
00205 #define INSTR_RRF_U0FR 4, { F_24,U4_16,R_28,0,0,0 }
00206 #define INSTR_RRF_U0FR 4, { F_24,U4_16,R_28,0,0,0 }
00207 #define INSTR_RR_0R 2, { R_12, 0,0,0,0,0 }
00208 #define INSTR_RR_FF 2, { F_8,F_12,0,0,0,0 }
00209 #define INSTR_RR_R0 2, { R_8, 0,0,0,0,0 }
00210 #define INSTR_RR_RR 2, { R_8,R_12,0,0,0,0 }
00211 #define INSTR_RR_U0 2, { U8_8, 0,0,0,0,0 }
00212 #define INSTR_RR_UR 2, { U4_8,R_12,0,0,0,0 }
00213 #define INSTR_RSE_RRRD 6, { R_8,R_12,D_20,B_16,0,0 }
00214 #define INSTR_RSE_RURD 6, { R_8,U4_12,D_20,B_16,0,0 }
00215 #define INSTR_RSL_R0RD 6, { R_8,D_20,B_16,0,0,0 }
00216 #define INSTR_RSI_RRP 4, { R_8,R_12,J16_16,0,0,0 }
00217 #define INSTR_RSY_RRRD 6, { R_8,R_12,D20_20,B_16,0,0 }
00218 #define INSTR_RSY_RURD 6, { R_8,U4_12,D20_20,B_16,0,0 }
00219 #define INSTR_RSY_AARD 6, { A_8,A_12,D20_20,B_16,0,0 }
00220 #define INSTR_RS_AARD 4, { A_8,A_12,D_20,B_16,0,0 }
00221 #define INSTR_RS_CCRD 4, { C_8,C_12,D_20,B_16,0,0 }
00222 #define INSTR_RS_R0RD 4, { R_8,D_20,B_16,0,0,0 }
00223 #define INSTR_RS_RRRD 4, { R_8,R_12,D_20,B_16,0,0 }
00224 #define INSTR_RS_RURD 4, { R_8,U4_12,D_20,B_16,0,0 }
00225 #define INSTR_RXE_FRRD 6, { F_8,D_20,X_12,B_16,0,0 }
00226 #define INSTR_RXE_RRRD 6, { R_8,D_20,X_12,B_16,0,0 }
00227 #define INSTR_RXF_FRRDF 6, { F_32,F_8,D_20,X_12,B_16,0 }
00228 #define INSTR_RXF_RRRDR 6, { R_32,R_8,D_20,X_12,B_16,0 }
00229 #define INSTR_RXY_RRRD 6, { R_8,D20_20,X_12,B_16,0,0 }
00230 #define INSTR_RXY_FRRD 6, { F_8,D20_20,X_12,B_16,0,0 }
00231 #define INSTR_RX_0RRD 4, { D_20,X_12,B_16,0,0,0 }
00232 #define INSTR_RX_FRRD 4, { F_8,D_20,X_12,B_16,0,0 }
00233 #define INSTR_RX_RRRD 4, { R_8,D_20,X_12,B_16,0,0 }
00234 #define INSTR_RX_URRD 4, { U4_8,D_20,X_12,B_16,0,0 }
00235 #define INSTR_SI_URD 4, { D_20,B_16,U8_8,0,0,0 }
00236 #define INSTR_SIY_URD 6, { D20_20,B_16,U8_8,0,0,0 }
00237 #define INSTR_SSE_RDRD 6, { D_20,B_16,D_36,B_32,0,0 }
00238 #define INSTR_SS_L0RDRD 6, { D_20,L8_8,B_16,D_36,B_32,0 }
00239 #define INSTR_SS_LIRDRD 6, { D_20,L4_8,B_16,D_36,B_32,U4_12 }
00240 #define INSTR_SS_LLRDRD 6, { D_20,L4_8,B_16,D_36,L4_12,B_32 }
00241 #define INSTR_SS_RRRDRD 6, { D_20,R_8,B_16,D_36,B_32,R_12 }
00242 #define INSTR_SS_RRRDRD2 6, { R_8,D_20,B_16,R_12,D_36,B_32 }
00243 #define INSTR_SS_RRRDRD3 6, { R_8,R_12,D_20,B_16,D_36,B_32 }
00244 #define INSTR_S_00 4, { 0,0,0,0,0,0 }
00245 #define INSTR_S_RD 4, { D_20,B_16,0,0,0,0 }
00246
00247 #define MASK_E { 0xff, 0xff, 0x00, 0x00, 0x00, 0x00 }
00248 #define MASK_RIE_RRP { 0xff, 0x00, 0x00, 0x00, 0x00, 0xff }
00249 #define MASK_RIL_0P { 0xff, 0xff, 0x00, 0x00, 0x00, 0x00 }
00250 #define MASK_RIL_RP { 0xff, 0x0f, 0x00, 0x00, 0x00, 0x00 }
00251 #define MASK_RIL_UP { 0xff, 0x0f, 0x00, 0x00, 0x00, 0x00 }
00252 #define MASK_RI_0P { 0xff, 0xff, 0x00, 0x00, 0x00, 0x00 }
00253 #define MASK_RI_RI { 0xff, 0x0f, 0x00, 0x00, 0x00, 0x00 }
00254 #define MASK_RI_RP { 0xff, 0x0f, 0x00, 0x00, 0x00, 0x00 }
00255 #define MASK_RI_RU { 0xff, 0x0f, 0x00, 0x00, 0x00, 0x00 }
00256 #define MASK_RI_UP { 0xff, 0x0f, 0x00, 0x00, 0x00, 0x00 }
00257 #define MASK_RRE_00 { 0xff, 0xff, 0xff, 0xff, 0x00, 0x00 }
00258 #define MASK_RRE_0R { 0xff, 0xff, 0xff, 0xf0, 0x00, 0x00 }
00259 #define MASK_RRE_AA { 0xff, 0xff, 0xff, 0x00, 0x00, 0x00 }
00260 #define MASK_RRE_AR { 0xff, 0xff, 0xff, 0x00, 0x00, 0x00 }
00261 #define MASK_RRE_F0 { 0xff, 0xff, 0xff, 0x0f, 0x00, 0x00 }
00262 #define MASK_RRE_FF { 0xff, 0xff, 0xff, 0x00, 0x00, 0x00 }
00263 #define MASK_RRE_R0 { 0xff, 0xff, 0xff, 0x0f, 0x00, 0x00 }
00264 #define MASK_RRE_RA { 0xff, 0xff, 0xff, 0x00, 0x00, 0x00 }
00265 #define MASK_RRE_RF { 0xff, 0xff, 0xff, 0x00, 0x00, 0x00 }
00266 #define MASK_RRE_RR { 0xff, 0xff, 0xff, 0x00, 0x00, 0x00 }
00267 #define MASK_RRF_F0FF { 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00 }
00268 #define MASK_RRF_FUFF { 0xff, 0xff, 0x00, 0x00, 0x00, 0x00 }
00269 #define MASK_RRF_RURR { 0xff, 0xff, 0x00, 0x00, 0x00, 0x00 }
00270 #define MASK_RRF_R0RR { 0xff, 0xff, 0x00, 0x00, 0x00, 0x00 }
00271 #define MASK_RRF_U0FF { 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00 }
00272 #define MASK_RRF_U0FR { 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00 }
00273 #define MASK_RRF_U0FR { 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00 }
00274 #define MASK_RR_0R { 0xff, 0xf0, 0x00, 0x00, 0x00, 0x00 }
00275 #define MASK_RR_FF { 0xff, 0x00, 0x00, 0x00, 0x00, 0x00 }
00276 #define MASK_RR_R0 { 0xff, 0x0f, 0x00, 0x00, 0x00, 0x00 }
00277 #define MASK_RR_RR { 0xff, 0x00, 0x00, 0x00, 0x00, 0x00 }
00278 #define MASK_RR_U0 { 0xff, 0x00, 0x00, 0x00, 0x00, 0x00 }
00279 #define MASK_RR_UR { 0xff, 0x00, 0x00, 0x00, 0x00, 0x00 }
00280 #define MASK_RSE_RRRD { 0xff, 0x00, 0x00, 0x00, 0x00, 0xff }
00281 #define MASK_RSE_RURD { 0xff, 0x00, 0x00, 0x00, 0x00, 0xff }
00282 #define MASK_RSL_R0RD { 0xff, 0x00, 0x00, 0x00, 0x00, 0xff }
00283 #define MASK_RSI_RRP { 0xff, 0x00, 0x00, 0x00, 0x00, 0x00 }
00284 #define MASK_RS_AARD { 0xff, 0x00, 0x00, 0x00, 0x00, 0x00 }
00285 #define MASK_RS_CCRD { 0xff, 0x00, 0x00, 0x00, 0x00, 0x00 }
00286 #define MASK_RS_R0RD { 0xff, 0x0f, 0x00, 0x00, 0x00, 0x00 }
00287 #define MASK_RS_RRRD { 0xff, 0x00, 0x00, 0x00, 0x00, 0x00 }
00288 #define MASK_RS_RURD { 0xff, 0x00, 0x00, 0x00, 0x00, 0x00 }
00289 #define MASK_RSY_RRRD { 0xff, 0x00, 0x00, 0x00, 0x00, 0xff }
00290 #define MASK_RSY_RURD { 0xff, 0x00, 0x00, 0x00, 0x00, 0xff }
00291 #define MASK_RSY_AARD { 0xff, 0x00, 0x00, 0x00, 0x00, 0xff }
00292 #define MASK_RXE_FRRD { 0xff, 0x00, 0x00, 0x00, 0x00, 0xff }
00293 #define MASK_RXE_RRRD { 0xff, 0x00, 0x00, 0x00, 0x00, 0xff }
00294 #define MASK_RXF_FRRDF { 0xff, 0x00, 0x00, 0x00, 0x00, 0xff }
00295 #define MASK_RXF_RRRDR { 0xff, 0x00, 0x00, 0x00, 0x00, 0xff }
00296 #define MASK_RXY_RRRD { 0xff, 0x00, 0x00, 0x00, 0x00, 0xff }
00297 #define MASK_RXY_FRRD { 0xff, 0x00, 0x00, 0x00, 0x00, 0xff }
00298 #define MASK_RX_0RRD { 0xff, 0xf0, 0x00, 0x00, 0x00, 0x00 }
00299 #define MASK_RX_FRRD { 0xff, 0x00, 0x00, 0x00, 0x00, 0x00 }
00300 #define MASK_RX_RRRD { 0xff, 0x00, 0x00, 0x00, 0x00, 0x00 }
00301 #define MASK_RX_URRD { 0xff, 0x00, 0x00, 0x00, 0x00, 0x00 }
00302 #define MASK_SI_URD { 0xff, 0x00, 0x00, 0x00, 0x00, 0x00 }
00303 #define MASK_SIY_URD { 0xff, 0x00, 0x00, 0x00, 0x00, 0xff }
00304 #define MASK_SSE_RDRD { 0xff, 0xff, 0x00, 0x00, 0x00, 0x00 }
00305 #define MASK_SS_L0RDRD { 0xff, 0x00, 0x00, 0x00, 0x00, 0x00 }
00306 #define MASK_SS_LIRDRD { 0xff, 0x00, 0x00, 0x00, 0x00, 0x00 }
00307 #define MASK_SS_LLRDRD { 0xff, 0x00, 0x00, 0x00, 0x00, 0x00 }
00308 #define MASK_SS_RRRDRD { 0xff, 0x00, 0x00, 0x00, 0x00, 0x00 }
00309 #define MASK_SS_RRRDRD2 { 0xff, 0x00, 0x00, 0x00, 0x00, 0x00 }
00310 #define MASK_SS_RRRDRD3 { 0xff, 0x00, 0x00, 0x00, 0x00, 0x00 }
00311 #define MASK_S_00 { 0xff, 0xff, 0xff, 0xff, 0x00, 0x00 }
00312 #define MASK_S_RD { 0xff, 0xff, 0x00, 0x00, 0x00, 0x00 }
00313
00314
00315
00316 const struct s390_opcode s390_opformats[] =
00317 {
00318 { "e", OP8(0x00LL), MASK_E, INSTR_E, 3, 0 },
00319 { "ri", OP8(0x00LL), MASK_RI_RI, INSTR_RI_RI, 3, 0 },
00320 { "rie", OP8(0x00LL), MASK_RIE_RRP, INSTR_RIE_RRP, 3, 0 },
00321 { "ril", OP8(0x00LL), MASK_RIL_RP, INSTR_RIL_RP, 3, 0 },
00322 { "rr", OP8(0x00LL), MASK_RR_RR, INSTR_RR_RR, 3, 0 },
00323 { "rre", OP8(0x00LL), MASK_RRE_RR, INSTR_RRE_RR, 3, 0 },
00324 { "rrf", OP8(0x00LL), MASK_RRF_RURR, INSTR_RRF_RURR, 3, 0 },
00325 { "rs", OP8(0x00LL), MASK_RS_RRRD, INSTR_RS_RRRD, 3, 0 },
00326 { "rse", OP8(0x00LL), MASK_RSE_RRRD, INSTR_RSE_RRRD, 3, 0 },
00327 { "rsi", OP8(0x00LL), MASK_RSI_RRP, INSTR_RSI_RRP, 3, 0 },
00328 { "rsy", OP8(0x00LL), MASK_RSY_RRRD, INSTR_RSY_RRRD, 3, 3 },
00329 { "rx", OP8(0x00LL), MASK_RX_RRRD, INSTR_RX_RRRD, 3, 0 },
00330 { "rxe", OP8(0x00LL), MASK_RXE_RRRD, INSTR_RXE_RRRD, 3, 0 },
00331 { "rxf", OP8(0x00LL), MASK_RXF_RRRDR, INSTR_RXF_RRRDR,3, 0 },
00332 { "rxy", OP8(0x00LL), MASK_RXY_RRRD, INSTR_RXY_RRRD, 3, 3 },
00333 { "s", OP8(0x00LL), MASK_S_RD, INSTR_S_RD, 3, 0 },
00334 { "si", OP8(0x00LL), MASK_SI_URD, INSTR_SI_URD, 3, 0 },
00335 { "siy", OP8(0x00LL), MASK_SIY_URD, INSTR_SIY_URD, 3, 3 },
00336 { "ss", OP8(0x00LL), MASK_SS_RRRDRD, INSTR_SS_RRRDRD,3, 0 },
00337 { "sse", OP8(0x00LL), MASK_SSE_RDRD, INSTR_SSE_RDRD, 3, 0 },
00338 };
00339
00340 const int s390_num_opformats =
00341 sizeof (s390_opformats) / sizeof (s390_opformats[0]);
00342
00343 #include "s390-opc.tab"