opcodes/mmix-opc.c

   1 /* mmix-opc.c -- MMIX opcode table
   2    Copyright (C) 2001, 2003 Free Software Foundation, Inc.
   3    Written by Hans-Peter Nilsson (hp@bitrange.com)
   4
   5 This file is part of GDB, GAS, and the GNU binutils.
   6
   7 GDB, GAS, and the GNU binutils are free software; you can redistribute
   8 them and/or modify them under the terms of the GNU General Public
   9 License as published by the Free Software Foundation; either version 2,
  10 or (at your option) any later version.
  11
  12 GDB, GAS, and the GNU binutils are distributed in the hope that they
  13 will be useful, but WITHOUT ANY WARRANTY; without even the implied
  14 warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See
  15 the GNU General Public License for more details.
  16
  17 You should have received a copy of the GNU General Public License
  18 along with this file; see the file COPYING.  If not, write to the Free
  19 Software Foundation, 51 Franklin Street - Fifth Floor, Boston, MA 02110-1301, USA.  */
  20
  21 #include <stdio.h>
  22 #include "opcode/mmix.h"
  23 #include "symcat.h"
  24
  25 /* Register-name-table for special registers.  */
  26 const struct mmix_spec_reg mmix_spec_regs[] =
  27  {
  28    /* Keep rJ at top; it's the most frequently used one.  */
  29    {"rJ", 4},
  30    {"rA", 21},
  31    {"rB", 0},
  32    {"rC", 8},
  33    {"rD", 1},
  34    {"rE", 2},
  35    {"rF", 22},
  36    {"rG", 19},
  37    {"rH", 3},
  38    {"rI", 12},
  39    {"rK", 15},
  40    {"rL", 20},
  41    {"rM", 5},
  42    {"rN", 9},
  43    {"rO", 10},
  44    {"rP", 23},
  45    {"rQ", 16},
  46    {"rR", 6},
  47    {"rS", 11},
  48    {"rT", 13},
  49    {"rU", 17},
  50    {"rV", 18},
  51    {"rW", 24},
  52    {"rX", 25},
  53    {"rY", 26},
  54    {"rZ", 27},
  55    {"rBB", 7},
  56    {"rTT", 14},
  57    {"rWW", 28},
  58    {"rXX", 29},
  59    {"rYY", 30},
  60    {"rZZ", 31},
  61    {NULL, 0}
  62  };
  63
  64 /* Opcode-table.  In order to cut down on redundant contents, we use helper
  65    macros.  */
  66
  67 /* All bits in the opcode-byte are significant.  Add "| ..." expressions
  68    to add zero-bits.  */
  69 #undef O
  70 #define O(m) ((unsigned long) (m) << 24UL), ((~(unsigned long) (m) & 255) << 24)
  71
  72 /* Bits 7..1 of the opcode are significant.  */
  73 #undef Z
  74 #define Z(m) ((unsigned long) (m) << 24), ((~(unsigned long) (m) & 254) << 24)
  75
  76 /* For easier overview of the table.  */
  77 #define N mmix_type_normal
  78 #define B mmix_type_branch
  79 #define C mmix_type_condbranch
  80 #define MB mmix_type_memaccess_byte
  81 #define MW mmix_type_memaccess_wyde
  82 #define MT mmix_type_memaccess_tetra
  83 #define MO mmix_type_memaccess_octa
  84 #define M mmix_type_memaccess_block
  85 #define J mmix_type_jsr
  86 #define P mmix_type_pseudo
  87
  88 #define OP(y) XCONCAT2 (mmix_operands_,y)
  89
  90 /* Groups of instructions specified here must, if all are matching the
  91    same instruction, be consecutive, in order more-specific to
  92    less-specific match.  */
  93
  94 const struct mmix_opcode mmix_opcodes[] =
  95  {
  96    {"trap",     O (0),          OP (xyz_opt),           J},
  97    {"fcmp",     O (1),          OP (regs),              N},
  98    {"flot",     Z (8),          OP (roundregs_z),       N},
  99
 100    {"fun",      O (2),          OP (regs),              N},
 101    {"feql",     O (3),          OP (regs),              N},
 102    {"flotu",    Z (10),         OP (roundregs_z),       N},
 103
 104    {"fadd",     O (4),          OP (regs),              N},
 105    {"fix",      O (5),          OP (roundregs),         N},
 106    {"sflot",    Z (12),         OP (roundregs_z),       N},
 107
 108    {"fsub",     O (6),          OP (regs),              N},
 109    {"fixu",     O (7),          OP (roundregs),         N},
 110    {"sflotu",   Z (14),         OP (roundregs_z),       N},
 111
 112    {"fmul",     O (16),         OP (regs),              N},
 113    {"fcmpe",    O (17),         OP (regs),              N},
 114    {"mul",      Z (24),         OP (regs_z),            N},
 115
 116    {"fune",     O (18),         OP (regs),              N},
 117    {"feqle",    O (19),         OP (regs),              N},
 118    {"mulu",     Z (26),         OP (regs_z),            N},
 119
 120    {"fdiv",     O (20),         OP (regs),              N},
 121    {"fsqrt",    O (21),         OP (roundregs),         N},
 122    {"div",      Z (28),         OP (regs_z),            N},
 123
 124    {"frem",     O (22),         OP (regs),              N},
 125    {"fint",     O (23),         OP (roundregs),         N},
 126    {"divu",     Z (30),         OP (regs_z),            N},
 127
 128    {"add",      Z (0x20),       OP (regs_z),            N},
 129    {"2addu",    Z (0x28),       OP (regs_z),            N},
 130
 131    {"addu",     Z (0x22),       OP (regs_z),            N},
 132    /* Synonym for ADDU.  Put after ADDU, since we don't prefer it for
 133       disassembly.  It's supposed to be used for addresses, so we make it
 134       a memory block reference for purposes of assembly.  */
 135    {"lda",      Z (0x22),       OP (regs_z_opt),        M},
 136    {"4addu",    Z (0x2a),       OP (regs_z),            N},
 137
 138    {"sub",      Z (0x24),       OP (regs_z),            N},
 139    {"8addu",    Z (0x2c),       OP (regs_z),            N},
 140
 141    {"subu",     Z (0x26),       OP (regs_z),            N},
 142    {"16addu",   Z (0x2e),       OP (regs_z),            N},
 143
 144    {"cmp",      Z (0x30),       OP (regs_z),            N},
 145    {"sl",       Z (0x38),       OP (regs_z),            N},
 146
 147    {"cmpu",     Z (0x32),       OP (regs_z),            N},
 148    {"slu",      Z (0x3a),       OP (regs_z),            N},
 149
 150    {"neg",      Z (0x34),       OP (neg),               N},
 151    {"sr",       Z (0x3c),       OP (regs_z),            N},
 152
 153    {"negu",     Z (0x36),       OP (neg),               N},
 154    {"sru",      Z (0x3e),       OP (regs_z),            N},
 155
 156    {"bn",       Z (0x40),       OP (regaddr),           C},
 157    {"bnn",      Z (0x48),       OP (regaddr),           C},
 158
 159    {"bz",       Z (0x42),       OP (regaddr),           C},
 160    {"bnz",      Z (0x4a),       OP (regaddr),           C},
 161
 162    {"bp",       Z (0x44),       OP (regaddr),           C},
 163    {"bnp",      Z (0x4c),       OP (regaddr),           C},
 164
 165    {"bod",      Z (0x46),       OP (regaddr),           C},
 166    {"bev",      Z (0x4e),       OP (regaddr),           C},
 167
 168    {"pbn",      Z (0x50),       OP (regaddr),           C},
 169    {"pbnn",     Z (0x58),       OP (regaddr),           C},
 170
 171    {"pbz",      Z (0x52),       OP (regaddr),           C},
 172    {"pbnz",     Z (0x5a),       OP (regaddr),           C},
 173
 174    {"pbp",      Z (0x54),       OP (regaddr),           C},
 175    {"pbnp",     Z (0x5c),       OP (regaddr),           C},
 176
 177    {"pbod",     Z (0x56),       OP (regaddr),           C},
 178    {"pbev",     Z (0x5e),       OP (regaddr),           C},
 179
 180    {"csn",      Z (0x60),       OP (regs_z),            N},
 181    {"csnn",     Z (0x68),       OP (regs_z),            N},
 182
 183    {"csz",      Z (0x62),       OP (regs_z),            N},
 184    {"csnz",     Z (0x6a),       OP (regs_z),            N},
 185
 186    {"csp",      Z (0x64),       OP (regs_z),            N},
 187    {"csnp",     Z (0x6c),       OP (regs_z),            N},
 188
 189    {"csod",     Z (0x66),       OP (regs_z),            N},
 190    {"csev",     Z (0x6e),       OP (regs_z),            N},
 191
 192    {"zsn",      Z (0x70),       OP (regs_z),            N},
 193    {"zsnn",     Z (0x78),       OP (regs_z),            N},
 194
 195    {"zsz",      Z (0x72),       OP (regs_z),            N},
 196    {"zsnz",     Z (0x7a),       OP (regs_z),            N},
 197
 198    {"zsp",      Z (0x74),       OP (regs_z),            N},
 199    {"zsnp",     Z (0x7c),       OP (regs_z),            N},
 200
 201    {"zsod",     Z (0x76),       OP (regs_z),            N},
 202    {"zsev",     Z (0x7e),       OP (regs_z),            N},
 203
 204    {"ldb",      Z (0x80),       OP (regs_z_opt),        MB},
 205    {"ldt",      Z (0x88),       OP (regs_z_opt),        MT},
 206
 207    {"ldbu",     Z (0x82),       OP (regs_z_opt),        MB},
 208    {"ldtu",     Z (0x8a),       OP (regs_z_opt),        MT},
 209
 210    {"ldw",      Z (0x84),       OP (regs_z_opt),        MW},
 211    {"ldo",      Z (0x8c),       OP (regs_z_opt),        MO},
 212
 213    {"ldwu",     Z (0x86),       OP (regs_z_opt),        MW},
 214    {"ldou",     Z (0x8e),       OP (regs_z_opt),        MO},
 215
 216    {"ldsf",     Z (0x90),       OP (regs_z_opt),        MT},
 217
 218    /* This doesn't seem to access memory, just the TLB.  */
 219    {"ldvts",    Z (0x98),       OP (regs_z_opt),        M},
 220
 221    {"ldht",     Z (0x92),       OP (regs_z_opt),        MT},
 222
 223    /* Neither does this per-se.  */
 224    {"preld",    Z (0x9a),       OP (x_regs_z),          N},
 225
 226    {"cswap",    Z (0x94),       OP (regs_z_opt),        MO},
 227    {"prego",    Z (0x9c),       OP (x_regs_z),          N},
 228
 229    {"ldunc",    Z (0x96),       OP (regs_z_opt),        MO},
 230    {"go",       Z (GO_INSN_BYTE),
 231                                 OP (regs_z_opt),        B},
 232
 233    {"stb",      Z (0xa0),       OP (regs_z_opt),        MB},
 234    {"stt",      Z (0xa8),       OP (regs_z_opt),        MT},
 235
 236    {"stbu",     Z (0xa2),       OP (regs_z_opt),        MB},
 237    {"sttu",     Z (0xaa),       OP (regs_z_opt),        MT},
 238
 239    {"stw",      Z (0xa4),       OP (regs_z_opt),        MW},
 240    {"sto",      Z (0xac),       OP (regs_z_opt),        MO},
 241
 242    {"stwu",     Z (0xa6),       OP (regs_z_opt),        MW},
 243    {"stou",     Z (0xae),       OP (regs_z_opt),        MO},
 244
 245    {"stsf",     Z (0xb0),       OP (regs_z_opt),        MT},
 246    {"syncd",    Z (0xb8),       OP (x_regs_z),          M},
 247
 248    {"stht",     Z (0xb2),       OP (regs_z_opt),        MT},
 249    {"prest",    Z (0xba),       OP (x_regs_z),          M},
 250
 251    {"stco",     Z (0xb4),       OP (x_regs_z),          MO},
 252    {"syncid",   Z (0xbc),       OP (x_regs_z),          M},
 253
 254    {"stunc",    Z (0xb6),       OP (regs_z_opt),        MO},
 255    {"pushgo",   Z (PUSHGO_INSN_BYTE),
 256                                 OP (pushgo),            J},
 257
 258    /* Synonym for OR with a zero Z.  */
 259    {"set",      O (0xc1)
 260                   | 0xff,       OP (set),               N},
 261
 262    {"or",       Z (0xc0),       OP (regs_z),            N},
 263    {"and",      Z (0xc8),       OP (regs_z),            N},
 264
 265    {"orn",      Z (0xc2),       OP (regs_z),            N},
 266    {"andn",     Z (0xca),       OP (regs_z),            N},
 267
 268    {"nor",      Z (0xc4),       OP (regs_z),            N},
 269    {"nand",     Z (0xcc),       OP (regs_z),            N},
 270
 271    {"xor",      Z (0xc6),       OP (regs_z),            N},
 272    {"nxor",     Z (0xce),       OP (regs_z),            N},
 273
 274    {"bdif",     Z (0xd0),       OP (regs_z),            N},
 275    {"mux",      Z (0xd8),       OP (regs_z),            N},
 276
 277    {"wdif",     Z (0xd2),       OP (regs_z),            N},
 278    {"sadd",     Z (0xda),       OP (regs_z),            N},
 279
 280    {"tdif",     Z (0xd4),       OP (regs_z),            N},
 281    {"mor",      Z (0xdc),       OP (regs_z),            N},
 282
 283    {"odif",     Z (0xd6),       OP (regs_z),            N},
 284    {"mxor",     Z (0xde),       OP (regs_z),            N},
 285
 286    {"seth",     O (0xe0),       OP (reg_yz),            N},
 287    {"setmh",    O (0xe1),       OP (reg_yz),            N},
 288    {"orh",      O (0xe8),       OP (reg_yz),            N},
 289    {"ormh",     O (0xe9),       OP (reg_yz),            N},
 290
 291    {"setml",    O (0xe2),       OP (reg_yz),            N},
 292    {"setl",     O (SETL_INSN_BYTE),
 293                                 OP (reg_yz),            N},
 294    {"orml",     O (0xea),       OP (reg_yz),            N},
 295    {"orl",      O (0xeb),       OP (reg_yz),            N},
 296
 297    {"inch",     O (INCH_INSN_BYTE),
 298                                 OP (reg_yz),            N},
 299    {"incmh",    O (INCMH_INSN_BYTE),
 300                                 OP (reg_yz),            N},
 301    {"andnh",    O (0xec),       OP (reg_yz),            N},
 302    {"andnmh",   O (0xed),       OP (reg_yz),            N},
 303
 304    {"incml",    O (INCML_INSN_BYTE),
 305                                 OP (reg_yz),            N},
 306    {"incl",     O (0xe7),       OP (reg_yz),            N},
 307    {"andnml",   O (0xee),       OP (reg_yz),            N},
 308    {"andnl",    O (0xef),       OP (reg_yz),            N},
 309
 310    {"jmp",      Z (0xf0),       OP (jmp),               B},
 311    {"pop",      O (0xf8),       OP (pop),               B},
 312    {"resume",   O (0xf9)
 313                   | 0xffff00,   OP (resume),            B},
 314
 315    {"pushj",    Z (0xf2),       OP (pushj),             J},
 316    {"save",     O (0xfa)
 317                   | 0xffff,     OP (save),              M},
 318    {"unsave",   O (0xfb)
 319                   | 0xffff00,   OP (unsave),            M},
 320
 321    {"geta",     Z (0xf4),       OP (regaddr),           N},
 322    {"sync",     O (0xfc),       OP (sync),              N},
 323    {"swym",     O (SWYM_INSN_BYTE),
 324                                 OP (xyz_opt),           N},
 325
 326    {"put", Z (0xf6) | 0xff00,   OP (put),               N},
 327    {"get", O (0xfe) | 0xffe0,   OP (get),               N},
 328    {"trip",     O (0xff),       OP (xyz_opt),           J},
 329
 330    /* We have mmixal pseudos in the ordinary instruction table so we can
 331       avoid the "set" vs. ".set" ambiguity that would be the effect if we
 332       had pseudos handled "normally" and defined NO_PSEUDO_DOT.
 333
 334       Note that IS and GREG are handled fully by md_start_line_hook, so
 335       they're not here.  */
 336    {"loc",      ~0, ~0,         OP (loc),               P},
 337    {"prefix",   ~0, ~0,         OP (prefix),            P},
 338    {"byte",     ~0, ~0,         OP (byte),              P},
 339    {"wyde",     ~0, ~0,         OP (wyde),              P},
 340    {"tetra",    ~0, ~0,         OP (tetra),             P},
 341    {"octa",     ~0, ~0,         OP (octa),              P},
 342    {"local",    ~0, ~0,         OP (local),             P},
 343    {"bspec",    ~0, ~0,         OP (bspec),             P},
 344    {"espec",    ~0, ~0,         OP (espec),             P},
 345
 346    {NULL, ~0, ~0, OP (none), N}
 347  };