2 * Copyright (c) 2008, Novell Inc.
4 * This program is licensed under the BSD license, read LICENSE.BSD
5 * for further information
11 * debug functions for the SAT solver
21 #include "solver_private.h"
22 #include "solverdebug.h"
32 * create obsoletesmap from solver decisions
34 * for solvables in installed repo:
36 * p - one of the packages that obsolete us
38 * n - number of packages this package obsoletes
42 /* OBSOLETE: use transaction code instead! */
45 solver_create_decisions_obsoletesmap(Solver *solv)
47 Pool *pool = solv->pool;
48 Repo *installed = solv->installed;
49 Id p, *obsoletesmap = NULL;
53 obsoletesmap = (Id *)solv_calloc(pool->nsolvables, sizeof(Id));
56 for (i = 0; i < solv->decisionq.count; i++)
61 n = solv->decisionq.elements[i];
64 if (n == SYSTEMSOLVABLE)
66 s = pool->solvables + n;
67 if (s->repo == installed) /* obsoletes don't count for already installed packages */
69 noobs = solv->noobsoletes.size && MAPTST(&solv->noobsoletes, n);
70 FOR_PROVIDES(p, pp, s->name)
72 Solvable *ps = pool->solvables + p;
73 if (noobs && (s->name != ps->name || s->evr != ps->evr || s->arch != ps->arch))
75 if (!pool->implicitobsoleteusesprovides && s->name != ps->name)
77 if (pool->obsoleteusescolors && !pool_colormatch(pool, s, ps))
79 if (ps->repo == installed && !obsoletesmap[p])
86 for (i = 0; i < solv->decisionq.count; i++)
91 n = solv->decisionq.elements[i];
94 if (n == SYSTEMSOLVABLE)
96 s = pool->solvables + n;
97 if (s->repo == installed) /* obsoletes don't count for already installed packages */
101 if (solv->noobsoletes.size && MAPTST(&solv->noobsoletes, n))
103 obsp = s->repo->idarraydata + s->obsoletes;
104 while ((obs = *obsp++) != 0)
106 FOR_PROVIDES(p, pp, obs)
108 Solvable *ps = pool->solvables + p;
109 if (!pool->obsoleteusesprovides && !pool_match_nevr(pool, ps, obs))
111 if (pool->obsoleteusescolors && !pool_colormatch(pool, s, ps))
113 if (pool->solvables[p].repo == installed && !obsoletesmap[p])
126 solver_printruleelement(Solver *solv, int type, Rule *r, Id v)
128 Pool *pool = solv->pool;
132 s = pool->solvables + -v;
133 POOL_DEBUG(type, " !%s [%d]", pool_solvable2str(pool, s), -v);
137 s = pool->solvables + v;
138 POOL_DEBUG(type, " %s [%d]", pool_solvable2str(pool, s), v);
140 if (pool->installed && s->repo == pool->installed)
141 POOL_DEBUG(type, "I");
145 POOL_DEBUG(type, " (w1)");
147 POOL_DEBUG(type, " (w2)");
149 if (solv->decisionmap[s - pool->solvables] > 0)
150 POOL_DEBUG(type, " Install.level%d", solv->decisionmap[s - pool->solvables]);
151 if (solv->decisionmap[s - pool->solvables] < 0)
152 POOL_DEBUG(type, " Conflict.level%d", -solv->decisionmap[s - pool->solvables]);
153 POOL_DEBUG(type, "\n");
162 solver_printrule(Solver *solv, int type, Rule *r)
164 Pool *pool = solv->pool;
168 if (r >= solv->rules && r < solv->rules + solv->nrules) /* r is a solver rule */
169 POOL_DEBUG(type, "Rule #%d:", (int)(r - solv->rules));
171 POOL_DEBUG(type, "Rule:"); /* r is any rule */
173 POOL_DEBUG(type, " (disabled)");
174 POOL_DEBUG(type, "\n");
175 d = r->d < 0 ? -r->d - 1 : r->d;
179 /* print direct literal */
185 /* binary rule --> print w2 as second literal */
189 /* every other which is in d */
190 v = solv->pool->whatprovidesdata[d + i - 1];
193 solver_printruleelement(solv, type, r, v);
195 POOL_DEBUG(type, " next rules: %d %d\n", r->n1, r->n2);
199 solver_printruleclass(Solver *solv, int type, Rule *r)
201 Pool *pool = solv->pool;
202 Id p = r - solv->rules;
204 if (p < solv->learntrules)
205 if (MAPTST(&solv->weakrulemap, p))
206 POOL_DEBUG(type, "WEAK ");
207 if (solv->learntrules && p >= solv->learntrules)
208 POOL_DEBUG(type, "LEARNT ");
209 else if (p >= solv->choicerules && p < solv->choicerules_end)
210 POOL_DEBUG(type, "CHOICE ");
211 else if (p >= solv->infarchrules && p < solv->infarchrules_end)
212 POOL_DEBUG(type, "INFARCH ");
213 else if (p >= solv->duprules && p < solv->duprules_end)
214 POOL_DEBUG(type, "DUP ");
215 else if (p >= solv->jobrules && p < solv->jobrules_end)
216 POOL_DEBUG(type, "JOB ");
217 else if (p >= solv->updaterules && p < solv->updaterules_end)
218 POOL_DEBUG(type, "UPDATE ");
219 else if (p >= solv->featurerules && p < solv->featurerules_end)
220 POOL_DEBUG(type, "FEATURE ");
221 solver_printrule(solv, type, r);
225 solver_printproblem(Solver *solv, Id v)
227 Pool *pool = solv->pool;
233 solver_printruleclass(solv, SOLV_DEBUG_SOLUTIONS, solv->rules + v);
237 POOL_DEBUG(SOLV_DEBUG_SOLUTIONS, "JOB %d\n", v);
238 jp = solv->ruletojob.elements;
239 for (i = solv->jobrules, r = solv->rules + i; i < solv->jobrules_end; i++, r++, jp++)
242 POOL_DEBUG(SOLV_DEBUG_SOLUTIONS, "- ");
243 solver_printrule(solv, SOLV_DEBUG_SOLUTIONS, r);
245 POOL_DEBUG(SOLV_DEBUG_SOLUTIONS, "ENDJOB\n");
250 solver_printwatches(Solver *solv, int type)
252 Pool *pool = solv->pool;
255 POOL_DEBUG(type, "Watches: \n");
256 for (counter = -(pool->nsolvables - 1); counter < pool->nsolvables; counter++)
257 POOL_DEBUG(type, " solvable [%d] -- rule [%d]\n", counter, solv->watches[counter + pool->nsolvables]);
261 solver_printdecisionq(Solver *solv, int type)
263 Pool *pool = solv->pool;
267 POOL_DEBUG(type, "Decisions:\n");
268 for (i = 0; i < solv->decisionq.count; i++)
270 p = solv->decisionq.elements[i];
272 POOL_DEBUG(type, "%d %d install %s, ", i, solv->decisionmap[p], pool_solvid2str(pool, p));
274 POOL_DEBUG(type, "%d %d conflict %s, ", i, -solv->decisionmap[-p], pool_solvid2str(pool, -p));
275 why = solv->decisionq_why.elements[i];
278 POOL_DEBUG(type, "forced by ");
279 solver_printruleclass(solv, type, solv->rules + why);
283 POOL_DEBUG(type, "chosen from ");
284 solver_printruleclass(solv, type, solv->rules - why);
287 POOL_DEBUG(type, "picked for some unknown reason.\n");
296 solver_printdecisions(Solver *solv)
298 Pool *pool = solv->pool;
299 Repo *installed = solv->installed;
300 Transaction *trans = solver_create_transaction(solv);
305 Queue recommendations;
309 POOL_DEBUG(SOLV_DEBUG_RESULT, "\n");
310 POOL_DEBUG(SOLV_DEBUG_RESULT, "transaction:\n");
313 for (i = 0; i < trans->steps.count; i++)
315 p = trans->steps.elements[i];
316 s = pool->solvables + p;
317 type = transaction_type(trans, p, SOLVER_TRANSACTION_SHOW_ACTIVE|SOLVER_TRANSACTION_SHOW_ALL|SOLVER_TRANSACTION_SHOW_OBSOLETES|SOLVER_TRANSACTION_SHOW_MULTIINSTALL);
320 case SOLVER_TRANSACTION_MULTIINSTALL:
321 POOL_DEBUG(SOLV_DEBUG_RESULT, " multi install %s", pool_solvable2str(pool, s));
323 case SOLVER_TRANSACTION_MULTIREINSTALL:
324 POOL_DEBUG(SOLV_DEBUG_RESULT, " multi reinstall %s", pool_solvable2str(pool, s));
326 case SOLVER_TRANSACTION_INSTALL:
327 POOL_DEBUG(SOLV_DEBUG_RESULT, " install %s", pool_solvable2str(pool, s));
329 case SOLVER_TRANSACTION_REINSTALL:
330 POOL_DEBUG(SOLV_DEBUG_RESULT, " reinstall %s", pool_solvable2str(pool, s));
332 case SOLVER_TRANSACTION_DOWNGRADE:
333 POOL_DEBUG(SOLV_DEBUG_RESULT, " downgrade %s", pool_solvable2str(pool, s));
335 case SOLVER_TRANSACTION_CHANGE:
336 POOL_DEBUG(SOLV_DEBUG_RESULT, " change %s", pool_solvable2str(pool, s));
338 case SOLVER_TRANSACTION_UPGRADE:
339 case SOLVER_TRANSACTION_OBSOLETES:
340 POOL_DEBUG(SOLV_DEBUG_RESULT, " upgrade %s", pool_solvable2str(pool, s));
342 case SOLVER_TRANSACTION_ERASE:
343 POOL_DEBUG(SOLV_DEBUG_RESULT, " erase %s", pool_solvable2str(pool, s));
350 case SOLVER_TRANSACTION_INSTALL:
351 case SOLVER_TRANSACTION_ERASE:
352 case SOLVER_TRANSACTION_MULTIINSTALL:
353 case SOLVER_TRANSACTION_MULTIREINSTALL:
354 POOL_DEBUG(SOLV_DEBUG_RESULT, "\n");
356 case SOLVER_TRANSACTION_REINSTALL:
357 case SOLVER_TRANSACTION_DOWNGRADE:
358 case SOLVER_TRANSACTION_CHANGE:
359 case SOLVER_TRANSACTION_UPGRADE:
360 case SOLVER_TRANSACTION_OBSOLETES:
361 transaction_all_obs_pkgs(trans, p, &iq);
364 POOL_DEBUG(SOLV_DEBUG_RESULT, " (obsoletes");
365 for (j = 0; j < iq.count; j++)
366 POOL_DEBUG(SOLV_DEBUG_RESULT, " %s", pool_solvid2str(pool, iq.elements[j]));
367 POOL_DEBUG(SOLV_DEBUG_RESULT, ")");
369 POOL_DEBUG(SOLV_DEBUG_RESULT, "\n");
377 POOL_DEBUG(SOLV_DEBUG_RESULT, "\n");
379 queue_init(&recommendations);
380 queue_init(&suggestions);
381 queue_init(&orphaned);
382 solver_get_recommendations(solv, &recommendations, &suggestions, 0);
383 if (recommendations.count)
385 POOL_DEBUG(SOLV_DEBUG_RESULT, "recommended packages:\n");
386 for (i = 0; i < recommendations.count; i++)
388 s = pool->solvables + recommendations.elements[i];
389 if (solv->decisionmap[recommendations.elements[i]] > 0)
391 if (installed && s->repo == installed)
392 POOL_DEBUG(SOLV_DEBUG_RESULT, " %s (installed)\n", pool_solvable2str(pool, s));
394 POOL_DEBUG(SOLV_DEBUG_RESULT, " %s (selected)\n", pool_solvable2str(pool, s));
397 POOL_DEBUG(SOLV_DEBUG_RESULT, " %s\n", pool_solvable2str(pool, s));
399 POOL_DEBUG(SOLV_DEBUG_RESULT, "\n");
402 if (suggestions.count)
404 POOL_DEBUG(SOLV_DEBUG_RESULT, "suggested packages:\n");
405 for (i = 0; i < suggestions.count; i++)
407 s = pool->solvables + suggestions.elements[i];
408 if (solv->decisionmap[suggestions.elements[i]] > 0)
410 if (installed && s->repo == installed)
411 POOL_DEBUG(SOLV_DEBUG_RESULT, " %s (installed)\n", pool_solvable2str(pool, s));
413 POOL_DEBUG(SOLV_DEBUG_RESULT, " %s (selected)\n", pool_solvable2str(pool, s));
416 POOL_DEBUG(SOLV_DEBUG_RESULT, " %s\n", pool_solvable2str(pool, s));
418 POOL_DEBUG(SOLV_DEBUG_RESULT, "\n");
422 POOL_DEBUG(SOLV_DEBUG_RESULT, "orphaned packages:\n");
423 for (i = 0; i < orphaned.count; i++)
425 s = pool->solvables + orphaned.elements[i];
426 if (solv->decisionmap[solv->orphaned.elements[i]] > 0)
427 POOL_DEBUG(SOLV_DEBUG_RESULT, " %s (kept)\n", pool_solvable2str(pool, s));
429 POOL_DEBUG(SOLV_DEBUG_RESULT, " %s (erased)\n", pool_solvable2str(pool, s));
431 POOL_DEBUG(SOLV_DEBUG_RESULT, "\n");
433 queue_free(&recommendations);
434 queue_free(&suggestions);
435 queue_free(&orphaned);
436 transaction_free(trans);
440 const char *id2strnone(Pool *pool, Id id)
442 return !id || id == 1 ? "(none)" : pool_id2str(pool, id);
446 transaction_print(Transaction *trans)
448 Pool *pool = trans->pool;
450 int i, j, mode, l, linel;
454 queue_init(&classes);
457 transaction_classify(trans, mode, &classes);
458 for (i = 0; i < classes.count; i += 4)
460 Id class = classes.elements[i];
461 Id cnt = classes.elements[i + 1];
464 case SOLVER_TRANSACTION_ERASE:
465 POOL_DEBUG(SOLV_DEBUG_RESULT, "%d erased packages:\n", cnt);
467 case SOLVER_TRANSACTION_INSTALL:
468 POOL_DEBUG(SOLV_DEBUG_RESULT, "%d installed packages:\n", cnt);
470 case SOLVER_TRANSACTION_REINSTALLED:
471 POOL_DEBUG(SOLV_DEBUG_RESULT, "%d reinstalled packages:\n", cnt);
473 case SOLVER_TRANSACTION_DOWNGRADED:
474 POOL_DEBUG(SOLV_DEBUG_RESULT, "%d downgraded packages:\n", cnt);
476 case SOLVER_TRANSACTION_CHANGED:
477 POOL_DEBUG(SOLV_DEBUG_RESULT, "%d changed packages:\n", cnt);
479 case SOLVER_TRANSACTION_UPGRADED:
480 POOL_DEBUG(SOLV_DEBUG_RESULT, "%d upgraded packages:\n", cnt);
482 case SOLVER_TRANSACTION_VENDORCHANGE:
483 POOL_DEBUG(SOLV_DEBUG_RESULT, "%d vendor changes from '%s' to '%s':\n", cnt, id2strnone(pool, classes.elements[i + 2]), id2strnone(pool, classes.elements[i + 3]));
485 case SOLVER_TRANSACTION_ARCHCHANGE:
486 POOL_DEBUG(SOLV_DEBUG_RESULT, "%d arch changes from %s to %s:\n", cnt, pool_id2str(pool, classes.elements[i + 2]), pool_id2str(pool, classes.elements[i + 3]));
489 class = SOLVER_TRANSACTION_IGNORE;
492 if (class == SOLVER_TRANSACTION_IGNORE)
494 transaction_classify_pkgs(trans, mode, class, classes.elements[i + 2], classes.elements[i + 3], &pkgs);
497 for (j = 0; j < pkgs.count; j++)
499 Id p = pkgs.elements[j];
500 Solvable *s = pool->solvables + p;
505 case SOLVER_TRANSACTION_DOWNGRADED:
506 case SOLVER_TRANSACTION_UPGRADED:
507 s2 = pool->solvables + transaction_obs_pkg(trans, p);
508 POOL_DEBUG(SOLV_DEBUG_RESULT, " - %s -> %s\n", pool_solvable2str(pool, s), pool_solvable2str(pool, s2));
510 case SOLVER_TRANSACTION_VENDORCHANGE:
511 case SOLVER_TRANSACTION_ARCHCHANGE:
512 n = pool_id2str(pool, s->name);
514 if (l + linel > sizeof(line) - 3)
517 POOL_DEBUG(SOLV_DEBUG_RESULT, " %s\n", line);
521 if (l + linel > sizeof(line) - 3)
522 POOL_DEBUG(SOLV_DEBUG_RESULT, " %s\n", n);
527 strcpy(line + linel, ", ");
530 strcpy(line + linel, n);
535 POOL_DEBUG(SOLV_DEBUG_RESULT, " - %s\n", pool_solvable2str(pool, s));
540 POOL_DEBUG(SOLV_DEBUG_RESULT, " %s\n", line);
541 POOL_DEBUG(SOLV_DEBUG_RESULT, "\n");
543 queue_free(&classes);
548 solver_printproblemruleinfo(Solver *solv, Id probr)
550 Pool *pool = solv->pool;
551 Id dep, source, target;
553 switch (solver_ruleinfo(solv, probr, &source, &target, &dep))
555 case SOLVER_RULE_DISTUPGRADE:
556 POOL_DEBUG(SOLV_DEBUG_RESULT, "%s does not belong to a distupgrade repository\n", pool_solvid2str(pool, source));
558 case SOLVER_RULE_INFARCH:
559 POOL_DEBUG(SOLV_DEBUG_RESULT, "%s has inferior architecture\n", pool_solvid2str(pool, source));
561 case SOLVER_RULE_UPDATE:
562 POOL_DEBUG(SOLV_DEBUG_RESULT, "problem with installed package %s\n", pool_solvid2str(pool, source));
564 case SOLVER_RULE_JOB:
565 POOL_DEBUG(SOLV_DEBUG_RESULT, "conflicting requests\n");
567 case SOLVER_RULE_JOB_NOTHING_PROVIDES_DEP:
568 POOL_DEBUG(SOLV_DEBUG_RESULT, "nothing provides requested %s\n", pool_dep2str(pool, dep));
570 case SOLVER_RULE_RPM:
571 POOL_DEBUG(SOLV_DEBUG_RESULT, "some dependency problem\n");
573 case SOLVER_RULE_RPM_NOT_INSTALLABLE:
574 POOL_DEBUG(SOLV_DEBUG_RESULT, "package %s is not installable\n", pool_solvid2str(pool, source));
576 case SOLVER_RULE_RPM_NOTHING_PROVIDES_DEP:
577 POOL_DEBUG(SOLV_DEBUG_RESULT, "nothing provides %s needed by %s\n", pool_dep2str(pool, dep), pool_solvid2str(pool, source));
579 case SOLVER_RULE_RPM_SAME_NAME:
580 POOL_DEBUG(SOLV_DEBUG_RESULT, "cannot install both %s and %s\n", pool_solvid2str(pool, source), pool_solvid2str(pool, target));
582 case SOLVER_RULE_RPM_PACKAGE_CONFLICT:
583 POOL_DEBUG(SOLV_DEBUG_RESULT, "package %s conflicts with %s provided by %s\n", pool_solvid2str(pool, source), pool_dep2str(pool, dep), pool_solvid2str(pool, target));
585 case SOLVER_RULE_RPM_PACKAGE_OBSOLETES:
586 POOL_DEBUG(SOLV_DEBUG_RESULT, "package %s obsoletes %s provided by %s\n", pool_solvid2str(pool, source), pool_dep2str(pool, dep), pool_solvid2str(pool, target));
588 case SOLVER_RULE_RPM_INSTALLEDPKG_OBSOLETES:
589 POOL_DEBUG(SOLV_DEBUG_RESULT, "installed package %s obsoletes %s provided by %s\n", pool_solvid2str(pool, source), pool_dep2str(pool, dep), pool_solvid2str(pool, target));
591 case SOLVER_RULE_RPM_IMPLICIT_OBSOLETES:
592 POOL_DEBUG(SOLV_DEBUG_RESULT, "package %s implicitly obsoletes %s provided by %s\n", pool_solvid2str(pool, source), pool_dep2str(pool, dep), pool_solvid2str(pool, target));
594 case SOLVER_RULE_RPM_PACKAGE_REQUIRES:
595 POOL_DEBUG(SOLV_DEBUG_RESULT, "package %s requires %s, but none of the providers can be installed\n", pool_solvid2str(pool, source), pool_dep2str(pool, dep));
597 case SOLVER_RULE_RPM_SELF_CONFLICT:
598 POOL_DEBUG(SOLV_DEBUG_RESULT, "package %s conflicts with %s provided by itself\n", pool_solvid2str(pool, source), pool_dep2str(pool, dep));
600 case SOLVER_RULE_UNKNOWN:
601 case SOLVER_RULE_FEATURE:
602 case SOLVER_RULE_LEARNT:
603 case SOLVER_RULE_CHOICE:
604 POOL_DEBUG(SOLV_DEBUG_RESULT, "bad rule type\n");
610 solver_printprobleminfo(Solver *solv, Id problem)
612 solver_printproblemruleinfo(solv, solver_findproblemrule(solv, problem));
616 solver_printcompleteprobleminfo(Solver *solv, Id problem)
623 solver_findallproblemrules(solv, problem, &q);
624 for (i = 0; i < q.count; i++)
626 probr = q.elements[i];
627 if (!(probr >= solv->updaterules && probr < solv->updaterules_end) && !(probr >= solv->jobrules && probr < solv->jobrules_end))
633 for (i = 0; i < q.count; i++)
635 probr = q.elements[i];
636 if (nobad && ((probr >= solv->updaterules && probr < solv->updaterules_end) || (probr >= solv->jobrules && probr < solv->jobrules_end)))
638 solver_printproblemruleinfo(solv, probr);
644 solver_printsolution(Solver *solv, Id problem, Id solution)
646 Pool *pool = solv->pool;
647 Id p, rp, element, how, what, select;
651 while ((element = solver_next_solutionelement(solv, problem, solution, element, &p, &rp)) != 0)
653 if (p == SOLVER_SOLUTION_JOB)
655 /* job, rp is index into job queue */
656 how = solv->job.elements[rp - 1];
657 what = solv->job.elements[rp];
658 select = how & SOLVER_SELECTMASK;
659 switch (how & SOLVER_JOBMASK)
662 if (select == SOLVER_SOLVABLE && solv->installed && pool->solvables[what].repo == solv->installed)
663 POOL_DEBUG(SOLV_DEBUG_RESULT, " - do not keep %s installed\n", pool_solvid2str(pool, what));
664 else if (select == SOLVER_SOLVABLE_PROVIDES)
665 POOL_DEBUG(SOLV_DEBUG_RESULT, " - do not install a solvable %s\n", solver_select2str(pool, select, what));
667 POOL_DEBUG(SOLV_DEBUG_RESULT, " - do not install %s\n", solver_select2str(pool, select, what));
670 if (select == SOLVER_SOLVABLE && !(solv->installed && pool->solvables[what].repo == solv->installed))
671 POOL_DEBUG(SOLV_DEBUG_RESULT, " - do not forbid installation of %s\n", pool_solvid2str(pool, what));
672 else if (select == SOLVER_SOLVABLE_PROVIDES)
673 POOL_DEBUG(SOLV_DEBUG_RESULT, " - do not deinstall all solvables %s\n", solver_select2str(pool, select, what));
675 POOL_DEBUG(SOLV_DEBUG_RESULT, " - do not deinstall %s\n", solver_select2str(pool, select, what));
678 POOL_DEBUG(SOLV_DEBUG_RESULT, " - do not install most recent version of %s\n", solver_select2str(pool, select, what));
681 POOL_DEBUG(SOLV_DEBUG_RESULT, " - do not lock %s\n", solver_select2str(pool, select, what));
684 POOL_DEBUG(SOLV_DEBUG_RESULT, " - do something different\n");
688 else if (p == SOLVER_SOLUTION_INFARCH)
690 s = pool->solvables + rp;
691 if (solv->installed && s->repo == solv->installed)
692 POOL_DEBUG(SOLV_DEBUG_RESULT, " - keep %s despite the inferior architecture\n", pool_solvable2str(pool, s));
694 POOL_DEBUG(SOLV_DEBUG_RESULT, " - install %s despite the inferior architecture\n", pool_solvable2str(pool, s));
696 else if (p == SOLVER_SOLUTION_DISTUPGRADE)
698 s = pool->solvables + rp;
699 if (solv->installed && s->repo == solv->installed)
700 POOL_DEBUG(SOLV_DEBUG_RESULT, " - keep obsolete %s\n", pool_solvable2str(pool, s));
702 POOL_DEBUG(SOLV_DEBUG_RESULT, " - install %s from excluded repository\n", pool_solvable2str(pool, s));
706 /* policy, replace p with rp */
707 s = pool->solvables + p;
708 sd = rp ? pool->solvables + rp : 0;
711 int illegal = policy_is_illegal(solv, s, sd, 0);
712 if ((illegal & POLICY_ILLEGAL_DOWNGRADE) != 0)
713 POOL_DEBUG(SOLV_DEBUG_RESULT, " - allow downgrade of %s to %s\n", pool_solvable2str(pool, s), pool_solvable2str(pool, sd));
714 if ((illegal & POLICY_ILLEGAL_NAMECHANGE) != 0)
715 POOL_DEBUG(SOLV_DEBUG_RESULT, " - allow name change of %s to %s\n", pool_solvable2str(pool, s), pool_solvable2str(pool, sd));
716 if ((illegal & POLICY_ILLEGAL_ARCHCHANGE) != 0)
717 POOL_DEBUG(SOLV_DEBUG_RESULT, " - allow architecture change of %s to %s\n", pool_solvable2str(pool, s), pool_solvable2str(pool, sd));
718 if ((illegal & POLICY_ILLEGAL_VENDORCHANGE) != 0)
721 POOL_DEBUG(SOLV_DEBUG_RESULT, " - allow vendor change from '%s' (%s) to '%s' (%s)\n", pool_id2str(pool, s->vendor), pool_solvable2str(pool, s), pool_id2str(pool, sd->vendor), pool_solvable2str(pool, sd));
723 POOL_DEBUG(SOLV_DEBUG_RESULT, " - allow vendor change from '%s' (%s) to no vendor (%s)\n", pool_id2str(pool, s->vendor), pool_solvable2str(pool, s), pool_solvable2str(pool, sd));
726 POOL_DEBUG(SOLV_DEBUG_RESULT, " - allow replacement of %s with %s\n", pool_solvable2str(pool, s), pool_solvable2str(pool, sd));
730 POOL_DEBUG(SOLV_DEBUG_RESULT, " - allow deinstallation of %s\n", pool_solvable2str(pool, s));
737 solver_printallsolutions(Solver *solv)
739 Pool *pool = solv->pool;
741 Id problem, solution;
743 POOL_DEBUG(SOLV_DEBUG_RESULT, "Encountered problems! Here are the solutions:\n\n");
746 while ((problem = solver_next_problem(solv, problem)) != 0)
749 POOL_DEBUG(SOLV_DEBUG_RESULT, "Problem %d:\n", pcnt);
750 POOL_DEBUG(SOLV_DEBUG_RESULT, "====================================\n");
752 solver_printprobleminfo(solv, problem);
754 solver_printcompleteprobleminfo(solv, problem);
756 POOL_DEBUG(SOLV_DEBUG_RESULT, "\n");
758 while ((solution = solver_next_solution(solv, problem, solution)) != 0)
760 solver_printsolution(solv, problem, solution);
761 POOL_DEBUG(SOLV_DEBUG_RESULT, "\n");
767 solver_printtrivial(Solver *solv)
769 Pool *pool = solv->pool;
777 for (p = 1, s = pool->solvables + p; p < solv->pool->nsolvables; p++, s++)
779 n = pool_id2str(pool, s->name);
780 if (strncmp(n, "patch:", 6) != 0 && strncmp(n, "pattern:", 8) != 0)
790 solver_trivial_installable(solv, &in, &out);
791 POOL_DEBUG(SOLV_DEBUG_RESULT, "trivial installable status:\n");
792 for (i = 0; i < in.count; i++)
793 POOL_DEBUG(SOLV_DEBUG_RESULT, " %s: %d\n", pool_solvid2str(pool, in.elements[i]), out.elements[i]);
794 POOL_DEBUG(SOLV_DEBUG_RESULT, "\n");
800 solver_select2str(Pool *pool, Id select, Id what)
804 if (select == SOLVER_SOLVABLE)
805 return pool_solvid2str(pool, what);
806 if (select == SOLVER_SOLVABLE_NAME)
807 return pool_dep2str(pool, what);
808 if (select == SOLVER_SOLVABLE_PROVIDES)
810 s = pool_dep2str(pool, what);
811 b = pool_alloctmpspace(pool, 11 + strlen(s));
812 sprintf(b, "providing %s", s);
815 if (select == SOLVER_SOLVABLE_ONE_OF)
819 while ((p = pool->whatprovidesdata[what++]) != 0)
821 s = pool_solvid2str(pool, p);
823 b = pool_tmpappend(pool, b, ", ", s);
825 b = pool_tmpjoin(pool, s, 0, 0);
826 pool_freetmpspace(pool, s);
828 return b ? b : "nothing";
830 if (select == SOLVER_SOLVABLE_REPO)
832 b = pool_alloctmpspace(pool, 20);
833 sprintf(b, "repo #%d", what);
836 if (select == SOLVER_SOLVABLE_ALL)
837 return "all packages";
838 return "unknown job select";
842 pool_job2str(Pool *pool, Id how, Id what, Id flagmask)
844 Id select = how & SOLVER_SELECTMASK;
845 const char *strstart = 0, *strend = 0;
849 switch (how & SOLVER_JOBMASK)
854 if (select == SOLVER_SOLVABLE && pool->installed && pool->solvables[what].repo == pool->installed)
855 strstart = "keep ", strend = "installed";
856 else if (select == SOLVER_SOLVABLE || select == SOLVER_SOLVABLE_NAME)
857 strstart = "install ";
858 else if (select == SOLVER_SOLVABLE_PROVIDES)
859 strstart = "install a package ";
861 strstart = "install one of ";
864 if (select == SOLVER_SOLVABLE && !(pool->installed && pool->solvables[what].repo == pool->installed))
865 strstart = "keep ", strend = "unstalled";
866 else if (select == SOLVER_SOLVABLE_PROVIDES)
867 strstart = "deinstall all packages ";
869 strstart = "deinstall ";
872 strstart = "update ";
874 case SOLVER_WEAKENDEPS:
875 strstart = "weaken deps of ";
877 case SOLVER_NOOBSOLETES:
878 strstart = "multi version ";
881 strstart = "update ";
883 case SOLVER_DISTUPGRADE:
884 strstart = "dist upgrade ";
887 strstart = "verify ";
889 case SOLVER_DROP_ORPHANED:
890 strstart = "deinstall ", strend = "if orphaned";
892 case SOLVER_USERINSTALLED:
893 strstart = "regard ", strend = "as userinstalled";
896 strstart = "unknown job ";
899 s = pool_tmpjoin(pool, strstart, solver_select2str(pool, select, what), strend);
900 if ((how & flagmask & ~(SOLVER_SELECTMASK|SOLVER_JOBMASK)) == 0)
903 s = pool_tmpappend(pool, s, " ", 0);
904 if (how & SOLVER_WEAK)
905 s = pool_tmpappend(pool, s, ",weak", 0);
906 if (how & SOLVER_ESSENTIAL)
907 s = pool_tmpappend(pool, s, ",essential", 0);
908 if (how & SOLVER_CLEANDEPS)
909 s = pool_tmpappend(pool, s, ",cleandeps", 0);
910 if (how & SOLVER_SETEV)
911 s = pool_tmpappend(pool, s, ",setev", 0);
912 if (how & SOLVER_SETEVR)
913 s = pool_tmpappend(pool, s, ",setevr", 0);
914 if (how & SOLVER_SETARCH)
915 s = pool_tmpappend(pool, s, ",setarch", 0);
916 if (how & SOLVER_SETVENDOR)
917 s = pool_tmpappend(pool, s, ",setvendor", 0);
918 if (how & SOLVER_SETREPO)
919 s = pool_tmpappend(pool, s, ",setrepo", 0);
920 if (how & SOLVER_NOAUTOSET)
921 s = pool_tmpappend(pool, s, ",noautoset", 0);
923 s = pool_tmpappend(pool, s, ",?", 0);
925 return pool_tmpappend(pool, s, "]", 0);
929 solver_problemruleinfo2str(Solver *solv, SolverRuleinfo type, Id source, Id target, Id dep)
931 Pool *pool = solv->pool;
935 case SOLVER_RULE_DISTUPGRADE:
936 return pool_tmpjoin(pool, pool_solvid2str(pool, source), " does not belong to a distupgrade repository", 0);
937 case SOLVER_RULE_INFARCH:
938 return pool_tmpjoin(pool, pool_solvid2str(pool, source), " has inferior architecture", 0);
939 case SOLVER_RULE_UPDATE:
940 return pool_tmpjoin(pool, "problem with installed package ", pool_solvid2str(pool, source), 0);
941 case SOLVER_RULE_JOB:
942 return "conflicting requests";
943 case SOLVER_RULE_JOB_NOTHING_PROVIDES_DEP:
944 return pool_tmpjoin(pool, "nothing provides requested ", pool_dep2str(pool, dep), 0);
945 case SOLVER_RULE_RPM:
946 return "some dependency problem";
947 case SOLVER_RULE_RPM_NOT_INSTALLABLE:
948 return pool_tmpjoin(pool, "package ", pool_solvid2str(pool, source), " is not installable");
949 case SOLVER_RULE_RPM_NOTHING_PROVIDES_DEP:
950 s = pool_tmpjoin(pool, "nothing provides ", pool_dep2str(pool, dep), 0);
951 return pool_tmpappend(pool, s, " needed by ", pool_solvid2str(pool, source));
952 case SOLVER_RULE_RPM_SAME_NAME:
953 s = pool_tmpjoin(pool, "cannot install both ", pool_solvid2str(pool, source), 0);
954 return pool_tmpappend(pool, s, " and ", pool_solvid2str(pool, target));
955 case SOLVER_RULE_RPM_PACKAGE_CONFLICT:
956 s = pool_tmpjoin(pool, "package ", pool_solvid2str(pool, source), 0);
957 s = pool_tmpappend(pool, s, " conflicts with ", pool_dep2str(pool, dep));
958 return pool_tmpappend(pool, s, " provided by ", pool_solvid2str(pool, target));
959 case SOLVER_RULE_RPM_PACKAGE_OBSOLETES:
960 s = pool_tmpjoin(pool, "package ", pool_solvid2str(pool, source), 0);
961 s = pool_tmpappend(pool, s, " obsoletes ", pool_dep2str(pool, dep));
962 return pool_tmpappend(pool, s, " provided by ", pool_solvid2str(pool, target));
963 case SOLVER_RULE_RPM_INSTALLEDPKG_OBSOLETES:
964 s = pool_tmpjoin(pool, "installed package ", pool_solvid2str(pool, source), 0);
965 s = pool_tmpappend(pool, s, " obsoletes ", pool_dep2str(pool, dep));
966 return pool_tmpappend(pool, s, " provided by ", pool_solvid2str(pool, target));
967 case SOLVER_RULE_RPM_IMPLICIT_OBSOLETES:
968 s = pool_tmpjoin(pool, "package ", pool_solvid2str(pool, source), 0);
969 s = pool_tmpappend(pool, s, " implicitly obsoletes ", pool_dep2str(pool, dep));
970 return pool_tmpappend(pool, s, " provided by ", pool_solvid2str(pool, target));
971 case SOLVER_RULE_RPM_PACKAGE_REQUIRES:
972 s = pool_tmpjoin(pool, "package ", pool_solvid2str(pool, source), " requires ");
973 return pool_tmpappend(pool, s, pool_dep2str(pool, dep), ", but none of the providers can be installed");
974 case SOLVER_RULE_RPM_SELF_CONFLICT:
975 s = pool_tmpjoin(pool, "package ", pool_solvid2str(pool, source), " conflicts with ");
976 return pool_tmpappend(pool, s, pool_dep2str(pool, dep), " provided by itself");
978 return "bad problem rule type";
983 solver_solutionelement2str(Solver *solv, Id p, Id rp)
985 Pool *pool = solv->pool;
986 if (p == SOLVER_SOLUTION_JOB)
988 Id how = solv->job.elements[rp - 1];
989 Id what = solv->job.elements[rp];
990 return pool_tmpjoin(pool, "do not ask to ", pool_job2str(pool, how, what, 0), 0);
992 else if (p == SOLVER_SOLUTION_INFARCH)
994 Solvable *s = pool->solvables + rp;
995 if (solv->installed && s->repo == solv->installed)
996 return pool_tmpjoin(pool, "keep ", pool_solvable2str(pool, s), " despite the inferior architecture");
998 return pool_tmpjoin(pool, "install ", pool_solvable2str(pool, s), " despite the inferior architecture");
1000 else if (p == SOLVER_SOLUTION_DISTUPGRADE)
1002 Solvable *s = pool->solvables + rp;
1003 if (solv->installed && s->repo == solv->installed)
1004 return pool_tmpjoin(pool, "keep obsolete ", pool_solvable2str(pool, s), 0);
1006 return pool_tmpjoin(pool, "install ", pool_solvable2str(pool, s), " from excluded repository");
1008 else if (p > 0 && rp == 0)
1009 return pool_tmpjoin(pool, "allow deinstallation of ", pool_solvid2str(pool, p), 0);
1010 else if (p > 0 && rp > 0)
1012 const char *sp = pool_solvid2str(pool, p);
1013 const char *srp = pool_solvid2str(pool, rp);
1014 const char *str = pool_tmpjoin(pool, "allow replacement of ", sp, 0);
1015 return pool_tmpappend(pool, str, " with ", srp);
1018 return "bad solution element";
1022 policy_illegal2str(Solver *solv, int illegal, Solvable *s, Solvable *rs)
1024 Pool *pool = solv->pool;
1026 if (illegal == POLICY_ILLEGAL_DOWNGRADE)
1028 str = pool_tmpjoin(pool, "downgrade of ", pool_solvable2str(pool, s), 0);
1029 return pool_tmpappend(pool, str, " to ", pool_solvable2str(pool, rs));
1031 if (illegal == POLICY_ILLEGAL_NAMECHANGE)
1033 str = pool_tmpjoin(pool, "name change of ", pool_solvable2str(pool, s), 0);
1034 return pool_tmpappend(pool, str, " to ", pool_solvable2str(pool, rs));
1036 if (illegal == POLICY_ILLEGAL_ARCHCHANGE)
1038 str = pool_tmpjoin(pool, "architecture change of ", pool_solvable2str(pool, s), 0);
1039 return pool_tmpappend(pool, str, " to ", pool_solvable2str(pool, rs));
1041 if (illegal == POLICY_ILLEGAL_VENDORCHANGE)
1043 str = pool_tmpjoin(pool, "vendor change from '", pool_id2str(pool, s->vendor), "' (");
1046 str = pool_tmpappend(pool, str, pool_solvable2str(pool, s), ") to '");
1047 str = pool_tmpappend(pool, str, pool_id2str(pool, rs->vendor), "' (");
1050 str = pool_tmpappend(pool, str, pool_solvable2str(pool, s), ") to no vendor (");
1051 return pool_tmpappend(pool, str, pool_solvable2str(pool, rs), ")");
1053 return "unknown illegal change";