1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266
|
/*
* JSON output formatting functions.
*
* No copyright is claimed. This code is in the public domain; do with
* it what you wish.
*
* Written by Karel Zak <kzak@redhat.com>
*/
#include <stdio.h>
#include <inttypes.h>
#include <ctype.h>
#include <cctype.h>
#include "c.h"
#include "jsonwrt.h"
/*
* Requirements enumerated via testing (V8, Firefox, IE11):
*
* var charsToEscape = [];
* for (var i = 0; i < 65535; i += 1) {
* try {
* JSON.parse('{"sample": "' + String.fromCodePoint(i) + '"}');
* } catch (e) {
* charsToEscape.push(i);
* }
* }
*/
static void fputs_quoted_case_json(const char *data, FILE *out, int dir, size_t size)
{
const char *p;
fputc('"', out);
for (p = data; p && *p && (!size || p < data + size); p++) {
const unsigned int c = (unsigned int) *p;
/* From http://www.json.org
*
* The double-quote and backslashes would break out a string or
* init an escape sequence if not escaped.
*
* Note that single-quotes and forward slashes, while they're
* in the JSON spec, don't break double-quoted strings.
*/
if (c == '"' || c == '\\') {
fputc('\\', out);
fputc(c, out);
continue;
}
/* All non-control characters OK; do the case swap as required. */
if (c >= 0x20) {
/*
* Don't use locale sensitive ctype.h functions for regular
* ASCII chars, because for example with Turkish locale
* (aka LANG=tr_TR.UTF-8) toupper('I') returns 'I'.
*/
if (c <= 127)
fputc(dir == 1 ? c_toupper(c) :
dir == -1 ? c_tolower(c) : *p, out);
else
fputc(dir == 1 ? toupper(c) :
dir == -1 ? tolower(c) : *p, out);
continue;
}
/* In addition, all chars under ' ' break Node's/V8/Chrome's, and
* Firefox's JSON.parse function
*/
switch (c) {
/* Handle short-hand cases to reduce output size. C
* has most of the same stuff here, so if there's an
* "Escape for C" function somewhere in the STL, we
* should probably be using it.
*/
case '\b':
fputs("\\b", out);
break;
case '\t':
fputs("\\t", out);
break;
case '\n':
fputs("\\n", out);
break;
case '\f':
fputs("\\f", out);
break;
case '\r':
fputs("\\r", out);
break;
default:
/* Other assorted control characters */
fprintf(out, "\\u00%02x", c);
break;
}
}
fputc('"', out);
}
#define fputs_quoted_json(_d, _o) fputs_quoted_case_json(_d, _o, 0, 0)
#define fputs_quoted_json_upper(_d, _o) fputs_quoted_case_json(_d, _o, 1, 0)
#define fputs_quoted_json_lower(_d, _o) fputs_quoted_case_json(_d, _o, -1, 0)
void ul_jsonwrt_init(struct ul_jsonwrt *fmt, FILE *out, int indent)
{
fmt->out = out;
fmt->indent = indent;
fmt->after_close = 0;
}
int ul_jsonwrt_is_ready(struct ul_jsonwrt *fmt)
{
return fmt->out == NULL ? 0 : 1;
}
void ul_jsonwrt_indent(struct ul_jsonwrt *fmt)
{
int i;
for (i = 0; i < fmt->indent; i++)
fputs(" ", fmt->out);
}
static void print_name(struct ul_jsonwrt *fmt, const char *name)
{
if (name) {
if (fmt->after_close)
fputs(",\n", fmt->out);
ul_jsonwrt_indent(fmt);
fputs_quoted_json_lower(name, fmt->out);
} else {
if (fmt->after_close)
fputs(",", fmt->out);
else
ul_jsonwrt_indent(fmt);
}
}
void ul_jsonwrt_open(struct ul_jsonwrt *fmt, const char *name, int type)
{
print_name(fmt, name);
switch (type) {
case UL_JSON_OBJECT:
fputs(name ? ": {\n" : "{\n", fmt->out);
fmt->indent++;
break;
case UL_JSON_ARRAY:
fputs(name ? ": [\n" : "[\n", fmt->out);
fmt->indent++;
break;
case UL_JSON_VALUE:
fputs(name ? ": " : " ", fmt->out);
break;
}
fmt->after_close = 0;
}
void ul_jsonwrt_empty(struct ul_jsonwrt *fmt, const char *name, int type)
{
print_name(fmt, name);
switch (type) {
case UL_JSON_OBJECT:
fputs(name ? ": {}" : "{}", fmt->out);
break;
case UL_JSON_ARRAY:
fputs(name ? ": []" : "[]", fmt->out);
break;
case UL_JSON_VALUE:
fputs(name ? ": null" : "null", fmt->out);
break;
}
fmt->after_close = 1;
}
void ul_jsonwrt_close(struct ul_jsonwrt *fmt, int type)
{
assert(fmt->indent > 0);
switch (type) {
case UL_JSON_OBJECT:
fmt->indent--;
fputc('\n', fmt->out);
ul_jsonwrt_indent(fmt);
fputs("}", fmt->out);
if (fmt->indent == 0)
fputs("\n", fmt->out);
break;
case UL_JSON_ARRAY:
fmt->indent--;
fputc('\n', fmt->out);
ul_jsonwrt_indent(fmt);
fputs("]", fmt->out);
break;
case UL_JSON_VALUE:
break;
}
fmt->after_close = 1;
}
void ul_jsonwrt_flush(struct ul_jsonwrt *fmt)
{
fflush(fmt->out);
}
void ul_jsonwrt_value_raw(struct ul_jsonwrt *fmt,
const char *name, const char *data)
{
ul_jsonwrt_value_open(fmt, name);
if (data && *data)
fputs(data, fmt->out);
else
fputs("null", fmt->out);
ul_jsonwrt_value_close(fmt);
}
void ul_jsonwrt_value_s(struct ul_jsonwrt *fmt,
const char *name, const char *data)
{
ul_jsonwrt_value_open(fmt, name);
if (data && *data)
fputs_quoted_json(data, fmt->out);
else
fputs("null", fmt->out);
ul_jsonwrt_value_close(fmt);
}
void ul_jsonwrt_value_s_sized(struct ul_jsonwrt *fmt,
const char *name, const char *data, size_t size)
{
ul_jsonwrt_value_open(fmt, name);
if (data && *data)
fputs_quoted_case_json(data, fmt->out, 0, size);
else
fputs("null", fmt->out);
ul_jsonwrt_value_close(fmt);
}
void ul_jsonwrt_value_u64(struct ul_jsonwrt *fmt,
const char *name, uint64_t data)
{
ul_jsonwrt_value_open(fmt, name);
fprintf(fmt->out, "%"PRIu64, data);
ul_jsonwrt_value_close(fmt);
}
void ul_jsonwrt_value_double(struct ul_jsonwrt *fmt,
const char *name, long double data)
{
ul_jsonwrt_value_open(fmt, name);
fprintf(fmt->out, "%Lg", data);
ul_jsonwrt_value_close(fmt);
}
void ul_jsonwrt_value_boolean(struct ul_jsonwrt *fmt,
const char *name, int data)
{
ul_jsonwrt_value_open(fmt, name);
fputs(data ? "true" : "false", fmt->out);
ul_jsonwrt_value_close(fmt);
}
|