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:
Peter Maydell 2015-07-07 23:16:42 +01:00
commit 59dc0a1e9b
3 changed files with 14 additions and 10 deletions

View file

@ -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;
}

View file

@ -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;

View file

@ -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);