95 lines
1.6 KiB
C
95 lines
1.6 KiB
C
#include "sp_vm.h"
|
|
#include "sp_vm_debug.h"
|
|
|
|
#define USHR(x) ((unsigned int)(x)>>1)
|
|
|
|
int SP_DbgLookupFile(sp_context_t *ctx, ucell_t addr, const char **filename)
|
|
{
|
|
int high, low, mid;
|
|
|
|
high = ctx->plugin->debug.files_num;
|
|
low = -1;
|
|
|
|
while (high - low > 1)
|
|
{
|
|
mid = USHR(low + high);
|
|
if (ctx->files[mid].addr <= addr)
|
|
{
|
|
low = mid;
|
|
} else {
|
|
high = mid;
|
|
}
|
|
}
|
|
|
|
if (low == -1)
|
|
{
|
|
return SP_ERR_NOT_FOUND;
|
|
}
|
|
|
|
*filename = ctx->files[low].name;
|
|
|
|
return SP_ERR_NONE;
|
|
}
|
|
|
|
int SP_DbgLookupFunction(sp_context_t *ctx, ucell_t addr, const char **name)
|
|
{
|
|
uint32_t iter, max = ctx->plugin->debug.syms_num;
|
|
|
|
for (iter=0; iter<max; iter++)
|
|
{
|
|
if ((ctx->symbols[iter].sym->ident == SP_SYM_FUNCTION)
|
|
&& (ctx->symbols[iter].codestart <= addr)
|
|
&& (ctx->symbols[iter].codeend > addr))
|
|
{
|
|
break;
|
|
}
|
|
}
|
|
|
|
if (iter >= max)
|
|
{
|
|
return SP_ERR_NOT_FOUND;
|
|
}
|
|
|
|
*name = ctx->symbols[iter].name;
|
|
|
|
return SP_ERR_NONE;
|
|
}
|
|
|
|
int SP_DbgLookupLine(sp_context_t *ctx, ucell_t addr, uint32_t *line)
|
|
{
|
|
int high, low, mid;
|
|
|
|
high = ctx->plugin->debug.lines_num;
|
|
low = -1;
|
|
|
|
while (high - low > 1)
|
|
{
|
|
mid = USHR(low + high);
|
|
if (ctx->lines[mid].addr <= addr)
|
|
{
|
|
low = mid;
|
|
} else {
|
|
high = mid;
|
|
}
|
|
}
|
|
|
|
if (low == -1)
|
|
{
|
|
return SP_ERR_NOT_FOUND;
|
|
}
|
|
|
|
*line = ctx->lines[low].line;
|
|
|
|
return SP_ERR_NONE;
|
|
}
|
|
|
|
int SP_DbgInstallBreak(sp_context_t *ctx, SPVM_DEBUGBREAK newpfn, SPVM_DEBUGBREAK *oldpfn)
|
|
{
|
|
if (ctx->dbreak)
|
|
*oldpfn = ctx->dbreak;
|
|
|
|
ctx->dbreak = newpfn;
|
|
|
|
return SP_ERR_NONE;
|
|
}
|