3 files changed, 128 insertions, 0 deletions
diff --git a/src/blind-cat-cols.c b/src/blind-cat-cols.c
new file mode 100644
index 0000000..e20e913
--- /dev/null
+++ b/src/blind-cat-cols.c
@@ -0,0 +1,42 @@
+/* See LICENSE file for copyright and license details. */
+#include "common.h"
+
+USAGE("(file columns) ...")
+
+int
+main(int argc, char *argv[])
+{
+	struct stream *streams;
+	size_t parts, width = 0, *cols, i;
+
+	UNOFLAGS(argc % 2 || !argc);
+
+	parts   = (size_t)argc / 2;
+	streams = emalloc2(parts, sizeof(*streams));
+	cols    = alloca(parts * sizeof(*cols));
+
+	for (i = 0; i < parts; i++) {
+		eopen_stream(streams + i, argv[i * 2]);
+		cols[i] = etozu_arg("columns", argv[i * 2 + 1], 1, SIZE_MAX);
+		if (streams[i].width > SIZE_MAX - width)
+			eprintf("output video is too tall\n");
+		width += streams[i].width;
+		if (i) {
+			streams[i].width = streams->width;
+			echeck_compat(streams, streams + i);
+		}
+	}
+
+	streams->width = width;
+	fprint_stream_head(stdout, streams);
+	efflush(stdout, "<stdout>");
+
+	for (i = 0; i < parts; i++, i = i == parts ? 0 : i)
+		if (esend_pixels(streams + i, STDOUT_FILENO, cols[i], "<stdout>") != cols[i])
+			break;
+	for (i = 0; i < parts; i++)
+		close(streams[i].fd);
+
+	free(streams);
+	return 0;
+}
diff --git a/src/blind-cat-rows.c b/src/blind-cat-rows.c
new file mode 100644
index 0000000..32113e5
--- /dev/null
+++ b/src/blind-cat-rows.c
@@ -0,0 +1,42 @@
+/* See LICENSE file for copyright and license details. */
+#include "common.h"
+
+USAGE("(file rows) ...")
+
+int
+main(int argc, char *argv[])
+{
+	struct stream *streams;
+	size_t parts, height = 0, *rows, i;
+
+	UNOFLAGS(argc % 2 || !argc);
+
+	parts   = (size_t)argc / 2;
+	streams = emalloc2(parts, sizeof(*streams));
+	rows    = alloca(parts * sizeof(*rows));
+
+	for (i = 0; i < parts; i++) {
+		eopen_stream(streams + i, argv[i * 2]);
+		rows[i] = etozu_arg("rows", argv[i * 2 + 1], 1, SIZE_MAX);
+		if (streams[i].height > SIZE_MAX - height)
+			eprintf("output video is too wide\n");
+		height += streams[i].height;
+		if (i) {
+			streams[i].height = streams->height;
+			echeck_compat(streams, streams + i);
+		}
+	}
+
+	streams->height = height;
+	fprint_stream_head(stdout, streams);
+	efflush(stdout, "<stdout>");
+
+	for (i = 0; i < parts; i++, i = i == parts ? 0 : i)
+		if (esend_rows(streams + i, STDOUT_FILENO, rows[i], "<stdout>") != rows[i])
+			break;
+	for (i = 0; i < parts; i++)
+		close(streams[i].fd);
+
+	free(streams);
+	return 0;
+}
diff --git a/src/blind-interleave.c b/src/blind-interleave.c
new file mode 100644
index 0000000..bc3bcac
--- /dev/null
+++ b/src/blind-interleave.c
@@ -0,0 +1,44 @@
+/* See LICENSE file for copyright and license details. */
+#include "common.h"
+
+USAGE("(file frames) ...")
+
+int
+main(int argc, char *argv[])
+{
+	struct stream *streams;
+	size_t parts, length = 0, *frames, i;
+
+	UNOFLAGS(argc % 2 || !argc);
+
+	parts   = (size_t)argc / 2;
+	streams = emalloc2(parts, sizeof(*streams));
+	frames  = alloca(parts * sizeof(*frames));
+
+	for (i = 0; i < parts; i++) {
+		eopen_stream(streams + i, argv[i * 2]);
+		frames[i] = etozu_arg("frames", argv[i * 2 + 1], 1, SIZE_MAX);
+		if (i)
+		    echeck_compat(streams, streams + i);
+	}
+	for (i = 0; i < parts; i++) {
+		if (!streams[i].frames || streams[i].frames > SIZE_MAX - length) {
+			length = 0;
+			break;
+		}
+		length += streams[i].frames;
+	}
+
+	streams->frames = length;
+	fprint_stream_head(stdout, streams);
+	efflush(stdout, "<stdout>");
+
+	for (i = 0; i < parts; i++, i = i == parts ? 0 : i)
+		if (esend_frames(streams + i, STDOUT_FILENO, frames[i], "<stdout>") != frames[i])
+			break;
+	for (i = 0; i < parts; i++)
+		close(streams[i].fd);
+
+	free(streams);
+	return 0;
+}