a9ef0b2904
copies of the ftp support routines. Also some cosmetic and minor bug fixes I've been meaning to incorporate for awhile.
125 lines
2.9 KiB
C
125 lines
2.9 KiB
C
#ifndef lint
|
|
static char *rcsid = "$Id: main.c,v 1.4 1995/05/30 03:49:57 rgrimes 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"
|
|
#include <err.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);
|
|
}
|