all repos — mgba @ 220b786c9ccd74d7126aa8e3255d94c770f2510e

mGBA Game Boy Advance Emulator

Core: Add symbol lookups from scripts
Vicki Pfau vi@endrift.com
Sat, 15 Jul 2017 19:51:33 -0700
commit

220b786c9ccd74d7126aa8e3255d94c770f2510e

parent

6a3002d398033cb74d623bf9bf13ed5c6330c10b

M include/mgba/core/scripting.hinclude/mgba/core/scripting.h

@@ -24,6 +24,7 @@ void (*deinit)(struct mScriptEngine*);

bool (*isScript)(struct mScriptEngine*, const char* name, struct VFile* vf); bool (*loadScript)(struct mScriptEngine*, const char* name, struct VFile* vf); void (*run)(struct mScriptEngine*); + bool (*lookupSymbol)(struct mScriptEngine*, const char* name, int32_t* out); #ifdef USE_DEBUGGERS void (*debuggerEntered)(struct mScriptEngine*, enum mDebuggerEntryReason, struct mDebuggerEntryInfo*);

@@ -43,6 +44,8 @@ #endif

void mScriptBridgeRun(struct mScriptBridge*); bool mScriptBridgeLoadScript(struct mScriptBridge*, const char* name); + +bool mScriptBridgeLookupSymbol(struct mScriptBridge*, const char* name, int32_t* out); CXX_GUARD_END
M src/core/scripting.csrc/core/scripting.c

@@ -19,6 +19,12 @@ struct VFile* vf;

bool success; }; +struct mScriptSymbol { + const char* name; + int32_t* out; + bool success; +}; + static void _seDeinit(void* value) { struct mScriptEngine* se = value; se->deinit(se);

@@ -30,6 +36,15 @@ struct mScriptEngine* se = value;

struct mScriptInfo* si = user; if (!si->success && se->isScript(se, si->name, si->vf)) { si->success = se->loadScript(se, si->name, si->vf); + } +} + +static void _seLookupSymbol(const char* key, void* value, void* user) { + UNUSED(key); + struct mScriptEngine* se = value; + struct mScriptSymbol* si = user; + if (!si->success) { + si->success = se->lookupSymbol(se, si->name, si->out); } }

@@ -111,3 +126,13 @@ HashTableEnumerate(&sb->engines, _seTryLoad, &info);

vf->close(vf); return info.success; } + +bool mScriptBridgeLookupSymbol(struct mScriptBridge* sb, const char* name, int32_t* out) { + struct mScriptSymbol info = { + .name = name, + .out = out, + .success = false + }; + HashTableEnumerate(&sb->engines, _seLookupSymbol, &info); + return info.success; +}
M src/debugger/cli-debugger.csrc/debugger/cli-debugger.c

@@ -551,6 +551,11 @@ static void _lookupIdentifier(struct mDebugger* debugger, const char* name, struct CLIDebugVector* dv) {

struct CLIDebugger* cliDebugger = (struct CLIDebugger*) debugger; if (cliDebugger->system) { uint32_t value; +#ifdef ENABLE_SCRIPTING + if (debugger->bridge && mScriptBridgeLookupSymbol(debugger->bridge, name, &dv->intValue)) { + return; + } +#endif if (debugger->core->symbolTable && mDebuggerSymbolLookup(debugger->core->symbolTable, name, &dv->intValue, &dv->segmentValue)) { return; }
M src/platform/python/_builder.pysrc/platform/python/_builder.py

@@ -72,22 +72,26 @@ ffi.embedding_api('\n'.join(lines))

ffi.embedding_init_code(""" from mgba._pylib import ffi, lib - debugger = None + symbols = {} + globalSyms = { + 'symbols': symbols + } pendingCode = [] @ffi.def_extern() - def mPythonSetDebugger(_debugger): + def mPythonSetDebugger(debugger): from mgba.debugger import NativeDebugger, CLIDebugger - global debugger - if debugger and debugger._native == _debugger: + oldDebugger = globalSyms.get('debugger') + if oldDebugger and oldDebugger._native == debugger: return - if not _debugger: - debugger = None + if oldDebugger and not debugger: + del globalSyms['debugger'] return - if _debugger.type == lib.DEBUGGER_CLI: - debugger = CLIDebugger(_debugger) + if debugger.type == lib.DEBUGGER_CLI: + debugger = CLIDebugger(debugger) else: - debugger = NativeDebugger(_debugger) + debugger = NativeDebugger(debugger) + globalSyms['debugger'] = debugger @ffi.def_extern() def mPythonLoadScript(name, vf):

@@ -106,18 +110,40 @@ @ffi.def_extern()

def mPythonRunPending(): global pendingCode for code in pendingCode: - exec(code) + exec(code, globalSyms, {}) pendingCode = [] @ffi.def_extern() def mPythonDebuggerEntered(reason, info): - global debugger + debugger = globalSyms['debugger'] if not debugger: return if info == ffi.NULL: info = None for cb in debugger._cbs: cb(reason, info) + + @ffi.def_extern() + def mPythonLookupSymbol(name, outptr): + name = ffi.string(name).decode('utf-8') + if name not in symbols: + return False + sym = symbols[name] + val = None + try: + val = int(sym) + except: + try: + val = sym() + except: + pass + if val is None: + return False + try: + outptr[0] = ffi.cast('int32_t', val) + return True + except: + return False """) if __name__ == "__main__":
M src/platform/python/engine.csrc/platform/python/engine.c

@@ -21,6 +21,7 @@ static void mPythonScriptEngineDeinit(struct mScriptEngine*);

static bool mPythonScriptEngineIsScript(struct mScriptEngine*, const char* name, struct VFile* vf); static bool mPythonScriptEngineLoadScript(struct mScriptEngine*, const char* name, struct VFile* vf); static void mPythonScriptEngineRun(struct mScriptEngine*); +static bool mPythonScriptEngineLookupSymbol(struct mScriptEngine*, const char* name, int32_t* out); #ifdef USE_DEBUGGERS static void mPythonScriptDebuggerEntered(struct mScriptEngine*, enum mDebuggerEntryReason, struct mDebuggerEntryInfo*);

@@ -39,6 +40,7 @@ engine->d.deinit = mPythonScriptEngineDeinit;

engine->d.isScript = mPythonScriptEngineIsScript; engine->d.loadScript = mPythonScriptEngineLoadScript; engine->d.run = mPythonScriptEngineRun; + engine->d.lookupSymbol = mPythonScriptEngineLookupSymbol; #ifdef USE_DEBUGGERS engine->d.debuggerEntered = mPythonScriptDebuggerEntered; #endif

@@ -87,6 +89,11 @@ mPythonSetDebugger(debugger);

} mPythonRunPending(); +} + +bool mPythonScriptEngineLookupSymbol(struct mScriptEngine* se, const char* name, int32_t* out) { + struct mPythonScriptEngine* engine = (struct mPythonScriptEngine*) se; + return mPythonLookupSymbol(name, out); } #ifdef USE_DEBUGGERS
M src/platform/python/lib.hsrc/platform/python/lib.h

@@ -4,6 +4,7 @@ struct VFile;

extern bool mPythonLoadScript(const char*, struct VFile*); extern void mPythonRunPending(); +extern bool mPythonLookupSymbol(const char* name, int32_t* out); #ifdef USE_DEBUGGERS extern void mPythonSetDebugger(struct mDebugger*);