xxq250
/
Nasal-Interpreter
mirror of https://github.com/ValKmjolnir/Nasal-Interpreter.git
1
0
Fork 0
Code Issues Actions 1 Packages Projects Releases Wiki Activity

🐛 fix bugs in stl/json, now it runs correctly

This commit is contained in:
ValKmjolnir 2023-01-31 19:39:22 +08:00
parent fdd7794a83
commit acb2e3664c
2 changed files with 188 additions and 125 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

140
stl/json.nas
View File

@ -6,8 +6,8 @@ var JSON=func(){
j_eof,
j_lbrace,
j_rbrace,
j_lbracket,
j_rbracket,
j_lbrkt,
j_rbrkt,
j_comma,
j_colon,
j_str,
@ -32,27 +32,28 @@ var JSON=func(){
var text_size=0;
var ptr=0;
var token={content:'',type:''};
var content={};
var init=func() {
text='';
line=1;
text_size=0;
ptr=0;
content={};
token={content:'',type:''};
}
var isnum=func(c) {
return '0'<=c and c<='9';
}
var isid=func(c) {
var tmp=c[0];
return ('a'[0]<=tmp and tmp<='z'[0]) or
('A'[0]<=tmp and tmp<='Z'[0]) or
c=='_';
}
var check=func() {
var c=text[ptr];
var c=char(text[ptr]);
return (
c=='{' or c=='}' or
c=='[' or c==']' or
@ -64,15 +65,17 @@ var JSON=func(){
var get=func(str) {
init();
if(!size(str))
if(!size(str)) {
die("empty string");
text=split('',str);
}
text=str;
text_size=size(text);
return;
}
var next=func() {
while(ptr<text_size and !check()) {
if(text[ptr]=='\n')
if(char(text[ptr])=='\n')
line+=1;
ptr+=1;
}
@ -82,7 +85,7 @@ var JSON=func(){
return;
}
var c=text[ptr];
var c=char(text[ptr]);
if(c=='{') {
token.content='{';
token.type=j_lbrace;
@ -91,10 +94,10 @@ var JSON=func(){
token.type=j_rbrace;
} elsif(c=='[') {
token.content='[';
token.type=j_lbracket;
token.type=j_lbrkt;
} elsif(c==']') {
token.content=']';
token.type=j_rbracket;
token.type=j_rbrkt;
} elsif(c==',') {
token.content=',';
token.type=j_comma;
@ -105,17 +108,21 @@ var JSON=func(){
var strbegin=c;
var s="";
ptr+=1;
while(ptr<text_size and text[ptr]!=strbegin){
s~=text[ptr];
while(ptr<text_size and char(text[ptr])!=strbegin) {
s~=char(text[ptr]);
ptr+=1;
if(char(text[ptr-1])=="\\" and ptr<text_size) {
s~=char(text[ptr]);
ptr+=1;
}
}
token.content=s;
token.type=j_str;
} elsif(isnum(c)) {
var s=c;
ptr+=1;
while(ptr<text_size and ((isnum(text[ptr]) or text[ptr]=='.'))){
s~=text[ptr];
while(ptr<text_size and ((isnum(char(text[ptr])) or char(text[ptr])=='.'))) {
s~=char(text[ptr]);
ptr+=1;
}
ptr-=1;
@ -124,8 +131,8 @@ var JSON=func(){
} elsif(isid(c)) {
var s=c;
ptr+=1;
while(ptr<text_size and (isid(text[ptr]) or isnum(text[ptr]))){
s~=text[ptr];
while(ptr<text_size and (isid(char(text[ptr])) or isnum(char(text[ptr])))) {
s~=char(text[ptr]);
ptr+=1;
}
ptr-=1;
@ -143,6 +150,28 @@ var JSON=func(){
return;
}
var member=func(hash) {
var name=token.content;
if(token.type==j_rbrace) {
return;
}
if(token.type==j_str) {
match(j_str);
} else {
match(j_id);
}
match(j_colon);
if(token.type==j_lbrace) {
hash[name]=hash_gen();
} elsif(token.type==j_lbrkt) {
hash[name]=vec_gen();
} elsif(token.type==j_str or token.type==j_num) {
hash[name]=token.content;
next();
}
return;
}
var hash_gen=func() {
var hash={};
match(j_lbrace);
@ -157,10 +186,10 @@ var JSON=func(){
var vec_gen=func() {
var vec=[];
match(j_lbracket);
match(j_lbrkt);
if(token.type==j_lbrace) {
append(vec,hash_gen());
}elsif(token.type==j_lbracket){
} elsif(token.type==j_lbrkt) {
append(vec,vec_gen());
} elsif(token.type==j_str or token.type==j_num) {
append(vec,token.content);
@ -169,66 +198,48 @@ var JSON=func(){
while(token.type==j_comma) {
match(j_comma);
if(token.type==j_lbrace) {
append(vec,me.hash_gen());
}elsif(token.type==j_lbracket){
append(vec,hash_gen());
} elsif(token.type==j_lbrkt) {
append(vec,vec_gen());
} elsif(token.type==j_str or token.type==j_num) {
append(vec,token.content);
next();
}
}
match(j_rbracket);
match(j_rbrkt);
return vec;
}
var member=func(hash){
var name=token.content;
if(token.type==j_rbrace){
return;
}
if(token.type==j_str){
match(j_str);
}else{
match(j_id);
}
match(j_colon);
if(token.type==j_lbrace){
hash[name]=hash_gen();
}elsif(token.type==j_lbracket){
hash[name]=vec_gen();
}elsif(token.type==j_str or token.type==j_num){
hash[name]=token.content;
next();
}
return;
}
return {
parse:func(str) {
if(typeof(str)!="str")
if(typeof(str)!="str") {
die("JSON.parse: must use string");
}
get(str);
next();
match(j_lbrace);
member(content);
while(token.type==j_comma){
match(j_comma);
member(content);
if(token.type==j_lbrkt) {
var res=vec_gen();
} else {
var res=hash_gen();
}
match(j_rbrace);
var res=content;
init();
return res;
},
stringify:func(hash){
if(typeof(hash)!="hash")
die("JSON.stringify: must use hashmap");
}
};
}();
JSON.stringify=func(object) {
if(typeof(object)!="hash" and typeof(object)!="vec") {
die("JSON.stringify: must use hashmap or vector");
}
var s="";
var gen=func(elem) {
var t=typeof(elem);
if(t=="num") {
s~=elem;
s~=str(elem);
} elsif(t=="str") {
s~='"'~elem~'"';
} elsif(t=="vec") {
@ -239,16 +250,19 @@ var JSON=func(){
s~='"undefined"';
}
}
var vgen=func(v) {
s~="[";
var vsize=size(v);
for(var i=0;i<vsize;i+=1) {
gen(v[i]);
if(i!=vsize-1)
if(i!=vsize-1) {
s~=",";
}
}
s~="]";
}
var hgen=func(h) {
s~="{";
var k=keys(h);
@ -256,13 +270,17 @@ var JSON=func(){
for(var i=0;i<vsize;i+=1) {
s~=k[i]~":";
gen(h[k[i]]);
if(i!=vsize-1)
if(i!=vsize-1) {
s~=",";
}
}
s~="}";
}
hgen(hash);
if(typeof(object)=="vec") {
vgen(object);
} else {
hgen(object);
}
return s;
}
};
}();

51
test/json.nas
View File

@ -1,10 +1,11 @@
import.stl.json;
import.stl.process_bar;
var ss=JSON.stringify({
vec:[0,1,2],
hash:{
m1:0,
m2:"str",
m2:"str\\\"test\\\"",
m3:[114514],
m4:{year:1919,month:8,date:10}
},
@ -14,5 +15,49 @@ var ss=JSON.stringify({
empty_an:[[[[[[{}]]]]]],
function:func(){}
});
println(ss);
println(JSON.parse(ss));
println(ss,"\n");
println(JSON.parse(ss),"\n");
var ss=JSON.stringify([{
vec:[0,1,2,3],
hash:{
m1:0,
m2:"str\\\"test\\\"",
m3:[114514,1919810],
m4:{year:1919,month:8,date:10}
},
emptyhash:{},
emptyvec:[],
empty_an:[[[[[{}]]]]],
function:func(){}
}]);
println(ss,"\n");
println(JSON.parse(ss),"\n");
func {
var bar=process_bar.high_resolution_bar(30);
var tmp=[
{t1:nil},
{t2:nil},
{t3:nil},
{t4:nil},
{t5:nil},
{t6:nil}
];
srand();
foreach(var h;tmp) {
var name=keys(h)[0];
h[name]=[];
print("\e[1000D",bar.bar(0));
for(var i=0;i<1e3;i+=1) {
append(h[name],{id:i,content:int(rand()*1e7)});
print("\e[1000D",bar.bar((i+1)/1e3));
}
print("\e[1000D",bar.bar(1)," executing...\n");
}
print("\e[1000D","\e["~str(size(tmp))~"A");
foreach(var h;JSON.parse(JSON.stringify(tmp))) {
println("\e[1000D",bar.bar(1)," done ",keys(h)[0]," ",size(h[keys(h)[0]])," ");
}
}();