mirror of
https://github.com/sheumann/hush.git
synced 2024-08-14 11:28:58 +00:00
dpkg.c:18: #error It looks like you are using libc5, which does not support dpkg.c:19: #error tfind(). tfind() is used by busybox dpkg. dpkg.c:20: #error Please disable BB_DPKG. Sorry. This was fixed by changing the || to an && in the preprocessor. (We've changed the logic in there too many times.) Found using multibuild.pl.
856 lines
21 KiB
C
856 lines
21 KiB
C
#include <stdio.h>
|
|
#include <string.h>
|
|
#include <stdlib.h>
|
|
#include <search.h>
|
|
#include <errno.h>
|
|
#include <fcntl.h>
|
|
#include <unistd.h>
|
|
#include <utime.h>
|
|
#include <sys/types.h>
|
|
#include <sys/stat.h>
|
|
|
|
#include "busybox.h"
|
|
|
|
|
|
/* Stupid libc doesn't have a reliable way for use to know
|
|
* that libc5 is being used. Assume this is good enough */
|
|
#if !defined __GLIBC__ && !defined __UCLIBC__
|
|
#error It looks like you are using libc5, which does not support
|
|
#error tfind(). tfind() is used by busybox dpkg.
|
|
#error Please disable BB_DPKG. Sorry.
|
|
#endif
|
|
|
|
#define DEPENDSMAX 64 /* maximum number of depends we can handle */
|
|
|
|
/* Should we do full dependency checking? */
|
|
#define DODEPENDS 1
|
|
|
|
/* Should we do debugging? */
|
|
#define DODEBUG 1
|
|
|
|
#ifdef DODEBUG
|
|
#define SYSTEM(x) do_system(x)
|
|
#define DPRINTF(fmt,args...) fprintf(stderr, fmt, ##args)
|
|
#else
|
|
#define SYSTEM(x) system(x)
|
|
#define DPRINTF(fmt,args...) /* nothing */
|
|
#endif
|
|
|
|
/* from dpkg-deb.c */
|
|
extern int deb_extract(int optflags, const char *dir_name, const char *deb_filename);
|
|
static const int dpkg_deb_contents = 1;
|
|
static const int dpkg_deb_control = 2;
|
|
// const int dpkg_deb_info = 4;
|
|
static const int dpkg_deb_extract = 8;
|
|
static const int dpkg_deb_verbose_extract = 16;
|
|
static const int dpkg_deb_list = 32;
|
|
|
|
static const char statusfile[] = "/var/lib/dpkg/status.udeb";
|
|
static const char new_statusfile[] = "/var/lib/dpkg/status.udeb.new";
|
|
static const char bak_statusfile[] = "/var/lib/dpkg/status.udeb.bak";
|
|
|
|
static const char dpkgcidir[] = "/var/lib/dpkg/tmp.ci/";
|
|
|
|
static const char infodir[] = "/var/lib/dpkg/info/";
|
|
static const char udpkg_quiet[] = "UDPKG_QUIET";
|
|
|
|
//static const int status_wantstart = 0;
|
|
//static const int status_wantunknown = (1 << 0);
|
|
static const int status_wantinstall = (1 << 1);
|
|
//static const int status_wanthold = (1 << 2);
|
|
//static const int status_wantdeinstall = (1 << 3);
|
|
//static const int status_wantpurge = (1 << 4);
|
|
static const int status_wantmask = 31;
|
|
|
|
//static const int status_flagstart = 5;
|
|
static const int status_flagok = (1 << 5); /* 32 */
|
|
//static const int status_flagreinstreq = (1 << 6);
|
|
//static const int status_flaghold = (1 << 7);
|
|
//static const int status_flagholdreinstreq = (1 << 8);
|
|
static const int status_flagmask = 480;
|
|
|
|
//static const int status_statusstart = 9;
|
|
//static const int status_statusnoninstalled = (1 << 9); /* 512 */
|
|
static const int status_statusunpacked = (1 << 10);
|
|
static const int status_statushalfconfigured = (1 << 11);
|
|
static const int status_statusinstalled = (1 << 12);
|
|
static const int status_statushalfinstalled = (1 << 13);
|
|
//static const int status_statusconfigfiles = (1 << 14);
|
|
//static const int status_statuspostinstfailed = (1 << 15);
|
|
//static const int status_statusremovalfailed = (1 << 16);
|
|
static const int status_statusmask = 130560; /* i assume status_statusinstalled is supposed to be included */
|
|
|
|
static const char *statuswords[][10] = {
|
|
{ (char *) 0, "unknown", "install", "hold", "deinstall", "purge", 0 },
|
|
{ (char *) 5, "ok", "reinstreq", "hold", "hold-reinstreq", 0 },
|
|
{ (char *) 9, "not-installed", "unpacked", "half-configured",
|
|
"installed", "half-installed", "config-files",
|
|
"post-inst-failed", "removal-failed", 0 }
|
|
};
|
|
|
|
static const int color_white = 0;
|
|
static const int color_grey = 1;
|
|
static const int color_black = 2;
|
|
|
|
/* data structures */
|
|
typedef struct package_s {
|
|
char *file;
|
|
char *package;
|
|
char *version;
|
|
char *depends;
|
|
char *provides;
|
|
char *description;
|
|
int installer_menu_item;
|
|
unsigned long status;
|
|
char color; /* for topo-sort */
|
|
struct package_s *requiredfor[DEPENDSMAX];
|
|
unsigned short requiredcount;
|
|
struct package_s *next;
|
|
} package_t;
|
|
|
|
#ifdef DODEBUG
|
|
static int do_system(const char *cmd)
|
|
{
|
|
DPRINTF("cmd is %s\n", cmd);
|
|
return system(cmd);
|
|
}
|
|
#else
|
|
#define do_system(cmd) system(cmd)
|
|
#endif
|
|
|
|
static int package_compare(const void *p1, const void *p2)
|
|
{
|
|
return strcmp(((package_t *)p1)->package,
|
|
((package_t *)p2)->package);
|
|
}
|
|
|
|
static int remove_dpkgcidir()
|
|
{
|
|
char *rm_dpkgcidir = NULL;
|
|
|
|
rm_dpkgcidir = (char *) xmalloc(strlen(dpkgcidir) + 8);
|
|
strcpy(rm_dpkgcidir, "rm -rf ");
|
|
strcat(rm_dpkgcidir, dpkgcidir);
|
|
|
|
if (SYSTEM(rm_dpkgcidir) != 0) {
|
|
perror("mkdir ");
|
|
return EXIT_FAILURE;
|
|
}
|
|
return EXIT_SUCCESS;
|
|
}
|
|
|
|
#ifdef DODEPENDS
|
|
#include <ctype.h>
|
|
|
|
static char **depends_split(const char *dependsstr)
|
|
{
|
|
static char *dependsvec[DEPENDSMAX];
|
|
char *p;
|
|
int i = 0;
|
|
|
|
dependsvec[0] = 0;
|
|
if (dependsstr == 0) {
|
|
goto end;
|
|
}
|
|
|
|
p = strdup(dependsstr);
|
|
while (*p != 0 && *p != '\n') {
|
|
if (*p != ' ') {
|
|
if (*p == ',') {
|
|
*p = 0;
|
|
dependsvec[++i] = 0;
|
|
} else {
|
|
if (dependsvec[i] == 0) {
|
|
dependsvec[i] = p;
|
|
}
|
|
}
|
|
} else {
|
|
*p = 0; /* eat the space... */
|
|
}
|
|
p++;
|
|
}
|
|
*p = 0;
|
|
|
|
end:
|
|
dependsvec[i+1] = 0;
|
|
return dependsvec;
|
|
}
|
|
|
|
/* Topological sort algorithm:
|
|
* ordered is the output list, pkgs is the dependency graph, pkg is
|
|
* the current node
|
|
*
|
|
* recursively add all the adjacent nodes to the ordered list, marking
|
|
* each one as visited along the way
|
|
*
|
|
* yes, this algorithm looks a bit odd when all the params have the
|
|
* same type :-)
|
|
*/
|
|
static void depends_sort_visit(package_t **ordered, package_t *pkgs,
|
|
package_t *pkg)
|
|
{
|
|
unsigned short i;
|
|
|
|
/* mark node as processing */
|
|
pkg->color = color_grey;
|
|
|
|
/* visit each not-yet-visited node */
|
|
for (i = 0; i < pkg->requiredcount; i++)
|
|
if (pkg->requiredfor[i]->color == color_white)
|
|
depends_sort_visit(ordered, pkgs, pkg->requiredfor[i]);
|
|
|
|
#if 0
|
|
/* add it to the list */
|
|
newnode = (struct package_t *)xmalloc(sizeof(struct package_t));
|
|
/* make a shallow copy */
|
|
*newnode = *pkg;
|
|
newnode->next = *ordered;
|
|
*ordered = newnode;
|
|
#endif
|
|
|
|
pkg->next = *ordered;
|
|
*ordered = pkg;
|
|
|
|
/* mark node as done */
|
|
pkg->color = color_black;
|
|
}
|
|
|
|
static package_t *depends_sort(package_t *pkgs)
|
|
{
|
|
/* TODO: it needs to break cycles in the to-be-installed package
|
|
* graph... */
|
|
package_t *ordered = NULL;
|
|
package_t *pkg;
|
|
|
|
for (pkg = pkgs; pkg != 0; pkg = pkg->next) {
|
|
pkg->color = color_white;
|
|
}
|
|
for (pkg = pkgs; pkg != 0; pkg = pkg->next) {
|
|
if (pkg->color == color_white) {
|
|
depends_sort_visit(&ordered, pkgs, pkg);
|
|
}
|
|
}
|
|
|
|
/* Leaks the old list... return the new one... */
|
|
return ordered;
|
|
}
|
|
|
|
|
|
/* resolve package dependencies --
|
|
* for each package in the list of packages to be installed, we parse its
|
|
* dependency info to determine if the dependent packages are either
|
|
* already installed, or are scheduled to be installed. If both tests fail
|
|
* than bail.
|
|
*
|
|
* The algorithm here is O(n^2*m) where n = number of packages to be
|
|
* installed and m is the # of dependencies per package. Not a terribly
|
|
* efficient algorithm, but given that at any one time you are unlikely
|
|
* to install a very large number of packages it doesn't really matter
|
|
*/
|
|
static package_t *depends_resolve(package_t *pkgs, void *status)
|
|
{
|
|
package_t *pkg, *chk;
|
|
package_t dependpkg;
|
|
char **dependsvec;
|
|
int i;
|
|
void *found;
|
|
|
|
for (pkg = pkgs; pkg != 0; pkg = pkg->next) {
|
|
dependsvec = depends_split(pkg->depends);
|
|
i = 0;
|
|
while (dependsvec[i] != 0) {
|
|
/* Check for dependencies; first look for installed packages */
|
|
dependpkg.package = dependsvec[i];
|
|
if ((found = tfind(&dependpkg, &status, package_compare)) == 0 ||
|
|
((chk = *(package_t **)found) &&
|
|
(chk->status & (status_flagok | status_statusinstalled)) !=
|
|
(status_flagok | status_statusinstalled))) {
|
|
|
|
/* if it fails, we look through the list of packages we are going to
|
|
* install */
|
|
for (chk = pkgs; chk != 0; chk = chk->next) {
|
|
if (strcmp(chk->package, dependsvec[i]) == 0 || (chk->provides &&
|
|
strncmp(chk->provides, dependsvec[i], strlen(dependsvec[i])) == 0)) {
|
|
if (chk->requiredcount >= DEPENDSMAX) {
|
|
fprintf(stderr, "Too many dependencies for %s\n", chk->package);
|
|
return 0;
|
|
}
|
|
if (chk != pkg) {
|
|
chk->requiredfor[chk->requiredcount++] = pkg;
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
if (chk == 0) {
|
|
fprintf(stderr, "%s depends on %s, but it is not going to be installed\n", pkg->package, dependsvec[i]);
|
|
return 0;
|
|
}
|
|
}
|
|
i++;
|
|
}
|
|
}
|
|
|
|
return depends_sort(pkgs);
|
|
}
|
|
#endif
|
|
|
|
/* Status file handling routines
|
|
*
|
|
* This is a fairly minimalistic implementation. there are two main functions
|
|
* that are supported:
|
|
*
|
|
* 1) reading the entire status file:
|
|
* the status file is read into memory as a binary-tree, with just the
|
|
* package and status info preserved
|
|
*
|
|
* 2) merging the status file
|
|
* control info from (new) packages is merged into the status file,
|
|
* replacing any pre-existing entries. when a merge happens, status info
|
|
* read using the status_read function is written back to the status file
|
|
*/
|
|
static unsigned long status_parse(const char *line)
|
|
{
|
|
char *p;
|
|
int i, j;
|
|
unsigned long l = 0;
|
|
|
|
for (i = 0; i < 3; i++) {
|
|
if ((p = strchr(line, ' ')) != NULL) {
|
|
*p = 0;
|
|
}
|
|
j = 1;
|
|
while (statuswords[i][j] != 0) {
|
|
if (strcmp(line, statuswords[i][j]) == 0) {
|
|
l |= (1 << ((int)statuswords[i][0] + j - 1));
|
|
break;
|
|
}
|
|
j++;
|
|
}
|
|
/* parse error */
|
|
if (statuswords[i][j] == 0) {
|
|
return 0;
|
|
}
|
|
line = p+1;
|
|
}
|
|
|
|
return l;
|
|
}
|
|
|
|
static const char *status_print(unsigned long flags)
|
|
{
|
|
/* this function returns a static buffer... */
|
|
static char buf[256];
|
|
int i, j;
|
|
|
|
buf[0] = 0;
|
|
for (i = 0; i < 3; i++) {
|
|
j = 1;
|
|
while (statuswords[i][j] != 0) {
|
|
if ((flags & (1 << ((int)statuswords[i][0] + j - 1))) != 0) {
|
|
strcat(buf, statuswords[i][j]);
|
|
if (i < 2) strcat(buf, " ");
|
|
break;
|
|
}
|
|
j++;
|
|
}
|
|
if (statuswords[i][j] == 0) {
|
|
fprintf(stderr, "corrupted status flag!!\n");
|
|
return NULL;
|
|
}
|
|
}
|
|
|
|
return buf;
|
|
}
|
|
|
|
/*
|
|
* Read a control file (or a stanza of a status file) and parse it,
|
|
* filling parsed fields into the package structure
|
|
*/
|
|
static int control_read(FILE *file, package_t *p)
|
|
{
|
|
char *line;
|
|
|
|
while ((line = get_line_from_file(file)) != NULL) {
|
|
line[strlen(line)] = 0;
|
|
|
|
if (strlen(line) == 0) {
|
|
break;
|
|
} else
|
|
if (strstr(line, "Package: ") == line) {
|
|
p->package = strdup(line + 9);
|
|
} else
|
|
if (strstr(line, "Status: ") == line) {
|
|
p->status = status_parse(line + 8);
|
|
} else
|
|
if (strstr(line, "Depends: ") == line) {
|
|
p->depends = strdup(line + 9);
|
|
} else
|
|
if (strstr(line, "Provides: ") == line) {
|
|
p->provides = strdup(line + 10);
|
|
} else
|
|
if (strstr(line, "Description: ") == line) {
|
|
p->description = strdup(line + 13);
|
|
/* This is specific to the Debian Installer. Ifdef? */
|
|
} else
|
|
if (strstr(line, "installer-menu-item: ") == line) {
|
|
p->installer_menu_item = atoi(line + 21);
|
|
}
|
|
/* TODO: localized descriptions */
|
|
}
|
|
free(line);
|
|
return EXIT_SUCCESS;
|
|
}
|
|
|
|
static void *status_read(void)
|
|
{
|
|
FILE *f;
|
|
void *status = 0;
|
|
package_t *m = 0, *p = 0, *t = 0;
|
|
|
|
if ((f = fopen(statusfile, "r")) == NULL) {
|
|
perror(statusfile);
|
|
return 0;
|
|
}
|
|
|
|
if (getenv(udpkg_quiet) == NULL) {
|
|
printf("(Reading database...)\n");
|
|
}
|
|
|
|
while (!feof(f)) {
|
|
m = (package_t *)xmalloc(sizeof(package_t));
|
|
memset(m, 0, sizeof(package_t));
|
|
control_read(f, m);
|
|
if (m->package) {
|
|
/*
|
|
* If there is an item in the tree by this name,
|
|
* it must be a virtual package; insert real
|
|
* package in preference.
|
|
*/
|
|
tdelete(m, &status, package_compare);
|
|
tsearch(m, &status, package_compare);
|
|
if (m->provides) {
|
|
/*
|
|
* A "Provides" triggers the insertion
|
|
* of a pseudo package into the status
|
|
* binary-tree.
|
|
*/
|
|
p = (package_t *)xmalloc(sizeof(package_t));
|
|
memset(p, 0, sizeof(package_t));
|
|
p->package = strdup(m->provides);
|
|
|
|
t = *(package_t **)tsearch(p, &status, package_compare);
|
|
if (t != p) {
|
|
free(p->package);
|
|
free(p);
|
|
}
|
|
else {
|
|
/*
|
|
* Pseudo package status is the
|
|
* same as the status of the
|
|
* package providing it
|
|
* FIXME: (not quite right, if 2
|
|
* packages of different statuses
|
|
* provide it).
|
|
*/
|
|
t->status = m->status;
|
|
}
|
|
}
|
|
}
|
|
else {
|
|
free(m);
|
|
}
|
|
}
|
|
fclose(f);
|
|
return status;
|
|
}
|
|
|
|
static int status_merge(void *status, package_t *pkgs)
|
|
{
|
|
FILE *fin, *fout;
|
|
char *line;
|
|
package_t *pkg = 0, *statpkg = 0;
|
|
package_t locpkg;
|
|
int r = 0;
|
|
|
|
if ((fin = fopen(statusfile, "r")) == NULL) {
|
|
perror(statusfile);
|
|
return 0;
|
|
}
|
|
if ((fout = fopen(new_statusfile, "w")) == NULL) {
|
|
perror(new_statusfile);
|
|
return 0;
|
|
}
|
|
if (getenv(udpkg_quiet) == NULL) {
|
|
printf("(Updating database...)\n");
|
|
}
|
|
|
|
while (((line = get_line_from_file(fin)) != NULL) && !feof(fin)) {
|
|
line[strlen(line)] = 0; /* trim newline */
|
|
/* If we see a package header, find out if it's a package
|
|
* that we have processed. if so, we skip that block for
|
|
* now (write it at the end).
|
|
*
|
|
* we also look at packages in the status cache and update
|
|
* their status fields
|
|
*/
|
|
if (strstr(line, "Package: ") == line) {
|
|
for (pkg = pkgs; pkg != 0 && strncmp(line + 9,
|
|
pkg->package, strlen(line) - 9) != 0;
|
|
pkg = pkg->next) ;
|
|
|
|
locpkg.package = line + 9;
|
|
statpkg = tfind(&locpkg, &status, package_compare);
|
|
|
|
/* note: statpkg should be non-zero, unless the status
|
|
* file was changed while we are processing (no locking
|
|
* is currently done...
|
|
*/
|
|
if (statpkg != 0) {
|
|
statpkg = *(package_t **)statpkg;
|
|
}
|
|
}
|
|
if (pkg != 0) {
|
|
continue;
|
|
}
|
|
if (strstr(line, "Status: ") == line && statpkg != 0) {
|
|
snprintf(line, sizeof(line), "Status: %s",
|
|
status_print(statpkg->status));
|
|
}
|
|
fputs(line, fout);
|
|
fputc('\n', fout);
|
|
}
|
|
free(line);
|
|
|
|
// Print out packages we processed.
|
|
for (pkg = pkgs; pkg != 0; pkg = pkg->next) {
|
|
fprintf(fout, "Package: %s\nStatus: %s\n",
|
|
pkg->package, status_print(pkg->status));
|
|
if (pkg->depends)
|
|
fprintf(fout, "Depends: %s\n", pkg->depends);
|
|
if (pkg->provides)
|
|
fprintf(fout, "Provides: %s\n", pkg->provides);
|
|
if (pkg->installer_menu_item)
|
|
fprintf(fout, "installer-menu-item: %i\n", pkg->installer_menu_item);
|
|
if (pkg->description)
|
|
fprintf(fout, "Description: %s\n", pkg->description);
|
|
fputc('\n', fout);
|
|
}
|
|
|
|
fclose(fin);
|
|
fclose(fout);
|
|
|
|
r = rename(statusfile, bak_statusfile);
|
|
if (r == 0) {
|
|
r = rename(new_statusfile, statusfile);
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
static int is_file(const char *fn)
|
|
{
|
|
struct stat statbuf;
|
|
|
|
if (stat(fn, &statbuf) < 0) {
|
|
return 0;
|
|
}
|
|
return S_ISREG(statbuf.st_mode);
|
|
}
|
|
|
|
static int dpkg_doconfigure(package_t *pkg)
|
|
{
|
|
int r;
|
|
char postinst[1024];
|
|
char buf[1024];
|
|
|
|
DPRINTF("Configuring %s\n", pkg->package);
|
|
pkg->status &= status_statusmask;
|
|
snprintf(postinst, sizeof(postinst), "%s%s.postinst", infodir, pkg->package);
|
|
|
|
if (is_file(postinst)) {
|
|
snprintf(buf, sizeof(buf), "%s configure", postinst);
|
|
if ((r = do_system(buf)) != 0) {
|
|
fprintf(stderr, "postinst exited with status %d\n", r);
|
|
pkg->status |= status_statushalfconfigured;
|
|
return 1;
|
|
}
|
|
}
|
|
pkg->status |= status_statusinstalled;
|
|
|
|
return 0;
|
|
}
|
|
|
|
static int dpkg_dounpack(package_t *pkg)
|
|
{
|
|
int r = 0, i;
|
|
char *cwd;
|
|
FILE *outfp;
|
|
char *src_file = NULL;
|
|
char *dst_file = NULL;
|
|
char *lst_file = NULL;
|
|
char *adminscripts[] = { "/prerm", "/postrm", "/preinst", "/postinst",
|
|
"/conffiles", "/md5sums", "/shlibs", "/templates" };
|
|
char buf[1024], buf2[1024];
|
|
|
|
DPRINTF("Unpacking %s\n", pkg->package);
|
|
|
|
cwd = getcwd(0, 0);
|
|
chdir("/");
|
|
deb_extract(dpkg_deb_extract, "/", pkg->file);
|
|
|
|
/* Installs the package scripts into the info directory */
|
|
for (i = 0; i < sizeof(adminscripts) / sizeof(adminscripts[0]); i++) {
|
|
/* The full path of the current location of the admin file */
|
|
src_file = xrealloc(src_file, strlen(dpkgcidir) + strlen(pkg->package) + strlen(adminscripts[i]) + 1);
|
|
strcpy(src_file, dpkgcidir);
|
|
strcat(src_file, pkg->package);
|
|
strcat(src_file, adminscripts[i]);
|
|
|
|
/* the full path of where we want the file to be copied to */
|
|
dst_file = xrealloc(dst_file, strlen(infodir) + strlen(pkg->package) + strlen(adminscripts[i]) + 1);
|
|
strcpy(dst_file, infodir);
|
|
strcat(dst_file, pkg->package);
|
|
strcat(dst_file, adminscripts[i]);
|
|
|
|
/* copy admin file to permanent home */
|
|
if (copy_file(src_file, dst_file, TRUE, FALSE, FALSE) < 0) {
|
|
error_msg_and_die("Cannot copy %s to %s ", buf, buf2);
|
|
}
|
|
|
|
/* create the list file */
|
|
lst_file = (char *) xmalloc(strlen(infodir) + strlen(pkg->package) + 6);
|
|
strcpy(lst_file, infodir);
|
|
strcat(lst_file, pkg->package);
|
|
strcat(lst_file, ".list");
|
|
outfp = freopen(lst_file, "w", stdout);
|
|
deb_extract(dpkg_deb_list, NULL, pkg->file);
|
|
stdout = freopen(NULL, "w", outfp);
|
|
|
|
printf("done\n");
|
|
getchar();
|
|
|
|
fclose(outfp);
|
|
}
|
|
|
|
pkg->status &= status_wantmask;
|
|
pkg->status |= status_wantinstall;
|
|
pkg->status &= status_flagmask;
|
|
pkg->status |= status_flagok;
|
|
pkg->status &= status_statusmask;
|
|
|
|
if (r == 0) {
|
|
pkg->status |= status_statusunpacked;
|
|
} else {
|
|
pkg->status |= status_statushalfinstalled;
|
|
}
|
|
chdir(cwd);
|
|
return r;
|
|
}
|
|
|
|
/*
|
|
* Extract and parse the control.tar.gz from the specified package
|
|
*/
|
|
static int dpkg_unpackcontrol(package_t *pkg)
|
|
{
|
|
char *tmp_name;
|
|
FILE *file;
|
|
int length;
|
|
|
|
/* clean the temp directory (dpkgcidir) be recreating it */
|
|
remove_dpkgcidir();
|
|
if (mkdir(dpkgcidir, S_IRWXU) != 0) {
|
|
perror("mkdir");
|
|
return EXIT_FAILURE;
|
|
}
|
|
|
|
/*
|
|
* Get the package name from the file name,
|
|
* first remove the directories
|
|
*/
|
|
if ((tmp_name = strrchr(pkg->file, '/')) == NULL) {
|
|
tmp_name = pkg->file;
|
|
} else {
|
|
tmp_name++;
|
|
}
|
|
/* now remove trailing version numbers etc */
|
|
length = strcspn(tmp_name, "_.");
|
|
pkg->package = (char *) xmalloc(length + 1);
|
|
/* store the package name */
|
|
strncpy(pkg->package, tmp_name, length);
|
|
|
|
/* work out the full extraction path */
|
|
tmp_name = (char *) xmalloc(strlen(dpkgcidir) + strlen(pkg->package) + 9);
|
|
memset(tmp_name, 0, strlen(dpkgcidir) + strlen(pkg->package) + 9);
|
|
strcpy(tmp_name, dpkgcidir);
|
|
strcat(tmp_name, pkg->package);
|
|
|
|
/* extract control.tar.gz to the full extraction path */
|
|
deb_extract(dpkg_deb_control, tmp_name, pkg->file);
|
|
|
|
/* parse the extracted control file */
|
|
strcat(tmp_name, "/control");
|
|
if ((file = fopen(tmp_name, "r")) == NULL) {
|
|
return EXIT_FAILURE;
|
|
}
|
|
if (control_read(file, pkg) == EXIT_FAILURE) {
|
|
return EXIT_FAILURE;
|
|
}
|
|
|
|
return EXIT_SUCCESS;
|
|
}
|
|
|
|
static int dpkg_unpack(package_t *pkgs, void *status)
|
|
{
|
|
int r = 0;
|
|
package_t *pkg;
|
|
|
|
for (pkg = pkgs; pkg != 0; pkg = pkg->next) {
|
|
if (dpkg_unpackcontrol(pkg) == EXIT_FAILURE) {
|
|
return EXIT_FAILURE;
|
|
}
|
|
if ((r = dpkg_dounpack(pkg)) != 0 ) {
|
|
break;
|
|
}
|
|
}
|
|
status_merge(status, pkgs);
|
|
remove_dpkgcidir();
|
|
|
|
return r;
|
|
}
|
|
|
|
static int dpkg_configure(package_t *pkgs, void *status)
|
|
{
|
|
int r = 0;
|
|
void *found;
|
|
package_t *pkg;
|
|
|
|
for (pkg = pkgs; pkg != 0 && r == 0; pkg = pkg->next) {
|
|
found = tfind(pkg, &status, package_compare);
|
|
|
|
if (found == 0) {
|
|
fprintf(stderr, "Trying to configure %s, but it is not installed\n", pkg->package);
|
|
r = 1;
|
|
}
|
|
/* configure the package listed in the status file;
|
|
* not pkg, as we have info only for the latter
|
|
*/
|
|
else {
|
|
r = dpkg_doconfigure(*(package_t **)found);
|
|
}
|
|
}
|
|
status_merge(status, 0);
|
|
|
|
return r;
|
|
}
|
|
|
|
static int dpkg_install(package_t *pkgs, void *status)
|
|
{
|
|
package_t *p, *ordered = 0;
|
|
|
|
/* Stage 1: parse all the control information */
|
|
for (p = pkgs; p != 0; p = p->next) {
|
|
if (dpkg_unpackcontrol(p) == EXIT_FAILURE) {
|
|
perror(p->file);
|
|
return EXIT_FAILURE;
|
|
}
|
|
}
|
|
|
|
/* Stage 2: resolve dependencies */
|
|
#ifdef DODEPENDS
|
|
ordered = depends_resolve(pkgs, status);
|
|
#else
|
|
ordered = pkgs;
|
|
#endif
|
|
|
|
/* Stage 3: install */
|
|
for (p = ordered; p != 0; p = p->next) {
|
|
p->status &= status_wantmask;
|
|
p->status |= status_wantinstall;
|
|
|
|
/* for now the flag is always set to ok... this is probably
|
|
* not what we want
|
|
*/
|
|
p->status &= status_flagmask;
|
|
p->status |= status_flagok;
|
|
|
|
DPRINTF("Installing %s\n", p->package);
|
|
if (dpkg_dounpack(p) != 0) {
|
|
perror(p->file);
|
|
}
|
|
if (dpkg_doconfigure(p) != 0) {
|
|
perror(p->file);
|
|
}
|
|
}
|
|
|
|
if (ordered != 0) {
|
|
status_merge(status, pkgs);
|
|
}
|
|
remove_dpkgcidir();
|
|
|
|
return 0;
|
|
}
|
|
|
|
static int dpkg_remove(package_t *pkgs, void *status)
|
|
{
|
|
package_t *p;
|
|
|
|
for (p = pkgs; p != 0; p = p->next)
|
|
{
|
|
}
|
|
status_merge(status, 0);
|
|
|
|
return 0;
|
|
}
|
|
|
|
extern int dpkg_main(int argc, char **argv)
|
|
{
|
|
char opt = 0;
|
|
char *s;
|
|
package_t *p, *packages = NULL;
|
|
char *cwd = getcwd(0, 0);
|
|
void *status = NULL;
|
|
|
|
while (*++argv) {
|
|
if (**argv == '-') {
|
|
/* Nasty little hack to "parse" long options. */
|
|
s = *argv;
|
|
while (*s == '-') {
|
|
s++;
|
|
}
|
|
opt=s[0];
|
|
} else {
|
|
p = (package_t *)xmalloc(sizeof(package_t));
|
|
memset(p, 0, sizeof(package_t));
|
|
|
|
if (**argv == '/') {
|
|
p->file = *argv;
|
|
} else
|
|
if (opt != 'c') {
|
|
p->file = xmalloc(strlen(cwd) + strlen(*argv) + 2);
|
|
sprintf(p->file, "%s/%s", cwd, *argv);
|
|
} else {
|
|
p->package = strdup(*argv);
|
|
}
|
|
|
|
p->next = packages;
|
|
packages = p;
|
|
}
|
|
}
|
|
|
|
status = status_read();
|
|
|
|
switch (opt) {
|
|
case 'i':
|
|
return dpkg_install(packages, status);
|
|
case 'r':
|
|
return dpkg_remove(packages, status);
|
|
case 'u':
|
|
return dpkg_unpack(packages, status);
|
|
case 'c':
|
|
return dpkg_configure(packages, status);
|
|
default :
|
|
show_usage();
|
|
return EXIT_FAILURE;
|
|
}
|
|
}
|