simplec 开发框架 基于VS2015

#include "sc_json.h" #include <ctype.h> /** 读取json的结构 _flag取值标志如下: 0 表示 有双引号是 是 字符串char* 1 表示 无双引号,开头是'[' 是数组,此时用idx索引 2 表示 无双引号,开头是'{' 是对象 3 表示 无双引号,有小数点 是double 0 表示 无双引号,是null 表示 NULL=_value 4 表示 无双引号,无小数点,为true和false 表示int值 后者为1和0 **/ struct _json_value { LIST_HEAD_NODE; union { _T_const char *name; int idx; }_un_key; _T_const char *_value; int _flag; }; //设置_json_value 数据的数据标志 static void __json_set_flag(struct _json_value *jv, char *value) { char c = *value, *s = value; int flag = 4; if (c == '"') flag = 0; else if (c == '[') flag = 1; else if (c == '{') flag = 2; else { while ((c = *s++) != '\0'&&c != '.')//犯了致命错误 c == *s++ ; if (c == '.') flag = 3; } jv->_value = value; if (flag >= 4) { if (strcmp("null", value) == 0) { jv->_value = NULL; flag = 0; } else if (strcmp("false", value) == 0) { value[0] = '0'; value[1] = '\0'; } else if (strcmp("true", value) == 0) { value[0] = '1'; value[1] = '\0'; } } jv->_flag = flag; } //去掉多余的'"' static void __json_melt(char **pstr) { char *str = *pstr; if (*str != '"') return; *pstr = ++str; //找到最后一个字符 while (*str != '\0') ++str; str[-1] = '\0'; } //创建对象的_json_value值 static struct _json_value* ___json_value_object_new(char *jvstr) { //采用尾查法 struct _json_value *jv = malloc(sizeof(struct _json_value)); if (jv == NULL) { sl_debug("_json_value_object_new malloc 失败!"); return NULL; } jv->_un_key.name = jvstr; //找到':'的后一个字符 char *tmp = jvstr, c; while ((c = *tmp++) != '\0'&&c != ':') ; if (c == '\0') { sl_error("_json_value_object_new 解析[%s] 失败!\n", jvstr); return NULL; } //截取掉':' tmp[-1] = '\0'; __json_set_flag(jv, tmp); __json_melt(&jv->_un_key.name); __json_melt(&jv->_value); return jv; } //通过名称查找的子方法 static int ___json_value_cmp_name(const struct _json_value *jv, const char *name) { return strcmp(jv->_un_key.name, name); } //通过索引查找的子方法 static int ___json_value_cmp_idx(const struct _json_value *jv, const int *pidx) { return jv->_un_key.idx - *pidx; } //创建对象的_json_value值 static struct _json_value* ___json_value_array_new(int idx, char *jvstr) { //采用尾查法 struct _json_value *jv = malloc(sizeof(struct _json_value)); if (jv == NULL) { sl_debug("_json_value_object_new malloc 失败!"); return NULL; } jv->_un_key.idx = idx; __json_set_flag(jv, jvstr); __json_melt(&jv->_value); return jv; } /** json_malloc_readend - 从文件中读取json字符串,跳过多余的空格字符 需要自己释放 #flag_t:错误标志 @path:文件路径 @txt:输出参数,返回输出字符串 **/ flag_t json_malloc_readend(const char *path, _T_out char **txt) { if (path == NULL || txt == NULL) { sl_debug("json_malloc_readend 检测到[path == NULL || txt == NULL]"); return _RF_EP; } //打开文件 FILE *file = fopen(path, "rb"); if (file == NULL) { sl_error("json_malloc_readend 文件[%s]打开失败", path); return _RF_EF; } int size = _INT_JSON_STR_ADD, len = 0; char *str = malloc(sizeof(char)*size); if (str == NULL) { sl_debug("json_malloc_readend malloc失败!"); return _RF_EM; } int c; char istwo = 0; while ((c = fgetc(file)) != EOF) { if (json_isspace(c) && istwo == 0)//跳过无用的空格字符,isspace检测非空字符,返回0 continue; if (c == '"') { if (istwo == 0) istwo = 1; else if (str[len - 1] != '\\') istwo = 0; } str[len++] = c; if (len == size) { size += _INT_JSON_STR_ADD; char *tmp = realloc(str, sizeof(char)*size); if (tmp == NULL) { sl_debug("json_malloc_readend realloc失败!"); free(str);//释放内存,以免内存泄露 return _RF_EM; } str = tmp; } } str[len++] = '\0'; //内存缩小,realloc不会发生异常,并返回结果 *txt = realloc(str, sizeof(char)*len); //关闭文件管道 fclose(file); return _RF_OK; } /** json_str_tight - 去除空字符,在字符串json_str中 #int:返回修改后串的长度 @json_str:从字符串中消除空字符串 **/ int json_str_tight(char *json_str) { if (json_str == NULL) { sl_infos("json_str_tight 检测到[json_str == NULL]"); return 0; } int i = 0, j = -1, c; char istwo = 0;//1 表示双引号开始 while ((c = json_str[++j]) != '\0') { if (json_isspace(c) && istwo == 0)//跳过无用的空格字符,isspace检测非空字符,返回0 continue; if (c == '"') { if (istwo == 0) istwo = 1; else if (json_str[i - 1] != '\\') istwo = 0; } json_str[i++] = c; } json_str[i] = c; //最后返回修改后串的长度 return i; } /** json_malloc_str_tight - 从json_str串中,紧凑的生成一个新串保存在nj_str中 去掉无用空格字符 #flag_t:运行状态,>=0表示成功,并且值为*nj_str串的长度 @json_str:原串 @nj_str:输出指向新串的指针 **/ flag_t json_malloc_str_tight(const char *json_str, _T_out char **nj_str) { if (json_str == NULL || *json_str == '\0' || nj_str == NULL) { sl_debug("json_malloc_str_tight 检测到\ [json_str == NULL || *json_str == '\0' || nj_str == NULL]"); return _RF_EP; } //深拷贝内存 char *str = STR_malloc(json_str); if (str == NULL) { sl_debug("json_malloc_str_tight csv_strcpy malloc执行失败!"); return _RF_EM; } //去掉杂质 int len = json_str_tight(str); //重新分配内存,缩小一下 *nj_str = realloc(str, sizeof(char)*(len + 1)); return len; } /** json_by_object - 获取list_json链表,从json对象串中获取 jstr串必须是malloc的串,必须经过紧凑处理的json_str_tight #list_json:构造失败返回NULL @jstr:原本字符串 **/ alist_t json_by_object(char *jstr) { if (jstr == NULL || *jstr != '{') { sl_debug("json_by_object 检测到[jstr == NULL || *jstr!='{']"); return NULL; } alist_t lj = NULL; //切词添加值 char *s = jstr, *r = s + 1, c; char istwo = 0;//1表示存在 "开始 char dc = 0, isdc = 0;//解决嵌套定义问题 while ((c = *++s) != '\0') { if (c == '"') { if (istwo == 0) istwo = 1; else if (s[-1] != '\\') istwo = 0; continue; } //处理嵌套定义问题 if (c == '[' || c == '{') { if (isdc == 0) { dc = c; ++isdc; } else if (dc == c) ++isdc; continue; } if (c - dc == 2 && isdc > 0) { --isdc; continue; } //处理要添加的结点问题 if ((c == ',' || c == ']') && istwo == 0 && isdc == 0) { *s = '\0'; //中间开始切词 struct _json_value *jv = ___json_value_object_new(r); alist_add(&lj, jv);//hash 确实时候做k,v,链表就是大众化操作 r = s + 1; } } return lj; } /** json_object_str - 从对象链表jol中获取,对应名字name的值 #const char*:返回的常量字符串 @jol:json对象链表 @name:json数据子项中的名字 **/ const char* json_object_str(alist_t jol, const char *name) { if (jol == NULL || name == NULL) { sl_debug("json_object_str 检测到[jol == NULL || name == NULL]"); return NULL; } struct _json_value *jv = alist_find(jol, name, ___json_value_cmp_name); if (jv == NULL) { sl_error("json_object_str alist_find 没有找到[%s]的对象值,或者是无效的数据转换!", name); return NULL; } //找到了返回结果 return jv->_value; } /** json_object_double - 从对象链表jol中获取,对应名字name的值 #double:返回的浮点数 @jol:json对象链表 @name:json数据子项中的名字 **/ double json_object_double(alist_t jol, const char *name) { if (jol == NULL || name == NULL) { sl_debug("json_object_double 检测到[jol == NULL || name == NULL]"); return -1.0; } struct _json_value *jv = alist_find(jol, name, ___json_value_cmp_name); if (jv == NULL || jv->_flag < 3) { sl_error("json_object_double alist_find 没有找到[%s]的对象值,或者是无效的数据转换!", name); return -1.0; } //合法返回结果 return atof(jv->_value); } /** json_object_int - 从对象链表jol中获取,对应名字name的值 #int:返回的浮点数 @jol:json对象�