Problem: Our file sys-queue.h is a copy of the BSD file, but there are some additions and it's not entirely compatible. Because of that, there have been conflicts with system headers on BSD systems. Some hacks have been introduced in the commits15cc923584
,f40d753718
,96555a96d7
and3990d09adf
but the fixes were fragile. Solution: Avoid the conflict entirely by renaming the functions and the file. Revert the previous hacks. Signed-off-by: Blue Swirl <blauwirbel@gmail.com>
4949 lines
188 KiB
C
4949 lines
188 KiB
C
/*
|
|
SPARC translation
|
|
|
|
Copyright (C) 2003 Thomas M. Ogrisegg <tom@fnord.at>
|
|
Copyright (C) 2003-2005 Fabrice Bellard
|
|
|
|
This library is free software; you can redistribute it and/or
|
|
modify it under the terms of the GNU Lesser General Public
|
|
License as published by the Free Software Foundation; either
|
|
version 2 of the License, or (at your option) any later version.
|
|
|
|
This library is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
Lesser General Public License for more details.
|
|
|
|
You should have received a copy of the GNU Lesser General Public
|
|
License along with this library; if not, see <http://www.gnu.org/licenses/>.
|
|
*/
|
|
|
|
#include <stdarg.h>
|
|
#include <stdlib.h>
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
#include <inttypes.h>
|
|
|
|
#include "cpu.h"
|
|
#include "exec-all.h"
|
|
#include "disas.h"
|
|
#include "helper.h"
|
|
#include "tcg-op.h"
|
|
|
|
#define GEN_HELPER 1
|
|
#include "helper.h"
|
|
|
|
#define DEBUG_DISAS
|
|
|
|
#define DYNAMIC_PC 1 /* dynamic pc value */
|
|
#define JUMP_PC 2 /* dynamic pc value which takes only two values
|
|
according to jump_pc[T2] */
|
|
|
|
/* global register indexes */
|
|
static TCGv_ptr cpu_env, cpu_regwptr;
|
|
static TCGv cpu_cc_src, cpu_cc_src2, cpu_cc_dst;
|
|
static TCGv_i32 cpu_cc_op;
|
|
static TCGv_i32 cpu_psr;
|
|
static TCGv cpu_fsr, cpu_pc, cpu_npc, cpu_gregs[8];
|
|
static TCGv cpu_y;
|
|
#ifndef CONFIG_USER_ONLY
|
|
static TCGv cpu_tbr;
|
|
#endif
|
|
static TCGv cpu_cond, cpu_src1, cpu_src2, cpu_dst, cpu_addr, cpu_val;
|
|
#ifdef TARGET_SPARC64
|
|
static TCGv_i32 cpu_xcc, cpu_asi, cpu_fprs;
|
|
static TCGv cpu_gsr;
|
|
static TCGv cpu_tick_cmpr, cpu_stick_cmpr, cpu_hstick_cmpr;
|
|
static TCGv cpu_hintp, cpu_htba, cpu_hver, cpu_ssr, cpu_ver;
|
|
static TCGv_i32 cpu_softint;
|
|
#else
|
|
static TCGv cpu_wim;
|
|
#endif
|
|
/* local register indexes (only used inside old micro ops) */
|
|
static TCGv cpu_tmp0;
|
|
static TCGv_i32 cpu_tmp32;
|
|
static TCGv_i64 cpu_tmp64;
|
|
/* Floating point registers */
|
|
static TCGv_i32 cpu_fpr[TARGET_FPREGS];
|
|
|
|
#include "gen-icount.h"
|
|
|
|
typedef struct DisasContext {
|
|
target_ulong pc; /* current Program Counter: integer or DYNAMIC_PC */
|
|
target_ulong npc; /* next PC: integer or DYNAMIC_PC or JUMP_PC */
|
|
target_ulong jump_pc[2]; /* used when JUMP_PC pc value is used */
|
|
int is_br;
|
|
int mem_idx;
|
|
int fpu_enabled;
|
|
int address_mask_32bit;
|
|
uint32_t cc_op; /* current CC operation */
|
|
struct TranslationBlock *tb;
|
|
sparc_def_t *def;
|
|
} DisasContext;
|
|
|
|
// This function uses non-native bit order
|
|
#define GET_FIELD(X, FROM, TO) \
|
|
((X) >> (31 - (TO)) & ((1 << ((TO) - (FROM) + 1)) - 1))
|
|
|
|
// This function uses the order in the manuals, i.e. bit 0 is 2^0
|
|
#define GET_FIELD_SP(X, FROM, TO) \
|
|
GET_FIELD(X, 31 - (TO), 31 - (FROM))
|
|
|
|
#define GET_FIELDs(x,a,b) sign_extend (GET_FIELD(x,a,b), (b) - (a) + 1)
|
|
#define GET_FIELD_SPs(x,a,b) sign_extend (GET_FIELD_SP(x,a,b), ((b) - (a) + 1))
|
|
|
|
#ifdef TARGET_SPARC64
|
|
#define DFPREG(r) (((r & 1) << 5) | (r & 0x1e))
|
|
#define QFPREG(r) (((r & 1) << 5) | (r & 0x1c))
|
|
#else
|
|
#define DFPREG(r) (r & 0x1e)
|
|
#define QFPREG(r) (r & 0x1c)
|
|
#endif
|
|
|
|
#define UA2005_HTRAP_MASK 0xff
|
|
#define V8_TRAP_MASK 0x7f
|
|
|
|
static int sign_extend(int x, int len)
|
|
{
|
|
len = 32 - len;
|
|
return (x << len) >> len;
|
|
}
|
|
|
|
#define IS_IMM (insn & (1<<13))
|
|
|
|
/* floating point registers moves */
|
|
static void gen_op_load_fpr_DT0(unsigned int src)
|
|
{
|
|
tcg_gen_st_i32(cpu_fpr[src], cpu_env, offsetof(CPUSPARCState, dt0) +
|
|
offsetof(CPU_DoubleU, l.upper));
|
|
tcg_gen_st_i32(cpu_fpr[src + 1], cpu_env, offsetof(CPUSPARCState, dt0) +
|
|
offsetof(CPU_DoubleU, l.lower));
|
|
}
|
|
|
|
static void gen_op_load_fpr_DT1(unsigned int src)
|
|
{
|
|
tcg_gen_st_i32(cpu_fpr[src], cpu_env, offsetof(CPUSPARCState, dt1) +
|
|
offsetof(CPU_DoubleU, l.upper));
|
|
tcg_gen_st_i32(cpu_fpr[src + 1], cpu_env, offsetof(CPUSPARCState, dt1) +
|
|
offsetof(CPU_DoubleU, l.lower));
|
|
}
|
|
|
|
static void gen_op_store_DT0_fpr(unsigned int dst)
|
|
{
|
|
tcg_gen_ld_i32(cpu_fpr[dst], cpu_env, offsetof(CPUSPARCState, dt0) +
|
|
offsetof(CPU_DoubleU, l.upper));
|
|
tcg_gen_ld_i32(cpu_fpr[dst + 1], cpu_env, offsetof(CPUSPARCState, dt0) +
|
|
offsetof(CPU_DoubleU, l.lower));
|
|
}
|
|
|
|
static void gen_op_load_fpr_QT0(unsigned int src)
|
|
{
|
|
tcg_gen_st_i32(cpu_fpr[src], cpu_env, offsetof(CPUSPARCState, qt0) +
|
|
offsetof(CPU_QuadU, l.upmost));
|
|
tcg_gen_st_i32(cpu_fpr[src + 1], cpu_env, offsetof(CPUSPARCState, qt0) +
|
|
offsetof(CPU_QuadU, l.upper));
|
|
tcg_gen_st_i32(cpu_fpr[src + 2], cpu_env, offsetof(CPUSPARCState, qt0) +
|
|
offsetof(CPU_QuadU, l.lower));
|
|
tcg_gen_st_i32(cpu_fpr[src + 3], cpu_env, offsetof(CPUSPARCState, qt0) +
|
|
offsetof(CPU_QuadU, l.lowest));
|
|
}
|
|
|
|
static void gen_op_load_fpr_QT1(unsigned int src)
|
|
{
|
|
tcg_gen_st_i32(cpu_fpr[src], cpu_env, offsetof(CPUSPARCState, qt1) +
|
|
offsetof(CPU_QuadU, l.upmost));
|
|
tcg_gen_st_i32(cpu_fpr[src + 1], cpu_env, offsetof(CPUSPARCState, qt1) +
|
|
offsetof(CPU_QuadU, l.upper));
|
|
tcg_gen_st_i32(cpu_fpr[src + 2], cpu_env, offsetof(CPUSPARCState, qt1) +
|
|
offsetof(CPU_QuadU, l.lower));
|
|
tcg_gen_st_i32(cpu_fpr[src + 3], cpu_env, offsetof(CPUSPARCState, qt1) +
|
|
offsetof(CPU_QuadU, l.lowest));
|
|
}
|
|
|
|
static void gen_op_store_QT0_fpr(unsigned int dst)
|
|
{
|
|
tcg_gen_ld_i32(cpu_fpr[dst], cpu_env, offsetof(CPUSPARCState, qt0) +
|
|
offsetof(CPU_QuadU, l.upmost));
|
|
tcg_gen_ld_i32(cpu_fpr[dst + 1], cpu_env, offsetof(CPUSPARCState, qt0) +
|
|
offsetof(CPU_QuadU, l.upper));
|
|
tcg_gen_ld_i32(cpu_fpr[dst + 2], cpu_env, offsetof(CPUSPARCState, qt0) +
|
|
offsetof(CPU_QuadU, l.lower));
|
|
tcg_gen_ld_i32(cpu_fpr[dst + 3], cpu_env, offsetof(CPUSPARCState, qt0) +
|
|
offsetof(CPU_QuadU, l.lowest));
|
|
}
|
|
|
|
/* moves */
|
|
#ifdef CONFIG_USER_ONLY
|
|
#define supervisor(dc) 0
|
|
#ifdef TARGET_SPARC64
|
|
#define hypervisor(dc) 0
|
|
#endif
|
|
#else
|
|
#define supervisor(dc) (dc->mem_idx >= 1)
|
|
#ifdef TARGET_SPARC64
|
|
#define hypervisor(dc) (dc->mem_idx == 2)
|
|
#else
|
|
#endif
|
|
#endif
|
|
|
|
#ifdef TARGET_SPARC64
|
|
#ifndef TARGET_ABI32
|
|
#define AM_CHECK(dc) ((dc)->address_mask_32bit)
|
|
#else
|
|
#define AM_CHECK(dc) (1)
|
|
#endif
|
|
#endif
|
|
|
|
static inline void gen_address_mask(DisasContext *dc, TCGv addr)
|
|
{
|
|
#ifdef TARGET_SPARC64
|
|
if (AM_CHECK(dc))
|
|
tcg_gen_andi_tl(addr, addr, 0xffffffffULL);
|
|
#endif
|
|
}
|
|
|
|
static inline void gen_movl_reg_TN(int reg, TCGv tn)
|
|
{
|
|
if (reg == 0)
|
|
tcg_gen_movi_tl(tn, 0);
|
|
else if (reg < 8)
|
|
tcg_gen_mov_tl(tn, cpu_gregs[reg]);
|
|
else {
|
|
tcg_gen_ld_tl(tn, cpu_regwptr, (reg - 8) * sizeof(target_ulong));
|
|
}
|
|
}
|
|
|
|
static inline void gen_movl_TN_reg(int reg, TCGv tn)
|
|
{
|
|
if (reg == 0)
|
|
return;
|
|
else if (reg < 8)
|
|
tcg_gen_mov_tl(cpu_gregs[reg], tn);
|
|
else {
|
|
tcg_gen_st_tl(tn, cpu_regwptr, (reg - 8) * sizeof(target_ulong));
|
|
}
|
|
}
|
|
|
|
static inline void gen_goto_tb(DisasContext *s, int tb_num,
|
|
target_ulong pc, target_ulong npc)
|
|
{
|
|
TranslationBlock *tb;
|
|
|
|
tb = s->tb;
|
|
if ((pc & TARGET_PAGE_MASK) == (tb->pc & TARGET_PAGE_MASK) &&
|
|
(npc & TARGET_PAGE_MASK) == (tb->pc & TARGET_PAGE_MASK)) {
|
|
/* jump to same page: we can use a direct jump */
|
|
tcg_gen_goto_tb(tb_num);
|
|
tcg_gen_movi_tl(cpu_pc, pc);
|
|
tcg_gen_movi_tl(cpu_npc, npc);
|
|
tcg_gen_exit_tb((long)tb + tb_num);
|
|
} else {
|
|
/* jump to another page: currently not optimized */
|
|
tcg_gen_movi_tl(cpu_pc, pc);
|
|
tcg_gen_movi_tl(cpu_npc, npc);
|
|
tcg_gen_exit_tb(0);
|
|
}
|
|
}
|
|
|
|
// XXX suboptimal
|
|
static inline void gen_mov_reg_N(TCGv reg, TCGv_i32 src)
|
|
{
|
|
tcg_gen_extu_i32_tl(reg, src);
|
|
tcg_gen_shri_tl(reg, reg, PSR_NEG_SHIFT);
|
|
tcg_gen_andi_tl(reg, reg, 0x1);
|
|
}
|
|
|
|
static inline void gen_mov_reg_Z(TCGv reg, TCGv_i32 src)
|
|
{
|
|
tcg_gen_extu_i32_tl(reg, src);
|
|
tcg_gen_shri_tl(reg, reg, PSR_ZERO_SHIFT);
|
|
tcg_gen_andi_tl(reg, reg, 0x1);
|
|
}
|
|
|
|
static inline void gen_mov_reg_V(TCGv reg, TCGv_i32 src)
|
|
{
|
|
tcg_gen_extu_i32_tl(reg, src);
|
|
tcg_gen_shri_tl(reg, reg, PSR_OVF_SHIFT);
|
|
tcg_gen_andi_tl(reg, reg, 0x1);
|
|
}
|
|
|
|
static inline void gen_mov_reg_C(TCGv reg, TCGv_i32 src)
|
|
{
|
|
tcg_gen_extu_i32_tl(reg, src);
|
|
tcg_gen_shri_tl(reg, reg, PSR_CARRY_SHIFT);
|
|
tcg_gen_andi_tl(reg, reg, 0x1);
|
|
}
|
|
|
|
static inline void gen_add_tv(TCGv dst, TCGv src1, TCGv src2)
|
|
{
|
|
TCGv r_temp;
|
|
TCGv_i32 r_const;
|
|
int l1;
|
|
|
|
l1 = gen_new_label();
|
|
|
|
r_temp = tcg_temp_new();
|
|
tcg_gen_xor_tl(r_temp, src1, src2);
|
|
tcg_gen_not_tl(r_temp, r_temp);
|
|
tcg_gen_xor_tl(cpu_tmp0, src1, dst);
|
|
tcg_gen_and_tl(r_temp, r_temp, cpu_tmp0);
|
|
tcg_gen_andi_tl(r_temp, r_temp, (1ULL << 31));
|
|
tcg_gen_brcondi_tl(TCG_COND_EQ, r_temp, 0, l1);
|
|
r_const = tcg_const_i32(TT_TOVF);
|
|
gen_helper_raise_exception(r_const);
|
|
tcg_temp_free_i32(r_const);
|
|
gen_set_label(l1);
|
|
tcg_temp_free(r_temp);
|
|
}
|
|
|
|
static inline void gen_tag_tv(TCGv src1, TCGv src2)
|
|
{
|
|
int l1;
|
|
TCGv_i32 r_const;
|
|
|
|
l1 = gen_new_label();
|
|
tcg_gen_or_tl(cpu_tmp0, src1, src2);
|
|
tcg_gen_andi_tl(cpu_tmp0, cpu_tmp0, 0x3);
|
|
tcg_gen_brcondi_tl(TCG_COND_EQ, cpu_tmp0, 0, l1);
|
|
r_const = tcg_const_i32(TT_TOVF);
|
|
gen_helper_raise_exception(r_const);
|
|
tcg_temp_free_i32(r_const);
|
|
gen_set_label(l1);
|
|
}
|
|
|
|
static inline void gen_op_addi_cc(TCGv dst, TCGv src1, target_long src2)
|
|
{
|
|
tcg_gen_mov_tl(cpu_cc_src, src1);
|
|
tcg_gen_movi_tl(cpu_cc_src2, src2);
|
|
tcg_gen_addi_tl(cpu_cc_dst, cpu_cc_src, src2);
|
|
tcg_gen_mov_tl(dst, cpu_cc_dst);
|
|
}
|
|
|
|
static inline void gen_op_add_cc(TCGv dst, TCGv src1, TCGv src2)
|
|
{
|
|
tcg_gen_mov_tl(cpu_cc_src, src1);
|
|
tcg_gen_mov_tl(cpu_cc_src2, src2);
|
|
tcg_gen_add_tl(cpu_cc_dst, cpu_cc_src, cpu_cc_src2);
|
|
tcg_gen_mov_tl(dst, cpu_cc_dst);
|
|
}
|
|
|
|
static inline void gen_op_addxi_cc(TCGv dst, TCGv src1, target_long src2)
|
|
{
|
|
tcg_gen_mov_tl(cpu_cc_src, src1);
|
|
tcg_gen_movi_tl(cpu_cc_src2, src2);
|
|
gen_mov_reg_C(cpu_tmp0, cpu_psr);
|
|
tcg_gen_add_tl(cpu_cc_dst, cpu_cc_src, cpu_tmp0);
|
|
tcg_gen_addi_tl(cpu_cc_dst, cpu_cc_dst, src2);
|
|
tcg_gen_mov_tl(dst, cpu_cc_dst);
|
|
}
|
|
|
|
static inline void gen_op_addx_cc(TCGv dst, TCGv src1, TCGv src2)
|
|
{
|
|
tcg_gen_mov_tl(cpu_cc_src, src1);
|
|
tcg_gen_mov_tl(cpu_cc_src2, src2);
|
|
gen_mov_reg_C(cpu_tmp0, cpu_psr);
|
|
tcg_gen_add_tl(cpu_cc_dst, cpu_cc_src, cpu_tmp0);
|
|
tcg_gen_add_tl(cpu_cc_dst, cpu_cc_dst, cpu_cc_src2);
|
|
tcg_gen_mov_tl(dst, cpu_cc_dst);
|
|
}
|
|
|
|
static inline void gen_op_tadd_cc(TCGv dst, TCGv src1, TCGv src2)
|
|
{
|
|
tcg_gen_mov_tl(cpu_cc_src, src1);
|
|
tcg_gen_mov_tl(cpu_cc_src2, src2);
|
|
tcg_gen_add_tl(cpu_cc_dst, cpu_cc_src, cpu_cc_src2);
|
|
tcg_gen_mov_tl(dst, cpu_cc_dst);
|
|
}
|
|
|
|
static inline void gen_op_tadd_ccTV(TCGv dst, TCGv src1, TCGv src2)
|
|
{
|
|
tcg_gen_mov_tl(cpu_cc_src, src1);
|
|
tcg_gen_mov_tl(cpu_cc_src2, src2);
|
|
gen_tag_tv(cpu_cc_src, cpu_cc_src2);
|
|
tcg_gen_add_tl(cpu_cc_dst, cpu_cc_src, cpu_cc_src2);
|
|
gen_add_tv(cpu_cc_dst, cpu_cc_src, cpu_cc_src2);
|
|
tcg_gen_mov_tl(dst, cpu_cc_dst);
|
|
}
|
|
|
|
static inline void gen_sub_tv(TCGv dst, TCGv src1, TCGv src2)
|
|
{
|
|
TCGv r_temp;
|
|
TCGv_i32 r_const;
|
|
int l1;
|
|
|
|
l1 = gen_new_label();
|
|
|
|
r_temp = tcg_temp_new();
|
|
tcg_gen_xor_tl(r_temp, src1, src2);
|
|
tcg_gen_xor_tl(cpu_tmp0, src1, dst);
|
|
tcg_gen_and_tl(r_temp, r_temp, cpu_tmp0);
|
|
tcg_gen_andi_tl(r_temp, r_temp, (1ULL << 31));
|
|
tcg_gen_brcondi_tl(TCG_COND_EQ, r_temp, 0, l1);
|
|
r_const = tcg_const_i32(TT_TOVF);
|
|
gen_helper_raise_exception(r_const);
|
|
tcg_temp_free_i32(r_const);
|
|
gen_set_label(l1);
|
|
tcg_temp_free(r_temp);
|
|
}
|
|
|
|
static inline void gen_op_subi_cc(TCGv dst, TCGv src1, target_long src2, DisasContext *dc)
|
|
{
|
|
tcg_gen_mov_tl(cpu_cc_src, src1);
|
|
tcg_gen_movi_tl(cpu_cc_src2, src2);
|
|
if (src2 == 0) {
|
|
tcg_gen_mov_tl(cpu_cc_dst, src1);
|
|
tcg_gen_movi_i32(cpu_cc_op, CC_OP_LOGIC);
|
|
dc->cc_op = CC_OP_LOGIC;
|
|
} else {
|
|
tcg_gen_subi_tl(cpu_cc_dst, cpu_cc_src, src2);
|
|
tcg_gen_movi_i32(cpu_cc_op, CC_OP_SUB);
|
|
dc->cc_op = CC_OP_SUB;
|
|
}
|
|
tcg_gen_mov_tl(dst, cpu_cc_dst);
|
|
}
|
|
|
|
static inline void gen_op_sub_cc(TCGv dst, TCGv src1, TCGv src2)
|
|
{
|
|
tcg_gen_mov_tl(cpu_cc_src, src1);
|
|
tcg_gen_mov_tl(cpu_cc_src2, src2);
|
|
tcg_gen_sub_tl(cpu_cc_dst, cpu_cc_src, cpu_cc_src2);
|
|
tcg_gen_mov_tl(dst, cpu_cc_dst);
|
|
}
|
|
|
|
static inline void gen_op_subxi_cc(TCGv dst, TCGv src1, target_long src2)
|
|
{
|
|
tcg_gen_mov_tl(cpu_cc_src, src1);
|
|
tcg_gen_movi_tl(cpu_cc_src2, src2);
|
|
gen_mov_reg_C(cpu_tmp0, cpu_psr);
|
|
tcg_gen_sub_tl(cpu_cc_dst, cpu_cc_src, cpu_tmp0);
|
|
tcg_gen_subi_tl(cpu_cc_dst, cpu_cc_dst, src2);
|
|
tcg_gen_mov_tl(dst, cpu_cc_dst);
|
|
}
|
|
|
|
static inline void gen_op_subx_cc(TCGv dst, TCGv src1, TCGv src2)
|
|
{
|
|
tcg_gen_mov_tl(cpu_cc_src, src1);
|
|
tcg_gen_mov_tl(cpu_cc_src2, src2);
|
|
gen_mov_reg_C(cpu_tmp0, cpu_psr);
|
|
tcg_gen_sub_tl(cpu_cc_dst, cpu_cc_src, cpu_tmp0);
|
|
tcg_gen_sub_tl(cpu_cc_dst, cpu_cc_dst, cpu_cc_src2);
|
|
tcg_gen_mov_tl(dst, cpu_cc_dst);
|
|
}
|
|
|
|
static inline void gen_op_tsub_cc(TCGv dst, TCGv src1, TCGv src2)
|
|
{
|
|
tcg_gen_mov_tl(cpu_cc_src, src1);
|
|
tcg_gen_mov_tl(cpu_cc_src2, src2);
|
|
tcg_gen_sub_tl(cpu_cc_dst, cpu_cc_src, cpu_cc_src2);
|
|
tcg_gen_mov_tl(dst, cpu_cc_dst);
|
|
}
|
|
|
|
static inline void gen_op_tsub_ccTV(TCGv dst, TCGv src1, TCGv src2)
|
|
{
|
|
tcg_gen_mov_tl(cpu_cc_src, src1);
|
|
tcg_gen_mov_tl(cpu_cc_src2, src2);
|
|
gen_tag_tv(cpu_cc_src, cpu_cc_src2);
|
|
tcg_gen_sub_tl(cpu_cc_dst, cpu_cc_src, cpu_cc_src2);
|
|
gen_sub_tv(cpu_cc_dst, cpu_cc_src, cpu_cc_src2);
|
|
tcg_gen_mov_tl(dst, cpu_cc_dst);
|
|
}
|
|
|
|
static inline void gen_op_mulscc(TCGv dst, TCGv src1, TCGv src2)
|
|
{
|
|
TCGv r_temp;
|
|
int l1;
|
|
|
|
l1 = gen_new_label();
|
|
r_temp = tcg_temp_new();
|
|
|
|
/* old op:
|
|
if (!(env->y & 1))
|
|
T1 = 0;
|
|
*/
|
|
tcg_gen_andi_tl(cpu_cc_src, src1, 0xffffffff);
|
|
tcg_gen_andi_tl(r_temp, cpu_y, 0x1);
|
|
tcg_gen_andi_tl(cpu_cc_src2, src2, 0xffffffff);
|
|
tcg_gen_brcondi_tl(TCG_COND_NE, r_temp, 0, l1);
|
|
tcg_gen_movi_tl(cpu_cc_src2, 0);
|
|
gen_set_label(l1);
|
|
|
|
// b2 = T0 & 1;
|
|
// env->y = (b2 << 31) | (env->y >> 1);
|
|
tcg_gen_andi_tl(r_temp, cpu_cc_src, 0x1);
|
|
tcg_gen_shli_tl(r_temp, r_temp, 31);
|
|
tcg_gen_shri_tl(cpu_tmp0, cpu_y, 1);
|
|
tcg_gen_andi_tl(cpu_tmp0, cpu_tmp0, 0x7fffffff);
|
|
tcg_gen_or_tl(cpu_tmp0, cpu_tmp0, r_temp);
|
|
tcg_gen_andi_tl(cpu_y, cpu_tmp0, 0xffffffff);
|
|
|
|
// b1 = N ^ V;
|
|
gen_mov_reg_N(cpu_tmp0, cpu_psr);
|
|
gen_mov_reg_V(r_temp, cpu_psr);
|
|
tcg_gen_xor_tl(cpu_tmp0, cpu_tmp0, r_temp);
|
|
tcg_temp_free(r_temp);
|
|
|
|
// T0 = (b1 << 31) | (T0 >> 1);
|
|
// src1 = T0;
|
|
tcg_gen_shli_tl(cpu_tmp0, cpu_tmp0, 31);
|
|
tcg_gen_shri_tl(cpu_cc_src, cpu_cc_src, 1);
|
|
tcg_gen_or_tl(cpu_cc_src, cpu_cc_src, cpu_tmp0);
|
|
|
|
tcg_gen_add_tl(cpu_cc_dst, cpu_cc_src, cpu_cc_src2);
|
|
|
|
tcg_gen_mov_tl(dst, cpu_cc_dst);
|
|
}
|
|
|
|
static inline void gen_op_umul(TCGv dst, TCGv src1, TCGv src2)
|
|
{
|
|
TCGv_i64 r_temp, r_temp2;
|
|
|
|
r_temp = tcg_temp_new_i64();
|
|
r_temp2 = tcg_temp_new_i64();
|
|
|
|
tcg_gen_extu_tl_i64(r_temp, src2);
|
|
tcg_gen_extu_tl_i64(r_temp2, src1);
|
|
tcg_gen_mul_i64(r_temp2, r_temp, r_temp2);
|
|
|
|
tcg_gen_shri_i64(r_temp, r_temp2, 32);
|
|
tcg_gen_trunc_i64_tl(cpu_tmp0, r_temp);
|
|
tcg_temp_free_i64(r_temp);
|
|
tcg_gen_andi_tl(cpu_y, cpu_tmp0, 0xffffffff);
|
|
#ifdef TARGET_SPARC64
|
|
tcg_gen_mov_i64(dst, r_temp2);
|
|
#else
|
|
tcg_gen_trunc_i64_tl(dst, r_temp2);
|
|
#endif
|
|
tcg_temp_free_i64(r_temp2);
|
|
}
|
|
|
|
static inline void gen_op_smul(TCGv dst, TCGv src1, TCGv src2)
|
|
{
|
|
TCGv_i64 r_temp, r_temp2;
|
|
|
|
r_temp = tcg_temp_new_i64();
|
|
r_temp2 = tcg_temp_new_i64();
|
|
|
|
tcg_gen_ext_tl_i64(r_temp, src2);
|
|
tcg_gen_ext_tl_i64(r_temp2, src1);
|
|
tcg_gen_mul_i64(r_temp2, r_temp, r_temp2);
|
|
|
|
tcg_gen_shri_i64(r_temp, r_temp2, 32);
|
|
tcg_gen_trunc_i64_tl(cpu_tmp0, r_temp);
|
|
tcg_temp_free_i64(r_temp);
|
|
tcg_gen_andi_tl(cpu_y, cpu_tmp0, 0xffffffff);
|
|
#ifdef TARGET_SPARC64
|
|
tcg_gen_mov_i64(dst, r_temp2);
|
|
#else
|
|
tcg_gen_trunc_i64_tl(dst, r_temp2);
|
|
#endif
|
|
tcg_temp_free_i64(r_temp2);
|
|
}
|
|
|
|
#ifdef TARGET_SPARC64
|
|
static inline void gen_trap_ifdivzero_tl(TCGv divisor)
|
|
{
|
|
TCGv_i32 r_const;
|
|
int l1;
|
|
|
|
l1 = gen_new_label();
|
|
tcg_gen_brcondi_tl(TCG_COND_NE, divisor, 0, l1);
|
|
r_const = tcg_const_i32(TT_DIV_ZERO);
|
|
gen_helper_raise_exception(r_const);
|
|
tcg_temp_free_i32(r_const);
|
|
gen_set_label(l1);
|
|
}
|
|
|
|
static inline void gen_op_sdivx(TCGv dst, TCGv src1, TCGv src2)
|
|
{
|
|
int l1, l2;
|
|
|
|
l1 = gen_new_label();
|
|
l2 = gen_new_label();
|
|
tcg_gen_mov_tl(cpu_cc_src, src1);
|
|
tcg_gen_mov_tl(cpu_cc_src2, src2);
|
|
gen_trap_ifdivzero_tl(cpu_cc_src2);
|
|
tcg_gen_brcondi_tl(TCG_COND_NE, cpu_cc_src, INT64_MIN, l1);
|
|
tcg_gen_brcondi_tl(TCG_COND_NE, cpu_cc_src2, -1, l1);
|
|
tcg_gen_movi_i64(dst, INT64_MIN);
|
|
tcg_gen_br(l2);
|
|
gen_set_label(l1);
|
|
tcg_gen_div_i64(dst, cpu_cc_src, cpu_cc_src2);
|
|
gen_set_label(l2);
|
|
}
|
|
#endif
|
|
|
|
// 1
|
|
static inline void gen_op_eval_ba(TCGv dst)
|
|
{
|
|
tcg_gen_movi_tl(dst, 1);
|
|
}
|
|
|
|
// Z
|
|
static inline void gen_op_eval_be(TCGv dst, TCGv_i32 src)
|
|
{
|
|
gen_mov_reg_Z(dst, src);
|
|
}
|
|
|
|
// Z | (N ^ V)
|
|
static inline void gen_op_eval_ble(TCGv dst, TCGv_i32 src)
|
|
{
|
|
gen_mov_reg_N(cpu_tmp0, src);
|
|
gen_mov_reg_V(dst, src);
|
|
tcg_gen_xor_tl(dst, dst, cpu_tmp0);
|
|
gen_mov_reg_Z(cpu_tmp0, src);
|
|
tcg_gen_or_tl(dst, dst, cpu_tmp0);
|
|
}
|
|
|
|
// N ^ V
|
|
static inline void gen_op_eval_bl(TCGv dst, TCGv_i32 src)
|
|
{
|
|
gen_mov_reg_V(cpu_tmp0, src);
|
|
gen_mov_reg_N(dst, src);
|
|
tcg_gen_xor_tl(dst, dst, cpu_tmp0);
|
|
}
|
|
|
|
// C | Z
|
|
static inline void gen_op_eval_bleu(TCGv dst, TCGv_i32 src)
|
|
{
|
|
gen_mov_reg_Z(cpu_tmp0, src);
|
|
gen_mov_reg_C(dst, src);
|
|
tcg_gen_or_tl(dst, dst, cpu_tmp0);
|
|
}
|
|
|
|
// C
|
|
static inline void gen_op_eval_bcs(TCGv dst, TCGv_i32 src)
|
|
{
|
|
gen_mov_reg_C(dst, src);
|
|
}
|
|
|
|
// V
|
|
static inline void gen_op_eval_bvs(TCGv dst, TCGv_i32 src)
|
|
{
|
|
gen_mov_reg_V(dst, src);
|
|
}
|
|
|
|
// 0
|
|
static inline void gen_op_eval_bn(TCGv dst)
|
|
{
|
|
tcg_gen_movi_tl(dst, 0);
|
|
}
|
|
|
|
// N
|
|
static inline void gen_op_eval_bneg(TCGv dst, TCGv_i32 src)
|
|
{
|
|
gen_mov_reg_N(dst, src);
|
|
}
|
|
|
|
// !Z
|
|
static inline void gen_op_eval_bne(TCGv dst, TCGv_i32 src)
|
|
{
|
|
gen_mov_reg_Z(dst, src);
|
|
tcg_gen_xori_tl(dst, dst, 0x1);
|
|
}
|
|
|
|
// !(Z | (N ^ V))
|
|
static inline void gen_op_eval_bg(TCGv dst, TCGv_i32 src)
|
|
{
|
|
gen_mov_reg_N(cpu_tmp0, src);
|
|
gen_mov_reg_V(dst, src);
|
|
tcg_gen_xor_tl(dst, dst, cpu_tmp0);
|
|
gen_mov_reg_Z(cpu_tmp0, src);
|
|
tcg_gen_or_tl(dst, dst, cpu_tmp0);
|
|
tcg_gen_xori_tl(dst, dst, 0x1);
|
|
}
|
|
|
|
// !(N ^ V)
|
|
static inline void gen_op_eval_bge(TCGv dst, TCGv_i32 src)
|
|
{
|
|
gen_mov_reg_V(cpu_tmp0, src);
|
|
gen_mov_reg_N(dst, src);
|
|
tcg_gen_xor_tl(dst, dst, cpu_tmp0);
|
|
tcg_gen_xori_tl(dst, dst, 0x1);
|
|
}
|
|
|
|
// !(C | Z)
|
|
static inline void gen_op_eval_bgu(TCGv dst, TCGv_i32 src)
|
|
{
|
|
gen_mov_reg_Z(cpu_tmp0, src);
|
|
gen_mov_reg_C(dst, src);
|
|
tcg_gen_or_tl(dst, dst, cpu_tmp0);
|
|
tcg_gen_xori_tl(dst, dst, 0x1);
|
|
}
|
|
|
|
// !C
|
|
static inline void gen_op_eval_bcc(TCGv dst, TCGv_i32 src)
|
|
{
|
|
gen_mov_reg_C(dst, src);
|
|
tcg_gen_xori_tl(dst, dst, 0x1);
|
|
}
|
|
|
|
// !N
|
|
static inline void gen_op_eval_bpos(TCGv dst, TCGv_i32 src)
|
|
{
|
|
gen_mov_reg_N(dst, src);
|
|
tcg_gen_xori_tl(dst, dst, 0x1);
|
|
}
|
|
|
|
// !V
|
|
static inline void gen_op_eval_bvc(TCGv dst, TCGv_i32 src)
|
|
{
|
|
gen_mov_reg_V(dst, src);
|
|
tcg_gen_xori_tl(dst, dst, 0x1);
|
|
}
|
|
|
|
/*
|
|
FPSR bit field FCC1 | FCC0:
|
|
0 =
|
|
1 <
|
|
2 >
|
|
3 unordered
|
|
*/
|
|
static inline void gen_mov_reg_FCC0(TCGv reg, TCGv src,
|
|
unsigned int fcc_offset)
|
|
{
|
|
tcg_gen_shri_tl(reg, src, FSR_FCC0_SHIFT + fcc_offset);
|
|
tcg_gen_andi_tl(reg, reg, 0x1);
|
|
}
|
|
|
|
static inline void gen_mov_reg_FCC1(TCGv reg, TCGv src,
|
|
unsigned int fcc_offset)
|
|
{
|
|
tcg_gen_shri_tl(reg, src, FSR_FCC1_SHIFT + fcc_offset);
|
|
tcg_gen_andi_tl(reg, reg, 0x1);
|
|
}
|
|
|
|
// !0: FCC0 | FCC1
|
|
static inline void gen_op_eval_fbne(TCGv dst, TCGv src,
|
|
unsigned int fcc_offset)
|
|
{
|
|
gen_mov_reg_FCC0(dst, src, fcc_offset);
|
|
gen_mov_reg_FCC1(cpu_tmp0, src, fcc_offset);
|
|
tcg_gen_or_tl(dst, dst, cpu_tmp0);
|
|
}
|
|
|
|
// 1 or 2: FCC0 ^ FCC1
|
|
static inline void gen_op_eval_fblg(TCGv dst, TCGv src,
|
|
unsigned int fcc_offset)
|
|
{
|
|
gen_mov_reg_FCC0(dst, src, fcc_offset);
|
|
gen_mov_reg_FCC1(cpu_tmp0, src, fcc_offset);
|
|
tcg_gen_xor_tl(dst, dst, cpu_tmp0);
|
|
}
|
|
|
|
// 1 or 3: FCC0
|
|
static inline void gen_op_eval_fbul(TCGv dst, TCGv src,
|
|
unsigned int fcc_offset)
|
|
{
|
|
gen_mov_reg_FCC0(dst, src, fcc_offset);
|
|
}
|
|
|
|
// 1: FCC0 & !FCC1
|
|
static inline void gen_op_eval_fbl(TCGv dst, TCGv src,
|
|
unsigned int fcc_offset)
|
|
{
|
|
gen_mov_reg_FCC0(dst, src, fcc_offset);
|
|
gen_mov_reg_FCC1(cpu_tmp0, src, fcc_offset);
|
|
tcg_gen_xori_tl(cpu_tmp0, cpu_tmp0, 0x1);
|
|
tcg_gen_and_tl(dst, dst, cpu_tmp0);
|
|
}
|
|
|
|
// 2 or 3: FCC1
|
|
static inline void gen_op_eval_fbug(TCGv dst, TCGv src,
|
|
unsigned int fcc_offset)
|
|
{
|
|
gen_mov_reg_FCC1(dst, src, fcc_offset);
|
|
}
|
|
|
|
// 2: !FCC0 & FCC1
|
|
static inline void gen_op_eval_fbg(TCGv dst, TCGv src,
|
|
unsigned int fcc_offset)
|
|
{
|
|
gen_mov_reg_FCC0(dst, src, fcc_offset);
|
|
tcg_gen_xori_tl(dst, dst, 0x1);
|
|
gen_mov_reg_FCC1(cpu_tmp0, src, fcc_offset);
|
|
tcg_gen_and_tl(dst, dst, cpu_tmp0);
|
|
}
|
|
|
|
// 3: FCC0 & FCC1
|
|
static inline void gen_op_eval_fbu(TCGv dst, TCGv src,
|
|
unsigned int fcc_offset)
|
|
{
|
|
gen_mov_reg_FCC0(dst, src, fcc_offset);
|
|
gen_mov_reg_FCC1(cpu_tmp0, src, fcc_offset);
|
|
tcg_gen_and_tl(dst, dst, cpu_tmp0);
|
|
}
|
|
|
|
// 0: !(FCC0 | FCC1)
|
|
static inline void gen_op_eval_fbe(TCGv dst, TCGv src,
|
|
unsigned int fcc_offset)
|
|
{
|
|
gen_mov_reg_FCC0(dst, src, fcc_offset);
|
|
gen_mov_reg_FCC1(cpu_tmp0, src, fcc_offset);
|
|
tcg_gen_or_tl(dst, dst, cpu_tmp0);
|
|
tcg_gen_xori_tl(dst, dst, 0x1);
|
|
}
|
|
|
|
// 0 or 3: !(FCC0 ^ FCC1)
|
|
static inline void gen_op_eval_fbue(TCGv dst, TCGv src,
|
|
unsigned int fcc_offset)
|
|
{
|
|
gen_mov_reg_FCC0(dst, src, fcc_offset);
|
|
gen_mov_reg_FCC1(cpu_tmp0, src, fcc_offset);
|
|
tcg_gen_xor_tl(dst, dst, cpu_tmp0);
|
|
tcg_gen_xori_tl(dst, dst, 0x1);
|
|
}
|
|
|
|
// 0 or 2: !FCC0
|
|
static inline void gen_op_eval_fbge(TCGv dst, TCGv src,
|
|
unsigned int fcc_offset)
|
|
{
|
|
gen_mov_reg_FCC0(dst, src, fcc_offset);
|
|
tcg_gen_xori_tl(dst, dst, 0x1);
|
|
}
|
|
|
|
// !1: !(FCC0 & !FCC1)
|
|
static inline void gen_op_eval_fbuge(TCGv dst, TCGv src,
|
|
unsigned int fcc_offset)
|
|
{
|
|
gen_mov_reg_FCC0(dst, src, fcc_offset);
|
|
gen_mov_reg_FCC1(cpu_tmp0, src, fcc_offset);
|
|
tcg_gen_xori_tl(cpu_tmp0, cpu_tmp0, 0x1);
|
|
tcg_gen_and_tl(dst, dst, cpu_tmp0);
|
|
tcg_gen_xori_tl(dst, dst, 0x1);
|
|
}
|
|
|
|
// 0 or 1: !FCC1
|
|
static inline void gen_op_eval_fble(TCGv dst, TCGv src,
|
|
unsigned int fcc_offset)
|
|
{
|
|
gen_mov_reg_FCC1(dst, src, fcc_offset);
|
|
tcg_gen_xori_tl(dst, dst, 0x1);
|
|
}
|
|
|
|
// !2: !(!FCC0 & FCC1)
|
|
static inline void gen_op_eval_fbule(TCGv dst, TCGv src,
|
|
unsigned int fcc_offset)
|
|
{
|
|
gen_mov_reg_FCC0(dst, src, fcc_offset);
|
|
tcg_gen_xori_tl(dst, dst, 0x1);
|
|
gen_mov_reg_FCC1(cpu_tmp0, src, fcc_offset);
|
|
tcg_gen_and_tl(dst, dst, cpu_tmp0);
|
|
tcg_gen_xori_tl(dst, dst, 0x1);
|
|
}
|
|
|
|
// !3: !(FCC0 & FCC1)
|
|
static inline void gen_op_eval_fbo(TCGv dst, TCGv src,
|
|
unsigned int fcc_offset)
|
|
{
|
|
gen_mov_reg_FCC0(dst, src, fcc_offset);
|
|
gen_mov_reg_FCC1(cpu_tmp0, src, fcc_offset);
|
|
tcg_gen_and_tl(dst, dst, cpu_tmp0);
|
|
tcg_gen_xori_tl(dst, dst, 0x1);
|
|
}
|
|
|
|
static inline void gen_branch2(DisasContext *dc, target_ulong pc1,
|
|
target_ulong pc2, TCGv r_cond)
|
|
{
|
|
int l1;
|
|
|
|
l1 = gen_new_label();
|
|
|
|
tcg_gen_brcondi_tl(TCG_COND_EQ, r_cond, 0, l1);
|
|
|
|
gen_goto_tb(dc, 0, pc1, pc1 + 4);
|
|
|
|
gen_set_label(l1);
|
|
gen_goto_tb(dc, 1, pc2, pc2 + 4);
|
|
}
|
|
|
|
static inline void gen_branch_a(DisasContext *dc, target_ulong pc1,
|
|
target_ulong pc2, TCGv r_cond)
|
|
{
|
|
int l1;
|
|
|
|
l1 = gen_new_label();
|
|
|
|
tcg_gen_brcondi_tl(TCG_COND_EQ, r_cond, 0, l1);
|
|
|
|
gen_goto_tb(dc, 0, pc2, pc1);
|
|
|
|
gen_set_label(l1);
|
|
gen_goto_tb(dc, 1, pc2 + 4, pc2 + 8);
|
|
}
|
|
|
|
static inline void gen_generic_branch(target_ulong npc1, target_ulong npc2,
|
|
TCGv r_cond)
|
|
{
|
|
int l1, l2;
|
|
|
|
l1 = gen_new_label();
|
|
l2 = gen_new_label();
|
|
|
|
tcg_gen_brcondi_tl(TCG_COND_EQ, r_cond, 0, l1);
|
|
|
|
tcg_gen_movi_tl(cpu_npc, npc1);
|
|
tcg_gen_br(l2);
|
|
|
|
gen_set_label(l1);
|
|
tcg_gen_movi_tl(cpu_npc, npc2);
|
|
gen_set_label(l2);
|
|
}
|
|
|
|
/* call this function before using the condition register as it may
|
|
have been set for a jump */
|
|
static inline void flush_cond(DisasContext *dc, TCGv cond)
|
|
{
|
|
if (dc->npc == JUMP_PC) {
|
|
gen_generic_branch(dc->jump_pc[0], dc->jump_pc[1], cond);
|
|
dc->npc = DYNAMIC_PC;
|
|
}
|
|
}
|
|
|
|
static inline void save_npc(DisasContext *dc, TCGv cond)
|
|
{
|
|
if (dc->npc == JUMP_PC) {
|
|
gen_generic_branch(dc->jump_pc[0], dc->jump_pc[1], cond);
|
|
dc->npc = DYNAMIC_PC;
|
|
} else if (dc->npc != DYNAMIC_PC) {
|
|
tcg_gen_movi_tl(cpu_npc, dc->npc);
|
|
}
|
|
}
|
|
|
|
static inline void save_state(DisasContext *dc, TCGv cond)
|
|
{
|
|
tcg_gen_movi_tl(cpu_pc, dc->pc);
|
|
/* flush pending conditional evaluations before exposing cpu state */
|
|
if (dc->cc_op != CC_OP_FLAGS) {
|
|
dc->cc_op = CC_OP_FLAGS;
|
|
gen_helper_compute_psr();
|
|
}
|
|
save_npc(dc, cond);
|
|
}
|
|
|
|
static inline void gen_mov_pc_npc(DisasContext *dc, TCGv cond)
|
|
{
|
|
if (dc->npc == JUMP_PC) {
|
|
gen_generic_branch(dc->jump_pc[0], dc->jump_pc[1], cond);
|
|
tcg_gen_mov_tl(cpu_pc, cpu_npc);
|
|
dc->pc = DYNAMIC_PC;
|
|
} else if (dc->npc == DYNAMIC_PC) {
|
|
tcg_gen_mov_tl(cpu_pc, cpu_npc);
|
|
dc->pc = DYNAMIC_PC;
|
|
} else {
|
|
dc->pc = dc->npc;
|
|
}
|
|
}
|
|
|
|
static inline void gen_op_next_insn(void)
|
|
{
|
|
tcg_gen_mov_tl(cpu_pc, cpu_npc);
|
|
tcg_gen_addi_tl(cpu_npc, cpu_npc, 4);
|
|
}
|
|
|
|
static inline void gen_cond(TCGv r_dst, unsigned int cc, unsigned int cond,
|
|
DisasContext *dc)
|
|
{
|
|
TCGv_i32 r_src;
|
|
|
|
#ifdef TARGET_SPARC64
|
|
if (cc)
|
|
r_src = cpu_xcc;
|
|
else
|
|
r_src = cpu_psr;
|
|
#else
|
|
r_src = cpu_psr;
|
|
#endif
|
|
switch (dc->cc_op) {
|
|
case CC_OP_FLAGS:
|
|
break;
|
|
default:
|
|
gen_helper_compute_psr();
|
|
dc->cc_op = CC_OP_FLAGS;
|
|
break;
|
|
}
|
|
switch (cond) {
|
|
case 0x0:
|
|
gen_op_eval_bn(r_dst);
|
|
break;
|
|
case 0x1:
|
|
gen_op_eval_be(r_dst, r_src);
|
|
break;
|
|
case 0x2:
|
|
gen_op_eval_ble(r_dst, r_src);
|
|
break;
|
|
case 0x3:
|
|
gen_op_eval_bl(r_dst, r_src);
|
|
break;
|
|
case 0x4:
|
|
gen_op_eval_bleu(r_dst, r_src);
|
|
break;
|
|
case 0x5:
|
|
gen_op_eval_bcs(r_dst, r_src);
|
|
break;
|
|
case 0x6:
|
|
gen_op_eval_bneg(r_dst, r_src);
|
|
break;
|
|
case 0x7:
|
|
gen_op_eval_bvs(r_dst, r_src);
|
|
break;
|
|
case 0x8:
|
|
gen_op_eval_ba(r_dst);
|
|
break;
|
|
case 0x9:
|
|
gen_op_eval_bne(r_dst, r_src);
|
|
break;
|
|
case 0xa:
|
|
gen_op_eval_bg(r_dst, r_src);
|
|
break;
|
|
case 0xb:
|
|
gen_op_eval_bge(r_dst, r_src);
|
|
break;
|
|
case 0xc:
|
|
gen_op_eval_bgu(r_dst, r_src);
|
|
break;
|
|
case 0xd:
|
|
gen_op_eval_bcc(r_dst, r_src);
|
|
break;
|
|
case 0xe:
|
|
gen_op_eval_bpos(r_dst, r_src);
|
|
break;
|
|
case 0xf:
|
|
gen_op_eval_bvc(r_dst, r_src);
|
|
break;
|
|
}
|
|
}
|
|
|
|
static inline void gen_fcond(TCGv r_dst, unsigned int cc, unsigned int cond)
|
|
{
|
|
unsigned int offset;
|
|
|
|
switch (cc) {
|
|
default:
|
|
case 0x0:
|
|
offset = 0;
|
|
break;
|
|
case 0x1:
|
|
offset = 32 - 10;
|
|
break;
|
|
case 0x2:
|
|
offset = 34 - 10;
|
|
break;
|
|
case 0x3:
|
|
offset = 36 - 10;
|
|
break;
|
|
}
|
|
|
|
switch (cond) {
|
|
case 0x0:
|
|
gen_op_eval_bn(r_dst);
|
|
break;
|
|
case 0x1:
|
|
gen_op_eval_fbne(r_dst, cpu_fsr, offset);
|
|
break;
|
|
case 0x2:
|
|
gen_op_eval_fblg(r_dst, cpu_fsr, offset);
|
|
break;
|
|
case 0x3:
|
|
gen_op_eval_fbul(r_dst, cpu_fsr, offset);
|
|
break;
|
|
case 0x4:
|
|
gen_op_eval_fbl(r_dst, cpu_fsr, offset);
|
|
break;
|
|
case 0x5:
|
|
gen_op_eval_fbug(r_dst, cpu_fsr, offset);
|
|
break;
|
|
case 0x6:
|
|
gen_op_eval_fbg(r_dst, cpu_fsr, offset);
|
|
break;
|
|
case 0x7:
|
|
gen_op_eval_fbu(r_dst, cpu_fsr, offset);
|
|
break;
|
|
case 0x8:
|
|
gen_op_eval_ba(r_dst);
|
|
break;
|
|
case 0x9:
|
|
gen_op_eval_fbe(r_dst, cpu_fsr, offset);
|
|
break;
|
|
case 0xa:
|
|
gen_op_eval_fbue(r_dst, cpu_fsr, offset);
|
|
break;
|
|
case 0xb:
|
|
gen_op_eval_fbge(r_dst, cpu_fsr, offset);
|
|
break;
|
|
case 0xc:
|
|
gen_op_eval_fbuge(r_dst, cpu_fsr, offset);
|
|
break;
|
|
case 0xd:
|
|
gen_op_eval_fble(r_dst, cpu_fsr, offset);
|
|
break;
|
|
case 0xe:
|
|
gen_op_eval_fbule(r_dst, cpu_fsr, offset);
|
|
break;
|
|
case 0xf:
|
|
gen_op_eval_fbo(r_dst, cpu_fsr, offset);
|
|
break;
|
|
}
|
|
}
|
|
|
|
#ifdef TARGET_SPARC64
|
|
// Inverted logic
|
|
static const int gen_tcg_cond_reg[8] = {
|
|
-1,
|
|
TCG_COND_NE,
|
|
TCG_COND_GT,
|
|
TCG_COND_GE,
|
|
-1,
|
|
TCG_COND_EQ,
|
|
TCG_COND_LE,
|
|
TCG_COND_LT,
|
|
};
|
|
|
|
static inline void gen_cond_reg(TCGv r_dst, int cond, TCGv r_src)
|
|
{
|
|
int l1;
|
|
|
|
l1 = gen_new_label();
|
|
tcg_gen_movi_tl(r_dst, 0);
|
|
tcg_gen_brcondi_tl(gen_tcg_cond_reg[cond], r_src, 0, l1);
|
|
tcg_gen_movi_tl(r_dst, 1);
|
|
gen_set_label(l1);
|
|
}
|
|
#endif
|
|
|
|
/* XXX: potentially incorrect if dynamic npc */
|
|
static void do_branch(DisasContext *dc, int32_t offset, uint32_t insn, int cc,
|
|
TCGv r_cond)
|
|
{
|
|
unsigned int cond = GET_FIELD(insn, 3, 6), a = (insn & (1 << 29));
|
|
target_ulong target = dc->pc + offset;
|
|
|
|
if (cond == 0x0) {
|
|
/* unconditional not taken */
|
|
if (a) {
|
|
dc->pc = dc->npc + 4;
|
|
dc->npc = dc->pc + 4;
|
|
} else {
|
|
dc->pc = dc->npc;
|
|
dc->npc = dc->pc + 4;
|
|
}
|
|
} else if (cond == 0x8) {
|
|
/* unconditional taken */
|
|
if (a) {
|
|
dc->pc = target;
|
|
dc->npc = dc->pc + 4;
|
|
} else {
|
|
dc->pc = dc->npc;
|
|
dc->npc = target;
|
|
tcg_gen_mov_tl(cpu_pc, cpu_npc);
|
|
}
|
|
} else {
|
|
flush_cond(dc, r_cond);
|
|
gen_cond(r_cond, cc, cond, dc);
|
|
if (a) {
|
|
gen_branch_a(dc, target, dc->npc, r_cond);
|
|
dc->is_br = 1;
|
|
} else {
|
|
dc->pc = dc->npc;
|
|
dc->jump_pc[0] = target;
|
|
dc->jump_pc[1] = dc->npc + 4;
|
|
dc->npc = JUMP_PC;
|
|
}
|
|
}
|
|
}
|
|
|
|
/* XXX: potentially incorrect if dynamic npc */
|
|
static void do_fbranch(DisasContext *dc, int32_t offset, uint32_t insn, int cc,
|
|
TCGv r_cond)
|
|
{
|
|
unsigned int cond = GET_FIELD(insn, 3, 6), a = (insn & (1 << 29));
|
|
target_ulong target = dc->pc + offset;
|
|
|
|
if (cond == 0x0) {
|
|
/* unconditional not taken */
|
|
if (a) {
|
|
dc->pc = dc->npc + 4;
|
|
dc->npc = dc->pc + 4;
|
|
} else {
|
|
dc->pc = dc->npc;
|
|
dc->npc = dc->pc + 4;
|
|
}
|
|
} else if (cond == 0x8) {
|
|
/* unconditional taken */
|
|
if (a) {
|
|
dc->pc = target;
|
|
dc->npc = dc->pc + 4;
|
|
} else {
|
|
dc->pc = dc->npc;
|
|
dc->npc = target;
|
|
tcg_gen_mov_tl(cpu_pc, cpu_npc);
|
|
}
|
|
} else {
|
|
flush_cond(dc, r_cond);
|
|
gen_fcond(r_cond, cc, cond);
|
|
if (a) {
|
|
gen_branch_a(dc, target, dc->npc, r_cond);
|
|
dc->is_br = 1;
|
|
} else {
|
|
dc->pc = dc->npc;
|
|
dc->jump_pc[0] = target;
|
|
dc->jump_pc[1] = dc->npc + 4;
|
|
dc->npc = JUMP_PC;
|
|
}
|
|
}
|
|
}
|
|
|
|
#ifdef TARGET_SPARC64
|
|
/* XXX: potentially incorrect if dynamic npc */
|
|
static void do_branch_reg(DisasContext *dc, int32_t offset, uint32_t insn,
|
|
TCGv r_cond, TCGv r_reg)
|
|
{
|
|
unsigned int cond = GET_FIELD_SP(insn, 25, 27), a = (insn & (1 << 29));
|
|
target_ulong target = dc->pc + offset;
|
|
|
|
flush_cond(dc, r_cond);
|
|
gen_cond_reg(r_cond, cond, r_reg);
|
|
if (a) {
|
|
gen_branch_a(dc, target, dc->npc, r_cond);
|
|
dc->is_br = 1;
|
|
} else {
|
|
dc->pc = dc->npc;
|
|
dc->jump_pc[0] = target;
|
|
dc->jump_pc[1] = dc->npc + 4;
|
|
dc->npc = JUMP_PC;
|
|
}
|
|
}
|
|
|
|
static inline void gen_op_fcmps(int fccno, TCGv_i32 r_rs1, TCGv_i32 r_rs2)
|
|
{
|
|
switch (fccno) {
|
|
case 0:
|
|
gen_helper_fcmps(r_rs1, r_rs2);
|
|
break;
|
|
case 1:
|
|
gen_helper_fcmps_fcc1(r_rs1, r_rs2);
|
|
break;
|
|
case 2:
|
|
gen_helper_fcmps_fcc2(r_rs1, r_rs2);
|
|
break;
|
|
case 3:
|
|
gen_helper_fcmps_fcc3(r_rs1, r_rs2);
|
|
break;
|
|
}
|
|
}
|
|
|
|
static inline void gen_op_fcmpd(int fccno)
|
|
{
|
|
switch (fccno) {
|
|
case 0:
|
|
gen_helper_fcmpd();
|
|
break;
|
|
case 1:
|
|
gen_helper_fcmpd_fcc1();
|
|
break;
|
|
case 2:
|
|
gen_helper_fcmpd_fcc2();
|
|
break;
|
|
case 3:
|
|
gen_helper_fcmpd_fcc3();
|
|
break;
|
|
}
|
|
}
|
|
|
|
static inline void gen_op_fcmpq(int fccno)
|
|
{
|
|
switch (fccno) {
|
|
case 0:
|
|
gen_helper_fcmpq();
|
|
break;
|
|
case 1:
|
|
gen_helper_fcmpq_fcc1();
|
|
break;
|
|
case 2:
|
|
gen_helper_fcmpq_fcc2();
|
|
break;
|
|
case 3:
|
|
gen_helper_fcmpq_fcc3();
|
|
break;
|
|
}
|
|
}
|
|
|
|
static inline void gen_op_fcmpes(int fccno, TCGv_i32 r_rs1, TCGv_i32 r_rs2)
|
|
{
|
|
switch (fccno) {
|
|
case 0:
|
|
gen_helper_fcmpes(r_rs1, r_rs2);
|
|
break;
|
|
case 1:
|
|
gen_helper_fcmpes_fcc1(r_rs1, r_rs2);
|
|
break;
|
|
case 2:
|
|
gen_helper_fcmpes_fcc2(r_rs1, r_rs2);
|
|
break;
|
|
case 3:
|
|
gen_helper_fcmpes_fcc3(r_rs1, r_rs2);
|
|
break;
|
|
}
|
|
}
|
|
|
|
static inline void gen_op_fcmped(int fccno)
|
|
{
|
|
switch (fccno) {
|
|
case 0:
|
|
gen_helper_fcmped();
|
|
break;
|
|
case 1:
|
|
gen_helper_fcmped_fcc1();
|
|
break;
|
|
case 2:
|
|
gen_helper_fcmped_fcc2();
|
|
break;
|
|
case 3:
|
|
gen_helper_fcmped_fcc3();
|
|
break;
|
|
}
|
|
}
|
|
|
|
static inline void gen_op_fcmpeq(int fccno)
|
|
{
|
|
switch (fccno) {
|
|
case 0:
|
|
gen_helper_fcmpeq();
|
|
break;
|
|
case 1:
|
|
gen_helper_fcmpeq_fcc1();
|
|
break;
|
|
case 2:
|
|
gen_helper_fcmpeq_fcc2();
|
|
break;
|
|
case 3:
|
|
gen_helper_fcmpeq_fcc3();
|
|
break;
|
|
}
|
|
}
|
|
|
|
#else
|
|
|
|
static inline void gen_op_fcmps(int fccno, TCGv r_rs1, TCGv r_rs2)
|
|
{
|
|
gen_helper_fcmps(r_rs1, r_rs2);
|
|
}
|
|
|
|
static inline void gen_op_fcmpd(int fccno)
|
|
{
|
|
gen_helper_fcmpd();
|
|
}
|
|
|
|
static inline void gen_op_fcmpq(int fccno)
|
|
{
|
|
gen_helper_fcmpq();
|
|
}
|
|
|
|
static inline void gen_op_fcmpes(int fccno, TCGv r_rs1, TCGv r_rs2)
|
|
{
|
|
gen_helper_fcmpes(r_rs1, r_rs2);
|
|
}
|
|
|
|
static inline void gen_op_fcmped(int fccno)
|
|
{
|
|
gen_helper_fcmped();
|
|
}
|
|
|
|
static inline void gen_op_fcmpeq(int fccno)
|
|
{
|
|
gen_helper_fcmpeq();
|
|
}
|
|
#endif
|
|
|
|
static inline void gen_op_fpexception_im(int fsr_flags)
|
|
{
|
|
TCGv_i32 r_const;
|
|
|
|
tcg_gen_andi_tl(cpu_fsr, cpu_fsr, FSR_FTT_NMASK);
|
|
tcg_gen_ori_tl(cpu_fsr, cpu_fsr, fsr_flags);
|
|
r_const = tcg_const_i32(TT_FP_EXCP);
|
|
gen_helper_raise_exception(r_const);
|
|
tcg_temp_free_i32(r_const);
|
|
}
|
|
|
|
static int gen_trap_ifnofpu(DisasContext *dc, TCGv r_cond)
|
|
{
|
|
#if !defined(CONFIG_USER_ONLY)
|
|
if (!dc->fpu_enabled) {
|
|
TCGv_i32 r_const;
|
|
|
|
save_state(dc, r_cond);
|
|
r_const = tcg_const_i32(TT_NFPU_INSN);
|
|
gen_helper_raise_exception(r_const);
|
|
tcg_temp_free_i32(r_const);
|
|
dc->is_br = 1;
|
|
return 1;
|
|
}
|
|
#endif
|
|
return 0;
|
|
}
|
|
|
|
static inline void gen_op_clear_ieee_excp_and_FTT(void)
|
|
{
|
|
tcg_gen_andi_tl(cpu_fsr, cpu_fsr, FSR_FTT_CEXC_NMASK);
|
|
}
|
|
|
|
static inline void gen_clear_float_exceptions(void)
|
|
{
|
|
gen_helper_clear_float_exceptions();
|
|
}
|
|
|
|
/* asi moves */
|
|
#ifdef TARGET_SPARC64
|
|
static inline TCGv_i32 gen_get_asi(int insn, TCGv r_addr)
|
|
{
|
|
int asi;
|
|
TCGv_i32 r_asi;
|
|
|
|
if (IS_IMM) {
|
|
r_asi = tcg_temp_new_i32();
|
|
tcg_gen_mov_i32(r_asi, cpu_asi);
|
|
} else {
|
|
asi = GET_FIELD(insn, 19, 26);
|
|
r_asi = tcg_const_i32(asi);
|
|
}
|
|
return r_asi;
|
|
}
|
|
|
|
static inline void gen_ld_asi(TCGv dst, TCGv addr, int insn, int size,
|
|
int sign)
|
|
{
|
|
TCGv_i32 r_asi, r_size, r_sign;
|
|
|
|
r_asi = gen_get_asi(insn, addr);
|
|
r_size = tcg_const_i32(size);
|
|
r_sign = tcg_const_i32(sign);
|
|
gen_helper_ld_asi(dst, addr, r_asi, r_size, r_sign);
|
|
tcg_temp_free_i32(r_sign);
|
|
tcg_temp_free_i32(r_size);
|
|
tcg_temp_free_i32(r_asi);
|
|
}
|
|
|
|
static inline void gen_st_asi(TCGv src, TCGv addr, int insn, int size)
|
|
{
|
|
TCGv_i32 r_asi, r_size;
|
|
|
|
r_asi = gen_get_asi(insn, addr);
|
|
r_size = tcg_const_i32(size);
|
|
gen_helper_st_asi(addr, src, r_asi, r_size);
|
|
tcg_temp_free_i32(r_size);
|
|
tcg_temp_free_i32(r_asi);
|
|
}
|
|
|
|
static inline void gen_ldf_asi(TCGv addr, int insn, int size, int rd)
|
|
{
|
|
TCGv_i32 r_asi, r_size, r_rd;
|
|
|
|
r_asi = gen_get_asi(insn, addr);
|
|
r_size = tcg_const_i32(size);
|
|
r_rd = tcg_const_i32(rd);
|
|
gen_helper_ldf_asi(addr, r_asi, r_size, r_rd);
|
|
tcg_temp_free_i32(r_rd);
|
|
tcg_temp_free_i32(r_size);
|
|
tcg_temp_free_i32(r_asi);
|
|
}
|
|
|
|
static inline void gen_stf_asi(TCGv addr, int insn, int size, int rd)
|
|
{
|
|
TCGv_i32 r_asi, r_size, r_rd;
|
|
|
|
r_asi = gen_get_asi(insn, addr);
|
|
r_size = tcg_const_i32(size);
|
|
r_rd = tcg_const_i32(rd);
|
|
gen_helper_stf_asi(addr, r_asi, r_size, r_rd);
|
|
tcg_temp_free_i32(r_rd);
|
|
tcg_temp_free_i32(r_size);
|
|
tcg_temp_free_i32(r_asi);
|
|
}
|
|
|
|
static inline void gen_swap_asi(TCGv dst, TCGv addr, int insn)
|
|
{
|
|
TCGv_i32 r_asi, r_size, r_sign;
|
|
|
|
r_asi = gen_get_asi(insn, addr);
|
|
r_size = tcg_const_i32(4);
|
|
r_sign = tcg_const_i32(0);
|
|
gen_helper_ld_asi(cpu_tmp64, addr, r_asi, r_size, r_sign);
|
|
tcg_temp_free_i32(r_sign);
|
|
gen_helper_st_asi(addr, dst, r_asi, r_size);
|
|
tcg_temp_free_i32(r_size);
|
|
tcg_temp_free_i32(r_asi);
|
|
tcg_gen_trunc_i64_tl(dst, cpu_tmp64);
|
|
}
|
|
|
|
static inline void gen_ldda_asi(TCGv hi, TCGv addr, int insn, int rd)
|
|
{
|
|
TCGv_i32 r_asi, r_rd;
|
|
|
|
r_asi = gen_get_asi(insn, addr);
|
|
r_rd = tcg_const_i32(rd);
|
|
gen_helper_ldda_asi(addr, r_asi, r_rd);
|
|
tcg_temp_free_i32(r_rd);
|
|
tcg_temp_free_i32(r_asi);
|
|
}
|
|
|
|
static inline void gen_stda_asi(TCGv hi, TCGv addr, int insn, int rd)
|
|
{
|
|
TCGv_i32 r_asi, r_size;
|
|
|
|
gen_movl_reg_TN(rd + 1, cpu_tmp0);
|
|
tcg_gen_concat_tl_i64(cpu_tmp64, cpu_tmp0, hi);
|
|
r_asi = gen_get_asi(insn, addr);
|
|
r_size = tcg_const_i32(8);
|
|
gen_helper_st_asi(addr, cpu_tmp64, r_asi, r_size);
|
|
tcg_temp_free_i32(r_size);
|
|
tcg_temp_free_i32(r_asi);
|
|
}
|
|
|
|
static inline void gen_cas_asi(TCGv dst, TCGv addr, TCGv val2, int insn,
|
|
int rd)
|
|
{
|
|
TCGv r_val1;
|
|
TCGv_i32 r_asi;
|
|
|
|
r_val1 = tcg_temp_new();
|
|
gen_movl_reg_TN(rd, r_val1);
|
|
r_asi = gen_get_asi(insn, addr);
|
|
gen_helper_cas_asi(dst, addr, r_val1, val2, r_asi);
|
|
tcg_temp_free_i32(r_asi);
|
|
tcg_temp_free(r_val1);
|
|
}
|
|
|
|
static inline void gen_casx_asi(TCGv dst, TCGv addr, TCGv val2, int insn,
|
|
int rd)
|
|
{
|
|
TCGv_i32 r_asi;
|
|
|
|
gen_movl_reg_TN(rd, cpu_tmp64);
|
|
r_asi = gen_get_asi(insn, addr);
|
|
gen_helper_casx_asi(dst, addr, cpu_tmp64, val2, r_asi);
|
|
tcg_temp_free_i32(r_asi);
|
|
}
|
|
|
|
#elif !defined(CONFIG_USER_ONLY)
|
|
|
|
static inline void gen_ld_asi(TCGv dst, TCGv addr, int insn, int size,
|
|
int sign)
|
|
{
|
|
TCGv_i32 r_asi, r_size, r_sign;
|
|
|
|
r_asi = tcg_const_i32(GET_FIELD(insn, 19, 26));
|
|
r_size = tcg_const_i32(size);
|
|
r_sign = tcg_const_i32(sign);
|
|
gen_helper_ld_asi(cpu_tmp64, addr, r_asi, r_size, r_sign);
|
|
tcg_temp_free(r_sign);
|
|
tcg_temp_free(r_size);
|
|
tcg_temp_free(r_asi);
|
|
tcg_gen_trunc_i64_tl(dst, cpu_tmp64);
|
|
}
|
|
|
|
static inline void gen_st_asi(TCGv src, TCGv addr, int insn, int size)
|
|
{
|
|
TCGv_i32 r_asi, r_size;
|
|
|
|
tcg_gen_extu_tl_i64(cpu_tmp64, src);
|
|
r_asi = tcg_const_i32(GET_FIELD(insn, 19, 26));
|
|
r_size = tcg_const_i32(size);
|
|
gen_helper_st_asi(addr, cpu_tmp64, r_asi, r_size);
|
|
tcg_temp_free(r_size);
|
|
tcg_temp_free(r_asi);
|
|
}
|
|
|
|
static inline void gen_swap_asi(TCGv dst, TCGv addr, int insn)
|
|
{
|
|
TCGv_i32 r_asi, r_size, r_sign;
|
|
TCGv_i64 r_val;
|
|
|
|
r_asi = tcg_const_i32(GET_FIELD(insn, 19, 26));
|
|
r_size = tcg_const_i32(4);
|
|
r_sign = tcg_const_i32(0);
|
|
gen_helper_ld_asi(cpu_tmp64, addr, r_asi, r_size, r_sign);
|
|
tcg_temp_free(r_sign);
|
|
r_val = tcg_temp_new_i64();
|
|
tcg_gen_extu_tl_i64(r_val, dst);
|
|
gen_helper_st_asi(addr, r_val, r_asi, r_size);
|
|
tcg_temp_free_i64(r_val);
|
|
tcg_temp_free(r_size);
|
|
tcg_temp_free(r_asi);
|
|
tcg_gen_trunc_i64_tl(dst, cpu_tmp64);
|
|
}
|
|
|
|
static inline void gen_ldda_asi(TCGv hi, TCGv addr, int insn, int rd)
|
|
{
|
|
TCGv_i32 r_asi, r_size, r_sign;
|
|
|
|
r_asi = tcg_const_i32(GET_FIELD(insn, 19, 26));
|
|
r_size = tcg_const_i32(8);
|
|
r_sign = tcg_const_i32(0);
|
|
gen_helper_ld_asi(cpu_tmp64, addr, r_asi, r_size, r_sign);
|
|
tcg_temp_free(r_sign);
|
|
tcg_temp_free(r_size);
|
|
tcg_temp_free(r_asi);
|
|
tcg_gen_trunc_i64_tl(cpu_tmp0, cpu_tmp64);
|
|
gen_movl_TN_reg(rd + 1, cpu_tmp0);
|
|
tcg_gen_shri_i64(cpu_tmp64, cpu_tmp64, 32);
|
|
tcg_gen_trunc_i64_tl(hi, cpu_tmp64);
|
|
gen_movl_TN_reg(rd, hi);
|
|
}
|
|
|
|
static inline void gen_stda_asi(TCGv hi, TCGv addr, int insn, int rd)
|
|
{
|
|
TCGv_i32 r_asi, r_size;
|
|
|
|
gen_movl_reg_TN(rd + 1, cpu_tmp0);
|
|
tcg_gen_concat_tl_i64(cpu_tmp64, cpu_tmp0, hi);
|
|
r_asi = tcg_const_i32(GET_FIELD(insn, 19, 26));
|
|
r_size = tcg_const_i32(8);
|
|
gen_helper_st_asi(addr, cpu_tmp64, r_asi, r_size);
|
|
tcg_temp_free(r_size);
|
|
tcg_temp_free(r_asi);
|
|
}
|
|
#endif
|
|
|
|
#if !defined(CONFIG_USER_ONLY) || defined(TARGET_SPARC64)
|
|
static inline void gen_ldstub_asi(TCGv dst, TCGv addr, int insn)
|
|
{
|
|
TCGv_i64 r_val;
|
|
TCGv_i32 r_asi, r_size;
|
|
|
|
gen_ld_asi(dst, addr, insn, 1, 0);
|
|
|
|
r_val = tcg_const_i64(0xffULL);
|
|
r_asi = tcg_const_i32(GET_FIELD(insn, 19, 26));
|
|
r_size = tcg_const_i32(1);
|
|
gen_helper_st_asi(addr, r_val, r_asi, r_size);
|
|
tcg_temp_free_i32(r_size);
|
|
tcg_temp_free_i32(r_asi);
|
|
tcg_temp_free_i64(r_val);
|
|
}
|
|
#endif
|
|
|
|
static inline TCGv get_src1(unsigned int insn, TCGv def)
|
|
{
|
|
TCGv r_rs1 = def;
|
|
unsigned int rs1;
|
|
|
|
rs1 = GET_FIELD(insn, 13, 17);
|
|
if (rs1 == 0)
|
|
r_rs1 = tcg_const_tl(0); // XXX how to free?
|
|
else if (rs1 < 8)
|
|
r_rs1 = cpu_gregs[rs1];
|
|
else
|
|
tcg_gen_ld_tl(def, cpu_regwptr, (rs1 - 8) * sizeof(target_ulong));
|
|
return r_rs1;
|
|
}
|
|
|
|
static inline TCGv get_src2(unsigned int insn, TCGv def)
|
|
{
|
|
TCGv r_rs2 = def;
|
|
|
|
if (IS_IMM) { /* immediate */
|
|
target_long simm;
|
|
|
|
simm = GET_FIELDs(insn, 19, 31);
|
|
r_rs2 = tcg_const_tl(simm); // XXX how to free?
|
|
} else { /* register */
|
|
unsigned int rs2;
|
|
|
|
rs2 = GET_FIELD(insn, 27, 31);
|
|
if (rs2 == 0)
|
|
r_rs2 = tcg_const_tl(0); // XXX how to free?
|
|
else if (rs2 < 8)
|
|
r_rs2 = cpu_gregs[rs2];
|
|
else
|
|
tcg_gen_ld_tl(def, cpu_regwptr, (rs2 - 8) * sizeof(target_ulong));
|
|
}
|
|
return r_rs2;
|
|
}
|
|
|
|
#ifdef TARGET_SPARC64
|
|
static inline void gen_load_trap_state_at_tl(TCGv_ptr r_tsptr, TCGv_ptr cpu_env)
|
|
{
|
|
TCGv r_tl = tcg_temp_new();
|
|
|
|
/* load env->tl into r_tl */
|
|
{
|
|
TCGv_i32 r_tl_tmp = tcg_temp_new_i32();
|
|
tcg_gen_ld_i32(r_tl_tmp, cpu_env, offsetof(CPUSPARCState, tl));
|
|
tcg_gen_ext_i32_tl(r_tl, r_tl_tmp);
|
|
tcg_temp_free_i32(r_tl_tmp);
|
|
}
|
|
|
|
/* tl = [0 ... MAXTL_MASK] where MAXTL_MASK must be power of 2 */
|
|
tcg_gen_andi_tl(r_tl, r_tl, MAXTL_MASK);
|
|
|
|
/* calculate offset to current trap state from env->ts, reuse r_tl */
|
|
tcg_gen_muli_tl(r_tl, r_tl, sizeof (trap_state));
|
|
tcg_gen_addi_ptr(r_tsptr, cpu_env, offsetof(CPUState, ts));
|
|
|
|
/* tsptr = env->ts[env->tl & MAXTL_MASK] */
|
|
tcg_gen_add_ptr(r_tsptr, r_tsptr, r_tl);
|
|
|
|
tcg_temp_free(r_tl);
|
|
}
|
|
#endif
|
|
|
|
#define CHECK_IU_FEATURE(dc, FEATURE) \
|
|
if (!((dc)->def->features & CPU_FEATURE_ ## FEATURE)) \
|
|
goto illegal_insn;
|
|
#define CHECK_FPU_FEATURE(dc, FEATURE) \
|
|
if (!((dc)->def->features & CPU_FEATURE_ ## FEATURE)) \
|
|
goto nfpu_insn;
|
|
|
|
/* before an instruction, dc->pc must be static */
|
|
static void disas_sparc_insn(DisasContext * dc)
|
|
{
|
|
unsigned int insn, opc, rs1, rs2, rd;
|
|
target_long simm;
|
|
|
|
if (unlikely(qemu_loglevel_mask(CPU_LOG_TB_OP)))
|
|
tcg_gen_debug_insn_start(dc->pc);
|
|
insn = ldl_code(dc->pc);
|
|
opc = GET_FIELD(insn, 0, 1);
|
|
|
|
rd = GET_FIELD(insn, 2, 6);
|
|
|
|
cpu_src1 = tcg_temp_new(); // const
|
|
cpu_src2 = tcg_temp_new(); // const
|
|
|
|
switch (opc) {
|
|
case 0: /* branches/sethi */
|
|
{
|
|
unsigned int xop = GET_FIELD(insn, 7, 9);
|
|
int32_t target;
|
|
switch (xop) {
|
|
#ifdef TARGET_SPARC64
|
|
case 0x1: /* V9 BPcc */
|
|
{
|
|
int cc;
|
|
|
|
target = GET_FIELD_SP(insn, 0, 18);
|
|
target = sign_extend(target, 18);
|
|
target <<= 2;
|
|
cc = GET_FIELD_SP(insn, 20, 21);
|
|
if (cc == 0)
|
|
do_branch(dc, target, insn, 0, cpu_cond);
|
|
else if (cc == 2)
|
|
do_branch(dc, target, insn, 1, cpu_cond);
|
|
else
|
|
goto illegal_insn;
|
|
goto jmp_insn;
|
|
}
|
|
case 0x3: /* V9 BPr */
|
|
{
|
|
target = GET_FIELD_SP(insn, 0, 13) |
|
|
(GET_FIELD_SP(insn, 20, 21) << 14);
|
|
target = sign_extend(target, 16);
|
|
target <<= 2;
|
|
cpu_src1 = get_src1(insn, cpu_src1);
|
|
do_branch_reg(dc, target, insn, cpu_cond, cpu_src1);
|
|
goto jmp_insn;
|
|
}
|
|
case 0x5: /* V9 FBPcc */
|
|
{
|
|
int cc = GET_FIELD_SP(insn, 20, 21);
|
|
if (gen_trap_ifnofpu(dc, cpu_cond))
|
|
goto jmp_insn;
|
|
target = GET_FIELD_SP(insn, 0, 18);
|
|
target = sign_extend(target, 19);
|
|
target <<= 2;
|
|
do_fbranch(dc, target, insn, cc, cpu_cond);
|
|
goto jmp_insn;
|
|
}
|
|
#else
|
|
case 0x7: /* CBN+x */
|
|
{
|
|
goto ncp_insn;
|
|
}
|
|
#endif
|
|
case 0x2: /* BN+x */
|
|
{
|
|
target = GET_FIELD(insn, 10, 31);
|
|
target = sign_extend(target, 22);
|
|
target <<= 2;
|
|
do_branch(dc, target, insn, 0, cpu_cond);
|
|
goto jmp_insn;
|
|
}
|
|
case 0x6: /* FBN+x */
|
|
{
|
|
if (gen_trap_ifnofpu(dc, cpu_cond))
|
|
goto jmp_insn;
|
|
target = GET_FIELD(insn, 10, 31);
|
|
target = sign_extend(target, 22);
|
|
target <<= 2;
|
|
do_fbranch(dc, target, insn, 0, cpu_cond);
|
|
goto jmp_insn;
|
|
}
|
|
case 0x4: /* SETHI */
|
|
if (rd) { // nop
|
|
uint32_t value = GET_FIELD(insn, 10, 31);
|
|
TCGv r_const;
|
|
|
|
r_const = tcg_const_tl(value << 10);
|
|
gen_movl_TN_reg(rd, r_const);
|
|
tcg_temp_free(r_const);
|
|
}
|
|
break;
|
|
case 0x0: /* UNIMPL */
|
|
default:
|
|
goto illegal_insn;
|
|
}
|
|
break;
|
|
}
|
|
break;
|
|
case 1: /*CALL*/
|
|
{
|
|
target_long target = GET_FIELDs(insn, 2, 31) << 2;
|
|
TCGv r_const;
|
|
|
|
r_const = tcg_const_tl(dc->pc);
|
|
gen_movl_TN_reg(15, r_const);
|
|
tcg_temp_free(r_const);
|
|
target += dc->pc;
|
|
gen_mov_pc_npc(dc, cpu_cond);
|
|
dc->npc = target;
|
|
}
|
|
goto jmp_insn;
|
|
case 2: /* FPU & Logical Operations */
|
|
{
|
|
unsigned int xop = GET_FIELD(insn, 7, 12);
|
|
if (xop == 0x3a) { /* generate trap */
|
|
int cond;
|
|
|
|
cpu_src1 = get_src1(insn, cpu_src1);
|
|
if (IS_IMM) {
|
|
rs2 = GET_FIELD(insn, 25, 31);
|
|
tcg_gen_addi_tl(cpu_dst, cpu_src1, rs2);
|
|
} else {
|
|
rs2 = GET_FIELD(insn, 27, 31);
|
|
if (rs2 != 0) {
|
|
gen_movl_reg_TN(rs2, cpu_src2);
|
|
tcg_gen_add_tl(cpu_dst, cpu_src1, cpu_src2);
|
|
} else
|
|
tcg_gen_mov_tl(cpu_dst, cpu_src1);
|
|
}
|
|
cond = GET_FIELD(insn, 3, 6);
|
|
if (cond == 0x8) {
|
|
save_state(dc, cpu_cond);
|
|
if ((dc->def->features & CPU_FEATURE_HYPV) &&
|
|
supervisor(dc))
|
|
tcg_gen_andi_tl(cpu_dst, cpu_dst, UA2005_HTRAP_MASK);
|
|
else
|
|
tcg_gen_andi_tl(cpu_dst, cpu_dst, V8_TRAP_MASK);
|
|
tcg_gen_addi_tl(cpu_dst, cpu_dst, TT_TRAP);
|
|
tcg_gen_trunc_tl_i32(cpu_tmp32, cpu_dst);
|
|
gen_helper_raise_exception(cpu_tmp32);
|
|
} else if (cond != 0) {
|
|
TCGv r_cond = tcg_temp_new();
|
|
int l1;
|
|
#ifdef TARGET_SPARC64
|
|
/* V9 icc/xcc */
|
|
int cc = GET_FIELD_SP(insn, 11, 12);
|
|
|
|
save_state(dc, cpu_cond);
|
|
if (cc == 0)
|
|
gen_cond(r_cond, 0, cond, dc);
|
|
else if (cc == 2)
|
|
gen_cond(r_cond, 1, cond, dc);
|
|
else
|
|
goto illegal_insn;
|
|
#else
|
|
save_state(dc, cpu_cond);
|
|
gen_cond(r_cond, 0, cond, dc);
|
|
#endif
|
|
l1 = gen_new_label();
|
|
tcg_gen_brcondi_tl(TCG_COND_EQ, r_cond, 0, l1);
|
|
|
|
if ((dc->def->features & CPU_FEATURE_HYPV) &&
|
|
supervisor(dc))
|
|
tcg_gen_andi_tl(cpu_dst, cpu_dst, UA2005_HTRAP_MASK);
|
|
else
|
|
tcg_gen_andi_tl(cpu_dst, cpu_dst, V8_TRAP_MASK);
|
|
tcg_gen_addi_tl(cpu_dst, cpu_dst, TT_TRAP);
|
|
tcg_gen_trunc_tl_i32(cpu_tmp32, cpu_dst);
|
|
gen_helper_raise_exception(cpu_tmp32);
|
|
|
|
gen_set_label(l1);
|
|
tcg_temp_free(r_cond);
|
|
}
|
|
gen_op_next_insn();
|
|
tcg_gen_exit_tb(0);
|
|
dc->is_br = 1;
|
|
goto jmp_insn;
|
|
} else if (xop == 0x28) {
|
|
rs1 = GET_FIELD(insn, 13, 17);
|
|
switch(rs1) {
|
|
case 0: /* rdy */
|
|
#ifndef TARGET_SPARC64
|
|
case 0x01 ... 0x0e: /* undefined in the SPARCv8
|
|
manual, rdy on the microSPARC
|
|
II */
|
|
case 0x0f: /* stbar in the SPARCv8 manual,
|
|
rdy on the microSPARC II */
|
|
case 0x10 ... 0x1f: /* implementation-dependent in the
|
|
SPARCv8 manual, rdy on the
|
|
microSPARC II */
|
|
#endif
|
|
gen_movl_TN_reg(rd, cpu_y);
|
|
break;
|
|
#ifdef TARGET_SPARC64
|
|
case 0x2: /* V9 rdccr */
|
|
gen_helper_compute_psr();
|
|
gen_helper_rdccr(cpu_dst);
|
|
gen_movl_TN_reg(rd, cpu_dst);
|
|
break;
|
|
case 0x3: /* V9 rdasi */
|
|
tcg_gen_ext_i32_tl(cpu_dst, cpu_asi);
|
|
gen_movl_TN_reg(rd, cpu_dst);
|
|
break;
|
|
case 0x4: /* V9 rdtick */
|
|
{
|
|
TCGv_ptr r_tickptr;
|
|
|
|
r_tickptr = tcg_temp_new_ptr();
|
|
tcg_gen_ld_ptr(r_tickptr, cpu_env,
|
|
offsetof(CPUState, tick));
|
|
gen_helper_tick_get_count(cpu_dst, r_tickptr);
|
|
tcg_temp_free_ptr(r_tickptr);
|
|
gen_movl_TN_reg(rd, cpu_dst);
|
|
}
|
|
break;
|
|
case 0x5: /* V9 rdpc */
|
|
{
|
|
TCGv r_const;
|
|
|
|
r_const = tcg_const_tl(dc->pc);
|
|
gen_movl_TN_reg(rd, r_const);
|
|
tcg_temp_free(r_const);
|
|
}
|
|
break;
|
|
case 0x6: /* V9 rdfprs */
|
|
tcg_gen_ext_i32_tl(cpu_dst, cpu_fprs);
|
|
gen_movl_TN_reg(rd, cpu_dst);
|
|
break;
|
|
case 0xf: /* V9 membar */
|
|
break; /* no effect */
|
|
case 0x13: /* Graphics Status */
|
|
if (gen_trap_ifnofpu(dc, cpu_cond))
|
|
goto jmp_insn;
|
|
gen_movl_TN_reg(rd, cpu_gsr);
|
|
break;
|
|
case 0x16: /* Softint */
|
|
tcg_gen_ext_i32_tl(cpu_dst, cpu_softint);
|
|
gen_movl_TN_reg(rd, cpu_dst);
|
|
break;
|
|
case 0x17: /* Tick compare */
|
|
gen_movl_TN_reg(rd, cpu_tick_cmpr);
|
|
break;
|
|
case 0x18: /* System tick */
|
|
{
|
|
TCGv_ptr r_tickptr;
|
|
|
|
r_tickptr = tcg_temp_new_ptr();
|
|
tcg_gen_ld_ptr(r_tickptr, cpu_env,
|
|
offsetof(CPUState, stick));
|
|
gen_helper_tick_get_count(cpu_dst, r_tickptr);
|
|
tcg_temp_free_ptr(r_tickptr);
|
|
gen_movl_TN_reg(rd, cpu_dst);
|
|
}
|
|
break;
|
|
case 0x19: /* System tick compare */
|
|
gen_movl_TN_reg(rd, cpu_stick_cmpr);
|
|
break;
|
|
case 0x10: /* Performance Control */
|
|
case 0x11: /* Performance Instrumentation Counter */
|
|
case 0x12: /* Dispatch Control */
|
|
case 0x14: /* Softint set, WO */
|
|
case 0x15: /* Softint clear, WO */
|
|
#endif
|
|
default:
|
|
goto illegal_insn;
|
|
}
|
|
#if !defined(CONFIG_USER_ONLY)
|
|
} else if (xop == 0x29) { /* rdpsr / UA2005 rdhpr */
|
|
#ifndef TARGET_SPARC64
|
|
if (!supervisor(dc))
|
|
goto priv_insn;
|
|
gen_helper_compute_psr();
|
|
dc->cc_op = CC_OP_FLAGS;
|
|
gen_helper_rdpsr(cpu_dst);
|
|
#else
|
|
CHECK_IU_FEATURE(dc, HYPV);
|
|
if (!hypervisor(dc))
|
|
goto priv_insn;
|
|
rs1 = GET_FIELD(insn, 13, 17);
|
|
switch (rs1) {
|
|
case 0: // hpstate
|
|
// gen_op_rdhpstate();
|
|
break;
|
|
case 1: // htstate
|
|
// gen_op_rdhtstate();
|
|
break;
|
|
case 3: // hintp
|
|
tcg_gen_mov_tl(cpu_dst, cpu_hintp);
|
|
break;
|
|
case 5: // htba
|
|
tcg_gen_mov_tl(cpu_dst, cpu_htba);
|
|
break;
|
|
case 6: // hver
|
|
tcg_gen_mov_tl(cpu_dst, cpu_hver);
|
|
break;
|
|
case 31: // hstick_cmpr
|
|
tcg_gen_mov_tl(cpu_dst, cpu_hstick_cmpr);
|
|
break;
|
|
default:
|
|
goto illegal_insn;
|
|
}
|
|
#endif
|
|
gen_movl_TN_reg(rd, cpu_dst);
|
|
break;
|
|
} else if (xop == 0x2a) { /* rdwim / V9 rdpr */
|
|
if (!supervisor(dc))
|
|
goto priv_insn;
|
|
#ifdef TARGET_SPARC64
|
|
rs1 = GET_FIELD(insn, 13, 17);
|
|
switch (rs1) {
|
|
case 0: // tpc
|
|
{
|
|
TCGv_ptr r_tsptr;
|
|
|
|
r_tsptr = tcg_temp_new_ptr();
|
|
gen_load_trap_state_at_tl(r_tsptr, cpu_env);
|
|
tcg_gen_ld_tl(cpu_tmp0, r_tsptr,
|
|
offsetof(trap_state, tpc));
|
|
tcg_temp_free_ptr(r_tsptr);
|
|
}
|
|
break;
|
|
case 1: // tnpc
|
|
{
|
|
TCGv_ptr r_tsptr;
|
|
|
|
r_tsptr = tcg_temp_new_ptr();
|
|
gen_load_trap_state_at_tl(r_tsptr, cpu_env);
|
|
tcg_gen_ld_tl(cpu_tmp0, r_tsptr,
|
|
offsetof(trap_state, tnpc));
|
|
tcg_temp_free_ptr(r_tsptr);
|
|
}
|
|
break;
|
|
case 2: // tstate
|
|
{
|
|
TCGv_ptr r_tsptr;
|
|
|
|
r_tsptr = tcg_temp_new_ptr();
|
|
gen_load_trap_state_at_tl(r_tsptr, cpu_env);
|
|
tcg_gen_ld_tl(cpu_tmp0, r_tsptr,
|
|
offsetof(trap_state, tstate));
|
|
tcg_temp_free_ptr(r_tsptr);
|
|
}
|
|
break;
|
|
case 3: // tt
|
|
{
|
|
TCGv_ptr r_tsptr;
|
|
|
|
r_tsptr = tcg_temp_new_ptr();
|
|
gen_load_trap_state_at_tl(r_tsptr, cpu_env);
|
|
tcg_gen_ld_i32(cpu_tmp32, r_tsptr,
|
|
offsetof(trap_state, tt));
|
|
tcg_temp_free_ptr(r_tsptr);
|
|
tcg_gen_ext_i32_tl(cpu_tmp0, cpu_tmp32);
|
|
}
|
|
break;
|
|
case 4: // tick
|
|
{
|
|
TCGv_ptr r_tickptr;
|
|
|
|
r_tickptr = tcg_temp_new_ptr();
|
|
tcg_gen_ld_ptr(r_tickptr, cpu_env,
|
|
offsetof(CPUState, tick));
|
|
gen_helper_tick_get_count(cpu_tmp0, r_tickptr);
|
|
gen_movl_TN_reg(rd, cpu_tmp0);
|
|
tcg_temp_free_ptr(r_tickptr);
|
|
}
|
|
break;
|
|
case 5: // tba
|
|
tcg_gen_mov_tl(cpu_tmp0, cpu_tbr);
|
|
break;
|
|
case 6: // pstate
|
|
tcg_gen_ld_i32(cpu_tmp32, cpu_env,
|
|
offsetof(CPUSPARCState, pstate));
|
|
tcg_gen_ext_i32_tl(cpu_tmp0, cpu_tmp32);
|
|
break;
|
|
case 7: // tl
|
|
tcg_gen_ld_i32(cpu_tmp32, cpu_env,
|
|
offsetof(CPUSPARCState, tl));
|
|
tcg_gen_ext_i32_tl(cpu_tmp0, cpu_tmp32);
|
|
break;
|
|
case 8: // pil
|
|
tcg_gen_ld_i32(cpu_tmp32, cpu_env,
|
|
offsetof(CPUSPARCState, psrpil));
|
|
tcg_gen_ext_i32_tl(cpu_tmp0, cpu_tmp32);
|
|
break;
|
|
case 9: // cwp
|
|
gen_helper_rdcwp(cpu_tmp0);
|
|
break;
|
|
case 10: // cansave
|
|
tcg_gen_ld_i32(cpu_tmp32, cpu_env,
|
|
offsetof(CPUSPARCState, cansave));
|
|
tcg_gen_ext_i32_tl(cpu_tmp0, cpu_tmp32);
|
|
break;
|
|
case 11: // canrestore
|
|
tcg_gen_ld_i32(cpu_tmp32, cpu_env,
|
|
offsetof(CPUSPARCState, canrestore));
|
|
tcg_gen_ext_i32_tl(cpu_tmp0, cpu_tmp32);
|
|
break;
|
|
case 12: // cleanwin
|
|
tcg_gen_ld_i32(cpu_tmp32, cpu_env,
|
|
offsetof(CPUSPARCState, cleanwin));
|
|
tcg_gen_ext_i32_tl(cpu_tmp0, cpu_tmp32);
|
|
break;
|
|
case 13: // otherwin
|
|
tcg_gen_ld_i32(cpu_tmp32, cpu_env,
|
|
offsetof(CPUSPARCState, otherwin));
|
|
tcg_gen_ext_i32_tl(cpu_tmp0, cpu_tmp32);
|
|
break;
|
|
case 14: // wstate
|
|
tcg_gen_ld_i32(cpu_tmp32, cpu_env,
|
|
offsetof(CPUSPARCState, wstate));
|
|
tcg_gen_ext_i32_tl(cpu_tmp0, cpu_tmp32);
|
|
break;
|
|
case 16: // UA2005 gl
|
|
CHECK_IU_FEATURE(dc, GL);
|
|
tcg_gen_ld_i32(cpu_tmp32, cpu_env,
|
|
offsetof(CPUSPARCState, gl));
|
|
tcg_gen_ext_i32_tl(cpu_tmp0, cpu_tmp32);
|
|
break;
|
|
case 26: // UA2005 strand status
|
|
CHECK_IU_FEATURE(dc, HYPV);
|
|
if (!hypervisor(dc))
|
|
goto priv_insn;
|
|
tcg_gen_mov_tl(cpu_tmp0, cpu_ssr);
|
|
break;
|
|
case 31: // ver
|
|
tcg_gen_mov_tl(cpu_tmp0, cpu_ver);
|
|
break;
|
|
case 15: // fq
|
|
default:
|
|
goto illegal_insn;
|
|
}
|
|
#else
|
|
tcg_gen_ext_i32_tl(cpu_tmp0, cpu_wim);
|
|
#endif
|
|
gen_movl_TN_reg(rd, cpu_tmp0);
|
|
break;
|
|
} else if (xop == 0x2b) { /* rdtbr / V9 flushw */
|
|
#ifdef TARGET_SPARC64
|
|
save_state(dc, cpu_cond);
|
|
gen_helper_flushw();
|
|
#else
|
|
if (!supervisor(dc))
|
|
goto priv_insn;
|
|
gen_movl_TN_reg(rd, cpu_tbr);
|
|
#endif
|
|
break;
|
|
#endif
|
|
} else if (xop == 0x34) { /* FPU Operations */
|
|
if (gen_trap_ifnofpu(dc, cpu_cond))
|
|
goto jmp_insn;
|
|
gen_op_clear_ieee_excp_and_FTT();
|
|
rs1 = GET_FIELD(insn, 13, 17);
|
|
rs2 = GET_FIELD(insn, 27, 31);
|
|
xop = GET_FIELD(insn, 18, 26);
|
|
switch (xop) {
|
|
case 0x1: /* fmovs */
|
|
tcg_gen_mov_i32(cpu_fpr[rd], cpu_fpr[rs2]);
|
|
break;
|
|
case 0x5: /* fnegs */
|
|
gen_helper_fnegs(cpu_fpr[rd], cpu_fpr[rs2]);
|
|
break;
|
|
case 0x9: /* fabss */
|
|
gen_helper_fabss(cpu_fpr[rd], cpu_fpr[rs2]);
|
|
break;
|
|
case 0x29: /* fsqrts */
|
|
CHECK_FPU_FEATURE(dc, FSQRT);
|
|
gen_clear_float_exceptions();
|
|
gen_helper_fsqrts(cpu_tmp32, cpu_fpr[rs2]);
|
|
gen_helper_check_ieee_exceptions();
|
|
tcg_gen_mov_i32(cpu_fpr[rd], cpu_tmp32);
|
|
break;
|
|
case 0x2a: /* fsqrtd */
|
|
CHECK_FPU_FEATURE(dc, FSQRT);
|
|
gen_op_load_fpr_DT1(DFPREG(rs2));
|
|
gen_clear_float_exceptions();
|
|
gen_helper_fsqrtd();
|
|
gen_helper_check_ieee_exceptions();
|
|
gen_op_store_DT0_fpr(DFPREG(rd));
|
|
break;
|
|
case 0x2b: /* fsqrtq */
|
|
CHECK_FPU_FEATURE(dc, FLOAT128);
|
|
gen_op_load_fpr_QT1(QFPREG(rs2));
|
|
gen_clear_float_exceptions();
|
|
gen_helper_fsqrtq();
|
|
gen_helper_check_ieee_exceptions();
|
|
gen_op_store_QT0_fpr(QFPREG(rd));
|
|
break;
|
|
case 0x41: /* fadds */
|
|
gen_clear_float_exceptions();
|
|
gen_helper_fadds(cpu_tmp32, cpu_fpr[rs1], cpu_fpr[rs2]);
|
|
gen_helper_check_ieee_exceptions();
|
|
tcg_gen_mov_i32(cpu_fpr[rd], cpu_tmp32);
|
|
break;
|
|
case 0x42: /* faddd */
|
|
gen_op_load_fpr_DT0(DFPREG(rs1));
|
|
gen_op_load_fpr_DT1(DFPREG(rs2));
|
|
gen_clear_float_exceptions();
|
|
gen_helper_faddd();
|
|
gen_helper_check_ieee_exceptions();
|
|
gen_op_store_DT0_fpr(DFPREG(rd));
|
|
break;
|
|
case 0x43: /* faddq */
|
|
CHECK_FPU_FEATURE(dc, FLOAT128);
|
|
gen_op_load_fpr_QT0(QFPREG(rs1));
|
|
gen_op_load_fpr_QT1(QFPREG(rs2));
|
|
gen_clear_float_exceptions();
|
|
gen_helper_faddq();
|
|
gen_helper_check_ieee_exceptions();
|
|
gen_op_store_QT0_fpr(QFPREG(rd));
|
|
break;
|
|
case 0x45: /* fsubs */
|
|
gen_clear_float_exceptions();
|
|
gen_helper_fsubs(cpu_tmp32, cpu_fpr[rs1], cpu_fpr[rs2]);
|
|
gen_helper_check_ieee_exceptions();
|
|
tcg_gen_mov_i32(cpu_fpr[rd], cpu_tmp32);
|
|
break;
|
|
case 0x46: /* fsubd */
|
|
gen_op_load_fpr_DT0(DFPREG(rs1));
|
|
gen_op_load_fpr_DT1(DFPREG(rs2));
|
|
gen_clear_float_exceptions();
|
|
gen_helper_fsubd();
|
|
gen_helper_check_ieee_exceptions();
|
|
gen_op_store_DT0_fpr(DFPREG(rd));
|
|
break;
|
|
case 0x47: /* fsubq */
|
|
CHECK_FPU_FEATURE(dc, FLOAT128);
|
|
gen_op_load_fpr_QT0(QFPREG(rs1));
|
|
gen_op_load_fpr_QT1(QFPREG(rs2));
|
|
gen_clear_float_exceptions();
|
|
gen_helper_fsubq();
|
|
gen_helper_check_ieee_exceptions();
|
|
gen_op_store_QT0_fpr(QFPREG(rd));
|
|
break;
|
|
case 0x49: /* fmuls */
|
|
CHECK_FPU_FEATURE(dc, FMUL);
|
|
gen_clear_float_exceptions();
|
|
gen_helper_fmuls(cpu_tmp32, cpu_fpr[rs1], cpu_fpr[rs2]);
|
|
gen_helper_check_ieee_exceptions();
|
|
tcg_gen_mov_i32(cpu_fpr[rd], cpu_tmp32);
|
|
break;
|
|
case 0x4a: /* fmuld */
|
|
CHECK_FPU_FEATURE(dc, FMUL);
|
|
gen_op_load_fpr_DT0(DFPREG(rs1));
|
|
gen_op_load_fpr_DT1(DFPREG(rs2));
|
|
gen_clear_float_exceptions();
|
|
gen_helper_fmuld();
|
|
gen_helper_check_ieee_exceptions();
|
|
gen_op_store_DT0_fpr(DFPREG(rd));
|
|
break;
|
|
case 0x4b: /* fmulq */
|
|
CHECK_FPU_FEATURE(dc, FLOAT128);
|
|
CHECK_FPU_FEATURE(dc, FMUL);
|
|
gen_op_load_fpr_QT0(QFPREG(rs1));
|
|
gen_op_load_fpr_QT1(QFPREG(rs2));
|
|
gen_clear_float_exceptions();
|
|
gen_helper_fmulq();
|
|
gen_helper_check_ieee_exceptions();
|
|
gen_op_store_QT0_fpr(QFPREG(rd));
|
|
break;
|
|
case 0x4d: /* fdivs */
|
|
gen_clear_float_exceptions();
|
|
gen_helper_fdivs(cpu_tmp32, cpu_fpr[rs1], cpu_fpr[rs2]);
|
|
gen_helper_check_ieee_exceptions();
|
|
tcg_gen_mov_i32(cpu_fpr[rd], cpu_tmp32);
|
|
break;
|
|
case 0x4e: /* fdivd */
|
|
gen_op_load_fpr_DT0(DFPREG(rs1));
|
|
gen_op_load_fpr_DT1(DFPREG(rs2));
|
|
gen_clear_float_exceptions();
|
|
gen_helper_fdivd();
|
|
gen_helper_check_ieee_exceptions();
|
|
gen_op_store_DT0_fpr(DFPREG(rd));
|
|
break;
|
|
case 0x4f: /* fdivq */
|
|
CHECK_FPU_FEATURE(dc, FLOAT128);
|
|
gen_op_load_fpr_QT0(QFPREG(rs1));
|
|
gen_op_load_fpr_QT1(QFPREG(rs2));
|
|
gen_clear_float_exceptions();
|
|
gen_helper_fdivq();
|
|
gen_helper_check_ieee_exceptions();
|
|
gen_op_store_QT0_fpr(QFPREG(rd));
|
|
break;
|
|
case 0x69: /* fsmuld */
|
|
CHECK_FPU_FEATURE(dc, FSMULD);
|
|
gen_clear_float_exceptions();
|
|
gen_helper_fsmuld(cpu_fpr[rs1], cpu_fpr[rs2]);
|
|
gen_helper_check_ieee_exceptions();
|
|
gen_op_store_DT0_fpr(DFPREG(rd));
|
|
break;
|
|
case 0x6e: /* fdmulq */
|
|
CHECK_FPU_FEATURE(dc, FLOAT128);
|
|
gen_op_load_fpr_DT0(DFPREG(rs1));
|
|
gen_op_load_fpr_DT1(DFPREG(rs2));
|
|
gen_clear_float_exceptions();
|
|
gen_helper_fdmulq();
|
|
gen_helper_check_ieee_exceptions();
|
|
gen_op_store_QT0_fpr(QFPREG(rd));
|
|
break;
|
|
case 0xc4: /* fitos */
|
|
gen_clear_float_exceptions();
|
|
gen_helper_fitos(cpu_tmp32, cpu_fpr[rs2]);
|
|
gen_helper_check_ieee_exceptions();
|
|
tcg_gen_mov_i32(cpu_fpr[rd], cpu_tmp32);
|
|
break;
|
|
case 0xc6: /* fdtos */
|
|
gen_op_load_fpr_DT1(DFPREG(rs2));
|
|
gen_clear_float_exceptions();
|
|
gen_helper_fdtos(cpu_tmp32);
|
|
gen_helper_check_ieee_exceptions();
|
|
tcg_gen_mov_i32(cpu_fpr[rd], cpu_tmp32);
|
|
break;
|
|
case 0xc7: /* fqtos */
|
|
CHECK_FPU_FEATURE(dc, FLOAT128);
|
|
gen_op_load_fpr_QT1(QFPREG(rs2));
|
|
gen_clear_float_exceptions();
|
|
gen_helper_fqtos(cpu_tmp32);
|
|
gen_helper_check_ieee_exceptions();
|
|
tcg_gen_mov_i32(cpu_fpr[rd], cpu_tmp32);
|
|
break;
|
|
case 0xc8: /* fitod */
|
|
gen_helper_fitod(cpu_fpr[rs2]);
|
|
gen_op_store_DT0_fpr(DFPREG(rd));
|
|
break;
|
|
case 0xc9: /* fstod */
|
|
gen_helper_fstod(cpu_fpr[rs2]);
|
|
gen_op_store_DT0_fpr(DFPREG(rd));
|
|
break;
|
|
case 0xcb: /* fqtod */
|
|
CHECK_FPU_FEATURE(dc, FLOAT128);
|
|
gen_op_load_fpr_QT1(QFPREG(rs2));
|
|
gen_clear_float_exceptions();
|
|
gen_helper_fqtod();
|
|
gen_helper_check_ieee_exceptions();
|
|
gen_op_store_DT0_fpr(DFPREG(rd));
|
|
break;
|
|
case 0xcc: /* fitoq */
|
|
CHECK_FPU_FEATURE(dc, FLOAT128);
|
|
gen_helper_fitoq(cpu_fpr[rs2]);
|
|
gen_op_store_QT0_fpr(QFPREG(rd));
|
|
break;
|
|
case 0xcd: /* fstoq */
|
|
CHECK_FPU_FEATURE(dc, FLOAT128);
|
|
gen_helper_fstoq(cpu_fpr[rs2]);
|
|
gen_op_store_QT0_fpr(QFPREG(rd));
|
|
break;
|
|
case 0xce: /* fdtoq */
|
|
CHECK_FPU_FEATURE(dc, FLOAT128);
|
|
gen_op_load_fpr_DT1(DFPREG(rs2));
|
|
gen_helper_fdtoq();
|
|
gen_op_store_QT0_fpr(QFPREG(rd));
|
|
break;
|
|
case 0xd1: /* fstoi */
|
|
gen_clear_float_exceptions();
|
|
gen_helper_fstoi(cpu_tmp32, cpu_fpr[rs2]);
|
|
gen_helper_check_ieee_exceptions();
|
|
tcg_gen_mov_i32(cpu_fpr[rd], cpu_tmp32);
|
|
break;
|
|
case 0xd2: /* fdtoi */
|
|
gen_op_load_fpr_DT1(DFPREG(rs2));
|
|
gen_clear_float_exceptions();
|
|
gen_helper_fdtoi(cpu_tmp32);
|
|
gen_helper_check_ieee_exceptions();
|
|
tcg_gen_mov_i32(cpu_fpr[rd], cpu_tmp32);
|
|
break;
|
|
case 0xd3: /* fqtoi */
|
|
CHECK_FPU_FEATURE(dc, FLOAT128);
|
|
gen_op_load_fpr_QT1(QFPREG(rs2));
|
|
gen_clear_float_exceptions();
|
|
gen_helper_fqtoi(cpu_tmp32);
|
|
gen_helper_check_ieee_exceptions();
|
|
tcg_gen_mov_i32(cpu_fpr[rd], cpu_tmp32);
|
|
break;
|
|
#ifdef TARGET_SPARC64
|
|
case 0x2: /* V9 fmovd */
|
|
tcg_gen_mov_i32(cpu_fpr[DFPREG(rd)], cpu_fpr[DFPREG(rs2)]);
|
|
tcg_gen_mov_i32(cpu_fpr[DFPREG(rd) + 1],
|
|
cpu_fpr[DFPREG(rs2) + 1]);
|
|
break;
|
|
case 0x3: /* V9 fmovq */
|
|
CHECK_FPU_FEATURE(dc, FLOAT128);
|
|
tcg_gen_mov_i32(cpu_fpr[QFPREG(rd)], cpu_fpr[QFPREG(rs2)]);
|
|
tcg_gen_mov_i32(cpu_fpr[QFPREG(rd) + 1],
|
|
cpu_fpr[QFPREG(rs2) + 1]);
|
|
tcg_gen_mov_i32(cpu_fpr[QFPREG(rd) + 2],
|
|
cpu_fpr[QFPREG(rs2) + 2]);
|
|
tcg_gen_mov_i32(cpu_fpr[QFPREG(rd) + 3],
|
|
cpu_fpr[QFPREG(rs2) + 3]);
|
|
break;
|
|
case 0x6: /* V9 fnegd */
|
|
gen_op_load_fpr_DT1(DFPREG(rs2));
|
|
gen_helper_fnegd();
|
|
gen_op_store_DT0_fpr(DFPREG(rd));
|
|
break;
|
|
case 0x7: /* V9 fnegq */
|
|
CHECK_FPU_FEATURE(dc, FLOAT128);
|
|
gen_op_load_fpr_QT1(QFPREG(rs2));
|
|
gen_helper_fnegq();
|
|
gen_op_store_QT0_fpr(QFPREG(rd));
|
|
break;
|
|
case 0xa: /* V9 fabsd */
|
|
gen_op_load_fpr_DT1(DFPREG(rs2));
|
|
gen_helper_fabsd();
|
|
gen_op_store_DT0_fpr(DFPREG(rd));
|
|
break;
|
|
case 0xb: /* V9 fabsq */
|
|
CHECK_FPU_FEATURE(dc, FLOAT128);
|
|
gen_op_load_fpr_QT1(QFPREG(rs2));
|
|
gen_helper_fabsq();
|
|
gen_op_store_QT0_fpr(QFPREG(rd));
|
|
break;
|
|
case 0x81: /* V9 fstox */
|
|
gen_clear_float_exceptions();
|
|
gen_helper_fstox(cpu_fpr[rs2]);
|
|
gen_helper_check_ieee_exceptions();
|
|
gen_op_store_DT0_fpr(DFPREG(rd));
|
|
break;
|
|
case 0x82: /* V9 fdtox */
|
|
gen_op_load_fpr_DT1(DFPREG(rs2));
|
|
gen_clear_float_exceptions();
|
|
gen_helper_fdtox();
|
|
gen_helper_check_ieee_exceptions();
|
|
gen_op_store_DT0_fpr(DFPREG(rd));
|
|
break;
|
|
case 0x83: /* V9 fqtox */
|
|
CHECK_FPU_FEATURE(dc, FLOAT128);
|
|
gen_op_load_fpr_QT1(QFPREG(rs2));
|
|
gen_clear_float_exceptions();
|
|
gen_helper_fqtox();
|
|
gen_helper_check_ieee_exceptions();
|
|
gen_op_store_DT0_fpr(DFPREG(rd));
|
|
break;
|
|
case 0x84: /* V9 fxtos */
|
|
gen_op_load_fpr_DT1(DFPREG(rs2));
|
|
gen_clear_float_exceptions();
|
|
gen_helper_fxtos(cpu_tmp32);
|
|
gen_helper_check_ieee_exceptions();
|
|
tcg_gen_mov_i32(cpu_fpr[rd], cpu_tmp32);
|
|
break;
|
|
case 0x88: /* V9 fxtod */
|
|
gen_op_load_fpr_DT1(DFPREG(rs2));
|
|
gen_clear_float_exceptions();
|
|
gen_helper_fxtod();
|
|
gen_helper_check_ieee_exceptions();
|
|
gen_op_store_DT0_fpr(DFPREG(rd));
|
|
break;
|
|
case 0x8c: /* V9 fxtoq */
|
|
CHECK_FPU_FEATURE(dc, FLOAT128);
|
|
gen_op_load_fpr_DT1(DFPREG(rs2));
|
|
gen_clear_float_exceptions();
|
|
gen_helper_fxtoq();
|
|
gen_helper_check_ieee_exceptions();
|
|
gen_op_store_QT0_fpr(QFPREG(rd));
|
|
break;
|
|
#endif
|
|
default:
|
|
goto illegal_insn;
|
|
}
|
|
} else if (xop == 0x35) { /* FPU Operations */
|
|
#ifdef TARGET_SPARC64
|
|
int cond;
|
|
#endif
|
|
if (gen_trap_ifnofpu(dc, cpu_cond))
|
|
goto jmp_insn;
|
|
gen_op_clear_ieee_excp_and_FTT();
|
|
rs1 = GET_FIELD(insn, 13, 17);
|
|
rs2 = GET_FIELD(insn, 27, 31);
|
|
xop = GET_FIELD(insn, 18, 26);
|
|
#ifdef TARGET_SPARC64
|
|
if ((xop & 0x11f) == 0x005) { // V9 fmovsr
|
|
int l1;
|
|
|
|
l1 = gen_new_label();
|
|
cond = GET_FIELD_SP(insn, 14, 17);
|
|
cpu_src1 = get_src1(insn, cpu_src1);
|
|
tcg_gen_brcondi_tl(gen_tcg_cond_reg[cond], cpu_src1,
|
|
0, l1);
|
|
tcg_gen_mov_i32(cpu_fpr[rd], cpu_fpr[rs2]);
|
|
gen_set_label(l1);
|
|
break;
|
|
} else if ((xop & 0x11f) == 0x006) { // V9 fmovdr
|
|
int l1;
|
|
|
|
l1 = gen_new_label();
|
|
cond = GET_FIELD_SP(insn, 14, 17);
|
|
cpu_src1 = get_src1(insn, cpu_src1);
|
|
tcg_gen_brcondi_tl(gen_tcg_cond_reg[cond], cpu_src1,
|
|
0, l1);
|
|
tcg_gen_mov_i32(cpu_fpr[DFPREG(rd)], cpu_fpr[DFPREG(rs2)]);
|
|
tcg_gen_mov_i32(cpu_fpr[DFPREG(rd) + 1], cpu_fpr[DFPREG(rs2) + 1]);
|
|
gen_set_label(l1);
|
|
break;
|
|
} else if ((xop & 0x11f) == 0x007) { // V9 fmovqr
|
|
int l1;
|
|
|
|
CHECK_FPU_FEATURE(dc, FLOAT128);
|
|
l1 = gen_new_label();
|
|
cond = GET_FIELD_SP(insn, 14, 17);
|
|
cpu_src1 = get_src1(insn, cpu_src1);
|
|
tcg_gen_brcondi_tl(gen_tcg_cond_reg[cond], cpu_src1,
|
|
0, l1);
|
|
tcg_gen_mov_i32(cpu_fpr[QFPREG(rd)], cpu_fpr[QFPREG(rs2)]);
|
|
tcg_gen_mov_i32(cpu_fpr[QFPREG(rd) + 1], cpu_fpr[QFPREG(rs2) + 1]);
|
|
tcg_gen_mov_i32(cpu_fpr[QFPREG(rd) + 2], cpu_fpr[QFPREG(rs2) + 2]);
|
|
tcg_gen_mov_i32(cpu_fpr[QFPREG(rd) + 3], cpu_fpr[QFPREG(rs2) + 3]);
|
|
gen_set_label(l1);
|
|
break;
|
|
}
|
|
#endif
|
|
switch (xop) {
|
|
#ifdef TARGET_SPARC64
|
|
#define FMOVSCC(fcc) \
|
|
{ \
|
|
TCGv r_cond; \
|
|
int l1; \
|
|
\
|
|
l1 = gen_new_label(); \
|
|
r_cond = tcg_temp_new(); \
|
|
cond = GET_FIELD_SP(insn, 14, 17); \
|
|
gen_fcond(r_cond, fcc, cond); \
|
|
tcg_gen_brcondi_tl(TCG_COND_EQ, r_cond, \
|
|
0, l1); \
|
|
tcg_gen_mov_i32(cpu_fpr[rd], cpu_fpr[rs2]); \
|
|
gen_set_label(l1); \
|
|
tcg_temp_free(r_cond); \
|
|
}
|
|
#define FMOVDCC(fcc) \
|
|
{ \
|
|
TCGv r_cond; \
|
|
int l1; \
|
|
\
|
|
l1 = gen_new_label(); \
|
|
r_cond = tcg_temp_new(); \
|
|
cond = GET_FIELD_SP(insn, 14, 17); \
|
|
gen_fcond(r_cond, fcc, cond); \
|
|
tcg_gen_brcondi_tl(TCG_COND_EQ, r_cond, \
|
|
0, l1); \
|
|
tcg_gen_mov_i32(cpu_fpr[DFPREG(rd)], \
|
|
cpu_fpr[DFPREG(rs2)]); \
|
|
tcg_gen_mov_i32(cpu_fpr[DFPREG(rd) + 1], \
|
|
cpu_fpr[DFPREG(rs2) + 1]); \
|
|
gen_set_label(l1); \
|
|
tcg_temp_free(r_cond); \
|
|
}
|
|
#define FMOVQCC(fcc) \
|
|
{ \
|
|
TCGv r_cond; \
|
|
int l1; \
|
|
\
|
|
l1 = gen_new_label(); \
|
|
r_cond = tcg_temp_new(); \
|
|
cond = GET_FIELD_SP(insn, 14, 17); \
|
|
gen_fcond(r_cond, fcc, cond); \
|
|
tcg_gen_brcondi_tl(TCG_COND_EQ, r_cond, \
|
|
0, l1); \
|
|
tcg_gen_mov_i32(cpu_fpr[QFPREG(rd)], \
|
|
cpu_fpr[QFPREG(rs2)]); \
|
|
tcg_gen_mov_i32(cpu_fpr[QFPREG(rd) + 1], \
|
|
cpu_fpr[QFPREG(rs2) + 1]); \
|
|
tcg_gen_mov_i32(cpu_fpr[QFPREG(rd) + 2], \
|
|
cpu_fpr[QFPREG(rs2) + 2]); \
|
|
tcg_gen_mov_i32(cpu_fpr[QFPREG(rd) + 3], \
|
|
cpu_fpr[QFPREG(rs2) + 3]); \
|
|
gen_set_label(l1); \
|
|
tcg_temp_free(r_cond); \
|
|
}
|
|
case 0x001: /* V9 fmovscc %fcc0 */
|
|
FMOVSCC(0);
|
|
break;
|
|
case 0x002: /* V9 fmovdcc %fcc0 */
|
|
FMOVDCC(0);
|
|
break;
|
|
case 0x003: /* V9 fmovqcc %fcc0 */
|
|
CHECK_FPU_FEATURE(dc, FLOAT128);
|
|
FMOVQCC(0);
|
|
break;
|
|
case 0x041: /* V9 fmovscc %fcc1 */
|
|
FMOVSCC(1);
|
|
break;
|
|
case 0x042: /* V9 fmovdcc %fcc1 */
|
|
FMOVDCC(1);
|
|
break;
|
|
case 0x043: /* V9 fmovqcc %fcc1 */
|
|
CHECK_FPU_FEATURE(dc, FLOAT128);
|
|
FMOVQCC(1);
|
|
break;
|
|
case 0x081: /* V9 fmovscc %fcc2 */
|
|
FMOVSCC(2);
|
|
break;
|
|
case 0x082: /* V9 fmovdcc %fcc2 */
|
|
FMOVDCC(2);
|
|
break;
|
|
case 0x083: /* V9 fmovqcc %fcc2 */
|
|
CHECK_FPU_FEATURE(dc, FLOAT128);
|
|
FMOVQCC(2);
|
|
break;
|
|
case 0x0c1: /* V9 fmovscc %fcc3 */
|
|
FMOVSCC(3);
|
|
break;
|
|
case 0x0c2: /* V9 fmovdcc %fcc3 */
|
|
FMOVDCC(3);
|
|
break;
|
|
case 0x0c3: /* V9 fmovqcc %fcc3 */
|
|
CHECK_FPU_FEATURE(dc, FLOAT128);
|
|
FMOVQCC(3);
|
|
break;
|
|
#undef FMOVSCC
|
|
#undef FMOVDCC
|
|
#undef FMOVQCC
|
|
#define FMOVSCC(icc) \
|
|
{ \
|
|
TCGv r_cond; \
|
|
int l1; \
|
|
\
|
|
l1 = gen_new_label(); \
|
|
r_cond = tcg_temp_new(); \
|
|
cond = GET_FIELD_SP(insn, 14, 17); \
|
|
gen_cond(r_cond, icc, cond, dc); \
|
|
tcg_gen_brcondi_tl(TCG_COND_EQ, r_cond, \
|
|
0, l1); \
|
|
tcg_gen_mov_i32(cpu_fpr[rd], cpu_fpr[rs2]); \
|
|
gen_set_label(l1); \
|
|
tcg_temp_free(r_cond); \
|
|
}
|
|
#define FMOVDCC(icc) \
|
|
{ \
|
|
TCGv r_cond; \
|
|
int l1; \
|
|
\
|
|
l1 = gen_new_label(); \
|
|
r_cond = tcg_temp_new(); \
|
|
cond = GET_FIELD_SP(insn, 14, 17); \
|
|
gen_cond(r_cond, icc, cond, dc); \
|
|
tcg_gen_brcondi_tl(TCG_COND_EQ, r_cond, \
|
|
0, l1); \
|
|
tcg_gen_mov_i32(cpu_fpr[DFPREG(rd)], \
|
|
cpu_fpr[DFPREG(rs2)]); \
|
|
tcg_gen_mov_i32(cpu_fpr[DFPREG(rd) + 1], \
|
|
cpu_fpr[DFPREG(rs2) + 1]); \
|
|
gen_set_label(l1); \
|
|
tcg_temp_free(r_cond); \
|
|
}
|
|
#define FMOVQCC(icc) \
|
|
{ \
|
|
TCGv r_cond; \
|
|
int l1; \
|
|
\
|
|
l1 = gen_new_label(); \
|
|
r_cond = tcg_temp_new(); \
|
|
cond = GET_FIELD_SP(insn, 14, 17); \
|
|
gen_cond(r_cond, icc, cond, dc); \
|
|
tcg_gen_brcondi_tl(TCG_COND_EQ, r_cond, \
|
|
0, l1); \
|
|
tcg_gen_mov_i32(cpu_fpr[QFPREG(rd)], \
|
|
cpu_fpr[QFPREG(rs2)]); \
|
|
tcg_gen_mov_i32(cpu_fpr[QFPREG(rd) + 1], \
|
|
cpu_fpr[QFPREG(rs2) + 1]); \
|
|
tcg_gen_mov_i32(cpu_fpr[QFPREG(rd) + 2], \
|
|
cpu_fpr[QFPREG(rs2) + 2]); \
|
|
tcg_gen_mov_i32(cpu_fpr[QFPREG(rd) + 3], \
|
|
cpu_fpr[QFPREG(rs2) + 3]); \
|
|
gen_set_label(l1); \
|
|
tcg_temp_free(r_cond); \
|
|
}
|
|
|
|
case 0x101: /* V9 fmovscc %icc */
|
|
FMOVSCC(0);
|
|
break;
|
|
case 0x102: /* V9 fmovdcc %icc */
|
|
FMOVDCC(0);
|
|
case 0x103: /* V9 fmovqcc %icc */
|
|
CHECK_FPU_FEATURE(dc, FLOAT128);
|
|
FMOVQCC(0);
|
|
break;
|
|
case 0x181: /* V9 fmovscc %xcc */
|
|
FMOVSCC(1);
|
|
break;
|
|
case 0x182: /* V9 fmovdcc %xcc */
|
|
FMOVDCC(1);
|
|
break;
|
|
case 0x183: /* V9 fmovqcc %xcc */
|
|
CHECK_FPU_FEATURE(dc, FLOAT128);
|
|
FMOVQCC(1);
|
|
break;
|
|
#undef FMOVSCC
|
|
#undef FMOVDCC
|
|
#undef FMOVQCC
|
|
#endif
|
|
case 0x51: /* fcmps, V9 %fcc */
|
|
gen_op_fcmps(rd & 3, cpu_fpr[rs1], cpu_fpr[rs2]);
|
|
break;
|
|
case 0x52: /* fcmpd, V9 %fcc */
|
|
gen_op_load_fpr_DT0(DFPREG(rs1));
|
|
gen_op_load_fpr_DT1(DFPREG(rs2));
|
|
gen_op_fcmpd(rd & 3);
|
|
break;
|
|
case 0x53: /* fcmpq, V9 %fcc */
|
|
CHECK_FPU_FEATURE(dc, FLOAT128);
|
|
gen_op_load_fpr_QT0(QFPREG(rs1));
|
|
gen_op_load_fpr_QT1(QFPREG(rs2));
|
|
gen_op_fcmpq(rd & 3);
|
|
break;
|
|
case 0x55: /* fcmpes, V9 %fcc */
|
|
gen_op_fcmpes(rd & 3, cpu_fpr[rs1], cpu_fpr[rs2]);
|
|
break;
|
|
case 0x56: /* fcmped, V9 %fcc */
|
|
gen_op_load_fpr_DT0(DFPREG(rs1));
|
|
gen_op_load_fpr_DT1(DFPREG(rs2));
|
|
gen_op_fcmped(rd & 3);
|
|
break;
|
|
case 0x57: /* fcmpeq, V9 %fcc */
|
|
CHECK_FPU_FEATURE(dc, FLOAT128);
|
|
gen_op_load_fpr_QT0(QFPREG(rs1));
|
|
gen_op_load_fpr_QT1(QFPREG(rs2));
|
|
gen_op_fcmpeq(rd & 3);
|
|
break;
|
|
default:
|
|
goto illegal_insn;
|
|
}
|
|
} else if (xop == 0x2) {
|
|
// clr/mov shortcut
|
|
|
|
rs1 = GET_FIELD(insn, 13, 17);
|
|
if (rs1 == 0) {
|
|
// or %g0, x, y -> mov T0, x; mov y, T0
|
|
if (IS_IMM) { /* immediate */
|
|
TCGv r_const;
|
|
|
|
simm = GET_FIELDs(insn, 19, 31);
|
|
r_const = tcg_const_tl(simm);
|
|
gen_movl_TN_reg(rd, r_const);
|
|
tcg_temp_free(r_const);
|
|
} else { /* register */
|
|
rs2 = GET_FIELD(insn, 27, 31);
|
|
gen_movl_reg_TN(rs2, cpu_dst);
|
|
gen_movl_TN_reg(rd, cpu_dst);
|
|
}
|
|
} else {
|
|
cpu_src1 = get_src1(insn, cpu_src1);
|
|
if (IS_IMM) { /* immediate */
|
|
simm = GET_FIELDs(insn, 19, 31);
|
|
tcg_gen_ori_tl(cpu_dst, cpu_src1, simm);
|
|
gen_movl_TN_reg(rd, cpu_dst);
|
|
} else { /* register */
|
|
// or x, %g0, y -> mov T1, x; mov y, T1
|
|
rs2 = GET_FIELD(insn, 27, 31);
|
|
if (rs2 != 0) {
|
|
gen_movl_reg_TN(rs2, cpu_src2);
|
|
tcg_gen_or_tl(cpu_dst, cpu_src1, cpu_src2);
|
|
gen_movl_TN_reg(rd, cpu_dst);
|
|
} else
|
|
gen_movl_TN_reg(rd, cpu_src1);
|
|
}
|
|
}
|
|
#ifdef TARGET_SPARC64
|
|
} else if (xop == 0x25) { /* sll, V9 sllx */
|
|
cpu_src1 = get_src1(insn, cpu_src1);
|
|
if (IS_IMM) { /* immediate */
|
|
simm = GET_FIELDs(insn, 20, 31);
|
|
if (insn & (1 << 12)) {
|
|
tcg_gen_shli_i64(cpu_dst, cpu_src1, simm & 0x3f);
|
|
} else {
|
|
tcg_gen_shli_i64(cpu_dst, cpu_src1, simm & 0x1f);
|
|
}
|
|
} else { /* register */
|
|
rs2 = GET_FIELD(insn, 27, 31);
|
|
gen_movl_reg_TN(rs2, cpu_src2);
|
|
if (insn & (1 << 12)) {
|
|
tcg_gen_andi_i64(cpu_tmp0, cpu_src2, 0x3f);
|
|
} else {
|
|
tcg_gen_andi_i64(cpu_tmp0, cpu_src2, 0x1f);
|
|
}
|
|
tcg_gen_shl_i64(cpu_dst, cpu_src1, cpu_tmp0);
|
|
}
|
|
gen_movl_TN_reg(rd, cpu_dst);
|
|
} else if (xop == 0x26) { /* srl, V9 srlx */
|
|
cpu_src1 = get_src1(insn, cpu_src1);
|
|
if (IS_IMM) { /* immediate */
|
|
simm = GET_FIELDs(insn, 20, 31);
|
|
if (insn & (1 << 12)) {
|
|
tcg_gen_shri_i64(cpu_dst, cpu_src1, simm & 0x3f);
|
|
} else {
|
|
tcg_gen_andi_i64(cpu_dst, cpu_src1, 0xffffffffULL);
|
|
tcg_gen_shri_i64(cpu_dst, cpu_dst, simm & 0x1f);
|
|
}
|
|
} else { /* register */
|
|
rs2 = GET_FIELD(insn, 27, 31);
|
|
gen_movl_reg_TN(rs2, cpu_src2);
|
|
if (insn & (1 << 12)) {
|
|
tcg_gen_andi_i64(cpu_tmp0, cpu_src2, 0x3f);
|
|
tcg_gen_shr_i64(cpu_dst, cpu_src1, cpu_tmp0);
|
|
} else {
|
|
tcg_gen_andi_i64(cpu_tmp0, cpu_src2, 0x1f);
|
|
tcg_gen_andi_i64(cpu_dst, cpu_src1, 0xffffffffULL);
|
|
tcg_gen_shr_i64(cpu_dst, cpu_dst, cpu_tmp0);
|
|
}
|
|
}
|
|
gen_movl_TN_reg(rd, cpu_dst);
|
|
} else if (xop == 0x27) { /* sra, V9 srax */
|
|
cpu_src1 = get_src1(insn, cpu_src1);
|
|
if (IS_IMM) { /* immediate */
|
|
simm = GET_FIELDs(insn, 20, 31);
|
|
if (insn & (1 << 12)) {
|
|
tcg_gen_sari_i64(cpu_dst, cpu_src1, simm & 0x3f);
|
|
} else {
|
|
tcg_gen_andi_i64(cpu_dst, cpu_src1, 0xffffffffULL);
|
|
tcg_gen_ext32s_i64(cpu_dst, cpu_dst);
|
|
tcg_gen_sari_i64(cpu_dst, cpu_dst, simm & 0x1f);
|
|
}
|
|
} else { /* register */
|
|
rs2 = GET_FIELD(insn, 27, 31);
|
|
gen_movl_reg_TN(rs2, cpu_src2);
|
|
if (insn & (1 << 12)) {
|
|
tcg_gen_andi_i64(cpu_tmp0, cpu_src2, 0x3f);
|
|
tcg_gen_sar_i64(cpu_dst, cpu_src1, cpu_tmp0);
|
|
} else {
|
|
tcg_gen_andi_i64(cpu_tmp0, cpu_src2, 0x1f);
|
|
tcg_gen_andi_i64(cpu_dst, cpu_src1, 0xffffffffULL);
|
|
tcg_gen_ext32s_i64(cpu_dst, cpu_dst);
|
|
tcg_gen_sar_i64(cpu_dst, cpu_dst, cpu_tmp0);
|
|
}
|
|
}
|
|
gen_movl_TN_reg(rd, cpu_dst);
|
|
#endif
|
|
} else if (xop < 0x36) {
|
|
if (xop < 0x20) {
|
|
cpu_src1 = get_src1(insn, cpu_src1);
|
|
cpu_src2 = get_src2(insn, cpu_src2);
|
|
switch (xop & ~0x10) {
|
|
case 0x0: /* add */
|
|
if (IS_IMM) {
|
|
simm = GET_FIELDs(insn, 19, 31);
|
|
if (xop & 0x10) {
|
|
gen_op_addi_cc(cpu_dst, cpu_src1, simm);
|
|
tcg_gen_movi_i32(cpu_cc_op, CC_OP_ADD);
|
|
dc->cc_op = CC_OP_ADD;
|
|
} else {
|
|
tcg_gen_addi_tl(cpu_dst, cpu_src1, simm);
|
|
}
|
|
} else {
|
|
if (xop & 0x10) {
|
|
gen_op_add_cc(cpu_dst, cpu_src1, cpu_src2);
|
|
tcg_gen_movi_i32(cpu_cc_op, CC_OP_ADD);
|
|
dc->cc_op = CC_OP_ADD;
|
|
} else {
|
|
tcg_gen_add_tl(cpu_dst, cpu_src1, cpu_src2);
|
|
}
|
|
}
|
|
break;
|
|
case 0x1: /* and */
|
|
if (IS_IMM) {
|
|
simm = GET_FIELDs(insn, 19, 31);
|
|
tcg_gen_andi_tl(cpu_dst, cpu_src1, simm);
|
|
} else {
|
|
tcg_gen_and_tl(cpu_dst, cpu_src1, cpu_src2);
|
|
}
|
|
if (xop & 0x10) {
|
|
tcg_gen_mov_tl(cpu_cc_dst, cpu_dst);
|
|
tcg_gen_movi_i32(cpu_cc_op, CC_OP_LOGIC);
|
|
dc->cc_op = CC_OP_LOGIC;
|
|
}
|
|
break;
|
|
case 0x2: /* or */
|
|
if (IS_IMM) {
|
|
simm = GET_FIELDs(insn, 19, 31);
|
|
tcg_gen_ori_tl(cpu_dst, cpu_src1, simm);
|
|
} else {
|
|
tcg_gen_or_tl(cpu_dst, cpu_src1, cpu_src2);
|
|
}
|
|
if (xop & 0x10) {
|
|
tcg_gen_mov_tl(cpu_cc_dst, cpu_dst);
|
|
tcg_gen_movi_i32(cpu_cc_op, CC_OP_LOGIC);
|
|
dc->cc_op = CC_OP_LOGIC;
|
|
}
|
|
break;
|
|
case 0x3: /* xor */
|
|
if (IS_IMM) {
|
|
simm = GET_FIELDs(insn, 19, 31);
|
|
tcg_gen_xori_tl(cpu_dst, cpu_src1, simm);
|
|
} else {
|
|
tcg_gen_xor_tl(cpu_dst, cpu_src1, cpu_src2);
|
|
}
|
|
if (xop & 0x10) {
|
|
tcg_gen_mov_tl(cpu_cc_dst, cpu_dst);
|
|
tcg_gen_movi_i32(cpu_cc_op, CC_OP_LOGIC);
|
|
dc->cc_op = CC_OP_LOGIC;
|
|
}
|
|
break;
|
|
case 0x4: /* sub */
|
|
if (IS_IMM) {
|
|
simm = GET_FIELDs(insn, 19, 31);
|
|
if (xop & 0x10) {
|
|
gen_op_subi_cc(cpu_dst, cpu_src1, simm, dc);
|
|
} else {
|
|
tcg_gen_subi_tl(cpu_dst, cpu_src1, simm);
|
|
}
|
|
} else {
|
|
if (xop & 0x10) {
|
|
gen_op_sub_cc(cpu_dst, cpu_src1, cpu_src2);
|
|
tcg_gen_movi_i32(cpu_cc_op, CC_OP_SUB);
|
|
dc->cc_op = CC_OP_SUB;
|
|
} else {
|
|
tcg_gen_sub_tl(cpu_dst, cpu_src1, cpu_src2);
|
|
}
|
|
}
|
|
break;
|
|
case 0x5: /* andn */
|
|
if (IS_IMM) {
|
|
simm = GET_FIELDs(insn, 19, 31);
|
|
tcg_gen_andi_tl(cpu_dst, cpu_src1, ~simm);
|
|
} else {
|
|
tcg_gen_andc_tl(cpu_dst, cpu_src1, cpu_src2);
|
|
}
|
|
if (xop & 0x10) {
|
|
tcg_gen_mov_tl(cpu_cc_dst, cpu_dst);
|
|
tcg_gen_movi_i32(cpu_cc_op, CC_OP_LOGIC);
|
|
dc->cc_op = CC_OP_LOGIC;
|
|
}
|
|
break;
|
|
case 0x6: /* orn */
|
|
if (IS_IMM) {
|
|
simm = GET_FIELDs(insn, 19, 31);
|
|
tcg_gen_ori_tl(cpu_dst, cpu_src1, ~simm);
|
|
} else {
|
|
tcg_gen_orc_tl(cpu_dst, cpu_src1, cpu_src2);
|
|
}
|
|
if (xop & 0x10) {
|
|
tcg_gen_mov_tl(cpu_cc_dst, cpu_dst);
|
|
tcg_gen_movi_i32(cpu_cc_op, CC_OP_LOGIC);
|
|
dc->cc_op = CC_OP_LOGIC;
|
|
}
|
|
break;
|
|
case 0x7: /* xorn */
|
|
if (IS_IMM) {
|
|
simm = GET_FIELDs(insn, 19, 31);
|
|
tcg_gen_xori_tl(cpu_dst, cpu_src1, ~simm);
|
|
} else {
|
|
tcg_gen_not_tl(cpu_tmp0, cpu_src2);
|
|
tcg_gen_xor_tl(cpu_dst, cpu_src1, cpu_tmp0);
|
|
}
|
|
if (xop & 0x10) {
|
|
tcg_gen_mov_tl(cpu_cc_dst, cpu_dst);
|
|
tcg_gen_movi_i32(cpu_cc_op, CC_OP_LOGIC);
|
|
dc->cc_op = CC_OP_LOGIC;
|
|
}
|
|
break;
|
|
case 0x8: /* addx, V9 addc */
|
|
if (IS_IMM) {
|
|
simm = GET_FIELDs(insn, 19, 31);
|
|
if (xop & 0x10) {
|
|
gen_helper_compute_psr();
|
|
gen_op_addxi_cc(cpu_dst, cpu_src1, simm);
|
|
tcg_gen_movi_i32(cpu_cc_op, CC_OP_ADDX);
|
|
dc->cc_op = CC_OP_ADDX;
|
|
} else {
|
|
gen_helper_compute_psr();
|
|
gen_mov_reg_C(cpu_tmp0, cpu_psr);
|
|
tcg_gen_addi_tl(cpu_tmp0, cpu_tmp0, simm);
|
|
tcg_gen_add_tl(cpu_dst, cpu_src1, cpu_tmp0);
|
|
}
|
|
} else {
|
|
if (xop & 0x10) {
|
|
gen_helper_compute_psr();
|
|
gen_op_addx_cc(cpu_dst, cpu_src1, cpu_src2);
|
|
tcg_gen_movi_i32(cpu_cc_op, CC_OP_ADDX);
|
|
dc->cc_op = CC_OP_ADDX;
|
|
} else {
|
|
gen_helper_compute_psr();
|
|
gen_mov_reg_C(cpu_tmp0, cpu_psr);
|
|
tcg_gen_add_tl(cpu_tmp0, cpu_src2, cpu_tmp0);
|
|
tcg_gen_add_tl(cpu_dst, cpu_src1, cpu_tmp0);
|
|
}
|
|
}
|
|
break;
|
|
#ifdef TARGET_SPARC64
|
|
case 0x9: /* V9 mulx */
|
|
if (IS_IMM) {
|
|
simm = GET_FIELDs(insn, 19, 31);
|
|
tcg_gen_muli_i64(cpu_dst, cpu_src1, simm);
|
|
} else {
|
|
tcg_gen_mul_i64(cpu_dst, cpu_src1, cpu_src2);
|
|
}
|
|
break;
|
|
#endif
|
|
case 0xa: /* umul */
|
|
CHECK_IU_FEATURE(dc, MUL);
|
|
gen_op_umul(cpu_dst, cpu_src1, cpu_src2);
|
|
if (xop & 0x10) {
|
|
tcg_gen_mov_tl(cpu_cc_dst, cpu_dst);
|
|
tcg_gen_movi_i32(cpu_cc_op, CC_OP_LOGIC);
|
|
dc->cc_op = CC_OP_LOGIC;
|
|
}
|
|
break;
|
|
case 0xb: /* smul */
|
|
CHECK_IU_FEATURE(dc, MUL);
|
|
gen_op_smul(cpu_dst, cpu_src1, cpu_src2);
|
|
if (xop & 0x10) {
|
|
tcg_gen_mov_tl(cpu_cc_dst, cpu_dst);
|
|
tcg_gen_movi_i32(cpu_cc_op, CC_OP_LOGIC);
|
|
dc->cc_op = CC_OP_LOGIC;
|
|
}
|
|
break;
|
|
case 0xc: /* subx, V9 subc */
|
|
if (IS_IMM) {
|
|
simm = GET_FIELDs(insn, 19, 31);
|
|
if (xop & 0x10) {
|
|
gen_helper_compute_psr();
|
|
gen_op_subxi_cc(cpu_dst, cpu_src1, simm);
|
|
tcg_gen_movi_i32(cpu_cc_op, CC_OP_SUBX);
|
|
dc->cc_op = CC_OP_SUBX;
|
|
} else {
|
|
gen_helper_compute_psr();
|
|
gen_mov_reg_C(cpu_tmp0, cpu_psr);
|
|
tcg_gen_addi_tl(cpu_tmp0, cpu_tmp0, simm);
|
|
tcg_gen_sub_tl(cpu_dst, cpu_src1, cpu_tmp0);
|
|
}
|
|
} else {
|
|
if (xop & 0x10) {
|
|
gen_helper_compute_psr();
|
|
gen_op_subx_cc(cpu_dst, cpu_src1, cpu_src2);
|
|
tcg_gen_movi_i32(cpu_cc_op, CC_OP_SUBX);
|
|
dc->cc_op = CC_OP_SUBX;
|
|
} else {
|
|
gen_helper_compute_psr();
|
|
gen_mov_reg_C(cpu_tmp0, cpu_psr);
|
|
tcg_gen_add_tl(cpu_tmp0, cpu_src2, cpu_tmp0);
|
|
tcg_gen_sub_tl(cpu_dst, cpu_src1, cpu_tmp0);
|
|
}
|
|
}
|
|
break;
|
|
#ifdef TARGET_SPARC64
|
|
case 0xd: /* V9 udivx */
|
|
tcg_gen_mov_tl(cpu_cc_src, cpu_src1);
|
|
tcg_gen_mov_tl(cpu_cc_src2, cpu_src2);
|
|
gen_trap_ifdivzero_tl(cpu_cc_src2);
|
|
tcg_gen_divu_i64(cpu_dst, cpu_cc_src, cpu_cc_src2);
|
|
break;
|
|
#endif
|
|
case 0xe: /* udiv */
|
|
CHECK_IU_FEATURE(dc, DIV);
|
|
gen_helper_udiv(cpu_dst, cpu_src1, cpu_src2);
|
|
if (xop & 0x10) {
|
|
tcg_gen_mov_tl(cpu_cc_dst, cpu_dst);
|
|
tcg_gen_movi_i32(cpu_cc_op, CC_OP_DIV);
|
|
dc->cc_op = CC_OP_DIV;
|
|
}
|
|
break;
|
|
case 0xf: /* sdiv */
|
|
CHECK_IU_FEATURE(dc, DIV);
|
|
gen_helper_sdiv(cpu_dst, cpu_src1, cpu_src2);
|
|
if (xop & 0x10) {
|
|
tcg_gen_mov_tl(cpu_cc_dst, cpu_dst);
|
|
tcg_gen_movi_i32(cpu_cc_op, CC_OP_DIV);
|
|
dc->cc_op = CC_OP_DIV;
|
|
}
|
|
break;
|
|
default:
|
|
goto illegal_insn;
|
|
}
|
|
gen_movl_TN_reg(rd, cpu_dst);
|
|
} else {
|
|
cpu_src1 = get_src1(insn, cpu_src1);
|
|
cpu_src2 = get_src2(insn, cpu_src2);
|
|
switch (xop) {
|
|
case 0x20: /* taddcc */
|
|
gen_op_tadd_cc(cpu_dst, cpu_src1, cpu_src2);
|
|
gen_movl_TN_reg(rd, cpu_dst);
|
|
tcg_gen_movi_i32(cpu_cc_op, CC_OP_TADD);
|
|
dc->cc_op = CC_OP_TADD;
|
|
break;
|
|
case 0x21: /* tsubcc */
|
|
gen_op_tsub_cc(cpu_dst, cpu_src1, cpu_src2);
|
|
gen_movl_TN_reg(rd, cpu_dst);
|
|
tcg_gen_movi_i32(cpu_cc_op, CC_OP_TSUB);
|
|
dc->cc_op = CC_OP_TSUB;
|
|
break;
|
|
case 0x22: /* taddcctv */
|
|
save_state(dc, cpu_cond);
|
|
gen_op_tadd_ccTV(cpu_dst, cpu_src1, cpu_src2);
|
|
gen_movl_TN_reg(rd, cpu_dst);
|
|
tcg_gen_movi_i32(cpu_cc_op, CC_OP_TADDTV);
|
|
dc->cc_op = CC_OP_TADDTV;
|
|
break;
|
|
case 0x23: /* tsubcctv */
|
|
save_state(dc, cpu_cond);
|
|
gen_op_tsub_ccTV(cpu_dst, cpu_src1, cpu_src2);
|
|
gen_movl_TN_reg(rd, cpu_dst);
|
|
tcg_gen_movi_i32(cpu_cc_op, CC_OP_TSUBTV);
|
|
dc->cc_op = CC_OP_TSUBTV;
|
|
break;
|
|
case 0x24: /* mulscc */
|
|
gen_helper_compute_psr();
|
|
gen_op_mulscc(cpu_dst, cpu_src1, cpu_src2);
|
|
gen_movl_TN_reg(rd, cpu_dst);
|
|
tcg_gen_movi_i32(cpu_cc_op, CC_OP_ADD);
|
|
dc->cc_op = CC_OP_ADD;
|
|
break;
|
|
#ifndef TARGET_SPARC64
|
|
case 0x25: /* sll */
|
|
if (IS_IMM) { /* immediate */
|
|
simm = GET_FIELDs(insn, 20, 31);
|
|
tcg_gen_shli_tl(cpu_dst, cpu_src1, simm & 0x1f);
|
|
} else { /* register */
|
|
tcg_gen_andi_tl(cpu_tmp0, cpu_src2, 0x1f);
|
|
tcg_gen_shl_tl(cpu_dst, cpu_src1, cpu_tmp0);
|
|
}
|
|
gen_movl_TN_reg(rd, cpu_dst);
|
|
break;
|
|
case 0x26: /* srl */
|
|
if (IS_IMM) { /* immediate */
|
|
simm = GET_FIELDs(insn, 20, 31);
|
|
tcg_gen_shri_tl(cpu_dst, cpu_src1, simm & 0x1f);
|
|
} else { /* register */
|
|
tcg_gen_andi_tl(cpu_tmp0, cpu_src2, 0x1f);
|
|
tcg_gen_shr_tl(cpu_dst, cpu_src1, cpu_tmp0);
|
|
}
|
|
gen_movl_TN_reg(rd, cpu_dst);
|
|
break;
|
|
case 0x27: /* sra */
|
|
if (IS_IMM) { /* immediate */
|
|
simm = GET_FIELDs(insn, 20, 31);
|
|
tcg_gen_sari_tl(cpu_dst, cpu_src1, simm & 0x1f);
|
|
} else { /* register */
|
|
tcg_gen_andi_tl(cpu_tmp0, cpu_src2, 0x1f);
|
|
tcg_gen_sar_tl(cpu_dst, cpu_src1, cpu_tmp0);
|
|
}
|
|
gen_movl_TN_reg(rd, cpu_dst);
|
|
break;
|
|
#endif
|
|
case 0x30:
|
|
{
|
|
switch(rd) {
|
|
case 0: /* wry */
|
|
tcg_gen_xor_tl(cpu_tmp0, cpu_src1, cpu_src2);
|
|
tcg_gen_andi_tl(cpu_y, cpu_tmp0, 0xffffffff);
|
|
break;
|
|
#ifndef TARGET_SPARC64
|
|
case 0x01 ... 0x0f: /* undefined in the
|
|
SPARCv8 manual, nop
|
|
on the microSPARC
|
|
II */
|
|
case 0x10 ... 0x1f: /* implementation-dependent
|
|
in the SPARCv8
|
|
manual, nop on the
|
|
microSPARC II */
|
|
break;
|
|
#else
|
|
case 0x2: /* V9 wrccr */
|
|
tcg_gen_xor_tl(cpu_dst, cpu_src1, cpu_src2);
|
|
gen_helper_wrccr(cpu_dst);
|
|
tcg_gen_movi_i32(cpu_cc_op, CC_OP_FLAGS);
|
|
dc->cc_op = CC_OP_FLAGS;
|
|
break;
|
|
case 0x3: /* V9 wrasi */
|
|
tcg_gen_xor_tl(cpu_dst, cpu_src1, cpu_src2);
|
|
tcg_gen_trunc_tl_i32(cpu_asi, cpu_dst);
|
|
break;
|
|
case 0x6: /* V9 wrfprs */
|
|
tcg_gen_xor_tl(cpu_dst, cpu_src1, cpu_src2);
|
|
tcg_gen_trunc_tl_i32(cpu_fprs, cpu_dst);
|
|
save_state(dc, cpu_cond);
|
|
gen_op_next_insn();
|
|
tcg_gen_exit_tb(0);
|
|
dc->is_br = 1;
|
|
break;
|
|
case 0xf: /* V9 sir, nop if user */
|
|
#if !defined(CONFIG_USER_ONLY)
|
|
if (supervisor(dc))
|
|
; // XXX
|
|
#endif
|
|
break;
|
|
case 0x13: /* Graphics Status */
|
|
if (gen_trap_ifnofpu(dc, cpu_cond))
|
|
goto jmp_insn;
|
|
tcg_gen_xor_tl(cpu_gsr, cpu_src1, cpu_src2);
|
|
break;
|
|
case 0x14: /* Softint set */
|
|
if (!supervisor(dc))
|
|
goto illegal_insn;
|
|
tcg_gen_xor_tl(cpu_tmp64, cpu_src1, cpu_src2);
|
|
gen_helper_set_softint(cpu_tmp64);
|
|
break;
|
|
case 0x15: /* Softint clear */
|
|
if (!supervisor(dc))
|
|
goto illegal_insn;
|
|
tcg_gen_xor_tl(cpu_tmp64, cpu_src1, cpu_src2);
|
|
gen_helper_clear_softint(cpu_tmp64);
|
|
break;
|
|
case 0x16: /* Softint write */
|
|
if (!supervisor(dc))
|
|
goto illegal_insn;
|
|
tcg_gen_xor_tl(cpu_tmp64, cpu_src1, cpu_src2);
|
|
gen_helper_write_softint(cpu_tmp64);
|
|
break;
|
|
case 0x17: /* Tick compare */
|
|
#if !defined(CONFIG_USER_ONLY)
|
|
if (!supervisor(dc))
|
|
goto illegal_insn;
|
|
#endif
|
|
{
|
|
TCGv_ptr r_tickptr;
|
|
|
|
tcg_gen_xor_tl(cpu_tick_cmpr, cpu_src1,
|
|
cpu_src2);
|
|
r_tickptr = tcg_temp_new_ptr();
|
|
tcg_gen_ld_ptr(r_tickptr, cpu_env,
|
|
offsetof(CPUState, tick));
|
|
gen_helper_tick_set_limit(r_tickptr,
|
|
cpu_tick_cmpr);
|
|
tcg_temp_free_ptr(r_tickptr);
|
|
}
|
|
break;
|
|
case 0x18: /* System tick */
|
|
#if !defined(CONFIG_USER_ONLY)
|
|
if (!supervisor(dc))
|
|
goto illegal_insn;
|
|
#endif
|
|
{
|
|
TCGv_ptr r_tickptr;
|
|
|
|
tcg_gen_xor_tl(cpu_dst, cpu_src1,
|
|
cpu_src2);
|
|
r_tickptr = tcg_temp_new_ptr();
|
|
tcg_gen_ld_ptr(r_tickptr, cpu_env,
|
|
offsetof(CPUState, stick));
|
|
gen_helper_tick_set_count(r_tickptr,
|
|
cpu_dst);
|
|
tcg_temp_free_ptr(r_tickptr);
|
|
}
|
|
break;
|
|
case 0x19: /* System tick compare */
|
|
#if !defined(CONFIG_USER_ONLY)
|
|
if (!supervisor(dc))
|
|
goto illegal_insn;
|
|
#endif
|
|
{
|
|
TCGv_ptr r_tickptr;
|
|
|
|
tcg_gen_xor_tl(cpu_stick_cmpr, cpu_src1,
|
|
cpu_src2);
|
|
r_tickptr = tcg_temp_new_ptr();
|
|
tcg_gen_ld_ptr(r_tickptr, cpu_env,
|
|
offsetof(CPUState, stick));
|
|
gen_helper_tick_set_limit(r_tickptr,
|
|
cpu_stick_cmpr);
|
|
tcg_temp_free_ptr(r_tickptr);
|
|
}
|
|
break;
|
|
|
|
case 0x10: /* Performance Control */
|
|
case 0x11: /* Performance Instrumentation
|
|
Counter */
|
|
case 0x12: /* Dispatch Control */
|
|
#endif
|
|
default:
|
|
goto illegal_insn;
|
|
}
|
|
}
|
|
break;
|
|
#if !defined(CONFIG_USER_ONLY)
|
|
case 0x31: /* wrpsr, V9 saved, restored */
|
|
{
|
|
if (!supervisor(dc))
|
|
goto priv_insn;
|
|
#ifdef TARGET_SPARC64
|
|
switch (rd) {
|
|
case 0:
|
|
gen_helper_saved();
|
|
break;
|
|
case 1:
|
|
gen_helper_restored();
|
|
break;
|
|
case 2: /* UA2005 allclean */
|
|
case 3: /* UA2005 otherw */
|
|
case 4: /* UA2005 normalw */
|
|
case 5: /* UA2005 invalw */
|
|
// XXX
|
|
default:
|
|
goto illegal_insn;
|
|
}
|
|
#else
|
|
tcg_gen_xor_tl(cpu_dst, cpu_src1, cpu_src2);
|
|
gen_helper_wrpsr(cpu_dst);
|
|
tcg_gen_movi_i32(cpu_cc_op, CC_OP_FLAGS);
|
|
dc->cc_op = CC_OP_FLAGS;
|
|
save_state(dc, cpu_cond);
|
|
gen_op_next_insn();
|
|
tcg_gen_exit_tb(0);
|
|
dc->is_br = 1;
|
|
#endif
|
|
}
|
|
break;
|
|
case 0x32: /* wrwim, V9 wrpr */
|
|
{
|
|
if (!supervisor(dc))
|
|
goto priv_insn;
|
|
tcg_gen_xor_tl(cpu_tmp0, cpu_src1, cpu_src2);
|
|
#ifdef TARGET_SPARC64
|
|
switch (rd) {
|
|
case 0: // tpc
|
|
{
|
|
TCGv_ptr r_tsptr;
|
|
|
|
r_tsptr = tcg_temp_new_ptr();
|
|
gen_load_trap_state_at_tl(r_tsptr, cpu_env);
|
|
tcg_gen_st_tl(cpu_tmp0, r_tsptr,
|
|
offsetof(trap_state, tpc));
|
|
tcg_temp_free_ptr(r_tsptr);
|
|
}
|
|
break;
|
|
case 1: // tnpc
|
|
{
|
|
TCGv_ptr r_tsptr;
|
|
|
|
r_tsptr = tcg_temp_new_ptr();
|
|
gen_load_trap_state_at_tl(r_tsptr, cpu_env);
|
|
tcg_gen_st_tl(cpu_tmp0, r_tsptr,
|
|
offsetof(trap_state, tnpc));
|
|
tcg_temp_free_ptr(r_tsptr);
|
|
}
|
|
break;
|
|
case 2: // tstate
|
|
{
|
|
TCGv_ptr r_tsptr;
|
|
|
|
r_tsptr = tcg_temp_new_ptr();
|
|
gen_load_trap_state_at_tl(r_tsptr, cpu_env);
|
|
tcg_gen_st_tl(cpu_tmp0, r_tsptr,
|
|
offsetof(trap_state,
|
|
tstate));
|
|
tcg_temp_free_ptr(r_tsptr);
|
|
}
|
|
break;
|
|
case 3: // tt
|
|
{
|
|
TCGv_ptr r_tsptr;
|
|
|
|
r_tsptr = tcg_temp_new_ptr();
|
|
gen_load_trap_state_at_tl(r_tsptr, cpu_env);
|
|
tcg_gen_trunc_tl_i32(cpu_tmp32, cpu_tmp0);
|
|
tcg_gen_st_i32(cpu_tmp32, r_tsptr,
|
|
offsetof(trap_state, tt));
|
|
tcg_temp_free_ptr(r_tsptr);
|
|
}
|
|
break;
|
|
case 4: // tick
|
|
{
|
|
TCGv_ptr r_tickptr;
|
|
|
|
r_tickptr = tcg_temp_new_ptr();
|
|
tcg_gen_ld_ptr(r_tickptr, cpu_env,
|
|
offsetof(CPUState, tick));
|
|
gen_helper_tick_set_count(r_tickptr,
|
|
cpu_tmp0);
|
|
tcg_temp_free_ptr(r_tickptr);
|
|
}
|
|
break;
|
|
case 5: // tba
|
|
tcg_gen_mov_tl(cpu_tbr, cpu_tmp0);
|
|
break;
|
|
case 6: // pstate
|
|
save_state(dc, cpu_cond);
|
|
gen_helper_wrpstate(cpu_tmp0);
|
|
gen_op_next_insn();
|
|
tcg_gen_exit_tb(0);
|
|
dc->is_br = 1;
|
|
break;
|
|
case 7: // tl
|
|
tcg_gen_trunc_tl_i32(cpu_tmp32, cpu_tmp0);
|
|
tcg_gen_st_i32(cpu_tmp32, cpu_env,
|
|
offsetof(CPUSPARCState, tl));
|
|
break;
|
|
case 8: // pil
|
|
tcg_gen_trunc_tl_i32(cpu_tmp32, cpu_tmp0);
|
|
tcg_gen_st_i32(cpu_tmp32, cpu_env,
|
|
offsetof(CPUSPARCState,
|
|
psrpil));
|
|
break;
|
|
case 9: // cwp
|
|
gen_helper_wrcwp(cpu_tmp0);
|
|
break;
|
|
case 10: // cansave
|
|
tcg_gen_trunc_tl_i32(cpu_tmp32, cpu_tmp0);
|
|
tcg_gen_st_i32(cpu_tmp32, cpu_env,
|
|
offsetof(CPUSPARCState,
|
|
cansave));
|
|
break;
|
|
case 11: // canrestore
|
|
tcg_gen_trunc_tl_i32(cpu_tmp32, cpu_tmp0);
|
|
tcg_gen_st_i32(cpu_tmp32, cpu_env,
|
|
offsetof(CPUSPARCState,
|
|
canrestore));
|
|
break;
|
|
case 12: // cleanwin
|
|
tcg_gen_trunc_tl_i32(cpu_tmp32, cpu_tmp0);
|
|
tcg_gen_st_i32(cpu_tmp32, cpu_env,
|
|
offsetof(CPUSPARCState,
|
|
cleanwin));
|
|
break;
|
|
case 13: // otherwin
|
|
tcg_gen_trunc_tl_i32(cpu_tmp32, cpu_tmp0);
|
|
tcg_gen_st_i32(cpu_tmp32, cpu_env,
|
|
offsetof(CPUSPARCState,
|
|
otherwin));
|
|
break;
|
|
case 14: // wstate
|
|
tcg_gen_trunc_tl_i32(cpu_tmp32, cpu_tmp0);
|
|
tcg_gen_st_i32(cpu_tmp32, cpu_env,
|
|
offsetof(CPUSPARCState,
|
|
wstate));
|
|
break;
|
|
case 16: // UA2005 gl
|
|
CHECK_IU_FEATURE(dc, GL);
|
|
tcg_gen_trunc_tl_i32(cpu_tmp32, cpu_tmp0);
|
|
tcg_gen_st_i32(cpu_tmp32, cpu_env,
|
|
offsetof(CPUSPARCState, gl));
|
|
break;
|
|
case 26: // UA2005 strand status
|
|
CHECK_IU_FEATURE(dc, HYPV);
|
|
if (!hypervisor(dc))
|
|
goto priv_insn;
|
|
tcg_gen_mov_tl(cpu_ssr, cpu_tmp0);
|
|
break;
|
|
default:
|
|
goto illegal_insn;
|
|
}
|
|
#else
|
|
tcg_gen_trunc_tl_i32(cpu_tmp32, cpu_tmp0);
|
|
if (dc->def->nwindows != 32)
|
|
tcg_gen_andi_tl(cpu_tmp32, cpu_tmp32,
|
|
(1 << dc->def->nwindows) - 1);
|
|
tcg_gen_mov_i32(cpu_wim, cpu_tmp32);
|
|
#endif
|
|
}
|
|
break;
|
|
case 0x33: /* wrtbr, UA2005 wrhpr */
|
|
{
|
|
#ifndef TARGET_SPARC64
|
|
if (!supervisor(dc))
|
|
goto priv_insn;
|
|
tcg_gen_xor_tl(cpu_tbr, cpu_src1, cpu_src2);
|
|
#else
|
|
CHECK_IU_FEATURE(dc, HYPV);
|
|
if (!hypervisor(dc))
|
|
goto priv_insn;
|
|
tcg_gen_xor_tl(cpu_tmp0, cpu_src1, cpu_src2);
|
|
switch (rd) {
|
|
case 0: // hpstate
|
|
// XXX gen_op_wrhpstate();
|
|
save_state(dc, cpu_cond);
|
|
gen_op_next_insn();
|
|
tcg_gen_exit_tb(0);
|
|
dc->is_br = 1;
|
|
break;
|
|
case 1: // htstate
|
|
// XXX gen_op_wrhtstate();
|
|
break;
|
|
case 3: // hintp
|
|
tcg_gen_mov_tl(cpu_hintp, cpu_tmp0);
|
|
break;
|
|
case 5: // htba
|
|
tcg_gen_mov_tl(cpu_htba, cpu_tmp0);
|
|
break;
|
|
case 31: // hstick_cmpr
|
|
{
|
|
TCGv_ptr r_tickptr;
|
|
|
|
tcg_gen_mov_tl(cpu_hstick_cmpr, cpu_tmp0);
|
|
r_tickptr = tcg_temp_new_ptr();
|
|
tcg_gen_ld_ptr(r_tickptr, cpu_env,
|
|
offsetof(CPUState, hstick));
|
|
gen_helper_tick_set_limit(r_tickptr,
|
|
cpu_hstick_cmpr);
|
|
tcg_temp_free_ptr(r_tickptr);
|
|
}
|
|
break;
|
|
case 6: // hver readonly
|
|
default:
|
|
goto illegal_insn;
|
|
}
|
|
#endif
|
|
}
|
|
break;
|
|
#endif
|
|
#ifdef TARGET_SPARC64
|
|
case 0x2c: /* V9 movcc */
|
|
{
|
|
int cc = GET_FIELD_SP(insn, 11, 12);
|
|
int cond = GET_FIELD_SP(insn, 14, 17);
|
|
TCGv r_cond;
|
|
int l1;
|
|
|
|
r_cond = tcg_temp_new();
|
|
if (insn & (1 << 18)) {
|
|
if (cc == 0)
|
|
gen_cond(r_cond, 0, cond, dc);
|
|
else if (cc == 2)
|
|
gen_cond(r_cond, 1, cond, dc);
|
|
else
|
|
goto illegal_insn;
|
|
} else {
|
|
gen_fcond(r_cond, cc, cond);
|
|
}
|
|
|
|
l1 = gen_new_label();
|
|
|
|
tcg_gen_brcondi_tl(TCG_COND_EQ, r_cond, 0, l1);
|
|
if (IS_IMM) { /* immediate */
|
|
TCGv r_const;
|
|
|
|
simm = GET_FIELD_SPs(insn, 0, 10);
|
|
r_const = tcg_const_tl(simm);
|
|
gen_movl_TN_reg(rd, r_const);
|
|
tcg_temp_free(r_const);
|
|
} else {
|
|
rs2 = GET_FIELD_SP(insn, 0, 4);
|
|
gen_movl_reg_TN(rs2, cpu_tmp0);
|
|
gen_movl_TN_reg(rd, cpu_tmp0);
|
|
}
|
|
gen_set_label(l1);
|
|
tcg_temp_free(r_cond);
|
|
break;
|
|
}
|
|
case 0x2d: /* V9 sdivx */
|
|
gen_op_sdivx(cpu_dst, cpu_src1, cpu_src2);
|
|
gen_movl_TN_reg(rd, cpu_dst);
|
|
break;
|
|
case 0x2e: /* V9 popc */
|
|
{
|
|
cpu_src2 = get_src2(insn, cpu_src2);
|
|
gen_helper_popc(cpu_dst, cpu_src2);
|
|
gen_movl_TN_reg(rd, cpu_dst);
|
|
}
|
|
case 0x2f: /* V9 movr */
|
|
{
|
|
int cond = GET_FIELD_SP(insn, 10, 12);
|
|
int l1;
|
|
|
|
cpu_src1 = get_src1(insn, cpu_src1);
|
|
|
|
l1 = gen_new_label();
|
|
|
|
tcg_gen_brcondi_tl(gen_tcg_cond_reg[cond],
|
|
cpu_src1, 0, l1);
|
|
if (IS_IMM) { /* immediate */
|
|
TCGv r_const;
|
|
|
|
simm = GET_FIELD_SPs(insn, 0, 9);
|
|
r_const = tcg_const_tl(simm);
|
|
gen_movl_TN_reg(rd, r_const);
|
|
tcg_temp_free(r_const);
|
|
} else {
|
|
rs2 = GET_FIELD_SP(insn, 0, 4);
|
|
gen_movl_reg_TN(rs2, cpu_tmp0);
|
|
gen_movl_TN_reg(rd, cpu_tmp0);
|
|
}
|
|
gen_set_label(l1);
|
|
break;
|
|
}
|
|
#endif
|
|
default:
|
|
goto illegal_insn;
|
|
}
|
|
}
|
|
} else if (xop == 0x36) { /* UltraSparc shutdown, VIS, V8 CPop1 */
|
|
#ifdef TARGET_SPARC64
|
|
int opf = GET_FIELD_SP(insn, 5, 13);
|
|
rs1 = GET_FIELD(insn, 13, 17);
|
|
rs2 = GET_FIELD(insn, 27, 31);
|
|
if (gen_trap_ifnofpu(dc, cpu_cond))
|
|
goto jmp_insn;
|
|
|
|
switch (opf) {
|
|
case 0x000: /* VIS I edge8cc */
|
|
case 0x001: /* VIS II edge8n */
|
|
case 0x002: /* VIS I edge8lcc */
|
|
case 0x003: /* VIS II edge8ln */
|
|
case 0x004: /* VIS I edge16cc */
|
|
case 0x005: /* VIS II edge16n */
|
|
case 0x006: /* VIS I edge16lcc */
|
|
case 0x007: /* VIS II edge16ln */
|
|
case 0x008: /* VIS I edge32cc */
|
|
case 0x009: /* VIS II edge32n */
|
|
case 0x00a: /* VIS I edge32lcc */
|
|
case 0x00b: /* VIS II edge32ln */
|
|
// XXX
|
|
goto illegal_insn;
|
|
case 0x010: /* VIS I array8 */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
cpu_src1 = get_src1(insn, cpu_src1);
|
|
gen_movl_reg_TN(rs2, cpu_src2);
|
|
gen_helper_array8(cpu_dst, cpu_src1, cpu_src2);
|
|
gen_movl_TN_reg(rd, cpu_dst);
|
|
break;
|
|
case 0x012: /* VIS I array16 */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
cpu_src1 = get_src1(insn, cpu_src1);
|
|
gen_movl_reg_TN(rs2, cpu_src2);
|
|
gen_helper_array8(cpu_dst, cpu_src1, cpu_src2);
|
|
tcg_gen_shli_i64(cpu_dst, cpu_dst, 1);
|
|
gen_movl_TN_reg(rd, cpu_dst);
|
|
break;
|
|
case 0x014: /* VIS I array32 */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
cpu_src1 = get_src1(insn, cpu_src1);
|
|
gen_movl_reg_TN(rs2, cpu_src2);
|
|
gen_helper_array8(cpu_dst, cpu_src1, cpu_src2);
|
|
tcg_gen_shli_i64(cpu_dst, cpu_dst, 2);
|
|
gen_movl_TN_reg(rd, cpu_dst);
|
|
break;
|
|
case 0x018: /* VIS I alignaddr */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
cpu_src1 = get_src1(insn, cpu_src1);
|
|
gen_movl_reg_TN(rs2, cpu_src2);
|
|
gen_helper_alignaddr(cpu_dst, cpu_src1, cpu_src2);
|
|
gen_movl_TN_reg(rd, cpu_dst);
|
|
break;
|
|
case 0x019: /* VIS II bmask */
|
|
case 0x01a: /* VIS I alignaddrl */
|
|
// XXX
|
|
goto illegal_insn;
|
|
case 0x020: /* VIS I fcmple16 */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
gen_op_load_fpr_DT0(DFPREG(rs1));
|
|
gen_op_load_fpr_DT1(DFPREG(rs2));
|
|
gen_helper_fcmple16();
|
|
gen_op_store_DT0_fpr(DFPREG(rd));
|
|
break;
|
|
case 0x022: /* VIS I fcmpne16 */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
gen_op_load_fpr_DT0(DFPREG(rs1));
|
|
gen_op_load_fpr_DT1(DFPREG(rs2));
|
|
gen_helper_fcmpne16();
|
|
gen_op_store_DT0_fpr(DFPREG(rd));
|
|
break;
|
|
case 0x024: /* VIS I fcmple32 */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
gen_op_load_fpr_DT0(DFPREG(rs1));
|
|
gen_op_load_fpr_DT1(DFPREG(rs2));
|
|
gen_helper_fcmple32();
|
|
gen_op_store_DT0_fpr(DFPREG(rd));
|
|
break;
|
|
case 0x026: /* VIS I fcmpne32 */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
gen_op_load_fpr_DT0(DFPREG(rs1));
|
|
gen_op_load_fpr_DT1(DFPREG(rs2));
|
|
gen_helper_fcmpne32();
|
|
gen_op_store_DT0_fpr(DFPREG(rd));
|
|
break;
|
|
case 0x028: /* VIS I fcmpgt16 */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
gen_op_load_fpr_DT0(DFPREG(rs1));
|
|
gen_op_load_fpr_DT1(DFPREG(rs2));
|
|
gen_helper_fcmpgt16();
|
|
gen_op_store_DT0_fpr(DFPREG(rd));
|
|
break;
|
|
case 0x02a: /* VIS I fcmpeq16 */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
gen_op_load_fpr_DT0(DFPREG(rs1));
|
|
gen_op_load_fpr_DT1(DFPREG(rs2));
|
|
gen_helper_fcmpeq16();
|
|
gen_op_store_DT0_fpr(DFPREG(rd));
|
|
break;
|
|
case 0x02c: /* VIS I fcmpgt32 */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
gen_op_load_fpr_DT0(DFPREG(rs1));
|
|
gen_op_load_fpr_DT1(DFPREG(rs2));
|
|
gen_helper_fcmpgt32();
|
|
gen_op_store_DT0_fpr(DFPREG(rd));
|
|
break;
|
|
case 0x02e: /* VIS I fcmpeq32 */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
gen_op_load_fpr_DT0(DFPREG(rs1));
|
|
gen_op_load_fpr_DT1(DFPREG(rs2));
|
|
gen_helper_fcmpeq32();
|
|
gen_op_store_DT0_fpr(DFPREG(rd));
|
|
break;
|
|
case 0x031: /* VIS I fmul8x16 */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
gen_op_load_fpr_DT0(DFPREG(rs1));
|
|
gen_op_load_fpr_DT1(DFPREG(rs2));
|
|
gen_helper_fmul8x16();
|
|
gen_op_store_DT0_fpr(DFPREG(rd));
|
|
break;
|
|
case 0x033: /* VIS I fmul8x16au */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
gen_op_load_fpr_DT0(DFPREG(rs1));
|
|
gen_op_load_fpr_DT1(DFPREG(rs2));
|
|
gen_helper_fmul8x16au();
|
|
gen_op_store_DT0_fpr(DFPREG(rd));
|
|
break;
|
|
case 0x035: /* VIS I fmul8x16al */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
gen_op_load_fpr_DT0(DFPREG(rs1));
|
|
gen_op_load_fpr_DT1(DFPREG(rs2));
|
|
gen_helper_fmul8x16al();
|
|
gen_op_store_DT0_fpr(DFPREG(rd));
|
|
break;
|
|
case 0x036: /* VIS I fmul8sux16 */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
gen_op_load_fpr_DT0(DFPREG(rs1));
|
|
gen_op_load_fpr_DT1(DFPREG(rs2));
|
|
gen_helper_fmul8sux16();
|
|
gen_op_store_DT0_fpr(DFPREG(rd));
|
|
break;
|
|
case 0x037: /* VIS I fmul8ulx16 */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
gen_op_load_fpr_DT0(DFPREG(rs1));
|
|
gen_op_load_fpr_DT1(DFPREG(rs2));
|
|
gen_helper_fmul8ulx16();
|
|
gen_op_store_DT0_fpr(DFPREG(rd));
|
|
break;
|
|
case 0x038: /* VIS I fmuld8sux16 */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
gen_op_load_fpr_DT0(DFPREG(rs1));
|
|
gen_op_load_fpr_DT1(DFPREG(rs2));
|
|
gen_helper_fmuld8sux16();
|
|
gen_op_store_DT0_fpr(DFPREG(rd));
|
|
break;
|
|
case 0x039: /* VIS I fmuld8ulx16 */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
gen_op_load_fpr_DT0(DFPREG(rs1));
|
|
gen_op_load_fpr_DT1(DFPREG(rs2));
|
|
gen_helper_fmuld8ulx16();
|
|
gen_op_store_DT0_fpr(DFPREG(rd));
|
|
break;
|
|
case 0x03a: /* VIS I fpack32 */
|
|
case 0x03b: /* VIS I fpack16 */
|
|
case 0x03d: /* VIS I fpackfix */
|
|
case 0x03e: /* VIS I pdist */
|
|
// XXX
|
|
goto illegal_insn;
|
|
case 0x048: /* VIS I faligndata */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
gen_op_load_fpr_DT0(DFPREG(rs1));
|
|
gen_op_load_fpr_DT1(DFPREG(rs2));
|
|
gen_helper_faligndata();
|
|
gen_op_store_DT0_fpr(DFPREG(rd));
|
|
break;
|
|
case 0x04b: /* VIS I fpmerge */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
gen_op_load_fpr_DT0(DFPREG(rs1));
|
|
gen_op_load_fpr_DT1(DFPREG(rs2));
|
|
gen_helper_fpmerge();
|
|
gen_op_store_DT0_fpr(DFPREG(rd));
|
|
break;
|
|
case 0x04c: /* VIS II bshuffle */
|
|
// XXX
|
|
goto illegal_insn;
|
|
case 0x04d: /* VIS I fexpand */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
gen_op_load_fpr_DT0(DFPREG(rs1));
|
|
gen_op_load_fpr_DT1(DFPREG(rs2));
|
|
gen_helper_fexpand();
|
|
gen_op_store_DT0_fpr(DFPREG(rd));
|
|
break;
|
|
case 0x050: /* VIS I fpadd16 */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
gen_op_load_fpr_DT0(DFPREG(rs1));
|
|
gen_op_load_fpr_DT1(DFPREG(rs2));
|
|
gen_helper_fpadd16();
|
|
gen_op_store_DT0_fpr(DFPREG(rd));
|
|
break;
|
|
case 0x051: /* VIS I fpadd16s */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
gen_helper_fpadd16s(cpu_fpr[rd],
|
|
cpu_fpr[rs1], cpu_fpr[rs2]);
|
|
break;
|
|
case 0x052: /* VIS I fpadd32 */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
gen_op_load_fpr_DT0(DFPREG(rs1));
|
|
gen_op_load_fpr_DT1(DFPREG(rs2));
|
|
gen_helper_fpadd32();
|
|
gen_op_store_DT0_fpr(DFPREG(rd));
|
|
break;
|
|
case 0x053: /* VIS I fpadd32s */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
gen_helper_fpadd32s(cpu_fpr[rd],
|
|
cpu_fpr[rs1], cpu_fpr[rs2]);
|
|
break;
|
|
case 0x054: /* VIS I fpsub16 */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
gen_op_load_fpr_DT0(DFPREG(rs1));
|
|
gen_op_load_fpr_DT1(DFPREG(rs2));
|
|
gen_helper_fpsub16();
|
|
gen_op_store_DT0_fpr(DFPREG(rd));
|
|
break;
|
|
case 0x055: /* VIS I fpsub16s */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
gen_helper_fpsub16s(cpu_fpr[rd],
|
|
cpu_fpr[rs1], cpu_fpr[rs2]);
|
|
break;
|
|
case 0x056: /* VIS I fpsub32 */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
gen_op_load_fpr_DT0(DFPREG(rs1));
|
|
gen_op_load_fpr_DT1(DFPREG(rs2));
|
|
gen_helper_fpsub32();
|
|
gen_op_store_DT0_fpr(DFPREG(rd));
|
|
break;
|
|
case 0x057: /* VIS I fpsub32s */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
gen_helper_fpsub32s(cpu_fpr[rd],
|
|
cpu_fpr[rs1], cpu_fpr[rs2]);
|
|
break;
|
|
case 0x060: /* VIS I fzero */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
tcg_gen_movi_i32(cpu_fpr[DFPREG(rd)], 0);
|
|
tcg_gen_movi_i32(cpu_fpr[DFPREG(rd) + 1], 0);
|
|
break;
|
|
case 0x061: /* VIS I fzeros */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
tcg_gen_movi_i32(cpu_fpr[rd], 0);
|
|
break;
|
|
case 0x062: /* VIS I fnor */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
tcg_gen_nor_i32(cpu_tmp32, cpu_fpr[DFPREG(rs1)],
|
|
cpu_fpr[DFPREG(rs2)]);
|
|
tcg_gen_nor_i32(cpu_tmp32, cpu_fpr[DFPREG(rs1) + 1],
|
|
cpu_fpr[DFPREG(rs2) + 1]);
|
|
break;
|
|
case 0x063: /* VIS I fnors */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
tcg_gen_nor_i32(cpu_tmp32, cpu_fpr[rs1], cpu_fpr[rs2]);
|
|
break;
|
|
case 0x064: /* VIS I fandnot2 */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
tcg_gen_andc_i32(cpu_fpr[DFPREG(rd)], cpu_fpr[DFPREG(rs1)],
|
|
cpu_fpr[DFPREG(rs2)]);
|
|
tcg_gen_andc_i32(cpu_fpr[DFPREG(rd) + 1],
|
|
cpu_fpr[DFPREG(rs1) + 1],
|
|
cpu_fpr[DFPREG(rs2) + 1]);
|
|
break;
|
|
case 0x065: /* VIS I fandnot2s */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
tcg_gen_andc_i32(cpu_fpr[rd], cpu_fpr[rs1], cpu_fpr[rs2]);
|
|
break;
|
|
case 0x066: /* VIS I fnot2 */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
tcg_gen_not_i32(cpu_fpr[DFPREG(rd)], cpu_fpr[DFPREG(rs2)]);
|
|
tcg_gen_not_i32(cpu_fpr[DFPREG(rd) + 1],
|
|
cpu_fpr[DFPREG(rs2) + 1]);
|
|
break;
|
|
case 0x067: /* VIS I fnot2s */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
tcg_gen_not_i32(cpu_fpr[rd], cpu_fpr[rs2]);
|
|
break;
|
|
case 0x068: /* VIS I fandnot1 */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
tcg_gen_andc_i32(cpu_fpr[DFPREG(rd)], cpu_fpr[DFPREG(rs2)],
|
|
cpu_fpr[DFPREG(rs1)]);
|
|
tcg_gen_andc_i32(cpu_fpr[DFPREG(rd) + 1],
|
|
cpu_fpr[DFPREG(rs2) + 1],
|
|
cpu_fpr[DFPREG(rs1) + 1]);
|
|
break;
|
|
case 0x069: /* VIS I fandnot1s */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
tcg_gen_andc_i32(cpu_fpr[rd], cpu_fpr[rs2], cpu_fpr[rs1]);
|
|
break;
|
|
case 0x06a: /* VIS I fnot1 */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
tcg_gen_not_i32(cpu_fpr[DFPREG(rd)], cpu_fpr[DFPREG(rs1)]);
|
|
tcg_gen_not_i32(cpu_fpr[DFPREG(rd) + 1],
|
|
cpu_fpr[DFPREG(rs1) + 1]);
|
|
break;
|
|
case 0x06b: /* VIS I fnot1s */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
tcg_gen_not_i32(cpu_fpr[rd], cpu_fpr[rs1]);
|
|
break;
|
|
case 0x06c: /* VIS I fxor */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
tcg_gen_xor_i32(cpu_fpr[DFPREG(rd)], cpu_fpr[DFPREG(rs1)],
|
|
cpu_fpr[DFPREG(rs2)]);
|
|
tcg_gen_xor_i32(cpu_fpr[DFPREG(rd) + 1],
|
|
cpu_fpr[DFPREG(rs1) + 1],
|
|
cpu_fpr[DFPREG(rs2) + 1]);
|
|
break;
|
|
case 0x06d: /* VIS I fxors */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
tcg_gen_xor_i32(cpu_fpr[rd], cpu_fpr[rs1], cpu_fpr[rs2]);
|
|
break;
|
|
case 0x06e: /* VIS I fnand */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
tcg_gen_nand_i32(cpu_tmp32, cpu_fpr[DFPREG(rs1)],
|
|
cpu_fpr[DFPREG(rs2)]);
|
|
tcg_gen_nand_i32(cpu_tmp32, cpu_fpr[DFPREG(rs1) + 1],
|
|
cpu_fpr[DFPREG(rs2) + 1]);
|
|
break;
|
|
case 0x06f: /* VIS I fnands */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
tcg_gen_nand_i32(cpu_tmp32, cpu_fpr[rs1], cpu_fpr[rs2]);
|
|
break;
|
|
case 0x070: /* VIS I fand */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
tcg_gen_and_i32(cpu_fpr[DFPREG(rd)], cpu_fpr[DFPREG(rs1)],
|
|
cpu_fpr[DFPREG(rs2)]);
|
|
tcg_gen_and_i32(cpu_fpr[DFPREG(rd) + 1],
|
|
cpu_fpr[DFPREG(rs1) + 1],
|
|
cpu_fpr[DFPREG(rs2) + 1]);
|
|
break;
|
|
case 0x071: /* VIS I fands */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
tcg_gen_and_i32(cpu_fpr[rd], cpu_fpr[rs1], cpu_fpr[rs2]);
|
|
break;
|
|
case 0x072: /* VIS I fxnor */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
tcg_gen_xori_i32(cpu_tmp32, cpu_fpr[DFPREG(rs2)], -1);
|
|
tcg_gen_xor_i32(cpu_fpr[DFPREG(rd)], cpu_tmp32,
|
|
cpu_fpr[DFPREG(rs1)]);
|
|
tcg_gen_xori_i32(cpu_tmp32, cpu_fpr[DFPREG(rs2) + 1], -1);
|
|
tcg_gen_xor_i32(cpu_fpr[DFPREG(rd) + 1], cpu_tmp32,
|
|
cpu_fpr[DFPREG(rs1) + 1]);
|
|
break;
|
|
case 0x073: /* VIS I fxnors */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
tcg_gen_xori_i32(cpu_tmp32, cpu_fpr[rs2], -1);
|
|
tcg_gen_xor_i32(cpu_fpr[rd], cpu_tmp32, cpu_fpr[rs1]);
|
|
break;
|
|
case 0x074: /* VIS I fsrc1 */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
tcg_gen_mov_i32(cpu_fpr[DFPREG(rd)], cpu_fpr[DFPREG(rs1)]);
|
|
tcg_gen_mov_i32(cpu_fpr[DFPREG(rd) + 1],
|
|
cpu_fpr[DFPREG(rs1) + 1]);
|
|
break;
|
|
case 0x075: /* VIS I fsrc1s */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
tcg_gen_mov_i32(cpu_fpr[rd], cpu_fpr[rs1]);
|
|
break;
|
|
case 0x076: /* VIS I fornot2 */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
tcg_gen_orc_i32(cpu_fpr[DFPREG(rd)], cpu_fpr[DFPREG(rs1)],
|
|
cpu_fpr[DFPREG(rs2)]);
|
|
tcg_gen_orc_i32(cpu_fpr[DFPREG(rd) + 1],
|
|
cpu_fpr[DFPREG(rs1) + 1],
|
|
cpu_fpr[DFPREG(rs2) + 1]);
|
|
break;
|
|
case 0x077: /* VIS I fornot2s */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
tcg_gen_orc_i32(cpu_fpr[rd], cpu_fpr[rs1], cpu_fpr[rs2]);
|
|
break;
|
|
case 0x078: /* VIS I fsrc2 */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
gen_op_load_fpr_DT0(DFPREG(rs2));
|
|
gen_op_store_DT0_fpr(DFPREG(rd));
|
|
break;
|
|
case 0x079: /* VIS I fsrc2s */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
tcg_gen_mov_i32(cpu_fpr[rd], cpu_fpr[rs2]);
|
|
break;
|
|
case 0x07a: /* VIS I fornot1 */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
tcg_gen_orc_i32(cpu_fpr[DFPREG(rd)], cpu_fpr[DFPREG(rs2)],
|
|
cpu_fpr[DFPREG(rs1)]);
|
|
tcg_gen_orc_i32(cpu_fpr[DFPREG(rd) + 1],
|
|
cpu_fpr[DFPREG(rs2) + 1],
|
|
cpu_fpr[DFPREG(rs1) + 1]);
|
|
break;
|
|
case 0x07b: /* VIS I fornot1s */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
tcg_gen_orc_i32(cpu_fpr[rd], cpu_fpr[rs2], cpu_fpr[rs1]);
|
|
break;
|
|
case 0x07c: /* VIS I for */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
tcg_gen_or_i32(cpu_fpr[DFPREG(rd)], cpu_fpr[DFPREG(rs1)],
|
|
cpu_fpr[DFPREG(rs2)]);
|
|
tcg_gen_or_i32(cpu_fpr[DFPREG(rd) + 1],
|
|
cpu_fpr[DFPREG(rs1) + 1],
|
|
cpu_fpr[DFPREG(rs2) + 1]);
|
|
break;
|
|
case 0x07d: /* VIS I fors */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
tcg_gen_or_i32(cpu_fpr[rd], cpu_fpr[rs1], cpu_fpr[rs2]);
|
|
break;
|
|
case 0x07e: /* VIS I fone */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
tcg_gen_movi_i32(cpu_fpr[DFPREG(rd)], -1);
|
|
tcg_gen_movi_i32(cpu_fpr[DFPREG(rd) + 1], -1);
|
|
break;
|
|
case 0x07f: /* VIS I fones */
|
|
CHECK_FPU_FEATURE(dc, VIS1);
|
|
tcg_gen_movi_i32(cpu_fpr[rd], -1);
|
|
break;
|
|
case 0x080: /* VIS I shutdown */
|
|
case 0x081: /* VIS II siam */
|
|
// XXX
|
|
goto illegal_insn;
|
|
default:
|
|
goto illegal_insn;
|
|
}
|
|
#else
|
|
goto ncp_insn;
|
|
#endif
|
|
} else if (xop == 0x37) { /* V8 CPop2, V9 impdep2 */
|
|
#ifdef TARGET_SPARC64
|
|
goto illegal_insn;
|
|
#else
|
|
goto ncp_insn;
|
|
#endif
|
|
#ifdef TARGET_SPARC64
|
|
} else if (xop == 0x39) { /* V9 return */
|
|
TCGv_i32 r_const;
|
|
|
|
save_state(dc, cpu_cond);
|
|
cpu_src1 = get_src1(insn, cpu_src1);
|
|
if (IS_IMM) { /* immediate */
|
|
simm = GET_FIELDs(insn, 19, 31);
|
|
tcg_gen_addi_tl(cpu_dst, cpu_src1, simm);
|
|
} else { /* register */
|
|
rs2 = GET_FIELD(insn, 27, 31);
|
|
if (rs2) {
|
|
gen_movl_reg_TN(rs2, cpu_src2);
|
|
tcg_gen_add_tl(cpu_dst, cpu_src1, cpu_src2);
|
|
} else
|
|
tcg_gen_mov_tl(cpu_dst, cpu_src1);
|
|
}
|
|
gen_helper_restore();
|
|
gen_mov_pc_npc(dc, cpu_cond);
|
|
r_const = tcg_const_i32(3);
|
|
gen_helper_check_align(cpu_dst, r_const);
|
|
tcg_temp_free_i32(r_const);
|
|
tcg_gen_mov_tl(cpu_npc, cpu_dst);
|
|
dc->npc = DYNAMIC_PC;
|
|
goto jmp_insn;
|
|
#endif
|
|
} else {
|
|
cpu_src1 = get_src1(insn, cpu_src1);
|
|
if (IS_IMM) { /* immediate */
|
|
simm = GET_FIELDs(insn, 19, 31);
|
|
tcg_gen_addi_tl(cpu_dst, cpu_src1, simm);
|
|
} else { /* register */
|
|
rs2 = GET_FIELD(insn, 27, 31);
|
|
if (rs2) {
|
|
gen_movl_reg_TN(rs2, cpu_src2);
|
|
tcg_gen_add_tl(cpu_dst, cpu_src1, cpu_src2);
|
|
} else
|
|
tcg_gen_mov_tl(cpu_dst, cpu_src1);
|
|
}
|
|
switch (xop) {
|
|
case 0x38: /* jmpl */
|
|
{
|
|
TCGv r_pc;
|
|
TCGv_i32 r_const;
|
|
|
|
r_pc = tcg_const_tl(dc->pc);
|
|
gen_movl_TN_reg(rd, r_pc);
|
|
tcg_temp_free(r_pc);
|
|
gen_mov_pc_npc(dc, cpu_cond);
|
|
r_const = tcg_const_i32(3);
|
|
gen_helper_check_align(cpu_dst, r_const);
|
|
tcg_temp_free_i32(r_const);
|
|
tcg_gen_mov_tl(cpu_npc, cpu_dst);
|
|
dc->npc = DYNAMIC_PC;
|
|
}
|
|
goto jmp_insn;
|
|
#if !defined(CONFIG_USER_ONLY) && !defined(TARGET_SPARC64)
|
|
case 0x39: /* rett, V9 return */
|
|
{
|
|
TCGv_i32 r_const;
|
|
|
|
if (!supervisor(dc))
|
|
goto priv_insn;
|
|
gen_mov_pc_npc(dc, cpu_cond);
|
|
r_const = tcg_const_i32(3);
|
|
gen_helper_check_align(cpu_dst, r_const);
|
|
tcg_temp_free_i32(r_const);
|
|
tcg_gen_mov_tl(cpu_npc, cpu_dst);
|
|
dc->npc = DYNAMIC_PC;
|
|
gen_helper_rett();
|
|
}
|
|
goto jmp_insn;
|
|
#endif
|
|
case 0x3b: /* flush */
|
|
if (!((dc)->def->features & CPU_FEATURE_FLUSH))
|
|
goto unimp_flush;
|
|
gen_helper_flush(cpu_dst);
|
|
break;
|
|
case 0x3c: /* save */
|
|
save_state(dc, cpu_cond);
|
|
gen_helper_save();
|
|
gen_movl_TN_reg(rd, cpu_dst);
|
|
break;
|
|
case 0x3d: /* restore */
|
|
save_state(dc, cpu_cond);
|
|
gen_helper_restore();
|
|
gen_movl_TN_reg(rd, cpu_dst);
|
|
break;
|
|
#if !defined(CONFIG_USER_ONLY) && defined(TARGET_SPARC64)
|
|
case 0x3e: /* V9 done/retry */
|
|
{
|
|
switch (rd) {
|
|
case 0:
|
|
if (!supervisor(dc))
|
|
goto priv_insn;
|
|
dc->npc = DYNAMIC_PC;
|
|
dc->pc = DYNAMIC_PC;
|
|
gen_helper_done();
|
|
goto jmp_insn;
|
|
case 1:
|
|
if (!supervisor(dc))
|
|
goto priv_insn;
|
|
dc->npc = DYNAMIC_PC;
|
|
dc->pc = DYNAMIC_PC;
|
|
gen_helper_retry();
|
|
goto jmp_insn;
|
|
default:
|
|
goto illegal_insn;
|
|
}
|
|
}
|
|
break;
|
|
#endif
|
|
default:
|
|
goto illegal_insn;
|
|
}
|
|
}
|
|
break;
|
|
}
|
|
break;
|
|
case 3: /* load/store instructions */
|
|
{
|
|
unsigned int xop = GET_FIELD(insn, 7, 12);
|
|
|
|
/* flush pending conditional evaluations before exposing
|
|
cpu state */
|
|
if (dc->cc_op != CC_OP_FLAGS) {
|
|
dc->cc_op = CC_OP_FLAGS;
|
|
gen_helper_compute_psr();
|
|
}
|
|
cpu_src1 = get_src1(insn, cpu_src1);
|
|
if (xop == 0x3c || xop == 0x3e) { // V9 casa/casxa
|
|
rs2 = GET_FIELD(insn, 27, 31);
|
|
gen_movl_reg_TN(rs2, cpu_src2);
|
|
tcg_gen_mov_tl(cpu_addr, cpu_src1);
|
|
} else if (IS_IMM) { /* immediate */
|
|
simm = GET_FIELDs(insn, 19, 31);
|
|
tcg_gen_addi_tl(cpu_addr, cpu_src1, simm);
|
|
} else { /* register */
|
|
rs2 = GET_FIELD(insn, 27, 31);
|
|
if (rs2 != 0) {
|
|
gen_movl_reg_TN(rs2, cpu_src2);
|
|
tcg_gen_add_tl(cpu_addr, cpu_src1, cpu_src2);
|
|
} else
|
|
tcg_gen_mov_tl(cpu_addr, cpu_src1);
|
|
}
|
|
if (xop < 4 || (xop > 7 && xop < 0x14 && xop != 0x0e) ||
|
|
(xop > 0x17 && xop <= 0x1d ) ||
|
|
(xop > 0x2c && xop <= 0x33) || xop == 0x1f || xop == 0x3d) {
|
|
switch (xop) {
|
|
case 0x0: /* ld, V9 lduw, load unsigned word */
|
|
gen_address_mask(dc, cpu_addr);
|
|
tcg_gen_qemu_ld32u(cpu_val, cpu_addr, dc->mem_idx);
|
|
break;
|
|
case 0x1: /* ldub, load unsigned byte */
|
|
gen_address_mask(dc, cpu_addr);
|
|
tcg_gen_qemu_ld8u(cpu_val, cpu_addr, dc->mem_idx);
|
|
break;
|
|
case 0x2: /* lduh, load unsigned halfword */
|
|
gen_address_mask(dc, cpu_addr);
|
|
tcg_gen_qemu_ld16u(cpu_val, cpu_addr, dc->mem_idx);
|
|
break;
|
|
case 0x3: /* ldd, load double word */
|
|
if (rd & 1)
|
|
goto illegal_insn;
|
|
else {
|
|
TCGv_i32 r_const;
|
|
|
|
save_state(dc, cpu_cond);
|
|
r_const = tcg_const_i32(7);
|
|
gen_helper_check_align(cpu_addr, r_const); // XXX remove
|
|
tcg_temp_free_i32(r_const);
|
|
gen_address_mask(dc, cpu_addr);
|
|
tcg_gen_qemu_ld64(cpu_tmp64, cpu_addr, dc->mem_idx);
|
|
tcg_gen_trunc_i64_tl(cpu_tmp0, cpu_tmp64);
|
|
tcg_gen_andi_tl(cpu_tmp0, cpu_tmp0, 0xffffffffULL);
|
|
gen_movl_TN_reg(rd + 1, cpu_tmp0);
|
|
tcg_gen_shri_i64(cpu_tmp64, cpu_tmp64, 32);
|
|
tcg_gen_trunc_i64_tl(cpu_val, cpu_tmp64);
|
|
tcg_gen_andi_tl(cpu_val, cpu_val, 0xffffffffULL);
|
|
}
|
|
break;
|
|
case 0x9: /* ldsb, load signed byte */
|
|
gen_address_mask(dc, cpu_addr);
|
|
tcg_gen_qemu_ld8s(cpu_val, cpu_addr, dc->mem_idx);
|
|
break;
|
|
case 0xa: /* ldsh, load signed halfword */
|
|
gen_address_mask(dc, cpu_addr);
|
|
tcg_gen_qemu_ld16s(cpu_val, cpu_addr, dc->mem_idx);
|
|
break;
|
|
case 0xd: /* ldstub -- XXX: should be atomically */
|
|
{
|
|
TCGv r_const;
|
|
|
|
gen_address_mask(dc, cpu_addr);
|
|
tcg_gen_qemu_ld8s(cpu_val, cpu_addr, dc->mem_idx);
|
|
r_const = tcg_const_tl(0xff);
|
|
tcg_gen_qemu_st8(r_const, cpu_addr, dc->mem_idx);
|
|
tcg_temp_free(r_const);
|
|
}
|
|
break;
|
|
case 0x0f: /* swap, swap register with memory. Also
|
|
atomically */
|
|
CHECK_IU_FEATURE(dc, SWAP);
|
|
gen_movl_reg_TN(rd, cpu_val);
|
|
gen_address_mask(dc, cpu_addr);
|
|
tcg_gen_qemu_ld32u(cpu_tmp0, cpu_addr, dc->mem_idx);
|
|
tcg_gen_qemu_st32(cpu_val, cpu_addr, dc->mem_idx);
|
|
tcg_gen_mov_tl(cpu_val, cpu_tmp0);
|
|
break;
|
|
#if !defined(CONFIG_USER_ONLY) || defined(TARGET_SPARC64)
|
|
case 0x10: /* lda, V9 lduwa, load word alternate */
|
|
#ifndef TARGET_SPARC64
|
|
if (IS_IMM)
|
|
goto illegal_insn;
|
|
if (!supervisor(dc))
|
|
goto priv_insn;
|
|
#endif
|
|
save_state(dc, cpu_cond);
|
|
gen_ld_asi(cpu_val, cpu_addr, insn, 4, 0);
|
|
break;
|
|
case 0x11: /* lduba, load unsigned byte alternate */
|
|
#ifndef TARGET_SPARC64
|
|
if (IS_IMM)
|
|
goto illegal_insn;
|
|
if (!supervisor(dc))
|
|
goto priv_insn;
|
|
#endif
|
|
save_state(dc, cpu_cond);
|
|
gen_ld_asi(cpu_val, cpu_addr, insn, 1, 0);
|
|
break;
|
|
case 0x12: /* lduha, load unsigned halfword alternate */
|
|
#ifndef TARGET_SPARC64
|
|
if (IS_IMM)
|
|
goto illegal_insn;
|
|
if (!supervisor(dc))
|
|
goto priv_insn;
|
|
#endif
|
|
save_state(dc, cpu_cond);
|
|
gen_ld_asi(cpu_val, cpu_addr, insn, 2, 0);
|
|
break;
|
|
case 0x13: /* ldda, load double word alternate */
|
|
#ifndef TARGET_SPARC64
|
|
if (IS_IMM)
|
|
goto illegal_insn;
|
|
if (!supervisor(dc))
|
|
goto priv_insn;
|
|
#endif
|
|
if (rd & 1)
|
|
goto illegal_insn;
|
|
save_state(dc, cpu_cond);
|
|
gen_ldda_asi(cpu_val, cpu_addr, insn, rd);
|
|
goto skip_move;
|
|
case 0x19: /* ldsba, load signed byte alternate */
|
|
#ifndef TARGET_SPARC64
|
|
if (IS_IMM)
|
|
goto illegal_insn;
|
|
if (!supervisor(dc))
|
|
goto priv_insn;
|
|
#endif
|
|
save_state(dc, cpu_cond);
|
|
gen_ld_asi(cpu_val, cpu_addr, insn, 1, 1);
|
|
break;
|
|
case 0x1a: /* ldsha, load signed halfword alternate */
|
|
#ifndef TARGET_SPARC64
|
|
if (IS_IMM)
|
|
goto illegal_insn;
|
|
if (!supervisor(dc))
|
|
goto priv_insn;
|
|
#endif
|
|
save_state(dc, cpu_cond);
|
|
gen_ld_asi(cpu_val, cpu_addr, insn, 2, 1);
|
|
break;
|
|
case 0x1d: /* ldstuba -- XXX: should be atomically */
|
|
#ifndef TARGET_SPARC64
|
|
if (IS_IMM)
|
|
goto illegal_insn;
|
|
if (!supervisor(dc))
|
|
goto priv_insn;
|
|
#endif
|
|
save_state(dc, cpu_cond);
|
|
gen_ldstub_asi(cpu_val, cpu_addr, insn);
|
|
break;
|
|
case 0x1f: /* swapa, swap reg with alt. memory. Also
|
|
atomically */
|
|
CHECK_IU_FEATURE(dc, SWAP);
|
|
#ifndef TARGET_SPARC64
|
|
if (IS_IMM)
|
|
goto illegal_insn;
|
|
if (!supervisor(dc))
|
|
goto priv_insn;
|
|
#endif
|
|
save_state(dc, cpu_cond);
|
|
gen_movl_reg_TN(rd, cpu_val);
|
|
gen_swap_asi(cpu_val, cpu_addr, insn);
|
|
break;
|
|
|
|
#ifndef TARGET_SPARC64
|
|
case 0x30: /* ldc */
|
|
case 0x31: /* ldcsr */
|
|
case 0x33: /* lddc */
|
|
goto ncp_insn;
|
|
#endif
|
|
#endif
|
|
#ifdef TARGET_SPARC64
|
|
case 0x08: /* V9 ldsw */
|
|
gen_address_mask(dc, cpu_addr);
|
|
tcg_gen_qemu_ld32s(cpu_val, cpu_addr, dc->mem_idx);
|
|
break;
|
|
case 0x0b: /* V9 ldx */
|
|
gen_address_mask(dc, cpu_addr);
|
|
tcg_gen_qemu_ld64(cpu_val, cpu_addr, dc->mem_idx);
|
|
break;
|
|
case 0x18: /* V9 ldswa */
|
|
save_state(dc, cpu_cond);
|
|
gen_ld_asi(cpu_val, cpu_addr, insn, 4, 1);
|
|
break;
|
|
case 0x1b: /* V9 ldxa */
|
|
save_state(dc, cpu_cond);
|
|
gen_ld_asi(cpu_val, cpu_addr, insn, 8, 0);
|
|
break;
|
|
case 0x2d: /* V9 prefetch, no effect */
|
|
goto skip_move;
|
|
case 0x30: /* V9 ldfa */
|
|
save_state(dc, cpu_cond);
|
|
gen_ldf_asi(cpu_addr, insn, 4, rd);
|
|
goto skip_move;
|
|
case 0x33: /* V9 lddfa */
|
|
save_state(dc, cpu_cond);
|
|
gen_ldf_asi(cpu_addr, insn, 8, DFPREG(rd));
|
|
goto skip_move;
|
|
case 0x3d: /* V9 prefetcha, no effect */
|
|
goto skip_move;
|
|
case 0x32: /* V9 ldqfa */
|
|
CHECK_FPU_FEATURE(dc, FLOAT128);
|
|
save_state(dc, cpu_cond);
|
|
gen_ldf_asi(cpu_addr, insn, 16, QFPREG(rd));
|
|
goto skip_move;
|
|
#endif
|
|
default:
|
|
goto illegal_insn;
|
|
}
|
|
gen_movl_TN_reg(rd, cpu_val);
|
|
#if !defined(CONFIG_USER_ONLY) || defined(TARGET_SPARC64)
|
|
skip_move: ;
|
|
#endif
|
|
} else if (xop >= 0x20 && xop < 0x24) {
|
|
if (gen_trap_ifnofpu(dc, cpu_cond))
|
|
goto jmp_insn;
|
|
save_state(dc, cpu_cond);
|
|
switch (xop) {
|
|
case 0x20: /* ldf, load fpreg */
|
|
gen_address_mask(dc, cpu_addr);
|
|
tcg_gen_qemu_ld32u(cpu_tmp0, cpu_addr, dc->mem_idx);
|
|
tcg_gen_trunc_tl_i32(cpu_fpr[rd], cpu_tmp0);
|
|
break;
|
|
case 0x21: /* ldfsr, V9 ldxfsr */
|
|
#ifdef TARGET_SPARC64
|
|
gen_address_mask(dc, cpu_addr);
|
|
if (rd == 1) {
|
|
tcg_gen_qemu_ld64(cpu_tmp64, cpu_addr, dc->mem_idx);
|
|
gen_helper_ldxfsr(cpu_tmp64);
|
|
} else
|
|
#else
|
|
{
|
|
tcg_gen_qemu_ld32u(cpu_tmp32, cpu_addr, dc->mem_idx);
|
|
gen_helper_ldfsr(cpu_tmp32);
|
|
}
|
|
#endif
|
|
break;
|
|
case 0x22: /* ldqf, load quad fpreg */
|
|
{
|
|
TCGv_i32 r_const;
|
|
|
|
CHECK_FPU_FEATURE(dc, FLOAT128);
|
|
r_const = tcg_const_i32(dc->mem_idx);
|
|
gen_helper_ldqf(cpu_addr, r_const);
|
|
tcg_temp_free_i32(r_const);
|
|
gen_op_store_QT0_fpr(QFPREG(rd));
|
|
}
|
|
break;
|
|
case 0x23: /* lddf, load double fpreg */
|
|
{
|
|
TCGv_i32 r_const;
|
|
|
|
r_const = tcg_const_i32(dc->mem_idx);
|
|
gen_helper_lddf(cpu_addr, r_const);
|
|
tcg_temp_free_i32(r_const);
|
|
gen_op_store_DT0_fpr(DFPREG(rd));
|
|
}
|
|
break;
|
|
default:
|
|
goto illegal_insn;
|
|
}
|
|
} else if (xop < 8 || (xop >= 0x14 && xop < 0x18) ||
|
|
xop == 0xe || xop == 0x1e) {
|
|
gen_movl_reg_TN(rd, cpu_val);
|
|
switch (xop) {
|
|
case 0x4: /* st, store word */
|
|
gen_address_mask(dc, cpu_addr);
|
|
tcg_gen_qemu_st32(cpu_val, cpu_addr, dc->mem_idx);
|
|
break;
|
|
case 0x5: /* stb, store byte */
|
|
gen_address_mask(dc, cpu_addr);
|
|
tcg_gen_qemu_st8(cpu_val, cpu_addr, dc->mem_idx);
|
|
break;
|
|
case 0x6: /* sth, store halfword */
|
|
gen_address_mask(dc, cpu_addr);
|
|
tcg_gen_qemu_st16(cpu_val, cpu_addr, dc->mem_idx);
|
|
break;
|
|
case 0x7: /* std, store double word */
|
|
if (rd & 1)
|
|
goto illegal_insn;
|
|
else {
|
|
TCGv_i32 r_const;
|
|
|
|
save_state(dc, cpu_cond);
|
|
gen_address_mask(dc, cpu_addr);
|
|
r_const = tcg_const_i32(7);
|
|
gen_helper_check_align(cpu_addr, r_const); // XXX remove
|
|
tcg_temp_free_i32(r_const);
|
|
gen_movl_reg_TN(rd + 1, cpu_tmp0);
|
|
tcg_gen_concat_tl_i64(cpu_tmp64, cpu_tmp0, cpu_val);
|
|
tcg_gen_qemu_st64(cpu_tmp64, cpu_addr, dc->mem_idx);
|
|
}
|
|
break;
|
|
#if !defined(CONFIG_USER_ONLY) || defined(TARGET_SPARC64)
|
|
case 0x14: /* sta, V9 stwa, store word alternate */
|
|
#ifndef TARGET_SPARC64
|
|
if (IS_IMM)
|
|
goto illegal_insn;
|
|
if (!supervisor(dc))
|
|
goto priv_insn;
|
|
#endif
|
|
save_state(dc, cpu_cond);
|
|
gen_st_asi(cpu_val, cpu_addr, insn, 4);
|
|
break;
|
|
case 0x15: /* stba, store byte alternate */
|
|
#ifndef TARGET_SPARC64
|
|
if (IS_IMM)
|
|
goto illegal_insn;
|
|
if (!supervisor(dc))
|
|
goto priv_insn;
|
|
#endif
|
|
save_state(dc, cpu_cond);
|
|
gen_st_asi(cpu_val, cpu_addr, insn, 1);
|
|
break;
|
|
case 0x16: /* stha, store halfword alternate */
|
|
#ifndef TARGET_SPARC64
|
|
if (IS_IMM)
|
|
goto illegal_insn;
|
|
if (!supervisor(dc))
|
|
goto priv_insn;
|
|
#endif
|
|
save_state(dc, cpu_cond);
|
|
gen_st_asi(cpu_val, cpu_addr, insn, 2);
|
|
break;
|
|
case 0x17: /* stda, store double word alternate */
|
|
#ifndef TARGET_SPARC64
|
|
if (IS_IMM)
|
|
goto illegal_insn;
|
|
if (!supervisor(dc))
|
|
goto priv_insn;
|
|
#endif
|
|
if (rd & 1)
|
|
goto illegal_insn;
|
|
else {
|
|
save_state(dc, cpu_cond);
|
|
gen_stda_asi(cpu_val, cpu_addr, insn, rd);
|
|
}
|
|
break;
|
|
#endif
|
|
#ifdef TARGET_SPARC64
|
|
case 0x0e: /* V9 stx */
|
|
gen_address_mask(dc, cpu_addr);
|
|
tcg_gen_qemu_st64(cpu_val, cpu_addr, dc->mem_idx);
|
|
break;
|
|
case 0x1e: /* V9 stxa */
|
|
save_state(dc, cpu_cond);
|
|
gen_st_asi(cpu_val, cpu_addr, insn, 8);
|
|
break;
|
|
#endif
|
|
default:
|
|
goto illegal_insn;
|
|
}
|
|
} else if (xop > 0x23 && xop < 0x28) {
|
|
if (gen_trap_ifnofpu(dc, cpu_cond))
|
|
goto jmp_insn;
|
|
save_state(dc, cpu_cond);
|
|
switch (xop) {
|
|
case 0x24: /* stf, store fpreg */
|
|
gen_address_mask(dc, cpu_addr);
|
|
tcg_gen_ext_i32_tl(cpu_tmp0, cpu_fpr[rd]);
|
|
tcg_gen_qemu_st32(cpu_tmp0, cpu_addr, dc->mem_idx);
|
|
break;
|
|
case 0x25: /* stfsr, V9 stxfsr */
|
|
#ifdef TARGET_SPARC64
|
|
gen_address_mask(dc, cpu_addr);
|
|
tcg_gen_ld_i64(cpu_tmp64, cpu_env, offsetof(CPUState, fsr));
|
|
if (rd == 1)
|
|
tcg_gen_qemu_st64(cpu_tmp64, cpu_addr, dc->mem_idx);
|
|
else
|
|
tcg_gen_qemu_st32(cpu_tmp64, cpu_addr, dc->mem_idx);
|
|
#else
|
|
tcg_gen_ld_i32(cpu_tmp32, cpu_env, offsetof(CPUState, fsr));
|
|
tcg_gen_qemu_st32(cpu_tmp32, cpu_addr, dc->mem_idx);
|
|
#endif
|
|
break;
|
|
case 0x26:
|
|
#ifdef TARGET_SPARC64
|
|
/* V9 stqf, store quad fpreg */
|
|
{
|
|
TCGv_i32 r_const;
|
|
|
|
CHECK_FPU_FEATURE(dc, FLOAT128);
|
|
gen_op_load_fpr_QT0(QFPREG(rd));
|
|
r_const = tcg_const_i32(dc->mem_idx);
|
|
gen_helper_stqf(cpu_addr, r_const);
|
|
tcg_temp_free_i32(r_const);
|
|
}
|
|
break;
|
|
#else /* !TARGET_SPARC64 */
|
|
/* stdfq, store floating point queue */
|
|
#if defined(CONFIG_USER_ONLY)
|
|
goto illegal_insn;
|
|
#else
|
|
if (!supervisor(dc))
|
|
goto priv_insn;
|
|
if (gen_trap_ifnofpu(dc, cpu_cond))
|
|
goto jmp_insn;
|
|
goto nfq_insn;
|
|
#endif
|
|
#endif
|
|
case 0x27: /* stdf, store double fpreg */
|
|
{
|
|
TCGv_i32 r_const;
|
|
|
|
gen_op_load_fpr_DT0(DFPREG(rd));
|
|
r_const = tcg_const_i32(dc->mem_idx);
|
|
gen_helper_stdf(cpu_addr, r_const);
|
|
tcg_temp_free_i32(r_const);
|
|
}
|
|
break;
|
|
default:
|
|
goto illegal_insn;
|
|
}
|
|
} else if (xop > 0x33 && xop < 0x3f) {
|
|
save_state(dc, cpu_cond);
|
|
switch (xop) {
|
|
#ifdef TARGET_SPARC64
|
|
case 0x34: /* V9 stfa */
|
|
gen_stf_asi(cpu_addr, insn, 4, rd);
|
|
break;
|
|
case 0x36: /* V9 stqfa */
|
|
{
|
|
TCGv_i32 r_const;
|
|
|
|
CHECK_FPU_FEATURE(dc, FLOAT128);
|
|
r_const = tcg_const_i32(7);
|
|
gen_helper_check_align(cpu_addr, r_const);
|
|
tcg_temp_free_i32(r_const);
|
|
gen_op_load_fpr_QT0(QFPREG(rd));
|
|
gen_stf_asi(cpu_addr, insn, 16, QFPREG(rd));
|
|
}
|
|
break;
|
|
case 0x37: /* V9 stdfa */
|
|
gen_op_load_fpr_DT0(DFPREG(rd));
|
|
gen_stf_asi(cpu_addr, insn, 8, DFPREG(rd));
|
|
break;
|
|
case 0x3c: /* V9 casa */
|
|
gen_cas_asi(cpu_val, cpu_addr, cpu_src2, insn, rd);
|
|
gen_movl_TN_reg(rd, cpu_val);
|
|
break;
|
|
case 0x3e: /* V9 casxa */
|
|
gen_casx_asi(cpu_val, cpu_addr, cpu_src2, insn, rd);
|
|
gen_movl_TN_reg(rd, cpu_val);
|
|
break;
|
|
#else
|
|
case 0x34: /* stc */
|
|
case 0x35: /* stcsr */
|
|
case 0x36: /* stdcq */
|
|
case 0x37: /* stdc */
|
|
goto ncp_insn;
|
|
#endif
|
|
default:
|
|
goto illegal_insn;
|
|
}
|
|
} else
|
|
goto illegal_insn;
|
|
}
|
|
break;
|
|
}
|
|
/* default case for non jump instructions */
|
|
if (dc->npc == DYNAMIC_PC) {
|
|
dc->pc = DYNAMIC_PC;
|
|
gen_op_next_insn();
|
|
} else if (dc->npc == JUMP_PC) {
|
|
/* we can do a static jump */
|
|
gen_branch2(dc, dc->jump_pc[0], dc->jump_pc[1], cpu_cond);
|
|
dc->is_br = 1;
|
|
} else {
|
|
dc->pc = dc->npc;
|
|
dc->npc = dc->npc + 4;
|
|
}
|
|
jmp_insn:
|
|
return;
|
|
illegal_insn:
|
|
{
|
|
TCGv_i32 r_const;
|
|
|
|
save_state(dc, cpu_cond);
|
|
r_const = tcg_const_i32(TT_ILL_INSN);
|
|
gen_helper_raise_exception(r_const);
|
|
tcg_temp_free_i32(r_const);
|
|
dc->is_br = 1;
|
|
}
|
|
return;
|
|
unimp_flush:
|
|
{
|
|
TCGv_i32 r_const;
|
|
|
|
save_state(dc, cpu_cond);
|
|
r_const = tcg_const_i32(TT_UNIMP_FLUSH);
|
|
gen_helper_raise_exception(r_const);
|
|
tcg_temp_free_i32(r_const);
|
|
dc->is_br = 1;
|
|
}
|
|
return;
|
|
#if !defined(CONFIG_USER_ONLY)
|
|
priv_insn:
|
|
{
|
|
TCGv_i32 r_const;
|
|
|
|
save_state(dc, cpu_cond);
|
|
r_const = tcg_const_i32(TT_PRIV_INSN);
|
|
gen_helper_raise_exception(r_const);
|
|
tcg_temp_free_i32(r_const);
|
|
dc->is_br = 1;
|
|
}
|
|
return;
|
|
#endif
|
|
nfpu_insn:
|
|
save_state(dc, cpu_cond);
|
|
gen_op_fpexception_im(FSR_FTT_UNIMPFPOP);
|
|
dc->is_br = 1;
|
|
return;
|
|
#if !defined(CONFIG_USER_ONLY) && !defined(TARGET_SPARC64)
|
|
nfq_insn:
|
|
save_state(dc, cpu_cond);
|
|
gen_op_fpexception_im(FSR_FTT_SEQ_ERROR);
|
|
dc->is_br = 1;
|
|
return;
|
|
#endif
|
|
#ifndef TARGET_SPARC64
|
|
ncp_insn:
|
|
{
|
|
TCGv r_const;
|
|
|
|
save_state(dc, cpu_cond);
|
|
r_const = tcg_const_i32(TT_NCP_INSN);
|
|
gen_helper_raise_exception(r_const);
|
|
tcg_temp_free(r_const);
|
|
dc->is_br = 1;
|
|
}
|
|
return;
|
|
#endif
|
|
}
|
|
|
|
static inline void gen_intermediate_code_internal(TranslationBlock * tb,
|
|
int spc, CPUSPARCState *env)
|
|
{
|
|
target_ulong pc_start, last_pc;
|
|
uint16_t *gen_opc_end;
|
|
DisasContext dc1, *dc = &dc1;
|
|
CPUBreakpoint *bp;
|
|
int j, lj = -1;
|
|
int num_insns;
|
|
int max_insns;
|
|
|
|
memset(dc, 0, sizeof(DisasContext));
|
|
dc->tb = tb;
|
|
pc_start = tb->pc;
|
|
dc->pc = pc_start;
|
|
last_pc = dc->pc;
|
|
dc->npc = (target_ulong) tb->cs_base;
|
|
dc->cc_op = CC_OP_DYNAMIC;
|
|
dc->mem_idx = cpu_mmu_index(env);
|
|
dc->def = env->def;
|
|
if ((dc->def->features & CPU_FEATURE_FLOAT))
|
|
dc->fpu_enabled = cpu_fpu_enabled(env);
|
|
else
|
|
dc->fpu_enabled = 0;
|
|
#ifdef TARGET_SPARC64
|
|
dc->address_mask_32bit = env->pstate & PS_AM;
|
|
#endif
|
|
gen_opc_end = gen_opc_buf + OPC_MAX_SIZE;
|
|
|
|
cpu_tmp0 = tcg_temp_new();
|
|
cpu_tmp32 = tcg_temp_new_i32();
|
|
cpu_tmp64 = tcg_temp_new_i64();
|
|
|
|
cpu_dst = tcg_temp_local_new();
|
|
|
|
// loads and stores
|
|
cpu_val = tcg_temp_local_new();
|
|
cpu_addr = tcg_temp_local_new();
|
|
|
|
num_insns = 0;
|
|
max_insns = tb->cflags & CF_COUNT_MASK;
|
|
if (max_insns == 0)
|
|
max_insns = CF_COUNT_MASK;
|
|
gen_icount_start();
|
|
do {
|
|
if (unlikely(!QTAILQ_EMPTY(&env->breakpoints))) {
|
|
QTAILQ_FOREACH(bp, &env->breakpoints, entry) {
|
|
if (bp->pc == dc->pc) {
|
|
if (dc->pc != pc_start)
|
|
save_state(dc, cpu_cond);
|
|
gen_helper_debug();
|
|
tcg_gen_exit_tb(0);
|
|
dc->is_br = 1;
|
|
goto exit_gen_loop;
|
|
}
|
|
}
|
|
}
|
|
if (spc) {
|
|
qemu_log("Search PC...\n");
|
|
j = gen_opc_ptr - gen_opc_buf;
|
|
if (lj < j) {
|
|
lj++;
|
|
while (lj < j)
|
|
gen_opc_instr_start[lj++] = 0;
|
|
gen_opc_pc[lj] = dc->pc;
|
|
gen_opc_npc[lj] = dc->npc;
|
|
gen_opc_instr_start[lj] = 1;
|
|
gen_opc_icount[lj] = num_insns;
|
|
}
|
|
}
|
|
if (num_insns + 1 == max_insns && (tb->cflags & CF_LAST_IO))
|
|
gen_io_start();
|
|
last_pc = dc->pc;
|
|
disas_sparc_insn(dc);
|
|
num_insns++;
|
|
|
|
if (dc->is_br)
|
|
break;
|
|
/* if the next PC is different, we abort now */
|
|
if (dc->pc != (last_pc + 4))
|
|
break;
|
|
/* if we reach a page boundary, we stop generation so that the
|
|
PC of a TT_TFAULT exception is always in the right page */
|
|
if ((dc->pc & (TARGET_PAGE_SIZE - 1)) == 0)
|
|
break;
|
|
/* if single step mode, we generate only one instruction and
|
|
generate an exception */
|
|
if (env->singlestep_enabled || singlestep) {
|
|
tcg_gen_movi_tl(cpu_pc, dc->pc);
|
|
tcg_gen_exit_tb(0);
|
|
break;
|
|
}
|
|
} while ((gen_opc_ptr < gen_opc_end) &&
|
|
(dc->pc - pc_start) < (TARGET_PAGE_SIZE - 32) &&
|
|
num_insns < max_insns);
|
|
|
|
exit_gen_loop:
|
|
tcg_temp_free(cpu_addr);
|
|
tcg_temp_free(cpu_val);
|
|
tcg_temp_free(cpu_dst);
|
|
tcg_temp_free_i64(cpu_tmp64);
|
|
tcg_temp_free_i32(cpu_tmp32);
|
|
tcg_temp_free(cpu_tmp0);
|
|
if (tb->cflags & CF_LAST_IO)
|
|
gen_io_end();
|
|
if (!dc->is_br) {
|
|
if (dc->pc != DYNAMIC_PC &&
|
|
(dc->npc != DYNAMIC_PC && dc->npc != JUMP_PC)) {
|
|
/* static PC and NPC: we can use direct chaining */
|
|
gen_goto_tb(dc, 0, dc->pc, dc->npc);
|
|
} else {
|
|
if (dc->pc != DYNAMIC_PC)
|
|
tcg_gen_movi_tl(cpu_pc, dc->pc);
|
|
save_npc(dc, cpu_cond);
|
|
tcg_gen_exit_tb(0);
|
|
}
|
|
}
|
|
gen_icount_end(tb, num_insns);
|
|
*gen_opc_ptr = INDEX_op_end;
|
|
if (spc) {
|
|
j = gen_opc_ptr - gen_opc_buf;
|
|
lj++;
|
|
while (lj <= j)
|
|
gen_opc_instr_start[lj++] = 0;
|
|
#if 0
|
|
log_page_dump();
|
|
#endif
|
|
gen_opc_jump_pc[0] = dc->jump_pc[0];
|
|
gen_opc_jump_pc[1] = dc->jump_pc[1];
|
|
} else {
|
|
tb->size = last_pc + 4 - pc_start;
|
|
tb->icount = num_insns;
|
|
}
|
|
#ifdef DEBUG_DISAS
|
|
if (qemu_loglevel_mask(CPU_LOG_TB_IN_ASM)) {
|
|
qemu_log("--------------\n");
|
|
qemu_log("IN: %s\n", lookup_symbol(pc_start));
|
|
log_target_disas(pc_start, last_pc + 4 - pc_start, 0);
|
|
qemu_log("\n");
|
|
}
|
|
#endif
|
|
}
|
|
|
|
void gen_intermediate_code(CPUSPARCState * env, TranslationBlock * tb)
|
|
{
|
|
gen_intermediate_code_internal(tb, 0, env);
|
|
}
|
|
|
|
void gen_intermediate_code_pc(CPUSPARCState * env, TranslationBlock * tb)
|
|
{
|
|
gen_intermediate_code_internal(tb, 1, env);
|
|
}
|
|
|
|
void gen_intermediate_code_init(CPUSPARCState *env)
|
|
{
|
|
unsigned int i;
|
|
static int inited;
|
|
static const char * const gregnames[8] = {
|
|
NULL, // g0 not used
|
|
"g1",
|
|
"g2",
|
|
"g3",
|
|
"g4",
|
|
"g5",
|
|
"g6",
|
|
"g7",
|
|
};
|
|
static const char * const fregnames[64] = {
|
|
"f0", "f1", "f2", "f3", "f4", "f5", "f6", "f7",
|
|
"f8", "f9", "f10", "f11", "f12", "f13", "f14", "f15",
|
|
"f16", "f17", "f18", "f19", "f20", "f21", "f22", "f23",
|
|
"f24", "f25", "f26", "f27", "f28", "f29", "f30", "f31",
|
|
"f32", "f33", "f34", "f35", "f36", "f37", "f38", "f39",
|
|
"f40", "f41", "f42", "f43", "f44", "f45", "f46", "f47",
|
|
"f48", "f49", "f50", "f51", "f52", "f53", "f54", "f55",
|
|
"f56", "f57", "f58", "f59", "f60", "f61", "f62", "f63",
|
|
};
|
|
|
|
/* init various static tables */
|
|
if (!inited) {
|
|
inited = 1;
|
|
|
|
cpu_env = tcg_global_reg_new_ptr(TCG_AREG0, "env");
|
|
cpu_regwptr = tcg_global_mem_new_ptr(TCG_AREG0,
|
|
offsetof(CPUState, regwptr),
|
|
"regwptr");
|
|
#ifdef TARGET_SPARC64
|
|
cpu_xcc = tcg_global_mem_new_i32(TCG_AREG0, offsetof(CPUState, xcc),
|
|
"xcc");
|
|
cpu_asi = tcg_global_mem_new_i32(TCG_AREG0, offsetof(CPUState, asi),
|
|
"asi");
|
|
cpu_fprs = tcg_global_mem_new_i32(TCG_AREG0, offsetof(CPUState, fprs),
|
|
"fprs");
|
|
cpu_gsr = tcg_global_mem_new(TCG_AREG0, offsetof(CPUState, gsr),
|
|
"gsr");
|
|
cpu_tick_cmpr = tcg_global_mem_new(TCG_AREG0,
|
|
offsetof(CPUState, tick_cmpr),
|
|
"tick_cmpr");
|
|
cpu_stick_cmpr = tcg_global_mem_new(TCG_AREG0,
|
|
offsetof(CPUState, stick_cmpr),
|
|
"stick_cmpr");
|
|
cpu_hstick_cmpr = tcg_global_mem_new(TCG_AREG0,
|
|
offsetof(CPUState, hstick_cmpr),
|
|
"hstick_cmpr");
|
|
cpu_hintp = tcg_global_mem_new(TCG_AREG0, offsetof(CPUState, hintp),
|
|
"hintp");
|
|
cpu_htba = tcg_global_mem_new(TCG_AREG0, offsetof(CPUState, htba),
|
|
"htba");
|
|
cpu_hver = tcg_global_mem_new(TCG_AREG0, offsetof(CPUState, hver),
|
|
"hver");
|
|
cpu_ssr = tcg_global_mem_new(TCG_AREG0,
|
|
offsetof(CPUState, ssr), "ssr");
|
|
cpu_ver = tcg_global_mem_new(TCG_AREG0,
|
|
offsetof(CPUState, version), "ver");
|
|
cpu_softint = tcg_global_mem_new_i32(TCG_AREG0,
|
|
offsetof(CPUState, softint),
|
|
"softint");
|
|
#else
|
|
cpu_wim = tcg_global_mem_new(TCG_AREG0, offsetof(CPUState, wim),
|
|
"wim");
|
|
#endif
|
|
cpu_cond = tcg_global_mem_new(TCG_AREG0, offsetof(CPUState, cond),
|
|
"cond");
|
|
cpu_cc_src = tcg_global_mem_new(TCG_AREG0, offsetof(CPUState, cc_src),
|
|
"cc_src");
|
|
cpu_cc_src2 = tcg_global_mem_new(TCG_AREG0,
|
|
offsetof(CPUState, cc_src2),
|
|
"cc_src2");
|
|
cpu_cc_dst = tcg_global_mem_new(TCG_AREG0, offsetof(CPUState, cc_dst),
|
|
"cc_dst");
|
|
cpu_cc_op = tcg_global_mem_new_i32(TCG_AREG0, offsetof(CPUState, cc_op),
|
|
"cc_op");
|
|
cpu_psr = tcg_global_mem_new_i32(TCG_AREG0, offsetof(CPUState, psr),
|
|
"psr");
|
|
cpu_fsr = tcg_global_mem_new(TCG_AREG0, offsetof(CPUState, fsr),
|
|
"fsr");
|
|
cpu_pc = tcg_global_mem_new(TCG_AREG0, offsetof(CPUState, pc),
|
|
"pc");
|
|
cpu_npc = tcg_global_mem_new(TCG_AREG0, offsetof(CPUState, npc),
|
|
"npc");
|
|
cpu_y = tcg_global_mem_new(TCG_AREG0, offsetof(CPUState, y), "y");
|
|
#ifndef CONFIG_USER_ONLY
|
|
cpu_tbr = tcg_global_mem_new(TCG_AREG0, offsetof(CPUState, tbr),
|
|
"tbr");
|
|
#endif
|
|
for (i = 1; i < 8; i++)
|
|
cpu_gregs[i] = tcg_global_mem_new(TCG_AREG0,
|
|
offsetof(CPUState, gregs[i]),
|
|
gregnames[i]);
|
|
for (i = 0; i < TARGET_FPREGS; i++)
|
|
cpu_fpr[i] = tcg_global_mem_new_i32(TCG_AREG0,
|
|
offsetof(CPUState, fpr[i]),
|
|
fregnames[i]);
|
|
|
|
/* register helpers */
|
|
|
|
#define GEN_HELPER 2
|
|
#include "helper.h"
|
|
}
|
|
}
|
|
|
|
void gen_pc_load(CPUState *env, TranslationBlock *tb,
|
|
unsigned long searched_pc, int pc_pos, void *puc)
|
|
{
|
|
target_ulong npc;
|
|
env->pc = gen_opc_pc[pc_pos];
|
|
npc = gen_opc_npc[pc_pos];
|
|
if (npc == 1) {
|
|
/* dynamic NPC: already stored */
|
|
} else if (npc == 2) {
|
|
target_ulong t2 = (target_ulong)(unsigned long)puc;
|
|
/* jump PC: use T2 and the jump targets of the translation */
|
|
if (t2)
|
|
env->npc = gen_opc_jump_pc[0];
|
|
else
|
|
env->npc = gen_opc_jump_pc[1];
|
|
} else {
|
|
env->npc = npc;
|
|
}
|
|
|
|
/* flush pending conditional evaluations before exposing cpu state */
|
|
if (CC_OP != CC_OP_FLAGS) {
|
|
helper_compute_psr();
|
|
}
|
|
}
|