d90a248244
--HG-- extra : convert_revision : xtraeme%40gmail.com-20091130112404-mlrt6x08thdvmrsn
510 lines
13 KiB
C
510 lines
13 KiB
C
/*-
|
|
* Copyright (c) 2008-2009 Juan Romero Pardines.
|
|
* All rights reserved.
|
|
*
|
|
* Redistribution and use in source and binary forms, with or without
|
|
* modification, are permitted provided that the following conditions
|
|
* are met:
|
|
* 1. Redistributions of source code must retain the above copyright
|
|
* notice, this list of conditions and the following disclaimer.
|
|
* 2. Redistributions in binary form must reproduce the above copyright
|
|
* notice, this list of conditions and the following disclaimer in the
|
|
* documentation and/or other materials provided with the distribution.
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
|
|
* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
|
|
* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
|
|
* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
|
|
* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
|
|
* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
|
|
* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
|
|
* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
|
|
* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
|
|
* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
|
*/
|
|
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include <errno.h>
|
|
|
|
#include <xbps_api.h>
|
|
|
|
static int add_missing_reqdep(prop_dictionary_t, const char *);
|
|
static int remove_missing_reqdep(prop_dictionary_t, const char *);
|
|
static int find_repo_deps(prop_dictionary_t, prop_dictionary_t,
|
|
const char *, prop_array_t);
|
|
|
|
static int
|
|
store_dependency(prop_dictionary_t master, prop_dictionary_t depd,
|
|
const char *repoloc)
|
|
{
|
|
prop_dictionary_t dict;
|
|
prop_array_t array;
|
|
const char *pkgname;
|
|
int rv = 0;
|
|
pkg_state_t state = 0;
|
|
|
|
assert(master != NULL);
|
|
assert(depd != NULL);
|
|
assert(repoloc != NULL);
|
|
/*
|
|
* Get some info about dependencies and current repository.
|
|
*/
|
|
if (!prop_dictionary_get_cstring_nocopy(depd, "pkgname", &pkgname))
|
|
return errno;
|
|
|
|
dict = prop_dictionary_copy(depd);
|
|
if (dict == NULL)
|
|
return errno;
|
|
|
|
array = prop_dictionary_get(master, "unsorted_deps");
|
|
if (array == NULL) {
|
|
prop_object_release(dict);
|
|
return errno;
|
|
}
|
|
/*
|
|
* Always set "not-installed" package state. Will be overwritten
|
|
* to its correct state later.
|
|
*/
|
|
rv = xbps_set_pkg_state_dictionary(dict, XBPS_PKG_STATE_NOT_INSTALLED);
|
|
if (rv != 0) {
|
|
prop_object_release(dict);
|
|
return rv;
|
|
}
|
|
/*
|
|
* Overwrite package state in dictionary if it was unpacked
|
|
* previously.
|
|
*/
|
|
rv = xbps_get_pkg_state_installed(pkgname, &state);
|
|
if (rv == 0) {
|
|
if ((rv = xbps_set_pkg_state_dictionary(dict, state)) != 0) {
|
|
prop_object_release(dict);
|
|
return rv;
|
|
}
|
|
}
|
|
/*
|
|
* Add required objects into package dep's dictionary.
|
|
*/
|
|
if (!prop_dictionary_set_cstring(dict, "repository", repoloc)) {
|
|
prop_object_release(dict);
|
|
return errno;
|
|
}
|
|
|
|
/*
|
|
* Add the dictionary into the array.
|
|
*/
|
|
if (!xbps_add_obj_to_array(array, dict)) {
|
|
prop_object_release(dict);
|
|
return EINVAL;
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
static int
|
|
add_missing_reqdep(prop_dictionary_t master, const char *reqpkg)
|
|
{
|
|
prop_array_t missing_rdeps;
|
|
prop_string_t reqpkg_str;
|
|
prop_object_iterator_t iter = NULL;
|
|
prop_object_t obj;
|
|
size_t idx = 0;
|
|
bool add_pkgdep, pkgfound, update_pkgdep;
|
|
|
|
assert(master != NULL);
|
|
assert(reqpkg != NULL);
|
|
|
|
add_pkgdep = update_pkgdep = pkgfound = false;
|
|
|
|
reqpkg_str = prop_string_create_cstring_nocopy(reqpkg);
|
|
if (reqpkg_str == NULL)
|
|
return errno;
|
|
|
|
missing_rdeps = prop_dictionary_get(master, "missing_deps");
|
|
iter = prop_array_iterator(missing_rdeps);
|
|
if (iter == NULL)
|
|
goto out;
|
|
|
|
while ((obj = prop_object_iterator_next(iter)) != NULL) {
|
|
const char *curdep, *curver, *pkgver;
|
|
char *curpkgnamedep = NULL, *pkgnamedep = NULL;
|
|
|
|
assert(prop_object_type(obj) == PROP_TYPE_STRING);
|
|
curdep = prop_string_cstring_nocopy(obj);
|
|
curver = xbps_get_pkgdep_version(curdep);
|
|
pkgver = xbps_get_pkgdep_version(reqpkg);
|
|
if (curver == NULL || pkgver == NULL)
|
|
goto out;
|
|
curpkgnamedep = xbps_get_pkgdep_name(curdep);
|
|
if (curpkgnamedep == NULL)
|
|
goto out;
|
|
pkgnamedep = xbps_get_pkgdep_name(reqpkg);
|
|
if (pkgnamedep == NULL) {
|
|
free(curpkgnamedep);
|
|
goto out;
|
|
}
|
|
if (strcmp(pkgnamedep, curpkgnamedep) == 0) {
|
|
pkgfound = true;
|
|
/*
|
|
* if new dependency version is greater than current
|
|
* one, store it.
|
|
*/
|
|
DPRINTF(("Missing pkgdep name matched, curver: %s "
|
|
"newver: %s\n", curver, pkgver));
|
|
if (xbps_cmpver(curver, pkgver) <= 0) {
|
|
add_pkgdep = false;
|
|
free(curpkgnamedep);
|
|
free(pkgnamedep);
|
|
goto out;
|
|
}
|
|
update_pkgdep = true;
|
|
}
|
|
free(curpkgnamedep);
|
|
free(pkgnamedep);
|
|
if (pkgfound)
|
|
break;
|
|
|
|
idx++;
|
|
}
|
|
add_pkgdep = true;
|
|
out:
|
|
if (iter)
|
|
prop_object_iterator_release(iter);
|
|
if (update_pkgdep)
|
|
prop_array_remove(missing_rdeps, idx);
|
|
if (add_pkgdep && !xbps_add_obj_to_array(missing_rdeps, reqpkg_str)) {
|
|
prop_object_release(reqpkg_str);
|
|
return errno;
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
static int
|
|
remove_missing_reqdep(prop_dictionary_t master, const char *reqpkg)
|
|
{
|
|
prop_array_t missing_rdeps;
|
|
prop_object_iterator_t iter = NULL;
|
|
prop_object_t obj;
|
|
size_t idx = 0;
|
|
int rv = 0;
|
|
bool found = false;
|
|
|
|
assert(master != NULL);
|
|
assert(reqpkg != NULL);
|
|
|
|
missing_rdeps = prop_dictionary_get(master, "missing_deps");
|
|
iter = prop_array_iterator(missing_rdeps);
|
|
if (iter == NULL)
|
|
return errno;
|
|
|
|
while ((obj = prop_object_iterator_next(iter)) != NULL) {
|
|
const char *curdep;
|
|
char *curpkgnamedep, *reqpkgname;
|
|
|
|
curdep = prop_string_cstring_nocopy(obj);
|
|
curpkgnamedep = xbps_get_pkgdep_name(curdep);
|
|
if (curpkgnamedep == NULL) {
|
|
rv = errno;
|
|
goto out;
|
|
}
|
|
reqpkgname = xbps_get_pkgdep_name(reqpkg);
|
|
if (reqpkgname == NULL) {
|
|
free(curpkgnamedep);
|
|
rv = errno;
|
|
goto out;
|
|
}
|
|
if (strcmp(reqpkgname, curpkgnamedep) == 0)
|
|
found = true;
|
|
|
|
free(curpkgnamedep);
|
|
free(reqpkgname);
|
|
if (found)
|
|
break;
|
|
idx++;
|
|
}
|
|
out:
|
|
prop_object_iterator_release(iter);
|
|
if (found) {
|
|
prop_array_remove(missing_rdeps, idx);
|
|
return 0;
|
|
}
|
|
if (rv == 0)
|
|
rv = ENOENT;
|
|
|
|
return rv;
|
|
}
|
|
|
|
int SYMEXPORT
|
|
xbps_repository_find_pkg_deps(prop_dictionary_t master, prop_dictionary_t pkg)
|
|
{
|
|
prop_array_t pkg_rdeps, missing_rdeps;
|
|
struct repository_pool *rpool;
|
|
const char *pkgname;
|
|
int rv = 0;
|
|
|
|
assert(master != NULL);
|
|
assert(pkg != NULL);
|
|
|
|
pkg_rdeps = prop_dictionary_get(pkg, "run_depends");
|
|
if (pkg_rdeps == NULL)
|
|
return 0;
|
|
|
|
if (!prop_dictionary_get_cstring_nocopy(pkg, "pkgname", &pkgname))
|
|
return errno;
|
|
|
|
if ((rv = xbps_repository_pool_init()) != 0)
|
|
return rv;
|
|
|
|
DPRINTF(("Checking rundeps for %s.\n", pkgname));
|
|
/*
|
|
* Iterate over the repository pool and find out if we have
|
|
* all available binary packages.
|
|
*/
|
|
SIMPLEQ_FOREACH(rpool, &repopool_queue, chain) {
|
|
/*
|
|
* This will find direct and indirect deps,
|
|
* if any of them is not there it will be added
|
|
* into the missing_deps array.
|
|
*/
|
|
if ((rv = find_repo_deps(master, rpool->rp_repod,
|
|
rpool->rp_uri, pkg_rdeps)) != 0) {
|
|
DPRINTF(("Error '%s' while checking rundeps!\n",
|
|
strerror(rv)));
|
|
goto out;
|
|
}
|
|
}
|
|
|
|
/*
|
|
* If there are no missing deps, there's nothing to do.
|
|
*/
|
|
missing_rdeps = prop_dictionary_get(master, "missing_deps");
|
|
if (prop_array_count(missing_rdeps) == 0)
|
|
goto out;
|
|
|
|
/*
|
|
* Iterate one more time, but this time with missing deps
|
|
* that were found in previous pass.
|
|
*/
|
|
DPRINTF(("Checking for missing deps in %s.\n", pkgname));
|
|
SIMPLEQ_FOREACH(rpool, &repopool_queue, chain) {
|
|
if ((rv = find_repo_deps(master, rpool->rp_repod,
|
|
rpool->rp_uri, missing_rdeps)) != 0) {
|
|
DPRINTF(("Error '%s' while checking for "
|
|
"missing rundeps!\n", strerror(rv)));
|
|
goto out;
|
|
}
|
|
}
|
|
out:
|
|
xbps_repository_pool_release();
|
|
|
|
return rv;
|
|
}
|
|
|
|
static int
|
|
find_repo_deps(prop_dictionary_t master, prop_dictionary_t repo,
|
|
const char *repoloc, prop_array_t array)
|
|
{
|
|
prop_dictionary_t curpkgd, tmpd;
|
|
prop_array_t curpkg_rdeps;
|
|
prop_object_t obj;
|
|
prop_object_iterator_t iter;
|
|
pkg_state_t state = 0;
|
|
const char *reqpkg, *reqvers, *pkg_queued, *repo_pkgver;
|
|
char *pkgname;
|
|
int rv = 0;
|
|
|
|
iter = prop_array_iterator(array);
|
|
if (iter == NULL)
|
|
return ENOMEM;
|
|
|
|
/*
|
|
* Iterate over the list of required run dependencies for
|
|
* current package.
|
|
*/
|
|
while ((obj = prop_object_iterator_next(iter)) != NULL) {
|
|
reqpkg = prop_string_cstring_nocopy(obj);
|
|
if (reqpkg == NULL) {
|
|
rv = EINVAL;
|
|
break;
|
|
}
|
|
/*
|
|
* Check if required dep is satisfied and installed.
|
|
*/
|
|
rv = xbps_check_is_installed_pkg(reqpkg);
|
|
if (rv == -1) {
|
|
/* There was an error checking it... */
|
|
DPRINTF(("Error matching reqdep %s\n", reqpkg));
|
|
break;
|
|
} else if (rv == 1) {
|
|
/* Required pkg dependency is satisfied */
|
|
DPRINTF(("Dependency %s satisfied.\n", reqpkg));
|
|
rv = 0;
|
|
continue;
|
|
}
|
|
DPRINTF(("Dependency %s not installed.\n", reqpkg));
|
|
pkgname = xbps_get_pkgdep_name(reqpkg);
|
|
if (pkgname == NULL) {
|
|
rv = EINVAL;
|
|
break;
|
|
}
|
|
reqvers = xbps_get_pkgdep_version(reqpkg);
|
|
if (reqvers == NULL) {
|
|
free(pkgname);
|
|
rv = EINVAL;
|
|
break;
|
|
}
|
|
/*
|
|
* Check if package is already added in the
|
|
* array of unsorted deps, and check if current required
|
|
* dependency pattern is matched.
|
|
*/
|
|
curpkgd = xbps_find_pkg_in_dict(master, "unsorted_deps", pkgname);
|
|
if (curpkgd == NULL) {
|
|
if (errno && errno != ENOENT) {
|
|
free(pkgname);
|
|
rv = errno;
|
|
break;
|
|
}
|
|
} else if (curpkgd) {
|
|
if (!prop_dictionary_get_cstring_nocopy(curpkgd,
|
|
"pkgver", &pkg_queued)) {
|
|
DPRINTF(("pkgver failed %s\n", reqpkg));
|
|
free(pkgname);
|
|
rv = errno;
|
|
break;
|
|
}
|
|
if (xbps_pkgdep_match(pkg_queued, __UNCONST(reqpkg))) {
|
|
DPRINTF(("Dependency %s already queued.\n",
|
|
pkgname));
|
|
free(pkgname);
|
|
continue;
|
|
}
|
|
}
|
|
|
|
/*
|
|
* If required package is not in repo, add it into the
|
|
* missing deps array and pass to the next one.
|
|
*/
|
|
curpkgd = xbps_find_pkg_in_dict(repo, "packages", pkgname);
|
|
if (curpkgd == NULL) {
|
|
if (errno && errno != ENOENT) {
|
|
free(pkgname);
|
|
rv = errno;
|
|
break;
|
|
}
|
|
|
|
rv = add_missing_reqdep(master, reqpkg);
|
|
if (rv != 0 && rv != EEXIST) {
|
|
DPRINTF(("add missing reqdep failed %s\n",
|
|
reqpkg));
|
|
free(pkgname);
|
|
break;
|
|
} else if (rv == EEXIST) {
|
|
DPRINTF(("Missing dep %s already added.\n",
|
|
reqpkg));
|
|
rv = 0;
|
|
free(pkgname);
|
|
continue;
|
|
} else {
|
|
DPRINTF(("Added missing dep %s (repo: %s).\n",
|
|
reqpkg, repoloc));
|
|
free(pkgname);
|
|
continue;
|
|
}
|
|
}
|
|
/*
|
|
* If version in repo does not satisfy the rundep, pass
|
|
* to the next rundep.
|
|
*/
|
|
if (!prop_dictionary_get_cstring_nocopy(curpkgd,
|
|
"pkgver", &repo_pkgver)) {
|
|
free(pkgname);
|
|
rv = errno;
|
|
break;
|
|
}
|
|
if (xbps_pkgdep_match(repo_pkgver, __UNCONST(reqpkg)) < 1) {
|
|
free(pkgname);
|
|
continue;
|
|
}
|
|
|
|
/*
|
|
* If package is installed but version doesn't satisfy
|
|
* the dependency mark it as an update, otherwise as
|
|
* an install. Packages that were unpacked previously
|
|
* will be marked as pending to be configured.
|
|
*/
|
|
tmpd = xbps_find_pkg_installed_from_plist(pkgname);
|
|
if (tmpd == NULL) {
|
|
if (errno && errno != ENOENT) {
|
|
free(pkgname);
|
|
rv = errno;
|
|
break;
|
|
}
|
|
prop_dictionary_set_cstring_nocopy(curpkgd,
|
|
"trans-action", "install");
|
|
} else if (tmpd) {
|
|
rv = xbps_get_pkg_state_installed(pkgname, &state);
|
|
if (rv != 0) {
|
|
free(pkgname);
|
|
prop_object_release(tmpd);
|
|
break;
|
|
}
|
|
if (state == XBPS_PKG_STATE_INSTALLED)
|
|
prop_dictionary_set_cstring_nocopy(curpkgd,
|
|
"trans-action", "update");
|
|
else
|
|
prop_dictionary_set_cstring_nocopy(curpkgd,
|
|
"trans-action", "configure");
|
|
|
|
prop_object_release(tmpd);
|
|
}
|
|
free(pkgname);
|
|
/*
|
|
* Package is on repo, add it into the dictionary.
|
|
*/
|
|
if ((rv = store_dependency(master, curpkgd, repoloc)) != 0) {
|
|
DPRINTF(("store_dependency failed %s\n", reqpkg));
|
|
break;
|
|
}
|
|
DPRINTF(("Added reqdep %s (repo: %s)\n", reqpkg, repoloc));
|
|
|
|
/*
|
|
* If package was added in the missing_deps array, we
|
|
* can remove it now it has been found in current repository.
|
|
*/
|
|
rv = remove_missing_reqdep(master, reqpkg);
|
|
if (rv == ENOENT) {
|
|
rv = 0;
|
|
} else if (rv == 0) {
|
|
DPRINTF(("Removed missing dep %s.\n", reqpkg));
|
|
} else {
|
|
DPRINTF(("Removing missing dep %s returned %s\n",
|
|
reqpkg, strerror(rv)));
|
|
break;
|
|
}
|
|
|
|
/*
|
|
* If package doesn't have rundeps, pass to the next one.
|
|
*/
|
|
curpkg_rdeps = prop_dictionary_get(curpkgd, "run_depends");
|
|
if (curpkg_rdeps == NULL)
|
|
continue;
|
|
|
|
/*
|
|
* Iterate on required pkg to find more deps.
|
|
*/
|
|
DPRINTF(("Looking for rundeps on %s.\n", reqpkg));
|
|
if ((rv = find_repo_deps(master, repo, repoloc,
|
|
curpkg_rdeps)) != 0) {
|
|
DPRINTF(("Error checking %s rundeps %s\n",
|
|
reqpkg, strerror(errno)));
|
|
break;
|
|
}
|
|
}
|
|
prop_object_iterator_release(iter);
|
|
|
|
return rv;
|
|
}
|