开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 通讯/手机编程 > TAPI编程 > 查看源码
json_object.cpp
资源名称：PCClientApi.rar　[点击查看]
上传用户：coffee44
上传日期：2018-10-23
资源大小：12304k
文件大小：13k
源码类别：

TAPI编程

开发平台：

Visual C++

json_object.cpp：源码内容
  1. /*  * $Id: json_object.c,v 1.17 2006/07/25 03:24:50 mclark Exp $  *  * Copyright (c) 2004, 2005 Metaparadigm Pte. Ltd.  * Michael Clark <michael@metaparadigm.com>  *  * This library is free software; you can redistribute it and/or modify  * it under the terms of the MIT license. See COPYING for details.  *  */ #include "config.h" #include <stdio.h> #include <stdlib.h> #include <stddef.h> #include <string.h> #include "debug.h" #include "printbuf.h" #include "linkhash.h" #include "arraylist.h" #include "json_object.h" #include "json_object_private.h" #include "json_tokener.h" #if !HAVE_STRNDUP   char* strndup(const char* str, size_t n); #endif /* !HAVE_STRNDUP */ #define REFCOUNT_DEBUG 1 char *json_number_chars = "0123456789.+-eE"; char *json_hex_chars = "0123456789abcdef"; #ifdef REFCOUNT_DEBUG static char* json_type_name[] = {   "null",   "boolean",   "double",   "int",   "object",   "array",   "string", }; #endif /* REFCOUNT_DEBUG */ static void json_object_generic_delete(struct json_object* this_obj); static struct json_object* json_object_new(enum json_type o_type); /* ref count debugging */
  2. #ifndef __attribute__
  3. #define __attribute__ ()
  4. #endif 
  6. #ifdef REFCOUNT_DEBUG static struct lh_table *json_object_table; // static void json_object_init(void) __attribute__ ((constructor)); void json_object_init(void) {   MC_DEBUG("json_object_init: creating object tablen");   json_object_table = lh_kptr_table_new(128, "json_object_table", NULL); } // static void json_object_fini(void) __attribute__ ((destructor)); void json_object_fini(void) {   struct lh_entry *ent;   if(MC_GET_DEBUG()) {     if (json_object_table->count) {       MC_DEBUG("json_object_fini: %d referenced objects at exitn",           json_object_table->count);       lh_foreach(json_object_table, ent) {         struct json_object* obj = (struct json_object*)ent->v;         MC_DEBUG("t%s:%pn", json_type_name[obj->o_type], obj);       }     }   }   MC_DEBUG("json_object_fini: freeing object tablen");   lh_table_free(json_object_table); } #endif /* REFCOUNT_DEBUG */ /* string escaping */ static int json_escape_str(struct printbuf *pb, char *str) {   int pos = 0, start_offset = 0;   unsigned char c;   do {     c = str[pos];     switch(c) {     case '':       break;     case 'b':     case 'n':     case 'r':     case 't':     case '"':     case '\':     case '/':       if(pos - start_offset > 0) printbuf_memappend(pb, str + start_offset, pos - start_offset);       if(c == 'b') printbuf_memappend(pb, "\b", 2);       else if(c == 'n') printbuf_memappend(pb, "\n", 2);       else if(c == 'r') printbuf_memappend(pb, "\r", 2);       else if(c == 't') printbuf_memappend(pb, "\t", 2);       else if(c == '"') printbuf_memappend(pb, "\"", 2);       else if(c == '\') printbuf_memappend(pb, "\\", 2);       else if(c == '/') printbuf_memappend(pb, "\/", 2);       start_offset = ++pos;       break;     default:       if(c < ' ') { if(pos - start_offset > 0)   printbuf_memappend(pb, str + start_offset, pos - start_offset); sprintbuf(pb, "\u00%c%c",   json_hex_chars[c >> 4],   json_hex_chars[c & 0xf]); start_offset = ++pos;       } else pos++;     }   } while(c);   if(pos - start_offset > 0)     printbuf_memappend(pb, str + start_offset, pos - start_offset);   return 0; } /* reference counting */ extern struct json_object* json_object_get(struct json_object *this_obj) {   if(this_obj) {     this_obj->_ref_count++;   }   return this_obj; } extern void json_object_put(struct json_object *this_obj) {   if(this_obj) {     this_obj->_ref_count--;     if(!this_obj->_ref_count) this_obj->_delete(this_obj);   } } /* generic object construction and destruction parts */ static void json_object_generic_delete(struct json_object* this_obj) { #ifdef REFCOUNT_DEBUG   MC_DEBUG("json_object_delete_%s: %pn",    json_type_name[this_obj->o_type], this_obj);   lh_table_delete(json_object_table, this_obj); #endif /* REFCOUNT_DEBUG */   printbuf_free(this_obj->_pb);   free(this_obj); } static struct json_object* json_object_new(enum json_type o_type) {   struct json_object *this_obj = (struct json_object *)calloc(sizeof(struct json_object), 1);   if(!this_obj) return NULL;   this_obj->o_type = o_type;   this_obj->_ref_count = 1;   this_obj->_delete = &json_object_generic_delete; #ifdef REFCOUNT_DEBUG
  7.   if (NULL == json_object_table)
  8.   {
  9. json_object_init();
  10.   }   lh_table_insert(json_object_table, this_obj, this_obj);   MC_DEBUG("json_object_new_%s: %pn", json_type_name[this_obj->o_type], this_obj); #endif /* REFCOUNT_DEBUG */   return this_obj; } /* type checking functions */ int json_object_is_type(struct json_object *this_obj, enum json_type type) {   return (this_obj->o_type == type); } enum json_type json_object_get_type(struct json_object *this_obj) {   return this_obj->o_type; } /* json_object_to_json_string */ char* json_object_to_json_string(struct json_object *this_obj) {   if(!this_obj) return "null";   if(!this_obj->_pb) {     if(!(this_obj->_pb = printbuf_new())) return NULL;   } else {     printbuf_reset(this_obj->_pb);   }   if(this_obj->_to_json_string(this_obj, this_obj->_pb) < 0) return NULL;   return this_obj->_pb->buf; } /* json_object_object */ static int json_object_object_to_json_string(struct json_object* this_obj,      struct printbuf *pb) {   int i=0;   struct json_object_iter iter;   sprintbuf(pb, "{");   /* CAW: scope operator to make ANSI correctness */   /* CAW: switched to json_object_object_foreachC which uses an iterator struct */ json_object_object_foreachC(this_obj, iter) { if(i) sprintbuf(pb, ","); sprintbuf(pb, " ""); json_escape_str(pb, iter.key); sprintbuf(pb, "": "); if(iter.val == NULL) sprintbuf(pb, "null"); else iter.val->_to_json_string(iter.val, pb); i++; }   return sprintbuf(pb, " }"); } static void json_object_lh_entry_free(struct lh_entry *ent) {   free(ent->k);   json_object_put((struct json_object*)ent->v); } static void json_object_object_delete(struct json_object* this_obj) {   lh_table_free(this_obj->o.c_object);   json_object_generic_delete(this_obj); } struct json_object* json_object_new_object() {   struct json_object *this_obj = json_object_new(json_type_object);   if(!this_obj) return NULL;   this_obj->_delete = &json_object_object_delete;   this_obj->_to_json_string = &json_object_object_to_json_string;   this_obj->o.c_object = lh_kchar_table_new(JSON_OBJECT_DEF_HASH_ENTIRES, NULL, &json_object_lh_entry_free);   return this_obj; } struct lh_table* json_object_get_object(struct json_object *this_obj) {   if(!this_obj) return NULL;   switch(this_obj->o_type) {   case json_type_object:     return this_obj->o.c_object;   default:     return NULL;   } } void json_object_object_add(struct json_object* this_obj, char *key,     struct json_object *val) {   lh_table_delete(this_obj->o.c_object, key);   lh_table_insert(this_obj->o.c_object, strdup(key), val); } struct json_object* json_object_object_get(struct json_object* this_obj, char *key) {   return (struct json_object*) lh_table_lookup(this_obj->o.c_object, key); } void json_object_object_del(struct json_object* this_obj, char *key) {   lh_table_delete(this_obj->o.c_object, key); } /* json_object_boolean */ static int json_object_boolean_to_json_string(struct json_object* this_obj,       struct printbuf *pb) {   if(this_obj->o.c_boolean) return sprintbuf(pb, "true");   else return sprintbuf(pb, "false"); } struct json_object* json_object_new_boolean(JBOOLEAN b) {   struct json_object *this_obj = json_object_new(json_type_boolean);   if(!this_obj) return NULL;   this_obj->_to_json_string = &json_object_boolean_to_json_string;   this_obj->o.c_boolean = b;   return this_obj; } JBOOLEAN json_object_get_boolean(struct json_object *this_obj) {   if(!this_obj) return FALSE;   switch(this_obj->o_type) {   case json_type_boolean:     return this_obj->o.c_boolean;   case json_type_int:     return (this_obj->o.c_int != 0);   case json_type_double:     return (this_obj->o.c_double != 0);   case json_type_string:     if(strlen(this_obj->o.c_string)) return TRUE;   default:     return TRUE;   } } /* json_object_int */ static int json_object_int_to_json_string(struct json_object* this_obj,   struct printbuf *pb) {   return sprintbuf(pb, "%d", this_obj->o.c_int); } struct json_object* json_object_new_int(int i) {   struct json_object *this_obj = json_object_new(json_type_int);   if(!this_obj) return NULL;   this_obj->_to_json_string = &json_object_int_to_json_string;   this_obj->o.c_int = i;   return this_obj; } int json_object_get_int(struct json_object *this_obj) {   int cint;   if(!this_obj) return 0;   switch(this_obj->o_type) {   case json_type_int:     return this_obj->o.c_int;   case json_type_double:     return (int)this_obj->o.c_double;   case json_type_boolean:     return this_obj->o.c_boolean;   case json_type_string:     if(sscanf(this_obj->o.c_string, "%d", &cint) == 1) return cint;   default:     return 0;   } } /* json_object_double */ static int json_object_double_to_json_string(struct json_object* this_obj,      struct printbuf *pb) {   return sprintbuf(pb, "%lf", this_obj->o.c_double); } struct json_object* json_object_new_double(double d) {   struct json_object *this_obj = json_object_new(json_type_double);   if(!this_obj) return NULL;   this_obj->_to_json_string = &json_object_double_to_json_string;   this_obj->o.c_double = d;   return this_obj; } double json_object_get_double(struct json_object *this_obj) {   double cdouble;   if(!this_obj) return 0.0;   switch(this_obj->o_type) {   case json_type_double:     return this_obj->o.c_double;   case json_type_int:     return this_obj->o.c_int;   case json_type_boolean:     return this_obj->o.c_boolean;   case json_type_string:     if(sscanf(this_obj->o.c_string, "%lf", &cdouble) == 1) return cdouble;   default:     return 0.0;   } } /* json_object_string */ static int json_object_string_to_json_string(struct json_object* this_obj,      struct printbuf *pb) {   sprintbuf(pb, """);   json_escape_str(pb, this_obj->o.c_string);   sprintbuf(pb, """);   return 0; } static void json_object_string_delete(struct json_object* this_obj) {   free(this_obj->o.c_string);   json_object_generic_delete(this_obj); } struct json_object* json_object_new_string(char *s) {   struct json_object *this_obj = json_object_new(json_type_string);   if(!this_obj) return NULL;   this_obj->_delete = &json_object_string_delete;   this_obj->_to_json_string = &json_object_string_to_json_string;   this_obj->o.c_string = strdup(s);   return this_obj; } struct json_object* json_object_new_string_len(char *s, int len) {   struct json_object *this_obj = json_object_new(json_type_string);   if(!this_obj) return NULL;   this_obj->_delete = &json_object_string_delete;   this_obj->_to_json_string = &json_object_string_to_json_string;   this_obj->o.c_string = strndup(s, len);   return this_obj; } char* json_object_get_string(struct json_object *this_obj) {   if(!this_obj) return NULL;   switch(this_obj->o_type) {   case json_type_string:     return this_obj->o.c_string;   default:     return json_object_to_json_string(this_obj);   } } /* json_object_array */ static int json_object_array_to_json_string(struct json_object* this_obj,     struct printbuf *pb) {   int i;   sprintbuf(pb, "[");   for(i=0; i < json_object_array_length(this_obj); i++) {   struct json_object *val;   if(i) { sprintbuf(pb, ", "); }   else { sprintbuf(pb, " "); }       val = json_object_array_get_idx(this_obj, i);   if(val == NULL) { sprintbuf(pb, "null"); }   else { val->_to_json_string(val, pb); }   }   return sprintbuf(pb, " ]"); } static void json_object_array_entry_free(void *data) {   json_object_put((struct json_object*)data); } static void json_object_array_delete(struct json_object* this_obj) {   array_list_free(this_obj->o.c_array);   json_object_generic_delete(this_obj); } struct json_object* json_object_new_array() {   struct json_object *this_obj = json_object_new(json_type_array);   if(!this_obj) return NULL;   this_obj->_delete = &json_object_array_delete;   this_obj->_to_json_string = &json_object_array_to_json_string;   this_obj->o.c_array = array_list_new(&json_object_array_entry_free);   return this_obj; } struct array_list* json_object_get_array(struct json_object *this_obj) {   if(!this_obj) return NULL;   switch(this_obj->o_type) {   case json_type_array:     return this_obj->o.c_array;   default:     return NULL;   } } int json_object_array_length(struct json_object *this_obj) {   return array_list_length(this_obj->o.c_array); } int json_object_array_add(struct json_object *this_obj,struct json_object *val) {   return array_list_add(this_obj->o.c_array, val); } int json_object_array_put_idx(struct json_object *this_obj, int idx,       struct json_object *val) {   return array_list_put_idx(this_obj->o.c_array, idx, val); } struct json_object* json_object_array_get_idx(struct json_object *this_obj,       int idx) {   return (struct json_object*)array_list_get_idx(this_obj->o.c_array, idx); }