ppsspp/Core/MIPS/JitCommon/JitCommon.cpp
Unknown W. Brackets b8342fb8ec SaveState: Rename ChunkFile files to Serialize.
Makes more sense and less weird than ChunkFileDoMap, etc.
2020-08-10 08:04:05 +00:00

273 lines
7.5 KiB
C++

// Copyright (c) 2012- PPSSPP Project.
// This program is free software: you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation, version 2.0 or later versions.
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License 2.0 for more details.
// A copy of the GPL 2.0 should have been included with the program.
// If not, see http://www.gnu.org/licenses/
// Official git repository and contact information can be found at
// https://github.com/hrydgard/ppsspp and http://www.ppsspp.org/.
#include <cstdlib>
#include "ext/disarm.h"
#include "ext/udis86/udis86.h"
#include "Common/StringUtils.h"
#include "Common/Serialize/Serializer.h"
#include "Common/Serialize/SerializeFuncs.h"
#include "Core/Util/DisArm64.h"
#include "Core/Config.h"
#include "Core/MIPS/JitCommon/JitCommon.h"
#include "Core/MIPS/JitCommon/JitState.h"
#include "Core/MIPS/IR/IRJit.h"
#if PPSSPP_ARCH(ARM)
#include "../ARM/ArmJit.h"
#elif PPSSPP_ARCH(ARM64)
#include "../ARM64/Arm64Jit.h"
#elif PPSSPP_ARCH(X86) || PPSSPP_ARCH(AMD64)
#include "../x86/Jit.h"
#elif PPSSPP_ARCH(MIPS)
#include "../MIPS/MipsJit.h"
#else
#include "../fake/FakeJit.h"
#endif
namespace MIPSComp {
JitInterface *jit;
void JitAt() {
jit->Compile(currentMIPS->pc);
}
void DoDummyJitState(PointerWrap &p) {
// This is here so the savestate matches between jit and non-jit.
auto s = p.Section("Jit", 1, 2);
if (!s)
return;
bool dummy = false;
Do(p, dummy);
if (s >= 2) {
dummy = true;
Do(p, dummy);
}
}
JitInterface *CreateNativeJit(MIPSState *mips) {
#if PPSSPP_ARCH(ARM)
return new MIPSComp::ArmJit(mips);
#elif PPSSPP_ARCH(ARM64)
return new MIPSComp::Arm64Jit(mips);
#elif PPSSPP_ARCH(X86) || PPSSPP_ARCH(AMD64)
return new MIPSComp::Jit(mips);
#elif PPSSPP_ARCH(MIPS)
return new MIPSComp::MipsJit(mips);
#else
return new MIPSComp::FakeJit(mips);
#endif
}
}
#if PPSSPP_PLATFORM(WINDOWS) && !defined(__LIBRETRO__)
#define DISASM_ALL 1
#endif
#if PPSSPP_ARCH(ARM) || defined(DISASM_ALL)
// We compile this for x86 as well because it may be useful when developing the ARM JIT on a PC.
std::vector<std::string> DisassembleArm2(const u8 *data, int size) {
std::vector<std::string> lines;
char temp[256];
int bkpt_count = 0;
for (int i = 0; i < size; i += 4) {
const u32 *codePtr = (const u32 *)(data + i);
u32 inst = codePtr[0];
u32 next = (i < size - 4) ? codePtr[1] : 0;
// MAGIC SPECIAL CASE for MOVW/MOVT readability!
if ((inst & 0x0FF00000) == 0x03000000 && (next & 0x0FF00000) == 0x03400000) {
u32 low = ((inst & 0x000F0000) >> 4) | (inst & 0x0FFF);
u32 hi = ((next & 0x000F0000) >> 4) | (next & 0x0FFF);
int reg0 = (inst & 0x0000F000) >> 12;
int reg1 = (next & 0x0000F000) >> 12;
if (reg0 == reg1) {
snprintf(temp, sizeof(temp), "MOV32 %s, %04x%04x", ArmRegName(reg0), hi, low);
lines.push_back(temp);
i += 4;
continue;
}
}
ArmDis((u32)(intptr_t)codePtr, inst, temp, sizeof(temp), false);
std::string buf = temp;
if (buf == "BKPT 1") {
bkpt_count++;
} else {
if (bkpt_count) {
lines.push_back(StringFromFormat("BKPT 1 (x%d)", bkpt_count));
bkpt_count = 0;
}
lines.push_back(buf);
}
}
if (bkpt_count) {
lines.push_back(StringFromFormat("BKPT 1 (x%d)", bkpt_count));
}
return lines;
}
#endif
std::string AddAddress(const std::string &buf, uint64_t addr) {
char buf2[16];
snprintf(buf2, sizeof(buf2), "%04x%08x", (uint32_t)(addr >> 32), (uint32_t)(addr & 0xFFFFFFFF));
return std::string(buf2) + " " + buf;
}
#if PPSSPP_ARCH(ARM64) || defined(DISASM_ALL)
static bool Arm64SymbolCallback(char *buffer, int bufsize, uint8_t *address) {
if (MIPSComp::jit) {
std::string name;
if (MIPSComp::jit->DescribeCodePtr(address, name)) {
truncate_cpy(buffer, bufsize, name.c_str());
return true;
}
}
return false;
}
std::vector<std::string> DisassembleArm64(const u8 *data, int size) {
std::vector<std::string> lines;
char temp[256];
int bkpt_count = 0;
for (int i = 0; i < size; i += 4) {
const u32 *codePtr = (const u32 *)(data + i);
uint64_t addr = (intptr_t)codePtr;
u32 inst = codePtr[0];
u32 next = (i < size - 4) ? codePtr[1] : 0;
// MAGIC SPECIAL CASE for MOVZ+MOVK readability!
if (((inst >> 21) & 0x3FF) == 0x294 && ((next >> 21) & 0x3FF) == 0x395) {
u32 low = (inst >> 5) & 0xFFFF;
u32 hi = (next >> 5) & 0xFFFF;
int reg0 = inst & 0x1F;
int reg1 = next & 0x1F;
char r = (inst >> 31) ? 'x' : 'w';
if (reg0 == reg1) {
snprintf(temp, sizeof(temp), "movi32 %c%d, %04x%04x", r, reg0, hi, low);
lines.push_back(AddAddress(temp, addr));
i += 4;
continue;
}
}
Arm64Dis((intptr_t)codePtr, inst, temp, sizeof(temp), false, Arm64SymbolCallback);
std::string buf = temp;
if (buf == "BKPT 1") {
bkpt_count++;
} else {
if (bkpt_count) {
lines.push_back(StringFromFormat("BKPT 1 (x%d)", bkpt_count));
bkpt_count = 0;
}
if (true) {
buf = AddAddress(buf, addr);
}
lines.push_back(buf);
}
}
if (bkpt_count) {
lines.push_back(StringFromFormat("BKPT 1 (x%d)", bkpt_count));
}
return lines;
}
#endif
#if PPSSPP_ARCH(X86) || PPSSPP_ARCH(AMD64)
const char *ppsspp_resolver(struct ud*,
uint64_t addr,
int64_t *offset) {
// For some reason these two don't seem to trigger..
if (addr >= (uint64_t)(&currentMIPS->r[0]) && addr < (uint64_t)&currentMIPS->r[32]) {
*offset = addr - (uint64_t)(&currentMIPS->r[0]);
return "mips.r";
} else if (addr >= (uint64_t)(&currentMIPS->v[0]) && addr < (uint64_t)&currentMIPS->v[128]) {
*offset = addr - (uint64_t)(&currentMIPS->v[0]);
return "mips.v";
} else if (addr == (uint64_t)(&currentMIPS->downcount)) {
return "mips.downcount";
} else if (addr == (uint64_t)(&currentMIPS->fpcond)) {
return "mips.fpcond";
} else if (addr == (uint64_t)(&currentMIPS->temp)) {
return "mips.temp";
} else if (addr == (uint64_t)(&currentMIPS->pc)) {
return "mips.pc";
} else if (addr == (uint64_t)(&currentMIPS->hi)) {
return "mips.hi";
} else if (addr == (uint64_t)(&currentMIPS->lo)) {
return "mips.lo";
} else if (addr == (uint64_t)(&currentMIPS->fcr31)) {
return "mips.fcr31";
} else if (addr >= (uint64_t)(&currentMIPS->vfpuCtrl[0]) && addr < (uint64_t)(&currentMIPS->vfpuCtrl[16])) {
return "mips.vfpuCtrl";
}
// But these do.
// UGLY HACK because the API is terrible
static char buf[128];
std::string str;
if (MIPSComp::jit->DescribeCodePtr((u8 *)(uintptr_t)addr, str)) {
*offset = 0;
truncate_cpy(buf, sizeof(buf), str.c_str());
return buf;
}
return NULL;
}
std::vector<std::string> DisassembleX86(const u8 *data, int size) {
std::vector<std::string> lines;
ud_t ud_obj;
ud_init(&ud_obj);
ud_set_mode(&ud_obj, sizeof(void*) * 8);
ud_set_pc(&ud_obj, (intptr_t)data);
ud_set_vendor(&ud_obj, UD_VENDOR_ANY);
ud_set_syntax(&ud_obj, UD_SYN_INTEL);
ud_set_sym_resolver(&ud_obj, &ppsspp_resolver);
ud_set_input_buffer(&ud_obj, data, size);
int int3_count = 0;
while (ud_disassemble(&ud_obj) != 0) {
const char *buf = ud_insn_asm(&ud_obj);
if (!buf) {
lines.push_back("[bad]");
continue;
}
std::string str = buf;
if (str == "int3") {
int3_count++;
} else {
if (int3_count) {
lines.push_back(StringFromFormat("int3 (x%d)", int3_count));
int3_count = 0;
}
lines.push_back(str);
}
}
if (int3_count) {
lines.push_back(StringFromFormat("int3 (x%d)", int3_count));
}
return lines;
}
#endif