initial import of 386bsd-0.1 sources

3 files changed, 301 insertions, 0 deletions

diff --git a/number/Makefile b/number/Makefile
new file mode 100644
index 00000000..9ef23470
--- /dev/null
+++ b/number/Makefile
@@ -0,0 +1,6 @@
+#	@(#)Makefile	5.2 (Berkeley) 5/11/90
+
+PROG=	number
+MAN6=	number.0
+
+.include <bsd.prog.mk>
diff --git a/number/number.6 b/number/number.6
new file mode 100644
index 00000000..fbf3eecb
--- /dev/null
+++ b/number/number.6
@@ -0,0 +1,52 @@
+.\" Copyright (c) 1989 The Regents of the University of California.
+.\" All rights reserved.
+.\"
+.\" Redistribution and use in source and binary forms, with or without
+.\" modification, are permitted provided that the following conditions
+.\" are met:
+.\" 1. Redistributions of source code must retain the above copyright
+.\"    notice, this list of conditions and the following disclaimer.
+.\" 2. Redistributions in binary form must reproduce the above copyright
+.\"    notice, this list of conditions and the following disclaimer in the
+.\"    documentation and/or other materials provided with the distribution.
+.\" 3. All advertising materials mentioning features or use of this software
+.\"    must display the following acknowledgement:
+.\"	This product includes software developed by the University of
+.\"	California, Berkeley and its contributors.
+.\" 4. Neither the name of the University nor the names of its contributors
+.\"    may be used to endorse or promote products derived from this software
+.\"    without specific prior written permission.
+.\"
+.\" THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
+.\" ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+.\" IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+.\" ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
+.\" FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+.\" DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
+.\" OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
+.\" HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
+.\" LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
+.\" OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
+.\" SUCH DAMAGE.
+.\"
+.\"	@(#)number.6	6.4 (Berkeley) 6/23/90
+.\"
+.TH NUMBER 6 "June 23, 1990"
+.UC 4
+.SH NAME
+number \- convert Arabic numerals to English
+.SH SYNOPSIS
+.B number
+[ # ]
+.SH DESCRIPTION
+The
+.I number
+utility
+prints the English equivalent of the specified number to the
+standard output.
+If no argument is specified,
+.I number
+reads a number from the standard input.
+.SH BUGS
+.I Number
+doesn't understand exponents.
diff --git a/number/number.c b/number/number.c
new file mode 100644
index 00000000..110400ea
--- /dev/null
+++ b/number/number.c
@@ -0,0 +1,243 @@
+/*
+ * Copyright (c) 1988 Regents of the University of California.
+ * All rights reserved.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ *    notice, this list of conditions and the following disclaimer.
+ * 2. Redistributions in binary form must reproduce the above copyright
+ *    notice, this list of conditions and the following disclaimer in the
+ *    documentation and/or other materials provided with the distribution.
+ * 3. All advertising materials mentioning features or use of this software
+ *    must display the following acknowledgement:
+ *	This product includes software developed by the University of
+ *	California, Berkeley and its contributors.
+ * 4. Neither the name of the University nor the names of its contributors
+ *    may be used to endorse or promote products derived from this software
+ *    without specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
+ * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
+ * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+ * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
+ * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
+ * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
+ * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
+ * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
+ * SUCH DAMAGE.
+ */
+
+#ifndef lint
+char copyright[] =
+"@(#) Copyright (c) 1988 Regents of the University of California.\n\
+ All rights reserved.\n";
+#endif /* not lint */
+
+#ifndef lint
+static char sccsid[] = "@(#)number.c	5.1 (Berkeley) 2/28/91";
+#endif /* not lint */
+
+#include <stdio.h>
+#include <ctype.h>
+
+#define	YES		1
+#define	NO		0
+#define	EOS		'\0'
+#define	MAXNUM		65		/* biggest number we handle */
+
+static char	*name1[] = {
+	"",		"one",		"two",		"three",
+	"four",		"five",		"six",		"seven",
+	"eight",	"nine",		"ten",		"eleven",
+	"twelve",	"thirteen",	"fourteen",	"fifteen",
+	"sixteen",	"seventeen",	"eighteen",	"nineteen",
+},
+		*name2[] = {
+	"",		"ten",		"twenty",	"thirty",
+	"forty",	"fifty",	"sixty",	"seventy",
+	"eighty",	"ninety",
+},
+		*name3[] = {
+	"hundred",	"thousand",	"million",	"billion",
+	"trillion",	"quadrillion",	"quintillion",	"sextillion",
+	"septillion",	"octillion",	"nonillion",	"decillion",
+	"undecillion",	"duodecillion",	"tredecillion",	"quattuordecillion",
+	"quindecillion",		"sexdecillion",	
+	"septendecillion",		"octodecillion",
+	"novemdecillion",		"vigintillion",
+};
+
+main(argc,argv)
+	int	argc;
+	char	**argv;
+{
+	register int	cnt;
+	char	line[MAXNUM * 2 + 2];		/* MAXNUM '.' MAXNUM '\0' */
+
+	if (argc > 1)
+		for (cnt = 1;cnt < argc;++cnt) {
+			convert(argv[cnt]);
+			puts("...");
+		}
+	else
+		while (fgets(line,sizeof(line),stdin)) {
+			convert(line);
+			puts("...");
+		}
+	exit(0);
+}
+
+convert(line)
+	char	*line;
+{
+	register int	len,
+			ret;
+	register char	*C,
+			*fraction;
+
+	for (fraction = NULL, C = line;*C && *C != '\n';++C)
+		if (!isdigit(*C))
+			switch(*C) {
+			case '-':
+				if (C != line)
+					usage(NO);
+				break;
+			case '.':
+				if (!fraction) {
+					fraction = C + 1;
+					*C = EOS;
+					break;
+				}
+			default:
+				usage(NO);
+			}
+	*C = EOS;
+	if (*line == '-') {
+		puts("minus");
+		++line;
+	}
+	ret = NO;
+	if (len = strlen(line)) {
+		if (len > MAXNUM)
+			usage(YES);
+		ret = unit(len,line);
+	}
+	if (fraction && (len = strlen(fraction))) {
+		if (len > MAXNUM)
+			usage(YES);
+		for (C = fraction;*C;++C)
+			if (*C != '0') {
+				if (ret)
+					puts("and");
+				if (unit(len,fraction)) {
+					++ret;
+					pfract(len);
+				}
+				break;
+			}
+	}
+	if (!ret)
+		puts("zero.");
+}
+
+unit(len,C)
+	register int	len;
+	register char	*C;
+{
+	register int	off,
+			ret;
+
+	ret = NO;
+	if (len > 3) {
+		if (len % 3) {
+			off = len % 3;
+			len -= off;
+			if (number(C,off)) {
+				ret = YES;
+				printf(" %s.\n",name3[len / 3]);
+			}
+			C += off;
+		}
+		for (;len > 3;C += 3) {
+			len -= 3;
+			if (number(C,3)) {
+				ret = YES;
+				printf(" %s.\n",name3[len / 3]);
+			}
+		}
+	}
+	if (number(C,len)) {
+		puts(".");
+		ret = YES;
+	}
+	return(ret);
+}
+
+number(C,len)
+	register char	*C;
+	int	len;
+{
+	register int	val,
+			ret;
+
+	ret = 0;
+	switch(len) {
+	case 3:
+		if (*C != '0') {
+			++ret;
+			printf("%s hundred",name1[*C - '0']);
+		}
+		++C;
+		/*FALLTHROUGH*/
+	case 2:
+		val = (C[1] - '0') + (C[0] - '0') * 10;
+		if (val) {
+			if (ret++)
+				putchar(' ');
+			if (val < 20)
+				fputs(name1[val],stdout);
+			else {
+				fputs(name2[val / 10],stdout);
+				if (val % 10)
+					printf("-%s",name1[val % 10]);
+			}
+		}
+		break;
+	case 1:
+		if (*C != '0') {
+			++ret;
+			fputs(name1[*C - '0'],stdout);
+		}
+	}
+	return(ret);
+}
+
+pfract(len)
+	register int	len;
+{
+	static char	*pref[] = { "", "ten-", "hundred-" };
+
+	switch(len) {
+	case 1:
+		puts("tenths.");
+		break;
+	case 2:
+		puts("hundredths.");
+		break;
+	default:
+		printf("%s%sths.\n",pref[len % 3],name3[len / 3]);
+	}
+}
+
+usage(toobig)
+	int	toobig;
+{
+	if (toobig)
+		fprintf(stderr,"number: number too large, max %d digits.\n",MAXNUM);
+	fputs("usage: number # ...\n",stderr);
+	exit(-1);
+}