mirror of
https://github.com/izzy2lost/xemu.git
synced 2026-07-06 00:20:22 -07:00
tcg: Convert qemu_ld{2} to TCGOutOpLoad{2}
Reviewed-by: Pierrick Bouvier <pierrick.bouvier@linaro.org> Signed-off-by: Richard Henderson <richard.henderson@linaro.org>
This commit is contained in:
@@ -1806,8 +1806,8 @@ static void tcg_out_qemu_st_direct(TCGContext *s, MemOp memop,
|
||||
}
|
||||
}
|
||||
|
||||
static void tcg_out_qemu_ld(TCGContext *s, TCGReg data_reg, TCGReg addr_reg,
|
||||
MemOpIdx oi, TCGType data_type)
|
||||
static void tgen_qemu_ld(TCGContext *s, TCGType data_type, TCGReg data_reg,
|
||||
TCGReg addr_reg, MemOpIdx oi)
|
||||
{
|
||||
TCGLabelQemuLdst *ldst;
|
||||
HostAddress h;
|
||||
@@ -1822,6 +1822,11 @@ static void tcg_out_qemu_ld(TCGContext *s, TCGReg data_reg, TCGReg addr_reg,
|
||||
}
|
||||
}
|
||||
|
||||
static const TCGOutOpQemuLdSt outop_qemu_ld = {
|
||||
.base.static_constraint = C_O1_I1(r, r),
|
||||
.out = tgen_qemu_ld,
|
||||
};
|
||||
|
||||
static void tcg_out_qemu_st(TCGContext *s, TCGReg data_reg, TCGReg addr_reg,
|
||||
MemOpIdx oi, TCGType data_type)
|
||||
{
|
||||
@@ -1940,6 +1945,17 @@ static void tcg_out_qemu_ldst_i128(TCGContext *s, TCGReg datalo, TCGReg datahi,
|
||||
}
|
||||
}
|
||||
|
||||
static void tgen_qemu_ld2(TCGContext *s, TCGType type, TCGReg datalo,
|
||||
TCGReg datahi, TCGReg addr_reg, MemOpIdx oi)
|
||||
{
|
||||
tcg_out_qemu_ldst_i128(s, datalo, datahi, addr_reg, oi, true);
|
||||
}
|
||||
|
||||
static const TCGOutOpQemuLdSt2 outop_qemu_ld2 = {
|
||||
.base.static_constraint = C_O2_I1(r, r, r),
|
||||
.out = tgen_qemu_ld2,
|
||||
};
|
||||
|
||||
static const tcg_insn_unit *tb_ret_addr;
|
||||
|
||||
static void tcg_out_exit_tb(TCGContext *s, uintptr_t a0)
|
||||
@@ -2875,15 +2891,9 @@ static void tcg_out_op(TCGContext *s, TCGOpcode opc, TCGType ext,
|
||||
TCGArg a2 = args[2];
|
||||
|
||||
switch (opc) {
|
||||
case INDEX_op_qemu_ld:
|
||||
tcg_out_qemu_ld(s, a0, a1, a2, ext);
|
||||
break;
|
||||
case INDEX_op_qemu_st:
|
||||
tcg_out_qemu_st(s, a0, a1, a2, ext);
|
||||
break;
|
||||
case INDEX_op_qemu_ld2:
|
||||
tcg_out_qemu_ldst_i128(s, a0, a1, a2, args[3], true);
|
||||
break;
|
||||
case INDEX_op_qemu_st2:
|
||||
tcg_out_qemu_ldst_i128(s, a0, a1, a2, args[3], false);
|
||||
break;
|
||||
@@ -3340,10 +3350,6 @@ static TCGConstraintSetIndex
|
||||
tcg_target_op_def(TCGOpcode op, TCGType type, unsigned flags)
|
||||
{
|
||||
switch (op) {
|
||||
case INDEX_op_qemu_ld:
|
||||
return C_O1_I1(r, r);
|
||||
case INDEX_op_qemu_ld2:
|
||||
return C_O2_I1(r, r, r);
|
||||
case INDEX_op_qemu_st:
|
||||
return C_O0_I2(rz, r);
|
||||
case INDEX_op_qemu_st2:
|
||||
|
||||
+46
-17
@@ -1586,8 +1586,8 @@ static void tcg_out_qemu_ld_direct(TCGContext *s, MemOp opc, TCGReg datalo,
|
||||
}
|
||||
}
|
||||
|
||||
static void tcg_out_qemu_ld(TCGContext *s, TCGReg datalo, TCGReg datahi,
|
||||
TCGReg addr, MemOpIdx oi, TCGType data_type)
|
||||
static void tgen_qemu_ld(TCGContext *s, TCGType type, TCGReg data,
|
||||
TCGReg addr, MemOpIdx oi)
|
||||
{
|
||||
MemOp opc = get_memop(oi);
|
||||
TCGLabelQemuLdst *ldst;
|
||||
@@ -1595,7 +1595,41 @@ static void tcg_out_qemu_ld(TCGContext *s, TCGReg datalo, TCGReg datahi,
|
||||
|
||||
ldst = prepare_host_addr(s, &h, addr, oi, true);
|
||||
if (ldst) {
|
||||
ldst->type = data_type;
|
||||
ldst->type = type;
|
||||
ldst->datalo_reg = data;
|
||||
ldst->datahi_reg = -1;
|
||||
|
||||
/*
|
||||
* This a conditional BL only to load a pointer within this
|
||||
* opcode into LR for the slow path. We will not be using
|
||||
* the value for a tail call.
|
||||
*/
|
||||
ldst->label_ptr[0] = s->code_ptr;
|
||||
tcg_out_bl_imm(s, COND_NE, 0);
|
||||
}
|
||||
|
||||
tcg_out_qemu_ld_direct(s, opc, data, -1, h);
|
||||
|
||||
if (ldst) {
|
||||
ldst->raddr = tcg_splitwx_to_rx(s->code_ptr);
|
||||
}
|
||||
}
|
||||
|
||||
static const TCGOutOpQemuLdSt outop_qemu_ld = {
|
||||
.base.static_constraint = C_O1_I1(r, q),
|
||||
.out = tgen_qemu_ld,
|
||||
};
|
||||
|
||||
static void tgen_qemu_ld2(TCGContext *s, TCGType type, TCGReg datalo,
|
||||
TCGReg datahi, TCGReg addr, MemOpIdx oi)
|
||||
{
|
||||
MemOp opc = get_memop(oi);
|
||||
TCGLabelQemuLdst *ldst;
|
||||
HostAddress h;
|
||||
|
||||
ldst = prepare_host_addr(s, &h, addr, oi, true);
|
||||
if (ldst) {
|
||||
ldst->type = type;
|
||||
ldst->datalo_reg = datalo;
|
||||
ldst->datahi_reg = datahi;
|
||||
|
||||
@@ -1606,14 +1640,20 @@ static void tcg_out_qemu_ld(TCGContext *s, TCGReg datalo, TCGReg datahi,
|
||||
*/
|
||||
ldst->label_ptr[0] = s->code_ptr;
|
||||
tcg_out_bl_imm(s, COND_NE, 0);
|
||||
}
|
||||
|
||||
tcg_out_qemu_ld_direct(s, opc, datalo, datahi, h);
|
||||
tcg_out_qemu_ld_direct(s, opc, datalo, datahi, h);
|
||||
|
||||
if (ldst) {
|
||||
ldst->raddr = tcg_splitwx_to_rx(s->code_ptr);
|
||||
} else {
|
||||
tcg_out_qemu_ld_direct(s, opc, datalo, datahi, h);
|
||||
}
|
||||
}
|
||||
|
||||
static const TCGOutOpQemuLdSt2 outop_qemu_ld2 = {
|
||||
.base.static_constraint = C_O2_I1(e, p, q),
|
||||
.out = tgen_qemu_ld2,
|
||||
};
|
||||
|
||||
static void tcg_out_qemu_st_direct(TCGContext *s, MemOp opc, TCGReg datalo,
|
||||
TCGReg datahi, HostAddress h)
|
||||
{
|
||||
@@ -2570,13 +2610,6 @@ static void tcg_out_op(TCGContext *s, TCGOpcode opc, TCGType type,
|
||||
const int const_args[TCG_MAX_OP_ARGS])
|
||||
{
|
||||
switch (opc) {
|
||||
case INDEX_op_qemu_ld:
|
||||
tcg_out_qemu_ld(s, args[0], -1, args[1], args[2], TCG_TYPE_I32);
|
||||
break;
|
||||
case INDEX_op_qemu_ld2:
|
||||
tcg_out_qemu_ld(s, args[0], args[1], args[2], args[3], TCG_TYPE_I64);
|
||||
break;
|
||||
|
||||
case INDEX_op_qemu_st:
|
||||
tcg_out_qemu_st(s, args[0], -1, args[1], args[2], TCG_TYPE_I32);
|
||||
break;
|
||||
@@ -2596,10 +2629,6 @@ static TCGConstraintSetIndex
|
||||
tcg_target_op_def(TCGOpcode op, TCGType type, unsigned flags)
|
||||
{
|
||||
switch (op) {
|
||||
case INDEX_op_qemu_ld:
|
||||
return C_O1_I1(r, q);
|
||||
case INDEX_op_qemu_ld2:
|
||||
return C_O2_I1(e, p, q);
|
||||
case INDEX_op_qemu_st:
|
||||
return C_O0_I2(q, q);
|
||||
case INDEX_op_qemu_st2:
|
||||
|
||||
+31
-16
@@ -2422,23 +2422,50 @@ static void tcg_out_qemu_ld_direct(TCGContext *s, TCGReg datalo, TCGReg datahi,
|
||||
}
|
||||
}
|
||||
|
||||
static void tcg_out_qemu_ld(TCGContext *s, TCGReg datalo, TCGReg datahi,
|
||||
TCGReg addr, MemOpIdx oi, TCGType data_type)
|
||||
static void tgen_qemu_ld(TCGContext *s, TCGType type, TCGReg data,
|
||||
TCGReg addr, MemOpIdx oi)
|
||||
{
|
||||
TCGLabelQemuLdst *ldst;
|
||||
HostAddress h;
|
||||
|
||||
ldst = prepare_host_addr(s, &h, addr, oi, true);
|
||||
tcg_out_qemu_ld_direct(s, datalo, datahi, h, data_type, get_memop(oi));
|
||||
tcg_out_qemu_ld_direct(s, data, -1, h, type, get_memop(oi));
|
||||
|
||||
if (ldst) {
|
||||
ldst->type = data_type;
|
||||
ldst->type = type;
|
||||
ldst->datalo_reg = data;
|
||||
ldst->datahi_reg = -1;
|
||||
ldst->raddr = tcg_splitwx_to_rx(s->code_ptr);
|
||||
}
|
||||
}
|
||||
|
||||
static const TCGOutOpQemuLdSt outop_qemu_ld = {
|
||||
.base.static_constraint = C_O1_I1(r, L),
|
||||
.out = tgen_qemu_ld,
|
||||
};
|
||||
|
||||
static void tgen_qemu_ld2(TCGContext *s, TCGType type, TCGReg datalo,
|
||||
TCGReg datahi, TCGReg addr, MemOpIdx oi)
|
||||
{
|
||||
TCGLabelQemuLdst *ldst;
|
||||
HostAddress h;
|
||||
|
||||
ldst = prepare_host_addr(s, &h, addr, oi, true);
|
||||
tcg_out_qemu_ld_direct(s, datalo, datahi, h, type, get_memop(oi));
|
||||
|
||||
if (ldst) {
|
||||
ldst->type = type;
|
||||
ldst->datalo_reg = datalo;
|
||||
ldst->datahi_reg = datahi;
|
||||
ldst->raddr = tcg_splitwx_to_rx(s->code_ptr);
|
||||
}
|
||||
}
|
||||
|
||||
static const TCGOutOpQemuLdSt2 outop_qemu_ld2 = {
|
||||
.base.static_constraint = C_O2_I1(r, r, L),
|
||||
.out = tgen_qemu_ld2,
|
||||
};
|
||||
|
||||
static void tcg_out_qemu_st_direct(TCGContext *s, TCGReg datalo, TCGReg datahi,
|
||||
HostAddress h, MemOp memop)
|
||||
{
|
||||
@@ -3552,13 +3579,6 @@ static void tcg_out_op(TCGContext *s, TCGOpcode opc, TCGType type,
|
||||
a2 = args[2];
|
||||
|
||||
switch (opc) {
|
||||
case INDEX_op_qemu_ld:
|
||||
tcg_out_qemu_ld(s, a0, -1, a1, a2, type);
|
||||
break;
|
||||
case INDEX_op_qemu_ld2:
|
||||
tcg_out_qemu_ld(s, a0, a1, a2, args[3], type);
|
||||
break;
|
||||
|
||||
case INDEX_op_qemu_st:
|
||||
tcg_out_qemu_st(s, a0, -1, a1, a2, type);
|
||||
break;
|
||||
@@ -4119,16 +4139,11 @@ static TCGConstraintSetIndex
|
||||
tcg_target_op_def(TCGOpcode op, TCGType type, unsigned flags)
|
||||
{
|
||||
switch (op) {
|
||||
case INDEX_op_qemu_ld:
|
||||
return C_O1_I1(r, L);
|
||||
|
||||
case INDEX_op_qemu_st:
|
||||
return (TCG_TARGET_REG_BITS == 32 && flags == MO_8
|
||||
? C_O0_I2(s, L)
|
||||
: C_O0_I2(L, L));
|
||||
|
||||
case INDEX_op_qemu_ld2:
|
||||
return C_O2_I1(r, r, L);
|
||||
case INDEX_op_qemu_st2:
|
||||
return C_O0_I3(L, L, L);
|
||||
|
||||
|
||||
@@ -1167,22 +1167,27 @@ static void tcg_out_qemu_ld_indexed(TCGContext *s, MemOp opc, TCGType type,
|
||||
}
|
||||
}
|
||||
|
||||
static void tcg_out_qemu_ld(TCGContext *s, TCGReg data_reg, TCGReg addr_reg,
|
||||
MemOpIdx oi, TCGType data_type)
|
||||
static void tgen_qemu_ld(TCGContext *s, TCGType type, TCGReg data_reg,
|
||||
TCGReg addr_reg, MemOpIdx oi)
|
||||
{
|
||||
TCGLabelQemuLdst *ldst;
|
||||
HostAddress h;
|
||||
|
||||
ldst = prepare_host_addr(s, &h, addr_reg, oi, true);
|
||||
tcg_out_qemu_ld_indexed(s, get_memop(oi), data_type, data_reg, h);
|
||||
tcg_out_qemu_ld_indexed(s, get_memop(oi), type, data_reg, h);
|
||||
|
||||
if (ldst) {
|
||||
ldst->type = data_type;
|
||||
ldst->type = type;
|
||||
ldst->datalo_reg = data_reg;
|
||||
ldst->raddr = tcg_splitwx_to_rx(s->code_ptr);
|
||||
}
|
||||
}
|
||||
|
||||
static const TCGOutOpQemuLdSt outop_qemu_ld = {
|
||||
.base.static_constraint = C_O1_I1(r, r),
|
||||
.out = tgen_qemu_ld,
|
||||
};
|
||||
|
||||
static void tcg_out_qemu_st_indexed(TCGContext *s, MemOp opc,
|
||||
TCGReg rd, HostAddress h)
|
||||
{
|
||||
@@ -1270,6 +1275,17 @@ static void tcg_out_qemu_ldst_i128(TCGContext *s, TCGReg data_lo, TCGReg data_hi
|
||||
}
|
||||
}
|
||||
|
||||
static void tgen_qemu_ld2(TCGContext *s, TCGType type, TCGReg datalo,
|
||||
TCGReg datahi, TCGReg addr_reg, MemOpIdx oi)
|
||||
{
|
||||
tcg_out_qemu_ldst_i128(s, datalo, datahi, addr_reg, oi, true);
|
||||
}
|
||||
|
||||
static const TCGOutOpQemuLdSt2 outop_qemu_ld2 = {
|
||||
.base.static_constraint = C_N2_I1(r, r, r),
|
||||
.out = tgen_qemu_ld2,
|
||||
};
|
||||
|
||||
/*
|
||||
* Entry-points
|
||||
*/
|
||||
@@ -2020,12 +2036,6 @@ static void tcg_out_op(TCGContext *s, TCGOpcode opc, TCGType type,
|
||||
TCGArg a3 = args[3];
|
||||
|
||||
switch (opc) {
|
||||
case INDEX_op_qemu_ld:
|
||||
tcg_out_qemu_ld(s, a0, a1, a2, type);
|
||||
break;
|
||||
case INDEX_op_qemu_ld2:
|
||||
tcg_out_qemu_ldst_i128(s, a0, a1, a2, a3, true);
|
||||
break;
|
||||
case INDEX_op_qemu_st:
|
||||
tcg_out_qemu_st(s, a0, a1, a2, type);
|
||||
break;
|
||||
@@ -2537,16 +2547,9 @@ tcg_target_op_def(TCGOpcode op, TCGType type, unsigned flags)
|
||||
switch (op) {
|
||||
case INDEX_op_qemu_st:
|
||||
return C_O0_I2(rz, r);
|
||||
|
||||
case INDEX_op_qemu_ld2:
|
||||
return C_N2_I1(r, r, r);
|
||||
|
||||
case INDEX_op_qemu_st2:
|
||||
return C_O0_I3(r, r, r);
|
||||
|
||||
case INDEX_op_qemu_ld:
|
||||
return C_O1_I1(r, r);
|
||||
|
||||
case INDEX_op_ld_vec:
|
||||
case INDEX_op_dupm_vec:
|
||||
case INDEX_op_dup_vec:
|
||||
|
||||
+42
-15
@@ -1387,8 +1387,8 @@ static void tcg_out_qemu_ld_unalign(TCGContext *s, TCGReg lo, TCGReg hi,
|
||||
}
|
||||
}
|
||||
|
||||
static void tcg_out_qemu_ld(TCGContext *s, TCGReg datalo, TCGReg datahi,
|
||||
TCGReg addr, MemOpIdx oi, TCGType data_type)
|
||||
static void tgen_qemu_ld(TCGContext *s, TCGType type, TCGReg data,
|
||||
TCGReg addr, MemOpIdx oi)
|
||||
{
|
||||
MemOp opc = get_memop(oi);
|
||||
TCGLabelQemuLdst *ldst;
|
||||
@@ -1397,19 +1397,56 @@ static void tcg_out_qemu_ld(TCGContext *s, TCGReg datalo, TCGReg datahi,
|
||||
ldst = prepare_host_addr(s, &h, addr, oi, true);
|
||||
|
||||
if (use_mips32r6_instructions || h.aa.align >= (opc & MO_SIZE)) {
|
||||
tcg_out_qemu_ld_direct(s, datalo, datahi, h.base, opc, data_type);
|
||||
tcg_out_qemu_ld_direct(s, data, 0, h.base, opc, type);
|
||||
} else {
|
||||
tcg_out_qemu_ld_unalign(s, datalo, datahi, h.base, opc, data_type);
|
||||
tcg_out_qemu_ld_unalign(s, data, 0, h.base, opc, type);
|
||||
}
|
||||
|
||||
if (ldst) {
|
||||
ldst->type = data_type;
|
||||
ldst->type = type;
|
||||
ldst->datalo_reg = data;
|
||||
ldst->datahi_reg = 0;
|
||||
ldst->raddr = tcg_splitwx_to_rx(s->code_ptr);
|
||||
}
|
||||
}
|
||||
|
||||
static const TCGOutOpQemuLdSt outop_qemu_ld = {
|
||||
.base.static_constraint = C_O1_I1(r, r),
|
||||
.out = tgen_qemu_ld,
|
||||
};
|
||||
|
||||
static void tgen_qemu_ld2(TCGContext *s, TCGType type, TCGReg datalo,
|
||||
TCGReg datahi, TCGReg addr, MemOpIdx oi)
|
||||
{
|
||||
MemOp opc = get_memop(oi);
|
||||
TCGLabelQemuLdst *ldst;
|
||||
HostAddress h;
|
||||
|
||||
tcg_debug_assert(TCG_TARGET_REG_BITS == 32);
|
||||
ldst = prepare_host_addr(s, &h, addr, oi, true);
|
||||
|
||||
if (use_mips32r6_instructions || h.aa.align >= (opc & MO_SIZE)) {
|
||||
tcg_out_qemu_ld_direct(s, datalo, datahi, h.base, opc, type);
|
||||
} else {
|
||||
tcg_out_qemu_ld_unalign(s, datalo, datahi, h.base, opc, type);
|
||||
}
|
||||
|
||||
if (ldst) {
|
||||
ldst->type = type;
|
||||
ldst->datalo_reg = datalo;
|
||||
ldst->datahi_reg = datahi;
|
||||
ldst->raddr = tcg_splitwx_to_rx(s->code_ptr);
|
||||
}
|
||||
}
|
||||
|
||||
static const TCGOutOpQemuLdSt2 outop_qemu_ld2 = {
|
||||
/* Ensure that the mips32 code is compiled but discarded for mips64. */
|
||||
.base.static_constraint =
|
||||
TCG_TARGET_REG_BITS == 32 ? C_O2_I1(r, r, r) : C_NotImplemented,
|
||||
.out =
|
||||
TCG_TARGET_REG_BITS == 32 ? tgen_qemu_ld2 : NULL,
|
||||
};
|
||||
|
||||
static void tcg_out_qemu_st_direct(TCGContext *s, TCGReg lo, TCGReg hi,
|
||||
TCGReg base, MemOp opc)
|
||||
{
|
||||
@@ -2381,14 +2418,6 @@ static void tcg_out_op(TCGContext *s, TCGOpcode opc, TCGType type,
|
||||
a2 = args[2];
|
||||
|
||||
switch (opc) {
|
||||
case INDEX_op_qemu_ld:
|
||||
tcg_out_qemu_ld(s, a0, 0, a1, a2, type);
|
||||
break;
|
||||
case INDEX_op_qemu_ld2:
|
||||
tcg_debug_assert(TCG_TARGET_REG_BITS == 32);
|
||||
tcg_out_qemu_ld(s, a0, a1, a2, args[3], type);
|
||||
break;
|
||||
|
||||
case INDEX_op_qemu_st:
|
||||
tcg_out_qemu_st(s, a0, 0, a1, a2, type);
|
||||
break;
|
||||
@@ -2409,8 +2438,6 @@ static TCGConstraintSetIndex
|
||||
tcg_target_op_def(TCGOpcode op, TCGType type, unsigned flags)
|
||||
{
|
||||
switch (op) {
|
||||
case INDEX_op_qemu_ld:
|
||||
return C_O1_I1(r, r);
|
||||
case INDEX_op_qemu_st:
|
||||
return C_O0_I2(rz, r);
|
||||
case INDEX_op_qemu_ld2:
|
||||
|
||||
+27
-18
@@ -2695,6 +2695,33 @@ static void tcg_out_qemu_ldst_i128(TCGContext *s, TCGReg datalo, TCGReg datahi,
|
||||
}
|
||||
}
|
||||
|
||||
static void tgen_qemu_ld(TCGContext *s, TCGType type, TCGReg data,
|
||||
TCGReg addr, MemOpIdx oi)
|
||||
{
|
||||
tcg_out_qemu_ld(s, data, -1, addr, oi, type);
|
||||
}
|
||||
|
||||
static const TCGOutOpQemuLdSt outop_qemu_ld = {
|
||||
.base.static_constraint = C_O1_I1(r, r),
|
||||
.out = tgen_qemu_ld,
|
||||
};
|
||||
|
||||
static void tgen_qemu_ld2(TCGContext *s, TCGType type, TCGReg datalo,
|
||||
TCGReg datahi, TCGReg addr, MemOpIdx oi)
|
||||
{
|
||||
if (TCG_TARGET_REG_BITS == 32) {
|
||||
tcg_out_qemu_ld(s, datalo, datahi, addr, oi, type);
|
||||
} else {
|
||||
tcg_out_qemu_ldst_i128(s, datalo, datahi, addr, oi, true);
|
||||
}
|
||||
}
|
||||
|
||||
static const TCGOutOpQemuLdSt2 outop_qemu_ld2 = {
|
||||
.base.static_constraint =
|
||||
TCG_TARGET_REG_BITS == 64 ? C_N1O1_I1(o, m, r) : C_O2_I1(r, r, r),
|
||||
.out = tgen_qemu_ld2,
|
||||
};
|
||||
|
||||
static void tcg_out_nop_fill(tcg_insn_unit *p, int count)
|
||||
{
|
||||
int i;
|
||||
@@ -3779,18 +3806,6 @@ static void tcg_out_op(TCGContext *s, TCGOpcode opc, TCGType type,
|
||||
const int const_args[TCG_MAX_OP_ARGS])
|
||||
{
|
||||
switch (opc) {
|
||||
case INDEX_op_qemu_ld:
|
||||
tcg_out_qemu_ld(s, args[0], -1, args[1], args[2], type);
|
||||
break;
|
||||
case INDEX_op_qemu_ld2:
|
||||
if (TCG_TARGET_REG_BITS == 32) {
|
||||
tcg_out_qemu_ld(s, args[0], args[1], args[2],
|
||||
args[3], TCG_TYPE_I64);
|
||||
break;
|
||||
}
|
||||
tcg_out_qemu_ldst_i128(s, args[0], args[1], args[2], args[3], true);
|
||||
break;
|
||||
|
||||
case INDEX_op_qemu_st:
|
||||
tcg_out_qemu_st(s, args[0], -1, args[1], args[2], type);
|
||||
break;
|
||||
@@ -4418,12 +4433,6 @@ static TCGConstraintSetIndex
|
||||
tcg_target_op_def(TCGOpcode op, TCGType type, unsigned flags)
|
||||
{
|
||||
switch (op) {
|
||||
case INDEX_op_qemu_ld:
|
||||
return C_O1_I1(r, r);
|
||||
case INDEX_op_qemu_ld2:
|
||||
return TCG_TARGET_REG_BITS == 64
|
||||
? C_N1O1_I1(o, m, r) : C_O2_I1(r, r, r);
|
||||
|
||||
case INDEX_op_qemu_st:
|
||||
return C_O0_I2(r, r);
|
||||
case INDEX_op_qemu_st2:
|
||||
|
||||
@@ -1833,22 +1833,31 @@ static void tcg_out_qemu_ld_direct(TCGContext *s, TCGReg val,
|
||||
}
|
||||
}
|
||||
|
||||
static void tcg_out_qemu_ld(TCGContext *s, TCGReg data_reg, TCGReg addr_reg,
|
||||
MemOpIdx oi, TCGType data_type)
|
||||
static void tgen_qemu_ld(TCGContext *s, TCGType type, TCGReg data_reg,
|
||||
TCGReg addr_reg, MemOpIdx oi)
|
||||
{
|
||||
TCGLabelQemuLdst *ldst;
|
||||
TCGReg base;
|
||||
|
||||
ldst = prepare_host_addr(s, &base, addr_reg, oi, true);
|
||||
tcg_out_qemu_ld_direct(s, data_reg, base, get_memop(oi), data_type);
|
||||
tcg_out_qemu_ld_direct(s, data_reg, base, get_memop(oi), type);
|
||||
|
||||
if (ldst) {
|
||||
ldst->type = data_type;
|
||||
ldst->type = type;
|
||||
ldst->datalo_reg = data_reg;
|
||||
ldst->raddr = tcg_splitwx_to_rx(s->code_ptr);
|
||||
}
|
||||
}
|
||||
|
||||
static const TCGOutOpQemuLdSt outop_qemu_ld = {
|
||||
.base.static_constraint = C_O1_I1(r, r),
|
||||
.out = tgen_qemu_ld,
|
||||
};
|
||||
|
||||
static const TCGOutOpQemuLdSt2 outop_qemu_ld2 = {
|
||||
.base.static_constraint = C_NotImplemented,
|
||||
};
|
||||
|
||||
static void tcg_out_qemu_st_direct(TCGContext *s, TCGReg val,
|
||||
TCGReg base, MemOp opc)
|
||||
{
|
||||
@@ -2633,9 +2642,6 @@ static void tcg_out_op(TCGContext *s, TCGOpcode opc, TCGType type,
|
||||
TCGArg a2 = args[2];
|
||||
|
||||
switch (opc) {
|
||||
case INDEX_op_qemu_ld:
|
||||
tcg_out_qemu_ld(s, a0, a1, a2, type);
|
||||
break;
|
||||
case INDEX_op_qemu_st:
|
||||
tcg_out_qemu_st(s, a0, a1, a2, type);
|
||||
break;
|
||||
@@ -2869,8 +2875,6 @@ static TCGConstraintSetIndex
|
||||
tcg_target_op_def(TCGOpcode op, TCGType type, unsigned flags)
|
||||
{
|
||||
switch (op) {
|
||||
case INDEX_op_qemu_ld:
|
||||
return C_O1_I1(r, r);
|
||||
case INDEX_op_qemu_st:
|
||||
return C_O0_I2(rz, r);
|
||||
|
||||
|
||||
+19
-13
@@ -2081,8 +2081,8 @@ static TCGLabelQemuLdst *prepare_host_addr(TCGContext *s, HostAddress *h,
|
||||
return ldst;
|
||||
}
|
||||
|
||||
static void tcg_out_qemu_ld(TCGContext* s, TCGReg data_reg, TCGReg addr_reg,
|
||||
MemOpIdx oi, TCGType data_type)
|
||||
static void tgen_qemu_ld(TCGContext *s, TCGType type, TCGReg data_reg,
|
||||
TCGReg addr_reg, MemOpIdx oi)
|
||||
{
|
||||
TCGLabelQemuLdst *ldst;
|
||||
HostAddress h;
|
||||
@@ -2091,12 +2091,17 @@ static void tcg_out_qemu_ld(TCGContext* s, TCGReg data_reg, TCGReg addr_reg,
|
||||
tcg_out_qemu_ld_direct(s, get_memop(oi), data_reg, h);
|
||||
|
||||
if (ldst) {
|
||||
ldst->type = data_type;
|
||||
ldst->type = type;
|
||||
ldst->datalo_reg = data_reg;
|
||||
ldst->raddr = tcg_splitwx_to_rx(s->code_ptr);
|
||||
}
|
||||
}
|
||||
|
||||
static const TCGOutOpQemuLdSt outop_qemu_ld = {
|
||||
.base.static_constraint = C_O1_I1(r, r),
|
||||
.out = tgen_qemu_ld,
|
||||
};
|
||||
|
||||
static void tcg_out_qemu_st(TCGContext* s, TCGReg data_reg, TCGReg addr_reg,
|
||||
MemOpIdx oi, TCGType data_type)
|
||||
{
|
||||
@@ -2187,6 +2192,17 @@ static void tcg_out_qemu_ldst_i128(TCGContext *s, TCGReg datalo, TCGReg datahi,
|
||||
}
|
||||
}
|
||||
|
||||
static void tgen_qemu_ld2(TCGContext *s, TCGType type, TCGReg datalo,
|
||||
TCGReg datahi, TCGReg addr_reg, MemOpIdx oi)
|
||||
{
|
||||
tcg_out_qemu_ldst_i128(s, datalo, datahi, addr_reg, oi, true);
|
||||
}
|
||||
|
||||
static const TCGOutOpQemuLdSt2 outop_qemu_ld2 = {
|
||||
.base.static_constraint = C_O2_I1(o, m, r),
|
||||
.out = tgen_qemu_ld2,
|
||||
};
|
||||
|
||||
static void tcg_out_exit_tb(TCGContext *s, uintptr_t a0)
|
||||
{
|
||||
/* Reuse the zeroing that exists for goto_ptr. */
|
||||
@@ -3133,15 +3149,9 @@ static void tcg_out_op(TCGContext *s, TCGOpcode opc, TCGType type,
|
||||
const int const_args[TCG_MAX_OP_ARGS])
|
||||
{
|
||||
switch (opc) {
|
||||
case INDEX_op_qemu_ld:
|
||||
tcg_out_qemu_ld(s, args[0], args[1], args[2], type);
|
||||
break;
|
||||
case INDEX_op_qemu_st:
|
||||
tcg_out_qemu_st(s, args[0], args[1], args[2], type);
|
||||
break;
|
||||
case INDEX_op_qemu_ld2:
|
||||
tcg_out_qemu_ldst_i128(s, args[0], args[1], args[2], args[3], true);
|
||||
break;
|
||||
case INDEX_op_qemu_st2:
|
||||
tcg_out_qemu_ldst_i128(s, args[0], args[1], args[2], args[3], false);
|
||||
break;
|
||||
@@ -3594,12 +3604,8 @@ static TCGConstraintSetIndex
|
||||
tcg_target_op_def(TCGOpcode op, TCGType type, unsigned flags)
|
||||
{
|
||||
switch (op) {
|
||||
case INDEX_op_qemu_ld:
|
||||
return C_O1_I1(r, r);
|
||||
case INDEX_op_qemu_st:
|
||||
return C_O0_I2(r, r);
|
||||
case INDEX_op_qemu_ld2:
|
||||
return C_O2_I1(o, m, r);
|
||||
case INDEX_op_qemu_st2:
|
||||
return C_O0_I3(o, m, r);
|
||||
|
||||
|
||||
@@ -1186,8 +1186,8 @@ static TCGLabelQemuLdst *prepare_host_addr(TCGContext *s, HostAddress *h,
|
||||
return ldst;
|
||||
}
|
||||
|
||||
static void tcg_out_qemu_ld(TCGContext *s, TCGReg data, TCGReg addr,
|
||||
MemOpIdx oi, TCGType data_type)
|
||||
static void tgen_qemu_ld(TCGContext *s, TCGType type, TCGReg data,
|
||||
TCGReg addr, MemOpIdx oi)
|
||||
{
|
||||
static const int ld_opc[(MO_SSIZE | MO_BSWAP) + 1] = {
|
||||
[MO_UB] = LDUB,
|
||||
@@ -1219,12 +1219,21 @@ static void tcg_out_qemu_ld(TCGContext *s, TCGReg data, TCGReg addr,
|
||||
ld_opc[get_memop(oi) & (MO_BSWAP | MO_SSIZE)]);
|
||||
|
||||
if (ldst) {
|
||||
ldst->type = data_type;
|
||||
ldst->type = type;
|
||||
ldst->datalo_reg = data;
|
||||
ldst->raddr = tcg_splitwx_to_rx(s->code_ptr);
|
||||
}
|
||||
}
|
||||
|
||||
static const TCGOutOpQemuLdSt outop_qemu_ld = {
|
||||
.base.static_constraint = C_O1_I1(r, r),
|
||||
.out = tgen_qemu_ld,
|
||||
};
|
||||
|
||||
static const TCGOutOpQemuLdSt2 outop_qemu_ld2 = {
|
||||
.base.static_constraint = C_NotImplemented,
|
||||
};
|
||||
|
||||
static void tcg_out_qemu_st(TCGContext *s, TCGReg data, TCGReg addr,
|
||||
MemOpIdx oi, TCGType data_type)
|
||||
{
|
||||
@@ -2068,9 +2077,6 @@ static void tcg_out_op(TCGContext *s, TCGOpcode opc, TCGType type,
|
||||
a2 = args[2];
|
||||
|
||||
switch (opc) {
|
||||
case INDEX_op_qemu_ld:
|
||||
tcg_out_qemu_ld(s, a0, a1, a2, type);
|
||||
break;
|
||||
case INDEX_op_qemu_st:
|
||||
tcg_out_qemu_st(s, a0, a1, a2, type);
|
||||
break;
|
||||
@@ -2087,9 +2093,6 @@ static TCGConstraintSetIndex
|
||||
tcg_target_op_def(TCGOpcode op, TCGType type, unsigned flags)
|
||||
{
|
||||
switch (op) {
|
||||
case INDEX_op_qemu_ld:
|
||||
return C_O1_I1(r, r);
|
||||
|
||||
case INDEX_op_qemu_st:
|
||||
return C_O0_I2(rz, r);
|
||||
|
||||
|
||||
@@ -1071,6 +1071,18 @@ typedef struct TCGOutOpMul2 {
|
||||
TCGReg a0, TCGReg a1, TCGReg a2, TCGReg a3);
|
||||
} TCGOutOpMul2;
|
||||
|
||||
typedef struct TCGOutOpQemuLdSt {
|
||||
TCGOutOp base;
|
||||
void (*out)(TCGContext *s, TCGType type, TCGReg dest,
|
||||
TCGReg addr, MemOpIdx oi);
|
||||
} TCGOutOpQemuLdSt;
|
||||
|
||||
typedef struct TCGOutOpQemuLdSt2 {
|
||||
TCGOutOp base;
|
||||
void (*out)(TCGContext *s, TCGType type, TCGReg dlo, TCGReg dhi,
|
||||
TCGReg addr, MemOpIdx oi);
|
||||
} TCGOutOpQemuLdSt2;
|
||||
|
||||
typedef struct TCGOutOpUnary {
|
||||
TCGOutOp base;
|
||||
void (*out_rr)(TCGContext *s, TCGType type, TCGReg a0, TCGReg a1);
|
||||
@@ -1210,6 +1222,8 @@ static const TCGOutOp * const all_outop[NB_OPS] = {
|
||||
OUTOP(INDEX_op_not, TCGOutOpUnary, outop_not),
|
||||
OUTOP(INDEX_op_or, TCGOutOpBinary, outop_or),
|
||||
OUTOP(INDEX_op_orc, TCGOutOpBinary, outop_orc),
|
||||
OUTOP(INDEX_op_qemu_ld, TCGOutOpQemuLdSt, outop_qemu_ld),
|
||||
OUTOP(INDEX_op_qemu_ld2, TCGOutOpQemuLdSt2, outop_qemu_ld2),
|
||||
OUTOP(INDEX_op_rems, TCGOutOpBinary, outop_rems),
|
||||
OUTOP(INDEX_op_remu, TCGOutOpBinary, outop_remu),
|
||||
OUTOP(INDEX_op_rotl, TCGOutOpBinary, outop_rotl),
|
||||
@@ -2446,7 +2460,7 @@ bool tcg_op_supported(TCGOpcode op, TCGType type, unsigned flags)
|
||||
return true;
|
||||
}
|
||||
tcg_debug_assert(type == TCG_TYPE_I128);
|
||||
return TCG_TARGET_HAS_qemu_ldst_i128;
|
||||
goto do_lookup;
|
||||
|
||||
case INDEX_op_add:
|
||||
case INDEX_op_and:
|
||||
@@ -2558,6 +2572,7 @@ bool tcg_op_supported(TCGOpcode op, TCGType type, unsigned flags)
|
||||
return false;
|
||||
}
|
||||
|
||||
do_lookup:
|
||||
outop = all_outop[op];
|
||||
tcg_debug_assert(outop != NULL);
|
||||
|
||||
@@ -5799,6 +5814,21 @@ static void tcg_reg_alloc_op(TCGContext *s, const TCGOp *op)
|
||||
}
|
||||
break;
|
||||
|
||||
case INDEX_op_qemu_ld:
|
||||
{
|
||||
const TCGOutOpQemuLdSt *out = &outop_qemu_ld;
|
||||
out->out(s, type, new_args[0], new_args[1], new_args[2]);
|
||||
}
|
||||
break;
|
||||
|
||||
case INDEX_op_qemu_ld2:
|
||||
{
|
||||
const TCGOutOpQemuLdSt2 *out = &outop_qemu_ld2;
|
||||
out->out(s, type, new_args[0], new_args[1],
|
||||
new_args[2], new_args[3]);
|
||||
}
|
||||
break;
|
||||
|
||||
case INDEX_op_brcond:
|
||||
{
|
||||
const TCGOutOpBrcond *out = &outop_brcond;
|
||||
|
||||
@@ -40,12 +40,8 @@ static TCGConstraintSetIndex
|
||||
tcg_target_op_def(TCGOpcode op, TCGType type, unsigned flags)
|
||||
{
|
||||
switch (op) {
|
||||
case INDEX_op_qemu_ld:
|
||||
return C_O1_I1(r, r);
|
||||
case INDEX_op_qemu_st:
|
||||
return C_O0_I2(r, r);
|
||||
case INDEX_op_qemu_ld2:
|
||||
return TCG_TARGET_REG_BITS == 64 ? C_NotImplemented : C_O2_I1(r, r, r);
|
||||
case INDEX_op_qemu_st2:
|
||||
return TCG_TARGET_REG_BITS == 64 ? C_NotImplemented : C_O0_I3(r, r, r);
|
||||
|
||||
@@ -1197,17 +1193,39 @@ static const TCGOutOpStore outop_st = {
|
||||
.out_r = tcg_out_st,
|
||||
};
|
||||
|
||||
static void tgen_qemu_ld(TCGContext *s, TCGType type, TCGReg data,
|
||||
TCGReg addr, MemOpIdx oi)
|
||||
{
|
||||
tcg_out_op_rrm(s, INDEX_op_qemu_ld, data, addr, oi);
|
||||
}
|
||||
|
||||
static const TCGOutOpQemuLdSt outop_qemu_ld = {
|
||||
.base.static_constraint = C_O1_I1(r, r),
|
||||
.out = tgen_qemu_ld,
|
||||
};
|
||||
|
||||
static void tgen_qemu_ld2(TCGContext *s, TCGType type, TCGReg datalo,
|
||||
TCGReg datahi, TCGReg addr, MemOpIdx oi)
|
||||
{
|
||||
tcg_out_movi(s, TCG_TYPE_I32, TCG_REG_TMP, oi);
|
||||
tcg_out_op_rrrr(s, INDEX_op_qemu_ld2, datalo, datahi, addr, TCG_REG_TMP);
|
||||
}
|
||||
|
||||
static const TCGOutOpQemuLdSt2 outop_qemu_ld2 = {
|
||||
.base.static_constraint =
|
||||
TCG_TARGET_REG_BITS == 64 ? C_NotImplemented : C_O2_I1(r, r, r),
|
||||
.out =
|
||||
TCG_TARGET_REG_BITS == 64 ? NULL : tgen_qemu_ld2,
|
||||
};
|
||||
|
||||
static void tcg_out_op(TCGContext *s, TCGOpcode opc, TCGType type,
|
||||
const TCGArg args[TCG_MAX_OP_ARGS],
|
||||
const int const_args[TCG_MAX_OP_ARGS])
|
||||
{
|
||||
switch (opc) {
|
||||
case INDEX_op_qemu_ld:
|
||||
case INDEX_op_qemu_st:
|
||||
tcg_out_op_rrm(s, opc, args[0], args[1], args[2]);
|
||||
break;
|
||||
case INDEX_op_qemu_ld2:
|
||||
case INDEX_op_qemu_st2:
|
||||
tcg_out_movi(s, TCG_TYPE_I32, TCG_REG_TMP, args[3]);
|
||||
tcg_out_op_rrrr(s, opc, args[0], args[1], args[2], TCG_REG_TMP);
|
||||
|
||||
Reference in New Issue
Block a user