2 #include "fieldmapper_lookup.h"
4 void _rest_xml_output(growing_buffer*, object*, char*, int, int);
5 char* _escape_xml (char*);
7 char* json_string_to_xml(char* content) {
9 growing_buffer * res_xml;
13 obj = json_parse_string( content );
14 res_xml = buffer_init(1024);
19 buffer_add(res_xml, "<response>");
22 for( i = 0; i!= obj->size; i++ ) {
23 _rest_xml_output(res_xml, obj->get_index(obj,i), NULL, 0,0);
26 _rest_xml_output(res_xml, obj, NULL, 0,0);
29 buffer_add(res_xml, "</response>");
31 output = buffer_data(res_xml);
38 char* _escape_xml (char* text) {
40 growing_buffer* b = buffer_init(256);
41 int len = strlen(text);
43 for (i = 0; i < len; i++) {
45 buffer_add(b,"&");
46 else if (text[i] == '<')
48 else if (text[i] == '>')
51 buffer_add_char(b,text[i]);
58 void _rest_xml_output(growing_buffer* buf, object* obj, char * obj_class, int arr_index, int notag) {
67 if(isFieldmapper(obj_class)) {
68 tag = fm_pton(obj_class,arr_index);
69 } else if(obj_class) {
70 tag = strdup(obj_class);
72 tag = strdup("datum");
76 /* add class hints if we have a class name */
79 buffer_fadd(buf,"<%s><Object class_hint=\\\"%s\\\"/></%s>", tag, obj->classname, tag);
82 buffer_fadd(buf,"<%s><Object class_hint=\\\"%s\\\">", tag, obj->classname);
87 /* now add the data */
90 buffer_fadd(buf, "<%s/>",tag);
91 } else if(obj->is_bool && obj->bool_value) {
93 buffer_add(buf, "true");
95 buffer_fadd(buf, "<%s>true</%s>",tag,tag);
97 } else if(obj->is_bool && ! obj->bool_value) {
99 buffer_add(buf, "false");
101 buffer_fadd(buf, "<%s>false</%s>",tag,tag);
103 } else if (obj->is_string) {
105 char * t = _escape_xml(obj->string_data);
109 char * t = _escape_xml(obj->string_data);
110 buffer_fadd(buf,"<%s>%s</%s>",tag,t,tag);
114 } else if(obj->is_number) {
117 buffer_fadd(buf,"%ld",obj->num_value);
119 buffer_fadd(buf,"<%s>%ld</%s>",tag,obj->num_value,tag);
122 } else if(obj->is_double) {
124 buffer_fadd(buf,"%lf",tag,obj->double_value,tag);
126 buffer_fadd(buf,"<%s>%lf</%s>",tag,obj->double_value,tag);
129 } else if (obj->is_array) {
131 if(!isFieldmapper(obj_class))
132 buffer_add(buf,"<array>");
134 buffer_fadd(buf,"<%s>",tag);
137 for( i = 0; i!= obj->size; i++ ) {
138 _rest_xml_output(buf, obj->get_index(obj,i), obj->classname, i,0);
142 if(!isFieldmapper(obj_class))
143 buffer_add(buf,"</array>");
145 buffer_fadd(buf,"</%s>",tag);
148 } else if (obj->is_hash) {
152 buffer_add(buf,"<hash>");
154 buffer_fadd(buf,"<%s>",tag);
157 object_iterator* itr = new_iterator(obj);
159 while( (tmp = itr->next(itr)) ) {
161 buffer_fadd(buf,"<%s>",tmp->key);
163 buffer_add(buf,"<pair>");
164 buffer_fadd(buf,"<key>%s</key><value>",tmp->key);
167 _rest_xml_output(buf, tmp->item, NULL,0,notag);
170 buffer_fadd(buf,"</%s>",tmp->key);
172 buffer_add(buf,"</value></pair>");
179 buffer_add(buf,"</hash>");
181 buffer_fadd(buf,"</%s>",tag);
187 buffer_fadd(buf,"</Object></%s>",tag);