@@ -77,3 +77,52 @@ target_ulong HELPER(grevw)(target_ulong rs1, target_ulong rs2)
#endif
+static target_ulong do_gorc(target_ulong rs1,
+ target_ulong rs2,
+ const target_ulong masks[])
+{
+ target_ulong x = rs1;
+ int shift = 1;
+ int i = 0;
+
+ while (shift < TARGET_LONG_BITS) {
+ if (rs2 & shift) {
+ x |= do_swap(x, masks[i], shift);
+ }
+ shift <<= 1;
+ ++i;
+ }
+
+ return x;
+}
+
+target_ulong HELPER(gorc)(target_ulong rs1, target_ulong rs2)
+{
+ static const target_ulong masks[] = {
+#ifdef TARGET_RISCV32
+ 0x55555555, 0x33333333, 0x0f0f0f0f,
+ 0x00ff00ff, 0x0000ffff,
+#else
+ 0x5555555555555555, 0x3333333333333333, 0x0f0f0f0f0f0f0f0f,
+ 0x00ff00ff00ff00ff, 0x0000ffff0000ffff, 0x00000000ffffffff,
+#endif
+ };
+
+ return do_gorc(rs1, rs2, masks);
+}
+
+/* RV64-only instruction */
+#ifdef TARGET_RISCV64
+
+target_ulong HELPER(gorcw)(target_ulong rs1, target_ulong rs2)
+{
+ static const target_ulong masks[] = {
+ 0x55555555, 0x33333333, 0x0f0f0f0f,
+ 0x00ff00ff, 0x0000ffff,
+ };
+
+ return do_gorc(rs1, rs2, masks);
+}
+
+#endif
+
@@ -68,9 +68,11 @@ DEF_HELPER_FLAGS_1(fclass_d, TCG_CALL_NO_RWG_SE, tl, i64)
/* Bitmanip */
DEF_HELPER_FLAGS_2(grev, TCG_CALL_NO_RWG_SE, tl, tl, tl)
+DEF_HELPER_FLAGS_2(gorc, TCG_CALL_NO_RWG_SE, tl, tl, tl)
#if defined(TARGET_RISCV64)
DEF_HELPER_FLAGS_2(grevw, TCG_CALL_NO_RWG_SE, tl, tl, tl)
+DEF_HELPER_FLAGS_2(gorcw, TCG_CALL_NO_RWG_SE, tl, tl, tl)
#endif
/* Special functions */
@@ -103,6 +103,7 @@ srow 0010000 .......... 101 ..... 0111011 @r
rorw 0110000 .......... 101 ..... 0111011 @r
rolw 0110000 .......... 001 ..... 0111011 @r
grevw 0110100 .......... 101 ..... 0111011 @r
+gorcw 0010100 .......... 101 ..... 0111011 @r
sbsetiw 0010100 .......... 001 ..... 0011011 @sh5
sbclriw 0100100 .......... 001 ..... 0011011 @sh5
@@ -111,3 +112,4 @@ sloiw 0010000 .......... 001 ..... 0011011 @sh5
sroiw 0010000 .......... 101 ..... 0011011 @sh5
roriw 0110000 .......... 101 ..... 0011011 @sh5
greviw 0110100 .......... 101 ..... 0011011 @sh5
+gorciw 0010100 .......... 101 ..... 0011011 @sh5
@@ -620,6 +620,7 @@ sro 0010000 .......... 101 ..... 0110011 @r
ror 0110000 .......... 101 ..... 0110011 @r
rol 0110000 .......... 001 ..... 0110011 @r
grev 0110100 .......... 101 ..... 0110011 @r
+gorc 0010100 .......... 101 ..... 0110011 @r
sbseti 001010 ........... 001 ..... 0010011 @sh
sbclri 010010 ........... 001 ..... 0010011 @sh
@@ -629,3 +630,4 @@ sloi 001000 ........... 001 ..... 0010011 @sh
sroi 001000 ........... 101 ..... 0010011 @sh
rori 011000 ........... 101 ..... 0010011 @sh
grevi 011010 ........... 101 ..... 0010011 @sh
+gorci 001010 ........... 101 ..... 0010011 @sh
@@ -229,6 +229,23 @@ static bool trans_grevi(DisasContext *ctx, arg_grevi *a)
return gen_grevi(ctx, a);
}
+static bool trans_gorc(DisasContext *ctx, arg_gorc *a)
+{
+ REQUIRE_EXT(ctx, RVB);
+ return gen_arith(ctx, a, &gen_gorc);
+}
+
+static bool trans_gorci(DisasContext *ctx, arg_gorci *a)
+{
+ REQUIRE_EXT(ctx, RVB);
+
+ if (a->shamt >= TARGET_LONG_BITS) {
+ return false;
+ }
+
+ return gen_arith_shamt_tl(ctx, a, &gen_gorc);
+}
+
/* RV64-only instructions */
#ifdef TARGET_RISCV64
@@ -377,4 +394,21 @@ static bool trans_greviw(DisasContext *ctx, arg_greviw *a)
return gen_arith_shamt_tl(ctx, a, &gen_grevw);
}
+static bool trans_gorcw(DisasContext *ctx, arg_gorcw *a)
+{
+ REQUIRE_EXT(ctx, RVB);
+ return gen_arith(ctx, a, &gen_gorcw);
+}
+
+static bool trans_gorciw(DisasContext *ctx, arg_gorciw *a)
+{
+ REQUIRE_EXT(ctx, RVB);
+
+ if (a->shamt >= 32) {
+ return false;
+ }
+
+ return gen_arith_shamt_tl(ctx, a, &gen_gorcw);
+}
+
#endif
@@ -957,6 +957,17 @@ static bool gen_grevi(DisasContext *ctx, arg_grevi *a)
return true;
}
+static void gen_gorc(TCGv ret, TCGv arg1, TCGv arg2)
+{
+ TCGv shamt;
+ shamt = tcg_temp_new();
+
+ gen_sbop_shamt(shamt, arg2);
+ gen_helper_gorc(ret, arg1, shamt);
+
+ tcg_temp_free(shamt);
+}
+
#ifdef TARGET_RISCV64
@@ -1193,6 +1204,21 @@ static void gen_grevw(TCGv ret, TCGv arg1, TCGv arg2)
tcg_temp_free(shamt);
}
+static void gen_gorcw(TCGv ret, TCGv arg1, TCGv arg2)
+{
+ TCGv shamt;
+ shamt = tcg_temp_new();
+
+ tcg_gen_ext32u_tl(arg1, arg1);
+
+ gen_sbopw_shamt(shamt, arg2);
+ gen_helper_gorc(ret, arg1, shamt);
+
+ tcg_gen_ext32s_tl(ret, ret);
+
+ tcg_temp_free(shamt);
+}
+
#endif
static bool gen_arith(DisasContext *ctx, arg_r *a,