Blame lib/json_writer.c

Packit Service dfccb1
/*
Packit Service dfccb1
 * Simple streaming JSON writer
Packit Service dfccb1
 *
Packit Service dfccb1
 * This takes care of the annoying bits of JSON syntax like the commas
Packit Service dfccb1
 * after elements
Packit Service dfccb1
 *
Packit Service dfccb1
 * This program is free software; you can redistribute it and/or
Packit Service dfccb1
 * modify it under the terms of the GNU General Public License
Packit Service dfccb1
 * as published by the Free Software Foundation; either version
Packit Service dfccb1
 * 2 of the License, or (at your option) any later version.
Packit Service dfccb1
 *
Packit Service dfccb1
 * Authors:	Stephen Hemminger <stephen@networkplumber.org>
Packit Service dfccb1
 */
Packit Service dfccb1
Packit Service dfccb1
#include <stdio.h>
Packit Service dfccb1
#include <stdbool.h>
Packit Service dfccb1
#include <stdarg.h>
Packit Service dfccb1
#include <malloc.h>
Packit Service dfccb1
#include <inttypes.h>
Packit Service dfccb1
#include <stdint.h>
Packit Service dfccb1
Packit Service dfccb1
#include "memory.h"
Packit Service dfccb1
#include "json_writer.h"
Packit Service dfccb1
#include "assert_debug.h"
Packit Service dfccb1
Packit Service dfccb1
struct json_writer {
Packit Service dfccb1
	FILE		*out;	/* output file */
Packit Service dfccb1
	unsigned	depth;  /* nesting */
Packit Service dfccb1
	bool		pretty; /* optional whitepace */
Packit Service dfccb1
	char		sep;	/* either nul or comma */
Packit Service dfccb1
};
Packit Service dfccb1
Packit Service dfccb1
/* indentation for pretty print */
Packit Service dfccb1
static void jsonw_indent(const json_writer_t *self)
Packit Service dfccb1
{
Packit Service dfccb1
	unsigned i;
Packit Service dfccb1
	for (i = 0; i < self->depth; ++i)
Packit Service dfccb1
		fputs("    ", self->out);
Packit Service dfccb1
}
Packit Service dfccb1
Packit Service dfccb1
/* end current line and indent if pretty printing */
Packit Service dfccb1
static void jsonw_eol(const json_writer_t *self)
Packit Service dfccb1
{
Packit Service dfccb1
	if (!self->pretty)
Packit Service dfccb1
		return;
Packit Service dfccb1
Packit Service dfccb1
	putc('\n', self->out);
Packit Service dfccb1
	jsonw_indent(self);
Packit Service dfccb1
}
Packit Service dfccb1
Packit Service dfccb1
/* If current object is not empty print a comma */
Packit Service dfccb1
static void jsonw_eor(json_writer_t *self)
Packit Service dfccb1
{
Packit Service dfccb1
	if (self->sep != '\0')
Packit Service dfccb1
		putc(self->sep, self->out);
Packit Service dfccb1
	self->sep = ',';
Packit Service dfccb1
}
Packit Service dfccb1
Packit Service dfccb1
Packit Service dfccb1
/* Output JSON encoded string */
Packit Service dfccb1
/* Handles C escapes, does not do Unicode */
Packit Service dfccb1
static void jsonw_puts(const json_writer_t *self, const char *str)
Packit Service dfccb1
{
Packit Service dfccb1
	putc('"', self->out);
Packit Service dfccb1
	for (; *str; ++str)
Packit Service dfccb1
		switch (*str) {
Packit Service dfccb1
		case '\t':
Packit Service dfccb1
			fputs("\\t", self->out);
Packit Service dfccb1
			break;
Packit Service dfccb1
		case '\n':
Packit Service dfccb1
			fputs("\\n", self->out);
Packit Service dfccb1
			break;
Packit Service dfccb1
		case '\r':
Packit Service dfccb1
			fputs("\\r", self->out);
Packit Service dfccb1
			break;
Packit Service dfccb1
		case '\f':
Packit Service dfccb1
			fputs("\\f", self->out);
Packit Service dfccb1
			break;
Packit Service dfccb1
		case '\b':
Packit Service dfccb1
			fputs("\\b", self->out);
Packit Service dfccb1
			break;
Packit Service dfccb1
		case '\\':
Packit Service dfccb1
			fputs("\\n", self->out);
Packit Service dfccb1
			break;
Packit Service dfccb1
		case '"':
Packit Service dfccb1
			fputs("\\\"", self->out);
Packit Service dfccb1
			break;
Packit Service dfccb1
		case '/':
Packit Service dfccb1
			fputs("\\/", self->out);
Packit Service dfccb1
			break;
Packit Service dfccb1
		default:
Packit Service dfccb1
			putc(*str, self->out);
Packit Service dfccb1
		}
Packit Service dfccb1
	putc('"', self->out);
Packit Service dfccb1
}
Packit Service dfccb1
Packit Service dfccb1
/* Create a new JSON stream */
Packit Service dfccb1
json_writer_t *jsonw_new(FILE *f)
Packit Service dfccb1
{
Packit Service dfccb1
	json_writer_t *self = MALLOC(sizeof(*self));
Packit Service dfccb1
	if (self) {
Packit Service dfccb1
		self->out = f;
Packit Service dfccb1
		self->depth = 0;
Packit Service dfccb1
		self->pretty = false;
Packit Service dfccb1
		self->sep = '\0';
Packit Service dfccb1
	}
Packit Service dfccb1
	return self;
Packit Service dfccb1
}
Packit Service dfccb1
Packit Service dfccb1
/* End output to JSON stream */
Packit Service dfccb1
void jsonw_destroy(json_writer_t ** const self_p)
Packit Service dfccb1
{
Packit Service dfccb1
	json_writer_t *self = *self_p;
Packit Service dfccb1
Packit Service dfccb1
	assert(self->depth == 0);
Packit Service dfccb1
	fputs("\n", self->out);
Packit Service dfccb1
	fflush(self->out);
Packit Service dfccb1
	FREE(self);
Packit Service dfccb1
	*self_p = NULL;
Packit Service dfccb1
}
Packit Service dfccb1
Packit Service dfccb1
void jsonw_pretty(json_writer_t *self, bool on)
Packit Service dfccb1
{
Packit Service dfccb1
	self->pretty = on;
Packit Service dfccb1
}
Packit Service dfccb1
Packit Service dfccb1
/* Basic blocks */
Packit Service dfccb1
static void jsonw_begin(json_writer_t *self, int c)
Packit Service dfccb1
{
Packit Service dfccb1
	jsonw_eor(self);
Packit Service dfccb1
	putc(c, self->out);
Packit Service dfccb1
	++self->depth;
Packit Service dfccb1
	self->sep = '\0';
Packit Service dfccb1
}
Packit Service dfccb1
Packit Service dfccb1
static void jsonw_end(json_writer_t *self, int c)
Packit Service dfccb1
{
Packit Service dfccb1
	assert(self->depth > 0);
Packit Service dfccb1
Packit Service dfccb1
	--self->depth;
Packit Service dfccb1
	if (self->sep != '\0')
Packit Service dfccb1
		jsonw_eol(self);
Packit Service dfccb1
	putc(c, self->out);
Packit Service dfccb1
	self->sep = ',';
Packit Service dfccb1
}
Packit Service dfccb1
Packit Service dfccb1
Packit Service dfccb1
/* Add a JSON property name */
Packit Service dfccb1
void jsonw_name(json_writer_t *self, const char *name)
Packit Service dfccb1
{
Packit Service dfccb1
	jsonw_eor(self);
Packit Service dfccb1
	jsonw_eol(self);
Packit Service dfccb1
	self->sep = '\0';
Packit Service dfccb1
	jsonw_puts(self, name);
Packit Service dfccb1
	putc(':', self->out);
Packit Service dfccb1
	if (self->pretty)
Packit Service dfccb1
		putc(' ', self->out);
Packit Service dfccb1
}
Packit Service dfccb1
Packit Service dfccb1
void jsonw_vprintf_enquote(json_writer_t *self, const char *fmt, va_list ap)
Packit Service dfccb1
{
Packit Service dfccb1
	jsonw_eor(self);
Packit Service dfccb1
	putc('"', self->out);
Packit Service dfccb1
	vfprintf(self->out, fmt, ap);
Packit Service dfccb1
	putc('"', self->out);
Packit Service dfccb1
}
Packit Service dfccb1
Packit Service dfccb1
void jsonw_printf(json_writer_t *self, const char *fmt, ...)
Packit Service dfccb1
{
Packit Service dfccb1
	va_list ap;
Packit Service dfccb1
Packit Service dfccb1
	va_start(ap, fmt);
Packit Service dfccb1
	jsonw_eor(self);
Packit Service dfccb1
	vfprintf(self->out, fmt, ap);
Packit Service dfccb1
	va_end(ap);
Packit Service dfccb1
}
Packit Service dfccb1
Packit Service dfccb1
/* Collections */
Packit Service dfccb1
void jsonw_start_object(json_writer_t *self)
Packit Service dfccb1
{
Packit Service dfccb1
	jsonw_begin(self, '{');
Packit Service dfccb1
}
Packit Service dfccb1
Packit Service dfccb1
void jsonw_end_object(json_writer_t *self)
Packit Service dfccb1
{
Packit Service dfccb1
	jsonw_end(self, '}');
Packit Service dfccb1
}
Packit Service dfccb1
Packit Service dfccb1
void jsonw_start_array(json_writer_t *self)
Packit Service dfccb1
{
Packit Service dfccb1
	jsonw_begin(self, '[');
Packit Service dfccb1
}
Packit Service dfccb1
Packit Service dfccb1
void jsonw_end_array(json_writer_t *self)
Packit Service dfccb1
{
Packit Service dfccb1
	jsonw_end(self, ']');
Packit Service dfccb1
}
Packit Service dfccb1
Packit Service dfccb1
/* JSON value types */
Packit Service dfccb1
void jsonw_string(json_writer_t *self, const char *value)
Packit Service dfccb1
{
Packit Service dfccb1
	jsonw_eor(self);
Packit Service dfccb1
	jsonw_puts(self, value);
Packit Service dfccb1
}
Packit Service dfccb1
Packit Service dfccb1
void jsonw_bool(json_writer_t *self, bool val)
Packit Service dfccb1
{
Packit Service dfccb1
	jsonw_printf(self, "%s", val ? "true" : "false");
Packit Service dfccb1
}
Packit Service dfccb1
Packit Service dfccb1
void jsonw_null(json_writer_t *self)
Packit Service dfccb1
{
Packit Service dfccb1
	jsonw_printf(self, "null");
Packit Service dfccb1
}
Packit Service dfccb1
Packit Service dfccb1
void jsonw_float_fmt(json_writer_t *self, const char *fmt, double num)
Packit Service dfccb1
{
Packit Service dfccb1
	jsonw_printf(self, fmt, num);
Packit Service dfccb1
}
Packit Service dfccb1
Packit Service dfccb1
void jsonw_float(json_writer_t *self, double num)
Packit Service dfccb1
{
Packit Service dfccb1
	jsonw_printf(self, "%g", num);
Packit Service dfccb1
}
Packit Service dfccb1
Packit Service dfccb1
void jsonw_hu(json_writer_t *self, unsigned short num)
Packit Service dfccb1
{
Packit Service dfccb1
	jsonw_printf(self, "%hu", num);
Packit Service dfccb1
}
Packit Service dfccb1
Packit Service dfccb1
void jsonw_uint(json_writer_t *self, uint64_t num)
Packit Service dfccb1
{
Packit Service dfccb1
	jsonw_printf(self, "%"PRIu64, num);
Packit Service dfccb1
}
Packit Service dfccb1
Packit Service dfccb1
void jsonw_lluint(json_writer_t *self, unsigned long long int num)
Packit Service dfccb1
{
Packit Service dfccb1
	jsonw_printf(self, "%llu", num);
Packit Service dfccb1
}
Packit Service dfccb1
Packit Service dfccb1
void jsonw_int(json_writer_t *self, int64_t num)
Packit Service dfccb1
{
Packit Service dfccb1
	jsonw_printf(self, "%"PRId64, num);
Packit Service dfccb1
}
Packit Service dfccb1
Packit Service dfccb1
/* Basic name/value objects */
Packit Service dfccb1
void jsonw_string_field(json_writer_t *self, const char *prop, const char *val)
Packit Service dfccb1
{
Packit Service dfccb1
	jsonw_name(self, prop);
Packit Service dfccb1
	jsonw_string(self, val);
Packit Service dfccb1
}
Packit Service dfccb1
Packit Service dfccb1
void jsonw_bool_field(json_writer_t *self, const char *prop, bool val)
Packit Service dfccb1
{
Packit Service dfccb1
	jsonw_name(self, prop);
Packit Service dfccb1
	jsonw_bool(self, val);
Packit Service dfccb1
}
Packit Service dfccb1
Packit Service dfccb1
void jsonw_float_field(json_writer_t *self, const char *prop, double val)
Packit Service dfccb1
{
Packit Service dfccb1
	jsonw_name(self, prop);
Packit Service dfccb1
	jsonw_float(self, val);
Packit Service dfccb1
}
Packit Service dfccb1
Packit Service dfccb1
void jsonw_float_field_fmt(json_writer_t *self,
Packit Service dfccb1
			   const char *prop,
Packit Service dfccb1
			   const char *fmt,
Packit Service dfccb1
			   double val)
Packit Service dfccb1
{
Packit Service dfccb1
	jsonw_name(self, prop);
Packit Service dfccb1
	jsonw_float_fmt(self, fmt, val);
Packit Service dfccb1
}
Packit Service dfccb1
Packit Service dfccb1
void jsonw_uint_field(json_writer_t *self, const char *prop, uint64_t num)
Packit Service dfccb1
{
Packit Service dfccb1
	jsonw_name(self, prop);
Packit Service dfccb1
	jsonw_uint(self, num);
Packit Service dfccb1
}
Packit Service dfccb1
Packit Service dfccb1
void jsonw_hu_field(json_writer_t *self, const char *prop, unsigned short num)
Packit Service dfccb1
{
Packit Service dfccb1
	jsonw_name(self, prop);
Packit Service dfccb1
	jsonw_hu(self, num);
Packit Service dfccb1
}
Packit Service dfccb1
Packit Service dfccb1
void jsonw_lluint_field(json_writer_t *self,
Packit Service dfccb1
			const char *prop,
Packit Service dfccb1
			unsigned long long int num)
Packit Service dfccb1
{
Packit Service dfccb1
	jsonw_name(self, prop);
Packit Service dfccb1
	jsonw_lluint(self, num);
Packit Service dfccb1
}
Packit Service dfccb1
Packit Service dfccb1
void jsonw_int_field(json_writer_t *self, const char *prop, int64_t num)
Packit Service dfccb1
{
Packit Service dfccb1
	jsonw_name(self, prop);
Packit Service dfccb1
	jsonw_int(self, num);
Packit Service dfccb1
}
Packit Service dfccb1
Packit Service dfccb1
void jsonw_null_field(json_writer_t *self, const char *prop)
Packit Service dfccb1
{
Packit Service dfccb1
	jsonw_name(self, prop);
Packit Service dfccb1
	jsonw_null(self);
Packit Service dfccb1
}