]> git.proxmox.com Git - qemu.git/blame - target-ppc/translate.c
target-ppc: convert rotation instructions to TCG
[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
79aceca5
FB
5 *
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2 of the License, or (at your option) any later version.
10 *
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
15 *
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
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"
c6a1c22b 27#include "exec-all.h"
79aceca5 28#include "disas.h"
f10dc08e 29#include "helper.h"
57fec1fe 30#include "tcg-op.h"
ca10f867 31#include "qemu-common.h"
79aceca5 32
8cbcb4fa
AJ
33#define CPU_SINGLE_STEP 0x1
34#define CPU_BRANCH_STEP 0x2
35#define GDBSTUB_SINGLE_STEP 0x4
36
a750fc0b 37/* Include definitions for instructions classes and implementations flags */
79aceca5 38//#define DO_SINGLE_STEP
9fddaa0c 39//#define PPC_DEBUG_DISAS
76a66253 40//#define DO_PPC_STATISTICS
7c58044c 41//#define OPTIMIZE_FPRF_UPDATE
79aceca5 42
a750fc0b
JM
43/*****************************************************************************/
44/* Code translation helpers */
c53be334 45
f78fb44e
AJ
46/* global register indexes */
47static TCGv cpu_env;
1d542695 48static char cpu_reg_names[10*3 + 22*4 /* GPR */
f78fb44e 49#if !defined(TARGET_PPC64)
1d542695 50 + 10*4 + 22*5 /* SPE GPRh */
f78fb44e 51#endif
a5e26afa 52 + 10*4 + 22*5 /* FPR */
47e4661c
AJ
53 + 2*(10*6 + 22*7) /* AVRh, AVRl */
54 + 8*5 /* CRF */];
f78fb44e
AJ
55static TCGv cpu_gpr[32];
56#if !defined(TARGET_PPC64)
57static TCGv cpu_gprh[32];
58#endif
a5e26afa 59static TCGv cpu_fpr[32];
1d542695 60static TCGv cpu_avrh[32], cpu_avrl[32];
47e4661c 61static TCGv cpu_crf[8];
bd568f18 62static TCGv cpu_nip;
cfdcd37a
AJ
63static TCGv cpu_ctr;
64static TCGv cpu_lr;
3d7b417e 65static TCGv cpu_xer;
e1571908 66static TCGv cpu_fpscr;
f78fb44e
AJ
67
68/* dyngen register indexes */
69static TCGv cpu_T[3];
70#if defined(TARGET_PPC64)
71#define cpu_T64 cpu_T
72#else
73static TCGv cpu_T64[3];
74#endif
a5e26afa 75static TCGv cpu_FT[3];
1d542695 76static TCGv cpu_AVRh[3], cpu_AVRl[3];
2e70f6ef
PB
77
78#include "gen-icount.h"
79
80void ppc_translate_init(void)
81{
f78fb44e
AJ
82 int i;
83 char* p;
b2437bf2 84 static int done_init = 0;
f78fb44e 85
2e70f6ef
PB
86 if (done_init)
87 return;
f78fb44e 88
2e70f6ef 89 cpu_env = tcg_global_reg_new(TCG_TYPE_PTR, TCG_AREG0, "env");
1c73fe5b
AJ
90#if TARGET_LONG_BITS > HOST_LONG_BITS
91 cpu_T[0] = tcg_global_mem_new(TCG_TYPE_TL,
92 TCG_AREG0, offsetof(CPUState, t0), "T0");
93 cpu_T[1] = tcg_global_mem_new(TCG_TYPE_TL,
94 TCG_AREG0, offsetof(CPUState, t1), "T1");
95 cpu_T[2] = tcg_global_mem_new(TCG_TYPE_TL,
96 TCG_AREG0, offsetof(CPUState, t2), "T2");
97#else
98 cpu_T[0] = tcg_global_reg_new(TCG_TYPE_TL, TCG_AREG1, "T0");
99 cpu_T[1] = tcg_global_reg_new(TCG_TYPE_TL, TCG_AREG2, "T1");
100 cpu_T[2] = tcg_global_reg_new(TCG_TYPE_TL, TCG_AREG3, "T2");
101#endif
f78fb44e
AJ
102#if !defined(TARGET_PPC64)
103 cpu_T64[0] = tcg_global_mem_new(TCG_TYPE_I64,
bd7d9a6d 104 TCG_AREG0, offsetof(CPUState, t0_64),
f78fb44e
AJ
105 "T0_64");
106 cpu_T64[1] = tcg_global_mem_new(TCG_TYPE_I64,
bd7d9a6d 107 TCG_AREG0, offsetof(CPUState, t1_64),
f78fb44e
AJ
108 "T1_64");
109 cpu_T64[2] = tcg_global_mem_new(TCG_TYPE_I64,
bd7d9a6d 110 TCG_AREG0, offsetof(CPUState, t2_64),
f78fb44e
AJ
111 "T2_64");
112#endif
a5e26afa
AJ
113
114 cpu_FT[0] = tcg_global_mem_new(TCG_TYPE_I64, TCG_AREG0,
115 offsetof(CPUState, ft0), "FT0");
116 cpu_FT[1] = tcg_global_mem_new(TCG_TYPE_I64, TCG_AREG0,
117 offsetof(CPUState, ft1), "FT1");
118 cpu_FT[2] = tcg_global_mem_new(TCG_TYPE_I64, TCG_AREG0,
119 offsetof(CPUState, ft2), "FT2");
120
1d542695
AJ
121 cpu_AVRh[0] = tcg_global_mem_new(TCG_TYPE_I64, TCG_AREG0,
122 offsetof(CPUState, avr0.u64[0]), "AVR0H");
123 cpu_AVRl[0] = tcg_global_mem_new(TCG_TYPE_I64, TCG_AREG0,
124 offsetof(CPUState, avr0.u64[1]), "AVR0L");
125 cpu_AVRh[1] = tcg_global_mem_new(TCG_TYPE_I64, TCG_AREG0,
126 offsetof(CPUState, avr1.u64[0]), "AVR1H");
127 cpu_AVRl[1] = tcg_global_mem_new(TCG_TYPE_I64, TCG_AREG0,
128 offsetof(CPUState, avr1.u64[1]), "AVR1L");
129 cpu_AVRh[2] = tcg_global_mem_new(TCG_TYPE_I64, TCG_AREG0,
130 offsetof(CPUState, avr2.u64[0]), "AVR2H");
131 cpu_AVRl[2] = tcg_global_mem_new(TCG_TYPE_I64, TCG_AREG0,
132 offsetof(CPUState, avr2.u64[1]), "AVR2L");
133
f78fb44e 134 p = cpu_reg_names;
47e4661c
AJ
135
136 for (i = 0; i < 8; i++) {
137 sprintf(p, "crf%d", i);
138 cpu_crf[i] = tcg_global_mem_new(TCG_TYPE_I32, TCG_AREG0,
139 offsetof(CPUState, crf[i]), p);
140 p += 5;
141 }
142
f78fb44e
AJ
143 for (i = 0; i < 32; i++) {
144 sprintf(p, "r%d", i);
145 cpu_gpr[i] = tcg_global_mem_new(TCG_TYPE_TL, TCG_AREG0,
146 offsetof(CPUState, gpr[i]), p);
147 p += (i < 10) ? 3 : 4;
148#if !defined(TARGET_PPC64)
149 sprintf(p, "r%dH", i);
150 cpu_gprh[i] = tcg_global_mem_new(TCG_TYPE_I32, TCG_AREG0,
151 offsetof(CPUState, gprh[i]), p);
152 p += (i < 10) ? 4 : 5;
153#endif
1d542695 154
a5e26afa
AJ
155 sprintf(p, "fp%d", i);
156 cpu_fpr[i] = tcg_global_mem_new(TCG_TYPE_I64, TCG_AREG0,
157 offsetof(CPUState, fpr[i]), p);
ec1ac72d 158 p += (i < 10) ? 4 : 5;
a5e26afa 159
1d542695
AJ
160 sprintf(p, "avr%dH", i);
161 cpu_avrh[i] = tcg_global_mem_new(TCG_TYPE_I64, TCG_AREG0,
162 offsetof(CPUState, avr[i].u64[0]), p);
163 p += (i < 10) ? 6 : 7;
ec1ac72d 164
1d542695
AJ
165 sprintf(p, "avr%dL", i);
166 cpu_avrl[i] = tcg_global_mem_new(TCG_TYPE_I64, TCG_AREG0,
167 offsetof(CPUState, avr[i].u64[1]), p);
168 p += (i < 10) ? 6 : 7;
f78fb44e 169 }
f10dc08e 170
bd568f18
AJ
171 cpu_nip = tcg_global_mem_new(TCG_TYPE_TL, TCG_AREG0,
172 offsetof(CPUState, nip), "nip");
173
cfdcd37a
AJ
174 cpu_ctr = tcg_global_mem_new(TCG_TYPE_TL, TCG_AREG0,
175 offsetof(CPUState, ctr), "ctr");
176
177 cpu_lr = tcg_global_mem_new(TCG_TYPE_TL, TCG_AREG0,
178 offsetof(CPUState, lr), "lr");
179
3d7b417e
AJ
180 cpu_xer = tcg_global_mem_new(TCG_TYPE_I32, TCG_AREG0,
181 offsetof(CPUState, xer), "xer");
182
e1571908
AJ
183 cpu_fpscr = tcg_global_mem_new(TCG_TYPE_I32, TCG_AREG0,
184 offsetof(CPUState, fpscr), "fpscr");
185
f10dc08e
AJ
186 /* register helpers */
187#undef DEF_HELPER
188#define DEF_HELPER(ret, name, params) tcg_register_helper(name, #name);
189#include "helper.h"
190
2e70f6ef
PB
191 done_init = 1;
192}
193
7c58044c
JM
194#if defined(OPTIMIZE_FPRF_UPDATE)
195static uint16_t *gen_fprf_buf[OPC_BUF_SIZE];
196static uint16_t **gen_fprf_ptr;
197#endif
79aceca5 198
79aceca5
FB
199/* internal defines */
200typedef struct DisasContext {
201 struct TranslationBlock *tb;
0fa85d43 202 target_ulong nip;
79aceca5 203 uint32_t opcode;
9a64fbe4 204 uint32_t exception;
3cc62370
FB
205 /* Routine used to access memory */
206 int mem_idx;
207 /* Translation flags */
9a64fbe4 208#if !defined(CONFIG_USER_ONLY)
79aceca5 209 int supervisor;
d9bce9d9
JM
210#endif
211#if defined(TARGET_PPC64)
212 int sf_mode;
9a64fbe4 213#endif
3cc62370 214 int fpu_enabled;
a9d9eb8f 215 int altivec_enabled;
0487d6a8 216 int spe_enabled;
3fc6c082 217 ppc_spr_t *spr_cb; /* Needed to check rights for mfspr/mtspr */
ea4e754f 218 int singlestep_enabled;
d63001d1 219 int dcache_line_size;
79aceca5
FB
220} DisasContext;
221
3fc6c082 222struct opc_handler_t {
79aceca5
FB
223 /* invalid bits */
224 uint32_t inval;
9a64fbe4 225 /* instruction type */
0487d6a8 226 uint64_t type;
79aceca5
FB
227 /* handler */
228 void (*handler)(DisasContext *ctx);
a750fc0b 229#if defined(DO_PPC_STATISTICS) || defined(PPC_DUMP_CPU)
b55266b5 230 const char *oname;
a750fc0b
JM
231#endif
232#if defined(DO_PPC_STATISTICS)
76a66253
JM
233 uint64_t count;
234#endif
3fc6c082 235};
79aceca5 236
7c58044c
JM
237static always_inline void gen_reset_fpstatus (void)
238{
239#ifdef CONFIG_SOFTFLOAT
240 gen_op_reset_fpstatus();
241#endif
242}
243
244static always_inline void gen_compute_fprf (int set_fprf, int set_rc)
245{
246 if (set_fprf != 0) {
247 /* This case might be optimized later */
248#if defined(OPTIMIZE_FPRF_UPDATE)
249 *gen_fprf_ptr++ = gen_opc_ptr;
250#endif
251 gen_op_compute_fprf(1);
252 if (unlikely(set_rc))
47e4661c 253 tcg_gen_andi_i32(cpu_crf[1], cpu_T[0], 0xf);
7c58044c
JM
254 gen_op_float_check_status();
255 } else if (unlikely(set_rc)) {
256 /* We always need to compute fpcc */
257 gen_op_compute_fprf(0);
47e4661c 258 tcg_gen_andi_i32(cpu_crf[1], cpu_T[0], 0xf);
7c58044c
JM
259 if (set_fprf)
260 gen_op_float_check_status();
261 }
262}
263
264static always_inline void gen_optimize_fprf (void)
265{
266#if defined(OPTIMIZE_FPRF_UPDATE)
267 uint16_t **ptr;
268
269 for (ptr = gen_fprf_buf; ptr != (gen_fprf_ptr - 1); ptr++)
270 *ptr = INDEX_op_nop1;
271 gen_fprf_ptr = gen_fprf_buf;
272#endif
273}
274
b068d6a7 275static always_inline void gen_update_nip (DisasContext *ctx, target_ulong nip)
d9bce9d9
JM
276{
277#if defined(TARGET_PPC64)
278 if (ctx->sf_mode)
bd568f18 279 tcg_gen_movi_tl(cpu_nip, nip);
d9bce9d9
JM
280 else
281#endif
bd568f18 282 tcg_gen_movi_tl(cpu_nip, (uint32_t)nip);
d9bce9d9
JM
283}
284
e1833e1f 285#define GEN_EXCP(ctx, excp, error) \
79aceca5 286do { \
e1833e1f 287 if ((ctx)->exception == POWERPC_EXCP_NONE) { \
d9bce9d9 288 gen_update_nip(ctx, (ctx)->nip); \
9fddaa0c
FB
289 } \
290 gen_op_raise_exception_err((excp), (error)); \
291 ctx->exception = (excp); \
79aceca5
FB
292} while (0)
293
e1833e1f
JM
294#define GEN_EXCP_INVAL(ctx) \
295GEN_EXCP((ctx), POWERPC_EXCP_PROGRAM, \
296 POWERPC_EXCP_INVAL | POWERPC_EXCP_INVAL_INVAL)
9fddaa0c 297
e1833e1f
JM
298#define GEN_EXCP_PRIVOPC(ctx) \
299GEN_EXCP((ctx), POWERPC_EXCP_PROGRAM, \
300 POWERPC_EXCP_INVAL | POWERPC_EXCP_PRIV_OPC)
9a64fbe4 301
e1833e1f
JM
302#define GEN_EXCP_PRIVREG(ctx) \
303GEN_EXCP((ctx), POWERPC_EXCP_PROGRAM, \
304 POWERPC_EXCP_INVAL | POWERPC_EXCP_PRIV_REG)
305
306#define GEN_EXCP_NO_FP(ctx) \
307GEN_EXCP(ctx, POWERPC_EXCP_FPU, 0)
308
309#define GEN_EXCP_NO_AP(ctx) \
310GEN_EXCP(ctx, POWERPC_EXCP_APU, 0)
9a64fbe4 311
a9d9eb8f
JM
312#define GEN_EXCP_NO_VR(ctx) \
313GEN_EXCP(ctx, POWERPC_EXCP_VPU, 0)
314
f24e5695 315/* Stop translation */
b068d6a7 316static always_inline void GEN_STOP (DisasContext *ctx)
3fc6c082 317{
d9bce9d9 318 gen_update_nip(ctx, ctx->nip);
e1833e1f 319 ctx->exception = POWERPC_EXCP_STOP;
3fc6c082
FB
320}
321
f24e5695 322/* No need to update nip here, as execution flow will change */
b068d6a7 323static always_inline void GEN_SYNC (DisasContext *ctx)
2be0071f 324{
e1833e1f 325 ctx->exception = POWERPC_EXCP_SYNC;
2be0071f
FB
326}
327
79aceca5
FB
328#define GEN_HANDLER(name, opc1, opc2, opc3, inval, type) \
329static void gen_##name (DisasContext *ctx); \
330GEN_OPCODE(name, opc1, opc2, opc3, inval, type); \
331static void gen_##name (DisasContext *ctx)
332
c7697e1f
JM
333#define GEN_HANDLER2(name, onam, opc1, opc2, opc3, inval, type) \
334static void gen_##name (DisasContext *ctx); \
335GEN_OPCODE2(name, onam, opc1, opc2, opc3, inval, type); \
336static void gen_##name (DisasContext *ctx)
337
79aceca5
FB
338typedef struct opcode_t {
339 unsigned char opc1, opc2, opc3;
1235fc06 340#if HOST_LONG_BITS == 64 /* Explicitly align to 64 bits */
18fba28c
FB
341 unsigned char pad[5];
342#else
343 unsigned char pad[1];
344#endif
79aceca5 345 opc_handler_t handler;
b55266b5 346 const char *oname;
79aceca5
FB
347} opcode_t;
348
a750fc0b 349/*****************************************************************************/
79aceca5
FB
350/*** Instruction decoding ***/
351#define EXTRACT_HELPER(name, shift, nb) \
b068d6a7 352static always_inline uint32_t name (uint32_t opcode) \
79aceca5
FB
353{ \
354 return (opcode >> (shift)) & ((1 << (nb)) - 1); \
355}
356
357#define EXTRACT_SHELPER(name, shift, nb) \
b068d6a7 358static always_inline int32_t name (uint32_t opcode) \
79aceca5 359{ \
18fba28c 360 return (int16_t)((opcode >> (shift)) & ((1 << (nb)) - 1)); \
79aceca5
FB
361}
362
363/* Opcode part 1 */
364EXTRACT_HELPER(opc1, 26, 6);
365/* Opcode part 2 */
366EXTRACT_HELPER(opc2, 1, 5);
367/* Opcode part 3 */
368EXTRACT_HELPER(opc3, 6, 5);
369/* Update Cr0 flags */
370EXTRACT_HELPER(Rc, 0, 1);
371/* Destination */
372EXTRACT_HELPER(rD, 21, 5);
373/* Source */
374EXTRACT_HELPER(rS, 21, 5);
375/* First operand */
376EXTRACT_HELPER(rA, 16, 5);
377/* Second operand */
378EXTRACT_HELPER(rB, 11, 5);
379/* Third operand */
380EXTRACT_HELPER(rC, 6, 5);
381/*** Get CRn ***/
382EXTRACT_HELPER(crfD, 23, 3);
383EXTRACT_HELPER(crfS, 18, 3);
384EXTRACT_HELPER(crbD, 21, 5);
385EXTRACT_HELPER(crbA, 16, 5);
386EXTRACT_HELPER(crbB, 11, 5);
387/* SPR / TBL */
3fc6c082 388EXTRACT_HELPER(_SPR, 11, 10);
b068d6a7 389static always_inline uint32_t SPR (uint32_t opcode)
3fc6c082
FB
390{
391 uint32_t sprn = _SPR(opcode);
392
393 return ((sprn >> 5) & 0x1F) | ((sprn & 0x1F) << 5);
394}
79aceca5
FB
395/*** Get constants ***/
396EXTRACT_HELPER(IMM, 12, 8);
397/* 16 bits signed immediate value */
398EXTRACT_SHELPER(SIMM, 0, 16);
399/* 16 bits unsigned immediate value */
400EXTRACT_HELPER(UIMM, 0, 16);
401/* Bit count */
402EXTRACT_HELPER(NB, 11, 5);
403/* Shift count */
404EXTRACT_HELPER(SH, 11, 5);
405/* Mask start */
406EXTRACT_HELPER(MB, 6, 5);
407/* Mask end */
408EXTRACT_HELPER(ME, 1, 5);
fb0eaffc
FB
409/* Trap operand */
410EXTRACT_HELPER(TO, 21, 5);
79aceca5
FB
411
412EXTRACT_HELPER(CRM, 12, 8);
413EXTRACT_HELPER(FM, 17, 8);
414EXTRACT_HELPER(SR, 16, 4);
e4bb997e 415EXTRACT_HELPER(FPIMM, 12, 4);
fb0eaffc 416
79aceca5
FB
417/*** Jump target decoding ***/
418/* Displacement */
419EXTRACT_SHELPER(d, 0, 16);
420/* Immediate address */
b068d6a7 421static always_inline target_ulong LI (uint32_t opcode)
79aceca5
FB
422{
423 return (opcode >> 0) & 0x03FFFFFC;
424}
425
b068d6a7 426static always_inline uint32_t BD (uint32_t opcode)
79aceca5
FB
427{
428 return (opcode >> 0) & 0xFFFC;
429}
430
431EXTRACT_HELPER(BO, 21, 5);
432EXTRACT_HELPER(BI, 16, 5);
433/* Absolute/relative address */
434EXTRACT_HELPER(AA, 1, 1);
435/* Link */
436EXTRACT_HELPER(LK, 0, 1);
437
438/* Create a mask between <start> and <end> bits */
b068d6a7 439static always_inline target_ulong MASK (uint32_t start, uint32_t end)
79aceca5 440{
76a66253 441 target_ulong ret;
79aceca5 442
76a66253
JM
443#if defined(TARGET_PPC64)
444 if (likely(start == 0)) {
6f2d8978 445 ret = UINT64_MAX << (63 - end);
76a66253 446 } else if (likely(end == 63)) {
6f2d8978 447 ret = UINT64_MAX >> start;
76a66253
JM
448 }
449#else
450 if (likely(start == 0)) {
6f2d8978 451 ret = UINT32_MAX << (31 - end);
76a66253 452 } else if (likely(end == 31)) {
6f2d8978 453 ret = UINT32_MAX >> start;
76a66253
JM
454 }
455#endif
456 else {
457 ret = (((target_ulong)(-1ULL)) >> (start)) ^
458 (((target_ulong)(-1ULL) >> (end)) >> 1);
459 if (unlikely(start > end))
460 return ~ret;
461 }
79aceca5
FB
462
463 return ret;
464}
465
a750fc0b
JM
466/*****************************************************************************/
467/* PowerPC Instructions types definitions */
468enum {
1b413d55 469 PPC_NONE = 0x0000000000000000ULL,
12de9a39 470 /* PowerPC base instructions set */
1b413d55
JM
471 PPC_INSNS_BASE = 0x0000000000000001ULL,
472 /* integer operations instructions */
a750fc0b 473#define PPC_INTEGER PPC_INSNS_BASE
1b413d55 474 /* flow control instructions */
a750fc0b 475#define PPC_FLOW PPC_INSNS_BASE
1b413d55 476 /* virtual memory instructions */
a750fc0b 477#define PPC_MEM PPC_INSNS_BASE
1b413d55 478 /* ld/st with reservation instructions */
a750fc0b 479#define PPC_RES PPC_INSNS_BASE
1b413d55 480 /* spr/msr access instructions */
a750fc0b 481#define PPC_MISC PPC_INSNS_BASE
1b413d55
JM
482 /* Deprecated instruction sets */
483 /* Original POWER instruction set */
f610349f 484 PPC_POWER = 0x0000000000000002ULL,
1b413d55 485 /* POWER2 instruction set extension */
f610349f 486 PPC_POWER2 = 0x0000000000000004ULL,
1b413d55 487 /* Power RTC support */
f610349f 488 PPC_POWER_RTC = 0x0000000000000008ULL,
1b413d55 489 /* Power-to-PowerPC bridge (601) */
f610349f 490 PPC_POWER_BR = 0x0000000000000010ULL,
1b413d55 491 /* 64 bits PowerPC instruction set */
f610349f 492 PPC_64B = 0x0000000000000020ULL,
1b413d55 493 /* New 64 bits extensions (PowerPC 2.0x) */
f610349f 494 PPC_64BX = 0x0000000000000040ULL,
1b413d55 495 /* 64 bits hypervisor extensions */
f610349f 496 PPC_64H = 0x0000000000000080ULL,
1b413d55 497 /* New wait instruction (PowerPC 2.0x) */
f610349f 498 PPC_WAIT = 0x0000000000000100ULL,
1b413d55 499 /* Time base mftb instruction */
f610349f 500 PPC_MFTB = 0x0000000000000200ULL,
1b413d55
JM
501
502 /* Fixed-point unit extensions */
503 /* PowerPC 602 specific */
f610349f 504 PPC_602_SPEC = 0x0000000000000400ULL,
05332d70
JM
505 /* isel instruction */
506 PPC_ISEL = 0x0000000000000800ULL,
507 /* popcntb instruction */
508 PPC_POPCNTB = 0x0000000000001000ULL,
509 /* string load / store */
510 PPC_STRING = 0x0000000000002000ULL,
1b413d55
JM
511
512 /* Floating-point unit extensions */
513 /* Optional floating point instructions */
514 PPC_FLOAT = 0x0000000000010000ULL,
515 /* New floating-point extensions (PowerPC 2.0x) */
516 PPC_FLOAT_EXT = 0x0000000000020000ULL,
517 PPC_FLOAT_FSQRT = 0x0000000000040000ULL,
518 PPC_FLOAT_FRES = 0x0000000000080000ULL,
519 PPC_FLOAT_FRSQRTE = 0x0000000000100000ULL,
520 PPC_FLOAT_FRSQRTES = 0x0000000000200000ULL,
521 PPC_FLOAT_FSEL = 0x0000000000400000ULL,
522 PPC_FLOAT_STFIWX = 0x0000000000800000ULL,
523
524 /* Vector/SIMD extensions */
525 /* Altivec support */
526 PPC_ALTIVEC = 0x0000000001000000ULL,
1b413d55 527 /* PowerPC 2.03 SPE extension */
05332d70 528 PPC_SPE = 0x0000000002000000ULL,
1b413d55 529 /* PowerPC 2.03 SPE floating-point extension */
05332d70 530 PPC_SPEFPU = 0x0000000004000000ULL,
1b413d55 531
12de9a39 532 /* Optional memory control instructions */
1b413d55
JM
533 PPC_MEM_TLBIA = 0x0000000010000000ULL,
534 PPC_MEM_TLBIE = 0x0000000020000000ULL,
535 PPC_MEM_TLBSYNC = 0x0000000040000000ULL,
536 /* sync instruction */
537 PPC_MEM_SYNC = 0x0000000080000000ULL,
538 /* eieio instruction */
539 PPC_MEM_EIEIO = 0x0000000100000000ULL,
540
541 /* Cache control instructions */
c8623f2e 542 PPC_CACHE = 0x0000000200000000ULL,
1b413d55 543 /* icbi instruction */
05332d70 544 PPC_CACHE_ICBI = 0x0000000400000000ULL,
1b413d55 545 /* dcbz instruction with fixed cache line size */
05332d70 546 PPC_CACHE_DCBZ = 0x0000000800000000ULL,
1b413d55 547 /* dcbz instruction with tunable cache line size */
05332d70 548 PPC_CACHE_DCBZT = 0x0000001000000000ULL,
1b413d55 549 /* dcba instruction */
05332d70
JM
550 PPC_CACHE_DCBA = 0x0000002000000000ULL,
551 /* Freescale cache locking instructions */
552 PPC_CACHE_LOCK = 0x0000004000000000ULL,
1b413d55
JM
553
554 /* MMU related extensions */
555 /* external control instructions */
05332d70 556 PPC_EXTERN = 0x0000010000000000ULL,
1b413d55 557 /* segment register access instructions */
05332d70 558 PPC_SEGMENT = 0x0000020000000000ULL,
1b413d55 559 /* PowerPC 6xx TLB management instructions */
05332d70 560 PPC_6xx_TLB = 0x0000040000000000ULL,
1b413d55 561 /* PowerPC 74xx TLB management instructions */
05332d70 562 PPC_74xx_TLB = 0x0000080000000000ULL,
1b413d55 563 /* PowerPC 40x TLB management instructions */
05332d70 564 PPC_40x_TLB = 0x0000100000000000ULL,
1b413d55 565 /* segment register access instructions for PowerPC 64 "bridge" */
05332d70 566 PPC_SEGMENT_64B = 0x0000200000000000ULL,
1b413d55 567 /* SLB management */
05332d70 568 PPC_SLBI = 0x0000400000000000ULL,
1b413d55 569
12de9a39 570 /* Embedded PowerPC dedicated instructions */
05332d70 571 PPC_WRTEE = 0x0001000000000000ULL,
12de9a39 572 /* PowerPC 40x exception model */
05332d70 573 PPC_40x_EXCP = 0x0002000000000000ULL,
12de9a39 574 /* PowerPC 405 Mac instructions */
05332d70 575 PPC_405_MAC = 0x0004000000000000ULL,
12de9a39 576 /* PowerPC 440 specific instructions */
05332d70 577 PPC_440_SPEC = 0x0008000000000000ULL,
12de9a39 578 /* BookE (embedded) PowerPC specification */
05332d70
JM
579 PPC_BOOKE = 0x0010000000000000ULL,
580 /* mfapidi instruction */
581 PPC_MFAPIDI = 0x0020000000000000ULL,
582 /* tlbiva instruction */
583 PPC_TLBIVA = 0x0040000000000000ULL,
584 /* tlbivax instruction */
585 PPC_TLBIVAX = 0x0080000000000000ULL,
12de9a39 586 /* PowerPC 4xx dedicated instructions */
05332d70 587 PPC_4xx_COMMON = 0x0100000000000000ULL,
12de9a39 588 /* PowerPC 40x ibct instructions */
05332d70 589 PPC_40x_ICBT = 0x0200000000000000ULL,
12de9a39 590 /* rfmci is not implemented in all BookE PowerPC */
05332d70
JM
591 PPC_RFMCI = 0x0400000000000000ULL,
592 /* rfdi instruction */
593 PPC_RFDI = 0x0800000000000000ULL,
594 /* DCR accesses */
595 PPC_DCR = 0x1000000000000000ULL,
596 /* DCR extended accesse */
597 PPC_DCRX = 0x2000000000000000ULL,
12de9a39 598 /* user-mode DCR access, implemented in PowerPC 460 */
05332d70 599 PPC_DCRUX = 0x4000000000000000ULL,
a750fc0b
JM
600};
601
602/*****************************************************************************/
603/* PowerPC instructions table */
3fc6c082
FB
604#if HOST_LONG_BITS == 64
605#define OPC_ALIGN 8
606#else
607#define OPC_ALIGN 4
608#endif
1b039c09 609#if defined(__APPLE__)
d9bce9d9 610#define OPCODES_SECTION \
3fc6c082 611 __attribute__ ((section("__TEXT,__opcodes"), unused, aligned (OPC_ALIGN) ))
933dc6eb 612#else
d9bce9d9 613#define OPCODES_SECTION \
3fc6c082 614 __attribute__ ((section(".opcodes"), unused, aligned (OPC_ALIGN) ))
933dc6eb
FB
615#endif
616
76a66253 617#if defined(DO_PPC_STATISTICS)
79aceca5 618#define GEN_OPCODE(name, op1, op2, op3, invl, _typ) \
18fba28c 619OPCODES_SECTION opcode_t opc_##name = { \
79aceca5
FB
620 .opc1 = op1, \
621 .opc2 = op2, \
622 .opc3 = op3, \
18fba28c 623 .pad = { 0, }, \
79aceca5
FB
624 .handler = { \
625 .inval = invl, \
9a64fbe4 626 .type = _typ, \
79aceca5 627 .handler = &gen_##name, \
76a66253 628 .oname = stringify(name), \
79aceca5 629 }, \
3fc6c082 630 .oname = stringify(name), \
79aceca5 631}
c7697e1f
JM
632#define GEN_OPCODE2(name, onam, op1, op2, op3, invl, _typ) \
633OPCODES_SECTION opcode_t opc_##name = { \
634 .opc1 = op1, \
635 .opc2 = op2, \
636 .opc3 = op3, \
637 .pad = { 0, }, \
638 .handler = { \
639 .inval = invl, \
640 .type = _typ, \
641 .handler = &gen_##name, \
642 .oname = onam, \
643 }, \
644 .oname = onam, \
645}
76a66253
JM
646#else
647#define GEN_OPCODE(name, op1, op2, op3, invl, _typ) \
648OPCODES_SECTION opcode_t opc_##name = { \
649 .opc1 = op1, \
650 .opc2 = op2, \
651 .opc3 = op3, \
652 .pad = { 0, }, \
653 .handler = { \
654 .inval = invl, \
655 .type = _typ, \
656 .handler = &gen_##name, \
657 }, \
658 .oname = stringify(name), \
659}
c7697e1f
JM
660#define GEN_OPCODE2(name, onam, op1, op2, op3, invl, _typ) \
661OPCODES_SECTION opcode_t opc_##name = { \
662 .opc1 = op1, \
663 .opc2 = op2, \
664 .opc3 = op3, \
665 .pad = { 0, }, \
666 .handler = { \
667 .inval = invl, \
668 .type = _typ, \
669 .handler = &gen_##name, \
670 }, \
671 .oname = onam, \
672}
76a66253 673#endif
79aceca5
FB
674
675#define GEN_OPCODE_MARK(name) \
18fba28c 676OPCODES_SECTION opcode_t opc_##name = { \
79aceca5
FB
677 .opc1 = 0xFF, \
678 .opc2 = 0xFF, \
679 .opc3 = 0xFF, \
18fba28c 680 .pad = { 0, }, \
79aceca5
FB
681 .handler = { \
682 .inval = 0x00000000, \
9a64fbe4 683 .type = 0x00, \
79aceca5
FB
684 .handler = NULL, \
685 }, \
3fc6c082 686 .oname = stringify(name), \
79aceca5
FB
687}
688
689/* Start opcode list */
690GEN_OPCODE_MARK(start);
691
692/* Invalid instruction */
9a64fbe4
FB
693GEN_HANDLER(invalid, 0x00, 0x00, 0x00, 0xFFFFFFFF, PPC_NONE)
694{
e1833e1f 695 GEN_EXCP_INVAL(ctx);
9a64fbe4
FB
696}
697
79aceca5
FB
698static opc_handler_t invalid_handler = {
699 .inval = 0xFFFFFFFF,
9a64fbe4 700 .type = PPC_NONE,
79aceca5
FB
701 .handler = gen_invalid,
702};
703
e1571908
AJ
704/*** Integer comparison ***/
705
706static always_inline void gen_op_cmp(TCGv t0, TCGv t1, int s, int crf)
707{
708 int l1, l2, l3;
709
710 tcg_gen_shri_i32(cpu_crf[crf], cpu_xer, XER_SO);
711 tcg_gen_andi_i32(cpu_crf[crf], cpu_crf[crf], 1);
712
713 l1 = gen_new_label();
714 l2 = gen_new_label();
715 l3 = gen_new_label();
716 if (s) {
717 tcg_gen_brcond_tl(TCG_COND_LT, t0, t1, l1);
718 tcg_gen_brcond_tl(TCG_COND_GT, t0, t1, l2);
719 } else {
720 tcg_gen_brcond_tl(TCG_COND_LTU, t0, t1, l1);
721 tcg_gen_brcond_tl(TCG_COND_GTU, t0, t1, l2);
722 }
723 tcg_gen_ori_i32(cpu_crf[crf], cpu_crf[crf], 1 << CRF_EQ);
724 tcg_gen_br(l3);
725 gen_set_label(l1);
726 tcg_gen_ori_i32(cpu_crf[crf], cpu_crf[crf], 1 << CRF_LT);
727 tcg_gen_br(l3);
728 gen_set_label(l2);
729 tcg_gen_ori_i32(cpu_crf[crf], cpu_crf[crf], 1 << CRF_GT);
730 gen_set_label(l3);
731}
732
733static always_inline void gen_op_cmpi(TCGv t0, target_ulong t1, int s, int crf)
734{
735 TCGv temp = tcg_const_local_tl(t1);
736 gen_op_cmp(t0, temp, s, crf);
737 tcg_temp_free(temp);
738}
739
740#if defined(TARGET_PPC64)
741static always_inline void gen_op_cmp32(TCGv t0, TCGv t1, int s, int crf)
742{
743 TCGv t0_32, t1_32;
744 t0_32 = tcg_temp_local_new(TCG_TYPE_TL);
745 t1_32 = tcg_temp_local_new(TCG_TYPE_TL);
746 if (s) {
747 tcg_gen_ext32s_tl(t0_32, t0);
748 tcg_gen_ext32s_tl(t1_32, t1);
749 } else {
750 tcg_gen_ext32u_tl(t0_32, t0);
751 tcg_gen_ext32u_tl(t1_32, t1);
752 }
753 gen_op_cmp(t0_32, t1_32, s, crf);
754 tcg_temp_free(t1_32);
755 tcg_temp_free(t0_32);
756}
757
758static always_inline void gen_op_cmpi32(TCGv t0, target_ulong t1, int s, int crf)
759{
760 TCGv temp = tcg_const_local_tl(t1);
761 gen_op_cmp32(t0, temp, s, crf);
762 tcg_temp_free(temp);
763}
764#endif
765
766static always_inline void gen_set_Rc0 (DisasContext *ctx, TCGv reg)
767{
768#if defined(TARGET_PPC64)
769 if (!(ctx->sf_mode))
770 gen_op_cmpi32(reg, 0, 1, 0);
771 else
772#endif
773 gen_op_cmpi(reg, 0, 1, 0);
774}
775
776/* cmp */
777GEN_HANDLER(cmp, 0x1F, 0x00, 0x00, 0x00400000, PPC_INTEGER)
778{
779#if defined(TARGET_PPC64)
780 if (!(ctx->sf_mode && (ctx->opcode & 0x00200000)))
781 gen_op_cmp32(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)],
782 1, crfD(ctx->opcode));
783 else
784#endif
785 gen_op_cmp(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)],
786 1, crfD(ctx->opcode));
787}
788
789/* cmpi */
790GEN_HANDLER(cmpi, 0x0B, 0xFF, 0xFF, 0x00400000, PPC_INTEGER)
791{
792#if defined(TARGET_PPC64)
793 if (!(ctx->sf_mode && (ctx->opcode & 0x00200000)))
794 gen_op_cmpi32(cpu_gpr[rA(ctx->opcode)], SIMM(ctx->opcode),
795 1, crfD(ctx->opcode));
796 else
797#endif
798 gen_op_cmpi(cpu_gpr[rA(ctx->opcode)], SIMM(ctx->opcode),
799 1, crfD(ctx->opcode));
800}
801
802/* cmpl */
803GEN_HANDLER(cmpl, 0x1F, 0x00, 0x01, 0x00400000, PPC_INTEGER)
804{
805#if defined(TARGET_PPC64)
806 if (!(ctx->sf_mode && (ctx->opcode & 0x00200000)))
807 gen_op_cmp32(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)],
808 0, crfD(ctx->opcode));
809 else
810#endif
811 gen_op_cmp(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)],
812 0, crfD(ctx->opcode));
813}
814
815/* cmpli */
816GEN_HANDLER(cmpli, 0x0A, 0xFF, 0xFF, 0x00400000, PPC_INTEGER)
817{
818#if defined(TARGET_PPC64)
819 if (!(ctx->sf_mode && (ctx->opcode & 0x00200000)))
820 gen_op_cmpi32(cpu_gpr[rA(ctx->opcode)], UIMM(ctx->opcode),
821 0, crfD(ctx->opcode));
822 else
823#endif
824 gen_op_cmpi(cpu_gpr[rA(ctx->opcode)], UIMM(ctx->opcode),
825 0, crfD(ctx->opcode));
826}
827
828/* isel (PowerPC 2.03 specification) */
829GEN_HANDLER(isel, 0x1F, 0x0F, 0xFF, 0x00000001, PPC_ISEL)
830{
831 int l1, l2;
832 uint32_t bi = rC(ctx->opcode);
833 uint32_t mask;
834 TCGv temp;
835
836 l1 = gen_new_label();
837 l2 = gen_new_label();
838
839 mask = 1 << (3 - (bi & 0x03));
840 temp = tcg_temp_new(TCG_TYPE_I32);
841 tcg_gen_andi_i32(temp, cpu_crf[bi >> 2], mask);
842 tcg_gen_brcondi_i32(TCG_COND_EQ, temp, 0, l1);
843 if (rA(ctx->opcode) == 0)
844 tcg_gen_movi_tl(cpu_gpr[rD(ctx->opcode)], 0);
845 else
846 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
847 tcg_gen_br(l2);
848 gen_set_label(l1);
849 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_gpr[rB(ctx->opcode)]);
850 gen_set_label(l2);
851}
852
79aceca5 853/*** Integer arithmetic ***/
d9bce9d9
JM
854#define __GEN_INT_ARITH2(name, opc1, opc2, opc3, inval, type) \
855GEN_HANDLER(name, opc1, opc2, opc3, inval, type) \
79aceca5 856{ \
f78fb44e
AJ
857 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]); \
858 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rB(ctx->opcode)]); \
79aceca5 859 gen_op_##name(); \
f78fb44e 860 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]); \
76a66253 861 if (unlikely(Rc(ctx->opcode) != 0)) \
e1571908 862 gen_set_Rc0(ctx, cpu_T[0]); \
79aceca5
FB
863}
864
d9bce9d9
JM
865#define __GEN_INT_ARITH2_O(name, opc1, opc2, opc3, inval, type) \
866GEN_HANDLER(name, opc1, opc2, opc3, inval, type) \
79aceca5 867{ \
f78fb44e
AJ
868 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]); \
869 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rB(ctx->opcode)]); \
79aceca5 870 gen_op_##name(); \
f78fb44e 871 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]); \
76a66253 872 if (unlikely(Rc(ctx->opcode) != 0)) \
e1571908 873 gen_set_Rc0(ctx, cpu_T[0]); \
79aceca5
FB
874}
875
d9bce9d9
JM
876#define __GEN_INT_ARITH1(name, opc1, opc2, opc3, type) \
877GEN_HANDLER(name, opc1, opc2, opc3, 0x0000F800, type) \
79aceca5 878{ \
f78fb44e 879 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]); \
79aceca5 880 gen_op_##name(); \
f78fb44e 881 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]); \
76a66253 882 if (unlikely(Rc(ctx->opcode) != 0)) \
e1571908 883 gen_set_Rc0(ctx, cpu_T[0]); \
79aceca5 884}
d9bce9d9
JM
885#define __GEN_INT_ARITH1_O(name, opc1, opc2, opc3, type) \
886GEN_HANDLER(name, opc1, opc2, opc3, 0x0000F800, type) \
79aceca5 887{ \
f78fb44e 888 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]); \
79aceca5 889 gen_op_##name(); \
f78fb44e 890 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]); \
76a66253 891 if (unlikely(Rc(ctx->opcode) != 0)) \
e1571908 892 gen_set_Rc0(ctx, cpu_T[0]); \
79aceca5
FB
893}
894
895/* Two operands arithmetic functions */
d9bce9d9
JM
896#define GEN_INT_ARITH2(name, opc1, opc2, opc3, type) \
897__GEN_INT_ARITH2(name, opc1, opc2, opc3, 0x00000000, type) \
898__GEN_INT_ARITH2_O(name##o, opc1, opc2, opc3 | 0x10, 0x00000000, type)
899
900/* Two operands arithmetic functions with no overflow allowed */
901#define GEN_INT_ARITHN(name, opc1, opc2, opc3, type) \
902__GEN_INT_ARITH2(name, opc1, opc2, opc3, 0x00000400, type)
903
904/* One operand arithmetic functions */
905#define GEN_INT_ARITH1(name, opc1, opc2, opc3, type) \
906__GEN_INT_ARITH1(name, opc1, opc2, opc3, type) \
907__GEN_INT_ARITH1_O(name##o, opc1, opc2, opc3 | 0x10, type)
908
909#if defined(TARGET_PPC64)
910#define __GEN_INT_ARITH2_64(name, opc1, opc2, opc3, inval, type) \
911GEN_HANDLER(name, opc1, opc2, opc3, inval, type) \
912{ \
f78fb44e
AJ
913 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]); \
914 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rB(ctx->opcode)]); \
d9bce9d9
JM
915 if (ctx->sf_mode) \
916 gen_op_##name##_64(); \
917 else \
918 gen_op_##name(); \
f78fb44e 919 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]); \
d9bce9d9 920 if (unlikely(Rc(ctx->opcode) != 0)) \
e1571908 921 gen_set_Rc0(ctx, cpu_T[0]); \
d9bce9d9
JM
922}
923
924#define __GEN_INT_ARITH2_O_64(name, opc1, opc2, opc3, inval, type) \
925GEN_HANDLER(name, opc1, opc2, opc3, inval, type) \
926{ \
f78fb44e
AJ
927 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]); \
928 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rB(ctx->opcode)]); \
d9bce9d9
JM
929 if (ctx->sf_mode) \
930 gen_op_##name##_64(); \
931 else \
932 gen_op_##name(); \
f78fb44e 933 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]); \
d9bce9d9 934 if (unlikely(Rc(ctx->opcode) != 0)) \
e1571908 935 gen_set_Rc0(ctx, cpu_T[0]); \
d9bce9d9
JM
936}
937
938#define __GEN_INT_ARITH1_64(name, opc1, opc2, opc3, type) \
939GEN_HANDLER(name, opc1, opc2, opc3, 0x0000F800, type) \
940{ \
f78fb44e 941 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]); \
d9bce9d9
JM
942 if (ctx->sf_mode) \
943 gen_op_##name##_64(); \
944 else \
945 gen_op_##name(); \
f78fb44e 946 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]); \
d9bce9d9 947 if (unlikely(Rc(ctx->opcode) != 0)) \
e1571908 948 gen_set_Rc0(ctx, cpu_T[0]); \
d9bce9d9
JM
949}
950#define __GEN_INT_ARITH1_O_64(name, opc1, opc2, opc3, type) \
951GEN_HANDLER(name, opc1, opc2, opc3, 0x0000F800, type) \
952{ \
f78fb44e 953 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]); \
d9bce9d9
JM
954 if (ctx->sf_mode) \
955 gen_op_##name##_64(); \
956 else \
957 gen_op_##name(); \
f78fb44e 958 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]); \
d9bce9d9 959 if (unlikely(Rc(ctx->opcode) != 0)) \
e1571908 960 gen_set_Rc0(ctx, cpu_T[0]); \
d9bce9d9
JM
961}
962
963/* Two operands arithmetic functions */
964#define GEN_INT_ARITH2_64(name, opc1, opc2, opc3, type) \
965__GEN_INT_ARITH2_64(name, opc1, opc2, opc3, 0x00000000, type) \
966__GEN_INT_ARITH2_O_64(name##o, opc1, opc2, opc3 | 0x10, 0x00000000, type)
79aceca5
FB
967
968/* Two operands arithmetic functions with no overflow allowed */
d9bce9d9
JM
969#define GEN_INT_ARITHN_64(name, opc1, opc2, opc3, type) \
970__GEN_INT_ARITH2_64(name, opc1, opc2, opc3, 0x00000400, type)
79aceca5
FB
971
972/* One operand arithmetic functions */
d9bce9d9
JM
973#define GEN_INT_ARITH1_64(name, opc1, opc2, opc3, type) \
974__GEN_INT_ARITH1_64(name, opc1, opc2, opc3, type) \
975__GEN_INT_ARITH1_O_64(name##o, opc1, opc2, opc3 | 0x10, type)
976#else
977#define GEN_INT_ARITH2_64 GEN_INT_ARITH2
978#define GEN_INT_ARITHN_64 GEN_INT_ARITHN
979#define GEN_INT_ARITH1_64 GEN_INT_ARITH1
980#endif
79aceca5
FB
981
982/* add add. addo addo. */
39dd32ee
AJ
983static always_inline void gen_op_add (void)
984{
985 tcg_gen_add_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
986}
b068d6a7 987static always_inline void gen_op_addo (void)
d9bce9d9 988{
e55fd934 989 tcg_gen_mov_tl(cpu_T[2], cpu_T[0]);
39dd32ee 990 tcg_gen_add_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
d9bce9d9
JM
991 gen_op_check_addo();
992}
993#if defined(TARGET_PPC64)
994#define gen_op_add_64 gen_op_add
b068d6a7 995static always_inline void gen_op_addo_64 (void)
d9bce9d9 996{
e55fd934 997 tcg_gen_mov_tl(cpu_T[2], cpu_T[0]);
39dd32ee 998 tcg_gen_add_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
d9bce9d9
JM
999 gen_op_check_addo_64();
1000}
1001#endif
1002GEN_INT_ARITH2_64 (add, 0x1F, 0x0A, 0x08, PPC_INTEGER);
79aceca5 1003/* addc addc. addco addco. */
b068d6a7 1004static always_inline void gen_op_addc (void)
d9bce9d9 1005{
e55fd934 1006 tcg_gen_mov_tl(cpu_T[2], cpu_T[0]);
39dd32ee 1007 tcg_gen_add_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
d9bce9d9
JM
1008 gen_op_check_addc();
1009}
b068d6a7 1010static always_inline void gen_op_addco (void)
d9bce9d9 1011{
e55fd934 1012 tcg_gen_mov_tl(cpu_T[2], cpu_T[0]);
39dd32ee 1013 tcg_gen_add_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
d9bce9d9
JM
1014 gen_op_check_addc();
1015 gen_op_check_addo();
1016}
1017#if defined(TARGET_PPC64)
b068d6a7 1018static always_inline void gen_op_addc_64 (void)
d9bce9d9 1019{
e55fd934 1020 tcg_gen_mov_tl(cpu_T[2], cpu_T[0]);
39dd32ee 1021 tcg_gen_add_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
d9bce9d9
JM
1022 gen_op_check_addc_64();
1023}
b068d6a7 1024static always_inline void gen_op_addco_64 (void)
d9bce9d9 1025{
e55fd934 1026 tcg_gen_mov_tl(cpu_T[2], cpu_T[0]);
39dd32ee 1027 tcg_gen_add_tl(cpu_T[0], cpu_T[0], cpu_T[1]);
d9bce9d9
JM
1028 gen_op_check_addc_64();
1029 gen_op_check_addo_64();
1030}
1031#endif
1032GEN_INT_ARITH2_64 (addc, 0x1F, 0x0A, 0x00, PPC_INTEGER);
79aceca5 1033/* adde adde. addeo addeo. */
b068d6a7 1034static always_inline void gen_op_addeo (void)
d9bce9d9 1035{
e55fd934 1036 tcg_gen_mov_tl(cpu_T[2], cpu_T[0]);
d9bce9d9
JM
1037 gen_op_adde();
1038 gen_op_check_addo();
1039}
1040#if defined(TARGET_PPC64)
b068d6a7 1041static always_inline void gen_op_addeo_64 (void)
d9bce9d9 1042{
e55fd934 1043 tcg_gen_mov_tl(cpu_T[2], cpu_T[0]);
d9bce9d9
JM
1044 gen_op_adde_64();
1045 gen_op_check_addo_64();
1046}
1047#endif
1048GEN_INT_ARITH2_64 (adde, 0x1F, 0x0A, 0x04, PPC_INTEGER);
79aceca5 1049/* addme addme. addmeo addmeo. */
b068d6a7 1050static always_inline void gen_op_addme (void)
d9bce9d9 1051{
e55fd934 1052 tcg_gen_mov_tl(cpu_T[1], cpu_T[0]);
d9bce9d9
JM
1053 gen_op_add_me();
1054}
1055#if defined(TARGET_PPC64)
b068d6a7 1056static always_inline void gen_op_addme_64 (void)
d9bce9d9 1057{
e55fd934 1058 tcg_gen_mov_tl(cpu_T[1], cpu_T[0]);
d9bce9d9
JM
1059 gen_op_add_me_64();
1060}
1061#endif
1062GEN_INT_ARITH1_64 (addme, 0x1F, 0x0A, 0x07, PPC_INTEGER);
79aceca5 1063/* addze addze. addzeo addzeo. */
b068d6a7 1064static always_inline void gen_op_addze (void)
d9bce9d9 1065{
e55fd934 1066 tcg_gen_mov_tl(cpu_T[2], cpu_T[0]);
d9bce9d9
JM
1067 gen_op_add_ze();
1068 gen_op_check_addc();
1069}
b068d6a7 1070static always_inline void gen_op_addzeo (void)
d9bce9d9 1071{
e55fd934 1072 tcg_gen_mov_tl(cpu_T[2], cpu_T[0]);
d9bce9d9
JM
1073 gen_op_add_ze();
1074 gen_op_check_addc();
1075 gen_op_check_addo();
1076}
1077#if defined(TARGET_PPC64)
b068d6a7 1078static always_inline void gen_op_addze_64 (void)
d9bce9d9 1079{
e55fd934 1080 tcg_gen_mov_tl(cpu_T[2], cpu_T[0]);
d9bce9d9
JM
1081 gen_op_add_ze();
1082 gen_op_check_addc_64();
1083}
b068d6a7 1084static always_inline void gen_op_addzeo_64 (void)
d9bce9d9 1085{
e55fd934 1086 tcg_gen_mov_tl(cpu_T[2], cpu_T[0]);
d9bce9d9
JM
1087 gen_op_add_ze();
1088 gen_op_check_addc_64();
1089 gen_op_check_addo_64();
1090}
1091#endif
1092GEN_INT_ARITH1_64 (addze, 0x1F, 0x0A, 0x06, PPC_INTEGER);
79aceca5 1093/* divw divw. divwo divwo. */
d9bce9d9 1094GEN_INT_ARITH2 (divw, 0x1F, 0x0B, 0x0F, PPC_INTEGER);
79aceca5 1095/* divwu divwu. divwuo divwuo. */
d9bce9d9 1096GEN_INT_ARITH2 (divwu, 0x1F, 0x0B, 0x0E, PPC_INTEGER);
79aceca5 1097/* mulhw mulhw. */
d9bce9d9 1098GEN_INT_ARITHN (mulhw, 0x1F, 0x0B, 0x02, PPC_INTEGER);
79aceca5 1099/* mulhwu mulhwu. */
d9bce9d9 1100GEN_INT_ARITHN (mulhwu, 0x1F, 0x0B, 0x00, PPC_INTEGER);
79aceca5 1101/* mullw mullw. mullwo mullwo. */
d9bce9d9 1102GEN_INT_ARITH2 (mullw, 0x1F, 0x0B, 0x07, PPC_INTEGER);
79aceca5 1103/* neg neg. nego nego. */
d9bce9d9 1104GEN_INT_ARITH1_64 (neg, 0x1F, 0x08, 0x03, PPC_INTEGER);
79aceca5 1105/* subf subf. subfo subfo. */
7c417963
AJ
1106static always_inline void gen_op_subf (void)
1107{
1108 tcg_gen_sub_tl(cpu_T[0], cpu_T[1], cpu_T[0]);
1109}
b068d6a7 1110static always_inline void gen_op_subfo (void)
d9bce9d9 1111{
f0413473 1112 tcg_gen_not_tl(cpu_T[2], cpu_T[0]);
7c417963 1113 tcg_gen_sub_tl(cpu_T[0], cpu_T[1], cpu_T[0]);
c3e10c7b 1114 gen_op_check_addo();
d9bce9d9
JM
1115}
1116#if defined(TARGET_PPC64)
1117#define gen_op_subf_64 gen_op_subf
b068d6a7 1118static always_inline void gen_op_subfo_64 (void)
d9bce9d9 1119{
f0413473 1120 tcg_gen_not_i64(cpu_T[2], cpu_T[0]);
7c417963 1121 tcg_gen_sub_tl(cpu_T[0], cpu_T[1], cpu_T[0]);
c3e10c7b 1122 gen_op_check_addo_64();
d9bce9d9
JM
1123}
1124#endif
1125GEN_INT_ARITH2_64 (subf, 0x1F, 0x08, 0x01, PPC_INTEGER);
79aceca5 1126/* subfc subfc. subfco subfco. */
b068d6a7 1127static always_inline void gen_op_subfc (void)
d9bce9d9 1128{
7c417963 1129 tcg_gen_sub_tl(cpu_T[0], cpu_T[1], cpu_T[0]);
d9bce9d9
JM
1130 gen_op_check_subfc();
1131}
b068d6a7 1132static always_inline void gen_op_subfco (void)
d9bce9d9 1133{
f0413473 1134 tcg_gen_not_tl(cpu_T[2], cpu_T[0]);
7c417963 1135 tcg_gen_sub_tl(cpu_T[0], cpu_T[1], cpu_T[0]);
d9bce9d9 1136 gen_op_check_subfc();
c3e10c7b 1137 gen_op_check_addo();
d9bce9d9
JM
1138}
1139#if defined(TARGET_PPC64)
b068d6a7 1140static always_inline void gen_op_subfc_64 (void)
d9bce9d9 1141{
7c417963 1142 tcg_gen_sub_tl(cpu_T[0], cpu_T[1], cpu_T[0]);
d9bce9d9
JM
1143 gen_op_check_subfc_64();
1144}
b068d6a7 1145static always_inline void gen_op_subfco_64 (void)
d9bce9d9 1146{
f0413473 1147 tcg_gen_not_i64(cpu_T[2], cpu_T[0]);
7c417963 1148 tcg_gen_sub_tl(cpu_T[0], cpu_T[1], cpu_T[0]);
d9bce9d9 1149 gen_op_check_subfc_64();
c3e10c7b 1150 gen_op_check_addo_64();
d9bce9d9
JM
1151}
1152#endif
1153GEN_INT_ARITH2_64 (subfc, 0x1F, 0x08, 0x00, PPC_INTEGER);
79aceca5 1154/* subfe subfe. subfeo subfeo. */
b068d6a7 1155static always_inline void gen_op_subfeo (void)
d9bce9d9 1156{
f0413473 1157 tcg_gen_not_tl(cpu_T[2], cpu_T[0]);
d9bce9d9 1158 gen_op_subfe();
c3e10c7b 1159 gen_op_check_addo();
d9bce9d9
JM
1160}
1161#if defined(TARGET_PPC64)
1162#define gen_op_subfe_64 gen_op_subfe
b068d6a7 1163static always_inline void gen_op_subfeo_64 (void)
d9bce9d9 1164{
f0413473 1165 tcg_gen_not_i64(cpu_T[2], cpu_T[0]);
d9bce9d9 1166 gen_op_subfe_64();
c3e10c7b 1167 gen_op_check_addo_64();
d9bce9d9
JM
1168}
1169#endif
1170GEN_INT_ARITH2_64 (subfe, 0x1F, 0x08, 0x04, PPC_INTEGER);
79aceca5 1171/* subfme subfme. subfmeo subfmeo. */
d9bce9d9 1172GEN_INT_ARITH1_64 (subfme, 0x1F, 0x08, 0x07, PPC_INTEGER);
79aceca5 1173/* subfze subfze. subfzeo subfzeo. */
d9bce9d9 1174GEN_INT_ARITH1_64 (subfze, 0x1F, 0x08, 0x06, PPC_INTEGER);
79aceca5
FB
1175/* addi */
1176GEN_HANDLER(addi, 0x0E, 0xFF, 0xFF, 0x00000000, PPC_INTEGER)
1177{
76a66253 1178 target_long simm = SIMM(ctx->opcode);
79aceca5
FB
1179
1180 if (rA(ctx->opcode) == 0) {
76a66253 1181 /* li case */
02f4f6c2 1182 tcg_gen_movi_tl(cpu_T[0], simm);
79aceca5 1183 } else {
f78fb44e 1184 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]);
76a66253 1185 if (likely(simm != 0))
39dd32ee 1186 tcg_gen_addi_tl(cpu_T[0], cpu_T[0], simm);
79aceca5 1187 }
f78fb44e 1188 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]);
79aceca5
FB
1189}
1190/* addic */
1191GEN_HANDLER(addic, 0x0C, 0xFF, 0xFF, 0x00000000, PPC_INTEGER)
1192{
76a66253
JM
1193 target_long simm = SIMM(ctx->opcode);
1194
f78fb44e 1195 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]);
d9bce9d9 1196 if (likely(simm != 0)) {
e55fd934 1197 tcg_gen_mov_tl(cpu_T[2], cpu_T[0]);
39dd32ee 1198 tcg_gen_addi_tl(cpu_T[0], cpu_T[0], simm);
d9bce9d9
JM
1199#if defined(TARGET_PPC64)
1200 if (ctx->sf_mode)
1201 gen_op_check_addc_64();
1202 else
1203#endif
1204 gen_op_check_addc();
e864cabd 1205 } else {
3d7b417e 1206 tcg_gen_andi_i32(cpu_xer, cpu_xer, ~(1 << XER_CA));
d9bce9d9 1207 }
f78fb44e 1208 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]);
79aceca5
FB
1209}
1210/* addic. */
c7697e1f 1211GEN_HANDLER2(addic_, "addic.", 0x0D, 0xFF, 0xFF, 0x00000000, PPC_INTEGER)
79aceca5 1212{
76a66253
JM
1213 target_long simm = SIMM(ctx->opcode);
1214
f78fb44e 1215 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]);
d9bce9d9 1216 if (likely(simm != 0)) {
e55fd934 1217 tcg_gen_mov_tl(cpu_T[2], cpu_T[0]);
39dd32ee 1218 tcg_gen_addi_tl(cpu_T[0], cpu_T[0], simm);
d9bce9d9
JM
1219#if defined(TARGET_PPC64)
1220 if (ctx->sf_mode)
1221 gen_op_check_addc_64();
1222 else
1223#endif
1224 gen_op_check_addc();
966439a6 1225 } else {
3d7b417e 1226 tcg_gen_andi_i32(cpu_xer, cpu_xer, ~(1 << XER_CA));
d9bce9d9 1227 }
f78fb44e 1228 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]);
e1571908 1229 gen_set_Rc0(ctx, cpu_T[0]);
79aceca5
FB
1230}
1231/* addis */
1232GEN_HANDLER(addis, 0x0F, 0xFF, 0xFF, 0x00000000, PPC_INTEGER)
1233{
76a66253 1234 target_long simm = SIMM(ctx->opcode);
79aceca5
FB
1235
1236 if (rA(ctx->opcode) == 0) {
76a66253 1237 /* lis case */
02f4f6c2 1238 tcg_gen_movi_tl(cpu_T[0], simm << 16);
79aceca5 1239 } else {
f78fb44e 1240 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]);
76a66253 1241 if (likely(simm != 0))
39dd32ee 1242 tcg_gen_addi_tl(cpu_T[0], cpu_T[0], simm << 16);
79aceca5 1243 }
f78fb44e 1244 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]);
79aceca5
FB
1245}
1246/* mulli */
1247GEN_HANDLER(mulli, 0x07, 0xFF, 0xFF, 0x00000000, PPC_INTEGER)
1248{
f78fb44e 1249 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]);
79aceca5 1250 gen_op_mulli(SIMM(ctx->opcode));
f78fb44e 1251 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]);
79aceca5
FB
1252}
1253/* subfic */
1254GEN_HANDLER(subfic, 0x08, 0xFF, 0xFF, 0x00000000, PPC_INTEGER)
1255{
f78fb44e 1256 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]);
d9bce9d9
JM
1257#if defined(TARGET_PPC64)
1258 if (ctx->sf_mode)
1259 gen_op_subfic_64(SIMM(ctx->opcode));
1260 else
1261#endif
1262 gen_op_subfic(SIMM(ctx->opcode));
f78fb44e 1263 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]);
79aceca5
FB
1264}
1265
d9bce9d9
JM
1266#if defined(TARGET_PPC64)
1267/* mulhd mulhd. */
a750fc0b 1268GEN_INT_ARITHN (mulhd, 0x1F, 0x09, 0x02, PPC_64B);
d9bce9d9 1269/* mulhdu mulhdu. */
a750fc0b 1270GEN_INT_ARITHN (mulhdu, 0x1F, 0x09, 0x00, PPC_64B);
d9bce9d9 1271/* mulld mulld. mulldo mulldo. */
a750fc0b 1272GEN_INT_ARITH2 (mulld, 0x1F, 0x09, 0x07, PPC_64B);
d9bce9d9 1273/* divd divd. divdo divdo. */
a750fc0b 1274GEN_INT_ARITH2 (divd, 0x1F, 0x09, 0x0F, PPC_64B);
d9bce9d9 1275/* divdu divdu. divduo divduo. */
a750fc0b 1276GEN_INT_ARITH2 (divdu, 0x1F, 0x09, 0x0E, PPC_64B);
d9bce9d9
JM
1277#endif
1278
79aceca5 1279/*** Integer logical ***/
26d67362
AJ
1280#define GEN_LOGICAL2(name, tcg_op, opc, type) \
1281GEN_HANDLER(name, 0x1F, 0x1C, opc, 0x00000000, type) \
79aceca5 1282{ \
26d67362
AJ
1283 tcg_op(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)], \
1284 cpu_gpr[rB(ctx->opcode)]); \
76a66253 1285 if (unlikely(Rc(ctx->opcode) != 0)) \
26d67362 1286 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]); \
79aceca5 1287}
79aceca5 1288
26d67362 1289#define GEN_LOGICAL1(name, tcg_op, opc, type) \
d9bce9d9 1290GEN_HANDLER(name, 0x1F, 0x1A, opc, 0x00000000, type) \
79aceca5 1291{ \
26d67362 1292 tcg_op(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)]); \
76a66253 1293 if (unlikely(Rc(ctx->opcode) != 0)) \
26d67362 1294 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]); \
79aceca5
FB
1295}
1296
1297/* and & and. */
26d67362 1298GEN_LOGICAL2(and, tcg_gen_and_tl, 0x00, PPC_INTEGER);
79aceca5 1299/* andc & andc. */
26d67362 1300GEN_LOGICAL2(andc, tcg_gen_andc_tl, 0x01, PPC_INTEGER);
79aceca5 1301/* andi. */
c7697e1f 1302GEN_HANDLER2(andi_, "andi.", 0x1C, 0xFF, 0xFF, 0x00000000, PPC_INTEGER)
79aceca5 1303{
26d67362
AJ
1304 tcg_gen_andi_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)], UIMM(ctx->opcode));
1305 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
79aceca5
FB
1306}
1307/* andis. */
c7697e1f 1308GEN_HANDLER2(andis_, "andis.", 0x1D, 0xFF, 0xFF, 0x00000000, PPC_INTEGER)
79aceca5 1309{
26d67362
AJ
1310 tcg_gen_andi_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)], UIMM(ctx->opcode) << 16);
1311 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
79aceca5 1312}
79aceca5 1313/* cntlzw */
26d67362
AJ
1314GEN_HANDLER(cntlzw, 0x1F, 0x1A, 0x00, 0x00000000, PPC_INTEGER)
1315{
1316 tcg_gen_helper_1_1(helper_cntlzw, cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)]);
1317 if (unlikely(Rc(ctx->opcode) != 0))
2e31f5d3 1318 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
26d67362 1319}
79aceca5 1320/* eqv & eqv. */
26d67362 1321GEN_LOGICAL2(eqv, tcg_gen_eqv_tl, 0x08, PPC_INTEGER);
79aceca5 1322/* extsb & extsb. */
26d67362 1323GEN_LOGICAL1(extsb, tcg_gen_ext8s_tl, 0x1D, PPC_INTEGER);
79aceca5 1324/* extsh & extsh. */
26d67362 1325GEN_LOGICAL1(extsh, tcg_gen_ext16s_tl, 0x1C, PPC_INTEGER);
79aceca5 1326/* nand & nand. */
26d67362 1327GEN_LOGICAL2(nand, tcg_gen_nand_tl, 0x0E, PPC_INTEGER);
79aceca5 1328/* nor & nor. */
26d67362 1329GEN_LOGICAL2(nor, tcg_gen_nor_tl, 0x03, PPC_INTEGER);
79aceca5 1330/* or & or. */
9a64fbe4
FB
1331GEN_HANDLER(or, 0x1F, 0x1C, 0x0D, 0x00000000, PPC_INTEGER)
1332{
76a66253
JM
1333 int rs, ra, rb;
1334
1335 rs = rS(ctx->opcode);
1336 ra = rA(ctx->opcode);
1337 rb = rB(ctx->opcode);
1338 /* Optimisation for mr. ri case */
1339 if (rs != ra || rs != rb) {
26d67362
AJ
1340 if (rs != rb)
1341 tcg_gen_or_tl(cpu_gpr[ra], cpu_gpr[rs], cpu_gpr[rb]);
1342 else
1343 tcg_gen_mov_tl(cpu_gpr[ra], cpu_gpr[rs]);
76a66253 1344 if (unlikely(Rc(ctx->opcode) != 0))
26d67362 1345 gen_set_Rc0(ctx, cpu_gpr[ra]);
76a66253 1346 } else if (unlikely(Rc(ctx->opcode) != 0)) {
26d67362 1347 gen_set_Rc0(ctx, cpu_gpr[rs]);
c80f84e3
JM
1348#if defined(TARGET_PPC64)
1349 } else {
26d67362
AJ
1350 int prio = 0;
1351
c80f84e3
JM
1352 switch (rs) {
1353 case 1:
1354 /* Set process priority to low */
26d67362 1355 prio = 2;
c80f84e3
JM
1356 break;
1357 case 6:
1358 /* Set process priority to medium-low */
26d67362 1359 prio = 3;
c80f84e3
JM
1360 break;
1361 case 2:
1362 /* Set process priority to normal */
26d67362 1363 prio = 4;
c80f84e3 1364 break;
be147d08
JM
1365#if !defined(CONFIG_USER_ONLY)
1366 case 31:
1367 if (ctx->supervisor > 0) {
1368 /* Set process priority to very low */
26d67362 1369 prio = 1;
be147d08
JM
1370 }
1371 break;
1372 case 5:
1373 if (ctx->supervisor > 0) {
1374 /* Set process priority to medium-hight */
26d67362 1375 prio = 5;
be147d08
JM
1376 }
1377 break;
1378 case 3:
1379 if (ctx->supervisor > 0) {
1380 /* Set process priority to high */
26d67362 1381 prio = 6;
be147d08
JM
1382 }
1383 break;
be147d08
JM
1384 case 7:
1385 if (ctx->supervisor > 1) {
1386 /* Set process priority to very high */
26d67362 1387 prio = 7;
be147d08
JM
1388 }
1389 break;
be147d08 1390#endif
c80f84e3
JM
1391 default:
1392 /* nop */
1393 break;
1394 }
26d67362
AJ
1395 if (prio) {
1396 TCGv temp = tcg_temp_new(TCG_TYPE_TL);
1397 tcg_gen_ld_tl(temp, cpu_env, offsetof(CPUState, spr[SPR_PPR]));
1398 tcg_gen_andi_tl(temp, temp, ~0x001C000000000000ULL);
1399 tcg_gen_ori_tl(temp, temp, ((uint64_t)prio) << 50);
1400 tcg_gen_st_tl(temp, cpu_env, offsetof(CPUState, spr[SPR_PPR]));
1401 tcg_temp_free(temp);
1402 }
c80f84e3 1403#endif
9a64fbe4 1404 }
9a64fbe4 1405}
79aceca5 1406/* orc & orc. */
26d67362 1407GEN_LOGICAL2(orc, tcg_gen_orc_tl, 0x0C, PPC_INTEGER);
79aceca5 1408/* xor & xor. */
9a64fbe4
FB
1409GEN_HANDLER(xor, 0x1F, 0x1C, 0x09, 0x00000000, PPC_INTEGER)
1410{
9a64fbe4 1411 /* Optimisation for "set to zero" case */
26d67362
AJ
1412 if (rS(ctx->opcode) != rB(ctx->opcode))
1413 tcg_gen_xor_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)], cpu_gpr[rB(ctx->opcode)]);
1414 else
1415 tcg_gen_movi_tl(cpu_gpr[rA(ctx->opcode)], 0);
76a66253 1416 if (unlikely(Rc(ctx->opcode) != 0))
26d67362 1417 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
9a64fbe4 1418}
79aceca5
FB
1419/* ori */
1420GEN_HANDLER(ori, 0x18, 0xFF, 0xFF, 0x00000000, PPC_INTEGER)
1421{
76a66253 1422 target_ulong uimm = UIMM(ctx->opcode);
79aceca5 1423
9a64fbe4
FB
1424 if (rS(ctx->opcode) == rA(ctx->opcode) && uimm == 0) {
1425 /* NOP */
76a66253 1426 /* XXX: should handle special NOPs for POWER series */
9a64fbe4 1427 return;
76a66253 1428 }
26d67362 1429 tcg_gen_ori_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)], uimm);
79aceca5
FB
1430}
1431/* oris */
1432GEN_HANDLER(oris, 0x19, 0xFF, 0xFF, 0x00000000, PPC_INTEGER)
1433{
76a66253 1434 target_ulong uimm = UIMM(ctx->opcode);
79aceca5 1435
9a64fbe4
FB
1436 if (rS(ctx->opcode) == rA(ctx->opcode) && uimm == 0) {
1437 /* NOP */
1438 return;
76a66253 1439 }
26d67362 1440 tcg_gen_ori_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)], uimm << 16);
79aceca5
FB
1441}
1442/* xori */
1443GEN_HANDLER(xori, 0x1A, 0xFF, 0xFF, 0x00000000, PPC_INTEGER)
1444{
76a66253 1445 target_ulong uimm = UIMM(ctx->opcode);
9a64fbe4
FB
1446
1447 if (rS(ctx->opcode) == rA(ctx->opcode) && uimm == 0) {
1448 /* NOP */
1449 return;
1450 }
26d67362 1451 tcg_gen_xori_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)], uimm);
79aceca5 1452}
79aceca5
FB
1453/* xoris */
1454GEN_HANDLER(xoris, 0x1B, 0xFF, 0xFF, 0x00000000, PPC_INTEGER)
1455{
76a66253 1456 target_ulong uimm = UIMM(ctx->opcode);
9a64fbe4
FB
1457
1458 if (rS(ctx->opcode) == rA(ctx->opcode) && uimm == 0) {
1459 /* NOP */
1460 return;
1461 }
26d67362 1462 tcg_gen_xori_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)], uimm << 16);
79aceca5 1463}
d9bce9d9 1464/* popcntb : PowerPC 2.03 specification */
05332d70 1465GEN_HANDLER(popcntb, 0x1F, 0x03, 0x03, 0x0000F801, PPC_POPCNTB)
d9bce9d9 1466{
d9bce9d9
JM
1467#if defined(TARGET_PPC64)
1468 if (ctx->sf_mode)
26d67362 1469 tcg_gen_helper_1_1(helper_popcntb_64, cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)]);
d9bce9d9
JM
1470 else
1471#endif
26d67362 1472 tcg_gen_helper_1_1(helper_popcntb, cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)]);
d9bce9d9
JM
1473}
1474
1475#if defined(TARGET_PPC64)
1476/* extsw & extsw. */
26d67362 1477GEN_LOGICAL1(extsw, tcg_gen_ext32s_tl, 0x1E, PPC_64B);
d9bce9d9 1478/* cntlzd */
26d67362
AJ
1479GEN_HANDLER(cntlzd, 0x1F, 0x1A, 0x01, 0x00000000, PPC_64B)
1480{
1481 tcg_gen_helper_1_1(helper_cntlzd, cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)]);
1482 if (unlikely(Rc(ctx->opcode) != 0))
1483 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
1484}
d9bce9d9
JM
1485#endif
1486
79aceca5
FB
1487/*** Integer rotate ***/
1488/* rlwimi & rlwimi. */
1489GEN_HANDLER(rlwimi, 0x14, 0xFF, 0xFF, 0x00000000, PPC_INTEGER)
1490{
76a66253 1491 uint32_t mb, me, sh;
79aceca5
FB
1492
1493 mb = MB(ctx->opcode);
1494 me = ME(ctx->opcode);
76a66253 1495 sh = SH(ctx->opcode);
d03ef511
AJ
1496 if (likely(sh == 0 && mb == 0 && me == 31)) {
1497 tcg_gen_ext32u_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)]);
1498 } else {
1499 TCGv t0, t1;
1500 target_ulong mask;
1501
1502 t0 = tcg_temp_new(TCG_TYPE_TL);
1503 t1 = tcg_temp_new(TCG_TYPE_TL);
1504 if (likely(sh == 0)) {
1505 tcg_gen_mov_tl(t0, cpu_gpr[rS(ctx->opcode)]);
1506 } else {
1507 tcg_gen_ext32u_tl(t1, cpu_gpr[rS(ctx->opcode)]);
1508 tcg_gen_shli_tl(t0, t1, sh);
1509 tcg_gen_shri_tl(t1, t1, 32 - sh);
1510 tcg_gen_or_tl(t0, t0, t1);
76a66253 1511 }
76a66253 1512#if defined(TARGET_PPC64)
d03ef511
AJ
1513 mb += 32;
1514 me += 32;
76a66253 1515#endif
d03ef511
AJ
1516 mask = MASK(mb, me);
1517 tcg_gen_andi_tl(t0, t0, mask);
1518 tcg_gen_andi_tl(t1, cpu_gpr[rA(ctx->opcode)], ~mask);
1519 tcg_gen_or_tl(cpu_gpr[rA(ctx->opcode)], t0, t1);
1520 tcg_temp_free(t0);
1521 tcg_temp_free(t1);
1522 }
76a66253 1523 if (unlikely(Rc(ctx->opcode) != 0))
d03ef511 1524 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
79aceca5
FB
1525}
1526/* rlwinm & rlwinm. */
1527GEN_HANDLER(rlwinm, 0x15, 0xFF, 0xFF, 0x00000000, PPC_INTEGER)
1528{
1529 uint32_t mb, me, sh;
3b46e624 1530
79aceca5
FB
1531 sh = SH(ctx->opcode);
1532 mb = MB(ctx->opcode);
1533 me = ME(ctx->opcode);
d03ef511
AJ
1534
1535 if (likely(mb == 0 && me == (31 - sh))) {
1536 if (likely(sh == 0)) {
1537 tcg_gen_ext32u_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)]);
1538 } else {
1539 TCGv t0 = tcg_temp_new(TCG_TYPE_TL);
1540 tcg_gen_ext32u_tl(t0, cpu_gpr[rS(ctx->opcode)]);
1541 tcg_gen_shli_tl(t0, t0, sh);
1542 tcg_gen_ext32u_tl(cpu_gpr[rA(ctx->opcode)], t0);
1543 tcg_temp_free(t0);
79aceca5 1544 }
d03ef511
AJ
1545 } else if (likely(sh != 0 && me == 31 && sh == (32 - mb))) {
1546 TCGv t0 = tcg_temp_new(TCG_TYPE_TL);
1547 tcg_gen_ext32u_tl(t0, cpu_gpr[rS(ctx->opcode)]);
1548 tcg_gen_shri_tl(t0, t0, mb);
1549 tcg_gen_ext32u_tl(cpu_gpr[rA(ctx->opcode)], t0);
1550 tcg_temp_free(t0);
1551 } else {
1552 TCGv t0 = tcg_temp_new(TCG_TYPE_TL);
1553 if (likely(sh != 0)) {
1554 TCGv t1 = tcg_temp_new(TCG_TYPE_TL);
1555 tcg_gen_ext32u_tl(t0, cpu_gpr[rS(ctx->opcode)]);
1556 tcg_gen_shli_tl(t1, t0, sh);
1557 tcg_gen_shri_tl(t0, t0, 32 - sh);
1558 tcg_gen_or_tl(t0, t0, t1);
1559 tcg_temp_free(t1);
1560 } else {
1561 tcg_gen_mov_tl(t0, cpu_gpr[rS(ctx->opcode)]);
79aceca5 1562 }
76a66253 1563#if defined(TARGET_PPC64)
d03ef511
AJ
1564 mb += 32;
1565 me += 32;
76a66253 1566#endif
d03ef511
AJ
1567 tcg_gen_andi_tl(cpu_gpr[rA(ctx->opcode)], t0, MASK(mb, me));
1568 tcg_temp_free(t0);
1569 }
76a66253 1570 if (unlikely(Rc(ctx->opcode) != 0))
d03ef511 1571 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
79aceca5
FB
1572}
1573/* rlwnm & rlwnm. */
1574GEN_HANDLER(rlwnm, 0x17, 0xFF, 0xFF, 0x00000000, PPC_INTEGER)
1575{
1576 uint32_t mb, me;
d03ef511 1577 TCGv t0, t1, t2, t3;
79aceca5
FB
1578
1579 mb = MB(ctx->opcode);
1580 me = ME(ctx->opcode);
d03ef511
AJ
1581 t0 = tcg_temp_new(TCG_TYPE_TL);
1582 tcg_gen_andi_tl(t0, cpu_gpr[rB(ctx->opcode)], 0x1f);
1583 t1 = tcg_temp_new(TCG_TYPE_TL);
1584 tcg_gen_ext32u_tl(t1, cpu_gpr[rS(ctx->opcode)]);
1585 t2 = tcg_temp_new(TCG_TYPE_TL);
1586 tcg_gen_shl_tl(t2, t1, t0);
1587 t3 = tcg_const_tl(32);
1588 tcg_gen_sub_tl(t0, t3, t0);
1589 tcg_temp_free(t3);
1590 tcg_gen_shr_tl(t1, t1, t0);
1591 tcg_temp_free(t0);
1592 tcg_gen_or_tl(t2, t2, t1);
1593 tcg_temp_free(t1);
76a66253
JM
1594 if (unlikely(mb != 0 || me != 31)) {
1595#if defined(TARGET_PPC64)
1596 mb += 32;
1597 me += 32;
1598#endif
d03ef511
AJ
1599 tcg_gen_andi_tl(cpu_gpr[rA(ctx->opcode)], t2, MASK(mb, me));
1600 } else {
1601 tcg_gen_ext32u_tl(cpu_gpr[rA(ctx->opcode)], t2);
79aceca5 1602 }
d03ef511 1603 tcg_temp_free(t2);
76a66253 1604 if (unlikely(Rc(ctx->opcode) != 0))
d03ef511 1605 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
79aceca5
FB
1606}
1607
d9bce9d9
JM
1608#if defined(TARGET_PPC64)
1609#define GEN_PPC64_R2(name, opc1, opc2) \
c7697e1f 1610GEN_HANDLER2(name##0, stringify(name), opc1, opc2, 0xFF, 0x00000000, PPC_64B) \
d9bce9d9
JM
1611{ \
1612 gen_##name(ctx, 0); \
1613} \
c7697e1f
JM
1614GEN_HANDLER2(name##1, stringify(name), opc1, opc2 | 0x10, 0xFF, 0x00000000, \
1615 PPC_64B) \
d9bce9d9
JM
1616{ \
1617 gen_##name(ctx, 1); \
1618}
1619#define GEN_PPC64_R4(name, opc1, opc2) \
c7697e1f 1620GEN_HANDLER2(name##0, stringify(name), opc1, opc2, 0xFF, 0x00000000, PPC_64B) \
d9bce9d9
JM
1621{ \
1622 gen_##name(ctx, 0, 0); \
1623} \
c7697e1f
JM
1624GEN_HANDLER2(name##1, stringify(name), opc1, opc2 | 0x01, 0xFF, 0x00000000, \
1625 PPC_64B) \
d9bce9d9
JM
1626{ \
1627 gen_##name(ctx, 0, 1); \
1628} \
c7697e1f
JM
1629GEN_HANDLER2(name##2, stringify(name), opc1, opc2 | 0x10, 0xFF, 0x00000000, \
1630 PPC_64B) \
d9bce9d9
JM
1631{ \
1632 gen_##name(ctx, 1, 0); \
1633} \
c7697e1f
JM
1634GEN_HANDLER2(name##3, stringify(name), opc1, opc2 | 0x11, 0xFF, 0x00000000, \
1635 PPC_64B) \
d9bce9d9
JM
1636{ \
1637 gen_##name(ctx, 1, 1); \
1638}
51789c41 1639
b068d6a7
JM
1640static always_inline void gen_rldinm (DisasContext *ctx, uint32_t mb,
1641 uint32_t me, uint32_t sh)
51789c41 1642{
d03ef511
AJ
1643 if (likely(sh != 0 && mb == 0 && me == (63 - sh))) {
1644 tcg_gen_shli_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)], sh);
1645 } else if (likely(sh != 0 && me == 63 && sh == (64 - mb))) {
1646 tcg_gen_shri_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)], mb);
1647 } else {
1648 TCGv t0 = tcg_temp_new(TCG_TYPE_TL);
1649 if (likely(sh != 0)) {
1650 TCGv t1 = tcg_temp_new(TCG_TYPE_TL);
1651 tcg_gen_shli_tl(t0, cpu_gpr[rS(ctx->opcode)], sh);
1652 tcg_gen_shri_tl(t1, cpu_gpr[rS(ctx->opcode)], 64 - sh);
1653 tcg_gen_or_tl(t0, t0, t1);
1654 tcg_temp_free(t1);
1655 } else {
1656 tcg_gen_mov_tl(t0, cpu_gpr[rS(ctx->opcode)]);
51789c41 1657 }
d03ef511
AJ
1658 if (likely(mb == 0 && me == 63)) {
1659 tcg_gen_ext32u_tl(cpu_gpr[rA(ctx->opcode)], t0);
1660 } else {
1661 tcg_gen_andi_tl(cpu_gpr[rA(ctx->opcode)], t0, MASK(mb, me));
51789c41 1662 }
d03ef511 1663 tcg_temp_free(t0);
51789c41 1664 }
51789c41 1665 if (unlikely(Rc(ctx->opcode) != 0))
d03ef511 1666 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
51789c41 1667}
d9bce9d9 1668/* rldicl - rldicl. */
b068d6a7 1669static always_inline void gen_rldicl (DisasContext *ctx, int mbn, int shn)
d9bce9d9 1670{
51789c41 1671 uint32_t sh, mb;
d9bce9d9 1672
9d53c753
JM
1673 sh = SH(ctx->opcode) | (shn << 5);
1674 mb = MB(ctx->opcode) | (mbn << 5);
51789c41 1675 gen_rldinm(ctx, mb, 63, sh);
d9bce9d9 1676}
51789c41 1677GEN_PPC64_R4(rldicl, 0x1E, 0x00);
d9bce9d9 1678/* rldicr - rldicr. */
b068d6a7 1679static always_inline void gen_rldicr (DisasContext *ctx, int men, int shn)
d9bce9d9 1680{
51789c41 1681 uint32_t sh, me;
d9bce9d9 1682
9d53c753
JM
1683 sh = SH(ctx->opcode) | (shn << 5);
1684 me = MB(ctx->opcode) | (men << 5);
51789c41 1685 gen_rldinm(ctx, 0, me, sh);
d9bce9d9 1686}
51789c41 1687GEN_PPC64_R4(rldicr, 0x1E, 0x02);
d9bce9d9 1688/* rldic - rldic. */
b068d6a7 1689static always_inline void gen_rldic (DisasContext *ctx, int mbn, int shn)
d9bce9d9 1690{
51789c41 1691 uint32_t sh, mb;
d9bce9d9 1692
9d53c753
JM
1693 sh = SH(ctx->opcode) | (shn << 5);
1694 mb = MB(ctx->opcode) | (mbn << 5);
51789c41
JM
1695 gen_rldinm(ctx, mb, 63 - sh, sh);
1696}
1697GEN_PPC64_R4(rldic, 0x1E, 0x04);
1698
b068d6a7
JM
1699static always_inline void gen_rldnm (DisasContext *ctx, uint32_t mb,
1700 uint32_t me)
51789c41 1701{
d03ef511
AJ
1702 TCGv t0, t1, t2;
1703
1704 mb = MB(ctx->opcode);
1705 me = ME(ctx->opcode);
1706 t0 = tcg_temp_new(TCG_TYPE_TL);
1707 tcg_gen_andi_tl(t0, cpu_gpr[rB(ctx->opcode)], 0x3f);
1708 t1 = tcg_temp_new(TCG_TYPE_TL);
1709 tcg_gen_shl_tl(t1, cpu_gpr[rS(ctx->opcode)], t0);
1710 t2 = tcg_const_tl(32);
1711 tcg_gen_sub_tl(t0, t2, t0);
1712 tcg_temp_free(t2);
1713 tcg_gen_shr_tl(t0, cpu_gpr[rS(ctx->opcode)], t0);
1714 tcg_gen_or_tl(t1, t1, t0);
1715 tcg_temp_free(t0);
51789c41 1716 if (unlikely(mb != 0 || me != 63)) {
d03ef511
AJ
1717 tcg_gen_andi_tl(cpu_gpr[rA(ctx->opcode)], t1, MASK(mb, me));
1718 } else
1719 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], t1);
1720 tcg_temp_free(t1);
51789c41 1721 if (unlikely(Rc(ctx->opcode) != 0))
d03ef511 1722 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
d9bce9d9 1723}
51789c41 1724
d9bce9d9 1725/* rldcl - rldcl. */
b068d6a7 1726static always_inline void gen_rldcl (DisasContext *ctx, int mbn)
d9bce9d9 1727{
51789c41 1728 uint32_t mb;
d9bce9d9 1729
9d53c753 1730 mb = MB(ctx->opcode) | (mbn << 5);
51789c41 1731 gen_rldnm(ctx, mb, 63);
d9bce9d9 1732}
36081602 1733GEN_PPC64_R2(rldcl, 0x1E, 0x08);
d9bce9d9 1734/* rldcr - rldcr. */
b068d6a7 1735static always_inline void gen_rldcr (DisasContext *ctx, int men)
d9bce9d9 1736{
51789c41 1737 uint32_t me;
d9bce9d9 1738
9d53c753 1739 me = MB(ctx->opcode) | (men << 5);
51789c41 1740 gen_rldnm(ctx, 0, me);
d9bce9d9 1741}
36081602 1742GEN_PPC64_R2(rldcr, 0x1E, 0x09);
d9bce9d9 1743/* rldimi - rldimi. */
b068d6a7 1744static always_inline void gen_rldimi (DisasContext *ctx, int mbn, int shn)
d9bce9d9 1745{
271a916e 1746 uint32_t sh, mb, me;
d9bce9d9 1747
9d53c753
JM
1748 sh = SH(ctx->opcode) | (shn << 5);
1749 mb = MB(ctx->opcode) | (mbn << 5);
271a916e 1750 me = 63 - sh;
d03ef511
AJ
1751 if (unlikely(sh == 0 && mb == 0)) {
1752 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)]);
1753 } else {
1754 TCGv t0, t1;
1755 target_ulong mask;
1756
1757 t0 = tcg_temp_new(TCG_TYPE_TL);
1758 t1 = tcg_temp_new(TCG_TYPE_TL);
1759 if (likely(sh == 0)) {
1760 tcg_gen_mov_tl(t0, cpu_gpr[rS(ctx->opcode)]);
1761 } else {
1762 tcg_gen_shli_tl(t0, cpu_gpr[rS(ctx->opcode)], sh);
1763 tcg_gen_shri_tl(t1, cpu_gpr[rS(ctx->opcode)], 64 - sh);
1764 tcg_gen_or_tl(t0, t0, t1);
51789c41 1765 }
d03ef511
AJ
1766 mask = MASK(mb, me);
1767 tcg_gen_andi_tl(t0, t0, mask);
1768 tcg_gen_andi_tl(t1, cpu_gpr[rA(ctx->opcode)], ~mask);
1769 tcg_gen_or_tl(cpu_gpr[rA(ctx->opcode)], t0, t1);
1770 tcg_temp_free(t0);
1771 tcg_temp_free(t1);
51789c41 1772 }
51789c41 1773 if (unlikely(Rc(ctx->opcode) != 0))
d03ef511 1774 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
d9bce9d9 1775}
36081602 1776GEN_PPC64_R4(rldimi, 0x1E, 0x06);
d9bce9d9
JM
1777#endif
1778
79aceca5
FB
1779/*** Integer shift ***/
1780/* slw & slw. */
26d67362
AJ
1781GEN_HANDLER(slw, 0x1F, 0x18, 0x00, 0x00000000, PPC_INTEGER)
1782{
1783 TCGv temp;
1784 int l1, l2;
1785 l1 = gen_new_label();
1786 l2 = gen_new_label();
1787
1788 temp = tcg_temp_local_new(TCG_TYPE_TL);
1789 tcg_gen_andi_tl(temp, cpu_gpr[rB(ctx->opcode)], 0x20);
1790 tcg_gen_brcondi_tl(TCG_COND_EQ, temp, 0, l1);
1791 tcg_gen_movi_tl(cpu_gpr[rA(ctx->opcode)], 0);
1792 tcg_gen_br(l2);
1793 gen_set_label(l1);
1794 tcg_gen_andi_tl(temp, cpu_gpr[rB(ctx->opcode)], 0x3f);
1795 tcg_gen_shl_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)], temp);
1796 tcg_gen_ext32u_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
1797 gen_set_label(l2);
1798 tcg_temp_free(temp);
1799 if (unlikely(Rc(ctx->opcode) != 0))
1800 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
1801}
79aceca5 1802/* sraw & sraw. */
26d67362
AJ
1803GEN_HANDLER(sraw, 0x1F, 0x18, 0x18, 0x00000000, PPC_INTEGER)
1804{
1805 tcg_gen_helper_1_2(helper_sraw, cpu_gpr[rA(ctx->opcode)],
1806 cpu_gpr[rS(ctx->opcode)], cpu_gpr[rB(ctx->opcode)]);
1807 if (unlikely(Rc(ctx->opcode) != 0))
1808 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
1809}
79aceca5
FB
1810/* srawi & srawi. */
1811GEN_HANDLER(srawi, 0x1F, 0x18, 0x19, 0x00000000, PPC_INTEGER)
1812{
26d67362
AJ
1813 int sh = SH(ctx->opcode);
1814 if (sh != 0) {
1815 int l1, l2;
1816 TCGv temp;
1817 l1 = gen_new_label();
1818 l2 = gen_new_label();
1819 temp = tcg_temp_local_new(TCG_TYPE_TL);
1820 tcg_gen_ext32s_tl(temp, cpu_gpr[rS(ctx->opcode)]);
1821 tcg_gen_brcondi_tl(TCG_COND_GE, temp, 0, l1);
1822 tcg_gen_andi_tl(temp, cpu_gpr[rS(ctx->opcode)], (1ULL << sh) - 1);
1823 tcg_gen_brcondi_tl(TCG_COND_EQ, temp, 0, l1);
1824 tcg_gen_ori_i32(cpu_xer, cpu_xer, 1 << XER_CA);
1825 tcg_gen_br(l2);
1826 gen_set_label(l1);
1827 tcg_gen_andi_i32(cpu_xer, cpu_xer, ~(1 << XER_CA));
1828 gen_set_label(l2);
1829 tcg_gen_ext32s_tl(temp, cpu_gpr[rS(ctx->opcode)]);
1830 tcg_gen_sari_tl(cpu_gpr[rA(ctx->opcode)], temp, sh);
1831 tcg_temp_free(temp);
1832 } else {
1833 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)]);
1834 tcg_gen_andi_i32(cpu_xer, cpu_xer, ~(1 << XER_CA));
d9bce9d9 1835 }
76a66253 1836 if (unlikely(Rc(ctx->opcode) != 0))
26d67362 1837 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
79aceca5
FB
1838}
1839/* srw & srw. */
26d67362
AJ
1840GEN_HANDLER(srw, 0x1F, 0x18, 0x10, 0x00000000, PPC_INTEGER)
1841{
1842 TCGv temp;
1843 int l1, l2;
1844 l1 = gen_new_label();
1845 l2 = gen_new_label();
d9bce9d9 1846
26d67362
AJ
1847 temp = tcg_temp_local_new(TCG_TYPE_TL);
1848 tcg_gen_andi_tl(temp, cpu_gpr[rB(ctx->opcode)], 0x20);
1849 tcg_gen_brcondi_tl(TCG_COND_EQ, temp, 0, l1);
1850 tcg_gen_movi_tl(cpu_gpr[rA(ctx->opcode)], 0);
1851 tcg_gen_br(l2);
1852 gen_set_label(l1);
1853 tcg_gen_andi_tl(temp, cpu_gpr[rB(ctx->opcode)], 0x3f);
1854 tcg_gen_shr_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)], temp);
1855 tcg_gen_ext32u_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rA(ctx->opcode)]);
1856 gen_set_label(l2);
1857 tcg_temp_free(temp);
1858 if (unlikely(Rc(ctx->opcode) != 0))
1859 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
1860}
d9bce9d9
JM
1861#if defined(TARGET_PPC64)
1862/* sld & sld. */
26d67362
AJ
1863GEN_HANDLER(sld, 0x1F, 0x1B, 0x00, 0x00000000, PPC_64B)
1864{
1865 TCGv temp;
1866 int l1, l2;
1867 l1 = gen_new_label();
1868 l2 = gen_new_label();
1869
1870 temp = tcg_temp_local_new(TCG_TYPE_TL);
1871 tcg_gen_andi_tl(temp, cpu_gpr[rB(ctx->opcode)], 0x40);
1872 tcg_gen_brcondi_tl(TCG_COND_EQ, temp, 0, l1);
1873 tcg_gen_movi_tl(cpu_gpr[rA(ctx->opcode)], 0);
1874 tcg_gen_br(l2);
1875 gen_set_label(l1);
1876 tcg_gen_andi_tl(temp, cpu_gpr[rB(ctx->opcode)], 0x7f);
1877 tcg_gen_shl_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)], temp);
1878 gen_set_label(l2);
1879 tcg_temp_free(temp);
1880 if (unlikely(Rc(ctx->opcode) != 0))
1881 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
1882}
d9bce9d9 1883/* srad & srad. */
26d67362
AJ
1884GEN_HANDLER(srad, 0x1F, 0x1A, 0x18, 0x00000000, PPC_64B)
1885{
1886 tcg_gen_helper_1_2(helper_srad, cpu_gpr[rA(ctx->opcode)],
1887 cpu_gpr[rS(ctx->opcode)], cpu_gpr[rB(ctx->opcode)]);
1888 if (unlikely(Rc(ctx->opcode) != 0))
1889 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
1890}
d9bce9d9 1891/* sradi & sradi. */
b068d6a7 1892static always_inline void gen_sradi (DisasContext *ctx, int n)
d9bce9d9 1893{
26d67362 1894 int sh = SH(ctx->opcode) + (n << 5);
d9bce9d9 1895 if (sh != 0) {
26d67362
AJ
1896 int l1, l2;
1897 TCGv temp;
1898 l1 = gen_new_label();
1899 l2 = gen_new_label();
1900 tcg_gen_brcondi_tl(TCG_COND_GE, cpu_gpr[rS(ctx->opcode)], 0, l1);
1901 temp = tcg_temp_new(TCG_TYPE_TL);
1902 tcg_gen_andi_tl(temp, cpu_gpr[rS(ctx->opcode)], (1ULL << sh) - 1);
1903 tcg_gen_brcondi_tl(TCG_COND_EQ, temp, 0, l1);
1904 tcg_gen_ori_i32(cpu_xer, cpu_xer, 1 << XER_CA);
1905 tcg_gen_br(l2);
1906 gen_set_label(l1);
1907 tcg_gen_andi_i32(cpu_xer, cpu_xer, ~(1 << XER_CA));
1908 gen_set_label(l2);
1909 tcg_gen_sari_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)], sh);
1910 } else {
1911 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)]);
1912 tcg_gen_andi_i32(cpu_xer, cpu_xer, ~(1 << XER_CA));
d9bce9d9 1913 }
d9bce9d9 1914 if (unlikely(Rc(ctx->opcode) != 0))
26d67362 1915 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
d9bce9d9 1916}
c7697e1f 1917GEN_HANDLER2(sradi0, "sradi", 0x1F, 0x1A, 0x19, 0x00000000, PPC_64B)
d9bce9d9
JM
1918{
1919 gen_sradi(ctx, 0);
1920}
c7697e1f 1921GEN_HANDLER2(sradi1, "sradi", 0x1F, 0x1B, 0x19, 0x00000000, PPC_64B)
d9bce9d9
JM
1922{
1923 gen_sradi(ctx, 1);
1924}
1925/* srd & srd. */
26d67362
AJ
1926GEN_HANDLER(srd, 0x1F, 0x1B, 0x10, 0x00000000, PPC_64B)
1927{
1928 TCGv temp;
1929 int l1, l2;
1930 l1 = gen_new_label();
1931 l2 = gen_new_label();
1932
1933 temp = tcg_temp_local_new(TCG_TYPE_TL);
1934 tcg_gen_andi_tl(temp, cpu_gpr[rB(ctx->opcode)], 0x40);
1935 tcg_gen_brcondi_tl(TCG_COND_EQ, temp, 0, l1);
1936 tcg_gen_movi_tl(cpu_gpr[rA(ctx->opcode)], 0);
1937 tcg_gen_br(l2);
1938 gen_set_label(l1);
1939 tcg_gen_andi_tl(temp, cpu_gpr[rB(ctx->opcode)], 0x7f);
1940 tcg_gen_shr_tl(cpu_gpr[rA(ctx->opcode)], cpu_gpr[rS(ctx->opcode)], temp);
1941 gen_set_label(l2);
1942 tcg_temp_free(temp);
1943 if (unlikely(Rc(ctx->opcode) != 0))
1944 gen_set_Rc0(ctx, cpu_gpr[rA(ctx->opcode)]);
1945}
d9bce9d9 1946#endif
79aceca5
FB
1947
1948/*** Floating-Point arithmetic ***/
7c58044c 1949#define _GEN_FLOAT_ACB(name, op, op1, op2, isfloat, set_fprf, type) \
a750fc0b 1950GEN_HANDLER(f##name, op1, op2, 0xFF, 0x00000000, type) \
9a64fbe4 1951{ \
76a66253 1952 if (unlikely(!ctx->fpu_enabled)) { \
e1833e1f 1953 GEN_EXCP_NO_FP(ctx); \
3cc62370
FB
1954 return; \
1955 } \
a5e26afa
AJ
1956 tcg_gen_mov_i64(cpu_FT[0], cpu_fpr[rA(ctx->opcode)]); \
1957 tcg_gen_mov_i64(cpu_FT[1], cpu_fpr[rC(ctx->opcode)]); \
1958 tcg_gen_mov_i64(cpu_FT[2], cpu_fpr[rB(ctx->opcode)]); \
7c58044c 1959 gen_reset_fpstatus(); \
4ecc3190
FB
1960 gen_op_f##op(); \
1961 if (isfloat) { \
1962 gen_op_frsp(); \
1963 } \
a5e26afa 1964 tcg_gen_mov_i64(cpu_fpr[rD(ctx->opcode)], cpu_FT[0]); \
7c58044c 1965 gen_compute_fprf(set_fprf, Rc(ctx->opcode) != 0); \
9a64fbe4
FB
1966}
1967
7c58044c
JM
1968#define GEN_FLOAT_ACB(name, op2, set_fprf, type) \
1969_GEN_FLOAT_ACB(name, name, 0x3F, op2, 0, set_fprf, type); \
1970_GEN_FLOAT_ACB(name##s, name, 0x3B, op2, 1, set_fprf, type);
9a64fbe4 1971
7c58044c
JM
1972#define _GEN_FLOAT_AB(name, op, op1, op2, inval, isfloat, set_fprf, type) \
1973GEN_HANDLER(f##name, op1, op2, 0xFF, inval, type) \
9a64fbe4 1974{ \
76a66253 1975 if (unlikely(!ctx->fpu_enabled)) { \
e1833e1f 1976 GEN_EXCP_NO_FP(ctx); \
3cc62370
FB
1977 return; \
1978 } \
a5e26afa
AJ
1979 tcg_gen_mov_i64(cpu_FT[0], cpu_fpr[rA(ctx->opcode)]); \
1980 tcg_gen_mov_i64(cpu_FT[1], cpu_fpr[rB(ctx->opcode)]); \
7c58044c 1981 gen_reset_fpstatus(); \
4ecc3190
FB
1982 gen_op_f##op(); \
1983 if (isfloat) { \
1984 gen_op_frsp(); \
1985 } \
a5e26afa 1986 tcg_gen_mov_i64(cpu_fpr[rD(ctx->opcode)], cpu_FT[0]); \
7c58044c 1987 gen_compute_fprf(set_fprf, Rc(ctx->opcode) != 0); \
9a64fbe4 1988}
7c58044c
JM
1989#define GEN_FLOAT_AB(name, op2, inval, set_fprf, type) \
1990_GEN_FLOAT_AB(name, name, 0x3F, op2, inval, 0, set_fprf, type); \
1991_GEN_FLOAT_AB(name##s, name, 0x3B, op2, inval, 1, set_fprf, type);
9a64fbe4 1992
7c58044c
JM
1993#define _GEN_FLOAT_AC(name, op, op1, op2, inval, isfloat, set_fprf, type) \
1994GEN_HANDLER(f##name, op1, op2, 0xFF, inval, type) \
9a64fbe4 1995{ \
76a66253 1996 if (unlikely(!ctx->fpu_enabled)) { \
e1833e1f 1997 GEN_EXCP_NO_FP(ctx); \
3cc62370
FB
1998 return; \
1999 } \
a5e26afa
AJ
2000 tcg_gen_mov_i64(cpu_FT[0], cpu_fpr[rA(ctx->opcode)]); \
2001 tcg_gen_mov_i64(cpu_FT[1], cpu_fpr[rC(ctx->opcode)]); \
7c58044c 2002 gen_reset_fpstatus(); \
4ecc3190
FB
2003 gen_op_f##op(); \
2004 if (isfloat) { \
2005 gen_op_frsp(); \
2006 } \
a5e26afa 2007 tcg_gen_mov_i64(cpu_fpr[rD(ctx->opcode)], cpu_FT[0]); \
7c58044c 2008 gen_compute_fprf(set_fprf, Rc(ctx->opcode) != 0); \
9a64fbe4 2009}
7c58044c
JM
2010#define GEN_FLOAT_AC(name, op2, inval, set_fprf, type) \
2011_GEN_FLOAT_AC(name, name, 0x3F, op2, inval, 0, set_fprf, type); \
2012_GEN_FLOAT_AC(name##s, name, 0x3B, op2, inval, 1, set_fprf, type);
9a64fbe4 2013
7c58044c 2014#define GEN_FLOAT_B(name, op2, op3, set_fprf, type) \
a750fc0b 2015GEN_HANDLER(f##name, 0x3F, op2, op3, 0x001F0000, type) \
9a64fbe4 2016{ \
76a66253 2017 if (unlikely(!ctx->fpu_enabled)) { \
e1833e1f 2018 GEN_EXCP_NO_FP(ctx); \
3cc62370
FB
2019 return; \
2020 } \
a5e26afa 2021 tcg_gen_mov_i64(cpu_FT[0], cpu_fpr[rB(ctx->opcode)]); \
7c58044c 2022 gen_reset_fpstatus(); \
9a64fbe4 2023 gen_op_f##name(); \
a5e26afa 2024 tcg_gen_mov_i64(cpu_fpr[rD(ctx->opcode)], cpu_FT[0]); \
7c58044c 2025 gen_compute_fprf(set_fprf, Rc(ctx->opcode) != 0); \
79aceca5
FB
2026}
2027
7c58044c 2028#define GEN_FLOAT_BS(name, op1, op2, set_fprf, type) \
a750fc0b 2029GEN_HANDLER(f##name, op1, op2, 0xFF, 0x001F07C0, type) \
9a64fbe4 2030{ \
76a66253 2031 if (unlikely(!ctx->fpu_enabled)) { \
e1833e1f 2032 GEN_EXCP_NO_FP(ctx); \
3cc62370
FB
2033 return; \
2034 } \
a5e26afa 2035 tcg_gen_mov_i64(cpu_FT[0], cpu_fpr[rB(ctx->opcode)]); \
7c58044c 2036 gen_reset_fpstatus(); \
9a64fbe4 2037 gen_op_f##name(); \
a5e26afa 2038 tcg_gen_mov_i64(cpu_fpr[rD(ctx->opcode)], cpu_FT[0]); \
7c58044c 2039 gen_compute_fprf(set_fprf, Rc(ctx->opcode) != 0); \
79aceca5
FB
2040}
2041
9a64fbe4 2042/* fadd - fadds */
7c58044c 2043GEN_FLOAT_AB(add, 0x15, 0x000007C0, 1, PPC_FLOAT);
4ecc3190 2044/* fdiv - fdivs */
7c58044c 2045GEN_FLOAT_AB(div, 0x12, 0x000007C0, 1, PPC_FLOAT);
4ecc3190 2046/* fmul - fmuls */
7c58044c 2047GEN_FLOAT_AC(mul, 0x19, 0x0000F800, 1, PPC_FLOAT);
79aceca5 2048
d7e4b87e 2049/* fre */
7c58044c 2050GEN_FLOAT_BS(re, 0x3F, 0x18, 1, PPC_FLOAT_EXT);
d7e4b87e 2051
a750fc0b 2052/* fres */
7c58044c 2053GEN_FLOAT_BS(res, 0x3B, 0x18, 1, PPC_FLOAT_FRES);
79aceca5 2054
a750fc0b 2055/* frsqrte */
7c58044c
JM
2056GEN_FLOAT_BS(rsqrte, 0x3F, 0x1A, 1, PPC_FLOAT_FRSQRTE);
2057
2058/* frsqrtes */
2059static always_inline void gen_op_frsqrtes (void)
2060{
2061 gen_op_frsqrte();
2062 gen_op_frsp();
2063}
1b413d55 2064GEN_FLOAT_BS(rsqrtes, 0x3B, 0x1A, 1, PPC_FLOAT_FRSQRTES);
79aceca5 2065
a750fc0b 2066/* fsel */
7c58044c 2067_GEN_FLOAT_ACB(sel, sel, 0x3F, 0x17, 0, 0, PPC_FLOAT_FSEL);
4ecc3190 2068/* fsub - fsubs */
7c58044c 2069GEN_FLOAT_AB(sub, 0x14, 0x000007C0, 1, PPC_FLOAT);
79aceca5
FB
2070/* Optional: */
2071/* fsqrt */
a750fc0b 2072GEN_HANDLER(fsqrt, 0x3F, 0x16, 0xFF, 0x001F07C0, PPC_FLOAT_FSQRT)
c7d344af 2073{
76a66253 2074 if (unlikely(!ctx->fpu_enabled)) {
e1833e1f 2075 GEN_EXCP_NO_FP(ctx);
c7d344af
FB
2076 return;
2077 }
a5e26afa 2078 tcg_gen_mov_i64(cpu_FT[0], cpu_fpr[rB(ctx->opcode)]);
7c58044c 2079 gen_reset_fpstatus();
c7d344af 2080 gen_op_fsqrt();
a5e26afa 2081 tcg_gen_mov_i64(cpu_fpr[rD(ctx->opcode)], cpu_FT[0]);
7c58044c 2082 gen_compute_fprf(1, Rc(ctx->opcode) != 0);
c7d344af 2083}
79aceca5 2084
a750fc0b 2085GEN_HANDLER(fsqrts, 0x3B, 0x16, 0xFF, 0x001F07C0, PPC_FLOAT_FSQRT)
79aceca5 2086{
76a66253 2087 if (unlikely(!ctx->fpu_enabled)) {
e1833e1f 2088 GEN_EXCP_NO_FP(ctx);
3cc62370
FB
2089 return;
2090 }
a5e26afa 2091 tcg_gen_mov_i64(cpu_FT[0], cpu_fpr[rB(ctx->opcode)]);
7c58044c 2092 gen_reset_fpstatus();
4ecc3190
FB
2093 gen_op_fsqrt();
2094 gen_op_frsp();
a5e26afa 2095 tcg_gen_mov_i64(cpu_fpr[rD(ctx->opcode)], cpu_FT[0]);
7c58044c 2096 gen_compute_fprf(1, Rc(ctx->opcode) != 0);
79aceca5
FB
2097}
2098
2099/*** Floating-Point multiply-and-add ***/
4ecc3190 2100/* fmadd - fmadds */
7c58044c 2101GEN_FLOAT_ACB(madd, 0x1D, 1, PPC_FLOAT);
4ecc3190 2102/* fmsub - fmsubs */
7c58044c 2103GEN_FLOAT_ACB(msub, 0x1C, 1, PPC_FLOAT);
4ecc3190 2104/* fnmadd - fnmadds */
7c58044c 2105GEN_FLOAT_ACB(nmadd, 0x1F, 1, PPC_FLOAT);
4ecc3190 2106/* fnmsub - fnmsubs */
7c58044c 2107GEN_FLOAT_ACB(nmsub, 0x1E, 1, PPC_FLOAT);
79aceca5
FB
2108
2109/*** Floating-Point round & convert ***/
2110/* fctiw */
7c58044c 2111GEN_FLOAT_B(ctiw, 0x0E, 0x00, 0, PPC_FLOAT);
79aceca5 2112/* fctiwz */
7c58044c 2113GEN_FLOAT_B(ctiwz, 0x0F, 0x00, 0, PPC_FLOAT);
79aceca5 2114/* frsp */
7c58044c 2115GEN_FLOAT_B(rsp, 0x0C, 0x00, 1, PPC_FLOAT);
426613db
JM
2116#if defined(TARGET_PPC64)
2117/* fcfid */
7c58044c 2118GEN_FLOAT_B(cfid, 0x0E, 0x1A, 1, PPC_64B);
426613db 2119/* fctid */
7c58044c 2120GEN_FLOAT_B(ctid, 0x0E, 0x19, 0, PPC_64B);
426613db 2121/* fctidz */
7c58044c 2122GEN_FLOAT_B(ctidz, 0x0F, 0x19, 0, PPC_64B);
426613db 2123#endif
79aceca5 2124
d7e4b87e 2125/* frin */
7c58044c 2126GEN_FLOAT_B(rin, 0x08, 0x0C, 1, PPC_FLOAT_EXT);
d7e4b87e 2127/* friz */
7c58044c 2128GEN_FLOAT_B(riz, 0x08, 0x0D, 1, PPC_FLOAT_EXT);
d7e4b87e 2129/* frip */
7c58044c 2130GEN_FLOAT_B(rip, 0x08, 0x0E, 1, PPC_FLOAT_EXT);
d7e4b87e 2131/* frim */
7c58044c 2132GEN_FLOAT_B(rim, 0x08, 0x0F, 1, PPC_FLOAT_EXT);
d7e4b87e 2133
79aceca5
FB
2134/*** Floating-Point compare ***/
2135/* fcmpo */
76a66253 2136GEN_HANDLER(fcmpo, 0x3F, 0x00, 0x01, 0x00600001, PPC_FLOAT)
79aceca5 2137{
76a66253 2138 if (unlikely(!ctx->fpu_enabled)) {
e1833e1f 2139 GEN_EXCP_NO_FP(ctx);
3cc62370
FB
2140 return;
2141 }
a5e26afa
AJ
2142 tcg_gen_mov_i64(cpu_FT[0], cpu_fpr[rA(ctx->opcode)]);
2143 tcg_gen_mov_i64(cpu_FT[1], cpu_fpr[rB(ctx->opcode)]);
7c58044c 2144 gen_reset_fpstatus();
e1571908 2145 tcg_gen_helper_1_0(helper_fcmpo, cpu_crf[crfD(ctx->opcode)]);
7c58044c 2146 gen_op_float_check_status();
79aceca5
FB
2147}
2148
2149/* fcmpu */
76a66253 2150GEN_HANDLER(fcmpu, 0x3F, 0x00, 0x00, 0x00600001, PPC_FLOAT)
79aceca5 2151{
76a66253 2152 if (unlikely(!ctx->fpu_enabled)) {
e1833e1f 2153 GEN_EXCP_NO_FP(ctx);
3cc62370
FB
2154 return;
2155 }
a5e26afa
AJ
2156 tcg_gen_mov_i64(cpu_FT[0], cpu_fpr[rA(ctx->opcode)]);
2157 tcg_gen_mov_i64(cpu_FT[1], cpu_fpr[rB(ctx->opcode)]);
7c58044c 2158 gen_reset_fpstatus();
e1571908 2159 tcg_gen_helper_1_0(helper_fcmpu, cpu_crf[crfD(ctx->opcode)]);
7c58044c 2160 gen_op_float_check_status();
79aceca5
FB
2161}
2162
9a64fbe4
FB
2163/*** Floating-point move ***/
2164/* fabs */
7c58044c
JM
2165/* XXX: beware that fabs never checks for NaNs nor update FPSCR */
2166GEN_FLOAT_B(abs, 0x08, 0x08, 0, PPC_FLOAT);
9a64fbe4
FB
2167
2168/* fmr - fmr. */
7c58044c 2169/* XXX: beware that fmr never checks for NaNs nor update FPSCR */
9a64fbe4
FB
2170GEN_HANDLER(fmr, 0x3F, 0x08, 0x02, 0x001F0000, PPC_FLOAT)
2171{
76a66253 2172 if (unlikely(!ctx->fpu_enabled)) {
e1833e1f 2173 GEN_EXCP_NO_FP(ctx);
3cc62370
FB
2174 return;
2175 }
a5e26afa
AJ
2176 tcg_gen_mov_i64(cpu_FT[0], cpu_fpr[rB(ctx->opcode)]);
2177 tcg_gen_mov_i64(cpu_fpr[rD(ctx->opcode)], cpu_FT[0]);
7c58044c 2178 gen_compute_fprf(0, Rc(ctx->opcode) != 0);
9a64fbe4
FB
2179}
2180
2181/* fnabs */
7c58044c
JM
2182/* XXX: beware that fnabs never checks for NaNs nor update FPSCR */
2183GEN_FLOAT_B(nabs, 0x08, 0x04, 0, PPC_FLOAT);
9a64fbe4 2184/* fneg */
7c58044c
JM
2185/* XXX: beware that fneg never checks for NaNs nor update FPSCR */
2186GEN_FLOAT_B(neg, 0x08, 0x01, 0, PPC_FLOAT);
9a64fbe4 2187
79aceca5
FB
2188/*** Floating-Point status & ctrl register ***/
2189/* mcrfs */
2190GEN_HANDLER(mcrfs, 0x3F, 0x00, 0x02, 0x0063F801, PPC_FLOAT)
2191{
7c58044c
JM
2192 int bfa;
2193
76a66253 2194 if (unlikely(!ctx->fpu_enabled)) {
e1833e1f 2195 GEN_EXCP_NO_FP(ctx);
3cc62370
FB
2196 return;
2197 }
7c58044c
JM
2198 gen_optimize_fprf();
2199 bfa = 4 * (7 - crfS(ctx->opcode));
e1571908
AJ
2200 tcg_gen_shri_i32(cpu_crf[crfD(ctx->opcode)], cpu_fpscr, bfa);
2201 tcg_gen_andi_i32(cpu_crf[crfD(ctx->opcode)], cpu_crf[crfD(ctx->opcode)], 0xf);
7c58044c 2202 gen_op_fpscr_resetbit(~(0xF << bfa));
79aceca5
FB
2203}
2204
2205/* mffs */
2206GEN_HANDLER(mffs, 0x3F, 0x07, 0x12, 0x001FF800, PPC_FLOAT)
2207{
76a66253 2208 if (unlikely(!ctx->fpu_enabled)) {
e1833e1f 2209 GEN_EXCP_NO_FP(ctx);
3cc62370
FB
2210 return;
2211 }
7c58044c
JM
2212 gen_optimize_fprf();
2213 gen_reset_fpstatus();
2214 gen_op_load_fpscr_FT0();
a5e26afa 2215 tcg_gen_mov_i64(cpu_fpr[rD(ctx->opcode)], cpu_FT[0]);
7c58044c 2216 gen_compute_fprf(0, Rc(ctx->opcode) != 0);
79aceca5
FB
2217}
2218
2219/* mtfsb0 */
2220GEN_HANDLER(mtfsb0, 0x3F, 0x06, 0x02, 0x001FF800, PPC_FLOAT)
2221{
fb0eaffc 2222 uint8_t crb;
3b46e624 2223
76a66253 2224 if (unlikely(!ctx->fpu_enabled)) {
e1833e1f 2225 GEN_EXCP_NO_FP(ctx);
3cc62370
FB
2226 return;
2227 }
7c58044c
JM
2228 crb = 32 - (crbD(ctx->opcode) >> 2);
2229 gen_optimize_fprf();
2230 gen_reset_fpstatus();
2231 if (likely(crb != 30 && crb != 29))
2232 gen_op_fpscr_resetbit(~(1 << crb));
2233 if (unlikely(Rc(ctx->opcode) != 0)) {
e1571908 2234 tcg_gen_shri_i32(cpu_crf[1], cpu_fpscr, FPSCR_OX);
7c58044c 2235 }
79aceca5
FB
2236}
2237
2238/* mtfsb1 */
2239GEN_HANDLER(mtfsb1, 0x3F, 0x06, 0x01, 0x001FF800, PPC_FLOAT)
2240{
fb0eaffc 2241 uint8_t crb;
3b46e624 2242
76a66253 2243 if (unlikely(!ctx->fpu_enabled)) {
e1833e1f 2244 GEN_EXCP_NO_FP(ctx);
3cc62370
FB
2245 return;
2246 }
7c58044c
JM
2247 crb = 32 - (crbD(ctx->opcode) >> 2);
2248 gen_optimize_fprf();
2249 gen_reset_fpstatus();
2250 /* XXX: we pretend we can only do IEEE floating-point computations */
2251 if (likely(crb != FPSCR_FEX && crb != FPSCR_VX && crb != FPSCR_NI))
2252 gen_op_fpscr_setbit(crb);
2253 if (unlikely(Rc(ctx->opcode) != 0)) {
e1571908 2254 tcg_gen_shri_i32(cpu_crf[1], cpu_fpscr, FPSCR_OX);
7c58044c
JM
2255 }
2256 /* We can raise a differed exception */
2257 gen_op_float_check_status();
79aceca5
FB
2258}
2259
2260/* mtfsf */
2261GEN_HANDLER(mtfsf, 0x3F, 0x07, 0x16, 0x02010000, PPC_FLOAT)
2262{
76a66253 2263 if (unlikely(!ctx->fpu_enabled)) {
e1833e1f 2264 GEN_EXCP_NO_FP(ctx);
3cc62370
FB
2265 return;
2266 }
7c58044c 2267 gen_optimize_fprf();
a5e26afa 2268 tcg_gen_mov_i64(cpu_FT[0], cpu_fpr[rB(ctx->opcode)]);
7c58044c 2269 gen_reset_fpstatus();
28b6751f 2270 gen_op_store_fpscr(FM(ctx->opcode));
7c58044c 2271 if (unlikely(Rc(ctx->opcode) != 0)) {
e1571908 2272 tcg_gen_shri_i32(cpu_crf[1], cpu_fpscr, FPSCR_OX);
7c58044c
JM
2273 }
2274 /* We can raise a differed exception */
2275 gen_op_float_check_status();
79aceca5
FB
2276}
2277
2278/* mtfsfi */
2279GEN_HANDLER(mtfsfi, 0x3F, 0x06, 0x04, 0x006f0800, PPC_FLOAT)
2280{
7c58044c
JM
2281 int bf, sh;
2282
76a66253 2283 if (unlikely(!ctx->fpu_enabled)) {
e1833e1f 2284 GEN_EXCP_NO_FP(ctx);
3cc62370
FB
2285 return;
2286 }
7c58044c
JM
2287 bf = crbD(ctx->opcode) >> 2;
2288 sh = 7 - bf;
2289 gen_optimize_fprf();
489251fa 2290 tcg_gen_movi_i64(cpu_FT[0], FPIMM(ctx->opcode) << (4 * sh));
7c58044c
JM
2291 gen_reset_fpstatus();
2292 gen_op_store_fpscr(1 << sh);
2293 if (unlikely(Rc(ctx->opcode) != 0)) {
e1571908 2294 tcg_gen_shri_i32(cpu_crf[1], cpu_fpscr, FPSCR_OX);
7c58044c
JM
2295 }
2296 /* We can raise a differed exception */
2297 gen_op_float_check_status();
79aceca5
FB
2298}
2299
76a66253
JM
2300/*** Addressing modes ***/
2301/* Register indirect with immediate index : EA = (rA|0) + SIMM */
e2be8d8d
AJ
2302static always_inline void gen_addr_imm_index (TCGv EA,
2303 DisasContext *ctx,
b068d6a7 2304 target_long maskl)
76a66253
JM
2305{
2306 target_long simm = SIMM(ctx->opcode);
2307
be147d08 2308 simm &= ~maskl;
e2be8d8d
AJ
2309 if (rA(ctx->opcode) == 0)
2310 tcg_gen_movi_tl(EA, simm);
2311 else if (likely(simm != 0))
2312 tcg_gen_addi_tl(EA, cpu_gpr[rA(ctx->opcode)], simm);
2313 else
2314 tcg_gen_mov_tl(EA, cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
2315}
2316
e2be8d8d
AJ
2317static always_inline void gen_addr_reg_index (TCGv EA,
2318 DisasContext *ctx)
76a66253 2319{
e2be8d8d
AJ
2320 if (rA(ctx->opcode) == 0)
2321 tcg_gen_mov_tl(EA, cpu_gpr[rB(ctx->opcode)]);
2322 else
2323 tcg_gen_add_tl(EA, cpu_gpr[rA(ctx->opcode)], cpu_gpr[rB(ctx->opcode)]);
76a66253
JM
2324}
2325
e2be8d8d
AJ
2326static always_inline void gen_addr_register (TCGv EA,
2327 DisasContext *ctx)
76a66253 2328{
e2be8d8d
AJ
2329 if (rA(ctx->opcode) == 0)
2330 tcg_gen_movi_tl(EA, 0);
2331 else
2332 tcg_gen_mov_tl(EA, cpu_gpr[rA(ctx->opcode)]);
76a66253
JM
2333}
2334
7863667f
JM
2335#if defined(TARGET_PPC64)
2336#define _GEN_MEM_FUNCS(name, mode) \
2337 &gen_op_##name##_##mode, \
2338 &gen_op_##name##_le_##mode, \
2339 &gen_op_##name##_64_##mode, \
2340 &gen_op_##name##_le_64_##mode
2341#else
2342#define _GEN_MEM_FUNCS(name, mode) \
2343 &gen_op_##name##_##mode, \
2344 &gen_op_##name##_le_##mode
2345#endif
9a64fbe4 2346#if defined(CONFIG_USER_ONLY)
d9bce9d9 2347#if defined(TARGET_PPC64)
7863667f 2348#define NB_MEM_FUNCS 4
d9bce9d9 2349#else
7863667f 2350#define NB_MEM_FUNCS 2
d9bce9d9 2351#endif
7863667f
JM
2352#define GEN_MEM_FUNCS(name) \
2353 _GEN_MEM_FUNCS(name, raw)
9a64fbe4 2354#else
d9bce9d9 2355#if defined(TARGET_PPC64)
7863667f 2356#define NB_MEM_FUNCS 12
2857068e 2357#else
7863667f 2358#define NB_MEM_FUNCS 6
2857068e 2359#endif
7863667f
JM
2360#define GEN_MEM_FUNCS(name) \
2361 _GEN_MEM_FUNCS(name, user), \
2362 _GEN_MEM_FUNCS(name, kernel), \
2363 _GEN_MEM_FUNCS(name, hypv)
2364#endif
2365
2366/*** Integer load ***/
2367#define op_ldst(name) (*gen_op_##name[ctx->mem_idx])()
d9bce9d9 2368#define OP_LD_TABLE(width) \
7863667f
JM
2369static GenOpFunc *gen_op_l##width[NB_MEM_FUNCS] = { \
2370 GEN_MEM_FUNCS(l##width), \
d9bce9d9
JM
2371};
2372#define OP_ST_TABLE(width) \
7863667f
JM
2373static GenOpFunc *gen_op_st##width[NB_MEM_FUNCS] = { \
2374 GEN_MEM_FUNCS(st##width), \
d9bce9d9 2375};
9a64fbe4 2376
b61f2753
AJ
2377
2378#if defined(TARGET_PPC64)
2379#define GEN_QEMU_LD_PPC64(width) \
2380static always_inline void gen_qemu_ld##width##_ppc64(TCGv t0, TCGv t1, int flags)\
2381{ \
2382 if (likely(flags & 2)) \
2383 tcg_gen_qemu_ld##width(t0, t1, flags >> 2); \
2384 else { \
2385 TCGv addr = tcg_temp_new(TCG_TYPE_TL); \
2386 tcg_gen_ext32u_tl(addr, t1); \
2387 tcg_gen_qemu_ld##width(t0, addr, flags >> 2); \
2388 tcg_temp_free(addr); \
2389 } \
2390}
2391GEN_QEMU_LD_PPC64(8u)
2392GEN_QEMU_LD_PPC64(8s)
2393GEN_QEMU_LD_PPC64(16u)
2394GEN_QEMU_LD_PPC64(16s)
2395GEN_QEMU_LD_PPC64(32u)
2396GEN_QEMU_LD_PPC64(32s)
2397GEN_QEMU_LD_PPC64(64)
2398
2399#define GEN_QEMU_ST_PPC64(width) \
2400static always_inline void gen_qemu_st##width##_ppc64(TCGv t0, TCGv t1, int flags)\
2401{ \
2402 if (likely(flags & 2)) \
2403 tcg_gen_qemu_st##width(t0, t1, flags >> 2); \
2404 else { \
2405 TCGv addr = tcg_temp_new(TCG_TYPE_TL); \
2406 tcg_gen_ext32u_tl(addr, t1); \
2407 tcg_gen_qemu_st##width(t0, addr, flags >> 2); \
2408 tcg_temp_free(addr); \
2409 } \
2410}
2411GEN_QEMU_ST_PPC64(8)
2412GEN_QEMU_ST_PPC64(16)
2413GEN_QEMU_ST_PPC64(32)
2414GEN_QEMU_ST_PPC64(64)
2415
2416static always_inline void gen_qemu_ld8u(TCGv t0, TCGv t1, int flags)
2417{
2418 gen_qemu_ld8u_ppc64(t0, t1, flags);
2419}
2420
2421static always_inline void gen_qemu_ld8s(TCGv t0, TCGv t1, int flags)
2422{
2423 gen_qemu_ld8s_ppc64(t0, t1, flags);
2424}
2425
2426static always_inline void gen_qemu_ld16u(TCGv t0, TCGv t1, int flags)
2427{
2428 if (unlikely(flags & 1)) {
2429 TCGv t0_32;
2430 gen_qemu_ld16u_ppc64(t0, t1, flags);
2431 t0_32 = tcg_temp_new(TCG_TYPE_I32);
2432 tcg_gen_trunc_tl_i32(t0_32, t0);
2433 tcg_gen_bswap16_i32(t0_32, t0_32);
2434 tcg_gen_extu_i32_tl(t0, t0_32);
2435 tcg_temp_free(t0_32);
2436 } else
2437 gen_qemu_ld16u_ppc64(t0, t1, flags);
2438}
2439
2440static always_inline void gen_qemu_ld16s(TCGv t0, TCGv t1, int flags)
2441{
2442 if (unlikely(flags & 1)) {
2443 TCGv t0_32;
2444 gen_qemu_ld16u_ppc64(t0, t1, flags);
2445 t0_32 = tcg_temp_new(TCG_TYPE_I32);
2446 tcg_gen_trunc_tl_i32(t0_32, t0);
2447 tcg_gen_bswap16_i32(t0_32, t0_32);
2448 tcg_gen_extu_i32_tl(t0, t0_32);
2449 tcg_gen_ext16s_tl(t0, t0);
2450 tcg_temp_free(t0_32);
2451 } else
2452 gen_qemu_ld16s_ppc64(t0, t1, flags);
2453}
2454
2455static always_inline void gen_qemu_ld32u(TCGv t0, TCGv t1, int flags)
2456{
2457 if (unlikely(flags & 1)) {
2458 TCGv t0_32;
2459 gen_qemu_ld32u_ppc64(t0, t1, flags);
2460 t0_32 = tcg_temp_new(TCG_TYPE_I32);
2461 tcg_gen_trunc_tl_i32(t0_32, t0);
2462 tcg_gen_bswap_i32(t0_32, t0_32);
2463 tcg_gen_extu_i32_tl(t0, t0_32);
2464 tcg_temp_free(t0_32);
2465 } else
2466 gen_qemu_ld32u_ppc64(t0, t1, flags);
2467}
2468
2469static always_inline void gen_qemu_ld32s(TCGv t0, TCGv t1, int flags)
2470{
2471 if (unlikely(flags & 1)) {
2472 TCGv t0_32;
2473 gen_qemu_ld32u_ppc64(t0, t1, flags);
2474 t0_32 = tcg_temp_new(TCG_TYPE_I32);
2475 tcg_gen_trunc_tl_i32(t0_32, t0);
2476 tcg_gen_bswap_i32(t0_32, t0_32);
2477 tcg_gen_ext_i32_tl(t0, t0_32);
2478 tcg_temp_free(t0_32);
2479 } else
2480 gen_qemu_ld32s_ppc64(t0, t1, flags);
2481}
2482
2483static always_inline void gen_qemu_ld64(TCGv t0, TCGv t1, int flags)
2484{
2485 gen_qemu_ld64_ppc64(t0, t1, flags);
2486 if (unlikely(flags & 1))
2487 tcg_gen_bswap_i64(t0, t0);
2488}
2489
2490static always_inline void gen_qemu_st8(TCGv t0, TCGv t1, int flags)
2491{
2492 gen_qemu_st8_ppc64(t0, t1, flags);
2493}
2494
2495static always_inline void gen_qemu_st16(TCGv t0, TCGv t1, int flags)
2496{
2497 if (unlikely(flags & 1)) {
2498 TCGv temp1, temp2;
2499 temp1 = tcg_temp_new(TCG_TYPE_I32);
2500 tcg_gen_trunc_tl_i32(temp1, t0);
2501 tcg_gen_ext16u_i32(temp1, temp1);
2502 tcg_gen_bswap16_i32(temp1, temp1);
2503 temp2 = tcg_temp_new(TCG_TYPE_I64);
2504 tcg_gen_extu_i32_tl(temp2, temp1);
2505 tcg_temp_free(temp1);
2506 gen_qemu_st16_ppc64(temp2, t1, flags);
2507 tcg_temp_free(temp2);
2508 } else
2509 gen_qemu_st16_ppc64(t0, t1, flags);
2510}
2511
2512static always_inline void gen_qemu_st32(TCGv t0, TCGv t1, int flags)
2513{
2514 if (unlikely(flags & 1)) {
2515 TCGv temp1, temp2;
2516 temp1 = tcg_temp_new(TCG_TYPE_I32);
2517 tcg_gen_trunc_tl_i32(temp1, t0);
2518 tcg_gen_bswap_i32(temp1, temp1);
2519 temp2 = tcg_temp_new(TCG_TYPE_I64);
2520 tcg_gen_extu_i32_tl(temp2, temp1);
2521 tcg_temp_free(temp1);
2522 gen_qemu_st32_ppc64(temp2, t1, flags);
2523 tcg_temp_free(temp2);
2524 } else
2525 gen_qemu_st32_ppc64(t0, t1, flags);
2526}
2527
2528static always_inline void gen_qemu_st64(TCGv t0, TCGv t1, int flags)
2529{
2530 if (unlikely(flags & 1)) {
2531 TCGv temp = tcg_temp_new(TCG_TYPE_I64);
2532 tcg_gen_bswap_i64(temp, t0);
2533 gen_qemu_st64_ppc64(temp, t1, flags);
2534 tcg_temp_free(temp);
2535 } else
2536 gen_qemu_st64_ppc64(t0, t1, flags);
2537}
2538
2539
2540#else /* defined(TARGET_PPC64) */
2541#define GEN_QEMU_LD_PPC32(width) \
2542static always_inline void gen_qemu_ld##width##_ppc32(TCGv t0, TCGv t1, int flags)\
2543{ \
2544 tcg_gen_qemu_ld##width(t0, t1, flags >> 1); \
2545}
2546GEN_QEMU_LD_PPC32(8u)
2547GEN_QEMU_LD_PPC32(8s)
2548GEN_QEMU_LD_PPC32(16u)
2549GEN_QEMU_LD_PPC32(16s)
2550GEN_QEMU_LD_PPC32(32u)
2551GEN_QEMU_LD_PPC32(32s)
2552GEN_QEMU_LD_PPC32(64)
2553
2554#define GEN_QEMU_ST_PPC32(width) \
2555static always_inline void gen_qemu_st##width##_ppc32(TCGv t0, TCGv t1, int flags)\
2556{ \
2557 tcg_gen_qemu_st##width(t0, t1, flags >> 1); \
2558}
2559GEN_QEMU_ST_PPC32(8)
2560GEN_QEMU_ST_PPC32(16)
2561GEN_QEMU_ST_PPC32(32)
2562GEN_QEMU_ST_PPC32(64)
2563
2564static always_inline void gen_qemu_ld8u(TCGv t0, TCGv t1, int flags)
2565{
2566 gen_qemu_ld8u_ppc32(t0, t1, flags >> 1);
2567}
2568
2569static always_inline void gen_qemu_ld8s(TCGv t0, TCGv t1, int flags)
2570{
2571 gen_qemu_ld8s_ppc32(t0, t1, flags >> 1);
2572}
2573
2574static always_inline void gen_qemu_ld16u(TCGv t0, TCGv t1, int flags)
2575{
2576 gen_qemu_ld16u_ppc32(t0, t1, flags >> 1);
2577 if (unlikely(flags & 1))
2578 tcg_gen_bswap16_i32(t0, t0);
2579}
2580
2581static always_inline void gen_qemu_ld16s(TCGv t0, TCGv t1, int flags)
2582{
2583 if (unlikely(flags & 1)) {
2584 gen_qemu_ld16u_ppc32(t0, t1, flags);
2585 tcg_gen_bswap16_i32(t0, t0);
2586 tcg_gen_ext16s_i32(t0, t0);
2587 } else
2588 gen_qemu_ld16s_ppc32(t0, t1, flags);
2589}
2590
2591static always_inline void gen_qemu_ld32u(TCGv t0, TCGv t1, int flags)
2592{
2593 gen_qemu_ld32u_ppc32(t0, t1, flags);
2594 if (unlikely(flags & 1))
2595 tcg_gen_bswap_i32(t0, t0);
2596}
2597
2598static always_inline void gen_qemu_ld64(TCGv t0, TCGv t1, int flags)
2599{
2600 gen_qemu_ld64_ppc32(t0, t1, flags);
2601 if (unlikely(flags & 1))
2602 tcg_gen_bswap_i64(t0, t0);
2603}
2604
2605static always_inline void gen_qemu_st8(TCGv t0, TCGv t1, int flags)
2606{
2607 gen_qemu_st8_ppc32(t0, t1, flags >> 1);
2608}
2609
2610static always_inline void gen_qemu_st16(TCGv t0, TCGv t1, int flags)
2611{
2612 if (unlikely(flags & 1)) {
2613 TCGv temp = tcg_temp_new(TCG_TYPE_I32);
2614 tcg_gen_ext16u_i32(temp, t0);
2615 tcg_gen_bswap16_i32(temp, temp);
2616 gen_qemu_st16_ppc32(temp, t1, flags >> 1);
2617 tcg_temp_free(temp);
2618 } else
2619 gen_qemu_st16_ppc32(t0, t1, flags >> 1);
2620}
2621
2622static always_inline void gen_qemu_st32(TCGv t0, TCGv t1, int flags)
2623{
2624 if (unlikely(flags & 1)) {
2625 TCGv temp = tcg_temp_new(TCG_TYPE_I32);
2626 tcg_gen_bswap_i32(temp, t0);
2627 gen_qemu_st32_ppc32(temp, t1, flags >> 1);
2628 tcg_temp_free(temp);
2629 } else
2630 gen_qemu_st32_ppc32(t0, t1, flags >> 1);
2631}
2632
2633static always_inline void gen_qemu_st64(TCGv t0, TCGv t1, int flags)
2634{
2635 if (unlikely(flags & 1)) {
2636 TCGv temp = tcg_temp_new(TCG_TYPE_I64);
2637 tcg_gen_bswap_i64(temp, t0);
2638 gen_qemu_st64_ppc32(temp, t1, flags >> 1);
2639 tcg_temp_free(temp);
2640 } else
2641 gen_qemu_st64_ppc32(t0, t1, flags >> 1);
2642}
2643
2644#endif
2645
d9bce9d9
JM
2646#define GEN_LD(width, opc, type) \
2647GEN_HANDLER(l##width, opc, 0xFF, 0xFF, 0x00000000, type) \
79aceca5 2648{ \
b61f2753
AJ
2649 TCGv EA = tcg_temp_new(TCG_TYPE_TL); \
2650 gen_addr_imm_index(EA, ctx, 0); \
2651 gen_qemu_ld##width(cpu_gpr[rD(ctx->opcode)], EA, ctx->mem_idx); \
2652 tcg_temp_free(EA); \
79aceca5
FB
2653}
2654
d9bce9d9
JM
2655#define GEN_LDU(width, opc, type) \
2656GEN_HANDLER(l##width##u, opc, 0xFF, 0xFF, 0x00000000, type) \
79aceca5 2657{ \
b61f2753 2658 TCGv EA; \
76a66253
JM
2659 if (unlikely(rA(ctx->opcode) == 0 || \
2660 rA(ctx->opcode) == rD(ctx->opcode))) { \
e1833e1f 2661 GEN_EXCP_INVAL(ctx); \
9fddaa0c 2662 return; \
9a64fbe4 2663 } \
b61f2753 2664 EA = tcg_temp_new(TCG_TYPE_TL); \
9d53c753 2665 if (type == PPC_64B) \
b61f2753 2666 gen_addr_imm_index(EA, ctx, 0x03); \
9d53c753 2667 else \
b61f2753
AJ
2668 gen_addr_imm_index(EA, ctx, 0); \
2669 gen_qemu_ld##width(cpu_gpr[rD(ctx->opcode)], EA, ctx->mem_idx); \
2670 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], EA); \
2671 tcg_temp_free(EA); \
79aceca5
FB
2672}
2673
d9bce9d9
JM
2674#define GEN_LDUX(width, opc2, opc3, type) \
2675GEN_HANDLER(l##width##ux, 0x1F, opc2, opc3, 0x00000001, type) \
79aceca5 2676{ \
b61f2753 2677 TCGv EA; \
76a66253
JM
2678 if (unlikely(rA(ctx->opcode) == 0 || \
2679 rA(ctx->opcode) == rD(ctx->opcode))) { \
e1833e1f 2680 GEN_EXCP_INVAL(ctx); \
9fddaa0c 2681 return; \
9a64fbe4 2682 } \
b61f2753
AJ
2683 EA = tcg_temp_new(TCG_TYPE_TL); \
2684 gen_addr_reg_index(EA, ctx); \
2685 gen_qemu_ld##width(cpu_gpr[rD(ctx->opcode)], EA, ctx->mem_idx); \
2686 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], EA); \
2687 tcg_temp_free(EA); \
79aceca5
FB
2688}
2689
d9bce9d9
JM
2690#define GEN_LDX(width, opc2, opc3, type) \
2691GEN_HANDLER(l##width##x, 0x1F, opc2, opc3, 0x00000001, type) \
79aceca5 2692{ \
b61f2753
AJ
2693 TCGv EA = tcg_temp_new(TCG_TYPE_TL); \
2694 gen_addr_reg_index(EA, ctx); \
2695 gen_qemu_ld##width(cpu_gpr[rD(ctx->opcode)], EA, ctx->mem_idx); \
2696 tcg_temp_free(EA); \
79aceca5
FB
2697}
2698
d9bce9d9 2699#define GEN_LDS(width, op, type) \
d9bce9d9
JM
2700GEN_LD(width, op | 0x20, type); \
2701GEN_LDU(width, op | 0x21, type); \
2702GEN_LDUX(width, 0x17, op | 0x01, type); \
2703GEN_LDX(width, 0x17, op | 0x00, type)
79aceca5
FB
2704
2705/* lbz lbzu lbzux lbzx */
b61f2753 2706GEN_LDS(8u, 0x02, PPC_INTEGER);
79aceca5 2707/* lha lhau lhaux lhax */
b61f2753 2708GEN_LDS(16s, 0x0A, PPC_INTEGER);
79aceca5 2709/* lhz lhzu lhzux lhzx */
b61f2753 2710GEN_LDS(16u, 0x08, PPC_INTEGER);
79aceca5 2711/* lwz lwzu lwzux lwzx */
b61f2753 2712GEN_LDS(32u, 0x00, PPC_INTEGER);
d9bce9d9 2713#if defined(TARGET_PPC64)
d9bce9d9 2714/* lwaux */
b61f2753 2715GEN_LDUX(32s, 0x15, 0x0B, PPC_64B);
d9bce9d9 2716/* lwax */
b61f2753 2717GEN_LDX(32s, 0x15, 0x0A, PPC_64B);
d9bce9d9 2718/* ldux */
b61f2753 2719GEN_LDUX(64, 0x15, 0x01, PPC_64B);
d9bce9d9 2720/* ldx */
b61f2753 2721GEN_LDX(64, 0x15, 0x00, PPC_64B);
d9bce9d9
JM
2722GEN_HANDLER(ld, 0x3A, 0xFF, 0xFF, 0x00000000, PPC_64B)
2723{
b61f2753 2724 TCGv EA;
d9bce9d9
JM
2725 if (Rc(ctx->opcode)) {
2726 if (unlikely(rA(ctx->opcode) == 0 ||
2727 rA(ctx->opcode) == rD(ctx->opcode))) {
e1833e1f 2728 GEN_EXCP_INVAL(ctx);
d9bce9d9
JM
2729 return;
2730 }
2731 }
b61f2753
AJ
2732 EA = tcg_temp_new(TCG_TYPE_TL);
2733 gen_addr_imm_index(EA, ctx, 0x03);
d9bce9d9
JM
2734 if (ctx->opcode & 0x02) {
2735 /* lwa (lwau is undefined) */
b61f2753 2736 gen_qemu_ld32s(cpu_gpr[rD(ctx->opcode)], EA, ctx->mem_idx);
d9bce9d9
JM
2737 } else {
2738 /* ld - ldu */
b61f2753 2739 gen_qemu_ld64(cpu_gpr[rD(ctx->opcode)], EA, ctx->mem_idx);
d9bce9d9 2740 }
d9bce9d9 2741 if (Rc(ctx->opcode))
b61f2753
AJ
2742 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], EA);
2743 tcg_temp_free(EA);
d9bce9d9 2744}
be147d08
JM
2745/* lq */
2746GEN_HANDLER(lq, 0x38, 0xFF, 0xFF, 0x00000000, PPC_64BX)
2747{
2748#if defined(CONFIG_USER_ONLY)
2749 GEN_EXCP_PRIVOPC(ctx);
2750#else
2751 int ra, rd;
b61f2753 2752 TCGv EA;
be147d08
JM
2753
2754 /* Restore CPU state */
2755 if (unlikely(ctx->supervisor == 0)) {
2756 GEN_EXCP_PRIVOPC(ctx);
2757 return;
2758 }
2759 ra = rA(ctx->opcode);
2760 rd = rD(ctx->opcode);
2761 if (unlikely((rd & 1) || rd == ra)) {
2762 GEN_EXCP_INVAL(ctx);
2763 return;
2764 }
2765 if (unlikely(ctx->mem_idx & 1)) {
2766 /* Little-endian mode is not handled */
2767 GEN_EXCP(ctx, POWERPC_EXCP_ALIGN, POWERPC_EXCP_ALIGN_LE);
2768 return;
2769 }
b61f2753
AJ
2770 EA = tcg_temp_new(TCG_TYPE_TL);
2771 gen_addr_imm_index(EA, ctx, 0x0F);
2772 gen_qemu_ld64(cpu_gpr[rd], EA, ctx->mem_idx);
2773 tcg_gen_addi_tl(EA, EA, 8);
2774 gen_qemu_ld64(cpu_gpr[rd+1], EA, ctx->mem_idx);
2775 tcg_temp_free(EA);
be147d08
JM
2776#endif
2777}
d9bce9d9 2778#endif
79aceca5
FB
2779
2780/*** Integer store ***/
d9bce9d9
JM
2781#define GEN_ST(width, opc, type) \
2782GEN_HANDLER(st##width, opc, 0xFF, 0xFF, 0x00000000, type) \
79aceca5 2783{ \
b61f2753
AJ
2784 TCGv EA = tcg_temp_new(TCG_TYPE_TL); \
2785 gen_addr_imm_index(EA, ctx, 0); \
2786 gen_qemu_st##width(cpu_gpr[rS(ctx->opcode)], EA, ctx->mem_idx); \
2787 tcg_temp_free(EA); \
79aceca5
FB
2788}
2789
d9bce9d9
JM
2790#define GEN_STU(width, opc, type) \
2791GEN_HANDLER(st##width##u, opc, 0xFF, 0xFF, 0x00000000, type) \
79aceca5 2792{ \
b61f2753 2793 TCGv EA; \
76a66253 2794 if (unlikely(rA(ctx->opcode) == 0)) { \
e1833e1f 2795 GEN_EXCP_INVAL(ctx); \
9fddaa0c 2796 return; \
9a64fbe4 2797 } \
b61f2753 2798 EA = tcg_temp_new(TCG_TYPE_TL); \
9d53c753 2799 if (type == PPC_64B) \
b61f2753 2800 gen_addr_imm_index(EA, ctx, 0x03); \
9d53c753 2801 else \
b61f2753
AJ
2802 gen_addr_imm_index(EA, ctx, 0); \
2803 gen_qemu_st##width(cpu_gpr[rS(ctx->opcode)], EA, ctx->mem_idx); \
2804 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], EA); \
2805 tcg_temp_free(EA); \
79aceca5
FB
2806}
2807
d9bce9d9
JM
2808#define GEN_STUX(width, opc2, opc3, type) \
2809GEN_HANDLER(st##width##ux, 0x1F, opc2, opc3, 0x00000001, type) \
79aceca5 2810{ \
b61f2753 2811 TCGv EA; \
76a66253 2812 if (unlikely(rA(ctx->opcode) == 0)) { \
e1833e1f 2813 GEN_EXCP_INVAL(ctx); \
9fddaa0c 2814 return; \
9a64fbe4 2815 } \
b61f2753
AJ
2816 EA = tcg_temp_new(TCG_TYPE_TL); \
2817 gen_addr_reg_index(EA, ctx); \
2818 gen_qemu_st##width(cpu_gpr[rS(ctx->opcode)], EA, ctx->mem_idx); \
2819 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], EA); \
2820 tcg_temp_free(EA); \
79aceca5
FB
2821}
2822
d9bce9d9
JM
2823#define GEN_STX(width, opc2, opc3, type) \
2824GEN_HANDLER(st##width##x, 0x1F, opc2, opc3, 0x00000001, type) \
79aceca5 2825{ \
b61f2753
AJ
2826 TCGv EA = tcg_temp_new(TCG_TYPE_TL); \
2827 gen_addr_reg_index(EA, ctx); \
2828 gen_qemu_st##width(cpu_gpr[rS(ctx->opcode)], EA, ctx->mem_idx); \
2829 tcg_temp_free(EA); \
79aceca5
FB
2830}
2831
d9bce9d9 2832#define GEN_STS(width, op, type) \
d9bce9d9
JM
2833GEN_ST(width, op | 0x20, type); \
2834GEN_STU(width, op | 0x21, type); \
2835GEN_STUX(width, 0x17, op | 0x01, type); \
2836GEN_STX(width, 0x17, op | 0x00, type)
79aceca5
FB
2837
2838/* stb stbu stbux stbx */
b61f2753 2839GEN_STS(8, 0x06, PPC_INTEGER);
79aceca5 2840/* sth sthu sthux sthx */
b61f2753 2841GEN_STS(16, 0x0C, PPC_INTEGER);
79aceca5 2842/* stw stwu stwux stwx */
b61f2753 2843GEN_STS(32, 0x04, PPC_INTEGER);
d9bce9d9 2844#if defined(TARGET_PPC64)
b61f2753
AJ
2845GEN_STUX(64, 0x15, 0x05, PPC_64B);
2846GEN_STX(64, 0x15, 0x04, PPC_64B);
be147d08 2847GEN_HANDLER(std, 0x3E, 0xFF, 0xFF, 0x00000000, PPC_64B)
d9bce9d9 2848{
be147d08 2849 int rs;
b61f2753 2850 TCGv EA;
be147d08
JM
2851
2852 rs = rS(ctx->opcode);
2853 if ((ctx->opcode & 0x3) == 0x2) {
2854#if defined(CONFIG_USER_ONLY)
2855 GEN_EXCP_PRIVOPC(ctx);
2856#else
2857 /* stq */
2858 if (unlikely(ctx->supervisor == 0)) {
2859 GEN_EXCP_PRIVOPC(ctx);
2860 return;
2861 }
2862 if (unlikely(rs & 1)) {
e1833e1f 2863 GEN_EXCP_INVAL(ctx);
d9bce9d9
JM
2864 return;
2865 }
be147d08
JM
2866 if (unlikely(ctx->mem_idx & 1)) {
2867 /* Little-endian mode is not handled */
2868 GEN_EXCP(ctx, POWERPC_EXCP_ALIGN, POWERPC_EXCP_ALIGN_LE);
2869 return;
2870 }
b61f2753
AJ
2871 EA = tcg_temp_new(TCG_TYPE_TL);
2872 gen_addr_imm_index(EA, ctx, 0x03);
2873 gen_qemu_st64(cpu_gpr[rs], EA, ctx->mem_idx);
2874 tcg_gen_addi_tl(EA, EA, 8);
2875 gen_qemu_st64(cpu_gpr[rs+1], EA, ctx->mem_idx);
2876 tcg_temp_free(EA);
be147d08
JM
2877#endif
2878 } else {
2879 /* std / stdu */
2880 if (Rc(ctx->opcode)) {
2881 if (unlikely(rA(ctx->opcode) == 0)) {
2882 GEN_EXCP_INVAL(ctx);
2883 return;
2884 }
2885 }
b61f2753
AJ
2886 EA = tcg_temp_new(TCG_TYPE_TL);
2887 gen_addr_imm_index(EA, ctx, 0x03);
2888 gen_qemu_st64(cpu_gpr[rs], EA, ctx->mem_idx);
be147d08 2889 if (Rc(ctx->opcode))
b61f2753
AJ
2890 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], EA);
2891 tcg_temp_free(EA);
d9bce9d9 2892 }
d9bce9d9
JM
2893}
2894#endif
79aceca5
FB
2895/*** Integer load and store with byte reverse ***/
2896/* lhbrx */
b61f2753
AJ
2897void always_inline gen_qemu_ld16ur(TCGv t0, TCGv t1, int flags)
2898{
2899 TCGv temp = tcg_temp_new(TCG_TYPE_I32);
2900 gen_qemu_ld16u(temp, t1, flags);
2901 tcg_gen_bswap16_i32(temp, temp);
2902 tcg_gen_extu_i32_tl(t0, temp);
2903 tcg_temp_free(temp);
2904}
2905GEN_LDX(16ur, 0x16, 0x18, PPC_INTEGER);
2906
79aceca5 2907/* lwbrx */
b61f2753
AJ
2908void always_inline gen_qemu_ld32ur(TCGv t0, TCGv t1, int flags)
2909{
2910 TCGv temp = tcg_temp_new(TCG_TYPE_I32);
2911 gen_qemu_ld32u(temp, t1, flags);
2912 tcg_gen_bswap_i32(temp, temp);
2913 tcg_gen_extu_i32_tl(t0, temp);
2914 tcg_temp_free(temp);
2915}
2916GEN_LDX(32ur, 0x16, 0x10, PPC_INTEGER);
2917
79aceca5 2918/* sthbrx */
b61f2753
AJ
2919void always_inline gen_qemu_st16r(TCGv t0, TCGv t1, int flags)
2920{
2921 TCGv temp = tcg_temp_new(TCG_TYPE_I32);
2922 tcg_gen_trunc_tl_i32(temp, t0);
2923 tcg_gen_ext16u_i32(temp, temp);
2924 tcg_gen_bswap16_i32(temp, temp);
2925 gen_qemu_st16(temp, t1, flags);
2926 tcg_temp_free(temp);
2927}
2928GEN_STX(16r, 0x16, 0x1C, PPC_INTEGER);
2929
79aceca5 2930/* stwbrx */
b61f2753
AJ
2931void always_inline gen_qemu_st32r(TCGv t0, TCGv t1, int flags)
2932{
2933 TCGv temp = tcg_temp_new(TCG_TYPE_I32);
2934 tcg_gen_trunc_tl_i32(temp, t0);
2935 tcg_gen_bswap_i32(temp, temp);
2936 gen_qemu_st32(temp, t1, flags);
2937 tcg_temp_free(temp);
2938}
2939GEN_STX(32r, 0x16, 0x14, PPC_INTEGER);
79aceca5
FB
2940
2941/*** Integer load and store multiple ***/
111bfab3 2942#define op_ldstm(name, reg) (*gen_op_##name[ctx->mem_idx])(reg)
7863667f
JM
2943static GenOpFunc1 *gen_op_lmw[NB_MEM_FUNCS] = {
2944 GEN_MEM_FUNCS(lmw),
d9bce9d9 2945};
7863667f
JM
2946static GenOpFunc1 *gen_op_stmw[NB_MEM_FUNCS] = {
2947 GEN_MEM_FUNCS(stmw),
d9bce9d9 2948};
9a64fbe4 2949
79aceca5
FB
2950/* lmw */
2951GEN_HANDLER(lmw, 0x2E, 0xFF, 0xFF, 0x00000000, PPC_INTEGER)
2952{
76a66253 2953 /* NIP cannot be restored if the memory exception comes from an helper */
d9bce9d9 2954 gen_update_nip(ctx, ctx->nip - 4);
e2be8d8d 2955 gen_addr_imm_index(cpu_T[0], ctx, 0);
9a64fbe4 2956 op_ldstm(lmw, rD(ctx->opcode));
79aceca5
FB
2957}
2958
2959/* stmw */
2960GEN_HANDLER(stmw, 0x2F, 0xFF, 0xFF, 0x00000000, PPC_INTEGER)
2961{
76a66253 2962 /* NIP cannot be restored if the memory exception comes from an helper */
d9bce9d9 2963 gen_update_nip(ctx, ctx->nip - 4);
e2be8d8d 2964 gen_addr_imm_index(cpu_T[0], ctx, 0);
9a64fbe4 2965 op_ldstm(stmw, rS(ctx->opcode));
79aceca5
FB
2966}
2967
2968/*** Integer load and store strings ***/
9a64fbe4
FB
2969#define op_ldsts(name, start) (*gen_op_##name[ctx->mem_idx])(start)
2970#define op_ldstsx(name, rd, ra, rb) (*gen_op_##name[ctx->mem_idx])(rd, ra, rb)
e7c24003
JM
2971/* string load & stores are by definition endian-safe */
2972#define gen_op_lswi_le_raw gen_op_lswi_raw
2973#define gen_op_lswi_le_user gen_op_lswi_user
2974#define gen_op_lswi_le_kernel gen_op_lswi_kernel
2975#define gen_op_lswi_le_hypv gen_op_lswi_hypv
2976#define gen_op_lswi_le_64_raw gen_op_lswi_raw
2977#define gen_op_lswi_le_64_user gen_op_lswi_user
2978#define gen_op_lswi_le_64_kernel gen_op_lswi_kernel
2979#define gen_op_lswi_le_64_hypv gen_op_lswi_hypv
7863667f
JM
2980static GenOpFunc1 *gen_op_lswi[NB_MEM_FUNCS] = {
2981 GEN_MEM_FUNCS(lswi),
d9bce9d9 2982};
e7c24003
JM
2983#define gen_op_lswx_le_raw gen_op_lswx_raw
2984#define gen_op_lswx_le_user gen_op_lswx_user
2985#define gen_op_lswx_le_kernel gen_op_lswx_kernel
2986#define gen_op_lswx_le_hypv gen_op_lswx_hypv
2987#define gen_op_lswx_le_64_raw gen_op_lswx_raw
2988#define gen_op_lswx_le_64_user gen_op_lswx_user
2989#define gen_op_lswx_le_64_kernel gen_op_lswx_kernel
2990#define gen_op_lswx_le_64_hypv gen_op_lswx_hypv
7863667f
JM
2991static GenOpFunc3 *gen_op_lswx[NB_MEM_FUNCS] = {
2992 GEN_MEM_FUNCS(lswx),
d9bce9d9 2993};
e7c24003
JM
2994#define gen_op_stsw_le_raw gen_op_stsw_raw
2995#define gen_op_stsw_le_user gen_op_stsw_user
2996#define gen_op_stsw_le_kernel gen_op_stsw_kernel
2997#define gen_op_stsw_le_hypv gen_op_stsw_hypv
2998#define gen_op_stsw_le_64_raw gen_op_stsw_raw
2999#define gen_op_stsw_le_64_user gen_op_stsw_user
3000#define gen_op_stsw_le_64_kernel gen_op_stsw_kernel
3001#define gen_op_stsw_le_64_hypv gen_op_stsw_hypv
7863667f
JM
3002static GenOpFunc1 *gen_op_stsw[NB_MEM_FUNCS] = {
3003 GEN_MEM_FUNCS(stsw),
9a64fbe4 3004};
9a64fbe4 3005
79aceca5 3006/* lswi */
3fc6c082 3007/* PowerPC32 specification says we must generate an exception if
9a64fbe4
FB
3008 * rA is in the range of registers to be loaded.
3009 * In an other hand, IBM says this is valid, but rA won't be loaded.
3010 * For now, I'll follow the spec...
3011 */
05332d70 3012GEN_HANDLER(lswi, 0x1F, 0x15, 0x12, 0x00000001, PPC_STRING)
79aceca5
FB
3013{
3014 int nb = NB(ctx->opcode);
3015 int start = rD(ctx->opcode);
9a64fbe4 3016 int ra = rA(ctx->opcode);
79aceca5
FB
3017 int nr;
3018
3019 if (nb == 0)
3020 nb = 32;
3021 nr = nb / 4;
76a66253
JM
3022 if (unlikely(((start + nr) > 32 &&
3023 start <= ra && (start + nr - 32) > ra) ||
3024 ((start + nr) <= 32 && start <= ra && (start + nr) > ra))) {
e1833e1f
JM
3025 GEN_EXCP(ctx, POWERPC_EXCP_PROGRAM,
3026 POWERPC_EXCP_INVAL | POWERPC_EXCP_INVAL_LSWX);
9fddaa0c 3027 return;
297d8e62 3028 }
8dd4983c 3029 /* NIP cannot be restored if the memory exception comes from an helper */
d9bce9d9 3030 gen_update_nip(ctx, ctx->nip - 4);
e2be8d8d 3031 gen_addr_register(cpu_T[0], ctx);
86c581dc 3032 tcg_gen_movi_tl(cpu_T[1], nb);
9a64fbe4 3033 op_ldsts(lswi, start);
79aceca5
FB
3034}
3035
3036/* lswx */
05332d70 3037GEN_HANDLER(lswx, 0x1F, 0x15, 0x10, 0x00000001, PPC_STRING)
79aceca5 3038{
9a64fbe4
FB
3039 int ra = rA(ctx->opcode);
3040 int rb = rB(ctx->opcode);
3041
76a66253 3042 /* NIP cannot be restored if the memory exception comes from an helper */
d9bce9d9 3043 gen_update_nip(ctx, ctx->nip - 4);
e2be8d8d 3044 gen_addr_reg_index(cpu_T[0], ctx);
9a64fbe4 3045 if (ra == 0) {
9a64fbe4 3046 ra = rb;
79aceca5 3047 }
3d7b417e 3048 tcg_gen_andi_tl(cpu_T[1], cpu_xer, 0x7F);
9a64fbe4 3049 op_ldstsx(lswx, rD(ctx->opcode), ra, rb);
79aceca5
FB
3050}
3051
3052/* stswi */
05332d70 3053GEN_HANDLER(stswi, 0x1F, 0x15, 0x16, 0x00000001, PPC_STRING)
79aceca5 3054{
4b3686fa
FB
3055 int nb = NB(ctx->opcode);
3056
76a66253 3057 /* NIP cannot be restored if the memory exception comes from an helper */
d9bce9d9 3058 gen_update_nip(ctx, ctx->nip - 4);
e2be8d8d 3059 gen_addr_register(cpu_T[0], ctx);
4b3686fa
FB
3060 if (nb == 0)
3061 nb = 32;
86c581dc 3062 tcg_gen_movi_tl(cpu_T[1], nb);
9a64fbe4 3063 op_ldsts(stsw, rS(ctx->opcode));
79aceca5
FB
3064}
3065
3066/* stswx */
05332d70 3067GEN_HANDLER(stswx, 0x1F, 0x15, 0x14, 0x00000001, PPC_STRING)
79aceca5 3068{
8dd4983c 3069 /* NIP cannot be restored if the memory exception comes from an helper */
5fafdf24 3070 gen_update_nip(ctx, ctx->nip - 4);
e2be8d8d 3071 gen_addr_reg_index(cpu_T[0], ctx);
3d7b417e 3072 tcg_gen_andi_tl(cpu_T[1], cpu_xer, 0x7F);
9a64fbe4 3073 op_ldsts(stsw, rS(ctx->opcode));
79aceca5
FB
3074}
3075
3076/*** Memory synchronisation ***/
3077/* eieio */
0db1b20e 3078GEN_HANDLER(eieio, 0x1F, 0x16, 0x1A, 0x03FFF801, PPC_MEM_EIEIO)
79aceca5 3079{
79aceca5
FB
3080}
3081
3082/* isync */
0db1b20e 3083GEN_HANDLER(isync, 0x13, 0x16, 0x04, 0x03FFF801, PPC_MEM)
79aceca5 3084{
e1833e1f 3085 GEN_STOP(ctx);
79aceca5
FB
3086}
3087
111bfab3
FB
3088#define op_lwarx() (*gen_op_lwarx[ctx->mem_idx])()
3089#define op_stwcx() (*gen_op_stwcx[ctx->mem_idx])()
7863667f
JM
3090static GenOpFunc *gen_op_lwarx[NB_MEM_FUNCS] = {
3091 GEN_MEM_FUNCS(lwarx),
111bfab3 3092};
7863667f
JM
3093static GenOpFunc *gen_op_stwcx[NB_MEM_FUNCS] = {
3094 GEN_MEM_FUNCS(stwcx),
985a19d6 3095};
9a64fbe4 3096
111bfab3 3097/* lwarx */
76a66253 3098GEN_HANDLER(lwarx, 0x1F, 0x14, 0x00, 0x00000001, PPC_RES)
79aceca5 3099{
30032c94
JM
3100 /* NIP cannot be restored if the memory exception comes from an helper */
3101 gen_update_nip(ctx, ctx->nip - 4);
e2be8d8d 3102 gen_addr_reg_index(cpu_T[0], ctx);
985a19d6 3103 op_lwarx();
f78fb44e 3104 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[1]);
79aceca5
FB
3105}
3106
3107/* stwcx. */
c7697e1f 3108GEN_HANDLER2(stwcx_, "stwcx.", 0x1F, 0x16, 0x04, 0x00000000, PPC_RES)
79aceca5 3109{
30032c94
JM
3110 /* NIP cannot be restored if the memory exception comes from an helper */
3111 gen_update_nip(ctx, ctx->nip - 4);
e2be8d8d 3112 gen_addr_reg_index(cpu_T[0], ctx);
f78fb44e 3113 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rS(ctx->opcode)]);
9a64fbe4 3114 op_stwcx();
79aceca5
FB
3115}
3116
426613db
JM
3117#if defined(TARGET_PPC64)
3118#define op_ldarx() (*gen_op_ldarx[ctx->mem_idx])()
3119#define op_stdcx() (*gen_op_stdcx[ctx->mem_idx])()
7863667f
JM
3120static GenOpFunc *gen_op_ldarx[NB_MEM_FUNCS] = {
3121 GEN_MEM_FUNCS(ldarx),
426613db 3122};
7863667f
JM
3123static GenOpFunc *gen_op_stdcx[NB_MEM_FUNCS] = {
3124 GEN_MEM_FUNCS(stdcx),
426613db 3125};
426613db
JM
3126
3127/* ldarx */
a750fc0b 3128GEN_HANDLER(ldarx, 0x1F, 0x14, 0x02, 0x00000001, PPC_64B)
426613db 3129{
30032c94
JM
3130 /* NIP cannot be restored if the memory exception comes from an helper */
3131 gen_update_nip(ctx, ctx->nip - 4);
e2be8d8d 3132 gen_addr_reg_index(cpu_T[0], ctx);
426613db 3133 op_ldarx();
f78fb44e 3134 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[1]);
426613db
JM
3135}
3136
3137/* stdcx. */
c7697e1f 3138GEN_HANDLER2(stdcx_, "stdcx.", 0x1F, 0x16, 0x06, 0x00000000, PPC_64B)
426613db 3139{
30032c94
JM
3140 /* NIP cannot be restored if the memory exception comes from an helper */
3141 gen_update_nip(ctx, ctx->nip - 4);
e2be8d8d 3142 gen_addr_reg_index(cpu_T[0], ctx);
f78fb44e 3143 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rS(ctx->opcode)]);
426613db
JM
3144 op_stdcx();
3145}
3146#endif /* defined(TARGET_PPC64) */
3147
79aceca5 3148/* sync */
a902d886 3149GEN_HANDLER(sync, 0x1F, 0x16, 0x12, 0x039FF801, PPC_MEM_SYNC)
79aceca5 3150{
79aceca5
FB
3151}
3152
0db1b20e
JM
3153/* wait */
3154GEN_HANDLER(wait, 0x1F, 0x1E, 0x01, 0x03FFF801, PPC_WAIT)
3155{
3156 /* Stop translation, as the CPU is supposed to sleep from now */
be147d08
JM
3157 gen_op_wait();
3158 GEN_EXCP(ctx, EXCP_HLT, 1);
0db1b20e
JM
3159}
3160
79aceca5 3161/*** Floating-point load ***/
477023a6
JM
3162#define GEN_LDF(width, opc, type) \
3163GEN_HANDLER(l##width, opc, 0xFF, 0xFF, 0x00000000, type) \
79aceca5 3164{ \
76a66253 3165 if (unlikely(!ctx->fpu_enabled)) { \
e1833e1f 3166 GEN_EXCP_NO_FP(ctx); \
4ecc3190
FB
3167 return; \
3168 } \
e2be8d8d 3169 gen_addr_imm_index(cpu_T[0], ctx, 0); \
9a64fbe4 3170 op_ldst(l##width); \
a5e26afa 3171 tcg_gen_mov_i64(cpu_fpr[rD(ctx->opcode)], cpu_FT[0]); \
79aceca5
FB
3172}
3173
477023a6
JM
3174#define GEN_LDUF(width, opc, type) \
3175GEN_HANDLER(l##width##u, opc, 0xFF, 0xFF, 0x00000000, type) \
79aceca5 3176{ \
76a66253 3177 if (unlikely(!ctx->fpu_enabled)) { \
e1833e1f 3178 GEN_EXCP_NO_FP(ctx); \
4ecc3190
FB
3179 return; \
3180 } \
76a66253 3181 if (unlikely(rA(ctx->opcode) == 0)) { \
e1833e1f 3182 GEN_EXCP_INVAL(ctx); \
9fddaa0c 3183 return; \
9a64fbe4 3184 } \
e2be8d8d 3185 gen_addr_imm_index(cpu_T[0], ctx, 0); \
9a64fbe4 3186 op_ldst(l##width); \
a5e26afa 3187 tcg_gen_mov_i64(cpu_fpr[rD(ctx->opcode)], cpu_FT[0]); \
f78fb44e 3188 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], cpu_T[0]); \
79aceca5
FB
3189}
3190
477023a6
JM
3191#define GEN_LDUXF(width, opc, type) \
3192GEN_HANDLER(l##width##ux, 0x1F, 0x17, opc, 0x00000001, type) \
79aceca5 3193{ \
76a66253 3194 if (unlikely(!ctx->fpu_enabled)) { \
e1833e1f 3195 GEN_EXCP_NO_FP(ctx); \
4ecc3190
FB
3196 return; \
3197 } \
76a66253 3198 if (unlikely(rA(ctx->opcode) == 0)) { \
e1833e1f 3199 GEN_EXCP_INVAL(ctx); \
9fddaa0c 3200 return; \
9a64fbe4 3201 } \
e2be8d8d 3202 gen_addr_reg_index(cpu_T[0], ctx); \
9a64fbe4 3203 op_ldst(l##width); \
a5e26afa 3204 tcg_gen_mov_i64(cpu_fpr[rD(ctx->opcode)], cpu_FT[0]); \
f78fb44e 3205 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], cpu_T[0]); \
79aceca5
FB
3206}
3207
477023a6
JM
3208#define GEN_LDXF(width, opc2, opc3, type) \
3209GEN_HANDLER(l##width##x, 0x1F, opc2, opc3, 0x00000001, type) \
79aceca5 3210{ \
76a66253 3211 if (unlikely(!ctx->fpu_enabled)) { \
e1833e1f 3212 GEN_EXCP_NO_FP(ctx); \
4ecc3190
FB
3213 return; \
3214 } \
e2be8d8d 3215 gen_addr_reg_index(cpu_T[0], ctx); \
9a64fbe4 3216 op_ldst(l##width); \
a5e26afa 3217 tcg_gen_mov_i64(cpu_fpr[rD(ctx->opcode)], cpu_FT[0]); \
79aceca5
FB
3218}
3219
477023a6 3220#define GEN_LDFS(width, op, type) \
9a64fbe4 3221OP_LD_TABLE(width); \
477023a6
JM
3222GEN_LDF(width, op | 0x20, type); \
3223GEN_LDUF(width, op | 0x21, type); \
3224GEN_LDUXF(width, op | 0x01, type); \
3225GEN_LDXF(width, 0x17, op | 0x00, type)
79aceca5
FB
3226
3227/* lfd lfdu lfdux lfdx */
477023a6 3228GEN_LDFS(fd, 0x12, PPC_FLOAT);
79aceca5 3229/* lfs lfsu lfsux lfsx */
477023a6 3230GEN_LDFS(fs, 0x10, PPC_FLOAT);
79aceca5
FB
3231
3232/*** Floating-point store ***/
477023a6
JM
3233#define GEN_STF(width, opc, type) \
3234GEN_HANDLER(st##width, opc, 0xFF, 0xFF, 0x00000000, type) \
79aceca5 3235{ \
76a66253 3236 if (unlikely(!ctx->fpu_enabled)) { \
e1833e1f 3237 GEN_EXCP_NO_FP(ctx); \
4ecc3190
FB
3238 return; \
3239 } \
e2be8d8d 3240 gen_addr_imm_index(cpu_T[0], ctx, 0); \
a5e26afa 3241 tcg_gen_mov_i64(cpu_FT[0], cpu_fpr[rS(ctx->opcode)]); \
9a64fbe4 3242 op_ldst(st##width); \
79aceca5
FB
3243}
3244
477023a6
JM
3245#define GEN_STUF(width, opc, type) \
3246GEN_HANDLER(st##width##u, opc, 0xFF, 0xFF, 0x00000000, type) \
79aceca5 3247{ \
76a66253 3248 if (unlikely(!ctx->fpu_enabled)) { \
e1833e1f 3249 GEN_EXCP_NO_FP(ctx); \
4ecc3190
FB
3250 return; \
3251 } \
76a66253 3252 if (unlikely(rA(ctx->opcode) == 0)) { \
e1833e1f 3253 GEN_EXCP_INVAL(ctx); \
9fddaa0c 3254 return; \
9a64fbe4 3255 } \
e2be8d8d 3256 gen_addr_imm_index(cpu_T[0], ctx, 0); \
a5e26afa 3257 tcg_gen_mov_i64(cpu_FT[0], cpu_fpr[rS(ctx->opcode)]); \
9a64fbe4 3258 op_ldst(st##width); \
f78fb44e 3259 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], cpu_T[0]); \
79aceca5
FB
3260}
3261
477023a6
JM
3262#define GEN_STUXF(width, opc, type) \
3263GEN_HANDLER(st##width##ux, 0x1F, 0x17, opc, 0x00000001, type) \
79aceca5 3264{ \
76a66253 3265 if (unlikely(!ctx->fpu_enabled)) { \
e1833e1f 3266 GEN_EXCP_NO_FP(ctx); \
4ecc3190
FB
3267 return; \
3268 } \
76a66253 3269 if (unlikely(rA(ctx->opcode) == 0)) { \
e1833e1f 3270 GEN_EXCP_INVAL(ctx); \
9fddaa0c 3271 return; \
9a64fbe4 3272 } \
e2be8d8d 3273 gen_addr_reg_index(cpu_T[0], ctx); \
a5e26afa 3274 tcg_gen_mov_i64(cpu_FT[0], cpu_fpr[rS(ctx->opcode)]); \
9a64fbe4 3275 op_ldst(st##width); \
f78fb44e 3276 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], cpu_T[0]); \
79aceca5
FB
3277}
3278
477023a6
JM
3279#define GEN_STXF(width, opc2, opc3, type) \
3280GEN_HANDLER(st##width##x, 0x1F, opc2, opc3, 0x00000001, type) \
79aceca5 3281{ \
76a66253 3282 if (unlikely(!ctx->fpu_enabled)) { \
e1833e1f 3283 GEN_EXCP_NO_FP(ctx); \
4ecc3190
FB
3284 return; \
3285 } \
e2be8d8d 3286 gen_addr_reg_index(cpu_T[0], ctx); \
a5e26afa 3287 tcg_gen_mov_i64(cpu_FT[0], cpu_fpr[rS(ctx->opcode)]); \
9a64fbe4 3288 op_ldst(st##width); \
79aceca5
FB
3289}
3290
477023a6 3291#define GEN_STFS(width, op, type) \
9a64fbe4 3292OP_ST_TABLE(width); \
477023a6
JM
3293GEN_STF(width, op | 0x20, type); \
3294GEN_STUF(width, op | 0x21, type); \
3295GEN_STUXF(width, op | 0x01, type); \
3296GEN_STXF(width, 0x17, op | 0x00, type)
79aceca5
FB
3297
3298/* stfd stfdu stfdux stfdx */
477023a6 3299GEN_STFS(fd, 0x16, PPC_FLOAT);
79aceca5 3300/* stfs stfsu stfsux stfsx */
477023a6 3301GEN_STFS(fs, 0x14, PPC_FLOAT);
79aceca5
FB
3302
3303/* Optional: */
3304/* stfiwx */
5b8105fa
JM
3305OP_ST_TABLE(fiw);
3306GEN_STXF(fiw, 0x17, 0x1E, PPC_FLOAT_STFIWX);
79aceca5
FB
3307
3308/*** Branch ***/
b068d6a7
JM
3309static always_inline void gen_goto_tb (DisasContext *ctx, int n,
3310 target_ulong dest)
c1942362
FB
3311{
3312 TranslationBlock *tb;
3313 tb = ctx->tb;
a2ffb812
AJ
3314#if defined(TARGET_PPC64)
3315 if (!ctx->sf_mode)
3316 dest = (uint32_t) dest;
3317#endif
57fec1fe 3318 if ((tb->pc & TARGET_PAGE_MASK) == (dest & TARGET_PAGE_MASK) &&
8cbcb4fa 3319 likely(!ctx->singlestep_enabled)) {
57fec1fe 3320 tcg_gen_goto_tb(n);
a2ffb812 3321 tcg_gen_movi_tl(cpu_nip, dest & ~3);
57fec1fe 3322 tcg_gen_exit_tb((long)tb + n);
c1942362 3323 } else {
a2ffb812 3324 tcg_gen_movi_tl(cpu_nip, dest & ~3);
8cbcb4fa
AJ
3325 if (unlikely(ctx->singlestep_enabled)) {
3326 if ((ctx->singlestep_enabled &
3327 (CPU_BRANCH_STEP | CPU_SINGLE_STEP)) &&
3328 ctx->exception == POWERPC_EXCP_BRANCH) {
3329 target_ulong tmp = ctx->nip;
3330 ctx->nip = dest;
3331 GEN_EXCP(ctx, POWERPC_EXCP_TRACE, 0);
3332 ctx->nip = tmp;
3333 }
3334 if (ctx->singlestep_enabled & GDBSTUB_SINGLE_STEP) {
3335 gen_update_nip(ctx, dest);
3336 gen_op_debug();
3337 }
3338 }
57fec1fe 3339 tcg_gen_exit_tb(0);
c1942362 3340 }
c53be334
FB
3341}
3342
b068d6a7 3343static always_inline void gen_setlr (DisasContext *ctx, target_ulong nip)
e1833e1f
JM
3344{
3345#if defined(TARGET_PPC64)
a2ffb812
AJ
3346 if (ctx->sf_mode == 0)
3347 tcg_gen_movi_tl(cpu_lr, (uint32_t)nip);
e1833e1f
JM
3348 else
3349#endif
a2ffb812 3350 tcg_gen_movi_tl(cpu_lr, nip);
e1833e1f
JM
3351}
3352
79aceca5
FB
3353/* b ba bl bla */
3354GEN_HANDLER(b, 0x12, 0xFF, 0xFF, 0x00000000, PPC_FLOW)
3355{
76a66253 3356 target_ulong li, target;
38a64f9d 3357
8cbcb4fa 3358 ctx->exception = POWERPC_EXCP_BRANCH;
38a64f9d 3359 /* sign extend LI */
76a66253 3360#if defined(TARGET_PPC64)
d9bce9d9
JM
3361 if (ctx->sf_mode)
3362 li = ((int64_t)LI(ctx->opcode) << 38) >> 38;
3363 else
76a66253 3364#endif
d9bce9d9 3365 li = ((int32_t)LI(ctx->opcode) << 6) >> 6;
76a66253 3366 if (likely(AA(ctx->opcode) == 0))
046d6672 3367 target = ctx->nip + li - 4;
79aceca5 3368 else
9a64fbe4 3369 target = li;
e1833e1f
JM
3370 if (LK(ctx->opcode))
3371 gen_setlr(ctx, ctx->nip);
c1942362 3372 gen_goto_tb(ctx, 0, target);
79aceca5
FB
3373}
3374
e98a6e40
FB
3375#define BCOND_IM 0
3376#define BCOND_LR 1
3377#define BCOND_CTR 2
3378
b068d6a7 3379static always_inline void gen_bcond (DisasContext *ctx, int type)
d9bce9d9 3380{
d9bce9d9 3381 uint32_t bo = BO(ctx->opcode);
a2ffb812
AJ
3382 int l1 = gen_new_label();
3383 TCGv target;
e98a6e40 3384
8cbcb4fa 3385 ctx->exception = POWERPC_EXCP_BRANCH;
a2ffb812
AJ
3386 if (type == BCOND_LR || type == BCOND_CTR) {
3387 target = tcg_temp_local_new(TCG_TYPE_TL);
3388 if (type == BCOND_CTR)
3389 tcg_gen_mov_tl(target, cpu_ctr);
3390 else
3391 tcg_gen_mov_tl(target, cpu_lr);
e98a6e40 3392 }
e1833e1f
JM
3393 if (LK(ctx->opcode))
3394 gen_setlr(ctx, ctx->nip);
a2ffb812
AJ
3395 l1 = gen_new_label();
3396 if ((bo & 0x4) == 0) {
3397 /* Decrement and test CTR */
3398 TCGv temp = tcg_temp_new(TCG_TYPE_TL);
3399 if (unlikely(type == BCOND_CTR)) {
3400 GEN_EXCP_INVAL(ctx);
3401 return;
3402 }
3403 tcg_gen_subi_tl(cpu_ctr, cpu_ctr, 1);
d9bce9d9 3404#if defined(TARGET_PPC64)
a2ffb812
AJ
3405 if (!ctx->sf_mode)
3406 tcg_gen_ext32u_tl(temp, cpu_ctr);
3407 else
d9bce9d9 3408#endif
a2ffb812
AJ
3409 tcg_gen_mov_tl(temp, cpu_ctr);
3410 if (bo & 0x2) {
3411 tcg_gen_brcondi_tl(TCG_COND_NE, temp, 0, l1);
3412 } else {
3413 tcg_gen_brcondi_tl(TCG_COND_EQ, temp, 0, l1);
e98a6e40 3414 }
a2ffb812
AJ
3415 }
3416 if ((bo & 0x10) == 0) {
3417 /* Test CR */
3418 uint32_t bi = BI(ctx->opcode);
3419 uint32_t mask = 1 << (3 - (bi & 0x03));
3420 TCGv temp = tcg_temp_new(TCG_TYPE_I32);
3421
d9bce9d9 3422 if (bo & 0x8) {
a2ffb812
AJ
3423 tcg_gen_andi_i32(temp, cpu_crf[bi >> 2], mask);
3424 tcg_gen_brcondi_i32(TCG_COND_EQ, temp, 0, l1);
d9bce9d9 3425 } else {
a2ffb812
AJ
3426 tcg_gen_andi_i32(temp, cpu_crf[bi >> 2], mask);
3427 tcg_gen_brcondi_i32(TCG_COND_NE, temp, 0, l1);
d9bce9d9
JM
3428 }
3429 }
e98a6e40 3430 if (type == BCOND_IM) {
a2ffb812
AJ
3431
3432 target_ulong li = (target_long)((int16_t)(BD(ctx->opcode)));
3433 if (likely(AA(ctx->opcode) == 0)) {
3434 gen_goto_tb(ctx, 0, ctx->nip + li - 4);
3435 } else {
3436 gen_goto_tb(ctx, 0, li);
3437 }
c53be334 3438 gen_set_label(l1);
c1942362 3439 gen_goto_tb(ctx, 1, ctx->nip);
e98a6e40 3440 } else {
d9bce9d9 3441#if defined(TARGET_PPC64)
a2ffb812
AJ
3442 if (!(ctx->sf_mode))
3443 tcg_gen_andi_tl(cpu_nip, target, (uint32_t)~3);
3444 else
3445#endif
3446 tcg_gen_andi_tl(cpu_nip, target, ~3);
3447 tcg_gen_exit_tb(0);
3448 gen_set_label(l1);
3449#if defined(TARGET_PPC64)
3450 if (!(ctx->sf_mode))
3451 tcg_gen_movi_tl(cpu_nip, (uint32_t)ctx->nip);
d9bce9d9
JM
3452 else
3453#endif
a2ffb812 3454 tcg_gen_movi_tl(cpu_nip, ctx->nip);
57fec1fe 3455 tcg_gen_exit_tb(0);
08e46e54 3456 }
e98a6e40
FB
3457}
3458
3459GEN_HANDLER(bc, 0x10, 0xFF, 0xFF, 0x00000000, PPC_FLOW)
3b46e624 3460{
e98a6e40
FB
3461 gen_bcond(ctx, BCOND_IM);
3462}
3463
3464GEN_HANDLER(bcctr, 0x13, 0x10, 0x10, 0x00000000, PPC_FLOW)
3b46e624 3465{
e98a6e40
FB
3466 gen_bcond(ctx, BCOND_CTR);
3467}
3468
3469GEN_HANDLER(bclr, 0x13, 0x10, 0x00, 0x00000000, PPC_FLOW)
3b46e624 3470{
e98a6e40
FB
3471 gen_bcond(ctx, BCOND_LR);
3472}
79aceca5
FB
3473
3474/*** Condition register logical ***/
e1571908
AJ
3475#define GEN_CRLOGIC(name, tcg_op, opc) \
3476GEN_HANDLER(name, 0x13, 0x01, opc, 0x00000001, PPC_INTEGER) \
79aceca5 3477{ \
fc0d441e
JM
3478 uint8_t bitmask; \
3479 int sh; \
e1571908 3480 TCGv temp1, temp2; \
fc0d441e 3481 sh = (crbD(ctx->opcode) & 0x03) - (crbA(ctx->opcode) & 0x03); \
e1571908 3482 temp1 = tcg_temp_new(TCG_TYPE_I32); \
fc0d441e 3483 if (sh > 0) \
e1571908 3484 tcg_gen_shri_i32(temp1, cpu_crf[crbA(ctx->opcode) >> 2], sh); \
fc0d441e 3485 else if (sh < 0) \
e1571908
AJ
3486 tcg_gen_shli_i32(temp1, cpu_crf[crbA(ctx->opcode) >> 2], -sh); \
3487 else \
2e31f5d3 3488 tcg_gen_mov_i32(temp1, cpu_crf[crbA(ctx->opcode) >> 2]); \
e1571908 3489 temp2 = tcg_temp_new(TCG_TYPE_I32); \
fc0d441e
JM
3490 sh = (crbD(ctx->opcode) & 0x03) - (crbB(ctx->opcode) & 0x03); \
3491 if (sh > 0) \
e1571908 3492 tcg_gen_shri_i32(temp2, cpu_crf[crbB(ctx->opcode) >> 2], sh); \
fc0d441e 3493 else if (sh < 0) \
e1571908
AJ
3494 tcg_gen_shli_i32(temp2, cpu_crf[crbB(ctx->opcode) >> 2], -sh); \
3495 else \
3496 tcg_gen_mov_i32(temp2, cpu_crf[crbB(ctx->opcode) >> 2]); \
3497 tcg_op(temp1, temp1, temp2); \
fc0d441e 3498 bitmask = 1 << (3 - (crbD(ctx->opcode) & 0x03)); \
e1571908
AJ
3499 tcg_gen_andi_i32(temp1, temp1, bitmask); \
3500 tcg_gen_andi_i32(temp2, cpu_crf[crbD(ctx->opcode) >> 2], ~bitmask); \
3501 tcg_gen_or_i32(cpu_crf[crbD(ctx->opcode) >> 2], temp1, temp2); \
3502 tcg_temp_free(temp1); \
3503 tcg_temp_free(temp2); \
79aceca5
FB
3504}
3505
3506/* crand */
e1571908 3507GEN_CRLOGIC(crand, tcg_gen_and_i32, 0x08);
79aceca5 3508/* crandc */
e1571908 3509GEN_CRLOGIC(crandc, tcg_gen_andc_i32, 0x04);
79aceca5 3510/* creqv */
e1571908 3511GEN_CRLOGIC(creqv, tcg_gen_eqv_i32, 0x09);
79aceca5 3512/* crnand */
e1571908 3513GEN_CRLOGIC(crnand, tcg_gen_nand_i32, 0x07);
79aceca5 3514/* crnor */
e1571908 3515GEN_CRLOGIC(crnor, tcg_gen_nor_i32, 0x01);
79aceca5 3516/* cror */
e1571908 3517GEN_CRLOGIC(cror, tcg_gen_or_i32, 0x0E);
79aceca5 3518/* crorc */
e1571908 3519GEN_CRLOGIC(crorc, tcg_gen_orc_i32, 0x0D);
79aceca5 3520/* crxor */
e1571908 3521GEN_CRLOGIC(crxor, tcg_gen_xor_i32, 0x06);
79aceca5
FB
3522/* mcrf */
3523GEN_HANDLER(mcrf, 0x13, 0x00, 0xFF, 0x00000001, PPC_INTEGER)
3524{
47e4661c 3525 tcg_gen_mov_i32(cpu_crf[crfD(ctx->opcode)], cpu_crf[crfS(ctx->opcode)]);
79aceca5
FB
3526}
3527
3528/*** System linkage ***/
3529/* rfi (supervisor only) */
76a66253 3530GEN_HANDLER(rfi, 0x13, 0x12, 0x01, 0x03FF8001, PPC_FLOW)
79aceca5 3531{
9a64fbe4 3532#if defined(CONFIG_USER_ONLY)
e1833e1f 3533 GEN_EXCP_PRIVOPC(ctx);
9a64fbe4
FB
3534#else
3535 /* Restore CPU state */
76a66253 3536 if (unlikely(!ctx->supervisor)) {
e1833e1f 3537 GEN_EXCP_PRIVOPC(ctx);
9fddaa0c 3538 return;
9a64fbe4 3539 }
a42bd6cc 3540 gen_op_rfi();
e1833e1f 3541 GEN_SYNC(ctx);
9a64fbe4 3542#endif
79aceca5
FB
3543}
3544
426613db 3545#if defined(TARGET_PPC64)
a750fc0b 3546GEN_HANDLER(rfid, 0x13, 0x12, 0x00, 0x03FF8001, PPC_64B)
426613db
JM
3547{
3548#if defined(CONFIG_USER_ONLY)
e1833e1f 3549 GEN_EXCP_PRIVOPC(ctx);
426613db
JM
3550#else
3551 /* Restore CPU state */
3552 if (unlikely(!ctx->supervisor)) {
e1833e1f 3553 GEN_EXCP_PRIVOPC(ctx);
426613db
JM
3554 return;
3555 }
a42bd6cc 3556 gen_op_rfid();
e1833e1f 3557 GEN_SYNC(ctx);
426613db
JM
3558#endif
3559}
426613db 3560
5b8105fa 3561GEN_HANDLER(hrfid, 0x13, 0x12, 0x08, 0x03FF8001, PPC_64H)
be147d08
JM
3562{
3563#if defined(CONFIG_USER_ONLY)
3564 GEN_EXCP_PRIVOPC(ctx);
3565#else
3566 /* Restore CPU state */
3567 if (unlikely(ctx->supervisor <= 1)) {
3568 GEN_EXCP_PRIVOPC(ctx);
3569 return;
3570 }
3571 gen_op_hrfid();
3572 GEN_SYNC(ctx);
3573#endif
3574}
3575#endif
3576
79aceca5 3577/* sc */
417bf010
JM
3578#if defined(CONFIG_USER_ONLY)
3579#define POWERPC_SYSCALL POWERPC_EXCP_SYSCALL_USER
3580#else
3581#define POWERPC_SYSCALL POWERPC_EXCP_SYSCALL
3582#endif
e1833e1f 3583GEN_HANDLER(sc, 0x11, 0xFF, 0xFF, 0x03FFF01D, PPC_FLOW)
79aceca5 3584{
e1833e1f
JM
3585 uint32_t lev;
3586
3587 lev = (ctx->opcode >> 5) & 0x7F;
417bf010 3588 GEN_EXCP(ctx, POWERPC_SYSCALL, lev);
79aceca5
FB
3589}
3590
3591/*** Trap ***/
3592/* tw */
76a66253 3593GEN_HANDLER(tw, 0x1F, 0x04, 0x00, 0x00000001, PPC_FLOW)
79aceca5 3594{
f78fb44e
AJ
3595 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]);
3596 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rB(ctx->opcode)]);
a0ae05aa 3597 /* Update the nip since this might generate a trap exception */
d9bce9d9 3598 gen_update_nip(ctx, ctx->nip);
9a64fbe4 3599 gen_op_tw(TO(ctx->opcode));
79aceca5
FB
3600}
3601
3602/* twi */
3603GEN_HANDLER(twi, 0x03, 0xFF, 0xFF, 0x00000000, PPC_FLOW)
3604{
f78fb44e 3605 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]);
02f4f6c2 3606 tcg_gen_movi_tl(cpu_T[1], SIMM(ctx->opcode));
d9bce9d9
JM
3607 /* Update the nip since this might generate a trap exception */
3608 gen_update_nip(ctx, ctx->nip);
76a66253 3609 gen_op_tw(TO(ctx->opcode));
79aceca5
FB
3610}
3611
d9bce9d9
JM
3612#if defined(TARGET_PPC64)
3613/* td */
3614GEN_HANDLER(td, 0x1F, 0x04, 0x02, 0x00000001, PPC_64B)
3615{
f78fb44e
AJ
3616 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]);
3617 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rB(ctx->opcode)]);
d9bce9d9
JM
3618 /* Update the nip since this might generate a trap exception */
3619 gen_update_nip(ctx, ctx->nip);
3620 gen_op_td(TO(ctx->opcode));
3621}
3622
3623/* tdi */
3624GEN_HANDLER(tdi, 0x02, 0xFF, 0xFF, 0x00000000, PPC_64B)
3625{
f78fb44e 3626 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]);
02f4f6c2 3627 tcg_gen_movi_tl(cpu_T[1], SIMM(ctx->opcode));
d9bce9d9
JM
3628 /* Update the nip since this might generate a trap exception */
3629 gen_update_nip(ctx, ctx->nip);
3630 gen_op_td(TO(ctx->opcode));
3631}
3632#endif
3633
79aceca5 3634/*** Processor control ***/
79aceca5
FB
3635/* mcrxr */
3636GEN_HANDLER(mcrxr, 0x1F, 0x00, 0x10, 0x007FF801, PPC_MISC)
3637{
3d7b417e
AJ
3638 tcg_gen_trunc_tl_i32(cpu_crf[crfD(ctx->opcode)], cpu_xer);
3639 tcg_gen_shri_i32(cpu_crf[crfD(ctx->opcode)], cpu_crf[crfD(ctx->opcode)], XER_CA);
3640 tcg_gen_andi_i32(cpu_xer, cpu_xer, ~(1 << XER_SO | 1 << XER_OV | 1 << XER_CA));
79aceca5
FB
3641}
3642
3643/* mfcr */
76a66253 3644GEN_HANDLER(mfcr, 0x1F, 0x13, 0x00, 0x00000801, PPC_MISC)
79aceca5 3645{
76a66253 3646 uint32_t crm, crn;
3b46e624 3647
76a66253
JM
3648 if (likely(ctx->opcode & 0x00100000)) {
3649 crm = CRM(ctx->opcode);
3650 if (likely((crm ^ (crm - 1)) == 0)) {
3651 crn = ffs(crm);
e1571908 3652 tcg_gen_extu_i32_tl(cpu_gpr[rD(ctx->opcode)], cpu_crf[7 - crn]);
76a66253 3653 }
d9bce9d9 3654 } else {
e1571908 3655 tcg_gen_helper_1_0(helper_load_cr, cpu_gpr[rD(ctx->opcode)]);
d9bce9d9 3656 }
79aceca5
FB
3657}
3658
3659/* mfmsr */
3660GEN_HANDLER(mfmsr, 0x1F, 0x13, 0x02, 0x001FF801, PPC_MISC)
3661{
9a64fbe4 3662#if defined(CONFIG_USER_ONLY)
e1833e1f 3663 GEN_EXCP_PRIVREG(ctx);
9a64fbe4 3664#else
76a66253 3665 if (unlikely(!ctx->supervisor)) {
e1833e1f 3666 GEN_EXCP_PRIVREG(ctx);
9fddaa0c 3667 return;
9a64fbe4 3668 }
6676f424 3669 gen_op_load_msr();
f78fb44e 3670 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]);
9a64fbe4 3671#endif
79aceca5
FB
3672}
3673
a11b8151 3674#if 1
6f2d8978 3675#define SPR_NOACCESS ((void *)(-1UL))
3fc6c082
FB
3676#else
3677static void spr_noaccess (void *opaque, int sprn)
3678{
3679 sprn = ((sprn >> 5) & 0x1F) | ((sprn & 0x1F) << 5);
3680 printf("ERROR: try to access SPR %d !\n", sprn);
3681}
3682#define SPR_NOACCESS (&spr_noaccess)
3683#endif
3684
79aceca5 3685/* mfspr */
b068d6a7 3686static always_inline void gen_op_mfspr (DisasContext *ctx)
79aceca5 3687{
3fc6c082 3688 void (*read_cb)(void *opaque, int sprn);
79aceca5
FB
3689 uint32_t sprn = SPR(ctx->opcode);
3690
3fc6c082 3691#if !defined(CONFIG_USER_ONLY)
be147d08
JM
3692 if (ctx->supervisor == 2)
3693 read_cb = ctx->spr_cb[sprn].hea_read;
7863667f 3694 else if (ctx->supervisor)
3fc6c082
FB
3695 read_cb = ctx->spr_cb[sprn].oea_read;
3696 else
9a64fbe4 3697#endif
3fc6c082 3698 read_cb = ctx->spr_cb[sprn].uea_read;
76a66253
JM
3699 if (likely(read_cb != NULL)) {
3700 if (likely(read_cb != SPR_NOACCESS)) {
3fc6c082 3701 (*read_cb)(ctx, sprn);
f78fb44e 3702 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]);
3fc6c082
FB
3703 } else {
3704 /* Privilege exception */
9fceefa7
JM
3705 /* This is a hack to avoid warnings when running Linux:
3706 * this OS breaks the PowerPC virtualisation model,
3707 * allowing userland application to read the PVR
3708 */
3709 if (sprn != SPR_PVR) {
3710 if (loglevel != 0) {
6b542af7 3711 fprintf(logfile, "Trying to read privileged spr %d %03x at "
077fc206 3712 ADDRX "\n", sprn, sprn, ctx->nip);
9fceefa7 3713 }
077fc206
JM
3714 printf("Trying to read privileged spr %d %03x at " ADDRX "\n",
3715 sprn, sprn, ctx->nip);
f24e5695 3716 }
e1833e1f 3717 GEN_EXCP_PRIVREG(ctx);
79aceca5 3718 }
3fc6c082
FB
3719 } else {
3720 /* Not defined */
4a057712 3721 if (loglevel != 0) {
077fc206
JM
3722 fprintf(logfile, "Trying to read invalid spr %d %03x at "
3723 ADDRX "\n", sprn, sprn, ctx->nip);
f24e5695 3724 }
077fc206
JM
3725 printf("Trying to read invalid spr %d %03x at " ADDRX "\n",
3726 sprn, sprn, ctx->nip);
e1833e1f
JM
3727 GEN_EXCP(ctx, POWERPC_EXCP_PROGRAM,
3728 POWERPC_EXCP_INVAL | POWERPC_EXCP_INVAL_SPR);
79aceca5 3729 }
79aceca5
FB
3730}
3731
3fc6c082 3732GEN_HANDLER(mfspr, 0x1F, 0x13, 0x0A, 0x00000001, PPC_MISC)
79aceca5 3733{
3fc6c082 3734 gen_op_mfspr(ctx);
76a66253 3735}
3fc6c082
FB
3736
3737/* mftb */
a750fc0b 3738GEN_HANDLER(mftb, 0x1F, 0x13, 0x0B, 0x00000001, PPC_MFTB)
3fc6c082
FB
3739{
3740 gen_op_mfspr(ctx);
79aceca5
FB
3741}
3742
3743/* mtcrf */
8dd4983c 3744GEN_HANDLER(mtcrf, 0x1F, 0x10, 0x04, 0x00000801, PPC_MISC)
79aceca5 3745{
76a66253 3746 uint32_t crm, crn;
3b46e624 3747
76a66253
JM
3748 crm = CRM(ctx->opcode);
3749 if (likely((ctx->opcode & 0x00100000) || (crm ^ (crm - 1)) == 0)) {
3750 crn = ffs(crm);
e1571908
AJ
3751 tcg_gen_shri_i32(cpu_crf[7 - crn], cpu_gpr[rS(ctx->opcode)], crn * 4);
3752 tcg_gen_andi_i32(cpu_crf[7 - crn], cpu_crf[7 - crn], 0xf);
76a66253 3753 } else {
e1571908
AJ
3754 TCGv temp = tcg_const_tl(crm);
3755 tcg_gen_helper_0_2(helper_store_cr, cpu_gpr[rS(ctx->opcode)], temp);
3756 tcg_temp_free(temp);
76a66253 3757 }
79aceca5
FB
3758}
3759
3760/* mtmsr */
426613db 3761#if defined(TARGET_PPC64)
be147d08 3762GEN_HANDLER(mtmsrd, 0x1F, 0x12, 0x05, 0x001EF801, PPC_64B)
426613db
JM
3763{
3764#if defined(CONFIG_USER_ONLY)
e1833e1f 3765 GEN_EXCP_PRIVREG(ctx);
426613db
JM
3766#else
3767 if (unlikely(!ctx->supervisor)) {
e1833e1f 3768 GEN_EXCP_PRIVREG(ctx);
426613db
JM
3769 return;
3770 }
f78fb44e 3771 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rS(ctx->opcode)]);
be147d08
JM
3772 if (ctx->opcode & 0x00010000) {
3773 /* Special form that does not need any synchronisation */
3774 gen_op_update_riee();
3775 } else {
056b05f8
JM
3776 /* XXX: we need to update nip before the store
3777 * if we enter power saving mode, we will exit the loop
3778 * directly from ppc_store_msr
3779 */
be147d08 3780 gen_update_nip(ctx, ctx->nip);
6676f424 3781 gen_op_store_msr();
be147d08
JM
3782 /* Must stop the translation as machine state (may have) changed */
3783 /* Note that mtmsr is not always defined as context-synchronizing */
056b05f8 3784 ctx->exception = POWERPC_EXCP_STOP;
be147d08 3785 }
426613db
JM
3786#endif
3787}
3788#endif
3789
79aceca5
FB
3790GEN_HANDLER(mtmsr, 0x1F, 0x12, 0x04, 0x001FF801, PPC_MISC)
3791{
9a64fbe4 3792#if defined(CONFIG_USER_ONLY)
e1833e1f 3793 GEN_EXCP_PRIVREG(ctx);
9a64fbe4 3794#else
76a66253 3795 if (unlikely(!ctx->supervisor)) {
e1833e1f 3796 GEN_EXCP_PRIVREG(ctx);
9fddaa0c 3797 return;
9a64fbe4 3798 }
f78fb44e 3799 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rS(ctx->opcode)]);
be147d08
JM
3800 if (ctx->opcode & 0x00010000) {
3801 /* Special form that does not need any synchronisation */
3802 gen_op_update_riee();
3803 } else {
056b05f8
JM
3804 /* XXX: we need to update nip before the store
3805 * if we enter power saving mode, we will exit the loop
3806 * directly from ppc_store_msr
3807 */
be147d08 3808 gen_update_nip(ctx, ctx->nip);
d9bce9d9 3809#if defined(TARGET_PPC64)
be147d08 3810 if (!ctx->sf_mode)
6676f424 3811 gen_op_store_msr_32();
be147d08 3812 else
d9bce9d9 3813#endif
6676f424 3814 gen_op_store_msr();
be147d08
JM
3815 /* Must stop the translation as machine state (may have) changed */
3816 /* Note that mtmsrd is not always defined as context-synchronizing */
056b05f8 3817 ctx->exception = POWERPC_EXCP_STOP;
be147d08 3818 }
9a64fbe4 3819#endif
79aceca5
FB
3820}
3821
3822/* mtspr */
3823GEN_HANDLER(mtspr, 0x1F, 0x13, 0x0E, 0x00000001, PPC_MISC)
3824{
3fc6c082 3825 void (*write_cb)(void *opaque, int sprn);
79aceca5
FB
3826 uint32_t sprn = SPR(ctx->opcode);
3827
3fc6c082 3828#if !defined(CONFIG_USER_ONLY)
be147d08
JM
3829 if (ctx->supervisor == 2)
3830 write_cb = ctx->spr_cb[sprn].hea_write;
7863667f 3831 else if (ctx->supervisor)
3fc6c082
FB
3832 write_cb = ctx->spr_cb[sprn].oea_write;
3833 else
9a64fbe4 3834#endif
3fc6c082 3835 write_cb = ctx->spr_cb[sprn].uea_write;
76a66253
JM
3836 if (likely(write_cb != NULL)) {
3837 if (likely(write_cb != SPR_NOACCESS)) {
f78fb44e 3838 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rS(ctx->opcode)]);
3fc6c082
FB
3839 (*write_cb)(ctx, sprn);
3840 } else {
3841 /* Privilege exception */
4a057712 3842 if (loglevel != 0) {
077fc206
JM
3843 fprintf(logfile, "Trying to write privileged spr %d %03x at "
3844 ADDRX "\n", sprn, sprn, ctx->nip);
f24e5695 3845 }
077fc206
JM
3846 printf("Trying to write privileged spr %d %03x at " ADDRX "\n",
3847 sprn, sprn, ctx->nip);
e1833e1f 3848 GEN_EXCP_PRIVREG(ctx);
76a66253 3849 }
3fc6c082
FB
3850 } else {
3851 /* Not defined */
4a057712 3852 if (loglevel != 0) {
077fc206
JM
3853 fprintf(logfile, "Trying to write invalid spr %d %03x at "
3854 ADDRX "\n", sprn, sprn, ctx->nip);
f24e5695 3855 }
077fc206
JM
3856 printf("Trying to write invalid spr %d %03x at " ADDRX "\n",
3857 sprn, sprn, ctx->nip);
e1833e1f
JM
3858 GEN_EXCP(ctx, POWERPC_EXCP_PROGRAM,
3859 POWERPC_EXCP_INVAL | POWERPC_EXCP_INVAL_SPR);
79aceca5 3860 }
79aceca5
FB
3861}
3862
3863/*** Cache management ***/
79aceca5 3864/* dcbf */
0db1b20e 3865GEN_HANDLER(dcbf, 0x1F, 0x16, 0x02, 0x03C00001, PPC_CACHE)
79aceca5 3866{
dac454af 3867 /* XXX: specification says this is treated as a load by the MMU */
b61f2753
AJ
3868 TCGv temp = tcg_temp_new(TCG_TYPE_TL);
3869 gen_addr_reg_index(temp, ctx);
3870 gen_qemu_ld8u(temp, temp, ctx->mem_idx);
3871 tcg_temp_free(temp);
79aceca5
FB
3872}
3873
3874/* dcbi (Supervisor only) */
9a64fbe4 3875GEN_HANDLER(dcbi, 0x1F, 0x16, 0x0E, 0x03E00001, PPC_CACHE)
79aceca5 3876{
a541f297 3877#if defined(CONFIG_USER_ONLY)
e1833e1f 3878 GEN_EXCP_PRIVOPC(ctx);
a541f297 3879#else
b61f2753 3880 TCGv EA, val;
76a66253 3881 if (unlikely(!ctx->supervisor)) {
e1833e1f 3882 GEN_EXCP_PRIVOPC(ctx);
9fddaa0c 3883 return;
9a64fbe4 3884 }
b61f2753
AJ
3885 EA = tcg_temp_new(TCG_TYPE_TL);
3886 gen_addr_reg_index(EA, ctx);
ed69522c 3887 val = tcg_temp_new(TCG_TYPE_TL);
76a66253 3888 /* XXX: specification says this should be treated as a store by the MMU */
b61f2753
AJ
3889 gen_qemu_ld8u(val, EA, ctx->mem_idx);
3890 gen_qemu_st8(val, EA, ctx->mem_idx);
3891 tcg_temp_free(val);
3892 tcg_temp_free(EA);
a541f297 3893#endif
79aceca5
FB
3894}
3895
3896/* dcdst */
9a64fbe4 3897GEN_HANDLER(dcbst, 0x1F, 0x16, 0x01, 0x03E00001, PPC_CACHE)
79aceca5 3898{
76a66253 3899 /* XXX: specification say this is treated as a load by the MMU */
b61f2753
AJ
3900 TCGv temp = tcg_temp_new(TCG_TYPE_TL);
3901 gen_addr_reg_index(temp, ctx);
3902 gen_qemu_ld8u(temp, temp, ctx->mem_idx);
3903 tcg_temp_free(temp);
79aceca5
FB
3904}
3905
3906/* dcbt */
0db1b20e 3907GEN_HANDLER(dcbt, 0x1F, 0x16, 0x08, 0x02000001, PPC_CACHE)
79aceca5 3908{
0db1b20e 3909 /* interpreted as no-op */
76a66253
JM
3910 /* XXX: specification say this is treated as a load by the MMU
3911 * but does not generate any exception
3912 */
79aceca5
FB
3913}
3914
3915/* dcbtst */
0db1b20e 3916GEN_HANDLER(dcbtst, 0x1F, 0x16, 0x07, 0x02000001, PPC_CACHE)
79aceca5 3917{
0db1b20e 3918 /* interpreted as no-op */
76a66253
JM
3919 /* XXX: specification say this is treated as a load by the MMU
3920 * but does not generate any exception
3921 */
79aceca5
FB
3922}
3923
3924/* dcbz */
d63001d1 3925#define op_dcbz(n) (*gen_op_dcbz[n][ctx->mem_idx])()
7863667f
JM
3926static GenOpFunc *gen_op_dcbz[4][NB_MEM_FUNCS] = {
3927 /* 32 bytes cache line size */
d63001d1 3928 {
7863667f
JM
3929#define gen_op_dcbz_l32_le_raw gen_op_dcbz_l32_raw
3930#define gen_op_dcbz_l32_le_user gen_op_dcbz_l32_user
3931#define gen_op_dcbz_l32_le_kernel gen_op_dcbz_l32_kernel
3932#define gen_op_dcbz_l32_le_hypv gen_op_dcbz_l32_hypv
3933#define gen_op_dcbz_l32_le_64_raw gen_op_dcbz_l32_64_raw
3934#define gen_op_dcbz_l32_le_64_user gen_op_dcbz_l32_64_user
3935#define gen_op_dcbz_l32_le_64_kernel gen_op_dcbz_l32_64_kernel
3936#define gen_op_dcbz_l32_le_64_hypv gen_op_dcbz_l32_64_hypv
3937 GEN_MEM_FUNCS(dcbz_l32),
d63001d1 3938 },
7863667f 3939 /* 64 bytes cache line size */
d63001d1 3940 {
7863667f
JM
3941#define gen_op_dcbz_l64_le_raw gen_op_dcbz_l64_raw
3942#define gen_op_dcbz_l64_le_user gen_op_dcbz_l64_user
3943#define gen_op_dcbz_l64_le_kernel gen_op_dcbz_l64_kernel
3944#define gen_op_dcbz_l64_le_hypv gen_op_dcbz_l64_hypv
3945#define gen_op_dcbz_l64_le_64_raw gen_op_dcbz_l64_64_raw
3946#define gen_op_dcbz_l64_le_64_user gen_op_dcbz_l64_64_user
3947#define gen_op_dcbz_l64_le_64_kernel gen_op_dcbz_l64_64_kernel
3948#define gen_op_dcbz_l64_le_64_hypv gen_op_dcbz_l64_64_hypv
3949 GEN_MEM_FUNCS(dcbz_l64),
d63001d1 3950 },
7863667f 3951 /* 128 bytes cache line size */
d63001d1 3952 {
7863667f
JM
3953#define gen_op_dcbz_l128_le_raw gen_op_dcbz_l128_raw
3954#define gen_op_dcbz_l128_le_user gen_op_dcbz_l128_user
3955#define gen_op_dcbz_l128_le_kernel gen_op_dcbz_l128_kernel
3956#define gen_op_dcbz_l128_le_hypv gen_op_dcbz_l128_hypv
3957#define gen_op_dcbz_l128_le_64_raw gen_op_dcbz_l128_64_raw
3958#define gen_op_dcbz_l128_le_64_user gen_op_dcbz_l128_64_user
3959#define gen_op_dcbz_l128_le_64_kernel gen_op_dcbz_l128_64_kernel
3960#define gen_op_dcbz_l128_le_64_hypv gen_op_dcbz_l128_64_hypv
3961 GEN_MEM_FUNCS(dcbz_l128),
d63001d1 3962 },
7863667f 3963 /* tunable cache line size */
d63001d1 3964 {
7863667f
JM
3965#define gen_op_dcbz_le_raw gen_op_dcbz_raw
3966#define gen_op_dcbz_le_user gen_op_dcbz_user
3967#define gen_op_dcbz_le_kernel gen_op_dcbz_kernel
3968#define gen_op_dcbz_le_hypv gen_op_dcbz_hypv
3969#define gen_op_dcbz_le_64_raw gen_op_dcbz_64_raw
3970#define gen_op_dcbz_le_64_user gen_op_dcbz_64_user
3971#define gen_op_dcbz_le_64_kernel gen_op_dcbz_64_kernel
3972#define gen_op_dcbz_le_64_hypv gen_op_dcbz_64_hypv
3973 GEN_MEM_FUNCS(dcbz),
d63001d1 3974 },
76a66253 3975};
9a64fbe4 3976
b068d6a7
JM
3977static always_inline void handler_dcbz (DisasContext *ctx,
3978 int dcache_line_size)
d63001d1
JM
3979{
3980 int n;
3981
3982 switch (dcache_line_size) {
3983 case 32:
3984 n = 0;
3985 break;
3986 case 64:
3987 n = 1;
3988 break;
3989 case 128:
3990 n = 2;
3991 break;
3992 default:
3993 n = 3;
3994 break;
3995 }
3996 op_dcbz(n);
3997}
3998
3999GEN_HANDLER(dcbz, 0x1F, 0x16, 0x1F, 0x03E00001, PPC_CACHE_DCBZ)
79aceca5 4000{
e2be8d8d 4001 gen_addr_reg_index(cpu_T[0], ctx);
d63001d1
JM
4002 handler_dcbz(ctx, ctx->dcache_line_size);
4003 gen_op_check_reservation();
4004}
4005
c7697e1f 4006GEN_HANDLER2(dcbz_970, "dcbz", 0x1F, 0x16, 0x1F, 0x03C00001, PPC_CACHE_DCBZT)
d63001d1 4007{
e2be8d8d 4008 gen_addr_reg_index(cpu_T[0], ctx);
d63001d1
JM
4009 if (ctx->opcode & 0x00200000)
4010 handler_dcbz(ctx, ctx->dcache_line_size);
4011 else
4012 handler_dcbz(ctx, -1);
4b3686fa 4013 gen_op_check_reservation();
79aceca5
FB
4014}
4015
4016/* icbi */
36f69651 4017#define op_icbi() (*gen_op_icbi[ctx->mem_idx])()
7863667f
JM
4018#define gen_op_icbi_le_raw gen_op_icbi_raw
4019#define gen_op_icbi_le_user gen_op_icbi_user
4020#define gen_op_icbi_le_kernel gen_op_icbi_kernel
4021#define gen_op_icbi_le_hypv gen_op_icbi_hypv
4022#define gen_op_icbi_le_64_raw gen_op_icbi_64_raw
4023#define gen_op_icbi_le_64_user gen_op_icbi_64_user
4024#define gen_op_icbi_le_64_kernel gen_op_icbi_64_kernel
4025#define gen_op_icbi_le_64_hypv gen_op_icbi_64_hypv
4026static GenOpFunc *gen_op_icbi[NB_MEM_FUNCS] = {
4027 GEN_MEM_FUNCS(icbi),
36f69651 4028};
e1833e1f 4029
1b413d55 4030GEN_HANDLER(icbi, 0x1F, 0x16, 0x1E, 0x03E00001, PPC_CACHE_ICBI)
79aceca5 4031{
30032c94
JM
4032 /* NIP cannot be restored if the memory exception comes from an helper */
4033 gen_update_nip(ctx, ctx->nip - 4);
e2be8d8d 4034 gen_addr_reg_index(cpu_T[0], ctx);
36f69651 4035 op_icbi();
79aceca5
FB
4036}
4037
4038/* Optional: */
4039/* dcba */
a750fc0b 4040GEN_HANDLER(dcba, 0x1F, 0x16, 0x17, 0x03E00001, PPC_CACHE_DCBA)
79aceca5 4041{
0db1b20e
JM
4042 /* interpreted as no-op */
4043 /* XXX: specification say this is treated as a store by the MMU
4044 * but does not generate any exception
4045 */
79aceca5
FB
4046}
4047
4048/*** Segment register manipulation ***/
4049/* Supervisor only: */
4050/* mfsr */
4051GEN_HANDLER(mfsr, 0x1F, 0x13, 0x12, 0x0010F801, PPC_SEGMENT)
4052{
9a64fbe4 4053#if defined(CONFIG_USER_ONLY)
e1833e1f 4054 GEN_EXCP_PRIVREG(ctx);
9a64fbe4 4055#else
76a66253 4056 if (unlikely(!ctx->supervisor)) {
e1833e1f 4057 GEN_EXCP_PRIVREG(ctx);
9fddaa0c 4058 return;
9a64fbe4 4059 }
86c581dc 4060 tcg_gen_movi_tl(cpu_T[1], SR(ctx->opcode));
76a66253 4061 gen_op_load_sr();
f78fb44e 4062 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]);
9a64fbe4 4063#endif
79aceca5
FB
4064}
4065
4066/* mfsrin */
9a64fbe4 4067GEN_HANDLER(mfsrin, 0x1F, 0x13, 0x14, 0x001F0001, PPC_SEGMENT)
79aceca5 4068{
9a64fbe4 4069#if defined(CONFIG_USER_ONLY)
e1833e1f 4070 GEN_EXCP_PRIVREG(ctx);
9a64fbe4 4071#else
76a66253 4072 if (unlikely(!ctx->supervisor)) {
e1833e1f 4073 GEN_EXCP_PRIVREG(ctx);
9fddaa0c 4074 return;
9a64fbe4 4075 }
f78fb44e 4076 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rB(ctx->opcode)]);
76a66253
JM
4077 gen_op_srli_T1(28);
4078 gen_op_load_sr();
f78fb44e 4079 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]);
9a64fbe4 4080#endif
79aceca5
FB
4081}
4082
4083/* mtsr */
e63c59cb 4084GEN_HANDLER(mtsr, 0x1F, 0x12, 0x06, 0x0010F801, PPC_SEGMENT)
79aceca5 4085{
9a64fbe4 4086#if defined(CONFIG_USER_ONLY)
e1833e1f 4087 GEN_EXCP_PRIVREG(ctx);
9a64fbe4 4088#else
76a66253 4089 if (unlikely(!ctx->supervisor)) {
e1833e1f 4090 GEN_EXCP_PRIVREG(ctx);
9fddaa0c 4091 return;
9a64fbe4 4092 }
f78fb44e 4093 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rS(ctx->opcode)]);
86c581dc 4094 tcg_gen_movi_tl(cpu_T[1], SR(ctx->opcode));
76a66253 4095 gen_op_store_sr();
9a64fbe4 4096#endif
79aceca5
FB
4097}
4098
4099/* mtsrin */
9a64fbe4 4100GEN_HANDLER(mtsrin, 0x1F, 0x12, 0x07, 0x001F0001, PPC_SEGMENT)
79aceca5 4101{
9a64fbe4 4102#if defined(CONFIG_USER_ONLY)
e1833e1f 4103 GEN_EXCP_PRIVREG(ctx);
9a64fbe4 4104#else
76a66253 4105 if (unlikely(!ctx->supervisor)) {
e1833e1f 4106 GEN_EXCP_PRIVREG(ctx);
9fddaa0c 4107 return;
9a64fbe4 4108 }
f78fb44e
AJ
4109 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rS(ctx->opcode)]);
4110 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rB(ctx->opcode)]);
76a66253
JM
4111 gen_op_srli_T1(28);
4112 gen_op_store_sr();
9a64fbe4 4113#endif
79aceca5
FB
4114}
4115
12de9a39
JM
4116#if defined(TARGET_PPC64)
4117/* Specific implementation for PowerPC 64 "bridge" emulation using SLB */
4118/* mfsr */
c7697e1f 4119GEN_HANDLER2(mfsr_64b, "mfsr", 0x1F, 0x13, 0x12, 0x0010F801, PPC_SEGMENT_64B)
12de9a39
JM
4120{
4121#if defined(CONFIG_USER_ONLY)
4122 GEN_EXCP_PRIVREG(ctx);
4123#else
4124 if (unlikely(!ctx->supervisor)) {
4125 GEN_EXCP_PRIVREG(ctx);
4126 return;
4127 }
86c581dc 4128 tcg_gen_movi_tl(cpu_T[1], SR(ctx->opcode));
12de9a39 4129 gen_op_load_slb();
f78fb44e 4130 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]);
12de9a39
JM
4131#endif
4132}
4133
4134/* mfsrin */
c7697e1f
JM
4135GEN_HANDLER2(mfsrin_64b, "mfsrin", 0x1F, 0x13, 0x14, 0x001F0001,
4136 PPC_SEGMENT_64B)
12de9a39
JM
4137{
4138#if defined(CONFIG_USER_ONLY)
4139 GEN_EXCP_PRIVREG(ctx);
4140#else
4141 if (unlikely(!ctx->supervisor)) {
4142 GEN_EXCP_PRIVREG(ctx);
4143 return;
4144 }
f78fb44e 4145 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rB(ctx->opcode)]);
12de9a39
JM
4146 gen_op_srli_T1(28);
4147 gen_op_load_slb();
f78fb44e 4148 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]);
12de9a39
JM
4149#endif
4150}
4151
4152/* mtsr */
c7697e1f 4153GEN_HANDLER2(mtsr_64b, "mtsr", 0x1F, 0x12, 0x06, 0x0010F801, PPC_SEGMENT_64B)
12de9a39
JM
4154{
4155#if defined(CONFIG_USER_ONLY)
4156 GEN_EXCP_PRIVREG(ctx);
4157#else
4158 if (unlikely(!ctx->supervisor)) {
4159 GEN_EXCP_PRIVREG(ctx);
4160 return;
4161 }
f78fb44e 4162 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rS(ctx->opcode)]);
86c581dc 4163 tcg_gen_movi_tl(cpu_T[1], SR(ctx->opcode));
12de9a39
JM
4164 gen_op_store_slb();
4165#endif
4166}
4167
4168/* mtsrin */
c7697e1f
JM
4169GEN_HANDLER2(mtsrin_64b, "mtsrin", 0x1F, 0x12, 0x07, 0x001F0001,
4170 PPC_SEGMENT_64B)
12de9a39
JM
4171{
4172#if defined(CONFIG_USER_ONLY)
4173 GEN_EXCP_PRIVREG(ctx);
4174#else
4175 if (unlikely(!ctx->supervisor)) {
4176 GEN_EXCP_PRIVREG(ctx);
4177 return;
4178 }
f78fb44e
AJ
4179 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rS(ctx->opcode)]);
4180 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rB(ctx->opcode)]);
12de9a39
JM
4181 gen_op_srli_T1(28);
4182 gen_op_store_slb();
4183#endif
4184}
4185#endif /* defined(TARGET_PPC64) */
4186
79aceca5
FB
4187/*** Lookaside buffer management ***/
4188/* Optional & supervisor only: */
4189/* tlbia */
3fc6c082 4190GEN_HANDLER(tlbia, 0x1F, 0x12, 0x0B, 0x03FFFC01, PPC_MEM_TLBIA)
79aceca5 4191{
9a64fbe4 4192#if defined(CONFIG_USER_ONLY)
e1833e1f 4193 GEN_EXCP_PRIVOPC(ctx);
9a64fbe4 4194#else
76a66253 4195 if (unlikely(!ctx->supervisor)) {
e1833e1f 4196 GEN_EXCP_PRIVOPC(ctx);
9fddaa0c 4197 return;
9a64fbe4
FB
4198 }
4199 gen_op_tlbia();
4200#endif
79aceca5
FB
4201}
4202
4203/* tlbie */
76a66253 4204GEN_HANDLER(tlbie, 0x1F, 0x12, 0x09, 0x03FF0001, PPC_MEM_TLBIE)
79aceca5 4205{
9a64fbe4 4206#if defined(CONFIG_USER_ONLY)
e1833e1f 4207 GEN_EXCP_PRIVOPC(ctx);
9a64fbe4 4208#else
76a66253 4209 if (unlikely(!ctx->supervisor)) {
e1833e1f 4210 GEN_EXCP_PRIVOPC(ctx);
9fddaa0c 4211 return;
9a64fbe4 4212 }
f78fb44e 4213 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rB(ctx->opcode)]);
d9bce9d9
JM
4214#if defined(TARGET_PPC64)
4215 if (ctx->sf_mode)
4216 gen_op_tlbie_64();
4217 else
4218#endif
4219 gen_op_tlbie();
9a64fbe4 4220#endif
79aceca5
FB
4221}
4222
4223/* tlbsync */
76a66253 4224GEN_HANDLER(tlbsync, 0x1F, 0x16, 0x11, 0x03FFF801, PPC_MEM_TLBSYNC)
79aceca5 4225{
9a64fbe4 4226#if defined(CONFIG_USER_ONLY)
e1833e1f 4227 GEN_EXCP_PRIVOPC(ctx);
9a64fbe4 4228#else
76a66253 4229 if (unlikely(!ctx->supervisor)) {
e1833e1f 4230 GEN_EXCP_PRIVOPC(ctx);
9fddaa0c 4231 return;
9a64fbe4
FB
4232 }
4233 /* This has no effect: it should ensure that all previous
4234 * tlbie have completed
4235 */
e1833e1f 4236 GEN_STOP(ctx);
9a64fbe4 4237#endif
79aceca5
FB
4238}
4239
426613db
JM
4240#if defined(TARGET_PPC64)
4241/* slbia */
4242GEN_HANDLER(slbia, 0x1F, 0x12, 0x0F, 0x03FFFC01, PPC_SLBI)
4243{
4244#if defined(CONFIG_USER_ONLY)
e1833e1f 4245 GEN_EXCP_PRIVOPC(ctx);
426613db
JM
4246#else
4247 if (unlikely(!ctx->supervisor)) {
e1833e1f 4248 GEN_EXCP_PRIVOPC(ctx);
426613db
JM
4249 return;
4250 }
4251 gen_op_slbia();
426613db
JM
4252#endif
4253}
4254
4255/* slbie */
4256GEN_HANDLER(slbie, 0x1F, 0x12, 0x0D, 0x03FF0001, PPC_SLBI)
4257{
4258#if defined(CONFIG_USER_ONLY)
e1833e1f 4259 GEN_EXCP_PRIVOPC(ctx);
426613db
JM
4260#else
4261 if (unlikely(!ctx->supervisor)) {
e1833e1f 4262 GEN_EXCP_PRIVOPC(ctx);
426613db
JM
4263 return;
4264 }
f78fb44e 4265 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rB(ctx->opcode)]);
426613db 4266 gen_op_slbie();
426613db
JM
4267#endif
4268}
4269#endif
4270
79aceca5
FB
4271/*** External control ***/
4272/* Optional: */
9a64fbe4
FB
4273#define op_eciwx() (*gen_op_eciwx[ctx->mem_idx])()
4274#define op_ecowx() (*gen_op_ecowx[ctx->mem_idx])()
7863667f
JM
4275static GenOpFunc *gen_op_eciwx[NB_MEM_FUNCS] = {
4276 GEN_MEM_FUNCS(eciwx),
111bfab3 4277};
7863667f
JM
4278static GenOpFunc *gen_op_ecowx[NB_MEM_FUNCS] = {
4279 GEN_MEM_FUNCS(ecowx),
111bfab3 4280};
9a64fbe4 4281
111bfab3 4282/* eciwx */
79aceca5
FB
4283GEN_HANDLER(eciwx, 0x1F, 0x16, 0x0D, 0x00000001, PPC_EXTERN)
4284{
9a64fbe4 4285 /* Should check EAR[E] & alignment ! */
e2be8d8d 4286 gen_addr_reg_index(cpu_T[0], ctx);
76a66253 4287 op_eciwx();
f78fb44e 4288 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]);
76a66253
JM
4289}
4290
4291/* ecowx */
4292GEN_HANDLER(ecowx, 0x1F, 0x16, 0x09, 0x00000001, PPC_EXTERN)
4293{
4294 /* Should check EAR[E] & alignment ! */
e2be8d8d 4295 gen_addr_reg_index(cpu_T[0], ctx);
f78fb44e 4296 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rS(ctx->opcode)]);
76a66253
JM
4297 op_ecowx();
4298}
4299
4300/* PowerPC 601 specific instructions */
4301/* abs - abs. */
4302GEN_HANDLER(abs, 0x1F, 0x08, 0x0B, 0x0000F800, PPC_POWER_BR)
4303{
f78fb44e 4304 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]);
76a66253 4305 gen_op_POWER_abs();
f78fb44e 4306 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]);
76a66253 4307 if (unlikely(Rc(ctx->opcode) != 0))
e1571908 4308 gen_set_Rc0(ctx, cpu_T[0]);
76a66253
JM
4309}
4310
4311/* abso - abso. */
4312GEN_HANDLER(abso, 0x1F, 0x08, 0x1B, 0x0000F800, PPC_POWER_BR)
4313{
f78fb44e 4314 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]);
76a66253 4315 gen_op_POWER_abso();
f78fb44e 4316 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]);
76a66253 4317 if (unlikely(Rc(ctx->opcode) != 0))
e1571908 4318 gen_set_Rc0(ctx, cpu_T[0]);
76a66253
JM
4319}
4320
4321/* clcs */
a750fc0b 4322GEN_HANDLER(clcs, 0x1F, 0x10, 0x13, 0x0000F800, PPC_POWER_BR)
76a66253 4323{
f78fb44e 4324 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]);
76a66253 4325 gen_op_POWER_clcs();
c7697e1f 4326 /* Rc=1 sets CR0 to an undefined state */
f78fb44e 4327 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]);
76a66253
JM
4328}
4329
4330/* div - div. */
4331GEN_HANDLER(div, 0x1F, 0x0B, 0x0A, 0x00000000, PPC_POWER_BR)
4332{
f78fb44e
AJ
4333 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]);
4334 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rB(ctx->opcode)]);
76a66253 4335 gen_op_POWER_div();
f78fb44e 4336 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]);
76a66253 4337 if (unlikely(Rc(ctx->opcode) != 0))
e1571908 4338 gen_set_Rc0(ctx, cpu_T[0]);
76a66253
JM
4339}
4340
4341/* divo - divo. */
4342GEN_HANDLER(divo, 0x1F, 0x0B, 0x1A, 0x00000000, PPC_POWER_BR)
4343{
f78fb44e
AJ
4344 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]);
4345 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rB(ctx->opcode)]);
76a66253 4346 gen_op_POWER_divo();
f78fb44e 4347 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]);
76a66253 4348 if (unlikely(Rc(ctx->opcode) != 0))
e1571908 4349 gen_set_Rc0(ctx, cpu_T[0]);
76a66253
JM
4350}
4351
4352/* divs - divs. */
4353GEN_HANDLER(divs, 0x1F, 0x0B, 0x0B, 0x00000000, PPC_POWER_BR)
4354{
f78fb44e
AJ
4355 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]);
4356 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rB(ctx->opcode)]);
76a66253 4357 gen_op_POWER_divs();
f78fb44e 4358 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]);
76a66253 4359 if (unlikely(Rc(ctx->opcode) != 0))
e1571908 4360 gen_set_Rc0(ctx, cpu_T[0]);
76a66253
JM
4361}
4362
4363/* divso - divso. */
4364GEN_HANDLER(divso, 0x1F, 0x0B, 0x1B, 0x00000000, PPC_POWER_BR)
4365{
f78fb44e
AJ
4366 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]);
4367 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rB(ctx->opcode)]);
76a66253 4368 gen_op_POWER_divso();
f78fb44e 4369 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]);
76a66253 4370 if (unlikely(Rc(ctx->opcode) != 0))
e1571908 4371 gen_set_Rc0(ctx, cpu_T[0]);
76a66253
JM
4372}
4373
4374/* doz - doz. */
4375GEN_HANDLER(doz, 0x1F, 0x08, 0x08, 0x00000000, PPC_POWER_BR)
4376{
f78fb44e
AJ
4377 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]);
4378 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rB(ctx->opcode)]);
76a66253 4379 gen_op_POWER_doz();
f78fb44e 4380 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]);
76a66253 4381 if (unlikely(Rc(ctx->opcode) != 0))
e1571908 4382 gen_set_Rc0(ctx, cpu_T[0]);
76a66253
JM
4383}
4384
4385/* dozo - dozo. */
4386GEN_HANDLER(dozo, 0x1F, 0x08, 0x18, 0x00000000, PPC_POWER_BR)
4387{
f78fb44e
AJ
4388 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]);
4389 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rB(ctx->opcode)]);
76a66253 4390 gen_op_POWER_dozo();
f78fb44e 4391 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]);
76a66253 4392 if (unlikely(Rc(ctx->opcode) != 0))
e1571908 4393 gen_set_Rc0(ctx, cpu_T[0]);
76a66253
JM
4394}
4395
4396/* dozi */
4397GEN_HANDLER(dozi, 0x09, 0xFF, 0xFF, 0x00000000, PPC_POWER_BR)
4398{
f78fb44e 4399 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]);
86c581dc 4400 tcg_gen_movi_tl(cpu_T[1], SIMM(ctx->opcode));
76a66253 4401 gen_op_POWER_doz();
f78fb44e 4402 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]);
76a66253
JM
4403}
4404
7863667f
JM
4405/* As lscbx load from memory byte after byte, it's always endian safe.
4406 * Original POWER is 32 bits only, define 64 bits ops as 32 bits ones
4407 */
2857068e 4408#define op_POWER_lscbx(start, ra, rb) \
76a66253 4409(*gen_op_POWER_lscbx[ctx->mem_idx])(start, ra, rb)
7863667f
JM
4410#define gen_op_POWER_lscbx_64_raw gen_op_POWER_lscbx_raw
4411#define gen_op_POWER_lscbx_64_user gen_op_POWER_lscbx_user
4412#define gen_op_POWER_lscbx_64_kernel gen_op_POWER_lscbx_kernel
4413#define gen_op_POWER_lscbx_64_hypv gen_op_POWER_lscbx_hypv
4414#define gen_op_POWER_lscbx_le_raw gen_op_POWER_lscbx_raw
4415#define gen_op_POWER_lscbx_le_user gen_op_POWER_lscbx_user
4416#define gen_op_POWER_lscbx_le_kernel gen_op_POWER_lscbx_kernel
4417#define gen_op_POWER_lscbx_le_hypv gen_op_POWER_lscbx_hypv
4418#define gen_op_POWER_lscbx_le_64_raw gen_op_POWER_lscbx_raw
4419#define gen_op_POWER_lscbx_le_64_user gen_op_POWER_lscbx_user
4420#define gen_op_POWER_lscbx_le_64_kernel gen_op_POWER_lscbx_kernel
4421#define gen_op_POWER_lscbx_le_64_hypv gen_op_POWER_lscbx_hypv
4422static GenOpFunc3 *gen_op_POWER_lscbx[NB_MEM_FUNCS] = {
4423 GEN_MEM_FUNCS(POWER_lscbx),
76a66253 4424};
76a66253
JM
4425
4426/* lscbx - lscbx. */
4427GEN_HANDLER(lscbx, 0x1F, 0x15, 0x08, 0x00000000, PPC_POWER_BR)
4428{
4429 int ra = rA(ctx->opcode);
4430 int rb = rB(ctx->opcode);
4431
e2be8d8d 4432 gen_addr_reg_index(cpu_T[0], ctx);
76a66253
JM
4433 if (ra == 0) {
4434 ra = rb;
4435 }
4436 /* NIP cannot be restored if the memory exception comes from an helper */
d9bce9d9 4437 gen_update_nip(ctx, ctx->nip - 4);
3d7b417e
AJ
4438 tcg_gen_andi_tl(cpu_T[1], cpu_xer, 0x7F);
4439 tcg_gen_shri_tl(cpu_T[2], cpu_xer, XER_CMP);
4440 tcg_gen_andi_tl(cpu_T[2], cpu_T[2], 0xFF);
76a66253 4441 op_POWER_lscbx(rD(ctx->opcode), ra, rb);
3d7b417e
AJ
4442 tcg_gen_andi_tl(cpu_xer, cpu_xer, ~0x7F);
4443 tcg_gen_or_tl(cpu_xer, cpu_xer, cpu_T[0]);
76a66253 4444 if (unlikely(Rc(ctx->opcode) != 0))
e1571908 4445 gen_set_Rc0(ctx, cpu_T[0]);
76a66253
JM
4446}
4447
4448/* maskg - maskg. */
4449GEN_HANDLER(maskg, 0x1F, 0x1D, 0x00, 0x00000000, PPC_POWER_BR)
4450{
f78fb44e
AJ
4451 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rS(ctx->opcode)]);
4452 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rB(ctx->opcode)]);
76a66253 4453 gen_op_POWER_maskg();
f78fb44e 4454 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], cpu_T[0]);
76a66253 4455 if (unlikely(Rc(ctx->opcode) != 0))
e1571908 4456 gen_set_Rc0(ctx, cpu_T[0]);
76a66253
JM
4457}
4458
4459/* maskir - maskir. */
4460GEN_HANDLER(maskir, 0x1F, 0x1D, 0x10, 0x00000000, PPC_POWER_BR)
4461{
f78fb44e
AJ
4462 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]);
4463 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rS(ctx->opcode)]);
4464 tcg_gen_mov_tl(cpu_T[2], cpu_gpr[rB(ctx->opcode)]);
76a66253 4465 gen_op_POWER_maskir();
f78fb44e 4466 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], cpu_T[0]);
76a66253 4467 if (unlikely(Rc(ctx->opcode) != 0))
e1571908 4468 gen_set_Rc0(ctx, cpu_T[0]);
76a66253
JM
4469}
4470
4471/* mul - mul. */
4472GEN_HANDLER(mul, 0x1F, 0x0B, 0x03, 0x00000000, PPC_POWER_BR)
4473{
f78fb44e
AJ
4474 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]);
4475 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rB(ctx->opcode)]);
76a66253 4476 gen_op_POWER_mul();
f78fb44e 4477 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]);
76a66253 4478 if (unlikely(Rc(ctx->opcode) != 0))
e1571908 4479 gen_set_Rc0(ctx, cpu_T[0]);
76a66253
JM
4480}
4481
4482/* mulo - mulo. */
4483GEN_HANDLER(mulo, 0x1F, 0x0B, 0x13, 0x00000000, PPC_POWER_BR)
4484{
f78fb44e
AJ
4485 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]);
4486 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rB(ctx->opcode)]);
76a66253 4487 gen_op_POWER_mulo();
f78fb44e 4488 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]);
76a66253 4489 if (unlikely(Rc(ctx->opcode) != 0))
e1571908 4490 gen_set_Rc0(ctx, cpu_T[0]);
76a66253
JM
4491}
4492
4493/* nabs - nabs. */
4494GEN_HANDLER(nabs, 0x1F, 0x08, 0x0F, 0x00000000, PPC_POWER_BR)
4495{
f78fb44e 4496 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]);
76a66253 4497 gen_op_POWER_nabs();
f78fb44e 4498 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]);
76a66253 4499 if (unlikely(Rc(ctx->opcode) != 0))
e1571908 4500 gen_set_Rc0(ctx, cpu_T[0]);
76a66253
JM
4501}
4502
4503/* nabso - nabso. */
4504GEN_HANDLER(nabso, 0x1F, 0x08, 0x1F, 0x00000000, PPC_POWER_BR)
4505{
f78fb44e 4506 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]);
76a66253 4507 gen_op_POWER_nabso();
f78fb44e 4508 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]);
76a66253 4509 if (unlikely(Rc(ctx->opcode) != 0))
e1571908 4510 gen_set_Rc0(ctx, cpu_T[0]);
76a66253
JM
4511}
4512
4513/* rlmi - rlmi. */
4514GEN_HANDLER(rlmi, 0x16, 0xFF, 0xFF, 0x00000000, PPC_POWER_BR)
4515{
4516 uint32_t mb, me;
4517
4518 mb = MB(ctx->opcode);
4519 me = ME(ctx->opcode);
f78fb44e
AJ
4520 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rS(ctx->opcode)]);
4521 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rA(ctx->opcode)]);
4522 tcg_gen_mov_tl(cpu_T[2], cpu_gpr[rB(ctx->opcode)]);
76a66253 4523 gen_op_POWER_rlmi(MASK(mb, me), ~MASK(mb, me));
f78fb44e 4524 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], cpu_T[0]);
76a66253 4525 if (unlikely(Rc(ctx->opcode) != 0))
e1571908 4526 gen_set_Rc0(ctx, cpu_T[0]);
76a66253
JM
4527}
4528
4529/* rrib - rrib. */
4530GEN_HANDLER(rrib, 0x1F, 0x19, 0x10, 0x00000000, PPC_POWER_BR)
4531{
f78fb44e
AJ
4532 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rS(ctx->opcode)]);
4533 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rA(ctx->opcode)]);
4534 tcg_gen_mov_tl(cpu_T[2], cpu_gpr[rB(ctx->opcode)]);
76a66253 4535 gen_op_POWER_rrib();
f78fb44e 4536 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], cpu_T[0]);
76a66253 4537 if (unlikely(Rc(ctx->opcode) != 0))
e1571908 4538 gen_set_Rc0(ctx, cpu_T[0]);
76a66253
JM
4539}
4540
4541/* sle - sle. */
4542GEN_HANDLER(sle, 0x1F, 0x19, 0x04, 0x00000000, PPC_POWER_BR)
4543{
f78fb44e
AJ
4544 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rS(ctx->opcode)]);
4545 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rB(ctx->opcode)]);
76a66253 4546 gen_op_POWER_sle();
f78fb44e 4547 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], cpu_T[0]);
76a66253 4548 if (unlikely(Rc(ctx->opcode) != 0))
e1571908 4549 gen_set_Rc0(ctx, cpu_T[0]);
76a66253
JM
4550}
4551
4552/* sleq - sleq. */
4553GEN_HANDLER(sleq, 0x1F, 0x19, 0x06, 0x00000000, PPC_POWER_BR)
4554{
f78fb44e
AJ
4555 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rS(ctx->opcode)]);
4556 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rB(ctx->opcode)]);
76a66253 4557 gen_op_POWER_sleq();
f78fb44e 4558 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], cpu_T[0]);
76a66253 4559 if (unlikely(Rc(ctx->opcode) != 0))
e1571908 4560 gen_set_Rc0(ctx, cpu_T[0]);
76a66253
JM
4561}
4562
4563/* sliq - sliq. */
4564GEN_HANDLER(sliq, 0x1F, 0x18, 0x05, 0x00000000, PPC_POWER_BR)
4565{
f78fb44e 4566 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rS(ctx->opcode)]);
86c581dc 4567 tcg_gen_movi_tl(cpu_T[1], SH(ctx->opcode));
76a66253 4568 gen_op_POWER_sle();
f78fb44e 4569 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], cpu_T[0]);
76a66253 4570 if (unlikely(Rc(ctx->opcode) != 0))
e1571908 4571 gen_set_Rc0(ctx, cpu_T[0]);
76a66253
JM
4572}
4573
4574/* slliq - slliq. */
4575GEN_HANDLER(slliq, 0x1F, 0x18, 0x07, 0x00000000, PPC_POWER_BR)
4576{
f78fb44e 4577 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rS(ctx->opcode)]);
86c581dc 4578 tcg_gen_movi_tl(cpu_T[1], SH(ctx->opcode));
76a66253 4579 gen_op_POWER_sleq();
f78fb44e 4580 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], cpu_T[0]);
76a66253 4581 if (unlikely(Rc(ctx->opcode) != 0))
e1571908 4582 gen_set_Rc0(ctx, cpu_T[0]);
76a66253
JM
4583}
4584
4585/* sllq - sllq. */
4586GEN_HANDLER(sllq, 0x1F, 0x18, 0x06, 0x00000000, PPC_POWER_BR)
4587{
f78fb44e
AJ
4588 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rS(ctx->opcode)]);
4589 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rB(ctx->opcode)]);
76a66253 4590 gen_op_POWER_sllq();
f78fb44e 4591 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], cpu_T[0]);
76a66253 4592 if (unlikely(Rc(ctx->opcode) != 0))
e1571908 4593 gen_set_Rc0(ctx, cpu_T[0]);
76a66253
JM
4594}
4595
4596/* slq - slq. */
4597GEN_HANDLER(slq, 0x1F, 0x18, 0x04, 0x00000000, PPC_POWER_BR)
4598{
f78fb44e
AJ
4599 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rS(ctx->opcode)]);
4600 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rB(ctx->opcode)]);
76a66253 4601 gen_op_POWER_slq();
f78fb44e 4602 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], cpu_T[0]);
76a66253 4603 if (unlikely(Rc(ctx->opcode) != 0))
e1571908 4604 gen_set_Rc0(ctx, cpu_T[0]);
76a66253
JM
4605}
4606
d9bce9d9 4607/* sraiq - sraiq. */
76a66253
JM
4608GEN_HANDLER(sraiq, 0x1F, 0x18, 0x1D, 0x00000000, PPC_POWER_BR)
4609{
f78fb44e 4610 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rS(ctx->opcode)]);
86c581dc 4611 tcg_gen_movi_tl(cpu_T[1], SH(ctx->opcode));
76a66253 4612 gen_op_POWER_sraq();
f78fb44e 4613 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], cpu_T[0]);
76a66253 4614 if (unlikely(Rc(ctx->opcode) != 0))
e1571908 4615 gen_set_Rc0(ctx, cpu_T[0]);
76a66253
JM
4616}
4617
4618/* sraq - sraq. */
4619GEN_HANDLER(sraq, 0x1F, 0x18, 0x1C, 0x00000000, PPC_POWER_BR)
4620{
f78fb44e
AJ
4621 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rS(ctx->opcode)]);
4622 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rB(ctx->opcode)]);
76a66253 4623 gen_op_POWER_sraq();
f78fb44e 4624 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], cpu_T[0]);
76a66253 4625 if (unlikely(Rc(ctx->opcode) != 0))
e1571908 4626 gen_set_Rc0(ctx, cpu_T[0]);
76a66253
JM
4627}
4628
4629/* sre - sre. */
4630GEN_HANDLER(sre, 0x1F, 0x19, 0x14, 0x00000000, PPC_POWER_BR)
4631{
f78fb44e
AJ
4632 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rS(ctx->opcode)]);
4633 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rB(ctx->opcode)]);
76a66253 4634 gen_op_POWER_sre();
f78fb44e 4635 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], cpu_T[0]);
76a66253 4636 if (unlikely(Rc(ctx->opcode) != 0))
e1571908 4637 gen_set_Rc0(ctx, cpu_T[0]);
76a66253
JM
4638}
4639
4640/* srea - srea. */
4641GEN_HANDLER(srea, 0x1F, 0x19, 0x1C, 0x00000000, PPC_POWER_BR)
4642{
f78fb44e
AJ
4643 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rS(ctx->opcode)]);
4644 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rB(ctx->opcode)]);
76a66253 4645 gen_op_POWER_srea();
f78fb44e 4646 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], cpu_T[0]);
76a66253 4647 if (unlikely(Rc(ctx->opcode) != 0))
e1571908 4648 gen_set_Rc0(ctx, cpu_T[0]);
76a66253
JM
4649}
4650
4651/* sreq */
4652GEN_HANDLER(sreq, 0x1F, 0x19, 0x16, 0x00000000, PPC_POWER_BR)
4653{
f78fb44e
AJ
4654 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rS(ctx->opcode)]);
4655 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rB(ctx->opcode)]);
76a66253 4656 gen_op_POWER_sreq();
f78fb44e 4657 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], cpu_T[0]);
76a66253 4658 if (unlikely(Rc(ctx->opcode) != 0))
e1571908 4659 gen_set_Rc0(ctx, cpu_T[0]);
76a66253
JM
4660}
4661
4662/* sriq */
4663GEN_HANDLER(sriq, 0x1F, 0x18, 0x15, 0x00000000, PPC_POWER_BR)
4664{
f78fb44e 4665 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rS(ctx->opcode)]);
86c581dc 4666 tcg_gen_movi_tl(cpu_T[1], SH(ctx->opcode));
76a66253 4667 gen_op_POWER_srq();
f78fb44e 4668 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], cpu_T[0]);
76a66253 4669 if (unlikely(Rc(ctx->opcode) != 0))
e1571908 4670 gen_set_Rc0(ctx, cpu_T[0]);
76a66253
JM
4671}
4672
4673/* srliq */
4674GEN_HANDLER(srliq, 0x1F, 0x18, 0x17, 0x00000000, PPC_POWER_BR)
4675{
f78fb44e
AJ
4676 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rS(ctx->opcode)]);
4677 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rB(ctx->opcode)]);
86c581dc 4678 tcg_gen_movi_tl(cpu_T[1], SH(ctx->opcode));
76a66253 4679 gen_op_POWER_srlq();
f78fb44e 4680 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], cpu_T[0]);
76a66253 4681 if (unlikely(Rc(ctx->opcode) != 0))
e1571908 4682 gen_set_Rc0(ctx, cpu_T[0]);
76a66253
JM
4683}
4684
4685/* srlq */
4686GEN_HANDLER(srlq, 0x1F, 0x18, 0x16, 0x00000000, PPC_POWER_BR)
4687{
f78fb44e
AJ
4688 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rS(ctx->opcode)]);
4689 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rB(ctx->opcode)]);
76a66253 4690 gen_op_POWER_srlq();
f78fb44e 4691 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], cpu_T[0]);
76a66253 4692 if (unlikely(Rc(ctx->opcode) != 0))
e1571908 4693 gen_set_Rc0(ctx, cpu_T[0]);
76a66253
JM
4694}
4695
4696/* srq */
4697GEN_HANDLER(srq, 0x1F, 0x18, 0x14, 0x00000000, PPC_POWER_BR)
4698{
f78fb44e
AJ
4699 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rS(ctx->opcode)]);
4700 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rB(ctx->opcode)]);
76a66253 4701 gen_op_POWER_srq();
f78fb44e 4702 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], cpu_T[0]);
76a66253 4703 if (unlikely(Rc(ctx->opcode) != 0))
e1571908 4704 gen_set_Rc0(ctx, cpu_T[0]);
76a66253
JM
4705}
4706
4707/* PowerPC 602 specific instructions */
4708/* dsa */
4709GEN_HANDLER(dsa, 0x1F, 0x14, 0x13, 0x03FFF801, PPC_602_SPEC)
4710{
4711 /* XXX: TODO */
e1833e1f 4712 GEN_EXCP_INVAL(ctx);
76a66253
JM
4713}
4714
4715/* esa */
4716GEN_HANDLER(esa, 0x1F, 0x14, 0x12, 0x03FFF801, PPC_602_SPEC)
4717{
4718 /* XXX: TODO */
e1833e1f 4719 GEN_EXCP_INVAL(ctx);
76a66253
JM
4720}
4721
4722/* mfrom */
4723GEN_HANDLER(mfrom, 0x1F, 0x09, 0x08, 0x03E0F801, PPC_602_SPEC)
4724{
4725#if defined(CONFIG_USER_ONLY)
e1833e1f 4726 GEN_EXCP_PRIVOPC(ctx);
76a66253
JM
4727#else
4728 if (unlikely(!ctx->supervisor)) {
e1833e1f 4729 GEN_EXCP_PRIVOPC(ctx);
76a66253
JM
4730 return;
4731 }
f78fb44e 4732 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]);
76a66253 4733 gen_op_602_mfrom();
f78fb44e 4734 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]);
76a66253
JM
4735#endif
4736}
4737
4738/* 602 - 603 - G2 TLB management */
4739/* tlbld */
c7697e1f 4740GEN_HANDLER2(tlbld_6xx, "tlbld", 0x1F, 0x12, 0x1E, 0x03FF0001, PPC_6xx_TLB)
76a66253
JM
4741{
4742#if defined(CONFIG_USER_ONLY)
e1833e1f 4743 GEN_EXCP_PRIVOPC(ctx);
76a66253
JM
4744#else
4745 if (unlikely(!ctx->supervisor)) {
e1833e1f 4746 GEN_EXCP_PRIVOPC(ctx);
76a66253
JM
4747 return;
4748 }
f78fb44e 4749 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rB(ctx->opcode)]);
76a66253 4750 gen_op_6xx_tlbld();
76a66253
JM
4751#endif
4752}
4753
4754/* tlbli */
c7697e1f 4755GEN_HANDLER2(tlbli_6xx, "tlbli", 0x1F, 0x12, 0x1F, 0x03FF0001, PPC_6xx_TLB)
76a66253
JM
4756{
4757#if defined(CONFIG_USER_ONLY)
e1833e1f 4758 GEN_EXCP_PRIVOPC(ctx);
76a66253
JM
4759#else
4760 if (unlikely(!ctx->supervisor)) {
e1833e1f 4761 GEN_EXCP_PRIVOPC(ctx);
76a66253
JM
4762 return;
4763 }
f78fb44e 4764 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rB(ctx->opcode)]);
76a66253 4765 gen_op_6xx_tlbli();
76a66253
JM
4766#endif
4767}
4768
7dbe11ac
JM
4769/* 74xx TLB management */
4770/* tlbld */
c7697e1f 4771GEN_HANDLER2(tlbld_74xx, "tlbld", 0x1F, 0x12, 0x1E, 0x03FF0001, PPC_74xx_TLB)
7dbe11ac
JM
4772{
4773#if defined(CONFIG_USER_ONLY)
4774 GEN_EXCP_PRIVOPC(ctx);
4775#else
4776 if (unlikely(!ctx->supervisor)) {
4777 GEN_EXCP_PRIVOPC(ctx);
4778 return;
4779 }
f78fb44e 4780 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rB(ctx->opcode)]);
7dbe11ac
JM
4781 gen_op_74xx_tlbld();
4782#endif
4783}
4784
4785/* tlbli */
c7697e1f 4786GEN_HANDLER2(tlbli_74xx, "tlbli", 0x1F, 0x12, 0x1F, 0x03FF0001, PPC_74xx_TLB)
7dbe11ac
JM
4787{
4788#if defined(CONFIG_USER_ONLY)
4789 GEN_EXCP_PRIVOPC(ctx);
4790#else
4791 if (unlikely(!ctx->supervisor)) {
4792 GEN_EXCP_PRIVOPC(ctx);
4793 return;
4794 }
f78fb44e 4795 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rB(ctx->opcode)]);
7dbe11ac
JM
4796 gen_op_74xx_tlbli();
4797#endif
4798}
4799
76a66253
JM
4800/* POWER instructions not in PowerPC 601 */
4801/* clf */
4802GEN_HANDLER(clf, 0x1F, 0x16, 0x03, 0x03E00000, PPC_POWER)
4803{
4804 /* Cache line flush: implemented as no-op */
4805}
4806
4807/* cli */
4808GEN_HANDLER(cli, 0x1F, 0x16, 0x0F, 0x03E00000, PPC_POWER)
4809{
7f75ffd3 4810 /* Cache line invalidate: privileged and treated as no-op */
76a66253 4811#if defined(CONFIG_USER_ONLY)
e1833e1f 4812 GEN_EXCP_PRIVOPC(ctx);
76a66253
JM
4813#else
4814 if (unlikely(!ctx->supervisor)) {
e1833e1f 4815 GEN_EXCP_PRIVOPC(ctx);
76a66253
JM
4816 return;
4817 }
4818#endif
4819}
4820
4821/* dclst */
4822GEN_HANDLER(dclst, 0x1F, 0x16, 0x13, 0x03E00000, PPC_POWER)
4823{
4824 /* Data cache line store: treated as no-op */
4825}
4826
4827GEN_HANDLER(mfsri, 0x1F, 0x13, 0x13, 0x00000001, PPC_POWER)
4828{
4829#if defined(CONFIG_USER_ONLY)
e1833e1f 4830 GEN_EXCP_PRIVOPC(ctx);
76a66253
JM
4831#else
4832 if (unlikely(!ctx->supervisor)) {
e1833e1f 4833 GEN_EXCP_PRIVOPC(ctx);
76a66253
JM
4834 return;
4835 }
4836 int ra = rA(ctx->opcode);
4837 int rd = rD(ctx->opcode);
4838
e2be8d8d 4839 gen_addr_reg_index(cpu_T[0], ctx);
76a66253 4840 gen_op_POWER_mfsri();
f78fb44e 4841 tcg_gen_mov_tl(cpu_gpr[rd], cpu_T[0]);
76a66253 4842 if (ra != 0 && ra != rd)
f78fb44e 4843 tcg_gen_mov_tl(cpu_gpr[ra], cpu_T[1]);
76a66253
JM
4844#endif
4845}
4846
4847GEN_HANDLER(rac, 0x1F, 0x12, 0x19, 0x00000001, PPC_POWER)
4848{
4849#if defined(CONFIG_USER_ONLY)
e1833e1f 4850 GEN_EXCP_PRIVOPC(ctx);
76a66253
JM
4851#else
4852 if (unlikely(!ctx->supervisor)) {
e1833e1f 4853 GEN_EXCP_PRIVOPC(ctx);
76a66253
JM
4854 return;
4855 }
e2be8d8d 4856 gen_addr_reg_index(cpu_T[0], ctx);
76a66253 4857 gen_op_POWER_rac();
f78fb44e 4858 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]);
76a66253
JM
4859#endif
4860}
4861
4862GEN_HANDLER(rfsvc, 0x13, 0x12, 0x02, 0x03FFF0001, PPC_POWER)
4863{
4864#if defined(CONFIG_USER_ONLY)
e1833e1f 4865 GEN_EXCP_PRIVOPC(ctx);
76a66253
JM
4866#else
4867 if (unlikely(!ctx->supervisor)) {
e1833e1f 4868 GEN_EXCP_PRIVOPC(ctx);
76a66253
JM
4869 return;
4870 }
4871 gen_op_POWER_rfsvc();
e1833e1f 4872 GEN_SYNC(ctx);
76a66253
JM
4873#endif
4874}
4875
4876/* svc is not implemented for now */
4877
4878/* POWER2 specific instructions */
4879/* Quad manipulation (load/store two floats at a time) */
7863667f 4880/* Original POWER2 is 32 bits only, define 64 bits ops as 32 bits ones */
76a66253
JM
4881#define op_POWER2_lfq() (*gen_op_POWER2_lfq[ctx->mem_idx])()
4882#define op_POWER2_stfq() (*gen_op_POWER2_stfq[ctx->mem_idx])()
7863667f
JM
4883#define gen_op_POWER2_lfq_64_raw gen_op_POWER2_lfq_raw
4884#define gen_op_POWER2_lfq_64_user gen_op_POWER2_lfq_user
4885#define gen_op_POWER2_lfq_64_kernel gen_op_POWER2_lfq_kernel
4886#define gen_op_POWER2_lfq_64_hypv gen_op_POWER2_lfq_hypv
4887#define gen_op_POWER2_lfq_le_64_raw gen_op_POWER2_lfq_le_raw
4888#define gen_op_POWER2_lfq_le_64_user gen_op_POWER2_lfq_le_user
4889#define gen_op_POWER2_lfq_le_64_kernel gen_op_POWER2_lfq_le_kernel
4890#define gen_op_POWER2_lfq_le_64_hypv gen_op_POWER2_lfq_le_hypv
4891#define gen_op_POWER2_stfq_64_raw gen_op_POWER2_stfq_raw
4892#define gen_op_POWER2_stfq_64_user gen_op_POWER2_stfq_user
4893#define gen_op_POWER2_stfq_64_kernel gen_op_POWER2_stfq_kernel
4894#define gen_op_POWER2_stfq_64_hypv gen_op_POWER2_stfq_hypv
4895#define gen_op_POWER2_stfq_le_64_raw gen_op_POWER2_stfq_le_raw
4896#define gen_op_POWER2_stfq_le_64_user gen_op_POWER2_stfq_le_user
4897#define gen_op_POWER2_stfq_le_64_kernel gen_op_POWER2_stfq_le_kernel
4898#define gen_op_POWER2_stfq_le_64_hypv gen_op_POWER2_stfq_le_hypv
4899static GenOpFunc *gen_op_POWER2_lfq[NB_MEM_FUNCS] = {
4900 GEN_MEM_FUNCS(POWER2_lfq),
76a66253 4901};
7863667f
JM
4902static GenOpFunc *gen_op_POWER2_stfq[NB_MEM_FUNCS] = {
4903 GEN_MEM_FUNCS(POWER2_stfq),
76a66253 4904};
76a66253
JM
4905
4906/* lfq */
4907GEN_HANDLER(lfq, 0x38, 0xFF, 0xFF, 0x00000003, PPC_POWER2)
4908{
4909 /* NIP cannot be restored if the memory exception comes from an helper */
d9bce9d9 4910 gen_update_nip(ctx, ctx->nip - 4);
e2be8d8d 4911 gen_addr_imm_index(cpu_T[0], ctx, 0);
76a66253 4912 op_POWER2_lfq();
a5e26afa
AJ
4913 tcg_gen_mov_i64(cpu_fpr[rD(ctx->opcode)], cpu_FT[0]);
4914 tcg_gen_mov_i64(cpu_fpr[rD(ctx->opcode) + 1], cpu_FT[1]);
76a66253
JM
4915}
4916
4917/* lfqu */
4918GEN_HANDLER(lfqu, 0x39, 0xFF, 0xFF, 0x00000003, PPC_POWER2)
4919{
4920 int ra = rA(ctx->opcode);
4921
4922 /* NIP cannot be restored if the memory exception comes from an helper */
d9bce9d9 4923 gen_update_nip(ctx, ctx->nip - 4);
e2be8d8d 4924 gen_addr_imm_index(cpu_T[0], ctx, 0);
76a66253 4925 op_POWER2_lfq();
a5e26afa
AJ
4926 tcg_gen_mov_i64(cpu_fpr[rD(ctx->opcode)], cpu_FT[0]);
4927 tcg_gen_mov_i64(cpu_fpr[rD(ctx->opcode) + 1], cpu_FT[1]);
76a66253 4928 if (ra != 0)
f78fb44e 4929 tcg_gen_mov_tl(cpu_gpr[ra], cpu_T[0]);
76a66253
JM
4930}
4931
4932/* lfqux */
4933GEN_HANDLER(lfqux, 0x1F, 0x17, 0x19, 0x00000001, PPC_POWER2)
4934{
4935 int ra = rA(ctx->opcode);
4936
4937 /* NIP cannot be restored if the memory exception comes from an helper */
d9bce9d9 4938 gen_update_nip(ctx, ctx->nip - 4);
e2be8d8d 4939 gen_addr_reg_index(cpu_T[0], ctx);
76a66253 4940 op_POWER2_lfq();
a5e26afa
AJ
4941 tcg_gen_mov_i64(cpu_fpr[rD(ctx->opcode)], cpu_FT[0]);
4942 tcg_gen_mov_i64(cpu_fpr[rD(ctx->opcode) + 1], cpu_FT[1]);
76a66253 4943 if (ra != 0)
f78fb44e 4944 tcg_gen_mov_tl(cpu_gpr[ra], cpu_T[0]);
76a66253
JM
4945}
4946
4947/* lfqx */
4948GEN_HANDLER(lfqx, 0x1F, 0x17, 0x18, 0x00000001, PPC_POWER2)
4949{
4950 /* NIP cannot be restored if the memory exception comes from an helper */
d9bce9d9 4951 gen_update_nip(ctx, ctx->nip - 4);
e2be8d8d 4952 gen_addr_reg_index(cpu_T[0], ctx);
76a66253 4953 op_POWER2_lfq();
a5e26afa
AJ
4954 tcg_gen_mov_i64(cpu_fpr[rD(ctx->opcode)], cpu_FT[0]);
4955 tcg_gen_mov_i64(cpu_fpr[rD(ctx->opcode) + 1], cpu_FT[1]);
76a66253
JM
4956}
4957
4958/* stfq */
4959GEN_HANDLER(stfq, 0x3C, 0xFF, 0xFF, 0x00000003, PPC_POWER2)
4960{
4961 /* NIP cannot be restored if the memory exception comes from an helper */
d9bce9d9 4962 gen_update_nip(ctx, ctx->nip - 4);
e2be8d8d 4963 gen_addr_imm_index(cpu_T[0], ctx, 0);
a5e26afa
AJ
4964 tcg_gen_mov_i64(cpu_FT[0], cpu_fpr[rS(ctx->opcode)]);
4965 tcg_gen_mov_i64(cpu_FT[1], cpu_fpr[rS(ctx->opcode) + 1]);
76a66253
JM
4966 op_POWER2_stfq();
4967}
4968
4969/* stfqu */
4970GEN_HANDLER(stfqu, 0x3D, 0xFF, 0xFF, 0x00000003, PPC_POWER2)
4971{
4972 int ra = rA(ctx->opcode);
4973
4974 /* NIP cannot be restored if the memory exception comes from an helper */
d9bce9d9 4975 gen_update_nip(ctx, ctx->nip - 4);
e2be8d8d 4976 gen_addr_imm_index(cpu_T[0], ctx, 0);
a5e26afa
AJ
4977 tcg_gen_mov_i64(cpu_FT[0], cpu_fpr[rS(ctx->opcode)]);
4978 tcg_gen_mov_i64(cpu_FT[1], cpu_fpr[rS(ctx->opcode) + 1]);
76a66253
JM
4979 op_POWER2_stfq();
4980 if (ra != 0)
f78fb44e 4981 tcg_gen_mov_tl(cpu_gpr[ra], cpu_T[0]);
76a66253
JM
4982}
4983
4984/* stfqux */
4985GEN_HANDLER(stfqux, 0x1F, 0x17, 0x1D, 0x00000001, PPC_POWER2)
4986{
4987 int ra = rA(ctx->opcode);
4988
4989 /* NIP cannot be restored if the memory exception comes from an helper */
d9bce9d9 4990 gen_update_nip(ctx, ctx->nip - 4);
e2be8d8d 4991 gen_addr_reg_index(cpu_T[0], ctx);
a5e26afa
AJ
4992 tcg_gen_mov_i64(cpu_FT[0], cpu_fpr[rS(ctx->opcode)]);
4993 tcg_gen_mov_i64(cpu_FT[1], cpu_fpr[rS(ctx->opcode) + 1]);
76a66253
JM
4994 op_POWER2_stfq();
4995 if (ra != 0)
f78fb44e 4996 tcg_gen_mov_tl(cpu_gpr[ra], cpu_T[0]);
76a66253
JM
4997}
4998
4999/* stfqx */
5000GEN_HANDLER(stfqx, 0x1F, 0x17, 0x1C, 0x00000001, PPC_POWER2)
5001{
5002 /* NIP cannot be restored if the memory exception comes from an helper */
d9bce9d9 5003 gen_update_nip(ctx, ctx->nip - 4);
e2be8d8d 5004 gen_addr_reg_index(cpu_T[0], ctx);
a5e26afa
AJ
5005 tcg_gen_mov_i64(cpu_FT[0], cpu_fpr[rS(ctx->opcode)]);
5006 tcg_gen_mov_i64(cpu_FT[1], cpu_fpr[rS(ctx->opcode) + 1]);
76a66253
JM
5007 op_POWER2_stfq();
5008}
5009
5010/* BookE specific instructions */
2662a059 5011/* XXX: not implemented on 440 ? */
05332d70 5012GEN_HANDLER(mfapidi, 0x1F, 0x13, 0x08, 0x0000F801, PPC_MFAPIDI)
76a66253
JM
5013{
5014 /* XXX: TODO */
e1833e1f 5015 GEN_EXCP_INVAL(ctx);
76a66253
JM
5016}
5017
2662a059 5018/* XXX: not implemented on 440 ? */
05332d70 5019GEN_HANDLER(tlbiva, 0x1F, 0x12, 0x18, 0x03FFF801, PPC_TLBIVA)
76a66253
JM
5020{
5021#if defined(CONFIG_USER_ONLY)
e1833e1f 5022 GEN_EXCP_PRIVOPC(ctx);
76a66253
JM
5023#else
5024 if (unlikely(!ctx->supervisor)) {
e1833e1f 5025 GEN_EXCP_PRIVOPC(ctx);
76a66253
JM
5026 return;
5027 }
e2be8d8d 5028 gen_addr_reg_index(cpu_T[0], ctx);
76a66253 5029 /* Use the same micro-ops as for tlbie */
d9bce9d9
JM
5030#if defined(TARGET_PPC64)
5031 if (ctx->sf_mode)
5032 gen_op_tlbie_64();
5033 else
5034#endif
5035 gen_op_tlbie();
76a66253
JM
5036#endif
5037}
5038
5039/* All 405 MAC instructions are translated here */
b068d6a7
JM
5040static always_inline void gen_405_mulladd_insn (DisasContext *ctx,
5041 int opc2, int opc3,
5042 int ra, int rb, int rt, int Rc)
76a66253 5043{
f78fb44e
AJ
5044 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[ra]);
5045 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rb]);
76a66253
JM
5046 switch (opc3 & 0x0D) {
5047 case 0x05:
5048 /* macchw - macchw. - macchwo - macchwo. */
5049 /* macchws - macchws. - macchwso - macchwso. */
5050 /* nmacchw - nmacchw. - nmacchwo - nmacchwo. */
5051 /* nmacchws - nmacchws. - nmacchwso - nmacchwso. */
5052 /* mulchw - mulchw. */
5053 gen_op_405_mulchw();
5054 break;
5055 case 0x04:
5056 /* macchwu - macchwu. - macchwuo - macchwuo. */
5057 /* macchwsu - macchwsu. - macchwsuo - macchwsuo. */
5058 /* mulchwu - mulchwu. */
5059 gen_op_405_mulchwu();
5060 break;
5061 case 0x01:
5062 /* machhw - machhw. - machhwo - machhwo. */
5063 /* machhws - machhws. - machhwso - machhwso. */
5064 /* nmachhw - nmachhw. - nmachhwo - nmachhwo. */
5065 /* nmachhws - nmachhws. - nmachhwso - nmachhwso. */
5066 /* mulhhw - mulhhw. */
5067 gen_op_405_mulhhw();
5068 break;
5069 case 0x00:
5070 /* machhwu - machhwu. - machhwuo - machhwuo. */
5071 /* machhwsu - machhwsu. - machhwsuo - machhwsuo. */
5072 /* mulhhwu - mulhhwu. */
5073 gen_op_405_mulhhwu();
5074 break;
5075 case 0x0D:
5076 /* maclhw - maclhw. - maclhwo - maclhwo. */
5077 /* maclhws - maclhws. - maclhwso - maclhwso. */
5078 /* nmaclhw - nmaclhw. - nmaclhwo - nmaclhwo. */
5079 /* nmaclhws - nmaclhws. - nmaclhwso - nmaclhwso. */
5080 /* mullhw - mullhw. */
5081 gen_op_405_mullhw();
5082 break;
5083 case 0x0C:
5084 /* maclhwu - maclhwu. - maclhwuo - maclhwuo. */
5085 /* maclhwsu - maclhwsu. - maclhwsuo - maclhwsuo. */
5086 /* mullhwu - mullhwu. */
5087 gen_op_405_mullhwu();
5088 break;
5089 }
5090 if (opc2 & 0x02) {
5091 /* nmultiply-and-accumulate (0x0E) */
5092 gen_op_neg();
5093 }
5094 if (opc2 & 0x04) {
5095 /* (n)multiply-and-accumulate (0x0C - 0x0E) */
f78fb44e 5096 tcg_gen_mov_tl(cpu_T[2], cpu_gpr[rt]);
e55fd934 5097 tcg_gen_mov_tl(cpu_T[1], cpu_T[0]);
76a66253
JM
5098 gen_op_405_add_T0_T2();
5099 }
5100 if (opc3 & 0x10) {
5101 /* Check overflow */
5102 if (opc3 & 0x01)
c3e10c7b 5103 gen_op_check_addo();
76a66253
JM
5104 else
5105 gen_op_405_check_ovu();
5106 }
5107 if (opc3 & 0x02) {
5108 /* Saturate */
5109 if (opc3 & 0x01)
5110 gen_op_405_check_sat();
5111 else
5112 gen_op_405_check_satu();
5113 }
f78fb44e 5114 tcg_gen_mov_tl(cpu_gpr[rt], cpu_T[0]);
76a66253
JM
5115 if (unlikely(Rc) != 0) {
5116 /* Update Rc0 */
e1571908 5117 gen_set_Rc0(ctx, cpu_T[0]);
76a66253
JM
5118 }
5119}
5120
a750fc0b
JM
5121#define GEN_MAC_HANDLER(name, opc2, opc3) \
5122GEN_HANDLER(name, 0x04, opc2, opc3, 0x00000000, PPC_405_MAC) \
76a66253
JM
5123{ \
5124 gen_405_mulladd_insn(ctx, opc2, opc3, rA(ctx->opcode), rB(ctx->opcode), \
5125 rD(ctx->opcode), Rc(ctx->opcode)); \
5126}
5127
5128/* macchw - macchw. */
a750fc0b 5129GEN_MAC_HANDLER(macchw, 0x0C, 0x05);
76a66253 5130/* macchwo - macchwo. */
a750fc0b 5131GEN_MAC_HANDLER(macchwo, 0x0C, 0x15);
76a66253 5132/* macchws - macchws. */
a750fc0b 5133GEN_MAC_HANDLER(macchws, 0x0C, 0x07);
76a66253 5134/* macchwso - macchwso. */
a750fc0b 5135GEN_MAC_HANDLER(macchwso, 0x0C, 0x17);
76a66253 5136/* macchwsu - macchwsu. */
a750fc0b 5137GEN_MAC_HANDLER(macchwsu, 0x0C, 0x06);
76a66253 5138/* macchwsuo - macchwsuo. */
a750fc0b 5139GEN_MAC_HANDLER(macchwsuo, 0x0C, 0x16);
76a66253 5140/* macchwu - macchwu. */
a750fc0b 5141GEN_MAC_HANDLER(macchwu, 0x0C, 0x04);
76a66253 5142/* macchwuo - macchwuo. */
a750fc0b 5143GEN_MAC_HANDLER(macchwuo, 0x0C, 0x14);
76a66253 5144/* machhw - machhw. */
a750fc0b 5145GEN_MAC_HANDLER(machhw, 0x0C, 0x01);
76a66253 5146/* machhwo - machhwo. */
a750fc0b 5147GEN_MAC_HANDLER(machhwo, 0x0C, 0x11);
76a66253 5148/* machhws - machhws. */
a750fc0b 5149GEN_MAC_HANDLER(machhws, 0x0C, 0x03);
76a66253 5150/* machhwso - machhwso. */
a750fc0b 5151GEN_MAC_HANDLER(machhwso, 0x0C, 0x13);
76a66253 5152/* machhwsu - machhwsu. */
a750fc0b 5153GEN_MAC_HANDLER(machhwsu, 0x0C, 0x02);
76a66253 5154/* machhwsuo - machhwsuo. */
a750fc0b 5155GEN_MAC_HANDLER(machhwsuo, 0x0C, 0x12);
76a66253 5156/* machhwu - machhwu. */
a750fc0b 5157GEN_MAC_HANDLER(machhwu, 0x0C, 0x00);
76a66253 5158/* machhwuo - machhwuo. */
a750fc0b 5159GEN_MAC_HANDLER(machhwuo, 0x0C, 0x10);
76a66253 5160/* maclhw - maclhw. */
a750fc0b 5161GEN_MAC_HANDLER(maclhw, 0x0C, 0x0D);
76a66253 5162/* maclhwo - maclhwo. */
a750fc0b 5163GEN_MAC_HANDLER(maclhwo, 0x0C, 0x1D);
76a66253 5164/* maclhws - maclhws. */
a750fc0b 5165GEN_MAC_HANDLER(maclhws, 0x0C, 0x0F);
76a66253 5166/* maclhwso - maclhwso. */
a750fc0b 5167GEN_MAC_HANDLER(maclhwso, 0x0C, 0x1F);
76a66253 5168/* maclhwu - maclhwu. */
a750fc0b 5169GEN_MAC_HANDLER(maclhwu, 0x0C, 0x0C);
76a66253 5170/* maclhwuo - maclhwuo. */
a750fc0b 5171GEN_MAC_HANDLER(maclhwuo, 0x0C, 0x1C);
76a66253 5172/* maclhwsu - maclhwsu. */
a750fc0b 5173GEN_MAC_HANDLER(maclhwsu, 0x0C, 0x0E);
76a66253 5174/* maclhwsuo - maclhwsuo. */
a750fc0b 5175GEN_MAC_HANDLER(maclhwsuo, 0x0C, 0x1E);
76a66253 5176/* nmacchw - nmacchw. */
a750fc0b 5177GEN_MAC_HANDLER(nmacchw, 0x0E, 0x05);
76a66253 5178/* nmacchwo - nmacchwo. */
a750fc0b 5179GEN_MAC_HANDLER(nmacchwo, 0x0E, 0x15);
76a66253 5180/* nmacchws - nmacchws. */
a750fc0b 5181GEN_MAC_HANDLER(nmacchws, 0x0E, 0x07);
76a66253 5182/* nmacchwso - nmacchwso. */
a750fc0b 5183GEN_MAC_HANDLER(nmacchwso, 0x0E, 0x17);
76a66253 5184/* nmachhw - nmachhw. */
a750fc0b 5185GEN_MAC_HANDLER(nmachhw, 0x0E, 0x01);
76a66253 5186/* nmachhwo - nmachhwo. */
a750fc0b 5187GEN_MAC_HANDLER(nmachhwo, 0x0E, 0x11);
76a66253 5188/* nmachhws - nmachhws. */
a750fc0b 5189GEN_MAC_HANDLER(nmachhws, 0x0E, 0x03);
76a66253 5190/* nmachhwso - nmachhwso. */
a750fc0b 5191GEN_MAC_HANDLER(nmachhwso, 0x0E, 0x13);
76a66253 5192/* nmaclhw - nmaclhw. */
a750fc0b 5193GEN_MAC_HANDLER(nmaclhw, 0x0E, 0x0D);
76a66253 5194/* nmaclhwo - nmaclhwo. */
a750fc0b 5195GEN_MAC_HANDLER(nmaclhwo, 0x0E, 0x1D);
76a66253 5196/* nmaclhws - nmaclhws. */
a750fc0b 5197GEN_MAC_HANDLER(nmaclhws, 0x0E, 0x0F);
76a66253 5198/* nmaclhwso - nmaclhwso. */
a750fc0b 5199GEN_MAC_HANDLER(nmaclhwso, 0x0E, 0x1F);
76a66253
JM
5200
5201/* mulchw - mulchw. */
a750fc0b 5202GEN_MAC_HANDLER(mulchw, 0x08, 0x05);
76a66253 5203/* mulchwu - mulchwu. */
a750fc0b 5204GEN_MAC_HANDLER(mulchwu, 0x08, 0x04);
76a66253 5205/* mulhhw - mulhhw. */
a750fc0b 5206GEN_MAC_HANDLER(mulhhw, 0x08, 0x01);
76a66253 5207/* mulhhwu - mulhhwu. */
a750fc0b 5208GEN_MAC_HANDLER(mulhhwu, 0x08, 0x00);
76a66253 5209/* mullhw - mullhw. */
a750fc0b 5210GEN_MAC_HANDLER(mullhw, 0x08, 0x0D);
76a66253 5211/* mullhwu - mullhwu. */
a750fc0b 5212GEN_MAC_HANDLER(mullhwu, 0x08, 0x0C);
76a66253
JM
5213
5214/* mfdcr */
05332d70 5215GEN_HANDLER(mfdcr, 0x1F, 0x03, 0x0A, 0x00000001, PPC_DCR)
76a66253
JM
5216{
5217#if defined(CONFIG_USER_ONLY)
e1833e1f 5218 GEN_EXCP_PRIVREG(ctx);
76a66253
JM
5219#else
5220 uint32_t dcrn = SPR(ctx->opcode);
5221
5222 if (unlikely(!ctx->supervisor)) {
e1833e1f 5223 GEN_EXCP_PRIVREG(ctx);
76a66253
JM
5224 return;
5225 }
86c581dc 5226 tcg_gen_movi_tl(cpu_T[0], dcrn);
a42bd6cc 5227 gen_op_load_dcr();
f78fb44e 5228 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]);
76a66253
JM
5229#endif
5230}
5231
5232/* mtdcr */
05332d70 5233GEN_HANDLER(mtdcr, 0x1F, 0x03, 0x0E, 0x00000001, PPC_DCR)
76a66253
JM
5234{
5235#if defined(CONFIG_USER_ONLY)
e1833e1f 5236 GEN_EXCP_PRIVREG(ctx);
76a66253
JM
5237#else
5238 uint32_t dcrn = SPR(ctx->opcode);
5239
5240 if (unlikely(!ctx->supervisor)) {
e1833e1f 5241 GEN_EXCP_PRIVREG(ctx);
76a66253
JM
5242 return;
5243 }
86c581dc 5244 tcg_gen_movi_tl(cpu_T[0], dcrn);
f78fb44e 5245 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rS(ctx->opcode)]);
a42bd6cc
JM
5246 gen_op_store_dcr();
5247#endif
5248}
5249
5250/* mfdcrx */
2662a059 5251/* XXX: not implemented on 440 ? */
05332d70 5252GEN_HANDLER(mfdcrx, 0x1F, 0x03, 0x08, 0x00000000, PPC_DCRX)
a42bd6cc
JM
5253{
5254#if defined(CONFIG_USER_ONLY)
e1833e1f 5255 GEN_EXCP_PRIVREG(ctx);
a42bd6cc
JM
5256#else
5257 if (unlikely(!ctx->supervisor)) {
e1833e1f 5258 GEN_EXCP_PRIVREG(ctx);
a42bd6cc
JM
5259 return;
5260 }
f78fb44e 5261 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]);
a42bd6cc 5262 gen_op_load_dcr();
f78fb44e 5263 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]);
a750fc0b 5264 /* Note: Rc update flag set leads to undefined state of Rc0 */
a42bd6cc
JM
5265#endif
5266}
5267
5268/* mtdcrx */
2662a059 5269/* XXX: not implemented on 440 ? */
05332d70 5270GEN_HANDLER(mtdcrx, 0x1F, 0x03, 0x0C, 0x00000000, PPC_DCRX)
a42bd6cc
JM
5271{
5272#if defined(CONFIG_USER_ONLY)
e1833e1f 5273 GEN_EXCP_PRIVREG(ctx);
a42bd6cc
JM
5274#else
5275 if (unlikely(!ctx->supervisor)) {
e1833e1f 5276 GEN_EXCP_PRIVREG(ctx);
a42bd6cc
JM
5277 return;
5278 }
f78fb44e
AJ
5279 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]);
5280 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rS(ctx->opcode)]);
a42bd6cc 5281 gen_op_store_dcr();
a750fc0b 5282 /* Note: Rc update flag set leads to undefined state of Rc0 */
76a66253
JM
5283#endif
5284}
5285
a750fc0b
JM
5286/* mfdcrux (PPC 460) : user-mode access to DCR */
5287GEN_HANDLER(mfdcrux, 0x1F, 0x03, 0x09, 0x00000000, PPC_DCRUX)
5288{
f78fb44e 5289 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]);
a750fc0b 5290 gen_op_load_dcr();
f78fb44e 5291 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]);
a750fc0b
JM
5292 /* Note: Rc update flag set leads to undefined state of Rc0 */
5293}
5294
5295/* mtdcrux (PPC 460) : user-mode access to DCR */
5296GEN_HANDLER(mtdcrux, 0x1F, 0x03, 0x0D, 0x00000000, PPC_DCRUX)
5297{
f78fb44e
AJ
5298 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]);
5299 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rS(ctx->opcode)]);
a750fc0b
JM
5300 gen_op_store_dcr();
5301 /* Note: Rc update flag set leads to undefined state of Rc0 */
5302}
5303
76a66253
JM
5304/* dccci */
5305GEN_HANDLER(dccci, 0x1F, 0x06, 0x0E, 0x03E00001, PPC_4xx_COMMON)
5306{
5307#if defined(CONFIG_USER_ONLY)
e1833e1f 5308 GEN_EXCP_PRIVOPC(ctx);
76a66253
JM
5309#else
5310 if (unlikely(!ctx->supervisor)) {
e1833e1f 5311 GEN_EXCP_PRIVOPC(ctx);
76a66253
JM
5312 return;
5313 }
5314 /* interpreted as no-op */
5315#endif
5316}
5317
5318/* dcread */
5319GEN_HANDLER(dcread, 0x1F, 0x06, 0x0F, 0x00000001, PPC_4xx_COMMON)
5320{
5321#if defined(CONFIG_USER_ONLY)
e1833e1f 5322 GEN_EXCP_PRIVOPC(ctx);
76a66253 5323#else
b61f2753 5324 TCGv EA, val;
76a66253 5325 if (unlikely(!ctx->supervisor)) {
e1833e1f 5326 GEN_EXCP_PRIVOPC(ctx);
76a66253
JM
5327 return;
5328 }
b61f2753
AJ
5329 EA = tcg_temp_new(TCG_TYPE_TL);
5330 gen_addr_reg_index(EA, ctx);
5331 val = tcg_temp_new(TCG_TYPE_TL);
5332 gen_qemu_ld32u(val, EA, ctx->mem_idx);
5333 tcg_temp_free(val);
5334 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], EA);
5335 tcg_temp_free(EA);
76a66253
JM
5336#endif
5337}
5338
5339/* icbt */
c7697e1f 5340GEN_HANDLER2(icbt_40x, "icbt", 0x1F, 0x06, 0x08, 0x03E00001, PPC_40x_ICBT)
76a66253
JM
5341{
5342 /* interpreted as no-op */
5343 /* XXX: specification say this is treated as a load by the MMU
5344 * but does not generate any exception
5345 */
5346}
5347
5348/* iccci */
5349GEN_HANDLER(iccci, 0x1F, 0x06, 0x1E, 0x00000001, PPC_4xx_COMMON)
5350{
5351#if defined(CONFIG_USER_ONLY)
e1833e1f 5352 GEN_EXCP_PRIVOPC(ctx);
76a66253
JM
5353#else
5354 if (unlikely(!ctx->supervisor)) {
e1833e1f 5355 GEN_EXCP_PRIVOPC(ctx);
76a66253
JM
5356 return;
5357 }
5358 /* interpreted as no-op */
5359#endif
5360}
5361
5362/* icread */
5363GEN_HANDLER(icread, 0x1F, 0x06, 0x1F, 0x03E00001, PPC_4xx_COMMON)
5364{
5365#if defined(CONFIG_USER_ONLY)
e1833e1f 5366 GEN_EXCP_PRIVOPC(ctx);
76a66253
JM
5367#else
5368 if (unlikely(!ctx->supervisor)) {
e1833e1f 5369 GEN_EXCP_PRIVOPC(ctx);
76a66253
JM
5370 return;
5371 }
5372 /* interpreted as no-op */
5373#endif
5374}
5375
5376/* rfci (supervisor only) */
c7697e1f 5377GEN_HANDLER2(rfci_40x, "rfci", 0x13, 0x13, 0x01, 0x03FF8001, PPC_40x_EXCP)
a42bd6cc
JM
5378{
5379#if defined(CONFIG_USER_ONLY)
e1833e1f 5380 GEN_EXCP_PRIVOPC(ctx);
a42bd6cc
JM
5381#else
5382 if (unlikely(!ctx->supervisor)) {
e1833e1f 5383 GEN_EXCP_PRIVOPC(ctx);
a42bd6cc
JM
5384 return;
5385 }
5386 /* Restore CPU state */
5387 gen_op_40x_rfci();
e1833e1f 5388 GEN_SYNC(ctx);
a42bd6cc
JM
5389#endif
5390}
5391
5392GEN_HANDLER(rfci, 0x13, 0x13, 0x01, 0x03FF8001, PPC_BOOKE)
5393{
5394#if defined(CONFIG_USER_ONLY)
e1833e1f 5395 GEN_EXCP_PRIVOPC(ctx);
a42bd6cc
JM
5396#else
5397 if (unlikely(!ctx->supervisor)) {
e1833e1f 5398 GEN_EXCP_PRIVOPC(ctx);
a42bd6cc
JM
5399 return;
5400 }
5401 /* Restore CPU state */
5402 gen_op_rfci();
e1833e1f 5403 GEN_SYNC(ctx);
a42bd6cc
JM
5404#endif
5405}
5406
5407/* BookE specific */
2662a059 5408/* XXX: not implemented on 440 ? */
05332d70 5409GEN_HANDLER(rfdi, 0x13, 0x07, 0x01, 0x03FF8001, PPC_RFDI)
76a66253
JM
5410{
5411#if defined(CONFIG_USER_ONLY)
e1833e1f 5412 GEN_EXCP_PRIVOPC(ctx);
76a66253
JM
5413#else
5414 if (unlikely(!ctx->supervisor)) {
e1833e1f 5415 GEN_EXCP_PRIVOPC(ctx);
76a66253
JM
5416 return;
5417 }
5418 /* Restore CPU state */
a42bd6cc 5419 gen_op_rfdi();
e1833e1f 5420 GEN_SYNC(ctx);
76a66253
JM
5421#endif
5422}
5423
2662a059 5424/* XXX: not implemented on 440 ? */
a750fc0b 5425GEN_HANDLER(rfmci, 0x13, 0x06, 0x01, 0x03FF8001, PPC_RFMCI)
a42bd6cc
JM
5426{
5427#if defined(CONFIG_USER_ONLY)
e1833e1f 5428 GEN_EXCP_PRIVOPC(ctx);
a42bd6cc
JM
5429#else
5430 if (unlikely(!ctx->supervisor)) {
e1833e1f 5431 GEN_EXCP_PRIVOPC(ctx);
a42bd6cc
JM
5432 return;
5433 }
5434 /* Restore CPU state */
5435 gen_op_rfmci();
e1833e1f 5436 GEN_SYNC(ctx);
a42bd6cc
JM
5437#endif
5438}
5eb7995e 5439
d9bce9d9 5440/* TLB management - PowerPC 405 implementation */
76a66253 5441/* tlbre */
c7697e1f 5442GEN_HANDLER2(tlbre_40x, "tlbre", 0x1F, 0x12, 0x1D, 0x00000001, PPC_40x_TLB)
76a66253
JM
5443{
5444#if defined(CONFIG_USER_ONLY)
e1833e1f 5445 GEN_EXCP_PRIVOPC(ctx);
76a66253
JM
5446#else
5447 if (unlikely(!ctx->supervisor)) {
e1833e1f 5448 GEN_EXCP_PRIVOPC(ctx);
76a66253
JM
5449 return;
5450 }
5451 switch (rB(ctx->opcode)) {
5452 case 0:
f78fb44e 5453 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]);
76a66253 5454 gen_op_4xx_tlbre_hi();
f78fb44e 5455 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]);
76a66253
JM
5456 break;
5457 case 1:
f78fb44e 5458 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]);
76a66253 5459 gen_op_4xx_tlbre_lo();
f78fb44e 5460 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]);
76a66253
JM
5461 break;
5462 default:
e1833e1f 5463 GEN_EXCP_INVAL(ctx);
76a66253 5464 break;
9a64fbe4 5465 }
76a66253
JM
5466#endif
5467}
5468
d9bce9d9 5469/* tlbsx - tlbsx. */
c7697e1f 5470GEN_HANDLER2(tlbsx_40x, "tlbsx", 0x1F, 0x12, 0x1C, 0x00000000, PPC_40x_TLB)
76a66253
JM
5471{
5472#if defined(CONFIG_USER_ONLY)
e1833e1f 5473 GEN_EXCP_PRIVOPC(ctx);
76a66253
JM
5474#else
5475 if (unlikely(!ctx->supervisor)) {
e1833e1f 5476 GEN_EXCP_PRIVOPC(ctx);
76a66253
JM
5477 return;
5478 }
e2be8d8d 5479 gen_addr_reg_index(cpu_T[0], ctx);
daf4f96e 5480 gen_op_4xx_tlbsx();
76a66253 5481 if (Rc(ctx->opcode))
daf4f96e 5482 gen_op_4xx_tlbsx_check();
f78fb44e 5483 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]);
76a66253 5484#endif
79aceca5
FB
5485}
5486
76a66253 5487/* tlbwe */
c7697e1f 5488GEN_HANDLER2(tlbwe_40x, "tlbwe", 0x1F, 0x12, 0x1E, 0x00000001, PPC_40x_TLB)
79aceca5 5489{
76a66253 5490#if defined(CONFIG_USER_ONLY)
e1833e1f 5491 GEN_EXCP_PRIVOPC(ctx);
76a66253
JM
5492#else
5493 if (unlikely(!ctx->supervisor)) {
e1833e1f 5494 GEN_EXCP_PRIVOPC(ctx);
76a66253
JM
5495 return;
5496 }
5497 switch (rB(ctx->opcode)) {
5498 case 0:
f78fb44e
AJ
5499 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]);
5500 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rS(ctx->opcode)]);
76a66253
JM
5501 gen_op_4xx_tlbwe_hi();
5502 break;
5503 case 1:
f78fb44e
AJ
5504 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]);
5505 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rS(ctx->opcode)]);
76a66253
JM
5506 gen_op_4xx_tlbwe_lo();
5507 break;
5508 default:
e1833e1f 5509 GEN_EXCP_INVAL(ctx);
76a66253 5510 break;
9a64fbe4 5511 }
76a66253
JM
5512#endif
5513}
5514
a4bb6c3e 5515/* TLB management - PowerPC 440 implementation */
5eb7995e 5516/* tlbre */
c7697e1f 5517GEN_HANDLER2(tlbre_440, "tlbre", 0x1F, 0x12, 0x1D, 0x00000001, PPC_BOOKE)
5eb7995e
JM
5518{
5519#if defined(CONFIG_USER_ONLY)
e1833e1f 5520 GEN_EXCP_PRIVOPC(ctx);
5eb7995e
JM
5521#else
5522 if (unlikely(!ctx->supervisor)) {
e1833e1f 5523 GEN_EXCP_PRIVOPC(ctx);
5eb7995e
JM
5524 return;
5525 }
5526 switch (rB(ctx->opcode)) {
5527 case 0:
5eb7995e 5528 case 1:
5eb7995e 5529 case 2:
f78fb44e 5530 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]);
a4bb6c3e 5531 gen_op_440_tlbre(rB(ctx->opcode));
f78fb44e 5532 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]);
5eb7995e
JM
5533 break;
5534 default:
e1833e1f 5535 GEN_EXCP_INVAL(ctx);
5eb7995e
JM
5536 break;
5537 }
5538#endif
5539}
5540
5541/* tlbsx - tlbsx. */
c7697e1f 5542GEN_HANDLER2(tlbsx_440, "tlbsx", 0x1F, 0x12, 0x1C, 0x00000000, PPC_BOOKE)
5eb7995e
JM
5543{
5544#if defined(CONFIG_USER_ONLY)
e1833e1f 5545 GEN_EXCP_PRIVOPC(ctx);
5eb7995e
JM
5546#else
5547 if (unlikely(!ctx->supervisor)) {
e1833e1f 5548 GEN_EXCP_PRIVOPC(ctx);
5eb7995e
JM
5549 return;
5550 }
e2be8d8d 5551 gen_addr_reg_index(cpu_T[0], ctx);
daf4f96e 5552 gen_op_440_tlbsx();
5eb7995e 5553 if (Rc(ctx->opcode))
daf4f96e 5554 gen_op_4xx_tlbsx_check();
f78fb44e 5555 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]);
5eb7995e
JM
5556#endif
5557}
5558
5559/* tlbwe */
c7697e1f 5560GEN_HANDLER2(tlbwe_440, "tlbwe", 0x1F, 0x12, 0x1E, 0x00000001, PPC_BOOKE)
5eb7995e
JM
5561{
5562#if defined(CONFIG_USER_ONLY)
e1833e1f 5563 GEN_EXCP_PRIVOPC(ctx);
5eb7995e
JM
5564#else
5565 if (unlikely(!ctx->supervisor)) {
e1833e1f 5566 GEN_EXCP_PRIVOPC(ctx);
5eb7995e
JM
5567 return;
5568 }
5569 switch (rB(ctx->opcode)) {
5570 case 0:
5eb7995e 5571 case 1:
5eb7995e 5572 case 2:
f78fb44e
AJ
5573 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]);
5574 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rS(ctx->opcode)]);
a4bb6c3e 5575 gen_op_440_tlbwe(rB(ctx->opcode));
5eb7995e
JM
5576 break;
5577 default:
e1833e1f 5578 GEN_EXCP_INVAL(ctx);
5eb7995e
JM
5579 break;
5580 }
5581#endif
5582}
5583
76a66253 5584/* wrtee */
05332d70 5585GEN_HANDLER(wrtee, 0x1F, 0x03, 0x04, 0x000FFC01, PPC_WRTEE)
76a66253
JM
5586{
5587#if defined(CONFIG_USER_ONLY)
e1833e1f 5588 GEN_EXCP_PRIVOPC(ctx);
76a66253
JM
5589#else
5590 if (unlikely(!ctx->supervisor)) {
e1833e1f 5591 GEN_EXCP_PRIVOPC(ctx);
76a66253
JM
5592 return;
5593 }
f78fb44e 5594 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rD(ctx->opcode)]);
a42bd6cc 5595 gen_op_wrte();
dee96f6c
JM
5596 /* Stop translation to have a chance to raise an exception
5597 * if we just set msr_ee to 1
5598 */
e1833e1f 5599 GEN_STOP(ctx);
76a66253
JM
5600#endif
5601}
5602
5603/* wrteei */
05332d70 5604GEN_HANDLER(wrteei, 0x1F, 0x03, 0x05, 0x000EFC01, PPC_WRTEE)
76a66253
JM
5605{
5606#if defined(CONFIG_USER_ONLY)
e1833e1f 5607 GEN_EXCP_PRIVOPC(ctx);
76a66253
JM
5608#else
5609 if (unlikely(!ctx->supervisor)) {
e1833e1f 5610 GEN_EXCP_PRIVOPC(ctx);
76a66253
JM
5611 return;
5612 }
86c581dc 5613 tcg_gen_movi_tl(cpu_T[0], ctx->opcode & 0x00010000);
a42bd6cc 5614 gen_op_wrte();
dee96f6c
JM
5615 /* Stop translation to have a chance to raise an exception
5616 * if we just set msr_ee to 1
5617 */
e1833e1f 5618 GEN_STOP(ctx);
76a66253
JM
5619#endif
5620}
5621
08e46e54 5622/* PowerPC 440 specific instructions */
76a66253
JM
5623/* dlmzb */
5624GEN_HANDLER(dlmzb, 0x1F, 0x0E, 0x02, 0x00000000, PPC_440_SPEC)
5625{
f78fb44e
AJ
5626 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rS(ctx->opcode)]);
5627 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rB(ctx->opcode)]);
76a66253 5628 gen_op_440_dlmzb();
f78fb44e 5629 tcg_gen_mov_tl(cpu_gpr[rA(ctx->opcode)], cpu_T[0]);
3d7b417e
AJ
5630 tcg_gen_andi_tl(cpu_xer, cpu_xer, ~0x7F);
5631 tcg_gen_or_tl(cpu_xer, cpu_xer, cpu_T[0]);
76a66253
JM
5632 if (Rc(ctx->opcode)) {
5633 gen_op_440_dlmzb_update_Rc();
47e4661c 5634 tcg_gen_andi_i32(cpu_crf[0], cpu_T[0], 0xf);
76a66253
JM
5635 }
5636}
5637
5638/* mbar replaces eieio on 440 */
5639GEN_HANDLER(mbar, 0x1F, 0x16, 0x13, 0x001FF801, PPC_BOOKE)
5640{
5641 /* interpreted as no-op */
5642}
5643
5644/* msync replaces sync on 440 */
0db1b20e 5645GEN_HANDLER(msync, 0x1F, 0x16, 0x12, 0x03FFF801, PPC_BOOKE)
76a66253
JM
5646{
5647 /* interpreted as no-op */
5648}
5649
5650/* icbt */
c7697e1f 5651GEN_HANDLER2(icbt_440, "icbt", 0x1F, 0x16, 0x00, 0x03E00001, PPC_BOOKE)
76a66253
JM
5652{
5653 /* interpreted as no-op */
5654 /* XXX: specification say this is treated as a load by the MMU
5655 * but does not generate any exception
5656 */
79aceca5
FB
5657}
5658
a9d9eb8f
JM
5659/*** Altivec vector extension ***/
5660/* Altivec registers moves */
a9d9eb8f 5661
1d542695
AJ
5662static always_inline void gen_load_avr(int t, int reg) {
5663 tcg_gen_mov_i64(cpu_AVRh[t], cpu_avrh[reg]);
5664 tcg_gen_mov_i64(cpu_AVRl[t], cpu_avrl[reg]);
5665}
5666
5667static always_inline void gen_store_avr(int reg, int t) {
5668 tcg_gen_mov_i64(cpu_avrh[reg], cpu_AVRh[t]);
5669 tcg_gen_mov_i64(cpu_avrl[reg], cpu_AVRl[t]);
5670}
a9d9eb8f
JM
5671
5672#define op_vr_ldst(name) (*gen_op_##name[ctx->mem_idx])()
a9d9eb8f 5673#define OP_VR_LD_TABLE(name) \
7863667f
JM
5674static GenOpFunc *gen_op_vr_l##name[NB_MEM_FUNCS] = { \
5675 GEN_MEM_FUNCS(vr_l##name), \
a9d9eb8f
JM
5676};
5677#define OP_VR_ST_TABLE(name) \
7863667f
JM
5678static GenOpFunc *gen_op_vr_st##name[NB_MEM_FUNCS] = { \
5679 GEN_MEM_FUNCS(vr_st##name), \
a9d9eb8f 5680};
a9d9eb8f
JM
5681
5682#define GEN_VR_LDX(name, opc2, opc3) \
5683GEN_HANDLER(l##name, 0x1F, opc2, opc3, 0x00000001, PPC_ALTIVEC) \
5684{ \
5685 if (unlikely(!ctx->altivec_enabled)) { \
5686 GEN_EXCP_NO_VR(ctx); \
5687 return; \
5688 } \
e2be8d8d 5689 gen_addr_reg_index(cpu_T[0], ctx); \
a9d9eb8f 5690 op_vr_ldst(vr_l##name); \
1d542695 5691 gen_store_avr(rD(ctx->opcode), 0); \
a9d9eb8f
JM
5692}
5693
5694#define GEN_VR_STX(name, opc2, opc3) \
5695GEN_HANDLER(st##name, 0x1F, opc2, opc3, 0x00000001, PPC_ALTIVEC) \
5696{ \
5697 if (unlikely(!ctx->altivec_enabled)) { \
5698 GEN_EXCP_NO_VR(ctx); \
5699 return; \
5700 } \
e2be8d8d 5701 gen_addr_reg_index(cpu_T[0], ctx); \
1d542695 5702 gen_load_avr(0, rS(ctx->opcode)); \
a9d9eb8f
JM
5703 op_vr_ldst(vr_st##name); \
5704}
5705
5706OP_VR_LD_TABLE(vx);
5707GEN_VR_LDX(vx, 0x07, 0x03);
5708/* As we don't emulate the cache, lvxl is stricly equivalent to lvx */
5709#define gen_op_vr_lvxl gen_op_vr_lvx
5710GEN_VR_LDX(vxl, 0x07, 0x0B);
5711
5712OP_VR_ST_TABLE(vx);
5713GEN_VR_STX(vx, 0x07, 0x07);
5714/* As we don't emulate the cache, stvxl is stricly equivalent to stvx */
5715#define gen_op_vr_stvxl gen_op_vr_stvx
5716GEN_VR_STX(vxl, 0x07, 0x0F);
5717
0487d6a8 5718/*** SPE extension ***/
0487d6a8 5719/* Register moves */
3cd7d1dd 5720
f78fb44e
AJ
5721static always_inline void gen_load_gpr64(TCGv t, int reg) {
5722#if defined(TARGET_PPC64)
5723 tcg_gen_mov_i64(t, cpu_gpr[reg]);
5724#else
36aa55dc 5725 tcg_gen_concat_i32_i64(t, cpu_gpr[reg], cpu_gprh[reg]);
3cd7d1dd 5726#endif
f78fb44e 5727}
3cd7d1dd 5728
f78fb44e
AJ
5729static always_inline void gen_store_gpr64(int reg, TCGv t) {
5730#if defined(TARGET_PPC64)
5731 tcg_gen_mov_i64(cpu_gpr[reg], t);
5732#else
5733 tcg_gen_trunc_i64_i32(cpu_gpr[reg], t);
19f98ff6 5734 TCGv tmp = tcg_temp_new(TCG_TYPE_I64);
f78fb44e
AJ
5735 tcg_gen_shri_i64(tmp, t, 32);
5736 tcg_gen_trunc_i64_i32(cpu_gprh[reg], tmp);
5737 tcg_temp_free(tmp);
3cd7d1dd 5738#endif
f78fb44e 5739}
3cd7d1dd 5740
0487d6a8
JM
5741#define GEN_SPE(name0, name1, opc2, opc3, inval, type) \
5742GEN_HANDLER(name0##_##name1, 0x04, opc2, opc3, inval, type) \
5743{ \
5744 if (Rc(ctx->opcode)) \
5745 gen_##name1(ctx); \
5746 else \
5747 gen_##name0(ctx); \
5748}
5749
5750/* Handler for undefined SPE opcodes */
b068d6a7 5751static always_inline void gen_speundef (DisasContext *ctx)
0487d6a8 5752{
e1833e1f 5753 GEN_EXCP_INVAL(ctx);
0487d6a8
JM
5754}
5755
5756/* SPE load and stores */
f0aabd1a 5757static always_inline void gen_addr_spe_imm_index (TCGv EA, DisasContext *ctx, int sh)
0487d6a8
JM
5758{
5759 target_long simm = rB(ctx->opcode);
5760
f0aabd1a
AJ
5761 if (rA(ctx->opcode) == 0)
5762 tcg_gen_movi_tl(EA, simm << sh);
5763 else if (likely(simm != 0))
5764 tcg_gen_addi_tl(EA, cpu_gpr[rA(ctx->opcode)], simm << sh);
5765 else
5766 tcg_gen_mov_tl(EA, cpu_gpr[rA(ctx->opcode)]);
0487d6a8
JM
5767}
5768
5769#define op_spe_ldst(name) (*gen_op_##name[ctx->mem_idx])()
0487d6a8 5770#define OP_SPE_LD_TABLE(name) \
7863667f
JM
5771static GenOpFunc *gen_op_spe_l##name[NB_MEM_FUNCS] = { \
5772 GEN_MEM_FUNCS(spe_l##name), \
0487d6a8
JM
5773};
5774#define OP_SPE_ST_TABLE(name) \
7863667f
JM
5775static GenOpFunc *gen_op_spe_st##name[NB_MEM_FUNCS] = { \
5776 GEN_MEM_FUNCS(spe_st##name), \
2857068e 5777};
0487d6a8
JM
5778
5779#define GEN_SPE_LD(name, sh) \
b068d6a7 5780static always_inline void gen_evl##name (DisasContext *ctx) \
0487d6a8
JM
5781{ \
5782 if (unlikely(!ctx->spe_enabled)) { \
e1833e1f 5783 GEN_EXCP_NO_AP(ctx); \
0487d6a8
JM
5784 return; \
5785 } \
f0aabd1a 5786 gen_addr_spe_imm_index(cpu_T[0], ctx, sh); \
0487d6a8 5787 op_spe_ldst(spe_l##name); \
f78fb44e 5788 gen_store_gpr64(rD(ctx->opcode), cpu_T64[1]); \
0487d6a8
JM
5789}
5790
5791#define GEN_SPE_LDX(name) \
b068d6a7 5792static always_inline void gen_evl##name##x (DisasContext *ctx) \
0487d6a8
JM
5793{ \
5794 if (unlikely(!ctx->spe_enabled)) { \
e1833e1f 5795 GEN_EXCP_NO_AP(ctx); \
0487d6a8
JM
5796 return; \
5797 } \
e2be8d8d 5798 gen_addr_reg_index(cpu_T[0], ctx); \
0487d6a8 5799 op_spe_ldst(spe_l##name); \
f78fb44e 5800 gen_store_gpr64(rD(ctx->opcode), cpu_T64[1]); \
0487d6a8
JM
5801}
5802
5803#define GEN_SPEOP_LD(name, sh) \
5804OP_SPE_LD_TABLE(name); \
5805GEN_SPE_LD(name, sh); \
5806GEN_SPE_LDX(name)
5807
5808#define GEN_SPE_ST(name, sh) \
b068d6a7 5809static always_inline void gen_evst##name (DisasContext *ctx) \
0487d6a8
JM
5810{ \
5811 if (unlikely(!ctx->spe_enabled)) { \
e1833e1f 5812 GEN_EXCP_NO_AP(ctx); \
0487d6a8
JM
5813 return; \
5814 } \
f0aabd1a 5815 gen_addr_spe_imm_index(cpu_T[0], ctx, sh); \
f78fb44e 5816 gen_load_gpr64(cpu_T64[1], rS(ctx->opcode)); \
0487d6a8
JM
5817 op_spe_ldst(spe_st##name); \
5818}
5819
5820#define GEN_SPE_STX(name) \
b068d6a7 5821static always_inline void gen_evst##name##x (DisasContext *ctx) \
0487d6a8
JM
5822{ \
5823 if (unlikely(!ctx->spe_enabled)) { \
e1833e1f 5824 GEN_EXCP_NO_AP(ctx); \
0487d6a8
JM
5825 return; \
5826 } \
e2be8d8d 5827 gen_addr_reg_index(cpu_T[0], ctx); \
f78fb44e 5828 gen_load_gpr64(cpu_T64[1], rS(ctx->opcode)); \
0487d6a8
JM
5829 op_spe_ldst(spe_st##name); \
5830}
5831
5832#define GEN_SPEOP_ST(name, sh) \
5833OP_SPE_ST_TABLE(name); \
5834GEN_SPE_ST(name, sh); \
5835GEN_SPE_STX(name)
5836
5837#define GEN_SPEOP_LDST(name, sh) \
5838GEN_SPEOP_LD(name, sh); \
5839GEN_SPEOP_ST(name, sh)
5840
5841/* SPE arithmetic and logic */
5842#define GEN_SPEOP_ARITH2(name) \
b068d6a7 5843static always_inline void gen_##name (DisasContext *ctx) \
0487d6a8
JM
5844{ \
5845 if (unlikely(!ctx->spe_enabled)) { \
e1833e1f 5846 GEN_EXCP_NO_AP(ctx); \
0487d6a8
JM
5847 return; \
5848 } \
f78fb44e
AJ
5849 gen_load_gpr64(cpu_T64[0], rA(ctx->opcode)); \
5850 gen_load_gpr64(cpu_T64[1], rB(ctx->opcode)); \
0487d6a8 5851 gen_op_##name(); \
f78fb44e 5852 gen_store_gpr64(rD(ctx->opcode), cpu_T64[0]); \
0487d6a8
JM
5853}
5854
cf960816 5855#define GEN_SPEOP_TCG_ARITH2(name, tcg_op) \
3d3a6a0a
AJ
5856static always_inline void gen_##name (DisasContext *ctx) \
5857{ \
5858 if (unlikely(!ctx->spe_enabled)) { \
5859 GEN_EXCP_NO_AP(ctx); \
5860 return; \
5861 } \
5862 TCGv t0 = tcg_temp_new(TCG_TYPE_I64); \
5863 TCGv t1 = tcg_temp_new(TCG_TYPE_I64); \
5864 gen_load_gpr64(t0, rA(ctx->opcode)); \
5865 gen_load_gpr64(t1, rB(ctx->opcode)); \
cf960816 5866 tcg_op(t0, t0, t1); \
3d3a6a0a
AJ
5867 gen_store_gpr64(rD(ctx->opcode), t0); \
5868 tcg_temp_free(t0); \
5869 tcg_temp_free(t1); \
5870}
5871
0487d6a8 5872#define GEN_SPEOP_ARITH1(name) \
b068d6a7 5873static always_inline void gen_##name (DisasContext *ctx) \
0487d6a8
JM
5874{ \
5875 if (unlikely(!ctx->spe_enabled)) { \
e1833e1f 5876 GEN_EXCP_NO_AP(ctx); \
0487d6a8
JM
5877 return; \
5878 } \
f78fb44e 5879 gen_load_gpr64(cpu_T64[0], rA(ctx->opcode)); \
0487d6a8 5880 gen_op_##name(); \
f78fb44e 5881 gen_store_gpr64(rD(ctx->opcode), cpu_T64[0]); \
0487d6a8
JM
5882}
5883
5884#define GEN_SPEOP_COMP(name) \
b068d6a7 5885static always_inline void gen_##name (DisasContext *ctx) \
0487d6a8
JM
5886{ \
5887 if (unlikely(!ctx->spe_enabled)) { \
e1833e1f 5888 GEN_EXCP_NO_AP(ctx); \
0487d6a8
JM
5889 return; \
5890 } \
f78fb44e
AJ
5891 gen_load_gpr64(cpu_T64[0], rA(ctx->opcode)); \
5892 gen_load_gpr64(cpu_T64[1], rB(ctx->opcode)); \
0487d6a8 5893 gen_op_##name(); \
47e4661c 5894 tcg_gen_andi_i32(cpu_crf[crfD(ctx->opcode)], cpu_T[0], 0xf); \
0487d6a8
JM
5895}
5896
5897/* Logical */
cf960816
AJ
5898GEN_SPEOP_TCG_ARITH2(evand, tcg_gen_and_i64);
5899GEN_SPEOP_TCG_ARITH2(evandc, tcg_gen_andc_i64);
5900GEN_SPEOP_TCG_ARITH2(evxor, tcg_gen_xor_i64);
5901GEN_SPEOP_TCG_ARITH2(evor, tcg_gen_or_i64);
5902GEN_SPEOP_TCG_ARITH2(evnor, tcg_gen_nor_i64);
5903GEN_SPEOP_TCG_ARITH2(eveqv, tcg_gen_eqv_i64);
5904GEN_SPEOP_TCG_ARITH2(evorc, tcg_gen_orc_i64);
5905GEN_SPEOP_TCG_ARITH2(evnand, tcg_gen_nand_i64);
0487d6a8
JM
5906GEN_SPEOP_ARITH2(evsrwu);
5907GEN_SPEOP_ARITH2(evsrws);
5908GEN_SPEOP_ARITH2(evslw);
5909GEN_SPEOP_ARITH2(evrlw);
5910GEN_SPEOP_ARITH2(evmergehi);
5911GEN_SPEOP_ARITH2(evmergelo);
5912GEN_SPEOP_ARITH2(evmergehilo);
5913GEN_SPEOP_ARITH2(evmergelohi);
5914
5915/* Arithmetic */
5916GEN_SPEOP_ARITH2(evaddw);
5917GEN_SPEOP_ARITH2(evsubfw);
5918GEN_SPEOP_ARITH1(evabs);
5919GEN_SPEOP_ARITH1(evneg);
5920GEN_SPEOP_ARITH1(evextsb);
5921GEN_SPEOP_ARITH1(evextsh);
5922GEN_SPEOP_ARITH1(evrndw);
5923GEN_SPEOP_ARITH1(evcntlzw);
5924GEN_SPEOP_ARITH1(evcntlsw);
b068d6a7 5925static always_inline void gen_brinc (DisasContext *ctx)
0487d6a8
JM
5926{
5927 /* Note: brinc is usable even if SPE is disabled */
f78fb44e
AJ
5928 tcg_gen_mov_tl(cpu_T[0], cpu_gpr[rA(ctx->opcode)]);
5929 tcg_gen_mov_tl(cpu_T[1], cpu_gpr[rB(ctx->opcode)]);
0487d6a8 5930 gen_op_brinc();
f78fb44e 5931 tcg_gen_mov_tl(cpu_gpr[rD(ctx->opcode)], cpu_T[0]);
0487d6a8
JM
5932}
5933
5934#define GEN_SPEOP_ARITH_IMM2(name) \
b068d6a7 5935static always_inline void gen_##name##i (DisasContext *ctx) \
0487d6a8
JM
5936{ \
5937 if (unlikely(!ctx->spe_enabled)) { \
e1833e1f 5938 GEN_EXCP_NO_AP(ctx); \
0487d6a8
JM
5939 return; \
5940 } \
f78fb44e 5941 gen_load_gpr64(cpu_T64[0], rB(ctx->opcode)); \
0487d6a8
JM
5942 gen_op_splatwi_T1_64(rA(ctx->opcode)); \
5943 gen_op_##name(); \
f78fb44e 5944 gen_store_gpr64(rD(ctx->opcode), cpu_T64[0]); \
0487d6a8
JM
5945}
5946
5947#define GEN_SPEOP_LOGIC_IMM2(name) \
b068d6a7 5948static always_inline void gen_##name##i (DisasContext *ctx) \
0487d6a8
JM
5949{ \
5950 if (unlikely(!ctx->spe_enabled)) { \
e1833e1f 5951 GEN_EXCP_NO_AP(ctx); \
0487d6a8
JM
5952 return; \
5953 } \
f78fb44e 5954 gen_load_gpr64(cpu_T64[0], rA(ctx->opcode)); \
0487d6a8
JM
5955 gen_op_splatwi_T1_64(rB(ctx->opcode)); \
5956 gen_op_##name(); \
f78fb44e 5957 gen_store_gpr64(rD(ctx->opcode), cpu_T64[0]); \
0487d6a8
JM
5958}
5959
5960GEN_SPEOP_ARITH_IMM2(evaddw);
5961#define gen_evaddiw gen_evaddwi
5962GEN_SPEOP_ARITH_IMM2(evsubfw);
5963#define gen_evsubifw gen_evsubfwi
5964GEN_SPEOP_LOGIC_IMM2(evslw);
5965GEN_SPEOP_LOGIC_IMM2(evsrwu);
5966#define gen_evsrwis gen_evsrwsi
5967GEN_SPEOP_LOGIC_IMM2(evsrws);
5968#define gen_evsrwiu gen_evsrwui
5969GEN_SPEOP_LOGIC_IMM2(evrlw);
5970
b068d6a7 5971static always_inline void gen_evsplati (DisasContext *ctx)
0487d6a8
JM
5972{
5973 int32_t imm = (int32_t)(rA(ctx->opcode) << 27) >> 27;
5974
5975 gen_op_splatwi_T0_64(imm);
f78fb44e 5976 gen_store_gpr64(rD(ctx->opcode), cpu_T64[0]);
0487d6a8
JM
5977}
5978
b068d6a7 5979static always_inline void gen_evsplatfi (DisasContext *ctx)
0487d6a8
JM
5980{
5981 uint32_t imm = rA(ctx->opcode) << 27;
5982
5983 gen_op_splatwi_T0_64(imm);
f78fb44e 5984 gen_store_gpr64(rD(ctx->opcode), cpu_T64[0]);
0487d6a8
JM
5985}
5986
5987/* Comparison */
5988GEN_SPEOP_COMP(evcmpgtu);
5989GEN_SPEOP_COMP(evcmpgts);
5990GEN_SPEOP_COMP(evcmpltu);
5991GEN_SPEOP_COMP(evcmplts);
5992GEN_SPEOP_COMP(evcmpeq);
5993
5994GEN_SPE(evaddw, speundef, 0x00, 0x08, 0x00000000, PPC_SPE); ////
5995GEN_SPE(evaddiw, speundef, 0x01, 0x08, 0x00000000, PPC_SPE);
5996GEN_SPE(evsubfw, speundef, 0x02, 0x08, 0x00000000, PPC_SPE); ////
5997GEN_SPE(evsubifw, speundef, 0x03, 0x08, 0x00000000, PPC_SPE);
5998GEN_SPE(evabs, evneg, 0x04, 0x08, 0x0000F800, PPC_SPE); ////
5999GEN_SPE(evextsb, evextsh, 0x05, 0x08, 0x0000F800, PPC_SPE); ////
6000GEN_SPE(evrndw, evcntlzw, 0x06, 0x08, 0x0000F800, PPC_SPE); ////
6001GEN_SPE(evcntlsw, brinc, 0x07, 0x08, 0x00000000, PPC_SPE); //
6002GEN_SPE(speundef, evand, 0x08, 0x08, 0x00000000, PPC_SPE); ////
6003GEN_SPE(evandc, speundef, 0x09, 0x08, 0x00000000, PPC_SPE); ////
6004GEN_SPE(evxor, evor, 0x0B, 0x08, 0x00000000, PPC_SPE); ////
6005GEN_SPE(evnor, eveqv, 0x0C, 0x08, 0x00000000, PPC_SPE); ////
6006GEN_SPE(speundef, evorc, 0x0D, 0x08, 0x00000000, PPC_SPE); ////
6007GEN_SPE(evnand, speundef, 0x0F, 0x08, 0x00000000, PPC_SPE); ////
6008GEN_SPE(evsrwu, evsrws, 0x10, 0x08, 0x00000000, PPC_SPE); ////
6009GEN_SPE(evsrwiu, evsrwis, 0x11, 0x08, 0x00000000, PPC_SPE);
6010GEN_SPE(evslw, speundef, 0x12, 0x08, 0x00000000, PPC_SPE); ////
6011GEN_SPE(evslwi, speundef, 0x13, 0x08, 0x00000000, PPC_SPE);
6012GEN_SPE(evrlw, evsplati, 0x14, 0x08, 0x00000000, PPC_SPE); //
6013GEN_SPE(evrlwi, evsplatfi, 0x15, 0x08, 0x00000000, PPC_SPE);
6014GEN_SPE(evmergehi, evmergelo, 0x16, 0x08, 0x00000000, PPC_SPE); ////
6015GEN_SPE(evmergehilo, evmergelohi, 0x17, 0x08, 0x00000000, PPC_SPE); ////
6016GEN_SPE(evcmpgtu, evcmpgts, 0x18, 0x08, 0x00600000, PPC_SPE); ////
6017GEN_SPE(evcmpltu, evcmplts, 0x19, 0x08, 0x00600000, PPC_SPE); ////
6018GEN_SPE(evcmpeq, speundef, 0x1A, 0x08, 0x00600000, PPC_SPE); ////
6019
b068d6a7 6020static always_inline void gen_evsel (DisasContext *ctx)
0487d6a8
JM
6021{
6022 if (unlikely(!ctx->spe_enabled)) {
e1833e1f 6023 GEN_EXCP_NO_AP(ctx);
0487d6a8
JM
6024 return;
6025 }
47e4661c 6026 tcg_gen_mov_i32(cpu_T[0], cpu_crf[ctx->opcode & 0x7]);
f78fb44e
AJ
6027 gen_load_gpr64(cpu_T64[0], rA(ctx->opcode));
6028 gen_load_gpr64(cpu_T64[1], rB(ctx->opcode));
0487d6a8 6029 gen_op_evsel();
f78fb44e 6030 gen_store_gpr64(rD(ctx->opcode), cpu_T64[0]);
0487d6a8
JM
6031}
6032
c7697e1f 6033GEN_HANDLER2(evsel0, "evsel", 0x04, 0x1c, 0x09, 0x00000000, PPC_SPE)
0487d6a8
JM
6034{
6035 gen_evsel(ctx);
6036}
c7697e1f 6037GEN_HANDLER2(evsel1, "evsel", 0x04, 0x1d, 0x09, 0x00000000, PPC_SPE)
0487d6a8
JM
6038{
6039 gen_evsel(ctx);
6040}
c7697e1f 6041GEN_HANDLER2(evsel2, "evsel", 0x04, 0x1e, 0x09, 0x00000000, PPC_SPE)
0487d6a8
JM
6042{
6043 gen_evsel(ctx);
6044}
c7697e1f 6045GEN_HANDLER2(evsel3, "evsel", 0x04, 0x1f, 0x09, 0x00000000, PPC_SPE)
0487d6a8
JM
6046{
6047 gen_evsel(ctx);
6048}
6049
6050/* Load and stores */
0487d6a8
JM
6051GEN_SPEOP_LDST(dd, 3);
6052GEN_SPEOP_LDST(dw, 3);
6053GEN_SPEOP_LDST(dh, 3);
6054GEN_SPEOP_LDST(whe, 2);
6055GEN_SPEOP_LD(whou, 2);
6056GEN_SPEOP_LD(whos, 2);
6057GEN_SPEOP_ST(who, 2);
6058
0487d6a8 6059#define _GEN_OP_SPE_STWWE(suffix) \
b068d6a7 6060static always_inline void gen_op_spe_stwwe_##suffix (void) \
0487d6a8
JM
6061{ \
6062 gen_op_srli32_T1_64(); \
6063 gen_op_spe_stwwo_##suffix(); \
6064}
6065#define _GEN_OP_SPE_STWWE_LE(suffix) \
b068d6a7 6066static always_inline void gen_op_spe_stwwe_le_##suffix (void) \
0487d6a8
JM
6067{ \
6068 gen_op_srli32_T1_64(); \
6069 gen_op_spe_stwwo_le_##suffix(); \
6070}
6071#if defined(TARGET_PPC64)
6072#define GEN_OP_SPE_STWWE(suffix) \
6073_GEN_OP_SPE_STWWE(suffix); \
6074_GEN_OP_SPE_STWWE_LE(suffix); \
b068d6a7 6075static always_inline void gen_op_spe_stwwe_64_##suffix (void) \
0487d6a8
JM
6076{ \
6077 gen_op_srli32_T1_64(); \
6078 gen_op_spe_stwwo_64_##suffix(); \
6079} \
b068d6a7 6080static always_inline void gen_op_spe_stwwe_le_64_##suffix (void) \
0487d6a8
JM
6081{ \
6082 gen_op_srli32_T1_64(); \
6083 gen_op_spe_stwwo_le_64_##suffix(); \
6084}
6085#else
6086#define GEN_OP_SPE_STWWE(suffix) \
6087_GEN_OP_SPE_STWWE(suffix); \
6088_GEN_OP_SPE_STWWE_LE(suffix)
6089#endif
6090#if defined(CONFIG_USER_ONLY)
6091GEN_OP_SPE_STWWE(raw);
6092#else /* defined(CONFIG_USER_ONLY) */
0487d6a8 6093GEN_OP_SPE_STWWE(user);
7863667f
JM
6094GEN_OP_SPE_STWWE(kernel);
6095GEN_OP_SPE_STWWE(hypv);
0487d6a8
JM
6096#endif /* defined(CONFIG_USER_ONLY) */
6097GEN_SPEOP_ST(wwe, 2);
6098GEN_SPEOP_ST(wwo, 2);
6099
6100#define GEN_SPE_LDSPLAT(name, op, suffix) \
b068d6a7 6101static always_inline void gen_op_spe_l##name##_##suffix (void) \
0487d6a8
JM
6102{ \
6103 gen_op_##op##_##suffix(); \
6104 gen_op_splatw_T1_64(); \
6105}
6106
6107#define GEN_OP_SPE_LHE(suffix) \
b068d6a7 6108static always_inline void gen_op_spe_lhe_##suffix (void) \
0487d6a8
JM
6109{ \
6110 gen_op_spe_lh_##suffix(); \
6111 gen_op_sli16_T1_64(); \
6112}
6113
6114#define GEN_OP_SPE_LHX(suffix) \
b068d6a7 6115static always_inline void gen_op_spe_lhx_##suffix (void) \
0487d6a8
JM
6116{ \
6117 gen_op_spe_lh_##suffix(); \
6118 gen_op_extsh_T1_64(); \
6119}
6120
6121#if defined(CONFIG_USER_ONLY)
6122GEN_OP_SPE_LHE(raw);
6123GEN_SPE_LDSPLAT(hhesplat, spe_lhe, raw);
6124GEN_OP_SPE_LHE(le_raw);
6125GEN_SPE_LDSPLAT(hhesplat, spe_lhe, le_raw);
6126GEN_SPE_LDSPLAT(hhousplat, spe_lh, raw);
6127GEN_SPE_LDSPLAT(hhousplat, spe_lh, le_raw);
6128GEN_OP_SPE_LHX(raw);
6129GEN_SPE_LDSPLAT(hhossplat, spe_lhx, raw);
6130GEN_OP_SPE_LHX(le_raw);
6131GEN_SPE_LDSPLAT(hhossplat, spe_lhx, le_raw);
6132#if defined(TARGET_PPC64)
6133GEN_OP_SPE_LHE(64_raw);
6134GEN_SPE_LDSPLAT(hhesplat, spe_lhe, 64_raw);
6135GEN_OP_SPE_LHE(le_64_raw);
6136GEN_SPE_LDSPLAT(hhesplat, spe_lhe, le_64_raw);
6137GEN_SPE_LDSPLAT(hhousplat, spe_lh, 64_raw);
6138GEN_SPE_LDSPLAT(hhousplat, spe_lh, le_64_raw);
6139GEN_OP_SPE_LHX(64_raw);
6140GEN_SPE_LDSPLAT(hhossplat, spe_lhx, 64_raw);
6141GEN_OP_SPE_LHX(le_64_raw);
6142GEN_SPE_LDSPLAT(hhossplat, spe_lhx, le_64_raw);
6143#endif
6144#else
0487d6a8 6145GEN_OP_SPE_LHE(user);
7863667f
JM
6146GEN_OP_SPE_LHE(kernel);
6147GEN_OP_SPE_LHE(hypv);
0487d6a8 6148GEN_SPE_LDSPLAT(hhesplat, spe_lhe, user);
7863667f
JM
6149GEN_SPE_LDSPLAT(hhesplat, spe_lhe, kernel);
6150GEN_SPE_LDSPLAT(hhesplat, spe_lhe, hypv);
0487d6a8 6151GEN_OP_SPE_LHE(le_user);
7863667f
JM
6152GEN_OP_SPE_LHE(le_kernel);
6153GEN_OP_SPE_LHE(le_hypv);
0487d6a8 6154GEN_SPE_LDSPLAT(hhesplat, spe_lhe, le_user);
7863667f
JM
6155GEN_SPE_LDSPLAT(hhesplat, spe_lhe, le_kernel);
6156GEN_SPE_LDSPLAT(hhesplat, spe_lhe, le_hypv);
0487d6a8 6157GEN_SPE_LDSPLAT(hhousplat, spe_lh, user);
7863667f
JM
6158GEN_SPE_LDSPLAT(hhousplat, spe_lh, kernel);
6159GEN_SPE_LDSPLAT(hhousplat, spe_lh, hypv);
0487d6a8 6160GEN_SPE_LDSPLAT(hhousplat, spe_lh, le_user);
7863667f
JM
6161GEN_SPE_LDSPLAT(hhousplat, spe_lh, le_kernel);
6162GEN_SPE_LDSPLAT(hhousplat, spe_lh, le_hypv);
0487d6a8 6163GEN_OP_SPE_LHX(user);
7863667f
JM
6164GEN_OP_SPE_LHX(kernel);
6165GEN_OP_SPE_LHX(hypv);
0487d6a8 6166GEN_SPE_LDSPLAT(hhossplat, spe_lhx, user);
7863667f
JM
6167GEN_SPE_LDSPLAT(hhossplat, spe_lhx, kernel);
6168GEN_SPE_LDSPLAT(hhossplat, spe_lhx, hypv);
0487d6a8 6169GEN_OP_SPE_LHX(le_user);
7863667f
JM
6170GEN_OP_SPE_LHX(le_kernel);
6171GEN_OP_SPE_LHX(le_hypv);
0487d6a8 6172GEN_SPE_LDSPLAT(hhossplat, spe_lhx, le_user);
7863667f
JM
6173GEN_SPE_LDSPLAT(hhossplat, spe_lhx, le_kernel);
6174GEN_SPE_LDSPLAT(hhossplat, spe_lhx, le_hypv);
0487d6a8 6175#if defined(TARGET_PPC64)
0487d6a8 6176GEN_OP_SPE_LHE(64_user);
7863667f
JM
6177GEN_OP_SPE_LHE(64_kernel);
6178GEN_OP_SPE_LHE(64_hypv);
0487d6a8 6179GEN_SPE_LDSPLAT(hhesplat, spe_lhe, 64_user);
7863667f
JM
6180GEN_SPE_LDSPLAT(hhesplat, spe_lhe, 64_kernel);
6181GEN_SPE_LDSPLAT(hhesplat, spe_lhe, 64_hypv);
0487d6a8 6182GEN_OP_SPE_LHE(le_64_user);
7863667f
JM
6183GEN_OP_SPE_LHE(le_64_kernel);
6184GEN_OP_SPE_LHE(le_64_hypv);
0487d6a8 6185GEN_SPE_LDSPLAT(hhesplat, spe_lhe, le_64_user);
7863667f
JM
6186GEN_SPE_LDSPLAT(hhesplat, spe_lhe, le_64_kernel);
6187GEN_SPE_LDSPLAT(hhesplat, spe_lhe, le_64_hypv);
0487d6a8 6188GEN_SPE_LDSPLAT(hhousplat, spe_lh, 64_user);
7863667f
JM
6189GEN_SPE_LDSPLAT(hhousplat, spe_lh, 64_kernel);
6190GEN_SPE_LDSPLAT(hhousplat, spe_lh, 64_hypv);
0487d6a8 6191GEN_SPE_LDSPLAT(hhousplat, spe_lh, le_64_user);
7863667f
JM
6192GEN_SPE_LDSPLAT(hhousplat, spe_lh, le_64_kernel);
6193GEN_SPE_LDSPLAT(hhousplat, spe_lh, le_64_hypv);
0487d6a8 6194GEN_OP_SPE_LHX(64_user);
7863667f
JM
6195GEN_OP_SPE_LHX(64_kernel);
6196GEN_OP_SPE_LHX(64_hypv);
0487d6a8 6197GEN_SPE_LDSPLAT(hhossplat, spe_lhx, 64_user);
7863667f
JM
6198GEN_SPE_LDSPLAT(hhossplat, spe_lhx, 64_kernel);
6199GEN_SPE_LDSPLAT(hhossplat, spe_lhx, 64_hypv);
0487d6a8 6200GEN_OP_SPE_LHX(le_64_user);
7863667f
JM
6201GEN_OP_SPE_LHX(le_64_kernel);
6202GEN_OP_SPE_LHX(le_64_hypv);
0487d6a8 6203GEN_SPE_LDSPLAT(hhossplat, spe_lhx, le_64_user);
7863667f
JM
6204GEN_SPE_LDSPLAT(hhossplat, spe_lhx, le_64_kernel);
6205GEN_SPE_LDSPLAT(hhossplat, spe_lhx, le_64_hypv);
0487d6a8
JM
6206#endif
6207#endif
6208GEN_SPEOP_LD(hhesplat, 1);
6209GEN_SPEOP_LD(hhousplat, 1);
6210GEN_SPEOP_LD(hhossplat, 1);
6211GEN_SPEOP_LD(wwsplat, 2);
6212GEN_SPEOP_LD(whsplat, 2);
6213
6214GEN_SPE(evlddx, evldd, 0x00, 0x0C, 0x00000000, PPC_SPE); //
6215GEN_SPE(evldwx, evldw, 0x01, 0x0C, 0x00000000, PPC_SPE); //
6216GEN_SPE(evldhx, evldh, 0x02, 0x0C, 0x00000000, PPC_SPE); //
6217GEN_SPE(evlhhesplatx, evlhhesplat, 0x04, 0x0C, 0x00000000, PPC_SPE); //
6218GEN_SPE(evlhhousplatx, evlhhousplat, 0x06, 0x0C, 0x00000000, PPC_SPE); //
6219GEN_SPE(evlhhossplatx, evlhhossplat, 0x07, 0x0C, 0x00000000, PPC_SPE); //
6220GEN_SPE(evlwhex, evlwhe, 0x08, 0x0C, 0x00000000, PPC_SPE); //
6221GEN_SPE(evlwhoux, evlwhou, 0x0A, 0x0C, 0x00000000, PPC_SPE); //
6222GEN_SPE(evlwhosx, evlwhos, 0x0B, 0x0C, 0x00000000, PPC_SPE); //
6223GEN_SPE(evlwwsplatx, evlwwsplat, 0x0C, 0x0C, 0x00000000, PPC_SPE); //
6224GEN_SPE(evlwhsplatx, evlwhsplat, 0x0E, 0x0C, 0x00000000, PPC_SPE); //
6225GEN_SPE(evstddx, evstdd, 0x10, 0x0C, 0x00000000, PPC_SPE); //
6226GEN_SPE(evstdwx, evstdw, 0x11, 0x0C, 0x00000000, PPC_SPE); //
6227GEN_SPE(evstdhx, evstdh, 0x12, 0x0C, 0x00000000, PPC_SPE); //
6228GEN_SPE(evstwhex, evstwhe, 0x18, 0x0C, 0x00000000, PPC_SPE); //
6229GEN_SPE(evstwhox, evstwho, 0x1A, 0x0C, 0x00000000, PPC_SPE); //
6230GEN_SPE(evstwwex, evstwwe, 0x1C, 0x0C, 0x00000000, PPC_SPE); //
6231GEN_SPE(evstwwox, evstwwo, 0x1E, 0x0C, 0x00000000, PPC_SPE); //
6232
6233/* Multiply and add - TODO */
6234#if 0
6235GEN_SPE(speundef, evmhessf, 0x01, 0x10, 0x00000000, PPC_SPE);
6236GEN_SPE(speundef, evmhossf, 0x03, 0x10, 0x00000000, PPC_SPE);
6237GEN_SPE(evmheumi, evmhesmi, 0x04, 0x10, 0x00000000, PPC_SPE);
6238GEN_SPE(speundef, evmhesmf, 0x05, 0x10, 0x00000000, PPC_SPE);
6239GEN_SPE(evmhoumi, evmhosmi, 0x06, 0x10, 0x00000000, PPC_SPE);
6240GEN_SPE(speundef, evmhosmf, 0x07, 0x10, 0x00000000, PPC_SPE);
6241GEN_SPE(speundef, evmhessfa, 0x11, 0x10, 0x00000000, PPC_SPE);
6242GEN_SPE(speundef, evmhossfa, 0x13, 0x10, 0x00000000, PPC_SPE);
6243GEN_SPE(evmheumia, evmhesmia, 0x14, 0x10, 0x00000000, PPC_SPE);
6244GEN_SPE(speundef, evmhesmfa, 0x15, 0x10, 0x00000000, PPC_SPE);
6245GEN_SPE(evmhoumia, evmhosmia, 0x16, 0x10, 0x00000000, PPC_SPE);
6246GEN_SPE(speundef, evmhosmfa, 0x17, 0x10, 0x00000000, PPC_SPE);
6247
6248GEN_SPE(speundef, evmwhssf, 0x03, 0x11, 0x00000000, PPC_SPE);
6249GEN_SPE(evmwlumi, speundef, 0x04, 0x11, 0x00000000, PPC_SPE);
6250GEN_SPE(evmwhumi, evmwhsmi, 0x06, 0x11, 0x00000000, PPC_SPE);
6251GEN_SPE(speundef, evmwhsmf, 0x07, 0x11, 0x00000000, PPC_SPE);
6252GEN_SPE(speundef, evmwssf, 0x09, 0x11, 0x00000000, PPC_SPE);
6253GEN_SPE(evmwumi, evmwsmi, 0x0C, 0x11, 0x00000000, PPC_SPE);
6254GEN_SPE(speundef, evmwsmf, 0x0D, 0x11, 0x00000000, PPC_SPE);
6255GEN_SPE(speundef, evmwhssfa, 0x13, 0x11, 0x00000000, PPC_SPE);
6256GEN_SPE(evmwlumia, speundef, 0x14, 0x11, 0x00000000, PPC_SPE);
6257GEN_SPE(evmwhumia, evmwhsmia, 0x16, 0x11, 0x00000000, PPC_SPE);
6258GEN_SPE(speundef, evmwhsmfa, 0x17, 0x11, 0x00000000, PPC_SPE);
6259GEN_SPE(speundef, evmwssfa, 0x19, 0x11, 0x00000000, PPC_SPE);
6260GEN_SPE(evmwumia, evmwsmia, 0x1C, 0x11, 0x00000000, PPC_SPE);
6261GEN_SPE(speundef, evmwsmfa, 0x1D, 0x11, 0x00000000, PPC_SPE);
6262
6263GEN_SPE(evadduiaaw, evaddsiaaw, 0x00, 0x13, 0x0000F800, PPC_SPE);
6264GEN_SPE(evsubfusiaaw, evsubfssiaaw, 0x01, 0x13, 0x0000F800, PPC_SPE);
6265GEN_SPE(evaddumiaaw, evaddsmiaaw, 0x04, 0x13, 0x0000F800, PPC_SPE);
6266GEN_SPE(evsubfumiaaw, evsubfsmiaaw, 0x05, 0x13, 0x0000F800, PPC_SPE);
6267GEN_SPE(evdivws, evdivwu, 0x06, 0x13, 0x00000000, PPC_SPE);
6268GEN_SPE(evmra, speundef, 0x07, 0x13, 0x0000F800, PPC_SPE);
6269
6270GEN_SPE(evmheusiaaw, evmhessiaaw, 0x00, 0x14, 0x00000000, PPC_SPE);
6271GEN_SPE(speundef, evmhessfaaw, 0x01, 0x14, 0x00000000, PPC_SPE);
6272GEN_SPE(evmhousiaaw, evmhossiaaw, 0x02, 0x14, 0x00000000, PPC_SPE);
6273GEN_SPE(speundef, evmhossfaaw, 0x03, 0x14, 0x00000000, PPC_SPE);
6274GEN_SPE(evmheumiaaw, evmhesmiaaw, 0x04, 0x14, 0x00000000, PPC_SPE);
6275GEN_SPE(speundef, evmhesmfaaw, 0x05, 0x14, 0x00000000, PPC_SPE);
6276GEN_SPE(evmhoumiaaw, evmhosmiaaw, 0x06, 0x14, 0x00000000, PPC_SPE);
6277GEN_SPE(speundef, evmhosmfaaw, 0x07, 0x14, 0x00000000, PPC_SPE);
6278GEN_SPE(evmhegumiaa, evmhegsmiaa, 0x14, 0x14, 0x00000000, PPC_SPE);
6279GEN_SPE(speundef, evmhegsmfaa, 0x15, 0x14, 0x00000000, PPC_SPE);
6280GEN_SPE(evmhogumiaa, evmhogsmiaa, 0x16, 0x14, 0x00000000, PPC_SPE);
6281GEN_SPE(speundef, evmhogsmfaa, 0x17, 0x14, 0x00000000, PPC_SPE);
6282
6283GEN_SPE(evmwlusiaaw, evmwlssiaaw, 0x00, 0x15, 0x00000000, PPC_SPE);
6284GEN_SPE(evmwlumiaaw, evmwlsmiaaw, 0x04, 0x15, 0x00000000, PPC_SPE);
6285GEN_SPE(speundef, evmwssfaa, 0x09, 0x15, 0x00000000, PPC_SPE);
6286GEN_SPE(evmwumiaa, evmwsmiaa, 0x0C, 0x15, 0x00000000, PPC_SPE);
6287GEN_SPE(speundef, evmwsmfaa, 0x0D, 0x15, 0x00000000, PPC_SPE);
6288
6289GEN_SPE(evmheusianw, evmhessianw, 0x00, 0x16, 0x00000000, PPC_SPE);
6290GEN_SPE(speundef, evmhessfanw, 0x01, 0x16, 0x00000000, PPC_SPE);
6291GEN_SPE(evmhousianw, evmhossianw, 0x02, 0x16, 0x00000000, PPC_SPE);
6292GEN_SPE(speundef, evmhossfanw, 0x03, 0x16, 0x00000000, PPC_SPE);
6293GEN_SPE(evmheumianw, evmhesmianw, 0x04, 0x16, 0x00000000, PPC_SPE);
6294GEN_SPE(speundef, evmhesmfanw, 0x05, 0x16, 0x00000000, PPC_SPE);
6295GEN_SPE(evmhoumianw, evmhosmianw, 0x06, 0x16, 0x00000000, PPC_SPE);
6296GEN_SPE(speundef, evmhosmfanw, 0x07, 0x16, 0x00000000, PPC_SPE);
6297GEN_SPE(evmhegumian, evmhegsmian, 0x14, 0x16, 0x00000000, PPC_SPE);
6298GEN_SPE(speundef, evmhegsmfan, 0x15, 0x16, 0x00000000, PPC_SPE);
6299GEN_SPE(evmhigumian, evmhigsmian, 0x16, 0x16, 0x00000000, PPC_SPE);
6300GEN_SPE(speundef, evmhogsmfan, 0x17, 0x16, 0x00000000, PPC_SPE);
6301
6302GEN_SPE(evmwlusianw, evmwlssianw, 0x00, 0x17, 0x00000000, PPC_SPE);
6303GEN_SPE(evmwlumianw, evmwlsmianw, 0x04, 0x17, 0x00000000, PPC_SPE);
6304GEN_SPE(speundef, evmwssfan, 0x09, 0x17, 0x00000000, PPC_SPE);
6305GEN_SPE(evmwumian, evmwsmian, 0x0C, 0x17, 0x00000000, PPC_SPE);
6306GEN_SPE(speundef, evmwsmfan, 0x0D, 0x17, 0x00000000, PPC_SPE);
6307#endif
6308
6309/*** SPE floating-point extension ***/
6310#define GEN_SPEFPUOP_CONV(name) \
b068d6a7 6311static always_inline void gen_##name (DisasContext *ctx) \
0487d6a8 6312{ \
f78fb44e 6313 gen_load_gpr64(cpu_T64[0], rB(ctx->opcode)); \
0487d6a8 6314 gen_op_##name(); \
f78fb44e 6315 gen_store_gpr64(rD(ctx->opcode), cpu_T64[0]); \
0487d6a8
JM
6316}
6317
6318/* Single precision floating-point vectors operations */
6319/* Arithmetic */
6320GEN_SPEOP_ARITH2(evfsadd);
6321GEN_SPEOP_ARITH2(evfssub);
6322GEN_SPEOP_ARITH2(evfsmul);
6323GEN_SPEOP_ARITH2(evfsdiv);
6324GEN_SPEOP_ARITH1(evfsabs);
6325GEN_SPEOP_ARITH1(evfsnabs);
6326GEN_SPEOP_ARITH1(evfsneg);
6327/* Conversion */
6328GEN_SPEFPUOP_CONV(evfscfui);
6329GEN_SPEFPUOP_CONV(evfscfsi);
6330GEN_SPEFPUOP_CONV(evfscfuf);
6331GEN_SPEFPUOP_CONV(evfscfsf);
6332GEN_SPEFPUOP_CONV(evfsctui);
6333GEN_SPEFPUOP_CONV(evfsctsi);
6334GEN_SPEFPUOP_CONV(evfsctuf);
6335GEN_SPEFPUOP_CONV(evfsctsf);
6336GEN_SPEFPUOP_CONV(evfsctuiz);
6337GEN_SPEFPUOP_CONV(evfsctsiz);
6338/* Comparison */
6339GEN_SPEOP_COMP(evfscmpgt);
6340GEN_SPEOP_COMP(evfscmplt);
6341GEN_SPEOP_COMP(evfscmpeq);
6342GEN_SPEOP_COMP(evfststgt);
6343GEN_SPEOP_COMP(evfststlt);
6344GEN_SPEOP_COMP(evfststeq);
6345
6346/* Opcodes definitions */
6347GEN_SPE(evfsadd, evfssub, 0x00, 0x0A, 0x00000000, PPC_SPEFPU); //
6348GEN_SPE(evfsabs, evfsnabs, 0x02, 0x0A, 0x0000F800, PPC_SPEFPU); //
6349GEN_SPE(evfsneg, speundef, 0x03, 0x0A, 0x0000F800, PPC_SPEFPU); //
6350GEN_SPE(evfsmul, evfsdiv, 0x04, 0x0A, 0x00000000, PPC_SPEFPU); //
6351GEN_SPE(evfscmpgt, evfscmplt, 0x06, 0x0A, 0x00600000, PPC_SPEFPU); //
6352GEN_SPE(evfscmpeq, speundef, 0x07, 0x0A, 0x00600000, PPC_SPEFPU); //
6353GEN_SPE(evfscfui, evfscfsi, 0x08, 0x0A, 0x00180000, PPC_SPEFPU); //
6354GEN_SPE(evfscfuf, evfscfsf, 0x09, 0x0A, 0x00180000, PPC_SPEFPU); //
6355GEN_SPE(evfsctui, evfsctsi, 0x0A, 0x0A, 0x00180000, PPC_SPEFPU); //
6356GEN_SPE(evfsctuf, evfsctsf, 0x0B, 0x0A, 0x00180000, PPC_SPEFPU); //
6357GEN_SPE(evfsctuiz, speundef, 0x0C, 0x0A, 0x00180000, PPC_SPEFPU); //
6358GEN_SPE(evfsctsiz, speundef, 0x0D, 0x0A, 0x00180000, PPC_SPEFPU); //
6359GEN_SPE(evfststgt, evfststlt, 0x0E, 0x0A, 0x00600000, PPC_SPEFPU); //
6360GEN_SPE(evfststeq, speundef, 0x0F, 0x0A, 0x00600000, PPC_SPEFPU); //
6361
6362/* Single precision floating-point operations */
6363/* Arithmetic */
6364GEN_SPEOP_ARITH2(efsadd);
6365GEN_SPEOP_ARITH2(efssub);
6366GEN_SPEOP_ARITH2(efsmul);
6367GEN_SPEOP_ARITH2(efsdiv);
6368GEN_SPEOP_ARITH1(efsabs);
6369GEN_SPEOP_ARITH1(efsnabs);
6370GEN_SPEOP_ARITH1(efsneg);
6371/* Conversion */
6372GEN_SPEFPUOP_CONV(efscfui);
6373GEN_SPEFPUOP_CONV(efscfsi);
6374GEN_SPEFPUOP_CONV(efscfuf);
6375GEN_SPEFPUOP_CONV(efscfsf);
6376GEN_SPEFPUOP_CONV(efsctui);
6377GEN_SPEFPUOP_CONV(efsctsi);
6378GEN_SPEFPUOP_CONV(efsctuf);
6379GEN_SPEFPUOP_CONV(efsctsf);
6380GEN_SPEFPUOP_CONV(efsctuiz);
6381GEN_SPEFPUOP_CONV(efsctsiz);
6382GEN_SPEFPUOP_CONV(efscfd);
6383/* Comparison */
6384GEN_SPEOP_COMP(efscmpgt);
6385GEN_SPEOP_COMP(efscmplt);
6386GEN_SPEOP_COMP(efscmpeq);
6387GEN_SPEOP_COMP(efststgt);
6388GEN_SPEOP_COMP(efststlt);
6389GEN_SPEOP_COMP(efststeq);
6390
6391/* Opcodes definitions */
05332d70 6392GEN_SPE(efsadd, efssub, 0x00, 0x0B, 0x00000000, PPC_SPEFPU); //
0487d6a8
JM
6393GEN_SPE(efsabs, efsnabs, 0x02, 0x0B, 0x0000F800, PPC_SPEFPU); //
6394GEN_SPE(efsneg, speundef, 0x03, 0x0B, 0x0000F800, PPC_SPEFPU); //
6395GEN_SPE(efsmul, efsdiv, 0x04, 0x0B, 0x00000000, PPC_SPEFPU); //
6396GEN_SPE(efscmpgt, efscmplt, 0x06, 0x0B, 0x00600000, PPC_SPEFPU); //
6397GEN_SPE(efscmpeq, efscfd, 0x07, 0x0B, 0x00600000, PPC_SPEFPU); //
6398GEN_SPE(efscfui, efscfsi, 0x08, 0x0B, 0x00180000, PPC_SPEFPU); //
6399GEN_SPE(efscfuf, efscfsf, 0x09, 0x0B, 0x00180000, PPC_SPEFPU); //
6400GEN_SPE(efsctui, efsctsi, 0x0A, 0x0B, 0x00180000, PPC_SPEFPU); //
6401GEN_SPE(efsctuf, efsctsf, 0x0B, 0x0B, 0x00180000, PPC_SPEFPU); //
9ceb2a77
TS
6402GEN_SPE(efsctuiz, speundef, 0x0C, 0x0B, 0x00180000, PPC_SPEFPU); //
6403GEN_SPE(efsctsiz, speundef, 0x0D, 0x0B, 0x00180000, PPC_SPEFPU); //
0487d6a8
JM
6404GEN_SPE(efststgt, efststlt, 0x0E, 0x0B, 0x00600000, PPC_SPEFPU); //
6405GEN_SPE(efststeq, speundef, 0x0F, 0x0B, 0x00600000, PPC_SPEFPU); //
6406
6407/* Double precision floating-point operations */
6408/* Arithmetic */
6409GEN_SPEOP_ARITH2(efdadd);
6410GEN_SPEOP_ARITH2(efdsub);
6411GEN_SPEOP_ARITH2(efdmul);
6412GEN_SPEOP_ARITH2(efddiv);
6413GEN_SPEOP_ARITH1(efdabs);
6414GEN_SPEOP_ARITH1(efdnabs);
6415GEN_SPEOP_ARITH1(efdneg);
6416/* Conversion */
6417
6418GEN_SPEFPUOP_CONV(efdcfui);
6419GEN_SPEFPUOP_CONV(efdcfsi);
6420GEN_SPEFPUOP_CONV(efdcfuf);
6421GEN_SPEFPUOP_CONV(efdcfsf);
6422GEN_SPEFPUOP_CONV(efdctui);
6423GEN_SPEFPUOP_CONV(efdctsi);
6424GEN_SPEFPUOP_CONV(efdctuf);
6425GEN_SPEFPUOP_CONV(efdctsf);
6426GEN_SPEFPUOP_CONV(efdctuiz);
6427GEN_SPEFPUOP_CONV(efdctsiz);
6428GEN_SPEFPUOP_CONV(efdcfs);
6429GEN_SPEFPUOP_CONV(efdcfuid);
6430GEN_SPEFPUOP_CONV(efdcfsid);
6431GEN_SPEFPUOP_CONV(efdctuidz);
6432GEN_SPEFPUOP_CONV(efdctsidz);
6433/* Comparison */
6434GEN_SPEOP_COMP(efdcmpgt);
6435GEN_SPEOP_COMP(efdcmplt);
6436GEN_SPEOP_COMP(efdcmpeq);
6437GEN_SPEOP_COMP(efdtstgt);
6438GEN_SPEOP_COMP(efdtstlt);
6439GEN_SPEOP_COMP(efdtsteq);
6440
6441/* Opcodes definitions */
6442GEN_SPE(efdadd, efdsub, 0x10, 0x0B, 0x00000000, PPC_SPEFPU); //
6443GEN_SPE(efdcfuid, efdcfsid, 0x11, 0x0B, 0x00180000, PPC_SPEFPU); //
6444GEN_SPE(efdabs, efdnabs, 0x12, 0x0B, 0x0000F800, PPC_SPEFPU); //
6445GEN_SPE(efdneg, speundef, 0x13, 0x0B, 0x0000F800, PPC_SPEFPU); //
6446GEN_SPE(efdmul, efddiv, 0x14, 0x0B, 0x00000000, PPC_SPEFPU); //
6447GEN_SPE(efdctuidz, efdctsidz, 0x15, 0x0B, 0x00180000, PPC_SPEFPU); //
6448GEN_SPE(efdcmpgt, efdcmplt, 0x16, 0x0B, 0x00600000, PPC_SPEFPU); //
6449GEN_SPE(efdcmpeq, efdcfs, 0x17, 0x0B, 0x00600000, PPC_SPEFPU); //
6450GEN_SPE(efdcfui, efdcfsi, 0x18, 0x0B, 0x00180000, PPC_SPEFPU); //
6451GEN_SPE(efdcfuf, efdcfsf, 0x19, 0x0B, 0x00180000, PPC_SPEFPU); //
6452GEN_SPE(efdctui, efdctsi, 0x1A, 0x0B, 0x00180000, PPC_SPEFPU); //
6453GEN_SPE(efdctuf, efdctsf, 0x1B, 0x0B, 0x00180000, PPC_SPEFPU); //
6454GEN_SPE(efdctuiz, speundef, 0x1C, 0x0B, 0x00180000, PPC_SPEFPU); //
6455GEN_SPE(efdctsiz, speundef, 0x1D, 0x0B, 0x00180000, PPC_SPEFPU); //
6456GEN_SPE(efdtstgt, efdtstlt, 0x1E, 0x0B, 0x00600000, PPC_SPEFPU); //
6457GEN_SPE(efdtsteq, speundef, 0x1F, 0x0B, 0x00600000, PPC_SPEFPU); //
0487d6a8 6458
79aceca5
FB
6459/* End opcode list */
6460GEN_OPCODE_MARK(end);
6461
3fc6c082 6462#include "translate_init.c"
0411a972 6463#include "helper_regs.h"
79aceca5 6464
9a64fbe4 6465/*****************************************************************************/
3fc6c082 6466/* Misc PowerPC helpers */
36081602
JM
6467void cpu_dump_state (CPUState *env, FILE *f,
6468 int (*cpu_fprintf)(FILE *f, const char *fmt, ...),
6469 int flags)
79aceca5 6470{
3fc6c082
FB
6471#define RGPL 4
6472#define RFPL 4
3fc6c082 6473
79aceca5
FB
6474 int i;
6475
077fc206 6476 cpu_fprintf(f, "NIP " ADDRX " LR " ADDRX " CTR " ADDRX " XER %08x\n",
3d7b417e 6477 env->nip, env->lr, env->ctr, env->xer);
6b542af7
JM
6478 cpu_fprintf(f, "MSR " ADDRX " HID0 " ADDRX " HF " ADDRX " idx %d\n",
6479 env->msr, env->spr[SPR_HID0], env->hflags, env->mmu_idx);
d9bce9d9 6480#if !defined(NO_TIMER_DUMP)
077fc206 6481 cpu_fprintf(f, "TB %08x %08x "
76a66253
JM
6482#if !defined(CONFIG_USER_ONLY)
6483 "DECR %08x"
6484#endif
6485 "\n",
077fc206 6486 cpu_ppc_load_tbu(env), cpu_ppc_load_tbl(env)
76a66253
JM
6487#if !defined(CONFIG_USER_ONLY)
6488 , cpu_ppc_load_decr(env)
6489#endif
6490 );
077fc206 6491#endif
76a66253 6492 for (i = 0; i < 32; i++) {
3fc6c082
FB
6493 if ((i & (RGPL - 1)) == 0)
6494 cpu_fprintf(f, "GPR%02d", i);
6b542af7 6495 cpu_fprintf(f, " " REGX, ppc_dump_gpr(env, i));
3fc6c082 6496 if ((i & (RGPL - 1)) == (RGPL - 1))
7fe48483 6497 cpu_fprintf(f, "\n");
76a66253 6498 }
3fc6c082 6499 cpu_fprintf(f, "CR ");
76a66253 6500 for (i = 0; i < 8; i++)
7fe48483
FB
6501 cpu_fprintf(f, "%01x", env->crf[i]);
6502 cpu_fprintf(f, " [");
76a66253
JM
6503 for (i = 0; i < 8; i++) {
6504 char a = '-';
6505 if (env->crf[i] & 0x08)
6506 a = 'L';
6507 else if (env->crf[i] & 0x04)
6508 a = 'G';
6509 else if (env->crf[i] & 0x02)
6510 a = 'E';
7fe48483 6511 cpu_fprintf(f, " %c%c", a, env->crf[i] & 0x01 ? 'O' : ' ');
76a66253 6512 }
6b542af7 6513 cpu_fprintf(f, " ] RES " ADDRX "\n", env->reserve);
3fc6c082
FB
6514 for (i = 0; i < 32; i++) {
6515 if ((i & (RFPL - 1)) == 0)
6516 cpu_fprintf(f, "FPR%02d", i);
26a76461 6517 cpu_fprintf(f, " %016" PRIx64, *((uint64_t *)&env->fpr[i]));
3fc6c082 6518 if ((i & (RFPL - 1)) == (RFPL - 1))
7fe48483 6519 cpu_fprintf(f, "\n");
79aceca5 6520 }
f2e63a42 6521#if !defined(CONFIG_USER_ONLY)
6b542af7 6522 cpu_fprintf(f, "SRR0 " ADDRX " SRR1 " ADDRX " SDR1 " ADDRX "\n",
3fc6c082 6523 env->spr[SPR_SRR0], env->spr[SPR_SRR1], env->sdr1);
f2e63a42 6524#endif
79aceca5 6525
3fc6c082
FB
6526#undef RGPL
6527#undef RFPL
79aceca5
FB
6528}
6529
76a66253
JM
6530void cpu_dump_statistics (CPUState *env, FILE*f,
6531 int (*cpu_fprintf)(FILE *f, const char *fmt, ...),
6532 int flags)
6533{
6534#if defined(DO_PPC_STATISTICS)
6535 opc_handler_t **t1, **t2, **t3, *handler;
6536 int op1, op2, op3;
6537
6538 t1 = env->opcodes;
6539 for (op1 = 0; op1 < 64; op1++) {
6540 handler = t1[op1];
6541 if (is_indirect_opcode(handler)) {
6542 t2 = ind_table(handler);
6543 for (op2 = 0; op2 < 32; op2++) {
6544 handler = t2[op2];
6545 if (is_indirect_opcode(handler)) {
6546 t3 = ind_table(handler);
6547 for (op3 = 0; op3 < 32; op3++) {
6548 handler = t3[op3];
6549 if (handler->count == 0)
6550 continue;
6551 cpu_fprintf(f, "%02x %02x %02x (%02x %04d) %16s: "
6552 "%016llx %lld\n",
6553 op1, op2, op3, op1, (op3 << 5) | op2,
6554 handler->oname,
6555 handler->count, handler->count);
6556 }
6557 } else {
6558 if (handler->count == 0)
6559 continue;
6560 cpu_fprintf(f, "%02x %02x (%02x %04d) %16s: "
6561 "%016llx %lld\n",
6562 op1, op2, op1, op2, handler->oname,
6563 handler->count, handler->count);
6564 }
6565 }
6566 } else {
6567 if (handler->count == 0)
6568 continue;
6569 cpu_fprintf(f, "%02x (%02x ) %16s: %016llx %lld\n",
6570 op1, op1, handler->oname,
6571 handler->count, handler->count);
6572 }
6573 }
6574#endif
6575}
6576
9a64fbe4 6577/*****************************************************************************/
2cfc5f17
TS
6578static always_inline void gen_intermediate_code_internal (CPUState *env,
6579 TranslationBlock *tb,
6580 int search_pc)
79aceca5 6581{
9fddaa0c 6582 DisasContext ctx, *ctxp = &ctx;
79aceca5 6583 opc_handler_t **table, *handler;
0fa85d43 6584 target_ulong pc_start;
79aceca5 6585 uint16_t *gen_opc_end;
056401ea 6586 int supervisor, little_endian;
79aceca5 6587 int j, lj = -1;
2e70f6ef
PB
6588 int num_insns;
6589 int max_insns;
79aceca5
FB
6590
6591 pc_start = tb->pc;
79aceca5 6592 gen_opc_end = gen_opc_buf + OPC_MAX_SIZE;
7c58044c
JM
6593#if defined(OPTIMIZE_FPRF_UPDATE)
6594 gen_fprf_ptr = gen_fprf_buf;
6595#endif
046d6672 6596 ctx.nip = pc_start;
79aceca5 6597 ctx.tb = tb;
e1833e1f 6598 ctx.exception = POWERPC_EXCP_NONE;
3fc6c082 6599 ctx.spr_cb = env->spr_cb;
6ebbf390
JM
6600 supervisor = env->mmu_idx;
6601#if !defined(CONFIG_USER_ONLY)
2857068e 6602 ctx.supervisor = supervisor;
d9bce9d9 6603#endif
056401ea 6604 little_endian = env->hflags & (1 << MSR_LE) ? 1 : 0;
d9bce9d9
JM
6605#if defined(TARGET_PPC64)
6606 ctx.sf_mode = msr_sf;
056401ea 6607 ctx.mem_idx = (supervisor << 2) | (msr_sf << 1) | little_endian;
2857068e 6608#else
056401ea 6609 ctx.mem_idx = (supervisor << 1) | little_endian;
9a64fbe4 6610#endif
d63001d1 6611 ctx.dcache_line_size = env->dcache_line_size;
3cc62370 6612 ctx.fpu_enabled = msr_fp;
a9d9eb8f 6613 if ((env->flags & POWERPC_FLAG_SPE) && msr_spe)
d26bfc9a
JM
6614 ctx.spe_enabled = msr_spe;
6615 else
6616 ctx.spe_enabled = 0;
a9d9eb8f
JM
6617 if ((env->flags & POWERPC_FLAG_VRE) && msr_vr)
6618 ctx.altivec_enabled = msr_vr;
6619 else
6620 ctx.altivec_enabled = 0;
d26bfc9a 6621 if ((env->flags & POWERPC_FLAG_SE) && msr_se)
8cbcb4fa 6622 ctx.singlestep_enabled = CPU_SINGLE_STEP;
d26bfc9a 6623 else
8cbcb4fa 6624 ctx.singlestep_enabled = 0;
d26bfc9a 6625 if ((env->flags & POWERPC_FLAG_BE) && msr_be)
8cbcb4fa
AJ
6626 ctx.singlestep_enabled |= CPU_BRANCH_STEP;
6627 if (unlikely(env->singlestep_enabled))
6628 ctx.singlestep_enabled |= GDBSTUB_SINGLE_STEP;
3fc6c082 6629#if defined (DO_SINGLE_STEP) && 0
9a64fbe4
FB
6630 /* Single step trace mode */
6631 msr_se = 1;
6632#endif
2e70f6ef
PB
6633 num_insns = 0;
6634 max_insns = tb->cflags & CF_COUNT_MASK;
6635 if (max_insns == 0)
6636 max_insns = CF_COUNT_MASK;
6637
6638 gen_icount_start();
9a64fbe4 6639 /* Set env in case of segfault during code fetch */
e1833e1f 6640 while (ctx.exception == POWERPC_EXCP_NONE && gen_opc_ptr < gen_opc_end) {
76a66253
JM
6641 if (unlikely(env->nb_breakpoints > 0)) {
6642 for (j = 0; j < env->nb_breakpoints; j++) {
ea4e754f 6643 if (env->breakpoints[j] == ctx.nip) {
5fafdf24 6644 gen_update_nip(&ctx, ctx.nip);
ea4e754f
FB
6645 gen_op_debug();
6646 break;
6647 }
6648 }
6649 }
76a66253 6650 if (unlikely(search_pc)) {
79aceca5
FB
6651 j = gen_opc_ptr - gen_opc_buf;
6652 if (lj < j) {
6653 lj++;
6654 while (lj < j)
6655 gen_opc_instr_start[lj++] = 0;
046d6672 6656 gen_opc_pc[lj] = ctx.nip;
79aceca5 6657 gen_opc_instr_start[lj] = 1;
2e70f6ef 6658 gen_opc_icount[lj] = num_insns;
79aceca5
FB
6659 }
6660 }
9fddaa0c
FB
6661#if defined PPC_DEBUG_DISAS
6662 if (loglevel & CPU_LOG_TB_IN_ASM) {
79aceca5 6663 fprintf(logfile, "----------------\n");
1b9eb036 6664 fprintf(logfile, "nip=" ADDRX " super=%d ir=%d\n",
0411a972 6665 ctx.nip, supervisor, (int)msr_ir);
9a64fbe4
FB
6666 }
6667#endif
2e70f6ef
PB
6668 if (num_insns + 1 == max_insns && (tb->cflags & CF_LAST_IO))
6669 gen_io_start();
056401ea
JM
6670 if (unlikely(little_endian)) {
6671 ctx.opcode = bswap32(ldl_code(ctx.nip));
6672 } else {
6673 ctx.opcode = ldl_code(ctx.nip);
111bfab3 6674 }
9fddaa0c
FB
6675#if defined PPC_DEBUG_DISAS
6676 if (loglevel & CPU_LOG_TB_IN_ASM) {
111bfab3 6677 fprintf(logfile, "translate opcode %08x (%02x %02x %02x) (%s)\n",
9a64fbe4 6678 ctx.opcode, opc1(ctx.opcode), opc2(ctx.opcode),
056401ea 6679 opc3(ctx.opcode), little_endian ? "little" : "big");
79aceca5
FB
6680 }
6681#endif
046d6672 6682 ctx.nip += 4;
3fc6c082 6683 table = env->opcodes;
2e70f6ef 6684 num_insns++;
79aceca5
FB
6685 handler = table[opc1(ctx.opcode)];
6686 if (is_indirect_opcode(handler)) {
6687 table = ind_table(handler);
6688 handler = table[opc2(ctx.opcode)];
6689 if (is_indirect_opcode(handler)) {
6690 table = ind_table(handler);
6691 handler = table[opc3(ctx.opcode)];
6692 }
6693 }
6694 /* Is opcode *REALLY* valid ? */
76a66253 6695 if (unlikely(handler->handler == &gen_invalid)) {
4a057712 6696 if (loglevel != 0) {
76a66253 6697 fprintf(logfile, "invalid/unsupported opcode: "
6b542af7 6698 "%02x - %02x - %02x (%08x) " ADDRX " %d\n",
76a66253 6699 opc1(ctx.opcode), opc2(ctx.opcode),
0411a972 6700 opc3(ctx.opcode), ctx.opcode, ctx.nip - 4, (int)msr_ir);
4b3686fa
FB
6701 } else {
6702 printf("invalid/unsupported opcode: "
6b542af7 6703 "%02x - %02x - %02x (%08x) " ADDRX " %d\n",
4b3686fa 6704 opc1(ctx.opcode), opc2(ctx.opcode),
0411a972 6705 opc3(ctx.opcode), ctx.opcode, ctx.nip - 4, (int)msr_ir);
4b3686fa 6706 }
76a66253
JM
6707 } else {
6708 if (unlikely((ctx.opcode & handler->inval) != 0)) {
4a057712 6709 if (loglevel != 0) {
79aceca5 6710 fprintf(logfile, "invalid bits: %08x for opcode: "
6b542af7 6711 "%02x - %02x - %02x (%08x) " ADDRX "\n",
79aceca5
FB
6712 ctx.opcode & handler->inval, opc1(ctx.opcode),
6713 opc2(ctx.opcode), opc3(ctx.opcode),
046d6672 6714 ctx.opcode, ctx.nip - 4);
9a64fbe4
FB
6715 } else {
6716 printf("invalid bits: %08x for opcode: "
6b542af7 6717 "%02x - %02x - %02x (%08x) " ADDRX "\n",
76a66253
JM
6718 ctx.opcode & handler->inval, opc1(ctx.opcode),
6719 opc2(ctx.opcode), opc3(ctx.opcode),
046d6672 6720 ctx.opcode, ctx.nip - 4);
76a66253 6721 }
e1833e1f 6722 GEN_EXCP_INVAL(ctxp);
4b3686fa 6723 break;
79aceca5 6724 }
79aceca5 6725 }
4b3686fa 6726 (*(handler->handler))(&ctx);
76a66253
JM
6727#if defined(DO_PPC_STATISTICS)
6728 handler->count++;
6729#endif
9a64fbe4 6730 /* Check trace mode exceptions */
8cbcb4fa
AJ
6731 if (unlikely(ctx.singlestep_enabled & CPU_SINGLE_STEP &&
6732 (ctx.nip <= 0x100 || ctx.nip > 0xF00) &&
6733 ctx.exception != POWERPC_SYSCALL &&
6734 ctx.exception != POWERPC_EXCP_TRAP &&
6735 ctx.exception != POWERPC_EXCP_BRANCH)) {
e1833e1f 6736 GEN_EXCP(ctxp, POWERPC_EXCP_TRACE, 0);
d26bfc9a 6737 } else if (unlikely(((ctx.nip & (TARGET_PAGE_SIZE - 1)) == 0) ||
2e70f6ef
PB
6738 (env->singlestep_enabled) ||
6739 num_insns >= max_insns)) {
d26bfc9a
JM
6740 /* if we reach a page boundary or are single stepping, stop
6741 * generation
6742 */
8dd4983c 6743 break;
76a66253 6744 }
3fc6c082
FB
6745#if defined (DO_SINGLE_STEP)
6746 break;
6747#endif
6748 }
2e70f6ef
PB
6749 if (tb->cflags & CF_LAST_IO)
6750 gen_io_end();
e1833e1f 6751 if (ctx.exception == POWERPC_EXCP_NONE) {
c1942362 6752 gen_goto_tb(&ctx, 0, ctx.nip);
e1833e1f 6753 } else if (ctx.exception != POWERPC_EXCP_BRANCH) {
8cbcb4fa
AJ
6754 if (unlikely(env->singlestep_enabled)) {
6755 gen_update_nip(&ctx, ctx.nip);
6756 gen_op_debug();
6757 }
76a66253 6758 /* Generate the return instruction */
57fec1fe 6759 tcg_gen_exit_tb(0);
9a64fbe4 6760 }
2e70f6ef 6761 gen_icount_end(tb, num_insns);
79aceca5 6762 *gen_opc_ptr = INDEX_op_end;
76a66253 6763 if (unlikely(search_pc)) {
9a64fbe4
FB
6764 j = gen_opc_ptr - gen_opc_buf;
6765 lj++;
6766 while (lj <= j)
6767 gen_opc_instr_start[lj++] = 0;
9a64fbe4 6768 } else {
046d6672 6769 tb->size = ctx.nip - pc_start;
2e70f6ef 6770 tb->icount = num_insns;
9a64fbe4 6771 }
d9bce9d9 6772#if defined(DEBUG_DISAS)
9fddaa0c 6773 if (loglevel & CPU_LOG_TB_CPU) {
9a64fbe4 6774 fprintf(logfile, "---------------- excp: %04x\n", ctx.exception);
7fe48483 6775 cpu_dump_state(env, logfile, fprintf, 0);
9fddaa0c
FB
6776 }
6777 if (loglevel & CPU_LOG_TB_IN_ASM) {
76a66253 6778 int flags;
237c0af0 6779 flags = env->bfd_mach;
056401ea 6780 flags |= little_endian << 16;
0fa85d43 6781 fprintf(logfile, "IN: %s\n", lookup_symbol(pc_start));
76a66253 6782 target_disas(logfile, pc_start, ctx.nip - pc_start, flags);
79aceca5 6783 fprintf(logfile, "\n");
9fddaa0c 6784 }
79aceca5 6785#endif
79aceca5
FB
6786}
6787
2cfc5f17 6788void gen_intermediate_code (CPUState *env, struct TranslationBlock *tb)
79aceca5 6789{
2cfc5f17 6790 gen_intermediate_code_internal(env, tb, 0);
79aceca5
FB
6791}
6792
2cfc5f17 6793void gen_intermediate_code_pc (CPUState *env, struct TranslationBlock *tb)
79aceca5 6794{
2cfc5f17 6795 gen_intermediate_code_internal(env, tb, 1);
79aceca5 6796}
d2856f1a
AJ
6797
6798void gen_pc_load(CPUState *env, TranslationBlock *tb,
6799 unsigned long searched_pc, int pc_pos, void *puc)
6800{
6801 int type, c;
6802 /* for PPC, we need to look at the micro operation to get the
6803 * access type */
6804 env->nip = gen_opc_pc[pc_pos];
6805 c = gen_opc_buf[pc_pos];
6806 switch(c) {
6807#if defined(CONFIG_USER_ONLY)
6808#define CASE3(op)\
6809 case INDEX_op_ ## op ## _raw
6810#else
6811#define CASE3(op)\
6812 case INDEX_op_ ## op ## _user:\
6813 case INDEX_op_ ## op ## _kernel:\
6814 case INDEX_op_ ## op ## _hypv
6815#endif
6816
6817 CASE3(stfd):
6818 CASE3(stfs):
6819 CASE3(lfd):
6820 CASE3(lfs):
6821 type = ACCESS_FLOAT;
6822 break;
6823 CASE3(lwarx):
6824 type = ACCESS_RES;
6825 break;
6826 CASE3(stwcx):
6827 type = ACCESS_RES;
6828 break;
6829 CASE3(eciwx):
6830 CASE3(ecowx):
6831 type = ACCESS_EXT;
6832 break;
6833 default:
6834 type = ACCESS_INT;
6835 break;
6836 }
6837 env->access_type = type;
6838}