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
138 || strcmp (dp->d_name, "..") == 0)
141 if (curents >= maxents) {
143 ents = realloc (ents, sizeof(*ents) * maxents);
147 ents[curents].name = strdup (dp->d_name);
148 ents[curents].status = 1;
150 fprintf (verbose, " adding %s\n", dp->d_name);
155 err (1, "opendir %s", dirname);
157 while((dp = readdir (dir)) != NULL) {
158 if (strcmp (dp->d_name, ".") == 0
159 || strcmp (dp->d_name, "..") == 0)
162 if (strcmp (ents[i].name, dp->d_name) != 0) {
163 errx (1, "%s != %s", ents[i].name, dp->d_name);
165 fprintf (verbose, " deleting %s\n", ents[i].name);
166 kill_one (ents, i, curents);
170 errx (1, "missing %d entries in %s", curents - i, dirname);
173 fprintf (verbose, "end of %s\n", dirname);
177 main(int argc, char **argv)
180 verbose = fdopen (4, "w");
181 if (verbose == NULL) {
182 verbose = fopen ("/dev/null", "w");
184 err (1, "fopen /dev/null");
188 errx (1, "usage: %s directory", argv[0]);