2 * Copyright (c) 1995 - 2000 Kungliga Tekniska Högskolan
3 * (Royal Institute of Technology, Stockholm, Sweden).
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
17 * 3. Neither the name of the Institute nor the names of its contributors
18 * may be used to endorse or promote products derived from this software
19 * without specific prior written permission.
21 * THIS SOFTWARE IS PROVIDED BY THE INSTITUTE AND CONTRIBUTORS ``AS IS'' AND
22 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24 * ARE DISCLAIMED. IN NO EVENT SHALL THE INSTITUTE OR CONTRIBUTORS BE LIABLE
25 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
41 #include <sys/types.h>
61 kill_one(struct entry *ents, int ind, int curents);
64 do_dir(const char *dirname);
67 kill_dir(const char *dirname);
70 kill_one(struct entry *ents, int ind, int curents)
75 ret = unlink(ents[ind].name);
77 if (errno == EISDIR || errno == EPERM)
78 do_dir(ents[ind].name);
80 err(1, "unlink %s", ents[ind].name);
83 for (i = 0; i <= ind; ++i) {
86 ret = lstat(ents[i].name, &sb);
87 if (ret == 0 || errno != ENOENT)
88 err(1, "%s still exists?", ents[i].name);
91 for (i = ind + 1; i < curents; ++i) {
94 ret = lstat(ents[i].name, &sb);
96 err(1, "stat %s", ents[i].name);
101 do_dir(const char *dirname)
105 ret = chdir(dirname);
107 err(1, "chdir %s", dirname);
112 ret = rmdir(dirname);
114 err(1, "rmdir %s", dirname);
118 kill_dir(const char *dirname)
127 fprintf(verbose, "reading %s\n", dirname);
131 err(1, "opendir %s", dirname);
133 ents = malloc(sizeof(*ents) * maxents);
136 while ((dp = readdir(dir)) != NULL) {
137 if (strcmp(dp->d_name, ".") == 0 || strcmp(dp->d_name, "..") == 0)
140 if (curents >= maxents) {
142 ents = realloc(ents, sizeof(*ents) * maxents);
146 ents[curents].name = strdup(dp->d_name);
147 ents[curents].status = 1;
149 fprintf(verbose, " adding %s\n", dp->d_name);
154 err(1, "opendir %s", dirname);
156 while ((dp = readdir(dir)) != NULL) {
157 if (strcmp(dp->d_name, ".") == 0 || strcmp(dp->d_name, "..") == 0)
160 if (strcmp(ents[i].name, dp->d_name) != 0) {
161 errx(1, "%s != %s", ents[i].name, dp->d_name);
163 fprintf(verbose, " deleting %s\n", ents[i].name);
164 kill_one(ents, i, curents);
168 errx(1, "missing %d entries in %s", curents - i, dirname);
171 fprintf(verbose, "end of %s\n", dirname);
175 main(int argc, char **argv)
178 verbose = fdopen(4, "w");
179 if (verbose == NULL) {
180 verbose = fopen("/dev/null", "w");
182 err(1, "fopen /dev/null");
186 errx(1, "usage: %s directory", argv[0]);