mirror of
https://github.com/radareorg/radare2.git
synced 2024-11-23 13:19:54 +00:00
Integrate the qjs repl into the js: command ##lang
This commit is contained in:
pancake
pancake
parent
9a9177736d
commit
a6a0b41bac
2
dist/wapm/r2/wapm.toml
vendored
2
dist/wapm/r2/wapm.toml
vendored
@ -1,6 +1,6 @@
|
||||
[package]
|
||||
name = "pancake/r2"
|
||||
version = "5.7.11"
|
||||
version = "5.7.12"
|
||||
description = "Unix-Like Reverse Engineering Framework"
|
||||
readme = "README.md"
|
||||
license = "LGPL3"
|
||||
|
||||
@ -104,6 +104,7 @@ static RCoreHelpMessage help_msg_j = {
|
||||
"js", " [expr]", "run given javascript expression",
|
||||
"js-", "", "read from stdin until ^D",
|
||||
"js!", "", "reset js vm (same as #!!)",
|
||||
"js:", "", "enter the interactive repl with autocompletion and colors",
|
||||
"js:", "[file]", "interpret javascript file",
|
||||
"join", " f1 f2", "join the contents of two files",
|
||||
NULL
|
||||
@ -1563,6 +1564,8 @@ static int cmd_l(void *data, const char *input) { // "l"
|
||||
return 0;
|
||||
}
|
||||
|
||||
#include "../../shlr/qjs/repl.c"
|
||||
|
||||
static int cmd_join(void *data, const char *input) { // "join"
|
||||
RCore *core = (RCore *)data;
|
||||
if (r_str_startswith (input, "i:")) {
|
||||
@ -1575,7 +1578,19 @@ static int cmd_join(void *data, const char *input) { // "join"
|
||||
}
|
||||
if (input[0] == 's') { // "js"
|
||||
if (input[1] == ':' || input[1] == '.') { // "js:"
|
||||
if (input[2]) {
|
||||
r_core_cmdf (core, ". %s", input + 2);
|
||||
} else {
|
||||
if (r_config_get_b (core->config, "scr.interactive")) {
|
||||
if (r_lang_use (core->lang, "qjs")) {
|
||||
r_lang_run (core->lang, repl_qjs, strlen (repl_qjs));
|
||||
} else {
|
||||
R_LOG_ERROR ("Requires lang.qjs");
|
||||
}
|
||||
} else {
|
||||
R_LOG_ERROR ("Requires scr.interactive");
|
||||
}
|
||||
}
|
||||
} else if (input[1] == '!') { // "js!"
|
||||
r_lang_setup (core->lang);
|
||||
} else if (input[1] == '-') { // "js-"
|
||||
|
||||
@ -125,7 +125,7 @@ static JSValue js_os_read_write(JSContext *ctx, JSValueConst this_val, int argc,
|
||||
int fd;
|
||||
uint64_t pos, len;
|
||||
size_t size;
|
||||
ssize_t ret;
|
||||
int ret;
|
||||
uint8_t *buf;
|
||||
|
||||
if (JS_ToInt32(ctx, &fd, argv[0]))
|
||||
|
||||
@ -36,7 +36,20 @@ src:
|
||||
sed -i -e 's/CONFIG_VERSION/"$(QJS_VERSION)"/' src/quickjs.c
|
||||
git add src
|
||||
|
||||
lang_qjs.${EXT_SO}: src
|
||||
repl.c:
|
||||
# goto this s
|
||||
# 19K https://www.toptal.com/developers/javascript-minifier
|
||||
# ??K
|
||||
npx minify --help > /dev/null npm i minify
|
||||
npx minify --js < repl.qjs > mini.qjs
|
||||
# 20K uglify
|
||||
npx uglify-js --help > /dev/null || npm i uglify-js
|
||||
npx uglify-js --no-annotations --toplevel --validate -c < mini.qjs > tiny.qjs
|
||||
npx minify --help > /dev/null npm i minify
|
||||
npx minify --js < tiny.qjs > mini.qjs
|
||||
r2 -fqcpcc mini.qjs | sed -e 's,unsigned char cstr,char repl_qjs,' > repl.c
|
||||
|
||||
lang_qjs.${EXT_SO}: src repl.c
|
||||
# $(MAKE) CFLAGS_OPT="-Oz -DCONFIG_VERSION=\\\"0.1\\\"" -C $(QJS_NAME) libquickjs.a
|
||||
#-Wl,-exported_symbols_list,symbols.lst
|
||||
-$(CC) -flto -D 'CONFIG_VERSION="$(VERSION)"' -g -Oz -Wl,-dead_strip -std=c99 $(DUK_CFLAGS) -I quickjs $(QJS_CFLAGS) $(CFLAGS) -fPIC $(LDFLAGS_LIB) \
|
||||
|
||||
322
shlr/qjs/repl.c
Normal file
322
shlr/qjs/repl.c
Normal file
@ -0,0 +1,322 @@
|
||||
const char *const repl_qjs = ""\
|
||||
"import(\"os\").catch(console.error).then((os=>{!function(g){g.o"\
|
||||
"s=os;let running=!0;const Object=g.Object,String=g.String,Arr"\
|
||||
"ay=g.Array,Date=g.Date,Math=g.Math,isFinite=g.isFinite,parseF"\
|
||||
"loat=g.parseFloat,config_numcalc=!1,has_jscalc=\"function\"==ty"\
|
||||
"peof Fraction,has_bignum=\"function\"==typeof BigFloat,colors={"\
|
||||
"none:\"\x1b[0m\",black:\"\x1b[30m\",red:\"\x1b[31m\",green:\"\x1b[32"\
|
||||
"m\",yellow:\"\x1b[33m\",blue:\"\x1b[34m\",magenta:\"\x1b[35m\",cyan:"\
|
||||
"\"\x1b[36m\",white:\"\x1b[37m\",gray:\"\x1b[30;1m\",grey:\"\x1b[30;1"\
|
||||
"m\",bright_red:\"\x1b[31;1m\",bright_green:\"\x1b[32;1m\",bright_y"\
|
||||
"ellow:\"\x1b[33;1m\",bright_blue:\"\x1b[34;1m\",bright_magenta:\"\x1b"\
|
||||
"[35;1m\",bright_cyan:\"\x1b[36;1m\",bright_white:\"\x1b[37;1m\"};l"\
|
||||
"et styles;styles=config_numcalc?{default:\"black\",comment:\"whi"\
|
||||
"te\",string:\"green\",regex:\"cyan\",number:\"green\",keyword:\"blue\""\
|
||||
",function:\"gray\",type:\"magenta\",identifier:\"yellow\",error:\"br"\
|
||||
"ight_red\",result:\"black\",error_msg:\"bright_red\"}:{default:\"wh"\
|
||||
"ite\",comment:\"white\",string:\"cyan\",regex:\"cyan\",number:\"green"\
|
||||
"\",keyword:\"magenta\",function:\"yellow\",type:\"magenta\",identifi"\
|
||||
"er:\"green\",error:\"red\",result:\"bright_white\",error_msg:\"brigh"\
|
||||
"t_red\"};const history=[];let clip_board=\"\",prec,expBits,log2_"\
|
||||
"10,pstate=\"\",prompt=\"\",plen=0,ps1;ps1=config_numcalc?\"> \":\"qj"\
|
||||
"s> \";const ps2=\" ... \",utf8=!0;let show_time=!1,show_colors=!"\
|
||||
"0,eval_time=0,mexpr=\"\",level=0,cmd=\"\",cursor_pos=0,last_cmd=\""\
|
||||
"\",last_cursor_pos=0,history_index,this_fun,last_fun,quote_fla"\
|
||||
"g=!1,utf8_state=0,utf8_val=0,term_fd,term_read_buf,term_width"\
|
||||
",term_cursor_x=0;function termInit(){for(term_fd=0,term_width"\
|
||||
"=+r2cmd(\"?vi:$c\"),term_read_buf=new Uint8Array(64),cmd_start("\
|
||||
"),running=!0;running;)try{term_read_handler(),flush()}catch(e"\
|
||||
"){console.error(e)}}function term_read_handler(){var e=os.rea"\
|
||||
"d(term_fd,term_read_buf.buffer,0,term_read_buf.length);for(le"\
|
||||
"t r=0;r<e;r++)handle_byte(term_read_buf[r])}function handle_b"\
|
||||
"yte(e){utf8?0!==utf8_state&&128<=e&&e<192?(utf8_val=utf8_val<"\
|
||||
"<6|63&e,0==--utf8_state&&handle_char(utf8_val)):192<=e&&e<248"\
|
||||
"?(utf8_state=1+(224<=e)+(240<=e),utf8_val=e&(1<<6-utf8_state)"\
|
||||
"-1):(utf8_state=0,handle_char(e)):handle_char(e)}function is_"\
|
||||
"alpha(e){return\"string\"==typeof e&&(\"A\"<=e&&e<=\"Z\"||\"a\"<=e&&e"\
|
||||
"<=\"z\")}function is_digit(e){return\"string\"==typeof e&&\"0\"<=e&"\
|
||||
"&e<=\"9\"}function is_word(e){return\"string\"==typeof e&&(is_alp"\
|
||||
"ha(e)||is_digit(e)||\"_\"===e||\"$\"===e)}function ucs_length(e){"\
|
||||
"let r,t,n;var o=e.length;for(r=0,n=0;n<o;n++)((t=e.charCodeAt"\
|
||||
"(n))<56320||57344<=t)&&r++;return r}function is_trailing_surr"\
|
||||
"ogate(e){if(\"string\"==typeof e)return 56320<=(e=e.codePointAt"\
|
||||
"(0))&&e<57344}function is_balanced(e,r){switch(e+r){case\"()\":"\
|
||||
"case\"[]\":case\"{}\":return 1}}function print_color_text(e,r,t){"\
|
||||
"let n,o;for(o=r;o<e.length;){const r=t[n=o];for(;++o<e.length"\
|
||||
"&&t[o]===r;);write(colors[styles[r]||\"default\"]),write(e.subs"\
|
||||
"tring(n,o)),write(colors.none)}}function print_csi(e,r){write"\
|
||||
"(\"\x1b[\"+(1!==e?e:\"\")+r)}function move_cursor(e){let r;if(0<e"\
|
||||
")for(;0!==e;)term_cursor_x===term_width-1?(write(\"\\n\"),term_c"\
|
||||
"ursor_x=0,e--):(print_csi(r=Math.min(term_width-1-term_cursor"\
|
||||
"_x,e),\"C\"),e-=r,term_cursor_x+=r);else for(e=-e;0!==e;)0===te"\
|
||||
"rm_cursor_x?(print_csi(1,\"A\"),print_csi(term_width-1,\"C\"),e--"\
|
||||
",term_cursor_x=term_width-1):(print_csi(r=Math.min(e,term_cur"\
|
||||
"sor_x),\"D\"),e-=r,term_cursor_x-=r)}function update(){var e;cm"\
|
||||
"d!==last_cmd&&(show_colors||last_cmd.substring(0,last_cursor_"\
|
||||
"pos)!==cmd.substring(0,last_cursor_pos)?(move_cursor(-ucs_len"\
|
||||
"gth(last_cmd.substring(0,last_cursor_pos))),show_colors?print"\
|
||||
"_color_text(e=mexpr?mexpr+\"\\n\"+cmd:cmd,e.length-cmd.length,co"\
|
||||
"lorize_js(e)[2]):write(cmd)):write(cmd.substring(last_cursor_"\
|
||||
"pos)),0==(term_cursor_x=(term_cursor_x+ucs_length(cmd))%term_"\
|
||||
"width)&&write(\" \\b\"),write(\"\x1b[J\"),last_cmd=cmd,last_cursor"\
|
||||
"_pos=cmd.length),cursor_pos>last_cursor_pos?move_cursor(ucs_l"\
|
||||
"ength(cmd.substring(last_cursor_pos,cursor_pos))):cursor_pos<"\
|
||||
"last_cursor_pos&&move_cursor(-ucs_length(cmd.substring(cursor"\
|
||||
"_pos,last_cursor_pos))),last_cursor_pos=cursor_pos,flush()}fu"\
|
||||
"nction insert(e){e&&(cmd=cmd.substring(0,cursor_pos)+e+cmd.su"\
|
||||
"bstring(cursor_pos),cursor_pos+=e.length)}function quoted_ins"\
|
||||
"ert(){quote_flag=!0}function abort(){return cmd=\"\",cursor_pos"\
|
||||
"=0,-2}function alert(){}function beginning_of_line(){cursor_p"\
|
||||
"os=0}function end_of_line(){cursor_pos=cmd.length}function fo"\
|
||||
"rward_char(){if(cursor_pos<cmd.length)for(cursor_pos++;is_tra"\
|
||||
"iling_surrogate(cmd.charAt(cursor_pos));)cursor_pos++}functio"\
|
||||
"n backward_char(){if(0<cursor_pos)for(cursor_pos--;is_trailin"\
|
||||
"g_surrogate(cmd.charAt(cursor_pos));)cursor_pos--}function sk"\
|
||||
"ip_word_forward(e){for(;e<cmd.length&&!is_word(cmd.charAt(e))"\
|
||||
";)e++;for(;e<cmd.length&&is_word(cmd.charAt(e));)e++;return e"\
|
||||
"}function skip_word_backward(e){for(;0<e&&!is_word(cmd.charAt"\
|
||||
"(e-1));)e--;for(;0<e&&is_word(cmd.charAt(e-1));)e--;return e}"\
|
||||
"function forward_word(){cursor_pos=skip_word_forward(cursor_p"\
|
||||
"os)}function backward_word(){cursor_pos=skip_word_backward(cu"\
|
||||
"rsor_pos)}function accept_line(){return write(\"\\n\"),history_a"\
|
||||
"dd(cmd),-1}function history_add(e){e&&history.push(e),history"\
|
||||
"_index=history.length}function previous_history(){0<history_i"\
|
||||
"ndex&&(history_index===history.length&&history.push(cmd),hist"\
|
||||
"ory_index--,cmd=history[history_index],cursor_pos=cmd.length)"\
|
||||
"}function next_history(){history_index<history.length-1&&(his"\
|
||||
"tory_index++,cmd=history[history_index],cursor_pos=cmd.length"\
|
||||
")}function history_search(e){var r=cursor_pos;for(let n=1;n<="\
|
||||
"history.length;n++){var t=(history.length+n*e+history_index)%"\
|
||||
"history.length;if(history[t].substring(0,r)===cmd.substring(0"\
|
||||
",r))return history_index=t,void(cmd=history[t])}}function his"\
|
||||
"tory_search_backward(){return history_search(-1)}function his"\
|
||||
"tory_search_forward(){return history_search(1)}function delet"\
|
||||
"e_char_dir(e){let r,t;if(r=cursor_pos,e<0)for(r--;is_trailing"\
|
||||
"_surrogate(cmd.charAt(r));)r--;for(t=r+1;is_trailing_surrogat"\
|
||||
"e(cmd.charAt(t));)t++;0<=r&&r<cmd.length&&(last_fun===kill_re"\
|
||||
"gion?kill_region(r,t,e):(cmd=cmd.substring(0,r)+cmd.substring"\
|
||||
"(t),cursor_pos=r))}function delete_char(){delete_char_dir(1)}"\
|
||||
"function control_d(){if(0===cmd.length)return write(\"\\n\"),run"\
|
||||
"ning=!1,-3;delete_char_dir(1)}function backward_delete_char()"\
|
||||
"{delete_char_dir(-1)}function transpose_chars(){let e=cursor_"\
|
||||
"pos;1<cmd.length&&0<e&&(e===cmd.length&&e--,cmd=cmd.substring"\
|
||||
"(0,e-1)+cmd.substring(e,e+1)+cmd.substring(e-1,e)+cmd.substri"\
|
||||
"ng(e+1),cursor_pos=e+1)}function transpose_words(){var e=skip"\
|
||||
"_word_backward(cursor_pos),r=skip_word_forward(e),t=skip_word"\
|
||||
"_forward(cursor_pos),n=skip_word_backward(t);e<r&&r<=cursor_p"\
|
||||
"os&&cursor_pos<=n&&n<t&&(cmd=cmd.substring(0,e)+cmd.substring"\
|
||||
"(n,t)+cmd.substring(r,n)+cmd.substring(e,r),cursor_pos=t)}fun"\
|
||||
"ction upcase_word(){var e=skip_word_forward(cursor_pos);cmd=c"\
|
||||
"md.substring(0,cursor_pos)+cmd.substring(cursor_pos,e).toUppe"\
|
||||
"rCase()+cmd.substring(e)}function downcase_word(){var e=skip_"\
|
||||
"word_forward(cursor_pos);cmd=cmd.substring(0,cursor_pos)+cmd."\
|
||||
"substring(cursor_pos,e).toLowerCase()+cmd.substring(e)}functi"\
|
||||
"on kill_region(e,r,t){var n=cmd.substring(e,r);last_fun!==kil"\
|
||||
"l_region?clip_board=n:t<0?clip_board=n+clip_board:clip_board+"\
|
||||
"=n,cmd=cmd.substring(0,e)+cmd.substring(r),cursor_pos>r?curso"\
|
||||
"r_pos-=r-e:cursor_pos>e&&(cursor_pos=e),this_fun=kill_region}"\
|
||||
"function kill_line(){kill_region(cursor_pos,cmd.length,1)}fun"\
|
||||
"ction backward_kill_line(){kill_region(0,cursor_pos,-1)}funct"\
|
||||
"ion kill_word(){kill_region(cursor_pos,skip_word_forward(curs"\
|
||||
"or_pos),1)}function backward_kill_word(){kill_region(skip_wor"\
|
||||
"d_backward(cursor_pos),cursor_pos,-1)}function yank(){insert("\
|
||||
"clip_board)}function control_c(){console.log(\"^C\"),reset(),re"\
|
||||
"adline_print_prompt()}function reset(){cmd=\"\",cursor_pos=0}fu"\
|
||||
"nction get_context_word(e,r){let t=\"\";for(;0<r&&is_word(e[r-1"\
|
||||
"]);)t=e[--r]+t;return t}function get_context_object(line,pos)"\
|
||||
"{let obj,base,c;if(pos<=0||0<=\" ~!%^&*(-+={[|:;,<>?/\".indexOf"\
|
||||
"(line[pos-1]))return g;if(2<=pos&&\".\"===line[pos-1])switch(po"\
|
||||
"s--,obj={},c=line[pos-1]){case\"'\":case'\"':return\"a\";case\"]\":r"\
|
||||
"eturn[];case\"}\":return{};case\"/\":return/ /;default:return is_"\
|
||||
"word(c)?(base=get_context_word(line,pos),[\"true\",\"false\",\"nul"\
|
||||
"l\",\"this\"].includes(base)||!isNaN(+base)?eval(base):(obj=get_"\
|
||||
"context_object(line,pos-base.length),null==obj?obj:obj===g&&v"\
|
||||
"oid 0===obj[base]?eval(base):obj[base])):{}}}function get_com"\
|
||||
"pletions(e,r){let t,n,o;var i=get_context_word(e,r),s=[];for("\
|
||||
"n=0,t=e=get_context_object(e,r-i.length);n<10&&null!=t;n++){c"\
|
||||
"onst e=Object.getOwnPropertyNames(t);for(o=0;o<e.length;o++){"\
|
||||
"const r=e[o];\"string\"==typeof r&&\"\"+ +r!==r&&r.startsWith(i)&"\
|
||||
"&s.push(r)}t=Object.getPrototypeOf(t)}if(1<s.length){for(s.so"\
|
||||
"rt((function(e,r){if(e[0]!==r[0]){if(\"_\"===e[0])return 1;if(\""\
|
||||
"_\"===r[0])return-1}return e<r?-1:r<e?1:0})),n=o=1;n<s.length;"\
|
||||
"n++)s[n]!==s[n-1]&&(s[o++]=s[n]);s.length=o}return{tab:s,pos:"\
|
||||
"i.length,ctx:e}}function completion(){let e,r,t,n,o,i,s,c,a,l"\
|
||||
";var _=get_completions(cmd,cursor_pos),u=_.tab;if(0!==u.lengt"\
|
||||
"h){for(e=u[0],n=e.length,r=1;r<u.length;r++)for(o=u[r],t=0;t<"\
|
||||
"n;t++)if(o[t]!==e[t]){n=t;break}for(r=_.pos;r<n;r++)insert(e["\
|
||||
"r]);if(last_fun===completion&&1===u.length){const e=_.ctx[u[0"\
|
||||
"]];\"function\"==typeof e?(insert(\"(\"),0===e.length&&insert(\")\""\
|
||||
")):\"object\"==typeof e&&insert(\".\")}if(last_fun===completion&&"\
|
||||
"2<=u.length){for(i=0,r=0;r<u.length;r++)i=Math.max(i,u[r].len"\
|
||||
"gth);for(i+=2,c=Math.max(1,Math.floor((term_width+1)/i)),l=Ma"\
|
||||
"th.ceil(u.length/c),write(\"\\n\"),a=0;a<l;a++){for(s=0;s<c&&!(("\
|
||||
"r=s*l+a)>=u.length);s++)e=u[r],s!==c-1&&(e=e.padEnd(i)),write"\
|
||||
"(e);write(\"\\n\")}readline_print_prompt()}}}const commands={\"\x01"\
|
||||
"\":beginning_of_line,\"\x02\":backward_char,\"\x03\":control_c,\"\x04"\
|
||||
"\":control_d,\"\x05\":end_of_line,\"\x06\":forward_char,\"\x07\":abo"\
|
||||
"rt,\"\\b\":backward_delete_char,\"\\t\":completion,\"\\n\":accept_line"\
|
||||
",\"\\v\":kill_line,\"\\r\":accept_line,\"\x0e\":next_history,\"\x10\":p"\
|
||||
"revious_history,\"\x11\":quoted_insert,\"\x12\":alert,\"\x13\":aler"\
|
||||
"t,\"\x14\":transpose_chars,\"\x17\":backward_kill_word,\"\x18\":res"\
|
||||
"et,\"\x19\":yank,\"\x1bOA\":previous_history,\"\x1bOB\":next_histor"\
|
||||
"y,\"\x1bOC\":forward_char,\"\x1bOD\":backward_char,\"\x1bOF\":forwa"\
|
||||
"rd_word,\"\x1bOH\":backward_word,\"\x1b[1;5C\":forward_word,\"\x1b"\
|
||||
"[1;5D\":backward_word,\"\x1b[1~\":beginning_of_line,\"\x1b[3~\":de"\
|
||||
"lete_char,\"\x1b[4~\":end_of_line,\"\x1b[5~\":history_search_back"\
|
||||
"ward,\"\x1b[6~\":history_search_forward,\"\x1b[A\":previous_histo"\
|
||||
"ry,\"\x1b[B\":next_history,\"\x1b[C\":forward_char,\"\x1b[D\":backw"\
|
||||
"ard_char,\"\x1b[F\":end_of_line,\"\x1b[H\":beginning_of_line,\"\x1b"\
|
||||
"\x7f\":backward_kill_word,\"\x1bb\":backward_word,\"\x1bd\":kill_w"\
|
||||
"ord,\"\x1bf\":forward_word,\"\x1bk\":backward_kill_line,\"\x1bl\":d"\
|
||||
"owncase_word,\"\x1bt\":transpose_words,\"\x1bu\":upcase_word,\"\x7f"\
|
||||
"\":backward_delete_char};function dupstr(e,r){let t=\"\";for(;0<"\
|
||||
"r--;)t+=e;return t}let readline_keys,readline_state,readline_"\
|
||||
"cb;function readline_print_prompt(){write(prompt),term_cursor"\
|
||||
"_x=ucs_length(prompt)%term_width,last_cmd=\"\",last_cursor_pos="\
|
||||
"0}function readline_start(e,r){if(cmd=e||\"\",cursor_pos=cmd.le"\
|
||||
"ngth,history_index=history.length,readline_cb=r,prompt=pstate"\
|
||||
",mexpr)prompt=(prompt+=dupstr(\" \",plen-prompt.length))+ps2;el"\
|
||||
"se{if(show_time){let e=Math.round(eval_time)+\" \";eval_time=0,"\
|
||||
"e=dupstr(\"0\",5-e.length)+e,prompt+=e.substring(0,e.length-4)+"\
|
||||
"\".\"+e.substring(e.length-4)}plen=prompt.length,show_colors&&("\
|
||||
"prompt+=colors.yellow),prompt+=ps1,show_colors&&(prompt+=colo"\
|
||||
"rs.none)}readline_print_prompt(),update(),readline_state=0}fu"\
|
||||
"nction handle_char(e){var r=String.fromCodePoint(e);switch(re"\
|
||||
"adline_state){case 0:\"\x1b\"===r?(readline_keys=r,readline_sta"\
|
||||
"te=1):handle_key(r);break;case 1:readline_keys+=r,readline_st"\
|
||||
"ate=\"[\"===r?2:\"O\"===r?3:(handle_key(readline_keys),0);break;c"\
|
||||
"ase 2:readline_keys+=r,\";\"===r||\"0\"<=r&&r<=\"9\"||(handle_key(r"\
|
||||
"eadline_keys),readline_state=0);break;case 3:handle_key(readl"\
|
||||
"ine_keys+=r),readline_state=0}}function handle_key(e){var r;i"\
|
||||
"f(quote_flag)1===ucs_length(e)&&insert(e),quote_flag=!1;else "\
|
||||
"if(r=commands[e]){switch((this_fun=r)(e)){case-1:return readl"\
|
||||
"ine_cb(cmd);case-2:return readline_cb(null);case-3:return}las"\
|
||||
"t_fun=this_fun}else 1===ucs_length(e)&&\" \"<=e?(insert(e),last"\
|
||||
"_fun=insert):alert();cursor_pos=cursor_pos<0?0:cursor_pos>cmd"\
|
||||
".length?cmd.length:cursor_pos,update()}let hex_mode=!1,eval_m"\
|
||||
"ode=\"std\";function number_to_string(e,r){if(isFinite(e)){let "\
|
||||
"t;return 0===e?t=1/e<0?\"-0\":\"0\":16===r&&e===Math.floor(e)?(t="\
|
||||
"e<0?(e=-e,\"-\"):\"\",t+=\"0x\"+e.toString(16)):t=e.toString(),t}re"\
|
||||
"turn e.toString()}function bigfloat_to_string(e,r){let t;retu"\
|
||||
"rn BigFloat.isFinite(e)?(0===e?t=1/e<0?\"-0\":\"0\":16===r?(t=e<0"\
|
||||
"?(e=-e,\"-\"):\"\",t+=\"0x\"+e.toString(16)):t=e.toString(),\"bigflo"\
|
||||
"at\"==typeof e&&\"math\"!==eval_mode?t+=\"l\":\"std\"!==eval_mode&&t"\
|
||||
".indexOf(\".\")<0&&(16===r&&t.indexOf(\"p\")<0||10===r&&t.indexOf"\
|
||||
"(\"e\")<0)&&(t+=\".0\"),t):\"math\"!==eval_mode?\"BigFloat(\"+e.toStr"\
|
||||
"ing()+\")\":e.toString()}function bigint_to_string(e,r){let t;r"\
|
||||
"eturn 16===r?(t=e<0?(e=-e,\"-\"):\"\",t+=\"0x\"+e.toString(16)):t=e"\
|
||||
".toString(),\"std\"===eval_mode&&(t+=\"n\"),t}function print(e){c"\
|
||||
"onst r=[];!function e(t){let n,o,i,s,c;var a=typeof t;if(\"obj"\
|
||||
"ect\"==a)if(null===t)write(t);else if(0<=r.indexOf(t))write(\"["\
|
||||
"circular]\");else if(has_jscalc&&(t instanceof Fraction||t ins"\
|
||||
"tanceof Complex||t instanceof Mod||t instanceof Polynomial||t"\
|
||||
" instanceof PolyMod||t instanceof RationalFunction||t instanc"\
|
||||
"eof Series))write(t.toString());else{if(r.push(t),Array.isArr"\
|
||||
"ay(t)){for(n=t.length,write(\"[ \"),o=0;o<n;o++)if(0!==o&&write"\
|
||||
"(\", \"),o in t?e(t[o]):write(\"<empty>\"),20<o){write(\"...\");bre"\
|
||||
"ak}write(\" ]\")}else if(\"RegExp\"===Object.__getClass(t))write("\
|
||||
"t.toString());else{for(i=Object.keys(t),n=i.length,write(\"{ \""\
|
||||
"),o=0;o<n;o++)0!==o&&write(\", \"),s=i[o],write(s,\": \"),e(t[s])"\
|
||||
";write(\" }\")}r.pop(t)}else\"string\"==a?(79<(c=t.__quote()).len"\
|
||||
"gth&&(c=c.substring(0,75)+'...\"'),write(c)):\"number\"==a?write"\
|
||||
"(number_to_string(t,hex_mode?16:10)):\"bigint\"==a?write(bigint"\
|
||||
"_to_string(t,hex_mode?16:10)):\"bigfloat\"==a?write(bigfloat_to"\
|
||||
"_string(t,hex_mode?16:10)):\"bigdecimal\"==a?write(t.toString()"\
|
||||
"+\"m\"):\"symbol\"==a?write(String(t)):\"function\"==a?write(\"funct"\
|
||||
"ion \"+t.name+\"()\"):write(t)}(e)}function extract_directive(e)"\
|
||||
"{let r;if(\"\\\\\"!==e[0])return\"\";for(r=1;r<e.length&&is_alpha(e"\
|
||||
"[r]);r++);return e.substring(1,r)}function handle_directive(e"\
|
||||
",r){let t,n,o;if(\"h\"===e||\"?\"===e||\"help\"===e)help();else{if("\
|
||||
"\"load\"===e){let t=r.substring(e.length+1).trim();return t.las"\
|
||||
"tIndexOf(\".\")<=t.lastIndexOf(\"/\")&&(t+=\".js\"),0}if(\"x\"===e)he"\
|
||||
"x_mode=!0;else if(\"d\"===e)hex_mode=!1;else if(\"t\"===e)show_ti"\
|
||||
"me=!show_time;else{if(has_bignum&&\"p\"===e){if(1===(t=r.substr"\
|
||||
"ing(e.length+1).trim().split(\" \")).length&&\"\"===t[0])write(\"B"\
|
||||
"igFloat precision=\"+prec+\" bits (~\"+Math.floor(prec/log2_10)+"\
|
||||
"\" digits), exponent size=\"+expBits+\" bits\\n\");else if(\"f16\"=="\
|
||||
"=t[0])prec=11,expBits=5;else if(\"f32\"===t[0])prec=24,expBits="\
|
||||
"8;else if(\"f64\"===t[0])prec=53,expBits=11;else if(\"f128\"===t["\
|
||||
"0])prec=113,expBits=15;else{if(n=parseInt(t[0]),o=2<=t.length"\
|
||||
"?parseInt(t[1]):BigFloatEnv.expBitsMax,Number.isNaN(n)||n<Big"\
|
||||
"FloatEnv.precMin||n>BigFloatEnv.precMax)return write(\"Invalid"\
|
||||
" precision\\n\"),0;if(Number.isNaN(o)||o<BigFloatEnv.expBitsMin"\
|
||||
"||o>BigFloatEnv.expBitsMax)return write(\"Invalid exponent bit"\
|
||||
"s\\n\"),0;prec=n,expBits=o}return}if(has_bignum&&\"digits\"===e)r"\
|
||||
"eturn t=r.substring(e.length+1).trim(),(n=Math.ceil(parseFloa"\
|
||||
"t(t)*log2_10))<BigFloatEnv.precMin||n>BigFloatEnv.precMax?wri"\
|
||||
"te(\"Invalid precision\\n\"):(prec=n,expBits=BigFloatEnv.expBits"\
|
||||
"Max),0;if(has_bignum&&\"mode\"===e)return\"\"===(t=r.substring(e."\
|
||||
"length+1).trim())?write(\"Running mode=\"+eval_mode+\"\\n\"):\"std\""\
|
||||
"===t||\"math\"===t?eval_mode=t:write(\"Invalid mode\\n\"),0;if(\"cl"\
|
||||
"ear\"===e)write(\"\x1b[H\x1b[J\");else if(\"c\"===e)show_colors=!s"\
|
||||
"how_colors;else{if(\"q\"===e)return running=!1,1;if(has_jscalc&"\
|
||||
"&\"a\"===e)algebraicMode=!0;else{if(!has_jscalc||\"n\"!==e)return"\
|
||||
" write(\"Unknown directive: \"+e+\"\\n\"),0;algebraicMode=!1}}}}re"\
|
||||
"turn 1}function help(){function e(e){return e?\"*\":\" \"}write(\""\
|
||||
"\\\\h this help\\n\\\\x \"+e(hex_mode)+\"hexadecima"\
|
||||
"l number display\\n\\\\c toggle colors\\n\\\\d \"+e"\
|
||||
"(!hex_mode)+\"decimal number display\\n\\\\clear clear the t"\
|
||||
"erminal\\n\"),has_jscalc&&write(\"\\\\a \"+e(algebraicMode)"\
|
||||
"+\"algebraic mode\\n\\\\n \"+e(!algebraicMode)+\"numeric mo"\
|
||||
"de\\n\"),has_bignum&&(write(\"\\\\p [m [e]] set the BigFloat prec"\
|
||||
"ision to 'm' bits\\n\\\\digits n set the BigFloat precision to"\
|
||||
" 'ceil(n*log2(10))' bits\\n\"),has_jscalc||write(\"\\\\mode [std|m"\
|
||||
"ath] change the running mode (current = \"+eval_mode+\")\\n\")),c"\
|
||||
"onfig_numcalc||write(\"\\\\q exit\\n\")}function eval_and"\
|
||||
"_print(expr){let result;try{\"math\"===eval_mode&&(expr='\"use m"\
|
||||
"ath\"; void 0;'+expr);const now=(new Date).getTime();result=ev"\
|
||||
"al(expr),eval_time=(new Date).getTime()-now,write(colors[styl"\
|
||||
"es.result]),print(result),write(\"\\n\"),write(colors.none),g._="\
|
||||
"result}catch(e){show_colors&&write(colors[styles.error_msg]),"\
|
||||
"e instanceof Error?e.stack&&write(e.stack):write(\"Throw: \"),s"\
|
||||
"how_colors&&write(colors.none)}}function cmd_start(){config_n"\
|
||||
"umcalc||(has_jscalc?console.log('QJSCalc - Type \"\\\\h\" for hel"\
|
||||
"p'):console.log('QuickJS - Type \"\\\\h\" for help')),has_bignum&"\
|
||||
"&(log2_10=Math.log(10)/Math.log(2),prec=113,expBits=15,has_js"\
|
||||
"calc)&&(eval_mode=\"math\",g.algebraicMode=config_numcalc),cmd_"\
|
||||
"readline_start()}function cmd_readline_start(){try{readline_s"\
|
||||
"tart(dupstr(\" \",level),readline_handle_cmd)}catch(e){conso"\
|
||||
"le.error(\"ERROR\",e)}}function readline_handle_cmd(e){handle_c"\
|
||||
"md(e),cmd_readline_start()}function handle_cmd(e){if(null===e"\
|
||||
")return\"\";if(\"?\"===e)return help();var r=extract_directive(e)"\
|
||||
";if(0<r.length){if(!handle_directive(r,e))return;e=e.substrin"\
|
||||
"g(r.length+1)}\"\"!==e&&(r=colorize_js(e=mexpr?mexpr+\"\\n\"+e:e),"\
|
||||
"pstate=r[0],level=r[1],pstate?mexpr=e:(mexpr=\"\",has_bignum?Bi"\
|
||||
"gFloatEnv.setPrec(eval_and_print.bind(null,e),prec,expBits):e"\
|
||||
"val_and_print(e),level=0))}function colorize_js(e){let r,t,n;"\
|
||||
"const o=e.length;let i,s=\"\",c=0,a=1;const l=[];function _(e){"\
|
||||
"s+=e}function u(){return s.substring(s.length-1)}function d()"\
|
||||
"{var e=u();return s=s.substring(0,s.length-1),e}function f(e,"\
|
||||
"r){for(;l.length<e;)l.push(\"default\");for(;l.length<r;)l.push"\
|
||||
"(i)}for(r=0;r<o;){switch(i=null,n=r,t=e[r++]){case\" \":case\"\\t"\
|
||||
"\":case\"\\r\":case\"\\n\":continue;case\"+\":case\"-\":if(r<o&&e[r]===t"\
|
||||
"){r++;continue}a=1;continue;case\"/\":if(r<o&&\"*\"===e[r]){for(i"\
|
||||
"=\"comment\",_(\"/\"),r++;r<o-1;r++)if(\"*\"===e[r]&&\"/\"===e[r+1]){"\
|
||||
"r+=2,d();break}break}if(r<o&&\"/\"===e[r]){for(i=\"comment\",r++;"\
|
||||
"r<o&&\"\\n\"!==e[r];r++);break}if(a){for(i=\"regex\",_(\"/\");r<o;)i"\
|
||||
"f(\"\\n\"!==(t=e[r++]))if(\"\\\\\"!==t)if(\"[\"!==u())if(\"[\"!==t){if(\""\
|
||||
"/\"===t){for(d();r<o&&is_word(e[r]);)r++;break}}else _(\"[\"),\"["\
|
||||
"\"!==e[r]&&\"]\"!==e[r]||r++;else\"]\"===t&&d();else r<o&&r++;else"\
|
||||
" i=\"error\";a=0;break}a=1;continue;case\"'\":case'\"':case\"`\":(fu"\
|
||||
"nction(n){for(i=\"string\",_(n);r<o;)if(\"\\n\"!==(t=e[r++])){if(\""\
|
||||
"\\\\\"===t){if(r>=o)break;r++}else if(t===n){d();break}}else i=\""\
|
||||
"error\"})(t),a=0;break;case\"(\":case\"[\":case\"{\":a=1,c++,_(t);co"\
|
||||
"ntinue;case\")\":case\"]\":case\"}\":if((a=0)<c&&is_balanced(u(),t)"\
|
||||
"){c--,d();continue}i=\"error\";break;default:if(is_digit(t)){fo"\
|
||||
"r(i=\"number\";r<o&&(is_word(e[r])||\".\"===e[r]&&(r===o-1||\".\"!="\
|
||||
"=e[r+1]));)r++;a=0}else{if(!is_word(t)&&\"$\"!==t){a=1;continue"\
|
||||
"}!function(){for(a=1;r<o&&is_word(e[r]);)r++;var t=\"|\"+e.subs"\
|
||||
"tring(n,r)+\"|\";if(0<=\"|break|case|catch|continue|debugger|def"\
|
||||
"ault|delete|do|else|finally|for|function|if|in|instanceof|new"\
|
||||
"|return|switch|this|throw|try|typeof|while|with|class|const|e"\
|
||||
"num|import|export|extends|super|implements|interface|let|pack"\
|
||||
"age|private|protected|public|static|yield|undefined|null|true"\
|
||||
"|false|Infinity|NaN|eval|arguments|await|\".indexOf(t))return "\
|
||||
"i=\"keyword\",0<=\"|this|super|undefined|null|true|false|Infinit"\
|
||||
"y|NaN|arguments|\".indexOf(t)&&(a=0);let s=r;for(;s<o&&\" \"===e"\
|
||||
"[s];)s++;s<o&&\"(\"===e[s]?i=\"function\":0<=\"|void|var|\".indexOf"\
|
||||
"(t)?i=\"type\":(i=\"identifier\",a=0)}()}}i&&f(n,r)}return f(o,o)"\
|
||||
",[s,c,l]}config_numcalc&&(g.execCmd=function(e){switch(e){cas"\
|
||||
"e\"dec\":hex_mode=!1;break;case\"hex\":hex_mode=!0;break;case\"num"\
|
||||
"\":algebraicMode=!1;break;case\"alg\":algebraicMode=!0}});try{te"\
|
||||
"rmInit()}catch(e){console.error(e)}}(globalThis)}));\n";
|
||||
1491
shlr/qjs/repl.qjs
Normal file
1491
shlr/qjs/repl.qjs
Normal file
File diff suppressed because it is too large
Load Diff
Loading…
Reference in New Issue
Block a user