contrib/gdb/include/opcode/hppa.h

   1 /* Table of opcodes for the PA-RISC.
   2    Copyright (C) 1990, 1991, 1993, 1995 Free Software Foundation, Inc.
   3
   4    Contributed by the Center for Software Science at the
   5    University of Utah (pa-gdb-bugs@cs.utah.edu).
   6
   7 This file is part of GAS, the GNU Assembler, and GDB, the GNU disassembler.
   8
   9 GAS/GDB is free software; you can redistribute it and/or modify
  10 it under the terms of the GNU General Public License as published by
  11 the Free Software Foundation; either version 1, or (at your option)
  12 any later version.
  13
  14 GAS/GDB is distributed in the hope that it will be useful,
  15 but WITHOUT ANY WARRANTY; without even the implied warranty of
  16 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  17 GNU General Public License for more details.
  18
  19 You should have received a copy of the GNU General Public License
  20 along with GAS or GDB; see the file COPYING.  If not, write to
  21 the Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
  22
  23 #if !defined(__STDC__) && !defined(const)
  24 #define const
  25 #endif
  26
  27 /*
  28  * Structure of an opcode table entry.
  29  */
  30
  31 /* There are two kinds of delay slot nullification: normal which is
  32  * controled by the nullification bit, and conditional, which depends
  33  * on the direction of the branch and its success or failure.
  34  *
  35  * NONE is unfortunately #defined in the hiux system include files.
  36  * #undef it away.
  37  */
  38 #undef NONE
  39 struct pa_opcode
  40 {
  41     const char *name;
  42     unsigned long int match;    /* Bits that must be set...  */
  43     unsigned long int mask;     /* ... in these bits. */
  44     char *args;
  45     enum pa_arch arch;
  46 };
  47
  48 /*
  49    All hppa opcodes are 32 bits.
  50
  51    The match component is a mask saying which bits must match a
  52    particular opcode in order for an instruction to be an instance
  53    of that opcode.
  54
  55    The args component is a string containing one character
  56    for each operand of the instruction.
  57
  58    Bit positions in this description follow HP usage of lsb = 31,
  59    "at" is lsb of field.
  60
  61    In the args field, the following characters must match exactly:
  62
  63         '+,() '
  64
  65    In the args field, the following characters are unused:
  66
  67         '  "#$%    *+- ./   3      :; =   '
  68         ' B         L              [\] _'
  69         '    e gh   lm   qr        { } '
  70
  71    Here are all the characters:
  72
  73         ' !"#$%&'()*+-,./0123456789:;<=>?@'
  74         'ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_'
  75         'abcdefghijklmnopqrstuvwxyz{|}~'
  76
  77 Kinds of operands:
  78    x    integer register field at 15.
  79    b    integer register field at 10.
  80    t    integer register field at 31.
  81    y    floating point register field at 31
  82    5    5 bit immediate at 15.
  83    s    2 bit space specifier at 17.
  84    S    3 bit space specifier at 18.
  85    c    indexed load completer.
  86    C    short load and store completer.
  87    Y    Store Bytes Short completer
  88    <    non-negated compare/subtract conditions.
  89    a    compare/subtract conditions
  90    d    non-negated add conditions
  91    &    logical instruction conditions
  92    U    unit instruction conditions
  93    >    shift/extract/deposit conditions.
  94    ~    bvb,bb conditions
  95    V    5 bit immediate value at 31
  96    i    11 bit immediate value at 31
  97    j    14 bit immediate value at 31
  98    k    21 bit immediate value at 31
  99    n    nullification for branch instructions
 100    N    nullification for spop and copr instructions
 101    w    12 bit branch displacement
 102    W    17 bit branch displacement (PC relative)
 103    z    17 bit branch displacement (just a number, not an address)
 104
 105 Also these:
 106
 107    p    5 bit shift count at 26 (to support the SHD instruction) encoded as
 108         31-p
 109    P    5 bit bit position at 26
 110    T    5 bit field length at 31 (encoded as 32-T)
 111    A    13 bit immediate at 18 (to support the BREAK instruction)
 112    ^    like b, but describes a control register
 113    Z    System Control Completer (to support LPA, LHA, etc.)
 114    D    26 bit immediate at 31 (to support the DIAG instruction)
 115
 116    f    3 bit Special Function Unit identifier at 25
 117    O    20 bit Special Function Unit operation split between 15 bits at 20
 118         and 5 bits at 31
 119    o    15 bit Special Function Unit operation at 20
 120    2    22 bit Special Function Unit operation split between 17 bits at 20
 121         and 5 bits at 31
 122    1    15 bit Special Function Unit operation split between 10 bits at 20
 123         and 5 bits at 31
 124    0    10 bit Special Function Unit operation split between 5 bits at 20
 125         and 5 bits at 31
 126    u    3 bit coprocessor unit identifier at 25
 127    F    Source Floating Point Operand Format Completer encoded 2 bits at 20
 128    I    Source Floating Point Operand Format Completer encoded 1 bits at 20
 129         (for 0xe format FP instructions)
 130    G    Destination Floating Point Operand Format Completer encoded 2 bits at 18
 131    M    Floating-Point Compare Conditions (encoded as 5 bits at 31)
 132    ?    non-negated/negated compare/subtract conditions.
 133    @    non-negated/negated add conditions.
 134    !    non-negated add conditions.
 135
 136    s    2 bit space specifier at 17.
 137    b    register field at 10.
 138    r    5 bit immediate value at 31 (for the break instruction)
 139         (very similar to V above, except the value is unsigned instead of
 140         low_sign_ext)
 141    R    5 bit immediate value at 15 (for the ssm, rsm, probei instructions)
 142         (same as r above, except the value is in a different location)
 143    Q    5 bit immediate value at 10 (a bit position specified in
 144         the bb instruction. It's the same as r above, except the
 145         value is in a different location)
 146    |    shift/extract/deposit conditions when used in a conditional branch
 147
 148 And these (PJH) for PA-89 F.P. registers and instructions:
 149
 150    v    a 't' operand type extended to handle L/R register halves.
 151    E    a 'b' operand type extended to handle L/R register halves.
 152    X    an 'x' operand type extended to handle L/R register halves.
 153    J    a 'b' operand type further extended to handle extra 1.1 registers
 154    K    a 'x' operand type further extended to handle extra 1.1 registers
 155    4    a variation of the 'b' operand type for 'fmpyadd' and 'fmpysub'
 156    6    a variation of the 'x' operand type for 'fmpyadd' and 'fmpysub'
 157    7    a variation of the 't' operand type for 'fmpyadd' and 'fmpysub'
 158    8    5 bit register field at 20 (used in 'fmpyadd' and 'fmpysub')
 159    9    5 bit register field at 25 (used in 'fmpyadd' and 'fmpysub')
 160    H    Floating Point Operand Format at 26 for 'fmpyadd' and 'fmpysub'
 161         (very similar to 'F')
 162 */
 163
 164 /* The order of the opcodes in this table is significant:
 165
 166    * The assembler requires that all instances of the same mnemonic must be
 167    consecutive.  If they aren't, the assembler will bomb at runtime.
 168
 169    * The disassembler should not care about the order of the opcodes.  */
 170
 171 static const struct pa_opcode pa_opcodes[] =
 172 {
 173
 174 /* pseudo-instructions */
 175
 176 { "b",          0xe8000000, 0xffe0e000, "nW", pa10}, /* bl foo,r0 */
 177 { "ldi",        0x34000000, 0xffe0c000, "j,x", pa10},   /* ldo val(r0),r */
 178 { "comib",      0x84000000, 0xfc000000, "?n5,b,w", pa10}, /* comib{tf}*/
 179 { "comb",       0x80000000, 0xfc000000, "?nx,b,w", pa10}, /* comb{tf} */
 180 { "addb",       0xa0000000, 0xfc000000, "@nx,b,w", pa10}, /* addb{tf} */
 181 { "addib",      0xa4000000, 0xfc000000, "@n5,b,w", pa10}, /* addib{tf}*/
 182 { "nop",        0x08000240, 0xffffffff, "", pa10},      /* or 0,0,0 */
 183 { "copy",       0x08000240, 0xffe0ffe0, "x,t", pa10},   /* or r,0,t */
 184 { "mtsar",      0x01601840, 0xffe0ffff, "x", pa10}, /* mtctl r,cr11 */
 185
 186 /* Loads and Stores for integer registers.  */
 187 { "ldw",        0x48000000, 0xfc000000, "j(s,b),x", pa10},
 188 { "ldw",        0x48000000, 0xfc000000, "j(b),x", pa10},
 189 { "ldh",        0x44000000, 0xfc000000, "j(s,b),x", pa10},
 190 { "ldh",        0x44000000, 0xfc000000, "j(b),x", pa10},
 191 { "ldb",        0x40000000, 0xfc000000, "j(s,b),x", pa10},
 192 { "ldb",        0x40000000, 0xfc000000, "j(b),x", pa10},
 193 { "stw",        0x68000000, 0xfc000000, "x,j(s,b)", pa10},
 194 { "stw",        0x68000000, 0xfc000000, "x,j(b)", pa10},
 195 { "sth",        0x64000000, 0xfc000000, "x,j(s,b)", pa10},
 196 { "sth",        0x64000000, 0xfc000000, "x,j(b)", pa10},
 197 { "stb",        0x60000000, 0xfc000000, "x,j(s,b)", pa10},
 198 { "stb",        0x60000000, 0xfc000000, "x,j(b)", pa10},
 199 { "ldwm",       0x4c000000, 0xfc000000, "j(s,b),x", pa10},
 200 { "ldwm",       0x4c000000, 0xfc000000, "j(b),x", pa10},
 201 { "stwm",       0x6c000000, 0xfc000000, "x,j(s,b)", pa10},
 202 { "stwm",       0x6c000000, 0xfc000000, "x,j(b)", pa10},
 203 { "ldwx",       0x0c000080, 0xfc001fc0, "cx(s,b),t", pa10},
 204 { "ldwx",       0x0c000080, 0xfc001fc0, "cx(b),t", pa10},
 205 { "ldhx",       0x0c000040, 0xfc001fc0, "cx(s,b),t", pa10},
 206 { "ldhx",       0x0c000040, 0xfc001fc0, "cx(b),t", pa10},
 207 { "ldbx",       0x0c000000, 0xfc001fc0, "cx(s,b),t", pa10},
 208 { "ldbx",       0x0c000000, 0xfc001fc0, "cx(b),t", pa10},
 209 { "ldwax",      0x0c000180, 0xfc00dfc0, "cx(b),t", pa10},
 210 { "ldcwx",      0x0c0001c0, 0xfc001fc0, "cx(s,b),t", pa10},
 211 { "ldcwx",      0x0c0001c0, 0xfc001fc0, "cx(b),t", pa10},
 212 { "ldws",       0x0c001080, 0xfc001fc0, "C5(s,b),t", pa10},
 213 { "ldws",       0x0c001080, 0xfc001fc0, "C5(b),t", pa10},
 214 { "ldhs",       0x0c001040, 0xfc001fc0, "C5(s,b),t", pa10},
 215 { "ldhs",       0x0c001040, 0xfc001fc0, "C5(b),t", pa10},
 216 { "ldbs",       0x0c001000, 0xfc001fc0, "C5(s,b),t", pa10},
 217 { "ldbs",       0x0c001000, 0xfc001fc0, "C5(b),t", pa10},
 218 { "ldwas",      0x0c001180, 0xfc00dfc0, "C5(b),t", pa10},
 219 { "ldcws",      0x0c0011c0, 0xfc001fc0, "C5(s,b),t", pa10},
 220 { "ldcws",      0x0c0011c0, 0xfc001fc0, "C5(b),t", pa10},
 221 { "stws",       0x0c001280, 0xfc001fc0, "Cx,V(s,b)", pa10},
 222 { "stws",       0x0c001280, 0xfc001fc0, "Cx,V(b)", pa10},
 223 { "sths",       0x0c001240, 0xfc001fc0, "Cx,V(s,b)", pa10},
 224 { "sths",       0x0c001240, 0xfc001fc0, "Cx,V(b)", pa10},
 225 { "stbs",       0x0c001200, 0xfc001fc0, "Cx,V(s,b)", pa10},
 226 { "stbs",       0x0c001200, 0xfc001fc0, "Cx,V(b)", pa10},
 227 { "stwas",      0x0c001380, 0xfc00dfc0, "Cx,V(b)", pa10},
 228 { "stbys",      0x0c001300, 0xfc001fc0, "Yx,V(s,b)", pa10},
 229 { "stbys",      0x0c001300, 0xfc001fc0, "Yx,V(b)", pa10},
 230
 231 /* Immediate instructions.  */
 232 { "ldo",        0x34000000, 0xfc00c000, "j(b),x", pa10},
 233 { "ldil",       0x20000000, 0xfc000000, "k,b", pa10},
 234 { "addil",      0x28000000, 0xfc000000, "k,b", pa10},
 235
 236 /* Branching instructions. */
 237 { "bl",         0xe8000000, 0xfc00e000, "nW,b", pa10},
 238 { "gate",       0xe8002000, 0xfc00e000, "nW,b", pa10},
 239 { "blr",        0xe8004000, 0xfc00e001, "nx,b", pa10},
 240 { "bv",         0xe800c000, 0xfc00e001, "nx(b)", pa10},
 241 { "bv",         0xe800c000, 0xfc00e001, "n(b)", pa10},
 242 { "be",         0xe0000000, 0xfc000000, "nz(S,b)", pa10},
 243 { "ble",        0xe4000000, 0xfc000000, "nz(S,b)", pa10},
 244 { "movb",       0xc8000000, 0xfc000000, "|nx,b,w", pa10},
 245 { "movib",      0xcc000000, 0xfc000000, "|n5,b,w", pa10},
 246 { "combt",      0x80000000, 0xfc000000, "<nx,b,w", pa10},
 247 { "combf",      0x88000000, 0xfc000000, "<nx,b,w", pa10},
 248 { "comibt",     0x84000000, 0xfc000000, "<n5,b,w", pa10},
 249 { "comibf",     0x8c000000, 0xfc000000, "<n5,b,w", pa10},
 250 { "addbt",      0xa0000000, 0xfc000000, "!nx,b,w", pa10},
 251 { "addbf",      0xa8000000, 0xfc000000, "!nx,b,w", pa10},
 252 { "addibt",     0xa4000000, 0xfc000000, "!n5,b,w", pa10},
 253 { "addibf",     0xac000000, 0xfc000000, "!n5,b,w", pa10},
 254 { "bvb",        0xc0000000, 0xffe00000, "~nx,w", pa10},
 255 { "bb",         0xc4000000, 0xfc000000, "~nx,Q,w", pa10},
 256
 257 /* Computation Instructions */
 258
 259 { "add",        0x08000600, 0xfc000fe0, "dx,b,t", pa10},
 260 { "addl",       0x08000a00, 0xfc000fe0, "dx,b,t", pa10},
 261 { "addo",       0x08000e00, 0xfc000fe0, "dx,b,t", pa10},
 262 { "addc",       0x08000700, 0xfc000fe0, "dx,b,t", pa10},
 263 { "addco",      0x08000f00, 0xfc000fe0, "dx,b,t", pa10},
 264 { "sh1add",     0x08000640, 0xfc000fe0, "dx,b,t", pa10},
 265 { "sh1addl",    0x08000a40, 0xfc000fe0, "dx,b,t", pa10},
 266 { "sh1addo",    0x08000e40, 0xfc000fe0, "dx,b,t", pa10},
 267 { "sh2add",     0x08000680, 0xfc000fe0, "dx,b,t", pa10},
 268 { "sh2addl",    0x08000a80, 0xfc000fe0, "dx,b,t", pa10},
 269 { "sh2addo",    0x08000e80, 0xfc000fe0, "dx,b,t", pa10},
 270 { "sh3add",     0x080006c0, 0xfc000fe0, "dx,b,t", pa10},
 271 { "sh3addl",    0x08000ac0, 0xfc000fe0, "dx,b,t", pa10},
 272 { "sh3addo",    0x08000ec0, 0xfc000fe0, "dx,b,t", pa10},
 273 { "sub",        0x08000400, 0xfc000fe0, "ax,b,t", pa10},
 274 { "subo",       0x08000c00, 0xfc000fe0, "ax,b,t", pa10},
 275 { "subb",       0x08000500, 0xfc000fe0, "ax,b,t", pa10},
 276 { "subbo",      0x08000d00, 0xfc000fe0, "ax,b,t", pa10},
 277 { "subt",       0x080004c0, 0xfc000fe0, "ax,b,t", pa10},
 278 { "subto",      0x08000cc0, 0xfc000fe0, "ax,b,t", pa10},
 279 { "ds",         0x08000440, 0xfc000fe0, "ax,b,t", pa10},
 280 { "comclr",     0x08000880, 0xfc000fe0, "ax,b,t", pa10},
 281 { "or",         0x08000240, 0xfc000fe0, "&x,b,t", pa10},
 282 { "xor",        0x08000280, 0xfc000fe0, "&x,b,t", pa10},
 283 { "and",        0x08000200, 0xfc000fe0, "&x,b,t", pa10},
 284 { "andcm",      0x08000000, 0xfc000fe0, "&x,b,t", pa10},
 285 { "uxor",       0x08000380, 0xfc000fe0, "Ux,b,t", pa10},
 286 { "uaddcm",     0x08000980, 0xfc000fe0, "Ux,b,t", pa10},
 287 { "uaddcmt",    0x080009c0, 0xfc000fe0, "Ux,b,t", pa10},
 288 { "dcor",       0x08000b80, 0xfc1f0fe0, "Ub,t",   pa10},
 289 { "idcor",      0x08000bc0, 0xfc1f0fe0, "Ub,t",   pa10},
 290 { "addi",       0xb4000000, 0xfc000800, "di,b,x", pa10},
 291 { "addio",      0xb4000800, 0xfc000800, "di,b,x", pa10},
 292 { "addit",      0xb0000000, 0xfc000800, "di,b,x", pa10},
 293 { "addito",     0xb0000800, 0xfc000800, "di,b,x", pa10},
 294 { "subi",       0x94000000, 0xfc000800, "ai,b,x", pa10},
 295 { "subio",      0x94000800, 0xfc000800, "ai,b,x", pa10},
 296 { "comiclr",    0x90000000, 0xfc000800, "ai,b,x", pa10},
 297
 298 /* Extract and Deposit Instructions */
 299
 300 { "vshd",       0xd0000000, 0xfc001fe0, ">x,b,t", pa10},
 301 { "shd",        0xd0000800, 0xfc001c00, ">x,b,p,t", pa10},
 302 { "vextru",     0xd0001000, 0xfc001fe0, ">b,T,x", pa10},
 303 { "vextrs",     0xd0001400, 0xfc001fe0, ">b,T,x", pa10},
 304 { "extru",      0xd0001800, 0xfc001c00, ">b,P,T,x", pa10},
 305 { "extrs",      0xd0001c00, 0xfc001c00, ">b,P,T,x", pa10},
 306 { "zvdep",      0xd4000000, 0xfc001fe0, ">x,T,b", pa10},
 307 { "vdep",       0xd4000400, 0xfc001fe0, ">x,T,b", pa10},
 308 { "zdep",       0xd4000800, 0xfc001c00, ">x,p,T,b", pa10},
 309 { "dep",        0xd4000c00, 0xfc001c00, ">x,p,T,b", pa10},
 310 { "zvdepi",     0xd4001000, 0xfc001fe0, ">5,T,b", pa10},
 311 { "vdepi",      0xd4001400, 0xfc001fe0, ">5,T,b", pa10},
 312 { "zdepi",      0xd4001800, 0xfc001c00, ">5,p,T,b", pa10},
 313 { "depi",       0xd4001c00, 0xfc001c00, ">5,p,T,b", pa10},
 314
 315 /* System Control Instructions */
 316
 317 { "break",      0x00000000, 0xfc001fe0, "r,A", pa10},
 318 { "rfi",        0x00000c00, 0xffffffff, "", pa10},
 319 { "rfir",       0x00000ca0, 0xffffffff, "", pa11},
 320 { "ssm",        0x00000d60, 0xffe0ffe0, "R,t", pa10},
 321 { "rsm",        0x00000e60, 0xffe0ffe0, "R,t", pa10},
 322 { "mtsm",       0x00001860, 0xffe0ffff, "x", pa10},
 323 { "ldsid",      0x000010a0, 0xfc1f3fe0, "(s,b),t", pa10},
 324 { "ldsid",      0x000010a0, 0xfc1f3fe0, "(b),t", pa10},
 325 { "mtsp",       0x00001820, 0xffe01fff, "x,S", pa10},
 326 { "mtctl",      0x00001840, 0xfc00ffff, "x,^", pa10},
 327 { "mfsp",       0x000004a0, 0xffff1fe0, "S,t", pa10},
 328 { "mfctl",      0x000008a0, 0xfc1fffe0, "^,t", pa10},
 329 { "sync",       0x00000400, 0xffffffff, "", pa10},
 330 { "syncdma",    0x00100400, 0xffffffff, "", pa10},
 331 { "prober",     0x04001180, 0xfc003fe0, "(s,b),x,t", pa10},
 332 { "prober",     0x04001180, 0xfc003fe0, "(b),x,t", pa10},
 333 { "proberi",    0x04003180, 0xfc003fe0, "(s,b),R,t", pa10},
 334 { "proberi",    0x04003180, 0xfc003fe0, "(b),R,t", pa10},
 335 { "probew",     0x040011c0, 0xfc003fe0, "(s,b),x,t", pa10},
 336 { "probew",     0x040011c0, 0xfc003fe0, "(b),x,t", pa10},
 337 { "probewi",    0x040031c0, 0xfc003fe0, "(s,b),R,t", pa10},
 338 { "probewi",    0x040031c0, 0xfc003fe0, "(b),R,t", pa10},
 339 { "lpa",        0x04001340, 0xfc003fc0, "Zx(s,b),t", pa10},
 340 { "lpa",        0x04001340, 0xfc003fc0, "Zx(b),t", pa10},
 341 { "lha",        0x04001300, 0xfc003fc0, "Zx(s,b),t", pa10},
 342 { "lha",        0x04001300, 0xfc003fc0, "Zx(b),t", pa10},
 343 { "lci",        0x04001300, 0xfc003fe0, "x(s,b),t", pa10},
 344 { "lci",        0x04001300, 0xfc003fe0, "x(b),t", pa10},
 345 { "pdtlb",      0x04001200, 0xfc003fdf, "Zx(s,b)", pa10},
 346 { "pdtlb",      0x04001200, 0xfc003fdf, "Zx(b)", pa10},
 347 { "pitlb",      0x04000200, 0xfc003fdf, "Zx(s,b)", pa10},
 348 { "pitlb",      0x04000200, 0xfc003fdf, "Zx(b)", pa10},
 349 { "pdtlbe",     0x04001240, 0xfc003fdf, "Zx(s,b)", pa10},
 350 { "pdtlbe",     0x04001240, 0xfc003fdf, "Zx(b)", pa10},
 351 { "pitlbe",     0x04000240, 0xfc003fdf, "Zx(s,b)", pa10},
 352 { "pitlbe",     0x04000240, 0xfc003fdf, "Zx(b)", pa10},
 353 { "idtlba",     0x04001040, 0xfc003fff, "x,(s,b)", pa10},
 354 { "idtlba",     0x04001040, 0xfc003fff, "x,(b)", pa10},
 355 { "iitlba",     0x04000040, 0xfc003fff, "x,(s,b)", pa10},
 356 { "iitlba",     0x04000040, 0xfc003fff, "x,(b)", pa10},
 357 { "idtlbp",     0x04001000, 0xfc003fff, "x,(s,b)", pa10},
 358 { "idtlbp",     0x04001000, 0xfc003fff, "x,(b)", pa10},
 359 { "iitlbp",     0x04000000, 0xfc003fff, "x,(s,b)", pa10},
 360 { "iitlbp",     0x04000000, 0xfc003fff, "x,(b)", pa10},
 361 { "pdc",        0x04001380, 0xfc003fdf, "Zx(s,b)", pa10},
 362 { "pdc",        0x04001380, 0xfc003fdf, "Zx(b)", pa10},
 363 { "fdc",        0x04001280, 0xfc003fdf, "Zx(s,b)", pa10},
 364 { "fdc",        0x04001280, 0xfc003fdf, "Zx(b)", pa10},
 365 { "fic",        0x04000280, 0xfc003fdf, "Zx(s,b)", pa10},
 366 { "fic",        0x04000280, 0xfc003fdf, "Zx(b)", pa10},
 367 { "fdce",       0x040012c0, 0xfc003fdf, "Zx(s,b)", pa10},
 368 { "fdce",       0x040012c0, 0xfc003fdf, "Zx(b)", pa10},
 369 { "fice",       0x040002c0, 0xfc003fdf, "Zx(s,b)", pa10},
 370 { "fice",       0x040002c0, 0xfc003fdf, "Zx(b)", pa10},
 371 { "diag",       0x14000000, 0xfc000000, "D", pa10},
 372
 373 /* gfw and gfr are not in the HP PA 1.1 manual, but they are in either
 374    the Timex FPU or the Mustang ERS (not sure which) manual.  */
 375 { "gfw",        0x04001680, 0xfc003fdf, "Zx(s,b)", pa11},
 376 { "gfw",        0x04001680, 0xfc003fdf, "Zx(b)", pa11},
 377 { "gfr",        0x04001a80, 0xfc003fdf, "Zx(s,b)", pa11},
 378 { "gfr",        0x04001a80, 0xfc003fdf, "Zx(b)", pa11},
 379
 380 /* Floating Point Coprocessor Instructions */
 381
 382 { "fldwx",      0x24000000, 0xfc001f80, "cx(s,b),v", pa10},
 383 { "fldwx",      0x24000000, 0xfc001f80, "cx(b),v", pa10},
 384 { "flddx",      0x2c000000, 0xfc001fc0, "cx(s,b),y", pa10},
 385 { "flddx",      0x2c000000, 0xfc001fc0, "cx(b),y", pa10},
 386 { "fstwx",      0x24000200, 0xfc001f80, "cv,x(s,b)", pa10},
 387 { "fstwx",      0x24000200, 0xfc001f80, "cv,x(b)", pa10},
 388 { "fstdx",      0x2c000200, 0xfc001fc0, "cy,x(s,b)", pa10},
 389 { "fstdx",      0x2c000200, 0xfc001fc0, "cy,x(b)", pa10},
 390 { "fstqx",      0x3c000200, 0xfc001fc0, "cy,x(s,b)", pa10},
 391 { "fstqx",      0x3c000200, 0xfc001fc0, "cy,x(b)", pa10},
 392 { "fldws",      0x24001000, 0xfc001f80, "C5(s,b),v", pa10},
 393 { "fldws",      0x24001000, 0xfc001f80, "C5(b),v", pa10},
 394 { "fldds",      0x2c001000, 0xfc001fc0, "C5(s,b),y", pa10},
 395 { "fldds",      0x2c001000, 0xfc001fc0, "C5(b),y", pa10},
 396 { "fstws",      0x24001200, 0xfc001f80, "Cv,5(s,b)", pa10},
 397 { "fstws",      0x24001200, 0xfc001f80, "Cv,5(b)", pa10},
 398 { "fstds",      0x2c001200, 0xfc001fc0, "Cy,5(s,b)", pa10},
 399 { "fstds",      0x2c001200, 0xfc001fc0, "Cy,5(b)", pa10},
 400 { "fstqs",      0x3c001200, 0xfc001fc0, "Cy,5(s,b)", pa10},
 401 { "fstqs",      0x3c001200, 0xfc001fc0, "Cy,5(b)", pa10},
 402 { "fadd",       0x30000600, 0xfc00e7e0, "FE,X,v", pa10},
 403 { "fadd",       0x38000600, 0xfc00e720, "IJ,K,v", pa10},
 404 { "fsub",       0x30002600, 0xfc00e7e0, "FE,X,v", pa10},
 405 { "fsub",       0x38002600, 0xfc00e720, "IJ,K,v", pa10},
 406 { "fmpy",       0x30004600, 0xfc00e7e0, "FE,X,v", pa10},
 407 { "fmpy",       0x38004600, 0xfc00e720, "IJ,K,v", pa10},
 408 { "fdiv",       0x30006600, 0xfc00e7e0, "FE,X,v", pa10},
 409 { "fdiv",       0x38006600, 0xfc00e720, "IJ,K,v", pa10},
 410 { "fsqrt",      0x30008000, 0xfc1fe7e0, "FE,v", pa10},
 411 { "fsqrt",      0x38008000, 0xfc1fe720, "FJ,v", pa10},
 412 { "fabs",       0x30006000, 0xfc1fe7e0, "FE,v", pa10},
 413 { "fabs",       0x38006000, 0xfc1fe720, "FJ,v", pa10},
 414 { "frem",       0x30008600, 0xfc00e7e0, "FE,X,v", pa10},
 415 { "frem",       0x38008600, 0xfc00e720, "FJ,K,v", pa10},
 416 { "frnd",       0x3000a000, 0xfc1fe7e0, "FE,v", pa10},
 417 { "frnd",       0x3800a000, 0xfc1fe720, "FJ,v", pa10},
 418 { "fcpy",       0x30004000, 0xfc1fe7e0, "FE,v", pa10},
 419 { "fcpy",       0x38004000, 0xfc1fe720, "FJ,v", pa10},
 420 { "fcnvff",     0x30000200, 0xfc1f87e0, "FGE,v", pa10},
 421 { "fcnvff",     0x38000200, 0xfc1f8720, "FGJ,v", pa10},
 422 { "fcnvxf",     0x30008200, 0xfc1f87e0, "FGE,v", pa10},
 423 { "fcnvxf",     0x38008200, 0xfc1f8720, "FGJ,v", pa10},
 424 { "fcnvfx",     0x30010200, 0xfc1f87e0, "FGE,v", pa10},
 425 { "fcnvfx",     0x38010200, 0xfc1f8720, "FGJ,v", pa10},
 426 { "fcnvfxt",    0x30018200, 0xfc1f87e0, "FGE,v", pa10},
 427 { "fcnvfxt",    0x38018200, 0xfc1f8720, "FGJ,v", pa10},
 428 { "fcmp",       0x30000400, 0xfc00e7e0, "FME,X", pa10},
 429 { "fcmp",       0x38000400, 0xfc00e720, "IMJ,K", pa10},
 430 { "xmpyu",      0x38004700, 0xfc00e720, "E,X,v", pa11},
 431 { "fmpyadd",    0x18000000, 0xfc000000, "H4,6,7,9,8", pa11},
 432 { "fmpysub",    0x98000000, 0xfc000000, "H4,6,7,9,8", pa11},
 433 { "ftest",      0x30002420, 0xffffffff, "", pa10},
 434
 435
 436 /* Assist Instructions */
 437
 438 { "spop0",      0x10000000, 0xfc000600, "f,ON", pa10},
 439 { "spop1",      0x10000200, 0xfc000600, "f,oNt", pa10},
 440 { "spop2",      0x10000400, 0xfc000600, "f,1Nb", pa10},
 441 { "spop3",      0x10000600, 0xfc000600, "f,0Nx,b", pa10},
 442 { "copr",       0x30000000, 0xfc000000, "u,2N", pa10},
 443 { "cldwx",      0x24000000, 0xfc001e00, "ucx(s,b),t", pa10},
 444 { "cldwx",      0x24000000, 0xfc001e00, "ucx(b),t", pa10},
 445 { "clddx",      0x2c000000, 0xfc001e00, "ucx(s,b),t", pa10},
 446 { "clddx",      0x2c000000, 0xfc001e00, "ucx(b),t", pa10},
 447 { "cstwx",      0x24000200, 0xfc001e00, "uct,x(s,b)", pa10},
 448 { "cstwx",      0x24000200, 0xfc001e00, "uct,x(b)", pa10},
 449 { "cstdx",      0x2c000200, 0xfc001e00, "uct,x(s,b)", pa10},
 450 { "cstdx",      0x2c000200, 0xfc001e00, "uct,x(b)", pa10},
 451 { "cldws",      0x24001000, 0xfc001e00, "uC5(s,b),t", pa10},
 452 { "cldws",      0x24001000, 0xfc001e00, "uC5(b),t", pa10},
 453 { "cldds",      0x2c001000, 0xfc001e00, "uC5(s,b),t", pa10},
 454 { "cldds",      0x2c001000, 0xfc001e00, "uC5(b),t", pa10},
 455 { "cstws",      0x24001200, 0xfc001e00, "uCt,5(s,b)", pa10},
 456 { "cstws",      0x24001200, 0xfc001e00, "uCt,5(b)", pa10},
 457 { "cstds",      0x2c001200, 0xfc001e00, "uCt,5(s,b)", pa10},
 458 { "cstds",      0x2c001200, 0xfc001e00, "uCt,5(b)", pa10},
 459 };
 460
 461 #define NUMOPCODES ((sizeof pa_opcodes)/(sizeof pa_opcodes[0]))
 462
 463 /* SKV 12/18/92. Added some denotations for various operands. */
 464
 465 #define PA_IMM11_AT_31 'i'
 466 #define PA_IMM14_AT_31 'j'
 467 #define PA_IMM21_AT_31 'k'
 468 #define PA_DISP12 'w'
 469 #define PA_DISP17 'W'
 470
 471 #define N_HPPA_OPERAND_FORMATS 5