1 files changed, 135 insertions, 0 deletions
diff --git a/usr.bin/dc/dc.c b/usr.bin/dc/dc.c
new file mode 100644
index 0000000..1376653
--- /dev/null
+++ b/usr.bin/dc/dc.c
@@ -0,0 +1,135 @@
+/*	$OpenBSD: dc.c,v 1.11 2009/10/27 23:59:37 deraadt Exp $	*/
+
+/*
+ * Copyright (c) 2003, Otto Moerbeek <otto@drijf.net>
+ * Copyright (c) 2009, Gabor Kovesdan <gabor@FreeBSD.org>
+ *
+ * Permission to use, copy, modify, and distribute this software for any
+ * purpose with or without fee is hereby granted, provided that the above
+ * copyright notice and this permission notice appear in all copies.
+ *
+ * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
+ * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
+ * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
+ * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
+ * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
+ * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
+ * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
+ */
+
+#include <sys/cdefs.h>
+__FBSDID("$FreeBSD$");
+
+#include <sys/stat.h>
+
+#include <ctype.h>
+#include <err.h>
+#include <errno.h>
+#include <getopt.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <unistd.h>
+
+#include "extern.h"
+
+#define	DC_VER		"1.3-FreeBSD"
+
+static void		 usage(void);
+
+extern char		*__progname;
+
+struct source		 src;
+
+struct option long_options[] =
+{
+	{"expression",		required_argument,	NULL,	'e'},
+	{"file",		required_argument,	NULL,	'f'},
+	{"help",		no_argument,		NULL,	'h'},
+	{"version",		no_argument,		NULL,	'V'}
+};
+
+static void
+usage(void)
+{
+	fprintf(stderr, "usage: %s [-hVx] [-e expression] [file]\n",
+	    __progname);
+	exit(1);
+}
+
+static void
+procfile(char *fname) {
+	struct stat st;
+	FILE *file;
+
+	file = fopen(fname, "r");
+	if (file == NULL)
+		err(1, "cannot open file %s", fname);
+	if (fstat(fileno(file), &st) == -1)
+		err(1, "%s", fname);
+	if (S_ISDIR(st.st_mode)) {
+		errno = EISDIR;
+		err(1, "%s", fname);
+	}                
+	src_setstream(&src, file);
+	reset_bmachine(&src);
+	eval();
+	fclose(file);
+}
+
+int
+main(int argc, char *argv[])
+{
+	int ch;
+	bool extended_regs = false, preproc_done = false;
+
+	/* accept and ignore a single dash to be 4.4BSD dc(1) compatible */
+	while ((ch = getopt_long(argc, argv, "e:f:Vx", long_options, NULL)) != -1) {
+		switch (ch) {
+		case 'e':
+			src_setstring(&src, optarg);
+			reset_bmachine(&src);
+			eval();
+			preproc_done = true;
+			break;
+		case 'f':
+			procfile(optarg);
+			preproc_done = true;
+			break;
+		case 'x':
+			extended_regs = true;
+			break;
+		case 'V':
+			fprintf(stderr, "%s (BSD bc) %s\n", __progname, DC_VER);
+			exit(0);
+			break;
+		case '-':
+			break;
+		case 'h':
+			/* FALLTHROUGH */
+		default:
+			usage();
+		}
+	}
+	argc -= optind;
+	argv += optind;
+
+	init_bmachine(extended_regs);
+	setlinebuf(stdout);
+	setlinebuf(stderr);
+
+	if (argc > 1)
+		usage();
+	if (argc == 1) {
+		procfile(argv[0]);
+		preproc_done = true;
+	}
+	if (preproc_done)
+		return (0);
+
+	src_setstream(&src, stdin);
+	reset_bmachine(&src);
+	eval();
+
+	return (0);
+}