summaryrefslogtreecommitdiff
path: root/usr.sbin/pkg_install/info/perform.c
diff options
context:
space:
mode:
Diffstat (limited to 'usr.sbin/pkg_install/info/perform.c')
-rw-r--r--usr.sbin/pkg_install/info/perform.c314
1 files changed, 0 insertions, 314 deletions
diff --git a/usr.sbin/pkg_install/info/perform.c b/usr.sbin/pkg_install/info/perform.c
deleted file mode 100644
index 5a96258a779..00000000000
--- a/usr.sbin/pkg_install/info/perform.c
+++ /dev/null
@@ -1,314 +0,0 @@
-/* $OpenBSD: perform.c,v 1.16 2003/08/23 09:14:43 tedu Exp $ */
-
-#ifndef lint
-static const char rcsid[] = "$OpenBSD: perform.c,v 1.16 2003/08/23 09:14:43 tedu Exp $";
-#endif
-
-/* This is OpenBSD pkg_install, based on:
- *
- * 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
- * 23 Aug 1993
- *
- * This is the main body of the info module.
- *
- */
-
-#include "lib.h"
-#include "info.h"
-
-#include <sys/types.h>
-#include <sys/stat.h>
-
-#include <err.h>
-#include <signal.h>
-#include <dirent.h>
-#include <ctype.h>
-
-static char *Home;
-
-/* retrieve info on installed packages from the base name:
- * find a full name of the form pkg-xxx.
- */
-static char *
-find_prefix(char *buffer, int bufsize, char *base, char *pkg)
-{
- DIR *dirp;
- struct dirent *dp;
- char *res;
- int pkg_length = strlen(pkg);
-
-
- if (! (dirp = opendir(base)) )
- return 0;
- while ( (dp = readdir(dirp)) ) {
- if (strncmp(dp->d_name, pkg, pkg_length) == 0
- && dp->d_name[pkg_length] == '-') {
- snprintf(buffer, bufsize, "%s/%s", base, dp->d_name);
- /* pedantic: need to dup res before closedir() */
- res = strdup(dp->d_name);
- (void)closedir(dirp);
- return res;
- }
- }
- (void)closedir(dirp);
- return 0;
-}
-
-static int
-pkg_do(char *pkg)
-{
- Boolean installed = FALSE, isTMP = FALSE;
- char log_dir[FILENAME_MAX];
- char fname[FILENAME_MAX];
- package_t plist;
- FILE *fp;
- struct stat sb;
- char *cp = NULL;
- int code = 0;
- char *pkg2 = 0; /* hold full name of package, storage to free */
- int len;
- int isurl = 0;
-
- set_pkg(pkg);
-
- if (AllInstalled)
- goto installed;
-
- if (isURL(pkg)) {
- if ((cp = fileGetURL(NULL, pkg)) != NULL) {
- strlcpy(fname, cp, sizeof(fname));
- isTMP = TRUE;
- }
- isurl = 1;
- } else if (fexists(pkg) && isfile(pkg)) {
-
- if (*pkg != '/') {
- if (!getcwd(fname, sizeof(fname))) {
- cleanup(0);
- err(1, "fatal error during execution: getcwd");
- }
- len = strlen(fname);
- snprintf(&fname[len], sizeof(fname) - len, "/%s", pkg);
- } else
- strlcpy(fname, pkg, sizeof(fname));
- cp = fname;
- } else {
- if ((cp = fileFindByPath(NULL, pkg)) != NULL) {
- strlcpy(fname, cp, sizeof(fname));
- if (isURL(fname) && (cp = fileGetURL(NULL, fname))
- != NULL) {
- strlcpy(fname, cp, sizeof(fname));
- isTMP = TRUE;
- isurl = 1;
- } else if (*cp != '/') {
- if (!getcwd(fname, sizeof(fname))) {
- cleanup(0);
- err(1, "fatal error during execution: "
- "getcwd");
- }
- len = strlen(fname);
- snprintf(&fname[len], sizeof(fname) - len,
- "/%s", cp);
- }
- }
- }
- if (cp) {
- if (isurl) {
- /* file is already unpacked by fileGetURL() */
- strlcpy(PlayPen, cp, PlayPenSize);
- } else {
- /*
- * Apply a crude heuristic to see how much space the package will
- * take up once it's unpacked. I've noticed that most packages
- * compress an average of 75%, but we're only unpacking the + files so
- * be very optimistic.
- */
- if (stat(fname, &sb) == FAIL) {
- pwarnx("can't stat package file '%s'", fname);
- code = 1;
- goto bail;
- }
- Home = make_playpen(PlayPen, PlayPenSize, sb.st_size / 2);
- if (unpack(fname, "+*")) {
- pwarnx("error during unpacking, no info for '%s' available", pkg);
- code = 1;
- goto bail;
- }
- }
- }
- /*
- * It's not an uninstalled package, try and find it among the
- * installed
- */
- else
-installed:
- {
- char *tmp;
-
- if (!(tmp = getenv(PKG_DBDIR)))
- tmp = DEF_LOG_DIR;
-
- (void) snprintf(log_dir, sizeof(log_dir), "%s/%s", tmp,
- pkg);
- if (!fexists(log_dir) &&
- ! (pkg2 = find_prefix(log_dir, sizeof(log_dir), tmp, pkg))) {
- pwarnx("can't find package `%s' installed or in a file!", pkg);
- return 1;
- }
- if (pkg2)
- pkg = pkg2;
- if (chdir(log_dir) == FAIL) {
- pwarnx("can't change directory to '%s'!", log_dir);
- free(pkg2);
- return 1;
- }
- installed = TRUE;
- }
-
- /*
- * Index is special info type that has to override all others to make
- * any sense.
- */
- if (Flags & SHOW_INDEX) {
- show_index(pkg, COMMENT_FNAME);
- } else {
- /* Suck in the contents list */
- plist.head = plist.tail = NULL;
- fp = fopen(CONTENTS_FNAME, "r");
- if (!fp) {
- pwarnx("unable to open %s file", CONTENTS_FNAME);
- if (isurl) /* file not on server, check installed */
- goto installed;
- code = 1;
- goto bail;
- }
- /* If we have a prefix, add it now */
- read_plist(&plist, fp);
- fclose(fp);
-
- /* Start showing the package contents */
- if (!Quiet)
- printf("%sInformation for %s:\n\n", InfoPrefix, pkg);
- if (Flags & SHOW_COMMENT)
- show_file("Comment:\n", COMMENT_FNAME);
- if ((Flags & SHOW_REQBY) && !isemptyfile(REQUIRED_BY_FNAME))
- show_file("Required by:\n", REQUIRED_BY_FNAME);
- if (Flags & SHOW_DESC)
- show_file("Description:\n", DESC_FNAME);
- if ((Flags & SHOW_DISPLAY) && fexists(DISPLAY_FNAME))
- show_file("Install notice:\n", DISPLAY_FNAME);
- if (Flags & SHOW_PLIST)
- show_plist("Packing list:\n", &plist, PLIST_SHOW_ALL);
- if ((Flags & SHOW_INSTALL) && fexists(INSTALL_FNAME))
- show_file("Install script:\n", INSTALL_FNAME);
- if ((Flags & SHOW_DEINSTALL) && fexists(DEINSTALL_FNAME))
- show_file("De-Install script:\n", DEINSTALL_FNAME);
- if ((Flags & SHOW_MTREE) && fexists(MTREE_FNAME))
- show_file("mtree file:\n", MTREE_FNAME);
- if (Flags & SHOW_PREFIX)
- show_plist("Prefix(s):\n", &plist, PLIST_CWD);
- if (Flags & SHOW_FILES)
- show_files("Files:\n", &plist);
- if (!Quiet)
- puts(InfoPrefix);
- free_plist(&plist);
- }
-bail:
- free(pkg2);
- leave_playpen(Home);
- if (isTMP)
- unlink(fname);
- return code;
-}
-
-/* fn to be called for pkgs found */
-static int
-foundpkg(const char *found, char *data, int unused)
-{
- if(!Quiet)
- printf("%s\n", found);
- return 0;
-}
-
-/* check if a package "pkgspec" (which can be a pattern) is installed */
-/* return 0 if found, 1 otherwise (indicating an error). */
-static int
-check4pkg(char *pkgspec, char *dbdir)
-{
- if (strpbrk(pkgspec, "<>[]?*{")) {
- /* expensive (pattern) match */
- int found;
-
- found=findmatchingname(dbdir, pkgspec, foundpkg, NULL, 0);
- return !found;
- } else {
- /* simple match */
- char buf[FILENAME_MAX];
- int error;
- struct stat st;
-
- snprintf(buf, sizeof(buf), "%s/%s", dbdir, pkgspec);
- error = (stat(buf, &st) < 0);
- if (!error && !Quiet)
- printf("%s\n", pkgspec);
-
- return error;
- }
-}
-
-void
-cleanup(int sig)
-{
- leave_playpen(Home); /* XXX signal race */
- _exit(1);
-}
-
-int
-pkg_perform(char **pkgs)
-{
- int i, err_cnt = 0;
- char *tmp;
-
- signal(SIGINT, cleanup);
-
- tmp = getenv(PKG_DBDIR);
- if (!tmp)
- tmp = DEF_LOG_DIR;
- /* Overriding action? */
- if (CheckPkg) {
- err_cnt += check4pkg(CheckPkg, tmp);
- } else if (AllInstalled) {
- struct dirent *dp;
- DIR *dirp;
-
- if (!(isdir(tmp) || islinktodir(tmp)))
- return 1;
- if (chdir(tmp) != 0)
- return 1;
- if ((dirp = opendir(".")) != (DIR *) NULL) {
- while ((dp = readdir(dirp)) != (struct dirent *) NULL) {
- if (strcmp(dp->d_name, ".") && strcmp(dp->d_name, "..")) {
- err_cnt += pkg_do(dp->d_name);
- }
- }
- (void) closedir(dirp);
- }
- } else {
- for (i = 0; pkgs[i]; i++) {
- err_cnt += pkg_do(pkgs[i]);
- }
- }
- return err_cnt;
-}
generated by cgit v1.2.3 (git 2.25.1) at 2024-12-16 01:15:12 +0000