#ifndef lint static const char *rcsid = "$Id: pl.c,v 1.5 1993/09/04 05:06:34 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 * * Routines for dealing with the packing list. * */ #include "lib.h" #include "create.h" #define QUERY_GZIP \ "File '%s' appears to be gzip'd.\nWould you like to unpack it first" #define UNZIP "gzip -d %s" #define QUERY_COMPRESS \ "File '%s' appears to be compressed.\nWould you like to unpack it first" #define UNCOMPRESS "compress -d %s" /* Check a list for files that require preconversion */ void check_list(char *home, Package *pkg) { char cmd[FILENAME_MAX]; char name[FILENAME_MAX]; char *where = home; PackingList p = pkg->head; while (p) { if (p->type == PLIST_CWD) where = p->name; else if (p->type == PLIST_IGNORE) p = p->next; else if (p->type == PLIST_FILE) { cmd[0] = '\0'; sprintf(name, "%s/%s", where, p->name); /* gzip? */ if ((suffix(name, "gz") || suffix(name, "z")) && y_or_n(TRUE, QUERY_GZIP, name)) sprintf(cmd, UNZIP, name); /* Compress? */ else if (suffix(name, "Z") && y_or_n(TRUE, QUERY_COMPRESS, name)) sprintf(cmd, UNCOMPRESS, name); if (*cmd) { if (Verbose) printf("Uncompressing-> %s\n", cmd); if (system(cmd)) barf("%s failed!", cmd); nuke_suffix(p->name); } } p = p->next; } } /* * Copy unmarked files in packing list to playpen - marked files * have already been copied in an earlier pass through the list. */ void copy_plist(char *home, Package *plist) { PackingList p = plist->head; char *where = home; while (p) { if (p->type == PLIST_CWD) where = p->name; else if (p->type == PLIST_IGNORE) p = p->next; else if (p->type == PLIST_FILE && !p->marked) { char fn[FILENAME_MAX]; /* First, look for it in the "home" dir */ sprintf(fn, "%s/%s", home, p->name); if (fexists(fn)) copy_hierarchy(home, p->name, FALSE); /* * Otherwise, try along the actual extraction path.. */ else copy_hierarchy(where, p->name, FALSE); } p = p->next; } }