174 lines
4.6 KiB
C
174 lines
4.6 KiB
C
|
#include "json.h"
|
||
|
|
||
|
#include <stdarg.h>
|
||
|
#include <stdio.h>
|
||
|
|
||
|
static char buf[1024];
|
||
|
|
||
|
__attribute__((format(printf, 3, 4)))
|
||
|
static bool printi(const stream_t *stream, int depth, const char *format, ...) {
|
||
|
for (int i = 0; i < depth; i++)
|
||
|
if (stream_write(stream, "\t", 1) == false)
|
||
|
return false;
|
||
|
va_list list;
|
||
|
va_start(list, format);
|
||
|
int len;
|
||
|
if ((len = vsnprintf(buf, 1024, format, list)) < 0)
|
||
|
return false;
|
||
|
if (stream_write(stream, buf, len) == false)
|
||
|
return false;
|
||
|
return true;
|
||
|
}
|
||
|
|
||
|
static bool json_print_impl(const tag_t *tag, const stream_t *stream, int depth);
|
||
|
|
||
|
static bool json_print_byte_array(const tagdata_t *data, const stream_t *stream) {
|
||
|
if (printi(stream, 0, "[") == false)
|
||
|
return false;
|
||
|
for (int32_t i = 0; i < data->b_arr.size; i++) {
|
||
|
if (i != 0)
|
||
|
if (printi(stream, 0, ",") == false)
|
||
|
return false;
|
||
|
if (printi(stream, 0, "%hhd", data->b_arr.data[i]) == false)
|
||
|
return false;
|
||
|
}
|
||
|
if (printi(stream, 0, "]") == false)
|
||
|
return false;
|
||
|
return true;
|
||
|
}
|
||
|
|
||
|
static bool json_print_int_array(const tagdata_t *data, const stream_t *stream) {
|
||
|
if (printi(stream, 0, "[") == false)
|
||
|
return false;
|
||
|
for (int32_t i = 0; i < data->i_arr.size; i++) {
|
||
|
if (i != 0)
|
||
|
if (printi(stream, 0, ",") == false)
|
||
|
return false;
|
||
|
if (printi(stream, 0, "%d", data->i_arr.data[i]) == false)
|
||
|
return false;
|
||
|
}
|
||
|
if (printi(stream, 0, "]") == false)
|
||
|
return false;
|
||
|
return true;
|
||
|
}
|
||
|
|
||
|
static bool json_print_long_array(const tagdata_t *data, const stream_t *stream) {
|
||
|
if (printi(stream, 0, "[") == false)
|
||
|
return false;
|
||
|
for (int32_t i = 0; i < data->l_arr.size; i++) {
|
||
|
if (i != 0)
|
||
|
if (printi(stream, 0, ",") == false)
|
||
|
return false;
|
||
|
if (printi(stream, 0, "%ld", data->l_arr.data[i]) == false)
|
||
|
return false;
|
||
|
}
|
||
|
if (printi(stream, 0, "]") == false)
|
||
|
return false;
|
||
|
return true;
|
||
|
}
|
||
|
|
||
|
static bool json_print_string(const tagdata_t *data, const stream_t *stream) {
|
||
|
if (data->string.size > 1) {
|
||
|
if (printi(stream, 0, "\"%.*s\"", data->string.size, data->string.data) == false)
|
||
|
return false;
|
||
|
} else {
|
||
|
if (printi(stream, 0, "\"\"") == false)
|
||
|
return false;
|
||
|
}
|
||
|
return true;
|
||
|
}
|
||
|
|
||
|
static bool json_print_compound(const tagdata_t *data, const stream_t *stream, int depth) {
|
||
|
if (printi(stream, 0, "{\n") == false)
|
||
|
return false;
|
||
|
for (int32_t i = 0; i < data->compound.size; i++) {
|
||
|
if (i != 0 && printi(stream, 0, ",\n") == false)
|
||
|
return false;
|
||
|
if (json_print_impl(&data->compound.tags[i], stream, depth + 1) == false)
|
||
|
return false;
|
||
|
}
|
||
|
if (printi(stream, 0, "\n") == false || printi(stream, depth, "}") == false)
|
||
|
return false;
|
||
|
return true;
|
||
|
}
|
||
|
|
||
|
static bool json_print_list(const tagdata_t *data, const stream_t *stream, int depth) {
|
||
|
if (printi(stream, 0, "[\n") == false)
|
||
|
return false;
|
||
|
for (int32_t i = 0; i < data->list.size; i++) {
|
||
|
if (i != 0 && printi(stream, 0, ",\n") == false)
|
||
|
return false;
|
||
|
if (json_print_impl(&data->list.tags[i], stream, depth + 1) == false)
|
||
|
return false;
|
||
|
}
|
||
|
if (printi(stream, 0, "\n") == false || printi(stream, depth, "]") == false)
|
||
|
return false;
|
||
|
return true;
|
||
|
}
|
||
|
|
||
|
static bool json_print_data(const tag_t *tag, const stream_t *stream, int depth) {
|
||
|
|
||
|
bool ok = true;
|
||
|
|
||
|
switch (tag->type) {
|
||
|
case TAG_BYTE:
|
||
|
ok = printi(stream, 0, "%hhd", tag->data.b);
|
||
|
break;
|
||
|
case TAG_SHORT:
|
||
|
ok = printi(stream, 0, "%hd", tag->data.s);
|
||
|
break;
|
||
|
case TAG_INT:
|
||
|
ok = printi(stream, 0, "%d", tag->data.i);
|
||
|
break;
|
||
|
case TAG_LONG:
|
||
|
ok = printi(stream, 0, "%ld", tag->data.l);
|
||
|
break;
|
||
|
case TAG_FLOAT:
|
||
|
ok = printi(stream, 0, "%f", tag->data.f);
|
||
|
break;
|
||
|
case TAG_DOUBLE:
|
||
|
ok = printi(stream, 0, "%lf", tag->data.d);
|
||
|
break;
|
||
|
case TAG_BYTE_ARRAY:
|
||
|
ok = json_print_byte_array(&tag->data, stream);
|
||
|
break;
|
||
|
case TAG_STRING:
|
||
|
ok = json_print_string(&tag->data, stream);
|
||
|
break;
|
||
|
case TAG_LIST:
|
||
|
ok = json_print_list(&tag->data, stream, depth);
|
||
|
break;
|
||
|
case TAG_COMPOUND:
|
||
|
ok = json_print_compound(&tag->data, stream, depth);
|
||
|
break;
|
||
|
case TAG_INT_ARRAY:
|
||
|
ok = json_print_int_array(&tag->data, stream);
|
||
|
break;
|
||
|
case TAG_LONG_ARRAY:
|
||
|
ok = json_print_long_array(&tag->data, stream);
|
||
|
break;
|
||
|
case TAG_END:
|
||
|
break;
|
||
|
}
|
||
|
|
||
|
return ok;
|
||
|
}
|
||
|
|
||
|
static bool json_print_impl(const tag_t *tag, const stream_t *stream, int depth) {
|
||
|
if (tag->name_len > 0) {
|
||
|
printi(stream, depth, "\"%.*s\":\t", tag->name_len, tag->name);
|
||
|
} else {
|
||
|
for (int i = 0; i < depth; i++)
|
||
|
printi(stream, 0, "\t");
|
||
|
}
|
||
|
return json_print_data(tag, stream, depth);
|
||
|
}
|
||
|
|
||
|
bool json_print(const tag_t *tag, const stream_t *stream) {
|
||
|
if (json_print_impl(tag, stream, 0) == false)
|
||
|
return false;
|
||
|
if (stream_write(stream, "\n", 1) == false)
|
||
|
return false;
|
||
|
return true;
|
||
|
}
|