Method EmitNativeCall

source/common/scripting/jit/jit_call.cpp:330–590

}

void JitCompiler::EmitNativeCall(VMNativeFunction *target)
{
	using namespace asmjit;

	if (pc > sfunc->Code && (pc - 1)->op == OP_VTBL)
	{
		I_Error("Native direct member function calls not implemented\n");
	}

	if (target->ImplicitArgs > 0)
	{
		auto label = EmitThrowExceptionLabel(X_READ_NIL);

		assert(ParamOpcodes.Size() > 0);
		const VMOP *param = ParamOpcodes[0];
		const int bc = param->i16u;
		asmjit::X86Gp *reg = nullptr;

		switch (param->a & REGT_TYPE)
		{
		case REGT_STRING:  reg = &regS[bc]; break;
		case REGT_POINTER: reg = &regA[bc]; break;
		default:
			I_Error("Unexpected register type for self pointer\n");
			break;
		}

		cc.test(*reg, *reg);
		cc.jz(label);
	}

	asmjit::CBNode *cursorBefore = cc.getCursor();
	auto call = cc.call(imm_ptr(target->DirectNativeCall), CreateFuncSignature());
	call->setInlineComment(target->PrintableName);
	asmjit::CBNode *cursorAfter = cc.getCursor();
	cc.setCursor(cursorBefore);

	X86Gp tmp;
	X86Xmm tmp2;

	int numparams = 0;
	for (unsigned int i = 0; i < ParamOpcodes.Size(); i++)
	{
		int slot = numparams++;

		if (ParamOpcodes[i]->op == OP_PARAMI)
		{
			int abcs = ParamOpcodes[i]->i24;
			call->setArg(slot, imm(abcs));
		}
		else // OP_PARAM
		{
			int bc = ParamOpcodes[i]->i16u;
			switch (ParamOpcodes[i]->a)
			{
			case REGT_NIL:
				call->setArg(slot, imm(0));
				break;