freebsd-dev/usr.sbin/pkg_install/delete/main.c
1994-12-06 00:51:50 +00:00

124 lines
2.9 KiB
C

#ifndef lint
static char *rcsid = "$Id: main.c,v 1.2 1993/09/03 23:01:00 jkh Exp $";
#endif
/*
*
* FreeBSD install - a package for the installation and maintainance
* of non-core utilities.
*
* 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.
*
* Jordan K. Hubbard
* 18 July 1993
*
* This is the delete module.
*
*/
#include "lib.h"
#include "delete.h"
static char Options[] = "hvDdnfp:";
char *Prefix = NULL;
Boolean NoDeInstall = FALSE;
Boolean CleanDirs = FALSE;
Boolean Force = FALSE;
int
main(int argc, char **argv)
{
int ch, error;
char **pkgs, **start;
char *prog_name = argv[0];
pkgs = start = argv;
while ((ch = getopt(argc, argv, Options)) != EOF)
switch(ch) {
case 'v':
Verbose = TRUE;
break;
case 'f':
Force = TRUE;
break;
case 'p':
Prefix = optarg;
break;
case 'D':
NoDeInstall = TRUE;
break;
case 'd':
CleanDirs = TRUE;
break;
case 'n':
Fake = TRUE;
Verbose = TRUE;
break;
case 'h':
case '?':
default:
usage(prog_name, NULL);
break;
}
argc -= optind;
argv += optind;
/* Get all the remaining package names, if any */
/* Get all the remaining package names, if any */
while (*argv)
*pkgs++ = *argv++;
/* If no packages, yelp */
if (pkgs == start)
usage(prog_name, "Missing package name(s)");
*pkgs = NULL;
if (!Fake && getuid() != 0)
errx(1, "You must be root to delete packages.");
if ((error = pkg_perform(start)) != NULL) {
if (Verbose)
fprintf(stderr, "%d package deletion(s) failed.\n", error);
return error;
}
else
return 0;
}
void
usage(const char *name, const char *fmt, ...)
{
va_list args;
va_start(args, fmt);
if (fmt) {
fprintf(stderr, "%s: ", name);
vfprintf(stderr, fmt, args);
fprintf(stderr, "\n\n");
}
va_end(args);
fprintf(stderr, "Usage: %s [args] pkg [ .. pkg ]\n", name);
fprintf(stderr, "Where args are one or more of:\n\n");
fprintf(stderr, "-v verbose\n");
fprintf(stderr, "-p arg override prefix with arg\n");
fprintf(stderr, "-d delete empty directories when deinstalling\n");
fprintf(stderr, "-f force delete even if dependencies exist\n");
fprintf(stderr, " or deinstall/requirement checks fail\n");
fprintf(stderr, "-D don't execute pkg de-install script, if any\n");
fprintf(stderr, "-n don't actually de-install, just show steps\n");
exit(1);
}