#include "config.h"
#include "JIT.h"
#if ENABLE(JIT)
#include "CodeBlock.h"
#include "JITInlineMethods.h"
#include "JSArray.h"
#include "JSFunction.h"
#include "Interpreter.h"
#include "ResultType.h"
#include "SamplingTool.h"
#ifndef NDEBUG
#include <stdio.h>
#endif
#define __ m_assembler.
using namespace std;
namespace JSC {
void JIT::compileFastArith_op_lshift(unsigned result, unsigned op1, unsigned op2)
{
emitGetVirtualRegisters(op1, X86::eax, op2, X86::ecx);
emitJumpSlowCaseIfNotImmediateInteger(X86::eax);
emitJumpSlowCaseIfNotImmediateInteger(X86::ecx);
emitFastArithImmToInt(X86::eax);
emitFastArithImmToInt(X86::ecx);
#if !PLATFORM(X86)
and32(Imm32(0x1f), X86::ecx);
#endif
lshift32(X86::ecx, X86::eax);
#if !USE(ALTERNATE_JSIMMEDIATE)
addSlowCase(joAdd32(X86::eax, X86::eax));
signExtend32ToPtr(X86::eax, X86::eax);
#endif
emitFastArithReTagImmediate(X86::eax, X86::eax);
emitPutVirtualRegister(result);
}
void JIT::compileFastArithSlow_op_lshift(unsigned result, unsigned op1, unsigned op2, Vector<SlowCaseEntry>::iterator& iter)
{
#if USE(ALTERNATE_JSIMMEDIATE)
UNUSED_PARAM(op1);
UNUSED_PARAM(op2);
linkSlowCase(iter);
linkSlowCase(iter);
#else
Jump notImm1 = getSlowCase(iter);
Jump notImm2 = getSlowCase(iter);
linkSlowCase(iter);
emitGetVirtualRegisters(op1, X86::eax, op2, X86::ecx);
notImm1.link(this);
notImm2.link(this);
#endif
emitPutJITStubArg(X86::eax, 1);
emitPutJITStubArg(X86::ecx, 2);
emitCTICall(Interpreter::cti_op_lshift);
emitPutVirtualRegister(result);
}
void JIT::compileFastArith_op_rshift(unsigned result, unsigned op1, unsigned op2)
{
if (isOperandConstantImmediateInt(op2)) {
emitGetVirtualRegister(op1, X86::eax);
emitJumpSlowCaseIfNotImmediateInteger(X86::eax);
#if USE(ALTERNATE_JSIMMEDIATE)
rshift32(Imm32(getConstantOperandImmediateInt(op2) & 0x1f), X86::eax);
#else
rshiftPtr(Imm32(getConstantOperandImmediateInt(op2) & 0x1f), X86::eax);
#endif
} else {
emitGetVirtualRegisters(op1, X86::eax, op2, X86::ecx);
emitJumpSlowCaseIfNotImmediateInteger(X86::eax);
emitJumpSlowCaseIfNotImmediateInteger(X86::ecx);
emitFastArithImmToInt(X86::ecx);
#if !PLATFORM(X86)
and32(Imm32(0x1f), X86::ecx);
#endif
#if USE(ALTERNATE_JSIMMEDIATE)
rshift32(X86::ecx, X86::eax);
#else
rshiftPtr(X86::ecx, X86::eax);
#endif
}
#if USE(ALTERNATE_JSIMMEDIATE)
emitFastArithIntToImmNoCheck(X86::eax, X86::eax);
#else
orPtr(Imm32(JSImmediate::TagTypeNumber), X86::eax);
#endif
emitPutVirtualRegister(result);
}
void JIT::compileFastArithSlow_op_rshift(unsigned result, unsigned, unsigned op2, Vector<SlowCaseEntry>::iterator& iter)
{
linkSlowCase(iter);
if (isOperandConstantImmediateInt(op2))
emitPutJITStubArgFromVirtualRegister(op2, 2, X86::ecx);
else {
linkSlowCase(iter);
emitPutJITStubArg(X86::ecx, 2);
}
emitPutJITStubArg(X86::eax, 1);
emitCTICall(Interpreter::cti_op_rshift);
emitPutVirtualRegister(result);
}
void JIT::compileFastArith_op_bitand(unsigned result, unsigned op1, unsigned op2)
{
if (isOperandConstantImmediateInt(op1)) {
emitGetVirtualRegister(op2, X86::eax);
emitJumpSlowCaseIfNotImmediateInteger(X86::eax);
#if USE(ALTERNATE_JSIMMEDIATE)
int32_t imm = getConstantOperandImmediateInt(op1);
andPtr(Imm32(imm), X86::eax);
if (imm >= 0)
emitFastArithIntToImmNoCheck(X86::eax, X86::eax);
#else
andPtr(Imm32(static_cast<int32_t>(JSImmediate::rawValue(getConstantOperand(op1)))), X86::eax);
#endif
} else if (isOperandConstantImmediateInt(op2)) {
emitGetVirtualRegister(op1, X86::eax);
emitJumpSlowCaseIfNotImmediateInteger(X86::eax);
#if USE(ALTERNATE_JSIMMEDIATE)
int32_t imm = getConstantOperandImmediateInt(op2);
andPtr(Imm32(imm), X86::eax);
if (imm >= 0)
emitFastArithIntToImmNoCheck(X86::eax, X86::eax);
#else
andPtr(Imm32(static_cast<int32_t>(JSImmediate::rawValue(getConstantOperand(op2)))), X86::eax);
#endif
} else {
emitGetVirtualRegisters(op1, X86::eax, op2, X86::edx);
andPtr(X86::edx, X86::eax);
emitJumpSlowCaseIfNotImmediateInteger(X86::eax);
}
emitPutVirtualRegister(result);
}
void JIT::compileFastArithSlow_op_bitand(unsigned result, unsigned op1, unsigned op2, Vector<SlowCaseEntry>::iterator& iter)
{
linkSlowCase(iter);
if (isOperandConstantImmediateInt(op1)) {
emitPutJITStubArgFromVirtualRegister(op1, 1, X86::ecx);
emitPutJITStubArg(X86::eax, 2);
} else if (isOperandConstantImmediateInt(op2)) {
emitPutJITStubArg(X86::eax, 1);
emitPutJITStubArgFromVirtualRegister(op2, 2, X86::ecx);
} else {
emitPutJITStubArgFromVirtualRegister(op1, 1, X86::ecx);
emitPutJITStubArg(X86::edx, 2);
}
emitCTICall(Interpreter::cti_op_bitand);
emitPutVirtualRegister(result);
}
void JIT::compileFastArith_op_mod(unsigned result, unsigned op1, unsigned op2)
{
emitGetVirtualRegisters(op1, X86::eax, op2, X86::ecx);
emitJumpSlowCaseIfNotImmediateInteger(X86::eax);
emitJumpSlowCaseIfNotImmediateInteger(X86::ecx);
#if USE(ALTERNATE_JSIMMEDIATE)
addSlowCase(jePtr(X86::ecx, ImmPtr(JSValuePtr::encode(js0()))));
mod32(X86::ecx, X86::eax, X86::edx);
#else
emitFastArithDeTagImmediate(X86::eax);
addSlowCase(emitFastArithDeTagImmediateJumpIfZero(X86::ecx));
mod32(X86::ecx, X86::eax, X86::edx);
signExtend32ToPtr(X86::edx, X86::edx);
#endif
emitFastArithReTagImmediate(X86::edx, X86::eax);
emitPutVirtualRegister(result);
}
void JIT::compileFastArithSlow_op_mod(unsigned result, unsigned, unsigned, Vector<SlowCaseEntry>::iterator& iter)
{
#if USE(ALTERNATE_JSIMMEDIATE)
linkSlowCase(iter);
linkSlowCase(iter);
linkSlowCase(iter);
#else
Jump notImm1 = getSlowCase(iter);
Jump notImm2 = getSlowCase(iter);
linkSlowCase(iter);
emitFastArithReTagImmediate(X86::eax, X86::eax);
emitFastArithReTagImmediate(X86::ecx, X86::ecx);
notImm1.link(this);
notImm2.link(this);
#endif
emitPutJITStubArg(X86::eax, 1);
emitPutJITStubArg(X86::ecx, 2);
emitCTICall(Interpreter::cti_op_mod);
emitPutVirtualRegister(result);
}
void JIT::compileFastArith_op_post_inc(unsigned result, unsigned srcDst)
{
emitGetVirtualRegister(srcDst, X86::eax);
move(X86::eax, X86::edx);
emitJumpSlowCaseIfNotImmediateInteger(X86::eax);
#if USE(ALTERNATE_JSIMMEDIATE)
addSlowCase(joAdd32(Imm32(1), X86::edx));
emitFastArithIntToImmNoCheck(X86::edx, X86::edx);
#else
addSlowCase(joAdd32(Imm32(1 << JSImmediate::IntegerPayloadShift), X86::edx));
signExtend32ToPtr(X86::edx, X86::edx);
#endif
emitPutVirtualRegister(srcDst, X86::edx);
emitPutVirtualRegister(result);
}
void JIT::compileFastArithSlow_op_post_inc(unsigned result, unsigned srcDst, Vector<SlowCaseEntry>::iterator& iter)
{
linkSlowCase(iter);
linkSlowCase(iter);
emitPutJITStubArg(X86::eax, 1);
emitCTICall(Interpreter::cti_op_post_inc);
emitPutVirtualRegister(srcDst, X86::edx);
emitPutVirtualRegister(result);
}
void JIT::compileFastArith_op_post_dec(unsigned result, unsigned srcDst)
{
emitGetVirtualRegister(srcDst, X86::eax);
move(X86::eax, X86::edx);
emitJumpSlowCaseIfNotImmediateInteger(X86::eax);
#if USE(ALTERNATE_JSIMMEDIATE)
addSlowCase(joSub32(Imm32(1), X86::edx));
emitFastArithIntToImmNoCheck(X86::edx, X86::edx);
#else
addSlowCase(joSub32(Imm32(1 << JSImmediate::IntegerPayloadShift), X86::edx));
signExtend32ToPtr(X86::edx, X86::edx);
#endif
emitPutVirtualRegister(srcDst, X86::edx);
emitPutVirtualRegister(result);
}
void JIT::compileFastArithSlow_op_post_dec(unsigned result, unsigned srcDst, Vector<SlowCaseEntry>::iterator& iter)
{
linkSlowCase(iter);
linkSlowCase(iter);
emitPutJITStubArg(X86::eax, 1);
emitCTICall(Interpreter::cti_op_post_dec);
emitPutVirtualRegister(srcDst, X86::edx);
emitPutVirtualRegister(result);
}
void JIT::compileFastArith_op_pre_inc(unsigned srcDst)
{
emitGetVirtualRegister(srcDst, X86::eax);
emitJumpSlowCaseIfNotImmediateInteger(X86::eax);
#if USE(ALTERNATE_JSIMMEDIATE)
addSlowCase(joAdd32(Imm32(1), X86::eax));
emitFastArithIntToImmNoCheck(X86::eax, X86::eax);
#else
addSlowCase(joAdd32(Imm32(1 << JSImmediate::IntegerPayloadShift), X86::eax));
signExtend32ToPtr(X86::eax, X86::eax);
#endif
emitPutVirtualRegister(srcDst);
}
void JIT::compileFastArithSlow_op_pre_inc(unsigned srcDst, Vector<SlowCaseEntry>::iterator& iter)
{
Jump notImm = getSlowCase(iter);
linkSlowCase(iter);
emitGetVirtualRegister(srcDst, X86::eax);
notImm.link(this);
emitPutJITStubArg(X86::eax, 1);
emitCTICall(Interpreter::cti_op_pre_inc);
emitPutVirtualRegister(srcDst);
}
void JIT::compileFastArith_op_pre_dec(unsigned srcDst)
{
emitGetVirtualRegister(srcDst, X86::eax);
emitJumpSlowCaseIfNotImmediateInteger(X86::eax);
#if USE(ALTERNATE_JSIMMEDIATE)
addSlowCase(joSub32(Imm32(1), X86::eax));
emitFastArithIntToImmNoCheck(X86::eax, X86::eax);
#else
addSlowCase(joSub32(Imm32(1 << JSImmediate::IntegerPayloadShift), X86::eax));
signExtend32ToPtr(X86::eax, X86::eax);
#endif
emitPutVirtualRegister(srcDst);
}
void JIT::compileFastArithSlow_op_pre_dec(unsigned srcDst, Vector<SlowCaseEntry>::iterator& iter)
{
Jump notImm = getSlowCase(iter);
linkSlowCase(iter);
emitGetVirtualRegister(srcDst, X86::eax);
notImm.link(this);
emitPutJITStubArg(X86::eax, 1);
emitCTICall(Interpreter::cti_op_pre_dec);
emitPutVirtualRegister(srcDst);
}
#if !ENABLE(JIT_OPTIMIZE_ARITHMETIC)
void JIT::compileFastArith_op_add(Instruction* currentInstruction)
{
unsigned result = currentInstruction[1].u.operand;
unsigned op1 = currentInstruction[2].u.operand;
unsigned op2 = currentInstruction[3].u.operand;
emitPutJITStubArgFromVirtualRegister(op1, 1, X86::ecx);
emitPutJITStubArgFromVirtualRegister(op2, 2, X86::ecx);
emitCTICall(Interpreter::cti_op_add);
emitPutVirtualRegister(result);
}
void JIT::compileFastArithSlow_op_add(Instruction*, Vector<SlowCaseEntry>::iterator&)
{
ASSERT_NOT_REACHED();
}
void JIT::compileFastArith_op_mul(Instruction* currentInstruction)
{
unsigned result = currentInstruction[1].u.operand;
unsigned op1 = currentInstruction[2].u.operand;
unsigned op2 = currentInstruction[3].u.operand;
emitPutJITStubArgFromVirtualRegister(op1, 1, X86::ecx);
emitPutJITStubArgFromVirtualRegister(op2, 2, X86::ecx);
emitCTICall(Interpreter::cti_op_mul);
emitPutVirtualRegister(result);
}
void JIT::compileFastArithSlow_op_mul(Instruction*, Vector<SlowCaseEntry>::iterator&)
{
ASSERT_NOT_REACHED();
}
void JIT::compileFastArith_op_sub(Instruction* currentInstruction)
{
unsigned result = currentInstruction[1].u.operand;
unsigned op1 = currentInstruction[2].u.operand;
unsigned op2 = currentInstruction[3].u.operand;
emitPutJITStubArgFromVirtualRegister(op1, 1, X86::ecx);
emitPutJITStubArgFromVirtualRegister(op2, 2, X86::ecx);
emitCTICall(Interpreter::cti_op_sub);
emitPutVirtualRegister(result);
}
void JIT::compileFastArithSlow_op_sub(Instruction*, Vector<SlowCaseEntry>::iterator&)
{
ASSERT_NOT_REACHED();
}
#elif USE(ALTERNATE_JSIMMEDIATE) // *AND* ENABLE(JIT_OPTIMIZE_ARITHMETIC)
void JIT::compileBinaryArithOp(OpcodeID opcodeID, unsigned, unsigned op1, unsigned op2, OperandTypes)
{
emitGetVirtualRegisters(op1, X86::eax, op2, X86::edx);
emitJumpSlowCaseIfNotImmediateInteger(X86::eax);
emitJumpSlowCaseIfNotImmediateInteger(X86::edx);
if (opcodeID == op_add)
addSlowCase(joAdd32(X86::edx, X86::eax));
else if (opcodeID == op_sub)
addSlowCase(joSub32(X86::edx, X86::eax));
else {
ASSERT(opcodeID == op_mul);
addSlowCase(joMul32(X86::edx, X86::eax));
addSlowCase(jz32(X86::eax));
}
emitFastArithIntToImmNoCheck(X86::eax, X86::eax);
}
void JIT::compileBinaryArithOpSlowCase(OpcodeID opcodeID, Vector<SlowCaseEntry>::iterator& iter, unsigned, unsigned op1, unsigned, OperandTypes types)
{
COMPILE_ASSERT(((JSImmediate::TagTypeNumber + JSImmediate::DoubleEncodeOffset) == 0), TagTypeNumber_PLUS_DoubleEncodeOffset_EQUALS_0);
Jump notImm1 = getSlowCase(iter);
Jump notImm2 = getSlowCase(iter);
linkSlowCase(iter); if (opcodeID == op_mul) linkSlowCase(iter);
emitGetVirtualRegister(op1, X86::eax);
Label stubFunctionCall(this);
emitPutJITStubArg(X86::eax, 1);
emitPutJITStubArg(X86::edx, 2);
if (opcodeID == op_add)
emitCTICall(Interpreter::cti_op_add);
else if (opcodeID == op_sub)
emitCTICall(Interpreter::cti_op_sub);
else {
ASSERT(opcodeID == op_mul);
emitCTICall(Interpreter::cti_op_mul);
}
Jump end = jump();
notImm1.link(this);
if (!types.first().definitelyIsNumber())
emitJumpIfNotImmediateNumber(X86::eax).linkTo(stubFunctionCall, this);
if (!types.second().definitelyIsNumber())
emitJumpIfNotImmediateNumber(X86::edx).linkTo(stubFunctionCall, this);
addPtr(tagTypeNumberRegister, X86::eax);
m_assembler.movq_rr(X86::eax, X86::xmm1);
Jump op2isDouble = emitJumpIfNotImmediateInteger(X86::edx);
m_assembler.cvtsi2sd_rr(X86::edx, X86::xmm2);
Jump op2wasInteger = jump();
notImm2.link(this);
if (!types.second().definitelyIsNumber())
emitJumpIfNotImmediateNumber(X86::edx).linkTo(stubFunctionCall, this);
m_assembler.cvtsi2sd_rr(X86::eax, X86::xmm1);
op2isDouble.link(this);
addPtr(tagTypeNumberRegister, X86::edx);
m_assembler.movq_rr(X86::edx, X86::xmm2);
op2wasInteger.link(this);
if (opcodeID == op_add)
m_assembler.addsd_rr(X86::xmm2, X86::xmm1);
else if (opcodeID == op_sub)
m_assembler.subsd_rr(X86::xmm2, X86::xmm1);
else {
ASSERT(opcodeID == op_mul);
m_assembler.mulsd_rr(X86::xmm2, X86::xmm1);
}
m_assembler.movq_rr(X86::xmm1, X86::eax);
subPtr(tagTypeNumberRegister, X86::eax);
end.link(this);
}
void JIT::compileFastArith_op_add(Instruction* currentInstruction)
{
unsigned result = currentInstruction[1].u.operand;
unsigned op1 = currentInstruction[2].u.operand;
unsigned op2 = currentInstruction[3].u.operand;
OperandTypes types = OperandTypes::fromInt(currentInstruction[4].u.operand);
if (!types.first().mightBeNumber() || !types.second().mightBeNumber()) {
emitPutJITStubArgFromVirtualRegister(op1, 1, X86::ecx);
emitPutJITStubArgFromVirtualRegister(op2, 2, X86::ecx);
emitCTICall(Interpreter::cti_op_add);
emitPutVirtualRegister(result);
return;
}
if (isOperandConstantImmediateInt(op1)) {
emitGetVirtualRegister(op2, X86::eax);
emitJumpSlowCaseIfNotImmediateInteger(X86::eax);
addSlowCase(joAdd32(Imm32(getConstantOperandImmediateInt(op1)), X86::eax));
emitFastArithIntToImmNoCheck(X86::eax, X86::eax);
} else if (isOperandConstantImmediateInt(op2)) {
emitGetVirtualRegister(op1, X86::eax);
emitJumpSlowCaseIfNotImmediateInteger(X86::eax);
addSlowCase(joAdd32(Imm32(getConstantOperandImmediateInt(op2)), X86::eax));
emitFastArithIntToImmNoCheck(X86::eax, X86::eax);
} else
compileBinaryArithOp(op_add, result, op1, op2, types);
emitPutVirtualRegister(result);
}
void JIT::compileFastArithSlow_op_add(Instruction* currentInstruction, Vector<SlowCaseEntry>::iterator& iter)
{
unsigned result = currentInstruction[1].u.operand;
unsigned op1 = currentInstruction[2].u.operand;
unsigned op2 = currentInstruction[3].u.operand;
OperandTypes types = OperandTypes::fromInt(currentInstruction[4].u.operand);
if (isOperandConstantImmediateInt(op1)) {
linkSlowCase(iter);
linkSlowCase(iter);
emitPutJITStubArgFromVirtualRegister(op1, 1, X86::ecx);
emitPutJITStubArgFromVirtualRegister(op2, 2, X86::ecx);
emitCTICall(Interpreter::cti_op_add);
} else if (isOperandConstantImmediateInt(op2)) {
linkSlowCase(iter);
linkSlowCase(iter);
emitPutJITStubArgFromVirtualRegister(op1, 1, X86::ecx);
emitPutJITStubArgFromVirtualRegister(op2, 2, X86::ecx);
emitCTICall(Interpreter::cti_op_add);
} else
compileBinaryArithOpSlowCase(op_add, iter, result, op1, op2, types);
emitPutVirtualRegister(result);
}
void JIT::compileFastArith_op_mul(Instruction* currentInstruction)
{
unsigned result = currentInstruction[1].u.operand;
unsigned op1 = currentInstruction[2].u.operand;
unsigned op2 = currentInstruction[3].u.operand;
OperandTypes types = OperandTypes::fromInt(currentInstruction[4].u.operand);
int32_t value;
if (isOperandConstantImmediateInt(op1) && ((value = getConstantOperandImmediateInt(op1)) > 0)) {
emitGetVirtualRegister(op2, X86::eax);
emitJumpSlowCaseIfNotImmediateInteger(X86::eax);
addSlowCase(joMul32(Imm32(value), X86::eax, X86::eax));
emitFastArithReTagImmediate(X86::eax, X86::eax);
} else if (isOperandConstantImmediateInt(op2) && ((value = getConstantOperandImmediateInt(op2)) > 0)) {
emitGetVirtualRegister(op1, X86::eax);
emitJumpSlowCaseIfNotImmediateInteger(X86::eax);
addSlowCase(joMul32(Imm32(value), X86::eax, X86::eax));
emitFastArithReTagImmediate(X86::eax, X86::eax);
} else
compileBinaryArithOp(op_mul, result, op1, op2, types);
emitPutVirtualRegister(result);
}
void JIT::compileFastArithSlow_op_mul(Instruction* currentInstruction, Vector<SlowCaseEntry>::iterator& iter)
{
unsigned result = currentInstruction[1].u.operand;
unsigned op1 = currentInstruction[2].u.operand;
unsigned op2 = currentInstruction[3].u.operand;
OperandTypes types = OperandTypes::fromInt(currentInstruction[4].u.operand);
if ((isOperandConstantImmediateInt(op1) && (getConstantOperandImmediateInt(op1) > 0))
|| (isOperandConstantImmediateInt(op2) && (getConstantOperandImmediateInt(op2) > 0))) {
linkSlowCase(iter);
linkSlowCase(iter);
emitPutJITStubArgFromVirtualRegister(op1, 1, X86::ecx);
emitPutJITStubArgFromVirtualRegister(op2, 2, X86::ecx);
emitCTICall(Interpreter::cti_op_mul);
} else
compileBinaryArithOpSlowCase(op_mul, iter, result, op1, op2, types);
emitPutVirtualRegister(result);
}
void JIT::compileFastArith_op_sub(Instruction* currentInstruction)
{
unsigned result = currentInstruction[1].u.operand;
unsigned op1 = currentInstruction[2].u.operand;
unsigned op2 = currentInstruction[3].u.operand;
OperandTypes types = OperandTypes::fromInt(currentInstruction[4].u.operand);
compileBinaryArithOp(op_sub, result, op1, op2, types);
emitPutVirtualRegister(result);
}
void JIT::compileFastArithSlow_op_sub(Instruction* currentInstruction, Vector<SlowCaseEntry>::iterator& iter)
{
unsigned result = currentInstruction[1].u.operand;
unsigned op1 = currentInstruction[2].u.operand;
unsigned op2 = currentInstruction[3].u.operand;
OperandTypes types = OperandTypes::fromInt(currentInstruction[4].u.operand);
compileBinaryArithOpSlowCase(op_sub, iter, result, op1, op2, types);
emitPutVirtualRegister(result);
}
#else
typedef X86Assembler::JmpSrc JmpSrc;
typedef X86Assembler::JmpDst JmpDst;
typedef X86Assembler::XMMRegisterID XMMRegisterID;
#if PLATFORM(MAC)
static inline bool isSSE2Present()
{
return true; }
#else
static bool isSSE2Present()
{
static const int SSE2FeatureBit = 1 << 26;
struct SSE2Check {
SSE2Check()
{
int flags;
#if COMPILER(MSVC)
_asm {
mov eax, 1 cpuid;
mov flags, edx;
}
#else
flags = 0;
#endif
present = (flags & SSE2FeatureBit) != 0;
}
bool present;
};
static SSE2Check check;
return check.present;
}
#endif
void JIT::putDoubleResultToJSNumberCellOrJSImmediate(X86::XMMRegisterID xmmSource, X86::RegisterID jsNumberCell, unsigned dst, JmpSrc* wroteJSNumberCell, X86::XMMRegisterID tempXmm, X86::RegisterID tempReg1, X86::RegisterID tempReg2)
{
__ cvttsd2si_rr(xmmSource, tempReg1);
__ addl_rr(tempReg1, tempReg1);
__ sarl_i8r(1, tempReg1);
__ cvtsi2sd_rr(tempReg1, tempXmm);
__ ucomisd_rr(tempXmm, xmmSource);
JmpSrc resultIsImm = __ je();
JmpDst resultLookedLikeImmButActuallyIsnt = __ label();
__ movsd_rm(xmmSource, FIELD_OFFSET(JSNumberCell, m_value), jsNumberCell);
if (jsNumberCell != X86::eax)
__ movl_rr(jsNumberCell, X86::eax);
emitPutVirtualRegister(dst);
*wroteJSNumberCell = __ jmp();
__ link(resultIsImm, __ label());
__ link(__ jp(), resultLookedLikeImmButActuallyIsnt); __ pextrw_irr(3, xmmSource, tempReg2);
__ cmpl_ir(0x8000, tempReg2);
__ link(__ je(), resultLookedLikeImmButActuallyIsnt); emitFastArithIntToImmNoCheck(tempReg1, X86::eax);
emitPutVirtualRegister(dst);
}
void JIT::compileBinaryArithOp(OpcodeID opcodeID, unsigned dst, unsigned src1, unsigned src2, OperandTypes types)
{
Structure* numberStructure = m_globalData->numberStructure.get();
JmpSrc wasJSNumberCell1;
JmpSrc wasJSNumberCell1b;
JmpSrc wasJSNumberCell2;
JmpSrc wasJSNumberCell2b;
emitGetVirtualRegisters(src1, X86::eax, src2, X86::edx);
if (types.second().isReusable() && isSSE2Present()) {
ASSERT(types.second().mightBeNumber());
__ testl_i32r(JSImmediate::TagTypeNumber, X86::edx);
JmpSrc op2imm = __ jne();
if (!types.second().definitelyIsNumber()) {
emitJumpSlowCaseIfNotJSCell(X86::edx, src2);
__ cmpl_im(reinterpret_cast<unsigned>(numberStructure), FIELD_OFFSET(JSCell, m_structure), X86::edx);
addSlowCase(__ jne());
}
__ testl_i32r(JSImmediate::TagTypeNumber, X86::eax);
JmpSrc op1imm = __ jne();
if (!types.first().definitelyIsNumber()) {
emitJumpSlowCaseIfNotJSCell(X86::eax, src1);
__ cmpl_im(reinterpret_cast<unsigned>(numberStructure), FIELD_OFFSET(JSCell, m_structure), X86::eax);
addSlowCase(__ jne());
}
__ movsd_mr(FIELD_OFFSET(JSNumberCell, m_value), X86::eax, X86::xmm0);
JmpSrc loadedDouble = __ jmp();
__ link(op1imm, __ label());
emitFastArithImmToInt(X86::eax);
__ cvtsi2sd_rr(X86::eax, X86::xmm0);
__ link(loadedDouble, __ label());
if (opcodeID == op_add)
__ addsd_mr(FIELD_OFFSET(JSNumberCell, m_value), X86::edx, X86::xmm0);
else if (opcodeID == op_sub)
__ subsd_mr(FIELD_OFFSET(JSNumberCell, m_value), X86::edx, X86::xmm0);
else {
ASSERT(opcodeID == op_mul);
__ mulsd_mr(FIELD_OFFSET(JSNumberCell, m_value), X86::edx, X86::xmm0);
}
putDoubleResultToJSNumberCellOrJSImmediate(X86::xmm0, X86::edx, dst, &wasJSNumberCell2, X86::xmm1, X86::ecx, X86::eax);
wasJSNumberCell2b = __ jmp();
__ link(op2imm, __ label());
emitJumpSlowCaseIfNotImmediateInteger(X86::eax);
} else if (types.first().isReusable() && isSSE2Present()) {
ASSERT(types.first().mightBeNumber());
__ testl_i32r(JSImmediate::TagTypeNumber, X86::eax);
JmpSrc op1imm = __ jne();
if (!types.first().definitelyIsNumber()) {
emitJumpSlowCaseIfNotJSCell(X86::eax, src1);
__ cmpl_im(reinterpret_cast<unsigned>(numberStructure), FIELD_OFFSET(JSCell, m_structure), X86::eax);
addSlowCase(__ jne());
}
__ testl_i32r(JSImmediate::TagTypeNumber, X86::edx);
JmpSrc op2imm = __ jne();
if (!types.second().definitelyIsNumber()) {
emitJumpSlowCaseIfNotJSCell(X86::edx, src2);
__ cmpl_im(reinterpret_cast<unsigned>(numberStructure), FIELD_OFFSET(JSCell, m_structure), X86::edx);
addSlowCase(__ jne());
}
__ movsd_mr(FIELD_OFFSET(JSNumberCell, m_value), X86::edx, X86::xmm1);
JmpSrc loadedDouble = __ jmp();
__ link(op2imm, __ label());
emitFastArithImmToInt(X86::edx);
__ cvtsi2sd_rr(X86::edx, X86::xmm1);
__ link(loadedDouble, __ label());
__ movsd_mr(FIELD_OFFSET(JSNumberCell, m_value), X86::eax, X86::xmm0);
if (opcodeID == op_add)
__ addsd_rr(X86::xmm1, X86::xmm0);
else if (opcodeID == op_sub)
__ subsd_rr(X86::xmm1, X86::xmm0);
else {
ASSERT(opcodeID == op_mul);
__ mulsd_rr(X86::xmm1, X86::xmm0);
}
__ movsd_rm(X86::xmm0, FIELD_OFFSET(JSNumberCell, m_value), X86::eax);
emitPutVirtualRegister(dst);
putDoubleResultToJSNumberCellOrJSImmediate(X86::xmm0, X86::eax, dst, &wasJSNumberCell1, X86::xmm1, X86::ecx, X86::edx);
wasJSNumberCell1b = __ jmp();
__ link(op1imm, __ label());
emitJumpSlowCaseIfNotImmediateInteger(X86::edx);
} else
emitJumpSlowCaseIfNotImmediateIntegers(X86::eax, X86::edx, X86::ecx);
if (opcodeID == op_add) {
emitFastArithDeTagImmediate(X86::eax);
__ addl_rr(X86::edx, X86::eax);
addSlowCase(__ jo());
} else if (opcodeID == op_sub) {
__ subl_rr(X86::edx, X86::eax);
addSlowCase(__ jo());
signExtend32ToPtr(X86::eax, X86::eax);
emitFastArithReTagImmediate(X86::eax, X86::eax);
} else {
ASSERT(opcodeID == op_mul);
emitFastArithImmToInt(X86::edx);
JmpSrc op1Zero = emitFastArithDeTagImmediateJumpIfZero(X86::eax);
__ testl_rr(X86::edx, X86::edx);
JmpSrc op2NonZero = __ jne();
__ link(op1Zero, __ label());
__ movl_rr(X86::eax, X86::ecx);
__ addl_rr(X86::edx, X86::ecx);
addSlowCase(__ js());
__ link(op2NonZero, __ label());
__ imull_rr(X86::edx, X86::eax);
addSlowCase(__ jo());
signExtend32ToPtr(X86::eax, X86::eax);
emitFastArithReTagImmediate(X86::eax, X86::eax);
}
emitPutVirtualRegister(dst);
if (types.second().isReusable() && isSSE2Present()) {
__ link(wasJSNumberCell2, __ label());
__ link(wasJSNumberCell2b, __ label());
}
else if (types.first().isReusable() && isSSE2Present()) {
__ link(wasJSNumberCell1, __ label());
__ link(wasJSNumberCell1b, __ label());
}
}
void JIT::compileBinaryArithOpSlowCase(OpcodeID opcodeID, Vector<SlowCaseEntry>::iterator& iter, unsigned dst, unsigned src1, unsigned src2, OperandTypes types)
{
linkSlowCase(iter);
if (types.second().isReusable() && isSSE2Present()) {
if (!types.first().definitelyIsNumber()) {
linkSlowCaseIfNotJSCell(iter, src1);
linkSlowCase(iter);
}
if (!types.second().definitelyIsNumber()) {
linkSlowCaseIfNotJSCell(iter, src2);
linkSlowCase(iter);
}
} else if (types.first().isReusable() && isSSE2Present()) {
if (!types.first().definitelyIsNumber()) {
linkSlowCaseIfNotJSCell(iter, src1);
linkSlowCase(iter);
}
if (!types.second().definitelyIsNumber()) {
linkSlowCaseIfNotJSCell(iter, src2);
linkSlowCase(iter);
}
}
linkSlowCase(iter);
if (opcodeID == op_mul)
linkSlowCase(iter);
emitPutJITStubArgFromVirtualRegister(src1, 1, X86::ecx);
emitPutJITStubArgFromVirtualRegister(src2, 2, X86::ecx);
if (opcodeID == op_add)
emitCTICall(Interpreter::cti_op_add);
else if (opcodeID == op_sub)
emitCTICall(Interpreter::cti_op_sub);
else {
ASSERT(opcodeID == op_mul);
emitCTICall(Interpreter::cti_op_mul);
}
emitPutVirtualRegister(dst);
}
void JIT::compileFastArith_op_add(Instruction* currentInstruction)
{
unsigned result = currentInstruction[1].u.operand;
unsigned op1 = currentInstruction[2].u.operand;
unsigned op2 = currentInstruction[3].u.operand;
if (isOperandConstantImmediateInt(op1)) {
emitGetVirtualRegister(op2, X86::eax);
emitJumpSlowCaseIfNotImmediateInteger(X86::eax);
addSlowCase(joAdd32(Imm32(getConstantOperandImmediateInt(op1) << JSImmediate::IntegerPayloadShift), X86::eax));
signExtend32ToPtr(X86::eax, X86::eax);
emitPutVirtualRegister(result);
} else if (isOperandConstantImmediateInt(op2)) {
emitGetVirtualRegister(op1, X86::eax);
emitJumpSlowCaseIfNotImmediateInteger(X86::eax);
addSlowCase(joAdd32(Imm32(getConstantOperandImmediateInt(op2) << JSImmediate::IntegerPayloadShift), X86::eax));
signExtend32ToPtr(X86::eax, X86::eax);
emitPutVirtualRegister(result);
} else {
OperandTypes types = OperandTypes::fromInt(currentInstruction[4].u.operand);
if (types.first().mightBeNumber() && types.second().mightBeNumber())
compileBinaryArithOp(op_add, result, op1, op2, OperandTypes::fromInt(currentInstruction[4].u.operand));
else {
emitPutJITStubArgFromVirtualRegister(op1, 1, X86::ecx);
emitPutJITStubArgFromVirtualRegister(op2, 2, X86::ecx);
emitCTICall(Interpreter::cti_op_add);
emitPutVirtualRegister(result);
}
}
}
void JIT::compileFastArithSlow_op_add(Instruction* currentInstruction, Vector<SlowCaseEntry>::iterator& iter)
{
unsigned result = currentInstruction[1].u.operand;
unsigned op1 = currentInstruction[2].u.operand;
unsigned op2 = currentInstruction[3].u.operand;
if (isOperandConstantImmediateInt(op1)) {
Jump notImm = getSlowCase(iter);
linkSlowCase(iter);
sub32(Imm32(getConstantOperandImmediateInt(op1) << JSImmediate::IntegerPayloadShift), X86::eax);
notImm.link(this);
emitPutJITStubArgFromVirtualRegister(op1, 1, X86::ecx);
emitPutJITStubArg(X86::eax, 2);
emitCTICall(Interpreter::cti_op_add);
emitPutVirtualRegister(result);
} else if (isOperandConstantImmediateInt(op2)) {
Jump notImm = getSlowCase(iter);
linkSlowCase(iter);
sub32(Imm32(getConstantOperandImmediateInt(op2) << JSImmediate::IntegerPayloadShift), X86::eax);
notImm.link(this);
emitPutJITStubArg(X86::eax, 1);
emitPutJITStubArgFromVirtualRegister(op2, 2, X86::ecx);
emitCTICall(Interpreter::cti_op_add);
emitPutVirtualRegister(result);
} else {
OperandTypes types = OperandTypes::fromInt(currentInstruction[4].u.operand);
ASSERT(types.first().mightBeNumber() && types.second().mightBeNumber());
compileBinaryArithOpSlowCase(op_add, iter, result, op1, op2, types);
}
}
void JIT::compileFastArith_op_mul(Instruction* currentInstruction)
{
unsigned result = currentInstruction[1].u.operand;
unsigned op1 = currentInstruction[2].u.operand;
unsigned op2 = currentInstruction[3].u.operand;
int32_t value;
if (isOperandConstantImmediateInt(op1) && ((value = getConstantOperandImmediateInt(op1)) > 0)) {
emitGetVirtualRegister(op2, X86::eax);
emitJumpSlowCaseIfNotImmediateInteger(X86::eax);
emitFastArithDeTagImmediate(X86::eax);
addSlowCase(joMul32(Imm32(value), X86::eax, X86::eax));
signExtend32ToPtr(X86::eax, X86::eax);
emitFastArithReTagImmediate(X86::eax, X86::eax);
emitPutVirtualRegister(result);
} else if (isOperandConstantImmediateInt(op2) && ((value = getConstantOperandImmediateInt(op2)) > 0)) {
emitGetVirtualRegister(op1, X86::eax);
emitJumpSlowCaseIfNotImmediateInteger(X86::eax);
emitFastArithDeTagImmediate(X86::eax);
addSlowCase(joMul32(Imm32(value), X86::eax, X86::eax));
signExtend32ToPtr(X86::eax, X86::eax);
emitFastArithReTagImmediate(X86::eax, X86::eax);
emitPutVirtualRegister(result);
} else
compileBinaryArithOp(op_mul, result, op1, op2, OperandTypes::fromInt(currentInstruction[4].u.operand));
}
void JIT::compileFastArithSlow_op_mul(Instruction* currentInstruction, Vector<SlowCaseEntry>::iterator& iter)
{
unsigned result = currentInstruction[1].u.operand;
unsigned op1 = currentInstruction[2].u.operand;
unsigned op2 = currentInstruction[3].u.operand;
if ((isOperandConstantImmediateInt(op1) && (getConstantOperandImmediateInt(op1) > 0))
|| (isOperandConstantImmediateInt(op2) && (getConstantOperandImmediateInt(op2) > 0))) {
linkSlowCase(iter);
linkSlowCase(iter);
emitPutJITStubArgFromVirtualRegister(op1, 1, X86::ecx);
emitPutJITStubArgFromVirtualRegister(op2, 2, X86::ecx);
emitCTICall(Interpreter::cti_op_mul);
emitPutVirtualRegister(result);
} else
compileBinaryArithOpSlowCase(op_mul, iter, result, op1, op2, OperandTypes::fromInt(currentInstruction[4].u.operand));
}
void JIT::compileFastArith_op_sub(Instruction* currentInstruction)
{
compileBinaryArithOp(op_sub, currentInstruction[1].u.operand, currentInstruction[2].u.operand, currentInstruction[3].u.operand, OperandTypes::fromInt(currentInstruction[4].u.operand));
}
void JIT::compileFastArithSlow_op_sub(Instruction* currentInstruction, Vector<SlowCaseEntry>::iterator& iter)
{
compileBinaryArithOpSlowCase(op_sub, iter, currentInstruction[1].u.operand, currentInstruction[2].u.operand, currentInstruction[3].u.operand, OperandTypes::fromInt(currentInstruction[4].u.operand));
}
#endif
}
#endif // ENABLE(JIT)