mirror of
https://github.com/open-goal/jak-project
synced 2026-05-25 23:35:33 -04:00
water111
0451a06d76
* set up the compiler to ptrace the runtime * clang format * move debugger state to a separate Debugger class * support registers and break and continue * documentation and fix windows * make listener part of compiler, not a separate library * implement memory read and write * fix for windows
108 lines
3.2 KiB
C++
108 lines
3.2 KiB
C++
#include "goalc/compiler/Compiler.h"
|
|
#include "common/util/FileUtil.h"
|
|
#include "third-party/fmt/core.h"
|
|
|
|
Val* Compiler::compile_dbg(const goos::Object& form, const goos::Object& rest, Env* env) {
|
|
// todo - do something with args.
|
|
(void)form;
|
|
(void)rest;
|
|
(void)env;
|
|
if (!m_debugger.is_valid()) {
|
|
fmt::print("[Debugger] Could not start debugger because there is no valid debugging context\n");
|
|
return get_none();
|
|
}
|
|
|
|
if (m_debugger.is_attached()) {
|
|
fmt::print("[Debugger] Could not start debugger because the debugger is already attached.\n");
|
|
return get_none();
|
|
}
|
|
|
|
if (m_debugger.attach_and_break()) {
|
|
fmt::print("Debugger connected.\n");
|
|
} else {
|
|
fmt::print("ERROR\n");
|
|
}
|
|
|
|
return get_none();
|
|
}
|
|
|
|
Val* Compiler::compile_dbs(const goos::Object& form, const goos::Object& rest, Env* env) {
|
|
// todo - do something with args.
|
|
(void)form;
|
|
(void)rest;
|
|
(void)env;
|
|
|
|
fmt::print(" Listener connected? {}\n", m_listener.is_connected());
|
|
fmt::print(" Debugger context? {}\n", m_debugger.is_valid());
|
|
if (m_debugger.is_valid()) {
|
|
fmt::print(" Attached? {}\n", m_debugger.is_attached());
|
|
|
|
if (m_debugger.is_attached()) {
|
|
fmt::print(" Halted? {}\n", m_debugger.is_halted());
|
|
}
|
|
|
|
fmt::print(" Context: {}\n", m_debugger.get_context_string());
|
|
}
|
|
|
|
if (m_debugger.is_valid()) {
|
|
} else {
|
|
fmt::print("There is no valid debug context from the target.");
|
|
}
|
|
|
|
return get_none();
|
|
}
|
|
|
|
Val* Compiler::compile_cont(const goos::Object& form, const goos::Object& rest, Env* env) {
|
|
// todo - do something with args.
|
|
(void)form;
|
|
(void)rest;
|
|
(void)env;
|
|
|
|
if (m_debugger.is_valid() && m_debugger.is_attached() && m_debugger.is_halted()) {
|
|
m_debugger.do_continue();
|
|
} else {
|
|
fmt::print("Couldn't do :cont. Valid {}, attached {}, halted {}\n", m_debugger.is_valid(),
|
|
m_debugger.is_attached(), m_debugger.is_halted());
|
|
}
|
|
|
|
return get_none();
|
|
}
|
|
|
|
Val* Compiler::compile_break(const goos::Object& form, const goos::Object& rest, Env* env) {
|
|
// todo - do something with args.
|
|
(void)form;
|
|
(void)rest;
|
|
(void)env;
|
|
|
|
if (m_debugger.is_valid() && m_debugger.is_attached() && m_debugger.is_running()) {
|
|
m_debugger.do_break();
|
|
} else {
|
|
fmt::print("Couldn't do :break. Valid {}, attached {}, running {}\n", m_debugger.is_valid(),
|
|
m_debugger.is_attached(), m_debugger.is_running());
|
|
}
|
|
|
|
return get_none();
|
|
}
|
|
|
|
Val* Compiler::compile_dump_all(const goos::Object& form, const goos::Object& rest, Env* env) {
|
|
(void)env;
|
|
if (!m_debugger.is_halted()) {
|
|
fmt::print("Couldn't dump memory. Must be attached and halted.\n");
|
|
return get_none();
|
|
}
|
|
|
|
auto args = get_va(form, rest);
|
|
va_check(form, args, {{goos::ObjectType::STRING}}, {});
|
|
auto dest_file = args.unnamed.at(0).as_string()->data;
|
|
auto buffer = new u8[EE_MAIN_MEM_SIZE];
|
|
memset(buffer, 0, EE_MAIN_MEM_SIZE);
|
|
|
|
if (!m_debugger.read_memory(buffer + EE_MAIN_MEM_LOW_PROTECT,
|
|
EE_MAIN_MEM_SIZE - EE_MAIN_MEM_LOW_PROTECT,
|
|
EE_MAIN_MEM_LOW_PROTECT)) {
|
|
fmt::print("Reading memory failed, not dumping.\n");
|
|
} else {
|
|
file_util::write_binary_file(file_util::get_file_path({dest_file}), buffer, EE_MAIN_MEM_SIZE);
|
|
}
|
|
return get_none();
|
|
} |