Initial community commit
This commit is contained in:
Jef
parent
537bcbc862
commit
fc06254474
16440 changed files with 4239995 additions and 2 deletions
437
Src/Wasabi/api/script/debugger/sdebuggerui.cpp
Normal file
437
Src/Wasabi/api/script/debugger/sdebuggerui.cpp
Normal file
|
|
@ -0,0 +1,437 @@
|
|||
#include <precomp.h>
|
||||
#include "sdebuggerui.h"
|
||||
#include <api/script/debugger/jitd.h>
|
||||
#include <tataki/canvas/canvas.h>
|
||||
#include <api/wnd/wndclass/editwnd.h>
|
||||
#include <api/script/objcontroller.h>
|
||||
#include <bfc/string/stringdict.h>
|
||||
#include <bfc/parse/paramparser.h>
|
||||
#include <api/wnd/notifmsg.h>
|
||||
#include <api/script/objecttable.h>
|
||||
#include <api/script/debugger/sourcecodeline.h>
|
||||
#include "../nu/AutoWide.h"
|
||||
|
||||
#define LEFTCOLUMN 100
|
||||
#define RIGHTCOLUMN 200
|
||||
#define INPUTHEIGHT 21
|
||||
#define NCONSOLELINES 4
|
||||
#define LINEHEIGHT 14
|
||||
#define REGWIDTH 100
|
||||
|
||||
SimpleDebuggerUI::SimpleDebuggerUI()
|
||||
{
|
||||
leave = 0;
|
||||
jitd = NULL;
|
||||
edit = NULL;
|
||||
memset(cmdbuf, 0, sizeof(cmdbuf));
|
||||
retcode = JITD_RETURN_CONTINUE;
|
||||
}
|
||||
|
||||
SimpleDebuggerUI::~SimpleDebuggerUI()
|
||||
{}
|
||||
|
||||
void SimpleDebuggerUI::setJITD(MakiJITD *_jitd)
|
||||
{
|
||||
jitd = _jitd;
|
||||
}
|
||||
|
||||
int SimpleDebuggerUI::messageLoop()
|
||||
{
|
||||
leave = 0;
|
||||
retcode = JITD_RETURN_STEPINTO;
|
||||
|
||||
if (!isInited())
|
||||
{
|
||||
setVirtual(0);
|
||||
setStartHidden(1);
|
||||
setParent(WASABI_API_WND->main_getRootWnd());
|
||||
init(WASABI_API_WND->main_getRootWnd(), 1);
|
||||
|
||||
edit = new EditWnd;
|
||||
edit->setParent(this);
|
||||
edit->setBackgroundColor(RGB(0, 0, 0));
|
||||
edit->setTextColor(RGB(0, 255, 0));
|
||||
edit->setWantFocus(0);
|
||||
|
||||
*cmdbuf = 0;
|
||||
edit->setBuffer(cmdbuf, 256);
|
||||
edit->init(this);
|
||||
|
||||
RECT r;
|
||||
POINT pt = {0, 0};
|
||||
Wasabi::Std::getViewport(&r, &pt);
|
||||
resize(r.right - 656, r.top + 16, 640, 480);
|
||||
bringToFront();
|
||||
}
|
||||
|
||||
for (int s = 0;s < jitd->getVSP();s++)
|
||||
{
|
||||
scriptVar v = WASABI_API_MAKIDEBUG->debugger_readStack(s);
|
||||
StringW str;
|
||||
switch (v.type)
|
||||
{
|
||||
case SCRIPT_VOID:
|
||||
str = L"NULL";
|
||||
break;
|
||||
case SCRIPT_INT:
|
||||
str = StringPrintfW(L"%d", GET_SCRIPT_INT(v));
|
||||
break;
|
||||
case SCRIPT_BOOLEAN:
|
||||
str = StringPrintfW(L"%s", GET_SCRIPT_BOOLEAN(v) ? L"true" : L"false");
|
||||
break;
|
||||
case SCRIPT_FLOAT:
|
||||
str = StringPrintfW(L"%f", GET_SCRIPT_FLOAT(v));
|
||||
break;
|
||||
case SCRIPT_DOUBLE:
|
||||
str = StringPrintfW(L"%f", (float)GET_SCRIPT_DOUBLE(v));
|
||||
break;
|
||||
case SCRIPT_STRING:
|
||||
str = GET_SCRIPT_STRING(v);
|
||||
break;
|
||||
default:
|
||||
{
|
||||
if (v.type == SCRIPT_OBJECT)
|
||||
str = L"Object";
|
||||
else
|
||||
str = ObjectTable::getClassName(v.type);
|
||||
#ifdef WASABI_COMPILE_SKIN
|
||||
ScriptObject *o = GET_SCRIPT_OBJECT(v);
|
||||
if (o != NULL)
|
||||
{
|
||||
GuiObject *go = static_cast<GuiObject *>(o->vcpu_getInterface(guiObjectGuid));
|
||||
if (go != NULL)
|
||||
{
|
||||
str += L";";
|
||||
str.cat(go->guiobject_getId());
|
||||
}
|
||||
}
|
||||
#endif
|
||||
break;
|
||||
}
|
||||
}
|
||||
strstack.addItem(new StringW(str));
|
||||
}
|
||||
|
||||
setVisible(1);
|
||||
|
||||
//WASABI_API_WND->pushModalWnd(this);
|
||||
|
||||
#ifdef WIN32
|
||||
MSG msg;
|
||||
//DWORD leavetime = GetTickCount()+5;
|
||||
while (!leave/* && !(GetTickCount() >leavetime)*/)
|
||||
{
|
||||
if (PeekMessage(&msg, /*(HWND)NULL*/ getOsWindowHandle(), 0, 0, PM_NOREMOVE))
|
||||
{
|
||||
GetMessage(&msg, /*(HWND) NULL*/getOsWindowHandle(), 0, 0) &&
|
||||
TranslateMessage(&msg);
|
||||
DispatchMessage(&msg);
|
||||
}
|
||||
}
|
||||
#endif
|
||||
|
||||
//WASABI_API_WND->popModalWnd(this);
|
||||
|
||||
setVisible(0);
|
||||
strstack.deleteAll();
|
||||
|
||||
return retcode;
|
||||
}
|
||||
|
||||
int SimpleDebuggerUI::onPaint(Canvas *c)
|
||||
{
|
||||
SimpleDebuggerUI_PARENT::onPaint(c);
|
||||
Wasabi::FontInfo fontInfo;
|
||||
RECT r;
|
||||
getClientRect(&r);
|
||||
c->fillRect(&r, RGB(0, 0, 0));
|
||||
c->drawRect(&r, 1, RGB(0, 255, 0));
|
||||
|
||||
fontInfo.color = RGB(0, 255, 0);
|
||||
fontInfo.pointSize = 14;
|
||||
fontInfo.face = L"Courier New";
|
||||
c->pushPen(PENSTYLE_SOLID, 1, RGB(0, 255, 0));
|
||||
c->textOut(r.right - REGWIDTH + 7, r.bottom - (INPUTHEIGHT + (NCONSOLELINES*LINEHEIGHT) + 2) + 8, StringPrintfW(L"VSD:%08X", jitd->getVSD()), &fontInfo);
|
||||
c->textOut(r.right - REGWIDTH + 7, r.bottom - (INPUTHEIGHT + (NCONSOLELINES*LINEHEIGHT) + 2) + 8 + (LINEHEIGHT + 1), StringPrintfW(L"VIP:%08X", jitd->getVIP()), &fontInfo);
|
||||
c->textOut(r.right - REGWIDTH + 7, r.bottom - (INPUTHEIGHT + (NCONSOLELINES*LINEHEIGHT) + 2) + 8 + (LINEHEIGHT + 1)*2, StringPrintfW(L"VSP:%08X", jitd->getVSP()), &fontInfo);
|
||||
c->textOut(r.right - REGWIDTH + 7, r.bottom - (INPUTHEIGHT + (NCONSOLELINES*LINEHEIGHT) + 2) + 8 + (LINEHEIGHT + 1)*3, StringPrintfW(L"VCC:%08X", jitd->getVCC()), &fontInfo);
|
||||
c->lineDraw(r.left, r.bottom - (INPUTHEIGHT + (NCONSOLELINES*LINEHEIGHT) + 2), r.right, r.bottom - (INPUTHEIGHT + (NCONSOLELINES*LINEHEIGHT) + 2));
|
||||
c->lineDraw(r.left, r.bottom - (INPUTHEIGHT + 2), r.right - REGWIDTH, r.bottom - (INPUTHEIGHT + 2));
|
||||
c->lineDraw(r.right - REGWIDTH, r.bottom - (INPUTHEIGHT + (NCONSOLELINES*LINEHEIGHT) + 2), r.right - REGWIDTH, r.bottom);
|
||||
c->lineDraw(r.right - RIGHTCOLUMN, 0, r.right - RIGHTCOLUMN, r.bottom - (INPUTHEIGHT + (NCONSOLELINES*LINEHEIGHT) + 2));
|
||||
disassemble(c);
|
||||
for (int s = 0;s < strstack.getNumItems();s++)
|
||||
{
|
||||
c->textOutEllipsed(r.right - RIGHTCOLUMN + 4, s*LINEHEIGHT + 4, RIGHTCOLUMN - 8, 16, strstack.enumItem(s)->getValue(), &fontInfo);
|
||||
}
|
||||
return 1;
|
||||
}
|
||||
|
||||
int SimpleDebuggerUI::onLeftButtonDown(int x, int y)
|
||||
{
|
||||
SimpleDebuggerUI_PARENT::onLeftButtonDown(x, y);
|
||||
if (edit) edit->onGetFocus();
|
||||
// leave = 1;
|
||||
return 1;
|
||||
}
|
||||
|
||||
void SimpleDebuggerUI::disassemble(Canvas *c)
|
||||
{
|
||||
RECT r;
|
||||
getClientRect(&r);
|
||||
int x = 4;
|
||||
|
||||
int y = (r.bottom - r.top - 4) / 2 + 4;
|
||||
|
||||
int ln = jitd->findLine(jitd->getVIP());
|
||||
if (ln != -1)
|
||||
{
|
||||
Wasabi::FontInfo fontInfo;
|
||||
SourceCodeLine *l = jitd->enumLine(ln);
|
||||
int sourcecode = l->getSourceFile() != NULL;
|
||||
int g;
|
||||
int j = 0;
|
||||
for (g = y;g < r.bottom - (INPUTHEIGHT + 4 + (NCONSOLELINES*LINEHEIGHT)) - LINEHEIGHT;g += LINEHEIGHT)
|
||||
{
|
||||
if (!sourcecode || j == 0)
|
||||
l = jitd->enumLine(ln + j);
|
||||
if (!l) break;
|
||||
|
||||
if (j == 0)
|
||||
{
|
||||
RECT br;
|
||||
br.left = 4;
|
||||
br.top = g;
|
||||
br.right = r.right - (RIGHTCOLUMN + 4);
|
||||
br.bottom = br.top + LINEHEIGHT;
|
||||
c->fillRect(&br, RGB(0, 255, 0));
|
||||
fontInfo.color = RGB(0, 0, 0);
|
||||
}
|
||||
if (!sourcecode)
|
||||
{
|
||||
String str;
|
||||
unsigned const char *d = (unsigned const char *)(l->getPointer() + jitd->getCodeBlock());
|
||||
for (int k = 0;k < l->getLength();k++)
|
||||
{
|
||||
if (!str.isempty()) str += " ";
|
||||
str += StringPrintf("%02X", *d);
|
||||
d++;
|
||||
}
|
||||
c->textOut(x, g, StringPrintfW(L"%08X", l->getPointer()), &fontInfo);
|
||||
c->textOut(x + 70, g, AutoWide(str), &fontInfo);
|
||||
c->textOut(x + 70 + 150, g, l->getLine(), &fontInfo);
|
||||
}
|
||||
else
|
||||
{
|
||||
c->textOutEllipsed(x, g, r.right - r.left - (RIGHTCOLUMN + 4 + x), 16, (getLine(l->getSourceFile(), l->getSourceFileLine() + j)), &fontInfo);
|
||||
}
|
||||
|
||||
j++;
|
||||
}
|
||||
j = 1;
|
||||
for (g = y - LINEHEIGHT;g > 1;g -= LINEHEIGHT)
|
||||
{
|
||||
if (!sourcecode || j == 0)
|
||||
l = jitd->enumLine(ln - j);
|
||||
if (!l) break;
|
||||
if (!sourcecode)
|
||||
{
|
||||
String str;
|
||||
unsigned const char *d = (unsigned const char *)(l->getPointer() + jitd->getCodeBlock());
|
||||
for (int k = 0;k < l->getLength();k++)
|
||||
{
|
||||
if (!str.isempty()) str += " ";
|
||||
str += StringPrintf("%02X", *d);
|
||||
d++;
|
||||
}
|
||||
c->textOut(x, g, StringPrintfW(L"%08X", l->getPointer()), &fontInfo);
|
||||
c->textOut(x + 70, g, AutoWide(str), &fontInfo);
|
||||
c->textOut(x + 70 + 150, g, (l->getLine()), &fontInfo);
|
||||
}
|
||||
else
|
||||
{
|
||||
c->textOutEllipsed(x, g, r.right - r.left - (RIGHTCOLUMN + 4 + x), 16, (getLine(l->getSourceFile(), l->getSourceFileLine() - j)), &fontInfo);
|
||||
}
|
||||
j++;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
int SimpleDebuggerUI::onResize()
|
||||
{
|
||||
SimpleDebuggerUI_PARENT::onResize();
|
||||
if (edit != NULL)
|
||||
{
|
||||
RECT r;
|
||||
getClientRect(&r);
|
||||
edit->resize(1, r.bottom - (INPUTHEIGHT + 1), r.right - r.left - (REGWIDTH + 1), INPUTHEIGHT);
|
||||
}
|
||||
return 1;
|
||||
}
|
||||
|
||||
int SimpleDebuggerUI::childNotify(ifc_window *child, int msg, intptr_t p1, intptr_t p2)
|
||||
{
|
||||
if (child == edit)
|
||||
{
|
||||
if (msg == ChildNotify::EDITWND_ENTER_PRESSED)
|
||||
{
|
||||
onCommand(cmdbuf);
|
||||
}
|
||||
}
|
||||
return SimpleDebuggerUI_PARENT::childNotify(child, msg, p1, p2);
|
||||
}
|
||||
|
||||
BEGIN_STRINGDICTIONARY(_debuggercommands)
|
||||
SDI(L"b", DEBUG_CMD_BREAKPOINT);
|
||||
SDI(L"break", DEBUG_CMD_BREAKPOINT);
|
||||
SDI(L"x", DEBUG_CMD_CONTINUE);
|
||||
SDI(L"continue", DEBUG_CMD_CONTINUE);
|
||||
SDI(L"i", DEBUG_CMD_STEPINTO);
|
||||
SDI(L"stepinto", DEBUG_CMD_STEPINTO);
|
||||
SDI(L"o", DEBUG_CMD_STEPOVER);
|
||||
SDI(L"stepover", DEBUG_CMD_STEPOVER);
|
||||
SDI(L"p", DEBUG_CMD_STEPOUT);
|
||||
SDI(L"stepout", DEBUG_CMD_STEPOUT);
|
||||
SDI(L"k", DEBUG_CMD_KILL);
|
||||
SDI(L"kill", DEBUG_CMD_KILL);
|
||||
SDI(L"?", DEBUG_CMD_HELP);
|
||||
SDI(L"help", DEBUG_CMD_HELP);
|
||||
END_STRINGDICTIONARY(_debuggercommands, debuggercommands)
|
||||
|
||||
|
||||
void SimpleDebuggerUI::onCommand(const wchar_t *cmd)
|
||||
{
|
||||
if (*cmd == 0)
|
||||
{
|
||||
stepOver();
|
||||
return;
|
||||
}
|
||||
ParamParser pp(cmd, L" ");
|
||||
int i = debuggercommands.getId(pp.enumItem(0));
|
||||
switch (i)
|
||||
{
|
||||
case DEBUG_CMD_BREAKPOINT:
|
||||
addBreakPoint(pp.enumItem(1));
|
||||
break;
|
||||
case DEBUG_CMD_CONTINUE:
|
||||
continueExecution();
|
||||
break;
|
||||
case DEBUG_CMD_STEPINTO:
|
||||
stepInto();
|
||||
break;
|
||||
case DEBUG_CMD_STEPOVER:
|
||||
stepOver();
|
||||
break;
|
||||
case DEBUG_CMD_KILL:
|
||||
killScript();
|
||||
break;
|
||||
case DEBUG_CMD_HELP:
|
||||
showHelp();
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
||||
int SimpleDebuggerUI::evaluate(const wchar_t *ascii)
|
||||
{
|
||||
if (!_wcsicmp(ascii, L"VSD")) return jitd->getVSD();
|
||||
if (!_wcsicmp(ascii, L"VIP")) return jitd->getVIP();
|
||||
if (!_wcsicmp(ascii, L"VSP")) return jitd->getVSP();
|
||||
if (!_wcsicmp(ascii, L"VCC")) return jitd->getVCC();
|
||||
wchar_t *end;
|
||||
return wcstol(ascii, &end, 16);
|
||||
}
|
||||
|
||||
void SimpleDebuggerUI::addBreakPoint(const wchar_t *pointer_ascii)
|
||||
{
|
||||
/*int i = */evaluate(pointer_ascii);
|
||||
}
|
||||
|
||||
void SimpleDebuggerUI::continueExecution()
|
||||
{
|
||||
retcode = JITD_RETURN_CONTINUE;
|
||||
leave = 1;
|
||||
}
|
||||
|
||||
void SimpleDebuggerUI::stepInto()
|
||||
{
|
||||
retcode = JITD_RETURN_STEPINTO;
|
||||
leave = 1;
|
||||
}
|
||||
|
||||
void SimpleDebuggerUI::stepOver()
|
||||
{
|
||||
int ln = jitd->findLine(jitd->getVIP());
|
||||
ln++;
|
||||
SourceCodeLine *l = jitd->enumLine(ln);
|
||||
|
||||
if (l != NULL) // else ret as last opcode
|
||||
jitd->setSysBreakpoint(l->getPointer());
|
||||
|
||||
retcode = JITD_RETURN_CONTINUE;
|
||||
leave = 1;
|
||||
}
|
||||
|
||||
void SimpleDebuggerUI::killScript()
|
||||
{
|
||||
retcode = JITD_RETURN_TERMINATE;
|
||||
leave = 1;
|
||||
}
|
||||
|
||||
void SimpleDebuggerUI::showHelp()
|
||||
{}
|
||||
|
||||
int SimpleDebuggerUI::onGetFocus()
|
||||
{
|
||||
SimpleDebuggerUI_PARENT::onGetFocus();
|
||||
if (edit) edit->onGetFocus();
|
||||
return 1;
|
||||
}
|
||||
|
||||
void SimpleDebuggerUI::onSetVisible(int show)
|
||||
{
|
||||
SimpleDebuggerUI_PARENT::onSetVisible(show);
|
||||
if (edit) edit->onGetFocus();
|
||||
}
|
||||
#undef fgets
|
||||
const wchar_t *SimpleDebuggerUI::getLine(const wchar_t *filename, int fileline)
|
||||
{
|
||||
if (fileline <= 0)
|
||||
return L"";
|
||||
static StringW str;
|
||||
FILE *f = _wfopen(filename, L"rt");
|
||||
if (!f)
|
||||
{
|
||||
str = L"couldn't load ";
|
||||
str += filename;
|
||||
return str;
|
||||
}
|
||||
|
||||
char t[256] = {0};
|
||||
char u[256] = {0};
|
||||
int n = fileline;
|
||||
while (n--)
|
||||
{
|
||||
*u = 0;
|
||||
char *p;
|
||||
do
|
||||
{
|
||||
p = *u ? t : u;
|
||||
fgets(p, 255, f);
|
||||
t[255] = 0;
|
||||
}
|
||||
while (!feof(f) && p[STRLEN(p)-1] != '\n' && p[STRLEN(p)-1] != '\r');
|
||||
}
|
||||
|
||||
char *p = u;
|
||||
while (p && *p && p < u + 256)
|
||||
{
|
||||
if (*p < 0x21) *p = ' ';
|
||||
p++;
|
||||
}
|
||||
|
||||
str = AutoWide(u, CP_UTF8);
|
||||
fclose(f);
|
||||
|
||||
return str;
|
||||
}
|
||||
|
||||
Loading…
Add table
Add a link
Reference in a new issue