]> Git Repo - qemu.git/blame - target/ppc/translate.c
target/arm: Check HAVE_CMPXCHG128 at translate time
[qemu.git] / target / ppc / translate.c
CommitLineData
79aceca5 1/*
3fc6c082 2 * PowerPC emulation for qemu: main translation routines.
5fafdf24 3 *
76a66253 4 * Copyright (c) 2003-2007 Jocelyn Mayer
90dc8812 5 * Copyright (C) 2011 Freescale Semiconductor, Inc.
79aceca5
FB
6 *
7 * This library is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU Lesser General Public
9 * License as published by the Free Software Foundation; either
10 * version 2 of the License, or (at your option) any later version.
11 *
12 * This library is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * Lesser General Public License for more details.
16 *
17 * You should have received a copy of the GNU Lesser General Public
8167ee88 18 * License along with this library; if not, see <http://www.gnu.org/licenses/>.
79aceca5 19 */
c6a1c22b 20
0d75590d 21#include "qemu/osdep.h"
79aceca5 22#include "cpu.h"
3e00884f 23#include "internal.h"
76cad711 24#include "disas/disas.h"
63c91552 25#include "exec/exec-all.h"
57fec1fe 26#include "tcg-op.h"
1de7afc9 27#include "qemu/host-utils.h"
f08b6170 28#include "exec/cpu_ldst.h"
79aceca5 29
2ef6175a
RH
30#include "exec/helper-proto.h"
31#include "exec/helper-gen.h"
a7812ae4 32
a7e30d84 33#include "trace-tcg.h"
b6bac4bc 34#include "exec/translator.h"
508127e2 35#include "exec/log.h"
a7e30d84
LV
36
37
8cbcb4fa
AJ
38#define CPU_SINGLE_STEP 0x1
39#define CPU_BRANCH_STEP 0x2
40#define GDBSTUB_SINGLE_STEP 0x4
41
a750fc0b 42/* Include definitions for instructions classes and implementations flags */
9fddaa0c 43//#define PPC_DEBUG_DISAS
76a66253 44//#define DO_PPC_STATISTICS
79aceca5 45
d12d51d5 46#ifdef PPC_DEBUG_DISAS
93fcfe39 47# define LOG_DISAS(...) qemu_log_mask(CPU_LOG_TB_IN_ASM, ## __VA_ARGS__)
d12d51d5
AL
48#else
49# define LOG_DISAS(...) do { } while (0)
50#endif
a750fc0b
JM
51/*****************************************************************************/
52/* Code translation helpers */
c53be334 53
f78fb44e 54/* global register indexes */
1d542695 55static char cpu_reg_names[10*3 + 22*4 /* GPR */
1d542695 56 + 10*4 + 22*5 /* SPE GPRh */
a5e26afa 57 + 10*4 + 22*5 /* FPR */
47e4661c 58 + 2*(10*6 + 22*7) /* AVRh, AVRl */
472b24ce 59 + 10*5 + 22*6 /* VSR */
47e4661c 60 + 8*5 /* CRF */];
f78fb44e 61static TCGv cpu_gpr[32];
f78fb44e 62static TCGv cpu_gprh[32];
a7812ae4
PB
63static TCGv_i64 cpu_fpr[32];
64static TCGv_i64 cpu_avrh[32], cpu_avrl[32];
472b24ce 65static TCGv_i64 cpu_vsr[32];
a7812ae4 66static TCGv_i32 cpu_crf[8];
bd568f18 67static TCGv cpu_nip;
6527f6ea 68static TCGv cpu_msr;
cfdcd37a
AJ
69static TCGv cpu_ctr;
70static TCGv cpu_lr;
697ab892
DG
71#if defined(TARGET_PPC64)
72static TCGv cpu_cfar;
73#endif
dd09c361 74static TCGv cpu_xer, cpu_so, cpu_ov, cpu_ca, cpu_ov32, cpu_ca32;
cf360a32 75static TCGv cpu_reserve;
253ce7b2 76static TCGv cpu_reserve_val;
30304420 77static TCGv cpu_fpscr;
a7859e89 78static TCGv_i32 cpu_access_type;
f78fb44e 79
022c62cb 80#include "exec/gen-icount.h"
2e70f6ef
PB
81
82void ppc_translate_init(void)
83{
f78fb44e
AJ
84 int i;
85 char* p;
2dc766da 86 size_t cpu_reg_names_size;
f78fb44e 87
f78fb44e 88 p = cpu_reg_names;
2dc766da 89 cpu_reg_names_size = sizeof(cpu_reg_names);
47e4661c
AJ
90
91 for (i = 0; i < 8; i++) {
2dc766da 92 snprintf(p, cpu_reg_names_size, "crf%d", i);
e1ccc054 93 cpu_crf[i] = tcg_global_mem_new_i32(cpu_env,
1328c2bf 94 offsetof(CPUPPCState, crf[i]), p);
47e4661c 95 p += 5;
2dc766da 96 cpu_reg_names_size -= 5;
47e4661c
AJ
97 }
98
f78fb44e 99 for (i = 0; i < 32; i++) {
2dc766da 100 snprintf(p, cpu_reg_names_size, "r%d", i);
e1ccc054 101 cpu_gpr[i] = tcg_global_mem_new(cpu_env,
1328c2bf 102 offsetof(CPUPPCState, gpr[i]), p);
f78fb44e 103 p += (i < 10) ? 3 : 4;
2dc766da 104 cpu_reg_names_size -= (i < 10) ? 3 : 4;
2dc766da 105 snprintf(p, cpu_reg_names_size, "r%dH", i);
e1ccc054 106 cpu_gprh[i] = tcg_global_mem_new(cpu_env,
13b6a455 107 offsetof(CPUPPCState, gprh[i]), p);
f78fb44e 108 p += (i < 10) ? 4 : 5;
2dc766da 109 cpu_reg_names_size -= (i < 10) ? 4 : 5;
1d542695 110
2dc766da 111 snprintf(p, cpu_reg_names_size, "fp%d", i);
e1ccc054 112 cpu_fpr[i] = tcg_global_mem_new_i64(cpu_env,
1328c2bf 113 offsetof(CPUPPCState, fpr[i]), p);
ec1ac72d 114 p += (i < 10) ? 4 : 5;
2dc766da 115 cpu_reg_names_size -= (i < 10) ? 4 : 5;
a5e26afa 116
2dc766da 117 snprintf(p, cpu_reg_names_size, "avr%dH", i);
e2542fe2 118#ifdef HOST_WORDS_BIGENDIAN
e1ccc054 119 cpu_avrh[i] = tcg_global_mem_new_i64(cpu_env,
1328c2bf 120 offsetof(CPUPPCState, avr[i].u64[0]), p);
fe1e5c53 121#else
e1ccc054 122 cpu_avrh[i] = tcg_global_mem_new_i64(cpu_env,
1328c2bf 123 offsetof(CPUPPCState, avr[i].u64[1]), p);
fe1e5c53 124#endif
1d542695 125 p += (i < 10) ? 6 : 7;
2dc766da 126 cpu_reg_names_size -= (i < 10) ? 6 : 7;
ec1ac72d 127
2dc766da 128 snprintf(p, cpu_reg_names_size, "avr%dL", i);
e2542fe2 129#ifdef HOST_WORDS_BIGENDIAN
e1ccc054 130 cpu_avrl[i] = tcg_global_mem_new_i64(cpu_env,
1328c2bf 131 offsetof(CPUPPCState, avr[i].u64[1]), p);
fe1e5c53 132#else
e1ccc054 133 cpu_avrl[i] = tcg_global_mem_new_i64(cpu_env,
1328c2bf 134 offsetof(CPUPPCState, avr[i].u64[0]), p);
fe1e5c53 135#endif
1d542695 136 p += (i < 10) ? 6 : 7;
2dc766da 137 cpu_reg_names_size -= (i < 10) ? 6 : 7;
472b24ce 138 snprintf(p, cpu_reg_names_size, "vsr%d", i);
e1ccc054
RH
139 cpu_vsr[i] = tcg_global_mem_new_i64(cpu_env,
140 offsetof(CPUPPCState, vsr[i]), p);
472b24ce
TM
141 p += (i < 10) ? 5 : 6;
142 cpu_reg_names_size -= (i < 10) ? 5 : 6;
f78fb44e 143 }
f10dc08e 144
e1ccc054 145 cpu_nip = tcg_global_mem_new(cpu_env,
1328c2bf 146 offsetof(CPUPPCState, nip), "nip");
bd568f18 147
e1ccc054 148 cpu_msr = tcg_global_mem_new(cpu_env,
1328c2bf 149 offsetof(CPUPPCState, msr), "msr");
6527f6ea 150
e1ccc054 151 cpu_ctr = tcg_global_mem_new(cpu_env,
1328c2bf 152 offsetof(CPUPPCState, ctr), "ctr");
cfdcd37a 153
e1ccc054 154 cpu_lr = tcg_global_mem_new(cpu_env,
1328c2bf 155 offsetof(CPUPPCState, lr), "lr");
cfdcd37a 156
697ab892 157#if defined(TARGET_PPC64)
e1ccc054 158 cpu_cfar = tcg_global_mem_new(cpu_env,
1328c2bf 159 offsetof(CPUPPCState, cfar), "cfar");
697ab892
DG
160#endif
161
e1ccc054 162 cpu_xer = tcg_global_mem_new(cpu_env,
1328c2bf 163 offsetof(CPUPPCState, xer), "xer");
e1ccc054 164 cpu_so = tcg_global_mem_new(cpu_env,
da91a00f 165 offsetof(CPUPPCState, so), "SO");
e1ccc054 166 cpu_ov = tcg_global_mem_new(cpu_env,
da91a00f 167 offsetof(CPUPPCState, ov), "OV");
e1ccc054 168 cpu_ca = tcg_global_mem_new(cpu_env,
da91a00f 169 offsetof(CPUPPCState, ca), "CA");
dd09c361
ND
170 cpu_ov32 = tcg_global_mem_new(cpu_env,
171 offsetof(CPUPPCState, ov32), "OV32");
172 cpu_ca32 = tcg_global_mem_new(cpu_env,
173 offsetof(CPUPPCState, ca32), "CA32");
3d7b417e 174
e1ccc054 175 cpu_reserve = tcg_global_mem_new(cpu_env,
1328c2bf 176 offsetof(CPUPPCState, reserve_addr),
18b21a2f 177 "reserve_addr");
253ce7b2
ND
178 cpu_reserve_val = tcg_global_mem_new(cpu_env,
179 offsetof(CPUPPCState, reserve_val),
180 "reserve_val");
cf360a32 181
e1ccc054 182 cpu_fpscr = tcg_global_mem_new(cpu_env,
30304420 183 offsetof(CPUPPCState, fpscr), "fpscr");
e1571908 184
e1ccc054 185 cpu_access_type = tcg_global_mem_new_i32(cpu_env,
1328c2bf 186 offsetof(CPUPPCState, access_type), "access_type");
2e70f6ef
PB
187}
188
79aceca5 189/* internal defines */
69b058c8 190struct DisasContext {
b6bac4bc 191 DisasContextBase base;
79aceca5 192 uint32_t opcode;
9a64fbe4 193 uint32_t exception;
3cc62370 194 /* Routine used to access memory */
5c3ae929 195 bool pr, hv, dr, le_mode;
c5a8d8f3 196 bool lazy_tlb_flush;
5f2a6254 197 bool need_access_type;
3cc62370 198 int mem_idx;
76db3ba4 199 int access_type;
3cc62370 200 /* Translation flags */
e22c357b 201 TCGMemOp default_tcg_memop_mask;
d9bce9d9 202#if defined(TARGET_PPC64)
5c3ae929
BH
203 bool sf_mode;
204 bool has_cfar;
9a64fbe4 205#endif
5c3ae929
BH
206 bool fpu_enabled;
207 bool altivec_enabled;
208 bool vsx_enabled;
209 bool spe_enabled;
210 bool tm_enabled;
c6fd28fd 211 bool gtse;
c227f099 212 ppc_spr_t *spr_cb; /* Needed to check rights for mfspr/mtspr */
ea4e754f 213 int singlestep_enabled;
0e3bf489 214 uint32_t flags;
7d08d856
AJ
215 uint64_t insns_flags;
216 uint64_t insns_flags2;
69b058c8 217};
79aceca5 218
e22c357b
DK
219/* Return true iff byteswap is needed in a scalar memop */
220static inline bool need_byteswap(const DisasContext *ctx)
221{
222#if defined(TARGET_WORDS_BIGENDIAN)
223 return ctx->le_mode;
224#else
225 return !ctx->le_mode;
226#endif
227}
228
79482e5a
RH
229/* True when active word size < size of target_long. */
230#ifdef TARGET_PPC64
231# define NARROW_MODE(C) (!(C)->sf_mode)
232#else
233# define NARROW_MODE(C) 0
234#endif
235
c227f099 236struct opc_handler_t {
70560da7
FC
237 /* invalid bits for instruction 1 (Rc(opcode) == 0) */
238 uint32_t inval1;
239 /* invalid bits for instruction 2 (Rc(opcode) == 1) */
240 uint32_t inval2;
9a64fbe4 241 /* instruction type */
0487d6a8 242 uint64_t type;
a5858d7a
AG
243 /* extended instruction type */
244 uint64_t type2;
79aceca5
FB
245 /* handler */
246 void (*handler)(DisasContext *ctx);
a750fc0b 247#if defined(DO_PPC_STATISTICS) || defined(PPC_DUMP_CPU)
b55266b5 248 const char *oname;
a750fc0b
JM
249#endif
250#if defined(DO_PPC_STATISTICS)
76a66253
JM
251 uint64_t count;
252#endif
3fc6c082 253};
79aceca5 254
0e3bf489
RK
255/* SPR load/store helpers */
256static inline void gen_load_spr(TCGv t, int reg)
257{
258 tcg_gen_ld_tl(t, cpu_env, offsetof(CPUPPCState, spr[reg]));
259}
260
261static inline void gen_store_spr(int reg, TCGv t)
262{
263 tcg_gen_st_tl(t, cpu_env, offsetof(CPUPPCState, spr[reg]));
264}
265
636aa200 266static inline void gen_set_access_type(DisasContext *ctx, int access_type)
a7859e89 267{
5f2a6254 268 if (ctx->need_access_type && ctx->access_type != access_type) {
76db3ba4
AJ
269 tcg_gen_movi_i32(cpu_access_type, access_type);
270 ctx->access_type = access_type;
271 }
a7859e89
AJ
272}
273
636aa200 274static inline void gen_update_nip(DisasContext *ctx, target_ulong nip)
d9bce9d9 275{
e0c8f9ce
RH
276 if (NARROW_MODE(ctx)) {
277 nip = (uint32_t)nip;
278 }
279 tcg_gen_movi_tl(cpu_nip, nip);
d9bce9d9
JM
280}
281
b9971cc5 282static void gen_exception_err(DisasContext *ctx, uint32_t excp, uint32_t error)
e06fcd75
AJ
283{
284 TCGv_i32 t0, t1;
bd6fefe7
BH
285
286 /* These are all synchronous exceptions, we set the PC back to
287 * the faulting instruction
288 */
e06fcd75 289 if (ctx->exception == POWERPC_EXCP_NONE) {
b6bac4bc 290 gen_update_nip(ctx, ctx->base.pc_next - 4);
e06fcd75
AJ
291 }
292 t0 = tcg_const_i32(excp);
293 t1 = tcg_const_i32(error);
e5f17ac6 294 gen_helper_raise_exception_err(cpu_env, t0, t1);
e06fcd75
AJ
295 tcg_temp_free_i32(t0);
296 tcg_temp_free_i32(t1);
297 ctx->exception = (excp);
298}
e1833e1f 299
b9971cc5 300static void gen_exception(DisasContext *ctx, uint32_t excp)
e06fcd75
AJ
301{
302 TCGv_i32 t0;
bd6fefe7
BH
303
304 /* These are all synchronous exceptions, we set the PC back to
305 * the faulting instruction
306 */
e06fcd75 307 if (ctx->exception == POWERPC_EXCP_NONE) {
b6bac4bc 308 gen_update_nip(ctx, ctx->base.pc_next - 4);
e06fcd75
AJ
309 }
310 t0 = tcg_const_i32(excp);
e5f17ac6 311 gen_helper_raise_exception(cpu_env, t0);
e06fcd75
AJ
312 tcg_temp_free_i32(t0);
313 ctx->exception = (excp);
314}
e1833e1f 315
bd6fefe7
BH
316static void gen_exception_nip(DisasContext *ctx, uint32_t excp,
317 target_ulong nip)
318{
319 TCGv_i32 t0;
320
321 gen_update_nip(ctx, nip);
322 t0 = tcg_const_i32(excp);
323 gen_helper_raise_exception(cpu_env, t0);
324 tcg_temp_free_i32(t0);
325 ctx->exception = (excp);
326}
327
0e3bf489
RK
328/* Translates the EXCP_TRACE/BRANCH exceptions used on most PowerPCs to
329 * EXCP_DEBUG, if we are running on cores using the debug enable bit (e.g.
330 * BookE).
331 */
332static uint32_t gen_prep_dbgex(DisasContext *ctx, uint32_t excp)
333{
334 if ((ctx->singlestep_enabled & CPU_SINGLE_STEP)
335 && (excp == POWERPC_EXCP_BRANCH)) {
336 /* Trace excpt. has priority */
337 excp = POWERPC_EXCP_TRACE;
338 }
339 if (ctx->flags & POWERPC_FLAG_DE) {
340 target_ulong dbsr = 0;
341 switch (excp) {
342 case POWERPC_EXCP_TRACE:
343 dbsr = DBCR0_ICMP;
344 break;
345 case POWERPC_EXCP_BRANCH:
346 dbsr = DBCR0_BRT;
347 break;
348 }
349 TCGv t0 = tcg_temp_new();
350 gen_load_spr(t0, SPR_BOOKE_DBSR);
351 tcg_gen_ori_tl(t0, t0, dbsr);
352 gen_store_spr(SPR_BOOKE_DBSR, t0);
353 tcg_temp_free(t0);
354 return POWERPC_EXCP_DEBUG;
355 } else {
356 return excp;
357 }
358}
359
b9971cc5 360static void gen_debug_exception(DisasContext *ctx)
e06fcd75
AJ
361{
362 TCGv_i32 t0;
5518f3a6 363
bd6fefe7
BH
364 /* These are all synchronous exceptions, we set the PC back to
365 * the faulting instruction
366 */
ee2b3994
SB
367 if ((ctx->exception != POWERPC_EXCP_BRANCH) &&
368 (ctx->exception != POWERPC_EXCP_SYNC)) {
b6bac4bc 369 gen_update_nip(ctx, ctx->base.pc_next);
ee2b3994 370 }
e06fcd75 371 t0 = tcg_const_i32(EXCP_DEBUG);
e5f17ac6 372 gen_helper_raise_exception(cpu_env, t0);
e06fcd75
AJ
373 tcg_temp_free_i32(t0);
374}
9a64fbe4 375
636aa200 376static inline void gen_inval_exception(DisasContext *ctx, uint32_t error)
e06fcd75 377{
9b2fadda
BH
378 /* Will be converted to program check if needed */
379 gen_exception_err(ctx, POWERPC_EXCP_HV_EMU, POWERPC_EXCP_INVAL | error);
380}
381
382static inline void gen_priv_exception(DisasContext *ctx, uint32_t error)
383{
384 gen_exception_err(ctx, POWERPC_EXCP_PROGRAM, POWERPC_EXCP_PRIV | error);
385}
386
387static inline void gen_hvpriv_exception(DisasContext *ctx, uint32_t error)
388{
389 /* Will be converted to program check if needed */
390 gen_exception_err(ctx, POWERPC_EXCP_HV_EMU, POWERPC_EXCP_PRIV | error);
e06fcd75 391}
a9d9eb8f 392
f24e5695 393/* Stop translation */
636aa200 394static inline void gen_stop_exception(DisasContext *ctx)
3fc6c082 395{
b6bac4bc 396 gen_update_nip(ctx, ctx->base.pc_next);
e1833e1f 397 ctx->exception = POWERPC_EXCP_STOP;
3fc6c082
FB
398}
399
466976d9 400#ifndef CONFIG_USER_ONLY
f24e5695 401/* No need to update nip here, as execution flow will change */
636aa200 402static inline void gen_sync_exception(DisasContext *ctx)
2be0071f 403{
e1833e1f 404 ctx->exception = POWERPC_EXCP_SYNC;
2be0071f 405}
466976d9 406#endif
2be0071f 407
79aceca5 408#define GEN_HANDLER(name, opc1, opc2, opc3, inval, type) \
a5858d7a
AG
409GEN_OPCODE(name, opc1, opc2, opc3, inval, type, PPC_NONE)
410
411#define GEN_HANDLER_E(name, opc1, opc2, opc3, inval, type, type2) \
412GEN_OPCODE(name, opc1, opc2, opc3, inval, type, type2)
79aceca5 413
c7697e1f 414#define GEN_HANDLER2(name, onam, opc1, opc2, opc3, inval, type) \
a5858d7a
AG
415GEN_OPCODE2(name, onam, opc1, opc2, opc3, inval, type, PPC_NONE)
416
417#define GEN_HANDLER2_E(name, onam, opc1, opc2, opc3, inval, type, type2) \
418GEN_OPCODE2(name, onam, opc1, opc2, opc3, inval, type, type2)
c7697e1f 419
323ad19b
ND
420#define GEN_HANDLER_E_2(name, opc1, opc2, opc3, opc4, inval, type, type2) \
421GEN_OPCODE3(name, opc1, opc2, opc3, opc4, inval, type, type2)
422
14fd8ab2
ND
423#define GEN_HANDLER2_E_2(name, onam, opc1, opc2, opc3, opc4, inval, typ, typ2) \
424GEN_OPCODE4(name, onam, opc1, opc2, opc3, opc4, inval, typ, typ2)
425
c227f099 426typedef struct opcode_t {
323ad19b 427 unsigned char opc1, opc2, opc3, opc4;
1235fc06 428#if HOST_LONG_BITS == 64 /* Explicitly align to 64 bits */
323ad19b 429 unsigned char pad[4];
18fba28c 430#endif
c227f099 431 opc_handler_t handler;
b55266b5 432 const char *oname;
c227f099 433} opcode_t;
79aceca5 434
9b2fadda
BH
435/* Helpers for priv. check */
436#define GEN_PRIV \
437 do { \
438 gen_priv_exception(ctx, POWERPC_EXCP_PRIV_OPC); return; \
439 } while (0)
440
441#if defined(CONFIG_USER_ONLY)
442#define CHK_HV GEN_PRIV
443#define CHK_SV GEN_PRIV
b7815375 444#define CHK_HVRM GEN_PRIV
9b2fadda
BH
445#else
446#define CHK_HV \
447 do { \
448 if (unlikely(ctx->pr || !ctx->hv)) { \
449 GEN_PRIV; \
450 } \
451 } while (0)
452#define CHK_SV \
453 do { \
454 if (unlikely(ctx->pr)) { \
455 GEN_PRIV; \
456 } \
457 } while (0)
b7815375
BH
458#define CHK_HVRM \
459 do { \
460 if (unlikely(ctx->pr || !ctx->hv || ctx->dr)) { \
461 GEN_PRIV; \
462 } \
463 } while (0)
9b2fadda
BH
464#endif
465
466#define CHK_NONE
467
a750fc0b 468/*****************************************************************************/
a750fc0b 469/* PowerPC instructions table */
933dc6eb 470
76a66253 471#if defined(DO_PPC_STATISTICS)
a5858d7a 472#define GEN_OPCODE(name, op1, op2, op3, invl, _typ, _typ2) \
5c55ff99 473{ \
79aceca5
FB
474 .opc1 = op1, \
475 .opc2 = op2, \
476 .opc3 = op3, \
323ad19b 477 .opc4 = 0xff, \
79aceca5 478 .handler = { \
70560da7
FC
479 .inval1 = invl, \
480 .type = _typ, \
481 .type2 = _typ2, \
482 .handler = &gen_##name, \
483 .oname = stringify(name), \
484 }, \
485 .oname = stringify(name), \
486}
487#define GEN_OPCODE_DUAL(name, op1, op2, op3, invl1, invl2, _typ, _typ2) \
488{ \
489 .opc1 = op1, \
490 .opc2 = op2, \
491 .opc3 = op3, \
323ad19b 492 .opc4 = 0xff, \
70560da7
FC
493 .handler = { \
494 .inval1 = invl1, \
495 .inval2 = invl2, \
9a64fbe4 496 .type = _typ, \
a5858d7a 497 .type2 = _typ2, \
79aceca5 498 .handler = &gen_##name, \
76a66253 499 .oname = stringify(name), \
79aceca5 500 }, \
3fc6c082 501 .oname = stringify(name), \
79aceca5 502}
a5858d7a 503#define GEN_OPCODE2(name, onam, op1, op2, op3, invl, _typ, _typ2) \
5c55ff99 504{ \
c7697e1f
JM
505 .opc1 = op1, \
506 .opc2 = op2, \
507 .opc3 = op3, \
323ad19b 508 .opc4 = 0xff, \
c7697e1f 509 .handler = { \
70560da7 510 .inval1 = invl, \
c7697e1f 511 .type = _typ, \
a5858d7a 512 .type2 = _typ2, \
c7697e1f
JM
513 .handler = &gen_##name, \
514 .oname = onam, \
515 }, \
516 .oname = onam, \
517}
323ad19b
ND
518#define GEN_OPCODE3(name, op1, op2, op3, op4, invl, _typ, _typ2) \
519{ \
520 .opc1 = op1, \
521 .opc2 = op2, \
522 .opc3 = op3, \
523 .opc4 = op4, \
524 .handler = { \
525 .inval1 = invl, \
526 .type = _typ, \
527 .type2 = _typ2, \
528 .handler = &gen_##name, \
529 .oname = stringify(name), \
530 }, \
531 .oname = stringify(name), \
532}
14fd8ab2
ND
533#define GEN_OPCODE4(name, onam, op1, op2, op3, op4, invl, _typ, _typ2) \
534{ \
535 .opc1 = op1, \
536 .opc2 = op2, \
537 .opc3 = op3, \
538 .opc4 = op4, \
539 .handler = { \
540 .inval1 = invl, \
541 .type = _typ, \
542 .type2 = _typ2, \
543 .handler = &gen_##name, \
544 .oname = onam, \
545 }, \
546 .oname = onam, \
547}
76a66253 548#else
a5858d7a 549#define GEN_OPCODE(name, op1, op2, op3, invl, _typ, _typ2) \
5c55ff99 550{ \
c7697e1f
JM
551 .opc1 = op1, \
552 .opc2 = op2, \
553 .opc3 = op3, \
323ad19b 554 .opc4 = 0xff, \
c7697e1f 555 .handler = { \
70560da7
FC
556 .inval1 = invl, \
557 .type = _typ, \
558 .type2 = _typ2, \
559 .handler = &gen_##name, \
560 }, \
561 .oname = stringify(name), \
562}
563#define GEN_OPCODE_DUAL(name, op1, op2, op3, invl1, invl2, _typ, _typ2) \
564{ \
565 .opc1 = op1, \
566 .opc2 = op2, \
567 .opc3 = op3, \
323ad19b 568 .opc4 = 0xff, \
70560da7
FC
569 .handler = { \
570 .inval1 = invl1, \
571 .inval2 = invl2, \
c7697e1f 572 .type = _typ, \
a5858d7a 573 .type2 = _typ2, \
c7697e1f 574 .handler = &gen_##name, \
5c55ff99
BS
575 }, \
576 .oname = stringify(name), \
577}
a5858d7a 578#define GEN_OPCODE2(name, onam, op1, op2, op3, invl, _typ, _typ2) \
5c55ff99
BS
579{ \
580 .opc1 = op1, \
581 .opc2 = op2, \
582 .opc3 = op3, \
323ad19b 583 .opc4 = 0xff, \
5c55ff99 584 .handler = { \
70560da7 585 .inval1 = invl, \
5c55ff99 586 .type = _typ, \
a5858d7a 587 .type2 = _typ2, \
5c55ff99
BS
588 .handler = &gen_##name, \
589 }, \
590 .oname = onam, \
591}
323ad19b
ND
592#define GEN_OPCODE3(name, op1, op2, op3, op4, invl, _typ, _typ2) \
593{ \
594 .opc1 = op1, \
595 .opc2 = op2, \
596 .opc3 = op3, \
597 .opc4 = op4, \
598 .handler = { \
599 .inval1 = invl, \
600 .type = _typ, \
601 .type2 = _typ2, \
602 .handler = &gen_##name, \
603 }, \
604 .oname = stringify(name), \
605}
14fd8ab2
ND
606#define GEN_OPCODE4(name, onam, op1, op2, op3, op4, invl, _typ, _typ2) \
607{ \
608 .opc1 = op1, \
609 .opc2 = op2, \
610 .opc3 = op3, \
611 .opc4 = op4, \
612 .handler = { \
613 .inval1 = invl, \
614 .type = _typ, \
615 .type2 = _typ2, \
616 .handler = &gen_##name, \
617 }, \
618 .oname = onam, \
619}
5c55ff99 620#endif
2e610050 621
54623277 622/* Invalid instruction */
99e300ef 623static void gen_invalid(DisasContext *ctx)
9a64fbe4 624{
e06fcd75 625 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL);
9a64fbe4
FB
626}
627
c227f099 628static opc_handler_t invalid_handler = {
70560da7
FC
629 .inval1 = 0xFFFFFFFF,
630 .inval2 = 0xFFFFFFFF,
9a64fbe4 631 .type = PPC_NONE,
a5858d7a 632 .type2 = PPC_NONE,
79aceca5
FB
633 .handler = gen_invalid,
634};
635
e1571908
AJ
636/*** Integer comparison ***/
637
636aa200 638static inline void gen_op_cmp(TCGv arg0, TCGv arg1, int s, int crf)
e1571908 639{
2fdcb629 640 TCGv t0 = tcg_temp_new();
b62b3686
PB
641 TCGv t1 = tcg_temp_new();
642 TCGv_i32 t = tcg_temp_new_i32();
e1571908 643
b62b3686
PB
644 tcg_gen_movi_tl(t0, CRF_EQ);
645 tcg_gen_movi_tl(t1, CRF_LT);
646 tcg_gen_movcond_tl((s ? TCG_COND_LT : TCG_COND_LTU), t0, arg0, arg1, t1, t0);
647 tcg_gen_movi_tl(t1, CRF_GT);
648 tcg_gen_movcond_tl((s ? TCG_COND_GT : TCG_COND_GTU), t0, arg0, arg1, t1, t0);
2fdcb629 649
b62b3686
PB
650 tcg_gen_trunc_tl_i32(t, t0);
651 tcg_gen_trunc_tl_i32(cpu_crf[crf], cpu_so);
652 tcg_gen_or_i32(cpu_crf[crf], cpu_crf[crf], t);
2fdcb629
RH
653
654 tcg_temp_free(t0);
b62b3686
PB
655 tcg_temp_free(t1);
656 tcg_temp_free_i32(t);
e1571908
AJ
657}
658
636aa200 659static inline void gen_op_cmpi(TCGv arg0, target_ulong arg1, int s, int crf)
e1571908 660{
2fdcb629 661 TCGv t0 = tcg_const_tl(arg1);
ea363694
AJ
662 gen_op_cmp(arg0, t0, s, crf);
663 tcg_temp_free(t0);
e1571908
AJ
664}
665
636aa200 666static inline void gen_op_cmp32(TCGv arg0, TCGv arg1, int s, int crf)
e1571908 667{
ea363694 668 TCGv t0, t1;
2fdcb629
RH
669 t0 = tcg_temp_new();
670 t1 = tcg_temp_new();
e1571908 671 if (s) {
ea363694
AJ
672 tcg_gen_ext32s_tl(t0, arg0);
673 tcg_gen_ext32s_tl(t1, arg1);
e1571908 674 } else {
ea363694
AJ
675 tcg_gen_ext32u_tl(t0, arg0);
676 tcg_gen_ext32u_tl(t1, arg1);
e1571908 677 }
ea363694
AJ
678 gen_op_cmp(t0, t1, s, crf);
679 tcg_temp_free(t1);
680 tcg_temp_free(t0);
e1571908
AJ
681}
682
636aa200 683static inline void gen_op_cmpi32(TCGv arg0, target_ulong arg1, int s, int crf)
e1571908 684{
2fdcb629 685 TCGv t0 = tcg_const_tl(arg1);
ea363694
AJ
686 gen_op_cmp32(arg0, t0, s, crf);
687 tcg_temp_free(t0);
e1571908 688}
e1571908 689
636aa200 690static inline void gen_set_Rc0(DisasContext *ctx, TCGv reg)
e1571908 691{
02765534 692 if (NARROW_MODE(ctx)) {
e1571908 693 gen_op_cmpi32(reg, 0, 1, 0);
02765534 694 } else {
e1571908 695 gen_op_cmpi(reg, 0, 1, 0);
02765534 696 }
e1571908
AJ
697}
698
699/* cmp */
99e300ef 700static void gen_cmp(DisasContext *ctx)
e1571908 701{
36f48d9c 702 if ((ctx->opcode & 0x00200000) && (ctx->insns_flags & PPC_64B)) {
e1571908
AJ
703 gen_op_cmp(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)],
704 1, crfD(ctx->opcode));
36f48d9c
AG
705 } else {
706 gen_op_cmp32(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)],
707 1, crfD(ctx->opcode));
02765534 708 }
e1571908
AJ
709}
710
711/* cmpi */
99e300ef 712static void gen_cmpi(DisasContext *ctx)
e1571908 713{
36f48d9c 714 if ((ctx->opcode & 0x00200000) && (ctx->insns_flags & PPC_64B)) {
e1571908
AJ
715 gen_op_cmpi(cpu_gpr[rA(ctx->opcode)], SIMM(ctx->opcode),
716 1, crfD(ctx->opcode));
36f48d9c
AG
717 } else {
718 gen_op_cmpi32(cpu_gpr[rA(ctx->opcode)], SIMM(ctx->opcode),
719 1, crfD(ctx->opcode));
02765534 720 }
e1571908
AJ
721}
722
723/* cmpl */
99e300ef 724static void gen_cmpl(DisasContext *ctx)
e1571908 725{
36f48d9c 726 if ((ctx->opcode & 0x00200000) && (ctx->insns_flags & PPC_64B)) {
e1571908
AJ
727 gen_op_cmp(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)],
728 0, crfD(ctx->opcode));
36f48d9c
AG
729 } else {
730 gen_op_cmp32(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)],
731 0, crfD(ctx->opcode));
02765534 732 }
e1571908
AJ
733}
734
735/* cmpli */
99e300ef 736static void gen_cmpli(DisasContext *ctx)
e1571908 737{
36f48d9c 738 if ((ctx->opcode & 0x00200000) && (ctx->insns_flags & PPC_64B)) {
e1571908
AJ
739 gen_op_cmpi(cpu_gpr[rA(ctx->opcode)], UIMM(ctx->opcode),
740 0, crfD(ctx->opcode));
36f48d9c
AG
741 } else {
742 gen_op_cmpi32(cpu_gpr[rA(ctx->opcode)], UIMM(ctx->opcode),
743 0, crfD(ctx->opcode));
02765534 744 }
e1571908
AJ
745}
746
f2442ef9
ND
747/* cmprb - range comparison: isupper, isaplha, islower*/
748static void gen_cmprb(DisasContext *ctx)
749{
750 TCGv_i32 src1 = tcg_temp_new_i32();
751 TCGv_i32 src2 = tcg_temp_new_i32();
752 TCGv_i32 src2lo = tcg_temp_new_i32();
753 TCGv_i32 src2hi = tcg_temp_new_i32();
754 TCGv_i32 crf = cpu_crf[crfD(ctx->opcode)];
755
756 tcg_gen_trunc_tl_i32(src1, cpu_gpr[rA(ctx->opcode)]);
757 tcg_gen_trunc_tl_i32(src2, cpu_gpr[rB(ctx->opcode)]);
758
759 tcg_gen_andi_i32(src1, src1, 0xFF);
760 tcg_gen_ext8u_i32(src2lo, src2);
761 tcg_gen_shri_i32(src2, src2, 8);
762 tcg_gen_ext8u_i32(src2hi, src2);
763
764 tcg_gen_setcond_i32(TCG_COND_LEU, src2lo, src2lo, src1);
765 tcg_gen_setcond_i32(TCG_COND_LEU, src2hi, src1, src2hi);
766 tcg_gen_and_i32(crf, src2lo, src2hi);
767
768 if (ctx->opcode & 0x00200000) {
769 tcg_gen_shri_i32(src2, src2, 8);
770 tcg_gen_ext8u_i32(src2lo, src2);
771 tcg_gen_shri_i32(src2, src2, 8);
772 tcg_gen_ext8u_i32(src2hi, src2);
773 tcg_gen_setcond_i32(TCG_COND_LEU, src2lo, src2lo, src1);
774 tcg_gen_setcond_i32(TCG_COND_LEU, src2hi, src1, src2hi);
775 tcg_gen_and_i32(src2lo, src2lo, src2hi);
776 tcg_gen_or_i32(crf, crf, src2lo);
777 }
efa73196 778 tcg_gen_shli_i32(crf, crf, CRF_GT_BIT);
f2442ef9
ND
779 tcg_temp_free_i32(src1);
780 tcg_temp_free_i32(src2);
781 tcg_temp_free_i32(src2lo);
782 tcg_temp_free_i32(src2hi);
783}
784
082ce330
ND
785#if defined(TARGET_PPC64)
786/* cmpeqb */
787static void gen_cmpeqb(DisasContext *ctx)
788{
789 gen_helper_cmpeqb(cpu_crf[crfD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)],
790 cpu_gpr[rB(ctx->opcode)]);
791}
792#endif
793
e1571908 794/* isel (PowerPC 2.03 specification) */
99e300ef 795static void gen_isel(DisasContext *ctx)
e1571908 796{
e1571908 797 uint32_t bi = rC(ctx->opcode);
24f9cd95
RH
798 uint32_t mask = 0x08 >> (bi & 0x03);
799 TCGv t0 = tcg_temp_new();
800 TCGv zr;
e1571908 801
24f9cd95
RH
802 tcg_gen_extu_i32_tl(t0, cpu_crf[bi >> 2]);
803 tcg_gen_andi_tl(t0, t0, mask);
804
805 zr = tcg_const_tl(0);
806 tcg_gen_movcond_tl(TCG_COND_NE, cpu_gpr[rD(ctx->opcode)], t0, zr,
807 rA(ctx->opcode) ? cpu_gpr[rA(ctx->opcode)] : zr,
808 cpu_gpr[rB(ctx->opcode)]);
809 tcg_temp_free(zr);
810 tcg_temp_free(t0);
e1571908
AJ
811}
812
fcfda20f
AJ
813/* cmpb: PowerPC 2.05 specification */
814static void gen_cmpb(DisasContext *ctx)
815{
816 gen_helper_cmpb(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)],
817 cpu_gpr[rB(ctx->opcode)]);
818}
819
79aceca5 820/*** Integer arithmetic ***/
79aceca5 821
636aa200
BS
822static inline void gen_op_arith_compute_ov(DisasContext *ctx, TCGv arg0,
823 TCGv arg1, TCGv arg2, int sub)
74637406 824{
ffe30937 825 TCGv t0 = tcg_temp_new();
79aceca5 826
8e7a6db9 827 tcg_gen_xor_tl(cpu_ov, arg0, arg2);
74637406 828 tcg_gen_xor_tl(t0, arg1, arg2);
ffe30937
RH
829 if (sub) {
830 tcg_gen_and_tl(cpu_ov, cpu_ov, t0);
831 } else {
832 tcg_gen_andc_tl(cpu_ov, cpu_ov, t0);
833 }
834 tcg_temp_free(t0);
02765534 835 if (NARROW_MODE(ctx)) {
dc0ad844
ND
836 tcg_gen_extract_tl(cpu_ov, cpu_ov, 31, 1);
837 if (is_isa300(ctx)) {
838 tcg_gen_mov_tl(cpu_ov32, cpu_ov);
839 }
840 } else {
841 if (is_isa300(ctx)) {
842 tcg_gen_extract_tl(cpu_ov32, cpu_ov, 31, 1);
843 }
38a61d34 844 tcg_gen_extract_tl(cpu_ov, cpu_ov, TARGET_LONG_BITS - 1, 1);
ffe30937 845 }
ffe30937 846 tcg_gen_or_tl(cpu_so, cpu_so, cpu_ov);
79aceca5
FB
847}
848
6b10d008
ND
849static inline void gen_op_arith_compute_ca32(DisasContext *ctx,
850 TCGv res, TCGv arg0, TCGv arg1,
851 int sub)
852{
853 TCGv t0;
854
855 if (!is_isa300(ctx)) {
856 return;
857 }
858
859 t0 = tcg_temp_new();
33903d0a
ND
860 if (sub) {
861 tcg_gen_eqv_tl(t0, arg0, arg1);
862 } else {
863 tcg_gen_xor_tl(t0, arg0, arg1);
864 }
6b10d008
ND
865 tcg_gen_xor_tl(t0, t0, res);
866 tcg_gen_extract_tl(cpu_ca32, t0, 32, 1);
867 tcg_temp_free(t0);
868}
869
74637406 870/* Common add function */
636aa200 871static inline void gen_op_arith_add(DisasContext *ctx, TCGv ret, TCGv arg1,
b5a73f8d
RH
872 TCGv arg2, bool add_ca, bool compute_ca,
873 bool compute_ov, bool compute_rc0)
74637406 874{
b5a73f8d 875 TCGv t0 = ret;
d9bce9d9 876
752d634e 877 if (compute_ca || compute_ov) {
146de60d 878 t0 = tcg_temp_new();
74637406 879 }
79aceca5 880
da91a00f 881 if (compute_ca) {
79482e5a 882 if (NARROW_MODE(ctx)) {
752d634e
RH
883 /* Caution: a non-obvious corner case of the spec is that we
884 must produce the *entire* 64-bit addition, but produce the
885 carry into bit 32. */
79482e5a 886 TCGv t1 = tcg_temp_new();
752d634e
RH
887 tcg_gen_xor_tl(t1, arg1, arg2); /* add without carry */
888 tcg_gen_add_tl(t0, arg1, arg2);
79482e5a
RH
889 if (add_ca) {
890 tcg_gen_add_tl(t0, t0, cpu_ca);
891 }
752d634e
RH
892 tcg_gen_xor_tl(cpu_ca, t0, t1); /* bits changed w/ carry */
893 tcg_temp_free(t1);
e2622073 894 tcg_gen_extract_tl(cpu_ca, cpu_ca, 32, 1);
6b10d008
ND
895 if (is_isa300(ctx)) {
896 tcg_gen_mov_tl(cpu_ca32, cpu_ca);
897 }
b5a73f8d 898 } else {
79482e5a
RH
899 TCGv zero = tcg_const_tl(0);
900 if (add_ca) {
901 tcg_gen_add2_tl(t0, cpu_ca, arg1, zero, cpu_ca, zero);
902 tcg_gen_add2_tl(t0, cpu_ca, t0, cpu_ca, arg2, zero);
903 } else {
904 tcg_gen_add2_tl(t0, cpu_ca, arg1, zero, arg2, zero);
905 }
6b10d008 906 gen_op_arith_compute_ca32(ctx, t0, arg1, arg2, 0);
79482e5a 907 tcg_temp_free(zero);
b5a73f8d 908 }
b5a73f8d
RH
909 } else {
910 tcg_gen_add_tl(t0, arg1, arg2);
911 if (add_ca) {
912 tcg_gen_add_tl(t0, t0, cpu_ca);
913 }
da91a00f 914 }
79aceca5 915
74637406
AJ
916 if (compute_ov) {
917 gen_op_arith_compute_ov(ctx, t0, arg1, arg2, 0);
918 }
b5a73f8d 919 if (unlikely(compute_rc0)) {
74637406 920 gen_set_Rc0(ctx, t0);
b5a73f8d 921 }
74637406 922
11f4e8f8 923 if (t0 != ret) {
74637406
AJ
924 tcg_gen_mov_tl(ret, t0);
925 tcg_temp_free(t0);
926 }
39dd32ee 927}
74637406
AJ
928/* Add functions with two operands */
929#define GEN_INT_ARITH_ADD(name, opc3, add_ca, compute_ca, compute_ov) \
b5a73f8d 930static void glue(gen_, name)(DisasContext *ctx) \
74637406
AJ
931{ \
932 gen_op_arith_add(ctx, cpu_gpr[rD(ctx->opcode)], \
933 cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)], \
b5a73f8d 934 add_ca, compute_ca, compute_ov, Rc(ctx->opcode)); \
74637406
AJ
935}
936/* Add functions with one operand and one immediate */
937#define GEN_INT_ARITH_ADD_CONST(name, opc3, const_val, \
938 add_ca, compute_ca, compute_ov) \
b5a73f8d 939static void glue(gen_, name)(DisasContext *ctx) \
74637406 940{ \
b5a73f8d 941 TCGv t0 = tcg_const_tl(const_val); \
74637406
AJ
942 gen_op_arith_add(ctx, cpu_gpr[rD(ctx->opcode)], \
943 cpu_gpr[rA(ctx->opcode)], t0, \
b5a73f8d 944 add_ca, compute_ca, compute_ov, Rc(ctx->opcode)); \
74637406
AJ
945 tcg_temp_free(t0); \
946}
947
948/* add add. addo addo. */
949GEN_INT_ARITH_ADD(add, 0x08, 0, 0, 0)
950GEN_INT_ARITH_ADD(addo, 0x18, 0, 0, 1)
951/* addc addc. addco addco. */
952GEN_INT_ARITH_ADD(addc, 0x00, 0, 1, 0)
953GEN_INT_ARITH_ADD(addco, 0x10, 0, 1, 1)
954/* adde adde. addeo addeo. */
955GEN_INT_ARITH_ADD(adde, 0x04, 1, 1, 0)
956GEN_INT_ARITH_ADD(addeo, 0x14, 1, 1, 1)
957/* addme addme. addmeo addmeo. */
958GEN_INT_ARITH_ADD_CONST(addme, 0x07, -1LL, 1, 1, 0)
959GEN_INT_ARITH_ADD_CONST(addmeo, 0x17, -1LL, 1, 1, 1)
960/* addze addze. addzeo addzeo.*/
961GEN_INT_ARITH_ADD_CONST(addze, 0x06, 0, 1, 1, 0)
962GEN_INT_ARITH_ADD_CONST(addzeo, 0x16, 0, 1, 1, 1)
963/* addi */
99e300ef 964static void gen_addi(DisasContext *ctx)
d9bce9d9 965{
74637406
AJ
966 target_long simm = SIMM(ctx->opcode);
967
968 if (rA(ctx->opcode) == 0) {
969 /* li case */
970 tcg_gen_movi_tl(cpu_gpr[rD(ctx->opcode)], simm);
971 } else {
b5a73f8d
RH
972 tcg_gen_addi_tl(cpu_gpr[rD(ctx->opcode)],
973 cpu_gpr[rA(ctx->opcode)], simm);
74637406 974 }
d9bce9d9 975}
74637406 976/* addic addic.*/
b5a73f8d 977static inline void gen_op_addic(DisasContext *ctx, bool compute_rc0)
d9bce9d9 978{
b5a73f8d
RH
979 TCGv c = tcg_const_tl(SIMM(ctx->opcode));
980 gen_op_arith_add(ctx, cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)],
981 c, 0, 1, 0, compute_rc0);
982 tcg_temp_free(c);
d9bce9d9 983}
99e300ef
BS
984
985static void gen_addic(DisasContext *ctx)
d9bce9d9 986{
b5a73f8d 987 gen_op_addic(ctx, 0);
d9bce9d9 988}
e8eaa2c0
BS
989
990static void gen_addic_(DisasContext *ctx)
d9bce9d9 991{
b5a73f8d 992 gen_op_addic(ctx, 1);
d9bce9d9 993}
99e300ef 994
54623277 995/* addis */
99e300ef 996static void gen_addis(DisasContext *ctx)
d9bce9d9 997{
74637406
AJ
998 target_long simm = SIMM(ctx->opcode);
999
1000 if (rA(ctx->opcode) == 0) {
1001 /* lis case */
1002 tcg_gen_movi_tl(cpu_gpr[rD(ctx->opcode)], simm << 16);
1003 } else {
b5a73f8d
RH
1004 tcg_gen_addi_tl(cpu_gpr[rD(ctx->opcode)],
1005 cpu_gpr[rA(ctx->opcode)], simm << 16);
74637406 1006 }
d9bce9d9 1007}
74637406 1008
c5b2b9ce
ND
1009/* addpcis */
1010static void gen_addpcis(DisasContext *ctx)
1011{
1012 target_long d = DX(ctx->opcode);
1013
b6bac4bc 1014 tcg_gen_movi_tl(cpu_gpr[rD(ctx->opcode)], ctx->base.pc_next + (d << 16));
c5b2b9ce
ND
1015}
1016
636aa200
BS
1017static inline void gen_op_arith_divw(DisasContext *ctx, TCGv ret, TCGv arg1,
1018 TCGv arg2, int sign, int compute_ov)
d9bce9d9 1019{
b07c32dc
ND
1020 TCGv_i32 t0 = tcg_temp_new_i32();
1021 TCGv_i32 t1 = tcg_temp_new_i32();
1022 TCGv_i32 t2 = tcg_temp_new_i32();
1023 TCGv_i32 t3 = tcg_temp_new_i32();
74637406 1024
2ef1b120
AJ
1025 tcg_gen_trunc_tl_i32(t0, arg1);
1026 tcg_gen_trunc_tl_i32(t1, arg2);
74637406 1027 if (sign) {
b07c32dc
ND
1028 tcg_gen_setcondi_i32(TCG_COND_EQ, t2, t0, INT_MIN);
1029 tcg_gen_setcondi_i32(TCG_COND_EQ, t3, t1, -1);
1030 tcg_gen_and_i32(t2, t2, t3);
1031 tcg_gen_setcondi_i32(TCG_COND_EQ, t3, t1, 0);
1032 tcg_gen_or_i32(t2, t2, t3);
1033 tcg_gen_movi_i32(t3, 0);
1034 tcg_gen_movcond_i32(TCG_COND_NE, t1, t2, t3, t2, t1);
1035 tcg_gen_div_i32(t3, t0, t1);
1036 tcg_gen_extu_i32_tl(ret, t3);
74637406 1037 } else {
b07c32dc
ND
1038 tcg_gen_setcondi_i32(TCG_COND_EQ, t2, t1, 0);
1039 tcg_gen_movi_i32(t3, 0);
1040 tcg_gen_movcond_i32(TCG_COND_NE, t1, t2, t3, t2, t1);
1041 tcg_gen_divu_i32(t3, t0, t1);
1042 tcg_gen_extu_i32_tl(ret, t3);
74637406
AJ
1043 }
1044 if (compute_ov) {
b07c32dc 1045 tcg_gen_extu_i32_tl(cpu_ov, t2);
c44027ff
ND
1046 if (is_isa300(ctx)) {
1047 tcg_gen_extu_i32_tl(cpu_ov32, t2);
1048 }
b07c32dc 1049 tcg_gen_or_tl(cpu_so, cpu_so, cpu_ov);
74637406 1050 }
a7812ae4
PB
1051 tcg_temp_free_i32(t0);
1052 tcg_temp_free_i32(t1);
b07c32dc
ND
1053 tcg_temp_free_i32(t2);
1054 tcg_temp_free_i32(t3);
1055
74637406
AJ
1056 if (unlikely(Rc(ctx->opcode) != 0))
1057 gen_set_Rc0(ctx, ret);
d9bce9d9 1058}
74637406
AJ
1059/* Div functions */
1060#define GEN_INT_ARITH_DIVW(name, opc3, sign, compute_ov) \
99e300ef 1061static void glue(gen_, name)(DisasContext *ctx) \
74637406
AJ
1062{ \
1063 gen_op_arith_divw(ctx, cpu_gpr[rD(ctx->opcode)], \
1064 cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)], \
1065 sign, compute_ov); \
1066}
1067/* divwu divwu. divwuo divwuo. */
1068GEN_INT_ARITH_DIVW(divwu, 0x0E, 0, 0);
1069GEN_INT_ARITH_DIVW(divwuo, 0x1E, 0, 1);
1070/* divw divw. divwo divwo. */
1071GEN_INT_ARITH_DIVW(divw, 0x0F, 1, 0);
1072GEN_INT_ARITH_DIVW(divwo, 0x1F, 1, 1);
98d1eb27
TM
1073
1074/* div[wd]eu[o][.] */
1075#define GEN_DIVE(name, hlpr, compute_ov) \
1076static void gen_##name(DisasContext *ctx) \
1077{ \
1078 TCGv_i32 t0 = tcg_const_i32(compute_ov); \
1079 gen_helper_##hlpr(cpu_gpr[rD(ctx->opcode)], cpu_env, \
1080 cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)], t0); \
1081 tcg_temp_free_i32(t0); \
1082 if (unlikely(Rc(ctx->opcode) != 0)) { \
1083 gen_set_Rc0(ctx, cpu_gpr[rD(ctx->opcode)]); \
1084 } \
1085}
1086
6a4fda33
TM
1087GEN_DIVE(divweu, divweu, 0);
1088GEN_DIVE(divweuo, divweu, 1);
a98eb9e9
TM
1089GEN_DIVE(divwe, divwe, 0);
1090GEN_DIVE(divweo, divwe, 1);
6a4fda33 1091
d9bce9d9 1092#if defined(TARGET_PPC64)
636aa200
BS
1093static inline void gen_op_arith_divd(DisasContext *ctx, TCGv ret, TCGv arg1,
1094 TCGv arg2, int sign, int compute_ov)
d9bce9d9 1095{
4110b586
ND
1096 TCGv_i64 t0 = tcg_temp_new_i64();
1097 TCGv_i64 t1 = tcg_temp_new_i64();
1098 TCGv_i64 t2 = tcg_temp_new_i64();
1099 TCGv_i64 t3 = tcg_temp_new_i64();
74637406 1100
4110b586
ND
1101 tcg_gen_mov_i64(t0, arg1);
1102 tcg_gen_mov_i64(t1, arg2);
74637406 1103 if (sign) {
4110b586
ND
1104 tcg_gen_setcondi_i64(TCG_COND_EQ, t2, t0, INT64_MIN);
1105 tcg_gen_setcondi_i64(TCG_COND_EQ, t3, t1, -1);
1106 tcg_gen_and_i64(t2, t2, t3);
1107 tcg_gen_setcondi_i64(TCG_COND_EQ, t3, t1, 0);
1108 tcg_gen_or_i64(t2, t2, t3);
1109 tcg_gen_movi_i64(t3, 0);
1110 tcg_gen_movcond_i64(TCG_COND_NE, t1, t2, t3, t2, t1);
1111 tcg_gen_div_i64(ret, t0, t1);
74637406 1112 } else {
4110b586
ND
1113 tcg_gen_setcondi_i64(TCG_COND_EQ, t2, t1, 0);
1114 tcg_gen_movi_i64(t3, 0);
1115 tcg_gen_movcond_i64(TCG_COND_NE, t1, t2, t3, t2, t1);
1116 tcg_gen_divu_i64(ret, t0, t1);
74637406
AJ
1117 }
1118 if (compute_ov) {
4110b586 1119 tcg_gen_mov_tl(cpu_ov, t2);
c44027ff
ND
1120 if (is_isa300(ctx)) {
1121 tcg_gen_mov_tl(cpu_ov32, t2);
1122 }
4110b586 1123 tcg_gen_or_tl(cpu_so, cpu_so, cpu_ov);
74637406 1124 }
4110b586
ND
1125 tcg_temp_free_i64(t0);
1126 tcg_temp_free_i64(t1);
1127 tcg_temp_free_i64(t2);
1128 tcg_temp_free_i64(t3);
1129
74637406
AJ
1130 if (unlikely(Rc(ctx->opcode) != 0))
1131 gen_set_Rc0(ctx, ret);
d9bce9d9 1132}
4110b586 1133
74637406 1134#define GEN_INT_ARITH_DIVD(name, opc3, sign, compute_ov) \
99e300ef 1135static void glue(gen_, name)(DisasContext *ctx) \
74637406 1136{ \
2ef1b120
AJ
1137 gen_op_arith_divd(ctx, cpu_gpr[rD(ctx->opcode)], \
1138 cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)], \
1139 sign, compute_ov); \
74637406 1140}
c44027ff 1141/* divdu divdu. divduo divduo. */
74637406
AJ
1142GEN_INT_ARITH_DIVD(divdu, 0x0E, 0, 0);
1143GEN_INT_ARITH_DIVD(divduo, 0x1E, 0, 1);
c44027ff 1144/* divd divd. divdo divdo. */
74637406
AJ
1145GEN_INT_ARITH_DIVD(divd, 0x0F, 1, 0);
1146GEN_INT_ARITH_DIVD(divdo, 0x1F, 1, 1);
98d1eb27
TM
1147
1148GEN_DIVE(divdeu, divdeu, 0);
1149GEN_DIVE(divdeuo, divdeu, 1);
e44259b6
TM
1150GEN_DIVE(divde, divde, 0);
1151GEN_DIVE(divdeo, divde, 1);
d9bce9d9 1152#endif
74637406 1153
af2c6620
ND
1154static inline void gen_op_arith_modw(DisasContext *ctx, TCGv ret, TCGv arg1,
1155 TCGv arg2, int sign)
1156{
1157 TCGv_i32 t0 = tcg_temp_new_i32();
1158 TCGv_i32 t1 = tcg_temp_new_i32();
1159
1160 tcg_gen_trunc_tl_i32(t0, arg1);
1161 tcg_gen_trunc_tl_i32(t1, arg2);
1162 if (sign) {
1163 TCGv_i32 t2 = tcg_temp_new_i32();
1164 TCGv_i32 t3 = tcg_temp_new_i32();
1165 tcg_gen_setcondi_i32(TCG_COND_EQ, t2, t0, INT_MIN);
1166 tcg_gen_setcondi_i32(TCG_COND_EQ, t3, t1, -1);
1167 tcg_gen_and_i32(t2, t2, t3);
1168 tcg_gen_setcondi_i32(TCG_COND_EQ, t3, t1, 0);
1169 tcg_gen_or_i32(t2, t2, t3);
1170 tcg_gen_movi_i32(t3, 0);
1171 tcg_gen_movcond_i32(TCG_COND_NE, t1, t2, t3, t2, t1);
1172 tcg_gen_rem_i32(t3, t0, t1);
1173 tcg_gen_ext_i32_tl(ret, t3);
1174 tcg_temp_free_i32(t2);
1175 tcg_temp_free_i32(t3);
1176 } else {
1177 TCGv_i32 t2 = tcg_const_i32(1);
1178 TCGv_i32 t3 = tcg_const_i32(0);
1179 tcg_gen_movcond_i32(TCG_COND_EQ, t1, t1, t3, t2, t1);
1180 tcg_gen_remu_i32(t3, t0, t1);
1181 tcg_gen_extu_i32_tl(ret, t3);
1182 tcg_temp_free_i32(t2);
1183 tcg_temp_free_i32(t3);
1184 }
1185 tcg_temp_free_i32(t0);
1186 tcg_temp_free_i32(t1);
1187}
1188
1189#define GEN_INT_ARITH_MODW(name, opc3, sign) \
1190static void glue(gen_, name)(DisasContext *ctx) \
1191{ \
1192 gen_op_arith_modw(ctx, cpu_gpr[rD(ctx->opcode)], \
1193 cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)], \
1194 sign); \
1195}
1196
1197GEN_INT_ARITH_MODW(moduw, 0x08, 0);
1198GEN_INT_ARITH_MODW(modsw, 0x18, 1);
1199
063cf14f
ND
1200#if defined(TARGET_PPC64)
1201static inline void gen_op_arith_modd(DisasContext *ctx, TCGv ret, TCGv arg1,
1202 TCGv arg2, int sign)
1203{
1204 TCGv_i64 t0 = tcg_temp_new_i64();
1205 TCGv_i64 t1 = tcg_temp_new_i64();
1206
1207 tcg_gen_mov_i64(t0, arg1);
1208 tcg_gen_mov_i64(t1, arg2);
1209 if (sign) {
1210 TCGv_i64 t2 = tcg_temp_new_i64();
1211 TCGv_i64 t3 = tcg_temp_new_i64();
1212 tcg_gen_setcondi_i64(TCG_COND_EQ, t2, t0, INT64_MIN);
1213 tcg_gen_setcondi_i64(TCG_COND_EQ, t3, t1, -1);
1214 tcg_gen_and_i64(t2, t2, t3);
1215 tcg_gen_setcondi_i64(TCG_COND_EQ, t3, t1, 0);
1216 tcg_gen_or_i64(t2, t2, t3);
1217 tcg_gen_movi_i64(t3, 0);
1218 tcg_gen_movcond_i64(TCG_COND_NE, t1, t2, t3, t2, t1);
1219 tcg_gen_rem_i64(ret, t0, t1);
1220 tcg_temp_free_i64(t2);
1221 tcg_temp_free_i64(t3);
1222 } else {
1223 TCGv_i64 t2 = tcg_const_i64(1);
1224 TCGv_i64 t3 = tcg_const_i64(0);
1225 tcg_gen_movcond_i64(TCG_COND_EQ, t1, t1, t3, t2, t1);
1226 tcg_gen_remu_i64(ret, t0, t1);
1227 tcg_temp_free_i64(t2);
1228 tcg_temp_free_i64(t3);
1229 }
1230 tcg_temp_free_i64(t0);
1231 tcg_temp_free_i64(t1);
1232}
1233
1234#define GEN_INT_ARITH_MODD(name, opc3, sign) \
1235static void glue(gen_, name)(DisasContext *ctx) \
1236{ \
1237 gen_op_arith_modd(ctx, cpu_gpr[rD(ctx->opcode)], \
1238 cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)], \
1239 sign); \
1240}
1241
1242GEN_INT_ARITH_MODD(modud, 0x08, 0);
1243GEN_INT_ARITH_MODD(modsd, 0x18, 1);
1244#endif
1245
74637406 1246/* mulhw mulhw. */
99e300ef 1247static void gen_mulhw(DisasContext *ctx)
d9bce9d9 1248{
23ad1d5d
RH
1249 TCGv_i32 t0 = tcg_temp_new_i32();
1250 TCGv_i32 t1 = tcg_temp_new_i32();
74637406 1251
23ad1d5d
RH
1252 tcg_gen_trunc_tl_i32(t0, cpu_gpr[rA(ctx->opcode)]);
1253 tcg_gen_trunc_tl_i32(t1, cpu_gpr[rB(ctx->opcode)]);
1254 tcg_gen_muls2_i32(t0, t1, t0, t1);
1255 tcg_gen_extu_i32_tl(cpu_gpr[rD(ctx->opcode)], t1);
1256 tcg_temp_free_i32(t0);
1257 tcg_temp_free_i32(t1);
74637406
AJ
1258 if (unlikely(Rc(ctx->opcode) != 0))
1259 gen_set_Rc0(ctx, cpu_gpr[rD(ctx->opcode)]);
d9bce9d9 1260}
99e300ef 1261
54623277 1262/* mulhwu mulhwu. */
99e300ef 1263static void gen_mulhwu(DisasContext *ctx)
d9bce9d9 1264{
23ad1d5d
RH
1265 TCGv_i32 t0 = tcg_temp_new_i32();
1266 TCGv_i32 t1 = tcg_temp_new_i32();
74637406 1267
23ad1d5d
RH
1268 tcg_gen_trunc_tl_i32(t0, cpu_gpr[rA(ctx->opcode)]);
1269 tcg_gen_trunc_tl_i32(t1, cpu_gpr[rB(ctx->opcode)]);
1270 tcg_gen_mulu2_i32(t0, t1, t0, t1);
1271 tcg_gen_extu_i32_tl(cpu_gpr[rD(ctx->opcode)], t1);
1272 tcg_temp_free_i32(t0);
1273 tcg_temp_free_i32(t1);
74637406
AJ
1274 if (unlikely(Rc(ctx->opcode) != 0))
1275 gen_set_Rc0(ctx, cpu_gpr[rD(ctx->opcode)]);
d9bce9d9 1276}
99e300ef 1277
54623277 1278/* mullw mullw. */
99e300ef 1279static void gen_mullw(DisasContext *ctx)
d9bce9d9 1280{
1fa74845
TM
1281#if defined(TARGET_PPC64)
1282 TCGv_i64 t0, t1;
1283 t0 = tcg_temp_new_i64();
1284 t1 = tcg_temp_new_i64();
1285 tcg_gen_ext32s_tl(t0, cpu_gpr[rA(ctx->opcode)]);
1286 tcg_gen_ext32s_tl(t1, cpu_gpr[rB(ctx->opcode)]);
1287 tcg_gen_mul_i64(cpu_gpr[rD(ctx->opcode)], t0, t1);
1288 tcg_temp_free(t0);
1289 tcg_temp_free(t1);
1290#else
03039e5e
TM
1291 tcg_gen_mul_i32(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)],
1292 cpu_gpr[rB(ctx->opcode)]);
1fa74845 1293#endif
74637406
AJ
1294 if (unlikely(Rc(ctx->opcode) != 0))
1295 gen_set_Rc0(ctx, cpu_gpr[rD(ctx->opcode)]);
d9bce9d9 1296}
99e300ef 1297
54623277 1298/* mullwo mullwo. */
99e300ef 1299static void gen_mullwo(DisasContext *ctx)
d9bce9d9 1300{
e4a2c846
RH
1301 TCGv_i32 t0 = tcg_temp_new_i32();
1302 TCGv_i32 t1 = tcg_temp_new_i32();
74637406 1303
e4a2c846
RH
1304 tcg_gen_trunc_tl_i32(t0, cpu_gpr[rA(ctx->opcode)]);
1305 tcg_gen_trunc_tl_i32(t1, cpu_gpr[rB(ctx->opcode)]);
1306 tcg_gen_muls2_i32(t0, t1, t0, t1);
f11ebbf8 1307#if defined(TARGET_PPC64)
26977876
TM
1308 tcg_gen_concat_i32_i64(cpu_gpr[rD(ctx->opcode)], t0, t1);
1309#else
1310 tcg_gen_mov_i32(cpu_gpr[rD(ctx->opcode)], t0);
f11ebbf8 1311#endif
e4a2c846
RH
1312
1313 tcg_gen_sari_i32(t0, t0, 31);
1314 tcg_gen_setcond_i32(TCG_COND_NE, t0, t0, t1);
1315 tcg_gen_extu_i32_tl(cpu_ov, t0);
61aa9a69
ND
1316 if (is_isa300(ctx)) {
1317 tcg_gen_mov_tl(cpu_ov32, cpu_ov);
1318 }
e4a2c846
RH
1319 tcg_gen_or_tl(cpu_so, cpu_so, cpu_ov);
1320
1321 tcg_temp_free_i32(t0);
1322 tcg_temp_free_i32(t1);
74637406
AJ
1323 if (unlikely(Rc(ctx->opcode) != 0))
1324 gen_set_Rc0(ctx, cpu_gpr[rD(ctx->opcode)]);
d9bce9d9 1325}
99e300ef 1326
54623277 1327/* mulli */
99e300ef 1328static void gen_mulli(DisasContext *ctx)
d9bce9d9 1329{
74637406
AJ
1330 tcg_gen_muli_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)],
1331 SIMM(ctx->opcode));
d9bce9d9 1332}
23ad1d5d 1333
d9bce9d9 1334#if defined(TARGET_PPC64)
74637406 1335/* mulhd mulhd. */
23ad1d5d
RH
1336static void gen_mulhd(DisasContext *ctx)
1337{
1338 TCGv lo = tcg_temp_new();
1339 tcg_gen_muls2_tl(lo, cpu_gpr[rD(ctx->opcode)],
1340 cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)]);
1341 tcg_temp_free(lo);
1342 if (unlikely(Rc(ctx->opcode) != 0)) {
1343 gen_set_Rc0(ctx, cpu_gpr[rD(ctx->opcode)]);
1344 }
1345}
1346
74637406 1347/* mulhdu mulhdu. */
23ad1d5d
RH
1348static void gen_mulhdu(DisasContext *ctx)
1349{
1350 TCGv lo = tcg_temp_new();
1351 tcg_gen_mulu2_tl(lo, cpu_gpr[rD(ctx->opcode)],
1352 cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)]);
1353 tcg_temp_free(lo);
1354 if (unlikely(Rc(ctx->opcode) != 0)) {
1355 gen_set_Rc0(ctx, cpu_gpr[rD(ctx->opcode)]);
1356 }
1357}
99e300ef 1358
54623277 1359/* mulld mulld. */
99e300ef 1360static void gen_mulld(DisasContext *ctx)
d9bce9d9 1361{
74637406
AJ
1362 tcg_gen_mul_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)],
1363 cpu_gpr[rB(ctx->opcode)]);
1364 if (unlikely(Rc(ctx->opcode) != 0))
1365 gen_set_Rc0(ctx, cpu_gpr[rD(ctx->opcode)]);
d9bce9d9 1366}
d15f74fb 1367
74637406 1368/* mulldo mulldo. */
d15f74fb
BS
1369static void gen_mulldo(DisasContext *ctx)
1370{
22ffad31
TM
1371 TCGv_i64 t0 = tcg_temp_new_i64();
1372 TCGv_i64 t1 = tcg_temp_new_i64();
1373
1374 tcg_gen_muls2_i64(t0, t1, cpu_gpr[rA(ctx->opcode)],
1375 cpu_gpr[rB(ctx->opcode)]);
1376 tcg_gen_mov_i64(cpu_gpr[rD(ctx->opcode)], t0);
1377
1378 tcg_gen_sari_i64(t0, t0, 63);
1379 tcg_gen_setcond_i64(TCG_COND_NE, cpu_ov, t0, t1);
61aa9a69
ND
1380 if (is_isa300(ctx)) {
1381 tcg_gen_mov_tl(cpu_ov32, cpu_ov);
1382 }
22ffad31
TM
1383 tcg_gen_or_tl(cpu_so, cpu_so, cpu_ov);
1384
1385 tcg_temp_free_i64(t0);
1386 tcg_temp_free_i64(t1);
1387
d15f74fb
BS
1388 if (unlikely(Rc(ctx->opcode) != 0)) {
1389 gen_set_Rc0(ctx, cpu_gpr[rD(ctx->opcode)]);
1390 }
1391}
d9bce9d9 1392#endif
74637406 1393
74637406 1394/* Common subf function */
636aa200 1395static inline void gen_op_arith_subf(DisasContext *ctx, TCGv ret, TCGv arg1,
b5a73f8d
RH
1396 TCGv arg2, bool add_ca, bool compute_ca,
1397 bool compute_ov, bool compute_rc0)
79aceca5 1398{
b5a73f8d 1399 TCGv t0 = ret;
79aceca5 1400
752d634e 1401 if (compute_ca || compute_ov) {
b5a73f8d 1402 t0 = tcg_temp_new();
da91a00f 1403 }
74637406 1404
79482e5a
RH
1405 if (compute_ca) {
1406 /* dest = ~arg1 + arg2 [+ ca]. */
1407 if (NARROW_MODE(ctx)) {
752d634e
RH
1408 /* Caution: a non-obvious corner case of the spec is that we
1409 must produce the *entire* 64-bit addition, but produce the
1410 carry into bit 32. */
79482e5a 1411 TCGv inv1 = tcg_temp_new();
752d634e 1412 TCGv t1 = tcg_temp_new();
79482e5a 1413 tcg_gen_not_tl(inv1, arg1);
79482e5a 1414 if (add_ca) {
752d634e 1415 tcg_gen_add_tl(t0, arg2, cpu_ca);
79482e5a 1416 } else {
752d634e 1417 tcg_gen_addi_tl(t0, arg2, 1);
79482e5a 1418 }
752d634e 1419 tcg_gen_xor_tl(t1, arg2, inv1); /* add without carry */
79482e5a 1420 tcg_gen_add_tl(t0, t0, inv1);
c80d1df5 1421 tcg_temp_free(inv1);
752d634e
RH
1422 tcg_gen_xor_tl(cpu_ca, t0, t1); /* bits changes w/ carry */
1423 tcg_temp_free(t1);
e2622073 1424 tcg_gen_extract_tl(cpu_ca, cpu_ca, 32, 1);
33903d0a
ND
1425 if (is_isa300(ctx)) {
1426 tcg_gen_mov_tl(cpu_ca32, cpu_ca);
1427 }
79482e5a 1428 } else if (add_ca) {
08f4a0f7
RH
1429 TCGv zero, inv1 = tcg_temp_new();
1430 tcg_gen_not_tl(inv1, arg1);
b5a73f8d
RH
1431 zero = tcg_const_tl(0);
1432 tcg_gen_add2_tl(t0, cpu_ca, arg2, zero, cpu_ca, zero);
08f4a0f7 1433 tcg_gen_add2_tl(t0, cpu_ca, t0, cpu_ca, inv1, zero);
33903d0a 1434 gen_op_arith_compute_ca32(ctx, t0, inv1, arg2, 0);
b5a73f8d 1435 tcg_temp_free(zero);
08f4a0f7 1436 tcg_temp_free(inv1);
b5a73f8d 1437 } else {
79482e5a 1438 tcg_gen_setcond_tl(TCG_COND_GEU, cpu_ca, arg2, arg1);
b5a73f8d 1439 tcg_gen_sub_tl(t0, arg2, arg1);
33903d0a 1440 gen_op_arith_compute_ca32(ctx, t0, arg1, arg2, 1);
b5a73f8d 1441 }
79482e5a
RH
1442 } else if (add_ca) {
1443 /* Since we're ignoring carry-out, we can simplify the
1444 standard ~arg1 + arg2 + ca to arg2 - arg1 + ca - 1. */
1445 tcg_gen_sub_tl(t0, arg2, arg1);
1446 tcg_gen_add_tl(t0, t0, cpu_ca);
1447 tcg_gen_subi_tl(t0, t0, 1);
79aceca5 1448 } else {
b5a73f8d 1449 tcg_gen_sub_tl(t0, arg2, arg1);
74637406 1450 }
b5a73f8d 1451
74637406
AJ
1452 if (compute_ov) {
1453 gen_op_arith_compute_ov(ctx, t0, arg1, arg2, 1);
1454 }
b5a73f8d 1455 if (unlikely(compute_rc0)) {
74637406 1456 gen_set_Rc0(ctx, t0);
b5a73f8d 1457 }
74637406 1458
11f4e8f8 1459 if (t0 != ret) {
74637406
AJ
1460 tcg_gen_mov_tl(ret, t0);
1461 tcg_temp_free(t0);
79aceca5 1462 }
79aceca5 1463}
74637406
AJ
1464/* Sub functions with Two operands functions */
1465#define GEN_INT_ARITH_SUBF(name, opc3, add_ca, compute_ca, compute_ov) \
b5a73f8d 1466static void glue(gen_, name)(DisasContext *ctx) \
74637406
AJ
1467{ \
1468 gen_op_arith_subf(ctx, cpu_gpr[rD(ctx->opcode)], \
1469 cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)], \
b5a73f8d 1470 add_ca, compute_ca, compute_ov, Rc(ctx->opcode)); \
74637406
AJ
1471}
1472/* Sub functions with one operand and one immediate */
1473#define GEN_INT_ARITH_SUBF_CONST(name, opc3, const_val, \
1474 add_ca, compute_ca, compute_ov) \
b5a73f8d 1475static void glue(gen_, name)(DisasContext *ctx) \
74637406 1476{ \
b5a73f8d 1477 TCGv t0 = tcg_const_tl(const_val); \
74637406
AJ
1478 gen_op_arith_subf(ctx, cpu_gpr[rD(ctx->opcode)], \
1479 cpu_gpr[rA(ctx->opcode)], t0, \
b5a73f8d 1480 add_ca, compute_ca, compute_ov, Rc(ctx->opcode)); \
74637406
AJ
1481 tcg_temp_free(t0); \
1482}
1483/* subf subf. subfo subfo. */
1484GEN_INT_ARITH_SUBF(subf, 0x01, 0, 0, 0)
1485GEN_INT_ARITH_SUBF(subfo, 0x11, 0, 0, 1)
1486/* subfc subfc. subfco subfco. */
1487GEN_INT_ARITH_SUBF(subfc, 0x00, 0, 1, 0)
1488GEN_INT_ARITH_SUBF(subfco, 0x10, 0, 1, 1)
1489/* subfe subfe. subfeo subfo. */
1490GEN_INT_ARITH_SUBF(subfe, 0x04, 1, 1, 0)
1491GEN_INT_ARITH_SUBF(subfeo, 0x14, 1, 1, 1)
1492/* subfme subfme. subfmeo subfmeo. */
1493GEN_INT_ARITH_SUBF_CONST(subfme, 0x07, -1LL, 1, 1, 0)
1494GEN_INT_ARITH_SUBF_CONST(subfmeo, 0x17, -1LL, 1, 1, 1)
1495/* subfze subfze. subfzeo subfzeo.*/
1496GEN_INT_ARITH_SUBF_CONST(subfze, 0x06, 0, 1, 1, 0)
1497GEN_INT_ARITH_SUBF_CONST(subfzeo, 0x16, 0, 1, 1, 1)
99e300ef 1498
54623277 1499/* subfic */
99e300ef 1500static void gen_subfic(DisasContext *ctx)
79aceca5 1501{
b5a73f8d
RH
1502 TCGv c = tcg_const_tl(SIMM(ctx->opcode));
1503 gen_op_arith_subf(ctx, cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)],
1504 c, 0, 1, 0, 0);
1505 tcg_temp_free(c);
79aceca5
FB
1506}
1507
fd3f0081
RH
1508/* neg neg. nego nego. */
1509static inline void gen_op_arith_neg(DisasContext *ctx, bool compute_ov)
1510{
1511 TCGv zero = tcg_const_tl(0);
1512 gen_op_arith_subf(ctx, cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)],
1513 zero, 0, 0, compute_ov, Rc(ctx->opcode));
1514 tcg_temp_free(zero);
1515}
1516
1517static void gen_neg(DisasContext *ctx)
1518{
1480d71c
ND
1519 tcg_gen_neg_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
1520 if (unlikely(Rc(ctx->opcode))) {
1521 gen_set_Rc0(ctx, cpu_gpr[rD(ctx->opcode)]);
1522 }
fd3f0081
RH
1523}
1524
1525static void gen_nego(DisasContext *ctx)
1526{
1527 gen_op_arith_neg(ctx, 1);
1528}
1529
79aceca5 1530/*** Integer logical ***/
26d67362 1531#define GEN_LOGICAL2(name, tcg_op, opc, type) \
99e300ef 1532static void glue(gen_, name)(DisasContext *ctx) \
79aceca5 1533{ \
26d67362
AJ
1534 tcg_op(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)], \
1535 cpu_gpr[rB(ctx->opcode)]); \
76a66253 1536 if (unlikely(Rc(ctx->opcode) != 0)) \
26d67362 1537 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]); \
79aceca5 1538}
79aceca5 1539
26d67362 1540#define GEN_LOGICAL1(name, tcg_op, opc, type) \
99e300ef 1541static void glue(gen_, name)(DisasContext *ctx) \
79aceca5 1542{ \
26d67362 1543 tcg_op(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)]); \
76a66253 1544 if (unlikely(Rc(ctx->opcode) != 0)) \
26d67362 1545 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]); \
79aceca5
FB
1546}
1547
1548/* and & and. */
26d67362 1549GEN_LOGICAL2(and, tcg_gen_and_tl, 0x00, PPC_INTEGER);
79aceca5 1550/* andc & andc. */
26d67362 1551GEN_LOGICAL2(andc, tcg_gen_andc_tl, 0x01, PPC_INTEGER);
e8eaa2c0 1552
54623277 1553/* andi. */
e8eaa2c0 1554static void gen_andi_(DisasContext *ctx)
79aceca5 1555{
26d67362
AJ
1556 tcg_gen_andi_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)], UIMM(ctx->opcode));
1557 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
79aceca5 1558}
e8eaa2c0 1559
54623277 1560/* andis. */
e8eaa2c0 1561static void gen_andis_(DisasContext *ctx)
79aceca5 1562{
26d67362
AJ
1563 tcg_gen_andi_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)], UIMM(ctx->opcode) << 16);
1564 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
79aceca5 1565}
99e300ef 1566
54623277 1567/* cntlzw */
99e300ef 1568static void gen_cntlzw(DisasContext *ctx)
26d67362 1569{
9b8514e5
RH
1570 TCGv_i32 t = tcg_temp_new_i32();
1571
1572 tcg_gen_trunc_tl_i32(t, cpu_gpr[rS(ctx->opcode)]);
1573 tcg_gen_clzi_i32(t, t, 32);
1574 tcg_gen_extu_i32_tl(cpu_gpr[rA(ctx->opcode)], t);
1575 tcg_temp_free_i32(t);
1576
26d67362 1577 if (unlikely(Rc(ctx->opcode) != 0))
2e31f5d3 1578 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
26d67362 1579}
b35344e4
ND
1580
1581/* cnttzw */
1582static void gen_cnttzw(DisasContext *ctx)
1583{
9b8514e5
RH
1584 TCGv_i32 t = tcg_temp_new_i32();
1585
1586 tcg_gen_trunc_tl_i32(t, cpu_gpr[rS(ctx->opcode)]);
1587 tcg_gen_ctzi_i32(t, t, 32);
1588 tcg_gen_extu_i32_tl(cpu_gpr[rA(ctx->opcode)], t);
1589 tcg_temp_free_i32(t);
1590
b35344e4
ND
1591 if (unlikely(Rc(ctx->opcode) != 0)) {
1592 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
1593 }
1594}
1595
79aceca5 1596/* eqv & eqv. */
26d67362 1597GEN_LOGICAL2(eqv, tcg_gen_eqv_tl, 0x08, PPC_INTEGER);
79aceca5 1598/* extsb & extsb. */
26d67362 1599GEN_LOGICAL1(extsb, tcg_gen_ext8s_tl, 0x1D, PPC_INTEGER);
79aceca5 1600/* extsh & extsh. */
26d67362 1601GEN_LOGICAL1(extsh, tcg_gen_ext16s_tl, 0x1C, PPC_INTEGER);
79aceca5 1602/* nand & nand. */
26d67362 1603GEN_LOGICAL2(nand, tcg_gen_nand_tl, 0x0E, PPC_INTEGER);
79aceca5 1604/* nor & nor. */
26d67362 1605GEN_LOGICAL2(nor, tcg_gen_nor_tl, 0x03, PPC_INTEGER);
99e300ef 1606
7f2b1744 1607#if defined(TARGET_PPC64) && !defined(CONFIG_USER_ONLY)
b68e60e6
BH
1608static void gen_pause(DisasContext *ctx)
1609{
1610 TCGv_i32 t0 = tcg_const_i32(0);
1611 tcg_gen_st_i32(t0, cpu_env,
1612 -offsetof(PowerPCCPU, env) + offsetof(CPUState, halted));
1613 tcg_temp_free_i32(t0);
1614
1615 /* Stop translation, this gives other CPUs a chance to run */
b6bac4bc 1616 gen_exception_nip(ctx, EXCP_HLT, ctx->base.pc_next);
b68e60e6
BH
1617}
1618#endif /* defined(TARGET_PPC64) */
1619
54623277 1620/* or & or. */
99e300ef 1621static void gen_or(DisasContext *ctx)
9a64fbe4 1622{
76a66253
JM
1623 int rs, ra, rb;
1624
1625 rs = rS(ctx->opcode);
1626 ra = rA(ctx->opcode);
1627 rb = rB(ctx->opcode);
1628 /* Optimisation for mr. ri case */
1629 if (rs != ra || rs != rb) {
26d67362
AJ
1630 if (rs != rb)
1631 tcg_gen_or_tl(cpu_gpr[ra], cpu_gpr[rs], cpu_gpr[rb]);
1632 else
1633 tcg_gen_mov_tl(cpu_gpr[ra], cpu_gpr[rs]);
76a66253 1634 if (unlikely(Rc(ctx->opcode) != 0))
26d67362 1635 gen_set_Rc0(ctx, cpu_gpr[ra]);
76a66253 1636 } else if (unlikely(Rc(ctx->opcode) != 0)) {
26d67362 1637 gen_set_Rc0(ctx, cpu_gpr[rs]);
c80f84e3 1638#if defined(TARGET_PPC64)
9e196938 1639 } else if (rs != 0) { /* 0 is nop */
26d67362
AJ
1640 int prio = 0;
1641
c80f84e3
JM
1642 switch (rs) {
1643 case 1:
1644 /* Set process priority to low */
26d67362 1645 prio = 2;
c80f84e3
JM
1646 break;
1647 case 6:
1648 /* Set process priority to medium-low */
26d67362 1649 prio = 3;
c80f84e3
JM
1650 break;
1651 case 2:
1652 /* Set process priority to normal */
26d67362 1653 prio = 4;
c80f84e3 1654 break;
be147d08
JM
1655#if !defined(CONFIG_USER_ONLY)
1656 case 31:
c47493f2 1657 if (!ctx->pr) {
be147d08 1658 /* Set process priority to very low */
26d67362 1659 prio = 1;
be147d08
JM
1660 }
1661 break;
1662 case 5:
c47493f2 1663 if (!ctx->pr) {
be147d08 1664 /* Set process priority to medium-hight */
26d67362 1665 prio = 5;
be147d08
JM
1666 }
1667 break;
1668 case 3:
c47493f2 1669 if (!ctx->pr) {
be147d08 1670 /* Set process priority to high */
26d67362 1671 prio = 6;
be147d08
JM
1672 }
1673 break;
be147d08 1674 case 7:
b68e60e6 1675 if (ctx->hv && !ctx->pr) {
be147d08 1676 /* Set process priority to very high */
26d67362 1677 prio = 7;
be147d08
JM
1678 }
1679 break;
be147d08 1680#endif
c80f84e3 1681 default:
c80f84e3
JM
1682 break;
1683 }
26d67362 1684 if (prio) {
a7812ae4 1685 TCGv t0 = tcg_temp_new();
54cdcae6 1686 gen_load_spr(t0, SPR_PPR);
ea363694
AJ
1687 tcg_gen_andi_tl(t0, t0, ~0x001C000000000000ULL);
1688 tcg_gen_ori_tl(t0, t0, ((uint64_t)prio) << 50);
54cdcae6 1689 gen_store_spr(SPR_PPR, t0);
ea363694 1690 tcg_temp_free(t0);
9e196938 1691 }
7f2b1744 1692#if !defined(CONFIG_USER_ONLY)
9e196938
AL
1693 /* Pause out of TCG otherwise spin loops with smt_low eat too much
1694 * CPU and the kernel hangs. This applies to all encodings other
1695 * than no-op, e.g., miso(rs=26), yield(27), mdoio(29), mdoom(30),
1696 * and all currently undefined.
1697 */
1698 gen_pause(ctx);
7f2b1744 1699#endif
c80f84e3 1700#endif
9a64fbe4 1701 }
9a64fbe4 1702}
79aceca5 1703/* orc & orc. */
26d67362 1704GEN_LOGICAL2(orc, tcg_gen_orc_tl, 0x0C, PPC_INTEGER);
99e300ef 1705
54623277 1706/* xor & xor. */
99e300ef 1707static void gen_xor(DisasContext *ctx)
9a64fbe4 1708{
9a64fbe4 1709 /* Optimisation for "set to zero" case */
26d67362 1710 if (rS(ctx->opcode) != rB(ctx->opcode))
312179c4 1711 tcg_gen_xor_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)], cpu_gpr[rB(ctx->opcode)]);
26d67362
AJ
1712 else
1713 tcg_gen_movi_tl(cpu_gpr[rA(ctx->opcode)], 0);
76a66253 1714 if (unlikely(Rc(ctx->opcode) != 0))
26d67362 1715 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
9a64fbe4 1716}
99e300ef 1717
54623277 1718/* ori */
99e300ef 1719static void gen_ori(DisasContext *ctx)
79aceca5 1720{
76a66253 1721 target_ulong uimm = UIMM(ctx->opcode);
79aceca5 1722
9a64fbe4 1723 if (rS(ctx->opcode) == rA(ctx->opcode) && uimm == 0) {
9a64fbe4 1724 return;
76a66253 1725 }
26d67362 1726 tcg_gen_ori_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)], uimm);
79aceca5 1727}
99e300ef 1728
54623277 1729/* oris */
99e300ef 1730static void gen_oris(DisasContext *ctx)
79aceca5 1731{
76a66253 1732 target_ulong uimm = UIMM(ctx->opcode);
79aceca5 1733
9a64fbe4
FB
1734 if (rS(ctx->opcode) == rA(ctx->opcode) && uimm == 0) {
1735 /* NOP */
1736 return;
76a66253 1737 }
26d67362 1738 tcg_gen_ori_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)], uimm << 16);
79aceca5 1739}
99e300ef 1740
54623277 1741/* xori */
99e300ef 1742static void gen_xori(DisasContext *ctx)
79aceca5 1743{
76a66253 1744 target_ulong uimm = UIMM(ctx->opcode);
9a64fbe4
FB
1745
1746 if (rS(ctx->opcode) == rA(ctx->opcode) && uimm == 0) {
1747 /* NOP */
1748 return;
1749 }
26d67362 1750 tcg_gen_xori_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)], uimm);
79aceca5 1751}
99e300ef 1752
54623277 1753/* xoris */
99e300ef 1754static void gen_xoris(DisasContext *ctx)
79aceca5 1755{
76a66253 1756 target_ulong uimm = UIMM(ctx->opcode);
9a64fbe4
FB
1757
1758 if (rS(ctx->opcode) == rA(ctx->opcode) && uimm == 0) {
1759 /* NOP */
1760 return;
1761 }
26d67362 1762 tcg_gen_xori_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)], uimm << 16);
79aceca5 1763}
99e300ef 1764
54623277 1765/* popcntb : PowerPC 2.03 specification */
99e300ef 1766static void gen_popcntb(DisasContext *ctx)
d9bce9d9 1767{
eaabeef2
DG
1768 gen_helper_popcntb(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)]);
1769}
1770
1771static void gen_popcntw(DisasContext *ctx)
1772{
79770002 1773#if defined(TARGET_PPC64)
eaabeef2 1774 gen_helper_popcntw(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)]);
79770002
RH
1775#else
1776 tcg_gen_ctpop_i32(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)]);
1777#endif
eaabeef2
DG
1778}
1779
d9bce9d9 1780#if defined(TARGET_PPC64)
eaabeef2
DG
1781/* popcntd: PowerPC 2.06 specification */
1782static void gen_popcntd(DisasContext *ctx)
1783{
79770002 1784 tcg_gen_ctpop_i64(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)]);
d9bce9d9 1785}
eaabeef2 1786#endif
d9bce9d9 1787
725bcec2
AJ
1788/* prtyw: PowerPC 2.05 specification */
1789static void gen_prtyw(DisasContext *ctx)
1790{
1791 TCGv ra = cpu_gpr[rA(ctx->opcode)];
1792 TCGv rs = cpu_gpr[rS(ctx->opcode)];
1793 TCGv t0 = tcg_temp_new();
1794 tcg_gen_shri_tl(t0, rs, 16);
1795 tcg_gen_xor_tl(ra, rs, t0);
1796 tcg_gen_shri_tl(t0, ra, 8);
1797 tcg_gen_xor_tl(ra, ra, t0);
1798 tcg_gen_andi_tl(ra, ra, (target_ulong)0x100000001ULL);
1799 tcg_temp_free(t0);
1800}
1801
1802#if defined(TARGET_PPC64)
1803/* prtyd: PowerPC 2.05 specification */
1804static void gen_prtyd(DisasContext *ctx)
1805{
1806 TCGv ra = cpu_gpr[rA(ctx->opcode)];
1807 TCGv rs = cpu_gpr[rS(ctx->opcode)];
1808 TCGv t0 = tcg_temp_new();
1809 tcg_gen_shri_tl(t0, rs, 32);
1810 tcg_gen_xor_tl(ra, rs, t0);
1811 tcg_gen_shri_tl(t0, ra, 16);
1812 tcg_gen_xor_tl(ra, ra, t0);
1813 tcg_gen_shri_tl(t0, ra, 8);
1814 tcg_gen_xor_tl(ra, ra, t0);
1815 tcg_gen_andi_tl(ra, ra, 1);
1816 tcg_temp_free(t0);
1817}
1818#endif
1819
86ba37ed
TM
1820#if defined(TARGET_PPC64)
1821/* bpermd */
1822static void gen_bpermd(DisasContext *ctx)
1823{
1824 gen_helper_bpermd(cpu_gpr[rA(ctx->opcode)],
1825 cpu_gpr[rS(ctx->opcode)], cpu_gpr[rB(ctx->opcode)]);
1826}
1827#endif
1828
d9bce9d9
JM
1829#if defined(TARGET_PPC64)
1830/* extsw & extsw. */
26d67362 1831GEN_LOGICAL1(extsw, tcg_gen_ext32s_tl, 0x1E, PPC_64B);
99e300ef 1832
54623277 1833/* cntlzd */
99e300ef 1834static void gen_cntlzd(DisasContext *ctx)
26d67362 1835{
9b8514e5 1836 tcg_gen_clzi_i64(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)], 64);
26d67362
AJ
1837 if (unlikely(Rc(ctx->opcode) != 0))
1838 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
1839}
e91d95b2
SD
1840
1841/* cnttzd */
1842static void gen_cnttzd(DisasContext *ctx)
1843{
9b8514e5 1844 tcg_gen_ctzi_i64(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)], 64);
e91d95b2
SD
1845 if (unlikely(Rc(ctx->opcode) != 0)) {
1846 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
1847 }
1848}
fec5c62a
RB
1849
1850/* darn */
1851static void gen_darn(DisasContext *ctx)
1852{
1853 int l = L(ctx->opcode);
1854
1855 if (l == 0) {
1856 gen_helper_darn32(cpu_gpr[rD(ctx->opcode)]);
1857 } else if (l <= 2) {
1858 /* Return 64-bit random for both CRN and RRN */
1859 gen_helper_darn64(cpu_gpr[rD(ctx->opcode)]);
1860 } else {
1861 tcg_gen_movi_i64(cpu_gpr[rD(ctx->opcode)], -1);
1862 }
1863}
d9bce9d9
JM
1864#endif
1865
79aceca5 1866/*** Integer rotate ***/
99e300ef 1867
54623277 1868/* rlwimi & rlwimi. */
99e300ef 1869static void gen_rlwimi(DisasContext *ctx)
79aceca5 1870{
63ae0915
RH
1871 TCGv t_ra = cpu_gpr[rA(ctx->opcode)];
1872 TCGv t_rs = cpu_gpr[rS(ctx->opcode)];
1873 uint32_t sh = SH(ctx->opcode);
1874 uint32_t mb = MB(ctx->opcode);
1875 uint32_t me = ME(ctx->opcode);
1876
1877 if (sh == (31-me) && mb <= me) {
1878 tcg_gen_deposit_tl(t_ra, t_ra, t_rs, sh, me - mb + 1);
d03ef511 1879 } else {
d03ef511 1880 target_ulong mask;
a7812ae4 1881 TCGv t1;
63ae0915 1882
76a66253 1883#if defined(TARGET_PPC64)
d03ef511
AJ
1884 mb += 32;
1885 me += 32;
76a66253 1886#endif
d03ef511 1887 mask = MASK(mb, me);
63ae0915 1888
a7812ae4 1889 t1 = tcg_temp_new();
2e11b15d
RH
1890 if (mask <= 0xffffffffu) {
1891 TCGv_i32 t0 = tcg_temp_new_i32();
1892 tcg_gen_trunc_tl_i32(t0, t_rs);
1893 tcg_gen_rotli_i32(t0, t0, sh);
1894 tcg_gen_extu_i32_tl(t1, t0);
1895 tcg_temp_free_i32(t0);
1896 } else {
1897#if defined(TARGET_PPC64)
1898 tcg_gen_deposit_i64(t1, t_rs, t_rs, 32, 32);
1899 tcg_gen_rotli_i64(t1, t1, sh);
1900#else
1901 g_assert_not_reached();
1902#endif
1903 }
63ae0915
RH
1904
1905 tcg_gen_andi_tl(t1, t1, mask);
1906 tcg_gen_andi_tl(t_ra, t_ra, ~mask);
1907 tcg_gen_or_tl(t_ra, t_ra, t1);
d03ef511
AJ
1908 tcg_temp_free(t1);
1909 }
63ae0915
RH
1910 if (unlikely(Rc(ctx->opcode) != 0)) {
1911 gen_set_Rc0(ctx, t_ra);
1912 }
79aceca5 1913}
99e300ef 1914
54623277 1915/* rlwinm & rlwinm. */
99e300ef 1916static void gen_rlwinm(DisasContext *ctx)
79aceca5 1917{
63ae0915
RH
1918 TCGv t_ra = cpu_gpr[rA(ctx->opcode)];
1919 TCGv t_rs = cpu_gpr[rS(ctx->opcode)];
7b4d326f
RH
1920 int sh = SH(ctx->opcode);
1921 int mb = MB(ctx->opcode);
1922 int me = ME(ctx->opcode);
1923 int len = me - mb + 1;
1924 int rsh = (32 - sh) & 31;
1925
1926 if (sh != 0 && len > 0 && me == (31 - sh)) {
1927 tcg_gen_deposit_z_tl(t_ra, t_rs, sh, len);
1928 } else if (me == 31 && rsh + len <= 32) {
1929 tcg_gen_extract_tl(t_ra, t_rs, rsh, len);
d03ef511 1930 } else {
2e11b15d 1931 target_ulong mask;
76a66253 1932#if defined(TARGET_PPC64)
d03ef511
AJ
1933 mb += 32;
1934 me += 32;
76a66253 1935#endif
2e11b15d 1936 mask = MASK(mb, me);
7b4d326f
RH
1937 if (sh == 0) {
1938 tcg_gen_andi_tl(t_ra, t_rs, mask);
1939 } else if (mask <= 0xffffffffu) {
63ae0915 1940 TCGv_i32 t0 = tcg_temp_new_i32();
63ae0915
RH
1941 tcg_gen_trunc_tl_i32(t0, t_rs);
1942 tcg_gen_rotli_i32(t0, t0, sh);
2e11b15d 1943 tcg_gen_andi_i32(t0, t0, mask);
63ae0915
RH
1944 tcg_gen_extu_i32_tl(t_ra, t0);
1945 tcg_temp_free_i32(t0);
2e11b15d
RH
1946 } else {
1947#if defined(TARGET_PPC64)
1948 tcg_gen_deposit_i64(t_ra, t_rs, t_rs, 32, 32);
1949 tcg_gen_rotli_i64(t_ra, t_ra, sh);
1950 tcg_gen_andi_i64(t_ra, t_ra, mask);
1951#else
1952 g_assert_not_reached();
1953#endif
63ae0915
RH
1954 }
1955 }
1956 if (unlikely(Rc(ctx->opcode) != 0)) {
1957 gen_set_Rc0(ctx, t_ra);
d03ef511 1958 }
79aceca5 1959}
99e300ef 1960
54623277 1961/* rlwnm & rlwnm. */
99e300ef 1962static void gen_rlwnm(DisasContext *ctx)
79aceca5 1963{
63ae0915
RH
1964 TCGv t_ra = cpu_gpr[rA(ctx->opcode)];
1965 TCGv t_rs = cpu_gpr[rS(ctx->opcode)];
1966 TCGv t_rb = cpu_gpr[rB(ctx->opcode)];
1967 uint32_t mb = MB(ctx->opcode);
1968 uint32_t me = ME(ctx->opcode);
2e11b15d 1969 target_ulong mask;
57fca134 1970
54843a58 1971#if defined(TARGET_PPC64)
63ae0915
RH
1972 mb += 32;
1973 me += 32;
54843a58 1974#endif
2e11b15d
RH
1975 mask = MASK(mb, me);
1976
1977 if (mask <= 0xffffffffu) {
1978 TCGv_i32 t0 = tcg_temp_new_i32();
1979 TCGv_i32 t1 = tcg_temp_new_i32();
1980 tcg_gen_trunc_tl_i32(t0, t_rb);
1981 tcg_gen_trunc_tl_i32(t1, t_rs);
1982 tcg_gen_andi_i32(t0, t0, 0x1f);
1983 tcg_gen_rotl_i32(t1, t1, t0);
1984 tcg_gen_extu_i32_tl(t_ra, t1);
1985 tcg_temp_free_i32(t0);
1986 tcg_temp_free_i32(t1);
1987 } else {
1988#if defined(TARGET_PPC64)
1989 TCGv_i64 t0 = tcg_temp_new_i64();
1990 tcg_gen_andi_i64(t0, t_rb, 0x1f);
1991 tcg_gen_deposit_i64(t_ra, t_rs, t_rs, 32, 32);
1992 tcg_gen_rotl_i64(t_ra, t_ra, t0);
1993 tcg_temp_free_i64(t0);
1994#else
1995 g_assert_not_reached();
1996#endif
1997 }
57fca134 1998
2e11b15d 1999 tcg_gen_andi_tl(t_ra, t_ra, mask);
63ae0915
RH
2000
2001 if (unlikely(Rc(ctx->opcode) != 0)) {
2002 gen_set_Rc0(ctx, t_ra);
79aceca5 2003 }
79aceca5
FB
2004}
2005
d9bce9d9
JM
2006#if defined(TARGET_PPC64)
2007#define GEN_PPC64_R2(name, opc1, opc2) \
e8eaa2c0 2008static void glue(gen_, name##0)(DisasContext *ctx) \
d9bce9d9
JM
2009{ \
2010 gen_##name(ctx, 0); \
2011} \
e8eaa2c0
BS
2012 \
2013static void glue(gen_, name##1)(DisasContext *ctx) \
d9bce9d9
JM
2014{ \
2015 gen_##name(ctx, 1); \
2016}
2017#define GEN_PPC64_R4(name, opc1, opc2) \
e8eaa2c0 2018static void glue(gen_, name##0)(DisasContext *ctx) \
d9bce9d9
JM
2019{ \
2020 gen_##name(ctx, 0, 0); \
2021} \
e8eaa2c0
BS
2022 \
2023static void glue(gen_, name##1)(DisasContext *ctx) \
d9bce9d9
JM
2024{ \
2025 gen_##name(ctx, 0, 1); \
2026} \
e8eaa2c0
BS
2027 \
2028static void glue(gen_, name##2)(DisasContext *ctx) \
d9bce9d9
JM
2029{ \
2030 gen_##name(ctx, 1, 0); \
2031} \
e8eaa2c0
BS
2032 \
2033static void glue(gen_, name##3)(DisasContext *ctx) \
d9bce9d9
JM
2034{ \
2035 gen_##name(ctx, 1, 1); \
2036}
51789c41 2037
a7b2c8b9 2038static void gen_rldinm(DisasContext *ctx, int mb, int me, int sh)
51789c41 2039{
a7b2c8b9
RH
2040 TCGv t_ra = cpu_gpr[rA(ctx->opcode)];
2041 TCGv t_rs = cpu_gpr[rS(ctx->opcode)];
7b4d326f
RH
2042 int len = me - mb + 1;
2043 int rsh = (64 - sh) & 63;
a7b2c8b9 2044
7b4d326f
RH
2045 if (sh != 0 && len > 0 && me == (63 - sh)) {
2046 tcg_gen_deposit_z_tl(t_ra, t_rs, sh, len);
2047 } else if (me == 63 && rsh + len <= 64) {
2048 tcg_gen_extract_tl(t_ra, t_rs, rsh, len);
d03ef511 2049 } else {
a7b2c8b9
RH
2050 tcg_gen_rotli_tl(t_ra, t_rs, sh);
2051 tcg_gen_andi_tl(t_ra, t_ra, MASK(mb, me));
2052 }
2053 if (unlikely(Rc(ctx->opcode) != 0)) {
2054 gen_set_Rc0(ctx, t_ra);
51789c41 2055 }
51789c41 2056}
a7b2c8b9 2057
d9bce9d9 2058/* rldicl - rldicl. */
636aa200 2059static inline void gen_rldicl(DisasContext *ctx, int mbn, int shn)
d9bce9d9 2060{
51789c41 2061 uint32_t sh, mb;
d9bce9d9 2062
9d53c753
JM
2063 sh = SH(ctx->opcode) | (shn << 5);
2064 mb = MB(ctx->opcode) | (mbn << 5);
51789c41 2065 gen_rldinm(ctx, mb, 63, sh);
d9bce9d9 2066}
51789c41 2067GEN_PPC64_R4(rldicl, 0x1E, 0x00);
a7b2c8b9 2068
d9bce9d9 2069/* rldicr - rldicr. */
636aa200 2070static inline void gen_rldicr(DisasContext *ctx, int men, int shn)
d9bce9d9 2071{
51789c41 2072 uint32_t sh, me;
d9bce9d9 2073
9d53c753
JM
2074 sh = SH(ctx->opcode) | (shn << 5);
2075 me = MB(ctx->opcode) | (men << 5);
51789c41 2076 gen_rldinm(ctx, 0, me, sh);
d9bce9d9 2077}
51789c41 2078GEN_PPC64_R4(rldicr, 0x1E, 0x02);
a7b2c8b9 2079
d9bce9d9 2080/* rldic - rldic. */
636aa200 2081static inline void gen_rldic(DisasContext *ctx, int mbn, int shn)
d9bce9d9 2082{
51789c41 2083 uint32_t sh, mb;
d9bce9d9 2084
9d53c753
JM
2085 sh = SH(ctx->opcode) | (shn << 5);
2086 mb = MB(ctx->opcode) | (mbn << 5);
51789c41
JM
2087 gen_rldinm(ctx, mb, 63 - sh, sh);
2088}
2089GEN_PPC64_R4(rldic, 0x1E, 0x04);
2090
a7b2c8b9 2091static void gen_rldnm(DisasContext *ctx, int mb, int me)
51789c41 2092{
a7b2c8b9
RH
2093 TCGv t_ra = cpu_gpr[rA(ctx->opcode)];
2094 TCGv t_rs = cpu_gpr[rS(ctx->opcode)];
2095 TCGv t_rb = cpu_gpr[rB(ctx->opcode)];
54843a58 2096 TCGv t0;
d03ef511 2097
a7812ae4 2098 t0 = tcg_temp_new();
a7b2c8b9
RH
2099 tcg_gen_andi_tl(t0, t_rb, 0x3f);
2100 tcg_gen_rotl_tl(t_ra, t_rs, t0);
54843a58 2101 tcg_temp_free(t0);
a7b2c8b9
RH
2102
2103 tcg_gen_andi_tl(t_ra, t_ra, MASK(mb, me));
2104 if (unlikely(Rc(ctx->opcode) != 0)) {
2105 gen_set_Rc0(ctx, t_ra);
2106 }
d9bce9d9 2107}
51789c41 2108
d9bce9d9 2109/* rldcl - rldcl. */
636aa200 2110static inline void gen_rldcl(DisasContext *ctx, int mbn)
d9bce9d9 2111{
51789c41 2112 uint32_t mb;
d9bce9d9 2113
9d53c753 2114 mb = MB(ctx->opcode) | (mbn << 5);
51789c41 2115 gen_rldnm(ctx, mb, 63);
d9bce9d9 2116}
36081602 2117GEN_PPC64_R2(rldcl, 0x1E, 0x08);
a7b2c8b9 2118
d9bce9d9 2119/* rldcr - rldcr. */
636aa200 2120static inline void gen_rldcr(DisasContext *ctx, int men)
d9bce9d9 2121{
51789c41 2122 uint32_t me;
d9bce9d9 2123
9d53c753 2124 me = MB(ctx->opcode) | (men << 5);
51789c41 2125 gen_rldnm(ctx, 0, me);
d9bce9d9 2126}
36081602 2127GEN_PPC64_R2(rldcr, 0x1E, 0x09);
a7b2c8b9 2128
d9bce9d9 2129/* rldimi - rldimi. */
a7b2c8b9 2130static void gen_rldimi(DisasContext *ctx, int mbn, int shn)
d9bce9d9 2131{
a7b2c8b9
RH
2132 TCGv t_ra = cpu_gpr[rA(ctx->opcode)];
2133 TCGv t_rs = cpu_gpr[rS(ctx->opcode)];
2134 uint32_t sh = SH(ctx->opcode) | (shn << 5);
2135 uint32_t mb = MB(ctx->opcode) | (mbn << 5);
2136 uint32_t me = 63 - sh;
d9bce9d9 2137
a7b2c8b9
RH
2138 if (mb <= me) {
2139 tcg_gen_deposit_tl(t_ra, t_ra, t_rs, sh, me - mb + 1);
d03ef511 2140 } else {
a7b2c8b9
RH
2141 target_ulong mask = MASK(mb, me);
2142 TCGv t1 = tcg_temp_new();
d03ef511 2143
a7b2c8b9
RH
2144 tcg_gen_rotli_tl(t1, t_rs, sh);
2145 tcg_gen_andi_tl(t1, t1, mask);
2146 tcg_gen_andi_tl(t_ra, t_ra, ~mask);
2147 tcg_gen_or_tl(t_ra, t_ra, t1);
d03ef511 2148 tcg_temp_free(t1);
51789c41 2149 }
a7b2c8b9
RH
2150 if (unlikely(Rc(ctx->opcode) != 0)) {
2151 gen_set_Rc0(ctx, t_ra);
2152 }
d9bce9d9 2153}
36081602 2154GEN_PPC64_R4(rldimi, 0x1E, 0x06);
d9bce9d9
JM
2155#endif
2156
79aceca5 2157/*** Integer shift ***/
99e300ef 2158
54623277 2159/* slw & slw. */
99e300ef 2160static void gen_slw(DisasContext *ctx)
26d67362 2161{
7fd6bf7d 2162 TCGv t0, t1;
26d67362 2163
7fd6bf7d
AJ
2164 t0 = tcg_temp_new();
2165 /* AND rS with a mask that is 0 when rB >= 0x20 */
2166#if defined(TARGET_PPC64)
2167 tcg_gen_shli_tl(t0, cpu_gpr[rB(ctx->opcode)], 0x3a);
2168 tcg_gen_sari_tl(t0, t0, 0x3f);
2169#else
2170 tcg_gen_shli_tl(t0, cpu_gpr[rB(ctx->opcode)], 0x1a);
2171 tcg_gen_sari_tl(t0, t0, 0x1f);
2172#endif
2173 tcg_gen_andc_tl(t0, cpu_gpr[rS(ctx->opcode)], t0);
2174 t1 = tcg_temp_new();
2175 tcg_gen_andi_tl(t1, cpu_gpr[rB(ctx->opcode)], 0x1f);
2176 tcg_gen_shl_tl(cpu_gpr[rA(ctx->opcode)], t0, t1);
2177 tcg_temp_free(t1);
fea0c503 2178 tcg_temp_free(t0);
7fd6bf7d 2179 tcg_gen_ext32u_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
26d67362
AJ
2180 if (unlikely(Rc(ctx->opcode) != 0))
2181 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
2182}
99e300ef 2183
54623277 2184/* sraw & sraw. */
99e300ef 2185static void gen_sraw(DisasContext *ctx)
26d67362 2186{
d15f74fb 2187 gen_helper_sraw(cpu_gpr[rA(ctx->opcode)], cpu_env,
a7812ae4 2188 cpu_gpr[rS(ctx->opcode)], cpu_gpr[rB(ctx->opcode)]);
26d67362
AJ
2189 if (unlikely(Rc(ctx->opcode) != 0))
2190 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
2191}
99e300ef 2192
54623277 2193/* srawi & srawi. */
99e300ef 2194static void gen_srawi(DisasContext *ctx)
79aceca5 2195{
26d67362 2196 int sh = SH(ctx->opcode);
ba4af3e4
RH
2197 TCGv dst = cpu_gpr[rA(ctx->opcode)];
2198 TCGv src = cpu_gpr[rS(ctx->opcode)];
2199 if (sh == 0) {
34a0fad1 2200 tcg_gen_ext32s_tl(dst, src);
da91a00f 2201 tcg_gen_movi_tl(cpu_ca, 0);
af1c259f
SD
2202 if (is_isa300(ctx)) {
2203 tcg_gen_movi_tl(cpu_ca32, 0);
2204 }
26d67362 2205 } else {
ba4af3e4
RH
2206 TCGv t0;
2207 tcg_gen_ext32s_tl(dst, src);
2208 tcg_gen_andi_tl(cpu_ca, dst, (1ULL << sh) - 1);
2209 t0 = tcg_temp_new();
2210 tcg_gen_sari_tl(t0, dst, TARGET_LONG_BITS - 1);
2211 tcg_gen_and_tl(cpu_ca, cpu_ca, t0);
2212 tcg_temp_free(t0);
2213 tcg_gen_setcondi_tl(TCG_COND_NE, cpu_ca, cpu_ca, 0);
af1c259f
SD
2214 if (is_isa300(ctx)) {
2215 tcg_gen_mov_tl(cpu_ca32, cpu_ca);
2216 }
ba4af3e4
RH
2217 tcg_gen_sari_tl(dst, dst, sh);
2218 }
2219 if (unlikely(Rc(ctx->opcode) != 0)) {
2220 gen_set_Rc0(ctx, dst);
d9bce9d9 2221 }
79aceca5 2222}
99e300ef 2223
54623277 2224/* srw & srw. */
99e300ef 2225static void gen_srw(DisasContext *ctx)
26d67362 2226{
fea0c503 2227 TCGv t0, t1;
d9bce9d9 2228
7fd6bf7d
AJ
2229 t0 = tcg_temp_new();
2230 /* AND rS with a mask that is 0 when rB >= 0x20 */
2231#if defined(TARGET_PPC64)
2232 tcg_gen_shli_tl(t0, cpu_gpr[rB(ctx->opcode)], 0x3a);
2233 tcg_gen_sari_tl(t0, t0, 0x3f);
2234#else
2235 tcg_gen_shli_tl(t0, cpu_gpr[rB(ctx->opcode)], 0x1a);
2236 tcg_gen_sari_tl(t0, t0, 0x1f);
2237#endif
2238 tcg_gen_andc_tl(t0, cpu_gpr[rS(ctx->opcode)], t0);
2239 tcg_gen_ext32u_tl(t0, t0);
a7812ae4 2240 t1 = tcg_temp_new();
7fd6bf7d
AJ
2241 tcg_gen_andi_tl(t1, cpu_gpr[rB(ctx->opcode)], 0x1f);
2242 tcg_gen_shr_tl(cpu_gpr[rA(ctx->opcode)], t0, t1);
fea0c503 2243 tcg_temp_free(t1);
fea0c503 2244 tcg_temp_free(t0);
26d67362
AJ
2245 if (unlikely(Rc(ctx->opcode) != 0))
2246 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
2247}
54623277 2248
d9bce9d9
JM
2249#if defined(TARGET_PPC64)
2250/* sld & sld. */
99e300ef 2251static void gen_sld(DisasContext *ctx)
26d67362 2252{
7fd6bf7d 2253 TCGv t0, t1;
26d67362 2254
7fd6bf7d
AJ
2255 t0 = tcg_temp_new();
2256 /* AND rS with a mask that is 0 when rB >= 0x40 */
2257 tcg_gen_shli_tl(t0, cpu_gpr[rB(ctx->opcode)], 0x39);
2258 tcg_gen_sari_tl(t0, t0, 0x3f);
2259 tcg_gen_andc_tl(t0, cpu_gpr[rS(ctx->opcode)], t0);
2260 t1 = tcg_temp_new();
2261 tcg_gen_andi_tl(t1, cpu_gpr[rB(ctx->opcode)], 0x3f);
2262 tcg_gen_shl_tl(cpu_gpr[rA(ctx->opcode)], t0, t1);
2263 tcg_temp_free(t1);
fea0c503 2264 tcg_temp_free(t0);
26d67362
AJ
2265 if (unlikely(Rc(ctx->opcode) != 0))
2266 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
2267}
99e300ef 2268
54623277 2269/* srad & srad. */
99e300ef 2270static void gen_srad(DisasContext *ctx)
26d67362 2271{
d15f74fb 2272 gen_helper_srad(cpu_gpr[rA(ctx->opcode)], cpu_env,
a7812ae4 2273 cpu_gpr[rS(ctx->opcode)], cpu_gpr[rB(ctx->opcode)]);
26d67362
AJ
2274 if (unlikely(Rc(ctx->opcode) != 0))
2275 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
2276}
d9bce9d9 2277/* sradi & sradi. */
636aa200 2278static inline void gen_sradi(DisasContext *ctx, int n)
d9bce9d9 2279{
26d67362 2280 int sh = SH(ctx->opcode) + (n << 5);
ba4af3e4
RH
2281 TCGv dst = cpu_gpr[rA(ctx->opcode)];
2282 TCGv src = cpu_gpr[rS(ctx->opcode)];
2283 if (sh == 0) {
2284 tcg_gen_mov_tl(dst, src);
da91a00f 2285 tcg_gen_movi_tl(cpu_ca, 0);
af1c259f
SD
2286 if (is_isa300(ctx)) {
2287 tcg_gen_movi_tl(cpu_ca32, 0);
2288 }
26d67362 2289 } else {
ba4af3e4
RH
2290 TCGv t0;
2291 tcg_gen_andi_tl(cpu_ca, src, (1ULL << sh) - 1);
2292 t0 = tcg_temp_new();
2293 tcg_gen_sari_tl(t0, src, TARGET_LONG_BITS - 1);
2294 tcg_gen_and_tl(cpu_ca, cpu_ca, t0);
2295 tcg_temp_free(t0);
2296 tcg_gen_setcondi_tl(TCG_COND_NE, cpu_ca, cpu_ca, 0);
af1c259f
SD
2297 if (is_isa300(ctx)) {
2298 tcg_gen_mov_tl(cpu_ca32, cpu_ca);
2299 }
ba4af3e4
RH
2300 tcg_gen_sari_tl(dst, src, sh);
2301 }
2302 if (unlikely(Rc(ctx->opcode) != 0)) {
2303 gen_set_Rc0(ctx, dst);
d9bce9d9 2304 }
d9bce9d9 2305}
e8eaa2c0
BS
2306
2307static void gen_sradi0(DisasContext *ctx)
d9bce9d9
JM
2308{
2309 gen_sradi(ctx, 0);
2310}
e8eaa2c0
BS
2311
2312static void gen_sradi1(DisasContext *ctx)
d9bce9d9
JM
2313{
2314 gen_sradi(ctx, 1);
2315}
99e300ef 2316
787bbe37
ND
2317/* extswsli & extswsli. */
2318static inline void gen_extswsli(DisasContext *ctx, int n)
2319{
2320 int sh = SH(ctx->opcode) + (n << 5);
2321 TCGv dst = cpu_gpr[rA(ctx->opcode)];
2322 TCGv src = cpu_gpr[rS(ctx->opcode)];
2323
2324 tcg_gen_ext32s_tl(dst, src);
2325 tcg_gen_shli_tl(dst, dst, sh);
2326 if (unlikely(Rc(ctx->opcode) != 0)) {
2327 gen_set_Rc0(ctx, dst);
2328 }
2329}
2330
2331static void gen_extswsli0(DisasContext *ctx)
2332{
2333 gen_extswsli(ctx, 0);
2334}
2335
2336static void gen_extswsli1(DisasContext *ctx)
2337{
2338 gen_extswsli(ctx, 1);
2339}
2340
54623277 2341/* srd & srd. */
99e300ef 2342static void gen_srd(DisasContext *ctx)
26d67362 2343{
7fd6bf7d 2344 TCGv t0, t1;
26d67362 2345
7fd6bf7d
AJ
2346 t0 = tcg_temp_new();
2347 /* AND rS with a mask that is 0 when rB >= 0x40 */
2348 tcg_gen_shli_tl(t0, cpu_gpr[rB(ctx->opcode)], 0x39);
2349 tcg_gen_sari_tl(t0, t0, 0x3f);
2350 tcg_gen_andc_tl(t0, cpu_gpr[rS(ctx->opcode)], t0);
2351 t1 = tcg_temp_new();
2352 tcg_gen_andi_tl(t1, cpu_gpr[rB(ctx->opcode)], 0x3f);
2353 tcg_gen_shr_tl(cpu_gpr[rA(ctx->opcode)], t0, t1);
2354 tcg_temp_free(t1);
fea0c503 2355 tcg_temp_free(t0);
26d67362
AJ
2356 if (unlikely(Rc(ctx->opcode) != 0))
2357 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
2358}
d9bce9d9 2359#endif
79aceca5 2360
76a66253
JM
2361/*** Addressing modes ***/
2362/* Register indirect with immediate index : EA = (rA|0) + SIMM */
636aa200
BS
2363static inline void gen_addr_imm_index(DisasContext *ctx, TCGv EA,
2364 target_long maskl)
76a66253
JM
2365{
2366 target_long simm = SIMM(ctx->opcode);
2367
be147d08 2368 simm &= ~maskl;
76db3ba4 2369 if (rA(ctx->opcode) == 0) {
c791fe84
RH
2370 if (NARROW_MODE(ctx)) {
2371 simm = (uint32_t)simm;
2372 }
e2be8d8d 2373 tcg_gen_movi_tl(EA, simm);
76db3ba4 2374 } else if (likely(simm != 0)) {
e2be8d8d 2375 tcg_gen_addi_tl(EA, cpu_gpr[rA(ctx->opcode)], simm);
c791fe84 2376 if (NARROW_MODE(ctx)) {
76db3ba4
AJ
2377 tcg_gen_ext32u_tl(EA, EA);
2378 }
76db3ba4 2379 } else {
c791fe84 2380 if (NARROW_MODE(ctx)) {
76db3ba4 2381 tcg_gen_ext32u_tl(EA, cpu_gpr[rA(ctx->opcode)]);
c791fe84
RH
2382 } else {
2383 tcg_gen_mov_tl(EA, cpu_gpr[rA(ctx->opcode)]);
2384 }
76db3ba4 2385 }
76a66253
JM
2386}
2387
636aa200 2388static inline void gen_addr_reg_index(DisasContext *ctx, TCGv EA)
76a66253 2389{
76db3ba4 2390 if (rA(ctx->opcode) == 0) {
c791fe84 2391 if (NARROW_MODE(ctx)) {
76db3ba4 2392 tcg_gen_ext32u_tl(EA, cpu_gpr[rB(ctx->opcode)]);
c791fe84
RH
2393 } else {
2394 tcg_gen_mov_tl(EA, cpu_gpr[rB(ctx->opcode)]);
2395 }
76db3ba4 2396 } else {
e2be8d8d 2397 tcg_gen_add_tl(EA, cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)]);
c791fe84 2398 if (NARROW_MODE(ctx)) {
76db3ba4
AJ
2399 tcg_gen_ext32u_tl(EA, EA);
2400 }
76db3ba4 2401 }
76a66253
JM
2402}
2403
636aa200 2404static inline void gen_addr_register(DisasContext *ctx, TCGv EA)
76a66253 2405{
76db3ba4 2406 if (rA(ctx->opcode) == 0) {
e2be8d8d 2407 tcg_gen_movi_tl(EA, 0);
c791fe84
RH
2408 } else if (NARROW_MODE(ctx)) {
2409 tcg_gen_ext32u_tl(EA, cpu_gpr[rA(ctx->opcode)]);
76db3ba4 2410 } else {
c791fe84 2411 tcg_gen_mov_tl(EA, cpu_gpr[rA(ctx->opcode)]);
76db3ba4
AJ
2412 }
2413}
2414
636aa200
BS
2415static inline void gen_addr_add(DisasContext *ctx, TCGv ret, TCGv arg1,
2416 target_long val)
76db3ba4
AJ
2417{
2418 tcg_gen_addi_tl(ret, arg1, val);
c791fe84 2419 if (NARROW_MODE(ctx)) {
76db3ba4
AJ
2420 tcg_gen_ext32u_tl(ret, ret);
2421 }
76a66253
JM
2422}
2423
65f2475f
BH
2424static inline void gen_align_no_le(DisasContext *ctx)
2425{
2426 gen_exception_err(ctx, POWERPC_EXCP_ALIGN,
2427 (ctx->opcode & 0x03FF0000) | POWERPC_EXCP_ALIGN_LE);
2428}
2429
7863667f 2430/*** Integer load ***/
09bfe50d 2431#define DEF_MEMOP(op) ((op) | ctx->default_tcg_memop_mask)
ff5f3981 2432#define BSWAP_MEMOP(op) ((op) | (ctx->default_tcg_memop_mask ^ MO_BSWAP))
b61f2753 2433
09bfe50d
ND
2434#define GEN_QEMU_LOAD_TL(ldop, op) \
2435static void glue(gen_qemu_, ldop)(DisasContext *ctx, \
2436 TCGv val, \
2437 TCGv addr) \
2438{ \
2439 tcg_gen_qemu_ld_tl(val, addr, ctx->mem_idx, op); \
b61f2753
AJ
2440}
2441
09bfe50d
ND
2442GEN_QEMU_LOAD_TL(ld8u, DEF_MEMOP(MO_UB))
2443GEN_QEMU_LOAD_TL(ld16u, DEF_MEMOP(MO_UW))
2444GEN_QEMU_LOAD_TL(ld16s, DEF_MEMOP(MO_SW))
2445GEN_QEMU_LOAD_TL(ld32u, DEF_MEMOP(MO_UL))
2446GEN_QEMU_LOAD_TL(ld32s, DEF_MEMOP(MO_SL))
f976b09e 2447
ff5f3981
ND
2448GEN_QEMU_LOAD_TL(ld16ur, BSWAP_MEMOP(MO_UW))
2449GEN_QEMU_LOAD_TL(ld32ur, BSWAP_MEMOP(MO_UL))
2450
09bfe50d
ND
2451#define GEN_QEMU_LOAD_64(ldop, op) \
2452static void glue(gen_qemu_, glue(ldop, _i64))(DisasContext *ctx, \
2453 TCGv_i64 val, \
2454 TCGv addr) \
2455{ \
2456 tcg_gen_qemu_ld_i64(val, addr, ctx->mem_idx, op); \
b61f2753
AJ
2457}
2458
740ae9a2
ND
2459GEN_QEMU_LOAD_64(ld8u, DEF_MEMOP(MO_UB))
2460GEN_QEMU_LOAD_64(ld16u, DEF_MEMOP(MO_UW))
09bfe50d
ND
2461GEN_QEMU_LOAD_64(ld32u, DEF_MEMOP(MO_UL))
2462GEN_QEMU_LOAD_64(ld32s, DEF_MEMOP(MO_SL))
4f364fe7 2463GEN_QEMU_LOAD_64(ld64, DEF_MEMOP(MO_Q))
b61f2753 2464
ff5f3981
ND
2465#if defined(TARGET_PPC64)
2466GEN_QEMU_LOAD_64(ld64ur, BSWAP_MEMOP(MO_Q))
2467#endif
2468
761a89c6
ND
2469#define GEN_QEMU_STORE_TL(stop, op) \
2470static void glue(gen_qemu_, stop)(DisasContext *ctx, \
2471 TCGv val, \
2472 TCGv addr) \
2473{ \
2474 tcg_gen_qemu_st_tl(val, addr, ctx->mem_idx, op); \
b61f2753
AJ
2475}
2476
761a89c6
ND
2477GEN_QEMU_STORE_TL(st8, DEF_MEMOP(MO_UB))
2478GEN_QEMU_STORE_TL(st16, DEF_MEMOP(MO_UW))
2479GEN_QEMU_STORE_TL(st32, DEF_MEMOP(MO_UL))
b61f2753 2480
804108aa
ND
2481GEN_QEMU_STORE_TL(st16r, BSWAP_MEMOP(MO_UW))
2482GEN_QEMU_STORE_TL(st32r, BSWAP_MEMOP(MO_UL))
2483
761a89c6
ND
2484#define GEN_QEMU_STORE_64(stop, op) \
2485static void glue(gen_qemu_, glue(stop, _i64))(DisasContext *ctx, \
2486 TCGv_i64 val, \
2487 TCGv addr) \
2488{ \
2489 tcg_gen_qemu_st_i64(val, addr, ctx->mem_idx, op); \
b61f2753
AJ
2490}
2491
ddb9ac50
ND
2492GEN_QEMU_STORE_64(st8, DEF_MEMOP(MO_UB))
2493GEN_QEMU_STORE_64(st16, DEF_MEMOP(MO_UW))
761a89c6 2494GEN_QEMU_STORE_64(st32, DEF_MEMOP(MO_UL))
2468f23d 2495GEN_QEMU_STORE_64(st64, DEF_MEMOP(MO_Q))
b61f2753 2496
804108aa
ND
2497#if defined(TARGET_PPC64)
2498GEN_QEMU_STORE_64(st64r, BSWAP_MEMOP(MO_Q))
2499#endif
2500
0c8aacd4 2501#define GEN_LD(name, ldop, opc, type) \
99e300ef 2502static void glue(gen_, name)(DisasContext *ctx) \
79aceca5 2503{ \
76db3ba4
AJ
2504 TCGv EA; \
2505 gen_set_access_type(ctx, ACCESS_INT); \
2506 EA = tcg_temp_new(); \
2507 gen_addr_imm_index(ctx, EA, 0); \
2508 gen_qemu_##ldop(ctx, cpu_gpr[rD(ctx->opcode)], EA); \
b61f2753 2509 tcg_temp_free(EA); \
79aceca5
FB
2510}
2511
0c8aacd4 2512#define GEN_LDU(name, ldop, opc, type) \
99e300ef 2513static void glue(gen_, name##u)(DisasContext *ctx) \
79aceca5 2514{ \
b61f2753 2515 TCGv EA; \
76a66253
JM
2516 if (unlikely(rA(ctx->opcode) == 0 || \
2517 rA(ctx->opcode) == rD(ctx->opcode))) { \
e06fcd75 2518 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL); \
9fddaa0c 2519 return; \
9a64fbe4 2520 } \
76db3ba4 2521 gen_set_access_type(ctx, ACCESS_INT); \
0c8aacd4 2522 EA = tcg_temp_new(); \
9d53c753 2523 if (type == PPC_64B) \
76db3ba4 2524 gen_addr_imm_index(ctx, EA, 0x03); \
9d53c753 2525 else \
76db3ba4
AJ
2526 gen_addr_imm_index(ctx, EA, 0); \
2527 gen_qemu_##ldop(ctx, cpu_gpr[rD(ctx->opcode)], EA); \
b61f2753
AJ
2528 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], EA); \
2529 tcg_temp_free(EA); \
79aceca5
FB
2530}
2531
0c8aacd4 2532#define GEN_LDUX(name, ldop, opc2, opc3, type) \
99e300ef 2533static void glue(gen_, name##ux)(DisasContext *ctx) \
79aceca5 2534{ \
b61f2753 2535 TCGv EA; \
76a66253
JM
2536 if (unlikely(rA(ctx->opcode) == 0 || \
2537 rA(ctx->opcode) == rD(ctx->opcode))) { \
e06fcd75 2538 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL); \
9fddaa0c 2539 return; \
9a64fbe4 2540 } \
76db3ba4 2541 gen_set_access_type(ctx, ACCESS_INT); \
0c8aacd4 2542 EA = tcg_temp_new(); \
76db3ba4
AJ
2543 gen_addr_reg_index(ctx, EA); \
2544 gen_qemu_##ldop(ctx, cpu_gpr[rD(ctx->opcode)], EA); \
b61f2753
AJ
2545 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], EA); \
2546 tcg_temp_free(EA); \
79aceca5
FB
2547}
2548
b7815375 2549#define GEN_LDX_E(name, ldop, opc2, opc3, type, type2, chk) \
99e300ef 2550static void glue(gen_, name##x)(DisasContext *ctx) \
79aceca5 2551{ \
76db3ba4 2552 TCGv EA; \
b7815375 2553 chk; \
76db3ba4
AJ
2554 gen_set_access_type(ctx, ACCESS_INT); \
2555 EA = tcg_temp_new(); \
2556 gen_addr_reg_index(ctx, EA); \
2557 gen_qemu_##ldop(ctx, cpu_gpr[rD(ctx->opcode)], EA); \
b61f2753 2558 tcg_temp_free(EA); \
79aceca5 2559}
b7815375 2560
cd6e9320 2561#define GEN_LDX(name, ldop, opc2, opc3, type) \
b7815375
BH
2562 GEN_LDX_E(name, ldop, opc2, opc3, type, PPC_NONE, CHK_NONE)
2563
2564#define GEN_LDX_HVRM(name, ldop, opc2, opc3, type) \
2565 GEN_LDX_E(name, ldop, opc2, opc3, type, PPC_NONE, CHK_HVRM)
79aceca5 2566
0c8aacd4
AJ
2567#define GEN_LDS(name, ldop, op, type) \
2568GEN_LD(name, ldop, op | 0x20, type); \
2569GEN_LDU(name, ldop, op | 0x21, type); \
2570GEN_LDUX(name, ldop, 0x17, op | 0x01, type); \
2571GEN_LDX(name, ldop, 0x17, op | 0x00, type)
79aceca5
FB
2572
2573/* lbz lbzu lbzux lbzx */
0c8aacd4 2574GEN_LDS(lbz, ld8u, 0x02, PPC_INTEGER);
79aceca5 2575/* lha lhau lhaux lhax */
0c8aacd4 2576GEN_LDS(lha, ld16s, 0x0A, PPC_INTEGER);
79aceca5 2577/* lhz lhzu lhzux lhzx */
0c8aacd4 2578GEN_LDS(lhz, ld16u, 0x08, PPC_INTEGER);
79aceca5 2579/* lwz lwzu lwzux lwzx */
0c8aacd4 2580GEN_LDS(lwz, ld32u, 0x00, PPC_INTEGER);
d9bce9d9 2581#if defined(TARGET_PPC64)
d9bce9d9 2582/* lwaux */
0c8aacd4 2583GEN_LDUX(lwa, ld32s, 0x15, 0x0B, PPC_64B);
d9bce9d9 2584/* lwax */
0c8aacd4 2585GEN_LDX(lwa, ld32s, 0x15, 0x0A, PPC_64B);
d9bce9d9 2586/* ldux */
4f364fe7 2587GEN_LDUX(ld, ld64_i64, 0x15, 0x01, PPC_64B);
d9bce9d9 2588/* ldx */
4f364fe7 2589GEN_LDX(ld, ld64_i64, 0x15, 0x00, PPC_64B);
99e300ef 2590
b7815375 2591/* CI load/store variants */
4f364fe7 2592GEN_LDX_HVRM(ldcix, ld64_i64, 0x15, 0x1b, PPC_CILDST)
b7815375
BH
2593GEN_LDX_HVRM(lwzcix, ld32u, 0x15, 0x15, PPC_CILDST)
2594GEN_LDX_HVRM(lhzcix, ld16u, 0x15, 0x19, PPC_CILDST)
2595GEN_LDX_HVRM(lbzcix, ld8u, 0x15, 0x1a, PPC_CILDST)
2596
99e300ef 2597static void gen_ld(DisasContext *ctx)
d9bce9d9 2598{
b61f2753 2599 TCGv EA;
d9bce9d9
JM
2600 if (Rc(ctx->opcode)) {
2601 if (unlikely(rA(ctx->opcode) == 0 ||
2602 rA(ctx->opcode) == rD(ctx->opcode))) {
e06fcd75 2603 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL);
d9bce9d9
JM
2604 return;
2605 }
2606 }
76db3ba4 2607 gen_set_access_type(ctx, ACCESS_INT);
a7812ae4 2608 EA = tcg_temp_new();
76db3ba4 2609 gen_addr_imm_index(ctx, EA, 0x03);
d9bce9d9
JM
2610 if (ctx->opcode & 0x02) {
2611 /* lwa (lwau is undefined) */
76db3ba4 2612 gen_qemu_ld32s(ctx, cpu_gpr[rD(ctx->opcode)], EA);
d9bce9d9
JM
2613 } else {
2614 /* ld - ldu */
4f364fe7 2615 gen_qemu_ld64_i64(ctx, cpu_gpr[rD(ctx->opcode)], EA);
d9bce9d9 2616 }
d9bce9d9 2617 if (Rc(ctx->opcode))
b61f2753
AJ
2618 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], EA);
2619 tcg_temp_free(EA);
d9bce9d9 2620}
99e300ef 2621
54623277 2622/* lq */
99e300ef 2623static void gen_lq(DisasContext *ctx)
be147d08 2624{
be147d08 2625 int ra, rd;
94bf2658 2626 TCGv EA, hi, lo;
be147d08 2627
e0498daa
TM
2628 /* lq is a legal user mode instruction starting in ISA 2.07 */
2629 bool legal_in_user_mode = (ctx->insns_flags2 & PPC2_LSQ_ISA207) != 0;
2630 bool le_is_supported = (ctx->insns_flags2 & PPC2_LSQ_ISA207) != 0;
2631
c47493f2 2632 if (!legal_in_user_mode && ctx->pr) {
9b2fadda 2633 gen_priv_exception(ctx, POWERPC_EXCP_PRIV_OPC);
be147d08
JM
2634 return;
2635 }
e0498daa
TM
2636
2637 if (!le_is_supported && ctx->le_mode) {
65f2475f 2638 gen_align_no_le(ctx);
e0498daa
TM
2639 return;
2640 }
be147d08
JM
2641 ra = rA(ctx->opcode);
2642 rd = rD(ctx->opcode);
2643 if (unlikely((rd & 1) || rd == ra)) {
e06fcd75 2644 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL);
be147d08
JM
2645 return;
2646 }
e0498daa 2647
76db3ba4 2648 gen_set_access_type(ctx, ACCESS_INT);
a7812ae4 2649 EA = tcg_temp_new();
76db3ba4 2650 gen_addr_imm_index(ctx, EA, 0x0F);
e0498daa 2651
94bf2658
RH
2652 /* Note that the low part is always in RD+1, even in LE mode. */
2653 lo = cpu_gpr[rd + 1];
2654 hi = cpu_gpr[rd];
2655
2656 if (tb_cflags(ctx->base.tb) & CF_PARALLEL) {
2657#ifdef CONFIG_ATOMIC128
2658 TCGv_i32 oi = tcg_temp_new_i32();
2659 if (ctx->le_mode) {
2660 tcg_gen_movi_i32(oi, make_memop_idx(MO_LEQ, ctx->mem_idx));
2661 gen_helper_lq_le_parallel(lo, cpu_env, EA, oi);
2662 } else {
2663 tcg_gen_movi_i32(oi, make_memop_idx(MO_BEQ, ctx->mem_idx));
2664 gen_helper_lq_be_parallel(lo, cpu_env, EA, oi);
2665 }
2666 tcg_temp_free_i32(oi);
2667 tcg_gen_ld_i64(hi, cpu_env, offsetof(CPUPPCState, retxh));
2668#else
2669 /* Restart with exclusive lock. */
2670 gen_helper_exit_atomic(cpu_env);
2671 ctx->base.is_jmp = DISAS_NORETURN;
2672#endif
2673 } else if (ctx->le_mode) {
2674 tcg_gen_qemu_ld_i64(lo, EA, ctx->mem_idx, MO_LEQ);
e0498daa 2675 gen_addr_add(ctx, EA, EA, 8);
94bf2658 2676 tcg_gen_qemu_ld_i64(hi, EA, ctx->mem_idx, MO_LEQ);
e0498daa 2677 } else {
94bf2658 2678 tcg_gen_qemu_ld_i64(hi, EA, ctx->mem_idx, MO_BEQ);
e0498daa 2679 gen_addr_add(ctx, EA, EA, 8);
94bf2658 2680 tcg_gen_qemu_ld_i64(lo, EA, ctx->mem_idx, MO_BEQ);
e0498daa 2681 }
b61f2753 2682 tcg_temp_free(EA);
be147d08 2683}
d9bce9d9 2684#endif
79aceca5
FB
2685
2686/*** Integer store ***/
0c8aacd4 2687#define GEN_ST(name, stop, opc, type) \
99e300ef 2688static void glue(gen_, name)(DisasContext *ctx) \
79aceca5 2689{ \
76db3ba4
AJ
2690 TCGv EA; \
2691 gen_set_access_type(ctx, ACCESS_INT); \
2692 EA = tcg_temp_new(); \
2693 gen_addr_imm_index(ctx, EA, 0); \
2694 gen_qemu_##stop(ctx, cpu_gpr[rS(ctx->opcode)], EA); \
b61f2753 2695 tcg_temp_free(EA); \
79aceca5
FB
2696}
2697
0c8aacd4 2698#define GEN_STU(name, stop, opc, type) \
99e300ef 2699static void glue(gen_, stop##u)(DisasContext *ctx) \
79aceca5 2700{ \
b61f2753 2701 TCGv EA; \
76a66253 2702 if (unlikely(rA(ctx->opcode) == 0)) { \
e06fcd75 2703 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL); \
9fddaa0c 2704 return; \
9a64fbe4 2705 } \
76db3ba4 2706 gen_set_access_type(ctx, ACCESS_INT); \
0c8aacd4 2707 EA = tcg_temp_new(); \
9d53c753 2708 if (type == PPC_64B) \
76db3ba4 2709 gen_addr_imm_index(ctx, EA, 0x03); \
9d53c753 2710 else \
76db3ba4
AJ
2711 gen_addr_imm_index(ctx, EA, 0); \
2712 gen_qemu_##stop(ctx, cpu_gpr[rS(ctx->opcode)], EA); \
b61f2753
AJ
2713 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], EA); \
2714 tcg_temp_free(EA); \
79aceca5
FB
2715}
2716
0c8aacd4 2717#define GEN_STUX(name, stop, opc2, opc3, type) \
99e300ef 2718static void glue(gen_, name##ux)(DisasContext *ctx) \
79aceca5 2719{ \
b61f2753 2720 TCGv EA; \
76a66253 2721 if (unlikely(rA(ctx->opcode) == 0)) { \
e06fcd75 2722 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL); \
9fddaa0c 2723 return; \
9a64fbe4 2724 } \
76db3ba4 2725 gen_set_access_type(ctx, ACCESS_INT); \
0c8aacd4 2726 EA = tcg_temp_new(); \
76db3ba4
AJ
2727 gen_addr_reg_index(ctx, EA); \
2728 gen_qemu_##stop(ctx, cpu_gpr[rS(ctx->opcode)], EA); \
b61f2753
AJ
2729 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], EA); \
2730 tcg_temp_free(EA); \
79aceca5
FB
2731}
2732
b7815375 2733#define GEN_STX_E(name, stop, opc2, opc3, type, type2, chk) \
cd6e9320 2734static void glue(gen_, name##x)(DisasContext *ctx) \
79aceca5 2735{ \
76db3ba4 2736 TCGv EA; \
b7815375 2737 chk; \
76db3ba4
AJ
2738 gen_set_access_type(ctx, ACCESS_INT); \
2739 EA = tcg_temp_new(); \
2740 gen_addr_reg_index(ctx, EA); \
2741 gen_qemu_##stop(ctx, cpu_gpr[rS(ctx->opcode)], EA); \
b61f2753 2742 tcg_temp_free(EA); \
79aceca5 2743}
cd6e9320 2744#define GEN_STX(name, stop, opc2, opc3, type) \
b7815375
BH
2745 GEN_STX_E(name, stop, opc2, opc3, type, PPC_NONE, CHK_NONE)
2746
2747#define GEN_STX_HVRM(name, stop, opc2, opc3, type) \
2748 GEN_STX_E(name, stop, opc2, opc3, type, PPC_NONE, CHK_HVRM)
79aceca5 2749
0c8aacd4
AJ
2750#define GEN_STS(name, stop, op, type) \
2751GEN_ST(name, stop, op | 0x20, type); \
2752GEN_STU(name, stop, op | 0x21, type); \
2753GEN_STUX(name, stop, 0x17, op | 0x01, type); \
2754GEN_STX(name, stop, 0x17, op | 0x00, type)
79aceca5
FB
2755
2756/* stb stbu stbux stbx */
0c8aacd4 2757GEN_STS(stb, st8, 0x06, PPC_INTEGER);
79aceca5 2758/* sth sthu sthux sthx */
0c8aacd4 2759GEN_STS(sth, st16, 0x0C, PPC_INTEGER);
79aceca5 2760/* stw stwu stwux stwx */
0c8aacd4 2761GEN_STS(stw, st32, 0x04, PPC_INTEGER);
d9bce9d9 2762#if defined(TARGET_PPC64)
2468f23d
ND
2763GEN_STUX(std, st64_i64, 0x15, 0x05, PPC_64B);
2764GEN_STX(std, st64_i64, 0x15, 0x04, PPC_64B);
2765GEN_STX_HVRM(stdcix, st64_i64, 0x15, 0x1f, PPC_CILDST)
b7815375
BH
2766GEN_STX_HVRM(stwcix, st32, 0x15, 0x1c, PPC_CILDST)
2767GEN_STX_HVRM(sthcix, st16, 0x15, 0x1d, PPC_CILDST)
2768GEN_STX_HVRM(stbcix, st8, 0x15, 0x1e, PPC_CILDST)
99e300ef
BS
2769
2770static void gen_std(DisasContext *ctx)
d9bce9d9 2771{
be147d08 2772 int rs;
b61f2753 2773 TCGv EA;
be147d08
JM
2774
2775 rs = rS(ctx->opcode);
84cab1e2 2776 if ((ctx->opcode & 0x3) == 0x2) { /* stq */
84cab1e2
TM
2777 bool legal_in_user_mode = (ctx->insns_flags2 & PPC2_LSQ_ISA207) != 0;
2778 bool le_is_supported = (ctx->insns_flags2 & PPC2_LSQ_ISA207) != 0;
f89ced5f 2779 TCGv hi, lo;
84cab1e2 2780
dfdd3e43
BH
2781 if (!(ctx->insns_flags & PPC_64BX)) {
2782 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL);
2783 }
2784
c47493f2 2785 if (!legal_in_user_mode && ctx->pr) {
9b2fadda 2786 gen_priv_exception(ctx, POWERPC_EXCP_PRIV_OPC);
be147d08
JM
2787 return;
2788 }
84cab1e2
TM
2789
2790 if (!le_is_supported && ctx->le_mode) {
65f2475f 2791 gen_align_no_le(ctx);
d9bce9d9
JM
2792 return;
2793 }
84cab1e2
TM
2794
2795 if (unlikely(rs & 1)) {
2796 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL);
be147d08
JM
2797 return;
2798 }
76db3ba4 2799 gen_set_access_type(ctx, ACCESS_INT);
a7812ae4 2800 EA = tcg_temp_new();
76db3ba4 2801 gen_addr_imm_index(ctx, EA, 0x03);
84cab1e2 2802
f89ced5f
RH
2803 /* Note that the low part is always in RS+1, even in LE mode. */
2804 lo = cpu_gpr[rs + 1];
2805 hi = cpu_gpr[rs];
2806
2807 if (tb_cflags(ctx->base.tb) & CF_PARALLEL) {
2808#ifdef CONFIG_ATOMIC128
2809 TCGv_i32 oi = tcg_temp_new_i32();
2810 if (ctx->le_mode) {
2811 tcg_gen_movi_i32(oi, make_memop_idx(MO_LEQ, ctx->mem_idx));
2812 gen_helper_stq_le_parallel(cpu_env, EA, lo, hi, oi);
2813 } else {
2814 tcg_gen_movi_i32(oi, make_memop_idx(MO_BEQ, ctx->mem_idx));
2815 gen_helper_stq_be_parallel(cpu_env, EA, lo, hi, oi);
2816 }
2817 tcg_temp_free_i32(oi);
2818#else
2819 /* Restart with exclusive lock. */
2820 gen_helper_exit_atomic(cpu_env);
2821 ctx->base.is_jmp = DISAS_NORETURN;
2822#endif
2823 } else if (ctx->le_mode) {
2824 tcg_gen_qemu_st_i64(lo, EA, ctx->mem_idx, MO_LEQ);
84cab1e2 2825 gen_addr_add(ctx, EA, EA, 8);
f89ced5f 2826 tcg_gen_qemu_st_i64(hi, EA, ctx->mem_idx, MO_LEQ);
84cab1e2 2827 } else {
f89ced5f 2828 tcg_gen_qemu_st_i64(hi, EA, ctx->mem_idx, MO_BEQ);
84cab1e2 2829 gen_addr_add(ctx, EA, EA, 8);
f89ced5f 2830 tcg_gen_qemu_st_i64(lo, EA, ctx->mem_idx, MO_BEQ);
84cab1e2 2831 }
b61f2753 2832 tcg_temp_free(EA);
be147d08 2833 } else {
f89ced5f 2834 /* std / stdu */
be147d08
JM
2835 if (Rc(ctx->opcode)) {
2836 if (unlikely(rA(ctx->opcode) == 0)) {
e06fcd75 2837 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL);
be147d08
JM
2838 return;
2839 }
2840 }
76db3ba4 2841 gen_set_access_type(ctx, ACCESS_INT);
a7812ae4 2842 EA = tcg_temp_new();
76db3ba4 2843 gen_addr_imm_index(ctx, EA, 0x03);
2468f23d 2844 gen_qemu_st64_i64(ctx, cpu_gpr[rs], EA);
be147d08 2845 if (Rc(ctx->opcode))
b61f2753
AJ
2846 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], EA);
2847 tcg_temp_free(EA);
d9bce9d9 2848 }
d9bce9d9
JM
2849}
2850#endif
79aceca5 2851/*** Integer load and store with byte reverse ***/
e22c357b 2852
79aceca5 2853/* lhbrx */
0c8aacd4 2854GEN_LDX(lhbr, ld16ur, 0x16, 0x18, PPC_INTEGER);
b61f2753 2855
79aceca5 2856/* lwbrx */
0c8aacd4 2857GEN_LDX(lwbr, ld32ur, 0x16, 0x10, PPC_INTEGER);
b61f2753 2858
cd6e9320
TH
2859#if defined(TARGET_PPC64)
2860/* ldbrx */
ff5f3981 2861GEN_LDX_E(ldbr, ld64ur_i64, 0x14, 0x10, PPC_NONE, PPC2_DBRX, CHK_NONE);
804108aa
ND
2862/* stdbrx */
2863GEN_STX_E(stdbr, st64r_i64, 0x14, 0x14, PPC_NONE, PPC2_DBRX, CHK_NONE);
cd6e9320
TH
2864#endif /* TARGET_PPC64 */
2865
79aceca5 2866/* sthbrx */
0c8aacd4 2867GEN_STX(sthbr, st16r, 0x16, 0x1C, PPC_INTEGER);
79aceca5 2868/* stwbrx */
0c8aacd4 2869GEN_STX(stwbr, st32r, 0x16, 0x14, PPC_INTEGER);
79aceca5
FB
2870
2871/*** Integer load and store multiple ***/
99e300ef 2872
54623277 2873/* lmw */
99e300ef 2874static void gen_lmw(DisasContext *ctx)
79aceca5 2875{
76db3ba4
AJ
2876 TCGv t0;
2877 TCGv_i32 t1;
5817355e
BH
2878
2879 if (ctx->le_mode) {
2880 gen_align_no_le(ctx);
2881 return;
2882 }
76db3ba4 2883 gen_set_access_type(ctx, ACCESS_INT);
76db3ba4
AJ
2884 t0 = tcg_temp_new();
2885 t1 = tcg_const_i32(rD(ctx->opcode));
2886 gen_addr_imm_index(ctx, t0, 0);
2f5a189c 2887 gen_helper_lmw(cpu_env, t0, t1);
ff4a62cd
AJ
2888 tcg_temp_free(t0);
2889 tcg_temp_free_i32(t1);
79aceca5
FB
2890}
2891
2892/* stmw */
99e300ef 2893static void gen_stmw(DisasContext *ctx)
79aceca5 2894{
76db3ba4
AJ
2895 TCGv t0;
2896 TCGv_i32 t1;
5817355e
BH
2897
2898 if (ctx->le_mode) {
2899 gen_align_no_le(ctx);
2900 return;
2901 }
76db3ba4 2902 gen_set_access_type(ctx, ACCESS_INT);
76db3ba4
AJ
2903 t0 = tcg_temp_new();
2904 t1 = tcg_const_i32(rS(ctx->opcode));
2905 gen_addr_imm_index(ctx, t0, 0);
2f5a189c 2906 gen_helper_stmw(cpu_env, t0, t1);
ff4a62cd
AJ
2907 tcg_temp_free(t0);
2908 tcg_temp_free_i32(t1);
79aceca5
FB
2909}
2910
2911/*** Integer load and store strings ***/
54623277 2912
79aceca5 2913/* lswi */
3fc6c082 2914/* PowerPC32 specification says we must generate an exception if
9a64fbe4
FB
2915 * rA is in the range of registers to be loaded.
2916 * In an other hand, IBM says this is valid, but rA won't be loaded.
2917 * For now, I'll follow the spec...
2918 */
99e300ef 2919static void gen_lswi(DisasContext *ctx)
79aceca5 2920{
dfbc799d
AJ
2921 TCGv t0;
2922 TCGv_i32 t1, t2;
79aceca5
FB
2923 int nb = NB(ctx->opcode);
2924 int start = rD(ctx->opcode);
9a64fbe4 2925 int ra = rA(ctx->opcode);
79aceca5
FB
2926 int nr;
2927
5817355e
BH
2928 if (ctx->le_mode) {
2929 gen_align_no_le(ctx);
2930 return;
2931 }
79aceca5
FB
2932 if (nb == 0)
2933 nb = 32;
f0704d78 2934 nr = DIV_ROUND_UP(nb, 4);
afbee712 2935 if (unlikely(lsw_reg_in_range(start, nr, ra))) {
e06fcd75 2936 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_LSWX);
9fddaa0c 2937 return;
297d8e62 2938 }
76db3ba4 2939 gen_set_access_type(ctx, ACCESS_INT);
dfbc799d 2940 t0 = tcg_temp_new();
76db3ba4 2941 gen_addr_register(ctx, t0);
dfbc799d
AJ
2942 t1 = tcg_const_i32(nb);
2943 t2 = tcg_const_i32(start);
2f5a189c 2944 gen_helper_lsw(cpu_env, t0, t1, t2);
dfbc799d
AJ
2945 tcg_temp_free(t0);
2946 tcg_temp_free_i32(t1);
2947 tcg_temp_free_i32(t2);
79aceca5
FB
2948}
2949
2950/* lswx */
99e300ef 2951static void gen_lswx(DisasContext *ctx)
79aceca5 2952{
76db3ba4
AJ
2953 TCGv t0;
2954 TCGv_i32 t1, t2, t3;
5817355e
BH
2955
2956 if (ctx->le_mode) {
2957 gen_align_no_le(ctx);
2958 return;
2959 }
76db3ba4 2960 gen_set_access_type(ctx, ACCESS_INT);
76db3ba4
AJ
2961 t0 = tcg_temp_new();
2962 gen_addr_reg_index(ctx, t0);
2963 t1 = tcg_const_i32(rD(ctx->opcode));
2964 t2 = tcg_const_i32(rA(ctx->opcode));
2965 t3 = tcg_const_i32(rB(ctx->opcode));
2f5a189c 2966 gen_helper_lswx(cpu_env, t0, t1, t2, t3);
dfbc799d
AJ
2967 tcg_temp_free(t0);
2968 tcg_temp_free_i32(t1);
2969 tcg_temp_free_i32(t2);
2970 tcg_temp_free_i32(t3);
79aceca5
FB
2971}
2972
2973/* stswi */
99e300ef 2974static void gen_stswi(DisasContext *ctx)
79aceca5 2975{
76db3ba4
AJ
2976 TCGv t0;
2977 TCGv_i32 t1, t2;
4b3686fa 2978 int nb = NB(ctx->opcode);
5817355e
BH
2979
2980 if (ctx->le_mode) {
2981 gen_align_no_le(ctx);
2982 return;
2983 }
76db3ba4 2984 gen_set_access_type(ctx, ACCESS_INT);
76db3ba4
AJ
2985 t0 = tcg_temp_new();
2986 gen_addr_register(ctx, t0);
4b3686fa
FB
2987 if (nb == 0)
2988 nb = 32;
dfbc799d 2989 t1 = tcg_const_i32(nb);
76db3ba4 2990 t2 = tcg_const_i32(rS(ctx->opcode));
2f5a189c 2991 gen_helper_stsw(cpu_env, t0, t1, t2);
dfbc799d
AJ
2992 tcg_temp_free(t0);
2993 tcg_temp_free_i32(t1);
2994 tcg_temp_free_i32(t2);
79aceca5
FB
2995}
2996
2997/* stswx */
99e300ef 2998static void gen_stswx(DisasContext *ctx)
79aceca5 2999{
76db3ba4
AJ
3000 TCGv t0;
3001 TCGv_i32 t1, t2;
5817355e
BH
3002
3003 if (ctx->le_mode) {
3004 gen_align_no_le(ctx);
3005 return;
3006 }
76db3ba4 3007 gen_set_access_type(ctx, ACCESS_INT);
76db3ba4
AJ
3008 t0 = tcg_temp_new();
3009 gen_addr_reg_index(ctx, t0);
3010 t1 = tcg_temp_new_i32();
dfbc799d
AJ
3011 tcg_gen_trunc_tl_i32(t1, cpu_xer);
3012 tcg_gen_andi_i32(t1, t1, 0x7F);
76db3ba4 3013 t2 = tcg_const_i32(rS(ctx->opcode));
2f5a189c 3014 gen_helper_stsw(cpu_env, t0, t1, t2);
dfbc799d
AJ
3015 tcg_temp_free(t0);
3016 tcg_temp_free_i32(t1);
3017 tcg_temp_free_i32(t2);
79aceca5
FB
3018}
3019
3020/*** Memory synchronisation ***/
3021/* eieio */
99e300ef 3022static void gen_eieio(DisasContext *ctx)
79aceca5 3023{
c8fd8373
CLG
3024 TCGBar bar = TCG_MO_LD_ST;
3025
3026 /*
3027 * POWER9 has a eieio instruction variant using bit 6 as a hint to
3028 * tell the CPU it is a store-forwarding barrier.
3029 */
3030 if (ctx->opcode & 0x2000000) {
3031 /*
3032 * ISA says that "Reserved fields in instructions are ignored
3033 * by the processor". So ignore the bit 6 on non-POWER9 CPU but
3034 * as this is not an instruction software should be using,
3035 * complain to the user.
3036 */
3037 if (!(ctx->insns_flags2 & PPC2_ISA300)) {
3038 qemu_log_mask(LOG_GUEST_ERROR, "invalid eieio using bit 6 at @"
3039 TARGET_FMT_lx "\n", ctx->base.pc_next - 4);
3040 } else {
3041 bar = TCG_MO_ST_LD;
3042 }
3043 }
3044
3045 tcg_gen_mb(bar | TCG_BAR_SC);
79aceca5
FB
3046}
3047
c5a8d8f3 3048#if !defined(CONFIG_USER_ONLY)
e3cffe6f 3049static inline void gen_check_tlb_flush(DisasContext *ctx, bool global)
cd0c6f47 3050{
c5a8d8f3
BH
3051 TCGv_i32 t;
3052 TCGLabel *l;
cd0c6f47 3053
c5a8d8f3
BH
3054 if (!ctx->lazy_tlb_flush) {
3055 return;
3056 }
3057 l = gen_new_label();
3058 t = tcg_temp_new_i32();
cd0c6f47
BH
3059 tcg_gen_ld_i32(t, cpu_env, offsetof(CPUPPCState, tlb_need_flush));
3060 tcg_gen_brcondi_i32(TCG_COND_EQ, t, 0, l);
e3cffe6f
ND
3061 if (global) {
3062 gen_helper_check_tlb_flush_global(cpu_env);
3063 } else {
3064 gen_helper_check_tlb_flush_local(cpu_env);
3065 }
cd0c6f47
BH
3066 gen_set_label(l);
3067 tcg_temp_free_i32(t);
3068}
3069#else
e3cffe6f 3070static inline void gen_check_tlb_flush(DisasContext *ctx, bool global) { }
cd0c6f47
BH
3071#endif
3072
79aceca5 3073/* isync */
99e300ef 3074static void gen_isync(DisasContext *ctx)
79aceca5 3075{
cd0c6f47
BH
3076 /*
3077 * We need to check for a pending TLB flush. This can only happen in
3078 * kernel mode however so check MSR_PR
3079 */
3080 if (!ctx->pr) {
e3cffe6f 3081 gen_check_tlb_flush(ctx, false);
cd0c6f47 3082 }
4771df23 3083 tcg_gen_mb(TCG_MO_ALL | TCG_BAR_SC);
e06fcd75 3084 gen_stop_exception(ctx);
79aceca5
FB
3085}
3086
48793c95
ND
3087#define MEMOP_GET_SIZE(x) (1 << ((x) & MO_SIZE))
3088
2a4e6c1b
RH
3089static void gen_load_locked(DisasContext *ctx, TCGMemOp memop)
3090{
3091 TCGv gpr = cpu_gpr[rD(ctx->opcode)];
3092 TCGv t0 = tcg_temp_new();
3093
3094 gen_set_access_type(ctx, ACCESS_RES);
3095 gen_addr_reg_index(ctx, t0);
3096 tcg_gen_qemu_ld_tl(gpr, t0, ctx->mem_idx, memop | MO_ALIGN);
3097 tcg_gen_mov_tl(cpu_reserve, t0);
3098 tcg_gen_mov_tl(cpu_reserve_val, gpr);
3099 tcg_gen_mb(TCG_MO_ALL | TCG_BAR_LDAQ);
3100 tcg_temp_free(t0);
3101}
3102
3103#define LARX(name, memop) \
3104static void gen_##name(DisasContext *ctx) \
3105{ \
3106 gen_load_locked(ctx, memop); \
79aceca5
FB
3107}
3108
5c77a786 3109/* lwarx */
48793c95
ND
3110LARX(lbarx, DEF_MEMOP(MO_UB))
3111LARX(lharx, DEF_MEMOP(MO_UW))
3112LARX(lwarx, DEF_MEMOP(MO_UL))
5c77a786 3113
20923c1d
RH
3114static void gen_fetch_inc_conditional(DisasContext *ctx, TCGMemOp memop,
3115 TCGv EA, TCGCond cond, int addend)
3116{
3117 TCGv t = tcg_temp_new();
3118 TCGv t2 = tcg_temp_new();
3119 TCGv u = tcg_temp_new();
3120
3121 tcg_gen_qemu_ld_tl(t, EA, ctx->mem_idx, memop);
3122 tcg_gen_addi_tl(t2, EA, MEMOP_GET_SIZE(memop));
3123 tcg_gen_qemu_ld_tl(t2, t2, ctx->mem_idx, memop);
3124 tcg_gen_addi_tl(u, t, addend);
3125
3126 /* E.g. for fetch and increment bounded... */
3127 /* mem(EA,s) = (t != t2 ? u = t + 1 : t) */
3128 tcg_gen_movcond_tl(cond, u, t, t2, u, t);
3129 tcg_gen_qemu_st_tl(u, EA, ctx->mem_idx, memop);
3130
3131 /* RT = (t != t2 ? t : u = 1<<(s*8-1)) */
3132 tcg_gen_movi_tl(u, 1 << (MEMOP_GET_SIZE(memop) * 8 - 1));
3133 tcg_gen_movcond_tl(cond, cpu_gpr[rD(ctx->opcode)], t, t2, t, u);
3134
3135 tcg_temp_free(t);
3136 tcg_temp_free(t2);
3137 tcg_temp_free(u);
3138}
3139
20ba8504
RH
3140static void gen_ld_atomic(DisasContext *ctx, TCGMemOp memop)
3141{
3142 uint32_t gpr_FC = FC(ctx->opcode);
3143 TCGv EA = tcg_temp_new();
20923c1d
RH
3144 int rt = rD(ctx->opcode);
3145 bool need_serial;
20ba8504
RH
3146 TCGv src, dst;
3147
3148 gen_addr_register(ctx, EA);
20923c1d
RH
3149 dst = cpu_gpr[rt];
3150 src = cpu_gpr[(rt + 1) & 31];
20ba8504 3151
20923c1d 3152 need_serial = false;
20ba8504
RH
3153 memop |= MO_ALIGN;
3154 switch (gpr_FC) {
3155 case 0: /* Fetch and add */
3156 tcg_gen_atomic_fetch_add_tl(dst, EA, src, ctx->mem_idx, memop);
3157 break;
3158 case 1: /* Fetch and xor */
3159 tcg_gen_atomic_fetch_xor_tl(dst, EA, src, ctx->mem_idx, memop);
3160 break;
3161 case 2: /* Fetch and or */
3162 tcg_gen_atomic_fetch_or_tl(dst, EA, src, ctx->mem_idx, memop);
3163 break;
3164 case 3: /* Fetch and 'and' */
3165 tcg_gen_atomic_fetch_and_tl(dst, EA, src, ctx->mem_idx, memop);
3166 break;
20ba8504 3167 case 4: /* Fetch and max unsigned */
b8ce0f86
RH
3168 tcg_gen_atomic_fetch_umax_tl(dst, EA, src, ctx->mem_idx, memop);
3169 break;
20ba8504 3170 case 5: /* Fetch and max signed */
b8ce0f86
RH
3171 tcg_gen_atomic_fetch_smax_tl(dst, EA, src, ctx->mem_idx, memop);
3172 break;
20ba8504 3173 case 6: /* Fetch and min unsigned */
b8ce0f86
RH
3174 tcg_gen_atomic_fetch_umin_tl(dst, EA, src, ctx->mem_idx, memop);
3175 break;
20ba8504 3176 case 7: /* Fetch and min signed */
b8ce0f86
RH
3177 tcg_gen_atomic_fetch_smin_tl(dst, EA, src, ctx->mem_idx, memop);
3178 break;
3179 case 8: /* Swap */
3180 tcg_gen_atomic_xchg_tl(dst, EA, src, ctx->mem_idx, memop);
3181 break;
20923c1d
RH
3182
3183 case 16: /* Compare and swap not equal */
3184 if (tb_cflags(ctx->base.tb) & CF_PARALLEL) {
3185 need_serial = true;
3186 } else {
3187 TCGv t0 = tcg_temp_new();
3188 TCGv t1 = tcg_temp_new();
3189
3190 tcg_gen_qemu_ld_tl(t0, EA, ctx->mem_idx, memop);
3191 if ((memop & MO_SIZE) == MO_64 || TARGET_LONG_BITS == 32) {
3192 tcg_gen_mov_tl(t1, src);
3193 } else {
3194 tcg_gen_ext32u_tl(t1, src);
3195 }
3196 tcg_gen_movcond_tl(TCG_COND_NE, t1, t0, t1,
3197 cpu_gpr[(rt + 2) & 31], t0);
3198 tcg_gen_qemu_st_tl(t1, EA, ctx->mem_idx, memop);
3199 tcg_gen_mov_tl(dst, t0);
3200
3201 tcg_temp_free(t0);
3202 tcg_temp_free(t1);
3203 }
3204 break;
3205
20ba8504 3206 case 24: /* Fetch and increment bounded */
20923c1d
RH
3207 if (tb_cflags(ctx->base.tb) & CF_PARALLEL) {
3208 need_serial = true;
3209 } else {
3210 gen_fetch_inc_conditional(ctx, memop, EA, TCG_COND_NE, 1);
3211 }
3212 break;
20ba8504 3213 case 25: /* Fetch and increment equal */
20923c1d
RH
3214 if (tb_cflags(ctx->base.tb) & CF_PARALLEL) {
3215 need_serial = true;
3216 } else {
3217 gen_fetch_inc_conditional(ctx, memop, EA, TCG_COND_EQ, 1);
3218 }
3219 break;
20ba8504 3220 case 28: /* Fetch and decrement bounded */
20923c1d
RH
3221 if (tb_cflags(ctx->base.tb) & CF_PARALLEL) {
3222 need_serial = true;
3223 } else {
3224 gen_fetch_inc_conditional(ctx, memop, EA, TCG_COND_NE, -1);
3225 }
20ba8504 3226 break;
20923c1d 3227
20ba8504
RH
3228 default:
3229 /* invoke data storage error handler */
3230 gen_exception_err(ctx, POWERPC_EXCP_DSI, POWERPC_EXCP_INVAL);
3231 }
3232 tcg_temp_free(EA);
20923c1d
RH
3233
3234 if (need_serial) {
3235 /* Restart with exclusive lock. */
3236 gen_helper_exit_atomic(cpu_env);
3237 ctx->base.is_jmp = DISAS_NORETURN;
3238 }
20ba8504
RH
3239}
3240
3241static void gen_lwat(DisasContext *ctx)
3242{
3243 gen_ld_atomic(ctx, DEF_MEMOP(MO_UL));
3244}
3245
3246#ifdef TARGET_PPC64
3247static void gen_ldat(DisasContext *ctx)
3248{
3249 gen_ld_atomic(ctx, DEF_MEMOP(MO_Q));
3250}
a68a6146
B
3251#endif
3252
9deb041c
RH
3253static void gen_st_atomic(DisasContext *ctx, TCGMemOp memop)
3254{
3255 uint32_t gpr_FC = FC(ctx->opcode);
3256 TCGv EA = tcg_temp_new();
3257 TCGv src, discard;
3258
3259 gen_addr_register(ctx, EA);
3260 src = cpu_gpr[rD(ctx->opcode)];
3261 discard = tcg_temp_new();
3262
3263 memop |= MO_ALIGN;
3264 switch (gpr_FC) {
3265 case 0: /* add and Store */
3266 tcg_gen_atomic_add_fetch_tl(discard, EA, src, ctx->mem_idx, memop);
3267 break;
3268 case 1: /* xor and Store */
3269 tcg_gen_atomic_xor_fetch_tl(discard, EA, src, ctx->mem_idx, memop);
3270 break;
3271 case 2: /* Or and Store */
3272 tcg_gen_atomic_or_fetch_tl(discard, EA, src, ctx->mem_idx, memop);
3273 break;
3274 case 3: /* 'and' and Store */
3275 tcg_gen_atomic_and_fetch_tl(discard, EA, src, ctx->mem_idx, memop);
3276 break;
3277 case 4: /* Store max unsigned */
b8ce0f86
RH
3278 tcg_gen_atomic_umax_fetch_tl(discard, EA, src, ctx->mem_idx, memop);
3279 break;
9deb041c 3280 case 5: /* Store max signed */
b8ce0f86
RH
3281 tcg_gen_atomic_smax_fetch_tl(discard, EA, src, ctx->mem_idx, memop);
3282 break;
9deb041c 3283 case 6: /* Store min unsigned */
b8ce0f86
RH
3284 tcg_gen_atomic_umin_fetch_tl(discard, EA, src, ctx->mem_idx, memop);
3285 break;
9deb041c 3286 case 7: /* Store min signed */
b8ce0f86
RH
3287 tcg_gen_atomic_smin_fetch_tl(discard, EA, src, ctx->mem_idx, memop);
3288 break;
9deb041c 3289 case 24: /* Store twin */
7fbc2b20
RH
3290 if (tb_cflags(ctx->base.tb) & CF_PARALLEL) {
3291 /* Restart with exclusive lock. */
3292 gen_helper_exit_atomic(cpu_env);
3293 ctx->base.is_jmp = DISAS_NORETURN;
3294 } else {
3295 TCGv t = tcg_temp_new();
3296 TCGv t2 = tcg_temp_new();
3297 TCGv s = tcg_temp_new();
3298 TCGv s2 = tcg_temp_new();
3299 TCGv ea_plus_s = tcg_temp_new();
3300
3301 tcg_gen_qemu_ld_tl(t, EA, ctx->mem_idx, memop);
3302 tcg_gen_addi_tl(ea_plus_s, EA, MEMOP_GET_SIZE(memop));
3303 tcg_gen_qemu_ld_tl(t2, ea_plus_s, ctx->mem_idx, memop);
3304 tcg_gen_movcond_tl(TCG_COND_EQ, s, t, t2, src, t);
3305 tcg_gen_movcond_tl(TCG_COND_EQ, s2, t, t2, src, t2);
3306 tcg_gen_qemu_st_tl(s, EA, ctx->mem_idx, memop);
3307 tcg_gen_qemu_st_tl(s2, ea_plus_s, ctx->mem_idx, memop);
3308
3309 tcg_temp_free(ea_plus_s);
3310 tcg_temp_free(s2);
3311 tcg_temp_free(s);
3312 tcg_temp_free(t2);
3313 tcg_temp_free(t);
3314 }
9deb041c
RH
3315 break;
3316 default:
3317 /* invoke data storage error handler */
3318 gen_exception_err(ctx, POWERPC_EXCP_DSI, POWERPC_EXCP_INVAL);
3319 }
3320 tcg_temp_free(discard);
3321 tcg_temp_free(EA);
3322}
3323
3324static void gen_stwat(DisasContext *ctx)
3325{
3326 gen_st_atomic(ctx, DEF_MEMOP(MO_UL));
3327}
3328
3329#ifdef TARGET_PPC64
3330static void gen_stdat(DisasContext *ctx)
3331{
3332 gen_st_atomic(ctx, DEF_MEMOP(MO_Q));
3333}
a3401188
B
3334#endif
3335
d8b86898 3336static void gen_conditional_store(DisasContext *ctx, TCGMemOp memop)
587c51f7 3337{
253ce7b2
ND
3338 TCGLabel *l1 = gen_new_label();
3339 TCGLabel *l2 = gen_new_label();
d8b86898
RH
3340 TCGv t0 = tcg_temp_new();
3341 int reg = rS(ctx->opcode);
4425265b 3342
d8b86898
RH
3343 gen_set_access_type(ctx, ACCESS_RES);
3344 gen_addr_reg_index(ctx, t0);
3345 tcg_gen_brcond_tl(TCG_COND_NE, t0, cpu_reserve, l1);
3346 tcg_temp_free(t0);
253ce7b2
ND
3347
3348 t0 = tcg_temp_new();
3349 tcg_gen_atomic_cmpxchg_tl(t0, cpu_reserve, cpu_reserve_val,
3350 cpu_gpr[reg], ctx->mem_idx,
3351 DEF_MEMOP(memop) | MO_ALIGN);
3352 tcg_gen_setcond_tl(TCG_COND_EQ, t0, t0, cpu_reserve_val);
3353 tcg_gen_shli_tl(t0, t0, CRF_EQ_BIT);
3354 tcg_gen_or_tl(t0, t0, cpu_so);
3355 tcg_gen_trunc_tl_i32(cpu_crf[0], t0);
3356 tcg_temp_free(t0);
3357 tcg_gen_br(l2);
3358
587c51f7 3359 gen_set_label(l1);
4771df23
ND
3360
3361 /* Address mismatch implies failure. But we still need to provide the
3362 memory barrier semantics of the instruction. */
3363 tcg_gen_mb(TCG_MO_ALL | TCG_BAR_STRL);
253ce7b2
ND
3364 tcg_gen_trunc_tl_i32(cpu_crf[0], cpu_so);
3365
3366 gen_set_label(l2);
587c51f7
TM
3367 tcg_gen_movi_tl(cpu_reserve, -1);
3368}
587c51f7 3369
d8b86898
RH
3370#define STCX(name, memop) \
3371static void gen_##name(DisasContext *ctx) \
3372{ \
3373 gen_conditional_store(ctx, memop); \
2391b357
ND
3374}
3375
3376STCX(stbcx_, DEF_MEMOP(MO_UB))
3377STCX(sthcx_, DEF_MEMOP(MO_UW))
3378STCX(stwcx_, DEF_MEMOP(MO_UL))
587c51f7 3379
426613db 3380#if defined(TARGET_PPC64)
426613db 3381/* ldarx */
48793c95 3382LARX(ldarx, DEF_MEMOP(MO_Q))
2391b357
ND
3383/* stdcx. */
3384STCX(stdcx_, DEF_MEMOP(MO_Q))
426613db 3385
9c294d5a
TM
3386/* lqarx */
3387static void gen_lqarx(DisasContext *ctx)
3388{
9c294d5a 3389 int rd = rD(ctx->opcode);
94bf2658 3390 TCGv EA, hi, lo;
9c294d5a
TM
3391
3392 if (unlikely((rd & 1) || (rd == rA(ctx->opcode)) ||
3393 (rd == rB(ctx->opcode)))) {
3394 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL);
3395 return;
3396 }
3397
3398 gen_set_access_type(ctx, ACCESS_RES);
94bf2658 3399 EA = tcg_temp_new();
9c294d5a 3400 gen_addr_reg_index(ctx, EA);
94bf2658
RH
3401
3402 /* Note that the low part is always in RD+1, even in LE mode. */
3403 lo = cpu_gpr[rd + 1];
3404 hi = cpu_gpr[rd];
3405
3406 if (tb_cflags(ctx->base.tb) & CF_PARALLEL) {
3407#ifdef CONFIG_ATOMIC128
3408 TCGv_i32 oi = tcg_temp_new_i32();
3409 if (ctx->le_mode) {
3410 tcg_gen_movi_i32(oi, make_memop_idx(MO_LEQ | MO_ALIGN_16,
3411 ctx->mem_idx));
3412 gen_helper_lq_le_parallel(lo, cpu_env, EA, oi);
3413 } else {
3414 tcg_gen_movi_i32(oi, make_memop_idx(MO_BEQ | MO_ALIGN_16,
3415 ctx->mem_idx));
3416 gen_helper_lq_be_parallel(lo, cpu_env, EA, oi);
3417 }
3418 tcg_temp_free_i32(oi);
3419 tcg_gen_ld_i64(hi, cpu_env, offsetof(CPUPPCState, retxh));
3420#else
3421 /* Restart with exclusive lock. */
3422 gen_helper_exit_atomic(cpu_env);
3423 ctx->base.is_jmp = DISAS_NORETURN;
3424 tcg_temp_free(EA);
3425 return;
3426#endif
3427 } else if (ctx->le_mode) {
3428 tcg_gen_qemu_ld_i64(lo, EA, ctx->mem_idx, MO_LEQ | MO_ALIGN_16);
3429 tcg_gen_mov_tl(cpu_reserve, EA);
3430 gen_addr_add(ctx, EA, EA, 8);
3431 tcg_gen_qemu_ld_i64(hi, EA, ctx->mem_idx, MO_LEQ);
9c294d5a 3432 } else {
94bf2658
RH
3433 tcg_gen_qemu_ld_i64(hi, EA, ctx->mem_idx, MO_BEQ | MO_ALIGN_16);
3434 tcg_gen_mov_tl(cpu_reserve, EA);
3435 gen_addr_add(ctx, EA, EA, 8);
3436 tcg_gen_qemu_ld_i64(lo, EA, ctx->mem_idx, MO_BEQ);
9c294d5a 3437 }
9c294d5a 3438 tcg_temp_free(EA);
94bf2658
RH
3439
3440 tcg_gen_st_tl(hi, cpu_env, offsetof(CPUPPCState, reserve_val));
3441 tcg_gen_st_tl(lo, cpu_env, offsetof(CPUPPCState, reserve_val2));
9c294d5a
TM
3442}
3443
aa2008af
ND
3444/* stqcx. */
3445static void gen_stqcx_(DisasContext *ctx)
3446{
4a9b3c5d
RH
3447 int rs = rS(ctx->opcode);
3448 TCGv EA, hi, lo;
aa2008af 3449
4a9b3c5d 3450 if (unlikely(rs & 1)) {
aa2008af
ND
3451 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL);
3452 return;
3453 }
4a9b3c5d 3454
aa2008af 3455 gen_set_access_type(ctx, ACCESS_RES);
4a9b3c5d 3456 EA = tcg_temp_new();
aa2008af 3457 gen_addr_reg_index(ctx, EA);
aa2008af 3458
4a9b3c5d
RH
3459 /* Note that the low part is always in RS+1, even in LE mode. */
3460 lo = cpu_gpr[rs + 1];
3461 hi = cpu_gpr[rs];
aa2008af 3462
4a9b3c5d
RH
3463 if (tb_cflags(ctx->base.tb) & CF_PARALLEL) {
3464 TCGv_i32 oi = tcg_const_i32(DEF_MEMOP(MO_Q) | MO_ALIGN_16);
3465#ifdef CONFIG_ATOMIC128
3466 if (ctx->le_mode) {
3467 gen_helper_stqcx_le_parallel(cpu_crf[0], cpu_env, EA, lo, hi, oi);
3468 } else {
3469 gen_helper_stqcx_le_parallel(cpu_crf[0], cpu_env, EA, lo, hi, oi);
3470 }
3471#else
3472 /* Restart with exclusive lock. */
3473 gen_helper_exit_atomic(cpu_env);
3474 ctx->base.is_jmp = DISAS_NORETURN;
3475#endif
3476 tcg_temp_free(EA);
3477 tcg_temp_free_i32(oi);
aa2008af 3478 } else {
4a9b3c5d
RH
3479 TCGLabel *lab_fail = gen_new_label();
3480 TCGLabel *lab_over = gen_new_label();
3481 TCGv_i64 t0 = tcg_temp_new_i64();
3482 TCGv_i64 t1 = tcg_temp_new_i64();
aa2008af 3483
4a9b3c5d
RH
3484 tcg_gen_brcond_tl(TCG_COND_NE, EA, cpu_reserve, lab_fail);
3485 tcg_temp_free(EA);
aa2008af 3486
4a9b3c5d
RH
3487 gen_qemu_ld64_i64(ctx, t0, cpu_reserve);
3488 tcg_gen_ld_i64(t1, cpu_env, (ctx->le_mode
3489 ? offsetof(CPUPPCState, reserve_val2)
3490 : offsetof(CPUPPCState, reserve_val)));
3491 tcg_gen_brcond_i64(TCG_COND_NE, t0, t1, lab_fail);
3492
3493 tcg_gen_addi_i64(t0, cpu_reserve, 8);
3494 gen_qemu_ld64_i64(ctx, t0, t0);
3495 tcg_gen_ld_i64(t1, cpu_env, (ctx->le_mode
3496 ? offsetof(CPUPPCState, reserve_val)
3497 : offsetof(CPUPPCState, reserve_val2)));
3498 tcg_gen_brcond_i64(TCG_COND_NE, t0, t1, lab_fail);
3499
3500 /* Success */
3501 gen_qemu_st64_i64(ctx, ctx->le_mode ? lo : hi, cpu_reserve);
3502 tcg_gen_addi_i64(t0, cpu_reserve, 8);
3503 gen_qemu_st64_i64(ctx, ctx->le_mode ? hi : lo, t0);
3504
3505 tcg_gen_trunc_tl_i32(cpu_crf[0], cpu_so);
3506 tcg_gen_ori_i32(cpu_crf[0], cpu_crf[0], CRF_EQ);
3507 tcg_gen_br(lab_over);
3508
3509 gen_set_label(lab_fail);
3510 tcg_gen_trunc_tl_i32(cpu_crf[0], cpu_so);
3511
3512 gen_set_label(lab_over);
3513 tcg_gen_movi_tl(cpu_reserve, -1);
3514 tcg_temp_free_i64(t0);
3515 tcg_temp_free_i64(t1);
3516 }
3517}
426613db
JM
3518#endif /* defined(TARGET_PPC64) */
3519
79aceca5 3520/* sync */
99e300ef 3521static void gen_sync(DisasContext *ctx)
79aceca5 3522{
cd0c6f47
BH
3523 uint32_t l = (ctx->opcode >> 21) & 3;
3524
3525 /*
c5a8d8f3
BH
3526 * We may need to check for a pending TLB flush.
3527 *
3528 * We do this on ptesync (l == 2) on ppc64 and any sync pn ppc32.
3529 *
3530 * Additionally, this can only happen in kernel mode however so
3531 * check MSR_PR as well.
cd0c6f47 3532 */
c5a8d8f3 3533 if (((l == 2) || !(ctx->insns_flags & PPC_64B)) && !ctx->pr) {
e3cffe6f 3534 gen_check_tlb_flush(ctx, true);
cd0c6f47 3535 }
4771df23 3536 tcg_gen_mb(TCG_MO_ALL | TCG_BAR_SC);
79aceca5
FB
3537}
3538
0db1b20e 3539/* wait */
99e300ef 3540static void gen_wait(DisasContext *ctx)
0db1b20e 3541{
35b5066e 3542 TCGv_i32 t0 = tcg_const_i32(1);
259186a7
AF
3543 tcg_gen_st_i32(t0, cpu_env,
3544 -offsetof(PowerPCCPU, env) + offsetof(CPUState, halted));
931ff272 3545 tcg_temp_free_i32(t0);
0db1b20e 3546 /* Stop translation, as the CPU is supposed to sleep from now */
b6bac4bc 3547 gen_exception_nip(ctx, EXCP_HLT, ctx->base.pc_next);
0db1b20e
JM
3548}
3549
7778a575
BH
3550#if defined(TARGET_PPC64)
3551static void gen_doze(DisasContext *ctx)
3552{
3553#if defined(CONFIG_USER_ONLY)
3554 GEN_PRIV;
3555#else
3556 TCGv_i32 t;
3557
3558 CHK_HV;
3559 t = tcg_const_i32(PPC_PM_DOZE);
3560 gen_helper_pminsn(cpu_env, t);
3561 tcg_temp_free_i32(t);
3562 gen_stop_exception(ctx);
3563#endif /* defined(CONFIG_USER_ONLY) */
3564}
3565
3566static void gen_nap(DisasContext *ctx)
3567{
3568#if defined(CONFIG_USER_ONLY)
3569 GEN_PRIV;
3570#else
3571 TCGv_i32 t;
3572
3573 CHK_HV;
3574 t = tcg_const_i32(PPC_PM_NAP);
3575 gen_helper_pminsn(cpu_env, t);
3576 tcg_temp_free_i32(t);
3577 gen_stop_exception(ctx);
3578#endif /* defined(CONFIG_USER_ONLY) */
3579}
3580
cdee0e72
ND
3581static void gen_stop(DisasContext *ctx)
3582{
3583 gen_nap(ctx);
3584}
3585
7778a575
BH
3586static void gen_sleep(DisasContext *ctx)
3587{
3588#if defined(CONFIG_USER_ONLY)
3589 GEN_PRIV;
3590#else
3591 TCGv_i32 t;
3592
3593 CHK_HV;
3594 t = tcg_const_i32(PPC_PM_SLEEP);
3595 gen_helper_pminsn(cpu_env, t);
3596 tcg_temp_free_i32(t);
3597 gen_stop_exception(ctx);
3598#endif /* defined(CONFIG_USER_ONLY) */
3599}
3600
3601static void gen_rvwinkle(DisasContext *ctx)
3602{
3603#if defined(CONFIG_USER_ONLY)
3604 GEN_PRIV;
3605#else
3606 TCGv_i32 t;
3607
3608 CHK_HV;
3609 t = tcg_const_i32(PPC_PM_RVWINKLE);
3610 gen_helper_pminsn(cpu_env, t);
3611 tcg_temp_free_i32(t);
3612 gen_stop_exception(ctx);
3613#endif /* defined(CONFIG_USER_ONLY) */
3614}
3615#endif /* #if defined(TARGET_PPC64) */
3616
697ab892
DG
3617static inline void gen_update_cfar(DisasContext *ctx, target_ulong nip)
3618{
3619#if defined(TARGET_PPC64)
3620 if (ctx->has_cfar)
3621 tcg_gen_movi_tl(cpu_cfar, nip);
3622#endif
3623}
3624
90aa39a1
SF
3625static inline bool use_goto_tb(DisasContext *ctx, target_ulong dest)
3626{
3627 if (unlikely(ctx->singlestep_enabled)) {
3628 return false;
3629 }
3630
3631#ifndef CONFIG_USER_ONLY
b6bac4bc 3632 return (ctx->base.tb->pc & TARGET_PAGE_MASK) == (dest & TARGET_PAGE_MASK);
90aa39a1
SF
3633#else
3634 return true;
3635#endif
3636}
3637
0e3bf489
RK
3638static void gen_lookup_and_goto_ptr(DisasContext *ctx)
3639{
3640 int sse = ctx->singlestep_enabled;
3641 if (unlikely(sse)) {
3642 if (sse & GDBSTUB_SINGLE_STEP) {
3643 gen_debug_exception(ctx);
3644 } else if (sse & (CPU_SINGLE_STEP | CPU_BRANCH_STEP)) {
3645 uint32_t excp = gen_prep_dbgex(ctx, POWERPC_EXCP_BRANCH);
3646 if (excp != POWERPC_EXCP_NONE) {
3647 gen_exception(ctx, excp);
3648 }
3649 }
3650 tcg_gen_exit_tb(NULL, 0);
3651 } else {
3652 tcg_gen_lookup_and_goto_ptr();
3653 }
3654}
3655
79aceca5 3656/*** Branch ***/
c4a2e3a9 3657static void gen_goto_tb(DisasContext *ctx, int n, target_ulong dest)
c1942362 3658{
e0c8f9ce 3659 if (NARROW_MODE(ctx)) {
a2ffb812 3660 dest = (uint32_t) dest;
e0c8f9ce 3661 }
90aa39a1 3662 if (use_goto_tb(ctx, dest)) {
57fec1fe 3663 tcg_gen_goto_tb(n);
a2ffb812 3664 tcg_gen_movi_tl(cpu_nip, dest & ~3);
07ea28b4 3665 tcg_gen_exit_tb(ctx->base.tb, n);
c1942362 3666 } else {
a2ffb812 3667 tcg_gen_movi_tl(cpu_nip, dest & ~3);
0e3bf489 3668 gen_lookup_and_goto_ptr(ctx);
c1942362 3669 }
c53be334
FB
3670}
3671
636aa200 3672static inline void gen_setlr(DisasContext *ctx, target_ulong nip)
e1833e1f 3673{
e0c8f9ce
RH
3674 if (NARROW_MODE(ctx)) {
3675 nip = (uint32_t)nip;
3676 }
3677 tcg_gen_movi_tl(cpu_lr, nip);
e1833e1f
JM
3678}
3679
79aceca5 3680/* b ba bl bla */
99e300ef 3681static void gen_b(DisasContext *ctx)
79aceca5 3682{
76a66253 3683 target_ulong li, target;
38a64f9d 3684
8cbcb4fa 3685 ctx->exception = POWERPC_EXCP_BRANCH;
38a64f9d 3686 /* sign extend LI */
e0c8f9ce
RH
3687 li = LI(ctx->opcode);
3688 li = (li ^ 0x02000000) - 0x02000000;
3689 if (likely(AA(ctx->opcode) == 0)) {
b6bac4bc 3690 target = ctx->base.pc_next + li - 4;
e0c8f9ce 3691 } else {
9a64fbe4 3692 target = li;
e0c8f9ce
RH
3693 }
3694 if (LK(ctx->opcode)) {
b6bac4bc 3695 gen_setlr(ctx, ctx->base.pc_next);
e0c8f9ce 3696 }
b6bac4bc 3697 gen_update_cfar(ctx, ctx->base.pc_next - 4);
c1942362 3698 gen_goto_tb(ctx, 0, target);
79aceca5
FB
3699}
3700
e98a6e40
FB
3701#define BCOND_IM 0
3702#define BCOND_LR 1
3703#define BCOND_CTR 2
52a4984d 3704#define BCOND_TAR 3
e98a6e40 3705
c4a2e3a9 3706static void gen_bcond(DisasContext *ctx, int type)
d9bce9d9 3707{
d9bce9d9 3708 uint32_t bo = BO(ctx->opcode);
42a268c2 3709 TCGLabel *l1;
a2ffb812 3710 TCGv target;
8cbcb4fa 3711 ctx->exception = POWERPC_EXCP_BRANCH;
0e3bf489 3712
52a4984d 3713 if (type == BCOND_LR || type == BCOND_CTR || type == BCOND_TAR) {
a7812ae4 3714 target = tcg_temp_local_new();
a2ffb812
AJ
3715 if (type == BCOND_CTR)
3716 tcg_gen_mov_tl(target, cpu_ctr);
52a4984d
TM
3717 else if (type == BCOND_TAR)
3718 gen_load_spr(target, SPR_TAR);
a2ffb812
AJ
3719 else
3720 tcg_gen_mov_tl(target, cpu_lr);
d2e9fd8f 3721 } else {
f764718d 3722 target = NULL;
e98a6e40 3723 }
e1833e1f 3724 if (LK(ctx->opcode))
b6bac4bc 3725 gen_setlr(ctx, ctx->base.pc_next);
a2ffb812
AJ
3726 l1 = gen_new_label();
3727 if ((bo & 0x4) == 0) {
3728 /* Decrement and test CTR */
a7812ae4 3729 TCGv temp = tcg_temp_new();
a2ffb812 3730 if (unlikely(type == BCOND_CTR)) {
e06fcd75 3731 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL);
a2ffb812
AJ
3732 return;
3733 }
3734 tcg_gen_subi_tl(cpu_ctr, cpu_ctr, 1);
e0c8f9ce 3735 if (NARROW_MODE(ctx)) {
a2ffb812 3736 tcg_gen_ext32u_tl(temp, cpu_ctr);
e0c8f9ce 3737 } else {
a2ffb812 3738 tcg_gen_mov_tl(temp, cpu_ctr);
e0c8f9ce 3739 }
a2ffb812
AJ
3740 if (bo & 0x2) {
3741 tcg_gen_brcondi_tl(TCG_COND_NE, temp, 0, l1);
3742 } else {
3743 tcg_gen_brcondi_tl(TCG_COND_EQ, temp, 0, l1);
e98a6e40 3744 }
a7812ae4 3745 tcg_temp_free(temp);
a2ffb812
AJ
3746 }
3747 if ((bo & 0x10) == 0) {
3748 /* Test CR */
3749 uint32_t bi = BI(ctx->opcode);
8f9fb7ac 3750 uint32_t mask = 0x08 >> (bi & 0x03);
a7812ae4 3751 TCGv_i32 temp = tcg_temp_new_i32();
a2ffb812 3752
d9bce9d9 3753 if (bo & 0x8) {
a2ffb812
AJ
3754 tcg_gen_andi_i32(temp, cpu_crf[bi >> 2], mask);
3755 tcg_gen_brcondi_i32(TCG_COND_EQ, temp, 0, l1);
d9bce9d9 3756 } else {
a2ffb812
AJ
3757 tcg_gen_andi_i32(temp, cpu_crf[bi >> 2], mask);
3758 tcg_gen_brcondi_i32(TCG_COND_NE, temp, 0, l1);
d9bce9d9 3759 }
a7812ae4 3760 tcg_temp_free_i32(temp);
d9bce9d9 3761 }
b6bac4bc 3762 gen_update_cfar(ctx, ctx->base.pc_next - 4);
e98a6e40 3763 if (type == BCOND_IM) {
a2ffb812
AJ
3764 target_ulong li = (target_long)((int16_t)(BD(ctx->opcode)));
3765 if (likely(AA(ctx->opcode) == 0)) {
b6bac4bc 3766 gen_goto_tb(ctx, 0, ctx->base.pc_next + li - 4);
a2ffb812
AJ
3767 } else {
3768 gen_goto_tb(ctx, 0, li);
3769 }
e98a6e40 3770 } else {
e0c8f9ce 3771 if (NARROW_MODE(ctx)) {
a2ffb812 3772 tcg_gen_andi_tl(cpu_nip, target, (uint32_t)~3);
e0c8f9ce 3773 } else {
a2ffb812 3774 tcg_gen_andi_tl(cpu_nip, target, ~3);
e0c8f9ce 3775 }
0e3bf489 3776 gen_lookup_and_goto_ptr(ctx);
c80d1df5
AG
3777 tcg_temp_free(target);
3778 }
c4a2e3a9 3779 if ((bo & 0x14) != 0x14) {
0e3bf489 3780 /* fallthrough case */
c4a2e3a9 3781 gen_set_label(l1);
b6bac4bc 3782 gen_goto_tb(ctx, 1, ctx->base.pc_next);
c4a2e3a9 3783 }
e98a6e40
FB
3784}
3785
99e300ef 3786static void gen_bc(DisasContext *ctx)
3b46e624 3787{
e98a6e40
FB
3788 gen_bcond(ctx, BCOND_IM);
3789}
3790
99e300ef 3791static void gen_bcctr(DisasContext *ctx)
3b46e624 3792{
e98a6e40
FB
3793 gen_bcond(ctx, BCOND_CTR);
3794}
3795
99e300ef 3796static void gen_bclr(DisasContext *ctx)
3b46e624 3797{
e98a6e40
FB
3798 gen_bcond(ctx, BCOND_LR);
3799}
79aceca5 3800
52a4984d
TM
3801static void gen_bctar(DisasContext *ctx)
3802{
3803 gen_bcond(ctx, BCOND_TAR);
3804}
3805
79aceca5 3806/*** Condition register logical ***/
e1571908 3807#define GEN_CRLOGIC(name, tcg_op, opc) \
99e300ef 3808static void glue(gen_, name)(DisasContext *ctx) \
79aceca5 3809{ \
fc0d441e
JM
3810 uint8_t bitmask; \
3811 int sh; \
a7812ae4 3812 TCGv_i32 t0, t1; \
fc0d441e 3813 sh = (crbD(ctx->opcode) & 0x03) - (crbA(ctx->opcode) & 0x03); \
a7812ae4 3814 t0 = tcg_temp_new_i32(); \
fc0d441e 3815 if (sh > 0) \
fea0c503 3816 tcg_gen_shri_i32(t0, cpu_crf[crbA(ctx->opcode) >> 2], sh); \
fc0d441e 3817 else if (sh < 0) \
fea0c503 3818 tcg_gen_shli_i32(t0, cpu_crf[crbA(ctx->opcode) >> 2], -sh); \
e1571908 3819 else \
fea0c503 3820 tcg_gen_mov_i32(t0, cpu_crf[crbA(ctx->opcode) >> 2]); \
a7812ae4 3821 t1 = tcg_temp_new_i32(); \
fc0d441e
JM
3822 sh = (crbD(ctx->opcode) & 0x03) - (crbB(ctx->opcode) & 0x03); \
3823 if (sh > 0) \
fea0c503 3824 tcg_gen_shri_i32(t1, cpu_crf[crbB(ctx->opcode) >> 2], sh); \
fc0d441e 3825 else if (sh < 0) \
fea0c503 3826 tcg_gen_shli_i32(t1, cpu_crf[crbB(ctx->opcode) >> 2], -sh); \
e1571908 3827 else \
fea0c503
AJ
3828 tcg_gen_mov_i32(t1, cpu_crf[crbB(ctx->opcode) >> 2]); \
3829 tcg_op(t0, t0, t1); \
8f9fb7ac 3830 bitmask = 0x08 >> (crbD(ctx->opcode) & 0x03); \
fea0c503
AJ
3831 tcg_gen_andi_i32(t0, t0, bitmask); \
3832 tcg_gen_andi_i32(t1, cpu_crf[crbD(ctx->opcode) >> 2], ~bitmask); \
3833 tcg_gen_or_i32(cpu_crf[crbD(ctx->opcode) >> 2], t0, t1); \
a7812ae4
PB
3834 tcg_temp_free_i32(t0); \
3835 tcg_temp_free_i32(t1); \
79aceca5
FB
3836}
3837
3838/* crand */
e1571908 3839GEN_CRLOGIC(crand, tcg_gen_and_i32, 0x08);
79aceca5 3840/* crandc */
e1571908 3841GEN_CRLOGIC(crandc, tcg_gen_andc_i32, 0x04);
79aceca5 3842/* creqv */
e1571908 3843GEN_CRLOGIC(creqv, tcg_gen_eqv_i32, 0x09);
79aceca5 3844/* crnand */
e1571908 3845GEN_CRLOGIC(crnand, tcg_gen_nand_i32, 0x07);
79aceca5 3846/* crnor */
e1571908 3847GEN_CRLOGIC(crnor, tcg_gen_nor_i32, 0x01);
79aceca5 3848/* cror */
e1571908 3849GEN_CRLOGIC(cror, tcg_gen_or_i32, 0x0E);
79aceca5 3850/* crorc */
e1571908 3851GEN_CRLOGIC(crorc, tcg_gen_orc_i32, 0x0D);
79aceca5 3852/* crxor */
e1571908 3853GEN_CRLOGIC(crxor, tcg_gen_xor_i32, 0x06);
99e300ef 3854
54623277 3855/* mcrf */
99e300ef 3856static void gen_mcrf(DisasContext *ctx)
79aceca5 3857{
47e4661c 3858 tcg_gen_mov_i32(cpu_crf[crfD(ctx->opcode)], cpu_crf[crfS(ctx->opcode)]);
79aceca5
FB
3859}
3860
3861/*** System linkage ***/
99e300ef 3862
c47493f2 3863/* rfi (supervisor only) */
99e300ef 3864static void gen_rfi(DisasContext *ctx)
79aceca5 3865{
9a64fbe4 3866#if defined(CONFIG_USER_ONLY)
9b2fadda 3867 GEN_PRIV;
9a64fbe4 3868#else
6ca038c2
BH
3869 /* This instruction doesn't exist anymore on 64-bit server
3870 * processors compliant with arch 2.x
a2e71b28 3871 */
6ca038c2
BH
3872 if (ctx->insns_flags & PPC_SEGMENT_64B) {
3873 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL);
3874 return;
3875 }
9a64fbe4 3876 /* Restore CPU state */
9b2fadda 3877 CHK_SV;
b6bac4bc 3878 gen_update_cfar(ctx, ctx->base.pc_next - 4);
e5f17ac6 3879 gen_helper_rfi(cpu_env);
e06fcd75 3880 gen_sync_exception(ctx);
9a64fbe4 3881#endif
79aceca5
FB
3882}
3883
426613db 3884#if defined(TARGET_PPC64)
99e300ef 3885static void gen_rfid(DisasContext *ctx)
426613db
JM
3886{
3887#if defined(CONFIG_USER_ONLY)
9b2fadda 3888 GEN_PRIV;
426613db
JM
3889#else
3890 /* Restore CPU state */
9b2fadda 3891 CHK_SV;
b6bac4bc 3892 gen_update_cfar(ctx, ctx->base.pc_next - 4);
e5f17ac6 3893 gen_helper_rfid(cpu_env);
e06fcd75 3894 gen_sync_exception(ctx);
426613db
JM
3895#endif
3896}
426613db 3897
99e300ef 3898static void gen_hrfid(DisasContext *ctx)
be147d08
JM
3899{
3900#if defined(CONFIG_USER_ONLY)
9b2fadda 3901 GEN_PRIV;
be147d08
JM
3902#else
3903 /* Restore CPU state */
9b2fadda 3904 CHK_HV;
e5f17ac6 3905 gen_helper_hrfid(cpu_env);
e06fcd75 3906 gen_sync_exception(ctx);
be147d08
JM
3907#endif
3908}
3909#endif
3910
79aceca5 3911/* sc */
417bf010
JM
3912#if defined(CONFIG_USER_ONLY)
3913#define POWERPC_SYSCALL POWERPC_EXCP_SYSCALL_USER
3914#else
3915#define POWERPC_SYSCALL POWERPC_EXCP_SYSCALL
3916#endif
99e300ef 3917static void gen_sc(DisasContext *ctx)
79aceca5 3918{
e1833e1f
JM
3919 uint32_t lev;
3920
3921 lev = (ctx->opcode >> 5) & 0x7F;
e06fcd75 3922 gen_exception_err(ctx, POWERPC_SYSCALL, lev);
79aceca5
FB
3923}
3924
3925/*** Trap ***/
99e300ef 3926
22b56ee5
BH
3927/* Check for unconditional traps (always or never) */
3928static bool check_unconditional_trap(DisasContext *ctx)
3929{
3930 /* Trap never */
3931 if (TO(ctx->opcode) == 0) {
3932 return true;
3933 }
3934 /* Trap always */
3935 if (TO(ctx->opcode) == 31) {
3936 gen_exception_err(ctx, POWERPC_EXCP_PROGRAM, POWERPC_EXCP_TRAP);
3937 return true;
3938 }
3939 return false;
3940}
3941
54623277 3942/* tw */
99e300ef 3943static void gen_tw(DisasContext *ctx)
79aceca5 3944{
22b56ee5
BH
3945 TCGv_i32 t0;
3946
3947 if (check_unconditional_trap(ctx)) {
3948 return;
3949 }
3950 t0 = tcg_const_i32(TO(ctx->opcode));
e5f17ac6
BS
3951 gen_helper_tw(cpu_env, cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)],
3952 t0);
cab3bee2 3953 tcg_temp_free_i32(t0);
79aceca5
FB
3954}
3955
3956/* twi */
99e300ef 3957static void gen_twi(DisasContext *ctx)
79aceca5 3958{
22b56ee5
BH
3959 TCGv t0;
3960 TCGv_i32 t1;
3961
3962 if (check_unconditional_trap(ctx)) {
3963 return;
3964 }
3965 t0 = tcg_const_tl(SIMM(ctx->opcode));
3966 t1 = tcg_const_i32(TO(ctx->opcode));
e5f17ac6 3967 gen_helper_tw(cpu_env, cpu_gpr[rA(ctx->opcode)], t0, t1);
cab3bee2
AJ
3968 tcg_temp_free(t0);
3969 tcg_temp_free_i32(t1);
79aceca5
FB
3970}
3971
d9bce9d9
JM
3972#if defined(TARGET_PPC64)
3973/* td */
99e300ef 3974static void gen_td(DisasContext *ctx)
d9bce9d9 3975{
22b56ee5
BH
3976 TCGv_i32 t0;
3977
3978 if (check_unconditional_trap(ctx)) {
3979 return;
3980 }
3981 t0 = tcg_const_i32(TO(ctx->opcode));
e5f17ac6
BS
3982 gen_helper_td(cpu_env, cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)],
3983 t0);
cab3bee2 3984 tcg_temp_free_i32(t0);
d9bce9d9
JM
3985}
3986
3987/* tdi */
99e300ef 3988static void gen_tdi(DisasContext *ctx)
d9bce9d9 3989{
22b56ee5
BH
3990 TCGv t0;
3991 TCGv_i32 t1;
3992
3993 if (check_unconditional_trap(ctx)) {
3994 return;
3995 }
3996 t0 = tcg_const_tl(SIMM(ctx->opcode));
3997 t1 = tcg_const_i32(TO(ctx->opcode));
e5f17ac6 3998 gen_helper_td(cpu_env, cpu_gpr[rA(ctx->opcode)], t0, t1);
cab3bee2
AJ
3999 tcg_temp_free(t0);
4000 tcg_temp_free_i32(t1);
d9bce9d9
JM
4001}
4002#endif
4003
79aceca5 4004/*** Processor control ***/
99e300ef 4005
dd09c361 4006static void gen_read_xer(DisasContext *ctx, TCGv dst)
da91a00f
RH
4007{
4008 TCGv t0 = tcg_temp_new();
4009 TCGv t1 = tcg_temp_new();
4010 TCGv t2 = tcg_temp_new();
4011 tcg_gen_mov_tl(dst, cpu_xer);
4012 tcg_gen_shli_tl(t0, cpu_so, XER_SO);
4013 tcg_gen_shli_tl(t1, cpu_ov, XER_OV);
4014 tcg_gen_shli_tl(t2, cpu_ca, XER_CA);
4015 tcg_gen_or_tl(t0, t0, t1);
4016 tcg_gen_or_tl(dst, dst, t2);
4017 tcg_gen_or_tl(dst, dst, t0);
dd09c361
ND
4018 if (is_isa300(ctx)) {
4019 tcg_gen_shli_tl(t0, cpu_ov32, XER_OV32);
4020 tcg_gen_or_tl(dst, dst, t0);
4021 tcg_gen_shli_tl(t0, cpu_ca32, XER_CA32);
4022 tcg_gen_or_tl(dst, dst, t0);
4023 }
da91a00f
RH
4024 tcg_temp_free(t0);
4025 tcg_temp_free(t1);
4026 tcg_temp_free(t2);
4027}
4028
4029static void gen_write_xer(TCGv src)
4030{
dd09c361 4031 /* Write all flags, while reading back check for isa300 */
da91a00f 4032 tcg_gen_andi_tl(cpu_xer, src,
dd09c361
ND
4033 ~((1u << XER_SO) |
4034 (1u << XER_OV) | (1u << XER_OV32) |
4035 (1u << XER_CA) | (1u << XER_CA32)));
4036 tcg_gen_extract_tl(cpu_ov32, src, XER_OV32, 1);
4037 tcg_gen_extract_tl(cpu_ca32, src, XER_CA32, 1);
1bd33d0d
ND
4038 tcg_gen_extract_tl(cpu_so, src, XER_SO, 1);
4039 tcg_gen_extract_tl(cpu_ov, src, XER_OV, 1);
4040 tcg_gen_extract_tl(cpu_ca, src, XER_CA, 1);
da91a00f
RH
4041}
4042
54623277 4043/* mcrxr */
99e300ef 4044static void gen_mcrxr(DisasContext *ctx)
79aceca5 4045{
da91a00f
RH
4046 TCGv_i32 t0 = tcg_temp_new_i32();
4047 TCGv_i32 t1 = tcg_temp_new_i32();
4048 TCGv_i32 dst = cpu_crf[crfD(ctx->opcode)];
4049
4050 tcg_gen_trunc_tl_i32(t0, cpu_so);
4051 tcg_gen_trunc_tl_i32(t1, cpu_ov);
4052 tcg_gen_trunc_tl_i32(dst, cpu_ca);
294d1292
SB
4053 tcg_gen_shli_i32(t0, t0, 3);
4054 tcg_gen_shli_i32(t1, t1, 2);
4055 tcg_gen_shli_i32(dst, dst, 1);
da91a00f
RH
4056 tcg_gen_or_i32(dst, dst, t0);
4057 tcg_gen_or_i32(dst, dst, t1);
4058 tcg_temp_free_i32(t0);
4059 tcg_temp_free_i32(t1);
4060
4061 tcg_gen_movi_tl(cpu_so, 0);
4062 tcg_gen_movi_tl(cpu_ov, 0);
4063 tcg_gen_movi_tl(cpu_ca, 0);
79aceca5
FB
4064}
4065
b63d0434
ND
4066#ifdef TARGET_PPC64
4067/* mcrxrx */
4068static void gen_mcrxrx(DisasContext *ctx)
4069{
4070 TCGv t0 = tcg_temp_new();
4071 TCGv t1 = tcg_temp_new();
4072 TCGv_i32 dst = cpu_crf[crfD(ctx->opcode)];
4073
4074 /* copy OV and OV32 */
4075 tcg_gen_shli_tl(t0, cpu_ov, 1);
4076 tcg_gen_or_tl(t0, t0, cpu_ov32);
4077 tcg_gen_shli_tl(t0, t0, 2);
4078 /* copy CA and CA32 */
4079 tcg_gen_shli_tl(t1, cpu_ca, 1);
4080 tcg_gen_or_tl(t1, t1, cpu_ca32);
4081 tcg_gen_or_tl(t0, t0, t1);
4082 tcg_gen_trunc_tl_i32(dst, t0);
4083 tcg_temp_free(t0);
4084 tcg_temp_free(t1);
4085}
4086#endif
4087
0cfe11ea 4088/* mfcr mfocrf */
99e300ef 4089static void gen_mfcr(DisasContext *ctx)
79aceca5 4090{
76a66253 4091 uint32_t crm, crn;
3b46e624 4092
76a66253
JM
4093 if (likely(ctx->opcode & 0x00100000)) {
4094 crm = CRM(ctx->opcode);
8dd640e4 4095 if (likely(crm && ((crm & (crm - 1)) == 0))) {
0cfe11ea 4096 crn = ctz32 (crm);
e1571908 4097 tcg_gen_extu_i32_tl(cpu_gpr[rD(ctx->opcode)], cpu_crf[7 - crn]);
0497d2f4
AJ
4098 tcg_gen_shli_tl(cpu_gpr[rD(ctx->opcode)],
4099 cpu_gpr[rD(ctx->opcode)], crn * 4);
76a66253 4100 }
d9bce9d9 4101 } else {
651721b2
AJ
4102 TCGv_i32 t0 = tcg_temp_new_i32();
4103 tcg_gen_mov_i32(t0, cpu_crf[0]);
4104 tcg_gen_shli_i32(t0, t0, 4);
4105 tcg_gen_or_i32(t0, t0, cpu_crf[1]);
4106 tcg_gen_shli_i32(t0, t0, 4);
4107 tcg_gen_or_i32(t0, t0, cpu_crf[2]);
4108 tcg_gen_shli_i32(t0, t0, 4);
4109 tcg_gen_or_i32(t0, t0, cpu_crf[3]);
4110 tcg_gen_shli_i32(t0, t0, 4);
4111 tcg_gen_or_i32(t0, t0, cpu_crf[4]);
4112 tcg_gen_shli_i32(t0, t0, 4);
4113 tcg_gen_or_i32(t0, t0, cpu_crf[5]);
4114 tcg_gen_shli_i32(t0, t0, 4);
4115 tcg_gen_or_i32(t0, t0, cpu_crf[6]);
4116 tcg_gen_shli_i32(t0, t0, 4);
4117 tcg_gen_or_i32(t0, t0, cpu_crf[7]);
4118 tcg_gen_extu_i32_tl(cpu_gpr[rD(ctx->opcode)], t0);
4119 tcg_temp_free_i32(t0);
d9bce9d9 4120 }
79aceca5
FB
4121}
4122
4123/* mfmsr */
99e300ef 4124static void gen_mfmsr(DisasContext *ctx)
79aceca5 4125{
9b2fadda 4126 CHK_SV;
6527f6ea 4127 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_msr);
79aceca5
FB
4128}
4129
69b058c8 4130static void spr_noaccess(DisasContext *ctx, int gprn, int sprn)
3fc6c082 4131{
7b13448f 4132#if 0
3fc6c082
FB
4133 sprn = ((sprn >> 5) & 0x1F) | ((sprn & 0x1F) << 5);
4134 printf("ERROR: try to access SPR %d !\n", sprn);
7b13448f 4135#endif
3fc6c082
FB
4136}
4137#define SPR_NOACCESS (&spr_noaccess)
3fc6c082 4138
79aceca5 4139/* mfspr */
636aa200 4140static inline void gen_op_mfspr(DisasContext *ctx)
79aceca5 4141{
69b058c8 4142 void (*read_cb)(DisasContext *ctx, int gprn, int sprn);
79aceca5
FB
4143 uint32_t sprn = SPR(ctx->opcode);
4144
eb94268e
BH
4145#if defined(CONFIG_USER_ONLY)
4146 read_cb = ctx->spr_cb[sprn].uea_read;
4147#else
4148 if (ctx->pr) {
4149 read_cb = ctx->spr_cb[sprn].uea_read;
4150 } else if (ctx->hv) {
be147d08 4151 read_cb = ctx->spr_cb[sprn].hea_read;
eb94268e 4152 } else {
3fc6c082 4153 read_cb = ctx->spr_cb[sprn].oea_read;
eb94268e 4154 }
9a64fbe4 4155#endif
76a66253
JM
4156 if (likely(read_cb != NULL)) {
4157 if (likely(read_cb != SPR_NOACCESS)) {
45d827d2 4158 (*read_cb)(ctx, rD(ctx->opcode), sprn);
3fc6c082
FB
4159 } else {
4160 /* Privilege exception */
9fceefa7
JM
4161 /* This is a hack to avoid warnings when running Linux:
4162 * this OS breaks the PowerPC virtualisation model,
4163 * allowing userland application to read the PVR
4164 */
4165 if (sprn != SPR_PVR) {
31085338
TH
4166 qemu_log_mask(LOG_GUEST_ERROR, "Trying to read privileged spr "
4167 "%d (0x%03x) at " TARGET_FMT_lx "\n", sprn, sprn,
4168 ctx->base.pc_next - 4);
f24e5695 4169 }
9b2fadda 4170 gen_priv_exception(ctx, POWERPC_EXCP_PRIV_REG);
79aceca5 4171 }
3fc6c082 4172 } else {
9b2fadda
BH
4173 /* ISA 2.07 defines these as no-ops */
4174 if ((ctx->insns_flags2 & PPC2_ISA207S) &&
4175 (sprn >= 808 && sprn <= 811)) {
4176 /* This is a nop */
4177 return;
4178 }
3fc6c082 4179 /* Not defined */
31085338
TH
4180 qemu_log_mask(LOG_GUEST_ERROR,
4181 "Trying to read invalid spr %d (0x%03x) at "
4182 TARGET_FMT_lx "\n", sprn, sprn, ctx->base.pc_next - 4);
9b2fadda
BH
4183
4184 /* The behaviour depends on MSR:PR and SPR# bit 0x10,
4185 * it can generate a priv, a hv emu or a no-op
4186 */
4187 if (sprn & 0x10) {
4188 if (ctx->pr) {
4189 gen_priv_exception(ctx, POWERPC_EXCP_INVAL_SPR);
4190 }
4191 } else {
4192 if (ctx->pr || sprn == 0 || sprn == 4 || sprn == 5 || sprn == 6) {
4193 gen_hvpriv_exception(ctx, POWERPC_EXCP_INVAL_SPR);
4194 }
4d6a0680 4195 }
79aceca5 4196 }
79aceca5
FB
4197}
4198
99e300ef 4199static void gen_mfspr(DisasContext *ctx)
79aceca5 4200{
3fc6c082 4201 gen_op_mfspr(ctx);
76a66253 4202}
3fc6c082
FB
4203
4204/* mftb */
99e300ef 4205static void gen_mftb(DisasContext *ctx)
3fc6c082
FB
4206{
4207 gen_op_mfspr(ctx);
79aceca5
FB
4208}
4209
0cfe11ea 4210/* mtcrf mtocrf*/
99e300ef 4211static void gen_mtcrf(DisasContext *ctx)
79aceca5 4212{
76a66253 4213 uint32_t crm, crn;
3b46e624 4214
76a66253 4215 crm = CRM(ctx->opcode);
8dd640e4 4216 if (likely((ctx->opcode & 0x00100000))) {
4217 if (crm && ((crm & (crm - 1)) == 0)) {
4218 TCGv_i32 temp = tcg_temp_new_i32();
0cfe11ea 4219 crn = ctz32 (crm);
8dd640e4 4220 tcg_gen_trunc_tl_i32(temp, cpu_gpr[rS(ctx->opcode)]);
0cfe11ea
AJ
4221 tcg_gen_shri_i32(temp, temp, crn * 4);
4222 tcg_gen_andi_i32(cpu_crf[7 - crn], temp, 0xf);
8dd640e4 4223 tcg_temp_free_i32(temp);
4224 }
76a66253 4225 } else {
651721b2
AJ
4226 TCGv_i32 temp = tcg_temp_new_i32();
4227 tcg_gen_trunc_tl_i32(temp, cpu_gpr[rS(ctx->opcode)]);
4228 for (crn = 0 ; crn < 8 ; crn++) {
4229 if (crm & (1 << crn)) {
4230 tcg_gen_shri_i32(cpu_crf[7 - crn], temp, crn * 4);
4231 tcg_gen_andi_i32(cpu_crf[7 - crn], cpu_crf[7 - crn], 0xf);
4232 }
4233 }
a7812ae4 4234 tcg_temp_free_i32(temp);
76a66253 4235 }
79aceca5
FB
4236}
4237
4238/* mtmsr */
426613db 4239#if defined(TARGET_PPC64)
99e300ef 4240static void gen_mtmsrd(DisasContext *ctx)
426613db 4241{
9b2fadda
BH
4242 CHK_SV;
4243
4244#if !defined(CONFIG_USER_ONLY)
be147d08
JM
4245 if (ctx->opcode & 0x00010000) {
4246 /* Special form that does not need any synchronisation */
6527f6ea
AJ
4247 TCGv t0 = tcg_temp_new();
4248 tcg_gen_andi_tl(t0, cpu_gpr[rS(ctx->opcode)], (1 << MSR_RI) | (1 << MSR_EE));
c409bc5d 4249 tcg_gen_andi_tl(cpu_msr, cpu_msr, ~(target_ulong)((1 << MSR_RI) | (1 << MSR_EE)));
6527f6ea
AJ
4250 tcg_gen_or_tl(cpu_msr, cpu_msr, t0);
4251 tcg_temp_free(t0);
be147d08 4252 } else {
056b05f8
JM
4253 /* XXX: we need to update nip before the store
4254 * if we enter power saving mode, we will exit the loop
4255 * directly from ppc_store_msr
4256 */
b6bac4bc 4257 gen_update_nip(ctx, ctx->base.pc_next);
e5f17ac6 4258 gen_helper_store_msr(cpu_env, cpu_gpr[rS(ctx->opcode)]);
be147d08
JM
4259 /* Must stop the translation as machine state (may have) changed */
4260 /* Note that mtmsr is not always defined as context-synchronizing */
e06fcd75 4261 gen_stop_exception(ctx);
be147d08 4262 }
9b2fadda 4263#endif /* !defined(CONFIG_USER_ONLY) */
426613db 4264}
9b2fadda 4265#endif /* defined(TARGET_PPC64) */
426613db 4266
99e300ef 4267static void gen_mtmsr(DisasContext *ctx)
79aceca5 4268{
9b2fadda
BH
4269 CHK_SV;
4270
4271#if !defined(CONFIG_USER_ONLY)
4272 if (ctx->opcode & 0x00010000) {
be147d08 4273 /* Special form that does not need any synchronisation */
6527f6ea
AJ
4274 TCGv t0 = tcg_temp_new();
4275 tcg_gen_andi_tl(t0, cpu_gpr[rS(ctx->opcode)], (1 << MSR_RI) | (1 << MSR_EE));
c409bc5d 4276 tcg_gen_andi_tl(cpu_msr, cpu_msr, ~(target_ulong)((1 << MSR_RI) | (1 << MSR_EE)));
6527f6ea
AJ
4277 tcg_gen_or_tl(cpu_msr, cpu_msr, t0);
4278 tcg_temp_free(t0);
be147d08 4279 } else {
8018dc63
AG
4280 TCGv msr = tcg_temp_new();
4281
056b05f8
JM
4282 /* XXX: we need to update nip before the store
4283 * if we enter power saving mode, we will exit the loop
4284 * directly from ppc_store_msr
4285 */
b6bac4bc 4286 gen_update_nip(ctx, ctx->base.pc_next);
d9bce9d9 4287#if defined(TARGET_PPC64)
8018dc63
AG
4288 tcg_gen_deposit_tl(msr, cpu_msr, cpu_gpr[rS(ctx->opcode)], 0, 32);
4289#else
4290 tcg_gen_mov_tl(msr, cpu_gpr[rS(ctx->opcode)]);
d9bce9d9 4291#endif
e5f17ac6 4292 gen_helper_store_msr(cpu_env, msr);
c80d1df5 4293 tcg_temp_free(msr);
be147d08 4294 /* Must stop the translation as machine state (may have) changed */
6527f6ea 4295 /* Note that mtmsr is not always defined as context-synchronizing */
e06fcd75 4296 gen_stop_exception(ctx);
be147d08 4297 }
9a64fbe4 4298#endif
79aceca5
FB
4299}
4300
4301/* mtspr */
99e300ef 4302static void gen_mtspr(DisasContext *ctx)
79aceca5 4303{
69b058c8 4304 void (*write_cb)(DisasContext *ctx, int sprn, int gprn);
79aceca5
FB
4305 uint32_t sprn = SPR(ctx->opcode);
4306
eb94268e
BH
4307#if defined(CONFIG_USER_ONLY)
4308 write_cb = ctx->spr_cb[sprn].uea_write;
4309#else
4310 if (ctx->pr) {
4311 write_cb = ctx->spr_cb[sprn].uea_write;
4312 } else if (ctx->hv) {
be147d08 4313 write_cb = ctx->spr_cb[sprn].hea_write;
eb94268e 4314 } else {
3fc6c082 4315 write_cb = ctx->spr_cb[sprn].oea_write;
eb94268e 4316 }
9a64fbe4 4317#endif
76a66253
JM
4318 if (likely(write_cb != NULL)) {
4319 if (likely(write_cb != SPR_NOACCESS)) {
45d827d2 4320 (*write_cb)(ctx, sprn, rS(ctx->opcode));
3fc6c082
FB
4321 } else {
4322 /* Privilege exception */
31085338
TH
4323 qemu_log_mask(LOG_GUEST_ERROR, "Trying to write privileged spr "
4324 "%d (0x%03x) at " TARGET_FMT_lx "\n", sprn, sprn,
4325 ctx->base.pc_next - 4);
9b2fadda 4326 gen_priv_exception(ctx, POWERPC_EXCP_PRIV_REG);
76a66253 4327 }
3fc6c082 4328 } else {
9b2fadda
BH
4329 /* ISA 2.07 defines these as no-ops */
4330 if ((ctx->insns_flags2 & PPC2_ISA207S) &&
4331 (sprn >= 808 && sprn <= 811)) {
4332 /* This is a nop */
4333 return;
4334 }
4335
3fc6c082 4336 /* Not defined */
31085338
TH
4337 qemu_log_mask(LOG_GUEST_ERROR,
4338 "Trying to write invalid spr %d (0x%03x) at "
4339 TARGET_FMT_lx "\n", sprn, sprn, ctx->base.pc_next - 4);
4d6a0680 4340
9b2fadda
BH
4341
4342 /* The behaviour depends on MSR:PR and SPR# bit 0x10,
4343 * it can generate a priv, a hv emu or a no-op
4344 */
4345 if (sprn & 0x10) {
4346 if (ctx->pr) {
4347 gen_priv_exception(ctx, POWERPC_EXCP_INVAL_SPR);
4348 }
4349 } else {
4350 if (ctx->pr || sprn == 0) {
4351 gen_hvpriv_exception(ctx, POWERPC_EXCP_INVAL_SPR);
4352 }
4d6a0680 4353 }
79aceca5 4354 }
79aceca5
FB
4355}
4356
dc2ee038
VAS
4357#if defined(TARGET_PPC64)
4358/* setb */
4359static void gen_setb(DisasContext *ctx)
4360{
4361 TCGv_i32 t0 = tcg_temp_new_i32();
4362 TCGv_i32 t8 = tcg_temp_new_i32();
4363 TCGv_i32 tm1 = tcg_temp_new_i32();
4364 int crf = crfS(ctx->opcode);
4365
4366 tcg_gen_setcondi_i32(TCG_COND_GEU, t0, cpu_crf[crf], 4);
4367 tcg_gen_movi_i32(t8, 8);
4368 tcg_gen_movi_i32(tm1, -1);
4369 tcg_gen_movcond_i32(TCG_COND_GEU, t0, cpu_crf[crf], t8, tm1, t0);
4370 tcg_gen_ext_i32_tl(cpu_gpr[rD(ctx->opcode)], t0);
4371
4372 tcg_temp_free_i32(t0);
4373 tcg_temp_free_i32(t8);
4374 tcg_temp_free_i32(tm1);
4375}
4376#endif
4377
79aceca5 4378/*** Cache management ***/
99e300ef 4379
54623277 4380/* dcbf */
99e300ef 4381static void gen_dcbf(DisasContext *ctx)
79aceca5 4382{
dac454af 4383 /* XXX: specification says this is treated as a load by the MMU */
76db3ba4
AJ
4384 TCGv t0;
4385 gen_set_access_type(ctx, ACCESS_CACHE);
4386 t0 = tcg_temp_new();
4387 gen_addr_reg_index(ctx, t0);
4388 gen_qemu_ld8u(ctx, t0, t0);
fea0c503 4389 tcg_temp_free(t0);
79aceca5
FB
4390}
4391
4392/* dcbi (Supervisor only) */
99e300ef 4393static void gen_dcbi(DisasContext *ctx)
79aceca5 4394{
a541f297 4395#if defined(CONFIG_USER_ONLY)
9b2fadda 4396 GEN_PRIV;
a541f297 4397#else
b61f2753 4398 TCGv EA, val;
9b2fadda
BH
4399
4400 CHK_SV;
a7812ae4 4401 EA = tcg_temp_new();
76db3ba4
AJ
4402 gen_set_access_type(ctx, ACCESS_CACHE);
4403 gen_addr_reg_index(ctx, EA);
a7812ae4 4404 val = tcg_temp_new();
76a66253 4405 /* XXX: specification says this should be treated as a store by the MMU */
76db3ba4
AJ
4406 gen_qemu_ld8u(ctx, val, EA);
4407 gen_qemu_st8(ctx, val, EA);
b61f2753
AJ
4408 tcg_temp_free(val);
4409 tcg_temp_free(EA);
9b2fadda 4410#endif /* defined(CONFIG_USER_ONLY) */
79aceca5
FB
4411}
4412
4413/* dcdst */
99e300ef 4414static void gen_dcbst(DisasContext *ctx)
79aceca5 4415{
76a66253 4416 /* XXX: specification say this is treated as a load by the MMU */
76db3ba4
AJ
4417 TCGv t0;
4418 gen_set_access_type(ctx, ACCESS_CACHE);
4419 t0 = tcg_temp_new();
4420 gen_addr_reg_index(ctx, t0);
4421 gen_qemu_ld8u(ctx, t0, t0);
fea0c503 4422 tcg_temp_free(t0);
79aceca5
FB
4423}
4424
4425/* dcbt */
99e300ef 4426static void gen_dcbt(DisasContext *ctx)
79aceca5 4427{
0db1b20e 4428 /* interpreted as no-op */
76a66253
JM
4429 /* XXX: specification say this is treated as a load by the MMU
4430 * but does not generate any exception
4431 */
79aceca5
FB
4432}
4433
4434/* dcbtst */
99e300ef 4435static void gen_dcbtst(DisasContext *ctx)
79aceca5 4436{
0db1b20e 4437 /* interpreted as no-op */
76a66253
JM
4438 /* XXX: specification say this is treated as a load by the MMU
4439 * but does not generate any exception
4440 */
79aceca5
FB
4441}
4442
4d09d529
AG
4443/* dcbtls */
4444static void gen_dcbtls(DisasContext *ctx)
4445{
4446 /* Always fails locking the cache */
4447 TCGv t0 = tcg_temp_new();
4448 gen_load_spr(t0, SPR_Exxx_L1CSR0);
4449 tcg_gen_ori_tl(t0, t0, L1CSR0_CUL);
4450 gen_store_spr(SPR_Exxx_L1CSR0, t0);
4451 tcg_temp_free(t0);
4452}
4453
79aceca5 4454/* dcbz */
99e300ef 4455static void gen_dcbz(DisasContext *ctx)
79aceca5 4456{
8e33944f 4457 TCGv tcgv_addr;
c9f82d01 4458 TCGv_i32 tcgv_op;
d63001d1 4459
76db3ba4 4460 gen_set_access_type(ctx, ACCESS_CACHE);
8e33944f 4461 tcgv_addr = tcg_temp_new();
c9f82d01 4462 tcgv_op = tcg_const_i32(ctx->opcode & 0x03FF000);
8e33944f 4463 gen_addr_reg_index(ctx, tcgv_addr);
c9f82d01 4464 gen_helper_dcbz(cpu_env, tcgv_addr, tcgv_op);
8e33944f 4465 tcg_temp_free(tcgv_addr);
c9f82d01 4466 tcg_temp_free_i32(tcgv_op);
79aceca5
FB
4467}
4468
ae1c1a3d 4469/* dst / dstt */
99e300ef 4470static void gen_dst(DisasContext *ctx)
ae1c1a3d
AJ
4471{
4472 if (rA(ctx->opcode) == 0) {
e41029b3 4473 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL);
ae1c1a3d
AJ
4474 } else {
4475 /* interpreted as no-op */
4476 }
4477}
4478
4479/* dstst /dststt */
99e300ef 4480static void gen_dstst(DisasContext *ctx)
ae1c1a3d
AJ
4481{
4482 if (rA(ctx->opcode) == 0) {
e41029b3 4483 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL);
ae1c1a3d
AJ
4484 } else {
4485 /* interpreted as no-op */
4486 }
4487
4488}
4489
4490/* dss / dssall */
99e300ef 4491static void gen_dss(DisasContext *ctx)
ae1c1a3d
AJ
4492{
4493 /* interpreted as no-op */
4494}
4495
79aceca5 4496/* icbi */
99e300ef 4497static void gen_icbi(DisasContext *ctx)
79aceca5 4498{
76db3ba4
AJ
4499 TCGv t0;
4500 gen_set_access_type(ctx, ACCESS_CACHE);
76db3ba4
AJ
4501 t0 = tcg_temp_new();
4502 gen_addr_reg_index(ctx, t0);
2f5a189c 4503 gen_helper_icbi(cpu_env, t0);
37d269df 4504 tcg_temp_free(t0);
79aceca5
FB
4505}
4506
4507/* Optional: */
4508/* dcba */
99e300ef 4509static void gen_dcba(DisasContext *ctx)
79aceca5 4510{
0db1b20e
JM
4511 /* interpreted as no-op */
4512 /* XXX: specification say this is treated as a store by the MMU
4513 * but does not generate any exception
4514 */
79aceca5
FB
4515}
4516
4517/*** Segment register manipulation ***/
4518/* Supervisor only: */
99e300ef 4519
54623277 4520/* mfsr */
99e300ef 4521static void gen_mfsr(DisasContext *ctx)
79aceca5 4522{
9a64fbe4 4523#if defined(CONFIG_USER_ONLY)
9b2fadda 4524 GEN_PRIV;
9a64fbe4 4525#else
74d37793 4526 TCGv t0;
9b2fadda
BH
4527
4528 CHK_SV;
74d37793 4529 t0 = tcg_const_tl(SR(ctx->opcode));
c6c7cf05 4530 gen_helper_load_sr(cpu_gpr[rD(ctx->opcode)], cpu_env, t0);
74d37793 4531 tcg_temp_free(t0);
9b2fadda 4532#endif /* defined(CONFIG_USER_ONLY) */
79aceca5
FB
4533}
4534
4535/* mfsrin */
99e300ef 4536static void gen_mfsrin(DisasContext *ctx)
79aceca5 4537{
9a64fbe4 4538#if defined(CONFIG_USER_ONLY)
9b2fadda 4539 GEN_PRIV;
9a64fbe4 4540#else
74d37793 4541 TCGv t0;
9b2fadda
BH
4542
4543 CHK_SV;
74d37793 4544 t0 = tcg_temp_new();
e2622073 4545 tcg_gen_extract_tl(t0, cpu_gpr[rB(ctx->opcode)], 28, 4);
c6c7cf05 4546 gen_helper_load_sr(cpu_gpr[rD(ctx->opcode)], cpu_env, t0);
74d37793 4547 tcg_temp_free(t0);
9b2fadda 4548#endif /* defined(CONFIG_USER_ONLY) */
79aceca5
FB
4549}
4550
4551/* mtsr */
99e300ef 4552static void gen_mtsr(DisasContext *ctx)
79aceca5 4553{
9a64fbe4 4554#if defined(CONFIG_USER_ONLY)
9b2fadda 4555 GEN_PRIV;
9a64fbe4 4556#else
74d37793 4557 TCGv t0;
9b2fadda
BH
4558
4559 CHK_SV;
74d37793 4560 t0 = tcg_const_tl(SR(ctx->opcode));
c6c7cf05 4561 gen_helper_store_sr(cpu_env, t0, cpu_gpr[rS(ctx->opcode)]);
74d37793 4562 tcg_temp_free(t0);
9b2fadda 4563#endif /* defined(CONFIG_USER_ONLY) */
79aceca5
FB
4564}
4565
4566/* mtsrin */
99e300ef 4567static void gen_mtsrin(DisasContext *ctx)
79aceca5 4568{
9a64fbe4 4569#if defined(CONFIG_USER_ONLY)
9b2fadda 4570 GEN_PRIV;
9a64fbe4 4571#else
74d37793 4572 TCGv t0;
9b2fadda
BH
4573 CHK_SV;
4574
74d37793 4575 t0 = tcg_temp_new();
e2622073 4576 tcg_gen_extract_tl(t0, cpu_gpr[rB(ctx->opcode)], 28, 4);
c6c7cf05 4577 gen_helper_store_sr(cpu_env, t0, cpu_gpr[rD(ctx->opcode)]);
74d37793 4578 tcg_temp_free(t0);
9b2fadda 4579#endif /* defined(CONFIG_USER_ONLY) */
79aceca5
FB
4580}
4581
12de9a39
JM
4582#if defined(TARGET_PPC64)
4583/* Specific implementation for PowerPC 64 "bridge" emulation using SLB */
e8eaa2c0 4584
54623277 4585/* mfsr */
e8eaa2c0 4586static void gen_mfsr_64b(DisasContext *ctx)
12de9a39
JM
4587{
4588#if defined(CONFIG_USER_ONLY)
9b2fadda 4589 GEN_PRIV;
12de9a39 4590#else
74d37793 4591 TCGv t0;
9b2fadda
BH
4592
4593 CHK_SV;
74d37793 4594 t0 = tcg_const_tl(SR(ctx->opcode));
c6c7cf05 4595 gen_helper_load_sr(cpu_gpr[rD(ctx->opcode)], cpu_env, t0);
74d37793 4596 tcg_temp_free(t0);
9b2fadda 4597#endif /* defined(CONFIG_USER_ONLY) */
12de9a39
JM
4598}
4599
4600/* mfsrin */
e8eaa2c0 4601static void gen_mfsrin_64b(DisasContext *ctx)
12de9a39
JM
4602{
4603#if defined(CONFIG_USER_ONLY)
9b2fadda 4604 GEN_PRIV;
12de9a39 4605#else
74d37793 4606 TCGv t0;
9b2fadda
BH
4607
4608 CHK_SV;
74d37793 4609 t0 = tcg_temp_new();
e2622073 4610 tcg_gen_extract_tl(t0, cpu_gpr[rB(ctx->opcode)], 28, 4);
c6c7cf05 4611 gen_helper_load_sr(cpu_gpr[rD(ctx->opcode)], cpu_env, t0);
74d37793 4612 tcg_temp_free(t0);
9b2fadda 4613#endif /* defined(CONFIG_USER_ONLY) */
12de9a39
JM
4614}
4615
4616/* mtsr */
e8eaa2c0 4617static void gen_mtsr_64b(DisasContext *ctx)
12de9a39
JM
4618{
4619#if defined(CONFIG_USER_ONLY)
9b2fadda 4620 GEN_PRIV;
12de9a39 4621#else
74d37793 4622 TCGv t0;
9b2fadda
BH
4623
4624 CHK_SV;
74d37793 4625 t0 = tcg_const_tl(SR(ctx->opcode));
c6c7cf05 4626 gen_helper_store_sr(cpu_env, t0, cpu_gpr[rS(ctx->opcode)]);
74d37793 4627 tcg_temp_free(t0);
9b2fadda 4628#endif /* defined(CONFIG_USER_ONLY) */
12de9a39
JM
4629}
4630
4631/* mtsrin */
e8eaa2c0 4632static void gen_mtsrin_64b(DisasContext *ctx)
12de9a39
JM
4633{
4634#if defined(CONFIG_USER_ONLY)
9b2fadda 4635 GEN_PRIV;
12de9a39 4636#else
74d37793 4637 TCGv t0;
9b2fadda
BH
4638
4639 CHK_SV;
74d37793 4640 t0 = tcg_temp_new();
e2622073 4641 tcg_gen_extract_tl(t0, cpu_gpr[rB(ctx->opcode)], 28, 4);
c6c7cf05 4642 gen_helper_store_sr(cpu_env, t0, cpu_gpr[rS(ctx->opcode)]);
74d37793 4643 tcg_temp_free(t0);
9b2fadda 4644#endif /* defined(CONFIG_USER_ONLY) */
12de9a39 4645}
f6b868fc
BS
4646
4647/* slbmte */
e8eaa2c0 4648static void gen_slbmte(DisasContext *ctx)
f6b868fc
BS
4649{
4650#if defined(CONFIG_USER_ONLY)
9b2fadda 4651 GEN_PRIV;
f6b868fc 4652#else
9b2fadda
BH
4653 CHK_SV;
4654
c6c7cf05
BS
4655 gen_helper_store_slb(cpu_env, cpu_gpr[rB(ctx->opcode)],
4656 cpu_gpr[rS(ctx->opcode)]);
9b2fadda 4657#endif /* defined(CONFIG_USER_ONLY) */
f6b868fc
BS
4658}
4659
efdef95f
DG
4660static void gen_slbmfee(DisasContext *ctx)
4661{
4662#if defined(CONFIG_USER_ONLY)
9b2fadda 4663 GEN_PRIV;
efdef95f 4664#else
9b2fadda
BH
4665 CHK_SV;
4666
c6c7cf05 4667 gen_helper_load_slb_esid(cpu_gpr[rS(ctx->opcode)], cpu_env,
efdef95f 4668 cpu_gpr[rB(ctx->opcode)]);
9b2fadda 4669#endif /* defined(CONFIG_USER_ONLY) */
efdef95f
DG
4670}
4671
4672static void gen_slbmfev(DisasContext *ctx)
4673{
4674#if defined(CONFIG_USER_ONLY)
9b2fadda 4675 GEN_PRIV;
efdef95f 4676#else
9b2fadda
BH
4677 CHK_SV;
4678
c6c7cf05 4679 gen_helper_load_slb_vsid(cpu_gpr[rS(ctx->opcode)], cpu_env,
efdef95f 4680 cpu_gpr[rB(ctx->opcode)]);
9b2fadda 4681#endif /* defined(CONFIG_USER_ONLY) */
efdef95f 4682}
c76c22d5
BH
4683
4684static void gen_slbfee_(DisasContext *ctx)
4685{
4686#if defined(CONFIG_USER_ONLY)
4687 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_REG);
4688#else
4689 TCGLabel *l1, *l2;
4690
4691 if (unlikely(ctx->pr)) {
4692 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_REG);
4693 return;
4694 }
4695 gen_helper_find_slb_vsid(cpu_gpr[rS(ctx->opcode)], cpu_env,
4696 cpu_gpr[rB(ctx->opcode)]);
4697 l1 = gen_new_label();
4698 l2 = gen_new_label();
4699 tcg_gen_trunc_tl_i32(cpu_crf[0], cpu_so);
4700 tcg_gen_brcondi_tl(TCG_COND_EQ, cpu_gpr[rS(ctx->opcode)], -1, l1);
efa73196 4701 tcg_gen_ori_i32(cpu_crf[0], cpu_crf[0], CRF_EQ);
c76c22d5
BH
4702 tcg_gen_br(l2);
4703 gen_set_label(l1);
4704 tcg_gen_movi_tl(cpu_gpr[rS(ctx->opcode)], 0);
4705 gen_set_label(l2);
4706#endif
4707}
12de9a39
JM
4708#endif /* defined(TARGET_PPC64) */
4709
79aceca5 4710/*** Lookaside buffer management ***/
c47493f2 4711/* Optional & supervisor only: */
99e300ef 4712
54623277 4713/* tlbia */
99e300ef 4714static void gen_tlbia(DisasContext *ctx)
79aceca5 4715{
9a64fbe4 4716#if defined(CONFIG_USER_ONLY)
9b2fadda 4717 GEN_PRIV;
9a64fbe4 4718#else
9b2fadda
BH
4719 CHK_HV;
4720
c6c7cf05 4721 gen_helper_tlbia(cpu_env);
9b2fadda 4722#endif /* defined(CONFIG_USER_ONLY) */
79aceca5
FB
4723}
4724
bf14b1ce 4725/* tlbiel */
99e300ef 4726static void gen_tlbiel(DisasContext *ctx)
bf14b1ce
BS
4727{
4728#if defined(CONFIG_USER_ONLY)
9b2fadda 4729 GEN_PRIV;
bf14b1ce 4730#else
9b2fadda
BH
4731 CHK_SV;
4732
c6c7cf05 4733 gen_helper_tlbie(cpu_env, cpu_gpr[rB(ctx->opcode)]);
9b2fadda 4734#endif /* defined(CONFIG_USER_ONLY) */
bf14b1ce
BS
4735}
4736
79aceca5 4737/* tlbie */
99e300ef 4738static void gen_tlbie(DisasContext *ctx)
79aceca5 4739{
9a64fbe4 4740#if defined(CONFIG_USER_ONLY)
9b2fadda 4741 GEN_PRIV;
9a64fbe4 4742#else
d76ab5e1 4743 TCGv_i32 t1;
c6fd28fd
SJS
4744
4745 if (ctx->gtse) {
91c60f12 4746 CHK_SV; /* If gtse is set then tlbie is supervisor privileged */
c6fd28fd
SJS
4747 } else {
4748 CHK_HV; /* Else hypervisor privileged */
4749 }
9b2fadda 4750
9ca3f7f3 4751 if (NARROW_MODE(ctx)) {
74d37793
AJ
4752 TCGv t0 = tcg_temp_new();
4753 tcg_gen_ext32u_tl(t0, cpu_gpr[rB(ctx->opcode)]);
c6c7cf05 4754 gen_helper_tlbie(cpu_env, t0);
74d37793 4755 tcg_temp_free(t0);
9ca3f7f3 4756 } else {
c6c7cf05 4757 gen_helper_tlbie(cpu_env, cpu_gpr[rB(ctx->opcode)]);
9ca3f7f3 4758 }
d76ab5e1
ND
4759 t1 = tcg_temp_new_i32();
4760 tcg_gen_ld_i32(t1, cpu_env, offsetof(CPUPPCState, tlb_need_flush));
4761 tcg_gen_ori_i32(t1, t1, TLB_NEED_GLOBAL_FLUSH);
4762 tcg_gen_st_i32(t1, cpu_env, offsetof(CPUPPCState, tlb_need_flush));
4763 tcg_temp_free_i32(t1);
9b2fadda 4764#endif /* defined(CONFIG_USER_ONLY) */
79aceca5
FB
4765}
4766
4767/* tlbsync */
99e300ef 4768static void gen_tlbsync(DisasContext *ctx)
79aceca5 4769{
9a64fbe4 4770#if defined(CONFIG_USER_ONLY)
9b2fadda 4771 GEN_PRIV;
9a64fbe4 4772#else
91c60f12
CLG
4773
4774 if (ctx->gtse) {
4775 CHK_SV; /* If gtse is set then tlbsync is supervisor privileged */
4776 } else {
4777 CHK_HV; /* Else hypervisor privileged */
4778 }
9b2fadda 4779
e3cffe6f
ND
4780 /* BookS does both ptesync and tlbsync make tlbsync a nop for server */
4781 if (ctx->insns_flags & PPC_BOOKE) {
4782 gen_check_tlb_flush(ctx, true);
4783 }
9b2fadda 4784#endif /* defined(CONFIG_USER_ONLY) */
79aceca5
FB
4785}
4786
426613db
JM
4787#if defined(TARGET_PPC64)
4788/* slbia */
99e300ef 4789static void gen_slbia(DisasContext *ctx)
426613db
JM
4790{
4791#if defined(CONFIG_USER_ONLY)
9b2fadda 4792 GEN_PRIV;
426613db 4793#else
9b2fadda
BH
4794 CHK_SV;
4795
c6c7cf05 4796 gen_helper_slbia(cpu_env);
9b2fadda 4797#endif /* defined(CONFIG_USER_ONLY) */
426613db
JM
4798}
4799
4800/* slbie */
99e300ef 4801static void gen_slbie(DisasContext *ctx)
426613db
JM
4802{
4803#if defined(CONFIG_USER_ONLY)
9b2fadda 4804 GEN_PRIV;
426613db 4805#else
9b2fadda
BH
4806 CHK_SV;
4807
c6c7cf05 4808 gen_helper_slbie(cpu_env, cpu_gpr[rB(ctx->opcode)]);
9b2fadda 4809#endif /* defined(CONFIG_USER_ONLY) */
426613db 4810}
a63f1dfc
ND
4811
4812/* slbieg */
4813static void gen_slbieg(DisasContext *ctx)
4814{
4815#if defined(CONFIG_USER_ONLY)
4816 GEN_PRIV;
4817#else
4818 CHK_SV;
4819
4820 gen_helper_slbieg(cpu_env, cpu_gpr[rB(ctx->opcode)]);
4821#endif /* defined(CONFIG_USER_ONLY) */
4822}
4823
62d897ca
ND
4824/* slbsync */
4825static void gen_slbsync(DisasContext *ctx)
4826{
4827#if defined(CONFIG_USER_ONLY)
4828 GEN_PRIV;
4829#else
4830 CHK_SV;
4831 gen_check_tlb_flush(ctx, true);
4832#endif /* defined(CONFIG_USER_ONLY) */
4833}
4834
9b2fadda 4835#endif /* defined(TARGET_PPC64) */
426613db 4836
79aceca5
FB
4837/*** External control ***/
4838/* Optional: */
99e300ef 4839
54623277 4840/* eciwx */
99e300ef 4841static void gen_eciwx(DisasContext *ctx)
79aceca5 4842{
76db3ba4 4843 TCGv t0;
fa407c03 4844 /* Should check EAR[E] ! */
76db3ba4
AJ
4845 gen_set_access_type(ctx, ACCESS_EXT);
4846 t0 = tcg_temp_new();
4847 gen_addr_reg_index(ctx, t0);
c674a983
RH
4848 tcg_gen_qemu_ld_tl(cpu_gpr[rD(ctx->opcode)], t0, ctx->mem_idx,
4849 DEF_MEMOP(MO_UL | MO_ALIGN));
fa407c03 4850 tcg_temp_free(t0);
76a66253
JM
4851}
4852
4853/* ecowx */
99e300ef 4854static void gen_ecowx(DisasContext *ctx)
76a66253 4855{
76db3ba4 4856 TCGv t0;
fa407c03 4857 /* Should check EAR[E] ! */
76db3ba4
AJ
4858 gen_set_access_type(ctx, ACCESS_EXT);
4859 t0 = tcg_temp_new();
4860 gen_addr_reg_index(ctx, t0);
c674a983
RH
4861 tcg_gen_qemu_st_tl(cpu_gpr[rD(ctx->opcode)], t0, ctx->mem_idx,
4862 DEF_MEMOP(MO_UL | MO_ALIGN));
fa407c03 4863 tcg_temp_free(t0);
76a66253
JM
4864}
4865
4866/* PowerPC 601 specific instructions */
99e300ef 4867
54623277 4868/* abs - abs. */
99e300ef 4869static void gen_abs(DisasContext *ctx)
76a66253 4870{
42a268c2
RH
4871 TCGLabel *l1 = gen_new_label();
4872 TCGLabel *l2 = gen_new_label();
22e0e173
AJ
4873 tcg_gen_brcondi_tl(TCG_COND_GE, cpu_gpr[rA(ctx->opcode)], 0, l1);
4874 tcg_gen_neg_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
4875 tcg_gen_br(l2);
4876 gen_set_label(l1);
4877 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
4878 gen_set_label(l2);
76a66253 4879 if (unlikely(Rc(ctx->opcode) != 0))
22e0e173 4880 gen_set_Rc0(ctx, cpu_gpr[rD(ctx->opcode)]);
76a66253
JM
4881}
4882
4883/* abso - abso. */
99e300ef 4884static void gen_abso(DisasContext *ctx)
76a66253 4885{
42a268c2
RH
4886 TCGLabel *l1 = gen_new_label();
4887 TCGLabel *l2 = gen_new_label();
4888 TCGLabel *l3 = gen_new_label();
22e0e173 4889 /* Start with XER OV disabled, the most likely case */
da91a00f 4890 tcg_gen_movi_tl(cpu_ov, 0);
22e0e173
AJ
4891 tcg_gen_brcondi_tl(TCG_COND_GE, cpu_gpr[rA(ctx->opcode)], 0, l2);
4892 tcg_gen_brcondi_tl(TCG_COND_NE, cpu_gpr[rA(ctx->opcode)], 0x80000000, l1);
da91a00f
RH
4893 tcg_gen_movi_tl(cpu_ov, 1);
4894 tcg_gen_movi_tl(cpu_so, 1);
22e0e173
AJ
4895 tcg_gen_br(l2);
4896 gen_set_label(l1);
4897 tcg_gen_neg_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
4898 tcg_gen_br(l3);
4899 gen_set_label(l2);
4900 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
4901 gen_set_label(l3);
76a66253 4902 if (unlikely(Rc(ctx->opcode) != 0))
22e0e173 4903 gen_set_Rc0(ctx, cpu_gpr[rD(ctx->opcode)]);
76a66253
JM
4904}
4905
4906/* clcs */
99e300ef 4907static void gen_clcs(DisasContext *ctx)
76a66253 4908{
22e0e173 4909 TCGv_i32 t0 = tcg_const_i32(rA(ctx->opcode));
d523dd00 4910 gen_helper_clcs(cpu_gpr[rD(ctx->opcode)], cpu_env, t0);
22e0e173 4911 tcg_temp_free_i32(t0);
c7697e1f 4912 /* Rc=1 sets CR0 to an undefined state */
76a66253
JM
4913}
4914
4915/* div - div. */
99e300ef 4916static void gen_div(DisasContext *ctx)
76a66253 4917{
d15f74fb
BS
4918 gen_helper_div(cpu_gpr[rD(ctx->opcode)], cpu_env, cpu_gpr[rA(ctx->opcode)],
4919 cpu_gpr[rB(ctx->opcode)]);
76a66253 4920 if (unlikely(Rc(ctx->opcode) != 0))
22e0e173 4921 gen_set_Rc0(ctx, cpu_gpr[rD(ctx->opcode)]);
76a66253
JM
4922}
4923
4924/* divo - divo. */
99e300ef 4925static void gen_divo(DisasContext *ctx)
76a66253 4926{
d15f74fb
BS
4927 gen_helper_divo(cpu_gpr[rD(ctx->opcode)], cpu_env, cpu_gpr[rA(ctx->opcode)],
4928 cpu_gpr[rB(ctx->opcode)]);
76a66253 4929 if (unlikely(Rc(ctx->opcode) != 0))
22e0e173 4930 gen_set_Rc0(ctx, cpu_gpr[rD(ctx->opcode)]);
76a66253
JM
4931}
4932
4933/* divs - divs. */
99e300ef 4934static void gen_divs(DisasContext *ctx)
76a66253 4935{
d15f74fb
BS
4936 gen_helper_divs(cpu_gpr[rD(ctx->opcode)], cpu_env, cpu_gpr[rA(ctx->opcode)],
4937 cpu_gpr[rB(ctx->opcode)]);
76a66253 4938 if (unlikely(Rc(ctx->opcode) != 0))
22e0e173 4939 gen_set_Rc0(ctx, cpu_gpr[rD(ctx->opcode)]);
76a66253
JM
4940}
4941
4942/* divso - divso. */
99e300ef 4943static void gen_divso(DisasContext *ctx)
76a66253 4944{
d15f74fb
BS
4945 gen_helper_divso(cpu_gpr[rD(ctx->opcode)], cpu_env,
4946 cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)]);
76a66253 4947 if (unlikely(Rc(ctx->opcode) != 0))
22e0e173 4948 gen_set_Rc0(ctx, cpu_gpr[rD(ctx->opcode)]);
76a66253
JM
4949}
4950
4951/* doz - doz. */
99e300ef 4952static void gen_doz(DisasContext *ctx)
76a66253 4953{
42a268c2
RH
4954 TCGLabel *l1 = gen_new_label();
4955 TCGLabel *l2 = gen_new_label();
22e0e173
AJ
4956 tcg_gen_brcond_tl(TCG_COND_GE, cpu_gpr[rB(ctx->opcode)], cpu_gpr[rA(ctx->opcode)], l1);
4957 tcg_gen_sub_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rB(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
4958 tcg_gen_br(l2);
4959 gen_set_label(l1);
4960 tcg_gen_movi_tl(cpu_gpr[rD(ctx->opcode)], 0);
4961 gen_set_label(l2);
76a66253 4962 if (unlikely(Rc(ctx->opcode) != 0))
22e0e173 4963 gen_set_Rc0(ctx, cpu_gpr[rD(ctx->opcode)]);
76a66253
JM
4964}
4965
4966/* dozo - dozo. */
99e300ef 4967static void gen_dozo(DisasContext *ctx)
76a66253 4968{
42a268c2
RH
4969 TCGLabel *l1 = gen_new_label();
4970 TCGLabel *l2 = gen_new_label();
22e0e173
AJ
4971 TCGv t0 = tcg_temp_new();
4972 TCGv t1 = tcg_temp_new();
4973 TCGv t2 = tcg_temp_new();
4974 /* Start with XER OV disabled, the most likely case */
da91a00f 4975 tcg_gen_movi_tl(cpu_ov, 0);
22e0e173
AJ
4976 tcg_gen_brcond_tl(TCG_COND_GE, cpu_gpr[rB(ctx->opcode)], cpu_gpr[rA(ctx->opcode)], l1);
4977 tcg_gen_sub_tl(t0, cpu_gpr[rB(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
4978 tcg_gen_xor_tl(t1, cpu_gpr[rB(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
4979 tcg_gen_xor_tl(t2, cpu_gpr[rA(ctx->opcode)], t0);
4980 tcg_gen_andc_tl(t1, t1, t2);
4981 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], t0);
4982 tcg_gen_brcondi_tl(TCG_COND_GE, t1, 0, l2);
da91a00f
RH
4983 tcg_gen_movi_tl(cpu_ov, 1);
4984 tcg_gen_movi_tl(cpu_so, 1);
22e0e173
AJ
4985 tcg_gen_br(l2);
4986 gen_set_label(l1);
4987 tcg_gen_movi_tl(cpu_gpr[rD(ctx->opcode)], 0);
4988 gen_set_label(l2);
4989 tcg_temp_free(t0);
4990 tcg_temp_free(t1);
4991 tcg_temp_free(t2);
76a66253 4992 if (unlikely(Rc(ctx->opcode) != 0))
22e0e173 4993 gen_set_Rc0(ctx, cpu_gpr[rD(ctx->opcode)]);
76a66253
JM
4994}
4995
4996/* dozi */
99e300ef 4997static void gen_dozi(DisasContext *ctx)
76a66253 4998{
22e0e173 4999 target_long simm = SIMM(ctx->opcode);
42a268c2
RH
5000 TCGLabel *l1 = gen_new_label();
5001 TCGLabel *l2 = gen_new_label();
22e0e173
AJ
5002 tcg_gen_brcondi_tl(TCG_COND_LT, cpu_gpr[rA(ctx->opcode)], simm, l1);
5003 tcg_gen_subfi_tl(cpu_gpr[rD(ctx->opcode)], simm, cpu_gpr[rA(ctx->opcode)]);
5004 tcg_gen_br(l2);
5005 gen_set_label(l1);
5006 tcg_gen_movi_tl(cpu_gpr[rD(ctx->opcode)], 0);
5007 gen_set_label(l2);
5008 if (unlikely(Rc(ctx->opcode) != 0))
5009 gen_set_Rc0(ctx, cpu_gpr[rD(ctx->opcode)]);
76a66253
JM
5010}
5011
76a66253 5012/* lscbx - lscbx. */
99e300ef 5013static void gen_lscbx(DisasContext *ctx)
76a66253 5014{
bdb4b689
AJ
5015 TCGv t0 = tcg_temp_new();
5016 TCGv_i32 t1 = tcg_const_i32(rD(ctx->opcode));
5017 TCGv_i32 t2 = tcg_const_i32(rA(ctx->opcode));
5018 TCGv_i32 t3 = tcg_const_i32(rB(ctx->opcode));
76a66253 5019
76db3ba4 5020 gen_addr_reg_index(ctx, t0);
2f5a189c 5021 gen_helper_lscbx(t0, cpu_env, t0, t1, t2, t3);
bdb4b689
AJ
5022 tcg_temp_free_i32(t1);
5023 tcg_temp_free_i32(t2);
5024 tcg_temp_free_i32(t3);
3d7b417e 5025 tcg_gen_andi_tl(cpu_xer, cpu_xer, ~0x7F);
bdb4b689 5026 tcg_gen_or_tl(cpu_xer, cpu_xer, t0);
76a66253 5027 if (unlikely(Rc(ctx->opcode) != 0))
bdb4b689
AJ
5028 gen_set_Rc0(ctx, t0);
5029 tcg_temp_free(t0);
76a66253
JM
5030}
5031
5032/* maskg - maskg. */
99e300ef 5033static void gen_maskg(DisasContext *ctx)
76a66253 5034{
42a268c2 5035 TCGLabel *l1 = gen_new_label();
22e0e173
AJ
5036 TCGv t0 = tcg_temp_new();
5037 TCGv t1 = tcg_temp_new();
5038 TCGv t2 = tcg_temp_new();
5039 TCGv t3 = tcg_temp_new();
5040 tcg_gen_movi_tl(t3, 0xFFFFFFFF);
5041 tcg_gen_andi_tl(t0, cpu_gpr[rB(ctx->opcode)], 0x1F);
5042 tcg_gen_andi_tl(t1, cpu_gpr[rS(ctx->opcode)], 0x1F);
5043 tcg_gen_addi_tl(t2, t0, 1);
5044 tcg_gen_shr_tl(t2, t3, t2);
5045 tcg_gen_shr_tl(t3, t3, t1);
5046 tcg_gen_xor_tl(cpu_gpr[rA(ctx->opcode)], t2, t3);
5047 tcg_gen_brcond_tl(TCG_COND_GE, t0, t1, l1);
5048 tcg_gen_neg_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
5049 gen_set_label(l1);
5050 tcg_temp_free(t0);
5051 tcg_temp_free(t1);
5052 tcg_temp_free(t2);
5053 tcg_temp_free(t3);
76a66253 5054 if (unlikely(Rc(ctx->opcode) != 0))
22e0e173 5055 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
5056}
5057
5058/* maskir - maskir. */
99e300ef 5059static void gen_maskir(DisasContext *ctx)
76a66253 5060{
22e0e173
AJ
5061 TCGv t0 = tcg_temp_new();
5062 TCGv t1 = tcg_temp_new();
5063 tcg_gen_and_tl(t0, cpu_gpr[rS(ctx->opcode)], cpu_gpr[rB(ctx->opcode)]);
5064 tcg_gen_andc_tl(t1, cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)]);
5065 tcg_gen_or_tl(cpu_gpr[rA(ctx->opcode)], t0, t1);
5066 tcg_temp_free(t0);
5067 tcg_temp_free(t1);
76a66253 5068 if (unlikely(Rc(ctx->opcode) != 0))
22e0e173 5069 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
5070}
5071
5072/* mul - mul. */
99e300ef 5073static void gen_mul(DisasContext *ctx)
76a66253 5074{
22e0e173
AJ
5075 TCGv_i64 t0 = tcg_temp_new_i64();
5076 TCGv_i64 t1 = tcg_temp_new_i64();
5077 TCGv t2 = tcg_temp_new();
5078 tcg_gen_extu_tl_i64(t0, cpu_gpr[rA(ctx->opcode)]);
5079 tcg_gen_extu_tl_i64(t1, cpu_gpr[rB(ctx->opcode)]);
5080 tcg_gen_mul_i64(t0, t0, t1);
5081 tcg_gen_trunc_i64_tl(t2, t0);
5082 gen_store_spr(SPR_MQ, t2);
5083 tcg_gen_shri_i64(t1, t0, 32);
5084 tcg_gen_trunc_i64_tl(cpu_gpr[rD(ctx->opcode)], t1);
5085 tcg_temp_free_i64(t0);
5086 tcg_temp_free_i64(t1);
5087 tcg_temp_free(t2);
76a66253 5088 if (unlikely(Rc(ctx->opcode) != 0))
22e0e173 5089 gen_set_Rc0(ctx, cpu_gpr[rD(ctx->opcode)]);
76a66253
JM
5090}
5091
5092/* mulo - mulo. */
99e300ef 5093static void gen_mulo(DisasContext *ctx)
76a66253 5094{
42a268c2 5095 TCGLabel *l1 = gen_new_label();
22e0e173
AJ
5096 TCGv_i64 t0 = tcg_temp_new_i64();
5097 TCGv_i64 t1 = tcg_temp_new_i64();
5098 TCGv t2 = tcg_temp_new();
5099 /* Start with XER OV disabled, the most likely case */
da91a00f 5100 tcg_gen_movi_tl(cpu_ov, 0);
22e0e173
AJ
5101 tcg_gen_extu_tl_i64(t0, cpu_gpr[rA(ctx->opcode)]);
5102 tcg_gen_extu_tl_i64(t1, cpu_gpr[rB(ctx->opcode)]);
5103 tcg_gen_mul_i64(t0, t0, t1);
5104 tcg_gen_trunc_i64_tl(t2, t0);
5105 gen_store_spr(SPR_MQ, t2);
5106 tcg_gen_shri_i64(t1, t0, 32);
5107 tcg_gen_trunc_i64_tl(cpu_gpr[rD(ctx->opcode)], t1);
5108 tcg_gen_ext32s_i64(t1, t0);
5109 tcg_gen_brcond_i64(TCG_COND_EQ, t0, t1, l1);
da91a00f
RH
5110 tcg_gen_movi_tl(cpu_ov, 1);
5111 tcg_gen_movi_tl(cpu_so, 1);
22e0e173
AJ
5112 gen_set_label(l1);
5113 tcg_temp_free_i64(t0);
5114 tcg_temp_free_i64(t1);
5115 tcg_temp_free(t2);
76a66253 5116 if (unlikely(Rc(ctx->opcode) != 0))
22e0e173 5117 gen_set_Rc0(ctx, cpu_gpr[rD(ctx->opcode)]);
76a66253
JM
5118}
5119
5120/* nabs - nabs. */
99e300ef 5121static void gen_nabs(DisasContext *ctx)
76a66253 5122{
42a268c2
RH
5123 TCGLabel *l1 = gen_new_label();
5124 TCGLabel *l2 = gen_new_label();
22e0e173
AJ
5125 tcg_gen_brcondi_tl(TCG_COND_GT, cpu_gpr[rA(ctx->opcode)], 0, l1);
5126 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
5127 tcg_gen_br(l2);
5128 gen_set_label(l1);
5129 tcg_gen_neg_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
5130 gen_set_label(l2);
76a66253 5131 if (unlikely(Rc(ctx->opcode) != 0))
22e0e173 5132 gen_set_Rc0(ctx, cpu_gpr[rD(ctx->opcode)]);
76a66253
JM
5133}
5134
5135/* nabso - nabso. */
99e300ef 5136static void gen_nabso(DisasContext *ctx)
76a66253 5137{
42a268c2
RH
5138 TCGLabel *l1 = gen_new_label();
5139 TCGLabel *l2 = gen_new_label();
22e0e173
AJ
5140 tcg_gen_brcondi_tl(TCG_COND_GT, cpu_gpr[rA(ctx->opcode)], 0, l1);
5141 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
5142 tcg_gen_br(l2);
5143 gen_set_label(l1);
5144 tcg_gen_neg_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
5145 gen_set_label(l2);
5146 /* nabs never overflows */
da91a00f 5147 tcg_gen_movi_tl(cpu_ov, 0);
76a66253 5148 if (unlikely(Rc(ctx->opcode) != 0))
22e0e173 5149 gen_set_Rc0(ctx, cpu_gpr[rD(ctx->opcode)]);
76a66253
JM
5150}
5151
5152/* rlmi - rlmi. */
99e300ef 5153static void gen_rlmi(DisasContext *ctx)
76a66253 5154{
7487953d
AJ
5155 uint32_t mb = MB(ctx->opcode);
5156 uint32_t me = ME(ctx->opcode);
5157 TCGv t0 = tcg_temp_new();
5158 tcg_gen_andi_tl(t0, cpu_gpr[rB(ctx->opcode)], 0x1F);
5159 tcg_gen_rotl_tl(t0, cpu_gpr[rS(ctx->opcode)], t0);
5160 tcg_gen_andi_tl(t0, t0, MASK(mb, me));
5161 tcg_gen_andi_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rA(ctx->opcode)], ~MASK(mb, me));
5162 tcg_gen_or_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rA(ctx->opcode)], t0);
5163 tcg_temp_free(t0);
76a66253 5164 if (unlikely(Rc(ctx->opcode) != 0))
7487953d 5165 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
5166}
5167
5168/* rrib - rrib. */
99e300ef 5169static void gen_rrib(DisasContext *ctx)
76a66253 5170{
7487953d
AJ
5171 TCGv t0 = tcg_temp_new();
5172 TCGv t1 = tcg_temp_new();
5173 tcg_gen_andi_tl(t0, cpu_gpr[rB(ctx->opcode)], 0x1F);
5174 tcg_gen_movi_tl(t1, 0x80000000);
5175 tcg_gen_shr_tl(t1, t1, t0);
5176 tcg_gen_shr_tl(t0, cpu_gpr[rS(ctx->opcode)], t0);
5177 tcg_gen_and_tl(t0, t0, t1);
5178 tcg_gen_andc_tl(t1, cpu_gpr[rA(ctx->opcode)], t1);
5179 tcg_gen_or_tl(cpu_gpr[rA(ctx->opcode)], t0, t1);
5180 tcg_temp_free(t0);
5181 tcg_temp_free(t1);
76a66253 5182 if (unlikely(Rc(ctx->opcode) != 0))
7487953d 5183 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
5184}
5185
5186/* sle - sle. */
99e300ef 5187static void gen_sle(DisasContext *ctx)
76a66253 5188{
7487953d
AJ
5189 TCGv t0 = tcg_temp_new();
5190 TCGv t1 = tcg_temp_new();
5191 tcg_gen_andi_tl(t1, cpu_gpr[rB(ctx->opcode)], 0x1F);
5192 tcg_gen_shl_tl(t0, cpu_gpr[rS(ctx->opcode)], t1);
5193 tcg_gen_subfi_tl(t1, 32, t1);
5194 tcg_gen_shr_tl(t1, cpu_gpr[rS(ctx->opcode)], t1);
5195 tcg_gen_or_tl(t1, t0, t1);
5196 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], t0);
5197 gen_store_spr(SPR_MQ, t1);
5198 tcg_temp_free(t0);
5199 tcg_temp_free(t1);
76a66253 5200 if (unlikely(Rc(ctx->opcode) != 0))
7487953d 5201 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
5202}
5203
5204/* sleq - sleq. */
99e300ef 5205static void gen_sleq(DisasContext *ctx)
76a66253 5206{
7487953d
AJ
5207 TCGv t0 = tcg_temp_new();
5208 TCGv t1 = tcg_temp_new();
5209 TCGv t2 = tcg_temp_new();
5210 tcg_gen_andi_tl(t0, cpu_gpr[rB(ctx->opcode)], 0x1F);
5211 tcg_gen_movi_tl(t2, 0xFFFFFFFF);
5212 tcg_gen_shl_tl(t2, t2, t0);
5213 tcg_gen_rotl_tl(t0, cpu_gpr[rS(ctx->opcode)], t0);
5214 gen_load_spr(t1, SPR_MQ);
5215 gen_store_spr(SPR_MQ, t0);
5216 tcg_gen_and_tl(t0, t0, t2);
5217 tcg_gen_andc_tl(t1, t1, t2);
5218 tcg_gen_or_tl(cpu_gpr[rA(ctx->opcode)], t0, t1);
5219 tcg_temp_free(t0);
5220 tcg_temp_free(t1);
5221 tcg_temp_free(t2);
76a66253 5222 if (unlikely(Rc(ctx->opcode) != 0))
7487953d 5223 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
5224}
5225
5226/* sliq - sliq. */
99e300ef 5227static void gen_sliq(DisasContext *ctx)
76a66253 5228{
7487953d
AJ
5229 int sh = SH(ctx->opcode);
5230 TCGv t0 = tcg_temp_new();
5231 TCGv t1 = tcg_temp_new();
5232 tcg_gen_shli_tl(t0, cpu_gpr[rS(ctx->opcode)], sh);
5233 tcg_gen_shri_tl(t1, cpu_gpr[rS(ctx->opcode)], 32 - sh);
5234 tcg_gen_or_tl(t1, t0, t1);
5235 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], t0);
5236 gen_store_spr(SPR_MQ, t1);
5237 tcg_temp_free(t0);
5238 tcg_temp_free(t1);
76a66253 5239 if (unlikely(Rc(ctx->opcode) != 0))
7487953d 5240 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
5241}
5242
5243/* slliq - slliq. */
99e300ef 5244static void gen_slliq(DisasContext *ctx)
76a66253 5245{
7487953d
AJ
5246 int sh = SH(ctx->opcode);
5247 TCGv t0 = tcg_temp_new();
5248 TCGv t1 = tcg_temp_new();
5249 tcg_gen_rotli_tl(t0, cpu_gpr[rS(ctx->opcode)], sh);
5250 gen_load_spr(t1, SPR_MQ);
5251 gen_store_spr(SPR_MQ, t0);
5252 tcg_gen_andi_tl(t0, t0, (0xFFFFFFFFU << sh));
5253 tcg_gen_andi_tl(t1, t1, ~(0xFFFFFFFFU << sh));
5254 tcg_gen_or_tl(cpu_gpr[rA(ctx->opcode)], t0, t1);
5255 tcg_temp_free(t0);
5256 tcg_temp_free(t1);
76a66253 5257 if (unlikely(Rc(ctx->opcode) != 0))
7487953d 5258 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
5259}
5260
5261/* sllq - sllq. */
99e300ef 5262static void gen_sllq(DisasContext *ctx)
76a66253 5263{
42a268c2
RH
5264 TCGLabel *l1 = gen_new_label();
5265 TCGLabel *l2 = gen_new_label();
7487953d
AJ
5266 TCGv t0 = tcg_temp_local_new();
5267 TCGv t1 = tcg_temp_local_new();
5268 TCGv t2 = tcg_temp_local_new();
5269 tcg_gen_andi_tl(t2, cpu_gpr[rB(ctx->opcode)], 0x1F);
5270 tcg_gen_movi_tl(t1, 0xFFFFFFFF);
5271 tcg_gen_shl_tl(t1, t1, t2);
5272 tcg_gen_andi_tl(t0, cpu_gpr[rB(ctx->opcode)], 0x20);
5273 tcg_gen_brcondi_tl(TCG_COND_EQ, t0, 0, l1);
5274 gen_load_spr(t0, SPR_MQ);
5275 tcg_gen_and_tl(cpu_gpr[rA(ctx->opcode)], t0, t1);
5276 tcg_gen_br(l2);
5277 gen_set_label(l1);
5278 tcg_gen_shl_tl(t0, cpu_gpr[rS(ctx->opcode)], t2);
5279 gen_load_spr(t2, SPR_MQ);
5280 tcg_gen_andc_tl(t1, t2, t1);
5281 tcg_gen_or_tl(cpu_gpr[rA(ctx->opcode)], t0, t1);
5282 gen_set_label(l2);
5283 tcg_temp_free(t0);
5284 tcg_temp_free(t1);
5285 tcg_temp_free(t2);
76a66253 5286 if (unlikely(Rc(ctx->opcode) != 0))
7487953d 5287 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
5288}
5289
5290/* slq - slq. */
99e300ef 5291static void gen_slq(DisasContext *ctx)
76a66253 5292{
42a268c2 5293 TCGLabel *l1 = gen_new_label();
7487953d
AJ
5294 TCGv t0 = tcg_temp_new();
5295 TCGv t1 = tcg_temp_new();
5296 tcg_gen_andi_tl(t1, cpu_gpr[rB(ctx->opcode)], 0x1F);
5297 tcg_gen_shl_tl(t0, cpu_gpr[rS(ctx->opcode)], t1);
5298 tcg_gen_subfi_tl(t1, 32, t1);
5299 tcg_gen_shr_tl(t1, cpu_gpr[rS(ctx->opcode)], t1);
5300 tcg_gen_or_tl(t1, t0, t1);
5301 gen_store_spr(SPR_MQ, t1);
5302 tcg_gen_andi_tl(t1, cpu_gpr[rB(ctx->opcode)], 0x20);
5303 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], t0);
5304 tcg_gen_brcondi_tl(TCG_COND_EQ, t1, 0, l1);
5305 tcg_gen_movi_tl(cpu_gpr[rA(ctx->opcode)], 0);
5306 gen_set_label(l1);
5307 tcg_temp_free(t0);
5308 tcg_temp_free(t1);
76a66253 5309 if (unlikely(Rc(ctx->opcode) != 0))
7487953d 5310 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
5311}
5312
d9bce9d9 5313/* sraiq - sraiq. */
99e300ef 5314static void gen_sraiq(DisasContext *ctx)
76a66253 5315{
7487953d 5316 int sh = SH(ctx->opcode);
42a268c2 5317 TCGLabel *l1 = gen_new_label();
7487953d
AJ
5318 TCGv t0 = tcg_temp_new();
5319 TCGv t1 = tcg_temp_new();
5320 tcg_gen_shri_tl(t0, cpu_gpr[rS(ctx->opcode)], sh);
5321 tcg_gen_shli_tl(t1, cpu_gpr[rS(ctx->opcode)], 32 - sh);
5322 tcg_gen_or_tl(t0, t0, t1);
5323 gen_store_spr(SPR_MQ, t0);
da91a00f 5324 tcg_gen_movi_tl(cpu_ca, 0);
7487953d
AJ
5325 tcg_gen_brcondi_tl(TCG_COND_EQ, t1, 0, l1);
5326 tcg_gen_brcondi_tl(TCG_COND_GE, cpu_gpr[rS(ctx->opcode)], 0, l1);
da91a00f 5327 tcg_gen_movi_tl(cpu_ca, 1);
7487953d
AJ
5328 gen_set_label(l1);
5329 tcg_gen_sari_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)], sh);
5330 tcg_temp_free(t0);
5331 tcg_temp_free(t1);
76a66253 5332 if (unlikely(Rc(ctx->opcode) != 0))
7487953d 5333 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
5334}
5335
5336/* sraq - sraq. */
99e300ef 5337static void gen_sraq(DisasContext *ctx)
76a66253 5338{
42a268c2
RH
5339 TCGLabel *l1 = gen_new_label();
5340 TCGLabel *l2 = gen_new_label();
7487953d
AJ
5341 TCGv t0 = tcg_temp_new();
5342 TCGv t1 = tcg_temp_local_new();
5343 TCGv t2 = tcg_temp_local_new();
5344 tcg_gen_andi_tl(t2, cpu_gpr[rB(ctx->opcode)], 0x1F);
5345 tcg_gen_shr_tl(t0, cpu_gpr[rS(ctx->opcode)], t2);
5346 tcg_gen_sar_tl(t1, cpu_gpr[rS(ctx->opcode)], t2);
5347 tcg_gen_subfi_tl(t2, 32, t2);
5348 tcg_gen_shl_tl(t2, cpu_gpr[rS(ctx->opcode)], t2);
5349 tcg_gen_or_tl(t0, t0, t2);
5350 gen_store_spr(SPR_MQ, t0);
5351 tcg_gen_andi_tl(t0, cpu_gpr[rB(ctx->opcode)], 0x20);
5352 tcg_gen_brcondi_tl(TCG_COND_EQ, t2, 0, l1);
5353 tcg_gen_mov_tl(t2, cpu_gpr[rS(ctx->opcode)]);
5354 tcg_gen_sari_tl(t1, cpu_gpr[rS(ctx->opcode)], 31);
5355 gen_set_label(l1);
5356 tcg_temp_free(t0);
5357 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], t1);
da91a00f 5358 tcg_gen_movi_tl(cpu_ca, 0);
7487953d
AJ
5359 tcg_gen_brcondi_tl(TCG_COND_GE, t1, 0, l2);
5360 tcg_gen_brcondi_tl(TCG_COND_EQ, t2, 0, l2);
da91a00f 5361 tcg_gen_movi_tl(cpu_ca, 1);
7487953d
AJ
5362 gen_set_label(l2);
5363 tcg_temp_free(t1);
5364 tcg_temp_free(t2);
76a66253 5365 if (unlikely(Rc(ctx->opcode) != 0))
7487953d 5366 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
5367}
5368
5369/* sre - sre. */
99e300ef 5370static void gen_sre(DisasContext *ctx)
76a66253 5371{
7487953d
AJ
5372 TCGv t0 = tcg_temp_new();
5373 TCGv t1 = tcg_temp_new();
5374 tcg_gen_andi_tl(t1, cpu_gpr[rB(ctx->opcode)], 0x1F);
5375 tcg_gen_shr_tl(t0, cpu_gpr[rS(ctx->opcode)], t1);
5376 tcg_gen_subfi_tl(t1, 32, t1);
5377 tcg_gen_shl_tl(t1, cpu_gpr[rS(ctx->opcode)], t1);
5378 tcg_gen_or_tl(t1, t0, t1);
5379 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], t0);
5380 gen_store_spr(SPR_MQ, t1);
5381 tcg_temp_free(t0);
5382 tcg_temp_free(t1);
76a66253 5383 if (unlikely(Rc(ctx->opcode) != 0))
7487953d 5384 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
5385}
5386
5387/* srea - srea. */
99e300ef 5388static void gen_srea(DisasContext *ctx)
76a66253 5389{
7487953d
AJ
5390 TCGv t0 = tcg_temp_new();
5391 TCGv t1 = tcg_temp_new();
5392 tcg_gen_andi_tl(t1, cpu_gpr[rB(ctx->opcode)], 0x1F);
5393 tcg_gen_rotr_tl(t0, cpu_gpr[rS(ctx->opcode)], t1);
5394 gen_store_spr(SPR_MQ, t0);
5395 tcg_gen_sar_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)], t1);
5396 tcg_temp_free(t0);
5397 tcg_temp_free(t1);
76a66253 5398 if (unlikely(Rc(ctx->opcode) != 0))
7487953d 5399 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
5400}
5401
5402/* sreq */
99e300ef 5403static void gen_sreq(DisasContext *ctx)
76a66253 5404{
7487953d
AJ
5405 TCGv t0 = tcg_temp_new();
5406 TCGv t1 = tcg_temp_new();
5407 TCGv t2 = tcg_temp_new();
5408 tcg_gen_andi_tl(t0, cpu_gpr[rB(ctx->opcode)], 0x1F);
5409 tcg_gen_movi_tl(t1, 0xFFFFFFFF);
5410 tcg_gen_shr_tl(t1, t1, t0);
5411 tcg_gen_rotr_tl(t0, cpu_gpr[rS(ctx->opcode)], t0);
5412 gen_load_spr(t2, SPR_MQ);
5413 gen_store_spr(SPR_MQ, t0);
5414 tcg_gen_and_tl(t0, t0, t1);
5415 tcg_gen_andc_tl(t2, t2, t1);
5416 tcg_gen_or_tl(cpu_gpr[rA(ctx->opcode)], t0, t2);
5417 tcg_temp_free(t0);
5418 tcg_temp_free(t1);
5419 tcg_temp_free(t2);
76a66253 5420 if (unlikely(Rc(ctx->opcode) != 0))
7487953d 5421 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
5422}
5423
5424/* sriq */
99e300ef 5425static void gen_sriq(DisasContext *ctx)
76a66253 5426{
7487953d
AJ
5427 int sh = SH(ctx->opcode);
5428 TCGv t0 = tcg_temp_new();
5429 TCGv t1 = tcg_temp_new();
5430 tcg_gen_shri_tl(t0, cpu_gpr[rS(ctx->opcode)], sh);
5431 tcg_gen_shli_tl(t1, cpu_gpr[rS(ctx->opcode)], 32 - sh);
5432 tcg_gen_or_tl(t1, t0, t1);
5433 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], t0);
5434 gen_store_spr(SPR_MQ, t1);
5435 tcg_temp_free(t0);
5436 tcg_temp_free(t1);
76a66253 5437 if (unlikely(Rc(ctx->opcode) != 0))
7487953d 5438 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
5439}
5440
5441/* srliq */
99e300ef 5442static void gen_srliq(DisasContext *ctx)
76a66253 5443{
7487953d
AJ
5444 int sh = SH(ctx->opcode);
5445 TCGv t0 = tcg_temp_new();
5446 TCGv t1 = tcg_temp_new();
5447 tcg_gen_rotri_tl(t0, cpu_gpr[rS(ctx->opcode)], sh);
5448 gen_load_spr(t1, SPR_MQ);
5449 gen_store_spr(SPR_MQ, t0);
5450 tcg_gen_andi_tl(t0, t0, (0xFFFFFFFFU >> sh));
5451 tcg_gen_andi_tl(t1, t1, ~(0xFFFFFFFFU >> sh));
5452 tcg_gen_or_tl(cpu_gpr[rA(ctx->opcode)], t0, t1);
5453 tcg_temp_free(t0);
5454 tcg_temp_free(t1);
76a66253 5455 if (unlikely(Rc(ctx->opcode) != 0))
7487953d 5456 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
5457}
5458
5459/* srlq */
99e300ef 5460static void gen_srlq(DisasContext *ctx)
76a66253 5461{
42a268c2
RH
5462 TCGLabel *l1 = gen_new_label();
5463 TCGLabel *l2 = gen_new_label();
7487953d
AJ
5464 TCGv t0 = tcg_temp_local_new();
5465 TCGv t1 = tcg_temp_local_new();
5466 TCGv t2 = tcg_temp_local_new();
5467 tcg_gen_andi_tl(t2, cpu_gpr[rB(ctx->opcode)], 0x1F);
5468 tcg_gen_movi_tl(t1, 0xFFFFFFFF);
5469 tcg_gen_shr_tl(t2, t1, t2);
5470 tcg_gen_andi_tl(t0, cpu_gpr[rB(ctx->opcode)], 0x20);
5471 tcg_gen_brcondi_tl(TCG_COND_EQ, t0, 0, l1);
5472 gen_load_spr(t0, SPR_MQ);
5473 tcg_gen_and_tl(cpu_gpr[rA(ctx->opcode)], t0, t2);
5474 tcg_gen_br(l2);
5475 gen_set_label(l1);
5476 tcg_gen_shr_tl(t0, cpu_gpr[rS(ctx->opcode)], t2);
5477 tcg_gen_and_tl(t0, t0, t2);
5478 gen_load_spr(t1, SPR_MQ);
5479 tcg_gen_andc_tl(t1, t1, t2);
5480 tcg_gen_or_tl(cpu_gpr[rA(ctx->opcode)], t0, t1);
5481 gen_set_label(l2);
5482 tcg_temp_free(t0);
5483 tcg_temp_free(t1);
5484 tcg_temp_free(t2);
76a66253 5485 if (unlikely(Rc(ctx->opcode) != 0))
7487953d 5486 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
5487}
5488
5489/* srq */
99e300ef 5490static void gen_srq(DisasContext *ctx)
76a66253 5491{
42a268c2 5492 TCGLabel *l1 = gen_new_label();
7487953d
AJ
5493 TCGv t0 = tcg_temp_new();
5494 TCGv t1 = tcg_temp_new();
5495 tcg_gen_andi_tl(t1, cpu_gpr[rB(ctx->opcode)], 0x1F);
5496 tcg_gen_shr_tl(t0, cpu_gpr[rS(ctx->opcode)], t1);
5497 tcg_gen_subfi_tl(t1, 32, t1);
5498 tcg_gen_shl_tl(t1, cpu_gpr[rS(ctx->opcode)], t1);
5499 tcg_gen_or_tl(t1, t0, t1);
5500 gen_store_spr(SPR_MQ, t1);
5501 tcg_gen_andi_tl(t1, cpu_gpr[rB(ctx->opcode)], 0x20);
5502 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], t0);
5503 tcg_gen_brcondi_tl(TCG_COND_EQ, t0, 0, l1);
5504 tcg_gen_movi_tl(cpu_gpr[rA(ctx->opcode)], 0);
5505 gen_set_label(l1);
5506 tcg_temp_free(t0);
5507 tcg_temp_free(t1);
76a66253 5508 if (unlikely(Rc(ctx->opcode) != 0))
7487953d 5509 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
5510}
5511
5512/* PowerPC 602 specific instructions */
99e300ef 5513
54623277 5514/* dsa */
99e300ef 5515static void gen_dsa(DisasContext *ctx)
76a66253
JM
5516{
5517 /* XXX: TODO */
e06fcd75 5518 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL);
76a66253
JM
5519}
5520
5521/* esa */
99e300ef 5522static void gen_esa(DisasContext *ctx)
76a66253
JM
5523{
5524 /* XXX: TODO */
e06fcd75 5525 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL);
76a66253
JM
5526}
5527
5528/* mfrom */
99e300ef 5529static void gen_mfrom(DisasContext *ctx)
76a66253
JM
5530{
5531#if defined(CONFIG_USER_ONLY)
9b2fadda 5532 GEN_PRIV;
76a66253 5533#else
9b2fadda 5534 CHK_SV;
cf02a65c 5535 gen_helper_602_mfrom(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
9b2fadda 5536#endif /* defined(CONFIG_USER_ONLY) */
76a66253
JM
5537}
5538
5539/* 602 - 603 - G2 TLB management */
e8eaa2c0 5540
54623277 5541/* tlbld */
e8eaa2c0 5542static void gen_tlbld_6xx(DisasContext *ctx)
76a66253
JM
5543{
5544#if defined(CONFIG_USER_ONLY)
9b2fadda 5545 GEN_PRIV;
76a66253 5546#else
9b2fadda 5547 CHK_SV;
c6c7cf05 5548 gen_helper_6xx_tlbd(cpu_env, cpu_gpr[rB(ctx->opcode)]);
9b2fadda 5549#endif /* defined(CONFIG_USER_ONLY) */
76a66253
JM
5550}
5551
5552/* tlbli */
e8eaa2c0 5553static void gen_tlbli_6xx(DisasContext *ctx)
76a66253
JM
5554{
5555#if defined(CONFIG_USER_ONLY)
9b2fadda 5556 GEN_PRIV;
76a66253 5557#else
9b2fadda 5558 CHK_SV;
c6c7cf05 5559 gen_helper_6xx_tlbi(cpu_env, cpu_gpr[rB(ctx->opcode)]);
9b2fadda 5560#endif /* defined(CONFIG_USER_ONLY) */
76a66253
JM
5561}
5562
7dbe11ac 5563/* 74xx TLB management */
e8eaa2c0 5564
54623277 5565/* tlbld */
e8eaa2c0 5566static void gen_tlbld_74xx(DisasContext *ctx)
7dbe11ac
JM
5567{
5568#if defined(CONFIG_USER_ONLY)
9b2fadda 5569 GEN_PRIV;
7dbe11ac 5570#else
9b2fadda 5571 CHK_SV;
c6c7cf05 5572 gen_helper_74xx_tlbd(cpu_env, cpu_gpr[rB(ctx->opcode)]);
9b2fadda 5573#endif /* defined(CONFIG_USER_ONLY) */
7dbe11ac
JM
5574}
5575
5576/* tlbli */
e8eaa2c0 5577static void gen_tlbli_74xx(DisasContext *ctx)
7dbe11ac
JM
5578{
5579#if defined(CONFIG_USER_ONLY)
9b2fadda 5580 GEN_PRIV;
7dbe11ac 5581#else
9b2fadda 5582 CHK_SV;
c6c7cf05 5583 gen_helper_74xx_tlbi(cpu_env, cpu_gpr[rB(ctx->opcode)]);
9b2fadda 5584#endif /* defined(CONFIG_USER_ONLY) */
7dbe11ac
JM
5585}
5586
76a66253 5587/* POWER instructions not in PowerPC 601 */
99e300ef 5588
54623277 5589/* clf */
99e300ef 5590static void gen_clf(DisasContext *ctx)
76a66253
JM
5591{
5592 /* Cache line flush: implemented as no-op */
5593}
5594
5595/* cli */
99e300ef 5596static void gen_cli(DisasContext *ctx)
76a66253 5597{
76a66253 5598#if defined(CONFIG_USER_ONLY)
9b2fadda 5599 GEN_PRIV;
76a66253 5600#else
9b2fadda
BH
5601 /* Cache line invalidate: privileged and treated as no-op */
5602 CHK_SV;
5603#endif /* defined(CONFIG_USER_ONLY) */
76a66253
JM
5604}
5605
5606/* dclst */
99e300ef 5607static void gen_dclst(DisasContext *ctx)
76a66253
JM
5608{
5609 /* Data cache line store: treated as no-op */
5610}
5611
99e300ef 5612static void gen_mfsri(DisasContext *ctx)
76a66253
JM
5613{
5614#if defined(CONFIG_USER_ONLY)
9b2fadda 5615 GEN_PRIV;
76a66253 5616#else
74d37793
AJ
5617 int ra = rA(ctx->opcode);
5618 int rd = rD(ctx->opcode);
5619 TCGv t0;
9b2fadda
BH
5620
5621 CHK_SV;
74d37793 5622 t0 = tcg_temp_new();
76db3ba4 5623 gen_addr_reg_index(ctx, t0);
e2622073 5624 tcg_gen_extract_tl(t0, t0, 28, 4);
c6c7cf05 5625 gen_helper_load_sr(cpu_gpr[rd], cpu_env, t0);
74d37793 5626 tcg_temp_free(t0);
76a66253 5627 if (ra != 0 && ra != rd)
74d37793 5628 tcg_gen_mov_tl(cpu_gpr[ra], cpu_gpr[rd]);
9b2fadda 5629#endif /* defined(CONFIG_USER_ONLY) */
76a66253
JM
5630}
5631
99e300ef 5632static void gen_rac(DisasContext *ctx)
76a66253
JM
5633{
5634#if defined(CONFIG_USER_ONLY)
9b2fadda 5635 GEN_PRIV;
76a66253 5636#else
22e0e173 5637 TCGv t0;
9b2fadda
BH
5638
5639 CHK_SV;
22e0e173 5640 t0 = tcg_temp_new();
76db3ba4 5641 gen_addr_reg_index(ctx, t0);
c6c7cf05 5642 gen_helper_rac(cpu_gpr[rD(ctx->opcode)], cpu_env, t0);
22e0e173 5643 tcg_temp_free(t0);
9b2fadda 5644#endif /* defined(CONFIG_USER_ONLY) */
76a66253
JM
5645}
5646
99e300ef 5647static void gen_rfsvc(DisasContext *ctx)
76a66253
JM
5648{
5649#if defined(CONFIG_USER_ONLY)
9b2fadda 5650 GEN_PRIV;
76a66253 5651#else
9b2fadda
BH
5652 CHK_SV;
5653
e5f17ac6 5654 gen_helper_rfsvc(cpu_env);
e06fcd75 5655 gen_sync_exception(ctx);
9b2fadda 5656#endif /* defined(CONFIG_USER_ONLY) */
76a66253
JM
5657}
5658
f9651121 5659/* svc is not implemented for now */
76a66253
JM
5660
5661/* BookE specific instructions */
99e300ef 5662
54623277 5663/* XXX: not implemented on 440 ? */
99e300ef 5664static void gen_mfapidi(DisasContext *ctx)
76a66253
JM
5665{
5666 /* XXX: TODO */
e06fcd75 5667 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL);
76a66253
JM
5668}
5669
2662a059 5670/* XXX: not implemented on 440 ? */
99e300ef 5671static void gen_tlbiva(DisasContext *ctx)
76a66253
JM
5672{
5673#if defined(CONFIG_USER_ONLY)
9b2fadda 5674 GEN_PRIV;
76a66253 5675#else
74d37793 5676 TCGv t0;
9b2fadda
BH
5677
5678 CHK_SV;
ec72e276 5679 t0 = tcg_temp_new();
76db3ba4 5680 gen_addr_reg_index(ctx, t0);
4693364f 5681 gen_helper_tlbiva(cpu_env, cpu_gpr[rB(ctx->opcode)]);
74d37793 5682 tcg_temp_free(t0);
9b2fadda 5683#endif /* defined(CONFIG_USER_ONLY) */
76a66253
JM
5684}
5685
5686/* All 405 MAC instructions are translated here */
636aa200
BS
5687static inline void gen_405_mulladd_insn(DisasContext *ctx, int opc2, int opc3,
5688 int ra, int rb, int rt, int Rc)
76a66253 5689{
182608d4
AJ
5690 TCGv t0, t1;
5691
a7812ae4
PB
5692 t0 = tcg_temp_local_new();
5693 t1 = tcg_temp_local_new();
182608d4 5694
76a66253
JM
5695 switch (opc3 & 0x0D) {
5696 case 0x05:
5697 /* macchw - macchw. - macchwo - macchwo. */
5698 /* macchws - macchws. - macchwso - macchwso. */
5699 /* nmacchw - nmacchw. - nmacchwo - nmacchwo. */
5700 /* nmacchws - nmacchws. - nmacchwso - nmacchwso. */
5701 /* mulchw - mulchw. */
182608d4
AJ
5702 tcg_gen_ext16s_tl(t0, cpu_gpr[ra]);
5703 tcg_gen_sari_tl(t1, cpu_gpr[rb], 16);
5704 tcg_gen_ext16s_tl(t1, t1);
76a66253
JM
5705 break;
5706 case 0x04:
5707 /* macchwu - macchwu. - macchwuo - macchwuo. */
5708 /* macchwsu - macchwsu. - macchwsuo - macchwsuo. */
5709 /* mulchwu - mulchwu. */
182608d4
AJ
5710 tcg_gen_ext16u_tl(t0, cpu_gpr[ra]);
5711 tcg_gen_shri_tl(t1, cpu_gpr[rb], 16);
5712 tcg_gen_ext16u_tl(t1, t1);
76a66253
JM
5713 break;
5714 case 0x01:
5715 /* machhw - machhw. - machhwo - machhwo. */
5716 /* machhws - machhws. - machhwso - machhwso. */
5717 /* nmachhw - nmachhw. - nmachhwo - nmachhwo. */
5718 /* nmachhws - nmachhws. - nmachhwso - nmachhwso. */
5719 /* mulhhw - mulhhw. */
182608d4
AJ
5720 tcg_gen_sari_tl(t0, cpu_gpr[ra], 16);
5721 tcg_gen_ext16s_tl(t0, t0);
5722 tcg_gen_sari_tl(t1, cpu_gpr[rb], 16);
5723 tcg_gen_ext16s_tl(t1, t1);
76a66253
JM
5724 break;
5725 case 0x00:
5726 /* machhwu - machhwu. - machhwuo - machhwuo. */
5727 /* machhwsu - machhwsu. - machhwsuo - machhwsuo. */
5728 /* mulhhwu - mulhhwu. */
182608d4
AJ
5729 tcg_gen_shri_tl(t0, cpu_gpr[ra], 16);
5730 tcg_gen_ext16u_tl(t0, t0);
5731 tcg_gen_shri_tl(t1, cpu_gpr[rb], 16);
5732 tcg_gen_ext16u_tl(t1, t1);
76a66253
JM
5733 break;
5734 case 0x0D:
5735 /* maclhw - maclhw. - maclhwo - maclhwo. */
5736 /* maclhws - maclhws. - maclhwso - maclhwso. */
5737 /* nmaclhw - nmaclhw. - nmaclhwo - nmaclhwo. */
5738 /* nmaclhws - nmaclhws. - nmaclhwso - nmaclhwso. */
5739 /* mullhw - mullhw. */
182608d4
AJ
5740 tcg_gen_ext16s_tl(t0, cpu_gpr[ra]);
5741 tcg_gen_ext16s_tl(t1, cpu_gpr[rb]);
76a66253
JM
5742 break;
5743 case 0x0C:
5744 /* maclhwu - maclhwu. - maclhwuo - maclhwuo. */
5745 /* maclhwsu - maclhwsu. - maclhwsuo - maclhwsuo. */
5746 /* mullhwu - mullhwu. */
182608d4
AJ
5747 tcg_gen_ext16u_tl(t0, cpu_gpr[ra]);
5748 tcg_gen_ext16u_tl(t1, cpu_gpr[rb]);
76a66253
JM
5749 break;
5750 }
76a66253 5751 if (opc2 & 0x04) {
182608d4
AJ
5752 /* (n)multiply-and-accumulate (0x0C / 0x0E) */
5753 tcg_gen_mul_tl(t1, t0, t1);
5754 if (opc2 & 0x02) {
5755 /* nmultiply-and-accumulate (0x0E) */
5756 tcg_gen_sub_tl(t0, cpu_gpr[rt], t1);
5757 } else {
5758 /* multiply-and-accumulate (0x0C) */
5759 tcg_gen_add_tl(t0, cpu_gpr[rt], t1);
5760 }
5761
5762 if (opc3 & 0x12) {
5763 /* Check overflow and/or saturate */
42a268c2 5764 TCGLabel *l1 = gen_new_label();
182608d4
AJ
5765
5766 if (opc3 & 0x10) {
5767 /* Start with XER OV disabled, the most likely case */
da91a00f 5768 tcg_gen_movi_tl(cpu_ov, 0);
182608d4
AJ
5769 }
5770 if (opc3 & 0x01) {
5771 /* Signed */
5772 tcg_gen_xor_tl(t1, cpu_gpr[rt], t1);
5773 tcg_gen_brcondi_tl(TCG_COND_GE, t1, 0, l1);
5774 tcg_gen_xor_tl(t1, cpu_gpr[rt], t0);
5775 tcg_gen_brcondi_tl(TCG_COND_LT, t1, 0, l1);
bdc4e053 5776 if (opc3 & 0x02) {
182608d4
AJ
5777 /* Saturate */
5778 tcg_gen_sari_tl(t0, cpu_gpr[rt], 31);
5779 tcg_gen_xori_tl(t0, t0, 0x7fffffff);
5780 }
5781 } else {
5782 /* Unsigned */
5783 tcg_gen_brcond_tl(TCG_COND_GEU, t0, t1, l1);
bdc4e053 5784 if (opc3 & 0x02) {
182608d4
AJ
5785 /* Saturate */
5786 tcg_gen_movi_tl(t0, UINT32_MAX);
5787 }
5788 }
5789 if (opc3 & 0x10) {
5790 /* Check overflow */
da91a00f
RH
5791 tcg_gen_movi_tl(cpu_ov, 1);
5792 tcg_gen_movi_tl(cpu_so, 1);
182608d4
AJ
5793 }
5794 gen_set_label(l1);
5795 tcg_gen_mov_tl(cpu_gpr[rt], t0);
5796 }
5797 } else {
5798 tcg_gen_mul_tl(cpu_gpr[rt], t0, t1);
76a66253 5799 }
182608d4
AJ
5800 tcg_temp_free(t0);
5801 tcg_temp_free(t1);
76a66253
JM
5802 if (unlikely(Rc) != 0) {
5803 /* Update Rc0 */
182608d4 5804 gen_set_Rc0(ctx, cpu_gpr[rt]);
76a66253
JM
5805 }
5806}
5807
a750fc0b 5808#define GEN_MAC_HANDLER(name, opc2, opc3) \
99e300ef 5809static void glue(gen_, name)(DisasContext *ctx) \
76a66253
JM
5810{ \
5811 gen_405_mulladd_insn(ctx, opc2, opc3, rA(ctx->opcode), rB(ctx->opcode), \
5812 rD(ctx->opcode), Rc(ctx->opcode)); \
5813}
5814
5815/* macchw - macchw. */
a750fc0b 5816GEN_MAC_HANDLER(macchw, 0x0C, 0x05);
76a66253 5817/* macchwo - macchwo. */
a750fc0b 5818GEN_MAC_HANDLER(macchwo, 0x0C, 0x15);
76a66253 5819/* macchws - macchws. */
a750fc0b 5820GEN_MAC_HANDLER(macchws, 0x0C, 0x07);
76a66253 5821/* macchwso - macchwso. */
a750fc0b 5822GEN_MAC_HANDLER(macchwso, 0x0C, 0x17);
76a66253 5823/* macchwsu - macchwsu. */
a750fc0b 5824GEN_MAC_HANDLER(macchwsu, 0x0C, 0x06);
76a66253 5825/* macchwsuo - macchwsuo. */
a750fc0b 5826GEN_MAC_HANDLER(macchwsuo, 0x0C, 0x16);
76a66253 5827/* macchwu - macchwu. */
a750fc0b 5828GEN_MAC_HANDLER(macchwu, 0x0C, 0x04);
76a66253 5829/* macchwuo - macchwuo. */
a750fc0b 5830GEN_MAC_HANDLER(macchwuo, 0x0C, 0x14);
76a66253 5831/* machhw - machhw. */
a750fc0b 5832GEN_MAC_HANDLER(machhw, 0x0C, 0x01);
76a66253 5833/* machhwo - machhwo. */
a750fc0b 5834GEN_MAC_HANDLER(machhwo, 0x0C, 0x11);
76a66253 5835/* machhws - machhws. */
a750fc0b 5836GEN_MAC_HANDLER(machhws, 0x0C, 0x03);
76a66253 5837/* machhwso - machhwso. */
a750fc0b 5838GEN_MAC_HANDLER(machhwso, 0x0C, 0x13);
76a66253 5839/* machhwsu - machhwsu. */
a750fc0b 5840GEN_MAC_HANDLER(machhwsu, 0x0C, 0x02);
76a66253 5841/* machhwsuo - machhwsuo. */
a750fc0b 5842GEN_MAC_HANDLER(machhwsuo, 0x0C, 0x12);
76a66253 5843/* machhwu - machhwu. */
a750fc0b 5844GEN_MAC_HANDLER(machhwu, 0x0C, 0x00);
76a66253 5845/* machhwuo - machhwuo. */
a750fc0b 5846GEN_MAC_HANDLER(machhwuo, 0x0C, 0x10);
76a66253 5847/* maclhw - maclhw. */
a750fc0b 5848GEN_MAC_HANDLER(maclhw, 0x0C, 0x0D);
76a66253 5849/* maclhwo - maclhwo. */
a750fc0b 5850GEN_MAC_HANDLER(maclhwo, 0x0C, 0x1D);
76a66253 5851/* maclhws - maclhws. */
a750fc0b 5852GEN_MAC_HANDLER(maclhws, 0x0C, 0x0F);
76a66253 5853/* maclhwso - maclhwso. */
a750fc0b 5854GEN_MAC_HANDLER(maclhwso, 0x0C, 0x1F);
76a66253 5855/* maclhwu - maclhwu. */
a750fc0b 5856GEN_MAC_HANDLER(maclhwu, 0x0C, 0x0C);
76a66253 5857/* maclhwuo - maclhwuo. */
a750fc0b 5858GEN_MAC_HANDLER(maclhwuo, 0x0C, 0x1C);
76a66253 5859/* maclhwsu - maclhwsu. */
a750fc0b 5860GEN_MAC_HANDLER(maclhwsu, 0x0C, 0x0E);
76a66253 5861/* maclhwsuo - maclhwsuo. */
a750fc0b 5862GEN_MAC_HANDLER(maclhwsuo, 0x0C, 0x1E);
76a66253 5863/* nmacchw - nmacchw. */
a750fc0b 5864GEN_MAC_HANDLER(nmacchw, 0x0E, 0x05);
76a66253 5865/* nmacchwo - nmacchwo. */
a750fc0b 5866GEN_MAC_HANDLER(nmacchwo, 0x0E, 0x15);
76a66253 5867/* nmacchws - nmacchws. */
a750fc0b 5868GEN_MAC_HANDLER(nmacchws, 0x0E, 0x07);
76a66253 5869/* nmacchwso - nmacchwso. */
a750fc0b 5870GEN_MAC_HANDLER(nmacchwso, 0x0E, 0x17);
76a66253 5871/* nmachhw - nmachhw. */
a750fc0b 5872GEN_MAC_HANDLER(nmachhw, 0x0E, 0x01);
76a66253 5873/* nmachhwo - nmachhwo. */
a750fc0b 5874GEN_MAC_HANDLER(nmachhwo, 0x0E, 0x11);
76a66253 5875/* nmachhws - nmachhws. */
a750fc0b 5876GEN_MAC_HANDLER(nmachhws, 0x0E, 0x03);
76a66253 5877/* nmachhwso - nmachhwso. */
a750fc0b 5878GEN_MAC_HANDLER(nmachhwso, 0x0E, 0x13);
76a66253 5879/* nmaclhw - nmaclhw. */
a750fc0b 5880GEN_MAC_HANDLER(nmaclhw, 0x0E, 0x0D);
76a66253 5881/* nmaclhwo - nmaclhwo. */
a750fc0b 5882GEN_MAC_HANDLER(nmaclhwo, 0x0E, 0x1D);
76a66253 5883/* nmaclhws - nmaclhws. */
a750fc0b 5884GEN_MAC_HANDLER(nmaclhws, 0x0E, 0x0F);
76a66253 5885/* nmaclhwso - nmaclhwso. */
a750fc0b 5886GEN_MAC_HANDLER(nmaclhwso, 0x0E, 0x1F);
76a66253
JM
5887
5888/* mulchw - mulchw. */
a750fc0b 5889GEN_MAC_HANDLER(mulchw, 0x08, 0x05);
76a66253 5890/* mulchwu - mulchwu. */
a750fc0b 5891GEN_MAC_HANDLER(mulchwu, 0x08, 0x04);
76a66253 5892/* mulhhw - mulhhw. */
a750fc0b 5893GEN_MAC_HANDLER(mulhhw, 0x08, 0x01);
76a66253 5894/* mulhhwu - mulhhwu. */
a750fc0b 5895GEN_MAC_HANDLER(mulhhwu, 0x08, 0x00);
76a66253 5896/* mullhw - mullhw. */
a750fc0b 5897GEN_MAC_HANDLER(mullhw, 0x08, 0x0D);
76a66253 5898/* mullhwu - mullhwu. */
a750fc0b 5899GEN_MAC_HANDLER(mullhwu, 0x08, 0x0C);
76a66253
JM
5900
5901/* mfdcr */
99e300ef 5902static void gen_mfdcr(DisasContext *ctx)
76a66253
JM
5903{
5904#if defined(CONFIG_USER_ONLY)
9b2fadda 5905 GEN_PRIV;
76a66253 5906#else
06dca6a7 5907 TCGv dcrn;
9b2fadda
BH
5908
5909 CHK_SV;
06dca6a7 5910 dcrn = tcg_const_tl(SPR(ctx->opcode));
d0f1562d 5911 gen_helper_load_dcr(cpu_gpr[rD(ctx->opcode)], cpu_env, dcrn);
06dca6a7 5912 tcg_temp_free(dcrn);
9b2fadda 5913#endif /* defined(CONFIG_USER_ONLY) */
76a66253
JM
5914}
5915
5916/* mtdcr */
99e300ef 5917static void gen_mtdcr(DisasContext *ctx)
76a66253
JM
5918{
5919#if defined(CONFIG_USER_ONLY)
9b2fadda 5920 GEN_PRIV;
76a66253 5921#else
06dca6a7 5922 TCGv dcrn;
9b2fadda
BH
5923
5924 CHK_SV;
06dca6a7 5925 dcrn = tcg_const_tl(SPR(ctx->opcode));
d0f1562d 5926 gen_helper_store_dcr(cpu_env, dcrn, cpu_gpr[rS(ctx->opcode)]);
06dca6a7 5927 tcg_temp_free(dcrn);
9b2fadda 5928#endif /* defined(CONFIG_USER_ONLY) */
a42bd6cc
JM
5929}
5930
5931/* mfdcrx */
2662a059 5932/* XXX: not implemented on 440 ? */
99e300ef 5933static void gen_mfdcrx(DisasContext *ctx)
a42bd6cc
JM
5934{
5935#if defined(CONFIG_USER_ONLY)
9b2fadda 5936 GEN_PRIV;
a42bd6cc 5937#else
9b2fadda 5938 CHK_SV;
d0f1562d
BS
5939 gen_helper_load_dcr(cpu_gpr[rD(ctx->opcode)], cpu_env,
5940 cpu_gpr[rA(ctx->opcode)]);
a750fc0b 5941 /* Note: Rc update flag set leads to undefined state of Rc0 */
9b2fadda 5942#endif /* defined(CONFIG_USER_ONLY) */
a42bd6cc
JM
5943}
5944
5945/* mtdcrx */
2662a059 5946/* XXX: not implemented on 440 ? */
99e300ef 5947static void gen_mtdcrx(DisasContext *ctx)
a42bd6cc
JM
5948{
5949#if defined(CONFIG_USER_ONLY)
9b2fadda 5950 GEN_PRIV;
a42bd6cc 5951#else
9b2fadda 5952 CHK_SV;
d0f1562d
BS
5953 gen_helper_store_dcr(cpu_env, cpu_gpr[rA(ctx->opcode)],
5954 cpu_gpr[rS(ctx->opcode)]);
a750fc0b 5955 /* Note: Rc update flag set leads to undefined state of Rc0 */
9b2fadda 5956#endif /* defined(CONFIG_USER_ONLY) */
76a66253
JM
5957}
5958
a750fc0b 5959/* mfdcrux (PPC 460) : user-mode access to DCR */
99e300ef 5960static void gen_mfdcrux(DisasContext *ctx)
a750fc0b 5961{
d0f1562d
BS
5962 gen_helper_load_dcr(cpu_gpr[rD(ctx->opcode)], cpu_env,
5963 cpu_gpr[rA(ctx->opcode)]);
a750fc0b
JM
5964 /* Note: Rc update flag set leads to undefined state of Rc0 */
5965}
5966
5967/* mtdcrux (PPC 460) : user-mode access to DCR */
99e300ef 5968static void gen_mtdcrux(DisasContext *ctx)
a750fc0b 5969{
975e5463 5970 gen_helper_store_dcr(cpu_env, cpu_gpr[rA(ctx->opcode)],
d0f1562d 5971 cpu_gpr[rS(ctx->opcode)]);
a750fc0b
JM
5972 /* Note: Rc update flag set leads to undefined state of Rc0 */
5973}
5974
76a66253 5975/* dccci */
99e300ef 5976static void gen_dccci(DisasContext *ctx)
76a66253 5977{
9b2fadda 5978 CHK_SV;
76a66253 5979 /* interpreted as no-op */
76a66253
JM
5980}
5981
5982/* dcread */
99e300ef 5983static void gen_dcread(DisasContext *ctx)
76a66253
JM
5984{
5985#if defined(CONFIG_USER_ONLY)
9b2fadda 5986 GEN_PRIV;
76a66253 5987#else
b61f2753 5988 TCGv EA, val;
9b2fadda
BH
5989
5990 CHK_SV;
76db3ba4 5991 gen_set_access_type(ctx, ACCESS_CACHE);
a7812ae4 5992 EA = tcg_temp_new();
76db3ba4 5993 gen_addr_reg_index(ctx, EA);
a7812ae4 5994 val = tcg_temp_new();
76db3ba4 5995 gen_qemu_ld32u(ctx, val, EA);
b61f2753
AJ
5996 tcg_temp_free(val);
5997 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], EA);
5998 tcg_temp_free(EA);
9b2fadda 5999#endif /* defined(CONFIG_USER_ONLY) */
76a66253
JM
6000}
6001
6002/* icbt */
e8eaa2c0 6003static void gen_icbt_40x(DisasContext *ctx)
76a66253
JM
6004{
6005 /* interpreted as no-op */
6006 /* XXX: specification say this is treated as a load by the MMU
6007 * but does not generate any exception
6008 */
6009}
6010
6011/* iccci */
99e300ef 6012static void gen_iccci(DisasContext *ctx)
76a66253 6013{
9b2fadda 6014 CHK_SV;
76a66253 6015 /* interpreted as no-op */
76a66253
JM
6016}
6017
6018/* icread */
99e300ef 6019static void gen_icread(DisasContext *ctx)
76a66253 6020{
9b2fadda 6021 CHK_SV;
76a66253 6022 /* interpreted as no-op */
76a66253
JM
6023}
6024
c47493f2 6025/* rfci (supervisor only) */
e8eaa2c0 6026static void gen_rfci_40x(DisasContext *ctx)
a42bd6cc
JM
6027{
6028#if defined(CONFIG_USER_ONLY)
9b2fadda 6029 GEN_PRIV;
a42bd6cc 6030#else
9b2fadda 6031 CHK_SV;
a42bd6cc 6032 /* Restore CPU state */
e5f17ac6 6033 gen_helper_40x_rfci(cpu_env);
e06fcd75 6034 gen_sync_exception(ctx);
9b2fadda 6035#endif /* defined(CONFIG_USER_ONLY) */
a42bd6cc
JM
6036}
6037
99e300ef 6038static void gen_rfci(DisasContext *ctx)
a42bd6cc
JM
6039{
6040#if defined(CONFIG_USER_ONLY)
9b2fadda 6041 GEN_PRIV;
a42bd6cc 6042#else
9b2fadda 6043 CHK_SV;
a42bd6cc 6044 /* Restore CPU state */
e5f17ac6 6045 gen_helper_rfci(cpu_env);
e06fcd75 6046 gen_sync_exception(ctx);
9b2fadda 6047#endif /* defined(CONFIG_USER_ONLY) */
a42bd6cc
JM
6048}
6049
6050/* BookE specific */
99e300ef 6051
54623277 6052/* XXX: not implemented on 440 ? */
99e300ef 6053static void gen_rfdi(DisasContext *ctx)
76a66253
JM
6054{
6055#if defined(CONFIG_USER_ONLY)
9b2fadda 6056 GEN_PRIV;
76a66253 6057#else
9b2fadda 6058 CHK_SV;
76a66253 6059 /* Restore CPU state */
e5f17ac6 6060 gen_helper_rfdi(cpu_env);
e06fcd75 6061 gen_sync_exception(ctx);
9b2fadda 6062#endif /* defined(CONFIG_USER_ONLY) */
76a66253
JM
6063}
6064
2662a059 6065/* XXX: not implemented on 440 ? */
99e300ef 6066static void gen_rfmci(DisasContext *ctx)
a42bd6cc
JM
6067{
6068#if defined(CONFIG_USER_ONLY)
9b2fadda 6069 GEN_PRIV;
a42bd6cc 6070#else
9b2fadda 6071 CHK_SV;
a42bd6cc 6072 /* Restore CPU state */
e5f17ac6 6073 gen_helper_rfmci(cpu_env);
e06fcd75 6074 gen_sync_exception(ctx);
9b2fadda 6075#endif /* defined(CONFIG_USER_ONLY) */
a42bd6cc 6076}
5eb7995e 6077
d9bce9d9 6078/* TLB management - PowerPC 405 implementation */
e8eaa2c0 6079
54623277 6080/* tlbre */
e8eaa2c0 6081static void gen_tlbre_40x(DisasContext *ctx)
76a66253
JM
6082{
6083#if defined(CONFIG_USER_ONLY)
9b2fadda 6084 GEN_PRIV;
76a66253 6085#else
9b2fadda 6086 CHK_SV;
76a66253
JM
6087 switch (rB(ctx->opcode)) {
6088 case 0:
c6c7cf05
BS
6089 gen_helper_4xx_tlbre_hi(cpu_gpr[rD(ctx->opcode)], cpu_env,
6090 cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
6091 break;
6092 case 1:
c6c7cf05
BS
6093 gen_helper_4xx_tlbre_lo(cpu_gpr[rD(ctx->opcode)], cpu_env,
6094 cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
6095 break;
6096 default:
e06fcd75 6097 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL);
76a66253 6098 break;
9a64fbe4 6099 }
9b2fadda 6100#endif /* defined(CONFIG_USER_ONLY) */
76a66253
JM
6101}
6102
d9bce9d9 6103/* tlbsx - tlbsx. */
e8eaa2c0 6104static void gen_tlbsx_40x(DisasContext *ctx)
76a66253
JM
6105{
6106#if defined(CONFIG_USER_ONLY)
9b2fadda 6107 GEN_PRIV;
76a66253 6108#else
74d37793 6109 TCGv t0;
9b2fadda
BH
6110
6111 CHK_SV;
74d37793 6112 t0 = tcg_temp_new();
76db3ba4 6113 gen_addr_reg_index(ctx, t0);
c6c7cf05 6114 gen_helper_4xx_tlbsx(cpu_gpr[rD(ctx->opcode)], cpu_env, t0);
74d37793
AJ
6115 tcg_temp_free(t0);
6116 if (Rc(ctx->opcode)) {
42a268c2 6117 TCGLabel *l1 = gen_new_label();
da91a00f 6118 tcg_gen_trunc_tl_i32(cpu_crf[0], cpu_so);
74d37793
AJ
6119 tcg_gen_brcondi_tl(TCG_COND_EQ, cpu_gpr[rD(ctx->opcode)], -1, l1);
6120 tcg_gen_ori_i32(cpu_crf[0], cpu_crf[0], 0x02);
6121 gen_set_label(l1);
6122 }
9b2fadda 6123#endif /* defined(CONFIG_USER_ONLY) */
79aceca5
FB
6124}
6125
76a66253 6126/* tlbwe */
e8eaa2c0 6127static void gen_tlbwe_40x(DisasContext *ctx)
79aceca5 6128{
76a66253 6129#if defined(CONFIG_USER_ONLY)
9b2fadda 6130 GEN_PRIV;
76a66253 6131#else
9b2fadda
BH
6132 CHK_SV;
6133
76a66253
JM
6134 switch (rB(ctx->opcode)) {
6135 case 0:
c6c7cf05
BS
6136 gen_helper_4xx_tlbwe_hi(cpu_env, cpu_gpr[rA(ctx->opcode)],
6137 cpu_gpr[rS(ctx->opcode)]);
76a66253
JM
6138 break;
6139 case 1:
c6c7cf05
BS
6140 gen_helper_4xx_tlbwe_lo(cpu_env, cpu_gpr[rA(ctx->opcode)],
6141 cpu_gpr[rS(ctx->opcode)]);
76a66253
JM
6142 break;
6143 default:
e06fcd75 6144 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL);
76a66253 6145 break;
9a64fbe4 6146 }
9b2fadda 6147#endif /* defined(CONFIG_USER_ONLY) */
76a66253
JM
6148}
6149
a4bb6c3e 6150/* TLB management - PowerPC 440 implementation */
e8eaa2c0 6151
54623277 6152/* tlbre */
e8eaa2c0 6153static void gen_tlbre_440(DisasContext *ctx)
5eb7995e
JM
6154{
6155#if defined(CONFIG_USER_ONLY)
9b2fadda 6156 GEN_PRIV;
5eb7995e 6157#else
9b2fadda
BH
6158 CHK_SV;
6159
5eb7995e
JM
6160 switch (rB(ctx->opcode)) {
6161 case 0:
5eb7995e 6162 case 1:
5eb7995e 6163 case 2:
74d37793
AJ
6164 {
6165 TCGv_i32 t0 = tcg_const_i32(rB(ctx->opcode));
c6c7cf05
BS
6166 gen_helper_440_tlbre(cpu_gpr[rD(ctx->opcode)], cpu_env,
6167 t0, cpu_gpr[rA(ctx->opcode)]);
74d37793
AJ
6168 tcg_temp_free_i32(t0);
6169 }
5eb7995e
JM
6170 break;
6171 default:
e06fcd75 6172 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL);
5eb7995e
JM
6173 break;
6174 }
9b2fadda 6175#endif /* defined(CONFIG_USER_ONLY) */
5eb7995e
JM
6176}
6177
6178/* tlbsx - tlbsx. */
e8eaa2c0 6179static void gen_tlbsx_440(DisasContext *ctx)
5eb7995e
JM
6180{
6181#if defined(CONFIG_USER_ONLY)
9b2fadda 6182 GEN_PRIV;
5eb7995e 6183#else
74d37793 6184 TCGv t0;
9b2fadda
BH
6185
6186 CHK_SV;
74d37793 6187 t0 = tcg_temp_new();
76db3ba4 6188 gen_addr_reg_index(ctx, t0);
c6c7cf05 6189 gen_helper_440_tlbsx(cpu_gpr[rD(ctx->opcode)], cpu_env, t0);
74d37793
AJ
6190 tcg_temp_free(t0);
6191 if (Rc(ctx->opcode)) {
42a268c2 6192 TCGLabel *l1 = gen_new_label();
da91a00f 6193 tcg_gen_trunc_tl_i32(cpu_crf[0], cpu_so);
74d37793
AJ
6194 tcg_gen_brcondi_tl(TCG_COND_EQ, cpu_gpr[rD(ctx->opcode)], -1, l1);
6195 tcg_gen_ori_i32(cpu_crf[0], cpu_crf[0], 0x02);
6196 gen_set_label(l1);
6197 }
9b2fadda 6198#endif /* defined(CONFIG_USER_ONLY) */
5eb7995e
JM
6199}
6200
6201/* tlbwe */
e8eaa2c0 6202static void gen_tlbwe_440(DisasContext *ctx)
5eb7995e
JM
6203{
6204#if defined(CONFIG_USER_ONLY)
9b2fadda 6205 GEN_PRIV;
5eb7995e 6206#else
9b2fadda 6207 CHK_SV;
5eb7995e
JM
6208 switch (rB(ctx->opcode)) {
6209 case 0:
5eb7995e 6210 case 1:
5eb7995e 6211 case 2:
74d37793
AJ
6212 {
6213 TCGv_i32 t0 = tcg_const_i32(rB(ctx->opcode));
c6c7cf05
BS
6214 gen_helper_440_tlbwe(cpu_env, t0, cpu_gpr[rA(ctx->opcode)],
6215 cpu_gpr[rS(ctx->opcode)]);
74d37793
AJ
6216 tcg_temp_free_i32(t0);
6217 }
5eb7995e
JM
6218 break;
6219 default:
e06fcd75 6220 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL);
5eb7995e
JM
6221 break;
6222 }
9b2fadda 6223#endif /* defined(CONFIG_USER_ONLY) */
5eb7995e
JM
6224}
6225
01662f3e
AG
6226/* TLB management - PowerPC BookE 2.06 implementation */
6227
6228/* tlbre */
6229static void gen_tlbre_booke206(DisasContext *ctx)
6230{
9b2fadda
BH
6231 #if defined(CONFIG_USER_ONLY)
6232 GEN_PRIV;
01662f3e 6233#else
9b2fadda 6234 CHK_SV;
c6c7cf05 6235 gen_helper_booke206_tlbre(cpu_env);
9b2fadda 6236#endif /* defined(CONFIG_USER_ONLY) */
01662f3e
AG
6237}
6238
6239/* tlbsx - tlbsx. */
6240static void gen_tlbsx_booke206(DisasContext *ctx)
6241{
6242#if defined(CONFIG_USER_ONLY)
9b2fadda 6243 GEN_PRIV;
01662f3e
AG
6244#else
6245 TCGv t0;
01662f3e 6246
9b2fadda 6247 CHK_SV;
01662f3e
AG
6248 if (rA(ctx->opcode)) {
6249 t0 = tcg_temp_new();
6250 tcg_gen_mov_tl(t0, cpu_gpr[rD(ctx->opcode)]);
6251 } else {
6252 t0 = tcg_const_tl(0);
6253 }
6254
6255 tcg_gen_add_tl(t0, t0, cpu_gpr[rB(ctx->opcode)]);
c6c7cf05 6256 gen_helper_booke206_tlbsx(cpu_env, t0);
c80d1df5 6257 tcg_temp_free(t0);
9b2fadda 6258#endif /* defined(CONFIG_USER_ONLY) */
01662f3e
AG
6259}
6260
6261/* tlbwe */
6262static void gen_tlbwe_booke206(DisasContext *ctx)
6263{
6264#if defined(CONFIG_USER_ONLY)
9b2fadda 6265 GEN_PRIV;
01662f3e 6266#else
9b2fadda 6267 CHK_SV;
c6c7cf05 6268 gen_helper_booke206_tlbwe(cpu_env);
9b2fadda 6269#endif /* defined(CONFIG_USER_ONLY) */
01662f3e
AG
6270}
6271
6272static void gen_tlbivax_booke206(DisasContext *ctx)
6273{
6274#if defined(CONFIG_USER_ONLY)
9b2fadda 6275 GEN_PRIV;
01662f3e
AG
6276#else
6277 TCGv t0;
01662f3e 6278
9b2fadda 6279 CHK_SV;
01662f3e
AG
6280 t0 = tcg_temp_new();
6281 gen_addr_reg_index(ctx, t0);
c6c7cf05 6282 gen_helper_booke206_tlbivax(cpu_env, t0);
c80d1df5 6283 tcg_temp_free(t0);
9b2fadda 6284#endif /* defined(CONFIG_USER_ONLY) */
01662f3e
AG
6285}
6286
6d3db821
AG
6287static void gen_tlbilx_booke206(DisasContext *ctx)
6288{
6289#if defined(CONFIG_USER_ONLY)
9b2fadda 6290 GEN_PRIV;
6d3db821
AG
6291#else
6292 TCGv t0;
6d3db821 6293
9b2fadda 6294 CHK_SV;
6d3db821
AG
6295 t0 = tcg_temp_new();
6296 gen_addr_reg_index(ctx, t0);
6297
6298 switch((ctx->opcode >> 21) & 0x3) {
6299 case 0:
c6c7cf05 6300 gen_helper_booke206_tlbilx0(cpu_env, t0);
6d3db821
AG
6301 break;
6302 case 1:
c6c7cf05 6303 gen_helper_booke206_tlbilx1(cpu_env, t0);
6d3db821
AG
6304 break;
6305 case 3:
c6c7cf05 6306 gen_helper_booke206_tlbilx3(cpu_env, t0);
6d3db821
AG
6307 break;
6308 default:
6309 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL);
6310 break;
6311 }
6312
6313 tcg_temp_free(t0);
9b2fadda 6314#endif /* defined(CONFIG_USER_ONLY) */
6d3db821
AG
6315}
6316
01662f3e 6317
76a66253 6318/* wrtee */
99e300ef 6319static void gen_wrtee(DisasContext *ctx)
76a66253
JM
6320{
6321#if defined(CONFIG_USER_ONLY)
9b2fadda 6322 GEN_PRIV;
76a66253 6323#else
6527f6ea 6324 TCGv t0;
9b2fadda
BH
6325
6326 CHK_SV;
6527f6ea
AJ
6327 t0 = tcg_temp_new();
6328 tcg_gen_andi_tl(t0, cpu_gpr[rD(ctx->opcode)], (1 << MSR_EE));
6329 tcg_gen_andi_tl(cpu_msr, cpu_msr, ~(1 << MSR_EE));
6330 tcg_gen_or_tl(cpu_msr, cpu_msr, t0);
6331 tcg_temp_free(t0);
dee96f6c
JM
6332 /* Stop translation to have a chance to raise an exception
6333 * if we just set msr_ee to 1
6334 */
e06fcd75 6335 gen_stop_exception(ctx);
9b2fadda 6336#endif /* defined(CONFIG_USER_ONLY) */
76a66253
JM
6337}
6338
6339/* wrteei */
99e300ef 6340static void gen_wrteei(DisasContext *ctx)
76a66253
JM
6341{
6342#if defined(CONFIG_USER_ONLY)
9b2fadda 6343 GEN_PRIV;
76a66253 6344#else
9b2fadda 6345 CHK_SV;
fbe73008 6346 if (ctx->opcode & 0x00008000) {
6527f6ea
AJ
6347 tcg_gen_ori_tl(cpu_msr, cpu_msr, (1 << MSR_EE));
6348 /* Stop translation to have a chance to raise an exception */
e06fcd75 6349 gen_stop_exception(ctx);
6527f6ea 6350 } else {
1b6e5f99 6351 tcg_gen_andi_tl(cpu_msr, cpu_msr, ~(1 << MSR_EE));
6527f6ea 6352 }
9b2fadda 6353#endif /* defined(CONFIG_USER_ONLY) */
76a66253
JM
6354}
6355
08e46e54 6356/* PowerPC 440 specific instructions */
99e300ef 6357
54623277 6358/* dlmzb */
99e300ef 6359static void gen_dlmzb(DisasContext *ctx)
76a66253 6360{
ef0d51af 6361 TCGv_i32 t0 = tcg_const_i32(Rc(ctx->opcode));
d15f74fb
BS
6362 gen_helper_dlmzb(cpu_gpr[rA(ctx->opcode)], cpu_env,
6363 cpu_gpr[rS(ctx->opcode)], cpu_gpr[rB(ctx->opcode)], t0);
ef0d51af 6364 tcg_temp_free_i32(t0);
76a66253
JM
6365}
6366
6367/* mbar replaces eieio on 440 */
99e300ef 6368static void gen_mbar(DisasContext *ctx)
76a66253
JM
6369{
6370 /* interpreted as no-op */
6371}
6372
6373/* msync replaces sync on 440 */
dcb2b9e1 6374static void gen_msync_4xx(DisasContext *ctx)
76a66253
JM
6375{
6376 /* interpreted as no-op */
6377}
6378
6379/* icbt */
e8eaa2c0 6380static void gen_icbt_440(DisasContext *ctx)
76a66253
JM
6381{
6382 /* interpreted as no-op */
6383 /* XXX: specification say this is treated as a load by the MMU
6384 * but does not generate any exception
6385 */
79aceca5
FB
6386}
6387
9e0b5cb1
AG
6388/* Embedded.Processor Control */
6389
6390static void gen_msgclr(DisasContext *ctx)
6391{
6392#if defined(CONFIG_USER_ONLY)
9b2fadda 6393 GEN_PRIV;
9e0b5cb1 6394#else
ebca5e6d 6395 CHK_HV;
7af1e7b0
CLG
6396 /* 64-bit server processors compliant with arch 2.x */
6397 if (ctx->insns_flags & PPC_SEGMENT_64B) {
6398 gen_helper_book3s_msgclr(cpu_env, cpu_gpr[rB(ctx->opcode)]);
6399 } else {
6400 gen_helper_msgclr(cpu_env, cpu_gpr[rB(ctx->opcode)]);
6401 }
9b2fadda 6402#endif /* defined(CONFIG_USER_ONLY) */
9e0b5cb1
AG
6403}
6404
d5d11a39
AG
6405static void gen_msgsnd(DisasContext *ctx)
6406{
6407#if defined(CONFIG_USER_ONLY)
9b2fadda 6408 GEN_PRIV;
d5d11a39 6409#else
ebca5e6d 6410 CHK_HV;
7af1e7b0
CLG
6411 /* 64-bit server processors compliant with arch 2.x */
6412 if (ctx->insns_flags & PPC_SEGMENT_64B) {
6413 gen_helper_book3s_msgsnd(cpu_gpr[rB(ctx->opcode)]);
6414 } else {
6415 gen_helper_msgsnd(cpu_gpr[rB(ctx->opcode)]);
6416 }
9b2fadda 6417#endif /* defined(CONFIG_USER_ONLY) */
d5d11a39
AG
6418}
6419
7af1e7b0
CLG
6420static void gen_msgsync(DisasContext *ctx)
6421{
6422#if defined(CONFIG_USER_ONLY)
6423 GEN_PRIV;
6424#else
6425 CHK_HV;
6426#endif /* defined(CONFIG_USER_ONLY) */
6427 /* interpreted as no-op */
6428}
b04ae981 6429
aeeb044c
ND
6430#if defined(TARGET_PPC64)
6431static void gen_maddld(DisasContext *ctx)
6432{
6433 TCGv_i64 t1 = tcg_temp_new_i64();
6434
6435 tcg_gen_mul_i64(t1, cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)]);
6436 tcg_gen_add_i64(cpu_gpr[rD(ctx->opcode)], t1, cpu_gpr[rC(ctx->opcode)]);
6437 tcg_temp_free_i64(t1);
6438}
5f29cc82
ND
6439
6440/* maddhd maddhdu */
6441static void gen_maddhd_maddhdu(DisasContext *ctx)
6442{
6443 TCGv_i64 lo = tcg_temp_new_i64();
6444 TCGv_i64 hi = tcg_temp_new_i64();
6445 TCGv_i64 t1 = tcg_temp_new_i64();
6446
6447 if (Rc(ctx->opcode)) {
6448 tcg_gen_mulu2_i64(lo, hi, cpu_gpr[rA(ctx->opcode)],
6449 cpu_gpr[rB(ctx->opcode)]);
6450 tcg_gen_movi_i64(t1, 0);
6451 } else {
6452 tcg_gen_muls2_i64(lo, hi, cpu_gpr[rA(ctx->opcode)],
6453 cpu_gpr[rB(ctx->opcode)]);
6454 tcg_gen_sari_i64(t1, cpu_gpr[rC(ctx->opcode)], 63);
6455 }
6456 tcg_gen_add2_i64(t1, cpu_gpr[rD(ctx->opcode)], lo, hi,
6457 cpu_gpr[rC(ctx->opcode)], t1);
6458 tcg_temp_free_i64(lo);
6459 tcg_temp_free_i64(hi);
6460 tcg_temp_free_i64(t1);
6461}
aeeb044c
ND
6462#endif /* defined(TARGET_PPC64) */
6463
0ff93d11
TM
6464static void gen_tbegin(DisasContext *ctx)
6465{
6466 if (unlikely(!ctx->tm_enabled)) {
6467 gen_exception_err(ctx, POWERPC_EXCP_FU, FSCR_IC_TM);
6468 return;
6469 }
6470 gen_helper_tbegin(cpu_env);
6471}
6472
56a84615
TM
6473#define GEN_TM_NOOP(name) \
6474static inline void gen_##name(DisasContext *ctx) \
6475{ \
6476 if (unlikely(!ctx->tm_enabled)) { \
6477 gen_exception_err(ctx, POWERPC_EXCP_FU, FSCR_IC_TM); \
6478 return; \
6479 } \
6480 /* Because tbegin always fails in QEMU, these user \
6481 * space instructions all have a simple implementation: \
6482 * \
6483 * CR[0] = 0b0 || MSR[TS] || 0b0 \
6484 * = 0b0 || 0b00 || 0b0 \
6485 */ \
6486 tcg_gen_movi_i32(cpu_crf[0], 0); \
6487}
6488
6489GEN_TM_NOOP(tend);
6490GEN_TM_NOOP(tabort);
6491GEN_TM_NOOP(tabortwc);
6492GEN_TM_NOOP(tabortwci);
6493GEN_TM_NOOP(tabortdc);
6494GEN_TM_NOOP(tabortdci);
6495GEN_TM_NOOP(tsr);
b8b4576e
SJS
6496static inline void gen_cp_abort(DisasContext *ctx)
6497{
6498 // Do Nothing
6499}
56a84615 6500
80b8c1ee
ND
6501#define GEN_CP_PASTE_NOOP(name) \
6502static inline void gen_##name(DisasContext *ctx) \
6503{ \
6504 /* Generate invalid exception until \
6505 * we have an implementation of the copy \
6506 * paste facility \
6507 */ \
6508 gen_invalid(ctx); \
6509}
6510
6511GEN_CP_PASTE_NOOP(copy)
6512GEN_CP_PASTE_NOOP(paste)
6513
aeedd582
TM
6514static void gen_tcheck(DisasContext *ctx)
6515{
6516 if (unlikely(!ctx->tm_enabled)) {
6517 gen_exception_err(ctx, POWERPC_EXCP_FU, FSCR_IC_TM);
6518 return;
6519 }
6520 /* Because tbegin always fails, the tcheck implementation
6521 * is simple:
6522 *
6523 * CR[CRF] = TDOOMED || MSR[TS] || 0b0
6524 * = 0b1 || 0b00 || 0b0
6525 */
6526 tcg_gen_movi_i32(cpu_crf[crfD(ctx->opcode)], 0x8);
6527}
6528
f83c2378
TM
6529#if defined(CONFIG_USER_ONLY)
6530#define GEN_TM_PRIV_NOOP(name) \
6531static inline void gen_##name(DisasContext *ctx) \
6532{ \
9b2fadda 6533 gen_priv_exception(ctx, POWERPC_EXCP_PRIV_OPC); \
f83c2378
TM
6534}
6535
6536#else
6537
6538#define GEN_TM_PRIV_NOOP(name) \
6539static inline void gen_##name(DisasContext *ctx) \
6540{ \
9b2fadda 6541 CHK_SV; \
f83c2378
TM
6542 if (unlikely(!ctx->tm_enabled)) { \
6543 gen_exception_err(ctx, POWERPC_EXCP_FU, FSCR_IC_TM); \
6544 return; \
6545 } \
6546 /* Because tbegin always fails, the implementation is \
6547 * simple: \
6548 * \
6549 * CR[0] = 0b0 || MSR[TS] || 0b0 \
6550 * = 0b0 || 0b00 | 0b0 \
6551 */ \
6552 tcg_gen_movi_i32(cpu_crf[0], 0); \
6553}
6554
6555#endif
6556
6557GEN_TM_PRIV_NOOP(treclaim);
6558GEN_TM_PRIV_NOOP(trechkpt);
6559
15848410
BH
6560#include "translate/fp-impl.inc.c"
6561
6562#include "translate/vmx-impl.inc.c"
6563
6564#include "translate/vsx-impl.inc.c"
6565
6566#include "translate/dfp-impl.inc.c"
6567
6568#include "translate/spe-impl.inc.c"
6569
5cb091a4
ND
6570/* Handles lfdp, lxsd, lxssp */
6571static void gen_dform39(DisasContext *ctx)
6572{
6573 switch (ctx->opcode & 0x3) {
6574 case 0: /* lfdp */
6575 if (ctx->insns_flags2 & PPC2_ISA205) {
6576 return gen_lfdp(ctx);
6577 }
6578 break;
6579 case 2: /* lxsd */
6580 if (ctx->insns_flags2 & PPC2_ISA300) {
6581 return gen_lxsd(ctx);
6582 }
6583 break;
6584 case 3: /* lxssp */
6585 if (ctx->insns_flags2 & PPC2_ISA300) {
6586 return gen_lxssp(ctx);
6587 }
6588 break;
6589 }
6590 return gen_invalid(ctx);
6591}
6592
d59ba583 6593/* handles stfdp, lxv, stxsd, stxssp lxvx */
e3001664
ND
6594static void gen_dform3D(DisasContext *ctx)
6595{
6596 if ((ctx->opcode & 3) == 1) { /* DQ-FORM */
6597 switch (ctx->opcode & 0x7) {
6598 case 1: /* lxv */
d59ba583
ND
6599 if (ctx->insns_flags2 & PPC2_ISA300) {
6600 return gen_lxv(ctx);
6601 }
e3001664
ND
6602 break;
6603 case 5: /* stxv */
d59ba583
ND
6604 if (ctx->insns_flags2 & PPC2_ISA300) {
6605 return gen_stxv(ctx);
6606 }
e3001664
ND
6607 break;
6608 }
6609 } else { /* DS-FORM */
6610 switch (ctx->opcode & 0x3) {
6611 case 0: /* stfdp */
6612 if (ctx->insns_flags2 & PPC2_ISA205) {
6613 return gen_stfdp(ctx);
6614 }
6615 break;
6616 case 2: /* stxsd */
6617 if (ctx->insns_flags2 & PPC2_ISA300) {
6618 return gen_stxsd(ctx);
6619 }
6620 break;
6621 case 3: /* stxssp */
6622 if (ctx->insns_flags2 & PPC2_ISA300) {
6623 return gen_stxssp(ctx);
6624 }
6625 break;
6626 }
6627 }
6628 return gen_invalid(ctx);
6629}
6630
c227f099 6631static opcode_t opcodes[] = {
5c55ff99
BS
6632GEN_HANDLER(invalid, 0x00, 0x00, 0x00, 0xFFFFFFFF, PPC_NONE),
6633GEN_HANDLER(cmp, 0x1F, 0x00, 0x00, 0x00400000, PPC_INTEGER),
6634GEN_HANDLER(cmpi, 0x0B, 0xFF, 0xFF, 0x00400000, PPC_INTEGER),
4aaefd93 6635GEN_HANDLER(cmpl, 0x1F, 0x00, 0x01, 0x00400001, PPC_INTEGER),
5c55ff99 6636GEN_HANDLER(cmpli, 0x0A, 0xFF, 0xFF, 0x00400000, PPC_INTEGER),
082ce330
ND
6637#if defined(TARGET_PPC64)
6638GEN_HANDLER_E(cmpeqb, 0x1F, 0x00, 0x07, 0x00600000, PPC_NONE, PPC2_ISA300),
6639#endif
fcfda20f 6640GEN_HANDLER_E(cmpb, 0x1F, 0x1C, 0x0F, 0x00000001, PPC_NONE, PPC2_ISA205),
f2442ef9 6641GEN_HANDLER_E(cmprb, 0x1F, 0x00, 0x06, 0x00400001, PPC_NONE, PPC2_ISA300),
5c55ff99
BS
6642GEN_HANDLER(isel, 0x1F, 0x0F, 0xFF, 0x00000001, PPC_ISEL),
6643GEN_HANDLER(addi, 0x0E, 0xFF, 0xFF, 0x00000000, PPC_INTEGER),
6644GEN_HANDLER(addic, 0x0C, 0xFF, 0xFF, 0x00000000, PPC_INTEGER),
6645GEN_HANDLER2(addic_, "addic.", 0x0D, 0xFF, 0xFF, 0x00000000, PPC_INTEGER),
6646GEN_HANDLER(addis, 0x0F, 0xFF, 0xFF, 0x00000000, PPC_INTEGER),
c5b2b9ce 6647GEN_HANDLER_E(addpcis, 0x13, 0x2, 0xFF, 0x00000000, PPC_NONE, PPC2_ISA300),
5c55ff99
BS
6648GEN_HANDLER(mulhw, 0x1F, 0x0B, 0x02, 0x00000400, PPC_INTEGER),
6649GEN_HANDLER(mulhwu, 0x1F, 0x0B, 0x00, 0x00000400, PPC_INTEGER),
6650GEN_HANDLER(mullw, 0x1F, 0x0B, 0x07, 0x00000000, PPC_INTEGER),
6651GEN_HANDLER(mullwo, 0x1F, 0x0B, 0x17, 0x00000000, PPC_INTEGER),
6652GEN_HANDLER(mulli, 0x07, 0xFF, 0xFF, 0x00000000, PPC_INTEGER),
6653#if defined(TARGET_PPC64)
6654GEN_HANDLER(mulld, 0x1F, 0x09, 0x07, 0x00000000, PPC_64B),
6655#endif
6656GEN_HANDLER(neg, 0x1F, 0x08, 0x03, 0x0000F800, PPC_INTEGER),
6657GEN_HANDLER(nego, 0x1F, 0x08, 0x13, 0x0000F800, PPC_INTEGER),
6658GEN_HANDLER(subfic, 0x08, 0xFF, 0xFF, 0x00000000, PPC_INTEGER),
6659GEN_HANDLER2(andi_, "andi.", 0x1C, 0xFF, 0xFF, 0x00000000, PPC_INTEGER),
6660GEN_HANDLER2(andis_, "andis.", 0x1D, 0xFF, 0xFF, 0x00000000, PPC_INTEGER),
6661GEN_HANDLER(cntlzw, 0x1F, 0x1A, 0x00, 0x00000000, PPC_INTEGER),
b35344e4 6662GEN_HANDLER_E(cnttzw, 0x1F, 0x1A, 0x10, 0x00000000, PPC_NONE, PPC2_ISA300),
80b8c1ee 6663GEN_HANDLER_E(copy, 0x1F, 0x06, 0x18, 0x03C00001, PPC_NONE, PPC2_ISA300),
b8b4576e 6664GEN_HANDLER_E(cp_abort, 0x1F, 0x06, 0x1A, 0x03FFF801, PPC_NONE, PPC2_ISA300),
80b8c1ee 6665GEN_HANDLER_E(paste, 0x1F, 0x06, 0x1C, 0x03C00000, PPC_NONE, PPC2_ISA300),
5c55ff99
BS
6666GEN_HANDLER(or, 0x1F, 0x1C, 0x0D, 0x00000000, PPC_INTEGER),
6667GEN_HANDLER(xor, 0x1F, 0x1C, 0x09, 0x00000000, PPC_INTEGER),
6668GEN_HANDLER(ori, 0x18, 0xFF, 0xFF, 0x00000000, PPC_INTEGER),
6669GEN_HANDLER(oris, 0x19, 0xFF, 0xFF, 0x00000000, PPC_INTEGER),
6670GEN_HANDLER(xori, 0x1A, 0xFF, 0xFF, 0x00000000, PPC_INTEGER),
6671GEN_HANDLER(xoris, 0x1B, 0xFF, 0xFF, 0x00000000, PPC_INTEGER),
6ab39b1b 6672GEN_HANDLER(popcntb, 0x1F, 0x1A, 0x03, 0x0000F801, PPC_POPCNTB),
eaabeef2 6673GEN_HANDLER(popcntw, 0x1F, 0x1A, 0x0b, 0x0000F801, PPC_POPCNTWD),
725bcec2 6674GEN_HANDLER_E(prtyw, 0x1F, 0x1A, 0x04, 0x0000F801, PPC_NONE, PPC2_ISA205),
5c55ff99 6675#if defined(TARGET_PPC64)
eaabeef2 6676GEN_HANDLER(popcntd, 0x1F, 0x1A, 0x0F, 0x0000F801, PPC_POPCNTWD),
5c55ff99 6677GEN_HANDLER(cntlzd, 0x1F, 0x1A, 0x01, 0x00000000, PPC_64B),
e91d95b2 6678GEN_HANDLER_E(cnttzd, 0x1F, 0x1A, 0x11, 0x00000000, PPC_NONE, PPC2_ISA300),
fec5c62a 6679GEN_HANDLER_E(darn, 0x1F, 0x13, 0x17, 0x001CF801, PPC_NONE, PPC2_ISA300),
725bcec2 6680GEN_HANDLER_E(prtyd, 0x1F, 0x1A, 0x05, 0x0000F801, PPC_NONE, PPC2_ISA205),
86ba37ed 6681GEN_HANDLER_E(bpermd, 0x1F, 0x1C, 0x07, 0x00000001, PPC_NONE, PPC2_PERM_ISA206),
5c55ff99
BS
6682#endif
6683GEN_HANDLER(rlwimi, 0x14, 0xFF, 0xFF, 0x00000000, PPC_INTEGER),
6684GEN_HANDLER(rlwinm, 0x15, 0xFF, 0xFF, 0x00000000, PPC_INTEGER),
6685GEN_HANDLER(rlwnm, 0x17, 0xFF, 0xFF, 0x00000000, PPC_INTEGER),
6686GEN_HANDLER(slw, 0x1F, 0x18, 0x00, 0x00000000, PPC_INTEGER),
6687GEN_HANDLER(sraw, 0x1F, 0x18, 0x18, 0x00000000, PPC_INTEGER),
6688GEN_HANDLER(srawi, 0x1F, 0x18, 0x19, 0x00000000, PPC_INTEGER),
6689GEN_HANDLER(srw, 0x1F, 0x18, 0x10, 0x00000000, PPC_INTEGER),
6690#if defined(TARGET_PPC64)
6691GEN_HANDLER(sld, 0x1F, 0x1B, 0x00, 0x00000000, PPC_64B),
6692GEN_HANDLER(srad, 0x1F, 0x1A, 0x18, 0x00000000, PPC_64B),
6693GEN_HANDLER2(sradi0, "sradi", 0x1F, 0x1A, 0x19, 0x00000000, PPC_64B),
6694GEN_HANDLER2(sradi1, "sradi", 0x1F, 0x1B, 0x19, 0x00000000, PPC_64B),
6695GEN_HANDLER(srd, 0x1F, 0x1B, 0x10, 0x00000000, PPC_64B),
787bbe37
ND
6696GEN_HANDLER2_E(extswsli0, "extswsli", 0x1F, 0x1A, 0x1B, 0x00000000,
6697 PPC_NONE, PPC2_ISA300),
6698GEN_HANDLER2_E(extswsli1, "extswsli", 0x1F, 0x1B, 0x1B, 0x00000000,
6699 PPC_NONE, PPC2_ISA300),
5c55ff99 6700#endif
5c55ff99
BS
6701#if defined(TARGET_PPC64)
6702GEN_HANDLER(ld, 0x3A, 0xFF, 0xFF, 0x00000000, PPC_64B),
6703GEN_HANDLER(lq, 0x38, 0xFF, 0xFF, 0x00000000, PPC_64BX),
6704GEN_HANDLER(std, 0x3E, 0xFF, 0xFF, 0x00000000, PPC_64B),
6705#endif
5cb091a4
ND
6706/* handles lfdp, lxsd, lxssp */
6707GEN_HANDLER_E(dform39, 0x39, 0xFF, 0xFF, 0x00000000, PPC_NONE, PPC2_ISA205),
d59ba583 6708/* handles stfdp, lxv, stxsd, stxssp, stxv */
e3001664 6709GEN_HANDLER_E(dform3D, 0x3D, 0xFF, 0xFF, 0x00000000, PPC_NONE, PPC2_ISA205),
5c55ff99
BS
6710GEN_HANDLER(lmw, 0x2E, 0xFF, 0xFF, 0x00000000, PPC_INTEGER),
6711GEN_HANDLER(stmw, 0x2F, 0xFF, 0xFF, 0x00000000, PPC_INTEGER),
6712GEN_HANDLER(lswi, 0x1F, 0x15, 0x12, 0x00000001, PPC_STRING),
6713GEN_HANDLER(lswx, 0x1F, 0x15, 0x10, 0x00000001, PPC_STRING),
6714GEN_HANDLER(stswi, 0x1F, 0x15, 0x16, 0x00000001, PPC_STRING),
6715GEN_HANDLER(stswx, 0x1F, 0x15, 0x14, 0x00000001, PPC_STRING),
c8fd8373 6716GEN_HANDLER(eieio, 0x1F, 0x16, 0x1A, 0x01FFF801, PPC_MEM_EIEIO),
5c55ff99 6717GEN_HANDLER(isync, 0x13, 0x16, 0x04, 0x03FFF801, PPC_MEM),
5c77a786
TM
6718GEN_HANDLER_E(lbarx, 0x1F, 0x14, 0x01, 0, PPC_NONE, PPC2_ATOMIC_ISA206),
6719GEN_HANDLER_E(lharx, 0x1F, 0x14, 0x03, 0, PPC_NONE, PPC2_ATOMIC_ISA206),
f844c817 6720GEN_HANDLER(lwarx, 0x1F, 0x14, 0x00, 0x00000000, PPC_RES),
a68a6146 6721GEN_HANDLER_E(lwat, 0x1F, 0x06, 0x12, 0x00000001, PPC_NONE, PPC2_ISA300),
a3401188 6722GEN_HANDLER_E(stwat, 0x1F, 0x06, 0x16, 0x00000001, PPC_NONE, PPC2_ISA300),
587c51f7
TM
6723GEN_HANDLER_E(stbcx_, 0x1F, 0x16, 0x15, 0, PPC_NONE, PPC2_ATOMIC_ISA206),
6724GEN_HANDLER_E(sthcx_, 0x1F, 0x16, 0x16, 0, PPC_NONE, PPC2_ATOMIC_ISA206),
5c55ff99
BS
6725GEN_HANDLER2(stwcx_, "stwcx.", 0x1F, 0x16, 0x04, 0x00000000, PPC_RES),
6726#if defined(TARGET_PPC64)
a68a6146 6727GEN_HANDLER_E(ldat, 0x1F, 0x06, 0x13, 0x00000001, PPC_NONE, PPC2_ISA300),
a3401188 6728GEN_HANDLER_E(stdat, 0x1F, 0x06, 0x17, 0x00000001, PPC_NONE, PPC2_ISA300),
f844c817 6729GEN_HANDLER(ldarx, 0x1F, 0x14, 0x02, 0x00000000, PPC_64B),
9c294d5a 6730GEN_HANDLER_E(lqarx, 0x1F, 0x14, 0x08, 0, PPC_NONE, PPC2_LSQ_ISA207),
5c55ff99 6731GEN_HANDLER2(stdcx_, "stdcx.", 0x1F, 0x16, 0x06, 0x00000000, PPC_64B),
27b95bfe 6732GEN_HANDLER_E(stqcx_, 0x1F, 0x16, 0x05, 0, PPC_NONE, PPC2_LSQ_ISA207),
5c55ff99
BS
6733#endif
6734GEN_HANDLER(sync, 0x1F, 0x16, 0x12, 0x039FF801, PPC_MEM_SYNC),
6735GEN_HANDLER(wait, 0x1F, 0x1E, 0x01, 0x03FFF801, PPC_WAIT),
c09cec68 6736GEN_HANDLER_E(wait, 0x1F, 0x1E, 0x00, 0x039FF801, PPC_NONE, PPC2_ISA300),
5c55ff99
BS
6737GEN_HANDLER(b, 0x12, 0xFF, 0xFF, 0x00000000, PPC_FLOW),
6738GEN_HANDLER(bc, 0x10, 0xFF, 0xFF, 0x00000000, PPC_FLOW),
6739GEN_HANDLER(bcctr, 0x13, 0x10, 0x10, 0x00000000, PPC_FLOW),
6740GEN_HANDLER(bclr, 0x13, 0x10, 0x00, 0x00000000, PPC_FLOW),
4aaefd93 6741GEN_HANDLER_E(bctar, 0x13, 0x10, 0x11, 0x0000E000, PPC_NONE, PPC2_BCTAR_ISA207),
5c55ff99
BS
6742GEN_HANDLER(mcrf, 0x13, 0x00, 0xFF, 0x00000001, PPC_INTEGER),
6743GEN_HANDLER(rfi, 0x13, 0x12, 0x01, 0x03FF8001, PPC_FLOW),
6744#if defined(TARGET_PPC64)
6745GEN_HANDLER(rfid, 0x13, 0x12, 0x00, 0x03FF8001, PPC_64B),
cdee0e72 6746GEN_HANDLER_E(stop, 0x13, 0x12, 0x0b, 0x03FFF801, PPC_NONE, PPC2_ISA300),
7778a575
BH
6747GEN_HANDLER_E(doze, 0x13, 0x12, 0x0c, 0x03FFF801, PPC_NONE, PPC2_PM_ISA206),
6748GEN_HANDLER_E(nap, 0x13, 0x12, 0x0d, 0x03FFF801, PPC_NONE, PPC2_PM_ISA206),
6749GEN_HANDLER_E(sleep, 0x13, 0x12, 0x0e, 0x03FFF801, PPC_NONE, PPC2_PM_ISA206),
6750GEN_HANDLER_E(rvwinkle, 0x13, 0x12, 0x0f, 0x03FFF801, PPC_NONE, PPC2_PM_ISA206),
5c55ff99
BS
6751GEN_HANDLER(hrfid, 0x13, 0x12, 0x08, 0x03FF8001, PPC_64H),
6752#endif
6753GEN_HANDLER(sc, 0x11, 0xFF, 0xFF, 0x03FFF01D, PPC_FLOW),
6754GEN_HANDLER(tw, 0x1F, 0x04, 0x00, 0x00000001, PPC_FLOW),
6755GEN_HANDLER(twi, 0x03, 0xFF, 0xFF, 0x00000000, PPC_FLOW),
6756#if defined(TARGET_PPC64)
6757GEN_HANDLER(td, 0x1F, 0x04, 0x02, 0x00000001, PPC_64B),
6758GEN_HANDLER(tdi, 0x02, 0xFF, 0xFF, 0x00000000, PPC_64B),
6759#endif
6760GEN_HANDLER(mcrxr, 0x1F, 0x00, 0x10, 0x007FF801, PPC_MISC),
6761GEN_HANDLER(mfcr, 0x1F, 0x13, 0x00, 0x00000801, PPC_MISC),
6762GEN_HANDLER(mfmsr, 0x1F, 0x13, 0x02, 0x001FF801, PPC_MISC),
6763GEN_HANDLER(mfspr, 0x1F, 0x13, 0x0A, 0x00000001, PPC_MISC),
6764GEN_HANDLER(mftb, 0x1F, 0x13, 0x0B, 0x00000001, PPC_MFTB),
6765GEN_HANDLER(mtcrf, 0x1F, 0x10, 0x04, 0x00000801, PPC_MISC),
6766#if defined(TARGET_PPC64)
6767GEN_HANDLER(mtmsrd, 0x1F, 0x12, 0x05, 0x001EF801, PPC_64B),
dc2ee038 6768GEN_HANDLER_E(setb, 0x1F, 0x00, 0x04, 0x0003F801, PPC_NONE, PPC2_ISA300),
b63d0434 6769GEN_HANDLER_E(mcrxrx, 0x1F, 0x00, 0x12, 0x007FF801, PPC_NONE, PPC2_ISA300),
5c55ff99 6770#endif
5e31867f 6771GEN_HANDLER(mtmsr, 0x1F, 0x12, 0x04, 0x001EF801, PPC_MISC),
4248b336 6772GEN_HANDLER(mtspr, 0x1F, 0x13, 0x0E, 0x00000000, PPC_MISC),
5c55ff99
BS
6773GEN_HANDLER(dcbf, 0x1F, 0x16, 0x02, 0x03C00001, PPC_CACHE),
6774GEN_HANDLER(dcbi, 0x1F, 0x16, 0x0E, 0x03E00001, PPC_CACHE),
6775GEN_HANDLER(dcbst, 0x1F, 0x16, 0x01, 0x03E00001, PPC_CACHE),
3f34cf91
CLG
6776GEN_HANDLER(dcbt, 0x1F, 0x16, 0x08, 0x00000001, PPC_CACHE),
6777GEN_HANDLER(dcbtst, 0x1F, 0x16, 0x07, 0x00000001, PPC_CACHE),
4d09d529 6778GEN_HANDLER_E(dcbtls, 0x1F, 0x06, 0x05, 0x02000001, PPC_BOOKE, PPC2_BOOKE206),
8e33944f 6779GEN_HANDLER(dcbz, 0x1F, 0x16, 0x1F, 0x03C00001, PPC_CACHE_DCBZ),
5c55ff99 6780GEN_HANDLER(dst, 0x1F, 0x16, 0x0A, 0x01800001, PPC_ALTIVEC),
99d45f8f 6781GEN_HANDLER(dstst, 0x1F, 0x16, 0x0B, 0x01800001, PPC_ALTIVEC),
5c55ff99
BS
6782GEN_HANDLER(dss, 0x1F, 0x16, 0x19, 0x019FF801, PPC_ALTIVEC),
6783GEN_HANDLER(icbi, 0x1F, 0x16, 0x1E, 0x03E00001, PPC_CACHE_ICBI),
6784GEN_HANDLER(dcba, 0x1F, 0x16, 0x17, 0x03E00001, PPC_CACHE_DCBA),
6785GEN_HANDLER(mfsr, 0x1F, 0x13, 0x12, 0x0010F801, PPC_SEGMENT),
6786GEN_HANDLER(mfsrin, 0x1F, 0x13, 0x14, 0x001F0001, PPC_SEGMENT),
6787GEN_HANDLER(mtsr, 0x1F, 0x12, 0x06, 0x0010F801, PPC_SEGMENT),
6788GEN_HANDLER(mtsrin, 0x1F, 0x12, 0x07, 0x001F0001, PPC_SEGMENT),
6789#if defined(TARGET_PPC64)
6790GEN_HANDLER2(mfsr_64b, "mfsr", 0x1F, 0x13, 0x12, 0x0010F801, PPC_SEGMENT_64B),
6791GEN_HANDLER2(mfsrin_64b, "mfsrin", 0x1F, 0x13, 0x14, 0x001F0001,
6792 PPC_SEGMENT_64B),
6793GEN_HANDLER2(mtsr_64b, "mtsr", 0x1F, 0x12, 0x06, 0x0010F801, PPC_SEGMENT_64B),
6794GEN_HANDLER2(mtsrin_64b, "mtsrin", 0x1F, 0x12, 0x07, 0x001F0001,
6795 PPC_SEGMENT_64B),
efdef95f
DG
6796GEN_HANDLER2(slbmte, "slbmte", 0x1F, 0x12, 0x0C, 0x001F0001, PPC_SEGMENT_64B),
6797GEN_HANDLER2(slbmfee, "slbmfee", 0x1F, 0x13, 0x1C, 0x001F0001, PPC_SEGMENT_64B),
6798GEN_HANDLER2(slbmfev, "slbmfev", 0x1F, 0x13, 0x1A, 0x001F0001, PPC_SEGMENT_64B),
c76c22d5 6799GEN_HANDLER2(slbfee_, "slbfee.", 0x1F, 0x13, 0x1E, 0x001F0000, PPC_SEGMENT_64B),
5c55ff99
BS
6800#endif
6801GEN_HANDLER(tlbia, 0x1F, 0x12, 0x0B, 0x03FFFC01, PPC_MEM_TLBIA),
f9ef0527
BH
6802/* XXX Those instructions will need to be handled differently for
6803 * different ISA versions */
6804GEN_HANDLER(tlbiel, 0x1F, 0x12, 0x08, 0x001F0001, PPC_MEM_TLBIE),
6805GEN_HANDLER(tlbie, 0x1F, 0x12, 0x09, 0x001F0001, PPC_MEM_TLBIE),
c8830502
SJS
6806GEN_HANDLER_E(tlbiel, 0x1F, 0x12, 0x08, 0x00100001, PPC_NONE, PPC2_ISA300),
6807GEN_HANDLER_E(tlbie, 0x1F, 0x12, 0x09, 0x00100001, PPC_NONE, PPC2_ISA300),
5c55ff99
BS
6808GEN_HANDLER(tlbsync, 0x1F, 0x16, 0x11, 0x03FFF801, PPC_MEM_TLBSYNC),
6809#if defined(TARGET_PPC64)
2f9254d9 6810GEN_HANDLER(slbia, 0x1F, 0x12, 0x0F, 0x031FFC01, PPC_SLBI),
5c55ff99 6811GEN_HANDLER(slbie, 0x1F, 0x12, 0x0D, 0x03FF0001, PPC_SLBI),
a63f1dfc 6812GEN_HANDLER_E(slbieg, 0x1F, 0x12, 0x0E, 0x001F0001, PPC_NONE, PPC2_ISA300),
62d897ca 6813GEN_HANDLER_E(slbsync, 0x1F, 0x12, 0x0A, 0x03FFF801, PPC_NONE, PPC2_ISA300),
5c55ff99
BS
6814#endif
6815GEN_HANDLER(eciwx, 0x1F, 0x16, 0x0D, 0x00000001, PPC_EXTERN),
6816GEN_HANDLER(ecowx, 0x1F, 0x16, 0x09, 0x00000001, PPC_EXTERN),
6817GEN_HANDLER(abs, 0x1F, 0x08, 0x0B, 0x0000F800, PPC_POWER_BR),
6818GEN_HANDLER(abso, 0x1F, 0x08, 0x1B, 0x0000F800, PPC_POWER_BR),
6819GEN_HANDLER(clcs, 0x1F, 0x10, 0x13, 0x0000F800, PPC_POWER_BR),
6820GEN_HANDLER(div, 0x1F, 0x0B, 0x0A, 0x00000000, PPC_POWER_BR),
6821GEN_HANDLER(divo, 0x1F, 0x0B, 0x1A, 0x00000000, PPC_POWER_BR),
6822GEN_HANDLER(divs, 0x1F, 0x0B, 0x0B, 0x00000000, PPC_POWER_BR),
6823GEN_HANDLER(divso, 0x1F, 0x0B, 0x1B, 0x00000000, PPC_POWER_BR),
6824GEN_HANDLER(doz, 0x1F, 0x08, 0x08, 0x00000000, PPC_POWER_BR),
6825GEN_HANDLER(dozo, 0x1F, 0x08, 0x18, 0x00000000, PPC_POWER_BR),
6826GEN_HANDLER(dozi, 0x09, 0xFF, 0xFF, 0x00000000, PPC_POWER_BR),
6827GEN_HANDLER(lscbx, 0x1F, 0x15, 0x08, 0x00000000, PPC_POWER_BR),
6828GEN_HANDLER(maskg, 0x1F, 0x1D, 0x00, 0x00000000, PPC_POWER_BR),
6829GEN_HANDLER(maskir, 0x1F, 0x1D, 0x10, 0x00000000, PPC_POWER_BR),
6830GEN_HANDLER(mul, 0x1F, 0x0B, 0x03, 0x00000000, PPC_POWER_BR),
6831GEN_HANDLER(mulo, 0x1F, 0x0B, 0x13, 0x00000000, PPC_POWER_BR),
6832GEN_HANDLER(nabs, 0x1F, 0x08, 0x0F, 0x00000000, PPC_POWER_BR),
6833GEN_HANDLER(nabso, 0x1F, 0x08, 0x1F, 0x00000000, PPC_POWER_BR),
6834GEN_HANDLER(rlmi, 0x16, 0xFF, 0xFF, 0x00000000, PPC_POWER_BR),
6835GEN_HANDLER(rrib, 0x1F, 0x19, 0x10, 0x00000000, PPC_POWER_BR),
6836GEN_HANDLER(sle, 0x1F, 0x19, 0x04, 0x00000000, PPC_POWER_BR),
6837GEN_HANDLER(sleq, 0x1F, 0x19, 0x06, 0x00000000, PPC_POWER_BR),
6838GEN_HANDLER(sliq, 0x1F, 0x18, 0x05, 0x00000000, PPC_POWER_BR),
6839GEN_HANDLER(slliq, 0x1F, 0x18, 0x07, 0x00000000, PPC_POWER_BR),
6840GEN_HANDLER(sllq, 0x1F, 0x18, 0x06, 0x00000000, PPC_POWER_BR),
6841GEN_HANDLER(slq, 0x1F, 0x18, 0x04, 0x00000000, PPC_POWER_BR),
6842GEN_HANDLER(sraiq, 0x1F, 0x18, 0x1D, 0x00000000, PPC_POWER_BR),
6843GEN_HANDLER(sraq, 0x1F, 0x18, 0x1C, 0x00000000, PPC_POWER_BR),
6844GEN_HANDLER(sre, 0x1F, 0x19, 0x14, 0x00000000, PPC_POWER_BR),
6845GEN_HANDLER(srea, 0x1F, 0x19, 0x1C, 0x00000000, PPC_POWER_BR),
6846GEN_HANDLER(sreq, 0x1F, 0x19, 0x16, 0x00000000, PPC_POWER_BR),
6847GEN_HANDLER(sriq, 0x1F, 0x18, 0x15, 0x00000000, PPC_POWER_BR),
6848GEN_HANDLER(srliq, 0x1F, 0x18, 0x17, 0x00000000, PPC_POWER_BR),
6849GEN_HANDLER(srlq, 0x1F, 0x18, 0x16, 0x00000000, PPC_POWER_BR),
6850GEN_HANDLER(srq, 0x1F, 0x18, 0x14, 0x00000000, PPC_POWER_BR),
6851GEN_HANDLER(dsa, 0x1F, 0x14, 0x13, 0x03FFF801, PPC_602_SPEC),
6852GEN_HANDLER(esa, 0x1F, 0x14, 0x12, 0x03FFF801, PPC_602_SPEC),
6853GEN_HANDLER(mfrom, 0x1F, 0x09, 0x08, 0x03E0F801, PPC_602_SPEC),
6854GEN_HANDLER2(tlbld_6xx, "tlbld", 0x1F, 0x12, 0x1E, 0x03FF0001, PPC_6xx_TLB),
6855GEN_HANDLER2(tlbli_6xx, "tlbli", 0x1F, 0x12, 0x1F, 0x03FF0001, PPC_6xx_TLB),
6856GEN_HANDLER2(tlbld_74xx, "tlbld", 0x1F, 0x12, 0x1E, 0x03FF0001, PPC_74xx_TLB),
6857GEN_HANDLER2(tlbli_74xx, "tlbli", 0x1F, 0x12, 0x1F, 0x03FF0001, PPC_74xx_TLB),
6858GEN_HANDLER(clf, 0x1F, 0x16, 0x03, 0x03E00000, PPC_POWER),
6859GEN_HANDLER(cli, 0x1F, 0x16, 0x0F, 0x03E00000, PPC_POWER),
6860GEN_HANDLER(dclst, 0x1F, 0x16, 0x13, 0x03E00000, PPC_POWER),
6861GEN_HANDLER(mfsri, 0x1F, 0x13, 0x13, 0x00000001, PPC_POWER),
6862GEN_HANDLER(rac, 0x1F, 0x12, 0x19, 0x00000001, PPC_POWER),
6863GEN_HANDLER(rfsvc, 0x13, 0x12, 0x02, 0x03FFF0001, PPC_POWER),
6864GEN_HANDLER(lfq, 0x38, 0xFF, 0xFF, 0x00000003, PPC_POWER2),
6865GEN_HANDLER(lfqu, 0x39, 0xFF, 0xFF, 0x00000003, PPC_POWER2),
6866GEN_HANDLER(lfqux, 0x1F, 0x17, 0x19, 0x00000001, PPC_POWER2),
6867GEN_HANDLER(lfqx, 0x1F, 0x17, 0x18, 0x00000001, PPC_POWER2),
6868GEN_HANDLER(stfq, 0x3C, 0xFF, 0xFF, 0x00000003, PPC_POWER2),
6869GEN_HANDLER(stfqu, 0x3D, 0xFF, 0xFF, 0x00000003, PPC_POWER2),
6870GEN_HANDLER(stfqux, 0x1F, 0x17, 0x1D, 0x00000001, PPC_POWER2),
6871GEN_HANDLER(stfqx, 0x1F, 0x17, 0x1C, 0x00000001, PPC_POWER2),
6872GEN_HANDLER(mfapidi, 0x1F, 0x13, 0x08, 0x0000F801, PPC_MFAPIDI),
6873GEN_HANDLER(tlbiva, 0x1F, 0x12, 0x18, 0x03FFF801, PPC_TLBIVA),
6874GEN_HANDLER(mfdcr, 0x1F, 0x03, 0x0A, 0x00000001, PPC_DCR),
6875GEN_HANDLER(mtdcr, 0x1F, 0x03, 0x0E, 0x00000001, PPC_DCR),
6876GEN_HANDLER(mfdcrx, 0x1F, 0x03, 0x08, 0x00000000, PPC_DCRX),
6877GEN_HANDLER(mtdcrx, 0x1F, 0x03, 0x0C, 0x00000000, PPC_DCRX),
6878GEN_HANDLER(mfdcrux, 0x1F, 0x03, 0x09, 0x00000000, PPC_DCRUX),
6879GEN_HANDLER(mtdcrux, 0x1F, 0x03, 0x0D, 0x00000000, PPC_DCRUX),
6880GEN_HANDLER(dccci, 0x1F, 0x06, 0x0E, 0x03E00001, PPC_4xx_COMMON),
6881GEN_HANDLER(dcread, 0x1F, 0x06, 0x0F, 0x00000001, PPC_4xx_COMMON),
6882GEN_HANDLER2(icbt_40x, "icbt", 0x1F, 0x06, 0x08, 0x03E00001, PPC_40x_ICBT),
6883GEN_HANDLER(iccci, 0x1F, 0x06, 0x1E, 0x00000001, PPC_4xx_COMMON),
6884GEN_HANDLER(icread, 0x1F, 0x06, 0x1F, 0x03E00001, PPC_4xx_COMMON),
6885GEN_HANDLER2(rfci_40x, "rfci", 0x13, 0x13, 0x01, 0x03FF8001, PPC_40x_EXCP),
01662f3e 6886GEN_HANDLER_E(rfci, 0x13, 0x13, 0x01, 0x03FF8001, PPC_BOOKE, PPC2_BOOKE206),
5c55ff99
BS
6887GEN_HANDLER(rfdi, 0x13, 0x07, 0x01, 0x03FF8001, PPC_RFDI),
6888GEN_HANDLER(rfmci, 0x13, 0x06, 0x01, 0x03FF8001, PPC_RFMCI),
6889GEN_HANDLER2(tlbre_40x, "tlbre", 0x1F, 0x12, 0x1D, 0x00000001, PPC_40x_TLB),
6890GEN_HANDLER2(tlbsx_40x, "tlbsx", 0x1F, 0x12, 0x1C, 0x00000000, PPC_40x_TLB),
6891GEN_HANDLER2(tlbwe_40x, "tlbwe", 0x1F, 0x12, 0x1E, 0x00000001, PPC_40x_TLB),
6892GEN_HANDLER2(tlbre_440, "tlbre", 0x1F, 0x12, 0x1D, 0x00000001, PPC_BOOKE),
6893GEN_HANDLER2(tlbsx_440, "tlbsx", 0x1F, 0x12, 0x1C, 0x00000000, PPC_BOOKE),
6894GEN_HANDLER2(tlbwe_440, "tlbwe", 0x1F, 0x12, 0x1E, 0x00000001, PPC_BOOKE),
01662f3e
AG
6895GEN_HANDLER2_E(tlbre_booke206, "tlbre", 0x1F, 0x12, 0x1D, 0x00000001,
6896 PPC_NONE, PPC2_BOOKE206),
6897GEN_HANDLER2_E(tlbsx_booke206, "tlbsx", 0x1F, 0x12, 0x1C, 0x00000000,
6898 PPC_NONE, PPC2_BOOKE206),
6899GEN_HANDLER2_E(tlbwe_booke206, "tlbwe", 0x1F, 0x12, 0x1E, 0x00000001,
6900 PPC_NONE, PPC2_BOOKE206),
6901GEN_HANDLER2_E(tlbivax_booke206, "tlbivax", 0x1F, 0x12, 0x18, 0x00000001,
6902 PPC_NONE, PPC2_BOOKE206),
6d3db821
AG
6903GEN_HANDLER2_E(tlbilx_booke206, "tlbilx", 0x1F, 0x12, 0x00, 0x03800001,
6904 PPC_NONE, PPC2_BOOKE206),
d5d11a39
AG
6905GEN_HANDLER2_E(msgsnd, "msgsnd", 0x1F, 0x0E, 0x06, 0x03ff0001,
6906 PPC_NONE, PPC2_PRCNTL),
9e0b5cb1
AG
6907GEN_HANDLER2_E(msgclr, "msgclr", 0x1F, 0x0E, 0x07, 0x03ff0001,
6908 PPC_NONE, PPC2_PRCNTL),
7af1e7b0
CLG
6909GEN_HANDLER2_E(msgsync, "msgsync", 0x1F, 0x16, 0x1B, 0x00000000,
6910 PPC_NONE, PPC2_PRCNTL),
5c55ff99 6911GEN_HANDLER(wrtee, 0x1F, 0x03, 0x04, 0x000FFC01, PPC_WRTEE),
fbe73008 6912GEN_HANDLER(wrteei, 0x1F, 0x03, 0x05, 0x000E7C01, PPC_WRTEE),
5c55ff99 6913GEN_HANDLER(dlmzb, 0x1F, 0x0E, 0x02, 0x00000000, PPC_440_SPEC),
01662f3e
AG
6914GEN_HANDLER_E(mbar, 0x1F, 0x16, 0x1a, 0x001FF801,
6915 PPC_BOOKE, PPC2_BOOKE206),
dcb2b9e1 6916GEN_HANDLER(msync_4xx, 0x1F, 0x16, 0x12, 0x03FFF801, PPC_BOOKE),
01662f3e
AG
6917GEN_HANDLER2_E(icbt_440, "icbt", 0x1F, 0x16, 0x00, 0x03E00001,
6918 PPC_BOOKE, PPC2_BOOKE206),
0c8d8c8b
BZ
6919GEN_HANDLER2(icbt_440, "icbt", 0x1F, 0x06, 0x08, 0x03E00001,
6920 PPC_440_SPEC),
5c55ff99
BS
6921GEN_HANDLER(lvsl, 0x1f, 0x06, 0x00, 0x00000001, PPC_ALTIVEC),
6922GEN_HANDLER(lvsr, 0x1f, 0x06, 0x01, 0x00000001, PPC_ALTIVEC),
6923GEN_HANDLER(mfvscr, 0x04, 0x2, 0x18, 0x001ff800, PPC_ALTIVEC),
6924GEN_HANDLER(mtvscr, 0x04, 0x2, 0x19, 0x03ff0000, PPC_ALTIVEC),
5c55ff99 6925GEN_HANDLER(vmladduhm, 0x04, 0x11, 0xFF, 0x00000000, PPC_ALTIVEC),
aeeb044c 6926#if defined(TARGET_PPC64)
5f29cc82
ND
6927GEN_HANDLER_E(maddhd_maddhdu, 0x04, 0x18, 0xFF, 0x00000000, PPC_NONE,
6928 PPC2_ISA300),
aeeb044c
ND
6929GEN_HANDLER_E(maddld, 0x04, 0x19, 0xFF, 0x00000000, PPC_NONE, PPC2_ISA300),
6930#endif
5c55ff99
BS
6931
6932#undef GEN_INT_ARITH_ADD
6933#undef GEN_INT_ARITH_ADD_CONST
6934#define GEN_INT_ARITH_ADD(name, opc3, add_ca, compute_ca, compute_ov) \
6935GEN_HANDLER(name, 0x1F, 0x0A, opc3, 0x00000000, PPC_INTEGER),
6936#define GEN_INT_ARITH_ADD_CONST(name, opc3, const_val, \
6937 add_ca, compute_ca, compute_ov) \
6938GEN_HANDLER(name, 0x1F, 0x0A, opc3, 0x0000F800, PPC_INTEGER),
6939GEN_INT_ARITH_ADD(add, 0x08, 0, 0, 0)
6940GEN_INT_ARITH_ADD(addo, 0x18, 0, 0, 1)
6941GEN_INT_ARITH_ADD(addc, 0x00, 0, 1, 0)
6942GEN_INT_ARITH_ADD(addco, 0x10, 0, 1, 1)
6943GEN_INT_ARITH_ADD(adde, 0x04, 1, 1, 0)
6944GEN_INT_ARITH_ADD(addeo, 0x14, 1, 1, 1)
6945GEN_INT_ARITH_ADD_CONST(addme, 0x07, -1LL, 1, 1, 0)
6946GEN_INT_ARITH_ADD_CONST(addmeo, 0x17, -1LL, 1, 1, 1)
6947GEN_INT_ARITH_ADD_CONST(addze, 0x06, 0, 1, 1, 0)
6948GEN_INT_ARITH_ADD_CONST(addzeo, 0x16, 0, 1, 1, 1)
6949
6950#undef GEN_INT_ARITH_DIVW
6951#define GEN_INT_ARITH_DIVW(name, opc3, sign, compute_ov) \
6952GEN_HANDLER(name, 0x1F, 0x0B, opc3, 0x00000000, PPC_INTEGER)
6953GEN_INT_ARITH_DIVW(divwu, 0x0E, 0, 0),
6954GEN_INT_ARITH_DIVW(divwuo, 0x1E, 0, 1),
6955GEN_INT_ARITH_DIVW(divw, 0x0F, 1, 0),
6956GEN_INT_ARITH_DIVW(divwo, 0x1F, 1, 1),
a98eb9e9
TM
6957GEN_HANDLER_E(divwe, 0x1F, 0x0B, 0x0D, 0, PPC_NONE, PPC2_DIVE_ISA206),
6958GEN_HANDLER_E(divweo, 0x1F, 0x0B, 0x1D, 0, PPC_NONE, PPC2_DIVE_ISA206),
6a4fda33
TM
6959GEN_HANDLER_E(divweu, 0x1F, 0x0B, 0x0C, 0, PPC_NONE, PPC2_DIVE_ISA206),
6960GEN_HANDLER_E(divweuo, 0x1F, 0x0B, 0x1C, 0, PPC_NONE, PPC2_DIVE_ISA206),
af2c6620
ND
6961GEN_HANDLER_E(modsw, 0x1F, 0x0B, 0x18, 0x00000001, PPC_NONE, PPC2_ISA300),
6962GEN_HANDLER_E(moduw, 0x1F, 0x0B, 0x08, 0x00000001, PPC_NONE, PPC2_ISA300),
5c55ff99
BS
6963
6964#if defined(TARGET_PPC64)
6965#undef GEN_INT_ARITH_DIVD
6966#define GEN_INT_ARITH_DIVD(name, opc3, sign, compute_ov) \
6967GEN_HANDLER(name, 0x1F, 0x09, opc3, 0x00000000, PPC_64B)
6968GEN_INT_ARITH_DIVD(divdu, 0x0E, 0, 0),
6969GEN_INT_ARITH_DIVD(divduo, 0x1E, 0, 1),
6970GEN_INT_ARITH_DIVD(divd, 0x0F, 1, 0),
6971GEN_INT_ARITH_DIVD(divdo, 0x1F, 1, 1),
6972
98d1eb27
TM
6973GEN_HANDLER_E(divdeu, 0x1F, 0x09, 0x0C, 0, PPC_NONE, PPC2_DIVE_ISA206),
6974GEN_HANDLER_E(divdeuo, 0x1F, 0x09, 0x1C, 0, PPC_NONE, PPC2_DIVE_ISA206),
e44259b6
TM
6975GEN_HANDLER_E(divde, 0x1F, 0x09, 0x0D, 0, PPC_NONE, PPC2_DIVE_ISA206),
6976GEN_HANDLER_E(divdeo, 0x1F, 0x09, 0x1D, 0, PPC_NONE, PPC2_DIVE_ISA206),
063cf14f
ND
6977GEN_HANDLER_E(modsd, 0x1F, 0x09, 0x18, 0x00000001, PPC_NONE, PPC2_ISA300),
6978GEN_HANDLER_E(modud, 0x1F, 0x09, 0x08, 0x00000001, PPC_NONE, PPC2_ISA300),
98d1eb27 6979
5c55ff99
BS
6980#undef GEN_INT_ARITH_MUL_HELPER
6981#define GEN_INT_ARITH_MUL_HELPER(name, opc3) \
6982GEN_HANDLER(name, 0x1F, 0x09, opc3, 0x00000000, PPC_64B)
6983GEN_INT_ARITH_MUL_HELPER(mulhdu, 0x00),
6984GEN_INT_ARITH_MUL_HELPER(mulhd, 0x02),
6985GEN_INT_ARITH_MUL_HELPER(mulldo, 0x17),
6986#endif
6987
6988#undef GEN_INT_ARITH_SUBF
6989#undef GEN_INT_ARITH_SUBF_CONST
6990#define GEN_INT_ARITH_SUBF(name, opc3, add_ca, compute_ca, compute_ov) \
6991GEN_HANDLER(name, 0x1F, 0x08, opc3, 0x00000000, PPC_INTEGER),
6992#define GEN_INT_ARITH_SUBF_CONST(name, opc3, const_val, \
6993 add_ca, compute_ca, compute_ov) \
6994GEN_HANDLER(name, 0x1F, 0x08, opc3, 0x0000F800, PPC_INTEGER),
6995GEN_INT_ARITH_SUBF(subf, 0x01, 0, 0, 0)
6996GEN_INT_ARITH_SUBF(subfo, 0x11, 0, 0, 1)
6997GEN_INT_ARITH_SUBF(subfc, 0x00, 0, 1, 0)
6998GEN_INT_ARITH_SUBF(subfco, 0x10, 0, 1, 1)
6999GEN_INT_ARITH_SUBF(subfe, 0x04, 1, 1, 0)
7000GEN_INT_ARITH_SUBF(subfeo, 0x14, 1, 1, 1)
7001GEN_INT_ARITH_SUBF_CONST(subfme, 0x07, -1LL, 1, 1, 0)
7002GEN_INT_ARITH_SUBF_CONST(subfmeo, 0x17, -1LL, 1, 1, 1)
7003GEN_INT_ARITH_SUBF_CONST(subfze, 0x06, 0, 1, 1, 0)
7004GEN_INT_ARITH_SUBF_CONST(subfzeo, 0x16, 0, 1, 1, 1)
7005
7006#undef GEN_LOGICAL1
7007#undef GEN_LOGICAL2
7008#define GEN_LOGICAL2(name, tcg_op, opc, type) \
7009GEN_HANDLER(name, 0x1F, 0x1C, opc, 0x00000000, type)
7010#define GEN_LOGICAL1(name, tcg_op, opc, type) \
7011GEN_HANDLER(name, 0x1F, 0x1A, opc, 0x00000000, type)
7012GEN_LOGICAL2(and, tcg_gen_and_tl, 0x00, PPC_INTEGER),
7013GEN_LOGICAL2(andc, tcg_gen_andc_tl, 0x01, PPC_INTEGER),
7014GEN_LOGICAL2(eqv, tcg_gen_eqv_tl, 0x08, PPC_INTEGER),
7015GEN_LOGICAL1(extsb, tcg_gen_ext8s_tl, 0x1D, PPC_INTEGER),
7016GEN_LOGICAL1(extsh, tcg_gen_ext16s_tl, 0x1C, PPC_INTEGER),
7017GEN_LOGICAL2(nand, tcg_gen_nand_tl, 0x0E, PPC_INTEGER),
7018GEN_LOGICAL2(nor, tcg_gen_nor_tl, 0x03, PPC_INTEGER),
7019GEN_LOGICAL2(orc, tcg_gen_orc_tl, 0x0C, PPC_INTEGER),
7020#if defined(TARGET_PPC64)
7021GEN_LOGICAL1(extsw, tcg_gen_ext32s_tl, 0x1E, PPC_64B),
7022#endif
7023
7024#if defined(TARGET_PPC64)
7025#undef GEN_PPC64_R2
7026#undef GEN_PPC64_R4
7027#define GEN_PPC64_R2(name, opc1, opc2) \
7028GEN_HANDLER2(name##0, stringify(name), opc1, opc2, 0xFF, 0x00000000, PPC_64B),\
7029GEN_HANDLER2(name##1, stringify(name), opc1, opc2 | 0x10, 0xFF, 0x00000000, \
7030 PPC_64B)
7031#define GEN_PPC64_R4(name, opc1, opc2) \
7032GEN_HANDLER2(name##0, stringify(name), opc1, opc2, 0xFF, 0x00000000, PPC_64B),\
7033GEN_HANDLER2(name##1, stringify(name), opc1, opc2 | 0x01, 0xFF, 0x00000000, \
7034 PPC_64B), \
7035GEN_HANDLER2(name##2, stringify(name), opc1, opc2 | 0x10, 0xFF, 0x00000000, \
7036 PPC_64B), \
7037GEN_HANDLER2(name##3, stringify(name), opc1, opc2 | 0x11, 0xFF, 0x00000000, \
7038 PPC_64B)
7039GEN_PPC64_R4(rldicl, 0x1E, 0x00),
7040GEN_PPC64_R4(rldicr, 0x1E, 0x02),
7041GEN_PPC64_R4(rldic, 0x1E, 0x04),
7042GEN_PPC64_R2(rldcl, 0x1E, 0x08),
7043GEN_PPC64_R2(rldcr, 0x1E, 0x09),
7044GEN_PPC64_R4(rldimi, 0x1E, 0x06),
7045#endif
7046
5c55ff99
BS
7047#undef GEN_LD
7048#undef GEN_LDU
7049#undef GEN_LDUX
cd6e9320 7050#undef GEN_LDX_E
5c55ff99
BS
7051#undef GEN_LDS
7052#define GEN_LD(name, ldop, opc, type) \
7053GEN_HANDLER(name, opc, 0xFF, 0xFF, 0x00000000, type),
7054#define GEN_LDU(name, ldop, opc, type) \
7055GEN_HANDLER(name##u, opc, 0xFF, 0xFF, 0x00000000, type),
7056#define GEN_LDUX(name, ldop, opc2, opc3, type) \
7057GEN_HANDLER(name##ux, 0x1F, opc2, opc3, 0x00000001, type),
b7815375 7058#define GEN_LDX_E(name, ldop, opc2, opc3, type, type2, chk) \
cd6e9320 7059GEN_HANDLER_E(name##x, 0x1F, opc2, opc3, 0x00000001, type, type2),
5c55ff99
BS
7060#define GEN_LDS(name, ldop, op, type) \
7061GEN_LD(name, ldop, op | 0x20, type) \
7062GEN_LDU(name, ldop, op | 0x21, type) \
7063GEN_LDUX(name, ldop, 0x17, op | 0x01, type) \
7064GEN_LDX(name, ldop, 0x17, op | 0x00, type)
7065
7066GEN_LDS(lbz, ld8u, 0x02, PPC_INTEGER)
7067GEN_LDS(lha, ld16s, 0x0A, PPC_INTEGER)
7068GEN_LDS(lhz, ld16u, 0x08, PPC_INTEGER)
7069GEN_LDS(lwz, ld32u, 0x00, PPC_INTEGER)
7070#if defined(TARGET_PPC64)
7071GEN_LDUX(lwa, ld32s, 0x15, 0x0B, PPC_64B)
7072GEN_LDX(lwa, ld32s, 0x15, 0x0A, PPC_64B)
4f364fe7
ND
7073GEN_LDUX(ld, ld64_i64, 0x15, 0x01, PPC_64B)
7074GEN_LDX(ld, ld64_i64, 0x15, 0x00, PPC_64B)
ff5f3981 7075GEN_LDX_E(ldbr, ld64ur_i64, 0x14, 0x10, PPC_NONE, PPC2_DBRX, CHK_NONE)
b7815375
BH
7076
7077/* HV/P7 and later only */
4f364fe7 7078GEN_LDX_HVRM(ldcix, ld64_i64, 0x15, 0x1b, PPC_CILDST)
b7815375
BH
7079GEN_LDX_HVRM(lwzcix, ld32u, 0x15, 0x18, PPC_CILDST)
7080GEN_LDX_HVRM(lhzcix, ld16u, 0x15, 0x19, PPC_CILDST)
7081GEN_LDX_HVRM(lbzcix, ld8u, 0x15, 0x1a, PPC_CILDST)
5c55ff99
BS
7082#endif
7083GEN_LDX(lhbr, ld16ur, 0x16, 0x18, PPC_INTEGER)
7084GEN_LDX(lwbr, ld32ur, 0x16, 0x10, PPC_INTEGER)
7085
7086#undef GEN_ST
7087#undef GEN_STU
7088#undef GEN_STUX
cd6e9320 7089#undef GEN_STX_E
5c55ff99
BS
7090#undef GEN_STS
7091#define GEN_ST(name, stop, opc, type) \
7092GEN_HANDLER(name, opc, 0xFF, 0xFF, 0x00000000, type),
7093#define GEN_STU(name, stop, opc, type) \
7094GEN_HANDLER(stop##u, opc, 0xFF, 0xFF, 0x00000000, type),
7095#define GEN_STUX(name, stop, opc2, opc3, type) \
7096GEN_HANDLER(name##ux, 0x1F, opc2, opc3, 0x00000001, type),
b7815375 7097#define GEN_STX_E(name, stop, opc2, opc3, type, type2, chk) \
0123d3cb 7098GEN_HANDLER_E(name##x, 0x1F, opc2, opc3, 0x00000000, type, type2),
5c55ff99
BS
7099#define GEN_STS(name, stop, op, type) \
7100GEN_ST(name, stop, op | 0x20, type) \
7101GEN_STU(name, stop, op | 0x21, type) \
7102GEN_STUX(name, stop, 0x17, op | 0x01, type) \
7103GEN_STX(name, stop, 0x17, op | 0x00, type)
7104
7105GEN_STS(stb, st8, 0x06, PPC_INTEGER)
7106GEN_STS(sth, st16, 0x0C, PPC_INTEGER)
7107GEN_STS(stw, st32, 0x04, PPC_INTEGER)
7108#if defined(TARGET_PPC64)
2468f23d
ND
7109GEN_STUX(std, st64_i64, 0x15, 0x05, PPC_64B)
7110GEN_STX(std, st64_i64, 0x15, 0x04, PPC_64B)
804108aa 7111GEN_STX_E(stdbr, st64r_i64, 0x14, 0x14, PPC_NONE, PPC2_DBRX, CHK_NONE)
2468f23d 7112GEN_STX_HVRM(stdcix, st64_i64, 0x15, 0x1f, PPC_CILDST)
b7815375
BH
7113GEN_STX_HVRM(stwcix, st32, 0x15, 0x1c, PPC_CILDST)
7114GEN_STX_HVRM(sthcix, st16, 0x15, 0x1d, PPC_CILDST)
7115GEN_STX_HVRM(stbcix, st8, 0x15, 0x1e, PPC_CILDST)
5c55ff99
BS
7116#endif
7117GEN_STX(sthbr, st16r, 0x16, 0x1C, PPC_INTEGER)
7118GEN_STX(stwbr, st32r, 0x16, 0x14, PPC_INTEGER)
7119
5c55ff99
BS
7120#undef GEN_CRLOGIC
7121#define GEN_CRLOGIC(name, tcg_op, opc) \
7122GEN_HANDLER(name, 0x13, 0x01, opc, 0x00000001, PPC_INTEGER)
7123GEN_CRLOGIC(crand, tcg_gen_and_i32, 0x08),
7124GEN_CRLOGIC(crandc, tcg_gen_andc_i32, 0x04),
7125GEN_CRLOGIC(creqv, tcg_gen_eqv_i32, 0x09),
7126GEN_CRLOGIC(crnand, tcg_gen_nand_i32, 0x07),
7127GEN_CRLOGIC(crnor, tcg_gen_nor_i32, 0x01),
7128GEN_CRLOGIC(cror, tcg_gen_or_i32, 0x0E),
7129GEN_CRLOGIC(crorc, tcg_gen_orc_i32, 0x0D),
7130GEN_CRLOGIC(crxor, tcg_gen_xor_i32, 0x06),
7131
7132#undef GEN_MAC_HANDLER
7133#define GEN_MAC_HANDLER(name, opc2, opc3) \
7134GEN_HANDLER(name, 0x04, opc2, opc3, 0x00000000, PPC_405_MAC)
7135GEN_MAC_HANDLER(macchw, 0x0C, 0x05),
7136GEN_MAC_HANDLER(macchwo, 0x0C, 0x15),
7137GEN_MAC_HANDLER(macchws, 0x0C, 0x07),
7138GEN_MAC_HANDLER(macchwso, 0x0C, 0x17),
7139GEN_MAC_HANDLER(macchwsu, 0x0C, 0x06),
7140GEN_MAC_HANDLER(macchwsuo, 0x0C, 0x16),
7141GEN_MAC_HANDLER(macchwu, 0x0C, 0x04),
7142GEN_MAC_HANDLER(macchwuo, 0x0C, 0x14),
7143GEN_MAC_HANDLER(machhw, 0x0C, 0x01),
7144GEN_MAC_HANDLER(machhwo, 0x0C, 0x11),
7145GEN_MAC_HANDLER(machhws, 0x0C, 0x03),
7146GEN_MAC_HANDLER(machhwso, 0x0C, 0x13),
7147GEN_MAC_HANDLER(machhwsu, 0x0C, 0x02),
7148GEN_MAC_HANDLER(machhwsuo, 0x0C, 0x12),
7149GEN_MAC_HANDLER(machhwu, 0x0C, 0x00),
7150GEN_MAC_HANDLER(machhwuo, 0x0C, 0x10),
7151GEN_MAC_HANDLER(maclhw, 0x0C, 0x0D),
7152GEN_MAC_HANDLER(maclhwo, 0x0C, 0x1D),
7153GEN_MAC_HANDLER(maclhws, 0x0C, 0x0F),
7154GEN_MAC_HANDLER(maclhwso, 0x0C, 0x1F),
7155GEN_MAC_HANDLER(maclhwu, 0x0C, 0x0C),
7156GEN_MAC_HANDLER(maclhwuo, 0x0C, 0x1C),
7157GEN_MAC_HANDLER(maclhwsu, 0x0C, 0x0E),
7158GEN_MAC_HANDLER(maclhwsuo, 0x0C, 0x1E),
7159GEN_MAC_HANDLER(nmacchw, 0x0E, 0x05),
7160GEN_MAC_HANDLER(nmacchwo, 0x0E, 0x15),
7161GEN_MAC_HANDLER(nmacchws, 0x0E, 0x07),
7162GEN_MAC_HANDLER(nmacchwso, 0x0E, 0x17),
7163GEN_MAC_HANDLER(nmachhw, 0x0E, 0x01),
7164GEN_MAC_HANDLER(nmachhwo, 0x0E, 0x11),
7165GEN_MAC_HANDLER(nmachhws, 0x0E, 0x03),
7166GEN_MAC_HANDLER(nmachhwso, 0x0E, 0x13),
7167GEN_MAC_HANDLER(nmaclhw, 0x0E, 0x0D),
7168GEN_MAC_HANDLER(nmaclhwo, 0x0E, 0x1D),
7169GEN_MAC_HANDLER(nmaclhws, 0x0E, 0x0F),
7170GEN_MAC_HANDLER(nmaclhwso, 0x0E, 0x1F),
7171GEN_MAC_HANDLER(mulchw, 0x08, 0x05),
7172GEN_MAC_HANDLER(mulchwu, 0x08, 0x04),
7173GEN_MAC_HANDLER(mulhhw, 0x08, 0x01),
7174GEN_MAC_HANDLER(mulhhwu, 0x08, 0x00),
7175GEN_MAC_HANDLER(mullhw, 0x08, 0x0D),
7176GEN_MAC_HANDLER(mullhwu, 0x08, 0x0C),
7177
0ff93d11
TM
7178GEN_HANDLER2_E(tbegin, "tbegin", 0x1F, 0x0E, 0x14, 0x01DFF800, \
7179 PPC_NONE, PPC2_TM),
56a84615
TM
7180GEN_HANDLER2_E(tend, "tend", 0x1F, 0x0E, 0x15, 0x01FFF800, \
7181 PPC_NONE, PPC2_TM),
7182GEN_HANDLER2_E(tabort, "tabort", 0x1F, 0x0E, 0x1C, 0x03E0F800, \
7183 PPC_NONE, PPC2_TM),
7184GEN_HANDLER2_E(tabortwc, "tabortwc", 0x1F, 0x0E, 0x18, 0x00000000, \
7185 PPC_NONE, PPC2_TM),
7186GEN_HANDLER2_E(tabortwci, "tabortwci", 0x1F, 0x0E, 0x1A, 0x00000000, \
7187 PPC_NONE, PPC2_TM),
7188GEN_HANDLER2_E(tabortdc, "tabortdc", 0x1F, 0x0E, 0x19, 0x00000000, \
7189 PPC_NONE, PPC2_TM),
7190GEN_HANDLER2_E(tabortdci, "tabortdci", 0x1F, 0x0E, 0x1B, 0x00000000, \
7191 PPC_NONE, PPC2_TM),
7192GEN_HANDLER2_E(tsr, "tsr", 0x1F, 0x0E, 0x17, 0x03DFF800, \
7193 PPC_NONE, PPC2_TM),
aeedd582
TM
7194GEN_HANDLER2_E(tcheck, "tcheck", 0x1F, 0x0E, 0x16, 0x007FF800, \
7195 PPC_NONE, PPC2_TM),
f83c2378
TM
7196GEN_HANDLER2_E(treclaim, "treclaim", 0x1F, 0x0E, 0x1D, 0x03E0F800, \
7197 PPC_NONE, PPC2_TM),
7198GEN_HANDLER2_E(trechkpt, "trechkpt", 0x1F, 0x0E, 0x1F, 0x03FFF800, \
7199 PPC_NONE, PPC2_TM),
15848410
BH
7200
7201#include "translate/fp-ops.inc.c"
7202
7203#include "translate/vmx-ops.inc.c"
7204
7205#include "translate/vsx-ops.inc.c"
7206
7207#include "translate/dfp-ops.inc.c"
7208
7209#include "translate/spe-ops.inc.c"
5c55ff99
BS
7210};
7211
0411a972 7212#include "helper_regs.h"
5b27a92d 7213#include "translate_init.inc.c"
79aceca5 7214
9a64fbe4 7215/*****************************************************************************/
3fc6c082 7216/* Misc PowerPC helpers */
878096ee
AF
7217void ppc_cpu_dump_state(CPUState *cs, FILE *f, fprintf_function cpu_fprintf,
7218 int flags)
79aceca5 7219{
3fc6c082
FB
7220#define RGPL 4
7221#define RFPL 4
3fc6c082 7222
878096ee
AF
7223 PowerPCCPU *cpu = POWERPC_CPU(cs);
7224 CPUPPCState *env = &cpu->env;
79aceca5
FB
7225 int i;
7226
90e189ec 7227 cpu_fprintf(f, "NIP " TARGET_FMT_lx " LR " TARGET_FMT_lx " CTR "
21e5d28a
TG
7228 TARGET_FMT_lx " XER " TARGET_FMT_lx " CPU#%d\n",
7229 env->nip, env->lr, env->ctr, cpu_read_xer(env),
7230 cs->cpu_index);
90e189ec 7231 cpu_fprintf(f, "MSR " TARGET_FMT_lx " HID0 " TARGET_FMT_lx " HF "
9fb04491
BH
7232 TARGET_FMT_lx " iidx %d didx %d\n",
7233 env->msr, env->spr[SPR_HID0],
7234 env->hflags, env->immu_idx, env->dmmu_idx);
d9bce9d9 7235#if !defined(NO_TIMER_DUMP)
9a78eead 7236 cpu_fprintf(f, "TB %08" PRIu32 " %08" PRIu64
76a66253 7237#if !defined(CONFIG_USER_ONLY)
9a78eead 7238 " DECR %08" PRIu32
76a66253
JM
7239#endif
7240 "\n",
077fc206 7241 cpu_ppc_load_tbu(env), cpu_ppc_load_tbl(env)
76a66253
JM
7242#if !defined(CONFIG_USER_ONLY)
7243 , cpu_ppc_load_decr(env)
7244#endif
7245 );
077fc206 7246#endif
76a66253 7247 for (i = 0; i < 32; i++) {
3fc6c082
FB
7248 if ((i & (RGPL - 1)) == 0)
7249 cpu_fprintf(f, "GPR%02d", i);
b11ebf64 7250 cpu_fprintf(f, " %016" PRIx64, ppc_dump_gpr(env, i));
3fc6c082 7251 if ((i & (RGPL - 1)) == (RGPL - 1))
7fe48483 7252 cpu_fprintf(f, "\n");
76a66253 7253 }
3fc6c082 7254 cpu_fprintf(f, "CR ");
76a66253 7255 for (i = 0; i < 8; i++)
7fe48483
FB
7256 cpu_fprintf(f, "%01x", env->crf[i]);
7257 cpu_fprintf(f, " [");
76a66253
JM
7258 for (i = 0; i < 8; i++) {
7259 char a = '-';
7260 if (env->crf[i] & 0x08)
7261 a = 'L';
7262 else if (env->crf[i] & 0x04)
7263 a = 'G';
7264 else if (env->crf[i] & 0x02)
7265 a = 'E';
7fe48483 7266 cpu_fprintf(f, " %c%c", a, env->crf[i] & 0x01 ? 'O' : ' ');
76a66253 7267 }
90e189ec
BS
7268 cpu_fprintf(f, " ] RES " TARGET_FMT_lx "\n",
7269 env->reserve_addr);
685f1ce2
RH
7270
7271 if (flags & CPU_DUMP_FPU) {
7272 for (i = 0; i < 32; i++) {
7273 if ((i & (RFPL - 1)) == 0) {
7274 cpu_fprintf(f, "FPR%02d", i);
7275 }
7276 cpu_fprintf(f, " %016" PRIx64, *((uint64_t *)&env->fpr[i]));
7277 if ((i & (RFPL - 1)) == (RFPL - 1)) {
7278 cpu_fprintf(f, "\n");
7279 }
7280 }
7281 cpu_fprintf(f, "FPSCR " TARGET_FMT_lx "\n", env->fpscr);
79aceca5 7282 }
685f1ce2 7283
f2e63a42 7284#if !defined(CONFIG_USER_ONLY)
90dc8812
SW
7285 cpu_fprintf(f, " SRR0 " TARGET_FMT_lx " SRR1 " TARGET_FMT_lx
7286 " PVR " TARGET_FMT_lx " VRSAVE " TARGET_FMT_lx "\n",
7287 env->spr[SPR_SRR0], env->spr[SPR_SRR1],
7288 env->spr[SPR_PVR], env->spr[SPR_VRSAVE]);
7289
7290 cpu_fprintf(f, "SPRG0 " TARGET_FMT_lx " SPRG1 " TARGET_FMT_lx
7291 " SPRG2 " TARGET_FMT_lx " SPRG3 " TARGET_FMT_lx "\n",
7292 env->spr[SPR_SPRG0], env->spr[SPR_SPRG1],
7293 env->spr[SPR_SPRG2], env->spr[SPR_SPRG3]);
7294
7295 cpu_fprintf(f, "SPRG4 " TARGET_FMT_lx " SPRG5 " TARGET_FMT_lx
7296 " SPRG6 " TARGET_FMT_lx " SPRG7 " TARGET_FMT_lx "\n",
7297 env->spr[SPR_SPRG4], env->spr[SPR_SPRG5],
7298 env->spr[SPR_SPRG6], env->spr[SPR_SPRG7]);
7299
f2b70fde
BH
7300#if defined(TARGET_PPC64)
7301 if (env->excp_model == POWERPC_EXCP_POWER7 ||
7302 env->excp_model == POWERPC_EXCP_POWER8) {
7303 cpu_fprintf(f, "HSRR0 " TARGET_FMT_lx " HSRR1 " TARGET_FMT_lx "\n",
7304 env->spr[SPR_HSRR0], env->spr[SPR_HSRR1]);
7305 }
7306#endif
90dc8812
SW
7307 if (env->excp_model == POWERPC_EXCP_BOOKE) {
7308 cpu_fprintf(f, "CSRR0 " TARGET_FMT_lx " CSRR1 " TARGET_FMT_lx
7309 " MCSRR0 " TARGET_FMT_lx " MCSRR1 " TARGET_FMT_lx "\n",
7310 env->spr[SPR_BOOKE_CSRR0], env->spr[SPR_BOOKE_CSRR1],
7311 env->spr[SPR_BOOKE_MCSRR0], env->spr[SPR_BOOKE_MCSRR1]);
7312
7313 cpu_fprintf(f, " TCR " TARGET_FMT_lx " TSR " TARGET_FMT_lx
7314 " ESR " TARGET_FMT_lx " DEAR " TARGET_FMT_lx "\n",
7315 env->spr[SPR_BOOKE_TCR], env->spr[SPR_BOOKE_TSR],
7316 env->spr[SPR_BOOKE_ESR], env->spr[SPR_BOOKE_DEAR]);
7317
7318 cpu_fprintf(f, " PIR " TARGET_FMT_lx " DECAR " TARGET_FMT_lx
7319 " IVPR " TARGET_FMT_lx " EPCR " TARGET_FMT_lx "\n",
7320 env->spr[SPR_BOOKE_PIR], env->spr[SPR_BOOKE_DECAR],
7321 env->spr[SPR_BOOKE_IVPR], env->spr[SPR_BOOKE_EPCR]);
7322
7323 cpu_fprintf(f, " MCSR " TARGET_FMT_lx " SPRG8 " TARGET_FMT_lx
7324 " EPR " TARGET_FMT_lx "\n",
7325 env->spr[SPR_BOOKE_MCSR], env->spr[SPR_BOOKE_SPRG8],
7326 env->spr[SPR_BOOKE_EPR]);
7327
7328 /* FSL-specific */
7329 cpu_fprintf(f, " MCAR " TARGET_FMT_lx " PID1 " TARGET_FMT_lx
7330 " PID2 " TARGET_FMT_lx " SVR " TARGET_FMT_lx "\n",
7331 env->spr[SPR_Exxx_MCAR], env->spr[SPR_BOOKE_PID1],
7332 env->spr[SPR_BOOKE_PID2], env->spr[SPR_E500_SVR]);
7333
7334 /*
7335 * IVORs are left out as they are large and do not change often --
7336 * they can be read with "p $ivor0", "p $ivor1", etc.
7337 */
7338 }
7339
697ab892
DG
7340#if defined(TARGET_PPC64)
7341 if (env->flags & POWERPC_FLAG_CFAR) {
7342 cpu_fprintf(f, " CFAR " TARGET_FMT_lx"\n", env->cfar);
7343 }
7344#endif
7345
d801a61e
SJS
7346 if (env->spr_cb[SPR_LPCR].name)
7347 cpu_fprintf(f, " LPCR " TARGET_FMT_lx "\n", env->spr[SPR_LPCR]);
7348
0941d728 7349 switch (env->mmu_model) {
90dc8812
SW
7350 case POWERPC_MMU_32B:
7351 case POWERPC_MMU_601:
7352 case POWERPC_MMU_SOFT_6xx:
7353 case POWERPC_MMU_SOFT_74xx:
7354#if defined(TARGET_PPC64)
0941d728
DG
7355 case POWERPC_MMU_64B:
7356 case POWERPC_MMU_2_03:
7357 case POWERPC_MMU_2_06:
7358 case POWERPC_MMU_2_07:
7359 case POWERPC_MMU_3_00:
90dc8812 7360#endif
4f4f28ff
SJS
7361 if (env->spr_cb[SPR_SDR1].name) { /* SDR1 Exists */
7362 cpu_fprintf(f, " SDR1 " TARGET_FMT_lx " ", env->spr[SPR_SDR1]);
7363 }
4a7518e0
CLG
7364 if (env->spr_cb[SPR_PTCR].name) { /* PTCR Exists */
7365 cpu_fprintf(f, " PTCR " TARGET_FMT_lx " ", env->spr[SPR_PTCR]);
7366 }
4f4f28ff 7367 cpu_fprintf(f, " DAR " TARGET_FMT_lx " DSISR " TARGET_FMT_lx "\n",
ca480de6 7368 env->spr[SPR_DAR], env->spr[SPR_DSISR]);
90dc8812 7369 break;
01662f3e 7370 case POWERPC_MMU_BOOKE206:
90dc8812
SW
7371 cpu_fprintf(f, " MAS0 " TARGET_FMT_lx " MAS1 " TARGET_FMT_lx
7372 " MAS2 " TARGET_FMT_lx " MAS3 " TARGET_FMT_lx "\n",
7373 env->spr[SPR_BOOKE_MAS0], env->spr[SPR_BOOKE_MAS1],
7374 env->spr[SPR_BOOKE_MAS2], env->spr[SPR_BOOKE_MAS3]);
7375
7376 cpu_fprintf(f, " MAS4 " TARGET_FMT_lx " MAS6 " TARGET_FMT_lx
7377 " MAS7 " TARGET_FMT_lx " PID " TARGET_FMT_lx "\n",
7378 env->spr[SPR_BOOKE_MAS4], env->spr[SPR_BOOKE_MAS6],
7379 env->spr[SPR_BOOKE_MAS7], env->spr[SPR_BOOKE_PID]);
7380
7381 cpu_fprintf(f, "MMUCFG " TARGET_FMT_lx " TLB0CFG " TARGET_FMT_lx
7382 " TLB1CFG " TARGET_FMT_lx "\n",
7383 env->spr[SPR_MMUCFG], env->spr[SPR_BOOKE_TLB0CFG],
7384 env->spr[SPR_BOOKE_TLB1CFG]);
7385 break;
7386 default:
7387 break;
7388 }
f2e63a42 7389#endif
79aceca5 7390
3fc6c082
FB
7391#undef RGPL
7392#undef RFPL
79aceca5
FB
7393}
7394
878096ee
AF
7395void ppc_cpu_dump_statistics(CPUState *cs, FILE*f,
7396 fprintf_function cpu_fprintf, int flags)
76a66253
JM
7397{
7398#if defined(DO_PPC_STATISTICS)
878096ee 7399 PowerPCCPU *cpu = POWERPC_CPU(cs);
c227f099 7400 opc_handler_t **t1, **t2, **t3, *handler;
76a66253
JM
7401 int op1, op2, op3;
7402
878096ee 7403 t1 = cpu->env.opcodes;
76a66253
JM
7404 for (op1 = 0; op1 < 64; op1++) {
7405 handler = t1[op1];
7406 if (is_indirect_opcode(handler)) {
7407 t2 = ind_table(handler);
7408 for (op2 = 0; op2 < 32; op2++) {
7409 handler = t2[op2];
7410 if (is_indirect_opcode(handler)) {
7411 t3 = ind_table(handler);
7412 for (op3 = 0; op3 < 32; op3++) {
7413 handler = t3[op3];
7414 if (handler->count == 0)
7415 continue;
7416 cpu_fprintf(f, "%02x %02x %02x (%02x %04d) %16s: "
0bfcd599 7417 "%016" PRIx64 " %" PRId64 "\n",
76a66253
JM
7418 op1, op2, op3, op1, (op3 << 5) | op2,
7419 handler->oname,
7420 handler->count, handler->count);
7421 }
7422 } else {
7423 if (handler->count == 0)
7424 continue;
7425 cpu_fprintf(f, "%02x %02x (%02x %04d) %16s: "
0bfcd599 7426 "%016" PRIx64 " %" PRId64 "\n",
76a66253
JM
7427 op1, op2, op1, op2, handler->oname,
7428 handler->count, handler->count);
7429 }
7430 }
7431 } else {
7432 if (handler->count == 0)
7433 continue;
0bfcd599
BS
7434 cpu_fprintf(f, "%02x (%02x ) %16s: %016" PRIx64
7435 " %" PRId64 "\n",
76a66253
JM
7436 op1, op1, handler->oname,
7437 handler->count, handler->count);
7438 }
7439 }
7440#endif
7441}
7442
b542683d 7443static void ppc_tr_init_disas_context(DisasContextBase *dcbase, CPUState *cs)
79aceca5 7444{
b0c2d521 7445 DisasContext *ctx = container_of(dcbase, DisasContext, base);
9c489ea6 7446 CPUPPCState *env = cs->env_ptr;
b0c2d521
EC
7447 int bound;
7448
7449 ctx->exception = POWERPC_EXCP_NONE;
7450 ctx->spr_cb = env->spr_cb;
7451 ctx->pr = msr_pr;
7452 ctx->mem_idx = env->dmmu_idx;
7453 ctx->dr = msr_dr;
932ccbdd 7454#if !defined(CONFIG_USER_ONLY)
b0c2d521 7455 ctx->hv = msr_hv || !env->has_hv_mode;
932ccbdd 7456#endif
b0c2d521
EC
7457 ctx->insns_flags = env->insns_flags;
7458 ctx->insns_flags2 = env->insns_flags2;
7459 ctx->access_type = -1;
7460 ctx->need_access_type = !(env->mmu_model & POWERPC_MMU_64B);
7461 ctx->le_mode = !!(env->hflags & (1 << MSR_LE));
7462 ctx->default_tcg_memop_mask = ctx->le_mode ? MO_LE : MO_BE;
0e3bf489 7463 ctx->flags = env->flags;
d9bce9d9 7464#if defined(TARGET_PPC64)
b0c2d521
EC
7465 ctx->sf_mode = msr_is_64bit(env, env->msr);
7466 ctx->has_cfar = !!(env->flags & POWERPC_FLAG_CFAR);
9a64fbe4 7467#endif
e69ba2b4
DG
7468 ctx->lazy_tlb_flush = env->mmu_model == POWERPC_MMU_32B
7469 || env->mmu_model == POWERPC_MMU_601
7470 || (env->mmu_model & POWERPC_MMU_64B);
c5a8d8f3 7471
b0c2d521 7472 ctx->fpu_enabled = !!msr_fp;
a9d9eb8f 7473 if ((env->flags & POWERPC_FLAG_SPE) && msr_spe)
b0c2d521 7474 ctx->spe_enabled = !!msr_spe;
d26bfc9a 7475 else
b0c2d521 7476 ctx->spe_enabled = false;
a9d9eb8f 7477 if ((env->flags & POWERPC_FLAG_VRE) && msr_vr)
b0c2d521 7478 ctx->altivec_enabled = !!msr_vr;
a9d9eb8f 7479 else
b0c2d521 7480 ctx->altivec_enabled = false;
1f29871c 7481 if ((env->flags & POWERPC_FLAG_VSX) && msr_vsx) {
b0c2d521 7482 ctx->vsx_enabled = !!msr_vsx;
1f29871c 7483 } else {
b0c2d521 7484 ctx->vsx_enabled = false;
1f29871c 7485 }
69d1a937
TM
7486#if defined(TARGET_PPC64)
7487 if ((env->flags & POWERPC_FLAG_TM) && msr_tm) {
b0c2d521 7488 ctx->tm_enabled = !!msr_tm;
69d1a937 7489 } else {
b0c2d521 7490 ctx->tm_enabled = false;
69d1a937
TM
7491 }
7492#endif
b0c2d521 7493 ctx->gtse = !!(env->spr[SPR_LPCR] & LPCR_GTSE);
d26bfc9a 7494 if ((env->flags & POWERPC_FLAG_SE) && msr_se)
b0c2d521 7495 ctx->singlestep_enabled = CPU_SINGLE_STEP;
d26bfc9a 7496 else
b0c2d521 7497 ctx->singlestep_enabled = 0;
d26bfc9a 7498 if ((env->flags & POWERPC_FLAG_BE) && msr_be)
b0c2d521 7499 ctx->singlestep_enabled |= CPU_BRANCH_STEP;
0e3bf489
RK
7500 if ((env->flags & POWERPC_FLAG_DE) && msr_de) {
7501 ctx->singlestep_enabled = 0;
7502 target_ulong dbcr0 = env->spr[SPR_BOOKE_DBCR0];
7503 if (dbcr0 & DBCR0_ICMP) {
7504 ctx->singlestep_enabled |= CPU_SINGLE_STEP;
7505 }
7506 if (dbcr0 & DBCR0_BRT) {
7507 ctx->singlestep_enabled |= CPU_BRANCH_STEP;
7508 }
7509
7510 }
b0c2d521
EC
7511 if (unlikely(ctx->base.singlestep_enabled)) {
7512 ctx->singlestep_enabled |= GDBSTUB_SINGLE_STEP;
ed2803da 7513 }
3fc6c082 7514#if defined (DO_SINGLE_STEP) && 0
9a64fbe4
FB
7515 /* Single step trace mode */
7516 msr_se = 1;
7517#endif
b933066a 7518
b0c2d521 7519 bound = -(ctx->base.pc_first | TARGET_PAGE_MASK) / 4;
b542683d 7520 ctx->base.max_insns = MIN(ctx->base.max_insns, bound);
b0c2d521
EC
7521}
7522
7523static void ppc_tr_tb_start(DisasContextBase *db, CPUState *cs)
7524{
7525}
7526
7527static void ppc_tr_insn_start(DisasContextBase *dcbase, CPUState *cs)
7528{
7529 tcg_gen_insn_start(dcbase->pc_next);
7530}
7531
7532static bool ppc_tr_breakpoint_check(DisasContextBase *dcbase, CPUState *cs,
7533 const CPUBreakpoint *bp)
7534{
7535 DisasContext *ctx = container_of(dcbase, DisasContext, base);
7536
7537 gen_debug_exception(ctx);
2a8ceefc 7538 dcbase->is_jmp = DISAS_NORETURN;
b0c2d521
EC
7539 /* The address covered by the breakpoint must be included in
7540 [tb->pc, tb->pc + tb->size) in order to for it to be
7541 properly cleared -- thus we increment the PC here so that
7542 the logic setting tb->size below does the right thing. */
7543 ctx->base.pc_next += 4;
7544 return true;
7545}
7546
7547static void ppc_tr_translate_insn(DisasContextBase *dcbase, CPUState *cs)
7548{
7549 DisasContext *ctx = container_of(dcbase, DisasContext, base);
7550 CPUPPCState *env = cs->env_ptr;
7551 opc_handler_t **table, *handler;
7552
7553 LOG_DISAS("----------------\n");
7554 LOG_DISAS("nip=" TARGET_FMT_lx " super=%d ir=%d\n",
7555 ctx->base.pc_next, ctx->mem_idx, (int)msr_ir);
7556
7557 if (unlikely(need_byteswap(ctx))) {
7558 ctx->opcode = bswap32(cpu_ldl_code(env, ctx->base.pc_next));
7559 } else {
7560 ctx->opcode = cpu_ldl_code(env, ctx->base.pc_next);
7561 }
7562 LOG_DISAS("translate opcode %08x (%02x %02x %02x %02x) (%s)\n",
7563 ctx->opcode, opc1(ctx->opcode), opc2(ctx->opcode),
7564 opc3(ctx->opcode), opc4(ctx->opcode),
7565 ctx->le_mode ? "little" : "big");
7566 ctx->base.pc_next += 4;
7567 table = env->opcodes;
7568 handler = table[opc1(ctx->opcode)];
7569 if (is_indirect_opcode(handler)) {
7570 table = ind_table(handler);
7571 handler = table[opc2(ctx->opcode)];
79aceca5
FB
7572 if (is_indirect_opcode(handler)) {
7573 table = ind_table(handler);
b0c2d521 7574 handler = table[opc3(ctx->opcode)];
79aceca5
FB
7575 if (is_indirect_opcode(handler)) {
7576 table = ind_table(handler);
b0c2d521 7577 handler = table[opc4(ctx->opcode)];
79aceca5
FB
7578 }
7579 }
b0c2d521
EC
7580 }
7581 /* Is opcode *REALLY* valid ? */
7582 if (unlikely(handler->handler == &gen_invalid)) {
7583 qemu_log_mask(LOG_GUEST_ERROR, "invalid/unsupported opcode: "
7584 "%02x - %02x - %02x - %02x (%08x) "
7585 TARGET_FMT_lx " %d\n",
7586 opc1(ctx->opcode), opc2(ctx->opcode),
7587 opc3(ctx->opcode), opc4(ctx->opcode),
7588 ctx->opcode, ctx->base.pc_next - 4, (int)msr_ir);
7589 } else {
7590 uint32_t inval;
70560da7 7591
b0c2d521
EC
7592 if (unlikely(handler->type & (PPC_SPE | PPC_SPE_SINGLE | PPC_SPE_DOUBLE)
7593 && Rc(ctx->opcode))) {
7594 inval = handler->inval2;
7595 } else {
7596 inval = handler->inval1;
7597 }
70560da7 7598
b0c2d521
EC
7599 if (unlikely((ctx->opcode & inval) != 0)) {
7600 qemu_log_mask(LOG_GUEST_ERROR, "invalid bits: %08x for opcode: "
7601 "%02x - %02x - %02x - %02x (%08x) "
7602 TARGET_FMT_lx "\n", ctx->opcode & inval,
7603 opc1(ctx->opcode), opc2(ctx->opcode),
7604 opc3(ctx->opcode), opc4(ctx->opcode),
7605 ctx->opcode, ctx->base.pc_next - 4);
7606 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL);
7607 ctx->base.is_jmp = DISAS_NORETURN;
7608 return;
79aceca5 7609 }
b0c2d521
EC
7610 }
7611 (*(handler->handler))(ctx);
76a66253 7612#if defined(DO_PPC_STATISTICS)
b0c2d521 7613 handler->count++;
76a66253 7614#endif
b0c2d521
EC
7615 /* Check trace mode exceptions */
7616 if (unlikely(ctx->singlestep_enabled & CPU_SINGLE_STEP &&
7617 (ctx->base.pc_next <= 0x100 || ctx->base.pc_next > 0xF00) &&
7618 ctx->exception != POWERPC_SYSCALL &&
7619 ctx->exception != POWERPC_EXCP_TRAP &&
7620 ctx->exception != POWERPC_EXCP_BRANCH)) {
0e3bf489
RK
7621 uint32_t excp = gen_prep_dbgex(ctx, POWERPC_EXCP_TRACE);
7622 if (excp != POWERPC_EXCP_NONE)
7623 gen_exception_nip(ctx, excp, ctx->base.pc_next);
b0c2d521
EC
7624 }
7625
7626 if (tcg_check_temp_count()) {
7627 qemu_log("Opcode %02x %02x %02x %02x (%08x) leaked "
7628 "temporaries\n", opc1(ctx->opcode), opc2(ctx->opcode),
7629 opc3(ctx->opcode), opc4(ctx->opcode), ctx->opcode);
3fc6c082 7630 }
b0c2d521
EC
7631
7632 ctx->base.is_jmp = ctx->exception == POWERPC_EXCP_NONE ?
7633 DISAS_NEXT : DISAS_NORETURN;
7634}
7635
7636static void ppc_tr_tb_stop(DisasContextBase *dcbase, CPUState *cs)
7637{
7638 DisasContext *ctx = container_of(dcbase, DisasContext, base);
7639
7640 if (ctx->exception == POWERPC_EXCP_NONE) {
7641 gen_goto_tb(ctx, 0, ctx->base.pc_next);
7642 } else if (ctx->exception != POWERPC_EXCP_BRANCH) {
7643 if (unlikely(ctx->base.singlestep_enabled)) {
7644 gen_debug_exception(ctx);
8cbcb4fa 7645 }
76a66253 7646 /* Generate the return instruction */
07ea28b4 7647 tcg_gen_exit_tb(NULL, 0);
9a64fbe4 7648 }
b0c2d521
EC
7649}
7650
7651static void ppc_tr_disas_log(const DisasContextBase *dcbase, CPUState *cs)
7652{
7653 qemu_log("IN: %s\n", lookup_symbol(dcbase->pc_first));
7654 log_target_disas(cs, dcbase->pc_first, dcbase->tb->size);
7655}
0a7df5da 7656
b0c2d521
EC
7657static const TranslatorOps ppc_tr_ops = {
7658 .init_disas_context = ppc_tr_init_disas_context,
7659 .tb_start = ppc_tr_tb_start,
7660 .insn_start = ppc_tr_insn_start,
7661 .breakpoint_check = ppc_tr_breakpoint_check,
7662 .translate_insn = ppc_tr_translate_insn,
7663 .tb_stop = ppc_tr_tb_stop,
7664 .disas_log = ppc_tr_disas_log,
7665};
4e5e1215 7666
b0c2d521
EC
7667void gen_intermediate_code(CPUState *cs, struct TranslationBlock *tb)
7668{
7669 DisasContext ctx;
7670
7671 translator_loop(&ppc_tr_ops, &ctx.base, cs, tb);
79aceca5
FB
7672}
7673
bad729e2
RH
7674void restore_state_to_opc(CPUPPCState *env, TranslationBlock *tb,
7675 target_ulong *data)
d2856f1a 7676{
bad729e2 7677 env->nip = data[0];
d2856f1a 7678}
This page took 3.178498 seconds and 4 git commands to generate.