From ae80f4a20bad2c5e1a34077593f2437ad646d3bf Mon Sep 17 00:00:00 2001
From: Bill Joy <bill@ucbvax.Berkeley.EDU>
Date: Thu, 2 Oct 1980 01:28:13 -0800
Subject: [PATCH] date and time created 80/10/01 17:28:13 by bill

SCCS-vsn: bin/rm/rm.c 4.1
---
 usr/src/bin/rm/rm.c | 163 ++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 163 insertions(+)
 create mode 100644 usr/src/bin/rm/rm.c

diff --git a/usr/src/bin/rm/rm.c b/usr/src/bin/rm/rm.c
new file mode 100644
index 0000000000..265fb4c684
--- /dev/null
+++ b/usr/src/bin/rm/rm.c
@@ -0,0 +1,163 @@
+static char *sccsid = "@(#)rm.c	4.1 (Berkeley) %G%";
+int	errcode;
+
+#include <stdio.h>
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <sys/dir.h>
+
+char	*sprintf();
+
+main(argc, argv)
+char *argv[];
+{
+	register char *arg;
+	int fflg, iflg, rflg;
+
+	fflg = 0;
+	if (isatty(0) == 0)
+		fflg++;
+	iflg = 0;
+	rflg = 0;
+	while(argc>1 && argv[1][0]=='-') {
+		arg = *++argv;
+		argc--;
+		while(*++arg != '\0')
+			switch(*arg) {
+			case 'f':
+				fflg++;
+				break;
+			case 'i':
+				iflg++;
+				break;
+			case 'r':
+				rflg++;
+				break;
+			default:
+				printf("rm: unknown option %s\n", *argv);
+				exit(1);
+			}
+	}
+	while(--argc > 0) {
+		if(!strcmp(*++argv, "..")) {
+			fprintf(stderr, "rm: cannot remove `..'\n");
+			continue;
+		}
+		rm(*argv, fflg, rflg, iflg, 0);
+	}
+
+	exit(errcode);
+}
+
+rm(arg, fflg, rflg, iflg, level)
+char arg[];
+{
+	struct stat buf;
+	struct direct direct;
+	char name[100];
+	int d;
+
+	if(stat(arg, &buf)) {
+		if (fflg==0) {
+			printf("rm: %s nonexistent\n", arg);
+			++errcode;
+		}
+		return;
+	}
+	if ((buf.st_mode&S_IFMT) == S_IFDIR) {
+		if(rflg) {
+			if (access(arg, 02) < 0) {
+				if (fflg==0)
+					printf("%s not changed\n", arg);
+				errcode++;
+				return;
+			}
+			if(iflg && level!=0) {
+				printf("directory %s: ", arg);
+				if(!yes())
+					return;
+			}
+			if((d=open(arg, 0)) < 0) {
+				printf("rm: %s: cannot read\n", arg);
+				exit(1);
+			}
+			while(read(d, (char *)&direct, sizeof(direct)) == sizeof(direct)) {
+				if(direct.d_ino != 0 && !dotname(direct.d_name)) {
+					sprintf(name, "%s/%.14s", arg, direct.d_name);
+					rm(name, fflg, rflg, iflg, level+1);
+				}
+			}
+			close(d);
+			errcode += rmdir(arg, iflg);
+			return;
+		}
+		printf("rm: %s directory\n", arg);
+		++errcode;
+		return;
+	}
+
+	if(iflg) {
+		printf("%s: ", arg);
+		if(!yes())
+			return;
+	}
+	else if(!fflg) {
+		if (access(arg, 02)<0) {
+			printf("rm: %s %o mode ", arg, buf.st_mode&0777);
+			if(!yes())
+				return;
+		}
+	}
+	if(unlink(arg) && (fflg==0 || iflg)) {
+		printf("rm: %s not removed\n", arg);
+		++errcode;
+	}
+}
+
+dotname(s)
+char *s;
+{
+	if(s[0] == '.')
+		if(s[1] == '.')
+			if(s[2] == '\0')
+				return(1);
+			else
+				return(0);
+		else if(s[1] == '\0')
+			return(1);
+	return(0);
+}
+
+rmdir(f, iflg)
+char *f;
+{
+	int status, i;
+
+	if(dotname(f))
+		return(0);
+	if(iflg) {
+		printf("%s: ", f);
+		if(!yes())
+			return(0);
+	}
+	while((i=fork()) == -1)
+		sleep(3);
+	if(i) {
+		wait(&status);
+		return(status);
+	}
+	execl("/bin/rmdir", "rmdir", f, 0);
+	execl("/usr/bin/rmdir", "rmdir", f, 0);
+	printf("rm: can't find rmdir\n");
+	exit(1);
+}
+
+yes()
+{
+	int i, b;
+
+	i = b = getchar();
+	while(b != '\n' && b != EOF)
+		b = getchar();
+	return(i == 'y');
+}
-- 
2.20.1