static void setExceptionLocation(LLDBPlugin* plugin, PDWriter* writer)
{
char filename[2048];
memset(filename, 0, sizeof(filename));
// Get the filename & line of the exception/breakpoint
// \todo: Right now we assume that we only got the break/exception at the first thread.
lldb::SBThread thread(plugin->process.GetThreadByID(plugin->selectedThreadId));
uint32_t frameIndex = getThreadFrame(plugin, plugin->selectedThreadId);
lldb::SBFrame frame(thread.GetFrameAtIndex(frameIndex));
lldb::SBCompileUnit compileUnit = frame.GetCompileUnit();
lldb::SBFileSpec filespec(plugin->process.GetTarget().GetExecutable());
if (compileUnit.GetNumSupportFiles() > 0)
{
lldb::SBFileSpec fileSpec = compileUnit.GetSupportFileAtIndex(0);
fileSpec.GetPath(filename, sizeof(filename));
}
lldb::SBSymbolContext context(frame.GetSymbolContext(lldb::eSymbolContextEverything));
lldb::SBLineEntry entry(context.GetLineEntry());
uint32_t line = entry.GetLine();
PDWrite_event_begin(writer, PDEventType_SetExceptionLocation);
PDWrite_string(writer, "filename", filename);
PDWrite_u32(writer, "line", line);
PDWrite_event_end(writer);
}
void test_c64_vice_get_disassembly(void**)
{
static Assembly assembly[] =
{
{ 0x080e, "A9 22 LDA #$22" },
{ 0x0810, "A2 32 LDX #$32" },
{ 0x0812, "C8 INY" },
{ 0x0813, "EE 20 D0 INC $D020" },
{ 0x0816, "EE 21 D0 INC $D021" },
{ 0x0819, "4C 0E 08 JMP $080E" },
{ 0, 0 },
};
PDWriter* writer = s_session->currentWriter;
PDWrite_eventBegin(writer, PDEventType_getDisassembly);
PDWrite_u64(writer, "address_start", 0x80e);
PDWrite_u32(writer, "instruction_count", (uint32_t)4);
PDWrite_eventEnd(writer);
PDBinaryWriter_finalize(writer);
Session_update(s_session);
PDReader* reader = s_session->reader;
PDBinaryReader_initStream(reader, PDBinaryWriter_getData(s_session->currentWriter), PDBinaryWriter_getSize(s_session->currentWriter));
uint32_t event;
while ((event = PDRead_getEvent(reader)) != 0)
{
if (event != PDEventType_setDisassembly)
continue;
PDReaderIterator it;
assert_false(PDRead_findArray(reader, &it, "disassembly", 0) == PDReadStatus_notFound);
int i = 0;
while (PDRead_getNextEntry(reader, &it))
{
uint64_t address;
const char* text;
PDRead_findU64(reader, &address, "address", it);
PDRead_findString(reader, &text, "line", it);
assert_non_null(assembly[i].text);
assert_int_equal((int)assembly[i].address, (int)address);
assert_string_equal(assembly[i].text, text);
i++;
}
return;
}
}
void test_c64_vice_basic_breakpoint(void**)
{
Session_action(s_session, PDAction_step);
uint64_t breakAddress = 0x0813;
stepToPC(0x080e);
// Add a breakpoint at 0x0814
PDWriter* writer = s_session->currentWriter;
PDWrite_eventBegin(writer, PDEventType_setBreakpoint);
PDWrite_u64(writer, "address", breakAddress);
PDWrite_eventEnd(writer);
PDBinaryWriter_finalize(writer);
Session_update(s_session);
Session_action(s_session, PDAction_run);
waitForBreak(breakAddress, 0, 0);
stepToPC(0x080e);
// Update the breakpoint to different address
breakAddress = 0x0816;
writer = s_session->currentWriter;
PDWrite_eventBegin(writer, PDEventType_setBreakpoint);
PDWrite_u64(writer, "address", breakAddress);
PDWrite_u64(writer, "id", 1);
PDWrite_eventEnd(writer);
PDBinaryWriter_finalize(writer);
Session_update(s_session);
Session_action(s_session, PDAction_run);
waitForBreak(breakAddress, 0, 0);
// Delete the breakpoint
stepToPC(0x080e);
writer = s_session->currentWriter;
PDWrite_eventBegin(writer, PDEventType_deleteBreakpoint);
PDWrite_u32(writer, "id", 2);
PDWrite_eventEnd(writer);
PDBinaryWriter_finalize(writer);
Session_update(s_session);
Session_action(s_session, PDAction_run);
}
static int update(void* userData, PDUI* uiFuncs, PDReader* inEvents, PDWriter* writer)
{
uint32_t event;
DissassemblyData* data = (DissassemblyData*)userData;
data->requestDisassembly = false;
while ((event = PDRead_getEvent(inEvents)) != 0)
{
switch (event)
{
case PDEventType_setDisassembly:
{
setDisassemblyCode(data, inEvents);
break;
}
case PDEventType_setExceptionLocation:
{
uint64_t location = 0;
PDRead_findU64(inEvents, &location, "address", 0);
if (location != data->location)
{
data->location = location;
data->requestDisassembly = true;
}
PDRead_findU8(inEvents, &data->locationSize, "address_size", 0);
break;
}
case PDEventType_setRegisters:
{
updateRegisters(data, inEvents);
break;
}
}
}
renderUI(data, uiFuncs);
if (data->requestDisassembly)
{
int pc = (int)(data->pc) & ~(BlockSize - 1);
PDWrite_eventBegin(writer, PDEventType_getDisassembly);
PDWrite_u64(writer, "address_start", (uint64_t)pc);
PDWrite_u32(writer, "instruction_count", (uint32_t)BlockSize / 3);
PDWrite_eventEnd(writer);
}
return 0;
}
static void setCallstack(LLDBPlugin* plugin, PDWriter* writer)
{
lldb::SBThread thread(plugin->process.GetThreadByID(plugin->selectedThreadId));
printf("set callstack\n");
int frameCount = (int)thread.GetNumFrames();
if (frameCount == 0)
return;
// TODO: Write type of callstack
PDWrite_event_begin(writer, PDEventType_SetCallstack);
PDWrite_array_begin(writer, "callstack");
for (int i = 0; i < frameCount; ++i)
{
char fileLine[2048];
char moduleName[2048];
lldb::SBFrame frame = thread.GetFrameAtIndex((uint32_t)i);
lldb::SBModule module = frame.GetModule();
lldb::SBCompileUnit compileUnit = frame.GetCompileUnit();
lldb::SBSymbolContext context(frame.GetSymbolContext(0x0000006e));
lldb::SBLineEntry entry(context.GetLineEntry());
uint64_t address = (uint64_t)frame.GetPC();
module.GetFileSpec().GetPath(moduleName, sizeof(moduleName));
PDWrite_array_entry_begin(writer);
if (compileUnit.GetNumSupportFiles() > 0)
{
char filename[2048];
lldb::SBFileSpec fileSpec = compileUnit.GetSupportFileAtIndex(0);
fileSpec.GetPath(filename, sizeof(filename));
sprintf(fileLine, "%s:%d", filename, entry.GetLine());
printf("callstack %s:%d\n", fileLine, entry.GetLine());
PDWrite_string(writer, "filename", filename);
PDWrite_u32(writer, "line", entry.GetLine());
}
PDWrite_string(writer, "module_name", moduleName);
PDWrite_u64(writer, "address", address);
PDWrite_entry_end(writer);
}
PDWrite_array_end(writer);
PDWrite_event_end(writer);
}
static void test_c64_vice_connect(void**)
{
int count = 0;
PluginData* pluginData;
pluginData = PluginHandler_getBackendPlugins(&count)[0];
// Lanuch C64 VICE
// TODO: Fix hardcoded path
#ifdef PRODBG_MAC
//const char* viceLaunchPath = "../../vice/x64.app/Contents/MacOS/x64";
const char* viceLaunchPath = "/Applications/VICE/x64.app/Contents/MacOS/x64";
#elif PRODBG_WIN
const char* viceLaunchPath = "..\\..\\vice\\x64.exe";
#else
// Not supported on Linux yet
const char* viceLaunchPath = 0;
#endif
assert_non_null(viceLaunchPath);
//const char* argv[] = { viceLaunchPath, "-remotemonitor", "-console", "examples/c64_vice/test.prg", 0 };
const char* argv[] = { viceLaunchPath, "-remotemonitor", "-console", 0 };
s_viceHandle = Process_spawn(viceLaunchPath, argv);
assert_non_null(s_viceHandle);
// Wait 3 sec for VICE to launch
Time_sleepMs(3000);
// TODO: Non hard-coded path
s_session = Session_createLocal((PDBackendPlugin*)pluginData->plugin, 0);
// make sure we attach to VICE
PDWriter* writer = s_session->currentWriter;
PDWrite_eventBegin(writer, PDEventType_menuEvent);
PDWrite_u32(writer, "menu_id", 0);
PDWrite_eventEnd(writer);
Session_update(s_session);
// We haven't setup vice at this point so no connect
assert_int_not_equal(s_session->state, PDDebugState_noTarget);
}
static void toggleBreakpointCurrentLine(PDUISCInterface* sourceFuncs, SourceCodeData* data, PDWriter* writer) {
(void)data;
(void)writer;
PDUI_sc_send_command(sourceFuncs, SCN_TOGGLE_BREAKPOINT, 0, 0);
uint32_t currentLine = (uint32_t)PDUI_sc_send_command(sourceFuncs, SCN_GETCURRENT_LINE, 0, 0);
printf("currentLine %d\n", currentLine);
// TODO: Currenty we don't handly if we set breakpoints on a line we can't
PDWrite_event_begin(writer, PDEventType_SetBreakpoint);
PDWrite_string(writer, "filename", data->filename);
PDWrite_u32(writer, "line", currentLine);
PDWrite_event_end(writer);
}
static void parseBreakpoint(PluginData* data, const char* res, PDWriter* writer)
{
Breakpoint* bp = 0;
// TODO: loop, look for more breakpoints
const char* breakStrOffset = strstr(res, "BREAK:");
if (!breakStrOffset)
return;
int id = atoi(breakStrOffset + 7);
const char* address = strstr(breakStrOffset, "C:$");
if (!findBreakpointById(data, &bp, id))
{
bp = createBreakpoint();
addBreakpoint(data, bp);
}
bp->id = id;
if (address)
bp->address = (uint16_t)strtol(address + 3, 0, 16);
// add data or update existing
PDWrite_eventBegin(writer, PDEventType_replyBreakpoint);
PDWrite_u64(writer, "address", bp->address);
PDWrite_u32(writer, "id", (uint32_t)id);
PDWrite_eventEnd(writer);
printf("sending reply back: breakpoint %x - %d\n", bp->address, id);
// TODO: Condition
//if (bp->condition)
// free(bp->condition);
//if (condition)
// bp->condition = strdup(condition);
// else
// bp->condition = 0;
}
static void selectThread(LLDBPlugin* plugin, PDReader* reader, PDWriter* writer)
{
uint64_t threadId;
PDRead_find_u64(reader, &threadId, "thread_id", 0);
printf("trying te set thread %llu\n", threadId);
if (plugin->selectedThreadId == threadId)
return;
printf("selecting thread %llu\n", threadId);
plugin->selectedThreadId = threadId;
setCallstack(plugin, writer);
PDWrite_event_begin(writer, PDEventType_SelectFrame);
PDWrite_u32(writer, "frame", getThreadFrame(plugin, threadId));
PDWrite_event_end(writer);
}
static int update(void* userData, PDUI* uiFuncs, PDReader* inEvents, PDWriter* writer)
{
uint32_t event;
DissassemblyData* data = (DissassemblyData*)userData;
while ((event = PDRead_getEvent(inEvents)) != 0)
{
switch (event)
{
case PDEventType_setDisassembly:
{
setDisassemblyCode(data, inEvents);
break;
}
case PDEventType_setExceptionLocation:
{
PDRead_findU64(inEvents, &data->location, "address", 0);
PDRead_findU8(inEvents, &data->locationSize, "address_size", 0);
break;
}
case PDEventType_setRegisters:
updateRegisters(data, inEvents); break;
}
}
renderUI(data, uiFuncs);
// Temporary req
PDWrite_eventBegin(writer, PDEventType_getDisassembly);
PDWrite_u64(writer, "address_start", 0);
PDWrite_u32(writer, "instruction_count", (uint32_t)10);
PDWrite_eventEnd(writer);
return 0;
}
static int update(void* user_data, PDUI* uiFuncs, PDReader* inEvents, PDWriter* outEvents) {
uint32_t event = 0;
ThreadsData* data = (ThreadsData*)user_data;
data->requestData = false;
data->setSelectedThread = false;
while ((event = PDRead_get_event(inEvents)) != 0) {
switch (event) {
case PDEventType_SetThreads:
{
showInUI((ThreadsData*)user_data, inEvents, uiFuncs);
break;
}
case PDEventType_SetExceptionLocation:
{
data->requestData = true;
break;
}
}
}
// Request threads data
if (data->setSelectedThread) {
PDWrite_event_begin(outEvents, PDEventType_SelectThread);
printf("writing thread id %d\n", data->threadId);
PDWrite_u32(outEvents, "thread_id", (uint32_t)data->threadId);
PDWrite_event_end(outEvents);
}
if (data->requestData) {
PDWrite_event_begin(outEvents, PDEventType_GetThreads);
PDWrite_event_end(outEvents);
}
return 0;
}
static bool parse_breakpoint_call(PluginData* data, const char* res, int len, PDReader* reader, PDWriter* writer) {
Breakpoint* bp = 0;
(void)len;
(void)reader;
const char* breakStrOffset = strstr(res, "BREAK:");
if (!breakStrOffset)
return false;
int id = atoi(breakStrOffset + 7);
const char* address = strstr(breakStrOffset, "C:$");
if (!find_breakpoint_by_id(data, &bp, id)) {
bp = create_breakpoint();
add_breakpoint(data, bp);
}
bp->id = id;
if (address)
bp->address = (uint16_t)strtol(address + 3, 0, 16);
// add data or update existing
PDWrite_event_begin(writer, PDEventType_ReplyBreakpoint);
PDWrite_u64(writer, "address", bp->address);
PDWrite_u32(writer, "id", (uint32_t)id);
PDWrite_event_end(writer);
log_debug("sending reply back: breakpoint %x - %d\n", bp->address, id);
// make sure we got all dat;
return strstr(breakStrOffset, "(C:$");
}
static int update(void* userData, PDUI* uiFuncs, PDReader* inEvents, PDWriter* writer)
{
uint32_t event;
(void)uiFuncs;
(void)writer;
BreakpointsData* data = (BreakpointsData*)userData;
while ((event = PDRead_getEvent(inEvents)) != 0)
{
switch (event)
{
case PDEventType_setBreakpoint:
{
toogleBreakpointFileLine(data, inEvents);
break;
}
case PDEventType_replyBreakpoint:
{
uint64_t address = 0;
uint32_t id = (uint32_t) ~0;
PDRead_findU64(inEvents, &address, "address", 0);
PDRead_findU32(inEvents, &id, "id", 0);
for (Breakpoint* bp : data->breakpoints)
{
if ((uint64_t)strtol(bp->location.address, 0, 16) == address)
{
bp->pendingCount = 0; // breakpoint accepted
printf("bp view: updated breakpoint with id %d (was %d)\n", id, bp->id);
bp->id = (int)id;
break;
}
}
break;
}
}
}
uiFuncs->text("");
if (uiFuncs->button("Add Breakpoint", { 0.0f, 0.0f } ))
{
Breakpoint* bp = createBreakpoint(data);
data->breakpoints.push_back(bp);
}
uiFuncs->columns(4, "", true);
//uiFuncs->text(""); uiFuncs->nextColumn();
uiFuncs->text("Name/Address"); uiFuncs->nextColumn();
uiFuncs->text("Label"); uiFuncs->nextColumn();
uiFuncs->text("Condition"); uiFuncs->nextColumn();
uiFuncs->text(""); uiFuncs->nextColumn();
for (auto& i : data->breakpoints)
{
Breakpoint* bp = i;
bool needUpdate = false;
uiFuncs->pushIdPtr(bp);
//if (uiFuncs->checkbox("Enabled", &bp->enabled))
// needUpdate = true;
if (bp->location.filename)
{
uiFuncs->inputText("##filename", bp->location.filename, (int)data->maxPath, 0, 0, 0);
}
else
{
if (uiFuncs->inputText("##address", bp->location.address, (int)data->maxPath,
PDUIInputTextFlags_CharsHexadecimal | PDUIInputTextFlags_EnterReturnsTrue, 0, 0))
needUpdate = true;
}
uiFuncs->nextColumn();
uiFuncs->text("");
uiFuncs->nextColumn();
uiFuncs->text(""); // no condition for now
//if (uiFuncs->inputText("##condition", bp->condition, (int)data->maxPath, PDInputTextFlags_EnterReturnsTrue, 0, 0))
// needUpdate = true;
uiFuncs->nextColumn();
if (needUpdate)
{
// TODO: Add support for file/line
PDWrite_eventBegin(writer, PDEventType_setBreakpoint);
PDWrite_u64(writer, "address", (uint64_t)strtol(bp->location.address, 0, 16));
//if (bp->condition[0] != 0)
// PDWrite_string(writer, "condition", bp->condition);
if (bp->id != -1)
PDWrite_u32(writer, "id", (uint32_t)bp->id);
PDWrite_eventEnd(writer);
printf("Sending breakpint\n");
}
if (uiFuncs->button("Delete", {0.0f, 0.0f}))
{
PDWrite_eventBegin(writer, PDEventType_deleteBreakpoint);
PDWrite_u32(writer, "id", (uint32_t)bp->id);
PDWrite_eventEnd(writer);
bp->markDelete = true;
}
uiFuncs->nextColumn();
uiFuncs->popId();
}
// Delete breakpoints that have been marked delete
for (auto i = data->breakpoints.begin(); i != data->breakpoints.end(); ++i)
{
Breakpoint* bp = *i;
if (bp->pendingCount > 1)
bp->pendingCount++;
if (bp->markDelete || bp->pendingCount >= 10)
i = data->breakpoints.erase(i);
}
return 0;
}
static int update(void* user_data, PDUI* uiFuncs, PDReader* reader, PDWriter* writer) {
uint32_t event;
CallstackData* data = (CallstackData*)user_data;
data->request = false;
data->setSelectedFrame = false;
while ((event = PDRead_get_event(reader)) != 0) {
switch (event) {
case PDEventType_SetCallstack:
{
updateCallstack(data, reader);
break;
}
case PDEventType_SelectFrame:
{
PDRead_find_u32(reader, &data->selectedFrame, "frame", 0);
break;
}
case PDEventType_SetExceptionLocation:
{
const char* filename = 0;
uint32_t line = 0;
uint64_t location = 0;
PDRead_find_u64(reader, &location, "address", 0);
if (location != data->location) {
data->location = location;
data->request = true;
}
PDRead_find_string(reader, &filename, "filename", 0);
PDRead_find_u32(reader, &line, "line", 0);
if (!filename || line == 0)
break;
if (strcmp(data->filename, filename)) {
strcpy(data->filename, filename);
data->line = (int)line;
data->request = true;
}
}
}
}
showUI(uiFuncs, data);
if (data->setSelectedFrame) {
PDWrite_event_begin(writer, PDEventType_SelectFrame);
PDWrite_u32(writer, "frame", (uint32_t)data->selectedFrame);
PDWrite_event_end(writer);
}
if (data->request) {
PDWrite_event_begin(writer, PDEventType_GetCallstack);
PDWrite_event_end(writer);
}
return 0;
}
