From 4674ec0e4b833ab0d0365225ba99228df14abe87 Mon Sep 17 00:00:00 2001
From: Mattias Andrée <maandree@kth.se>
Date: Fri, 13 Jan 2017 09:05:08 +0100
Subject: Rename to blind
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

Signed-off-by: Mattias Andrée <maandree@kth.se>
---
 src/blind-extend.c | 103 +++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 103 insertions(+)
 create mode 100644 src/blind-extend.c

(limited to 'src/blind-extend.c')

diff --git a/src/blind-extend.c b/src/blind-extend.c
new file mode 100644
index 0000000..71be7f0
--- /dev/null
+++ b/src/blind-extend.c
@@ -0,0 +1,103 @@
+/* See LICENSE file for copyright and license details. */
+#include "stream.h"
+#include "util.h"
+
+#include <fcntl.h>
+#include <inttypes.h>
+#include <string.h>
+#include <unistd.h>
+
+USAGE("[-l left] [-r right] [-a above] [-b below] [-t]")
+
+int
+main(int argc, char *argv[])
+{
+	struct stream stream;
+	char *buf, *image;
+	size_t ptr, n, m, imgw, imgh, rown;
+	size_t xoff, yoff, h, x, y;
+	size_t left = 0, right = 0, top = 0, bottom = 0;
+	int tile = 0;
+
+	ARGBEGIN {
+	case 'l':
+		left = etozu_flag('l', EARG(), 0, SIZE_MAX);
+		break;
+	case 'r':
+		right = etozu_flag('r', EARG(), 0, SIZE_MAX);
+		break;
+	case 'a':
+		top = etozu_flag('a', EARG(), 0, SIZE_MAX);
+		break;
+	case 'b':
+		bottom = etozu_flag('b', EARG(), 0, SIZE_MAX);
+		break;
+	case 't':
+		tile = 1;
+		break;
+	default:
+		usage();
+	} ARGEND;
+
+	if (argc)
+		usage();
+
+	stream.file = "<stdin>";
+	stream.fd = STDIN_FILENO;
+	einit_stream(&stream);
+
+	echeck_frame_size(stream.width, stream.height, stream.pixel_size, 0, stream.file);
+	n = stream.height * stream.width * stream.pixel_size;
+	buf = emalloc(n);
+
+	if (stream.width > SIZE_MAX - left)
+		eprintf("<stdout>: output video is too wide\n");
+	imgw = stream.width + left;
+	if (imgw > SIZE_MAX - right)
+		eprintf("<stdout>: output video is too wide\n");
+	imgw += right;
+	if (stream.height > SIZE_MAX - top)
+		eprintf("<stdout>: output video is too tall\n");
+	imgh = stream.height + top;
+	if (imgh > SIZE_MAX - bottom)
+		eprintf("<stdout>: output video is too tall\n");
+	imgh += bottom;
+	echeck_frame_size(imgw, imgh, stream.pixel_size, "output", "<stdout>");
+	m = imgh * (imgw *= stream.pixel_size);
+	image = tile ? emalloc(m) : ecalloc(1, m);
+
+	stream.width += left + right;
+	h = stream.height += top + bottom;
+	fprint_stream_head(stdout, &stream);
+	efflush(stdout, "<stdout>");
+	stream.width -= left + right;
+	stream.height -= top + bottom;
+
+	left  *= stream.pixel_size;
+	right *= stream.pixel_size;
+	rown = stream.width * stream.pixel_size;
+
+	xoff = (rown          - (left % rown))          % rown;
+	yoff = (stream.height - (top  % stream.height)) % stream.height;
+
+	memcpy(buf, stream.buf, ptr = stream.ptr);
+	while (eread_frame(&stream, buf, n)) {
+		if (!tile) {
+			for (y = 0; y < stream.height; y++)
+				memcpy(image + left + (y + top) * imgw, buf + y * rown, rown);
+		} else {
+			for (y = 0; y < stream.height; y++)
+				for (x = 0; x < imgw; x++)
+					image[x + (y + top) * imgw] = buf[((x + xoff) % rown) + y * rown];
+			for (y = 0; y < top; y++)
+				memcpy(image + y * imgw, image + (((y + yoff) % stream.height) + top) * imgw, imgw);
+			for (y = top + stream.height; y < h; y++)
+				memcpy(image + y * imgw, image + (((y + yoff) % stream.height) + top) * imgw, imgw);
+		}
+		ewriteall(STDOUT_FILENO, image, m, "<stdout>");
+	}
+
+	free(buf);
+	free(image);
+	return 0;
+}
-- 
cgit v1.2.3-70-g09d2