From 19e8c4515872711d11e271ddd5a775f80f907877 Mon Sep 17 00:00:00 2001
From: Robert Ransom <rransom.8774@gmail.com>
Date: Mon, 21 May 2012 22:05:09 +0000
Subject: [PATCH] mc: Initial commit

---
 Makefile |  1 +
 mc.c     | 83 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 2 files changed, 84 insertions(+)
 create mode 100644 mc.c

diff --git a/Makefile b/Makefile
index b2b84d1..b357ea3 100644
--- a/Makefile
+++ b/Makefile
@@ -37,6 +37,7 @@ SRC = \
 	kill.c     \
 	ln.c       \
 	ls.c       \
+	mc.c       \
 	mkdir.c    \
 	mkfifo.c   \
 	mv.c       \
diff --git a/mc.c b/mc.c
new file mode 100644
index 0000000..5c05b02
--- /dev/null
+++ b/mc.c
@@ -0,0 +1,83 @@
+/* See LICENSE file for copyright and license details. */
+#include <assert.h>
+#include <stdbool.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <unistd.h>
+#include "text.h"
+#include "util.h"
+
+static long chars = 65;
+static struct linebuf b = EMPTY_LINEBUF;
+
+static long n_columns;
+static long n_rows;
+
+int
+main(int argc, char *argv[])
+{
+	int c;
+	long i, l, col;
+	size_t maxlen = 0;
+	char *space;
+	FILE *fp;
+
+	while ((c = getopt(argc, argv, "c:")) != -1)
+		switch (c) {
+		case 'c':
+			chars = estrtol(optarg, 0);
+			if (chars < 3)
+				eprintf("%d: too few character columns");
+			break;
+		default:
+			exit(2);
+		}
+
+	/* XXX librarify this chunk, too?  only useful in sponges though */
+	if(optind == argc)
+		getlines(stdin, &b);
+	else for(; optind < argc; optind++) {
+		if(!(fp = fopen(argv[optind], "r")))
+			eprintf("fopen %s:", argv[optind]);
+		getlines(fp, &b);
+		fclose(fp);
+	}
+
+	for(l = 0; l < b.nlines; ++l) {
+		size_t len = strlen(b.lines[l]);
+		if(len > 0 && b.lines[l][len-1] == '\n')
+			b.lines[l][--len] = '\0';
+		if(len > maxlen)
+			maxlen = len;
+		if(maxlen > (chars - 1) / 2)
+			break;
+	}
+
+	n_columns = (chars + 1) / (maxlen + 1);
+	if(n_columns <= 1) {
+		for(l = 0; l < b.nlines; ++l) {
+			fputs(b.lines[l], stdout);
+		}
+		return EXIT_SUCCESS;
+	}
+
+	if(!(space = malloc(maxlen + 2)))
+		eprintf("malloc:");
+	memset(space, ' ', maxlen + 1);
+	space[maxlen + 1] = '\0';
+
+	n_rows = (b.nlines + (n_columns - 1)) / n_columns;
+	for(i = 0; i < n_rows; ++i) {
+		for(l = i, col = 1; l < b.nlines; l += n_rows, ++col) {
+			/*sprintf(b.lines[l], "%ld,%ld$", i, col);*/
+			fputs(b.lines[l], stdout);
+			if(col < n_columns)
+				fputs(space + strlen(b.lines[l]), stdout);
+		}
+		fputs("\n", stdout);
+	}
+
+	return EXIT_SUCCESS;
+}
+