linux/arch/s390/kernel/dis.c
<<
>>
Prefs
   1/*
   2 * Disassemble s390 instructions.
   3 *
   4 * Copyright IBM Corp. 2007
   5 * Author(s): Martin Schwidefsky (schwidefsky@de.ibm.com),
   6 */
   7
   8#include <linux/sched.h>
   9#include <linux/kernel.h>
  10#include <linux/string.h>
  11#include <linux/errno.h>
  12#include <linux/ptrace.h>
  13#include <linux/timer.h>
  14#include <linux/mm.h>
  15#include <linux/smp.h>
  16#include <linux/init.h>
  17#include <linux/interrupt.h>
  18#include <linux/delay.h>
  19#include <linux/export.h>
  20#include <linux/kallsyms.h>
  21#include <linux/reboot.h>
  22#include <linux/kprobes.h>
  23#include <linux/kdebug.h>
  24
  25#include <linux/uaccess.h>
  26#include <asm/dis.h>
  27#include <asm/io.h>
  28#include <linux/atomic.h>
  29#include <asm/cpcmd.h>
  30#include <asm/lowcore.h>
  31#include <asm/debug.h>
  32#include <asm/irq.h>
  33
  34enum {
  35        UNUSED, /* Indicates the end of the operand list */
  36        R_8,    /* GPR starting at position 8 */
  37        R_12,   /* GPR starting at position 12 */
  38        R_16,   /* GPR starting at position 16 */
  39        R_20,   /* GPR starting at position 20 */
  40        R_24,   /* GPR starting at position 24 */
  41        R_28,   /* GPR starting at position 28 */
  42        R_32,   /* GPR starting at position 32 */
  43        F_8,    /* FPR starting at position 8 */
  44        F_12,   /* FPR starting at position 12 */
  45        F_16,   /* FPR starting at position 16 */
  46        F_20,   /* FPR starting at position 16 */
  47        F_24,   /* FPR starting at position 24 */
  48        F_28,   /* FPR starting at position 28 */
  49        F_32,   /* FPR starting at position 32 */
  50        A_8,    /* Access reg. starting at position 8 */
  51        A_12,   /* Access reg. starting at position 12 */
  52        A_24,   /* Access reg. starting at position 24 */
  53        A_28,   /* Access reg. starting at position 28 */
  54        C_8,    /* Control reg. starting at position 8 */
  55        C_12,   /* Control reg. starting at position 12 */
  56        V_8,    /* Vector reg. starting at position 8, extension bit at 36 */
  57        V_12,   /* Vector reg. starting at position 12, extension bit at 37 */
  58        V_16,   /* Vector reg. starting at position 16, extension bit at 38 */
  59        V_32,   /* Vector reg. starting at position 32, extension bit at 39 */
  60        W_12,   /* Vector reg. at bit 12, extension at bit 37, used as index */
  61        B_16,   /* Base register starting at position 16 */
  62        B_32,   /* Base register starting at position 32 */
  63        X_12,   /* Index register starting at position 12 */
  64        D_20,   /* Displacement starting at position 20 */
  65        D_36,   /* Displacement starting at position 36 */
  66        D20_20, /* 20 bit displacement starting at 20 */
  67        L4_8,   /* 4 bit length starting at position 8 */
  68        L4_12,  /* 4 bit length starting at position 12 */
  69        L8_8,   /* 8 bit length starting at position 8 */
  70        U4_8,   /* 4 bit unsigned value starting at 8 */
  71        U4_12,  /* 4 bit unsigned value starting at 12 */
  72        U4_16,  /* 4 bit unsigned value starting at 16 */
  73        U4_20,  /* 4 bit unsigned value starting at 20 */
  74        U4_24,  /* 4 bit unsigned value starting at 24 */
  75        U4_28,  /* 4 bit unsigned value starting at 28 */
  76        U4_32,  /* 4 bit unsigned value starting at 32 */
  77        U4_36,  /* 4 bit unsigned value starting at 36 */
  78        U8_8,   /* 8 bit unsigned value starting at 8 */
  79        U8_16,  /* 8 bit unsigned value starting at 16 */
  80        U8_24,  /* 8 bit unsigned value starting at 24 */
  81        U8_32,  /* 8 bit unsigned value starting at 32 */
  82        I8_8,   /* 8 bit signed value starting at 8 */
  83        I8_16,  /* 8 bit signed value starting at 16 */
  84        I8_24,  /* 8 bit signed value starting at 24 */
  85        I8_32,  /* 8 bit signed value starting at 32 */
  86        J12_12, /* PC relative offset at 12 */
  87        I16_16, /* 16 bit signed value starting at 16 */
  88        I16_32, /* 32 bit signed value starting at 16 */
  89        U16_16, /* 16 bit unsigned value starting at 16 */
  90        U16_32, /* 32 bit unsigned value starting at 16 */
  91        J16_16, /* PC relative jump offset at 16 */
  92        J16_32, /* PC relative offset at 16 */
  93        I24_24, /* 24 bit signed value starting at 24 */
  94        J32_16, /* PC relative long offset at 16 */
  95        I32_16, /* 32 bit signed value starting at 16 */
  96        U32_16, /* 32 bit unsigned value starting at 16 */
  97        M_16,   /* 4 bit optional mask starting at 16 */
  98        M_20,   /* 4 bit optional mask starting at 20 */
  99        M_24,   /* 4 bit optional mask starting at 24 */
 100        M_28,   /* 4 bit optional mask starting at 28 */
 101        M_32,   /* 4 bit optional mask starting at 32 */
 102        RO_28,  /* optional GPR starting at position 28 */
 103};
 104
 105/*
 106 * Enumeration of the different instruction formats.
 107 * For details consult the principles of operation.
 108 */
 109enum {
 110        INSTR_INVALID,
 111        INSTR_E,
 112        INSTR_IE_UU,
 113        INSTR_MII_UPI,
 114        INSTR_RIE_R0IU, INSTR_RIE_R0UU, INSTR_RIE_RRP, INSTR_RIE_RRPU,
 115        INSTR_RIE_RRUUU, INSTR_RIE_RUPI, INSTR_RIE_RUPU, INSTR_RIE_RRI0,
 116        INSTR_RIL_RI, INSTR_RIL_RP, INSTR_RIL_RU, INSTR_RIL_UP,
 117        INSTR_RIS_R0RDU, INSTR_RIS_R0UU, INSTR_RIS_RURDI, INSTR_RIS_RURDU,
 118        INSTR_RI_RI, INSTR_RI_RP, INSTR_RI_RU, INSTR_RI_UP,
 119        INSTR_RRE_00, INSTR_RRE_0R, INSTR_RRE_AA, INSTR_RRE_AR, INSTR_RRE_F0,
 120        INSTR_RRE_FF, INSTR_RRE_FR, INSTR_RRE_R0, INSTR_RRE_RA, INSTR_RRE_RF,
 121        INSTR_RRE_RR, INSTR_RRE_RR_OPT,
 122        INSTR_RRF_0UFF, INSTR_RRF_F0FF, INSTR_RRF_F0FF2, INSTR_RRF_F0FR,
 123        INSTR_RRF_FFRU, INSTR_RRF_FUFF, INSTR_RRF_FUFF2, INSTR_RRF_M0RR,
 124        INSTR_RRF_R0RR, INSTR_RRF_R0RR2, INSTR_RRF_RMRR, INSTR_RRF_RURR,
 125        INSTR_RRF_U0FF, INSTR_RRF_U0RF, INSTR_RRF_U0RR, INSTR_RRF_UUFF,
 126        INSTR_RRF_UUFR, INSTR_RRF_UURF,
 127        INSTR_RRR_F0FF, INSTR_RRS_RRRDU,
 128        INSTR_RR_FF, INSTR_RR_R0, INSTR_RR_RR, INSTR_RR_U0, INSTR_RR_UR,
 129        INSTR_RSE_CCRD, INSTR_RSE_RRRD, INSTR_RSE_RURD,
 130        INSTR_RSI_RRP,
 131        INSTR_RSL_LRDFU, INSTR_RSL_R0RD,
 132        INSTR_RSY_AARD, INSTR_RSY_CCRD, INSTR_RSY_RRRD, INSTR_RSY_RURD,
 133        INSTR_RSY_RDRM, INSTR_RSY_RMRD,
 134        INSTR_RS_AARD, INSTR_RS_CCRD, INSTR_RS_R0RD, INSTR_RS_RRRD,
 135        INSTR_RS_RURD,
 136        INSTR_RXE_FRRD, INSTR_RXE_RRRD, INSTR_RXE_RRRDM,
 137        INSTR_RXF_FRRDF,
 138        INSTR_RXY_FRRD, INSTR_RXY_RRRD, INSTR_RXY_URRD,
 139        INSTR_RX_FRRD, INSTR_RX_RRRD, INSTR_RX_URRD,
 140        INSTR_SIL_RDI, INSTR_SIL_RDU,
 141        INSTR_SIY_IRD, INSTR_SIY_URD,
 142        INSTR_SI_URD,
 143        INSTR_SMI_U0RDP,
 144        INSTR_SSE_RDRD,
 145        INSTR_SSF_RRDRD, INSTR_SSF_RRDRD2,
 146        INSTR_SS_L0RDRD, INSTR_SS_LIRDRD, INSTR_SS_LLRDRD, INSTR_SS_RRRDRD,
 147        INSTR_SS_RRRDRD2, INSTR_SS_RRRDRD3,
 148        INSTR_S_00, INSTR_S_RD,
 149        INSTR_VRI_V0IM, INSTR_VRI_V0I0, INSTR_VRI_V0IIM, INSTR_VRI_VVIM,
 150        INSTR_VRI_VVV0IM, INSTR_VRI_VVV0I0, INSTR_VRI_VVIMM,
 151        INSTR_VRR_VV00MMM, INSTR_VRR_VV000MM, INSTR_VRR_VV0000M,
 152        INSTR_VRR_VV00000, INSTR_VRR_VVV0M0M, INSTR_VRR_VV00M0M,
 153        INSTR_VRR_VVV000M, INSTR_VRR_VVV000V, INSTR_VRR_VVV0000,
 154        INSTR_VRR_VVV0MMM, INSTR_VRR_VVV00MM, INSTR_VRR_VVVMM0V,
 155        INSTR_VRR_VVVM0MV, INSTR_VRR_VVVM00V, INSTR_VRR_VRR0000,
 156        INSTR_VRS_VVRDM, INSTR_VRS_VVRD0, INSTR_VRS_VRRDM, INSTR_VRS_VRRD0,
 157        INSTR_VRS_RVRDM,
 158        INSTR_VRV_VVRDM, INSTR_VRV_VWRDM,
 159        INSTR_VRX_VRRDM, INSTR_VRX_VRRD0,
 160};
 161
 162static const struct s390_operand operands[] =
 163{
 164        [UNUSED]  = { 0, 0, 0 },
 165        [R_8]    = {  4,  8, OPERAND_GPR },
 166        [R_12]   = {  4, 12, OPERAND_GPR },
 167        [R_16]   = {  4, 16, OPERAND_GPR },
 168        [R_20]   = {  4, 20, OPERAND_GPR },
 169        [R_24]   = {  4, 24, OPERAND_GPR },
 170        [R_28]   = {  4, 28, OPERAND_GPR },
 171        [R_32]   = {  4, 32, OPERAND_GPR },
 172        [F_8]    = {  4,  8, OPERAND_FPR },
 173        [F_12]   = {  4, 12, OPERAND_FPR },
 174        [F_16]   = {  4, 16, OPERAND_FPR },
 175        [F_20]   = {  4, 16, OPERAND_FPR },
 176        [F_24]   = {  4, 24, OPERAND_FPR },
 177        [F_28]   = {  4, 28, OPERAND_FPR },
 178        [F_32]   = {  4, 32, OPERAND_FPR },
 179        [A_8]    = {  4,  8, OPERAND_AR },
 180        [A_12]   = {  4, 12, OPERAND_AR },
 181        [A_24]   = {  4, 24, OPERAND_AR },
 182        [A_28]   = {  4, 28, OPERAND_AR },
 183        [C_8]    = {  4,  8, OPERAND_CR },
 184        [C_12]   = {  4, 12, OPERAND_CR },
 185        [V_8]    = {  4,  8, OPERAND_VR },
 186        [V_12]   = {  4, 12, OPERAND_VR },
 187        [V_16]   = {  4, 16, OPERAND_VR },
 188        [V_32]   = {  4, 32, OPERAND_VR },
 189        [W_12]   = {  4, 12, OPERAND_INDEX | OPERAND_VR },
 190        [B_16]   = {  4, 16, OPERAND_BASE | OPERAND_GPR },
 191        [B_32]   = {  4, 32, OPERAND_BASE | OPERAND_GPR },
 192        [X_12]   = {  4, 12, OPERAND_INDEX | OPERAND_GPR },
 193        [D_20]   = { 12, 20, OPERAND_DISP },
 194        [D_36]   = { 12, 36, OPERAND_DISP },
 195        [D20_20] = { 20, 20, OPERAND_DISP | OPERAND_SIGNED },
 196        [L4_8]   = {  4,  8, OPERAND_LENGTH },
 197        [L4_12]  = {  4, 12, OPERAND_LENGTH },
 198        [L8_8]   = {  8,  8, OPERAND_LENGTH },
 199        [U4_8]   = {  4,  8, 0 },
 200        [U4_12]  = {  4, 12, 0 },
 201        [U4_16]  = {  4, 16, 0 },
 202        [U4_20]  = {  4, 20, 0 },
 203        [U4_24]  = {  4, 24, 0 },
 204        [U4_28]  = {  4, 28, 0 },
 205        [U4_32]  = {  4, 32, 0 },
 206        [U4_36]  = {  4, 36, 0 },
 207        [U8_8]   = {  8,  8, 0 },
 208        [U8_16]  = {  8, 16, 0 },
 209        [U8_24]  = {  8, 24, 0 },
 210        [U8_32]  = {  8, 32, 0 },
 211        [J12_12] = { 12, 12, OPERAND_PCREL },
 212        [I8_8]   = {  8,  8, OPERAND_SIGNED },
 213        [I8_16]  = {  8, 16, OPERAND_SIGNED },
 214        [I8_24]  = {  8, 24, OPERAND_SIGNED },
 215        [I8_32]  = {  8, 32, OPERAND_SIGNED },
 216        [I16_32] = { 16, 32, OPERAND_SIGNED },
 217        [I16_16] = { 16, 16, OPERAND_SIGNED },
 218        [U16_16] = { 16, 16, 0 },
 219        [U16_32] = { 16, 32, 0 },
 220        [J16_16] = { 16, 16, OPERAND_PCREL },
 221        [J16_32] = { 16, 32, OPERAND_PCREL },
 222        [I24_24] = { 24, 24, OPERAND_SIGNED },
 223        [J32_16] = { 32, 16, OPERAND_PCREL },
 224        [I32_16] = { 32, 16, OPERAND_SIGNED },
 225        [U32_16] = { 32, 16, 0 },
 226        [M_16]   = {  4, 16, 0 },
 227        [M_20]   = {  4, 20, 0 },
 228        [M_24]   = {  4, 24, 0 },
 229        [M_28]   = {  4, 28, 0 },
 230        [M_32]   = {  4, 32, 0 },
 231        [RO_28]  = {  4, 28, OPERAND_GPR }
 232};
 233
 234static const unsigned char formats[][7] = {
 235        [INSTR_E]         = { 0xff, 0,0,0,0,0,0 },
 236        [INSTR_IE_UU]     = { 0xff, U4_24,U4_28,0,0,0,0 },
 237        [INSTR_MII_UPI]   = { 0xff, U4_8,J12_12,I24_24 },
 238        [INSTR_RIE_R0IU]  = { 0xff, R_8,I16_16,U4_32,0,0,0 },
 239        [INSTR_RIE_R0UU]  = { 0xff, R_8,U16_16,U4_32,0,0,0 },
 240        [INSTR_RIE_RRI0]  = { 0xff, R_8,R_12,I16_16,0,0,0 },
 241        [INSTR_RIE_RRPU]  = { 0xff, R_8,R_12,U4_32,J16_16,0,0 },
 242        [INSTR_RIE_RRP]   = { 0xff, R_8,R_12,J16_16,0,0,0 },
 243        [INSTR_RIE_RRUUU] = { 0xff, R_8,R_12,U8_16,U8_24,U8_32,0 },
 244        [INSTR_RIE_RUPI]  = { 0xff, R_8,I8_32,U4_12,J16_16,0,0 },
 245        [INSTR_RIE_RUPU]  = { 0xff, R_8,U8_32,U4_12,J16_16,0,0 },
 246        [INSTR_RIL_RI]    = { 0x0f, R_8,I32_16,0,0,0,0 },
 247        [INSTR_RIL_RP]    = { 0x0f, R_8,J32_16,0,0,0,0 },
 248        [INSTR_RIL_RU]    = { 0x0f, R_8,U32_16,0,0,0,0 },
 249        [INSTR_RIL_UP]    = { 0x0f, U4_8,J32_16,0,0,0,0 },
 250        [INSTR_RIS_R0RDU] = { 0xff, R_8,U8_32,D_20,B_16,0,0 },
 251        [INSTR_RIS_RURDI] = { 0xff, R_8,I8_32,U4_12,D_20,B_16,0 },
 252        [INSTR_RIS_RURDU] = { 0xff, R_8,U8_32,U4_12,D_20,B_16,0 },
 253        [INSTR_RI_RI]     = { 0x0f, R_8,I16_16,0,0,0,0 },
 254        [INSTR_RI_RP]     = { 0x0f, R_8,J16_16,0,0,0,0 },
 255        [INSTR_RI_RU]     = { 0x0f, R_8,U16_16,0,0,0,0 },
 256        [INSTR_RI_UP]     = { 0x0f, U4_8,J16_16,0,0,0,0 },
 257        [INSTR_RRE_00]    = { 0xff, 0,0,0,0,0,0 },
 258        [INSTR_RRE_0R]    = { 0xff, R_28,0,0,0,0,0 },
 259        [INSTR_RRE_AA]    = { 0xff, A_24,A_28,0,0,0,0 },
 260        [INSTR_RRE_AR]    = { 0xff, A_24,R_28,0,0,0,0 },
 261        [INSTR_RRE_F0]    = { 0xff, F_24,0,0,0,0,0 },
 262        [INSTR_RRE_FF]    = { 0xff, F_24,F_28,0,0,0,0 },
 263        [INSTR_RRE_FR]    = { 0xff, F_24,R_28,0,0,0,0 },
 264        [INSTR_RRE_R0]    = { 0xff, R_24,0,0,0,0,0 },
 265        [INSTR_RRE_RA]    = { 0xff, R_24,A_28,0,0,0,0 },
 266        [INSTR_RRE_RF]    = { 0xff, R_24,F_28,0,0,0,0 },
 267        [INSTR_RRE_RR]    = { 0xff, R_24,R_28,0,0,0,0 },
 268        [INSTR_RRE_RR_OPT]= { 0xff, R_24,RO_28,0,0,0,0 },
 269        [INSTR_RRF_0UFF]  = { 0xff, F_24,F_28,U4_20,0,0,0 },
 270        [INSTR_RRF_F0FF2] = { 0xff, F_24,F_16,F_28,0,0,0 },
 271        [INSTR_RRF_F0FF]  = { 0xff, F_16,F_24,F_28,0,0,0 },
 272        [INSTR_RRF_F0FR]  = { 0xff, F_24,F_16,R_28,0,0,0 },
 273        [INSTR_RRF_FFRU]  = { 0xff, F_24,F_16,R_28,U4_20,0,0 },
 274        [INSTR_RRF_FUFF]  = { 0xff, F_24,F_16,F_28,U4_20,0,0 },
 275        [INSTR_RRF_FUFF2] = { 0xff, F_24,F_28,F_16,U4_20,0,0 },
 276        [INSTR_RRF_M0RR]  = { 0xff, R_24,R_28,M_16,0,0,0 },
 277        [INSTR_RRF_R0RR]  = { 0xff, R_24,R_16,R_28,0,0,0 },
 278        [INSTR_RRF_R0RR2] = { 0xff, R_24,R_28,R_16,0,0,0 },
 279        [INSTR_RRF_RMRR]  = { 0xff, R_24,R_16,R_28,M_20,0,0 },
 280        [INSTR_RRF_RURR]  = { 0xff, R_24,R_28,R_16,U4_20,0,0 },
 281        [INSTR_RRF_U0FF]  = { 0xff, F_24,U4_16,F_28,0,0,0 },
 282        [INSTR_RRF_U0RF]  = { 0xff, R_24,U4_16,F_28,0,0,0 },
 283        [INSTR_RRF_U0RR]  = { 0xff, R_24,R_28,U4_16,0,0,0 },
 284        [INSTR_RRF_UUFF]  = { 0xff, F_24,U4_16,F_28,U4_20,0,0 },
 285        [INSTR_RRF_UUFR]  = { 0xff, F_24,U4_16,R_28,U4_20,0,0 },
 286        [INSTR_RRF_UURF]  = { 0xff, R_24,U4_16,F_28,U4_20,0,0 },
 287        [INSTR_RRR_F0FF]  = { 0xff, F_24,F_28,F_16,0,0,0 },
 288        [INSTR_RRS_RRRDU] = { 0xff, R_8,R_12,U4_32,D_20,B_16,0 },
 289        [INSTR_RR_FF]     = { 0xff, F_8,F_12,0,0,0,0 },
 290        [INSTR_RR_R0]     = { 0xff, R_8, 0,0,0,0,0 },
 291        [INSTR_RR_RR]     = { 0xff, R_8,R_12,0,0,0,0 },
 292        [INSTR_RR_U0]     = { 0xff, U8_8, 0,0,0,0,0 },
 293        [INSTR_RR_UR]     = { 0xff, U4_8,R_12,0,0,0,0 },
 294        [INSTR_RSE_CCRD]  = { 0xff, C_8,C_12,D_20,B_16,0,0 },
 295        [INSTR_RSE_RRRD]  = { 0xff, R_8,R_12,D_20,B_16,0,0 },
 296        [INSTR_RSE_RURD]  = { 0xff, R_8,U4_12,D_20,B_16,0,0 },
 297        [INSTR_RSI_RRP]   = { 0xff, R_8,R_12,J16_16,0,0,0 },
 298        [INSTR_RSL_LRDFU] = { 0xff, F_32,D_20,L4_8,B_16,U4_36,0 },
 299        [INSTR_RSL_R0RD]  = { 0xff, D_20,L4_8,B_16,0,0,0 },
 300        [INSTR_RSY_AARD]  = { 0xff, A_8,A_12,D20_20,B_16,0,0 },
 301        [INSTR_RSY_CCRD]  = { 0xff, C_8,C_12,D20_20,B_16,0,0 },
 302        [INSTR_RSY_RDRM]  = { 0xff, R_8,D20_20,B_16,U4_12,0,0 },
 303        [INSTR_RSY_RMRD]  = { 0xff, R_8,U4_12,D20_20,B_16,0,0 },
 304        [INSTR_RSY_RRRD]  = { 0xff, R_8,R_12,D20_20,B_16,0,0 },
 305        [INSTR_RSY_RURD]  = { 0xff, R_8,U4_12,D20_20,B_16,0,0 },
 306        [INSTR_RS_AARD]   = { 0xff, A_8,A_12,D_20,B_16,0,0 },
 307        [INSTR_RS_CCRD]   = { 0xff, C_8,C_12,D_20,B_16,0,0 },
 308        [INSTR_RS_R0RD]   = { 0xff, R_8,D_20,B_16,0,0,0 },
 309        [INSTR_RS_RRRD]   = { 0xff, R_8,R_12,D_20,B_16,0,0 },
 310        [INSTR_RS_RURD]   = { 0xff, R_8,U4_12,D_20,B_16,0,0 },
 311        [INSTR_RXE_FRRD]  = { 0xff, F_8,D_20,X_12,B_16,0,0 },
 312        [INSTR_RXE_RRRD]  = { 0xff, R_8,D_20,X_12,B_16,0,0 },
 313        [INSTR_RXE_RRRDM] = { 0xff, R_8,D_20,X_12,B_16,M_32,0 },
 314        [INSTR_RXF_FRRDF] = { 0xff, F_32,F_8,D_20,X_12,B_16,0 },
 315        [INSTR_RXY_FRRD]  = { 0xff, F_8,D20_20,X_12,B_16,0,0 },
 316        [INSTR_RXY_RRRD]  = { 0xff, R_8,D20_20,X_12,B_16,0,0 },
 317        [INSTR_RXY_URRD]  = { 0xff, U4_8,D20_20,X_12,B_16,0,0 },
 318        [INSTR_RX_FRRD]   = { 0xff, F_8,D_20,X_12,B_16,0,0 },
 319        [INSTR_RX_RRRD]   = { 0xff, R_8,D_20,X_12,B_16,0,0 },
 320        [INSTR_RX_URRD]   = { 0xff, U4_8,D_20,X_12,B_16,0,0 },
 321        [INSTR_SIL_RDI]   = { 0xff, D_20,B_16,I16_32,0,0,0 },
 322        [INSTR_SIL_RDU]   = { 0xff, D_20,B_16,U16_32,0,0,0 },
 323        [INSTR_SIY_IRD]   = { 0xff, D20_20,B_16,I8_8,0,0,0 },
 324        [INSTR_SIY_URD]   = { 0xff, D20_20,B_16,U8_8,0,0,0 },
 325        [INSTR_SI_URD]    = { 0xff, D_20,B_16,U8_8,0,0,0 },
 326        [INSTR_SMI_U0RDP] = { 0xff, U4_8,J16_32,D_20,B_16,0,0 },
 327        [INSTR_SSE_RDRD]  = { 0xff, D_20,B_16,D_36,B_32,0,0 },
 328        [INSTR_SSF_RRDRD] = { 0x0f, D_20,B_16,D_36,B_32,R_8,0 },
 329        [INSTR_SSF_RRDRD2]= { 0x0f, R_8,D_20,B_16,D_36,B_32,0 },
 330        [INSTR_SS_L0RDRD] = { 0xff, D_20,L8_8,B_16,D_36,B_32,0 },
 331        [INSTR_SS_LIRDRD] = { 0xff, D_20,L4_8,B_16,D_36,B_32,U4_12 },
 332        [INSTR_SS_LLRDRD] = { 0xff, D_20,L4_8,B_16,D_36,L4_12,B_32 },
 333        [INSTR_SS_RRRDRD2]= { 0xff, R_8,D_20,B_16,R_12,D_36,B_32 },
 334        [INSTR_SS_RRRDRD3]= { 0xff, R_8,R_12,D_20,B_16,D_36,B_32 },
 335        [INSTR_SS_RRRDRD] = { 0xff, D_20,R_8,B_16,D_36,B_32,R_12 },
 336        [INSTR_S_00]      = { 0xff, 0,0,0,0,0,0 },
 337        [INSTR_S_RD]      = { 0xff, D_20,B_16,0,0,0,0 },
 338        [INSTR_VRI_V0IM]  = { 0xff, V_8,I16_16,M_32,0,0,0 },
 339        [INSTR_VRI_V0I0]  = { 0xff, V_8,I16_16,0,0,0,0 },
 340        [INSTR_VRI_V0IIM] = { 0xff, V_8,I8_16,I8_24,M_32,0,0 },
 341        [INSTR_VRI_VVIM]  = { 0xff, V_8,I16_16,V_12,M_32,0,0 },
 342        [INSTR_VRI_VVV0IM]= { 0xff, V_8,V_12,V_16,I8_24,M_32,0 },
 343        [INSTR_VRI_VVV0I0]= { 0xff, V_8,V_12,V_16,I8_24,0,0 },
 344        [INSTR_VRI_VVIMM] = { 0xff, V_8,V_12,I16_16,M_32,M_28,0 },
 345        [INSTR_VRR_VV00MMM]={ 0xff, V_8,V_12,M_32,M_28,M_24,0 },
 346        [INSTR_VRR_VV000MM]={ 0xff, V_8,V_12,M_32,M_28,0,0 },
 347        [INSTR_VRR_VV0000M]={ 0xff, V_8,V_12,M_32,0,0,0 },
 348        [INSTR_VRR_VV00000]={ 0xff, V_8,V_12,0,0,0,0 },
 349        [INSTR_VRR_VVV0M0M]={ 0xff, V_8,V_12,V_16,M_32,M_24,0 },
 350        [INSTR_VRR_VV00M0M]={ 0xff, V_8,V_12,M_32,M_24,0,0 },
 351        [INSTR_VRR_VVV000M]={ 0xff, V_8,V_12,V_16,M_32,0,0 },
 352        [INSTR_VRR_VVV000V]={ 0xff, V_8,V_12,V_16,V_32,0,0 },
 353        [INSTR_VRR_VVV0000]={ 0xff, V_8,V_12,V_16,0,0,0 },
 354        [INSTR_VRR_VVV0MMM]={ 0xff, V_8,V_12,V_16,M_32,M_28,M_24 },
 355        [INSTR_VRR_VVV00MM]={ 0xff, V_8,V_12,V_16,M_32,M_28,0 },
 356        [INSTR_VRR_VVVMM0V]={ 0xff, V_8,V_12,V_16,V_32,M_20,M_24 },
 357        [INSTR_VRR_VVVM0MV]={ 0xff, V_8,V_12,V_16,V_32,M_28,M_20 },
 358        [INSTR_VRR_VVVM00V]={ 0xff, V_8,V_12,V_16,V_32,M_20,0 },
 359        [INSTR_VRR_VRR0000]={ 0xff, V_8,R_12,R_16,0,0,0 },
 360        [INSTR_VRS_VVRDM] = { 0xff, V_8,V_12,D_20,B_16,M_32,0 },
 361        [INSTR_VRS_VVRD0] = { 0xff, V_8,V_12,D_20,B_16,0,0 },
 362        [INSTR_VRS_VRRDM] = { 0xff, V_8,R_12,D_20,B_16,M_32,0 },
 363        [INSTR_VRS_VRRD0] = { 0xff, V_8,R_12,D_20,B_16,0,0 },
 364        [INSTR_VRS_RVRDM] = { 0xff, R_8,V_12,D_20,B_16,M_32,0 },
 365        [INSTR_VRV_VVRDM] = { 0xff, V_8,V_12,D_20,B_16,M_32,0 },
 366        [INSTR_VRV_VWRDM] = { 0xff, V_8,D_20,W_12,B_16,M_32,0 },
 367        [INSTR_VRX_VRRDM] = { 0xff, V_8,D_20,X_12,B_16,M_32,0 },
 368        [INSTR_VRX_VRRD0] = { 0xff, V_8,D_20,X_12,B_16,0,0 },
 369};
 370
 371enum {
 372        LONG_INSN_ALGHSIK,
 373        LONG_INSN_ALHHHR,
 374        LONG_INSN_ALHHLR,
 375        LONG_INSN_ALHSIK,
 376        LONG_INSN_ALSIHN,
 377        LONG_INSN_CDFBRA,
 378        LONG_INSN_CDGBRA,
 379        LONG_INSN_CDGTRA,
 380        LONG_INSN_CDLFBR,
 381        LONG_INSN_CDLFTR,
 382        LONG_INSN_CDLGBR,
 383        LONG_INSN_CDLGTR,
 384        LONG_INSN_CEFBRA,
 385        LONG_INSN_CEGBRA,
 386        LONG_INSN_CELFBR,
 387        LONG_INSN_CELGBR,
 388        LONG_INSN_CFDBRA,
 389        LONG_INSN_CFEBRA,
 390        LONG_INSN_CFXBRA,
 391        LONG_INSN_CGDBRA,
 392        LONG_INSN_CGDTRA,
 393        LONG_INSN_CGEBRA,
 394        LONG_INSN_CGXBRA,
 395        LONG_INSN_CGXTRA,
 396        LONG_INSN_CLFDBR,
 397        LONG_INSN_CLFDTR,
 398        LONG_INSN_CLFEBR,
 399        LONG_INSN_CLFHSI,
 400        LONG_INSN_CLFXBR,
 401        LONG_INSN_CLFXTR,
 402        LONG_INSN_CLGDBR,
 403        LONG_INSN_CLGDTR,
 404        LONG_INSN_CLGEBR,
 405        LONG_INSN_CLGFRL,
 406        LONG_INSN_CLGHRL,
 407        LONG_INSN_CLGHSI,
 408        LONG_INSN_CLGXBR,
 409        LONG_INSN_CLGXTR,
 410        LONG_INSN_CLHHSI,
 411        LONG_INSN_CXFBRA,
 412        LONG_INSN_CXGBRA,
 413        LONG_INSN_CXGTRA,
 414        LONG_INSN_CXLFBR,
 415        LONG_INSN_CXLFTR,
 416        LONG_INSN_CXLGBR,
 417        LONG_INSN_CXLGTR,
 418        LONG_INSN_FIDBRA,
 419        LONG_INSN_FIEBRA,
 420        LONG_INSN_FIXBRA,
 421        LONG_INSN_LDXBRA,
 422        LONG_INSN_LEDBRA,
 423        LONG_INSN_LEXBRA,
 424        LONG_INSN_LLGFAT,
 425        LONG_INSN_LLGFRL,
 426        LONG_INSN_LLGHRL,
 427        LONG_INSN_LLGTAT,
 428        LONG_INSN_POPCNT,
 429        LONG_INSN_RIEMIT,
 430        LONG_INSN_RINEXT,
 431        LONG_INSN_RISBGN,
 432        LONG_INSN_RISBHG,
 433        LONG_INSN_RISBLG,
 434        LONG_INSN_SLHHHR,
 435        LONG_INSN_SLHHLR,
 436        LONG_INSN_TABORT,
 437        LONG_INSN_TBEGIN,
 438        LONG_INSN_TBEGINC,
 439        LONG_INSN_PCISTG,
 440        LONG_INSN_MPCIFC,
 441        LONG_INSN_STPCIFC,
 442        LONG_INSN_PCISTB,
 443        LONG_INSN_VPOPCT,
 444        LONG_INSN_VERLLV,
 445        LONG_INSN_VESRAV,
 446        LONG_INSN_VESRLV,
 447        LONG_INSN_VSBCBI,
 448        LONG_INSN_STCCTM
 449};
 450
 451static char *long_insn_name[] = {
 452        [LONG_INSN_ALGHSIK] = "alghsik",
 453        [LONG_INSN_ALHHHR] = "alhhhr",
 454        [LONG_INSN_ALHHLR] = "alhhlr",
 455        [LONG_INSN_ALHSIK] = "alhsik",
 456        [LONG_INSN_ALSIHN] = "alsihn",
 457        [LONG_INSN_CDFBRA] = "cdfbra",
 458        [LONG_INSN_CDGBRA] = "cdgbra",
 459        [LONG_INSN_CDGTRA] = "cdgtra",
 460        [LONG_INSN_CDLFBR] = "cdlfbr",
 461        [LONG_INSN_CDLFTR] = "cdlftr",
 462        [LONG_INSN_CDLGBR] = "cdlgbr",
 463        [LONG_INSN_CDLGTR] = "cdlgtr",
 464        [LONG_INSN_CEFBRA] = "cefbra",
 465        [LONG_INSN_CEGBRA] = "cegbra",
 466        [LONG_INSN_CELFBR] = "celfbr",
 467        [LONG_INSN_CELGBR] = "celgbr",
 468        [LONG_INSN_CFDBRA] = "cfdbra",
 469        [LONG_INSN_CFEBRA] = "cfebra",
 470        [LONG_INSN_CFXBRA] = "cfxbra",
 471        [LONG_INSN_CGDBRA] = "cgdbra",
 472        [LONG_INSN_CGDTRA] = "cgdtra",
 473        [LONG_INSN_CGEBRA] = "cgebra",
 474        [LONG_INSN_CGXBRA] = "cgxbra",
 475        [LONG_INSN_CGXTRA] = "cgxtra",
 476        [LONG_INSN_CLFDBR] = "clfdbr",
 477        [LONG_INSN_CLFDTR] = "clfdtr",
 478        [LONG_INSN_CLFEBR] = "clfebr",
 479        [LONG_INSN_CLFHSI] = "clfhsi",
 480        [LONG_INSN_CLFXBR] = "clfxbr",
 481        [LONG_INSN_CLFXTR] = "clfxtr",
 482        [LONG_INSN_CLGDBR] = "clgdbr",
 483        [LONG_INSN_CLGDTR] = "clgdtr",
 484        [LONG_INSN_CLGEBR] = "clgebr",
 485        [LONG_INSN_CLGFRL] = "clgfrl",
 486        [LONG_INSN_CLGHRL] = "clghrl",
 487        [LONG_INSN_CLGHSI] = "clghsi",
 488        [LONG_INSN_CLGXBR] = "clgxbr",
 489        [LONG_INSN_CLGXTR] = "clgxtr",
 490        [LONG_INSN_CLHHSI] = "clhhsi",
 491        [LONG_INSN_CXFBRA] = "cxfbra",
 492        [LONG_INSN_CXGBRA] = "cxgbra",
 493        [LONG_INSN_CXGTRA] = "cxgtra",
 494        [LONG_INSN_CXLFBR] = "cxlfbr",
 495        [LONG_INSN_CXLFTR] = "cxlftr",
 496        [LONG_INSN_CXLGBR] = "cxlgbr",
 497        [LONG_INSN_CXLGTR] = "cxlgtr",
 498        [LONG_INSN_FIDBRA] = "fidbra",
 499        [LONG_INSN_FIEBRA] = "fiebra",
 500        [LONG_INSN_FIXBRA] = "fixbra",
 501        [LONG_INSN_LDXBRA] = "ldxbra",
 502        [LONG_INSN_LEDBRA] = "ledbra",
 503        [LONG_INSN_LEXBRA] = "lexbra",
 504        [LONG_INSN_LLGFAT] = "llgfat",
 505        [LONG_INSN_LLGFRL] = "llgfrl",
 506        [LONG_INSN_LLGHRL] = "llghrl",
 507        [LONG_INSN_LLGTAT] = "llgtat",
 508        [LONG_INSN_POPCNT] = "popcnt",
 509        [LONG_INSN_RIEMIT] = "riemit",
 510        [LONG_INSN_RINEXT] = "rinext",
 511        [LONG_INSN_RISBGN] = "risbgn",
 512        [LONG_INSN_RISBHG] = "risbhg",
 513        [LONG_INSN_RISBLG] = "risblg",
 514        [LONG_INSN_SLHHHR] = "slhhhr",
 515        [LONG_INSN_SLHHLR] = "slhhlr",
 516        [LONG_INSN_TABORT] = "tabort",
 517        [LONG_INSN_TBEGIN] = "tbegin",
 518        [LONG_INSN_TBEGINC] = "tbeginc",
 519        [LONG_INSN_PCISTG] = "pcistg",
 520        [LONG_INSN_MPCIFC] = "mpcifc",
 521        [LONG_INSN_STPCIFC] = "stpcifc",
 522        [LONG_INSN_PCISTB] = "pcistb",
 523        [LONG_INSN_VPOPCT] = "vpopct",
 524        [LONG_INSN_VERLLV] = "verllv",
 525        [LONG_INSN_VESRAV] = "vesrav",
 526        [LONG_INSN_VESRLV] = "vesrlv",
 527        [LONG_INSN_VSBCBI] = "vsbcbi",
 528        [LONG_INSN_STCCTM] = "stcctm",
 529};
 530
 531static struct s390_insn opcode[] = {
 532        { "bprp", 0xc5, INSTR_MII_UPI },
 533        { "bpp", 0xc7, INSTR_SMI_U0RDP },
 534        { "trtr", 0xd0, INSTR_SS_L0RDRD },
 535        { "lmd", 0xef, INSTR_SS_RRRDRD3 },
 536        { "spm", 0x04, INSTR_RR_R0 },
 537        { "balr", 0x05, INSTR_RR_RR },
 538        { "bctr", 0x06, INSTR_RR_RR },
 539        { "bcr", 0x07, INSTR_RR_UR },
 540        { "svc", 0x0a, INSTR_RR_U0 },
 541        { "bsm", 0x0b, INSTR_RR_RR },
 542        { "bassm", 0x0c, INSTR_RR_RR },
 543        { "basr", 0x0d, INSTR_RR_RR },
 544        { "mvcl", 0x0e, INSTR_RR_RR },
 545        { "clcl", 0x0f, INSTR_RR_RR },
 546        { "lpr", 0x10, INSTR_RR_RR },
 547        { "lnr", 0x11, INSTR_RR_RR },
 548        { "ltr", 0x12, INSTR_RR_RR },
 549        { "lcr", 0x13, INSTR_RR_RR },
 550        { "nr", 0x14, INSTR_RR_RR },
 551        { "clr", 0x15, INSTR_RR_RR },
 552        { "or", 0x16, INSTR_RR_RR },
 553        { "xr", 0x17, INSTR_RR_RR },
 554        { "lr", 0x18, INSTR_RR_RR },
 555        { "cr", 0x19, INSTR_RR_RR },
 556        { "ar", 0x1a, INSTR_RR_RR },
 557        { "sr", 0x1b, INSTR_RR_RR },
 558        { "mr", 0x1c, INSTR_RR_RR },
 559        { "dr", 0x1d, INSTR_RR_RR },
 560        { "alr", 0x1e, INSTR_RR_RR },
 561        { "slr", 0x1f, INSTR_RR_RR },
 562        { "lpdr", 0x20, INSTR_RR_FF },
 563        { "lndr", 0x21, INSTR_RR_FF },
 564        { "ltdr", 0x22, INSTR_RR_FF },
 565        { "lcdr", 0x23, INSTR_RR_FF },
 566        { "hdr", 0x24, INSTR_RR_FF },
 567        { "ldxr", 0x25, INSTR_RR_FF },
 568        { "mxr", 0x26, INSTR_RR_FF },
 569        { "mxdr", 0x27, INSTR_RR_FF },
 570        { "ldr", 0x28, INSTR_RR_FF },
 571        { "cdr", 0x29, INSTR_RR_FF },
 572        { "adr", 0x2a, INSTR_RR_FF },
 573        { "sdr", 0x2b, INSTR_RR_FF },
 574        { "mdr", 0x2c, INSTR_RR_FF },
 575        { "ddr", 0x2d, INSTR_RR_FF },
 576        { "awr", 0x2e, INSTR_RR_FF },
 577        { "swr", 0x2f, INSTR_RR_FF },
 578        { "lper", 0x30, INSTR_RR_FF },
 579        { "lner", 0x31, INSTR_RR_FF },
 580        { "lter", 0x32, INSTR_RR_FF },
 581        { "lcer", 0x33, INSTR_RR_FF },
 582        { "her", 0x34, INSTR_RR_FF },
 583        { "ledr", 0x35, INSTR_RR_FF },
 584        { "axr", 0x36, INSTR_RR_FF },
 585        { "sxr", 0x37, INSTR_RR_FF },
 586        { "ler", 0x38, INSTR_RR_FF },
 587        { "cer", 0x39, INSTR_RR_FF },
 588        { "aer", 0x3a, INSTR_RR_FF },
 589        { "ser", 0x3b, INSTR_RR_FF },
 590        { "mder", 0x3c, INSTR_RR_FF },
 591        { "der", 0x3d, INSTR_RR_FF },
 592        { "aur", 0x3e, INSTR_RR_FF },
 593        { "sur", 0x3f, INSTR_RR_FF },
 594        { "sth", 0x40, INSTR_RX_RRRD },
 595        { "la", 0x41, INSTR_RX_RRRD },
 596        { "stc", 0x42, INSTR_RX_RRRD },
 597        { "ic", 0x43, INSTR_RX_RRRD },
 598        { "ex", 0x44, INSTR_RX_RRRD },
 599        { "bal", 0x45, INSTR_RX_RRRD },
 600        { "bct", 0x46, INSTR_RX_RRRD },
 601        { "bc", 0x47, INSTR_RX_URRD },
 602        { "lh", 0x48, INSTR_RX_RRRD },
 603        { "ch", 0x49, INSTR_RX_RRRD },
 604        { "ah", 0x4a, INSTR_RX_RRRD },
 605        { "sh", 0x4b, INSTR_RX_RRRD },
 606        { "mh", 0x4c, INSTR_RX_RRRD },
 607        { "bas", 0x4d, INSTR_RX_RRRD },
 608        { "cvd", 0x4e, INSTR_RX_RRRD },
 609        { "cvb", 0x4f, INSTR_RX_RRRD },
 610        { "st", 0x50, INSTR_RX_RRRD },
 611        { "lae", 0x51, INSTR_RX_RRRD },
 612        { "n", 0x54, INSTR_RX_RRRD },
 613        { "cl", 0x55, INSTR_RX_RRRD },
 614        { "o", 0x56, INSTR_RX_RRRD },
 615        { "x", 0x57, INSTR_RX_RRRD },
 616        { "l", 0x58, INSTR_RX_RRRD },
 617        { "c", 0x59, INSTR_RX_RRRD },
 618        { "a", 0x5a, INSTR_RX_RRRD },
 619        { "s", 0x5b, INSTR_RX_RRRD },
 620        { "m", 0x5c, INSTR_RX_RRRD },
 621        { "d", 0x5d, INSTR_RX_RRRD },
 622        { "al", 0x5e, INSTR_RX_RRRD },
 623        { "sl", 0x5f, INSTR_RX_RRRD },
 624        { "std", 0x60, INSTR_RX_FRRD },
 625        { "mxd", 0x67, INSTR_RX_FRRD },
 626        { "ld", 0x68, INSTR_RX_FRRD },
 627        { "cd", 0x69, INSTR_RX_FRRD },
 628        { "ad", 0x6a, INSTR_RX_FRRD },
 629        { "sd", 0x6b, INSTR_RX_FRRD },
 630        { "md", 0x6c, INSTR_RX_FRRD },
 631        { "dd", 0x6d, INSTR_RX_FRRD },
 632        { "aw", 0x6e, INSTR_RX_FRRD },
 633        { "sw", 0x6f, INSTR_RX_FRRD },
 634        { "ste", 0x70, INSTR_RX_FRRD },
 635        { "ms", 0x71, INSTR_RX_RRRD },
 636        { "le", 0x78, INSTR_RX_FRRD },
 637        { "ce", 0x79, INSTR_RX_FRRD },
 638        { "ae", 0x7a, INSTR_RX_FRRD },
 639        { "se", 0x7b, INSTR_RX_FRRD },
 640        { "mde", 0x7c, INSTR_RX_FRRD },
 641        { "de", 0x7d, INSTR_RX_FRRD },
 642        { "au", 0x7e, INSTR_RX_FRRD },
 643        { "su", 0x7f, INSTR_RX_FRRD },
 644        { "ssm", 0x80, INSTR_S_RD },
 645        { "lpsw", 0x82, INSTR_S_RD },
 646        { "diag", 0x83, INSTR_RS_RRRD },
 647        { "brxh", 0x84, INSTR_RSI_RRP },
 648        { "brxle", 0x85, INSTR_RSI_RRP },
 649        { "bxh", 0x86, INSTR_RS_RRRD },
 650        { "bxle", 0x87, INSTR_RS_RRRD },
 651        { "srl", 0x88, INSTR_RS_R0RD },
 652        { "sll", 0x89, INSTR_RS_R0RD },
 653        { "sra", 0x8a, INSTR_RS_R0RD },
 654        { "sla", 0x8b, INSTR_RS_R0RD },
 655        { "srdl", 0x8c, INSTR_RS_R0RD },
 656        { "sldl", 0x8d, INSTR_RS_R0RD },
 657        { "srda", 0x8e, INSTR_RS_R0RD },
 658        { "slda", 0x8f, INSTR_RS_R0RD },
 659        { "stm", 0x90, INSTR_RS_RRRD },
 660        { "tm", 0x91, INSTR_SI_URD },
 661        { "mvi", 0x92, INSTR_SI_URD },
 662        { "ts", 0x93, INSTR_S_RD },
 663        { "ni", 0x94, INSTR_SI_URD },
 664        { "cli", 0x95, INSTR_SI_URD },
 665        { "oi", 0x96, INSTR_SI_URD },
 666        { "xi", 0x97, INSTR_SI_URD },
 667        { "lm", 0x98, INSTR_RS_RRRD },
 668        { "trace", 0x99, INSTR_RS_RRRD },
 669        { "lam", 0x9a, INSTR_RS_AARD },
 670        { "stam", 0x9b, INSTR_RS_AARD },
 671        { "mvcle", 0xa8, INSTR_RS_RRRD },
 672        { "clcle", 0xa9, INSTR_RS_RRRD },
 673        { "stnsm", 0xac, INSTR_SI_URD },
 674        { "stosm", 0xad, INSTR_SI_URD },
 675        { "sigp", 0xae, INSTR_RS_RRRD },
 676        { "mc", 0xaf, INSTR_SI_URD },
 677        { "lra", 0xb1, INSTR_RX_RRRD },
 678        { "stctl", 0xb6, INSTR_RS_CCRD },
 679        { "lctl", 0xb7, INSTR_RS_CCRD },
 680        { "cs", 0xba, INSTR_RS_RRRD },
 681        { "cds", 0xbb, INSTR_RS_RRRD },
 682        { "clm", 0xbd, INSTR_RS_RURD },
 683        { "stcm", 0xbe, INSTR_RS_RURD },
 684        { "icm", 0xbf, INSTR_RS_RURD },
 685        { "mvn", 0xd1, INSTR_SS_L0RDRD },
 686        { "mvc", 0xd2, INSTR_SS_L0RDRD },
 687        { "mvz", 0xd3, INSTR_SS_L0RDRD },
 688        { "nc", 0xd4, INSTR_SS_L0RDRD },
 689        { "clc", 0xd5, INSTR_SS_L0RDRD },
 690        { "oc", 0xd6, INSTR_SS_L0RDRD },
 691        { "xc", 0xd7, INSTR_SS_L0RDRD },
 692        { "mvck", 0xd9, INSTR_SS_RRRDRD },
 693        { "mvcp", 0xda, INSTR_SS_RRRDRD },
 694        { "mvcs", 0xdb, INSTR_SS_RRRDRD },
 695        { "tr", 0xdc, INSTR_SS_L0RDRD },
 696        { "trt", 0xdd, INSTR_SS_L0RDRD },
 697        { "ed", 0xde, INSTR_SS_L0RDRD },
 698        { "edmk", 0xdf, INSTR_SS_L0RDRD },
 699        { "pku", 0xe1, INSTR_SS_L0RDRD },
 700        { "unpku", 0xe2, INSTR_SS_L0RDRD },
 701        { "mvcin", 0xe8, INSTR_SS_L0RDRD },
 702        { "pka", 0xe9, INSTR_SS_L0RDRD },
 703        { "unpka", 0xea, INSTR_SS_L0RDRD },
 704        { "plo", 0xee, INSTR_SS_RRRDRD2 },
 705        { "srp", 0xf0, INSTR_SS_LIRDRD },
 706        { "mvo", 0xf1, INSTR_SS_LLRDRD },
 707        { "pack", 0xf2, INSTR_SS_LLRDRD },
 708        { "unpk", 0xf3, INSTR_SS_LLRDRD },
 709        { "zap", 0xf8, INSTR_SS_LLRDRD },
 710        { "cp", 0xf9, INSTR_SS_LLRDRD },
 711        { "ap", 0xfa, INSTR_SS_LLRDRD },
 712        { "sp", 0xfb, INSTR_SS_LLRDRD },
 713        { "mp", 0xfc, INSTR_SS_LLRDRD },
 714        { "dp", 0xfd, INSTR_SS_LLRDRD },
 715        { "", 0, INSTR_INVALID }
 716};
 717
 718static struct s390_insn opcode_01[] = {
 719        { "ptff", 0x04, INSTR_E },
 720        { "pfpo", 0x0a, INSTR_E },
 721        { "sam64", 0x0e, INSTR_E },
 722        { "pr", 0x01, INSTR_E },
 723        { "upt", 0x02, INSTR_E },
 724        { "sckpf", 0x07, INSTR_E },
 725        { "tam", 0x0b, INSTR_E },
 726        { "sam24", 0x0c, INSTR_E },
 727        { "sam31", 0x0d, INSTR_E },
 728        { "trap2", 0xff, INSTR_E },
 729        { "", 0, INSTR_INVALID }
 730};
 731
 732static struct s390_insn opcode_a5[] = {
 733        { "iihh", 0x00, INSTR_RI_RU },
 734        { "iihl", 0x01, INSTR_RI_RU },
 735        { "iilh", 0x02, INSTR_RI_RU },
 736        { "iill", 0x03, INSTR_RI_RU },
 737        { "nihh", 0x04, INSTR_RI_RU },
 738        { "nihl", 0x05, INSTR_RI_RU },
 739        { "nilh", 0x06, INSTR_RI_RU },
 740        { "nill", 0x07, INSTR_RI_RU },
 741        { "oihh", 0x08, INSTR_RI_RU },
 742        { "oihl", 0x09, INSTR_RI_RU },
 743        { "oilh", 0x0a, INSTR_RI_RU },
 744        { "oill", 0x0b, INSTR_RI_RU },
 745        { "llihh", 0x0c, INSTR_RI_RU },
 746        { "llihl", 0x0d, INSTR_RI_RU },
 747        { "llilh", 0x0e, INSTR_RI_RU },
 748        { "llill", 0x0f, INSTR_RI_RU },
 749        { "", 0, INSTR_INVALID }
 750};
 751
 752static struct s390_insn opcode_a7[] = {
 753        { "tmhh", 0x02, INSTR_RI_RU },
 754        { "tmhl", 0x03, INSTR_RI_RU },
 755        { "brctg", 0x07, INSTR_RI_RP },
 756        { "lghi", 0x09, INSTR_RI_RI },
 757        { "aghi", 0x0b, INSTR_RI_RI },
 758        { "mghi", 0x0d, INSTR_RI_RI },
 759        { "cghi", 0x0f, INSTR_RI_RI },
 760        { "tmlh", 0x00, INSTR_RI_RU },
 761        { "tmll", 0x01, INSTR_RI_RU },
 762        { "brc", 0x04, INSTR_RI_UP },
 763        { "bras", 0x05, INSTR_RI_RP },
 764        { "brct", 0x06, INSTR_RI_RP },
 765        { "lhi", 0x08, INSTR_RI_RI },
 766        { "ahi", 0x0a, INSTR_RI_RI },
 767        { "mhi", 0x0c, INSTR_RI_RI },
 768        { "chi", 0x0e, INSTR_RI_RI },
 769        { "", 0, INSTR_INVALID }
 770};
 771
 772static struct s390_insn opcode_aa[] = {
 773        { { 0, LONG_INSN_RINEXT }, 0x00, INSTR_RI_RI },
 774        { "rion", 0x01, INSTR_RI_RI },
 775        { "tric", 0x02, INSTR_RI_RI },
 776        { "rioff", 0x03, INSTR_RI_RI },
 777        { { 0, LONG_INSN_RIEMIT }, 0x04, INSTR_RI_RI },
 778        { "", 0, INSTR_INVALID }
 779};
 780
 781static struct s390_insn opcode_b2[] = {
 782        { "stckf", 0x7c, INSTR_S_RD },
 783        { "lpp", 0x80, INSTR_S_RD },
 784        { "lcctl", 0x84, INSTR_S_RD },
 785        { "lpctl", 0x85, INSTR_S_RD },
 786        { "qsi", 0x86, INSTR_S_RD },
 787        { "lsctl", 0x87, INSTR_S_RD },
 788        { "qctri", 0x8e, INSTR_S_RD },
 789        { "stfle", 0xb0, INSTR_S_RD },
 790        { "lpswe", 0xb2, INSTR_S_RD },
 791        { "srnmb", 0xb8, INSTR_S_RD },
 792        { "srnmt", 0xb9, INSTR_S_RD },
 793        { "lfas", 0xbd, INSTR_S_RD },
 794        { "scctr", 0xe0, INSTR_RRE_RR },
 795        { "spctr", 0xe1, INSTR_RRE_RR },
 796        { "ecctr", 0xe4, INSTR_RRE_RR },
 797        { "epctr", 0xe5, INSTR_RRE_RR },
 798        { "ppa", 0xe8, INSTR_RRF_U0RR },
 799        { "etnd", 0xec, INSTR_RRE_R0 },
 800        { "ecpga", 0xed, INSTR_RRE_RR },
 801        { "tend", 0xf8, INSTR_S_00 },
 802        { "niai", 0xfa, INSTR_IE_UU },
 803        { { 0, LONG_INSN_TABORT }, 0xfc, INSTR_S_RD },
 804        { "stidp", 0x02, INSTR_S_RD },
 805        { "sck", 0x04, INSTR_S_RD },
 806        { "stck", 0x05, INSTR_S_RD },
 807        { "sckc", 0x06, INSTR_S_RD },
 808        { "stckc", 0x07, INSTR_S_RD },
 809        { "spt", 0x08, INSTR_S_RD },
 810        { "stpt", 0x09, INSTR_S_RD },
 811        { "spka", 0x0a, INSTR_S_RD },
 812        { "ipk", 0x0b, INSTR_S_00 },
 813        { "ptlb", 0x0d, INSTR_S_00 },
 814        { "spx", 0x10, INSTR_S_RD },
 815        { "stpx", 0x11, INSTR_S_RD },
 816        { "stap", 0x12, INSTR_S_RD },
 817        { "sie", 0x14, INSTR_S_RD },
 818        { "pc", 0x18, INSTR_S_RD },
 819        { "sac", 0x19, INSTR_S_RD },
 820        { "cfc", 0x1a, INSTR_S_RD },
 821        { "servc", 0x20, INSTR_RRE_RR },
 822        { "ipte", 0x21, INSTR_RRE_RR },
 823        { "ipm", 0x22, INSTR_RRE_R0 },
 824        { "ivsk", 0x23, INSTR_RRE_RR },
 825        { "iac", 0x24, INSTR_RRE_R0 },
 826        { "ssar", 0x25, INSTR_RRE_R0 },
 827        { "epar", 0x26, INSTR_RRE_R0 },
 828        { "esar", 0x27, INSTR_RRE_R0 },
 829        { "pt", 0x28, INSTR_RRE_RR },
 830        { "iske", 0x29, INSTR_RRE_RR },
 831        { "rrbe", 0x2a, INSTR_RRE_RR },
 832        { "sske", 0x2b, INSTR_RRF_M0RR },
 833        { "tb", 0x2c, INSTR_RRE_0R },
 834        { "dxr", 0x2d, INSTR_RRE_FF },
 835        { "pgin", 0x2e, INSTR_RRE_RR },
 836        { "pgout", 0x2f, INSTR_RRE_RR },
 837        { "csch", 0x30, INSTR_S_00 },
 838        { "hsch", 0x31, INSTR_S_00 },
 839        { "msch", 0x32, INSTR_S_RD },
 840        { "ssch", 0x33, INSTR_S_RD },
 841        { "stsch", 0x34, INSTR_S_RD },
 842        { "tsch", 0x35, INSTR_S_RD },
 843        { "tpi", 0x36, INSTR_S_RD },
 844        { "sal", 0x37, INSTR_S_00 },
 845        { "rsch", 0x38, INSTR_S_00 },
 846        { "stcrw", 0x39, INSTR_S_RD },
 847        { "stcps", 0x3a, INSTR_S_RD },
 848        { "rchp", 0x3b, INSTR_S_00 },
 849        { "schm", 0x3c, INSTR_S_00 },
 850        { "bakr", 0x40, INSTR_RRE_RR },
 851        { "cksm", 0x41, INSTR_RRE_RR },
 852        { "sqdr", 0x44, INSTR_RRE_FF },
 853        { "sqer", 0x45, INSTR_RRE_FF },
 854        { "stura", 0x46, INSTR_RRE_RR },
 855        { "msta", 0x47, INSTR_RRE_R0 },
 856        { "palb", 0x48, INSTR_RRE_00 },
 857        { "ereg", 0x49, INSTR_RRE_RR },
 858        { "esta", 0x4a, INSTR_RRE_RR },
 859        { "lura", 0x4b, INSTR_RRE_RR },
 860        { "tar", 0x4c, INSTR_RRE_AR },
 861        { "cpya", 0x4d, INSTR_RRE_AA },
 862        { "sar", 0x4e, INSTR_RRE_AR },
 863        { "ear", 0x4f, INSTR_RRE_RA },
 864        { "csp", 0x50, INSTR_RRE_RR },
 865        { "msr", 0x52, INSTR_RRE_RR },
 866        { "mvpg", 0x54, INSTR_RRE_RR },
 867        { "mvst", 0x55, INSTR_RRE_RR },
 868        { "cuse", 0x57, INSTR_RRE_RR },
 869        { "bsg", 0x58, INSTR_RRE_RR },
 870        { "bsa", 0x5a, INSTR_RRE_RR },
 871        { "clst", 0x5d, INSTR_RRE_RR },
 872        { "srst", 0x5e, INSTR_RRE_RR },
 873        { "cmpsc", 0x63, INSTR_RRE_RR },
 874        { "siga", 0x74, INSTR_S_RD },
 875        { "xsch", 0x76, INSTR_S_00 },
 876        { "rp", 0x77, INSTR_S_RD },
 877        { "stcke", 0x78, INSTR_S_RD },
 878        { "sacf", 0x79, INSTR_S_RD },
 879        { "stsi", 0x7d, INSTR_S_RD },
 880        { "srnm", 0x99, INSTR_S_RD },
 881        { "stfpc", 0x9c, INSTR_S_RD },
 882        { "lfpc", 0x9d, INSTR_S_RD },
 883        { "tre", 0xa5, INSTR_RRE_RR },
 884        { "cuutf", 0xa6, INSTR_RRF_M0RR },
 885        { "cutfu", 0xa7, INSTR_RRF_M0RR },
 886        { "stfl", 0xb1, INSTR_S_RD },
 887        { "trap4", 0xff, INSTR_S_RD },
 888        { "", 0, INSTR_INVALID }
 889};
 890
 891static struct s390_insn opcode_b3[] = {
 892        { "maylr", 0x38, INSTR_RRF_F0FF },
 893        { "mylr", 0x39, INSTR_RRF_F0FF },
 894        { "mayr", 0x3a, INSTR_RRF_F0FF },
 895        { "myr", 0x3b, INSTR_RRF_F0FF },
 896        { "mayhr", 0x3c, INSTR_RRF_F0FF },
 897        { "myhr", 0x3d, INSTR_RRF_F0FF },
 898        { "lpdfr", 0x70, INSTR_RRE_FF },
 899        { "lndfr", 0x71, INSTR_RRE_FF },
 900        { "cpsdr", 0x72, INSTR_RRF_F0FF2 },
 901        { "lcdfr", 0x73, INSTR_RRE_FF },
 902        { "sfasr", 0x85, INSTR_RRE_R0 },
 903        { { 0, LONG_INSN_CELFBR }, 0x90, INSTR_RRF_UUFR },
 904        { { 0, LONG_INSN_CDLFBR }, 0x91, INSTR_RRF_UUFR },
 905        { { 0, LONG_INSN_CXLFBR }, 0x92, INSTR_RRF_UURF },
 906        { { 0, LONG_INSN_CEFBRA }, 0x94, INSTR_RRF_UUFR },
 907        { { 0, LONG_INSN_CDFBRA }, 0x95, INSTR_RRF_UUFR },
 908        { { 0, LONG_INSN_CXFBRA }, 0x96, INSTR_RRF_UURF },
 909        { { 0, LONG_INSN_CFEBRA }, 0x98, INSTR_RRF_UURF },
 910        { { 0, LONG_INSN_CFDBRA }, 0x99, INSTR_RRF_UURF },
 911        { { 0, LONG_INSN_CFXBRA }, 0x9a, INSTR_RRF_UUFR },
 912        { { 0, LONG_INSN_CLFEBR }, 0x9c, INSTR_RRF_UURF },
 913        { { 0, LONG_INSN_CLFDBR }, 0x9d, INSTR_RRF_UURF },
 914        { { 0, LONG_INSN_CLFXBR }, 0x9e, INSTR_RRF_UUFR },
 915        { { 0, LONG_INSN_CELGBR }, 0xa0, INSTR_RRF_UUFR },
 916        { { 0, LONG_INSN_CDLGBR }, 0xa1, INSTR_RRF_UUFR },
 917        { { 0, LONG_INSN_CXLGBR }, 0xa2, INSTR_RRF_UURF },
 918        { { 0, LONG_INSN_CEGBRA }, 0xa4, INSTR_RRF_UUFR },
 919        { { 0, LONG_INSN_CDGBRA }, 0xa5, INSTR_RRF_UUFR },
 920        { { 0, LONG_INSN_CXGBRA }, 0xa6, INSTR_RRF_UURF },
 921        { { 0, LONG_INSN_CGEBRA }, 0xa8, INSTR_RRF_UURF },
 922        { { 0, LONG_INSN_CGDBRA }, 0xa9, INSTR_RRF_UURF },
 923        { { 0, LONG_INSN_CGXBRA }, 0xaa, INSTR_RRF_UUFR },
 924        { { 0, LONG_INSN_CLGEBR }, 0xac, INSTR_RRF_UURF },
 925        { { 0, LONG_INSN_CLGDBR }, 0xad, INSTR_RRF_UURF },
 926        { { 0, LONG_INSN_CLGXBR }, 0xae, INSTR_RRF_UUFR },
 927        { "ldgr", 0xc1, INSTR_RRE_FR },
 928        { "cegr", 0xc4, INSTR_RRE_FR },
 929        { "cdgr", 0xc5, INSTR_RRE_FR },
 930        { "cxgr", 0xc6, INSTR_RRE_FR },
 931        { "cger", 0xc8, INSTR_RRF_U0RF },
 932        { "cgdr", 0xc9, INSTR_RRF_U0RF },
 933        { "cgxr", 0xca, INSTR_RRF_U0RF },
 934        { "lgdr", 0xcd, INSTR_RRE_RF },
 935        { "mdtra", 0xd0, INSTR_RRF_FUFF2 },
 936        { "ddtra", 0xd1, INSTR_RRF_FUFF2 },
 937        { "adtra", 0xd2, INSTR_RRF_FUFF2 },
 938        { "sdtra", 0xd3, INSTR_RRF_FUFF2 },
 939        { "ldetr", 0xd4, INSTR_RRF_0UFF },
 940        { "ledtr", 0xd5, INSTR_RRF_UUFF },
 941        { "ltdtr", 0xd6, INSTR_RRE_FF },
 942        { "fidtr", 0xd7, INSTR_RRF_UUFF },
 943        { "mxtra", 0xd8, INSTR_RRF_FUFF2 },
 944        { "dxtra", 0xd9, INSTR_RRF_FUFF2 },
 945        { "axtra", 0xda, INSTR_RRF_FUFF2 },
 946        { "sxtra", 0xdb, INSTR_RRF_FUFF2 },
 947        { "lxdtr", 0xdc, INSTR_RRF_0UFF },
 948        { "ldxtr", 0xdd, INSTR_RRF_UUFF },
 949        { "ltxtr", 0xde, INSTR_RRE_FF },
 950        { "fixtr", 0xdf, INSTR_RRF_UUFF },
 951        { "kdtr", 0xe0, INSTR_RRE_FF },
 952        { { 0, LONG_INSN_CGDTRA }, 0xe1, INSTR_RRF_UURF },
 953        { "cudtr", 0xe2, INSTR_RRE_RF },
 954        { "csdtr", 0xe3, INSTR_RRE_RF },
 955        { "cdtr", 0xe4, INSTR_RRE_FF },
 956        { "eedtr", 0xe5, INSTR_RRE_RF },
 957        { "esdtr", 0xe7, INSTR_RRE_RF },
 958        { "kxtr", 0xe8, INSTR_RRE_FF },
 959        { { 0, LONG_INSN_CGXTRA }, 0xe9, INSTR_RRF_UUFR },
 960        { "cuxtr", 0xea, INSTR_RRE_RF },
 961        { "csxtr", 0xeb, INSTR_RRE_RF },
 962        { "cxtr", 0xec, INSTR_RRE_FF },
 963        { "eextr", 0xed, INSTR_RRE_RF },
 964        { "esxtr", 0xef, INSTR_RRE_RF },
 965        { { 0, LONG_INSN_CDGTRA }, 0xf1, INSTR_RRF_UUFR },
 966        { "cdutr", 0xf2, INSTR_RRE_FR },
 967        { "cdstr", 0xf3, INSTR_RRE_FR },
 968        { "cedtr", 0xf4, INSTR_RRE_FF },
 969        { "qadtr", 0xf5, INSTR_RRF_FUFF },
 970        { "iedtr", 0xf6, INSTR_RRF_F0FR },
 971        { "rrdtr", 0xf7, INSTR_RRF_FFRU },
 972        { { 0, LONG_INSN_CXGTRA }, 0xf9, INSTR_RRF_UURF },
 973        { "cxutr", 0xfa, INSTR_RRE_FR },
 974        { "cxstr", 0xfb, INSTR_RRE_FR },
 975        { "cextr", 0xfc, INSTR_RRE_FF },
 976        { "qaxtr", 0xfd, INSTR_RRF_FUFF },
 977        { "iextr", 0xfe, INSTR_RRF_F0FR },
 978        { "rrxtr", 0xff, INSTR_RRF_FFRU },
 979        { "lpebr", 0x00, INSTR_RRE_FF },
 980        { "lnebr", 0x01, INSTR_RRE_FF },
 981        { "ltebr", 0x02, INSTR_RRE_FF },
 982        { "lcebr", 0x03, INSTR_RRE_FF },
 983        { "ldebr", 0x04, INSTR_RRE_FF },
 984        { "lxdbr", 0x05, INSTR_RRE_FF },
 985        { "lxebr", 0x06, INSTR_RRE_FF },
 986        { "mxdbr", 0x07, INSTR_RRE_FF },
 987        { "kebr", 0x08, INSTR_RRE_FF },
 988        { "cebr", 0x09, INSTR_RRE_FF },
 989        { "aebr", 0x0a, INSTR_RRE_FF },
 990        { "sebr", 0x0b, INSTR_RRE_FF },
 991        { "mdebr", 0x0c, INSTR_RRE_FF },
 992        { "debr", 0x0d, INSTR_RRE_FF },
 993        { "maebr", 0x0e, INSTR_RRF_F0FF },
 994        { "msebr", 0x0f, INSTR_RRF_F0FF },
 995        { "lpdbr", 0x10, INSTR_RRE_FF },
 996        { "lndbr", 0x11, INSTR_RRE_FF },
 997        { "ltdbr", 0x12, INSTR_RRE_FF },
 998        { "lcdbr", 0x13, INSTR_RRE_FF },
 999        { "sqebr", 0x14, INSTR_RRE_FF },
1000        { "sqdbr", 0x15, INSTR_RRE_FF },
1001        { "sqxbr", 0x16, INSTR_RRE_FF },
1002        { "meebr", 0x17, INSTR_RRE_FF },
1003        { "kdbr", 0x18, INSTR_RRE_FF },
1004        { "cdbr", 0x19, INSTR_RRE_FF },
1005        { "adbr", 0x1a, INSTR_RRE_FF },
1006        { "sdbr", 0x1b, INSTR_RRE_FF },
1007        { "mdbr", 0x1c, INSTR_RRE_FF },
1008        { "ddbr", 0x1d, INSTR_RRE_FF },
1009        { "madbr", 0x1e, INSTR_RRF_F0FF },
1010        { "msdbr", 0x1f, INSTR_RRF_F0FF },
1011        { "lder", 0x24, INSTR_RRE_FF },
1012        { "lxdr", 0x25, INSTR_RRE_FF },
1013        { "lxer", 0x26, INSTR_RRE_FF },
1014        { "maer", 0x2e, INSTR_RRF_F0FF },
1015        { "mser", 0x2f, INSTR_RRF_F0FF },
1016        { "sqxr", 0x36, INSTR_RRE_FF },
1017        { "meer", 0x37, INSTR_RRE_FF },
1018        { "madr", 0x3e, INSTR_RRF_F0FF },
1019        { "msdr", 0x3f, INSTR_RRF_F0FF },
1020        { "lpxbr", 0x40, INSTR_RRE_FF },
1021        { "lnxbr", 0x41, INSTR_RRE_FF },
1022        { "ltxbr", 0x42, INSTR_RRE_FF },
1023        { "lcxbr", 0x43, INSTR_RRE_FF },
1024        { { 0, LONG_INSN_LEDBRA }, 0x44, INSTR_RRF_UUFF },
1025        { { 0, LONG_INSN_LDXBRA }, 0x45, INSTR_RRF_UUFF },
1026        { { 0, LONG_INSN_LEXBRA }, 0x46, INSTR_RRF_UUFF },
1027        { { 0, LONG_INSN_FIXBRA }, 0x47, INSTR_RRF_UUFF },
1028        { "kxbr", 0x48, INSTR_RRE_FF },
1029        { "cxbr", 0x49, INSTR_RRE_FF },
1030        { "axbr", 0x4a, INSTR_RRE_FF },
1031        { "sxbr", 0x4b, INSTR_RRE_FF },
1032        { "mxbr", 0x4c, INSTR_RRE_FF },
1033        { "dxbr", 0x4d, INSTR_RRE_FF },
1034        { "tbedr", 0x50, INSTR_RRF_U0FF },
1035        { "tbdr", 0x51, INSTR_RRF_U0FF },
1036        { "diebr", 0x53, INSTR_RRF_FUFF },
1037        { { 0, LONG_INSN_FIEBRA }, 0x57, INSTR_RRF_UUFF },
1038        { "thder", 0x58, INSTR_RRE_FF },
1039        { "thdr", 0x59, INSTR_RRE_FF },
1040        { "didbr", 0x5b, INSTR_RRF_FUFF },
1041        { { 0, LONG_INSN_FIDBRA }, 0x5f, INSTR_RRF_UUFF },
1042        { "lpxr", 0x60, INSTR_RRE_FF },
1043        { "lnxr", 0x61, INSTR_RRE_FF },
1044        { "ltxr", 0x62, INSTR_RRE_FF },
1045        { "lcxr", 0x63, INSTR_RRE_FF },
1046        { "lxr", 0x65, INSTR_RRE_FF },
1047        { "lexr", 0x66, INSTR_RRE_FF },
1048        { "fixr", 0x67, INSTR_RRE_FF },
1049        { "cxr", 0x69, INSTR_RRE_FF },
1050        { "lzer", 0x74, INSTR_RRE_F0 },
1051        { "lzdr", 0x75, INSTR_RRE_F0 },
1052        { "lzxr", 0x76, INSTR_RRE_F0 },
1053        { "fier", 0x77, INSTR_RRE_FF },
1054        { "fidr", 0x7f, INSTR_RRE_FF },
1055        { "sfpc", 0x84, INSTR_RRE_RR_OPT },
1056        { "efpc", 0x8c, INSTR_RRE_RR_OPT },
1057        { "cefbr", 0x94, INSTR_RRE_RF },
1058        { "cdfbr", 0x95, INSTR_RRE_RF },
1059        { "cxfbr", 0x96, INSTR_RRE_RF },
1060        { "cfebr", 0x98, INSTR_RRF_U0RF },
1061        { "cfdbr", 0x99, INSTR_RRF_U0RF },
1062        { "cfxbr", 0x9a, INSTR_RRF_U0RF },
1063        { "cefr", 0xb4, INSTR_RRE_FR },
1064        { "cdfr", 0xb5, INSTR_RRE_FR },
1065        { "cxfr", 0xb6, INSTR_RRE_FR },
1066        { "cfer", 0xb8, INSTR_RRF_U0RF },
1067        { "cfdr", 0xb9, INSTR_RRF_U0RF },
1068        { "cfxr", 0xba, INSTR_RRF_U0RF },
1069        { "", 0, INSTR_INVALID }
1070};
1071
1072static struct s390_insn opcode_b9[] = {
1073        { "lpgr", 0x00, INSTR_RRE_RR },
1074        { "lngr", 0x01, INSTR_RRE_RR },
1075        { "ltgr", 0x02, INSTR_RRE_RR },
1076        { "lcgr", 0x03, INSTR_RRE_RR },
1077        { "lgr", 0x04, INSTR_RRE_RR },
1078        { "lurag", 0x05, INSTR_RRE_RR },
1079        { "lgbr", 0x06, INSTR_RRE_RR },
1080        { "lghr", 0x07, INSTR_RRE_RR },
1081        { "agr", 0x08, INSTR_RRE_RR },
1082        { "sgr", 0x09, INSTR_RRE_RR },
1083        { "algr", 0x0a, INSTR_RRE_RR },
1084        { "slgr", 0x0b, INSTR_RRE_RR },
1085        { "msgr", 0x0c, INSTR_RRE_RR },
1086        { "dsgr", 0x0d, INSTR_RRE_RR },
1087        { "eregg", 0x0e, INSTR_RRE_RR },
1088        { "lrvgr", 0x0f, INSTR_RRE_RR },
1089        { "lpgfr", 0x10, INSTR_RRE_RR },
1090        { "lngfr", 0x11, INSTR_RRE_RR },
1091        { "ltgfr", 0x12, INSTR_RRE_RR },
1092        { "lcgfr", 0x13, INSTR_RRE_RR },
1093        { "lgfr", 0x14, INSTR_RRE_RR },
1094        { "llgfr", 0x16, INSTR_RRE_RR },
1095        { "llgtr", 0x17, INSTR_RRE_RR },
1096        { "agfr", 0x18, INSTR_RRE_RR },
1097        { "sgfr", 0x19, INSTR_RRE_RR },
1098        { "algfr", 0x1a, INSTR_RRE_RR },
1099        { "slgfr", 0x1b, INSTR_RRE_RR },
1100        { "msgfr", 0x1c, INSTR_RRE_RR },
1101        { "dsgfr", 0x1d, INSTR_RRE_RR },
1102        { "cgr", 0x20, INSTR_RRE_RR },
1103        { "clgr", 0x21, INSTR_RRE_RR },
1104        { "sturg", 0x25, INSTR_RRE_RR },
1105        { "lbr", 0x26, INSTR_RRE_RR },
1106        { "lhr", 0x27, INSTR_RRE_RR },
1107        { "cgfr", 0x30, INSTR_RRE_RR },
1108        { "clgfr", 0x31, INSTR_RRE_RR },
1109        { "cfdtr", 0x41, INSTR_RRF_UURF },
1110        { { 0, LONG_INSN_CLGDTR }, 0x42, INSTR_RRF_UURF },
1111        { { 0, LONG_INSN_CLFDTR }, 0x43, INSTR_RRF_UURF },
1112        { "bctgr", 0x46, INSTR_RRE_RR },
1113        { "cfxtr", 0x49, INSTR_RRF_UURF },
1114        { { 0, LONG_INSN_CLGXTR }, 0x4a, INSTR_RRF_UUFR },
1115        { { 0, LONG_INSN_CLFXTR }, 0x4b, INSTR_RRF_UUFR },
1116        { "cdftr", 0x51, INSTR_RRF_UUFR },
1117        { { 0, LONG_INSN_CDLGTR }, 0x52, INSTR_RRF_UUFR },
1118        { { 0, LONG_INSN_CDLFTR }, 0x53, INSTR_RRF_UUFR },
1119        { "cxftr", 0x59, INSTR_RRF_UURF },
1120        { { 0, LONG_INSN_CXLGTR }, 0x5a, INSTR_RRF_UURF },
1121        { { 0, LONG_INSN_CXLFTR }, 0x5b, INSTR_RRF_UUFR },
1122        { "cgrt", 0x60, INSTR_RRF_U0RR },
1123        { "clgrt", 0x61, INSTR_RRF_U0RR },
1124        { "crt", 0x72, INSTR_RRF_U0RR },
1125        { "clrt", 0x73, INSTR_RRF_U0RR },
1126        { "ngr", 0x80, INSTR_RRE_RR },
1127        { "ogr", 0x81, INSTR_RRE_RR },
1128        { "xgr", 0x82, INSTR_RRE_RR },
1129        { "flogr", 0x83, INSTR_RRE_RR },
1130        { "llgcr", 0x84, INSTR_RRE_RR },
1131        { "llghr", 0x85, INSTR_RRE_RR },
1132        { "mlgr", 0x86, INSTR_RRE_RR },
1133        { "dlgr", 0x87, INSTR_RRE_RR },
1134        { "alcgr", 0x88, INSTR_RRE_RR },
1135        { "slbgr", 0x89, INSTR_RRE_RR },
1136        { "cspg", 0x8a, INSTR_RRE_RR },
1137        { "idte", 0x8e, INSTR_RRF_R0RR },
1138        { "crdte", 0x8f, INSTR_RRF_RMRR },
1139        { "llcr", 0x94, INSTR_RRE_RR },
1140        { "llhr", 0x95, INSTR_RRE_RR },
1141        { "esea", 0x9d, INSTR_RRE_R0 },
1142        { "ptf", 0xa2, INSTR_RRE_R0 },
1143        { "lptea", 0xaa, INSTR_RRF_RURR },
1144        { "rrbm", 0xae, INSTR_RRE_RR },
1145        { "pfmf", 0xaf, INSTR_RRE_RR },
1146        { "cu14", 0xb0, INSTR_RRF_M0RR },
1147        { "cu24", 0xb1, INSTR_RRF_M0RR },
1148        { "cu41", 0xb2, INSTR_RRE_RR },
1149        { "cu42", 0xb3, INSTR_RRE_RR },
1150        { "trtre", 0xbd, INSTR_RRF_M0RR },
1151        { "srstu", 0xbe, INSTR_RRE_RR },
1152        { "trte", 0xbf, INSTR_RRF_M0RR },
1153        { "ahhhr", 0xc8, INSTR_RRF_R0RR2 },
1154        { "shhhr", 0xc9, INSTR_RRF_R0RR2 },
1155        { { 0, LONG_INSN_ALHHHR }, 0xca, INSTR_RRF_R0RR2 },
1156        { { 0, LONG_INSN_SLHHHR }, 0xcb, INSTR_RRF_R0RR2 },
1157        { "chhr", 0xcd, INSTR_RRE_RR },
1158        { "clhhr", 0xcf, INSTR_RRE_RR },
1159        { { 0, LONG_INSN_PCISTG }, 0xd0, INSTR_RRE_RR },
1160        { "pcilg", 0xd2, INSTR_RRE_RR },
1161        { "rpcit", 0xd3, INSTR_RRE_RR },
1162        { "ahhlr", 0xd8, INSTR_RRF_R0RR2 },
1163        { "shhlr", 0xd9, INSTR_RRF_R0RR2 },
1164        { { 0, LONG_INSN_ALHHLR }, 0xda, INSTR_RRF_R0RR2 },
1165        { { 0, LONG_INSN_SLHHLR }, 0xdb, INSTR_RRF_R0RR2 },
1166        { "chlr", 0xdd, INSTR_RRE_RR },
1167        { "clhlr", 0xdf, INSTR_RRE_RR },
1168        { { 0, LONG_INSN_POPCNT }, 0xe1, INSTR_RRE_RR },
1169        { "locgr", 0xe2, INSTR_RRF_M0RR },
1170        { "ngrk", 0xe4, INSTR_RRF_R0RR2 },
1171        { "ogrk", 0xe6, INSTR_RRF_R0RR2 },
1172        { "xgrk", 0xe7, INSTR_RRF_R0RR2 },
1173        { "agrk", 0xe8, INSTR_RRF_R0RR2 },
1174        { "sgrk", 0xe9, INSTR_RRF_R0RR2 },
1175        { "algrk", 0xea, INSTR_RRF_R0RR2 },
1176        { "slgrk", 0xeb, INSTR_RRF_R0RR2 },
1177        { "locr", 0xf2, INSTR_RRF_M0RR },
1178        { "nrk", 0xf4, INSTR_RRF_R0RR2 },
1179        { "ork", 0xf6, INSTR_RRF_R0RR2 },
1180        { "xrk", 0xf7, INSTR_RRF_R0RR2 },
1181        { "ark", 0xf8, INSTR_RRF_R0RR2 },
1182        { "srk", 0xf9, INSTR_RRF_R0RR2 },
1183        { "alrk", 0xfa, INSTR_RRF_R0RR2 },
1184        { "slrk", 0xfb, INSTR_RRF_R0RR2 },
1185        { "kmac", 0x1e, INSTR_RRE_RR },
1186        { "lrvr", 0x1f, INSTR_RRE_RR },
1187        { "km", 0x2e, INSTR_RRE_RR },
1188        { "kmc", 0x2f, INSTR_RRE_RR },
1189        { "kimd", 0x3e, INSTR_RRE_RR },
1190        { "klmd", 0x3f, INSTR_RRE_RR },
1191        { "epsw", 0x8d, INSTR_RRE_RR },
1192        { "trtt", 0x90, INSTR_RRF_M0RR },
1193        { "trto", 0x91, INSTR_RRF_M0RR },
1194        { "trot", 0x92, INSTR_RRF_M0RR },
1195        { "troo", 0x93, INSTR_RRF_M0RR },
1196        { "mlr", 0x96, INSTR_RRE_RR },
1197        { "dlr", 0x97, INSTR_RRE_RR },
1198        { "alcr", 0x98, INSTR_RRE_RR },
1199        { "slbr", 0x99, INSTR_RRE_RR },
1200        { "", 0, INSTR_INVALID }
1201};
1202
1203static struct s390_insn opcode_c0[] = {
1204        { "lgfi", 0x01, INSTR_RIL_RI },
1205        { "xihf", 0x06, INSTR_RIL_RU },
1206        { "xilf", 0x07, INSTR_RIL_RU },
1207        { "iihf", 0x08, INSTR_RIL_RU },
1208        { "iilf", 0x09, INSTR_RIL_RU },
1209        { "nihf", 0x0a, INSTR_RIL_RU },
1210        { "nilf", 0x0b, INSTR_RIL_RU },
1211        { "oihf", 0x0c, INSTR_RIL_RU },
1212        { "oilf", 0x0d, INSTR_RIL_RU },
1213        { "llihf", 0x0e, INSTR_RIL_RU },
1214        { "llilf", 0x0f, INSTR_RIL_RU },
1215        { "larl", 0x00, INSTR_RIL_RP },
1216        { "brcl", 0x04, INSTR_RIL_UP },
1217        { "brasl", 0x05, INSTR_RIL_RP },
1218        { "", 0, INSTR_INVALID }
1219};
1220
1221static struct s390_insn opcode_c2[] = {
1222        { "msgfi", 0x00, INSTR_RIL_RI },
1223        { "msfi", 0x01, INSTR_RIL_RI },
1224        { "slgfi", 0x04, INSTR_RIL_RU },
1225        { "slfi", 0x05, INSTR_RIL_RU },
1226        { "agfi", 0x08, INSTR_RIL_RI },
1227        { "afi", 0x09, INSTR_RIL_RI },
1228        { "algfi", 0x0a, INSTR_RIL_RU },
1229        { "alfi", 0x0b, INSTR_RIL_RU },
1230        { "cgfi", 0x0c, INSTR_RIL_RI },
1231        { "cfi", 0x0d, INSTR_RIL_RI },
1232        { "clgfi", 0x0e, INSTR_RIL_RU },
1233        { "clfi", 0x0f, INSTR_RIL_RU },
1234        { "", 0, INSTR_INVALID }
1235};
1236
1237static struct s390_insn opcode_c4[] = {
1238        { "llhrl", 0x02, INSTR_RIL_RP },
1239        { "lghrl", 0x04, INSTR_RIL_RP },
1240        { "lhrl", 0x05, INSTR_RIL_RP },
1241        { { 0, LONG_INSN_LLGHRL }, 0x06, INSTR_RIL_RP },
1242        { "sthrl", 0x07, INSTR_RIL_RP },
1243        { "lgrl", 0x08, INSTR_RIL_RP },
1244        { "stgrl", 0x0b, INSTR_RIL_RP },
1245        { "lgfrl", 0x0c, INSTR_RIL_RP },
1246        { "lrl", 0x0d, INSTR_RIL_RP },
1247        { { 0, LONG_INSN_LLGFRL }, 0x0e, INSTR_RIL_RP },
1248        { "strl", 0x0f, INSTR_RIL_RP },
1249        { "", 0, INSTR_INVALID }
1250};
1251
1252static struct s390_insn opcode_c6[] = {
1253        { "exrl", 0x00, INSTR_RIL_RP },
1254        { "pfdrl", 0x02, INSTR_RIL_UP },
1255        { "cghrl", 0x04, INSTR_RIL_RP },
1256        { "chrl", 0x05, INSTR_RIL_RP },
1257        { { 0, LONG_INSN_CLGHRL }, 0x06, INSTR_RIL_RP },
1258        { "clhrl", 0x07, INSTR_RIL_RP },
1259        { "cgrl", 0x08, INSTR_RIL_RP },
1260        { "clgrl", 0x0a, INSTR_RIL_RP },
1261        { "cgfrl", 0x0c, INSTR_RIL_RP },
1262        { "crl", 0x0d, INSTR_RIL_RP },
1263        { { 0, LONG_INSN_CLGFRL }, 0x0e, INSTR_RIL_RP },
1264        { "clrl", 0x0f, INSTR_RIL_RP },
1265        { "", 0, INSTR_INVALID }
1266};
1267
1268static struct s390_insn opcode_c8[] = {
1269        { "mvcos", 0x00, INSTR_SSF_RRDRD },
1270        { "ectg", 0x01, INSTR_SSF_RRDRD },
1271        { "csst", 0x02, INSTR_SSF_RRDRD },
1272        { "lpd", 0x04, INSTR_SSF_RRDRD2 },
1273        { "lpdg", 0x05, INSTR_SSF_RRDRD2 },
1274        { "", 0, INSTR_INVALID }
1275};
1276
1277static struct s390_insn opcode_cc[] = {
1278        { "brcth", 0x06, INSTR_RIL_RP },
1279        { "aih", 0x08, INSTR_RIL_RI },
1280        { "alsih", 0x0a, INSTR_RIL_RI },
1281        { { 0, LONG_INSN_ALSIHN }, 0x0b, INSTR_RIL_RI },
1282        { "cih", 0x0d, INSTR_RIL_RI },
1283        { "clih", 0x0f, INSTR_RIL_RI },
1284        { "", 0, INSTR_INVALID }
1285};
1286
1287static struct s390_insn opcode_e3[] = {
1288        { "ltg", 0x02, INSTR_RXY_RRRD },
1289        { "lrag", 0x03, INSTR_RXY_RRRD },
1290        { "lg", 0x04, INSTR_RXY_RRRD },
1291        { "cvby", 0x06, INSTR_RXY_RRRD },
1292        { "ag", 0x08, INSTR_RXY_RRRD },
1293        { "sg", 0x09, INSTR_RXY_RRRD },
1294        { "alg", 0x0a, INSTR_RXY_RRRD },
1295        { "slg", 0x0b, INSTR_RXY_RRRD },
1296        { "msg", 0x0c, INSTR_RXY_RRRD },
1297        { "dsg", 0x0d, INSTR_RXY_RRRD },
1298        { "cvbg", 0x0e, INSTR_RXY_RRRD },
1299        { "lrvg", 0x0f, INSTR_RXY_RRRD },
1300        { "lt", 0x12, INSTR_RXY_RRRD },
1301        { "lray", 0x13, INSTR_RXY_RRRD },
1302        { "lgf", 0x14, INSTR_RXY_RRRD },
1303        { "lgh", 0x15, INSTR_RXY_RRRD },
1304        { "llgf", 0x16, INSTR_RXY_RRRD },
1305        { "llgt", 0x17, INSTR_RXY_RRRD },
1306        { "agf", 0x18, INSTR_RXY_RRRD },
1307        { "sgf", 0x19, INSTR_RXY_RRRD },
1308        { "algf", 0x1a, INSTR_RXY_RRRD },
1309        { "slgf", 0x1b, INSTR_RXY_RRRD },
1310        { "msgf", 0x1c, INSTR_RXY_RRRD },
1311        { "dsgf", 0x1d, INSTR_RXY_RRRD },
1312        { "cg", 0x20, INSTR_RXY_RRRD },
1313        { "clg", 0x21, INSTR_RXY_RRRD },
1314        { "stg", 0x24, INSTR_RXY_RRRD },
1315        { "ntstg", 0x25, INSTR_RXY_RRRD },
1316        { "cvdy", 0x26, INSTR_RXY_RRRD },
1317        { "cvdg", 0x2e, INSTR_RXY_RRRD },
1318        { "strvg", 0x2f, INSTR_RXY_RRRD },
1319        { "cgf", 0x30, INSTR_RXY_RRRD },
1320        { "clgf", 0x31, INSTR_RXY_RRRD },
1321        { "ltgf", 0x32, INSTR_RXY_RRRD },
1322        { "cgh", 0x34, INSTR_RXY_RRRD },
1323        { "pfd", 0x36, INSTR_RXY_URRD },
1324        { "strvh", 0x3f, INSTR_RXY_RRRD },
1325        { "bctg", 0x46, INSTR_RXY_RRRD },
1326        { "sty", 0x50, INSTR_RXY_RRRD },
1327        { "msy", 0x51, INSTR_RXY_RRRD },
1328        { "ny", 0x54, INSTR_RXY_RRRD },
1329        { "cly", 0x55, INSTR_RXY_RRRD },
1330        { "oy", 0x56, INSTR_RXY_RRRD },
1331        { "xy", 0x57, INSTR_RXY_RRRD },
1332        { "ly", 0x58, INSTR_RXY_RRRD },
1333        { "cy", 0x59, INSTR_RXY_RRRD },
1334        { "ay", 0x5a, INSTR_RXY_RRRD },
1335        { "sy", 0x5b, INSTR_RXY_RRRD },
1336        { "mfy", 0x5c, INSTR_RXY_RRRD },
1337        { "aly", 0x5e, INSTR_RXY_RRRD },
1338        { "sly", 0x5f, INSTR_RXY_RRRD },
1339        { "sthy", 0x70, INSTR_RXY_RRRD },
1340        { "lay", 0x71, INSTR_RXY_RRRD },
1341        { "stcy", 0x72, INSTR_RXY_RRRD },
1342        { "icy", 0x73, INSTR_RXY_RRRD },
1343        { "laey", 0x75, INSTR_RXY_RRRD },
1344        { "lb", 0x76, INSTR_RXY_RRRD },
1345        { "lgb", 0x77, INSTR_RXY_RRRD },
1346        { "lhy", 0x78, INSTR_RXY_RRRD },
1347        { "chy", 0x79, INSTR_RXY_RRRD },
1348        { "ahy", 0x7a, INSTR_RXY_RRRD },
1349        { "shy", 0x7b, INSTR_RXY_RRRD },
1350        { "mhy", 0x7c, INSTR_RXY_RRRD },
1351        { "ng", 0x80, INSTR_RXY_RRRD },
1352        { "og", 0x81, INSTR_RXY_RRRD },
1353        { "xg", 0x82, INSTR_RXY_RRRD },
1354        { "lgat", 0x85, INSTR_RXY_RRRD },
1355        { "mlg", 0x86, INSTR_RXY_RRRD },
1356        { "dlg", 0x87, INSTR_RXY_RRRD },
1357        { "alcg", 0x88, INSTR_RXY_RRRD },
1358        { "slbg", 0x89, INSTR_RXY_RRRD },
1359        { "stpq", 0x8e, INSTR_RXY_RRRD },
1360        { "lpq", 0x8f, INSTR_RXY_RRRD },
1361        { "llgc", 0x90, INSTR_RXY_RRRD },
1362        { "llgh", 0x91, INSTR_RXY_RRRD },
1363        { "llc", 0x94, INSTR_RXY_RRRD },
1364        { "llh", 0x95, INSTR_RXY_RRRD },
1365        { { 0, LONG_INSN_LLGTAT }, 0x9c, INSTR_RXY_RRRD },
1366        { { 0, LONG_INSN_LLGFAT }, 0x9d, INSTR_RXY_RRRD },
1367        { "lat", 0x9f, INSTR_RXY_RRRD },
1368        { "lbh", 0xc0, INSTR_RXY_RRRD },
1369        { "llch", 0xc2, INSTR_RXY_RRRD },
1370        { "stch", 0xc3, INSTR_RXY_RRRD },
1371        { "lhh", 0xc4, INSTR_RXY_RRRD },
1372        { "llhh", 0xc6, INSTR_RXY_RRRD },
1373        { "sthh", 0xc7, INSTR_RXY_RRRD },
1374        { "lfhat", 0xc8, INSTR_RXY_RRRD },
1375        { "lfh", 0xca, INSTR_RXY_RRRD },
1376        { "stfh", 0xcb, INSTR_RXY_RRRD },
1377        { "chf", 0xcd, INSTR_RXY_RRRD },
1378        { "clhf", 0xcf, INSTR_RXY_RRRD },
1379        { { 0, LONG_INSN_MPCIFC }, 0xd0, INSTR_RXY_RRRD },
1380        { { 0, LONG_INSN_STPCIFC }, 0xd4, INSTR_RXY_RRRD },
1381        { "lrv", 0x1e, INSTR_RXY_RRRD },
1382        { "lrvh", 0x1f, INSTR_RXY_RRRD },
1383        { "strv", 0x3e, INSTR_RXY_RRRD },
1384        { "ml", 0x96, INSTR_RXY_RRRD },
1385        { "dl", 0x97, INSTR_RXY_RRRD },
1386        { "alc", 0x98, INSTR_RXY_RRRD },
1387        { "slb", 0x99, INSTR_RXY_RRRD },
1388        { "", 0, INSTR_INVALID }
1389};
1390
1391static struct s390_insn opcode_e5[] = {
1392        { "strag", 0x02, INSTR_SSE_RDRD },
1393        { "mvhhi", 0x44, INSTR_SIL_RDI },
1394        { "mvghi", 0x48, INSTR_SIL_RDI },
1395        { "mvhi", 0x4c, INSTR_SIL_RDI },
1396        { "chhsi", 0x54, INSTR_SIL_RDI },
1397        { { 0, LONG_INSN_CLHHSI }, 0x55, INSTR_SIL_RDU },
1398        { "cghsi", 0x58, INSTR_SIL_RDI },
1399        { { 0, LONG_INSN_CLGHSI }, 0x59, INSTR_SIL_RDU },
1400        { "chsi", 0x5c, INSTR_SIL_RDI },
1401        { { 0, LONG_INSN_CLFHSI }, 0x5d, INSTR_SIL_RDU },
1402        { { 0, LONG_INSN_TBEGIN }, 0x60, INSTR_SIL_RDU },
1403        { { 0, LONG_INSN_TBEGINC }, 0x61, INSTR_SIL_RDU },
1404        { "lasp", 0x00, INSTR_SSE_RDRD },
1405        { "tprot", 0x01, INSTR_SSE_RDRD },
1406        { "mvcsk", 0x0e, INSTR_SSE_RDRD },
1407        { "mvcdk", 0x0f, INSTR_SSE_RDRD },
1408        { "", 0, INSTR_INVALID }
1409};
1410
1411static struct s390_insn opcode_e7[] = {
1412        { "lcbb", 0x27, INSTR_RXE_RRRDM },
1413        { "vgef", 0x13, INSTR_VRV_VVRDM },
1414        { "vgeg", 0x12, INSTR_VRV_VVRDM },
1415        { "vgbm", 0x44, INSTR_VRI_V0I0 },
1416        { "vgm", 0x46, INSTR_VRI_V0IIM },
1417        { "vl", 0x06, INSTR_VRX_VRRD0 },
1418        { "vlr", 0x56, INSTR_VRR_VV00000 },
1419        { "vlrp", 0x05, INSTR_VRX_VRRDM },
1420        { "vleb", 0x00, INSTR_VRX_VRRDM },
1421        { "vleh", 0x01, INSTR_VRX_VRRDM },
1422        { "vlef", 0x03, INSTR_VRX_VRRDM },
1423        { "vleg", 0x02, INSTR_VRX_VRRDM },
1424        { "vleib", 0x40, INSTR_VRI_V0IM },
1425        { "vleih", 0x41, INSTR_VRI_V0IM },
1426        { "vleif", 0x43, INSTR_VRI_V0IM },
1427        { "vleig", 0x42, INSTR_VRI_V0IM },
1428        { "vlgv", 0x21, INSTR_VRS_RVRDM },
1429        { "vllez", 0x04, INSTR_VRX_VRRDM },
1430        { "vlm", 0x36, INSTR_VRS_VVRD0 },
1431        { "vlbb", 0x07, INSTR_VRX_VRRDM },
1432        { "vlvg", 0x22, INSTR_VRS_VRRDM },
1433        { "vlvgp", 0x62, INSTR_VRR_VRR0000 },
1434        { "vll", 0x37, INSTR_VRS_VRRD0 },
1435        { "vmrh", 0x61, INSTR_VRR_VVV000M },
1436        { "vmrl", 0x60, INSTR_VRR_VVV000M },
1437        { "vpk", 0x94, INSTR_VRR_VVV000M },
1438        { "vpks", 0x97, INSTR_VRR_VVV0M0M },
1439        { "vpkls", 0x95, INSTR_VRR_VVV0M0M },
1440        { "vperm", 0x8c, INSTR_VRR_VVV000V },
1441        { "vpdi", 0x84, INSTR_VRR_VVV000M },
1442        { "vrep", 0x4d, INSTR_VRI_VVIM },
1443        { "vrepi", 0x45, INSTR_VRI_V0IM },
1444        { "vscef", 0x1b, INSTR_VRV_VWRDM },
1445        { "vsceg", 0x1a, INSTR_VRV_VWRDM },
1446        { "vsel", 0x8d, INSTR_VRR_VVV000V },
1447        { "vseg", 0x5f, INSTR_VRR_VV0000M },
1448        { "vst", 0x0e, INSTR_VRX_VRRD0 },
1449        { "vsteb", 0x08, INSTR_VRX_VRRDM },
1450        { "vsteh", 0x09, INSTR_VRX_VRRDM },
1451        { "vstef", 0x0b, INSTR_VRX_VRRDM },
1452        { "vsteg", 0x0a, INSTR_VRX_VRRDM },
1453        { "vstm", 0x3e, INSTR_VRS_VVRD0 },
1454        { "vstl", 0x3f, INSTR_VRS_VRRD0 },
1455        { "vuph", 0xd7, INSTR_VRR_VV0000M },
1456        { "vuplh", 0xd5, INSTR_VRR_VV0000M },
1457        { "vupl", 0xd6, INSTR_VRR_VV0000M },
1458        { "vupll", 0xd4, INSTR_VRR_VV0000M },
1459        { "va", 0xf3, INSTR_VRR_VVV000M },
1460        { "vacc", 0xf1, INSTR_VRR_VVV000M },
1461        { "vac", 0xbb, INSTR_VRR_VVVM00V },
1462        { "vaccc", 0xb9, INSTR_VRR_VVVM00V },
1463        { "vn", 0x68, INSTR_VRR_VVV0000 },
1464        { "vnc", 0x69, INSTR_VRR_VVV0000 },
1465        { "vavg", 0xf2, INSTR_VRR_VVV000M },
1466        { "vavgl", 0xf0, INSTR_VRR_VVV000M },
1467        { "vcksm", 0x66, INSTR_VRR_VVV0000 },
1468        { "vec", 0xdb, INSTR_VRR_VV0000M },
1469        { "vecl", 0xd9, INSTR_VRR_VV0000M },
1470        { "vceq", 0xf8, INSTR_VRR_VVV0M0M },
1471        { "vch", 0xfb, INSTR_VRR_VVV0M0M },
1472        { "vchl", 0xf9, INSTR_VRR_VVV0M0M },
1473        { "vclz", 0x53, INSTR_VRR_VV0000M },
1474        { "vctz", 0x52, INSTR_VRR_VV0000M },
1475        { "vx", 0x6d, INSTR_VRR_VVV0000 },
1476        { "vgfm", 0xb4, INSTR_VRR_VVV000M },
1477        { "vgfma", 0xbc, INSTR_VRR_VVVM00V },
1478        { "vlc", 0xde, INSTR_VRR_VV0000M },
1479        { "vlp", 0xdf, INSTR_VRR_VV0000M },
1480        { "vmx", 0xff, INSTR_VRR_VVV000M },
1481        { "vmxl", 0xfd, INSTR_VRR_VVV000M },
1482        { "vmn", 0xfe, INSTR_VRR_VVV000M },
1483        { "vmnl", 0xfc, INSTR_VRR_VVV000M },
1484        { "vmal", 0xaa, INSTR_VRR_VVVM00V },
1485        { "vmae", 0xae, INSTR_VRR_VVVM00V },
1486        { "vmale", 0xac, INSTR_VRR_VVVM00V },
1487        { "vmah", 0xab, INSTR_VRR_VVVM00V },
1488        { "vmalh", 0xa9, INSTR_VRR_VVVM00V },
1489        { "vmao", 0xaf, INSTR_VRR_VVVM00V },
1490        { "vmalo", 0xad, INSTR_VRR_VVVM00V },
1491        { "vmh", 0xa3, INSTR_VRR_VVV000M },
1492        { "vmlh", 0xa1, INSTR_VRR_VVV000M },
1493        { "vml", 0xa2, INSTR_VRR_VVV000M },
1494        { "vme", 0xa6, INSTR_VRR_VVV000M },
1495        { "vmle", 0xa4, INSTR_VRR_VVV000M },
1496        { "vmo", 0xa7, INSTR_VRR_VVV000M },
1497        { "vmlo", 0xa5, INSTR_VRR_VVV000M },
1498        { "vno", 0x6b, INSTR_VRR_VVV0000 },
1499        { "vo", 0x6a, INSTR_VRR_VVV0000 },
1500        { { 0, LONG_INSN_VPOPCT }, 0x50, INSTR_VRR_VV0000M },
1501        { { 0, LONG_INSN_VERLLV }, 0x73, INSTR_VRR_VVV000M },
1502        { "verll", 0x33, INSTR_VRS_VVRDM },
1503        { "verim", 0x72, INSTR_VRI_VVV0IM },
1504        { "veslv", 0x70, INSTR_VRR_VVV000M },
1505        { "vesl", 0x30, INSTR_VRS_VVRDM },
1506        { { 0, LONG_INSN_VESRAV }, 0x7a, INSTR_VRR_VVV000M },
1507        { "vesra", 0x3a, INSTR_VRS_VVRDM },
1508        { { 0, LONG_INSN_VESRLV }, 0x78, INSTR_VRR_VVV000M },
1509        { "vesrl", 0x38, INSTR_VRS_VVRDM },
1510        { "vsl", 0x74, INSTR_VRR_VVV0000 },
1511        { "vslb", 0x75, INSTR_VRR_VVV0000 },
1512        { "vsldb", 0x77, INSTR_VRI_VVV0I0 },
1513        { "vsra", 0x7e, INSTR_VRR_VVV0000 },
1514        { "vsrab", 0x7f, INSTR_VRR_VVV0000 },
1515        { "vsrl", 0x7c, INSTR_VRR_VVV0000 },
1516        { "vsrlb", 0x7d, INSTR_VRR_VVV0000 },
1517        { "vs", 0xf7, INSTR_VRR_VVV000M },
1518        { "vscb", 0xf5, INSTR_VRR_VVV000M },
1519        { "vsb", 0xbf, INSTR_VRR_VVVM00V },
1520        { { 0, LONG_INSN_VSBCBI }, 0xbd, INSTR_VRR_VVVM00V },
1521        { "vsumg", 0x65, INSTR_VRR_VVV000M },
1522        { "vsumq", 0x67, INSTR_VRR_VVV000M },
1523        { "vsum", 0x64, INSTR_VRR_VVV000M },
1524        { "vtm", 0xd8, INSTR_VRR_VV00000 },
1525        { "vfae", 0x82, INSTR_VRR_VVV0M0M },
1526        { "vfee", 0x80, INSTR_VRR_VVV0M0M },
1527        { "vfene", 0x81, INSTR_VRR_VVV0M0M },
1528        { "vistr", 0x5c, INSTR_VRR_VV00M0M },
1529        { "vstrc", 0x8a, INSTR_VRR_VVVMM0V },
1530        { "vfa", 0xe3, INSTR_VRR_VVV00MM },
1531        { "wfc", 0xcb, INSTR_VRR_VV000MM },
1532        { "wfk", 0xca, INSTR_VRR_VV000MM },
1533        { "vfce", 0xe8, INSTR_VRR_VVV0MMM },
1534        { "vfch", 0xeb, INSTR_VRR_VVV0MMM },
1535        { "vfche", 0xea, INSTR_VRR_VVV0MMM },
1536        { "vcdg", 0xc3, INSTR_VRR_VV00MMM },
1537        { "vcdlg", 0xc1, INSTR_VRR_VV00MMM },
1538        { "vcgd", 0xc2, INSTR_VRR_VV00MMM },
1539        { "vclgd", 0xc0, INSTR_VRR_VV00MMM },
1540        { "vfd", 0xe5, INSTR_VRR_VVV00MM },
1541        { "vfi", 0xc7, INSTR_VRR_VV00MMM },
1542        { "vlde", 0xc4, INSTR_VRR_VV000MM },
1543        { "vled", 0xc5, INSTR_VRR_VV00MMM },
1544        { "vfm", 0xe7, INSTR_VRR_VVV00MM },
1545        { "vfma", 0x8f, INSTR_VRR_VVVM0MV },
1546        { "vfms", 0x8e, INSTR_VRR_VVVM0MV },
1547        { "vfpso", 0xcc, INSTR_VRR_VV00MMM },
1548        { "vfsq", 0xce, INSTR_VRR_VV000MM },
1549        { "vfs", 0xe2, INSTR_VRR_VVV00MM },
1550        { "vftci", 0x4a, INSTR_VRI_VVIMM },
1551};
1552
1553static struct s390_insn opcode_eb[] = {
1554        { "lmg", 0x04, INSTR_RSY_RRRD },
1555        { "srag", 0x0a, INSTR_RSY_RRRD },
1556        { "slag", 0x0b, INSTR_RSY_RRRD },
1557        { "srlg", 0x0c, INSTR_RSY_RRRD },
1558        { "sllg", 0x0d, INSTR_RSY_RRRD },
1559        { "tracg", 0x0f, INSTR_RSY_RRRD },
1560        { "csy", 0x14, INSTR_RSY_RRRD },
1561        { "rllg", 0x1c, INSTR_RSY_RRRD },
1562        { "clmh", 0x20, INSTR_RSY_RURD },
1563        { "clmy", 0x21, INSTR_RSY_RURD },
1564        { "clt", 0x23, INSTR_RSY_RURD },
1565        { "stmg", 0x24, INSTR_RSY_RRRD },
1566        { "stctg", 0x25, INSTR_RSY_CCRD },
1567        { "stmh", 0x26, INSTR_RSY_RRRD },
1568        { "clgt", 0x2b, INSTR_RSY_RURD },
1569        { "stcmh", 0x2c, INSTR_RSY_RURD },
1570        { "stcmy", 0x2d, INSTR_RSY_RURD },
1571        { "lctlg", 0x2f, INSTR_RSY_CCRD },
1572        { "csg", 0x30, INSTR_RSY_RRRD },
1573        { "cdsy", 0x31, INSTR_RSY_RRRD },
1574        { "cdsg", 0x3e, INSTR_RSY_RRRD },
1575        { "bxhg", 0x44, INSTR_RSY_RRRD },
1576        { "bxleg", 0x45, INSTR_RSY_RRRD },
1577        { "ecag", 0x4c, INSTR_RSY_RRRD },
1578        { "tmy", 0x51, INSTR_SIY_URD },
1579        { "mviy", 0x52, INSTR_SIY_URD },
1580        { "niy", 0x54, INSTR_SIY_URD },
1581        { "cliy", 0x55, INSTR_SIY_URD },
1582        { "oiy", 0x56, INSTR_SIY_URD },
1583        { "xiy", 0x57, INSTR_SIY_URD },
1584        { "asi", 0x6a, INSTR_SIY_IRD },
1585        { "alsi", 0x6e, INSTR_SIY_IRD },
1586        { "agsi", 0x7a, INSTR_SIY_IRD },
1587        { "algsi", 0x7e, INSTR_SIY_IRD },
1588        { "icmh", 0x80, INSTR_RSY_RURD },
1589        { "icmy", 0x81, INSTR_RSY_RURD },
1590        { "clclu", 0x8f, INSTR_RSY_RRRD },
1591        { "stmy", 0x90, INSTR_RSY_RRRD },
1592        { "lmh", 0x96, INSTR_RSY_RRRD },
1593        { "lmy", 0x98, INSTR_RSY_RRRD },
1594        { "lamy", 0x9a, INSTR_RSY_AARD },
1595        { "stamy", 0x9b, INSTR_RSY_AARD },
1596        { { 0, LONG_INSN_PCISTB }, 0xd0, INSTR_RSY_RRRD },
1597        { "sic", 0xd1, INSTR_RSY_RRRD },
1598        { "srak", 0xdc, INSTR_RSY_RRRD },
1599        { "slak", 0xdd, INSTR_RSY_RRRD },
1600        { "srlk", 0xde, INSTR_RSY_RRRD },
1601        { "sllk", 0xdf, INSTR_RSY_RRRD },
1602        { "locg", 0xe2, INSTR_RSY_RDRM },
1603        { "stocg", 0xe3, INSTR_RSY_RDRM },
1604        { "lang", 0xe4, INSTR_RSY_RRRD },
1605        { "laog", 0xe6, INSTR_RSY_RRRD },
1606        { "laxg", 0xe7, INSTR_RSY_RRRD },
1607        { "laag", 0xe8, INSTR_RSY_RRRD },
1608        { "laalg", 0xea, INSTR_RSY_RRRD },
1609        { "loc", 0xf2, INSTR_RSY_RDRM },
1610        { "stoc", 0xf3, INSTR_RSY_RDRM },
1611        { "lan", 0xf4, INSTR_RSY_RRRD },
1612        { "lao", 0xf6, INSTR_RSY_RRRD },
1613        { "lax", 0xf7, INSTR_RSY_RRRD },
1614        { "laa", 0xf8, INSTR_RSY_RRRD },
1615        { "laal", 0xfa, INSTR_RSY_RRRD },
1616        { "lric", 0x60, INSTR_RSY_RDRM },
1617        { "stric", 0x61, INSTR_RSY_RDRM },
1618        { "mric", 0x62, INSTR_RSY_RDRM },
1619        { { 0, LONG_INSN_STCCTM }, 0x17, INSTR_RSY_RMRD },
1620        { "rll", 0x1d, INSTR_RSY_RRRD },
1621        { "mvclu", 0x8e, INSTR_RSY_RRRD },
1622        { "tp", 0xc0, INSTR_RSL_R0RD },
1623        { "", 0, INSTR_INVALID }
1624};
1625
1626static struct s390_insn opcode_ec[] = {
1627        { "brxhg", 0x44, INSTR_RIE_RRP },
1628        { "brxlg", 0x45, INSTR_RIE_RRP },
1629        { { 0, LONG_INSN_RISBLG }, 0x51, INSTR_RIE_RRUUU },
1630        { "rnsbg", 0x54, INSTR_RIE_RRUUU },
1631        { "risbg", 0x55, INSTR_RIE_RRUUU },
1632        { "rosbg", 0x56, INSTR_RIE_RRUUU },
1633        { "rxsbg", 0x57, INSTR_RIE_RRUUU },
1634        { { 0, LONG_INSN_RISBGN }, 0x59, INSTR_RIE_RRUUU },
1635        { { 0, LONG_INSN_RISBHG }, 0x5D, INSTR_RIE_RRUUU },
1636        { "cgrj", 0x64, INSTR_RIE_RRPU },
1637        { "clgrj", 0x65, INSTR_RIE_RRPU },
1638        { "cgit", 0x70, INSTR_RIE_R0IU },
1639        { "clgit", 0x71, INSTR_RIE_R0UU },
1640        { "cit", 0x72, INSTR_RIE_R0IU },
1641        { "clfit", 0x73, INSTR_RIE_R0UU },
1642        { "crj", 0x76, INSTR_RIE_RRPU },
1643        { "clrj", 0x77, INSTR_RIE_RRPU },
1644        { "cgij", 0x7c, INSTR_RIE_RUPI },
1645        { "clgij", 0x7d, INSTR_RIE_RUPU },
1646        { "cij", 0x7e, INSTR_RIE_RUPI },
1647        { "clij", 0x7f, INSTR_RIE_RUPU },
1648        { "ahik", 0xd8, INSTR_RIE_RRI0 },
1649        { "aghik", 0xd9, INSTR_RIE_RRI0 },
1650        { { 0, LONG_INSN_ALHSIK }, 0xda, INSTR_RIE_RRI0 },
1651        { { 0, LONG_INSN_ALGHSIK }, 0xdb, INSTR_RIE_RRI0 },
1652        { "cgrb", 0xe4, INSTR_RRS_RRRDU },
1653        { "clgrb", 0xe5, INSTR_RRS_RRRDU },
1654        { "crb", 0xf6, INSTR_RRS_RRRDU },
1655        { "clrb", 0xf7, INSTR_RRS_RRRDU },
1656        { "cgib", 0xfc, INSTR_RIS_RURDI },
1657        { "clgib", 0xfd, INSTR_RIS_RURDU },
1658        { "cib", 0xfe, INSTR_RIS_RURDI },
1659        { "clib", 0xff, INSTR_RIS_RURDU },
1660        { "", 0, INSTR_INVALID }
1661};
1662
1663static struct s390_insn opcode_ed[] = {
1664        { "mayl", 0x38, INSTR_RXF_FRRDF },
1665        { "myl", 0x39, INSTR_RXF_FRRDF },
1666        { "may", 0x3a, INSTR_RXF_FRRDF },
1667        { "my", 0x3b, INSTR_RXF_FRRDF },
1668        { "mayh", 0x3c, INSTR_RXF_FRRDF },
1669        { "myh", 0x3d, INSTR_RXF_FRRDF },
1670        { "sldt", 0x40, INSTR_RXF_FRRDF },
1671        { "srdt", 0x41, INSTR_RXF_FRRDF },
1672        { "slxt", 0x48, INSTR_RXF_FRRDF },
1673        { "srxt", 0x49, INSTR_RXF_FRRDF },
1674        { "tdcet", 0x50, INSTR_RXE_FRRD },
1675        { "tdget", 0x51, INSTR_RXE_FRRD },
1676        { "tdcdt", 0x54, INSTR_RXE_FRRD },
1677        { "tdgdt", 0x55, INSTR_RXE_FRRD },
1678        { "tdcxt", 0x58, INSTR_RXE_FRRD },
1679        { "tdgxt", 0x59, INSTR_RXE_FRRD },
1680        { "ley", 0x64, INSTR_RXY_FRRD },
1681        { "ldy", 0x65, INSTR_RXY_FRRD },
1682        { "stey", 0x66, INSTR_RXY_FRRD },
1683        { "stdy", 0x67, INSTR_RXY_FRRD },
1684        { "czdt", 0xa8, INSTR_RSL_LRDFU },
1685        { "czxt", 0xa9, INSTR_RSL_LRDFU },
1686        { "cdzt", 0xaa, INSTR_RSL_LRDFU },
1687        { "cxzt", 0xab, INSTR_RSL_LRDFU },
1688        { "ldeb", 0x04, INSTR_RXE_FRRD },
1689        { "lxdb", 0x05, INSTR_RXE_FRRD },
1690        { "lxeb", 0x06, INSTR_RXE_FRRD },
1691        { "mxdb", 0x07, INSTR_RXE_FRRD },
1692        { "keb", 0x08, INSTR_RXE_FRRD },
1693        { "ceb", 0x09, INSTR_RXE_FRRD },
1694        { "aeb", 0x0a, INSTR_RXE_FRRD },
1695        { "seb", 0x0b, INSTR_RXE_FRRD },
1696        { "mdeb", 0x0c, INSTR_RXE_FRRD },
1697        { "deb", 0x0d, INSTR_RXE_FRRD },
1698        { "maeb", 0x0e, INSTR_RXF_FRRDF },
1699        { "mseb", 0x0f, INSTR_RXF_FRRDF },
1700        { "tceb", 0x10, INSTR_RXE_FRRD },
1701        { "tcdb", 0x11, INSTR_RXE_FRRD },
1702        { "tcxb", 0x12, INSTR_RXE_FRRD },
1703        { "sqeb", 0x14, INSTR_RXE_FRRD },
1704        { "sqdb", 0x15, INSTR_RXE_FRRD },
1705        { "meeb", 0x17, INSTR_RXE_FRRD },
1706        { "kdb", 0x18, INSTR_RXE_FRRD },
1707        { "cdb", 0x19, INSTR_RXE_FRRD },
1708        { "adb", 0x1a, INSTR_RXE_FRRD },
1709        { "sdb", 0x1b, INSTR_RXE_FRRD },
1710        { "mdb", 0x1c, INSTR_RXE_FRRD },
1711        { "ddb", 0x1d, INSTR_RXE_FRRD },
1712        { "madb", 0x1e, INSTR_RXF_FRRDF },
1713        { "msdb", 0x1f, INSTR_RXF_FRRDF },
1714        { "lde", 0x24, INSTR_RXE_FRRD },
1715        { "lxd", 0x25, INSTR_RXE_FRRD },
1716        { "lxe", 0x26, INSTR_RXE_FRRD },
1717        { "mae", 0x2e, INSTR_RXF_FRRDF },
1718        { "mse", 0x2f, INSTR_RXF_FRRDF },
1719        { "sqe", 0x34, INSTR_RXE_FRRD },
1720        { "sqd", 0x35, INSTR_RXE_FRRD },
1721        { "mee", 0x37, INSTR_RXE_FRRD },
1722        { "mad", 0x3e, INSTR_RXF_FRRDF },
1723        { "msd", 0x3f, INSTR_RXF_FRRDF },
1724        { "", 0, INSTR_INVALID }
1725};
1726
1727/* Extracts an operand value from an instruction.  */
1728static unsigned int extract_operand(unsigned char *code,
1729                                    const struct s390_operand *operand)
1730{
1731        unsigned char *cp;
1732        unsigned int val;
1733        int bits;
1734
1735        /* Extract fragments of the operand byte for byte.  */
1736        cp = code + operand->shift / 8;
1737        bits = (operand->shift & 7) + operand->bits;
1738        val = 0;
1739        do {
1740                val <<= 8;
1741                val |= (unsigned int) *cp++;
1742                bits -= 8;
1743        } while (bits > 0);
1744        val >>= -bits;
1745        val &= ((1U << (operand->bits - 1)) << 1) - 1;
1746
1747        /* Check for special long displacement case.  */
1748        if (operand->bits == 20 && operand->shift == 20)
1749                val = (val & 0xff) << 12 | (val & 0xfff00) >> 8;
1750
1751        /* Check for register extensions bits for vector registers. */
1752        if (operand->flags & OPERAND_VR) {
1753                if (operand->shift == 8)
1754                        val |= (code[4] & 8) << 1;
1755                else if (operand->shift == 12)
1756                        val |= (code[4] & 4) << 2;
1757                else if (operand->shift == 16)
1758                        val |= (code[4] & 2) << 3;
1759                else if (operand->shift == 32)
1760                        val |= (code[4] & 1) << 4;
1761        }
1762
1763        /* Sign extend value if the operand is signed or pc relative.  */
1764        if ((operand->flags & (OPERAND_SIGNED | OPERAND_PCREL)) &&
1765            (val & (1U << (operand->bits - 1))))
1766                val |= (-1U << (operand->bits - 1)) << 1;
1767
1768        /* Double value if the operand is pc relative.  */
1769        if (operand->flags & OPERAND_PCREL)
1770                val <<= 1;
1771
1772        /* Length x in an instructions has real length x + 1.  */
1773        if (operand->flags & OPERAND_LENGTH)
1774                val++;
1775        return val;
1776}
1777
1778struct s390_insn *find_insn(unsigned char *code)
1779{
1780        unsigned char opfrag = code[1];
1781        unsigned char opmask;
1782        struct s390_insn *table;
1783
1784        switch (code[0]) {
1785        case 0x01:
1786                table = opcode_01;
1787                break;
1788        case 0xa5:
1789                table = opcode_a5;
1790                break;
1791        case 0xa7:
1792                table = opcode_a7;
1793                break;
1794        case 0xaa:
1795                table = opcode_aa;
1796                break;
1797        case 0xb2:
1798                table = opcode_b2;
1799                break;
1800        case 0xb3:
1801                table = opcode_b3;
1802                break;
1803        case 0xb9:
1804                table = opcode_b9;
1805                break;
1806        case 0xc0:
1807                table = opcode_c0;
1808                break;
1809        case 0xc2:
1810                table = opcode_c2;
1811                break;
1812        case 0xc4:
1813                table = opcode_c4;
1814                break;
1815        case 0xc6:
1816                table = opcode_c6;
1817                break;
1818        case 0xc8:
1819                table = opcode_c8;
1820                break;
1821        case 0xcc:
1822                table = opcode_cc;
1823                break;
1824        case 0xe3:
1825                table = opcode_e3;
1826                opfrag = code[5];
1827                break;
1828        case 0xe5:
1829                table = opcode_e5;
1830                break;
1831        case 0xe7:
1832                table = opcode_e7;
1833                opfrag = code[5];
1834                break;
1835        case 0xeb:
1836                table = opcode_eb;
1837                opfrag = code[5];
1838                break;
1839        case 0xec:
1840                table = opcode_ec;
1841                opfrag = code[5];
1842                break;
1843        case 0xed:
1844                table = opcode_ed;
1845                opfrag = code[5];
1846                break;
1847        default:
1848                table = opcode;
1849                opfrag = code[0];
1850                break;
1851        }
1852        while (table->format != INSTR_INVALID) {
1853                opmask = formats[table->format][0];
1854                if (table->opfrag == (opfrag & opmask))
1855                        return table;
1856                table++;
1857        }
1858        return NULL;
1859}
1860
1861/**
1862 * insn_to_mnemonic - decode an s390 instruction
1863 * @instruction: instruction to decode
1864 * @buf: buffer to fill with mnemonic
1865 * @len: length of buffer
1866 *
1867 * Decode the instruction at @instruction and store the corresponding
1868 * mnemonic into @buf of length @len.
1869 * @buf is left unchanged if the instruction could not be decoded.
1870 * Returns:
1871 *  %0 on success, %-ENOENT if the instruction was not found.
1872 */
1873int insn_to_mnemonic(unsigned char *instruction, char *buf, unsigned int len)
1874{
1875        struct s390_insn *insn;
1876
1877        insn = find_insn(instruction);
1878        if (!insn)
1879                return -ENOENT;
1880        if (insn->name[0] == '\0')
1881                snprintf(buf, len, "%s",
1882                         long_insn_name[(int) insn->name[1]]);
1883        else
1884                snprintf(buf, len, "%.5s", insn->name);
1885        return 0;
1886}
1887EXPORT_SYMBOL_GPL(insn_to_mnemonic);
1888
1889static int print_insn(char *buffer, unsigned char *code, unsigned long addr)
1890{
1891        struct s390_insn *insn;
1892        const unsigned char *ops;
1893        const struct s390_operand *operand;
1894        unsigned int value;
1895        char separator;
1896        char *ptr;
1897        int i;
1898
1899        ptr = buffer;
1900        insn = find_insn(code);
1901        if (insn) {
1902                if (insn->name[0] == '\0')
1903                        ptr += sprintf(ptr, "%s\t",
1904                                       long_insn_name[(int) insn->name[1]]);
1905                else
1906                        ptr += sprintf(ptr, "%.5s\t", insn->name);
1907                /* Extract the operands. */
1908                separator = 0;
1909                for (ops = formats[insn->format] + 1, i = 0;
1910                     *ops != 0 && i < 6; ops++, i++) {
1911                        operand = operands + *ops;
1912                        value = extract_operand(code, operand);
1913                        if ((operand->flags & OPERAND_INDEX)  && value == 0)
1914                                continue;
1915                        if ((operand->flags & OPERAND_BASE) &&
1916                            value == 0 && separator == '(') {
1917                                separator = ',';
1918                                continue;
1919                        }
1920                        if (separator)
1921                                ptr += sprintf(ptr, "%c", separator);
1922                        if (operand->flags & OPERAND_GPR)
1923                                ptr += sprintf(ptr, "%%r%i", value);
1924                        else if (operand->flags & OPERAND_FPR)
1925                                ptr += sprintf(ptr, "%%f%i", value);
1926                        else if (operand->flags & OPERAND_AR)
1927                                ptr += sprintf(ptr, "%%a%i", value);
1928                        else if (operand->flags & OPERAND_CR)
1929                                ptr += sprintf(ptr, "%%c%i", value);
1930                        else if (operand->flags & OPERAND_VR)
1931                                ptr += sprintf(ptr, "%%v%i", value);
1932                        else if (operand->flags & OPERAND_PCREL)
1933                                ptr += sprintf(ptr, "%lx", (signed int) value
1934                                                                      + addr);
1935                        else if (operand->flags & OPERAND_SIGNED)
1936                                ptr += sprintf(ptr, "%i", value);
1937                        else
1938                                ptr += sprintf(ptr, "%u", value);
1939                        if (operand->flags & OPERAND_DISP)
1940                                separator = '(';
1941                        else if (operand->flags & OPERAND_BASE) {
1942                                ptr += sprintf(ptr, ")");
1943                                separator = ',';
1944                        } else
1945                                separator = ',';
1946                }
1947        } else
1948                ptr += sprintf(ptr, "unknown");
1949        return (int) (ptr - buffer);
1950}
1951
1952void show_code(struct pt_regs *regs)
1953{
1954        char *mode = user_mode(regs) ? "User" : "Krnl";
1955        unsigned char code[64];
1956        char buffer[64], *ptr;
1957        mm_segment_t old_fs;
1958        unsigned long addr;
1959        int start, end, opsize, hops, i;
1960
1961        /* Get a snapshot of the 64 bytes surrounding the fault address. */
1962        old_fs = get_fs();
1963        set_fs(user_mode(regs) ? USER_DS : KERNEL_DS);
1964        for (start = 32; start && regs->psw.addr >= 34 - start; start -= 2) {
1965                addr = regs->psw.addr - 34 + start;
1966                if (__copy_from_user(code + start - 2,
1967                                     (char __user *) addr, 2))
1968                        break;
1969        }
1970        for (end = 32; end < 64; end += 2) {
1971                addr = regs->psw.addr + end - 32;
1972                if (__copy_from_user(code + end,
1973                                     (char __user *) addr, 2))
1974                        break;
1975        }
1976        set_fs(old_fs);
1977        /* Code snapshot useable ? */
1978        if ((regs->psw.addr & 1) || start >= end) {
1979                printk("%s Code: Bad PSW.\n", mode);
1980                return;
1981        }
1982        /* Find a starting point for the disassembly. */
1983        while (start < 32) {
1984                for (i = 0, hops = 0; start + i < 32 && hops < 3; hops++) {
1985                        if (!find_insn(code + start + i))
1986                                break;
1987                        i += insn_length(code[start + i]);
1988                }
1989                if (start + i == 32)
1990                        /* Looks good, sequence ends at PSW. */
1991                        break;
1992                start += 2;
1993        }
1994        /* Decode the instructions. */
1995        ptr = buffer;
1996        ptr += sprintf(ptr, "%s Code:", mode);
1997        hops = 0;
1998        while (start < end && hops < 8) {
1999                opsize = insn_length(code[start]);
2000                if  (start + opsize == 32)
2001                        *ptr++ = '#';
2002                else if (start == 32)
2003                        *ptr++ = '>';
2004                else
2005                        *ptr++ = ' ';
2006                addr = regs->psw.addr + start - 32;
2007                ptr += sprintf(ptr, "%016lx: ", addr);
2008                if (start + opsize >= end)
2009                        break;
2010                for (i = 0; i < opsize; i++)
2011                        ptr += sprintf(ptr, "%02x", code[start + i]);
2012                *ptr++ = '\t';
2013                if (i < 6)
2014                        *ptr++ = '\t';
2015                ptr += print_insn(ptr, code + start, addr);
2016                start += opsize;
2017                pr_cont("%s", buffer);
2018                ptr = buffer;
2019                ptr += sprintf(ptr, "\n          ");
2020                hops++;
2021        }
2022        pr_cont("\n");
2023}
2024
2025void print_fn_code(unsigned char *code, unsigned long len)
2026{
2027        char buffer[64], *ptr;
2028        int opsize, i;
2029
2030        while (len) {
2031                ptr = buffer;
2032                opsize = insn_length(*code);
2033                if (opsize > len)
2034                        break;
2035                ptr += sprintf(ptr, "%p: ", code);
2036                for (i = 0; i < opsize; i++)
2037                        ptr += sprintf(ptr, "%02x", code[i]);
2038                *ptr++ = '\t';
2039                if (i < 4)
2040                        *ptr++ = '\t';
2041                ptr += print_insn(ptr, code, (unsigned long) code);
2042                *ptr++ = '\n';
2043                *ptr++ = 0;
2044                printk("%s", buffer);
2045                code += opsize;
2046                len -= opsize;
2047        }
2048}
2049