moved files from DTLib repo
This commit is contained in:
27
DtsodParser/DtsodV24.c
Normal file
27
DtsodParser/DtsodV24.c
Normal file
@@ -0,0 +1,27 @@
|
||||
#include "DtsodV24.h"
|
||||
|
||||
//returns UniNull if key not found
|
||||
Unitype DtsodV24_get(Hashtable* dtsod, char* key){
|
||||
return Hashtable_get(dtsod, key);
|
||||
}
|
||||
|
||||
//adds or sets value
|
||||
void DtsodV24_addOrSet(Hashtable* dtsod, char* key, Unitype value){
|
||||
Unitype* val=Hashtable_getptr(dtsod, key);
|
||||
if(val) *val=value;
|
||||
else Hashtable_add(dtsod, key, value);
|
||||
}
|
||||
|
||||
//checks for dtsod contains value or dont
|
||||
bool DtsodV24_contains(Hashtable* dtsod, char* key){
|
||||
Unitype* val=Hashtable_getptr(dtsod, key);
|
||||
return val!=NULL;
|
||||
}
|
||||
|
||||
//replaces value with UniNull if key exists in dtsod
|
||||
bool DtsodV24_remove(Hashtable* dtsod, char* key){
|
||||
Unitype* val=Hashtable_getptr(dtsod, key);
|
||||
if (!val) return false;
|
||||
*val=UniNull;
|
||||
return true;
|
||||
}
|
||||
24
DtsodParser/DtsodV24.h
Normal file
24
DtsodParser/DtsodV24.h
Normal file
@@ -0,0 +1,24 @@
|
||||
#if __cplusplus
|
||||
extern "c" {
|
||||
#endif
|
||||
|
||||
#pragma once
|
||||
#include "../base/base.h"
|
||||
#include "../Hashtable/Hashtable.h"
|
||||
|
||||
//parses text to binary values
|
||||
Hashtable* DtsodV24_deserialize(char* text);
|
||||
//creates text representation of dtsod
|
||||
char* DtsodV24_serialize(Hashtable* dtsod);
|
||||
//returns value or UniNull if key not found
|
||||
Unitype DtsodV24_get(Hashtable* dtsod, char* key);
|
||||
//adds or sets value
|
||||
void DtsodV24_addOrSet(Hashtable* dtsod, char* key, Unitype value);
|
||||
//checks for dtsod contains value or dont
|
||||
bool DtsodV24_contains(Hashtable* dtsod, char* key);
|
||||
//replaces value with UniNull if key exists in dtsod
|
||||
bool DtsodV24_remove(Hashtable* dtsod, char* key);
|
||||
|
||||
#if __cplusplus
|
||||
}
|
||||
#endif
|
||||
261
DtsodParser/DtsodV24_deserialize.c
Normal file
261
DtsodParser/DtsodV24_deserialize.c
Normal file
@@ -0,0 +1,261 @@
|
||||
#include "DtsodV24.h"
|
||||
#include "../Autoarr/StringBuilder.h"
|
||||
|
||||
#define ARR_BC 8
|
||||
#define ARR_BL 16
|
||||
#define STRB_BC 64
|
||||
#define STRB_BL 1024
|
||||
|
||||
Hashtable* __deserialize(char** _text, bool calledRecursively){
|
||||
Hashtable* dict=Hashtable_create();
|
||||
char* text=*_text;
|
||||
char c;
|
||||
bool partOfDollarList=false;
|
||||
bool readingList=false;
|
||||
|
||||
void __throw_wrongchar(char* file, int line, char* fname,char _c){
|
||||
char errBuf[]="unexpected <c> at:\n \""
|
||||
"00000000000000000000000000000000\"";
|
||||
errBuf[12]=_c;
|
||||
for(uint8 i=0;i<32;i++)
|
||||
errBuf[i+22]=*(text-16+i);
|
||||
printf("\n\e[91m[%s:%d %s] throwed error: %s\n",file,line,fname,errBuf);
|
||||
exit(128);
|
||||
};
|
||||
#define throw_wrongchar(C) __throw_wrongchar(__FILE__,__LINE__,__func__,C)
|
||||
|
||||
|
||||
void SkipComment(){
|
||||
while((c=*++text)!='\n')
|
||||
if(!c) throw(ERR_ENDOFSTR);
|
||||
};
|
||||
|
||||
string ReadName(){
|
||||
string nameStr={text,0};
|
||||
text--;
|
||||
while ((c=*++text)) switch (c){
|
||||
case ' ': case '\t':
|
||||
case '\r': case '\n':
|
||||
if(nameStr.length!=0)
|
||||
throw_wrongchar(c);
|
||||
nameStr.ptr++;
|
||||
break;
|
||||
case '=': case ';':
|
||||
case '\'': case '"':
|
||||
case '[': case ']':
|
||||
case '{':
|
||||
throw_wrongchar(c);
|
||||
break;
|
||||
case '#':
|
||||
SkipComment();
|
||||
if(nameStr.length!=0)
|
||||
throw_wrongchar(c);
|
||||
nameStr.ptr=text+1; //skips '\n'
|
||||
break;
|
||||
case '}':
|
||||
if(!calledRecursively) throw_wrongchar(c);
|
||||
if((*++text)!=';')
|
||||
throw_wrongchar(c);
|
||||
case ':':
|
||||
return nameStr;
|
||||
case '$':
|
||||
if(nameStr.length!=0)
|
||||
throw_wrongchar(c);
|
||||
nameStr.ptr++;
|
||||
partOfDollarList=true;
|
||||
break;
|
||||
default:
|
||||
nameStr.length++;
|
||||
break;
|
||||
}
|
||||
|
||||
if(nameStr.length>0) throw(ERR_ENDOFSTR);
|
||||
return nameStr;
|
||||
};
|
||||
|
||||
Unitype ReadValue(){
|
||||
//returns part of <text> without quotes
|
||||
char* ReadString(){
|
||||
bool prevIsBackslash=false;
|
||||
StringBuilder _b=StringBuilder_create(STRB_BC,STRB_BL);
|
||||
StringBuilder* b=&_b;
|
||||
while ((c=*++text)){
|
||||
if(c=='"') {
|
||||
if(prevIsBackslash) {
|
||||
//replacing <\"> with <">
|
||||
Autoarr_remove(b);
|
||||
StringBuilder_append_char(b,c);
|
||||
}
|
||||
else {
|
||||
char* str=StringBuilder_build(b);
|
||||
Autoarr_clear(b);
|
||||
return str;
|
||||
}
|
||||
}
|
||||
else {
|
||||
prevIsBackslash= c=='\\' && !prevIsBackslash;
|
||||
StringBuilder_append_char(b,c);
|
||||
}
|
||||
}
|
||||
throw(ERR_ENDOFSTR);
|
||||
return NULL;
|
||||
};
|
||||
|
||||
Autoarr(Unitype)* ReadList(){
|
||||
Autoarr(Unitype)* list=malloc(sizeof(Autoarr(Unitype)));
|
||||
*list=Autoarr_create(Unitype,ARR_BC,ARR_BL);
|
||||
readingList=true;
|
||||
while (true){
|
||||
Autoarr_add(list,ReadValue());
|
||||
if (!readingList) break;
|
||||
}
|
||||
return list;
|
||||
};
|
||||
|
||||
Hashtable* ReadDtsod(){
|
||||
++text; //skips '{'
|
||||
return __deserialize(&text,true);
|
||||
}
|
||||
|
||||
Unitype ParseValue(string str){
|
||||
//printf("\e[94m<\e[96m%s\e[94m>\n",string_cpToCharPtr(str));
|
||||
const string nullStr={"null",4};
|
||||
const string trueStr={"true",4};
|
||||
const string falseStr={"false",5};
|
||||
switch(*str.ptr){
|
||||
case 'n':
|
||||
if(string_compare(str,nullStr))
|
||||
return UniNull;
|
||||
else throw_wrongchar(*str.ptr);
|
||||
break;
|
||||
case 't':
|
||||
if(string_compare(str,trueStr))
|
||||
return UniTrue;
|
||||
else throw_wrongchar(*str.ptr);
|
||||
break;
|
||||
case 'f':
|
||||
if(string_compare(str,falseStr))
|
||||
return UniFalse;
|
||||
else throw_wrongchar(*str.ptr);
|
||||
break;
|
||||
default:
|
||||
switch(str.ptr[str.length-1]){
|
||||
case 'f': {
|
||||
char* _c=string_cpToCharPtr(str);
|
||||
Unitype rez=Uni(Double,strtod(_c,NULL));
|
||||
free(_c);
|
||||
return rez;
|
||||
}
|
||||
case 'u': {
|
||||
uint64 lu=0;
|
||||
char* _c=string_cpToCharPtr(str);
|
||||
sscanf(_c,"%lu",&lu);
|
||||
free(_c);
|
||||
return Uni(UInt64,lu);
|
||||
}
|
||||
case '0': case '1': case '2': case '3': case '4':
|
||||
case '5': case '6': case '7': case '8': case '9': {
|
||||
int64 li=0;
|
||||
char* _c=string_cpToCharPtr(str);
|
||||
if(sscanf(_c,"%li",&li)!=1){
|
||||
char err[64];
|
||||
sprintf(err,"can't parse to int: <%s>",_c);
|
||||
throw(err);
|
||||
}
|
||||
|
||||
free(_c);
|
||||
return Uni(Int64,li);
|
||||
}
|
||||
default:
|
||||
throw_wrongchar(str.ptr[str.length-1]);
|
||||
}
|
||||
}
|
||||
throw(ERR_ENDOFSTR);
|
||||
return UniNull;
|
||||
};
|
||||
|
||||
string valueStr={text+1,0};
|
||||
Unitype value;
|
||||
while ((c=*++text)) switch (c){
|
||||
case ' ': case '\t':
|
||||
case '\r': case '\n':
|
||||
if(valueStr.length!=0)
|
||||
throw_wrongchar(c);
|
||||
valueStr.ptr++;
|
||||
break;
|
||||
case '=': case ':':
|
||||
case '}': case '$':
|
||||
throw_wrongchar(c);
|
||||
break;
|
||||
case '#':;
|
||||
char _c=c;
|
||||
SkipComment();
|
||||
if(valueStr.length!=0)
|
||||
throw_wrongchar(_c);
|
||||
valueStr.ptr=text+1; //skips '\n'
|
||||
break;
|
||||
case '"':
|
||||
if(valueStr.length!=0) throw_wrongchar(c);
|
||||
value=UniPtr(CharPtr,ReadString());
|
||||
break;
|
||||
case '\'':
|
||||
if(valueStr.length!=0) throw_wrongchar(c);
|
||||
char valueChar=*++text;
|
||||
if (*++text != '\'') throw("after <'> should be char");
|
||||
value=Uni(Char,valueChar);
|
||||
break;
|
||||
case '[':
|
||||
if(valueStr.length!=0) throw_wrongchar(c);
|
||||
value=UniPtr(AutoarrUnitypePtr,ReadList());
|
||||
case ']':
|
||||
readingList=false;
|
||||
break;
|
||||
case '{':
|
||||
if(valueStr.length!=0) throw_wrongchar(c);
|
||||
value=UniPtr(HashtablePtr,ReadDtsod());
|
||||
return value;
|
||||
case ';':
|
||||
case ',':
|
||||
if(valueStr.length!=0)
|
||||
value=ParseValue(valueStr);
|
||||
return value;
|
||||
default:
|
||||
valueStr.length++;
|
||||
break;
|
||||
}
|
||||
|
||||
throw(ERR_ENDOFSTR);
|
||||
return UniNull;
|
||||
};
|
||||
|
||||
text--;
|
||||
while((c=*++text)){
|
||||
string name=ReadName();
|
||||
if(name.length==0) //end of file or '}' in recursive call
|
||||
goto END;
|
||||
char* nameCPtr=string_cpToCharPtr(name);
|
||||
Unitype value=ReadValue();
|
||||
if(partOfDollarList){
|
||||
Autoarr(Unitype)* list;
|
||||
Unitype lu;
|
||||
if(Hashtable_try_get(dict,nameCPtr, &lu)){
|
||||
list=(Autoarr(Unitype)*)lu.VoidPtr;
|
||||
}
|
||||
else{
|
||||
list=malloc(sizeof(Autoarr(Unitype)));
|
||||
*list=Autoarr_create(Unitype,ARR_BC,ARR_BL);
|
||||
Hashtable_add(dict,nameCPtr,UniPtr(AutoarrUnitypePtr,list));
|
||||
}
|
||||
Autoarr_add(list,value);
|
||||
}
|
||||
else Hashtable_add(dict,nameCPtr,value);
|
||||
}
|
||||
END:
|
||||
*_text=text;
|
||||
return dict;
|
||||
}
|
||||
|
||||
Hashtable* DtsodV24_deserialize(char* text) {
|
||||
Hashtable* r=__deserialize(&text,false);
|
||||
return r;
|
||||
}
|
||||
90
DtsodParser/DtsodV24_serialize.c
Normal file
90
DtsodParser/DtsodV24_serialize.c
Normal file
@@ -0,0 +1,90 @@
|
||||
#include "DtsodV24.h"
|
||||
#include "../Autoarr/StringBuilder.h"
|
||||
|
||||
//65536 max length!
|
||||
#define STRB_BC 64
|
||||
#define STRB_BL 1024
|
||||
|
||||
#define addc(B,C) StringBuilder_append_char(B,C)
|
||||
|
||||
void __serialize(StringBuilder* b, uint8 tabs, Hashtable* dtsod){
|
||||
|
||||
void AppendTabs(){
|
||||
for(uint8 t=0; t<tabs; t++)
|
||||
addc(b,'\t');
|
||||
};
|
||||
|
||||
void AppendValue(Unitype u){
|
||||
switch(u.type){
|
||||
case Int64:
|
||||
StringBuilder_append_int64(b,u.Int64);
|
||||
break;
|
||||
case UInt64:
|
||||
StringBuilder_append_uint64(b,u.UInt64);
|
||||
addc(b,'u');
|
||||
break;
|
||||
case Double:
|
||||
StringBuilder_append_double(b,u.Double);
|
||||
addc(b,'f');
|
||||
break;
|
||||
case CharPtr:
|
||||
addc(b,'"');
|
||||
char c;
|
||||
while((c=*(char*)(u.VoidPtr++))){
|
||||
if(c=='\"') addc(b,'\\');
|
||||
addc(b,c);
|
||||
}
|
||||
addc(b,'"');
|
||||
break;
|
||||
case Char:
|
||||
addc(b,'\'');
|
||||
addc(b,u.Char);
|
||||
addc(b,'\'');
|
||||
break;
|
||||
case Bool:
|
||||
StringBuilder_append_cptr(b, u.Bool ? "true" : "false");
|
||||
break;
|
||||
case Null:
|
||||
if(!u.VoidPtr) StringBuilder_append_cptr(b, "null");
|
||||
else throw("Null-type pointer is not 0");
|
||||
break;
|
||||
case AutoarrUnitypePtr:
|
||||
addc(b,'[');
|
||||
Autoarr_foreach(((Autoarr_Unitype*)(u.VoidPtr)), e, ({
|
||||
addc(b,' ');
|
||||
AppendValue(e);
|
||||
addc(b,',');
|
||||
}));
|
||||
Autoarr_remove(b);
|
||||
addc(b,' ');
|
||||
addc(b,']');
|
||||
break;
|
||||
case HashtablePtr:
|
||||
addc(b,'{');
|
||||
addc(b,'\n');
|
||||
__serialize(b,tabs+1,u.VoidPtr);
|
||||
AppendTabs();
|
||||
addc(b,'}');
|
||||
break;
|
||||
default: dbg((u.type)); throw(ERR_WRONGTYPE);
|
||||
}
|
||||
};
|
||||
|
||||
Hashtable_foreach(dtsod, p, ({
|
||||
AppendTabs();
|
||||
StringBuilder_append_cptr(b,p.key);
|
||||
addc(b,':');
|
||||
addc(b,' ');
|
||||
AppendValue(p.value);
|
||||
addc(b,';');
|
||||
addc(b,'\n');
|
||||
}));
|
||||
}
|
||||
|
||||
char* DtsodV24_serialize(Hashtable* dtsod){
|
||||
StringBuilder b=StringBuilder_create(STRB_BC,STRB_BL);
|
||||
__serialize(&b,0,dtsod);
|
||||
char* str=StringBuilder_build(&b);
|
||||
Autoarr_clear((&b));
|
||||
return str;
|
||||
}
|
||||
13
DtsodParser/README.md
Normal file
13
DtsodParser/README.md
Normal file
@@ -0,0 +1,13 @@
|
||||
# DtsodC
|
||||
|
||||
DtsodV23 parser in C# works too slow, so i wrote V24 parser in C
|
||||
|
||||
<br>
|
||||
|
||||
|
||||
## Building on Linux
|
||||
**Required packages:** gcc
|
||||
|
||||
```bash
|
||||
make build
|
||||
````
|
||||
Reference in New Issue
Block a user