rpm/lib/transaction.c

2263 lines
60 KiB
C

/** \ingroup rpmts
* \file lib/transaction.c
*/
#include "system.h"
#include "rpmlib.h"
#include "rpmmacro.h" /* XXX for rpmExpand */
#include "fsm.h"
#include "psm.h"
#include "rpmdb.h"
#include "rpmdb_internal.h" /* XXX for dbiIndexSetCount */
#include "rpmds.h"
#include "rpmlock.h"
#define _RPMFI_INTERNAL /* fi->replaced, fi->actions... */
#include "rpmfi.h"
#define _RPMTE_INTERNAL /* XXX te->h, te->fd, te->h */
#include "rpmte.h"
#include "rpmts_internal.h"
#include "cpio.h"
#include "fprint.h"
#include "legacy.h" /* XXX domd5 */
#include "misc.h" /* XXX (free)splitString, currentDirectory */
#include "debug.h"
#include "idtx.h"
/**
*/
static int archOkay(const char * pkgArch)
{
if (pkgArch == NULL) return 0;
return (rpmMachineScore(RPM_MACHTABLE_INSTARCH, pkgArch) ? 1 : 0);
}
/**
*/
static int osOkay(const char * pkgOs)
{
if (pkgOs == NULL) return 0;
return (rpmMachineScore(RPM_MACHTABLE_INSTOS, pkgOs) ? 1 : 0);
}
/**
*/
static int sharedCmp(const void * one, const void * two)
{
sharedFileInfo a = (sharedFileInfo) one;
sharedFileInfo b = (sharedFileInfo) two;
if (a->otherPkg < b->otherPkg)
return -1;
else if (a->otherPkg > b->otherPkg)
return 1;
return 0;
}
/**
* handleInstInstalledFiles.
* @param ts transaction set
* @param p current transaction element
* @param fi file info set
* @param shared shared file info
* @param sharedCount no. of shared elements
* @param reportConflicts
*/
/* XXX only ts->{probs,rpmdb} modified */
static int handleInstInstalledFiles(const rpmts ts,
rpmte p, rpmfi fi,
sharedFileInfo shared,
int sharedCount, int reportConflicts)
{
uint32_t tscolor = rpmtsColor(ts);
uint32_t prefcolor = rpmtsPrefColor(ts);
uint32_t otecolor, tecolor;
uint32_t oFColor, FColor;
const char * altNEVR = NULL;
rpmfi otherFi = NULL;
int numReplaced = 0;
rpmps ps;
int i;
{ rpmdbMatchIterator mi;
Header h;
int scareMem = 0;
mi = rpmtsInitIterator(ts, RPMDBI_PACKAGES,
&shared->otherPkg, sizeof(shared->otherPkg));
while ((h = rpmdbNextIterator(mi)) != NULL) {
altNEVR = hGetNEVRA(h, NULL);
otherFi = rpmfiNew(ts, h, RPMTAG_BASENAMES, scareMem);
break;
}
mi = rpmdbFreeIterator(mi);
}
/* Compute package color. */
tecolor = rpmteColor(p);
tecolor &= tscolor;
/* Compute other pkg color. */
otecolor = 0;
otherFi = rpmfiInit(otherFi, 0);
if (otherFi != NULL)
while (rpmfiNext(otherFi) >= 0)
otecolor |= rpmfiFColor(otherFi);
otecolor &= tscolor;
if (otherFi == NULL)
return 1;
fi->replaced = xcalloc(sharedCount, sizeof(*fi->replaced));
ps = rpmtsProblems(ts);
for (i = 0; i < sharedCount; i++, shared++) {
int otherFileNum, fileNum;
int isCfgFile;
otherFileNum = shared->otherFileNum;
(void) rpmfiSetFX(otherFi, otherFileNum);
oFColor = rpmfiFColor(otherFi);
oFColor &= tscolor;
fileNum = shared->pkgFileNum;
(void) rpmfiSetFX(fi, fileNum);
FColor = rpmfiFColor(fi);
FColor &= tscolor;
isCfgFile = ((rpmfiFFlags(otherFi) | rpmfiFFlags(fi)) & RPMFILE_CONFIG);
#ifdef DYING
/* XXX another tedious segfault, assume file state normal. */
if (otherStates && otherStates[otherFileNum] != RPMFILE_STATE_NORMAL)
continue;
#endif
if (XFA_SKIPPING(fi->actions[fileNum]))
continue;
if (!(fi->mapflags & CPIO_SBIT_CHECK)) {
int16_t omode = rpmfiFMode(otherFi);
if (S_ISREG(omode) && (omode & 06000) != 0) {
fi->mapflags |= CPIO_SBIT_CHECK;
}
}
if (rpmfiCompare(otherFi, fi)) {
int rConflicts;
rConflicts = reportConflicts;
/* Resolve file conflicts to prefer Elf64 (if not forced). */
if (tscolor != 0 && FColor != 0 && FColor != oFColor)
{
if (oFColor & prefcolor) {
fi->actions[fileNum] = FA_SKIPCOLOR;
rConflicts = 0;
} else
if (FColor & prefcolor) {
fi->actions[fileNum] = FA_CREATE;
rConflicts = 0;
}
}
if (rConflicts) {
rpmpsAppend(ps, RPMPROB_FILE_CONFLICT,
rpmteNEVRA(p), rpmteKey(p),
rpmfiDN(fi), rpmfiBN(fi),
altNEVR,
0);
}
/* Save file identifier to mark as state REPLACED. */
if ( !(isCfgFile || XFA_SKIPPING(fi->actions[fileNum])) ) {
/* FIX: p->replaced, not fi */
if (!shared->isRemoved)
fi->replaced[numReplaced++] = *shared;
}
}
/* Determine config file dispostion, skipping missing files (if any). */
if (isCfgFile) {
int skipMissing =
((rpmtsFlags(ts) & RPMTRANS_FLAG_ALLFILES) ? 0 : 1);
rpmFileAction action = rpmfiDecideFate(otherFi, fi, skipMissing);
fi->actions[fileNum] = action;
}
fi->replacedSizes[fileNum] = rpmfiFSize(otherFi);
}
ps = rpmpsFree(ps);
altNEVR = _free(altNEVR);
otherFi = rpmfiFree(otherFi);
fi->replaced = xrealloc(fi->replaced, /* XXX memory leak */
sizeof(*fi->replaced) * (numReplaced + 1));
fi->replaced[numReplaced].otherPkg = 0;
return 0;
}
/**
*/
/* XXX only ts->rpmdb modified */
static int handleRmvdInstalledFiles(const rpmts ts, rpmfi fi,
sharedFileInfo shared, int sharedCount)
{
HGE_t hge = fi->hge;
Header h;
const char * otherStates;
int i, xx;
rpmdbMatchIterator mi;
mi = rpmtsInitIterator(ts, RPMDBI_PACKAGES,
&shared->otherPkg, sizeof(shared->otherPkg));
h = rpmdbNextIterator(mi);
if (h == NULL) {
mi = rpmdbFreeIterator(mi);
return 1;
}
xx = hge(h, RPMTAG_FILESTATES, NULL, (void **) &otherStates, NULL);
for (i = 0; i < sharedCount; i++, shared++) {
int otherFileNum, fileNum;
otherFileNum = shared->otherFileNum;
fileNum = shared->pkgFileNum;
if (otherStates[otherFileNum] != RPMFILE_STATE_NORMAL)
continue;
fi->actions[fileNum] = FA_SKIP;
}
mi = rpmdbFreeIterator(mi);
return 0;
}
#define ISROOT(_d) (((_d)[0] == '/' && (_d)[1] == '\0') ? "" : (_d))
int _fps_debug = 0;
static int fpsCompare (const void * one, const void * two)
{
const struct fingerPrint_s * a = (const struct fingerPrint_s *)one;
const struct fingerPrint_s * b = (const struct fingerPrint_s *)two;
int adnlen = strlen(a->entry->dirName);
int asnlen = (a->subDir ? strlen(a->subDir) : 0);
int abnlen = strlen(a->baseName);
int bdnlen = strlen(b->entry->dirName);
int bsnlen = (b->subDir ? strlen(b->subDir) : 0);
int bbnlen = strlen(b->baseName);
char * afn, * bfn, * t;
int rc = 0;
if (adnlen == 1 && asnlen != 0) adnlen = 0;
if (bdnlen == 1 && bsnlen != 0) bdnlen = 0;
afn = t = alloca(adnlen+asnlen+abnlen+2);
if (adnlen) t = stpcpy(t, a->entry->dirName);
*t++ = '/';
if (a->subDir && asnlen) t = stpcpy(t, a->subDir);
if (abnlen) t = stpcpy(t, a->baseName);
if (afn[0] == '/' && afn[1] == '/') afn++;
bfn = t = alloca(bdnlen+bsnlen+bbnlen+2);
if (bdnlen) t = stpcpy(t, b->entry->dirName);
*t++ = '/';
if (b->subDir && bsnlen) t = stpcpy(t, b->subDir);
if (bbnlen) t = stpcpy(t, b->baseName);
if (bfn[0] == '/' && bfn[1] == '/') bfn++;
rc = strcmp(afn, bfn);
if (_fps_debug)
fprintf(stderr, "\trc(%d) = strcmp(\"%s\", \"%s\")\n", rc, afn, bfn);
if (_fps_debug)
fprintf(stderr, "\t%s/%s%s\trc %d\n",
ISROOT(b->entry->dirName),
(b->subDir ? b->subDir : ""),
b->baseName,
rc
);
return rc;
}
static int _linear_fps_search = 0;
static int findFps(const struct fingerPrint_s * fiFps,
const struct fingerPrint_s * otherFps,
int otherFc)
{
int otherFileNum;
if (_fps_debug)
fprintf(stderr, "==> %s/%s%s\n",
ISROOT(fiFps->entry->dirName),
(fiFps->subDir ? fiFps->subDir : ""),
fiFps->baseName);
if (_linear_fps_search) {
linear:
for (otherFileNum = 0; otherFileNum < otherFc; otherFileNum++, otherFps++) {
if (_fps_debug)
fprintf(stderr, "\t%4d %s/%s%s\n", otherFileNum,
ISROOT(otherFps->entry->dirName),
(otherFps->subDir ? otherFps->subDir : ""),
otherFps->baseName);
/* If the addresses are the same, so are the values. */
if (fiFps == otherFps)
break;
/* Otherwise, compare fingerprints by value. */
if (FP_EQUAL((*fiFps), (*otherFps)))
break;
}
if (otherFileNum == otherFc) {
if (_fps_debug)
fprintf(stderr, "*** FP_EQUAL NULL %s/%s%s\n",
ISROOT(fiFps->entry->dirName),
(fiFps->subDir ? fiFps->subDir : ""),
fiFps->baseName);
}
return otherFileNum;
} else {
const struct fingerPrint_s * bingoFps;
bingoFps = bsearch(fiFps, otherFps, otherFc, sizeof(*otherFps), fpsCompare);
if (bingoFps == NULL) {
if (_fps_debug)
fprintf(stderr, "*** bingoFps NULL %s/%s%s\n",
ISROOT(fiFps->entry->dirName),
(fiFps->subDir ? fiFps->subDir : ""),
fiFps->baseName);
goto linear;
}
/* If the addresses are the same, so are the values. */
/* LCL: looks good to me */
if (!(fiFps == bingoFps || FP_EQUAL((*fiFps), (*bingoFps)))) {
if (_fps_debug)
fprintf(stderr, "*** BAD %s/%s%s\n",
ISROOT(bingoFps->entry->dirName),
(bingoFps->subDir ? bingoFps->subDir : ""),
bingoFps->baseName);
goto linear;
}
otherFileNum = (bingoFps != NULL ? (bingoFps - otherFps) : 0);
}
return otherFileNum;
}
/**
* Update disk space needs on each partition for this package's files.
*/
/* XXX only ts->{probs,di} modified */
static void handleOverlappedFiles(const rpmts ts,
const rpmte p, rpmfi fi)
{
uint32_t fixupSize = 0;
rpmps ps;
const char * fn;
int i, j;
ps = rpmtsProblems(ts);
fi = rpmfiInit(fi, 0);
if (fi != NULL)
while ((i = rpmfiNext(fi)) >= 0) {
uint32_t tscolor = rpmtsColor(ts);
uint32_t prefcolor = rpmtsPrefColor(ts);
uint32_t oFColor, FColor;
struct fingerPrint_s * fiFps;
int otherPkgNum, otherFileNum;
rpmfi otherFi;
int32_t FFlags;
int16_t FMode;
const rpmfi * recs;
int numRecs;
if (XFA_SKIPPING(fi->actions[i]))
continue;
fn = rpmfiFN(fi);
fiFps = fi->fps + i;
FFlags = rpmfiFFlags(fi);
FMode = rpmfiFMode(fi);
FColor = rpmfiFColor(fi);
FColor &= tscolor;
fixupSize = 0;
/*
* Retrieve all records that apply to this file. Note that the
* file info records were built in the same order as the packages
* will be installed and removed so the records for an overlapped
* files will be sorted in exactly the same order.
*/
(void) htGetEntry(ts->ht, fiFps,
(const void ***) &recs, &numRecs, NULL);
/*
* If this package is being added, look only at other packages
* being added -- removed packages dance to a different tune.
*
* If both this and the other package are being added, overlapped
* files must be identical (or marked as a conflict). The
* disposition of already installed config files leads to
* a small amount of extra complexity.
*
* If this package is being removed, then there are two cases that
* need to be worried about:
* If the other package is being added, then skip any overlapped files
* so that this package removal doesn't nuke the overlapped files
* that were just installed.
* If both this and the other package are being removed, then each
* file removal from preceding packages needs to be skipped so that
* the file removal occurs only on the last occurence of an overlapped
* file in the transaction set.
*
*/
/* Locate this overlapped file in the set of added/removed packages. */
for (j = 0; j < numRecs && recs[j] != fi; j++)
{};
/* Find what the previous disposition of this file was. */
otherFileNum = -1; /* keep gcc quiet */
otherFi = NULL;
for (otherPkgNum = j - 1; otherPkgNum >= 0; otherPkgNum--) {
struct fingerPrint_s * otherFps;
int otherFc;
otherFi = recs[otherPkgNum];
/* Added packages need only look at other added packages. */
if (rpmteType(p) == TR_ADDED && rpmteType(otherFi->te) != TR_ADDED)
continue;
otherFps = otherFi->fps;
otherFc = rpmfiFC(otherFi);
otherFileNum = findFps(fiFps, otherFps, otherFc);
(void) rpmfiSetFX(otherFi, otherFileNum);
/* XXX Happens iff fingerprint for incomplete package install. */
if (otherFi->actions[otherFileNum] != FA_UNKNOWN)
break;
}
oFColor = rpmfiFColor(otherFi);
oFColor &= tscolor;
switch (rpmteType(p)) {
case TR_ADDED:
{
int reportConflicts =
!(rpmtsFilterFlags(ts) & RPMPROB_FILTER_REPLACENEWFILES);
int done = 0;
if (otherPkgNum < 0) {
/* XXX is this test still necessary? */
if (fi->actions[i] != FA_UNKNOWN)
break;
if (rpmfiConfigConflict(fi)) {
/* Here is a non-overlapped pre-existing config file. */
fi->actions[i] = (FFlags & RPMFILE_NOREPLACE)
? FA_ALTNAME : FA_BACKUP;
} else {
fi->actions[i] = FA_CREATE;
}
break;
}
assert(otherFi != NULL);
/* Mark added overlapped non-identical files as a conflict. */
if (rpmfiCompare(otherFi, fi)) {
int rConflicts;
rConflicts = reportConflicts;
/* Resolve file conflicts to prefer Elf64 (if not forced) ... */
if (tscolor != 0) {
if (FColor & prefcolor) {
/* ... last file of preferred colour is installed ... */
if (!XFA_SKIPPING(fi->actions[i])) {
/* XXX static helpers are order dependent. Ick. */
if (strcmp(fn, "/usr/sbin/libgcc_post_upgrade")
&& strcmp(fn, "/usr/sbin/glibc_post_upgrade"))
otherFi->actions[otherFileNum] = FA_SKIPCOLOR;
}
fi->actions[i] = FA_CREATE;
rConflicts = 0;
} else
if (oFColor & prefcolor) {
/* ... first file of preferred colour is installed ... */
if (XFA_SKIPPING(fi->actions[i]))
otherFi->actions[otherFileNum] = FA_CREATE;
fi->actions[i] = FA_SKIPCOLOR;
rConflicts = 0;
} else
if (FColor == 0 && oFColor == 0) {
/* ... otherwise, do both, last in wins. */
otherFi->actions[otherFileNum] = FA_CREATE;
fi->actions[i] = FA_CREATE;
rConflicts = 0;
}
done = 1;
}
if (rConflicts) {
rpmpsAppend(ps, RPMPROB_NEW_FILE_CONFLICT,
rpmteNEVRA(p), rpmteKey(p),
fn, NULL,
rpmteNEVRA(otherFi->te),
0);
}
}
/* Try to get the disk accounting correct even if a conflict. */
fixupSize = rpmfiFSize(otherFi);
if (rpmfiConfigConflict(fi)) {
/* Here is an overlapped pre-existing config file. */
fi->actions[i] = (FFlags & RPMFILE_NOREPLACE)
? FA_ALTNAME : FA_SKIP;
} else {
if (!done)
fi->actions[i] = FA_CREATE;
}
} break;
case TR_REMOVED:
if (otherPkgNum >= 0) {
assert(otherFi != NULL);
/* Here is an overlapped added file we don't want to nuke. */
if (otherFi->actions[otherFileNum] != FA_ERASE) {
/* On updates, don't remove files. */
fi->actions[i] = FA_SKIP;
break;
}
/* Here is an overlapped removed file: skip in previous. */
otherFi->actions[otherFileNum] = FA_SKIP;
}
if (XFA_SKIPPING(fi->actions[i]))
break;
if (rpmfiFState(fi) != RPMFILE_STATE_NORMAL)
break;
if (!(S_ISREG(FMode) && (FFlags & RPMFILE_CONFIG))) {
fi->actions[i] = FA_ERASE;
break;
}
/* Here is a pre-existing modified config file that needs saving. */
{ unsigned char md5sum[50];
const unsigned char * MD5 = rpmfiMD5(fi);
if (!domd5(fn, md5sum, 0, NULL) && memcmp(MD5, md5sum, 16)) {
fi->actions[i] = FA_BACKUP;
break;
}
}
fi->actions[i] = FA_ERASE;
break;
}
/* Update disk space info for a file. */
rpmtsUpdateDSI(ts, fiFps->entry->dev, rpmfiFSize(fi),
fi->replacedSizes[i], fixupSize, fi->actions[i]);
}
ps = rpmpsFree(ps);
}
/**
* Ensure that current package is newer than installed package.
* @param ts transaction set
* @param p current transaction element
* @param h installed header
* @return 0 if not newer, 1 if okay
*/
static int ensureOlder(rpmts ts,
const rpmte p, const Header h)
{
int32_t reqFlags = (RPMSENSE_LESS | RPMSENSE_EQUAL);
const char * reqEVR;
rpmds req;
char * t;
int nb;
int rc;
if (p == NULL || h == NULL)
return 1;
nb = strlen(rpmteNEVR(p)) + (rpmteE(p) != NULL ? strlen(rpmteE(p)) : 0) + 1;
t = alloca(nb);
*t = '\0';
reqEVR = t;
if (rpmteE(p) != NULL) t = stpcpy( stpcpy(t, rpmteE(p)), ":");
if (rpmteV(p) != NULL) t = stpcpy(t, rpmteV(p));
*t++ = '-';
if (rpmteR(p) != NULL) t = stpcpy(t, rpmteR(p));
req = rpmdsSingle(RPMTAG_REQUIRENAME, rpmteN(p), reqEVR, reqFlags);
rc = rpmdsNVRMatchesDep(h, req, _rpmds_nopromote);
req = rpmdsFree(req);
if (rc == 0) {
rpmps ps = rpmtsProblems(ts);
const char * altNEVR = hGetNEVRA(h, NULL);
rpmpsAppend(ps, RPMPROB_OLDPACKAGE,
rpmteNEVRA(p), rpmteKey(p),
NULL, NULL,
altNEVR,
0);
altNEVR = _free(altNEVR);
ps = rpmpsFree(ps);
rc = 1;
} else
rc = 0;
return rc;
}
/**
* Skip any files that do not match install policies.
* @param ts transaction set
* @param fi file info set
*/
/* FIX: fi->actions is modified. */
static void skipFiles(const rpmts ts, rpmfi fi)
{
uint32_t tscolor = rpmtsColor(ts);
uint32_t FColor;
int noConfigs = (rpmtsFlags(ts) & RPMTRANS_FLAG_NOCONFIGS);
int noDocs = (rpmtsFlags(ts) & RPMTRANS_FLAG_NODOCS);
char ** netsharedPaths = NULL;
const char ** languages;
const char * dn, * bn;
int dnlen, bnlen, ix;
const char * s;
int * drc;
char * dff;
int dc;
int i, j;
if (!noDocs)
noDocs = rpmExpandNumeric("%{_excludedocs}");
{ const char *tmpPath = rpmExpand("%{_netsharedpath}", NULL);
if (tmpPath && *tmpPath != '%')
netsharedPaths = splitString(tmpPath, strlen(tmpPath), ':');
tmpPath = _free(tmpPath);
}
s = rpmExpand("%{_install_langs}", NULL);
if (!(s && *s != '%'))
s = _free(s);
if (s) {
languages = (const char **) splitString(s, strlen(s), ':');
s = _free(s);
} else
languages = NULL;
/* Compute directory refcount, skip directory if now empty. */
dc = rpmfiDC(fi);
drc = alloca(dc * sizeof(*drc));
memset(drc, 0, dc * sizeof(*drc));
dff = alloca(dc * sizeof(*dff));
memset(dff, 0, dc * sizeof(*dff));
fi = rpmfiInit(fi, 0);
if (fi != NULL) /* XXX lclint */
while ((i = rpmfiNext(fi)) >= 0)
{
char ** nsp;
bn = rpmfiBN(fi);
bnlen = strlen(bn);
ix = rpmfiDX(fi);
dn = rpmfiDN(fi);
dnlen = strlen(dn);
if (dn == NULL)
continue; /* XXX can't happen */
drc[ix]++;
/* Don't bother with skipped files */
if (XFA_SKIPPING(fi->actions[i])) {
drc[ix]--; dff[ix] = 1;
continue;
}
/* Ignore colored files not in our rainbow. */
FColor = rpmfiFColor(fi);
if (tscolor && FColor && !(tscolor & FColor)) {
drc[ix]--; dff[ix] = 1;
fi->actions[i] = FA_SKIPCOLOR;
continue;
}
/*
* Skip net shared paths.
* Net shared paths are not relative to the current root (though
* they do need to take package relocations into account).
*/
for (nsp = netsharedPaths; nsp && *nsp; nsp++) {
int len;
len = strlen(*nsp);
if (dnlen >= len) {
if (strncmp(dn, *nsp, len))
continue;
/* Only directories or complete file paths can be net shared */
if (!(dn[len] == '/' || dn[len] == '\0'))
continue;
} else {
if (len < (dnlen + bnlen))
continue;
if (strncmp(dn, *nsp, dnlen))
continue;
/* Insure that only the netsharedpath basename is compared. */
if ((s = strchr((*nsp) + dnlen, '/')) != NULL && s[1] != '\0')
continue;
if (strncmp(bn, (*nsp) + dnlen, bnlen))
continue;
len = dnlen + bnlen;
/* Only directories or complete file paths can be net shared */
if (!((*nsp)[len] == '/' || (*nsp)[len] == '\0'))
continue;
}
break;
}
if (nsp && *nsp) {
drc[ix]--; dff[ix] = 1;
fi->actions[i] = FA_SKIPNETSHARED;
continue;
}
/*
* Skip i18n language specific files.
*/
if (languages != NULL && fi->flangs != NULL && *fi->flangs[i]) {
const char **lang, *l, *le;
for (lang = languages; *lang != NULL; lang++) {
if (!strcmp(*lang, "all"))
break;
for (l = fi->flangs[i]; *l != '\0'; l = le) {
for (le = l; *le != '\0' && *le != '|'; le++)
{};
if ((le-l) > 0 && !strncmp(*lang, l, (le-l)))
break;
if (*le == '|') le++; /* skip over | */
}
if (*l != '\0')
break;
}
if (*lang == NULL) {
drc[ix]--; dff[ix] = 1;
fi->actions[i] = FA_SKIPNSTATE;
continue;
}
}
/*
* Skip config files if requested.
*/
if (noConfigs && (rpmfiFFlags(fi) & RPMFILE_CONFIG)) {
drc[ix]--; dff[ix] = 1;
fi->actions[i] = FA_SKIPNSTATE;
continue;
}
/*
* Skip documentation if requested.
*/
if (noDocs && (rpmfiFFlags(fi) & RPMFILE_DOC)) {
drc[ix]--; dff[ix] = 1;
fi->actions[i] = FA_SKIPNSTATE;
continue;
}
}
/* Skip (now empty) directories that had skipped files. */
#ifndef NOTYET
if (fi != NULL) /* XXX can't happen */
for (j = 0; j < dc; j++)
#else
if ((fi = rpmfiInitD(fi)) != NULL)
while (j = rpmfiNextD(fi) >= 0)
#endif
{
if (drc[j]) continue; /* dir still has files. */
if (!dff[j]) continue; /* dir was not emptied here. */
/* Find parent directory and basename. */
dn = fi->dnl[j]; dnlen = strlen(dn) - 1;
bn = dn + dnlen; bnlen = 0;
while (bn > dn && bn[-1] != '/') {
bnlen++;
dnlen--;
bn--;
}
/* If explicitly included in the package, skip the directory. */
fi = rpmfiInit(fi, 0);
if (fi != NULL) /* XXX lclint */
while ((i = rpmfiNext(fi)) >= 0) {
const char * fdn, * fbn;
int16_t fFMode;
if (XFA_SKIPPING(fi->actions[i]))
continue;
fFMode = rpmfiFMode(fi);
if (rpmfiWhatis(fFMode) != XDIR)
continue;
fdn = rpmfiDN(fi);
if (strlen(fdn) != dnlen)
continue;
if (strncmp(fdn, dn, dnlen))
continue;
fbn = rpmfiBN(fi);
if (strlen(fbn) != bnlen)
continue;
if (strncmp(fbn, bn, bnlen))
continue;
rpmlog(RPMLOG_DEBUG, _("excluding directory %s\n"), dn);
fi->actions[i] = FA_SKIPNSTATE;
break;
}
}
if (netsharedPaths) freeSplitString(netsharedPaths);
#ifdef DYING /* XXX freeFi will deal with this later. */
fi->flangs = _free(fi->flangs);
#endif
if (languages) freeSplitString((char **)languages);
}
/**
* Return transaction element's file info.
* @todo Take a rpmfi refcount here.
* @param tsi transaction element iterator
* @return transaction element file info
*/
static
rpmfi rpmtsiFi(const rpmtsi tsi)
{
rpmfi fi = NULL;
if (tsi != NULL && tsi->ocsave != -1) {
/* FIX: rpmte not opaque */
rpmte te = rpmtsElement(tsi->ts, tsi->ocsave);
if (te != NULL && (fi = te->fi) != NULL)
fi->te = te;
}
return fi;
}
/**
* This is not a generalized function to be called from outside
* librpm. It is called internally by rpmtsRun() to rollback
* a failed transaction.
* @param rollbackTransaction rollback transaction
* @return RPMRC_OK, or RPMRC_FAIL
*/
static rpmRC _rpmtsRollback(rpmts rollbackTransaction)
{
int rc = 0;
int numAdded = 0;
int numRemoved = 0;
int32_t tid;
rpmtsi tsi;
rpmte te;
rpmps ps;
/*
* Gather information about this rollback transaction for reporting.
* 1) Get tid
*/
tid = rpmtsGetTid(rollbackTransaction);
/*
* 2) Get number of install elments and erase elements
*/
tsi = rpmtsiInit(rollbackTransaction);
while((te = rpmtsiNext(tsi, 0)) != NULL) {
switch (rpmteType(te)) {
case TR_ADDED:
numAdded++;
break;
case TR_REMOVED:
numRemoved++;
break;
default:
break;
}
}
tsi = rpmtsiFree(tsi);
rpmlog(RPMLOG_NOTICE, _("Transaction failed...rolling back\n"));
rpmlog(RPMLOG_NOTICE,
_("Rollback packages (+%d/-%d) to %-24.24s (0x%08x):\n"),
numAdded, numRemoved, ctime((time_t*) &tid), tid);
/* Check the transaction to see if it is doable */
rc = rpmtsCheck(rollbackTransaction);
ps = rpmtsProblems(rollbackTransaction);
if (rc != 0 && rpmpsNumProblems(ps) > 0) {
rpmlog(RPMLOG_ERR, _("Failed dependencies:\n"));
rpmpsPrint(NULL, ps);
ps = rpmpsFree(ps);
return -1;
}
ps = rpmpsFree(ps);
/* Order the transaction */
rc = rpmtsOrder(rollbackTransaction);
if (rc != 0) {
rpmlog(RPMLOG_ERR,
_("Could not order auto-rollback transaction!\n"));
return -1;
}
/* Run the transaction and print any problems
* We want to stay with the original transactions flags except
* that we want to add what is essentially a force.
* This handles two things in particular:
*
* 1. We we want to upgrade over a newer package.
* 2. If a header for the old package is there we
* we want to replace it. No questions asked.
*/
rc = rpmtsRun(rollbackTransaction, NULL,
RPMPROB_FILTER_REPLACEPKG
| RPMPROB_FILTER_REPLACEOLDFILES
| RPMPROB_FILTER_REPLACENEWFILES
| RPMPROB_FILTER_OLDPACKAGE
);
ps = rpmtsProblems(rollbackTransaction);
if (rc > 0 && rpmpsNumProblems(ps) > 0)
rpmpsPrint(stderr, ps);
ps = rpmpsFree(ps);
/*
* After we have ran through the transaction we need to
* remove any repackaged packages we just installed/upgraded
* from the rp repository.
*/
tsi = rpmtsiInit(rollbackTransaction);
while((te = rpmtsiNext(tsi, 0)) != NULL) {
fnpyKey key = NULL;
rpmlog(RPMLOG_NOTICE, _("Cleaning up repackaged packages:\n"));
switch (rpmteType(te)) {
/* The install elements are repackaged packages */
case TR_ADDED:
/* Make sure the filename is still there. XXX: Can't happen */
key = rpmteKey(te);
if(key) {
rpmlog(RPMLOG_NOTICE, _("\tRemoving %s:\n"), key);
(void) unlink(key); /* XXX: Should check for an error? */
}
break;
/* Ignore erase elements...nothing to do */
default:
break;
}
}
tsi = rpmtsiFree(tsi);
/* Free the rollback transaction */
rollbackTransaction = rpmtsFree(rollbackTransaction);
return rc;
}
/**
* Get the repackaged header and filename from the repackage directory.
* @todo Find a suitable home for this function.
* @todo This function creates an IDTX everytime it is called. Needs to
* be made more efficient (only create on per running transaction).
* @param ts rpm transaction
* @param te transaction element
* @retval hdrp Repackaged header
* @retval fnp Repackaged package's path (transaction key)
* @return RPMRC_NOTFOUND or RPMRC_OK
*/
static rpmRC getRepackageHeaderFromTE(rpmts ts, rpmte te,
Header *hdrp,
const char **fnp)
{
int32_t tid;
const char * name;
const char * rpname = NULL;
const char * _repackage_dir = NULL;
const char * globStr = "-*.rpm";
char * rp = NULL; /* Rollback package name */
IDTX rtids = NULL;
IDT rpIDT;
int nrids = 0;
int nb; /* Number of bytes */
Header h = NULL;
int rc = RPMRC_NOTFOUND; /* Assume we do not find it*/
int xx;
rpmlog(RPMLOG_DEBUG,
_("Getting repackaged header from transaction element\n"));
/* Set header pointer to null if its not already */
if (hdrp)
*hdrp = NULL;
if (fnp)
*fnp = NULL;
/* Get the TID of the current transaction */
tid = rpmtsGetTid(ts);
/* Need the repackage dir if the user want to
* rollback on a failure.
*/
_repackage_dir = rpmExpand("%{?_repackage_dir}", NULL);
if (_repackage_dir == NULL) goto exit;
/* Build the glob string to find the possible repackaged
* packages for this package.
*/
name = rpmteN(te);
nb = strlen(_repackage_dir) + strlen(name) + strlen(globStr) + 2;
rp = memset((char *) malloc(nb), 0, nb);
xx = snprintf(rp, nb, "%s/%s%s.rpm", _repackage_dir, name, globStr);
/* Get the index of possible repackaged packages */
rpmlog(RPMLOG_DEBUG, _("\tLooking for %s...\n"), rp);
rtids = IDTXglob(ts, rp, RPMTAG_REMOVETID);
rp = _free(rp);
if (rtids != NULL) {
rpmlog(RPMLOG_DEBUG, _("\tMatches found.\n"));
rpIDT = rtids->idt;
nrids = rtids->nidt;
} else {
rpmlog(RPMLOG_DEBUG, _("\tNo matches found.\n"));
goto exit;
}
/* Now walk through index until we find the package (or we have
* exhausted the index.
*/
do {
/* If index is null we have exhausted the list and need to
* get out of here...the repackaged package was not found.
*/
if (rpIDT == NULL) {
rpmlog(RPMLOG_DEBUG, _("\tRepackaged package not found!.\n"));
break;
}
/* Is this the same tid. If not decrement the list and continue */
if (rpIDT->val.u32 != tid) {
nrids--;
if (nrids > 0)
rpIDT++;
else
rpIDT = NULL;
continue;
}
/* OK, the tid matches. Now lets see if the name is the same.
* If I could not get the name from the package, I will go onto
* the next one. Perhaps I should return an error at this
* point, but if this was not the correct one, at least the correct one
* would be found.
* XXX: Should Match NAC!
*/
rpmlog(RPMLOG_DEBUG, _("\tREMOVETID matched INSTALLTID.\n"));
if (headerGetEntry(rpIDT->h, RPMTAG_NAME, NULL, (void **) &rpname, NULL)) {
rpmlog(RPMLOG_DEBUG, _("\t\tName: %s.\n"), rpname);
if (!strcmp(name,rpname)) {
/* It matched we have a canidate */
h = headerLink(rpIDT->h);
nb = strlen(rpIDT->key) + 1;
rp = memset((char *) malloc(nb), 0, nb);
rp = strncat(rp, rpIDT->key, nb);
rc = RPMRC_OK;
break;
}
}
/* Decrement list */
nrids--;
if (nrids > 0)
rpIDT++;
else
rpIDT = NULL;
} while (1);
exit:
if (rc != RPMRC_NOTFOUND && h != NULL && hdrp != NULL) {
rpmlog(RPMLOG_DEBUG, _("\tRepackaged Package was %s...\n"), rp);
if (hdrp != NULL)
*hdrp = headerLink(h);
if (fnp != NULL)
*fnp = rp;
else
rp = _free(rp);
}
if (h != NULL)
h = headerFree(h);
rtids = IDTXfree(rtids);
return rc;
}
/**
* This is not a generalized function to be called from outside
* librpm. It is called internally by rpmtsRun() to add elements
* to its autorollback transaction.
* @param rollbackTransaction rollback transaction
* @param runningTransaction running transaction (the one you want to rollback)
* @param te Transaction element.
* @return RPMRC_OK, or RPMRC_FAIL
*/
static rpmRC _rpmtsAddRollbackElement(rpmts rollbackTransaction,
rpmts runningTransaction, rpmte te)
{
Header h = NULL;
Header rph = NULL;
const char * rpn;
unsigned int db_instance = 0;
rpmtsi pi;
rpmte p;
int rc = RPMRC_FAIL; /* Assume Failure */
switch(rpmteType(te)) {
case TR_ADDED:
{ rpmdbMatchIterator mi;
rpmlog(RPMLOG_DEBUG,
_("Adding install element to auto-rollback transaction.\n"));
/* Get the header for this package from the database
* First get the database instance (the key).
*/
db_instance = rpmteDBInstance(te);
if (db_instance == 0) {
/* Could not get the db instance: WTD! */
rpmlog(RPMLOG_CRIT,
_("Could not get install element database instance!\n"));
break;
}
/* Now suck the header out of the database */
mi = rpmtsInitIterator(rollbackTransaction,
RPMDBI_PACKAGES, &db_instance, sizeof(db_instance));
h = rpmdbNextIterator(mi);
if (h != NULL) h = headerLink(h);
mi = rpmdbFreeIterator(mi);
if (h == NULL) {
/* Header was not there??? */
rpmlog(RPMLOG_CRIT,
_("Could not get header for auto-rollback transaction!\n"));
break;
}
/* Now see if there is a repackaged package for this */
rc = getRepackageHeaderFromTE(runningTransaction, te, &rph, &rpn);
switch(rc) {
case RPMRC_OK:
/* Add the install element, as we had a repackaged package */
rpmlog(RPMLOG_DEBUG,
_("\tAdded repackaged package header: %s.\n"), rpn);
rpmlog(RPMLOG_DEBUG,
_("\tAdded from install element %s.\n"), rpmteNEVRA(te));
rc = rpmtsAddInstallElement(rollbackTransaction, headerLink(rph),
(fnpyKey) rpn, 1, te->relocs);
break;
case RPMRC_NOTFOUND:
/* Add the header as an erase element, we did not
* have a repackaged package
*/
rpmlog(RPMLOG_DEBUG, _("\tAdded erase element.\n"));
rpmlog(RPMLOG_DEBUG,
_("\tAdded from install element %s.\n"), rpmteNEVRA(te));
rc = rpmtsAddEraseElement(rollbackTransaction, h, db_instance);
break;
default:
/* Not sure what to do on failure...just give up */
rpmlog(RPMLOG_CRIT,
_("Could not get repackaged header for auto-rollback transaction!\n"));
break;
}
} break;
case TR_REMOVED:
rpmlog(RPMLOG_DEBUG,
_("Add erase element to auto-rollback transaction.\n"));
/* See if this element has already been added.
* If so we want to do nothing. Compare N's for match.
* XXX: Really should compare NAC's.
*/
pi = rpmtsiInit(rollbackTransaction);
while ((p = rpmtsiNext(pi, 0)) != NULL) {
if (!strcmp(rpmteN(p), rpmteN(te))) {
rpmlog(RPMLOG_DEBUG, _("\tFound existing upgrade element.\n"));
rpmlog(RPMLOG_DEBUG, _("\tNot adding erase element for %s.\n"),
rpmteN(te));
rc = RPMRC_OK;
pi = rpmtsiFree(pi);
goto cleanup;
}
}
pi = rpmtsiFree(pi);
/* Get the repackage header from the current transaction
* element.
*/
rc = getRepackageHeaderFromTE(runningTransaction, te, &rph, &rpn);
switch(rc) {
case RPMRC_OK:
/* Add the install element */
rpmlog(RPMLOG_DEBUG,
_("\tAdded repackaged package %s.\n"), rpn);
rpmlog(RPMLOG_DEBUG,
_("\tAdded from erase element %s.\n"), rpmteNEVRA(te));
rc = rpmtsAddInstallElement(rollbackTransaction, rph,
(fnpyKey) rpn, 1, te->relocs);
if (rc != RPMRC_OK)
rpmlog(RPMLOG_CRIT,
_("Could not add erase element to auto-rollback transaction.\n"));
break;
case RPMRC_NOTFOUND:
/* Just did not have a repackaged package */
rpmlog(RPMLOG_DEBUG,
_("\tNo repackaged package...nothing to do.\n"));
rc = RPMRC_OK;
break;
default:
rpmlog(RPMLOG_CRIT,
_("Failure reading repackaged package!\n"));
break;
}
break;
default:
break;
}
/* XXX: I want to free this, but if I do then the consumers of
* are hosed. Just leaving you a little note Jeff, so you
* know that this does introduce a memory leak. I wanted
* keep the patch as simple as possible so I am not fixxing
* the leak.
* if (rpn != NULL)
* free(rpn);
*/
cleanup:
/* Clean up */
if (h != NULL)
h = headerFree(h);
if (rph != NULL)
rph = headerFree(rph);
return rc;
}
#define NOTIFY(_ts, _al) if ((_ts)->notify) (void) (_ts)->notify _al
int rpmtsRun(rpmts ts, rpmps okProbs, rpmprobFilterFlags ignoreSet)
{
uint32_t tscolor = rpmtsColor(ts);
int i, j;
int ourrc = 0;
int totalFileCount = 0;
rpmfi fi;
sharedFileInfo shared, sharedList;
int numShared;
int nexti;
rpmalKey lastFailKey;
fingerPrintCache fpc;
rpmps ps;
rpmpsm psm;
rpmtsi pi; rpmte p;
rpmtsi qi; rpmte q;
int numAdded;
int numRemoved;
rpmts rollbackTransaction = NULL;
int rollbackOnFailure = 0;
void * lock = NULL;
int xx;
/* XXX programmer error segfault avoidance. */
if (rpmtsNElements(ts) <= 0)
return -1;
/* See if we need to rollback on failure */
rollbackOnFailure = rpmExpandNumeric(
"%{?_rollback_transaction_on_failure}");
if (rpmtsGetType(ts) & (RPMTRANS_TYPE_ROLLBACK
| RPMTRANS_TYPE_AUTOROLLBACK)) {
rollbackOnFailure = 0;
}
/* If we are in test mode, there is no need to rollback on
* failure, nor acquire the transaction lock.
*/
/* If we are in test mode, then there's no need for transaction lock. */
if (rpmtsFlags(ts) & RPMTRANS_FLAG_TEST) {
rollbackOnFailure = 0;
} else {
lock = rpmtsAcquireLock(ts);
if (lock == NULL)
return -1; /* XXX W2DO? */
}
if (rpmtsFlags(ts) & RPMTRANS_FLAG_NOSCRIPTS)
(void) rpmtsSetFlags(ts, (rpmtsFlags(ts) | _noTransScripts | _noTransTriggers));
if (rpmtsFlags(ts) & RPMTRANS_FLAG_NOTRIGGERS)
(void) rpmtsSetFlags(ts, (rpmtsFlags(ts) | _noTransTriggers));
if (rpmtsFlags(ts) & RPMTRANS_FLAG_JUSTDB)
(void) rpmtsSetFlags(ts, (rpmtsFlags(ts) | _noTransScripts | _noTransTriggers));
/* if SELinux isn't enabled or init fails, don't bother... */
if (!rpmtsSELinuxEnabled(ts)) {
rpmtsSetFlags(ts, (rpmtsFlags(ts) | RPMTRANS_FLAG_NOCONTEXTS));
}
if (!rpmtsFlags(ts) & RPMTRANS_FLAG_NOCONTEXTS) {
const char *fn = rpmGetPath("%{?_install_file_context_path}", NULL);
if (matchpathcon_init(fn) == -1) {
rpmtsSetFlags(ts, (rpmtsFlags(ts) | RPMTRANS_FLAG_NOCONTEXTS));
}
_free(fn);
}
ts->probs = rpmpsFree(ts->probs);
ts->probs = rpmpsCreate();
/* XXX Make sure the database is open RDWR for package install/erase. */
{ int dbmode = (rpmtsFlags(ts) & RPMTRANS_FLAG_TEST)
? O_RDONLY : (O_RDWR|O_CREAT);
/* Open database RDWR for installing packages. */
if (rpmtsOpenDB(ts, dbmode)) {
rpmtsFreeLock(lock);
return -1; /* XXX W2DO? */
}
}
ts->ignoreSet = ignoreSet;
{ const char * currDir = currentDirectory();
rpmtsSetCurrDir(ts, currDir);
currDir = _free(currDir);
}
(void) rpmtsSetChrootDone(ts, 0);
{ int32_t tid = (int32_t) time(NULL);
(void) rpmtsSetTid(ts, tid);
}
/* Get available space on mounted file systems. */
xx = rpmtsInitDSI(ts);
/* ===============================================
* For packages being installed:
* - verify package arch/os.
* - verify package epoch:version-release is newer.
* - count files.
* For packages being removed:
* - count files.
*/
rpmlog(RPMLOG_DEBUG, _("sanity checking %d elements\n"), rpmtsNElements(ts));
ps = rpmtsProblems(ts);
/* The ordering doesn't matter here */
pi = rpmtsiInit(ts);
/* XXX Only added packages need be checked. */
while ((p = rpmtsiNext(pi, TR_ADDED)) != NULL) {
rpmdbMatchIterator mi;
int fc;
if ((fi = rpmtsiFi(pi)) == NULL)
continue; /* XXX can't happen */
fc = rpmfiFC(fi);
if (!(rpmtsFilterFlags(ts) & RPMPROB_FILTER_IGNOREARCH) && !tscolor)
if (!archOkay(rpmteA(p)))
rpmpsAppend(ps, RPMPROB_BADARCH,
rpmteNEVRA(p), rpmteKey(p),
rpmteA(p), NULL,
NULL, 0);
if (!(rpmtsFilterFlags(ts) & RPMPROB_FILTER_IGNOREOS))
if (!osOkay(rpmteO(p)))
rpmpsAppend(ps, RPMPROB_BADOS,
rpmteNEVRA(p), rpmteKey(p),
rpmteO(p), NULL,
NULL, 0);
if (!(rpmtsFilterFlags(ts) & RPMPROB_FILTER_OLDPACKAGE)) {
Header h;
mi = rpmtsInitIterator(ts, RPMTAG_NAME, rpmteN(p), 0);
while ((h = rpmdbNextIterator(mi)) != NULL)
xx = ensureOlder(ts, p, h);
mi = rpmdbFreeIterator(mi);
}
if (!(rpmtsFilterFlags(ts) & RPMPROB_FILTER_REPLACEPKG)) {
mi = rpmtsInitIterator(ts, RPMTAG_NAME, rpmteN(p), 0);
xx = rpmdbSetIteratorRE(mi, RPMTAG_EPOCH, RPMMIRE_STRCMP,
rpmteE(p));
xx = rpmdbSetIteratorRE(mi, RPMTAG_VERSION, RPMMIRE_STRCMP,
rpmteV(p));
xx = rpmdbSetIteratorRE(mi, RPMTAG_RELEASE, RPMMIRE_STRCMP,
rpmteR(p));
if (tscolor) {
xx = rpmdbSetIteratorRE(mi, RPMTAG_ARCH, RPMMIRE_STRCMP,
rpmteA(p));
xx = rpmdbSetIteratorRE(mi, RPMTAG_OS, RPMMIRE_STRCMP,
rpmteO(p));
}
while (rpmdbNextIterator(mi) != NULL) {
rpmpsAppend(ps, RPMPROB_PKG_INSTALLED,
rpmteNEVRA(p), rpmteKey(p),
NULL, NULL,
NULL, 0);
break;
}
mi = rpmdbFreeIterator(mi);
}
/* Count no. of files (if any). */
totalFileCount += fc;
}
pi = rpmtsiFree(pi);
ps = rpmpsFree(ps);
/* The ordering doesn't matter here */
pi = rpmtsiInit(ts);
while ((p = rpmtsiNext(pi, TR_REMOVED)) != NULL) {
int fc;
if ((fi = rpmtsiFi(pi)) == NULL)
continue; /* XXX can't happen */
fc = rpmfiFC(fi);
totalFileCount += fc;
}
pi = rpmtsiFree(pi);
/* Run pre-transaction scripts, but only if there are no known
* problems up to this point. */
if (!((rpmtsFlags(ts) & (RPMTRANS_FLAG_BUILD_PROBS|RPMTRANS_FLAG_TEST))
|| (rpmpsNumProblems(ts->probs) &&
(okProbs == NULL || rpmpsTrim(ts->probs, okProbs))))) {
rpmlog(RPMLOG_DEBUG, _("running pre-transaction scripts\n"));
pi = rpmtsiInit(ts);
while ((p = rpmtsiNext(pi, TR_ADDED)) != NULL) {
if ((fi = rpmtsiFi(pi)) == NULL)
continue; /* XXX can't happen */
/* If no pre-transaction script, then don't bother. */
if (fi->pretrans == NULL)
continue;
p->fd = ts->notify(p->h, RPMCALLBACK_INST_OPEN_FILE, 0, 0,
rpmteKey(p), ts->notifyData);
p->h = NULL;
if (rpmteFd(p) != NULL) {
rpmVSFlags ovsflags = rpmtsVSFlags(ts);
rpmVSFlags vsflags = ovsflags | RPMVSF_NEEDPAYLOAD;
rpmRC rpmrc;
ovsflags = rpmtsSetVSFlags(ts, vsflags);
rpmrc = rpmReadPackageFile(ts, rpmteFd(p),
rpmteNEVR(p), &p->h);
vsflags = rpmtsSetVSFlags(ts, ovsflags);
switch (rpmrc) {
default:
/* FIX: notify annotations */
p->fd = ts->notify(p->h, RPMCALLBACK_INST_CLOSE_FILE,
0, 0,
rpmteKey(p), ts->notifyData);
p->fd = NULL;
break;
case RPMRC_NOTTRUSTED:
case RPMRC_NOKEY:
case RPMRC_OK:
break;
}
}
if (rpmteFd(p) != NULL) {
fi = rpmfiNew(ts, p->h, RPMTAG_BASENAMES, 1);
if (fi != NULL) { /* XXX can't happen */
fi->te = p;
p->fi = fi;
}
psm = rpmpsmNew(ts, p, p->fi);
assert(psm != NULL);
psm->scriptTag = RPMTAG_PRETRANS;
psm->progTag = RPMTAG_PRETRANSPROG;
xx = rpmpsmStage(psm, PSM_SCRIPT);
psm = rpmpsmFree(psm);
(void) ts->notify(p->h, RPMCALLBACK_INST_CLOSE_FILE, 0, 0,
rpmteKey(p), ts->notifyData);
p->fd = NULL;
p->h = headerFree(p->h);
}
}
pi = rpmtsiFree(pi);
}
/* ===============================================
* Initialize transaction element file info for package:
*/
/*
* FIXME?: we'd be better off assembling one very large file list and
* calling fpLookupList only once. I'm not sure that the speedup is
* worth the trouble though.
*/
rpmlog(RPMLOG_DEBUG, _("computing %d file fingerprints\n"), totalFileCount);
numAdded = numRemoved = 0;
pi = rpmtsiInit(ts);
while ((p = rpmtsiNext(pi, 0)) != NULL) {
int fc;
if ((fi = rpmtsiFi(pi)) == NULL)
continue; /* XXX can't happen */
fc = rpmfiFC(fi);
switch (rpmteType(p)) {
case TR_ADDED:
numAdded++;
fi->record = 0;
/* Skip netshared paths, not our i18n files, and excluded docs */
if (fc > 0)
skipFiles(ts, fi);
break;
case TR_REMOVED:
numRemoved++;
fi->record = rpmteDBOffset(p);
break;
}
fi->fps = (fc > 0 ? xmalloc(fc * sizeof(*fi->fps)) : NULL);
}
pi = rpmtsiFree(pi);
if (!rpmtsChrootDone(ts)) {
const char * rootDir = rpmtsRootDir(ts);
xx = chdir("/");
if (rootDir != NULL && strcmp(rootDir, "/") && *rootDir == '/') {
/* opening db before chroot not optimal, see rhbz#103852 c#3 */
xx = rpmdbOpenAll(ts->rdb);
xx = chroot(rootDir);
}
(void) rpmtsSetChrootDone(ts, 1);
}
ts->ht = htCreate(totalFileCount * 2, 0, 0, fpHashFunction, fpEqual);
fpc = fpCacheCreate(totalFileCount);
/* ===============================================
* Add fingerprint for each file not skipped.
*/
pi = rpmtsiInit(ts);
while ((p = rpmtsiNext(pi, 0)) != NULL) {
int fc;
(void) rpmdbCheckSignals();
if ((fi = rpmtsiFi(pi)) == NULL)
continue; /* XXX can't happen */
fc = rpmfiFC(fi);
(void) rpmswEnter(rpmtsOp(ts, RPMTS_OP_FINGERPRINT), 0);
fpLookupList(fpc, fi->dnl, fi->bnl, fi->dil, fc, fi->fps);
fi = rpmfiInit(fi, 0);
if (fi != NULL) /* XXX lclint */
while ((i = rpmfiNext(fi)) >= 0) {
if (XFA_SKIPPING(fi->actions[i]))
continue;
htAddEntry(ts->ht, fi->fps + i, (void *) fi);
}
(void) rpmswExit(rpmtsOp(ts, RPMTS_OP_FINGERPRINT), fc);
}
pi = rpmtsiFree(pi);
NOTIFY(ts, (NULL, RPMCALLBACK_TRANS_START, 6, ts->orderCount,
NULL, ts->notifyData));
/* ===============================================
* Compute file disposition for each package in transaction set.
*/
rpmlog(RPMLOG_DEBUG, _("computing file dispositions\n"));
ps = rpmtsProblems(ts);
pi = rpmtsiInit(ts);
while ((p = rpmtsiNext(pi, 0)) != NULL) {
dbiIndexSet * matches;
int knownBad;
int fc;
(void) rpmdbCheckSignals();
if ((fi = rpmtsiFi(pi)) == NULL)
continue; /* XXX can't happen */
fc = rpmfiFC(fi);
NOTIFY(ts, (NULL, RPMCALLBACK_TRANS_PROGRESS, rpmtsiOc(pi),
ts->orderCount, NULL, ts->notifyData));
if (fc == 0) continue;
(void) rpmswEnter(rpmtsOp(ts, RPMTS_OP_FINGERPRINT), 0);
/* Extract file info for all files in this package from the database. */
matches = xcalloc(fc, sizeof(*matches));
if (rpmdbFindFpList(rpmtsGetRdb(ts), fi->fps, matches, fc)) {
ps = rpmpsFree(ps);
rpmtsFreeLock(lock);
return 1; /* XXX WTFO? */
}
numShared = 0;
fi = rpmfiInit(fi, 0);
while ((i = rpmfiNext(fi)) >= 0)
numShared += dbiIndexSetCount(matches[i]);
/* Build sorted file info list for this package. */
shared = sharedList = xcalloc((numShared + 1), sizeof(*sharedList));
fi = rpmfiInit(fi, 0);
while ((i = rpmfiNext(fi)) >= 0) {
/*
* Take care not to mark files as replaced in packages that will
* have been removed before we will get here.
*/
for (j = 0; j < dbiIndexSetCount(matches[i]); j++) {
int ro;
ro = dbiIndexRecordOffset(matches[i], j);
knownBad = 0;
qi = rpmtsiInit(ts);
while ((q = rpmtsiNext(qi, TR_REMOVED)) != NULL) {
if (ro == knownBad)
break;
if (rpmteDBOffset(q) == ro)
knownBad = ro;
}
qi = rpmtsiFree(qi);
shared->pkgFileNum = i;
shared->otherPkg = dbiIndexRecordOffset(matches[i], j);
shared->otherFileNum = dbiIndexRecordFileNumber(matches[i], j);
shared->isRemoved = (knownBad == ro);
shared++;
}
matches[i] = dbiFreeIndexSet(matches[i]);
}
numShared = shared - sharedList;
shared->otherPkg = -1;
matches = _free(matches);
/* Sort file info by other package index (otherPkg) */
qsort(sharedList, numShared, sizeof(*shared), sharedCmp);
/* For all files from this package that are in the database ... */
for (i = 0; i < numShared; i = nexti) {
int beingRemoved;
shared = sharedList + i;
/* Find the end of the files in the other package. */
for (nexti = i + 1; nexti < numShared; nexti++) {
if (sharedList[nexti].otherPkg != shared->otherPkg)
break;
}
/* Is this file from a package being removed? */
beingRemoved = 0;
if (ts->removedPackages != NULL)
for (j = 0; j < ts->numRemovedPackages; j++) {
if (ts->removedPackages[j] != shared->otherPkg)
continue;
beingRemoved = 1;
break;
}
/* Determine the fate of each file. */
switch (rpmteType(p)) {
case TR_ADDED:
xx = handleInstInstalledFiles(ts, p, fi, shared, nexti - i,
!(beingRemoved || (rpmtsFilterFlags(ts) & RPMPROB_FILTER_REPLACEOLDFILES)));
break;
case TR_REMOVED:
if (!beingRemoved)
xx = handleRmvdInstalledFiles(ts, fi, shared, nexti - i);
break;
}
}
free(sharedList);
/* Update disk space needs on each partition for this package. */
handleOverlappedFiles(ts, p, fi);
/* Check added package has sufficient space on each partition used. */
switch (rpmteType(p)) {
case TR_ADDED:
rpmtsCheckDSIProblems(ts, p);
break;
case TR_REMOVED:
break;
}
/* check for s-bit files to be removed */
if (rpmteType(p) == TR_REMOVED) {
fi = rpmfiInit(fi, 0);
while ((i = rpmfiNext(fi)) >= 0) {
int16_t mode;
if (XFA_SKIPPING(fi->actions[i]))
continue;
(void) rpmfiSetFX(fi, i);
mode = rpmfiFMode(fi);
if (S_ISREG(mode) && (mode & 06000) != 0) {
fi->mapflags |= CPIO_SBIT_CHECK;
}
}
}
(void) rpmswExit(rpmtsOp(ts, RPMTS_OP_FINGERPRINT), fc);
}
pi = rpmtsiFree(pi);
ps = rpmpsFree(ps);
if (rpmtsChrootDone(ts)) {
const char * rootDir = rpmtsRootDir(ts);
const char * currDir = rpmtsCurrDir(ts);
if (rootDir != NULL && strcmp(rootDir, "/") && *rootDir == '/')
xx = chroot(".");
(void) rpmtsSetChrootDone(ts, 0);
if (currDir != NULL)
xx = chdir(currDir);
}
NOTIFY(ts, (NULL, RPMCALLBACK_TRANS_STOP, 6, ts->orderCount,
NULL, ts->notifyData));
/* ===============================================
* Free unused memory as soon as possible.
*/
pi = rpmtsiInit(ts);
while ((p = rpmtsiNext(pi, 0)) != NULL) {
if ((fi = rpmtsiFi(pi)) == NULL)
continue; /* XXX can't happen */
if (rpmfiFC(fi) == 0)
continue;
fi->fps = _free(fi->fps);
}
pi = rpmtsiFree(pi);
fpc = fpCacheFree(fpc);
ts->ht = htFree(ts->ht);
/* ===============================================
* If unfiltered problems exist, free memory and return.
*/
if ((rpmtsFlags(ts) & RPMTRANS_FLAG_BUILD_PROBS)
|| (rpmpsNumProblems(ts->probs) &&
(okProbs == NULL || rpmpsTrim(ts->probs, okProbs)))
)
{
rpmtsFreeLock(lock);
return ts->orderCount;
}
/* ===============================================
* If we were requested to rollback this transaction
* if an error occurs, then we need to create a
* a rollback transaction.
*/
if (rollbackOnFailure) {
rpmtransFlags tsFlags;
rpmVSFlags ovsflags;
rpmVSFlags vsflags;
rpmlog(RPMLOG_DEBUG,
_("Creating auto-rollback transaction\n"));
rollbackTransaction = rpmtsCreate();
/* Set the verify signature flags:
* - can't verify digests on repackaged packages. Other than
* they are wrong, this will cause segfaults down stream.
* - signatures are out too.
* - header check are out.
*/
vsflags = rpmExpandNumeric("%{?_vsflags_erase}");
vsflags |= _RPMVSF_NODIGESTS;
vsflags |= _RPMVSF_NOSIGNATURES;
vsflags |= RPMVSF_NOHDRCHK;
vsflags |= RPMVSF_NEEDPAYLOAD; /* XXX no legacy signatures */
ovsflags = rpmtsSetVSFlags(ts, vsflags);
/*
* If we run this thing its imperitive that it be known that it
* is an autorollback transaction. This will affect the instance
* counts passed to the scriptlets in the psm.
*/
rpmtsSetType(rollbackTransaction, RPMTRANS_TYPE_AUTOROLLBACK);
/* Set transaction flags to be the same as the running transaction */
tsFlags = rpmtsSetFlags(rollbackTransaction, rpmtsFlags(ts));
/* Set root dir to be the same as the running transaction */
rpmtsSetRootDir(rollbackTransaction, rpmtsRootDir(ts));
/* Setup the notify of the call back to be the same as the running
* transaction
*/
xx = rpmtsSetNotifyCallback(rollbackTransaction, ts->notify, ts->notifyData);
/* Create rpmtsScore for running transaction and rollback transaction */
xx = rpmtsScoreInit(ts, rollbackTransaction);
}
/* ===============================================
* Save removed files before erasing.
*/
if (rpmtsFlags(ts) & (RPMTRANS_FLAG_DIRSTASH | RPMTRANS_FLAG_REPACKAGE)) {
int progress;
progress = 0;
pi = rpmtsiInit(ts);
while ((p = rpmtsiNext(pi, 0)) != NULL) {
if ((fi = rpmtsiFi(pi)) == NULL)
continue; /* XXX can't happen */
switch (rpmteType(p)) {
case TR_ADDED:
break;
case TR_REMOVED:
if (!(rpmtsFlags(ts) & RPMTRANS_FLAG_REPACKAGE))
break;
if (!progress)
NOTIFY(ts, (NULL, RPMCALLBACK_REPACKAGE_START,
7, numRemoved, NULL, ts->notifyData));
NOTIFY(ts, (NULL, RPMCALLBACK_REPACKAGE_PROGRESS, progress,
numRemoved, NULL, ts->notifyData));
progress++;
(void) rpmswEnter(rpmtsOp(ts, RPMTS_OP_REPACKAGE), 0);
/* XXX TR_REMOVED needs CPIO_MAP_{ABSOLUTE,ADDDOT} CPIO_ALL_HARDLINKS */
fi->mapflags |= CPIO_MAP_ABSOLUTE;
fi->mapflags |= CPIO_MAP_ADDDOT;
fi->mapflags |= CPIO_ALL_HARDLINKS;
psm = rpmpsmNew(ts, p, fi);
assert(psm != NULL);
xx = rpmpsmStage(psm, PSM_PKGSAVE);
psm = rpmpsmFree(psm);
fi->mapflags &= ~CPIO_MAP_ABSOLUTE;
fi->mapflags &= ~CPIO_MAP_ADDDOT;
fi->mapflags &= ~CPIO_ALL_HARDLINKS;
(void) rpmswExit(rpmtsOp(ts, RPMTS_OP_REPACKAGE), 0);
break;
}
}
pi = rpmtsiFree(pi);
if (progress) {
NOTIFY(ts, (NULL, RPMCALLBACK_REPACKAGE_STOP, 7, numRemoved,
NULL, ts->notifyData));
}
}
/* ===============================================
* Install and remove packages.
*/
lastFailKey = (rpmalKey)-2; /* erased packages have -1 */
pi = rpmtsiInit(ts);
/* FIX: fi reload needs work */
while ((p = rpmtsiNext(pi, 0)) != NULL) {
rpmalKey pkgKey;
int gotfd;
gotfd = 0;
if ((fi = rpmtsiFi(pi)) == NULL)
continue; /* XXX can't happen */
psm = rpmpsmNew(ts, p, fi);
assert(psm != NULL);
psm->unorderedSuccessor =
(rpmtsiOc(pi) >= rpmtsUnorderedSuccessors(ts, -1) ? 1 : 0);
switch (rpmteType(p)) {
case TR_ADDED:
(void) rpmswEnter(rpmtsOp(ts, RPMTS_OP_INSTALL), 0);
pkgKey = rpmteAddedKey(p);
rpmlog(RPMLOG_DEBUG, "========== +++ %s %s-%s 0x%x\n",
rpmteNEVR(p), rpmteA(p), rpmteO(p), rpmteColor(p));
p->h = NULL;
/* FIX: rpmte not opaque */
{
/* FIX: notify annotations */
p->fd = ts->notify(p->h, RPMCALLBACK_INST_OPEN_FILE, 0, 0,
rpmteKey(p), ts->notifyData);
if (rpmteFd(p) != NULL) {
rpmVSFlags ovsflags = rpmtsVSFlags(ts);
rpmVSFlags vsflags = ovsflags | RPMVSF_NEEDPAYLOAD;
rpmRC rpmrc;
ovsflags = rpmtsSetVSFlags(ts, vsflags);
rpmrc = rpmReadPackageFile(ts, rpmteFd(p),
rpmteNEVR(p), &p->h);
vsflags = rpmtsSetVSFlags(ts, ovsflags);
switch (rpmrc) {
default:
/* FIX: notify annotations */
p->fd = ts->notify(p->h, RPMCALLBACK_INST_CLOSE_FILE,
0, 0,
rpmteKey(p), ts->notifyData);
p->fd = NULL;
ourrc++;
/* If we should rollback this transaction
on failure, lets do it. */
if (rollbackOnFailure) {
rpmlog(RPMLOG_ERR,
_("Add failed. Could not read package header.\n"));
/* Clean up the current transaction */
p->h = headerFree(p->h);
xx = rpmdbSync(rpmtsGetRdb(ts));
psm = rpmpsmFree(psm);
p->fi = rpmfiFree(p->fi);
pi = rpmtsiFree(pi);
/* Run the rollback transaction */
xx = _rpmtsRollback(rollbackTransaction);
return -1;
}
break;
case RPMRC_NOTTRUSTED:
case RPMRC_NOKEY:
case RPMRC_OK:
break;
}
if (rpmteFd(p) != NULL) gotfd = 1;
}
}
if (rpmteFd(p) != NULL) {
/*
* XXX Sludge necessary to tranfer existing fstates/actions
* XXX around a recreated file info set.
*/
psm->fi = rpmfiFree(psm->fi);
{
char * fstates = fi->fstates;
rpmFileAction * actions = fi->actions;
sharedFileInfo replaced = fi->replaced;
int mapflags = fi->mapflags;
rpmte savep;
int numShared = 0;
if (replaced != NULL) {
for (; replaced->otherPkg; replaced++) {
numShared++;
}
if (numShared > 0) {
replaced = xcalloc(numShared + 1,
sizeof(*fi->replaced));
memcpy(replaced, fi->replaced,
sizeof(*fi->replaced) * (numShared + 1));
}
}
fi->fstates = NULL;
fi->actions = NULL;
fi->replaced = NULL;
/* FIX: fi->actions is NULL */
fi = rpmfiFree(fi);
savep = rpmtsSetRelocateElement(ts, p);
fi = rpmfiNew(ts, p->h, RPMTAG_BASENAMES, 1);
(void) rpmtsSetRelocateElement(ts, savep);
if (fi != NULL) { /* XXX can't happen */
fi->te = p;
fi->fstates = _free(fi->fstates);
fi->fstates = fstates;
fi->actions = _free(fi->actions);
fi->actions = actions;
if (replaced != NULL)
fi->replaced = replaced;
if (mapflags & CPIO_SBIT_CHECK)
fi->mapflags |= CPIO_SBIT_CHECK;
p->fi = fi;
}
}
psm->fi = rpmfiLink(p->fi, NULL);
/* FIX: psm->fi may be NULL */
if (rpmpsmStage(psm, PSM_PKGINSTALL)) {
ourrc++;
lastFailKey = pkgKey;
/* If we should rollback this transaction
on failure, lets do it. */
if (rollbackOnFailure) {
rpmlog(RPMLOG_ERR,
_("Add failed in rpmpsmStage().\n"));
/* Clean up the current transaction */
p->h = headerFree(p->h);
xx = rpmdbSync(rpmtsGetRdb(ts));
psm = rpmpsmFree(psm);
p->fi = rpmfiFree(p->fi);
pi = rpmtsiFree(pi);
/* Run the rollback transaction */
xx = _rpmtsRollback(rollbackTransaction);
return -1;
}
}
/* If we should rollback on failure lets add
* this element to the rollback transaction
* as an erase element as it has installed succesfully.
*/
if (rollbackOnFailure) {
int rc;
rc = _rpmtsAddRollbackElement(rollbackTransaction, ts, p);
if (rc != RPMRC_OK) {
/* Clean up the current transaction */
p->h = headerFree(p->h);
xx = rpmdbSync(rpmtsGetRdb(ts));
psm = rpmpsmFree(psm);
p->fi = rpmfiFree(p->fi);
pi = rpmtsiFree(pi);
/* Clean up rollback transaction */
rollbackTransaction = rpmtsFree(rollbackTransaction);
return -1;
}
}
} else {
ourrc++;
lastFailKey = pkgKey;
/* If we should rollback this transaction
* on failure, lets do it.
*/
if (rollbackOnFailure) {
rpmlog(RPMLOG_ERR, _("Add failed. Could not get file list.\n"));
/* Clean up the current transaction */
p->h = headerFree(p->h);
xx = rpmdbSync(rpmtsGetRdb(ts));
psm = rpmpsmFree(psm);
p->fi = rpmfiFree(p->fi);
pi = rpmtsiFree(pi);
/* Run the rollback transaction */
xx = _rpmtsRollback(rollbackTransaction);
return -1;
}
}
if (gotfd) {
/* FIX: check rc */
(void) ts->notify(p->h, RPMCALLBACK_INST_CLOSE_FILE, 0, 0,
rpmteKey(p), ts->notifyData);
p->fd = NULL;
}
p->h = headerFree(p->h);
(void) rpmswExit(rpmtsOp(ts, RPMTS_OP_INSTALL), 0);
break;
case TR_REMOVED:
(void) rpmswEnter(rpmtsOp(ts, RPMTS_OP_ERASE), 0);
rpmlog(RPMLOG_DEBUG, "========== --- %s %s-%s 0x%x\n",
rpmteNEVR(p), rpmteA(p), rpmteO(p), rpmteColor(p));
/*
* XXX This has always been a hack, now mostly broken.
* If install failed, then we shouldn't erase.
*/
if (rpmteDependsOnKey(p) != lastFailKey) {
if (rpmpsmStage(psm, PSM_PKGERASE)) {
ourrc++;
/* If we should rollback this transaction
* on failure, lets do it.
*/
if (rollbackOnFailure) {
rpmlog(RPMLOG_ERR,
_("Erase failed failed in rpmpsmStage().\n"));
/* Clean up the current transaction */
xx = rpmdbSync(rpmtsGetRdb(ts));
psm = rpmpsmFree(psm);
p->fi = rpmfiFree(p->fi);
pi = rpmtsiFree(pi);
/* Run the rollback transaction */
xx = _rpmtsRollback(rollbackTransaction);
return -1;
}
}
/* If we should rollback on failure lets add
* this element to the rollback transaction
* as an install element as it has erased succesfully.
*/
if (rollbackOnFailure) {
int rc;
rc = _rpmtsAddRollbackElement(rollbackTransaction, ts, p);
if (rc != RPMRC_OK) {
/* Clean up the current transaction */
xx = rpmdbSync(rpmtsGetRdb(ts));
psm = rpmpsmFree(psm);
p->fi = rpmfiFree(p->fi);
pi = rpmtsiFree(pi);
/* Clean up rollback transaction */
rollbackTransaction = rpmtsFree(rollbackTransaction);
return -1;
}
}
}
(void) rpmswExit(rpmtsOp(ts, RPMTS_OP_ERASE), 0);
break;
}
xx = rpmdbSync(rpmtsGetRdb(ts));
/* FIX: psm->fi may be NULL */
psm = rpmpsmFree(psm);
#ifdef DYING
/* FIX: p is almost opaque */
p->fi = rpmfiFree(p->fi);
#endif
}
pi = rpmtsiFree(pi);
/* If we created a rollback transaction lets get rid of it */
if (rollbackOnFailure && rollbackTransaction != NULL)
rollbackTransaction = rpmtsFree(rollbackTransaction);
if (!(rpmtsFlags(ts) & RPMTRANS_FLAG_TEST)) {
rpmlog(RPMLOG_DEBUG, _("running post-transaction scripts\n"));
pi = rpmtsiInit(ts);
while ((p = rpmtsiNext(pi, TR_ADDED)) != NULL) {
int haspostscript;
if ((fi = rpmtsiFi(pi)) == NULL)
continue; /* XXX can't happen */
haspostscript = (fi->posttrans != NULL ? 1 : 0);
p->fi = rpmfiFree(p->fi);
/* If no post-transaction script, then don't bother. */
if (!haspostscript)
continue;
p->fd = ts->notify(p->h, RPMCALLBACK_INST_OPEN_FILE, 0, 0,
rpmteKey(p), ts->notifyData);
p->h = NULL;
if (rpmteFd(p) != NULL) {
rpmVSFlags ovsflags = rpmtsVSFlags(ts);
rpmVSFlags vsflags = ovsflags | RPMVSF_NEEDPAYLOAD;
rpmRC rpmrc;
ovsflags = rpmtsSetVSFlags(ts, vsflags);
rpmrc = rpmReadPackageFile(ts, rpmteFd(p),
rpmteNEVR(p), &p->h);
vsflags = rpmtsSetVSFlags(ts, ovsflags);
switch (rpmrc) {
default:
p->fd = ts->notify(p->h, RPMCALLBACK_INST_CLOSE_FILE,
0, 0, rpmteKey(p), ts->notifyData);
p->fd = NULL;
break;
case RPMRC_NOTTRUSTED:
case RPMRC_NOKEY:
case RPMRC_OK:
break;
}
}
if (rpmteFd(p) != NULL) {
p->fi = rpmfiNew(ts, p->h, RPMTAG_BASENAMES, 1);
if (p->fi != NULL) /* XXX can't happen */
p->fi->te = p;
psm = rpmpsmNew(ts, p, p->fi);
assert(psm != NULL);
psm->scriptTag = RPMTAG_POSTTRANS;
psm->progTag = RPMTAG_POSTTRANSPROG;
xx = rpmpsmStage(psm, PSM_SCRIPT);
psm = rpmpsmFree(psm);
(void) ts->notify(p->h, RPMCALLBACK_INST_CLOSE_FILE, 0, 0,
rpmteKey(p), ts->notifyData);
p->fd = NULL;
p->fi = rpmfiFree(p->fi);
p->h = headerFree(p->h);
}
}
pi = rpmtsiFree(pi);
}
rpmtsFreeLock(lock);
/* FIX: ts->flList may be NULL */
if (ourrc)
return -1;
else
return 0;
}