]> git.proxmox.com Git - qemu.git/blame - target-ppc/translate.c
PPC: E500: Add ESR bit definitions
[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
FB
20#include <stdarg.h>
21#include <stdlib.h>
22#include <stdio.h>
23#include <string.h>
24#include <inttypes.h>
25
79aceca5 26#include "cpu.h"
79aceca5 27#include "disas.h"
57fec1fe 28#include "tcg-op.h"
ca10f867 29#include "qemu-common.h"
0cfe11ea 30#include "host-utils.h"
79aceca5 31
a7812ae4
PB
32#include "helper.h"
33#define GEN_HELPER 1
34#include "helper.h"
35
8cbcb4fa
AJ
36#define CPU_SINGLE_STEP 0x1
37#define CPU_BRANCH_STEP 0x2
38#define GDBSTUB_SINGLE_STEP 0x4
39
a750fc0b 40/* Include definitions for instructions classes and implementations flags */
9fddaa0c 41//#define PPC_DEBUG_DISAS
76a66253 42//#define DO_PPC_STATISTICS
79aceca5 43
d12d51d5 44#ifdef PPC_DEBUG_DISAS
93fcfe39 45# define LOG_DISAS(...) qemu_log_mask(CPU_LOG_TB_IN_ASM, ## __VA_ARGS__)
d12d51d5
AL
46#else
47# define LOG_DISAS(...) do { } while (0)
48#endif
a750fc0b
JM
49/*****************************************************************************/
50/* Code translation helpers */
c53be334 51
f78fb44e 52/* global register indexes */
a7812ae4 53static TCGv_ptr cpu_env;
1d542695 54static char cpu_reg_names[10*3 + 22*4 /* GPR */
f78fb44e 55#if !defined(TARGET_PPC64)
1d542695 56 + 10*4 + 22*5 /* SPE GPRh */
f78fb44e 57#endif
a5e26afa 58 + 10*4 + 22*5 /* FPR */
47e4661c
AJ
59 + 2*(10*6 + 22*7) /* AVRh, AVRl */
60 + 8*5 /* CRF */];
f78fb44e
AJ
61static TCGv cpu_gpr[32];
62#if !defined(TARGET_PPC64)
63static TCGv cpu_gprh[32];
64#endif
a7812ae4
PB
65static TCGv_i64 cpu_fpr[32];
66static TCGv_i64 cpu_avrh[32], cpu_avrl[32];
67static TCGv_i32 cpu_crf[8];
bd568f18 68static TCGv cpu_nip;
6527f6ea 69static TCGv cpu_msr;
cfdcd37a
AJ
70static TCGv cpu_ctr;
71static TCGv cpu_lr;
3d7b417e 72static TCGv cpu_xer;
cf360a32 73static TCGv cpu_reserve;
a7812ae4 74static TCGv_i32 cpu_fpscr;
a7859e89 75static TCGv_i32 cpu_access_type;
f78fb44e 76
2e70f6ef
PB
77#include "gen-icount.h"
78
79void ppc_translate_init(void)
80{
f78fb44e
AJ
81 int i;
82 char* p;
2dc766da 83 size_t cpu_reg_names_size;
b2437bf2 84 static int done_init = 0;
f78fb44e 85
2e70f6ef
PB
86 if (done_init)
87 return;
f78fb44e 88
a7812ae4 89 cpu_env = tcg_global_reg_new_ptr(TCG_AREG0, "env");
a7812ae4 90
f78fb44e 91 p = cpu_reg_names;
2dc766da 92 cpu_reg_names_size = sizeof(cpu_reg_names);
47e4661c
AJ
93
94 for (i = 0; i < 8; i++) {
2dc766da 95 snprintf(p, cpu_reg_names_size, "crf%d", i);
a7812ae4
PB
96 cpu_crf[i] = tcg_global_mem_new_i32(TCG_AREG0,
97 offsetof(CPUState, crf[i]), p);
47e4661c 98 p += 5;
2dc766da 99 cpu_reg_names_size -= 5;
47e4661c
AJ
100 }
101
f78fb44e 102 for (i = 0; i < 32; i++) {
2dc766da 103 snprintf(p, cpu_reg_names_size, "r%d", i);
a7812ae4 104 cpu_gpr[i] = tcg_global_mem_new(TCG_AREG0,
f78fb44e
AJ
105 offsetof(CPUState, gpr[i]), p);
106 p += (i < 10) ? 3 : 4;
2dc766da 107 cpu_reg_names_size -= (i < 10) ? 3 : 4;
f78fb44e 108#if !defined(TARGET_PPC64)
2dc766da 109 snprintf(p, cpu_reg_names_size, "r%dH", i);
a7812ae4
PB
110 cpu_gprh[i] = tcg_global_mem_new_i32(TCG_AREG0,
111 offsetof(CPUState, gprh[i]), p);
f78fb44e 112 p += (i < 10) ? 4 : 5;
2dc766da 113 cpu_reg_names_size -= (i < 10) ? 4 : 5;
f78fb44e 114#endif
1d542695 115
2dc766da 116 snprintf(p, cpu_reg_names_size, "fp%d", i);
a7812ae4
PB
117 cpu_fpr[i] = tcg_global_mem_new_i64(TCG_AREG0,
118 offsetof(CPUState, fpr[i]), p);
ec1ac72d 119 p += (i < 10) ? 4 : 5;
2dc766da 120 cpu_reg_names_size -= (i < 10) ? 4 : 5;
a5e26afa 121
2dc766da 122 snprintf(p, cpu_reg_names_size, "avr%dH", i);
e2542fe2 123#ifdef HOST_WORDS_BIGENDIAN
fe1e5c53
AJ
124 cpu_avrh[i] = tcg_global_mem_new_i64(TCG_AREG0,
125 offsetof(CPUState, avr[i].u64[0]), p);
126#else
a7812ae4 127 cpu_avrh[i] = tcg_global_mem_new_i64(TCG_AREG0,
fe1e5c53
AJ
128 offsetof(CPUState, avr[i].u64[1]), p);
129#endif
1d542695 130 p += (i < 10) ? 6 : 7;
2dc766da 131 cpu_reg_names_size -= (i < 10) ? 6 : 7;
ec1ac72d 132
2dc766da 133 snprintf(p, cpu_reg_names_size, "avr%dL", i);
e2542fe2 134#ifdef HOST_WORDS_BIGENDIAN
fe1e5c53
AJ
135 cpu_avrl[i] = tcg_global_mem_new_i64(TCG_AREG0,
136 offsetof(CPUState, avr[i].u64[1]), p);
137#else
a7812ae4 138 cpu_avrl[i] = tcg_global_mem_new_i64(TCG_AREG0,
fe1e5c53
AJ
139 offsetof(CPUState, avr[i].u64[0]), p);
140#endif
1d542695 141 p += (i < 10) ? 6 : 7;
2dc766da 142 cpu_reg_names_size -= (i < 10) ? 6 : 7;
f78fb44e 143 }
f10dc08e 144
a7812ae4 145 cpu_nip = tcg_global_mem_new(TCG_AREG0,
bd568f18
AJ
146 offsetof(CPUState, nip), "nip");
147
6527f6ea
AJ
148 cpu_msr = tcg_global_mem_new(TCG_AREG0,
149 offsetof(CPUState, msr), "msr");
150
a7812ae4 151 cpu_ctr = tcg_global_mem_new(TCG_AREG0,
cfdcd37a
AJ
152 offsetof(CPUState, ctr), "ctr");
153
a7812ae4 154 cpu_lr = tcg_global_mem_new(TCG_AREG0,
cfdcd37a
AJ
155 offsetof(CPUState, lr), "lr");
156
a7812ae4 157 cpu_xer = tcg_global_mem_new(TCG_AREG0,
3d7b417e
AJ
158 offsetof(CPUState, xer), "xer");
159
cf360a32 160 cpu_reserve = tcg_global_mem_new(TCG_AREG0,
18b21a2f
NF
161 offsetof(CPUState, reserve_addr),
162 "reserve_addr");
cf360a32 163
a7812ae4
PB
164 cpu_fpscr = tcg_global_mem_new_i32(TCG_AREG0,
165 offsetof(CPUState, fpscr), "fpscr");
e1571908 166
a7859e89
AJ
167 cpu_access_type = tcg_global_mem_new_i32(TCG_AREG0,
168 offsetof(CPUState, access_type), "access_type");
169
f10dc08e 170 /* register helpers */
a7812ae4 171#define GEN_HELPER 2
f10dc08e
AJ
172#include "helper.h"
173
2e70f6ef
PB
174 done_init = 1;
175}
176
79aceca5
FB
177/* internal defines */
178typedef struct DisasContext {
179 struct TranslationBlock *tb;
0fa85d43 180 target_ulong nip;
79aceca5 181 uint32_t opcode;
9a64fbe4 182 uint32_t exception;
3cc62370
FB
183 /* Routine used to access memory */
184 int mem_idx;
76db3ba4 185 int access_type;
3cc62370 186 /* Translation flags */
76db3ba4 187 int le_mode;
d9bce9d9
JM
188#if defined(TARGET_PPC64)
189 int sf_mode;
9a64fbe4 190#endif
3cc62370 191 int fpu_enabled;
a9d9eb8f 192 int altivec_enabled;
0487d6a8 193 int spe_enabled;
c227f099 194 ppc_spr_t *spr_cb; /* Needed to check rights for mfspr/mtspr */
ea4e754f 195 int singlestep_enabled;
79aceca5
FB
196} DisasContext;
197
c227f099 198struct opc_handler_t {
79aceca5
FB
199 /* invalid bits */
200 uint32_t inval;
9a64fbe4 201 /* instruction type */
0487d6a8 202 uint64_t type;
a5858d7a
AG
203 /* extended instruction type */
204 uint64_t type2;
79aceca5
FB
205 /* handler */
206 void (*handler)(DisasContext *ctx);
a750fc0b 207#if defined(DO_PPC_STATISTICS) || defined(PPC_DUMP_CPU)
b55266b5 208 const char *oname;
a750fc0b
JM
209#endif
210#if defined(DO_PPC_STATISTICS)
76a66253
JM
211 uint64_t count;
212#endif
3fc6c082 213};
79aceca5 214
636aa200 215static inline void gen_reset_fpstatus(void)
7c58044c 216{
a44d2ce1 217 gen_helper_reset_fpstatus();
7c58044c
JM
218}
219
636aa200 220static inline void gen_compute_fprf(TCGv_i64 arg, int set_fprf, int set_rc)
7c58044c 221{
0f2f39c2 222 TCGv_i32 t0 = tcg_temp_new_i32();
af12906f 223
7c58044c
JM
224 if (set_fprf != 0) {
225 /* This case might be optimized later */
0f2f39c2 226 tcg_gen_movi_i32(t0, 1);
af12906f 227 gen_helper_compute_fprf(t0, arg, t0);
a7812ae4 228 if (unlikely(set_rc)) {
0f2f39c2 229 tcg_gen_mov_i32(cpu_crf[1], t0);
a7812ae4 230 }
af12906f 231 gen_helper_float_check_status();
7c58044c
JM
232 } else if (unlikely(set_rc)) {
233 /* We always need to compute fpcc */
0f2f39c2 234 tcg_gen_movi_i32(t0, 0);
af12906f 235 gen_helper_compute_fprf(t0, arg, t0);
0f2f39c2 236 tcg_gen_mov_i32(cpu_crf[1], t0);
7c58044c 237 }
af12906f 238
0f2f39c2 239 tcg_temp_free_i32(t0);
7c58044c
JM
240}
241
636aa200 242static inline void gen_set_access_type(DisasContext *ctx, int access_type)
a7859e89 243{
76db3ba4
AJ
244 if (ctx->access_type != access_type) {
245 tcg_gen_movi_i32(cpu_access_type, access_type);
246 ctx->access_type = access_type;
247 }
a7859e89
AJ
248}
249
636aa200 250static inline void gen_update_nip(DisasContext *ctx, target_ulong nip)
d9bce9d9
JM
251{
252#if defined(TARGET_PPC64)
253 if (ctx->sf_mode)
bd568f18 254 tcg_gen_movi_tl(cpu_nip, nip);
d9bce9d9
JM
255 else
256#endif
bd568f18 257 tcg_gen_movi_tl(cpu_nip, (uint32_t)nip);
d9bce9d9
JM
258}
259
636aa200 260static inline void gen_exception_err(DisasContext *ctx, uint32_t excp, uint32_t error)
e06fcd75
AJ
261{
262 TCGv_i32 t0, t1;
263 if (ctx->exception == POWERPC_EXCP_NONE) {
264 gen_update_nip(ctx, ctx->nip);
265 }
266 t0 = tcg_const_i32(excp);
267 t1 = tcg_const_i32(error);
268 gen_helper_raise_exception_err(t0, t1);
269 tcg_temp_free_i32(t0);
270 tcg_temp_free_i32(t1);
271 ctx->exception = (excp);
272}
e1833e1f 273
636aa200 274static inline void gen_exception(DisasContext *ctx, uint32_t excp)
e06fcd75
AJ
275{
276 TCGv_i32 t0;
277 if (ctx->exception == POWERPC_EXCP_NONE) {
278 gen_update_nip(ctx, ctx->nip);
279 }
280 t0 = tcg_const_i32(excp);
281 gen_helper_raise_exception(t0);
282 tcg_temp_free_i32(t0);
283 ctx->exception = (excp);
284}
e1833e1f 285
636aa200 286static inline void gen_debug_exception(DisasContext *ctx)
e06fcd75
AJ
287{
288 TCGv_i32 t0;
5518f3a6
BS
289
290 if (ctx->exception != POWERPC_EXCP_BRANCH)
291 gen_update_nip(ctx, ctx->nip);
e06fcd75
AJ
292 t0 = tcg_const_i32(EXCP_DEBUG);
293 gen_helper_raise_exception(t0);
294 tcg_temp_free_i32(t0);
295}
9a64fbe4 296
636aa200 297static inline void gen_inval_exception(DisasContext *ctx, uint32_t error)
e06fcd75
AJ
298{
299 gen_exception_err(ctx, POWERPC_EXCP_PROGRAM, POWERPC_EXCP_INVAL | error);
300}
a9d9eb8f 301
f24e5695 302/* Stop translation */
636aa200 303static inline void gen_stop_exception(DisasContext *ctx)
3fc6c082 304{
d9bce9d9 305 gen_update_nip(ctx, ctx->nip);
e1833e1f 306 ctx->exception = POWERPC_EXCP_STOP;
3fc6c082
FB
307}
308
f24e5695 309/* No need to update nip here, as execution flow will change */
636aa200 310static inline void gen_sync_exception(DisasContext *ctx)
2be0071f 311{
e1833e1f 312 ctx->exception = POWERPC_EXCP_SYNC;
2be0071f
FB
313}
314
79aceca5 315#define GEN_HANDLER(name, opc1, opc2, opc3, inval, type) \
a5858d7a
AG
316GEN_OPCODE(name, opc1, opc2, opc3, inval, type, PPC_NONE)
317
318#define GEN_HANDLER_E(name, opc1, opc2, opc3, inval, type, type2) \
319GEN_OPCODE(name, opc1, opc2, opc3, inval, type, type2)
79aceca5 320
c7697e1f 321#define GEN_HANDLER2(name, onam, opc1, opc2, opc3, inval, type) \
a5858d7a
AG
322GEN_OPCODE2(name, onam, opc1, opc2, opc3, inval, type, PPC_NONE)
323
324#define GEN_HANDLER2_E(name, onam, opc1, opc2, opc3, inval, type, type2) \
325GEN_OPCODE2(name, onam, opc1, opc2, opc3, inval, type, type2)
c7697e1f 326
c227f099 327typedef struct opcode_t {
79aceca5 328 unsigned char opc1, opc2, opc3;
1235fc06 329#if HOST_LONG_BITS == 64 /* Explicitly align to 64 bits */
18fba28c
FB
330 unsigned char pad[5];
331#else
332 unsigned char pad[1];
333#endif
c227f099 334 opc_handler_t handler;
b55266b5 335 const char *oname;
c227f099 336} opcode_t;
79aceca5 337
a750fc0b 338/*****************************************************************************/
79aceca5
FB
339/*** Instruction decoding ***/
340#define EXTRACT_HELPER(name, shift, nb) \
636aa200 341static inline uint32_t name(uint32_t opcode) \
79aceca5
FB
342{ \
343 return (opcode >> (shift)) & ((1 << (nb)) - 1); \
344}
345
346#define EXTRACT_SHELPER(name, shift, nb) \
636aa200 347static inline int32_t name(uint32_t opcode) \
79aceca5 348{ \
18fba28c 349 return (int16_t)((opcode >> (shift)) & ((1 << (nb)) - 1)); \
79aceca5
FB
350}
351
352/* Opcode part 1 */
353EXTRACT_HELPER(opc1, 26, 6);
354/* Opcode part 2 */
355EXTRACT_HELPER(opc2, 1, 5);
356/* Opcode part 3 */
357EXTRACT_HELPER(opc3, 6, 5);
358/* Update Cr0 flags */
359EXTRACT_HELPER(Rc, 0, 1);
360/* Destination */
361EXTRACT_HELPER(rD, 21, 5);
362/* Source */
363EXTRACT_HELPER(rS, 21, 5);
364/* First operand */
365EXTRACT_HELPER(rA, 16, 5);
366/* Second operand */
367EXTRACT_HELPER(rB, 11, 5);
368/* Third operand */
369EXTRACT_HELPER(rC, 6, 5);
370/*** Get CRn ***/
371EXTRACT_HELPER(crfD, 23, 3);
372EXTRACT_HELPER(crfS, 18, 3);
373EXTRACT_HELPER(crbD, 21, 5);
374EXTRACT_HELPER(crbA, 16, 5);
375EXTRACT_HELPER(crbB, 11, 5);
376/* SPR / TBL */
3fc6c082 377EXTRACT_HELPER(_SPR, 11, 10);
636aa200 378static inline uint32_t SPR(uint32_t opcode)
3fc6c082
FB
379{
380 uint32_t sprn = _SPR(opcode);
381
382 return ((sprn >> 5) & 0x1F) | ((sprn & 0x1F) << 5);
383}
79aceca5
FB
384/*** Get constants ***/
385EXTRACT_HELPER(IMM, 12, 8);
386/* 16 bits signed immediate value */
387EXTRACT_SHELPER(SIMM, 0, 16);
388/* 16 bits unsigned immediate value */
389EXTRACT_HELPER(UIMM, 0, 16);
21d21583
AJ
390/* 5 bits signed immediate value */
391EXTRACT_HELPER(SIMM5, 16, 5);
27a4edb3
AJ
392/* 5 bits signed immediate value */
393EXTRACT_HELPER(UIMM5, 16, 5);
79aceca5
FB
394/* Bit count */
395EXTRACT_HELPER(NB, 11, 5);
396/* Shift count */
397EXTRACT_HELPER(SH, 11, 5);
cd633b10
AJ
398/* Vector shift count */
399EXTRACT_HELPER(VSH, 6, 4);
79aceca5
FB
400/* Mask start */
401EXTRACT_HELPER(MB, 6, 5);
402/* Mask end */
403EXTRACT_HELPER(ME, 1, 5);
fb0eaffc
FB
404/* Trap operand */
405EXTRACT_HELPER(TO, 21, 5);
79aceca5
FB
406
407EXTRACT_HELPER(CRM, 12, 8);
408EXTRACT_HELPER(FM, 17, 8);
409EXTRACT_HELPER(SR, 16, 4);
e4bb997e 410EXTRACT_HELPER(FPIMM, 12, 4);
fb0eaffc 411
79aceca5
FB
412/*** Jump target decoding ***/
413/* Displacement */
414EXTRACT_SHELPER(d, 0, 16);
415/* Immediate address */
636aa200 416static inline target_ulong LI(uint32_t opcode)
79aceca5
FB
417{
418 return (opcode >> 0) & 0x03FFFFFC;
419}
420
636aa200 421static inline uint32_t BD(uint32_t opcode)
79aceca5
FB
422{
423 return (opcode >> 0) & 0xFFFC;
424}
425
426EXTRACT_HELPER(BO, 21, 5);
427EXTRACT_HELPER(BI, 16, 5);
428/* Absolute/relative address */
429EXTRACT_HELPER(AA, 1, 1);
430/* Link */
431EXTRACT_HELPER(LK, 0, 1);
432
433/* Create a mask between <start> and <end> bits */
636aa200 434static inline target_ulong MASK(uint32_t start, uint32_t end)
79aceca5 435{
76a66253 436 target_ulong ret;
79aceca5 437
76a66253
JM
438#if defined(TARGET_PPC64)
439 if (likely(start == 0)) {
6f2d8978 440 ret = UINT64_MAX << (63 - end);
76a66253 441 } else if (likely(end == 63)) {
6f2d8978 442 ret = UINT64_MAX >> start;
76a66253
JM
443 }
444#else
445 if (likely(start == 0)) {
6f2d8978 446 ret = UINT32_MAX << (31 - end);
76a66253 447 } else if (likely(end == 31)) {
6f2d8978 448 ret = UINT32_MAX >> start;
76a66253
JM
449 }
450#endif
451 else {
452 ret = (((target_ulong)(-1ULL)) >> (start)) ^
453 (((target_ulong)(-1ULL) >> (end)) >> 1);
454 if (unlikely(start > end))
455 return ~ret;
456 }
79aceca5
FB
457
458 return ret;
459}
460
a750fc0b 461/*****************************************************************************/
a750fc0b 462/* PowerPC instructions table */
933dc6eb 463
76a66253 464#if defined(DO_PPC_STATISTICS)
a5858d7a 465#define GEN_OPCODE(name, op1, op2, op3, invl, _typ, _typ2) \
5c55ff99 466{ \
79aceca5
FB
467 .opc1 = op1, \
468 .opc2 = op2, \
469 .opc3 = op3, \
18fba28c 470 .pad = { 0, }, \
79aceca5
FB
471 .handler = { \
472 .inval = invl, \
9a64fbe4 473 .type = _typ, \
a5858d7a 474 .type2 = _typ2, \
79aceca5 475 .handler = &gen_##name, \
76a66253 476 .oname = stringify(name), \
79aceca5 477 }, \
3fc6c082 478 .oname = stringify(name), \
79aceca5 479}
a5858d7a 480#define GEN_OPCODE2(name, onam, op1, op2, op3, invl, _typ, _typ2) \
5c55ff99 481{ \
c7697e1f
JM
482 .opc1 = op1, \
483 .opc2 = op2, \
484 .opc3 = op3, \
485 .pad = { 0, }, \
486 .handler = { \
487 .inval = invl, \
488 .type = _typ, \
a5858d7a 489 .type2 = _typ2, \
c7697e1f
JM
490 .handler = &gen_##name, \
491 .oname = onam, \
492 }, \
493 .oname = onam, \
494}
76a66253 495#else
a5858d7a 496#define GEN_OPCODE(name, op1, op2, op3, invl, _typ, _typ2) \
5c55ff99 497{ \
c7697e1f
JM
498 .opc1 = op1, \
499 .opc2 = op2, \
500 .opc3 = op3, \
501 .pad = { 0, }, \
502 .handler = { \
503 .inval = invl, \
504 .type = _typ, \
a5858d7a 505 .type2 = _typ2, \
c7697e1f 506 .handler = &gen_##name, \
5c55ff99
BS
507 }, \
508 .oname = stringify(name), \
509}
a5858d7a 510#define GEN_OPCODE2(name, onam, op1, op2, op3, invl, _typ, _typ2) \
5c55ff99
BS
511{ \
512 .opc1 = op1, \
513 .opc2 = op2, \
514 .opc3 = op3, \
515 .pad = { 0, }, \
516 .handler = { \
517 .inval = invl, \
518 .type = _typ, \
a5858d7a 519 .type2 = _typ2, \
5c55ff99
BS
520 .handler = &gen_##name, \
521 }, \
522 .oname = onam, \
523}
524#endif
2e610050 525
5c55ff99 526/* SPR load/store helpers */
636aa200 527static inline void gen_load_spr(TCGv t, int reg)
5c55ff99
BS
528{
529 tcg_gen_ld_tl(t, cpu_env, offsetof(CPUState, spr[reg]));
530}
2e610050 531
636aa200 532static inline void gen_store_spr(int reg, TCGv t)
5c55ff99
BS
533{
534 tcg_gen_st_tl(t, cpu_env, offsetof(CPUState, spr[reg]));
535}
2e610050 536
54623277 537/* Invalid instruction */
99e300ef 538static void gen_invalid(DisasContext *ctx)
9a64fbe4 539{
e06fcd75 540 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL);
9a64fbe4
FB
541}
542
c227f099 543static opc_handler_t invalid_handler = {
79aceca5 544 .inval = 0xFFFFFFFF,
9a64fbe4 545 .type = PPC_NONE,
a5858d7a 546 .type2 = PPC_NONE,
79aceca5
FB
547 .handler = gen_invalid,
548};
549
e1571908
AJ
550/*** Integer comparison ***/
551
636aa200 552static inline void gen_op_cmp(TCGv arg0, TCGv arg1, int s, int crf)
e1571908
AJ
553{
554 int l1, l2, l3;
555
269f3e95
AJ
556 tcg_gen_trunc_tl_i32(cpu_crf[crf], cpu_xer);
557 tcg_gen_shri_i32(cpu_crf[crf], cpu_crf[crf], XER_SO);
e1571908
AJ
558 tcg_gen_andi_i32(cpu_crf[crf], cpu_crf[crf], 1);
559
560 l1 = gen_new_label();
561 l2 = gen_new_label();
562 l3 = gen_new_label();
563 if (s) {
ea363694
AJ
564 tcg_gen_brcond_tl(TCG_COND_LT, arg0, arg1, l1);
565 tcg_gen_brcond_tl(TCG_COND_GT, arg0, arg1, l2);
e1571908 566 } else {
ea363694
AJ
567 tcg_gen_brcond_tl(TCG_COND_LTU, arg0, arg1, l1);
568 tcg_gen_brcond_tl(TCG_COND_GTU, arg0, arg1, l2);
e1571908
AJ
569 }
570 tcg_gen_ori_i32(cpu_crf[crf], cpu_crf[crf], 1 << CRF_EQ);
571 tcg_gen_br(l3);
572 gen_set_label(l1);
573 tcg_gen_ori_i32(cpu_crf[crf], cpu_crf[crf], 1 << CRF_LT);
574 tcg_gen_br(l3);
575 gen_set_label(l2);
576 tcg_gen_ori_i32(cpu_crf[crf], cpu_crf[crf], 1 << CRF_GT);
577 gen_set_label(l3);
578}
579
636aa200 580static inline void gen_op_cmpi(TCGv arg0, target_ulong arg1, int s, int crf)
e1571908 581{
ea363694
AJ
582 TCGv t0 = tcg_const_local_tl(arg1);
583 gen_op_cmp(arg0, t0, s, crf);
584 tcg_temp_free(t0);
e1571908
AJ
585}
586
587#if defined(TARGET_PPC64)
636aa200 588static inline void gen_op_cmp32(TCGv arg0, TCGv arg1, int s, int crf)
e1571908 589{
ea363694 590 TCGv t0, t1;
a7812ae4
PB
591 t0 = tcg_temp_local_new();
592 t1 = tcg_temp_local_new();
e1571908 593 if (s) {
ea363694
AJ
594 tcg_gen_ext32s_tl(t0, arg0);
595 tcg_gen_ext32s_tl(t1, arg1);
e1571908 596 } else {
ea363694
AJ
597 tcg_gen_ext32u_tl(t0, arg0);
598 tcg_gen_ext32u_tl(t1, arg1);
e1571908 599 }
ea363694
AJ
600 gen_op_cmp(t0, t1, s, crf);
601 tcg_temp_free(t1);
602 tcg_temp_free(t0);
e1571908
AJ
603}
604
636aa200 605static inline void gen_op_cmpi32(TCGv arg0, target_ulong arg1, int s, int crf)
e1571908 606{
ea363694
AJ
607 TCGv t0 = tcg_const_local_tl(arg1);
608 gen_op_cmp32(arg0, t0, s, crf);
609 tcg_temp_free(t0);
e1571908
AJ
610}
611#endif
612
636aa200 613static inline void gen_set_Rc0(DisasContext *ctx, TCGv reg)
e1571908
AJ
614{
615#if defined(TARGET_PPC64)
616 if (!(ctx->sf_mode))
617 gen_op_cmpi32(reg, 0, 1, 0);
618 else
619#endif
620 gen_op_cmpi(reg, 0, 1, 0);
621}
622
623/* cmp */
99e300ef 624static void gen_cmp(DisasContext *ctx)
e1571908
AJ
625{
626#if defined(TARGET_PPC64)
627 if (!(ctx->sf_mode && (ctx->opcode & 0x00200000)))
628 gen_op_cmp32(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)],
629 1, crfD(ctx->opcode));
630 else
631#endif
632 gen_op_cmp(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)],
633 1, crfD(ctx->opcode));
634}
635
636/* cmpi */
99e300ef 637static void gen_cmpi(DisasContext *ctx)
e1571908
AJ
638{
639#if defined(TARGET_PPC64)
640 if (!(ctx->sf_mode && (ctx->opcode & 0x00200000)))
641 gen_op_cmpi32(cpu_gpr[rA(ctx->opcode)], SIMM(ctx->opcode),
642 1, crfD(ctx->opcode));
643 else
644#endif
645 gen_op_cmpi(cpu_gpr[rA(ctx->opcode)], SIMM(ctx->opcode),
646 1, crfD(ctx->opcode));
647}
648
649/* cmpl */
99e300ef 650static void gen_cmpl(DisasContext *ctx)
e1571908
AJ
651{
652#if defined(TARGET_PPC64)
653 if (!(ctx->sf_mode && (ctx->opcode & 0x00200000)))
654 gen_op_cmp32(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)],
655 0, crfD(ctx->opcode));
656 else
657#endif
658 gen_op_cmp(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)],
659 0, crfD(ctx->opcode));
660}
661
662/* cmpli */
99e300ef 663static void gen_cmpli(DisasContext *ctx)
e1571908
AJ
664{
665#if defined(TARGET_PPC64)
666 if (!(ctx->sf_mode && (ctx->opcode & 0x00200000)))
667 gen_op_cmpi32(cpu_gpr[rA(ctx->opcode)], UIMM(ctx->opcode),
668 0, crfD(ctx->opcode));
669 else
670#endif
671 gen_op_cmpi(cpu_gpr[rA(ctx->opcode)], UIMM(ctx->opcode),
672 0, crfD(ctx->opcode));
673}
674
675/* isel (PowerPC 2.03 specification) */
99e300ef 676static void gen_isel(DisasContext *ctx)
e1571908
AJ
677{
678 int l1, l2;
679 uint32_t bi = rC(ctx->opcode);
680 uint32_t mask;
a7812ae4 681 TCGv_i32 t0;
e1571908
AJ
682
683 l1 = gen_new_label();
684 l2 = gen_new_label();
685
686 mask = 1 << (3 - (bi & 0x03));
a7812ae4 687 t0 = tcg_temp_new_i32();
fea0c503
AJ
688 tcg_gen_andi_i32(t0, cpu_crf[bi >> 2], mask);
689 tcg_gen_brcondi_i32(TCG_COND_EQ, t0, 0, l1);
e1571908
AJ
690 if (rA(ctx->opcode) == 0)
691 tcg_gen_movi_tl(cpu_gpr[rD(ctx->opcode)], 0);
692 else
693 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
694 tcg_gen_br(l2);
695 gen_set_label(l1);
696 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rB(ctx->opcode)]);
697 gen_set_label(l2);
a7812ae4 698 tcg_temp_free_i32(t0);
e1571908
AJ
699}
700
79aceca5 701/*** Integer arithmetic ***/
79aceca5 702
636aa200
BS
703static inline void gen_op_arith_compute_ov(DisasContext *ctx, TCGv arg0,
704 TCGv arg1, TCGv arg2, int sub)
74637406
AJ
705{
706 int l1;
707 TCGv t0;
79aceca5 708
74637406
AJ
709 l1 = gen_new_label();
710 /* Start with XER OV disabled, the most likely case */
711 tcg_gen_andi_tl(cpu_xer, cpu_xer, ~(1 << XER_OV));
a7812ae4 712 t0 = tcg_temp_local_new();
74637406
AJ
713 tcg_gen_xor_tl(t0, arg0, arg1);
714#if defined(TARGET_PPC64)
715 if (!ctx->sf_mode)
716 tcg_gen_ext32s_tl(t0, t0);
717#endif
718 if (sub)
719 tcg_gen_brcondi_tl(TCG_COND_LT, t0, 0, l1);
720 else
721 tcg_gen_brcondi_tl(TCG_COND_GE, t0, 0, l1);
722 tcg_gen_xor_tl(t0, arg1, arg2);
723#if defined(TARGET_PPC64)
724 if (!ctx->sf_mode)
725 tcg_gen_ext32s_tl(t0, t0);
726#endif
727 if (sub)
728 tcg_gen_brcondi_tl(TCG_COND_GE, t0, 0, l1);
729 else
730 tcg_gen_brcondi_tl(TCG_COND_LT, t0, 0, l1);
731 tcg_gen_ori_tl(cpu_xer, cpu_xer, (1 << XER_OV) | (1 << XER_SO));
732 gen_set_label(l1);
733 tcg_temp_free(t0);
79aceca5
FB
734}
735
636aa200
BS
736static inline void gen_op_arith_compute_ca(DisasContext *ctx, TCGv arg1,
737 TCGv arg2, int sub)
74637406
AJ
738{
739 int l1 = gen_new_label();
d9bce9d9
JM
740
741#if defined(TARGET_PPC64)
74637406
AJ
742 if (!(ctx->sf_mode)) {
743 TCGv t0, t1;
a7812ae4
PB
744 t0 = tcg_temp_new();
745 t1 = tcg_temp_new();
d9bce9d9 746
74637406
AJ
747 tcg_gen_ext32u_tl(t0, arg1);
748 tcg_gen_ext32u_tl(t1, arg2);
749 if (sub) {
750 tcg_gen_brcond_tl(TCG_COND_GTU, t0, t1, l1);
bdc4e053 751 } else {
74637406
AJ
752 tcg_gen_brcond_tl(TCG_COND_GEU, t0, t1, l1);
753 }
a9730017
AJ
754 tcg_gen_ori_tl(cpu_xer, cpu_xer, 1 << XER_CA);
755 gen_set_label(l1);
756 tcg_temp_free(t0);
757 tcg_temp_free(t1);
74637406
AJ
758 } else
759#endif
a9730017
AJ
760 {
761 if (sub) {
762 tcg_gen_brcond_tl(TCG_COND_GTU, arg1, arg2, l1);
763 } else {
764 tcg_gen_brcond_tl(TCG_COND_GEU, arg1, arg2, l1);
765 }
766 tcg_gen_ori_tl(cpu_xer, cpu_xer, 1 << XER_CA);
767 gen_set_label(l1);
74637406 768 }
d9bce9d9
JM
769}
770
74637406 771/* Common add function */
636aa200
BS
772static inline void gen_op_arith_add(DisasContext *ctx, TCGv ret, TCGv arg1,
773 TCGv arg2, int add_ca, int compute_ca,
774 int compute_ov)
74637406
AJ
775{
776 TCGv t0, t1;
d9bce9d9 777
74637406 778 if ((!compute_ca && !compute_ov) ||
a7812ae4 779 (!TCGV_EQUAL(ret,arg1) && !TCGV_EQUAL(ret, arg2))) {
74637406
AJ
780 t0 = ret;
781 } else {
a7812ae4 782 t0 = tcg_temp_local_new();
74637406 783 }
79aceca5 784
74637406 785 if (add_ca) {
a7812ae4 786 t1 = tcg_temp_local_new();
74637406
AJ
787 tcg_gen_andi_tl(t1, cpu_xer, (1 << XER_CA));
788 tcg_gen_shri_tl(t1, t1, XER_CA);
d2e9fd8f 789 } else {
790 TCGV_UNUSED(t1);
74637406 791 }
79aceca5 792
74637406
AJ
793 if (compute_ca && compute_ov) {
794 /* Start with XER CA and OV disabled, the most likely case */
795 tcg_gen_andi_tl(cpu_xer, cpu_xer, ~((1 << XER_CA) | (1 << XER_OV)));
796 } else if (compute_ca) {
797 /* Start with XER CA disabled, the most likely case */
798 tcg_gen_andi_tl(cpu_xer, cpu_xer, ~(1 << XER_CA));
799 } else if (compute_ov) {
800 /* Start with XER OV disabled, the most likely case */
801 tcg_gen_andi_tl(cpu_xer, cpu_xer, ~(1 << XER_OV));
802 }
79aceca5 803
74637406
AJ
804 tcg_gen_add_tl(t0, arg1, arg2);
805
806 if (compute_ca) {
807 gen_op_arith_compute_ca(ctx, t0, arg1, 0);
808 }
809 if (add_ca) {
810 tcg_gen_add_tl(t0, t0, t1);
811 gen_op_arith_compute_ca(ctx, t0, t1, 0);
812 tcg_temp_free(t1);
813 }
814 if (compute_ov) {
815 gen_op_arith_compute_ov(ctx, t0, arg1, arg2, 0);
816 }
817
818 if (unlikely(Rc(ctx->opcode) != 0))
819 gen_set_Rc0(ctx, t0);
820
a7812ae4 821 if (!TCGV_EQUAL(t0, ret)) {
74637406
AJ
822 tcg_gen_mov_tl(ret, t0);
823 tcg_temp_free(t0);
824 }
39dd32ee 825}
74637406
AJ
826/* Add functions with two operands */
827#define GEN_INT_ARITH_ADD(name, opc3, add_ca, compute_ca, compute_ov) \
99e300ef 828static void glue(gen_, name)(DisasContext *ctx) \
74637406
AJ
829{ \
830 gen_op_arith_add(ctx, cpu_gpr[rD(ctx->opcode)], \
831 cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)], \
832 add_ca, compute_ca, compute_ov); \
833}
834/* Add functions with one operand and one immediate */
835#define GEN_INT_ARITH_ADD_CONST(name, opc3, const_val, \
836 add_ca, compute_ca, compute_ov) \
99e300ef 837static void glue(gen_, name)(DisasContext *ctx) \
74637406
AJ
838{ \
839 TCGv t0 = tcg_const_local_tl(const_val); \
840 gen_op_arith_add(ctx, cpu_gpr[rD(ctx->opcode)], \
841 cpu_gpr[rA(ctx->opcode)], t0, \
842 add_ca, compute_ca, compute_ov); \
843 tcg_temp_free(t0); \
844}
845
846/* add add. addo addo. */
847GEN_INT_ARITH_ADD(add, 0x08, 0, 0, 0)
848GEN_INT_ARITH_ADD(addo, 0x18, 0, 0, 1)
849/* addc addc. addco addco. */
850GEN_INT_ARITH_ADD(addc, 0x00, 0, 1, 0)
851GEN_INT_ARITH_ADD(addco, 0x10, 0, 1, 1)
852/* adde adde. addeo addeo. */
853GEN_INT_ARITH_ADD(adde, 0x04, 1, 1, 0)
854GEN_INT_ARITH_ADD(addeo, 0x14, 1, 1, 1)
855/* addme addme. addmeo addmeo. */
856GEN_INT_ARITH_ADD_CONST(addme, 0x07, -1LL, 1, 1, 0)
857GEN_INT_ARITH_ADD_CONST(addmeo, 0x17, -1LL, 1, 1, 1)
858/* addze addze. addzeo addzeo.*/
859GEN_INT_ARITH_ADD_CONST(addze, 0x06, 0, 1, 1, 0)
860GEN_INT_ARITH_ADD_CONST(addzeo, 0x16, 0, 1, 1, 1)
861/* addi */
99e300ef 862static void gen_addi(DisasContext *ctx)
d9bce9d9 863{
74637406
AJ
864 target_long simm = SIMM(ctx->opcode);
865
866 if (rA(ctx->opcode) == 0) {
867 /* li case */
868 tcg_gen_movi_tl(cpu_gpr[rD(ctx->opcode)], simm);
869 } else {
870 tcg_gen_addi_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)], simm);
871 }
d9bce9d9 872}
74637406 873/* addic addic.*/
636aa200
BS
874static inline void gen_op_addic(DisasContext *ctx, TCGv ret, TCGv arg1,
875 int compute_Rc0)
d9bce9d9 876{
74637406
AJ
877 target_long simm = SIMM(ctx->opcode);
878
879 /* Start with XER CA and OV disabled, the most likely case */
880 tcg_gen_andi_tl(cpu_xer, cpu_xer, ~(1 << XER_CA));
881
882 if (likely(simm != 0)) {
a7812ae4 883 TCGv t0 = tcg_temp_local_new();
74637406
AJ
884 tcg_gen_addi_tl(t0, arg1, simm);
885 gen_op_arith_compute_ca(ctx, t0, arg1, 0);
886 tcg_gen_mov_tl(ret, t0);
887 tcg_temp_free(t0);
888 } else {
889 tcg_gen_mov_tl(ret, arg1);
890 }
891 if (compute_Rc0) {
892 gen_set_Rc0(ctx, ret);
893 }
d9bce9d9 894}
99e300ef
BS
895
896static void gen_addic(DisasContext *ctx)
d9bce9d9 897{
74637406 898 gen_op_addic(ctx, cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)], 0);
d9bce9d9 899}
e8eaa2c0
BS
900
901static void gen_addic_(DisasContext *ctx)
d9bce9d9 902{
74637406 903 gen_op_addic(ctx, cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)], 1);
d9bce9d9 904}
99e300ef 905
54623277 906/* addis */
99e300ef 907static void gen_addis(DisasContext *ctx)
d9bce9d9 908{
74637406
AJ
909 target_long simm = SIMM(ctx->opcode);
910
911 if (rA(ctx->opcode) == 0) {
912 /* lis case */
913 tcg_gen_movi_tl(cpu_gpr[rD(ctx->opcode)], simm << 16);
914 } else {
915 tcg_gen_addi_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)], simm << 16);
916 }
d9bce9d9 917}
74637406 918
636aa200
BS
919static inline void gen_op_arith_divw(DisasContext *ctx, TCGv ret, TCGv arg1,
920 TCGv arg2, int sign, int compute_ov)
d9bce9d9 921{
2ef1b120
AJ
922 int l1 = gen_new_label();
923 int l2 = gen_new_label();
a7812ae4
PB
924 TCGv_i32 t0 = tcg_temp_local_new_i32();
925 TCGv_i32 t1 = tcg_temp_local_new_i32();
74637406 926
2ef1b120
AJ
927 tcg_gen_trunc_tl_i32(t0, arg1);
928 tcg_gen_trunc_tl_i32(t1, arg2);
929 tcg_gen_brcondi_i32(TCG_COND_EQ, t1, 0, l1);
74637406 930 if (sign) {
2ef1b120
AJ
931 int l3 = gen_new_label();
932 tcg_gen_brcondi_i32(TCG_COND_NE, t1, -1, l3);
933 tcg_gen_brcondi_i32(TCG_COND_EQ, t0, INT32_MIN, l1);
74637406 934 gen_set_label(l3);
2ef1b120 935 tcg_gen_div_i32(t0, t0, t1);
74637406 936 } else {
2ef1b120 937 tcg_gen_divu_i32(t0, t0, t1);
74637406
AJ
938 }
939 if (compute_ov) {
940 tcg_gen_andi_tl(cpu_xer, cpu_xer, ~(1 << XER_OV));
941 }
942 tcg_gen_br(l2);
943 gen_set_label(l1);
944 if (sign) {
2ef1b120 945 tcg_gen_sari_i32(t0, t0, 31);
74637406
AJ
946 } else {
947 tcg_gen_movi_i32(t0, 0);
948 }
949 if (compute_ov) {
950 tcg_gen_ori_tl(cpu_xer, cpu_xer, (1 << XER_OV) | (1 << XER_SO));
951 }
952 gen_set_label(l2);
2ef1b120 953 tcg_gen_extu_i32_tl(ret, t0);
a7812ae4
PB
954 tcg_temp_free_i32(t0);
955 tcg_temp_free_i32(t1);
74637406
AJ
956 if (unlikely(Rc(ctx->opcode) != 0))
957 gen_set_Rc0(ctx, ret);
d9bce9d9 958}
74637406
AJ
959/* Div functions */
960#define GEN_INT_ARITH_DIVW(name, opc3, sign, compute_ov) \
99e300ef 961static void glue(gen_, name)(DisasContext *ctx) \
74637406
AJ
962{ \
963 gen_op_arith_divw(ctx, cpu_gpr[rD(ctx->opcode)], \
964 cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)], \
965 sign, compute_ov); \
966}
967/* divwu divwu. divwuo divwuo. */
968GEN_INT_ARITH_DIVW(divwu, 0x0E, 0, 0);
969GEN_INT_ARITH_DIVW(divwuo, 0x1E, 0, 1);
970/* divw divw. divwo divwo. */
971GEN_INT_ARITH_DIVW(divw, 0x0F, 1, 0);
972GEN_INT_ARITH_DIVW(divwo, 0x1F, 1, 1);
d9bce9d9 973#if defined(TARGET_PPC64)
636aa200
BS
974static inline void gen_op_arith_divd(DisasContext *ctx, TCGv ret, TCGv arg1,
975 TCGv arg2, int sign, int compute_ov)
d9bce9d9 976{
2ef1b120
AJ
977 int l1 = gen_new_label();
978 int l2 = gen_new_label();
74637406
AJ
979
980 tcg_gen_brcondi_i64(TCG_COND_EQ, arg2, 0, l1);
981 if (sign) {
2ef1b120 982 int l3 = gen_new_label();
74637406
AJ
983 tcg_gen_brcondi_i64(TCG_COND_NE, arg2, -1, l3);
984 tcg_gen_brcondi_i64(TCG_COND_EQ, arg1, INT64_MIN, l1);
985 gen_set_label(l3);
74637406
AJ
986 tcg_gen_div_i64(ret, arg1, arg2);
987 } else {
988 tcg_gen_divu_i64(ret, arg1, arg2);
989 }
990 if (compute_ov) {
991 tcg_gen_andi_tl(cpu_xer, cpu_xer, ~(1 << XER_OV));
992 }
993 tcg_gen_br(l2);
994 gen_set_label(l1);
995 if (sign) {
996 tcg_gen_sari_i64(ret, arg1, 63);
997 } else {
998 tcg_gen_movi_i64(ret, 0);
999 }
1000 if (compute_ov) {
1001 tcg_gen_ori_tl(cpu_xer, cpu_xer, (1 << XER_OV) | (1 << XER_SO));
1002 }
1003 gen_set_label(l2);
1004 if (unlikely(Rc(ctx->opcode) != 0))
1005 gen_set_Rc0(ctx, ret);
d9bce9d9 1006}
74637406 1007#define GEN_INT_ARITH_DIVD(name, opc3, sign, compute_ov) \
99e300ef 1008static void glue(gen_, name)(DisasContext *ctx) \
74637406 1009{ \
2ef1b120
AJ
1010 gen_op_arith_divd(ctx, cpu_gpr[rD(ctx->opcode)], \
1011 cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)], \
1012 sign, compute_ov); \
74637406
AJ
1013}
1014/* divwu divwu. divwuo divwuo. */
1015GEN_INT_ARITH_DIVD(divdu, 0x0E, 0, 0);
1016GEN_INT_ARITH_DIVD(divduo, 0x1E, 0, 1);
1017/* divw divw. divwo divwo. */
1018GEN_INT_ARITH_DIVD(divd, 0x0F, 1, 0);
1019GEN_INT_ARITH_DIVD(divdo, 0x1F, 1, 1);
d9bce9d9 1020#endif
74637406
AJ
1021
1022/* mulhw mulhw. */
99e300ef 1023static void gen_mulhw(DisasContext *ctx)
d9bce9d9 1024{
a7812ae4 1025 TCGv_i64 t0, t1;
74637406 1026
a7812ae4
PB
1027 t0 = tcg_temp_new_i64();
1028 t1 = tcg_temp_new_i64();
74637406
AJ
1029#if defined(TARGET_PPC64)
1030 tcg_gen_ext32s_tl(t0, cpu_gpr[rA(ctx->opcode)]);
1031 tcg_gen_ext32s_tl(t1, cpu_gpr[rB(ctx->opcode)]);
1032 tcg_gen_mul_i64(t0, t0, t1);
1033 tcg_gen_shri_i64(cpu_gpr[rD(ctx->opcode)], t0, 32);
1034#else
1035 tcg_gen_ext_tl_i64(t0, cpu_gpr[rA(ctx->opcode)]);
1036 tcg_gen_ext_tl_i64(t1, cpu_gpr[rB(ctx->opcode)]);
1037 tcg_gen_mul_i64(t0, t0, t1);
1038 tcg_gen_shri_i64(t0, t0, 32);
1039 tcg_gen_trunc_i64_tl(cpu_gpr[rD(ctx->opcode)], t0);
1040#endif
a7812ae4
PB
1041 tcg_temp_free_i64(t0);
1042 tcg_temp_free_i64(t1);
74637406
AJ
1043 if (unlikely(Rc(ctx->opcode) != 0))
1044 gen_set_Rc0(ctx, cpu_gpr[rD(ctx->opcode)]);
d9bce9d9 1045}
99e300ef 1046
54623277 1047/* mulhwu mulhwu. */
99e300ef 1048static void gen_mulhwu(DisasContext *ctx)
d9bce9d9 1049{
a7812ae4 1050 TCGv_i64 t0, t1;
74637406 1051
a7812ae4
PB
1052 t0 = tcg_temp_new_i64();
1053 t1 = tcg_temp_new_i64();
d9bce9d9 1054#if defined(TARGET_PPC64)
74637406
AJ
1055 tcg_gen_ext32u_i64(t0, cpu_gpr[rA(ctx->opcode)]);
1056 tcg_gen_ext32u_i64(t1, cpu_gpr[rB(ctx->opcode)]);
1057 tcg_gen_mul_i64(t0, t0, t1);
1058 tcg_gen_shri_i64(cpu_gpr[rD(ctx->opcode)], t0, 32);
1059#else
1060 tcg_gen_extu_tl_i64(t0, cpu_gpr[rA(ctx->opcode)]);
1061 tcg_gen_extu_tl_i64(t1, cpu_gpr[rB(ctx->opcode)]);
1062 tcg_gen_mul_i64(t0, t0, t1);
1063 tcg_gen_shri_i64(t0, t0, 32);
1064 tcg_gen_trunc_i64_tl(cpu_gpr[rD(ctx->opcode)], t0);
1065#endif
a7812ae4
PB
1066 tcg_temp_free_i64(t0);
1067 tcg_temp_free_i64(t1);
74637406
AJ
1068 if (unlikely(Rc(ctx->opcode) != 0))
1069 gen_set_Rc0(ctx, cpu_gpr[rD(ctx->opcode)]);
d9bce9d9 1070}
99e300ef 1071
54623277 1072/* mullw mullw. */
99e300ef 1073static void gen_mullw(DisasContext *ctx)
d9bce9d9 1074{
74637406
AJ
1075 tcg_gen_mul_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)],
1076 cpu_gpr[rB(ctx->opcode)]);
1e4c090f 1077 tcg_gen_ext32s_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rD(ctx->opcode)]);
74637406
AJ
1078 if (unlikely(Rc(ctx->opcode) != 0))
1079 gen_set_Rc0(ctx, cpu_gpr[rD(ctx->opcode)]);
d9bce9d9 1080}
99e300ef 1081
54623277 1082/* mullwo mullwo. */
99e300ef 1083static void gen_mullwo(DisasContext *ctx)
d9bce9d9 1084{
74637406 1085 int l1;
a7812ae4 1086 TCGv_i64 t0, t1;
74637406 1087
a7812ae4
PB
1088 t0 = tcg_temp_new_i64();
1089 t1 = tcg_temp_new_i64();
74637406
AJ
1090 l1 = gen_new_label();
1091 /* Start with XER OV disabled, the most likely case */
1092 tcg_gen_andi_tl(cpu_xer, cpu_xer, ~(1 << XER_OV));
1093#if defined(TARGET_PPC64)
1094 tcg_gen_ext32s_i64(t0, cpu_gpr[rA(ctx->opcode)]);
1095 tcg_gen_ext32s_i64(t1, cpu_gpr[rB(ctx->opcode)]);
1096#else
1097 tcg_gen_ext_tl_i64(t0, cpu_gpr[rA(ctx->opcode)]);
1098 tcg_gen_ext_tl_i64(t1, cpu_gpr[rB(ctx->opcode)]);
d9bce9d9 1099#endif
74637406
AJ
1100 tcg_gen_mul_i64(t0, t0, t1);
1101#if defined(TARGET_PPC64)
1102 tcg_gen_ext32s_i64(cpu_gpr[rD(ctx->opcode)], t0);
1103 tcg_gen_brcond_i64(TCG_COND_EQ, t0, cpu_gpr[rD(ctx->opcode)], l1);
1104#else
1105 tcg_gen_trunc_i64_tl(cpu_gpr[rD(ctx->opcode)], t0);
1106 tcg_gen_ext32s_i64(t1, t0);
1107 tcg_gen_brcond_i64(TCG_COND_EQ, t0, t1, l1);
1108#endif
1109 tcg_gen_ori_tl(cpu_xer, cpu_xer, (1 << XER_OV) | (1 << XER_SO));
1110 gen_set_label(l1);
a7812ae4
PB
1111 tcg_temp_free_i64(t0);
1112 tcg_temp_free_i64(t1);
74637406
AJ
1113 if (unlikely(Rc(ctx->opcode) != 0))
1114 gen_set_Rc0(ctx, cpu_gpr[rD(ctx->opcode)]);
d9bce9d9 1115}
99e300ef 1116
54623277 1117/* mulli */
99e300ef 1118static void gen_mulli(DisasContext *ctx)
d9bce9d9 1119{
74637406
AJ
1120 tcg_gen_muli_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)],
1121 SIMM(ctx->opcode));
d9bce9d9
JM
1122}
1123#if defined(TARGET_PPC64)
74637406 1124#define GEN_INT_ARITH_MUL_HELPER(name, opc3) \
99e300ef 1125static void glue(gen_, name)(DisasContext *ctx) \
74637406 1126{ \
a7812ae4 1127 gen_helper_##name (cpu_gpr[rD(ctx->opcode)], \
74637406
AJ
1128 cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)]); \
1129 if (unlikely(Rc(ctx->opcode) != 0)) \
1130 gen_set_Rc0(ctx, cpu_gpr[rD(ctx->opcode)]); \
d9bce9d9 1131}
74637406
AJ
1132/* mulhd mulhd. */
1133GEN_INT_ARITH_MUL_HELPER(mulhdu, 0x00);
1134/* mulhdu mulhdu. */
1135GEN_INT_ARITH_MUL_HELPER(mulhd, 0x02);
99e300ef 1136
54623277 1137/* mulld mulld. */
99e300ef 1138static void gen_mulld(DisasContext *ctx)
d9bce9d9 1139{
74637406
AJ
1140 tcg_gen_mul_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)],
1141 cpu_gpr[rB(ctx->opcode)]);
1142 if (unlikely(Rc(ctx->opcode) != 0))
1143 gen_set_Rc0(ctx, cpu_gpr[rD(ctx->opcode)]);
d9bce9d9 1144}
74637406
AJ
1145/* mulldo mulldo. */
1146GEN_INT_ARITH_MUL_HELPER(mulldo, 0x17);
d9bce9d9 1147#endif
74637406
AJ
1148
1149/* neg neg. nego nego. */
636aa200
BS
1150static inline void gen_op_arith_neg(DisasContext *ctx, TCGv ret, TCGv arg1,
1151 int ov_check)
d9bce9d9 1152{
ec6469a3
AJ
1153 int l1 = gen_new_label();
1154 int l2 = gen_new_label();
a7812ae4 1155 TCGv t0 = tcg_temp_local_new();
d9bce9d9 1156#if defined(TARGET_PPC64)
74637406 1157 if (ctx->sf_mode) {
741a7444 1158 tcg_gen_mov_tl(t0, arg1);
ec6469a3
AJ
1159 tcg_gen_brcondi_tl(TCG_COND_EQ, t0, INT64_MIN, l1);
1160 } else
1161#endif
1162 {
1163 tcg_gen_ext32s_tl(t0, arg1);
74637406
AJ
1164 tcg_gen_brcondi_tl(TCG_COND_EQ, t0, INT32_MIN, l1);
1165 }
74637406
AJ
1166 tcg_gen_neg_tl(ret, arg1);
1167 if (ov_check) {
1168 tcg_gen_andi_tl(cpu_xer, cpu_xer, ~(1 << XER_OV));
1169 }
1170 tcg_gen_br(l2);
1171 gen_set_label(l1);
ec6469a3 1172 tcg_gen_mov_tl(ret, t0);
74637406
AJ
1173 if (ov_check) {
1174 tcg_gen_ori_tl(cpu_xer, cpu_xer, (1 << XER_OV) | (1 << XER_SO));
1175 }
1176 gen_set_label(l2);
ec6469a3 1177 tcg_temp_free(t0);
74637406
AJ
1178 if (unlikely(Rc(ctx->opcode) != 0))
1179 gen_set_Rc0(ctx, ret);
1180}
99e300ef
BS
1181
1182static void gen_neg(DisasContext *ctx)
d9bce9d9 1183{
ec6469a3 1184 gen_op_arith_neg(ctx, cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)], 0);
d9bce9d9 1185}
99e300ef
BS
1186
1187static void gen_nego(DisasContext *ctx)
79aceca5 1188{
ec6469a3 1189 gen_op_arith_neg(ctx, cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)], 1);
79aceca5 1190}
74637406
AJ
1191
1192/* Common subf function */
636aa200
BS
1193static inline void gen_op_arith_subf(DisasContext *ctx, TCGv ret, TCGv arg1,
1194 TCGv arg2, int add_ca, int compute_ca,
1195 int compute_ov)
79aceca5 1196{
74637406 1197 TCGv t0, t1;
76a66253 1198
74637406 1199 if ((!compute_ca && !compute_ov) ||
a7812ae4 1200 (!TCGV_EQUAL(ret, arg1) && !TCGV_EQUAL(ret, arg2))) {
74637406 1201 t0 = ret;
e864cabd 1202 } else {
a7812ae4 1203 t0 = tcg_temp_local_new();
d9bce9d9 1204 }
76a66253 1205
74637406 1206 if (add_ca) {
a7812ae4 1207 t1 = tcg_temp_local_new();
74637406
AJ
1208 tcg_gen_andi_tl(t1, cpu_xer, (1 << XER_CA));
1209 tcg_gen_shri_tl(t1, t1, XER_CA);
d2e9fd8f 1210 } else {
1211 TCGV_UNUSED(t1);
d9bce9d9 1212 }
79aceca5 1213
74637406
AJ
1214 if (compute_ca && compute_ov) {
1215 /* Start with XER CA and OV disabled, the most likely case */
1216 tcg_gen_andi_tl(cpu_xer, cpu_xer, ~((1 << XER_CA) | (1 << XER_OV)));
1217 } else if (compute_ca) {
1218 /* Start with XER CA disabled, the most likely case */
1219 tcg_gen_andi_tl(cpu_xer, cpu_xer, ~(1 << XER_CA));
1220 } else if (compute_ov) {
1221 /* Start with XER OV disabled, the most likely case */
1222 tcg_gen_andi_tl(cpu_xer, cpu_xer, ~(1 << XER_OV));
1223 }
1224
1225 if (add_ca) {
1226 tcg_gen_not_tl(t0, arg1);
1227 tcg_gen_add_tl(t0, t0, arg2);
1228 gen_op_arith_compute_ca(ctx, t0, arg2, 0);
1229 tcg_gen_add_tl(t0, t0, t1);
1230 gen_op_arith_compute_ca(ctx, t0, t1, 0);
1231 tcg_temp_free(t1);
79aceca5 1232 } else {
74637406
AJ
1233 tcg_gen_sub_tl(t0, arg2, arg1);
1234 if (compute_ca) {
1235 gen_op_arith_compute_ca(ctx, t0, arg2, 1);
1236 }
1237 }
1238 if (compute_ov) {
1239 gen_op_arith_compute_ov(ctx, t0, arg1, arg2, 1);
1240 }
1241
1242 if (unlikely(Rc(ctx->opcode) != 0))
1243 gen_set_Rc0(ctx, t0);
1244
a7812ae4 1245 if (!TCGV_EQUAL(t0, ret)) {
74637406
AJ
1246 tcg_gen_mov_tl(ret, t0);
1247 tcg_temp_free(t0);
79aceca5 1248 }
79aceca5 1249}
74637406
AJ
1250/* Sub functions with Two operands functions */
1251#define GEN_INT_ARITH_SUBF(name, opc3, add_ca, compute_ca, compute_ov) \
99e300ef 1252static void glue(gen_, name)(DisasContext *ctx) \
74637406
AJ
1253{ \
1254 gen_op_arith_subf(ctx, cpu_gpr[rD(ctx->opcode)], \
1255 cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)], \
1256 add_ca, compute_ca, compute_ov); \
1257}
1258/* Sub functions with one operand and one immediate */
1259#define GEN_INT_ARITH_SUBF_CONST(name, opc3, const_val, \
1260 add_ca, compute_ca, compute_ov) \
99e300ef 1261static void glue(gen_, name)(DisasContext *ctx) \
74637406
AJ
1262{ \
1263 TCGv t0 = tcg_const_local_tl(const_val); \
1264 gen_op_arith_subf(ctx, cpu_gpr[rD(ctx->opcode)], \
1265 cpu_gpr[rA(ctx->opcode)], t0, \
1266 add_ca, compute_ca, compute_ov); \
1267 tcg_temp_free(t0); \
1268}
1269/* subf subf. subfo subfo. */
1270GEN_INT_ARITH_SUBF(subf, 0x01, 0, 0, 0)
1271GEN_INT_ARITH_SUBF(subfo, 0x11, 0, 0, 1)
1272/* subfc subfc. subfco subfco. */
1273GEN_INT_ARITH_SUBF(subfc, 0x00, 0, 1, 0)
1274GEN_INT_ARITH_SUBF(subfco, 0x10, 0, 1, 1)
1275/* subfe subfe. subfeo subfo. */
1276GEN_INT_ARITH_SUBF(subfe, 0x04, 1, 1, 0)
1277GEN_INT_ARITH_SUBF(subfeo, 0x14, 1, 1, 1)
1278/* subfme subfme. subfmeo subfmeo. */
1279GEN_INT_ARITH_SUBF_CONST(subfme, 0x07, -1LL, 1, 1, 0)
1280GEN_INT_ARITH_SUBF_CONST(subfmeo, 0x17, -1LL, 1, 1, 1)
1281/* subfze subfze. subfzeo subfzeo.*/
1282GEN_INT_ARITH_SUBF_CONST(subfze, 0x06, 0, 1, 1, 0)
1283GEN_INT_ARITH_SUBF_CONST(subfzeo, 0x16, 0, 1, 1, 1)
99e300ef 1284
54623277 1285/* subfic */
99e300ef 1286static void gen_subfic(DisasContext *ctx)
79aceca5 1287{
74637406
AJ
1288 /* Start with XER CA and OV disabled, the most likely case */
1289 tcg_gen_andi_tl(cpu_xer, cpu_xer, ~(1 << XER_CA));
a7812ae4 1290 TCGv t0 = tcg_temp_local_new();
74637406
AJ
1291 TCGv t1 = tcg_const_local_tl(SIMM(ctx->opcode));
1292 tcg_gen_sub_tl(t0, t1, cpu_gpr[rA(ctx->opcode)]);
1293 gen_op_arith_compute_ca(ctx, t0, t1, 1);
1294 tcg_temp_free(t1);
1295 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], t0);
1296 tcg_temp_free(t0);
79aceca5
FB
1297}
1298
79aceca5 1299/*** Integer logical ***/
26d67362 1300#define GEN_LOGICAL2(name, tcg_op, opc, type) \
99e300ef 1301static void glue(gen_, name)(DisasContext *ctx) \
79aceca5 1302{ \
26d67362
AJ
1303 tcg_op(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)], \
1304 cpu_gpr[rB(ctx->opcode)]); \
76a66253 1305 if (unlikely(Rc(ctx->opcode) != 0)) \
26d67362 1306 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]); \
79aceca5 1307}
79aceca5 1308
26d67362 1309#define GEN_LOGICAL1(name, tcg_op, opc, type) \
99e300ef 1310static void glue(gen_, name)(DisasContext *ctx) \
79aceca5 1311{ \
26d67362 1312 tcg_op(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)]); \
76a66253 1313 if (unlikely(Rc(ctx->opcode) != 0)) \
26d67362 1314 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]); \
79aceca5
FB
1315}
1316
1317/* and & and. */
26d67362 1318GEN_LOGICAL2(and, tcg_gen_and_tl, 0x00, PPC_INTEGER);
79aceca5 1319/* andc & andc. */
26d67362 1320GEN_LOGICAL2(andc, tcg_gen_andc_tl, 0x01, PPC_INTEGER);
e8eaa2c0 1321
54623277 1322/* andi. */
e8eaa2c0 1323static void gen_andi_(DisasContext *ctx)
79aceca5 1324{
26d67362
AJ
1325 tcg_gen_andi_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)], UIMM(ctx->opcode));
1326 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
79aceca5 1327}
e8eaa2c0 1328
54623277 1329/* andis. */
e8eaa2c0 1330static void gen_andis_(DisasContext *ctx)
79aceca5 1331{
26d67362
AJ
1332 tcg_gen_andi_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)], UIMM(ctx->opcode) << 16);
1333 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
79aceca5 1334}
99e300ef 1335
54623277 1336/* cntlzw */
99e300ef 1337static void gen_cntlzw(DisasContext *ctx)
26d67362 1338{
a7812ae4 1339 gen_helper_cntlzw(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)]);
26d67362 1340 if (unlikely(Rc(ctx->opcode) != 0))
2e31f5d3 1341 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
26d67362 1342}
79aceca5 1343/* eqv & eqv. */
26d67362 1344GEN_LOGICAL2(eqv, tcg_gen_eqv_tl, 0x08, PPC_INTEGER);
79aceca5 1345/* extsb & extsb. */
26d67362 1346GEN_LOGICAL1(extsb, tcg_gen_ext8s_tl, 0x1D, PPC_INTEGER);
79aceca5 1347/* extsh & extsh. */
26d67362 1348GEN_LOGICAL1(extsh, tcg_gen_ext16s_tl, 0x1C, PPC_INTEGER);
79aceca5 1349/* nand & nand. */
26d67362 1350GEN_LOGICAL2(nand, tcg_gen_nand_tl, 0x0E, PPC_INTEGER);
79aceca5 1351/* nor & nor. */
26d67362 1352GEN_LOGICAL2(nor, tcg_gen_nor_tl, 0x03, PPC_INTEGER);
99e300ef 1353
54623277 1354/* or & or. */
99e300ef 1355static void gen_or(DisasContext *ctx)
9a64fbe4 1356{
76a66253
JM
1357 int rs, ra, rb;
1358
1359 rs = rS(ctx->opcode);
1360 ra = rA(ctx->opcode);
1361 rb = rB(ctx->opcode);
1362 /* Optimisation for mr. ri case */
1363 if (rs != ra || rs != rb) {
26d67362
AJ
1364 if (rs != rb)
1365 tcg_gen_or_tl(cpu_gpr[ra], cpu_gpr[rs], cpu_gpr[rb]);
1366 else
1367 tcg_gen_mov_tl(cpu_gpr[ra], cpu_gpr[rs]);
76a66253 1368 if (unlikely(Rc(ctx->opcode) != 0))
26d67362 1369 gen_set_Rc0(ctx, cpu_gpr[ra]);
76a66253 1370 } else if (unlikely(Rc(ctx->opcode) != 0)) {
26d67362 1371 gen_set_Rc0(ctx, cpu_gpr[rs]);
c80f84e3
JM
1372#if defined(TARGET_PPC64)
1373 } else {
26d67362
AJ
1374 int prio = 0;
1375
c80f84e3
JM
1376 switch (rs) {
1377 case 1:
1378 /* Set process priority to low */
26d67362 1379 prio = 2;
c80f84e3
JM
1380 break;
1381 case 6:
1382 /* Set process priority to medium-low */
26d67362 1383 prio = 3;
c80f84e3
JM
1384 break;
1385 case 2:
1386 /* Set process priority to normal */
26d67362 1387 prio = 4;
c80f84e3 1388 break;
be147d08
JM
1389#if !defined(CONFIG_USER_ONLY)
1390 case 31:
76db3ba4 1391 if (ctx->mem_idx > 0) {
be147d08 1392 /* Set process priority to very low */
26d67362 1393 prio = 1;
be147d08
JM
1394 }
1395 break;
1396 case 5:
76db3ba4 1397 if (ctx->mem_idx > 0) {
be147d08 1398 /* Set process priority to medium-hight */
26d67362 1399 prio = 5;
be147d08
JM
1400 }
1401 break;
1402 case 3:
76db3ba4 1403 if (ctx->mem_idx > 0) {
be147d08 1404 /* Set process priority to high */
26d67362 1405 prio = 6;
be147d08
JM
1406 }
1407 break;
be147d08 1408 case 7:
76db3ba4 1409 if (ctx->mem_idx > 1) {
be147d08 1410 /* Set process priority to very high */
26d67362 1411 prio = 7;
be147d08
JM
1412 }
1413 break;
be147d08 1414#endif
c80f84e3
JM
1415 default:
1416 /* nop */
1417 break;
1418 }
26d67362 1419 if (prio) {
a7812ae4 1420 TCGv t0 = tcg_temp_new();
54cdcae6 1421 gen_load_spr(t0, SPR_PPR);
ea363694
AJ
1422 tcg_gen_andi_tl(t0, t0, ~0x001C000000000000ULL);
1423 tcg_gen_ori_tl(t0, t0, ((uint64_t)prio) << 50);
54cdcae6 1424 gen_store_spr(SPR_PPR, t0);
ea363694 1425 tcg_temp_free(t0);
26d67362 1426 }
c80f84e3 1427#endif
9a64fbe4 1428 }
9a64fbe4 1429}
79aceca5 1430/* orc & orc. */
26d67362 1431GEN_LOGICAL2(orc, tcg_gen_orc_tl, 0x0C, PPC_INTEGER);
99e300ef 1432
54623277 1433/* xor & xor. */
99e300ef 1434static void gen_xor(DisasContext *ctx)
9a64fbe4 1435{
9a64fbe4 1436 /* Optimisation for "set to zero" case */
26d67362 1437 if (rS(ctx->opcode) != rB(ctx->opcode))
312179c4 1438 tcg_gen_xor_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)], cpu_gpr[rB(ctx->opcode)]);
26d67362
AJ
1439 else
1440 tcg_gen_movi_tl(cpu_gpr[rA(ctx->opcode)], 0);
76a66253 1441 if (unlikely(Rc(ctx->opcode) != 0))
26d67362 1442 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
9a64fbe4 1443}
99e300ef 1444
54623277 1445/* ori */
99e300ef 1446static void gen_ori(DisasContext *ctx)
79aceca5 1447{
76a66253 1448 target_ulong uimm = UIMM(ctx->opcode);
79aceca5 1449
9a64fbe4
FB
1450 if (rS(ctx->opcode) == rA(ctx->opcode) && uimm == 0) {
1451 /* NOP */
76a66253 1452 /* XXX: should handle special NOPs for POWER series */
9a64fbe4 1453 return;
76a66253 1454 }
26d67362 1455 tcg_gen_ori_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)], uimm);
79aceca5 1456}
99e300ef 1457
54623277 1458/* oris */
99e300ef 1459static void gen_oris(DisasContext *ctx)
79aceca5 1460{
76a66253 1461 target_ulong uimm = UIMM(ctx->opcode);
79aceca5 1462
9a64fbe4
FB
1463 if (rS(ctx->opcode) == rA(ctx->opcode) && uimm == 0) {
1464 /* NOP */
1465 return;
76a66253 1466 }
26d67362 1467 tcg_gen_ori_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)], uimm << 16);
79aceca5 1468}
99e300ef 1469
54623277 1470/* xori */
99e300ef 1471static void gen_xori(DisasContext *ctx)
79aceca5 1472{
76a66253 1473 target_ulong uimm = UIMM(ctx->opcode);
9a64fbe4
FB
1474
1475 if (rS(ctx->opcode) == rA(ctx->opcode) && uimm == 0) {
1476 /* NOP */
1477 return;
1478 }
26d67362 1479 tcg_gen_xori_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)], uimm);
79aceca5 1480}
99e300ef 1481
54623277 1482/* xoris */
99e300ef 1483static void gen_xoris(DisasContext *ctx)
79aceca5 1484{
76a66253 1485 target_ulong uimm = UIMM(ctx->opcode);
9a64fbe4
FB
1486
1487 if (rS(ctx->opcode) == rA(ctx->opcode) && uimm == 0) {
1488 /* NOP */
1489 return;
1490 }
26d67362 1491 tcg_gen_xori_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)], uimm << 16);
79aceca5 1492}
99e300ef 1493
54623277 1494/* popcntb : PowerPC 2.03 specification */
99e300ef 1495static void gen_popcntb(DisasContext *ctx)
d9bce9d9 1496{
eaabeef2
DG
1497 gen_helper_popcntb(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)]);
1498}
1499
1500static void gen_popcntw(DisasContext *ctx)
1501{
1502 gen_helper_popcntw(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)]);
1503}
1504
d9bce9d9 1505#if defined(TARGET_PPC64)
eaabeef2
DG
1506/* popcntd: PowerPC 2.06 specification */
1507static void gen_popcntd(DisasContext *ctx)
1508{
1509 gen_helper_popcntd(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)]);
d9bce9d9 1510}
eaabeef2 1511#endif
d9bce9d9
JM
1512
1513#if defined(TARGET_PPC64)
1514/* extsw & extsw. */
26d67362 1515GEN_LOGICAL1(extsw, tcg_gen_ext32s_tl, 0x1E, PPC_64B);
99e300ef 1516
54623277 1517/* cntlzd */
99e300ef 1518static void gen_cntlzd(DisasContext *ctx)
26d67362 1519{
a7812ae4 1520 gen_helper_cntlzd(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)]);
26d67362
AJ
1521 if (unlikely(Rc(ctx->opcode) != 0))
1522 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
1523}
d9bce9d9
JM
1524#endif
1525
79aceca5 1526/*** Integer rotate ***/
99e300ef 1527
54623277 1528/* rlwimi & rlwimi. */
99e300ef 1529static void gen_rlwimi(DisasContext *ctx)
79aceca5 1530{
76a66253 1531 uint32_t mb, me, sh;
79aceca5
FB
1532
1533 mb = MB(ctx->opcode);
1534 me = ME(ctx->opcode);
76a66253 1535 sh = SH(ctx->opcode);
d03ef511
AJ
1536 if (likely(sh == 0 && mb == 0 && me == 31)) {
1537 tcg_gen_ext32u_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)]);
1538 } else {
d03ef511 1539 target_ulong mask;
a7812ae4
PB
1540 TCGv t1;
1541 TCGv t0 = tcg_temp_new();
54843a58 1542#if defined(TARGET_PPC64)
a7812ae4
PB
1543 TCGv_i32 t2 = tcg_temp_new_i32();
1544 tcg_gen_trunc_i64_i32(t2, cpu_gpr[rS(ctx->opcode)]);
1545 tcg_gen_rotli_i32(t2, t2, sh);
1546 tcg_gen_extu_i32_i64(t0, t2);
1547 tcg_temp_free_i32(t2);
54843a58
AJ
1548#else
1549 tcg_gen_rotli_i32(t0, cpu_gpr[rS(ctx->opcode)], sh);
1550#endif
76a66253 1551#if defined(TARGET_PPC64)
d03ef511
AJ
1552 mb += 32;
1553 me += 32;
76a66253 1554#endif
d03ef511 1555 mask = MASK(mb, me);
a7812ae4 1556 t1 = tcg_temp_new();
d03ef511
AJ
1557 tcg_gen_andi_tl(t0, t0, mask);
1558 tcg_gen_andi_tl(t1, cpu_gpr[rA(ctx->opcode)], ~mask);
1559 tcg_gen_or_tl(cpu_gpr[rA(ctx->opcode)], t0, t1);
1560 tcg_temp_free(t0);
1561 tcg_temp_free(t1);
1562 }
76a66253 1563 if (unlikely(Rc(ctx->opcode) != 0))
d03ef511 1564 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
79aceca5 1565}
99e300ef 1566
54623277 1567/* rlwinm & rlwinm. */
99e300ef 1568static void gen_rlwinm(DisasContext *ctx)
79aceca5
FB
1569{
1570 uint32_t mb, me, sh;
3b46e624 1571
79aceca5
FB
1572 sh = SH(ctx->opcode);
1573 mb = MB(ctx->opcode);
1574 me = ME(ctx->opcode);
d03ef511
AJ
1575
1576 if (likely(mb == 0 && me == (31 - sh))) {
1577 if (likely(sh == 0)) {
1578 tcg_gen_ext32u_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)]);
1579 } else {
a7812ae4 1580 TCGv t0 = tcg_temp_new();
d03ef511
AJ
1581 tcg_gen_ext32u_tl(t0, cpu_gpr[rS(ctx->opcode)]);
1582 tcg_gen_shli_tl(t0, t0, sh);
1583 tcg_gen_ext32u_tl(cpu_gpr[rA(ctx->opcode)], t0);
1584 tcg_temp_free(t0);
79aceca5 1585 }
d03ef511 1586 } else if (likely(sh != 0 && me == 31 && sh == (32 - mb))) {
a7812ae4 1587 TCGv t0 = tcg_temp_new();
d03ef511
AJ
1588 tcg_gen_ext32u_tl(t0, cpu_gpr[rS(ctx->opcode)]);
1589 tcg_gen_shri_tl(t0, t0, mb);
1590 tcg_gen_ext32u_tl(cpu_gpr[rA(ctx->opcode)], t0);
1591 tcg_temp_free(t0);
1592 } else {
a7812ae4 1593 TCGv t0 = tcg_temp_new();
54843a58 1594#if defined(TARGET_PPC64)
a7812ae4 1595 TCGv_i32 t1 = tcg_temp_new_i32();
54843a58
AJ
1596 tcg_gen_trunc_i64_i32(t1, cpu_gpr[rS(ctx->opcode)]);
1597 tcg_gen_rotli_i32(t1, t1, sh);
1598 tcg_gen_extu_i32_i64(t0, t1);
a7812ae4 1599 tcg_temp_free_i32(t1);
54843a58
AJ
1600#else
1601 tcg_gen_rotli_i32(t0, cpu_gpr[rS(ctx->opcode)], sh);
1602#endif
76a66253 1603#if defined(TARGET_PPC64)
d03ef511
AJ
1604 mb += 32;
1605 me += 32;
76a66253 1606#endif
d03ef511
AJ
1607 tcg_gen_andi_tl(cpu_gpr[rA(ctx->opcode)], t0, MASK(mb, me));
1608 tcg_temp_free(t0);
1609 }
76a66253 1610 if (unlikely(Rc(ctx->opcode) != 0))
d03ef511 1611 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
79aceca5 1612}
99e300ef 1613
54623277 1614/* rlwnm & rlwnm. */
99e300ef 1615static void gen_rlwnm(DisasContext *ctx)
79aceca5
FB
1616{
1617 uint32_t mb, me;
54843a58
AJ
1618 TCGv t0;
1619#if defined(TARGET_PPC64)
a7812ae4 1620 TCGv_i32 t1, t2;
54843a58 1621#endif
79aceca5
FB
1622
1623 mb = MB(ctx->opcode);
1624 me = ME(ctx->opcode);
a7812ae4 1625 t0 = tcg_temp_new();
d03ef511 1626 tcg_gen_andi_tl(t0, cpu_gpr[rB(ctx->opcode)], 0x1f);
54843a58 1627#if defined(TARGET_PPC64)
a7812ae4
PB
1628 t1 = tcg_temp_new_i32();
1629 t2 = tcg_temp_new_i32();
54843a58
AJ
1630 tcg_gen_trunc_i64_i32(t1, cpu_gpr[rS(ctx->opcode)]);
1631 tcg_gen_trunc_i64_i32(t2, t0);
1632 tcg_gen_rotl_i32(t1, t1, t2);
1633 tcg_gen_extu_i32_i64(t0, t1);
a7812ae4
PB
1634 tcg_temp_free_i32(t1);
1635 tcg_temp_free_i32(t2);
54843a58
AJ
1636#else
1637 tcg_gen_rotl_i32(t0, cpu_gpr[rS(ctx->opcode)], t0);
1638#endif
76a66253
JM
1639 if (unlikely(mb != 0 || me != 31)) {
1640#if defined(TARGET_PPC64)
1641 mb += 32;
1642 me += 32;
1643#endif
54843a58 1644 tcg_gen_andi_tl(cpu_gpr[rA(ctx->opcode)], t0, MASK(mb, me));
d03ef511 1645 } else {
54843a58 1646 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], t0);
79aceca5 1647 }
54843a58 1648 tcg_temp_free(t0);
76a66253 1649 if (unlikely(Rc(ctx->opcode) != 0))
d03ef511 1650 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
79aceca5
FB
1651}
1652
d9bce9d9
JM
1653#if defined(TARGET_PPC64)
1654#define GEN_PPC64_R2(name, opc1, opc2) \
e8eaa2c0 1655static void glue(gen_, name##0)(DisasContext *ctx) \
d9bce9d9
JM
1656{ \
1657 gen_##name(ctx, 0); \
1658} \
e8eaa2c0
BS
1659 \
1660static void glue(gen_, name##1)(DisasContext *ctx) \
d9bce9d9
JM
1661{ \
1662 gen_##name(ctx, 1); \
1663}
1664#define GEN_PPC64_R4(name, opc1, opc2) \
e8eaa2c0 1665static void glue(gen_, name##0)(DisasContext *ctx) \
d9bce9d9
JM
1666{ \
1667 gen_##name(ctx, 0, 0); \
1668} \
e8eaa2c0
BS
1669 \
1670static void glue(gen_, name##1)(DisasContext *ctx) \
d9bce9d9
JM
1671{ \
1672 gen_##name(ctx, 0, 1); \
1673} \
e8eaa2c0
BS
1674 \
1675static void glue(gen_, name##2)(DisasContext *ctx) \
d9bce9d9
JM
1676{ \
1677 gen_##name(ctx, 1, 0); \
1678} \
e8eaa2c0
BS
1679 \
1680static void glue(gen_, name##3)(DisasContext *ctx) \
d9bce9d9
JM
1681{ \
1682 gen_##name(ctx, 1, 1); \
1683}
51789c41 1684
636aa200
BS
1685static inline void gen_rldinm(DisasContext *ctx, uint32_t mb, uint32_t me,
1686 uint32_t sh)
51789c41 1687{
d03ef511
AJ
1688 if (likely(sh != 0 && mb == 0 && me == (63 - sh))) {
1689 tcg_gen_shli_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)], sh);
1690 } else if (likely(sh != 0 && me == 63 && sh == (64 - mb))) {
1691 tcg_gen_shri_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)], mb);
1692 } else {
a7812ae4 1693 TCGv t0 = tcg_temp_new();
54843a58 1694 tcg_gen_rotli_tl(t0, cpu_gpr[rS(ctx->opcode)], sh);
d03ef511 1695 if (likely(mb == 0 && me == 63)) {
54843a58 1696 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], t0);
d03ef511
AJ
1697 } else {
1698 tcg_gen_andi_tl(cpu_gpr[rA(ctx->opcode)], t0, MASK(mb, me));
51789c41 1699 }
d03ef511 1700 tcg_temp_free(t0);
51789c41 1701 }
51789c41 1702 if (unlikely(Rc(ctx->opcode) != 0))
d03ef511 1703 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
51789c41 1704}
d9bce9d9 1705/* rldicl - rldicl. */
636aa200 1706static inline void gen_rldicl(DisasContext *ctx, int mbn, int shn)
d9bce9d9 1707{
51789c41 1708 uint32_t sh, mb;
d9bce9d9 1709
9d53c753
JM
1710 sh = SH(ctx->opcode) | (shn << 5);
1711 mb = MB(ctx->opcode) | (mbn << 5);
51789c41 1712 gen_rldinm(ctx, mb, 63, sh);
d9bce9d9 1713}
51789c41 1714GEN_PPC64_R4(rldicl, 0x1E, 0x00);
d9bce9d9 1715/* rldicr - rldicr. */
636aa200 1716static inline void gen_rldicr(DisasContext *ctx, int men, int shn)
d9bce9d9 1717{
51789c41 1718 uint32_t sh, me;
d9bce9d9 1719
9d53c753
JM
1720 sh = SH(ctx->opcode) | (shn << 5);
1721 me = MB(ctx->opcode) | (men << 5);
51789c41 1722 gen_rldinm(ctx, 0, me, sh);
d9bce9d9 1723}
51789c41 1724GEN_PPC64_R4(rldicr, 0x1E, 0x02);
d9bce9d9 1725/* rldic - rldic. */
636aa200 1726static inline void gen_rldic(DisasContext *ctx, int mbn, int shn)
d9bce9d9 1727{
51789c41 1728 uint32_t sh, mb;
d9bce9d9 1729
9d53c753
JM
1730 sh = SH(ctx->opcode) | (shn << 5);
1731 mb = MB(ctx->opcode) | (mbn << 5);
51789c41
JM
1732 gen_rldinm(ctx, mb, 63 - sh, sh);
1733}
1734GEN_PPC64_R4(rldic, 0x1E, 0x04);
1735
636aa200 1736static inline void gen_rldnm(DisasContext *ctx, uint32_t mb, uint32_t me)
51789c41 1737{
54843a58 1738 TCGv t0;
d03ef511
AJ
1739
1740 mb = MB(ctx->opcode);
1741 me = ME(ctx->opcode);
a7812ae4 1742 t0 = tcg_temp_new();
d03ef511 1743 tcg_gen_andi_tl(t0, cpu_gpr[rB(ctx->opcode)], 0x3f);
54843a58 1744 tcg_gen_rotl_tl(t0, cpu_gpr[rS(ctx->opcode)], t0);
51789c41 1745 if (unlikely(mb != 0 || me != 63)) {
54843a58
AJ
1746 tcg_gen_andi_tl(cpu_gpr[rA(ctx->opcode)], t0, MASK(mb, me));
1747 } else {
1748 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], t0);
1749 }
1750 tcg_temp_free(t0);
51789c41 1751 if (unlikely(Rc(ctx->opcode) != 0))
d03ef511 1752 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
d9bce9d9 1753}
51789c41 1754
d9bce9d9 1755/* rldcl - rldcl. */
636aa200 1756static inline void gen_rldcl(DisasContext *ctx, int mbn)
d9bce9d9 1757{
51789c41 1758 uint32_t mb;
d9bce9d9 1759
9d53c753 1760 mb = MB(ctx->opcode) | (mbn << 5);
51789c41 1761 gen_rldnm(ctx, mb, 63);
d9bce9d9 1762}
36081602 1763GEN_PPC64_R2(rldcl, 0x1E, 0x08);
d9bce9d9 1764/* rldcr - rldcr. */
636aa200 1765static inline void gen_rldcr(DisasContext *ctx, int men)
d9bce9d9 1766{
51789c41 1767 uint32_t me;
d9bce9d9 1768
9d53c753 1769 me = MB(ctx->opcode) | (men << 5);
51789c41 1770 gen_rldnm(ctx, 0, me);
d9bce9d9 1771}
36081602 1772GEN_PPC64_R2(rldcr, 0x1E, 0x09);
d9bce9d9 1773/* rldimi - rldimi. */
636aa200 1774static inline void gen_rldimi(DisasContext *ctx, int mbn, int shn)
d9bce9d9 1775{
271a916e 1776 uint32_t sh, mb, me;
d9bce9d9 1777
9d53c753
JM
1778 sh = SH(ctx->opcode) | (shn << 5);
1779 mb = MB(ctx->opcode) | (mbn << 5);
271a916e 1780 me = 63 - sh;
d03ef511
AJ
1781 if (unlikely(sh == 0 && mb == 0)) {
1782 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)]);
1783 } else {
1784 TCGv t0, t1;
1785 target_ulong mask;
1786
a7812ae4 1787 t0 = tcg_temp_new();
54843a58 1788 tcg_gen_rotli_tl(t0, cpu_gpr[rS(ctx->opcode)], sh);
a7812ae4 1789 t1 = tcg_temp_new();
d03ef511
AJ
1790 mask = MASK(mb, me);
1791 tcg_gen_andi_tl(t0, t0, mask);
1792 tcg_gen_andi_tl(t1, cpu_gpr[rA(ctx->opcode)], ~mask);
1793 tcg_gen_or_tl(cpu_gpr[rA(ctx->opcode)], t0, t1);
1794 tcg_temp_free(t0);
1795 tcg_temp_free(t1);
51789c41 1796 }
51789c41 1797 if (unlikely(Rc(ctx->opcode) != 0))
d03ef511 1798 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
d9bce9d9 1799}
36081602 1800GEN_PPC64_R4(rldimi, 0x1E, 0x06);
d9bce9d9
JM
1801#endif
1802
79aceca5 1803/*** Integer shift ***/
99e300ef 1804
54623277 1805/* slw & slw. */
99e300ef 1806static void gen_slw(DisasContext *ctx)
26d67362 1807{
7fd6bf7d 1808 TCGv t0, t1;
26d67362 1809
7fd6bf7d
AJ
1810 t0 = tcg_temp_new();
1811 /* AND rS with a mask that is 0 when rB >= 0x20 */
1812#if defined(TARGET_PPC64)
1813 tcg_gen_shli_tl(t0, cpu_gpr[rB(ctx->opcode)], 0x3a);
1814 tcg_gen_sari_tl(t0, t0, 0x3f);
1815#else
1816 tcg_gen_shli_tl(t0, cpu_gpr[rB(ctx->opcode)], 0x1a);
1817 tcg_gen_sari_tl(t0, t0, 0x1f);
1818#endif
1819 tcg_gen_andc_tl(t0, cpu_gpr[rS(ctx->opcode)], t0);
1820 t1 = tcg_temp_new();
1821 tcg_gen_andi_tl(t1, cpu_gpr[rB(ctx->opcode)], 0x1f);
1822 tcg_gen_shl_tl(cpu_gpr[rA(ctx->opcode)], t0, t1);
1823 tcg_temp_free(t1);
fea0c503 1824 tcg_temp_free(t0);
7fd6bf7d 1825 tcg_gen_ext32u_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
26d67362
AJ
1826 if (unlikely(Rc(ctx->opcode) != 0))
1827 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
1828}
99e300ef 1829
54623277 1830/* sraw & sraw. */
99e300ef 1831static void gen_sraw(DisasContext *ctx)
26d67362 1832{
a7812ae4
PB
1833 gen_helper_sraw(cpu_gpr[rA(ctx->opcode)],
1834 cpu_gpr[rS(ctx->opcode)], cpu_gpr[rB(ctx->opcode)]);
26d67362
AJ
1835 if (unlikely(Rc(ctx->opcode) != 0))
1836 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
1837}
99e300ef 1838
54623277 1839/* srawi & srawi. */
99e300ef 1840static void gen_srawi(DisasContext *ctx)
79aceca5 1841{
26d67362
AJ
1842 int sh = SH(ctx->opcode);
1843 if (sh != 0) {
1844 int l1, l2;
fea0c503 1845 TCGv t0;
26d67362
AJ
1846 l1 = gen_new_label();
1847 l2 = gen_new_label();
a7812ae4 1848 t0 = tcg_temp_local_new();
fea0c503
AJ
1849 tcg_gen_ext32s_tl(t0, cpu_gpr[rS(ctx->opcode)]);
1850 tcg_gen_brcondi_tl(TCG_COND_GE, t0, 0, l1);
1851 tcg_gen_andi_tl(t0, cpu_gpr[rS(ctx->opcode)], (1ULL << sh) - 1);
1852 tcg_gen_brcondi_tl(TCG_COND_EQ, t0, 0, l1);
269f3e95 1853 tcg_gen_ori_tl(cpu_xer, cpu_xer, 1 << XER_CA);
26d67362
AJ
1854 tcg_gen_br(l2);
1855 gen_set_label(l1);
269f3e95 1856 tcg_gen_andi_tl(cpu_xer, cpu_xer, ~(1 << XER_CA));
26d67362 1857 gen_set_label(l2);
fea0c503
AJ
1858 tcg_gen_ext32s_tl(t0, cpu_gpr[rS(ctx->opcode)]);
1859 tcg_gen_sari_tl(cpu_gpr[rA(ctx->opcode)], t0, sh);
1860 tcg_temp_free(t0);
26d67362
AJ
1861 } else {
1862 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)]);
269f3e95 1863 tcg_gen_andi_tl(cpu_xer, cpu_xer, ~(1 << XER_CA));
d9bce9d9 1864 }
76a66253 1865 if (unlikely(Rc(ctx->opcode) != 0))
26d67362 1866 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
79aceca5 1867}
99e300ef 1868
54623277 1869/* srw & srw. */
99e300ef 1870static void gen_srw(DisasContext *ctx)
26d67362 1871{
fea0c503 1872 TCGv t0, t1;
d9bce9d9 1873
7fd6bf7d
AJ
1874 t0 = tcg_temp_new();
1875 /* AND rS with a mask that is 0 when rB >= 0x20 */
1876#if defined(TARGET_PPC64)
1877 tcg_gen_shli_tl(t0, cpu_gpr[rB(ctx->opcode)], 0x3a);
1878 tcg_gen_sari_tl(t0, t0, 0x3f);
1879#else
1880 tcg_gen_shli_tl(t0, cpu_gpr[rB(ctx->opcode)], 0x1a);
1881 tcg_gen_sari_tl(t0, t0, 0x1f);
1882#endif
1883 tcg_gen_andc_tl(t0, cpu_gpr[rS(ctx->opcode)], t0);
1884 tcg_gen_ext32u_tl(t0, t0);
a7812ae4 1885 t1 = tcg_temp_new();
7fd6bf7d
AJ
1886 tcg_gen_andi_tl(t1, cpu_gpr[rB(ctx->opcode)], 0x1f);
1887 tcg_gen_shr_tl(cpu_gpr[rA(ctx->opcode)], t0, t1);
fea0c503 1888 tcg_temp_free(t1);
fea0c503 1889 tcg_temp_free(t0);
26d67362
AJ
1890 if (unlikely(Rc(ctx->opcode) != 0))
1891 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
1892}
54623277 1893
d9bce9d9
JM
1894#if defined(TARGET_PPC64)
1895/* sld & sld. */
99e300ef 1896static void gen_sld(DisasContext *ctx)
26d67362 1897{
7fd6bf7d 1898 TCGv t0, t1;
26d67362 1899
7fd6bf7d
AJ
1900 t0 = tcg_temp_new();
1901 /* AND rS with a mask that is 0 when rB >= 0x40 */
1902 tcg_gen_shli_tl(t0, cpu_gpr[rB(ctx->opcode)], 0x39);
1903 tcg_gen_sari_tl(t0, t0, 0x3f);
1904 tcg_gen_andc_tl(t0, cpu_gpr[rS(ctx->opcode)], t0);
1905 t1 = tcg_temp_new();
1906 tcg_gen_andi_tl(t1, cpu_gpr[rB(ctx->opcode)], 0x3f);
1907 tcg_gen_shl_tl(cpu_gpr[rA(ctx->opcode)], t0, t1);
1908 tcg_temp_free(t1);
fea0c503 1909 tcg_temp_free(t0);
26d67362
AJ
1910 if (unlikely(Rc(ctx->opcode) != 0))
1911 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
1912}
99e300ef 1913
54623277 1914/* srad & srad. */
99e300ef 1915static void gen_srad(DisasContext *ctx)
26d67362 1916{
a7812ae4
PB
1917 gen_helper_srad(cpu_gpr[rA(ctx->opcode)],
1918 cpu_gpr[rS(ctx->opcode)], cpu_gpr[rB(ctx->opcode)]);
26d67362
AJ
1919 if (unlikely(Rc(ctx->opcode) != 0))
1920 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
1921}
d9bce9d9 1922/* sradi & sradi. */
636aa200 1923static inline void gen_sradi(DisasContext *ctx, int n)
d9bce9d9 1924{
26d67362 1925 int sh = SH(ctx->opcode) + (n << 5);
d9bce9d9 1926 if (sh != 0) {
26d67362 1927 int l1, l2;
fea0c503 1928 TCGv t0;
26d67362
AJ
1929 l1 = gen_new_label();
1930 l2 = gen_new_label();
a7812ae4 1931 t0 = tcg_temp_local_new();
26d67362 1932 tcg_gen_brcondi_tl(TCG_COND_GE, cpu_gpr[rS(ctx->opcode)], 0, l1);
fea0c503
AJ
1933 tcg_gen_andi_tl(t0, cpu_gpr[rS(ctx->opcode)], (1ULL << sh) - 1);
1934 tcg_gen_brcondi_tl(TCG_COND_EQ, t0, 0, l1);
269f3e95 1935 tcg_gen_ori_tl(cpu_xer, cpu_xer, 1 << XER_CA);
26d67362
AJ
1936 tcg_gen_br(l2);
1937 gen_set_label(l1);
269f3e95 1938 tcg_gen_andi_tl(cpu_xer, cpu_xer, ~(1 << XER_CA));
26d67362 1939 gen_set_label(l2);
a9730017 1940 tcg_temp_free(t0);
26d67362
AJ
1941 tcg_gen_sari_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)], sh);
1942 } else {
1943 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)]);
269f3e95 1944 tcg_gen_andi_tl(cpu_xer, cpu_xer, ~(1 << XER_CA));
d9bce9d9 1945 }
d9bce9d9 1946 if (unlikely(Rc(ctx->opcode) != 0))
26d67362 1947 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
d9bce9d9 1948}
e8eaa2c0
BS
1949
1950static void gen_sradi0(DisasContext *ctx)
d9bce9d9
JM
1951{
1952 gen_sradi(ctx, 0);
1953}
e8eaa2c0
BS
1954
1955static void gen_sradi1(DisasContext *ctx)
d9bce9d9
JM
1956{
1957 gen_sradi(ctx, 1);
1958}
99e300ef 1959
54623277 1960/* srd & srd. */
99e300ef 1961static void gen_srd(DisasContext *ctx)
26d67362 1962{
7fd6bf7d 1963 TCGv t0, t1;
26d67362 1964
7fd6bf7d
AJ
1965 t0 = tcg_temp_new();
1966 /* AND rS with a mask that is 0 when rB >= 0x40 */
1967 tcg_gen_shli_tl(t0, cpu_gpr[rB(ctx->opcode)], 0x39);
1968 tcg_gen_sari_tl(t0, t0, 0x3f);
1969 tcg_gen_andc_tl(t0, cpu_gpr[rS(ctx->opcode)], t0);
1970 t1 = tcg_temp_new();
1971 tcg_gen_andi_tl(t1, cpu_gpr[rB(ctx->opcode)], 0x3f);
1972 tcg_gen_shr_tl(cpu_gpr[rA(ctx->opcode)], t0, t1);
1973 tcg_temp_free(t1);
fea0c503 1974 tcg_temp_free(t0);
26d67362
AJ
1975 if (unlikely(Rc(ctx->opcode) != 0))
1976 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
1977}
d9bce9d9 1978#endif
79aceca5
FB
1979
1980/*** Floating-Point arithmetic ***/
7c58044c 1981#define _GEN_FLOAT_ACB(name, op, op1, op2, isfloat, set_fprf, type) \
99e300ef 1982static void gen_f##name(DisasContext *ctx) \
9a64fbe4 1983{ \
76a66253 1984 if (unlikely(!ctx->fpu_enabled)) { \
e06fcd75 1985 gen_exception(ctx, POWERPC_EXCP_FPU); \
3cc62370
FB
1986 return; \
1987 } \
eb44b959
AJ
1988 /* NIP cannot be restored if the memory exception comes from an helper */ \
1989 gen_update_nip(ctx, ctx->nip - 4); \
7c58044c 1990 gen_reset_fpstatus(); \
af12906f
AJ
1991 gen_helper_f##op(cpu_fpr[rD(ctx->opcode)], cpu_fpr[rA(ctx->opcode)], \
1992 cpu_fpr[rC(ctx->opcode)], cpu_fpr[rB(ctx->opcode)]); \
4ecc3190 1993 if (isfloat) { \
af12906f 1994 gen_helper_frsp(cpu_fpr[rD(ctx->opcode)], cpu_fpr[rD(ctx->opcode)]); \
4ecc3190 1995 } \
af12906f
AJ
1996 gen_compute_fprf(cpu_fpr[rD(ctx->opcode)], set_fprf, \
1997 Rc(ctx->opcode) != 0); \
9a64fbe4
FB
1998}
1999
7c58044c
JM
2000#define GEN_FLOAT_ACB(name, op2, set_fprf, type) \
2001_GEN_FLOAT_ACB(name, name, 0x3F, op2, 0, set_fprf, type); \
2002_GEN_FLOAT_ACB(name##s, name, 0x3B, op2, 1, set_fprf, type);
9a64fbe4 2003
7c58044c 2004#define _GEN_FLOAT_AB(name, op, op1, op2, inval, isfloat, set_fprf, type) \
99e300ef 2005static void gen_f##name(DisasContext *ctx) \
9a64fbe4 2006{ \
76a66253 2007 if (unlikely(!ctx->fpu_enabled)) { \
e06fcd75 2008 gen_exception(ctx, POWERPC_EXCP_FPU); \
3cc62370
FB
2009 return; \
2010 } \
eb44b959
AJ
2011 /* NIP cannot be restored if the memory exception comes from an helper */ \
2012 gen_update_nip(ctx, ctx->nip - 4); \
7c58044c 2013 gen_reset_fpstatus(); \
af12906f
AJ
2014 gen_helper_f##op(cpu_fpr[rD(ctx->opcode)], cpu_fpr[rA(ctx->opcode)], \
2015 cpu_fpr[rB(ctx->opcode)]); \
4ecc3190 2016 if (isfloat) { \
af12906f 2017 gen_helper_frsp(cpu_fpr[rD(ctx->opcode)], cpu_fpr[rD(ctx->opcode)]); \
4ecc3190 2018 } \
af12906f
AJ
2019 gen_compute_fprf(cpu_fpr[rD(ctx->opcode)], \
2020 set_fprf, Rc(ctx->opcode) != 0); \
9a64fbe4 2021}
7c58044c
JM
2022#define GEN_FLOAT_AB(name, op2, inval, set_fprf, type) \
2023_GEN_FLOAT_AB(name, name, 0x3F, op2, inval, 0, set_fprf, type); \
2024_GEN_FLOAT_AB(name##s, name, 0x3B, op2, inval, 1, set_fprf, type);
9a64fbe4 2025
7c58044c 2026#define _GEN_FLOAT_AC(name, op, op1, op2, inval, isfloat, set_fprf, type) \
99e300ef 2027static void gen_f##name(DisasContext *ctx) \
9a64fbe4 2028{ \
76a66253 2029 if (unlikely(!ctx->fpu_enabled)) { \
e06fcd75 2030 gen_exception(ctx, POWERPC_EXCP_FPU); \
3cc62370
FB
2031 return; \
2032 } \
eb44b959
AJ
2033 /* NIP cannot be restored if the memory exception comes from an helper */ \
2034 gen_update_nip(ctx, ctx->nip - 4); \
7c58044c 2035 gen_reset_fpstatus(); \
af12906f
AJ
2036 gen_helper_f##op(cpu_fpr[rD(ctx->opcode)], cpu_fpr[rA(ctx->opcode)], \
2037 cpu_fpr[rC(ctx->opcode)]); \
4ecc3190 2038 if (isfloat) { \
af12906f 2039 gen_helper_frsp(cpu_fpr[rD(ctx->opcode)], cpu_fpr[rD(ctx->opcode)]); \
4ecc3190 2040 } \
af12906f
AJ
2041 gen_compute_fprf(cpu_fpr[rD(ctx->opcode)], \
2042 set_fprf, Rc(ctx->opcode) != 0); \
9a64fbe4 2043}
7c58044c
JM
2044#define GEN_FLOAT_AC(name, op2, inval, set_fprf, type) \
2045_GEN_FLOAT_AC(name, name, 0x3F, op2, inval, 0, set_fprf, type); \
2046_GEN_FLOAT_AC(name##s, name, 0x3B, op2, inval, 1, set_fprf, type);
9a64fbe4 2047
7c58044c 2048#define GEN_FLOAT_B(name, op2, op3, set_fprf, type) \
99e300ef 2049static void gen_f##name(DisasContext *ctx) \
9a64fbe4 2050{ \
76a66253 2051 if (unlikely(!ctx->fpu_enabled)) { \
e06fcd75 2052 gen_exception(ctx, POWERPC_EXCP_FPU); \
3cc62370
FB
2053 return; \
2054 } \
eb44b959
AJ
2055 /* NIP cannot be restored if the memory exception comes from an helper */ \
2056 gen_update_nip(ctx, ctx->nip - 4); \
7c58044c 2057 gen_reset_fpstatus(); \
af12906f
AJ
2058 gen_helper_f##name(cpu_fpr[rD(ctx->opcode)], cpu_fpr[rB(ctx->opcode)]); \
2059 gen_compute_fprf(cpu_fpr[rD(ctx->opcode)], \
2060 set_fprf, Rc(ctx->opcode) != 0); \
79aceca5
FB
2061}
2062
7c58044c 2063#define GEN_FLOAT_BS(name, op1, op2, set_fprf, type) \
99e300ef 2064static void gen_f##name(DisasContext *ctx) \
9a64fbe4 2065{ \
76a66253 2066 if (unlikely(!ctx->fpu_enabled)) { \
e06fcd75 2067 gen_exception(ctx, POWERPC_EXCP_FPU); \
3cc62370
FB
2068 return; \
2069 } \
eb44b959
AJ
2070 /* NIP cannot be restored if the memory exception comes from an helper */ \
2071 gen_update_nip(ctx, ctx->nip - 4); \
7c58044c 2072 gen_reset_fpstatus(); \
af12906f
AJ
2073 gen_helper_f##name(cpu_fpr[rD(ctx->opcode)], cpu_fpr[rB(ctx->opcode)]); \
2074 gen_compute_fprf(cpu_fpr[rD(ctx->opcode)], \
2075 set_fprf, Rc(ctx->opcode) != 0); \
79aceca5
FB
2076}
2077
9a64fbe4 2078/* fadd - fadds */
7c58044c 2079GEN_FLOAT_AB(add, 0x15, 0x000007C0, 1, PPC_FLOAT);
4ecc3190 2080/* fdiv - fdivs */
7c58044c 2081GEN_FLOAT_AB(div, 0x12, 0x000007C0, 1, PPC_FLOAT);
4ecc3190 2082/* fmul - fmuls */
7c58044c 2083GEN_FLOAT_AC(mul, 0x19, 0x0000F800, 1, PPC_FLOAT);
79aceca5 2084
d7e4b87e 2085/* fre */
7c58044c 2086GEN_FLOAT_BS(re, 0x3F, 0x18, 1, PPC_FLOAT_EXT);
d7e4b87e 2087
a750fc0b 2088/* fres */
7c58044c 2089GEN_FLOAT_BS(res, 0x3B, 0x18, 1, PPC_FLOAT_FRES);
79aceca5 2090
a750fc0b 2091/* frsqrte */
7c58044c
JM
2092GEN_FLOAT_BS(rsqrte, 0x3F, 0x1A, 1, PPC_FLOAT_FRSQRTE);
2093
2094/* frsqrtes */
99e300ef 2095static void gen_frsqrtes(DisasContext *ctx)
7c58044c 2096{
af12906f 2097 if (unlikely(!ctx->fpu_enabled)) {
e06fcd75 2098 gen_exception(ctx, POWERPC_EXCP_FPU);
af12906f
AJ
2099 return;
2100 }
eb44b959
AJ
2101 /* NIP cannot be restored if the memory exception comes from an helper */
2102 gen_update_nip(ctx, ctx->nip - 4);
af12906f
AJ
2103 gen_reset_fpstatus();
2104 gen_helper_frsqrte(cpu_fpr[rD(ctx->opcode)], cpu_fpr[rB(ctx->opcode)]);
2105 gen_helper_frsp(cpu_fpr[rD(ctx->opcode)], cpu_fpr[rD(ctx->opcode)]);
2106 gen_compute_fprf(cpu_fpr[rD(ctx->opcode)], 1, Rc(ctx->opcode) != 0);
7c58044c 2107}
79aceca5 2108
a750fc0b 2109/* fsel */
7c58044c 2110_GEN_FLOAT_ACB(sel, sel, 0x3F, 0x17, 0, 0, PPC_FLOAT_FSEL);
4ecc3190 2111/* fsub - fsubs */
7c58044c 2112GEN_FLOAT_AB(sub, 0x14, 0x000007C0, 1, PPC_FLOAT);
79aceca5 2113/* Optional: */
99e300ef 2114
54623277 2115/* fsqrt */
99e300ef 2116static void gen_fsqrt(DisasContext *ctx)
c7d344af 2117{
76a66253 2118 if (unlikely(!ctx->fpu_enabled)) {
e06fcd75 2119 gen_exception(ctx, POWERPC_EXCP_FPU);
c7d344af
FB
2120 return;
2121 }
eb44b959
AJ
2122 /* NIP cannot be restored if the memory exception comes from an helper */
2123 gen_update_nip(ctx, ctx->nip - 4);
7c58044c 2124 gen_reset_fpstatus();
af12906f
AJ
2125 gen_helper_fsqrt(cpu_fpr[rD(ctx->opcode)], cpu_fpr[rB(ctx->opcode)]);
2126 gen_compute_fprf(cpu_fpr[rD(ctx->opcode)], 1, Rc(ctx->opcode) != 0);
c7d344af 2127}
79aceca5 2128
99e300ef 2129static void gen_fsqrts(DisasContext *ctx)
79aceca5 2130{
76a66253 2131 if (unlikely(!ctx->fpu_enabled)) {
e06fcd75 2132 gen_exception(ctx, POWERPC_EXCP_FPU);
3cc62370
FB
2133 return;
2134 }
eb44b959
AJ
2135 /* NIP cannot be restored if the memory exception comes from an helper */
2136 gen_update_nip(ctx, ctx->nip - 4);
7c58044c 2137 gen_reset_fpstatus();
af12906f
AJ
2138 gen_helper_fsqrt(cpu_fpr[rD(ctx->opcode)], cpu_fpr[rB(ctx->opcode)]);
2139 gen_helper_frsp(cpu_fpr[rD(ctx->opcode)], cpu_fpr[rD(ctx->opcode)]);
2140 gen_compute_fprf(cpu_fpr[rD(ctx->opcode)], 1, Rc(ctx->opcode) != 0);
79aceca5
FB
2141}
2142
2143/*** Floating-Point multiply-and-add ***/
4ecc3190 2144/* fmadd - fmadds */
7c58044c 2145GEN_FLOAT_ACB(madd, 0x1D, 1, PPC_FLOAT);
4ecc3190 2146/* fmsub - fmsubs */
7c58044c 2147GEN_FLOAT_ACB(msub, 0x1C, 1, PPC_FLOAT);
4ecc3190 2148/* fnmadd - fnmadds */
7c58044c 2149GEN_FLOAT_ACB(nmadd, 0x1F, 1, PPC_FLOAT);
4ecc3190 2150/* fnmsub - fnmsubs */
7c58044c 2151GEN_FLOAT_ACB(nmsub, 0x1E, 1, PPC_FLOAT);
79aceca5
FB
2152
2153/*** Floating-Point round & convert ***/
2154/* fctiw */
7c58044c 2155GEN_FLOAT_B(ctiw, 0x0E, 0x00, 0, PPC_FLOAT);
79aceca5 2156/* fctiwz */
7c58044c 2157GEN_FLOAT_B(ctiwz, 0x0F, 0x00, 0, PPC_FLOAT);
79aceca5 2158/* frsp */
7c58044c 2159GEN_FLOAT_B(rsp, 0x0C, 0x00, 1, PPC_FLOAT);
426613db
JM
2160#if defined(TARGET_PPC64)
2161/* fcfid */
7c58044c 2162GEN_FLOAT_B(cfid, 0x0E, 0x1A, 1, PPC_64B);
426613db 2163/* fctid */
7c58044c 2164GEN_FLOAT_B(ctid, 0x0E, 0x19, 0, PPC_64B);
426613db 2165/* fctidz */
7c58044c 2166GEN_FLOAT_B(ctidz, 0x0F, 0x19, 0, PPC_64B);
426613db 2167#endif
79aceca5 2168
d7e4b87e 2169/* frin */
7c58044c 2170GEN_FLOAT_B(rin, 0x08, 0x0C, 1, PPC_FLOAT_EXT);
d7e4b87e 2171/* friz */
7c58044c 2172GEN_FLOAT_B(riz, 0x08, 0x0D, 1, PPC_FLOAT_EXT);
d7e4b87e 2173/* frip */
7c58044c 2174GEN_FLOAT_B(rip, 0x08, 0x0E, 1, PPC_FLOAT_EXT);
d7e4b87e 2175/* frim */
7c58044c 2176GEN_FLOAT_B(rim, 0x08, 0x0F, 1, PPC_FLOAT_EXT);
d7e4b87e 2177
79aceca5 2178/*** Floating-Point compare ***/
99e300ef 2179
54623277 2180/* fcmpo */
99e300ef 2181static void gen_fcmpo(DisasContext *ctx)
79aceca5 2182{
330c483b 2183 TCGv_i32 crf;
76a66253 2184 if (unlikely(!ctx->fpu_enabled)) {
e06fcd75 2185 gen_exception(ctx, POWERPC_EXCP_FPU);
3cc62370
FB
2186 return;
2187 }
eb44b959
AJ
2188 /* NIP cannot be restored if the memory exception comes from an helper */
2189 gen_update_nip(ctx, ctx->nip - 4);
7c58044c 2190 gen_reset_fpstatus();
9a819377
AJ
2191 crf = tcg_const_i32(crfD(ctx->opcode));
2192 gen_helper_fcmpo(cpu_fpr[rA(ctx->opcode)], cpu_fpr[rB(ctx->opcode)], crf);
330c483b 2193 tcg_temp_free_i32(crf);
af12906f 2194 gen_helper_float_check_status();
79aceca5
FB
2195}
2196
2197/* fcmpu */
99e300ef 2198static void gen_fcmpu(DisasContext *ctx)
79aceca5 2199{
330c483b 2200 TCGv_i32 crf;
76a66253 2201 if (unlikely(!ctx->fpu_enabled)) {
e06fcd75 2202 gen_exception(ctx, POWERPC_EXCP_FPU);
3cc62370
FB
2203 return;
2204 }
eb44b959
AJ
2205 /* NIP cannot be restored if the memory exception comes from an helper */
2206 gen_update_nip(ctx, ctx->nip - 4);
7c58044c 2207 gen_reset_fpstatus();
9a819377
AJ
2208 crf = tcg_const_i32(crfD(ctx->opcode));
2209 gen_helper_fcmpu(cpu_fpr[rA(ctx->opcode)], cpu_fpr[rB(ctx->opcode)], crf);
330c483b 2210 tcg_temp_free_i32(crf);
af12906f 2211 gen_helper_float_check_status();
79aceca5
FB
2212}
2213
9a64fbe4
FB
2214/*** Floating-point move ***/
2215/* fabs */
7c58044c
JM
2216/* XXX: beware that fabs never checks for NaNs nor update FPSCR */
2217GEN_FLOAT_B(abs, 0x08, 0x08, 0, PPC_FLOAT);
9a64fbe4
FB
2218
2219/* fmr - fmr. */
7c58044c 2220/* XXX: beware that fmr never checks for NaNs nor update FPSCR */
99e300ef 2221static void gen_fmr(DisasContext *ctx)
9a64fbe4 2222{
76a66253 2223 if (unlikely(!ctx->fpu_enabled)) {
e06fcd75 2224 gen_exception(ctx, POWERPC_EXCP_FPU);
3cc62370
FB
2225 return;
2226 }
af12906f
AJ
2227 tcg_gen_mov_i64(cpu_fpr[rD(ctx->opcode)], cpu_fpr[rB(ctx->opcode)]);
2228 gen_compute_fprf(cpu_fpr[rD(ctx->opcode)], 0, Rc(ctx->opcode) != 0);
9a64fbe4
FB
2229}
2230
2231/* fnabs */
7c58044c
JM
2232/* XXX: beware that fnabs never checks for NaNs nor update FPSCR */
2233GEN_FLOAT_B(nabs, 0x08, 0x04, 0, PPC_FLOAT);
9a64fbe4 2234/* fneg */
7c58044c
JM
2235/* XXX: beware that fneg never checks for NaNs nor update FPSCR */
2236GEN_FLOAT_B(neg, 0x08, 0x01, 0, PPC_FLOAT);
9a64fbe4 2237
79aceca5 2238/*** Floating-Point status & ctrl register ***/
99e300ef 2239
54623277 2240/* mcrfs */
99e300ef 2241static void gen_mcrfs(DisasContext *ctx)
79aceca5 2242{
7c58044c
JM
2243 int bfa;
2244
76a66253 2245 if (unlikely(!ctx->fpu_enabled)) {
e06fcd75 2246 gen_exception(ctx, POWERPC_EXCP_FPU);
3cc62370
FB
2247 return;
2248 }
7c58044c 2249 bfa = 4 * (7 - crfS(ctx->opcode));
e1571908
AJ
2250 tcg_gen_shri_i32(cpu_crf[crfD(ctx->opcode)], cpu_fpscr, bfa);
2251 tcg_gen_andi_i32(cpu_crf[crfD(ctx->opcode)], cpu_crf[crfD(ctx->opcode)], 0xf);
af12906f 2252 tcg_gen_andi_i32(cpu_fpscr, cpu_fpscr, ~(0xF << bfa));
79aceca5
FB
2253}
2254
2255/* mffs */
99e300ef 2256static void gen_mffs(DisasContext *ctx)
79aceca5 2257{
76a66253 2258 if (unlikely(!ctx->fpu_enabled)) {
e06fcd75 2259 gen_exception(ctx, POWERPC_EXCP_FPU);
3cc62370
FB
2260 return;
2261 }
7c58044c 2262 gen_reset_fpstatus();
af12906f
AJ
2263 tcg_gen_extu_i32_i64(cpu_fpr[rD(ctx->opcode)], cpu_fpscr);
2264 gen_compute_fprf(cpu_fpr[rD(ctx->opcode)], 0, Rc(ctx->opcode) != 0);
79aceca5
FB
2265}
2266
2267/* mtfsb0 */
99e300ef 2268static void gen_mtfsb0(DisasContext *ctx)
79aceca5 2269{
fb0eaffc 2270 uint8_t crb;
3b46e624 2271
76a66253 2272 if (unlikely(!ctx->fpu_enabled)) {
e06fcd75 2273 gen_exception(ctx, POWERPC_EXCP_FPU);
3cc62370
FB
2274 return;
2275 }
6e35d524 2276 crb = 31 - crbD(ctx->opcode);
7c58044c 2277 gen_reset_fpstatus();
6e35d524 2278 if (likely(crb != FPSCR_FEX && crb != FPSCR_VX)) {
eb44b959
AJ
2279 TCGv_i32 t0;
2280 /* NIP cannot be restored if the memory exception comes from an helper */
2281 gen_update_nip(ctx, ctx->nip - 4);
2282 t0 = tcg_const_i32(crb);
6e35d524
AJ
2283 gen_helper_fpscr_clrbit(t0);
2284 tcg_temp_free_i32(t0);
2285 }
7c58044c 2286 if (unlikely(Rc(ctx->opcode) != 0)) {
e1571908 2287 tcg_gen_shri_i32(cpu_crf[1], cpu_fpscr, FPSCR_OX);
7c58044c 2288 }
79aceca5
FB
2289}
2290
2291/* mtfsb1 */
99e300ef 2292static void gen_mtfsb1(DisasContext *ctx)
79aceca5 2293{
fb0eaffc 2294 uint8_t crb;
3b46e624 2295
76a66253 2296 if (unlikely(!ctx->fpu_enabled)) {
e06fcd75 2297 gen_exception(ctx, POWERPC_EXCP_FPU);
3cc62370
FB
2298 return;
2299 }
6e35d524 2300 crb = 31 - crbD(ctx->opcode);
7c58044c
JM
2301 gen_reset_fpstatus();
2302 /* XXX: we pretend we can only do IEEE floating-point computations */
af12906f 2303 if (likely(crb != FPSCR_FEX && crb != FPSCR_VX && crb != FPSCR_NI)) {
eb44b959
AJ
2304 TCGv_i32 t0;
2305 /* NIP cannot be restored if the memory exception comes from an helper */
2306 gen_update_nip(ctx, ctx->nip - 4);
2307 t0 = tcg_const_i32(crb);
af12906f 2308 gen_helper_fpscr_setbit(t0);
0f2f39c2 2309 tcg_temp_free_i32(t0);
af12906f 2310 }
7c58044c 2311 if (unlikely(Rc(ctx->opcode) != 0)) {
e1571908 2312 tcg_gen_shri_i32(cpu_crf[1], cpu_fpscr, FPSCR_OX);
7c58044c
JM
2313 }
2314 /* We can raise a differed exception */
af12906f 2315 gen_helper_float_check_status();
79aceca5
FB
2316}
2317
2318/* mtfsf */
99e300ef 2319static void gen_mtfsf(DisasContext *ctx)
79aceca5 2320{
0f2f39c2 2321 TCGv_i32 t0;
4911012d 2322 int L = ctx->opcode & 0x02000000;
af12906f 2323
76a66253 2324 if (unlikely(!ctx->fpu_enabled)) {
e06fcd75 2325 gen_exception(ctx, POWERPC_EXCP_FPU);
3cc62370
FB
2326 return;
2327 }
eb44b959
AJ
2328 /* NIP cannot be restored if the memory exception comes from an helper */
2329 gen_update_nip(ctx, ctx->nip - 4);
7c58044c 2330 gen_reset_fpstatus();
4911012d
BS
2331 if (L)
2332 t0 = tcg_const_i32(0xff);
2333 else
2334 t0 = tcg_const_i32(FM(ctx->opcode));
af12906f 2335 gen_helper_store_fpscr(cpu_fpr[rB(ctx->opcode)], t0);
0f2f39c2 2336 tcg_temp_free_i32(t0);
7c58044c 2337 if (unlikely(Rc(ctx->opcode) != 0)) {
e1571908 2338 tcg_gen_shri_i32(cpu_crf[1], cpu_fpscr, FPSCR_OX);
7c58044c
JM
2339 }
2340 /* We can raise a differed exception */
af12906f 2341 gen_helper_float_check_status();
79aceca5
FB
2342}
2343
2344/* mtfsfi */
99e300ef 2345static void gen_mtfsfi(DisasContext *ctx)
79aceca5 2346{
7c58044c 2347 int bf, sh;
0f2f39c2
AJ
2348 TCGv_i64 t0;
2349 TCGv_i32 t1;
7c58044c 2350
76a66253 2351 if (unlikely(!ctx->fpu_enabled)) {
e06fcd75 2352 gen_exception(ctx, POWERPC_EXCP_FPU);
3cc62370
FB
2353 return;
2354 }
7c58044c
JM
2355 bf = crbD(ctx->opcode) >> 2;
2356 sh = 7 - bf;
eb44b959
AJ
2357 /* NIP cannot be restored if the memory exception comes from an helper */
2358 gen_update_nip(ctx, ctx->nip - 4);
7c58044c 2359 gen_reset_fpstatus();
0f2f39c2 2360 t0 = tcg_const_i64(FPIMM(ctx->opcode) << (4 * sh));
af12906f
AJ
2361 t1 = tcg_const_i32(1 << sh);
2362 gen_helper_store_fpscr(t0, t1);
0f2f39c2
AJ
2363 tcg_temp_free_i64(t0);
2364 tcg_temp_free_i32(t1);
7c58044c 2365 if (unlikely(Rc(ctx->opcode) != 0)) {
e1571908 2366 tcg_gen_shri_i32(cpu_crf[1], cpu_fpscr, FPSCR_OX);
7c58044c
JM
2367 }
2368 /* We can raise a differed exception */
af12906f 2369 gen_helper_float_check_status();
79aceca5
FB
2370}
2371
76a66253
JM
2372/*** Addressing modes ***/
2373/* Register indirect with immediate index : EA = (rA|0) + SIMM */
636aa200
BS
2374static inline void gen_addr_imm_index(DisasContext *ctx, TCGv EA,
2375 target_long maskl)
76a66253
JM
2376{
2377 target_long simm = SIMM(ctx->opcode);
2378
be147d08 2379 simm &= ~maskl;
76db3ba4
AJ
2380 if (rA(ctx->opcode) == 0) {
2381#if defined(TARGET_PPC64)
2382 if (!ctx->sf_mode) {
2383 tcg_gen_movi_tl(EA, (uint32_t)simm);
2384 } else
2385#endif
e2be8d8d 2386 tcg_gen_movi_tl(EA, simm);
76db3ba4 2387 } else if (likely(simm != 0)) {
e2be8d8d 2388 tcg_gen_addi_tl(EA, cpu_gpr[rA(ctx->opcode)], simm);
76db3ba4
AJ
2389#if defined(TARGET_PPC64)
2390 if (!ctx->sf_mode) {
2391 tcg_gen_ext32u_tl(EA, EA);
2392 }
2393#endif
2394 } else {
2395#if defined(TARGET_PPC64)
2396 if (!ctx->sf_mode) {
2397 tcg_gen_ext32u_tl(EA, cpu_gpr[rA(ctx->opcode)]);
2398 } else
2399#endif
e2be8d8d 2400 tcg_gen_mov_tl(EA, cpu_gpr[rA(ctx->opcode)]);
76db3ba4 2401 }
76a66253
JM
2402}
2403
636aa200 2404static inline void gen_addr_reg_index(DisasContext *ctx, TCGv EA)
76a66253 2405{
76db3ba4
AJ
2406 if (rA(ctx->opcode) == 0) {
2407#if defined(TARGET_PPC64)
2408 if (!ctx->sf_mode) {
2409 tcg_gen_ext32u_tl(EA, cpu_gpr[rB(ctx->opcode)]);
2410 } else
2411#endif
e2be8d8d 2412 tcg_gen_mov_tl(EA, cpu_gpr[rB(ctx->opcode)]);
76db3ba4 2413 } else {
e2be8d8d 2414 tcg_gen_add_tl(EA, cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)]);
76db3ba4
AJ
2415#if defined(TARGET_PPC64)
2416 if (!ctx->sf_mode) {
2417 tcg_gen_ext32u_tl(EA, EA);
2418 }
2419#endif
2420 }
76a66253
JM
2421}
2422
636aa200 2423static inline void gen_addr_register(DisasContext *ctx, TCGv EA)
76a66253 2424{
76db3ba4 2425 if (rA(ctx->opcode) == 0) {
e2be8d8d 2426 tcg_gen_movi_tl(EA, 0);
76db3ba4
AJ
2427 } else {
2428#if defined(TARGET_PPC64)
2429 if (!ctx->sf_mode) {
2430 tcg_gen_ext32u_tl(EA, cpu_gpr[rA(ctx->opcode)]);
2431 } else
2432#endif
2433 tcg_gen_mov_tl(EA, cpu_gpr[rA(ctx->opcode)]);
2434 }
2435}
2436
636aa200
BS
2437static inline void gen_addr_add(DisasContext *ctx, TCGv ret, TCGv arg1,
2438 target_long val)
76db3ba4
AJ
2439{
2440 tcg_gen_addi_tl(ret, arg1, val);
2441#if defined(TARGET_PPC64)
2442 if (!ctx->sf_mode) {
2443 tcg_gen_ext32u_tl(ret, ret);
2444 }
2445#endif
76a66253
JM
2446}
2447
636aa200 2448static inline void gen_check_align(DisasContext *ctx, TCGv EA, int mask)
cf360a32
AJ
2449{
2450 int l1 = gen_new_label();
2451 TCGv t0 = tcg_temp_new();
2452 TCGv_i32 t1, t2;
2453 /* NIP cannot be restored if the memory exception comes from an helper */
2454 gen_update_nip(ctx, ctx->nip - 4);
2455 tcg_gen_andi_tl(t0, EA, mask);
2456 tcg_gen_brcondi_tl(TCG_COND_EQ, t0, 0, l1);
2457 t1 = tcg_const_i32(POWERPC_EXCP_ALIGN);
2458 t2 = tcg_const_i32(0);
2459 gen_helper_raise_exception_err(t1, t2);
2460 tcg_temp_free_i32(t1);
2461 tcg_temp_free_i32(t2);
2462 gen_set_label(l1);
2463 tcg_temp_free(t0);
2464}
2465
7863667f 2466/*** Integer load ***/
636aa200 2467static inline void gen_qemu_ld8u(DisasContext *ctx, TCGv arg1, TCGv arg2)
76db3ba4
AJ
2468{
2469 tcg_gen_qemu_ld8u(arg1, arg2, ctx->mem_idx);
2470}
2471
636aa200 2472static inline void gen_qemu_ld8s(DisasContext *ctx, TCGv arg1, TCGv arg2)
76db3ba4
AJ
2473{
2474 tcg_gen_qemu_ld8s(arg1, arg2, ctx->mem_idx);
2475}
2476
636aa200 2477static inline void gen_qemu_ld16u(DisasContext *ctx, TCGv arg1, TCGv arg2)
76db3ba4
AJ
2478{
2479 tcg_gen_qemu_ld16u(arg1, arg2, ctx->mem_idx);
2480 if (unlikely(ctx->le_mode)) {
fa3966a3 2481 tcg_gen_bswap16_tl(arg1, arg1);
76db3ba4 2482 }
b61f2753
AJ
2483}
2484
636aa200 2485static inline void gen_qemu_ld16s(DisasContext *ctx, TCGv arg1, TCGv arg2)
b61f2753 2486{
76db3ba4 2487 if (unlikely(ctx->le_mode)) {
76db3ba4 2488 tcg_gen_qemu_ld16u(arg1, arg2, ctx->mem_idx);
fa3966a3 2489 tcg_gen_bswap16_tl(arg1, arg1);
76db3ba4 2490 tcg_gen_ext16s_tl(arg1, arg1);
76db3ba4
AJ
2491 } else {
2492 tcg_gen_qemu_ld16s(arg1, arg2, ctx->mem_idx);
2493 }
b61f2753
AJ
2494}
2495
636aa200 2496static inline void gen_qemu_ld32u(DisasContext *ctx, TCGv arg1, TCGv arg2)
b61f2753 2497{
76db3ba4
AJ
2498 tcg_gen_qemu_ld32u(arg1, arg2, ctx->mem_idx);
2499 if (unlikely(ctx->le_mode)) {
fa3966a3 2500 tcg_gen_bswap32_tl(arg1, arg1);
76db3ba4 2501 }
b61f2753
AJ
2502}
2503
76db3ba4 2504#if defined(TARGET_PPC64)
636aa200 2505static inline void gen_qemu_ld32s(DisasContext *ctx, TCGv arg1, TCGv arg2)
b61f2753 2506{
a457e7ee 2507 if (unlikely(ctx->le_mode)) {
76db3ba4 2508 tcg_gen_qemu_ld32u(arg1, arg2, ctx->mem_idx);
fa3966a3
AJ
2509 tcg_gen_bswap32_tl(arg1, arg1);
2510 tcg_gen_ext32s_tl(arg1, arg1);
b61f2753 2511 } else
76db3ba4 2512 tcg_gen_qemu_ld32s(arg1, arg2, ctx->mem_idx);
b61f2753 2513}
76db3ba4 2514#endif
b61f2753 2515
636aa200 2516static inline void gen_qemu_ld64(DisasContext *ctx, TCGv_i64 arg1, TCGv arg2)
b61f2753 2517{
76db3ba4
AJ
2518 tcg_gen_qemu_ld64(arg1, arg2, ctx->mem_idx);
2519 if (unlikely(ctx->le_mode)) {
66896cb8 2520 tcg_gen_bswap64_i64(arg1, arg1);
76db3ba4 2521 }
b61f2753
AJ
2522}
2523
636aa200 2524static inline void gen_qemu_st8(DisasContext *ctx, TCGv arg1, TCGv arg2)
b61f2753 2525{
76db3ba4 2526 tcg_gen_qemu_st8(arg1, arg2, ctx->mem_idx);
b61f2753
AJ
2527}
2528
636aa200 2529static inline void gen_qemu_st16(DisasContext *ctx, TCGv arg1, TCGv arg2)
b61f2753 2530{
76db3ba4 2531 if (unlikely(ctx->le_mode)) {
76db3ba4
AJ
2532 TCGv t0 = tcg_temp_new();
2533 tcg_gen_ext16u_tl(t0, arg1);
fa3966a3 2534 tcg_gen_bswap16_tl(t0, t0);
76db3ba4
AJ
2535 tcg_gen_qemu_st16(t0, arg2, ctx->mem_idx);
2536 tcg_temp_free(t0);
76db3ba4
AJ
2537 } else {
2538 tcg_gen_qemu_st16(arg1, arg2, ctx->mem_idx);
2539 }
b61f2753
AJ
2540}
2541
636aa200 2542static inline void gen_qemu_st32(DisasContext *ctx, TCGv arg1, TCGv arg2)
b61f2753 2543{
76db3ba4 2544 if (unlikely(ctx->le_mode)) {
fa3966a3
AJ
2545 TCGv t0 = tcg_temp_new();
2546 tcg_gen_ext32u_tl(t0, arg1);
2547 tcg_gen_bswap32_tl(t0, t0);
76db3ba4
AJ
2548 tcg_gen_qemu_st32(t0, arg2, ctx->mem_idx);
2549 tcg_temp_free(t0);
76db3ba4
AJ
2550 } else {
2551 tcg_gen_qemu_st32(arg1, arg2, ctx->mem_idx);
2552 }
b61f2753
AJ
2553}
2554
636aa200 2555static inline void gen_qemu_st64(DisasContext *ctx, TCGv_i64 arg1, TCGv arg2)
b61f2753 2556{
76db3ba4 2557 if (unlikely(ctx->le_mode)) {
a7812ae4 2558 TCGv_i64 t0 = tcg_temp_new_i64();
66896cb8 2559 tcg_gen_bswap64_i64(t0, arg1);
76db3ba4 2560 tcg_gen_qemu_st64(t0, arg2, ctx->mem_idx);
a7812ae4 2561 tcg_temp_free_i64(t0);
b61f2753 2562 } else
76db3ba4 2563 tcg_gen_qemu_st64(arg1, arg2, ctx->mem_idx);
b61f2753
AJ
2564}
2565
0c8aacd4 2566#define GEN_LD(name, ldop, opc, type) \
99e300ef 2567static void glue(gen_, name)(DisasContext *ctx) \
79aceca5 2568{ \
76db3ba4
AJ
2569 TCGv EA; \
2570 gen_set_access_type(ctx, ACCESS_INT); \
2571 EA = tcg_temp_new(); \
2572 gen_addr_imm_index(ctx, EA, 0); \
2573 gen_qemu_##ldop(ctx, cpu_gpr[rD(ctx->opcode)], EA); \
b61f2753 2574 tcg_temp_free(EA); \
79aceca5
FB
2575}
2576
0c8aacd4 2577#define GEN_LDU(name, ldop, opc, type) \
99e300ef 2578static void glue(gen_, name##u)(DisasContext *ctx) \
79aceca5 2579{ \
b61f2753 2580 TCGv EA; \
76a66253
JM
2581 if (unlikely(rA(ctx->opcode) == 0 || \
2582 rA(ctx->opcode) == rD(ctx->opcode))) { \
e06fcd75 2583 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL); \
9fddaa0c 2584 return; \
9a64fbe4 2585 } \
76db3ba4 2586 gen_set_access_type(ctx, ACCESS_INT); \
0c8aacd4 2587 EA = tcg_temp_new(); \
9d53c753 2588 if (type == PPC_64B) \
76db3ba4 2589 gen_addr_imm_index(ctx, EA, 0x03); \
9d53c753 2590 else \
76db3ba4
AJ
2591 gen_addr_imm_index(ctx, EA, 0); \
2592 gen_qemu_##ldop(ctx, cpu_gpr[rD(ctx->opcode)], EA); \
b61f2753
AJ
2593 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], EA); \
2594 tcg_temp_free(EA); \
79aceca5
FB
2595}
2596
0c8aacd4 2597#define GEN_LDUX(name, ldop, opc2, opc3, type) \
99e300ef 2598static void glue(gen_, name##ux)(DisasContext *ctx) \
79aceca5 2599{ \
b61f2753 2600 TCGv EA; \
76a66253
JM
2601 if (unlikely(rA(ctx->opcode) == 0 || \
2602 rA(ctx->opcode) == rD(ctx->opcode))) { \
e06fcd75 2603 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL); \
9fddaa0c 2604 return; \
9a64fbe4 2605 } \
76db3ba4 2606 gen_set_access_type(ctx, ACCESS_INT); \
0c8aacd4 2607 EA = tcg_temp_new(); \
76db3ba4
AJ
2608 gen_addr_reg_index(ctx, EA); \
2609 gen_qemu_##ldop(ctx, cpu_gpr[rD(ctx->opcode)], EA); \
b61f2753
AJ
2610 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], EA); \
2611 tcg_temp_free(EA); \
79aceca5
FB
2612}
2613
0c8aacd4 2614#define GEN_LDX(name, ldop, opc2, opc3, type) \
99e300ef 2615static void glue(gen_, name##x)(DisasContext *ctx) \
79aceca5 2616{ \
76db3ba4
AJ
2617 TCGv EA; \
2618 gen_set_access_type(ctx, ACCESS_INT); \
2619 EA = tcg_temp_new(); \
2620 gen_addr_reg_index(ctx, EA); \
2621 gen_qemu_##ldop(ctx, cpu_gpr[rD(ctx->opcode)], EA); \
b61f2753 2622 tcg_temp_free(EA); \
79aceca5
FB
2623}
2624
0c8aacd4
AJ
2625#define GEN_LDS(name, ldop, op, type) \
2626GEN_LD(name, ldop, op | 0x20, type); \
2627GEN_LDU(name, ldop, op | 0x21, type); \
2628GEN_LDUX(name, ldop, 0x17, op | 0x01, type); \
2629GEN_LDX(name, ldop, 0x17, op | 0x00, type)
79aceca5
FB
2630
2631/* lbz lbzu lbzux lbzx */
0c8aacd4 2632GEN_LDS(lbz, ld8u, 0x02, PPC_INTEGER);
79aceca5 2633/* lha lhau lhaux lhax */
0c8aacd4 2634GEN_LDS(lha, ld16s, 0x0A, PPC_INTEGER);
79aceca5 2635/* lhz lhzu lhzux lhzx */
0c8aacd4 2636GEN_LDS(lhz, ld16u, 0x08, PPC_INTEGER);
79aceca5 2637/* lwz lwzu lwzux lwzx */
0c8aacd4 2638GEN_LDS(lwz, ld32u, 0x00, PPC_INTEGER);
d9bce9d9 2639#if defined(TARGET_PPC64)
d9bce9d9 2640/* lwaux */
0c8aacd4 2641GEN_LDUX(lwa, ld32s, 0x15, 0x0B, PPC_64B);
d9bce9d9 2642/* lwax */
0c8aacd4 2643GEN_LDX(lwa, ld32s, 0x15, 0x0A, PPC_64B);
d9bce9d9 2644/* ldux */
0c8aacd4 2645GEN_LDUX(ld, ld64, 0x15, 0x01, PPC_64B);
d9bce9d9 2646/* ldx */
0c8aacd4 2647GEN_LDX(ld, ld64, 0x15, 0x00, PPC_64B);
99e300ef
BS
2648
2649static void gen_ld(DisasContext *ctx)
d9bce9d9 2650{
b61f2753 2651 TCGv EA;
d9bce9d9
JM
2652 if (Rc(ctx->opcode)) {
2653 if (unlikely(rA(ctx->opcode) == 0 ||
2654 rA(ctx->opcode) == rD(ctx->opcode))) {
e06fcd75 2655 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL);
d9bce9d9
JM
2656 return;
2657 }
2658 }
76db3ba4 2659 gen_set_access_type(ctx, ACCESS_INT);
a7812ae4 2660 EA = tcg_temp_new();
76db3ba4 2661 gen_addr_imm_index(ctx, EA, 0x03);
d9bce9d9
JM
2662 if (ctx->opcode & 0x02) {
2663 /* lwa (lwau is undefined) */
76db3ba4 2664 gen_qemu_ld32s(ctx, cpu_gpr[rD(ctx->opcode)], EA);
d9bce9d9
JM
2665 } else {
2666 /* ld - ldu */
76db3ba4 2667 gen_qemu_ld64(ctx, cpu_gpr[rD(ctx->opcode)], EA);
d9bce9d9 2668 }
d9bce9d9 2669 if (Rc(ctx->opcode))
b61f2753
AJ
2670 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], EA);
2671 tcg_temp_free(EA);
d9bce9d9 2672}
99e300ef 2673
54623277 2674/* lq */
99e300ef 2675static void gen_lq(DisasContext *ctx)
be147d08
JM
2676{
2677#if defined(CONFIG_USER_ONLY)
e06fcd75 2678 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
be147d08
JM
2679#else
2680 int ra, rd;
b61f2753 2681 TCGv EA;
be147d08
JM
2682
2683 /* Restore CPU state */
76db3ba4 2684 if (unlikely(ctx->mem_idx == 0)) {
e06fcd75 2685 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
be147d08
JM
2686 return;
2687 }
2688 ra = rA(ctx->opcode);
2689 rd = rD(ctx->opcode);
2690 if (unlikely((rd & 1) || rd == ra)) {
e06fcd75 2691 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL);
be147d08
JM
2692 return;
2693 }
76db3ba4 2694 if (unlikely(ctx->le_mode)) {
be147d08 2695 /* Little-endian mode is not handled */
e06fcd75 2696 gen_exception_err(ctx, POWERPC_EXCP_ALIGN, POWERPC_EXCP_ALIGN_LE);
be147d08
JM
2697 return;
2698 }
76db3ba4 2699 gen_set_access_type(ctx, ACCESS_INT);
a7812ae4 2700 EA = tcg_temp_new();
76db3ba4
AJ
2701 gen_addr_imm_index(ctx, EA, 0x0F);
2702 gen_qemu_ld64(ctx, cpu_gpr[rd], EA);
2703 gen_addr_add(ctx, EA, EA, 8);
2704 gen_qemu_ld64(ctx, cpu_gpr[rd+1], EA);
b61f2753 2705 tcg_temp_free(EA);
be147d08
JM
2706#endif
2707}
d9bce9d9 2708#endif
79aceca5
FB
2709
2710/*** Integer store ***/
0c8aacd4 2711#define GEN_ST(name, stop, opc, type) \
99e300ef 2712static void glue(gen_, name)(DisasContext *ctx) \
79aceca5 2713{ \
76db3ba4
AJ
2714 TCGv EA; \
2715 gen_set_access_type(ctx, ACCESS_INT); \
2716 EA = tcg_temp_new(); \
2717 gen_addr_imm_index(ctx, EA, 0); \
2718 gen_qemu_##stop(ctx, cpu_gpr[rS(ctx->opcode)], EA); \
b61f2753 2719 tcg_temp_free(EA); \
79aceca5
FB
2720}
2721
0c8aacd4 2722#define GEN_STU(name, stop, opc, type) \
99e300ef 2723static void glue(gen_, stop##u)(DisasContext *ctx) \
79aceca5 2724{ \
b61f2753 2725 TCGv EA; \
76a66253 2726 if (unlikely(rA(ctx->opcode) == 0)) { \
e06fcd75 2727 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL); \
9fddaa0c 2728 return; \
9a64fbe4 2729 } \
76db3ba4 2730 gen_set_access_type(ctx, ACCESS_INT); \
0c8aacd4 2731 EA = tcg_temp_new(); \
9d53c753 2732 if (type == PPC_64B) \
76db3ba4 2733 gen_addr_imm_index(ctx, EA, 0x03); \
9d53c753 2734 else \
76db3ba4
AJ
2735 gen_addr_imm_index(ctx, EA, 0); \
2736 gen_qemu_##stop(ctx, cpu_gpr[rS(ctx->opcode)], EA); \
b61f2753
AJ
2737 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], EA); \
2738 tcg_temp_free(EA); \
79aceca5
FB
2739}
2740
0c8aacd4 2741#define GEN_STUX(name, stop, opc2, opc3, type) \
99e300ef 2742static void glue(gen_, name##ux)(DisasContext *ctx) \
79aceca5 2743{ \
b61f2753 2744 TCGv EA; \
76a66253 2745 if (unlikely(rA(ctx->opcode) == 0)) { \
e06fcd75 2746 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL); \
9fddaa0c 2747 return; \
9a64fbe4 2748 } \
76db3ba4 2749 gen_set_access_type(ctx, ACCESS_INT); \
0c8aacd4 2750 EA = tcg_temp_new(); \
76db3ba4
AJ
2751 gen_addr_reg_index(ctx, EA); \
2752 gen_qemu_##stop(ctx, cpu_gpr[rS(ctx->opcode)], EA); \
b61f2753
AJ
2753 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], EA); \
2754 tcg_temp_free(EA); \
79aceca5
FB
2755}
2756
0c8aacd4 2757#define GEN_STX(name, stop, opc2, opc3, type) \
99e300ef 2758static void glue(gen_, name##x)(DisasContext *ctx) \
79aceca5 2759{ \
76db3ba4
AJ
2760 TCGv EA; \
2761 gen_set_access_type(ctx, ACCESS_INT); \
2762 EA = tcg_temp_new(); \
2763 gen_addr_reg_index(ctx, EA); \
2764 gen_qemu_##stop(ctx, cpu_gpr[rS(ctx->opcode)], EA); \
b61f2753 2765 tcg_temp_free(EA); \
79aceca5
FB
2766}
2767
0c8aacd4
AJ
2768#define GEN_STS(name, stop, op, type) \
2769GEN_ST(name, stop, op | 0x20, type); \
2770GEN_STU(name, stop, op | 0x21, type); \
2771GEN_STUX(name, stop, 0x17, op | 0x01, type); \
2772GEN_STX(name, stop, 0x17, op | 0x00, type)
79aceca5
FB
2773
2774/* stb stbu stbux stbx */
0c8aacd4 2775GEN_STS(stb, st8, 0x06, PPC_INTEGER);
79aceca5 2776/* sth sthu sthux sthx */
0c8aacd4 2777GEN_STS(sth, st16, 0x0C, PPC_INTEGER);
79aceca5 2778/* stw stwu stwux stwx */
0c8aacd4 2779GEN_STS(stw, st32, 0x04, PPC_INTEGER);
d9bce9d9 2780#if defined(TARGET_PPC64)
0c8aacd4
AJ
2781GEN_STUX(std, st64, 0x15, 0x05, PPC_64B);
2782GEN_STX(std, st64, 0x15, 0x04, PPC_64B);
99e300ef
BS
2783
2784static void gen_std(DisasContext *ctx)
d9bce9d9 2785{
be147d08 2786 int rs;
b61f2753 2787 TCGv EA;
be147d08
JM
2788
2789 rs = rS(ctx->opcode);
2790 if ((ctx->opcode & 0x3) == 0x2) {
2791#if defined(CONFIG_USER_ONLY)
e06fcd75 2792 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
be147d08
JM
2793#else
2794 /* stq */
76db3ba4 2795 if (unlikely(ctx->mem_idx == 0)) {
e06fcd75 2796 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
be147d08
JM
2797 return;
2798 }
2799 if (unlikely(rs & 1)) {
e06fcd75 2800 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL);
d9bce9d9
JM
2801 return;
2802 }
76db3ba4 2803 if (unlikely(ctx->le_mode)) {
be147d08 2804 /* Little-endian mode is not handled */
e06fcd75 2805 gen_exception_err(ctx, POWERPC_EXCP_ALIGN, POWERPC_EXCP_ALIGN_LE);
be147d08
JM
2806 return;
2807 }
76db3ba4 2808 gen_set_access_type(ctx, ACCESS_INT);
a7812ae4 2809 EA = tcg_temp_new();
76db3ba4
AJ
2810 gen_addr_imm_index(ctx, EA, 0x03);
2811 gen_qemu_st64(ctx, cpu_gpr[rs], EA);
2812 gen_addr_add(ctx, EA, EA, 8);
2813 gen_qemu_st64(ctx, cpu_gpr[rs+1], EA);
b61f2753 2814 tcg_temp_free(EA);
be147d08
JM
2815#endif
2816 } else {
2817 /* std / stdu */
2818 if (Rc(ctx->opcode)) {
2819 if (unlikely(rA(ctx->opcode) == 0)) {
e06fcd75 2820 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL);
be147d08
JM
2821 return;
2822 }
2823 }
76db3ba4 2824 gen_set_access_type(ctx, ACCESS_INT);
a7812ae4 2825 EA = tcg_temp_new();
76db3ba4
AJ
2826 gen_addr_imm_index(ctx, EA, 0x03);
2827 gen_qemu_st64(ctx, cpu_gpr[rs], EA);
be147d08 2828 if (Rc(ctx->opcode))
b61f2753
AJ
2829 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], EA);
2830 tcg_temp_free(EA);
d9bce9d9 2831 }
d9bce9d9
JM
2832}
2833#endif
79aceca5
FB
2834/*** Integer load and store with byte reverse ***/
2835/* lhbrx */
86178a57 2836static inline void gen_qemu_ld16ur(DisasContext *ctx, TCGv arg1, TCGv arg2)
b61f2753 2837{
76db3ba4
AJ
2838 tcg_gen_qemu_ld16u(arg1, arg2, ctx->mem_idx);
2839 if (likely(!ctx->le_mode)) {
fa3966a3 2840 tcg_gen_bswap16_tl(arg1, arg1);
76db3ba4 2841 }
b61f2753 2842}
0c8aacd4 2843GEN_LDX(lhbr, ld16ur, 0x16, 0x18, PPC_INTEGER);
b61f2753 2844
79aceca5 2845/* lwbrx */
86178a57 2846static inline void gen_qemu_ld32ur(DisasContext *ctx, TCGv arg1, TCGv arg2)
b61f2753 2847{
76db3ba4
AJ
2848 tcg_gen_qemu_ld32u(arg1, arg2, ctx->mem_idx);
2849 if (likely(!ctx->le_mode)) {
fa3966a3 2850 tcg_gen_bswap32_tl(arg1, arg1);
76db3ba4 2851 }
b61f2753 2852}
0c8aacd4 2853GEN_LDX(lwbr, ld32ur, 0x16, 0x10, PPC_INTEGER);
b61f2753 2854
79aceca5 2855/* sthbrx */
86178a57 2856static inline void gen_qemu_st16r(DisasContext *ctx, TCGv arg1, TCGv arg2)
b61f2753 2857{
76db3ba4 2858 if (likely(!ctx->le_mode)) {
76db3ba4
AJ
2859 TCGv t0 = tcg_temp_new();
2860 tcg_gen_ext16u_tl(t0, arg1);
fa3966a3 2861 tcg_gen_bswap16_tl(t0, t0);
76db3ba4
AJ
2862 tcg_gen_qemu_st16(t0, arg2, ctx->mem_idx);
2863 tcg_temp_free(t0);
76db3ba4
AJ
2864 } else {
2865 tcg_gen_qemu_st16(arg1, arg2, ctx->mem_idx);
2866 }
b61f2753 2867}
0c8aacd4 2868GEN_STX(sthbr, st16r, 0x16, 0x1C, PPC_INTEGER);
b61f2753 2869
79aceca5 2870/* stwbrx */
86178a57 2871static inline void gen_qemu_st32r(DisasContext *ctx, TCGv arg1, TCGv arg2)
b61f2753 2872{
76db3ba4 2873 if (likely(!ctx->le_mode)) {
fa3966a3
AJ
2874 TCGv t0 = tcg_temp_new();
2875 tcg_gen_ext32u_tl(t0, arg1);
2876 tcg_gen_bswap32_tl(t0, t0);
76db3ba4
AJ
2877 tcg_gen_qemu_st32(t0, arg2, ctx->mem_idx);
2878 tcg_temp_free(t0);
76db3ba4
AJ
2879 } else {
2880 tcg_gen_qemu_st32(arg1, arg2, ctx->mem_idx);
2881 }
b61f2753 2882}
0c8aacd4 2883GEN_STX(stwbr, st32r, 0x16, 0x14, PPC_INTEGER);
79aceca5
FB
2884
2885/*** Integer load and store multiple ***/
99e300ef 2886
54623277 2887/* lmw */
99e300ef 2888static void gen_lmw(DisasContext *ctx)
79aceca5 2889{
76db3ba4
AJ
2890 TCGv t0;
2891 TCGv_i32 t1;
2892 gen_set_access_type(ctx, ACCESS_INT);
76a66253 2893 /* NIP cannot be restored if the memory exception comes from an helper */
d9bce9d9 2894 gen_update_nip(ctx, ctx->nip - 4);
76db3ba4
AJ
2895 t0 = tcg_temp_new();
2896 t1 = tcg_const_i32(rD(ctx->opcode));
2897 gen_addr_imm_index(ctx, t0, 0);
ff4a62cd
AJ
2898 gen_helper_lmw(t0, t1);
2899 tcg_temp_free(t0);
2900 tcg_temp_free_i32(t1);
79aceca5
FB
2901}
2902
2903/* stmw */
99e300ef 2904static void gen_stmw(DisasContext *ctx)
79aceca5 2905{
76db3ba4
AJ
2906 TCGv t0;
2907 TCGv_i32 t1;
2908 gen_set_access_type(ctx, ACCESS_INT);
76a66253 2909 /* NIP cannot be restored if the memory exception comes from an helper */
d9bce9d9 2910 gen_update_nip(ctx, ctx->nip - 4);
76db3ba4
AJ
2911 t0 = tcg_temp_new();
2912 t1 = tcg_const_i32(rS(ctx->opcode));
2913 gen_addr_imm_index(ctx, t0, 0);
ff4a62cd
AJ
2914 gen_helper_stmw(t0, t1);
2915 tcg_temp_free(t0);
2916 tcg_temp_free_i32(t1);
79aceca5
FB
2917}
2918
2919/*** Integer load and store strings ***/
54623277 2920
79aceca5 2921/* lswi */
3fc6c082 2922/* PowerPC32 specification says we must generate an exception if
9a64fbe4
FB
2923 * rA is in the range of registers to be loaded.
2924 * In an other hand, IBM says this is valid, but rA won't be loaded.
2925 * For now, I'll follow the spec...
2926 */
99e300ef 2927static void gen_lswi(DisasContext *ctx)
79aceca5 2928{
dfbc799d
AJ
2929 TCGv t0;
2930 TCGv_i32 t1, t2;
79aceca5
FB
2931 int nb = NB(ctx->opcode);
2932 int start = rD(ctx->opcode);
9a64fbe4 2933 int ra = rA(ctx->opcode);
79aceca5
FB
2934 int nr;
2935
2936 if (nb == 0)
2937 nb = 32;
2938 nr = nb / 4;
76a66253
JM
2939 if (unlikely(((start + nr) > 32 &&
2940 start <= ra && (start + nr - 32) > ra) ||
2941 ((start + nr) <= 32 && start <= ra && (start + nr) > ra))) {
e06fcd75 2942 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_LSWX);
9fddaa0c 2943 return;
297d8e62 2944 }
76db3ba4 2945 gen_set_access_type(ctx, ACCESS_INT);
8dd4983c 2946 /* NIP cannot be restored if the memory exception comes from an helper */
d9bce9d9 2947 gen_update_nip(ctx, ctx->nip - 4);
dfbc799d 2948 t0 = tcg_temp_new();
76db3ba4 2949 gen_addr_register(ctx, t0);
dfbc799d
AJ
2950 t1 = tcg_const_i32(nb);
2951 t2 = tcg_const_i32(start);
2952 gen_helper_lsw(t0, t1, t2);
2953 tcg_temp_free(t0);
2954 tcg_temp_free_i32(t1);
2955 tcg_temp_free_i32(t2);
79aceca5
FB
2956}
2957
2958/* lswx */
99e300ef 2959static void gen_lswx(DisasContext *ctx)
79aceca5 2960{
76db3ba4
AJ
2961 TCGv t0;
2962 TCGv_i32 t1, t2, t3;
2963 gen_set_access_type(ctx, ACCESS_INT);
76a66253 2964 /* NIP cannot be restored if the memory exception comes from an helper */
d9bce9d9 2965 gen_update_nip(ctx, ctx->nip - 4);
76db3ba4
AJ
2966 t0 = tcg_temp_new();
2967 gen_addr_reg_index(ctx, t0);
2968 t1 = tcg_const_i32(rD(ctx->opcode));
2969 t2 = tcg_const_i32(rA(ctx->opcode));
2970 t3 = tcg_const_i32(rB(ctx->opcode));
dfbc799d
AJ
2971 gen_helper_lswx(t0, t1, t2, t3);
2972 tcg_temp_free(t0);
2973 tcg_temp_free_i32(t1);
2974 tcg_temp_free_i32(t2);
2975 tcg_temp_free_i32(t3);
79aceca5
FB
2976}
2977
2978/* stswi */
99e300ef 2979static void gen_stswi(DisasContext *ctx)
79aceca5 2980{
76db3ba4
AJ
2981 TCGv t0;
2982 TCGv_i32 t1, t2;
4b3686fa 2983 int nb = NB(ctx->opcode);
76db3ba4 2984 gen_set_access_type(ctx, ACCESS_INT);
76a66253 2985 /* NIP cannot be restored if the memory exception comes from an helper */
d9bce9d9 2986 gen_update_nip(ctx, ctx->nip - 4);
76db3ba4
AJ
2987 t0 = tcg_temp_new();
2988 gen_addr_register(ctx, t0);
4b3686fa
FB
2989 if (nb == 0)
2990 nb = 32;
dfbc799d 2991 t1 = tcg_const_i32(nb);
76db3ba4 2992 t2 = tcg_const_i32(rS(ctx->opcode));
dfbc799d
AJ
2993 gen_helper_stsw(t0, t1, t2);
2994 tcg_temp_free(t0);
2995 tcg_temp_free_i32(t1);
2996 tcg_temp_free_i32(t2);
79aceca5
FB
2997}
2998
2999/* stswx */
99e300ef 3000static void gen_stswx(DisasContext *ctx)
79aceca5 3001{
76db3ba4
AJ
3002 TCGv t0;
3003 TCGv_i32 t1, t2;
3004 gen_set_access_type(ctx, ACCESS_INT);
8dd4983c 3005 /* NIP cannot be restored if the memory exception comes from an helper */
5fafdf24 3006 gen_update_nip(ctx, ctx->nip - 4);
76db3ba4
AJ
3007 t0 = tcg_temp_new();
3008 gen_addr_reg_index(ctx, t0);
3009 t1 = tcg_temp_new_i32();
dfbc799d
AJ
3010 tcg_gen_trunc_tl_i32(t1, cpu_xer);
3011 tcg_gen_andi_i32(t1, t1, 0x7F);
76db3ba4 3012 t2 = tcg_const_i32(rS(ctx->opcode));
dfbc799d
AJ
3013 gen_helper_stsw(t0, t1, t2);
3014 tcg_temp_free(t0);
3015 tcg_temp_free_i32(t1);
3016 tcg_temp_free_i32(t2);
79aceca5
FB
3017}
3018
3019/*** Memory synchronisation ***/
3020/* eieio */
99e300ef 3021static void gen_eieio(DisasContext *ctx)
79aceca5 3022{
79aceca5
FB
3023}
3024
3025/* isync */
99e300ef 3026static void gen_isync(DisasContext *ctx)
79aceca5 3027{
e06fcd75 3028 gen_stop_exception(ctx);
79aceca5
FB
3029}
3030
111bfab3 3031/* lwarx */
99e300ef 3032static void gen_lwarx(DisasContext *ctx)
79aceca5 3033{
76db3ba4 3034 TCGv t0;
18b21a2f 3035 TCGv gpr = cpu_gpr[rD(ctx->opcode)];
76db3ba4
AJ
3036 gen_set_access_type(ctx, ACCESS_RES);
3037 t0 = tcg_temp_local_new();
3038 gen_addr_reg_index(ctx, t0);
cf360a32 3039 gen_check_align(ctx, t0, 0x03);
18b21a2f 3040 gen_qemu_ld32u(ctx, gpr, t0);
cf360a32 3041 tcg_gen_mov_tl(cpu_reserve, t0);
18b21a2f 3042 tcg_gen_st_tl(gpr, cpu_env, offsetof(CPUState, reserve_val));
cf360a32 3043 tcg_temp_free(t0);
79aceca5
FB
3044}
3045
4425265b
NF
3046#if defined(CONFIG_USER_ONLY)
3047static void gen_conditional_store (DisasContext *ctx, TCGv EA,
3048 int reg, int size)
3049{
3050 TCGv t0 = tcg_temp_new();
3051 uint32_t save_exception = ctx->exception;
3052
3053 tcg_gen_st_tl(EA, cpu_env, offsetof(CPUState, reserve_ea));
3054 tcg_gen_movi_tl(t0, (size << 5) | reg);
3055 tcg_gen_st_tl(t0, cpu_env, offsetof(CPUState, reserve_info));
3056 tcg_temp_free(t0);
3057 gen_update_nip(ctx, ctx->nip-4);
3058 ctx->exception = POWERPC_EXCP_BRANCH;
3059 gen_exception(ctx, POWERPC_EXCP_STCX);
3060 ctx->exception = save_exception;
3061}
3062#endif
3063
79aceca5 3064/* stwcx. */
e8eaa2c0 3065static void gen_stwcx_(DisasContext *ctx)
79aceca5 3066{
76db3ba4
AJ
3067 TCGv t0;
3068 gen_set_access_type(ctx, ACCESS_RES);
3069 t0 = tcg_temp_local_new();
3070 gen_addr_reg_index(ctx, t0);
cf360a32 3071 gen_check_align(ctx, t0, 0x03);
4425265b
NF
3072#if defined(CONFIG_USER_ONLY)
3073 gen_conditional_store(ctx, t0, rS(ctx->opcode), 4);
3074#else
3075 {
3076 int l1;
3077
3078 tcg_gen_trunc_tl_i32(cpu_crf[0], cpu_xer);
3079 tcg_gen_shri_i32(cpu_crf[0], cpu_crf[0], XER_SO);
3080 tcg_gen_andi_i32(cpu_crf[0], cpu_crf[0], 1);
3081 l1 = gen_new_label();
3082 tcg_gen_brcond_tl(TCG_COND_NE, t0, cpu_reserve, l1);
3083 tcg_gen_ori_i32(cpu_crf[0], cpu_crf[0], 1 << CRF_EQ);
3084 gen_qemu_st32(ctx, cpu_gpr[rS(ctx->opcode)], t0);
3085 gen_set_label(l1);
3086 tcg_gen_movi_tl(cpu_reserve, -1);
3087 }
3088#endif
cf360a32 3089 tcg_temp_free(t0);
79aceca5
FB
3090}
3091
426613db 3092#if defined(TARGET_PPC64)
426613db 3093/* ldarx */
99e300ef 3094static void gen_ldarx(DisasContext *ctx)
426613db 3095{
76db3ba4 3096 TCGv t0;
18b21a2f 3097 TCGv gpr = cpu_gpr[rD(ctx->opcode)];
76db3ba4
AJ
3098 gen_set_access_type(ctx, ACCESS_RES);
3099 t0 = tcg_temp_local_new();
3100 gen_addr_reg_index(ctx, t0);
cf360a32 3101 gen_check_align(ctx, t0, 0x07);
18b21a2f 3102 gen_qemu_ld64(ctx, gpr, t0);
cf360a32 3103 tcg_gen_mov_tl(cpu_reserve, t0);
18b21a2f 3104 tcg_gen_st_tl(gpr, cpu_env, offsetof(CPUState, reserve_val));
cf360a32 3105 tcg_temp_free(t0);
426613db
JM
3106}
3107
3108/* stdcx. */
e8eaa2c0 3109static void gen_stdcx_(DisasContext *ctx)
426613db 3110{
76db3ba4
AJ
3111 TCGv t0;
3112 gen_set_access_type(ctx, ACCESS_RES);
3113 t0 = tcg_temp_local_new();
3114 gen_addr_reg_index(ctx, t0);
cf360a32 3115 gen_check_align(ctx, t0, 0x07);
4425265b
NF
3116#if defined(CONFIG_USER_ONLY)
3117 gen_conditional_store(ctx, t0, rS(ctx->opcode), 8);
3118#else
3119 {
3120 int l1;
3121 tcg_gen_trunc_tl_i32(cpu_crf[0], cpu_xer);
3122 tcg_gen_shri_i32(cpu_crf[0], cpu_crf[0], XER_SO);
3123 tcg_gen_andi_i32(cpu_crf[0], cpu_crf[0], 1);
3124 l1 = gen_new_label();
3125 tcg_gen_brcond_tl(TCG_COND_NE, t0, cpu_reserve, l1);
3126 tcg_gen_ori_i32(cpu_crf[0], cpu_crf[0], 1 << CRF_EQ);
3127 gen_qemu_st64(ctx, cpu_gpr[rS(ctx->opcode)], t0);
3128 gen_set_label(l1);
3129 tcg_gen_movi_tl(cpu_reserve, -1);
3130 }
3131#endif
cf360a32 3132 tcg_temp_free(t0);
426613db
JM
3133}
3134#endif /* defined(TARGET_PPC64) */
3135
79aceca5 3136/* sync */
99e300ef 3137static void gen_sync(DisasContext *ctx)
79aceca5 3138{
79aceca5
FB
3139}
3140
0db1b20e 3141/* wait */
99e300ef 3142static void gen_wait(DisasContext *ctx)
0db1b20e 3143{
931ff272
AJ
3144 TCGv_i32 t0 = tcg_temp_new_i32();
3145 tcg_gen_st_i32(t0, cpu_env, offsetof(CPUState, halted));
3146 tcg_temp_free_i32(t0);
0db1b20e 3147 /* Stop translation, as the CPU is supposed to sleep from now */
e06fcd75 3148 gen_exception_err(ctx, EXCP_HLT, 1);
0db1b20e
JM
3149}
3150
79aceca5 3151/*** Floating-point load ***/
a0d7d5a7 3152#define GEN_LDF(name, ldop, opc, type) \
99e300ef 3153static void glue(gen_, name)(DisasContext *ctx) \
79aceca5 3154{ \
a0d7d5a7 3155 TCGv EA; \
76a66253 3156 if (unlikely(!ctx->fpu_enabled)) { \
e06fcd75 3157 gen_exception(ctx, POWERPC_EXCP_FPU); \
4ecc3190
FB
3158 return; \
3159 } \
76db3ba4 3160 gen_set_access_type(ctx, ACCESS_FLOAT); \
a0d7d5a7 3161 EA = tcg_temp_new(); \
76db3ba4
AJ
3162 gen_addr_imm_index(ctx, EA, 0); \
3163 gen_qemu_##ldop(ctx, cpu_fpr[rD(ctx->opcode)], EA); \
a0d7d5a7 3164 tcg_temp_free(EA); \
79aceca5
FB
3165}
3166
a0d7d5a7 3167#define GEN_LDUF(name, ldop, opc, type) \
99e300ef 3168static void glue(gen_, name##u)(DisasContext *ctx) \
79aceca5 3169{ \
a0d7d5a7 3170 TCGv EA; \
76a66253 3171 if (unlikely(!ctx->fpu_enabled)) { \
e06fcd75 3172 gen_exception(ctx, POWERPC_EXCP_FPU); \
4ecc3190
FB
3173 return; \
3174 } \
76a66253 3175 if (unlikely(rA(ctx->opcode) == 0)) { \
e06fcd75 3176 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL); \
9fddaa0c 3177 return; \
9a64fbe4 3178 } \
76db3ba4 3179 gen_set_access_type(ctx, ACCESS_FLOAT); \
a0d7d5a7 3180 EA = tcg_temp_new(); \
76db3ba4
AJ
3181 gen_addr_imm_index(ctx, EA, 0); \
3182 gen_qemu_##ldop(ctx, cpu_fpr[rD(ctx->opcode)], EA); \
a0d7d5a7
AJ
3183 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], EA); \
3184 tcg_temp_free(EA); \
79aceca5
FB
3185}
3186
a0d7d5a7 3187#define GEN_LDUXF(name, ldop, opc, type) \
99e300ef 3188static void glue(gen_, name##ux)(DisasContext *ctx) \
79aceca5 3189{ \
a0d7d5a7 3190 TCGv EA; \
76a66253 3191 if (unlikely(!ctx->fpu_enabled)) { \
e06fcd75 3192 gen_exception(ctx, POWERPC_EXCP_FPU); \
4ecc3190
FB
3193 return; \
3194 } \
76a66253 3195 if (unlikely(rA(ctx->opcode) == 0)) { \
e06fcd75 3196 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL); \
9fddaa0c 3197 return; \
9a64fbe4 3198 } \
76db3ba4 3199 gen_set_access_type(ctx, ACCESS_FLOAT); \
a0d7d5a7 3200 EA = tcg_temp_new(); \
76db3ba4
AJ
3201 gen_addr_reg_index(ctx, EA); \
3202 gen_qemu_##ldop(ctx, cpu_fpr[rD(ctx->opcode)], EA); \
a0d7d5a7
AJ
3203 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], EA); \
3204 tcg_temp_free(EA); \
79aceca5
FB
3205}
3206
a0d7d5a7 3207#define GEN_LDXF(name, ldop, opc2, opc3, type) \
99e300ef 3208static void glue(gen_, name##x)(DisasContext *ctx) \
79aceca5 3209{ \
a0d7d5a7 3210 TCGv EA; \
76a66253 3211 if (unlikely(!ctx->fpu_enabled)) { \
e06fcd75 3212 gen_exception(ctx, POWERPC_EXCP_FPU); \
4ecc3190
FB
3213 return; \
3214 } \
76db3ba4 3215 gen_set_access_type(ctx, ACCESS_FLOAT); \
a0d7d5a7 3216 EA = tcg_temp_new(); \
76db3ba4
AJ
3217 gen_addr_reg_index(ctx, EA); \
3218 gen_qemu_##ldop(ctx, cpu_fpr[rD(ctx->opcode)], EA); \
a0d7d5a7 3219 tcg_temp_free(EA); \
79aceca5
FB
3220}
3221
a0d7d5a7
AJ
3222#define GEN_LDFS(name, ldop, op, type) \
3223GEN_LDF(name, ldop, op | 0x20, type); \
3224GEN_LDUF(name, ldop, op | 0x21, type); \
3225GEN_LDUXF(name, ldop, op | 0x01, type); \
3226GEN_LDXF(name, ldop, 0x17, op | 0x00, type)
3227
636aa200 3228static inline void gen_qemu_ld32fs(DisasContext *ctx, TCGv_i64 arg1, TCGv arg2)
a0d7d5a7
AJ
3229{
3230 TCGv t0 = tcg_temp_new();
3231 TCGv_i32 t1 = tcg_temp_new_i32();
76db3ba4 3232 gen_qemu_ld32u(ctx, t0, arg2);
a0d7d5a7
AJ
3233 tcg_gen_trunc_tl_i32(t1, t0);
3234 tcg_temp_free(t0);
3235 gen_helper_float32_to_float64(arg1, t1);
3236 tcg_temp_free_i32(t1);
3237}
79aceca5 3238
a0d7d5a7
AJ
3239 /* lfd lfdu lfdux lfdx */
3240GEN_LDFS(lfd, ld64, 0x12, PPC_FLOAT);
3241 /* lfs lfsu lfsux lfsx */
3242GEN_LDFS(lfs, ld32fs, 0x10, PPC_FLOAT);
79aceca5
FB
3243
3244/*** Floating-point store ***/
a0d7d5a7 3245#define GEN_STF(name, stop, opc, type) \
99e300ef 3246static void glue(gen_, name)(DisasContext *ctx) \
79aceca5 3247{ \
a0d7d5a7 3248 TCGv EA; \
76a66253 3249 if (unlikely(!ctx->fpu_enabled)) { \
e06fcd75 3250 gen_exception(ctx, POWERPC_EXCP_FPU); \
4ecc3190
FB
3251 return; \
3252 } \
76db3ba4 3253 gen_set_access_type(ctx, ACCESS_FLOAT); \
a0d7d5a7 3254 EA = tcg_temp_new(); \
76db3ba4
AJ
3255 gen_addr_imm_index(ctx, EA, 0); \
3256 gen_qemu_##stop(ctx, cpu_fpr[rS(ctx->opcode)], EA); \
a0d7d5a7 3257 tcg_temp_free(EA); \
79aceca5
FB
3258}
3259
a0d7d5a7 3260#define GEN_STUF(name, stop, opc, type) \
99e300ef 3261static void glue(gen_, name##u)(DisasContext *ctx) \
79aceca5 3262{ \
a0d7d5a7 3263 TCGv EA; \
76a66253 3264 if (unlikely(!ctx->fpu_enabled)) { \
e06fcd75 3265 gen_exception(ctx, POWERPC_EXCP_FPU); \
4ecc3190
FB
3266 return; \
3267 } \
76a66253 3268 if (unlikely(rA(ctx->opcode) == 0)) { \
e06fcd75 3269 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL); \
9fddaa0c 3270 return; \
9a64fbe4 3271 } \
76db3ba4 3272 gen_set_access_type(ctx, ACCESS_FLOAT); \
a0d7d5a7 3273 EA = tcg_temp_new(); \
76db3ba4
AJ
3274 gen_addr_imm_index(ctx, EA, 0); \
3275 gen_qemu_##stop(ctx, cpu_fpr[rS(ctx->opcode)], EA); \
a0d7d5a7
AJ
3276 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], EA); \
3277 tcg_temp_free(EA); \
79aceca5
FB
3278}
3279
a0d7d5a7 3280#define GEN_STUXF(name, stop, opc, type) \
99e300ef 3281static void glue(gen_, name##ux)(DisasContext *ctx) \
79aceca5 3282{ \
a0d7d5a7 3283 TCGv EA; \
76a66253 3284 if (unlikely(!ctx->fpu_enabled)) { \
e06fcd75 3285 gen_exception(ctx, POWERPC_EXCP_FPU); \
4ecc3190
FB
3286 return; \
3287 } \
76a66253 3288 if (unlikely(rA(ctx->opcode) == 0)) { \
e06fcd75 3289 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL); \
9fddaa0c 3290 return; \
9a64fbe4 3291 } \
76db3ba4 3292 gen_set_access_type(ctx, ACCESS_FLOAT); \
a0d7d5a7 3293 EA = tcg_temp_new(); \
76db3ba4
AJ
3294 gen_addr_reg_index(ctx, EA); \
3295 gen_qemu_##stop(ctx, cpu_fpr[rS(ctx->opcode)], EA); \
a0d7d5a7
AJ
3296 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], EA); \
3297 tcg_temp_free(EA); \
79aceca5
FB
3298}
3299
a0d7d5a7 3300#define GEN_STXF(name, stop, opc2, opc3, type) \
99e300ef 3301static void glue(gen_, name##x)(DisasContext *ctx) \
79aceca5 3302{ \
a0d7d5a7 3303 TCGv EA; \
76a66253 3304 if (unlikely(!ctx->fpu_enabled)) { \
e06fcd75 3305 gen_exception(ctx, POWERPC_EXCP_FPU); \
4ecc3190
FB
3306 return; \
3307 } \
76db3ba4 3308 gen_set_access_type(ctx, ACCESS_FLOAT); \
a0d7d5a7 3309 EA = tcg_temp_new(); \
76db3ba4
AJ
3310 gen_addr_reg_index(ctx, EA); \
3311 gen_qemu_##stop(ctx, cpu_fpr[rS(ctx->opcode)], EA); \
a0d7d5a7 3312 tcg_temp_free(EA); \
79aceca5
FB
3313}
3314
a0d7d5a7
AJ
3315#define GEN_STFS(name, stop, op, type) \
3316GEN_STF(name, stop, op | 0x20, type); \
3317GEN_STUF(name, stop, op | 0x21, type); \
3318GEN_STUXF(name, stop, op | 0x01, type); \
3319GEN_STXF(name, stop, 0x17, op | 0x00, type)
3320
636aa200 3321static inline void gen_qemu_st32fs(DisasContext *ctx, TCGv_i64 arg1, TCGv arg2)
a0d7d5a7
AJ
3322{
3323 TCGv_i32 t0 = tcg_temp_new_i32();
3324 TCGv t1 = tcg_temp_new();
3325 gen_helper_float64_to_float32(t0, arg1);
3326 tcg_gen_extu_i32_tl(t1, t0);
3327 tcg_temp_free_i32(t0);
76db3ba4 3328 gen_qemu_st32(ctx, t1, arg2);
a0d7d5a7
AJ
3329 tcg_temp_free(t1);
3330}
79aceca5
FB
3331
3332/* stfd stfdu stfdux stfdx */
a0d7d5a7 3333GEN_STFS(stfd, st64, 0x16, PPC_FLOAT);
79aceca5 3334/* stfs stfsu stfsux stfsx */
a0d7d5a7 3335GEN_STFS(stfs, st32fs, 0x14, PPC_FLOAT);
79aceca5
FB
3336
3337/* Optional: */
636aa200 3338static inline void gen_qemu_st32fiw(DisasContext *ctx, TCGv_i64 arg1, TCGv arg2)
a0d7d5a7
AJ
3339{
3340 TCGv t0 = tcg_temp_new();
3341 tcg_gen_trunc_i64_tl(t0, arg1),
76db3ba4 3342 gen_qemu_st32(ctx, t0, arg2);
a0d7d5a7
AJ
3343 tcg_temp_free(t0);
3344}
79aceca5 3345/* stfiwx */
a0d7d5a7 3346GEN_STXF(stfiw, st32fiw, 0x17, 0x1E, PPC_FLOAT_STFIWX);
79aceca5
FB
3347
3348/*** Branch ***/
636aa200 3349static inline void gen_goto_tb(DisasContext *ctx, int n, target_ulong dest)
c1942362
FB
3350{
3351 TranslationBlock *tb;
3352 tb = ctx->tb;
a2ffb812
AJ
3353#if defined(TARGET_PPC64)
3354 if (!ctx->sf_mode)
3355 dest = (uint32_t) dest;
3356#endif
57fec1fe 3357 if ((tb->pc & TARGET_PAGE_MASK) == (dest & TARGET_PAGE_MASK) &&
8cbcb4fa 3358 likely(!ctx->singlestep_enabled)) {
57fec1fe 3359 tcg_gen_goto_tb(n);
a2ffb812 3360 tcg_gen_movi_tl(cpu_nip, dest & ~3);
4b4a72e5 3361 tcg_gen_exit_tb((tcg_target_long)tb + n);
c1942362 3362 } else {
a2ffb812 3363 tcg_gen_movi_tl(cpu_nip, dest & ~3);
8cbcb4fa
AJ
3364 if (unlikely(ctx->singlestep_enabled)) {
3365 if ((ctx->singlestep_enabled &
bdc4e053 3366 (CPU_BRANCH_STEP | CPU_SINGLE_STEP)) &&
8cbcb4fa
AJ
3367 ctx->exception == POWERPC_EXCP_BRANCH) {
3368 target_ulong tmp = ctx->nip;
3369 ctx->nip = dest;
e06fcd75 3370 gen_exception(ctx, POWERPC_EXCP_TRACE);
8cbcb4fa
AJ
3371 ctx->nip = tmp;
3372 }
3373 if (ctx->singlestep_enabled & GDBSTUB_SINGLE_STEP) {
e06fcd75 3374 gen_debug_exception(ctx);
8cbcb4fa
AJ
3375 }
3376 }
57fec1fe 3377 tcg_gen_exit_tb(0);
c1942362 3378 }
c53be334
FB
3379}
3380
636aa200 3381static inline void gen_setlr(DisasContext *ctx, target_ulong nip)
e1833e1f
JM
3382{
3383#if defined(TARGET_PPC64)
a2ffb812
AJ
3384 if (ctx->sf_mode == 0)
3385 tcg_gen_movi_tl(cpu_lr, (uint32_t)nip);
e1833e1f
JM
3386 else
3387#endif
a2ffb812 3388 tcg_gen_movi_tl(cpu_lr, nip);
e1833e1f
JM
3389}
3390
79aceca5 3391/* b ba bl bla */
99e300ef 3392static void gen_b(DisasContext *ctx)
79aceca5 3393{
76a66253 3394 target_ulong li, target;
38a64f9d 3395
8cbcb4fa 3396 ctx->exception = POWERPC_EXCP_BRANCH;
38a64f9d 3397 /* sign extend LI */
76a66253 3398#if defined(TARGET_PPC64)
d9bce9d9
JM
3399 if (ctx->sf_mode)
3400 li = ((int64_t)LI(ctx->opcode) << 38) >> 38;
3401 else
76a66253 3402#endif
d9bce9d9 3403 li = ((int32_t)LI(ctx->opcode) << 6) >> 6;
76a66253 3404 if (likely(AA(ctx->opcode) == 0))
046d6672 3405 target = ctx->nip + li - 4;
79aceca5 3406 else
9a64fbe4 3407 target = li;
e1833e1f
JM
3408 if (LK(ctx->opcode))
3409 gen_setlr(ctx, ctx->nip);
c1942362 3410 gen_goto_tb(ctx, 0, target);
79aceca5
FB
3411}
3412
e98a6e40
FB
3413#define BCOND_IM 0
3414#define BCOND_LR 1
3415#define BCOND_CTR 2
3416
636aa200 3417static inline void gen_bcond(DisasContext *ctx, int type)
d9bce9d9 3418{
d9bce9d9 3419 uint32_t bo = BO(ctx->opcode);
05f92404 3420 int l1;
a2ffb812 3421 TCGv target;
e98a6e40 3422
8cbcb4fa 3423 ctx->exception = POWERPC_EXCP_BRANCH;
a2ffb812 3424 if (type == BCOND_LR || type == BCOND_CTR) {
a7812ae4 3425 target = tcg_temp_local_new();
a2ffb812
AJ
3426 if (type == BCOND_CTR)
3427 tcg_gen_mov_tl(target, cpu_ctr);
3428 else
3429 tcg_gen_mov_tl(target, cpu_lr);
d2e9fd8f 3430 } else {
3431 TCGV_UNUSED(target);
e98a6e40 3432 }
e1833e1f
JM
3433 if (LK(ctx->opcode))
3434 gen_setlr(ctx, ctx->nip);
a2ffb812
AJ
3435 l1 = gen_new_label();
3436 if ((bo & 0x4) == 0) {
3437 /* Decrement and test CTR */
a7812ae4 3438 TCGv temp = tcg_temp_new();
a2ffb812 3439 if (unlikely(type == BCOND_CTR)) {
e06fcd75 3440 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL);
a2ffb812
AJ
3441 return;
3442 }
3443 tcg_gen_subi_tl(cpu_ctr, cpu_ctr, 1);
d9bce9d9 3444#if defined(TARGET_PPC64)
a2ffb812
AJ
3445 if (!ctx->sf_mode)
3446 tcg_gen_ext32u_tl(temp, cpu_ctr);
3447 else
d9bce9d9 3448#endif
a2ffb812
AJ
3449 tcg_gen_mov_tl(temp, cpu_ctr);
3450 if (bo & 0x2) {
3451 tcg_gen_brcondi_tl(TCG_COND_NE, temp, 0, l1);
3452 } else {
3453 tcg_gen_brcondi_tl(TCG_COND_EQ, temp, 0, l1);
e98a6e40 3454 }
a7812ae4 3455 tcg_temp_free(temp);
a2ffb812
AJ
3456 }
3457 if ((bo & 0x10) == 0) {
3458 /* Test CR */
3459 uint32_t bi = BI(ctx->opcode);
3460 uint32_t mask = 1 << (3 - (bi & 0x03));
a7812ae4 3461 TCGv_i32 temp = tcg_temp_new_i32();
a2ffb812 3462
d9bce9d9 3463 if (bo & 0x8) {
a2ffb812
AJ
3464 tcg_gen_andi_i32(temp, cpu_crf[bi >> 2], mask);
3465 tcg_gen_brcondi_i32(TCG_COND_EQ, temp, 0, l1);
d9bce9d9 3466 } else {
a2ffb812
AJ
3467 tcg_gen_andi_i32(temp, cpu_crf[bi >> 2], mask);
3468 tcg_gen_brcondi_i32(TCG_COND_NE, temp, 0, l1);
d9bce9d9 3469 }
a7812ae4 3470 tcg_temp_free_i32(temp);
d9bce9d9 3471 }
e98a6e40 3472 if (type == BCOND_IM) {
a2ffb812
AJ
3473 target_ulong li = (target_long)((int16_t)(BD(ctx->opcode)));
3474 if (likely(AA(ctx->opcode) == 0)) {
3475 gen_goto_tb(ctx, 0, ctx->nip + li - 4);
3476 } else {
3477 gen_goto_tb(ctx, 0, li);
3478 }
c53be334 3479 gen_set_label(l1);
c1942362 3480 gen_goto_tb(ctx, 1, ctx->nip);
e98a6e40 3481 } else {
d9bce9d9 3482#if defined(TARGET_PPC64)
a2ffb812
AJ
3483 if (!(ctx->sf_mode))
3484 tcg_gen_andi_tl(cpu_nip, target, (uint32_t)~3);
3485 else
3486#endif
3487 tcg_gen_andi_tl(cpu_nip, target, ~3);
3488 tcg_gen_exit_tb(0);
3489 gen_set_label(l1);
3490#if defined(TARGET_PPC64)
3491 if (!(ctx->sf_mode))
3492 tcg_gen_movi_tl(cpu_nip, (uint32_t)ctx->nip);
d9bce9d9
JM
3493 else
3494#endif
a2ffb812 3495 tcg_gen_movi_tl(cpu_nip, ctx->nip);
57fec1fe 3496 tcg_gen_exit_tb(0);
08e46e54 3497 }
e98a6e40
FB
3498}
3499
99e300ef 3500static void gen_bc(DisasContext *ctx)
3b46e624 3501{
e98a6e40
FB
3502 gen_bcond(ctx, BCOND_IM);
3503}
3504
99e300ef 3505static void gen_bcctr(DisasContext *ctx)
3b46e624 3506{
e98a6e40
FB
3507 gen_bcond(ctx, BCOND_CTR);
3508}
3509
99e300ef 3510static void gen_bclr(DisasContext *ctx)
3b46e624 3511{
e98a6e40
FB
3512 gen_bcond(ctx, BCOND_LR);
3513}
79aceca5
FB
3514
3515/*** Condition register logical ***/
e1571908 3516#define GEN_CRLOGIC(name, tcg_op, opc) \
99e300ef 3517static void glue(gen_, name)(DisasContext *ctx) \
79aceca5 3518{ \
fc0d441e
JM
3519 uint8_t bitmask; \
3520 int sh; \
a7812ae4 3521 TCGv_i32 t0, t1; \
fc0d441e 3522 sh = (crbD(ctx->opcode) & 0x03) - (crbA(ctx->opcode) & 0x03); \
a7812ae4 3523 t0 = tcg_temp_new_i32(); \
fc0d441e 3524 if (sh > 0) \
fea0c503 3525 tcg_gen_shri_i32(t0, cpu_crf[crbA(ctx->opcode) >> 2], sh); \
fc0d441e 3526 else if (sh < 0) \
fea0c503 3527 tcg_gen_shli_i32(t0, cpu_crf[crbA(ctx->opcode) >> 2], -sh); \
e1571908 3528 else \
fea0c503 3529 tcg_gen_mov_i32(t0, cpu_crf[crbA(ctx->opcode) >> 2]); \
a7812ae4 3530 t1 = tcg_temp_new_i32(); \
fc0d441e
JM
3531 sh = (crbD(ctx->opcode) & 0x03) - (crbB(ctx->opcode) & 0x03); \
3532 if (sh > 0) \
fea0c503 3533 tcg_gen_shri_i32(t1, cpu_crf[crbB(ctx->opcode) >> 2], sh); \
fc0d441e 3534 else if (sh < 0) \
fea0c503 3535 tcg_gen_shli_i32(t1, cpu_crf[crbB(ctx->opcode) >> 2], -sh); \
e1571908 3536 else \
fea0c503
AJ
3537 tcg_gen_mov_i32(t1, cpu_crf[crbB(ctx->opcode) >> 2]); \
3538 tcg_op(t0, t0, t1); \
fc0d441e 3539 bitmask = 1 << (3 - (crbD(ctx->opcode) & 0x03)); \
fea0c503
AJ
3540 tcg_gen_andi_i32(t0, t0, bitmask); \
3541 tcg_gen_andi_i32(t1, cpu_crf[crbD(ctx->opcode) >> 2], ~bitmask); \
3542 tcg_gen_or_i32(cpu_crf[crbD(ctx->opcode) >> 2], t0, t1); \
a7812ae4
PB
3543 tcg_temp_free_i32(t0); \
3544 tcg_temp_free_i32(t1); \
79aceca5
FB
3545}
3546
3547/* crand */
e1571908 3548GEN_CRLOGIC(crand, tcg_gen_and_i32, 0x08);
79aceca5 3549/* crandc */
e1571908 3550GEN_CRLOGIC(crandc, tcg_gen_andc_i32, 0x04);
79aceca5 3551/* creqv */
e1571908 3552GEN_CRLOGIC(creqv, tcg_gen_eqv_i32, 0x09);
79aceca5 3553/* crnand */
e1571908 3554GEN_CRLOGIC(crnand, tcg_gen_nand_i32, 0x07);
79aceca5 3555/* crnor */
e1571908 3556GEN_CRLOGIC(crnor, tcg_gen_nor_i32, 0x01);
79aceca5 3557/* cror */
e1571908 3558GEN_CRLOGIC(cror, tcg_gen_or_i32, 0x0E);
79aceca5 3559/* crorc */
e1571908 3560GEN_CRLOGIC(crorc, tcg_gen_orc_i32, 0x0D);
79aceca5 3561/* crxor */
e1571908 3562GEN_CRLOGIC(crxor, tcg_gen_xor_i32, 0x06);
99e300ef 3563
54623277 3564/* mcrf */
99e300ef 3565static void gen_mcrf(DisasContext *ctx)
79aceca5 3566{
47e4661c 3567 tcg_gen_mov_i32(cpu_crf[crfD(ctx->opcode)], cpu_crf[crfS(ctx->opcode)]);
79aceca5
FB
3568}
3569
3570/*** System linkage ***/
99e300ef 3571
54623277 3572/* rfi (mem_idx only) */
99e300ef 3573static void gen_rfi(DisasContext *ctx)
79aceca5 3574{
9a64fbe4 3575#if defined(CONFIG_USER_ONLY)
e06fcd75 3576 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
9a64fbe4
FB
3577#else
3578 /* Restore CPU state */
76db3ba4 3579 if (unlikely(!ctx->mem_idx)) {
e06fcd75 3580 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
9fddaa0c 3581 return;
9a64fbe4 3582 }
d72a19f7 3583 gen_helper_rfi();
e06fcd75 3584 gen_sync_exception(ctx);
9a64fbe4 3585#endif
79aceca5
FB
3586}
3587
426613db 3588#if defined(TARGET_PPC64)
99e300ef 3589static void gen_rfid(DisasContext *ctx)
426613db
JM
3590{
3591#if defined(CONFIG_USER_ONLY)
e06fcd75 3592 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
426613db
JM
3593#else
3594 /* Restore CPU state */
76db3ba4 3595 if (unlikely(!ctx->mem_idx)) {
e06fcd75 3596 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
426613db
JM
3597 return;
3598 }
d72a19f7 3599 gen_helper_rfid();
e06fcd75 3600 gen_sync_exception(ctx);
426613db
JM
3601#endif
3602}
426613db 3603
99e300ef 3604static void gen_hrfid(DisasContext *ctx)
be147d08
JM
3605{
3606#if defined(CONFIG_USER_ONLY)
e06fcd75 3607 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
be147d08
JM
3608#else
3609 /* Restore CPU state */
76db3ba4 3610 if (unlikely(ctx->mem_idx <= 1)) {
e06fcd75 3611 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
be147d08
JM
3612 return;
3613 }
d72a19f7 3614 gen_helper_hrfid();
e06fcd75 3615 gen_sync_exception(ctx);
be147d08
JM
3616#endif
3617}
3618#endif
3619
79aceca5 3620/* sc */
417bf010
JM
3621#if defined(CONFIG_USER_ONLY)
3622#define POWERPC_SYSCALL POWERPC_EXCP_SYSCALL_USER
3623#else
3624#define POWERPC_SYSCALL POWERPC_EXCP_SYSCALL
3625#endif
99e300ef 3626static void gen_sc(DisasContext *ctx)
79aceca5 3627{
e1833e1f
JM
3628 uint32_t lev;
3629
3630 lev = (ctx->opcode >> 5) & 0x7F;
e06fcd75 3631 gen_exception_err(ctx, POWERPC_SYSCALL, lev);
79aceca5
FB
3632}
3633
3634/*** Trap ***/
99e300ef 3635
54623277 3636/* tw */
99e300ef 3637static void gen_tw(DisasContext *ctx)
79aceca5 3638{
cab3bee2 3639 TCGv_i32 t0 = tcg_const_i32(TO(ctx->opcode));
db9a231d
AJ
3640 /* Update the nip since this might generate a trap exception */
3641 gen_update_nip(ctx, ctx->nip);
cab3bee2
AJ
3642 gen_helper_tw(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)], t0);
3643 tcg_temp_free_i32(t0);
79aceca5
FB
3644}
3645
3646/* twi */
99e300ef 3647static void gen_twi(DisasContext *ctx)
79aceca5 3648{
cab3bee2
AJ
3649 TCGv t0 = tcg_const_tl(SIMM(ctx->opcode));
3650 TCGv_i32 t1 = tcg_const_i32(TO(ctx->opcode));
db9a231d
AJ
3651 /* Update the nip since this might generate a trap exception */
3652 gen_update_nip(ctx, ctx->nip);
cab3bee2
AJ
3653 gen_helper_tw(cpu_gpr[rA(ctx->opcode)], t0, t1);
3654 tcg_temp_free(t0);
3655 tcg_temp_free_i32(t1);
79aceca5
FB
3656}
3657
d9bce9d9
JM
3658#if defined(TARGET_PPC64)
3659/* td */
99e300ef 3660static void gen_td(DisasContext *ctx)
d9bce9d9 3661{
cab3bee2 3662 TCGv_i32 t0 = tcg_const_i32(TO(ctx->opcode));
db9a231d
AJ
3663 /* Update the nip since this might generate a trap exception */
3664 gen_update_nip(ctx, ctx->nip);
cab3bee2
AJ
3665 gen_helper_td(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)], t0);
3666 tcg_temp_free_i32(t0);
d9bce9d9
JM
3667}
3668
3669/* tdi */
99e300ef 3670static void gen_tdi(DisasContext *ctx)
d9bce9d9 3671{
cab3bee2
AJ
3672 TCGv t0 = tcg_const_tl(SIMM(ctx->opcode));
3673 TCGv_i32 t1 = tcg_const_i32(TO(ctx->opcode));
db9a231d
AJ
3674 /* Update the nip since this might generate a trap exception */
3675 gen_update_nip(ctx, ctx->nip);
cab3bee2
AJ
3676 gen_helper_td(cpu_gpr[rA(ctx->opcode)], t0, t1);
3677 tcg_temp_free(t0);
3678 tcg_temp_free_i32(t1);
d9bce9d9
JM
3679}
3680#endif
3681
79aceca5 3682/*** Processor control ***/
99e300ef 3683
54623277 3684/* mcrxr */
99e300ef 3685static void gen_mcrxr(DisasContext *ctx)
79aceca5 3686{
3d7b417e
AJ
3687 tcg_gen_trunc_tl_i32(cpu_crf[crfD(ctx->opcode)], cpu_xer);
3688 tcg_gen_shri_i32(cpu_crf[crfD(ctx->opcode)], cpu_crf[crfD(ctx->opcode)], XER_CA);
269f3e95 3689 tcg_gen_andi_tl(cpu_xer, cpu_xer, ~(1 << XER_SO | 1 << XER_OV | 1 << XER_CA));
79aceca5
FB
3690}
3691
0cfe11ea 3692/* mfcr mfocrf */
99e300ef 3693static void gen_mfcr(DisasContext *ctx)
79aceca5 3694{
76a66253 3695 uint32_t crm, crn;
3b46e624 3696
76a66253
JM
3697 if (likely(ctx->opcode & 0x00100000)) {
3698 crm = CRM(ctx->opcode);
8dd640e4 3699 if (likely(crm && ((crm & (crm - 1)) == 0))) {
0cfe11ea 3700 crn = ctz32 (crm);
e1571908 3701 tcg_gen_extu_i32_tl(cpu_gpr[rD(ctx->opcode)], cpu_crf[7 - crn]);
0497d2f4
AJ
3702 tcg_gen_shli_tl(cpu_gpr[rD(ctx->opcode)],
3703 cpu_gpr[rD(ctx->opcode)], crn * 4);
76a66253 3704 }
d9bce9d9 3705 } else {
651721b2
AJ
3706 TCGv_i32 t0 = tcg_temp_new_i32();
3707 tcg_gen_mov_i32(t0, cpu_crf[0]);
3708 tcg_gen_shli_i32(t0, t0, 4);
3709 tcg_gen_or_i32(t0, t0, cpu_crf[1]);
3710 tcg_gen_shli_i32(t0, t0, 4);
3711 tcg_gen_or_i32(t0, t0, cpu_crf[2]);
3712 tcg_gen_shli_i32(t0, t0, 4);
3713 tcg_gen_or_i32(t0, t0, cpu_crf[3]);
3714 tcg_gen_shli_i32(t0, t0, 4);
3715 tcg_gen_or_i32(t0, t0, cpu_crf[4]);
3716 tcg_gen_shli_i32(t0, t0, 4);
3717 tcg_gen_or_i32(t0, t0, cpu_crf[5]);
3718 tcg_gen_shli_i32(t0, t0, 4);
3719 tcg_gen_or_i32(t0, t0, cpu_crf[6]);
3720 tcg_gen_shli_i32(t0, t0, 4);
3721 tcg_gen_or_i32(t0, t0, cpu_crf[7]);
3722 tcg_gen_extu_i32_tl(cpu_gpr[rD(ctx->opcode)], t0);
3723 tcg_temp_free_i32(t0);
d9bce9d9 3724 }
79aceca5
FB
3725}
3726
3727/* mfmsr */
99e300ef 3728static void gen_mfmsr(DisasContext *ctx)
79aceca5 3729{
9a64fbe4 3730#if defined(CONFIG_USER_ONLY)
e06fcd75 3731 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_REG);
9a64fbe4 3732#else
76db3ba4 3733 if (unlikely(!ctx->mem_idx)) {
e06fcd75 3734 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_REG);
9fddaa0c 3735 return;
9a64fbe4 3736 }
6527f6ea 3737 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_msr);
9a64fbe4 3738#endif
79aceca5
FB
3739}
3740
7b13448f 3741static void spr_noaccess(void *opaque, int gprn, int sprn)
3fc6c082 3742{
7b13448f 3743#if 0
3fc6c082
FB
3744 sprn = ((sprn >> 5) & 0x1F) | ((sprn & 0x1F) << 5);
3745 printf("ERROR: try to access SPR %d !\n", sprn);
7b13448f 3746#endif
3fc6c082
FB
3747}
3748#define SPR_NOACCESS (&spr_noaccess)
3fc6c082 3749
79aceca5 3750/* mfspr */
636aa200 3751static inline void gen_op_mfspr(DisasContext *ctx)
79aceca5 3752{
45d827d2 3753 void (*read_cb)(void *opaque, int gprn, int sprn);
79aceca5
FB
3754 uint32_t sprn = SPR(ctx->opcode);
3755
3fc6c082 3756#if !defined(CONFIG_USER_ONLY)
76db3ba4 3757 if (ctx->mem_idx == 2)
be147d08 3758 read_cb = ctx->spr_cb[sprn].hea_read;
76db3ba4 3759 else if (ctx->mem_idx)
3fc6c082
FB
3760 read_cb = ctx->spr_cb[sprn].oea_read;
3761 else
9a64fbe4 3762#endif
3fc6c082 3763 read_cb = ctx->spr_cb[sprn].uea_read;
76a66253
JM
3764 if (likely(read_cb != NULL)) {
3765 if (likely(read_cb != SPR_NOACCESS)) {
45d827d2 3766 (*read_cb)(ctx, rD(ctx->opcode), sprn);
3fc6c082
FB
3767 } else {
3768 /* Privilege exception */
9fceefa7
JM
3769 /* This is a hack to avoid warnings when running Linux:
3770 * this OS breaks the PowerPC virtualisation model,
3771 * allowing userland application to read the PVR
3772 */
3773 if (sprn != SPR_PVR) {
93fcfe39 3774 qemu_log("Trying to read privileged spr %d %03x at "
90e189ec
BS
3775 TARGET_FMT_lx "\n", sprn, sprn, ctx->nip);
3776 printf("Trying to read privileged spr %d %03x at "
3777 TARGET_FMT_lx "\n", sprn, sprn, ctx->nip);
f24e5695 3778 }
e06fcd75 3779 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_REG);
79aceca5 3780 }
3fc6c082
FB
3781 } else {
3782 /* Not defined */
93fcfe39 3783 qemu_log("Trying to read invalid spr %d %03x at "
90e189ec
BS
3784 TARGET_FMT_lx "\n", sprn, sprn, ctx->nip);
3785 printf("Trying to read invalid spr %d %03x at " TARGET_FMT_lx "\n",
077fc206 3786 sprn, sprn, ctx->nip);
e06fcd75 3787 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_SPR);
79aceca5 3788 }
79aceca5
FB
3789}
3790
99e300ef 3791static void gen_mfspr(DisasContext *ctx)
79aceca5 3792{
3fc6c082 3793 gen_op_mfspr(ctx);
76a66253 3794}
3fc6c082
FB
3795
3796/* mftb */
99e300ef 3797static void gen_mftb(DisasContext *ctx)
3fc6c082
FB
3798{
3799 gen_op_mfspr(ctx);
79aceca5
FB
3800}
3801
0cfe11ea 3802/* mtcrf mtocrf*/
99e300ef 3803static void gen_mtcrf(DisasContext *ctx)
79aceca5 3804{
76a66253 3805 uint32_t crm, crn;
3b46e624 3806
76a66253 3807 crm = CRM(ctx->opcode);
8dd640e4 3808 if (likely((ctx->opcode & 0x00100000))) {
3809 if (crm && ((crm & (crm - 1)) == 0)) {
3810 TCGv_i32 temp = tcg_temp_new_i32();
0cfe11ea 3811 crn = ctz32 (crm);
8dd640e4 3812 tcg_gen_trunc_tl_i32(temp, cpu_gpr[rS(ctx->opcode)]);
0cfe11ea
AJ
3813 tcg_gen_shri_i32(temp, temp, crn * 4);
3814 tcg_gen_andi_i32(cpu_crf[7 - crn], temp, 0xf);
8dd640e4 3815 tcg_temp_free_i32(temp);
3816 }
76a66253 3817 } else {
651721b2
AJ
3818 TCGv_i32 temp = tcg_temp_new_i32();
3819 tcg_gen_trunc_tl_i32(temp, cpu_gpr[rS(ctx->opcode)]);
3820 for (crn = 0 ; crn < 8 ; crn++) {
3821 if (crm & (1 << crn)) {
3822 tcg_gen_shri_i32(cpu_crf[7 - crn], temp, crn * 4);
3823 tcg_gen_andi_i32(cpu_crf[7 - crn], cpu_crf[7 - crn], 0xf);
3824 }
3825 }
a7812ae4 3826 tcg_temp_free_i32(temp);
76a66253 3827 }
79aceca5
FB
3828}
3829
3830/* mtmsr */
426613db 3831#if defined(TARGET_PPC64)
99e300ef 3832static void gen_mtmsrd(DisasContext *ctx)
426613db
JM
3833{
3834#if defined(CONFIG_USER_ONLY)
e06fcd75 3835 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_REG);
426613db 3836#else
76db3ba4 3837 if (unlikely(!ctx->mem_idx)) {
e06fcd75 3838 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_REG);
426613db
JM
3839 return;
3840 }
be147d08
JM
3841 if (ctx->opcode & 0x00010000) {
3842 /* Special form that does not need any synchronisation */
6527f6ea
AJ
3843 TCGv t0 = tcg_temp_new();
3844 tcg_gen_andi_tl(t0, cpu_gpr[rS(ctx->opcode)], (1 << MSR_RI) | (1 << MSR_EE));
3845 tcg_gen_andi_tl(cpu_msr, cpu_msr, ~((1 << MSR_RI) | (1 << MSR_EE)));
3846 tcg_gen_or_tl(cpu_msr, cpu_msr, t0);
3847 tcg_temp_free(t0);
be147d08 3848 } else {
056b05f8
JM
3849 /* XXX: we need to update nip before the store
3850 * if we enter power saving mode, we will exit the loop
3851 * directly from ppc_store_msr
3852 */
be147d08 3853 gen_update_nip(ctx, ctx->nip);
6527f6ea 3854 gen_helper_store_msr(cpu_gpr[rS(ctx->opcode)]);
be147d08
JM
3855 /* Must stop the translation as machine state (may have) changed */
3856 /* Note that mtmsr is not always defined as context-synchronizing */
e06fcd75 3857 gen_stop_exception(ctx);
be147d08 3858 }
426613db
JM
3859#endif
3860}
3861#endif
3862
99e300ef 3863static void gen_mtmsr(DisasContext *ctx)
79aceca5 3864{
9a64fbe4 3865#if defined(CONFIG_USER_ONLY)
e06fcd75 3866 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_REG);
9a64fbe4 3867#else
76db3ba4 3868 if (unlikely(!ctx->mem_idx)) {
e06fcd75 3869 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_REG);
9fddaa0c 3870 return;
9a64fbe4 3871 }
be147d08
JM
3872 if (ctx->opcode & 0x00010000) {
3873 /* Special form that does not need any synchronisation */
6527f6ea
AJ
3874 TCGv t0 = tcg_temp_new();
3875 tcg_gen_andi_tl(t0, cpu_gpr[rS(ctx->opcode)], (1 << MSR_RI) | (1 << MSR_EE));
3876 tcg_gen_andi_tl(cpu_msr, cpu_msr, ~((1 << MSR_RI) | (1 << MSR_EE)));
3877 tcg_gen_or_tl(cpu_msr, cpu_msr, t0);
3878 tcg_temp_free(t0);
be147d08 3879 } else {
8018dc63
AG
3880 TCGv msr = tcg_temp_new();
3881
056b05f8
JM
3882 /* XXX: we need to update nip before the store
3883 * if we enter power saving mode, we will exit the loop
3884 * directly from ppc_store_msr
3885 */
be147d08 3886 gen_update_nip(ctx, ctx->nip);
d9bce9d9 3887#if defined(TARGET_PPC64)
8018dc63
AG
3888 tcg_gen_deposit_tl(msr, cpu_msr, cpu_gpr[rS(ctx->opcode)], 0, 32);
3889#else
3890 tcg_gen_mov_tl(msr, cpu_gpr[rS(ctx->opcode)]);
d9bce9d9 3891#endif
8018dc63 3892 gen_helper_store_msr(msr);
be147d08 3893 /* Must stop the translation as machine state (may have) changed */
6527f6ea 3894 /* Note that mtmsr is not always defined as context-synchronizing */
e06fcd75 3895 gen_stop_exception(ctx);
be147d08 3896 }
9a64fbe4 3897#endif
79aceca5
FB
3898}
3899
3900/* mtspr */
99e300ef 3901static void gen_mtspr(DisasContext *ctx)
79aceca5 3902{
45d827d2 3903 void (*write_cb)(void *opaque, int sprn, int gprn);
79aceca5
FB
3904 uint32_t sprn = SPR(ctx->opcode);
3905
3fc6c082 3906#if !defined(CONFIG_USER_ONLY)
76db3ba4 3907 if (ctx->mem_idx == 2)
be147d08 3908 write_cb = ctx->spr_cb[sprn].hea_write;
76db3ba4 3909 else if (ctx->mem_idx)
3fc6c082
FB
3910 write_cb = ctx->spr_cb[sprn].oea_write;
3911 else
9a64fbe4 3912#endif
3fc6c082 3913 write_cb = ctx->spr_cb[sprn].uea_write;
76a66253
JM
3914 if (likely(write_cb != NULL)) {
3915 if (likely(write_cb != SPR_NOACCESS)) {
45d827d2 3916 (*write_cb)(ctx, sprn, rS(ctx->opcode));
3fc6c082
FB
3917 } else {
3918 /* Privilege exception */
93fcfe39 3919 qemu_log("Trying to write privileged spr %d %03x at "
90e189ec
BS
3920 TARGET_FMT_lx "\n", sprn, sprn, ctx->nip);
3921 printf("Trying to write privileged spr %d %03x at " TARGET_FMT_lx
3922 "\n", sprn, sprn, ctx->nip);
e06fcd75 3923 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_REG);
76a66253 3924 }
3fc6c082
FB
3925 } else {
3926 /* Not defined */
93fcfe39 3927 qemu_log("Trying to write invalid spr %d %03x at "
90e189ec
BS
3928 TARGET_FMT_lx "\n", sprn, sprn, ctx->nip);
3929 printf("Trying to write invalid spr %d %03x at " TARGET_FMT_lx "\n",
077fc206 3930 sprn, sprn, ctx->nip);
e06fcd75 3931 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_SPR);
79aceca5 3932 }
79aceca5
FB
3933}
3934
3935/*** Cache management ***/
99e300ef 3936
54623277 3937/* dcbf */
99e300ef 3938static void gen_dcbf(DisasContext *ctx)
79aceca5 3939{
dac454af 3940 /* XXX: specification says this is treated as a load by the MMU */
76db3ba4
AJ
3941 TCGv t0;
3942 gen_set_access_type(ctx, ACCESS_CACHE);
3943 t0 = tcg_temp_new();
3944 gen_addr_reg_index(ctx, t0);
3945 gen_qemu_ld8u(ctx, t0, t0);
fea0c503 3946 tcg_temp_free(t0);
79aceca5
FB
3947}
3948
3949/* dcbi (Supervisor only) */
99e300ef 3950static void gen_dcbi(DisasContext *ctx)
79aceca5 3951{
a541f297 3952#if defined(CONFIG_USER_ONLY)
e06fcd75 3953 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
a541f297 3954#else
b61f2753 3955 TCGv EA, val;
76db3ba4 3956 if (unlikely(!ctx->mem_idx)) {
e06fcd75 3957 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
9fddaa0c 3958 return;
9a64fbe4 3959 }
a7812ae4 3960 EA = tcg_temp_new();
76db3ba4
AJ
3961 gen_set_access_type(ctx, ACCESS_CACHE);
3962 gen_addr_reg_index(ctx, EA);
a7812ae4 3963 val = tcg_temp_new();
76a66253 3964 /* XXX: specification says this should be treated as a store by the MMU */
76db3ba4
AJ
3965 gen_qemu_ld8u(ctx, val, EA);
3966 gen_qemu_st8(ctx, val, EA);
b61f2753
AJ
3967 tcg_temp_free(val);
3968 tcg_temp_free(EA);
a541f297 3969#endif
79aceca5
FB
3970}
3971
3972/* dcdst */
99e300ef 3973static void gen_dcbst(DisasContext *ctx)
79aceca5 3974{
76a66253 3975 /* XXX: specification say this is treated as a load by the MMU */
76db3ba4
AJ
3976 TCGv t0;
3977 gen_set_access_type(ctx, ACCESS_CACHE);
3978 t0 = tcg_temp_new();
3979 gen_addr_reg_index(ctx, t0);
3980 gen_qemu_ld8u(ctx, t0, t0);
fea0c503 3981 tcg_temp_free(t0);
79aceca5
FB
3982}
3983
3984/* dcbt */
99e300ef 3985static void gen_dcbt(DisasContext *ctx)
79aceca5 3986{
0db1b20e 3987 /* interpreted as no-op */
76a66253
JM
3988 /* XXX: specification say this is treated as a load by the MMU
3989 * but does not generate any exception
3990 */
79aceca5
FB
3991}
3992
3993/* dcbtst */
99e300ef 3994static void gen_dcbtst(DisasContext *ctx)
79aceca5 3995{
0db1b20e 3996 /* interpreted as no-op */
76a66253
JM
3997 /* XXX: specification say this is treated as a load by the MMU
3998 * but does not generate any exception
3999 */
79aceca5
FB
4000}
4001
4002/* dcbz */
99e300ef 4003static void gen_dcbz(DisasContext *ctx)
79aceca5 4004{
76db3ba4
AJ
4005 TCGv t0;
4006 gen_set_access_type(ctx, ACCESS_CACHE);
799a8c8d
AJ
4007 /* NIP cannot be restored if the memory exception comes from an helper */
4008 gen_update_nip(ctx, ctx->nip - 4);
76db3ba4
AJ
4009 t0 = tcg_temp_new();
4010 gen_addr_reg_index(ctx, t0);
799a8c8d
AJ
4011 gen_helper_dcbz(t0);
4012 tcg_temp_free(t0);
d63001d1
JM
4013}
4014
e8eaa2c0 4015static void gen_dcbz_970(DisasContext *ctx)
d63001d1 4016{
76db3ba4
AJ
4017 TCGv t0;
4018 gen_set_access_type(ctx, ACCESS_CACHE);
799a8c8d
AJ
4019 /* NIP cannot be restored if the memory exception comes from an helper */
4020 gen_update_nip(ctx, ctx->nip - 4);
76db3ba4
AJ
4021 t0 = tcg_temp_new();
4022 gen_addr_reg_index(ctx, t0);
d63001d1 4023 if (ctx->opcode & 0x00200000)
799a8c8d 4024 gen_helper_dcbz(t0);
d63001d1 4025 else
799a8c8d
AJ
4026 gen_helper_dcbz_970(t0);
4027 tcg_temp_free(t0);
79aceca5
FB
4028}
4029
ae1c1a3d 4030/* dst / dstt */
99e300ef 4031static void gen_dst(DisasContext *ctx)
ae1c1a3d
AJ
4032{
4033 if (rA(ctx->opcode) == 0) {
4034 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_LSWX);
4035 } else {
4036 /* interpreted as no-op */
4037 }
4038}
4039
4040/* dstst /dststt */
99e300ef 4041static void gen_dstst(DisasContext *ctx)
ae1c1a3d
AJ
4042{
4043 if (rA(ctx->opcode) == 0) {
4044 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_LSWX);
4045 } else {
4046 /* interpreted as no-op */
4047 }
4048
4049}
4050
4051/* dss / dssall */
99e300ef 4052static void gen_dss(DisasContext *ctx)
ae1c1a3d
AJ
4053{
4054 /* interpreted as no-op */
4055}
4056
79aceca5 4057/* icbi */
99e300ef 4058static void gen_icbi(DisasContext *ctx)
79aceca5 4059{
76db3ba4
AJ
4060 TCGv t0;
4061 gen_set_access_type(ctx, ACCESS_CACHE);
30032c94
JM
4062 /* NIP cannot be restored if the memory exception comes from an helper */
4063 gen_update_nip(ctx, ctx->nip - 4);
76db3ba4
AJ
4064 t0 = tcg_temp_new();
4065 gen_addr_reg_index(ctx, t0);
37d269df
AJ
4066 gen_helper_icbi(t0);
4067 tcg_temp_free(t0);
79aceca5
FB
4068}
4069
4070/* Optional: */
4071/* dcba */
99e300ef 4072static void gen_dcba(DisasContext *ctx)
79aceca5 4073{
0db1b20e
JM
4074 /* interpreted as no-op */
4075 /* XXX: specification say this is treated as a store by the MMU
4076 * but does not generate any exception
4077 */
79aceca5
FB
4078}
4079
4080/*** Segment register manipulation ***/
4081/* Supervisor only: */
99e300ef 4082
54623277 4083/* mfsr */
99e300ef 4084static void gen_mfsr(DisasContext *ctx)
79aceca5 4085{
9a64fbe4 4086#if defined(CONFIG_USER_ONLY)
e06fcd75 4087 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_REG);
9a64fbe4 4088#else
74d37793 4089 TCGv t0;
76db3ba4 4090 if (unlikely(!ctx->mem_idx)) {
e06fcd75 4091 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_REG);
9fddaa0c 4092 return;
9a64fbe4 4093 }
74d37793
AJ
4094 t0 = tcg_const_tl(SR(ctx->opcode));
4095 gen_helper_load_sr(cpu_gpr[rD(ctx->opcode)], t0);
4096 tcg_temp_free(t0);
9a64fbe4 4097#endif
79aceca5
FB
4098}
4099
4100/* mfsrin */
99e300ef 4101static void gen_mfsrin(DisasContext *ctx)
79aceca5 4102{
9a64fbe4 4103#if defined(CONFIG_USER_ONLY)
e06fcd75 4104 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_REG);
9a64fbe4 4105#else
74d37793 4106 TCGv t0;
76db3ba4 4107 if (unlikely(!ctx->mem_idx)) {
e06fcd75 4108 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_REG);
9fddaa0c 4109 return;
9a64fbe4 4110 }
74d37793
AJ
4111 t0 = tcg_temp_new();
4112 tcg_gen_shri_tl(t0, cpu_gpr[rB(ctx->opcode)], 28);
4113 tcg_gen_andi_tl(t0, t0, 0xF);
4114 gen_helper_load_sr(cpu_gpr[rD(ctx->opcode)], t0);
4115 tcg_temp_free(t0);
9a64fbe4 4116#endif
79aceca5
FB
4117}
4118
4119/* mtsr */
99e300ef 4120static void gen_mtsr(DisasContext *ctx)
79aceca5 4121{
9a64fbe4 4122#if defined(CONFIG_USER_ONLY)
e06fcd75 4123 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_REG);
9a64fbe4 4124#else
74d37793 4125 TCGv t0;
76db3ba4 4126 if (unlikely(!ctx->mem_idx)) {
e06fcd75 4127 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_REG);
9fddaa0c 4128 return;
9a64fbe4 4129 }
74d37793
AJ
4130 t0 = tcg_const_tl(SR(ctx->opcode));
4131 gen_helper_store_sr(t0, cpu_gpr[rS(ctx->opcode)]);
4132 tcg_temp_free(t0);
9a64fbe4 4133#endif
79aceca5
FB
4134}
4135
4136/* mtsrin */
99e300ef 4137static void gen_mtsrin(DisasContext *ctx)
79aceca5 4138{
9a64fbe4 4139#if defined(CONFIG_USER_ONLY)
e06fcd75 4140 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_REG);
9a64fbe4 4141#else
74d37793 4142 TCGv t0;
76db3ba4 4143 if (unlikely(!ctx->mem_idx)) {
e06fcd75 4144 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_REG);
9fddaa0c 4145 return;
9a64fbe4 4146 }
74d37793
AJ
4147 t0 = tcg_temp_new();
4148 tcg_gen_shri_tl(t0, cpu_gpr[rB(ctx->opcode)], 28);
4149 tcg_gen_andi_tl(t0, t0, 0xF);
4150 gen_helper_store_sr(t0, cpu_gpr[rD(ctx->opcode)]);
4151 tcg_temp_free(t0);
9a64fbe4 4152#endif
79aceca5
FB
4153}
4154
12de9a39
JM
4155#if defined(TARGET_PPC64)
4156/* Specific implementation for PowerPC 64 "bridge" emulation using SLB */
e8eaa2c0 4157
54623277 4158/* mfsr */
e8eaa2c0 4159static void gen_mfsr_64b(DisasContext *ctx)
12de9a39
JM
4160{
4161#if defined(CONFIG_USER_ONLY)
e06fcd75 4162 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_REG);
12de9a39 4163#else
74d37793 4164 TCGv t0;
76db3ba4 4165 if (unlikely(!ctx->mem_idx)) {
e06fcd75 4166 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_REG);
12de9a39
JM
4167 return;
4168 }
74d37793 4169 t0 = tcg_const_tl(SR(ctx->opcode));
f6b868fc 4170 gen_helper_load_sr(cpu_gpr[rD(ctx->opcode)], t0);
74d37793 4171 tcg_temp_free(t0);
12de9a39
JM
4172#endif
4173}
4174
4175/* mfsrin */
e8eaa2c0 4176static void gen_mfsrin_64b(DisasContext *ctx)
12de9a39
JM
4177{
4178#if defined(CONFIG_USER_ONLY)
e06fcd75 4179 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_REG);
12de9a39 4180#else
74d37793 4181 TCGv t0;
76db3ba4 4182 if (unlikely(!ctx->mem_idx)) {
e06fcd75 4183 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_REG);
12de9a39
JM
4184 return;
4185 }
74d37793
AJ
4186 t0 = tcg_temp_new();
4187 tcg_gen_shri_tl(t0, cpu_gpr[rB(ctx->opcode)], 28);
4188 tcg_gen_andi_tl(t0, t0, 0xF);
f6b868fc 4189 gen_helper_load_sr(cpu_gpr[rD(ctx->opcode)], t0);
74d37793 4190 tcg_temp_free(t0);
12de9a39
JM
4191#endif
4192}
4193
4194/* mtsr */
e8eaa2c0 4195static void gen_mtsr_64b(DisasContext *ctx)
12de9a39
JM
4196{
4197#if defined(CONFIG_USER_ONLY)
e06fcd75 4198 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_REG);
12de9a39 4199#else
74d37793 4200 TCGv t0;
76db3ba4 4201 if (unlikely(!ctx->mem_idx)) {
e06fcd75 4202 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_REG);
12de9a39
JM
4203 return;
4204 }
74d37793 4205 t0 = tcg_const_tl(SR(ctx->opcode));
f6b868fc 4206 gen_helper_store_sr(t0, cpu_gpr[rS(ctx->opcode)]);
74d37793 4207 tcg_temp_free(t0);
12de9a39
JM
4208#endif
4209}
4210
4211/* mtsrin */
e8eaa2c0 4212static void gen_mtsrin_64b(DisasContext *ctx)
12de9a39
JM
4213{
4214#if defined(CONFIG_USER_ONLY)
e06fcd75 4215 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_REG);
12de9a39 4216#else
74d37793 4217 TCGv t0;
76db3ba4 4218 if (unlikely(!ctx->mem_idx)) {
e06fcd75 4219 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_REG);
12de9a39
JM
4220 return;
4221 }
74d37793
AJ
4222 t0 = tcg_temp_new();
4223 tcg_gen_shri_tl(t0, cpu_gpr[rB(ctx->opcode)], 28);
4224 tcg_gen_andi_tl(t0, t0, 0xF);
f6b868fc 4225 gen_helper_store_sr(t0, cpu_gpr[rS(ctx->opcode)]);
74d37793 4226 tcg_temp_free(t0);
12de9a39
JM
4227#endif
4228}
f6b868fc
BS
4229
4230/* slbmte */
e8eaa2c0 4231static void gen_slbmte(DisasContext *ctx)
f6b868fc
BS
4232{
4233#if defined(CONFIG_USER_ONLY)
4234 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_REG);
4235#else
4236 if (unlikely(!ctx->mem_idx)) {
4237 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_REG);
4238 return;
4239 }
4240 gen_helper_store_slb(cpu_gpr[rB(ctx->opcode)], cpu_gpr[rS(ctx->opcode)]);
4241#endif
4242}
4243
efdef95f
DG
4244static void gen_slbmfee(DisasContext *ctx)
4245{
4246#if defined(CONFIG_USER_ONLY)
4247 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_REG);
4248#else
4249 if (unlikely(!ctx->mem_idx)) {
4250 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_REG);
4251 return;
4252 }
4253 gen_helper_load_slb_esid(cpu_gpr[rS(ctx->opcode)],
4254 cpu_gpr[rB(ctx->opcode)]);
4255#endif
4256}
4257
4258static void gen_slbmfev(DisasContext *ctx)
4259{
4260#if defined(CONFIG_USER_ONLY)
4261 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_REG);
4262#else
4263 if (unlikely(!ctx->mem_idx)) {
4264 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_REG);
4265 return;
4266 }
4267 gen_helper_load_slb_vsid(cpu_gpr[rS(ctx->opcode)],
4268 cpu_gpr[rB(ctx->opcode)]);
4269#endif
4270}
12de9a39
JM
4271#endif /* defined(TARGET_PPC64) */
4272
79aceca5 4273/*** Lookaside buffer management ***/
76db3ba4 4274/* Optional & mem_idx only: */
99e300ef 4275
54623277 4276/* tlbia */
99e300ef 4277static void gen_tlbia(DisasContext *ctx)
79aceca5 4278{
9a64fbe4 4279#if defined(CONFIG_USER_ONLY)
e06fcd75 4280 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
9a64fbe4 4281#else
76db3ba4 4282 if (unlikely(!ctx->mem_idx)) {
e06fcd75 4283 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
9fddaa0c 4284 return;
9a64fbe4 4285 }
74d37793 4286 gen_helper_tlbia();
9a64fbe4 4287#endif
79aceca5
FB
4288}
4289
bf14b1ce 4290/* tlbiel */
99e300ef 4291static void gen_tlbiel(DisasContext *ctx)
bf14b1ce
BS
4292{
4293#if defined(CONFIG_USER_ONLY)
4294 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
4295#else
4296 if (unlikely(!ctx->mem_idx)) {
4297 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
4298 return;
4299 }
4300 gen_helper_tlbie(cpu_gpr[rB(ctx->opcode)]);
4301#endif
4302}
4303
79aceca5 4304/* tlbie */
99e300ef 4305static void gen_tlbie(DisasContext *ctx)
79aceca5 4306{
9a64fbe4 4307#if defined(CONFIG_USER_ONLY)
e06fcd75 4308 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
9a64fbe4 4309#else
76db3ba4 4310 if (unlikely(!ctx->mem_idx)) {
e06fcd75 4311 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
9fddaa0c 4312 return;
9a64fbe4 4313 }
d9bce9d9 4314#if defined(TARGET_PPC64)
74d37793
AJ
4315 if (!ctx->sf_mode) {
4316 TCGv t0 = tcg_temp_new();
4317 tcg_gen_ext32u_tl(t0, cpu_gpr[rB(ctx->opcode)]);
4318 gen_helper_tlbie(t0);
4319 tcg_temp_free(t0);
4320 } else
d9bce9d9 4321#endif
74d37793 4322 gen_helper_tlbie(cpu_gpr[rB(ctx->opcode)]);
9a64fbe4 4323#endif
79aceca5
FB
4324}
4325
4326/* tlbsync */
99e300ef 4327static void gen_tlbsync(DisasContext *ctx)
79aceca5 4328{
9a64fbe4 4329#if defined(CONFIG_USER_ONLY)
e06fcd75 4330 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
9a64fbe4 4331#else
76db3ba4 4332 if (unlikely(!ctx->mem_idx)) {
e06fcd75 4333 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
9fddaa0c 4334 return;
9a64fbe4
FB
4335 }
4336 /* This has no effect: it should ensure that all previous
4337 * tlbie have completed
4338 */
e06fcd75 4339 gen_stop_exception(ctx);
9a64fbe4 4340#endif
79aceca5
FB
4341}
4342
426613db
JM
4343#if defined(TARGET_PPC64)
4344/* slbia */
99e300ef 4345static void gen_slbia(DisasContext *ctx)
426613db
JM
4346{
4347#if defined(CONFIG_USER_ONLY)
e06fcd75 4348 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
426613db 4349#else
76db3ba4 4350 if (unlikely(!ctx->mem_idx)) {
e06fcd75 4351 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
426613db
JM
4352 return;
4353 }
74d37793 4354 gen_helper_slbia();
426613db
JM
4355#endif
4356}
4357
4358/* slbie */
99e300ef 4359static void gen_slbie(DisasContext *ctx)
426613db
JM
4360{
4361#if defined(CONFIG_USER_ONLY)
e06fcd75 4362 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
426613db 4363#else
76db3ba4 4364 if (unlikely(!ctx->mem_idx)) {
e06fcd75 4365 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
426613db
JM
4366 return;
4367 }
74d37793 4368 gen_helper_slbie(cpu_gpr[rB(ctx->opcode)]);
426613db
JM
4369#endif
4370}
4371#endif
4372
79aceca5
FB
4373/*** External control ***/
4374/* Optional: */
99e300ef 4375
54623277 4376/* eciwx */
99e300ef 4377static void gen_eciwx(DisasContext *ctx)
79aceca5 4378{
76db3ba4 4379 TCGv t0;
fa407c03 4380 /* Should check EAR[E] ! */
76db3ba4
AJ
4381 gen_set_access_type(ctx, ACCESS_EXT);
4382 t0 = tcg_temp_new();
4383 gen_addr_reg_index(ctx, t0);
fa407c03 4384 gen_check_align(ctx, t0, 0x03);
76db3ba4 4385 gen_qemu_ld32u(ctx, cpu_gpr[rD(ctx->opcode)], t0);
fa407c03 4386 tcg_temp_free(t0);
76a66253
JM
4387}
4388
4389/* ecowx */
99e300ef 4390static void gen_ecowx(DisasContext *ctx)
76a66253 4391{
76db3ba4 4392 TCGv t0;
fa407c03 4393 /* Should check EAR[E] ! */
76db3ba4
AJ
4394 gen_set_access_type(ctx, ACCESS_EXT);
4395 t0 = tcg_temp_new();
4396 gen_addr_reg_index(ctx, t0);
fa407c03 4397 gen_check_align(ctx, t0, 0x03);
76db3ba4 4398 gen_qemu_st32(ctx, cpu_gpr[rD(ctx->opcode)], t0);
fa407c03 4399 tcg_temp_free(t0);
76a66253
JM
4400}
4401
4402/* PowerPC 601 specific instructions */
99e300ef 4403
54623277 4404/* abs - abs. */
99e300ef 4405static void gen_abs(DisasContext *ctx)
76a66253 4406{
22e0e173
AJ
4407 int l1 = gen_new_label();
4408 int l2 = gen_new_label();
4409 tcg_gen_brcondi_tl(TCG_COND_GE, cpu_gpr[rA(ctx->opcode)], 0, l1);
4410 tcg_gen_neg_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
4411 tcg_gen_br(l2);
4412 gen_set_label(l1);
4413 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
4414 gen_set_label(l2);
76a66253 4415 if (unlikely(Rc(ctx->opcode) != 0))
22e0e173 4416 gen_set_Rc0(ctx, cpu_gpr[rD(ctx->opcode)]);
76a66253
JM
4417}
4418
4419/* abso - abso. */
99e300ef 4420static void gen_abso(DisasContext *ctx)
76a66253 4421{
22e0e173
AJ
4422 int l1 = gen_new_label();
4423 int l2 = gen_new_label();
4424 int l3 = gen_new_label();
4425 /* Start with XER OV disabled, the most likely case */
4426 tcg_gen_andi_tl(cpu_xer, cpu_xer, ~(1 << XER_OV));
4427 tcg_gen_brcondi_tl(TCG_COND_GE, cpu_gpr[rA(ctx->opcode)], 0, l2);
4428 tcg_gen_brcondi_tl(TCG_COND_NE, cpu_gpr[rA(ctx->opcode)], 0x80000000, l1);
4429 tcg_gen_ori_tl(cpu_xer, cpu_xer, (1 << XER_OV) | (1 << XER_SO));
4430 tcg_gen_br(l2);
4431 gen_set_label(l1);
4432 tcg_gen_neg_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
4433 tcg_gen_br(l3);
4434 gen_set_label(l2);
4435 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
4436 gen_set_label(l3);
76a66253 4437 if (unlikely(Rc(ctx->opcode) != 0))
22e0e173 4438 gen_set_Rc0(ctx, cpu_gpr[rD(ctx->opcode)]);
76a66253
JM
4439}
4440
4441/* clcs */
99e300ef 4442static void gen_clcs(DisasContext *ctx)
76a66253 4443{
22e0e173
AJ
4444 TCGv_i32 t0 = tcg_const_i32(rA(ctx->opcode));
4445 gen_helper_clcs(cpu_gpr[rD(ctx->opcode)], t0);
4446 tcg_temp_free_i32(t0);
c7697e1f 4447 /* Rc=1 sets CR0 to an undefined state */
76a66253
JM
4448}
4449
4450/* div - div. */
99e300ef 4451static void gen_div(DisasContext *ctx)
76a66253 4452{
22e0e173 4453 gen_helper_div(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)]);
76a66253 4454 if (unlikely(Rc(ctx->opcode) != 0))
22e0e173 4455 gen_set_Rc0(ctx, cpu_gpr[rD(ctx->opcode)]);
76a66253
JM
4456}
4457
4458/* divo - divo. */
99e300ef 4459static void gen_divo(DisasContext *ctx)
76a66253 4460{
22e0e173 4461 gen_helper_divo(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)]);
76a66253 4462 if (unlikely(Rc(ctx->opcode) != 0))
22e0e173 4463 gen_set_Rc0(ctx, cpu_gpr[rD(ctx->opcode)]);
76a66253
JM
4464}
4465
4466/* divs - divs. */
99e300ef 4467static void gen_divs(DisasContext *ctx)
76a66253 4468{
22e0e173 4469 gen_helper_divs(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)]);
76a66253 4470 if (unlikely(Rc(ctx->opcode) != 0))
22e0e173 4471 gen_set_Rc0(ctx, cpu_gpr[rD(ctx->opcode)]);
76a66253
JM
4472}
4473
4474/* divso - divso. */
99e300ef 4475static void gen_divso(DisasContext *ctx)
76a66253 4476{
22e0e173 4477 gen_helper_divso(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)]);
76a66253 4478 if (unlikely(Rc(ctx->opcode) != 0))
22e0e173 4479 gen_set_Rc0(ctx, cpu_gpr[rD(ctx->opcode)]);
76a66253
JM
4480}
4481
4482/* doz - doz. */
99e300ef 4483static void gen_doz(DisasContext *ctx)
76a66253 4484{
22e0e173
AJ
4485 int l1 = gen_new_label();
4486 int l2 = gen_new_label();
4487 tcg_gen_brcond_tl(TCG_COND_GE, cpu_gpr[rB(ctx->opcode)], cpu_gpr[rA(ctx->opcode)], l1);
4488 tcg_gen_sub_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rB(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
4489 tcg_gen_br(l2);
4490 gen_set_label(l1);
4491 tcg_gen_movi_tl(cpu_gpr[rD(ctx->opcode)], 0);
4492 gen_set_label(l2);
76a66253 4493 if (unlikely(Rc(ctx->opcode) != 0))
22e0e173 4494 gen_set_Rc0(ctx, cpu_gpr[rD(ctx->opcode)]);
76a66253
JM
4495}
4496
4497/* dozo - dozo. */
99e300ef 4498static void gen_dozo(DisasContext *ctx)
76a66253 4499{
22e0e173
AJ
4500 int l1 = gen_new_label();
4501 int l2 = gen_new_label();
4502 TCGv t0 = tcg_temp_new();
4503 TCGv t1 = tcg_temp_new();
4504 TCGv t2 = tcg_temp_new();
4505 /* Start with XER OV disabled, the most likely case */
4506 tcg_gen_andi_tl(cpu_xer, cpu_xer, ~(1 << XER_OV));
4507 tcg_gen_brcond_tl(TCG_COND_GE, cpu_gpr[rB(ctx->opcode)], cpu_gpr[rA(ctx->opcode)], l1);
4508 tcg_gen_sub_tl(t0, cpu_gpr[rB(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
4509 tcg_gen_xor_tl(t1, cpu_gpr[rB(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
4510 tcg_gen_xor_tl(t2, cpu_gpr[rA(ctx->opcode)], t0);
4511 tcg_gen_andc_tl(t1, t1, t2);
4512 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], t0);
4513 tcg_gen_brcondi_tl(TCG_COND_GE, t1, 0, l2);
4514 tcg_gen_ori_tl(cpu_xer, cpu_xer, (1 << XER_OV) | (1 << XER_SO));
4515 tcg_gen_br(l2);
4516 gen_set_label(l1);
4517 tcg_gen_movi_tl(cpu_gpr[rD(ctx->opcode)], 0);
4518 gen_set_label(l2);
4519 tcg_temp_free(t0);
4520 tcg_temp_free(t1);
4521 tcg_temp_free(t2);
76a66253 4522 if (unlikely(Rc(ctx->opcode) != 0))
22e0e173 4523 gen_set_Rc0(ctx, cpu_gpr[rD(ctx->opcode)]);
76a66253
JM
4524}
4525
4526/* dozi */
99e300ef 4527static void gen_dozi(DisasContext *ctx)
76a66253 4528{
22e0e173
AJ
4529 target_long simm = SIMM(ctx->opcode);
4530 int l1 = gen_new_label();
4531 int l2 = gen_new_label();
4532 tcg_gen_brcondi_tl(TCG_COND_LT, cpu_gpr[rA(ctx->opcode)], simm, l1);
4533 tcg_gen_subfi_tl(cpu_gpr[rD(ctx->opcode)], simm, cpu_gpr[rA(ctx->opcode)]);
4534 tcg_gen_br(l2);
4535 gen_set_label(l1);
4536 tcg_gen_movi_tl(cpu_gpr[rD(ctx->opcode)], 0);
4537 gen_set_label(l2);
4538 if (unlikely(Rc(ctx->opcode) != 0))
4539 gen_set_Rc0(ctx, cpu_gpr[rD(ctx->opcode)]);
76a66253
JM
4540}
4541
76a66253 4542/* lscbx - lscbx. */
99e300ef 4543static void gen_lscbx(DisasContext *ctx)
76a66253 4544{
bdb4b689
AJ
4545 TCGv t0 = tcg_temp_new();
4546 TCGv_i32 t1 = tcg_const_i32(rD(ctx->opcode));
4547 TCGv_i32 t2 = tcg_const_i32(rA(ctx->opcode));
4548 TCGv_i32 t3 = tcg_const_i32(rB(ctx->opcode));
76a66253 4549
76db3ba4 4550 gen_addr_reg_index(ctx, t0);
76a66253 4551 /* NIP cannot be restored if the memory exception comes from an helper */
d9bce9d9 4552 gen_update_nip(ctx, ctx->nip - 4);
bdb4b689
AJ
4553 gen_helper_lscbx(t0, t0, t1, t2, t3);
4554 tcg_temp_free_i32(t1);
4555 tcg_temp_free_i32(t2);
4556 tcg_temp_free_i32(t3);
3d7b417e 4557 tcg_gen_andi_tl(cpu_xer, cpu_xer, ~0x7F);
bdb4b689 4558 tcg_gen_or_tl(cpu_xer, cpu_xer, t0);
76a66253 4559 if (unlikely(Rc(ctx->opcode) != 0))
bdb4b689
AJ
4560 gen_set_Rc0(ctx, t0);
4561 tcg_temp_free(t0);
76a66253
JM
4562}
4563
4564/* maskg - maskg. */
99e300ef 4565static void gen_maskg(DisasContext *ctx)
76a66253 4566{
22e0e173
AJ
4567 int l1 = gen_new_label();
4568 TCGv t0 = tcg_temp_new();
4569 TCGv t1 = tcg_temp_new();
4570 TCGv t2 = tcg_temp_new();
4571 TCGv t3 = tcg_temp_new();
4572 tcg_gen_movi_tl(t3, 0xFFFFFFFF);
4573 tcg_gen_andi_tl(t0, cpu_gpr[rB(ctx->opcode)], 0x1F);
4574 tcg_gen_andi_tl(t1, cpu_gpr[rS(ctx->opcode)], 0x1F);
4575 tcg_gen_addi_tl(t2, t0, 1);
4576 tcg_gen_shr_tl(t2, t3, t2);
4577 tcg_gen_shr_tl(t3, t3, t1);
4578 tcg_gen_xor_tl(cpu_gpr[rA(ctx->opcode)], t2, t3);
4579 tcg_gen_brcond_tl(TCG_COND_GE, t0, t1, l1);
4580 tcg_gen_neg_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
4581 gen_set_label(l1);
4582 tcg_temp_free(t0);
4583 tcg_temp_free(t1);
4584 tcg_temp_free(t2);
4585 tcg_temp_free(t3);
76a66253 4586 if (unlikely(Rc(ctx->opcode) != 0))
22e0e173 4587 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
4588}
4589
4590/* maskir - maskir. */
99e300ef 4591static void gen_maskir(DisasContext *ctx)
76a66253 4592{
22e0e173
AJ
4593 TCGv t0 = tcg_temp_new();
4594 TCGv t1 = tcg_temp_new();
4595 tcg_gen_and_tl(t0, cpu_gpr[rS(ctx->opcode)], cpu_gpr[rB(ctx->opcode)]);
4596 tcg_gen_andc_tl(t1, cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)]);
4597 tcg_gen_or_tl(cpu_gpr[rA(ctx->opcode)], t0, t1);
4598 tcg_temp_free(t0);
4599 tcg_temp_free(t1);
76a66253 4600 if (unlikely(Rc(ctx->opcode) != 0))
22e0e173 4601 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
4602}
4603
4604/* mul - mul. */
99e300ef 4605static void gen_mul(DisasContext *ctx)
76a66253 4606{
22e0e173
AJ
4607 TCGv_i64 t0 = tcg_temp_new_i64();
4608 TCGv_i64 t1 = tcg_temp_new_i64();
4609 TCGv t2 = tcg_temp_new();
4610 tcg_gen_extu_tl_i64(t0, cpu_gpr[rA(ctx->opcode)]);
4611 tcg_gen_extu_tl_i64(t1, cpu_gpr[rB(ctx->opcode)]);
4612 tcg_gen_mul_i64(t0, t0, t1);
4613 tcg_gen_trunc_i64_tl(t2, t0);
4614 gen_store_spr(SPR_MQ, t2);
4615 tcg_gen_shri_i64(t1, t0, 32);
4616 tcg_gen_trunc_i64_tl(cpu_gpr[rD(ctx->opcode)], t1);
4617 tcg_temp_free_i64(t0);
4618 tcg_temp_free_i64(t1);
4619 tcg_temp_free(t2);
76a66253 4620 if (unlikely(Rc(ctx->opcode) != 0))
22e0e173 4621 gen_set_Rc0(ctx, cpu_gpr[rD(ctx->opcode)]);
76a66253
JM
4622}
4623
4624/* mulo - mulo. */
99e300ef 4625static void gen_mulo(DisasContext *ctx)
76a66253 4626{
22e0e173
AJ
4627 int l1 = gen_new_label();
4628 TCGv_i64 t0 = tcg_temp_new_i64();
4629 TCGv_i64 t1 = tcg_temp_new_i64();
4630 TCGv t2 = tcg_temp_new();
4631 /* Start with XER OV disabled, the most likely case */
4632 tcg_gen_andi_tl(cpu_xer, cpu_xer, ~(1 << XER_OV));
4633 tcg_gen_extu_tl_i64(t0, cpu_gpr[rA(ctx->opcode)]);
4634 tcg_gen_extu_tl_i64(t1, cpu_gpr[rB(ctx->opcode)]);
4635 tcg_gen_mul_i64(t0, t0, t1);
4636 tcg_gen_trunc_i64_tl(t2, t0);
4637 gen_store_spr(SPR_MQ, t2);
4638 tcg_gen_shri_i64(t1, t0, 32);
4639 tcg_gen_trunc_i64_tl(cpu_gpr[rD(ctx->opcode)], t1);
4640 tcg_gen_ext32s_i64(t1, t0);
4641 tcg_gen_brcond_i64(TCG_COND_EQ, t0, t1, l1);
4642 tcg_gen_ori_tl(cpu_xer, cpu_xer, (1 << XER_OV) | (1 << XER_SO));
4643 gen_set_label(l1);
4644 tcg_temp_free_i64(t0);
4645 tcg_temp_free_i64(t1);
4646 tcg_temp_free(t2);
76a66253 4647 if (unlikely(Rc(ctx->opcode) != 0))
22e0e173 4648 gen_set_Rc0(ctx, cpu_gpr[rD(ctx->opcode)]);
76a66253
JM
4649}
4650
4651/* nabs - nabs. */
99e300ef 4652static void gen_nabs(DisasContext *ctx)
76a66253 4653{
22e0e173
AJ
4654 int l1 = gen_new_label();
4655 int l2 = gen_new_label();
4656 tcg_gen_brcondi_tl(TCG_COND_GT, cpu_gpr[rA(ctx->opcode)], 0, l1);
4657 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
4658 tcg_gen_br(l2);
4659 gen_set_label(l1);
4660 tcg_gen_neg_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
4661 gen_set_label(l2);
76a66253 4662 if (unlikely(Rc(ctx->opcode) != 0))
22e0e173 4663 gen_set_Rc0(ctx, cpu_gpr[rD(ctx->opcode)]);
76a66253
JM
4664}
4665
4666/* nabso - nabso. */
99e300ef 4667static void gen_nabso(DisasContext *ctx)
76a66253 4668{
22e0e173
AJ
4669 int l1 = gen_new_label();
4670 int l2 = gen_new_label();
4671 tcg_gen_brcondi_tl(TCG_COND_GT, cpu_gpr[rA(ctx->opcode)], 0, l1);
4672 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
4673 tcg_gen_br(l2);
4674 gen_set_label(l1);
4675 tcg_gen_neg_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
4676 gen_set_label(l2);
4677 /* nabs never overflows */
4678 tcg_gen_andi_tl(cpu_xer, cpu_xer, ~(1 << XER_OV));
76a66253 4679 if (unlikely(Rc(ctx->opcode) != 0))
22e0e173 4680 gen_set_Rc0(ctx, cpu_gpr[rD(ctx->opcode)]);
76a66253
JM
4681}
4682
4683/* rlmi - rlmi. */
99e300ef 4684static void gen_rlmi(DisasContext *ctx)
76a66253 4685{
7487953d
AJ
4686 uint32_t mb = MB(ctx->opcode);
4687 uint32_t me = ME(ctx->opcode);
4688 TCGv t0 = tcg_temp_new();
4689 tcg_gen_andi_tl(t0, cpu_gpr[rB(ctx->opcode)], 0x1F);
4690 tcg_gen_rotl_tl(t0, cpu_gpr[rS(ctx->opcode)], t0);
4691 tcg_gen_andi_tl(t0, t0, MASK(mb, me));
4692 tcg_gen_andi_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rA(ctx->opcode)], ~MASK(mb, me));
4693 tcg_gen_or_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rA(ctx->opcode)], t0);
4694 tcg_temp_free(t0);
76a66253 4695 if (unlikely(Rc(ctx->opcode) != 0))
7487953d 4696 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
4697}
4698
4699/* rrib - rrib. */
99e300ef 4700static void gen_rrib(DisasContext *ctx)
76a66253 4701{
7487953d
AJ
4702 TCGv t0 = tcg_temp_new();
4703 TCGv t1 = tcg_temp_new();
4704 tcg_gen_andi_tl(t0, cpu_gpr[rB(ctx->opcode)], 0x1F);
4705 tcg_gen_movi_tl(t1, 0x80000000);
4706 tcg_gen_shr_tl(t1, t1, t0);
4707 tcg_gen_shr_tl(t0, cpu_gpr[rS(ctx->opcode)], t0);
4708 tcg_gen_and_tl(t0, t0, t1);
4709 tcg_gen_andc_tl(t1, cpu_gpr[rA(ctx->opcode)], t1);
4710 tcg_gen_or_tl(cpu_gpr[rA(ctx->opcode)], t0, t1);
4711 tcg_temp_free(t0);
4712 tcg_temp_free(t1);
76a66253 4713 if (unlikely(Rc(ctx->opcode) != 0))
7487953d 4714 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
4715}
4716
4717/* sle - sle. */
99e300ef 4718static void gen_sle(DisasContext *ctx)
76a66253 4719{
7487953d
AJ
4720 TCGv t0 = tcg_temp_new();
4721 TCGv t1 = tcg_temp_new();
4722 tcg_gen_andi_tl(t1, cpu_gpr[rB(ctx->opcode)], 0x1F);
4723 tcg_gen_shl_tl(t0, cpu_gpr[rS(ctx->opcode)], t1);
4724 tcg_gen_subfi_tl(t1, 32, t1);
4725 tcg_gen_shr_tl(t1, cpu_gpr[rS(ctx->opcode)], t1);
4726 tcg_gen_or_tl(t1, t0, t1);
4727 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], t0);
4728 gen_store_spr(SPR_MQ, t1);
4729 tcg_temp_free(t0);
4730 tcg_temp_free(t1);
76a66253 4731 if (unlikely(Rc(ctx->opcode) != 0))
7487953d 4732 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
4733}
4734
4735/* sleq - sleq. */
99e300ef 4736static void gen_sleq(DisasContext *ctx)
76a66253 4737{
7487953d
AJ
4738 TCGv t0 = tcg_temp_new();
4739 TCGv t1 = tcg_temp_new();
4740 TCGv t2 = tcg_temp_new();
4741 tcg_gen_andi_tl(t0, cpu_gpr[rB(ctx->opcode)], 0x1F);
4742 tcg_gen_movi_tl(t2, 0xFFFFFFFF);
4743 tcg_gen_shl_tl(t2, t2, t0);
4744 tcg_gen_rotl_tl(t0, cpu_gpr[rS(ctx->opcode)], t0);
4745 gen_load_spr(t1, SPR_MQ);
4746 gen_store_spr(SPR_MQ, t0);
4747 tcg_gen_and_tl(t0, t0, t2);
4748 tcg_gen_andc_tl(t1, t1, t2);
4749 tcg_gen_or_tl(cpu_gpr[rA(ctx->opcode)], t0, t1);
4750 tcg_temp_free(t0);
4751 tcg_temp_free(t1);
4752 tcg_temp_free(t2);
76a66253 4753 if (unlikely(Rc(ctx->opcode) != 0))
7487953d 4754 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
4755}
4756
4757/* sliq - sliq. */
99e300ef 4758static void gen_sliq(DisasContext *ctx)
76a66253 4759{
7487953d
AJ
4760 int sh = SH(ctx->opcode);
4761 TCGv t0 = tcg_temp_new();
4762 TCGv t1 = tcg_temp_new();
4763 tcg_gen_shli_tl(t0, cpu_gpr[rS(ctx->opcode)], sh);
4764 tcg_gen_shri_tl(t1, cpu_gpr[rS(ctx->opcode)], 32 - sh);
4765 tcg_gen_or_tl(t1, t0, t1);
4766 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], t0);
4767 gen_store_spr(SPR_MQ, t1);
4768 tcg_temp_free(t0);
4769 tcg_temp_free(t1);
76a66253 4770 if (unlikely(Rc(ctx->opcode) != 0))
7487953d 4771 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
4772}
4773
4774/* slliq - slliq. */
99e300ef 4775static void gen_slliq(DisasContext *ctx)
76a66253 4776{
7487953d
AJ
4777 int sh = SH(ctx->opcode);
4778 TCGv t0 = tcg_temp_new();
4779 TCGv t1 = tcg_temp_new();
4780 tcg_gen_rotli_tl(t0, cpu_gpr[rS(ctx->opcode)], sh);
4781 gen_load_spr(t1, SPR_MQ);
4782 gen_store_spr(SPR_MQ, t0);
4783 tcg_gen_andi_tl(t0, t0, (0xFFFFFFFFU << sh));
4784 tcg_gen_andi_tl(t1, t1, ~(0xFFFFFFFFU << sh));
4785 tcg_gen_or_tl(cpu_gpr[rA(ctx->opcode)], t0, t1);
4786 tcg_temp_free(t0);
4787 tcg_temp_free(t1);
76a66253 4788 if (unlikely(Rc(ctx->opcode) != 0))
7487953d 4789 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
4790}
4791
4792/* sllq - sllq. */
99e300ef 4793static void gen_sllq(DisasContext *ctx)
76a66253 4794{
7487953d
AJ
4795 int l1 = gen_new_label();
4796 int l2 = gen_new_label();
4797 TCGv t0 = tcg_temp_local_new();
4798 TCGv t1 = tcg_temp_local_new();
4799 TCGv t2 = tcg_temp_local_new();
4800 tcg_gen_andi_tl(t2, cpu_gpr[rB(ctx->opcode)], 0x1F);
4801 tcg_gen_movi_tl(t1, 0xFFFFFFFF);
4802 tcg_gen_shl_tl(t1, t1, t2);
4803 tcg_gen_andi_tl(t0, cpu_gpr[rB(ctx->opcode)], 0x20);
4804 tcg_gen_brcondi_tl(TCG_COND_EQ, t0, 0, l1);
4805 gen_load_spr(t0, SPR_MQ);
4806 tcg_gen_and_tl(cpu_gpr[rA(ctx->opcode)], t0, t1);
4807 tcg_gen_br(l2);
4808 gen_set_label(l1);
4809 tcg_gen_shl_tl(t0, cpu_gpr[rS(ctx->opcode)], t2);
4810 gen_load_spr(t2, SPR_MQ);
4811 tcg_gen_andc_tl(t1, t2, t1);
4812 tcg_gen_or_tl(cpu_gpr[rA(ctx->opcode)], t0, t1);
4813 gen_set_label(l2);
4814 tcg_temp_free(t0);
4815 tcg_temp_free(t1);
4816 tcg_temp_free(t2);
76a66253 4817 if (unlikely(Rc(ctx->opcode) != 0))
7487953d 4818 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
4819}
4820
4821/* slq - slq. */
99e300ef 4822static void gen_slq(DisasContext *ctx)
76a66253 4823{
7487953d
AJ
4824 int l1 = gen_new_label();
4825 TCGv t0 = tcg_temp_new();
4826 TCGv t1 = tcg_temp_new();
4827 tcg_gen_andi_tl(t1, cpu_gpr[rB(ctx->opcode)], 0x1F);
4828 tcg_gen_shl_tl(t0, cpu_gpr[rS(ctx->opcode)], t1);
4829 tcg_gen_subfi_tl(t1, 32, t1);
4830 tcg_gen_shr_tl(t1, cpu_gpr[rS(ctx->opcode)], t1);
4831 tcg_gen_or_tl(t1, t0, t1);
4832 gen_store_spr(SPR_MQ, t1);
4833 tcg_gen_andi_tl(t1, cpu_gpr[rB(ctx->opcode)], 0x20);
4834 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], t0);
4835 tcg_gen_brcondi_tl(TCG_COND_EQ, t1, 0, l1);
4836 tcg_gen_movi_tl(cpu_gpr[rA(ctx->opcode)], 0);
4837 gen_set_label(l1);
4838 tcg_temp_free(t0);
4839 tcg_temp_free(t1);
76a66253 4840 if (unlikely(Rc(ctx->opcode) != 0))
7487953d 4841 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
4842}
4843
d9bce9d9 4844/* sraiq - sraiq. */
99e300ef 4845static void gen_sraiq(DisasContext *ctx)
76a66253 4846{
7487953d
AJ
4847 int sh = SH(ctx->opcode);
4848 int l1 = gen_new_label();
4849 TCGv t0 = tcg_temp_new();
4850 TCGv t1 = tcg_temp_new();
4851 tcg_gen_shri_tl(t0, cpu_gpr[rS(ctx->opcode)], sh);
4852 tcg_gen_shli_tl(t1, cpu_gpr[rS(ctx->opcode)], 32 - sh);
4853 tcg_gen_or_tl(t0, t0, t1);
4854 gen_store_spr(SPR_MQ, t0);
4855 tcg_gen_andi_tl(cpu_xer, cpu_xer, ~(1 << XER_CA));
4856 tcg_gen_brcondi_tl(TCG_COND_EQ, t1, 0, l1);
4857 tcg_gen_brcondi_tl(TCG_COND_GE, cpu_gpr[rS(ctx->opcode)], 0, l1);
4858 tcg_gen_ori_tl(cpu_xer, cpu_xer, (1 << XER_CA));
4859 gen_set_label(l1);
4860 tcg_gen_sari_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)], sh);
4861 tcg_temp_free(t0);
4862 tcg_temp_free(t1);
76a66253 4863 if (unlikely(Rc(ctx->opcode) != 0))
7487953d 4864 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
4865}
4866
4867/* sraq - sraq. */
99e300ef 4868static void gen_sraq(DisasContext *ctx)
76a66253 4869{
7487953d
AJ
4870 int l1 = gen_new_label();
4871 int l2 = gen_new_label();
4872 TCGv t0 = tcg_temp_new();
4873 TCGv t1 = tcg_temp_local_new();
4874 TCGv t2 = tcg_temp_local_new();
4875 tcg_gen_andi_tl(t2, cpu_gpr[rB(ctx->opcode)], 0x1F);
4876 tcg_gen_shr_tl(t0, cpu_gpr[rS(ctx->opcode)], t2);
4877 tcg_gen_sar_tl(t1, cpu_gpr[rS(ctx->opcode)], t2);
4878 tcg_gen_subfi_tl(t2, 32, t2);
4879 tcg_gen_shl_tl(t2, cpu_gpr[rS(ctx->opcode)], t2);
4880 tcg_gen_or_tl(t0, t0, t2);
4881 gen_store_spr(SPR_MQ, t0);
4882 tcg_gen_andi_tl(t0, cpu_gpr[rB(ctx->opcode)], 0x20);
4883 tcg_gen_brcondi_tl(TCG_COND_EQ, t2, 0, l1);
4884 tcg_gen_mov_tl(t2, cpu_gpr[rS(ctx->opcode)]);
4885 tcg_gen_sari_tl(t1, cpu_gpr[rS(ctx->opcode)], 31);
4886 gen_set_label(l1);
4887 tcg_temp_free(t0);
4888 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], t1);
4889 tcg_gen_andi_tl(cpu_xer, cpu_xer, ~(1 << XER_CA));
4890 tcg_gen_brcondi_tl(TCG_COND_GE, t1, 0, l2);
4891 tcg_gen_brcondi_tl(TCG_COND_EQ, t2, 0, l2);
4892 tcg_gen_ori_tl(cpu_xer, cpu_xer, (1 << XER_CA));
4893 gen_set_label(l2);
4894 tcg_temp_free(t1);
4895 tcg_temp_free(t2);
76a66253 4896 if (unlikely(Rc(ctx->opcode) != 0))
7487953d 4897 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
4898}
4899
4900/* sre - sre. */
99e300ef 4901static void gen_sre(DisasContext *ctx)
76a66253 4902{
7487953d
AJ
4903 TCGv t0 = tcg_temp_new();
4904 TCGv t1 = tcg_temp_new();
4905 tcg_gen_andi_tl(t1, cpu_gpr[rB(ctx->opcode)], 0x1F);
4906 tcg_gen_shr_tl(t0, cpu_gpr[rS(ctx->opcode)], t1);
4907 tcg_gen_subfi_tl(t1, 32, t1);
4908 tcg_gen_shl_tl(t1, cpu_gpr[rS(ctx->opcode)], t1);
4909 tcg_gen_or_tl(t1, t0, t1);
4910 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], t0);
4911 gen_store_spr(SPR_MQ, t1);
4912 tcg_temp_free(t0);
4913 tcg_temp_free(t1);
76a66253 4914 if (unlikely(Rc(ctx->opcode) != 0))
7487953d 4915 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
4916}
4917
4918/* srea - srea. */
99e300ef 4919static void gen_srea(DisasContext *ctx)
76a66253 4920{
7487953d
AJ
4921 TCGv t0 = tcg_temp_new();
4922 TCGv t1 = tcg_temp_new();
4923 tcg_gen_andi_tl(t1, cpu_gpr[rB(ctx->opcode)], 0x1F);
4924 tcg_gen_rotr_tl(t0, cpu_gpr[rS(ctx->opcode)], t1);
4925 gen_store_spr(SPR_MQ, t0);
4926 tcg_gen_sar_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)], t1);
4927 tcg_temp_free(t0);
4928 tcg_temp_free(t1);
76a66253 4929 if (unlikely(Rc(ctx->opcode) != 0))
7487953d 4930 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
4931}
4932
4933/* sreq */
99e300ef 4934static void gen_sreq(DisasContext *ctx)
76a66253 4935{
7487953d
AJ
4936 TCGv t0 = tcg_temp_new();
4937 TCGv t1 = tcg_temp_new();
4938 TCGv t2 = tcg_temp_new();
4939 tcg_gen_andi_tl(t0, cpu_gpr[rB(ctx->opcode)], 0x1F);
4940 tcg_gen_movi_tl(t1, 0xFFFFFFFF);
4941 tcg_gen_shr_tl(t1, t1, t0);
4942 tcg_gen_rotr_tl(t0, cpu_gpr[rS(ctx->opcode)], t0);
4943 gen_load_spr(t2, SPR_MQ);
4944 gen_store_spr(SPR_MQ, t0);
4945 tcg_gen_and_tl(t0, t0, t1);
4946 tcg_gen_andc_tl(t2, t2, t1);
4947 tcg_gen_or_tl(cpu_gpr[rA(ctx->opcode)], t0, t2);
4948 tcg_temp_free(t0);
4949 tcg_temp_free(t1);
4950 tcg_temp_free(t2);
76a66253 4951 if (unlikely(Rc(ctx->opcode) != 0))
7487953d 4952 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
4953}
4954
4955/* sriq */
99e300ef 4956static void gen_sriq(DisasContext *ctx)
76a66253 4957{
7487953d
AJ
4958 int sh = SH(ctx->opcode);
4959 TCGv t0 = tcg_temp_new();
4960 TCGv t1 = tcg_temp_new();
4961 tcg_gen_shri_tl(t0, cpu_gpr[rS(ctx->opcode)], sh);
4962 tcg_gen_shli_tl(t1, cpu_gpr[rS(ctx->opcode)], 32 - sh);
4963 tcg_gen_or_tl(t1, t0, t1);
4964 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], t0);
4965 gen_store_spr(SPR_MQ, t1);
4966 tcg_temp_free(t0);
4967 tcg_temp_free(t1);
76a66253 4968 if (unlikely(Rc(ctx->opcode) != 0))
7487953d 4969 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
4970}
4971
4972/* srliq */
99e300ef 4973static void gen_srliq(DisasContext *ctx)
76a66253 4974{
7487953d
AJ
4975 int sh = SH(ctx->opcode);
4976 TCGv t0 = tcg_temp_new();
4977 TCGv t1 = tcg_temp_new();
4978 tcg_gen_rotri_tl(t0, cpu_gpr[rS(ctx->opcode)], sh);
4979 gen_load_spr(t1, SPR_MQ);
4980 gen_store_spr(SPR_MQ, t0);
4981 tcg_gen_andi_tl(t0, t0, (0xFFFFFFFFU >> sh));
4982 tcg_gen_andi_tl(t1, t1, ~(0xFFFFFFFFU >> sh));
4983 tcg_gen_or_tl(cpu_gpr[rA(ctx->opcode)], t0, t1);
4984 tcg_temp_free(t0);
4985 tcg_temp_free(t1);
76a66253 4986 if (unlikely(Rc(ctx->opcode) != 0))
7487953d 4987 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
4988}
4989
4990/* srlq */
99e300ef 4991static void gen_srlq(DisasContext *ctx)
76a66253 4992{
7487953d
AJ
4993 int l1 = gen_new_label();
4994 int l2 = gen_new_label();
4995 TCGv t0 = tcg_temp_local_new();
4996 TCGv t1 = tcg_temp_local_new();
4997 TCGv t2 = tcg_temp_local_new();
4998 tcg_gen_andi_tl(t2, cpu_gpr[rB(ctx->opcode)], 0x1F);
4999 tcg_gen_movi_tl(t1, 0xFFFFFFFF);
5000 tcg_gen_shr_tl(t2, t1, t2);
5001 tcg_gen_andi_tl(t0, cpu_gpr[rB(ctx->opcode)], 0x20);
5002 tcg_gen_brcondi_tl(TCG_COND_EQ, t0, 0, l1);
5003 gen_load_spr(t0, SPR_MQ);
5004 tcg_gen_and_tl(cpu_gpr[rA(ctx->opcode)], t0, t2);
5005 tcg_gen_br(l2);
5006 gen_set_label(l1);
5007 tcg_gen_shr_tl(t0, cpu_gpr[rS(ctx->opcode)], t2);
5008 tcg_gen_and_tl(t0, t0, t2);
5009 gen_load_spr(t1, SPR_MQ);
5010 tcg_gen_andc_tl(t1, t1, t2);
5011 tcg_gen_or_tl(cpu_gpr[rA(ctx->opcode)], t0, t1);
5012 gen_set_label(l2);
5013 tcg_temp_free(t0);
5014 tcg_temp_free(t1);
5015 tcg_temp_free(t2);
76a66253 5016 if (unlikely(Rc(ctx->opcode) != 0))
7487953d 5017 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
5018}
5019
5020/* srq */
99e300ef 5021static void gen_srq(DisasContext *ctx)
76a66253 5022{
7487953d
AJ
5023 int l1 = gen_new_label();
5024 TCGv t0 = tcg_temp_new();
5025 TCGv t1 = tcg_temp_new();
5026 tcg_gen_andi_tl(t1, cpu_gpr[rB(ctx->opcode)], 0x1F);
5027 tcg_gen_shr_tl(t0, cpu_gpr[rS(ctx->opcode)], t1);
5028 tcg_gen_subfi_tl(t1, 32, t1);
5029 tcg_gen_shl_tl(t1, cpu_gpr[rS(ctx->opcode)], t1);
5030 tcg_gen_or_tl(t1, t0, t1);
5031 gen_store_spr(SPR_MQ, t1);
5032 tcg_gen_andi_tl(t1, cpu_gpr[rB(ctx->opcode)], 0x20);
5033 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], t0);
5034 tcg_gen_brcondi_tl(TCG_COND_EQ, t0, 0, l1);
5035 tcg_gen_movi_tl(cpu_gpr[rA(ctx->opcode)], 0);
5036 gen_set_label(l1);
5037 tcg_temp_free(t0);
5038 tcg_temp_free(t1);
76a66253 5039 if (unlikely(Rc(ctx->opcode) != 0))
7487953d 5040 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
5041}
5042
5043/* PowerPC 602 specific instructions */
99e300ef 5044
54623277 5045/* dsa */
99e300ef 5046static void gen_dsa(DisasContext *ctx)
76a66253
JM
5047{
5048 /* XXX: TODO */
e06fcd75 5049 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL);
76a66253
JM
5050}
5051
5052/* esa */
99e300ef 5053static void gen_esa(DisasContext *ctx)
76a66253
JM
5054{
5055 /* XXX: TODO */
e06fcd75 5056 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL);
76a66253
JM
5057}
5058
5059/* mfrom */
99e300ef 5060static void gen_mfrom(DisasContext *ctx)
76a66253
JM
5061{
5062#if defined(CONFIG_USER_ONLY)
e06fcd75 5063 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
76a66253 5064#else
76db3ba4 5065 if (unlikely(!ctx->mem_idx)) {
e06fcd75 5066 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
76a66253
JM
5067 return;
5068 }
cf02a65c 5069 gen_helper_602_mfrom(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
5070#endif
5071}
5072
5073/* 602 - 603 - G2 TLB management */
e8eaa2c0 5074
54623277 5075/* tlbld */
e8eaa2c0 5076static void gen_tlbld_6xx(DisasContext *ctx)
76a66253
JM
5077{
5078#if defined(CONFIG_USER_ONLY)
e06fcd75 5079 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
76a66253 5080#else
76db3ba4 5081 if (unlikely(!ctx->mem_idx)) {
e06fcd75 5082 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
76a66253
JM
5083 return;
5084 }
74d37793 5085 gen_helper_6xx_tlbd(cpu_gpr[rB(ctx->opcode)]);
76a66253
JM
5086#endif
5087}
5088
5089/* tlbli */
e8eaa2c0 5090static void gen_tlbli_6xx(DisasContext *ctx)
76a66253
JM
5091{
5092#if defined(CONFIG_USER_ONLY)
e06fcd75 5093 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
76a66253 5094#else
76db3ba4 5095 if (unlikely(!ctx->mem_idx)) {
e06fcd75 5096 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
76a66253
JM
5097 return;
5098 }
74d37793 5099 gen_helper_6xx_tlbi(cpu_gpr[rB(ctx->opcode)]);
76a66253
JM
5100#endif
5101}
5102
7dbe11ac 5103/* 74xx TLB management */
e8eaa2c0 5104
54623277 5105/* tlbld */
e8eaa2c0 5106static void gen_tlbld_74xx(DisasContext *ctx)
7dbe11ac
JM
5107{
5108#if defined(CONFIG_USER_ONLY)
e06fcd75 5109 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
7dbe11ac 5110#else
76db3ba4 5111 if (unlikely(!ctx->mem_idx)) {
e06fcd75 5112 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
7dbe11ac
JM
5113 return;
5114 }
74d37793 5115 gen_helper_74xx_tlbd(cpu_gpr[rB(ctx->opcode)]);
7dbe11ac
JM
5116#endif
5117}
5118
5119/* tlbli */
e8eaa2c0 5120static void gen_tlbli_74xx(DisasContext *ctx)
7dbe11ac
JM
5121{
5122#if defined(CONFIG_USER_ONLY)
e06fcd75 5123 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
7dbe11ac 5124#else
76db3ba4 5125 if (unlikely(!ctx->mem_idx)) {
e06fcd75 5126 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
7dbe11ac
JM
5127 return;
5128 }
74d37793 5129 gen_helper_74xx_tlbi(cpu_gpr[rB(ctx->opcode)]);
7dbe11ac
JM
5130#endif
5131}
5132
76a66253 5133/* POWER instructions not in PowerPC 601 */
99e300ef 5134
54623277 5135/* clf */
99e300ef 5136static void gen_clf(DisasContext *ctx)
76a66253
JM
5137{
5138 /* Cache line flush: implemented as no-op */
5139}
5140
5141/* cli */
99e300ef 5142static void gen_cli(DisasContext *ctx)
76a66253 5143{
7f75ffd3 5144 /* Cache line invalidate: privileged and treated as no-op */
76a66253 5145#if defined(CONFIG_USER_ONLY)
e06fcd75 5146 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
76a66253 5147#else
76db3ba4 5148 if (unlikely(!ctx->mem_idx)) {
e06fcd75 5149 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
76a66253
JM
5150 return;
5151 }
5152#endif
5153}
5154
5155/* dclst */
99e300ef 5156static void gen_dclst(DisasContext *ctx)
76a66253
JM
5157{
5158 /* Data cache line store: treated as no-op */
5159}
5160
99e300ef 5161static void gen_mfsri(DisasContext *ctx)
76a66253
JM
5162{
5163#if defined(CONFIG_USER_ONLY)
e06fcd75 5164 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
76a66253 5165#else
74d37793
AJ
5166 int ra = rA(ctx->opcode);
5167 int rd = rD(ctx->opcode);
5168 TCGv t0;
76db3ba4 5169 if (unlikely(!ctx->mem_idx)) {
e06fcd75 5170 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
76a66253
JM
5171 return;
5172 }
74d37793 5173 t0 = tcg_temp_new();
76db3ba4 5174 gen_addr_reg_index(ctx, t0);
74d37793
AJ
5175 tcg_gen_shri_tl(t0, t0, 28);
5176 tcg_gen_andi_tl(t0, t0, 0xF);
5177 gen_helper_load_sr(cpu_gpr[rd], t0);
5178 tcg_temp_free(t0);
76a66253 5179 if (ra != 0 && ra != rd)
74d37793 5180 tcg_gen_mov_tl(cpu_gpr[ra], cpu_gpr[rd]);
76a66253
JM
5181#endif
5182}
5183
99e300ef 5184static void gen_rac(DisasContext *ctx)
76a66253
JM
5185{
5186#if defined(CONFIG_USER_ONLY)
e06fcd75 5187 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
76a66253 5188#else
22e0e173 5189 TCGv t0;
76db3ba4 5190 if (unlikely(!ctx->mem_idx)) {
e06fcd75 5191 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
76a66253
JM
5192 return;
5193 }
22e0e173 5194 t0 = tcg_temp_new();
76db3ba4 5195 gen_addr_reg_index(ctx, t0);
22e0e173
AJ
5196 gen_helper_rac(cpu_gpr[rD(ctx->opcode)], t0);
5197 tcg_temp_free(t0);
76a66253
JM
5198#endif
5199}
5200
99e300ef 5201static void gen_rfsvc(DisasContext *ctx)
76a66253
JM
5202{
5203#if defined(CONFIG_USER_ONLY)
e06fcd75 5204 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
76a66253 5205#else
76db3ba4 5206 if (unlikely(!ctx->mem_idx)) {
e06fcd75 5207 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
76a66253
JM
5208 return;
5209 }
d72a19f7 5210 gen_helper_rfsvc();
e06fcd75 5211 gen_sync_exception(ctx);
76a66253
JM
5212#endif
5213}
5214
5215/* svc is not implemented for now */
5216
5217/* POWER2 specific instructions */
5218/* Quad manipulation (load/store two floats at a time) */
76a66253
JM
5219
5220/* lfq */
99e300ef 5221static void gen_lfq(DisasContext *ctx)
76a66253 5222{
01a4afeb 5223 int rd = rD(ctx->opcode);
76db3ba4
AJ
5224 TCGv t0;
5225 gen_set_access_type(ctx, ACCESS_FLOAT);
5226 t0 = tcg_temp_new();
5227 gen_addr_imm_index(ctx, t0, 0);
5228 gen_qemu_ld64(ctx, cpu_fpr[rd], t0);
5229 gen_addr_add(ctx, t0, t0, 8);
5230 gen_qemu_ld64(ctx, cpu_fpr[(rd + 1) % 32], t0);
01a4afeb 5231 tcg_temp_free(t0);
76a66253
JM
5232}
5233
5234/* lfqu */
99e300ef 5235static void gen_lfqu(DisasContext *ctx)
76a66253
JM
5236{
5237 int ra = rA(ctx->opcode);
01a4afeb 5238 int rd = rD(ctx->opcode);
76db3ba4
AJ
5239 TCGv t0, t1;
5240 gen_set_access_type(ctx, ACCESS_FLOAT);
5241 t0 = tcg_temp_new();
5242 t1 = tcg_temp_new();
5243 gen_addr_imm_index(ctx, t0, 0);
5244 gen_qemu_ld64(ctx, cpu_fpr[rd], t0);
5245 gen_addr_add(ctx, t1, t0, 8);
5246 gen_qemu_ld64(ctx, cpu_fpr[(rd + 1) % 32], t1);
76a66253 5247 if (ra != 0)
01a4afeb
AJ
5248 tcg_gen_mov_tl(cpu_gpr[ra], t0);
5249 tcg_temp_free(t0);
5250 tcg_temp_free(t1);
76a66253
JM
5251}
5252
5253/* lfqux */
99e300ef 5254static void gen_lfqux(DisasContext *ctx)
76a66253
JM
5255{
5256 int ra = rA(ctx->opcode);
01a4afeb 5257 int rd = rD(ctx->opcode);
76db3ba4
AJ
5258 gen_set_access_type(ctx, ACCESS_FLOAT);
5259 TCGv t0, t1;
5260 t0 = tcg_temp_new();
5261 gen_addr_reg_index(ctx, t0);
5262 gen_qemu_ld64(ctx, cpu_fpr[rd], t0);
5263 t1 = tcg_temp_new();
5264 gen_addr_add(ctx, t1, t0, 8);
5265 gen_qemu_ld64(ctx, cpu_fpr[(rd + 1) % 32], t1);
5266 tcg_temp_free(t1);
76a66253 5267 if (ra != 0)
01a4afeb
AJ
5268 tcg_gen_mov_tl(cpu_gpr[ra], t0);
5269 tcg_temp_free(t0);
76a66253
JM
5270}
5271
5272/* lfqx */
99e300ef 5273static void gen_lfqx(DisasContext *ctx)
76a66253 5274{
01a4afeb 5275 int rd = rD(ctx->opcode);
76db3ba4
AJ
5276 TCGv t0;
5277 gen_set_access_type(ctx, ACCESS_FLOAT);
5278 t0 = tcg_temp_new();
5279 gen_addr_reg_index(ctx, t0);
5280 gen_qemu_ld64(ctx, cpu_fpr[rd], t0);
5281 gen_addr_add(ctx, t0, t0, 8);
5282 gen_qemu_ld64(ctx, cpu_fpr[(rd + 1) % 32], t0);
01a4afeb 5283 tcg_temp_free(t0);
76a66253
JM
5284}
5285
5286/* stfq */
99e300ef 5287static void gen_stfq(DisasContext *ctx)
76a66253 5288{
01a4afeb 5289 int rd = rD(ctx->opcode);
76db3ba4
AJ
5290 TCGv t0;
5291 gen_set_access_type(ctx, ACCESS_FLOAT);
5292 t0 = tcg_temp_new();
5293 gen_addr_imm_index(ctx, t0, 0);
5294 gen_qemu_st64(ctx, cpu_fpr[rd], t0);
5295 gen_addr_add(ctx, t0, t0, 8);
5296 gen_qemu_st64(ctx, cpu_fpr[(rd + 1) % 32], t0);
01a4afeb 5297 tcg_temp_free(t0);
76a66253
JM
5298}
5299
5300/* stfqu */
99e300ef 5301static void gen_stfqu(DisasContext *ctx)
76a66253
JM
5302{
5303 int ra = rA(ctx->opcode);
01a4afeb 5304 int rd = rD(ctx->opcode);
76db3ba4
AJ
5305 TCGv t0, t1;
5306 gen_set_access_type(ctx, ACCESS_FLOAT);
5307 t0 = tcg_temp_new();
5308 gen_addr_imm_index(ctx, t0, 0);
5309 gen_qemu_st64(ctx, cpu_fpr[rd], t0);
5310 t1 = tcg_temp_new();
5311 gen_addr_add(ctx, t1, t0, 8);
5312 gen_qemu_st64(ctx, cpu_fpr[(rd + 1) % 32], t1);
5313 tcg_temp_free(t1);
76a66253 5314 if (ra != 0)
01a4afeb
AJ
5315 tcg_gen_mov_tl(cpu_gpr[ra], t0);
5316 tcg_temp_free(t0);
76a66253
JM
5317}
5318
5319/* stfqux */
99e300ef 5320static void gen_stfqux(DisasContext *ctx)
76a66253
JM
5321{
5322 int ra = rA(ctx->opcode);
01a4afeb 5323 int rd = rD(ctx->opcode);
76db3ba4
AJ
5324 TCGv t0, t1;
5325 gen_set_access_type(ctx, ACCESS_FLOAT);
5326 t0 = tcg_temp_new();
5327 gen_addr_reg_index(ctx, t0);
5328 gen_qemu_st64(ctx, cpu_fpr[rd], t0);
5329 t1 = tcg_temp_new();
5330 gen_addr_add(ctx, t1, t0, 8);
5331 gen_qemu_st64(ctx, cpu_fpr[(rd + 1) % 32], t1);
5332 tcg_temp_free(t1);
76a66253 5333 if (ra != 0)
01a4afeb
AJ
5334 tcg_gen_mov_tl(cpu_gpr[ra], t0);
5335 tcg_temp_free(t0);
76a66253
JM
5336}
5337
5338/* stfqx */
99e300ef 5339static void gen_stfqx(DisasContext *ctx)
76a66253 5340{
01a4afeb 5341 int rd = rD(ctx->opcode);
76db3ba4
AJ
5342 TCGv t0;
5343 gen_set_access_type(ctx, ACCESS_FLOAT);
5344 t0 = tcg_temp_new();
5345 gen_addr_reg_index(ctx, t0);
5346 gen_qemu_st64(ctx, cpu_fpr[rd], t0);
5347 gen_addr_add(ctx, t0, t0, 8);
5348 gen_qemu_st64(ctx, cpu_fpr[(rd + 1) % 32], t0);
01a4afeb 5349 tcg_temp_free(t0);
76a66253
JM
5350}
5351
5352/* BookE specific instructions */
99e300ef 5353
54623277 5354/* XXX: not implemented on 440 ? */
99e300ef 5355static void gen_mfapidi(DisasContext *ctx)
76a66253
JM
5356{
5357 /* XXX: TODO */
e06fcd75 5358 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL);
76a66253
JM
5359}
5360
2662a059 5361/* XXX: not implemented on 440 ? */
99e300ef 5362static void gen_tlbiva(DisasContext *ctx)
76a66253
JM
5363{
5364#if defined(CONFIG_USER_ONLY)
e06fcd75 5365 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
76a66253 5366#else
74d37793 5367 TCGv t0;
76db3ba4 5368 if (unlikely(!ctx->mem_idx)) {
e06fcd75 5369 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
76a66253
JM
5370 return;
5371 }
ec72e276 5372 t0 = tcg_temp_new();
76db3ba4 5373 gen_addr_reg_index(ctx, t0);
74d37793
AJ
5374 gen_helper_tlbie(cpu_gpr[rB(ctx->opcode)]);
5375 tcg_temp_free(t0);
76a66253
JM
5376#endif
5377}
5378
5379/* All 405 MAC instructions are translated here */
636aa200
BS
5380static inline void gen_405_mulladd_insn(DisasContext *ctx, int opc2, int opc3,
5381 int ra, int rb, int rt, int Rc)
76a66253 5382{
182608d4
AJ
5383 TCGv t0, t1;
5384
a7812ae4
PB
5385 t0 = tcg_temp_local_new();
5386 t1 = tcg_temp_local_new();
182608d4 5387
76a66253
JM
5388 switch (opc3 & 0x0D) {
5389 case 0x05:
5390 /* macchw - macchw. - macchwo - macchwo. */
5391 /* macchws - macchws. - macchwso - macchwso. */
5392 /* nmacchw - nmacchw. - nmacchwo - nmacchwo. */
5393 /* nmacchws - nmacchws. - nmacchwso - nmacchwso. */
5394 /* mulchw - mulchw. */
182608d4
AJ
5395 tcg_gen_ext16s_tl(t0, cpu_gpr[ra]);
5396 tcg_gen_sari_tl(t1, cpu_gpr[rb], 16);
5397 tcg_gen_ext16s_tl(t1, t1);
76a66253
JM
5398 break;
5399 case 0x04:
5400 /* macchwu - macchwu. - macchwuo - macchwuo. */
5401 /* macchwsu - macchwsu. - macchwsuo - macchwsuo. */
5402 /* mulchwu - mulchwu. */
182608d4
AJ
5403 tcg_gen_ext16u_tl(t0, cpu_gpr[ra]);
5404 tcg_gen_shri_tl(t1, cpu_gpr[rb], 16);
5405 tcg_gen_ext16u_tl(t1, t1);
76a66253
JM
5406 break;
5407 case 0x01:
5408 /* machhw - machhw. - machhwo - machhwo. */
5409 /* machhws - machhws. - machhwso - machhwso. */
5410 /* nmachhw - nmachhw. - nmachhwo - nmachhwo. */
5411 /* nmachhws - nmachhws. - nmachhwso - nmachhwso. */
5412 /* mulhhw - mulhhw. */
182608d4
AJ
5413 tcg_gen_sari_tl(t0, cpu_gpr[ra], 16);
5414 tcg_gen_ext16s_tl(t0, t0);
5415 tcg_gen_sari_tl(t1, cpu_gpr[rb], 16);
5416 tcg_gen_ext16s_tl(t1, t1);
76a66253
JM
5417 break;
5418 case 0x00:
5419 /* machhwu - machhwu. - machhwuo - machhwuo. */
5420 /* machhwsu - machhwsu. - machhwsuo - machhwsuo. */
5421 /* mulhhwu - mulhhwu. */
182608d4
AJ
5422 tcg_gen_shri_tl(t0, cpu_gpr[ra], 16);
5423 tcg_gen_ext16u_tl(t0, t0);
5424 tcg_gen_shri_tl(t1, cpu_gpr[rb], 16);
5425 tcg_gen_ext16u_tl(t1, t1);
76a66253
JM
5426 break;
5427 case 0x0D:
5428 /* maclhw - maclhw. - maclhwo - maclhwo. */
5429 /* maclhws - maclhws. - maclhwso - maclhwso. */
5430 /* nmaclhw - nmaclhw. - nmaclhwo - nmaclhwo. */
5431 /* nmaclhws - nmaclhws. - nmaclhwso - nmaclhwso. */
5432 /* mullhw - mullhw. */
182608d4
AJ
5433 tcg_gen_ext16s_tl(t0, cpu_gpr[ra]);
5434 tcg_gen_ext16s_tl(t1, cpu_gpr[rb]);
76a66253
JM
5435 break;
5436 case 0x0C:
5437 /* maclhwu - maclhwu. - maclhwuo - maclhwuo. */
5438 /* maclhwsu - maclhwsu. - maclhwsuo - maclhwsuo. */
5439 /* mullhwu - mullhwu. */
182608d4
AJ
5440 tcg_gen_ext16u_tl(t0, cpu_gpr[ra]);
5441 tcg_gen_ext16u_tl(t1, cpu_gpr[rb]);
76a66253
JM
5442 break;
5443 }
76a66253 5444 if (opc2 & 0x04) {
182608d4
AJ
5445 /* (n)multiply-and-accumulate (0x0C / 0x0E) */
5446 tcg_gen_mul_tl(t1, t0, t1);
5447 if (opc2 & 0x02) {
5448 /* nmultiply-and-accumulate (0x0E) */
5449 tcg_gen_sub_tl(t0, cpu_gpr[rt], t1);
5450 } else {
5451 /* multiply-and-accumulate (0x0C) */
5452 tcg_gen_add_tl(t0, cpu_gpr[rt], t1);
5453 }
5454
5455 if (opc3 & 0x12) {
5456 /* Check overflow and/or saturate */
5457 int l1 = gen_new_label();
5458
5459 if (opc3 & 0x10) {
5460 /* Start with XER OV disabled, the most likely case */
5461 tcg_gen_andi_tl(cpu_xer, cpu_xer, ~(1 << XER_OV));
5462 }
5463 if (opc3 & 0x01) {
5464 /* Signed */
5465 tcg_gen_xor_tl(t1, cpu_gpr[rt], t1);
5466 tcg_gen_brcondi_tl(TCG_COND_GE, t1, 0, l1);
5467 tcg_gen_xor_tl(t1, cpu_gpr[rt], t0);
5468 tcg_gen_brcondi_tl(TCG_COND_LT, t1, 0, l1);
bdc4e053 5469 if (opc3 & 0x02) {
182608d4
AJ
5470 /* Saturate */
5471 tcg_gen_sari_tl(t0, cpu_gpr[rt], 31);
5472 tcg_gen_xori_tl(t0, t0, 0x7fffffff);
5473 }
5474 } else {
5475 /* Unsigned */
5476 tcg_gen_brcond_tl(TCG_COND_GEU, t0, t1, l1);
bdc4e053 5477 if (opc3 & 0x02) {
182608d4
AJ
5478 /* Saturate */
5479 tcg_gen_movi_tl(t0, UINT32_MAX);
5480 }
5481 }
5482 if (opc3 & 0x10) {
5483 /* Check overflow */
5484 tcg_gen_ori_tl(cpu_xer, cpu_xer, (1 << XER_OV) | (1 << XER_SO));
5485 }
5486 gen_set_label(l1);
5487 tcg_gen_mov_tl(cpu_gpr[rt], t0);
5488 }
5489 } else {
5490 tcg_gen_mul_tl(cpu_gpr[rt], t0, t1);
76a66253 5491 }
182608d4
AJ
5492 tcg_temp_free(t0);
5493 tcg_temp_free(t1);
76a66253
JM
5494 if (unlikely(Rc) != 0) {
5495 /* Update Rc0 */
182608d4 5496 gen_set_Rc0(ctx, cpu_gpr[rt]);
76a66253
JM
5497 }
5498}
5499
a750fc0b 5500#define GEN_MAC_HANDLER(name, opc2, opc3) \
99e300ef 5501static void glue(gen_, name)(DisasContext *ctx) \
76a66253
JM
5502{ \
5503 gen_405_mulladd_insn(ctx, opc2, opc3, rA(ctx->opcode), rB(ctx->opcode), \
5504 rD(ctx->opcode), Rc(ctx->opcode)); \
5505}
5506
5507/* macchw - macchw. */
a750fc0b 5508GEN_MAC_HANDLER(macchw, 0x0C, 0x05);
76a66253 5509/* macchwo - macchwo. */
a750fc0b 5510GEN_MAC_HANDLER(macchwo, 0x0C, 0x15);
76a66253 5511/* macchws - macchws. */
a750fc0b 5512GEN_MAC_HANDLER(macchws, 0x0C, 0x07);
76a66253 5513/* macchwso - macchwso. */
a750fc0b 5514GEN_MAC_HANDLER(macchwso, 0x0C, 0x17);
76a66253 5515/* macchwsu - macchwsu. */
a750fc0b 5516GEN_MAC_HANDLER(macchwsu, 0x0C, 0x06);
76a66253 5517/* macchwsuo - macchwsuo. */
a750fc0b 5518GEN_MAC_HANDLER(macchwsuo, 0x0C, 0x16);
76a66253 5519/* macchwu - macchwu. */
a750fc0b 5520GEN_MAC_HANDLER(macchwu, 0x0C, 0x04);
76a66253 5521/* macchwuo - macchwuo. */
a750fc0b 5522GEN_MAC_HANDLER(macchwuo, 0x0C, 0x14);
76a66253 5523/* machhw - machhw. */
a750fc0b 5524GEN_MAC_HANDLER(machhw, 0x0C, 0x01);
76a66253 5525/* machhwo - machhwo. */
a750fc0b 5526GEN_MAC_HANDLER(machhwo, 0x0C, 0x11);
76a66253 5527/* machhws - machhws. */
a750fc0b 5528GEN_MAC_HANDLER(machhws, 0x0C, 0x03);
76a66253 5529/* machhwso - machhwso. */
a750fc0b 5530GEN_MAC_HANDLER(machhwso, 0x0C, 0x13);
76a66253 5531/* machhwsu - machhwsu. */
a750fc0b 5532GEN_MAC_HANDLER(machhwsu, 0x0C, 0x02);
76a66253 5533/* machhwsuo - machhwsuo. */
a750fc0b 5534GEN_MAC_HANDLER(machhwsuo, 0x0C, 0x12);
76a66253 5535/* machhwu - machhwu. */
a750fc0b 5536GEN_MAC_HANDLER(machhwu, 0x0C, 0x00);
76a66253 5537/* machhwuo - machhwuo. */
a750fc0b 5538GEN_MAC_HANDLER(machhwuo, 0x0C, 0x10);
76a66253 5539/* maclhw - maclhw. */
a750fc0b 5540GEN_MAC_HANDLER(maclhw, 0x0C, 0x0D);
76a66253 5541/* maclhwo - maclhwo. */
a750fc0b 5542GEN_MAC_HANDLER(maclhwo, 0x0C, 0x1D);
76a66253 5543/* maclhws - maclhws. */
a750fc0b 5544GEN_MAC_HANDLER(maclhws, 0x0C, 0x0F);
76a66253 5545/* maclhwso - maclhwso. */
a750fc0b 5546GEN_MAC_HANDLER(maclhwso, 0x0C, 0x1F);
76a66253 5547/* maclhwu - maclhwu. */
a750fc0b 5548GEN_MAC_HANDLER(maclhwu, 0x0C, 0x0C);
76a66253 5549/* maclhwuo - maclhwuo. */
a750fc0b 5550GEN_MAC_HANDLER(maclhwuo, 0x0C, 0x1C);
76a66253 5551/* maclhwsu - maclhwsu. */
a750fc0b 5552GEN_MAC_HANDLER(maclhwsu, 0x0C, 0x0E);
76a66253 5553/* maclhwsuo - maclhwsuo. */
a750fc0b 5554GEN_MAC_HANDLER(maclhwsuo, 0x0C, 0x1E);
76a66253 5555/* nmacchw - nmacchw. */
a750fc0b 5556GEN_MAC_HANDLER(nmacchw, 0x0E, 0x05);
76a66253 5557/* nmacchwo - nmacchwo. */
a750fc0b 5558GEN_MAC_HANDLER(nmacchwo, 0x0E, 0x15);
76a66253 5559/* nmacchws - nmacchws. */
a750fc0b 5560GEN_MAC_HANDLER(nmacchws, 0x0E, 0x07);
76a66253 5561/* nmacchwso - nmacchwso. */
a750fc0b 5562GEN_MAC_HANDLER(nmacchwso, 0x0E, 0x17);
76a66253 5563/* nmachhw - nmachhw. */
a750fc0b 5564GEN_MAC_HANDLER(nmachhw, 0x0E, 0x01);
76a66253 5565/* nmachhwo - nmachhwo. */
a750fc0b 5566GEN_MAC_HANDLER(nmachhwo, 0x0E, 0x11);
76a66253 5567/* nmachhws - nmachhws. */
a750fc0b 5568GEN_MAC_HANDLER(nmachhws, 0x0E, 0x03);
76a66253 5569/* nmachhwso - nmachhwso. */
a750fc0b 5570GEN_MAC_HANDLER(nmachhwso, 0x0E, 0x13);
76a66253 5571/* nmaclhw - nmaclhw. */
a750fc0b 5572GEN_MAC_HANDLER(nmaclhw, 0x0E, 0x0D);
76a66253 5573/* nmaclhwo - nmaclhwo. */
a750fc0b 5574GEN_MAC_HANDLER(nmaclhwo, 0x0E, 0x1D);
76a66253 5575/* nmaclhws - nmaclhws. */
a750fc0b 5576GEN_MAC_HANDLER(nmaclhws, 0x0E, 0x0F);
76a66253 5577/* nmaclhwso - nmaclhwso. */
a750fc0b 5578GEN_MAC_HANDLER(nmaclhwso, 0x0E, 0x1F);
76a66253
JM
5579
5580/* mulchw - mulchw. */
a750fc0b 5581GEN_MAC_HANDLER(mulchw, 0x08, 0x05);
76a66253 5582/* mulchwu - mulchwu. */
a750fc0b 5583GEN_MAC_HANDLER(mulchwu, 0x08, 0x04);
76a66253 5584/* mulhhw - mulhhw. */
a750fc0b 5585GEN_MAC_HANDLER(mulhhw, 0x08, 0x01);
76a66253 5586/* mulhhwu - mulhhwu. */
a750fc0b 5587GEN_MAC_HANDLER(mulhhwu, 0x08, 0x00);
76a66253 5588/* mullhw - mullhw. */
a750fc0b 5589GEN_MAC_HANDLER(mullhw, 0x08, 0x0D);
76a66253 5590/* mullhwu - mullhwu. */
a750fc0b 5591GEN_MAC_HANDLER(mullhwu, 0x08, 0x0C);
76a66253
JM
5592
5593/* mfdcr */
99e300ef 5594static void gen_mfdcr(DisasContext *ctx)
76a66253
JM
5595{
5596#if defined(CONFIG_USER_ONLY)
e06fcd75 5597 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_REG);
76a66253 5598#else
06dca6a7 5599 TCGv dcrn;
76db3ba4 5600 if (unlikely(!ctx->mem_idx)) {
e06fcd75 5601 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_REG);
76a66253
JM
5602 return;
5603 }
06dca6a7
AJ
5604 /* NIP cannot be restored if the memory exception comes from an helper */
5605 gen_update_nip(ctx, ctx->nip - 4);
5606 dcrn = tcg_const_tl(SPR(ctx->opcode));
5607 gen_helper_load_dcr(cpu_gpr[rD(ctx->opcode)], dcrn);
5608 tcg_temp_free(dcrn);
76a66253
JM
5609#endif
5610}
5611
5612/* mtdcr */
99e300ef 5613static void gen_mtdcr(DisasContext *ctx)
76a66253
JM
5614{
5615#if defined(CONFIG_USER_ONLY)
e06fcd75 5616 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_REG);
76a66253 5617#else
06dca6a7 5618 TCGv dcrn;
76db3ba4 5619 if (unlikely(!ctx->mem_idx)) {
e06fcd75 5620 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_REG);
76a66253
JM
5621 return;
5622 }
06dca6a7
AJ
5623 /* NIP cannot be restored if the memory exception comes from an helper */
5624 gen_update_nip(ctx, ctx->nip - 4);
5625 dcrn = tcg_const_tl(SPR(ctx->opcode));
5626 gen_helper_store_dcr(dcrn, cpu_gpr[rS(ctx->opcode)]);
5627 tcg_temp_free(dcrn);
a42bd6cc
JM
5628#endif
5629}
5630
5631/* mfdcrx */
2662a059 5632/* XXX: not implemented on 440 ? */
99e300ef 5633static void gen_mfdcrx(DisasContext *ctx)
a42bd6cc
JM
5634{
5635#if defined(CONFIG_USER_ONLY)
e06fcd75 5636 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_REG);
a42bd6cc 5637#else
76db3ba4 5638 if (unlikely(!ctx->mem_idx)) {
e06fcd75 5639 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_REG);
a42bd6cc
JM
5640 return;
5641 }
06dca6a7
AJ
5642 /* NIP cannot be restored if the memory exception comes from an helper */
5643 gen_update_nip(ctx, ctx->nip - 4);
5644 gen_helper_load_dcr(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
a750fc0b 5645 /* Note: Rc update flag set leads to undefined state of Rc0 */
a42bd6cc
JM
5646#endif
5647}
5648
5649/* mtdcrx */
2662a059 5650/* XXX: not implemented on 440 ? */
99e300ef 5651static void gen_mtdcrx(DisasContext *ctx)
a42bd6cc
JM
5652{
5653#if defined(CONFIG_USER_ONLY)
e06fcd75 5654 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_REG);
a42bd6cc 5655#else
76db3ba4 5656 if (unlikely(!ctx->mem_idx)) {
e06fcd75 5657 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_REG);
a42bd6cc
JM
5658 return;
5659 }
06dca6a7
AJ
5660 /* NIP cannot be restored if the memory exception comes from an helper */
5661 gen_update_nip(ctx, ctx->nip - 4);
5662 gen_helper_store_dcr(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)]);
a750fc0b 5663 /* Note: Rc update flag set leads to undefined state of Rc0 */
76a66253
JM
5664#endif
5665}
5666
a750fc0b 5667/* mfdcrux (PPC 460) : user-mode access to DCR */
99e300ef 5668static void gen_mfdcrux(DisasContext *ctx)
a750fc0b 5669{
06dca6a7
AJ
5670 /* NIP cannot be restored if the memory exception comes from an helper */
5671 gen_update_nip(ctx, ctx->nip - 4);
5672 gen_helper_load_dcr(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
a750fc0b
JM
5673 /* Note: Rc update flag set leads to undefined state of Rc0 */
5674}
5675
5676/* mtdcrux (PPC 460) : user-mode access to DCR */
99e300ef 5677static void gen_mtdcrux(DisasContext *ctx)
a750fc0b 5678{
06dca6a7
AJ
5679 /* NIP cannot be restored if the memory exception comes from an helper */
5680 gen_update_nip(ctx, ctx->nip - 4);
5681 gen_helper_store_dcr(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)]);
a750fc0b
JM
5682 /* Note: Rc update flag set leads to undefined state of Rc0 */
5683}
5684
76a66253 5685/* dccci */
99e300ef 5686static void gen_dccci(DisasContext *ctx)
76a66253
JM
5687{
5688#if defined(CONFIG_USER_ONLY)
e06fcd75 5689 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
76a66253 5690#else
76db3ba4 5691 if (unlikely(!ctx->mem_idx)) {
e06fcd75 5692 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
76a66253
JM
5693 return;
5694 }
5695 /* interpreted as no-op */
5696#endif
5697}
5698
5699/* dcread */
99e300ef 5700static void gen_dcread(DisasContext *ctx)
76a66253
JM
5701{
5702#if defined(CONFIG_USER_ONLY)
e06fcd75 5703 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
76a66253 5704#else
b61f2753 5705 TCGv EA, val;
76db3ba4 5706 if (unlikely(!ctx->mem_idx)) {
e06fcd75 5707 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
76a66253
JM
5708 return;
5709 }
76db3ba4 5710 gen_set_access_type(ctx, ACCESS_CACHE);
a7812ae4 5711 EA = tcg_temp_new();
76db3ba4 5712 gen_addr_reg_index(ctx, EA);
a7812ae4 5713 val = tcg_temp_new();
76db3ba4 5714 gen_qemu_ld32u(ctx, val, EA);
b61f2753
AJ
5715 tcg_temp_free(val);
5716 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], EA);
5717 tcg_temp_free(EA);
76a66253
JM
5718#endif
5719}
5720
5721/* icbt */
e8eaa2c0 5722static void gen_icbt_40x(DisasContext *ctx)
76a66253
JM
5723{
5724 /* interpreted as no-op */
5725 /* XXX: specification say this is treated as a load by the MMU
5726 * but does not generate any exception
5727 */
5728}
5729
5730/* iccci */
99e300ef 5731static void gen_iccci(DisasContext *ctx)
76a66253
JM
5732{
5733#if defined(CONFIG_USER_ONLY)
e06fcd75 5734 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
76a66253 5735#else
76db3ba4 5736 if (unlikely(!ctx->mem_idx)) {
e06fcd75 5737 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
76a66253
JM
5738 return;
5739 }
5740 /* interpreted as no-op */
5741#endif
5742}
5743
5744/* icread */
99e300ef 5745static void gen_icread(DisasContext *ctx)
76a66253
JM
5746{
5747#if defined(CONFIG_USER_ONLY)
e06fcd75 5748 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
76a66253 5749#else
76db3ba4 5750 if (unlikely(!ctx->mem_idx)) {
e06fcd75 5751 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
76a66253
JM
5752 return;
5753 }
5754 /* interpreted as no-op */
5755#endif
5756}
5757
76db3ba4 5758/* rfci (mem_idx only) */
e8eaa2c0 5759static void gen_rfci_40x(DisasContext *ctx)
a42bd6cc
JM
5760{
5761#if defined(CONFIG_USER_ONLY)
e06fcd75 5762 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
a42bd6cc 5763#else
76db3ba4 5764 if (unlikely(!ctx->mem_idx)) {
e06fcd75 5765 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
a42bd6cc
JM
5766 return;
5767 }
5768 /* Restore CPU state */
d72a19f7 5769 gen_helper_40x_rfci();
e06fcd75 5770 gen_sync_exception(ctx);
a42bd6cc
JM
5771#endif
5772}
5773
99e300ef 5774static void gen_rfci(DisasContext *ctx)
a42bd6cc
JM
5775{
5776#if defined(CONFIG_USER_ONLY)
e06fcd75 5777 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
a42bd6cc 5778#else
76db3ba4 5779 if (unlikely(!ctx->mem_idx)) {
e06fcd75 5780 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
a42bd6cc
JM
5781 return;
5782 }
5783 /* Restore CPU state */
d72a19f7 5784 gen_helper_rfci();
e06fcd75 5785 gen_sync_exception(ctx);
a42bd6cc
JM
5786#endif
5787}
5788
5789/* BookE specific */
99e300ef 5790
54623277 5791/* XXX: not implemented on 440 ? */
99e300ef 5792static void gen_rfdi(DisasContext *ctx)
76a66253
JM
5793{
5794#if defined(CONFIG_USER_ONLY)
e06fcd75 5795 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
76a66253 5796#else
76db3ba4 5797 if (unlikely(!ctx->mem_idx)) {
e06fcd75 5798 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
76a66253
JM
5799 return;
5800 }
5801 /* Restore CPU state */
d72a19f7 5802 gen_helper_rfdi();
e06fcd75 5803 gen_sync_exception(ctx);
76a66253
JM
5804#endif
5805}
5806
2662a059 5807/* XXX: not implemented on 440 ? */
99e300ef 5808static void gen_rfmci(DisasContext *ctx)
a42bd6cc
JM
5809{
5810#if defined(CONFIG_USER_ONLY)
e06fcd75 5811 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
a42bd6cc 5812#else
76db3ba4 5813 if (unlikely(!ctx->mem_idx)) {
e06fcd75 5814 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
a42bd6cc
JM
5815 return;
5816 }
5817 /* Restore CPU state */
d72a19f7 5818 gen_helper_rfmci();
e06fcd75 5819 gen_sync_exception(ctx);
a42bd6cc
JM
5820#endif
5821}
5eb7995e 5822
d9bce9d9 5823/* TLB management - PowerPC 405 implementation */
e8eaa2c0 5824
54623277 5825/* tlbre */
e8eaa2c0 5826static void gen_tlbre_40x(DisasContext *ctx)
76a66253
JM
5827{
5828#if defined(CONFIG_USER_ONLY)
e06fcd75 5829 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
76a66253 5830#else
76db3ba4 5831 if (unlikely(!ctx->mem_idx)) {
e06fcd75 5832 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
76a66253
JM
5833 return;
5834 }
5835 switch (rB(ctx->opcode)) {
5836 case 0:
74d37793 5837 gen_helper_4xx_tlbre_hi(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
5838 break;
5839 case 1:
74d37793 5840 gen_helper_4xx_tlbre_lo(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
5841 break;
5842 default:
e06fcd75 5843 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL);
76a66253 5844 break;
9a64fbe4 5845 }
76a66253
JM
5846#endif
5847}
5848
d9bce9d9 5849/* tlbsx - tlbsx. */
e8eaa2c0 5850static void gen_tlbsx_40x(DisasContext *ctx)
76a66253
JM
5851{
5852#if defined(CONFIG_USER_ONLY)
e06fcd75 5853 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
76a66253 5854#else
74d37793 5855 TCGv t0;
76db3ba4 5856 if (unlikely(!ctx->mem_idx)) {
e06fcd75 5857 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
76a66253
JM
5858 return;
5859 }
74d37793 5860 t0 = tcg_temp_new();
76db3ba4 5861 gen_addr_reg_index(ctx, t0);
74d37793
AJ
5862 gen_helper_4xx_tlbsx(cpu_gpr[rD(ctx->opcode)], t0);
5863 tcg_temp_free(t0);
5864 if (Rc(ctx->opcode)) {
5865 int l1 = gen_new_label();
5866 tcg_gen_trunc_tl_i32(cpu_crf[0], cpu_xer);
5867 tcg_gen_shri_i32(cpu_crf[0], cpu_crf[0], XER_SO);
5868 tcg_gen_andi_i32(cpu_crf[0], cpu_crf[0], 1);
5869 tcg_gen_brcondi_tl(TCG_COND_EQ, cpu_gpr[rD(ctx->opcode)], -1, l1);
5870 tcg_gen_ori_i32(cpu_crf[0], cpu_crf[0], 0x02);
5871 gen_set_label(l1);
5872 }
76a66253 5873#endif
79aceca5
FB
5874}
5875
76a66253 5876/* tlbwe */
e8eaa2c0 5877static void gen_tlbwe_40x(DisasContext *ctx)
79aceca5 5878{
76a66253 5879#if defined(CONFIG_USER_ONLY)
e06fcd75 5880 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
76a66253 5881#else
76db3ba4 5882 if (unlikely(!ctx->mem_idx)) {
e06fcd75 5883 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
76a66253
JM
5884 return;
5885 }
5886 switch (rB(ctx->opcode)) {
5887 case 0:
74d37793 5888 gen_helper_4xx_tlbwe_hi(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)]);
76a66253
JM
5889 break;
5890 case 1:
74d37793 5891 gen_helper_4xx_tlbwe_lo(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)]);
76a66253
JM
5892 break;
5893 default:
e06fcd75 5894 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL);
76a66253 5895 break;
9a64fbe4 5896 }
76a66253
JM
5897#endif
5898}
5899
a4bb6c3e 5900/* TLB management - PowerPC 440 implementation */
e8eaa2c0 5901
54623277 5902/* tlbre */
e8eaa2c0 5903static void gen_tlbre_440(DisasContext *ctx)
5eb7995e
JM
5904{
5905#if defined(CONFIG_USER_ONLY)
e06fcd75 5906 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
5eb7995e 5907#else
76db3ba4 5908 if (unlikely(!ctx->mem_idx)) {
e06fcd75 5909 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
5eb7995e
JM
5910 return;
5911 }
5912 switch (rB(ctx->opcode)) {
5913 case 0:
5eb7995e 5914 case 1:
5eb7995e 5915 case 2:
74d37793
AJ
5916 {
5917 TCGv_i32 t0 = tcg_const_i32(rB(ctx->opcode));
5823947f 5918 gen_helper_440_tlbre(cpu_gpr[rD(ctx->opcode)], t0, cpu_gpr[rA(ctx->opcode)]);
74d37793
AJ
5919 tcg_temp_free_i32(t0);
5920 }
5eb7995e
JM
5921 break;
5922 default:
e06fcd75 5923 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL);
5eb7995e
JM
5924 break;
5925 }
5926#endif
5927}
5928
5929/* tlbsx - tlbsx. */
e8eaa2c0 5930static void gen_tlbsx_440(DisasContext *ctx)
5eb7995e
JM
5931{
5932#if defined(CONFIG_USER_ONLY)
e06fcd75 5933 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
5eb7995e 5934#else
74d37793 5935 TCGv t0;
76db3ba4 5936 if (unlikely(!ctx->mem_idx)) {
e06fcd75 5937 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
5eb7995e
JM
5938 return;
5939 }
74d37793 5940 t0 = tcg_temp_new();
76db3ba4 5941 gen_addr_reg_index(ctx, t0);
74d37793
AJ
5942 gen_helper_440_tlbsx(cpu_gpr[rD(ctx->opcode)], t0);
5943 tcg_temp_free(t0);
5944 if (Rc(ctx->opcode)) {
5945 int l1 = gen_new_label();
5946 tcg_gen_trunc_tl_i32(cpu_crf[0], cpu_xer);
5947 tcg_gen_shri_i32(cpu_crf[0], cpu_crf[0], XER_SO);
5948 tcg_gen_andi_i32(cpu_crf[0], cpu_crf[0], 1);
5949 tcg_gen_brcondi_tl(TCG_COND_EQ, cpu_gpr[rD(ctx->opcode)], -1, l1);
5950 tcg_gen_ori_i32(cpu_crf[0], cpu_crf[0], 0x02);
5951 gen_set_label(l1);
5952 }
5eb7995e
JM
5953#endif
5954}
5955
5956/* tlbwe */
e8eaa2c0 5957static void gen_tlbwe_440(DisasContext *ctx)
5eb7995e
JM
5958{
5959#if defined(CONFIG_USER_ONLY)
e06fcd75 5960 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
5eb7995e 5961#else
76db3ba4 5962 if (unlikely(!ctx->mem_idx)) {
e06fcd75 5963 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
5eb7995e
JM
5964 return;
5965 }
5966 switch (rB(ctx->opcode)) {
5967 case 0:
5eb7995e 5968 case 1:
5eb7995e 5969 case 2:
74d37793
AJ
5970 {
5971 TCGv_i32 t0 = tcg_const_i32(rB(ctx->opcode));
5972 gen_helper_440_tlbwe(t0, cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)]);
5973 tcg_temp_free_i32(t0);
5974 }
5eb7995e
JM
5975 break;
5976 default:
e06fcd75 5977 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL);
5eb7995e
JM
5978 break;
5979 }
5980#endif
5981}
5982
01662f3e
AG
5983/* TLB management - PowerPC BookE 2.06 implementation */
5984
5985/* tlbre */
5986static void gen_tlbre_booke206(DisasContext *ctx)
5987{
5988#if defined(CONFIG_USER_ONLY)
5989 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
5990#else
5991 if (unlikely(!ctx->mem_idx)) {
5992 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
5993 return;
5994 }
5995
5996 gen_helper_booke206_tlbre();
5997#endif
5998}
5999
6000/* tlbsx - tlbsx. */
6001static void gen_tlbsx_booke206(DisasContext *ctx)
6002{
6003#if defined(CONFIG_USER_ONLY)
6004 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
6005#else
6006 TCGv t0;
6007 if (unlikely(!ctx->mem_idx)) {
6008 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
6009 return;
6010 }
6011
6012 if (rA(ctx->opcode)) {
6013 t0 = tcg_temp_new();
6014 tcg_gen_mov_tl(t0, cpu_gpr[rD(ctx->opcode)]);
6015 } else {
6016 t0 = tcg_const_tl(0);
6017 }
6018
6019 tcg_gen_add_tl(t0, t0, cpu_gpr[rB(ctx->opcode)]);
6020 gen_helper_booke206_tlbsx(t0);
6021#endif
6022}
6023
6024/* tlbwe */
6025static void gen_tlbwe_booke206(DisasContext *ctx)
6026{
6027#if defined(CONFIG_USER_ONLY)
6028 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
6029#else
6030 if (unlikely(!ctx->mem_idx)) {
6031 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
6032 return;
6033 }
6034 gen_helper_booke206_tlbwe();
6035#endif
6036}
6037
6038static void gen_tlbivax_booke206(DisasContext *ctx)
6039{
6040#if defined(CONFIG_USER_ONLY)
6041 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
6042#else
6043 TCGv t0;
6044 if (unlikely(!ctx->mem_idx)) {
6045 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
6046 return;
6047 }
6048
6049 t0 = tcg_temp_new();
6050 gen_addr_reg_index(ctx, t0);
6051
6052 gen_helper_booke206_tlbivax(t0);
6053#endif
6054}
6055
6056
76a66253 6057/* wrtee */
99e300ef 6058static void gen_wrtee(DisasContext *ctx)
76a66253
JM
6059{
6060#if defined(CONFIG_USER_ONLY)
e06fcd75 6061 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
76a66253 6062#else
6527f6ea 6063 TCGv t0;
76db3ba4 6064 if (unlikely(!ctx->mem_idx)) {
e06fcd75 6065 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
76a66253
JM
6066 return;
6067 }
6527f6ea
AJ
6068 t0 = tcg_temp_new();
6069 tcg_gen_andi_tl(t0, cpu_gpr[rD(ctx->opcode)], (1 << MSR_EE));
6070 tcg_gen_andi_tl(cpu_msr, cpu_msr, ~(1 << MSR_EE));
6071 tcg_gen_or_tl(cpu_msr, cpu_msr, t0);
6072 tcg_temp_free(t0);
dee96f6c
JM
6073 /* Stop translation to have a chance to raise an exception
6074 * if we just set msr_ee to 1
6075 */
e06fcd75 6076 gen_stop_exception(ctx);
76a66253
JM
6077#endif
6078}
6079
6080/* wrteei */
99e300ef 6081static void gen_wrteei(DisasContext *ctx)
76a66253
JM
6082{
6083#if defined(CONFIG_USER_ONLY)
e06fcd75 6084 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
76a66253 6085#else
76db3ba4 6086 if (unlikely(!ctx->mem_idx)) {
e06fcd75 6087 gen_inval_exception(ctx, POWERPC_EXCP_PRIV_OPC);
76a66253
JM
6088 return;
6089 }
fbe73008 6090 if (ctx->opcode & 0x00008000) {
6527f6ea
AJ
6091 tcg_gen_ori_tl(cpu_msr, cpu_msr, (1 << MSR_EE));
6092 /* Stop translation to have a chance to raise an exception */
e06fcd75 6093 gen_stop_exception(ctx);
6527f6ea 6094 } else {
1b6e5f99 6095 tcg_gen_andi_tl(cpu_msr, cpu_msr, ~(1 << MSR_EE));
6527f6ea 6096 }
76a66253
JM
6097#endif
6098}
6099
08e46e54 6100/* PowerPC 440 specific instructions */
99e300ef 6101
54623277 6102/* dlmzb */
99e300ef 6103static void gen_dlmzb(DisasContext *ctx)
76a66253 6104{
ef0d51af
AJ
6105 TCGv_i32 t0 = tcg_const_i32(Rc(ctx->opcode));
6106 gen_helper_dlmzb(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)],
6107 cpu_gpr[rB(ctx->opcode)], t0);
6108 tcg_temp_free_i32(t0);
76a66253
JM
6109}
6110
6111/* mbar replaces eieio on 440 */
99e300ef 6112static void gen_mbar(DisasContext *ctx)
76a66253
JM
6113{
6114 /* interpreted as no-op */
6115}
6116
6117/* msync replaces sync on 440 */
99e300ef 6118static void gen_msync(DisasContext *ctx)
76a66253
JM
6119{
6120 /* interpreted as no-op */
6121}
6122
6123/* icbt */
e8eaa2c0 6124static void gen_icbt_440(DisasContext *ctx)
76a66253
JM
6125{
6126 /* interpreted as no-op */
6127 /* XXX: specification say this is treated as a load by the MMU
6128 * but does not generate any exception
6129 */
79aceca5
FB
6130}
6131
a9d9eb8f
JM
6132/*** Altivec vector extension ***/
6133/* Altivec registers moves */
a9d9eb8f 6134
636aa200 6135static inline TCGv_ptr gen_avr_ptr(int reg)
564e571a 6136{
e4704b3b 6137 TCGv_ptr r = tcg_temp_new_ptr();
564e571a
AJ
6138 tcg_gen_addi_ptr(r, cpu_env, offsetof(CPUPPCState, avr[reg]));
6139 return r;
6140}
6141
a9d9eb8f 6142#define GEN_VR_LDX(name, opc2, opc3) \
99e300ef 6143static void glue(gen_, name)(DisasContext *ctx) \
a9d9eb8f 6144{ \
fe1e5c53 6145 TCGv EA; \
a9d9eb8f 6146 if (unlikely(!ctx->altivec_enabled)) { \
e06fcd75 6147 gen_exception(ctx, POWERPC_EXCP_VPU); \
a9d9eb8f
JM
6148 return; \
6149 } \
76db3ba4 6150 gen_set_access_type(ctx, ACCESS_INT); \
fe1e5c53 6151 EA = tcg_temp_new(); \
76db3ba4 6152 gen_addr_reg_index(ctx, EA); \
fe1e5c53 6153 tcg_gen_andi_tl(EA, EA, ~0xf); \
76db3ba4
AJ
6154 if (ctx->le_mode) { \
6155 gen_qemu_ld64(ctx, cpu_avrl[rD(ctx->opcode)], EA); \
fe1e5c53 6156 tcg_gen_addi_tl(EA, EA, 8); \
76db3ba4 6157 gen_qemu_ld64(ctx, cpu_avrh[rD(ctx->opcode)], EA); \
fe1e5c53 6158 } else { \
76db3ba4 6159 gen_qemu_ld64(ctx, cpu_avrh[rD(ctx->opcode)], EA); \
fe1e5c53 6160 tcg_gen_addi_tl(EA, EA, 8); \
76db3ba4 6161 gen_qemu_ld64(ctx, cpu_avrl[rD(ctx->opcode)], EA); \
fe1e5c53
AJ
6162 } \
6163 tcg_temp_free(EA); \
a9d9eb8f
JM
6164}
6165
6166#define GEN_VR_STX(name, opc2, opc3) \
99e300ef 6167static void gen_st##name(DisasContext *ctx) \
a9d9eb8f 6168{ \
fe1e5c53 6169 TCGv EA; \
a9d9eb8f 6170 if (unlikely(!ctx->altivec_enabled)) { \
e06fcd75 6171 gen_exception(ctx, POWERPC_EXCP_VPU); \
a9d9eb8f
JM
6172 return; \
6173 } \
76db3ba4 6174 gen_set_access_type(ctx, ACCESS_INT); \
fe1e5c53 6175 EA = tcg_temp_new(); \
76db3ba4 6176 gen_addr_reg_index(ctx, EA); \
fe1e5c53 6177 tcg_gen_andi_tl(EA, EA, ~0xf); \
76db3ba4
AJ
6178 if (ctx->le_mode) { \
6179 gen_qemu_st64(ctx, cpu_avrl[rD(ctx->opcode)], EA); \
fe1e5c53 6180 tcg_gen_addi_tl(EA, EA, 8); \
76db3ba4 6181 gen_qemu_st64(ctx, cpu_avrh[rD(ctx->opcode)], EA); \
fe1e5c53 6182 } else { \
76db3ba4 6183 gen_qemu_st64(ctx, cpu_avrh[rD(ctx->opcode)], EA); \
fe1e5c53 6184 tcg_gen_addi_tl(EA, EA, 8); \
76db3ba4 6185 gen_qemu_st64(ctx, cpu_avrl[rD(ctx->opcode)], EA); \
fe1e5c53
AJ
6186 } \
6187 tcg_temp_free(EA); \
a9d9eb8f
JM
6188}
6189
cbfb6ae9 6190#define GEN_VR_LVE(name, opc2, opc3) \
99e300ef 6191static void gen_lve##name(DisasContext *ctx) \
cbfb6ae9
AJ
6192 { \
6193 TCGv EA; \
6194 TCGv_ptr rs; \
6195 if (unlikely(!ctx->altivec_enabled)) { \
6196 gen_exception(ctx, POWERPC_EXCP_VPU); \
6197 return; \
6198 } \
6199 gen_set_access_type(ctx, ACCESS_INT); \
6200 EA = tcg_temp_new(); \
6201 gen_addr_reg_index(ctx, EA); \
6202 rs = gen_avr_ptr(rS(ctx->opcode)); \
6203 gen_helper_lve##name (rs, EA); \
6204 tcg_temp_free(EA); \
6205 tcg_temp_free_ptr(rs); \
6206 }
6207
6208#define GEN_VR_STVE(name, opc2, opc3) \
99e300ef 6209static void gen_stve##name(DisasContext *ctx) \
cbfb6ae9
AJ
6210 { \
6211 TCGv EA; \
6212 TCGv_ptr rs; \
6213 if (unlikely(!ctx->altivec_enabled)) { \
6214 gen_exception(ctx, POWERPC_EXCP_VPU); \
6215 return; \
6216 } \
6217 gen_set_access_type(ctx, ACCESS_INT); \
6218 EA = tcg_temp_new(); \
6219 gen_addr_reg_index(ctx, EA); \
6220 rs = gen_avr_ptr(rS(ctx->opcode)); \
6221 gen_helper_stve##name (rs, EA); \
6222 tcg_temp_free(EA); \
6223 tcg_temp_free_ptr(rs); \
6224 }
6225
fe1e5c53 6226GEN_VR_LDX(lvx, 0x07, 0x03);
a9d9eb8f 6227/* As we don't emulate the cache, lvxl is stricly equivalent to lvx */
fe1e5c53 6228GEN_VR_LDX(lvxl, 0x07, 0x0B);
a9d9eb8f 6229
cbfb6ae9
AJ
6230GEN_VR_LVE(bx, 0x07, 0x00);
6231GEN_VR_LVE(hx, 0x07, 0x01);
6232GEN_VR_LVE(wx, 0x07, 0x02);
6233
fe1e5c53 6234GEN_VR_STX(svx, 0x07, 0x07);
a9d9eb8f 6235/* As we don't emulate the cache, stvxl is stricly equivalent to stvx */
fe1e5c53 6236GEN_VR_STX(svxl, 0x07, 0x0F);
a9d9eb8f 6237
cbfb6ae9
AJ
6238GEN_VR_STVE(bx, 0x07, 0x04);
6239GEN_VR_STVE(hx, 0x07, 0x05);
6240GEN_VR_STVE(wx, 0x07, 0x06);
6241
99e300ef 6242static void gen_lvsl(DisasContext *ctx)
bf8d8ded
AJ
6243{
6244 TCGv_ptr rd;
6245 TCGv EA;
6246 if (unlikely(!ctx->altivec_enabled)) {
6247 gen_exception(ctx, POWERPC_EXCP_VPU);
6248 return;
6249 }
6250 EA = tcg_temp_new();
6251 gen_addr_reg_index(ctx, EA);
6252 rd = gen_avr_ptr(rD(ctx->opcode));
6253 gen_helper_lvsl(rd, EA);
6254 tcg_temp_free(EA);
6255 tcg_temp_free_ptr(rd);
6256}
6257
99e300ef 6258static void gen_lvsr(DisasContext *ctx)
bf8d8ded
AJ
6259{
6260 TCGv_ptr rd;
6261 TCGv EA;
6262 if (unlikely(!ctx->altivec_enabled)) {
6263 gen_exception(ctx, POWERPC_EXCP_VPU);
6264 return;
6265 }
6266 EA = tcg_temp_new();
6267 gen_addr_reg_index(ctx, EA);
6268 rd = gen_avr_ptr(rD(ctx->opcode));
6269 gen_helper_lvsr(rd, EA);
6270 tcg_temp_free(EA);
6271 tcg_temp_free_ptr(rd);
6272}
6273
99e300ef 6274static void gen_mfvscr(DisasContext *ctx)
785f451b
AJ
6275{
6276 TCGv_i32 t;
6277 if (unlikely(!ctx->altivec_enabled)) {
6278 gen_exception(ctx, POWERPC_EXCP_VPU);
6279 return;
6280 }
6281 tcg_gen_movi_i64(cpu_avrh[rD(ctx->opcode)], 0);
6282 t = tcg_temp_new_i32();
6283 tcg_gen_ld_i32(t, cpu_env, offsetof(CPUState, vscr));
6284 tcg_gen_extu_i32_i64(cpu_avrl[rD(ctx->opcode)], t);
fce5ecb7 6285 tcg_temp_free_i32(t);
785f451b
AJ
6286}
6287
99e300ef 6288static void gen_mtvscr(DisasContext *ctx)
785f451b 6289{
6e87b7c7 6290 TCGv_ptr p;
785f451b
AJ
6291 if (unlikely(!ctx->altivec_enabled)) {
6292 gen_exception(ctx, POWERPC_EXCP_VPU);
6293 return;
6294 }
6e87b7c7
AJ
6295 p = gen_avr_ptr(rD(ctx->opcode));
6296 gen_helper_mtvscr(p);
6297 tcg_temp_free_ptr(p);
785f451b
AJ
6298}
6299
7a9b96cf
AJ
6300/* Logical operations */
6301#define GEN_VX_LOGICAL(name, tcg_op, opc2, opc3) \
99e300ef 6302static void glue(gen_, name)(DisasContext *ctx) \
7a9b96cf
AJ
6303{ \
6304 if (unlikely(!ctx->altivec_enabled)) { \
6305 gen_exception(ctx, POWERPC_EXCP_VPU); \
6306 return; \
6307 } \
6308 tcg_op(cpu_avrh[rD(ctx->opcode)], cpu_avrh[rA(ctx->opcode)], cpu_avrh[rB(ctx->opcode)]); \
6309 tcg_op(cpu_avrl[rD(ctx->opcode)], cpu_avrl[rA(ctx->opcode)], cpu_avrl[rB(ctx->opcode)]); \
6310}
6311
6312GEN_VX_LOGICAL(vand, tcg_gen_and_i64, 2, 16);
6313GEN_VX_LOGICAL(vandc, tcg_gen_andc_i64, 2, 17);
6314GEN_VX_LOGICAL(vor, tcg_gen_or_i64, 2, 18);
6315GEN_VX_LOGICAL(vxor, tcg_gen_xor_i64, 2, 19);
6316GEN_VX_LOGICAL(vnor, tcg_gen_nor_i64, 2, 20);
6317
8e27dd6f 6318#define GEN_VXFORM(name, opc2, opc3) \
99e300ef 6319static void glue(gen_, name)(DisasContext *ctx) \
8e27dd6f
AJ
6320{ \
6321 TCGv_ptr ra, rb, rd; \
6322 if (unlikely(!ctx->altivec_enabled)) { \
6323 gen_exception(ctx, POWERPC_EXCP_VPU); \
6324 return; \
6325 } \
6326 ra = gen_avr_ptr(rA(ctx->opcode)); \
6327 rb = gen_avr_ptr(rB(ctx->opcode)); \
6328 rd = gen_avr_ptr(rD(ctx->opcode)); \
6329 gen_helper_##name (rd, ra, rb); \
6330 tcg_temp_free_ptr(ra); \
6331 tcg_temp_free_ptr(rb); \
6332 tcg_temp_free_ptr(rd); \
6333}
6334
7872c51c
AJ
6335GEN_VXFORM(vaddubm, 0, 0);
6336GEN_VXFORM(vadduhm, 0, 1);
6337GEN_VXFORM(vadduwm, 0, 2);
6338GEN_VXFORM(vsububm, 0, 16);
6339GEN_VXFORM(vsubuhm, 0, 17);
6340GEN_VXFORM(vsubuwm, 0, 18);
e4039339
AJ
6341GEN_VXFORM(vmaxub, 1, 0);
6342GEN_VXFORM(vmaxuh, 1, 1);
6343GEN_VXFORM(vmaxuw, 1, 2);
6344GEN_VXFORM(vmaxsb, 1, 4);
6345GEN_VXFORM(vmaxsh, 1, 5);
6346GEN_VXFORM(vmaxsw, 1, 6);
6347GEN_VXFORM(vminub, 1, 8);
6348GEN_VXFORM(vminuh, 1, 9);
6349GEN_VXFORM(vminuw, 1, 10);
6350GEN_VXFORM(vminsb, 1, 12);
6351GEN_VXFORM(vminsh, 1, 13);
6352GEN_VXFORM(vminsw, 1, 14);
fab3cbe9
AJ
6353GEN_VXFORM(vavgub, 1, 16);
6354GEN_VXFORM(vavguh, 1, 17);
6355GEN_VXFORM(vavguw, 1, 18);
6356GEN_VXFORM(vavgsb, 1, 20);
6357GEN_VXFORM(vavgsh, 1, 21);
6358GEN_VXFORM(vavgsw, 1, 22);
3b430048
AJ
6359GEN_VXFORM(vmrghb, 6, 0);
6360GEN_VXFORM(vmrghh, 6, 1);
6361GEN_VXFORM(vmrghw, 6, 2);
6362GEN_VXFORM(vmrglb, 6, 4);
6363GEN_VXFORM(vmrglh, 6, 5);
6364GEN_VXFORM(vmrglw, 6, 6);
2c277908
AJ
6365GEN_VXFORM(vmuloub, 4, 0);
6366GEN_VXFORM(vmulouh, 4, 1);
6367GEN_VXFORM(vmulosb, 4, 4);
6368GEN_VXFORM(vmulosh, 4, 5);
6369GEN_VXFORM(vmuleub, 4, 8);
6370GEN_VXFORM(vmuleuh, 4, 9);
6371GEN_VXFORM(vmulesb, 4, 12);
6372GEN_VXFORM(vmulesh, 4, 13);
d79f0809
AJ
6373GEN_VXFORM(vslb, 2, 4);
6374GEN_VXFORM(vslh, 2, 5);
6375GEN_VXFORM(vslw, 2, 6);
07ef34c3
AJ
6376GEN_VXFORM(vsrb, 2, 8);
6377GEN_VXFORM(vsrh, 2, 9);
6378GEN_VXFORM(vsrw, 2, 10);
6379GEN_VXFORM(vsrab, 2, 12);
6380GEN_VXFORM(vsrah, 2, 13);
6381GEN_VXFORM(vsraw, 2, 14);
7b239bec
AJ
6382GEN_VXFORM(vslo, 6, 16);
6383GEN_VXFORM(vsro, 6, 17);
e343da72
AJ
6384GEN_VXFORM(vaddcuw, 0, 6);
6385GEN_VXFORM(vsubcuw, 0, 22);
5ab09f33
AJ
6386GEN_VXFORM(vaddubs, 0, 8);
6387GEN_VXFORM(vadduhs, 0, 9);
6388GEN_VXFORM(vadduws, 0, 10);
6389GEN_VXFORM(vaddsbs, 0, 12);
6390GEN_VXFORM(vaddshs, 0, 13);
6391GEN_VXFORM(vaddsws, 0, 14);
6392GEN_VXFORM(vsububs, 0, 24);
6393GEN_VXFORM(vsubuhs, 0, 25);
6394GEN_VXFORM(vsubuws, 0, 26);
6395GEN_VXFORM(vsubsbs, 0, 28);
6396GEN_VXFORM(vsubshs, 0, 29);
6397GEN_VXFORM(vsubsws, 0, 30);
5e1d0985
AJ
6398GEN_VXFORM(vrlb, 2, 0);
6399GEN_VXFORM(vrlh, 2, 1);
6400GEN_VXFORM(vrlw, 2, 2);
d9430add
AJ
6401GEN_VXFORM(vsl, 2, 7);
6402GEN_VXFORM(vsr, 2, 11);
5335a145
AJ
6403GEN_VXFORM(vpkuhum, 7, 0);
6404GEN_VXFORM(vpkuwum, 7, 1);
6405GEN_VXFORM(vpkuhus, 7, 2);
6406GEN_VXFORM(vpkuwus, 7, 3);
6407GEN_VXFORM(vpkshus, 7, 4);
6408GEN_VXFORM(vpkswus, 7, 5);
6409GEN_VXFORM(vpkshss, 7, 6);
6410GEN_VXFORM(vpkswss, 7, 7);
1dd9ffb9 6411GEN_VXFORM(vpkpx, 7, 12);
8142cddd
AJ
6412GEN_VXFORM(vsum4ubs, 4, 24);
6413GEN_VXFORM(vsum4sbs, 4, 28);
6414GEN_VXFORM(vsum4shs, 4, 25);
6415GEN_VXFORM(vsum2sws, 4, 26);
6416GEN_VXFORM(vsumsws, 4, 30);
56fdd213
AJ
6417GEN_VXFORM(vaddfp, 5, 0);
6418GEN_VXFORM(vsubfp, 5, 1);
1536ff64
AJ
6419GEN_VXFORM(vmaxfp, 5, 16);
6420GEN_VXFORM(vminfp, 5, 17);
fab3cbe9 6421
0cbcd906 6422#define GEN_VXRFORM1(opname, name, str, opc2, opc3) \
e8eaa2c0 6423static void glue(gen_, name)(DisasContext *ctx) \
0cbcd906
AJ
6424 { \
6425 TCGv_ptr ra, rb, rd; \
6426 if (unlikely(!ctx->altivec_enabled)) { \
6427 gen_exception(ctx, POWERPC_EXCP_VPU); \
6428 return; \
6429 } \
6430 ra = gen_avr_ptr(rA(ctx->opcode)); \
6431 rb = gen_avr_ptr(rB(ctx->opcode)); \
6432 rd = gen_avr_ptr(rD(ctx->opcode)); \
6433 gen_helper_##opname (rd, ra, rb); \
6434 tcg_temp_free_ptr(ra); \
6435 tcg_temp_free_ptr(rb); \
6436 tcg_temp_free_ptr(rd); \
6437 }
6438
6439#define GEN_VXRFORM(name, opc2, opc3) \
6440 GEN_VXRFORM1(name, name, #name, opc2, opc3) \
6441 GEN_VXRFORM1(name##_dot, name##_, #name ".", opc2, (opc3 | (0x1 << 4)))
6442
1add6e23
AJ
6443GEN_VXRFORM(vcmpequb, 3, 0)
6444GEN_VXRFORM(vcmpequh, 3, 1)
6445GEN_VXRFORM(vcmpequw, 3, 2)
6446GEN_VXRFORM(vcmpgtsb, 3, 12)
6447GEN_VXRFORM(vcmpgtsh, 3, 13)
6448GEN_VXRFORM(vcmpgtsw, 3, 14)
6449GEN_VXRFORM(vcmpgtub, 3, 8)
6450GEN_VXRFORM(vcmpgtuh, 3, 9)
6451GEN_VXRFORM(vcmpgtuw, 3, 10)
819ca121
AJ
6452GEN_VXRFORM(vcmpeqfp, 3, 3)
6453GEN_VXRFORM(vcmpgefp, 3, 7)
6454GEN_VXRFORM(vcmpgtfp, 3, 11)
6455GEN_VXRFORM(vcmpbfp, 3, 15)
1add6e23 6456
c026766b 6457#define GEN_VXFORM_SIMM(name, opc2, opc3) \
99e300ef 6458static void glue(gen_, name)(DisasContext *ctx) \
c026766b
AJ
6459 { \
6460 TCGv_ptr rd; \
6461 TCGv_i32 simm; \
6462 if (unlikely(!ctx->altivec_enabled)) { \
6463 gen_exception(ctx, POWERPC_EXCP_VPU); \
6464 return; \
6465 } \
6466 simm = tcg_const_i32(SIMM5(ctx->opcode)); \
6467 rd = gen_avr_ptr(rD(ctx->opcode)); \
6468 gen_helper_##name (rd, simm); \
6469 tcg_temp_free_i32(simm); \
6470 tcg_temp_free_ptr(rd); \
6471 }
6472
6473GEN_VXFORM_SIMM(vspltisb, 6, 12);
6474GEN_VXFORM_SIMM(vspltish, 6, 13);
6475GEN_VXFORM_SIMM(vspltisw, 6, 14);
6476
de5f2484 6477#define GEN_VXFORM_NOA(name, opc2, opc3) \
99e300ef 6478static void glue(gen_, name)(DisasContext *ctx) \
de5f2484
AJ
6479 { \
6480 TCGv_ptr rb, rd; \
6481 if (unlikely(!ctx->altivec_enabled)) { \
6482 gen_exception(ctx, POWERPC_EXCP_VPU); \
6483 return; \
6484 } \
6485 rb = gen_avr_ptr(rB(ctx->opcode)); \
6486 rd = gen_avr_ptr(rD(ctx->opcode)); \
6487 gen_helper_##name (rd, rb); \
6488 tcg_temp_free_ptr(rb); \
6489 tcg_temp_free_ptr(rd); \
6490 }
6491
6cf1c6e5
AJ
6492GEN_VXFORM_NOA(vupkhsb, 7, 8);
6493GEN_VXFORM_NOA(vupkhsh, 7, 9);
6494GEN_VXFORM_NOA(vupklsb, 7, 10);
6495GEN_VXFORM_NOA(vupklsh, 7, 11);
79f85c3a
AJ
6496GEN_VXFORM_NOA(vupkhpx, 7, 13);
6497GEN_VXFORM_NOA(vupklpx, 7, 15);
bdfbac35 6498GEN_VXFORM_NOA(vrefp, 5, 4);
071fc3b1 6499GEN_VXFORM_NOA(vrsqrtefp, 5, 5);
0bffbc6c 6500GEN_VXFORM_NOA(vexptefp, 5, 6);
b580763f 6501GEN_VXFORM_NOA(vlogefp, 5, 7);
f6b19645
AJ
6502GEN_VXFORM_NOA(vrfim, 5, 8);
6503GEN_VXFORM_NOA(vrfin, 5, 9);
6504GEN_VXFORM_NOA(vrfip, 5, 10);
6505GEN_VXFORM_NOA(vrfiz, 5, 11);
79f85c3a 6506
21d21583 6507#define GEN_VXFORM_SIMM(name, opc2, opc3) \
99e300ef 6508static void glue(gen_, name)(DisasContext *ctx) \
21d21583
AJ
6509 { \
6510 TCGv_ptr rd; \
6511 TCGv_i32 simm; \
6512 if (unlikely(!ctx->altivec_enabled)) { \
6513 gen_exception(ctx, POWERPC_EXCP_VPU); \
6514 return; \
6515 } \
6516 simm = tcg_const_i32(SIMM5(ctx->opcode)); \
6517 rd = gen_avr_ptr(rD(ctx->opcode)); \
6518 gen_helper_##name (rd, simm); \
6519 tcg_temp_free_i32(simm); \
6520 tcg_temp_free_ptr(rd); \
6521 }
6522
27a4edb3 6523#define GEN_VXFORM_UIMM(name, opc2, opc3) \
99e300ef 6524static void glue(gen_, name)(DisasContext *ctx) \
27a4edb3
AJ
6525 { \
6526 TCGv_ptr rb, rd; \
6527 TCGv_i32 uimm; \
6528 if (unlikely(!ctx->altivec_enabled)) { \
6529 gen_exception(ctx, POWERPC_EXCP_VPU); \
6530 return; \
6531 } \
6532 uimm = tcg_const_i32(UIMM5(ctx->opcode)); \
6533 rb = gen_avr_ptr(rB(ctx->opcode)); \
6534 rd = gen_avr_ptr(rD(ctx->opcode)); \
6535 gen_helper_##name (rd, rb, uimm); \
6536 tcg_temp_free_i32(uimm); \
6537 tcg_temp_free_ptr(rb); \
6538 tcg_temp_free_ptr(rd); \
6539 }
6540
e4e6bee7
AJ
6541GEN_VXFORM_UIMM(vspltb, 6, 8);
6542GEN_VXFORM_UIMM(vsplth, 6, 9);
6543GEN_VXFORM_UIMM(vspltw, 6, 10);
e140632e
AJ
6544GEN_VXFORM_UIMM(vcfux, 5, 12);
6545GEN_VXFORM_UIMM(vcfsx, 5, 13);
875b31db
AJ
6546GEN_VXFORM_UIMM(vctuxs, 5, 14);
6547GEN_VXFORM_UIMM(vctsxs, 5, 15);
e4e6bee7 6548
99e300ef 6549static void gen_vsldoi(DisasContext *ctx)
cd633b10
AJ
6550{
6551 TCGv_ptr ra, rb, rd;
fce5ecb7 6552 TCGv_i32 sh;
cd633b10
AJ
6553 if (unlikely(!ctx->altivec_enabled)) {
6554 gen_exception(ctx, POWERPC_EXCP_VPU);
6555 return;
6556 }
6557 ra = gen_avr_ptr(rA(ctx->opcode));
6558 rb = gen_avr_ptr(rB(ctx->opcode));
6559 rd = gen_avr_ptr(rD(ctx->opcode));
6560 sh = tcg_const_i32(VSH(ctx->opcode));
6561 gen_helper_vsldoi (rd, ra, rb, sh);
6562 tcg_temp_free_ptr(ra);
6563 tcg_temp_free_ptr(rb);
6564 tcg_temp_free_ptr(rd);
fce5ecb7 6565 tcg_temp_free_i32(sh);
cd633b10
AJ
6566}
6567
707cec33 6568#define GEN_VAFORM_PAIRED(name0, name1, opc2) \
99e300ef 6569static void glue(gen_, name0##_##name1)(DisasContext *ctx) \
707cec33
AJ
6570 { \
6571 TCGv_ptr ra, rb, rc, rd; \
6572 if (unlikely(!ctx->altivec_enabled)) { \
6573 gen_exception(ctx, POWERPC_EXCP_VPU); \
6574 return; \
6575 } \
6576 ra = gen_avr_ptr(rA(ctx->opcode)); \
6577 rb = gen_avr_ptr(rB(ctx->opcode)); \
6578 rc = gen_avr_ptr(rC(ctx->opcode)); \
6579 rd = gen_avr_ptr(rD(ctx->opcode)); \
6580 if (Rc(ctx->opcode)) { \
6581 gen_helper_##name1 (rd, ra, rb, rc); \
6582 } else { \
6583 gen_helper_##name0 (rd, ra, rb, rc); \
6584 } \
6585 tcg_temp_free_ptr(ra); \
6586 tcg_temp_free_ptr(rb); \
6587 tcg_temp_free_ptr(rc); \
6588 tcg_temp_free_ptr(rd); \
6589 }
6590
b161ae27
AJ
6591GEN_VAFORM_PAIRED(vmhaddshs, vmhraddshs, 16)
6592
99e300ef 6593static void gen_vmladduhm(DisasContext *ctx)
bcd2ee23
AJ
6594{
6595 TCGv_ptr ra, rb, rc, rd;
6596 if (unlikely(!ctx->altivec_enabled)) {
6597 gen_exception(ctx, POWERPC_EXCP_VPU);
6598 return;
6599 }
6600 ra = gen_avr_ptr(rA(ctx->opcode));
6601 rb = gen_avr_ptr(rB(ctx->opcode));
6602 rc = gen_avr_ptr(rC(ctx->opcode));
6603 rd = gen_avr_ptr(rD(ctx->opcode));
6604 gen_helper_vmladduhm(rd, ra, rb, rc);
6605 tcg_temp_free_ptr(ra);
6606 tcg_temp_free_ptr(rb);
6607 tcg_temp_free_ptr(rc);
6608 tcg_temp_free_ptr(rd);
6609}
6610
b04ae981 6611GEN_VAFORM_PAIRED(vmsumubm, vmsummbm, 18)
4d9903b6 6612GEN_VAFORM_PAIRED(vmsumuhm, vmsumuhs, 19)
eae07261 6613GEN_VAFORM_PAIRED(vmsumshm, vmsumshs, 20)
d1258698 6614GEN_VAFORM_PAIRED(vsel, vperm, 21)
35cf7c7e 6615GEN_VAFORM_PAIRED(vmaddfp, vnmsubfp, 23)
b04ae981 6616
0487d6a8 6617/*** SPE extension ***/
0487d6a8 6618/* Register moves */
3cd7d1dd 6619
a0e13900
FC
6620
6621static inline void gen_evmra(DisasContext *ctx)
6622{
6623
6624 if (unlikely(!ctx->spe_enabled)) {
6625 gen_exception(ctx, POWERPC_EXCP_APU);
6626 return;
6627 }
6628
6629#if defined(TARGET_PPC64)
6630 /* rD := rA */
6631 tcg_gen_mov_i64(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
6632
6633 /* spe_acc := rA */
6634 tcg_gen_st_i64(cpu_gpr[rA(ctx->opcode)],
6635 cpu_env,
6636 offsetof(CPUState, spe_acc));
6637#else
6638 TCGv_i64 tmp = tcg_temp_new_i64();
6639
6640 /* tmp := rA_lo + rA_hi << 32 */
6641 tcg_gen_concat_i32_i64(tmp, cpu_gpr[rA(ctx->opcode)], cpu_gprh[rA(ctx->opcode)]);
6642
6643 /* spe_acc := tmp */
6644 tcg_gen_st_i64(tmp, cpu_env, offsetof(CPUState, spe_acc));
6645 tcg_temp_free_i64(tmp);
6646
6647 /* rD := rA */
6648 tcg_gen_mov_i32(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
6649 tcg_gen_mov_i32(cpu_gprh[rD(ctx->opcode)], cpu_gprh[rA(ctx->opcode)]);
6650#endif
6651}
6652
636aa200
BS
6653static inline void gen_load_gpr64(TCGv_i64 t, int reg)
6654{
f78fb44e
AJ
6655#if defined(TARGET_PPC64)
6656 tcg_gen_mov_i64(t, cpu_gpr[reg]);
6657#else
36aa55dc 6658 tcg_gen_concat_i32_i64(t, cpu_gpr[reg], cpu_gprh[reg]);
3cd7d1dd 6659#endif
f78fb44e 6660}
3cd7d1dd 6661
636aa200
BS
6662static inline void gen_store_gpr64(int reg, TCGv_i64 t)
6663{
f78fb44e
AJ
6664#if defined(TARGET_PPC64)
6665 tcg_gen_mov_i64(cpu_gpr[reg], t);
6666#else
a7812ae4 6667 TCGv_i64 tmp = tcg_temp_new_i64();
f78fb44e 6668 tcg_gen_trunc_i64_i32(cpu_gpr[reg], t);
f78fb44e
AJ
6669 tcg_gen_shri_i64(tmp, t, 32);
6670 tcg_gen_trunc_i64_i32(cpu_gprh[reg], tmp);
a7812ae4 6671 tcg_temp_free_i64(tmp);
3cd7d1dd 6672#endif
f78fb44e 6673}
3cd7d1dd 6674
0487d6a8 6675#define GEN_SPE(name0, name1, opc2, opc3, inval, type) \
99e300ef 6676static void glue(gen_, name0##_##name1)(DisasContext *ctx) \
0487d6a8
JM
6677{ \
6678 if (Rc(ctx->opcode)) \
6679 gen_##name1(ctx); \
6680 else \
6681 gen_##name0(ctx); \
6682}
6683
6684/* Handler for undefined SPE opcodes */
636aa200 6685static inline void gen_speundef(DisasContext *ctx)
0487d6a8 6686{
e06fcd75 6687 gen_inval_exception(ctx, POWERPC_EXCP_INVAL_INVAL);
0487d6a8
JM
6688}
6689
57951c27
AJ
6690/* SPE logic */
6691#if defined(TARGET_PPC64)
6692#define GEN_SPEOP_LOGIC2(name, tcg_op) \
636aa200 6693static inline void gen_##name(DisasContext *ctx) \
0487d6a8
JM
6694{ \
6695 if (unlikely(!ctx->spe_enabled)) { \
e06fcd75 6696 gen_exception(ctx, POWERPC_EXCP_APU); \
0487d6a8
JM
6697 return; \
6698 } \
57951c27
AJ
6699 tcg_op(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)], \
6700 cpu_gpr[rB(ctx->opcode)]); \
6701}
6702#else
6703#define GEN_SPEOP_LOGIC2(name, tcg_op) \
636aa200 6704static inline void gen_##name(DisasContext *ctx) \
57951c27
AJ
6705{ \
6706 if (unlikely(!ctx->spe_enabled)) { \
e06fcd75 6707 gen_exception(ctx, POWERPC_EXCP_APU); \
57951c27
AJ
6708 return; \
6709 } \
6710 tcg_op(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)], \
6711 cpu_gpr[rB(ctx->opcode)]); \
6712 tcg_op(cpu_gprh[rD(ctx->opcode)], cpu_gprh[rA(ctx->opcode)], \
6713 cpu_gprh[rB(ctx->opcode)]); \
0487d6a8 6714}
57951c27
AJ
6715#endif
6716
6717GEN_SPEOP_LOGIC2(evand, tcg_gen_and_tl);
6718GEN_SPEOP_LOGIC2(evandc, tcg_gen_andc_tl);
6719GEN_SPEOP_LOGIC2(evxor, tcg_gen_xor_tl);
6720GEN_SPEOP_LOGIC2(evor, tcg_gen_or_tl);
6721GEN_SPEOP_LOGIC2(evnor, tcg_gen_nor_tl);
6722GEN_SPEOP_LOGIC2(eveqv, tcg_gen_eqv_tl);
6723GEN_SPEOP_LOGIC2(evorc, tcg_gen_orc_tl);
6724GEN_SPEOP_LOGIC2(evnand, tcg_gen_nand_tl);
0487d6a8 6725
57951c27
AJ
6726/* SPE logic immediate */
6727#if defined(TARGET_PPC64)
6728#define GEN_SPEOP_TCG_LOGIC_IMM2(name, tcg_opi) \
636aa200 6729static inline void gen_##name(DisasContext *ctx) \
3d3a6a0a
AJ
6730{ \
6731 if (unlikely(!ctx->spe_enabled)) { \
e06fcd75 6732 gen_exception(ctx, POWERPC_EXCP_APU); \
3d3a6a0a
AJ
6733 return; \
6734 } \
a7812ae4
PB
6735 TCGv_i32 t0 = tcg_temp_local_new_i32(); \
6736 TCGv_i32 t1 = tcg_temp_local_new_i32(); \
6737 TCGv_i64 t2 = tcg_temp_local_new_i64(); \
57951c27
AJ
6738 tcg_gen_trunc_i64_i32(t0, cpu_gpr[rA(ctx->opcode)]); \
6739 tcg_opi(t0, t0, rB(ctx->opcode)); \
6740 tcg_gen_shri_i64(t2, cpu_gpr[rA(ctx->opcode)], 32); \
6741 tcg_gen_trunc_i64_i32(t1, t2); \
a7812ae4 6742 tcg_temp_free_i64(t2); \
57951c27
AJ
6743 tcg_opi(t1, t1, rB(ctx->opcode)); \
6744 tcg_gen_concat_i32_i64(cpu_gpr[rD(ctx->opcode)], t0, t1); \
a7812ae4
PB
6745 tcg_temp_free_i32(t0); \
6746 tcg_temp_free_i32(t1); \
3d3a6a0a 6747}
57951c27
AJ
6748#else
6749#define GEN_SPEOP_TCG_LOGIC_IMM2(name, tcg_opi) \
636aa200 6750static inline void gen_##name(DisasContext *ctx) \
0487d6a8
JM
6751{ \
6752 if (unlikely(!ctx->spe_enabled)) { \
e06fcd75 6753 gen_exception(ctx, POWERPC_EXCP_APU); \
0487d6a8
JM
6754 return; \
6755 } \
57951c27
AJ
6756 tcg_opi(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)], \
6757 rB(ctx->opcode)); \
6758 tcg_opi(cpu_gprh[rD(ctx->opcode)], cpu_gprh[rA(ctx->opcode)], \
6759 rB(ctx->opcode)); \
0487d6a8 6760}
57951c27
AJ
6761#endif
6762GEN_SPEOP_TCG_LOGIC_IMM2(evslwi, tcg_gen_shli_i32);
6763GEN_SPEOP_TCG_LOGIC_IMM2(evsrwiu, tcg_gen_shri_i32);
6764GEN_SPEOP_TCG_LOGIC_IMM2(evsrwis, tcg_gen_sari_i32);
6765GEN_SPEOP_TCG_LOGIC_IMM2(evrlwi, tcg_gen_rotli_i32);
0487d6a8 6766
57951c27
AJ
6767/* SPE arithmetic */
6768#if defined(TARGET_PPC64)
6769#define GEN_SPEOP_ARITH1(name, tcg_op) \
636aa200 6770static inline void gen_##name(DisasContext *ctx) \
0487d6a8
JM
6771{ \
6772 if (unlikely(!ctx->spe_enabled)) { \
e06fcd75 6773 gen_exception(ctx, POWERPC_EXCP_APU); \
0487d6a8
JM
6774 return; \
6775 } \
a7812ae4
PB
6776 TCGv_i32 t0 = tcg_temp_local_new_i32(); \
6777 TCGv_i32 t1 = tcg_temp_local_new_i32(); \
6778 TCGv_i64 t2 = tcg_temp_local_new_i64(); \
57951c27
AJ
6779 tcg_gen_trunc_i64_i32(t0, cpu_gpr[rA(ctx->opcode)]); \
6780 tcg_op(t0, t0); \
6781 tcg_gen_shri_i64(t2, cpu_gpr[rA(ctx->opcode)], 32); \
6782 tcg_gen_trunc_i64_i32(t1, t2); \
a7812ae4 6783 tcg_temp_free_i64(t2); \
57951c27
AJ
6784 tcg_op(t1, t1); \
6785 tcg_gen_concat_i32_i64(cpu_gpr[rD(ctx->opcode)], t0, t1); \
a7812ae4
PB
6786 tcg_temp_free_i32(t0); \
6787 tcg_temp_free_i32(t1); \
0487d6a8 6788}
57951c27 6789#else
a7812ae4 6790#define GEN_SPEOP_ARITH1(name, tcg_op) \
636aa200 6791static inline void gen_##name(DisasContext *ctx) \
57951c27
AJ
6792{ \
6793 if (unlikely(!ctx->spe_enabled)) { \
e06fcd75 6794 gen_exception(ctx, POWERPC_EXCP_APU); \
57951c27
AJ
6795 return; \
6796 } \
6797 tcg_op(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]); \
6798 tcg_op(cpu_gprh[rD(ctx->opcode)], cpu_gprh[rA(ctx->opcode)]); \
6799}
6800#endif
0487d6a8 6801
636aa200 6802static inline void gen_op_evabs(TCGv_i32 ret, TCGv_i32 arg1)
57951c27
AJ
6803{
6804 int l1 = gen_new_label();
6805 int l2 = gen_new_label();
0487d6a8 6806
57951c27
AJ
6807 tcg_gen_brcondi_i32(TCG_COND_GE, arg1, 0, l1);
6808 tcg_gen_neg_i32(ret, arg1);
6809 tcg_gen_br(l2);
6810 gen_set_label(l1);
a7812ae4 6811 tcg_gen_mov_i32(ret, arg1);
57951c27
AJ
6812 gen_set_label(l2);
6813}
6814GEN_SPEOP_ARITH1(evabs, gen_op_evabs);
6815GEN_SPEOP_ARITH1(evneg, tcg_gen_neg_i32);
6816GEN_SPEOP_ARITH1(evextsb, tcg_gen_ext8s_i32);
6817GEN_SPEOP_ARITH1(evextsh, tcg_gen_ext16s_i32);
636aa200 6818static inline void gen_op_evrndw(TCGv_i32 ret, TCGv_i32 arg1)
0487d6a8 6819{
57951c27
AJ
6820 tcg_gen_addi_i32(ret, arg1, 0x8000);
6821 tcg_gen_ext16u_i32(ret, ret);
6822}
6823GEN_SPEOP_ARITH1(evrndw, gen_op_evrndw);
a7812ae4
PB
6824GEN_SPEOP_ARITH1(evcntlsw, gen_helper_cntlsw32);
6825GEN_SPEOP_ARITH1(evcntlzw, gen_helper_cntlzw32);
0487d6a8 6826
57951c27
AJ
6827#if defined(TARGET_PPC64)
6828#define GEN_SPEOP_ARITH2(name, tcg_op) \
636aa200 6829static inline void gen_##name(DisasContext *ctx) \
0487d6a8
JM
6830{ \
6831 if (unlikely(!ctx->spe_enabled)) { \
e06fcd75 6832 gen_exception(ctx, POWERPC_EXCP_APU); \
0487d6a8
JM
6833 return; \
6834 } \
a7812ae4
PB
6835 TCGv_i32 t0 = tcg_temp_local_new_i32(); \
6836 TCGv_i32 t1 = tcg_temp_local_new_i32(); \
6837 TCGv_i32 t2 = tcg_temp_local_new_i32(); \
501e23c4 6838 TCGv_i64 t3 = tcg_temp_local_new_i64(); \
57951c27
AJ
6839 tcg_gen_trunc_i64_i32(t0, cpu_gpr[rA(ctx->opcode)]); \
6840 tcg_gen_trunc_i64_i32(t2, cpu_gpr[rB(ctx->opcode)]); \
6841 tcg_op(t0, t0, t2); \
6842 tcg_gen_shri_i64(t3, cpu_gpr[rA(ctx->opcode)], 32); \
6843 tcg_gen_trunc_i64_i32(t1, t3); \
6844 tcg_gen_shri_i64(t3, cpu_gpr[rB(ctx->opcode)], 32); \
6845 tcg_gen_trunc_i64_i32(t2, t3); \
a7812ae4 6846 tcg_temp_free_i64(t3); \
57951c27 6847 tcg_op(t1, t1, t2); \
a7812ae4 6848 tcg_temp_free_i32(t2); \
57951c27 6849 tcg_gen_concat_i32_i64(cpu_gpr[rD(ctx->opcode)], t0, t1); \
a7812ae4
PB
6850 tcg_temp_free_i32(t0); \
6851 tcg_temp_free_i32(t1); \
0487d6a8 6852}
57951c27
AJ
6853#else
6854#define GEN_SPEOP_ARITH2(name, tcg_op) \
636aa200 6855static inline void gen_##name(DisasContext *ctx) \
0487d6a8
JM
6856{ \
6857 if (unlikely(!ctx->spe_enabled)) { \
e06fcd75 6858 gen_exception(ctx, POWERPC_EXCP_APU); \
0487d6a8
JM
6859 return; \
6860 } \
57951c27
AJ
6861 tcg_op(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)], \
6862 cpu_gpr[rB(ctx->opcode)]); \
6863 tcg_op(cpu_gprh[rD(ctx->opcode)], cpu_gprh[rA(ctx->opcode)], \
6864 cpu_gprh[rB(ctx->opcode)]); \
0487d6a8 6865}
57951c27 6866#endif
0487d6a8 6867
636aa200 6868static inline void gen_op_evsrwu(TCGv_i32 ret, TCGv_i32 arg1, TCGv_i32 arg2)
57951c27 6869{
a7812ae4 6870 TCGv_i32 t0;
57951c27 6871 int l1, l2;
0487d6a8 6872
57951c27
AJ
6873 l1 = gen_new_label();
6874 l2 = gen_new_label();
a7812ae4 6875 t0 = tcg_temp_local_new_i32();
57951c27
AJ
6876 /* No error here: 6 bits are used */
6877 tcg_gen_andi_i32(t0, arg2, 0x3F);
6878 tcg_gen_brcondi_i32(TCG_COND_GE, t0, 32, l1);
6879 tcg_gen_shr_i32(ret, arg1, t0);
6880 tcg_gen_br(l2);
6881 gen_set_label(l1);
6882 tcg_gen_movi_i32(ret, 0);
0aef4261 6883 gen_set_label(l2);
a7812ae4 6884 tcg_temp_free_i32(t0);
57951c27
AJ
6885}
6886GEN_SPEOP_ARITH2(evsrwu, gen_op_evsrwu);
636aa200 6887static inline void gen_op_evsrws(TCGv_i32 ret, TCGv_i32 arg1, TCGv_i32 arg2)
57951c27 6888{
a7812ae4 6889 TCGv_i32 t0;
57951c27
AJ
6890 int l1, l2;
6891
6892 l1 = gen_new_label();
6893 l2 = gen_new_label();
a7812ae4 6894 t0 = tcg_temp_local_new_i32();
57951c27
AJ
6895 /* No error here: 6 bits are used */
6896 tcg_gen_andi_i32(t0, arg2, 0x3F);
6897 tcg_gen_brcondi_i32(TCG_COND_GE, t0, 32, l1);
6898 tcg_gen_sar_i32(ret, arg1, t0);
6899 tcg_gen_br(l2);
6900 gen_set_label(l1);
6901 tcg_gen_movi_i32(ret, 0);
0aef4261 6902 gen_set_label(l2);
a7812ae4 6903 tcg_temp_free_i32(t0);
57951c27
AJ
6904}
6905GEN_SPEOP_ARITH2(evsrws, gen_op_evsrws);
636aa200 6906static inline void gen_op_evslw(TCGv_i32 ret, TCGv_i32 arg1, TCGv_i32 arg2)
57951c27 6907{
a7812ae4 6908 TCGv_i32 t0;
57951c27
AJ
6909 int l1, l2;
6910
6911 l1 = gen_new_label();
6912 l2 = gen_new_label();
a7812ae4 6913 t0 = tcg_temp_local_new_i32();
57951c27
AJ
6914 /* No error here: 6 bits are used */
6915 tcg_gen_andi_i32(t0, arg2, 0x3F);
6916 tcg_gen_brcondi_i32(TCG_COND_GE, t0, 32, l1);
6917 tcg_gen_shl_i32(ret, arg1, t0);
6918 tcg_gen_br(l2);
6919 gen_set_label(l1);
6920 tcg_gen_movi_i32(ret, 0);
e29ef9fa 6921 gen_set_label(l2);
a7812ae4 6922 tcg_temp_free_i32(t0);
57951c27
AJ
6923}
6924GEN_SPEOP_ARITH2(evslw, gen_op_evslw);
636aa200 6925static inline void gen_op_evrlw(TCGv_i32 ret, TCGv_i32 arg1, TCGv_i32 arg2)
57951c27 6926{
a7812ae4 6927 TCGv_i32 t0 = tcg_temp_new_i32();
57951c27
AJ
6928 tcg_gen_andi_i32(t0, arg2, 0x1F);
6929 tcg_gen_rotl_i32(ret, arg1, t0);
a7812ae4 6930 tcg_temp_free_i32(t0);
57951c27
AJ
6931}
6932GEN_SPEOP_ARITH2(evrlw, gen_op_evrlw);
636aa200 6933static inline void gen_evmergehi(DisasContext *ctx)
57951c27
AJ
6934{
6935 if (unlikely(!ctx->spe_enabled)) {
e06fcd75 6936 gen_exception(ctx, POWERPC_EXCP_APU);
57951c27
AJ
6937 return;
6938 }
6939#if defined(TARGET_PPC64)
a7812ae4
PB
6940 TCGv t0 = tcg_temp_new();
6941 TCGv t1 = tcg_temp_new();
57951c27
AJ
6942 tcg_gen_shri_tl(t0, cpu_gpr[rB(ctx->opcode)], 32);
6943 tcg_gen_andi_tl(t1, cpu_gpr[rA(ctx->opcode)], 0xFFFFFFFF0000000ULL);
6944 tcg_gen_or_tl(cpu_gpr[rD(ctx->opcode)], t0, t1);
6945 tcg_temp_free(t0);
6946 tcg_temp_free(t1);
6947#else
6948 tcg_gen_mov_i32(cpu_gpr[rD(ctx->opcode)], cpu_gprh[rB(ctx->opcode)]);
6949 tcg_gen_mov_i32(cpu_gprh[rD(ctx->opcode)], cpu_gprh[rA(ctx->opcode)]);
6950#endif
6951}
6952GEN_SPEOP_ARITH2(evaddw, tcg_gen_add_i32);
636aa200 6953static inline void gen_op_evsubf(TCGv_i32 ret, TCGv_i32 arg1, TCGv_i32 arg2)
0487d6a8 6954{
57951c27
AJ
6955 tcg_gen_sub_i32(ret, arg2, arg1);
6956}
6957GEN_SPEOP_ARITH2(evsubfw, gen_op_evsubf);
0487d6a8 6958
57951c27
AJ
6959/* SPE arithmetic immediate */
6960#if defined(TARGET_PPC64)
6961#define GEN_SPEOP_ARITH_IMM2(name, tcg_op) \
636aa200 6962static inline void gen_##name(DisasContext *ctx) \
57951c27
AJ
6963{ \
6964 if (unlikely(!ctx->spe_enabled)) { \
e06fcd75 6965 gen_exception(ctx, POWERPC_EXCP_APU); \
57951c27
AJ
6966 return; \
6967 } \
a7812ae4
PB
6968 TCGv_i32 t0 = tcg_temp_local_new_i32(); \
6969 TCGv_i32 t1 = tcg_temp_local_new_i32(); \
6970 TCGv_i64 t2 = tcg_temp_local_new_i64(); \
57951c27
AJ
6971 tcg_gen_trunc_i64_i32(t0, cpu_gpr[rB(ctx->opcode)]); \
6972 tcg_op(t0, t0, rA(ctx->opcode)); \
6973 tcg_gen_shri_i64(t2, cpu_gpr[rB(ctx->opcode)], 32); \
6974 tcg_gen_trunc_i64_i32(t1, t2); \
e06fcd75 6975 tcg_temp_free_i64(t2); \
57951c27
AJ
6976 tcg_op(t1, t1, rA(ctx->opcode)); \
6977 tcg_gen_concat_i32_i64(cpu_gpr[rD(ctx->opcode)], t0, t1); \
a7812ae4
PB
6978 tcg_temp_free_i32(t0); \
6979 tcg_temp_free_i32(t1); \
57951c27
AJ
6980}
6981#else
6982#define GEN_SPEOP_ARITH_IMM2(name, tcg_op) \
636aa200 6983static inline void gen_##name(DisasContext *ctx) \
57951c27
AJ
6984{ \
6985 if (unlikely(!ctx->spe_enabled)) { \
e06fcd75 6986 gen_exception(ctx, POWERPC_EXCP_APU); \
57951c27
AJ
6987 return; \
6988 } \
6989 tcg_op(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rB(ctx->opcode)], \
6990 rA(ctx->opcode)); \
6991 tcg_op(cpu_gprh[rD(ctx->opcode)], cpu_gprh[rB(ctx->opcode)], \
6992 rA(ctx->opcode)); \
6993}
6994#endif
6995GEN_SPEOP_ARITH_IMM2(evaddiw, tcg_gen_addi_i32);
6996GEN_SPEOP_ARITH_IMM2(evsubifw, tcg_gen_subi_i32);
6997
6998/* SPE comparison */
6999#if defined(TARGET_PPC64)
7000#define GEN_SPEOP_COMP(name, tcg_cond) \
636aa200 7001static inline void gen_##name(DisasContext *ctx) \
57951c27
AJ
7002{ \
7003 if (unlikely(!ctx->spe_enabled)) { \
e06fcd75 7004 gen_exception(ctx, POWERPC_EXCP_APU); \
57951c27
AJ
7005 return; \
7006 } \
7007 int l1 = gen_new_label(); \
7008 int l2 = gen_new_label(); \
7009 int l3 = gen_new_label(); \
7010 int l4 = gen_new_label(); \
a7812ae4
PB
7011 TCGv_i32 t0 = tcg_temp_local_new_i32(); \
7012 TCGv_i32 t1 = tcg_temp_local_new_i32(); \
7013 TCGv_i64 t2 = tcg_temp_local_new_i64(); \
57951c27
AJ
7014 tcg_gen_trunc_i64_i32(t0, cpu_gpr[rA(ctx->opcode)]); \
7015 tcg_gen_trunc_i64_i32(t1, cpu_gpr[rB(ctx->opcode)]); \
7016 tcg_gen_brcond_i32(tcg_cond, t0, t1, l1); \
a7812ae4 7017 tcg_gen_movi_i32(cpu_crf[crfD(ctx->opcode)], 0); \
57951c27
AJ
7018 tcg_gen_br(l2); \
7019 gen_set_label(l1); \
7020 tcg_gen_movi_i32(cpu_crf[crfD(ctx->opcode)], \
7021 CRF_CL | CRF_CH_OR_CL | CRF_CH_AND_CL); \
7022 gen_set_label(l2); \
7023 tcg_gen_shri_i64(t2, cpu_gpr[rA(ctx->opcode)], 32); \
7024 tcg_gen_trunc_i64_i32(t0, t2); \
7025 tcg_gen_shri_i64(t2, cpu_gpr[rB(ctx->opcode)], 32); \
7026 tcg_gen_trunc_i64_i32(t1, t2); \
a7812ae4 7027 tcg_temp_free_i64(t2); \
57951c27
AJ
7028 tcg_gen_brcond_i32(tcg_cond, t0, t1, l3); \
7029 tcg_gen_andi_i32(cpu_crf[crfD(ctx->opcode)], cpu_crf[crfD(ctx->opcode)], \
7030 ~(CRF_CH | CRF_CH_AND_CL)); \
7031 tcg_gen_br(l4); \
7032 gen_set_label(l3); \
7033 tcg_gen_ori_i32(cpu_crf[crfD(ctx->opcode)], cpu_crf[crfD(ctx->opcode)], \
7034 CRF_CH | CRF_CH_OR_CL); \
7035 gen_set_label(l4); \
a7812ae4
PB
7036 tcg_temp_free_i32(t0); \
7037 tcg_temp_free_i32(t1); \
57951c27
AJ
7038}
7039#else
7040#define GEN_SPEOP_COMP(name, tcg_cond) \
636aa200 7041static inline void gen_##name(DisasContext *ctx) \
57951c27
AJ
7042{ \
7043 if (unlikely(!ctx->spe_enabled)) { \
e06fcd75 7044 gen_exception(ctx, POWERPC_EXCP_APU); \
57951c27
AJ
7045 return; \
7046 } \
7047 int l1 = gen_new_label(); \
7048 int l2 = gen_new_label(); \
7049 int l3 = gen_new_label(); \
7050 int l4 = gen_new_label(); \
7051 \
7052 tcg_gen_brcond_i32(tcg_cond, cpu_gpr[rA(ctx->opcode)], \
7053 cpu_gpr[rB(ctx->opcode)], l1); \
7054 tcg_gen_movi_tl(cpu_crf[crfD(ctx->opcode)], 0); \
7055 tcg_gen_br(l2); \
7056 gen_set_label(l1); \
7057 tcg_gen_movi_i32(cpu_crf[crfD(ctx->opcode)], \
7058 CRF_CL | CRF_CH_OR_CL | CRF_CH_AND_CL); \
7059 gen_set_label(l2); \
7060 tcg_gen_brcond_i32(tcg_cond, cpu_gprh[rA(ctx->opcode)], \
7061 cpu_gprh[rB(ctx->opcode)], l3); \
7062 tcg_gen_andi_i32(cpu_crf[crfD(ctx->opcode)], cpu_crf[crfD(ctx->opcode)], \
7063 ~(CRF_CH | CRF_CH_AND_CL)); \
7064 tcg_gen_br(l4); \
7065 gen_set_label(l3); \
7066 tcg_gen_ori_i32(cpu_crf[crfD(ctx->opcode)], cpu_crf[crfD(ctx->opcode)], \
7067 CRF_CH | CRF_CH_OR_CL); \
7068 gen_set_label(l4); \
7069}
7070#endif
7071GEN_SPEOP_COMP(evcmpgtu, TCG_COND_GTU);
7072GEN_SPEOP_COMP(evcmpgts, TCG_COND_GT);
7073GEN_SPEOP_COMP(evcmpltu, TCG_COND_LTU);
7074GEN_SPEOP_COMP(evcmplts, TCG_COND_LT);
7075GEN_SPEOP_COMP(evcmpeq, TCG_COND_EQ);
7076
7077/* SPE misc */
636aa200 7078static inline void gen_brinc(DisasContext *ctx)
57951c27
AJ
7079{
7080 /* Note: brinc is usable even if SPE is disabled */
a7812ae4
PB
7081 gen_helper_brinc(cpu_gpr[rD(ctx->opcode)],
7082 cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)]);
0487d6a8 7083}
636aa200 7084static inline void gen_evmergelo(DisasContext *ctx)
57951c27
AJ
7085{
7086 if (unlikely(!ctx->spe_enabled)) {
e06fcd75 7087 gen_exception(ctx, POWERPC_EXCP_APU);
57951c27
AJ
7088 return;
7089 }
7090#if defined(TARGET_PPC64)
a7812ae4
PB
7091 TCGv t0 = tcg_temp_new();
7092 TCGv t1 = tcg_temp_new();
17d9b3af 7093 tcg_gen_ext32u_tl(t0, cpu_gpr[rB(ctx->opcode)]);
57951c27
AJ
7094 tcg_gen_shli_tl(t1, cpu_gpr[rA(ctx->opcode)], 32);
7095 tcg_gen_or_tl(cpu_gpr[rD(ctx->opcode)], t0, t1);
7096 tcg_temp_free(t0);
7097 tcg_temp_free(t1);
7098#else
57951c27 7099 tcg_gen_mov_i32(cpu_gprh[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
33890b3e 7100 tcg_gen_mov_i32(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rB(ctx->opcode)]);
57951c27
AJ
7101#endif
7102}
636aa200 7103static inline void gen_evmergehilo(DisasContext *ctx)
57951c27
AJ
7104{
7105 if (unlikely(!ctx->spe_enabled)) {
e06fcd75 7106 gen_exception(ctx, POWERPC_EXCP_APU);
57951c27
AJ
7107 return;
7108 }
7109#if defined(TARGET_PPC64)
a7812ae4
PB
7110 TCGv t0 = tcg_temp_new();
7111 TCGv t1 = tcg_temp_new();
17d9b3af 7112 tcg_gen_ext32u_tl(t0, cpu_gpr[rB(ctx->opcode)]);
57951c27
AJ
7113 tcg_gen_andi_tl(t1, cpu_gpr[rA(ctx->opcode)], 0xFFFFFFFF0000000ULL);
7114 tcg_gen_or_tl(cpu_gpr[rD(ctx->opcode)], t0, t1);
7115 tcg_temp_free(t0);
7116 tcg_temp_free(t1);
7117#else
7118 tcg_gen_mov_i32(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rB(ctx->opcode)]);
7119 tcg_gen_mov_i32(cpu_gprh[rD(ctx->opcode)], cpu_gprh[rA(ctx->opcode)]);
7120#endif
7121}
636aa200 7122static inline void gen_evmergelohi(DisasContext *ctx)
57951c27
AJ
7123{
7124 if (unlikely(!ctx->spe_enabled)) {
e06fcd75 7125 gen_exception(ctx, POWERPC_EXCP_APU);
57951c27
AJ
7126 return;
7127 }
7128#if defined(TARGET_PPC64)
a7812ae4
PB
7129 TCGv t0 = tcg_temp_new();
7130 TCGv t1 = tcg_temp_new();
57951c27
AJ
7131 tcg_gen_shri_tl(t0, cpu_gpr[rB(ctx->opcode)], 32);
7132 tcg_gen_shli_tl(t1, cpu_gpr[rA(ctx->opcode)], 32);
7133 tcg_gen_or_tl(cpu_gpr[rD(ctx->opcode)], t0, t1);
7134 tcg_temp_free(t0);
7135 tcg_temp_free(t1);
7136#else
33890b3e
NF
7137 if (rD(ctx->opcode) == rA(ctx->opcode)) {
7138 TCGv_i32 tmp = tcg_temp_new_i32();
7139 tcg_gen_mov_i32(tmp, cpu_gpr[rA(ctx->opcode)]);
7140 tcg_gen_mov_i32(cpu_gpr[rD(ctx->opcode)], cpu_gprh[rB(ctx->opcode)]);
7141 tcg_gen_mov_i32(cpu_gprh[rD(ctx->opcode)], tmp);
7142 tcg_temp_free_i32(tmp);
7143 } else {
7144 tcg_gen_mov_i32(cpu_gpr[rD(ctx->opcode)], cpu_gprh[rB(ctx->opcode)]);
7145 tcg_gen_mov_i32(cpu_gprh[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
7146 }
57951c27
AJ
7147#endif
7148}
636aa200 7149static inline void gen_evsplati(DisasContext *ctx)
57951c27 7150{
ae01847f 7151 uint64_t imm = ((int32_t)(rA(ctx->opcode) << 27)) >> 27;
0487d6a8 7152
57951c27 7153#if defined(TARGET_PPC64)
38d14952 7154 tcg_gen_movi_tl(cpu_gpr[rD(ctx->opcode)], (imm << 32) | imm);
57951c27
AJ
7155#else
7156 tcg_gen_movi_i32(cpu_gpr[rD(ctx->opcode)], imm);
7157 tcg_gen_movi_i32(cpu_gprh[rD(ctx->opcode)], imm);
7158#endif
7159}
636aa200 7160static inline void gen_evsplatfi(DisasContext *ctx)
0487d6a8 7161{
ae01847f 7162 uint64_t imm = rA(ctx->opcode) << 27;
0487d6a8 7163
57951c27 7164#if defined(TARGET_PPC64)
38d14952 7165 tcg_gen_movi_tl(cpu_gpr[rD(ctx->opcode)], (imm << 32) | imm);
57951c27
AJ
7166#else
7167 tcg_gen_movi_i32(cpu_gpr[rD(ctx->opcode)], imm);
7168 tcg_gen_movi_i32(cpu_gprh[rD(ctx->opcode)], imm);
7169#endif
0487d6a8
JM
7170}
7171
636aa200 7172static inline void gen_evsel(DisasContext *ctx)
57951c27
AJ
7173{
7174 int l1 = gen_new_label();
7175 int l2 = gen_new_label();
7176 int l3 = gen_new_label();
7177 int l4 = gen_new_label();
a7812ae4 7178 TCGv_i32 t0 = tcg_temp_local_new_i32();
57951c27 7179#if defined(TARGET_PPC64)
a7812ae4
PB
7180 TCGv t1 = tcg_temp_local_new();
7181 TCGv t2 = tcg_temp_local_new();
57951c27
AJ
7182#endif
7183 tcg_gen_andi_i32(t0, cpu_crf[ctx->opcode & 0x07], 1 << 3);
7184 tcg_gen_brcondi_i32(TCG_COND_EQ, t0, 0, l1);
7185#if defined(TARGET_PPC64)
7186 tcg_gen_andi_tl(t1, cpu_gpr[rA(ctx->opcode)], 0xFFFFFFFF00000000ULL);
7187#else
7188 tcg_gen_mov_tl(cpu_gprh[rD(ctx->opcode)], cpu_gprh[rA(ctx->opcode)]);
7189#endif
7190 tcg_gen_br(l2);
7191 gen_set_label(l1);
7192#if defined(TARGET_PPC64)
7193 tcg_gen_andi_tl(t1, cpu_gpr[rB(ctx->opcode)], 0xFFFFFFFF00000000ULL);
7194#else
7195 tcg_gen_mov_tl(cpu_gprh[rD(ctx->opcode)], cpu_gprh[rB(ctx->opcode)]);
7196#endif
7197 gen_set_label(l2);
7198 tcg_gen_andi_i32(t0, cpu_crf[ctx->opcode & 0x07], 1 << 2);
7199 tcg_gen_brcondi_i32(TCG_COND_EQ, t0, 0, l3);
7200#if defined(TARGET_PPC64)
17d9b3af 7201 tcg_gen_ext32u_tl(t2, cpu_gpr[rA(ctx->opcode)]);
57951c27
AJ
7202#else
7203 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
7204#endif
7205 tcg_gen_br(l4);
7206 gen_set_label(l3);
7207#if defined(TARGET_PPC64)
17d9b3af 7208 tcg_gen_ext32u_tl(t2, cpu_gpr[rB(ctx->opcode)]);
57951c27
AJ
7209#else
7210 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rB(ctx->opcode)]);
7211#endif
7212 gen_set_label(l4);
a7812ae4 7213 tcg_temp_free_i32(t0);
57951c27
AJ
7214#if defined(TARGET_PPC64)
7215 tcg_gen_or_tl(cpu_gpr[rD(ctx->opcode)], t1, t2);
7216 tcg_temp_free(t1);
7217 tcg_temp_free(t2);
7218#endif
7219}
e8eaa2c0
BS
7220
7221static void gen_evsel0(DisasContext *ctx)
57951c27
AJ
7222{
7223 gen_evsel(ctx);
7224}
e8eaa2c0
BS
7225
7226static void gen_evsel1(DisasContext *ctx)
57951c27
AJ
7227{
7228 gen_evsel(ctx);
7229}
e8eaa2c0
BS
7230
7231static void gen_evsel2(DisasContext *ctx)
57951c27
AJ
7232{
7233 gen_evsel(ctx);
7234}
e8eaa2c0
BS
7235
7236static void gen_evsel3(DisasContext *ctx)
57951c27
AJ
7237{
7238 gen_evsel(ctx);
7239}
0487d6a8 7240
a0e13900
FC
7241/* Multiply */
7242
7243static inline void gen_evmwumi(DisasContext *ctx)
7244{
7245 TCGv_i64 t0, t1;
7246
7247 if (unlikely(!ctx->spe_enabled)) {
7248 gen_exception(ctx, POWERPC_EXCP_APU);
7249 return;
7250 }
7251
7252 t0 = tcg_temp_new_i64();
7253 t1 = tcg_temp_new_i64();
7254
7255 /* t0 := rA; t1 := rB */
7256#if defined(TARGET_PPC64)
7257 tcg_gen_ext32u_tl(t0, cpu_gpr[rA(ctx->opcode)]);
7258 tcg_gen_ext32u_tl(t1, cpu_gpr[rB(ctx->opcode)]);
7259#else
7260 tcg_gen_extu_tl_i64(t0, cpu_gpr[rA(ctx->opcode)]);
7261 tcg_gen_extu_tl_i64(t1, cpu_gpr[rB(ctx->opcode)]);
7262#endif
7263
7264 tcg_gen_mul_i64(t0, t0, t1); /* t0 := rA * rB */
7265
7266 gen_store_gpr64(rD(ctx->opcode), t0); /* rD := t0 */
7267
7268 tcg_temp_free_i64(t0);
7269 tcg_temp_free_i64(t1);
7270}
7271
7272static inline void gen_evmwumia(DisasContext *ctx)
7273{
7274 TCGv_i64 tmp;
7275
7276 if (unlikely(!ctx->spe_enabled)) {
7277 gen_exception(ctx, POWERPC_EXCP_APU);
7278 return;
7279 }
7280
7281 gen_evmwumi(ctx); /* rD := rA * rB */
7282
7283 tmp = tcg_temp_new_i64();
7284
7285 /* acc := rD */
7286 gen_load_gpr64(tmp, rD(ctx->opcode));
7287 tcg_gen_st_i64(tmp, cpu_env, offsetof(CPUState, spe_acc));
7288 tcg_temp_free_i64(tmp);
7289}
7290
7291static inline void gen_evmwumiaa(DisasContext *ctx)
7292{
7293 TCGv_i64 acc;
7294 TCGv_i64 tmp;
7295
7296 if (unlikely(!ctx->spe_enabled)) {
7297 gen_exception(ctx, POWERPC_EXCP_APU);
7298 return;
7299 }
7300
7301 gen_evmwumi(ctx); /* rD := rA * rB */
7302
7303 acc = tcg_temp_new_i64();
7304 tmp = tcg_temp_new_i64();
7305
7306 /* tmp := rD */
7307 gen_load_gpr64(tmp, rD(ctx->opcode));
7308
7309 /* Load acc */
7310 tcg_gen_ld_i64(acc, cpu_env, offsetof(CPUState, spe_acc));
7311
7312 /* acc := tmp + acc */
7313 tcg_gen_add_i64(acc, acc, tmp);
7314
7315 /* Store acc */
7316 tcg_gen_st_i64(acc, cpu_env, offsetof(CPUState, spe_acc));
7317
7318 /* rD := acc */
7319 gen_store_gpr64(rD(ctx->opcode), acc);
7320
7321 tcg_temp_free_i64(acc);
7322 tcg_temp_free_i64(tmp);
7323}
7324
7325static inline void gen_evmwsmi(DisasContext *ctx)
7326{
7327 TCGv_i64 t0, t1;
7328
7329 if (unlikely(!ctx->spe_enabled)) {
7330 gen_exception(ctx, POWERPC_EXCP_APU);
7331 return;
7332 }
7333
7334 t0 = tcg_temp_new_i64();
7335 t1 = tcg_temp_new_i64();
7336
7337 /* t0 := rA; t1 := rB */
7338#if defined(TARGET_PPC64)
7339 tcg_gen_ext32s_tl(t0, cpu_gpr[rA(ctx->opcode)]);
7340 tcg_gen_ext32s_tl(t1, cpu_gpr[rB(ctx->opcode)]);
7341#else
7342 tcg_gen_ext_tl_i64(t0, cpu_gpr[rA(ctx->opcode)]);
7343 tcg_gen_ext_tl_i64(t1, cpu_gpr[rB(ctx->opcode)]);
7344#endif
7345
7346 tcg_gen_mul_i64(t0, t0, t1); /* t0 := rA * rB */
7347
7348 gen_store_gpr64(rD(ctx->opcode), t0); /* rD := t0 */
7349
7350 tcg_temp_free_i64(t0);
7351 tcg_temp_free_i64(t1);
7352}
7353
7354static inline void gen_evmwsmia(DisasContext *ctx)
7355{
7356 TCGv_i64 tmp;
7357
7358 gen_evmwsmi(ctx); /* rD := rA * rB */
7359
7360 tmp = tcg_temp_new_i64();
7361
7362 /* acc := rD */
7363 gen_load_gpr64(tmp, rD(ctx->opcode));
7364 tcg_gen_st_i64(tmp, cpu_env, offsetof(CPUState, spe_acc));
7365
7366 tcg_temp_free_i64(tmp);
7367}
7368
7369static inline void gen_evmwsmiaa(DisasContext *ctx)
7370{
7371 TCGv_i64 acc = tcg_temp_new_i64();
7372 TCGv_i64 tmp = tcg_temp_new_i64();
7373
7374 gen_evmwsmi(ctx); /* rD := rA * rB */
7375
7376 acc = tcg_temp_new_i64();
7377 tmp = tcg_temp_new_i64();
7378
7379 /* tmp := rD */
7380 gen_load_gpr64(tmp, rD(ctx->opcode));
7381
7382 /* Load acc */
7383 tcg_gen_ld_i64(acc, cpu_env, offsetof(CPUState, spe_acc));
7384
7385 /* acc := tmp + acc */
7386 tcg_gen_add_i64(acc, acc, tmp);
7387
7388 /* Store acc */
7389 tcg_gen_st_i64(acc, cpu_env, offsetof(CPUState, spe_acc));
7390
7391 /* rD := acc */
7392 gen_store_gpr64(rD(ctx->opcode), acc);
7393
7394 tcg_temp_free_i64(acc);
7395 tcg_temp_free_i64(tmp);
7396}
7397
0487d6a8
JM
7398GEN_SPE(evaddw, speundef, 0x00, 0x08, 0x00000000, PPC_SPE); ////
7399GEN_SPE(evaddiw, speundef, 0x01, 0x08, 0x00000000, PPC_SPE);
7400GEN_SPE(evsubfw, speundef, 0x02, 0x08, 0x00000000, PPC_SPE); ////
7401GEN_SPE(evsubifw, speundef, 0x03, 0x08, 0x00000000, PPC_SPE);
7402GEN_SPE(evabs, evneg, 0x04, 0x08, 0x0000F800, PPC_SPE); ////
7403GEN_SPE(evextsb, evextsh, 0x05, 0x08, 0x0000F800, PPC_SPE); ////
7404GEN_SPE(evrndw, evcntlzw, 0x06, 0x08, 0x0000F800, PPC_SPE); ////
7405GEN_SPE(evcntlsw, brinc, 0x07, 0x08, 0x00000000, PPC_SPE); //
a0e13900 7406GEN_SPE(evmra, speundef, 0x02, 0x13, 0x0000F800, PPC_SPE);
0487d6a8
JM
7407GEN_SPE(speundef, evand, 0x08, 0x08, 0x00000000, PPC_SPE); ////
7408GEN_SPE(evandc, speundef, 0x09, 0x08, 0x00000000, PPC_SPE); ////
7409GEN_SPE(evxor, evor, 0x0B, 0x08, 0x00000000, PPC_SPE); ////
7410GEN_SPE(evnor, eveqv, 0x0C, 0x08, 0x00000000, PPC_SPE); ////
a0e13900
FC
7411GEN_SPE(evmwumi, evmwsmi, 0x0C, 0x11, 0x00000000, PPC_SPE);
7412GEN_SPE(evmwumia, evmwsmia, 0x1C, 0x11, 0x00000000, PPC_SPE);
7413GEN_SPE(evmwumiaa, evmwsmiaa, 0x0C, 0x15, 0x00000000, PPC_SPE);
0487d6a8
JM
7414GEN_SPE(speundef, evorc, 0x0D, 0x08, 0x00000000, PPC_SPE); ////
7415GEN_SPE(evnand, speundef, 0x0F, 0x08, 0x00000000, PPC_SPE); ////
7416GEN_SPE(evsrwu, evsrws, 0x10, 0x08, 0x00000000, PPC_SPE); ////
7417GEN_SPE(evsrwiu, evsrwis, 0x11, 0x08, 0x00000000, PPC_SPE);
7418GEN_SPE(evslw, speundef, 0x12, 0x08, 0x00000000, PPC_SPE); ////
7419GEN_SPE(evslwi, speundef, 0x13, 0x08, 0x00000000, PPC_SPE);
7420GEN_SPE(evrlw, evsplati, 0x14, 0x08, 0x00000000, PPC_SPE); //
7421GEN_SPE(evrlwi, evsplatfi, 0x15, 0x08, 0x00000000, PPC_SPE);
7422GEN_SPE(evmergehi, evmergelo, 0x16, 0x08, 0x00000000, PPC_SPE); ////
7423GEN_SPE(evmergehilo, evmergelohi, 0x17, 0x08, 0x00000000, PPC_SPE); ////
7424GEN_SPE(evcmpgtu, evcmpgts, 0x18, 0x08, 0x00600000, PPC_SPE); ////
7425GEN_SPE(evcmpltu, evcmplts, 0x19, 0x08, 0x00600000, PPC_SPE); ////
7426GEN_SPE(evcmpeq, speundef, 0x1A, 0x08, 0x00600000, PPC_SPE); ////
7427
6a6ae23f 7428/* SPE load and stores */
636aa200 7429static inline void gen_addr_spe_imm_index(DisasContext *ctx, TCGv EA, int sh)
6a6ae23f
AJ
7430{
7431 target_ulong uimm = rB(ctx->opcode);
7432
76db3ba4 7433 if (rA(ctx->opcode) == 0) {
6a6ae23f 7434 tcg_gen_movi_tl(EA, uimm << sh);
76db3ba4 7435 } else {
6a6ae23f 7436 tcg_gen_addi_tl(EA, cpu_gpr[rA(ctx->opcode)], uimm << sh);
76db3ba4
AJ
7437#if defined(TARGET_PPC64)
7438 if (!ctx->sf_mode) {
7439 tcg_gen_ext32u_tl(EA, EA);
7440 }
7441#endif
7442 }
0487d6a8 7443}
6a6ae23f 7444
636aa200 7445static inline void gen_op_evldd(DisasContext *ctx, TCGv addr)
6a6ae23f
AJ
7446{
7447#if defined(TARGET_PPC64)
76db3ba4 7448 gen_qemu_ld64(ctx, cpu_gpr[rD(ctx->opcode)], addr);
6a6ae23f
AJ
7449#else
7450 TCGv_i64 t0 = tcg_temp_new_i64();
76db3ba4 7451 gen_qemu_ld64(ctx, t0, addr);
6a6ae23f
AJ
7452 tcg_gen_trunc_i64_i32(cpu_gpr[rD(ctx->opcode)], t0);
7453 tcg_gen_shri_i64(t0, t0, 32);
7454 tcg_gen_trunc_i64_i32(cpu_gprh[rD(ctx->opcode)], t0);
7455 tcg_temp_free_i64(t0);
7456#endif
0487d6a8 7457}
6a6ae23f 7458
636aa200 7459static inline void gen_op_evldw(DisasContext *ctx, TCGv addr)
6a6ae23f 7460{
0487d6a8 7461#if defined(TARGET_PPC64)
6a6ae23f 7462 TCGv t0 = tcg_temp_new();
76db3ba4 7463 gen_qemu_ld32u(ctx, t0, addr);
6a6ae23f 7464 tcg_gen_shli_tl(cpu_gpr[rD(ctx->opcode)], t0, 32);
76db3ba4
AJ
7465 gen_addr_add(ctx, addr, addr, 4);
7466 gen_qemu_ld32u(ctx, t0, addr);
6a6ae23f
AJ
7467 tcg_gen_or_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rD(ctx->opcode)], t0);
7468 tcg_temp_free(t0);
7469#else
76db3ba4
AJ
7470 gen_qemu_ld32u(ctx, cpu_gprh[rD(ctx->opcode)], addr);
7471 gen_addr_add(ctx, addr, addr, 4);
7472 gen_qemu_ld32u(ctx, cpu_gpr[rD(ctx->opcode)], addr);
6a6ae23f 7473#endif
0487d6a8 7474}
6a6ae23f 7475
636aa200 7476static inline void gen_op_evldh(DisasContext *ctx, TCGv addr)
6a6ae23f
AJ
7477{
7478 TCGv t0 = tcg_temp_new();
7479#if defined(TARGET_PPC64)
76db3ba4 7480 gen_qemu_ld16u(ctx, t0, addr);
6a6ae23f 7481 tcg_gen_shli_tl(cpu_gpr[rD(ctx->opcode)], t0, 48);
76db3ba4
AJ
7482 gen_addr_add(ctx, addr, addr, 2);
7483 gen_qemu_ld16u(ctx, t0, addr);
6a6ae23f
AJ
7484 tcg_gen_shli_tl(t0, t0, 32);
7485 tcg_gen_or_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rD(ctx->opcode)], t0);
76db3ba4
AJ
7486 gen_addr_add(ctx, addr, addr, 2);
7487 gen_qemu_ld16u(ctx, t0, addr);
6a6ae23f
AJ
7488 tcg_gen_shli_tl(t0, t0, 16);
7489 tcg_gen_or_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rD(ctx->opcode)], t0);
76db3ba4
AJ
7490 gen_addr_add(ctx, addr, addr, 2);
7491 gen_qemu_ld16u(ctx, t0, addr);
6a6ae23f 7492 tcg_gen_or_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rD(ctx->opcode)], t0);
0487d6a8 7493#else
76db3ba4 7494 gen_qemu_ld16u(ctx, t0, addr);
6a6ae23f 7495 tcg_gen_shli_tl(cpu_gprh[rD(ctx->opcode)], t0, 16);
76db3ba4
AJ
7496 gen_addr_add(ctx, addr, addr, 2);
7497 gen_qemu_ld16u(ctx, t0, addr);
6a6ae23f 7498 tcg_gen_or_tl(cpu_gprh[rD(ctx->opcode)], cpu_gprh[rD(ctx->opcode)], t0);
76db3ba4
AJ
7499 gen_addr_add(ctx, addr, addr, 2);
7500 gen_qemu_ld16u(ctx, t0, addr);
6a6ae23f 7501 tcg_gen_shli_tl(cpu_gprh[rD(ctx->opcode)], t0, 16);
76db3ba4
AJ
7502 gen_addr_add(ctx, addr, addr, 2);
7503 gen_qemu_ld16u(ctx, t0, addr);
6a6ae23f 7504 tcg_gen_or_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rD(ctx->opcode)], t0);
0487d6a8 7505#endif
6a6ae23f 7506 tcg_temp_free(t0);
0487d6a8
JM
7507}
7508
636aa200 7509static inline void gen_op_evlhhesplat(DisasContext *ctx, TCGv addr)
6a6ae23f
AJ
7510{
7511 TCGv t0 = tcg_temp_new();
76db3ba4 7512 gen_qemu_ld16u(ctx, t0, addr);
6a6ae23f
AJ
7513#if defined(TARGET_PPC64)
7514 tcg_gen_shli_tl(cpu_gpr[rD(ctx->opcode)], t0, 48);
7515 tcg_gen_shli_tl(t0, t0, 16);
7516 tcg_gen_or_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rD(ctx->opcode)], t0);
7517#else
7518 tcg_gen_shli_tl(t0, t0, 16);
7519 tcg_gen_mov_tl(cpu_gprh[rD(ctx->opcode)], t0);
7520 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], t0);
7521#endif
7522 tcg_temp_free(t0);
0487d6a8
JM
7523}
7524
636aa200 7525static inline void gen_op_evlhhousplat(DisasContext *ctx, TCGv addr)
6a6ae23f
AJ
7526{
7527 TCGv t0 = tcg_temp_new();
76db3ba4 7528 gen_qemu_ld16u(ctx, t0, addr);
6a6ae23f
AJ
7529#if defined(TARGET_PPC64)
7530 tcg_gen_shli_tl(cpu_gpr[rD(ctx->opcode)], t0, 32);
7531 tcg_gen_or_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rD(ctx->opcode)], t0);
7532#else
7533 tcg_gen_mov_tl(cpu_gprh[rD(ctx->opcode)], t0);
7534 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], t0);
7535#endif
7536 tcg_temp_free(t0);
0487d6a8
JM
7537}
7538
636aa200 7539static inline void gen_op_evlhhossplat(DisasContext *ctx, TCGv addr)
6a6ae23f
AJ
7540{
7541 TCGv t0 = tcg_temp_new();
76db3ba4 7542 gen_qemu_ld16s(ctx, t0, addr);
6a6ae23f
AJ
7543#if defined(TARGET_PPC64)
7544 tcg_gen_shli_tl(cpu_gpr[rD(ctx->opcode)], t0, 32);
7545 tcg_gen_ext32u_tl(t0, t0);
7546 tcg_gen_or_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rD(ctx->opcode)], t0);
7547#else
7548 tcg_gen_mov_tl(cpu_gprh[rD(ctx->opcode)], t0);
7549 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], t0);
7550#endif
7551 tcg_temp_free(t0);
7552}
7553
636aa200 7554static inline void gen_op_evlwhe(DisasContext *ctx, TCGv addr)
6a6ae23f
AJ
7555{
7556 TCGv t0 = tcg_temp_new();
7557#if defined(TARGET_PPC64)
76db3ba4 7558 gen_qemu_ld16u(ctx, t0, addr);
6a6ae23f 7559 tcg_gen_shli_tl(cpu_gpr[rD(ctx->opcode)], t0, 48);
76db3ba4
AJ
7560 gen_addr_add(ctx, addr, addr, 2);
7561 gen_qemu_ld16u(ctx, t0, addr);
6a6ae23f
AJ
7562 tcg_gen_shli_tl(t0, t0, 16);
7563 tcg_gen_or_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rD(ctx->opcode)], t0);
7564#else
76db3ba4 7565 gen_qemu_ld16u(ctx, t0, addr);
6a6ae23f 7566 tcg_gen_shli_tl(cpu_gprh[rD(ctx->opcode)], t0, 16);
76db3ba4
AJ
7567 gen_addr_add(ctx, addr, addr, 2);
7568 gen_qemu_ld16u(ctx, t0, addr);
6a6ae23f
AJ
7569 tcg_gen_shli_tl(cpu_gpr[rD(ctx->opcode)], t0, 16);
7570#endif
7571 tcg_temp_free(t0);
7572}
7573
636aa200 7574static inline void gen_op_evlwhou(DisasContext *ctx, TCGv addr)
6a6ae23f
AJ
7575{
7576#if defined(TARGET_PPC64)
7577 TCGv t0 = tcg_temp_new();
76db3ba4
AJ
7578 gen_qemu_ld16u(ctx, cpu_gpr[rD(ctx->opcode)], addr);
7579 gen_addr_add(ctx, addr, addr, 2);
7580 gen_qemu_ld16u(ctx, t0, addr);
6a6ae23f
AJ
7581 tcg_gen_shli_tl(t0, t0, 32);
7582 tcg_gen_or_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rD(ctx->opcode)], t0);
7583 tcg_temp_free(t0);
7584#else
76db3ba4
AJ
7585 gen_qemu_ld16u(ctx, cpu_gprh[rD(ctx->opcode)], addr);
7586 gen_addr_add(ctx, addr, addr, 2);
7587 gen_qemu_ld16u(ctx, cpu_gpr[rD(ctx->opcode)], addr);
6a6ae23f
AJ
7588#endif
7589}
7590
636aa200 7591static inline void gen_op_evlwhos(DisasContext *ctx, TCGv addr)
6a6ae23f
AJ
7592{
7593#if defined(TARGET_PPC64)
7594 TCGv t0 = tcg_temp_new();
76db3ba4 7595 gen_qemu_ld16s(ctx, t0, addr);
6a6ae23f 7596 tcg_gen_ext32u_tl(cpu_gpr[rD(ctx->opcode)], t0);
76db3ba4
AJ
7597 gen_addr_add(ctx, addr, addr, 2);
7598 gen_qemu_ld16s(ctx, t0, addr);
6a6ae23f
AJ
7599 tcg_gen_shli_tl(t0, t0, 32);
7600 tcg_gen_or_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rD(ctx->opcode)], t0);
7601 tcg_temp_free(t0);
7602#else
76db3ba4
AJ
7603 gen_qemu_ld16s(ctx, cpu_gprh[rD(ctx->opcode)], addr);
7604 gen_addr_add(ctx, addr, addr, 2);
7605 gen_qemu_ld16s(ctx, cpu_gpr[rD(ctx->opcode)], addr);
6a6ae23f
AJ
7606#endif
7607}
7608
636aa200 7609static inline void gen_op_evlwwsplat(DisasContext *ctx, TCGv addr)
6a6ae23f
AJ
7610{
7611 TCGv t0 = tcg_temp_new();
76db3ba4 7612 gen_qemu_ld32u(ctx, t0, addr);
0487d6a8 7613#if defined(TARGET_PPC64)
6a6ae23f
AJ
7614 tcg_gen_shli_tl(cpu_gpr[rD(ctx->opcode)], t0, 32);
7615 tcg_gen_or_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rD(ctx->opcode)], t0);
7616#else
7617 tcg_gen_mov_tl(cpu_gprh[rD(ctx->opcode)], t0);
7618 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], t0);
7619#endif
7620 tcg_temp_free(t0);
7621}
7622
636aa200 7623static inline void gen_op_evlwhsplat(DisasContext *ctx, TCGv addr)
6a6ae23f
AJ
7624{
7625 TCGv t0 = tcg_temp_new();
7626#if defined(TARGET_PPC64)
76db3ba4 7627 gen_qemu_ld16u(ctx, t0, addr);
6a6ae23f
AJ
7628 tcg_gen_shli_tl(cpu_gpr[rD(ctx->opcode)], t0, 48);
7629 tcg_gen_shli_tl(t0, t0, 32);
7630 tcg_gen_or_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rD(ctx->opcode)], t0);
76db3ba4
AJ
7631 gen_addr_add(ctx, addr, addr, 2);
7632 gen_qemu_ld16u(ctx, t0, addr);
6a6ae23f
AJ
7633 tcg_gen_or_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rD(ctx->opcode)], t0);
7634 tcg_gen_shli_tl(t0, t0, 16);
7635 tcg_gen_or_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rD(ctx->opcode)], t0);
7636#else
76db3ba4 7637 gen_qemu_ld16u(ctx, t0, addr);
6a6ae23f
AJ
7638 tcg_gen_shli_tl(cpu_gprh[rD(ctx->opcode)], t0, 16);
7639 tcg_gen_or_tl(cpu_gprh[rD(ctx->opcode)], cpu_gprh[rD(ctx->opcode)], t0);
76db3ba4
AJ
7640 gen_addr_add(ctx, addr, addr, 2);
7641 gen_qemu_ld16u(ctx, t0, addr);
6a6ae23f
AJ
7642 tcg_gen_shli_tl(cpu_gpr[rD(ctx->opcode)], t0, 16);
7643 tcg_gen_or_tl(cpu_gpr[rD(ctx->opcode)], cpu_gprh[rD(ctx->opcode)], t0);
0487d6a8 7644#endif
6a6ae23f
AJ
7645 tcg_temp_free(t0);
7646}
7647
636aa200 7648static inline void gen_op_evstdd(DisasContext *ctx, TCGv addr)
6a6ae23f
AJ
7649{
7650#if defined(TARGET_PPC64)
76db3ba4 7651 gen_qemu_st64(ctx, cpu_gpr[rS(ctx->opcode)], addr);
0487d6a8 7652#else
6a6ae23f
AJ
7653 TCGv_i64 t0 = tcg_temp_new_i64();
7654 tcg_gen_concat_i32_i64(t0, cpu_gpr[rS(ctx->opcode)], cpu_gprh[rS(ctx->opcode)]);
76db3ba4 7655 gen_qemu_st64(ctx, t0, addr);
6a6ae23f
AJ
7656 tcg_temp_free_i64(t0);
7657#endif
7658}
7659
636aa200 7660static inline void gen_op_evstdw(DisasContext *ctx, TCGv addr)
6a6ae23f 7661{
0487d6a8 7662#if defined(TARGET_PPC64)
6a6ae23f
AJ
7663 TCGv t0 = tcg_temp_new();
7664 tcg_gen_shri_tl(t0, cpu_gpr[rS(ctx->opcode)], 32);
76db3ba4 7665 gen_qemu_st32(ctx, t0, addr);
6a6ae23f
AJ
7666 tcg_temp_free(t0);
7667#else
76db3ba4 7668 gen_qemu_st32(ctx, cpu_gprh[rS(ctx->opcode)], addr);
6a6ae23f 7669#endif
76db3ba4
AJ
7670 gen_addr_add(ctx, addr, addr, 4);
7671 gen_qemu_st32(ctx, cpu_gpr[rS(ctx->opcode)], addr);
6a6ae23f
AJ
7672}
7673
636aa200 7674static inline void gen_op_evstdh(DisasContext *ctx, TCGv addr)
6a6ae23f
AJ
7675{
7676 TCGv t0 = tcg_temp_new();
7677#if defined(TARGET_PPC64)
7678 tcg_gen_shri_tl(t0, cpu_gpr[rS(ctx->opcode)], 48);
7679#else
7680 tcg_gen_shri_tl(t0, cpu_gprh[rS(ctx->opcode)], 16);
7681#endif
76db3ba4
AJ
7682 gen_qemu_st16(ctx, t0, addr);
7683 gen_addr_add(ctx, addr, addr, 2);
6a6ae23f
AJ
7684#if defined(TARGET_PPC64)
7685 tcg_gen_shri_tl(t0, cpu_gpr[rS(ctx->opcode)], 32);
76db3ba4 7686 gen_qemu_st16(ctx, t0, addr);
6a6ae23f 7687#else
76db3ba4 7688 gen_qemu_st16(ctx, cpu_gprh[rS(ctx->opcode)], addr);
6a6ae23f 7689#endif
76db3ba4 7690 gen_addr_add(ctx, addr, addr, 2);
6a6ae23f 7691 tcg_gen_shri_tl(t0, cpu_gpr[rS(ctx->opcode)], 16);
76db3ba4 7692 gen_qemu_st16(ctx, t0, addr);
6a6ae23f 7693 tcg_temp_free(t0);
76db3ba4
AJ
7694 gen_addr_add(ctx, addr, addr, 2);
7695 gen_qemu_st16(ctx, cpu_gpr[rS(ctx->opcode)], addr);
6a6ae23f
AJ
7696}
7697
636aa200 7698static inline void gen_op_evstwhe(DisasContext *ctx, TCGv addr)
6a6ae23f
AJ
7699{
7700 TCGv t0 = tcg_temp_new();
7701#if defined(TARGET_PPC64)
7702 tcg_gen_shri_tl(t0, cpu_gpr[rS(ctx->opcode)], 48);
7703#else
7704 tcg_gen_shri_tl(t0, cpu_gprh[rS(ctx->opcode)], 16);
7705#endif
76db3ba4
AJ
7706 gen_qemu_st16(ctx, t0, addr);
7707 gen_addr_add(ctx, addr, addr, 2);
6a6ae23f 7708 tcg_gen_shri_tl(t0, cpu_gpr[rS(ctx->opcode)], 16);
76db3ba4 7709 gen_qemu_st16(ctx, t0, addr);
6a6ae23f
AJ
7710 tcg_temp_free(t0);
7711}
7712
636aa200 7713static inline void gen_op_evstwho(DisasContext *ctx, TCGv addr)
6a6ae23f
AJ
7714{
7715#if defined(TARGET_PPC64)
7716 TCGv t0 = tcg_temp_new();
7717 tcg_gen_shri_tl(t0, cpu_gpr[rS(ctx->opcode)], 32);
76db3ba4 7718 gen_qemu_st16(ctx, t0, addr);
6a6ae23f
AJ
7719 tcg_temp_free(t0);
7720#else
76db3ba4 7721 gen_qemu_st16(ctx, cpu_gprh[rS(ctx->opcode)], addr);
6a6ae23f 7722#endif
76db3ba4
AJ
7723 gen_addr_add(ctx, addr, addr, 2);
7724 gen_qemu_st16(ctx, cpu_gpr[rS(ctx->opcode)], addr);
6a6ae23f
AJ
7725}
7726
636aa200 7727static inline void gen_op_evstwwe(DisasContext *ctx, TCGv addr)
6a6ae23f
AJ
7728{
7729#if defined(TARGET_PPC64)
7730 TCGv t0 = tcg_temp_new();
7731 tcg_gen_shri_tl(t0, cpu_gpr[rS(ctx->opcode)], 32);
76db3ba4 7732 gen_qemu_st32(ctx, t0, addr);
6a6ae23f
AJ
7733 tcg_temp_free(t0);
7734#else
76db3ba4 7735 gen_qemu_st32(ctx, cpu_gprh[rS(ctx->opcode)], addr);
6a6ae23f
AJ
7736#endif
7737}
7738
636aa200 7739static inline void gen_op_evstwwo(DisasContext *ctx, TCGv addr)
6a6ae23f 7740{
76db3ba4 7741 gen_qemu_st32(ctx, cpu_gpr[rS(ctx->opcode)], addr);
6a6ae23f
AJ
7742}
7743
7744#define GEN_SPEOP_LDST(name, opc2, sh) \
99e300ef 7745static void glue(gen_, name)(DisasContext *ctx) \
6a6ae23f
AJ
7746{ \
7747 TCGv t0; \
7748 if (unlikely(!ctx->spe_enabled)) { \
e06fcd75 7749 gen_exception(ctx, POWERPC_EXCP_APU); \
6a6ae23f
AJ
7750 return; \
7751 } \
76db3ba4 7752 gen_set_access_type(ctx, ACCESS_INT); \
6a6ae23f
AJ
7753 t0 = tcg_temp_new(); \
7754 if (Rc(ctx->opcode)) { \
76db3ba4 7755 gen_addr_spe_imm_index(ctx, t0, sh); \
6a6ae23f 7756 } else { \
76db3ba4 7757 gen_addr_reg_index(ctx, t0); \
6a6ae23f
AJ
7758 } \
7759 gen_op_##name(ctx, t0); \
7760 tcg_temp_free(t0); \
7761}
7762
7763GEN_SPEOP_LDST(evldd, 0x00, 3);
7764GEN_SPEOP_LDST(evldw, 0x01, 3);
7765GEN_SPEOP_LDST(evldh, 0x02, 3);
7766GEN_SPEOP_LDST(evlhhesplat, 0x04, 1);
7767GEN_SPEOP_LDST(evlhhousplat, 0x06, 1);
7768GEN_SPEOP_LDST(evlhhossplat, 0x07, 1);
7769GEN_SPEOP_LDST(evlwhe, 0x08, 2);
7770GEN_SPEOP_LDST(evlwhou, 0x0A, 2);
7771GEN_SPEOP_LDST(evlwhos, 0x0B, 2);
7772GEN_SPEOP_LDST(evlwwsplat, 0x0C, 2);
7773GEN_SPEOP_LDST(evlwhsplat, 0x0E, 2);
7774
7775GEN_SPEOP_LDST(evstdd, 0x10, 3);
7776GEN_SPEOP_LDST(evstdw, 0x11, 3);
7777GEN_SPEOP_LDST(evstdh, 0x12, 3);
7778GEN_SPEOP_LDST(evstwhe, 0x18, 2);
7779GEN_SPEOP_LDST(evstwho, 0x1A, 2);
7780GEN_SPEOP_LDST(evstwwe, 0x1C, 2);
7781GEN_SPEOP_LDST(evstwwo, 0x1E, 2);
0487d6a8
JM
7782
7783/* Multiply and add - TODO */
7784#if 0
7785GEN_SPE(speundef, evmhessf, 0x01, 0x10, 0x00000000, PPC_SPE);
7786GEN_SPE(speundef, evmhossf, 0x03, 0x10, 0x00000000, PPC_SPE);
7787GEN_SPE(evmheumi, evmhesmi, 0x04, 0x10, 0x00000000, PPC_SPE);
7788GEN_SPE(speundef, evmhesmf, 0x05, 0x10, 0x00000000, PPC_SPE);
7789GEN_SPE(evmhoumi, evmhosmi, 0x06, 0x10, 0x00000000, PPC_SPE);
7790GEN_SPE(speundef, evmhosmf, 0x07, 0x10, 0x00000000, PPC_SPE);
7791GEN_SPE(speundef, evmhessfa, 0x11, 0x10, 0x00000000, PPC_SPE);
7792GEN_SPE(speundef, evmhossfa, 0x13, 0x10, 0x00000000, PPC_SPE);
7793GEN_SPE(evmheumia, evmhesmia, 0x14, 0x10, 0x00000000, PPC_SPE);
7794GEN_SPE(speundef, evmhesmfa, 0x15, 0x10, 0x00000000, PPC_SPE);
7795GEN_SPE(evmhoumia, evmhosmia, 0x16, 0x10, 0x00000000, PPC_SPE);
7796GEN_SPE(speundef, evmhosmfa, 0x17, 0x10, 0x00000000, PPC_SPE);
7797
7798GEN_SPE(speundef, evmwhssf, 0x03, 0x11, 0x00000000, PPC_SPE);
7799GEN_SPE(evmwlumi, speundef, 0x04, 0x11, 0x00000000, PPC_SPE);
7800GEN_SPE(evmwhumi, evmwhsmi, 0x06, 0x11, 0x00000000, PPC_SPE);
7801GEN_SPE(speundef, evmwhsmf, 0x07, 0x11, 0x00000000, PPC_SPE);
7802GEN_SPE(speundef, evmwssf, 0x09, 0x11, 0x00000000, PPC_SPE);
0487d6a8
JM
7803GEN_SPE(speundef, evmwsmf, 0x0D, 0x11, 0x00000000, PPC_SPE);
7804GEN_SPE(speundef, evmwhssfa, 0x13, 0x11, 0x00000000, PPC_SPE);
7805GEN_SPE(evmwlumia, speundef, 0x14, 0x11, 0x00000000, PPC_SPE);
7806GEN_SPE(evmwhumia, evmwhsmia, 0x16, 0x11, 0x00000000, PPC_SPE);
7807GEN_SPE(speundef, evmwhsmfa, 0x17, 0x11, 0x00000000, PPC_SPE);
7808GEN_SPE(speundef, evmwssfa, 0x19, 0x11, 0x00000000, PPC_SPE);
0487d6a8
JM
7809GEN_SPE(speundef, evmwsmfa, 0x1D, 0x11, 0x00000000, PPC_SPE);
7810
7811GEN_SPE(evadduiaaw, evaddsiaaw, 0x00, 0x13, 0x0000F800, PPC_SPE);
7812GEN_SPE(evsubfusiaaw, evsubfssiaaw, 0x01, 0x13, 0x0000F800, PPC_SPE);
7813GEN_SPE(evaddumiaaw, evaddsmiaaw, 0x04, 0x13, 0x0000F800, PPC_SPE);
7814GEN_SPE(evsubfumiaaw, evsubfsmiaaw, 0x05, 0x13, 0x0000F800, PPC_SPE);
7815GEN_SPE(evdivws, evdivwu, 0x06, 0x13, 0x00000000, PPC_SPE);
0487d6a8
JM
7816
7817GEN_SPE(evmheusiaaw, evmhessiaaw, 0x00, 0x14, 0x00000000, PPC_SPE);
7818GEN_SPE(speundef, evmhessfaaw, 0x01, 0x14, 0x00000000, PPC_SPE);
7819GEN_SPE(evmhousiaaw, evmhossiaaw, 0x02, 0x14, 0x00000000, PPC_SPE);
7820GEN_SPE(speundef, evmhossfaaw, 0x03, 0x14, 0x00000000, PPC_SPE);
7821GEN_SPE(evmheumiaaw, evmhesmiaaw, 0x04, 0x14, 0x00000000, PPC_SPE);
7822GEN_SPE(speundef, evmhesmfaaw, 0x05, 0x14, 0x00000000, PPC_SPE);
7823GEN_SPE(evmhoumiaaw, evmhosmiaaw, 0x06, 0x14, 0x00000000, PPC_SPE);
7824GEN_SPE(speundef, evmhosmfaaw, 0x07, 0x14, 0x00000000, PPC_SPE);
7825GEN_SPE(evmhegumiaa, evmhegsmiaa, 0x14, 0x14, 0x00000000, PPC_SPE);
7826GEN_SPE(speundef, evmhegsmfaa, 0x15, 0x14, 0x00000000, PPC_SPE);
7827GEN_SPE(evmhogumiaa, evmhogsmiaa, 0x16, 0x14, 0x00000000, PPC_SPE);
7828GEN_SPE(speundef, evmhogsmfaa, 0x17, 0x14, 0x00000000, PPC_SPE);
7829
7830GEN_SPE(evmwlusiaaw, evmwlssiaaw, 0x00, 0x15, 0x00000000, PPC_SPE);
7831GEN_SPE(evmwlumiaaw, evmwlsmiaaw, 0x04, 0x15, 0x00000000, PPC_SPE);
7832GEN_SPE(speundef, evmwssfaa, 0x09, 0x15, 0x00000000, PPC_SPE);
0487d6a8
JM
7833GEN_SPE(speundef, evmwsmfaa, 0x0D, 0x15, 0x00000000, PPC_SPE);
7834
7835GEN_SPE(evmheusianw, evmhessianw, 0x00, 0x16, 0x00000000, PPC_SPE);
7836GEN_SPE(speundef, evmhessfanw, 0x01, 0x16, 0x00000000, PPC_SPE);
7837GEN_SPE(evmhousianw, evmhossianw, 0x02, 0x16, 0x00000000, PPC_SPE);
7838GEN_SPE(speundef, evmhossfanw, 0x03, 0x16, 0x00000000, PPC_SPE);
7839GEN_SPE(evmheumianw, evmhesmianw, 0x04, 0x16, 0x00000000, PPC_SPE);
7840GEN_SPE(speundef, evmhesmfanw, 0x05, 0x16, 0x00000000, PPC_SPE);
7841GEN_SPE(evmhoumianw, evmhosmianw, 0x06, 0x16, 0x00000000, PPC_SPE);
7842GEN_SPE(speundef, evmhosmfanw, 0x07, 0x16, 0x00000000, PPC_SPE);
7843GEN_SPE(evmhegumian, evmhegsmian, 0x14, 0x16, 0x00000000, PPC_SPE);
7844GEN_SPE(speundef, evmhegsmfan, 0x15, 0x16, 0x00000000, PPC_SPE);
7845GEN_SPE(evmhigumian, evmhigsmian, 0x16, 0x16, 0x00000000, PPC_SPE);
7846GEN_SPE(speundef, evmhogsmfan, 0x17, 0x16, 0x00000000, PPC_SPE);
7847
7848GEN_SPE(evmwlusianw, evmwlssianw, 0x00, 0x17, 0x00000000, PPC_SPE);
7849GEN_SPE(evmwlumianw, evmwlsmianw, 0x04, 0x17, 0x00000000, PPC_SPE);
7850GEN_SPE(speundef, evmwssfan, 0x09, 0x17, 0x00000000, PPC_SPE);
7851GEN_SPE(evmwumian, evmwsmian, 0x0C, 0x17, 0x00000000, PPC_SPE);
7852GEN_SPE(speundef, evmwsmfan, 0x0D, 0x17, 0x00000000, PPC_SPE);
7853#endif
7854
7855/*** SPE floating-point extension ***/
1c97856d
AJ
7856#if defined(TARGET_PPC64)
7857#define GEN_SPEFPUOP_CONV_32_32(name) \
636aa200 7858static inline void gen_##name(DisasContext *ctx) \
0487d6a8 7859{ \
1c97856d
AJ
7860 TCGv_i32 t0; \
7861 TCGv t1; \
7862 t0 = tcg_temp_new_i32(); \
7863 tcg_gen_trunc_tl_i32(t0, cpu_gpr[rB(ctx->opcode)]); \
7864 gen_helper_##name(t0, t0); \
7865 t1 = tcg_temp_new(); \
7866 tcg_gen_extu_i32_tl(t1, t0); \
7867 tcg_temp_free_i32(t0); \
7868 tcg_gen_andi_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rD(ctx->opcode)], \
7869 0xFFFFFFFF00000000ULL); \
7870 tcg_gen_or_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rD(ctx->opcode)], t1); \
7871 tcg_temp_free(t1); \
0487d6a8 7872}
1c97856d 7873#define GEN_SPEFPUOP_CONV_32_64(name) \
636aa200 7874static inline void gen_##name(DisasContext *ctx) \
1c97856d
AJ
7875{ \
7876 TCGv_i32 t0; \
7877 TCGv t1; \
7878 t0 = tcg_temp_new_i32(); \
7879 gen_helper_##name(t0, cpu_gpr[rB(ctx->opcode)]); \
7880 t1 = tcg_temp_new(); \
7881 tcg_gen_extu_i32_tl(t1, t0); \
7882 tcg_temp_free_i32(t0); \
7883 tcg_gen_andi_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rD(ctx->opcode)], \
7884 0xFFFFFFFF00000000ULL); \
7885 tcg_gen_or_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rD(ctx->opcode)], t1); \
7886 tcg_temp_free(t1); \
7887}
7888#define GEN_SPEFPUOP_CONV_64_32(name) \
636aa200 7889static inline void gen_##name(DisasContext *ctx) \
1c97856d
AJ
7890{ \
7891 TCGv_i32 t0 = tcg_temp_new_i32(); \
7892 tcg_gen_trunc_tl_i32(t0, cpu_gpr[rB(ctx->opcode)]); \
7893 gen_helper_##name(cpu_gpr[rD(ctx->opcode)], t0); \
7894 tcg_temp_free_i32(t0); \
7895}
7896#define GEN_SPEFPUOP_CONV_64_64(name) \
636aa200 7897static inline void gen_##name(DisasContext *ctx) \
1c97856d
AJ
7898{ \
7899 gen_helper_##name(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rB(ctx->opcode)]); \
7900}
7901#define GEN_SPEFPUOP_ARITH2_32_32(name) \
636aa200 7902static inline void gen_##name(DisasContext *ctx) \
57951c27 7903{ \
1c97856d
AJ
7904 TCGv_i32 t0, t1; \
7905 TCGv_i64 t2; \
57951c27 7906 if (unlikely(!ctx->spe_enabled)) { \
e06fcd75 7907 gen_exception(ctx, POWERPC_EXCP_APU); \
57951c27
AJ
7908 return; \
7909 } \
1c97856d
AJ
7910 t0 = tcg_temp_new_i32(); \
7911 t1 = tcg_temp_new_i32(); \
7912 tcg_gen_trunc_tl_i32(t0, cpu_gpr[rA(ctx->opcode)]); \
7913 tcg_gen_trunc_tl_i32(t1, cpu_gpr[rB(ctx->opcode)]); \
7914 gen_helper_##name(t0, t0, t1); \
7915 tcg_temp_free_i32(t1); \
7916 t2 = tcg_temp_new(); \
7917 tcg_gen_extu_i32_tl(t2, t0); \
7918 tcg_temp_free_i32(t0); \
7919 tcg_gen_andi_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rD(ctx->opcode)], \
7920 0xFFFFFFFF00000000ULL); \
7921 tcg_gen_or_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rD(ctx->opcode)], t2); \
7922 tcg_temp_free(t2); \
57951c27 7923}
1c97856d 7924#define GEN_SPEFPUOP_ARITH2_64_64(name) \
636aa200 7925static inline void gen_##name(DisasContext *ctx) \
57951c27
AJ
7926{ \
7927 if (unlikely(!ctx->spe_enabled)) { \
e06fcd75 7928 gen_exception(ctx, POWERPC_EXCP_APU); \
57951c27
AJ
7929 return; \
7930 } \
1c97856d
AJ
7931 gen_helper_##name(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)], \
7932 cpu_gpr[rB(ctx->opcode)]); \
57951c27 7933}
1c97856d 7934#define GEN_SPEFPUOP_COMP_32(name) \
636aa200 7935static inline void gen_##name(DisasContext *ctx) \
57951c27 7936{ \
1c97856d 7937 TCGv_i32 t0, t1; \
57951c27 7938 if (unlikely(!ctx->spe_enabled)) { \
e06fcd75 7939 gen_exception(ctx, POWERPC_EXCP_APU); \
57951c27
AJ
7940 return; \
7941 } \
1c97856d
AJ
7942 t0 = tcg_temp_new_i32(); \
7943 t1 = tcg_temp_new_i32(); \
7944 tcg_gen_trunc_tl_i32(t0, cpu_gpr[rA(ctx->opcode)]); \
7945 tcg_gen_trunc_tl_i32(t1, cpu_gpr[rB(ctx->opcode)]); \
7946 gen_helper_##name(cpu_crf[crfD(ctx->opcode)], t0, t1); \
7947 tcg_temp_free_i32(t0); \
7948 tcg_temp_free_i32(t1); \
7949}
7950#define GEN_SPEFPUOP_COMP_64(name) \
636aa200 7951static inline void gen_##name(DisasContext *ctx) \
1c97856d
AJ
7952{ \
7953 if (unlikely(!ctx->spe_enabled)) { \
e06fcd75 7954 gen_exception(ctx, POWERPC_EXCP_APU); \
1c97856d
AJ
7955 return; \
7956 } \
7957 gen_helper_##name(cpu_crf[crfD(ctx->opcode)], \
7958 cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)]); \
7959}
7960#else
7961#define GEN_SPEFPUOP_CONV_32_32(name) \
636aa200 7962static inline void gen_##name(DisasContext *ctx) \
1c97856d
AJ
7963{ \
7964 gen_helper_##name(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rB(ctx->opcode)]); \
57951c27 7965}
1c97856d 7966#define GEN_SPEFPUOP_CONV_32_64(name) \
636aa200 7967static inline void gen_##name(DisasContext *ctx) \
1c97856d
AJ
7968{ \
7969 TCGv_i64 t0 = tcg_temp_new_i64(); \
7970 gen_load_gpr64(t0, rB(ctx->opcode)); \
7971 gen_helper_##name(cpu_gpr[rD(ctx->opcode)], t0); \
7972 tcg_temp_free_i64(t0); \
7973}
7974#define GEN_SPEFPUOP_CONV_64_32(name) \
636aa200 7975static inline void gen_##name(DisasContext *ctx) \
1c97856d
AJ
7976{ \
7977 TCGv_i64 t0 = tcg_temp_new_i64(); \
7978 gen_helper_##name(t0, cpu_gpr[rB(ctx->opcode)]); \
7979 gen_store_gpr64(rD(ctx->opcode), t0); \
7980 tcg_temp_free_i64(t0); \
7981}
7982#define GEN_SPEFPUOP_CONV_64_64(name) \
636aa200 7983static inline void gen_##name(DisasContext *ctx) \
1c97856d
AJ
7984{ \
7985 TCGv_i64 t0 = tcg_temp_new_i64(); \
7986 gen_load_gpr64(t0, rB(ctx->opcode)); \
7987 gen_helper_##name(t0, t0); \
7988 gen_store_gpr64(rD(ctx->opcode), t0); \
7989 tcg_temp_free_i64(t0); \
7990}
7991#define GEN_SPEFPUOP_ARITH2_32_32(name) \
636aa200 7992static inline void gen_##name(DisasContext *ctx) \
1c97856d
AJ
7993{ \
7994 if (unlikely(!ctx->spe_enabled)) { \
e06fcd75 7995 gen_exception(ctx, POWERPC_EXCP_APU); \
1c97856d
AJ
7996 return; \
7997 } \
7998 gen_helper_##name(cpu_gpr[rD(ctx->opcode)], \
7999 cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)]); \
8000}
8001#define GEN_SPEFPUOP_ARITH2_64_64(name) \
636aa200 8002static inline void gen_##name(DisasContext *ctx) \
1c97856d
AJ
8003{ \
8004 TCGv_i64 t0, t1; \
8005 if (unlikely(!ctx->spe_enabled)) { \
e06fcd75 8006 gen_exception(ctx, POWERPC_EXCP_APU); \
1c97856d
AJ
8007 return; \
8008 } \
8009 t0 = tcg_temp_new_i64(); \
8010 t1 = tcg_temp_new_i64(); \
8011 gen_load_gpr64(t0, rA(ctx->opcode)); \
8012 gen_load_gpr64(t1, rB(ctx->opcode)); \
8013 gen_helper_##name(t0, t0, t1); \
8014 gen_store_gpr64(rD(ctx->opcode), t0); \
8015 tcg_temp_free_i64(t0); \
8016 tcg_temp_free_i64(t1); \
8017}
8018#define GEN_SPEFPUOP_COMP_32(name) \
636aa200 8019static inline void gen_##name(DisasContext *ctx) \
1c97856d
AJ
8020{ \
8021 if (unlikely(!ctx->spe_enabled)) { \
e06fcd75 8022 gen_exception(ctx, POWERPC_EXCP_APU); \
1c97856d
AJ
8023 return; \
8024 } \
8025 gen_helper_##name(cpu_crf[crfD(ctx->opcode)], \
8026 cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)]); \
8027}
8028#define GEN_SPEFPUOP_COMP_64(name) \
636aa200 8029static inline void gen_##name(DisasContext *ctx) \
1c97856d
AJ
8030{ \
8031 TCGv_i64 t0, t1; \
8032 if (unlikely(!ctx->spe_enabled)) { \
e06fcd75 8033 gen_exception(ctx, POWERPC_EXCP_APU); \
1c97856d
AJ
8034 return; \
8035 } \
8036 t0 = tcg_temp_new_i64(); \
8037 t1 = tcg_temp_new_i64(); \
8038 gen_load_gpr64(t0, rA(ctx->opcode)); \
8039 gen_load_gpr64(t1, rB(ctx->opcode)); \
8040 gen_helper_##name(cpu_crf[crfD(ctx->opcode)], t0, t1); \
8041 tcg_temp_free_i64(t0); \
8042 tcg_temp_free_i64(t1); \
8043}
8044#endif
57951c27 8045
0487d6a8
JM
8046/* Single precision floating-point vectors operations */
8047/* Arithmetic */
1c97856d
AJ
8048GEN_SPEFPUOP_ARITH2_64_64(evfsadd);
8049GEN_SPEFPUOP_ARITH2_64_64(evfssub);
8050GEN_SPEFPUOP_ARITH2_64_64(evfsmul);
8051GEN_SPEFPUOP_ARITH2_64_64(evfsdiv);
636aa200 8052static inline void gen_evfsabs(DisasContext *ctx)
1c97856d
AJ
8053{
8054 if (unlikely(!ctx->spe_enabled)) {
e06fcd75 8055 gen_exception(ctx, POWERPC_EXCP_APU);
1c97856d
AJ
8056 return;
8057 }
8058#if defined(TARGET_PPC64)
6d5c34fa 8059 tcg_gen_andi_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)], ~0x8000000080000000LL);
1c97856d 8060#else
6d5c34fa
MP
8061 tcg_gen_andi_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)], ~0x80000000);
8062 tcg_gen_andi_tl(cpu_gprh[rD(ctx->opcode)], cpu_gprh[rA(ctx->opcode)], ~0x80000000);
1c97856d
AJ
8063#endif
8064}
636aa200 8065static inline void gen_evfsnabs(DisasContext *ctx)
1c97856d
AJ
8066{
8067 if (unlikely(!ctx->spe_enabled)) {
e06fcd75 8068 gen_exception(ctx, POWERPC_EXCP_APU);
1c97856d
AJ
8069 return;
8070 }
8071#if defined(TARGET_PPC64)
6d5c34fa 8072 tcg_gen_ori_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)], 0x8000000080000000LL);
1c97856d 8073#else
6d5c34fa
MP
8074 tcg_gen_ori_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)], 0x80000000);
8075 tcg_gen_ori_tl(cpu_gprh[rD(ctx->opcode)], cpu_gprh[rA(ctx->opcode)], 0x80000000);
1c97856d
AJ
8076#endif
8077}
636aa200 8078static inline void gen_evfsneg(DisasContext *ctx)
1c97856d
AJ
8079{
8080 if (unlikely(!ctx->spe_enabled)) {
e06fcd75 8081 gen_exception(ctx, POWERPC_EXCP_APU);
1c97856d
AJ
8082 return;
8083 }
8084#if defined(TARGET_PPC64)
6d5c34fa 8085 tcg_gen_xori_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)], 0x8000000080000000LL);
1c97856d 8086#else
6d5c34fa
MP
8087 tcg_gen_xori_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)], 0x80000000);
8088 tcg_gen_xori_tl(cpu_gprh[rD(ctx->opcode)], cpu_gprh[rA(ctx->opcode)], 0x80000000);
1c97856d
AJ
8089#endif
8090}
8091
0487d6a8 8092/* Conversion */
1c97856d
AJ
8093GEN_SPEFPUOP_CONV_64_64(evfscfui);
8094GEN_SPEFPUOP_CONV_64_64(evfscfsi);
8095GEN_SPEFPUOP_CONV_64_64(evfscfuf);
8096GEN_SPEFPUOP_CONV_64_64(evfscfsf);
8097GEN_SPEFPUOP_CONV_64_64(evfsctui);
8098GEN_SPEFPUOP_CONV_64_64(evfsctsi);
8099GEN_SPEFPUOP_CONV_64_64(evfsctuf);
8100GEN_SPEFPUOP_CONV_64_64(evfsctsf);
8101GEN_SPEFPUOP_CONV_64_64(evfsctuiz);
8102GEN_SPEFPUOP_CONV_64_64(evfsctsiz);
8103
0487d6a8 8104/* Comparison */
1c97856d
AJ
8105GEN_SPEFPUOP_COMP_64(evfscmpgt);
8106GEN_SPEFPUOP_COMP_64(evfscmplt);
8107GEN_SPEFPUOP_COMP_64(evfscmpeq);
8108GEN_SPEFPUOP_COMP_64(evfststgt);
8109GEN_SPEFPUOP_COMP_64(evfststlt);
8110GEN_SPEFPUOP_COMP_64(evfststeq);
0487d6a8
JM
8111
8112/* Opcodes definitions */
40569b7e
AJ
8113GEN_SPE(evfsadd, evfssub, 0x00, 0x0A, 0x00000000, PPC_SPE_SINGLE); //
8114GEN_SPE(evfsabs, evfsnabs, 0x02, 0x0A, 0x0000F800, PPC_SPE_SINGLE); //
8115GEN_SPE(evfsneg, speundef, 0x03, 0x0A, 0x0000F800, PPC_SPE_SINGLE); //
8116GEN_SPE(evfsmul, evfsdiv, 0x04, 0x0A, 0x00000000, PPC_SPE_SINGLE); //
8117GEN_SPE(evfscmpgt, evfscmplt, 0x06, 0x0A, 0x00600000, PPC_SPE_SINGLE); //
8118GEN_SPE(evfscmpeq, speundef, 0x07, 0x0A, 0x00600000, PPC_SPE_SINGLE); //
8119GEN_SPE(evfscfui, evfscfsi, 0x08, 0x0A, 0x00180000, PPC_SPE_SINGLE); //
8120GEN_SPE(evfscfuf, evfscfsf, 0x09, 0x0A, 0x00180000, PPC_SPE_SINGLE); //
8121GEN_SPE(evfsctui, evfsctsi, 0x0A, 0x0A, 0x00180000, PPC_SPE_SINGLE); //
8122GEN_SPE(evfsctuf, evfsctsf, 0x0B, 0x0A, 0x00180000, PPC_SPE_SINGLE); //
8123GEN_SPE(evfsctuiz, speundef, 0x0C, 0x0A, 0x00180000, PPC_SPE_SINGLE); //
8124GEN_SPE(evfsctsiz, speundef, 0x0D, 0x0A, 0x00180000, PPC_SPE_SINGLE); //
8125GEN_SPE(evfststgt, evfststlt, 0x0E, 0x0A, 0x00600000, PPC_SPE_SINGLE); //
8126GEN_SPE(evfststeq, speundef, 0x0F, 0x0A, 0x00600000, PPC_SPE_SINGLE); //
0487d6a8
JM
8127
8128/* Single precision floating-point operations */
8129/* Arithmetic */
1c97856d
AJ
8130GEN_SPEFPUOP_ARITH2_32_32(efsadd);
8131GEN_SPEFPUOP_ARITH2_32_32(efssub);
8132GEN_SPEFPUOP_ARITH2_32_32(efsmul);
8133GEN_SPEFPUOP_ARITH2_32_32(efsdiv);
636aa200 8134static inline void gen_efsabs(DisasContext *ctx)
1c97856d
AJ
8135{
8136 if (unlikely(!ctx->spe_enabled)) {
e06fcd75 8137 gen_exception(ctx, POWERPC_EXCP_APU);
1c97856d
AJ
8138 return;
8139 }
6d5c34fa 8140 tcg_gen_andi_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)], (target_long)~0x80000000LL);
1c97856d 8141}
636aa200 8142static inline void gen_efsnabs(DisasContext *ctx)
1c97856d
AJ
8143{
8144 if (unlikely(!ctx->spe_enabled)) {
e06fcd75 8145 gen_exception(ctx, POWERPC_EXCP_APU);
1c97856d
AJ
8146 return;
8147 }
6d5c34fa 8148 tcg_gen_ori_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)], 0x80000000);
1c97856d 8149}
636aa200 8150static inline void gen_efsneg(DisasContext *ctx)
1c97856d
AJ
8151{
8152 if (unlikely(!ctx->spe_enabled)) {
e06fcd75 8153 gen_exception(ctx, POWERPC_EXCP_APU);
1c97856d
AJ
8154 return;
8155 }
6d5c34fa 8156 tcg_gen_xori_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)], 0x80000000);
1c97856d
AJ
8157}
8158
0487d6a8 8159/* Conversion */
1c97856d
AJ
8160GEN_SPEFPUOP_CONV_32_32(efscfui);
8161GEN_SPEFPUOP_CONV_32_32(efscfsi);
8162GEN_SPEFPUOP_CONV_32_32(efscfuf);
8163GEN_SPEFPUOP_CONV_32_32(efscfsf);
8164GEN_SPEFPUOP_CONV_32_32(efsctui);
8165GEN_SPEFPUOP_CONV_32_32(efsctsi);
8166GEN_SPEFPUOP_CONV_32_32(efsctuf);
8167GEN_SPEFPUOP_CONV_32_32(efsctsf);
8168GEN_SPEFPUOP_CONV_32_32(efsctuiz);
8169GEN_SPEFPUOP_CONV_32_32(efsctsiz);
8170GEN_SPEFPUOP_CONV_32_64(efscfd);
8171
0487d6a8 8172/* Comparison */
1c97856d
AJ
8173GEN_SPEFPUOP_COMP_32(efscmpgt);
8174GEN_SPEFPUOP_COMP_32(efscmplt);
8175GEN_SPEFPUOP_COMP_32(efscmpeq);
8176GEN_SPEFPUOP_COMP_32(efststgt);
8177GEN_SPEFPUOP_COMP_32(efststlt);
8178GEN_SPEFPUOP_COMP_32(efststeq);
0487d6a8
JM
8179
8180/* Opcodes definitions */
40569b7e
AJ
8181GEN_SPE(efsadd, efssub, 0x00, 0x0B, 0x00000000, PPC_SPE_SINGLE); //
8182GEN_SPE(efsabs, efsnabs, 0x02, 0x0B, 0x0000F800, PPC_SPE_SINGLE); //
8183GEN_SPE(efsneg, speundef, 0x03, 0x0B, 0x0000F800, PPC_SPE_SINGLE); //
8184GEN_SPE(efsmul, efsdiv, 0x04, 0x0B, 0x00000000, PPC_SPE_SINGLE); //
8185GEN_SPE(efscmpgt, efscmplt, 0x06, 0x0B, 0x00600000, PPC_SPE_SINGLE); //
8186GEN_SPE(efscmpeq, efscfd, 0x07, 0x0B, 0x00600000, PPC_SPE_SINGLE); //
8187GEN_SPE(efscfui, efscfsi, 0x08, 0x0B, 0x00180000, PPC_SPE_SINGLE); //
8188GEN_SPE(efscfuf, efscfsf, 0x09, 0x0B, 0x00180000, PPC_SPE_SINGLE); //
8189GEN_SPE(efsctui, efsctsi, 0x0A, 0x0B, 0x00180000, PPC_SPE_SINGLE); //
8190GEN_SPE(efsctuf, efsctsf, 0x0B, 0x0B, 0x00180000, PPC_SPE_SINGLE); //
8191GEN_SPE(efsctuiz, speundef, 0x0C, 0x0B, 0x00180000, PPC_SPE_SINGLE); //
8192GEN_SPE(efsctsiz, speundef, 0x0D, 0x0B, 0x00180000, PPC_SPE_SINGLE); //
8193GEN_SPE(efststgt, efststlt, 0x0E, 0x0B, 0x00600000, PPC_SPE_SINGLE); //
8194GEN_SPE(efststeq, speundef, 0x0F, 0x0B, 0x00600000, PPC_SPE_SINGLE); //
0487d6a8
JM
8195
8196/* Double precision floating-point operations */
8197/* Arithmetic */
1c97856d
AJ
8198GEN_SPEFPUOP_ARITH2_64_64(efdadd);
8199GEN_SPEFPUOP_ARITH2_64_64(efdsub);
8200GEN_SPEFPUOP_ARITH2_64_64(efdmul);
8201GEN_SPEFPUOP_ARITH2_64_64(efddiv);
636aa200 8202static inline void gen_efdabs(DisasContext *ctx)
1c97856d
AJ
8203{
8204 if (unlikely(!ctx->spe_enabled)) {
e06fcd75 8205 gen_exception(ctx, POWERPC_EXCP_APU);
1c97856d
AJ
8206 return;
8207 }
8208#if defined(TARGET_PPC64)
6d5c34fa 8209 tcg_gen_andi_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)], ~0x8000000000000000LL);
1c97856d 8210#else
6d5c34fa
MP
8211 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
8212 tcg_gen_andi_tl(cpu_gprh[rD(ctx->opcode)], cpu_gprh[rA(ctx->opcode)], ~0x80000000);
1c97856d
AJ
8213#endif
8214}
636aa200 8215static inline void gen_efdnabs(DisasContext *ctx)
1c97856d
AJ
8216{
8217 if (unlikely(!ctx->spe_enabled)) {
e06fcd75 8218 gen_exception(ctx, POWERPC_EXCP_APU);
1c97856d
AJ
8219 return;
8220 }
8221#if defined(TARGET_PPC64)
6d5c34fa 8222 tcg_gen_ori_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)], 0x8000000000000000LL);
1c97856d 8223#else
6d5c34fa
MP
8224 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
8225 tcg_gen_ori_tl(cpu_gprh[rD(ctx->opcode)], cpu_gprh[rA(ctx->opcode)], 0x80000000);
1c97856d
AJ
8226#endif
8227}
636aa200 8228static inline void gen_efdneg(DisasContext *ctx)
1c97856d
AJ
8229{
8230 if (unlikely(!ctx->spe_enabled)) {
e06fcd75 8231 gen_exception(ctx, POWERPC_EXCP_APU);
1c97856d
AJ
8232 return;
8233 }
8234#if defined(TARGET_PPC64)
6d5c34fa 8235 tcg_gen_xori_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)], 0x8000000000000000LL);
1c97856d 8236#else
6d5c34fa
MP
8237 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
8238 tcg_gen_xori_tl(cpu_gprh[rD(ctx->opcode)], cpu_gprh[rA(ctx->opcode)], 0x80000000);
1c97856d
AJ
8239#endif
8240}
8241
0487d6a8 8242/* Conversion */
1c97856d
AJ
8243GEN_SPEFPUOP_CONV_64_32(efdcfui);
8244GEN_SPEFPUOP_CONV_64_32(efdcfsi);
8245GEN_SPEFPUOP_CONV_64_32(efdcfuf);
8246GEN_SPEFPUOP_CONV_64_32(efdcfsf);
8247GEN_SPEFPUOP_CONV_32_64(efdctui);
8248GEN_SPEFPUOP_CONV_32_64(efdctsi);
8249GEN_SPEFPUOP_CONV_32_64(efdctuf);
8250GEN_SPEFPUOP_CONV_32_64(efdctsf);
8251GEN_SPEFPUOP_CONV_32_64(efdctuiz);
8252GEN_SPEFPUOP_CONV_32_64(efdctsiz);
8253GEN_SPEFPUOP_CONV_64_32(efdcfs);
8254GEN_SPEFPUOP_CONV_64_64(efdcfuid);
8255GEN_SPEFPUOP_CONV_64_64(efdcfsid);
8256GEN_SPEFPUOP_CONV_64_64(efdctuidz);
8257GEN_SPEFPUOP_CONV_64_64(efdctsidz);
0487d6a8 8258
0487d6a8 8259/* Comparison */
1c97856d
AJ
8260GEN_SPEFPUOP_COMP_64(efdcmpgt);
8261GEN_SPEFPUOP_COMP_64(efdcmplt);
8262GEN_SPEFPUOP_COMP_64(efdcmpeq);
8263GEN_SPEFPUOP_COMP_64(efdtstgt);
8264GEN_SPEFPUOP_COMP_64(efdtstlt);
8265GEN_SPEFPUOP_COMP_64(efdtsteq);
0487d6a8
JM
8266
8267/* Opcodes definitions */
40569b7e
AJ
8268GEN_SPE(efdadd, efdsub, 0x10, 0x0B, 0x00000000, PPC_SPE_DOUBLE); //
8269GEN_SPE(efdcfuid, efdcfsid, 0x11, 0x0B, 0x00180000, PPC_SPE_DOUBLE); //
8270GEN_SPE(efdabs, efdnabs, 0x12, 0x0B, 0x0000F800, PPC_SPE_DOUBLE); //
8271GEN_SPE(efdneg, speundef, 0x13, 0x0B, 0x0000F800, PPC_SPE_DOUBLE); //
8272GEN_SPE(efdmul, efddiv, 0x14, 0x0B, 0x00000000, PPC_SPE_DOUBLE); //
8273GEN_SPE(efdctuidz, efdctsidz, 0x15, 0x0B, 0x00180000, PPC_SPE_DOUBLE); //
8274GEN_SPE(efdcmpgt, efdcmplt, 0x16, 0x0B, 0x00600000, PPC_SPE_DOUBLE); //
8275GEN_SPE(efdcmpeq, efdcfs, 0x17, 0x0B, 0x00600000, PPC_SPE_DOUBLE); //
8276GEN_SPE(efdcfui, efdcfsi, 0x18, 0x0B, 0x00180000, PPC_SPE_DOUBLE); //
8277GEN_SPE(efdcfuf, efdcfsf, 0x19, 0x0B, 0x00180000, PPC_SPE_DOUBLE); //
8278GEN_SPE(efdctui, efdctsi, 0x1A, 0x0B, 0x00180000, PPC_SPE_DOUBLE); //
8279GEN_SPE(efdctuf, efdctsf, 0x1B, 0x0B, 0x00180000, PPC_SPE_DOUBLE); //
8280GEN_SPE(efdctuiz, speundef, 0x1C, 0x0B, 0x00180000, PPC_SPE_DOUBLE); //
8281GEN_SPE(efdctsiz, speundef, 0x1D, 0x0B, 0x00180000, PPC_SPE_DOUBLE); //
8282GEN_SPE(efdtstgt, efdtstlt, 0x1E, 0x0B, 0x00600000, PPC_SPE_DOUBLE); //
8283GEN_SPE(efdtsteq, speundef, 0x1F, 0x0B, 0x00600000, PPC_SPE_DOUBLE); //
0487d6a8 8284
c227f099 8285static opcode_t opcodes[] = {
5c55ff99
BS
8286GEN_HANDLER(invalid, 0x00, 0x00, 0x00, 0xFFFFFFFF, PPC_NONE),
8287GEN_HANDLER(cmp, 0x1F, 0x00, 0x00, 0x00400000, PPC_INTEGER),
8288GEN_HANDLER(cmpi, 0x0B, 0xFF, 0xFF, 0x00400000, PPC_INTEGER),
8289GEN_HANDLER(cmpl, 0x1F, 0x00, 0x01, 0x00400000, PPC_INTEGER),
8290GEN_HANDLER(cmpli, 0x0A, 0xFF, 0xFF, 0x00400000, PPC_INTEGER),
8291GEN_HANDLER(isel, 0x1F, 0x0F, 0xFF, 0x00000001, PPC_ISEL),
8292GEN_HANDLER(addi, 0x0E, 0xFF, 0xFF, 0x00000000, PPC_INTEGER),
8293GEN_HANDLER(addic, 0x0C, 0xFF, 0xFF, 0x00000000, PPC_INTEGER),
8294GEN_HANDLER2(addic_, "addic.", 0x0D, 0xFF, 0xFF, 0x00000000, PPC_INTEGER),
8295GEN_HANDLER(addis, 0x0F, 0xFF, 0xFF, 0x00000000, PPC_INTEGER),
8296GEN_HANDLER(mulhw, 0x1F, 0x0B, 0x02, 0x00000400, PPC_INTEGER),
8297GEN_HANDLER(mulhwu, 0x1F, 0x0B, 0x00, 0x00000400, PPC_INTEGER),
8298GEN_HANDLER(mullw, 0x1F, 0x0B, 0x07, 0x00000000, PPC_INTEGER),
8299GEN_HANDLER(mullwo, 0x1F, 0x0B, 0x17, 0x00000000, PPC_INTEGER),
8300GEN_HANDLER(mulli, 0x07, 0xFF, 0xFF, 0x00000000, PPC_INTEGER),
8301#if defined(TARGET_PPC64)
8302GEN_HANDLER(mulld, 0x1F, 0x09, 0x07, 0x00000000, PPC_64B),
8303#endif
8304GEN_HANDLER(neg, 0x1F, 0x08, 0x03, 0x0000F800, PPC_INTEGER),
8305GEN_HANDLER(nego, 0x1F, 0x08, 0x13, 0x0000F800, PPC_INTEGER),
8306GEN_HANDLER(subfic, 0x08, 0xFF, 0xFF, 0x00000000, PPC_INTEGER),
8307GEN_HANDLER2(andi_, "andi.", 0x1C, 0xFF, 0xFF, 0x00000000, PPC_INTEGER),
8308GEN_HANDLER2(andis_, "andis.", 0x1D, 0xFF, 0xFF, 0x00000000, PPC_INTEGER),
8309GEN_HANDLER(cntlzw, 0x1F, 0x1A, 0x00, 0x00000000, PPC_INTEGER),
8310GEN_HANDLER(or, 0x1F, 0x1C, 0x0D, 0x00000000, PPC_INTEGER),
8311GEN_HANDLER(xor, 0x1F, 0x1C, 0x09, 0x00000000, PPC_INTEGER),
8312GEN_HANDLER(ori, 0x18, 0xFF, 0xFF, 0x00000000, PPC_INTEGER),
8313GEN_HANDLER(oris, 0x19, 0xFF, 0xFF, 0x00000000, PPC_INTEGER),
8314GEN_HANDLER(xori, 0x1A, 0xFF, 0xFF, 0x00000000, PPC_INTEGER),
8315GEN_HANDLER(xoris, 0x1B, 0xFF, 0xFF, 0x00000000, PPC_INTEGER),
8316GEN_HANDLER(popcntb, 0x1F, 0x03, 0x03, 0x0000F801, PPC_POPCNTB),
eaabeef2 8317GEN_HANDLER(popcntw, 0x1F, 0x1A, 0x0b, 0x0000F801, PPC_POPCNTWD),
5c55ff99 8318#if defined(TARGET_PPC64)
eaabeef2 8319GEN_HANDLER(popcntd, 0x1F, 0x1A, 0x0F, 0x0000F801, PPC_POPCNTWD),
5c55ff99
BS
8320GEN_HANDLER(cntlzd, 0x1F, 0x1A, 0x01, 0x00000000, PPC_64B),
8321#endif
8322GEN_HANDLER(rlwimi, 0x14, 0xFF, 0xFF, 0x00000000, PPC_INTEGER),
8323GEN_HANDLER(rlwinm, 0x15, 0xFF, 0xFF, 0x00000000, PPC_INTEGER),
8324GEN_HANDLER(rlwnm, 0x17, 0xFF, 0xFF, 0x00000000, PPC_INTEGER),
8325GEN_HANDLER(slw, 0x1F, 0x18, 0x00, 0x00000000, PPC_INTEGER),
8326GEN_HANDLER(sraw, 0x1F, 0x18, 0x18, 0x00000000, PPC_INTEGER),
8327GEN_HANDLER(srawi, 0x1F, 0x18, 0x19, 0x00000000, PPC_INTEGER),
8328GEN_HANDLER(srw, 0x1F, 0x18, 0x10, 0x00000000, PPC_INTEGER),
8329#if defined(TARGET_PPC64)
8330GEN_HANDLER(sld, 0x1F, 0x1B, 0x00, 0x00000000, PPC_64B),
8331GEN_HANDLER(srad, 0x1F, 0x1A, 0x18, 0x00000000, PPC_64B),
8332GEN_HANDLER2(sradi0, "sradi", 0x1F, 0x1A, 0x19, 0x00000000, PPC_64B),
8333GEN_HANDLER2(sradi1, "sradi", 0x1F, 0x1B, 0x19, 0x00000000, PPC_64B),
8334GEN_HANDLER(srd, 0x1F, 0x1B, 0x10, 0x00000000, PPC_64B),
8335#endif
8336GEN_HANDLER(frsqrtes, 0x3B, 0x1A, 0xFF, 0x001F07C0, PPC_FLOAT_FRSQRTES),
8337GEN_HANDLER(fsqrt, 0x3F, 0x16, 0xFF, 0x001F07C0, PPC_FLOAT_FSQRT),
8338GEN_HANDLER(fsqrts, 0x3B, 0x16, 0xFF, 0x001F07C0, PPC_FLOAT_FSQRT),
8339GEN_HANDLER(fcmpo, 0x3F, 0x00, 0x01, 0x00600001, PPC_FLOAT),
8340GEN_HANDLER(fcmpu, 0x3F, 0x00, 0x00, 0x00600001, PPC_FLOAT),
8341GEN_HANDLER(fmr, 0x3F, 0x08, 0x02, 0x001F0000, PPC_FLOAT),
8342GEN_HANDLER(mcrfs, 0x3F, 0x00, 0x02, 0x0063F801, PPC_FLOAT),
8343GEN_HANDLER(mffs, 0x3F, 0x07, 0x12, 0x001FF800, PPC_FLOAT),
8344GEN_HANDLER(mtfsb0, 0x3F, 0x06, 0x02, 0x001FF800, PPC_FLOAT),
8345GEN_HANDLER(mtfsb1, 0x3F, 0x06, 0x01, 0x001FF800, PPC_FLOAT),
8346GEN_HANDLER(mtfsf, 0x3F, 0x07, 0x16, 0x00010000, PPC_FLOAT),
8347GEN_HANDLER(mtfsfi, 0x3F, 0x06, 0x04, 0x006f0800, PPC_FLOAT),
8348#if defined(TARGET_PPC64)
8349GEN_HANDLER(ld, 0x3A, 0xFF, 0xFF, 0x00000000, PPC_64B),
8350GEN_HANDLER(lq, 0x38, 0xFF, 0xFF, 0x00000000, PPC_64BX),
8351GEN_HANDLER(std, 0x3E, 0xFF, 0xFF, 0x00000000, PPC_64B),
8352#endif
8353GEN_HANDLER(lmw, 0x2E, 0xFF, 0xFF, 0x00000000, PPC_INTEGER),
8354GEN_HANDLER(stmw, 0x2F, 0xFF, 0xFF, 0x00000000, PPC_INTEGER),
8355GEN_HANDLER(lswi, 0x1F, 0x15, 0x12, 0x00000001, PPC_STRING),
8356GEN_HANDLER(lswx, 0x1F, 0x15, 0x10, 0x00000001, PPC_STRING),
8357GEN_HANDLER(stswi, 0x1F, 0x15, 0x16, 0x00000001, PPC_STRING),
8358GEN_HANDLER(stswx, 0x1F, 0x15, 0x14, 0x00000001, PPC_STRING),
8359GEN_HANDLER(eieio, 0x1F, 0x16, 0x1A, 0x03FFF801, PPC_MEM_EIEIO),
8360GEN_HANDLER(isync, 0x13, 0x16, 0x04, 0x03FFF801, PPC_MEM),
f844c817 8361GEN_HANDLER(lwarx, 0x1F, 0x14, 0x00, 0x00000000, PPC_RES),
5c55ff99
BS
8362GEN_HANDLER2(stwcx_, "stwcx.", 0x1F, 0x16, 0x04, 0x00000000, PPC_RES),
8363#if defined(TARGET_PPC64)
f844c817 8364GEN_HANDLER(ldarx, 0x1F, 0x14, 0x02, 0x00000000, PPC_64B),
5c55ff99
BS
8365GEN_HANDLER2(stdcx_, "stdcx.", 0x1F, 0x16, 0x06, 0x00000000, PPC_64B),
8366#endif
8367GEN_HANDLER(sync, 0x1F, 0x16, 0x12, 0x039FF801, PPC_MEM_SYNC),
8368GEN_HANDLER(wait, 0x1F, 0x1E, 0x01, 0x03FFF801, PPC_WAIT),
8369GEN_HANDLER(b, 0x12, 0xFF, 0xFF, 0x00000000, PPC_FLOW),
8370GEN_HANDLER(bc, 0x10, 0xFF, 0xFF, 0x00000000, PPC_FLOW),
8371GEN_HANDLER(bcctr, 0x13, 0x10, 0x10, 0x00000000, PPC_FLOW),
8372GEN_HANDLER(bclr, 0x13, 0x10, 0x00, 0x00000000, PPC_FLOW),
8373GEN_HANDLER(mcrf, 0x13, 0x00, 0xFF, 0x00000001, PPC_INTEGER),
8374GEN_HANDLER(rfi, 0x13, 0x12, 0x01, 0x03FF8001, PPC_FLOW),
8375#if defined(TARGET_PPC64)
8376GEN_HANDLER(rfid, 0x13, 0x12, 0x00, 0x03FF8001, PPC_64B),
8377GEN_HANDLER(hrfid, 0x13, 0x12, 0x08, 0x03FF8001, PPC_64H),
8378#endif
8379GEN_HANDLER(sc, 0x11, 0xFF, 0xFF, 0x03FFF01D, PPC_FLOW),
8380GEN_HANDLER(tw, 0x1F, 0x04, 0x00, 0x00000001, PPC_FLOW),
8381GEN_HANDLER(twi, 0x03, 0xFF, 0xFF, 0x00000000, PPC_FLOW),
8382#if defined(TARGET_PPC64)
8383GEN_HANDLER(td, 0x1F, 0x04, 0x02, 0x00000001, PPC_64B),
8384GEN_HANDLER(tdi, 0x02, 0xFF, 0xFF, 0x00000000, PPC_64B),
8385#endif
8386GEN_HANDLER(mcrxr, 0x1F, 0x00, 0x10, 0x007FF801, PPC_MISC),
8387GEN_HANDLER(mfcr, 0x1F, 0x13, 0x00, 0x00000801, PPC_MISC),
8388GEN_HANDLER(mfmsr, 0x1F, 0x13, 0x02, 0x001FF801, PPC_MISC),
8389GEN_HANDLER(mfspr, 0x1F, 0x13, 0x0A, 0x00000001, PPC_MISC),
8390GEN_HANDLER(mftb, 0x1F, 0x13, 0x0B, 0x00000001, PPC_MFTB),
8391GEN_HANDLER(mtcrf, 0x1F, 0x10, 0x04, 0x00000801, PPC_MISC),
8392#if defined(TARGET_PPC64)
8393GEN_HANDLER(mtmsrd, 0x1F, 0x12, 0x05, 0x001EF801, PPC_64B),
8394#endif
8395GEN_HANDLER(mtmsr, 0x1F, 0x12, 0x04, 0x001FF801, PPC_MISC),
8396GEN_HANDLER(mtspr, 0x1F, 0x13, 0x0E, 0x00000001, PPC_MISC),
8397GEN_HANDLER(dcbf, 0x1F, 0x16, 0x02, 0x03C00001, PPC_CACHE),
8398GEN_HANDLER(dcbi, 0x1F, 0x16, 0x0E, 0x03E00001, PPC_CACHE),
8399GEN_HANDLER(dcbst, 0x1F, 0x16, 0x01, 0x03E00001, PPC_CACHE),
8400GEN_HANDLER(dcbt, 0x1F, 0x16, 0x08, 0x02000001, PPC_CACHE),
8401GEN_HANDLER(dcbtst, 0x1F, 0x16, 0x07, 0x02000001, PPC_CACHE),
8402GEN_HANDLER(dcbz, 0x1F, 0x16, 0x1F, 0x03E00001, PPC_CACHE_DCBZ),
8403GEN_HANDLER2(dcbz_970, "dcbz", 0x1F, 0x16, 0x1F, 0x03C00001, PPC_CACHE_DCBZT),
8404GEN_HANDLER(dst, 0x1F, 0x16, 0x0A, 0x01800001, PPC_ALTIVEC),
8405GEN_HANDLER(dstst, 0x1F, 0x16, 0x0B, 0x02000001, PPC_ALTIVEC),
8406GEN_HANDLER(dss, 0x1F, 0x16, 0x19, 0x019FF801, PPC_ALTIVEC),
8407GEN_HANDLER(icbi, 0x1F, 0x16, 0x1E, 0x03E00001, PPC_CACHE_ICBI),
8408GEN_HANDLER(dcba, 0x1F, 0x16, 0x17, 0x03E00001, PPC_CACHE_DCBA),
8409GEN_HANDLER(mfsr, 0x1F, 0x13, 0x12, 0x0010F801, PPC_SEGMENT),
8410GEN_HANDLER(mfsrin, 0x1F, 0x13, 0x14, 0x001F0001, PPC_SEGMENT),
8411GEN_HANDLER(mtsr, 0x1F, 0x12, 0x06, 0x0010F801, PPC_SEGMENT),
8412GEN_HANDLER(mtsrin, 0x1F, 0x12, 0x07, 0x001F0001, PPC_SEGMENT),
8413#if defined(TARGET_PPC64)
8414GEN_HANDLER2(mfsr_64b, "mfsr", 0x1F, 0x13, 0x12, 0x0010F801, PPC_SEGMENT_64B),
8415GEN_HANDLER2(mfsrin_64b, "mfsrin", 0x1F, 0x13, 0x14, 0x001F0001,
8416 PPC_SEGMENT_64B),
8417GEN_HANDLER2(mtsr_64b, "mtsr", 0x1F, 0x12, 0x06, 0x0010F801, PPC_SEGMENT_64B),
8418GEN_HANDLER2(mtsrin_64b, "mtsrin", 0x1F, 0x12, 0x07, 0x001F0001,
8419 PPC_SEGMENT_64B),
efdef95f
DG
8420GEN_HANDLER2(slbmte, "slbmte", 0x1F, 0x12, 0x0C, 0x001F0001, PPC_SEGMENT_64B),
8421GEN_HANDLER2(slbmfee, "slbmfee", 0x1F, 0x13, 0x1C, 0x001F0001, PPC_SEGMENT_64B),
8422GEN_HANDLER2(slbmfev, "slbmfev", 0x1F, 0x13, 0x1A, 0x001F0001, PPC_SEGMENT_64B),
5c55ff99
BS
8423#endif
8424GEN_HANDLER(tlbia, 0x1F, 0x12, 0x0B, 0x03FFFC01, PPC_MEM_TLBIA),
8425GEN_HANDLER(tlbiel, 0x1F, 0x12, 0x08, 0x03FF0001, PPC_MEM_TLBIE),
8426GEN_HANDLER(tlbie, 0x1F, 0x12, 0x09, 0x03FF0001, PPC_MEM_TLBIE),
8427GEN_HANDLER(tlbsync, 0x1F, 0x16, 0x11, 0x03FFF801, PPC_MEM_TLBSYNC),
8428#if defined(TARGET_PPC64)
8429GEN_HANDLER(slbia, 0x1F, 0x12, 0x0F, 0x03FFFC01, PPC_SLBI),
8430GEN_HANDLER(slbie, 0x1F, 0x12, 0x0D, 0x03FF0001, PPC_SLBI),
8431#endif
8432GEN_HANDLER(eciwx, 0x1F, 0x16, 0x0D, 0x00000001, PPC_EXTERN),
8433GEN_HANDLER(ecowx, 0x1F, 0x16, 0x09, 0x00000001, PPC_EXTERN),
8434GEN_HANDLER(abs, 0x1F, 0x08, 0x0B, 0x0000F800, PPC_POWER_BR),
8435GEN_HANDLER(abso, 0x1F, 0x08, 0x1B, 0x0000F800, PPC_POWER_BR),
8436GEN_HANDLER(clcs, 0x1F, 0x10, 0x13, 0x0000F800, PPC_POWER_BR),
8437GEN_HANDLER(div, 0x1F, 0x0B, 0x0A, 0x00000000, PPC_POWER_BR),
8438GEN_HANDLER(divo, 0x1F, 0x0B, 0x1A, 0x00000000, PPC_POWER_BR),
8439GEN_HANDLER(divs, 0x1F, 0x0B, 0x0B, 0x00000000, PPC_POWER_BR),
8440GEN_HANDLER(divso, 0x1F, 0x0B, 0x1B, 0x00000000, PPC_POWER_BR),
8441GEN_HANDLER(doz, 0x1F, 0x08, 0x08, 0x00000000, PPC_POWER_BR),
8442GEN_HANDLER(dozo, 0x1F, 0x08, 0x18, 0x00000000, PPC_POWER_BR),
8443GEN_HANDLER(dozi, 0x09, 0xFF, 0xFF, 0x00000000, PPC_POWER_BR),
8444GEN_HANDLER(lscbx, 0x1F, 0x15, 0x08, 0x00000000, PPC_POWER_BR),
8445GEN_HANDLER(maskg, 0x1F, 0x1D, 0x00, 0x00000000, PPC_POWER_BR),
8446GEN_HANDLER(maskir, 0x1F, 0x1D, 0x10, 0x00000000, PPC_POWER_BR),
8447GEN_HANDLER(mul, 0x1F, 0x0B, 0x03, 0x00000000, PPC_POWER_BR),
8448GEN_HANDLER(mulo, 0x1F, 0x0B, 0x13, 0x00000000, PPC_POWER_BR),
8449GEN_HANDLER(nabs, 0x1F, 0x08, 0x0F, 0x00000000, PPC_POWER_BR),
8450GEN_HANDLER(nabso, 0x1F, 0x08, 0x1F, 0x00000000, PPC_POWER_BR),
8451GEN_HANDLER(rlmi, 0x16, 0xFF, 0xFF, 0x00000000, PPC_POWER_BR),
8452GEN_HANDLER(rrib, 0x1F, 0x19, 0x10, 0x00000000, PPC_POWER_BR),
8453GEN_HANDLER(sle, 0x1F, 0x19, 0x04, 0x00000000, PPC_POWER_BR),
8454GEN_HANDLER(sleq, 0x1F, 0x19, 0x06, 0x00000000, PPC_POWER_BR),
8455GEN_HANDLER(sliq, 0x1F, 0x18, 0x05, 0x00000000, PPC_POWER_BR),
8456GEN_HANDLER(slliq, 0x1F, 0x18, 0x07, 0x00000000, PPC_POWER_BR),
8457GEN_HANDLER(sllq, 0x1F, 0x18, 0x06, 0x00000000, PPC_POWER_BR),
8458GEN_HANDLER(slq, 0x1F, 0x18, 0x04, 0x00000000, PPC_POWER_BR),
8459GEN_HANDLER(sraiq, 0x1F, 0x18, 0x1D, 0x00000000, PPC_POWER_BR),
8460GEN_HANDLER(sraq, 0x1F, 0x18, 0x1C, 0x00000000, PPC_POWER_BR),
8461GEN_HANDLER(sre, 0x1F, 0x19, 0x14, 0x00000000, PPC_POWER_BR),
8462GEN_HANDLER(srea, 0x1F, 0x19, 0x1C, 0x00000000, PPC_POWER_BR),
8463GEN_HANDLER(sreq, 0x1F, 0x19, 0x16, 0x00000000, PPC_POWER_BR),
8464GEN_HANDLER(sriq, 0x1F, 0x18, 0x15, 0x00000000, PPC_POWER_BR),
8465GEN_HANDLER(srliq, 0x1F, 0x18, 0x17, 0x00000000, PPC_POWER_BR),
8466GEN_HANDLER(srlq, 0x1F, 0x18, 0x16, 0x00000000, PPC_POWER_BR),
8467GEN_HANDLER(srq, 0x1F, 0x18, 0x14, 0x00000000, PPC_POWER_BR),
8468GEN_HANDLER(dsa, 0x1F, 0x14, 0x13, 0x03FFF801, PPC_602_SPEC),
8469GEN_HANDLER(esa, 0x1F, 0x14, 0x12, 0x03FFF801, PPC_602_SPEC),
8470GEN_HANDLER(mfrom, 0x1F, 0x09, 0x08, 0x03E0F801, PPC_602_SPEC),
8471GEN_HANDLER2(tlbld_6xx, "tlbld", 0x1F, 0x12, 0x1E, 0x03FF0001, PPC_6xx_TLB),
8472GEN_HANDLER2(tlbli_6xx, "tlbli", 0x1F, 0x12, 0x1F, 0x03FF0001, PPC_6xx_TLB),
8473GEN_HANDLER2(tlbld_74xx, "tlbld", 0x1F, 0x12, 0x1E, 0x03FF0001, PPC_74xx_TLB),
8474GEN_HANDLER2(tlbli_74xx, "tlbli", 0x1F, 0x12, 0x1F, 0x03FF0001, PPC_74xx_TLB),
8475GEN_HANDLER(clf, 0x1F, 0x16, 0x03, 0x03E00000, PPC_POWER),
8476GEN_HANDLER(cli, 0x1F, 0x16, 0x0F, 0x03E00000, PPC_POWER),
8477GEN_HANDLER(dclst, 0x1F, 0x16, 0x13, 0x03E00000, PPC_POWER),
8478GEN_HANDLER(mfsri, 0x1F, 0x13, 0x13, 0x00000001, PPC_POWER),
8479GEN_HANDLER(rac, 0x1F, 0x12, 0x19, 0x00000001, PPC_POWER),
8480GEN_HANDLER(rfsvc, 0x13, 0x12, 0x02, 0x03FFF0001, PPC_POWER),
8481GEN_HANDLER(lfq, 0x38, 0xFF, 0xFF, 0x00000003, PPC_POWER2),
8482GEN_HANDLER(lfqu, 0x39, 0xFF, 0xFF, 0x00000003, PPC_POWER2),
8483GEN_HANDLER(lfqux, 0x1F, 0x17, 0x19, 0x00000001, PPC_POWER2),
8484GEN_HANDLER(lfqx, 0x1F, 0x17, 0x18, 0x00000001, PPC_POWER2),
8485GEN_HANDLER(stfq, 0x3C, 0xFF, 0xFF, 0x00000003, PPC_POWER2),
8486GEN_HANDLER(stfqu, 0x3D, 0xFF, 0xFF, 0x00000003, PPC_POWER2),
8487GEN_HANDLER(stfqux, 0x1F, 0x17, 0x1D, 0x00000001, PPC_POWER2),
8488GEN_HANDLER(stfqx, 0x1F, 0x17, 0x1C, 0x00000001, PPC_POWER2),
8489GEN_HANDLER(mfapidi, 0x1F, 0x13, 0x08, 0x0000F801, PPC_MFAPIDI),
8490GEN_HANDLER(tlbiva, 0x1F, 0x12, 0x18, 0x03FFF801, PPC_TLBIVA),
8491GEN_HANDLER(mfdcr, 0x1F, 0x03, 0x0A, 0x00000001, PPC_DCR),
8492GEN_HANDLER(mtdcr, 0x1F, 0x03, 0x0E, 0x00000001, PPC_DCR),
8493GEN_HANDLER(mfdcrx, 0x1F, 0x03, 0x08, 0x00000000, PPC_DCRX),
8494GEN_HANDLER(mtdcrx, 0x1F, 0x03, 0x0C, 0x00000000, PPC_DCRX),
8495GEN_HANDLER(mfdcrux, 0x1F, 0x03, 0x09, 0x00000000, PPC_DCRUX),
8496GEN_HANDLER(mtdcrux, 0x1F, 0x03, 0x0D, 0x00000000, PPC_DCRUX),
8497GEN_HANDLER(dccci, 0x1F, 0x06, 0x0E, 0x03E00001, PPC_4xx_COMMON),
8498GEN_HANDLER(dcread, 0x1F, 0x06, 0x0F, 0x00000001, PPC_4xx_COMMON),
8499GEN_HANDLER2(icbt_40x, "icbt", 0x1F, 0x06, 0x08, 0x03E00001, PPC_40x_ICBT),
8500GEN_HANDLER(iccci, 0x1F, 0x06, 0x1E, 0x00000001, PPC_4xx_COMMON),
8501GEN_HANDLER(icread, 0x1F, 0x06, 0x1F, 0x03E00001, PPC_4xx_COMMON),
8502GEN_HANDLER2(rfci_40x, "rfci", 0x13, 0x13, 0x01, 0x03FF8001, PPC_40x_EXCP),
01662f3e 8503GEN_HANDLER_E(rfci, 0x13, 0x13, 0x01, 0x03FF8001, PPC_BOOKE, PPC2_BOOKE206),
5c55ff99
BS
8504GEN_HANDLER(rfdi, 0x13, 0x07, 0x01, 0x03FF8001, PPC_RFDI),
8505GEN_HANDLER(rfmci, 0x13, 0x06, 0x01, 0x03FF8001, PPC_RFMCI),
8506GEN_HANDLER2(tlbre_40x, "tlbre", 0x1F, 0x12, 0x1D, 0x00000001, PPC_40x_TLB),
8507GEN_HANDLER2(tlbsx_40x, "tlbsx", 0x1F, 0x12, 0x1C, 0x00000000, PPC_40x_TLB),
8508GEN_HANDLER2(tlbwe_40x, "tlbwe", 0x1F, 0x12, 0x1E, 0x00000001, PPC_40x_TLB),
8509GEN_HANDLER2(tlbre_440, "tlbre", 0x1F, 0x12, 0x1D, 0x00000001, PPC_BOOKE),
8510GEN_HANDLER2(tlbsx_440, "tlbsx", 0x1F, 0x12, 0x1C, 0x00000000, PPC_BOOKE),
8511GEN_HANDLER2(tlbwe_440, "tlbwe", 0x1F, 0x12, 0x1E, 0x00000001, PPC_BOOKE),
01662f3e
AG
8512GEN_HANDLER2_E(tlbre_booke206, "tlbre", 0x1F, 0x12, 0x1D, 0x00000001,
8513 PPC_NONE, PPC2_BOOKE206),
8514GEN_HANDLER2_E(tlbsx_booke206, "tlbsx", 0x1F, 0x12, 0x1C, 0x00000000,
8515 PPC_NONE, PPC2_BOOKE206),
8516GEN_HANDLER2_E(tlbwe_booke206, "tlbwe", 0x1F, 0x12, 0x1E, 0x00000001,
8517 PPC_NONE, PPC2_BOOKE206),
8518GEN_HANDLER2_E(tlbivax_booke206, "tlbivax", 0x1F, 0x12, 0x18, 0x00000001,
8519 PPC_NONE, PPC2_BOOKE206),
5c55ff99 8520GEN_HANDLER(wrtee, 0x1F, 0x03, 0x04, 0x000FFC01, PPC_WRTEE),
fbe73008 8521GEN_HANDLER(wrteei, 0x1F, 0x03, 0x05, 0x000E7C01, PPC_WRTEE),
5c55ff99 8522GEN_HANDLER(dlmzb, 0x1F, 0x0E, 0x02, 0x00000000, PPC_440_SPEC),
01662f3e
AG
8523GEN_HANDLER_E(mbar, 0x1F, 0x16, 0x1a, 0x001FF801,
8524 PPC_BOOKE, PPC2_BOOKE206),
8525GEN_HANDLER_E(msync, 0x1F, 0x16, 0x12, 0x03FFF801,
8526 PPC_BOOKE, PPC2_BOOKE206),
8527GEN_HANDLER2_E(icbt_440, "icbt", 0x1F, 0x16, 0x00, 0x03E00001,
8528 PPC_BOOKE, PPC2_BOOKE206),
5c55ff99
BS
8529GEN_HANDLER(lvsl, 0x1f, 0x06, 0x00, 0x00000001, PPC_ALTIVEC),
8530GEN_HANDLER(lvsr, 0x1f, 0x06, 0x01, 0x00000001, PPC_ALTIVEC),
8531GEN_HANDLER(mfvscr, 0x04, 0x2, 0x18, 0x001ff800, PPC_ALTIVEC),
8532GEN_HANDLER(mtvscr, 0x04, 0x2, 0x19, 0x03ff0000, PPC_ALTIVEC),
8533GEN_HANDLER(vsldoi, 0x04, 0x16, 0xFF, 0x00000400, PPC_ALTIVEC),
8534GEN_HANDLER(vmladduhm, 0x04, 0x11, 0xFF, 0x00000000, PPC_ALTIVEC),
8535GEN_HANDLER2(evsel0, "evsel", 0x04, 0x1c, 0x09, 0x00000000, PPC_SPE),
8536GEN_HANDLER2(evsel1, "evsel", 0x04, 0x1d, 0x09, 0x00000000, PPC_SPE),
8537GEN_HANDLER2(evsel2, "evsel", 0x04, 0x1e, 0x09, 0x00000000, PPC_SPE),
8538GEN_HANDLER2(evsel3, "evsel", 0x04, 0x1f, 0x09, 0x00000000, PPC_SPE),
8539
8540#undef GEN_INT_ARITH_ADD
8541#undef GEN_INT_ARITH_ADD_CONST
8542#define GEN_INT_ARITH_ADD(name, opc3, add_ca, compute_ca, compute_ov) \
8543GEN_HANDLER(name, 0x1F, 0x0A, opc3, 0x00000000, PPC_INTEGER),
8544#define GEN_INT_ARITH_ADD_CONST(name, opc3, const_val, \
8545 add_ca, compute_ca, compute_ov) \
8546GEN_HANDLER(name, 0x1F, 0x0A, opc3, 0x0000F800, PPC_INTEGER),
8547GEN_INT_ARITH_ADD(add, 0x08, 0, 0, 0)
8548GEN_INT_ARITH_ADD(addo, 0x18, 0, 0, 1)
8549GEN_INT_ARITH_ADD(addc, 0x00, 0, 1, 0)
8550GEN_INT_ARITH_ADD(addco, 0x10, 0, 1, 1)
8551GEN_INT_ARITH_ADD(adde, 0x04, 1, 1, 0)
8552GEN_INT_ARITH_ADD(addeo, 0x14, 1, 1, 1)
8553GEN_INT_ARITH_ADD_CONST(addme, 0x07, -1LL, 1, 1, 0)
8554GEN_INT_ARITH_ADD_CONST(addmeo, 0x17, -1LL, 1, 1, 1)
8555GEN_INT_ARITH_ADD_CONST(addze, 0x06, 0, 1, 1, 0)
8556GEN_INT_ARITH_ADD_CONST(addzeo, 0x16, 0, 1, 1, 1)
8557
8558#undef GEN_INT_ARITH_DIVW
8559#define GEN_INT_ARITH_DIVW(name, opc3, sign, compute_ov) \
8560GEN_HANDLER(name, 0x1F, 0x0B, opc3, 0x00000000, PPC_INTEGER)
8561GEN_INT_ARITH_DIVW(divwu, 0x0E, 0, 0),
8562GEN_INT_ARITH_DIVW(divwuo, 0x1E, 0, 1),
8563GEN_INT_ARITH_DIVW(divw, 0x0F, 1, 0),
8564GEN_INT_ARITH_DIVW(divwo, 0x1F, 1, 1),
8565
8566#if defined(TARGET_PPC64)
8567#undef GEN_INT_ARITH_DIVD
8568#define GEN_INT_ARITH_DIVD(name, opc3, sign, compute_ov) \
8569GEN_HANDLER(name, 0x1F, 0x09, opc3, 0x00000000, PPC_64B)
8570GEN_INT_ARITH_DIVD(divdu, 0x0E, 0, 0),
8571GEN_INT_ARITH_DIVD(divduo, 0x1E, 0, 1),
8572GEN_INT_ARITH_DIVD(divd, 0x0F, 1, 0),
8573GEN_INT_ARITH_DIVD(divdo, 0x1F, 1, 1),
8574
8575#undef GEN_INT_ARITH_MUL_HELPER
8576#define GEN_INT_ARITH_MUL_HELPER(name, opc3) \
8577GEN_HANDLER(name, 0x1F, 0x09, opc3, 0x00000000, PPC_64B)
8578GEN_INT_ARITH_MUL_HELPER(mulhdu, 0x00),
8579GEN_INT_ARITH_MUL_HELPER(mulhd, 0x02),
8580GEN_INT_ARITH_MUL_HELPER(mulldo, 0x17),
8581#endif
8582
8583#undef GEN_INT_ARITH_SUBF
8584#undef GEN_INT_ARITH_SUBF_CONST
8585#define GEN_INT_ARITH_SUBF(name, opc3, add_ca, compute_ca, compute_ov) \
8586GEN_HANDLER(name, 0x1F, 0x08, opc3, 0x00000000, PPC_INTEGER),
8587#define GEN_INT_ARITH_SUBF_CONST(name, opc3, const_val, \
8588 add_ca, compute_ca, compute_ov) \
8589GEN_HANDLER(name, 0x1F, 0x08, opc3, 0x0000F800, PPC_INTEGER),
8590GEN_INT_ARITH_SUBF(subf, 0x01, 0, 0, 0)
8591GEN_INT_ARITH_SUBF(subfo, 0x11, 0, 0, 1)
8592GEN_INT_ARITH_SUBF(subfc, 0x00, 0, 1, 0)
8593GEN_INT_ARITH_SUBF(subfco, 0x10, 0, 1, 1)
8594GEN_INT_ARITH_SUBF(subfe, 0x04, 1, 1, 0)
8595GEN_INT_ARITH_SUBF(subfeo, 0x14, 1, 1, 1)
8596GEN_INT_ARITH_SUBF_CONST(subfme, 0x07, -1LL, 1, 1, 0)
8597GEN_INT_ARITH_SUBF_CONST(subfmeo, 0x17, -1LL, 1, 1, 1)
8598GEN_INT_ARITH_SUBF_CONST(subfze, 0x06, 0, 1, 1, 0)
8599GEN_INT_ARITH_SUBF_CONST(subfzeo, 0x16, 0, 1, 1, 1)
8600
8601#undef GEN_LOGICAL1
8602#undef GEN_LOGICAL2
8603#define GEN_LOGICAL2(name, tcg_op, opc, type) \
8604GEN_HANDLER(name, 0x1F, 0x1C, opc, 0x00000000, type)
8605#define GEN_LOGICAL1(name, tcg_op, opc, type) \
8606GEN_HANDLER(name, 0x1F, 0x1A, opc, 0x00000000, type)
8607GEN_LOGICAL2(and, tcg_gen_and_tl, 0x00, PPC_INTEGER),
8608GEN_LOGICAL2(andc, tcg_gen_andc_tl, 0x01, PPC_INTEGER),
8609GEN_LOGICAL2(eqv, tcg_gen_eqv_tl, 0x08, PPC_INTEGER),
8610GEN_LOGICAL1(extsb, tcg_gen_ext8s_tl, 0x1D, PPC_INTEGER),
8611GEN_LOGICAL1(extsh, tcg_gen_ext16s_tl, 0x1C, PPC_INTEGER),
8612GEN_LOGICAL2(nand, tcg_gen_nand_tl, 0x0E, PPC_INTEGER),
8613GEN_LOGICAL2(nor, tcg_gen_nor_tl, 0x03, PPC_INTEGER),
8614GEN_LOGICAL2(orc, tcg_gen_orc_tl, 0x0C, PPC_INTEGER),
8615#if defined(TARGET_PPC64)
8616GEN_LOGICAL1(extsw, tcg_gen_ext32s_tl, 0x1E, PPC_64B),
8617#endif
8618
8619#if defined(TARGET_PPC64)
8620#undef GEN_PPC64_R2
8621#undef GEN_PPC64_R4
8622#define GEN_PPC64_R2(name, opc1, opc2) \
8623GEN_HANDLER2(name##0, stringify(name), opc1, opc2, 0xFF, 0x00000000, PPC_64B),\
8624GEN_HANDLER2(name##1, stringify(name), opc1, opc2 | 0x10, 0xFF, 0x00000000, \
8625 PPC_64B)
8626#define GEN_PPC64_R4(name, opc1, opc2) \
8627GEN_HANDLER2(name##0, stringify(name), opc1, opc2, 0xFF, 0x00000000, PPC_64B),\
8628GEN_HANDLER2(name##1, stringify(name), opc1, opc2 | 0x01, 0xFF, 0x00000000, \
8629 PPC_64B), \
8630GEN_HANDLER2(name##2, stringify(name), opc1, opc2 | 0x10, 0xFF, 0x00000000, \
8631 PPC_64B), \
8632GEN_HANDLER2(name##3, stringify(name), opc1, opc2 | 0x11, 0xFF, 0x00000000, \
8633 PPC_64B)
8634GEN_PPC64_R4(rldicl, 0x1E, 0x00),
8635GEN_PPC64_R4(rldicr, 0x1E, 0x02),
8636GEN_PPC64_R4(rldic, 0x1E, 0x04),
8637GEN_PPC64_R2(rldcl, 0x1E, 0x08),
8638GEN_PPC64_R2(rldcr, 0x1E, 0x09),
8639GEN_PPC64_R4(rldimi, 0x1E, 0x06),
8640#endif
8641
8642#undef _GEN_FLOAT_ACB
8643#undef GEN_FLOAT_ACB
8644#undef _GEN_FLOAT_AB
8645#undef GEN_FLOAT_AB
8646#undef _GEN_FLOAT_AC
8647#undef GEN_FLOAT_AC
8648#undef GEN_FLOAT_B
8649#undef GEN_FLOAT_BS
8650#define _GEN_FLOAT_ACB(name, op, op1, op2, isfloat, set_fprf, type) \
8651GEN_HANDLER(f##name, op1, op2, 0xFF, 0x00000000, type)
8652#define GEN_FLOAT_ACB(name, op2, set_fprf, type) \
8653_GEN_FLOAT_ACB(name, name, 0x3F, op2, 0, set_fprf, type), \
8654_GEN_FLOAT_ACB(name##s, name, 0x3B, op2, 1, set_fprf, type)
8655#define _GEN_FLOAT_AB(name, op, op1, op2, inval, isfloat, set_fprf, type) \
8656GEN_HANDLER(f##name, op1, op2, 0xFF, inval, type)
8657#define GEN_FLOAT_AB(name, op2, inval, set_fprf, type) \
8658_GEN_FLOAT_AB(name, name, 0x3F, op2, inval, 0, set_fprf, type), \
8659_GEN_FLOAT_AB(name##s, name, 0x3B, op2, inval, 1, set_fprf, type)
8660#define _GEN_FLOAT_AC(name, op, op1, op2, inval, isfloat, set_fprf, type) \
8661GEN_HANDLER(f##name, op1, op2, 0xFF, inval, type)
8662#define GEN_FLOAT_AC(name, op2, inval, set_fprf, type) \
8663_GEN_FLOAT_AC(name, name, 0x3F, op2, inval, 0, set_fprf, type), \
8664_GEN_FLOAT_AC(name##s, name, 0x3B, op2, inval, 1, set_fprf, type)
8665#define GEN_FLOAT_B(name, op2, op3, set_fprf, type) \
8666GEN_HANDLER(f##name, 0x3F, op2, op3, 0x001F0000, type)
8667#define GEN_FLOAT_BS(name, op1, op2, set_fprf, type) \
8668GEN_HANDLER(f##name, op1, op2, 0xFF, 0x001F07C0, type)
8669
8670GEN_FLOAT_AB(add, 0x15, 0x000007C0, 1, PPC_FLOAT),
8671GEN_FLOAT_AB(div, 0x12, 0x000007C0, 1, PPC_FLOAT),
8672GEN_FLOAT_AC(mul, 0x19, 0x0000F800, 1, PPC_FLOAT),
8673GEN_FLOAT_BS(re, 0x3F, 0x18, 1, PPC_FLOAT_EXT),
8674GEN_FLOAT_BS(res, 0x3B, 0x18, 1, PPC_FLOAT_FRES),
8675GEN_FLOAT_BS(rsqrte, 0x3F, 0x1A, 1, PPC_FLOAT_FRSQRTE),
8676_GEN_FLOAT_ACB(sel, sel, 0x3F, 0x17, 0, 0, PPC_FLOAT_FSEL),
8677GEN_FLOAT_AB(sub, 0x14, 0x000007C0, 1, PPC_FLOAT),
8678GEN_FLOAT_ACB(madd, 0x1D, 1, PPC_FLOAT),
8679GEN_FLOAT_ACB(msub, 0x1C, 1, PPC_FLOAT),
8680GEN_FLOAT_ACB(nmadd, 0x1F, 1, PPC_FLOAT),
8681GEN_FLOAT_ACB(nmsub, 0x1E, 1, PPC_FLOAT),
8682GEN_FLOAT_B(ctiw, 0x0E, 0x00, 0, PPC_FLOAT),
8683GEN_FLOAT_B(ctiwz, 0x0F, 0x00, 0, PPC_FLOAT),
8684GEN_FLOAT_B(rsp, 0x0C, 0x00, 1, PPC_FLOAT),
8685#if defined(TARGET_PPC64)
8686GEN_FLOAT_B(cfid, 0x0E, 0x1A, 1, PPC_64B),
8687GEN_FLOAT_B(ctid, 0x0E, 0x19, 0, PPC_64B),
8688GEN_FLOAT_B(ctidz, 0x0F, 0x19, 0, PPC_64B),
8689#endif
8690GEN_FLOAT_B(rin, 0x08, 0x0C, 1, PPC_FLOAT_EXT),
8691GEN_FLOAT_B(riz, 0x08, 0x0D, 1, PPC_FLOAT_EXT),
8692GEN_FLOAT_B(rip, 0x08, 0x0E, 1, PPC_FLOAT_EXT),
8693GEN_FLOAT_B(rim, 0x08, 0x0F, 1, PPC_FLOAT_EXT),
8694GEN_FLOAT_B(abs, 0x08, 0x08, 0, PPC_FLOAT),
8695GEN_FLOAT_B(nabs, 0x08, 0x04, 0, PPC_FLOAT),
8696GEN_FLOAT_B(neg, 0x08, 0x01, 0, PPC_FLOAT),
8697
8698#undef GEN_LD
8699#undef GEN_LDU
8700#undef GEN_LDUX
8701#undef GEN_LDX
8702#undef GEN_LDS
8703#define GEN_LD(name, ldop, opc, type) \
8704GEN_HANDLER(name, opc, 0xFF, 0xFF, 0x00000000, type),
8705#define GEN_LDU(name, ldop, opc, type) \
8706GEN_HANDLER(name##u, opc, 0xFF, 0xFF, 0x00000000, type),
8707#define GEN_LDUX(name, ldop, opc2, opc3, type) \
8708GEN_HANDLER(name##ux, 0x1F, opc2, opc3, 0x00000001, type),
8709#define GEN_LDX(name, ldop, opc2, opc3, type) \
8710GEN_HANDLER(name##x, 0x1F, opc2, opc3, 0x00000001, type),
8711#define GEN_LDS(name, ldop, op, type) \
8712GEN_LD(name, ldop, op | 0x20, type) \
8713GEN_LDU(name, ldop, op | 0x21, type) \
8714GEN_LDUX(name, ldop, 0x17, op | 0x01, type) \
8715GEN_LDX(name, ldop, 0x17, op | 0x00, type)
8716
8717GEN_LDS(lbz, ld8u, 0x02, PPC_INTEGER)
8718GEN_LDS(lha, ld16s, 0x0A, PPC_INTEGER)
8719GEN_LDS(lhz, ld16u, 0x08, PPC_INTEGER)
8720GEN_LDS(lwz, ld32u, 0x00, PPC_INTEGER)
8721#if defined(TARGET_PPC64)
8722GEN_LDUX(lwa, ld32s, 0x15, 0x0B, PPC_64B)
8723GEN_LDX(lwa, ld32s, 0x15, 0x0A, PPC_64B)
8724GEN_LDUX(ld, ld64, 0x15, 0x01, PPC_64B)
8725GEN_LDX(ld, ld64, 0x15, 0x00, PPC_64B)
8726#endif
8727GEN_LDX(lhbr, ld16ur, 0x16, 0x18, PPC_INTEGER)
8728GEN_LDX(lwbr, ld32ur, 0x16, 0x10, PPC_INTEGER)
8729
8730#undef GEN_ST
8731#undef GEN_STU
8732#undef GEN_STUX
8733#undef GEN_STX
8734#undef GEN_STS
8735#define GEN_ST(name, stop, opc, type) \
8736GEN_HANDLER(name, opc, 0xFF, 0xFF, 0x00000000, type),
8737#define GEN_STU(name, stop, opc, type) \
8738GEN_HANDLER(stop##u, opc, 0xFF, 0xFF, 0x00000000, type),
8739#define GEN_STUX(name, stop, opc2, opc3, type) \
8740GEN_HANDLER(name##ux, 0x1F, opc2, opc3, 0x00000001, type),
8741#define GEN_STX(name, stop, opc2, opc3, type) \
8742GEN_HANDLER(name##x, 0x1F, opc2, opc3, 0x00000001, type),
8743#define GEN_STS(name, stop, op, type) \
8744GEN_ST(name, stop, op | 0x20, type) \
8745GEN_STU(name, stop, op | 0x21, type) \
8746GEN_STUX(name, stop, 0x17, op | 0x01, type) \
8747GEN_STX(name, stop, 0x17, op | 0x00, type)
8748
8749GEN_STS(stb, st8, 0x06, PPC_INTEGER)
8750GEN_STS(sth, st16, 0x0C, PPC_INTEGER)
8751GEN_STS(stw, st32, 0x04, PPC_INTEGER)
8752#if defined(TARGET_PPC64)
8753GEN_STUX(std, st64, 0x15, 0x05, PPC_64B)
8754GEN_STX(std, st64, 0x15, 0x04, PPC_64B)
8755#endif
8756GEN_STX(sthbr, st16r, 0x16, 0x1C, PPC_INTEGER)
8757GEN_STX(stwbr, st32r, 0x16, 0x14, PPC_INTEGER)
8758
8759#undef GEN_LDF
8760#undef GEN_LDUF
8761#undef GEN_LDUXF
8762#undef GEN_LDXF
8763#undef GEN_LDFS
8764#define GEN_LDF(name, ldop, opc, type) \
8765GEN_HANDLER(name, opc, 0xFF, 0xFF, 0x00000000, type),
8766#define GEN_LDUF(name, ldop, opc, type) \
8767GEN_HANDLER(name##u, opc, 0xFF, 0xFF, 0x00000000, type),
8768#define GEN_LDUXF(name, ldop, opc, type) \
8769GEN_HANDLER(name##ux, 0x1F, 0x17, opc, 0x00000001, type),
8770#define GEN_LDXF(name, ldop, opc2, opc3, type) \
8771GEN_HANDLER(name##x, 0x1F, opc2, opc3, 0x00000001, type),
8772#define GEN_LDFS(name, ldop, op, type) \
8773GEN_LDF(name, ldop, op | 0x20, type) \
8774GEN_LDUF(name, ldop, op | 0x21, type) \
8775GEN_LDUXF(name, ldop, op | 0x01, type) \
8776GEN_LDXF(name, ldop, 0x17, op | 0x00, type)
8777
8778GEN_LDFS(lfd, ld64, 0x12, PPC_FLOAT)
8779GEN_LDFS(lfs, ld32fs, 0x10, PPC_FLOAT)
8780
8781#undef GEN_STF
8782#undef GEN_STUF
8783#undef GEN_STUXF
8784#undef GEN_STXF
8785#undef GEN_STFS
8786#define GEN_STF(name, stop, opc, type) \
8787GEN_HANDLER(name, opc, 0xFF, 0xFF, 0x00000000, type),
8788#define GEN_STUF(name, stop, opc, type) \
8789GEN_HANDLER(name##u, opc, 0xFF, 0xFF, 0x00000000, type),
8790#define GEN_STUXF(name, stop, opc, type) \
8791GEN_HANDLER(name##ux, 0x1F, 0x17, opc, 0x00000001, type),
8792#define GEN_STXF(name, stop, opc2, opc3, type) \
8793GEN_HANDLER(name##x, 0x1F, opc2, opc3, 0x00000001, type),
8794#define GEN_STFS(name, stop, op, type) \
8795GEN_STF(name, stop, op | 0x20, type) \
8796GEN_STUF(name, stop, op | 0x21, type) \
8797GEN_STUXF(name, stop, op | 0x01, type) \
8798GEN_STXF(name, stop, 0x17, op | 0x00, type)
8799
8800GEN_STFS(stfd, st64, 0x16, PPC_FLOAT)
8801GEN_STFS(stfs, st32fs, 0x14, PPC_FLOAT)
8802GEN_STXF(stfiw, st32fiw, 0x17, 0x1E, PPC_FLOAT_STFIWX)
8803
8804#undef GEN_CRLOGIC
8805#define GEN_CRLOGIC(name, tcg_op, opc) \
8806GEN_HANDLER(name, 0x13, 0x01, opc, 0x00000001, PPC_INTEGER)
8807GEN_CRLOGIC(crand, tcg_gen_and_i32, 0x08),
8808GEN_CRLOGIC(crandc, tcg_gen_andc_i32, 0x04),
8809GEN_CRLOGIC(creqv, tcg_gen_eqv_i32, 0x09),
8810GEN_CRLOGIC(crnand, tcg_gen_nand_i32, 0x07),
8811GEN_CRLOGIC(crnor, tcg_gen_nor_i32, 0x01),
8812GEN_CRLOGIC(cror, tcg_gen_or_i32, 0x0E),
8813GEN_CRLOGIC(crorc, tcg_gen_orc_i32, 0x0D),
8814GEN_CRLOGIC(crxor, tcg_gen_xor_i32, 0x06),
8815
8816#undef GEN_MAC_HANDLER
8817#define GEN_MAC_HANDLER(name, opc2, opc3) \
8818GEN_HANDLER(name, 0x04, opc2, opc3, 0x00000000, PPC_405_MAC)
8819GEN_MAC_HANDLER(macchw, 0x0C, 0x05),
8820GEN_MAC_HANDLER(macchwo, 0x0C, 0x15),
8821GEN_MAC_HANDLER(macchws, 0x0C, 0x07),
8822GEN_MAC_HANDLER(macchwso, 0x0C, 0x17),
8823GEN_MAC_HANDLER(macchwsu, 0x0C, 0x06),
8824GEN_MAC_HANDLER(macchwsuo, 0x0C, 0x16),
8825GEN_MAC_HANDLER(macchwu, 0x0C, 0x04),
8826GEN_MAC_HANDLER(macchwuo, 0x0C, 0x14),
8827GEN_MAC_HANDLER(machhw, 0x0C, 0x01),
8828GEN_MAC_HANDLER(machhwo, 0x0C, 0x11),
8829GEN_MAC_HANDLER(machhws, 0x0C, 0x03),
8830GEN_MAC_HANDLER(machhwso, 0x0C, 0x13),
8831GEN_MAC_HANDLER(machhwsu, 0x0C, 0x02),
8832GEN_MAC_HANDLER(machhwsuo, 0x0C, 0x12),
8833GEN_MAC_HANDLER(machhwu, 0x0C, 0x00),
8834GEN_MAC_HANDLER(machhwuo, 0x0C, 0x10),
8835GEN_MAC_HANDLER(maclhw, 0x0C, 0x0D),
8836GEN_MAC_HANDLER(maclhwo, 0x0C, 0x1D),
8837GEN_MAC_HANDLER(maclhws, 0x0C, 0x0F),
8838GEN_MAC_HANDLER(maclhwso, 0x0C, 0x1F),
8839GEN_MAC_HANDLER(maclhwu, 0x0C, 0x0C),
8840GEN_MAC_HANDLER(maclhwuo, 0x0C, 0x1C),
8841GEN_MAC_HANDLER(maclhwsu, 0x0C, 0x0E),
8842GEN_MAC_HANDLER(maclhwsuo, 0x0C, 0x1E),
8843GEN_MAC_HANDLER(nmacchw, 0x0E, 0x05),
8844GEN_MAC_HANDLER(nmacchwo, 0x0E, 0x15),
8845GEN_MAC_HANDLER(nmacchws, 0x0E, 0x07),
8846GEN_MAC_HANDLER(nmacchwso, 0x0E, 0x17),
8847GEN_MAC_HANDLER(nmachhw, 0x0E, 0x01),
8848GEN_MAC_HANDLER(nmachhwo, 0x0E, 0x11),
8849GEN_MAC_HANDLER(nmachhws, 0x0E, 0x03),
8850GEN_MAC_HANDLER(nmachhwso, 0x0E, 0x13),
8851GEN_MAC_HANDLER(nmaclhw, 0x0E, 0x0D),
8852GEN_MAC_HANDLER(nmaclhwo, 0x0E, 0x1D),
8853GEN_MAC_HANDLER(nmaclhws, 0x0E, 0x0F),
8854GEN_MAC_HANDLER(nmaclhwso, 0x0E, 0x1F),
8855GEN_MAC_HANDLER(mulchw, 0x08, 0x05),
8856GEN_MAC_HANDLER(mulchwu, 0x08, 0x04),
8857GEN_MAC_HANDLER(mulhhw, 0x08, 0x01),
8858GEN_MAC_HANDLER(mulhhwu, 0x08, 0x00),
8859GEN_MAC_HANDLER(mullhw, 0x08, 0x0D),
8860GEN_MAC_HANDLER(mullhwu, 0x08, 0x0C),
8861
8862#undef GEN_VR_LDX
8863#undef GEN_VR_STX
8864#undef GEN_VR_LVE
8865#undef GEN_VR_STVE
8866#define GEN_VR_LDX(name, opc2, opc3) \
8867GEN_HANDLER(name, 0x1F, opc2, opc3, 0x00000001, PPC_ALTIVEC)
8868#define GEN_VR_STX(name, opc2, opc3) \
8869GEN_HANDLER(st##name, 0x1F, opc2, opc3, 0x00000001, PPC_ALTIVEC)
8870#define GEN_VR_LVE(name, opc2, opc3) \
8871 GEN_HANDLER(lve##name, 0x1F, opc2, opc3, 0x00000001, PPC_ALTIVEC)
8872#define GEN_VR_STVE(name, opc2, opc3) \
8873 GEN_HANDLER(stve##name, 0x1F, opc2, opc3, 0x00000001, PPC_ALTIVEC)
8874GEN_VR_LDX(lvx, 0x07, 0x03),
8875GEN_VR_LDX(lvxl, 0x07, 0x0B),
8876GEN_VR_LVE(bx, 0x07, 0x00),
8877GEN_VR_LVE(hx, 0x07, 0x01),
8878GEN_VR_LVE(wx, 0x07, 0x02),
8879GEN_VR_STX(svx, 0x07, 0x07),
8880GEN_VR_STX(svxl, 0x07, 0x0F),
8881GEN_VR_STVE(bx, 0x07, 0x04),
8882GEN_VR_STVE(hx, 0x07, 0x05),
8883GEN_VR_STVE(wx, 0x07, 0x06),
8884
8885#undef GEN_VX_LOGICAL
8886#define GEN_VX_LOGICAL(name, tcg_op, opc2, opc3) \
8887GEN_HANDLER(name, 0x04, opc2, opc3, 0x00000000, PPC_ALTIVEC)
8888GEN_VX_LOGICAL(vand, tcg_gen_and_i64, 2, 16),
8889GEN_VX_LOGICAL(vandc, tcg_gen_andc_i64, 2, 17),
8890GEN_VX_LOGICAL(vor, tcg_gen_or_i64, 2, 18),
8891GEN_VX_LOGICAL(vxor, tcg_gen_xor_i64, 2, 19),
8892GEN_VX_LOGICAL(vnor, tcg_gen_nor_i64, 2, 20),
8893
8894#undef GEN_VXFORM
8895#define GEN_VXFORM(name, opc2, opc3) \
8896GEN_HANDLER(name, 0x04, opc2, opc3, 0x00000000, PPC_ALTIVEC)
8897GEN_VXFORM(vaddubm, 0, 0),
8898GEN_VXFORM(vadduhm, 0, 1),
8899GEN_VXFORM(vadduwm, 0, 2),
8900GEN_VXFORM(vsububm, 0, 16),
8901GEN_VXFORM(vsubuhm, 0, 17),
8902GEN_VXFORM(vsubuwm, 0, 18),
8903GEN_VXFORM(vmaxub, 1, 0),
8904GEN_VXFORM(vmaxuh, 1, 1),
8905GEN_VXFORM(vmaxuw, 1, 2),
8906GEN_VXFORM(vmaxsb, 1, 4),
8907GEN_VXFORM(vmaxsh, 1, 5),
8908GEN_VXFORM(vmaxsw, 1, 6),
8909GEN_VXFORM(vminub, 1, 8),
8910GEN_VXFORM(vminuh, 1, 9),
8911GEN_VXFORM(vminuw, 1, 10),
8912GEN_VXFORM(vminsb, 1, 12),
8913GEN_VXFORM(vminsh, 1, 13),
8914GEN_VXFORM(vminsw, 1, 14),
8915GEN_VXFORM(vavgub, 1, 16),
8916GEN_VXFORM(vavguh, 1, 17),
8917GEN_VXFORM(vavguw, 1, 18),
8918GEN_VXFORM(vavgsb, 1, 20),
8919GEN_VXFORM(vavgsh, 1, 21),
8920GEN_VXFORM(vavgsw, 1, 22),
8921GEN_VXFORM(vmrghb, 6, 0),
8922GEN_VXFORM(vmrghh, 6, 1),
8923GEN_VXFORM(vmrghw, 6, 2),
8924GEN_VXFORM(vmrglb, 6, 4),
8925GEN_VXFORM(vmrglh, 6, 5),
8926GEN_VXFORM(vmrglw, 6, 6),
8927GEN_VXFORM(vmuloub, 4, 0),
8928GEN_VXFORM(vmulouh, 4, 1),
8929GEN_VXFORM(vmulosb, 4, 4),
8930GEN_VXFORM(vmulosh, 4, 5),
8931GEN_VXFORM(vmuleub, 4, 8),
8932GEN_VXFORM(vmuleuh, 4, 9),
8933GEN_VXFORM(vmulesb, 4, 12),
8934GEN_VXFORM(vmulesh, 4, 13),
8935GEN_VXFORM(vslb, 2, 4),
8936GEN_VXFORM(vslh, 2, 5),
8937GEN_VXFORM(vslw, 2, 6),
8938GEN_VXFORM(vsrb, 2, 8),
8939GEN_VXFORM(vsrh, 2, 9),
8940GEN_VXFORM(vsrw, 2, 10),
8941GEN_VXFORM(vsrab, 2, 12),
8942GEN_VXFORM(vsrah, 2, 13),
8943GEN_VXFORM(vsraw, 2, 14),
8944GEN_VXFORM(vslo, 6, 16),
8945GEN_VXFORM(vsro, 6, 17),
8946GEN_VXFORM(vaddcuw, 0, 6),
8947GEN_VXFORM(vsubcuw, 0, 22),
8948GEN_VXFORM(vaddubs, 0, 8),
8949GEN_VXFORM(vadduhs, 0, 9),
8950GEN_VXFORM(vadduws, 0, 10),
8951GEN_VXFORM(vaddsbs, 0, 12),
8952GEN_VXFORM(vaddshs, 0, 13),
8953GEN_VXFORM(vaddsws, 0, 14),
8954GEN_VXFORM(vsububs, 0, 24),
8955GEN_VXFORM(vsubuhs, 0, 25),
8956GEN_VXFORM(vsubuws, 0, 26),
8957GEN_VXFORM(vsubsbs, 0, 28),
8958GEN_VXFORM(vsubshs, 0, 29),
8959GEN_VXFORM(vsubsws, 0, 30),
8960GEN_VXFORM(vrlb, 2, 0),
8961GEN_VXFORM(vrlh, 2, 1),
8962GEN_VXFORM(vrlw, 2, 2),
8963GEN_VXFORM(vsl, 2, 7),
8964GEN_VXFORM(vsr, 2, 11),
8965GEN_VXFORM(vpkuhum, 7, 0),
8966GEN_VXFORM(vpkuwum, 7, 1),
8967GEN_VXFORM(vpkuhus, 7, 2),
8968GEN_VXFORM(vpkuwus, 7, 3),
8969GEN_VXFORM(vpkshus, 7, 4),
8970GEN_VXFORM(vpkswus, 7, 5),
8971GEN_VXFORM(vpkshss, 7, 6),
8972GEN_VXFORM(vpkswss, 7, 7),
8973GEN_VXFORM(vpkpx, 7, 12),
8974GEN_VXFORM(vsum4ubs, 4, 24),
8975GEN_VXFORM(vsum4sbs, 4, 28),
8976GEN_VXFORM(vsum4shs, 4, 25),
8977GEN_VXFORM(vsum2sws, 4, 26),
8978GEN_VXFORM(vsumsws, 4, 30),
8979GEN_VXFORM(vaddfp, 5, 0),
8980GEN_VXFORM(vsubfp, 5, 1),
8981GEN_VXFORM(vmaxfp, 5, 16),
8982GEN_VXFORM(vminfp, 5, 17),
8983
8984#undef GEN_VXRFORM1
8985#undef GEN_VXRFORM
8986#define GEN_VXRFORM1(opname, name, str, opc2, opc3) \
8987 GEN_HANDLER2(name, str, 0x4, opc2, opc3, 0x00000000, PPC_ALTIVEC),
8988#define GEN_VXRFORM(name, opc2, opc3) \
8989 GEN_VXRFORM1(name, name, #name, opc2, opc3) \
8990 GEN_VXRFORM1(name##_dot, name##_, #name ".", opc2, (opc3 | (0x1 << 4)))
8991GEN_VXRFORM(vcmpequb, 3, 0)
8992GEN_VXRFORM(vcmpequh, 3, 1)
8993GEN_VXRFORM(vcmpequw, 3, 2)
8994GEN_VXRFORM(vcmpgtsb, 3, 12)
8995GEN_VXRFORM(vcmpgtsh, 3, 13)
8996GEN_VXRFORM(vcmpgtsw, 3, 14)
8997GEN_VXRFORM(vcmpgtub, 3, 8)
8998GEN_VXRFORM(vcmpgtuh, 3, 9)
8999GEN_VXRFORM(vcmpgtuw, 3, 10)
9000GEN_VXRFORM(vcmpeqfp, 3, 3)
9001GEN_VXRFORM(vcmpgefp, 3, 7)
9002GEN_VXRFORM(vcmpgtfp, 3, 11)
9003GEN_VXRFORM(vcmpbfp, 3, 15)
9004
9005#undef GEN_VXFORM_SIMM
9006#define GEN_VXFORM_SIMM(name, opc2, opc3) \
9007 GEN_HANDLER(name, 0x04, opc2, opc3, 0x00000000, PPC_ALTIVEC)
9008GEN_VXFORM_SIMM(vspltisb, 6, 12),
9009GEN_VXFORM_SIMM(vspltish, 6, 13),
9010GEN_VXFORM_SIMM(vspltisw, 6, 14),
9011
9012#undef GEN_VXFORM_NOA
9013#define GEN_VXFORM_NOA(name, opc2, opc3) \
9014 GEN_HANDLER(name, 0x04, opc2, opc3, 0x001f0000, PPC_ALTIVEC)
9015GEN_VXFORM_NOA(vupkhsb, 7, 8),
9016GEN_VXFORM_NOA(vupkhsh, 7, 9),
9017GEN_VXFORM_NOA(vupklsb, 7, 10),
9018GEN_VXFORM_NOA(vupklsh, 7, 11),
9019GEN_VXFORM_NOA(vupkhpx, 7, 13),
9020GEN_VXFORM_NOA(vupklpx, 7, 15),
9021GEN_VXFORM_NOA(vrefp, 5, 4),
9022GEN_VXFORM_NOA(vrsqrtefp, 5, 5),
0bffbc6c 9023GEN_VXFORM_NOA(vexptefp, 5, 6),
5c55ff99
BS
9024GEN_VXFORM_NOA(vlogefp, 5, 7),
9025GEN_VXFORM_NOA(vrfim, 5, 8),
9026GEN_VXFORM_NOA(vrfin, 5, 9),
9027GEN_VXFORM_NOA(vrfip, 5, 10),
9028GEN_VXFORM_NOA(vrfiz, 5, 11),
9029
9030#undef GEN_VXFORM_UIMM
9031#define GEN_VXFORM_UIMM(name, opc2, opc3) \
9032 GEN_HANDLER(name, 0x04, opc2, opc3, 0x00000000, PPC_ALTIVEC)
9033GEN_VXFORM_UIMM(vspltb, 6, 8),
9034GEN_VXFORM_UIMM(vsplth, 6, 9),
9035GEN_VXFORM_UIMM(vspltw, 6, 10),
9036GEN_VXFORM_UIMM(vcfux, 5, 12),
9037GEN_VXFORM_UIMM(vcfsx, 5, 13),
9038GEN_VXFORM_UIMM(vctuxs, 5, 14),
9039GEN_VXFORM_UIMM(vctsxs, 5, 15),
9040
9041#undef GEN_VAFORM_PAIRED
9042#define GEN_VAFORM_PAIRED(name0, name1, opc2) \
9043 GEN_HANDLER(name0##_##name1, 0x04, opc2, 0xFF, 0x00000000, PPC_ALTIVEC)
9044GEN_VAFORM_PAIRED(vmhaddshs, vmhraddshs, 16),
9045GEN_VAFORM_PAIRED(vmsumubm, vmsummbm, 18),
9046GEN_VAFORM_PAIRED(vmsumuhm, vmsumuhs, 19),
9047GEN_VAFORM_PAIRED(vmsumshm, vmsumshs, 20),
9048GEN_VAFORM_PAIRED(vsel, vperm, 21),
9049GEN_VAFORM_PAIRED(vmaddfp, vnmsubfp, 23),
9050
9051#undef GEN_SPE
9052#define GEN_SPE(name0, name1, opc2, opc3, inval, type) \
9053GEN_HANDLER(name0##_##name1, 0x04, opc2, opc3, inval, type)
9054GEN_SPE(evaddw, speundef, 0x00, 0x08, 0x00000000, PPC_SPE),
9055GEN_SPE(evaddiw, speundef, 0x01, 0x08, 0x00000000, PPC_SPE),
9056GEN_SPE(evsubfw, speundef, 0x02, 0x08, 0x00000000, PPC_SPE),
9057GEN_SPE(evsubifw, speundef, 0x03, 0x08, 0x00000000, PPC_SPE),
9058GEN_SPE(evabs, evneg, 0x04, 0x08, 0x0000F800, PPC_SPE),
9059GEN_SPE(evextsb, evextsh, 0x05, 0x08, 0x0000F800, PPC_SPE),
9060GEN_SPE(evrndw, evcntlzw, 0x06, 0x08, 0x0000F800, PPC_SPE),
9061GEN_SPE(evcntlsw, brinc, 0x07, 0x08, 0x00000000, PPC_SPE),
a0e13900 9062GEN_SPE(evmra, speundef, 0x02, 0x13, 0x0000F800, PPC_SPE),
5c55ff99
BS
9063GEN_SPE(speundef, evand, 0x08, 0x08, 0x00000000, PPC_SPE),
9064GEN_SPE(evandc, speundef, 0x09, 0x08, 0x00000000, PPC_SPE),
9065GEN_SPE(evxor, evor, 0x0B, 0x08, 0x00000000, PPC_SPE),
9066GEN_SPE(evnor, eveqv, 0x0C, 0x08, 0x00000000, PPC_SPE),
a0e13900
FC
9067GEN_SPE(evmwumi, evmwsmi, 0x0C, 0x11, 0x00000000, PPC_SPE),
9068GEN_SPE(evmwumia, evmwsmia, 0x1C, 0x11, 0x00000000, PPC_SPE),
9069GEN_SPE(evmwumiaa, evmwsmiaa, 0x0C, 0x15, 0x00000000, PPC_SPE),
5c55ff99
BS
9070GEN_SPE(speundef, evorc, 0x0D, 0x08, 0x00000000, PPC_SPE),
9071GEN_SPE(evnand, speundef, 0x0F, 0x08, 0x00000000, PPC_SPE),
9072GEN_SPE(evsrwu, evsrws, 0x10, 0x08, 0x00000000, PPC_SPE),
9073GEN_SPE(evsrwiu, evsrwis, 0x11, 0x08, 0x00000000, PPC_SPE),
9074GEN_SPE(evslw, speundef, 0x12, 0x08, 0x00000000, PPC_SPE),
9075GEN_SPE(evslwi, speundef, 0x13, 0x08, 0x00000000, PPC_SPE),
9076GEN_SPE(evrlw, evsplati, 0x14, 0x08, 0x00000000, PPC_SPE),
9077GEN_SPE(evrlwi, evsplatfi, 0x15, 0x08, 0x00000000, PPC_SPE),
9078GEN_SPE(evmergehi, evmergelo, 0x16, 0x08, 0x00000000, PPC_SPE),
9079GEN_SPE(evmergehilo, evmergelohi, 0x17, 0x08, 0x00000000, PPC_SPE),
9080GEN_SPE(evcmpgtu, evcmpgts, 0x18, 0x08, 0x00600000, PPC_SPE),
9081GEN_SPE(evcmpltu, evcmplts, 0x19, 0x08, 0x00600000, PPC_SPE),
9082GEN_SPE(evcmpeq, speundef, 0x1A, 0x08, 0x00600000, PPC_SPE),
9083
9084GEN_SPE(evfsadd, evfssub, 0x00, 0x0A, 0x00000000, PPC_SPE_SINGLE),
9085GEN_SPE(evfsabs, evfsnabs, 0x02, 0x0A, 0x0000F800, PPC_SPE_SINGLE),
9086GEN_SPE(evfsneg, speundef, 0x03, 0x0A, 0x0000F800, PPC_SPE_SINGLE),
9087GEN_SPE(evfsmul, evfsdiv, 0x04, 0x0A, 0x00000000, PPC_SPE_SINGLE),
9088GEN_SPE(evfscmpgt, evfscmplt, 0x06, 0x0A, 0x00600000, PPC_SPE_SINGLE),
9089GEN_SPE(evfscmpeq, speundef, 0x07, 0x0A, 0x00600000, PPC_SPE_SINGLE),
9090GEN_SPE(evfscfui, evfscfsi, 0x08, 0x0A, 0x00180000, PPC_SPE_SINGLE),
9091GEN_SPE(evfscfuf, evfscfsf, 0x09, 0x0A, 0x00180000, PPC_SPE_SINGLE),
9092GEN_SPE(evfsctui, evfsctsi, 0x0A, 0x0A, 0x00180000, PPC_SPE_SINGLE),
9093GEN_SPE(evfsctuf, evfsctsf, 0x0B, 0x0A, 0x00180000, PPC_SPE_SINGLE),
9094GEN_SPE(evfsctuiz, speundef, 0x0C, 0x0A, 0x00180000, PPC_SPE_SINGLE),
9095GEN_SPE(evfsctsiz, speundef, 0x0D, 0x0A, 0x00180000, PPC_SPE_SINGLE),
9096GEN_SPE(evfststgt, evfststlt, 0x0E, 0x0A, 0x00600000, PPC_SPE_SINGLE),
9097GEN_SPE(evfststeq, speundef, 0x0F, 0x0A, 0x00600000, PPC_SPE_SINGLE),
9098
9099GEN_SPE(efsadd, efssub, 0x00, 0x0B, 0x00000000, PPC_SPE_SINGLE),
9100GEN_SPE(efsabs, efsnabs, 0x02, 0x0B, 0x0000F800, PPC_SPE_SINGLE),
9101GEN_SPE(efsneg, speundef, 0x03, 0x0B, 0x0000F800, PPC_SPE_SINGLE),
9102GEN_SPE(efsmul, efsdiv, 0x04, 0x0B, 0x00000000, PPC_SPE_SINGLE),
9103GEN_SPE(efscmpgt, efscmplt, 0x06, 0x0B, 0x00600000, PPC_SPE_SINGLE),
9104GEN_SPE(efscmpeq, efscfd, 0x07, 0x0B, 0x00600000, PPC_SPE_SINGLE),
9105GEN_SPE(efscfui, efscfsi, 0x08, 0x0B, 0x00180000, PPC_SPE_SINGLE),
9106GEN_SPE(efscfuf, efscfsf, 0x09, 0x0B, 0x00180000, PPC_SPE_SINGLE),
9107GEN_SPE(efsctui, efsctsi, 0x0A, 0x0B, 0x00180000, PPC_SPE_SINGLE),
9108GEN_SPE(efsctuf, efsctsf, 0x0B, 0x0B, 0x00180000, PPC_SPE_SINGLE),
9109GEN_SPE(efsctuiz, speundef, 0x0C, 0x0B, 0x00180000, PPC_SPE_SINGLE),
9110GEN_SPE(efsctsiz, speundef, 0x0D, 0x0B, 0x00180000, PPC_SPE_SINGLE),
9111GEN_SPE(efststgt, efststlt, 0x0E, 0x0B, 0x00600000, PPC_SPE_SINGLE),
9112GEN_SPE(efststeq, speundef, 0x0F, 0x0B, 0x00600000, PPC_SPE_SINGLE),
9113
9114GEN_SPE(efdadd, efdsub, 0x10, 0x0B, 0x00000000, PPC_SPE_DOUBLE),
9115GEN_SPE(efdcfuid, efdcfsid, 0x11, 0x0B, 0x00180000, PPC_SPE_DOUBLE),
9116GEN_SPE(efdabs, efdnabs, 0x12, 0x0B, 0x0000F800, PPC_SPE_DOUBLE),
9117GEN_SPE(efdneg, speundef, 0x13, 0x0B, 0x0000F800, PPC_SPE_DOUBLE),
9118GEN_SPE(efdmul, efddiv, 0x14, 0x0B, 0x00000000, PPC_SPE_DOUBLE),
9119GEN_SPE(efdctuidz, efdctsidz, 0x15, 0x0B, 0x00180000, PPC_SPE_DOUBLE),
9120GEN_SPE(efdcmpgt, efdcmplt, 0x16, 0x0B, 0x00600000, PPC_SPE_DOUBLE),
9121GEN_SPE(efdcmpeq, efdcfs, 0x17, 0x0B, 0x00600000, PPC_SPE_DOUBLE),
9122GEN_SPE(efdcfui, efdcfsi, 0x18, 0x0B, 0x00180000, PPC_SPE_DOUBLE),
9123GEN_SPE(efdcfuf, efdcfsf, 0x19, 0x0B, 0x00180000, PPC_SPE_DOUBLE),
9124GEN_SPE(efdctui, efdctsi, 0x1A, 0x0B, 0x00180000, PPC_SPE_DOUBLE),
9125GEN_SPE(efdctuf, efdctsf, 0x1B, 0x0B, 0x00180000, PPC_SPE_DOUBLE),
9126GEN_SPE(efdctuiz, speundef, 0x1C, 0x0B, 0x00180000, PPC_SPE_DOUBLE),
9127GEN_SPE(efdctsiz, speundef, 0x1D, 0x0B, 0x00180000, PPC_SPE_DOUBLE),
9128GEN_SPE(efdtstgt, efdtstlt, 0x1E, 0x0B, 0x00600000, PPC_SPE_DOUBLE),
9129GEN_SPE(efdtsteq, speundef, 0x1F, 0x0B, 0x00600000, PPC_SPE_DOUBLE),
9130
9131#undef GEN_SPEOP_LDST
9132#define GEN_SPEOP_LDST(name, opc2, sh) \
9133GEN_HANDLER(name, 0x04, opc2, 0x0C, 0x00000000, PPC_SPE)
9134GEN_SPEOP_LDST(evldd, 0x00, 3),
9135GEN_SPEOP_LDST(evldw, 0x01, 3),
9136GEN_SPEOP_LDST(evldh, 0x02, 3),
9137GEN_SPEOP_LDST(evlhhesplat, 0x04, 1),
9138GEN_SPEOP_LDST(evlhhousplat, 0x06, 1),
9139GEN_SPEOP_LDST(evlhhossplat, 0x07, 1),
9140GEN_SPEOP_LDST(evlwhe, 0x08, 2),
9141GEN_SPEOP_LDST(evlwhou, 0x0A, 2),
9142GEN_SPEOP_LDST(evlwhos, 0x0B, 2),
9143GEN_SPEOP_LDST(evlwwsplat, 0x0C, 2),
9144GEN_SPEOP_LDST(evlwhsplat, 0x0E, 2),
9145
9146GEN_SPEOP_LDST(evstdd, 0x10, 3),
9147GEN_SPEOP_LDST(evstdw, 0x11, 3),
9148GEN_SPEOP_LDST(evstdh, 0x12, 3),
9149GEN_SPEOP_LDST(evstwhe, 0x18, 2),
9150GEN_SPEOP_LDST(evstwho, 0x1A, 2),
9151GEN_SPEOP_LDST(evstwwe, 0x1C, 2),
9152GEN_SPEOP_LDST(evstwwo, 0x1E, 2),
9153};
9154
3fc6c082 9155#include "translate_init.c"
0411a972 9156#include "helper_regs.h"
79aceca5 9157
9a64fbe4 9158/*****************************************************************************/
3fc6c082 9159/* Misc PowerPC helpers */
9a78eead 9160void cpu_dump_state (CPUState *env, FILE *f, fprintf_function cpu_fprintf,
36081602 9161 int flags)
79aceca5 9162{
3fc6c082
FB
9163#define RGPL 4
9164#define RFPL 4
3fc6c082 9165
79aceca5
FB
9166 int i;
9167
90e189ec 9168 cpu_fprintf(f, "NIP " TARGET_FMT_lx " LR " TARGET_FMT_lx " CTR "
9a78eead
SW
9169 TARGET_FMT_lx " XER " TARGET_FMT_lx "\n",
9170 env->nip, env->lr, env->ctr, env->xer);
90e189ec
BS
9171 cpu_fprintf(f, "MSR " TARGET_FMT_lx " HID0 " TARGET_FMT_lx " HF "
9172 TARGET_FMT_lx " idx %d\n", env->msr, env->spr[SPR_HID0],
9173 env->hflags, env->mmu_idx);
d9bce9d9 9174#if !defined(NO_TIMER_DUMP)
9a78eead 9175 cpu_fprintf(f, "TB %08" PRIu32 " %08" PRIu64
76a66253 9176#if !defined(CONFIG_USER_ONLY)
9a78eead 9177 " DECR %08" PRIu32
76a66253
JM
9178#endif
9179 "\n",
077fc206 9180 cpu_ppc_load_tbu(env), cpu_ppc_load_tbl(env)
76a66253
JM
9181#if !defined(CONFIG_USER_ONLY)
9182 , cpu_ppc_load_decr(env)
9183#endif
9184 );
077fc206 9185#endif
76a66253 9186 for (i = 0; i < 32; i++) {
3fc6c082
FB
9187 if ((i & (RGPL - 1)) == 0)
9188 cpu_fprintf(f, "GPR%02d", i);
b11ebf64 9189 cpu_fprintf(f, " %016" PRIx64, ppc_dump_gpr(env, i));
3fc6c082 9190 if ((i & (RGPL - 1)) == (RGPL - 1))
7fe48483 9191 cpu_fprintf(f, "\n");
76a66253 9192 }
3fc6c082 9193 cpu_fprintf(f, "CR ");
76a66253 9194 for (i = 0; i < 8; i++)
7fe48483
FB
9195 cpu_fprintf(f, "%01x", env->crf[i]);
9196 cpu_fprintf(f, " [");
76a66253
JM
9197 for (i = 0; i < 8; i++) {
9198 char a = '-';
9199 if (env->crf[i] & 0x08)
9200 a = 'L';
9201 else if (env->crf[i] & 0x04)
9202 a = 'G';
9203 else if (env->crf[i] & 0x02)
9204 a = 'E';
7fe48483 9205 cpu_fprintf(f, " %c%c", a, env->crf[i] & 0x01 ? 'O' : ' ');
76a66253 9206 }
90e189ec
BS
9207 cpu_fprintf(f, " ] RES " TARGET_FMT_lx "\n",
9208 env->reserve_addr);
3fc6c082
FB
9209 for (i = 0; i < 32; i++) {
9210 if ((i & (RFPL - 1)) == 0)
9211 cpu_fprintf(f, "FPR%02d", i);
26a76461 9212 cpu_fprintf(f, " %016" PRIx64, *((uint64_t *)&env->fpr[i]));
3fc6c082 9213 if ((i & (RFPL - 1)) == (RFPL - 1))
7fe48483 9214 cpu_fprintf(f, "\n");
79aceca5 9215 }
7889270a 9216 cpu_fprintf(f, "FPSCR %08x\n", env->fpscr);
f2e63a42 9217#if !defined(CONFIG_USER_ONLY)
90dc8812
SW
9218 cpu_fprintf(f, " SRR0 " TARGET_FMT_lx " SRR1 " TARGET_FMT_lx
9219 " PVR " TARGET_FMT_lx " VRSAVE " TARGET_FMT_lx "\n",
9220 env->spr[SPR_SRR0], env->spr[SPR_SRR1],
9221 env->spr[SPR_PVR], env->spr[SPR_VRSAVE]);
9222
9223 cpu_fprintf(f, "SPRG0 " TARGET_FMT_lx " SPRG1 " TARGET_FMT_lx
9224 " SPRG2 " TARGET_FMT_lx " SPRG3 " TARGET_FMT_lx "\n",
9225 env->spr[SPR_SPRG0], env->spr[SPR_SPRG1],
9226 env->spr[SPR_SPRG2], env->spr[SPR_SPRG3]);
9227
9228 cpu_fprintf(f, "SPRG4 " TARGET_FMT_lx " SPRG5 " TARGET_FMT_lx
9229 " SPRG6 " TARGET_FMT_lx " SPRG7 " TARGET_FMT_lx "\n",
9230 env->spr[SPR_SPRG4], env->spr[SPR_SPRG5],
9231 env->spr[SPR_SPRG6], env->spr[SPR_SPRG7]);
9232
9233 if (env->excp_model == POWERPC_EXCP_BOOKE) {
9234 cpu_fprintf(f, "CSRR0 " TARGET_FMT_lx " CSRR1 " TARGET_FMT_lx
9235 " MCSRR0 " TARGET_FMT_lx " MCSRR1 " TARGET_FMT_lx "\n",
9236 env->spr[SPR_BOOKE_CSRR0], env->spr[SPR_BOOKE_CSRR1],
9237 env->spr[SPR_BOOKE_MCSRR0], env->spr[SPR_BOOKE_MCSRR1]);
9238
9239 cpu_fprintf(f, " TCR " TARGET_FMT_lx " TSR " TARGET_FMT_lx
9240 " ESR " TARGET_FMT_lx " DEAR " TARGET_FMT_lx "\n",
9241 env->spr[SPR_BOOKE_TCR], env->spr[SPR_BOOKE_TSR],
9242 env->spr[SPR_BOOKE_ESR], env->spr[SPR_BOOKE_DEAR]);
9243
9244 cpu_fprintf(f, " PIR " TARGET_FMT_lx " DECAR " TARGET_FMT_lx
9245 " IVPR " TARGET_FMT_lx " EPCR " TARGET_FMT_lx "\n",
9246 env->spr[SPR_BOOKE_PIR], env->spr[SPR_BOOKE_DECAR],
9247 env->spr[SPR_BOOKE_IVPR], env->spr[SPR_BOOKE_EPCR]);
9248
9249 cpu_fprintf(f, " MCSR " TARGET_FMT_lx " SPRG8 " TARGET_FMT_lx
9250 " EPR " TARGET_FMT_lx "\n",
9251 env->spr[SPR_BOOKE_MCSR], env->spr[SPR_BOOKE_SPRG8],
9252 env->spr[SPR_BOOKE_EPR]);
9253
9254 /* FSL-specific */
9255 cpu_fprintf(f, " MCAR " TARGET_FMT_lx " PID1 " TARGET_FMT_lx
9256 " PID2 " TARGET_FMT_lx " SVR " TARGET_FMT_lx "\n",
9257 env->spr[SPR_Exxx_MCAR], env->spr[SPR_BOOKE_PID1],
9258 env->spr[SPR_BOOKE_PID2], env->spr[SPR_E500_SVR]);
9259
9260 /*
9261 * IVORs are left out as they are large and do not change often --
9262 * they can be read with "p $ivor0", "p $ivor1", etc.
9263 */
9264 }
9265
9266 switch (env->mmu_model) {
9267 case POWERPC_MMU_32B:
9268 case POWERPC_MMU_601:
9269 case POWERPC_MMU_SOFT_6xx:
9270 case POWERPC_MMU_SOFT_74xx:
9271#if defined(TARGET_PPC64)
9272 case POWERPC_MMU_620:
9273 case POWERPC_MMU_64B:
9274#endif
9275 cpu_fprintf(f, " SDR1 " TARGET_FMT_lx "\n", env->spr[SPR_SDR1]);
9276 break;
01662f3e 9277 case POWERPC_MMU_BOOKE206:
90dc8812
SW
9278 cpu_fprintf(f, " MAS0 " TARGET_FMT_lx " MAS1 " TARGET_FMT_lx
9279 " MAS2 " TARGET_FMT_lx " MAS3 " TARGET_FMT_lx "\n",
9280 env->spr[SPR_BOOKE_MAS0], env->spr[SPR_BOOKE_MAS1],
9281 env->spr[SPR_BOOKE_MAS2], env->spr[SPR_BOOKE_MAS3]);
9282
9283 cpu_fprintf(f, " MAS4 " TARGET_FMT_lx " MAS6 " TARGET_FMT_lx
9284 " MAS7 " TARGET_FMT_lx " PID " TARGET_FMT_lx "\n",
9285 env->spr[SPR_BOOKE_MAS4], env->spr[SPR_BOOKE_MAS6],
9286 env->spr[SPR_BOOKE_MAS7], env->spr[SPR_BOOKE_PID]);
9287
9288 cpu_fprintf(f, "MMUCFG " TARGET_FMT_lx " TLB0CFG " TARGET_FMT_lx
9289 " TLB1CFG " TARGET_FMT_lx "\n",
9290 env->spr[SPR_MMUCFG], env->spr[SPR_BOOKE_TLB0CFG],
9291 env->spr[SPR_BOOKE_TLB1CFG]);
9292 break;
9293 default:
9294 break;
9295 }
f2e63a42 9296#endif
79aceca5 9297
3fc6c082
FB
9298#undef RGPL
9299#undef RFPL
79aceca5
FB
9300}
9301
9a78eead 9302void cpu_dump_statistics (CPUState *env, FILE*f, fprintf_function cpu_fprintf,
76a66253
JM
9303 int flags)
9304{
9305#if defined(DO_PPC_STATISTICS)
c227f099 9306 opc_handler_t **t1, **t2, **t3, *handler;
76a66253
JM
9307 int op1, op2, op3;
9308
9309 t1 = env->opcodes;
9310 for (op1 = 0; op1 < 64; op1++) {
9311 handler = t1[op1];
9312 if (is_indirect_opcode(handler)) {
9313 t2 = ind_table(handler);
9314 for (op2 = 0; op2 < 32; op2++) {
9315 handler = t2[op2];
9316 if (is_indirect_opcode(handler)) {
9317 t3 = ind_table(handler);
9318 for (op3 = 0; op3 < 32; op3++) {
9319 handler = t3[op3];
9320 if (handler->count == 0)
9321 continue;
9322 cpu_fprintf(f, "%02x %02x %02x (%02x %04d) %16s: "
0bfcd599 9323 "%016" PRIx64 " %" PRId64 "\n",
76a66253
JM
9324 op1, op2, op3, op1, (op3 << 5) | op2,
9325 handler->oname,
9326 handler->count, handler->count);
9327 }
9328 } else {
9329 if (handler->count == 0)
9330 continue;
9331 cpu_fprintf(f, "%02x %02x (%02x %04d) %16s: "
0bfcd599 9332 "%016" PRIx64 " %" PRId64 "\n",
76a66253
JM
9333 op1, op2, op1, op2, handler->oname,
9334 handler->count, handler->count);
9335 }
9336 }
9337 } else {
9338 if (handler->count == 0)
9339 continue;
0bfcd599
BS
9340 cpu_fprintf(f, "%02x (%02x ) %16s: %016" PRIx64
9341 " %" PRId64 "\n",
76a66253
JM
9342 op1, op1, handler->oname,
9343 handler->count, handler->count);
9344 }
9345 }
9346#endif
9347}
9348
9a64fbe4 9349/*****************************************************************************/
636aa200
BS
9350static inline void gen_intermediate_code_internal(CPUState *env,
9351 TranslationBlock *tb,
9352 int search_pc)
79aceca5 9353{
9fddaa0c 9354 DisasContext ctx, *ctxp = &ctx;
c227f099 9355 opc_handler_t **table, *handler;
0fa85d43 9356 target_ulong pc_start;
79aceca5 9357 uint16_t *gen_opc_end;
a1d1bb31 9358 CPUBreakpoint *bp;
79aceca5 9359 int j, lj = -1;
2e70f6ef
PB
9360 int num_insns;
9361 int max_insns;
79aceca5
FB
9362
9363 pc_start = tb->pc;
79aceca5 9364 gen_opc_end = gen_opc_buf + OPC_MAX_SIZE;
046d6672 9365 ctx.nip = pc_start;
79aceca5 9366 ctx.tb = tb;
e1833e1f 9367 ctx.exception = POWERPC_EXCP_NONE;
3fc6c082 9368 ctx.spr_cb = env->spr_cb;
76db3ba4
AJ
9369 ctx.mem_idx = env->mmu_idx;
9370 ctx.access_type = -1;
9371 ctx.le_mode = env->hflags & (1 << MSR_LE) ? 1 : 0;
d9bce9d9
JM
9372#if defined(TARGET_PPC64)
9373 ctx.sf_mode = msr_sf;
9a64fbe4 9374#endif
3cc62370 9375 ctx.fpu_enabled = msr_fp;
a9d9eb8f 9376 if ((env->flags & POWERPC_FLAG_SPE) && msr_spe)
d26bfc9a
JM
9377 ctx.spe_enabled = msr_spe;
9378 else
9379 ctx.spe_enabled = 0;
a9d9eb8f
JM
9380 if ((env->flags & POWERPC_FLAG_VRE) && msr_vr)
9381 ctx.altivec_enabled = msr_vr;
9382 else
9383 ctx.altivec_enabled = 0;
d26bfc9a 9384 if ((env->flags & POWERPC_FLAG_SE) && msr_se)
8cbcb4fa 9385 ctx.singlestep_enabled = CPU_SINGLE_STEP;
d26bfc9a 9386 else
8cbcb4fa 9387 ctx.singlestep_enabled = 0;
d26bfc9a 9388 if ((env->flags & POWERPC_FLAG_BE) && msr_be)
8cbcb4fa
AJ
9389 ctx.singlestep_enabled |= CPU_BRANCH_STEP;
9390 if (unlikely(env->singlestep_enabled))
9391 ctx.singlestep_enabled |= GDBSTUB_SINGLE_STEP;
3fc6c082 9392#if defined (DO_SINGLE_STEP) && 0
9a64fbe4
FB
9393 /* Single step trace mode */
9394 msr_se = 1;
9395#endif
2e70f6ef
PB
9396 num_insns = 0;
9397 max_insns = tb->cflags & CF_COUNT_MASK;
9398 if (max_insns == 0)
9399 max_insns = CF_COUNT_MASK;
9400
9401 gen_icount_start();
9a64fbe4 9402 /* Set env in case of segfault during code fetch */
e1833e1f 9403 while (ctx.exception == POWERPC_EXCP_NONE && gen_opc_ptr < gen_opc_end) {
72cf2d4f
BS
9404 if (unlikely(!QTAILQ_EMPTY(&env->breakpoints))) {
9405 QTAILQ_FOREACH(bp, &env->breakpoints, entry) {
a1d1bb31 9406 if (bp->pc == ctx.nip) {
e06fcd75 9407 gen_debug_exception(ctxp);
ea4e754f
FB
9408 break;
9409 }
9410 }
9411 }
76a66253 9412 if (unlikely(search_pc)) {
79aceca5
FB
9413 j = gen_opc_ptr - gen_opc_buf;
9414 if (lj < j) {
9415 lj++;
9416 while (lj < j)
9417 gen_opc_instr_start[lj++] = 0;
79aceca5 9418 }
af4b6c54
AJ
9419 gen_opc_pc[lj] = ctx.nip;
9420 gen_opc_instr_start[lj] = 1;
9421 gen_opc_icount[lj] = num_insns;
79aceca5 9422 }
d12d51d5 9423 LOG_DISAS("----------------\n");
90e189ec 9424 LOG_DISAS("nip=" TARGET_FMT_lx " super=%d ir=%d\n",
d12d51d5 9425 ctx.nip, ctx.mem_idx, (int)msr_ir);
2e70f6ef
PB
9426 if (num_insns + 1 == max_insns && (tb->cflags & CF_LAST_IO))
9427 gen_io_start();
76db3ba4 9428 if (unlikely(ctx.le_mode)) {
056401ea
JM
9429 ctx.opcode = bswap32(ldl_code(ctx.nip));
9430 } else {
9431 ctx.opcode = ldl_code(ctx.nip);
111bfab3 9432 }
d12d51d5 9433 LOG_DISAS("translate opcode %08x (%02x %02x %02x) (%s)\n",
9a64fbe4 9434 ctx.opcode, opc1(ctx.opcode), opc2(ctx.opcode),
056401ea 9435 opc3(ctx.opcode), little_endian ? "little" : "big");
731c54f8
AJ
9436 if (unlikely(qemu_loglevel_mask(CPU_LOG_TB_OP)))
9437 tcg_gen_debug_insn_start(ctx.nip);
046d6672 9438 ctx.nip += 4;
3fc6c082 9439 table = env->opcodes;
2e70f6ef 9440 num_insns++;
79aceca5
FB
9441 handler = table[opc1(ctx.opcode)];
9442 if (is_indirect_opcode(handler)) {
9443 table = ind_table(handler);
9444 handler = table[opc2(ctx.opcode)];
9445 if (is_indirect_opcode(handler)) {
9446 table = ind_table(handler);
9447 handler = table[opc3(ctx.opcode)];
9448 }
9449 }
9450 /* Is opcode *REALLY* valid ? */
76a66253 9451 if (unlikely(handler->handler == &gen_invalid)) {
93fcfe39
AL
9452 if (qemu_log_enabled()) {
9453 qemu_log("invalid/unsupported opcode: "
90e189ec
BS
9454 "%02x - %02x - %02x (%08x) " TARGET_FMT_lx " %d\n",
9455 opc1(ctx.opcode), opc2(ctx.opcode),
9456 opc3(ctx.opcode), ctx.opcode, ctx.nip - 4, (int)msr_ir);
4b3686fa 9457 }
76a66253
JM
9458 } else {
9459 if (unlikely((ctx.opcode & handler->inval) != 0)) {
93fcfe39
AL
9460 if (qemu_log_enabled()) {
9461 qemu_log("invalid bits: %08x for opcode: "
90e189ec
BS
9462 "%02x - %02x - %02x (%08x) " TARGET_FMT_lx "\n",
9463 ctx.opcode & handler->inval, opc1(ctx.opcode),
9464 opc2(ctx.opcode), opc3(ctx.opcode),
9465 ctx.opcode, ctx.nip - 4);
76a66253 9466 }
e06fcd75 9467 gen_inval_exception(ctxp, POWERPC_EXCP_INVAL_INVAL);
4b3686fa 9468 break;
79aceca5 9469 }
79aceca5 9470 }
4b3686fa 9471 (*(handler->handler))(&ctx);
76a66253
JM
9472#if defined(DO_PPC_STATISTICS)
9473 handler->count++;
9474#endif
9a64fbe4 9475 /* Check trace mode exceptions */
8cbcb4fa
AJ
9476 if (unlikely(ctx.singlestep_enabled & CPU_SINGLE_STEP &&
9477 (ctx.nip <= 0x100 || ctx.nip > 0xF00) &&
9478 ctx.exception != POWERPC_SYSCALL &&
9479 ctx.exception != POWERPC_EXCP_TRAP &&
9480 ctx.exception != POWERPC_EXCP_BRANCH)) {
e06fcd75 9481 gen_exception(ctxp, POWERPC_EXCP_TRACE);
d26bfc9a 9482 } else if (unlikely(((ctx.nip & (TARGET_PAGE_SIZE - 1)) == 0) ||
2e70f6ef 9483 (env->singlestep_enabled) ||
1b530a6d 9484 singlestep ||
2e70f6ef 9485 num_insns >= max_insns)) {
d26bfc9a
JM
9486 /* if we reach a page boundary or are single stepping, stop
9487 * generation
9488 */
8dd4983c 9489 break;
76a66253 9490 }
3fc6c082 9491 }
2e70f6ef
PB
9492 if (tb->cflags & CF_LAST_IO)
9493 gen_io_end();
e1833e1f 9494 if (ctx.exception == POWERPC_EXCP_NONE) {
c1942362 9495 gen_goto_tb(&ctx, 0, ctx.nip);
e1833e1f 9496 } else if (ctx.exception != POWERPC_EXCP_BRANCH) {
8cbcb4fa 9497 if (unlikely(env->singlestep_enabled)) {
e06fcd75 9498 gen_debug_exception(ctxp);
8cbcb4fa 9499 }
76a66253 9500 /* Generate the return instruction */
57fec1fe 9501 tcg_gen_exit_tb(0);
9a64fbe4 9502 }
2e70f6ef 9503 gen_icount_end(tb, num_insns);
79aceca5 9504 *gen_opc_ptr = INDEX_op_end;
76a66253 9505 if (unlikely(search_pc)) {
9a64fbe4
FB
9506 j = gen_opc_ptr - gen_opc_buf;
9507 lj++;
9508 while (lj <= j)
9509 gen_opc_instr_start[lj++] = 0;
9a64fbe4 9510 } else {
046d6672 9511 tb->size = ctx.nip - pc_start;
2e70f6ef 9512 tb->icount = num_insns;
9a64fbe4 9513 }
d9bce9d9 9514#if defined(DEBUG_DISAS)
8fec2b8c 9515 if (qemu_loglevel_mask(CPU_LOG_TB_IN_ASM)) {
76a66253 9516 int flags;
237c0af0 9517 flags = env->bfd_mach;
76db3ba4 9518 flags |= ctx.le_mode << 16;
93fcfe39
AL
9519 qemu_log("IN: %s\n", lookup_symbol(pc_start));
9520 log_target_disas(pc_start, ctx.nip - pc_start, flags);
9521 qemu_log("\n");
9fddaa0c 9522 }
79aceca5 9523#endif
79aceca5
FB
9524}
9525
2cfc5f17 9526void gen_intermediate_code (CPUState *env, struct TranslationBlock *tb)
79aceca5 9527{
2cfc5f17 9528 gen_intermediate_code_internal(env, tb, 0);
79aceca5
FB
9529}
9530
2cfc5f17 9531void gen_intermediate_code_pc (CPUState *env, struct TranslationBlock *tb)
79aceca5 9532{
2cfc5f17 9533 gen_intermediate_code_internal(env, tb, 1);
79aceca5 9534}
d2856f1a 9535
e87b7cb0 9536void restore_state_to_opc(CPUState *env, TranslationBlock *tb, int pc_pos)
d2856f1a 9537{
d2856f1a 9538 env->nip = gen_opc_pc[pc_pos];
d2856f1a 9539}