/*- * Copyright (c) 1990 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. */ #ifndef lint char copyright[] = "@(#) Copyright (c) 1990 The Regents of the University of California.\n\ All rights reserved.\n"; #endif /* not lint */ #ifndef lint /*static char sccsid[] = "from: @(#)rm.c 4.26 (Berkeley) 3/10/91";*/ static char rcsid[] = "$Id: rm.c,v 1.14 1994/03/16 17:49:40 jtc Exp $"; #endif /* not lint */ #include #include #include #include #include #include #include #include #include int check __P((char *, char *, struct stat *)); void checkdot __P((char **)); void error __P((char *, int)); void rmtree __P((char **)); void rmfile __P((char **)); void usage __P((void)); int dflag, fflag, iflag, retval, stdin_ok; /* * rm -- * This rm is different from historic rm's, but is expected to match * POSIX 1003.2 behavior. The most visible difference is that -f * has two specific effects now, ignore non-existent files and force * file removal. */ int main(argc, argv) int argc; char **argv; { int ch, rflag; setlocale(LC_ALL, ""); rflag = 0; while ((ch = getopt(argc, argv, "dfiRr")) != -1) switch(ch) { case 'd': dflag = 1; break; case 'f': fflag = 1; iflag = 0; break; case 'i': fflag = 0; iflag = 1; break; case 'R': case 'r': /* compatibility */ rflag = 1; break; case '?': default: usage(); } argc -= optind; argv += optind; if (argc < 1) usage(); checkdot(argv); if (*argv) { stdin_ok = isatty(STDIN_FILENO); if (rflag) rmtree(argv); else rmfile(argv); } exit(retval); } void rmtree(argv) char **argv; { register FTS *fts; register FTSENT *p; register int needstat; /* * Remove a file hierarchy. If forcing removal (-f), or interactive * (-i) or can't ask anyway (stdin_ok), don't stat the file. */ needstat = !fflag && !iflag && stdin_ok; /* * If the -i option is specified, the user can skip on the pre-order * visit. The fts_number field flags skipped directories. */ #define SKIPPED 1 if (!(fts = fts_open(argv, needstat ? FTS_PHYSICAL : FTS_PHYSICAL|FTS_NOSTAT, (int (*)())NULL))) { (void)fprintf(stderr, "rm: %s.\n", strerror(errno)); exit (1); } while ((p = fts_read(fts)) != NULL) { switch(p->fts_info) { case FTS_DNR: case FTS_ERR: error(p->fts_path, errno); continue; /* * FTS_NS: assume that if can't stat the file, it can't be * unlinked. */ case FTS_NS: if (!needstat) break; if (!fflag || errno != ENOENT) error(p->fts_path, errno); continue; /* Pre-order: give user chance to skip. */ case FTS_D: if (!fflag && !check(p->fts_path, p->fts_accpath, p->fts_statp)) { (void)fts_set(fts, p, FTS_SKIP); p->fts_number = SKIPPED; } continue; /* Post-order: see if user skipped. */ case FTS_DP: if (p->fts_number == SKIPPED) continue; break; default: if (!fflag && !check(p->fts_path, p->fts_accpath, p->fts_statp)) continue; } /* * If we can't read or search the directory, may still be * able to remove it. Don't print out the un{read,search}able * message unless the remove fails. */ if (p->fts_info == FTS_DP || p->fts_info == FTS_DNR) { if (!rmdir(p->fts_accpath) || fflag && errno == ENOENT) continue; } else { if (!unlink(p->fts_accpath) || fflag && errno == ENOENT) continue; } error(p->fts_path, errno); } } void rmfile(argv) char **argv; { register char *f; struct stat sb; /* * Remove a file. POSIX 1003.2 states that, by default, attempting * to remove a directory is an error, so must always stat the file. */ while ((f = *argv++) != NULL) { /* If the file does not exist: * If the -f option was not specified, write a diagnostic * to the standard error... */ if (lstat(f, &sb)) { if (!fflag || errno != ENOENT) { error(f, errno); } continue; } /* If the file is of type directory and neither the -r or -R * (or -d) options are specified, write a diagnostic to the * standard error... */ if (S_ISDIR(sb.st_mode) && !dflag) { error (f, EISDIR); continue; } if (!fflag && !check(f, f, &sb)) { continue; } /* * rmdir() directories, unlink() files... */ if ((S_ISDIR(sb.st_mode) ? rmdir(f) : unlink(f))) { error(f, errno); } } } int check(path, name, sp) char *path, *name; struct stat *sp; { register int first, ch; char modep[15], *user_from_uid(), *group_from_gid(); /* Check -i first. */ if (iflag) (void)fprintf(stderr, "remove %s? ", path); else { /* * If it's not a symbolic link and it's unwritable and we're * talking to a terminal, ask. Symbolic links are excluded * because their permissions are meaningless. */ if (!stdin_ok || S_ISLNK(sp->st_mode) || !access(name, W_OK)) return(1); strmode(sp->st_mode, modep); (void)fprintf(stderr, "override %s%s%s/%s for %s? ", modep + 1, modep[9] == ' ' ? "" : " ", user_from_uid(sp->st_uid, 0), group_from_gid(sp->st_gid, 0), path); } (void)fflush(stderr); first = ch = getchar(); while (ch != '\n' && ch != EOF) ch = getchar(); return(first == 'y' || first == 'Y'); } #define ISDOT(a) ((a)[0] == '.' && (!(a)[1] || (a)[1] == '.' && !(a)[2])) void checkdot(argv) char **argv; { register char *p, **t, **save; int complained; complained = 0; for (t = argv; *t;) { if ((p = rindex(*t, '/')) != NULL) ++p; else p = *t; if (ISDOT(p)) { if (!complained++) (void)fprintf(stderr, "rm: \".\" and \"..\" may not be removed.\n"); retval = 1; for (save = t; t[0] = t[1]; ++t) continue; t = save; } else ++t; } } void error(name, val) char *name; int val; { (void)fprintf(stderr, "rm: %s: %s.\n", name, strerror(val)); retval = 1; } void usage() { (void)fprintf(stderr, "usage: rm [-dfiRr] file ...\n"); exit(1); }