84 lines
1.7 KiB
C
84 lines
1.7 KiB
C
#include "script.h"
|
|
#include "log.h"
|
|
#include "jsffi.h"
|
|
#include "stb_ds.h"
|
|
#include "resources.h"
|
|
|
|
#include <stdarg.h>
|
|
|
|
JSContext *js = NULL;
|
|
JSRuntime *rt = NULL;
|
|
|
|
#ifndef NDEBUG
|
|
#define JS_EVAL_FLAGS JS_EVAL_FLAG_STRICT
|
|
#else
|
|
#define JS_EVAL_FLAGS JS_EVAL_FLAG_STRICT | JS_EVAL_FLAG_STRIP
|
|
#endif
|
|
|
|
void script_startup() {
|
|
rt = JS_NewRuntime();
|
|
js = JS_NewContext(rt);
|
|
|
|
ffi_load();
|
|
|
|
size_t len;
|
|
char *eng = slurp_text("scripts/engine.js", &len);
|
|
script_eval("scripts/engine.js", eng);
|
|
free(eng);
|
|
}
|
|
|
|
void script_stop()
|
|
{
|
|
script_evalf("prosperon.quit();");
|
|
|
|
#if LEAK
|
|
JS_FreeContext(js);
|
|
JS_FreeRuntime(rt);
|
|
#endif
|
|
}
|
|
|
|
void script_gc() { JS_RunGC(rt); }
|
|
|
|
void js_stacktrace() {
|
|
#ifndef NDEBUG
|
|
script_evalf("console.stack();");
|
|
#endif
|
|
}
|
|
|
|
void script_evalf(const char *format, ...)
|
|
{
|
|
char fmtbuf[4096];
|
|
va_list args;
|
|
va_start(args, format);
|
|
vsnprintf(fmtbuf, 4096, format, args);
|
|
va_end(args);
|
|
|
|
JSValue obj = JS_Eval(js, fmtbuf, strlen(fmtbuf), "C eval", JS_EVAL_FLAGS);
|
|
js_print_exception(obj);
|
|
JS_FreeValue(js,obj);
|
|
}
|
|
|
|
JSValue script_eval(const char *file, const char *script)
|
|
{
|
|
JSValue v = JS_Eval(js, script, strlen(script), file, JS_EVAL_FLAGS | JS_EVAL_FLAG_COMPILE_ONLY);
|
|
js_print_exception(v);
|
|
return JS_EvalFunction(js, v);
|
|
}
|
|
|
|
void script_call_sym(JSValue sym, int argc, JSValue *argv) {
|
|
if (!JS_IsFunction(js, sym)) return;
|
|
JSValue ret = JS_Call(js, sym, JS_GetGlobalObject(js), argc, argv);
|
|
js_print_exception(ret);
|
|
JS_FreeValue(js, ret);
|
|
}
|
|
|
|
void out_memusage(const char *file)
|
|
{
|
|
FILE *f = fopen(file, "w");
|
|
if (!f) return;
|
|
JSMemoryUsage jsmem;
|
|
JS_ComputeMemoryUsage(rt, &jsmem);
|
|
JS_DumpMemoryUsage(f, &jsmem, rt);
|
|
fclose(f);
|
|
}
|