/* This file is part of the dynarmic project. * Copyright (c) 2016 MerryMage * This software may be used and distributed according to the terms of the GNU * General Public License version 2 or any later version. */ #include #include "backend_x64/abi.h" #include "backend_x64/block_of_code.h" #include "backend_x64/emit_x64.h" #include "common/address_range.h" #include "common/assert.h" #include "common/bit_util.h" #include "common/common_types.h" #include "common/variant_util.h" #include "frontend/ir/basic_block.h" #include "frontend/ir/microinstruction.h" #include "frontend/ir/opcodes.h" // TODO: Have ARM flags in host flags and not have them use up GPR registers unless necessary. // TODO: Actually implement that proper instruction selector you've always wanted to sweetheart. namespace Dynarmic { namespace BackendX64 { using namespace Xbyak::util; constexpr u64 f32_negative_zero = 0x80000000u; constexpr u64 f32_nan = 0x7fc00000u; constexpr u64 f32_non_sign_mask = 0x7fffffffu; constexpr u64 f64_negative_zero = 0x8000000000000000u; constexpr u64 f64_nan = 0x7ff8000000000000u; constexpr u64 f64_non_sign_mask = 0x7fffffffffffffffu; constexpr u64 f64_penultimate_positive_denormal = 0x000ffffffffffffeu; constexpr u64 f64_min_s32 = 0xc1e0000000000000u; // -2147483648 as a double constexpr u64 f64_max_s32 = 0x41dfffffffc00000u; // 2147483647 as a double constexpr u64 f64_min_u32 = 0x0000000000000000u; // 0 as a double EmitContext::EmitContext(RegAlloc& reg_alloc, IR::Block& block) : reg_alloc(reg_alloc), block(block) {} void EmitContext::EraseInstruction(IR::Inst* inst) { block.Instructions().erase(inst); inst->Invalidate(); } template EmitX64::EmitX64(BlockOfCode* code) : code(code) {} template EmitX64::~EmitX64() {} template boost::optional::BlockDescriptor> EmitX64::GetBasicBlock(IR::LocationDescriptor descriptor) const { auto iter = block_descriptors.find(descriptor); if (iter == block_descriptors.end()) return boost::none; return iter->second; } template void EmitX64::EmitVoid(EmitContext&, IR::Inst*) { } template void EmitX64::EmitBreakpoint(EmitContext&, IR::Inst*) { code->int3(); } template void EmitX64::EmitIdentity(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); if (!args[0].IsImmediate()) { ctx.reg_alloc.DefineValue(inst, args[0]); } } template void EmitX64::PushRSBHelper(Xbyak::Reg64 loc_desc_reg, Xbyak::Reg64 index_reg, IR::LocationDescriptor target) { using namespace Xbyak::util; auto iter = block_descriptors.find(target); CodePtr target_code_ptr = iter != block_descriptors.end() ? iter->second.entrypoint : code->GetReturnFromRunCodeAddress(); code->mov(index_reg.cvt32(), dword[r15 + offsetof(JST, rsb_ptr)]); code->mov(loc_desc_reg, target.Value()); patch_information[target].mov_rcx.emplace_back(code->getCurr()); EmitPatchMovRcx(target_code_ptr); code->mov(qword[r15 + index_reg * 8 + offsetof(JST, rsb_location_descriptors)], loc_desc_reg); code->mov(qword[r15 + index_reg * 8 + offsetof(JST, rsb_codeptrs)], rcx); code->add(index_reg.cvt32(), 1); code->and_(index_reg.cvt32(), u32(JST::RSBPtrMask)); code->mov(dword[r15 + offsetof(JST, rsb_ptr)], index_reg.cvt32()); } template void EmitX64::EmitPushRSB(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); ASSERT(args[0].IsImmediate()); u64 unique_hash_of_target = args[0].GetImmediateU64(); ctx.reg_alloc.ScratchGpr({HostLoc::RCX}); Xbyak::Reg64 loc_desc_reg = ctx.reg_alloc.ScratchGpr(); Xbyak::Reg64 index_reg = ctx.reg_alloc.ScratchGpr(); PushRSBHelper(loc_desc_reg, index_reg, IR::LocationDescriptor{unique_hash_of_target}); } template void EmitX64::EmitGetCarryFromOp(EmitContext&, IR::Inst*) { ASSERT_MSG(false, "should never happen"); } template void EmitX64::EmitGetOverflowFromOp(EmitContext&, IR::Inst*) { ASSERT_MSG(false, "should never happen"); } template void EmitX64::EmitGetGEFromOp(EmitContext&, IR::Inst*) { ASSERT_MSG(false, "should never happen"); } template void EmitX64::EmitPack2x32To1x64(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Reg64 lo = ctx.reg_alloc.UseScratchGpr(args[0]); Xbyak::Reg64 hi = ctx.reg_alloc.UseScratchGpr(args[1]); code->shl(hi, 32); code->mov(lo.cvt32(), lo.cvt32()); // Zero extend to 64-bits code->or_(lo, hi); ctx.reg_alloc.DefineValue(inst, lo); } template void EmitX64::EmitLeastSignificantWord(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); ctx.reg_alloc.DefineValue(inst, args[0]); } template void EmitX64::EmitMostSignificantWord(EmitContext& ctx, IR::Inst* inst) { auto carry_inst = inst->GetAssociatedPseudoOperation(IR::Opcode::GetCarryFromOp); auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Reg64 result = ctx.reg_alloc.UseScratchGpr(args[0]); code->shr(result, 32); if (carry_inst) { ctx.EraseInstruction(carry_inst); Xbyak::Reg64 carry = ctx.reg_alloc.ScratchGpr(); code->setc(carry.cvt8()); ctx.reg_alloc.DefineValue(carry_inst, carry); } ctx.reg_alloc.DefineValue(inst, result); } template void EmitX64::EmitLeastSignificantHalf(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); ctx.reg_alloc.DefineValue(inst, args[0]); } template void EmitX64::EmitLeastSignificantByte(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); ctx.reg_alloc.DefineValue(inst, args[0]); } template void EmitX64::EmitMostSignificantBit(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Reg32 result = ctx.reg_alloc.UseScratchGpr(args[0]).cvt32(); // TODO: Flag optimization code->shr(result, 31); ctx.reg_alloc.DefineValue(inst, result); } template void EmitX64::EmitIsZero(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Reg32 result = ctx.reg_alloc.UseScratchGpr(args[0]).cvt32(); // TODO: Flag optimization code->test(result, result); code->sete(result.cvt8()); code->movzx(result, result.cvt8()); ctx.reg_alloc.DefineValue(inst, result); } template void EmitX64::EmitIsZero64(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Reg64 result = ctx.reg_alloc.UseScratchGpr(args[0]); // TODO: Flag optimization code->test(result, result); code->sete(result.cvt8()); code->movzx(result, result.cvt8()); ctx.reg_alloc.DefineValue(inst, result); } template void EmitX64::EmitLogicalShiftLeft(EmitContext& ctx, IR::Inst* inst) { auto carry_inst = inst->GetAssociatedPseudoOperation(IR::Opcode::GetCarryFromOp); auto args = ctx.reg_alloc.GetArgumentInfo(inst); auto& operand_arg = args[0]; auto& shift_arg = args[1]; auto& carry_arg = args[2]; // TODO: Consider using BMI2 instructions like SHLX when arm-in-host flags is implemented. if (!carry_inst) { if (shift_arg.IsImmediate()) { Xbyak::Reg32 result = ctx.reg_alloc.UseScratchGpr(operand_arg).cvt32(); u8 shift = shift_arg.GetImmediateU8(); if (shift <= 31) { code->shl(result, shift); } else { code->xor_(result, result); } ctx.reg_alloc.DefineValue(inst, result); } else { ctx.reg_alloc.Use(shift_arg, HostLoc::RCX); Xbyak::Reg32 result = ctx.reg_alloc.UseScratchGpr(operand_arg).cvt32(); Xbyak::Reg32 zero = ctx.reg_alloc.ScratchGpr().cvt32(); // The 32-bit x64 SHL instruction masks the shift count by 0x1F before performing the shift. // ARM differs from the behaviour: It does not mask the count, so shifts above 31 result in zeros. code->shl(result, code->cl); code->xor_(zero, zero); code->cmp(code->cl, 32); code->cmovnb(result, zero); ctx.reg_alloc.DefineValue(inst, result); } } else { ctx.EraseInstruction(carry_inst); if (shift_arg.IsImmediate()) { u8 shift = shift_arg.GetImmediateU8(); Xbyak::Reg32 result = ctx.reg_alloc.UseScratchGpr(operand_arg).cvt32(); Xbyak::Reg32 carry = ctx.reg_alloc.UseScratchGpr(carry_arg).cvt32(); if (shift == 0) { // There is nothing more to do. } else if (shift < 32) { code->bt(carry.cvt32(), 0); code->shl(result, shift); code->setc(carry.cvt8()); } else if (shift > 32) { code->xor_(result, result); code->xor_(carry, carry); } else { code->mov(carry, result); code->xor_(result, result); code->and_(carry, 1); } ctx.reg_alloc.DefineValue(inst, result); ctx.reg_alloc.DefineValue(carry_inst, carry); } else { ctx.reg_alloc.Use(shift_arg, HostLoc::RCX); Xbyak::Reg32 result = ctx.reg_alloc.UseScratchGpr(operand_arg).cvt32(); Xbyak::Reg32 carry = ctx.reg_alloc.UseScratchGpr(carry_arg).cvt32(); // TODO: Optimize this. code->inLocalLabel(); code->cmp(code->cl, 32); code->ja(".Rs_gt32"); code->je(".Rs_eq32"); // if (Rs & 0xFF < 32) { code->bt(carry.cvt32(), 0); // Set the carry flag for correct behaviour in the case when Rs & 0xFF == 0 code->shl(result, code->cl); code->setc(carry.cvt8()); code->jmp(".end"); // } else if (Rs & 0xFF > 32) { code->L(".Rs_gt32"); code->xor_(result, result); code->xor_(carry, carry); code->jmp(".end"); // } else if (Rs & 0xFF == 32) { code->L(".Rs_eq32"); code->mov(carry, result); code->and_(carry, 1); code->xor_(result, result); // } code->L(".end"); code->outLocalLabel(); ctx.reg_alloc.DefineValue(inst, result); ctx.reg_alloc.DefineValue(carry_inst, carry); } } } template void EmitX64::EmitLogicalShiftRight(EmitContext& ctx, IR::Inst* inst) { auto carry_inst = inst->GetAssociatedPseudoOperation(IR::Opcode::GetCarryFromOp); auto args = ctx.reg_alloc.GetArgumentInfo(inst); auto& operand_arg = args[0]; auto& shift_arg = args[1]; auto& carry_arg = args[2]; if (!carry_inst) { if (shift_arg.IsImmediate()) { Xbyak::Reg32 result = ctx.reg_alloc.UseScratchGpr(operand_arg).cvt32(); u8 shift = shift_arg.GetImmediateU8(); if (shift <= 31) { code->shr(result, shift); } else { code->xor_(result, result); } ctx.reg_alloc.DefineValue(inst, result); } else { ctx.reg_alloc.Use(shift_arg, HostLoc::RCX); Xbyak::Reg32 result = ctx.reg_alloc.UseScratchGpr(operand_arg).cvt32(); Xbyak::Reg32 zero = ctx.reg_alloc.ScratchGpr().cvt32(); // The 32-bit x64 SHR instruction masks the shift count by 0x1F before performing the shift. // ARM differs from the behaviour: It does not mask the count, so shifts above 31 result in zeros. code->shr(result, code->cl); code->xor_(zero, zero); code->cmp(code->cl, 32); code->cmovnb(result, zero); ctx.reg_alloc.DefineValue(inst, result); } } else { ctx.EraseInstruction(carry_inst); if (shift_arg.IsImmediate()) { u8 shift = shift_arg.GetImmediateU8(); Xbyak::Reg32 result = ctx.reg_alloc.UseScratchGpr(operand_arg).cvt32(); Xbyak::Reg32 carry = ctx.reg_alloc.UseScratchGpr(carry_arg).cvt32(); if (shift == 0) { // There is nothing more to do. } else if (shift < 32) { code->shr(result, shift); code->setc(carry.cvt8()); } else if (shift == 32) { code->bt(result, 31); code->setc(carry.cvt8()); code->mov(result, 0); } else { code->xor_(result, result); code->xor_(carry, carry); } ctx.reg_alloc.DefineValue(inst, result); ctx.reg_alloc.DefineValue(carry_inst, carry); } else { ctx.reg_alloc.Use(shift_arg, HostLoc::RCX); Xbyak::Reg32 result = ctx.reg_alloc.UseScratchGpr(operand_arg).cvt32(); Xbyak::Reg32 carry = ctx.reg_alloc.UseScratchGpr(carry_arg).cvt32(); // TODO: Optimize this. code->inLocalLabel(); code->cmp(code->cl, 32); code->ja(".Rs_gt32"); code->je(".Rs_eq32"); // if (Rs & 0xFF == 0) goto end; code->test(code->cl, code->cl); code->jz(".end"); // if (Rs & 0xFF < 32) { code->shr(result, code->cl); code->setc(carry.cvt8()); code->jmp(".end"); // } else if (Rs & 0xFF > 32) { code->L(".Rs_gt32"); code->xor_(result, result); code->xor_(carry, carry); code->jmp(".end"); // } else if (Rs & 0xFF == 32) { code->L(".Rs_eq32"); code->bt(result, 31); code->setc(carry.cvt8()); code->xor_(result, result); // } code->L(".end"); code->outLocalLabel(); ctx.reg_alloc.DefineValue(inst, result); ctx.reg_alloc.DefineValue(carry_inst, carry); } } } template void EmitX64::EmitLogicalShiftRight64(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); auto& operand_arg = args[0]; auto& shift_arg = args[1]; ASSERT_MSG(shift_arg.IsImmediate(), "variable 64 bit shifts are not implemented"); ASSERT_MSG(shift_arg.GetImmediateU8() < 64, "shift width clamping is not implemented"); Xbyak::Reg64 result = ctx.reg_alloc.UseScratchGpr(operand_arg); u8 shift = shift_arg.GetImmediateU8(); code->shr(result.cvt64(), shift); ctx.reg_alloc.DefineValue(inst, result); } template void EmitX64::EmitArithmeticShiftRight(EmitContext& ctx, IR::Inst* inst) { auto carry_inst = inst->GetAssociatedPseudoOperation(IR::Opcode::GetCarryFromOp); auto args = ctx.reg_alloc.GetArgumentInfo(inst); auto& operand_arg = args[0]; auto& shift_arg = args[1]; auto& carry_arg = args[2]; if (!carry_inst) { if (shift_arg.IsImmediate()) { u8 shift = shift_arg.GetImmediateU8(); Xbyak::Reg32 result = ctx.reg_alloc.UseScratchGpr(operand_arg).cvt32(); code->sar(result, u8(shift < 31 ? shift : 31)); ctx.reg_alloc.DefineValue(inst, result); } else { ctx.reg_alloc.UseScratch(shift_arg, HostLoc::RCX); Xbyak::Reg32 result = ctx.reg_alloc.UseScratchGpr(operand_arg).cvt32(); Xbyak::Reg32 const31 = ctx.reg_alloc.ScratchGpr().cvt32(); // The 32-bit x64 SAR instruction masks the shift count by 0x1F before performing the shift. // ARM differs from the behaviour: It does not mask the count. // We note that all shift values above 31 have the same behaviour as 31 does, so we saturate `shift` to 31. code->mov(const31, 31); code->movzx(code->ecx, code->cl); code->cmp(code->ecx, u32(31)); code->cmovg(code->ecx, const31); code->sar(result, code->cl); ctx.reg_alloc.DefineValue(inst, result); } } else { ctx.EraseInstruction(carry_inst); if (shift_arg.IsImmediate()) { u8 shift = shift_arg.GetImmediateU8(); Xbyak::Reg32 result = ctx.reg_alloc.UseScratchGpr(operand_arg).cvt32(); Xbyak::Reg8 carry = ctx.reg_alloc.UseScratchGpr(carry_arg).cvt8(); if (shift == 0) { // There is nothing more to do. } else if (shift <= 31) { code->sar(result, shift); code->setc(carry); } else { code->sar(result, 31); code->bt(result, 31); code->setc(carry); } ctx.reg_alloc.DefineValue(inst, result); ctx.reg_alloc.DefineValue(carry_inst, carry); } else { ctx.reg_alloc.Use(shift_arg, HostLoc::RCX); Xbyak::Reg32 result = ctx.reg_alloc.UseScratchGpr(operand_arg).cvt32(); Xbyak::Reg8 carry = ctx.reg_alloc.UseScratchGpr(carry_arg).cvt8(); // TODO: Optimize this. code->inLocalLabel(); code->cmp(code->cl, u32(31)); code->ja(".Rs_gt31"); // if (Rs & 0xFF == 0) goto end; code->test(code->cl, code->cl); code->jz(".end"); // if (Rs & 0xFF <= 31) { code->sar(result, code->cl); code->setc(carry); code->jmp(".end"); // } else if (Rs & 0xFF > 31) { code->L(".Rs_gt31"); code->sar(result, 31); // 31 produces the same results as anything above 31 code->bt(result, 31); code->setc(carry); // } code->L(".end"); code->outLocalLabel(); ctx.reg_alloc.DefineValue(inst, result); ctx.reg_alloc.DefineValue(carry_inst, carry); } } } template void EmitX64::EmitRotateRight(EmitContext& ctx, IR::Inst* inst) { auto carry_inst = inst->GetAssociatedPseudoOperation(IR::Opcode::GetCarryFromOp); auto args = ctx.reg_alloc.GetArgumentInfo(inst); auto& operand_arg = args[0]; auto& shift_arg = args[1]; auto& carry_arg = args[2]; if (!carry_inst) { if (shift_arg.IsImmediate()) { u8 shift = shift_arg.GetImmediateU8(); Xbyak::Reg32 result = ctx.reg_alloc.UseScratchGpr(operand_arg).cvt32(); code->ror(result, u8(shift & 0x1F)); ctx.reg_alloc.DefineValue(inst, result); } else { ctx.reg_alloc.Use(shift_arg, HostLoc::RCX); Xbyak::Reg32 result = ctx.reg_alloc.UseScratchGpr(operand_arg).cvt32(); // x64 ROR instruction does (shift & 0x1F) for us. code->ror(result, code->cl); ctx.reg_alloc.DefineValue(inst, result); } } else { ctx.EraseInstruction(carry_inst); if (shift_arg.IsImmediate()) { u8 shift = shift_arg.GetImmediateU8(); Xbyak::Reg32 result = ctx.reg_alloc.UseScratchGpr(operand_arg).cvt32(); Xbyak::Reg8 carry = ctx.reg_alloc.UseScratchGpr(carry_arg).cvt8(); if (shift == 0) { // There is nothing more to do. } else if ((shift & 0x1F) == 0) { code->bt(result, u8(31)); code->setc(carry); } else { code->ror(result, shift); code->setc(carry); } ctx.reg_alloc.DefineValue(inst, result); ctx.reg_alloc.DefineValue(carry_inst, carry); } else { ctx.reg_alloc.UseScratch(shift_arg, HostLoc::RCX); Xbyak::Reg32 result = ctx.reg_alloc.UseScratchGpr(operand_arg).cvt32(); Xbyak::Reg8 carry = ctx.reg_alloc.UseScratchGpr(carry_arg).cvt8(); // TODO: Optimize code->inLocalLabel(); // if (Rs & 0xFF == 0) goto end; code->test(code->cl, code->cl); code->jz(".end"); code->and_(code->ecx, u32(0x1F)); code->jz(".zero_1F"); // if (Rs & 0x1F != 0) { code->ror(result, code->cl); code->setc(carry); code->jmp(".end"); // } else { code->L(".zero_1F"); code->bt(result, u8(31)); code->setc(carry); // } code->L(".end"); code->outLocalLabel(); ctx.reg_alloc.DefineValue(inst, result); ctx.reg_alloc.DefineValue(carry_inst, carry); } } } template void EmitX64::EmitRotateRightExtended(EmitContext& ctx, IR::Inst* inst) { auto carry_inst = inst->GetAssociatedPseudoOperation(IR::Opcode::GetCarryFromOp); auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Reg32 result = ctx.reg_alloc.UseScratchGpr(args[0]).cvt32(); Xbyak::Reg8 carry = ctx.reg_alloc.UseScratchGpr(args[1]).cvt8(); code->bt(carry.cvt32(), 0); code->rcr(result, 1); if (carry_inst) { ctx.EraseInstruction(carry_inst); code->setc(carry); ctx.reg_alloc.DefineValue(carry_inst, carry); } ctx.reg_alloc.DefineValue(inst, result); } const Xbyak::Reg64 INVALID_REG = Xbyak::Reg64(-1); static Xbyak::Reg8 DoCarry(RegAlloc& reg_alloc, Argument& carry_in, IR::Inst* carry_out) { if (carry_in.IsImmediate()) { return carry_out ? reg_alloc.ScratchGpr().cvt8() : INVALID_REG.cvt8(); } else { return carry_out ? reg_alloc.UseScratchGpr(carry_in).cvt8() : reg_alloc.UseGpr(carry_in).cvt8(); } } template void EmitX64::EmitAddWithCarry(EmitContext& ctx, IR::Inst* inst) { auto carry_inst = inst->GetAssociatedPseudoOperation(IR::Opcode::GetCarryFromOp); auto overflow_inst = inst->GetAssociatedPseudoOperation(IR::Opcode::GetOverflowFromOp); auto args = ctx.reg_alloc.GetArgumentInfo(inst); auto& carry_in = args[2]; Xbyak::Reg32 result = ctx.reg_alloc.UseScratchGpr(args[0]).cvt32(); Xbyak::Reg8 carry = DoCarry(ctx.reg_alloc, carry_in, carry_inst); Xbyak::Reg8 overflow = overflow_inst ? ctx.reg_alloc.ScratchGpr().cvt8() : INVALID_REG.cvt8(); // TODO: Consider using LEA. if (args[1].IsImmediate()) { u32 op_arg = args[1].GetImmediateU32(); if (carry_in.IsImmediate()) { if (carry_in.GetImmediateU1()) { code->stc(); code->adc(result, op_arg); } else { code->add(result, op_arg); } } else { code->bt(carry.cvt32(), 0); code->adc(result, op_arg); } } else { OpArg op_arg = ctx.reg_alloc.UseOpArg(args[1]); op_arg.setBit(32); if (carry_in.IsImmediate()) { if (carry_in.GetImmediateU1()) { code->stc(); code->adc(result, *op_arg); } else { code->add(result, *op_arg); } } else { code->bt(carry.cvt32(), 0); code->adc(result, *op_arg); } } if (carry_inst) { ctx.EraseInstruction(carry_inst); code->setc(carry); ctx.reg_alloc.DefineValue(carry_inst, carry); } if (overflow_inst) { ctx.EraseInstruction(overflow_inst); code->seto(overflow); ctx.reg_alloc.DefineValue(overflow_inst, overflow); } ctx.reg_alloc.DefineValue(inst, result); } template void EmitX64::EmitAdd64(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Reg64 result = ctx.reg_alloc.UseScratchGpr(args[0]); Xbyak::Reg64 op_arg = ctx.reg_alloc.UseGpr(args[1]); code->add(result, op_arg); ctx.reg_alloc.DefineValue(inst, result); } template void EmitX64::EmitSubWithCarry(EmitContext& ctx, IR::Inst* inst) { auto carry_inst = inst->GetAssociatedPseudoOperation(IR::Opcode::GetCarryFromOp); auto overflow_inst = inst->GetAssociatedPseudoOperation(IR::Opcode::GetOverflowFromOp); auto args = ctx.reg_alloc.GetArgumentInfo(inst); auto& carry_in = args[2]; Xbyak::Reg32 result = ctx.reg_alloc.UseScratchGpr(args[0]).cvt32(); Xbyak::Reg8 carry = DoCarry(ctx.reg_alloc, carry_in, carry_inst); Xbyak::Reg8 overflow = overflow_inst ? ctx.reg_alloc.ScratchGpr().cvt8() : INVALID_REG.cvt8(); // TODO: Consider using LEA. // TODO: Optimize CMP case. // Note that x64 CF is inverse of what the ARM carry flag is here. if (args[1].IsImmediate()) { u32 op_arg = args[1].GetImmediateU32(); if (carry_in.IsImmediate()) { if (carry_in.GetImmediateU1()) { code->sub(result, op_arg); } else { code->stc(); code->sbb(result, op_arg); } } else { code->bt(carry.cvt32(), 0); code->cmc(); code->sbb(result, op_arg); } } else { OpArg op_arg = ctx.reg_alloc.UseOpArg(args[1]); op_arg.setBit(32); if (carry_in.IsImmediate()) { if (carry_in.GetImmediateU1()) { code->sub(result, *op_arg); } else { code->stc(); code->sbb(result, *op_arg); } } else { code->bt(carry.cvt32(), 0); code->cmc(); code->sbb(result, *op_arg); } } if (carry_inst) { ctx.EraseInstruction(carry_inst); code->setnc(carry); ctx.reg_alloc.DefineValue(carry_inst, carry); } if (overflow_inst) { ctx.EraseInstruction(overflow_inst); code->seto(overflow); ctx.reg_alloc.DefineValue(overflow_inst, overflow); } ctx.reg_alloc.DefineValue(inst, result); } template void EmitX64::EmitSub64(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Reg64 result = ctx.reg_alloc.UseScratchGpr(args[0]); Xbyak::Reg64 op_arg = ctx.reg_alloc.UseGpr(args[1]); code->sub(result, op_arg); ctx.reg_alloc.DefineValue(inst, result); } template void EmitX64::EmitMul(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Reg32 result = ctx.reg_alloc.UseScratchGpr(args[0]).cvt32(); if (args[1].IsImmediate()) { code->imul(result, result, args[1].GetImmediateU32()); } else { OpArg op_arg = ctx.reg_alloc.UseOpArg(args[1]); op_arg.setBit(32); code->imul(result, *op_arg); } ctx.reg_alloc.DefineValue(inst, result); } template void EmitX64::EmitMul64(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Reg64 result = ctx.reg_alloc.UseScratchGpr(args[0]); OpArg op_arg = ctx.reg_alloc.UseOpArg(args[1]); code->imul(result, *op_arg); ctx.reg_alloc.DefineValue(inst, result); } template void EmitX64::EmitAnd(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Reg32 result = ctx.reg_alloc.UseScratchGpr(args[0]).cvt32(); if (args[1].IsImmediate()) { u32 op_arg = args[1].GetImmediateU32(); code->and_(result, op_arg); } else { OpArg op_arg = ctx.reg_alloc.UseOpArg(args[1]); op_arg.setBit(32); code->and_(result, *op_arg); } ctx.reg_alloc.DefineValue(inst, result); } template void EmitX64::EmitEor(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Reg32 result = ctx.reg_alloc.UseScratchGpr(args[0]).cvt32(); if (args[1].IsImmediate()) { u32 op_arg = args[1].GetImmediateU32(); code->xor_(result, op_arg); } else { OpArg op_arg = ctx.reg_alloc.UseOpArg(args[1]); op_arg.setBit(32); code->xor_(result, *op_arg); } ctx.reg_alloc.DefineValue(inst, result); } template void EmitX64::EmitOr(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Reg32 result = ctx.reg_alloc.UseScratchGpr(args[0]).cvt32(); if (args[1].IsImmediate()) { u32 op_arg = args[1].GetImmediateU32(); code->or_(result, op_arg); } else { OpArg op_arg = ctx.reg_alloc.UseOpArg(args[1]); op_arg.setBit(32); code->or_(result, *op_arg); } ctx.reg_alloc.DefineValue(inst, result); } template void EmitX64::EmitNot(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Reg32 result; if (args[0].IsImmediate()) { result = ctx.reg_alloc.ScratchGpr().cvt32(); code->mov(result, u32(~args[0].GetImmediateU32())); } else { result = ctx.reg_alloc.UseScratchGpr(args[0]).cvt32(); code->not_(result); } ctx.reg_alloc.DefineValue(inst, result); } template void EmitX64::EmitSignExtendWordToLong(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Reg64 result = ctx.reg_alloc.UseScratchGpr(args[0]); code->movsxd(result.cvt64(), result.cvt32()); ctx.reg_alloc.DefineValue(inst, result); } template void EmitX64::EmitSignExtendHalfToWord(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Reg64 result = ctx.reg_alloc.UseScratchGpr(args[0]); code->movsx(result.cvt32(), result.cvt16()); ctx.reg_alloc.DefineValue(inst, result); } template void EmitX64::EmitSignExtendByteToWord(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Reg64 result = ctx.reg_alloc.UseScratchGpr(args[0]); code->movsx(result.cvt32(), result.cvt8()); ctx.reg_alloc.DefineValue(inst, result); } template void EmitX64::EmitZeroExtendWordToLong(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Reg64 result = ctx.reg_alloc.UseScratchGpr(args[0]); code->mov(result.cvt32(), result.cvt32()); // x64 zeros upper 32 bits on a 32-bit move ctx.reg_alloc.DefineValue(inst, result); } template void EmitX64::EmitZeroExtendHalfToWord(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Reg64 result = ctx.reg_alloc.UseScratchGpr(args[0]); code->movzx(result.cvt32(), result.cvt16()); ctx.reg_alloc.DefineValue(inst, result); } template void EmitX64::EmitZeroExtendByteToWord(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Reg64 result = ctx.reg_alloc.UseScratchGpr(args[0]); code->movzx(result.cvt32(), result.cvt8()); ctx.reg_alloc.DefineValue(inst, result); } template void EmitX64::EmitByteReverseWord(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Reg32 result = ctx.reg_alloc.UseScratchGpr(args[0]).cvt32(); code->bswap(result); ctx.reg_alloc.DefineValue(inst, result); } template void EmitX64::EmitByteReverseHalf(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Reg16 result = ctx.reg_alloc.UseScratchGpr(args[0]).cvt16(); code->rol(result, 8); ctx.reg_alloc.DefineValue(inst, result); } template void EmitX64::EmitByteReverseDual(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Reg64 result = ctx.reg_alloc.UseScratchGpr(args[0]); code->bswap(result); ctx.reg_alloc.DefineValue(inst, result); } template void EmitX64::EmitCountLeadingZeros(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); if (code->DoesCpuSupport(Xbyak::util::Cpu::tLZCNT)) { Xbyak::Reg32 source = ctx.reg_alloc.UseGpr(args[0]).cvt32(); Xbyak::Reg32 result = ctx.reg_alloc.ScratchGpr().cvt32(); code->lzcnt(result, source); ctx.reg_alloc.DefineValue(inst, result); } else { Xbyak::Reg32 source = ctx.reg_alloc.UseScratchGpr(args[0]).cvt32(); Xbyak::Reg32 result = ctx.reg_alloc.ScratchGpr().cvt32(); // The result of a bsr of zero is undefined, but zf is set after it. code->bsr(result, source); code->mov(source, 0xFFFFFFFF); code->cmovz(result, source); code->neg(result); code->add(result, 31); ctx.reg_alloc.DefineValue(inst, result); } } template void EmitX64::EmitSignedSaturatedAdd(EmitContext& ctx, IR::Inst* inst) { auto overflow_inst = inst->GetAssociatedPseudoOperation(IR::Opcode::GetOverflowFromOp); auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Reg32 result = ctx.reg_alloc.UseScratchGpr(args[0]).cvt32(); Xbyak::Reg32 addend = ctx.reg_alloc.UseGpr(args[1]).cvt32(); Xbyak::Reg32 overflow = ctx.reg_alloc.ScratchGpr().cvt32(); code->mov(overflow, result); code->shr(overflow, 31); code->add(overflow, 0x7FFFFFFF); // overflow now contains 0x7FFFFFFF if a was positive, or 0x80000000 if a was negative code->add(result, addend); code->cmovo(result, overflow); if (overflow_inst) { ctx.EraseInstruction(overflow_inst); code->seto(overflow.cvt8()); ctx.reg_alloc.DefineValue(overflow_inst, overflow); } ctx.reg_alloc.DefineValue(inst, result); } template void EmitX64::EmitSignedSaturatedSub(EmitContext& ctx, IR::Inst* inst) { auto overflow_inst = inst->GetAssociatedPseudoOperation(IR::Opcode::GetOverflowFromOp); auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Reg32 result = ctx.reg_alloc.UseScratchGpr(args[0]).cvt32(); Xbyak::Reg32 subend = ctx.reg_alloc.UseGpr(args[1]).cvt32(); Xbyak::Reg32 overflow = ctx.reg_alloc.ScratchGpr().cvt32(); code->mov(overflow, result); code->shr(overflow, 31); code->add(overflow, 0x7FFFFFFF); // overflow now contains 0x7FFFFFFF if a was positive, or 0x80000000 if a was negative code->sub(result, subend); code->cmovo(result, overflow); if (overflow_inst) { ctx.EraseInstruction(overflow_inst); code->seto(overflow.cvt8()); ctx.reg_alloc.DefineValue(overflow_inst, overflow); } ctx.reg_alloc.DefineValue(inst, result); } template void EmitX64::EmitUnsignedSaturation(EmitContext& ctx, IR::Inst* inst) { auto overflow_inst = inst->GetAssociatedPseudoOperation(IR::Opcode::GetOverflowFromOp); auto args = ctx.reg_alloc.GetArgumentInfo(inst); size_t N = args[1].GetImmediateU8(); ASSERT(N <= 31); u32 saturated_value = (1u << N) - 1; Xbyak::Reg32 result = ctx.reg_alloc.ScratchGpr().cvt32(); Xbyak::Reg32 reg_a = ctx.reg_alloc.UseGpr(args[0]).cvt32(); Xbyak::Reg32 overflow = ctx.reg_alloc.ScratchGpr().cvt32(); // Pseudocode: result = clamp(reg_a, 0, saturated_value); code->xor_(overflow, overflow); code->cmp(reg_a, saturated_value); code->mov(result, saturated_value); code->cmovle(result, overflow); code->cmovbe(result, reg_a); if (overflow_inst) { ctx.EraseInstruction(overflow_inst); code->seta(overflow.cvt8()); ctx.reg_alloc.DefineValue(overflow_inst, overflow); } ctx.reg_alloc.DefineValue(inst, result); } template void EmitX64::EmitSignedSaturation(EmitContext& ctx, IR::Inst* inst) { auto overflow_inst = inst->GetAssociatedPseudoOperation(IR::Opcode::GetOverflowFromOp); auto args = ctx.reg_alloc.GetArgumentInfo(inst); size_t N = args[1].GetImmediateU8(); ASSERT(N >= 1 && N <= 32); if (N == 32) { if (overflow_inst) { auto no_overflow = IR::Value(false); overflow_inst->ReplaceUsesWith(no_overflow); } ctx.reg_alloc.DefineValue(inst, args[0]); return; } u32 mask = (1u << N) - 1; u32 positive_saturated_value = (1u << (N - 1)) - 1; u32 negative_saturated_value = 1u << (N - 1); u32 sext_negative_satured_value = Common::SignExtend(N, negative_saturated_value); Xbyak::Reg32 result = ctx.reg_alloc.ScratchGpr().cvt32(); Xbyak::Reg32 reg_a = ctx.reg_alloc.UseGpr(args[0]).cvt32(); Xbyak::Reg32 overflow = ctx.reg_alloc.ScratchGpr().cvt32(); Xbyak::Reg32 tmp = ctx.reg_alloc.ScratchGpr().cvt32(); // overflow now contains a value between 0 and mask if it was originally between {negative,positive}_saturated_value. code->lea(overflow, code->ptr[reg_a.cvt64() + negative_saturated_value]); // Put the appropriate saturated value in result code->cmp(reg_a, positive_saturated_value); code->mov(tmp, positive_saturated_value); code->mov(result, sext_negative_satured_value); code->cmovg(result, tmp); // Do the saturation code->cmp(overflow, mask); code->cmovbe(result, reg_a); if (overflow_inst) { ctx.EraseInstruction(overflow_inst); code->seta(overflow.cvt8()); ctx.reg_alloc.DefineValue(overflow_inst, overflow); } ctx.reg_alloc.DefineValue(inst, result); } template void EmitX64::EmitPackedAddU8(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); auto ge_inst = inst->GetAssociatedPseudoOperation(IR::Opcode::GetGEFromOp); Xbyak::Xmm xmm_a = ctx.reg_alloc.UseScratchXmm(args[0]); Xbyak::Xmm xmm_b = ctx.reg_alloc.UseXmm(args[1]); code->paddb(xmm_a, xmm_b); if (ge_inst) { ctx.EraseInstruction(ge_inst); Xbyak::Xmm xmm_ge = ctx.reg_alloc.ScratchXmm(); Xbyak::Xmm ones = ctx.reg_alloc.ScratchXmm(); code->pcmpeqb(ones, ones); code->movdqa(xmm_ge, xmm_a); code->pminub(xmm_ge, xmm_b); code->pcmpeqb(xmm_ge, xmm_b); code->pxor(xmm_ge, ones); ctx.reg_alloc.DefineValue(ge_inst, xmm_ge); } ctx.reg_alloc.DefineValue(inst, xmm_a); } template void EmitX64::EmitPackedAddS8(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); auto ge_inst = inst->GetAssociatedPseudoOperation(IR::Opcode::GetGEFromOp); Xbyak::Xmm xmm_a = ctx.reg_alloc.UseScratchXmm(args[0]); Xbyak::Xmm xmm_b = ctx.reg_alloc.UseXmm(args[1]); if (ge_inst) { ctx.EraseInstruction(ge_inst); Xbyak::Xmm saturated_sum = ctx.reg_alloc.ScratchXmm(); Xbyak::Xmm xmm_ge = ctx.reg_alloc.ScratchXmm(); code->pxor(xmm_ge, xmm_ge); code->movdqa(saturated_sum, xmm_a); code->paddsb(saturated_sum, xmm_b); code->pcmpgtb(xmm_ge, saturated_sum); code->pcmpeqb(saturated_sum, saturated_sum); code->pxor(xmm_ge, saturated_sum); ctx.reg_alloc.DefineValue(ge_inst, xmm_ge); } code->paddb(xmm_a, xmm_b); ctx.reg_alloc.DefineValue(inst, xmm_a); } template void EmitX64::EmitPackedAddU16(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); auto ge_inst = inst->GetAssociatedPseudoOperation(IR::Opcode::GetGEFromOp); Xbyak::Xmm xmm_a = ctx.reg_alloc.UseScratchXmm(args[0]); Xbyak::Xmm xmm_b = ctx.reg_alloc.UseXmm(args[1]); code->paddw(xmm_a, xmm_b); if (ge_inst) { ctx.EraseInstruction(ge_inst); if (code->DoesCpuSupport(Xbyak::util::Cpu::tSSE41)) { Xbyak::Xmm xmm_ge = ctx.reg_alloc.ScratchXmm(); Xbyak::Xmm ones = ctx.reg_alloc.ScratchXmm(); code->pcmpeqb(ones, ones); code->movdqa(xmm_ge, xmm_a); code->pminuw(xmm_ge, xmm_b); code->pcmpeqw(xmm_ge, xmm_b); code->pxor(xmm_ge, ones); ctx.reg_alloc.DefineValue(ge_inst, xmm_ge); } else { Xbyak::Xmm tmp_a = ctx.reg_alloc.ScratchXmm(); Xbyak::Xmm tmp_b = ctx.reg_alloc.ScratchXmm(); // !(b <= a+b) == b > a+b code->movdqa(tmp_a, xmm_a); code->movdqa(tmp_b, xmm_b); code->paddw(tmp_a, code->MConst(0x80008000)); code->paddw(tmp_b, code->MConst(0x80008000)); code->pcmpgtw(tmp_b, tmp_a); // *Signed* comparison! ctx.reg_alloc.DefineValue(ge_inst, tmp_b); } } ctx.reg_alloc.DefineValue(inst, xmm_a); } template void EmitX64::EmitPackedAddS16(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); auto ge_inst = inst->GetAssociatedPseudoOperation(IR::Opcode::GetGEFromOp); Xbyak::Xmm xmm_a = ctx.reg_alloc.UseScratchXmm(args[0]); Xbyak::Xmm xmm_b = ctx.reg_alloc.UseXmm(args[1]); if (ge_inst) { ctx.EraseInstruction(ge_inst); Xbyak::Xmm saturated_sum = ctx.reg_alloc.ScratchXmm(); Xbyak::Xmm xmm_ge = ctx.reg_alloc.ScratchXmm(); code->pxor(xmm_ge, xmm_ge); code->movdqa(saturated_sum, xmm_a); code->paddsw(saturated_sum, xmm_b); code->pcmpgtw(xmm_ge, saturated_sum); code->pcmpeqw(saturated_sum, saturated_sum); code->pxor(xmm_ge, saturated_sum); ctx.reg_alloc.DefineValue(ge_inst, xmm_ge); } code->paddw(xmm_a, xmm_b); ctx.reg_alloc.DefineValue(inst, xmm_a); } template void EmitX64::EmitPackedSubU8(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); auto ge_inst = inst->GetAssociatedPseudoOperation(IR::Opcode::GetGEFromOp); Xbyak::Xmm xmm_a = ctx.reg_alloc.UseScratchXmm(args[0]); Xbyak::Xmm xmm_b = ctx.reg_alloc.UseXmm(args[1]); if (ge_inst) { ctx.EraseInstruction(ge_inst); Xbyak::Xmm xmm_ge = ctx.reg_alloc.ScratchXmm(); code->movdqa(xmm_ge, xmm_a); code->pmaxub(xmm_ge, xmm_b); code->pcmpeqb(xmm_ge, xmm_a); ctx.reg_alloc.DefineValue(ge_inst, xmm_ge); } code->psubb(xmm_a, xmm_b); ctx.reg_alloc.DefineValue(inst, xmm_a); } template void EmitX64::EmitPackedSubS8(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); auto ge_inst = inst->GetAssociatedPseudoOperation(IR::Opcode::GetGEFromOp); Xbyak::Xmm xmm_a = ctx.reg_alloc.UseScratchXmm(args[0]); Xbyak::Xmm xmm_b = ctx.reg_alloc.UseXmm(args[1]); if (ge_inst) { ctx.EraseInstruction(ge_inst); Xbyak::Xmm saturated_sum = ctx.reg_alloc.ScratchXmm(); Xbyak::Xmm xmm_ge = ctx.reg_alloc.ScratchXmm(); code->pxor(xmm_ge, xmm_ge); code->movdqa(saturated_sum, xmm_a); code->psubsb(saturated_sum, xmm_b); code->pcmpgtb(xmm_ge, saturated_sum); code->pcmpeqb(saturated_sum, saturated_sum); code->pxor(xmm_ge, saturated_sum); ctx.reg_alloc.DefineValue(ge_inst, xmm_ge); } code->psubb(xmm_a, xmm_b); ctx.reg_alloc.DefineValue(inst, xmm_a); } template void EmitX64::EmitPackedSubU16(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); auto ge_inst = inst->GetAssociatedPseudoOperation(IR::Opcode::GetGEFromOp); Xbyak::Xmm xmm_a = ctx.reg_alloc.UseScratchXmm(args[0]); Xbyak::Xmm xmm_b = ctx.reg_alloc.UseXmm(args[1]); if (ge_inst) { ctx.EraseInstruction(ge_inst); if (code->DoesCpuSupport(Xbyak::util::Cpu::tSSE41)) { Xbyak::Xmm xmm_ge = ctx.reg_alloc.ScratchXmm(); code->movdqa(xmm_ge, xmm_a); code->pmaxuw(xmm_ge, xmm_b); // Requires SSE 4.1 code->pcmpeqw(xmm_ge, xmm_a); ctx.reg_alloc.DefineValue(ge_inst, xmm_ge); } else { Xbyak::Xmm xmm_ge = ctx.reg_alloc.ScratchXmm(); Xbyak::Xmm ones = ctx.reg_alloc.ScratchXmm(); // (a >= b) == !(b > a) code->pcmpeqb(ones, ones); code->paddw(xmm_a, code->MConst(0x80008000)); code->paddw(xmm_b, code->MConst(0x80008000)); code->movdqa(xmm_ge, xmm_b); code->pcmpgtw(xmm_ge, xmm_a); // *Signed* comparison! code->pxor(xmm_ge, ones); ctx.reg_alloc.DefineValue(ge_inst, xmm_ge); } } code->psubw(xmm_a, xmm_b); ctx.reg_alloc.DefineValue(inst, xmm_a); } template void EmitX64::EmitPackedSubS16(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); auto ge_inst = inst->GetAssociatedPseudoOperation(IR::Opcode::GetGEFromOp); Xbyak::Xmm xmm_a = ctx.reg_alloc.UseScratchXmm(args[0]); Xbyak::Xmm xmm_b = ctx.reg_alloc.UseXmm(args[1]); if (ge_inst) { ctx.EraseInstruction(ge_inst); Xbyak::Xmm saturated_diff = ctx.reg_alloc.ScratchXmm(); Xbyak::Xmm xmm_ge = ctx.reg_alloc.ScratchXmm(); code->pxor(xmm_ge, xmm_ge); code->movdqa(saturated_diff, xmm_a); code->psubsw(saturated_diff, xmm_b); code->pcmpgtw(xmm_ge, saturated_diff); code->pcmpeqw(saturated_diff, saturated_diff); code->pxor(xmm_ge, saturated_diff); ctx.reg_alloc.DefineValue(ge_inst, xmm_ge); } code->psubw(xmm_a, xmm_b); ctx.reg_alloc.DefineValue(inst, xmm_a); } template void EmitX64::EmitPackedHalvingAddU8(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); if (args[0].IsInXmm() || args[1].IsInXmm()) { Xbyak::Xmm xmm_a = ctx.reg_alloc.UseScratchXmm(args[0]); Xbyak::Xmm xmm_b = ctx.reg_alloc.UseScratchXmm(args[1]); Xbyak::Xmm ones = ctx.reg_alloc.ScratchXmm(); // Since, // pavg(a, b) == (a + b + 1) >> 1 // Therefore, // ~pavg(~a, ~b) == (a + b) >> 1 code->pcmpeqb(ones, ones); code->pxor(xmm_a, ones); code->pxor(xmm_b, ones); code->pavgb(xmm_a, xmm_b); code->pxor(xmm_a, ones); ctx.reg_alloc.DefineValue(inst, xmm_a); } else { Xbyak::Reg32 reg_a = ctx.reg_alloc.UseScratchGpr(args[0]).cvt32(); Xbyak::Reg32 reg_b = ctx.reg_alloc.UseGpr(args[1]).cvt32(); Xbyak::Reg32 xor_a_b = ctx.reg_alloc.ScratchGpr().cvt32(); Xbyak::Reg32 and_a_b = reg_a; Xbyak::Reg32 result = reg_a; // This relies on the equality x+y == ((x&y) << 1) + (x^y). // Note that x^y always contains the LSB of the result. // Since we want to calculate (x+y)/2, we can instead calculate (x&y) + ((x^y)>>1). // We mask by 0x7F to remove the LSB so that it doesn't leak into the field below. code->mov(xor_a_b, reg_a); code->and_(and_a_b, reg_b); code->xor_(xor_a_b, reg_b); code->shr(xor_a_b, 1); code->and_(xor_a_b, 0x7F7F7F7F); code->add(result, xor_a_b); ctx.reg_alloc.DefineValue(inst, result); } } template void EmitX64::EmitPackedHalvingAddU16(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); if (args[0].IsInXmm() || args[1].IsInXmm()) { Xbyak::Xmm xmm_a = ctx.reg_alloc.UseScratchXmm(args[0]); Xbyak::Xmm xmm_b = ctx.reg_alloc.UseXmm(args[1]); Xbyak::Xmm tmp = ctx.reg_alloc.ScratchXmm(); code->movdqa(tmp, xmm_a); code->pand(xmm_a, xmm_b); code->pxor(tmp, xmm_b); code->psrlw(tmp, 1); code->paddw(xmm_a, tmp); ctx.reg_alloc.DefineValue(inst, xmm_a); } else { Xbyak::Reg32 reg_a = ctx.reg_alloc.UseScratchGpr(args[0]).cvt32(); Xbyak::Reg32 reg_b = ctx.reg_alloc.UseGpr(args[1]).cvt32(); Xbyak::Reg32 xor_a_b = ctx.reg_alloc.ScratchGpr().cvt32(); Xbyak::Reg32 and_a_b = reg_a; Xbyak::Reg32 result = reg_a; // This relies on the equality x+y == ((x&y) << 1) + (x^y). // Note that x^y always contains the LSB of the result. // Since we want to calculate (x+y)/2, we can instead calculate (x&y) + ((x^y)>>1). // We mask by 0x7FFF to remove the LSB so that it doesn't leak into the field below. code->mov(xor_a_b, reg_a); code->and_(and_a_b, reg_b); code->xor_(xor_a_b, reg_b); code->shr(xor_a_b, 1); code->and_(xor_a_b, 0x7FFF7FFF); code->add(result, xor_a_b); ctx.reg_alloc.DefineValue(inst, result); } } template void EmitX64::EmitPackedHalvingAddS8(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Reg32 reg_a = ctx.reg_alloc.UseScratchGpr(args[0]).cvt32(); Xbyak::Reg32 reg_b = ctx.reg_alloc.UseGpr(args[1]).cvt32(); Xbyak::Reg32 xor_a_b = ctx.reg_alloc.ScratchGpr().cvt32(); Xbyak::Reg32 and_a_b = reg_a; Xbyak::Reg32 result = reg_a; Xbyak::Reg32 carry = ctx.reg_alloc.ScratchGpr().cvt32(); // This relies on the equality x+y == ((x&y) << 1) + (x^y). // Note that x^y always contains the LSB of the result. // Since we want to calculate (x+y)/2, we can instead calculate (x&y) + ((x^y)>>1). // We mask by 0x7F to remove the LSB so that it doesn't leak into the field below. // carry propagates the sign bit from (x^y)>>1 upwards by one. code->mov(xor_a_b, reg_a); code->and_(and_a_b, reg_b); code->xor_(xor_a_b, reg_b); code->mov(carry, xor_a_b); code->and_(carry, 0x80808080); code->shr(xor_a_b, 1); code->and_(xor_a_b, 0x7F7F7F7F); code->add(result, xor_a_b); code->xor_(result, carry); ctx.reg_alloc.DefineValue(inst, result); } template void EmitX64::EmitPackedHalvingAddS16(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Xmm xmm_a = ctx.reg_alloc.UseScratchXmm(args[0]); Xbyak::Xmm xmm_b = ctx.reg_alloc.UseXmm(args[1]); Xbyak::Xmm tmp = ctx.reg_alloc.ScratchXmm(); // This relies on the equality x+y == ((x&y) << 1) + (x^y). // Note that x^y always contains the LSB of the result. // Since we want to calculate (x+y)/2, we can instead calculate (x&y) + ((x^y)>>>1). // The arithmetic shift right makes this signed. code->movdqa(tmp, xmm_a); code->pand(xmm_a, xmm_b); code->pxor(tmp, xmm_b); code->psraw(tmp, 1); code->paddw(xmm_a, tmp); ctx.reg_alloc.DefineValue(inst, xmm_a); } template void EmitX64::EmitPackedHalvingSubU8(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Reg32 minuend = ctx.reg_alloc.UseScratchGpr(args[0]).cvt32(); Xbyak::Reg32 subtrahend = ctx.reg_alloc.UseScratchGpr(args[1]).cvt32(); // This relies on the equality x-y == (x^y) - (((x^y)&y) << 1). // Note that x^y always contains the LSB of the result. // Since we want to calculate (x+y)/2, we can instead calculate ((x^y)>>1) - ((x^y)&y). code->xor_(minuend, subtrahend); code->and_(subtrahend, minuend); code->shr(minuend, 1); // At this point, // minuend := (a^b) >> 1 // subtrahend := (a^b) & b // We must now perform a partitioned subtraction. // We can do this because minuend contains 7 bit fields. // We use the extra bit in minuend as a bit to borrow from; we set this bit. // We invert this bit at the end as this tells us if that bit was borrowed from. code->or_(minuend, 0x80808080); code->sub(minuend, subtrahend); code->xor_(minuend, 0x80808080); // minuend now contains the desired result. ctx.reg_alloc.DefineValue(inst, minuend); } template void EmitX64::EmitPackedHalvingSubS8(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Reg32 minuend = ctx.reg_alloc.UseScratchGpr(args[0]).cvt32(); Xbyak::Reg32 subtrahend = ctx.reg_alloc.UseScratchGpr(args[1]).cvt32(); Xbyak::Reg32 carry = ctx.reg_alloc.ScratchGpr().cvt32(); // This relies on the equality x-y == (x^y) - (((x^y)&y) << 1). // Note that x^y always contains the LSB of the result. // Since we want to calculate (x-y)/2, we can instead calculate ((x^y)>>1) - ((x^y)&y). code->xor_(minuend, subtrahend); code->and_(subtrahend, minuend); code->mov(carry, minuend); code->and_(carry, 0x80808080); code->shr(minuend, 1); // At this point, // minuend := (a^b) >> 1 // subtrahend := (a^b) & b // carry := (a^b) & 0x80808080 // We must now perform a partitioned subtraction. // We can do this because minuend contains 7 bit fields. // We use the extra bit in minuend as a bit to borrow from; we set this bit. // We invert this bit at the end as this tells us if that bit was borrowed from. // We then sign extend the result into this bit. code->or_(minuend, 0x80808080); code->sub(minuend, subtrahend); code->xor_(minuend, 0x80808080); code->xor_(minuend, carry); ctx.reg_alloc.DefineValue(inst, minuend); } template void EmitX64::EmitPackedHalvingSubU16(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Xmm minuend = ctx.reg_alloc.UseScratchXmm(args[0]); Xbyak::Xmm subtrahend = ctx.reg_alloc.UseScratchXmm(args[1]); // This relies on the equality x-y == (x^y) - (((x^y)&y) << 1). // Note that x^y always contains the LSB of the result. // Since we want to calculate (x-y)/2, we can instead calculate ((x^y)>>1) - ((x^y)&y). code->pxor(minuend, subtrahend); code->pand(subtrahend, minuend); code->psrlw(minuend, 1); // At this point, // minuend := (a^b) >> 1 // subtrahend := (a^b) & b code->psubw(minuend, subtrahend); ctx.reg_alloc.DefineValue(inst, minuend); } template void EmitX64::EmitPackedHalvingSubS16(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Xmm minuend = ctx.reg_alloc.UseScratchXmm(args[0]); Xbyak::Xmm subtrahend = ctx.reg_alloc.UseScratchXmm(args[1]); // This relies on the equality x-y == (x^y) - (((x^y)&y) << 1). // Note that x^y always contains the LSB of the result. // Since we want to calculate (x-y)/2, we can instead calculate ((x^y)>>>1) - ((x^y)&y). code->pxor(minuend, subtrahend); code->pand(subtrahend, minuend); code->psraw(minuend, 1); // At this point, // minuend := (a^b) >>> 1 // subtrahend := (a^b) & b code->psubw(minuend, subtrahend); ctx.reg_alloc.DefineValue(inst, minuend); } void EmitPackedSubAdd(BlockOfCode* code, EmitContext& ctx, IR::Inst* inst, bool hi_is_sum, bool is_signed, bool is_halving) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); auto ge_inst = inst->GetAssociatedPseudoOperation(IR::Opcode::GetGEFromOp); Xbyak::Reg32 reg_a_hi = ctx.reg_alloc.UseScratchGpr(args[0]).cvt32(); Xbyak::Reg32 reg_b_hi = ctx.reg_alloc.UseScratchGpr(args[1]).cvt32(); Xbyak::Reg32 reg_a_lo = ctx.reg_alloc.ScratchGpr().cvt32(); Xbyak::Reg32 reg_b_lo = ctx.reg_alloc.ScratchGpr().cvt32(); Xbyak::Reg32 reg_sum, reg_diff; if (is_signed) { code->movsx(reg_a_lo, reg_a_hi.cvt16()); code->movsx(reg_b_lo, reg_b_hi.cvt16()); code->sar(reg_a_hi, 16); code->sar(reg_b_hi, 16); } else { code->movzx(reg_a_lo, reg_a_hi.cvt16()); code->movzx(reg_b_lo, reg_b_hi.cvt16()); code->shr(reg_a_hi, 16); code->shr(reg_b_hi, 16); } if (hi_is_sum) { code->sub(reg_a_lo, reg_b_hi); code->add(reg_a_hi, reg_b_lo); reg_diff = reg_a_lo; reg_sum = reg_a_hi; } else { code->add(reg_a_lo, reg_b_hi); code->sub(reg_a_hi, reg_b_lo); reg_diff = reg_a_hi; reg_sum = reg_a_lo; } if (ge_inst) { ctx.EraseInstruction(ge_inst); // The reg_b registers are no longer required. Xbyak::Reg32 ge_sum = reg_b_hi; Xbyak::Reg32 ge_diff = reg_b_lo; code->mov(ge_sum, reg_sum); code->mov(ge_diff, reg_diff); if (!is_signed) { code->shl(ge_sum, 15); code->sar(ge_sum, 31); } else { code->not_(ge_sum); code->sar(ge_sum, 31); } code->not_(ge_diff); code->sar(ge_diff, 31); code->and_(ge_sum, hi_is_sum ? 0xFFFF0000 : 0x0000FFFF); code->and_(ge_diff, hi_is_sum ? 0x0000FFFF : 0xFFFF0000); code->or_(ge_sum, ge_diff); ctx.reg_alloc.DefineValue(ge_inst, ge_sum); } if (is_halving) { code->shl(reg_a_lo, 15); code->shr(reg_a_hi, 1); } else { code->shl(reg_a_lo, 16); } // reg_a_lo now contains the low word and reg_a_hi now contains the high word. // Merge them. code->shld(reg_a_hi, reg_a_lo, 16); ctx.reg_alloc.DefineValue(inst, reg_a_hi); } template void EmitX64::EmitPackedAddSubU16(EmitContext& ctx, IR::Inst* inst) { EmitPackedSubAdd(code, ctx, inst, true, false, false); } template void EmitX64::EmitPackedAddSubS16(EmitContext& ctx, IR::Inst* inst) { EmitPackedSubAdd(code, ctx, inst, true, true, false); } template void EmitX64::EmitPackedSubAddU16(EmitContext& ctx, IR::Inst* inst) { EmitPackedSubAdd(code, ctx, inst, false, false, false); } template void EmitX64::EmitPackedSubAddS16(EmitContext& ctx, IR::Inst* inst) { EmitPackedSubAdd(code, ctx, inst, false, true, false); } template void EmitX64::EmitPackedHalvingAddSubU16(EmitContext& ctx, IR::Inst* inst) { EmitPackedSubAdd(code, ctx, inst, true, false, true); } template void EmitX64::EmitPackedHalvingAddSubS16(EmitContext& ctx, IR::Inst* inst) { EmitPackedSubAdd(code, ctx, inst, true, true, true); } template void EmitX64::EmitPackedHalvingSubAddU16(EmitContext& ctx, IR::Inst* inst) { EmitPackedSubAdd(code, ctx, inst, false, false, true); } template void EmitX64::EmitPackedHalvingSubAddS16(EmitContext& ctx, IR::Inst* inst) { EmitPackedSubAdd(code, ctx, inst, false, true, true); } static void EmitPackedOperation(BlockOfCode* code, EmitContext& ctx, IR::Inst* inst, void (Xbyak::CodeGenerator::*fn)(const Xbyak::Mmx& mmx, const Xbyak::Operand&)) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Xmm xmm_a = ctx.reg_alloc.UseScratchXmm(args[0]); Xbyak::Xmm xmm_b = ctx.reg_alloc.UseXmm(args[1]); (code->*fn)(xmm_a, xmm_b); ctx.reg_alloc.DefineValue(inst, xmm_a); } template void EmitX64::EmitPackedSaturatedAddU8(EmitContext& ctx, IR::Inst* inst) { EmitPackedOperation(code, ctx, inst, &Xbyak::CodeGenerator::paddusb); } template void EmitX64::EmitPackedSaturatedAddS8(EmitContext& ctx, IR::Inst* inst) { EmitPackedOperation(code, ctx, inst, &Xbyak::CodeGenerator::paddsb); } template void EmitX64::EmitPackedSaturatedSubU8(EmitContext& ctx, IR::Inst* inst) { EmitPackedOperation(code, ctx, inst, &Xbyak::CodeGenerator::psubusb); } template void EmitX64::EmitPackedSaturatedSubS8(EmitContext& ctx, IR::Inst* inst) { EmitPackedOperation(code, ctx, inst, &Xbyak::CodeGenerator::psubsb); } template void EmitX64::EmitPackedSaturatedAddU16(EmitContext& ctx, IR::Inst* inst) { EmitPackedOperation(code, ctx, inst, &Xbyak::CodeGenerator::paddusw); } template void EmitX64::EmitPackedSaturatedAddS16(EmitContext& ctx, IR::Inst* inst) { EmitPackedOperation(code, ctx, inst, &Xbyak::CodeGenerator::paddsw); } template void EmitX64::EmitPackedSaturatedSubU16(EmitContext& ctx, IR::Inst* inst) { EmitPackedOperation(code, ctx, inst, &Xbyak::CodeGenerator::psubusw); } template void EmitX64::EmitPackedSaturatedSubS16(EmitContext& ctx, IR::Inst* inst) { EmitPackedOperation(code, ctx, inst, &Xbyak::CodeGenerator::psubsw); } template void EmitX64::EmitPackedAbsDiffSumS8(EmitContext& ctx, IR::Inst* inst) { EmitPackedOperation(code, ctx, inst, &Xbyak::CodeGenerator::psadbw); } template void EmitX64::EmitPackedSelect(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); size_t num_args_in_xmm = args[0].IsInXmm() + args[1].IsInXmm() + args[2].IsInXmm(); if (num_args_in_xmm >= 2) { Xbyak::Xmm ge = ctx.reg_alloc.UseScratchXmm(args[0]); Xbyak::Xmm to = ctx.reg_alloc.UseXmm(args[1]); Xbyak::Xmm from = ctx.reg_alloc.UseScratchXmm(args[2]); code->pand(from, ge); code->pandn(ge, to); code->por(from, ge); ctx.reg_alloc.DefineValue(inst, from); } else if (code->DoesCpuSupport(Xbyak::util::Cpu::tBMI1)) { Xbyak::Reg32 ge = ctx.reg_alloc.UseGpr(args[0]).cvt32(); Xbyak::Reg32 to = ctx.reg_alloc.UseScratchGpr(args[1]).cvt32(); Xbyak::Reg32 from = ctx.reg_alloc.UseScratchGpr(args[2]).cvt32(); code->and_(from, ge); code->andn(to, ge, to); code->or_(from, to); ctx.reg_alloc.DefineValue(inst, from); } else { Xbyak::Reg32 ge = ctx.reg_alloc.UseScratchGpr(args[0]).cvt32(); Xbyak::Reg32 to = ctx.reg_alloc.UseGpr(args[1]).cvt32(); Xbyak::Reg32 from = ctx.reg_alloc.UseScratchGpr(args[2]).cvt32(); code->and_(from, ge); code->not_(ge); code->and_(ge, to); code->or_(from, ge); ctx.reg_alloc.DefineValue(inst, from); } } template static void DenormalsAreZero32(BlockOfCode* code, Xbyak::Xmm xmm_value, Xbyak::Reg32 gpr_scratch) { Xbyak::Label end; // We need to report back whether we've found a denormal on input. // SSE doesn't do this for us when SSE's DAZ is enabled. code->movd(gpr_scratch, xmm_value); code->and_(gpr_scratch, u32(0x7FFFFFFF)); code->sub(gpr_scratch, u32(1)); code->cmp(gpr_scratch, u32(0x007FFFFE)); code->ja(end); code->pxor(xmm_value, xmm_value); code->mov(dword[r15 + offsetof(JST, FPSCR_IDC)], u32(1 << 7)); code->L(end); } template static void DenormalsAreZero64(BlockOfCode* code, Xbyak::Xmm xmm_value, Xbyak::Reg64 gpr_scratch) { Xbyak::Label end; auto mask = code->MConst(f64_non_sign_mask); mask.setBit(64); auto penult_denormal = code->MConst(f64_penultimate_positive_denormal); penult_denormal.setBit(64); code->movq(gpr_scratch, xmm_value); code->and_(gpr_scratch, mask); code->sub(gpr_scratch, u32(1)); code->cmp(gpr_scratch, penult_denormal); code->ja(end); code->pxor(xmm_value, xmm_value); code->mov(dword[r15 + offsetof(JST, FPSCR_IDC)], u32(1 << 7)); code->L(end); } template static void FlushToZero32(BlockOfCode* code, Xbyak::Xmm xmm_value, Xbyak::Reg32 gpr_scratch) { Xbyak::Label end; code->movd(gpr_scratch, xmm_value); code->and_(gpr_scratch, u32(0x7FFFFFFF)); code->sub(gpr_scratch, u32(1)); code->cmp(gpr_scratch, u32(0x007FFFFE)); code->ja(end); code->pxor(xmm_value, xmm_value); code->mov(dword[r15 + offsetof(JST, FPSCR_UFC)], u32(1 << 3)); code->L(end); } template static void FlushToZero64(BlockOfCode* code, Xbyak::Xmm xmm_value, Xbyak::Reg64 gpr_scratch) { Xbyak::Label end; auto mask = code->MConst(f64_non_sign_mask); mask.setBit(64); auto penult_denormal = code->MConst(f64_penultimate_positive_denormal); penult_denormal.setBit(64); code->movq(gpr_scratch, xmm_value); code->and_(gpr_scratch, mask); code->sub(gpr_scratch, u32(1)); code->cmp(gpr_scratch, penult_denormal); code->ja(end); code->pxor(xmm_value, xmm_value); code->mov(dword[r15 + offsetof(JST, FPSCR_UFC)], u32(1 << 3)); code->L(end); } static void DefaultNaN32(BlockOfCode* code, Xbyak::Xmm xmm_value) { Xbyak::Label end; code->ucomiss(xmm_value, xmm_value); code->jnp(end); code->movaps(xmm_value, code->MConst(f32_nan)); code->L(end); } static void DefaultNaN64(BlockOfCode* code, Xbyak::Xmm xmm_value) { Xbyak::Label end; code->ucomisd(xmm_value, xmm_value); code->jnp(end); code->movaps(xmm_value, code->MConst(f64_nan)); code->L(end); } static void ZeroIfNaN64(BlockOfCode* code, Xbyak::Xmm xmm_value, Xbyak::Xmm xmm_scratch) { code->pxor(xmm_scratch, xmm_scratch); code->cmpordsd(xmm_scratch, xmm_value); // true mask when ordered (i.e.: when not an NaN) code->pand(xmm_value, xmm_scratch); } template static void FPThreeOp32(BlockOfCode* code, EmitContext& ctx, IR::Inst* inst, void (Xbyak::CodeGenerator::*fn)(const Xbyak::Xmm&, const Xbyak::Operand&)) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Xmm result = ctx.reg_alloc.UseScratchXmm(args[0]); Xbyak::Xmm operand = ctx.reg_alloc.UseScratchXmm(args[1]); Xbyak::Reg32 gpr_scratch = ctx.reg_alloc.ScratchGpr().cvt32(); if (ctx.FPSCR_FTZ()) { DenormalsAreZero32(code, result, gpr_scratch); DenormalsAreZero32(code, operand, gpr_scratch); } (code->*fn)(result, operand); if (ctx.FPSCR_FTZ()) { FlushToZero32(code, result, gpr_scratch); } if (ctx.FPSCR_DN()) { DefaultNaN32(code, result); } ctx.reg_alloc.DefineValue(inst, result); } template static void FPThreeOp64(BlockOfCode* code, EmitContext& ctx, IR::Inst* inst, void (Xbyak::CodeGenerator::*fn)(const Xbyak::Xmm&, const Xbyak::Operand&)) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Xmm result = ctx.reg_alloc.UseScratchXmm(args[0]); Xbyak::Xmm operand = ctx.reg_alloc.UseScratchXmm(args[1]); Xbyak::Reg64 gpr_scratch = ctx.reg_alloc.ScratchGpr(); if (ctx.FPSCR_FTZ()) { DenormalsAreZero64(code, result, gpr_scratch); DenormalsAreZero64(code, operand, gpr_scratch); } (code->*fn)(result, operand); if (ctx.FPSCR_FTZ()) { FlushToZero64(code, result, gpr_scratch); } if (ctx.FPSCR_DN()) { DefaultNaN64(code, result); } ctx.reg_alloc.DefineValue(inst, result); } template static void FPTwoOp32(BlockOfCode* code, EmitContext& ctx, IR::Inst* inst, void (Xbyak::CodeGenerator::*fn)(const Xbyak::Xmm&, const Xbyak::Operand&)) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Xmm result = ctx.reg_alloc.UseScratchXmm(args[0]); Xbyak::Reg32 gpr_scratch = ctx.reg_alloc.ScratchGpr().cvt32(); if (ctx.FPSCR_FTZ()) { DenormalsAreZero32(code, result, gpr_scratch); } (code->*fn)(result, result); if (ctx.FPSCR_FTZ()) { FlushToZero32(code, result, gpr_scratch); } if (ctx.FPSCR_DN()) { DefaultNaN32(code, result); } ctx.reg_alloc.DefineValue(inst, result); } template static void FPTwoOp64(BlockOfCode* code, EmitContext& ctx, IR::Inst* inst, void (Xbyak::CodeGenerator::*fn)(const Xbyak::Xmm&, const Xbyak::Operand&)) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Xmm result = ctx.reg_alloc.UseScratchXmm(args[0]); Xbyak::Reg64 gpr_scratch = ctx.reg_alloc.ScratchGpr(); if (ctx.FPSCR_FTZ()) { DenormalsAreZero64(code, result, gpr_scratch); } (code->*fn)(result, result); if (ctx.FPSCR_FTZ()) { FlushToZero64(code, result, gpr_scratch); } if (ctx.FPSCR_DN()) { DefaultNaN64(code, result); } ctx.reg_alloc.DefineValue(inst, result); } template void EmitX64::EmitTransferFromFP32(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); ctx.reg_alloc.DefineValue(inst, args[0]); } template void EmitX64::EmitTransferFromFP64(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); ctx.reg_alloc.DefineValue(inst, args[0]); } template void EmitX64::EmitTransferToFP32(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); if (args[0].IsImmediate() && args[0].GetImmediateU32() == 0) { Xbyak::Xmm result = ctx.reg_alloc.ScratchXmm(); code->xorps(result, result); ctx.reg_alloc.DefineValue(inst, result); } else { ctx.reg_alloc.DefineValue(inst, args[0]); } } template void EmitX64::EmitTransferToFP64(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); if (args[0].IsImmediate() && args[0].GetImmediateU64() == 0) { Xbyak::Xmm result = ctx.reg_alloc.ScratchXmm(); code->xorps(result, result); ctx.reg_alloc.DefineValue(inst, result); } else { ctx.reg_alloc.DefineValue(inst, args[0]); } } template void EmitX64::EmitFPAbs32(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Xmm result = ctx.reg_alloc.UseScratchXmm(args[0]); code->pand(result, code->MConst(f32_non_sign_mask)); ctx.reg_alloc.DefineValue(inst, result); } template void EmitX64::EmitFPAbs64(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Xmm result = ctx.reg_alloc.UseScratchXmm(args[0]); code->pand(result, code->MConst(f64_non_sign_mask)); ctx.reg_alloc.DefineValue(inst, result); } template void EmitX64::EmitFPNeg32(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Xmm result = ctx.reg_alloc.UseScratchXmm(args[0]); code->pxor(result, code->MConst(f32_negative_zero)); ctx.reg_alloc.DefineValue(inst, result); } template void EmitX64::EmitFPNeg64(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Xmm result = ctx.reg_alloc.UseScratchXmm(args[0]); code->pxor(result, code->MConst(f64_negative_zero)); ctx.reg_alloc.DefineValue(inst, result); } template void EmitX64::EmitFPAdd32(EmitContext& ctx, IR::Inst* inst) { FPThreeOp32(code, ctx, inst, &Xbyak::CodeGenerator::addss); } template void EmitX64::EmitFPAdd64(EmitContext& ctx, IR::Inst* inst) { FPThreeOp64(code, ctx, inst, &Xbyak::CodeGenerator::addsd); } template void EmitX64::EmitFPDiv32(EmitContext& ctx, IR::Inst* inst) { FPThreeOp32(code, ctx, inst, &Xbyak::CodeGenerator::divss); } template void EmitX64::EmitFPDiv64(EmitContext& ctx, IR::Inst* inst) { FPThreeOp64(code, ctx, inst, &Xbyak::CodeGenerator::divsd); } template void EmitX64::EmitFPMul32(EmitContext& ctx, IR::Inst* inst) { FPThreeOp32(code, ctx, inst, &Xbyak::CodeGenerator::mulss); } template void EmitX64::EmitFPMul64(EmitContext& ctx, IR::Inst* inst) { FPThreeOp64(code, ctx, inst, &Xbyak::CodeGenerator::mulsd); } template void EmitX64::EmitFPSqrt32(EmitContext& ctx, IR::Inst* inst) { FPTwoOp32(code, ctx, inst, &Xbyak::CodeGenerator::sqrtss); } template void EmitX64::EmitFPSqrt64(EmitContext& ctx, IR::Inst* inst) { FPTwoOp64(code, ctx, inst, &Xbyak::CodeGenerator::sqrtsd); } template void EmitX64::EmitFPSub32(EmitContext& ctx, IR::Inst* inst) { FPThreeOp32(code, ctx, inst, &Xbyak::CodeGenerator::subss); } template void EmitX64::EmitFPSub64(EmitContext& ctx, IR::Inst* inst) { FPThreeOp64(code, ctx, inst, &Xbyak::CodeGenerator::subsd); } template static void SetFpscrNzcvFromFlags(BlockOfCode* code, EmitContext& ctx) { ctx.reg_alloc.ScratchGpr({HostLoc::RCX}); // shifting requires use of cl Xbyak::Reg32 nzcv = ctx.reg_alloc.ScratchGpr().cvt32(); code->mov(nzcv, 0x28630000); code->sete(cl); code->rcl(cl, 3); code->shl(nzcv, cl); code->and_(nzcv, 0xF0000000); code->mov(dword[r15 + offsetof(JST, FPSCR_nzcv)], nzcv); } template void EmitX64::EmitFPCompare32(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Xmm reg_a = ctx.reg_alloc.UseXmm(args[0]); Xbyak::Xmm reg_b = ctx.reg_alloc.UseXmm(args[1]); bool exc_on_qnan = args[2].GetImmediateU1(); if (exc_on_qnan) { code->comiss(reg_a, reg_b); } else { code->ucomiss(reg_a, reg_b); } SetFpscrNzcvFromFlags(code, ctx); } template void EmitX64::EmitFPCompare64(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Xmm reg_a = ctx.reg_alloc.UseXmm(args[0]); Xbyak::Xmm reg_b = ctx.reg_alloc.UseXmm(args[1]); bool exc_on_qnan = args[2].GetImmediateU1(); if (exc_on_qnan) { code->comisd(reg_a, reg_b); } else { code->ucomisd(reg_a, reg_b); } SetFpscrNzcvFromFlags(code, ctx); } template void EmitX64::EmitFPSingleToDouble(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Xmm result = ctx.reg_alloc.UseScratchXmm(args[0]); Xbyak::Reg64 gpr_scratch = ctx.reg_alloc.ScratchGpr(); if (ctx.FPSCR_FTZ()) { DenormalsAreZero32(code, result, gpr_scratch.cvt32()); } code->cvtss2sd(result, result); if (ctx.FPSCR_FTZ()) { FlushToZero64(code, result, gpr_scratch); } if (ctx.FPSCR_DN()) { DefaultNaN64(code, result); } ctx.reg_alloc.DefineValue(inst, result); } template void EmitX64::EmitFPDoubleToSingle(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Xmm result = ctx.reg_alloc.UseScratchXmm(args[0]); Xbyak::Reg64 gpr_scratch = ctx.reg_alloc.ScratchGpr(); if (ctx.FPSCR_FTZ()) { DenormalsAreZero64(code, result, gpr_scratch); } code->cvtsd2ss(result, result); if (ctx.FPSCR_FTZ()) { FlushToZero32(code, result, gpr_scratch.cvt32()); } if (ctx.FPSCR_DN()) { DefaultNaN32(code, result); } ctx.reg_alloc.DefineValue(inst, result); } template void EmitX64::EmitFPSingleToS32(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Xmm from = ctx.reg_alloc.UseScratchXmm(args[0]); Xbyak::Reg32 to = ctx.reg_alloc.ScratchGpr().cvt32(); Xbyak::Xmm xmm_scratch = ctx.reg_alloc.ScratchXmm(); bool round_towards_zero = args[1].GetImmediateU1(); // ARM saturates on conversion; this differs from x64 which returns a sentinel value. // Conversion to double is lossless, and allows for clamping. if (ctx.FPSCR_FTZ()) { DenormalsAreZero32(code, from, to); } code->cvtss2sd(from, from); // First time is to set flags if (round_towards_zero) { code->cvttsd2si(to, from); // 32 bit gpr } else { code->cvtsd2si(to, from); // 32 bit gpr } // Clamp to output range ZeroIfNaN64(code, from, xmm_scratch); code->minsd(from, code->MConst(f64_max_s32)); code->maxsd(from, code->MConst(f64_min_s32)); // Second time is for real if (round_towards_zero) { code->cvttsd2si(to, from); // 32 bit gpr } else { code->cvtsd2si(to, from); // 32 bit gpr } ctx.reg_alloc.DefineValue(inst, to); } template void EmitX64::EmitFPSingleToU32(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Xmm from = ctx.reg_alloc.UseScratchXmm(args[0]); Xbyak::Reg32 to = ctx.reg_alloc.ScratchGpr().cvt32(); Xbyak::Xmm xmm_scratch = ctx.reg_alloc.ScratchXmm(); bool round_towards_zero = args[1].GetImmediateU1(); // ARM saturates on conversion; this differs from x64 which returns a sentinel value. // Conversion to double is lossless, and allows for accurate clamping. // // Since SSE2 doesn't provide an unsigned conversion, we shift the range as appropriate. // // FIXME: Inexact exception not correctly signalled with the below code if (!ctx.FPSCR_RoundTowardsZero() && !round_towards_zero) { if (ctx.FPSCR_FTZ()) { DenormalsAreZero32(code, from, to); } code->cvtss2sd(from, from); ZeroIfNaN64(code, from, xmm_scratch); // Bring into SSE range code->addsd(from, code->MConst(f64_min_s32)); // First time is to set flags code->cvtsd2si(to, from); // 32 bit gpr // Clamp to output range code->minsd(from, code->MConst(f64_max_s32)); code->maxsd(from, code->MConst(f64_min_s32)); // Actually convert code->cvtsd2si(to, from); // 32 bit gpr // Bring back into original range code->add(to, u32(2147483648u)); } else { Xbyak::Xmm xmm_mask = ctx.reg_alloc.ScratchXmm(); Xbyak::Reg32 gpr_mask = ctx.reg_alloc.ScratchGpr().cvt32(); if (ctx.FPSCR_FTZ()) { DenormalsAreZero32(code, from, to); } code->cvtss2sd(from, from); ZeroIfNaN64(code, from, xmm_scratch); // Generate masks if out-of-signed-range code->movaps(xmm_mask, code->MConst(f64_max_s32)); code->cmpltsd(xmm_mask, from); code->movd(gpr_mask, xmm_mask); code->pand(xmm_mask, code->MConst(f64_min_s32)); code->and_(gpr_mask, u32(2147483648u)); // Bring into range if necessary code->addsd(from, xmm_mask); // First time is to set flags code->cvttsd2si(to, from); // 32 bit gpr // Clamp to output range code->minsd(from, code->MConst(f64_max_s32)); code->maxsd(from, code->MConst(f64_min_u32)); // Actually convert code->cvttsd2si(to, from); // 32 bit gpr // Bring back into original range if necessary code->add(to, gpr_mask); } ctx.reg_alloc.DefineValue(inst, to); } template void EmitX64::EmitFPDoubleToS32(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Xmm from = ctx.reg_alloc.UseScratchXmm(args[0]); Xbyak::Reg32 to = ctx.reg_alloc.ScratchGpr().cvt32(); Xbyak::Xmm xmm_scratch = ctx.reg_alloc.ScratchXmm(); Xbyak::Reg32 gpr_scratch = ctx.reg_alloc.ScratchGpr().cvt32(); bool round_towards_zero = args[1].GetImmediateU1(); // ARM saturates on conversion; this differs from x64 which returns a sentinel value. if (ctx.FPSCR_FTZ()) { DenormalsAreZero64(code, from, gpr_scratch.cvt64()); } // First time is to set flags if (round_towards_zero) { code->cvttsd2si(gpr_scratch, from); // 32 bit gpr } else { code->cvtsd2si(gpr_scratch, from); // 32 bit gpr } // Clamp to output range ZeroIfNaN64(code, from, xmm_scratch); code->minsd(from, code->MConst(f64_max_s32)); code->maxsd(from, code->MConst(f64_min_s32)); // Second time is for real if (round_towards_zero) { code->cvttsd2si(to, from); // 32 bit gpr } else { code->cvtsd2si(to, from); // 32 bit gpr } ctx.reg_alloc.DefineValue(inst, to); } template void EmitX64::EmitFPDoubleToU32(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Xmm from = ctx.reg_alloc.UseScratchXmm(args[0]); Xbyak::Reg32 to = ctx.reg_alloc.ScratchGpr().cvt32(); Xbyak::Xmm xmm_scratch = ctx.reg_alloc.ScratchXmm(); Xbyak::Reg32 gpr_scratch = ctx.reg_alloc.ScratchGpr().cvt32(); bool round_towards_zero = args[1].GetImmediateU1(); // ARM saturates on conversion; this differs from x64 which returns a sentinel value. // TODO: Use VCVTPD2UDQ when AVX512VL is available. // FIXME: Inexact exception not correctly signalled with the below code if (!ctx.FPSCR_RoundTowardsZero() && !round_towards_zero) { if (ctx.FPSCR_FTZ()) { DenormalsAreZero64(code, from, gpr_scratch.cvt64()); } ZeroIfNaN64(code, from, xmm_scratch); // Bring into SSE range code->addsd(from, code->MConst(f64_min_s32)); // First time is to set flags code->cvtsd2si(gpr_scratch, from); // 32 bit gpr // Clamp to output range code->minsd(from, code->MConst(f64_max_s32)); code->maxsd(from, code->MConst(f64_min_s32)); // Actually convert code->cvtsd2si(to, from); // 32 bit gpr // Bring back into original range code->add(to, u32(2147483648u)); } else { Xbyak::Xmm xmm_mask = ctx.reg_alloc.ScratchXmm(); Xbyak::Reg32 gpr_mask = ctx.reg_alloc.ScratchGpr().cvt32(); if (ctx.FPSCR_FTZ()) { DenormalsAreZero64(code, from, gpr_scratch.cvt64()); } ZeroIfNaN64(code, from, xmm_scratch); // Generate masks if out-of-signed-range code->movaps(xmm_mask, code->MConst(f64_max_s32)); code->cmpltsd(xmm_mask, from); code->movd(gpr_mask, xmm_mask); code->pand(xmm_mask, code->MConst(f64_min_s32)); code->and_(gpr_mask, u32(2147483648u)); // Bring into range if necessary code->addsd(from, xmm_mask); // First time is to set flags code->cvttsd2si(gpr_scratch, from); // 32 bit gpr // Clamp to output range code->minsd(from, code->MConst(f64_max_s32)); code->maxsd(from, code->MConst(f64_min_u32)); // Actually convert code->cvttsd2si(to, from); // 32 bit gpr // Bring back into original range if necessary code->add(to, gpr_mask); } ctx.reg_alloc.DefineValue(inst, to); } template void EmitX64::EmitFPS32ToSingle(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Reg32 from = ctx.reg_alloc.UseGpr(args[0]).cvt32(); Xbyak::Xmm to = ctx.reg_alloc.ScratchXmm(); bool round_to_nearest = args[1].GetImmediateU1(); ASSERT_MSG(!round_to_nearest, "round_to_nearest unimplemented"); code->cvtsi2ss(to, from); ctx.reg_alloc.DefineValue(inst, to); } template void EmitX64::EmitFPU32ToSingle(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Reg64 from = ctx.reg_alloc.UseGpr(args[0]); Xbyak::Xmm to = ctx.reg_alloc.ScratchXmm(); bool round_to_nearest = args[1].GetImmediateU1(); ASSERT_MSG(!round_to_nearest, "round_to_nearest unimplemented"); // We are using a 64-bit GPR register to ensure we don't end up treating the input as signed code->mov(from.cvt32(), from.cvt32()); // TODO: Verify if this is necessary code->cvtsi2ss(to, from); ctx.reg_alloc.DefineValue(inst, to); } template void EmitX64::EmitFPS32ToDouble(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Reg32 from = ctx.reg_alloc.UseGpr(args[0]).cvt32(); Xbyak::Xmm to = ctx.reg_alloc.ScratchXmm(); bool round_to_nearest = args[1].GetImmediateU1(); ASSERT_MSG(!round_to_nearest, "round_to_nearest unimplemented"); code->cvtsi2sd(to, from); ctx.reg_alloc.DefineValue(inst, to); } template void EmitX64::EmitFPU32ToDouble(EmitContext& ctx, IR::Inst* inst) { auto args = ctx.reg_alloc.GetArgumentInfo(inst); Xbyak::Reg64 from = ctx.reg_alloc.UseGpr(args[0]); Xbyak::Xmm to = ctx.reg_alloc.ScratchXmm(); bool round_to_nearest = args[1].GetImmediateU1(); ASSERT_MSG(!round_to_nearest, "round_to_nearest unimplemented"); // We are using a 64-bit GPR register to ensure we don't end up treating the input as signed code->mov(from.cvt32(), from.cvt32()); // TODO: Verify if this is necessary code->cvtsi2sd(to, from); ctx.reg_alloc.DefineValue(inst, to); } template void EmitX64::EmitAddCycles(size_t cycles) { ASSERT(cycles < std::numeric_limits::max()); code->sub(qword[r15 + offsetof(JST, cycles_remaining)], static_cast(cycles)); } template Xbyak::Label EmitX64::EmitCond(IR::Cond cond) { Xbyak::Label label; const Xbyak::Reg32 cpsr = eax; code->mov(cpsr, dword[r15 + offsetof(JST, CPSR_nzcv)]); constexpr size_t n_shift = 31; constexpr size_t z_shift = 30; constexpr size_t c_shift = 29; constexpr size_t v_shift = 28; constexpr u32 n_mask = 1u << n_shift; constexpr u32 z_mask = 1u << z_shift; constexpr u32 c_mask = 1u << c_shift; constexpr u32 v_mask = 1u << v_shift; switch (cond) { case IR::Cond::EQ: //z code->test(cpsr, z_mask); code->jnz(label); break; case IR::Cond::NE: //!z code->test(cpsr, z_mask); code->jz(label); break; case IR::Cond::CS: //c code->test(cpsr, c_mask); code->jnz(label); break; case IR::Cond::CC: //!c code->test(cpsr, c_mask); code->jz(label); break; case IR::Cond::MI: //n code->test(cpsr, n_mask); code->jnz(label); break; case IR::Cond::PL: //!n code->test(cpsr, n_mask); code->jz(label); break; case IR::Cond::VS: //v code->test(cpsr, v_mask); code->jnz(label); break; case IR::Cond::VC: //!v code->test(cpsr, v_mask); code->jz(label); break; case IR::Cond::HI: { //c & !z code->and_(cpsr, z_mask | c_mask); code->cmp(cpsr, c_mask); code->je(label); break; } case IR::Cond::LS: { //!c | z code->and_(cpsr, z_mask | c_mask); code->cmp(cpsr, c_mask); code->jne(label); break; } case IR::Cond::GE: { // n == v code->and_(cpsr, n_mask | v_mask); code->jz(label); code->cmp(cpsr, n_mask | v_mask); code->je(label); break; } case IR::Cond::LT: { // n != v Xbyak::Label fail; code->and_(cpsr, n_mask | v_mask); code->jz(fail); code->cmp(cpsr, n_mask | v_mask); code->jne(label); code->L(fail); break; } case IR::Cond::GT: { // !z & (n == v) const Xbyak::Reg32 tmp1 = ebx; const Xbyak::Reg32 tmp2 = esi; code->mov(tmp1, cpsr); code->mov(tmp2, cpsr); code->shr(tmp1, n_shift); code->shr(tmp2, v_shift); code->shr(cpsr, z_shift); code->xor_(tmp1, tmp2); code->or_(tmp1, cpsr); code->test(tmp1, 1); code->jz(label); break; } case IR::Cond::LE: { // z | (n != v) const Xbyak::Reg32 tmp1 = ebx; const Xbyak::Reg32 tmp2 = esi; code->mov(tmp1, cpsr); code->mov(tmp2, cpsr); code->shr(tmp1, n_shift); code->shr(tmp2, v_shift); code->shr(cpsr, z_shift); code->xor_(tmp1, tmp2); code->or_(tmp1, cpsr); code->test(tmp1, 1); code->jnz(label); break; } default: ASSERT_MSG(false, "Unknown cond %zu", static_cast(cond)); break; } return label; } template void EmitX64::EmitCondPrelude(const IR::Block& block) { if (block.GetCondition() == IR::Cond::AL) { ASSERT(!block.HasConditionFailedLocation()); return; } ASSERT(block.HasConditionFailedLocation()); Xbyak::Label pass = EmitCond(block.GetCondition()); EmitAddCycles(block.ConditionFailedCycleCount()); EmitTerminal(IR::Term::LinkBlock{block.ConditionFailedLocation()}, block.Location()); code->L(pass); } template void EmitX64::EmitTerminal(IR::Terminal terminal, IR::LocationDescriptor initial_location) { Common::VisitVariant(terminal, [this, &initial_location](auto x) { using T = std::decay_t; if constexpr (!std::is_same_v) { this->EmitTerminalImpl(x, initial_location); } else { ASSERT_MSG(false, "Invalid terminal"); } }); } template void EmitX64::Patch(const IR::LocationDescriptor& desc, CodePtr bb) { const CodePtr save_code_ptr = code->getCurr(); const PatchInformation& patch_info = patch_information[desc]; for (CodePtr location : patch_info.jg) { code->SetCodePtr(location); EmitPatchJg(desc, bb); } for (CodePtr location : patch_info.jmp) { code->SetCodePtr(location); EmitPatchJmp(desc, bb); } for (CodePtr location : patch_info.mov_rcx) { code->SetCodePtr(location); EmitPatchMovRcx(bb); } code->SetCodePtr(save_code_ptr); } template void EmitX64::Unpatch(const IR::LocationDescriptor& desc) { Patch(desc, nullptr); } template void EmitX64::ClearCache() { block_descriptors.clear(); patch_information.clear(); } template void EmitX64::InvalidateCacheRanges(const boost::icl::interval_set& ranges) { // Remove cached block descriptors and patch information overlapping with the given range. for (auto invalidate_interval : ranges) { auto pair = block_ranges.equal_range(invalidate_interval); for (auto it = pair.first; it != pair.second; ++it) { for (const auto& descriptor : it->second) { if (patch_information.count(descriptor)) { Unpatch(descriptor); } block_descriptors.erase(descriptor); } } block_ranges.erase(pair.first, pair.second); } } } // namespace BackendX64 } // namespace Dynarmic #include "backend_x64/a32_jitstate.h" #include "backend_x64/a64_jitstate.h" template class Dynarmic::BackendX64::EmitX64; template class Dynarmic::BackendX64::EmitX64;