Function scripted

t/helper/test-json-writer.c:463–578

}

static int scripted(void)
{
	struct string_list parts = STRING_LIST_INIT_NODUP;
	struct json_writer jw = JSON_WRITER_INIT;
	char buf[MAX_LINE_LENGTH];
	char *line;
	int line_nr = 0;

	line = get_trimmed_line(buf, MAX_LINE_LENGTH);
	if (!line)
		return 0;

	if (!strcmp(line, "object"))
		jw_object_begin(&jw, pretty);
	else if (!strcmp(line, "array"))
		jw_array_begin(&jw, pretty);
	else
		die("expected first line to be 'object' or 'array'");

	while ((line = get_trimmed_line(buf, MAX_LINE_LENGTH)) != NULL) {
		struct line state = { 0 };
		char *verb;
		char *key;
		char *s_value;
		intmax_t i_value;
		double d_value;

		state.parts = &parts;
		state.nr = ++line_nr;

		/* break line into command and zero or more tokens */
		string_list_setlen(&parts, 0);
		string_list_split_in_place_f(&parts, line, " ", -1,
					     STRING_LIST_SPLIT_NONEMPTY);

		/* ignore empty lines */
		if (!parts.nr || !*parts.items[0].string)
			continue;

		verb = parts.items[state.consumed_nr++].string;

		if (!strcmp(verb, "end")) {
			jw_end(&jw);
		}
		else if (!strcmp(verb, "object-string")) {
			get_s(&state, &key);
			get_s(&state, &s_value);
			jw_object_string(&jw, key, s_value);
		}
		else if (!strcmp(verb, "object-int")) {
			get_s(&state, &key);
			get_i(&state, &i_value);
			jw_object_intmax(&jw, key, i_value);
		}
		else if (!strcmp(verb, "object-double")) {
			get_s(&state, &key);
			get_i(&state, &i_value);
			get_d(&state, &d_value);