tcg/s390x/tcg-target.c.inc

786 static void tcg_out_sh64(TCGContext* s, S390Opcode op, TCGReg dest,
789     tcg_out_insn_RSY(s, op, dest, sh_reg, src, sh_imm);
793 static void tcg_out_sh32(TCGContext* s, S390Opcode op, TCGReg dest,
796     tcg_out_insn_RS(s, op, dest, sh_reg, 0, sh_imm);
1048 static inline void tcg_out_risbg(TCGContext *s, TCGReg dest, TCGReg src,
1052     tcg_out16(s, (RIEf_RISBG & 0xff00) | (dest << 4) | src);
1057 static void tcg_out_ext8s(TCGContext *s, TCGType type, TCGReg dest, TCGReg src)
1059     tcg_out_insn(s, RRE, LGBR, dest, src);
1062 static void tcg_out_ext8u(TCGContext *s, TCGReg dest, TCGReg src)
1064     tcg_out_insn(s, RRE, LLGCR, dest, src);
1067 static void tcg_out_ext16s(TCGContext *s, TCGType type, TCGReg dest, TCGReg src)
1069     tcg_out_insn(s, RRE, LGHR, dest, src);
1072 static void tcg_out_ext16u(TCGContext *s, TCGReg dest, TCGReg src)
1074     tcg_out_insn(s, RRE, LLGHR, dest, src);
1077 static void tcg_out_ext32s(TCGContext *s, TCGReg dest, TCGReg src)
1079     tcg_out_insn(s, RRE, LGFR, dest, src);
1082 static void tcg_out_ext32u(TCGContext *s, TCGReg dest, TCGReg src)
1084     tcg_out_insn(s, RRE, LLGFR, dest, src);
1087 static void tcg_out_exts_i32_i64(TCGContext *s, TCGReg dest, TCGReg src)
1089     tcg_out_ext32s(s, dest, src);
1092 static void tcg_out_extu_i32_i64(TCGContext *s, TCGReg dest, TCGReg src)
1094     tcg_out_ext32u(s, dest, src);
1097 static void tcg_out_extrl_i64_i32(TCGContext *s, TCGReg dest, TCGReg src)
1099     tcg_out_mov(s, TCG_TYPE_I32, dest, src);
1116 static void tgen_andi(TCGContext *s, TCGType type, TCGReg dest, uint64_t val)
1129         tcg_out_ext32u(s, dest, dest);
1133         tcg_out_ext8u(s, dest, dest);
1137         tcg_out_ext16u(s, dest, dest);
1143         tcg_out_insn_RI(s, ni_insns[i], dest, val >> (i * 16));
1150         tcg_out_insn_RIL(s, nif_insns[i], dest, val >> (i * 32));
1155         tgen_andi_risbg(s, dest, dest, val);
1162 static void tgen_ori(TCGContext *s, TCGReg dest, uint64_t val)
1172         tcg_out_insn_RI(s, oi_insns[i], dest, val >> (i * 16));
1178         tcg_out_insn_RIL(s, oif_insns[i], dest, val >> (i * 32));
1185 static void tgen_xori(TCGContext *s, TCGReg dest, uint64_t val)
1189         tcg_out_insn(s, RIL, XILF, dest, val);
1192         tcg_out_insn(s, RIL, XIHF, dest, val >> 32);
1267                          TCGReg dest, TCGReg c1, TCGArg c2,
1276         tcg_out_movi(s, TCG_TYPE_I64, dest, 0);
1277         tcg_out_insn(s, RIEg, LOCGHI, dest, neg ? -1 : 1, cc);
1315         tcg_out_movi(s, type, dest, 0);
1316         tcg_out_insn(s, RRE, ALCGR, dest, dest);
1319                 tcg_out_insn(s, RR, LCR, dest, dest);
1321                 tcg_out_insn(s, RRE, LCGR, dest, dest);
1343         tcg_out_insn(s, RRE, SLBGR, dest, dest);
1345             tgen_andi(s, type, dest, 1);
1355     tcg_out_movi(s, TCG_TYPE_I64, dest, 0);
1357     tcg_out_insn(s, RRFc, LOCGR, dest, TCG_TMP0, cc);
1360 static void tgen_movcond_int(TCGContext *s, TCGType type, TCGReg dest,
1367         if (dest == v4) {
1369                 /* Emit: if (cc) dest = v3. */
1370                 tcg_out_insn(s, RIEg, LOCGHI, dest, v3, cc);
1377             tcg_out_insn(s, RI, LGHI, dest, v3);
1383             /* Emit: dest = cc ? v3 : v4. */
1384             tcg_out_insn(s, RRFam, SELGR, dest, v3, v4, cc);
1387         if (dest == v4) {
1390             tcg_out_mov(s, type, dest, v3);
1396     /* Emit: if (cc) dest = src. */
1397     tcg_out_insn(s, RRFc, LOCGR, dest, src, cc);
1400 static void tgen_movcond(TCGContext *s, TCGType type, TCGCond c, TCGReg dest,
1407     tgen_movcond_int(s, type, dest, v3, v3const, v4, cc, inv_cc);
1410 static void tgen_clz(TCGContext *s, TCGReg dest, TCGReg a1,
1419         tcg_out_mov(s, TCG_TYPE_I64, dest, TCG_REG_R0);
1428     tgen_movcond_int(s, TCG_TYPE_I64, dest, a2, a2const, TCG_REG_R0, 8, 2);
1431 static void tgen_ctpop(TCGContext *s, TCGType type, TCGReg dest, TCGReg src)
1436             tcg_out_ext32u(s, dest, src);
1437             src = dest;
1439         tcg_out_insn(s, RRFc, POPCNT, dest, src, 8);
1444     tcg_out_insn(s, RRFc, POPCNT, dest, src, 0);
1448         tcg_out_insn(s, RIL, MSFI, dest, 0x01010101);
1449         tcg_out_sh32(s, RS_SRL, dest, TCG_REG_NONE, 24);
1452         tcg_out_insn(s, RRE, MSGR, dest, TCG_TMP0);
1453         tcg_out_sh64(s, RSY_SRLG, dest, dest, TCG_REG_NONE, 56);
1457 static void tgen_deposit(TCGContext *s, TCGReg dest, TCGReg src,
1462     tcg_out_risbg(s, dest, src, msb, lsb, ofs, z);
1465 static void tgen_extract(TCGContext *s, TCGReg dest, TCGReg src,
1468     tcg_out_risbg(s, dest, src, 64 - len, 63, 64 - ofs, 1);
1471 static void tgen_gotoi(TCGContext *s, int cc, const tcg_insn_unit *dest)
1473     ptrdiff_t off = tcg_pcrel_diff(s, dest) >> 1;
1479         tcg_out_movi(s, TCG_TYPE_PTR, TCG_TMP0, (uintptr_t)dest);
1565 static void tcg_out_call_int(TCGContext *s, const tcg_insn_unit *dest)
1567     ptrdiff_t off = tcg_pcrel_diff(s, dest) >> 1;
1571         tcg_out_movi(s, TCG_TYPE_PTR, TCG_TMP0, (uintptr_t)dest);
1576 static void tcg_out_call(TCGContext *s, const tcg_insn_unit *dest,
1579     tcg_out_call_int(s, dest);