Commit 0abddd6c authored by David Hildenbrand's avatar David Hildenbrand
Browse files

s390x/tcg: Implement VECTOR SHIFT LEFT DOUBLE BY BYTE 



Inline expansion courtesy of Richard H.

Reviewed-by: default avatarRichard Henderson <richard.henderson@linaro.org>
Signed-off-by: default avatarDavid Hildenbrand <david@redhat.com>
parent dea33fc3

target/s390x/insn-data.def

+2 −0
Original line number Diff line number Diff line
@@ -1164,6 +1164,8 @@ 
    F(0xe774, VSL,     VRR_c, V,   0, 0, 0, 0, vsl, 0, IF_VEC)

/* VECTOR SHIFT LEFT BY BYTE */

    F(0xe775, VSLB,    VRR_c, V,   0, 0, 0, 0, vsl, 0, IF_VEC)

/* VECTOR SHIFT LEFT DOUBLE BY BYTE */

    F(0xe777, VSLDB,   VRI_d, V,   0, 0, 0, 0, vsldb, 0, IF_VEC)



#ifndef CONFIG_USER_ONLY

/* COMPARE AND SWAP AND PURGE */

target/s390x/translate_vx.inc.c

+29 −0
Original line number Diff line number Diff line
@@ -2060,3 +2060,32 @@ static DisasJumpType op_vsl(DisasContext *s, DisasOps *o) 
    tcg_temp_free_i64(shift);

    return DISAS_NEXT;

}



static DisasJumpType op_vsldb(DisasContext *s, DisasOps *o)

{

    const uint8_t i4 = get_field(s->fields, i4) & 0xf;

    const int left_shift = (i4 & 7) * 8;

    const int right_shift = 64 - left_shift;

    TCGv_i64 t0 = tcg_temp_new_i64();

    TCGv_i64 t1 = tcg_temp_new_i64();

    TCGv_i64 t2 = tcg_temp_new_i64();



    if ((i4 & 8) == 0) {

        read_vec_element_i64(t0, get_field(s->fields, v2), 0, ES_64);

        read_vec_element_i64(t1, get_field(s->fields, v2), 1, ES_64);

        read_vec_element_i64(t2, get_field(s->fields, v3), 0, ES_64);

    } else {

        read_vec_element_i64(t0, get_field(s->fields, v2), 1, ES_64);

        read_vec_element_i64(t1, get_field(s->fields, v3), 0, ES_64);

        read_vec_element_i64(t2, get_field(s->fields, v3), 1, ES_64);

    }

    tcg_gen_extract2_i64(t0, t1, t0, right_shift);

    tcg_gen_extract2_i64(t1, t2, t1, right_shift);

    write_vec_element_i64(t0, get_field(s->fields, v1), 0, ES_64);

    write_vec_element_i64(t1, get_field(s->fields, v1), 1, ES_64);



    tcg_temp_free(t0);

    tcg_temp_free(t1);

    tcg_temp_free(t2);

    return DISAS_NEXT;

}