/* See LICENSE file for copyright and license details. */
#include "stream.h"
#include "util.h"

#include <string.h>

USAGE("(skipped-frames | +included-frames) ...")

static int
process_frame(struct stream *stream, int include)
{
	size_t h, n, m;
	int anything = 0;

	for (h = stream->height; h; h--) {
		for (n = stream->row_size; n; n -= m, anything = 1) {
			if (!stream->ptr && !eread_stream(stream, n))
				goto done;
			m = MIN(stream->ptr, n);
			if (include)
				ewriteall(STDOUT_FILENO, stream->buf, m, "<stdout>");
			memmove(stream->buf, stream->buf + m, stream->ptr -= m);
		}
	}
done:

	if (anything && h)
		eprintf("%s: is shorter than expected\n", stream->file);

	return anything;
}

int
main(int argc, char *argv[])
{
	struct stream stream;
	int i, include;
	size_t f, n, total = 0;
	char *includes;
	size_t *ns;

	UNOFLAGS(!argc);

	eopen_stream(&stream, NULL);

	includes = emalloc((size_t)argc);
	ns = ecalloc((size_t)argc, sizeof(*ns));

	for (i = 0; i < argc; i++) {
		include = argv[i][0] == '+';
		n = etozu_arg(include ? "included frame count" : "skipped frame count",
			      argv[i] + include, 0, SIZE_MAX);
		total += ns[i] = n;
		includes[i] = (char)include;
	}
	if (!total)
		eprintf("null pattern is not allowed");

	for (i = 0, total = 0, f = stream.frames; f; i = (i + 1) % argc) {
		include = (int)includes[i];
		for (n = ns[i]; n-- && f--;)
			total += (size_t)include;
	}

	stream.frames = total;
	echeck_dimensions(&stream, WIDTH, NULL);
	fprint_stream_head(stdout, &stream);
	efflush(stdout, "<stdout>");

	for (i = 0;; i = (i + 1) % argc) {
		include = (int)includes[i];
		for (n = ns[i]; n--;)
			if (!process_frame(&stream, include))
				goto done;
	}

done:
	free(includes);
	free(ns);
	return 0;
}