hyung-hwan/hak
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

finished wring a primitive standalone json parser

Browse Source
This commit is contained in:
hyung-hwan
2018-04-23 09:16:27 +00:00
parent c6e4aa0702
commit 407b469ec2
3 changed files with 520 additions and 335 deletions
Download Patch File Download Diff File Expand all files Collapse all files

223
lib/hcl-json.h
View File

@ -29,25 +29,28 @@
#include <hcl.h> #include <hcl.h>
typedef struct hcl_jsoner_t hcl_jsoner_t; /**
* The hcl_json_t type defines a simple json parser.
*/
typedef struct hcl_json_t hcl_json_t;
enum hcl_jsoner_option_t enum hcl_json_option_t
{ {
HCL_JSON_TRAIT, HCL_JSON_TRAIT,
HCL_JSON_LOG_MASK, HCL_JSON_LOG_MASK,
}; };
typedef enum hcl_jsoner_option_t hcl_jsoner_option_t; typedef enum hcl_json_option_t hcl_json_option_t;
enum hcl_jsoner_trait_t enum hcl_json_trait_t
{ {
/* no trait defined at this moment. XXXX is just a placeholder */ /* no trait defined at this moment. XXXX is just a placeholder */
HCL_JSON_XXXX = (1 << 0) HCL_JSON_XXXX = (1 << 0)
}; };
typedef enum hcl_jsoner_trait_t hcl_jsoner_trait_t; typedef enum hcl_json_trait_t hcl_json_trait_t;
/* ========================================================================= */ /* ========================================================================= */
enum hcl_jsoner_state_t enum hcl_json_state_t
{ {
HCL_JSON_STATE_START, HCL_JSON_STATE_START,
HCL_JSON_STATE_IN_ARRAY, HCL_JSON_STATE_IN_ARRAY,
@ -57,109 +60,46 @@ enum hcl_jsoner_state_t
HCL_JSON_STATE_IN_NUMERIC_VALUE, HCL_JSON_STATE_IN_NUMERIC_VALUE,
HCL_JSON_STATE_IN_QUOTED_VALUE HCL_JSON_STATE_IN_QUOTED_VALUE
}; };
typedef enum hcl_jsoner_state_t hcl_jsoner_state_t; typedef enum hcl_json_state_t hcl_json_state_t;
/* ========================================================================= */ /* ========================================================================= */
enum hcl_json_inst_t
#if 0
struct hcl_jsoner_root_t
{ {
int type; HCL_JSON_INST_START_ARRAY,
hcl_jsoner_value_t* value; HCL_JSON_INST_END_ARRAY,
}; HCL_JSON_INST_START_DIC,
HCL_JSON_INST_END_DIC,
struct hcl_jsoner_list_t HCL_JSON_INST_KEY,
{
int type; /* array or table */
hcl_jsoner_pair_t* cell;
};
struct hcl_jsoner_value_t HCL_JSON_INST_STRING,
{ HCL_JSON_INST_NUMBER,
int type; /* atom or pair */ HCL_JSON_INST_NIL,
union HCL_JSON_INST_TRUE,
{ HCL_JSON_INST_FALSE,
hcl_jsoner_value_t* value;
hcl_jsoner_pair_t* cell;
} u;
}; };
typedef enum hcl_json_inst_t hcl_json_inst_t;
struct hcl_jsoner_atom_t typedef void (*hcl_json_log_write_t) (
{ hcl_json_t* json,
int type; /* string, word, number */
};
struct hcl_jsoner_pair_t
{
hcl_jsoner_atom_t* key;
hcl_jsoner_value_t* value;
hcl_jsoner_pair_t* next;
};
#endif
/* ========================================================================= */
enum hcl_jsoner_reply_type_t
{
HCL_JSON_REPLY_TYPE_OK = 0,
HCL_JSON_REPLY_TYPE_ERROR = 1
};
typedef enum hcl_jsoner_reply_type_t hcl_jsoner_reply_type_t;
typedef void (*hcl_jsoner_log_write_t) (
hcl_jsoner_t* json,
unsigned int mask, unsigned int mask,
const hcl_ooch_t* msg, const hcl_ooch_t* msg,
hcl_oow_t len hcl_oow_t len
); );
typedef int (*hcl_jsoner_start_reply_t) ( typedef int (*hcl_json_instcb_t) (
hcl_jsoner_t* json, hcl_json_t* json,
hcl_jsoner_reply_type_t type, hcl_json_inst_t inst,
const hcl_ooch_t* dptr, const hcl_oocs_t* str
hcl_oow_t dlen
); );
typedef int (*hcl_jsoner_feed_attr_t) ( struct hcl_json_prim_t
hcl_jsoner_t* json,
const hcl_oocs_t* key,
const hcl_oocs_t* val
);
typedef int (*hcl_jsoner_start_data_t) (
hcl_jsoner_t* json
);
typedef int (*hcl_jsoner_feed_data_t) (
hcl_jsoner_t* json,
const void* ptr,
hcl_oow_t len
);
typedef int (*hcl_jsoner_end_data_t) (
hcl_jsoner_t* json
);
enum hcl_jsoner_end_reply_state_t
{ {
HCL_JSON_END_REPLY_STATE_OK, hcl_json_log_write_t log_write;
HCL_JSON_END_REPLY_STATE_REVOKED hcl_json_instcb_t instcb;
}; };
typedef enum hcl_jsoner_end_reply_state_t hcl_jsoner_end_reply_state_t; typedef struct hcl_json_prim_t hcl_json_prim_t;
typedef int (*hcl_jsoner_end_reply_t) (
hcl_jsoner_t* json,
hcl_jsoner_end_reply_state_t state
);
struct hcl_jsoner_prim_t
{
hcl_jsoner_log_write_t log_write;
hcl_jsoner_start_reply_t start_reply; /* mandatory */
hcl_jsoner_feed_attr_t feed_attr; /* optional */
hcl_jsoner_feed_data_t feed_data; /* optional */
hcl_jsoner_end_reply_t end_reply; /* mandatory */
};
typedef struct hcl_jsoner_prim_t hcl_jsoner_prim_t;
/* ========================================================================= */ /* ========================================================================= */
@ -167,127 +107,126 @@ typedef struct hcl_jsoner_prim_t hcl_jsoner_prim_t;
extern "C" { extern "C" {
#endif #endif
HCL_EXPORT hcl_jsoner_t* hcl_jsoner_open ( HCL_EXPORT hcl_json_t* hcl_json_open (
hcl_mmgr_t* mmgr, hcl_mmgr_t* mmgr,
hcl_oow_t xtnsize, hcl_oow_t xtnsize,
hcl_jsoner_prim_t* prim, hcl_json_prim_t* prim,
hcl_errnum_t* errnum hcl_errnum_t* errnum
); );
HCL_EXPORT void hcl_jsoner_close ( HCL_EXPORT void hcl_json_close (
hcl_jsoner_t* json hcl_json_t* json
); );
HCL_EXPORT void hcl_jsoner_reset ( HCL_EXPORT void hcl_json_reset (
hcl_jsoner_t* json hcl_json_t* json
); );
HCL_EXPORT int hcl_jsoner_feed ( HCL_EXPORT int hcl_json_feed (
hcl_jsoner_t* json, hcl_json_t* json,
const void* ptr, const void* ptr,
hcl_oow_t len, hcl_oow_t len,
hcl_oow_t* xlen hcl_oow_t* xlen
); );
HCL_EXPORT hcl_jsoner_state_t hcl_jsoner_getstate ( HCL_EXPORT hcl_json_state_t hcl_json_getstate (
hcl_jsoner_t* json hcl_json_t* json
); );
HCL_EXPORT int hcl_jsoner_setoption ( HCL_EXPORT int hcl_json_setoption (
hcl_jsoner_t* json, hcl_json_t* json,
hcl_jsoner_option_t id, hcl_json_option_t id,
const void* value const void* value
); );
HCL_EXPORT int hcl_jsoner_getoption ( HCL_EXPORT int hcl_json_getoption (
hcl_jsoner_t* json, hcl_json_t* json,
hcl_jsoner_option_t id, hcl_json_option_t id,
void* value void* value
); );
HCL_EXPORT void* hcl_jsoner_getxtn ( HCL_EXPORT void* hcl_json_getxtn (
hcl_jsoner_t* json hcl_json_t* json
); );
HCL_EXPORT hcl_mmgr_t* hcl_jsoner_getmmgr ( HCL_EXPORT hcl_mmgr_t* hcl_json_getmmgr (
hcl_jsoner_t* json hcl_json_t* json
); );
HCL_EXPORT hcl_cmgr_t* hcl_jsoner_getcmgr ( HCL_EXPORT hcl_cmgr_t* hcl_json_getcmgr (
hcl_jsoner_t* json hcl_json_t* json
); );
HCL_EXPORT void hcl_jsoner_setcmgr ( HCL_EXPORT void hcl_json_setcmgr (
hcl_jsoner_t* json, hcl_json_t* json,
hcl_cmgr_t* cmgr hcl_cmgr_t* cmgr
); );
HCL_EXPORT hcl_errnum_t hcl_jsoner_geterrnum ( HCL_EXPORT hcl_errnum_t hcl_json_geterrnum (
hcl_jsoner_t* json hcl_json_t* json
); );
HCL_EXPORT const hcl_ooch_t* hcl_jsoner_geterrstr ( HCL_EXPORT const hcl_ooch_t* hcl_json_geterrstr (
hcl_jsoner_t* json hcl_json_t* json
); );
HCL_EXPORT const hcl_ooch_t* hcl_jsoner_geterrmsg ( HCL_EXPORT const hcl_ooch_t* hcl_json_geterrmsg (
hcl_jsoner_t* json hcl_json_t* json
); );
HCL_EXPORT void hcl_jsoner_seterrnum ( HCL_EXPORT void hcl_json_seterrnum (
hcl_jsoner_t* json, hcl_json_t* json,
hcl_errnum_t errnum hcl_errnum_t errnum
); );
HCL_EXPORT void hcl_jsoner_seterrbfmt ( HCL_EXPORT void hcl_json_seterrbfmt (
hcl_jsoner_t* json, hcl_json_t* json,
hcl_errnum_t errnum, hcl_errnum_t errnum,
const hcl_bch_t* fmt, const hcl_bch_t* fmt,
... ...
); );
HCL_EXPORT void hcl_jsoner_seterrufmt ( HCL_EXPORT void hcl_json_seterrufmt (
hcl_jsoner_t* json, hcl_json_t* json,
hcl_errnum_t errnum, hcl_errnum_t errnum,
const hcl_uch_t* fmt, const hcl_uch_t* fmt,
... ...
); );
HCL_EXPORT void hcl_jsoner_logbfmt ( HCL_EXPORT void hcl_json_logbfmt (
hcl_jsoner_t* json, hcl_json_t* json,
unsigned int mask, unsigned int mask,
const hcl_bch_t* fmt, const hcl_bch_t* fmt,
... ...
); );
HCL_EXPORT void hcl_jsoner_logufmt ( HCL_EXPORT void hcl_json_logufmt (
hcl_jsoner_t* json, hcl_json_t* json,
unsigned int mask, unsigned int mask,
const hcl_uch_t* fmt, const hcl_uch_t* fmt,
... ...
); );
HCL_EXPORT void* hcl_jsoner_allocmem ( HCL_EXPORT void* hcl_json_allocmem (
hcl_jsoner_t* json, hcl_json_t* json,
hcl_oow_t size hcl_oow_t size
); );
HCL_EXPORT void* hcl_jsoner_callocmem ( HCL_EXPORT void* hcl_json_callocmem (
hcl_jsoner_t* json, hcl_json_t* json,
hcl_oow_t size hcl_oow_t size
); );
HCL_EXPORT void* hcl_jsoner_reallocmem ( HCL_EXPORT void* hcl_json_reallocmem (
hcl_jsoner_t* json, hcl_json_t* json,
void* ptr, void* ptr,
hcl_oow_t size hcl_oow_t size
); );
HCL_EXPORT void hcl_json_freemem (
HCL_EXPORT void hcl_jsoner_freemem ( hcl_json_t* json,
hcl_jsoner_t* json,
void* ptr void* ptr
); );

531
lib/json.c
View File

@ -34,40 +34,47 @@
struct dummy_hcl_xtn_t struct dummy_hcl_xtn_t
{ {
hcl_jsoner_t* json; hcl_json_t* json;
}; };
typedef struct dummy_hcl_xtn_t dummy_hcl_xtn_t; typedef struct dummy_hcl_xtn_t dummy_hcl_xtn_t;
enum hcl_jsoner_reply_attr_type_t
typedef struct hcl_json_state_node_t hcl_json_state_node_t;
struct hcl_json_state_node_t
{ {
HCL_JSON_REPLY_ATTR_TYPE_UNKNOWN, hcl_json_state_t state;
HCL_JSON_REPLY_ATTR_TYPE_DATA
};
typedef enum hcl_jsoner_reply_attr_type_t hcl_jsoner_reply_attr_type_t;
typedef struct hcl_jsoner_state_node_t hcl_jsoner_state_node_t;
struct hcl_jsoner_state_node_t
{
hcl_jsoner_state_t state;
union union
{ {
struct
{
int got_value;
} ia; /* in array */
struct
{
/* 0: ready to get key (at the beginning or got comma),
* 1: got key, 2: got colon, 3: got value */
int state;
} id; /* in dictionary */
struct struct
{ {
int escaped; int escaped;
int digit_count; int digit_count;
hcl_ooch_t acc; hcl_ooch_t acc;
} qv; } qv;
struct
{
int dotted;
} nv;
} u; } u;
hcl_jsoner_state_node_t* next; hcl_json_state_node_t* next;
}; };
struct hcl_jsoner_t struct hcl_json_t
{ {
hcl_mmgr_t* mmgr; hcl_mmgr_t* mmgr;
hcl_cmgr_t* cmgr; hcl_cmgr_t* cmgr;
hcl_jsoner_prim_t prim; hcl_json_prim_t prim;
hcl_t* dummy_hcl; hcl_t* dummy_hcl;
hcl_errnum_t errnum; hcl_errnum_t errnum;
@ -83,15 +90,11 @@ struct hcl_jsoner_t
unsigned int logmask; unsigned int logmask;
} cfg; } cfg;
hcl_jsoner_state_node_t state_top; hcl_json_state_node_t state_top;
hcl_jsoner_state_node_t* state_stack; hcl_json_state_node_t* state_stack;
struct hcl_oocs_t tok;
{ hcl_oow_t tok_capa;
hcl_ooch_t* ptr;
hcl_oow_t len;
hcl_oow_t capa;
} tok;
}; };
@ -100,7 +103,7 @@ struct hcl_jsoner_t
static void log_write_for_dummy (hcl_t* hcl, unsigned int mask, const hcl_ooch_t* msg, hcl_oow_t len) static void log_write_for_dummy (hcl_t* hcl, unsigned int mask, const hcl_ooch_t* msg, hcl_oow_t len)
{ {
dummy_hcl_xtn_t* xtn = (dummy_hcl_xtn_t*)hcl_getxtn(hcl); dummy_hcl_xtn_t* xtn = (dummy_hcl_xtn_t*)hcl_getxtn(hcl);
hcl_jsoner_t* json; hcl_json_t* json;
json = xtn->json; json = xtn->json;
json->prim.log_write (json, mask, msg, len); json->prim.log_write (json, mask, msg, len);
@ -147,23 +150,23 @@ static HCL_INLINE int is_digitchar (hcl_ooci_t c)
return (c >= '0' && c <= '9'); return (c >= '0' && c <= '9');
} }
static void clear_token (hcl_jsoner_t* json) static void clear_token (hcl_json_t* json)
{ {
json->tok.len = 0; json->tok.len = 0;
} }
static int add_char_to_token (hcl_jsoner_t* json, hcl_ooch_t ch) static int add_char_to_token (hcl_json_t* json, hcl_ooch_t ch)
{ {
if (json->tok.len >= json->tok.capa) if (json->tok.len >= json->tok_capa)
{ {
hcl_ooch_t* tmp; hcl_ooch_t* tmp;
hcl_oow_t newcapa; hcl_oow_t newcapa;
newcapa = HCL_ALIGN_POW2(json->tok.len + 1, HCL_JSON_TOKEN_NAME_ALIGN); newcapa = HCL_ALIGN_POW2(json->tok.len + 1, HCL_JSON_TOKEN_NAME_ALIGN);
tmp = hcl_jsoner_reallocmem(json, json->tok.ptr, newcapa * HCL_SIZEOF(*tmp)); tmp = hcl_json_reallocmem(json, json->tok.ptr, newcapa * HCL_SIZEOF(*tmp));
if (!tmp) return -1; if (!tmp) return -1;
json->tok.capa = newcapa; json->tok_capa = newcapa;
json->tok.ptr = tmp; json->tok.ptr = tmp;
} }
@ -171,12 +174,12 @@ static int add_char_to_token (hcl_jsoner_t* json, hcl_ooch_t ch)
return 0; return 0;
} }
static HCL_INLINE int is_token (hcl_jsoner_t* json, const hcl_bch_t* str) static HCL_INLINE int is_token (hcl_json_t* json, const hcl_bch_t* str)
{ {
return hcl_comp_oochars_bcstr(json->tok.ptr, json->tok.len, str) == 0; return hcl_comp_oochars_bcstr(json->tok.ptr, json->tok.len, str) == 0;
} }
static HCL_INLINE int is_token_integer (hcl_jsoner_t* json, hcl_oow_t* value) static HCL_INLINE int is_token_integer (hcl_json_t* json, hcl_oow_t* value)
{ {
hcl_oow_t i; hcl_oow_t i;
hcl_oow_t v = 0; hcl_oow_t v = 0;
@ -208,11 +211,13 @@ static HCL_INLINE hcl_ooch_t unescape (hcl_ooch_t c)
} }
} }
static int push_state (hcl_jsoner_t* json, hcl_jsoner_state_t state) /* ========================================================================= */
{
hcl_jsoner_state_node_t* ss;
ss = hcl_jsoner_callocmem(json, HCL_SIZEOF(*ss)); static int push_state (hcl_json_t* json, hcl_json_state_t state)
{
hcl_json_state_node_t* ss;
ss = hcl_json_callocmem(json, HCL_SIZEOF(*ss));
if (!ss) return -1; if (!ss) return -1;
ss->state = state; ss->state = state;
@ -222,24 +227,52 @@ static int push_state (hcl_jsoner_t* json, hcl_jsoner_state_t state)
return 0; return 0;
} }
static void pop_state (hcl_jsoner_t* json) static void pop_state (hcl_json_t* json)
{ {
hcl_jsoner_state_node_t* ss; hcl_json_state_node_t* ss;
ss = json->state_stack; ss = json->state_stack;
HCL_ASSERT (json->dummy_hcl, ss != HCL_NULL && ss != &json->state_top); HCL_ASSERT (json->dummy_hcl, ss != HCL_NULL && ss != &json->state_top);
json->state_stack = ss->next; json->state_stack = ss->next;
if (json->state_stack->state == HCL_JSON_STATE_IN_ARRAY)
{
json->state_stack->u.ia.got_value = 1;
}
else if (json->state_stack->state == HCL_JSON_STATE_IN_DIC)
{
json->state_stack->u.id.state++;
}
/* TODO: don't free this. move it to the free list? */ /* TODO: don't free this. move it to the free list? */
hcl_jsoner_freemem (json, ss); hcl_json_freemem (json, ss);
} }
static void pop_all_states (hcl_jsoner_t* json) static void pop_all_states (hcl_json_t* json)
{ {
while (json->state_stack != &json->state_top) pop_state (json); while (json->state_stack != &json->state_top) pop_state (json);
} }
static int handle_quoted_value_char (hcl_jsoner_t* json, hcl_ooci_t c) /* ========================================================================= */
static int invoke_data_inst (hcl_json_t* json, hcl_json_inst_t inst)
{
if (json->state_stack->state == HCL_JSON_STATE_IN_DIC && json->state_stack->u.id.state == 1)
{
if (inst != HCL_JSON_INST_STRING)
{
hcl_json_seterrbfmt (json, HCL_EINVAL, "dictionary key not a string - %.*js", json->tok.len, json->tok.ptr);
return -1;
}
inst = HCL_JSON_INST_KEY;
}
json->prim.instcb (json, inst, &json->tok);
return 0;
}
static int handle_quoted_value_char (hcl_json_t* json, hcl_ooci_t c)
{ {
if (json->state_stack->u.qv.escaped >= 2) if (json->state_stack->u.qv.escaped >= 2)
{ {
@ -301,26 +334,270 @@ static int handle_quoted_value_char (hcl_jsoner_t* json, hcl_ooci_t c)
else if (c == '\"') else if (c == '\"')
{ {
pop_state (json); pop_state (json);
HCL_LOG2 (json->dummy_hcl, HCL_LOG_APP | HCL_LOG_FATAL, "[%.*js]\n", json->tok.len, json->tok.ptr); if (invoke_data_inst(json, HCL_JSON_INST_STRING) <= -1) return -1;
/* TODO: call callback ARRAY_VALUE*/
} }
else else
{ {
if (add_char_to_token(json, c) <= -1) return -1; if (add_char_to_token(json, c) <= -1) return -1;
} }
return 1;
return 0;
} }
static int handle_numeric_value_char (hcl_jsoner_t* json, hcl_ooci_t c) static int handle_numeric_value_char (hcl_json_t* json, hcl_ooci_t c)
{ {
/* TODO: */ if (is_digitchar(c) || (json->tok.len == 0 && (c == '+' || c == '-')))
{
if (add_char_to_token(json, c) <= -1) return -1;
return 1;
}
else if (!json->state_stack->u.nv.dotted && c == '.' &&
json->tok.len > 0 && is_digitchar(json->tok.ptr[json->tok.len - 1]))
{
if (add_char_to_token(json, c) <= -1) return -1;
json->state_stack->u.nv.dotted = 1;
return 1;
}
pop_state (json);
HCL_ASSERT (json->dummy_hcl, json->tok.len > 0);
if (!is_digitchar(json->tok.ptr[json->tok.len - 1]))
{
hcl_json_seterrbfmt (json, HCL_EINVAL, "invalid numeric value - %.*js", json->tok.len, json->tok.ptr);
return -1; return -1;
}
if (invoke_data_inst(json, HCL_JSON_INST_NUMBER) <= -1) return -1;
return 0; /* start over */
} }
static int handle_char (hcl_jsoner_t* json, hcl_ooci_t c, hcl_oow_t nbytes) static int handle_word_value_char (hcl_json_t* json, hcl_ooci_t c)
{ {
hcl_json_inst_t inst;
if (is_alphachar(c))
{
if (add_char_to_token(json, c) <= -1) return -1;
return 1;
}
pop_state (json);
if (hcl_comp_oochars_bcstr(json->tok.ptr, json->tok.len, "null") == 0) inst = HCL_JSON_INST_NIL;
else if (hcl_comp_oochars_bcstr(json->tok.ptr, json->tok.len, "true") == 0) inst = HCL_JSON_INST_TRUE;
else if (hcl_comp_oochars_bcstr(json->tok.ptr, json->tok.len, "false") == 0) inst = HCL_JSON_INST_FALSE;
else
{
hcl_json_seterrbfmt (json, HCL_EINVAL, "invalue word value - %.*js", json->tok.len, json->tok.ptr);
return -1;
}
if (invoke_data_inst(json, inst) <= -1) return -1;
return 0; /* start over */
}
/* ========================================================================= */
static int handle_start_char (hcl_json_t* json, hcl_ooci_t c)
{
if (c == '[')
{
if (push_state(json, HCL_JSON_STATE_IN_ARRAY) <= -1) return -1;
json->state_stack->u.ia.got_value = 0;
json->prim.instcb (json, HCL_JSON_INST_START_ARRAY, HCL_NULL);
return 1;
}
else if (c == '{')
{
if (push_state(json, HCL_JSON_STATE_IN_DIC) <= -1) return -1;
json->state_stack->u.id.state = 0;
json->prim.instcb (json, HCL_JSON_INST_START_DIC, HCL_NULL);
return 1;
}
else if (is_spacechar(c))
{
/* do nothing */
return 1;
}
else
{
hcl_json_seterrbfmt (json, HCL_EINVAL, "not starting with [ or { - %jc", (hcl_ooch_t)c);
return -1;
}
}
static int handle_char_in_array (hcl_json_t* json, hcl_ooci_t c)
{
if (c == ']')
{
json->prim.instcb (json, HCL_JSON_INST_END_ARRAY, HCL_NULL);
pop_state (json);
return 1;
}
else if (c == ',')
{
if (!json->state_stack->u.ia.got_value)
{
hcl_json_seterrbfmt (json, HCL_EINVAL, "redundant comma in array - %jc", (hcl_ooch_t)c);
return -1;
}
json->state_stack->u.ia.got_value = 0;
return 1;
}
else if (is_spacechar(c))
{
/* do nothing */
return 1;
}
else
{
if (json->state_stack->u.ia.got_value)
{
hcl_json_seterrbfmt (json, HCL_EINVAL, "comma required in array - %jc", (hcl_ooch_t)c);
return -1;
}
if (c == '\"')
{
if (push_state(json, HCL_JSON_STATE_IN_QUOTED_VALUE) <= -1) return -1;
clear_token (json);
return 1;
}
/* TOOD: else if (c == '\'') HCL character
* else if (c == '#') HCL radixed number
*/
else if (is_digitchar(c) || c == '+' || c == '-')
{
if (push_state(json, HCL_JSON_STATE_IN_NUMERIC_VALUE) <= -1) return -1;
clear_token (json);
json->state_stack->u.nv.dotted = 0;
return 0; /* start over */
}
else if (is_alphachar(c))
{
if (push_state(json, HCL_JSON_STATE_IN_WORD_VALUE) <= -1) return -1;
clear_token (json);
return 0; /* start over */
}
else if (c == '[')
{
if (push_state(json, HCL_JSON_STATE_IN_ARRAY) <= -1) return -1;
json->state_stack->u.ia.got_value = 0;
json->prim.instcb (json, HCL_JSON_INST_START_ARRAY, HCL_NULL);
return 1;
}
else if (c == '{')
{
if (push_state(json, HCL_JSON_STATE_IN_DIC) <= -1) return -1;
json->state_stack->u.id.state = 0;
json->prim.instcb (json, HCL_JSON_INST_START_DIC, HCL_NULL);
return 1;
}
else
{
hcl_json_seterrbfmt (json, HCL_EINVAL, "wrong character inside array - %jc", (hcl_ooch_t)c);
return -1;
}
}
}
static int handle_char_in_dic (hcl_json_t* json, hcl_ooci_t c)
{
if (c == '}')
{
json->prim.instcb (json, HCL_JSON_INST_END_DIC, HCL_NULL);
pop_state (json);
return 1;
}
else if (c == ':')
{
if (json->state_stack->u.id.state != 1)
{
hcl_json_seterrbfmt (json, HCL_EINVAL, "redundant colon in dictionary - %jc", (hcl_ooch_t)c);
return -1;
}
json->state_stack->u.id.state++;
return 1;
}
else if (c == ',')
{
if (json->state_stack->u.id.state != 3)
{
hcl_json_seterrbfmt (json, HCL_EINVAL, "redundant comma in dicitonary - %jc", (hcl_ooch_t)c);
return -1;
}
json->state_stack->u.id.state = 0;
return 1;
}
else if (is_spacechar(c))
{
/* do nothing */
return 1;
}
else
{
if (json->state_stack->u.id.state == 1)
{
hcl_json_seterrbfmt (json, HCL_EINVAL, "colon required in dicitonary - %jc", (hcl_ooch_t)c);
return -1;
}
else if (json->state_stack->u.id.state == 3)
{
hcl_json_seterrbfmt (json, HCL_EINVAL, "comma required in dicitonary - %jc", (hcl_ooch_t)c);
return -1;
}
if (c == '\"')
{
if (push_state(json, HCL_JSON_STATE_IN_QUOTED_VALUE) <= -1) return -1;
clear_token (json);
return 1;
}
/* TOOD: else if (c == '\'') HCL character
* else if (c == '#') HCL radixed number
*/
else if (is_digitchar(c) || c == '+' || c == '-')
{
if (push_state(json, HCL_JSON_STATE_IN_NUMERIC_VALUE) <= -1) return -1;
clear_token (json);
json->state_stack->u.nv.dotted = 0;
return 0; /* start over */
}
else if (is_alphachar(c))
{
if (push_state(json, HCL_JSON_STATE_IN_WORD_VALUE) <= -1) return -1;
clear_token (json);
return 0; /* start over */
}
else if (c == '[')
{
if (push_state(json, HCL_JSON_STATE_IN_ARRAY) <= -1) return -1;
json->state_stack->u.ia.got_value = 0;
json->prim.instcb (json, HCL_JSON_INST_START_ARRAY, HCL_NULL);
return 1;
}
else if (c == '{')
{
if (push_state(json, HCL_JSON_STATE_IN_DIC) <= -1) return -1;
json->state_stack->u.id.state = 0;
json->prim.instcb (json, HCL_JSON_INST_START_DIC, HCL_NULL);
return 1;
}
else
{
hcl_json_seterrbfmt (json, HCL_EINVAL, "wrong character inside array - %jc", (hcl_ooch_t)c);
return -1;
}
}
}
/* ========================================================================= */
static int handle_char (hcl_json_t* json, hcl_ooci_t c, hcl_oow_t nbytes)
{
int x;
start_over:
if (c == HCL_OOCI_EOF) if (c == HCL_OOCI_EOF)
{ {
if (json->state_stack->state == HCL_JSON_STATE_START) if (json->state_stack->state == HCL_JSON_STATE_START)
@ -330,117 +607,51 @@ static int handle_char (hcl_jsoner_t* json, hcl_ooci_t c, hcl_oow_t nbytes)
} }
else else
{ {
hcl_jsoner_seterrbfmt (json, HCL_EFINIS, "unexpected end of data"); hcl_json_seterrbfmt (json, HCL_EFINIS, "unexpected end of data");
return -1; return -1;
} }
} }
printf ("handling [%c] %d\n", c, (int)nbytes);
switch (json->state_stack->state) switch (json->state_stack->state)
{ {
case HCL_JSON_STATE_START: case HCL_JSON_STATE_START:
if (c == '[') x = handle_start_char(json, c);
{
if (push_state(json, HCL_JSON_STATE_IN_ARRAY) <= -1) return -1;
break;
}
else if (c == '{')
{
if (push_state(json, HCL_JSON_STATE_IN_DIC) <= -1) return -1;
break;
}
else if (is_spacechar(c))
{
/* skip whitespaces at the beginning of the start line before the reply name */
break;
}
else
{
hcl_jsoner_seterrbfmt (json, HCL_EINVAL, "not starting with [ or { - %jc", (hcl_ooch_t)c);
goto oops;
}
break; break;
case HCL_JSON_STATE_IN_ARRAY: case HCL_JSON_STATE_IN_ARRAY:
if (c == ']') x = handle_char_in_array(json, c);
{
pop_state (json);
break;
}
else if (c == ',')
{
/* TODO: handle this */
}
else if (is_spacechar(c))
{
break;
}
else if (c == '\"')
{
if (push_state(json, HCL_JSON_STATE_IN_QUOTED_VALUE) <= -1) return -1;
clear_token (json);
break;
}
else if (is_alphachar(c) || is_digitchar(c))
{
break;
}
else
{
hcl_jsoner_seterrbfmt (json, HCL_EINVAL, "wrong character inside array - %jc", (hcl_ooch_t)c);
goto oops;
}
break; break;
case HCL_JSON_STATE_IN_DIC: case HCL_JSON_STATE_IN_DIC:
if (c == '}') x = handle_char_in_dic(json, c);
{
pop_state (json);
break;
}
else if (is_spacechar(c))
{
break;
}
else if (c == '\"')
{
break;
}
else if (is_alphachar(c) || is_digitchar(c))
{
break;
}
else
{
hcl_jsoner_seterrbfmt (json, HCL_EINVAL, "wrong character inside dictionary - %jc", (hcl_ooch_t)c);
goto oops;
}
break; break;
case HCL_JSON_STATE_IN_WORD_VALUE: case HCL_JSON_STATE_IN_WORD_VALUE:
x = handle_word_value_char(json, c);
break; break;
case HCL_JSON_STATE_IN_QUOTED_VALUE: case HCL_JSON_STATE_IN_QUOTED_VALUE:
if (handle_quoted_value_char(json, c) <= -1) goto oops; x = handle_quoted_value_char(json, c);
break; break;
case HCL_JSON_STATE_IN_NUMERIC_VALUE: case HCL_JSON_STATE_IN_NUMERIC_VALUE:
if (handle_numeric_value_char(json, c) <= -1) goto oops; x = handle_numeric_value_char(json, c);
break; break;
default: default:
hcl_jsoner_seterrbfmt (json, HCL_EINTERN, "internal error - must not be called for state %d", (int)json->state_stack->state); hcl_json_seterrbfmt (json, HCL_EINTERN, "internal error - must not be called for state %d", (int)json->state_stack->state);
goto oops; return -1;
} }
return 0; if (x <= -1) return -1;
if (x == 0) goto start_over;
oops: return 0;
return -1;
} }
static int feed_json_data (hcl_jsoner_t* json, const hcl_bch_t* data, hcl_oow_t len, hcl_oow_t* xlen) /* ========================================================================= */
static int feed_json_data (hcl_json_t* json, const hcl_bch_t* data, hcl_oow_t len, hcl_oow_t* xlen)
{ {
const hcl_bch_t* ptr; const hcl_bch_t* ptr;
const hcl_bch_t* end; const hcl_bch_t* end;
@ -500,14 +711,14 @@ oops:
/* ========================================================================= */ /* ========================================================================= */
hcl_jsoner_t* hcl_jsoner_open (hcl_mmgr_t* mmgr, hcl_oow_t xtnsize, hcl_jsoner_prim_t* prim, hcl_errnum_t* errnum) hcl_json_t* hcl_json_open (hcl_mmgr_t* mmgr, hcl_oow_t xtnsize, hcl_json_prim_t* prim, hcl_errnum_t* errnum)
{ {
hcl_jsoner_t* json; hcl_json_t* json;
hcl_t* hcl; hcl_t* hcl;
hcl_vmprim_t vmprim; hcl_vmprim_t vmprim;
dummy_hcl_xtn_t* xtn; dummy_hcl_xtn_t* xtn;
json = (hcl_jsoner_t*)HCL_MMGR_ALLOC(mmgr, HCL_SIZEOF(*json) + xtnsize); json = (hcl_json_t*)HCL_MMGR_ALLOC(mmgr, HCL_SIZEOF(*json) + xtnsize);
if (!json) if (!json)
{ {
if (errnum) *errnum = HCL_ESYSMEM; if (errnum) *errnum = HCL_ESYSMEM;
@ -550,15 +761,15 @@ hcl_jsoner_t* hcl_jsoner_open (hcl_mmgr_t* mmgr, hcl_oow_t xtnsize, hcl_jsoner_p
return json; return json;
} }
void hcl_jsoner_close (hcl_jsoner_t* json) void hcl_json_close (hcl_json_t* json)
{ {
pop_all_states (json); pop_all_states (json);
if (json->tok.ptr) hcl_jsoner_freemem (json, json->tok.ptr); if (json->tok.ptr) hcl_json_freemem (json, json->tok.ptr);
hcl_close (json->dummy_hcl); hcl_close (json->dummy_hcl);
HCL_MMGR_FREE (json->mmgr, json); HCL_MMGR_FREE (json->mmgr, json);
} }
int hcl_jsoner_setoption (hcl_jsoner_t* json, hcl_jsoner_option_t id, const void* value) int hcl_json_setoption (hcl_json_t* json, hcl_json_option_t id, const void* value)
{ {
switch (id) switch (id)
{ {
@ -579,11 +790,11 @@ int hcl_jsoner_setoption (hcl_jsoner_t* json, hcl_jsoner_option_t id, const void
return 0; return 0;
} }
hcl_jsoner_seterrnum (json, HCL_EINVAL); hcl_json_seterrnum (json, HCL_EINVAL);
return -1; return -1;
} }
int hcl_jsoner_getoption (hcl_jsoner_t* json, hcl_jsoner_option_t id, void* value) int hcl_json_getoption (hcl_json_t* json, hcl_json_option_t id, void* value)
{ {
switch (id) switch (id)
{ {
@ -596,55 +807,55 @@ int hcl_jsoner_getoption (hcl_jsoner_t* json, hcl_jsoner_option_t id, void* valu
return 0; return 0;
}; };
hcl_jsoner_seterrnum (json, HCL_EINVAL); hcl_json_seterrnum (json, HCL_EINVAL);
return -1; return -1;
} }
void* hcl_jsoner_getxtn (hcl_jsoner_t* json) void* hcl_json_getxtn (hcl_json_t* json)
{ {
return (void*)(json + 1); return (void*)(json + 1);
} }
hcl_mmgr_t* hcl_jsoner_getmmgr (hcl_jsoner_t* json) hcl_mmgr_t* hcl_json_getmmgr (hcl_json_t* json)
{ {
return json->mmgr; return json->mmgr;
} }
hcl_cmgr_t* hcl_jsoner_getcmgr (hcl_jsoner_t* json) hcl_cmgr_t* hcl_json_getcmgr (hcl_json_t* json)
{ {
return json->cmgr; return json->cmgr;
} }
void hcl_jsoner_setcmgr (hcl_jsoner_t* json, hcl_cmgr_t* cmgr) void hcl_json_setcmgr (hcl_json_t* json, hcl_cmgr_t* cmgr)
{ {
json->cmgr = cmgr; json->cmgr = cmgr;
} }
hcl_errnum_t hcl_jsoner_geterrnum (hcl_jsoner_t* json) hcl_errnum_t hcl_json_geterrnum (hcl_json_t* json)
{ {
return json->errnum; return json->errnum;
} }
const hcl_ooch_t* hcl_jsoner_geterrstr (hcl_jsoner_t* json) const hcl_ooch_t* hcl_json_geterrstr (hcl_json_t* json)
{ {
return hcl_errnum_to_errstr(json->errnum); return hcl_errnum_to_errstr(json->errnum);
} }
const hcl_ooch_t* hcl_jsoner_geterrmsg (hcl_jsoner_t* json) const hcl_ooch_t* hcl_json_geterrmsg (hcl_json_t* json)
{ {
if (json->errmsg.len <= 0) return hcl_errnum_to_errstr(json->errnum); if (json->errmsg.len <= 0) return hcl_errnum_to_errstr(json->errnum);
return json->errmsg.buf; return json->errmsg.buf;
} }
void hcl_jsoner_seterrnum (hcl_jsoner_t* json, hcl_errnum_t errnum) void hcl_json_seterrnum (hcl_json_t* json, hcl_errnum_t errnum)
{ {
/*if (json->shuterr) return; */ /*if (json->shuterr) return; */
json->errnum = errnum; json->errnum = errnum;
json->errmsg.len = 0; json->errmsg.len = 0;
} }
void hcl_jsoner_seterrbfmt (hcl_jsoner_t* json, hcl_errnum_t errnum, const hcl_bch_t* fmt, ...) void hcl_json_seterrbfmt (hcl_json_t* json, hcl_errnum_t errnum, const hcl_bch_t* fmt, ...)
{ {
va_list ap; va_list ap;
@ -658,7 +869,7 @@ void hcl_jsoner_seterrbfmt (hcl_jsoner_t* json, hcl_errnum_t errnum, const hcl_b
json->errmsg.len = json->dummy_hcl->errmsg.len; json->errmsg.len = json->dummy_hcl->errmsg.len;
} }
void hcl_jsoner_seterrufmt (hcl_jsoner_t* json, hcl_errnum_t errnum, const hcl_uch_t* fmt, ...) void hcl_json_seterrufmt (hcl_json_t* json, hcl_errnum_t errnum, const hcl_uch_t* fmt, ...)
{ {
va_list ap; va_list ap;
@ -674,7 +885,7 @@ void hcl_jsoner_seterrufmt (hcl_jsoner_t* json, hcl_errnum_t errnum, const hcl_u
/* ========================================================================= */ /* ========================================================================= */
void hcl_jsoner_logbfmt (hcl_jsoner_t* json, unsigned int mask, const hcl_bch_t* fmt, ...) void hcl_json_logbfmt (hcl_json_t* json, unsigned int mask, const hcl_bch_t* fmt, ...)
{ {
va_list ap; va_list ap;
va_start (ap, fmt); va_start (ap, fmt);
@ -682,7 +893,7 @@ void hcl_jsoner_logbfmt (hcl_jsoner_t* json, unsigned int mask, const hcl_bch_t*
va_end (ap); va_end (ap);
} }
void hcl_jsoner_logufmt (hcl_jsoner_t* json, unsigned int mask, const hcl_uch_t* fmt, ...) void hcl_json_logufmt (hcl_json_t* json, unsigned int mask, const hcl_uch_t* fmt, ...)
{ {
va_list ap; va_list ap;
va_start (ap, fmt); va_start (ap, fmt);
@ -692,45 +903,45 @@ void hcl_jsoner_logufmt (hcl_jsoner_t* json, unsigned int mask, const hcl_uch_t*
/* ========================================================================= */ /* ========================================================================= */
void* hcl_jsoner_allocmem (hcl_jsoner_t* json, hcl_oow_t size) void* hcl_json_allocmem (hcl_json_t* json, hcl_oow_t size)
{ {
void* ptr; void* ptr;
ptr = HCL_MMGR_ALLOC(json->mmgr, size); ptr = HCL_MMGR_ALLOC(json->mmgr, size);
if (!ptr) hcl_jsoner_seterrnum (json, HCL_ESYSMEM); if (!ptr) hcl_json_seterrnum (json, HCL_ESYSMEM);
return ptr; return ptr;
} }
void* hcl_jsoner_callocmem (hcl_jsoner_t* json, hcl_oow_t size) void* hcl_json_callocmem (hcl_json_t* json, hcl_oow_t size)
{ {
void* ptr; void* ptr;
ptr = HCL_MMGR_ALLOC(json->mmgr, size); ptr = HCL_MMGR_ALLOC(json->mmgr, size);
if (!ptr) hcl_jsoner_seterrnum (json, HCL_ESYSMEM); if (!ptr) hcl_json_seterrnum (json, HCL_ESYSMEM);
else HCL_MEMSET (ptr, 0, size); else HCL_MEMSET (ptr, 0, size);
return ptr; return ptr;
} }
void* hcl_jsoner_reallocmem (hcl_jsoner_t* json, void* ptr, hcl_oow_t size) void* hcl_json_reallocmem (hcl_json_t* json, void* ptr, hcl_oow_t size)
{ {
ptr = HCL_MMGR_REALLOC(json->mmgr, ptr, size); ptr = HCL_MMGR_REALLOC(json->mmgr, ptr, size);
if (!ptr) hcl_jsoner_seterrnum (json, HCL_ESYSMEM); if (!ptr) hcl_json_seterrnum (json, HCL_ESYSMEM);
return ptr; return ptr;
} }
void hcl_jsoner_freemem (hcl_jsoner_t* json, void* ptr) void hcl_json_freemem (hcl_json_t* json, void* ptr)
{ {
HCL_MMGR_FREE (json->mmgr, ptr); HCL_MMGR_FREE (json->mmgr, ptr);
} }
/* ========================================================================= */ /* ========================================================================= */
hcl_jsoner_state_t hcl_jsoner_getstate (hcl_jsoner_t* json) hcl_json_state_t hcl_json_getstate (hcl_json_t* json)
{ {
return json->state_stack->state; return json->state_stack->state;
} }
void hcl_jsoner_reset (hcl_jsoner_t* json) void hcl_json_reset (hcl_json_t* json)
{ {
/* TODO: reset XXXXXXXXXXXXXXXXXXXXXXXXXXXxxxxx */ /* TODO: reset XXXXXXXXXXXXXXXXXXXXXXXXXXXxxxxx */
pop_all_states (json); pop_all_states (json);
@ -738,7 +949,7 @@ void hcl_jsoner_reset (hcl_jsoner_t* json)
json->state_stack->state = HCL_JSON_STATE_START; json->state_stack->state = HCL_JSON_STATE_START;
} }
int hcl_jsoner_feed (hcl_jsoner_t* json, const void* ptr, hcl_oow_t len, hcl_oow_t* xlen) int hcl_json_feed (hcl_json_t* json, const void* ptr, hcl_oow_t len, hcl_oow_t* xlen)
{ {
int x; int x;
hcl_oow_t total, ylen; hcl_oow_t total, ylen;

93
lib/main-j.c
View File

@ -9,8 +9,8 @@
/* ========================================================================= */ /* ========================================================================= */
typedef struct jsoner_xtn_t jsoner_xtn_t; typedef struct json_xtn_t json_xtn_t;
struct jsoner_xtn_t struct json_xtn_t
{ {
int logfd; int logfd;
unsigned int logmask; unsigned int logmask;
@ -84,12 +84,12 @@ static int write_all (int fd, const hcl_bch_t* ptr, hcl_oow_t len)
} }
static int write_log (hcl_jsoner_t* jsoner, int fd, const hcl_bch_t* ptr, hcl_oow_t len) static int write_log (hcl_json_t* json, int fd, const hcl_bch_t* ptr, hcl_oow_t len)
{ {
jsoner_xtn_t* xtn; json_xtn_t* xtn;
xtn = hcl_jsoner_getxtn(jsoner); xtn = hcl_json_getxtn(json);
while (len > 0) while (len > 0)
{ {
@ -136,10 +136,10 @@ static int write_log (hcl_jsoner_t* jsoner, int fd, const hcl_bch_t* ptr, hcl_oo
return 0; return 0;
} }
static void flush_log (hcl_jsoner_t* jsoner, int fd) static void flush_log (hcl_json_t* json, int fd)
{ {
jsoner_xtn_t* xtn; json_xtn_t* xtn;
xtn = hcl_jsoner_getxtn(jsoner); xtn = hcl_json_getxtn(json);
if (xtn->logbuf.len > 0) if (xtn->logbuf.len > 0)
{ {
write_all (fd, xtn->logbuf.buf, xtn->logbuf.len); write_all (fd, xtn->logbuf.buf, xtn->logbuf.len);
@ -147,15 +147,15 @@ static void flush_log (hcl_jsoner_t* jsoner, int fd)
} }
} }
static void log_write (hcl_jsoner_t* jsoner, unsigned int mask, const hcl_ooch_t* msg, hcl_oow_t len) static void log_write (hcl_json_t* json, unsigned int mask, const hcl_ooch_t* msg, hcl_oow_t len)
{ {
hcl_bch_t buf[256]; hcl_bch_t buf[256];
hcl_oow_t ucslen, bcslen; hcl_oow_t ucslen, bcslen;
jsoner_xtn_t* xtn; json_xtn_t* xtn;
hcl_oow_t msgidx; hcl_oow_t msgidx;
int n, logfd; int n, logfd;
xtn = hcl_jsoner_getxtn(jsoner); xtn = hcl_json_getxtn(json);
if (mask & HCL_LOG_STDERR) if (mask & HCL_LOG_STDERR)
{ {
@ -198,14 +198,14 @@ static void log_write (hcl_jsoner_t* jsoner, unsigned int mask, const hcl_ooch_t
tslen = 25; tslen = 25;
} }
write_log (jsoner, logfd, ts, tslen); write_log (json, logfd, ts, tslen);
} }
if (logfd == xtn->logfd && xtn->logfd_istty) if (logfd == xtn->logfd && xtn->logfd_istty)
{ {
if (mask & HCL_LOG_FATAL) write_log (jsoner, logfd, "\x1B[1;31m", 7); if (mask & HCL_LOG_FATAL) write_log (json, logfd, "\x1B[1;31m", 7);
else if (mask & HCL_LOG_ERROR) write_log (jsoner, logfd, "\x1B[1;32m", 7); else if (mask & HCL_LOG_ERROR) write_log (json, logfd, "\x1B[1;32m", 7);
else if (mask & HCL_LOG_WARN) write_log (jsoner, logfd, "\x1B[1;33m", 7); else if (mask & HCL_LOG_WARN) write_log (json, logfd, "\x1B[1;33m", 7);
} }
#if defined(HCL_OOCH_IS_UCH) #if defined(HCL_OOCH_IS_UCH)
@ -228,7 +228,7 @@ static void log_write (hcl_jsoner_t* jsoner, unsigned int mask, const hcl_ooch_t
/*assert (ucslen > 0);*/ /*assert (ucslen > 0);*/
/* attempt to write all converted characters */ /* attempt to write all converted characters */
if (write_log(jsoner, logfd, buf, bcslen) <= -1) break; if (write_log(json, logfd, buf, bcslen) <= -1) break;
if (n == 0) break; if (n == 0) break;
else else
@ -244,41 +244,76 @@ static void log_write (hcl_jsoner_t* jsoner, unsigned int mask, const hcl_ooch_t
} }
} }
#else #else
write_log (jsoner, logfd, msg, len); write_log (json, logfd, msg, len);
#endif #endif
if (logfd == xtn->logfd && xtn->logfd_istty) if (logfd == xtn->logfd && xtn->logfd_istty)
{ {
if (mask & (HCL_LOG_FATAL | HCL_LOG_ERROR | HCL_LOG_WARN)) write_log (jsoner, logfd, "\x1B[0m", 4); if (mask & (HCL_LOG_FATAL | HCL_LOG_ERROR | HCL_LOG_WARN)) write_log (json, logfd, "\x1B[0m", 4);
} }
flush_log (jsoner, logfd); flush_log (json, logfd);
} }
static int instcb (hcl_json_t* json, hcl_json_inst_t it, const hcl_oocs_t* str)
{
switch (it)
{
case HCL_JSON_INST_START_ARRAY:
hcl_json_logbfmt (json, HCL_LOG_INFO | HCL_LOG_APP, "[\n");
break;
case HCL_JSON_INST_END_ARRAY:
hcl_json_logbfmt (json, HCL_LOG_INFO | HCL_LOG_APP, "]\n");
break;
case HCL_JSON_INST_START_DIC:
hcl_json_logbfmt (json, HCL_LOG_INFO | HCL_LOG_APP, "{\n");
break;
case HCL_JSON_INST_END_DIC:
hcl_json_logbfmt (json, HCL_LOG_INFO | HCL_LOG_APP, "}\n");
break;
case HCL_JSON_INST_KEY:
hcl_json_logbfmt (json, HCL_LOG_INFO | HCL_LOG_APP, "%.*js: ", str->len, str->ptr);
break;
case HCL_JSON_INST_STRING:
case HCL_JSON_INST_NUMBER:
case HCL_JSON_INST_TRUE:
case HCL_JSON_INST_FALSE:
case HCL_JSON_INST_NIL:
hcl_json_logbfmt (json, HCL_LOG_INFO | HCL_LOG_APP, "%.*js\n", str->len, str->ptr);
break;
}
return 0;
}
/* ========================================================================= */ /* ========================================================================= */
int main (int argc, char* argv[]) int main (int argc, char* argv[])
{ {
hcl_jsoner_t* jsoner; hcl_json_t* json;
hcl_jsoner_prim_t json_prim; hcl_json_prim_t json_prim;
jsoner_xtn_t* jsoner_xtn; json_xtn_t* json_xtn;
hcl_oow_t xlen; hcl_oow_t xlen;
const char* p; const char* p;
memset (&json_prim, 0, HCL_SIZEOF(json_prim)); memset (&json_prim, 0, HCL_SIZEOF(json_prim));
json_prim.log_write = log_write; json_prim.log_write = log_write;
json_prim.instcb = instcb;
jsoner = hcl_jsoner_open (&sys_mmgr, HCL_SIZEOF(jsoner_xtn_t), &json_prim, NULL); json = hcl_json_open (&sys_mmgr, HCL_SIZEOF(json_xtn_t), &json_prim, NULL);
json_xtn = hcl_json_getxtn(json);
json_xtn->logmask = HCL_LOG_ALL_LEVELS | HCL_LOG_ALL_TYPES;
jsoner_xtn = hcl_jsoner_getxtn(jsoner); p = "[ \"ab\\xab\\uC88B\\uC544\\uC6A9c\", \"kaden\", \"iron\", true, { \"null\": \"abc\", \"123\": \"AA20AA\", \"10\": -0.123 } ]";
jsoner_xtn->logmask = HCL_LOG_ALL_LEVELS | HCL_LOG_ALL_TYPES;
p = "[ \"ab\\xab\\uC88B\\uC544\\uC6A9c\", \"kaden\", \"iron\" ]"; if (hcl_json_feed(json, p, strlen(p), &xlen) <= -1)
{
hcl_json_logbfmt (json, HCL_LOG_FATAL | HCL_LOG_APP, "ERROR: %js\n", hcl_json_geterrmsg(json));
}
hcl_json_close (json);
hcl_jsoner_feed (jsoner, p, strlen(p), &xlen);
hcl_jsoner_close (jsoner);
return 0; return 0;
} }