#include "pl_eval.h"
#include "pl_inlined.h"
#include "ppport.h"
typedef
int
(*BeforeCB)(V8Context* ctx);
static
struct
{
const
char
* file_name;
const
char
* source;
} js_inlined[] = {
{
"c_eventloop.js"
,
"/*\n"
" * C eventloop example (c_eventloop.c).\n"
" *\n"
" * Ecmascript code to initialize the exposed API (setTimeout() etc) when\n"
" * using the C eventloop.\n"
" *\n"
" */\n"
"\n"
"/*\n"
" * Timer API\n"
" */\n"
"\n"
"function setTimeout(func, delay) {\n"
" var cb_func;\n"
" var bind_args;\n"
" var timer_id;\n"
"\n"
" // Delay can be optional at least in some contexts, so tolerate that.\n"
" if (typeof delay !== 'number') {\n"
" if (typeof delay === 'undefined') {\n"
" delay = 0;\n"
" } else {\n"
" throw new TypeError('invalid delay');\n"
" }\n"
" }\n"
"\n"
" if (typeof func === 'string') {\n"
" // Legacy case: callback is a string.\n"
" cb_func = eval.bind(this, func);\n"
" } else if (typeof func !== 'function') {\n"
" throw new TypeError('callback is not a function/string');\n"
" } else if (arguments.length > 2) {\n"
" // Special case: callback arguments are provided.\n"
" bind_args = Array.prototype.slice.call(arguments, 2); // [ arg1, arg2, ... ]\n"
" bind_args.unshift(this); // [ global(this), arg1, arg2, ... ]\n"
" cb_func = func.bind.apply(func, bind_args);\n"
" } else {\n"
" // Normal case: callback given as a function without arguments.\n"
" cb_func = func;\n"
" }\n"
"\n"
" timer_id = EventLoop.createTimer(cb_func, delay, true /*oneshot*/);\n"
"\n"
" return timer_id;\n"
"}\n"
"\n"
"function clearTimeout(timer_id) {\n"
" if (typeof timer_id !== 'number') {\n"
" throw new TypeError('timer ID is not a number');\n"
" }\n"
" var success = EventLoop.deleteTimer(timer_id); /* retval ignored */\n"
"}\n"
"\n"
"function setInterval(func, delay) {\n"
" var cb_func;\n"
" var bind_args;\n"
" var timer_id;\n"
"\n"
" if (typeof delay !== 'number') {\n"
" if (typeof delay === 'undefined') {\n"
" delay = 0;\n"
" } else {\n"
" throw new TypeError('invalid delay');\n"
" }\n"
" }\n"
"\n"
" if (typeof func === 'string') {\n"
" // Legacy case: callback is a string.\n"
" cb_func = eval.bind(this, func);\n"
" } else if (typeof func !== 'function') {\n"
" throw new TypeError('callback is not a function/string');\n"
" } else if (arguments.length > 2) {\n"
" // Special case: callback arguments are provided.\n"
" bind_args = Array.prototype.slice.call(arguments, 2); // [ arg1, arg2, ... ]\n"
" bind_args.unshift(this); // [ global(this), arg1, arg2, ... ]\n"
" cb_func = func.bind.apply(func, bind_args);\n"
" } else {\n"
" // Normal case: callback given as a function without arguments.\n"
" cb_func = func;\n"
" }\n"
"\n"
" timer_id = EventLoop.createTimer(cb_func, delay, false /*oneshot*/);\n"
"\n"
" return timer_id;\n"
"}\n"
"\n"
"function clearInterval(timer_id) {\n"
" if (typeof timer_id !== 'number') {\n"
" throw new TypeError('timer ID is not a number');\n"
" }\n"
" EventLoop.deleteTimer(timer_id);\n"
"}\n"
"\n"
},
{
"log_cyclic.js"
,
"function JSON_stringify_with_cycles(obj) {\n"
" function getCircularReplacer() {\n"
" const seen = new WeakMap();\n"
" let count = 0;\n"
" return (key, value) => {\n"
" if (typeof value === \"object\" && value !== null) {\n"
" if (seen.has(value)) {\n"
" return \"<cycle\" + seen.get(value) + \">\";\n"
" }\n"
" seen.set(value, count++);\n"
" }\n"
" return value;\n"
" };\n"
" };\n"
"\n"
" return JSON.stringify(obj, getCircularReplacer());\n"
"};\n"
"\n"
},
};
void
pl_register_inlined_functions(V8Context* ctx)
{
size_t
j = 0;
dTHX;
for
(j = 0; j <
sizeof
(js_inlined) /
sizeof
(js_inlined[0]); ++j) {
pl_eval(aTHX_ ctx, js_inlined[j].source, js_inlined[j].file_name);
}
}