From 6c561a18d6cb406375ea33b910ce676cc6ca4933 Mon Sep 17 00:00:00 2001
From: Bill Joy <wnj@ucbvax.Berkeley.EDU>
Date: Sun, 25 Nov 1979 02:23:28 -0800
Subject: [PATCH] BSD 3 development Work on file usr/src/cmd/getNAME.c

Synthesized-from: 3bsd
---
 usr/src/cmd/getNAME.c | 98 +++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 98 insertions(+)
 create mode 100644 usr/src/cmd/getNAME.c

diff --git a/usr/src/cmd/getNAME.c b/usr/src/cmd/getNAME.c
new file mode 100644
index 0000000000..32bd5f0328
--- /dev/null
+++ b/usr/src/cmd/getNAME.c
@@ -0,0 +1,98 @@
+#include <stdio.h>
+
+int tocrc;
+
+main(argc, argv)
+	int argc;
+	char *argv[];
+{
+
+	argc--, argv++;
+	if (!strcmp(argv[0], "-t"))
+		argc--, argv++, tocrc++;
+	while (argc > 0)
+		getfrom(*argv++), argc--;
+	exit(0);
+}
+
+getfrom(name)
+	char *name;
+{
+	char headbuf[BUFSIZ];
+	char linbuf[BUFSIZ];
+	register char *cp;
+	int i = 0;
+
+	if (freopen(name, "r", stdin) == 0) {
+		perror(name);
+		exit(1);
+	}
+	for (;;) {
+		if (fgets(headbuf, sizeof headbuf, stdin) == NULL)
+			return;
+		if (headbuf[0] != '.')
+			continue;
+		if (headbuf[1] == 'T' && headbuf[2] == 'H')
+			break;
+		if (headbuf[1] == 't' && headbuf[2] == 'h')
+			break;
+	}
+	for (;;) {
+		if (fgets(linbuf, sizeof linbuf, stdin) == NULL)
+			return;
+		if (linbuf[0] != '.')
+			continue;
+		if (linbuf[1] == 'S' && linbuf[2] == 'H')
+			break;
+		if (linbuf[1] == 's' && linbuf[2] == 'h')
+			break;
+	}
+	trimln(headbuf);
+	if (tocrc) {
+		register char *dp = name, *ep;
+
+again:
+		while (*dp && *dp != '.')
+			putchar(*dp++);
+		if (*dp)
+			for (ep = dp+1; *ep; ep++)
+				if (*ep == '.') {
+					putchar(*dp++);
+					goto again;
+				}
+		putchar('(');
+		if (*dp)
+			dp++;
+		while (*dp)
+			putchar (*dp++);
+		putchar(')');
+		putchar(' ');
+	}
+	printf("%s\t", headbuf);
+	for (;;) {
+		if (fgets(linbuf, sizeof linbuf, stdin) == NULL)
+			break;
+		if (linbuf[0] == '.') {
+			if (linbuf[1] == 'S' && linbuf[2] == 'H')
+				break;
+			if (linbuf[1] == 's' && linbuf[2] == 'h')
+				break;
+		}
+		trimln(linbuf);
+		if (i != 0)
+			printf(" ");
+		i++;
+		printf("%s", linbuf);
+	}
+	printf("\n");
+}
+
+trimln(cp)
+	register char *cp;
+{
+
+	while (*cp)
+		cp++;
+	if (*--cp == '\n')
+		*cp = 0;
+}
-- 
2.20.1