1 files changed, 66 insertions, 0 deletions
diff --git a/bin/ttpre.c b/bin/ttpre.c
new file mode 100644
index 00000000..4917be37
--- /dev/null
+++ b/bin/ttpre.c
@@ -0,0 +1,66 @@
+/* Copyright (C) 2018  C. McEnroe <june@causal.agency>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU Affero General Public License as published by
+ * the Free Software Foundation, either version 3 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU Affero General Public License for more details.
+ *
+ * You should have received a copy of the GNU Affero General Public License
+ * along with this program.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+#include <locale.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <wchar.h>
+
+static void put(wchar_t ch) {
+	switch (ch) {
+		break; case L'&': printf("&amp;");
+		break; case L'<': printf("&lt;");
+		break; case L'>': printf("&gt;");
+		break; default:   printf("%lc", (wint_t)ch);
+	}
+}
+
+static void tag(const char *open) {
+	static const char *close = NULL;
+	if (close == open) return;
+	if (close) printf("</%s>", close);
+	if (open) printf("<%s>", open);
+	close = open;
+}
+
+static void push(wchar_t ch) {
+	static wchar_t q[3];
+	if (q[1] == L'\b' && q[0] == L'_') {
+		tag("i");
+		put(q[2]);
+		q[0] = q[1] = q[2] = 0;
+	} else if (q[1] == L'\b' && q[0] == q[2]) {
+		tag("b");
+		put(q[2]);
+		q[0] = q[1] = q[2] = 0;
+	} else if (q[0]) {
+		tag(NULL);
+		put(q[0]);
+	}
+	q[0] = q[1];
+	q[1] = q[2];
+	q[2] = ch;
+}
+
+int main(void) {
+	setlocale(LC_CTYPE, "");
+	printf("<pre>");
+	wint_t ch;
+	while (WEOF != (ch = getwchar())) push(ch);
+	push(0); push(0); push(0);
+	printf("</pre>\n");
+	return EXIT_SUCCESS;
+}