translate.c 351.0 KB
Newer Older
B
bellard 已提交
1 2
/*
 *  MIPS32 emulation for qemu: main translation routines.
3
 *
B
bellard 已提交
4
 *  Copyright (c) 2004-2005 Jocelyn Mayer
B
bellard 已提交
5
 *  Copyright (c) 2006 Marius Groeger (FPU operations)
T
ths 已提交
6
 *  Copyright (c) 2006 Thiemo Seufer (MIPS32R2 support)
7
 *  Copyright (c) 2009 CodeSourcery (MIPS16 and microMIPS support)
B
bellard 已提交
8 9 10 11 12 13 14 15 16 17 18 19
 *
 * This library is free software; you can redistribute it and/or
 * modify it under the terms of the GNU Lesser General Public
 * License as published by the Free Software Foundation; either
 * version 2 of the License, or (at your option) any later version.
 *
 * This library is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * Lesser General Public License for more details.
 *
 * You should have received a copy of the GNU Lesser General Public
20
 * License along with this library; if not, see <http://www.gnu.org/licenses/>.
B
bellard 已提交
21 22 23 24 25 26 27 28 29 30 31
 */

#include <stdarg.h>
#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include <inttypes.h>

#include "cpu.h"
#include "exec-all.h"
#include "disas.h"
B
bellard 已提交
32
#include "tcg-op.h"
33
#include "qemu-common.h"
B
bellard 已提交
34

P
pbrook 已提交
35 36 37 38
#include "helper.h"
#define GEN_HELPER 1
#include "helper.h"

39
//#define MIPS_DEBUG_DISAS
40
//#define MIPS_DEBUG_SIGN_EXTENSIONS
B
bellard 已提交
41

42 43
/* MIPS major opcodes */
#define MASK_OP_MAJOR(op)  (op & (0x3F << 26))
44 45 46

enum {
    /* indirect opcode tables */
47 48 49 50 51 52 53 54
    OPC_SPECIAL  = (0x00 << 26),
    OPC_REGIMM   = (0x01 << 26),
    OPC_CP0      = (0x10 << 26),
    OPC_CP1      = (0x11 << 26),
    OPC_CP2      = (0x12 << 26),
    OPC_CP3      = (0x13 << 26),
    OPC_SPECIAL2 = (0x1C << 26),
    OPC_SPECIAL3 = (0x1F << 26),
55
    /* arithmetic with immediate */
56 57 58 59
    OPC_ADDI     = (0x08 << 26),
    OPC_ADDIU    = (0x09 << 26),
    OPC_SLTI     = (0x0A << 26),
    OPC_SLTIU    = (0x0B << 26),
A
aurel32 已提交
60
    /* logic with immediate */
61 62 63 64
    OPC_ANDI     = (0x0C << 26),
    OPC_ORI      = (0x0D << 26),
    OPC_XORI     = (0x0E << 26),
    OPC_LUI      = (0x0F << 26),
A
aurel32 已提交
65
    /* arithmetic with immediate */
66 67
    OPC_DADDI    = (0x18 << 26),
    OPC_DADDIU   = (0x19 << 26),
68
    /* Jump and branches */
69 70
    OPC_J        = (0x02 << 26),
    OPC_JAL      = (0x03 << 26),
N
Nathan Froyd 已提交
71
    OPC_JALS     = OPC_JAL | 0x5,
72 73 74 75 76 77 78 79 80
    OPC_BEQ      = (0x04 << 26),  /* Unconditional if rs = rt = 0 (B) */
    OPC_BEQL     = (0x14 << 26),
    OPC_BNE      = (0x05 << 26),
    OPC_BNEL     = (0x15 << 26),
    OPC_BLEZ     = (0x06 << 26),
    OPC_BLEZL    = (0x16 << 26),
    OPC_BGTZ     = (0x07 << 26),
    OPC_BGTZL    = (0x17 << 26),
    OPC_JALX     = (0x1D << 26),  /* MIPS 16 only */
N
Nathan Froyd 已提交
81
    OPC_JALXS    = OPC_JALX | 0x5,
82
    /* Load and stores */
83 84 85 86 87 88
    OPC_LDL      = (0x1A << 26),
    OPC_LDR      = (0x1B << 26),
    OPC_LB       = (0x20 << 26),
    OPC_LH       = (0x21 << 26),
    OPC_LWL      = (0x22 << 26),
    OPC_LW       = (0x23 << 26),
89
    OPC_LWPC     = OPC_LW | 0x5,
90 91 92 93 94 95 96 97 98 99 100 101 102 103
    OPC_LBU      = (0x24 << 26),
    OPC_LHU      = (0x25 << 26),
    OPC_LWR      = (0x26 << 26),
    OPC_LWU      = (0x27 << 26),
    OPC_SB       = (0x28 << 26),
    OPC_SH       = (0x29 << 26),
    OPC_SWL      = (0x2A << 26),
    OPC_SW       = (0x2B << 26),
    OPC_SDL      = (0x2C << 26),
    OPC_SDR      = (0x2D << 26),
    OPC_SWR      = (0x2E << 26),
    OPC_LL       = (0x30 << 26),
    OPC_LLD      = (0x34 << 26),
    OPC_LD       = (0x37 << 26),
104
    OPC_LDPC     = OPC_LD | 0x5,
105 106 107
    OPC_SC       = (0x38 << 26),
    OPC_SCD      = (0x3C << 26),
    OPC_SD       = (0x3F << 26),
108
    /* Floating point load/store */
109 110 111 112 113 114 115 116 117 118
    OPC_LWC1     = (0x31 << 26),
    OPC_LWC2     = (0x32 << 26),
    OPC_LDC1     = (0x35 << 26),
    OPC_LDC2     = (0x36 << 26),
    OPC_SWC1     = (0x39 << 26),
    OPC_SWC2     = (0x3A << 26),
    OPC_SDC1     = (0x3D << 26),
    OPC_SDC2     = (0x3E << 26),
    /* MDMX ASE specific */
    OPC_MDMX     = (0x1E << 26),
119
    /* Cache and prefetch */
120 121 122 123
    OPC_CACHE    = (0x2F << 26),
    OPC_PREF     = (0x33 << 26),
    /* Reserved major opcode */
    OPC_MAJOR3B_RESERVED = (0x3B << 26),
124 125 126
};

/* MIPS special opcodes */
127 128
#define MASK_SPECIAL(op)   MASK_OP_MAJOR(op) | (op & 0x3F)

129 130
enum {
    /* Shifts */
131
    OPC_SLL      = 0x00 | OPC_SPECIAL,
132 133
    /* NOP is SLL r0, r0, 0   */
    /* SSNOP is SLL r0, r0, 1 */
134 135
    /* EHB is SLL r0, r0, 3 */
    OPC_SRL      = 0x02 | OPC_SPECIAL, /* also ROTR */
136
    OPC_ROTR     = OPC_SRL | (1 << 21),
137 138
    OPC_SRA      = 0x03 | OPC_SPECIAL,
    OPC_SLLV     = 0x04 | OPC_SPECIAL,
139
    OPC_SRLV     = 0x06 | OPC_SPECIAL, /* also ROTRV */
140
    OPC_ROTRV    = OPC_SRLV | (1 << 6),
141 142 143
    OPC_SRAV     = 0x07 | OPC_SPECIAL,
    OPC_DSLLV    = 0x14 | OPC_SPECIAL,
    OPC_DSRLV    = 0x16 | OPC_SPECIAL, /* also DROTRV */
144
    OPC_DROTRV   = OPC_DSRLV | (1 << 6),
145 146 147
    OPC_DSRAV    = 0x17 | OPC_SPECIAL,
    OPC_DSLL     = 0x38 | OPC_SPECIAL,
    OPC_DSRL     = 0x3A | OPC_SPECIAL, /* also DROTR */
148
    OPC_DROTR    = OPC_DSRL | (1 << 21),
149 150 151
    OPC_DSRA     = 0x3B | OPC_SPECIAL,
    OPC_DSLL32   = 0x3C | OPC_SPECIAL,
    OPC_DSRL32   = 0x3E | OPC_SPECIAL, /* also DROTR32 */
152
    OPC_DROTR32  = OPC_DSRL32 | (1 << 21),
153
    OPC_DSRA32   = 0x3F | OPC_SPECIAL,
154
    /* Multiplication / division */
155 156 157 158 159 160 161 162
    OPC_MULT     = 0x18 | OPC_SPECIAL,
    OPC_MULTU    = 0x19 | OPC_SPECIAL,
    OPC_DIV      = 0x1A | OPC_SPECIAL,
    OPC_DIVU     = 0x1B | OPC_SPECIAL,
    OPC_DMULT    = 0x1C | OPC_SPECIAL,
    OPC_DMULTU   = 0x1D | OPC_SPECIAL,
    OPC_DDIV     = 0x1E | OPC_SPECIAL,
    OPC_DDIVU    = 0x1F | OPC_SPECIAL,
163
    /* 2 registers arithmetic / logic */
164 165 166 167 168 169 170 171 172 173 174 175 176 177
    OPC_ADD      = 0x20 | OPC_SPECIAL,
    OPC_ADDU     = 0x21 | OPC_SPECIAL,
    OPC_SUB      = 0x22 | OPC_SPECIAL,
    OPC_SUBU     = 0x23 | OPC_SPECIAL,
    OPC_AND      = 0x24 | OPC_SPECIAL,
    OPC_OR       = 0x25 | OPC_SPECIAL,
    OPC_XOR      = 0x26 | OPC_SPECIAL,
    OPC_NOR      = 0x27 | OPC_SPECIAL,
    OPC_SLT      = 0x2A | OPC_SPECIAL,
    OPC_SLTU     = 0x2B | OPC_SPECIAL,
    OPC_DADD     = 0x2C | OPC_SPECIAL,
    OPC_DADDU    = 0x2D | OPC_SPECIAL,
    OPC_DSUB     = 0x2E | OPC_SPECIAL,
    OPC_DSUBU    = 0x2F | OPC_SPECIAL,
178
    /* Jumps */
179 180
    OPC_JR       = 0x08 | OPC_SPECIAL, /* Also JR.HB */
    OPC_JALR     = 0x09 | OPC_SPECIAL, /* Also JALR.HB */
181
    OPC_JALRC    = OPC_JALR | (0x5 << 6),
N
Nathan Froyd 已提交
182
    OPC_JALRS    = 0x10 | OPC_SPECIAL | (0x5 << 6),
183
    /* Traps */
184 185 186 187 188 189
    OPC_TGE      = 0x30 | OPC_SPECIAL,
    OPC_TGEU     = 0x31 | OPC_SPECIAL,
    OPC_TLT      = 0x32 | OPC_SPECIAL,
    OPC_TLTU     = 0x33 | OPC_SPECIAL,
    OPC_TEQ      = 0x34 | OPC_SPECIAL,
    OPC_TNE      = 0x36 | OPC_SPECIAL,
190
    /* HI / LO registers load & stores */
191 192 193 194
    OPC_MFHI     = 0x10 | OPC_SPECIAL,
    OPC_MTHI     = 0x11 | OPC_SPECIAL,
    OPC_MFLO     = 0x12 | OPC_SPECIAL,
    OPC_MTLO     = 0x13 | OPC_SPECIAL,
195
    /* Conditional moves */
196 197
    OPC_MOVZ     = 0x0A | OPC_SPECIAL,
    OPC_MOVN     = 0x0B | OPC_SPECIAL,
198

199
    OPC_MOVCI    = 0x01 | OPC_SPECIAL,
200 201

    /* Special */
S
Stefan Weil 已提交
202
    OPC_PMON     = 0x05 | OPC_SPECIAL, /* unofficial */
203 204
    OPC_SYSCALL  = 0x0C | OPC_SPECIAL,
    OPC_BREAK    = 0x0D | OPC_SPECIAL,
S
Stefan Weil 已提交
205
    OPC_SPIM     = 0x0E | OPC_SPECIAL, /* unofficial */
206 207 208 209 210 211 212 213 214 215 216
    OPC_SYNC     = 0x0F | OPC_SPECIAL,

    OPC_SPECIAL15_RESERVED = 0x15 | OPC_SPECIAL,
    OPC_SPECIAL28_RESERVED = 0x28 | OPC_SPECIAL,
    OPC_SPECIAL29_RESERVED = 0x29 | OPC_SPECIAL,
    OPC_SPECIAL35_RESERVED = 0x35 | OPC_SPECIAL,
    OPC_SPECIAL37_RESERVED = 0x37 | OPC_SPECIAL,
    OPC_SPECIAL39_RESERVED = 0x39 | OPC_SPECIAL,
    OPC_SPECIAL3D_RESERVED = 0x3D | OPC_SPECIAL,
};

217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236
/* Multiplication variants of the vr54xx. */
#define MASK_MUL_VR54XX(op)   MASK_SPECIAL(op) | (op & (0x1F << 6))

enum {
    OPC_VR54XX_MULS    = (0x03 << 6) | OPC_MULT,
    OPC_VR54XX_MULSU   = (0x03 << 6) | OPC_MULTU,
    OPC_VR54XX_MACC    = (0x05 << 6) | OPC_MULT,
    OPC_VR54XX_MACCU   = (0x05 << 6) | OPC_MULTU,
    OPC_VR54XX_MSAC    = (0x07 << 6) | OPC_MULT,
    OPC_VR54XX_MSACU   = (0x07 << 6) | OPC_MULTU,
    OPC_VR54XX_MULHI   = (0x09 << 6) | OPC_MULT,
    OPC_VR54XX_MULHIU  = (0x09 << 6) | OPC_MULTU,
    OPC_VR54XX_MULSHI  = (0x0B << 6) | OPC_MULT,
    OPC_VR54XX_MULSHIU = (0x0B << 6) | OPC_MULTU,
    OPC_VR54XX_MACCHI  = (0x0D << 6) | OPC_MULT,
    OPC_VR54XX_MACCHIU = (0x0D << 6) | OPC_MULTU,
    OPC_VR54XX_MSACHI  = (0x0F << 6) | OPC_MULT,
    OPC_VR54XX_MSACHIU = (0x0F << 6) | OPC_MULTU,
};

237 238 239 240 241 242 243 244 245
/* REGIMM (rt field) opcodes */
#define MASK_REGIMM(op)    MASK_OP_MAJOR(op) | (op & (0x1F << 16))

enum {
    OPC_BLTZ     = (0x00 << 16) | OPC_REGIMM,
    OPC_BLTZL    = (0x02 << 16) | OPC_REGIMM,
    OPC_BGEZ     = (0x01 << 16) | OPC_REGIMM,
    OPC_BGEZL    = (0x03 << 16) | OPC_REGIMM,
    OPC_BLTZAL   = (0x10 << 16) | OPC_REGIMM,
246
    OPC_BLTZALS  = OPC_BLTZAL | 0x5, /* microMIPS */
247 248
    OPC_BLTZALL  = (0x12 << 16) | OPC_REGIMM,
    OPC_BGEZAL   = (0x11 << 16) | OPC_REGIMM,
249
    OPC_BGEZALS  = OPC_BGEZAL | 0x5, /* microMIPS */
250 251 252 253 254 255 256 257
    OPC_BGEZALL  = (0x13 << 16) | OPC_REGIMM,
    OPC_TGEI     = (0x08 << 16) | OPC_REGIMM,
    OPC_TGEIU    = (0x09 << 16) | OPC_REGIMM,
    OPC_TLTI     = (0x0A << 16) | OPC_REGIMM,
    OPC_TLTIU    = (0x0B << 16) | OPC_REGIMM,
    OPC_TEQI     = (0x0C << 16) | OPC_REGIMM,
    OPC_TNEI     = (0x0E << 16) | OPC_REGIMM,
    OPC_SYNCI    = (0x1F << 16) | OPC_REGIMM,
258 259
};

260 261 262
/* Special2 opcodes */
#define MASK_SPECIAL2(op)  MASK_OP_MAJOR(op) | (op & 0x3F)

263
enum {
264 265 266 267 268 269
    /* Multiply & xxx operations */
    OPC_MADD     = 0x00 | OPC_SPECIAL2,
    OPC_MADDU    = 0x01 | OPC_SPECIAL2,
    OPC_MUL      = 0x02 | OPC_SPECIAL2,
    OPC_MSUB     = 0x04 | OPC_SPECIAL2,
    OPC_MSUBU    = 0x05 | OPC_SPECIAL2,
270
    /* Misc */
271 272 273 274
    OPC_CLZ      = 0x20 | OPC_SPECIAL2,
    OPC_CLO      = 0x21 | OPC_SPECIAL2,
    OPC_DCLZ     = 0x24 | OPC_SPECIAL2,
    OPC_DCLO     = 0x25 | OPC_SPECIAL2,
275
    /* Special */
276 277 278 279 280 281 282 283 284 285 286 287 288 289 290
    OPC_SDBBP    = 0x3F | OPC_SPECIAL2,
};

/* Special3 opcodes */
#define MASK_SPECIAL3(op)  MASK_OP_MAJOR(op) | (op & 0x3F)

enum {
    OPC_EXT      = 0x00 | OPC_SPECIAL3,
    OPC_DEXTM    = 0x01 | OPC_SPECIAL3,
    OPC_DEXTU    = 0x02 | OPC_SPECIAL3,
    OPC_DEXT     = 0x03 | OPC_SPECIAL3,
    OPC_INS      = 0x04 | OPC_SPECIAL3,
    OPC_DINSM    = 0x05 | OPC_SPECIAL3,
    OPC_DINSU    = 0x06 | OPC_SPECIAL3,
    OPC_DINS     = 0x07 | OPC_SPECIAL3,
291 292
    OPC_FORK     = 0x08 | OPC_SPECIAL3,
    OPC_YIELD    = 0x09 | OPC_SPECIAL3,
293 294 295
    OPC_BSHFL    = 0x20 | OPC_SPECIAL3,
    OPC_DBSHFL   = 0x24 | OPC_SPECIAL3,
    OPC_RDHWR    = 0x3B | OPC_SPECIAL3,
296 297
};

298 299 300
/* BSHFL opcodes */
#define MASK_BSHFL(op)     MASK_SPECIAL3(op) | (op & (0x1F << 6))

301
enum {
302 303 304
    OPC_WSBH     = (0x02 << 6) | OPC_BSHFL,
    OPC_SEB      = (0x10 << 6) | OPC_BSHFL,
    OPC_SEH      = (0x18 << 6) | OPC_BSHFL,
305 306
};

307 308 309
/* DBSHFL opcodes */
#define MASK_DBSHFL(op)    MASK_SPECIAL3(op) | (op & (0x1F << 6))

310
enum {
311 312
    OPC_DSBH     = (0x02 << 6) | OPC_DBSHFL,
    OPC_DSHD     = (0x05 << 6) | OPC_DBSHFL,
313 314
};

315 316 317
/* Coprocessor 0 (rs field) */
#define MASK_CP0(op)       MASK_OP_MAJOR(op) | (op & (0x1F << 21))

B
bellard 已提交
318
enum {
319 320 321 322
    OPC_MFC0     = (0x00 << 21) | OPC_CP0,
    OPC_DMFC0    = (0x01 << 21) | OPC_CP0,
    OPC_MTC0     = (0x04 << 21) | OPC_CP0,
    OPC_DMTC0    = (0x05 << 21) | OPC_CP0,
323
    OPC_MFTR     = (0x08 << 21) | OPC_CP0,
324 325
    OPC_RDPGPR   = (0x0A << 21) | OPC_CP0,
    OPC_MFMC0    = (0x0B << 21) | OPC_CP0,
326
    OPC_MTTR     = (0x0C << 21) | OPC_CP0,
327 328 329 330
    OPC_WRPGPR   = (0x0E << 21) | OPC_CP0,
    OPC_C0       = (0x10 << 21) | OPC_CP0,
    OPC_C0_FIRST = (0x10 << 21) | OPC_CP0,
    OPC_C0_LAST  = (0x1F << 21) | OPC_CP0,
B
bellard 已提交
331
};
332 333

/* MFMC0 opcodes */
334
#define MASK_MFMC0(op)     MASK_CP0(op) | (op & 0xFFFF)
335 336

enum {
337 338 339 340
    OPC_DMT      = 0x01 | (0 << 5) | (0x0F << 6) | (0x01 << 11) | OPC_MFMC0,
    OPC_EMT      = 0x01 | (1 << 5) | (0x0F << 6) | (0x01 << 11) | OPC_MFMC0,
    OPC_DVPE     = 0x01 | (0 << 5) | OPC_MFMC0,
    OPC_EVPE     = 0x01 | (1 << 5) | OPC_MFMC0,
341 342 343 344 345 346 347 348 349 350 351 352 353 354 355 356 357 358 359 360 361
    OPC_DI       = (0 << 5) | (0x0C << 11) | OPC_MFMC0,
    OPC_EI       = (1 << 5) | (0x0C << 11) | OPC_MFMC0,
};

/* Coprocessor 0 (with rs == C0) */
#define MASK_C0(op)        MASK_CP0(op) | (op & 0x3F)

enum {
    OPC_TLBR     = 0x01 | OPC_C0,
    OPC_TLBWI    = 0x02 | OPC_C0,
    OPC_TLBWR    = 0x06 | OPC_C0,
    OPC_TLBP     = 0x08 | OPC_C0,
    OPC_RFE      = 0x10 | OPC_C0,
    OPC_ERET     = 0x18 | OPC_C0,
    OPC_DERET    = 0x1F | OPC_C0,
    OPC_WAIT     = 0x20 | OPC_C0,
};

/* Coprocessor 1 (rs field) */
#define MASK_CP1(op)       MASK_OP_MAJOR(op) | (op & (0x1F << 21))

362 363 364
/* Values for the fmt field in FP instructions */
enum {
    /* 0 - 15 are reserved */
365 366 367 368 369 370 371
    FMT_S = 16,          /* single fp */
    FMT_D = 17,          /* double fp */
    FMT_E = 18,          /* extended fp */
    FMT_Q = 19,          /* quad fp */
    FMT_W = 20,          /* 32-bit fixed */
    FMT_L = 21,          /* 64-bit fixed */
    FMT_PS = 22,         /* paired single fp */
372 373 374
    /* 23 - 31 are reserved */
};

375 376 377 378
enum {
    OPC_MFC1     = (0x00 << 21) | OPC_CP1,
    OPC_DMFC1    = (0x01 << 21) | OPC_CP1,
    OPC_CFC1     = (0x02 << 21) | OPC_CP1,
379
    OPC_MFHC1    = (0x03 << 21) | OPC_CP1,
380 381 382
    OPC_MTC1     = (0x04 << 21) | OPC_CP1,
    OPC_DMTC1    = (0x05 << 21) | OPC_CP1,
    OPC_CTC1     = (0x06 << 21) | OPC_CP1,
383
    OPC_MTHC1    = (0x07 << 21) | OPC_CP1,
384
    OPC_BC1      = (0x08 << 21) | OPC_CP1, /* bc */
385 386
    OPC_BC1ANY2  = (0x09 << 21) | OPC_CP1,
    OPC_BC1ANY4  = (0x0A << 21) | OPC_CP1,
387 388 389 390 391 392 393
    OPC_S_FMT    = (FMT_S << 21) | OPC_CP1,
    OPC_D_FMT    = (FMT_D << 21) | OPC_CP1,
    OPC_E_FMT    = (FMT_E << 21) | OPC_CP1,
    OPC_Q_FMT    = (FMT_Q << 21) | OPC_CP1,
    OPC_W_FMT    = (FMT_W << 21) | OPC_CP1,
    OPC_L_FMT    = (FMT_L << 21) | OPC_CP1,
    OPC_PS_FMT   = (FMT_PS << 21) | OPC_CP1,
394 395
};

396 397 398
#define MASK_CP1_FUNC(op)       MASK_CP1(op) | (op & 0x3F)
#define MASK_BC1(op)            MASK_CP1(op) | (op & (0x3 << 16))

399 400 401 402 403 404 405
enum {
    OPC_BC1F     = (0x00 << 16) | OPC_BC1,
    OPC_BC1T     = (0x01 << 16) | OPC_BC1,
    OPC_BC1FL    = (0x02 << 16) | OPC_BC1,
    OPC_BC1TL    = (0x03 << 16) | OPC_BC1,
};

406 407 408 409 410 411 412 413 414
enum {
    OPC_BC1FANY2     = (0x00 << 16) | OPC_BC1ANY2,
    OPC_BC1TANY2     = (0x01 << 16) | OPC_BC1ANY2,
};

enum {
    OPC_BC1FANY4     = (0x00 << 16) | OPC_BC1ANY4,
    OPC_BC1TANY4     = (0x01 << 16) | OPC_BC1ANY4,
};
415 416

#define MASK_CP2(op)       MASK_OP_MAJOR(op) | (op & (0x1F << 21))
T
ths 已提交
417 418 419 420 421 422 423 424 425 426 427 428 429 430 431 432 433 434 435 436 437 438 439 440 441 442 443 444 445 446 447

enum {
    OPC_MFC2    = (0x00 << 21) | OPC_CP2,
    OPC_DMFC2   = (0x01 << 21) | OPC_CP2,
    OPC_CFC2    = (0x02 << 21) | OPC_CP2,
    OPC_MFHC2   = (0x03 << 21) | OPC_CP2,
    OPC_MTC2    = (0x04 << 21) | OPC_CP2,
    OPC_DMTC2   = (0x05 << 21) | OPC_CP2,
    OPC_CTC2    = (0x06 << 21) | OPC_CP2,
    OPC_MTHC2   = (0x07 << 21) | OPC_CP2,
    OPC_BC2     = (0x08 << 21) | OPC_CP2,
};

#define MASK_CP3(op)       MASK_OP_MAJOR(op) | (op & 0x3F)

enum {
    OPC_LWXC1   = 0x00 | OPC_CP3,
    OPC_LDXC1   = 0x01 | OPC_CP3,
    OPC_LUXC1   = 0x05 | OPC_CP3,
    OPC_SWXC1   = 0x08 | OPC_CP3,
    OPC_SDXC1   = 0x09 | OPC_CP3,
    OPC_SUXC1   = 0x0D | OPC_CP3,
    OPC_PREFX   = 0x0F | OPC_CP3,
    OPC_ALNV_PS = 0x1E | OPC_CP3,
    OPC_MADD_S  = 0x20 | OPC_CP3,
    OPC_MADD_D  = 0x21 | OPC_CP3,
    OPC_MADD_PS = 0x26 | OPC_CP3,
    OPC_MSUB_S  = 0x28 | OPC_CP3,
    OPC_MSUB_D  = 0x29 | OPC_CP3,
    OPC_MSUB_PS = 0x2E | OPC_CP3,
    OPC_NMADD_S = 0x30 | OPC_CP3,
448
    OPC_NMADD_D = 0x31 | OPC_CP3,
T
ths 已提交
449 450 451 452 453 454
    OPC_NMADD_PS= 0x36 | OPC_CP3,
    OPC_NMSUB_S = 0x38 | OPC_CP3,
    OPC_NMSUB_D = 0x39 | OPC_CP3,
    OPC_NMSUB_PS= 0x3E | OPC_CP3,
};

455
/* global register indices */
P
pbrook 已提交
456 457
static TCGv_ptr cpu_env;
static TCGv cpu_gpr[32], cpu_PC;
458
static TCGv cpu_HI[MIPS_DSP_ACC], cpu_LO[MIPS_DSP_ACC], cpu_ACX[MIPS_DSP_ACC];
459 460
static TCGv cpu_dspctrl, btarget, bcond;
static TCGv_i32 hflags;
P
pbrook 已提交
461
static TCGv_i32 fpu_fcr0, fpu_fcr31;
T
ths 已提交
462

463 464
static uint32_t gen_opc_hflags[OPC_BUF_SIZE];

P
pbrook 已提交
465 466
#include "gen-icount.h"

P
pbrook 已提交
467 468 469 470 471
#define gen_helper_0i(name, arg) do {                             \
    TCGv_i32 helper_tmp = tcg_const_i32(arg);                     \
    gen_helper_##name(helper_tmp);                                \
    tcg_temp_free_i32(helper_tmp);                                \
    } while(0)
472

P
pbrook 已提交
473 474 475 476 477
#define gen_helper_1i(name, arg1, arg2) do {                      \
    TCGv_i32 helper_tmp = tcg_const_i32(arg2);                    \
    gen_helper_##name(arg1, helper_tmp);                          \
    tcg_temp_free_i32(helper_tmp);                                \
    } while(0)
478

P
pbrook 已提交
479 480 481 482 483
#define gen_helper_2i(name, arg1, arg2, arg3) do {                \
    TCGv_i32 helper_tmp = tcg_const_i32(arg3);                    \
    gen_helper_##name(arg1, arg2, helper_tmp);                    \
    tcg_temp_free_i32(helper_tmp);                                \
    } while(0)
484

P
pbrook 已提交
485 486 487 488 489
#define gen_helper_3i(name, arg1, arg2, arg3, arg4) do {          \
    TCGv_i32 helper_tmp = tcg_const_i32(arg4);                    \
    gen_helper_##name(arg1, arg2, arg3, helper_tmp);              \
    tcg_temp_free_i32(helper_tmp);                                \
    } while(0)
T
ths 已提交
490

491 492 493 494
typedef struct DisasContext {
    struct TranslationBlock *tb;
    target_ulong pc, saved_pc;
    uint32_t opcode;
N
Nathan Froyd 已提交
495
    int singlestep_enabled;
496 497 498 499 500 501 502 503 504
    /* Routine used to access memory */
    int mem_idx;
    uint32_t hflags, saved_hflags;
    int bstate;
    target_ulong btarget;
} DisasContext;

enum {
    BS_NONE     = 0, /* We go out of the TB without reaching a branch or an
T
ths 已提交
505
                      * exception condition */
506 507 508 509 510 511
    BS_STOP     = 1, /* We want to stop translation for any reason */
    BS_BRANCH   = 2, /* We reached a branch condition     */
    BS_EXCP     = 3, /* We reached an exception condition */
};

static const char *regnames[] =
B
bellard 已提交
512 513 514 515 516
    { "r0", "at", "v0", "v1", "a0", "a1", "a2", "a3",
      "t0", "t1", "t2", "t3", "t4", "t5", "t6", "t7",
      "s0", "s1", "s2", "s3", "s4", "s5", "s6", "s7",
      "t8", "t9", "k0", "k1", "gp", "sp", "s8", "ra", };

517 518 519 520 521 522 523 524 525
static const char *regnames_HI[] =
    { "HI0", "HI1", "HI2", "HI3", };

static const char *regnames_LO[] =
    { "LO0", "LO1", "LO2", "LO3", };

static const char *regnames_ACX[] =
    { "ACX0", "ACX1", "ACX2", "ACX3", };

526 527 528 529 530
static const char *fregnames[] =
    { "f0",  "f1",  "f2",  "f3",  "f4",  "f5",  "f6",  "f7",
      "f8",  "f9",  "f10", "f11", "f12", "f13", "f14", "f15",
      "f16", "f17", "f18", "f19", "f20", "f21", "f22", "f23",
      "f24", "f25", "f26", "f27", "f28", "f29", "f30", "f31", };
T
ths 已提交
531

532
#ifdef MIPS_DEBUG_DISAS
533
#define MIPS_DEBUG(fmt, ...)                         \
534 535
        qemu_log_mask(CPU_LOG_TB_IN_ASM,                \
                       TARGET_FMT_lx ": %08x " fmt "\n", \
536
                       ctx->pc, ctx->opcode , ## __VA_ARGS__)
537
#define LOG_DISAS(...) qemu_log_mask(CPU_LOG_TB_IN_ASM, ## __VA_ARGS__)
538
#else
539
#define MIPS_DEBUG(fmt, ...) do { } while(0)
540
#define LOG_DISAS(...) do { } while (0)
541
#endif
T
ths 已提交
542

543 544 545 546 547
#define MIPS_INVAL(op)                                                        \
do {                                                                          \
    MIPS_DEBUG("Invalid %s %03x %03x %03x", op, ctx->opcode >> 26,            \
               ctx->opcode & 0x3F, ((ctx->opcode >> 16) & 0x1F));             \
} while (0)
548

549 550
/* General purpose registers moves. */
static inline void gen_load_gpr (TCGv t, int reg)
551
{
552 553 554
    if (reg == 0)
        tcg_gen_movi_tl(t, 0);
    else
555
        tcg_gen_mov_tl(t, cpu_gpr[reg]);
556 557
}

558
static inline void gen_store_gpr (TCGv t, int reg)
559
{
560
    if (reg != 0)
561
        tcg_gen_mov_tl(cpu_gpr[reg], t);
562 563
}

A
aurel32 已提交
564
/* Moves to/from ACX register.  */
565
static inline void gen_load_ACX (TCGv t, int reg)
566
{
567
    tcg_gen_mov_tl(t, cpu_ACX[reg]);
568 569
}

570
static inline void gen_store_ACX (TCGv t, int reg)
571
{
572
    tcg_gen_mov_tl(cpu_ACX[reg], t);
573 574
}

575
/* Moves to/from shadow registers. */
576
static inline void gen_load_srsgpr (int from, int to)
577
{
578
    TCGv t0 = tcg_temp_new();
579 580

    if (from == 0)
581
        tcg_gen_movi_tl(t0, 0);
582
    else {
583
        TCGv_i32 t2 = tcg_temp_new_i32();
P
pbrook 已提交
584
        TCGv_ptr addr = tcg_temp_new_ptr();
585

586 587 588 589 590
        tcg_gen_ld_i32(t2, cpu_env, offsetof(CPUState, CP0_SRSCtl));
        tcg_gen_shri_i32(t2, t2, CP0SRSCtl_PSS);
        tcg_gen_andi_i32(t2, t2, 0xf);
        tcg_gen_muli_i32(t2, t2, sizeof(target_ulong) * 32);
        tcg_gen_ext_i32_ptr(addr, t2);
P
pbrook 已提交
591
        tcg_gen_add_ptr(addr, cpu_env, addr);
592

593
        tcg_gen_ld_tl(t0, addr, sizeof(target_ulong) * from);
P
pbrook 已提交
594
        tcg_temp_free_ptr(addr);
595
        tcg_temp_free_i32(t2);
596
    }
597 598
    gen_store_gpr(t0, to);
    tcg_temp_free(t0);
599 600
}

601
static inline void gen_store_srsgpr (int from, int to)
602
{
603
    if (to != 0) {
604 605
        TCGv t0 = tcg_temp_new();
        TCGv_i32 t2 = tcg_temp_new_i32();
P
pbrook 已提交
606
        TCGv_ptr addr = tcg_temp_new_ptr();
607

608 609 610 611 612 613
        gen_load_gpr(t0, from);
        tcg_gen_ld_i32(t2, cpu_env, offsetof(CPUState, CP0_SRSCtl));
        tcg_gen_shri_i32(t2, t2, CP0SRSCtl_PSS);
        tcg_gen_andi_i32(t2, t2, 0xf);
        tcg_gen_muli_i32(t2, t2, sizeof(target_ulong) * 32);
        tcg_gen_ext_i32_ptr(addr, t2);
P
pbrook 已提交
614
        tcg_gen_add_ptr(addr, cpu_env, addr);
615

616
        tcg_gen_st_tl(t0, addr, sizeof(target_ulong) * to);
P
pbrook 已提交
617
        tcg_temp_free_ptr(addr);
618 619
        tcg_temp_free_i32(t2);
        tcg_temp_free(t0);
620
    }
621 622 623
}

/* Floating point register moves. */
P
pbrook 已提交
624
static inline void gen_load_fpr32 (TCGv_i32 t, int reg)
T
ths 已提交
625
{
626
    tcg_gen_ld_i32(t, cpu_env, offsetof(CPUState, active_fpu.fpr[reg].w[FP_ENDIAN_IDX]));
B
bellard 已提交
627 628
}

P
pbrook 已提交
629
static inline void gen_store_fpr32 (TCGv_i32 t, int reg)
T
ths 已提交
630
{
631 632 633 634 635 636 637 638 639 640 641
    tcg_gen_st_i32(t, cpu_env, offsetof(CPUState, active_fpu.fpr[reg].w[FP_ENDIAN_IDX]));
}

static inline void gen_load_fpr32h (TCGv_i32 t, int reg)
{
    tcg_gen_ld_i32(t, cpu_env, offsetof(CPUState, active_fpu.fpr[reg].w[!FP_ENDIAN_IDX]));
}

static inline void gen_store_fpr32h (TCGv_i32 t, int reg)
{
    tcg_gen_st_i32(t, cpu_env, offsetof(CPUState, active_fpu.fpr[reg].w[!FP_ENDIAN_IDX]));
T
ths 已提交
642
}
B
bellard 已提交
643

P
pbrook 已提交
644
static inline void gen_load_fpr64 (DisasContext *ctx, TCGv_i64 t, int reg)
T
ths 已提交
645
{
A
aurel32 已提交
646
    if (ctx->hflags & MIPS_HFLAG_F64) {
647
        tcg_gen_ld_i64(t, cpu_env, offsetof(CPUState, active_fpu.fpr[reg].d));
A
aurel32 已提交
648
    } else {
649 650 651 652 653 654 655
        TCGv_i32 t0 = tcg_temp_new_i32();
        TCGv_i32 t1 = tcg_temp_new_i32();
        gen_load_fpr32(t0, reg & ~1);
        gen_load_fpr32(t1, reg | 1);
        tcg_gen_concat_i32_i64(t, t0, t1);
        tcg_temp_free_i32(t0);
        tcg_temp_free_i32(t1);
T
ths 已提交
656 657
    }
}
B
bellard 已提交
658

P
pbrook 已提交
659
static inline void gen_store_fpr64 (DisasContext *ctx, TCGv_i64 t, int reg)
T
ths 已提交
660
{
A
aurel32 已提交
661
    if (ctx->hflags & MIPS_HFLAG_F64) {
662
        tcg_gen_st_i64(t, cpu_env, offsetof(CPUState, active_fpu.fpr[reg].d));
A
aurel32 已提交
663
    } else {
664 665 666 667 668 669 670 671 672
        TCGv_i64 t0 = tcg_temp_new_i64();
        TCGv_i32 t1 = tcg_temp_new_i32();
        tcg_gen_trunc_i64_i32(t1, t);
        gen_store_fpr32(t1, reg & ~1);
        tcg_gen_shri_i64(t0, t, 32);
        tcg_gen_trunc_i64_i32(t1, t0);
        gen_store_fpr32(t1, reg | 1);
        tcg_temp_free_i32(t1);
        tcg_temp_free_i64(t0);
T
ths 已提交
673 674
    }
}
B
bellard 已提交
675

676
static inline int get_fp_bit (int cc)
677
{
678 679 680 681
    if (cc)
        return 24 + cc;
    else
        return 23;
682 683
}

684
/* Tests */
685 686
static inline void gen_save_pc(target_ulong pc)
{
A
aurel32 已提交
687
    tcg_gen_movi_tl(cpu_PC, pc);
688
}
689

690
static inline void save_cpu_state (DisasContext *ctx, int do_save_pc)
B
bellard 已提交
691
{
692
    LOG_DISAS("hflags %08x saved %08x\n", ctx->hflags, ctx->saved_hflags);
B
bellard 已提交
693
    if (do_save_pc && ctx->pc != ctx->saved_pc) {
694
        gen_save_pc(ctx->pc);
B
bellard 已提交
695 696 697
        ctx->saved_pc = ctx->pc;
    }
    if (ctx->hflags != ctx->saved_hflags) {
698
        tcg_gen_movi_i32(hflags, ctx->hflags);
B
bellard 已提交
699
        ctx->saved_hflags = ctx->hflags;
700
        switch (ctx->hflags & MIPS_HFLAG_BMASK_BASE) {
701 702 703 704 705
        case MIPS_HFLAG_BR:
            break;
        case MIPS_HFLAG_BC:
        case MIPS_HFLAG_BL:
        case MIPS_HFLAG_B:
T
ths 已提交
706
            tcg_gen_movi_tl(btarget, ctx->btarget);
707
            break;
B
bellard 已提交
708 709 710 711
        }
    }
}

712
static inline void restore_cpu_state (CPUState *env, DisasContext *ctx)
713
{
714
    ctx->saved_hflags = ctx->hflags;
715
    switch (ctx->hflags & MIPS_HFLAG_BMASK_BASE) {
716 717 718 719
    case MIPS_HFLAG_BR:
        break;
    case MIPS_HFLAG_BC:
    case MIPS_HFLAG_BL:
720
    case MIPS_HFLAG_B:
721 722
        ctx->btarget = env->btarget;
        break;
723 724 725
    }
}

726
static inline void
727
generate_exception_err (DisasContext *ctx, int excp, int err)
728
{
P
pbrook 已提交
729 730
    TCGv_i32 texcp = tcg_const_i32(excp);
    TCGv_i32 terr = tcg_const_i32(err);
731
    save_cpu_state(ctx, 1);
P
pbrook 已提交
732 733 734
    gen_helper_raise_exception_err(texcp, terr);
    tcg_temp_free_i32(terr);
    tcg_temp_free_i32(texcp);
735 736
}

737
static inline void
738
generate_exception (DisasContext *ctx, int excp)
739
{
B
bellard 已提交
740
    save_cpu_state(ctx, 1);
P
pbrook 已提交
741
    gen_helper_0i(raise_exception, excp);
B
bellard 已提交
742 743
}

744
/* Addresses computation */
745
static inline void gen_op_addr_add (DisasContext *ctx, TCGv ret, TCGv arg0, TCGv arg1)
B
bellard 已提交
746
{
747
    tcg_gen_add_tl(ret, arg0, arg1);
748 749 750 751 752

#if defined(TARGET_MIPS64)
    /* For compatibility with 32-bit code, data reference in user mode
       with Status_UX = 0 should be casted to 32-bit and sign extended.
       See the MIPS64 PRA manual, section 4.10. */
753 754
    if (((ctx->hflags & MIPS_HFLAG_KSU) == MIPS_HFLAG_UM) &&
        !(ctx->hflags & MIPS_HFLAG_UX)) {
755
        tcg_gen_ext32s_i64(ret, ret);
756 757
    }
#endif
B
bellard 已提交
758 759
}

760
static inline void check_cp0_enabled(DisasContext *ctx)
761
{
762
    if (unlikely(!(ctx->hflags & MIPS_HFLAG_CP0)))
763
        generate_exception_err(ctx, EXCP_CpU, 0);
764 765
}

766
static inline void check_cp1_enabled(DisasContext *ctx)
767
{
768
    if (unlikely(!(ctx->hflags & MIPS_HFLAG_FPU)))
769 770 771
        generate_exception_err(ctx, EXCP_CpU, 1);
}

772 773 774 775
/* Verify that the processor is running with COP1X instructions enabled.
   This is associated with the nabla symbol in the MIPS32 and MIPS64
   opcode tables.  */

776
static inline void check_cop1x(DisasContext *ctx)
777 778 779 780 781 782 783 784
{
    if (unlikely(!(ctx->hflags & MIPS_HFLAG_COP1X)))
        generate_exception(ctx, EXCP_RI);
}

/* Verify that the processor is running with 64-bit floating-point
   operations enabled.  */

785
static inline void check_cp1_64bitmode(DisasContext *ctx)
786
{
787
    if (unlikely(~ctx->hflags & (MIPS_HFLAG_F64 | MIPS_HFLAG_COP1X)))
788 789 790 791 792 793 794 795 796 797 798 799 800 801
        generate_exception(ctx, EXCP_RI);
}

/*
 * Verify if floating point register is valid; an operation is not defined
 * if bit 0 of any register specification is set and the FR bit in the
 * Status register equals zero, since the register numbers specify an
 * even-odd pair of adjacent coprocessor general registers. When the FR bit
 * in the Status register equals one, both even and odd register numbers
 * are valid. This limitation exists only for 64 bit wide (d,l,ps) registers.
 *
 * Multiple 64 bit wide registers can be checked by calling
 * gen_op_cp1_registers(freg1 | freg2 | ... | fregN);
 */
802
static inline void check_cp1_registers(DisasContext *ctx, int regs)
803
{
804
    if (unlikely(!(ctx->hflags & MIPS_HFLAG_F64) && (regs & 1)))
805 806 807
        generate_exception(ctx, EXCP_RI);
}

808
/* This code generates a "reserved instruction" exception if the
809
   CPU does not support the instruction set corresponding to flags. */
810
static inline void check_insn(CPUState *env, DisasContext *ctx, int flags)
811
{
812
    if (unlikely(!(env->insn_flags & flags)))
813 814 815
        generate_exception(ctx, EXCP_RI);
}

816 817
/* This code generates a "reserved instruction" exception if 64-bit
   instructions are not enabled. */
818
static inline void check_mips_64(DisasContext *ctx)
819
{
820
    if (unlikely(!(ctx->hflags & MIPS_HFLAG_64)))
821 822 823
        generate_exception(ctx, EXCP_RI);
}

824 825 826 827 828 829 830 831 832 833 834 835 836 837 838 839 840 841 842 843 844 845 846 847 848 849 850 851 852 853 854 855 856 857 858 859 860 861 862 863 864 865 866 867 868 869 870 871 872 873 874 875 876 877 878 879 880 881 882 883 884 885 886
/* Define small wrappers for gen_load_fpr* so that we have a uniform
   calling interface for 32 and 64-bit FPRs.  No sense in changing
   all callers for gen_load_fpr32 when we need the CTX parameter for
   this one use.  */
#define gen_ldcmp_fpr32(ctx, x, y) gen_load_fpr32(x, y)
#define gen_ldcmp_fpr64(ctx, x, y) gen_load_fpr64(ctx, x, y)
#define FOP_CONDS(type, abs, fmt, ifmt, bits)                                 \
static inline void gen_cmp ## type ## _ ## fmt(DisasContext *ctx, int n,      \
                                               int ft, int fs, int cc)        \
{                                                                             \
    TCGv_i##bits fp0 = tcg_temp_new_i##bits ();                               \
    TCGv_i##bits fp1 = tcg_temp_new_i##bits ();                               \
    switch (ifmt) {                                                           \
    case FMT_PS:                                                              \
        check_cp1_64bitmode(ctx);                                             \
        break;                                                                \
    case FMT_D:                                                               \
        if (abs) {                                                            \
            check_cop1x(ctx);                                                 \
        }                                                                     \
        check_cp1_registers(ctx, fs | ft);                                    \
        break;                                                                \
    case FMT_S:                                                               \
        if (abs) {                                                            \
            check_cop1x(ctx);                                                 \
        }                                                                     \
        break;                                                                \
    }                                                                         \
    gen_ldcmp_fpr##bits (ctx, fp0, fs);                                       \
    gen_ldcmp_fpr##bits (ctx, fp1, ft);                                       \
    switch (n) {                                                              \
    case  0: gen_helper_2i(cmp ## type ## _ ## fmt ## _f, fp0, fp1, cc);    break;\
    case  1: gen_helper_2i(cmp ## type ## _ ## fmt ## _un, fp0, fp1, cc);   break;\
    case  2: gen_helper_2i(cmp ## type ## _ ## fmt ## _eq, fp0, fp1, cc);   break;\
    case  3: gen_helper_2i(cmp ## type ## _ ## fmt ## _ueq, fp0, fp1, cc);  break;\
    case  4: gen_helper_2i(cmp ## type ## _ ## fmt ## _olt, fp0, fp1, cc);  break;\
    case  5: gen_helper_2i(cmp ## type ## _ ## fmt ## _ult, fp0, fp1, cc);  break;\
    case  6: gen_helper_2i(cmp ## type ## _ ## fmt ## _ole, fp0, fp1, cc);  break;\
    case  7: gen_helper_2i(cmp ## type ## _ ## fmt ## _ule, fp0, fp1, cc);  break;\
    case  8: gen_helper_2i(cmp ## type ## _ ## fmt ## _sf, fp0, fp1, cc);   break;\
    case  9: gen_helper_2i(cmp ## type ## _ ## fmt ## _ngle, fp0, fp1, cc); break;\
    case 10: gen_helper_2i(cmp ## type ## _ ## fmt ## _seq, fp0, fp1, cc);  break;\
    case 11: gen_helper_2i(cmp ## type ## _ ## fmt ## _ngl, fp0, fp1, cc);  break;\
    case 12: gen_helper_2i(cmp ## type ## _ ## fmt ## _lt, fp0, fp1, cc);   break;\
    case 13: gen_helper_2i(cmp ## type ## _ ## fmt ## _nge, fp0, fp1, cc);  break;\
    case 14: gen_helper_2i(cmp ## type ## _ ## fmt ## _le, fp0, fp1, cc);   break;\
    case 15: gen_helper_2i(cmp ## type ## _ ## fmt ## _ngt, fp0, fp1, cc);  break;\
    default: abort();                                                         \
    }                                                                         \
    tcg_temp_free_i##bits (fp0);                                              \
    tcg_temp_free_i##bits (fp1);                                              \
}

FOP_CONDS(, 0, d, FMT_D, 64)
FOP_CONDS(abs, 1, d, FMT_D, 64)
FOP_CONDS(, 0, s, FMT_S, 32)
FOP_CONDS(abs, 1, s, FMT_S, 32)
FOP_CONDS(, 0, ps, FMT_PS, 64)
FOP_CONDS(abs, 1, ps, FMT_PS, 64)
#undef FOP_CONDS
#undef gen_ldcmp_fpr32
#undef gen_ldcmp_fpr64

T
ths 已提交
887
/* load/store instructions. */
888
#define OP_LD(insn,fname)                                                 \
889
static inline void op_ld_##insn(TCGv ret, TCGv arg1, DisasContext *ctx)   \
890 891
{                                                                         \
    tcg_gen_qemu_##fname(ret, arg1, ctx->mem_idx);                        \
892 893 894 895 896 897 898 899 900 901 902 903
}
OP_LD(lb,ld8s);
OP_LD(lbu,ld8u);
OP_LD(lh,ld16s);
OP_LD(lhu,ld16u);
OP_LD(lw,ld32s);
#if defined(TARGET_MIPS64)
OP_LD(lwu,ld32u);
OP_LD(ld,ld64);
#endif
#undef OP_LD

904
#define OP_ST(insn,fname)                                                  \
905
static inline void op_st_##insn(TCGv arg1, TCGv arg2, DisasContext *ctx)   \
906 907
{                                                                          \
    tcg_gen_qemu_##fname(arg1, arg2, ctx->mem_idx);                        \
908 909 910 911 912 913 914 915 916
}
OP_ST(sb,st8);
OP_ST(sh,st16);
OP_ST(sw,st32);
#if defined(TARGET_MIPS64)
OP_ST(sd,st64);
#endif
#undef OP_ST

917
#ifdef CONFIG_USER_ONLY
918
#define OP_LD_ATOMIC(insn,fname)                                           \
919
static inline void op_ld_##insn(TCGv ret, TCGv arg1, DisasContext *ctx)    \
920 921 922 923
{                                                                          \
    TCGv t0 = tcg_temp_new();                                              \
    tcg_gen_mov_tl(t0, arg1);                                              \
    tcg_gen_qemu_##fname(ret, arg1, ctx->mem_idx);                         \
924
    tcg_gen_st_tl(t0, cpu_env, offsetof(CPUState, lladdr));                \
P
Paul Brook 已提交
925
    tcg_gen_st_tl(ret, cpu_env, offsetof(CPUState, llval));                \
926
    tcg_temp_free(t0);                                                     \
927
}
928 929
#else
#define OP_LD_ATOMIC(insn,fname)                                           \
930
static inline void op_ld_##insn(TCGv ret, TCGv arg1, DisasContext *ctx)    \
931 932 933 934
{                                                                          \
    gen_helper_2i(insn, ret, arg1, ctx->mem_idx);                          \
}
#endif
935 936 937 938 939 940
OP_LD_ATOMIC(ll,ld32s);
#if defined(TARGET_MIPS64)
OP_LD_ATOMIC(lld,ld64);
#endif
#undef OP_LD_ATOMIC

P
Paul Brook 已提交
941 942
#ifdef CONFIG_USER_ONLY
#define OP_ST_ATOMIC(insn,fname,ldname,almask)                               \
943
static inline void op_st_##insn(TCGv arg1, TCGv arg2, int rt, DisasContext *ctx) \
P
Paul Brook 已提交
944 945 946 947 948 949 950 951 952 953
{                                                                            \
    TCGv t0 = tcg_temp_new();                                                \
    int l1 = gen_new_label();                                                \
    int l2 = gen_new_label();                                                \
                                                                             \
    tcg_gen_andi_tl(t0, arg2, almask);                                       \
    tcg_gen_brcondi_tl(TCG_COND_EQ, t0, 0, l1);                              \
    tcg_gen_st_tl(arg2, cpu_env, offsetof(CPUState, CP0_BadVAddr));          \
    generate_exception(ctx, EXCP_AdES);                                      \
    gen_set_label(l1);                                                       \
954
    tcg_gen_ld_tl(t0, cpu_env, offsetof(CPUState, lladdr));                  \
P
Paul Brook 已提交
955 956 957 958 959 960 961 962 963 964 965 966
    tcg_gen_brcond_tl(TCG_COND_NE, arg2, t0, l2);                            \
    tcg_gen_movi_tl(t0, rt | ((almask << 3) & 0x20));                        \
    tcg_gen_st_tl(t0, cpu_env, offsetof(CPUState, llreg));                   \
    tcg_gen_st_tl(arg1, cpu_env, offsetof(CPUState, llnewval));              \
    gen_helper_0i(raise_exception, EXCP_SC);                                 \
    gen_set_label(l2);                                                       \
    tcg_gen_movi_tl(t0, 0);                                                  \
    gen_store_gpr(t0, rt);                                                   \
    tcg_temp_free(t0);                                                       \
}
#else
#define OP_ST_ATOMIC(insn,fname,ldname,almask)                               \
967
static inline void op_st_##insn(TCGv arg1, TCGv arg2, int rt, DisasContext *ctx) \
P
Paul Brook 已提交
968 969
{                                                                            \
    TCGv t0 = tcg_temp_new();                                                \
970
    gen_helper_3i(insn, t0, arg1, arg2, ctx->mem_idx);                       \
P
Paul Brook 已提交
971 972 973 974 975
    gen_store_gpr(t0, rt);                                                   \
    tcg_temp_free(t0);                                                       \
}
#endif
OP_ST_ATOMIC(sc,st32,ld32s,0x3);
976
#if defined(TARGET_MIPS64)
P
Paul Brook 已提交
977
OP_ST_ATOMIC(scd,st64,ld64,0x7);
978 979 980
#endif
#undef OP_ST_ATOMIC

981 982 983 984 985 986 987 988 989 990 991 992 993
static void gen_base_offset_addr (DisasContext *ctx, TCGv addr,
                                  int base, int16_t offset)
{
    if (base == 0) {
        tcg_gen_movi_tl(addr, offset);
    } else if (offset == 0) {
        gen_load_gpr(addr, base);
    } else {
        tcg_gen_movi_tl(addr, offset);
        gen_op_addr_add(ctx, addr, cpu_gpr[base], addr);
    }
}

994 995 996 997 998 999 1000 1001 1002 1003 1004 1005 1006 1007
static target_ulong pc_relative_pc (DisasContext *ctx)
{
    target_ulong pc = ctx->pc;

    if (ctx->hflags & MIPS_HFLAG_BMASK) {
        int branch_bytes = ctx->hflags & MIPS_HFLAG_BDS16 ? 2 : 4;

        pc -= branch_bytes;
    }

    pc &= ~(target_ulong)3;
    return pc;
}

1008
/* Load */
1009 1010
static void gen_ld (CPUState *env, DisasContext *ctx, uint32_t opc,
                    int rt, int base, int16_t offset)
B
bellard 已提交
1011
{
1012
    const char *opn = "ld";
1013 1014 1015 1016 1017 1018 1019 1020 1021
    TCGv t0, t1;

    if (rt == 0 && env->insn_flags & (INSN_LOONGSON2E | INSN_LOONGSON2F)) {
        /* Loongson CPU uses a load to zero register for prefetch.
           We emulate it as a NOP. On other CPU we must perform the
           actual memory access. */
        MIPS_DEBUG("NOP");
        return;
    }
B
bellard 已提交
1022

1023 1024
    t0 = tcg_temp_new();
    t1 = tcg_temp_new();
1025
    gen_base_offset_addr(ctx, t0, base, offset);
1026

B
bellard 已提交
1027
    switch (opc) {
1028
#if defined(TARGET_MIPS64)
1029
    case OPC_LWU:
A
aurel32 已提交
1030
        save_cpu_state(ctx, 0);
1031
        op_ld_lwu(t0, t0, ctx);
T
ths 已提交
1032
        gen_store_gpr(t0, rt);
1033 1034
        opn = "lwu";
        break;
B
bellard 已提交
1035
    case OPC_LD:
A
aurel32 已提交
1036
        save_cpu_state(ctx, 0);
1037
        op_ld_ld(t0, t0, ctx);
T
ths 已提交
1038
        gen_store_gpr(t0, rt);
B
bellard 已提交
1039 1040
        opn = "ld";
        break;
1041
    case OPC_LLD:
A
aurel32 已提交
1042
        save_cpu_state(ctx, 0);
1043
        op_ld_lld(t0, t0, ctx);
T
ths 已提交
1044
        gen_store_gpr(t0, rt);
1045 1046
        opn = "lld";
        break;
B
bellard 已提交
1047
    case OPC_LDL:
T
ths 已提交
1048
        save_cpu_state(ctx, 1);
T
ths 已提交
1049
        gen_load_gpr(t1, rt);
1050
        gen_helper_3i(ldl, t1, t1, t0, ctx->mem_idx);
T
ths 已提交
1051
        gen_store_gpr(t1, rt);
B
bellard 已提交
1052 1053 1054
        opn = "ldl";
        break;
    case OPC_LDR:
T
ths 已提交
1055
        save_cpu_state(ctx, 1);
T
ths 已提交
1056
        gen_load_gpr(t1, rt);
1057
        gen_helper_3i(ldr, t1, t1, t0, ctx->mem_idx);
T
ths 已提交
1058
        gen_store_gpr(t1, rt);
B
bellard 已提交
1059 1060
        opn = "ldr";
        break;
1061 1062 1063 1064
    case OPC_LDPC:
        save_cpu_state(ctx, 1);
        tcg_gen_movi_tl(t1, pc_relative_pc(ctx));
        gen_op_addr_add(ctx, t0, t0, t1);
1065
        op_ld_ld(t0, t0, ctx);
1066
        gen_store_gpr(t0, rt);
1067
        opn = "ldpc";
1068
        break;
B
bellard 已提交
1069
#endif
1070 1071 1072 1073
    case OPC_LWPC:
        save_cpu_state(ctx, 1);
        tcg_gen_movi_tl(t1, pc_relative_pc(ctx));
        gen_op_addr_add(ctx, t0, t0, t1);
1074
        op_ld_lw(t0, t0, ctx);
1075
        gen_store_gpr(t0, rt);
1076
        opn = "lwpc";
1077
        break;
B
bellard 已提交
1078
    case OPC_LW:
A
aurel32 已提交
1079
        save_cpu_state(ctx, 0);
1080
        op_ld_lw(t0, t0, ctx);
T
ths 已提交
1081
        gen_store_gpr(t0, rt);
B
bellard 已提交
1082 1083 1084
        opn = "lw";
        break;
    case OPC_LH:
A
aurel32 已提交
1085
        save_cpu_state(ctx, 0);
1086
        op_ld_lh(t0, t0, ctx);
T
ths 已提交
1087
        gen_store_gpr(t0, rt);
B
bellard 已提交
1088 1089 1090
        opn = "lh";
        break;
    case OPC_LHU:
A
aurel32 已提交
1091
        save_cpu_state(ctx, 0);
1092
        op_ld_lhu(t0, t0, ctx);
T
ths 已提交
1093
        gen_store_gpr(t0, rt);
B
bellard 已提交
1094 1095 1096
        opn = "lhu";
        break;
    case OPC_LB:
A
aurel32 已提交
1097
        save_cpu_state(ctx, 0);
1098
        op_ld_lb(t0, t0, ctx);
T
ths 已提交
1099
        gen_store_gpr(t0, rt);
B
bellard 已提交
1100 1101 1102
        opn = "lb";
        break;
    case OPC_LBU:
A
aurel32 已提交
1103
        save_cpu_state(ctx, 0);
1104
        op_ld_lbu(t0, t0, ctx);
T
ths 已提交
1105
        gen_store_gpr(t0, rt);
B
bellard 已提交
1106 1107 1108
        opn = "lbu";
        break;
    case OPC_LWL:
T
ths 已提交
1109
        save_cpu_state(ctx, 1);
A
aurel32 已提交
1110
        gen_load_gpr(t1, rt);
1111
        gen_helper_3i(lwl, t1, t1, t0, ctx->mem_idx);
T
ths 已提交
1112
        gen_store_gpr(t1, rt);
B
bellard 已提交
1113 1114 1115
        opn = "lwl";
        break;
    case OPC_LWR:
T
ths 已提交
1116
        save_cpu_state(ctx, 1);
A
aurel32 已提交
1117
        gen_load_gpr(t1, rt);
1118
        gen_helper_3i(lwr, t1, t1, t0, ctx->mem_idx);
T
ths 已提交
1119
        gen_store_gpr(t1, rt);
B
bellard 已提交
1120 1121 1122
        opn = "lwr";
        break;
    case OPC_LL:
1123
        save_cpu_state(ctx, 1);
1124
        op_ld_ll(t0, t0, ctx);
T
ths 已提交
1125
        gen_store_gpr(t0, rt);
B
bellard 已提交
1126 1127
        opn = "ll";
        break;
A
aurel32 已提交
1128 1129 1130 1131 1132 1133
    }
    MIPS_DEBUG("%s %s, %d(%s)", opn, regnames[rt], offset, regnames[base]);
    tcg_temp_free(t0);
    tcg_temp_free(t1);
}

1134 1135 1136 1137 1138 1139 1140 1141 1142 1143 1144 1145 1146 1147 1148 1149 1150 1151 1152 1153 1154 1155 1156 1157 1158 1159 1160 1161 1162 1163 1164 1165 1166 1167 1168 1169 1170 1171 1172 1173 1174 1175 1176 1177 1178 1179 1180 1181 1182 1183 1184 1185 1186 1187 1188 1189 1190 1191 1192 1193
/* Store */
static void gen_st (DisasContext *ctx, uint32_t opc, int rt,
                    int base, int16_t offset)
{
    const char *opn = "st";
    TCGv t0 = tcg_temp_new();
    TCGv t1 = tcg_temp_new();

    gen_base_offset_addr(ctx, t0, base, offset);
    gen_load_gpr(t1, rt);
    switch (opc) {
#if defined(TARGET_MIPS64)
    case OPC_SD:
        save_cpu_state(ctx, 0);
        op_st_sd(t1, t0, ctx);
        opn = "sd";
        break;
    case OPC_SDL:
        save_cpu_state(ctx, 1);
        gen_helper_2i(sdl, t1, t0, ctx->mem_idx);
        opn = "sdl";
        break;
    case OPC_SDR:
        save_cpu_state(ctx, 1);
        gen_helper_2i(sdr, t1, t0, ctx->mem_idx);
        opn = "sdr";
        break;
#endif
    case OPC_SW:
        save_cpu_state(ctx, 0);
        op_st_sw(t1, t0, ctx);
        opn = "sw";
        break;
    case OPC_SH:
        save_cpu_state(ctx, 0);
        op_st_sh(t1, t0, ctx);
        opn = "sh";
        break;
    case OPC_SB:
        save_cpu_state(ctx, 0);
        op_st_sb(t1, t0, ctx);
        opn = "sb";
        break;
    case OPC_SWL:
        save_cpu_state(ctx, 1);
        gen_helper_2i(swl, t1, t0, ctx->mem_idx);
        opn = "swl";
        break;
    case OPC_SWR:
        save_cpu_state(ctx, 1);
        gen_helper_2i(swr, t1, t0, ctx->mem_idx);
        opn = "swr";
        break;
    }
    MIPS_DEBUG("%s %s, %d(%s)", opn, regnames[rt], offset, regnames[base]);
    tcg_temp_free(t0);
    tcg_temp_free(t1);
}


A
aurel32 已提交
1194 1195 1196 1197 1198 1199 1200 1201 1202
/* Store conditional */
static void gen_st_cond (DisasContext *ctx, uint32_t opc, int rt,
                         int base, int16_t offset)
{
    const char *opn = "st_cond";
    TCGv t0, t1;

    t0 = tcg_temp_local_new();

1203
    gen_base_offset_addr(ctx, t0, base, offset);
A
aurel32 已提交
1204 1205 1206 1207 1208 1209 1210 1211 1212
    /* Don't do NOP if destination is zero: we must perform the actual
       memory access. */

    t1 = tcg_temp_local_new();
    gen_load_gpr(t1, rt);
    switch (opc) {
#if defined(TARGET_MIPS64)
    case OPC_SCD:
        save_cpu_state(ctx, 0);
1213
        op_st_scd(t1, t0, rt, ctx);
A
aurel32 已提交
1214 1215 1216
        opn = "scd";
        break;
#endif
B
bellard 已提交
1217
    case OPC_SC:
1218
        save_cpu_state(ctx, 1);
1219
        op_st_sc(t1, t0, rt, ctx);
B
bellard 已提交
1220 1221 1222 1223
        opn = "sc";
        break;
    }
    MIPS_DEBUG("%s %s, %d(%s)", opn, regnames[rt], offset, regnames[base]);
T
ths 已提交
1224
    tcg_temp_free(t1);
A
aurel32 已提交
1225
    tcg_temp_free(t0);
B
bellard 已提交
1226 1227
}

B
bellard 已提交
1228
/* Load and store */
1229
static void gen_flt_ldst (DisasContext *ctx, uint32_t opc, int ft,
1230
                          int base, int16_t offset)
B
bellard 已提交
1231
{
1232
    const char *opn = "flt_ldst";
A
aurel32 已提交
1233
    TCGv t0 = tcg_temp_new();
B
bellard 已提交
1234

1235
    gen_base_offset_addr(ctx, t0, base, offset);
B
bellard 已提交
1236
    /* Don't do NOP if destination is zero: we must perform the actual
1237
       memory access. */
B
bellard 已提交
1238 1239
    switch (opc) {
    case OPC_LWC1:
1240
        {
P
pbrook 已提交
1241
            TCGv_i32 fp0 = tcg_temp_new_i32();
1242

A
aurel32 已提交
1243 1244
            tcg_gen_qemu_ld32s(t0, t0, ctx->mem_idx);
            tcg_gen_trunc_tl_i32(fp0, t0);
1245
            gen_store_fpr32(fp0, ft);
P
pbrook 已提交
1246
            tcg_temp_free_i32(fp0);
1247
        }
B
bellard 已提交
1248 1249 1250
        opn = "lwc1";
        break;
    case OPC_SWC1:
1251
        {
P
pbrook 已提交
1252 1253
            TCGv_i32 fp0 = tcg_temp_new_i32();
            TCGv t1 = tcg_temp_new();
1254 1255

            gen_load_fpr32(fp0, ft);
P
pbrook 已提交
1256 1257 1258 1259
            tcg_gen_extu_i32_tl(t1, fp0);
            tcg_gen_qemu_st32(t1, t0, ctx->mem_idx);
            tcg_temp_free(t1);
            tcg_temp_free_i32(fp0);
1260
        }
B
bellard 已提交
1261 1262 1263
        opn = "swc1";
        break;
    case OPC_LDC1:
1264
        {
P
pbrook 已提交
1265
            TCGv_i64 fp0 = tcg_temp_new_i64();
1266 1267 1268

            tcg_gen_qemu_ld64(fp0, t0, ctx->mem_idx);
            gen_store_fpr64(ctx, fp0, ft);
P
pbrook 已提交
1269
            tcg_temp_free_i64(fp0);
1270
        }
B
bellard 已提交
1271 1272 1273
        opn = "ldc1";
        break;
    case OPC_SDC1:
1274
        {
P
pbrook 已提交
1275
            TCGv_i64 fp0 = tcg_temp_new_i64();
1276 1277 1278

            gen_load_fpr64(ctx, fp0, ft);
            tcg_gen_qemu_st64(fp0, t0, ctx->mem_idx);
P
pbrook 已提交
1279
            tcg_temp_free_i64(fp0);
1280
        }
B
bellard 已提交
1281 1282 1283
        opn = "sdc1";
        break;
    default:
1284
        MIPS_INVAL(opn);
1285
        generate_exception(ctx, EXCP_RI);
T
ths 已提交
1286
        goto out;
B
bellard 已提交
1287 1288
    }
    MIPS_DEBUG("%s %s, %d(%s)", opn, fregnames[ft], offset, regnames[base]);
T
ths 已提交
1289 1290
 out:
    tcg_temp_free(t0);
B
bellard 已提交
1291 1292
}

1293 1294 1295 1296 1297 1298 1299 1300 1301 1302 1303
static void gen_cop1_ldst(CPUState *env, DisasContext *ctx,
                          uint32_t op, int rt, int rs, int16_t imm)
{
    if (env->CP0_Config1 & (1 << CP0C1_FP)) {
        check_cp1_enabled(ctx);
        gen_flt_ldst(ctx, op, rt, rs, imm);
    } else {
        generate_exception_err(ctx, EXCP_CpU, 1);
    }
}

B
bellard 已提交
1304
/* Arithmetic with immediate operand */
1305 1306
static void gen_arith_imm (CPUState *env, DisasContext *ctx, uint32_t opc,
                           int rt, int rs, int16_t imm)
B
bellard 已提交
1307
{
A
aurel32 已提交
1308
    target_ulong uimm = (target_long)imm; /* Sign extend to 32/64 bits */
1309
    const char *opn = "imm arith";
B
bellard 已提交
1310

1311
    if (rt == 0 && opc != OPC_ADDI && opc != OPC_DADDI) {
1312 1313
        /* If no destination, treat it as a NOP.
           For addi, we must generate the overflow exception when needed. */
B
bellard 已提交
1314
        MIPS_DEBUG("NOP");
A
aurel32 已提交
1315
        return;
B
bellard 已提交
1316 1317 1318
    }
    switch (opc) {
    case OPC_ADDI:
1319
        {
A
aurel32 已提交
1320 1321 1322
            TCGv t0 = tcg_temp_local_new();
            TCGv t1 = tcg_temp_new();
            TCGv t2 = tcg_temp_new();
1323 1324
            int l1 = gen_new_label();

A
aurel32 已提交
1325 1326 1327
            gen_load_gpr(t1, rs);
            tcg_gen_addi_tl(t0, t1, uimm);
            tcg_gen_ext32s_tl(t0, t0);
1328

A
aurel32 已提交
1329 1330 1331 1332 1333 1334
            tcg_gen_xori_tl(t1, t1, ~uimm);
            tcg_gen_xori_tl(t2, t0, uimm);
            tcg_gen_and_tl(t1, t1, t2);
            tcg_temp_free(t2);
            tcg_gen_brcondi_tl(TCG_COND_GE, t1, 0, l1);
            tcg_temp_free(t1);
1335 1336 1337
            /* operands of same sign, result different sign */
            generate_exception(ctx, EXCP_OVERFLOW);
            gen_set_label(l1);
T
ths 已提交
1338
            tcg_gen_ext32s_tl(t0, t0);
A
aurel32 已提交
1339 1340
            gen_store_gpr(t0, rt);
            tcg_temp_free(t0);
1341
        }
B
bellard 已提交
1342 1343 1344
        opn = "addi";
        break;
    case OPC_ADDIU:
A
aurel32 已提交
1345 1346 1347 1348 1349 1350
        if (rs != 0) {
            tcg_gen_addi_tl(cpu_gpr[rt], cpu_gpr[rs], uimm);
            tcg_gen_ext32s_tl(cpu_gpr[rt], cpu_gpr[rt]);
        } else {
            tcg_gen_movi_tl(cpu_gpr[rt], uimm);
        }
B
bellard 已提交
1351 1352
        opn = "addiu";
        break;
1353
#if defined(TARGET_MIPS64)
1354
    case OPC_DADDI:
1355
        {
A
aurel32 已提交
1356 1357 1358
            TCGv t0 = tcg_temp_local_new();
            TCGv t1 = tcg_temp_new();
            TCGv t2 = tcg_temp_new();
1359 1360
            int l1 = gen_new_label();

A
aurel32 已提交
1361 1362
            gen_load_gpr(t1, rs);
            tcg_gen_addi_tl(t0, t1, uimm);
1363

A
aurel32 已提交
1364 1365 1366 1367 1368 1369
            tcg_gen_xori_tl(t1, t1, ~uimm);
            tcg_gen_xori_tl(t2, t0, uimm);
            tcg_gen_and_tl(t1, t1, t2);
            tcg_temp_free(t2);
            tcg_gen_brcondi_tl(TCG_COND_GE, t1, 0, l1);
            tcg_temp_free(t1);
1370 1371 1372
            /* operands of same sign, result different sign */
            generate_exception(ctx, EXCP_OVERFLOW);
            gen_set_label(l1);
A
aurel32 已提交
1373 1374
            gen_store_gpr(t0, rt);
            tcg_temp_free(t0);
1375
        }
1376 1377 1378
        opn = "daddi";
        break;
    case OPC_DADDIU:
A
aurel32 已提交
1379 1380 1381 1382 1383
        if (rs != 0) {
            tcg_gen_addi_tl(cpu_gpr[rt], cpu_gpr[rs], uimm);
        } else {
            tcg_gen_movi_tl(cpu_gpr[rt], uimm);
        }
1384 1385 1386
        opn = "daddiu";
        break;
#endif
A
aurel32 已提交
1387 1388 1389 1390 1391 1392 1393 1394 1395 1396 1397 1398 1399 1400 1401 1402 1403
    }
    MIPS_DEBUG("%s %s, %s, " TARGET_FMT_lx, opn, regnames[rt], regnames[rs], uimm);
}

/* Logic with immediate operand */
static void gen_logic_imm (CPUState *env, uint32_t opc, int rt, int rs, int16_t imm)
{
    target_ulong uimm;
    const char *opn = "imm logic";

    if (rt == 0) {
        /* If no destination, treat it as a NOP. */
        MIPS_DEBUG("NOP");
        return;
    }
    uimm = (uint16_t)imm;
    switch (opc) {
B
bellard 已提交
1404
    case OPC_ANDI:
A
aurel32 已提交
1405 1406 1407 1408
        if (likely(rs != 0))
            tcg_gen_andi_tl(cpu_gpr[rt], cpu_gpr[rs], uimm);
        else
            tcg_gen_movi_tl(cpu_gpr[rt], 0);
B
bellard 已提交
1409 1410 1411
        opn = "andi";
        break;
    case OPC_ORI:
A
aurel32 已提交
1412 1413 1414 1415
        if (rs != 0)
            tcg_gen_ori_tl(cpu_gpr[rt], cpu_gpr[rs], uimm);
        else
            tcg_gen_movi_tl(cpu_gpr[rt], uimm);
B
bellard 已提交
1416 1417 1418
        opn = "ori";
        break;
    case OPC_XORI:
A
aurel32 已提交
1419 1420 1421 1422
        if (likely(rs != 0))
            tcg_gen_xori_tl(cpu_gpr[rt], cpu_gpr[rs], uimm);
        else
            tcg_gen_movi_tl(cpu_gpr[rt], uimm);
B
bellard 已提交
1423 1424 1425
        opn = "xori";
        break;
    case OPC_LUI:
A
aurel32 已提交
1426
        tcg_gen_movi_tl(cpu_gpr[rt], imm << 16);
B
bellard 已提交
1427 1428
        opn = "lui";
        break;
A
aurel32 已提交
1429 1430 1431 1432 1433 1434 1435 1436 1437 1438 1439 1440 1441 1442 1443 1444 1445 1446 1447 1448
    }
    MIPS_DEBUG("%s %s, %s, " TARGET_FMT_lx, opn, regnames[rt], regnames[rs], uimm);
}

/* Set on less than with immediate operand */
static void gen_slt_imm (CPUState *env, uint32_t opc, int rt, int rs, int16_t imm)
{
    target_ulong uimm = (target_long)imm; /* Sign extend to 32/64 bits */
    const char *opn = "imm arith";
    TCGv t0;

    if (rt == 0) {
        /* If no destination, treat it as a NOP. */
        MIPS_DEBUG("NOP");
        return;
    }
    t0 = tcg_temp_new();
    gen_load_gpr(t0, rs);
    switch (opc) {
    case OPC_SLTI:
1449
        tcg_gen_setcondi_tl(TCG_COND_LT, cpu_gpr[rt], t0, uimm);
A
aurel32 已提交
1450 1451 1452
        opn = "slti";
        break;
    case OPC_SLTIU:
1453
        tcg_gen_setcondi_tl(TCG_COND_LTU, cpu_gpr[rt], t0, uimm);
A
aurel32 已提交
1454 1455 1456 1457 1458 1459 1460 1461 1462 1463 1464 1465 1466 1467 1468 1469 1470 1471 1472 1473 1474 1475 1476 1477
        opn = "sltiu";
        break;
    }
    MIPS_DEBUG("%s %s, %s, " TARGET_FMT_lx, opn, regnames[rt], regnames[rs], uimm);
    tcg_temp_free(t0);
}

/* Shifts with immediate operand */
static void gen_shift_imm(CPUState *env, DisasContext *ctx, uint32_t opc,
                          int rt, int rs, int16_t imm)
{
    target_ulong uimm = ((uint16_t)imm) & 0x1f;
    const char *opn = "imm shift";
    TCGv t0;

    if (rt == 0) {
        /* If no destination, treat it as a NOP. */
        MIPS_DEBUG("NOP");
        return;
    }

    t0 = tcg_temp_new();
    gen_load_gpr(t0, rs);
    switch (opc) {
B
bellard 已提交
1478
    case OPC_SLL:
T
ths 已提交
1479
        tcg_gen_shli_tl(t0, t0, uimm);
A
aurel32 已提交
1480
        tcg_gen_ext32s_tl(cpu_gpr[rt], t0);
B
bellard 已提交
1481 1482 1483
        opn = "sll";
        break;
    case OPC_SRA:
A
aurel32 已提交
1484
        tcg_gen_sari_tl(cpu_gpr[rt], t0, uimm);
B
bellard 已提交
1485 1486 1487
        opn = "sra";
        break;
    case OPC_SRL:
1488 1489 1490 1491 1492
        if (uimm != 0) {
            tcg_gen_ext32u_tl(t0, t0);
            tcg_gen_shri_tl(cpu_gpr[rt], t0, uimm);
        } else {
            tcg_gen_ext32s_tl(cpu_gpr[rt], t0);
1493
        }
1494 1495 1496 1497 1498 1499 1500 1501 1502 1503
        opn = "srl";
        break;
    case OPC_ROTR:
        if (uimm != 0) {
            TCGv_i32 t1 = tcg_temp_new_i32();

            tcg_gen_trunc_tl_i32(t1, t0);
            tcg_gen_rotri_i32(t1, t1, uimm);
            tcg_gen_ext_i32_tl(cpu_gpr[rt], t1);
            tcg_temp_free_i32(t1);
1504 1505
        } else {
            tcg_gen_ext32s_tl(cpu_gpr[rt], t0);
1506 1507
        }
        opn = "rotr";
1508
        break;
1509
#if defined(TARGET_MIPS64)
1510
    case OPC_DSLL:
A
aurel32 已提交
1511
        tcg_gen_shli_tl(cpu_gpr[rt], t0, uimm);
1512 1513 1514
        opn = "dsll";
        break;
    case OPC_DSRA:
A
aurel32 已提交
1515
        tcg_gen_sari_tl(cpu_gpr[rt], t0, uimm);
1516 1517 1518
        opn = "dsra";
        break;
    case OPC_DSRL:
1519 1520 1521 1522 1523 1524
        tcg_gen_shri_tl(cpu_gpr[rt], t0, uimm);
        opn = "dsrl";
        break;
    case OPC_DROTR:
        if (uimm != 0) {
            tcg_gen_rotri_tl(cpu_gpr[rt], t0, uimm);
1525 1526
        } else {
            tcg_gen_mov_tl(cpu_gpr[rt], t0);
1527
        }
1528
        opn = "drotr";
1529 1530
        break;
    case OPC_DSLL32:
A
aurel32 已提交
1531
        tcg_gen_shli_tl(cpu_gpr[rt], t0, uimm + 32);
1532 1533 1534
        opn = "dsll32";
        break;
    case OPC_DSRA32:
A
aurel32 已提交
1535
        tcg_gen_sari_tl(cpu_gpr[rt], t0, uimm + 32);
1536 1537 1538
        opn = "dsra32";
        break;
    case OPC_DSRL32:
1539 1540 1541 1542 1543 1544
        tcg_gen_shri_tl(cpu_gpr[rt], t0, uimm + 32);
        opn = "dsrl32";
        break;
    case OPC_DROTR32:
        tcg_gen_rotri_tl(cpu_gpr[rt], t0, uimm + 32);
        opn = "drotr32";
B
bellard 已提交
1545
        break;
1546
#endif
B
bellard 已提交
1547
    }
T
ths 已提交
1548
    MIPS_DEBUG("%s %s, %s, " TARGET_FMT_lx, opn, regnames[rt], regnames[rs], uimm);
T
ths 已提交
1549
    tcg_temp_free(t0);
B
bellard 已提交
1550 1551 1552
}

/* Arithmetic */
1553
static void gen_arith (CPUState *env, DisasContext *ctx, uint32_t opc,
B
bellard 已提交
1554 1555
                       int rd, int rs, int rt)
{
1556
    const char *opn = "arith";
B
bellard 已提交
1557

1558 1559
    if (rd == 0 && opc != OPC_ADD && opc != OPC_SUB
       && opc != OPC_DADD && opc != OPC_DSUB) {
1560 1561
        /* If no destination, treat it as a NOP.
           For add & sub, we must generate the overflow exception when needed. */
B
bellard 已提交
1562
        MIPS_DEBUG("NOP");
A
aurel32 已提交
1563
        return;
T
ths 已提交
1564
    }
A
aurel32 已提交
1565

B
bellard 已提交
1566 1567
    switch (opc) {
    case OPC_ADD:
1568
        {
A
aurel32 已提交
1569 1570 1571
            TCGv t0 = tcg_temp_local_new();
            TCGv t1 = tcg_temp_new();
            TCGv t2 = tcg_temp_new();
1572 1573
            int l1 = gen_new_label();

A
aurel32 已提交
1574 1575 1576 1577 1578 1579
            gen_load_gpr(t1, rs);
            gen_load_gpr(t2, rt);
            tcg_gen_add_tl(t0, t1, t2);
            tcg_gen_ext32s_tl(t0, t0);
            tcg_gen_xor_tl(t1, t1, t2);
            tcg_gen_xor_tl(t2, t0, t2);
1580
            tcg_gen_andc_tl(t1, t2, t1);
A
aurel32 已提交
1581 1582 1583
            tcg_temp_free(t2);
            tcg_gen_brcondi_tl(TCG_COND_GE, t1, 0, l1);
            tcg_temp_free(t1);
1584 1585 1586
            /* operands of same sign, result different sign */
            generate_exception(ctx, EXCP_OVERFLOW);
            gen_set_label(l1);
A
aurel32 已提交
1587 1588
            gen_store_gpr(t0, rd);
            tcg_temp_free(t0);
1589
        }
B
bellard 已提交
1590 1591 1592
        opn = "add";
        break;
    case OPC_ADDU:
A
aurel32 已提交
1593 1594 1595 1596 1597 1598 1599 1600 1601 1602
        if (rs != 0 && rt != 0) {
            tcg_gen_add_tl(cpu_gpr[rd], cpu_gpr[rs], cpu_gpr[rt]);
            tcg_gen_ext32s_tl(cpu_gpr[rd], cpu_gpr[rd]);
        } else if (rs == 0 && rt != 0) {
            tcg_gen_mov_tl(cpu_gpr[rd], cpu_gpr[rt]);
        } else if (rs != 0 && rt == 0) {
            tcg_gen_mov_tl(cpu_gpr[rd], cpu_gpr[rs]);
        } else {
            tcg_gen_movi_tl(cpu_gpr[rd], 0);
        }
B
bellard 已提交
1603 1604 1605
        opn = "addu";
        break;
    case OPC_SUB:
1606
        {
A
aurel32 已提交
1607 1608 1609
            TCGv t0 = tcg_temp_local_new();
            TCGv t1 = tcg_temp_new();
            TCGv t2 = tcg_temp_new();
1610 1611
            int l1 = gen_new_label();

A
aurel32 已提交
1612 1613 1614 1615 1616 1617 1618 1619 1620 1621
            gen_load_gpr(t1, rs);
            gen_load_gpr(t2, rt);
            tcg_gen_sub_tl(t0, t1, t2);
            tcg_gen_ext32s_tl(t0, t0);
            tcg_gen_xor_tl(t2, t1, t2);
            tcg_gen_xor_tl(t1, t0, t1);
            tcg_gen_and_tl(t1, t1, t2);
            tcg_temp_free(t2);
            tcg_gen_brcondi_tl(TCG_COND_GE, t1, 0, l1);
            tcg_temp_free(t1);
A
Aurelien Jarno 已提交
1622
            /* operands of different sign, first operand and result different sign */
1623 1624
            generate_exception(ctx, EXCP_OVERFLOW);
            gen_set_label(l1);
A
aurel32 已提交
1625 1626
            gen_store_gpr(t0, rd);
            tcg_temp_free(t0);
1627
        }
B
bellard 已提交
1628 1629 1630
        opn = "sub";
        break;
    case OPC_SUBU:
A
aurel32 已提交
1631 1632 1633 1634 1635
        if (rs != 0 && rt != 0) {
            tcg_gen_sub_tl(cpu_gpr[rd], cpu_gpr[rs], cpu_gpr[rt]);
            tcg_gen_ext32s_tl(cpu_gpr[rd], cpu_gpr[rd]);
        } else if (rs == 0 && rt != 0) {
            tcg_gen_neg_tl(cpu_gpr[rd], cpu_gpr[rt]);
1636
            tcg_gen_ext32s_tl(cpu_gpr[rd], cpu_gpr[rd]);
A
aurel32 已提交
1637 1638 1639 1640 1641
        } else if (rs != 0 && rt == 0) {
            tcg_gen_mov_tl(cpu_gpr[rd], cpu_gpr[rs]);
        } else {
            tcg_gen_movi_tl(cpu_gpr[rd], 0);
        }
B
bellard 已提交
1642 1643
        opn = "subu";
        break;
1644
#if defined(TARGET_MIPS64)
1645
    case OPC_DADD:
1646
        {
A
aurel32 已提交
1647 1648 1649
            TCGv t0 = tcg_temp_local_new();
            TCGv t1 = tcg_temp_new();
            TCGv t2 = tcg_temp_new();
1650 1651
            int l1 = gen_new_label();

A
aurel32 已提交
1652 1653 1654 1655 1656
            gen_load_gpr(t1, rs);
            gen_load_gpr(t2, rt);
            tcg_gen_add_tl(t0, t1, t2);
            tcg_gen_xor_tl(t1, t1, t2);
            tcg_gen_xor_tl(t2, t0, t2);
1657
            tcg_gen_andc_tl(t1, t2, t1);
A
aurel32 已提交
1658 1659 1660
            tcg_temp_free(t2);
            tcg_gen_brcondi_tl(TCG_COND_GE, t1, 0, l1);
            tcg_temp_free(t1);
1661 1662 1663
            /* operands of same sign, result different sign */
            generate_exception(ctx, EXCP_OVERFLOW);
            gen_set_label(l1);
A
aurel32 已提交
1664 1665
            gen_store_gpr(t0, rd);
            tcg_temp_free(t0);
1666
        }
1667 1668 1669
        opn = "dadd";
        break;
    case OPC_DADDU:
A
aurel32 已提交
1670 1671 1672 1673 1674 1675 1676 1677 1678
        if (rs != 0 && rt != 0) {
            tcg_gen_add_tl(cpu_gpr[rd], cpu_gpr[rs], cpu_gpr[rt]);
        } else if (rs == 0 && rt != 0) {
            tcg_gen_mov_tl(cpu_gpr[rd], cpu_gpr[rt]);
        } else if (rs != 0 && rt == 0) {
            tcg_gen_mov_tl(cpu_gpr[rd], cpu_gpr[rs]);
        } else {
            tcg_gen_movi_tl(cpu_gpr[rd], 0);
        }
1679 1680 1681
        opn = "daddu";
        break;
    case OPC_DSUB:
1682
        {
A
aurel32 已提交
1683 1684 1685
            TCGv t0 = tcg_temp_local_new();
            TCGv t1 = tcg_temp_new();
            TCGv t2 = tcg_temp_new();
1686 1687
            int l1 = gen_new_label();

A
aurel32 已提交
1688 1689 1690 1691 1692 1693 1694 1695 1696
            gen_load_gpr(t1, rs);
            gen_load_gpr(t2, rt);
            tcg_gen_sub_tl(t0, t1, t2);
            tcg_gen_xor_tl(t2, t1, t2);
            tcg_gen_xor_tl(t1, t0, t1);
            tcg_gen_and_tl(t1, t1, t2);
            tcg_temp_free(t2);
            tcg_gen_brcondi_tl(TCG_COND_GE, t1, 0, l1);
            tcg_temp_free(t1);
A
Aurelien Jarno 已提交
1697
            /* operands of different sign, first operand and result different sign */
1698 1699
            generate_exception(ctx, EXCP_OVERFLOW);
            gen_set_label(l1);
A
aurel32 已提交
1700 1701
            gen_store_gpr(t0, rd);
            tcg_temp_free(t0);
1702
        }
1703 1704 1705
        opn = "dsub";
        break;
    case OPC_DSUBU:
A
aurel32 已提交
1706 1707 1708 1709 1710 1711 1712 1713 1714
        if (rs != 0 && rt != 0) {
            tcg_gen_sub_tl(cpu_gpr[rd], cpu_gpr[rs], cpu_gpr[rt]);
        } else if (rs == 0 && rt != 0) {
            tcg_gen_neg_tl(cpu_gpr[rd], cpu_gpr[rt]);
        } else if (rs != 0 && rt == 0) {
            tcg_gen_mov_tl(cpu_gpr[rd], cpu_gpr[rs]);
        } else {
            tcg_gen_movi_tl(cpu_gpr[rd], 0);
        }
1715 1716 1717
        opn = "dsubu";
        break;
#endif
A
aurel32 已提交
1718 1719 1720 1721 1722 1723 1724 1725
    case OPC_MUL:
        if (likely(rs != 0 && rt != 0)) {
            tcg_gen_mul_tl(cpu_gpr[rd], cpu_gpr[rs], cpu_gpr[rt]);
            tcg_gen_ext32s_tl(cpu_gpr[rd], cpu_gpr[rd]);
        } else {
            tcg_gen_movi_tl(cpu_gpr[rd], 0);
        }
        opn = "mul";
B
bellard 已提交
1726
        break;
A
aurel32 已提交
1727 1728 1729 1730 1731 1732 1733 1734 1735 1736 1737 1738 1739 1740 1741 1742 1743 1744 1745 1746 1747 1748 1749 1750 1751
    }
    MIPS_DEBUG("%s %s, %s, %s", opn, regnames[rd], regnames[rs], regnames[rt]);
}

/* Conditional move */
static void gen_cond_move (CPUState *env, uint32_t opc, int rd, int rs, int rt)
{
    const char *opn = "cond move";
    int l1;

    if (rd == 0) {
        /* If no destination, treat it as a NOP.
           For add & sub, we must generate the overflow exception when needed. */
        MIPS_DEBUG("NOP");
        return;
    }

    l1 = gen_new_label();
    switch (opc) {
    case OPC_MOVN:
        if (likely(rt != 0))
            tcg_gen_brcondi_tl(TCG_COND_EQ, cpu_gpr[rt], 0, l1);
        else
            tcg_gen_br(l1);
        opn = "movn";
B
bellard 已提交
1752
        break;
A
aurel32 已提交
1753 1754 1755 1756 1757 1758 1759 1760 1761 1762 1763 1764 1765 1766 1767 1768 1769 1770 1771 1772 1773 1774 1775 1776 1777 1778 1779
    case OPC_MOVZ:
        if (likely(rt != 0))
            tcg_gen_brcondi_tl(TCG_COND_NE, cpu_gpr[rt], 0, l1);
        opn = "movz";
        break;
    }
    if (rs != 0)
        tcg_gen_mov_tl(cpu_gpr[rd], cpu_gpr[rs]);
    else
        tcg_gen_movi_tl(cpu_gpr[rd], 0);
    gen_set_label(l1);

    MIPS_DEBUG("%s %s, %s, %s", opn, regnames[rd], regnames[rs], regnames[rt]);
}

/* Logic */
static void gen_logic (CPUState *env, uint32_t opc, int rd, int rs, int rt)
{
    const char *opn = "logic";

    if (rd == 0) {
        /* If no destination, treat it as a NOP. */
        MIPS_DEBUG("NOP");
        return;
    }

    switch (opc) {
B
bellard 已提交
1780
    case OPC_AND:
A
aurel32 已提交
1781 1782 1783 1784 1785
        if (likely(rs != 0 && rt != 0)) {
            tcg_gen_and_tl(cpu_gpr[rd], cpu_gpr[rs], cpu_gpr[rt]);
        } else {
            tcg_gen_movi_tl(cpu_gpr[rd], 0);
        }
B
bellard 已提交
1786 1787 1788
        opn = "and";
        break;
    case OPC_NOR:
A
aurel32 已提交
1789 1790 1791 1792 1793 1794 1795 1796 1797
        if (rs != 0 && rt != 0) {
            tcg_gen_nor_tl(cpu_gpr[rd], cpu_gpr[rs], cpu_gpr[rt]);
        } else if (rs == 0 && rt != 0) {
            tcg_gen_not_tl(cpu_gpr[rd], cpu_gpr[rt]);
        } else if (rs != 0 && rt == 0) {
            tcg_gen_not_tl(cpu_gpr[rd], cpu_gpr[rs]);
        } else {
            tcg_gen_movi_tl(cpu_gpr[rd], ~((target_ulong)0));
        }
B
bellard 已提交
1798 1799 1800
        opn = "nor";
        break;
    case OPC_OR:
A
aurel32 已提交
1801 1802 1803 1804 1805 1806 1807 1808 1809
        if (likely(rs != 0 && rt != 0)) {
            tcg_gen_or_tl(cpu_gpr[rd], cpu_gpr[rs], cpu_gpr[rt]);
        } else if (rs == 0 && rt != 0) {
            tcg_gen_mov_tl(cpu_gpr[rd], cpu_gpr[rt]);
        } else if (rs != 0 && rt == 0) {
            tcg_gen_mov_tl(cpu_gpr[rd], cpu_gpr[rs]);
        } else {
            tcg_gen_movi_tl(cpu_gpr[rd], 0);
        }
B
bellard 已提交
1810 1811 1812
        opn = "or";
        break;
    case OPC_XOR:
A
aurel32 已提交
1813 1814 1815 1816 1817 1818 1819 1820 1821
        if (likely(rs != 0 && rt != 0)) {
            tcg_gen_xor_tl(cpu_gpr[rd], cpu_gpr[rs], cpu_gpr[rt]);
        } else if (rs == 0 && rt != 0) {
            tcg_gen_mov_tl(cpu_gpr[rd], cpu_gpr[rt]);
        } else if (rs != 0 && rt == 0) {
            tcg_gen_mov_tl(cpu_gpr[rd], cpu_gpr[rs]);
        } else {
            tcg_gen_movi_tl(cpu_gpr[rd], 0);
        }
B
bellard 已提交
1822 1823
        opn = "xor";
        break;
A
aurel32 已提交
1824 1825 1826 1827 1828 1829 1830 1831 1832 1833 1834 1835 1836 1837 1838 1839 1840 1841 1842 1843 1844 1845
    }
    MIPS_DEBUG("%s %s, %s, %s", opn, regnames[rd], regnames[rs], regnames[rt]);
}

/* Set on lower than */
static void gen_slt (CPUState *env, uint32_t opc, int rd, int rs, int rt)
{
    const char *opn = "slt";
    TCGv t0, t1;

    if (rd == 0) {
        /* If no destination, treat it as a NOP. */
        MIPS_DEBUG("NOP");
        return;
    }

    t0 = tcg_temp_new();
    t1 = tcg_temp_new();
    gen_load_gpr(t0, rs);
    gen_load_gpr(t1, rt);
    switch (opc) {
    case OPC_SLT:
1846
        tcg_gen_setcond_tl(TCG_COND_LT, cpu_gpr[rd], t0, t1);
A
aurel32 已提交
1847
        opn = "slt";
B
bellard 已提交
1848
        break;
A
aurel32 已提交
1849
    case OPC_SLTU:
1850
        tcg_gen_setcond_tl(TCG_COND_LTU, cpu_gpr[rd], t0, t1);
A
aurel32 已提交
1851 1852 1853 1854 1855 1856 1857
        opn = "sltu";
        break;
    }
    MIPS_DEBUG("%s %s, %s, %s", opn, regnames[rd], regnames[rs], regnames[rt]);
    tcg_temp_free(t0);
    tcg_temp_free(t1);
}
T
ths 已提交
1858

A
aurel32 已提交
1859 1860 1861 1862 1863 1864
/* Shifts */
static void gen_shift (CPUState *env, DisasContext *ctx, uint32_t opc,
                       int rd, int rs, int rt)
{
    const char *opn = "shifts";
    TCGv t0, t1;
T
ths 已提交
1865

A
aurel32 已提交
1866 1867 1868 1869 1870 1871 1872 1873 1874 1875 1876 1877
    if (rd == 0) {
        /* If no destination, treat it as a NOP.
           For add & sub, we must generate the overflow exception when needed. */
        MIPS_DEBUG("NOP");
        return;
    }

    t0 = tcg_temp_new();
    t1 = tcg_temp_new();
    gen_load_gpr(t0, rs);
    gen_load_gpr(t1, rt);
    switch (opc) {
B
bellard 已提交
1878
    case OPC_SLLV:
T
ths 已提交
1879 1880
        tcg_gen_andi_tl(t0, t0, 0x1f);
        tcg_gen_shl_tl(t0, t1, t0);
A
aurel32 已提交
1881
        tcg_gen_ext32s_tl(cpu_gpr[rd], t0);
B
bellard 已提交
1882 1883 1884
        opn = "sllv";
        break;
    case OPC_SRAV:
T
ths 已提交
1885
        tcg_gen_andi_tl(t0, t0, 0x1f);
A
aurel32 已提交
1886
        tcg_gen_sar_tl(cpu_gpr[rd], t1, t0);
B
bellard 已提交
1887 1888 1889
        opn = "srav";
        break;
    case OPC_SRLV:
1890 1891 1892 1893 1894 1895 1896 1897 1898 1899 1900 1901 1902 1903 1904 1905 1906 1907 1908
        tcg_gen_ext32u_tl(t1, t1);
        tcg_gen_andi_tl(t0, t0, 0x1f);
        tcg_gen_shr_tl(t0, t1, t0);
        tcg_gen_ext32s_tl(cpu_gpr[rd], t0);
        opn = "srlv";
        break;
    case OPC_ROTRV:
        {
            TCGv_i32 t2 = tcg_temp_new_i32();
            TCGv_i32 t3 = tcg_temp_new_i32();

            tcg_gen_trunc_tl_i32(t2, t0);
            tcg_gen_trunc_tl_i32(t3, t1);
            tcg_gen_andi_i32(t2, t2, 0x1f);
            tcg_gen_rotr_i32(t2, t3, t2);
            tcg_gen_ext_i32_tl(cpu_gpr[rd], t2);
            tcg_temp_free_i32(t2);
            tcg_temp_free_i32(t3);
            opn = "rotrv";
1909
        }
1910
        break;
1911
#if defined(TARGET_MIPS64)
1912
    case OPC_DSLLV:
T
ths 已提交
1913
        tcg_gen_andi_tl(t0, t0, 0x3f);
A
aurel32 已提交
1914
        tcg_gen_shl_tl(cpu_gpr[rd], t1, t0);
1915 1916 1917
        opn = "dsllv";
        break;
    case OPC_DSRAV:
T
ths 已提交
1918
        tcg_gen_andi_tl(t0, t0, 0x3f);
A
aurel32 已提交
1919
        tcg_gen_sar_tl(cpu_gpr[rd], t1, t0);
1920 1921 1922
        opn = "dsrav";
        break;
    case OPC_DSRLV:
1923 1924 1925 1926 1927 1928 1929 1930
        tcg_gen_andi_tl(t0, t0, 0x3f);
        tcg_gen_shr_tl(cpu_gpr[rd], t1, t0);
        opn = "dsrlv";
        break;
    case OPC_DROTRV:
        tcg_gen_andi_tl(t0, t0, 0x3f);
        tcg_gen_rotr_tl(cpu_gpr[rd], t1, t0);
        opn = "drotrv";
B
bellard 已提交
1931
        break;
1932
#endif
B
bellard 已提交
1933 1934
    }
    MIPS_DEBUG("%s %s, %s, %s", opn, regnames[rd], regnames[rs], regnames[rt]);
T
ths 已提交
1935 1936
    tcg_temp_free(t0);
    tcg_temp_free(t1);
B
bellard 已提交
1937 1938 1939
}

/* Arithmetic on HI/LO registers */
1940
static void gen_HILO (DisasContext *ctx, uint32_t opc, int reg)
B
bellard 已提交
1941
{
1942
    const char *opn = "hilo";
B
bellard 已提交
1943 1944

    if (reg == 0 && (opc == OPC_MFHI || opc == OPC_MFLO)) {
1945
        /* Treat as NOP. */
B
bellard 已提交
1946
        MIPS_DEBUG("NOP");
A
aurel32 已提交
1947
        return;
B
bellard 已提交
1948 1949 1950
    }
    switch (opc) {
    case OPC_MFHI:
A
aurel32 已提交
1951
        tcg_gen_mov_tl(cpu_gpr[reg], cpu_HI[0]);
B
bellard 已提交
1952 1953 1954
        opn = "mfhi";
        break;
    case OPC_MFLO:
A
aurel32 已提交
1955
        tcg_gen_mov_tl(cpu_gpr[reg], cpu_LO[0]);
B
bellard 已提交
1956 1957 1958
        opn = "mflo";
        break;
    case OPC_MTHI:
A
aurel32 已提交
1959 1960 1961 1962
        if (reg != 0)
            tcg_gen_mov_tl(cpu_HI[0], cpu_gpr[reg]);
        else
            tcg_gen_movi_tl(cpu_HI[0], 0);
B
bellard 已提交
1963 1964 1965
        opn = "mthi";
        break;
    case OPC_MTLO:
A
aurel32 已提交
1966 1967 1968 1969
        if (reg != 0)
            tcg_gen_mov_tl(cpu_LO[0], cpu_gpr[reg]);
        else
            tcg_gen_movi_tl(cpu_LO[0], 0);
B
bellard 已提交
1970 1971 1972 1973 1974 1975
        opn = "mtlo";
        break;
    }
    MIPS_DEBUG("%s %s", opn, regnames[reg]);
}

1976
static void gen_muldiv (DisasContext *ctx, uint32_t opc,
B
bellard 已提交
1977 1978
                        int rs, int rt)
{
1979
    const char *opn = "mul/div";
A
aurel32 已提交
1980 1981 1982 1983 1984 1985 1986 1987 1988 1989 1990 1991 1992 1993 1994 1995 1996
    TCGv t0, t1;

    switch (opc) {
    case OPC_DIV:
    case OPC_DIVU:
#if defined(TARGET_MIPS64)
    case OPC_DDIV:
    case OPC_DDIVU:
#endif
        t0 = tcg_temp_local_new();
        t1 = tcg_temp_local_new();
        break;
    default:
        t0 = tcg_temp_new();
        t1 = tcg_temp_new();
        break;
    }
B
bellard 已提交
1997

T
ths 已提交
1998 1999
    gen_load_gpr(t0, rs);
    gen_load_gpr(t1, rt);
B
bellard 已提交
2000 2001
    switch (opc) {
    case OPC_DIV:
2002 2003
        {
            int l1 = gen_new_label();
A
aurel32 已提交
2004
            int l2 = gen_new_label();
2005

A
aurel32 已提交
2006 2007
            tcg_gen_ext32s_tl(t0, t0);
            tcg_gen_ext32s_tl(t1, t1);
T
ths 已提交
2008
            tcg_gen_brcondi_tl(TCG_COND_EQ, t1, 0, l1);
A
aurel32 已提交
2009 2010 2011 2012 2013 2014 2015 2016 2017 2018 2019
            tcg_gen_brcondi_tl(TCG_COND_NE, t0, INT_MIN, l2);
            tcg_gen_brcondi_tl(TCG_COND_NE, t1, -1, l2);

            tcg_gen_mov_tl(cpu_LO[0], t0);
            tcg_gen_movi_tl(cpu_HI[0], 0);
            tcg_gen_br(l1);
            gen_set_label(l2);
            tcg_gen_div_tl(cpu_LO[0], t0, t1);
            tcg_gen_rem_tl(cpu_HI[0], t0, t1);
            tcg_gen_ext32s_tl(cpu_LO[0], cpu_LO[0]);
            tcg_gen_ext32s_tl(cpu_HI[0], cpu_HI[0]);
2020 2021
            gen_set_label(l1);
        }
B
bellard 已提交
2022 2023 2024
        opn = "div";
        break;
    case OPC_DIVU:
2025 2026 2027
        {
            int l1 = gen_new_label();

A
aurel32 已提交
2028 2029
            tcg_gen_ext32u_tl(t0, t0);
            tcg_gen_ext32u_tl(t1, t1);
T
ths 已提交
2030
            tcg_gen_brcondi_tl(TCG_COND_EQ, t1, 0, l1);
A
aurel32 已提交
2031 2032 2033 2034
            tcg_gen_divu_tl(cpu_LO[0], t0, t1);
            tcg_gen_remu_tl(cpu_HI[0], t0, t1);
            tcg_gen_ext32s_tl(cpu_LO[0], cpu_LO[0]);
            tcg_gen_ext32s_tl(cpu_HI[0], cpu_HI[0]);
2035 2036
            gen_set_label(l1);
        }
B
bellard 已提交
2037 2038 2039
        opn = "divu";
        break;
    case OPC_MULT:
2040
        {
A
aurel32 已提交
2041 2042 2043 2044 2045 2046 2047 2048 2049 2050 2051
            TCGv_i64 t2 = tcg_temp_new_i64();
            TCGv_i64 t3 = tcg_temp_new_i64();

            tcg_gen_ext_tl_i64(t2, t0);
            tcg_gen_ext_tl_i64(t3, t1);
            tcg_gen_mul_i64(t2, t2, t3);
            tcg_temp_free_i64(t3);
            tcg_gen_trunc_i64_tl(t0, t2);
            tcg_gen_shri_i64(t2, t2, 32);
            tcg_gen_trunc_i64_tl(t1, t2);
            tcg_temp_free_i64(t2);
A
aurel32 已提交
2052 2053
            tcg_gen_ext32s_tl(cpu_LO[0], t0);
            tcg_gen_ext32s_tl(cpu_HI[0], t1);
2054
        }
B
bellard 已提交
2055 2056 2057
        opn = "mult";
        break;
    case OPC_MULTU:
2058
        {
A
aurel32 已提交
2059 2060
            TCGv_i64 t2 = tcg_temp_new_i64();
            TCGv_i64 t3 = tcg_temp_new_i64();
2061

T
ths 已提交
2062 2063
            tcg_gen_ext32u_tl(t0, t0);
            tcg_gen_ext32u_tl(t1, t1);
A
aurel32 已提交
2064 2065 2066 2067 2068 2069 2070 2071
            tcg_gen_extu_tl_i64(t2, t0);
            tcg_gen_extu_tl_i64(t3, t1);
            tcg_gen_mul_i64(t2, t2, t3);
            tcg_temp_free_i64(t3);
            tcg_gen_trunc_i64_tl(t0, t2);
            tcg_gen_shri_i64(t2, t2, 32);
            tcg_gen_trunc_i64_tl(t1, t2);
            tcg_temp_free_i64(t2);
A
aurel32 已提交
2072 2073
            tcg_gen_ext32s_tl(cpu_LO[0], t0);
            tcg_gen_ext32s_tl(cpu_HI[0], t1);
2074
        }
B
bellard 已提交
2075 2076
        opn = "multu";
        break;
2077
#if defined(TARGET_MIPS64)
2078
    case OPC_DDIV:
2079 2080
        {
            int l1 = gen_new_label();
A
aurel32 已提交
2081
            int l2 = gen_new_label();
2082

T
ths 已提交
2083
            tcg_gen_brcondi_tl(TCG_COND_EQ, t1, 0, l1);
A
aurel32 已提交
2084 2085 2086 2087 2088 2089 2090 2091
            tcg_gen_brcondi_tl(TCG_COND_NE, t0, -1LL << 63, l2);
            tcg_gen_brcondi_tl(TCG_COND_NE, t1, -1LL, l2);
            tcg_gen_mov_tl(cpu_LO[0], t0);
            tcg_gen_movi_tl(cpu_HI[0], 0);
            tcg_gen_br(l1);
            gen_set_label(l2);
            tcg_gen_div_i64(cpu_LO[0], t0, t1);
            tcg_gen_rem_i64(cpu_HI[0], t0, t1);
2092 2093
            gen_set_label(l1);
        }
2094 2095 2096
        opn = "ddiv";
        break;
    case OPC_DDIVU:
2097 2098 2099
        {
            int l1 = gen_new_label();

T
ths 已提交
2100
            tcg_gen_brcondi_tl(TCG_COND_EQ, t1, 0, l1);
A
aurel32 已提交
2101 2102
            tcg_gen_divu_i64(cpu_LO[0], t0, t1);
            tcg_gen_remu_i64(cpu_HI[0], t0, t1);
2103 2104
            gen_set_label(l1);
        }
2105 2106 2107
        opn = "ddivu";
        break;
    case OPC_DMULT:
P
pbrook 已提交
2108
        gen_helper_dmult(t0, t1);
2109 2110 2111
        opn = "dmult";
        break;
    case OPC_DMULTU:
P
pbrook 已提交
2112
        gen_helper_dmultu(t0, t1);
2113 2114 2115
        opn = "dmultu";
        break;
#endif
B
bellard 已提交
2116
    case OPC_MADD:
2117
        {
A
aurel32 已提交
2118 2119 2120 2121 2122 2123 2124 2125 2126 2127 2128 2129 2130
            TCGv_i64 t2 = tcg_temp_new_i64();
            TCGv_i64 t3 = tcg_temp_new_i64();

            tcg_gen_ext_tl_i64(t2, t0);
            tcg_gen_ext_tl_i64(t3, t1);
            tcg_gen_mul_i64(t2, t2, t3);
            tcg_gen_concat_tl_i64(t3, cpu_LO[0], cpu_HI[0]);
            tcg_gen_add_i64(t2, t2, t3);
            tcg_temp_free_i64(t3);
            tcg_gen_trunc_i64_tl(t0, t2);
            tcg_gen_shri_i64(t2, t2, 32);
            tcg_gen_trunc_i64_tl(t1, t2);
            tcg_temp_free_i64(t2);
A
aurel32 已提交
2131
            tcg_gen_ext32s_tl(cpu_LO[0], t0);
2132
            tcg_gen_ext32s_tl(cpu_HI[0], t1);
2133
        }
B
bellard 已提交
2134 2135 2136
        opn = "madd";
        break;
    case OPC_MADDU:
2137
       {
A
aurel32 已提交
2138 2139
            TCGv_i64 t2 = tcg_temp_new_i64();
            TCGv_i64 t3 = tcg_temp_new_i64();
2140

T
ths 已提交
2141 2142
            tcg_gen_ext32u_tl(t0, t0);
            tcg_gen_ext32u_tl(t1, t1);
A
aurel32 已提交
2143 2144 2145 2146 2147 2148 2149 2150 2151 2152
            tcg_gen_extu_tl_i64(t2, t0);
            tcg_gen_extu_tl_i64(t3, t1);
            tcg_gen_mul_i64(t2, t2, t3);
            tcg_gen_concat_tl_i64(t3, cpu_LO[0], cpu_HI[0]);
            tcg_gen_add_i64(t2, t2, t3);
            tcg_temp_free_i64(t3);
            tcg_gen_trunc_i64_tl(t0, t2);
            tcg_gen_shri_i64(t2, t2, 32);
            tcg_gen_trunc_i64_tl(t1, t2);
            tcg_temp_free_i64(t2);
A
aurel32 已提交
2153 2154
            tcg_gen_ext32s_tl(cpu_LO[0], t0);
            tcg_gen_ext32s_tl(cpu_HI[0], t1);
2155
        }
B
bellard 已提交
2156 2157 2158
        opn = "maddu";
        break;
    case OPC_MSUB:
2159
        {
A
aurel32 已提交
2160 2161 2162 2163 2164 2165 2166
            TCGv_i64 t2 = tcg_temp_new_i64();
            TCGv_i64 t3 = tcg_temp_new_i64();

            tcg_gen_ext_tl_i64(t2, t0);
            tcg_gen_ext_tl_i64(t3, t1);
            tcg_gen_mul_i64(t2, t2, t3);
            tcg_gen_concat_tl_i64(t3, cpu_LO[0], cpu_HI[0]);
2167
            tcg_gen_sub_i64(t2, t3, t2);
A
aurel32 已提交
2168 2169 2170 2171 2172
            tcg_temp_free_i64(t3);
            tcg_gen_trunc_i64_tl(t0, t2);
            tcg_gen_shri_i64(t2, t2, 32);
            tcg_gen_trunc_i64_tl(t1, t2);
            tcg_temp_free_i64(t2);
A
aurel32 已提交
2173 2174
            tcg_gen_ext32s_tl(cpu_LO[0], t0);
            tcg_gen_ext32s_tl(cpu_HI[0], t1);
2175
        }
B
bellard 已提交
2176 2177 2178
        opn = "msub";
        break;
    case OPC_MSUBU:
2179
        {
A
aurel32 已提交
2180 2181
            TCGv_i64 t2 = tcg_temp_new_i64();
            TCGv_i64 t3 = tcg_temp_new_i64();
2182

T
ths 已提交
2183 2184
            tcg_gen_ext32u_tl(t0, t0);
            tcg_gen_ext32u_tl(t1, t1);
A
aurel32 已提交
2185 2186 2187 2188
            tcg_gen_extu_tl_i64(t2, t0);
            tcg_gen_extu_tl_i64(t3, t1);
            tcg_gen_mul_i64(t2, t2, t3);
            tcg_gen_concat_tl_i64(t3, cpu_LO[0], cpu_HI[0]);
2189
            tcg_gen_sub_i64(t2, t3, t2);
A
aurel32 已提交
2190 2191 2192 2193 2194
            tcg_temp_free_i64(t3);
            tcg_gen_trunc_i64_tl(t0, t2);
            tcg_gen_shri_i64(t2, t2, 32);
            tcg_gen_trunc_i64_tl(t1, t2);
            tcg_temp_free_i64(t2);
A
aurel32 已提交
2195 2196
            tcg_gen_ext32s_tl(cpu_LO[0], t0);
            tcg_gen_ext32s_tl(cpu_HI[0], t1);
2197
        }
B
bellard 已提交
2198 2199 2200
        opn = "msubu";
        break;
    default:
2201
        MIPS_INVAL(opn);
B
bellard 已提交
2202
        generate_exception(ctx, EXCP_RI);
T
ths 已提交
2203
        goto out;
B
bellard 已提交
2204 2205
    }
    MIPS_DEBUG("%s %s %s", opn, regnames[rs], regnames[rt]);
T
ths 已提交
2206 2207 2208
 out:
    tcg_temp_free(t0);
    tcg_temp_free(t1);
B
bellard 已提交
2209 2210
}

2211 2212 2213 2214
static void gen_mul_vr54xx (DisasContext *ctx, uint32_t opc,
                            int rd, int rs, int rt)
{
    const char *opn = "mul vr54xx";
A
aurel32 已提交
2215 2216
    TCGv t0 = tcg_temp_new();
    TCGv t1 = tcg_temp_new();
2217

2218 2219
    gen_load_gpr(t0, rs);
    gen_load_gpr(t1, rt);
2220 2221 2222

    switch (opc) {
    case OPC_VR54XX_MULS:
P
pbrook 已提交
2223
        gen_helper_muls(t0, t0, t1);
2224
        opn = "muls";
A
aurel32 已提交
2225
        break;
2226
    case OPC_VR54XX_MULSU:
P
pbrook 已提交
2227
        gen_helper_mulsu(t0, t0, t1);
2228
        opn = "mulsu";
A
aurel32 已提交
2229
        break;
2230
    case OPC_VR54XX_MACC:
P
pbrook 已提交
2231
        gen_helper_macc(t0, t0, t1);
2232
        opn = "macc";
A
aurel32 已提交
2233
        break;
2234
    case OPC_VR54XX_MACCU:
P
pbrook 已提交
2235
        gen_helper_maccu(t0, t0, t1);
2236
        opn = "maccu";
A
aurel32 已提交
2237
        break;
2238
    case OPC_VR54XX_MSAC:
P
pbrook 已提交
2239
        gen_helper_msac(t0, t0, t1);
2240
        opn = "msac";
A
aurel32 已提交
2241
        break;
2242
    case OPC_VR54XX_MSACU:
P
pbrook 已提交
2243
        gen_helper_msacu(t0, t0, t1);
2244
        opn = "msacu";
A
aurel32 已提交
2245
        break;
2246
    case OPC_VR54XX_MULHI:
P
pbrook 已提交
2247
        gen_helper_mulhi(t0, t0, t1);
2248
        opn = "mulhi";
A
aurel32 已提交
2249
        break;
2250
    case OPC_VR54XX_MULHIU:
P
pbrook 已提交
2251
        gen_helper_mulhiu(t0, t0, t1);
2252
        opn = "mulhiu";
A
aurel32 已提交
2253
        break;
2254
    case OPC_VR54XX_MULSHI:
P
pbrook 已提交
2255
        gen_helper_mulshi(t0, t0, t1);
2256
        opn = "mulshi";
A
aurel32 已提交
2257
        break;
2258
    case OPC_VR54XX_MULSHIU:
P
pbrook 已提交
2259
        gen_helper_mulshiu(t0, t0, t1);
2260
        opn = "mulshiu";
A
aurel32 已提交
2261
        break;
2262
    case OPC_VR54XX_MACCHI:
P
pbrook 已提交
2263
        gen_helper_macchi(t0, t0, t1);
2264
        opn = "macchi";
A
aurel32 已提交
2265
        break;
2266
    case OPC_VR54XX_MACCHIU:
P
pbrook 已提交
2267
        gen_helper_macchiu(t0, t0, t1);
2268
        opn = "macchiu";
A
aurel32 已提交
2269
        break;
2270
    case OPC_VR54XX_MSACHI:
P
pbrook 已提交
2271
        gen_helper_msachi(t0, t0, t1);
2272
        opn = "msachi";
A
aurel32 已提交
2273
        break;
2274
    case OPC_VR54XX_MSACHIU:
P
pbrook 已提交
2275
        gen_helper_msachiu(t0, t0, t1);
2276
        opn = "msachiu";
A
aurel32 已提交
2277
        break;
2278 2279 2280
    default:
        MIPS_INVAL("mul vr54xx");
        generate_exception(ctx, EXCP_RI);
2281
        goto out;
2282
    }
2283
    gen_store_gpr(t0, rd);
2284
    MIPS_DEBUG("%s %s, %s, %s", opn, regnames[rd], regnames[rs], regnames[rt]);
2285 2286 2287 2288

 out:
    tcg_temp_free(t0);
    tcg_temp_free(t1);
2289 2290
}

2291
static void gen_cl (DisasContext *ctx, uint32_t opc,
B
bellard 已提交
2292 2293
                    int rd, int rs)
{
2294
    const char *opn = "CLx";
A
aurel32 已提交
2295
    TCGv t0;
2296

B
bellard 已提交
2297
    if (rd == 0) {
2298
        /* Treat as NOP. */
B
bellard 已提交
2299
        MIPS_DEBUG("NOP");
A
aurel32 已提交
2300
        return;
B
bellard 已提交
2301
    }
A
aurel32 已提交
2302
    t0 = tcg_temp_new();
2303
    gen_load_gpr(t0, rs);
B
bellard 已提交
2304 2305
    switch (opc) {
    case OPC_CLO:
A
aurel32 已提交
2306
        gen_helper_clo(cpu_gpr[rd], t0);
B
bellard 已提交
2307 2308 2309
        opn = "clo";
        break;
    case OPC_CLZ:
A
aurel32 已提交
2310
        gen_helper_clz(cpu_gpr[rd], t0);
B
bellard 已提交
2311 2312
        opn = "clz";
        break;
2313
#if defined(TARGET_MIPS64)
2314
    case OPC_DCLO:
A
aurel32 已提交
2315
        gen_helper_dclo(cpu_gpr[rd], t0);
2316 2317 2318
        opn = "dclo";
        break;
    case OPC_DCLZ:
A
aurel32 已提交
2319
        gen_helper_dclz(cpu_gpr[rd], t0);
2320 2321 2322
        opn = "dclz";
        break;
#endif
B
bellard 已提交
2323 2324
    }
    MIPS_DEBUG("%s %s, %s", opn, regnames[rd], regnames[rs]);
2325
    tcg_temp_free(t0);
B
bellard 已提交
2326 2327 2328
}

/* Traps */
2329
static void gen_trap (DisasContext *ctx, uint32_t opc,
B
bellard 已提交
2330 2331 2332
                      int rs, int rt, int16_t imm)
{
    int cond;
A
aurel32 已提交
2333
    TCGv t0 = tcg_temp_new();
2334
    TCGv t1 = tcg_temp_new();
B
bellard 已提交
2335 2336 2337 2338 2339 2340 2341 2342 2343 2344 2345 2346

    cond = 0;
    /* Load needed operands */
    switch (opc) {
    case OPC_TEQ:
    case OPC_TGE:
    case OPC_TGEU:
    case OPC_TLT:
    case OPC_TLTU:
    case OPC_TNE:
        /* Compare two registers */
        if (rs != rt) {
2347 2348
            gen_load_gpr(t0, rs);
            gen_load_gpr(t1, rt);
B
bellard 已提交
2349 2350
            cond = 1;
        }
2351
        break;
B
bellard 已提交
2352 2353 2354 2355 2356 2357 2358 2359
    case OPC_TEQI:
    case OPC_TGEI:
    case OPC_TGEIU:
    case OPC_TLTI:
    case OPC_TLTIU:
    case OPC_TNEI:
        /* Compare register to immediate */
        if (rs != 0 || imm != 0) {
2360 2361
            gen_load_gpr(t0, rs);
            tcg_gen_movi_tl(t1, (int32_t)imm);
B
bellard 已提交
2362 2363 2364 2365 2366 2367 2368 2369 2370 2371 2372 2373 2374
            cond = 1;
        }
        break;
    }
    if (cond == 0) {
        switch (opc) {
        case OPC_TEQ:   /* rs == rs */
        case OPC_TEQI:  /* r0 == 0  */
        case OPC_TGE:   /* rs >= rs */
        case OPC_TGEI:  /* r0 >= 0  */
        case OPC_TGEU:  /* rs >= rs unsigned */
        case OPC_TGEIU: /* r0 >= 0  unsigned */
            /* Always trap */
A
aurel32 已提交
2375
            generate_exception(ctx, EXCP_TRAP);
B
bellard 已提交
2376 2377 2378 2379 2380 2381 2382
            break;
        case OPC_TLT:   /* rs < rs           */
        case OPC_TLTI:  /* r0 < 0            */
        case OPC_TLTU:  /* rs < rs unsigned  */
        case OPC_TLTIU: /* r0 < 0  unsigned  */
        case OPC_TNE:   /* rs != rs          */
        case OPC_TNEI:  /* r0 != 0           */
2383
            /* Never trap: treat as NOP. */
A
aurel32 已提交
2384
            break;
B
bellard 已提交
2385 2386
        }
    } else {
A
aurel32 已提交
2387 2388
        int l1 = gen_new_label();

B
bellard 已提交
2389 2390 2391
        switch (opc) {
        case OPC_TEQ:
        case OPC_TEQI:
A
aurel32 已提交
2392
            tcg_gen_brcond_tl(TCG_COND_NE, t0, t1, l1);
B
bellard 已提交
2393 2394 2395
            break;
        case OPC_TGE:
        case OPC_TGEI:
A
aurel32 已提交
2396
            tcg_gen_brcond_tl(TCG_COND_LT, t0, t1, l1);
B
bellard 已提交
2397 2398 2399
            break;
        case OPC_TGEU:
        case OPC_TGEIU:
A
aurel32 已提交
2400
            tcg_gen_brcond_tl(TCG_COND_LTU, t0, t1, l1);
B
bellard 已提交
2401 2402 2403
            break;
        case OPC_TLT:
        case OPC_TLTI:
A
aurel32 已提交
2404
            tcg_gen_brcond_tl(TCG_COND_GE, t0, t1, l1);
B
bellard 已提交
2405 2406 2407
            break;
        case OPC_TLTU:
        case OPC_TLTIU:
A
aurel32 已提交
2408
            tcg_gen_brcond_tl(TCG_COND_GEU, t0, t1, l1);
B
bellard 已提交
2409 2410 2411
            break;
        case OPC_TNE:
        case OPC_TNEI:
A
aurel32 已提交
2412
            tcg_gen_brcond_tl(TCG_COND_EQ, t0, t1, l1);
B
bellard 已提交
2413 2414
            break;
        }
A
aurel32 已提交
2415
        generate_exception(ctx, EXCP_TRAP);
T
ths 已提交
2416 2417
        gen_set_label(l1);
    }
2418 2419
    tcg_temp_free(t0);
    tcg_temp_free(t1);
B
bellard 已提交
2420 2421
}

2422
static inline void gen_goto_tb(DisasContext *ctx, int n, target_ulong dest)
B
bellard 已提交
2423
{
2424 2425
    TranslationBlock *tb;
    tb = ctx->tb;
N
Nathan Froyd 已提交
2426 2427
    if ((tb->pc & TARGET_PAGE_MASK) == (dest & TARGET_PAGE_MASK) &&
        likely(!ctx->singlestep_enabled)) {
B
bellard 已提交
2428
        tcg_gen_goto_tb(n);
2429
        gen_save_pc(dest);
B
bellard 已提交
2430
        tcg_gen_exit_tb((long)tb + n);
2431
    } else {
2432
        gen_save_pc(dest);
N
Nathan Froyd 已提交
2433 2434 2435 2436
        if (ctx->singlestep_enabled) {
            save_cpu_state(ctx, 0);
            gen_helper_0i(raise_exception, EXCP_DEBUG);
        }
B
bellard 已提交
2437
        tcg_gen_exit_tb(0);
2438
    }
B
bellard 已提交
2439 2440
}

B
bellard 已提交
2441
/* Branches (before delay slot) */
2442
static void gen_compute_branch (DisasContext *ctx, uint32_t opc,
2443
                                int insn_bytes,
B
bellard 已提交
2444 2445
                                int rs, int rt, int32_t offset)
{
T
ths 已提交
2446
    target_ulong btgt = -1;
2447
    int blink = 0;
A
aurel32 已提交
2448
    int bcond_compute = 0;
2449 2450
    TCGv t0 = tcg_temp_new();
    TCGv t1 = tcg_temp_new();
2451 2452

    if (ctx->hflags & MIPS_HFLAG_BMASK) {
2453
#ifdef MIPS_DEBUG_DISAS
2454
        LOG_DISAS("Branch in delay slot at PC 0x" TARGET_FMT_lx "\n", ctx->pc);
2455
#endif
2456
        generate_exception(ctx, EXCP_RI);
2457
        goto out;
2458
    }
B
bellard 已提交
2459 2460 2461 2462 2463 2464 2465 2466 2467

    /* Load needed operands */
    switch (opc) {
    case OPC_BEQ:
    case OPC_BEQL:
    case OPC_BNE:
    case OPC_BNEL:
        /* Compare two registers */
        if (rs != rt) {
2468 2469
            gen_load_gpr(t0, rs);
            gen_load_gpr(t1, rt);
A
aurel32 已提交
2470
            bcond_compute = 1;
B
bellard 已提交
2471
        }
2472
        btgt = ctx->pc + insn_bytes + offset;
B
bellard 已提交
2473 2474 2475
        break;
    case OPC_BGEZ:
    case OPC_BGEZAL:
2476
    case OPC_BGEZALS:
B
bellard 已提交
2477 2478 2479 2480 2481 2482 2483 2484
    case OPC_BGEZALL:
    case OPC_BGEZL:
    case OPC_BGTZ:
    case OPC_BGTZL:
    case OPC_BLEZ:
    case OPC_BLEZL:
    case OPC_BLTZ:
    case OPC_BLTZAL:
2485
    case OPC_BLTZALS:
B
bellard 已提交
2486 2487 2488 2489
    case OPC_BLTZALL:
    case OPC_BLTZL:
        /* Compare to zero */
        if (rs != 0) {
2490
            gen_load_gpr(t0, rs);
A
aurel32 已提交
2491
            bcond_compute = 1;
B
bellard 已提交
2492
        }
2493
        btgt = ctx->pc + insn_bytes + offset;
B
bellard 已提交
2494 2495 2496
        break;
    case OPC_J:
    case OPC_JAL:
2497
    case OPC_JALX:
N
Nathan Froyd 已提交
2498 2499
    case OPC_JALS:
    case OPC_JALXS:
B
bellard 已提交
2500
        /* Jump to immediate */
2501
        btgt = ((ctx->pc + insn_bytes) & (int32_t)0xF0000000) | (uint32_t)offset;
B
bellard 已提交
2502 2503 2504
        break;
    case OPC_JR:
    case OPC_JALR:
2505
    case OPC_JALRC:
N
Nathan Froyd 已提交
2506
    case OPC_JALRS:
B
bellard 已提交
2507
        /* Jump to register */
2508 2509
        if (offset != 0 && offset != 16) {
            /* Hint = 0 is JR/JALR, hint 16 is JR.HB/JALR.HB, the
2510
               others are reserved. */
2511
            MIPS_INVAL("jump hint");
B
bellard 已提交
2512
            generate_exception(ctx, EXCP_RI);
2513
            goto out;
B
bellard 已提交
2514
        }
T
ths 已提交
2515
        gen_load_gpr(btarget, rs);
B
bellard 已提交
2516 2517 2518 2519
        break;
    default:
        MIPS_INVAL("branch/jump");
        generate_exception(ctx, EXCP_RI);
2520
        goto out;
B
bellard 已提交
2521
    }
A
aurel32 已提交
2522
    if (bcond_compute == 0) {
B
bellard 已提交
2523 2524 2525 2526 2527 2528 2529 2530 2531
        /* No condition to be computed */
        switch (opc) {
        case OPC_BEQ:     /* rx == rx        */
        case OPC_BEQL:    /* rx == rx likely */
        case OPC_BGEZ:    /* 0 >= 0          */
        case OPC_BGEZL:   /* 0 >= 0 likely   */
        case OPC_BLEZ:    /* 0 <= 0          */
        case OPC_BLEZL:   /* 0 <= 0 likely   */
            /* Always take */
B
bellard 已提交
2532
            ctx->hflags |= MIPS_HFLAG_B;
B
bellard 已提交
2533 2534
            MIPS_DEBUG("balways");
            break;
2535
        case OPC_BGEZALS:
B
bellard 已提交
2536 2537
        case OPC_BGEZAL:  /* 0 >= 0          */
        case OPC_BGEZALL: /* 0 >= 0 likely   */
2538 2539 2540
            ctx->hflags |= (opc == OPC_BGEZALS
                            ? MIPS_HFLAG_BDS16
                            : MIPS_HFLAG_BDS32);
B
bellard 已提交
2541 2542
            /* Always take and link */
            blink = 31;
B
bellard 已提交
2543
            ctx->hflags |= MIPS_HFLAG_B;
B
bellard 已提交
2544 2545 2546 2547 2548
            MIPS_DEBUG("balways and link");
            break;
        case OPC_BNE:     /* rx != rx        */
        case OPC_BGTZ:    /* 0 > 0           */
        case OPC_BLTZ:    /* 0 < 0           */
2549
            /* Treat as NOP. */
B
bellard 已提交
2550
            MIPS_DEBUG("bnever (NOP)");
2551
            goto out;
2552
        case OPC_BLTZALS:
2553
        case OPC_BLTZAL:  /* 0 < 0           */
2554 2555 2556 2557 2558 2559 2560 2561
            ctx->hflags |= (opc == OPC_BLTZALS
                            ? MIPS_HFLAG_BDS16
                            : MIPS_HFLAG_BDS32);
            /* Handle as an unconditional branch to get correct delay
               slot checking.  */
            blink = 31;
            btgt = ctx->pc + (opc == OPC_BLTZALS ? 6 : 8);
            ctx->hflags |= MIPS_HFLAG_B;
T
ths 已提交
2562
            MIPS_DEBUG("bnever and link");
2563
            break;
2564
        case OPC_BLTZALL: /* 0 < 0 likely */
2565
            tcg_gen_movi_tl(cpu_gpr[31], ctx->pc + 8);
T
ths 已提交
2566 2567 2568
            /* Skip the instruction in the delay slot */
            MIPS_DEBUG("bnever, link and skip");
            ctx->pc += 4;
2569
            goto out;
B
bellard 已提交
2570 2571 2572 2573 2574
        case OPC_BNEL:    /* rx != rx likely */
        case OPC_BGTZL:   /* 0 > 0 likely */
        case OPC_BLTZL:   /* 0 < 0 likely */
            /* Skip the instruction in the delay slot */
            MIPS_DEBUG("bnever and skip");
T
ths 已提交
2575
            ctx->pc += 4;
2576
            goto out;
B
bellard 已提交
2577
        case OPC_J:
B
bellard 已提交
2578
            ctx->hflags |= MIPS_HFLAG_B;
T
ths 已提交
2579
            MIPS_DEBUG("j " TARGET_FMT_lx, btgt);
B
bellard 已提交
2580
            break;
N
Nathan Froyd 已提交
2581
        case OPC_JALXS:
2582 2583 2584
        case OPC_JALX:
            ctx->hflags |= MIPS_HFLAG_BX;
            /* Fallthrough */
N
Nathan Froyd 已提交
2585
        case OPC_JALS:
B
bellard 已提交
2586 2587
        case OPC_JAL:
            blink = 31;
B
bellard 已提交
2588
            ctx->hflags |= MIPS_HFLAG_B;
N
Nathan Froyd 已提交
2589
            ctx->hflags |= ((opc == OPC_JALS || opc == OPC_JALXS)
2590 2591
                            ? MIPS_HFLAG_BDS16
                            : MIPS_HFLAG_BDS32);
T
ths 已提交
2592
            MIPS_DEBUG("jal " TARGET_FMT_lx, btgt);
B
bellard 已提交
2593 2594
            break;
        case OPC_JR:
B
bellard 已提交
2595
            ctx->hflags |= MIPS_HFLAG_BR;
N
Nathan Froyd 已提交
2596 2597
            if (insn_bytes == 4)
                ctx->hflags |= MIPS_HFLAG_BDS32;
B
bellard 已提交
2598 2599
            MIPS_DEBUG("jr %s", regnames[rs]);
            break;
N
Nathan Froyd 已提交
2600
        case OPC_JALRS:
B
bellard 已提交
2601
        case OPC_JALR:
2602
        case OPC_JALRC:
B
bellard 已提交
2603
            blink = rt;
B
bellard 已提交
2604
            ctx->hflags |= MIPS_HFLAG_BR;
N
Nathan Froyd 已提交
2605 2606 2607
            ctx->hflags |= (opc == OPC_JALRS
                            ? MIPS_HFLAG_BDS16
                            : MIPS_HFLAG_BDS32);
B
bellard 已提交
2608 2609 2610 2611 2612
            MIPS_DEBUG("jalr %s, %s", regnames[rt], regnames[rs]);
            break;
        default:
            MIPS_INVAL("branch/jump");
            generate_exception(ctx, EXCP_RI);
2613
            goto out;
B
bellard 已提交
2614 2615 2616 2617
        }
    } else {
        switch (opc) {
        case OPC_BEQ:
2618
            tcg_gen_setcond_tl(TCG_COND_EQ, bcond, t0, t1);
2619
            MIPS_DEBUG("beq %s, %s, " TARGET_FMT_lx,
T
ths 已提交
2620
                       regnames[rs], regnames[rt], btgt);
B
bellard 已提交
2621 2622
            goto not_likely;
        case OPC_BEQL:
2623
            tcg_gen_setcond_tl(TCG_COND_EQ, bcond, t0, t1);
2624
            MIPS_DEBUG("beql %s, %s, " TARGET_FMT_lx,
T
ths 已提交
2625
                       regnames[rs], regnames[rt], btgt);
B
bellard 已提交
2626 2627
            goto likely;
        case OPC_BNE:
2628
            tcg_gen_setcond_tl(TCG_COND_NE, bcond, t0, t1);
2629
            MIPS_DEBUG("bne %s, %s, " TARGET_FMT_lx,
T
ths 已提交
2630
                       regnames[rs], regnames[rt], btgt);
B
bellard 已提交
2631 2632
            goto not_likely;
        case OPC_BNEL:
2633
            tcg_gen_setcond_tl(TCG_COND_NE, bcond, t0, t1);
2634
            MIPS_DEBUG("bnel %s, %s, " TARGET_FMT_lx,
T
ths 已提交
2635
                       regnames[rs], regnames[rt], btgt);
B
bellard 已提交
2636 2637
            goto likely;
        case OPC_BGEZ:
2638
            tcg_gen_setcondi_tl(TCG_COND_GE, bcond, t0, 0);
T
ths 已提交
2639
            MIPS_DEBUG("bgez %s, " TARGET_FMT_lx, regnames[rs], btgt);
B
bellard 已提交
2640 2641
            goto not_likely;
        case OPC_BGEZL:
2642
            tcg_gen_setcondi_tl(TCG_COND_GE, bcond, t0, 0);
T
ths 已提交
2643
            MIPS_DEBUG("bgezl %s, " TARGET_FMT_lx, regnames[rs], btgt);
B
bellard 已提交
2644
            goto likely;
2645
        case OPC_BGEZALS:
B
bellard 已提交
2646
        case OPC_BGEZAL:
2647 2648 2649
            ctx->hflags |= (opc == OPC_BGEZALS
                            ? MIPS_HFLAG_BDS16
                            : MIPS_HFLAG_BDS32);
2650
            tcg_gen_setcondi_tl(TCG_COND_GE, bcond, t0, 0);
T
ths 已提交
2651
            MIPS_DEBUG("bgezal %s, " TARGET_FMT_lx, regnames[rs], btgt);
B
bellard 已提交
2652 2653 2654
            blink = 31;
            goto not_likely;
        case OPC_BGEZALL:
2655
            tcg_gen_setcondi_tl(TCG_COND_GE, bcond, t0, 0);
B
bellard 已提交
2656
            blink = 31;
T
ths 已提交
2657
            MIPS_DEBUG("bgezall %s, " TARGET_FMT_lx, regnames[rs], btgt);
B
bellard 已提交
2658 2659
            goto likely;
        case OPC_BGTZ:
2660
            tcg_gen_setcondi_tl(TCG_COND_GT, bcond, t0, 0);
T
ths 已提交
2661
            MIPS_DEBUG("bgtz %s, " TARGET_FMT_lx, regnames[rs], btgt);
B
bellard 已提交
2662 2663
            goto not_likely;
        case OPC_BGTZL:
2664
            tcg_gen_setcondi_tl(TCG_COND_GT, bcond, t0, 0);
T
ths 已提交
2665
            MIPS_DEBUG("bgtzl %s, " TARGET_FMT_lx, regnames[rs], btgt);
B
bellard 已提交
2666 2667
            goto likely;
        case OPC_BLEZ:
2668
            tcg_gen_setcondi_tl(TCG_COND_LE, bcond, t0, 0);
T
ths 已提交
2669
            MIPS_DEBUG("blez %s, " TARGET_FMT_lx, regnames[rs], btgt);
B
bellard 已提交
2670 2671
            goto not_likely;
        case OPC_BLEZL:
2672
            tcg_gen_setcondi_tl(TCG_COND_LE, bcond, t0, 0);
T
ths 已提交
2673
            MIPS_DEBUG("blezl %s, " TARGET_FMT_lx, regnames[rs], btgt);
B
bellard 已提交
2674 2675
            goto likely;
        case OPC_BLTZ:
2676
            tcg_gen_setcondi_tl(TCG_COND_LT, bcond, t0, 0);
T
ths 已提交
2677
            MIPS_DEBUG("bltz %s, " TARGET_FMT_lx, regnames[rs], btgt);
B
bellard 已提交
2678 2679
            goto not_likely;
        case OPC_BLTZL:
2680
            tcg_gen_setcondi_tl(TCG_COND_LT, bcond, t0, 0);
T
ths 已提交
2681
            MIPS_DEBUG("bltzl %s, " TARGET_FMT_lx, regnames[rs], btgt);
B
bellard 已提交
2682
            goto likely;
2683
        case OPC_BLTZALS:
B
bellard 已提交
2684
        case OPC_BLTZAL:
2685 2686 2687
            ctx->hflags |= (opc == OPC_BLTZALS
                            ? MIPS_HFLAG_BDS16
                            : MIPS_HFLAG_BDS32);
2688
            tcg_gen_setcondi_tl(TCG_COND_LT, bcond, t0, 0);
B
bellard 已提交
2689
            blink = 31;
T
ths 已提交
2690
            MIPS_DEBUG("bltzal %s, " TARGET_FMT_lx, regnames[rs], btgt);
B
bellard 已提交
2691
        not_likely:
B
bellard 已提交
2692
            ctx->hflags |= MIPS_HFLAG_BC;
B
bellard 已提交
2693 2694
            break;
        case OPC_BLTZALL:
2695
            tcg_gen_setcondi_tl(TCG_COND_LT, bcond, t0, 0);
B
bellard 已提交
2696
            blink = 31;
T
ths 已提交
2697
            MIPS_DEBUG("bltzall %s, " TARGET_FMT_lx, regnames[rs], btgt);
B
bellard 已提交
2698
        likely:
B
bellard 已提交
2699
            ctx->hflags |= MIPS_HFLAG_BL;
B
bellard 已提交
2700
            break;
T
ths 已提交
2701 2702 2703
        default:
            MIPS_INVAL("conditional branch/jump");
            generate_exception(ctx, EXCP_RI);
2704
            goto out;
B
bellard 已提交
2705 2706
        }
    }
2707
    MIPS_DEBUG("enter ds: link %d cond %02x target " TARGET_FMT_lx,
T
ths 已提交
2708
               blink, ctx->hflags, btgt);
2709

T
ths 已提交
2710
    ctx->btarget = btgt;
B
bellard 已提交
2711
    if (blink > 0) {
2712 2713 2714 2715 2716 2717 2718
        int post_delay = insn_bytes;
        int lowbit = !!(ctx->hflags & MIPS_HFLAG_M16);

        if (opc != OPC_JALRC)
            post_delay += ((ctx->hflags & MIPS_HFLAG_BDS16) ? 2 : 4);

        tcg_gen_movi_tl(cpu_gpr[blink], ctx->pc + post_delay + lowbit);
B
bellard 已提交
2719
    }
2720 2721

 out:
2722 2723
    if (insn_bytes == 2)
        ctx->hflags |= MIPS_HFLAG_B16;
2724 2725
    tcg_temp_free(t0);
    tcg_temp_free(t1);
B
bellard 已提交
2726 2727
}

2728 2729
/* special3 bitfield operations */
static void gen_bitops (DisasContext *ctx, uint32_t opc, int rt,
2730
                        int rs, int lsb, int msb)
2731
{
P
pbrook 已提交
2732 2733
    TCGv t0 = tcg_temp_new();
    TCGv t1 = tcg_temp_new();
A
aurel32 已提交
2734
    target_ulong mask;
2735 2736

    gen_load_gpr(t1, rs);
2737 2738 2739 2740
    switch (opc) {
    case OPC_EXT:
        if (lsb + msb > 31)
            goto fail;
A
aurel32 已提交
2741 2742 2743 2744 2745 2746
        tcg_gen_shri_tl(t0, t1, lsb);
        if (msb != 31) {
            tcg_gen_andi_tl(t0, t0, (1 << (msb + 1)) - 1);
        } else {
            tcg_gen_ext32s_tl(t0, t0);
        }
2747
        break;
T
ths 已提交
2748
#if defined(TARGET_MIPS64)
2749
    case OPC_DEXTM:
A
aurel32 已提交
2750 2751 2752 2753
        tcg_gen_shri_tl(t0, t1, lsb);
        if (msb != 31) {
            tcg_gen_andi_tl(t0, t0, (1ULL << (msb + 1 + 32)) - 1);
        }
2754 2755
        break;
    case OPC_DEXTU:
A
aurel32 已提交
2756 2757
        tcg_gen_shri_tl(t0, t1, lsb + 32);
        tcg_gen_andi_tl(t0, t0, (1ULL << (msb + 1)) - 1);
2758 2759
        break;
    case OPC_DEXT:
A
aurel32 已提交
2760 2761
        tcg_gen_shri_tl(t0, t1, lsb);
        tcg_gen_andi_tl(t0, t0, (1ULL << (msb + 1)) - 1);
2762
        break;
T
ths 已提交
2763
#endif
2764 2765 2766
    case OPC_INS:
        if (lsb > msb)
            goto fail;
A
aurel32 已提交
2767
        mask = ((msb - lsb + 1 < 32) ? ((1 << (msb - lsb + 1)) - 1) : ~0) << lsb;
2768
        gen_load_gpr(t0, rt);
A
aurel32 已提交
2769 2770 2771 2772 2773
        tcg_gen_andi_tl(t0, t0, ~mask);
        tcg_gen_shli_tl(t1, t1, lsb);
        tcg_gen_andi_tl(t1, t1, mask);
        tcg_gen_or_tl(t0, t0, t1);
        tcg_gen_ext32s_tl(t0, t0);
2774
        break;
T
ths 已提交
2775
#if defined(TARGET_MIPS64)
2776 2777 2778
    case OPC_DINSM:
        if (lsb > msb)
            goto fail;
A
aurel32 已提交
2779
        mask = ((msb - lsb + 1 + 32 < 64) ? ((1ULL << (msb - lsb + 1 + 32)) - 1) : ~0ULL) << lsb;
2780
        gen_load_gpr(t0, rt);
A
aurel32 已提交
2781 2782 2783 2784
        tcg_gen_andi_tl(t0, t0, ~mask);
        tcg_gen_shli_tl(t1, t1, lsb);
        tcg_gen_andi_tl(t1, t1, mask);
        tcg_gen_or_tl(t0, t0, t1);
2785 2786 2787 2788
        break;
    case OPC_DINSU:
        if (lsb > msb)
            goto fail;
2789
        mask = ((1ULL << (msb - lsb + 1)) - 1) << (lsb + 32);
2790
        gen_load_gpr(t0, rt);
A
aurel32 已提交
2791 2792 2793 2794
        tcg_gen_andi_tl(t0, t0, ~mask);
        tcg_gen_shli_tl(t1, t1, lsb + 32);
        tcg_gen_andi_tl(t1, t1, mask);
        tcg_gen_or_tl(t0, t0, t1);
2795 2796 2797 2798
        break;
    case OPC_DINS:
        if (lsb > msb)
            goto fail;
2799
        gen_load_gpr(t0, rt);
A
aurel32 已提交
2800 2801 2802 2803 2804 2805
        mask = ((1ULL << (msb - lsb + 1)) - 1) << lsb;
        gen_load_gpr(t0, rt);
        tcg_gen_andi_tl(t0, t0, ~mask);
        tcg_gen_shli_tl(t1, t1, lsb);
        tcg_gen_andi_tl(t1, t1, mask);
        tcg_gen_or_tl(t0, t0, t1);
2806
        break;
T
ths 已提交
2807
#endif
2808 2809 2810 2811
    default:
fail:
        MIPS_INVAL("bitops");
        generate_exception(ctx, EXCP_RI);
2812 2813
        tcg_temp_free(t0);
        tcg_temp_free(t1);
2814 2815
        return;
    }
2816 2817 2818
    gen_store_gpr(t0, rt);
    tcg_temp_free(t0);
    tcg_temp_free(t1);
2819 2820
}

2821 2822
static void gen_bshfl (DisasContext *ctx, uint32_t op2, int rt, int rd)
{
A
aurel32 已提交
2823
    TCGv t0;
2824

A
aurel32 已提交
2825 2826 2827 2828 2829 2830 2831 2832
    if (rd == 0) {
        /* If no destination, treat it as a NOP. */
        MIPS_DEBUG("NOP");
        return;
    }

    t0 = tcg_temp_new();
    gen_load_gpr(t0, rt);
2833 2834
    switch (op2) {
    case OPC_WSBH:
A
aurel32 已提交
2835 2836 2837 2838 2839 2840 2841 2842 2843 2844 2845
        {
            TCGv t1 = tcg_temp_new();

            tcg_gen_shri_tl(t1, t0, 8);
            tcg_gen_andi_tl(t1, t1, 0x00FF00FF);
            tcg_gen_shli_tl(t0, t0, 8);
            tcg_gen_andi_tl(t0, t0, ~0x00FF00FF);
            tcg_gen_or_tl(t0, t0, t1);
            tcg_temp_free(t1);
            tcg_gen_ext32s_tl(cpu_gpr[rd], t0);
        }
2846 2847
        break;
    case OPC_SEB:
A
aurel32 已提交
2848
        tcg_gen_ext8s_tl(cpu_gpr[rd], t0);
2849 2850
        break;
    case OPC_SEH:
A
aurel32 已提交
2851
        tcg_gen_ext16s_tl(cpu_gpr[rd], t0);
2852 2853 2854
        break;
#if defined(TARGET_MIPS64)
    case OPC_DSBH:
A
aurel32 已提交
2855 2856 2857 2858 2859 2860 2861 2862 2863 2864
        {
            TCGv t1 = tcg_temp_new();

            tcg_gen_shri_tl(t1, t0, 8);
            tcg_gen_andi_tl(t1, t1, 0x00FF00FF00FF00FFULL);
            tcg_gen_shli_tl(t0, t0, 8);
            tcg_gen_andi_tl(t0, t0, ~0x00FF00FF00FF00FFULL);
            tcg_gen_or_tl(cpu_gpr[rd], t0, t1);
            tcg_temp_free(t1);
        }
2865 2866
        break;
    case OPC_DSHD:
A
aurel32 已提交
2867 2868 2869 2870 2871 2872 2873 2874 2875 2876 2877 2878 2879
        {
            TCGv t1 = tcg_temp_new();

            tcg_gen_shri_tl(t1, t0, 16);
            tcg_gen_andi_tl(t1, t1, 0x0000FFFF0000FFFFULL);
            tcg_gen_shli_tl(t0, t0, 16);
            tcg_gen_andi_tl(t0, t0, ~0x0000FFFF0000FFFFULL);
            tcg_gen_or_tl(t0, t0, t1);
            tcg_gen_shri_tl(t1, t0, 32);
            tcg_gen_shli_tl(t0, t0, 32);
            tcg_gen_or_tl(cpu_gpr[rd], t0, t1);
            tcg_temp_free(t1);
        }
2880 2881 2882 2883 2884 2885 2886 2887 2888 2889 2890
        break;
#endif
    default:
        MIPS_INVAL("bsfhl");
        generate_exception(ctx, EXCP_RI);
        tcg_temp_free(t0);
        return;
    }
    tcg_temp_free(t0);
}

2891
#ifndef CONFIG_USER_ONLY
T
ths 已提交
2892
/* CP0 (MMU and control) */
2893
static inline void gen_mfc0_load32 (TCGv arg, target_ulong off)
T
ths 已提交
2894
{
2895
    TCGv_i32 t0 = tcg_temp_new_i32();
T
ths 已提交
2896

2897 2898 2899
    tcg_gen_ld_i32(t0, cpu_env, off);
    tcg_gen_ext_i32_tl(arg, t0);
    tcg_temp_free_i32(t0);
T
ths 已提交
2900 2901
}

2902
static inline void gen_mfc0_load64 (TCGv arg, target_ulong off)
T
ths 已提交
2903
{
2904 2905
    tcg_gen_ld_tl(arg, cpu_env, off);
    tcg_gen_ext32s_tl(arg, arg);
T
ths 已提交
2906 2907
}

2908
static inline void gen_mtc0_store32 (TCGv arg, target_ulong off)
2909
{
2910
    TCGv_i32 t0 = tcg_temp_new_i32();
2911

2912 2913 2914
    tcg_gen_trunc_tl_i32(t0, arg);
    tcg_gen_st_i32(t0, cpu_env, off);
    tcg_temp_free_i32(t0);
2915 2916
}

2917
static inline void gen_mtc0_store64 (TCGv arg, target_ulong off)
2918
{
2919 2920
    tcg_gen_ext32s_tl(arg, arg);
    tcg_gen_st_tl(arg, cpu_env, off);
2921 2922
}

2923
static void gen_mfc0 (CPUState *env, DisasContext *ctx, TCGv arg, int reg, int sel)
2924
{
2925
    const char *rn = "invalid";
2926

2927 2928 2929
    if (sel != 0)
        check_insn(env, ctx, ISA_MIPS32);

2930 2931
    switch (reg) {
    case 0:
2932 2933
        switch (sel) {
        case 0:
2934
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_Index));
2935 2936 2937
            rn = "Index";
            break;
        case 1:
2938
            check_insn(env, ctx, ASE_MT);
2939
            gen_helper_mfc0_mvpcontrol(arg);
2940
            rn = "MVPControl";
2941
            break;
2942
        case 2:
2943
            check_insn(env, ctx, ASE_MT);
2944
            gen_helper_mfc0_mvpconf0(arg);
2945
            rn = "MVPConf0";
2946
            break;
2947
        case 3:
2948
            check_insn(env, ctx, ASE_MT);
2949
            gen_helper_mfc0_mvpconf1(arg);
2950
            rn = "MVPConf1";
2951
            break;
2952 2953 2954
        default:
            goto die;
        }
2955 2956
        break;
    case 1:
2957 2958
        switch (sel) {
        case 0:
2959
            gen_helper_mfc0_random(arg);
2960
            rn = "Random";
T
ths 已提交
2961
            break;
2962
        case 1:
2963
            check_insn(env, ctx, ASE_MT);
2964
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_VPEControl));
2965
            rn = "VPEControl";
2966
            break;
2967
        case 2:
2968
            check_insn(env, ctx, ASE_MT);
2969
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_VPEConf0));
2970
            rn = "VPEConf0";
2971
            break;
2972
        case 3:
2973
            check_insn(env, ctx, ASE_MT);
2974
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_VPEConf1));
2975
            rn = "VPEConf1";
2976
            break;
2977
        case 4:
2978
            check_insn(env, ctx, ASE_MT);
2979
            gen_mfc0_load64(arg, offsetof(CPUState, CP0_YQMask));
2980
            rn = "YQMask";
2981
            break;
2982
        case 5:
2983
            check_insn(env, ctx, ASE_MT);
2984
            gen_mfc0_load64(arg, offsetof(CPUState, CP0_VPESchedule));
2985
            rn = "VPESchedule";
2986
            break;
2987
        case 6:
2988
            check_insn(env, ctx, ASE_MT);
2989
            gen_mfc0_load64(arg, offsetof(CPUState, CP0_VPEScheFBack));
2990
            rn = "VPEScheFBack";
2991
            break;
2992
        case 7:
2993
            check_insn(env, ctx, ASE_MT);
2994
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_VPEOpt));
2995
            rn = "VPEOpt";
2996
            break;
2997 2998 2999
        default:
            goto die;
        }
3000 3001
        break;
    case 2:
3002 3003
        switch (sel) {
        case 0:
3004 3005
            tcg_gen_ld_tl(arg, cpu_env, offsetof(CPUState, CP0_EntryLo0));
            tcg_gen_ext32s_tl(arg, arg);
T
ths 已提交
3006 3007
            rn = "EntryLo0";
            break;
3008
        case 1:
3009
            check_insn(env, ctx, ASE_MT);
3010
            gen_helper_mfc0_tcstatus(arg);
T
ths 已提交
3011
            rn = "TCStatus";
3012
            break;
3013
        case 2:
3014
            check_insn(env, ctx, ASE_MT);
3015
            gen_helper_mfc0_tcbind(arg);
T
ths 已提交
3016
            rn = "TCBind";
3017
            break;
3018
        case 3:
3019
            check_insn(env, ctx, ASE_MT);
3020
            gen_helper_mfc0_tcrestart(arg);
T
ths 已提交
3021
            rn = "TCRestart";
3022
            break;
3023
        case 4:
3024
            check_insn(env, ctx, ASE_MT);
3025
            gen_helper_mfc0_tchalt(arg);
T
ths 已提交
3026
            rn = "TCHalt";
3027
            break;
3028
        case 5:
3029
            check_insn(env, ctx, ASE_MT);
3030
            gen_helper_mfc0_tccontext(arg);
T
ths 已提交
3031
            rn = "TCContext";
3032
            break;
3033
        case 6:
3034
            check_insn(env, ctx, ASE_MT);
3035
            gen_helper_mfc0_tcschedule(arg);
T
ths 已提交
3036
            rn = "TCSchedule";
3037
            break;
3038
        case 7:
3039
            check_insn(env, ctx, ASE_MT);
3040
            gen_helper_mfc0_tcschefback(arg);
T
ths 已提交
3041
            rn = "TCScheFBack";
3042
            break;
3043 3044 3045
        default:
            goto die;
        }
3046 3047
        break;
    case 3:
3048 3049
        switch (sel) {
        case 0:
3050 3051
            tcg_gen_ld_tl(arg, cpu_env, offsetof(CPUState, CP0_EntryLo1));
            tcg_gen_ext32s_tl(arg, arg);
T
ths 已提交
3052 3053
            rn = "EntryLo1";
            break;
3054 3055
        default:
            goto die;
3056
        }
3057 3058
        break;
    case 4:
3059 3060
        switch (sel) {
        case 0:
3061 3062
            tcg_gen_ld_tl(arg, cpu_env, offsetof(CPUState, CP0_Context));
            tcg_gen_ext32s_tl(arg, arg);
T
ths 已提交
3063 3064
            rn = "Context";
            break;
3065
        case 1:
3066
//            gen_helper_mfc0_contextconfig(arg); /* SmartMIPS ASE */
T
ths 已提交
3067 3068
            rn = "ContextConfig";
//            break;
3069 3070
        default:
            goto die;
3071
        }
3072 3073
        break;
    case 5:
3074 3075
        switch (sel) {
        case 0:
3076
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_PageMask));
T
ths 已提交
3077 3078
            rn = "PageMask";
            break;
3079
        case 1:
3080
            check_insn(env, ctx, ISA_MIPS32R2);
3081
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_PageGrain));
T
ths 已提交
3082 3083
            rn = "PageGrain";
            break;
3084 3085
        default:
            goto die;
3086
        }
3087 3088
        break;
    case 6:
3089 3090
        switch (sel) {
        case 0:
3091
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_Wired));
T
ths 已提交
3092 3093
            rn = "Wired";
            break;
3094
        case 1:
3095
            check_insn(env, ctx, ISA_MIPS32R2);
3096
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_SRSConf0));
T
ths 已提交
3097
            rn = "SRSConf0";
3098
            break;
3099
        case 2:
3100
            check_insn(env, ctx, ISA_MIPS32R2);
3101
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_SRSConf1));
T
ths 已提交
3102
            rn = "SRSConf1";
3103
            break;
3104
        case 3:
3105
            check_insn(env, ctx, ISA_MIPS32R2);
3106
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_SRSConf2));
T
ths 已提交
3107
            rn = "SRSConf2";
3108
            break;
3109
        case 4:
3110
            check_insn(env, ctx, ISA_MIPS32R2);
3111
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_SRSConf3));
T
ths 已提交
3112
            rn = "SRSConf3";
3113
            break;
3114
        case 5:
3115
            check_insn(env, ctx, ISA_MIPS32R2);
3116
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_SRSConf4));
T
ths 已提交
3117
            rn = "SRSConf4";
3118
            break;
3119 3120
        default:
            goto die;
3121
        }
3122
        break;
3123
    case 7:
3124 3125
        switch (sel) {
        case 0:
3126
            check_insn(env, ctx, ISA_MIPS32R2);
3127
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_HWREna));
T
ths 已提交
3128 3129
            rn = "HWREna";
            break;
3130 3131
        default:
            goto die;
3132
        }
3133
        break;
3134
    case 8:
3135 3136
        switch (sel) {
        case 0:
3137 3138
            tcg_gen_ld_tl(arg, cpu_env, offsetof(CPUState, CP0_BadVAddr));
            tcg_gen_ext32s_tl(arg, arg);
T
ths 已提交
3139
            rn = "BadVAddr";
T
ths 已提交
3140
            break;
3141 3142 3143
        default:
            goto die;
       }
3144 3145
        break;
    case 9:
3146 3147
        switch (sel) {
        case 0:
P
pbrook 已提交
3148 3149 3150
            /* Mark as an IO operation because we read the time.  */
            if (use_icount)
                gen_io_start();
3151
            gen_helper_mfc0_count(arg);
P
pbrook 已提交
3152 3153 3154 3155
            if (use_icount) {
                gen_io_end();
                ctx->bstate = BS_STOP;
            }
T
ths 已提交
3156 3157 3158
            rn = "Count";
            break;
        /* 6,7 are implementation dependent */
3159 3160
        default:
            goto die;
T
ths 已提交
3161
        }
3162 3163
        break;
    case 10:
3164 3165
        switch (sel) {
        case 0:
3166 3167
            tcg_gen_ld_tl(arg, cpu_env, offsetof(CPUState, CP0_EntryHi));
            tcg_gen_ext32s_tl(arg, arg);
T
ths 已提交
3168 3169
            rn = "EntryHi";
            break;
3170 3171
        default:
            goto die;
3172
        }
3173 3174
        break;
    case 11:
3175 3176
        switch (sel) {
        case 0:
3177
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_Compare));
T
ths 已提交
3178 3179 3180
            rn = "Compare";
            break;
        /* 6,7 are implementation dependent */
3181 3182
        default:
            goto die;
T
ths 已提交
3183
        }
3184 3185
        break;
    case 12:
3186 3187
        switch (sel) {
        case 0:
3188
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_Status));
T
ths 已提交
3189 3190
            rn = "Status";
            break;
3191
        case 1:
3192
            check_insn(env, ctx, ISA_MIPS32R2);
3193
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_IntCtl));
T
ths 已提交
3194 3195
            rn = "IntCtl";
            break;
3196
        case 2:
3197
            check_insn(env, ctx, ISA_MIPS32R2);
3198
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_SRSCtl));
T
ths 已提交
3199 3200
            rn = "SRSCtl";
            break;
3201
        case 3:
3202
            check_insn(env, ctx, ISA_MIPS32R2);
3203
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_SRSMap));
T
ths 已提交
3204
            rn = "SRSMap";
3205
            break;
3206 3207 3208
        default:
            goto die;
       }
3209 3210
        break;
    case 13:
3211 3212
        switch (sel) {
        case 0:
3213
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_Cause));
T
ths 已提交
3214 3215
            rn = "Cause";
            break;
3216 3217 3218
        default:
            goto die;
       }
3219 3220
        break;
    case 14:
3221 3222
        switch (sel) {
        case 0:
3223 3224
            tcg_gen_ld_tl(arg, cpu_env, offsetof(CPUState, CP0_EPC));
            tcg_gen_ext32s_tl(arg, arg);
T
ths 已提交
3225 3226
            rn = "EPC";
            break;
3227 3228
        default:
            goto die;
3229
        }
3230 3231
        break;
    case 15:
3232 3233
        switch (sel) {
        case 0:
3234
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_PRid));
T
ths 已提交
3235 3236
            rn = "PRid";
            break;
3237
        case 1:
3238
            check_insn(env, ctx, ISA_MIPS32R2);
3239
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_EBase));
T
ths 已提交
3240 3241
            rn = "EBase";
            break;
3242 3243 3244
        default:
            goto die;
       }
3245 3246 3247 3248
        break;
    case 16:
        switch (sel) {
        case 0:
3249
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_Config0));
3250 3251 3252
            rn = "Config";
            break;
        case 1:
3253
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_Config1));
3254 3255
            rn = "Config1";
            break;
3256
        case 2:
3257
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_Config2));
3258 3259 3260
            rn = "Config2";
            break;
        case 3:
3261
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_Config3));
3262 3263
            rn = "Config3";
            break;
3264 3265 3266
        /* 4,5 are reserved */
        /* 6,7 are implementation dependent */
        case 6:
3267
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_Config6));
3268 3269 3270
            rn = "Config6";
            break;
        case 7:
3271
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_Config7));
3272 3273
            rn = "Config7";
            break;
3274 3275 3276 3277 3278
        default:
            goto die;
        }
        break;
    case 17:
3279 3280
        switch (sel) {
        case 0:
3281
            gen_helper_mfc0_lladdr(arg);
T
ths 已提交
3282 3283
            rn = "LLAddr";
            break;
3284 3285 3286
        default:
            goto die;
        }
3287 3288
        break;
    case 18:
3289
        switch (sel) {
3290
        case 0 ... 7:
3291
            gen_helper_1i(mfc0_watchlo, arg, sel);
T
ths 已提交
3292 3293
            rn = "WatchLo";
            break;
3294 3295 3296
        default:
            goto die;
        }
3297 3298
        break;
    case 19:
3299
        switch (sel) {
3300
        case 0 ...7:
3301
            gen_helper_1i(mfc0_watchhi, arg, sel);
T
ths 已提交
3302 3303
            rn = "WatchHi";
            break;
3304 3305 3306
        default:
            goto die;
        }
3307
        break;
3308
    case 20:
3309 3310
        switch (sel) {
        case 0:
3311
#if defined(TARGET_MIPS64)
3312
            check_insn(env, ctx, ISA_MIPS3);
3313 3314
            tcg_gen_ld_tl(arg, cpu_env, offsetof(CPUState, CP0_XContext));
            tcg_gen_ext32s_tl(arg, arg);
T
ths 已提交
3315 3316
            rn = "XContext";
            break;
T
ths 已提交
3317
#endif
3318 3319 3320
        default:
            goto die;
        }
3321 3322
        break;
    case 21:
3323 3324 3325
       /* Officially reserved, but sel 0 is used for R1x000 framemask */
        switch (sel) {
        case 0:
3326
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_Framemask));
T
ths 已提交
3327 3328
            rn = "Framemask";
            break;
3329 3330 3331
        default:
            goto die;
        }
3332 3333
        break;
    case 22:
3334
        tcg_gen_movi_tl(arg, 0); /* unimplemented */
T
ths 已提交
3335 3336
        rn = "'Diagnostic"; /* implementation dependent */
        break;
3337
    case 23:
3338 3339
        switch (sel) {
        case 0:
3340
            gen_helper_mfc0_debug(arg); /* EJTAG support */
T
ths 已提交
3341 3342
            rn = "Debug";
            break;
3343
        case 1:
3344
//            gen_helper_mfc0_tracecontrol(arg); /* PDtrace support */
T
ths 已提交
3345 3346
            rn = "TraceControl";
//            break;
3347
        case 2:
3348
//            gen_helper_mfc0_tracecontrol2(arg); /* PDtrace support */
T
ths 已提交
3349 3350
            rn = "TraceControl2";
//            break;
3351
        case 3:
3352
//            gen_helper_mfc0_usertracedata(arg); /* PDtrace support */
T
ths 已提交
3353 3354
            rn = "UserTraceData";
//            break;
3355
        case 4:
3356
//            gen_helper_mfc0_tracebpc(arg); /* PDtrace support */
T
ths 已提交
3357 3358
            rn = "TraceBPC";
//            break;
3359 3360 3361
        default:
            goto die;
        }
3362 3363
        break;
    case 24:
3364 3365
        switch (sel) {
        case 0:
T
ths 已提交
3366
            /* EJTAG support */
3367 3368
            tcg_gen_ld_tl(arg, cpu_env, offsetof(CPUState, CP0_DEPC));
            tcg_gen_ext32s_tl(arg, arg);
T
ths 已提交
3369 3370
            rn = "DEPC";
            break;
3371 3372 3373
        default:
            goto die;
        }
3374
        break;
3375
    case 25:
3376 3377
        switch (sel) {
        case 0:
3378
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_Performance0));
T
ths 已提交
3379
            rn = "Performance0";
3380 3381
            break;
        case 1:
3382
//            gen_helper_mfc0_performance1(arg);
T
ths 已提交
3383 3384
            rn = "Performance1";
//            break;
3385
        case 2:
3386
//            gen_helper_mfc0_performance2(arg);
T
ths 已提交
3387 3388
            rn = "Performance2";
//            break;
3389
        case 3:
3390
//            gen_helper_mfc0_performance3(arg);
T
ths 已提交
3391 3392
            rn = "Performance3";
//            break;
3393
        case 4:
3394
//            gen_helper_mfc0_performance4(arg);
T
ths 已提交
3395 3396
            rn = "Performance4";
//            break;
3397
        case 5:
3398
//            gen_helper_mfc0_performance5(arg);
T
ths 已提交
3399 3400
            rn = "Performance5";
//            break;
3401
        case 6:
3402
//            gen_helper_mfc0_performance6(arg);
T
ths 已提交
3403 3404
            rn = "Performance6";
//            break;
3405
        case 7:
3406
//            gen_helper_mfc0_performance7(arg);
T
ths 已提交
3407 3408
            rn = "Performance7";
//            break;
3409 3410 3411
        default:
            goto die;
        }
3412 3413
        break;
    case 26:
3414
        tcg_gen_movi_tl(arg, 0); /* unimplemented */
3415 3416
        rn = "ECC";
        break;
3417
    case 27:
3418 3419
        switch (sel) {
        case 0 ... 3:
3420
            tcg_gen_movi_tl(arg, 0); /* unimplemented */
T
ths 已提交
3421 3422
            rn = "CacheErr";
            break;
3423 3424 3425
        default:
            goto die;
        }
3426
        break;
3427 3428 3429
    case 28:
        switch (sel) {
        case 0:
3430 3431 3432
        case 2:
        case 4:
        case 6:
3433
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_TagLo));
3434 3435 3436
            rn = "TagLo";
            break;
        case 1:
3437 3438 3439
        case 3:
        case 5:
        case 7:
3440
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_DataLo));
3441 3442 3443 3444 3445 3446
            rn = "DataLo";
            break;
        default:
            goto die;
        }
        break;
3447
    case 29:
3448 3449 3450 3451 3452
        switch (sel) {
        case 0:
        case 2:
        case 4:
        case 6:
3453
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_TagHi));
3454 3455 3456 3457 3458 3459
            rn = "TagHi";
            break;
        case 1:
        case 3:
        case 5:
        case 7:
3460
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_DataHi));
3461 3462 3463 3464 3465
            rn = "DataHi";
            break;
        default:
            goto die;
        }
3466
        break;
3467
    case 30:
3468 3469
        switch (sel) {
        case 0:
3470 3471
            tcg_gen_ld_tl(arg, cpu_env, offsetof(CPUState, CP0_ErrorEPC));
            tcg_gen_ext32s_tl(arg, arg);
T
ths 已提交
3472 3473
            rn = "ErrorEPC";
            break;
3474 3475 3476
        default:
            goto die;
        }
3477 3478
        break;
    case 31:
3479 3480
        switch (sel) {
        case 0:
T
ths 已提交
3481
            /* EJTAG support */
3482
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_DESAVE));
T
ths 已提交
3483 3484
            rn = "DESAVE";
            break;
3485 3486 3487
        default:
            goto die;
        }
3488 3489 3490 3491
        break;
    default:
       goto die;
    }
3492
    LOG_DISAS("mfc0 %s (reg %d sel %d)\n", rn, reg, sel);
3493 3494 3495
    return;

die:
3496
    LOG_DISAS("mfc0 %s (reg %d sel %d)\n", rn, reg, sel);
3497 3498 3499
    generate_exception(ctx, EXCP_RI);
}

3500
static void gen_mtc0 (CPUState *env, DisasContext *ctx, TCGv arg, int reg, int sel)
3501
{
3502 3503
    const char *rn = "invalid";

3504 3505 3506
    if (sel != 0)
        check_insn(env, ctx, ISA_MIPS32);

P
pbrook 已提交
3507 3508 3509
    if (use_icount)
        gen_io_start();

3510 3511
    switch (reg) {
    case 0:
3512 3513
        switch (sel) {
        case 0:
3514
            gen_helper_mtc0_index(arg);
3515 3516 3517
            rn = "Index";
            break;
        case 1:
3518
            check_insn(env, ctx, ASE_MT);
3519
            gen_helper_mtc0_mvpcontrol(arg);
3520
            rn = "MVPControl";
3521
            break;
3522
        case 2:
3523
            check_insn(env, ctx, ASE_MT);
3524
            /* ignored */
3525
            rn = "MVPConf0";
3526
            break;
3527
        case 3:
3528
            check_insn(env, ctx, ASE_MT);
3529
            /* ignored */
3530
            rn = "MVPConf1";
3531
            break;
3532 3533 3534
        default:
            goto die;
        }
3535 3536
        break;
    case 1:
3537 3538
        switch (sel) {
        case 0:
T
ths 已提交
3539
            /* ignored */
3540
            rn = "Random";
T
ths 已提交
3541
            break;
3542
        case 1:
3543
            check_insn(env, ctx, ASE_MT);
3544
            gen_helper_mtc0_vpecontrol(arg);
3545
            rn = "VPEControl";
3546
            break;
3547
        case 2:
3548
            check_insn(env, ctx, ASE_MT);
3549
            gen_helper_mtc0_vpeconf0(arg);
3550
            rn = "VPEConf0";
3551
            break;
3552
        case 3:
3553
            check_insn(env, ctx, ASE_MT);
3554
            gen_helper_mtc0_vpeconf1(arg);
3555
            rn = "VPEConf1";
3556
            break;
3557
        case 4:
3558
            check_insn(env, ctx, ASE_MT);
3559
            gen_helper_mtc0_yqmask(arg);
3560
            rn = "YQMask";
3561
            break;
3562
        case 5:
3563
            check_insn(env, ctx, ASE_MT);
3564
            gen_mtc0_store64(arg, offsetof(CPUState, CP0_VPESchedule));
3565
            rn = "VPESchedule";
3566
            break;
3567
        case 6:
3568
            check_insn(env, ctx, ASE_MT);
3569
            gen_mtc0_store64(arg, offsetof(CPUState, CP0_VPEScheFBack));
3570
            rn = "VPEScheFBack";
3571
            break;
3572
        case 7:
3573
            check_insn(env, ctx, ASE_MT);
3574
            gen_helper_mtc0_vpeopt(arg);
3575
            rn = "VPEOpt";
3576
            break;
3577 3578 3579
        default:
            goto die;
        }
3580 3581
        break;
    case 2:
3582 3583
        switch (sel) {
        case 0:
3584
            gen_helper_mtc0_entrylo0(arg);
T
ths 已提交
3585 3586
            rn = "EntryLo0";
            break;
3587
        case 1:
3588
            check_insn(env, ctx, ASE_MT);
3589
            gen_helper_mtc0_tcstatus(arg);
T
ths 已提交
3590
            rn = "TCStatus";
3591
            break;
3592
        case 2:
3593
            check_insn(env, ctx, ASE_MT);
3594
            gen_helper_mtc0_tcbind(arg);
T
ths 已提交
3595
            rn = "TCBind";
3596
            break;
3597
        case 3:
3598
            check_insn(env, ctx, ASE_MT);
3599
            gen_helper_mtc0_tcrestart(arg);
T
ths 已提交
3600
            rn = "TCRestart";
3601
            break;
3602
        case 4:
3603
            check_insn(env, ctx, ASE_MT);
3604
            gen_helper_mtc0_tchalt(arg);
T
ths 已提交
3605
            rn = "TCHalt";
3606
            break;
3607
        case 5:
3608
            check_insn(env, ctx, ASE_MT);
3609
            gen_helper_mtc0_tccontext(arg);
T
ths 已提交
3610
            rn = "TCContext";
3611
            break;
3612
        case 6:
3613
            check_insn(env, ctx, ASE_MT);
3614
            gen_helper_mtc0_tcschedule(arg);
T
ths 已提交
3615
            rn = "TCSchedule";
3616
            break;
3617
        case 7:
3618
            check_insn(env, ctx, ASE_MT);
3619
            gen_helper_mtc0_tcschefback(arg);
T
ths 已提交
3620
            rn = "TCScheFBack";
3621
            break;
3622 3623 3624
        default:
            goto die;
        }
3625 3626
        break;
    case 3:
3627 3628
        switch (sel) {
        case 0:
3629
            gen_helper_mtc0_entrylo1(arg);
T
ths 已提交
3630 3631
            rn = "EntryLo1";
            break;
3632 3633
        default:
            goto die;
T
ths 已提交
3634
        }
3635 3636
        break;
    case 4:
3637 3638
        switch (sel) {
        case 0:
3639
            gen_helper_mtc0_context(arg);
T
ths 已提交
3640 3641
            rn = "Context";
            break;
3642
        case 1:
3643
//            gen_helper_mtc0_contextconfig(arg); /* SmartMIPS ASE */
T
ths 已提交
3644 3645
            rn = "ContextConfig";
//            break;
3646 3647
        default:
            goto die;
T
ths 已提交
3648
        }
3649 3650
        break;
    case 5:
3651 3652
        switch (sel) {
        case 0:
3653
            gen_helper_mtc0_pagemask(arg);
T
ths 已提交
3654 3655
            rn = "PageMask";
            break;
3656
        case 1:
3657
            check_insn(env, ctx, ISA_MIPS32R2);
3658
            gen_helper_mtc0_pagegrain(arg);
T
ths 已提交
3659 3660
            rn = "PageGrain";
            break;
3661 3662
        default:
            goto die;
T
ths 已提交
3663
        }
3664 3665
        break;
    case 6:
3666 3667
        switch (sel) {
        case 0:
3668
            gen_helper_mtc0_wired(arg);
T
ths 已提交
3669 3670
            rn = "Wired";
            break;
3671
        case 1:
3672
            check_insn(env, ctx, ISA_MIPS32R2);
3673
            gen_helper_mtc0_srsconf0(arg);
T
ths 已提交
3674
            rn = "SRSConf0";
3675
            break;
3676
        case 2:
3677
            check_insn(env, ctx, ISA_MIPS32R2);
3678
            gen_helper_mtc0_srsconf1(arg);
T
ths 已提交
3679
            rn = "SRSConf1";
3680
            break;
3681
        case 3:
3682
            check_insn(env, ctx, ISA_MIPS32R2);
3683
            gen_helper_mtc0_srsconf2(arg);
T
ths 已提交
3684
            rn = "SRSConf2";
3685
            break;
3686
        case 4:
3687
            check_insn(env, ctx, ISA_MIPS32R2);
3688
            gen_helper_mtc0_srsconf3(arg);
T
ths 已提交
3689
            rn = "SRSConf3";
3690
            break;
3691
        case 5:
3692
            check_insn(env, ctx, ISA_MIPS32R2);
3693
            gen_helper_mtc0_srsconf4(arg);
T
ths 已提交
3694
            rn = "SRSConf4";
3695
            break;
3696 3697
        default:
            goto die;
T
ths 已提交
3698
        }
3699 3700
        break;
    case 7:
3701 3702
        switch (sel) {
        case 0:
3703
            check_insn(env, ctx, ISA_MIPS32R2);
3704
            gen_helper_mtc0_hwrena(arg);
T
ths 已提交
3705 3706
            rn = "HWREna";
            break;
3707 3708
        default:
            goto die;
T
ths 已提交
3709
        }
3710 3711
        break;
    case 8:
3712
        /* ignored */
T
ths 已提交
3713
        rn = "BadVAddr";
3714 3715
        break;
    case 9:
3716 3717
        switch (sel) {
        case 0:
3718
            gen_helper_mtc0_count(arg);
T
ths 已提交
3719 3720
            rn = "Count";
            break;
T
ths 已提交
3721
        /* 6,7 are implementation dependent */
3722 3723
        default:
            goto die;
T
ths 已提交
3724
        }
3725 3726
        break;
    case 10:
3727 3728
        switch (sel) {
        case 0:
3729
            gen_helper_mtc0_entryhi(arg);
T
ths 已提交
3730 3731
            rn = "EntryHi";
            break;
3732 3733
        default:
            goto die;
T
ths 已提交
3734
        }
3735 3736
        break;
    case 11:
3737 3738
        switch (sel) {
        case 0:
3739
            gen_helper_mtc0_compare(arg);
T
ths 已提交
3740 3741 3742
            rn = "Compare";
            break;
        /* 6,7 are implementation dependent */
3743 3744
        default:
            goto die;
T
ths 已提交
3745
        }
3746 3747
        break;
    case 12:
3748 3749
        switch (sel) {
        case 0:
A
aurel32 已提交
3750
            save_cpu_state(ctx, 1);
3751
            gen_helper_mtc0_status(arg);
3752 3753 3754
            /* BS_STOP isn't good enough here, hflags may have changed. */
            gen_save_pc(ctx->pc + 4);
            ctx->bstate = BS_EXCP;
T
ths 已提交
3755 3756
            rn = "Status";
            break;
3757
        case 1:
3758
            check_insn(env, ctx, ISA_MIPS32R2);
3759
            gen_helper_mtc0_intctl(arg);
3760 3761
            /* Stop translation as we may have switched the execution mode */
            ctx->bstate = BS_STOP;
T
ths 已提交
3762 3763
            rn = "IntCtl";
            break;
3764
        case 2:
3765
            check_insn(env, ctx, ISA_MIPS32R2);
3766
            gen_helper_mtc0_srsctl(arg);
3767 3768
            /* Stop translation as we may have switched the execution mode */
            ctx->bstate = BS_STOP;
T
ths 已提交
3769 3770
            rn = "SRSCtl";
            break;
3771
        case 3:
3772
            check_insn(env, ctx, ISA_MIPS32R2);
3773
            gen_mtc0_store32(arg, offsetof(CPUState, CP0_SRSMap));
3774 3775
            /* Stop translation as we may have switched the execution mode */
            ctx->bstate = BS_STOP;
T
ths 已提交
3776
            rn = "SRSMap";
3777
            break;
3778 3779
        default:
            goto die;
T
ths 已提交
3780
        }
3781 3782
        break;
    case 13:
3783 3784
        switch (sel) {
        case 0:
A
aurel32 已提交
3785
            save_cpu_state(ctx, 1);
3786
            gen_helper_mtc0_cause(arg);
T
ths 已提交
3787 3788
            rn = "Cause";
            break;
3789 3790
        default:
            goto die;
T
ths 已提交
3791
        }
3792 3793
        break;
    case 14:
3794 3795
        switch (sel) {
        case 0:
3796
            gen_mtc0_store64(arg, offsetof(CPUState, CP0_EPC));
T
ths 已提交
3797 3798
            rn = "EPC";
            break;
3799 3800
        default:
            goto die;
T
ths 已提交
3801
        }
3802 3803
        break;
    case 15:
3804 3805
        switch (sel) {
        case 0:
T
ths 已提交
3806 3807 3808
            /* ignored */
            rn = "PRid";
            break;
3809
        case 1:
3810
            check_insn(env, ctx, ISA_MIPS32R2);
3811
            gen_helper_mtc0_ebase(arg);
T
ths 已提交
3812 3813
            rn = "EBase";
            break;
3814 3815
        default:
            goto die;
3816
        }
3817 3818 3819 3820
        break;
    case 16:
        switch (sel) {
        case 0:
3821
            gen_helper_mtc0_config0(arg);
3822
            rn = "Config";
T
ths 已提交
3823 3824
            /* Stop translation as we may have switched the execution mode */
            ctx->bstate = BS_STOP;
3825 3826
            break;
        case 1:
3827
            /* ignored, read only */
3828 3829 3830
            rn = "Config1";
            break;
        case 2:
3831
            gen_helper_mtc0_config2(arg);
3832
            rn = "Config2";
T
ths 已提交
3833 3834
            /* Stop translation as we may have switched the execution mode */
            ctx->bstate = BS_STOP;
3835
            break;
3836
        case 3:
3837
            /* ignored, read only */
3838 3839
            rn = "Config3";
            break;
3840 3841 3842 3843 3844 3845 3846 3847 3848 3849
        /* 4,5 are reserved */
        /* 6,7 are implementation dependent */
        case 6:
            /* ignored */
            rn = "Config6";
            break;
        case 7:
            /* ignored */
            rn = "Config7";
            break;
3850 3851 3852 3853 3854 3855
        default:
            rn = "Invalid config selector";
            goto die;
        }
        break;
    case 17:
3856 3857
        switch (sel) {
        case 0:
3858
            gen_helper_mtc0_lladdr(arg);
T
ths 已提交
3859 3860
            rn = "LLAddr";
            break;
3861 3862 3863
        default:
            goto die;
        }
3864 3865
        break;
    case 18:
3866
        switch (sel) {
3867
        case 0 ... 7:
3868
            gen_helper_1i(mtc0_watchlo, arg, sel);
T
ths 已提交
3869 3870
            rn = "WatchLo";
            break;
3871 3872 3873
        default:
            goto die;
        }
3874 3875
        break;
    case 19:
3876
        switch (sel) {
3877
        case 0 ... 7:
3878
            gen_helper_1i(mtc0_watchhi, arg, sel);
T
ths 已提交
3879 3880
            rn = "WatchHi";
            break;
3881 3882 3883
        default:
            goto die;
        }
3884 3885
        break;
    case 20:
3886 3887
        switch (sel) {
        case 0:
3888
#if defined(TARGET_MIPS64)
3889
            check_insn(env, ctx, ISA_MIPS3);
3890
            gen_helper_mtc0_xcontext(arg);
T
ths 已提交
3891 3892
            rn = "XContext";
            break;
T
ths 已提交
3893
#endif
3894 3895 3896
        default:
            goto die;
        }
3897 3898
        break;
    case 21:
3899 3900 3901
       /* Officially reserved, but sel 0 is used for R1x000 framemask */
        switch (sel) {
        case 0:
3902
            gen_helper_mtc0_framemask(arg);
T
ths 已提交
3903 3904
            rn = "Framemask";
            break;
3905 3906 3907 3908
        default:
            goto die;
        }
        break;
3909
    case 22:
3910 3911
        /* ignored */
        rn = "Diagnostic"; /* implementation dependent */
T
ths 已提交
3912
        break;
3913
    case 23:
3914 3915
        switch (sel) {
        case 0:
3916
            gen_helper_mtc0_debug(arg); /* EJTAG support */
3917 3918 3919
            /* BS_STOP isn't good enough here, hflags may have changed. */
            gen_save_pc(ctx->pc + 4);
            ctx->bstate = BS_EXCP;
T
ths 已提交
3920 3921
            rn = "Debug";
            break;
3922
        case 1:
3923
//            gen_helper_mtc0_tracecontrol(arg); /* PDtrace support */
T
ths 已提交
3924
            rn = "TraceControl";
3925 3926
            /* Stop translation as we may have switched the execution mode */
            ctx->bstate = BS_STOP;
T
ths 已提交
3927
//            break;
3928
        case 2:
3929
//            gen_helper_mtc0_tracecontrol2(arg); /* PDtrace support */
T
ths 已提交
3930
            rn = "TraceControl2";
3931 3932
            /* Stop translation as we may have switched the execution mode */
            ctx->bstate = BS_STOP;
T
ths 已提交
3933
//            break;
3934
        case 3:
3935 3936
            /* Stop translation as we may have switched the execution mode */
            ctx->bstate = BS_STOP;
3937
//            gen_helper_mtc0_usertracedata(arg); /* PDtrace support */
T
ths 已提交
3938
            rn = "UserTraceData";
3939 3940
            /* Stop translation as we may have switched the execution mode */
            ctx->bstate = BS_STOP;
T
ths 已提交
3941
//            break;
3942
        case 4:
3943
//            gen_helper_mtc0_tracebpc(arg); /* PDtrace support */
3944 3945
            /* Stop translation as we may have switched the execution mode */
            ctx->bstate = BS_STOP;
T
ths 已提交
3946 3947
            rn = "TraceBPC";
//            break;
3948 3949 3950
        default:
            goto die;
        }
3951 3952
        break;
    case 24:
3953 3954
        switch (sel) {
        case 0:
3955
            /* EJTAG support */
3956
            gen_mtc0_store64(arg, offsetof(CPUState, CP0_DEPC));
T
ths 已提交
3957 3958
            rn = "DEPC";
            break;
3959 3960 3961
        default:
            goto die;
        }
3962 3963
        break;
    case 25:
3964 3965
        switch (sel) {
        case 0:
3966
            gen_helper_mtc0_performance0(arg);
T
ths 已提交
3967 3968
            rn = "Performance0";
            break;
3969
        case 1:
3970
//            gen_helper_mtc0_performance1(arg);
T
ths 已提交
3971 3972
            rn = "Performance1";
//            break;
3973
        case 2:
3974
//            gen_helper_mtc0_performance2(arg);
T
ths 已提交
3975 3976
            rn = "Performance2";
//            break;
3977
        case 3:
3978
//            gen_helper_mtc0_performance3(arg);
T
ths 已提交
3979 3980
            rn = "Performance3";
//            break;
3981
        case 4:
3982
//            gen_helper_mtc0_performance4(arg);
T
ths 已提交
3983 3984
            rn = "Performance4";
//            break;
3985
        case 5:
3986
//            gen_helper_mtc0_performance5(arg);
T
ths 已提交
3987 3988
            rn = "Performance5";
//            break;
3989
        case 6:
3990
//            gen_helper_mtc0_performance6(arg);
T
ths 已提交
3991 3992
            rn = "Performance6";
//            break;
3993
        case 7:
3994
//            gen_helper_mtc0_performance7(arg);
T
ths 已提交
3995 3996
            rn = "Performance7";
//            break;
3997 3998 3999
        default:
            goto die;
        }
4000 4001
       break;
    case 26:
T
ths 已提交
4002
        /* ignored */
4003
        rn = "ECC";
T
ths 已提交
4004
        break;
4005
    case 27:
4006 4007
        switch (sel) {
        case 0 ... 3:
T
ths 已提交
4008 4009 4010
            /* ignored */
            rn = "CacheErr";
            break;
4011 4012 4013
        default:
            goto die;
        }
4014 4015 4016 4017
       break;
    case 28:
        switch (sel) {
        case 0:
4018 4019 4020
        case 2:
        case 4:
        case 6:
4021
            gen_helper_mtc0_taglo(arg);
4022 4023
            rn = "TagLo";
            break;
4024 4025 4026 4027
        case 1:
        case 3:
        case 5:
        case 7:
4028
            gen_helper_mtc0_datalo(arg);
4029 4030
            rn = "DataLo";
            break;
4031 4032 4033 4034 4035
        default:
            goto die;
        }
        break;
    case 29:
4036 4037 4038 4039 4040
        switch (sel) {
        case 0:
        case 2:
        case 4:
        case 6:
4041
            gen_helper_mtc0_taghi(arg);
4042 4043 4044 4045 4046 4047
            rn = "TagHi";
            break;
        case 1:
        case 3:
        case 5:
        case 7:
4048
            gen_helper_mtc0_datahi(arg);
4049 4050 4051 4052 4053 4054
            rn = "DataHi";
            break;
        default:
            rn = "invalid sel";
            goto die;
        }
4055 4056
       break;
    case 30:
4057 4058
        switch (sel) {
        case 0:
4059
            gen_mtc0_store64(arg, offsetof(CPUState, CP0_ErrorEPC));
T
ths 已提交
4060 4061
            rn = "ErrorEPC";
            break;
4062 4063 4064
        default:
            goto die;
        }
4065 4066
        break;
    case 31:
4067 4068
        switch (sel) {
        case 0:
4069
            /* EJTAG support */
4070
            gen_mtc0_store32(arg, offsetof(CPUState, CP0_DESAVE));
T
ths 已提交
4071 4072
            rn = "DESAVE";
            break;
4073 4074 4075
        default:
            goto die;
        }
T
ths 已提交
4076 4077
        /* Stop translation as we may have switched the execution mode */
        ctx->bstate = BS_STOP;
4078 4079 4080 4081
        break;
    default:
       goto die;
    }
4082
    LOG_DISAS("mtc0 %s (reg %d sel %d)\n", rn, reg, sel);
T
ths 已提交
4083
    /* For simplicity assume that all writes can cause interrupts.  */
P
pbrook 已提交
4084 4085 4086 4087
    if (use_icount) {
        gen_io_end();
        ctx->bstate = BS_STOP;
    }
4088 4089 4090
    return;

die:
4091
    LOG_DISAS("mtc0 %s (reg %d sel %d)\n", rn, reg, sel);
4092 4093 4094
    generate_exception(ctx, EXCP_RI);
}

4095
#if defined(TARGET_MIPS64)
4096
static void gen_dmfc0 (CPUState *env, DisasContext *ctx, TCGv arg, int reg, int sel)
T
ths 已提交
4097 4098 4099
{
    const char *rn = "invalid";

4100 4101 4102
    if (sel != 0)
        check_insn(env, ctx, ISA_MIPS64);

T
ths 已提交
4103 4104 4105 4106
    switch (reg) {
    case 0:
        switch (sel) {
        case 0:
4107
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_Index));
T
ths 已提交
4108 4109 4110
            rn = "Index";
            break;
        case 1:
4111
            check_insn(env, ctx, ASE_MT);
4112
            gen_helper_mfc0_mvpcontrol(arg);
T
ths 已提交
4113
            rn = "MVPControl";
4114
            break;
T
ths 已提交
4115
        case 2:
4116
            check_insn(env, ctx, ASE_MT);
4117
            gen_helper_mfc0_mvpconf0(arg);
T
ths 已提交
4118
            rn = "MVPConf0";
4119
            break;
T
ths 已提交
4120
        case 3:
4121
            check_insn(env, ctx, ASE_MT);
4122
            gen_helper_mfc0_mvpconf1(arg);
T
ths 已提交
4123
            rn = "MVPConf1";
4124
            break;
T
ths 已提交
4125 4126 4127 4128 4129 4130 4131
        default:
            goto die;
        }
        break;
    case 1:
        switch (sel) {
        case 0:
4132
            gen_helper_mfc0_random(arg);
T
ths 已提交
4133
            rn = "Random";
T
ths 已提交
4134
            break;
T
ths 已提交
4135
        case 1:
4136
            check_insn(env, ctx, ASE_MT);
4137
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_VPEControl));
T
ths 已提交
4138
            rn = "VPEControl";
4139
            break;
T
ths 已提交
4140
        case 2:
4141
            check_insn(env, ctx, ASE_MT);
4142
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_VPEConf0));
T
ths 已提交
4143
            rn = "VPEConf0";
4144
            break;
T
ths 已提交
4145
        case 3:
4146
            check_insn(env, ctx, ASE_MT);
4147
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_VPEConf1));
T
ths 已提交
4148
            rn = "VPEConf1";
4149
            break;
T
ths 已提交
4150
        case 4:
4151
            check_insn(env, ctx, ASE_MT);
4152
            tcg_gen_ld_tl(arg, cpu_env, offsetof(CPUState, CP0_YQMask));
T
ths 已提交
4153
            rn = "YQMask";
4154
            break;
T
ths 已提交
4155
        case 5:
4156
            check_insn(env, ctx, ASE_MT);
4157
            tcg_gen_ld_tl(arg, cpu_env, offsetof(CPUState, CP0_VPESchedule));
T
ths 已提交
4158
            rn = "VPESchedule";
4159
            break;
T
ths 已提交
4160
        case 6:
4161
            check_insn(env, ctx, ASE_MT);
4162
            tcg_gen_ld_tl(arg, cpu_env, offsetof(CPUState, CP0_VPEScheFBack));
T
ths 已提交
4163
            rn = "VPEScheFBack";
4164
            break;
T
ths 已提交
4165
        case 7:
4166
            check_insn(env, ctx, ASE_MT);
4167
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_VPEOpt));
T
ths 已提交
4168
            rn = "VPEOpt";
4169
            break;
T
ths 已提交
4170 4171 4172 4173 4174 4175 4176
        default:
            goto die;
        }
        break;
    case 2:
        switch (sel) {
        case 0:
4177
            tcg_gen_ld_tl(arg, cpu_env, offsetof(CPUState, CP0_EntryLo0));
T
ths 已提交
4178 4179
            rn = "EntryLo0";
            break;
T
ths 已提交
4180
        case 1:
4181
            check_insn(env, ctx, ASE_MT);
4182
            gen_helper_mfc0_tcstatus(arg);
T
ths 已提交
4183
            rn = "TCStatus";
4184
            break;
T
ths 已提交
4185
        case 2:
4186
            check_insn(env, ctx, ASE_MT);
4187
            gen_helper_mfc0_tcbind(arg);
T
ths 已提交
4188
            rn = "TCBind";
4189
            break;
T
ths 已提交
4190
        case 3:
4191
            check_insn(env, ctx, ASE_MT);
4192
            gen_helper_dmfc0_tcrestart(arg);
T
ths 已提交
4193
            rn = "TCRestart";
4194
            break;
T
ths 已提交
4195
        case 4:
4196
            check_insn(env, ctx, ASE_MT);
4197
            gen_helper_dmfc0_tchalt(arg);
T
ths 已提交
4198
            rn = "TCHalt";
4199
            break;
T
ths 已提交
4200
        case 5:
4201
            check_insn(env, ctx, ASE_MT);
4202
            gen_helper_dmfc0_tccontext(arg);
T
ths 已提交
4203
            rn = "TCContext";
4204
            break;
T
ths 已提交
4205
        case 6:
4206
            check_insn(env, ctx, ASE_MT);
4207
            gen_helper_dmfc0_tcschedule(arg);
T
ths 已提交
4208
            rn = "TCSchedule";
4209
            break;
T
ths 已提交
4210
        case 7:
4211
            check_insn(env, ctx, ASE_MT);
4212
            gen_helper_dmfc0_tcschefback(arg);
T
ths 已提交
4213
            rn = "TCScheFBack";
4214
            break;
T
ths 已提交
4215 4216 4217 4218 4219 4220 4221
        default:
            goto die;
        }
        break;
    case 3:
        switch (sel) {
        case 0:
4222
            tcg_gen_ld_tl(arg, cpu_env, offsetof(CPUState, CP0_EntryLo1));
T
ths 已提交
4223 4224
            rn = "EntryLo1";
            break;
T
ths 已提交
4225 4226
        default:
            goto die;
4227
        }
T
ths 已提交
4228 4229 4230 4231
        break;
    case 4:
        switch (sel) {
        case 0:
4232
            tcg_gen_ld_tl(arg, cpu_env, offsetof(CPUState, CP0_Context));
T
ths 已提交
4233 4234
            rn = "Context";
            break;
T
ths 已提交
4235
        case 1:
4236
//            gen_helper_dmfc0_contextconfig(arg); /* SmartMIPS ASE */
T
ths 已提交
4237 4238
            rn = "ContextConfig";
//            break;
T
ths 已提交
4239 4240
        default:
            goto die;
T
ths 已提交
4241
        }
T
ths 已提交
4242 4243 4244 4245
        break;
    case 5:
        switch (sel) {
        case 0:
4246
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_PageMask));
T
ths 已提交
4247 4248
            rn = "PageMask";
            break;
T
ths 已提交
4249
        case 1:
4250
            check_insn(env, ctx, ISA_MIPS32R2);
4251
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_PageGrain));
T
ths 已提交
4252 4253
            rn = "PageGrain";
            break;
T
ths 已提交
4254 4255
        default:
            goto die;
T
ths 已提交
4256
        }
T
ths 已提交
4257 4258 4259 4260
        break;
    case 6:
        switch (sel) {
        case 0:
4261
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_Wired));
T
ths 已提交
4262 4263
            rn = "Wired";
            break;
T
ths 已提交
4264
        case 1:
4265
            check_insn(env, ctx, ISA_MIPS32R2);
4266
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_SRSConf0));
T
ths 已提交
4267
            rn = "SRSConf0";
4268
            break;
T
ths 已提交
4269
        case 2:
4270
            check_insn(env, ctx, ISA_MIPS32R2);
4271
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_SRSConf1));
T
ths 已提交
4272
            rn = "SRSConf1";
4273
            break;
T
ths 已提交
4274
        case 3:
4275
            check_insn(env, ctx, ISA_MIPS32R2);
4276
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_SRSConf2));
T
ths 已提交
4277
            rn = "SRSConf2";
4278
            break;
T
ths 已提交
4279
        case 4:
4280
            check_insn(env, ctx, ISA_MIPS32R2);
4281
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_SRSConf3));
T
ths 已提交
4282
            rn = "SRSConf3";
4283
            break;
T
ths 已提交
4284
        case 5:
4285
            check_insn(env, ctx, ISA_MIPS32R2);
4286
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_SRSConf4));
T
ths 已提交
4287
            rn = "SRSConf4";
4288
            break;
T
ths 已提交
4289 4290
        default:
            goto die;
T
ths 已提交
4291
        }
T
ths 已提交
4292 4293 4294 4295
        break;
    case 7:
        switch (sel) {
        case 0:
4296
            check_insn(env, ctx, ISA_MIPS32R2);
4297
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_HWREna));
T
ths 已提交
4298 4299
            rn = "HWREna";
            break;
T
ths 已提交
4300 4301
        default:
            goto die;
T
ths 已提交
4302
        }
T
ths 已提交
4303 4304 4305 4306
        break;
    case 8:
        switch (sel) {
        case 0:
4307
            tcg_gen_ld_tl(arg, cpu_env, offsetof(CPUState, CP0_BadVAddr));
T
ths 已提交
4308
            rn = "BadVAddr";
T
ths 已提交
4309
            break;
T
ths 已提交
4310 4311
        default:
            goto die;
T
ths 已提交
4312
        }
T
ths 已提交
4313 4314 4315 4316
        break;
    case 9:
        switch (sel) {
        case 0:
P
pbrook 已提交
4317 4318 4319
            /* Mark as an IO operation because we read the time.  */
            if (use_icount)
                gen_io_start();
4320
            gen_helper_mfc0_count(arg);
P
pbrook 已提交
4321 4322 4323 4324
            if (use_icount) {
                gen_io_end();
                ctx->bstate = BS_STOP;
            }
T
ths 已提交
4325 4326 4327
            rn = "Count";
            break;
        /* 6,7 are implementation dependent */
T
ths 已提交
4328 4329
        default:
            goto die;
T
ths 已提交
4330
        }
T
ths 已提交
4331 4332 4333 4334
        break;
    case 10:
        switch (sel) {
        case 0:
4335
            tcg_gen_ld_tl(arg, cpu_env, offsetof(CPUState, CP0_EntryHi));
T
ths 已提交
4336 4337
            rn = "EntryHi";
            break;
T
ths 已提交
4338 4339
        default:
            goto die;
T
ths 已提交
4340
        }
T
ths 已提交
4341 4342 4343 4344
        break;
    case 11:
        switch (sel) {
        case 0:
4345
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_Compare));
T
ths 已提交
4346 4347
            rn = "Compare";
            break;
T
ths 已提交
4348
        /* 6,7 are implementation dependent */
T
ths 已提交
4349 4350
        default:
            goto die;
T
ths 已提交
4351
        }
T
ths 已提交
4352 4353 4354 4355
        break;
    case 12:
        switch (sel) {
        case 0:
4356
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_Status));
T
ths 已提交
4357 4358
            rn = "Status";
            break;
T
ths 已提交
4359
        case 1:
4360
            check_insn(env, ctx, ISA_MIPS32R2);
4361
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_IntCtl));
T
ths 已提交
4362 4363
            rn = "IntCtl";
            break;
T
ths 已提交
4364
        case 2:
4365
            check_insn(env, ctx, ISA_MIPS32R2);
4366
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_SRSCtl));
T
ths 已提交
4367 4368
            rn = "SRSCtl";
            break;
T
ths 已提交
4369
        case 3:
4370
            check_insn(env, ctx, ISA_MIPS32R2);
4371
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_SRSMap));
T
ths 已提交
4372 4373
            rn = "SRSMap";
            break;
T
ths 已提交
4374 4375
        default:
            goto die;
T
ths 已提交
4376
        }
T
ths 已提交
4377 4378 4379 4380
        break;
    case 13:
        switch (sel) {
        case 0:
4381
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_Cause));
T
ths 已提交
4382 4383
            rn = "Cause";
            break;
T
ths 已提交
4384 4385
        default:
            goto die;
T
ths 已提交
4386
        }
T
ths 已提交
4387 4388 4389 4390
        break;
    case 14:
        switch (sel) {
        case 0:
4391
            tcg_gen_ld_tl(arg, cpu_env, offsetof(CPUState, CP0_EPC));
T
ths 已提交
4392 4393
            rn = "EPC";
            break;
T
ths 已提交
4394 4395
        default:
            goto die;
T
ths 已提交
4396
        }
T
ths 已提交
4397 4398 4399 4400
        break;
    case 15:
        switch (sel) {
        case 0:
4401
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_PRid));
T
ths 已提交
4402 4403
            rn = "PRid";
            break;
T
ths 已提交
4404
        case 1:
4405
            check_insn(env, ctx, ISA_MIPS32R2);
4406
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_EBase));
T
ths 已提交
4407 4408
            rn = "EBase";
            break;
T
ths 已提交
4409 4410
        default:
            goto die;
T
ths 已提交
4411
        }
T
ths 已提交
4412 4413 4414 4415
        break;
    case 16:
        switch (sel) {
        case 0:
4416
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_Config0));
T
ths 已提交
4417 4418 4419
            rn = "Config";
            break;
        case 1:
4420
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_Config1));
T
ths 已提交
4421 4422 4423
            rn = "Config1";
            break;
        case 2:
4424
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_Config2));
T
ths 已提交
4425 4426 4427
            rn = "Config2";
            break;
        case 3:
4428
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_Config3));
T
ths 已提交
4429 4430 4431
            rn = "Config3";
            break;
       /* 6,7 are implementation dependent */
T
ths 已提交
4432
        case 6:
4433
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_Config6));
T
ths 已提交
4434 4435 4436
            rn = "Config6";
            break;
        case 7:
4437
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_Config7));
T
ths 已提交
4438 4439
            rn = "Config7";
            break;
T
ths 已提交
4440 4441 4442 4443 4444 4445 4446
        default:
            goto die;
        }
        break;
    case 17:
        switch (sel) {
        case 0:
4447
            gen_helper_dmfc0_lladdr(arg);
T
ths 已提交
4448 4449
            rn = "LLAddr";
            break;
T
ths 已提交
4450 4451 4452 4453 4454 4455
        default:
            goto die;
        }
        break;
    case 18:
        switch (sel) {
4456
        case 0 ... 7:
4457
            gen_helper_1i(dmfc0_watchlo, arg, sel);
T
ths 已提交
4458 4459
            rn = "WatchLo";
            break;
T
ths 已提交
4460 4461 4462 4463 4464 4465
        default:
            goto die;
        }
        break;
    case 19:
        switch (sel) {
4466
        case 0 ... 7:
4467
            gen_helper_1i(mfc0_watchhi, arg, sel);
T
ths 已提交
4468 4469
            rn = "WatchHi";
            break;
T
ths 已提交
4470 4471 4472 4473 4474 4475 4476
        default:
            goto die;
        }
        break;
    case 20:
        switch (sel) {
        case 0:
4477
            check_insn(env, ctx, ISA_MIPS3);
4478
            tcg_gen_ld_tl(arg, cpu_env, offsetof(CPUState, CP0_XContext));
T
ths 已提交
4479 4480
            rn = "XContext";
            break;
T
ths 已提交
4481 4482 4483 4484 4485 4486 4487 4488
        default:
            goto die;
        }
        break;
    case 21:
       /* Officially reserved, but sel 0 is used for R1x000 framemask */
        switch (sel) {
        case 0:
4489
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_Framemask));
T
ths 已提交
4490 4491
            rn = "Framemask";
            break;
T
ths 已提交
4492 4493 4494 4495 4496
        default:
            goto die;
        }
        break;
    case 22:
4497
        tcg_gen_movi_tl(arg, 0); /* unimplemented */
T
ths 已提交
4498 4499
        rn = "'Diagnostic"; /* implementation dependent */
        break;
T
ths 已提交
4500 4501 4502
    case 23:
        switch (sel) {
        case 0:
4503
            gen_helper_mfc0_debug(arg); /* EJTAG support */
T
ths 已提交
4504 4505
            rn = "Debug";
            break;
T
ths 已提交
4506
        case 1:
4507
//            gen_helper_dmfc0_tracecontrol(arg); /* PDtrace support */
T
ths 已提交
4508 4509
            rn = "TraceControl";
//            break;
T
ths 已提交
4510
        case 2:
4511
//            gen_helper_dmfc0_tracecontrol2(arg); /* PDtrace support */
T
ths 已提交
4512 4513
            rn = "TraceControl2";
//            break;
T
ths 已提交
4514
        case 3:
4515
//            gen_helper_dmfc0_usertracedata(arg); /* PDtrace support */
T
ths 已提交
4516 4517
            rn = "UserTraceData";
//            break;
T
ths 已提交
4518
        case 4:
4519
//            gen_helper_dmfc0_tracebpc(arg); /* PDtrace support */
T
ths 已提交
4520 4521
            rn = "TraceBPC";
//            break;
T
ths 已提交
4522 4523 4524 4525 4526 4527 4528
        default:
            goto die;
        }
        break;
    case 24:
        switch (sel) {
        case 0:
T
ths 已提交
4529
            /* EJTAG support */
4530
            tcg_gen_ld_tl(arg, cpu_env, offsetof(CPUState, CP0_DEPC));
T
ths 已提交
4531 4532
            rn = "DEPC";
            break;
T
ths 已提交
4533 4534 4535 4536 4537 4538 4539
        default:
            goto die;
        }
        break;
    case 25:
        switch (sel) {
        case 0:
4540
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_Performance0));
T
ths 已提交
4541
            rn = "Performance0";
T
ths 已提交
4542 4543
            break;
        case 1:
4544
//            gen_helper_dmfc0_performance1(arg);
T
ths 已提交
4545 4546
            rn = "Performance1";
//            break;
T
ths 已提交
4547
        case 2:
4548
//            gen_helper_dmfc0_performance2(arg);
T
ths 已提交
4549 4550
            rn = "Performance2";
//            break;
T
ths 已提交
4551
        case 3:
4552
//            gen_helper_dmfc0_performance3(arg);
T
ths 已提交
4553 4554
            rn = "Performance3";
//            break;
T
ths 已提交
4555
        case 4:
4556
//            gen_helper_dmfc0_performance4(arg);
T
ths 已提交
4557 4558
            rn = "Performance4";
//            break;
T
ths 已提交
4559
        case 5:
4560
//            gen_helper_dmfc0_performance5(arg);
T
ths 已提交
4561 4562
            rn = "Performance5";
//            break;
T
ths 已提交
4563
        case 6:
4564
//            gen_helper_dmfc0_performance6(arg);
T
ths 已提交
4565 4566
            rn = "Performance6";
//            break;
T
ths 已提交
4567
        case 7:
4568
//            gen_helper_dmfc0_performance7(arg);
T
ths 已提交
4569 4570
            rn = "Performance7";
//            break;
T
ths 已提交
4571 4572 4573 4574 4575
        default:
            goto die;
        }
        break;
    case 26:
4576
        tcg_gen_movi_tl(arg, 0); /* unimplemented */
4577 4578
        rn = "ECC";
        break;
T
ths 已提交
4579 4580 4581 4582
    case 27:
        switch (sel) {
        /* ignored */
        case 0 ... 3:
4583
            tcg_gen_movi_tl(arg, 0); /* unimplemented */
T
ths 已提交
4584 4585
            rn = "CacheErr";
            break;
T
ths 已提交
4586 4587 4588 4589 4590 4591 4592 4593 4594 4595
        default:
            goto die;
        }
        break;
    case 28:
        switch (sel) {
        case 0:
        case 2:
        case 4:
        case 6:
4596
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_TagLo));
T
ths 已提交
4597 4598 4599 4600 4601 4602
            rn = "TagLo";
            break;
        case 1:
        case 3:
        case 5:
        case 7:
4603
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_DataLo));
T
ths 已提交
4604 4605 4606 4607 4608 4609 4610 4611 4612 4613 4614 4615
            rn = "DataLo";
            break;
        default:
            goto die;
        }
        break;
    case 29:
        switch (sel) {
        case 0:
        case 2:
        case 4:
        case 6:
4616
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_TagHi));
T
ths 已提交
4617 4618 4619 4620 4621 4622
            rn = "TagHi";
            break;
        case 1:
        case 3:
        case 5:
        case 7:
4623
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_DataHi));
T
ths 已提交
4624 4625 4626 4627 4628 4629 4630 4631 4632
            rn = "DataHi";
            break;
        default:
            goto die;
        }
        break;
    case 30:
        switch (sel) {
        case 0:
4633
            tcg_gen_ld_tl(arg, cpu_env, offsetof(CPUState, CP0_ErrorEPC));
T
ths 已提交
4634 4635
            rn = "ErrorEPC";
            break;
T
ths 已提交
4636 4637 4638 4639 4640 4641 4642
        default:
            goto die;
        }
        break;
    case 31:
        switch (sel) {
        case 0:
T
ths 已提交
4643
            /* EJTAG support */
4644
            gen_mfc0_load32(arg, offsetof(CPUState, CP0_DESAVE));
T
ths 已提交
4645 4646
            rn = "DESAVE";
            break;
T
ths 已提交
4647 4648 4649 4650 4651
        default:
            goto die;
        }
        break;
    default:
T
ths 已提交
4652
        goto die;
T
ths 已提交
4653
    }
4654
    LOG_DISAS("dmfc0 %s (reg %d sel %d)\n", rn, reg, sel);
T
ths 已提交
4655 4656 4657
    return;

die:
4658
    LOG_DISAS("dmfc0 %s (reg %d sel %d)\n", rn, reg, sel);
T
ths 已提交
4659 4660 4661
    generate_exception(ctx, EXCP_RI);
}

4662
static void gen_dmtc0 (CPUState *env, DisasContext *ctx, TCGv arg, int reg, int sel)
T
ths 已提交
4663 4664 4665
{
    const char *rn = "invalid";

4666 4667 4668
    if (sel != 0)
        check_insn(env, ctx, ISA_MIPS64);

P
pbrook 已提交
4669 4670 4671
    if (use_icount)
        gen_io_start();

T
ths 已提交
4672 4673 4674 4675
    switch (reg) {
    case 0:
        switch (sel) {
        case 0:
4676
            gen_helper_mtc0_index(arg);
T
ths 已提交
4677 4678 4679
            rn = "Index";
            break;
        case 1:
4680
            check_insn(env, ctx, ASE_MT);
4681
            gen_helper_mtc0_mvpcontrol(arg);
T
ths 已提交
4682
            rn = "MVPControl";
4683
            break;
T
ths 已提交
4684
        case 2:
4685
            check_insn(env, ctx, ASE_MT);
4686
            /* ignored */
T
ths 已提交
4687
            rn = "MVPConf0";
4688
            break;
T
ths 已提交
4689
        case 3:
4690
            check_insn(env, ctx, ASE_MT);
4691
            /* ignored */
T
ths 已提交
4692
            rn = "MVPConf1";
4693
            break;
T
ths 已提交
4694 4695 4696 4697 4698 4699 4700
        default:
            goto die;
        }
        break;
    case 1:
        switch (sel) {
        case 0:
T
ths 已提交
4701
            /* ignored */
T
ths 已提交
4702
            rn = "Random";
T
ths 已提交
4703
            break;
T
ths 已提交
4704
        case 1:
4705
            check_insn(env, ctx, ASE_MT);
4706
            gen_helper_mtc0_vpecontrol(arg);
T
ths 已提交
4707
            rn = "VPEControl";
4708
            break;
T
ths 已提交
4709
        case 2:
4710
            check_insn(env, ctx, ASE_MT);
4711
            gen_helper_mtc0_vpeconf0(arg);
T
ths 已提交
4712
            rn = "VPEConf0";
4713
            break;
T
ths 已提交
4714
        case 3:
4715
            check_insn(env, ctx, ASE_MT);
4716
            gen_helper_mtc0_vpeconf1(arg);
T
ths 已提交
4717
            rn = "VPEConf1";
4718
            break;
T
ths 已提交
4719
        case 4:
4720
            check_insn(env, ctx, ASE_MT);
4721
            gen_helper_mtc0_yqmask(arg);
T
ths 已提交
4722
            rn = "YQMask";
4723
            break;
T
ths 已提交
4724
        case 5:
4725
            check_insn(env, ctx, ASE_MT);
4726
            tcg_gen_st_tl(arg, cpu_env, offsetof(CPUState, CP0_VPESchedule));
T
ths 已提交
4727
            rn = "VPESchedule";
4728
            break;
T
ths 已提交
4729
        case 6:
4730
            check_insn(env, ctx, ASE_MT);
4731
            tcg_gen_st_tl(arg, cpu_env, offsetof(CPUState, CP0_VPEScheFBack));
T
ths 已提交
4732
            rn = "VPEScheFBack";
4733
            break;
T
ths 已提交
4734
        case 7:
4735
            check_insn(env, ctx, ASE_MT);
4736
            gen_helper_mtc0_vpeopt(arg);
T
ths 已提交
4737
            rn = "VPEOpt";
4738
            break;
T
ths 已提交
4739 4740 4741 4742 4743 4744 4745
        default:
            goto die;
        }
        break;
    case 2:
        switch (sel) {
        case 0:
4746
            gen_helper_mtc0_entrylo0(arg);
T
ths 已提交
4747 4748
            rn = "EntryLo0";
            break;
T
ths 已提交
4749
        case 1:
4750
            check_insn(env, ctx, ASE_MT);
4751
            gen_helper_mtc0_tcstatus(arg);
T
ths 已提交
4752
            rn = "TCStatus";
4753
            break;
T
ths 已提交
4754
        case 2:
4755
            check_insn(env, ctx, ASE_MT);
4756
            gen_helper_mtc0_tcbind(arg);
T
ths 已提交
4757
            rn = "TCBind";
4758
            break;
T
ths 已提交
4759
        case 3:
4760
            check_insn(env, ctx, ASE_MT);
4761
            gen_helper_mtc0_tcrestart(arg);
T
ths 已提交
4762
            rn = "TCRestart";
4763
            break;
T
ths 已提交
4764
        case 4:
4765
            check_insn(env, ctx, ASE_MT);
4766
            gen_helper_mtc0_tchalt(arg);
T
ths 已提交
4767
            rn = "TCHalt";
4768
            break;
T
ths 已提交
4769
        case 5:
4770
            check_insn(env, ctx, ASE_MT);
4771
            gen_helper_mtc0_tccontext(arg);
T
ths 已提交
4772
            rn = "TCContext";
4773
            break;
T
ths 已提交
4774
        case 6:
4775
            check_insn(env, ctx, ASE_MT);
4776
            gen_helper_mtc0_tcschedule(arg);
T
ths 已提交
4777
            rn = "TCSchedule";
4778
            break;
T
ths 已提交
4779
        case 7:
4780
            check_insn(env, ctx, ASE_MT);
4781
            gen_helper_mtc0_tcschefback(arg);
T
ths 已提交
4782
            rn = "TCScheFBack";
4783
            break;
T
ths 已提交
4784 4785 4786 4787 4788 4789 4790
        default:
            goto die;
        }
        break;
    case 3:
        switch (sel) {
        case 0:
4791
            gen_helper_mtc0_entrylo1(arg);
T
ths 已提交
4792 4793
            rn = "EntryLo1";
            break;
T
ths 已提交
4794 4795
        default:
            goto die;
T
ths 已提交
4796
        }
T
ths 已提交
4797 4798 4799 4800
        break;
    case 4:
        switch (sel) {
        case 0:
4801
            gen_helper_mtc0_context(arg);
T
ths 已提交
4802 4803
            rn = "Context";
            break;
T
ths 已提交
4804
        case 1:
4805
//           gen_helper_mtc0_contextconfig(arg); /* SmartMIPS ASE */
T
ths 已提交
4806 4807
            rn = "ContextConfig";
//           break;
T
ths 已提交
4808 4809
        default:
            goto die;
T
ths 已提交
4810
        }
T
ths 已提交
4811 4812 4813 4814
        break;
    case 5:
        switch (sel) {
        case 0:
4815
            gen_helper_mtc0_pagemask(arg);
T
ths 已提交
4816 4817
            rn = "PageMask";
            break;
T
ths 已提交
4818
        case 1:
4819
            check_insn(env, ctx, ISA_MIPS32R2);
4820
            gen_helper_mtc0_pagegrain(arg);
T
ths 已提交
4821 4822
            rn = "PageGrain";
            break;
T
ths 已提交
4823 4824
        default:
            goto die;
T
ths 已提交
4825
        }
T
ths 已提交
4826 4827 4828 4829
        break;
    case 6:
        switch (sel) {
        case 0:
4830
            gen_helper_mtc0_wired(arg);
T
ths 已提交
4831 4832
            rn = "Wired";
            break;
T
ths 已提交
4833
        case 1:
4834
            check_insn(env, ctx, ISA_MIPS32R2);
4835
            gen_helper_mtc0_srsconf0(arg);
T
ths 已提交
4836
            rn = "SRSConf0";
4837
            break;
T
ths 已提交
4838
        case 2:
4839
            check_insn(env, ctx, ISA_MIPS32R2);
4840
            gen_helper_mtc0_srsconf1(arg);
T
ths 已提交
4841
            rn = "SRSConf1";
4842
            break;
T
ths 已提交
4843
        case 3:
4844
            check_insn(env, ctx, ISA_MIPS32R2);
4845
            gen_helper_mtc0_srsconf2(arg);
T
ths 已提交
4846
            rn = "SRSConf2";
4847
            break;
T
ths 已提交
4848
        case 4:
4849
            check_insn(env, ctx, ISA_MIPS32R2);
4850
            gen_helper_mtc0_srsconf3(arg);
T
ths 已提交
4851
            rn = "SRSConf3";
4852
            break;
T
ths 已提交
4853
        case 5:
4854
            check_insn(env, ctx, ISA_MIPS32R2);
4855
            gen_helper_mtc0_srsconf4(arg);
T
ths 已提交
4856
            rn = "SRSConf4";
4857
            break;
T
ths 已提交
4858 4859
        default:
            goto die;
T
ths 已提交
4860
        }
T
ths 已提交
4861 4862 4863 4864
        break;
    case 7:
        switch (sel) {
        case 0:
4865
            check_insn(env, ctx, ISA_MIPS32R2);
4866
            gen_helper_mtc0_hwrena(arg);
T
ths 已提交
4867 4868
            rn = "HWREna";
            break;
T
ths 已提交
4869 4870
        default:
            goto die;
T
ths 已提交
4871
        }
T
ths 已提交
4872 4873 4874
        break;
    case 8:
        /* ignored */
T
ths 已提交
4875
        rn = "BadVAddr";
T
ths 已提交
4876 4877 4878 4879
        break;
    case 9:
        switch (sel) {
        case 0:
4880
            gen_helper_mtc0_count(arg);
T
ths 已提交
4881 4882
            rn = "Count";
            break;
T
ths 已提交
4883
        /* 6,7 are implementation dependent */
T
ths 已提交
4884 4885
        default:
            goto die;
T
ths 已提交
4886 4887 4888
        }
        /* Stop translation as we may have switched the execution mode */
        ctx->bstate = BS_STOP;
T
ths 已提交
4889 4890 4891 4892
        break;
    case 10:
        switch (sel) {
        case 0:
4893
            gen_helper_mtc0_entryhi(arg);
T
ths 已提交
4894 4895
            rn = "EntryHi";
            break;
T
ths 已提交
4896 4897
        default:
            goto die;
T
ths 已提交
4898
        }
T
ths 已提交
4899 4900 4901 4902
        break;
    case 11:
        switch (sel) {
        case 0:
4903
            gen_helper_mtc0_compare(arg);
T
ths 已提交
4904 4905
            rn = "Compare";
            break;
T
ths 已提交
4906
        /* 6,7 are implementation dependent */
T
ths 已提交
4907 4908
        default:
            goto die;
T
ths 已提交
4909
        }
4910 4911
        /* Stop translation as we may have switched the execution mode */
        ctx->bstate = BS_STOP;
T
ths 已提交
4912 4913 4914 4915
        break;
    case 12:
        switch (sel) {
        case 0:
A
aurel32 已提交
4916
            save_cpu_state(ctx, 1);
4917
            gen_helper_mtc0_status(arg);
4918 4919 4920
            /* BS_STOP isn't good enough here, hflags may have changed. */
            gen_save_pc(ctx->pc + 4);
            ctx->bstate = BS_EXCP;
T
ths 已提交
4921 4922
            rn = "Status";
            break;
T
ths 已提交
4923
        case 1:
4924
            check_insn(env, ctx, ISA_MIPS32R2);
4925
            gen_helper_mtc0_intctl(arg);
4926 4927
            /* Stop translation as we may have switched the execution mode */
            ctx->bstate = BS_STOP;
T
ths 已提交
4928 4929
            rn = "IntCtl";
            break;
T
ths 已提交
4930
        case 2:
4931
            check_insn(env, ctx, ISA_MIPS32R2);
4932
            gen_helper_mtc0_srsctl(arg);
4933 4934
            /* Stop translation as we may have switched the execution mode */
            ctx->bstate = BS_STOP;
T
ths 已提交
4935 4936
            rn = "SRSCtl";
            break;
T
ths 已提交
4937
        case 3:
4938
            check_insn(env, ctx, ISA_MIPS32R2);
4939
            gen_mtc0_store32(arg, offsetof(CPUState, CP0_SRSMap));
4940 4941
            /* Stop translation as we may have switched the execution mode */
            ctx->bstate = BS_STOP;
T
ths 已提交
4942 4943 4944
            rn = "SRSMap";
            break;
        default:
T
ths 已提交
4945
            goto die;
T
ths 已提交
4946
        }
T
ths 已提交
4947 4948 4949 4950
        break;
    case 13:
        switch (sel) {
        case 0:
A
aurel32 已提交
4951
            save_cpu_state(ctx, 1);
4952
            gen_helper_mtc0_cause(arg);
T
ths 已提交
4953 4954
            rn = "Cause";
            break;
T
ths 已提交
4955 4956
        default:
            goto die;
T
ths 已提交
4957
        }
T
ths 已提交
4958 4959 4960 4961
        break;
    case 14:
        switch (sel) {
        case 0:
4962
            tcg_gen_st_tl(arg, cpu_env, offsetof(CPUState, CP0_EPC));
T
ths 已提交
4963 4964
            rn = "EPC";
            break;
T
ths 已提交
4965 4966
        default:
            goto die;
T
ths 已提交
4967
        }
T
ths 已提交
4968 4969 4970 4971
        break;
    case 15:
        switch (sel) {
        case 0:
T
ths 已提交
4972 4973 4974
            /* ignored */
            rn = "PRid";
            break;
T
ths 已提交
4975
        case 1:
4976
            check_insn(env, ctx, ISA_MIPS32R2);
4977
            gen_helper_mtc0_ebase(arg);
T
ths 已提交
4978 4979
            rn = "EBase";
            break;
T
ths 已提交
4980 4981
        default:
            goto die;
T
ths 已提交
4982
        }
T
ths 已提交
4983 4984 4985 4986
        break;
    case 16:
        switch (sel) {
        case 0:
4987
            gen_helper_mtc0_config0(arg);
T
ths 已提交
4988
            rn = "Config";
T
ths 已提交
4989 4990
            /* Stop translation as we may have switched the execution mode */
            ctx->bstate = BS_STOP;
T
ths 已提交
4991 4992
            break;
        case 1:
A
aurel32 已提交
4993
            /* ignored, read only */
T
ths 已提交
4994 4995 4996
            rn = "Config1";
            break;
        case 2:
4997
            gen_helper_mtc0_config2(arg);
T
ths 已提交
4998
            rn = "Config2";
T
ths 已提交
4999 5000
            /* Stop translation as we may have switched the execution mode */
            ctx->bstate = BS_STOP;
T
ths 已提交
5001 5002
            break;
        case 3:
T
ths 已提交
5003
            /* ignored */
T
ths 已提交
5004 5005 5006 5007 5008 5009 5010 5011 5012 5013 5014
            rn = "Config3";
            break;
        /* 6,7 are implementation dependent */
        default:
            rn = "Invalid config selector";
            goto die;
        }
        break;
    case 17:
        switch (sel) {
        case 0:
5015
            gen_helper_mtc0_lladdr(arg);
T
ths 已提交
5016 5017
            rn = "LLAddr";
            break;
T
ths 已提交
5018 5019 5020 5021 5022 5023
        default:
            goto die;
        }
        break;
    case 18:
        switch (sel) {
5024
        case 0 ... 7:
5025
            gen_helper_1i(mtc0_watchlo, arg, sel);
T
ths 已提交
5026 5027
            rn = "WatchLo";
            break;
T
ths 已提交
5028 5029 5030 5031 5032 5033
        default:
            goto die;
        }
        break;
    case 19:
        switch (sel) {
5034
        case 0 ... 7:
5035
            gen_helper_1i(mtc0_watchhi, arg, sel);
T
ths 已提交
5036 5037
            rn = "WatchHi";
            break;
T
ths 已提交
5038 5039 5040 5041 5042 5043 5044
        default:
            goto die;
        }
        break;
    case 20:
        switch (sel) {
        case 0:
5045
            check_insn(env, ctx, ISA_MIPS3);
5046
            gen_helper_mtc0_xcontext(arg);
T
ths 已提交
5047 5048
            rn = "XContext";
            break;
T
ths 已提交
5049 5050 5051 5052 5053 5054 5055 5056
        default:
            goto die;
        }
        break;
    case 21:
       /* Officially reserved, but sel 0 is used for R1x000 framemask */
        switch (sel) {
        case 0:
5057
            gen_helper_mtc0_framemask(arg);
T
ths 已提交
5058 5059
            rn = "Framemask";
            break;
T
ths 已提交
5060 5061 5062 5063 5064 5065 5066
        default:
            goto die;
        }
        break;
    case 22:
        /* ignored */
        rn = "Diagnostic"; /* implementation dependent */
T
ths 已提交
5067
        break;
T
ths 已提交
5068 5069 5070
    case 23:
        switch (sel) {
        case 0:
5071
            gen_helper_mtc0_debug(arg); /* EJTAG support */
5072 5073 5074
            /* BS_STOP isn't good enough here, hflags may have changed. */
            gen_save_pc(ctx->pc + 4);
            ctx->bstate = BS_EXCP;
T
ths 已提交
5075 5076
            rn = "Debug";
            break;
T
ths 已提交
5077
        case 1:
5078
//            gen_helper_mtc0_tracecontrol(arg); /* PDtrace support */
5079 5080
            /* Stop translation as we may have switched the execution mode */
            ctx->bstate = BS_STOP;
T
ths 已提交
5081 5082
            rn = "TraceControl";
//            break;
T
ths 已提交
5083
        case 2:
5084
//            gen_helper_mtc0_tracecontrol2(arg); /* PDtrace support */
5085 5086
            /* Stop translation as we may have switched the execution mode */
            ctx->bstate = BS_STOP;
T
ths 已提交
5087 5088
            rn = "TraceControl2";
//            break;
T
ths 已提交
5089
        case 3:
5090
//            gen_helper_mtc0_usertracedata(arg); /* PDtrace support */
5091 5092
            /* Stop translation as we may have switched the execution mode */
            ctx->bstate = BS_STOP;
T
ths 已提交
5093 5094
            rn = "UserTraceData";
//            break;
T
ths 已提交
5095
        case 4:
5096
//            gen_helper_mtc0_tracebpc(arg); /* PDtrace support */
5097 5098
            /* Stop translation as we may have switched the execution mode */
            ctx->bstate = BS_STOP;
T
ths 已提交
5099 5100
            rn = "TraceBPC";
//            break;
T
ths 已提交
5101 5102 5103 5104 5105 5106 5107
        default:
            goto die;
        }
        break;
    case 24:
        switch (sel) {
        case 0:
5108
            /* EJTAG support */
5109
            tcg_gen_st_tl(arg, cpu_env, offsetof(CPUState, CP0_DEPC));
T
ths 已提交
5110 5111
            rn = "DEPC";
            break;
T
ths 已提交
5112 5113 5114 5115 5116 5117 5118
        default:
            goto die;
        }
        break;
    case 25:
        switch (sel) {
        case 0:
5119
            gen_helper_mtc0_performance0(arg);
T
ths 已提交
5120 5121
            rn = "Performance0";
            break;
T
ths 已提交
5122
        case 1:
5123
//            gen_helper_mtc0_performance1(arg);
T
ths 已提交
5124 5125
            rn = "Performance1";
//            break;
T
ths 已提交
5126
        case 2:
5127
//            gen_helper_mtc0_performance2(arg);
T
ths 已提交
5128 5129
            rn = "Performance2";
//            break;
T
ths 已提交
5130
        case 3:
5131
//            gen_helper_mtc0_performance3(arg);
T
ths 已提交
5132 5133
            rn = "Performance3";
//            break;
T
ths 已提交
5134
        case 4:
5135
//            gen_helper_mtc0_performance4(arg);
T
ths 已提交
5136 5137
            rn = "Performance4";
//            break;
T
ths 已提交
5138
        case 5:
5139
//            gen_helper_mtc0_performance5(arg);
T
ths 已提交
5140 5141
            rn = "Performance5";
//            break;
T
ths 已提交
5142
        case 6:
5143
//            gen_helper_mtc0_performance6(arg);
T
ths 已提交
5144 5145
            rn = "Performance6";
//            break;
T
ths 已提交
5146
        case 7:
5147
//            gen_helper_mtc0_performance7(arg);
T
ths 已提交
5148 5149
            rn = "Performance7";
//            break;
T
ths 已提交
5150 5151 5152
        default:
            goto die;
        }
T
ths 已提交
5153
        break;
T
ths 已提交
5154
    case 26:
T
ths 已提交
5155
        /* ignored */
T
ths 已提交
5156
        rn = "ECC";
T
ths 已提交
5157
        break;
T
ths 已提交
5158 5159 5160
    case 27:
        switch (sel) {
        case 0 ... 3:
T
ths 已提交
5161 5162 5163
            /* ignored */
            rn = "CacheErr";
            break;
T
ths 已提交
5164 5165 5166
        default:
            goto die;
        }
T
ths 已提交
5167
        break;
T
ths 已提交
5168 5169 5170 5171 5172 5173
    case 28:
        switch (sel) {
        case 0:
        case 2:
        case 4:
        case 6:
5174
            gen_helper_mtc0_taglo(arg);
T
ths 已提交
5175 5176 5177 5178 5179 5180
            rn = "TagLo";
            break;
        case 1:
        case 3:
        case 5:
        case 7:
5181
            gen_helper_mtc0_datalo(arg);
T
ths 已提交
5182 5183 5184 5185 5186 5187 5188 5189 5190 5191 5192 5193
            rn = "DataLo";
            break;
        default:
            goto die;
        }
        break;
    case 29:
        switch (sel) {
        case 0:
        case 2:
        case 4:
        case 6:
5194
            gen_helper_mtc0_taghi(arg);
T
ths 已提交
5195 5196 5197 5198 5199 5200
            rn = "TagHi";
            break;
        case 1:
        case 3:
        case 5:
        case 7:
5201
            gen_helper_mtc0_datahi(arg);
T
ths 已提交
5202 5203 5204 5205 5206 5207
            rn = "DataHi";
            break;
        default:
            rn = "invalid sel";
            goto die;
        }
T
ths 已提交
5208
        break;
T
ths 已提交
5209 5210 5211
    case 30:
        switch (sel) {
        case 0:
5212
            tcg_gen_st_tl(arg, cpu_env, offsetof(CPUState, CP0_ErrorEPC));
T
ths 已提交
5213 5214
            rn = "ErrorEPC";
            break;
T
ths 已提交
5215 5216 5217 5218 5219 5220 5221
        default:
            goto die;
        }
        break;
    case 31:
        switch (sel) {
        case 0:
5222
            /* EJTAG support */
5223
            gen_mtc0_store32(arg, offsetof(CPUState, CP0_DESAVE));
T
ths 已提交
5224 5225
            rn = "DESAVE";
            break;
T
ths 已提交
5226 5227 5228
        default:
            goto die;
        }
T
ths 已提交
5229 5230
        /* Stop translation as we may have switched the execution mode */
        ctx->bstate = BS_STOP;
T
ths 已提交
5231 5232
        break;
    default:
T
ths 已提交
5233
        goto die;
T
ths 已提交
5234
    }
5235
    LOG_DISAS("dmtc0 %s (reg %d sel %d)\n", rn, reg, sel);
T
ths 已提交
5236
    /* For simplicity assume that all writes can cause interrupts.  */
P
pbrook 已提交
5237 5238 5239 5240
    if (use_icount) {
        gen_io_end();
        ctx->bstate = BS_STOP;
    }
T
ths 已提交
5241 5242 5243
    return;

die:
5244
    LOG_DISAS("dmtc0 %s (reg %d sel %d)\n", rn, reg, sel);
T
ths 已提交
5245 5246
    generate_exception(ctx, EXCP_RI);
}
5247
#endif /* TARGET_MIPS64 */
T
ths 已提交
5248

5249
static void gen_mftr(CPUState *env, DisasContext *ctx, int rt, int rd,
5250 5251 5252
                     int u, int sel, int h)
{
    int other_tc = env->CP0_VPEControl & (0xff << CP0VPECo_TargTC);
P
pbrook 已提交
5253
    TCGv t0 = tcg_temp_local_new();
5254 5255

    if ((env->CP0_VPEConf0 & (1 << CP0VPEC0_MVP)) == 0 &&
5256 5257
        ((env->tcs[other_tc].CP0_TCBind & (0xf << CP0TCBd_CurVPE)) !=
         (env->active_tc.CP0_TCBind & (0xf << CP0TCBd_CurVPE))))
5258
        tcg_gen_movi_tl(t0, -1);
5259 5260
    else if ((env->CP0_VPEControl & (0xff << CP0VPECo_TargTC)) >
             (env->mvp->CP0_MVPConf0 & (0xff << CP0MVPC0_PTC)))
5261
        tcg_gen_movi_tl(t0, -1);
5262 5263 5264 5265 5266
    else if (u == 0) {
        switch (rt) {
        case 2:
            switch (sel) {
            case 1:
P
pbrook 已提交
5267
                gen_helper_mftc0_tcstatus(t0);
5268 5269
                break;
            case 2:
P
pbrook 已提交
5270
                gen_helper_mftc0_tcbind(t0);
5271 5272
                break;
            case 3:
P
pbrook 已提交
5273
                gen_helper_mftc0_tcrestart(t0);
5274 5275
                break;
            case 4:
P
pbrook 已提交
5276
                gen_helper_mftc0_tchalt(t0);
5277 5278
                break;
            case 5:
P
pbrook 已提交
5279
                gen_helper_mftc0_tccontext(t0);
5280 5281
                break;
            case 6:
P
pbrook 已提交
5282
                gen_helper_mftc0_tcschedule(t0);
5283 5284
                break;
            case 7:
P
pbrook 已提交
5285
                gen_helper_mftc0_tcschefback(t0);
5286 5287
                break;
            default:
5288
                gen_mfc0(env, ctx, t0, rt, sel);
5289 5290 5291 5292 5293 5294
                break;
            }
            break;
        case 10:
            switch (sel) {
            case 0:
P
pbrook 已提交
5295
                gen_helper_mftc0_entryhi(t0);
5296 5297
                break;
            default:
5298
                gen_mfc0(env, ctx, t0, rt, sel);
5299 5300 5301 5302 5303
                break;
            }
        case 12:
            switch (sel) {
            case 0:
P
pbrook 已提交
5304
                gen_helper_mftc0_status(t0);
5305 5306
                break;
            default:
5307
                gen_mfc0(env, ctx, t0, rt, sel);
5308 5309 5310 5311 5312
                break;
            }
        case 23:
            switch (sel) {
            case 0:
P
pbrook 已提交
5313
                gen_helper_mftc0_debug(t0);
5314 5315
                break;
            default:
5316
                gen_mfc0(env, ctx, t0, rt, sel);
5317 5318 5319 5320
                break;
            }
            break;
        default:
5321
            gen_mfc0(env, ctx, t0, rt, sel);
5322 5323 5324 5325
        }
    } else switch (sel) {
    /* GPR registers. */
    case 0:
P
pbrook 已提交
5326
        gen_helper_1i(mftgpr, t0, rt);
5327 5328 5329 5330 5331
        break;
    /* Auxiliary CPU registers */
    case 1:
        switch (rt) {
        case 0:
P
pbrook 已提交
5332
            gen_helper_1i(mftlo, t0, 0);
5333 5334
            break;
        case 1:
P
pbrook 已提交
5335
            gen_helper_1i(mfthi, t0, 0);
5336 5337
            break;
        case 2:
P
pbrook 已提交
5338
            gen_helper_1i(mftacx, t0, 0);
5339 5340
            break;
        case 4:
P
pbrook 已提交
5341
            gen_helper_1i(mftlo, t0, 1);
5342 5343
            break;
        case 5:
P
pbrook 已提交
5344
            gen_helper_1i(mfthi, t0, 1);
5345 5346
            break;
        case 6:
P
pbrook 已提交
5347
            gen_helper_1i(mftacx, t0, 1);
5348 5349
            break;
        case 8:
P
pbrook 已提交
5350
            gen_helper_1i(mftlo, t0, 2);
5351 5352
            break;
        case 9:
P
pbrook 已提交
5353
            gen_helper_1i(mfthi, t0, 2);
5354 5355
            break;
        case 10:
P
pbrook 已提交
5356
            gen_helper_1i(mftacx, t0, 2);
5357 5358
            break;
        case 12:
P
pbrook 已提交
5359
            gen_helper_1i(mftlo, t0, 3);
5360 5361
            break;
        case 13:
P
pbrook 已提交
5362
            gen_helper_1i(mfthi, t0, 3);
5363 5364
            break;
        case 14:
P
pbrook 已提交
5365
            gen_helper_1i(mftacx, t0, 3);
5366 5367
            break;
        case 16:
P
pbrook 已提交
5368
            gen_helper_mftdsp(t0);
5369 5370 5371 5372 5373 5374 5375 5376 5377
            break;
        default:
            goto die;
        }
        break;
    /* Floating point (COP1). */
    case 2:
        /* XXX: For now we support only a single FPU context. */
        if (h == 0) {
P
pbrook 已提交
5378
            TCGv_i32 fp0 = tcg_temp_new_i32();
5379 5380 5381

            gen_load_fpr32(fp0, rt);
            tcg_gen_ext_i32_tl(t0, fp0);
P
pbrook 已提交
5382
            tcg_temp_free_i32(fp0);
5383
        } else {
P
pbrook 已提交
5384
            TCGv_i32 fp0 = tcg_temp_new_i32();
5385 5386 5387

            gen_load_fpr32h(fp0, rt);
            tcg_gen_ext_i32_tl(t0, fp0);
P
pbrook 已提交
5388
            tcg_temp_free_i32(fp0);
5389 5390 5391 5392
        }
        break;
    case 3:
        /* XXX: For now we support only a single FPU context. */
P
pbrook 已提交
5393
        gen_helper_1i(cfc1, t0, rt);
5394 5395 5396 5397 5398 5399 5400 5401
        break;
    /* COP2: Not implemented. */
    case 4:
    case 5:
        /* fall through */
    default:
        goto die;
    }
5402
    LOG_DISAS("mftr (reg %d u %d sel %d h %d)\n", rt, u, sel, h);
5403 5404
    gen_store_gpr(t0, rd);
    tcg_temp_free(t0);
5405 5406 5407
    return;

die:
5408
    tcg_temp_free(t0);
5409
    LOG_DISAS("mftr (reg %d u %d sel %d h %d)\n", rt, u, sel, h);
5410 5411 5412
    generate_exception(ctx, EXCP_RI);
}

5413
static void gen_mttr(CPUState *env, DisasContext *ctx, int rd, int rt,
5414 5415 5416
                     int u, int sel, int h)
{
    int other_tc = env->CP0_VPEControl & (0xff << CP0VPECo_TargTC);
P
pbrook 已提交
5417
    TCGv t0 = tcg_temp_local_new();
5418

5419
    gen_load_gpr(t0, rt);
5420
    if ((env->CP0_VPEConf0 & (1 << CP0VPEC0_MVP)) == 0 &&
5421 5422
        ((env->tcs[other_tc].CP0_TCBind & (0xf << CP0TCBd_CurVPE)) !=
         (env->active_tc.CP0_TCBind & (0xf << CP0TCBd_CurVPE))))
5423 5424 5425 5426 5427 5428 5429 5430 5431
        /* NOP */ ;
    else if ((env->CP0_VPEControl & (0xff << CP0VPECo_TargTC)) >
             (env->mvp->CP0_MVPConf0 & (0xff << CP0MVPC0_PTC)))
        /* NOP */ ;
    else if (u == 0) {
        switch (rd) {
        case 2:
            switch (sel) {
            case 1:
P
pbrook 已提交
5432
                gen_helper_mttc0_tcstatus(t0);
5433 5434
                break;
            case 2:
P
pbrook 已提交
5435
                gen_helper_mttc0_tcbind(t0);
5436 5437
                break;
            case 3:
P
pbrook 已提交
5438
                gen_helper_mttc0_tcrestart(t0);
5439 5440
                break;
            case 4:
P
pbrook 已提交
5441
                gen_helper_mttc0_tchalt(t0);
5442 5443
                break;
            case 5:
P
pbrook 已提交
5444
                gen_helper_mttc0_tccontext(t0);
5445 5446
                break;
            case 6:
P
pbrook 已提交
5447
                gen_helper_mttc0_tcschedule(t0);
5448 5449
                break;
            case 7:
P
pbrook 已提交
5450
                gen_helper_mttc0_tcschefback(t0);
5451 5452
                break;
            default:
5453
                gen_mtc0(env, ctx, t0, rd, sel);
5454 5455 5456 5457 5458 5459
                break;
            }
            break;
        case 10:
            switch (sel) {
            case 0:
P
pbrook 已提交
5460
                gen_helper_mttc0_entryhi(t0);
5461 5462
                break;
            default:
5463
                gen_mtc0(env, ctx, t0, rd, sel);
5464 5465 5466 5467 5468
                break;
            }
        case 12:
            switch (sel) {
            case 0:
P
pbrook 已提交
5469
                gen_helper_mttc0_status(t0);
5470 5471
                break;
            default:
5472
                gen_mtc0(env, ctx, t0, rd, sel);
5473 5474 5475 5476 5477
                break;
            }
        case 23:
            switch (sel) {
            case 0:
P
pbrook 已提交
5478
                gen_helper_mttc0_debug(t0);
5479 5480
                break;
            default:
5481
                gen_mtc0(env, ctx, t0, rd, sel);
5482 5483 5484 5485
                break;
            }
            break;
        default:
5486
            gen_mtc0(env, ctx, t0, rd, sel);
5487 5488 5489 5490
        }
    } else switch (sel) {
    /* GPR registers. */
    case 0:
P
pbrook 已提交
5491
        gen_helper_1i(mttgpr, t0, rd);
5492 5493 5494 5495 5496
        break;
    /* Auxiliary CPU registers */
    case 1:
        switch (rd) {
        case 0:
P
pbrook 已提交
5497
            gen_helper_1i(mttlo, t0, 0);
5498 5499
            break;
        case 1:
P
pbrook 已提交
5500
            gen_helper_1i(mtthi, t0, 0);
5501 5502
            break;
        case 2:
P
pbrook 已提交
5503
            gen_helper_1i(mttacx, t0, 0);
5504 5505
            break;
        case 4:
P
pbrook 已提交
5506
            gen_helper_1i(mttlo, t0, 1);
5507 5508
            break;
        case 5:
P
pbrook 已提交
5509
            gen_helper_1i(mtthi, t0, 1);
5510 5511
            break;
        case 6:
P
pbrook 已提交
5512
            gen_helper_1i(mttacx, t0, 1);
5513 5514
            break;
        case 8:
P
pbrook 已提交
5515
            gen_helper_1i(mttlo, t0, 2);
5516 5517
            break;
        case 9:
P
pbrook 已提交
5518
            gen_helper_1i(mtthi, t0, 2);
5519 5520
            break;
        case 10:
P
pbrook 已提交
5521
            gen_helper_1i(mttacx, t0, 2);
5522 5523
            break;
        case 12:
P
pbrook 已提交
5524
            gen_helper_1i(mttlo, t0, 3);
5525 5526
            break;
        case 13:
P
pbrook 已提交
5527
            gen_helper_1i(mtthi, t0, 3);
5528 5529
            break;
        case 14:
P
pbrook 已提交
5530
            gen_helper_1i(mttacx, t0, 3);
5531 5532
            break;
        case 16:
P
pbrook 已提交
5533
            gen_helper_mttdsp(t0);
5534 5535 5536 5537 5538 5539 5540 5541 5542
            break;
        default:
            goto die;
        }
        break;
    /* Floating point (COP1). */
    case 2:
        /* XXX: For now we support only a single FPU context. */
        if (h == 0) {
P
pbrook 已提交
5543
            TCGv_i32 fp0 = tcg_temp_new_i32();
5544 5545 5546

            tcg_gen_trunc_tl_i32(fp0, t0);
            gen_store_fpr32(fp0, rd);
P
pbrook 已提交
5547
            tcg_temp_free_i32(fp0);
5548
        } else {
P
pbrook 已提交
5549
            TCGv_i32 fp0 = tcg_temp_new_i32();
5550 5551 5552

            tcg_gen_trunc_tl_i32(fp0, t0);
            gen_store_fpr32h(fp0, rd);
P
pbrook 已提交
5553
            tcg_temp_free_i32(fp0);
5554 5555 5556 5557
        }
        break;
    case 3:
        /* XXX: For now we support only a single FPU context. */
P
pbrook 已提交
5558
        gen_helper_1i(ctc1, t0, rd);
5559 5560 5561 5562 5563 5564 5565 5566
        break;
    /* COP2: Not implemented. */
    case 4:
    case 5:
        /* fall through */
    default:
        goto die;
    }
5567
    LOG_DISAS("mttr (reg %d u %d sel %d h %d)\n", rd, u, sel, h);
5568
    tcg_temp_free(t0);
5569 5570 5571
    return;

die:
5572
    tcg_temp_free(t0);
5573
    LOG_DISAS("mttr (reg %d u %d sel %d h %d)\n", rd, u, sel, h);
5574 5575 5576
    generate_exception(ctx, EXCP_RI);
}

5577
static void gen_cp0 (CPUState *env, DisasContext *ctx, uint32_t opc, int rt, int rd)
B
bellard 已提交
5578
{
T
ths 已提交
5579
    const char *opn = "ldst";
B
bellard 已提交
5580 5581 5582 5583

    switch (opc) {
    case OPC_MFC0:
        if (rt == 0) {
5584
            /* Treat as NOP. */
B
bellard 已提交
5585 5586
            return;
        }
A
aurel32 已提交
5587
        gen_mfc0(env, ctx, cpu_gpr[rt], rd, ctx->opcode & 0x7);
B
bellard 已提交
5588 5589 5590
        opn = "mfc0";
        break;
    case OPC_MTC0:
5591
        {
A
aurel32 已提交
5592
            TCGv t0 = tcg_temp_new();
5593 5594 5595 5596 5597

            gen_load_gpr(t0, rt);
            gen_mtc0(env, ctx, t0, rd, ctx->opcode & 0x7);
            tcg_temp_free(t0);
        }
B
bellard 已提交
5598 5599
        opn = "mtc0";
        break;
5600
#if defined(TARGET_MIPS64)
T
ths 已提交
5601
    case OPC_DMFC0:
5602
        check_insn(env, ctx, ISA_MIPS3);
T
ths 已提交
5603
        if (rt == 0) {
5604
            /* Treat as NOP. */
T
ths 已提交
5605 5606
            return;
        }
A
aurel32 已提交
5607
        gen_dmfc0(env, ctx, cpu_gpr[rt], rd, ctx->opcode & 0x7);
T
ths 已提交
5608 5609 5610
        opn = "dmfc0";
        break;
    case OPC_DMTC0:
5611
        check_insn(env, ctx, ISA_MIPS3);
5612
        {
A
aurel32 已提交
5613
            TCGv t0 = tcg_temp_new();
5614 5615 5616 5617 5618

            gen_load_gpr(t0, rt);
            gen_dmtc0(env, ctx, t0, rd, ctx->opcode & 0x7);
            tcg_temp_free(t0);
        }
T
ths 已提交
5619 5620
        opn = "dmtc0";
        break;
5621
#endif
5622
    case OPC_MFTR:
5623
        check_insn(env, ctx, ASE_MT);
5624 5625 5626 5627
        if (rd == 0) {
            /* Treat as NOP. */
            return;
        }
5628
        gen_mftr(env, ctx, rt, rd, (ctx->opcode >> 5) & 1,
5629 5630 5631 5632
                 ctx->opcode & 0x7, (ctx->opcode >> 4) & 1);
        opn = "mftr";
        break;
    case OPC_MTTR:
5633
        check_insn(env, ctx, ASE_MT);
5634
        gen_mttr(env, ctx, rd, rt, (ctx->opcode >> 5) & 1,
5635 5636 5637
                 ctx->opcode & 0x7, (ctx->opcode >> 4) & 1);
        opn = "mttr";
        break;
B
bellard 已提交
5638 5639
    case OPC_TLBWI:
        opn = "tlbwi";
5640
        if (!env->tlb->helper_tlbwi)
5641
            goto die;
P
pbrook 已提交
5642
        gen_helper_tlbwi();
B
bellard 已提交
5643 5644 5645
        break;
    case OPC_TLBWR:
        opn = "tlbwr";
5646
        if (!env->tlb->helper_tlbwr)
5647
            goto die;
P
pbrook 已提交
5648
        gen_helper_tlbwr();
B
bellard 已提交
5649 5650 5651
        break;
    case OPC_TLBP:
        opn = "tlbp";
5652
        if (!env->tlb->helper_tlbp)
5653
            goto die;
P
pbrook 已提交
5654
        gen_helper_tlbp();
B
bellard 已提交
5655 5656 5657
        break;
    case OPC_TLBR:
        opn = "tlbr";
5658
        if (!env->tlb->helper_tlbr)
5659
            goto die;
P
pbrook 已提交
5660
        gen_helper_tlbr();
B
bellard 已提交
5661 5662 5663
        break;
    case OPC_ERET:
        opn = "eret";
5664
        check_insn(env, ctx, ISA_MIPS2);
P
pbrook 已提交
5665
        gen_helper_eret();
B
bellard 已提交
5666 5667 5668 5669
        ctx->bstate = BS_EXCP;
        break;
    case OPC_DERET:
        opn = "deret";
5670
        check_insn(env, ctx, ISA_MIPS32);
B
bellard 已提交
5671
        if (!(ctx->hflags & MIPS_HFLAG_DM)) {
5672
            MIPS_INVAL(opn);
B
bellard 已提交
5673 5674
            generate_exception(ctx, EXCP_RI);
        } else {
P
pbrook 已提交
5675
            gen_helper_deret();
B
bellard 已提交
5676 5677 5678
            ctx->bstate = BS_EXCP;
        }
        break;
B
bellard 已提交
5679 5680
    case OPC_WAIT:
        opn = "wait";
5681
        check_insn(env, ctx, ISA_MIPS3 | ISA_MIPS32);
B
bellard 已提交
5682 5683 5684 5685
        /* If we get an exception, we want to restart at next instruction */
        ctx->pc += 4;
        save_cpu_state(ctx, 1);
        ctx->pc -= 4;
P
pbrook 已提交
5686
        gen_helper_wait();
B
bellard 已提交
5687 5688
        ctx->bstate = BS_EXCP;
        break;
B
bellard 已提交
5689
    default:
5690
 die:
5691
        MIPS_INVAL(opn);
B
bellard 已提交
5692 5693 5694 5695 5696
        generate_exception(ctx, EXCP_RI);
        return;
    }
    MIPS_DEBUG("%s %s %d", opn, regnames[rt], rd);
}
5697
#endif /* !CONFIG_USER_ONLY */
B
bellard 已提交
5698

B
bellard 已提交
5699
/* CP1 Branches (before delay slot) */
5700
static void gen_compute_branch1 (CPUState *env, DisasContext *ctx, uint32_t op,
5701
                                 int32_t cc, int32_t offset)
B
bellard 已提交
5702 5703
{
    target_ulong btarget;
5704
    const char *opn = "cp1 cond branch";
P
pbrook 已提交
5705
    TCGv_i32 t0 = tcg_temp_new_i32();
B
bellard 已提交
5706

5707 5708 5709
    if (cc != 0)
        check_insn(env, ctx, ISA_MIPS4 | ISA_MIPS32);

B
bellard 已提交
5710 5711
    btarget = ctx->pc + 4 + offset;

5712 5713
    switch (op) {
    case OPC_BC1F:
5714 5715 5716 5717
        tcg_gen_shri_i32(t0, fpu_fcr31, get_fp_bit(cc));
        tcg_gen_not_i32(t0, t0);
        tcg_gen_andi_i32(t0, t0, 1);
        tcg_gen_extu_i32_tl(bcond, t0);
5718
        opn = "bc1f";
B
bellard 已提交
5719
        goto not_likely;
5720
    case OPC_BC1FL:
5721 5722 5723 5724
        tcg_gen_shri_i32(t0, fpu_fcr31, get_fp_bit(cc));
        tcg_gen_not_i32(t0, t0);
        tcg_gen_andi_i32(t0, t0, 1);
        tcg_gen_extu_i32_tl(bcond, t0);
5725
        opn = "bc1fl";
B
bellard 已提交
5726
        goto likely;
5727
    case OPC_BC1T:
5728 5729 5730
        tcg_gen_shri_i32(t0, fpu_fcr31, get_fp_bit(cc));
        tcg_gen_andi_i32(t0, t0, 1);
        tcg_gen_extu_i32_tl(bcond, t0);
5731
        opn = "bc1t";
5732
        goto not_likely;
5733
    case OPC_BC1TL:
5734 5735 5736
        tcg_gen_shri_i32(t0, fpu_fcr31, get_fp_bit(cc));
        tcg_gen_andi_i32(t0, t0, 1);
        tcg_gen_extu_i32_tl(bcond, t0);
5737
        opn = "bc1tl";
B
bellard 已提交
5738 5739 5740
    likely:
        ctx->hflags |= MIPS_HFLAG_BL;
        break;
5741
    case OPC_BC1FANY2:
5742
        {
5743 5744 5745
            TCGv_i32 t1 = tcg_temp_new_i32();
            tcg_gen_shri_i32(t0, fpu_fcr31, get_fp_bit(cc));
            tcg_gen_shri_i32(t1, fpu_fcr31, get_fp_bit(cc+1));
5746
            tcg_gen_nor_i32(t0, t0, t1);
5747 5748 5749
            tcg_temp_free_i32(t1);
            tcg_gen_andi_i32(t0, t0, 1);
            tcg_gen_extu_i32_tl(bcond, t0);
5750
        }
5751
        opn = "bc1any2f";
5752 5753
        goto not_likely;
    case OPC_BC1TANY2:
5754
        {
5755 5756 5757 5758 5759 5760 5761
            TCGv_i32 t1 = tcg_temp_new_i32();
            tcg_gen_shri_i32(t0, fpu_fcr31, get_fp_bit(cc));
            tcg_gen_shri_i32(t1, fpu_fcr31, get_fp_bit(cc+1));
            tcg_gen_or_i32(t0, t0, t1);
            tcg_temp_free_i32(t1);
            tcg_gen_andi_i32(t0, t0, 1);
            tcg_gen_extu_i32_tl(bcond, t0);
5762
        }
5763
        opn = "bc1any2t";
5764 5765
        goto not_likely;
    case OPC_BC1FANY4:
5766
        {
5767 5768 5769 5770 5771 5772 5773
            TCGv_i32 t1 = tcg_temp_new_i32();
            tcg_gen_shri_i32(t0, fpu_fcr31, get_fp_bit(cc));
            tcg_gen_shri_i32(t1, fpu_fcr31, get_fp_bit(cc+1));
            tcg_gen_or_i32(t0, t0, t1);
            tcg_gen_shri_i32(t1, fpu_fcr31, get_fp_bit(cc+2));
            tcg_gen_or_i32(t0, t0, t1);
            tcg_gen_shri_i32(t1, fpu_fcr31, get_fp_bit(cc+3));
5774
            tcg_gen_nor_i32(t0, t0, t1);
5775 5776 5777
            tcg_temp_free_i32(t1);
            tcg_gen_andi_i32(t0, t0, 1);
            tcg_gen_extu_i32_tl(bcond, t0);
5778
        }
5779
        opn = "bc1any4f";
5780 5781
        goto not_likely;
    case OPC_BC1TANY4:
5782
        {
5783 5784 5785 5786 5787 5788 5789 5790 5791 5792 5793
            TCGv_i32 t1 = tcg_temp_new_i32();
            tcg_gen_shri_i32(t0, fpu_fcr31, get_fp_bit(cc));
            tcg_gen_shri_i32(t1, fpu_fcr31, get_fp_bit(cc+1));
            tcg_gen_or_i32(t0, t0, t1);
            tcg_gen_shri_i32(t1, fpu_fcr31, get_fp_bit(cc+2));
            tcg_gen_or_i32(t0, t0, t1);
            tcg_gen_shri_i32(t1, fpu_fcr31, get_fp_bit(cc+3));
            tcg_gen_or_i32(t0, t0, t1);
            tcg_temp_free_i32(t1);
            tcg_gen_andi_i32(t0, t0, 1);
            tcg_gen_extu_i32_tl(bcond, t0);
5794
        }
5795
        opn = "bc1any4t";
5796 5797 5798 5799
    not_likely:
        ctx->hflags |= MIPS_HFLAG_BC;
        break;
    default:
5800
        MIPS_INVAL(opn);
5801
        generate_exception (ctx, EXCP_RI);
5802
        goto out;
B
bellard 已提交
5803
    }
5804
    MIPS_DEBUG("%s: cond %02x target " TARGET_FMT_lx, opn,
B
bellard 已提交
5805 5806
               ctx->hflags, btarget);
    ctx->btarget = btarget;
5807 5808

 out:
P
pbrook 已提交
5809
    tcg_temp_free_i32(t0);
B
bellard 已提交
5810 5811
}

B
bellard 已提交
5812
/* Coprocessor 1 (FPU) */
5813 5814 5815

#define FOP(func, fmt) (((fmt) << 21) | (func))

5816 5817 5818 5819 5820 5821 5822 5823 5824 5825 5826 5827 5828 5829 5830 5831 5832 5833 5834 5835 5836 5837 5838 5839 5840 5841 5842 5843 5844 5845 5846 5847 5848 5849 5850 5851 5852 5853 5854 5855 5856 5857 5858 5859 5860 5861 5862 5863 5864 5865 5866 5867 5868 5869 5870 5871 5872 5873 5874 5875 5876 5877 5878 5879 5880 5881 5882 5883 5884 5885 5886 5887 5888 5889 5890 5891 5892 5893 5894 5895 5896 5897 5898 5899 5900 5901 5902 5903 5904 5905 5906 5907 5908 5909 5910 5911 5912 5913 5914 5915 5916 5917 5918 5919 5920 5921 5922 5923 5924 5925 5926 5927 5928 5929 5930 5931 5932 5933 5934 5935 5936 5937 5938 5939 5940 5941 5942 5943 5944 5945 5946 5947 5948 5949 5950 5951 5952 5953 5954 5955
enum fopcode {
    OPC_ADD_S = FOP(0, FMT_S),
    OPC_SUB_S = FOP(1, FMT_S),
    OPC_MUL_S = FOP(2, FMT_S),
    OPC_DIV_S = FOP(3, FMT_S),
    OPC_SQRT_S = FOP(4, FMT_S),
    OPC_ABS_S = FOP(5, FMT_S),
    OPC_MOV_S = FOP(6, FMT_S),
    OPC_NEG_S = FOP(7, FMT_S),
    OPC_ROUND_L_S = FOP(8, FMT_S),
    OPC_TRUNC_L_S = FOP(9, FMT_S),
    OPC_CEIL_L_S = FOP(10, FMT_S),
    OPC_FLOOR_L_S = FOP(11, FMT_S),
    OPC_ROUND_W_S = FOP(12, FMT_S),
    OPC_TRUNC_W_S = FOP(13, FMT_S),
    OPC_CEIL_W_S = FOP(14, FMT_S),
    OPC_FLOOR_W_S = FOP(15, FMT_S),
    OPC_MOVCF_S = FOP(17, FMT_S),
    OPC_MOVZ_S = FOP(18, FMT_S),
    OPC_MOVN_S = FOP(19, FMT_S),
    OPC_RECIP_S = FOP(21, FMT_S),
    OPC_RSQRT_S = FOP(22, FMT_S),
    OPC_RECIP2_S = FOP(28, FMT_S),
    OPC_RECIP1_S = FOP(29, FMT_S),
    OPC_RSQRT1_S = FOP(30, FMT_S),
    OPC_RSQRT2_S = FOP(31, FMT_S),
    OPC_CVT_D_S = FOP(33, FMT_S),
    OPC_CVT_W_S = FOP(36, FMT_S),
    OPC_CVT_L_S = FOP(37, FMT_S),
    OPC_CVT_PS_S = FOP(38, FMT_S),
    OPC_CMP_F_S = FOP (48, FMT_S),
    OPC_CMP_UN_S = FOP (49, FMT_S),
    OPC_CMP_EQ_S = FOP (50, FMT_S),
    OPC_CMP_UEQ_S = FOP (51, FMT_S),
    OPC_CMP_OLT_S = FOP (52, FMT_S),
    OPC_CMP_ULT_S = FOP (53, FMT_S),
    OPC_CMP_OLE_S = FOP (54, FMT_S),
    OPC_CMP_ULE_S = FOP (55, FMT_S),
    OPC_CMP_SF_S = FOP (56, FMT_S),
    OPC_CMP_NGLE_S = FOP (57, FMT_S),
    OPC_CMP_SEQ_S = FOP (58, FMT_S),
    OPC_CMP_NGL_S = FOP (59, FMT_S),
    OPC_CMP_LT_S = FOP (60, FMT_S),
    OPC_CMP_NGE_S = FOP (61, FMT_S),
    OPC_CMP_LE_S = FOP (62, FMT_S),
    OPC_CMP_NGT_S = FOP (63, FMT_S),

    OPC_ADD_D = FOP(0, FMT_D),
    OPC_SUB_D = FOP(1, FMT_D),
    OPC_MUL_D = FOP(2, FMT_D),
    OPC_DIV_D = FOP(3, FMT_D),
    OPC_SQRT_D = FOP(4, FMT_D),
    OPC_ABS_D = FOP(5, FMT_D),
    OPC_MOV_D = FOP(6, FMT_D),
    OPC_NEG_D = FOP(7, FMT_D),
    OPC_ROUND_L_D = FOP(8, FMT_D),
    OPC_TRUNC_L_D = FOP(9, FMT_D),
    OPC_CEIL_L_D = FOP(10, FMT_D),
    OPC_FLOOR_L_D = FOP(11, FMT_D),
    OPC_ROUND_W_D = FOP(12, FMT_D),
    OPC_TRUNC_W_D = FOP(13, FMT_D),
    OPC_CEIL_W_D = FOP(14, FMT_D),
    OPC_FLOOR_W_D = FOP(15, FMT_D),
    OPC_MOVCF_D = FOP(17, FMT_D),
    OPC_MOVZ_D = FOP(18, FMT_D),
    OPC_MOVN_D = FOP(19, FMT_D),
    OPC_RECIP_D = FOP(21, FMT_D),
    OPC_RSQRT_D = FOP(22, FMT_D),
    OPC_RECIP2_D = FOP(28, FMT_D),
    OPC_RECIP1_D = FOP(29, FMT_D),
    OPC_RSQRT1_D = FOP(30, FMT_D),
    OPC_RSQRT2_D = FOP(31, FMT_D),
    OPC_CVT_S_D = FOP(32, FMT_D),
    OPC_CVT_W_D = FOP(36, FMT_D),
    OPC_CVT_L_D = FOP(37, FMT_D),
    OPC_CMP_F_D = FOP (48, FMT_D),
    OPC_CMP_UN_D = FOP (49, FMT_D),
    OPC_CMP_EQ_D = FOP (50, FMT_D),
    OPC_CMP_UEQ_D = FOP (51, FMT_D),
    OPC_CMP_OLT_D = FOP (52, FMT_D),
    OPC_CMP_ULT_D = FOP (53, FMT_D),
    OPC_CMP_OLE_D = FOP (54, FMT_D),
    OPC_CMP_ULE_D = FOP (55, FMT_D),
    OPC_CMP_SF_D = FOP (56, FMT_D),
    OPC_CMP_NGLE_D = FOP (57, FMT_D),
    OPC_CMP_SEQ_D = FOP (58, FMT_D),
    OPC_CMP_NGL_D = FOP (59, FMT_D),
    OPC_CMP_LT_D = FOP (60, FMT_D),
    OPC_CMP_NGE_D = FOP (61, FMT_D),
    OPC_CMP_LE_D = FOP (62, FMT_D),
    OPC_CMP_NGT_D = FOP (63, FMT_D),

    OPC_CVT_S_W = FOP(32, FMT_W),
    OPC_CVT_D_W = FOP(33, FMT_W),
    OPC_CVT_S_L = FOP(32, FMT_L),
    OPC_CVT_D_L = FOP(33, FMT_L),
    OPC_CVT_PS_PW = FOP(38, FMT_W),

    OPC_ADD_PS = FOP(0, FMT_PS),
    OPC_SUB_PS = FOP(1, FMT_PS),
    OPC_MUL_PS = FOP(2, FMT_PS),
    OPC_DIV_PS = FOP(3, FMT_PS),
    OPC_ABS_PS = FOP(5, FMT_PS),
    OPC_MOV_PS = FOP(6, FMT_PS),
    OPC_NEG_PS = FOP(7, FMT_PS),
    OPC_MOVCF_PS = FOP(17, FMT_PS),
    OPC_MOVZ_PS = FOP(18, FMT_PS),
    OPC_MOVN_PS = FOP(19, FMT_PS),
    OPC_ADDR_PS = FOP(24, FMT_PS),
    OPC_MULR_PS = FOP(26, FMT_PS),
    OPC_RECIP2_PS = FOP(28, FMT_PS),
    OPC_RECIP1_PS = FOP(29, FMT_PS),
    OPC_RSQRT1_PS = FOP(30, FMT_PS),
    OPC_RSQRT2_PS = FOP(31, FMT_PS),

    OPC_CVT_S_PU = FOP(32, FMT_PS),
    OPC_CVT_PW_PS = FOP(36, FMT_PS),
    OPC_CVT_S_PL = FOP(40, FMT_PS),
    OPC_PLL_PS = FOP(44, FMT_PS),
    OPC_PLU_PS = FOP(45, FMT_PS),
    OPC_PUL_PS = FOP(46, FMT_PS),
    OPC_PUU_PS = FOP(47, FMT_PS),
    OPC_CMP_F_PS = FOP (48, FMT_PS),
    OPC_CMP_UN_PS = FOP (49, FMT_PS),
    OPC_CMP_EQ_PS = FOP (50, FMT_PS),
    OPC_CMP_UEQ_PS = FOP (51, FMT_PS),
    OPC_CMP_OLT_PS = FOP (52, FMT_PS),
    OPC_CMP_ULT_PS = FOP (53, FMT_PS),
    OPC_CMP_OLE_PS = FOP (54, FMT_PS),
    OPC_CMP_ULE_PS = FOP (55, FMT_PS),
    OPC_CMP_SF_PS = FOP (56, FMT_PS),
    OPC_CMP_NGLE_PS = FOP (57, FMT_PS),
    OPC_CMP_SEQ_PS = FOP (58, FMT_PS),
    OPC_CMP_NGL_PS = FOP (59, FMT_PS),
    OPC_CMP_LT_PS = FOP (60, FMT_PS),
    OPC_CMP_NGE_PS = FOP (61, FMT_PS),
    OPC_CMP_LE_PS = FOP (62, FMT_PS),
    OPC_CMP_NGT_PS = FOP (63, FMT_PS),
};

5956
static void gen_cp1 (DisasContext *ctx, uint32_t opc, int rt, int fs)
B
bellard 已提交
5957
{
5958
    const char *opn = "cp1 move";
A
aurel32 已提交
5959
    TCGv t0 = tcg_temp_new();
B
bellard 已提交
5960 5961 5962

    switch (opc) {
    case OPC_MFC1:
5963
        {
P
pbrook 已提交
5964
            TCGv_i32 fp0 = tcg_temp_new_i32();
5965 5966 5967

            gen_load_fpr32(fp0, fs);
            tcg_gen_ext_i32_tl(t0, fp0);
P
pbrook 已提交
5968
            tcg_temp_free_i32(fp0);
A
aurel32 已提交
5969
        }
5970
        gen_store_gpr(t0, rt);
B
bellard 已提交
5971 5972 5973
        opn = "mfc1";
        break;
    case OPC_MTC1:
5974
        gen_load_gpr(t0, rt);
5975
        {
P
pbrook 已提交
5976
            TCGv_i32 fp0 = tcg_temp_new_i32();
5977 5978 5979

            tcg_gen_trunc_tl_i32(fp0, t0);
            gen_store_fpr32(fp0, fs);
P
pbrook 已提交
5980
            tcg_temp_free_i32(fp0);
A
aurel32 已提交
5981
        }
B
bellard 已提交
5982 5983 5984
        opn = "mtc1";
        break;
    case OPC_CFC1:
P
pbrook 已提交
5985
        gen_helper_1i(cfc1, t0, fs);
5986
        gen_store_gpr(t0, rt);
B
bellard 已提交
5987 5988 5989
        opn = "cfc1";
        break;
    case OPC_CTC1:
5990
        gen_load_gpr(t0, rt);
P
pbrook 已提交
5991
        gen_helper_1i(ctc1, t0, fs);
B
bellard 已提交
5992 5993
        opn = "ctc1";
        break;
A
aurel32 已提交
5994
#if defined(TARGET_MIPS64)
T
ths 已提交
5995
    case OPC_DMFC1:
A
aurel32 已提交
5996
        gen_load_fpr64(ctx, t0, fs);
5997
        gen_store_gpr(t0, rt);
5998 5999
        opn = "dmfc1";
        break;
T
ths 已提交
6000
    case OPC_DMTC1:
6001
        gen_load_gpr(t0, rt);
A
aurel32 已提交
6002
        gen_store_fpr64(ctx, t0, fs);
6003 6004
        opn = "dmtc1";
        break;
A
aurel32 已提交
6005
#endif
6006
    case OPC_MFHC1:
6007
        {
P
pbrook 已提交
6008
            TCGv_i32 fp0 = tcg_temp_new_i32();
6009 6010 6011

            gen_load_fpr32h(fp0, fs);
            tcg_gen_ext_i32_tl(t0, fp0);
P
pbrook 已提交
6012
            tcg_temp_free_i32(fp0);
A
aurel32 已提交
6013
        }
6014
        gen_store_gpr(t0, rt);
6015 6016 6017
        opn = "mfhc1";
        break;
    case OPC_MTHC1:
6018
        gen_load_gpr(t0, rt);
6019
        {
P
pbrook 已提交
6020
            TCGv_i32 fp0 = tcg_temp_new_i32();
6021 6022 6023

            tcg_gen_trunc_tl_i32(fp0, t0);
            gen_store_fpr32h(fp0, fs);
P
pbrook 已提交
6024
            tcg_temp_free_i32(fp0);
A
aurel32 已提交
6025
        }
6026 6027
        opn = "mthc1";
        break;
B
bellard 已提交
6028
    default:
6029
        MIPS_INVAL(opn);
6030
        generate_exception (ctx, EXCP_RI);
6031
        goto out;
B
bellard 已提交
6032 6033
    }
    MIPS_DEBUG("%s %s %s", opn, regnames[rt], fregnames[fs]);
6034 6035 6036

 out:
    tcg_temp_free(t0);
B
bellard 已提交
6037 6038
}

6039 6040
static void gen_movci (DisasContext *ctx, int rd, int rs, int cc, int tf)
{
A
aurel32 已提交
6041
    int l1;
T
ths 已提交
6042
    TCGCond cond;
A
aurel32 已提交
6043 6044 6045 6046 6047 6048
    TCGv_i32 t0;

    if (rd == 0) {
        /* Treat as NOP. */
        return;
    }
B
bellard 已提交
6049

T
ths 已提交
6050 6051
    if (tf)
        cond = TCG_COND_EQ;
6052 6053 6054
    else
        cond = TCG_COND_NE;

A
aurel32 已提交
6055 6056
    l1 = gen_new_label();
    t0 = tcg_temp_new_i32();
6057
    tcg_gen_andi_i32(t0, fpu_fcr31, 1 << get_fp_bit(cc));
A
aurel32 已提交
6058
    tcg_gen_brcondi_i32(cond, t0, 0, l1);
6059
    tcg_temp_free_i32(t0);
A
aurel32 已提交
6060 6061 6062 6063 6064
    if (rs == 0) {
        tcg_gen_movi_tl(cpu_gpr[rd], 0);
    } else {
        tcg_gen_mov_tl(cpu_gpr[rd], cpu_gpr[rs]);
    }
T
ths 已提交
6065
    gen_set_label(l1);
6066 6067
}

6068
static inline void gen_movcf_s (int fs, int fd, int cc, int tf)
6069 6070
{
    int cond;
A
aurel32 已提交
6071
    TCGv_i32 t0 = tcg_temp_new_i32();
6072 6073 6074 6075 6076 6077 6078
    int l1 = gen_new_label();

    if (tf)
        cond = TCG_COND_EQ;
    else
        cond = TCG_COND_NE;

6079
    tcg_gen_andi_i32(t0, fpu_fcr31, 1 << get_fp_bit(cc));
A
aurel32 已提交
6080 6081 6082
    tcg_gen_brcondi_i32(cond, t0, 0, l1);
    gen_load_fpr32(t0, fs);
    gen_store_fpr32(t0, fd);
6083
    gen_set_label(l1);
A
aurel32 已提交
6084
    tcg_temp_free_i32(t0);
6085
}
6086

6087
static inline void gen_movcf_d (DisasContext *ctx, int fs, int fd, int cc, int tf)
6088 6089
{
    int cond;
A
aurel32 已提交
6090 6091
    TCGv_i32 t0 = tcg_temp_new_i32();
    TCGv_i64 fp0;
6092 6093 6094 6095 6096 6097 6098
    int l1 = gen_new_label();

    if (tf)
        cond = TCG_COND_EQ;
    else
        cond = TCG_COND_NE;

6099
    tcg_gen_andi_i32(t0, fpu_fcr31, 1 << get_fp_bit(cc));
A
aurel32 已提交
6100
    tcg_gen_brcondi_i32(cond, t0, 0, l1);
6101
    tcg_temp_free_i32(t0);
A
aurel32 已提交
6102
    fp0 = tcg_temp_new_i64();
A
aurel32 已提交
6103 6104
    gen_load_fpr64(ctx, fp0, fs);
    gen_store_fpr64(ctx, fp0, fd);
P
pbrook 已提交
6105
    tcg_temp_free_i64(fp0);
A
aurel32 已提交
6106
    gen_set_label(l1);
6107 6108
}

6109
static inline void gen_movcf_ps (int fs, int fd, int cc, int tf)
6110 6111
{
    int cond;
A
aurel32 已提交
6112
    TCGv_i32 t0 = tcg_temp_new_i32();
6113 6114 6115 6116 6117 6118 6119 6120
    int l1 = gen_new_label();
    int l2 = gen_new_label();

    if (tf)
        cond = TCG_COND_EQ;
    else
        cond = TCG_COND_NE;

6121
    tcg_gen_andi_i32(t0, fpu_fcr31, 1 << get_fp_bit(cc));
A
aurel32 已提交
6122 6123 6124
    tcg_gen_brcondi_i32(cond, t0, 0, l1);
    gen_load_fpr32(t0, fs);
    gen_store_fpr32(t0, fd);
6125
    gen_set_label(l1);
A
aurel32 已提交
6126

6127
    tcg_gen_andi_i32(t0, fpu_fcr31, 1 << get_fp_bit(cc+1));
A
aurel32 已提交
6128 6129 6130
    tcg_gen_brcondi_i32(cond, t0, 0, l2);
    gen_load_fpr32h(t0, fs);
    gen_store_fpr32h(t0, fd);
A
aurel32 已提交
6131
    tcg_temp_free_i32(t0);
6132 6133 6134
    gen_set_label(l2);
}

B
bellard 已提交
6135

6136
static void gen_farith (DisasContext *ctx, enum fopcode op1,
6137
                        int ft, int fs, int fd, int cc)
B
bellard 已提交
6138
{
6139
    const char *opn = "farith";
B
bellard 已提交
6140 6141 6142 6143 6144 6145 6146 6147 6148 6149 6150 6151 6152 6153 6154 6155 6156 6157
    const char *condnames[] = {
            "c.f",
            "c.un",
            "c.eq",
            "c.ueq",
            "c.olt",
            "c.ult",
            "c.ole",
            "c.ule",
            "c.sf",
            "c.ngle",
            "c.seq",
            "c.ngl",
            "c.lt",
            "c.nge",
            "c.le",
            "c.ngt",
    };
6158 6159 6160 6161 6162 6163 6164 6165 6166 6167 6168 6169 6170 6171 6172 6173 6174 6175 6176
    const char *condnames_abs[] = {
            "cabs.f",
            "cabs.un",
            "cabs.eq",
            "cabs.ueq",
            "cabs.olt",
            "cabs.ult",
            "cabs.ole",
            "cabs.ule",
            "cabs.sf",
            "cabs.ngle",
            "cabs.seq",
            "cabs.ngl",
            "cabs.lt",
            "cabs.nge",
            "cabs.le",
            "cabs.ngt",
    };
    enum { BINOP, CMPOP, OTHEROP } optype = OTHEROP;
6177 6178
    uint32_t func = ctx->opcode & 0x3f;

6179 6180
    switch (op1) {
    case OPC_ADD_S:
6181
        {
P
pbrook 已提交
6182 6183
            TCGv_i32 fp0 = tcg_temp_new_i32();
            TCGv_i32 fp1 = tcg_temp_new_i32();
6184 6185 6186

            gen_load_fpr32(fp0, fs);
            gen_load_fpr32(fp1, ft);
P
pbrook 已提交
6187 6188
            gen_helper_float_add_s(fp0, fp0, fp1);
            tcg_temp_free_i32(fp1);
6189
            gen_store_fpr32(fp0, fd);
P
pbrook 已提交
6190
            tcg_temp_free_i32(fp0);
6191
        }
6192
        opn = "add.s";
6193
        optype = BINOP;
6194
        break;
6195
    case OPC_SUB_S:
6196
        {
P
pbrook 已提交
6197 6198
            TCGv_i32 fp0 = tcg_temp_new_i32();
            TCGv_i32 fp1 = tcg_temp_new_i32();
6199 6200 6201

            gen_load_fpr32(fp0, fs);
            gen_load_fpr32(fp1, ft);
P
pbrook 已提交
6202 6203
            gen_helper_float_sub_s(fp0, fp0, fp1);
            tcg_temp_free_i32(fp1);
6204
            gen_store_fpr32(fp0, fd);
P
pbrook 已提交
6205
            tcg_temp_free_i32(fp0);
6206
        }
6207
        opn = "sub.s";
6208
        optype = BINOP;
6209
        break;
6210
    case OPC_MUL_S:
6211
        {
P
pbrook 已提交
6212 6213
            TCGv_i32 fp0 = tcg_temp_new_i32();
            TCGv_i32 fp1 = tcg_temp_new_i32();
6214 6215 6216

            gen_load_fpr32(fp0, fs);
            gen_load_fpr32(fp1, ft);
P
pbrook 已提交
6217 6218
            gen_helper_float_mul_s(fp0, fp0, fp1);
            tcg_temp_free_i32(fp1);
6219
            gen_store_fpr32(fp0, fd);
P
pbrook 已提交
6220
            tcg_temp_free_i32(fp0);
6221
        }
6222
        opn = "mul.s";
6223
        optype = BINOP;
6224
        break;
6225
    case OPC_DIV_S:
6226
        {
P
pbrook 已提交
6227 6228
            TCGv_i32 fp0 = tcg_temp_new_i32();
            TCGv_i32 fp1 = tcg_temp_new_i32();
6229 6230 6231

            gen_load_fpr32(fp0, fs);
            gen_load_fpr32(fp1, ft);
P
pbrook 已提交
6232 6233
            gen_helper_float_div_s(fp0, fp0, fp1);
            tcg_temp_free_i32(fp1);
6234
            gen_store_fpr32(fp0, fd);
P
pbrook 已提交
6235
            tcg_temp_free_i32(fp0);
6236
        }
6237
        opn = "div.s";
6238
        optype = BINOP;
6239
        break;
6240
    case OPC_SQRT_S:
6241
        {
P
pbrook 已提交
6242
            TCGv_i32 fp0 = tcg_temp_new_i32();
6243 6244

            gen_load_fpr32(fp0, fs);
P
pbrook 已提交
6245
            gen_helper_float_sqrt_s(fp0, fp0);
6246
            gen_store_fpr32(fp0, fd);
P
pbrook 已提交
6247
            tcg_temp_free_i32(fp0);
6248
        }
6249 6250
        opn = "sqrt.s";
        break;
6251
    case OPC_ABS_S:
6252
        {
P
pbrook 已提交
6253
            TCGv_i32 fp0 = tcg_temp_new_i32();
6254 6255

            gen_load_fpr32(fp0, fs);
P
pbrook 已提交
6256
            gen_helper_float_abs_s(fp0, fp0);
6257
            gen_store_fpr32(fp0, fd);
P
pbrook 已提交
6258
            tcg_temp_free_i32(fp0);
6259
        }
6260 6261
        opn = "abs.s";
        break;
6262
    case OPC_MOV_S:
6263
        {
P
pbrook 已提交
6264
            TCGv_i32 fp0 = tcg_temp_new_i32();
6265 6266 6267

            gen_load_fpr32(fp0, fs);
            gen_store_fpr32(fp0, fd);
P
pbrook 已提交
6268
            tcg_temp_free_i32(fp0);
6269
        }
6270 6271
        opn = "mov.s";
        break;
6272
    case OPC_NEG_S:
6273
        {
P
pbrook 已提交
6274
            TCGv_i32 fp0 = tcg_temp_new_i32();
6275 6276

            gen_load_fpr32(fp0, fs);
P
pbrook 已提交
6277
            gen_helper_float_chs_s(fp0, fp0);
6278
            gen_store_fpr32(fp0, fd);
P
pbrook 已提交
6279
            tcg_temp_free_i32(fp0);
6280
        }
6281 6282
        opn = "neg.s";
        break;
6283
    case OPC_ROUND_L_S:
6284
        check_cp1_64bitmode(ctx);
6285
        {
P
pbrook 已提交
6286 6287
            TCGv_i32 fp32 = tcg_temp_new_i32();
            TCGv_i64 fp64 = tcg_temp_new_i64();
6288 6289

            gen_load_fpr32(fp32, fs);
P
pbrook 已提交
6290 6291
            gen_helper_float_roundl_s(fp64, fp32);
            tcg_temp_free_i32(fp32);
6292
            gen_store_fpr64(ctx, fp64, fd);
P
pbrook 已提交
6293
            tcg_temp_free_i64(fp64);
6294
        }
6295 6296
        opn = "round.l.s";
        break;
6297
    case OPC_TRUNC_L_S:
6298
        check_cp1_64bitmode(ctx);
6299
        {
P
pbrook 已提交
6300 6301
            TCGv_i32 fp32 = tcg_temp_new_i32();
            TCGv_i64 fp64 = tcg_temp_new_i64();
6302 6303

            gen_load_fpr32(fp32, fs);
P
pbrook 已提交
6304 6305
            gen_helper_float_truncl_s(fp64, fp32);
            tcg_temp_free_i32(fp32);
6306
            gen_store_fpr64(ctx, fp64, fd);
P
pbrook 已提交
6307
            tcg_temp_free_i64(fp64);
6308
        }
6309 6310
        opn = "trunc.l.s";
        break;
6311
    case OPC_CEIL_L_S:
6312
        check_cp1_64bitmode(ctx);
6313
        {
P
pbrook 已提交
6314 6315
            TCGv_i32 fp32 = tcg_temp_new_i32();
            TCGv_i64 fp64 = tcg_temp_new_i64();
6316 6317

            gen_load_fpr32(fp32, fs);
P
pbrook 已提交
6318 6319
            gen_helper_float_ceill_s(fp64, fp32);
            tcg_temp_free_i32(fp32);
6320
            gen_store_fpr64(ctx, fp64, fd);
P
pbrook 已提交
6321
            tcg_temp_free_i64(fp64);
6322
        }
6323 6324
        opn = "ceil.l.s";
        break;
6325
    case OPC_FLOOR_L_S:
6326
        check_cp1_64bitmode(ctx);
6327
        {
P
pbrook 已提交
6328 6329
            TCGv_i32 fp32 = tcg_temp_new_i32();
            TCGv_i64 fp64 = tcg_temp_new_i64();
6330 6331

            gen_load_fpr32(fp32, fs);
P
pbrook 已提交
6332 6333
            gen_helper_float_floorl_s(fp64, fp32);
            tcg_temp_free_i32(fp32);
6334
            gen_store_fpr64(ctx, fp64, fd);
P
pbrook 已提交
6335
            tcg_temp_free_i64(fp64);
6336
        }
6337 6338
        opn = "floor.l.s";
        break;
6339
    case OPC_ROUND_W_S:
6340
        {
P
pbrook 已提交
6341
            TCGv_i32 fp0 = tcg_temp_new_i32();
6342 6343

            gen_load_fpr32(fp0, fs);
P
pbrook 已提交
6344
            gen_helper_float_roundw_s(fp0, fp0);
6345
            gen_store_fpr32(fp0, fd);
P
pbrook 已提交
6346
            tcg_temp_free_i32(fp0);
6347
        }
6348 6349
        opn = "round.w.s";
        break;
6350
    case OPC_TRUNC_W_S:
6351
        {
P
pbrook 已提交
6352
            TCGv_i32 fp0 = tcg_temp_new_i32();
6353 6354

            gen_load_fpr32(fp0, fs);
P
pbrook 已提交
6355
            gen_helper_float_truncw_s(fp0, fp0);
6356
            gen_store_fpr32(fp0, fd);
P
pbrook 已提交
6357
            tcg_temp_free_i32(fp0);
6358
        }
6359 6360
        opn = "trunc.w.s";
        break;
6361
    case OPC_CEIL_W_S:
6362
        {
P
pbrook 已提交
6363
            TCGv_i32 fp0 = tcg_temp_new_i32();
6364 6365

            gen_load_fpr32(fp0, fs);
P
pbrook 已提交
6366
            gen_helper_float_ceilw_s(fp0, fp0);
6367
            gen_store_fpr32(fp0, fd);
P
pbrook 已提交
6368
            tcg_temp_free_i32(fp0);
6369
        }
6370 6371
        opn = "ceil.w.s";
        break;
6372
    case OPC_FLOOR_W_S:
6373
        {
P
pbrook 已提交
6374
            TCGv_i32 fp0 = tcg_temp_new_i32();
6375 6376

            gen_load_fpr32(fp0, fs);
P
pbrook 已提交
6377
            gen_helper_float_floorw_s(fp0, fp0);
6378
            gen_store_fpr32(fp0, fd);
P
pbrook 已提交
6379
            tcg_temp_free_i32(fp0);
6380
        }
6381 6382
        opn = "floor.w.s";
        break;
6383
    case OPC_MOVCF_S:
6384
        gen_movcf_s(fs, fd, (ft >> 2) & 0x7, ft & 0x1);
6385 6386
        opn = "movcf.s";
        break;
6387
    case OPC_MOVZ_S:
6388 6389
        {
            int l1 = gen_new_label();
A
aurel32 已提交
6390
            TCGv_i32 fp0;
6391

A
aurel32 已提交
6392 6393 6394 6395
            if (ft != 0) {
                tcg_gen_brcondi_tl(TCG_COND_NE, cpu_gpr[ft], 0, l1);
            }
            fp0 = tcg_temp_new_i32();
6396 6397
            gen_load_fpr32(fp0, fs);
            gen_store_fpr32(fp0, fd);
P
pbrook 已提交
6398
            tcg_temp_free_i32(fp0);
6399 6400
            gen_set_label(l1);
        }
6401 6402
        opn = "movz.s";
        break;
6403
    case OPC_MOVN_S:
6404 6405
        {
            int l1 = gen_new_label();
A
aurel32 已提交
6406 6407 6408 6409 6410 6411 6412 6413 6414 6415
            TCGv_i32 fp0;

            if (ft != 0) {
                tcg_gen_brcondi_tl(TCG_COND_EQ, cpu_gpr[ft], 0, l1);
                fp0 = tcg_temp_new_i32();
                gen_load_fpr32(fp0, fs);
                gen_store_fpr32(fp0, fd);
                tcg_temp_free_i32(fp0);
                gen_set_label(l1);
            }
6416
        }
6417 6418
        opn = "movn.s";
        break;
6419
    case OPC_RECIP_S:
6420
        check_cop1x(ctx);
6421
        {
P
pbrook 已提交
6422
            TCGv_i32 fp0 = tcg_temp_new_i32();
6423 6424

            gen_load_fpr32(fp0, fs);
P
pbrook 已提交
6425
            gen_helper_float_recip_s(fp0, fp0);
6426
            gen_store_fpr32(fp0, fd);
P
pbrook 已提交
6427
            tcg_temp_free_i32(fp0);
6428
        }
T
ths 已提交
6429 6430
        opn = "recip.s";
        break;
6431
    case OPC_RSQRT_S:
6432
        check_cop1x(ctx);
6433
        {
P
pbrook 已提交
6434
            TCGv_i32 fp0 = tcg_temp_new_i32();
6435 6436

            gen_load_fpr32(fp0, fs);
P
pbrook 已提交
6437
            gen_helper_float_rsqrt_s(fp0, fp0);
6438
            gen_store_fpr32(fp0, fd);
P
pbrook 已提交
6439
            tcg_temp_free_i32(fp0);
6440
        }
T
ths 已提交
6441 6442
        opn = "rsqrt.s";
        break;
6443
    case OPC_RECIP2_S:
6444
        check_cp1_64bitmode(ctx);
6445
        {
P
pbrook 已提交
6446 6447
            TCGv_i32 fp0 = tcg_temp_new_i32();
            TCGv_i32 fp1 = tcg_temp_new_i32();
6448 6449 6450

            gen_load_fpr32(fp0, fs);
            gen_load_fpr32(fp1, fd);
P
pbrook 已提交
6451 6452
            gen_helper_float_recip2_s(fp0, fp0, fp1);
            tcg_temp_free_i32(fp1);
6453
            gen_store_fpr32(fp0, fd);
P
pbrook 已提交
6454
            tcg_temp_free_i32(fp0);
6455
        }
T
ths 已提交
6456 6457
        opn = "recip2.s";
        break;
6458
    case OPC_RECIP1_S:
6459
        check_cp1_64bitmode(ctx);
6460
        {
P
pbrook 已提交
6461
            TCGv_i32 fp0 = tcg_temp_new_i32();
6462 6463

            gen_load_fpr32(fp0, fs);
P
pbrook 已提交
6464
            gen_helper_float_recip1_s(fp0, fp0);
6465
            gen_store_fpr32(fp0, fd);
P
pbrook 已提交
6466
            tcg_temp_free_i32(fp0);
6467
        }
T
ths 已提交
6468 6469
        opn = "recip1.s";
        break;
6470
    case OPC_RSQRT1_S:
6471
        check_cp1_64bitmode(ctx);
6472
        {
P
pbrook 已提交
6473
            TCGv_i32 fp0 = tcg_temp_new_i32();
6474 6475

            gen_load_fpr32(fp0, fs);
P
pbrook 已提交
6476
            gen_helper_float_rsqrt1_s(fp0, fp0);
6477
            gen_store_fpr32(fp0, fd);
P
pbrook 已提交
6478
            tcg_temp_free_i32(fp0);
6479
        }
T
ths 已提交
6480 6481
        opn = "rsqrt1.s";
        break;
6482
    case OPC_RSQRT2_S:
6483
        check_cp1_64bitmode(ctx);
6484
        {
P
pbrook 已提交
6485 6486
            TCGv_i32 fp0 = tcg_temp_new_i32();
            TCGv_i32 fp1 = tcg_temp_new_i32();
6487 6488 6489

            gen_load_fpr32(fp0, fs);
            gen_load_fpr32(fp1, ft);
P
pbrook 已提交
6490 6491
            gen_helper_float_rsqrt2_s(fp0, fp0, fp1);
            tcg_temp_free_i32(fp1);
6492
            gen_store_fpr32(fp0, fd);
P
pbrook 已提交
6493
            tcg_temp_free_i32(fp0);
6494
        }
T
ths 已提交
6495 6496
        opn = "rsqrt2.s";
        break;
6497
    case OPC_CVT_D_S:
6498
        check_cp1_registers(ctx, fd);
6499
        {
P
pbrook 已提交
6500 6501
            TCGv_i32 fp32 = tcg_temp_new_i32();
            TCGv_i64 fp64 = tcg_temp_new_i64();
6502 6503

            gen_load_fpr32(fp32, fs);
P
pbrook 已提交
6504 6505
            gen_helper_float_cvtd_s(fp64, fp32);
            tcg_temp_free_i32(fp32);
6506
            gen_store_fpr64(ctx, fp64, fd);
P
pbrook 已提交
6507
            tcg_temp_free_i64(fp64);
6508
        }
6509 6510
        opn = "cvt.d.s";
        break;
6511
    case OPC_CVT_W_S:
6512
        {
P
pbrook 已提交
6513
            TCGv_i32 fp0 = tcg_temp_new_i32();
6514 6515

            gen_load_fpr32(fp0, fs);
P
pbrook 已提交
6516
            gen_helper_float_cvtw_s(fp0, fp0);
6517
            gen_store_fpr32(fp0, fd);
P
pbrook 已提交
6518
            tcg_temp_free_i32(fp0);
6519
        }
6520 6521
        opn = "cvt.w.s";
        break;
6522
    case OPC_CVT_L_S:
6523
        check_cp1_64bitmode(ctx);
6524
        {
P
pbrook 已提交
6525 6526
            TCGv_i32 fp32 = tcg_temp_new_i32();
            TCGv_i64 fp64 = tcg_temp_new_i64();
6527 6528

            gen_load_fpr32(fp32, fs);
P
pbrook 已提交
6529 6530
            gen_helper_float_cvtl_s(fp64, fp32);
            tcg_temp_free_i32(fp32);
6531
            gen_store_fpr64(ctx, fp64, fd);
P
pbrook 已提交
6532
            tcg_temp_free_i64(fp64);
6533
        }
6534 6535
        opn = "cvt.l.s";
        break;
6536
    case OPC_CVT_PS_S:
6537
        check_cp1_64bitmode(ctx);
6538
        {
P
pbrook 已提交
6539 6540 6541
            TCGv_i64 fp64 = tcg_temp_new_i64();
            TCGv_i32 fp32_0 = tcg_temp_new_i32();
            TCGv_i32 fp32_1 = tcg_temp_new_i32();
6542 6543 6544

            gen_load_fpr32(fp32_0, fs);
            gen_load_fpr32(fp32_1, ft);
P
pbrook 已提交
6545
            tcg_gen_concat_i32_i64(fp64, fp32_0, fp32_1);
P
pbrook 已提交
6546 6547
            tcg_temp_free_i32(fp32_1);
            tcg_temp_free_i32(fp32_0);
P
pbrook 已提交
6548
            gen_store_fpr64(ctx, fp64, fd);
P
pbrook 已提交
6549
            tcg_temp_free_i64(fp64);
6550
        }
6551 6552
        opn = "cvt.ps.s";
        break;
6553 6554 6555 6556 6557 6558 6559 6560 6561 6562 6563 6564 6565 6566 6567 6568
    case OPC_CMP_F_S:
    case OPC_CMP_UN_S:
    case OPC_CMP_EQ_S:
    case OPC_CMP_UEQ_S:
    case OPC_CMP_OLT_S:
    case OPC_CMP_ULT_S:
    case OPC_CMP_OLE_S:
    case OPC_CMP_ULE_S:
    case OPC_CMP_SF_S:
    case OPC_CMP_NGLE_S:
    case OPC_CMP_SEQ_S:
    case OPC_CMP_NGL_S:
    case OPC_CMP_LT_S:
    case OPC_CMP_NGE_S:
    case OPC_CMP_LE_S:
    case OPC_CMP_NGT_S:
6569 6570 6571 6572 6573 6574
        if (ctx->opcode & (1 << 6)) {
            gen_cmpabs_s(ctx, func-48, ft, fs, cc);
            opn = condnames_abs[func-48];
        } else {
            gen_cmp_s(ctx, func-48, ft, fs, cc);
            opn = condnames[func-48];
6575
        }
6576
        break;
6577
    case OPC_ADD_D:
6578
        check_cp1_registers(ctx, fs | ft | fd);
6579
        {
P
pbrook 已提交
6580 6581
            TCGv_i64 fp0 = tcg_temp_new_i64();
            TCGv_i64 fp1 = tcg_temp_new_i64();
6582 6583 6584

            gen_load_fpr64(ctx, fp0, fs);
            gen_load_fpr64(ctx, fp1, ft);
P
pbrook 已提交
6585 6586
            gen_helper_float_add_d(fp0, fp0, fp1);
            tcg_temp_free_i64(fp1);
6587
            gen_store_fpr64(ctx, fp0, fd);
P
pbrook 已提交
6588
            tcg_temp_free_i64(fp0);
6589
        }
B
bellard 已提交
6590
        opn = "add.d";
6591
        optype = BINOP;
B
bellard 已提交
6592
        break;
6593
    case OPC_SUB_D:
6594
        check_cp1_registers(ctx, fs | ft | fd);
6595
        {
P
pbrook 已提交
6596 6597
            TCGv_i64 fp0 = tcg_temp_new_i64();
            TCGv_i64 fp1 = tcg_temp_new_i64();
6598 6599 6600

            gen_load_fpr64(ctx, fp0, fs);
            gen_load_fpr64(ctx, fp1, ft);
P
pbrook 已提交
6601 6602
            gen_helper_float_sub_d(fp0, fp0, fp1);
            tcg_temp_free_i64(fp1);
6603
            gen_store_fpr64(ctx, fp0, fd);
P
pbrook 已提交
6604
            tcg_temp_free_i64(fp0);
6605
        }
B
bellard 已提交
6606
        opn = "sub.d";
6607
        optype = BINOP;
B
bellard 已提交
6608
        break;
6609
    case OPC_MUL_D:
6610
        check_cp1_registers(ctx, fs | ft | fd);
6611
        {
P
pbrook 已提交
6612 6613
            TCGv_i64 fp0 = tcg_temp_new_i64();
            TCGv_i64 fp1 = tcg_temp_new_i64();
6614 6615 6616

            gen_load_fpr64(ctx, fp0, fs);
            gen_load_fpr64(ctx, fp1, ft);
P
pbrook 已提交
6617 6618
            gen_helper_float_mul_d(fp0, fp0, fp1);
            tcg_temp_free_i64(fp1);
6619
            gen_store_fpr64(ctx, fp0, fd);
P
pbrook 已提交
6620
            tcg_temp_free_i64(fp0);
6621
        }
B
bellard 已提交
6622
        opn = "mul.d";
6623
        optype = BINOP;
B
bellard 已提交
6624
        break;
6625
    case OPC_DIV_D:
6626
        check_cp1_registers(ctx, fs | ft | fd);
6627
        {
P
pbrook 已提交
6628 6629
            TCGv_i64 fp0 = tcg_temp_new_i64();
            TCGv_i64 fp1 = tcg_temp_new_i64();
6630 6631 6632

            gen_load_fpr64(ctx, fp0, fs);
            gen_load_fpr64(ctx, fp1, ft);
P
pbrook 已提交
6633 6634
            gen_helper_float_div_d(fp0, fp0, fp1);
            tcg_temp_free_i64(fp1);
6635
            gen_store_fpr64(ctx, fp0, fd);
P
pbrook 已提交
6636
            tcg_temp_free_i64(fp0);
6637
        }
B
bellard 已提交
6638
        opn = "div.d";
6639
        optype = BINOP;
B
bellard 已提交
6640
        break;
6641
    case OPC_SQRT_D:
6642
        check_cp1_registers(ctx, fs | fd);
6643
        {
P
pbrook 已提交
6644
            TCGv_i64 fp0 = tcg_temp_new_i64();
6645 6646

            gen_load_fpr64(ctx, fp0, fs);
P
pbrook 已提交
6647
            gen_helper_float_sqrt_d(fp0, fp0);
6648
            gen_store_fpr64(ctx, fp0, fd);
P
pbrook 已提交
6649
            tcg_temp_free_i64(fp0);
6650
        }
B
bellard 已提交
6651 6652
        opn = "sqrt.d";
        break;
6653
    case OPC_ABS_D:
6654
        check_cp1_registers(ctx, fs | fd);
6655
        {
P
pbrook 已提交
6656
            TCGv_i64 fp0 = tcg_temp_new_i64();
6657 6658

            gen_load_fpr64(ctx, fp0, fs);
P
pbrook 已提交
6659
            gen_helper_float_abs_d(fp0, fp0);
6660
            gen_store_fpr64(ctx, fp0, fd);
P
pbrook 已提交
6661
            tcg_temp_free_i64(fp0);
6662
        }
B
bellard 已提交
6663 6664
        opn = "abs.d";
        break;
6665
    case OPC_MOV_D:
6666
        check_cp1_registers(ctx, fs | fd);
6667
        {
P
pbrook 已提交
6668
            TCGv_i64 fp0 = tcg_temp_new_i64();
6669 6670 6671

            gen_load_fpr64(ctx, fp0, fs);
            gen_store_fpr64(ctx, fp0, fd);
P
pbrook 已提交
6672
            tcg_temp_free_i64(fp0);
6673
        }
B
bellard 已提交
6674 6675
        opn = "mov.d";
        break;
6676
    case OPC_NEG_D:
6677
        check_cp1_registers(ctx, fs | fd);
6678
        {
P
pbrook 已提交
6679
            TCGv_i64 fp0 = tcg_temp_new_i64();
6680 6681

            gen_load_fpr64(ctx, fp0, fs);
P
pbrook 已提交
6682
            gen_helper_float_chs_d(fp0, fp0);
6683
            gen_store_fpr64(ctx, fp0, fd);
P
pbrook 已提交
6684
            tcg_temp_free_i64(fp0);
6685
        }
B
bellard 已提交
6686 6687
        opn = "neg.d";
        break;
6688
    case OPC_ROUND_L_D:
6689
        check_cp1_64bitmode(ctx);
6690
        {
P
pbrook 已提交
6691
            TCGv_i64 fp0 = tcg_temp_new_i64();
6692 6693

            gen_load_fpr64(ctx, fp0, fs);
P
pbrook 已提交
6694
            gen_helper_float_roundl_d(fp0, fp0);
6695
            gen_store_fpr64(ctx, fp0, fd);
P
pbrook 已提交
6696
            tcg_temp_free_i64(fp0);
6697
        }
6698 6699
        opn = "round.l.d";
        break;
6700
    case OPC_TRUNC_L_D:
6701
        check_cp1_64bitmode(ctx);
6702
        {
P
pbrook 已提交
6703
            TCGv_i64 fp0 = tcg_temp_new_i64();
6704 6705

            gen_load_fpr64(ctx, fp0, fs);
P
pbrook 已提交
6706
            gen_helper_float_truncl_d(fp0, fp0);
6707
            gen_store_fpr64(ctx, fp0, fd);
P
pbrook 已提交
6708
            tcg_temp_free_i64(fp0);
6709
        }
6710 6711
        opn = "trunc.l.d";
        break;
6712
    case OPC_CEIL_L_D:
6713
        check_cp1_64bitmode(ctx);
6714
        {
P
pbrook 已提交
6715
            TCGv_i64 fp0 = tcg_temp_new_i64();
6716 6717

            gen_load_fpr64(ctx, fp0, fs);
P
pbrook 已提交
6718
            gen_helper_float_ceill_d(fp0, fp0);
6719
            gen_store_fpr64(ctx, fp0, fd);
P
pbrook 已提交
6720
            tcg_temp_free_i64(fp0);
6721
        }
6722 6723
        opn = "ceil.l.d";
        break;
6724
    case OPC_FLOOR_L_D:
6725
        check_cp1_64bitmode(ctx);
6726
        {
P
pbrook 已提交
6727
            TCGv_i64 fp0 = tcg_temp_new_i64();
6728 6729

            gen_load_fpr64(ctx, fp0, fs);
P
pbrook 已提交
6730
            gen_helper_float_floorl_d(fp0, fp0);
6731
            gen_store_fpr64(ctx, fp0, fd);
P
pbrook 已提交
6732
            tcg_temp_free_i64(fp0);
6733
        }
6734 6735
        opn = "floor.l.d";
        break;
6736
    case OPC_ROUND_W_D:
6737
        check_cp1_registers(ctx, fs);
6738
        {
P
pbrook 已提交
6739 6740
            TCGv_i32 fp32 = tcg_temp_new_i32();
            TCGv_i64 fp64 = tcg_temp_new_i64();
6741 6742

            gen_load_fpr64(ctx, fp64, fs);
P
pbrook 已提交
6743 6744
            gen_helper_float_roundw_d(fp32, fp64);
            tcg_temp_free_i64(fp64);
6745
            gen_store_fpr32(fp32, fd);
P
pbrook 已提交
6746
            tcg_temp_free_i32(fp32);
6747
        }
B
bellard 已提交
6748 6749
        opn = "round.w.d";
        break;
6750
    case OPC_TRUNC_W_D:
6751
        check_cp1_registers(ctx, fs);
6752
        {
P
pbrook 已提交
6753 6754
            TCGv_i32 fp32 = tcg_temp_new_i32();
            TCGv_i64 fp64 = tcg_temp_new_i64();
6755 6756

            gen_load_fpr64(ctx, fp64, fs);
P
pbrook 已提交
6757 6758
            gen_helper_float_truncw_d(fp32, fp64);
            tcg_temp_free_i64(fp64);
6759
            gen_store_fpr32(fp32, fd);
P
pbrook 已提交
6760
            tcg_temp_free_i32(fp32);
6761
        }
B
bellard 已提交
6762 6763
        opn = "trunc.w.d";
        break;
6764
    case OPC_CEIL_W_D:
6765
        check_cp1_registers(ctx, fs);
6766
        {
P
pbrook 已提交
6767 6768
            TCGv_i32 fp32 = tcg_temp_new_i32();
            TCGv_i64 fp64 = tcg_temp_new_i64();
6769 6770

            gen_load_fpr64(ctx, fp64, fs);
P
pbrook 已提交
6771 6772
            gen_helper_float_ceilw_d(fp32, fp64);
            tcg_temp_free_i64(fp64);
6773
            gen_store_fpr32(fp32, fd);
P
pbrook 已提交
6774
            tcg_temp_free_i32(fp32);
6775
        }
B
bellard 已提交
6776 6777
        opn = "ceil.w.d";
        break;
6778
    case OPC_FLOOR_W_D:
6779
        check_cp1_registers(ctx, fs);
6780
        {
P
pbrook 已提交
6781 6782
            TCGv_i32 fp32 = tcg_temp_new_i32();
            TCGv_i64 fp64 = tcg_temp_new_i64();
6783 6784

            gen_load_fpr64(ctx, fp64, fs);
P
pbrook 已提交
6785 6786
            gen_helper_float_floorw_d(fp32, fp64);
            tcg_temp_free_i64(fp64);
6787
            gen_store_fpr32(fp32, fd);
P
pbrook 已提交
6788
            tcg_temp_free_i32(fp32);
6789
        }
6790
        opn = "floor.w.d";
B
bellard 已提交
6791
        break;
6792
    case OPC_MOVCF_D:
6793
        gen_movcf_d(ctx, fs, fd, (ft >> 2) & 0x7, ft & 0x1);
6794
        opn = "movcf.d";
6795
        break;
6796
    case OPC_MOVZ_D:
6797 6798
        {
            int l1 = gen_new_label();
A
aurel32 已提交
6799
            TCGv_i64 fp0;
6800

A
aurel32 已提交
6801 6802 6803 6804
            if (ft != 0) {
                tcg_gen_brcondi_tl(TCG_COND_NE, cpu_gpr[ft], 0, l1);
            }
            fp0 = tcg_temp_new_i64();
6805 6806
            gen_load_fpr64(ctx, fp0, fs);
            gen_store_fpr64(ctx, fp0, fd);
P
pbrook 已提交
6807
            tcg_temp_free_i64(fp0);
6808 6809
            gen_set_label(l1);
        }
6810 6811
        opn = "movz.d";
        break;
6812
    case OPC_MOVN_D:
6813 6814
        {
            int l1 = gen_new_label();
A
aurel32 已提交
6815 6816 6817 6818 6819 6820 6821 6822 6823 6824
            TCGv_i64 fp0;

            if (ft != 0) {
                tcg_gen_brcondi_tl(TCG_COND_EQ, cpu_gpr[ft], 0, l1);
                fp0 = tcg_temp_new_i64();
                gen_load_fpr64(ctx, fp0, fs);
                gen_store_fpr64(ctx, fp0, fd);
                tcg_temp_free_i64(fp0);
                gen_set_label(l1);
            }
6825
        }
6826
        opn = "movn.d";
B
bellard 已提交
6827
        break;
6828
    case OPC_RECIP_D:
6829
        check_cp1_64bitmode(ctx);
6830
        {
P
pbrook 已提交
6831
            TCGv_i64 fp0 = tcg_temp_new_i64();
6832 6833

            gen_load_fpr64(ctx, fp0, fs);
P
pbrook 已提交
6834
            gen_helper_float_recip_d(fp0, fp0);
6835
            gen_store_fpr64(ctx, fp0, fd);
P
pbrook 已提交
6836
            tcg_temp_free_i64(fp0);
6837
        }
T
ths 已提交
6838 6839
        opn = "recip.d";
        break;
6840
    case OPC_RSQRT_D:
6841
        check_cp1_64bitmode(ctx);
6842
        {
P
pbrook 已提交
6843
            TCGv_i64 fp0 = tcg_temp_new_i64();
6844 6845

            gen_load_fpr64(ctx, fp0, fs);
P
pbrook 已提交
6846
            gen_helper_float_rsqrt_d(fp0, fp0);
6847
            gen_store_fpr64(ctx, fp0, fd);
P
pbrook 已提交
6848
            tcg_temp_free_i64(fp0);
6849
        }
T
ths 已提交
6850 6851
        opn = "rsqrt.d";
        break;
6852
    case OPC_RECIP2_D:
6853
        check_cp1_64bitmode(ctx);
6854
        {
P
pbrook 已提交
6855 6856
            TCGv_i64 fp0 = tcg_temp_new_i64();
            TCGv_i64 fp1 = tcg_temp_new_i64();
6857 6858 6859

            gen_load_fpr64(ctx, fp0, fs);
            gen_load_fpr64(ctx, fp1, ft);
P
pbrook 已提交
6860 6861
            gen_helper_float_recip2_d(fp0, fp0, fp1);
            tcg_temp_free_i64(fp1);
6862
            gen_store_fpr64(ctx, fp0, fd);
P
pbrook 已提交
6863
            tcg_temp_free_i64(fp0);
6864
        }
T
ths 已提交
6865 6866
        opn = "recip2.d";
        break;
6867
    case OPC_RECIP1_D:
6868
        check_cp1_64bitmode(ctx);
6869
        {
P
pbrook 已提交
6870
            TCGv_i64 fp0 = tcg_temp_new_i64();
6871 6872

            gen_load_fpr64(ctx, fp0, fs);
P
pbrook 已提交
6873
            gen_helper_float_recip1_d(fp0, fp0);
6874
            gen_store_fpr64(ctx, fp0, fd);
P
pbrook 已提交
6875
            tcg_temp_free_i64(fp0);
6876
        }
T
ths 已提交
6877 6878
        opn = "recip1.d";
        break;
6879
    case OPC_RSQRT1_D:
6880
        check_cp1_64bitmode(ctx);
6881
        {
P
pbrook 已提交
6882
            TCGv_i64 fp0 = tcg_temp_new_i64();
6883 6884

            gen_load_fpr64(ctx, fp0, fs);
P
pbrook 已提交
6885
            gen_helper_float_rsqrt1_d(fp0, fp0);
6886
            gen_store_fpr64(ctx, fp0, fd);
P
pbrook 已提交
6887
            tcg_temp_free_i64(fp0);
6888
        }
T
ths 已提交
6889 6890
        opn = "rsqrt1.d";
        break;
6891
    case OPC_RSQRT2_D:
6892
        check_cp1_64bitmode(ctx);
6893
        {
P
pbrook 已提交
6894 6895
            TCGv_i64 fp0 = tcg_temp_new_i64();
            TCGv_i64 fp1 = tcg_temp_new_i64();
6896 6897 6898

            gen_load_fpr64(ctx, fp0, fs);
            gen_load_fpr64(ctx, fp1, ft);
P
pbrook 已提交
6899 6900
            gen_helper_float_rsqrt2_d(fp0, fp0, fp1);
            tcg_temp_free_i64(fp1);
6901
            gen_store_fpr64(ctx, fp0, fd);
P
pbrook 已提交
6902
            tcg_temp_free_i64(fp0);
6903
        }
T
ths 已提交
6904 6905
        opn = "rsqrt2.d";
        break;
6906 6907 6908 6909 6910 6911 6912 6913 6914 6915 6916 6917 6918 6919 6920 6921
    case OPC_CMP_F_D:
    case OPC_CMP_UN_D:
    case OPC_CMP_EQ_D:
    case OPC_CMP_UEQ_D:
    case OPC_CMP_OLT_D:
    case OPC_CMP_ULT_D:
    case OPC_CMP_OLE_D:
    case OPC_CMP_ULE_D:
    case OPC_CMP_SF_D:
    case OPC_CMP_NGLE_D:
    case OPC_CMP_SEQ_D:
    case OPC_CMP_NGL_D:
    case OPC_CMP_LT_D:
    case OPC_CMP_NGE_D:
    case OPC_CMP_LE_D:
    case OPC_CMP_NGT_D:
6922 6923 6924 6925 6926 6927
        if (ctx->opcode & (1 << 6)) {
            gen_cmpabs_d(ctx, func-48, ft, fs, cc);
            opn = condnames_abs[func-48];
        } else {
            gen_cmp_d(ctx, func-48, ft, fs, cc);
            opn = condnames[func-48];
6928
        }
B
bellard 已提交
6929
        break;
6930
    case OPC_CVT_S_D:
6931
        check_cp1_registers(ctx, fs);
6932
        {
P
pbrook 已提交
6933 6934
            TCGv_i32 fp32 = tcg_temp_new_i32();
            TCGv_i64 fp64 = tcg_temp_new_i64();
6935 6936

            gen_load_fpr64(ctx, fp64, fs);
P
pbrook 已提交
6937 6938
            gen_helper_float_cvts_d(fp32, fp64);
            tcg_temp_free_i64(fp64);
6939
            gen_store_fpr32(fp32, fd);
P
pbrook 已提交
6940
            tcg_temp_free_i32(fp32);
6941
        }
6942 6943
        opn = "cvt.s.d";
        break;
6944
    case OPC_CVT_W_D:
6945
        check_cp1_registers(ctx, fs);
6946
        {
P
pbrook 已提交
6947 6948
            TCGv_i32 fp32 = tcg_temp_new_i32();
            TCGv_i64 fp64 = tcg_temp_new_i64();
6949 6950

            gen_load_fpr64(ctx, fp64, fs);
P
pbrook 已提交
6951 6952
            gen_helper_float_cvtw_d(fp32, fp64);
            tcg_temp_free_i64(fp64);
6953
            gen_store_fpr32(fp32, fd);
P
pbrook 已提交
6954
            tcg_temp_free_i32(fp32);
6955
        }
6956 6957
        opn = "cvt.w.d";
        break;
6958
    case OPC_CVT_L_D:
6959
        check_cp1_64bitmode(ctx);
6960
        {
P
pbrook 已提交
6961
            TCGv_i64 fp0 = tcg_temp_new_i64();
6962 6963

            gen_load_fpr64(ctx, fp0, fs);
P
pbrook 已提交
6964
            gen_helper_float_cvtl_d(fp0, fp0);
6965
            gen_store_fpr64(ctx, fp0, fd);
P
pbrook 已提交
6966
            tcg_temp_free_i64(fp0);
6967
        }
6968 6969
        opn = "cvt.l.d";
        break;
6970
    case OPC_CVT_S_W:
6971
        {
P
pbrook 已提交
6972
            TCGv_i32 fp0 = tcg_temp_new_i32();
6973 6974

            gen_load_fpr32(fp0, fs);
P
pbrook 已提交
6975
            gen_helper_float_cvts_w(fp0, fp0);
6976
            gen_store_fpr32(fp0, fd);
P
pbrook 已提交
6977
            tcg_temp_free_i32(fp0);
6978
        }
6979
        opn = "cvt.s.w";
B
bellard 已提交
6980
        break;
6981
    case OPC_CVT_D_W:
6982
        check_cp1_registers(ctx, fd);
6983
        {
P
pbrook 已提交
6984 6985
            TCGv_i32 fp32 = tcg_temp_new_i32();
            TCGv_i64 fp64 = tcg_temp_new_i64();
6986 6987

            gen_load_fpr32(fp32, fs);
P
pbrook 已提交
6988 6989
            gen_helper_float_cvtd_w(fp64, fp32);
            tcg_temp_free_i32(fp32);
6990
            gen_store_fpr64(ctx, fp64, fd);
P
pbrook 已提交
6991
            tcg_temp_free_i64(fp64);
6992
        }
6993 6994
        opn = "cvt.d.w";
        break;
6995
    case OPC_CVT_S_L:
6996
        check_cp1_64bitmode(ctx);
6997
        {
P
pbrook 已提交
6998 6999
            TCGv_i32 fp32 = tcg_temp_new_i32();
            TCGv_i64 fp64 = tcg_temp_new_i64();
7000 7001

            gen_load_fpr64(ctx, fp64, fs);
P
pbrook 已提交
7002 7003
            gen_helper_float_cvts_l(fp32, fp64);
            tcg_temp_free_i64(fp64);
7004
            gen_store_fpr32(fp32, fd);
P
pbrook 已提交
7005
            tcg_temp_free_i32(fp32);
7006
        }
7007 7008
        opn = "cvt.s.l";
        break;
7009
    case OPC_CVT_D_L:
7010
        check_cp1_64bitmode(ctx);
7011
        {
P
pbrook 已提交
7012
            TCGv_i64 fp0 = tcg_temp_new_i64();
7013 7014

            gen_load_fpr64(ctx, fp0, fs);
P
pbrook 已提交
7015
            gen_helper_float_cvtd_l(fp0, fp0);
7016
            gen_store_fpr64(ctx, fp0, fd);
P
pbrook 已提交
7017
            tcg_temp_free_i64(fp0);
7018
        }
7019 7020
        opn = "cvt.d.l";
        break;
7021
    case OPC_CVT_PS_PW:
7022
        check_cp1_64bitmode(ctx);
7023
        {
P
pbrook 已提交
7024
            TCGv_i64 fp0 = tcg_temp_new_i64();
7025 7026

            gen_load_fpr64(ctx, fp0, fs);
P
pbrook 已提交
7027
            gen_helper_float_cvtps_pw(fp0, fp0);
7028
            gen_store_fpr64(ctx, fp0, fd);
P
pbrook 已提交
7029
            tcg_temp_free_i64(fp0);
7030
        }
7031 7032
        opn = "cvt.ps.pw";
        break;
7033
    case OPC_ADD_PS:
7034
        check_cp1_64bitmode(ctx);
7035
        {
P
pbrook 已提交
7036 7037
            TCGv_i64 fp0 = tcg_temp_new_i64();
            TCGv_i64 fp1 = tcg_temp_new_i64();
7038 7039 7040

            gen_load_fpr64(ctx, fp0, fs);
            gen_load_fpr64(ctx, fp1, ft);
P
pbrook 已提交
7041 7042
            gen_helper_float_add_ps(fp0, fp0, fp1);
            tcg_temp_free_i64(fp1);
7043
            gen_store_fpr64(ctx, fp0, fd);
P
pbrook 已提交
7044
            tcg_temp_free_i64(fp0);
7045
        }
7046
        opn = "add.ps";
B
bellard 已提交
7047
        break;
7048
    case OPC_SUB_PS:
7049
        check_cp1_64bitmode(ctx);
7050
        {
P
pbrook 已提交
7051 7052
            TCGv_i64 fp0 = tcg_temp_new_i64();
            TCGv_i64 fp1 = tcg_temp_new_i64();
7053 7054 7055

            gen_load_fpr64(ctx, fp0, fs);
            gen_load_fpr64(ctx, fp1, ft);
P
pbrook 已提交
7056 7057
            gen_helper_float_sub_ps(fp0, fp0, fp1);
            tcg_temp_free_i64(fp1);
7058
            gen_store_fpr64(ctx, fp0, fd);
P
pbrook 已提交
7059
            tcg_temp_free_i64(fp0);
7060
        }
7061
        opn = "sub.ps";
B
bellard 已提交
7062
        break;
7063
    case OPC_MUL_PS:
7064
        check_cp1_64bitmode(ctx);
7065
        {
P
pbrook 已提交
7066 7067
            TCGv_i64 fp0 = tcg_temp_new_i64();
            TCGv_i64 fp1 = tcg_temp_new_i64();
7068 7069 7070

            gen_load_fpr64(ctx, fp0, fs);
            gen_load_fpr64(ctx, fp1, ft);
P
pbrook 已提交
7071 7072
            gen_helper_float_mul_ps(fp0, fp0, fp1);
            tcg_temp_free_i64(fp1);
7073
            gen_store_fpr64(ctx, fp0, fd);
P
pbrook 已提交
7074
            tcg_temp_free_i64(fp0);
7075
        }
7076
        opn = "mul.ps";
B
bellard 已提交
7077
        break;
7078
    case OPC_ABS_PS:
7079
        check_cp1_64bitmode(ctx);
7080
        {
P
pbrook 已提交
7081
            TCGv_i64 fp0 = tcg_temp_new_i64();
7082 7083

            gen_load_fpr64(ctx, fp0, fs);
P
pbrook 已提交
7084
            gen_helper_float_abs_ps(fp0, fp0);
7085
            gen_store_fpr64(ctx, fp0, fd);
P
pbrook 已提交
7086
            tcg_temp_free_i64(fp0);
7087
        }
7088
        opn = "abs.ps";
B
bellard 已提交
7089
        break;
7090
    case OPC_MOV_PS:
7091
        check_cp1_64bitmode(ctx);
7092
        {
P
pbrook 已提交
7093
            TCGv_i64 fp0 = tcg_temp_new_i64();
7094 7095 7096

            gen_load_fpr64(ctx, fp0, fs);
            gen_store_fpr64(ctx, fp0, fd);
P
pbrook 已提交
7097
            tcg_temp_free_i64(fp0);
7098
        }
7099
        opn = "mov.ps";
B
bellard 已提交
7100
        break;
7101
    case OPC_NEG_PS:
7102
        check_cp1_64bitmode(ctx);
7103
        {
P
pbrook 已提交
7104
            TCGv_i64 fp0 = tcg_temp_new_i64();
7105 7106

            gen_load_fpr64(ctx, fp0, fs);
P
pbrook 已提交
7107
            gen_helper_float_chs_ps(fp0, fp0);
7108
            gen_store_fpr64(ctx, fp0, fd);
P
pbrook 已提交
7109
            tcg_temp_free_i64(fp0);
7110
        }
7111
        opn = "neg.ps";
B
bellard 已提交
7112
        break;
7113
    case OPC_MOVCF_PS:
7114
        check_cp1_64bitmode(ctx);
7115
        gen_movcf_ps(fs, fd, (ft >> 2) & 0x7, ft & 0x1);
7116
        opn = "movcf.ps";
B
bellard 已提交
7117
        break;
7118
    case OPC_MOVZ_PS:
7119
        check_cp1_64bitmode(ctx);
7120 7121
        {
            int l1 = gen_new_label();
A
aurel32 已提交
7122
            TCGv_i64 fp0;
7123

A
aurel32 已提交
7124 7125 7126 7127 7128 7129
            if (ft != 0)
                tcg_gen_brcondi_tl(TCG_COND_NE, cpu_gpr[ft], 0, l1);
            fp0 = tcg_temp_new_i64();
            gen_load_fpr64(ctx, fp0, fs);
            gen_store_fpr64(ctx, fp0, fd);
            tcg_temp_free_i64(fp0);
7130 7131
            gen_set_label(l1);
        }
7132
        opn = "movz.ps";
B
bellard 已提交
7133
        break;
7134
    case OPC_MOVN_PS:
7135
        check_cp1_64bitmode(ctx);
7136 7137
        {
            int l1 = gen_new_label();
A
aurel32 已提交
7138
            TCGv_i64 fp0;
A
aurel32 已提交
7139 7140 7141 7142 7143 7144 7145 7146 7147

            if (ft != 0) {
                tcg_gen_brcondi_tl(TCG_COND_EQ, cpu_gpr[ft], 0, l1);
                fp0 = tcg_temp_new_i64();
                gen_load_fpr64(ctx, fp0, fs);
                gen_store_fpr64(ctx, fp0, fd);
                tcg_temp_free_i64(fp0);
                gen_set_label(l1);
            }
7148
        }
7149
        opn = "movn.ps";
B
bellard 已提交
7150
        break;
7151
    case OPC_ADDR_PS:
7152
        check_cp1_64bitmode(ctx);
7153
        {
P
pbrook 已提交
7154 7155
            TCGv_i64 fp0 = tcg_temp_new_i64();
            TCGv_i64 fp1 = tcg_temp_new_i64();
7156 7157 7158

            gen_load_fpr64(ctx, fp0, ft);
            gen_load_fpr64(ctx, fp1, fs);
P
pbrook 已提交
7159 7160
            gen_helper_float_addr_ps(fp0, fp0, fp1);
            tcg_temp_free_i64(fp1);
7161
            gen_store_fpr64(ctx, fp0, fd);
P
pbrook 已提交
7162
            tcg_temp_free_i64(fp0);
7163
        }
7164 7165
        opn = "addr.ps";
        break;
7166
    case OPC_MULR_PS:
7167
        check_cp1_64bitmode(ctx);
7168
        {
P
pbrook 已提交
7169 7170
            TCGv_i64 fp0 = tcg_temp_new_i64();
            TCGv_i64 fp1 = tcg_temp_new_i64();
7171 7172 7173

            gen_load_fpr64(ctx, fp0, ft);
            gen_load_fpr64(ctx, fp1, fs);
P
pbrook 已提交
7174 7175
            gen_helper_float_mulr_ps(fp0, fp0, fp1);
            tcg_temp_free_i64(fp1);
7176
            gen_store_fpr64(ctx, fp0, fd);
P
pbrook 已提交
7177
            tcg_temp_free_i64(fp0);
7178
        }
T
ths 已提交
7179 7180
        opn = "mulr.ps";
        break;
7181
    case OPC_RECIP2_PS:
7182
        check_cp1_64bitmode(ctx);
7183
        {
P
pbrook 已提交
7184 7185
            TCGv_i64 fp0 = tcg_temp_new_i64();
            TCGv_i64 fp1 = tcg_temp_new_i64();
7186 7187 7188

            gen_load_fpr64(ctx, fp0, fs);
            gen_load_fpr64(ctx, fp1, fd);
P
pbrook 已提交
7189 7190
            gen_helper_float_recip2_ps(fp0, fp0, fp1);
            tcg_temp_free_i64(fp1);
7191
            gen_store_fpr64(ctx, fp0, fd);
P
pbrook 已提交
7192
            tcg_temp_free_i64(fp0);
7193
        }
T
ths 已提交
7194 7195
        opn = "recip2.ps";
        break;
7196
    case OPC_RECIP1_PS:
7197
        check_cp1_64bitmode(ctx);
7198
        {
P
pbrook 已提交
7199
            TCGv_i64 fp0 = tcg_temp_new_i64();
7200 7201

            gen_load_fpr64(ctx, fp0, fs);
P
pbrook 已提交
7202
            gen_helper_float_recip1_ps(fp0, fp0);
7203
            gen_store_fpr64(ctx, fp0, fd);
P
pbrook 已提交
7204
            tcg_temp_free_i64(fp0);
7205
        }
T
ths 已提交
7206 7207
        opn = "recip1.ps";
        break;
7208
    case OPC_RSQRT1_PS:
7209
        check_cp1_64bitmode(ctx);
7210
        {
P
pbrook 已提交
7211
            TCGv_i64 fp0 = tcg_temp_new_i64();
7212 7213

            gen_load_fpr64(ctx, fp0, fs);
P
pbrook 已提交
7214
            gen_helper_float_rsqrt1_ps(fp0, fp0);
7215
            gen_store_fpr64(ctx, fp0, fd);
P
pbrook 已提交
7216
            tcg_temp_free_i64(fp0);
7217
        }
T
ths 已提交
7218 7219
        opn = "rsqrt1.ps";
        break;
7220
    case OPC_RSQRT2_PS:
7221
        check_cp1_64bitmode(ctx);
7222
        {
P
pbrook 已提交
7223 7224
            TCGv_i64 fp0 = tcg_temp_new_i64();
            TCGv_i64 fp1 = tcg_temp_new_i64();
7225 7226 7227

            gen_load_fpr64(ctx, fp0, fs);
            gen_load_fpr64(ctx, fp1, ft);
P
pbrook 已提交
7228 7229
            gen_helper_float_rsqrt2_ps(fp0, fp0, fp1);
            tcg_temp_free_i64(fp1);
7230
            gen_store_fpr64(ctx, fp0, fd);
P
pbrook 已提交
7231
            tcg_temp_free_i64(fp0);
7232
        }
T
ths 已提交
7233 7234
        opn = "rsqrt2.ps";
        break;
7235
    case OPC_CVT_S_PU:
7236
        check_cp1_64bitmode(ctx);
7237
        {
P
pbrook 已提交
7238
            TCGv_i32 fp0 = tcg_temp_new_i32();
7239 7240

            gen_load_fpr32h(fp0, fs);
P
pbrook 已提交
7241
            gen_helper_float_cvts_pu(fp0, fp0);
7242
            gen_store_fpr32(fp0, fd);
P
pbrook 已提交
7243
            tcg_temp_free_i32(fp0);
7244
        }
7245
        opn = "cvt.s.pu";
7246
        break;
7247
    case OPC_CVT_PW_PS:
7248
        check_cp1_64bitmode(ctx);
7249
        {
P
pbrook 已提交
7250
            TCGv_i64 fp0 = tcg_temp_new_i64();
7251 7252

            gen_load_fpr64(ctx, fp0, fs);
P
pbrook 已提交
7253
            gen_helper_float_cvtpw_ps(fp0, fp0);
7254
            gen_store_fpr64(ctx, fp0, fd);
P
pbrook 已提交
7255
            tcg_temp_free_i64(fp0);
7256
        }
7257
        opn = "cvt.pw.ps";
B
bellard 已提交
7258
        break;
7259
    case OPC_CVT_S_PL:
7260
        check_cp1_64bitmode(ctx);
7261
        {
P
pbrook 已提交
7262
            TCGv_i32 fp0 = tcg_temp_new_i32();
7263 7264

            gen_load_fpr32(fp0, fs);
P
pbrook 已提交
7265
            gen_helper_float_cvts_pl(fp0, fp0);
7266
            gen_store_fpr32(fp0, fd);
P
pbrook 已提交
7267
            tcg_temp_free_i32(fp0);
7268
        }
7269
        opn = "cvt.s.pl";
B
bellard 已提交
7270
        break;
7271
    case OPC_PLL_PS:
7272
        check_cp1_64bitmode(ctx);
7273
        {
P
pbrook 已提交
7274 7275
            TCGv_i32 fp0 = tcg_temp_new_i32();
            TCGv_i32 fp1 = tcg_temp_new_i32();
7276 7277 7278 7279 7280

            gen_load_fpr32(fp0, fs);
            gen_load_fpr32(fp1, ft);
            gen_store_fpr32h(fp0, fd);
            gen_store_fpr32(fp1, fd);
P
pbrook 已提交
7281 7282
            tcg_temp_free_i32(fp0);
            tcg_temp_free_i32(fp1);
7283
        }
7284
        opn = "pll.ps";
B
bellard 已提交
7285
        break;
7286
    case OPC_PLU_PS:
7287
        check_cp1_64bitmode(ctx);
7288
        {
P
pbrook 已提交
7289 7290
            TCGv_i32 fp0 = tcg_temp_new_i32();
            TCGv_i32 fp1 = tcg_temp_new_i32();
7291 7292 7293 7294 7295

            gen_load_fpr32(fp0, fs);
            gen_load_fpr32h(fp1, ft);
            gen_store_fpr32(fp1, fd);
            gen_store_fpr32h(fp0, fd);
P
pbrook 已提交
7296 7297
            tcg_temp_free_i32(fp0);
            tcg_temp_free_i32(fp1);
7298
        }
7299 7300
        opn = "plu.ps";
        break;
7301
    case OPC_PUL_PS:
7302
        check_cp1_64bitmode(ctx);
7303
        {
P
pbrook 已提交
7304 7305
            TCGv_i32 fp0 = tcg_temp_new_i32();
            TCGv_i32 fp1 = tcg_temp_new_i32();
7306 7307 7308 7309 7310

            gen_load_fpr32h(fp0, fs);
            gen_load_fpr32(fp1, ft);
            gen_store_fpr32(fp1, fd);
            gen_store_fpr32h(fp0, fd);
P
pbrook 已提交
7311 7312
            tcg_temp_free_i32(fp0);
            tcg_temp_free_i32(fp1);
7313
        }
7314 7315
        opn = "pul.ps";
        break;
7316
    case OPC_PUU_PS:
7317
        check_cp1_64bitmode(ctx);
7318
        {
P
pbrook 已提交
7319 7320
            TCGv_i32 fp0 = tcg_temp_new_i32();
            TCGv_i32 fp1 = tcg_temp_new_i32();
7321 7322 7323 7324 7325

            gen_load_fpr32h(fp0, fs);
            gen_load_fpr32h(fp1, ft);
            gen_store_fpr32(fp1, fd);
            gen_store_fpr32h(fp0, fd);
P
pbrook 已提交
7326 7327
            tcg_temp_free_i32(fp0);
            tcg_temp_free_i32(fp1);
7328
        }
7329 7330
        opn = "puu.ps";
        break;
7331 7332 7333 7334 7335 7336 7337 7338 7339 7340 7341 7342 7343 7344 7345 7346
    case OPC_CMP_F_PS:
    case OPC_CMP_UN_PS:
    case OPC_CMP_EQ_PS:
    case OPC_CMP_UEQ_PS:
    case OPC_CMP_OLT_PS:
    case OPC_CMP_ULT_PS:
    case OPC_CMP_OLE_PS:
    case OPC_CMP_ULE_PS:
    case OPC_CMP_SF_PS:
    case OPC_CMP_NGLE_PS:
    case OPC_CMP_SEQ_PS:
    case OPC_CMP_NGL_PS:
    case OPC_CMP_LT_PS:
    case OPC_CMP_NGE_PS:
    case OPC_CMP_LE_PS:
    case OPC_CMP_NGT_PS:
7347 7348 7349 7350 7351 7352
        if (ctx->opcode & (1 << 6)) {
            gen_cmpabs_ps(ctx, func-48, ft, fs, cc);
            opn = condnames_abs[func-48];
        } else {
            gen_cmp_ps(ctx, func-48, ft, fs, cc);
            opn = condnames[func-48];
7353
        }
B
bellard 已提交
7354
        break;
7355
    default:
7356
        MIPS_INVAL(opn);
7357
        generate_exception (ctx, EXCP_RI);
B
bellard 已提交
7358 7359
        return;
    }
7360 7361
    switch (optype) {
    case BINOP:
B
bellard 已提交
7362
        MIPS_DEBUG("%s %s, %s, %s", opn, fregnames[fd], fregnames[fs], fregnames[ft]);
7363 7364 7365 7366 7367
        break;
    case CMPOP:
        MIPS_DEBUG("%s %s,%s", opn, fregnames[fs], fregnames[ft]);
        break;
    default:
B
bellard 已提交
7368
        MIPS_DEBUG("%s %s,%s", opn, fregnames[fd], fregnames[fs]);
7369 7370
        break;
    }
B
bellard 已提交
7371
}
B
bellard 已提交
7372

7373
/* Coprocessor 3 (FPU) */
7374 7375
static void gen_flt3_ldst (DisasContext *ctx, uint32_t opc,
                           int fd, int fs, int base, int index)
7376
{
7377
    const char *opn = "extended float load/store";
T
ths 已提交
7378
    int store = 0;
A
aurel32 已提交
7379
    TCGv t0 = tcg_temp_new();
7380

T
ths 已提交
7381
    if (base == 0) {
7382
        gen_load_gpr(t0, index);
T
ths 已提交
7383
    } else if (index == 0) {
7384
        gen_load_gpr(t0, base);
T
ths 已提交
7385
    } else {
7386
        gen_load_gpr(t0, index);
7387
        gen_op_addr_add(ctx, t0, cpu_gpr[base], t0);
T
ths 已提交
7388
    }
7389
    /* Don't do NOP if destination is zero: we must perform the actual
7390
       memory access. */
A
aurel32 已提交
7391
    save_cpu_state(ctx, 0);
7392 7393
    switch (opc) {
    case OPC_LWXC1:
7394
        check_cop1x(ctx);
7395
        {
P
pbrook 已提交
7396
            TCGv_i32 fp0 = tcg_temp_new_i32();
7397

A
aurel32 已提交
7398 7399
            tcg_gen_qemu_ld32s(t0, t0, ctx->mem_idx);
            tcg_gen_trunc_tl_i32(fp0, t0);
7400
            gen_store_fpr32(fp0, fd);
P
pbrook 已提交
7401
            tcg_temp_free_i32(fp0);
7402
        }
7403 7404 7405
        opn = "lwxc1";
        break;
    case OPC_LDXC1:
7406 7407
        check_cop1x(ctx);
        check_cp1_registers(ctx, fd);
7408
        {
P
pbrook 已提交
7409
            TCGv_i64 fp0 = tcg_temp_new_i64();
7410 7411 7412

            tcg_gen_qemu_ld64(fp0, t0, ctx->mem_idx);
            gen_store_fpr64(ctx, fp0, fd);
P
pbrook 已提交
7413
            tcg_temp_free_i64(fp0);
7414
        }
7415 7416 7417
        opn = "ldxc1";
        break;
    case OPC_LUXC1:
7418
        check_cp1_64bitmode(ctx);
7419
        tcg_gen_andi_tl(t0, t0, ~0x7);
7420
        {
P
pbrook 已提交
7421
            TCGv_i64 fp0 = tcg_temp_new_i64();
7422 7423 7424

            tcg_gen_qemu_ld64(fp0, t0, ctx->mem_idx);
            gen_store_fpr64(ctx, fp0, fd);
P
pbrook 已提交
7425
            tcg_temp_free_i64(fp0);
7426
        }
7427 7428 7429
        opn = "luxc1";
        break;
    case OPC_SWXC1:
7430
        check_cop1x(ctx);
7431
        {
P
pbrook 已提交
7432
            TCGv_i32 fp0 = tcg_temp_new_i32();
A
aurel32 已提交
7433
            TCGv t1 = tcg_temp_new();
7434 7435

            gen_load_fpr32(fp0, fs);
P
pbrook 已提交
7436 7437 7438
            tcg_gen_extu_i32_tl(t1, fp0);
            tcg_gen_qemu_st32(t1, t0, ctx->mem_idx);
            tcg_temp_free_i32(fp0);
A
aurel32 已提交
7439
            tcg_temp_free(t1);
7440
        }
7441
        opn = "swxc1";
T
ths 已提交
7442
        store = 1;
7443 7444
        break;
    case OPC_SDXC1:
7445 7446
        check_cop1x(ctx);
        check_cp1_registers(ctx, fs);
7447
        {
P
pbrook 已提交
7448
            TCGv_i64 fp0 = tcg_temp_new_i64();
7449 7450 7451

            gen_load_fpr64(ctx, fp0, fs);
            tcg_gen_qemu_st64(fp0, t0, ctx->mem_idx);
P
pbrook 已提交
7452
            tcg_temp_free_i64(fp0);
7453
        }
7454
        opn = "sdxc1";
T
ths 已提交
7455
        store = 1;
7456 7457
        break;
    case OPC_SUXC1:
7458
        check_cp1_64bitmode(ctx);
7459
        tcg_gen_andi_tl(t0, t0, ~0x7);
7460
        {
P
pbrook 已提交
7461
            TCGv_i64 fp0 = tcg_temp_new_i64();
7462 7463 7464

            gen_load_fpr64(ctx, fp0, fs);
            tcg_gen_qemu_st64(fp0, t0, ctx->mem_idx);
P
pbrook 已提交
7465
            tcg_temp_free_i64(fp0);
7466
        }
7467
        opn = "suxc1";
T
ths 已提交
7468
        store = 1;
7469 7470
        break;
    }
7471
    tcg_temp_free(t0);
T
ths 已提交
7472 7473
    MIPS_DEBUG("%s %s, %s(%s)", opn, fregnames[store ? fs : fd],
               regnames[index], regnames[base]);
7474 7475
}

7476 7477
static void gen_flt3_arith (DisasContext *ctx, uint32_t opc,
                            int fd, int fr, int fs, int ft)
7478
{
7479
    const char *opn = "flt3_arith";
7480 7481 7482

    switch (opc) {
    case OPC_ALNV_PS:
7483
        check_cp1_64bitmode(ctx);
7484
        {
P
pbrook 已提交
7485
            TCGv t0 = tcg_temp_local_new();
A
aurel32 已提交
7486 7487
            TCGv_i32 fp = tcg_temp_new_i32();
            TCGv_i32 fph = tcg_temp_new_i32();
7488 7489 7490
            int l1 = gen_new_label();
            int l2 = gen_new_label();

7491 7492 7493 7494
            gen_load_gpr(t0, fr);
            tcg_gen_andi_tl(t0, t0, 0x7);

            tcg_gen_brcondi_tl(TCG_COND_NE, t0, 0, l1);
A
aurel32 已提交
7495 7496 7497 7498
            gen_load_fpr32(fp, fs);
            gen_load_fpr32h(fph, fs);
            gen_store_fpr32(fp, fd);
            gen_store_fpr32h(fph, fd);
7499 7500
            tcg_gen_br(l2);
            gen_set_label(l1);
7501 7502
            tcg_gen_brcondi_tl(TCG_COND_NE, t0, 4, l2);
            tcg_temp_free(t0);
7503
#ifdef TARGET_WORDS_BIGENDIAN
A
aurel32 已提交
7504 7505 7506 7507
            gen_load_fpr32(fp, fs);
            gen_load_fpr32h(fph, ft);
            gen_store_fpr32h(fp, fd);
            gen_store_fpr32(fph, fd);
7508
#else
A
aurel32 已提交
7509 7510 7511 7512
            gen_load_fpr32h(fph, fs);
            gen_load_fpr32(fp, ft);
            gen_store_fpr32(fph, fd);
            gen_store_fpr32h(fp, fd);
7513 7514
#endif
            gen_set_label(l2);
A
aurel32 已提交
7515 7516
            tcg_temp_free_i32(fp);
            tcg_temp_free_i32(fph);
7517
        }
7518 7519 7520
        opn = "alnv.ps";
        break;
    case OPC_MADD_S:
7521
        check_cop1x(ctx);
7522
        {
P
pbrook 已提交
7523 7524 7525
            TCGv_i32 fp0 = tcg_temp_new_i32();
            TCGv_i32 fp1 = tcg_temp_new_i32();
            TCGv_i32 fp2 = tcg_temp_new_i32();
7526 7527 7528 7529

            gen_load_fpr32(fp0, fs);
            gen_load_fpr32(fp1, ft);
            gen_load_fpr32(fp2, fr);
P
pbrook 已提交
7530 7531 7532
            gen_helper_float_muladd_s(fp2, fp0, fp1, fp2);
            tcg_temp_free_i32(fp0);
            tcg_temp_free_i32(fp1);
7533
            gen_store_fpr32(fp2, fd);
P
pbrook 已提交
7534
            tcg_temp_free_i32(fp2);
7535
        }
7536 7537 7538
        opn = "madd.s";
        break;
    case OPC_MADD_D:
7539 7540
        check_cop1x(ctx);
        check_cp1_registers(ctx, fd | fs | ft | fr);
7541
        {
P
pbrook 已提交
7542 7543 7544
            TCGv_i64 fp0 = tcg_temp_new_i64();
            TCGv_i64 fp1 = tcg_temp_new_i64();
            TCGv_i64 fp2 = tcg_temp_new_i64();
7545 7546 7547 7548

            gen_load_fpr64(ctx, fp0, fs);
            gen_load_fpr64(ctx, fp1, ft);
            gen_load_fpr64(ctx, fp2, fr);
P
pbrook 已提交
7549 7550 7551
            gen_helper_float_muladd_d(fp2, fp0, fp1, fp2);
            tcg_temp_free_i64(fp0);
            tcg_temp_free_i64(fp1);
7552
            gen_store_fpr64(ctx, fp2, fd);
P
pbrook 已提交
7553
            tcg_temp_free_i64(fp2);
7554
        }
7555 7556 7557
        opn = "madd.d";
        break;
    case OPC_MADD_PS:
7558
        check_cp1_64bitmode(ctx);
7559
        {
P
pbrook 已提交
7560 7561 7562
            TCGv_i64 fp0 = tcg_temp_new_i64();
            TCGv_i64 fp1 = tcg_temp_new_i64();
            TCGv_i64 fp2 = tcg_temp_new_i64();
7563 7564 7565 7566

            gen_load_fpr64(ctx, fp0, fs);
            gen_load_fpr64(ctx, fp1, ft);
            gen_load_fpr64(ctx, fp2, fr);
P
pbrook 已提交
7567 7568 7569
            gen_helper_float_muladd_ps(fp2, fp0, fp1, fp2);
            tcg_temp_free_i64(fp0);
            tcg_temp_free_i64(fp1);
7570
            gen_store_fpr64(ctx, fp2, fd);
P
pbrook 已提交
7571
            tcg_temp_free_i64(fp2);
7572
        }
7573 7574 7575
        opn = "madd.ps";
        break;
    case OPC_MSUB_S:
7576
        check_cop1x(ctx);
7577
        {
P
pbrook 已提交
7578 7579 7580
            TCGv_i32 fp0 = tcg_temp_new_i32();
            TCGv_i32 fp1 = tcg_temp_new_i32();
            TCGv_i32 fp2 = tcg_temp_new_i32();
7581 7582 7583 7584

            gen_load_fpr32(fp0, fs);
            gen_load_fpr32(fp1, ft);
            gen_load_fpr32(fp2, fr);
P
pbrook 已提交
7585 7586 7587
            gen_helper_float_mulsub_s(fp2, fp0, fp1, fp2);
            tcg_temp_free_i32(fp0);
            tcg_temp_free_i32(fp1);
7588
            gen_store_fpr32(fp2, fd);
P
pbrook 已提交
7589
            tcg_temp_free_i32(fp2);
7590
        }
7591 7592 7593
        opn = "msub.s";
        break;
    case OPC_MSUB_D:
7594 7595
        check_cop1x(ctx);
        check_cp1_registers(ctx, fd | fs | ft | fr);
7596
        {
P
pbrook 已提交
7597 7598 7599
            TCGv_i64 fp0 = tcg_temp_new_i64();
            TCGv_i64 fp1 = tcg_temp_new_i64();
            TCGv_i64 fp2 = tcg_temp_new_i64();
7600 7601 7602 7603

            gen_load_fpr64(ctx, fp0, fs);
            gen_load_fpr64(ctx, fp1, ft);
            gen_load_fpr64(ctx, fp2, fr);
P
pbrook 已提交
7604 7605 7606
            gen_helper_float_mulsub_d(fp2, fp0, fp1, fp2);
            tcg_temp_free_i64(fp0);
            tcg_temp_free_i64(fp1);
7607
            gen_store_fpr64(ctx, fp2, fd);
P
pbrook 已提交
7608
            tcg_temp_free_i64(fp2);
7609
        }
7610 7611 7612
        opn = "msub.d";
        break;
    case OPC_MSUB_PS:
7613
        check_cp1_64bitmode(ctx);
7614
        {
P
pbrook 已提交
7615 7616 7617
            TCGv_i64 fp0 = tcg_temp_new_i64();
            TCGv_i64 fp1 = tcg_temp_new_i64();
            TCGv_i64 fp2 = tcg_temp_new_i64();
7618 7619 7620 7621

            gen_load_fpr64(ctx, fp0, fs);
            gen_load_fpr64(ctx, fp1, ft);
            gen_load_fpr64(ctx, fp2, fr);
P
pbrook 已提交
7622 7623 7624
            gen_helper_float_mulsub_ps(fp2, fp0, fp1, fp2);
            tcg_temp_free_i64(fp0);
            tcg_temp_free_i64(fp1);
7625
            gen_store_fpr64(ctx, fp2, fd);
P
pbrook 已提交
7626
            tcg_temp_free_i64(fp2);
7627
        }
7628 7629 7630
        opn = "msub.ps";
        break;
    case OPC_NMADD_S:
7631
        check_cop1x(ctx);
7632
        {
P
pbrook 已提交
7633 7634 7635
            TCGv_i32 fp0 = tcg_temp_new_i32();
            TCGv_i32 fp1 = tcg_temp_new_i32();
            TCGv_i32 fp2 = tcg_temp_new_i32();
7636 7637 7638 7639

            gen_load_fpr32(fp0, fs);
            gen_load_fpr32(fp1, ft);
            gen_load_fpr32(fp2, fr);
P
pbrook 已提交
7640 7641 7642
            gen_helper_float_nmuladd_s(fp2, fp0, fp1, fp2);
            tcg_temp_free_i32(fp0);
            tcg_temp_free_i32(fp1);
7643
            gen_store_fpr32(fp2, fd);
P
pbrook 已提交
7644
            tcg_temp_free_i32(fp2);
7645
        }
7646 7647 7648
        opn = "nmadd.s";
        break;
    case OPC_NMADD_D:
7649 7650
        check_cop1x(ctx);
        check_cp1_registers(ctx, fd | fs | ft | fr);
7651
        {
P
pbrook 已提交
7652 7653 7654
            TCGv_i64 fp0 = tcg_temp_new_i64();
            TCGv_i64 fp1 = tcg_temp_new_i64();
            TCGv_i64 fp2 = tcg_temp_new_i64();
7655 7656 7657 7658

            gen_load_fpr64(ctx, fp0, fs);
            gen_load_fpr64(ctx, fp1, ft);
            gen_load_fpr64(ctx, fp2, fr);
P
pbrook 已提交
7659 7660 7661
            gen_helper_float_nmuladd_d(fp2, fp0, fp1, fp2);
            tcg_temp_free_i64(fp0);
            tcg_temp_free_i64(fp1);
7662
            gen_store_fpr64(ctx, fp2, fd);
P
pbrook 已提交
7663
            tcg_temp_free_i64(fp2);
7664
        }
7665 7666 7667
        opn = "nmadd.d";
        break;
    case OPC_NMADD_PS:
7668
        check_cp1_64bitmode(ctx);
7669
        {
P
pbrook 已提交
7670 7671 7672
            TCGv_i64 fp0 = tcg_temp_new_i64();
            TCGv_i64 fp1 = tcg_temp_new_i64();
            TCGv_i64 fp2 = tcg_temp_new_i64();
7673 7674 7675 7676

            gen_load_fpr64(ctx, fp0, fs);
            gen_load_fpr64(ctx, fp1, ft);
            gen_load_fpr64(ctx, fp2, fr);
P
pbrook 已提交
7677 7678 7679
            gen_helper_float_nmuladd_ps(fp2, fp0, fp1, fp2);
            tcg_temp_free_i64(fp0);
            tcg_temp_free_i64(fp1);
7680
            gen_store_fpr64(ctx, fp2, fd);
P
pbrook 已提交
7681
            tcg_temp_free_i64(fp2);
7682
        }
7683 7684 7685
        opn = "nmadd.ps";
        break;
    case OPC_NMSUB_S:
7686
        check_cop1x(ctx);
7687
        {
P
pbrook 已提交
7688 7689 7690
            TCGv_i32 fp0 = tcg_temp_new_i32();
            TCGv_i32 fp1 = tcg_temp_new_i32();
            TCGv_i32 fp2 = tcg_temp_new_i32();
7691 7692 7693 7694

            gen_load_fpr32(fp0, fs);
            gen_load_fpr32(fp1, ft);
            gen_load_fpr32(fp2, fr);
P
pbrook 已提交
7695 7696 7697
            gen_helper_float_nmulsub_s(fp2, fp0, fp1, fp2);
            tcg_temp_free_i32(fp0);
            tcg_temp_free_i32(fp1);
7698
            gen_store_fpr32(fp2, fd);
P
pbrook 已提交
7699
            tcg_temp_free_i32(fp2);
7700
        }
7701 7702 7703
        opn = "nmsub.s";
        break;
    case OPC_NMSUB_D:
7704 7705
        check_cop1x(ctx);
        check_cp1_registers(ctx, fd | fs | ft | fr);
7706
        {
P
pbrook 已提交
7707 7708 7709
            TCGv_i64 fp0 = tcg_temp_new_i64();
            TCGv_i64 fp1 = tcg_temp_new_i64();
            TCGv_i64 fp2 = tcg_temp_new_i64();
7710 7711 7712 7713

            gen_load_fpr64(ctx, fp0, fs);
            gen_load_fpr64(ctx, fp1, ft);
            gen_load_fpr64(ctx, fp2, fr);
P
pbrook 已提交
7714 7715 7716
            gen_helper_float_nmulsub_d(fp2, fp0, fp1, fp2);
            tcg_temp_free_i64(fp0);
            tcg_temp_free_i64(fp1);
7717
            gen_store_fpr64(ctx, fp2, fd);
P
pbrook 已提交
7718
            tcg_temp_free_i64(fp2);
7719
        }
7720 7721 7722
        opn = "nmsub.d";
        break;
    case OPC_NMSUB_PS:
7723
        check_cp1_64bitmode(ctx);
7724
        {
P
pbrook 已提交
7725 7726 7727
            TCGv_i64 fp0 = tcg_temp_new_i64();
            TCGv_i64 fp1 = tcg_temp_new_i64();
            TCGv_i64 fp2 = tcg_temp_new_i64();
7728 7729 7730 7731

            gen_load_fpr64(ctx, fp0, fs);
            gen_load_fpr64(ctx, fp1, ft);
            gen_load_fpr64(ctx, fp2, fr);
P
pbrook 已提交
7732 7733 7734
            gen_helper_float_nmulsub_ps(fp2, fp0, fp1, fp2);
            tcg_temp_free_i64(fp0);
            tcg_temp_free_i64(fp1);
7735
            gen_store_fpr64(ctx, fp2, fd);
P
pbrook 已提交
7736
            tcg_temp_free_i64(fp2);
7737
        }
7738 7739
        opn = "nmsub.ps";
        break;
7740 7741
    default:
        MIPS_INVAL(opn);
7742 7743 7744 7745 7746
        generate_exception (ctx, EXCP_RI);
        return;
    }
    MIPS_DEBUG("%s %s, %s, %s, %s", opn, fregnames[fd], fregnames[fr],
               fregnames[fs], fregnames[ft]);
7747 7748
}

7749 7750 7751 7752 7753 7754 7755 7756 7757 7758 7759 7760 7761 7762 7763 7764 7765 7766 7767 7768 7769 7770 7771 7772 7773 7774 7775 7776 7777 7778 7779 7780 7781 7782 7783 7784 7785 7786 7787 7788 7789 7790 7791 7792 7793 7794
static void
gen_rdhwr (CPUState *env, DisasContext *ctx, int rt, int rd)
{
    TCGv t0;

    check_insn(env, ctx, ISA_MIPS32R2);
    t0 = tcg_temp_new();

    switch (rd) {
    case 0:
        save_cpu_state(ctx, 1);
        gen_helper_rdhwr_cpunum(t0);
        gen_store_gpr(t0, rt);
        break;
    case 1:
        save_cpu_state(ctx, 1);
        gen_helper_rdhwr_synci_step(t0);
        gen_store_gpr(t0, rt);
        break;
    case 2:
        save_cpu_state(ctx, 1);
        gen_helper_rdhwr_cc(t0);
        gen_store_gpr(t0, rt);
        break;
    case 3:
        save_cpu_state(ctx, 1);
        gen_helper_rdhwr_ccres(t0);
        gen_store_gpr(t0, rt);
        break;
    case 29:
#if defined(CONFIG_USER_ONLY)
        tcg_gen_ld_tl(t0, cpu_env, offsetof(CPUState, tls_value));
        gen_store_gpr(t0, rt);
        break;
#else
        /* XXX: Some CPUs implement this in hardware.
           Not supported yet. */
#endif
    default:            /* Invalid */
        MIPS_INVAL("rdhwr");
        generate_exception(ctx, EXCP_RI);
        break;
    }
    tcg_temp_free(t0);
}

7795 7796 7797 7798
static void handle_delay_slot (CPUState *env, DisasContext *ctx,
                               int insn_bytes)
{
    if (ctx->hflags & MIPS_HFLAG_BMASK) {
7799
        int proc_hflags = ctx->hflags & MIPS_HFLAG_BMASK;
7800 7801 7802 7803 7804
        /* Branches completion */
        ctx->hflags &= ~MIPS_HFLAG_BMASK;
        ctx->bstate = BS_BRANCH;
        save_cpu_state(ctx, 0);
        /* FIXME: Need to clear can_do_io.  */
7805
        switch (proc_hflags & MIPS_HFLAG_BMASK_BASE) {
7806 7807 7808
        case MIPS_HFLAG_B:
            /* unconditional branch */
            MIPS_DEBUG("unconditional branch");
7809 7810 7811
            if (proc_hflags & MIPS_HFLAG_BX) {
                tcg_gen_xori_i32(hflags, hflags, MIPS_HFLAG_M16);
            }
7812 7813 7814 7815 7816 7817 7818 7819 7820 7821 7822 7823 7824 7825 7826 7827 7828 7829 7830 7831 7832 7833
            gen_goto_tb(ctx, 0, ctx->btarget);
            break;
        case MIPS_HFLAG_BL:
            /* blikely taken case */
            MIPS_DEBUG("blikely branch taken");
            gen_goto_tb(ctx, 0, ctx->btarget);
            break;
        case MIPS_HFLAG_BC:
            /* Conditional branch */
            MIPS_DEBUG("conditional branch");
            {
                int l1 = gen_new_label();

                tcg_gen_brcondi_tl(TCG_COND_NE, bcond, 0, l1);
                gen_goto_tb(ctx, 1, ctx->pc + insn_bytes);
                gen_set_label(l1);
                gen_goto_tb(ctx, 0, ctx->btarget);
            }
            break;
        case MIPS_HFLAG_BR:
            /* unconditional branch to register */
            MIPS_DEBUG("branch to register");
7834
            if (env->insn_flags & (ASE_MIPS16 | ASE_MICROMIPS)) {
7835 7836 7837 7838 7839 7840 7841 7842 7843 7844 7845 7846 7847 7848 7849
                TCGv t0 = tcg_temp_new();
                TCGv_i32 t1 = tcg_temp_new_i32();

                tcg_gen_andi_tl(t0, btarget, 0x1);
                tcg_gen_trunc_tl_i32(t1, t0);
                tcg_temp_free(t0);
                tcg_gen_andi_i32(hflags, hflags, ~(uint32_t)MIPS_HFLAG_M16);
                tcg_gen_shli_i32(t1, t1, MIPS_HFLAG_M16_SHIFT);
                tcg_gen_or_i32(hflags, hflags, t1);
                tcg_temp_free_i32(t1);

                tcg_gen_andi_tl(cpu_PC, btarget, ~(target_ulong)0x1);
            } else {
                tcg_gen_mov_tl(cpu_PC, btarget);
            }
7850 7851 7852 7853 7854 7855 7856 7857 7858 7859 7860 7861 7862
            if (ctx->singlestep_enabled) {
                save_cpu_state(ctx, 0);
                gen_helper_0i(raise_exception, EXCP_DEBUG);
            }
            tcg_gen_exit_tb(0);
            break;
        default:
            MIPS_DEBUG("unknown branch");
            break;
        }
    }
}

7863
/* ISA extensions (ASEs) */
B
bellard 已提交
7864
/* MIPS16 extension to MIPS32 */
7865 7866 7867 7868 7869 7870 7871 7872 7873 7874 7875 7876 7877 7878 7879 7880 7881 7882 7883 7884 7885 7886 7887 7888 7889 7890 7891 7892 7893 7894 7895 7896 7897 7898 7899 7900 7901 7902 7903 7904 7905 7906 7907 7908 7909 7910 7911 7912 7913 7914 7915 7916 7917 7918 7919 7920 7921 7922 7923 7924 7925 7926 7927 7928 7929 7930 7931 7932 7933 7934 7935 7936 7937 7938 7939 7940 7941 7942 7943 7944 7945 7946 7947 7948 7949 7950 7951 7952 7953 7954 7955 7956 7957 7958 7959 7960 7961

/* MIPS16 major opcodes */
enum {
  M16_OPC_ADDIUSP = 0x00,
  M16_OPC_ADDIUPC = 0x01,
  M16_OPC_B = 0x02,
  M16_OPC_JAL = 0x03,
  M16_OPC_BEQZ = 0x04,
  M16_OPC_BNEQZ = 0x05,
  M16_OPC_SHIFT = 0x06,
  M16_OPC_LD = 0x07,
  M16_OPC_RRIA = 0x08,
  M16_OPC_ADDIU8 = 0x09,
  M16_OPC_SLTI = 0x0a,
  M16_OPC_SLTIU = 0x0b,
  M16_OPC_I8 = 0x0c,
  M16_OPC_LI = 0x0d,
  M16_OPC_CMPI = 0x0e,
  M16_OPC_SD = 0x0f,
  M16_OPC_LB = 0x10,
  M16_OPC_LH = 0x11,
  M16_OPC_LWSP = 0x12,
  M16_OPC_LW = 0x13,
  M16_OPC_LBU = 0x14,
  M16_OPC_LHU = 0x15,
  M16_OPC_LWPC = 0x16,
  M16_OPC_LWU = 0x17,
  M16_OPC_SB = 0x18,
  M16_OPC_SH = 0x19,
  M16_OPC_SWSP = 0x1a,
  M16_OPC_SW = 0x1b,
  M16_OPC_RRR = 0x1c,
  M16_OPC_RR = 0x1d,
  M16_OPC_EXTEND = 0x1e,
  M16_OPC_I64 = 0x1f
};

/* I8 funct field */
enum {
  I8_BTEQZ = 0x0,
  I8_BTNEZ = 0x1,
  I8_SWRASP = 0x2,
  I8_ADJSP = 0x3,
  I8_SVRS = 0x4,
  I8_MOV32R = 0x5,
  I8_MOVR32 = 0x7
};

/* RRR f field */
enum {
  RRR_DADDU = 0x0,
  RRR_ADDU = 0x1,
  RRR_DSUBU = 0x2,
  RRR_SUBU = 0x3
};

/* RR funct field */
enum {
  RR_JR = 0x00,
  RR_SDBBP = 0x01,
  RR_SLT = 0x02,
  RR_SLTU = 0x03,
  RR_SLLV = 0x04,
  RR_BREAK = 0x05,
  RR_SRLV = 0x06,
  RR_SRAV = 0x07,
  RR_DSRL = 0x08,
  RR_CMP = 0x0a,
  RR_NEG = 0x0b,
  RR_AND = 0x0c,
  RR_OR = 0x0d,
  RR_XOR = 0x0e,
  RR_NOT = 0x0f,
  RR_MFHI = 0x10,
  RR_CNVT = 0x11,
  RR_MFLO = 0x12,
  RR_DSRA = 0x13,
  RR_DSLLV = 0x14,
  RR_DSRLV = 0x16,
  RR_DSRAV = 0x17,
  RR_MULT = 0x18,
  RR_MULTU = 0x19,
  RR_DIV = 0x1a,
  RR_DIVU = 0x1b,
  RR_DMULT = 0x1c,
  RR_DMULTU = 0x1d,
  RR_DDIV = 0x1e,
  RR_DDIVU = 0x1f
};

/* I64 funct field */
enum {
  I64_LDSP = 0x0,
  I64_SDSP = 0x1,
  I64_SDRASP = 0x2,
  I64_DADJSP = 0x3,
  I64_LDPC = 0x4,
7962
  I64_DADDIU5 = 0x5,
7963 7964 7965 7966 7967 7968 7969 7970 7971 7972 7973 7974 7975 7976
  I64_DADDIUPC = 0x6,
  I64_DADDIUSP = 0x7
};

/* RR ry field for CNVT */
enum {
  RR_RY_CNVT_ZEB = 0x0,
  RR_RY_CNVT_ZEH = 0x1,
  RR_RY_CNVT_ZEW = 0x2,
  RR_RY_CNVT_SEB = 0x4,
  RR_RY_CNVT_SEH = 0x5,
  RR_RY_CNVT_SEW = 0x6,
};

7977 7978 7979 7980 7981 7982 7983 7984 7985 7986 7987 7988 7989 7990 7991 7992 7993 7994 7995 7996 7997 7998 7999 8000 8001 8002 8003 8004 8005 8006 8007 8008 8009 8010 8011 8012 8013 8014 8015 8016 8017 8018 8019 8020 8021 8022 8023 8024 8025 8026 8027
static int xlat (int r)
{
  static int map[] = { 16, 17, 2, 3, 4, 5, 6, 7 };

  return map[r];
}

static void gen_mips16_save (DisasContext *ctx,
                             int xsregs, int aregs,
                             int do_ra, int do_s0, int do_s1,
                             int framesize)
{
    TCGv t0 = tcg_temp_new();
    TCGv t1 = tcg_temp_new();
    int args, astatic;

    switch (aregs) {
    case 0:
    case 1:
    case 2:
    case 3:
    case 11:
        args = 0;
        break;
    case 4:
    case 5:
    case 6:
    case 7:
        args = 1;
        break;
    case 8:
    case 9:
    case 10:
        args = 2;
        break;
    case 12:
    case 13:
        args = 3;
        break;
    case 14:
        args = 4;
        break;
    default:
        generate_exception(ctx, EXCP_RI);
        return;
    }

    switch (args) {
    case 4:
        gen_base_offset_addr(ctx, t0, 29, 12);
        gen_load_gpr(t1, 7);
8028
        op_st_sw(t1, t0, ctx);
8029 8030 8031 8032
        /* Fall through */
    case 3:
        gen_base_offset_addr(ctx, t0, 29, 8);
        gen_load_gpr(t1, 6);
8033
        op_st_sw(t1, t0, ctx);
8034 8035 8036 8037
        /* Fall through */
    case 2:
        gen_base_offset_addr(ctx, t0, 29, 4);
        gen_load_gpr(t1, 5);
8038
        op_st_sw(t1, t0, ctx);
8039 8040 8041 8042
        /* Fall through */
    case 1:
        gen_base_offset_addr(ctx, t0, 29, 0);
        gen_load_gpr(t1, 4);
8043
        op_st_sw(t1, t0, ctx);
8044 8045 8046 8047 8048 8049 8050
    }

    gen_load_gpr(t0, 29);

#define DECR_AND_STORE(reg) do {                \
        tcg_gen_subi_tl(t0, t0, 4);             \
        gen_load_gpr(t1, reg);                  \
8051
        op_st_sw(t1, t0, ctx);                  \
8052 8053 8054 8055 8056 8057 8058 8059 8060 8061 8062 8063 8064 8065 8066 8067 8068 8069 8070 8071 8072 8073 8074 8075 8076 8077 8078 8079 8080 8081 8082 8083 8084 8085 8086 8087 8088 8089 8090 8091 8092 8093 8094 8095 8096 8097 8098 8099 8100 8101 8102 8103 8104 8105 8106 8107 8108 8109 8110 8111 8112 8113 8114 8115 8116 8117 8118 8119 8120 8121 8122 8123 8124 8125 8126 8127 8128 8129 8130 8131 8132 8133 8134 8135 8136 8137 8138 8139 8140 8141 8142 8143 8144 8145 8146 8147 8148 8149 8150
    } while (0)

    if (do_ra) {
        DECR_AND_STORE(31);
    }

    switch (xsregs) {
    case 7:
        DECR_AND_STORE(30);
        /* Fall through */
    case 6:
        DECR_AND_STORE(23);
        /* Fall through */
    case 5:
        DECR_AND_STORE(22);
        /* Fall through */
    case 4:
        DECR_AND_STORE(21);
        /* Fall through */
    case 3:
        DECR_AND_STORE(20);
        /* Fall through */
    case 2:
        DECR_AND_STORE(19);
        /* Fall through */
    case 1:
        DECR_AND_STORE(18);
    }

    if (do_s1) {
        DECR_AND_STORE(17);
    }
    if (do_s0) {
        DECR_AND_STORE(16);
    }

    switch (aregs) {
    case 0:
    case 4:
    case 8:
    case 12:
    case 14:
        astatic = 0;
        break;
    case 1:
    case 5:
    case 9:
    case 13:
        astatic = 1;
        break;
    case 2:
    case 6:
    case 10:
        astatic = 2;
        break;
    case 3:
    case 7:
        astatic = 3;
        break;
    case 11:
        astatic = 4;
        break;
    default:
        generate_exception(ctx, EXCP_RI);
        return;
    }

    if (astatic > 0) {
        DECR_AND_STORE(7);
        if (astatic > 1) {
            DECR_AND_STORE(6);
            if (astatic > 2) {
                DECR_AND_STORE(5);
                if (astatic > 3) {
                    DECR_AND_STORE(4);
                }
            }
        }
    }
#undef DECR_AND_STORE

    tcg_gen_subi_tl(cpu_gpr[29], cpu_gpr[29], framesize);
    tcg_temp_free(t0);
    tcg_temp_free(t1);
}

static void gen_mips16_restore (DisasContext *ctx,
                                int xsregs, int aregs,
                                int do_ra, int do_s0, int do_s1,
                                int framesize)
{
    int astatic;
    TCGv t0 = tcg_temp_new();
    TCGv t1 = tcg_temp_new();

    tcg_gen_addi_tl(t0, cpu_gpr[29], framesize);

#define DECR_AND_LOAD(reg) do {                 \
        tcg_gen_subi_tl(t0, t0, 4);             \
8151
        op_ld_lw(t1, t0, ctx);                  \
8152 8153 8154 8155 8156 8157 8158 8159 8160 8161 8162 8163 8164 8165 8166 8167 8168 8169 8170 8171 8172 8173 8174 8175 8176 8177 8178 8179 8180 8181 8182 8183 8184 8185 8186 8187 8188 8189 8190 8191 8192 8193 8194 8195 8196 8197 8198 8199 8200 8201 8202 8203 8204 8205 8206 8207 8208 8209 8210 8211 8212 8213 8214 8215 8216 8217 8218 8219 8220 8221 8222 8223 8224 8225 8226 8227 8228 8229 8230 8231 8232 8233 8234 8235 8236 8237 8238 8239 8240 8241 8242 8243 8244 8245 8246 8247 8248 8249 8250 8251 8252 8253 8254 8255 8256 8257 8258 8259 8260 8261 8262 8263 8264 8265 8266 8267 8268
        gen_store_gpr(t1, reg);                 \
    } while (0)

    if (do_ra) {
        DECR_AND_LOAD(31);
    }

    switch (xsregs) {
    case 7:
        DECR_AND_LOAD(30);
        /* Fall through */
    case 6:
        DECR_AND_LOAD(23);
        /* Fall through */
    case 5:
        DECR_AND_LOAD(22);
        /* Fall through */
    case 4:
        DECR_AND_LOAD(21);
        /* Fall through */
    case 3:
        DECR_AND_LOAD(20);
        /* Fall through */
    case 2:
        DECR_AND_LOAD(19);
        /* Fall through */
    case 1:
        DECR_AND_LOAD(18);
    }

    if (do_s1) {
        DECR_AND_LOAD(17);
    }
    if (do_s0) {
        DECR_AND_LOAD(16);
    }

    switch (aregs) {
    case 0:
    case 4:
    case 8:
    case 12:
    case 14:
        astatic = 0;
        break;
    case 1:
    case 5:
    case 9:
    case 13:
        astatic = 1;
        break;
    case 2:
    case 6:
    case 10:
        astatic = 2;
        break;
    case 3:
    case 7:
        astatic = 3;
        break;
    case 11:
        astatic = 4;
        break;
    default:
        generate_exception(ctx, EXCP_RI);
        return;
    }

    if (astatic > 0) {
        DECR_AND_LOAD(7);
        if (astatic > 1) {
            DECR_AND_LOAD(6);
            if (astatic > 2) {
                DECR_AND_LOAD(5);
                if (astatic > 3) {
                    DECR_AND_LOAD(4);
                }
            }
        }
    }
#undef DECR_AND_LOAD

    tcg_gen_addi_tl(cpu_gpr[29], cpu_gpr[29], framesize);
    tcg_temp_free(t0);
    tcg_temp_free(t1);
}

static void gen_addiupc (DisasContext *ctx, int rx, int imm,
                         int is_64_bit, int extended)
{
    TCGv t0;

    if (extended && (ctx->hflags & MIPS_HFLAG_BMASK)) {
        generate_exception(ctx, EXCP_RI);
        return;
    }

    t0 = tcg_temp_new();

    tcg_gen_movi_tl(t0, pc_relative_pc(ctx));
    tcg_gen_addi_tl(cpu_gpr[rx], t0, imm);
    if (!is_64_bit) {
        tcg_gen_ext32s_tl(cpu_gpr[rx], cpu_gpr[rx]);
    }

    tcg_temp_free(t0);
}

#if defined(TARGET_MIPS64)
static void decode_i64_mips16 (CPUState *env, DisasContext *ctx,
                               int ry, int funct, int16_t offset,
                               int extended)
{
    switch (funct) {
    case I64_LDSP:
        check_mips_64(ctx);
        offset = extended ? offset : offset << 3;
8269
        gen_ld(env, ctx, OPC_LD, ry, 29, offset);
8270 8271 8272 8273
        break;
    case I64_SDSP:
        check_mips_64(ctx);
        offset = extended ? offset : offset << 3;
8274
        gen_st(ctx, OPC_SD, ry, 29, offset);
8275 8276 8277 8278
        break;
    case I64_SDRASP:
        check_mips_64(ctx);
        offset = extended ? offset : (ctx->opcode & 0xff) << 3;
8279
        gen_st(ctx, OPC_SD, 31, 29, offset);
8280 8281 8282 8283 8284 8285 8286 8287 8288 8289 8290
        break;
    case I64_DADJSP:
        check_mips_64(ctx);
        offset = extended ? offset : ((int8_t)ctx->opcode) << 3;
        gen_arith_imm(env, ctx, OPC_DADDIU, 29, 29, offset);
        break;
    case I64_LDPC:
        if (extended && (ctx->hflags & MIPS_HFLAG_BMASK)) {
            generate_exception(ctx, EXCP_RI);
        } else {
            offset = extended ? offset : offset << 3;
8291
            gen_ld(env, ctx, OPC_LDPC, ry, 0, offset);
8292 8293 8294 8295 8296 8297 8298 8299 8300 8301 8302 8303 8304 8305 8306 8307 8308 8309 8310 8311 8312 8313 8314 8315 8316 8317 8318 8319 8320 8321 8322 8323 8324 8325 8326 8327 8328 8329 8330 8331 8332 8333 8334 8335 8336 8337 8338 8339 8340 8341 8342 8343 8344 8345 8346 8347 8348 8349 8350 8351 8352 8353 8354 8355 8356 8357 8358 8359 8360 8361 8362 8363 8364 8365 8366 8367 8368 8369 8370 8371 8372 8373 8374
        }
        break;
    case I64_DADDIU5:
        check_mips_64(ctx);
        offset = extended ? offset : ((int8_t)(offset << 3)) >> 3;
        gen_arith_imm(env, ctx, OPC_DADDIU, ry, ry, offset);
        break;
    case I64_DADDIUPC:
        check_mips_64(ctx);
        offset = extended ? offset : offset << 2;
        gen_addiupc(ctx, ry, offset, 1, extended);
        break;
    case I64_DADDIUSP:
        check_mips_64(ctx);
        offset = extended ? offset : offset << 2;
        gen_arith_imm(env, ctx, OPC_DADDIU, ry, 29, offset);
        break;
    }
}
#endif

static int decode_extended_mips16_opc (CPUState *env, DisasContext *ctx,
                                       int *is_branch)
{
    int extend = lduw_code(ctx->pc + 2);
    int op, rx, ry, funct, sa;
    int16_t imm, offset;

    ctx->opcode = (ctx->opcode << 16) | extend;
    op = (ctx->opcode >> 11) & 0x1f;
    sa = (ctx->opcode >> 22) & 0x1f;
    funct = (ctx->opcode >> 8) & 0x7;
    rx = xlat((ctx->opcode >> 8) & 0x7);
    ry = xlat((ctx->opcode >> 5) & 0x7);
    offset = imm = (int16_t) (((ctx->opcode >> 16) & 0x1f) << 11
                              | ((ctx->opcode >> 21) & 0x3f) << 5
                              | (ctx->opcode & 0x1f));

    /* The extended opcodes cleverly reuse the opcodes from their 16-bit
       counterparts.  */
    switch (op) {
    case M16_OPC_ADDIUSP:
        gen_arith_imm(env, ctx, OPC_ADDIU, rx, 29, imm);
        break;
    case M16_OPC_ADDIUPC:
        gen_addiupc(ctx, rx, imm, 0, 1);
        break;
    case M16_OPC_B:
        gen_compute_branch(ctx, OPC_BEQ, 4, 0, 0, offset << 1);
        /* No delay slot, so just process as a normal instruction */
        break;
    case M16_OPC_BEQZ:
        gen_compute_branch(ctx, OPC_BEQ, 4, rx, 0, offset << 1);
        /* No delay slot, so just process as a normal instruction */
        break;
    case M16_OPC_BNEQZ:
        gen_compute_branch(ctx, OPC_BNE, 4, rx, 0, offset << 1);
        /* No delay slot, so just process as a normal instruction */
        break;
    case M16_OPC_SHIFT:
        switch (ctx->opcode & 0x3) {
        case 0x0:
            gen_shift_imm(env, ctx, OPC_SLL, rx, ry, sa);
            break;
        case 0x1:
#if defined(TARGET_MIPS64)
            check_mips_64(ctx);
            gen_shift_imm(env, ctx, OPC_DSLL, rx, ry, sa);
#else
            generate_exception(ctx, EXCP_RI);
#endif
            break;
        case 0x2:
            gen_shift_imm(env, ctx, OPC_SRL, rx, ry, sa);
            break;
        case 0x3:
            gen_shift_imm(env, ctx, OPC_SRA, rx, ry, sa);
            break;
        }
        break;
#if defined(TARGET_MIPS64)
    case M16_OPC_LD:
            check_mips_64(ctx);
8375
        gen_ld(env, ctx, OPC_LD, ry, rx, offset);
8376 8377 8378 8379 8380 8381 8382 8383 8384 8385 8386 8387 8388 8389 8390 8391 8392 8393 8394 8395 8396 8397 8398 8399 8400 8401 8402 8403 8404 8405 8406 8407 8408 8409 8410 8411
        break;
#endif
    case M16_OPC_RRIA:
        imm = ctx->opcode & 0xf;
        imm = imm | ((ctx->opcode >> 20) & 0x7f) << 4;
        imm = imm | ((ctx->opcode >> 16) & 0xf) << 11;
        imm = (int16_t) (imm << 1) >> 1;
        if ((ctx->opcode >> 4) & 0x1) {
#if defined(TARGET_MIPS64)
            check_mips_64(ctx);
            gen_arith_imm(env, ctx, OPC_DADDIU, ry, rx, imm);
#else
            generate_exception(ctx, EXCP_RI);
#endif
        } else {
            gen_arith_imm(env, ctx, OPC_ADDIU, ry, rx, imm);
        }
        break;
    case M16_OPC_ADDIU8:
        gen_arith_imm(env, ctx, OPC_ADDIU, rx, rx, imm);
        break;
    case M16_OPC_SLTI:
        gen_slt_imm(env, OPC_SLTI, 24, rx, imm);
        break;
    case M16_OPC_SLTIU:
        gen_slt_imm(env, OPC_SLTIU, 24, rx, imm);
        break;
    case M16_OPC_I8:
        switch (funct) {
        case I8_BTEQZ:
            gen_compute_branch(ctx, OPC_BEQ, 4, 24, 0, offset << 1);
            break;
        case I8_BTNEZ:
            gen_compute_branch(ctx, OPC_BNE, 4, 24, 0, offset << 1);
            break;
        case I8_SWRASP:
8412
            gen_st(ctx, OPC_SW, 31, 29, imm);
8413 8414 8415 8416 8417 8418 8419 8420 8421 8422 8423 8424 8425 8426 8427 8428 8429 8430 8431 8432 8433 8434 8435 8436 8437 8438 8439 8440 8441 8442 8443 8444 8445 8446 8447 8448 8449 8450
            break;
        case I8_ADJSP:
            gen_arith_imm(env, ctx, OPC_ADDIU, 29, 29, imm);
            break;
        case I8_SVRS:
            {
                int xsregs = (ctx->opcode >> 24) & 0x7;
                int aregs = (ctx->opcode >> 16) & 0xf;
                int do_ra = (ctx->opcode >> 6) & 0x1;
                int do_s0 = (ctx->opcode >> 5) & 0x1;
                int do_s1 = (ctx->opcode >> 4) & 0x1;
                int framesize = (((ctx->opcode >> 20) & 0xf) << 4
                                 | (ctx->opcode & 0xf)) << 3;

                if (ctx->opcode & (1 << 7)) {
                    gen_mips16_save(ctx, xsregs, aregs,
                                    do_ra, do_s0, do_s1,
                                    framesize);
                } else {
                    gen_mips16_restore(ctx, xsregs, aregs,
                                       do_ra, do_s0, do_s1,
                                       framesize);
                }
            }
            break;
        default:
            generate_exception(ctx, EXCP_RI);
            break;
        }
        break;
    case M16_OPC_LI:
        tcg_gen_movi_tl(cpu_gpr[rx], (uint16_t) imm);
        break;
    case M16_OPC_CMPI:
        tcg_gen_xori_tl(cpu_gpr[24], cpu_gpr[rx], (uint16_t) imm);
        break;
#if defined(TARGET_MIPS64)
    case M16_OPC_SD:
8451
        gen_st(ctx, OPC_SD, ry, rx, offset);
8452 8453 8454
        break;
#endif
    case M16_OPC_LB:
8455
        gen_ld(env, ctx, OPC_LB, ry, rx, offset);
8456 8457
        break;
    case M16_OPC_LH:
8458
        gen_ld(env, ctx, OPC_LH, ry, rx, offset);
8459 8460
        break;
    case M16_OPC_LWSP:
8461
        gen_ld(env, ctx, OPC_LW, rx, 29, offset);
8462 8463
        break;
    case M16_OPC_LW:
8464
        gen_ld(env, ctx, OPC_LW, ry, rx, offset);
8465 8466
        break;
    case M16_OPC_LBU:
8467
        gen_ld(env, ctx, OPC_LBU, ry, rx, offset);
8468 8469
        break;
    case M16_OPC_LHU:
8470
        gen_ld(env, ctx, OPC_LHU, ry, rx, offset);
8471 8472
        break;
    case M16_OPC_LWPC:
8473
        gen_ld(env, ctx, OPC_LWPC, rx, 0, offset);
8474 8475 8476
        break;
#if defined(TARGET_MIPS64)
    case M16_OPC_LWU:
8477
        gen_ld(env, ctx, OPC_LWU, ry, rx, offset);
8478 8479 8480
        break;
#endif
    case M16_OPC_SB:
8481
        gen_st(ctx, OPC_SB, ry, rx, offset);
8482 8483
        break;
    case M16_OPC_SH:
8484
        gen_st(ctx, OPC_SH, ry, rx, offset);
8485 8486
        break;
    case M16_OPC_SWSP:
8487
        gen_st(ctx, OPC_SW, rx, 29, offset);
8488 8489
        break;
    case M16_OPC_SW:
8490
        gen_st(ctx, OPC_SW, ry, rx, offset);
8491 8492 8493 8494 8495 8496 8497 8498 8499 8500 8501 8502 8503 8504 8505 8506 8507 8508 8509 8510 8511 8512 8513 8514 8515 8516 8517 8518 8519 8520 8521 8522 8523 8524 8525 8526 8527 8528 8529 8530 8531 8532 8533 8534 8535 8536 8537 8538 8539 8540 8541 8542 8543 8544 8545
        break;
#if defined(TARGET_MIPS64)
    case M16_OPC_I64:
        decode_i64_mips16(env, ctx, ry, funct, offset, 1);
        break;
#endif
    default:
        generate_exception(ctx, EXCP_RI);
        break;
    }

    return 4;
}

static int decode_mips16_opc (CPUState *env, DisasContext *ctx,
                              int *is_branch)
{
    int rx, ry;
    int sa;
    int op, cnvt_op, op1, offset;
    int funct;
    int n_bytes;

    op = (ctx->opcode >> 11) & 0x1f;
    sa = (ctx->opcode >> 2) & 0x7;
    sa = sa == 0 ? 8 : sa;
    rx = xlat((ctx->opcode >> 8) & 0x7);
    cnvt_op = (ctx->opcode >> 5) & 0x7;
    ry = xlat((ctx->opcode >> 5) & 0x7);
    op1 = offset = ctx->opcode & 0x1f;

    n_bytes = 2;

    switch (op) {
    case M16_OPC_ADDIUSP:
        {
            int16_t imm = ((uint8_t) ctx->opcode) << 2;

            gen_arith_imm(env, ctx, OPC_ADDIU, rx, 29, imm);
        }
        break;
    case M16_OPC_ADDIUPC:
        gen_addiupc(ctx, rx, ((uint8_t) ctx->opcode) << 2, 0, 0);
        break;
    case M16_OPC_B:
        offset = (ctx->opcode & 0x7ff) << 1;
        offset = (int16_t)(offset << 4) >> 4;
        gen_compute_branch(ctx, OPC_BEQ, 2, 0, 0, offset);
        /* No delay slot, so just process as a normal instruction */
        break;
    case M16_OPC_JAL:
        offset = lduw_code(ctx->pc + 2);
        offset = (((ctx->opcode & 0x1f) << 21)
                  | ((ctx->opcode >> 5) & 0x1f) << 16
                  | offset) << 2;
N
Nathan Froyd 已提交
8546
        op = ((ctx->opcode >> 10) & 0x1) ? OPC_JALXS : OPC_JALS;
8547 8548 8549 8550 8551 8552 8553 8554 8555 8556 8557 8558 8559 8560 8561 8562 8563 8564 8565 8566 8567 8568 8569 8570 8571 8572 8573 8574 8575 8576 8577 8578 8579 8580 8581 8582
        gen_compute_branch(ctx, op, 4, rx, ry, offset);
        n_bytes = 4;
        *is_branch = 1;
        break;
    case M16_OPC_BEQZ:
        gen_compute_branch(ctx, OPC_BEQ, 2, rx, 0, ((int8_t)ctx->opcode) << 1);
        /* No delay slot, so just process as a normal instruction */
        break;
    case M16_OPC_BNEQZ:
        gen_compute_branch(ctx, OPC_BNE, 2, rx, 0, ((int8_t)ctx->opcode) << 1);
        /* No delay slot, so just process as a normal instruction */
        break;
    case M16_OPC_SHIFT:
        switch (ctx->opcode & 0x3) {
        case 0x0:
            gen_shift_imm(env, ctx, OPC_SLL, rx, ry, sa);
            break;
        case 0x1:
#if defined(TARGET_MIPS64)
            check_mips_64(ctx);
            gen_shift_imm(env, ctx, OPC_DSLL, rx, ry, sa);
#else
            generate_exception(ctx, EXCP_RI);
#endif
            break;
        case 0x2:
            gen_shift_imm(env, ctx, OPC_SRL, rx, ry, sa);
            break;
        case 0x3:
            gen_shift_imm(env, ctx, OPC_SRA, rx, ry, sa);
            break;
        }
        break;
#if defined(TARGET_MIPS64)
    case M16_OPC_LD:
        check_mips_64(ctx);
8583
        gen_ld(env, ctx, OPC_LD, ry, rx, offset << 3);
8584 8585 8586 8587 8588 8589 8590 8591 8592 8593 8594 8595 8596 8597 8598 8599 8600 8601 8602 8603 8604 8605 8606 8607 8608 8609 8610 8611 8612 8613 8614 8615 8616 8617 8618 8619 8620 8621 8622 8623 8624 8625 8626 8627 8628 8629 8630 8631 8632 8633 8634 8635 8636 8637
        break;
#endif
    case M16_OPC_RRIA:
        {
            int16_t imm = (int8_t)((ctx->opcode & 0xf) << 4) >> 4;

            if ((ctx->opcode >> 4) & 1) {
#if defined(TARGET_MIPS64)
                check_mips_64(ctx);
                gen_arith_imm(env, ctx, OPC_DADDIU, ry, rx, imm);
#else
                generate_exception(ctx, EXCP_RI);
#endif
            } else {
                gen_arith_imm(env, ctx, OPC_ADDIU, ry, rx, imm);
            }
        }
        break;
    case M16_OPC_ADDIU8:
        {
            int16_t imm = (int8_t) ctx->opcode;

            gen_arith_imm(env, ctx, OPC_ADDIU, rx, rx, imm);
        }
        break;
    case M16_OPC_SLTI:
        {
            int16_t imm = (uint8_t) ctx->opcode;

            gen_slt_imm(env, OPC_SLTI, 24, rx, imm);
        }
        break;
    case M16_OPC_SLTIU:
        {
            int16_t imm = (uint8_t) ctx->opcode;

            gen_slt_imm(env, OPC_SLTIU, 24, rx, imm);
        }
        break;
    case M16_OPC_I8:
        {
            int reg32;

            funct = (ctx->opcode >> 8) & 0x7;
            switch (funct) {
            case I8_BTEQZ:
                gen_compute_branch(ctx, OPC_BEQ, 2, 24, 0,
                                   ((int8_t)ctx->opcode) << 1);
                break;
            case I8_BTNEZ:
                gen_compute_branch(ctx, OPC_BNE, 2, 24, 0,
                                   ((int8_t)ctx->opcode) << 1);
                break;
            case I8_SWRASP:
8638
                gen_st(ctx, OPC_SW, 31, 29, (ctx->opcode & 0xff) << 2);
8639 8640 8641 8642 8643 8644 8645 8646 8647 8648 8649 8650 8651 8652 8653 8654 8655 8656 8657 8658 8659 8660 8661 8662 8663 8664 8665 8666 8667 8668 8669 8670 8671 8672 8673 8674 8675 8676 8677 8678 8679 8680 8681 8682 8683 8684 8685 8686 8687 8688 8689 8690 8691 8692 8693 8694 8695 8696 8697 8698 8699 8700 8701
                break;
            case I8_ADJSP:
                gen_arith_imm(env, ctx, OPC_ADDIU, 29, 29,
                              ((int8_t)ctx->opcode) << 3);
                break;
            case I8_SVRS:
                {
                    int do_ra = ctx->opcode & (1 << 6);
                    int do_s0 = ctx->opcode & (1 << 5);
                    int do_s1 = ctx->opcode & (1 << 4);
                    int framesize = ctx->opcode & 0xf;

                    if (framesize == 0) {
                        framesize = 128;
                    } else {
                        framesize = framesize << 3;
                    }

                    if (ctx->opcode & (1 << 7)) {
                        gen_mips16_save(ctx, 0, 0,
                                        do_ra, do_s0, do_s1, framesize);
                    } else {
                        gen_mips16_restore(ctx, 0, 0,
                                           do_ra, do_s0, do_s1, framesize);
                    }
                }
                break;
            case I8_MOV32R:
                {
                    int rz = xlat(ctx->opcode & 0x7);

                    reg32 = (((ctx->opcode >> 3) & 0x3) << 3) |
                        ((ctx->opcode >> 5) & 0x7);
                    gen_arith(env, ctx, OPC_ADDU, reg32, rz, 0);
                }
                break;
            case I8_MOVR32:
                reg32 = ctx->opcode & 0x1f;
                gen_arith(env, ctx, OPC_ADDU, ry, reg32, 0);
                break;
            default:
                generate_exception(ctx, EXCP_RI);
                break;
            }
        }
        break;
    case M16_OPC_LI:
        {
            int16_t imm = (uint8_t) ctx->opcode;

            gen_arith_imm(env, ctx, OPC_ADDIU, rx, 0, imm);
        }
        break;
    case M16_OPC_CMPI:
        {
            int16_t imm = (uint8_t) ctx->opcode;

            gen_logic_imm(env, OPC_XORI, 24, rx, imm);
        }
        break;
#if defined(TARGET_MIPS64)
    case M16_OPC_SD:
        check_mips_64(ctx);
8702
        gen_st(ctx, OPC_SD, ry, rx, offset << 3);
8703 8704 8705
        break;
#endif
    case M16_OPC_LB:
8706
        gen_ld(env, ctx, OPC_LB, ry, rx, offset);
8707 8708
        break;
    case M16_OPC_LH:
8709
        gen_ld(env, ctx, OPC_LH, ry, rx, offset << 1);
8710 8711
        break;
    case M16_OPC_LWSP:
8712
        gen_ld(env, ctx, OPC_LW, rx, 29, ((uint8_t)ctx->opcode) << 2);
8713 8714
        break;
    case M16_OPC_LW:
8715
        gen_ld(env, ctx, OPC_LW, ry, rx, offset << 2);
8716 8717
        break;
    case M16_OPC_LBU:
8718
        gen_ld(env, ctx, OPC_LBU, ry, rx, offset);
8719 8720
        break;
    case M16_OPC_LHU:
8721
        gen_ld(env, ctx, OPC_LHU, ry, rx, offset << 1);
8722 8723
        break;
    case M16_OPC_LWPC:
8724
        gen_ld(env, ctx, OPC_LWPC, rx, 0, ((uint8_t)ctx->opcode) << 2);
8725 8726 8727 8728
        break;
#if defined (TARGET_MIPS64)
    case M16_OPC_LWU:
        check_mips_64(ctx);
8729
        gen_ld(env, ctx, OPC_LWU, ry, rx, offset << 2);
8730 8731 8732
        break;
#endif
    case M16_OPC_SB:
8733
        gen_st(ctx, OPC_SB, ry, rx, offset);
8734 8735
        break;
    case M16_OPC_SH:
8736
        gen_st(ctx, OPC_SH, ry, rx, offset << 1);
8737 8738
        break;
    case M16_OPC_SWSP:
8739
        gen_st(ctx, OPC_SW, rx, 29, ((uint8_t)ctx->opcode) << 2);
8740 8741
        break;
    case M16_OPC_SW:
8742
        gen_st(ctx, OPC_SW, ry, rx, offset << 2);
8743 8744 8745 8746 8747 8748 8749 8750 8751 8752 8753 8754 8755 8756 8757 8758 8759 8760 8761 8762 8763 8764 8765 8766 8767 8768 8769 8770 8771 8772 8773 8774 8775 8776 8777 8778 8779 8780 8781 8782 8783 8784
        break;
    case M16_OPC_RRR:
        {
            int rz = xlat((ctx->opcode >> 2) & 0x7);
            int mips32_op;

            switch (ctx->opcode & 0x3) {
            case RRR_ADDU:
                mips32_op = OPC_ADDU;
                break;
            case RRR_SUBU:
                mips32_op = OPC_SUBU;
                break;
#if defined(TARGET_MIPS64)
            case RRR_DADDU:
                mips32_op = OPC_DADDU;
                check_mips_64(ctx);
                break;
            case RRR_DSUBU:
                mips32_op = OPC_DSUBU;
                check_mips_64(ctx);
                break;
#endif
            default:
                generate_exception(ctx, EXCP_RI);
                goto done;
            }

            gen_arith(env, ctx, mips32_op, rz, rx, ry);
        done:
            ;
        }
        break;
    case M16_OPC_RR:
        switch (op1) {
        case RR_JR:
            {
                int nd = (ctx->opcode >> 7) & 0x1;
                int link = (ctx->opcode >> 6) & 0x1;
                int ra = (ctx->opcode >> 5) & 0x1;

                if (link) {
N
Nathan Froyd 已提交
8785
                    op = nd ? OPC_JALRC : OPC_JALRS;
8786 8787 8788 8789 8790 8791 8792 8793 8794 8795 8796 8797 8798 8799 8800 8801 8802 8803 8804 8805 8806 8807 8808 8809 8810 8811 8812 8813 8814 8815 8816 8817 8818 8819 8820 8821 8822 8823 8824 8825 8826 8827 8828 8829 8830 8831 8832 8833 8834 8835 8836 8837 8838 8839 8840 8841 8842 8843 8844 8845 8846 8847 8848 8849 8850 8851 8852 8853 8854 8855 8856 8857 8858 8859 8860 8861 8862 8863 8864 8865 8866 8867 8868 8869 8870 8871 8872 8873 8874 8875 8876 8877 8878 8879 8880 8881 8882 8883 8884 8885 8886 8887 8888 8889 8890 8891 8892 8893 8894 8895 8896 8897 8898 8899 8900 8901 8902 8903 8904 8905 8906 8907 8908 8909 8910 8911 8912 8913 8914 8915 8916 8917 8918 8919 8920 8921 8922 8923 8924 8925 8926 8927 8928 8929 8930 8931 8932 8933 8934 8935 8936 8937 8938 8939 8940 8941 8942 8943 8944 8945 8946 8947 8948 8949 8950 8951 8952 8953 8954
                } else {
                    op = OPC_JR;
                }

                gen_compute_branch(ctx, op, 2, ra ? 31 : rx, 31, 0);
                if (!nd) {
                    *is_branch = 1;
                }
            }
            break;
        case RR_SDBBP:
            /* XXX: not clear which exception should be raised
             *      when in debug mode...
             */
            check_insn(env, ctx, ISA_MIPS32);
            if (!(ctx->hflags & MIPS_HFLAG_DM)) {
                generate_exception(ctx, EXCP_DBp);
            } else {
                generate_exception(ctx, EXCP_DBp);
            }
            break;
        case RR_SLT:
            gen_slt(env, OPC_SLT, 24, rx, ry);
            break;
        case RR_SLTU:
            gen_slt(env, OPC_SLTU, 24, rx, ry);
            break;
        case RR_BREAK:
            generate_exception(ctx, EXCP_BREAK);
            break;
        case RR_SLLV:
            gen_shift(env, ctx, OPC_SLLV, ry, rx, ry);
            break;
        case RR_SRLV:
            gen_shift(env, ctx, OPC_SRLV, ry, rx, ry);
            break;
        case RR_SRAV:
            gen_shift(env, ctx, OPC_SRAV, ry, rx, ry);
            break;
#if defined (TARGET_MIPS64)
        case RR_DSRL:
            check_mips_64(ctx);
            gen_shift_imm(env, ctx, OPC_DSRL, ry, ry, sa);
            break;
#endif
        case RR_CMP:
            gen_logic(env, OPC_XOR, 24, rx, ry);
            break;
        case RR_NEG:
            gen_arith(env, ctx, OPC_SUBU, rx, 0, ry);
            break;
        case RR_AND:
            gen_logic(env, OPC_AND, rx, rx, ry);
            break;
        case RR_OR:
            gen_logic(env, OPC_OR, rx, rx, ry);
            break;
        case RR_XOR:
            gen_logic(env, OPC_XOR, rx, rx, ry);
            break;
        case RR_NOT:
            gen_logic(env, OPC_NOR, rx, ry, 0);
            break;
        case RR_MFHI:
            gen_HILO(ctx, OPC_MFHI, rx);
            break;
        case RR_CNVT:
            switch (cnvt_op) {
            case RR_RY_CNVT_ZEB:
                tcg_gen_ext8u_tl(cpu_gpr[rx], cpu_gpr[rx]);
                break;
            case RR_RY_CNVT_ZEH:
                tcg_gen_ext16u_tl(cpu_gpr[rx], cpu_gpr[rx]);
                break;
            case RR_RY_CNVT_SEB:
                tcg_gen_ext8s_tl(cpu_gpr[rx], cpu_gpr[rx]);
                break;
            case RR_RY_CNVT_SEH:
                tcg_gen_ext16s_tl(cpu_gpr[rx], cpu_gpr[rx]);
                break;
#if defined (TARGET_MIPS64)
            case RR_RY_CNVT_ZEW:
                check_mips_64(ctx);
                tcg_gen_ext32u_tl(cpu_gpr[rx], cpu_gpr[rx]);
                break;
            case RR_RY_CNVT_SEW:
                check_mips_64(ctx);
                tcg_gen_ext32s_tl(cpu_gpr[rx], cpu_gpr[rx]);
                break;
#endif
            default:
                generate_exception(ctx, EXCP_RI);
                break;
            }
            break;
        case RR_MFLO:
            gen_HILO(ctx, OPC_MFLO, rx);
            break;
#if defined (TARGET_MIPS64)
        case RR_DSRA:
            check_mips_64(ctx);
            gen_shift_imm(env, ctx, OPC_DSRA, ry, ry, sa);
            break;
        case RR_DSLLV:
            check_mips_64(ctx);
            gen_shift(env, ctx, OPC_DSLLV, ry, rx, ry);
            break;
        case RR_DSRLV:
            check_mips_64(ctx);
            gen_shift(env, ctx, OPC_DSRLV, ry, rx, ry);
            break;
        case RR_DSRAV:
            check_mips_64(ctx);
            gen_shift(env, ctx, OPC_DSRAV, ry, rx, ry);
            break;
#endif
        case RR_MULT:
            gen_muldiv(ctx, OPC_MULT, rx, ry);
            break;
        case RR_MULTU:
            gen_muldiv(ctx, OPC_MULTU, rx, ry);
            break;
        case RR_DIV:
            gen_muldiv(ctx, OPC_DIV, rx, ry);
            break;
        case RR_DIVU:
            gen_muldiv(ctx, OPC_DIVU, rx, ry);
            break;
#if defined (TARGET_MIPS64)
        case RR_DMULT:
            check_mips_64(ctx);
            gen_muldiv(ctx, OPC_DMULT, rx, ry);
            break;
        case RR_DMULTU:
            check_mips_64(ctx);
            gen_muldiv(ctx, OPC_DMULTU, rx, ry);
            break;
        case RR_DDIV:
            check_mips_64(ctx);
            gen_muldiv(ctx, OPC_DDIV, rx, ry);
            break;
        case RR_DDIVU:
            check_mips_64(ctx);
            gen_muldiv(ctx, OPC_DDIVU, rx, ry);
            break;
#endif
        default:
            generate_exception(ctx, EXCP_RI);
            break;
        }
        break;
    case M16_OPC_EXTEND:
        decode_extended_mips16_opc(env, ctx, is_branch);
        n_bytes = 4;
        break;
#if defined(TARGET_MIPS64)
    case M16_OPC_I64:
        funct = (ctx->opcode >> 8) & 0x7;
        decode_i64_mips16(env, ctx, ry, funct, offset, 0);
        break;
#endif
    default:
        generate_exception(ctx, EXCP_RI);
        break;
    }

    return n_bytes;
}

8955
/* microMIPS extension to MIPS32 */
B
bellard 已提交
8956

8957
/* microMIPS32 major opcodes */
B
bellard 已提交
8958

8959 8960 8961 8962 8963 8964 8965 8966 8967 8968 8969 8970 8971 8972 8973 8974 8975 8976 8977 8978 8979 8980 8981 8982 8983 8984 8985 8986 8987 8988 8989 8990 8991 8992 8993 8994 8995 8996 8997 8998 8999 9000 9001 9002 9003 9004 9005 9006 9007 9008 9009 9010 9011 9012 9013 9014 9015 9016 9017 9018 9019 9020 9021 9022 9023 9024 9025 9026 9027 9028 9029 9030 9031 9032 9033 9034 9035 9036 9037 9038 9039 9040 9041 9042 9043 9044 9045 9046 9047 9048 9049 9050 9051 9052 9053 9054 9055 9056 9057 9058 9059 9060 9061 9062 9063 9064 9065 9066 9067 9068 9069 9070 9071 9072 9073 9074 9075 9076 9077 9078 9079 9080 9081 9082 9083 9084 9085 9086 9087 9088 9089 9090 9091 9092 9093 9094 9095 9096 9097 9098 9099 9100 9101 9102 9103 9104 9105 9106 9107 9108 9109 9110 9111 9112 9113 9114 9115 9116 9117 9118 9119 9120 9121 9122 9123 9124 9125 9126 9127 9128 9129 9130 9131 9132 9133 9134 9135 9136 9137 9138 9139 9140 9141 9142 9143 9144 9145 9146 9147 9148 9149 9150 9151 9152 9153 9154 9155 9156 9157 9158 9159 9160 9161 9162 9163 9164 9165 9166 9167 9168 9169 9170 9171 9172 9173 9174 9175 9176 9177 9178 9179 9180 9181 9182 9183 9184 9185 9186 9187 9188 9189 9190 9191 9192 9193 9194 9195 9196 9197 9198 9199 9200 9201 9202 9203 9204 9205 9206 9207 9208 9209 9210 9211 9212 9213 9214 9215 9216 9217 9218 9219 9220 9221 9222 9223 9224 9225 9226 9227 9228 9229 9230 9231 9232 9233 9234 9235 9236 9237 9238 9239 9240 9241 9242 9243 9244 9245 9246 9247 9248 9249 9250 9251 9252 9253 9254 9255 9256 9257 9258 9259 9260 9261 9262 9263 9264 9265 9266 9267 9268 9269 9270 9271 9272 9273 9274 9275 9276 9277 9278 9279 9280 9281 9282 9283 9284 9285 9286 9287 9288 9289 9290 9291 9292 9293 9294 9295 9296 9297 9298 9299 9300 9301 9302 9303 9304 9305 9306 9307 9308 9309 9310 9311 9312 9313 9314 9315 9316 9317 9318 9319 9320 9321 9322 9323 9324 9325 9326 9327 9328 9329 9330 9331 9332 9333 9334 9335 9336 9337 9338 9339 9340 9341 9342 9343 9344 9345 9346 9347 9348 9349 9350 9351 9352 9353 9354 9355 9356 9357 9358 9359 9360 9361 9362 9363 9364 9365 9366 9367 9368 9369 9370 9371 9372 9373 9374 9375 9376 9377 9378 9379 9380 9381 9382 9383 9384 9385 9386 9387 9388 9389 9390 9391 9392 9393 9394 9395 9396 9397 9398 9399 9400 9401 9402 9403 9404 9405 9406 9407 9408 9409 9410 9411 9412 9413 9414 9415 9416 9417 9418 9419 9420 9421 9422 9423 9424 9425 9426 9427 9428 9429 9430 9431 9432 9433 9434 9435 9436 9437 9438 9439 9440 9441 9442 9443 9444 9445 9446 9447 9448 9449 9450 9451 9452 9453 9454 9455 9456 9457 9458 9459 9460 9461 9462 9463 9464 9465 9466 9467 9468 9469 9470 9471 9472 9473 9474 9475 9476 9477 9478 9479 9480 9481 9482 9483 9484 9485 9486 9487 9488
enum {
    POOL32A = 0x00,
    POOL16A = 0x01,
    LBU16 = 0x02,
    MOVE16 = 0x03,
    ADDI32 = 0x04,
    LBU32 = 0x05,
    SB32 = 0x06,
    LB32 = 0x07,

    POOL32B = 0x08,
    POOL16B = 0x09,
    LHU16 = 0x0a,
    ANDI16 = 0x0b,
    ADDIU32 = 0x0c,
    LHU32 = 0x0d,
    SH32 = 0x0e,
    LH32 = 0x0f,

    POOL32I = 0x10,
    POOL16C = 0x11,
    LWSP16 = 0x12,
    POOL16D = 0x13,
    ORI32 = 0x14,
    POOL32F = 0x15,
    POOL32S = 0x16,
    DADDIU32 = 0x17,

    POOL32C = 0x18,
    LWGP16 = 0x19,
    LW16 = 0x1a,
    POOL16E = 0x1b,
    XORI32 = 0x1c,
    JALS32 = 0x1d,
    ADDIUPC = 0x1e,
    POOL48A = 0x1f,

    /* 0x20 is reserved */
    RES_20 = 0x20,
    POOL16F = 0x21,
    SB16 = 0x22,
    BEQZ16 = 0x23,
    SLTI32 = 0x24,
    BEQ32 = 0x25,
    SWC132 = 0x26,
    LWC132 = 0x27,

    /* 0x28 and 0x29 are reserved */
    RES_28 = 0x28,
    RES_29 = 0x29,
    SH16 = 0x2a,
    BNEZ16 = 0x2b,
    SLTIU32 = 0x2c,
    BNE32 = 0x2d,
    SDC132 = 0x2e,
    LDC132 = 0x2f,

    /* 0x30 and 0x31 are reserved */
    RES_30 = 0x30,
    RES_31 = 0x31,
    SWSP16 = 0x32,
    B16 = 0x33,
    ANDI32 = 0x34,
    J32 = 0x35,
    SD32 = 0x36,
    LD32 = 0x37,

    /* 0x38 and 0x39 are reserved */
    RES_38 = 0x38,
    RES_39 = 0x39,
    SW16 = 0x3a,
    LI16 = 0x3b,
    JALX32 = 0x3c,
    JAL32 = 0x3d,
    SW32 = 0x3e,
    LW32 = 0x3f
};

/* POOL32A encoding of minor opcode field */

enum {
    /* These opcodes are distinguished only by bits 9..6; those bits are
     * what are recorded below. */
    SLL32 = 0x0,
    SRL32 = 0x1,
    SRA = 0x2,
    ROTR = 0x3,

    SLLV = 0x0,
    SRLV = 0x1,
    SRAV = 0x2,
    ROTRV = 0x3,
    ADD = 0x4,
    ADDU32 = 0x5,
    SUB = 0x6,
    SUBU32 = 0x7,
    MUL = 0x8,
    AND = 0x9,
    OR32 = 0xa,
    NOR = 0xb,
    XOR32 = 0xc,
    SLT = 0xd,
    SLTU = 0xe,

    MOVN = 0x0,
    MOVZ = 0x1,
    LWXS = 0x4,

    /* The following can be distinguished by their lower 6 bits. */
    INS = 0x0c,
    EXT = 0x2c,
    POOL32AXF = 0x3c
};

/* POOL32AXF encoding of minor opcode field extension */

enum {
    /* bits 11..6 */
    TEQ = 0x00,
    TGE = 0x08,
    TGEU = 0x10,
    TLT = 0x20,
    TLTU = 0x28,
    TNE = 0x30,

    MFC0 = 0x03,
    MTC0 = 0x0b,

    /* bits 13..12 for 0x01 */
    MFHI_ACC = 0x0,
    MFLO_ACC = 0x1,
    MTHI_ACC = 0x2,
    MTLO_ACC = 0x3,

    /* bits 13..12 for 0x2a */
    MADD_ACC = 0x0,
    MADDU_ACC = 0x1,
    MSUB_ACC = 0x2,
    MSUBU_ACC = 0x3,

    /* bits 13..12 for 0x32 */
    MULT_ACC = 0x0,
    MULTU_ACC = 0x0,

    /* bits 15..12 for 0x2c */
    SEB = 0x2,
    SEH = 0x3,
    CLO = 0x4,
    CLZ = 0x5,
    RDHWR = 0x6,
    WSBH = 0x7,
    MULT = 0x8,
    MULTU = 0x9,
    DIV = 0xa,
    DIVU = 0xb,
    MADD = 0xc,
    MADDU = 0xd,
    MSUB = 0xe,
    MSUBU = 0xf,

    /* bits 15..12 for 0x34 */
    MFC2 = 0x4,
    MTC2 = 0x5,
    MFHC2 = 0x8,
    MTHC2 = 0x9,
    CFC2 = 0xc,
    CTC2 = 0xd,

    /* bits 15..12 for 0x3c */
    JALR = 0x0,
    JR = 0x0,                   /* alias */
    JALR_HB = 0x1,
    JALRS = 0x4,
    JALRS_HB = 0x5,

    /* bits 15..12 for 0x05 */
    RDPGPR = 0xe,
    WRPGPR = 0xf,

    /* bits 15..12 for 0x0d */
    TLBP = 0x0,
    TLBR = 0x1,
    TLBWI = 0x2,
    TLBWR = 0x3,
    WAIT = 0x9,
    IRET = 0xd,
    DERET = 0xe,
    ERET = 0xf,

    /* bits 15..12 for 0x15 */
    DMT = 0x0,
    DVPE = 0x1,
    EMT = 0x2,
    EVPE = 0x3,

    /* bits 15..12 for 0x1d */
    DI = 0x4,
    EI = 0x5,

    /* bits 15..12 for 0x2d */
    SYNC = 0x6,
    SYSCALL = 0x8,
    SDBBP = 0xd,

    /* bits 15..12 for 0x35 */
    MFHI32 = 0x0,
    MFLO32 = 0x1,
    MTHI32 = 0x2,
    MTLO32 = 0x3,
};

/* POOL32B encoding of minor opcode field (bits 15..12) */

enum {
    LWC2 = 0x0,
    LWP = 0x1,
    LDP = 0x4,
    LWM32 = 0x5,
    CACHE = 0x6,
    LDM = 0x7,
    SWC2 = 0x8,
    SWP = 0x9,
    SDP = 0xc,
    SWM32 = 0xd,
    SDM = 0xf
};

/* POOL32C encoding of minor opcode field (bits 15..12) */

enum {
    LWL = 0x0,
    SWL = 0x8,
    LWR = 0x1,
    SWR = 0x9,
    PREF = 0x2,
    /* 0xa is reserved */
    LL = 0x3,
    SC = 0xb,
    LDL = 0x4,
    SDL = 0xc,
    LDR = 0x5,
    SDR = 0xd,
    /* 0x6 is reserved */
    LWU = 0xe,
    LLD = 0x7,
    SCD = 0xf
};

/* POOL32F encoding of minor opcode field (bits 5..0) */

enum {
    /* These are the bit 7..6 values */
    ADD_FMT = 0x0,
    MOVN_FMT = 0x0,

    SUB_FMT = 0x1,
    MOVZ_FMT = 0x1,

    MUL_FMT = 0x2,

    DIV_FMT = 0x3,

    /* These are the bit 8..6 values */
    RSQRT2_FMT = 0x0,
    MOVF_FMT = 0x0,

    LWXC1 = 0x1,
    MOVT_FMT = 0x1,

    PLL_PS = 0x2,
    SWXC1 = 0x2,

    PLU_PS = 0x3,
    LDXC1 = 0x3,

    PUL_PS = 0x4,
    SDXC1 = 0x4,
    RECIP2_FMT = 0x4,

    PUU_PS = 0x5,
    LUXC1 = 0x5,

    CVT_PS_S = 0x6,
    SUXC1 = 0x6,
    ADDR_PS = 0x6,
    PREFX = 0x6,

    MULR_PS = 0x7,

    MADD_S = 0x01,
    MADD_D = 0x09,
    MADD_PS = 0x11,
    ALNV_PS = 0x19,
    MSUB_S = 0x21,
    MSUB_D = 0x29,
    MSUB_PS = 0x31,

    NMADD_S = 0x02,
    NMADD_D = 0x0a,
    NMADD_PS = 0x12,
    NMSUB_S = 0x22,
    NMSUB_D = 0x2a,
    NMSUB_PS = 0x32,

    POOL32FXF = 0x3b,

    CABS_COND_FMT = 0x1c,              /* MIPS3D */
    C_COND_FMT = 0x3c
};

/* POOL32Fxf encoding of minor opcode extension field */

enum {
    CVT_L = 0x04,
    RSQRT_FMT = 0x08,
    FLOOR_L = 0x0c,
    CVT_PW_PS = 0x1c,
    CVT_W = 0x24,
    SQRT_FMT = 0x28,
    FLOOR_W = 0x2c,
    CVT_PS_PW = 0x3c,
    CFC1 = 0x40,
    RECIP_FMT = 0x48,
    CEIL_L = 0x4c,
    CTC1 = 0x60,
    CEIL_W = 0x6c,
    MFC1 = 0x80,
    CVT_S_PL = 0x84,
    TRUNC_L = 0x8c,
    MTC1 = 0xa0,
    CVT_S_PU = 0xa4,
    TRUNC_W = 0xac,
    MFHC1 = 0xc0,
    ROUND_L = 0xcc,
    MTHC1 = 0xe0,
    ROUND_W = 0xec,

    MOV_FMT = 0x01,
    MOVF = 0x05,
    ABS_FMT = 0x0d,
    RSQRT1_FMT = 0x1d,
    MOVT = 0x25,
    NEG_FMT = 0x2d,
    CVT_D = 0x4d,
    RECIP1_FMT = 0x5d,
    CVT_S = 0x6d
};

/* POOL32I encoding of minor opcode field (bits 25..21) */

enum {
    BLTZ = 0x00,
    BLTZAL = 0x01,
    BGEZ = 0x02,
    BGEZAL = 0x03,
    BLEZ = 0x04,
    BNEZC = 0x05,
    BGTZ = 0x06,
    BEQZC = 0x07,
    TLTI = 0x08,
    TGEI = 0x09,
    TLTIU = 0x0a,
    TGEIU = 0x0b,
    TNEI = 0x0c,
    LUI = 0x0d,
    TEQI = 0x0e,
    SYNCI = 0x10,
    BLTZALS = 0x11,
    BGEZALS = 0x13,
    BC2F = 0x14,
    BC2T = 0x15,
    BPOSGE64 = 0x1a,
    BPOSGE32 = 0x1b,
    /* These overlap and are distinguished by bit16 of the instruction */
    BC1F = 0x1c,
    BC1T = 0x1d,
    BC1ANY2F = 0x1c,
    BC1ANY2T = 0x1d,
    BC1ANY4F = 0x1e,
    BC1ANY4T = 0x1f
};

/* POOL16A encoding of minor opcode field */

enum {
    ADDU16 = 0x0,
    SUBU16 = 0x1
};

/* POOL16B encoding of minor opcode field */

enum {
    SLL16 = 0x0,
    SRL16 = 0x1
};

/* POOL16C encoding of minor opcode field */

enum {
    NOT16 = 0x00,
    XOR16 = 0x04,
    AND16 = 0x08,
    OR16 = 0x0c,
    LWM16 = 0x10,
    SWM16 = 0x14,
    JR16 = 0x18,
    JRC16 = 0x1a,
    JALR16 = 0x1c,
    JALR16S = 0x1e,
    MFHI16 = 0x20,
    MFLO16 = 0x24,
    BREAK16 = 0x28,
    SDBBP16 = 0x2c,
    JRADDIUSP = 0x30
};

/* POOL16D encoding of minor opcode field */

enum {
    ADDIUS5 = 0x0,
    ADDIUSP = 0x1
};

/* POOL16E encoding of minor opcode field */

enum {
    ADDIUR2 = 0x0,
    ADDIUR1SP = 0x1
};

static int mmreg (int r)
{
    static const int map[] = { 16, 17, 2, 3, 4, 5, 6, 7 };

    return map[r];
}

/* Used for 16-bit store instructions.  */
static int mmreg2 (int r)
{
    static const int map[] = { 0, 17, 2, 3, 4, 5, 6, 7 };

    return map[r];
}

#define uMIPS_RD(op) ((op >> 7) & 0x7)
#define uMIPS_RS(op) ((op >> 4) & 0x7)
#define uMIPS_RS2(op) uMIPS_RS(op)
#define uMIPS_RS1(op) ((op >> 1) & 0x7)
#define uMIPS_RD5(op) ((op >> 5) & 0x1f)
#define uMIPS_RS5(op) (op & 0x1f)

/* Signed immediate */
#define SIMM(op, start, width)                                          \
    ((int32_t)(((op >> start) & ((~0U) >> (32-width)))                 \
               << (32-width))                                           \
     >> (32-width))
/* Zero-extended immediate */
#define ZIMM(op, start, width) ((op >> start) & ((~0U) >> (32-width)))

static void gen_addiur1sp (CPUState *env, DisasContext *ctx)
{
    int rd = mmreg(uMIPS_RD(ctx->opcode));

    gen_arith_imm(env, ctx, OPC_ADDIU, rd, 29, ((ctx->opcode >> 1) & 0x3f) << 2);
}

static void gen_addiur2 (CPUState *env, DisasContext *ctx)
{
    static const int decoded_imm[] = { 1, 4, 8, 12, 16, 20, 24, -1 };
    int rd = mmreg(uMIPS_RD(ctx->opcode));
    int rs = mmreg(uMIPS_RS(ctx->opcode));

    gen_arith_imm(env, ctx, OPC_ADDIU, rd, rs, decoded_imm[ZIMM(ctx->opcode, 1, 3)]);
}

static void gen_addiusp (CPUState *env, DisasContext *ctx)
{
    int encoded = ZIMM(ctx->opcode, 1, 9);
    int decoded;

    if (encoded <= 1) {
        decoded = 256 + encoded;
    } else if (encoded <= 255) {
        decoded = encoded;
    } else if (encoded <= 509) {
        decoded = encoded - 512;
    } else {
        decoded = encoded - 768;
    }

    gen_arith_imm(env, ctx, OPC_ADDIU, 29, 29, decoded << 2);
}

static void gen_addius5 (CPUState *env, DisasContext *ctx)
{
    int imm = SIMM(ctx->opcode, 1, 4);
    int rd = (ctx->opcode >> 5) & 0x1f;

    gen_arith_imm(env, ctx, OPC_ADDIU, rd, rd, imm);
}

static void gen_andi16 (CPUState *env, DisasContext *ctx)
{
    static const int decoded_imm[] = { 128, 1, 2, 3, 4, 7, 8, 15, 16,
                                 31, 32, 63, 64, 255, 32768, 65535 };
    int rd = mmreg(uMIPS_RD(ctx->opcode));
    int rs = mmreg(uMIPS_RS(ctx->opcode));
    int encoded = ZIMM(ctx->opcode, 0, 4);

    gen_logic_imm(env, OPC_ANDI, rd, rs, decoded_imm[encoded]);
}

static void gen_ldst_multiple (DisasContext *ctx, uint32_t opc, int reglist,
                               int base, int16_t offset)
{
    TCGv t0, t1;
    TCGv_i32 t2;

    if (ctx->hflags & MIPS_HFLAG_BMASK) {
        generate_exception(ctx, EXCP_RI);
        return;
    }

    t0 = tcg_temp_new();

    gen_base_offset_addr(ctx, t0, base, offset);

    t1 = tcg_const_tl(reglist);
    t2 = tcg_const_i32(ctx->mem_idx);
B
bellard 已提交
9489

9490 9491 9492 9493 9494 9495 9496 9497 9498 9499 9500 9501 9502 9503 9504
    save_cpu_state(ctx, 1);
    switch (opc) {
    case LWM32:
        gen_helper_lwm(t0, t1, t2);
        break;
    case SWM32:
        gen_helper_swm(t0, t1, t2);
        break;
#ifdef TARGET_MIPS64
    case LDM:
        gen_helper_ldm(t0, t1, t2);
        break;
    case SDM:
        gen_helper_sdm(t0, t1, t2);
        break;
B
bellard 已提交
9505
#endif
9506 9507 9508
    }
    MIPS_DEBUG("%s, %x, %d(%s)", opn, reglist, offset, regnames[base]);
    tcg_temp_free(t0);
S
Stefan Weil 已提交
9509
    tcg_temp_free(t1);
9510 9511
    tcg_temp_free_i32(t2);
}
B
bellard 已提交
9512

9513 9514

static void gen_pool16c_insn (CPUState *env, DisasContext *ctx, int *is_branch)
B
bellard 已提交
9515
{
9516 9517 9518
    int rd = mmreg((ctx->opcode >> 3) & 0x7);
    int rs = mmreg(ctx->opcode & 0x7);
    int opc;
B
bellard 已提交
9519

9520 9521 9522 9523 9524 9525 9526 9527 9528 9529 9530 9531 9532 9533 9534 9535 9536 9537 9538 9539 9540 9541 9542 9543 9544 9545 9546 9547 9548 9549 9550 9551 9552 9553 9554 9555 9556 9557 9558 9559 9560 9561 9562 9563 9564 9565 9566 9567 9568 9569 9570 9571 9572 9573 9574 9575 9576 9577 9578 9579 9580 9581 9582 9583 9584 9585 9586 9587 9588 9589 9590 9591 9592 9593 9594 9595 9596 9597 9598 9599 9600 9601 9602 9603 9604 9605 9606 9607 9608 9609 9610 9611 9612 9613 9614 9615 9616 9617 9618 9619 9620 9621 9622 9623 9624 9625 9626 9627 9628 9629 9630 9631 9632 9633 9634 9635 9636 9637 9638 9639 9640 9641 9642 9643 9644 9645 9646 9647 9648 9649 9650 9651 9652 9653 9654 9655
    switch (((ctx->opcode) >> 4) & 0x3f) {
    case NOT16 + 0:
    case NOT16 + 1:
    case NOT16 + 2:
    case NOT16 + 3:
        gen_logic(env, OPC_NOR, rd, rs, 0);
        break;
    case XOR16 + 0:
    case XOR16 + 1:
    case XOR16 + 2:
    case XOR16 + 3:
        gen_logic(env, OPC_XOR, rd, rd, rs);
        break;
    case AND16 + 0:
    case AND16 + 1:
    case AND16 + 2:
    case AND16 + 3:
        gen_logic(env, OPC_AND, rd, rd, rs);
        break;
    case OR16 + 0:
    case OR16 + 1:
    case OR16 + 2:
    case OR16 + 3:
        gen_logic(env, OPC_OR, rd, rd, rs);
        break;
    case LWM16 + 0:
    case LWM16 + 1:
    case LWM16 + 2:
    case LWM16 + 3:
        {
            static const int lwm_convert[] = { 0x11, 0x12, 0x13, 0x14 };
            int offset = ZIMM(ctx->opcode, 0, 4);

            gen_ldst_multiple(ctx, LWM32, lwm_convert[(ctx->opcode >> 4) & 0x3],
                              29, offset << 2);
        }
        break;
    case SWM16 + 0:
    case SWM16 + 1:
    case SWM16 + 2:
    case SWM16 + 3:
        {
            static const int swm_convert[] = { 0x11, 0x12, 0x13, 0x14 };
            int offset = ZIMM(ctx->opcode, 0, 4);

            gen_ldst_multiple(ctx, SWM32, swm_convert[(ctx->opcode >> 4) & 0x3],
                              29, offset << 2);
        }
        break;
    case JR16 + 0:
    case JR16 + 1:
        {
            int reg = ctx->opcode & 0x1f;

            gen_compute_branch(ctx, OPC_JR, 2, reg, 0, 0);
        }
        *is_branch = 1;
        break;
    case JRC16 + 0:
    case JRC16 + 1:
        {
            int reg = ctx->opcode & 0x1f;

            gen_compute_branch(ctx, OPC_JR, 2, reg, 0, 0);
            /* Let normal delay slot handling in our caller take us
               to the branch target.  */
        }
        break;
    case JALR16 + 0:
    case JALR16 + 1:
        opc = OPC_JALR;
        goto do_jalr;
    case JALR16S + 0:
    case JALR16S + 1:
        opc = OPC_JALRS;
    do_jalr:
        {
            int reg = ctx->opcode & 0x1f;

            gen_compute_branch(ctx, opc, 2, reg, 31, 0);
        }
        *is_branch = 1;
        break;
    case MFHI16 + 0:
    case MFHI16 + 1:
        gen_HILO(ctx, OPC_MFHI, uMIPS_RS5(ctx->opcode));
        break;
    case MFLO16 + 0:
    case MFLO16 + 1:
        gen_HILO(ctx, OPC_MFLO, uMIPS_RS5(ctx->opcode));
        break;
    case BREAK16:
        generate_exception(ctx, EXCP_BREAK);
        break;
    case SDBBP16:
        /* XXX: not clear which exception should be raised
         *      when in debug mode...
         */
        check_insn(env, ctx, ISA_MIPS32);
        if (!(ctx->hflags & MIPS_HFLAG_DM)) {
            generate_exception(ctx, EXCP_DBp);
        } else {
            generate_exception(ctx, EXCP_DBp);
        }
        break;
    case JRADDIUSP + 0:
    case JRADDIUSP + 1:
        {
            int imm = ZIMM(ctx->opcode, 0, 5);

            gen_compute_branch(ctx, OPC_JR, 2, 31, 0, 0);
            gen_arith_imm(env, ctx, OPC_ADDIU, 29, 29, imm << 2);
            /* Let normal delay slot handling in our caller take us
               to the branch target.  */
        }
        break;
    default:
        generate_exception(ctx, EXCP_RI);
        break;
    }
}

static void gen_ldxs (DisasContext *ctx, int base, int index, int rd)
{
    TCGv t0 = tcg_temp_new();
    TCGv t1 = tcg_temp_new();

    gen_load_gpr(t0, base);

    if (index != 0) {
        gen_load_gpr(t1, index);
        tcg_gen_shli_tl(t1, t1, 2);
        gen_op_addr_add(ctx, t0, t1, t0);
    }

    save_cpu_state(ctx, 0);
9656
    op_ld_lw(t1, t0, ctx);
9657 9658 9659 9660 9661 9662 9663 9664 9665 9666 9667 9668 9669 9670
    gen_store_gpr(t1, rd);

    tcg_temp_free(t0);
    tcg_temp_free(t1);
}

static void gen_ldst_pair (DisasContext *ctx, uint32_t opc, int rd,
                           int base, int16_t offset)
{
    const char *opn = "ldst_pair";
    TCGv t0, t1;

    if (ctx->hflags & MIPS_HFLAG_BMASK || rd == 31 || rd == base) {
        generate_exception(ctx, EXCP_RI);
9671 9672 9673
        return;
    }

9674 9675
    t0 = tcg_temp_new();
    t1 = tcg_temp_new();
9676

9677 9678 9679 9680 9681
    gen_base_offset_addr(ctx, t0, base, offset);

    switch (opc) {
    case LWP:
        save_cpu_state(ctx, 0);
9682
        op_ld_lw(t1, t0, ctx);
9683 9684 9685
        gen_store_gpr(t1, rd);
        tcg_gen_movi_tl(t1, 4);
        gen_op_addr_add(ctx, t0, t0, t1);
9686
        op_ld_lw(t1, t0, ctx);
9687 9688 9689 9690 9691 9692
        gen_store_gpr(t1, rd+1);
        opn = "lwp";
        break;
    case SWP:
        save_cpu_state(ctx, 1);
        gen_load_gpr(t1, rd);
9693
        op_st_sw(t1, t0, ctx);
9694 9695 9696
        tcg_gen_movi_tl(t1, 4);
        gen_op_addr_add(ctx, t0, t0, t1);
        gen_load_gpr(t1, rd+1);
9697
        op_st_sw(t1, t0, ctx);
9698 9699 9700 9701 9702
        opn = "swp";
        break;
#ifdef TARGET_MIPS64
    case LDP:
        save_cpu_state(ctx, 0);
9703
        op_ld_ld(t1, t0, ctx);
9704 9705 9706
        gen_store_gpr(t1, rd);
        tcg_gen_movi_tl(t1, 8);
        gen_op_addr_add(ctx, t0, t0, t1);
9707
        op_ld_ld(t1, t0, ctx);
9708 9709 9710 9711 9712 9713
        gen_store_gpr(t1, rd+1);
        opn = "ldp";
        break;
    case SDP:
        save_cpu_state(ctx, 1);
        gen_load_gpr(t1, rd);
9714
        op_st_sd(t1, t0, ctx);
9715 9716 9717
        tcg_gen_movi_tl(t1, 8);
        gen_op_addr_add(ctx, t0, t0, t1);
        gen_load_gpr(t1, rd+1);
9718
        op_st_sd(t1, t0, ctx);
9719 9720 9721
        opn = "sdp";
        break;
#endif
B
bellard 已提交
9722
    }
9723 9724 9725 9726
    MIPS_DEBUG("%s, %s, %d(%s)", opn, regnames[rd], offset, regnames[base]);
    tcg_temp_free(t0);
    tcg_temp_free(t1);
}
9727

9728 9729 9730 9731 9732 9733 9734 9735 9736 9737 9738 9739 9740 9741 9742 9743 9744 9745 9746 9747 9748 9749 9750 9751 9752 9753 9754 9755 9756 9757 9758 9759 9760 9761 9762 9763 9764 9765 9766 9767 9768
static void gen_pool32axf (CPUState *env, DisasContext *ctx, int rt, int rs,
                           int *is_branch)
{
    int extension = (ctx->opcode >> 6) & 0x3f;
    int minor = (ctx->opcode >> 12) & 0xf;
    uint32_t mips32_op;

    switch (extension) {
    case TEQ:
        mips32_op = OPC_TEQ;
        goto do_trap;
    case TGE:
        mips32_op = OPC_TGE;
        goto do_trap;
    case TGEU:
        mips32_op = OPC_TGEU;
        goto do_trap;
    case TLT:
        mips32_op = OPC_TLT;
        goto do_trap;
    case TLTU:
        mips32_op = OPC_TLTU;
        goto do_trap;
    case TNE:
        mips32_op = OPC_TNE;
    do_trap:
        gen_trap(ctx, mips32_op, rs, rt, -1);
        break;
#ifndef CONFIG_USER_ONLY
    case MFC0:
    case MFC0 + 32:
        if (rt == 0) {
            /* Treat as NOP. */
            break;
        }
        gen_mfc0(env, ctx, cpu_gpr[rt], rs, (ctx->opcode >> 11) & 0x7);
        break;
    case MTC0:
    case MTC0 + 32:
        {
            TCGv t0 = tcg_temp_new();
9769

9770 9771 9772 9773 9774 9775 9776 9777 9778 9779 9780 9781 9782 9783 9784 9785 9786 9787 9788 9789 9790 9791 9792 9793 9794 9795 9796 9797 9798 9799 9800 9801 9802 9803 9804 9805 9806 9807 9808 9809 9810 9811 9812 9813 9814 9815 9816 9817 9818 9819 9820 9821 9822 9823 9824 9825 9826 9827 9828 9829 9830 9831 9832 9833 9834 9835 9836 9837 9838 9839 9840 9841 9842 9843 9844 9845 9846 9847 9848 9849 9850 9851 9852 9853 9854 9855 9856 9857 9858 9859 9860 9861 9862 9863 9864 9865 9866 9867 9868 9869 9870 9871 9872 9873 9874 9875 9876 9877 9878 9879 9880 9881 9882 9883 9884 9885 9886 9887 9888 9889 9890 9891 9892 9893 9894 9895 9896 9897 9898 9899 9900 9901 9902 9903 9904 9905 9906 9907 9908 9909 9910 9911 9912 9913 9914 9915 9916 9917 9918 9919 9920 9921 9922 9923 9924 9925 9926 9927 9928 9929 9930 9931 9932 9933 9934 9935 9936 9937 9938 9939 9940 9941 9942 9943 9944 9945 9946 9947 9948 9949 9950 9951 9952 9953 9954 9955 9956 9957 9958 9959 9960 9961 9962 9963 9964 9965 9966 9967 9968 9969 9970 9971 9972 9973 9974 9975 9976 9977 9978 9979 9980 9981 9982 9983 9984 9985 9986 9987 9988 9989 9990 9991 9992 9993 9994 9995 9996 9997 9998 9999 10000 10001 10002 10003 10004 10005 10006 10007 10008 10009 10010 10011 10012 10013 10014 10015 10016 10017 10018 10019 10020 10021 10022 10023 10024 10025 10026 10027 10028 10029 10030 10031 10032 10033 10034 10035 10036 10037 10038 10039 10040 10041 10042 10043 10044 10045 10046 10047 10048 10049 10050 10051 10052 10053 10054 10055 10056 10057 10058 10059 10060 10061 10062 10063 10064 10065 10066 10067 10068 10069 10070 10071 10072 10073 10074 10075 10076 10077 10078 10079 10080 10081 10082 10083 10084 10085 10086 10087 10088 10089 10090 10091 10092 10093 10094 10095 10096 10097 10098 10099 10100 10101 10102 10103 10104 10105 10106 10107 10108 10109 10110 10111 10112 10113 10114 10115 10116 10117 10118 10119 10120 10121 10122 10123 10124 10125 10126 10127 10128 10129 10130 10131 10132 10133 10134 10135 10136 10137 10138 10139 10140 10141 10142 10143 10144 10145 10146 10147 10148 10149 10150 10151 10152 10153 10154 10155 10156 10157 10158 10159 10160 10161 10162 10163 10164 10165 10166 10167 10168 10169 10170 10171 10172 10173 10174 10175 10176 10177 10178 10179 10180 10181 10182 10183 10184 10185 10186 10187 10188 10189 10190 10191 10192 10193 10194 10195 10196 10197 10198 10199 10200 10201 10202 10203 10204 10205 10206 10207 10208 10209 10210 10211 10212 10213 10214 10215 10216 10217 10218 10219 10220 10221 10222 10223 10224 10225 10226 10227 10228 10229 10230 10231 10232 10233 10234 10235 10236 10237 10238 10239 10240 10241 10242 10243 10244 10245 10246 10247 10248 10249 10250 10251 10252 10253 10254 10255 10256 10257 10258 10259 10260 10261 10262 10263 10264 10265 10266 10267 10268 10269 10270 10271 10272 10273 10274 10275 10276 10277 10278 10279 10280 10281 10282 10283 10284 10285 10286 10287 10288 10289 10290 10291 10292 10293 10294 10295 10296 10297 10298 10299 10300 10301 10302 10303 10304 10305 10306 10307 10308 10309 10310 10311 10312 10313 10314 10315 10316 10317 10318 10319 10320 10321 10322 10323 10324 10325 10326 10327 10328 10329 10330 10331 10332 10333 10334 10335 10336 10337 10338 10339 10340 10341 10342 10343 10344 10345 10346 10347 10348 10349 10350 10351 10352 10353 10354 10355 10356 10357 10358 10359 10360 10361 10362 10363 10364 10365 10366 10367 10368 10369 10370 10371 10372 10373 10374 10375 10376 10377 10378 10379 10380 10381 10382 10383 10384 10385 10386 10387 10388 10389 10390 10391 10392 10393 10394 10395 10396 10397 10398 10399 10400 10401 10402 10403 10404 10405 10406 10407 10408 10409 10410 10411 10412 10413 10414 10415 10416 10417 10418 10419 10420 10421 10422 10423 10424 10425 10426 10427 10428 10429 10430 10431 10432 10433 10434 10435 10436 10437 10438 10439 10440 10441 10442 10443 10444 10445 10446 10447 10448 10449 10450 10451 10452 10453 10454 10455 10456 10457 10458 10459 10460 10461 10462 10463 10464 10465 10466 10467 10468 10469 10470 10471 10472 10473 10474 10475 10476 10477 10478 10479 10480 10481 10482 10483 10484 10485 10486 10487 10488 10489 10490 10491 10492 10493 10494 10495 10496 10497 10498 10499 10500 10501 10502 10503 10504 10505 10506 10507 10508 10509 10510 10511 10512 10513 10514 10515 10516 10517 10518 10519 10520 10521 10522 10523 10524 10525 10526 10527 10528 10529 10530 10531 10532 10533 10534 10535 10536 10537 10538 10539 10540 10541 10542 10543 10544 10545 10546 10547 10548 10549 10550 10551 10552 10553 10554 10555 10556 10557 10558 10559 10560 10561 10562 10563 10564 10565 10566 10567 10568 10569 10570 10571 10572 10573 10574 10575 10576 10577 10578 10579 10580 10581 10582 10583 10584 10585 10586 10587 10588 10589 10590 10591 10592 10593 10594 10595 10596 10597 10598 10599 10600 10601 10602 10603 10604 10605 10606 10607 10608 10609 10610 10611 10612 10613 10614 10615 10616 10617 10618 10619 10620 10621 10622 10623 10624 10625 10626 10627 10628 10629 10630 10631 10632 10633 10634 10635 10636 10637 10638 10639 10640 10641 10642 10643 10644 10645 10646 10647 10648 10649 10650 10651 10652 10653 10654 10655 10656 10657 10658 10659 10660 10661 10662 10663 10664 10665 10666 10667 10668 10669 10670 10671 10672 10673 10674 10675 10676 10677 10678 10679 10680 10681 10682 10683 10684 10685 10686 10687 10688 10689 10690 10691 10692 10693 10694 10695 10696 10697 10698 10699 10700 10701 10702 10703 10704 10705 10706 10707 10708 10709 10710 10711 10712 10713 10714 10715 10716 10717 10718 10719 10720 10721 10722 10723 10724 10725 10726 10727 10728 10729 10730 10731 10732 10733 10734 10735 10736 10737 10738 10739 10740 10741 10742 10743 10744 10745 10746 10747 10748 10749 10750 10751 10752 10753 10754 10755 10756 10757 10758 10759 10760 10761 10762 10763 10764 10765 10766 10767 10768 10769 10770 10771 10772 10773 10774 10775 10776 10777 10778 10779 10780 10781 10782 10783 10784 10785 10786 10787 10788 10789 10790 10791 10792 10793 10794 10795 10796 10797 10798 10799 10800 10801 10802 10803 10804 10805 10806 10807 10808 10809 10810 10811 10812 10813 10814 10815 10816 10817 10818 10819 10820 10821 10822
            gen_load_gpr(t0, rt);
            gen_mtc0(env, ctx, t0, rs, (ctx->opcode >> 11) & 0x7);
            tcg_temp_free(t0);
        }
        break;
#endif
    case 0x2c:
        switch (minor) {
        case SEB:
            gen_bshfl(ctx, OPC_SEB, rs, rt);
            break;
        case SEH:
            gen_bshfl(ctx, OPC_SEH, rs, rt);
            break;
        case CLO:
            mips32_op = OPC_CLO;
            goto do_cl;
        case CLZ:
            mips32_op = OPC_CLZ;
        do_cl:
            check_insn(env, ctx, ISA_MIPS32);
            gen_cl(ctx, mips32_op, rt, rs);
            break;
        case RDHWR:
            gen_rdhwr(env, ctx, rt, rs);
            break;
        case WSBH:
            gen_bshfl(ctx, OPC_WSBH, rs, rt);
            break;
        case MULT:
            mips32_op = OPC_MULT;
            goto do_muldiv;
        case MULTU:
            mips32_op = OPC_MULTU;
            goto do_muldiv;
        case DIV:
            mips32_op = OPC_DIV;
            goto do_muldiv;
        case DIVU:
            mips32_op = OPC_DIVU;
            goto do_muldiv;
        case MADD:
            mips32_op = OPC_MADD;
            goto do_muldiv;
        case MADDU:
            mips32_op = OPC_MADDU;
            goto do_muldiv;
        case MSUB:
            mips32_op = OPC_MSUB;
            goto do_muldiv;
        case MSUBU:
            mips32_op = OPC_MSUBU;
        do_muldiv:
            check_insn(env, ctx, ISA_MIPS32);
            gen_muldiv(ctx, mips32_op, rs, rt);
            break;
        default:
            goto pool32axf_invalid;
        }
        break;
    case 0x34:
        switch (minor) {
        case MFC2:
        case MTC2:
        case MFHC2:
        case MTHC2:
        case CFC2:
        case CTC2:
            generate_exception_err(ctx, EXCP_CpU, 2);
            break;
        default:
            goto pool32axf_invalid;
        }
        break;
    case 0x3c:
        switch (minor) {
        case JALR:
        case JALR_HB:
            gen_compute_branch (ctx, OPC_JALR, 4, rs, rt, 0);
            *is_branch = 1;
            break;
        case JALRS:
        case JALRS_HB:
            gen_compute_branch (ctx, OPC_JALRS, 4, rs, rt, 0);
            *is_branch = 1;
            break;
        default:
            goto pool32axf_invalid;
        }
        break;
    case 0x05:
        switch (minor) {
        case RDPGPR:
            check_insn(env, ctx, ISA_MIPS32R2);
            gen_load_srsgpr(rt, rs);
            break;
        case WRPGPR:
            check_insn(env, ctx, ISA_MIPS32R2);
            gen_store_srsgpr(rt, rs);
            break;
        default:
            goto pool32axf_invalid;
        }
        break;
#ifndef CONFIG_USER_ONLY
    case 0x0d:
        switch (minor) {
        case TLBP:
            mips32_op = OPC_TLBP;
            goto do_cp0;
        case TLBR:
            mips32_op = OPC_TLBR;
            goto do_cp0;
        case TLBWI:
            mips32_op = OPC_TLBWI;
            goto do_cp0;
        case TLBWR:
            mips32_op = OPC_TLBWR;
            goto do_cp0;
        case WAIT:
            mips32_op = OPC_WAIT;
            goto do_cp0;
        case DERET:
            mips32_op = OPC_DERET;
            goto do_cp0;
        case ERET:
            mips32_op = OPC_ERET;
        do_cp0:
            gen_cp0(env, ctx, mips32_op, rt, rs);
            break;
        default:
            goto pool32axf_invalid;
        }
        break;
    case 0x1d:
        switch (minor) {
        case DI:
            {
                TCGv t0 = tcg_temp_new();

                save_cpu_state(ctx, 1);
                gen_helper_di(t0);
                gen_store_gpr(t0, rs);
                /* Stop translation as we may have switched the execution mode */
                ctx->bstate = BS_STOP;
                tcg_temp_free(t0);
            }
            break;
        case EI:
            {
                TCGv t0 = tcg_temp_new();

                save_cpu_state(ctx, 1);
                gen_helper_ei(t0);
                gen_store_gpr(t0, rs);
                /* Stop translation as we may have switched the execution mode */
                ctx->bstate = BS_STOP;
                tcg_temp_free(t0);
            }
            break;
        default:
            goto pool32axf_invalid;
        }
        break;
#endif
    case 0x2d:
        switch (minor) {
        case SYNC:
            /* NOP */
            break;
        case SYSCALL:
            generate_exception(ctx, EXCP_SYSCALL);
            ctx->bstate = BS_STOP;
            break;
        case SDBBP:
            check_insn(env, ctx, ISA_MIPS32);
            if (!(ctx->hflags & MIPS_HFLAG_DM)) {
                generate_exception(ctx, EXCP_DBp);
            } else {
                generate_exception(ctx, EXCP_DBp);
            }
            break;
        default:
            goto pool32axf_invalid;
        }
        break;
    case 0x35:
        switch (minor) {
        case MFHI32:
            gen_HILO(ctx, OPC_MFHI, rs);
            break;
        case MFLO32:
            gen_HILO(ctx, OPC_MFLO, rs);
            break;
        case MTHI32:
            gen_HILO(ctx, OPC_MTHI, rs);
            break;
        case MTLO32:
            gen_HILO(ctx, OPC_MTLO, rs);
            break;
        default:
            goto pool32axf_invalid;
        }
        break;
    default:
    pool32axf_invalid:
        MIPS_INVAL("pool32axf");
        generate_exception(ctx, EXCP_RI);
        break;
    }
}

/* Values for microMIPS fmt field.  Variable-width, depending on which
   formats the instruction supports.  */

enum {
    FMT_SD_S = 0,
    FMT_SD_D = 1,

    FMT_SDPS_S = 0,
    FMT_SDPS_D = 1,
    FMT_SDPS_PS = 2,

    FMT_SWL_S = 0,
    FMT_SWL_W = 1,
    FMT_SWL_L = 2,

    FMT_DWL_D = 0,
    FMT_DWL_W = 1,
    FMT_DWL_L = 2
};

static void gen_pool32fxf (CPUState *env, DisasContext *ctx, int rt, int rs)
{
    int extension = (ctx->opcode >> 6) & 0x3ff;
    uint32_t mips32_op;

#define FLOAT_1BIT_FMT(opc, fmt) (fmt << 8) | opc
#define FLOAT_2BIT_FMT(opc, fmt) (fmt << 7) | opc
#define COND_FLOAT_MOV(opc, cond) (cond << 7) | opc

    switch (extension) {
    case FLOAT_1BIT_FMT(CFC1, 0):
        mips32_op = OPC_CFC1;
        goto do_cp1;
    case FLOAT_1BIT_FMT(CTC1, 0):
        mips32_op = OPC_CTC1;
        goto do_cp1;
    case FLOAT_1BIT_FMT(MFC1, 0):
        mips32_op = OPC_MFC1;
        goto do_cp1;
    case FLOAT_1BIT_FMT(MTC1, 0):
        mips32_op = OPC_MTC1;
        goto do_cp1;
    case FLOAT_1BIT_FMT(MFHC1, 0):
        mips32_op = OPC_MFHC1;
        goto do_cp1;
    case FLOAT_1BIT_FMT(MTHC1, 0):
        mips32_op = OPC_MTHC1;
    do_cp1:
        gen_cp1(ctx, mips32_op, rt, rs);
        break;

        /* Reciprocal square root */
    case FLOAT_1BIT_FMT(RSQRT_FMT, FMT_SD_S):
        mips32_op = OPC_RSQRT_S;
        goto do_unaryfp;
    case FLOAT_1BIT_FMT(RSQRT_FMT, FMT_SD_D):
        mips32_op = OPC_RSQRT_D;
        goto do_unaryfp;

        /* Square root */
    case FLOAT_1BIT_FMT(SQRT_FMT, FMT_SD_S):
        mips32_op = OPC_SQRT_S;
        goto do_unaryfp;
    case FLOAT_1BIT_FMT(SQRT_FMT, FMT_SD_D):
        mips32_op = OPC_SQRT_D;
        goto do_unaryfp;

        /* Reciprocal */
    case FLOAT_1BIT_FMT(RECIP_FMT, FMT_SD_S):
        mips32_op = OPC_RECIP_S;
        goto do_unaryfp;
    case FLOAT_1BIT_FMT(RECIP_FMT, FMT_SD_D):
        mips32_op = OPC_RECIP_D;
        goto do_unaryfp;

        /* Floor */
    case FLOAT_1BIT_FMT(FLOOR_L, FMT_SD_S):
        mips32_op = OPC_FLOOR_L_S;
        goto do_unaryfp;
    case FLOAT_1BIT_FMT(FLOOR_L, FMT_SD_D):
        mips32_op = OPC_FLOOR_L_D;
        goto do_unaryfp;
    case FLOAT_1BIT_FMT(FLOOR_W, FMT_SD_S):
        mips32_op = OPC_FLOOR_W_S;
        goto do_unaryfp;
    case FLOAT_1BIT_FMT(FLOOR_W, FMT_SD_D):
        mips32_op = OPC_FLOOR_W_D;
        goto do_unaryfp;

        /* Ceiling */
    case FLOAT_1BIT_FMT(CEIL_L, FMT_SD_S):
        mips32_op = OPC_CEIL_L_S;
        goto do_unaryfp;
    case FLOAT_1BIT_FMT(CEIL_L, FMT_SD_D):
        mips32_op = OPC_CEIL_L_D;
        goto do_unaryfp;
    case FLOAT_1BIT_FMT(CEIL_W, FMT_SD_S):
        mips32_op = OPC_CEIL_W_S;
        goto do_unaryfp;
    case FLOAT_1BIT_FMT(CEIL_W, FMT_SD_D):
        mips32_op = OPC_CEIL_W_D;
        goto do_unaryfp;

        /* Truncation */
    case FLOAT_1BIT_FMT(TRUNC_L, FMT_SD_S):
        mips32_op = OPC_TRUNC_L_S;
        goto do_unaryfp;
    case FLOAT_1BIT_FMT(TRUNC_L, FMT_SD_D):
        mips32_op = OPC_TRUNC_L_D;
        goto do_unaryfp;
    case FLOAT_1BIT_FMT(TRUNC_W, FMT_SD_S):
        mips32_op = OPC_TRUNC_W_S;
        goto do_unaryfp;
    case FLOAT_1BIT_FMT(TRUNC_W, FMT_SD_D):
        mips32_op = OPC_TRUNC_W_D;
        goto do_unaryfp;

        /* Round */
    case FLOAT_1BIT_FMT(ROUND_L, FMT_SD_S):
        mips32_op = OPC_ROUND_L_S;
        goto do_unaryfp;
    case FLOAT_1BIT_FMT(ROUND_L, FMT_SD_D):
        mips32_op = OPC_ROUND_L_D;
        goto do_unaryfp;
    case FLOAT_1BIT_FMT(ROUND_W, FMT_SD_S):
        mips32_op = OPC_ROUND_W_S;
        goto do_unaryfp;
    case FLOAT_1BIT_FMT(ROUND_W, FMT_SD_D):
        mips32_op = OPC_ROUND_W_D;
        goto do_unaryfp;

        /* Integer to floating-point conversion */
    case FLOAT_1BIT_FMT(CVT_L, FMT_SD_S):
        mips32_op = OPC_CVT_L_S;
        goto do_unaryfp;
    case FLOAT_1BIT_FMT(CVT_L, FMT_SD_D):
        mips32_op = OPC_CVT_L_D;
        goto do_unaryfp;
    case FLOAT_1BIT_FMT(CVT_W, FMT_SD_S):
        mips32_op = OPC_CVT_W_S;
        goto do_unaryfp;
    case FLOAT_1BIT_FMT(CVT_W, FMT_SD_D):
        mips32_op = OPC_CVT_W_D;
        goto do_unaryfp;

        /* Paired-foo conversions */
    case FLOAT_1BIT_FMT(CVT_S_PL, 0):
        mips32_op = OPC_CVT_S_PL;
        goto do_unaryfp;
    case FLOAT_1BIT_FMT(CVT_S_PU, 0):
        mips32_op = OPC_CVT_S_PU;
        goto do_unaryfp;
    case FLOAT_1BIT_FMT(CVT_PW_PS, 0):
        mips32_op = OPC_CVT_PW_PS;
        goto do_unaryfp;
    case FLOAT_1BIT_FMT(CVT_PS_PW, 0):
        mips32_op = OPC_CVT_PS_PW;
        goto do_unaryfp;

        /* Floating-point moves */
    case FLOAT_2BIT_FMT(MOV_FMT, FMT_SDPS_S):
        mips32_op = OPC_MOV_S;
        goto do_unaryfp;
    case FLOAT_2BIT_FMT(MOV_FMT, FMT_SDPS_D):
        mips32_op = OPC_MOV_D;
        goto do_unaryfp;
    case FLOAT_2BIT_FMT(MOV_FMT, FMT_SDPS_PS):
        mips32_op = OPC_MOV_PS;
        goto do_unaryfp;

        /* Absolute value */
    case FLOAT_2BIT_FMT(ABS_FMT, FMT_SDPS_S):
        mips32_op = OPC_ABS_S;
        goto do_unaryfp;
    case FLOAT_2BIT_FMT(ABS_FMT, FMT_SDPS_D):
        mips32_op = OPC_ABS_D;
        goto do_unaryfp;
    case FLOAT_2BIT_FMT(ABS_FMT, FMT_SDPS_PS):
        mips32_op = OPC_ABS_PS;
        goto do_unaryfp;

        /* Negation */
    case FLOAT_2BIT_FMT(NEG_FMT, FMT_SDPS_S):
        mips32_op = OPC_NEG_S;
        goto do_unaryfp;
    case FLOAT_2BIT_FMT(NEG_FMT, FMT_SDPS_D):
        mips32_op = OPC_NEG_D;
        goto do_unaryfp;
    case FLOAT_2BIT_FMT(NEG_FMT, FMT_SDPS_PS):
        mips32_op = OPC_NEG_PS;
        goto do_unaryfp;

        /* Reciprocal square root step */
    case FLOAT_2BIT_FMT(RSQRT1_FMT, FMT_SDPS_S):
        mips32_op = OPC_RSQRT1_S;
        goto do_unaryfp;
    case FLOAT_2BIT_FMT(RSQRT1_FMT, FMT_SDPS_D):
        mips32_op = OPC_RSQRT1_D;
        goto do_unaryfp;
    case FLOAT_2BIT_FMT(RSQRT1_FMT, FMT_SDPS_PS):
        mips32_op = OPC_RSQRT1_PS;
        goto do_unaryfp;

        /* Reciprocal step */
    case FLOAT_2BIT_FMT(RECIP1_FMT, FMT_SDPS_S):
        mips32_op = OPC_RECIP1_S;
        goto do_unaryfp;
    case FLOAT_2BIT_FMT(RECIP1_FMT, FMT_SDPS_D):
        mips32_op = OPC_RECIP1_S;
        goto do_unaryfp;
    case FLOAT_2BIT_FMT(RECIP1_FMT, FMT_SDPS_PS):
        mips32_op = OPC_RECIP1_PS;
        goto do_unaryfp;

        /* Conversions from double */
    case FLOAT_2BIT_FMT(CVT_D, FMT_SWL_S):
        mips32_op = OPC_CVT_D_S;
        goto do_unaryfp;
    case FLOAT_2BIT_FMT(CVT_D, FMT_SWL_W):
        mips32_op = OPC_CVT_D_W;
        goto do_unaryfp;
    case FLOAT_2BIT_FMT(CVT_D, FMT_SWL_L):
        mips32_op = OPC_CVT_D_L;
        goto do_unaryfp;

        /* Conversions from single */
    case FLOAT_2BIT_FMT(CVT_S, FMT_DWL_D):
        mips32_op = OPC_CVT_S_D;
        goto do_unaryfp;
    case FLOAT_2BIT_FMT(CVT_S, FMT_DWL_W):
        mips32_op = OPC_CVT_S_W;
        goto do_unaryfp;
    case FLOAT_2BIT_FMT(CVT_S, FMT_DWL_L):
        mips32_op = OPC_CVT_S_L;
    do_unaryfp:
        gen_farith(ctx, mips32_op, -1, rs, rt, 0);
        break;

        /* Conditional moves on floating-point codes */
    case COND_FLOAT_MOV(MOVT, 0):
    case COND_FLOAT_MOV(MOVT, 1):
    case COND_FLOAT_MOV(MOVT, 2):
    case COND_FLOAT_MOV(MOVT, 3):
    case COND_FLOAT_MOV(MOVT, 4):
    case COND_FLOAT_MOV(MOVT, 5):
    case COND_FLOAT_MOV(MOVT, 6):
    case COND_FLOAT_MOV(MOVT, 7):
        gen_movci(ctx, rt, rs, (ctx->opcode >> 13) & 0x7, 1);
        break;
    case COND_FLOAT_MOV(MOVF, 0):
    case COND_FLOAT_MOV(MOVF, 1):
    case COND_FLOAT_MOV(MOVF, 2):
    case COND_FLOAT_MOV(MOVF, 3):
    case COND_FLOAT_MOV(MOVF, 4):
    case COND_FLOAT_MOV(MOVF, 5):
    case COND_FLOAT_MOV(MOVF, 6):
    case COND_FLOAT_MOV(MOVF, 7):
        gen_movci(ctx, rt, rs, (ctx->opcode >> 13) & 0x7, 0);
        break;
    default:
        MIPS_INVAL("pool32fxf");
        generate_exception(ctx, EXCP_RI);
        break;
    }
}

static void decode_micromips32_opc (CPUState *env, DisasContext *ctx,
                                    uint16_t insn_hw1, int *is_branch)
{
    int32_t offset;
    uint16_t insn;
    int rt, rs, rd, rr;
    int16_t imm;
    uint32_t op, minor, mips32_op;
    uint32_t cond, fmt, cc;

    insn = lduw_code(ctx->pc + 2);
    ctx->opcode = (ctx->opcode << 16) | insn;

    rt = (ctx->opcode >> 21) & 0x1f;
    rs = (ctx->opcode >> 16) & 0x1f;
    rd = (ctx->opcode >> 11) & 0x1f;
    rr = (ctx->opcode >> 6) & 0x1f;
    imm = (int16_t) ctx->opcode;

    op = (ctx->opcode >> 26) & 0x3f;
    switch (op) {
    case POOL32A:
        minor = ctx->opcode & 0x3f;
        switch (minor) {
        case 0x00:
            minor = (ctx->opcode >> 6) & 0xf;
            switch (minor) {
            case SLL32:
                mips32_op = OPC_SLL;
                goto do_shifti;
            case SRA:
                mips32_op = OPC_SRA;
                goto do_shifti;
            case SRL32:
                mips32_op = OPC_SRL;
                goto do_shifti;
            case ROTR:
                mips32_op = OPC_ROTR;
            do_shifti:
                gen_shift_imm(env, ctx, mips32_op, rt, rs, rd);
                break;
            default:
                goto pool32a_invalid;
            }
            break;
        case 0x10:
            minor = (ctx->opcode >> 6) & 0xf;
            switch (minor) {
                /* Arithmetic */
            case ADD:
                mips32_op = OPC_ADD;
                goto do_arith;
            case ADDU32:
                mips32_op = OPC_ADDU;
                goto do_arith;
            case SUB:
                mips32_op = OPC_SUB;
                goto do_arith;
            case SUBU32:
                mips32_op = OPC_SUBU;
                goto do_arith;
            case MUL:
                mips32_op = OPC_MUL;
            do_arith:
                gen_arith(env, ctx, mips32_op, rd, rs, rt);
                break;
                /* Shifts */
            case SLLV:
                mips32_op = OPC_SLLV;
                goto do_shift;
            case SRLV:
                mips32_op = OPC_SRLV;
                goto do_shift;
            case SRAV:
                mips32_op = OPC_SRAV;
                goto do_shift;
            case ROTRV:
                mips32_op = OPC_ROTRV;
            do_shift:
                gen_shift(env, ctx, mips32_op, rd, rs, rt);
                break;
                /* Logical operations */
            case AND:
                mips32_op = OPC_AND;
                goto do_logic;
            case OR32:
                mips32_op = OPC_OR;
                goto do_logic;
            case NOR:
                mips32_op = OPC_NOR;
                goto do_logic;
            case XOR32:
                mips32_op = OPC_XOR;
            do_logic:
                gen_logic(env, mips32_op, rd, rs, rt);
                break;
                /* Set less than */
            case SLT:
                mips32_op = OPC_SLT;
                goto do_slt;
            case SLTU:
                mips32_op = OPC_SLTU;
            do_slt:
                gen_slt(env, mips32_op, rd, rs, rt);
                break;
            default:
                goto pool32a_invalid;
            }
            break;
        case 0x18:
            minor = (ctx->opcode >> 6) & 0xf;
            switch (minor) {
                /* Conditional moves */
            case MOVN:
                mips32_op = OPC_MOVN;
                goto do_cmov;
            case MOVZ:
                mips32_op = OPC_MOVZ;
            do_cmov:
                gen_cond_move(env, mips32_op, rd, rs, rt);
                break;
            case LWXS:
                gen_ldxs(ctx, rs, rt, rd);
                break;
            default:
                goto pool32a_invalid;
            }
            break;
        case INS:
            gen_bitops(ctx, OPC_INS, rt, rs, rr, rd);
            return;
        case EXT:
            gen_bitops(ctx, OPC_EXT, rt, rs, rr, rd);
            return;
        case POOL32AXF:
            gen_pool32axf(env, ctx, rt, rs, is_branch);
            break;
        case 0x07:
            generate_exception(ctx, EXCP_BREAK);
            break;
        default:
        pool32a_invalid:
                MIPS_INVAL("pool32a");
                generate_exception(ctx, EXCP_RI);
                break;
        }
        break;
    case POOL32B:
        minor = (ctx->opcode >> 12) & 0xf;
        switch (minor) {
        case CACHE:
            /* Treat as no-op. */
            break;
        case LWC2:
        case SWC2:
            /* COP2: Not implemented. */
            generate_exception_err(ctx, EXCP_CpU, 2);
            break;
        case LWP:
        case SWP:
#ifdef TARGET_MIPS64
        case LDP:
        case SDP:
#endif
            gen_ldst_pair(ctx, minor, rt, rs, SIMM(ctx->opcode, 0, 12));
            break;
        case LWM32:
        case SWM32:
#ifdef TARGET_MIPS64
        case LDM:
        case SDM:
#endif
            gen_ldst_multiple(ctx, minor, rt, rs, SIMM(ctx->opcode, 0, 12));
            break;
        default:
            MIPS_INVAL("pool32b");
            generate_exception(ctx, EXCP_RI);
            break;
        }
        break;
    case POOL32F:
        if (env->CP0_Config1 & (1 << CP0C1_FP)) {
            minor = ctx->opcode & 0x3f;
            check_cp1_enabled(ctx);
            switch (minor) {
            case ALNV_PS:
                mips32_op = OPC_ALNV_PS;
                goto do_madd;
            case MADD_S:
                mips32_op = OPC_MADD_S;
                goto do_madd;
            case MADD_D:
                mips32_op = OPC_MADD_D;
                goto do_madd;
            case MADD_PS:
                mips32_op = OPC_MADD_PS;
                goto do_madd;
            case MSUB_S:
                mips32_op = OPC_MSUB_S;
                goto do_madd;
            case MSUB_D:
                mips32_op = OPC_MSUB_D;
                goto do_madd;
            case MSUB_PS:
                mips32_op = OPC_MSUB_PS;
                goto do_madd;
            case NMADD_S:
                mips32_op = OPC_NMADD_S;
                goto do_madd;
            case NMADD_D:
                mips32_op = OPC_NMADD_D;
                goto do_madd;
            case NMADD_PS:
                mips32_op = OPC_NMADD_PS;
                goto do_madd;
            case NMSUB_S:
                mips32_op = OPC_NMSUB_S;
                goto do_madd;
            case NMSUB_D:
                mips32_op = OPC_NMSUB_D;
                goto do_madd;
            case NMSUB_PS:
                mips32_op = OPC_NMSUB_PS;
            do_madd:
                gen_flt3_arith(ctx, mips32_op, rd, rr, rs, rt);
                break;
            case CABS_COND_FMT:
                cond = (ctx->opcode >> 6) & 0xf;
                cc = (ctx->opcode >> 13) & 0x7;
                fmt = (ctx->opcode >> 10) & 0x3;
                switch (fmt) {
                case 0x0:
                    gen_cmpabs_s(ctx, cond, rt, rs, cc);
                    break;
                case 0x1:
                    gen_cmpabs_d(ctx, cond, rt, rs, cc);
                    break;
                case 0x2:
                    gen_cmpabs_ps(ctx, cond, rt, rs, cc);
                    break;
                default:
                    goto pool32f_invalid;
                }
                break;
            case C_COND_FMT:
                cond = (ctx->opcode >> 6) & 0xf;
                cc = (ctx->opcode >> 13) & 0x7;
                fmt = (ctx->opcode >> 10) & 0x3;
                switch (fmt) {
                case 0x0:
                    gen_cmp_s(ctx, cond, rt, rs, cc);
                    break;
                case 0x1:
                    gen_cmp_d(ctx, cond, rt, rs, cc);
                    break;
                case 0x2:
                    gen_cmp_ps(ctx, cond, rt, rs, cc);
                    break;
                default:
                    goto pool32f_invalid;
                }
                break;
            case POOL32FXF:
                gen_pool32fxf(env, ctx, rt, rs);
                break;
            case 0x00:
                /* PLL foo */
                switch ((ctx->opcode >> 6) & 0x7) {
                case PLL_PS:
                    mips32_op = OPC_PLL_PS;
                    goto do_ps;
                case PLU_PS:
                    mips32_op = OPC_PLU_PS;
                    goto do_ps;
                case PUL_PS:
                    mips32_op = OPC_PUL_PS;
                    goto do_ps;
                case PUU_PS:
                    mips32_op = OPC_PUU_PS;
                    goto do_ps;
                case CVT_PS_S:
                    mips32_op = OPC_CVT_PS_S;
                do_ps:
                    gen_farith(ctx, mips32_op, rt, rs, rd, 0);
                    break;
                default:
                    goto pool32f_invalid;
                }
                break;
            case 0x08:
                /* [LS][WDU]XC1 */
                switch ((ctx->opcode >> 6) & 0x7) {
                case LWXC1:
                    mips32_op = OPC_LWXC1;
                    goto do_ldst_cp1;
                case SWXC1:
                    mips32_op = OPC_SWXC1;
                    goto do_ldst_cp1;
                case LDXC1:
                    mips32_op = OPC_LDXC1;
                    goto do_ldst_cp1;
                case SDXC1:
                    mips32_op = OPC_SDXC1;
                    goto do_ldst_cp1;
                case LUXC1:
                    mips32_op = OPC_LUXC1;
                    goto do_ldst_cp1;
                case SUXC1:
                    mips32_op = OPC_SUXC1;
                do_ldst_cp1:
                    gen_flt3_ldst(ctx, mips32_op, rd, rd, rt, rs);
                    break;
                default:
                    goto pool32f_invalid;
                }
                break;
            case 0x18:
                /* 3D insns */
                fmt = (ctx->opcode >> 9) & 0x3;
                switch ((ctx->opcode >> 6) & 0x7) {
                case RSQRT2_FMT:
                    switch (fmt) {
                    case FMT_SDPS_S:
                        mips32_op = OPC_RSQRT2_S;
                        goto do_3d;
                    case FMT_SDPS_D:
                        mips32_op = OPC_RSQRT2_D;
                        goto do_3d;
                    case FMT_SDPS_PS:
                        mips32_op = OPC_RSQRT2_PS;
                        goto do_3d;
                    default:
                        goto pool32f_invalid;
                    }
                    break;
                case RECIP2_FMT:
                    switch (fmt) {
                    case FMT_SDPS_S:
                        mips32_op = OPC_RECIP2_S;
                        goto do_3d;
                    case FMT_SDPS_D:
                        mips32_op = OPC_RECIP2_D;
                        goto do_3d;
                    case FMT_SDPS_PS:
                        mips32_op = OPC_RECIP2_PS;
                        goto do_3d;
                    default:
                        goto pool32f_invalid;
                    }
                    break;
                case ADDR_PS:
                    mips32_op = OPC_ADDR_PS;
                    goto do_3d;
                case MULR_PS:
                    mips32_op = OPC_MULR_PS;
                do_3d:
                    gen_farith(ctx, mips32_op, rt, rs, rd, 0);
                    break;
                default:
                    goto pool32f_invalid;
                }
                break;
            case 0x20:
                /* MOV[FT].fmt and PREFX */
                cc = (ctx->opcode >> 13) & 0x7;
                fmt = (ctx->opcode >> 9) & 0x3;
                switch ((ctx->opcode >> 6) & 0x7) {
                case MOVF_FMT:
                    switch (fmt) {
                    case FMT_SDPS_S:
                        gen_movcf_s(rs, rt, cc, 0);
                        break;
                    case FMT_SDPS_D:
                        gen_movcf_d(ctx, rs, rt, cc, 0);
                        break;
                    case FMT_SDPS_PS:
                        gen_movcf_ps(rs, rt, cc, 0);
                        break;
                    default:
                        goto pool32f_invalid;
                    }
                    break;
                case MOVT_FMT:
                    switch (fmt) {
                    case FMT_SDPS_S:
                        gen_movcf_s(rs, rt, cc, 1);
                        break;
                    case FMT_SDPS_D:
                        gen_movcf_d(ctx, rs, rt, cc, 1);
                        break;
                    case FMT_SDPS_PS:
                        gen_movcf_ps(rs, rt, cc, 1);
                        break;
                    default:
                        goto pool32f_invalid;
                    }
                    break;
                case PREFX:
                    break;
                default:
                    goto pool32f_invalid;
                }
                break;
#define FINSN_3ARG_SDPS(prfx)                           \
                switch ((ctx->opcode >> 8) & 0x3) {     \
                case FMT_SDPS_S:                        \
                    mips32_op = OPC_##prfx##_S;         \
                    goto do_fpop;                       \
                case FMT_SDPS_D:                        \
                    mips32_op = OPC_##prfx##_D;         \
                    goto do_fpop;                       \
                case FMT_SDPS_PS:                       \
                    mips32_op = OPC_##prfx##_PS;        \
                    goto do_fpop;                       \
                default:                                \
                    goto pool32f_invalid;               \
                }
            case 0x30:
                /* regular FP ops */
                switch ((ctx->opcode >> 6) & 0x3) {
                case ADD_FMT:
                    FINSN_3ARG_SDPS(ADD);
                    break;
                case SUB_FMT:
                    FINSN_3ARG_SDPS(SUB);
                    break;
                case MUL_FMT:
                    FINSN_3ARG_SDPS(MUL);
                    break;
                case DIV_FMT:
                    fmt = (ctx->opcode >> 8) & 0x3;
                    if (fmt == 1) {
                        mips32_op = OPC_DIV_D;
                    } else if (fmt == 0) {
                        mips32_op = OPC_DIV_S;
                    } else {
                        goto pool32f_invalid;
                    }
                    goto do_fpop;
                default:
                    goto pool32f_invalid;
                }
                break;
            case 0x38:
                /* cmovs */
                switch ((ctx->opcode >> 6) & 0x3) {
                case MOVN_FMT:
                    FINSN_3ARG_SDPS(MOVN);
                    break;
                case MOVZ_FMT:
                    FINSN_3ARG_SDPS(MOVZ);
                    break;
                default:
                    goto pool32f_invalid;
                }
                break;
            do_fpop:
                gen_farith(ctx, mips32_op, rt, rs, rd, 0);
                break;
            default:
            pool32f_invalid:
                MIPS_INVAL("pool32f");
                generate_exception(ctx, EXCP_RI);
                break;
            }
        } else {
            generate_exception_err(ctx, EXCP_CpU, 1);
        }
        break;
    case POOL32I:
        minor = (ctx->opcode >> 21) & 0x1f;
        switch (minor) {
        case BLTZ:
            mips32_op = OPC_BLTZ;
            goto do_branch;
        case BLTZAL:
            mips32_op = OPC_BLTZAL;
            goto do_branch;
        case BLTZALS:
            mips32_op = OPC_BLTZALS;
            goto do_branch;
        case BGEZ:
            mips32_op = OPC_BGEZ;
            goto do_branch;
        case BGEZAL:
            mips32_op = OPC_BGEZAL;
            goto do_branch;
        case BGEZALS:
            mips32_op = OPC_BGEZALS;
            goto do_branch;
        case BLEZ:
            mips32_op = OPC_BLEZ;
            goto do_branch;
        case BGTZ:
            mips32_op = OPC_BGTZ;
        do_branch:
            gen_compute_branch(ctx, mips32_op, 4, rs, -1, imm << 1);
            *is_branch = 1;
            break;

            /* Traps */
        case TLTI:
            mips32_op = OPC_TLTI;
            goto do_trapi;
        case TGEI:
            mips32_op = OPC_TGEI;
            goto do_trapi;
        case TLTIU:
            mips32_op = OPC_TLTIU;
            goto do_trapi;
        case TGEIU:
            mips32_op = OPC_TGEIU;
            goto do_trapi;
        case TNEI:
            mips32_op = OPC_TNEI;
            goto do_trapi;
        case TEQI:
            mips32_op = OPC_TEQI;
        do_trapi:
            gen_trap(ctx, mips32_op, rs, -1, imm);
            break;

        case BNEZC:
        case BEQZC:
            gen_compute_branch(ctx, minor == BNEZC ? OPC_BNE : OPC_BEQ,
                               4, rs, 0, imm << 1);
            /* Compact branches don't have a delay slot, so just let
               the normal delay slot handling take us to the branch
               target. */
            break;
        case LUI:
            gen_logic_imm(env, OPC_LUI, rs, -1, imm);
            break;
        case SYNCI:
            break;
        case BC2F:
        case BC2T:
            /* COP2: Not implemented. */
            generate_exception_err(ctx, EXCP_CpU, 2);
            break;
        case BC1F:
            mips32_op = (ctx->opcode & (1 << 16)) ? OPC_BC1FANY2 : OPC_BC1F;
            goto do_cp1branch;
        case BC1T:
            mips32_op = (ctx->opcode & (1 << 16)) ? OPC_BC1TANY2 : OPC_BC1T;
            goto do_cp1branch;
        case BC1ANY4F:
            mips32_op = OPC_BC1FANY4;
            goto do_cp1mips3d;
        case BC1ANY4T:
            mips32_op = OPC_BC1TANY4;
        do_cp1mips3d:
            check_cop1x(ctx);
            check_insn(env, ctx, ASE_MIPS3D);
            /* Fall through */
        do_cp1branch:
            gen_compute_branch1(env, ctx, mips32_op,
                                (ctx->opcode >> 18) & 0x7, imm << 1);
            *is_branch = 1;
            break;
        case BPOSGE64:
        case BPOSGE32:
            /* MIPS DSP: not implemented */
            /* Fall through */
        default:
            MIPS_INVAL("pool32i");
            generate_exception(ctx, EXCP_RI);
            break;
        }
        break;
    case POOL32C:
        minor = (ctx->opcode >> 12) & 0xf;
        switch (minor) {
        case LWL:
            mips32_op = OPC_LWL;
10823
            goto do_ld_lr;
10824 10825
        case SWL:
            mips32_op = OPC_SWL;
10826
            goto do_st_lr;
10827 10828
        case LWR:
            mips32_op = OPC_LWR;
10829
            goto do_ld_lr;
10830 10831
        case SWR:
            mips32_op = OPC_SWR;
10832
            goto do_st_lr;
10833 10834 10835
#if defined(TARGET_MIPS64)
        case LDL:
            mips32_op = OPC_LDL;
10836
            goto do_ld_lr;
10837 10838
        case SDL:
            mips32_op = OPC_SDL;
10839
            goto do_st_lr;
10840 10841
        case LDR:
            mips32_op = OPC_LDR;
10842
            goto do_ld_lr;
10843 10844
        case SDR:
            mips32_op = OPC_SDR;
10845
            goto do_st_lr;
10846 10847
        case LWU:
            mips32_op = OPC_LWU;
10848
            goto do_ld_lr;
10849 10850
        case LLD:
            mips32_op = OPC_LLD;
10851
            goto do_ld_lr;
10852 10853 10854
#endif
        case LL:
            mips32_op = OPC_LL;
10855 10856
            goto do_ld_lr;
        do_ld_lr:
10857
            gen_ld(env, ctx, mips32_op, rt, rs, SIMM(ctx->opcode, 0, 12));
10858 10859 10860
            break;
        do_st_lr:
            gen_st(ctx, mips32_op, rt, rs, SIMM(ctx->opcode, 0, 12));
10861 10862 10863 10864 10865 10866 10867 10868 10869 10870 10871 10872 10873 10874 10875 10876 10877 10878 10879 10880 10881 10882 10883 10884 10885 10886 10887 10888 10889 10890 10891 10892 10893 10894 10895 10896 10897 10898 10899 10900 10901 10902 10903 10904 10905 10906 10907 10908 10909 10910 10911 10912 10913 10914 10915 10916 10917 10918 10919 10920 10921 10922 10923 10924 10925 10926 10927 10928 10929 10930 10931 10932 10933 10934 10935 10936 10937 10938 10939 10940 10941 10942 10943 10944 10945 10946 10947 10948 10949 10950 10951 10952 10953 10954 10955 10956 10957 10958 10959 10960 10961 10962 10963
            break;
        case SC:
            gen_st_cond(ctx, OPC_SC, rt, rs, SIMM(ctx->opcode, 0, 12));
            break;
#if defined(TARGET_MIPS64)
        case SCD:
            gen_st_cond(ctx, OPC_SCD, rt, rs, SIMM(ctx->opcode, 0, 12));
            break;
#endif
        case PREF:
            /* Treat as no-op */
            break;
        default:
            MIPS_INVAL("pool32c");
            generate_exception(ctx, EXCP_RI);
            break;
        }
        break;
    case ADDI32:
        mips32_op = OPC_ADDI;
        goto do_addi;
    case ADDIU32:
        mips32_op = OPC_ADDIU;
    do_addi:
        gen_arith_imm(env, ctx, mips32_op, rt, rs, imm);
        break;

        /* Logical operations */
    case ORI32:
        mips32_op = OPC_ORI;
        goto do_logici;
    case XORI32:
        mips32_op = OPC_XORI;
        goto do_logici;
    case ANDI32:
        mips32_op = OPC_ANDI;
    do_logici:
        gen_logic_imm(env, mips32_op, rt, rs, imm);
        break;

        /* Set less than immediate */
    case SLTI32:
        mips32_op = OPC_SLTI;
        goto do_slti;
    case SLTIU32:
        mips32_op = OPC_SLTIU;
    do_slti:
        gen_slt_imm(env, mips32_op, rt, rs, imm);
        break;
    case JALX32:
        offset = (int32_t)(ctx->opcode & 0x3FFFFFF) << 2;
        gen_compute_branch(ctx, OPC_JALX, 4, rt, rs, offset);
        *is_branch = 1;
        break;
    case JALS32:
        offset = (int32_t)(ctx->opcode & 0x3FFFFFF) << 1;
        gen_compute_branch(ctx, OPC_JALS, 4, rt, rs, offset);
        *is_branch = 1;
        break;
    case BEQ32:
        gen_compute_branch(ctx, OPC_BEQ, 4, rt, rs, imm << 1);
        *is_branch = 1;
        break;
    case BNE32:
        gen_compute_branch(ctx, OPC_BNE, 4, rt, rs, imm << 1);
        *is_branch = 1;
        break;
    case J32:
        gen_compute_branch(ctx, OPC_J, 4, rt, rs,
                           (int32_t)(ctx->opcode & 0x3FFFFFF) << 1);
        *is_branch = 1;
        break;
    case JAL32:
        gen_compute_branch(ctx, OPC_JAL, 4, rt, rs,
                           (int32_t)(ctx->opcode & 0x3FFFFFF) << 1);
        *is_branch = 1;
        break;
        /* Floating point (COP1) */
    case LWC132:
        mips32_op = OPC_LWC1;
        goto do_cop1;
    case LDC132:
        mips32_op = OPC_LDC1;
        goto do_cop1;
    case SWC132:
        mips32_op = OPC_SWC1;
        goto do_cop1;
    case SDC132:
        mips32_op = OPC_SDC1;
    do_cop1:
        gen_cop1_ldst(env, ctx, mips32_op, rt, rs, imm);
        break;
    case ADDIUPC:
        {
            int reg = mmreg(ZIMM(ctx->opcode, 23, 3));
            int offset = SIMM(ctx->opcode, 0, 23) << 2;

            gen_addiupc(ctx, reg, offset, 0, 0);
        }
        break;
        /* Loads and stores */
    case LB32:
        mips32_op = OPC_LB;
10964
        goto do_ld;
10965 10966
    case LBU32:
        mips32_op = OPC_LBU;
10967
        goto do_ld;
10968 10969
    case LH32:
        mips32_op = OPC_LH;
10970
        goto do_ld;
10971 10972
    case LHU32:
        mips32_op = OPC_LHU;
10973
        goto do_ld;
10974 10975
    case LW32:
        mips32_op = OPC_LW;
10976
        goto do_ld;
10977 10978 10979
#ifdef TARGET_MIPS64
    case LD32:
        mips32_op = OPC_LD;
10980
        goto do_ld;
10981 10982
    case SD32:
        mips32_op = OPC_SD;
10983
        goto do_st;
10984 10985 10986
#endif
    case SB32:
        mips32_op = OPC_SB;
10987
        goto do_st;
10988 10989
    case SH32:
        mips32_op = OPC_SH;
10990
        goto do_st;
10991 10992
    case SW32:
        mips32_op = OPC_SW;
10993 10994
        goto do_st;
    do_ld:
10995
        gen_ld(env, ctx, mips32_op, rt, rs, imm);
10996 10997 10998
        break;
    do_st:
        gen_st(ctx, mips32_op, rt, rs, imm);
10999 11000 11001 11002 11003 11004 11005 11006 11007 11008 11009 11010 11011 11012 11013 11014 11015 11016 11017 11018 11019 11020 11021 11022 11023 11024 11025 11026 11027 11028 11029 11030 11031 11032 11033 11034 11035 11036 11037 11038 11039 11040 11041 11042 11043 11044 11045 11046 11047 11048 11049 11050 11051 11052 11053 11054 11055 11056 11057 11058 11059 11060 11061 11062 11063 11064 11065 11066 11067 11068 11069 11070 11071 11072 11073 11074 11075 11076 11077 11078 11079 11080 11081 11082 11083 11084 11085 11086 11087 11088 11089 11090 11091 11092 11093 11094 11095 11096 11097 11098 11099 11100 11101 11102 11103 11104 11105 11106 11107 11108 11109 11110 11111 11112 11113 11114 11115 11116 11117 11118 11119 11120 11121 11122 11123 11124 11125 11126 11127 11128 11129 11130 11131 11132 11133 11134 11135 11136 11137 11138 11139 11140 11141 11142 11143 11144 11145 11146 11147
        break;
    default:
        generate_exception(ctx, EXCP_RI);
        break;
    }
}

static int decode_micromips_opc (CPUState *env, DisasContext *ctx, int *is_branch)
{
    uint32_t op;

    /* make sure instructions are on a halfword boundary */
    if (ctx->pc & 0x1) {
        env->CP0_BadVAddr = ctx->pc;
        generate_exception(ctx, EXCP_AdEL);
        ctx->bstate = BS_STOP;
        return 2;
    }

    op = (ctx->opcode >> 10) & 0x3f;
    /* Enforce properly-sized instructions in a delay slot */
    if (ctx->hflags & MIPS_HFLAG_BMASK) {
        int bits = ctx->hflags & MIPS_HFLAG_BMASK_EXT;

        switch (op) {
        case POOL32A:
        case POOL32B:
        case POOL32I:
        case POOL32C:
        case ADDI32:
        case ADDIU32:
        case ORI32:
        case XORI32:
        case SLTI32:
        case SLTIU32:
        case ANDI32:
        case JALX32:
        case LBU32:
        case LHU32:
        case POOL32F:
        case JALS32:
        case BEQ32:
        case BNE32:
        case J32:
        case JAL32:
        case SB32:
        case SH32:
        case POOL32S:
        case ADDIUPC:
        case SWC132:
        case SDC132:
        case SD32:
        case SW32:
        case LB32:
        case LH32:
        case DADDIU32:
        case POOL48A:           /* ??? */
        case LWC132:
        case LDC132:
        case LD32:
        case LW32:
            if (bits & MIPS_HFLAG_BDS16) {
                generate_exception(ctx, EXCP_RI);
                /* Just stop translation; the user is confused.  */
                ctx->bstate = BS_STOP;
                return 2;
            }
            break;
        case POOL16A:
        case POOL16B:
        case POOL16C:
        case LWGP16:
        case POOL16F:
        case LBU16:
        case LHU16:
        case LWSP16:
        case LW16:
        case SB16:
        case SH16:
        case SWSP16:
        case SW16:
        case MOVE16:
        case ANDI16:
        case POOL16D:
        case POOL16E:
        case BEQZ16:
        case BNEZ16:
        case B16:
        case LI16:
            if (bits & MIPS_HFLAG_BDS32) {
                generate_exception(ctx, EXCP_RI);
                /* Just stop translation; the user is confused.  */
                ctx->bstate = BS_STOP;
                return 2;
            }
            break;
        default:
            break;
        }
    }
    switch (op) {
    case POOL16A:
        {
            int rd = mmreg(uMIPS_RD(ctx->opcode));
            int rs1 = mmreg(uMIPS_RS1(ctx->opcode));
            int rs2 = mmreg(uMIPS_RS2(ctx->opcode));
            uint32_t opc = 0;

            switch (ctx->opcode & 0x1) {
            case ADDU16:
                opc = OPC_ADDU;
                break;
            case SUBU16:
                opc = OPC_SUBU;
                break;
            }

            gen_arith(env, ctx, opc, rd, rs1, rs2);
        }
        break;
    case POOL16B:
        {
            int rd = mmreg(uMIPS_RD(ctx->opcode));
            int rs = mmreg(uMIPS_RS(ctx->opcode));
            int amount = (ctx->opcode >> 1) & 0x7;
            uint32_t opc = 0;
            amount = amount == 0 ? 8 : amount;

            switch (ctx->opcode & 0x1) {
            case SLL16:
                opc = OPC_SLL;
                break;
            case SRL16:
                opc = OPC_SRL;
                break;
            }

            gen_shift_imm(env, ctx, opc, rd, rs, amount);
        }
        break;
    case POOL16C:
        gen_pool16c_insn(env, ctx, is_branch);
        break;
    case LWGP16:
        {
            int rd = mmreg(uMIPS_RD(ctx->opcode));
            int rb = 28;            /* GP */
            int16_t offset = SIMM(ctx->opcode, 0, 7) << 2;

11148
            gen_ld(env, ctx, OPC_LW, rd, rb, offset);
11149 11150 11151 11152 11153 11154 11155 11156 11157 11158 11159 11160 11161 11162 11163 11164 11165 11166 11167 11168 11169 11170 11171 11172 11173 11174 11175 11176 11177 11178 11179
        }
        break;
    case POOL16F:
        if (ctx->opcode & 1) {
            generate_exception(ctx, EXCP_RI);
        } else {
            /* MOVEP */
            int enc_dest = uMIPS_RD(ctx->opcode);
            int enc_rt = uMIPS_RS2(ctx->opcode);
            int enc_rs = uMIPS_RS1(ctx->opcode);
            int rd, rs, re, rt;
            static const int rd_enc[] = { 5, 5, 6, 4, 4, 4, 4, 4 };
            static const int re_enc[] = { 6, 7, 7, 21, 22, 5, 6, 7 };
            static const int rs_rt_enc[] = { 0, 17, 2, 3, 16, 18, 19, 20 };

            rd = rd_enc[enc_dest];
            re = re_enc[enc_dest];
            rs = rs_rt_enc[enc_rs];
            rt = rs_rt_enc[enc_rt];

            gen_arith_imm(env, ctx, OPC_ADDIU, rd, rs, 0);
            gen_arith_imm(env, ctx, OPC_ADDIU, re, rt, 0);
        }
        break;
    case LBU16:
        {
            int rd = mmreg(uMIPS_RD(ctx->opcode));
            int rb = mmreg(uMIPS_RS(ctx->opcode));
            int16_t offset = ZIMM(ctx->opcode, 0, 4);
            offset = (offset == 0xf ? -1 : offset);

11180
            gen_ld(env, ctx, OPC_LBU, rd, rb, offset);
11181 11182 11183 11184 11185 11186 11187 11188
        }
        break;
    case LHU16:
        {
            int rd = mmreg(uMIPS_RD(ctx->opcode));
            int rb = mmreg(uMIPS_RS(ctx->opcode));
            int16_t offset = ZIMM(ctx->opcode, 0, 4) << 1;

11189
            gen_ld(env, ctx, OPC_LHU, rd, rb, offset);
11190 11191 11192 11193 11194 11195 11196 11197
        }
        break;
    case LWSP16:
        {
            int rd = (ctx->opcode >> 5) & 0x1f;
            int rb = 29;            /* SP */
            int16_t offset = ZIMM(ctx->opcode, 0, 5) << 2;

11198
            gen_ld(env, ctx, OPC_LW, rd, rb, offset);
11199 11200 11201 11202 11203 11204 11205 11206
        }
        break;
    case LW16:
        {
            int rd = mmreg(uMIPS_RD(ctx->opcode));
            int rb = mmreg(uMIPS_RS(ctx->opcode));
            int16_t offset = ZIMM(ctx->opcode, 0, 4) << 2;

11207
            gen_ld(env, ctx, OPC_LW, rd, rb, offset);
11208 11209 11210 11211 11212 11213 11214 11215
        }
        break;
    case SB16:
        {
            int rd = mmreg2(uMIPS_RD(ctx->opcode));
            int rb = mmreg(uMIPS_RS(ctx->opcode));
            int16_t offset = ZIMM(ctx->opcode, 0, 4);

11216
            gen_st(ctx, OPC_SB, rd, rb, offset);
11217 11218 11219 11220 11221 11222 11223 11224
        }
        break;
    case SH16:
        {
            int rd = mmreg2(uMIPS_RD(ctx->opcode));
            int rb = mmreg(uMIPS_RS(ctx->opcode));
            int16_t offset = ZIMM(ctx->opcode, 0, 4) << 1;

11225
            gen_st(ctx, OPC_SH, rd, rb, offset);
11226 11227 11228 11229 11230 11231 11232 11233
        }
        break;
    case SWSP16:
        {
            int rd = (ctx->opcode >> 5) & 0x1f;
            int rb = 29;            /* SP */
            int16_t offset = ZIMM(ctx->opcode, 0, 5) << 2;

11234
            gen_st(ctx, OPC_SW, rd, rb, offset);
11235 11236 11237 11238 11239 11240 11241 11242
        }
        break;
    case SW16:
        {
            int rd = mmreg2(uMIPS_RD(ctx->opcode));
            int rb = mmreg(uMIPS_RS(ctx->opcode));
            int16_t offset = ZIMM(ctx->opcode, 0, 4) << 2;

11243
            gen_st(ctx, OPC_SW, rd, rb, offset);
11244 11245 11246 11247 11248 11249 11250 11251 11252 11253 11254 11255 11256 11257 11258 11259 11260 11261 11262 11263 11264 11265 11266 11267 11268 11269 11270 11271 11272 11273 11274 11275 11276 11277 11278 11279 11280 11281 11282 11283 11284 11285 11286 11287 11288 11289 11290 11291 11292 11293 11294 11295 11296 11297 11298 11299 11300 11301 11302 11303 11304 11305 11306 11307 11308 11309 11310 11311 11312 11313 11314 11315 11316 11317 11318 11319 11320 11321 11322 11323 11324 11325 11326 11327 11328 11329 11330 11331 11332 11333 11334 11335 11336 11337 11338 11339 11340 11341 11342 11343 11344 11345 11346 11347 11348 11349 11350 11351 11352 11353 11354 11355 11356 11357
        }
        break;
    case MOVE16:
        {
            int rd = uMIPS_RD5(ctx->opcode);
            int rs = uMIPS_RS5(ctx->opcode);

            gen_arith_imm(env, ctx, OPC_ADDIU, rd, rs, 0);
        }
        break;
    case ANDI16:
        gen_andi16(env, ctx);
        break;
    case POOL16D:
        switch (ctx->opcode & 0x1) {
        case ADDIUS5:
            gen_addius5(env, ctx);
            break;
        case ADDIUSP:
            gen_addiusp(env, ctx);
            break;
        }
        break;
    case POOL16E:
        switch (ctx->opcode & 0x1) {
        case ADDIUR2:
            gen_addiur2(env, ctx);
            break;
        case ADDIUR1SP:
            gen_addiur1sp(env, ctx);
            break;
        }
        break;
    case B16:
        gen_compute_branch(ctx, OPC_BEQ, 2, 0, 0,
                           SIMM(ctx->opcode, 0, 10) << 1);
        *is_branch = 1;
        break;
    case BNEZ16:
    case BEQZ16:
        gen_compute_branch(ctx, op == BNEZ16 ? OPC_BNE : OPC_BEQ, 2,
                           mmreg(uMIPS_RD(ctx->opcode)),
                           0, SIMM(ctx->opcode, 0, 7) << 1);
        *is_branch = 1;
        break;
    case LI16:
        {
            int reg = mmreg(uMIPS_RD(ctx->opcode));
            int imm = ZIMM(ctx->opcode, 0, 7);

            imm = (imm == 0x7f ? -1 : imm);
            tcg_gen_movi_tl(cpu_gpr[reg], imm);
        }
        break;
    case RES_20:
    case RES_28:
    case RES_29:
    case RES_30:
    case RES_31:
    case RES_38:
    case RES_39:
        generate_exception(ctx, EXCP_RI);
        break;
    default:
        decode_micromips32_opc (env, ctx, op, is_branch);
        return 4;
    }

    return 2;
}

/* SmartMIPS extension to MIPS32 */

#if defined(TARGET_MIPS64)

/* MDMX extension to MIPS64 */

#endif

static void decode_opc (CPUState *env, DisasContext *ctx, int *is_branch)
{
    int32_t offset;
    int rs, rt, rd, sa;
    uint32_t op, op1, op2;
    int16_t imm;

    /* make sure instructions are on a word boundary */
    if (ctx->pc & 0x3) {
        env->CP0_BadVAddr = ctx->pc;
        generate_exception(ctx, EXCP_AdEL);
        return;
    }

    /* Handle blikely not taken case */
    if ((ctx->hflags & MIPS_HFLAG_BMASK_BASE) == MIPS_HFLAG_BL) {
        int l1 = gen_new_label();

        MIPS_DEBUG("blikely condition (" TARGET_FMT_lx ")", ctx->pc + 4);
        tcg_gen_brcondi_tl(TCG_COND_NE, bcond, 0, l1);
        tcg_gen_movi_i32(hflags, ctx->hflags & ~MIPS_HFLAG_BMASK);
        gen_goto_tb(ctx, 1, ctx->pc + 4);
        gen_set_label(l1);
    }

    if (unlikely(qemu_loglevel_mask(CPU_LOG_TB_OP)))
        tcg_gen_debug_insn_start(ctx->pc);

    op = MASK_OP_MAJOR(ctx->opcode);
    rs = (ctx->opcode >> 21) & 0x1f;
    rt = (ctx->opcode >> 16) & 0x1f;
    rd = (ctx->opcode >> 11) & 0x1f;
    sa = (ctx->opcode >> 6) & 0x1f;
    imm = (int16_t)ctx->opcode;
    switch (op) {
11358 11359
    case OPC_SPECIAL:
        op1 = MASK_SPECIAL(ctx->opcode);
B
bellard 已提交
11360
        switch (op1) {
A
aurel32 已提交
11361 11362 11363
        case OPC_SLL:          /* Shift with immediate */
        case OPC_SRA:
            gen_shift_imm(env, ctx, op1, rd, rt, sa);
11364
            break;
11365 11366 11367 11368 11369 11370 11371 11372 11373 11374 11375 11376 11377 11378 11379 11380
        case OPC_SRL:
            switch ((ctx->opcode >> 21) & 0x1f) {
            case 1:
                /* rotr is decoded as srl on non-R2 CPUs */
                if (env->insn_flags & ISA_MIPS32R2) {
                    op1 = OPC_ROTR;
                }
                /* Fallthrough */
            case 0:
                gen_shift_imm(env, ctx, op1, rd, rt, sa);
                break;
            default:
                generate_exception(ctx, EXCP_RI);
                break;
            }
            break;
A
aurel32 已提交
11381 11382
        case OPC_MOVN:         /* Conditional move */
        case OPC_MOVZ:
11383 11384
            check_insn(env, ctx, ISA_MIPS4 | ISA_MIPS32 |
                                 INSN_LOONGSON2E | INSN_LOONGSON2F);
A
aurel32 已提交
11385 11386 11387
            gen_cond_move(env, op1, rd, rs, rt);
            break;
        case OPC_ADD ... OPC_SUBU:
11388
            gen_arith(env, ctx, op1, rd, rs, rt);
11389
            break;
A
aurel32 已提交
11390 11391 11392 11393
        case OPC_SLLV:         /* Shifts */
        case OPC_SRAV:
            gen_shift(env, ctx, op1, rd, rs, rt);
            break;
11394 11395 11396 11397 11398 11399 11400 11401 11402 11403 11404 11405 11406 11407 11408 11409
        case OPC_SRLV:
            switch ((ctx->opcode >> 6) & 0x1f) {
            case 1:
                /* rotrv is decoded as srlv on non-R2 CPUs */
                if (env->insn_flags & ISA_MIPS32R2) {
                    op1 = OPC_ROTRV;
                }
                /* Fallthrough */
            case 0:
                gen_shift(env, ctx, op1, rd, rs, rt);
                break;
            default:
                generate_exception(ctx, EXCP_RI);
                break;
            }
            break;
A
aurel32 已提交
11410 11411 11412 11413 11414 11415 11416 11417 11418 11419
        case OPC_SLT:          /* Set on less than */
        case OPC_SLTU:
            gen_slt(env, op1, rd, rs, rt);
            break;
        case OPC_AND:          /* Logic*/
        case OPC_OR:
        case OPC_NOR:
        case OPC_XOR:
            gen_logic(env, op1, rd, rs, rt);
            break;
11420
        case OPC_MULT ... OPC_DIVU:
11421 11422 11423 11424 11425 11426
            if (sa) {
                check_insn(env, ctx, INSN_VR54XX);
                op1 = MASK_MUL_VR54XX(ctx->opcode);
                gen_mul_vr54xx(ctx, op1, rd, rs, rt);
            } else
                gen_muldiv(ctx, op1, rs, rt);
11427 11428
            break;
        case OPC_JR ... OPC_JALR:
11429
            gen_compute_branch(ctx, op1, 4, rs, rd, sa);
11430 11431
            *is_branch = 1;
            break;
11432 11433 11434
        case OPC_TGE ... OPC_TEQ: /* Traps */
        case OPC_TNE:
            gen_trap(ctx, op1, rs, rt, -1);
B
bellard 已提交
11435
            break;
11436 11437 11438
        case OPC_MFHI:          /* Move from HI/LO */
        case OPC_MFLO:
            gen_HILO(ctx, op1, rd);
B
bellard 已提交
11439
            break;
11440 11441 11442
        case OPC_MTHI:
        case OPC_MTLO:          /* Move to HI/LO */
            gen_HILO(ctx, op1, rs);
B
bellard 已提交
11443
            break;
11444 11445 11446 11447 11448
        case OPC_PMON:          /* Pmon entry point, also R4010 selsl */
#ifdef MIPS_STRICT_STANDARD
            MIPS_INVAL("PMON / selsl");
            generate_exception(ctx, EXCP_RI);
#else
P
pbrook 已提交
11449
            gen_helper_0i(pmon, sa);
11450
#endif
11451 11452
            break;
        case OPC_SYSCALL:
B
bellard 已提交
11453
            generate_exception(ctx, EXCP_SYSCALL);
11454
            ctx->bstate = BS_STOP;
B
bellard 已提交
11455
            break;
11456
        case OPC_BREAK:
B
bellard 已提交
11457 11458
            generate_exception(ctx, EXCP_BREAK);
            break;
11459 11460 11461 11462 11463
        case OPC_SPIM:
#ifdef MIPS_STRICT_STANDARD
            MIPS_INVAL("SPIM");
            generate_exception(ctx, EXCP_RI);
#else
11464 11465 11466
           /* Implemented as RI exception for now. */
            MIPS_INVAL("spim (unofficial)");
            generate_exception(ctx, EXCP_RI);
11467
#endif
B
bellard 已提交
11468
            break;
11469
        case OPC_SYNC:
11470
            /* Treat as NOP. */
B
bellard 已提交
11471
            break;
B
bellard 已提交
11472

11473
        case OPC_MOVCI:
11474
            check_insn(env, ctx, ISA_MIPS4 | ISA_MIPS32);
11475
            if (env->CP0_Config1 & (1 << CP0C1_FP)) {
11476
                check_cp1_enabled(ctx);
11477 11478 11479
                gen_movci(ctx, rd, rs, (ctx->opcode >> 18) & 0x7,
                          (ctx->opcode >> 16) & 1);
            } else {
11480
                generate_exception_err(ctx, EXCP_CpU, 1);
11481
            }
B
bellard 已提交
11482 11483
            break;

11484
#if defined(TARGET_MIPS64)
11485 11486
       /* MIPS64 specific opcodes */
        case OPC_DSLL:
A
aurel32 已提交
11487
        case OPC_DSRA:
11488
        case OPC_DSLL32:
A
aurel32 已提交
11489
        case OPC_DSRA32:
11490 11491
            check_insn(env, ctx, ISA_MIPS3);
            check_mips_64(ctx);
A
aurel32 已提交
11492
            gen_shift_imm(env, ctx, op1, rd, rt, sa);
11493
            break;
11494 11495 11496 11497 11498 11499 11500 11501 11502 11503 11504 11505 11506 11507 11508 11509 11510 11511 11512 11513 11514 11515 11516 11517 11518 11519 11520 11521 11522 11523 11524 11525 11526 11527 11528 11529
        case OPC_DSRL:
            switch ((ctx->opcode >> 21) & 0x1f) {
            case 1:
                /* drotr is decoded as dsrl on non-R2 CPUs */
                if (env->insn_flags & ISA_MIPS32R2) {
                    op1 = OPC_DROTR;
                }
                /* Fallthrough */
            case 0:
                check_insn(env, ctx, ISA_MIPS3);
                check_mips_64(ctx);
                gen_shift_imm(env, ctx, op1, rd, rt, sa);
                break;
            default:
                generate_exception(ctx, EXCP_RI);
                break;
            }
            break;
        case OPC_DSRL32:
            switch ((ctx->opcode >> 21) & 0x1f) {
            case 1:
                /* drotr32 is decoded as dsrl32 on non-R2 CPUs */
                if (env->insn_flags & ISA_MIPS32R2) {
                    op1 = OPC_DROTR32;
                }
                /* Fallthrough */
            case 0:
                check_insn(env, ctx, ISA_MIPS3);
                check_mips_64(ctx);
                gen_shift_imm(env, ctx, op1, rd, rt, sa);
                break;
            default:
                generate_exception(ctx, EXCP_RI);
                break;
            }
            break;
11530
        case OPC_DADD ... OPC_DSUBU:
11531 11532 11533
            check_insn(env, ctx, ISA_MIPS3);
            check_mips_64(ctx);
            gen_arith(env, ctx, op1, rd, rs, rt);
11534
            break;
A
aurel32 已提交
11535 11536 11537 11538 11539 11540
        case OPC_DSLLV:
        case OPC_DSRAV:
            check_insn(env, ctx, ISA_MIPS3);
            check_mips_64(ctx);
            gen_shift(env, ctx, op1, rd, rs, rt);
            break;
11541 11542 11543 11544 11545 11546 11547 11548 11549 11550 11551 11552 11553 11554 11555 11556 11557 11558
        case OPC_DSRLV:
            switch ((ctx->opcode >> 6) & 0x1f) {
            case 1:
                /* drotrv is decoded as dsrlv on non-R2 CPUs */
                if (env->insn_flags & ISA_MIPS32R2) {
                    op1 = OPC_DROTRV;
                }
                /* Fallthrough */
            case 0:
                check_insn(env, ctx, ISA_MIPS3);
                check_mips_64(ctx);
                gen_shift(env, ctx, op1, rd, rs, rt);
                break;
            default:
                generate_exception(ctx, EXCP_RI);
                break;
            }
            break;
11559
        case OPC_DMULT ... OPC_DDIVU:
11560 11561
            check_insn(env, ctx, ISA_MIPS3);
            check_mips_64(ctx);
11562 11563
            gen_muldiv(ctx, op1, rs, rt);
            break;
B
bellard 已提交
11564 11565 11566 11567 11568 11569 11570
#endif
        default:            /* Invalid */
            MIPS_INVAL("special");
            generate_exception(ctx, EXCP_RI);
            break;
        }
        break;
11571 11572
    case OPC_SPECIAL2:
        op1 = MASK_SPECIAL2(ctx->opcode);
B
bellard 已提交
11573
        switch (op1) {
11574 11575
        case OPC_MADD ... OPC_MADDU: /* Multiply and add/sub */
        case OPC_MSUB ... OPC_MSUBU:
11576
            check_insn(env, ctx, ISA_MIPS32);
11577
            gen_muldiv(ctx, op1, rs, rt);
B
bellard 已提交
11578
            break;
11579
        case OPC_MUL:
11580
            gen_arith(env, ctx, op1, rd, rs, rt);
B
bellard 已提交
11581
            break;
A
aurel32 已提交
11582 11583
        case OPC_CLO:
        case OPC_CLZ:
11584
            check_insn(env, ctx, ISA_MIPS32);
11585
            gen_cl(ctx, op1, rd, rs);
B
bellard 已提交
11586
            break;
11587
        case OPC_SDBBP:
B
bellard 已提交
11588 11589 11590
            /* XXX: not clear which exception should be raised
             *      when in debug mode...
             */
11591
            check_insn(env, ctx, ISA_MIPS32);
B
bellard 已提交
11592 11593 11594 11595 11596
            if (!(ctx->hflags & MIPS_HFLAG_DM)) {
                generate_exception(ctx, EXCP_DBp);
            } else {
                generate_exception(ctx, EXCP_DBp);
            }
11597
            /* Treat as NOP. */
B
bellard 已提交
11598
            break;
11599
#if defined(TARGET_MIPS64)
A
aurel32 已提交
11600 11601
        case OPC_DCLO:
        case OPC_DCLZ:
11602 11603
            check_insn(env, ctx, ISA_MIPS64);
            check_mips_64(ctx);
11604 11605 11606
            gen_cl(ctx, op1, rd, rs);
            break;
#endif
B
bellard 已提交
11607 11608 11609 11610 11611 11612
        default:            /* Invalid */
            MIPS_INVAL("special2");
            generate_exception(ctx, EXCP_RI);
            break;
        }
        break;
11613
    case OPC_SPECIAL3:
11614 11615 11616 11617 11618 11619 11620 11621 11622 11623
        op1 = MASK_SPECIAL3(ctx->opcode);
        switch (op1) {
        case OPC_EXT:
        case OPC_INS:
            check_insn(env, ctx, ISA_MIPS32R2);
            gen_bitops(ctx, op1, rt, rs, sa, rd);
            break;
        case OPC_BSHFL:
            check_insn(env, ctx, ISA_MIPS32R2);
            op2 = MASK_BSHFL(ctx->opcode);
11624
            gen_bshfl(ctx, op2, rt, rd);
11625
            break;
11626
        case OPC_RDHWR:
11627
            gen_rdhwr(env, ctx, rt, rd);
11628
            break;
11629
        case OPC_FORK:
11630
            check_insn(env, ctx, ASE_MT);
11631
            {
A
aurel32 已提交
11632 11633
                TCGv t0 = tcg_temp_new();
                TCGv t1 = tcg_temp_new();
11634 11635 11636

                gen_load_gpr(t0, rt);
                gen_load_gpr(t1, rs);
P
pbrook 已提交
11637
                gen_helper_fork(t0, t1);
11638 11639 11640
                tcg_temp_free(t0);
                tcg_temp_free(t1);
            }
11641 11642
            break;
        case OPC_YIELD:
11643
            check_insn(env, ctx, ASE_MT);
11644
            {
A
aurel32 已提交
11645
                TCGv t0 = tcg_temp_new();
11646

A
aurel32 已提交
11647
                save_cpu_state(ctx, 1);
11648
                gen_load_gpr(t0, rs);
P
pbrook 已提交
11649
                gen_helper_yield(t0, t0);
11650 11651 11652
                gen_store_gpr(t0, rd);
                tcg_temp_free(t0);
            }
11653
            break;
11654
#if defined(TARGET_MIPS64)
11655 11656
        case OPC_DEXTM ... OPC_DEXT:
        case OPC_DINSM ... OPC_DINS:
11657 11658
            check_insn(env, ctx, ISA_MIPS64R2);
            check_mips_64(ctx);
11659
            gen_bitops(ctx, op1, rt, rs, sa, rd);
11660
            break;
11661
        case OPC_DBSHFL:
11662 11663
            check_insn(env, ctx, ISA_MIPS64R2);
            check_mips_64(ctx);
11664
            op2 = MASK_DBSHFL(ctx->opcode);
11665
            gen_bshfl(ctx, op2, rt, rd);
T
ths 已提交
11666
            break;
11667 11668 11669 11670 11671 11672 11673 11674 11675 11676 11677 11678
#endif
        default:            /* Invalid */
            MIPS_INVAL("special3");
            generate_exception(ctx, EXCP_RI);
            break;
        }
        break;
    case OPC_REGIMM:
        op1 = MASK_REGIMM(ctx->opcode);
        switch (op1) {
        case OPC_BLTZ ... OPC_BGEZL: /* REGIMM branches */
        case OPC_BLTZAL ... OPC_BGEZALL:
11679
            gen_compute_branch(ctx, op1, 4, rs, -1, imm << 2);
11680 11681
            *is_branch = 1;
            break;
11682 11683 11684 11685 11686
        case OPC_TGEI ... OPC_TEQI: /* REGIMM traps */
        case OPC_TNEI:
            gen_trap(ctx, op1, rs, -1, imm);
            break;
        case OPC_SYNCI:
11687
            check_insn(env, ctx, ISA_MIPS32R2);
11688
            /* Treat as NOP. */
B
bellard 已提交
11689 11690
            break;
        default:            /* Invalid */
11691
            MIPS_INVAL("regimm");
B
bellard 已提交
11692 11693 11694 11695
            generate_exception(ctx, EXCP_RI);
            break;
        }
        break;
11696
    case OPC_CP0:
11697
        check_cp0_enabled(ctx);
11698
        op1 = MASK_CP0(ctx->opcode);
B
bellard 已提交
11699
        switch (op1) {
11700 11701
        case OPC_MFC0:
        case OPC_MTC0:
11702 11703
        case OPC_MFTR:
        case OPC_MTTR:
11704
#if defined(TARGET_MIPS64)
11705 11706 11707
        case OPC_DMFC0:
        case OPC_DMTC0:
#endif
11708
#ifndef CONFIG_USER_ONLY
11709
            gen_cp0(env, ctx, op1, rt, rd);
T
ths 已提交
11710
#endif /* !CONFIG_USER_ONLY */
11711 11712
            break;
        case OPC_C0_FIRST ... OPC_C0_LAST:
11713
#ifndef CONFIG_USER_ONLY
11714
            gen_cp0(env, ctx, MASK_C0(ctx->opcode), rt, rd);
T
ths 已提交
11715
#endif /* !CONFIG_USER_ONLY */
11716 11717
            break;
        case OPC_MFMC0:
11718
#ifndef CONFIG_USER_ONLY
11719
            {
A
aurel32 已提交
11720
                TCGv t0 = tcg_temp_new();
11721

T
ths 已提交
11722
                op2 = MASK_MFMC0(ctx->opcode);
11723 11724 11725
                switch (op2) {
                case OPC_DMT:
                    check_insn(env, ctx, ASE_MT);
P
pbrook 已提交
11726
                    gen_helper_dmt(t0, t0);
A
aurel32 已提交
11727
                    gen_store_gpr(t0, rt);
11728 11729 11730
                    break;
                case OPC_EMT:
                    check_insn(env, ctx, ASE_MT);
P
pbrook 已提交
11731
                    gen_helper_emt(t0, t0);
A
aurel32 已提交
11732
                    gen_store_gpr(t0, rt);
11733
                    break;
11734 11735
                case OPC_DVPE:
                    check_insn(env, ctx, ASE_MT);
P
pbrook 已提交
11736
                    gen_helper_dvpe(t0, t0);
A
aurel32 已提交
11737
                    gen_store_gpr(t0, rt);
11738 11739 11740
                    break;
                case OPC_EVPE:
                    check_insn(env, ctx, ASE_MT);
P
pbrook 已提交
11741
                    gen_helper_evpe(t0, t0);
A
aurel32 已提交
11742
                    gen_store_gpr(t0, rt);
11743 11744 11745
                    break;
                case OPC_DI:
                    check_insn(env, ctx, ISA_MIPS32R2);
A
aurel32 已提交
11746
                    save_cpu_state(ctx, 1);
P
pbrook 已提交
11747
                    gen_helper_di(t0);
A
aurel32 已提交
11748
                    gen_store_gpr(t0, rt);
11749 11750 11751 11752 11753
                    /* Stop translation as we may have switched the execution mode */
                    ctx->bstate = BS_STOP;
                    break;
                case OPC_EI:
                    check_insn(env, ctx, ISA_MIPS32R2);
A
aurel32 已提交
11754
                    save_cpu_state(ctx, 1);
P
pbrook 已提交
11755
                    gen_helper_ei(t0);
A
aurel32 已提交
11756
                    gen_store_gpr(t0, rt);
11757 11758 11759 11760 11761 11762 11763 11764 11765
                    /* Stop translation as we may have switched the execution mode */
                    ctx->bstate = BS_STOP;
                    break;
                default:            /* Invalid */
                    MIPS_INVAL("mfmc0");
                    generate_exception(ctx, EXCP_RI);
                    break;
                }
                tcg_temp_free(t0);
11766
            }
T
ths 已提交
11767
#endif /* !CONFIG_USER_ONLY */
B
bellard 已提交
11768
            break;
11769
        case OPC_RDPGPR:
11770
            check_insn(env, ctx, ISA_MIPS32R2);
11771
            gen_load_srsgpr(rt, rd);
11772
            break;
11773
        case OPC_WRPGPR:
11774
            check_insn(env, ctx, ISA_MIPS32R2);
11775
            gen_store_srsgpr(rt, rd);
11776
            break;
B
bellard 已提交
11777
        default:
11778
            MIPS_INVAL("cp0");
11779
            generate_exception(ctx, EXCP_RI);
B
bellard 已提交
11780 11781 11782
            break;
        }
        break;
A
aurel32 已提交
11783 11784
    case OPC_ADDI: /* Arithmetic with immediate opcode */
    case OPC_ADDIU:
11785
         gen_arith_imm(env, ctx, op, rt, rs, imm);
11786
         break;
A
aurel32 已提交
11787 11788 11789 11790 11791 11792 11793 11794 11795 11796
    case OPC_SLTI: /* Set on less than with immediate opcode */
    case OPC_SLTIU:
         gen_slt_imm(env, op, rt, rs, imm);
         break;
    case OPC_ANDI: /* Arithmetic with immediate opcode */
    case OPC_LUI:
    case OPC_ORI:
    case OPC_XORI:
         gen_logic_imm(env, op, rt, rs, imm);
         break;
11797 11798
    case OPC_J ... OPC_JAL: /* Jump */
         offset = (int32_t)(ctx->opcode & 0x3FFFFFF) << 2;
11799
         gen_compute_branch(ctx, op, 4, rs, rt, offset);
11800 11801
         *is_branch = 1;
         break;
11802 11803
    case OPC_BEQ ... OPC_BGTZ: /* Branch */
    case OPC_BEQL ... OPC_BGTZL:
11804
         gen_compute_branch(ctx, op, 4, rs, rt, imm << 2);
11805 11806
         *is_branch = 1;
         break;
11807
    case OPC_LB ... OPC_LWR: /* Load and stores */
11808
    case OPC_LL:
11809
         gen_ld(env, ctx, op, rt, rs, imm);
11810
         break;
11811 11812
    case OPC_SB ... OPC_SW:
    case OPC_SWR:
11813
         gen_st(ctx, op, rt, rs, imm);
11814
         break;
A
aurel32 已提交
11815 11816 11817
    case OPC_SC:
         gen_st_cond(ctx, op, rt, rs, imm);
         break;
11818
    case OPC_CACHE:
11819
        check_insn(env, ctx, ISA_MIPS3 | ISA_MIPS32);
11820
        /* Treat as NOP. */
11821
        break;
11822
    case OPC_PREF:
11823
        check_insn(env, ctx, ISA_MIPS4 | ISA_MIPS32);
11824
        /* Treat as NOP. */
B
bellard 已提交
11825
        break;
B
bellard 已提交
11826

11827
    /* Floating point (COP1). */
11828 11829 11830 11831
    case OPC_LWC1:
    case OPC_LDC1:
    case OPC_SWC1:
    case OPC_SDC1:
11832
        gen_cop1_ldst(env, ctx, op, rt, rs, imm);
B
bellard 已提交
11833 11834
        break;

11835
    case OPC_CP1:
11836
        if (env->CP0_Config1 & (1 << CP0C1_FP)) {
11837
            check_cp1_enabled(ctx);
11838 11839
            op1 = MASK_CP1(ctx->opcode);
            switch (op1) {
11840 11841
            case OPC_MFHC1:
            case OPC_MTHC1:
11842
                check_insn(env, ctx, ISA_MIPS32R2);
11843 11844 11845 11846
            case OPC_MFC1:
            case OPC_CFC1:
            case OPC_MTC1:
            case OPC_CTC1:
11847 11848
                gen_cp1(ctx, op1, rt, rd);
                break;
11849
#if defined(TARGET_MIPS64)
11850 11851
            case OPC_DMFC1:
            case OPC_DMTC1:
11852
                check_insn(env, ctx, ISA_MIPS3);
11853 11854
                gen_cp1(ctx, op1, rt, rd);
                break;
11855
#endif
11856 11857
            case OPC_BC1ANY2:
            case OPC_BC1ANY4:
11858
                check_cop1x(ctx);
11859
                check_insn(env, ctx, ASE_MIPS3D);
11860 11861
                /* fall through */
            case OPC_BC1:
11862
                gen_compute_branch1(env, ctx, MASK_BC1(ctx->opcode),
11863
                                    (rt >> 2) & 0x7, imm << 2);
11864 11865
                *is_branch = 1;
                break;
11866 11867 11868 11869
            case OPC_S_FMT:
            case OPC_D_FMT:
            case OPC_W_FMT:
            case OPC_L_FMT:
11870
            case OPC_PS_FMT:
11871
                gen_farith(ctx, ctx->opcode & FOP(0x3f, 0x1f), rt, rd, sa,
11872
                           (imm >> 8) & 0x7);
11873 11874
                break;
            default:
11875
                MIPS_INVAL("cp1");
11876
                generate_exception (ctx, EXCP_RI);
11877 11878 11879 11880
                break;
            }
        } else {
            generate_exception_err(ctx, EXCP_CpU, 1);
B
bellard 已提交
11881
        }
B
bellard 已提交
11882 11883 11884
        break;

    /* COP2.  */
11885 11886 11887 11888 11889 11890
    case OPC_LWC2:
    case OPC_LDC2:
    case OPC_SWC2:
    case OPC_SDC2:
    case OPC_CP2:
        /* COP2: Not implemented. */
B
bellard 已提交
11891 11892 11893
        generate_exception_err(ctx, EXCP_CpU, 2);
        break;

11894
    case OPC_CP3:
11895
        if (env->CP0_Config1 & (1 << CP0C1_FP)) {
11896
            check_cp1_enabled(ctx);
11897 11898
            op1 = MASK_CP3(ctx->opcode);
            switch (op1) {
11899 11900 11901 11902 11903 11904
            case OPC_LWXC1:
            case OPC_LDXC1:
            case OPC_LUXC1:
            case OPC_SWXC1:
            case OPC_SDXC1:
            case OPC_SUXC1:
T
ths 已提交
11905
                gen_flt3_ldst(ctx, op1, sa, rd, rs, rt);
11906
                break;
T
ths 已提交
11907
            case OPC_PREFX:
11908
                /* Treat as NOP. */
T
ths 已提交
11909
                break;
11910 11911 11912 11913 11914 11915 11916 11917 11918 11919 11920 11921 11922 11923 11924
            case OPC_ALNV_PS:
            case OPC_MADD_S:
            case OPC_MADD_D:
            case OPC_MADD_PS:
            case OPC_MSUB_S:
            case OPC_MSUB_D:
            case OPC_MSUB_PS:
            case OPC_NMADD_S:
            case OPC_NMADD_D:
            case OPC_NMADD_PS:
            case OPC_NMSUB_S:
            case OPC_NMSUB_D:
            case OPC_NMSUB_PS:
                gen_flt3_arith(ctx, op1, sa, rs, rd, rt);
                break;
11925
            default:
11926
                MIPS_INVAL("cp3");
11927
                generate_exception (ctx, EXCP_RI);
11928 11929 11930
                break;
            }
        } else {
11931
            generate_exception_err(ctx, EXCP_CpU, 1);
11932
        }
B
bellard 已提交
11933 11934
        break;

11935
#if defined(TARGET_MIPS64)
11936 11937 11938 11939 11940
    /* MIPS64 opcodes */
    case OPC_LWU:
    case OPC_LDL ... OPC_LDR:
    case OPC_LLD:
    case OPC_LD:
11941 11942
        check_insn(env, ctx, ISA_MIPS3);
        check_mips_64(ctx);
11943
        gen_ld(env, ctx, op, rt, rs, imm);
11944 11945
        break;
    case OPC_SDL ... OPC_SDR:
11946
    case OPC_SD:
11947 11948
        check_insn(env, ctx, ISA_MIPS3);
        check_mips_64(ctx);
11949
        gen_st(ctx, op, rt, rs, imm);
11950
        break;
A
aurel32 已提交
11951 11952 11953 11954 11955
    case OPC_SCD:
        check_insn(env, ctx, ISA_MIPS3);
        check_mips_64(ctx);
        gen_st_cond(ctx, op, rt, rs, imm);
        break;
A
aurel32 已提交
11956 11957
    case OPC_DADDI:
    case OPC_DADDIU:
11958 11959 11960
        check_insn(env, ctx, ISA_MIPS3);
        check_mips_64(ctx);
        gen_arith_imm(env, ctx, op, rt, rs, imm);
11961
        break;
B
bellard 已提交
11962
#endif
11963
    case OPC_JALX:
11964
        check_insn(env, ctx, ASE_MIPS16 | ASE_MICROMIPS);
11965 11966 11967 11968
        offset = (int32_t)(ctx->opcode & 0x3FFFFFF) << 2;
        gen_compute_branch(ctx, op, 4, rs, rt, offset);
        *is_branch = 1;
        break;
11969
    case OPC_MDMX:
11970
        check_insn(env, ctx, ASE_MDMX);
11971
        /* MDMX: Not implemented. */
B
bellard 已提交
11972
    default:            /* Invalid */
11973
        MIPS_INVAL("major opcode");
B
bellard 已提交
11974 11975 11976 11977 11978
        generate_exception(ctx, EXCP_RI);
        break;
    }
}

11979
static inline void
11980 11981
gen_intermediate_code_internal (CPUState *env, TranslationBlock *tb,
                                int search_pc)
B
bellard 已提交
11982
{
T
ths 已提交
11983
    DisasContext ctx;
B
bellard 已提交
11984 11985
    target_ulong pc_start;
    uint16_t *gen_opc_end;
11986
    CPUBreakpoint *bp;
B
bellard 已提交
11987
    int j, lj = -1;
P
pbrook 已提交
11988 11989
    int num_insns;
    int max_insns;
11990 11991
    int insn_bytes;
    int is_branch;
B
bellard 已提交
11992

11993 11994
    if (search_pc)
        qemu_log("search pc %d\n", search_pc);
B
bellard 已提交
11995

B
bellard 已提交
11996
    pc_start = tb->pc;
11997
    gen_opc_end = gen_opc_buf + OPC_MAX_SIZE;
B
bellard 已提交
11998
    ctx.pc = pc_start;
B
bellard 已提交
11999
    ctx.saved_pc = -1;
N
Nathan Froyd 已提交
12000
    ctx.singlestep_enabled = env->singlestep_enabled;
B
bellard 已提交
12001 12002
    ctx.tb = tb;
    ctx.bstate = BS_NONE;
B
bellard 已提交
12003
    /* Restore delay slot state from the tb context.  */
12004
    ctx.hflags = (uint32_t)tb->flags; /* FIXME: maybe use 64 bits here? */
12005
    restore_cpu_state(env, &ctx);
12006
#ifdef CONFIG_USER_ONLY
T
ths 已提交
12007
        ctx.mem_idx = MIPS_HFLAG_UM;
12008
#else
T
ths 已提交
12009
        ctx.mem_idx = ctx.hflags & MIPS_HFLAG_KSU;
12010
#endif
P
pbrook 已提交
12011 12012 12013 12014
    num_insns = 0;
    max_insns = tb->cflags & CF_COUNT_MASK;
    if (max_insns == 0)
        max_insns = CF_COUNT_MASK;
12015
    LOG_DISAS("\ntb %p idx %d hflags %04x\n", tb, ctx.mem_idx, ctx.hflags);
P
pbrook 已提交
12016
    gen_icount_start();
T
ths 已提交
12017
    while (ctx.bstate == BS_NONE) {
B
Blue Swirl 已提交
12018 12019
        if (unlikely(!QTAILQ_EMPTY(&env->breakpoints))) {
            QTAILQ_FOREACH(bp, &env->breakpoints, entry) {
12020
                if (bp->pc == ctx.pc) {
T
ths 已提交
12021
                    save_cpu_state(&ctx, 1);
B
bellard 已提交
12022
                    ctx.bstate = BS_BRANCH;
P
pbrook 已提交
12023
                    gen_helper_0i(raise_exception, EXCP_DEBUG);
12024 12025 12026
                    /* Include the breakpoint location or the tb won't
                     * be flushed when it must be.  */
                    ctx.pc += 4;
B
bellard 已提交
12027 12028 12029 12030 12031
                    goto done_generating;
                }
            }
        }

B
bellard 已提交
12032 12033 12034 12035 12036 12037 12038
        if (search_pc) {
            j = gen_opc_ptr - gen_opc_buf;
            if (lj < j) {
                lj++;
                while (lj < j)
                    gen_opc_instr_start[lj++] = 0;
            }
B
bellard 已提交
12039 12040 12041
            gen_opc_pc[lj] = ctx.pc;
            gen_opc_hflags[lj] = ctx.hflags & MIPS_HFLAG_BMASK;
            gen_opc_instr_start[lj] = 1;
P
pbrook 已提交
12042
            gen_opc_icount[lj] = num_insns;
B
bellard 已提交
12043
        }
P
pbrook 已提交
12044 12045
        if (num_insns + 1 == max_insns && (tb->cflags & CF_LAST_IO))
            gen_io_start();
12046 12047

        is_branch = 0;
12048
        if (!(ctx.hflags & MIPS_HFLAG_M16)) {
12049 12050 12051
            ctx.opcode = ldl_code(ctx.pc);
            insn_bytes = 4;
            decode_opc(env, &ctx, &is_branch);
12052 12053 12054
        } else if (env->insn_flags & ASE_MICROMIPS) {
            ctx.opcode = lduw_code(ctx.pc);
            insn_bytes = decode_micromips_opc(env, &ctx, &is_branch);
12055 12056 12057
        } else if (env->insn_flags & ASE_MIPS16) {
            ctx.opcode = lduw_code(ctx.pc);
            insn_bytes = decode_mips16_opc(env, &ctx, &is_branch);
12058 12059
        } else {
            generate_exception(&ctx, EXCP_RI);
12060
            ctx.bstate = BS_STOP;
12061 12062 12063 12064 12065 12066 12067
            break;
        }
        if (!is_branch) {
            handle_delay_slot(env, &ctx, insn_bytes);
        }
        ctx.pc += insn_bytes;

P
pbrook 已提交
12068
        num_insns++;
B
bellard 已提交
12069

N
Nathan Froyd 已提交
12070 12071 12072 12073 12074
        /* Execute a branch and its delay slot as a single instruction.
           This is what GDB expects and is consistent with what the
           hardware does (e.g. if a delay slot instruction faults, the
           reported PC is the PC of the branch).  */
        if (env->singlestep_enabled && (ctx.hflags & MIPS_HFLAG_BMASK) == 0)
B
bellard 已提交
12075 12076
            break;

B
bellard 已提交
12077 12078
        if ((ctx.pc & (TARGET_PAGE_SIZE - 1)) == 0)
            break;
B
bellard 已提交
12079

T
ths 已提交
12080 12081 12082
        if (gen_opc_ptr >= gen_opc_end)
            break;

P
pbrook 已提交
12083 12084
        if (num_insns >= max_insns)
            break;
12085 12086 12087

        if (singlestep)
            break;
B
bellard 已提交
12088
    }
P
pbrook 已提交
12089 12090
    if (tb->cflags & CF_LAST_IO)
        gen_io_end();
N
Nathan Froyd 已提交
12091
    if (env->singlestep_enabled && ctx.bstate != BS_BRANCH) {
T
ths 已提交
12092
        save_cpu_state(&ctx, ctx.bstate == BS_NONE);
P
pbrook 已提交
12093
        gen_helper_0i(raise_exception, EXCP_DEBUG);
T
ths 已提交
12094
    } else {
A
aurel32 已提交
12095
        switch (ctx.bstate) {
T
ths 已提交
12096
        case BS_STOP:
P
pbrook 已提交
12097
            gen_helper_interrupt_restart();
12098 12099
            gen_goto_tb(&ctx, 0, ctx.pc);
            break;
T
ths 已提交
12100
        case BS_NONE:
T
ths 已提交
12101
            save_cpu_state(&ctx, 0);
T
ths 已提交
12102 12103
            gen_goto_tb(&ctx, 0, ctx.pc);
            break;
12104
        case BS_EXCP:
P
pbrook 已提交
12105
            gen_helper_interrupt_restart();
B
bellard 已提交
12106
            tcg_gen_exit_tb(0);
T
ths 已提交
12107
            break;
12108 12109 12110
        case BS_BRANCH:
        default:
            break;
A
aurel32 已提交
12111
        }
B
bellard 已提交
12112
    }
B
bellard 已提交
12113
done_generating:
P
pbrook 已提交
12114
    gen_icount_end(tb, num_insns);
B
bellard 已提交
12115 12116 12117 12118 12119 12120 12121 12122
    *gen_opc_ptr = INDEX_op_end;
    if (search_pc) {
        j = gen_opc_ptr - gen_opc_buf;
        lj++;
        while (lj <= j)
            gen_opc_instr_start[lj++] = 0;
    } else {
        tb->size = ctx.pc - pc_start;
P
pbrook 已提交
12123
        tb->icount = num_insns;
B
bellard 已提交
12124 12125
    }
#ifdef DEBUG_DISAS
12126
    LOG_DISAS("\n");
12127
    if (qemu_loglevel_mask(CPU_LOG_TB_IN_ASM)) {
12128 12129 12130
        qemu_log("IN: %s\n", lookup_symbol(pc_start));
        log_target_disas(pc_start, ctx.pc - pc_start, 0);
        qemu_log("\n");
B
bellard 已提交
12131 12132 12133 12134
    }
#endif
}

12135
void gen_intermediate_code (CPUState *env, struct TranslationBlock *tb)
B
bellard 已提交
12136
{
12137
    gen_intermediate_code_internal(env, tb, 0);
B
bellard 已提交
12138 12139
}

12140
void gen_intermediate_code_pc (CPUState *env, struct TranslationBlock *tb)
B
bellard 已提交
12141
{
12142
    gen_intermediate_code_internal(env, tb, 1);
B
bellard 已提交
12143 12144
}

12145 12146 12147
static void fpu_dump_state(CPUState *env, FILE *f,
                           int (*fpu_fprintf)(FILE *f, const char *fmt, ...),
                           int flags)
B
bellard 已提交
12148 12149
{
    int i;
12150
    int is_fpu64 = !!(env->hflags & MIPS_HFLAG_F64);
12151

12152 12153 12154 12155 12156 12157 12158 12159 12160 12161 12162 12163 12164 12165 12166 12167 12168 12169 12170 12171
#define printfpr(fp)                                                    \
    do {                                                                \
        if (is_fpu64)                                                   \
            fpu_fprintf(f, "w:%08x d:%016" PRIx64                       \
                        " fd:%13g fs:%13g psu: %13g\n",                 \
                        (fp)->w[FP_ENDIAN_IDX], (fp)->d,                \
                        (double)(fp)->fd,                               \
                        (double)(fp)->fs[FP_ENDIAN_IDX],                \
                        (double)(fp)->fs[!FP_ENDIAN_IDX]);              \
        else {                                                          \
            fpr_t tmp;                                                  \
            tmp.w[FP_ENDIAN_IDX] = (fp)->w[FP_ENDIAN_IDX];              \
            tmp.w[!FP_ENDIAN_IDX] = ((fp) + 1)->w[FP_ENDIAN_IDX];       \
            fpu_fprintf(f, "w:%08x d:%016" PRIx64                       \
                        " fd:%13g fs:%13g psu:%13g\n",                  \
                        tmp.w[FP_ENDIAN_IDX], tmp.d,                    \
                        (double)tmp.fd,                                 \
                        (double)tmp.fs[FP_ENDIAN_IDX],                  \
                        (double)tmp.fs[!FP_ENDIAN_IDX]);                \
        }                                                               \
B
bellard 已提交
12172 12173
    } while(0)

12174 12175

    fpu_fprintf(f, "CP1 FCR0 0x%08x  FCR31 0x%08x  SR.FR %d  fp_status 0x%08x(0x%02x)\n",
12176 12177
                env->active_fpu.fcr0, env->active_fpu.fcr31, is_fpu64, env->active_fpu.fp_status,
                get_float_exception_flags(&env->active_fpu.fp_status));
12178 12179
    for (i = 0; i < 32; (is_fpu64) ? i++ : (i += 2)) {
        fpu_fprintf(f, "%3s: ", fregnames[i]);
12180
        printfpr(&env->active_fpu.fpr[i]);
B
bellard 已提交
12181 12182 12183 12184 12185
    }

#undef printfpr
}

12186
#if defined(TARGET_MIPS64) && defined(MIPS_DEBUG_SIGN_EXTENSIONS)
12187
/* Debug help: The architecture requires 32bit code to maintain proper
T
ths 已提交
12188
   sign-extended values on 64bit machines.  */
12189 12190 12191

#define SIGN_EXT_P(val) ((((val) & ~0x7fffffff) == 0) || (((val) & ~0x7fffffff) == ~0x7fffffff))

12192 12193 12194 12195
static void
cpu_mips_check_sign_extensions (CPUState *env, FILE *f,
                                int (*cpu_fprintf)(FILE *f, const char *fmt, ...),
                                int flags)
12196 12197 12198
{
    int i;

12199 12200 12201 12202 12203 12204
    if (!SIGN_EXT_P(env->active_tc.PC))
        cpu_fprintf(f, "BROKEN: pc=0x" TARGET_FMT_lx "\n", env->active_tc.PC);
    if (!SIGN_EXT_P(env->active_tc.HI[0]))
        cpu_fprintf(f, "BROKEN: HI=0x" TARGET_FMT_lx "\n", env->active_tc.HI[0]);
    if (!SIGN_EXT_P(env->active_tc.LO[0]))
        cpu_fprintf(f, "BROKEN: LO=0x" TARGET_FMT_lx "\n", env->active_tc.LO[0]);
12205
    if (!SIGN_EXT_P(env->btarget))
T
ths 已提交
12206
        cpu_fprintf(f, "BROKEN: btarget=0x" TARGET_FMT_lx "\n", env->btarget);
12207 12208

    for (i = 0; i < 32; i++) {
12209 12210
        if (!SIGN_EXT_P(env->active_tc.gpr[i]))
            cpu_fprintf(f, "BROKEN: %s=0x" TARGET_FMT_lx "\n", regnames[i], env->active_tc.gpr[i]);
12211 12212 12213
    }

    if (!SIGN_EXT_P(env->CP0_EPC))
T
ths 已提交
12214
        cpu_fprintf(f, "BROKEN: EPC=0x" TARGET_FMT_lx "\n", env->CP0_EPC);
12215 12216
    if (!SIGN_EXT_P(env->lladdr))
        cpu_fprintf(f, "BROKEN: LLAddr=0x" TARGET_FMT_lx "\n", env->lladdr);
12217 12218 12219
}
#endif

12220
void cpu_dump_state (CPUState *env, FILE *f,
B
bellard 已提交
12221 12222 12223 12224
                     int (*cpu_fprintf)(FILE *f, const char *fmt, ...),
                     int flags)
{
    int i;
12225

12226 12227 12228
    cpu_fprintf(f, "pc=0x" TARGET_FMT_lx " HI=0x" TARGET_FMT_lx
                " LO=0x" TARGET_FMT_lx " ds %04x "
                TARGET_FMT_lx " " TARGET_FMT_ld "\n",
12229 12230
                env->active_tc.PC, env->active_tc.HI[0], env->active_tc.LO[0],
                env->hflags, env->btarget, env->bcond);
B
bellard 已提交
12231 12232 12233
    for (i = 0; i < 32; i++) {
        if ((i & 3) == 0)
            cpu_fprintf(f, "GPR%02d:", i);
12234
        cpu_fprintf(f, " %s " TARGET_FMT_lx, regnames[i], env->active_tc.gpr[i]);
B
bellard 已提交
12235 12236 12237
        if ((i & 3) == 3)
            cpu_fprintf(f, "\n");
    }
12238

T
ths 已提交
12239
    cpu_fprintf(f, "CP0 Status  0x%08x Cause   0x%08x EPC    0x" TARGET_FMT_lx "\n",
12240
                env->CP0_Status, env->CP0_Cause, env->CP0_EPC);
T
ths 已提交
12241
    cpu_fprintf(f, "    Config0 0x%08x Config1 0x%08x LLAddr 0x" TARGET_FMT_lx "\n",
12242
                env->CP0_Config0, env->CP0_Config1, env->lladdr);
12243
    if (env->hflags & MIPS_HFLAG_FPU)
12244
        fpu_dump_state(env, f, cpu_fprintf, flags);
12245
#if defined(TARGET_MIPS64) && defined(MIPS_DEBUG_SIGN_EXTENSIONS)
12246 12247
    cpu_mips_check_sign_extensions(env, f, cpu_fprintf, flags);
#endif
B
bellard 已提交
12248 12249
}

12250 12251
static void mips_tcg_init(void)
{
12252
    int i;
12253 12254 12255 12256
    static int inited;

    /* Initialize various static tables. */
    if (inited)
A
aurel32 已提交
12257
        return;
12258

P
pbrook 已提交
12259
    cpu_env = tcg_global_reg_new_ptr(TCG_AREG0, "env");
12260
    TCGV_UNUSED(cpu_gpr[0]);
12261
    for (i = 1; i < 32; i++)
P
pbrook 已提交
12262
        cpu_gpr[i] = tcg_global_mem_new(TCG_AREG0,
12263 12264
                                        offsetof(CPUState, active_tc.gpr[i]),
                                        regnames[i]);
P
pbrook 已提交
12265
    cpu_PC = tcg_global_mem_new(TCG_AREG0,
12266 12267
                                offsetof(CPUState, active_tc.PC), "PC");
    for (i = 0; i < MIPS_DSP_ACC; i++) {
P
pbrook 已提交
12268
        cpu_HI[i] = tcg_global_mem_new(TCG_AREG0,
12269 12270
                                       offsetof(CPUState, active_tc.HI[i]),
                                       regnames_HI[i]);
P
pbrook 已提交
12271
        cpu_LO[i] = tcg_global_mem_new(TCG_AREG0,
12272 12273
                                       offsetof(CPUState, active_tc.LO[i]),
                                       regnames_LO[i]);
P
pbrook 已提交
12274
        cpu_ACX[i] = tcg_global_mem_new(TCG_AREG0,
12275 12276 12277
                                        offsetof(CPUState, active_tc.ACX[i]),
                                        regnames_ACX[i]);
    }
P
pbrook 已提交
12278
    cpu_dspctrl = tcg_global_mem_new(TCG_AREG0,
12279 12280
                                     offsetof(CPUState, active_tc.DSPControl),
                                     "DSPControl");
12281 12282
    bcond = tcg_global_mem_new(TCG_AREG0,
                               offsetof(CPUState, bcond), "bcond");
P
pbrook 已提交
12283
    btarget = tcg_global_mem_new(TCG_AREG0,
T
ths 已提交
12284
                                 offsetof(CPUState, btarget), "btarget");
12285 12286 12287
    hflags = tcg_global_mem_new_i32(TCG_AREG0,
                                    offsetof(CPUState, hflags), "hflags");

P
pbrook 已提交
12288 12289 12290 12291 12292 12293
    fpu_fcr0 = tcg_global_mem_new_i32(TCG_AREG0,
                                      offsetof(CPUState, active_fpu.fcr0),
                                      "fcr0");
    fpu_fcr31 = tcg_global_mem_new_i32(TCG_AREG0,
                                       offsetof(CPUState, active_fpu.fcr31),
                                       "fcr31");
12294

T
ths 已提交
12295
    /* register helpers */
P
pbrook 已提交
12296
#define GEN_HELPER 2
T
ths 已提交
12297 12298
#include "helper.h"

12299 12300 12301
    inited = 1;
}

B
bellard 已提交
12302 12303 12304
#include "translate_init.c"

CPUMIPSState *cpu_mips_init (const char *cpu_model)
B
bellard 已提交
12305 12306
{
    CPUMIPSState *env;
A
Anthony Liguori 已提交
12307
    const mips_def_t *def;
B
bellard 已提交
12308

B
bellard 已提交
12309 12310 12311
    def = cpu_mips_find_by_name(cpu_model);
    if (!def)
        return NULL;
B
bellard 已提交
12312
    env = qemu_mallocz(sizeof(CPUMIPSState));
B
bellard 已提交
12313
    env->cpu_model = def;
B
Blue Swirl 已提交
12314
    env->cpu_model_str = cpu_model;
B
bellard 已提交
12315

B
bellard 已提交
12316
    cpu_exec_init(env);
B
Blue Swirl 已提交
12317 12318 12319 12320 12321
#ifndef CONFIG_USER_ONLY
    mmu_init(env, def);
#endif
    fpu_init(env, def);
    mvp_init(env, def);
12322
    mips_tcg_init();
12323
    cpu_reset(env);
12324
    qemu_init_vcpu(env);
12325 12326 12327 12328 12329
    return env;
}

void cpu_reset (CPUMIPSState *env)
{
A
aliguori 已提交
12330 12331 12332 12333 12334
    if (qemu_loglevel_mask(CPU_LOG_RESET)) {
        qemu_log("CPU Reset (CPU %d)\n", env->cpu_index);
        log_cpu_state(env, 0);
    }

12335
    memset(env, 0, offsetof(CPUMIPSState, breakpoints));
B
bellard 已提交
12336
    tlb_flush(env, 1);
12337

B
Blue Swirl 已提交
12338 12339 12340 12341 12342 12343 12344 12345 12346 12347 12348
    /* Reset registers to their default values */
    env->CP0_PRid = env->cpu_model->CP0_PRid;
    env->CP0_Config0 = env->cpu_model->CP0_Config0;
#ifdef TARGET_WORDS_BIGENDIAN
    env->CP0_Config0 |= (1 << CP0C0_BE);
#endif
    env->CP0_Config1 = env->cpu_model->CP0_Config1;
    env->CP0_Config2 = env->cpu_model->CP0_Config2;
    env->CP0_Config3 = env->cpu_model->CP0_Config3;
    env->CP0_Config6 = env->cpu_model->CP0_Config6;
    env->CP0_Config7 = env->cpu_model->CP0_Config7;
12349 12350 12351
    env->CP0_LLAddr_rw_bitmask = env->cpu_model->CP0_LLAddr_rw_bitmask
                                 << env->cpu_model->CP0_LLAddr_shift;
    env->CP0_LLAddr_shift = env->cpu_model->CP0_LLAddr_shift;
B
Blue Swirl 已提交
12352 12353 12354 12355 12356 12357 12358 12359 12360 12361 12362 12363 12364 12365 12366 12367 12368 12369 12370 12371 12372 12373 12374 12375 12376 12377 12378
    env->SYNCI_Step = env->cpu_model->SYNCI_Step;
    env->CCRes = env->cpu_model->CCRes;
    env->CP0_Status_rw_bitmask = env->cpu_model->CP0_Status_rw_bitmask;
    env->CP0_TCStatus_rw_bitmask = env->cpu_model->CP0_TCStatus_rw_bitmask;
    env->CP0_SRSCtl = env->cpu_model->CP0_SRSCtl;
    env->current_tc = 0;
    env->SEGBITS = env->cpu_model->SEGBITS;
    env->SEGMask = (target_ulong)((1ULL << env->cpu_model->SEGBITS) - 1);
#if defined(TARGET_MIPS64)
    if (env->cpu_model->insn_flags & ISA_MIPS3) {
        env->SEGMask |= 3ULL << 62;
    }
#endif
    env->PABITS = env->cpu_model->PABITS;
    env->PAMask = (target_ulong)((1ULL << env->cpu_model->PABITS) - 1);
    env->CP0_SRSConf0_rw_bitmask = env->cpu_model->CP0_SRSConf0_rw_bitmask;
    env->CP0_SRSConf0 = env->cpu_model->CP0_SRSConf0;
    env->CP0_SRSConf1_rw_bitmask = env->cpu_model->CP0_SRSConf1_rw_bitmask;
    env->CP0_SRSConf1 = env->cpu_model->CP0_SRSConf1;
    env->CP0_SRSConf2_rw_bitmask = env->cpu_model->CP0_SRSConf2_rw_bitmask;
    env->CP0_SRSConf2 = env->cpu_model->CP0_SRSConf2;
    env->CP0_SRSConf3_rw_bitmask = env->cpu_model->CP0_SRSConf3_rw_bitmask;
    env->CP0_SRSConf3 = env->cpu_model->CP0_SRSConf3;
    env->CP0_SRSConf4_rw_bitmask = env->cpu_model->CP0_SRSConf4_rw_bitmask;
    env->CP0_SRSConf4 = env->cpu_model->CP0_SRSConf4;
    env->insn_flags = env->cpu_model->insn_flags;

T
ths 已提交
12379
#if defined(CONFIG_USER_ONLY)
12380
    env->hflags = MIPS_HFLAG_UM;
12381 12382
    /* Enable access to the SYNCI_Step register.  */
    env->CP0_HWREna |= (1 << 1);
12383 12384 12385 12386 12387 12388 12389 12390
    if (env->CP0_Config1 & (1 << CP0C1_FP)) {
        env->hflags |= MIPS_HFLAG_FPU;
    }
#ifdef TARGET_MIPS64
    if (env->active_fpu.fcr0 & (1 << FCR0_F64)) {
        env->hflags |= MIPS_HFLAG_F64;
    }
#endif
12391 12392 12393 12394 12395
#else
    if (env->hflags & MIPS_HFLAG_BMASK) {
        /* If the exception was raised from a delay slot,
           come back to the jump.  */
        env->CP0_ErrorEPC = env->active_tc.PC - 4;
12396
    } else {
12397 12398 12399
        env->CP0_ErrorEPC = env->active_tc.PC;
    }
    env->active_tc.PC = (int32_t)0xBFC00000;
B
Blue Swirl 已提交
12400 12401
    env->CP0_Random = env->tlb->nb_tlb - 1;
    env->tlb->tlb_in_use = env->tlb->nb_tlb;
12402 12403 12404 12405 12406 12407 12408 12409 12410 12411 12412 12413 12414
    env->CP0_Wired = 0;
    /* SMP not implemented */
    env->CP0_EBase = 0x80000000;
    env->CP0_Status = (1 << CP0St_BEV) | (1 << CP0St_ERL);
    /* vectored interrupts not implemented, timer on int 7,
       no performance counters. */
    env->CP0_IntCtl = 0xe0000000;
    {
        int i;

        for (i = 0; i < 7; i++) {
            env->CP0_WatchLo[i] = 0;
            env->CP0_WatchHi[i] = 0x80000000;
12415
        }
12416 12417
        env->CP0_WatchLo[7] = 0;
        env->CP0_WatchHi[7] = 0;
12418
    }
12419 12420 12421
    /* Count register increments in debug mode, EJTAG version 1 */
    env->CP0_Debug = (1 << CP0DB_CNT) | (0x1 << CP0DB_VER);
    env->hflags = MIPS_HFLAG_CP0;
B
Blue Swirl 已提交
12422 12423 12424 12425 12426
#endif
#if defined(TARGET_MIPS64)
    if (env->cpu_model->insn_flags & ISA_MIPS3) {
        env->hflags |= MIPS_HFLAG_64;
    }
12427
#endif
B
bellard 已提交
12428 12429
    env->exception_index = EXCP_NONE;
}
A
aurel32 已提交
12430 12431 12432 12433

void gen_pc_load(CPUState *env, TranslationBlock *tb,
                unsigned long searched_pc, int pc_pos, void *puc)
{
12434
    env->active_tc.PC = gen_opc_pc[pc_pos];
A
aurel32 已提交
12435 12436 12437
    env->hflags &= ~MIPS_HFLAG_BMASK;
    env->hflags |= gen_opc_hflags[pc_pos];
}