mirror of
https://github.com/moparisthebest/pacman
synced 2024-12-22 15:58:50 -05:00
Clean up libalpm/add.c and revise file extraction code
This is a full refactoring of _alpm_add_commit into multiple functions and a better layout for later. Some highlights: * No regressions in pactest performance. * Much cleaner layout. add_commit is split into four functions: upgrade_remove, extract_single_file, commit_single_pkg, _alpm_add_commit * No more super-functions, the heaviest (extract_single_file) is finally under 400 lines, with much improved commenting as well. * Incorporation of Andrew Fyfe's ideas for fixing FS #7484. Try to handle all possible cases of extraction combinations with files, symlinks, dirs, and non-existant entries on the filesystem. This should make our dealings with libarchive fall more into our control. Signed-off-by: Dan McGee <dan@archlinux.org>
This commit is contained in:
Dan McGee
parent
aaf291c11c
commit
591bfabbd3
@ -1,11 +1,7 @@
|
||||
/*
|
||||
* add.c
|
||||
*
|
||||
* Copyright (c) 2002-2006 by Judd Vinet <jvinet@zeroflux.org>
|
||||
* Copyright (c) 2005 by Aurelien Foret <orelien@chez.com>
|
||||
* Copyright (c) 2005 by Christian Hamar <krics@linuxforum.hu>
|
||||
* Copyright (c) 2006 by David Kimpe <dnaku@frugalware.org>
|
||||
* Copyright (c) 2005, 2006 by Miklos Vajna <vmiklos@frugalware.org>
|
||||
* Copyright (c) 2002-2007 by Judd Vinet <jvinet@zeroflux.org>
|
||||
*
|
||||
* This program is free software; you can redistribute it and/or modify
|
||||
* it under the terms of the GNU General Public License as published by
|
||||
@ -28,9 +24,11 @@
|
||||
#include <stdlib.h>
|
||||
#include <errno.h>
|
||||
#include <time.h>
|
||||
#include <fcntl.h>
|
||||
#include <string.h>
|
||||
#include <limits.h>
|
||||
#include <sys/types.h>
|
||||
#include <sys/stat.h>
|
||||
#include <unistd.h>
|
||||
|
||||
/* libarchive */
|
||||
#include <archive.h>
|
||||
@ -269,94 +267,7 @@ int _alpm_add_prepare(pmtrans_t *trans, pmdb_t *db, alpm_list_t **data)
|
||||
return(0);
|
||||
}
|
||||
|
||||
/* TODO clean up this monster 554 line function */
|
||||
int _alpm_add_commit(pmtrans_t *trans, pmdb_t *db)
|
||||
{
|
||||
int i, ret = 0, errors = 0, pkg_count = 0;
|
||||
struct archive *archive;
|
||||
struct archive_entry *entry;
|
||||
char cwd[PATH_MAX] = "";
|
||||
alpm_list_t *targ;
|
||||
const int archive_flags = ARCHIVE_EXTRACT_OWNER |
|
||||
ARCHIVE_EXTRACT_PERM |
|
||||
ARCHIVE_EXTRACT_TIME;
|
||||
|
||||
ALPM_LOG_FUNC;
|
||||
|
||||
ASSERT(trans != NULL, RET_ERR(PM_ERR_TRANS_NULL, -1));
|
||||
ASSERT(db != NULL, RET_ERR(PM_ERR_DB_NULL, -1));
|
||||
|
||||
if(trans->packages == NULL) {
|
||||
return(0);
|
||||
}
|
||||
|
||||
pkg_count = alpm_list_count(trans->targets);
|
||||
|
||||
for(targ = trans->packages; targ; targ = targ->next) {
|
||||
char scriptlet[PATH_MAX+1];
|
||||
int targ_count = 0, is_upgrade = 0, use_md5 = 0;
|
||||
double percent = 0.0;
|
||||
pmpkg_t *newpkg = (pmpkg_t *)targ->data;
|
||||
pmpkg_t *oldpkg = NULL;
|
||||
errors = 0;
|
||||
|
||||
if(handle->trans->state == STATE_INTERRUPTED) {
|
||||
break;
|
||||
}
|
||||
|
||||
snprintf(scriptlet, PATH_MAX, "%s%s-%s/install", db->path,
|
||||
alpm_pkg_get_name(newpkg), alpm_pkg_get_version(newpkg));
|
||||
|
||||
/* check if we have a valid sha1sum, if not, use MD5 */
|
||||
if(strlen(newpkg->sha1sum) == 0) {
|
||||
use_md5 = 1;
|
||||
}
|
||||
|
||||
/* see if this is an upgrade. if so, remove the old package first */
|
||||
pmpkg_t *local = _alpm_db_get_pkgfromcache(db, newpkg->name);
|
||||
if(local) {
|
||||
is_upgrade = 1;
|
||||
|
||||
EVENT(trans, PM_TRANS_EVT_UPGRADE_START, newpkg, NULL);
|
||||
_alpm_log(PM_LOG_DEBUG, "upgrading package %s-%s",
|
||||
newpkg->name, newpkg->version);
|
||||
|
||||
/* we'll need to save some record for backup checks later */
|
||||
oldpkg = _alpm_pkg_new(local->name, local->version);
|
||||
if(oldpkg) {
|
||||
oldpkg->backup = alpm_list_strdup(alpm_pkg_get_backup(local));
|
||||
oldpkg->provides = alpm_list_strdup(alpm_pkg_get_provides(local));
|
||||
strncpy(oldpkg->name, local->name, PKG_NAME_LEN);
|
||||
strncpy(oldpkg->version, local->version, PKG_VERSION_LEN);
|
||||
} else {
|
||||
RET_ERR(PM_ERR_MEMORY, -1);
|
||||
}
|
||||
|
||||
/* copy over the install reason (unless alldeps is set) */
|
||||
if(trans->flags & PM_TRANS_FLAG_ALLDEPS) {
|
||||
newpkg->reason = PM_PKG_REASON_DEPEND;
|
||||
} else {
|
||||
newpkg->reason = alpm_pkg_get_reason(local);
|
||||
}
|
||||
|
||||
/* pre_upgrade scriptlet */
|
||||
if(alpm_pkg_has_scriptlet(newpkg) && !(trans->flags & PM_TRANS_FLAG_NOSCRIPTLET)) {
|
||||
_alpm_runscriptlet(handle->root, newpkg->data, "pre_upgrade", newpkg->version, oldpkg->version, trans);
|
||||
}
|
||||
} else {
|
||||
is_upgrade = 0;
|
||||
|
||||
EVENT(trans, PM_TRANS_EVT_ADD_START, newpkg, NULL);
|
||||
_alpm_log(PM_LOG_DEBUG, "adding package %s-%s",
|
||||
newpkg->name, newpkg->version);
|
||||
|
||||
/* pre_install scriptlet */
|
||||
if(alpm_pkg_has_scriptlet(newpkg) && !(trans->flags & PM_TRANS_FLAG_NOSCRIPTLET)) {
|
||||
_alpm_runscriptlet(handle->root, newpkg->data, "pre_install", newpkg->version, NULL, trans);
|
||||
}
|
||||
}
|
||||
|
||||
if(oldpkg) {
|
||||
static int upgrade_remove(pmpkg_t *oldpkg, pmpkg_t *newpkg, pmtrans_t *trans, pmdb_t *db) {
|
||||
/* this is kinda odd. If the old package exists, at this point we make a
|
||||
* NEW transaction, unrelated to handle->trans, and instantiate a "remove"
|
||||
* with the type PM_TRANS_TYPE_REMOVEUPGRADE. TODO: kill this weird
|
||||
@ -412,68 +323,31 @@ int _alpm_add_commit(pmtrans_t *trans, pmdb_t *db)
|
||||
if(ret == -1) {
|
||||
RET_ERR(PM_ERR_TRANS_ABORT, -1);
|
||||
}
|
||||
}
|
||||
|
||||
if(!(trans->flags & PM_TRANS_FLAG_DBONLY)) {
|
||||
_alpm_log(PM_LOG_DEBUG, "extracting files");
|
||||
return(0);
|
||||
}
|
||||
|
||||
if ((archive = archive_read_new()) == NULL) {
|
||||
RET_ERR(PM_ERR_LIBARCHIVE_ERROR, -1);
|
||||
}
|
||||
|
||||
archive_read_support_compression_all(archive);
|
||||
archive_read_support_format_all(archive);
|
||||
|
||||
if(archive_read_open_file(archive, newpkg->data, ARCHIVE_DEFAULT_BYTES_PER_BLOCK) != ARCHIVE_OK) {
|
||||
RET_ERR(PM_ERR_PKG_OPEN, -1);
|
||||
}
|
||||
|
||||
/* save the cwd so we can restore it later */
|
||||
if(getcwd(cwd, PATH_MAX) == NULL) {
|
||||
_alpm_log(PM_LOG_ERROR, _("could not get current working directory"));
|
||||
cwd[0] = 0;
|
||||
}
|
||||
|
||||
/* libarchive requires this for extracting hard links */
|
||||
chdir(handle->root);
|
||||
|
||||
targ_count = alpm_list_count(targ);
|
||||
/* call PROGRESS once with 0 percent, as we sort-of skip that here */
|
||||
PROGRESS(trans, (is_upgrade ? PM_TRANS_PROGRESS_UPGRADE_START : PM_TRANS_PROGRESS_ADD_START),
|
||||
newpkg->name, 0, pkg_count, (pkg_count - targ_count +1));
|
||||
|
||||
for(i = 0; archive_read_next_header(archive, &entry) == ARCHIVE_OK; i++) {
|
||||
static int extract_single_file(struct archive *archive,
|
||||
struct archive_entry *entry, pmpkg_t *newpkg, pmpkg_t *oldpkg,
|
||||
pmtrans_t *trans, pmdb_t *db)
|
||||
{
|
||||
const char *entryname; /* the name of the file in the archive */
|
||||
mode_t entrymode;
|
||||
char filename[PATH_MAX]; /* the actual file we're extracting */
|
||||
int needbackup = 0, notouch = 0;
|
||||
char *hash_orig = NULL;
|
||||
struct stat buf;
|
||||
int use_md5 = 0;
|
||||
const int archive_flags = ARCHIVE_EXTRACT_OWNER |
|
||||
ARCHIVE_EXTRACT_PERM |
|
||||
ARCHIVE_EXTRACT_TIME;
|
||||
int errors = 0;
|
||||
|
||||
entryname = archive_entry_pathname(entry);
|
||||
|
||||
if(newpkg->size != 0) {
|
||||
/* Using compressed size for calculations here, as newpkg->isize is not
|
||||
* exact when it comes to comparing to the ACTUAL uncompressed size
|
||||
* (missing metadata sizes) */
|
||||
unsigned long pos = archive_position_compressed(archive);
|
||||
percent = (double)pos / (double)newpkg->size;
|
||||
_alpm_log(PM_LOG_DEBUG, "decompression progress: %f%% (%ld / %ld)",
|
||||
percent*100.0, pos, newpkg->size);
|
||||
if(percent >= 1.0) {
|
||||
percent = 1.0;
|
||||
}
|
||||
}
|
||||
|
||||
PROGRESS(trans, (is_upgrade ? PM_TRANS_PROGRESS_UPGRADE_START : PM_TRANS_PROGRESS_ADD_START),
|
||||
newpkg->name, (int)(percent * 100), pkg_count, (pkg_count - targ_count +1));
|
||||
entrymode = archive_entry_mode(entry);
|
||||
|
||||
memset(filename, 0, PATH_MAX); /* just to be sure */
|
||||
|
||||
if(strcmp(entryname, ".PKGINFO") == 0
|
||||
|| strcmp(entryname, ".FILELIST") == 0) {
|
||||
archive_read_data_skip(archive);
|
||||
continue;
|
||||
} else if(strcmp(entryname, ".INSTALL") == 0) {
|
||||
if(strcmp(entryname, ".INSTALL") == 0) {
|
||||
/* the install script goes inside the db */
|
||||
snprintf(filename, PATH_MAX, "%s/%s-%s/install", db->path,
|
||||
newpkg->name, newpkg->version);
|
||||
@ -486,7 +360,7 @@ int _alpm_add_commit(pmtrans_t *trans, pmdb_t *db)
|
||||
* already been handled (for future possibilities) */
|
||||
_alpm_log(PM_LOG_DEBUG, "skipping extraction of '%s'", entryname);
|
||||
archive_read_data_skip(archive);
|
||||
continue;
|
||||
return(0);
|
||||
} else {
|
||||
/* build the new entryname relative to handle->root */
|
||||
snprintf(filename, PATH_MAX, "%s%s", handle->root, entryname);
|
||||
@ -496,53 +370,131 @@ int _alpm_add_commit(pmtrans_t *trans, pmdb_t *db)
|
||||
if(alpm_list_find_str(handle->noextract, entryname)) {
|
||||
_alpm_log(PM_LOG_DEBUG, "%s is in NoExtract, skipping extraction",
|
||||
entryname);
|
||||
alpm_logaction("note: %s is in NoExtract, skipping extraction", entryname);
|
||||
alpm_logaction("note: %s is in NoExtract, skipping extraction",
|
||||
entryname);
|
||||
archive_read_data_skip(archive);
|
||||
continue;
|
||||
return(0);
|
||||
}
|
||||
|
||||
/* if a file is in the add skiplist we never extract it */
|
||||
if(alpm_list_find_str(trans->skip_add, filename)) {
|
||||
_alpm_log(PM_LOG_DEBUG, "%s is in trans->skip_add, skipping extraction", entryname);
|
||||
archive_read_data_skip(archive);
|
||||
continue;
|
||||
return(0);
|
||||
}
|
||||
|
||||
/* check is file already exists */
|
||||
if(stat(filename, &buf) == 0 && !S_ISDIR(buf.st_mode)) {
|
||||
/* it does, is it a backup=() file?
|
||||
* always check the newpkg first, so when we do add a backup=() file,
|
||||
* we don't have to wait a full upgrade cycle */
|
||||
/* Check for file existence. This is one of the more crucial parts
|
||||
* to get 'right'. Here are the possibilities, with the filesystem
|
||||
* on the left and the package on the top:
|
||||
* (F=file, N=node, S=symlink, D=dir)
|
||||
* | F/N | S | D
|
||||
* non-existent | 1 | 2 | 3
|
||||
* F/N | 4 | 5 | 6
|
||||
* S | 7 | 8 | 9
|
||||
* D | 10 | 11 | 12
|
||||
*
|
||||
* 1,2,3- just extract, no magic necessary. lstat will fail here.
|
||||
* 4,5,6,7,8- conflict checks should have caught this. either overwrite
|
||||
* or backup the file.
|
||||
* 9- follow the symlink, hopefully it is a directory, check it.
|
||||
* 10- file replacing directory- don't allow it.
|
||||
* 11- don't extract symlink- a dir exists here. we don't want links to
|
||||
* links, etc.
|
||||
* 12- skip extraction, dir already exists.
|
||||
*/
|
||||
struct stat lsbuf;
|
||||
if(lstat(filename, &lsbuf) != 0) {
|
||||
/* cases 1,2,3: couldn't stat an existing file, skip all backup checks */
|
||||
} else {
|
||||
/* do a stat as well, so we can see what symlinks point to */
|
||||
struct stat sbuf;
|
||||
stat(filename, &sbuf);
|
||||
|
||||
if(S_ISDIR(lsbuf.st_mode) && S_ISDIR(entrymode)) {
|
||||
/* case 12: existing dir, ignore it */
|
||||
if(lsbuf.st_mode != entrymode) {
|
||||
/* if filesystem perms are different than pkg perms, warn user */
|
||||
int mask = 07777;
|
||||
_alpm_log(PM_LOG_WARNING, _("directory permissions differ on %s\n"
|
||||
"filesystem: %o package: %o"), entryname, lsbuf.st_mode & mask,
|
||||
entrymode & mask);
|
||||
alpm_logaction("warning: directory permissions differ on %s\n"
|
||||
"filesystem: %o package: %o", entryname, lsbuf.st_mode & mask,
|
||||
entrymode & mask);
|
||||
}
|
||||
_alpm_log(PM_LOG_DEBUG, "extract: skipping dir extraction of %s",
|
||||
entryname);
|
||||
archive_read_data_skip(archive);
|
||||
return(0);
|
||||
} else if(S_ISDIR(lsbuf.st_mode) && S_ISLNK(entrymode)) {
|
||||
/* case 11: existing dir, symlink in package, ignore it */
|
||||
_alpm_log(PM_LOG_DEBUG, "extract: skipping symlink extraction of %s",
|
||||
entryname);
|
||||
archive_read_data_skip(archive);
|
||||
return(0);
|
||||
} else if(S_ISLNK(lsbuf.st_mode) && S_ISDIR(entrymode)) {
|
||||
/* case 9: existing symlink, dir in package */
|
||||
if(S_ISDIR(sbuf.st_mode)) {
|
||||
/* the symlink on FS is to a directory, so we'll use it */
|
||||
_alpm_log(PM_LOG_DEBUG, "extract: skipping symlink overwrite of %s",
|
||||
entryname);
|
||||
archive_read_data_skip(archive);
|
||||
return(0);
|
||||
} else {
|
||||
/* this is BAD. symlink was not to a directory */
|
||||
_alpm_log(PM_LOG_ERROR, _("extract: symlink %s does not point to dir"),
|
||||
entryname);
|
||||
archive_read_data_skip(archive);
|
||||
return(1);
|
||||
}
|
||||
} else if(S_ISDIR(lsbuf.st_mode) && S_ISREG(entrymode)) {
|
||||
/* case 10: trying to overwrite dir tree with file, don't allow it */
|
||||
_alpm_log(PM_LOG_ERROR, _("extract: not overwriting dir with file %s"),
|
||||
entryname);
|
||||
archive_read_data_skip(archive);
|
||||
return(1);
|
||||
} else if(S_ISREG(lsbuf.st_mode) && S_ISDIR(entrymode)) {
|
||||
/* case 6: trying to overwrite file with dir */
|
||||
_alpm_log(PM_LOG_DEBUG, "extract: overwriting file with dir %s",
|
||||
entryname);
|
||||
} else if(S_ISREG(entrymode)) {
|
||||
/* case 4,7: */
|
||||
/* if file is in NoUpgrade, don't touch it */
|
||||
if(alpm_list_find_str(handle->noupgrade, entryname)) {
|
||||
notouch = 1;
|
||||
} else {
|
||||
/* go to the backup array and see if our conflict is there */
|
||||
/* check newpkg first, so that adding backup files is retroactive */
|
||||
needbackup = alpm_list_find_str(alpm_pkg_get_backup(newpkg), entryname);
|
||||
|
||||
if(is_upgrade) {
|
||||
/* check oldpkg for a backup entry, store the hash if available */
|
||||
if(oldpkg) {
|
||||
hash_orig = _alpm_needbackup(entryname, alpm_pkg_get_backup(oldpkg));
|
||||
if(hash_orig) {
|
||||
needbackup = 1;
|
||||
}
|
||||
}
|
||||
|
||||
/* this is kind of gross. if we force hash_orig to be non-NULL we can
|
||||
* catch the pro-active backup=() case (when the backup entry is in
|
||||
* the new package, and not the old */
|
||||
/* if we force hash_orig to be non-NULL retroactive backup works */
|
||||
if(needbackup && !hash_orig) {
|
||||
hash_orig = strdup("");
|
||||
}
|
||||
|
||||
/* NoUpgrade skips all this backup stuff, because it's just never
|
||||
* touched */
|
||||
if(alpm_list_find_str(handle->noupgrade, entryname)) {
|
||||
notouch = 1;
|
||||
needbackup = 0;
|
||||
}
|
||||
}
|
||||
/* else if(S_ISLNK(entrymode)) { */
|
||||
/* case 5,8: don't need to do anything special */
|
||||
}
|
||||
|
||||
if(strlen(newpkg->sha1sum) == 0) {
|
||||
use_md5 = 1;
|
||||
}
|
||||
|
||||
if(needbackup) {
|
||||
char *tempfile = NULL;
|
||||
char *hash_local = NULL, *hash_pkg = NULL;
|
||||
int fd;
|
||||
|
||||
/* extract the package's version to a temporary file and md5 it */
|
||||
/* extract the package's version to a temporary file and checksum it */
|
||||
tempfile = strdup("/tmp/alpm_XXXXXX");
|
||||
fd = mkstemp(tempfile);
|
||||
|
||||
@ -554,15 +506,14 @@ int _alpm_add_commit(pmtrans_t *trans, pmdb_t *db)
|
||||
_alpm_log(PM_LOG_DEBUG, "warning extracting %s (%s)",
|
||||
entryname, archive_error_string(archive));
|
||||
} else if(ret != ARCHIVE_OK) {
|
||||
_alpm_log(PM_LOG_ERROR, "could not extract %s (%s)",
|
||||
_alpm_log(PM_LOG_ERROR, _("could not extract %s (%s)"),
|
||||
entryname, archive_error_string(archive));
|
||||
alpm_logaction("error: could not extract %s (%s)",
|
||||
entryname, archive_error_string(archive));
|
||||
errors++;
|
||||
unlink(tempfile);
|
||||
FREE(hash_orig);
|
||||
close(fd);
|
||||
continue;
|
||||
return(1);
|
||||
}
|
||||
|
||||
if(use_md5) {
|
||||
@ -580,7 +531,7 @@ int _alpm_add_commit(pmtrans_t *trans, pmdb_t *db)
|
||||
backups = alpm_list_next(backups)) {
|
||||
char *oldbackup = alpm_list_getdata(backups);
|
||||
if(!oldbackup || strcmp(oldbackup, entryname) != 0) {
|
||||
continue;
|
||||
return(0);
|
||||
}
|
||||
char *backup = NULL;
|
||||
int backup_len = strlen(oldbackup) + 2; /* tab char and null byte */
|
||||
@ -602,16 +553,12 @@ int _alpm_add_commit(pmtrans_t *trans, pmdb_t *db)
|
||||
backups->data = backup;
|
||||
}
|
||||
|
||||
if(use_md5) {
|
||||
_alpm_log(PM_LOG_DEBUG, "checking md5 hashes for %s", entryname);
|
||||
} else {
|
||||
_alpm_log(PM_LOG_DEBUG, "checking sha1 hashes for %s", entryname);
|
||||
}
|
||||
_alpm_log(PM_LOG_DEBUG, "checking hashes for %s", entryname);
|
||||
_alpm_log(PM_LOG_DEBUG, "current: %s", hash_local);
|
||||
_alpm_log(PM_LOG_DEBUG, "new: %s", hash_pkg);
|
||||
_alpm_log(PM_LOG_DEBUG, "original: %s", hash_orig);
|
||||
|
||||
if(!is_upgrade) {
|
||||
if(!oldpkg) {
|
||||
/* looks like we have a local file that has a different hash as the
|
||||
* file in the package, move it to a .pacorig */
|
||||
if(strcmp(hash_local, hash_pkg) != 0) {
|
||||
@ -687,37 +634,28 @@ int _alpm_add_commit(pmtrans_t *trans, pmdb_t *db)
|
||||
unlink(tempfile);
|
||||
FREE(tempfile);
|
||||
close(fd);
|
||||
} else { /* ! needbackup */
|
||||
|
||||
} else {
|
||||
/* we didn't need a backup */
|
||||
if(notouch) {
|
||||
/* change the path to a .pacnew extension */
|
||||
_alpm_log(PM_LOG_DEBUG, "%s is in NoUpgrade -- skipping", filename);
|
||||
_alpm_log(PM_LOG_WARNING, _("extracting %s as %s.pacnew"), filename, filename);
|
||||
alpm_logaction("warning: extracting %s as %s.pacnew", filename, filename);
|
||||
strncat(filename, ".pacnew", PATH_MAX);
|
||||
strncat(filename, ".pacnew", PATH_MAX - strlen(filename));
|
||||
} else {
|
||||
_alpm_log(PM_LOG_DEBUG, "extracting %s", filename);
|
||||
}
|
||||
|
||||
if(trans->flags & PM_TRANS_FLAG_FORCE) {
|
||||
/* if FORCE was used, then unlink() each file (whether it's there
|
||||
* or not) before extracting. this prevents the old "Text file busy"
|
||||
* error that crops up if one tries to --force a glibc or pacman
|
||||
* upgrade.
|
||||
*/
|
||||
/* if FORCE was used, unlink() each file (whether it's there
|
||||
* or not) before extracting. This prevents the old "Text file busy"
|
||||
* error that crops up if forcing a glibc or pacman upgrade. */
|
||||
unlink(filename);
|
||||
}
|
||||
|
||||
archive_entry_set_pathname(entry, filename);
|
||||
|
||||
/* FS #7484
|
||||
* By default, libarchive 2.2.3 overwrites existing symlinks by directories from the archive,
|
||||
* which isn't the behavior we want.
|
||||
* This can be avoided by using the ARCHIVE_EXTRACT_NO_OVERWRITE flag, and this works
|
||||
* fine because all files where an overwrite could be needed are deleted first :
|
||||
* 1) if it's an upgrade, existing files are removed when the old pkg is removed
|
||||
* 2) if there is a file conflict, but --force is used, then files are also removed : see above
|
||||
*/
|
||||
int ret = archive_read_extract(archive, entry, archive_flags | ARCHIVE_EXTRACT_NO_OVERWRITE);
|
||||
int ret = archive_read_extract(archive, entry, archive_flags);
|
||||
if(ret == ARCHIVE_WARN) {
|
||||
/* operation succeeded but a non-critical error was encountered */
|
||||
_alpm_log(PM_LOG_DEBUG, "warning extracting %s (%s)",
|
||||
@ -727,8 +665,7 @@ int _alpm_add_commit(pmtrans_t *trans, pmdb_t *db)
|
||||
entryname, archive_error_string(archive));
|
||||
alpm_logaction("error: could not extract %s (%s)",
|
||||
entryname, archive_error_string(archive));
|
||||
errors++;
|
||||
continue;
|
||||
return(1);
|
||||
}
|
||||
|
||||
/* calculate an hash if this is in newpkg's backup */
|
||||
@ -739,7 +676,7 @@ int _alpm_add_commit(pmtrans_t *trans, pmdb_t *db)
|
||||
int backup_len = strlen(oldbackup) + 2; /* tab char and null byte */
|
||||
|
||||
if(!oldbackup || strcmp(oldbackup, entryname) != 0) {
|
||||
continue;
|
||||
return(0);
|
||||
}
|
||||
_alpm_log(PM_LOG_DEBUG, "appending backup entry for %s", filename);
|
||||
|
||||
@ -763,6 +700,126 @@ int _alpm_add_commit(pmtrans_t *trans, pmdb_t *db)
|
||||
b->data = backup;
|
||||
}
|
||||
}
|
||||
return(errors);
|
||||
}
|
||||
|
||||
static int commit_single_pkg(pmpkg_t *newpkg, int pkg_current, int pkg_count,
|
||||
pmtrans_t *trans, pmdb_t *db)
|
||||
{
|
||||
int i, ret = 0, errors = 0;
|
||||
struct archive *archive;
|
||||
struct archive_entry *entry;
|
||||
char cwd[PATH_MAX] = "";
|
||||
char scriptlet[PATH_MAX+1];
|
||||
int is_upgrade = 0;
|
||||
double percent = 0.0;
|
||||
pmpkg_t *oldpkg = NULL;
|
||||
|
||||
snprintf(scriptlet, PATH_MAX, "%s%s-%s/install", db->path,
|
||||
alpm_pkg_get_name(newpkg), alpm_pkg_get_version(newpkg));
|
||||
|
||||
/* see if this is an upgrade. if so, remove the old package first */
|
||||
pmpkg_t *local = _alpm_db_get_pkgfromcache(db, newpkg->name);
|
||||
if(local) {
|
||||
is_upgrade = 1;
|
||||
|
||||
EVENT(trans, PM_TRANS_EVT_UPGRADE_START, newpkg, NULL);
|
||||
_alpm_log(PM_LOG_DEBUG, "upgrading package %s-%s",
|
||||
newpkg->name, newpkg->version);
|
||||
|
||||
/* we'll need to save some record for backup checks later */
|
||||
oldpkg = _alpm_pkg_dup(local);
|
||||
/* copy over the install reason (unless alldeps is set) */
|
||||
if(trans->flags & PM_TRANS_FLAG_ALLDEPS) {
|
||||
newpkg->reason = PM_PKG_REASON_DEPEND;
|
||||
} else {
|
||||
newpkg->reason = alpm_pkg_get_reason(local);
|
||||
}
|
||||
|
||||
/* pre_upgrade scriptlet */
|
||||
if(alpm_pkg_has_scriptlet(newpkg) && !(trans->flags & PM_TRANS_FLAG_NOSCRIPTLET)) {
|
||||
_alpm_runscriptlet(handle->root, newpkg->data, "pre_upgrade", newpkg->version, oldpkg->version, trans);
|
||||
}
|
||||
} else {
|
||||
is_upgrade = 0;
|
||||
|
||||
EVENT(trans, PM_TRANS_EVT_ADD_START, newpkg, NULL);
|
||||
_alpm_log(PM_LOG_DEBUG, "adding package %s-%s",
|
||||
newpkg->name, newpkg->version);
|
||||
|
||||
/* pre_install scriptlet */
|
||||
if(alpm_pkg_has_scriptlet(newpkg) && !(trans->flags & PM_TRANS_FLAG_NOSCRIPTLET)) {
|
||||
_alpm_runscriptlet(handle->root, newpkg->data, "pre_install", newpkg->version, NULL, trans);
|
||||
}
|
||||
}
|
||||
|
||||
if(oldpkg) {
|
||||
/* set up fake remove transaction */
|
||||
int ret = upgrade_remove(oldpkg, newpkg, trans, db);
|
||||
if(ret != 0) {
|
||||
return(ret);
|
||||
}
|
||||
}
|
||||
|
||||
if(!(trans->flags & PM_TRANS_FLAG_DBONLY)) {
|
||||
_alpm_log(PM_LOG_DEBUG, "extracting files");
|
||||
|
||||
if ((archive = archive_read_new()) == NULL) {
|
||||
RET_ERR(PM_ERR_LIBARCHIVE_ERROR, -1);
|
||||
}
|
||||
|
||||
archive_read_support_compression_all(archive);
|
||||
archive_read_support_format_all(archive);
|
||||
|
||||
if(archive_read_open_file(archive, newpkg->data, ARCHIVE_DEFAULT_BYTES_PER_BLOCK) != ARCHIVE_OK) {
|
||||
RET_ERR(PM_ERR_PKG_OPEN, -1);
|
||||
}
|
||||
|
||||
/* save the cwd so we can restore it later */
|
||||
if(getcwd(cwd, PATH_MAX) == NULL) {
|
||||
_alpm_log(PM_LOG_ERROR, _("could not get current working directory"));
|
||||
cwd[0] = 0;
|
||||
}
|
||||
|
||||
/* libarchive requires this for extracting hard links */
|
||||
chdir(handle->root);
|
||||
|
||||
/* call PROGRESS once with 0 percent, as we sort-of skip that here */
|
||||
if(is_upgrade) {
|
||||
PROGRESS(trans, PM_TRANS_PROGRESS_UPGRADE_START,
|
||||
alpm_pkg_get_name(newpkg), 0, pkg_count, pkg_current);
|
||||
} else {
|
||||
PROGRESS(trans, PM_TRANS_PROGRESS_ADD_START,
|
||||
alpm_pkg_get_name(newpkg), 0, pkg_count, pkg_current);
|
||||
}
|
||||
|
||||
for(i = 0; archive_read_next_header(archive, &entry) == ARCHIVE_OK; i++) {
|
||||
if(newpkg->size != 0) {
|
||||
/* Using compressed size for calculations here, as newpkg->isize is not
|
||||
* exact when it comes to comparing to the ACTUAL uncompressed size
|
||||
* (missing metadata sizes) */
|
||||
unsigned long pos = archive_position_compressed(archive);
|
||||
percent = (double)pos / (double)newpkg->size;
|
||||
_alpm_log(PM_LOG_DEBUG, "decompression progress: %f%% (%ld / %ld)",
|
||||
percent*100.0, pos, newpkg->size);
|
||||
if(percent >= 1.0) {
|
||||
percent = 1.0;
|
||||
}
|
||||
}
|
||||
|
||||
if(is_upgrade) {
|
||||
PROGRESS(trans, PM_TRANS_PROGRESS_UPGRADE_START,
|
||||
alpm_pkg_get_name(newpkg), (int)(percent * 100), pkg_count,
|
||||
pkg_current);
|
||||
} else {
|
||||
PROGRESS(trans, PM_TRANS_PROGRESS_ADD_START,
|
||||
alpm_pkg_get_name(newpkg), (int)(percent * 100), pkg_count,
|
||||
pkg_current);
|
||||
}
|
||||
|
||||
/* extract the next file from the archive */
|
||||
errors += extract_single_file(archive, entry, newpkg, oldpkg,
|
||||
trans, db);
|
||||
}
|
||||
archive_read_finish(archive);
|
||||
|
||||
@ -794,6 +851,7 @@ int _alpm_add_commit(pmtrans_t *trans, pmdb_t *db)
|
||||
/* special case: if our provides list has changed from oldpkg to newpkg AND
|
||||
* we get here, we need to make sure we find the actual provision that
|
||||
* still satisfies this case, and update its 'requiredby' field... ugh */
|
||||
/* TODO this seems really messy and should be taken care of elsewhere */
|
||||
alpm_list_t *provdiff, *prov;
|
||||
provdiff = alpm_list_diff(alpm_pkg_get_provides(oldpkg),
|
||||
alpm_pkg_get_provides(newpkg),
|
||||
@ -854,12 +912,10 @@ int _alpm_add_commit(pmtrans_t *trans, pmdb_t *db)
|
||||
|
||||
if(is_upgrade) {
|
||||
PROGRESS(trans, PM_TRANS_PROGRESS_UPGRADE_START,
|
||||
alpm_pkg_get_name(newpkg),100, pkg_count,
|
||||
(pkg_count - targ_count + 1));
|
||||
alpm_pkg_get_name(newpkg), 100, pkg_count, pkg_current);
|
||||
} else {
|
||||
PROGRESS(trans, PM_TRANS_PROGRESS_ADD_START,
|
||||
alpm_pkg_get_name(newpkg),100, pkg_count,
|
||||
(pkg_count - targ_count + 1));
|
||||
alpm_pkg_get_name(newpkg), 100, pkg_count, pkg_current);
|
||||
}
|
||||
EVENT(trans, PM_TRANS_EVT_EXTRACT_DONE, NULL, NULL);
|
||||
|
||||
@ -883,6 +939,36 @@ int _alpm_add_commit(pmtrans_t *trans, pmdb_t *db)
|
||||
}
|
||||
|
||||
_alpm_pkg_free(oldpkg);
|
||||
|
||||
return(0);
|
||||
}
|
||||
|
||||
int _alpm_add_commit(pmtrans_t *trans, pmdb_t *db)
|
||||
{
|
||||
int pkg_count, pkg_current;
|
||||
alpm_list_t *targ;
|
||||
|
||||
ALPM_LOG_FUNC;
|
||||
|
||||
ASSERT(trans != NULL, RET_ERR(PM_ERR_TRANS_NULL, -1));
|
||||
ASSERT(db != NULL, RET_ERR(PM_ERR_DB_NULL, -1));
|
||||
|
||||
if(trans->packages == NULL) {
|
||||
return(0);
|
||||
}
|
||||
|
||||
pkg_count = alpm_list_count(trans->targets);
|
||||
pkg_current = 1;
|
||||
|
||||
/* loop through our package list adding/upgrading one at a time */
|
||||
for(targ = trans->packages; targ; targ = targ->next) {
|
||||
if(handle->trans->state == STATE_INTERRUPTED) {
|
||||
break;
|
||||
}
|
||||
|
||||
pmpkg_t *newpkg = (pmpkg_t *)targ->data;
|
||||
commit_single_pkg(newpkg, pkg_current, pkg_count, trans, db);
|
||||
pkg_current++;
|
||||
}
|
||||
|
||||
/* run ldconfig if it exists */
|
||||
|
||||
Loading…
Reference in New Issue
Block a user