diff options
Diffstat (limited to 'pkgtools/pkgclean/files/pkgclean.c')
-rw-r--r-- | pkgtools/pkgclean/files/pkgclean.c | 128 |
1 files changed, 128 insertions, 0 deletions
diff --git a/pkgtools/pkgclean/files/pkgclean.c b/pkgtools/pkgclean/files/pkgclean.c new file mode 100644 index 00000000000..23011e7715c --- /dev/null +++ b/pkgtools/pkgclean/files/pkgclean.c @@ -0,0 +1,128 @@ +/* + * Copyright (c) 2004 Peter Postma <peter@pointless.nl> + * 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. + * + * THIS SOFTWARE IS PROVIDED BY THE AUTHOR 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 AUTHOR 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. + * + */ + +#include <sys/types.h> +#include <sys/param.h> +#include <sys/stat.h> + +#include <err.h> +#include <dirent.h> +#include <stdio.h> +#include <stdlib.h> +#include <string.h> +#include <unistd.h> + +#define PKGSRCDIR "@PKGSRCDIR@" + +static const char * const skip[] = { + ".", "..", "CVS", "bootstrap", "doc", "distfiles", + "licenses", "mk", "packages", NULL +}; + +static void pkgclean(const char *, const char *); +#ifdef __OpenBSD__ +static int checkskip(struct dirent *); +#else +static int checkskip(const struct dirent *); +#endif + +int +main(int argc, char *argv[]) +{ + const char *path, *work = "work"; + + if ((path = getenv("PKGSRCDIR")) == NULL) + path = PKGSRCDIR; + + if (argc > 1) + work = argv[1]; + + pkgclean(path, work); + + return 0; +} + +static void +pkgclean(const char *path, const char *work) +{ + struct dirent **cat, **list; + int ncat, nlist, i, j; + char tmp[PATH_MAX]; + struct stat sb; + + if ((ncat = scandir(path, &cat, checkskip, alphasort)) < 0) + err(EXIT_FAILURE, "scandir: %s", path); + + for (i = 0; i < ncat; i++) { + if (snprintf(tmp, sizeof(tmp), "%s/%s", path, cat[i]->d_name) + >= sizeof(tmp)) { + warnx("filename too long: %s", tmp); + continue; + } + if (stat(tmp, &sb) < 0 || !S_ISDIR(sb.st_mode)) + continue; + if ((nlist = scandir(tmp, &list, checkskip, alphasort)) < 0) { + warn("scandir: %s", tmp); + continue; + } + for (j = 0; j < nlist; j++) { + if (snprintf(tmp, sizeof(tmp), "%s/%s/%s/%s", path, + cat[i]->d_name, list[j]->d_name, work) >= sizeof(tmp)) { + warnx("filename too long: %s", tmp); + continue; + } + if (stat(tmp, &sb) < 0 || !S_ISDIR(sb.st_mode)) + continue; + (void)printf("Deleting %s\n", tmp); + if (fork() == 0) { + (void)execl("/bin/rm", "rm", "-rf", tmp, (char *)NULL); + err(EXIT_FAILURE, "Failed to exec /bin/rm"); + } + free(list[j]); + } + free(cat[i]); + } + free(list); + free(cat); +} + + +#ifdef __OpenBSD__ +static int +checkskip(struct dirent *dp) +#else +static int +checkskip(const struct dirent *dp) +#endif +{ + const char * const *p; + + for (p = skip; *p != NULL; p++) + if (strcmp(dp->d_name, *p) == 0) + return 0; + return 1; +} |