265 lines
7.0 KiB
C
265 lines
7.0 KiB
C
|
|
#include <mio.h>
|
|
#include <mio-json.h>
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
|
|
#define DEBUG
|
|
|
|
static int on_json_inst (mio_json_t* json, mio_json_inst_t inst, mio_oow_t level, mio_oow_t index, mio_json_state_t container_state, const mio_oocs_t* str, void* ctx)
|
|
{
|
|
mio_t* mio = mio_json_getmio(json);
|
|
mio_oow_t i;
|
|
|
|
switch (inst)
|
|
{
|
|
case MIO_JSON_INST_START_ARRAY:
|
|
if (level > 0)
|
|
{
|
|
if (index > 0) mio_logbfmt (mio, MIO_LOG_STDOUT, ",\n");
|
|
for (i = 0; i < level; i++) mio_logbfmt (mio, MIO_LOG_STDOUT, "\t");
|
|
}
|
|
#if defined(DEBUG)
|
|
mio_logbfmt (mio, MIO_LOG_STDOUT, "<%lu>[\n", (unsigned long)index);
|
|
#else
|
|
mio_logbfmt (mio, MIO_LOG_STDOUT, "[\n");
|
|
#endif
|
|
break;
|
|
|
|
case MIO_JSON_INST_END_ARRAY:
|
|
mio_logbfmt (mio, MIO_LOG_STDOUT, "\n");
|
|
for (i = 0; i < level; i++) mio_logbfmt (mio, MIO_LOG_STDOUT, "\t");
|
|
#if defined(DEBUG)
|
|
mio_logbfmt (mio, MIO_LOG_STDOUT, "<%lu>]", (unsigned long)index);
|
|
#else
|
|
mio_logbfmt (mio, MIO_LOG_STDOUT, "]");
|
|
#endif
|
|
break;
|
|
|
|
case MIO_JSON_INST_START_OBJECT:
|
|
if (level > 0)
|
|
{
|
|
if (index > 0) mio_logbfmt (mio, MIO_LOG_STDOUT, ",\n");
|
|
for (i = 0; i < level; i++) mio_logbfmt (mio, MIO_LOG_STDOUT, "\t");
|
|
}
|
|
#if defined(DEBUG)
|
|
mio_logbfmt (mio, MIO_LOG_STDOUT, "<%lu>{\n", (unsigned long)index);
|
|
#else
|
|
mio_logbfmt (mio, MIO_LOG_STDOUT, "{\n");
|
|
#endif
|
|
break;
|
|
|
|
case MIO_JSON_INST_END_OBJECT:
|
|
mio_logbfmt (mio, MIO_LOG_STDOUT, "\n");
|
|
for (i = 0; i < level; i++) mio_logbfmt (mio, MIO_LOG_STDOUT, "\t");
|
|
#if defined(DEBUG)
|
|
mio_logbfmt (mio, MIO_LOG_STDOUT, "<%lu>}", (unsigned long)index);
|
|
#else
|
|
mio_logbfmt (mio, MIO_LOG_STDOUT, "}");
|
|
#endif
|
|
break;
|
|
|
|
case MIO_JSON_INST_KEY:
|
|
if (index > 0) mio_logbfmt (mio, MIO_LOG_STDOUT, ",\n");
|
|
for (i = 0; i < level; i++) mio_logbfmt (mio, MIO_LOG_STDOUT, "\t");
|
|
#if defined(DEBUG)
|
|
mio_logbfmt (mio, MIO_LOG_STDOUT, "<%lu>%.*js: ", (unsigned long)index, str->len, str->ptr);
|
|
#else
|
|
mio_logbfmt (mio, MIO_LOG_STDOUT, "%.*js: ", str->len, str->ptr);
|
|
#endif
|
|
break;
|
|
|
|
case MIO_JSON_INST_NIL:
|
|
if (level > 0)
|
|
{
|
|
if (index > 0) mio_logbfmt (mio, MIO_LOG_STDOUT, ",\n");
|
|
for (i = 0; i < level; i++) mio_logbfmt (mio, MIO_LOG_STDOUT, "\t");
|
|
}
|
|
#if defined(DEBUG)
|
|
mio_logbfmt (mio, MIO_LOG_STDOUT, "<%lu>null", (unsigned long)index);
|
|
#else
|
|
mio_logbfmt (mio, MIO_LOG_STDOUT, "null");
|
|
#endif
|
|
break;
|
|
|
|
case MIO_JSON_INST_TRUE:
|
|
if (level > 0)
|
|
{
|
|
if (index > 0) mio_logbfmt (mio, MIO_LOG_STDOUT, ",\n");
|
|
for (i = 0; i < level; i++) mio_logbfmt (mio, MIO_LOG_STDOUT, "\t");
|
|
}
|
|
#if defined(DEBUG)
|
|
mio_logbfmt (mio, MIO_LOG_STDOUT, "<%lu>true", (unsigned long)index);
|
|
#else
|
|
mio_logbfmt (mio, MIO_LOG_STDOUT, "true");
|
|
#endif
|
|
break;
|
|
|
|
case MIO_JSON_INST_FALSE:
|
|
if (level > 0)
|
|
{
|
|
if (index > 0) mio_logbfmt (mio, MIO_LOG_STDOUT, ",\n");
|
|
for (i = 0; i < level; i++) mio_logbfmt (mio, MIO_LOG_STDOUT, "\t");
|
|
}
|
|
#if defined(DEBUG)
|
|
mio_logbfmt (mio, MIO_LOG_STDOUT, "<%lu>false", (unsigned long)index);
|
|
#else
|
|
mio_logbfmt (mio, MIO_LOG_STDOUT, "false");
|
|
#endif
|
|
break;
|
|
|
|
case MIO_JSON_INST_NUMBER:
|
|
if (level > 0)
|
|
{
|
|
if (index > 0) mio_logbfmt (mio, MIO_LOG_STDOUT, ",\n");
|
|
for (i = 0; i < level; i++) mio_logbfmt (mio, MIO_LOG_STDOUT, "\t");
|
|
}
|
|
#if defined(DEBUG)
|
|
mio_logbfmt (mio, MIO_LOG_STDOUT, "<%lu>%.*js", (unsigned long)index, str->len, str->ptr);
|
|
#else
|
|
mio_logbfmt (mio, MIO_LOG_STDOUT, "%.*js", str->len, str->ptr);
|
|
#endif
|
|
break;
|
|
|
|
case MIO_JSON_INST_STRING:
|
|
if (level > 0)
|
|
{
|
|
if (index > 0) mio_logbfmt (mio, MIO_LOG_STDOUT, ",\n");
|
|
for (i = 0; i < level; i++) mio_logbfmt (mio, MIO_LOG_STDOUT, "\t");
|
|
}
|
|
#if defined(DEBUG)
|
|
mio_logbfmt (mio, MIO_LOG_STDOUT, "<%lu>\"%.*js\"", (unsigned long)index, str->len, str->ptr); /* TODO: escaping */
|
|
#else
|
|
mio_logbfmt (mio, MIO_LOG_STDOUT, "\"%.*js\"", str->len, str->ptr); /* TODO: escaping */
|
|
#endif
|
|
break;
|
|
|
|
default:
|
|
mio_logbfmt (mio, MIO_LOG_STDOUT, "*****UNKNOWN*****\n", str->len, str->ptr);
|
|
return -1;
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
static int write_json_element (mio_jsonwr_t* jsonwr, const mio_bch_t* dptr, mio_oow_t dlen, void* ctx)
|
|
{
|
|
fwrite (dptr, 1, dlen, stdout);
|
|
return 0;
|
|
}
|
|
|
|
int main (int argc, char* argv[])
|
|
{
|
|
mio_t* mio = MIO_NULL;
|
|
mio_bitmask_t o = 0;
|
|
int i;
|
|
|
|
for (i = 1; i < argc; i++)
|
|
{
|
|
if (strcmp(argv[i], "--permit-word-key") == 0) o |= MIO_JSON_PERMIT_WORD_KEY;
|
|
if (strcmp(argv[i], "--optional-comma") == 0) o |= MIO_JSON_OPTIONAL_COMMA;
|
|
}
|
|
|
|
mio = mio_open(MIO_NULL, 0, MIO_NULL, 512, MIO_NULL);
|
|
if (!mio)
|
|
{
|
|
printf ("Cannot open mio\n");
|
|
return -1;
|
|
}
|
|
|
|
{
|
|
mio_json_t* json = MIO_NULL;
|
|
char buf[128];
|
|
mio_oow_t rem;
|
|
size_t size;
|
|
|
|
json = mio_json_open(mio, 0);
|
|
|
|
mio_json_setoption (json, o);
|
|
mio_json_setinstcb (json, on_json_inst, MIO_NULL);
|
|
|
|
rem = 0;
|
|
while (!feof(stdin) || rem > 0)
|
|
{
|
|
int x;
|
|
|
|
if (!feof(stdin))
|
|
{
|
|
size = fread(&buf[rem], 1, sizeof(buf) - rem, stdin);
|
|
if (size <= 0) break;
|
|
}
|
|
else
|
|
{
|
|
size = rem;
|
|
rem = 0;
|
|
}
|
|
|
|
if ((x = mio_json_feed(json, buf, size + rem, &rem, 1)) <= -1)
|
|
{
|
|
mio_logbfmt (mio, MIO_LOG_STDOUT, "**** ERROR - %js ****\n", mio_geterrmsg(mio));
|
|
goto done;
|
|
}
|
|
|
|
if (x > 0)
|
|
{
|
|
/* document completed.
|
|
* if only whitespaces are given, x is still greater 0. */
|
|
mio_logbfmt (mio, MIO_LOG_STDOUT, "\n-----------------------------------\n");
|
|
}
|
|
|
|
/*printf ("--> x %d input %d left-over %d => [%.*s]\n", (int)x, (int)size, (int)rem, (int)rem, &buf[size - rem]);*/
|
|
if (rem > 0) memcpy (buf, &buf[size - rem], rem);
|
|
}
|
|
|
|
mio_logbfmt (mio, MIO_LOG_STDOUT, "\n");
|
|
if (json->state_stack != &json->state_top) mio_logbfmt (mio, MIO_LOG_STDOUT, "**** ERROR - incomplete ****\n");
|
|
|
|
done:
|
|
mio_json_close (json);
|
|
}
|
|
|
|
mio_logbfmt (mio, MIO_LOG_STDOUT, "\n===================================\n");
|
|
|
|
{
|
|
mio_jsonwr_t* jsonwr = MIO_NULL;
|
|
mio_uch_t ddd[4] = { 'D', '\0', 'R', 'Q' };
|
|
mio_uch_t ddv[5] = { L'밝', L'혀', L'졌', L'는', L'데' };
|
|
|
|
jsonwr = mio_jsonwr_open (mio, 0, MIO_JSONWR_FLAG_PRETTY);
|
|
|
|
mio_jsonwr_setwritecb (jsonwr, write_json_element, MIO_NULL);
|
|
|
|
mio_jsonwr_startarray (jsonwr);
|
|
|
|
mio_jsonwr_writestringwithbchars (jsonwr, "hello", 5);
|
|
mio_jsonwr_writestringwithbchars (jsonwr, "world", 5);
|
|
|
|
mio_jsonwr_startobject (jsonwr);
|
|
mio_jsonwr_writekeywithbchars (jsonwr, "abc", 3);
|
|
mio_jsonwr_writestringwithbchars (jsonwr, "computer", 8);
|
|
mio_jsonwr_writekeywithbchars (jsonwr, "k", 1);
|
|
mio_jsonwr_writestringwithbchars (jsonwr, "play nice", 9);
|
|
mio_jsonwr_writekeywithuchars (jsonwr, ddd, 4);
|
|
mio_jsonwr_writestringwithuchars (jsonwr, ddv, 5);
|
|
mio_jsonwr_endobject (jsonwr);
|
|
|
|
mio_jsonwr_writestringwithbchars (jsonwr, "tyler", 5);
|
|
|
|
mio_jsonwr_startarray (jsonwr);
|
|
mio_jsonwr_writestringwithbchars (jsonwr, "airplain", 8);
|
|
mio_jsonwr_writestringwithbchars (jsonwr, "gro\0wn\nup", 9);
|
|
mio_jsonwr_writetrue (jsonwr);
|
|
mio_jsonwr_endarray (jsonwr);
|
|
|
|
mio_jsonwr_endarray (jsonwr);
|
|
|
|
mio_jsonwr_close (jsonwr);
|
|
}
|
|
|
|
mio_close (mio);
|
|
|
|
return 0;
|
|
|
|
}
|
|
|