monkee.ch/snac2
1
0
Fork 0
mirror of https://codeberg.org/grunfink/snac2.git synced 2024-11-25 22:45:05 +00:00
Code Issues Projects Releases Packages Wiki Activity

Backport from xs.

Browse source
This commit is contained in:
default 2023-02-28 11:22:52 +01:00
parent ec48ec314f
commit fd4774336e
2 changed files with 18 additions and 16 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

32
xs_json.h
View file

@ -4,7 +4,7 @@
#define _XS_JSON_H #define _XS_JSON_H
xs_str *xs_json_dumps_pp(xs_val *data, int indent); xs_str *xs_json_dumps_pp(const xs_val *data, int indent);
#define xs_json_dumps(data) xs_json_dumps_pp(data, 0) #define xs_json_dumps(data) xs_json_dumps_pp(data, 0)
xs_val *xs_json_loads(const xs_str *json); xs_val *xs_json_loads(const xs_str *json);
@ -15,7 +15,7 @@ xs_val *xs_json_loads(const xs_str *json);
/** JSON dumps **/ /** JSON dumps **/
d_char *_xs_json_dumps_str(d_char *s, char *data) static xs_str *_xs_json_dumps_str(xs_str *s, const char *data)
/* dumps a string in JSON format */ /* dumps a string in JSON format */
{ {
unsigned char c; unsigned char c;
@ -55,7 +55,7 @@ d_char *_xs_json_dumps_str(d_char *s, char *data)
} }
d_char *_xs_json_indent(d_char *s, int level, int indent) static xs_str *_xs_json_indent(xs_str *s, int level, int indent)
/* adds indentation */ /* adds indentation */
{ {
if (indent) { if (indent) {
@ -71,11 +71,12 @@ d_char *_xs_json_indent(d_char *s, int level, int indent)
} }
d_char *_xs_json_dumps(d_char *s, char *data, int level, int indent) static xs_str *_xs_json_dumps(xs_str *s, const xs_val *s_data, int level, int indent)
/* dumps partial data as JSON */ /* dumps partial data as JSON */
{ {
char *k, *v;
int c = 0; int c = 0;
xs_val *v;
xs_val *data = (xs_val *)s_data;
switch (xs_type(data)) { switch (xs_type(data)) {
case XSTYPE_NULL: case XSTYPE_NULL:
@ -115,6 +116,7 @@ d_char *_xs_json_dumps(d_char *s, char *data, int level, int indent)
case XSTYPE_DICT: case XSTYPE_DICT:
s = xs_str_cat(s, "{"); s = xs_str_cat(s, "{");
xs_str *k;
while (xs_dict_iter(&data, &k, &v)) { while (xs_dict_iter(&data, &k, &v)) {
if (c != 0) if (c != 0)
s = xs_str_cat(s, ","); s = xs_str_cat(s, ",");
@ -148,7 +150,7 @@ d_char *_xs_json_dumps(d_char *s, char *data, int level, int indent)
} }
xs_str *xs_json_dumps_pp(xs_val *data, int indent) xs_str *xs_json_dumps_pp(const xs_val *data, int indent)
/* dumps a piece of data as JSON */ /* dumps a piece of data as JSON */
{ {
xstype t = xs_type(data); xstype t = xs_type(data);
@ -188,11 +190,11 @@ typedef enum {
} js_type; } js_type;
d_char *_xs_json_loads_lexer(const char **json, js_type *t) static xs_val *_xs_json_loads_lexer(const char **json, js_type *t)
{ {
char c; char c;
const char *s = *json; const char *s = *json;
d_char *v = NULL; xs_val *v = NULL;
/* skip blanks */ /* skip blanks */
while (*s == L' ' || *s == L'\t' || *s == L'\n' || *s == L'\r') while (*s == L' ' || *s == L'\t' || *s == L'\n' || *s == L'\r')
@ -324,10 +326,10 @@ d_char *_xs_json_loads_lexer(const char **json, js_type *t)
} }
d_char *_xs_json_loads_array(const char **json, js_type *t); static xs_list *_xs_json_loads_array(const char **json, js_type *t);
d_char *_xs_json_loads_object(const char **json, js_type *t); static xs_dict *_xs_json_loads_object(const char **json, js_type *t);
d_char *_xs_json_loads_value(const char **json, js_type *t, d_char *v) static xs_val *_xs_json_loads_value(const char **json, js_type *t, xs_val *v)
/* parses a JSON value */ /* parses a JSON value */
{ {
if (*t == JS_OBRACK) if (*t == JS_OBRACK)
@ -345,12 +347,12 @@ d_char *_xs_json_loads_value(const char **json, js_type *t, d_char *v)
} }
d_char *_xs_json_loads_array(const char **json, js_type *t) static xs_list *_xs_json_loads_array(const char **json, js_type *t)
/* parses a JSON array */ /* parses a JSON array */
{ {
const char *s = *json; const char *s = *json;
xs *v; xs *v;
d_char *l; xs_list *l;
js_type tt; js_type tt;
l = xs_list_new(); l = xs_list_new();
@ -401,12 +403,12 @@ d_char *_xs_json_loads_array(const char **json, js_type *t)
} }
d_char *_xs_json_loads_object(const char **json, js_type *t) static xs_dict *_xs_json_loads_object(const char **json, js_type *t)
/* parses a JSON object */ /* parses a JSON object */
{ {
const char *s = *json; const char *s = *json;
xs *k1; xs *k1;
d_char *d; xs_dict *d;
js_type tt; js_type tt;
d = xs_dict_new(); d = xs_dict_new();

2
xs_version.h
View file

@ -1 +1 @@
/* a2221e4e87e4c2e0a92a4934f88e78ca7e8e7f7f */ /* 576198d1ed0f3309a9d09cb674c7ce1bf5c12737 */