From d0d517913c0c66166bd895f0d14b79260eeb69bb Mon Sep 17 00:00:00 2001 From: Christopher Faylor Date: Sun, 11 Nov 2001 06:07:36 +0000 Subject: * dump_setup.cc: New file. * Makefile.in: Add info for dump_setup.o. * cygcheck.cc (main): Recognize '-c' option for checking setup installed base. * path.cc (cygpath): Read mount table if not loaded. --- winsup/utils/dump_setup.cc | 251 +++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 251 insertions(+) create mode 100644 winsup/utils/dump_setup.cc (limited to 'winsup/utils/dump_setup.cc') diff --git a/winsup/utils/dump_setup.cc b/winsup/utils/dump_setup.cc new file mode 100644 index 000000000..ac0fceed1 --- /dev/null +++ b/winsup/utils/dump_setup.cc @@ -0,0 +1,251 @@ +/* path.cc + + Copyright 2001 Red Hat, Inc. + +This file is part of Cygwin. + +This software is a copyrighted work licensed under the terms of the +Cygwin license. Please consult the file "CYGWIN_LICENSE" for +details. */ + +#include +#include +#include +#include +#include +#include +#include +#include "path.h" + +static int package_len = 20; +static int version_len = 20; + + +typedef struct +{ + char pkgtar[MAX_PATH + 1]; + char pkg[MAX_PATH + 1]; + char ver[MAX_PATH + 1]; + char tail[MAX_PATH + 1]; + char what[16]; +} fileparse; + +static int +find_tar_ext (const char *path) +{ + char *p = strchr (path, '\0') - 7; + if (p <= path) + return 0; + if (*p == '.') + { + if (strcmp (p, ".tar.gz") != 0) + return 0; + } + else if (--p <= path || strcmp (p, ".tar.bz2") != 0) + return 0; + + return p - path; +} + +static char * +base (const char *s) +{ + if (!s) + return 0; + const char *rv = s; + while (*s) + { + if ((*s == '/' || *s == ':' || *s == '\\') && s[1]) + rv = s + 1; + s++; + } + return (char *) rv; +} + +/* Parse a filename into package, version, and extension components. */ +int +parse_filename (const char *in_fn, fileparse& f) +{ + char *p, *ver; + char fn[strlen (in_fn) + 1]; + + strcpy (fn, in_fn); + int n = find_tar_ext (fn); + + if (!n) + return 0; + + strcpy (f.tail, fn + n); + fn[n] = '\0'; + f.pkg[0] = f.what[0] = '\0'; + p = base (fn); + for (ver = p; *ver; ver++) + if (*ver == '-' || *ver == '_') + if (isdigit (ver[1])) + { + *ver++ = 0; + strcpy (f.pkg, p); + break; + } + else if (strcasecmp (ver, "-src") == 0 || + strcasecmp (ver, "-patch") == 0) + { + *ver++ = 0; + strcpy (f.pkg, p); + strcpy (f.what, strlwr (ver)); + strcpy (f.pkgtar, p); + strcat (f.pkgtar, f.tail); + ver = strchr (ver, '\0'); + break; + } + + if (!f.pkg[0]) + strcpy (f.pkg, p); + + if (!f.what[0]) + { + int n; + p = strchr (ver, '\0'); + strcpy (f.pkgtar, in_fn); + if ((p -= 4) >= ver && strcasecmp (p, "-src") == 0) + n = 4; + else if ((p -= 2) >= ver && strcasecmp (p, "-patch") == 0) + n = 6; + else + n = 0; + if (n) + { + strcpy (f.what, p + 1); + *p = '\0'; + p = f.pkgtar + (p - fn) + n; + memmove (p - 4, p, strlen (p)); + } + } + + strcpy (f.ver, *ver ? ver : "0.0"); + return 1; +} + +static bool +dump_file (const char *msg, const char *fn) +{ + char *path = cygpath ("/etc/setup/", fn, NULL); + FILE *fp = fopen (path, "rt"); + bool printed; + char buf[4096]; + if (!fp) + printed = false; + else if (!fgets (buf, 4096, fp)) + printed = false; + { + char *p = strchr (buf, '\0'); + printf ("%s%s%s", msg, buf, (p == buf) || p[-1] != '\n' ? "\n" : ""); + printed = true; + } + if (fp) + fclose (fp); + return printed; +} + +struct pkgver +{ + char *name; + char *ver; +}; + +extern "C" { +int +compar (const void *a, const void *b) +{ + const pkgver *pa = (const pkgver *) a; + const pkgver *pb = (const pkgver *) b; + return strcmp (pa->name, pb->name); +} +} + +bool +match_argv (char **argv, const char *name) +{ + if (!*argv) + return true; + for (char **a = argv; *a; a++) + if (strcasecmp (*a, name) == 0) + return true; + return false; +} + +void +dump_setup (int verbose, char **argv) +{ + char *setup = cygpath ("/etc/setup/installed.db", NULL); + FILE *fp = fopen (setup, "rt"); + puts ("Cygwin Setup information"); + if (fp == NULL) + goto err; + if (verbose) + { + bool need_nl = dump_file ("Last downloaded files to: ", "last-cache"); + if (dump_file ("Last downloaded files from: ", "last-mirror") || need_nl) + puts (""); + } + if (!*argv) + + if (!fp) + goto err; + + int nlines; + nlines = 0; + char buf[4096]; + while (fgets (buf, 4096, fp)) + nlines += 2; /* potentially binary + source */ + if (!nlines) + goto err; + rewind (fp); + + pkgver *packages; + + packages = (pkgver *) calloc (nlines, sizeof(packages[0])); + printf ("%-*s%-*s\n", package_len, "Package", version_len, "Version"); + int n; + for (n = 0; fgets (buf, 4096, fp) && n < nlines;) + { + char *package = strtok (buf, " "); + if (!package || !*package || !match_argv (argv, package)) + continue; + for (int i = 0; i < 2; i++) + { + fileparse f; + char *tar = strtok (NULL, " "); + if (!tar || !*tar || !parse_filename (tar, f)) + break; + + int len = strlen (package); + if (f.what[0]) + len += strlen (f.what) + 1; + packages[n].name = (char *) malloc (len + 1); + strcpy (packages[n].name , package); + if (f.what[0]) + strcat (strcat (packages[n].name, "-"), f.what); + packages[n].ver = strdup (f.ver); + n++; + if (strtok (NULL, " ") == NULL) + break; + } + } + + if (!argv) + qsort (packages, n, sizeof (packages[0]), compar); + + for (int i = 0; i < n; i++) + printf ("%-*s%-*s\n", package_len, packages[i].name, + version_len, packages[i].ver); + fclose (fp); + + return; + +err: + puts ("No setup information found"); + if (fp) + fclose (fp); + return; +} -- cgit v1.2.3