Tiny JSON ライブラリ More...

#include "tjson.h"
#include "jbxl_state.h"

Include dependency graph for tjson.c:

Functions
tJson *	json_parse (const char *str, int num)
	文字列のJSONデータを解釈して，tJsonのツリーを生成する．ANCHOR付き． More...

tJson *	json_parse_prop (tJson json, const char str, int num)
	JSON Main Parser．json が NULL の場合は ANCHOR付き． More...

tJson *	_json_array_parse (tJson *json, int num)
	json_parse_prop() の補助関数．配列処理用． More...

tJson *	json_array_parse (tJson json, const char str, int num)
	JSONデータの配列ノードの値（配列データ）を処理する． More...

tJson *	_json_parse_term (tJson json, const char st, const char ed, const char com)
	json_parse_prop() の補助関数．断片的な入力データ用． More...

tJson *	json_parse_seq (tJson json, const char str, int num)
	断片化した JSONデータを読み込んで処理する． More...

Buffer	json_inverse_parse (tJson *pp, int mode)
	tJsonデータをmodeに従って元の書式に戻して Bufferに格納する． More...

Buffer	json_inverse_parse_opt (tJson pp, const char crlf, const char *space)
	tJsonデータを指定に従って元の書式に戻して Bufferに格納する． More...

void	_json_to_Buffer (tJson pp, Buffer buf, const char crlf, const char space)
	tJsonデータを元の書式に戻して Bufferに格納する．補助関数． More...

void	print_json (FILE fp, tJson json, int mode)
	tJsonデータをmodeに従って fp に出力する. More...

void	print_json_opt (FILE fp, tJson json, const char crlf, const char space)
	tJsonデータを指定に従って fp に出力する. More...

tJson *	json_parse_file (const char *fn, int num)
	JSONデータをファイルから読み込んで，パースする． More...

void	json_set_str_val (tJson json, const char val)
	json ノード "key":val に文字列の属性値(value)を設定する． More...

void	json_set_int_val (tJson *json, int val)
	json ノード "key":val に整数の属性値(value)を設定する． More...

void	json_set_real_val (tJson *json, float val)
	json ノード "key":val に実数の属性値(value)を設定する． More...

void	json_copy_val (tJson f_json, tJson t_json)
	f_json から t_json へ属性値(value)をコピーする． More...

void	json_copy_data (tJson f_json, tJson t_json)
	f_json から t_json へ属性名(key)と属性値(value)をコピーする． More...

tJson *	json_insert_child (tJson parent, tJson child)
	parent に dict または array の child を繋げる． More...

tJson *	json_insert_parse (tJson json, const char str)
	str をパースして繋げる．str は { または [ で始まる必要がある． More...

tJson *	json_append_obj_key (tJson json, const char key)
	属性値(value)なしのリストデータ "key":{} を追加する． More...

tJson *	json_append_array_key (tJson json, const char key)
	値(value)なしの配列 "key":[] を追加する． More...

void	json_append_obj_str_val (tJson json, const char key, const char *val)
	{} の要素として "key":val（val は文字列）を追加する． More...

void	json_append_obj_int_val (tJson json, const char key, int val)
	{} の要素として "key":val（val は整数）を追加する． More...

void	json_append_obj_real_val (tJson json, const char key, float val)
	{} の要素として "key":val（va lは実数）を追加する． More...

void	json_append_array_str_val (tJson json, const char val)
	配列 [] の要素として文字列 val を追加する． More...

void	json_append_array_int_val (tJson *json, int val)
	配列 [] の要素として整数 val を追加する． More...

void	json_append_array_real_val (tJson *json, float val)
	配列 [] の要素として実数 val を追加する． More...

tJson *	join_json (tJson parent, tJson *child)
	parent の子として child そのものを直接繋げる． More...

tJson *	search_top_bracket_json (tJson *pp, int nn)
	ツリーが複数のルート(TOP)を持つ場合（JBXL_JSON_MULTI_ROOT），指定されたTOPへのポインタを返す． More...

tJson *	search_key_json (tJson pp, const char key, int needval, int nn)
	名前（属性名）が key である nn番目のノードへのポインタを返す More...

tJson *	search_sister_json (tJson *pp, int nn)
	nn個先の sister ノードを返す．正数の場合は younger sister. 負数の場合は elder sister． More...

tJson *	search_key_child_json (tJson pp, const char key, int needval)
	子の姉妹ノードで名前（属性名）が key である nn番目のノードへのポインタを返す． More...

tJson *	search_key_sister_json (tJson pp, const char key, int needval)
	姉妹ノードで名前（属性名）が key である nn番目のノードへのポインタを返す． More...

tJson *	search_key_json_obj (tJson pp, const char key, int nn)
	名前（属性名）が key である nn番目のオブジェクトノード（JSON_VALUE_OBJ）へのポインタを返す．ex.) "key":{} More...

tJson *	search_double_key_json (tJson pp, const char key1, const char *key2, int needval)
	属性名が key1 -> key2 の親子関係を持つ，key2ノードのポインタを返す． More...

tJson *	_search_key_json (tJson pp, const char key, int needval, int *nn)
	search_key_json() の補助関数 More...

tJson *	_search_key_json_obj (tJson pp, const char key, int *nn)
	search_key_json_obj() の補助関数 More...

int	_json_check_node_bykey (tJson pp, const char key, int needval, int nn)
	search 系関数の補助関数 More...

tList *	search_all_node_strval_json (tJson pp, const char name, const char *val)
	指定した条件に合う全てのノードへのポインタを，リストに格納して返す． More...

tList *	_search_all_node_strval_json (tList list, tJson pp, const char name, const char val)
	search_all_node_strval_json() の補助関数 More...

Buffer	get_json_val (tJson *json)

Buffer	get_key_json_val (tJson pp, const char key, int nn)
	名前（属性名）が key である nn番目のノードの属性値を返す． More...

Buffer	get_key_sister_json_val (tJson pp, const char key)
	姉妹ノードで名前（属性名）が key である nn番目のノードの属性値を返す． More...

Buffer	get_double_key_json_val (tJson pp, const char key1, const char *key2)
	key1 -> key2 の親子関係を持つ，key2ノードの属性値を返す． More...

Buffer	get_Buffer_from_json (tJson *json)

char *	get_string_from_json (tJson *json)
	要 free() More...

Detailed Description

Version: 1.2.1

Author: Fumi.Iseki (C)

Date: 2021 8/19

タイトル: サブセット版 JSON 簡易 Parser

Attention: 全てのパターンのパース可能性は保障しない．

See also: tJson

Definition in file tjson.c.

Function Documentation

◆ _json_array_parse()

tJson* _json_array_parse	(	tJson *	json,
		int	num
	)

tJson* _json_array_parse(tJson* json, int num)

JSONデータの配列ノードの値（配列データ）を処理する．

Parameters

json	配列処理を行う JSON ノードデータ．
num	配列処理の残り段数．

Returns: 処理された JSON ノードデータ．

Definition at line 375 of file tjson.c.

 {
     char* pp = (char*)(json->ldat.val.buf);
     //
     json = json_array_parse(json, pp, num);
     free_Buffer(&(json->ldat.val));
  
     return json;
 }

References free_Buffer(), and json_array_parse().

Referenced by json_array_parse(), and json_parse_prop().

Here is the call graph for this function:

Here is the caller graph for this function:

◆ _json_check_node_bykey()

int _json_check_node_bykey	(	tJson *	pp,
		const char *	key,
		int	needval,
		int	nn
	)

int _json_check_node_bykey(tJson* pp, const char* key, int needval, int nn)

pp が指すノードの名前（属性名）が key である場合，nnを 1減算して返す． needval が TRUE の場合は，値（属性値）を持っている場合のみ減算する．

Definition at line 1632 of file tjson.c.

 {
     if (pp->ldat.key.buf!=NULL) {
         if (!strcmp(key, (char*)pp->ldat.key.buf)) {
             if (needval) {
                 unsigned char* pm = pp->ldat.val.buf;
                 if (pm!=NULL) { 
                     if (!((pm[0]=='\'' && pm[1]=='\'') || (pm[0]=='"' && pm[1]=='"')) && pm[0]!='\0') nn--; 
                 }
             }
             else {
                 nn--;
             }
         }
     }
     return nn;
 }

Referenced by _search_key_json(), _search_key_json_obj(), search_key_json(), search_key_json_obj(), and search_key_sister_json().

Here is the caller graph for this function:

◆ _json_parse_term()

tJson* _json_parse_term	(	tJson *	json,
		const char *	st,
		const char *	ed,
		const char *	com
	)

tJson* _json_parse_term(tJson* json, const char* st, const char* ed, const char* com)

入力データが途中で終了した場合の処理

Definition at line 551 of file tjson.c.

 {
     if (json==NULL) return NULL;
  
     json->state = JBXL_JSON_PARSE_TERM;
     if (com!=NULL) {
         json->ldat.val = set_Buffer((void*)com, -1);
         if (st!=NULL && ed!=NULL) {
             int len = (int)(ed - st) + 1;
             cat_b2Buffer((char*)st, &(json->ldat.val), len);
             json->ldat.val.vldsz = (int)strlen((char*)json->ldat.val.buf);
         }
     }    
     return json;
 }

References cat_b2Buffer(), JBXL_JSON_PARSE_TERM, len, and set_Buffer().

Referenced by json_parse_prop().

Here is the call graph for this function:

Here is the caller graph for this function:

◆ _json_to_Buffer()

void _json_to_Buffer	(	tJson *	pp,
		Buffer *	buf,
		const char *	crlf,
		const char *	space
	)

void _json_to_Buffer(tJson* pp, Buffer* buf, const char* crlf, const char* space)

json_inverse_parse()用の補助関数． ppに格納された JSONデータを元の書式に戻して Bufferに格納する．

Parameters

pp	JSONデータが格納されたツリーへのポインタ
buf	変換したJSONデータを格納する Buffer変数．データ格納領域は予め確保しておく.
crlf	JSONへ戻す時の改行コード
space	インデントを付ける場合の空白やTAB

Definition at line 688 of file tjson.c.

 {
     if (pp==NULL) return;
     if (buf==NULL || buf->buf==NULL) return;
     //
     if (pp->ldat.id==JSON_ANCHOR_NODE) pp = pp->next;
  
     if (pp!=NULL) {
         if (pp->ctrl!=TREE_NOSIS_NODE) while(pp->esis!=NULL) pp = pp->esis; // 長女から逆パースを開始．
         do {
             int i;
             if (space[0]!='\0') for(i=0; i<pp->depth; i++) cat_s2Buffer(space, buf);
             //
             if (pp->ldat.id==JSON_BRACKET_NODE) {
                 //PRINT_MESG("JSON_BRACKET_NODE\n");
                 cat_s2Buffer("{", buf);
                 if (pp->next!=NULL) {
                     if (crlf[0]!='\0') cat_s2Buffer(crlf, buf);
                     _json_to_Buffer(pp->next, buf, crlf, space);
                     if (space[0]!='\0') for(i=0; i<pp->depth; i++) cat_s2Buffer(space, buf);
                 }
                 //if (space[0]!='\0') for(i=0; i<pp->depth; i++) cat_s2Buffer(space, buf);
                 cat_s2Buffer("}", buf); 
             }
             //
             else if (pp->ldat.id==JSON_DATA_NODE) {
                 //PRINT_MESG("JSON_DATA_NODE\n");
                 cat_s2Buffer("\"", buf);
                 cat_s2Buffer(pp->ldat.key.buf, buf);
                 cat_s2Buffer("\"", buf);
                 //
                 if (pp->ldat.lv==JSON_VALUE_OBJ) {
                     if (space[0]!='\0') cat_s2Buffer(": {", buf);
                     else                cat_s2Buffer(":{",  buf);
                     if (pp->next!=NULL) {
                         if (crlf[0]!='\0') cat_s2Buffer(crlf, buf);
                         _json_to_Buffer(pp->next, buf, crlf, space);
                         if (space[0]!='\0') for(i=0; i<pp->depth; i++) cat_s2Buffer(space, buf);
                     }
                     //if (space[0]!='\0') for(i=0; i<pp->depth; i++) cat_s2Buffer(space, buf);
                     cat_s2Buffer("}", buf); 
                 }
                 else {
                     if (pp->ldat.lv==JSON_VALUE_NULL) {
                         if (space[0]!='\0') cat_s2Buffer(": null", buf);
                         else                cat_s2Buffer(":null",  buf);
                     }
                     else  {
                         if (space[0]!='\0') cat_s2Buffer(": ", buf);
                         else                cat_s2Buffer(":",  buf);   
                         cat_s2Buffer(pp->ldat.val.buf, buf);
                     }
                 }
             }
             //
             // array
             else if (pp->ldat.id==JSON_ARRAY_NODE) {
                 //PRINT_MESG("JSON_ARRAY_NODE\n");
                 if (pp->ldat.key.buf!=NULL) {
                     cat_s2Buffer("\"", buf);
                     cat_s2Buffer(pp->ldat.key.buf, buf);
                     if (space[0]!='\0') cat_s2Buffer("\": ", buf);
                     else                cat_s2Buffer("\":",  buf);   
                 }
                 if (pp->ldat.val.buf!=NULL) {
                     cat_s2Buffer(pp->ldat.val.buf, buf); 
                 }
                 else {
                     cat_s2Buffer("[", buf);
                     if (pp->next!=NULL) {
                         if (crlf[0]!='\0') cat_s2Buffer(crlf, buf);
                         _json_to_Buffer(pp->next, buf, crlf, space);
                         if (space[0]!='\0') for(i=0; i<pp->depth; i++) cat_s2Buffer(space, buf);
                     }
                     //if (space[0]!='\0') for(i=0; i<pp->depth; i++) cat_s2Buffer(space, buf);
                     cat_s2Buffer("]", buf); 
                 }
             }
  
             else if (pp->ldat.id==JSON_ARRAY_VALUE_NODE) {
                 //PRINT_MESG("JSON_ARRAY_VALUE_NODE\n");
                 if (pp->ldat.lv==JSON_VALUE_OBJ) {
                     if (pp->ldat.val.buf==NULL) {
                         cat_s2Buffer("{", buf);
                         if (pp->next!=NULL) {
                             if (crlf[0]!='\0') cat_s2Buffer(crlf, buf);
                             _json_to_Buffer(pp->next, buf, crlf, space);
                             if (space[0]!='\0') for(i=0; i<pp->depth; i++) cat_s2Buffer(space, buf);
                         }
                         //if (space[0]!='\0') for(i=0; i<pp->depth; i++) cat_s2Buffer(space, buf);
                         cat_s2Buffer("}", buf); 
                     }
                     else {
                         cat_Buffer(&pp->ldat.val, buf);
                     }
                 }
                 else {
                     if (pp->ldat.lv==JSON_VALUE_NULL) {
                         cat_s2Buffer("null", buf);
                     }
                     else  {
                         cat_s2Buffer(pp->ldat.val.buf, buf);
                     }
                 }
             }
  
             if (pp->ctrl!=TREE_NOSIS_NODE && pp->ysis!=NULL && 
                 pp->prev!=NULL && pp->prev->ldat.id!=JSON_ANCHOR_NODE) cat_s2Buffer(",", buf);
             if (crlf[0]!='\0') cat_s2Buffer(crlf, buf);
  
             if (pp->ctrl!=TREE_NOSIS_NODE) pp = pp->ysis;
             else                           pp = NULL;
         } while(pp!=NULL);
     }
  
     return;
 }

References buf, cat_Buffer(), cat_s2Buffer, JSON_ANCHOR_NODE, JSON_ARRAY_NODE, JSON_ARRAY_VALUE_NODE, JSON_BRACKET_NODE, JSON_DATA_NODE, JSON_VALUE_NULL, JSON_VALUE_OBJ, and TREE_NOSIS_NODE.

Referenced by json_inverse_parse(), and json_inverse_parse_opt().

Here is the call graph for this function:

Here is the caller graph for this function:

◆ _search_all_node_strval_json()

tList* _search_all_node_strval_json	(	tList *	list,
		tJson *	pp,
		const char *	name,
		const char *	val
	)

Definition at line 1674 of file tjson.c.

 {
     while (pp->esis!=NULL) pp = pp->esis;
     do {
         if (pp->ldat.id==JSON_DATA_NODE || pp->ldat.id==JSON_ARRAY_VALUE_NODE) {
             if (!strncasecmp(name, (char*)pp->ldat.key.buf, strlen(name))) {
                 if (pp->ldat.lv==JSON_VALUE_STR) {
                     if (!strncasecmp(val, (char*)(pp->ldat.val.buf+1), strlen(val))) {
                         list->altp = pp;
                         tList* temp = new_tList_node();
                         temp->ldat.id = list->ldat.id + 1;
                         add_tList_node(list, temp);
                         list = temp;
                     }
                 }
             }
             else if (pp->ldat.lv==JSON_VALUE_OBJ) {
                 if (pp->next!=NULL) {
                     list = _search_all_node_strval_json(list, pp->next, name, val);
                 }
             }
         }
         else if (pp->ldat.id==JSON_BRACKET_NODE || pp->ldat.id==JSON_ARRAY_NODE) {
             if (pp->next!=NULL) {
                 list = _search_all_node_strval_json(list, pp->next, name, val);
             }
         }
         pp = pp->ysis;
     } while (pp!=NULL);
  
     return list;
 }

References add_tList_node, JSON_ARRAY_NODE, JSON_ARRAY_VALUE_NODE, JSON_BRACKET_NODE, JSON_DATA_NODE, JSON_VALUE_OBJ, JSON_VALUE_STR, and new_tList_node().

Referenced by search_all_node_strval_json().

Here is the call graph for this function:

Here is the caller graph for this function:

◆ _search_key_json()

tJson* _search_key_json	(	tJson *	pp,
		const char *	key,
		int	needval,
		int *	nn
	)

Definition at line 1559 of file tjson.c.

 {
     while(pp->esis!=NULL) pp = pp->esis;
     tJson* esis = pp;
  
     while(pp!=NULL) {
         *nn = _json_check_node_bykey(pp, key, needval, *nn);
         if ((*nn)<=0) return pp;
         pp = pp->ysis;
     }
  
     // 子ノード
     pp = esis;
     while(pp!=NULL) {
         if (pp->next!=NULL) {
             tJson* json = _search_key_json(pp->next, key, needval, nn);
             if (json!=NULL) return json;
         }
         pp = pp->ysis;
     }
     
     return NULL; 
 }

References _json_check_node_bykey().

Referenced by search_key_json().

Here is the call graph for this function:

Here is the caller graph for this function:

◆ _search_key_json_obj()

tJson* _search_key_json_obj	(	tJson *	pp,
		const char *	key,
		int *	nn
	)

Definition at line 1598 of file tjson.c.

 {
     if (pp==NULL) return NULL;
     while(pp->esis!=NULL) pp = pp->esis;
     tJson* esis = pp;
  
     while(pp!=NULL) {
         if (pp->ldat.lv==JSON_VALUE_OBJ) {
             *nn = _json_check_node_bykey(pp, key, FALSE, *nn);
         }
         if ((*nn)<=0) return pp;
         pp = pp->ysis;
     }
  
     // 子ノード
     pp = esis;
     while(pp!=NULL) {
         if (pp->next!=NULL) {
             tJson* json = _search_key_json_obj(pp->next, key, nn);
             if (json!=NULL) return json;
         }
         pp = pp->ysis;
     }
     
     return NULL; 
 }

References _json_check_node_bykey(), FALSE, and JSON_VALUE_OBJ.

Referenced by search_key_json_obj().

Here is the call graph for this function:

Here is the caller graph for this function:

◆ get_Buffer_from_json()

Buffer get_Buffer_from_json ( tJson * json )

Buffer get_Buffer_from_json(tJson* json)

JSON データのノード値の文字列をを含む Buffer変数を返す． "" または '' で囲まれている場合は，その内部のデータ（"", ''の中味）の返す．

Definition at line 1795 of file tjson.c.

 {
     Buffer buf = init_Buffer();
  
     if (json==NULL) return buf;
  
     char* pp = (char*)json->ldat.val.buf;
  
     if (pp!=NULL && json->ldat.lv!=JSON_VALUE_ARRAY) {
         if (*pp=='\"' || *pp=='\'') {
             char* pt = (char*)&(json->ldat.val.buf[json->ldat.val.vldsz-1]);
             if (*pp==*pt) {
                 pp++;
                 char bkup = *pt;
                 *pt = '\0';
                 buf = make_Buffer_str(pp);
                 *pt = bkup;
             }
         }
         else {
             buf = make_Buffer_str(pp);
         }
     }
  
     return buf;
 }

References buf, init_Buffer(), JSON_VALUE_ARRAY, and make_Buffer_str.

Here is the call graph for this function:

◆ get_double_key_json_val()

Buffer get_double_key_json_val	(	tJson *	pp,
		const char *	key1,
		const char *	key2
	)

Buffer get_double_key_json_val(tJson* pp, const char* key1, const char* key2)

key1 -> key2 の親子関係を持つ，key2ノードの属性値を返す．属性値が文字列の場合，先頭と最後の " または ' は削除する．

Parameters

pp	探索を開始するノード．
key1	探索するノード名．
key2	探索するノード名．

Returns: 見つかったノードの属性値を格納した Buffer 変数．

Definition at line 1780 of file tjson.c.

 {
     tJson* json = search_double_key_json(pp, key1, key2, TRUE);
     Buffer val  = get_json_val(json);
  
     return val;
 }

References get_json_val(), search_double_key_json(), and TRUE.

Here is the call graph for this function:

◆ get_json_val()

Buffer get_json_val ( tJson * json )

Definition at line 1708 of file tjson.c.

 {
     Buffer val = init_Buffer();
  
     if (json!=NULL) {
         char* pp = (char*)json->ldat.val.buf;
         if ((*pp=='\"') || (*pp=='\'')) {
             val = set_Buffer(pp+1, (int)strlen(pp)-1);
             val.buf[val.vldsz-1] = '\0';
             val.vldsz = (int)strlen((const char*)val.buf);
         }
         else {
             val = set_Buffer(pp, (int)strlen(pp));
         }
     }
     return val;
 }

References Buffer::buf, init_Buffer(), set_Buffer(), and Buffer::vldsz.

Referenced by get_double_key_json_val(), get_key_json_val(), and get_key_sister_json_val().

Here is the call graph for this function:

Here is the caller graph for this function:

◆ get_key_json_val()

Buffer get_key_json_val	(	tJson *	pp,
		const char *	key,
		int	nn
	)

Buffer get_key_json_val(tJson* pp, const char* key, int nn)

pp が指すノード以下で，名前（属性名）が key である nn番目のノードへの属性値を返す．
属性値が文字列の場合，先頭と最後の " または ' は削除する． pp の姉妹ノードは探索しない．

Parameters

pp	探索を開始するノード．ppがオブジェクト要素（JSON_VALUE_OBJ）なら，次のノードから探索する．
key	探索するノード名．
nn	一致するノード内，何番目を返すか指定する．nn<=0 は nn==1 とみなす．

Returns: 見つかったノードの属性値を格納した Buffer 変数．

Definition at line 1739 of file tjson.c.

 {
     tJson* json = search_key_json(pp, key, TRUE, nn);
     Buffer val  = get_json_val(json);
  
     return val;
 }

References get_json_val(), search_key_json(), and TRUE.

Here is the call graph for this function:

◆ get_key_sister_json_val()

Buffer get_key_sister_json_val	(	tJson *	pp,
		const char *	key
	)

Buffer get_key_sister_json_val(tJson* pp, const char* key)

pp が指すノードの姉妹で，名前（属性名）が key である nn番目のノードの属性値を返す．探索対象は探索を開始した姉妹ノードのみ．属性値が文字列の場合，先頭と最後の " または ' は削除する．

Parameters

pp	探索を開始するノード．
key	探索するノード名．
needval	ノードが値（属性値）を持っていない場合は無視する．"", '' の場合も無視する．

Returns: 見つかったノードの属性値を格納した Buffer 変数．

Definition at line 1760 of file tjson.c.

 {
     tJson* json = search_key_sister_json(pp, key, TRUE);
     Buffer val  = get_json_val(json);
  
     return val;
 }

References get_json_val(), search_key_sister_json(), and TRUE.

Here is the call graph for this function:

◆ get_string_from_json()

char* get_string_from_json ( tJson * json )

char* get_string_from_json(tJson* json)

JSON データのノード値の文字列を返す． "" または '' で囲まれている場合は，その内部のデータ（"", ''の中味）の返す．要 free

Definition at line 1830 of file tjson.c.

 {
     if (json==NULL) return NULL;
  
     char* str = NULL;
     char* pp  = (char*)json->ldat.val.buf;
  
     if (pp!=NULL) {
         if (json->ldat.lv!=JSON_VALUE_ARRAY) {
             if (*pp=='\"' || *pp=='\'') {
                 char* pt = (char*)&(json->ldat.val.buf[json->ldat.val.vldsz-1]);
                 if (*pp==*pt) {
                     pp++;
                     char bkup = *pt;
                     *pt = '\0';
                     str = dup_str(pp);
                     *pt = bkup;
                 }
             }
         }
         if (str==NULL) str = dup_str(pp);
     }
  
     return str;
 }

References dup_str(), and JSON_VALUE_ARRAY.

Here is the call graph for this function:

◆ join_json()

tJson* join_json	(	tJson *	parent,
		tJson **	child
	)

tJson* join_json(tJson* parent, tJson** child)

parent の子として child そのものを直接結合する(add_tTreeを使用)． child の TOPが ANCHORノードまたは JSON_TEMP_NODE の場合，そのノードは削除され，*child は書き換えられる．

Parameters

	parent	結合対象の JSONノード
[in]	child	結合するJSONノード
[out]	child	child のTOPがANCHOR または JSON_TEMP_NODE の場合，そのノードを削除したjsonツリーのTOP.

Returns: 結合結果の JSON Treeの TOP

Definition at line 1314 of file tjson.c.

 {
     if (*child==NULL) return parent;
     if (parent==NULL) return *child;            // この場合 ANCHOR, TEMP_NODE はそのまま
  
     if ((*child)->ldat.id==JSON_ANCHOR_NODE || (*child)->ldat.id==JSON_TEMP_NODE) {  // 子として繋げる場合，ANCHOR, TEMP_NODE は削除
         tJson* jtmp = (*child)->next;
         del_json_node(child);                   // ANCHOR, TEMP_NODE を削除してつめる．
         *child = jtmp;
     }
  
     add_tTree(parent, *child); 
  
     return parent;
 }

References add_tTree(), del_json_node, JSON_ANCHOR_NODE, and JSON_TEMP_NODE.

Here is the call graph for this function:

◆ json_append_array_int_val()

void json_append_array_int_val	(	tJson *	json,
		int	val
	)

void json_append_array_int_val(tJson* json, int val)

配列 [] の要素として整数 val を追加する．

Definition at line 1262 of file tjson.c.

 {
     if (json==NULL) return;
     if (json->ldat.id==JSON_BRACKET_NODE) {
         json = json->next;
         if (json==NULL) return;
     }
     if (json->ldat.id!=JSON_ARRAY_NODE) return;
  
     Buffer val_buf = make_Buffer(LEN_INT + 1);
     copy_i2Buffer(val, &val_buf);
     add_tTree_node_bystr(json, JSON_ARRAY_VALUE_NODE, JSON_VALUE_INT, "ARRAY_VALUE", (char*)val_buf.buf, NULL, 0);
  
     free_Buffer(&val_buf);
     return;
 }

References add_tTree_node_bystr(), Buffer::buf, copy_i2Buffer(), free_Buffer(), JSON_ARRAY_NODE, JSON_ARRAY_VALUE_NODE, JSON_BRACKET_NODE, JSON_VALUE_INT, LEN_INT, and make_Buffer().

Here is the call graph for this function:

◆ json_append_array_key()

tJson* json_append_array_key	(	tJson *	json,
		const char *	key
	)

tJson* json_append_array_key(tJson* json, const char* key)

json ツリー json に属性名 key を持つ配列ノード "key":[] を追加する．

Returns: 追加したノードへのポインタ．失敗した場合は NULL

Definition at line 1120 of file tjson.c.

 {
     if (key==NULL || json==NULL) return NULL;
     if (json->ldat.id==JSON_ANCHOR_NODE) json = json->next;
     if (json==NULL) return NULL;
  
     Buffer buf = make_Buffer_str("{");
     if (key[0]!='"') cat_s2Buffer("\"", &buf);
     cat_s2Buffer(key, &buf);
     if (key[strlen(key)-1]!='"') cat_s2Buffer("\"", &buf);
     cat_s2Buffer(":[]}", &buf);
  
     tJson* jcld = json_parse((char*)buf.buf, 1);
     if (jcld!=NULL && jcld->ldat.id==JSON_ANCHOR_NODE) {
         jcld = del_json_anchor_node(jcld);
     }
     free_Buffer(&buf);
  
     if (jcld!=NULL) {
         jcld = json_insert_child(json, jcld);
     }
     else {
         return NULL;
     }
     if (jcld->ldat.id==JSON_BRACKET_NODE) jcld = jcld->next;
  
     return jcld;
 }

References buf, cat_s2Buffer, del_json_anchor_node, free_Buffer(), JSON_ANCHOR_NODE, JSON_BRACKET_NODE, json_insert_child(), json_parse(), and make_Buffer_str.

Here is the call graph for this function:

◆ json_append_array_real_val()

void json_append_array_real_val	(	tJson *	json,
		float	val
	)

void json_append_array_real_val(tJson* json, float val)

配列 [] の要素として実数 val を追加する．

Definition at line 1285 of file tjson.c.

 {
     if (json==NULL) return;
     if (json->ldat.id==JSON_BRACKET_NODE) {
         json = json->next;
         if (json==NULL) return;
     }
     if (json->ldat.id!=JSON_ARRAY_NODE) return;
  
     Buffer val_buf = make_Buffer(LEN_REAL + 1);
     copy_r2Buffer(val, &val_buf);
     add_tTree_node_bystr(json, JSON_ARRAY_VALUE_NODE, JSON_VALUE_REAL, "ARRAY_VALUE", (char*)val_buf.buf, NULL, 0);
  
     free_Buffer(&val_buf);
     return;
 }

References add_tTree_node_bystr(), Buffer::buf, copy_r2Buffer(), free_Buffer(), JSON_ARRAY_NODE, JSON_ARRAY_VALUE_NODE, JSON_BRACKET_NODE, JSON_VALUE_REAL, LEN_REAL, and make_Buffer().

Here is the call graph for this function:

◆ json_append_array_str_val()

void json_append_array_str_val	(	tJson *	json,
		const char *	val
	)

void json_append_array_str_val(tJson* json, const char* val)

配列 [] の要素として文字列 val を追加する．

Definition at line 1232 of file tjson.c.

 {
     if (json==NULL) return;
     if (json->ldat.id==JSON_BRACKET_NODE) {
         json = json->next;
         if (json==NULL) return;
     }
     if (json->ldat.id!=JSON_ARRAY_NODE) return;
  
     if (val!=NULL) {
         int len = (int)strlen(val);
         Buffer val_buf = make_Buffer(len + 4);  // \" + \" + \0 + 予備
         if (val[0]!='"') cat_s2Buffer("\"", &val_buf);
         cat_s2Buffer(val, &val_buf);
         if (val[len-1]!='"') cat_s2Buffer("\"", &val_buf);
         add_tTree_node_bystr(json, JSON_ARRAY_VALUE_NODE, JSON_VALUE_STR, "ARRAY_VALUE", (char*)val_buf.buf, NULL, 0);
         free_Buffer(&val_buf);
     }
     else {
         add_tTree_node_bystr(json, JSON_ARRAY_VALUE_NODE, JSON_VALUE_NULL, "ARRAY_VALUE", NULL, NULL, 0);
     }
     return;
 }

References add_tTree_node_bystr(), Buffer::buf, cat_s2Buffer, free_Buffer(), JSON_ARRAY_NODE, JSON_ARRAY_VALUE_NODE, JSON_BRACKET_NODE, JSON_VALUE_NULL, JSON_VALUE_STR, len, and make_Buffer().

Here is the call graph for this function:

◆ json_append_obj_int_val()

void json_append_obj_int_val	(	tJson *	json,
		const char *	key,
		int	val
	)

void json_append_obj_int_val(tJson* json, const char* key, int val)

{} の要素として key:val（valは整数）を追加する．

Definition at line 1186 of file tjson.c.

 {
     if (json==NULL) return;
     if (json->ldat.id!=JSON_BRACKET_NODE && json->ldat.lv!=JSON_VALUE_OBJ) {
         json = json->next;
         if (json!=NULL) return;
         if (json->ldat.id!=JSON_BRACKET_NODE && json->ldat.lv!=JSON_VALUE_OBJ) return;
     }
  
     Buffer val_buf = make_Buffer(LEN_INT + 1);
     copy_i2Buffer(val, &val_buf);
     add_tTree_node_bystr(json, JSON_DATA_NODE, JSON_VALUE_INT, key, (char*)val_buf.buf, NULL, 0);
  
     free_Buffer(&val_buf);
     return;
 }

References add_tTree_node_bystr(), Buffer::buf, copy_i2Buffer(), free_Buffer(), JSON_BRACKET_NODE, JSON_DATA_NODE, JSON_VALUE_INT, JSON_VALUE_OBJ, LEN_INT, and make_Buffer().

Here is the call graph for this function:

◆ json_append_obj_key()

tJson* json_append_obj_key	(	tJson *	json,
		const char *	key
	)

tJson* json_append_obj_key(tJson* json, const char* key)

json ツリー json に属性名 key を持つオブジェクトノード "key":{} を追加する．

Returns: 追加したノードへのポインタ．失敗した場合は NULL

Definition at line 1083 of file tjson.c.

 {
     if (key==NULL || json==NULL) return NULL;
     if (json->ldat.id==JSON_ANCHOR_NODE) json = json->next;
     if (json==NULL) return NULL;
     
     Buffer buf = make_Buffer_str("{");
     if (key[0]!='"') cat_s2Buffer("\"", &buf);
     cat_s2Buffer(key, &buf);
     if (key[strlen(key)-1]!='"') cat_s2Buffer("\"", &buf);
     cat_s2Buffer(":{}}", &buf);
  
     tJson* jcld = json_parse((char*)buf.buf, 1);
     if (jcld!=NULL && jcld->ldat.id==JSON_ANCHOR_NODE) {
         jcld = del_json_anchor_node(jcld);
     }
     free_Buffer(&buf);
  
     if (jcld!=NULL) {
         jcld = json_insert_child(json, jcld);
     }
     else {
         return NULL;
     }
     if (jcld->ldat.id==JSON_BRACKET_NODE) jcld = jcld->next;
  
     return jcld;
 }

References buf, cat_s2Buffer, del_json_anchor_node, free_Buffer(), JSON_ANCHOR_NODE, JSON_BRACKET_NODE, json_insert_child(), json_parse(), and make_Buffer_str.

Here is the call graph for this function:

◆ json_append_obj_real_val()

void json_append_obj_real_val	(	tJson *	json,
		const char *	key,
		float	val
	)

void json_append_obj_real_val(tJson* json, const char* key, float val)

{} の要素として key:val（valは実数）を追加する．

Definition at line 1209 of file tjson.c.

 {
     if (json==NULL) return;
     if (json->ldat.id!=JSON_BRACKET_NODE && json->ldat.lv!=JSON_VALUE_OBJ) {
         json = json->next;
         if (json!=NULL) return;
         if (json->ldat.id!=JSON_BRACKET_NODE && json->ldat.lv!=JSON_VALUE_OBJ) return;
     }
  
     Buffer val_buf = make_Buffer(LEN_REAL + 1);
     copy_r2Buffer(val, &val_buf);
     add_tTree_node_bystr(json, JSON_DATA_NODE, JSON_VALUE_REAL, key, (char*)val_buf.buf, NULL, 0);
  
     free_Buffer(&val_buf);
     return;
 }

References add_tTree_node_bystr(), Buffer::buf, copy_r2Buffer(), free_Buffer(), JSON_BRACKET_NODE, JSON_DATA_NODE, JSON_VALUE_OBJ, JSON_VALUE_REAL, LEN_REAL, and make_Buffer().

Here is the call graph for this function:

◆ json_append_obj_str_val()

void json_append_obj_str_val	(	tJson *	json,
		const char *	key,
		const char *	val
	)

void json_append_obj_str_val(tJson* json, const char* key, const char* val)

{} の要素として key:val（valは文字列）を追加する．

Definition at line 1155 of file tjson.c.

 {
     if (json==NULL) return;
     if (json->ldat.id!=JSON_BRACKET_NODE && json->ldat.lv!=JSON_VALUE_OBJ) {
         json = json->next;
         if (json!=NULL) return;
         if (json->ldat.id!=JSON_BRACKET_NODE && json->ldat.lv!=JSON_VALUE_OBJ) return;
     }
  
     if (val!=NULL) {
         int len = (int)strlen(val);
         Buffer val_buf = make_Buffer(len + 4);  // \" + \" + \0 + 予備
         if (val[0]!='"') cat_s2Buffer("\"", &val_buf);
         cat_s2Buffer(val, &val_buf);
         if (val[len-1]!='"') cat_s2Buffer("\"", &val_buf);
         //
         add_tTree_node_bystr(json, JSON_DATA_NODE, JSON_VALUE_STR, key, (char*)val_buf.buf, NULL, 0);
         free_Buffer(&val_buf);
     }
     else {
         add_tTree_node_bystr(json, JSON_DATA_NODE, JSON_VALUE_NULL, key, NULL, NULL, 0);
     }
     return;
 }

References add_tTree_node_bystr(), Buffer::buf, cat_s2Buffer, free_Buffer(), JSON_BRACKET_NODE, JSON_DATA_NODE, JSON_VALUE_NULL, JSON_VALUE_OBJ, JSON_VALUE_STR, len, and make_Buffer().

Here is the call graph for this function:

◆ json_array_parse()

tJson* json_array_parse	(	tJson *	json,
		const char *	str,
		int	num
	)

tJson* json_array_parse(tJson* json, const char* str, int num)

JSONデータの配列ノードの値（配列データ）を処理する．
先頭に姉妹ノードがない場合は json にNULLを指定しても可．
ただし配列なので，先頭は姉妹ノードだらけ．アンカーノードが必要．
その状態でそれでもNULLを指定した場合は，この関数外で TOPの JSON_TEMP_NODE を上手く処理すること．

Parameters

json	JSON ノードデータ．NULLでない場合は，このデータの後に結果が付加される． NULLでも可．
str	配列処理を行うデータ．
num	配列処理の残り段数．

Returns: 処理された JSON ノードデータ．

Definition at line 401 of file tjson.c.

 {
     char* pp = (char*)str;
     char* pt;
     if (*pp!='[') return json;
  
     if (json==NULL) {
         json = new_json_node();
         json->ldat.id = JSON_TEMP_NODE;
         json->ldat.lv = JSON_VALUE_NULL;
     }
     else {
         json->ldat.id = JSON_ARRAY_NODE;
         json->ldat.lv = JSON_VALUE_ARRAY;
     }
  
     //
     int depth = 1;
     pp++;
     while (*pp!='\0') {
         while (*pp==' ') pp++;
         if (*pp!='\0') while (*pp=='\\') pp += 2;
  
         //
         if (*pp=='[') {
             pt = skip_char_pair(pp, '[', ']');
  
             tJson* node = new_json_node();
             node->ldat.id = JSON_ARRAY_NODE;
             node->ldat.lv = JSON_VALUE_ARRAY;
             add_tTree_node(json, node);
             //
             if (json->yngr!=NULL) {
                 int len = (int)(pt - pp) + 1;
                 Buffer temp = set_Buffer(pp, len);
                 json->yngr->ldat.val = pack_Buffer(temp, '\0');
                 json->yngr->ldat.lv  = JSON_VALUE_ARRAY;
                 free_Buffer(&temp);
             }
             if (num>0 && json->yngr!=NULL) _json_array_parse(json->yngr, num-1);
  
             pt++; 
             while(*pt!=',' && *pt!='}' && *pt!='{' && *pt!='[' && *pt!='\0') pt++;
  
             depth++;
             pp = pt + 1;
         }
  
         //
         else if (*pp==']') {
             depth--;
             if (depth==0) break;
             pp++;
         }
  
         //
         else if (*pp=='\'' || *pp=='\"') {
             char ch = *pp;
             pt = pp + 1;
             while (*pt!='\0') {
                 while (*pt=='\\') pt += 2;
                 if (*pt!='\0') {
                     if (*pt==ch) break;
                     pt++;
                 }
             }
  
             if (*pt!='\0') {
                 int len = (int)(pt - pp) + 1 ;
                 tJson* node = new_json_node();
                 Buffer temp    = set_Buffer(pp, len);
                 node->ldat.key = make_Buffer_bystr("ARRAY_VALUE");
                 node->ldat.val = pack_Buffer(temp, '\0');
                 node->ldat.id  = JSON_ARRAY_VALUE_NODE;
                 node->ldat.lv  = JSON_VALUE_STR;
                 free_Buffer(&temp);
                 add_tTree_node(json, node);
             
                 pp = pt + 1;
             }
         }
  
         //
         else if (*pp=='{') {
             pt = skip_char_pair(pp, '{', '}');
  
             int len = (int)(pt - pp) + 1 ;
             tJson* node = new_json_node();
             Buffer temp    = set_Buffer(pp, len);
             node->ldat.key = make_Buffer_bystr("ARRAY_VALUE");
             node->ldat.val = pack_Buffer(temp, '\0');
             node->ldat.id  = JSON_ARRAY_VALUE_NODE;
             node->ldat.lv  = JSON_VALUE_OBJ;
             free_Buffer(&temp);
             
             if (num>0) {
                 node = json_parse_prop(node, (char*)node->ldat.val.buf, num-1);
                 add_tTree_node(json, node);
                 del_json_node(&node);           // ノードを詰める
             }
             else {
                 add_tTree_node(json, node);
             }
  
             pp = pt + 1;
         }
  
         //
         else if (*pp==',') {
             pp++;
         }
  
         //
         else {
             pt = skip_chars(pp, ",}]");
  
             int len = (int)(pt - pp);
             tJson* node = new_json_node();
             Buffer temp    = set_Buffer(pp, len);
             node->ldat.key = make_Buffer_bystr("ARRAY_VALUE");
             node->ldat.val = pack_Buffer(temp, '\0');
             node->ldat.id  = JSON_ARRAY_VALUE_NODE;
  
             if (*pp=='\"' || *pp=='\'') node->ldat.lv = JSON_VALUE_STR;
             else {
                 const char* val = (const char*)node->ldat.val.buf;
                 if (!strcasecmp("true", val) || !strcasecmp("false", val)) node->ldat.lv = JSON_VALUE_BOOL;
                 else {
                     int num = is_number((unsigned char*)val);
                     if      (num==1) node->ldat.lv = JSON_VALUE_INT;
                     else if (num==2) node->ldat.lv = JSON_VALUE_REAL;
                     else  node->ldat.lv = JSON_VALUE_UNRESOLV;
                 }
             }
  
             free_Buffer(&temp);
             add_tTree_node(json, node);
             pp = pt;
         }
     }
  
     return json;
 }

References _json_array_parse(), add_tTree_node(), del_json_node, free_Buffer(), is_number(), JSON_ARRAY_NODE, JSON_ARRAY_VALUE_NODE, json_parse_prop(), JSON_TEMP_NODE, JSON_VALUE_ARRAY, JSON_VALUE_BOOL, JSON_VALUE_INT, JSON_VALUE_NULL, JSON_VALUE_OBJ, JSON_VALUE_REAL, JSON_VALUE_STR, JSON_VALUE_UNRESOLV, len, make_Buffer_bystr, new_json_node, pack_Buffer(), set_Buffer(), skip_char_pair(), and skip_chars().

Referenced by _json_array_parse().

Here is the call graph for this function:

Here is the caller graph for this function:

◆ json_copy_data()

void json_copy_data	(	tJson *	f_json,
		tJson *	t_json
	)

void json_copy_data(tJson* f_json, tJson* t_json)

JSON ノードの f_json から t_json へ属性名と属性値をコピーする．

Definition at line 984 of file tjson.c.

 {
     if (f_json==NULL || t_json==NULL) return;
     if (f_json->ldat.id==JSON_BRACKET_NODE) {
         f_json = f_json->next;
         if (f_json==NULL) return;
     }
     if (t_json->ldat.id==JSON_BRACKET_NODE) {
         t_json = t_json->next;
         if (t_json==NULL) return;
     }
  
     t_json->ldat.id = f_json->ldat.id;
     t_json->ldat.lv = f_json->ldat.lv;
     copy_Buffer(&(f_json->ldat.key), &(t_json->ldat.key));
     copy_Buffer(&(f_json->ldat.val), &(t_json->ldat.val));
  
     return;
 }

References copy_Buffer(), and JSON_BRACKET_NODE.

Here is the call graph for this function:

◆ json_copy_val()

void json_copy_val	(	tJson *	f_json,
		tJson *	t_json
	)

void json_copy_val(tJson* f_json, tJson* t_json)

JSON ノードの f_json から t_json へ属性値をコピーする．

Definition at line 960 of file tjson.c.

 {
     if (f_json==NULL || t_json==NULL) return;
     if (f_json->ldat.id==JSON_BRACKET_NODE) {
         f_json = f_json->next;
         if (f_json==NULL) return;
     }
     if (t_json->ldat.id==JSON_BRACKET_NODE) {
         t_json = t_json->next;
         if (t_json==NULL) return;
     }
  
     t_json->ldat.lv = f_json->ldat.lv;
     copy_Buffer(&(f_json->ldat.val), &(t_json->ldat.val));
  
     return;
 }

References copy_Buffer(), and JSON_BRACKET_NODE.

Here is the call graph for this function:

◆ json_insert_child()

tJson* json_insert_child	(	tJson *	parent,
		tJson *	child
	)

void json_insert_child(tJson* parent, tJson* child)

json ツリー parent に json ツリー child のノードを挿入する．

取り消し 2025/5/13 誤: ANCHORノードは処理しない．ANCHORが有る場合は，これを呼び出す前に処理すること．正: ANCHORノードは関数内で処理する．

parent が単独の{ または属性がOBJECTのノードの場合 child の { は破棄されて，それ以下のノードが parent の子（姉妹）として結合される． child そのものは破棄される．

parent が [ の場合 child はそのまま配列の要素として追加される．

parent がそれ外の場合何の処理も行われない．

Definition at line 1024 of file tjson.c.

 {
     if (child!=NULL  && child->ldat.id ==JSON_ANCHOR_NODE) child  = child->next;
     if (parent!=NULL && parent->ldat.id==JSON_ANCHOR_NODE) parent = parent->next;
     if (parent==NULL || child ==NULL) return NULL;
     if (parent->ldat.id!=JSON_BRACKET_NODE && parent->ldat.lv!=JSON_VALUE_OBJ && parent->ldat.id!=JSON_ARRAY_NODE) return NULL;
     if (child->ldat.id !=JSON_BRACKET_NODE) return NULL;
     
     tJson* ret = NULL;
     //if (parent->ldat.id==JSON_BRACKET_NODE) {
     if (parent->ldat.id==JSON_BRACKET_NODE || parent->ldat.lv==JSON_VALUE_OBJ) {
         tJson* cp = child->next;
         while (cp!=NULL) {
             add_tTree(parent, cp);
             ret = cp;
             cp = cp->ysis;
         }
         clear_tList_data(&child->ldat);
         free(child);
     }
     else if (parent->ldat.id==JSON_ARRAY_NODE) {
         add_tTree(parent, child);
         ret = child;
     }
  
     return ret;
 }

References add_tTree(), clear_tList_data(), JSON_ANCHOR_NODE, JSON_ARRAY_NODE, JSON_BRACKET_NODE, and JSON_VALUE_OBJ.

Referenced by json_append_array_key(), json_append_obj_key(), and json_insert_parse().

Here is the call graph for this function:

Here is the caller graph for this function:

◆ json_insert_parse()

tJson* json_insert_parse	(	tJson *	json,
		const char *	str
	)

tJson* json_insert_parse(tJson* json, const char* str)

str をパースして json に繋げる．str は { または [ で始まる必要がある．

Definition at line 1058 of file tjson.c.

 {
     if (str==NULL || json==NULL) return NULL;
     if (json->ldat.id==JSON_ANCHOR_NODE) json = json->next;
     if (json==NULL) return NULL;
     
     tJson* jcld = json_parse(str, 99);
     if (jcld!=NULL && jcld->ldat.id==JSON_ANCHOR_NODE) {
         jcld = del_json_anchor_node(jcld);
     }
     if (jcld!=NULL) {
         jcld = json_insert_child(json, jcld);
     }
  
     return jcld;
 }

References del_json_anchor_node, JSON_ANCHOR_NODE, json_insert_child(), and json_parse().

Here is the call graph for this function:

◆ json_inverse_parse()

Buffer json_inverse_parse	(	tJson *	pp,
		int	mode
	)

Buffer json_inverse_parse(tJson* pp, int mode)

ppに格納された tJsonデータを mode に従って，元の書式に戻して Bufferに格納する．json_parse() の逆．

Parameters

pp	tJsonデータが格納されたツリーへのポインタ
mode	JSON_ONELINE_FORMAT 改行なしの一行にする．
mode	JSON_CRLF_FORMAT ノードの終わりを CR(0x0d), LF(0x0a)で改行する．
mode	JSON_INDENT_FORMAT 先頭にインデント(" ")をつけ，ノードごとに改行 CR LF (0x0d,0x0a)する．

Returns: 変換したJSONデータを格納した Buffer変数．

Definition at line 616 of file tjson.c.

 {
     int cnt;
     Buffer buf;
  
     buf = init_Buffer();
     if (pp==NULL) return buf;
     if (pp->ldat.id==JSON_ANCHOR_NODE) pp = pp->next;
     if (pp==NULL) return buf;
  
     cnt = count_tTree(pp);
     buf = make_Buffer(cnt*LSDATA);
     if (buf.buf==NULL) return buf;
  
     if (pp->ctrl!=TREE_NOSIS_NODE) while (pp->esis!=NULL) pp = pp->esis;
  
     if (mode==JSON_CRLF_FORMAT) {
         _json_to_Buffer(pp, &buf, CRLF, "");
     }
     else if (mode==JSON_INDENT_FORMAT) {
         _json_to_Buffer(pp, &buf, CRLF, "    ");
     }
     else {
         _json_to_Buffer(pp, &buf, "", "");
     }
  
     return buf;
 }

References _json_to_Buffer(), buf, count_tTree(), CRLF, init_Buffer(), JSON_ANCHOR_NODE, JSON_CRLF_FORMAT, JSON_INDENT_FORMAT, LSDATA, make_Buffer(), and TREE_NOSIS_NODE.

Referenced by print_json().

Here is the call graph for this function:

Here is the caller graph for this function:

◆ json_inverse_parse_opt()

Buffer json_inverse_parse_opt	(	tJson *	pp,
		const char *	crlf,
		const char *	space
	)

Buffer json_inverse_parse_opt(tJson* pp, const char* crlf, const char* space)

ppに格納された tJsonデータを指定にしたっがて元の書式に戻して Bufferに格納する．

Parameters

pp	tJsonデータが格納されたツリーへのポインタ
crlf	json へ戻す時の改行コード
space	インデントを付ける場合の空白やTAB

Returns: 変換したJSONデータを格納した Buffer変数．

Definition at line 656 of file tjson.c.

 {
     int cnt;
     Buffer buf;
  
     buf = init_Buffer();
     if (pp==NULL) return buf;
     if (pp->ldat.id==JSON_ANCHOR_NODE) pp = pp->next;
     if (pp==NULL) return buf;
  
     cnt = count_tTree(pp);
     buf = make_Buffer(cnt*LSDATA);
     if (buf.buf==NULL) return buf;
  
     if (pp->ctrl!=TREE_NOSIS_NODE) while (pp->esis!=NULL) pp = pp->esis;
     _json_to_Buffer(pp, &buf, crlf, space);
  
     return buf;
 }

References _json_to_Buffer(), buf, count_tTree(), init_Buffer(), JSON_ANCHOR_NODE, LSDATA, make_Buffer(), and TREE_NOSIS_NODE.

Referenced by print_json_opt().

Here is the call graph for this function:

Here is the caller graph for this function:

◆ json_parse()

tJson* json_parse	(	const char *	str,
		int	num
	)

tJson* json_parse(const char* str, int num)

文字列のJSONデータを解釈して，tJsonのツリーを生成する．ツリーのトップは JSON_ANCHOR_NODE となる．シーケンス処理で書いたので，だらだら．あまり複雑なものはパースできない．たぶん．

Parameters

str	文字列の JSONデータへのポインタ．
num	0 配列を処理しない．高速． 1 配列を処するが，配列の中の JSONデータは処理しない． 2 配列の中の { } を処理する． N 配列処理 + 再帰処理の段数．

Returns: JSONデータを格納した tJsonのアンカーへのポインタ．; エラーの場合，next以下のノードにはエラーを起こす直前までの内容が保存される

Return values

state エラーを起こした場合 stateに JBXL_JSON_PARSED 以外の値（負数）が入る．

tJson* json = json_parse("{\"A\": \"XYZ\"}");

Definition at line 51 of file tjson.c.

 {
     int state = JBXL_JSON_DEFAULT_STATE;
     char* pp = (char*)str;
  
     while(*pp!='{' && *pp!='[' && *pp!='\0') pp++;
     if (*pp=='\0') return NULL;
     if (*pp=='[') state = JBXL_JSON_ARRAY;
  
     tJson* json = new_json_anchor_node();                    // アンカー
  
     // パース
     tJson* node = json_parse_prop(json, pp, num);
     if (node->state<0) return node;
     if (node->state==JBXL_JSON_PARSE_TERM) return node;     // 中途半端な入力
  
     // 元に戻ったか？
     if (json==node) {
         json->state = JBXL_JSON_PARSED;
     }
     else {
         json->state = JBXL_JSON_NOT_CLOSED;
     }
  
     // JSON rootの数
     if (json->next!=NULL && state!=JBXL_JSON_ARRAY) {
         int n = 0;
         node = json->next;
         while(node!=NULL) {
             if (node->ldat.id==JSON_BRACKET_NODE) n++;
             node = node->ysis;
         }
         if (n!=1) json->state = JBXL_JSON_MULTI_ROOT;
     }
     else json->state = state;
  
     return json;
 }

References JBXL_JSON_ARRAY, JBXL_JSON_DEFAULT_STATE, JBXL_JSON_MULTI_ROOT, JBXL_JSON_NOT_CLOSED, JBXL_JSON_PARSE_TERM, JBXL_JSON_PARSED, JSON_BRACKET_NODE, json_parse_prop(), and new_json_anchor_node.

Referenced by json_append_array_key(), json_append_obj_key(), json_insert_parse(), and json_parse_file().

Here is the call graph for this function:

Here is the caller graph for this function:

◆ json_parse_file()

tJson* json_parse_file	(	const char *	fn,
		int	num
	)

tJson* json_parse_file(const char* fn, int num)

ファイルから読み込んでパースする．

Parameters

fn	読み込むファイル名
num	0 配列を処理しない．高速． 1 配列を処するが，配列の中の JSONデータは処理しない． 2 配列の中の { } を処理する． N 配列処理 + 再帰処理の段数．

Returns: JSONデータを格納した tJsonのアンカーへのポインタ

Definition at line 868 of file tjson.c.

 {
     tJson* json = NULL;
     Buffer buf;
  
     buf = read_Buffer_file(fn);
     if (buf.buf!=NULL) {
         json = json_parse((char*)(buf.buf), num);
         free_Buffer(&buf);
     }
  
     return json;
 }

References buf, free_Buffer(), json_parse(), and read_Buffer_file().

Here is the call graph for this function:

◆ json_parse_prop()

tJson* json_parse_prop	(	tJson *	json,
		const char *	str,
		int	num
	)

tJson* json_parse_prop(tJson* json, const char* str, int num)

JSON Main パーサ．
先頭に姉妹ノードがない場合は json にNULLを指定しても可．
処理に json->ctrl を使用（分割シーケンス処理用．プログラム中で書き換えられる）．

Parameters

json	JSONデータへのポインタ． NULLでない場合は，このデータの後に結果が付加される．NULLの場合はアンカー付き．
str	パースする文字列．
num	0 配列を処理しない．高速． 1 配列を処するが，配列の中の JSONデータは処理しない． 2 配列の中の { } を処理する． N 配列処理 + 再帰処理の段数．

Returns: JSONデータを格納したポインタ．完全にパースできれば，トップを指している筈．

Definition at line 107 of file tjson.c.

 {
     char*  pp   = (char*)str;
     char*  pt   = NULL;
     tJson* node = NULL;
     tJson* trgt = NULL;
     int  valflg = OFF;
  
     if (json==NULL) {
         json = new_json_anchor_node();
     }
  
     while (*pp!='\0') {
         // 
         if (*pp=='{') {
             //PRINT_MESG("open  { \n");
             pp++;
             //
             if (json->ctrl!=JBXL_JSON_NODE_OPENED) {
                 if (valflg==OFF || json->depth<0) {
                     node = new_json_node();
                     node->ldat.id = JSON_BRACKET_NODE;
                     node->ldat.lv = JSON_VALUE_OBJ;
                     json = add_tTree_node(json, node);
                 }
                 else {
                     json = json->yngr;
                     json->ldat.lv = JSON_VALUE_OBJ;
                 }
                 valflg = OFF;
             }
             json->ctrl = JBXL_NONE;
  
             // 次の \", \', {, } を見つける
             pt = pp;
             //while (*pt!='\0' && *pt!='\'' && *pt!='\"' && *pt!='{' && *pt!='}') pt++;
             while(*pt!='\0') {
                 while(*pt=='\\') pt += 2;
                 if (*pt!='\0') {
                     if (*pt=='\'' || *pt=='\"' || *pt=='{' || *pt=='}') break;
                     pt++;
                 }
             }
             if (*pt=='\0') {
                 json = _json_parse_term(json, NULL, NULL, "{");
                 json->ctrl = JBXL_JSON_NODE_OPENED;
                 return json;
             }
  
             pp = pt;
             if (*pp=='\"' || *pp=='\'') {
                 char ch = '\"';
                 if (*pp=='\'') ch = '\''; 
                 //
                 pt = pp + 1;
                 while(*pt!='\0') {
                     while(*pt=='\\') pt += 2;
                     if (*pt!='\0') {
                         if (*pt==ch) break;
                         pt++;
                     }
                 }
                 if (*pt=='\0') {
                     json = _json_parse_term(json, pp, pt, "{");
                     json->ctrl = JBXL_JSON_NODE_OPENED;
                     return json;
                 }
  
                 int len = (int)(pt - pp) - 1 ;
                 node = new_json_node();
                 node->ldat.key = set_Buffer(pp + 1, len);
                 node->ldat.id  = JSON_DATA_NODE;
                 node->ldat.lv  = JSON_VALUE_NULL;
                 trgt = add_tTree_node(json, node);
  
                 pt = pt + 1; 
                 while(*pt!=',' && *pt!=':' && *pt!='}' && *pt!='\0') pt++; 
                 if (*pt=='\0') {
                     json->state = JBXL_JSON_PARSE_TERM;
                     return json; 
                 }
                 pp = pt;
             }
         }
  
         //
         else if (*pp=='[') {
             //PRINT_MESG("open  [ \n");
             pt = skip_char_pair(pp, '[', ']');
             if (*pt=='\0') {
                 json = _json_parse_term(json, pp, pt, "[");
                 return json;
             }
             if (valflg==OFF || json->depth<0) { // アンカーのみ
                 node = new_json_node();
                 node->ldat.id = JSON_ARRAY_NODE;
                 node->ldat.lv = JSON_VALUE_ARRAY;
                 add_tTree_node(json, node);
             }
             if (json->yngr!=NULL) {
                 int len = (int)(pt - pp) + 1;
                 Buffer temp = set_Buffer(pp, len);
                 json->yngr->ldat.val = pack_Buffer(temp, '\0');
                 json->yngr->ldat.lv  = JSON_VALUE_ARRAY;
                 free_Buffer(&temp);
             }
             valflg = OFF;
  
             if (num>0 && json->yngr!=NULL) _json_array_parse(json->yngr, num-1);
  
             pt++; 
             while(*pt!=',' && *pt!='}' && *pt!='{' && *pt!='[' && *pt!='\0') pt++;
             if (*pt=='\0') {
                 if (json->depth>0) json->state = JBXL_JSON_PARSE_TERM;
                 return json;    
             }
             //
             pp = pt;
         }
  
         //
         else if (*pp==',') {
             //PRINT_MESG("next  , \n");
             pt = pp + 1;
             // 次の \", \', {, } を見つける
             //while (*pt!='\0' && *pt!='\'' && *pt!='\"' && *pt!='{' && *pt!='}' && *pt!='[') pt++;
             while(*pt!='\0') {
                 while(*pt=='\\') pt += 2;
                 if (*pt!='\0') {
                     if (*pt=='\'' || *pt=='\"' || *pt=='{' || *pt=='}' || *pt=='[') break;
                     pt++;
                 }
             }
             if (*pt=='\0') {
                 json = _json_parse_term(json, NULL, NULL, ",");
                 return json;
             }
  
             pp = pt;
             if (*pp=='\"' || *pp=='\'') {
                 char ch = '\"';
                 if (*pt=='\'') ch = '\''; 
                 //
                 pt = pp + 1;
                 while(*pt!='\0') {
                     while(*pt=='\\') pt += 2;
                     if (*pt!='\0') {
                         if (*pt==ch) break;
                         pt++;
                     }
                 }
                 if (*pt=='\0') {
                     json = _json_parse_term(json, pp, pt, ",");
                     return json;    
                 }
  
                 int len = (int)(pt - pp) - 1 ;
                 node = new_json_node();
                 node->ldat.key = set_Buffer(pp + 1, len);
                 node->ldat.id  = JSON_DATA_NODE;
                 node->ldat.lv  = JSON_VALUE_NULL;
                 trgt = add_tTree_node(json, node);
  
                 pt = pt + 1; 
                 while(*pt!=',' && *pt!=':' && *pt!='}' && *pt!='\0') pt++; 
                 if (*pt=='\0') {
                     json->state = JBXL_JSON_PARSE_TERM;
                     return json;    
                 }
                 pp = pt;
             }
         }
  
         //
         else if (*pp==':') {
             //PRINT_MESG("next  : \n");
             pt = pp + 1;
             while (*pt==' ') pt++;
             if (*pt=='\0') {
                 json = _json_parse_term(json, NULL, NULL, ":");
                 return json;
             }
             pp = pt;
  
             if (*pp!='{' && *pp!='[') {
                 while(*pt==' ') pt++;
                 if (*pt!='\0') while (*pt=='\\') pt += 2;
                 //
                 if (*pp=='\'' || *pp=='\"') {
                     pt = skip_string_end(pt);
                     if (*pt!='\0') pt++;
                 }
                 while (*pt!=',' && *pt!='{' && *pt!='}' && *pt!='\0') pt++;
  
                 if (*pt=='\0') {
                     json = _json_parse_term(json, pp, pt, ":");
                     return json;    
                 }
                 pt--;
                 while (*pt==' ' || *pt==0x0a || *pt==0x0d) pt--;
  
                 int len = (int)(pt - pp) + 1 ;
                 Buffer temp = set_Buffer(pp, len);
                 if (trgt==NULL) trgt = json->yngr;
                 trgt->ldat.val = pack_Buffer(temp, '\0');
                 free_Buffer(&temp);
                 //
                 if (*pp=='\"' || *pp=='\'') trgt->ldat.lv = JSON_VALUE_STR;
                 else {
                     char* val = (char*)trgt->ldat.val.buf;
                     if (!strcasecmp("true", val) || !strcasecmp("false", val)) trgt->ldat.lv = JSON_VALUE_BOOL;
                     else {
                         int num = is_number((unsigned char*)val);
                         if      (num==1) trgt->ldat.lv = JSON_VALUE_INT;
                         else if (num==2) trgt->ldat.lv = JSON_VALUE_REAL;
                         else  trgt->ldat.lv = JSON_VALUE_UNRESOLV;
                     }
                 }
  
                 pt++;
                 while (*pt==' ') pt++;
                 pp = pt;
             }
             else {
                 valflg = ON; // ':{' or ':['
             }
         }
  
         //
         else if (*pp=='}') {
             //PRINT_MESG("close } \n");
             if (json->prev!=NULL) json = json->prev;
             //
             pt = pp = pp + 1;
             while (*pt!=',' && *pt!='}' && *pt!='{' && *pt!='\0') pt++;
             if (*pt=='\0' && json->depth>0) {
                 json->state = JBXL_JSON_PARSE_TERM;
                 return json;    
             }
             pp = pt;
         }
  
         //
         else {
             pp++;
         }
     }
  
     if (json->ldat.id==JSON_TEMP_NODE) {
         tJson* temp = json->next;
         del_json_node(&json);
         json = temp;
     }
  
     json->state = JBXL_JSON_PARSED;
     return json;
 }

References _json_array_parse(), _json_parse_term(), add_tTree_node(), free_Buffer(), is_number(), JBXL_JSON_NODE_OPENED, JBXL_JSON_PARSE_TERM, JBXL_NONE, JSON_ARRAY_NODE, JSON_BRACKET_NODE, JSON_DATA_NODE, JSON_VALUE_ARRAY, JSON_VALUE_BOOL, JSON_VALUE_INT, JSON_VALUE_NULL, JSON_VALUE_OBJ, JSON_VALUE_REAL, JSON_VALUE_STR, JSON_VALUE_UNRESOLV, len, new_json_anchor_node, new_json_node, OFF, ON, pack_Buffer(), set_Buffer(), skip_char_pair(), and skip_string_end().

Referenced by json_array_parse(), json_parse(), and json_parse_seq().

Here is the call graph for this function:

Here is the caller graph for this function:

◆ json_parse_seq()

tJson* json_parse_seq	(	tJson *	json,
		const char *	str,
		int	num
	)

tJson* json_parse_seq(tJson* json, const char* str, int num)

断片化した JSONデータを読み込んで処理する．
処理途中の戻り値は色々な場所を指すが，最期までパースできれば，戻り値はトップに戻る．

tJson* json;
json = json_parse_seq(NULL, pp1, 99);
json = json_parse_seq(next, pp2, 99);
json = json_parse_seq(next, pp3, 99);

Definition at line 581 of file tjson.c.

 {
     if (json==NULL) {
         json = json_parse_prop(NULL, str, num);
         return json;
     }
  
     Buffer buf = dup_Buffer(json->ldat.val);
     free_Buffer(&(json->ldat.val));
     cat_s2Buffer((char*)str, &buf);
  
     json->state = JBXL_JSON_DEFAULT_STATE;
     json = json_parse_prop(json, (char*)buf.buf, num);
     free_Buffer(&buf);
  
     return json;
 }

References buf, cat_s2Buffer, dup_Buffer(), free_Buffer(), JBXL_JSON_DEFAULT_STATE, and json_parse_prop().

Here is the call graph for this function:

◆ json_set_int_val()

void json_set_int_val	(	tJson *	json,
		int	val
	)

void json_set_int_val(tJson* json, int val)

json ノードに整数の属性値(value)を設定する．

Definition at line 922 of file tjson.c.

 {
     if (json==NULL) return;
     if (json->ldat.id==JSON_BRACKET_NODE) {
         json = json->next;
         if (json==NULL) return;
     }
  
     copy_i2Buffer(val, &(json->ldat.val));
     json->ldat.lv = JSON_VALUE_INT;
     return;
 }

References copy_i2Buffer(), JSON_BRACKET_NODE, and JSON_VALUE_INT.

Here is the call graph for this function:

◆ json_set_real_val()

void json_set_real_val	(	tJson *	json,
		float	val
	)

void json_set_real_val(tJson* json, float val)

json ノードに実数(float) の属性値(value)を設定する．

Definition at line 941 of file tjson.c.

 {
     if (json==NULL) return;
     if (json->ldat.id==JSON_BRACKET_NODE) {
         json = json->next;
         if (json==NULL) return;
     }
  
     copy_r2Buffer(val, &(json->ldat.val));
     json->ldat.lv = JSON_VALUE_REAL;
     return;
 }

References copy_r2Buffer(), JSON_BRACKET_NODE, and JSON_VALUE_REAL.

Here is the call graph for this function:

◆ json_set_str_val()

void json_set_str_val	(	tJson *	json,
		const char *	val
	)

void json_set_str_val(tJson* json, const char* val)

json ノードに文字列の属性値(value)を設定する．

Definition at line 888 of file tjson.c.

 {
     if (json==NULL || val==NULL) return;
     if (json->ldat.id==JSON_BRACKET_NODE) {
         json = json->next;
         if (json==NULL) return;
     }
  
     Buffer buf = init_Buffer();
     if (val[0]!='"') {
         buf = make_Buffer((int)strlen(val) + 3); // " + " + \0
         copy_s2Buffer("\"", &buf);
         cat_s2Buffer(val, &buf);
     }
     else {
         buf = make_Buffer_bystr(val);
     }
     if (buf.buf[buf.vldsz-1]!='"') {
         cat_s2Buffer("\"", &buf);
     }
  
     copy_Buffer(&buf, &(json->ldat.val));
     json->ldat.lv = JSON_VALUE_STR;
     free_Buffer(&buf);
  
     return;
 }

References buf, cat_s2Buffer, copy_Buffer(), copy_s2Buffer, free_Buffer(), init_Buffer(), JSON_BRACKET_NODE, JSON_VALUE_STR, make_Buffer(), and make_Buffer_bystr.

Here is the call graph for this function:

◆ print_json()

void print_json	(	FILE *	fp,
		tJson *	json,
		int	mode
	)

void print_json(FILE* fp, tJson* json, int mode)

tJsonデータを modeに従って，fp に出力する.

Parameters

fp	出力先のファイルポインタ
json	tJsonデータが格納されたツリーへのポインタ
mode	JSON_ONELINE_FORMAT 改行なしの一行にする．
mode	JSON_CRLF_FORMAT ノードの終わりを CR LF(0x0d, 0x0a) で改行する．
mode	JSON_INDENT_FORMAT 先頭にインデント(TAB 0x09)をつけ，ノードごとに改行 CR LF (0x0d, 0x0a)する．

Definition at line 818 of file tjson.c.

 {
     Buffer buf = json_inverse_parse(json, mode);
     if (buf.buf!=NULL) {
         fprintf(fp, "%s", buf.buf);
         free_Buffer(&buf);
     }
  
     return;
 }

References buf, free_Buffer(), and json_inverse_parse().

Here is the call graph for this function:

◆ print_json_opt()

void print_json_opt	(	FILE *	fp,
		tJson *	json,
		const char *	crlf,
		const char *	space
	)

void print_json_opt(FILE* fp, tJson* json, const char* crlf, const char* space)

tJsonデータを fp に出力する.

Parameters

fp	出力先のファイルポインタ
json	tJsonデータが格納されたツリーへのポインタ
crlf	json へ戻す時の改行コード
space	インデントを付ける場合の空白やTAB

Definition at line 840 of file tjson.c.

 {
     Buffer buf = json_inverse_parse_opt(json, crlf, space);
     if (buf.buf!=NULL) {
         fprintf(fp, "%s", buf.buf);
         free_Buffer(&buf);
     }
  
     return;
 }

References buf, free_Buffer(), and json_inverse_parse_opt().

Here is the call graph for this function:

◆ search_all_node_strval_json()

tList* search_all_node_strval_json	(	tJson *	pp,
		const char *	name,
		const char *	val
	)

tList* search_all_node_strval_json(tJson* pp, const char* name, const char* val)

指定した条件に会う全てのノードへのポインタを，リスト（list->altp）に格納して返す．
検索条件は，属性名 name, 属性値 val ("name": "val") を持つノード．

Parameters

pp	検索する JSONデータ．
name	属性名
val	属性値

Returns: 検索結果を altp に格納したリスト．ldat.id は通し番号で，0から始まる．altp==NULL ならそこで終わり．

Definition at line 1662 of file tjson.c.

 {
     if (pp!=NULL && pp->ldat.id==JSON_ANCHOR_NODE) pp = pp->next;
     if (pp==NULL) return NULL;
  
     tList* list = new_json_node();
     _search_all_node_strval_json(list, pp, name, val);
  
     return list;
 }

References _search_all_node_strval_json(), JSON_ANCHOR_NODE, and new_json_node.

Here is the call graph for this function:

◆ search_double_key_json()

tJson* search_double_key_json	(	tJson *	pp,
		const char *	key1,
		const char *	key2,
		int	needval
	)

tJson* search_double_key_json(tJson* pp, const char* key1, const char* key2, int needval)

key1 -> key2 の親子関係を持つ，key2ノードのポインタを返す．

Parameters

pp	探索を開始するノード．
key1	探索するノード名．
key2	探索するノード名．
needval	TRUEの時，ky2 ノードが値（属性値）を持っていない場合は無視する．"", '' の場合も無視する．

Returns: 見つかったノードへのポインタ．見つからない場合は，NULL

Definition at line 1529 of file tjson.c.

 {
     if (pp==NULL || key1==NULL || key2==NULL) return NULL;
  
     pp = search_key_json_obj(pp, key1, 1);
     if (pp==NULL) return NULL;
  
     if (pp->next!=NULL) {
         pp = search_key_json(pp, key2, needval, 1);
     }
     else return NULL;
  
     return pp; 
 }

References search_key_json(), and search_key_json_obj().

Referenced by get_double_key_json_val().

Here is the call graph for this function:

Here is the caller graph for this function:

◆ search_key_child_json()

tJson* search_key_child_json	(	tJson *	pp,
		const char *	key,
		int	needval
	)

tJson* search_key_child_json(tJson* pp, const char* key, int needval)

pp が指すノードの子（の姉妹）で，名前（属性名）が key であるノードへのポインタを返す．探索対象は探索を開始した子の姉妹ノードのみ． needval が TRUE の場合は，値（属性値）を持っている場合のみカウントする．

Parameters

pp	探索を開始するノード．
key	探索するノード名．
needval	TRUE の場合，ノードが値（属性値）を持っていない場合は無視する．"", '' の場合も無視する．

Returns: 見つかったノードへのポインタ．見つからない場合は NULL

Definition at line 1447 of file tjson.c.

 {
     if (pp!=NULL && pp->ldat.id==JSON_ANCHOR_NODE) pp = pp->next;
     if (pp==NULL || pp->next==NULL) return NULL;
  
     tJson* json = search_key_sister_json(pp->next, key, needval);
  
     return json;
 }

References JSON_ANCHOR_NODE, and search_key_sister_json().

Here is the call graph for this function:

◆ search_key_json()

tJson* search_key_json	(	tJson *	pp,
		const char *	key,
		int	needval,
		int	nn
	)

tJson* search_key_json(tJson* pp, const char* key, int needval, int nn)

pp が指すノード以下で，名前（属性名）が key である nn番目のノードへのポインタを返す．
needval が TRUE の場合は，値（属性値）を持っている場合のみカウントする． pp の姉妹ノードは探索しない．

Parameters

pp	探索を開始するノード．ppがオブジェクト要素（JSON_VALUE_OBJ）なら，次のノードから探索する．
key	探索するノード名．
needval	TRUE の場合，ノードが値（属性値）を持っていない場合は無視する．"", '' の場合も無視する．
nn	一致するノード内，何番目を返すか指定する．nn<=0 は nn==1 とみなす．

Returns: 見つかったノードへのポインタ．見つからない場合は，NULL

Definition at line 1383 of file tjson.c.

 {
     if (pp==NULL || key==NULL) return NULL;
     if (nn<=0) nn = 1;
  
     // 開始ノードのチェック
     if (!(pp->ldat.lv==JSON_VALUE_OBJ && needval)){
         nn = _json_check_node_bykey(pp, key, needval, nn);
     }
     // 子ノード
     if (nn>0 && pp->next!=NULL) {
         pp = _search_key_json(pp->next, key, needval, &nn);
     }
     else return NULL;
  
     return pp; 
 }

References _json_check_node_bykey(), _search_key_json(), and JSON_VALUE_OBJ.

Referenced by get_key_json_val(), and search_double_key_json().

Here is the call graph for this function:

Here is the caller graph for this function:

◆ search_key_json_obj()

tJson* search_key_json_obj	(	tJson *	pp,
		const char *	key,
		int	nn
	)

tJson* search_key_json_obj(tJson* pp, const char* key, int nn)

pp が指すノード以下で，名前（属性名）が key である nn番目のオブジェクトノード(JSON_VALUE_OBJ)へのポインタを返す． pp の姉妹ノードは探索しない． search_key_json() よりは少し早い．たぶん．

Parameters

pp	探索を開始するノード．
key	探索するノード名．
nn	一致するノード内，何番目を返すか指定する．nn<=0 は nn==1 とみなす．

Returns: 見つかったオブジェクトノードへのポインタ．見つからない場合は，NULL

Definition at line 1497 of file tjson.c.

 {
     if (pp==NULL || key==NULL) return NULL;
     if (nn<=0) nn = 1;
  
     // 開始ノードのチェック
     if (pp->ldat.lv==JSON_VALUE_OBJ) {
         nn = _json_check_node_bykey(pp, key, FALSE, nn);
     }
     if (nn==0) return pp;
  
     // 子ノード
     if (pp->next!=NULL) {
         pp = _search_key_json_obj(pp->next, key, &nn);
     }
     else return NULL;
  
     return pp; 
 }

References _json_check_node_bykey(), _search_key_json_obj(), FALSE, and JSON_VALUE_OBJ.

Referenced by search_double_key_json().

Here is the call graph for this function:

Here is the caller graph for this function:

◆ search_key_sister_json()

tJson* search_key_sister_json	(	tJson *	pp,
		const char *	key,
		int	needval
	)

tJson* search_key_sister_json(tJson* pp, const char* key, int needval)

pp が指すノードの姉妹で，名前（属性名）が key であるノードへのポインタを返す．探索対象は探索を開始した姉妹ノードのみ． needval が TRUE の場合は，値（属性値）を持っている場合のみカウントする．

Parameters

pp	探索を開始するノード．
key	探索するノード名．
needval	TRUE の場合，ノードが値（属性値）を持っていない場合は無視する．"", '' の場合も無視する．

Returns: 見つかったノードへのポインタ．見つからない場合は，NULL

Definition at line 1470 of file tjson.c.

 {
     if (pp==NULL || key==NULL) return NULL;
     while(pp->esis!=NULL) pp = pp->esis;
  
     while(pp!=NULL) {
         int nn = _json_check_node_bykey(pp, key, needval, 1);
         if (nn==0) return pp;
         pp = pp->ysis;
     }
     
     return NULL; 
 }

References _json_check_node_bykey().

Referenced by get_key_sister_json_val(), and search_key_child_json().

Here is the call graph for this function:

Here is the caller graph for this function:

◆ search_sister_json()

tJson* search_sister_json	(	tJson *	pp,
		int	nn
	)

tJson* search_sister_json(tJson* pp, int nn)

nn個先の sister ノードを返す．正数の場合は younger sister，負数の場合は elder sister を検索する．

Parameters

pp	探索を開始するノード．
nn	何個先の sister かを指定する．正数の場合は younger sister，負数の場合は elder sister．

Returns: sister ノードへのポインタ．存在しない場合は NULL

Definition at line 1412 of file tjson.c.

 {
     if (pp==NULL) return NULL;
  
     if (nn>0) {
         int i = 0;
         while (pp!=NULL && i<nn) {
             pp = pp->ysis;
             i++;
         }
     }
     else if (nn<0) {
         nn = -nn;
         int i = 0;
         while (pp!=NULL && i<nn) {
             pp = pp->esis;
             i++;
         }
     }
     return pp;
 }

◆ search_top_bracket_json()

tJson* search_top_bracket_json	(	tJson *	pp,
		int	nn
	)

tJson* search_top_bracket_json(tJson* pp, int nn)

ツリーが複数のルート(TOP)を持つ場合（state==JBXL_JSON_MULTI_ROOT），指定された順番のTOPへのポインタを返す．

Parameters

nn	何番目のTOPを返すか指定する．nn<=0 は nn==1 とみなす．

Returns: 見つかったノードへのポインタ．見つからない場合は，NULL

Definition at line 1343 of file tjson.c.

 {
     if (pp==NULL) return NULL;
     if (nn<=0) nn = 1;
  
     while (pp->prev!=NULL) pp = pp->prev;
  
     if (pp->ldat.id==JSON_ANCHOR_NODE) {
         pp = pp->next;
     }
     if (pp->ldat.id==JSON_BRACKET_NODE) {
         while(pp->esis!=NULL) pp = pp->esis;
     }
     else {
         return NULL;
     }
  
     int i = 1;
     while (i<nn && pp!=NULL) {
         pp = pp->ysis;
         i++;
     }
  
     return pp;
 }

References JSON_ANCHOR_NODE, and JSON_BRACKET_NODE.

Functions

Detailed Description

Function Documentation

◆ _json_array_parse()

◆ _json_check_node_bykey()

◆ _json_parse_term()

◆ _json_to_Buffer()

◆ _search_all_node_strval_json()

◆ _search_key_json()

◆ _search_key_json_obj()

◆ get_Buffer_from_json()

◆ get_double_key_json_val()

◆ get_json_val()

◆ get_key_json_val()

◆ get_key_sister_json_val()

◆ get_string_from_json()

◆ join_json()

◆ json_append_array_int_val()

◆ json_append_array_key()

◆ json_append_array_real_val()

◆ json_append_array_str_val()

◆ json_append_obj_int_val()

◆ json_append_obj_key()

◆ json_append_obj_real_val()

◆ json_append_obj_str_val()

◆ json_array_parse()

◆ json_copy_data()

◆ json_copy_val()

◆ json_insert_child()

◆ json_insert_parse()

◆ json_inverse_parse()

◆ json_inverse_parse_opt()

◆ json_parse()

◆ json_parse_file()

◆ json_parse_prop()

◆ json_parse_seq()

◆ json_set_int_val()

◆ json_set_real_val()

◆ json_set_str_val()

◆ print_json()

◆ print_json_opt()

◆ search_all_node_strval_json()

◆ search_double_key_json()

◆ search_key_child_json()

◆ search_key_json()

◆ search_key_json_obj()

◆ search_key_sister_json()

◆ search_sister_json()

◆ search_top_bracket_json()