gecko-dev/toolkit/recordreplay/Assembler.cpp

309 строки
8.2 KiB
C++

/* -*- Mode: C++; tab-width: 8; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
/* vim: set ts=8 sts=2 et sw=2 tw=80: */
/* This Source Code Form is subject to the terms of the Mozilla Public
* License, v. 2.0. If a copy of the MPL was not distributed with this
* file, You can obtain one at http://mozilla.org/MPL/2.0/. */
#include "Assembler.h"
#include "ProcessRecordReplay.h"
#include "udis86/types.h"
#include <sys/mman.h>
namespace mozilla {
namespace recordreplay {
Assembler::Assembler()
: mCursor(nullptr), mCursorEnd(nullptr), mCanAllocateStorage(true) {}
Assembler::Assembler(uint8_t* aStorage, size_t aSize)
: mCursor(aStorage),
mCursorEnd(aStorage + aSize),
mCanAllocateStorage(false) {}
Assembler::~Assembler() {
// Patch each jump to the point where the jump's target was copied, if there
// is one.
for (auto pair : mJumps) {
uint8_t* source = pair.first;
uint8_t* target = pair.second;
for (auto copyPair : mCopiedInstructions) {
if (copyPair.first == target) {
PatchJump(source, copyPair.second);
break;
}
}
}
}
void Assembler::NoteOriginalInstruction(uint8_t* aIp) {
mCopiedInstructions.emplaceBack(aIp, Current());
}
void Assembler::Advance(size_t aSize) {
MOZ_RELEASE_ASSERT(aSize <= MaximumAdvance);
mCursor += aSize;
}
static const size_t JumpBytes = 17;
uint8_t* Assembler::Current() {
// Reallocate the buffer if there is not enough space. We need enough for the
// maximum space used by any of the assembling functions, as well as for a
// following jump for fallthrough to the next allocated space.
if (size_t(mCursorEnd - mCursor) <= MaximumAdvance + JumpBytes) {
MOZ_RELEASE_ASSERT(mCanAllocateStorage);
// Allocate some writable, executable memory.
static const size_t BufferSize = PageSize;
uint8_t* buffer = new uint8_t[PageSize];
UnprotectExecutableMemory(buffer, PageSize);
if (mCursor) {
// Patch a jump for fallthrough from the last allocation.
MOZ_RELEASE_ASSERT(size_t(mCursorEnd - mCursor) >= JumpBytes);
PatchJump(mCursor, buffer);
}
mCursor = buffer;
mCursorEnd = &buffer[BufferSize];
}
return mCursor;
}
static void Push16(uint8_t** aIp, uint16_t aValue) {
(*aIp)[0] = 0x66;
(*aIp)[1] = 0x68;
*reinterpret_cast<uint16_t*>(*aIp + 2) = aValue;
(*aIp) += 4;
}
/* static */
void Assembler::PatchJump(uint8_t* aIp, void* aTarget) {
// Push the target literal onto the stack, 2 bytes at a time. This is
// apparently the best way of getting an arbitrary 8 byte literal onto the
// stack, as 4 byte literals we push will be sign extended to 8 bytes.
size_t ntarget = reinterpret_cast<size_t>(aTarget);
Push16(&aIp, ntarget >> 48);
Push16(&aIp, ntarget >> 32);
Push16(&aIp, ntarget >> 16);
Push16(&aIp, ntarget);
*aIp = 0xC3; // ret
}
void Assembler::Jump(void* aTarget) {
PatchJump(Current(), aTarget);
mJumps.emplaceBack(Current(), (uint8_t*)aTarget);
Advance(JumpBytes);
}
static uint8_t OppositeJump(uint8_t aOpcode) {
// Get the opposite single byte jump opcode for a one or two byte conditional
// jump. Opposite opcodes are adjacent, e.g. 0x7C -> jl and 0x7D -> jge.
if (aOpcode >= 0x80 && aOpcode <= 0x8F) {
aOpcode -= 0x10;
} else {
MOZ_RELEASE_ASSERT(aOpcode >= 0x70 && aOpcode <= 0x7F);
}
return (aOpcode & 1) ? aOpcode - 1 : aOpcode + 1;
}
void Assembler::ConditionalJump(uint8_t aCode, void* aTarget) {
uint8_t* ip = Current();
ip[0] = OppositeJump(aCode);
ip[1] = (uint8_t)JumpBytes;
Advance(2);
Jump(aTarget);
}
void Assembler::CopyInstruction(uint8_t* aIp, size_t aSize) {
MOZ_RELEASE_ASSERT(aSize <= MaximumInstructionLength);
memcpy(Current(), aIp, aSize);
Advance(aSize);
}
void Assembler::PushRax() { NewInstruction(0x50); }
void Assembler::PopRax() { NewInstruction(0x58); }
void Assembler::JumpToRax() { NewInstruction(0xFF, 0xE0); }
void Assembler::CallRax() { NewInstruction(0xFF, 0xD0); }
void Assembler::LoadRax(size_t aWidth) {
switch (aWidth) {
case 1:
NewInstruction(0x8A, 0x00);
break;
case 2:
NewInstruction(0x66, 0x8B, 0x00);
break;
case 4:
NewInstruction(0x8B, 0x00);
break;
case 8:
NewInstruction(0x48, 0x8B, 0x00);
break;
default:
MOZ_CRASH();
}
}
void Assembler::CompareRaxWithTopOfStack() {
NewInstruction(0x48, 0x39, 0x04, 0x24);
}
void Assembler::PushRbx() { NewInstruction(0x53); }
void Assembler::PopRbx() { NewInstruction(0x5B); }
void Assembler::StoreRbxToRax(size_t aWidth) {
switch (aWidth) {
case 1:
NewInstruction(0x88, 0x18);
break;
case 2:
NewInstruction(0x66, 0x89, 0x18);
break;
case 4:
NewInstruction(0x89, 0x18);
break;
case 8:
NewInstruction(0x48, 0x89, 0x18);
break;
default:
MOZ_CRASH();
}
}
void Assembler::CompareValueWithRax(uint8_t aValue, size_t aWidth) {
switch (aWidth) {
case 1:
NewInstruction(0x3C, aValue);
break;
case 2:
NewInstruction(0x66, 0x83, 0xF8, aValue);
break;
case 4:
NewInstruction(0x83, 0xF8, aValue);
break;
case 8:
NewInstruction(0x48, 0x83, 0xF8, aValue);
break;
default:
MOZ_CRASH();
}
}
static const size_t MoveImmediateBytes = 10;
/* static */
void Assembler::PatchMoveImmediateToRax(uint8_t* aIp, void* aValue) {
aIp[0] = 0x40 | (1 << 3);
aIp[1] = 0xB8;
*reinterpret_cast<void**>(aIp + 2) = aValue;
}
void Assembler::MoveImmediateToRax(void* aValue) {
PatchMoveImmediateToRax(Current(), aValue);
Advance(MoveImmediateBytes);
}
void Assembler::MoveRaxToRegister(/*ud_type*/ int aRegister) {
MOZ_RELEASE_ASSERT(aRegister == NormalizeRegister(aRegister));
if (aRegister <= UD_R_RDI) {
NewInstruction(0x48, 0x89, 0xC0 + aRegister - UD_R_RAX);
} else {
NewInstruction(0x49, 0x89, 0xC0 + aRegister - UD_R_R8);
}
}
void Assembler::MoveRegisterToRax(/*ud_type*/ int aRegister) {
MOZ_RELEASE_ASSERT(aRegister == NormalizeRegister(aRegister));
if (aRegister <= UD_R_RDI) {
NewInstruction(0x48, 0x89, 0xC0 + (aRegister - UD_R_RAX) * 8);
} else {
NewInstruction(0x4C, 0x89, 0xC0 + (aRegister - UD_R_R8) * 8);
}
}
void Assembler::ExchangeByteRegisterWithAddressAtRbx(
/*ud_type*/ int aRegister) {
MOZ_RELEASE_ASSERT(aRegister == NormalizeRegister(aRegister));
if (aRegister <= UD_R_RDI) {
NewInstruction(0x86, 0x03 + (aRegister - UD_R_RAX) * 8);
} else {
NewInstruction(0x44, 0x86, 0x03 + (aRegister - UD_R_R8) * 8);
}
}
void Assembler::ExchangeByteRbxWithAddressAtRax() {
NewInstruction(0x86, 0x18);
}
/* static */ /*ud_type*/
int Assembler::NormalizeRegister(
/*ud_type*/ int aRegister) {
if (aRegister >= UD_R_AL && aRegister <= UD_R_R15B) {
return aRegister - UD_R_AL + UD_R_RAX;
}
if (aRegister >= UD_R_AX && aRegister <= UD_R_R15W) {
return aRegister - UD_R_AX + UD_R_RAX;
}
if (aRegister >= UD_R_EAX && aRegister <= UD_R_R15D) {
return aRegister - UD_R_EAX + UD_R_RAX;
}
if (aRegister >= UD_R_RAX && aRegister <= UD_R_R15) {
return aRegister;
}
return UD_NONE;
}
/* static */
bool Assembler::CanPatchShortJump(uint8_t* aIp, void* aTarget) {
return (aIp + 2 - 128 <= aTarget) && (aIp + 2 + 127 >= aTarget);
}
/* static */
void Assembler::PatchShortJump(uint8_t* aIp, void* aTarget) {
MOZ_RELEASE_ASSERT(CanPatchShortJump(aIp, aTarget));
aIp[0] = 0xEB;
aIp[1] = uint8_t(static_cast<uint8_t*>(aTarget) - aIp - 2);
}
/* static */
void Assembler::PatchJumpClobberRax(uint8_t* aIp, void* aTarget) {
PatchMoveImmediateToRax(aIp, aTarget);
aIp[10] = 0x50; // push %rax
aIp[11] = 0xC3; // ret
}
/* static */
void Assembler::PatchClobber(uint8_t* aIp) {
aIp[0] = 0xCC; // int3
}
static uint8_t* PageStart(uint8_t* aPtr) {
static_assert(sizeof(size_t) == sizeof(uintptr_t), "Unsupported Platform");
return reinterpret_cast<uint8_t*>(reinterpret_cast<size_t>(aPtr) &
~(PageSize - 1));
}
void UnprotectExecutableMemory(uint8_t* aAddress, size_t aSize) {
MOZ_ASSERT(aSize);
uint8_t* pageStart = PageStart(aAddress);
uint8_t* pageEnd = PageStart(aAddress + aSize - 1) + PageSize;
int ret = mprotect(pageStart, pageEnd - pageStart,
PROT_READ | PROT_EXEC | PROT_WRITE);
MOZ_RELEASE_ASSERT(ret >= 0);
}
} // namespace recordreplay
} // namespace mozilla