static bool getExceptionLocation(PDReader* reader, uint64_t* address, CPUState* cpuState)
{
uint32_t event;
bool foundException = false;
while ((event = PDRead_getEvent(reader)) != 0)
{
switch (event)
{
case PDEventType_setRegisters:
{
if (cpuState)
updateRegisters(cpuState, reader);
break;
}
case PDEventType_setExceptionLocation:
{
assert_true(PDRead_findU64(reader, address, "address", 0) & PDReadStatus_ok);
foundException = true;
break;
}
}
}
return foundException;
}
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;
}
}
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 getDisassembly(PluginData* data, PDReader* reader)
{
uint64_t addressStart = 0;
uint32_t instructionCount = 0;
PDRead_findU64(reader, &addressStart, "address_start", 0);
PDRead_findU32(reader, &instructionCount, "instruction_count", 0);
// assume that one instruction is 3 bytes which is high but that gives us more data back than we need which is
// better than too little
sendCommand(data, "disass $%04x $%04x\n", (uint16_t)addressStart, (uint16_t)(addressStart + instructionCount * 3));
}
static void getMemory(PluginData* data, PDReader* reader, PDWriter* writer)
{
uint64_t address;
uint64_t size;
size_t readSize = 0;
PDRead_findU64(reader, &address, "address_start", 0);
PDRead_findU64(reader, &size, "size", 0);
// so this is a bit of a hack. If we request memory d000 we switch to io and then back
// this isn't really correct but will do for now
if (address == 0xdd00)
sendCommand(data, "bank io\n");
uint8_t* memory = getMemoryInternal(data, data->tempFileFull, &readSize, (uint16_t)(address), (uint16_t)(address + size));
if (address == 0xdd00)
sendCommand(data, "bank ram\n");
if (memory)
{
// Lets do this!
// + 2 is because VICE writes address at the start of the block and at the end
//
printf("c64_vice: sending memory\n");
PDWrite_eventBegin(writer, PDEventType_setMemory);
PDWrite_u64(writer, "address", address);
PDWrite_data(writer, "data", memory + 2, (uint32_t)(readSize - 3));
PDWrite_eventEnd(writer);
// writer takes a copy
free(memory);
}
}
static void setDisassemblyCode(DissassemblyData* data, PDReader* reader)
{
PDReaderIterator it;
if (PDRead_findArray(reader, &it, "disassembly", 0) == PDReadStatus_notFound)
return;
while (PDRead_getNextEntry(reader, &it))
{
uint64_t address;
const char* text;
PDRead_findU64(reader, &address, "address", it);
PDRead_findString(reader, &text, "line", it);
insertLine(data, address, text);
}
}
static void updateRegisters(DissassemblyData* data, PDReader* reader)
{
PDReaderIterator it;
if (PDRead_findArray(reader, &it, "registers", 0) == PDReadStatus_notFound)
return;
while (PDRead_getNextEntry(reader, &it))
{
const char* name = "";
PDRead_findString(reader, &name, "name", it);
if (!strcmp(name, "pc"))
{
PDRead_findU64(reader, &data->pc, "register", it);
}
}
}
static void setBreakpoint(PluginData* data, PDReader* reader, PDWriter* writer)
{
uint64_t address = 0;
int32_t id = -1;
const char* condition = 0;
(void)writer;
PDRead_findS32(reader, &id, "id", 0);
PDRead_findU64(reader, &address, "address", 0);
PDRead_findString(reader, &condition, "condition", 0);
if (id != -1)
delBreakpointById(data, id);
if (condition)
sendCommand(data, "break $%04x if %s\n", (uint16_t)address, condition);
else
sendCommand(data, "break $%04x\n", (uint16_t)address);
}
static void selectThread(LLDBPlugin* plugin, PDReader* reader, PDWriter* writer)
{
uint64_t threadId;
PDRead_findU64(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_eventBegin(writer, PDEventType_selectFrame);
PDWrite_u32(writer, "frame", getThreadFrame(plugin, threadId));
PDWrite_eventEnd(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;
}
bool getMemory(void* dest, int* len, uint16_t inAddress, int readLength)
{
PDWriter* writer = s_session->currentWriter;
PDWrite_eventBegin(writer, PDEventType_getMemory);
PDWrite_u64(writer, "address_start", inAddress);
PDWrite_u64(writer, "size", (uint32_t)readLength);
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)
{
uint8_t* data;
uint64_t dataSize;
uint64_t address;
if (event != PDEventType_setMemory)
continue;
assert_true(PDRead_findU64(reader, &address, "address", 0) & PDReadStatus_ok);
assert_true((PDRead_findData(reader, (void**)&data, &dataSize, "data", 0) & PDReadStatus_typeMask) == PDReadType_data);
memcpy(dest, data, dataSize);
*len = (int)dataSize;
return true;
}
return false;
}
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;
}
