C json实战引擎 二 , 实现构造部分

引言

　　这篇博文和前一篇 C json实战引擎一,实现解析部分设计是相同的,都是采用递归下降分析.

这里扯一点 假如你是学生 推荐一本书 给 大家

　　自制编程语言 http://baike.baidu.com/link?url=jIFOBNt26ykhnPr2-UaaDc5_I7gZURXdJ15P2iBXwbglXkdz2qT_tqAz4KoFF0rsS2IQbIP-ij2Ar5EMRzMcuq

当然学了上面内容,以后对编译链接设计方面会有很大提高. 但是对于 其它 也没有什么鸟用.

再扯一点 如果想流畅的看完并成功写完上面书中三个案例. 你还需要 看完 市面上关于 C 讲解的所有出名的 有意义的书籍.

编程很简单,勤能补拙, 想提高就会提高. 但成长很难......

　　风暴 http://music.163.com/#/song?id=211222  陈洁仪

前言

　　同样,一开始将最有益,最简单的部分代码拿出来供大家分享.

1.从简单 有益代码来

　　开始分析一段 代码, 先展示一下使用的数据结构

struct cjson {
	struct cjson *next, *prev;
	struct cjson *child; // type == _CJSON_ARRAY or type == _CJSON_OBJECT 那么 child 就不为空

	int type;
	char *key;	// json内容那块的 key名称
	char *vs;	// type == _CJSON_STRING, 是一个字符串
	double vd;  // type == _CJSON_NUMBER, 是一个num值, ((int)c->vd) 转成int 或 bool
};

//定义cjson_t json类型
typedef struct cjson* cjson_t;

再展示用的 tstring 结构

#ifndef _STRUCT_TSTRING
#define _STRUCT_TSTRING
//简单字符串结构,并定义文本字符串类型tstring
struct tstring {
    char* str;        //字符串实际保存的内容
    int len;        //当前字符串大小
    int size;        //字符池大小
};
typedef struct  tstring* tstring;
#endif // !_STRUCT_TSTRING

这些数据结构前面 博文已经对其进行过详细 设计利用分析.

先看一个 double 变成 cjson_t 的算法, 很多细节真的适合 学习尝试用于底层库封装设计中.

// 将item 中值转换成字符串 保存到p中
static char* __print_number(cjson_t item, tstring p)
{
	char* str = NULL;
	double d = item->vd;
	int i = (int)d;

	if (d == 0) {  //普通0
		str = __ensure(p, 2);
		if (str)
			str[0] = '0', str[1] = '\0';
	}
	else if ((fabs(d - i)) <= DBL_EPSILON && d <= INT_MAX && d >= INT_MIN) {
		str = __ensure(p, 21); //int 值
		if (str)
			sprintf(str, "%d", i);
	}
	else {
		str = __ensure(p, 64); //double值
		if (str) {
			double nd = fabs(d); //得到正值开始比较
			if(fabs(floor(d) - d) <= DBL_EPSILON && nd < 1.0e60)
				sprintf(str, "%.0f", d);
			else if(nd < 1.0e-6 || nd > 1.0e9) //科学计数法
				sprintf(str, "%e", d);
			else
				sprintf(str, "%f", d);

		}
	}

	return str;
}

是不是感觉 很巧妙. 这里 把 int 和 double 都算作 number类型, 出现了 上面算法. 需要导入 #include <float.h> 引用了 DBL_EPSILON 判断是否相等宏阀值.

其中 __ensure 函数 是一个 协助 tstring 分配内存的一个函数

/*
 *     这里使用 tstring 结构 size 这里表示 字符串总大小,没有变化
 * len 表示当前字符串的字符串起始偏移量 即 tstring->str + tstring->len 起始的
 */
static char* __ensure(tstring p, int need)
{
    char* nbuf;
    int nsize;
    if (!p || !p->str) {
        SL_FATAL("p:%p need:%p is error!", p, need);
        return NULL;
    }
    need += p->len;
    if (need <= p->size) //内存够用直接返回结果
        return p->str + p->len;
    nsize = __pow2gt(need);
    if ((nbuf = malloc(nsize*sizeof(char))) == NULL) {
        free(p->str);
        p->size = p->len = ;
        p->str = NULL;
        SL_FATAL("malloc nsize = %d error!", nsize);
        return NULL;
    }
    //这里复制内容
    memcpy(nbuf, p->str, p->size);
    free(p->str);
    p->size = nsize;
    p->str = nbuf;
    return nbuf + p->len;
}

这里采用的 SL_FATAL 日志库, 看我前面博文 如何写一个 高效多用户的 日志库, 特别有用,基本上是开发中标配.

还有一个 __pow2gt(x) 函数技巧, 返回 一个比x 的 n 其中n是2的幂,并且是最小的幂.是一种技巧记住就可以了.估计都是那些写汇编的老代码遗留下来的潜规则吧.

性能没的说. 不明白就当有个印象.

 // 2^n>=x , n是最小的整数
 static int __pow2gt(int x)
 {
     --x;
     x |= x >> ;
     x |= x >> ;
     x |= x >> ;
     x |= x >> ;
     x |= x >> ;
     return x + ;
 }

到这里 这几个函数 就可以代表这整篇文章了. 后面就可以省略了.

正文

1.开始说 cjson 的 构造

　　cjson 解析 先认为 所有的都是 一个 value => null or bool or number or string or array or object

其中 array or object 需要再特殊处理,因为其中可能包含 value 即 array or object => value

这样的递归顺序进行的. 这就是传说中的低估下降分析 !!!! 爽不爽 , 当我还是学生的时候,NB任务告诉我学会了 递归了下降分析就可以找个

不错的工作, 找个不错的对象. 现在只想说 呵呵!!.

　　大概像下面调用关系图

递归嵌套. 好像 Linux 之父 也 说过 去它码的递归.

2.展示 cjson 构造用的接口

　　这里比较简单,今天只分析 构造部分 接口就一个

// --------------------------------- 下面是 cjson 输出部分的处理代码 -----------------------------------------

/*
 *  这里是将 cjson_t item 转换成字符串内容,需要自己free
 * item        : cjson的具体结点
 *            : 返回生成的item的json串内容
 */
extern char* cjson_print(cjson_t item);

值得注意的是 上面接口能够将 item变成 char*, 这个char*是堆上分配的. 需要自己 用完后 free.

　　

3. 展示 cjson 部分代码

　　上面接口构造的函数为

#define _INT_CJONSTR    (256)
/*
*  这里是将 cjson_t item 转换成字符串内容,需要自己free
* item        : cjson的具体结点
*            : 返回生成的item的json串内容
*/
char*
cjson_print(cjson_t item)
{
    struct tstring p;
    char* out;
    if ((!item) || !(p.str = malloc(sizeof(char)*_INT_CJONSTR))) {
        SL_FATAL("item:%p, p.str = malloc is error!", item);
        return NULL;
    }
    p.size = _INT_CJONSTR;
    p.len = ;

    out = __print_value(item, &p); //从值处理开始, 返回最终结果
    if (out == NULL) {
        free(p.str);
        SL_FATAL("__print_value item:%p, p:%p is error!", item, &p);
        return NULL;
    }
    return realloc(out,strlen(out) + ); // 体积变小 realloc返回一定成功
}

核心 是 __print_value 当然设计方面也参照了一点 cJSON内容.  那我们 继续细说 它

//这里是 递归下降 的函数声明处, 分别是处理值, 数组, object
static char* __print_value(cjson_t item, tstring p);
static char* __print_array(cjson_t item, tstring p);
static char* __print_object(cjson_t item, tstring p);

// 定义实现部分, 内部私有函数 认为 item 和 p都是存在的
static char* __print_value(cjson_t item, tstring p)
{
    char* out = NULL;
    switch ((item->type) & UCHAR_MAX) { // 0xff
    case _CJSON_FALSE: if ((out = __ensure(p, ))) strcpy(out, "false"); break;
    case _CJSON_TRUE: if ((out = __ensure(p, ))) strcpy(out, "true"); break;
    case _CJSON_NULL: if ((out = __ensure(p, ))) strcpy(out, "null"); break;
    case _CJSON_NUMBER:    out = __print_number(item, p); break;
    case _CJSON_STRING:    out = __print_string(item->vs, p); break;
    case _CJSON_ARRAY:    out = __print_array(item, p); break;
    case _CJSON_OBJECT:    out = __print_object(item, p); break;
    }

    return out;
}

有没有感觉 很自然就是这样的.  上面先声明的 __print_* 系列函数,是为了告诉编译器这个函数地址是什么,方便它能找到 并进入处理.

再展示 其中 __print_object 处理函数, 也很直白

 // 同样 假定 item 和 p都是存在且不为NULL, 相信这些代码是安全的
 static char* __print_object(cjson_t item, tstring p)
 {
     char* ptr;
     int i, ncut, len;
     cjson_t child = item->child;

     // 得到孩子结点的深度
     for (ncut = ; child; child = child->child)
         ++ncut;
     if (!ncut) {
         char* out = NULL;
         if (!(out = __ensure(p, )))
             strcpy(out, "{}");
         return out;
     }

     i = p->len;
     if (!(ptr = __ensure(p, )))
         return NULL;
     *ptr++ = '{';
     *ptr -= '\0';
     p->len += ;
     // 根据子结点 处理
     for (child = item->child; (child); child = child->next) {
         __print_string(child->key, p);
         p->len = __update(p);

         //加入一个冒号
         if (!(ptr = __ensure(p, )))
             return NULL;
         *ptr++ = ':';
         p->len += ;

         //继续打印一个值
         __print_value(child, p);
         p->len = __update(p);

         //结算最后内容
         len = child->next ?  : ;
         if ((ptr = __ensure(p, len + )) == NULL)
             return NULL;
         if (child->next)
             *ptr++ = ',';
         *ptr = '\0';
         p->len += len;
     }
     if (!(ptr = __ensure(p, )))
         return NULL;
     *ptr++ = '}';
     *ptr = '\0';
     return p->str + i;
 }

先处理key ,后面value 用 __print_value 处理. 到这里 基本思路都有了,其它是靠你自己努力临摹 把键盘敲烂!

完整部分代码如下

 cjson.h / 有些辅助接口没有实现,下一个博文中全部实现

 #ifndef _H_CJSON
 #define _H_CJSON

 // json 中几种数据类型定义 , 对于C而言 最难的是看不见源码,而不是api复杂, 更不是业务复杂
 #define _CJSON_FALSE    (0)
 #define _CJSON_TRUE        (1)
 #define _CJSON_NULL        (2)
 #define _CJSON_NUMBER    (3)
 #define _CJSON_STRING    (4)
 #define _CJSON_ARRAY    (5)
 #define _CJSON_OBJECT    (6)

 #define _CJSON_ISREF    (256)        //set 时候用如果是引用就不释放了
 #define _CJSON_ISCONST    (512)        //set时候用, 如果是const char* 就不释放了

 struct cjson {
     struct cjson *next, *prev;
     struct cjson *child; // type == _CJSON_ARRAY or type == _CJSON_OBJECT 那么 child 就不为空

     int type;
     char *key;    // json内容那块的 key名称
     char *vs;    // type == _CJSON_STRING, 是一个字符串
     double vd;  // type == _CJSON_NUMBER, 是一个num值, ((int)c->vd) 转成int 或 bool
 };

 //定义cjson_t json类型
 typedef struct cjson* cjson_t;

 /*
  * 这个宏,协助我们得到 int 值 或 bool 值
  *
  * item : 待处理的目标cjson_t结点
  */
 #define cjson_getint(item) \
     ((int)((item)->vd))

 /*
  *  删除json串内容
  * c        : 待释放json_t串内容
  */
 extern void cjson_delete(cjson_t* pc);

 /*
  * 对json字符串解析返回解析后的结果
  * jstr        : 待解析的字符串
  */
 extern cjson_t cjson_parse(const char* jstr);

 /*
  * 根据 item当前结点的 next 一直寻找到 NULL, 返回个数
  *推荐是数组使用
  * array    : 待处理的cjson_t数组对象
  *            : 返回这个数组中长度
  */
 extern int cjson_getlen(cjson_t array);

 /*
  * 根据索引得到这个数组中对象
  * array    : 数组对象
  * idx        : 查找的索引 必须 [0,cjson_getlen(array)) 范围内
  *            : 返回查找到的当前对象
  */
 extern cjson_t cjson_getarray(cjson_t array, int idx);

 /*
  * 根据key得到这个对象 相应位置的值
  * object    : 待处理对象中值
  * key        : 寻找的key
  *            : 返回 查找 cjson_t 对象
  */
 extern cjson_t cjson_getobject(cjson_t object, const char* key);

 // --------------------------------- 下面是 cjson 输出部分的处理代码 -----------------------------------------

 /*
  *  这里是将 cjson_t item 转换成字符串内容,需要自己free
  * item        : cjson的具体结点
  *            : 返回生成的item的json串内容
  */
 extern char* cjson_print(cjson_t item);

 // --------------------------------- 下面是 cjson 输出部分的辅助代码 -----------------------------------------

 /*
  * 创建一个bool的对象 b==0表示false,否则都是true
  * b        : bool 值 最好是 _Bool
  *            : 返回 创建好的json 内容
  */
 extern cjson_t cjson_newbool(int b);
 extern cjson_t cjson_newnumber(double vd);
 extern cjson_t cjson_newstring(const char* vs);
 extern cjson_t cjson_newarray(void);
 extern cjson_t cjson_newobject(void);

 /*
  * 按照类型,创建 对映类型的数组 cjson对象
  *目前支持 _CJSON_NULL _CJSON_BOOL/FALSE or TRUE , _CJSON_NUMBER, _CJSON_STRING
  * type        : 类型目前支持 上面几种类型
  * array    : 数组原始数据
  * len        : 数组中元素长度
  *            : 返回创建的数组对象
  */
 extern cjson_t cjson_newtypearray(int type, const void* array, int len);

 /*
  * 将 jstr中 不需要解析的字符串都去掉
  * jstr        : 待处理的json串
  *            : 返回压缩后的json串内容
  */
 extern char* cjson_mini(char* jstr);

 /*
  *    将json文件解析成json内容返回
  * jpath    : json串路径
  *            : 返回处理好的cjson_t 内容,失败返回NULL
  */
 extern cjson_t cjson_dofile(char* jpath);

 #endif // !_H_CJSON

cjson.c

 #include <cjson.h>
 #include <schead.h>
 #include <sclog.h>
 #include <tstring.h>
 #include <float.h>
 #include <math.h>

 // 删除cjson
 static void __cjson_delete(cjson_t c)
 {
     cjson_t next;
     while (c) {
         next = c->next;
         //递归删除儿子
         if (!(c->type & _CJSON_ISREF)) {
             if (c->child) //如果不是尾递归,那就先递归
                 __cjson_delete(c->child);
             if (c->vs)
                 free(c->vs);
         }
         else if (!(c->type & _CJSON_ISCONST) && c->key)
             free(c->key);
         free(c);
         c = next;
     }
 }

 /*
 *  删除json串内容,最近老是受清华的老学生打击, 会起来的......
 * c        : 待释放json_t串内容
 */
 void
 cjson_delete(cjson_t* pc)
 {
     if (!pc || !*pc)
         return;
     __cjson_delete(*pc);
     *pc = NULL;
 }

 //构造一个空 cjson 对象
 static inline cjson_t __cjson_new(void)
 {
     cjson_t c = calloc(, sizeof(struct cjson));
     if (!c) {
         SL_FATAL("calloc sizeof struct cjson error!");
         exit(_RT_EM);
     }
     return c;
 }

 // 简化的代码段,用宏来简化代码书写 , 16进制处理
 #define __parse_hex4_code(c, h) \
     if (c >= '' && c <= '') \
         h += c - ''; \
     else if (c >= 'A' && c <= 'F') \
         h +=  + c - 'A'; \
     else if (c >= 'a' && c <= 'z') \
         h +=  + c - 'F'; \
     else \
         return 

 // 等到unicode char代码
 static unsigned __parse_hex4(const char* str)
 {
     unsigned h = ;
     char c = *str;
     //第一轮
     __parse_hex4_code(c, h);
     h <<= ;
     c = *++str;
     //第二轮
     __parse_hex4_code(c, h);
     h <<= ;
     c = *++str;
     //第三轮
     __parse_hex4_code(c, h);
     h <<= ;
     c = *++str;
     //第四轮
     __parse_hex4_code(c, h);

     return h;
 }

 // 分析字符串的子函数,
 static const char* __parse_string(cjson_t item, const char* str)
 {
     static unsigned char __marks[] = { 0x00, 0x00, 0xC0, 0xE0, 0xF0, 0xF8, 0xFC };
     const char *ptr;
     char *nptr, *out;
     int len;
     char c;
     unsigned uc, nuc;

     if (*str != '\"') { // 检查是否是字符串内容
         SL_WARNING("need \\\" str => %s error!", str);
         return NULL;
     }

     for (ptr = str + , len = ; (c = *ptr++) != '\"' && c; ++len)
         if (c == '\\') //跳过转义字符
             ++ptr;
     if (!(out = malloc(len + ))) {
         SL_FATAL("malloc %d size error!", len + );
         return NULL;
     }
     // 这里复制拷贝内容
     for (ptr = str + , nptr = out; (c = *ptr) != '\"' && c; ++ptr) {
         if (c != '\\') {
             *nptr++ = c;
             continue;
         }
         // 处理转义字符
         switch ((c = *++ptr)) {
         case 'b': *nptr++ = '\b'; break;
         case 'f': *nptr++ = '\f'; break;
         case 'n': *nptr++ = '\n'; break;
         case 'r': *nptr++ = '\r'; break;
         case 't': *nptr++ = '\t'; break;
         case 'u': // 将utf16 => utf8, 专门的utf处理代码
             uc = __parse_hex4(ptr + );
             ptr += ;//跳过后面四个字符, unicode
             if ((uc >= 0xDC00 && uc <= 0xDFFF) || uc == )    break;    /* check for invalid.    */

             if (uc >= 0xD800 && uc <= 0xDBFF)    /* UTF16 surrogate pairs.    */
             {
                 if (ptr[] != '\\' || ptr[] != 'u')
                     break;    /* missing second-half of surrogate.    */
                 nuc = __parse_hex4(ptr + );
                 ptr += ;
                 if (nuc < 0xDC00 || nuc>0xDFFF)
                     break;    /* invalid second-half of surrogate.    */
                 uc = 0x10000 + (((uc & 0x3FF) << ) | (nuc & 0x3FF));
             }

             len = ;
             if (uc < 0x80)
                 len = ;
             else if (uc < 0x800)
                 len = ;
             else if (uc < 0x10000)
                 len = ;
             nptr += len;

             switch (len) {
             case : *--nptr = ((uc | 0x80) & 0xBF); uc >>= ;
             case : *--nptr = ((uc | 0x80) & 0xBF); uc >>= ;
             case : *--nptr = ((uc | 0x80) & 0xBF); uc >>= ;
             case : *--nptr = (uc | __marks[len]);
             }
             nptr += len;
             break;
         default: *nptr++ = c;
         }
     }

     *nptr = '\0';
     if (c == '\"')
         ++ptr;
     item->vs = out;
     item->type = _CJSON_STRING;
     return ptr;
 }

 // 分析数值的子函数,写的可以
 static const char* __parse_number(cjson_t item, const char* str)
 {
     double n = 0.0, ns = 1.0, nd = 0.0; //n把偶才能值, ns表示开始正负, 负为-1, nd 表示小数后面位数
     int e = , es = ; //e表示后面指数, es表示 指数的正负,负为-1
     char c;

     if ((c = *str) == '-' || c == '+') {
         ns = c == '-' ? -1.0 : 1.0; //正负号检测, 1表示负数
         ++str;
     }
     //处理整数部分
     for (c = *str; c >= '' && c <= ''; c = *++str)
         n = n *  + c - '';
     if (c == '.')
         for (; (c = *++str) >= '' && c <= ''; --nd)
             n = n *  + c - '';

     // 处理科学计数法
     if (c == 'e' || c == 'E') {
         if ((c = *++str) == '+') //处理指数部分
             ++str;
         else if (c == '-')
             es = -, ++str;
         for (; (c = *str) >= '' && c <= ''; ++str)
             e = e *  + c - '';
     }

     //返回最终结果 number = +/- number.fraction * 10^+/- exponent
     n = ns * n * pow(10.0, nd + es * e);
     item->vd = n;
     item->type = _CJSON_NUMBER;
     return str;
 }

 // 跳过不需要处理的字符
 static const char* __skip(const char* in)
 {
     if (in && *in && *in <= ) {
         unsigned char c;
         while ((c = *++in) && c <= )
             ;
     }
     return in;
 }

 // 递归下降分析 需要声明这些函数
 static const char* __parse_array(cjson_t item, const char* str);
 static const char* __parse_object(cjson_t item, const char* str);
 static const char* __parse_value(cjson_t item, const char* value);

 // 分析数组的子函数, 采用递归下降分析
 static const char* __parse_array(cjson_t item, const char* str)
 {
     cjson_t child;
     if (*str != '[') {
         SL_WARNING("array str error start: %s.", str);
         return NULL;
     }

     item->type = _CJSON_ARRAY;
     str = __skip(str + );
     if (*str == ']') // 低估提前结束
         return str + ;

     item->child = child = __cjson_new();
     str = __skip(__parse_value(child, str));
     if (!str) {//解析失败 直接返回
         SL_WARNING("array str error e n d one: %s.", str);
         return NULL;
     }
     while (*str == ',') {
         cjson_t nitem = __cjson_new();
         child->next = nitem;
         nitem->prev = child;
         child = nitem;
         str = __skip(__parse_value(child, __skip(str + )));
         if (!str) {// 写代码是一件很爽的事
             SL_WARNING("array str error e n d two: %s.", str);
             return NULL;
         }
     }

     if (*str != ']') {
         SL_WARNING("array str error e n d: %s.", str);
         return NULL;
     }
     return str + ; // 跳过']'
 }

 // 分析对象的子函数
 static const char* __parse_object(cjson_t item, const char* str)
 {
     cjson_t child;
     if (*str != '{') {
         SL_WARNING("object str error start: %s.", str);
         return NULL;
     }

     item->type = _CJSON_OBJECT;
     str = __skip(str + );
     if (*str == '}')
         return str + ;

     //处理结点, 开始读取一个 key
     item->child = child = __cjson_new();
     str = __skip(__parse_string(child, str));
     if (!str || *str != ':') {
         SL_WARNING("__skip __parse_string is error : %s!", str);
         return NULL;
     }
     child->key = child->vs;
     child->vs = NULL;

     str = __skip(__parse_value(child, __skip(str + )));
     if (!str) {
         SL_WARNING("__skip __parse_string is error 2!");
         return NULL;
     }

     // 递归解析
     while (*str == ',') {
         cjson_t nitem = __cjson_new();
         child->next = nitem;
         nitem->prev = child;
         child = nitem;
         str = __skip(__parse_string(child, __skip(str + )));
         if (!str || *str != ':'){
             SL_WARNING("__parse_string need name or no equal ':' %s.", str);
             return NULL;
         }
         child->key = child->vs;
         child->vs = NULL;

         str = __skip(__parse_value(child, __skip(str+)));
         if (!str) {
             SL_WARNING("__parse_string need item two ':' %s.", str);
             return NULL;
         }
     }

     if (*str != '}') {
         SL_WARNING("object str error e n d: %s.", str);
         return NULL;
     }
     return str + ;
 }

 // 将value 转换塞入 item json值中一部分
 static const char* __parse_value(cjson_t item, const char* value)
 {
     char c;
     if ((value) && (c = *value)) {
         switch (c) {
             // n = null, f = false, t = true
         case 'n' : return item->type = _CJSON_NULL, value + ;
         case 'f' : return item->type = _CJSON_FALSE, value + ;
         case 't' : return item->type = _CJSON_TRUE, item->vd = 1.0, value + ;
         case '\"': return __parse_string(item, value);
         case '' : case '': case '': case '': case '': case '': case '': case '': case '': case '':
         case '+' : case '-': return __parse_number(item, value);
         case '[' : return __parse_array(item, value);
         case '{' : return __parse_object(item, value);
         }
     }
     // 循环到这里是意外 数据
     SL_WARNING("params value = %s!", value);
     return NULL;
 }

 /*
 * 对json字符串解析返回解析后的结果
 * jstr        : 待解析的字符串
 *            : 返回解析好的字符串内容
 */
 cjson_t
 cjson_parse(const char* jstr)
 {
     cjson_t c = __cjson_new();
     const char* end;

     if (!(end = __parse_value(c, __skip(jstr)))) {
         SL_WARNING("__parse_value params end = %s!", end);
         cjson_delete(&c);
         return NULL;
     }

     //这里是否检测 返回测试数据
     return c;
 }

 /*
 * 根据 item当前结点的 next 一直寻找到 NULL, 返回个数
 *推荐是数组使用
 * array    : 待处理的cjson_t数组对象
 *            : 返回这个数组中长度
 */
 int
 cjson_getlen(cjson_t array)
 {
     int len = ;
     if (array)
         for (array = array->child; array; array = array->next)
             ++len;

     return len;
 }

 /*
 * 根据索引得到这个数组中对象
 * array    : 数组对象
 * idx        : 查找的索引 必须 [0,cjson_getlen(array)) 范围内
 *            : 返回查找到的当前对象
 */
 cjson_t
 cjson_getarray(cjson_t array, int idx)
 {
     cjson_t c;
     DEBUG_CODE({
         if (!array || idx < ) {
             SL_FATAL("array:%p, idx=%d params is error!", array, idx);
             return NULL;
         }
     });

     for (c = array->child; c&&idx > ; c = c->next)
         --idx;

     return c;
 }

 /*
 * 根据key得到这个对象 相应位置的值
 * object    : 待处理对象中值
 * key        : 寻找的key
 *            : 返回 查找 cjson_t 对象
 */
 cjson_t
 cjson_getobject(cjson_t object, const char* key)
 {
     cjson_t c;
     DEBUG_CODE({
         if (!object || !key || !*key) {
             SL_FATAL("object:%p, key=%s params is error!", object, key);
             return NULL;
         }
     });

     for (c = object->child; c && str_icmp(key, c->key); c = c->next)
         ;

     return c;
 }

 // --------------------------------- 下面是 cjson 输出部分的处理代码 -----------------------------------------

 // 2^n>=x , n是最小的整数
 static int __pow2gt(int x)
 {
     --x;
     x |= x >> ;
     x |= x >> ;
     x |= x >> ;
     x |= x >> ;
     x |= x >> ;
     return x + ;
 }

 /*
  *     这里使用 tstring 结构 size 这里表示 字符串总大小,没有变化
  * len 表示当前字符串的字符串起始偏移量 即 tstring->str + tstring->len 起始的
  */
 static char* __ensure(tstring p, int need)
 {
     char* nbuf;
     int nsize;
     if (!p || !p->str) {
         SL_FATAL("p:%p need:%p is error!", p, need);
         return NULL;
     }
     need += p->len;
     if (need <= p->size) //内存够用直接返回结果
         return p->str + p->len;
     nsize = __pow2gt(need);
     if ((nbuf = malloc(nsize*sizeof(char))) == NULL) {
         free(p->str);
         p->size = p->len = ;
         p->str = NULL;
         SL_FATAL("malloc nsize = %d error!", nsize);
         return NULL;
     }
     //这里复制内容
     memcpy(nbuf, p->str, p->size);
     free(p->str);
     p->size = nsize;
     p->str = nbuf;
     return nbuf + p->len;
 }

 // 这里更新一下 当前字符串, 返回当前字符串的长度
 inline static int __update(tstring p)
 {
     return (!p || !p->str) ?  : p->len + strlen(p->str+p->len);
 }

 // 将item 中值转换成字符串 保存到p中
 static char* __print_number(cjson_t item, tstring p)
 {
     char* str = NULL;
     double d = item->vd;
     int i = (int)d;

     if (d == ) {  //普通0
         str = __ensure(p, );
         if (str)
             str[] = '', str[] = '\0';
     }
     else if ((fabs(d - i)) <= DBL_EPSILON && d <= INT_MAX && d >= INT_MIN) {
         str = __ensure(p, ); //int 值
         if (str)
             sprintf(str, "%d", i);
     }
     else {
         str = __ensure(p, ); //double值
         if (str) {
             double nd = fabs(d); //得到正值开始比较
             if(fabs(floor(d) - d) <= DBL_EPSILON && nd < 1.0e60)
                 sprintf(str, "%.0f", d);
             else if(nd < 1.0e-6 || nd > 1.0e9) //科学计数法
                 sprintf(str, "%e", d);
             else
                 sprintf(str, "%f", d);

         }
     }

     return str;
 }

 // 输出字符串内容
 static char* __print_string(char* str, tstring p)
 {
     const char* ptr;
     char *nptr, *out;
     int len = , flag = ;
     unsigned char c;

     if (!str || !*str) { //最特殊情况,什么都没有 返回NULL
         out = __ensure(p, );
         if (!out)
             return NULL;
         out[] = '\"', out[] = '\"', out[] = '\0';
         return out;
     }

     for (ptr = str; (c=*ptr); ++ptr)
         flag |= ((c >  && c < ) || c == '\"' || c == '\\');

     if (!flag) {  //没有特殊字符直接处理结果
         len = ptr - str;
         out = __ensure(p,len + );
         if (!out)
             return NULL;
         nptr = out;
         *nptr++ = '\"';
         strcpy(nptr, str);
         nptr[len] = '\"';
         nptr[len + ] = '\0';
         return out;
     }

     //处理 存在 "和转义字符内容
     for (ptr = str; (c = *ptr) && ++len; ++ptr) {
         if (strchr("\"\\\b\f\n\r\t", c))
             ++len;
         else if (c < ) //隐藏字符的处理, 这里可以改
             len += ;
     }

     if ((out = __ensure(p, len + )) == NULL)
         return NULL;
     //先添加 \"
     nptr = out;
     *nptr++ = '\"';
     for (ptr = str; (c = *ptr); ++ptr) {
         if (c >  && c != '\"' && c != '\\') {
             *nptr++ = c;
             continue;
         }
         *nptr++ = '\\';
         switch (c){
         case '\\':    *nptr++ = '\\';    break;
         case '\"':    *nptr++ = '\"';    break;
         case '\b':    *nptr++ = 'b';    break;
         case '\f':    *nptr++ = 'f';    break;
         case '\n':    *nptr++ = 'n';    break;
         case '\r':    *nptr++ = 'r';    break;
         case '\t':    *nptr++ = 't';    break;
         default: sprintf(nptr, "u%04x", c);nptr += ;    /* 不可见字符 采用 4字节字符编码 */
         }
     }
     *nptr++ = '\"';
     *nptr = '\0';
     return out;
 }

 //这里是 递归下降 的函数声明处, 分别是处理值, 数组, object
 static char* __print_value(cjson_t item, tstring p);
 static char* __print_array(cjson_t item, tstring p);
 static char* __print_object(cjson_t item, tstring p);

 // 定义实现部分, 内部私有函数 认为 item 和 p都是存在的
 static char* __print_value(cjson_t item, tstring p)
 {
     char* out = NULL;
     switch ((item->type) & UCHAR_MAX) { // 0xff
     case _CJSON_FALSE: if ((out = __ensure(p, ))) strcpy(out, "false"); break;
     case _CJSON_TRUE: if ((out = __ensure(p, ))) strcpy(out, "true"); break;
     case _CJSON_NULL: if ((out = __ensure(p, ))) strcpy(out, "null"); break;
     case _CJSON_NUMBER:    out = __print_number(item, p); break;
     case _CJSON_STRING:    out = __print_string(item->vs, p); break;
     case _CJSON_ARRAY:    out = __print_array(item, p); break;
     case _CJSON_OBJECT:    out = __print_object(item, p); break;
     }

     return out;
 }

 // 同样 假定 item 和 p都是存在且不为NULL
 static char* __print_array(cjson_t item, tstring p)
 {
     char* ptr;
     cjson_t child = item->child;
     int ncut, i;
     // 得到孩子结点的深度
     for (ncut = ; (child); child = child->child)
         ++ncut;
     if (!ncut) { //没有孩子结点 直接空数组返回结果
         char* out = NULL;
         if (!(out = __ensure(p, )))
             strcpy(out, "[]");
         return out;
     }

     i = p->len;
     if (!(ptr = __ensure(p, )))
         return NULL;
     *ptr = '[';
     ++p->len;
     for (child = item->child; (child); child = child->next) {
         __print_value(child, p);
         p->len = __update(p);
         if (child->next) {
             if (!(ptr = __ensure(p, )))
                 return NULL;
             *ptr++ = ',';
             *ptr = '\0';
             p->len += ;
         }
     }
     if (!(ptr = __ensure(p, )))
         return NULL;
     *ptr++ = ']';
     *ptr = '\0';
     return p->str + i;

 }

 // 同样 假定 item 和 p都是存在且不为NULL, 相信这些代码是安全的
 static char* __print_object(cjson_t item, tstring p)
 {
     char* ptr;
     int i, ncut, len;
     cjson_t child = item->child;

     // 得到孩子结点的深度
     for (ncut = ; child; child = child->child)
         ++ncut;
     if (!ncut) {
         char* out = NULL;
         if (!(out = __ensure(p, )))
             strcpy(out, "{}");
         return out;
     }

     i = p->len;
     if (!(ptr = __ensure(p, )))
         return NULL;
     *ptr++ = '{';
     *ptr -= '\0';
     p->len += ;
     // 根据子结点 处理
     for (child = item->child; (child); child = child->next) {
         __print_string(child->key, p);
         p->len = __update(p);

         //加入一个冒号
         if (!(ptr = __ensure(p, )))
             return NULL;
         *ptr++ = ':';
         p->len += ;

         //继续打印一个值
         __print_value(child, p);
         p->len = __update(p);

         //结算最后内容
         len = child->next ?  : ;
         if ((ptr = __ensure(p, len + )) == NULL)
             return NULL;
         if (child->next)
             *ptr++ = ',';
         *ptr = '\0';
         p->len += len;
     }
     if (!(ptr = __ensure(p, )))
         return NULL;
     *ptr++ = '}';
     *ptr = '\0';
     return p->str + i;
 }

 #define _INT_CJONSTR    (256)
 /*
 *  这里是将 cjson_t item 转换成字符串内容,需要自己free
 * item        : cjson的具体结点
 *            : 返回生成的item的json串内容
 */
 char*
 cjson_print(cjson_t item)
 {
     struct tstring p;
     char* out;
     if ((!item) || !(p.str = malloc(sizeof(char)*_INT_CJONSTR))) {
         SL_FATAL("item:%p, p.str = malloc is error!", item);
         return NULL;
     }
     p.size = _INT_CJONSTR;
     p.len = ;

     out = __print_value(item, &p); //从值处理开始, 返回最终结果
     if (out == NULL) {
         free(p.str);
         SL_FATAL("__print_value item:%p, p:%p is error!", item, &p);
         return NULL;
     }
     return realloc(out,strlen(out) + ); // 体积变小 realloc返回一定成功
 }

 // --------------------------------- 下面是 cjson 输出部分的辅助代码 -----------------------------------------

到这里基本前期主场都完了. 后面就是玩测试了.

4. 展示 cjson 测试部分

首先展示 test_cjson_write.c 测试脚本

#include <schead.h>
#include <sclog.h>
#include <cjson.h>

// 测试 cjson 函数
int main(int argc, char* argv[])
{
    //注册等待函数
    INIT_PAUSE();

    //启动日志记录功能
    sl_start();

    // 测试json 串
    char jstr[] = "{\n\"name\": \"Jack (\\\"Bee\\\") Nimble\", \n\"format\": {\"type\":[1, 3, 4, 5.66], \n\"height\":     1080, \n\"interlace\":  false}\n}";

    printf("源码串 :\n %s\n", jstr);

    // 先生成 json 对象
    cjson_t root = cjson_parse(jstr);
    if (root == NULL) {
        puts("jstr 解析失败! 程序退出中....");
        exit(EXIT_FAILURE);
    }

    //这里简单测试输出内容
    char* njstr = cjson_print(root);

    if (njstr == NULL) {
        puts("输出内容失败,程序退出中!");
        cjson_delete(&root);
        exit(EXIT_FAILURE);
    }

    //合法范围直接输出 内容
    printf("解析串 :\n %s\n", njstr);

    //解析完需要释放
    free(njstr);

    //解析好 一定要注意释放操作
    cjson_delete(&root);

    //另一个测试 输出内存值
    printf("d = %d\n", strlen("{\"name\":\"Jack (\\\"Bee\\\") Nimble\",\"format\":{\"type\":[1,3,4,5.660000],\"height\":1080,\"interlace\":false}}"));
}

需要大家写一遍或看三遍. 测试结果 如下:

一切正常. 这里输出是可以的. 欢迎大家尝试了.

5.下次来个 cjson 较完整demo

　　下次写好这个cjson库, 我们 测试一个下面 json 文件 实战解析一下

firefighting_rule.json 

{
"firefighting_rule":
 {
  "key1":
   {
    "id":,
    "dungeon_id":,
    "level_contain":[,,,,,,,,,,,,,,],
    "active_time":[[,""],[,""],[,""]],
    "boss_ui_head":"UI_icon/IMG_ShiJieBoss_TouXiang.png",
    "activity_tag_icon":"IMG_GaiBan_HuoDong_ShiJieBoss_TuBiao.png",
    "activity_tag_word":"IMG_GaiBan_ZhuCheng_ShiJieBoss_TuBiao_MingZi.png",
    "activity_pic_json":"UI_HuoDong_ShiJieBoss.json",
    "jinbi_buff_icon":"UI_icon/IMG_WorldBoss_JinbiBuff_Atk.png",
    "jinbi_buff_damage":[[,],[,],[,],[,]],
    "jinbi_buff_price":,
    "jinbi_buff_limit":,
    "free_change":,
    "refresh_price":,
    "change_price":,
    "show_hero_num":
   }
 }
}     

解析成我们想要的那样的东西. 尝试, 追求, 按部就班 , 人生...........................................

后记 

　　错误是难免,欢迎批评指正. 下次会对cjson 进行简单总结, 再添加一些辅助函数. 一切会从简单来.