motorhead/qemu
1
0
Fork 0
mirror of https://github.com/Motorhead1991/qemu.git synced 2025-08-11 03:24:58 -06:00
Code Issues Projects Releases Packages Wiki Activity Actions

target-alpha: Convert gen_ins_h/l to source/sink

Browse source 
Signed-off-by: Richard Henderson <rth@twiddle.net>
This commit is contained in:
Richard Henderson 2014-03-19 11:41:14 -07:00
parent 9a734d64f9
commit 5e5863ecf1
1 changed files with 51 additions and 62 deletions
Download patch file Download diff file Expand all files Collapse all files

71
target-alpha/translate.c
View file

@ -1235,75 +1235,64 @@ static void gen_ext_l(DisasContext *ctx, TCGv vc, TCGv va, int rb, bool islit,
} }
/* INSWH, INSLH, INSQH */ /* INSWH, INSLH, INSQH */
static void gen_ins_h(int ra, int rb, int rc, int islit, static void gen_ins_h(DisasContext *ctx, TCGv vc, TCGv va, int rb, bool islit,
uint8_t lit, uint8_t byte_mask) uint8_t lit, uint8_t byte_mask)
{ {
if (unlikely(rc == 31)) {
return;
} else if (unlikely(ra == 31) || (islit && (lit & 7) == 0)) {
tcg_gen_movi_i64(cpu_ir[rc], 0);
} else {
TCGv tmp = tcg_temp_new(); TCGv tmp = tcg_temp_new();
/* The instruction description has us left-shift the byte mask /* The instruction description has us left-shift the byte mask and extract
and extract bits <15:8> and apply that zap at the end. This bits <15:8> and apply that zap at the end. This is equivalent to simply
is equivalent to simply performing the zap first and shifting performing the zap first and shifting afterward. */
afterward. */ gen_zapnoti(tmp, va, byte_mask);
gen_zapnoti (tmp, cpu_ir[ra], byte_mask);
if (islit) { if (islit) {
/* Note that we have handled the lit==0 case above. */ lit &= 7;
tcg_gen_shri_i64 (cpu_ir[rc], tmp, 64 - (lit & 7) * 8); if (unlikely(lit == 0)) {
tcg_gen_movi_i64(vc, 0);
} else {
tcg_gen_shri_i64(vc, tmp, 64 - lit * 8);
}
} else { } else {
TCGv shift = tcg_temp_new(); TCGv shift = tcg_temp_new();
/* If (B & 7) == 0, we need to shift by 64 and leave a zero. /* If (B & 7) == 0, we need to shift by 64 and leave a zero. Do this
Do this portably by splitting the shift into two parts: portably by splitting the shift into two parts: shift_count-1 and 1.
shift_count-1 and 1. Arrange for the -1 by using Arrange for the -1 by using ones-complement instead of
ones-complement instead of twos-complement in the negation: twos-complement in the negation: ~(B * 8) & 63. */
~((B & 7) * 8) & 63. */
tcg_gen_andi_i64(shift, cpu_ir[rb], 7); tcg_gen_shli_i64(shift, load_gpr(ctx, rb), 3);
tcg_gen_shli_i64(shift, shift, 3);
tcg_gen_not_i64(shift, shift); tcg_gen_not_i64(shift, shift);
tcg_gen_andi_i64(shift, shift, 0x3f); tcg_gen_andi_i64(shift, shift, 0x3f);
tcg_gen_shr_i64(cpu_ir[rc], tmp, shift); tcg_gen_shr_i64(vc, tmp, shift);
tcg_gen_shri_i64(cpu_ir[rc], cpu_ir[rc], 1); tcg_gen_shri_i64(vc, vc, 1);
tcg_temp_free(shift); tcg_temp_free(shift);
} }
tcg_temp_free(tmp); tcg_temp_free(tmp);
}
} }
/* INSBL, INSWL, INSLL, INSQL */ /* INSBL, INSWL, INSLL, INSQL */
static void gen_ins_l(int ra, int rb, int rc, int islit, static void gen_ins_l(DisasContext *ctx, TCGv vc, TCGv va, int rb, bool islit,
uint8_t lit, uint8_t byte_mask) uint8_t lit, uint8_t byte_mask)
{ {
if (unlikely(rc == 31)) {
return;
} else if (unlikely(ra == 31)) {
tcg_gen_movi_i64(cpu_ir[rc], 0);
} else {
TCGv tmp = tcg_temp_new(); TCGv tmp = tcg_temp_new();
/* The instruction description has us left-shift the byte mask /* The instruction description has us left-shift the byte mask
the same number of byte slots as the data and apply the zap the same number of byte slots as the data and apply the zap
at the end. This is equivalent to simply performing the zap at the end. This is equivalent to simply performing the zap
first and shifting afterward. */ first and shifting afterward. */
gen_zapnoti (tmp, cpu_ir[ra], byte_mask); gen_zapnoti(tmp, va, byte_mask);
if (islit) { if (islit) {
tcg_gen_shli_i64(cpu_ir[rc], tmp, (lit & 7) * 8); tcg_gen_shli_i64(vc, tmp, (lit & 7) * 8);
} else { } else {
TCGv shift = tcg_temp_new(); TCGv shift = tcg_temp_new();
tcg_gen_andi_i64(shift, cpu_ir[rb], 7); tcg_gen_andi_i64(shift, load_gpr(ctx, rb), 7);
tcg_gen_shli_i64(shift, shift, 3); tcg_gen_shli_i64(shift, shift, 3);
tcg_gen_shl_i64(cpu_ir[rc], tmp, shift); tcg_gen_shl_i64(vc, tmp, shift);
tcg_temp_free(shift); tcg_temp_free(shift);
} }
tcg_temp_free(tmp); tcg_temp_free(tmp);
}
} }
/* MSKWH, MSKLH, MSKQH */ /* MSKWH, MSKLH, MSKQH */
@ -2094,7 +2083,7 @@ static ExitStatus translate_one(DisasContext *ctx, uint32_t insn)
break; break;
case 0x0B: case 0x0B:
/* INSBL */ /* INSBL */
gen_ins_l(ra, rb, rc, islit, lit, 0x01); gen_ins_l(ctx, vc, va, rb, islit, lit, 0x01);
break; break;
case 0x12: case 0x12:
/* MSKWL */ /* MSKWL */
@ -2106,7 +2095,7 @@ static ExitStatus translate_one(DisasContext *ctx, uint32_t insn)
break; break;
case 0x1B: case 0x1B:
/* INSWL */ /* INSWL */
gen_ins_l(ra, rb, rc, islit, lit, 0x03); gen_ins_l(ctx, vc, va, rb, islit, lit, 0x03);
break; break;
case 0x22: case 0x22:
/* MSKLL */ /* MSKLL */
@ -2118,7 +2107,7 @@ static ExitStatus translate_one(DisasContext *ctx, uint32_t insn)
break; break;
case 0x2B: case 0x2B:
/* INSLL */ /* INSLL */
gen_ins_l(ra, rb, rc, islit, lit, 0x0f); gen_ins_l(ctx, vc, va, rb, islit, lit, 0x0f);
break; break;
case 0x30: case 0x30:
/* ZAP */ /* ZAP */
@ -2162,7 +2151,7 @@ static ExitStatus translate_one(DisasContext *ctx, uint32_t insn)
break; break;
case 0x3B: case 0x3B:
/* INSQL */ /* INSQL */
gen_ins_l(ra, rb, rc, islit, lit, 0xff); gen_ins_l(ctx, vc, va, rb, islit, lit, 0xff);
break; break;
case 0x3C: case 0x3C:
/* SRA */ /* SRA */
@ -2182,7 +2171,7 @@ static ExitStatus translate_one(DisasContext *ctx, uint32_t insn)
break; break;
case 0x57: case 0x57:
/* INSWH */ /* INSWH */
gen_ins_h(ra, rb, rc, islit, lit, 0x03); gen_ins_h(ctx, vc, va, rb, islit, lit, 0x03);
break; break;
case 0x5A: case 0x5A:
/* EXTWH */ /* EXTWH */
@ -2194,7 +2183,7 @@ static ExitStatus translate_one(DisasContext *ctx, uint32_t insn)
break; break;
case 0x67: case 0x67:
/* INSLH */ /* INSLH */
gen_ins_h(ra, rb, rc, islit, lit, 0x0f); gen_ins_h(ctx, vc, va, rb, islit, lit, 0x0f);
break; break;
case 0x6A: case 0x6A:
/* EXTLH */ /* EXTLH */
@ -2206,7 +2195,7 @@ static ExitStatus translate_one(DisasContext *ctx, uint32_t insn)
break; break;
case 0x77: case 0x77:
/* INSQH */ /* INSQH */
gen_ins_h(ra, rb, rc, islit, lit, 0xff); gen_ins_h(ctx, vc, va, rb, islit, lit, 0xff);
break; break;
case 0x7A: case 0x7A:
/* EXTQH */ /* EXTQH */