mirror of
https://github.com/xemu-project/xemu.git
synced 2024-11-27 21:40:49 +00:00
Patch queue for s390 - 2015-07-07
A few last minute fixes for 2.4. All of them are s390 TCG bug fixes. -----BEGIN PGP SIGNATURE----- Version: GnuPG v2.0.9 (GNU/Linux) iQIcBAABAgAGBQJVm/W2AAoJECszeR4D/txgrXoP/RgyXVfxHw1H2Zs5lgKYAiD8 GcoEOGizzo9eLgtpoCqE71tjgTia+bTiwvv29iDRkdqm+NoI4HqDI7UTqIbRZxsw F/VeOq30CSZq4wn8VQNZrYwioxn/BP1Cz0+kxGgd38TGiM71/W0xY6SCS1SAYWjo M3m2xHUlX7M0Q6bGNjdyIwZlMjGqk35Zd12EFIcspKzYdKY2dblbFttMT0TMn0ym sRj2CoLyadNqWeeuPulZ826Zdv4Fn2CQBxitAI2uwlnh8sUgEkjhu0OYvKSycYWM G+NF2uOFEajF6gG8yTtA6C09uepAesRraW5V6a3NL7Vunu5WBU2Q1WkO0P/N2C4+ QzL1w/0lQUSOM1HgJi1pnqw1owW5QtwTtG/6NrwmswDV+j4gR5XW8LcMUWCKEu+f ulBw1V6uxt3lEQpe7nEgkomvNh2qc52kCmVx0cMRaYwi0oBH4cWxw+LjKTxOnw4u Oc2FpA3PEUgWnDa3Zn/j1UAOT49zKiKPjXPbpUX4wlXItgmdBPRgNSQwc/7aAxuX 09XHv9+N9e6+1QBZKTZnaz98f4EvGl/7WhXlwHJeuodMljtLm9UJS9qNlxZV79Vg J5GzJQLkFbdi0x7OKRROoflGuytVZCI1ZOWR89AuBCm5od1ds/lDpqWl+lvngMEv gfQYMhwd30GbH0Nkg0g5 =eqVA -----END PGP SIGNATURE----- Merge remote-tracking branch 'remotes/agraf/tags/signed-s390-for-upstream' into staging Patch queue for s390 - 2015-07-07 A few last minute fixes for 2.4. All of them are s390 TCG bug fixes. # gpg: Signature made Tue Jul 7 16:52:22 2015 BST using RSA key ID 03FEDC60 # gpg: Good signature from "Alexander Graf <agraf@suse.de>" # gpg: aka "Alexander Graf <alex@csgraf.de>" * remotes/agraf/tags/signed-s390-for-upstream: tcg/s390: fix branch target change during code retranslation target-s390x: fix CONVERT TO BINARY (CVD, CVDY) target-s390x: fix EXECUTE instruction executing TRT target-s390x: fix MOVE LONG instruction Signed-off-by: Peter Maydell <peter.maydell@linaro.org>
This commit is contained in:
commit
59dc0a1e9b
@ -121,11 +121,12 @@ uint64_t HELPER(clz)(uint64_t v)
|
||||
return clz64(v);
|
||||
}
|
||||
|
||||
uint64_t HELPER(cvd)(int32_t bin)
|
||||
uint64_t HELPER(cvd)(int32_t reg)
|
||||
{
|
||||
/* positive 0 */
|
||||
uint64_t dec = 0x0c;
|
||||
int shift = 4;
|
||||
int64_t bin = reg;
|
||||
int shift;
|
||||
|
||||
if (bin < 0) {
|
||||
bin = -bin;
|
||||
@ -133,9 +134,7 @@ uint64_t HELPER(cvd)(int32_t bin)
|
||||
}
|
||||
|
||||
for (shift = 4; (shift < 64) && bin; shift += 4) {
|
||||
int current_number = bin % 10;
|
||||
|
||||
dec |= (current_number) << shift;
|
||||
dec |= (bin % 10) << shift;
|
||||
bin /= 10;
|
||||
}
|
||||
|
||||
|
@ -482,6 +482,7 @@ uint32_t HELPER(ex)(CPUS390XState *env, uint32_t cc, uint64_t v1,
|
||||
case 0xc00:
|
||||
helper_tr(env, l, get_address(env, 0, b1, d1),
|
||||
get_address(env, 0, b2, d2));
|
||||
break;
|
||||
case 0xd00:
|
||||
cc = helper_trt(env, l, get_address(env, 0, b1, d1),
|
||||
get_address(env, 0, b2, d2));
|
||||
@ -550,7 +551,7 @@ uint32_t HELPER(mvcl)(CPUS390XState *env, uint32_t r1, uint32_t r2)
|
||||
uint64_t dest = get_address_31fix(env, r1);
|
||||
uint64_t srclen = env->regs[r2 + 1] & 0xffffff;
|
||||
uint64_t src = get_address_31fix(env, r2);
|
||||
uint8_t pad = src >> 24;
|
||||
uint8_t pad = env->regs[r2 + 1] >> 24;
|
||||
uint8_t v;
|
||||
uint32_t cc;
|
||||
|
||||
|
@ -1643,8 +1643,10 @@ static void tcg_out_qemu_ld(TCGContext* s, TCGReg data_reg, TCGReg addr_reg,
|
||||
|
||||
base_reg = tcg_out_tlb_read(s, addr_reg, opc, mem_index, 1);
|
||||
|
||||
label_ptr = s->code_ptr + 1;
|
||||
tcg_out_insn(s, RI, BRC, S390_CC_NE, 0);
|
||||
/* We need to keep the offset unchanged for retranslation. */
|
||||
tcg_out16(s, RI_BRC | (S390_CC_NE << 4));
|
||||
label_ptr = s->code_ptr;
|
||||
s->code_ptr += 1;
|
||||
|
||||
tcg_out_qemu_ld_direct(s, opc, data_reg, base_reg, TCG_REG_R2, 0);
|
||||
|
||||
@ -1669,8 +1671,10 @@ static void tcg_out_qemu_st(TCGContext* s, TCGReg data_reg, TCGReg addr_reg,
|
||||
|
||||
base_reg = tcg_out_tlb_read(s, addr_reg, opc, mem_index, 0);
|
||||
|
||||
label_ptr = s->code_ptr + 1;
|
||||
tcg_out_insn(s, RI, BRC, S390_CC_NE, 0);
|
||||
/* We need to keep the offset unchanged for retranslation. */
|
||||
tcg_out16(s, RI_BRC | (S390_CC_NE << 4));
|
||||
label_ptr = s->code_ptr;
|
||||
s->code_ptr += 1;
|
||||
|
||||
tcg_out_qemu_st_direct(s, opc, data_reg, base_reg, TCG_REG_R2, 0);
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user