/* check if db conflicts with cap */
static
int find_db_conflicts_dbcnfl_with_cap(int indent, struct i3ctx *ictx,
struct pkg *pkg, const struct capreq *cap)
{
int i, j, ncnfl = 0;
tn_array *dbpkgs = NULL;
pkgdb_search(ictx->ts->db, &dbpkgs, PMTAG_CNFL, capreq_name(cap),
iset_packages_by_recno(ictx->unset), PKG_LDWHOLE_FLDEPDIRS);
if (dbpkgs == NULL)
return 0;
for (i = 0; i < n_array_size(dbpkgs); i++) {
struct pkg *dbpkg = n_array_nth(dbpkgs, i);
msg(6, "%s (%s) <-> %s ?\n", pkg_id(pkg),
capreq_stra(cap), pkg_id(dbpkg));
for (j = 0; j < n_array_size(dbpkg->cnfls); j++) {
struct capreq *cnfl = n_array_nth(dbpkg->cnfls, j);
if (cap_match_req(cap, cnfl, 1)) {
if (resolve_conflict(indent, ictx, pkg, cnfl, dbpkg))
continue;
i3_error(ictx, pkg, I3ERR_DBCONFLICT,
_("%s (cap %s) conflicts with installed %s (%s)"),
pkg_id(pkg), capreq_stra(cap),
pkg_id(dbpkg), capreq_stra(cnfl));
ncnfl++;
}
}
}
n_array_free(dbpkgs);
return ncnfl;
}
/* check if cnfl conflicts with db */
static
int find_db_conflicts_cnfl_with_db(int indent, struct i3ctx *ictx,
struct pkg *pkg, const struct capreq *cnfl)
{
int i, ncnfl = 0;
tn_hash *ht = NULL;
tn_array *dbpkgs = NULL;
pkgdb_search(ictx->ts->db, &dbpkgs, PMTAG_CAP, capreq_name(cnfl),
iset_packages_by_recno(ictx->unset), PKG_LDWHOLE_FLDEPDIRS);
if (dbpkgs == NULL)
return 0;
msgn_i(4, indent, "Processing conflict %s:%s...", pkg_id(pkg),
capreq_stra(cnfl));
if (ictx->ts->getop(ictx->ts, POLDEK_OP_ALLOWDUPS) &&
n_array_size(dbpkgs) > 1) {
ht = n_hash_new(21, NULL);
n_hash_ctl(ht, TN_HASH_NOCPKEY);
for (i=0; i<n_array_size(dbpkgs); i++) {
struct pkg *dbpkg = n_array_nth(dbpkgs, i);
if (n_hash_exists(ht, dbpkg->name))
continue;
if (!pkg_match_req(dbpkg, cnfl, 1)) {
msgn_i(5, indent, "%s: conflict disarmed by %s",
capreq_stra(cnfl), pkg_id(dbpkg));
n_hash_insert(ht, dbpkg->name, pkg);
}
}
}
for (i=0; i < n_array_size(dbpkgs); i++) {
struct pkg *dbpkg = n_array_nth(dbpkgs, i);
msg_i(6, indent, "%d. %s (%s) <-> %s ?\n", i, pkg_id(pkg),
capreq_stra(cnfl), pkg_id(dbpkg));
if (ht && n_hash_exists(ht, dbpkg->name))
continue;
if (!pkg_is_colored_like(pkg, dbpkg))
continue;
if (pkg_match_req(dbpkg, cnfl, 1)) {
if (!resolve_conflict(indent, ictx, pkg, cnfl, dbpkg)) {
i3_error(ictx, pkg, I3ERR_DBCONFLICT,
_("%s (cnfl %s) conflicts with installed %s"),
pkg_id(pkg), capreq_stra(cnfl), pkg_id(dbpkg));
logn(LOGERR, _("%s (cnfl %s) conflicts with installed %s"),
pkg_id(pkg), capreq_stra(cnfl), pkg_id(dbpkg));
ncnfl++;
}
}
}
if (ht)
n_hash_free(ht);
n_array_free(dbpkgs);
return ncnfl;
}
int
exec_clean(int argc, char **argv)
{
struct pkgdb *db = NULL;
struct pkgdb_it *it = NULL;
struct pkg *pkg = NULL;
struct pkg *p = NULL;
FTS *fts = NULL;
FTSENT *ent = NULL;
struct dl_head dl = STAILQ_HEAD_INITIALIZER(dl);
const char *cachedir;
char *paths[2];
char *repopath;
bool dry_run = false;
bool yes;
int retcode = EX_SOFTWARE;
int ret;
int ch;
pkg_config_bool(PKG_CONFIG_ASSUME_ALWAYS_YES, &yes);
while ((ch = getopt(argc, argv, "nqy")) != -1) {
switch (ch) {
case 'n':
dry_run = true;
break;
case 'q':
quiet = true;
break;
case 'y':
yes = true;
break;
default:
usage_clean();
return (EX_USAGE);
}
}
argc -= optind;
argv += optind;
if (pkg_config_string(PKG_CONFIG_CACHEDIR, &cachedir) != EPKG_OK) {
warnx("Cannot get cachedir config entry");
return 1;
}
paths[0] = __DECONST(char*, cachedir);
paths[1] = NULL;
if (pkgdb_open(&db, PKGDB_REMOTE) != EPKG_OK) {
goto cleanup;
}
if ((fts = fts_open(paths, FTS_PHYSICAL, NULL)) == NULL) {
warn("fts_open(%s)", cachedir);
goto cleanup;
}
/* Build the list of out-of-date or obsolete packages */
while ((ent = fts_read(fts)) != NULL) {
const char *origin, *pkgrepopath;
if (ent->fts_info != FTS_F)
continue;
repopath = ent->fts_path + strlen(cachedir);
if (repopath[0] == '/')
repopath++;
if (pkg_open(&pkg, ent->fts_path) != EPKG_OK) {
if (!quiet)
warnx("skipping %s", ent->fts_path);
continue;
}
pkg_get(pkg, PKG_ORIGIN, &origin);
it = pkgdb_search(db, origin, MATCH_EXACT, FIELD_ORIGIN,
FIELD_NONE, NULL);
if (it == NULL) {
if (!quiet)
warnx("skipping %s", ent->fts_path);
continue;
}
if ((ret = pkgdb_it_next(it, &p, PKG_LOAD_BASIC)) ==
EPKG_FATAL) {
if (!quiet)
warnx("skipping %s", ent->fts_path);
continue;
}
pkg_get(p, PKG_REPOPATH, &pkgrepopath);
if (ret == EPKG_END) {
ret = add_to_dellist(&dl, REMOVED, ent->fts_path,
origin, NULL, NULL);
} else if (strcmp(repopath, pkgrepopath)) {
const char *newname;
const char *newversion;
pkg_get(p,
PKG_NAME, &newname,
PKG_VERSION, &newversion);
ret = add_to_dellist(&dl, OUT_OF_DATE, ent->fts_path,
origin, newname, newversion);
} else {
char local_cksum[SHA256_DIGEST_LENGTH * 2 +1];
const char *cksum;
pkg_get(p, PKG_CKSUM, &cksum);
if (hash_file(ent->fts_path, local_cksum) == EPKG_OK) {
if (strcmp(cksum, local_cksum) != 0) {
ret = add_to_dellist(&dl, CKSUM_MISMATCH, ent->fts_path,
origin, NULL, NULL);
}
}
}
if (ret != EPKG_OK && ret != EPKG_END) {
retcode = EX_OSERR; /* out of memory */
goto cleanup;
}
pkgdb_it_free(it);
}
if (STAILQ_EMPTY(&dl)) {
if (!quiet)
printf("Nothing to do.\n");
retcode = EX_OK;
goto cleanup;
}
if (dry_run || !yes || !quiet)
display_dellist(&dl, cachedir);
if (!dry_run) {
if (!yes)
yes = query_yesno(
"\nProceed with cleaning cache [y/N]: ");
if (yes)
retcode = delete_dellist(&dl);
} else
retcode = EX_OK;
cleanup:
free_dellist(&dl);
pkg_free(pkg);
pkg_free(p);
if (fts != NULL)
fts_close(fts);
if (db != NULL)
pkgdb_close(db);
return (retcode);
}
int
exec_search(int argc, char **argv)
{
const char *pattern = NULL;
const char *reponame = NULL;
int ret = EPKG_OK, ch;
int flags;
unsigned int opt = 0;
match_t match = MATCH_REGEX;
pkgdb_field search = FIELD_NONE;
pkgdb_field label = FIELD_NONE;
struct pkgdb *db = NULL;
struct pkgdb_it *it = NULL;
struct pkg *pkg = NULL;
bool atleastone = false;
while ((ch = getopt(argc, argv, "cDdefgiL:opqQ:r:S:sx")) != -1) {
switch (ch) {
case 'c': /* Same as -S comment */
search = search_label_opt("comment");
break;
case 'D': /* Same as -S description */
search = search_label_opt("description");
break;
case 'd': /* Same as -Q depends-on */
opt |= modifier_opt("depends-on");
break;
case 'e':
match = MATCH_EXACT;
break;
case 'f': /* Same as -Q full */
opt |= modifier_opt("full");
break;
case 'g':
match = MATCH_GLOB;
break;
case 'i':
pkgdb_set_case_sensitivity(false);
break;
case 'L':
label = search_label_opt(optarg);
break;
case 'o': /* Same as -L origin */
label = search_label_opt("origin");
break;
case 'p': /* Same as -Q prefix */
opt |= modifier_opt("prefix");
break;
case 'q':
quiet = true;
break;
case 'Q':
opt |= modifier_opt(optarg);
break;
case 'r':
reponame = optarg;
break;
case 'S':
search = search_label_opt(optarg);
break;
case 's': /* Same as -Q size */
opt |= modifier_opt("size");
break;
case 'x':
match = MATCH_REGEX;
break;
default:
usage_search();
return (EX_USAGE);
}
}
argc -= optind;
argv += optind;
if (argc != 1) {
usage_search();
return (EX_USAGE);
}
pattern = argv[0];
if (pattern[0] == '\0') {
fprintf(stderr, "Pattern must not be empty!\n");
return (EX_USAGE);
}
if (search == FIELD_NONE) {
if (strchr(pattern, '/') != NULL)
search = FIELD_ORIGIN;
else
search = FIELD_NAMEVER; /* Default search */
}
if (label == FIELD_NONE)
label = search; /* By default, show what was searched */
switch(label) {
case FIELD_NONE:
break; /* should never happen */
case FIELD_ORIGIN:
opt |= INFO_TAG_ORIGIN;
break;
case FIELD_NAME:
opt |= INFO_TAG_NAME;
break;
case FIELD_NAMEVER:
opt |= INFO_TAG_NAMEVER;
break;
case FIELD_COMMENT:
opt |= INFO_TAG_NAMEVER|INFO_COMMENT;
break;
case FIELD_DESC:
opt |= INFO_TAG_NAMEVER|INFO_DESCR;
break;
}
if (pkgdb_open(&db, PKGDB_REMOTE) != EPKG_OK)
return (EX_IOERR);
if ((it = pkgdb_search(db, pattern, match, search, search,
reponame)) == NULL) {
pkgdb_close(db);
return (EX_IOERR);
}
flags = info_flags(opt);
while ((ret = pkgdb_it_next(it, &pkg, flags)) == EPKG_OK) {
print_info(pkg, opt);
atleastone = true;
}
pkg_free(pkg);
pkgdb_it_free(it);
pkgdb_close(db);
if (!atleastone)
ret = EPKG_FATAL;
return ((ret == EPKG_OK || ret == EPKG_END) ? EX_OK : EX_SOFTWARE);
}
int
exec_search(int argc, char **argv)
{
const char *pattern = NULL;
const char *reponame = NULL;
int ret = EPKG_OK, ch;
int flags;
uint64_t opt = 0;
match_t match = MATCH_REGEX;
pkgdb_field search = FIELD_NONE;
pkgdb_field label = FIELD_NONE;
struct pkgdb *db = NULL;
struct pkgdb_it *it = NULL;
struct pkg *pkg = NULL;
bool atleastone = false;
bool old_quiet;
struct option longopts[] = {
{ "case-sensitive", no_argument, NULL, 'C' },
{ "comment", no_argument, NULL, 'c' },
{ "description", no_argument, NULL, 'D' },
{ "depends-on", no_argument, NULL, 'd' },
{ "exact", no_argument, NULL, 'e' },
{ "full", no_argument, NULL, 'f' },
{ "glob", no_argument, NULL, 'g' },
{ "case-insensitive", no_argument, NULL, 'i' },
{ "label", required_argument, NULL, 'L' },
{ "origins", no_argument, NULL, 'o' },
{ "prefix", no_argument, NULL, 'p' },
{ "quiet", no_argument, NULL, 'q' },
{ "query-modifier", required_argument, NULL, 'Q' },
{ "repository", required_argument, NULL, 'r' },
{ "raw", no_argument, NULL, 'R' },
{ "search", required_argument, NULL, 'S' },
{ "size", no_argument, NULL, 's' },
{ "no-repo-update", no_argument, NULL, 'U' },
{ "regex", no_argument, NULL, 'x' },
{ NULL, 0, NULL, 0 },
};
while ((ch = getopt_long(argc, argv, "CcDdefgiL:opqQ:r:RS:sUx", longopts, NULL)) != -1) {
switch (ch) {
case 'C':
pkgdb_set_case_sensitivity(true);
break;
case 'c': /* Same as -S comment */
search = search_label_opt("comment");
break;
case 'D': /* Same as -S description */
search = search_label_opt("description");
break;
case 'd': /* Same as -Q depends-on */
opt |= modifier_opt("depends-on");
break;
case 'e':
match = MATCH_EXACT;
break;
case 'f': /* Same as -Q full */
opt |= modifier_opt("full");
break;
case 'g':
match = MATCH_GLOB;
break;
case 'i':
pkgdb_set_case_sensitivity(false);
break;
case 'L':
label = search_label_opt(optarg);
break;
case 'o': /* Same as -L origin */
label = search_label_opt("origin");
break;
case 'p': /* Same as -Q prefix */
opt |= modifier_opt("prefix");
break;
case 'q':
quiet = true;
break;
case 'Q':
opt |= modifier_opt(optarg);
break;
case 'r':
reponame = optarg;
break;
case 'R':
opt = INFO_RAW;
break;
case 'S':
search = search_label_opt(optarg);
break;
case 's': /* Same as -Q size */
opt |= modifier_opt("size");
break;
case 'U':
auto_update = false;
break;
case 'x':
match = MATCH_REGEX;
break;
default:
usage_search();
return (EX_USAGE);
}
}
argc -= optind;
argv += optind;
if (argc != 1) {
usage_search();
return (EX_USAGE);
}
pattern = argv[0];
if (pattern[0] == '\0') {
fprintf(stderr, "Pattern must not be empty.\n");
return (EX_USAGE);
}
if (search == FIELD_NONE) {
if (strchr(pattern, '/') != NULL)
search = FIELD_ORIGIN;
else
search = FIELD_NAMEVER; /* Default search */
}
if (label == FIELD_NONE)
label = search; /* By default, show what was searched */
switch(label) {
case FIELD_NONE:
break; /* should never happen */
case FIELD_ORIGIN:
opt |= INFO_TAG_ORIGIN;
break;
case FIELD_NAME:
opt |= INFO_TAG_NAME;
break;
case FIELD_NAMEVER:
opt |= INFO_TAG_NAMEVER;
break;
case FIELD_COMMENT:
opt |= INFO_TAG_NAMEVER|INFO_COMMENT;
break;
case FIELD_DESC:
opt |= INFO_TAG_NAMEVER|INFO_DESCR;
break;
}
ret = pkgdb_access(PKGDB_MODE_READ, PKGDB_DB_REPO);
switch(ret) {
case EPKG_ENOACCESS:
warnx("Insufficient privileges to query the package database");
return (EX_NOPERM);
case EPKG_ENODB:
if (!auto_update) {
warnx("Unable to open remote repository catalogues. Try running '%s update' first.", getprogname());
return (EX_IOERR);
}
break;
case EPKG_OK:
break;
default:
return (EX_IOERR);
}
/* first update the remote repositories if needed */
old_quiet = quiet;
quiet = true;
if (auto_update && (ret = pkgcli_update(false, reponame)) != EPKG_OK)
return (ret);
quiet = old_quiet;
if (pkgdb_open_all(&db, PKGDB_REMOTE, reponame) != EPKG_OK)
return (EX_IOERR);
if ((it = pkgdb_search(db, pattern, match, search, search,
reponame)) == NULL) {
pkgdb_close(db);
return (EX_IOERR);
}
flags = info_flags(opt, true);
while ((ret = pkgdb_it_next(it, &pkg, flags)) == EPKG_OK) {
print_info(pkg, opt);
atleastone = true;
}
pkg_free(pkg);
pkgdb_it_free(it);
pkgdb_close(db);
if (!atleastone)
ret = EPKG_FATAL;
return ((ret == EPKG_OK || ret == EPKG_END) ? EX_OK : EX_SOFTWARE);
}
