]>
git.saurik.com Git - apt.git/blob - apt-pkg/algorithms.cc
1 // -*- mode: cpp; mode: fold -*-
3 // $Id: algorithms.cc,v 1.44 2002/11/28 18:49:16 jgg Exp $
4 /* ######################################################################
6 Algorithms - A set of misc algorithms
8 The pkgProblemResolver class has become insanely complex and
9 very sophisticated, it handles every test case I have thrown at it
10 to my satisfaction. Understanding exactly why all the steps the class
11 does are required is difficult and changing though not very risky
12 may result in other cases not working.
14 ##################################################################### */
16 // Include Files /*{{{*/
17 #include <apt-pkg/algorithms.h>
18 #include <apt-pkg/error.h>
19 #include <apt-pkg/configuration.h>
20 #include <apt-pkg/version.h>
21 #include <apt-pkg/sptr.h>
25 #include <sys/types.h>
32 pkgProblemResolver
*pkgProblemResolver::This
= 0;
34 // Simulate::Simulate - Constructor /*{{{*/
35 // ---------------------------------------------------------------------
36 /* The legacy translations here of input Pkg iterators is obsolete,
37 this is not necessary since the pkgCaches are fully shared now. */
38 pkgSimulate::pkgSimulate(pkgDepCache
*Cache
) : pkgPackageManager(Cache
),
40 Sim(&Cache
->GetCache(),&iPolicy
)
43 Flags
= new unsigned char[Cache
->Head().PackageCount
];
44 memset(Flags
,0,sizeof(*Flags
)*Cache
->Head().PackageCount
);
46 // Fake a filename so as not to activate the media swapping
47 string Jnk
= "SIMULATE";
48 for (unsigned int I
= 0; I
!= Cache
->Head().PackageCount
; I
++)
52 // Simulate::Describe - Describe a package /*{{{*/
53 // ---------------------------------------------------------------------
54 /* Parameter Current == true displays the current package version,
55 Parameter Candidate == true displays the candidate package version */
56 void pkgSimulate::Describe(PkgIterator Pkg
,ostream
&out
,bool Current
,bool Candidate
)
64 Ver
= Pkg
.CurrentVer();
65 if (Ver
.end() == false)
66 out
<< " [" << Ver
.VerStr() << ']';
69 if (Candidate
== true)
71 Ver
= Sim
[Pkg
].CandidateVerIter(Sim
);
72 if (Ver
.end() == true)
75 out
<< " (" << Ver
.VerStr() << ' ' << Ver
.RelStr() << ')';
79 // Simulate::Install - Simulate unpacking of a package /*{{{*/
80 // ---------------------------------------------------------------------
82 bool pkgSimulate::Install(PkgIterator iPkg
,string
/*File*/)
85 PkgIterator Pkg
= Sim
.FindPkg(iPkg
.Name());
89 Describe(Pkg
,cout
,true,true);
90 Sim
.MarkInstall(Pkg
,false);
92 // Look for broken conflicts+predepends.
93 for (PkgIterator I
= Sim
.PkgBegin(); I
.end() == false; I
++)
95 if (Sim
[I
].InstallVer
== 0)
98 for (DepIterator D
= Sim
[I
].InstVerIter(Sim
).DependsList(); D
.end() == false;)
103 if (Start
->Type
== pkgCache::Dep::Conflicts
||
104 Start
->Type
== pkgCache::Dep::DpkgBreaks
||
105 Start
->Type
== pkgCache::Dep::Obsoletes
||
106 End
->Type
== pkgCache::Dep::PreDepends
)
108 if ((Sim
[End
] & pkgDepCache::DepGInstall
) == 0)
110 cout
<< " [" << I
.Name() << " on " << Start
.TargetPkg().Name() << ']';
111 if (Start
->Type
== pkgCache::Dep::Conflicts
)
112 _error
->Error("Fatal, conflicts violated %s",I
.Name());
118 if (Sim
.BrokenCount() != 0)
125 // Simulate::Configure - Simulate configuration of a Package /*{{{*/
126 // ---------------------------------------------------------------------
127 /* This is not an acurate simulation of relatity, we should really not
128 install the package.. For some investigations it may be necessary
130 bool pkgSimulate::Configure(PkgIterator iPkg
)
132 // Adapt the iterator
133 PkgIterator Pkg
= Sim
.FindPkg(iPkg
.Name());
136 // Sim.MarkInstall(Pkg,false);
137 if (Sim
[Pkg
].InstBroken() == true)
139 cout
<< "Conf " << Pkg
.Name() << " broken" << endl
;
143 // Print out each package and the failed dependencies
144 for (pkgCache::DepIterator D
= Sim
[Pkg
].InstVerIter(Sim
).DependsList(); D
.end() == false; D
++)
146 if (Sim
.IsImportantDep(D
) == false ||
147 (Sim
[D
] & pkgDepCache::DepInstall
) != 0)
150 if (D
->Type
== pkgCache::Dep::Obsoletes
)
151 cout
<< " Obsoletes:" << D
.TargetPkg().Name();
152 else if (D
->Type
== pkgCache::Dep::Conflicts
)
153 cout
<< " Conflicts:" << D
.TargetPkg().Name();
154 else if (D
->Type
== pkgCache::Dep::DpkgBreaks
)
155 cout
<< " Breaks:" << D
.TargetPkg().Name();
157 cout
<< " Depends:" << D
.TargetPkg().Name();
161 _error
->Error("Conf Broken %s",Pkg
.Name());
166 Describe(Pkg
,cout
,false,true);
169 if (Sim
.BrokenCount() != 0)
177 // Simulate::Remove - Simulate the removal of a package /*{{{*/
178 // ---------------------------------------------------------------------
180 bool pkgSimulate::Remove(PkgIterator iPkg
,bool Purge
)
182 // Adapt the iterator
183 PkgIterator Pkg
= Sim
.FindPkg(iPkg
.Name());
191 Describe(Pkg
,cout
,true,false);
193 if (Sim
.BrokenCount() != 0)
201 // Simulate::ShortBreaks - Print out a short line describing all breaks /*{{{*/
202 // ---------------------------------------------------------------------
204 void pkgSimulate::ShortBreaks()
207 for (PkgIterator I
= Sim
.PkgBegin(); I
.end() == false; I
++)
209 if (Sim
[I
].InstBroken() == true)
211 if (Flags
[I
->ID
] == 0)
212 cout
<< I
.Name() << ' ';
214 cout << I.Name() << "! ";*/
220 // ApplyStatus - Adjust for non-ok packages /*{{{*/
221 // ---------------------------------------------------------------------
222 /* We attempt to change the state of the all packages that have failed
223 installation toward their real state. The ordering code will perform
224 the necessary calculations to deal with the problems. */
225 bool pkgApplyStatus(pkgDepCache
&Cache
)
227 pkgDepCache::ActionGroup
group(Cache
);
229 for (pkgCache::PkgIterator I
= Cache
.PkgBegin(); I
.end() == false; I
++)
231 if (I
->VersionList
== 0)
234 // Only choice for a ReInstReq package is to reinstall
235 if (I
->InstState
== pkgCache::State::ReInstReq
||
236 I
->InstState
== pkgCache::State::HoldReInstReq
)
238 if (I
->CurrentVer
!= 0 && I
.CurrentVer().Downloadable() == true)
239 Cache
.MarkKeep(I
, false, false);
242 // Is this right? Will dpkg choke on an upgrade?
243 if (Cache
[I
].CandidateVer
!= 0 &&
244 Cache
[I
].CandidateVerIter(Cache
).Downloadable() == true)
245 Cache
.MarkInstall(I
, false, 0, false);
247 return _error
->Error(_("The package %s needs to be reinstalled, "
248 "but I can't find an archive for it."),I
.Name());
254 switch (I
->CurrentState
)
256 /* This means installation failed somehow - it does not need to be
257 re-unpacked (probably) */
258 case pkgCache::State::UnPacked
:
259 case pkgCache::State::HalfConfigured
:
260 case pkgCache::State::TriggersAwaited
:
261 case pkgCache::State::TriggersPending
:
262 if ((I
->CurrentVer
!= 0 && I
.CurrentVer().Downloadable() == true) ||
263 I
.State() != pkgCache::PkgIterator::NeedsUnpack
)
264 Cache
.MarkKeep(I
, false, false);
267 if (Cache
[I
].CandidateVer
!= 0 &&
268 Cache
[I
].CandidateVerIter(Cache
).Downloadable() == true)
269 Cache
.MarkInstall(I
, true, 0, false);
275 // This means removal failed
276 case pkgCache::State::HalfInstalled
:
281 if (I
->InstState
!= pkgCache::State::Ok
)
282 return _error
->Error("The package %s is not ok and I "
283 "don't know how to fix it!",I
.Name());
289 // FixBroken - Fix broken packages /*{{{*/
290 // ---------------------------------------------------------------------
291 /* This autoinstalls every broken package and then runs the problem resolver
293 bool pkgFixBroken(pkgDepCache
&Cache
)
295 pkgDepCache::ActionGroup
group(Cache
);
297 // Auto upgrade all broken packages
298 for (pkgCache::PkgIterator I
= Cache
.PkgBegin(); I
.end() == false; I
++)
299 if (Cache
[I
].NowBroken() == true)
300 Cache
.MarkInstall(I
, true, 0, false);
302 /* Fix packages that are in a NeedArchive state but don't have a
303 downloadable install version */
304 for (pkgCache::PkgIterator I
= Cache
.PkgBegin(); I
.end() == false; I
++)
306 if (I
.State() != pkgCache::PkgIterator::NeedsUnpack
||
307 Cache
[I
].Delete() == true)
310 if (Cache
[I
].InstVerIter(Cache
).Downloadable() == false)
313 Cache
.MarkInstall(I
, true, 0, false);
316 pkgProblemResolver
Fix(&Cache
);
317 return Fix
.Resolve(true);
320 // DistUpgrade - Distribution upgrade /*{{{*/
321 // ---------------------------------------------------------------------
322 /* This autoinstalls every package and then force installs every
323 pre-existing package. This creates the initial set of conditions which
324 most likely contain problems because too many things were installed.
326 The problem resolver is used to resolve the problems.
328 bool pkgDistUpgrade(pkgDepCache
&Cache
)
330 pkgDepCache::ActionGroup
group(Cache
);
332 /* Auto upgrade all installed packages, this provides the basis
333 for the installation */
334 for (pkgCache::PkgIterator I
= Cache
.PkgBegin(); I
.end() == false; I
++)
335 if (I
->CurrentVer
!= 0)
336 Cache
.MarkInstall(I
, true, 0, false);
338 /* Now, auto upgrade all essential packages - this ensures that
339 the essential packages are present and working */
340 for (pkgCache::PkgIterator I
= Cache
.PkgBegin(); I
.end() == false; I
++)
341 if ((I
->Flags
& pkgCache::Flag::Essential
) == pkgCache::Flag::Essential
)
342 Cache
.MarkInstall(I
, true, 0, false);
344 /* We do it again over all previously installed packages to force
345 conflict resolution on them all. */
346 for (pkgCache::PkgIterator I
= Cache
.PkgBegin(); I
.end() == false; I
++)
347 if (I
->CurrentVer
!= 0)
348 Cache
.MarkInstall(I
, false, 0, false);
350 pkgProblemResolver
Fix(&Cache
);
352 // Hold back held packages.
353 if (_config
->FindB("APT::Ignore-Hold",false) == false)
355 for (pkgCache::PkgIterator I
= Cache
.PkgBegin(); I
.end() == false; I
++)
357 if (I
->SelectedState
== pkgCache::State::Hold
)
360 Cache
.MarkKeep(I
, false, false);
365 return Fix
.Resolve();
368 // AllUpgrade - Upgrade as many packages as possible /*{{{*/
369 // ---------------------------------------------------------------------
370 /* Right now the system must be consistent before this can be called.
371 It also will not change packages marked for install, it only tries
372 to install packages not marked for install */
373 bool pkgAllUpgrade(pkgDepCache
&Cache
)
375 pkgDepCache::ActionGroup
group(Cache
);
377 pkgProblemResolver
Fix(&Cache
);
379 if (Cache
.BrokenCount() != 0)
382 // Upgrade all installed packages
383 for (pkgCache::PkgIterator I
= Cache
.PkgBegin(); I
.end() == false; I
++)
385 if (Cache
[I
].Install() == true)
388 if (_config
->FindB("APT::Ignore-Hold",false) == false)
389 if (I
->SelectedState
== pkgCache::State::Hold
)
392 if (I
->CurrentVer
!= 0 && Cache
[I
].InstallVer
!= 0)
393 Cache
.MarkInstall(I
, false, 0, false);
396 return Fix
.ResolveByKeep();
399 // MinimizeUpgrade - Minimizes the set of packages to be upgraded /*{{{*/
400 // ---------------------------------------------------------------------
401 /* This simply goes over the entire set of packages and tries to keep
402 each package marked for upgrade. If a conflict is generated then
403 the package is restored. */
404 bool pkgMinimizeUpgrade(pkgDepCache
&Cache
)
406 pkgDepCache::ActionGroup
group(Cache
);
408 if (Cache
.BrokenCount() != 0)
411 // We loop for 10 tries to get the minimal set size.
413 unsigned int Count
= 0;
417 for (pkgCache::PkgIterator I
= Cache
.PkgBegin(); I
.end() == false; I
++)
420 if (Cache
[I
].Upgrade() == false || Cache
[I
].NewInstall() == true)
423 // Keep it and see if that is OK
424 Cache
.MarkKeep(I
, false, false);
425 if (Cache
.BrokenCount() != 0)
426 Cache
.MarkInstall(I
, false, 0, false);
429 // If keep didnt actually do anything then there was no change..
430 if (Cache
[I
].Upgrade() == false)
436 while (Change
== true && Count
< 10);
438 if (Cache
.BrokenCount() != 0)
439 return _error
->Error("Internal Error in pkgMinimizeUpgrade");
445 // ProblemResolver::pkgProblemResolver - Constructor /*{{{*/
446 // ---------------------------------------------------------------------
448 pkgProblemResolver::pkgProblemResolver(pkgDepCache
*pCache
) : Cache(*pCache
)
451 unsigned long Size
= Cache
.Head().PackageCount
;
452 Scores
= new signed short[Size
];
453 Flags
= new unsigned char[Size
];
454 memset(Flags
,0,sizeof(*Flags
)*Size
);
456 // Set debug to true to see its decision logic
457 Debug
= _config
->FindB("Debug::pkgProblemResolver",false);
460 // ProblemResolver::~pkgProblemResolver - Destructor /*{{{*/
461 // ---------------------------------------------------------------------
463 pkgProblemResolver::~pkgProblemResolver()
469 // ProblemResolver::ScoreSort - Sort the list by score /*{{{*/
470 // ---------------------------------------------------------------------
472 int pkgProblemResolver::ScoreSort(const void *a
,const void *b
)
474 Package
const **A
= (Package
const **)a
;
475 Package
const **B
= (Package
const **)b
;
476 if (This
->Scores
[(*A
)->ID
] > This
->Scores
[(*B
)->ID
])
478 if (This
->Scores
[(*A
)->ID
] < This
->Scores
[(*B
)->ID
])
483 // ProblemResolver::MakeScores - Make the score table /*{{{*/
484 // ---------------------------------------------------------------------
486 void pkgProblemResolver::MakeScores()
488 unsigned long Size
= Cache
.Head().PackageCount
;
489 memset(Scores
,0,sizeof(*Scores
)*Size
);
491 // Generate the base scores for a package based on its properties
492 for (pkgCache::PkgIterator I
= Cache
.PkgBegin(); I
.end() == false; I
++)
494 if (Cache
[I
].InstallVer
== 0)
497 signed short &Score
= Scores
[I
->ID
];
499 /* This is arbitary, it should be high enough to elevate an
500 essantial package above most other packages but low enough
501 to allow an obsolete essential packages to be removed by
502 a conflicts on a powerfull normal package (ie libc6) */
503 if ((I
->Flags
& pkgCache::Flag::Essential
) == pkgCache::Flag::Essential
)
506 // We transform the priority
507 // Important Required Standard Optional Extra
508 signed short PrioMap
[] = {0,3,2,1,-1,-2};
509 if (Cache
[I
].InstVerIter(Cache
)->Priority
<= 5)
510 Score
+= PrioMap
[Cache
[I
].InstVerIter(Cache
)->Priority
];
512 /* This helps to fix oddball problems with conflicting packages
513 on the same level. We enhance the score of installed packages
514 if those are not obsolete
516 if (I
->CurrentVer
!= 0 && Cache
[I
].CandidateVer
!= 0 && Cache
[I
].CandidateVerIter(Cache
).Downloadable())
520 // Now that we have the base scores we go and propogate dependencies
521 for (pkgCache::PkgIterator I
= Cache
.PkgBegin(); I
.end() == false; I
++)
523 if (Cache
[I
].InstallVer
== 0)
526 for (pkgCache::DepIterator D
= Cache
[I
].InstVerIter(Cache
).DependsList(); D
.end() == false; D
++)
528 if (D
->Type
== pkgCache::Dep::Depends
|| D
->Type
== pkgCache::Dep::PreDepends
)
529 Scores
[D
.TargetPkg()->ID
]++;
533 // Copy the scores to advoid additive looping
534 SPtrArray
<signed short> OldScores
= new signed short[Size
];
535 memcpy(OldScores
,Scores
,sizeof(*Scores
)*Size
);
537 /* Now we cause 1 level of dependency inheritance, that is we add the
538 score of the packages that depend on the target Package. This
539 fortifies high scoring packages */
540 for (pkgCache::PkgIterator I
= Cache
.PkgBegin(); I
.end() == false; I
++)
542 if (Cache
[I
].InstallVer
== 0)
545 for (pkgCache::DepIterator D
= I
.RevDependsList(); D
.end() == false; D
++)
547 // Only do it for the install version
548 if ((pkgCache::Version
*)D
.ParentVer() != Cache
[D
.ParentPkg()].InstallVer
||
549 (D
->Type
!= pkgCache::Dep::Depends
&& D
->Type
!= pkgCache::Dep::PreDepends
))
552 Scores
[I
->ID
] += abs(OldScores
[D
.ParentPkg()->ID
]);
556 /* Now we propogate along provides. This makes the packages that
557 provide important packages extremely important */
558 for (pkgCache::PkgIterator I
= Cache
.PkgBegin(); I
.end() == false; I
++)
560 for (pkgCache::PrvIterator P
= I
.ProvidesList(); P
.end() == false; P
++)
562 // Only do it once per package
563 if ((pkgCache::Version
*)P
.OwnerVer() != Cache
[P
.OwnerPkg()].InstallVer
)
565 Scores
[P
.OwnerPkg()->ID
] += abs(Scores
[I
->ID
] - OldScores
[I
->ID
]);
569 /* Protected things are pushed really high up. This number should put them
570 ahead of everything */
571 for (pkgCache::PkgIterator I
= Cache
.PkgBegin(); I
.end() == false; I
++)
573 if ((Flags
[I
->ID
] & Protected
) != 0)
574 Scores
[I
->ID
] += 10000;
575 if ((I
->Flags
& pkgCache::Flag::Essential
) == pkgCache::Flag::Essential
)
576 Scores
[I
->ID
] += 5000;
580 // ProblemResolver::DoUpgrade - Attempt to upgrade this package /*{{{*/
581 // ---------------------------------------------------------------------
582 /* This goes through and tries to reinstall packages to make this package
584 bool pkgProblemResolver::DoUpgrade(pkgCache::PkgIterator Pkg
)
586 pkgDepCache::ActionGroup
group(Cache
);
588 if ((Flags
[Pkg
->ID
] & Upgradable
) == 0 || Cache
[Pkg
].Upgradable() == false)
590 if ((Flags
[Pkg
->ID
] & Protected
) == Protected
)
593 Flags
[Pkg
->ID
] &= ~Upgradable
;
595 bool WasKept
= Cache
[Pkg
].Keep();
596 Cache
.MarkInstall(Pkg
, false, 0, false);
598 // This must be a virtual package or something like that.
599 if (Cache
[Pkg
].InstVerIter(Cache
).end() == true)
602 // Isolate the problem dependency
604 for (pkgCache::DepIterator D
= Cache
[Pkg
].InstVerIter(Cache
).DependsList(); D
.end() == false;)
606 // Compute a single dependency element (glob or)
607 pkgCache::DepIterator Start
= D
;
608 pkgCache::DepIterator End
= D
;
609 unsigned char State
= 0;
610 for (bool LastOR
= true; D
.end() == false && LastOR
== true;)
613 LastOR
= (D
->CompareOp
& pkgCache::Dep::Or
) == pkgCache::Dep::Or
;
619 // We only worry about critical deps.
620 if (End
.IsCritical() != true)
623 // Iterate over all the members in the or group
627 if ((Cache
[End
] & pkgDepCache::DepGInstall
) == pkgDepCache::DepGInstall
)
630 // Do not change protected packages
631 PkgIterator P
= Start
.SmartTargetPkg();
632 if ((Flags
[P
->ID
] & Protected
) == Protected
)
635 clog
<< " Reinst Failed because of protected " << P
.Name() << endl
;
640 // Upgrade the package if the candidate version will fix the problem.
641 if ((Cache
[Start
] & pkgDepCache::DepCVer
) == pkgDepCache::DepCVer
)
643 if (DoUpgrade(P
) == false)
646 clog
<< " Reinst Failed because of " << P
.Name() << endl
;
657 /* We let the algorithm deal with conflicts on its next iteration,
658 it is much smarter than us */
659 if (Start
->Type
== pkgCache::Dep::Conflicts
||
660 Start
->Type
== pkgCache::Dep::DpkgBreaks
||
661 Start
->Type
== pkgCache::Dep::Obsoletes
)
665 clog
<< " Reinst Failed early because of " << Start
.TargetPkg().Name() << endl
;
678 // Undo our operations - it might be smart to undo everything this did..
682 Cache
.MarkKeep(Pkg
, false, false);
684 Cache
.MarkDelete(Pkg
);
689 clog
<< " Re-Instated " << Pkg
.Name() << endl
;
693 // ProblemResolver::Resolve - Run the resolution pass /*{{{*/
694 // ---------------------------------------------------------------------
695 /* This routines works by calculating a score for each package. The score
696 is derived by considering the package's priority and all reverse
697 dependents giving an integer that reflects the amount of breakage that
698 adjusting the package will inflict.
700 It goes from highest score to lowest and corrects all of the breaks by
701 keeping or removing the dependant packages. If that fails then it removes
702 the package itself and goes on. The routine should be able to intelligently
703 go from any broken state to a fixed state.
705 The BrokenFix flag enables a mode where the algorithm tries to
706 upgrade packages to advoid problems. */
707 bool pkgProblemResolver::Resolve(bool BrokenFix
)
709 pkgDepCache::ActionGroup
group(Cache
);
711 unsigned long Size
= Cache
.Head().PackageCount
;
713 // Record which packages are marked for install
718 for (pkgCache::PkgIterator I
= Cache
.PkgBegin(); I
.end() == false; I
++)
720 if (Cache
[I
].Install() == true)
721 Flags
[I
->ID
] |= PreInstalled
;
724 if (Cache
[I
].InstBroken() == true && BrokenFix
== true)
726 Cache
.MarkInstall(I
, false, 0, false);
727 if (Cache
[I
].Install() == true)
731 Flags
[I
->ID
] &= ~PreInstalled
;
733 Flags
[I
->ID
] |= Upgradable
;
736 while (Again
== true);
739 clog
<< "Starting" << endl
;
743 /* We have to order the packages so that the broken fixing pass
744 operates from highest score to lowest. This prevents problems when
745 high score packages cause the removal of lower score packages that
746 would cause the removal of even lower score packages. */
747 SPtrArray
<pkgCache::Package
*> PList
= new pkgCache::Package
*[Size
];
748 pkgCache::Package
**PEnd
= PList
;
749 for (pkgCache::PkgIterator I
= Cache
.PkgBegin(); I
.end() == false; I
++)
752 qsort(PList
,PEnd
- PList
,sizeof(*PList
),&ScoreSort
);
754 /* for (pkgCache::Package **K = PList; K != PEnd; K++)
755 if (Scores[(*K)->ID] != 0)
757 pkgCache::PkgIterator Pkg(Cache,*K);
758 clog << Scores[(*K)->ID] << ' ' << Pkg.Name() <<
759 ' ' << (pkgCache::Version *)Pkg.CurrentVer() << ' ' <<
760 Cache[Pkg].InstallVer << ' ' << Cache[Pkg].CandidateVer << endl;
764 clog
<< "Starting 2" << endl
;
766 /* Now consider all broken packages. For each broken package we either
767 remove the package or fix it's problem. We do this once, it should
768 not be possible for a loop to form (that is a < b < c and fixing b by
769 changing a breaks c) */
771 for (int Counter
= 0; Counter
!= 10 && Change
== true; Counter
++)
774 for (pkgCache::Package
**K
= PList
; K
!= PEnd
; K
++)
776 pkgCache::PkgIterator
I(Cache
,*K
);
778 /* We attempt to install this and see if any breaks result,
779 this takes care of some strange cases */
780 if (Cache
[I
].CandidateVer
!= Cache
[I
].InstallVer
&&
781 I
->CurrentVer
!= 0 && Cache
[I
].InstallVer
!= 0 &&
782 (Flags
[I
->ID
] & PreInstalled
) != 0 &&
783 (Flags
[I
->ID
] & Protected
) == 0 &&
784 (Flags
[I
->ID
] & ReInstateTried
) == 0)
787 clog
<< " Try to Re-Instate " << I
.Name() << endl
;
788 unsigned long OldBreaks
= Cache
.BrokenCount();
789 pkgCache::Version
*OldVer
= Cache
[I
].InstallVer
;
790 Flags
[I
->ID
] &= ReInstateTried
;
792 Cache
.MarkInstall(I
, false, 0, false);
793 if (Cache
[I
].InstBroken() == true ||
794 OldBreaks
< Cache
.BrokenCount())
799 Cache
.MarkKeep(I
, false, false);
803 clog
<< "Re-Instated " << I
.Name() << " (" << OldBreaks
<< " vs " << Cache
.BrokenCount() << ')' << endl
;
806 if (Cache
[I
].InstallVer
== 0 || Cache
[I
].InstBroken() == false)
810 clog
<< "Investigating " << I
.Name() << endl
;
812 // Isolate the problem dependency
813 PackageKill KillList
[100];
814 PackageKill
*LEnd
= KillList
;
816 pkgCache::DepIterator Start
;
817 pkgCache::DepIterator End
;
818 PackageKill
*OldEnd
= LEnd
;
820 enum {OrRemove
,OrKeep
} OrOp
= OrRemove
;
821 for (pkgCache::DepIterator D
= Cache
[I
].InstVerIter(Cache
).DependsList();
822 D
.end() == false || InOr
== true;)
824 // Compute a single dependency element (glob or)
830 if (OldEnd
== LEnd
&& OrOp
== OrRemove
)
832 if ((Flags
[I
->ID
] & Protected
) != Protected
)
835 clog
<< " Or group remove for " << I
.Name() << endl
;
840 if (OldEnd
== LEnd
&& OrOp
== OrKeep
)
843 clog
<< " Or group keep for " << I
.Name() << endl
;
844 Cache
.MarkKeep(I
, false, false);
849 /* We do an extra loop (as above) to finalize the or group
854 if (Start
.end() == true)
857 // We only worry about critical deps.
858 if (End
.IsCritical() != true)
867 // We only worry about critical deps.
868 if (Start
.IsCritical() != true)
873 if ((Cache
[End
] & pkgDepCache::DepGInstall
) == pkgDepCache::DepGInstall
)
880 clog
<< "Package " << I
.Name() << " has broken dep on " << Start
.TargetPkg().Name() << endl
;
882 /* Look across the version list. If there are no possible
883 targets then we keep the package and bail. This is necessary
884 if a package has a dep on another package that cant be found */
885 SPtrArray
<pkgCache::Version
*> VList
= Start
.AllTargets();
886 if (*VList
== 0 && (Flags
[I
->ID
] & Protected
) != Protected
&&
887 Start
->Type
!= pkgCache::Dep::Conflicts
&&
888 Start
->Type
!= pkgCache::Dep::DpkgBreaks
&&
889 Start
->Type
!= pkgCache::Dep::Obsoletes
&&
890 Cache
[I
].NowBroken() == false)
894 /* No keep choice because the keep being OK could be the
895 result of another element in the OR group! */
900 Cache
.MarkKeep(I
, false, false);
905 for (pkgCache::Version
**V
= VList
; *V
!= 0; V
++)
907 pkgCache::VerIterator
Ver(Cache
,*V
);
908 pkgCache::PkgIterator Pkg
= Ver
.ParentPkg();
911 clog
<< " Considering " << Pkg
.Name() << ' ' << (int)Scores
[Pkg
->ID
] <<
912 " as a solution to " << I
.Name() << ' ' << (int)Scores
[I
->ID
] << endl
;
914 /* Try to fix the package under consideration rather than
915 fiddle with the VList package */
916 if (Scores
[I
->ID
] <= Scores
[Pkg
->ID
] ||
917 ((Cache
[Start
] & pkgDepCache::DepNow
) == 0 &&
918 End
->Type
!= pkgCache::Dep::Conflicts
&&
919 End
->Type
!= pkgCache::Dep::DpkgBreaks
&&
920 End
->Type
!= pkgCache::Dep::Obsoletes
))
922 // Try a little harder to fix protected packages..
923 if ((Flags
[I
->ID
] & Protected
) == Protected
)
925 if (DoUpgrade(Pkg
) == true)
927 if (Scores
[Pkg
->ID
] > Scores
[I
->ID
])
928 Scores
[Pkg
->ID
] = Scores
[I
->ID
];
935 /* See if a keep will do, unless the package is protected,
936 then installing it will be necessary */
937 bool Installed
= Cache
[I
].Install();
938 Cache
.MarkKeep(I
, false, false);
939 if (Cache
[I
].InstBroken() == false)
941 // Unwind operation will be keep now
942 if (OrOp
== OrRemove
)
946 if (InOr
== true && Installed
== true)
947 Cache
.MarkInstall(I
, false, 0, false);
950 clog
<< " Holding Back " << I
.Name() << " rather than change " << Start
.TargetPkg().Name() << endl
;
954 if (BrokenFix
== false || DoUpgrade(I
) == false)
956 // Consider other options
960 clog
<< " Removing " << I
.Name() << " rather than change " << Start
.TargetPkg().Name() << endl
;
964 if (Scores
[Pkg
->ID
] > Scores
[I
->ID
])
965 Scores
[I
->ID
] = Scores
[Pkg
->ID
];
977 /* This is a conflicts, and the version we are looking
978 at is not the currently selected version of the
979 package, which means it is not necessary to
981 if (Cache
[Pkg
].InstallVer
!= Ver
&&
982 (Start
->Type
== pkgCache::Dep::Conflicts
||
983 Start
->Type
== pkgCache::Dep::Obsoletes
))
986 if (Start
->Type
== pkgCache::Dep::DpkgBreaks
)
988 /* Would it help if we upgraded? */
989 if (Cache
[End
] & pkgDepCache::DepGCVer
) {
991 clog
<< " Upgrading " << Pkg
.Name() << " due to Breaks field in " << I
.Name() << endl
;
992 Cache
.MarkInstall(Pkg
, false, 0, false);
996 clog
<< " Will not break " << Pkg
.Name() << " as stated in Breaks field in " << I
.Name() <<endl
;
997 Cache
.MarkKeep(I
, false, false);
1001 // Skip adding to the kill list if it is protected
1002 if ((Flags
[Pkg
->ID
] & Protected
) != 0)
1006 clog
<< " Added " << Pkg
.Name() << " to the remove list" << endl
;
1012 if (Start
->Type
!= pkgCache::Dep::Conflicts
&&
1013 Start
->Type
!= pkgCache::Dep::Obsoletes
)
1018 // Hm, nothing can possibly satisify this dep. Nuke it.
1019 if (VList
[0] == 0 &&
1020 Start
->Type
!= pkgCache::Dep::Conflicts
&&
1021 Start
->Type
!= pkgCache::Dep::DpkgBreaks
&&
1022 Start
->Type
!= pkgCache::Dep::Obsoletes
&&
1023 (Flags
[I
->ID
] & Protected
) != Protected
)
1025 bool Installed
= Cache
[I
].Install();
1027 if (Cache
[I
].InstBroken() == false)
1029 // Unwind operation will be keep now
1030 if (OrOp
== OrRemove
)
1034 if (InOr
== true && Installed
== true)
1035 Cache
.MarkInstall(I
, false, 0, false);
1038 clog
<< " Holding Back " << I
.Name() << " because I can't find " << Start
.TargetPkg().Name() << endl
;
1043 clog
<< " Removing " << I
.Name() << " because I can't find " << Start
.TargetPkg().Name() << endl
;
1045 Cache
.MarkDelete(I
);
1060 // Apply the kill list now
1061 if (Cache
[I
].InstallVer
!= 0)
1063 for (PackageKill
*J
= KillList
; J
!= LEnd
; J
++)
1066 if ((Cache
[J
->Dep
] & pkgDepCache::DepGNow
) == 0)
1068 if (J
->Dep
->Type
== pkgCache::Dep::Conflicts
||
1069 J
->Dep
->Type
== pkgCache::Dep::Obsoletes
)
1072 clog
<< " Fixing " << I
.Name() << " via remove of " << J
->Pkg
.Name() << endl
;
1073 Cache
.MarkDelete(J
->Pkg
);
1079 clog
<< " Fixing " << I
.Name() << " via keep of " << J
->Pkg
.Name() << endl
;
1080 Cache
.MarkKeep(J
->Pkg
, false, false);
1085 if (Scores
[I
->ID
] > Scores
[J
->Pkg
->ID
])
1086 Scores
[J
->Pkg
->ID
] = Scores
[I
->ID
];
1094 clog
<< "Done" << endl
;
1096 if (Cache
.BrokenCount() != 0)
1098 // See if this is the result of a hold
1099 pkgCache::PkgIterator I
= Cache
.PkgBegin();
1100 for (;I
.end() != true; I
++)
1102 if (Cache
[I
].InstBroken() == false)
1104 if ((Flags
[I
->ID
] & Protected
) != Protected
)
1105 return _error
->Error(_("Error, pkgProblemResolver::Resolve generated breaks, this may be caused by held packages."));
1107 return _error
->Error(_("Unable to correct problems, you have held broken packages."));
1110 // set the auto-flags (mvo: I'm not sure if we _really_ need this, but
1112 pkgCache::PkgIterator I
= Cache
.PkgBegin();
1113 for (;I
.end() != true; I
++) {
1114 if (Cache
[I
].NewInstall() && !(Flags
[I
->ID
] & PreInstalled
)) {
1115 if(_config
->FindI("Debug::pkgAutoRemove",false)) {
1116 std::clog
<< "Resolve installed new pkg: " << I
.Name()
1117 << " (now marking it as auto)" << std::endl
;
1119 Cache
[I
].Flags
|= pkgCache::Flag::Auto
;
1127 // ProblemResolver::ResolveByKeep - Resolve problems using keep /*{{{*/
1128 // ---------------------------------------------------------------------
1129 /* This is the work horse of the soft upgrade routine. It is very gental
1130 in that it does not install or remove any packages. It is assumed that the
1131 system was non-broken previously. */
1132 bool pkgProblemResolver::ResolveByKeep()
1134 pkgDepCache::ActionGroup
group(Cache
);
1136 unsigned long Size
= Cache
.Head().PackageCount
;
1139 clog
<< "Entering ResolveByKeep" << endl
;
1143 /* We have to order the packages so that the broken fixing pass
1144 operates from highest score to lowest. This prevents problems when
1145 high score packages cause the removal of lower score packages that
1146 would cause the removal of even lower score packages. */
1147 pkgCache::Package
**PList
= new pkgCache::Package
*[Size
];
1148 pkgCache::Package
**PEnd
= PList
;
1149 for (pkgCache::PkgIterator I
= Cache
.PkgBegin(); I
.end() == false; I
++)
1152 qsort(PList
,PEnd
- PList
,sizeof(*PList
),&ScoreSort
);
1154 // Consider each broken package
1155 pkgCache::Package
**LastStop
= 0;
1156 for (pkgCache::Package
**K
= PList
; K
!= PEnd
; K
++)
1158 pkgCache::PkgIterator
I(Cache
,*K
);
1160 if (Cache
[I
].InstallVer
== 0 || Cache
[I
].InstBroken() == false)
1163 /* Keep the package. If this works then great, otherwise we have
1164 to be significantly more agressive and manipulate its dependencies */
1165 if ((Flags
[I
->ID
] & Protected
) == 0)
1168 clog
<< "Keeping package " << I
.Name() << endl
;
1169 Cache
.MarkKeep(I
, false, false);
1170 if (Cache
[I
].InstBroken() == false)
1177 // Isolate the problem dependencies
1178 for (pkgCache::DepIterator D
= Cache
[I
].InstVerIter(Cache
).DependsList(); D
.end() == false;)
1182 D
.GlobOr(Start
,End
);
1184 // We only worry about critical deps.
1185 if (End
.IsCritical() != true)
1189 if ((Cache
[End
] & pkgDepCache::DepGInstall
) == pkgDepCache::DepGInstall
)
1192 /* Hm, the group is broken.. I suppose the best thing to do is to
1193 is to try every combination of keep/not-keep for the set, but thats
1194 slow, and this never happens, just be conservative and assume the
1195 list of ors is in preference and keep till it starts to work. */
1199 clog
<< "Package " << I
.Name() << " has broken dep on " << Start
.TargetPkg().Name() << endl
;
1201 // Look at all the possible provides on this package
1202 SPtrArray
<pkgCache::Version
*> VList
= Start
.AllTargets();
1203 for (pkgCache::Version
**V
= VList
; *V
!= 0; V
++)
1205 pkgCache::VerIterator
Ver(Cache
,*V
);
1206 pkgCache::PkgIterator Pkg
= Ver
.ParentPkg();
1208 // It is not keepable
1209 if (Cache
[Pkg
].InstallVer
== 0 ||
1210 Pkg
->CurrentVer
== 0)
1213 if ((Flags
[I
->ID
] & Protected
) == 0)
1216 clog
<< " Keeping Package " << Pkg
.Name() << " due to dep" << endl
;
1217 Cache
.MarkKeep(Pkg
, false, false);
1220 if (Cache
[I
].InstBroken() == false)
1224 if (Cache
[I
].InstBroken() == false)
1232 if (Cache
[I
].InstBroken() == false)
1236 if (Cache
[I
].InstBroken() == true)
1241 return _error
->Error("Internal Error, pkgProblemResolver::ResolveByKeep is looping on package %s.",I
.Name());
1249 // ProblemResolver::InstallProtect - Install all protected packages /*{{{*/
1250 // ---------------------------------------------------------------------
1251 /* This is used to make sure protected packages are installed */
1252 void pkgProblemResolver::InstallProtect()
1254 pkgDepCache::ActionGroup
group(Cache
);
1256 for (pkgCache::PkgIterator I
= Cache
.PkgBegin(); I
.end() == false; I
++)
1258 if ((Flags
[I
->ID
] & Protected
) == Protected
)
1260 if ((Flags
[I
->ID
] & ToRemove
) == ToRemove
)
1261 Cache
.MarkDelete(I
);
1264 // preserve the information whether the package was auto
1265 // or manually installed
1266 bool autoInst
= (Cache
[I
].Flags
& pkgCache::Flag::Auto
);
1267 Cache
.MarkInstall(I
, false, 0, !autoInst
);
1274 // PrioSortList - Sort a list of versions by priority /*{{{*/
1275 // ---------------------------------------------------------------------
1276 /* This is ment to be used in conjunction with AllTargets to get a list
1277 of versions ordered by preference. */
1278 static pkgCache
*PrioCache
;
1279 static int PrioComp(const void *A
,const void *B
)
1281 pkgCache::VerIterator
L(*PrioCache
,*(pkgCache::Version
**)A
);
1282 pkgCache::VerIterator
R(*PrioCache
,*(pkgCache::Version
**)B
);
1284 if ((L
.ParentPkg()->Flags
& pkgCache::Flag::Essential
) == pkgCache::Flag::Essential
&&
1285 (R
.ParentPkg()->Flags
& pkgCache::Flag::Essential
) != pkgCache::Flag::Essential
)
1287 if ((L
.ParentPkg()->Flags
& pkgCache::Flag::Essential
) != pkgCache::Flag::Essential
&&
1288 (R
.ParentPkg()->Flags
& pkgCache::Flag::Essential
) == pkgCache::Flag::Essential
)
1291 if (L
->Priority
!= R
->Priority
)
1292 return R
->Priority
- L
->Priority
;
1293 return strcmp(L
.ParentPkg().Name(),R
.ParentPkg().Name());
1295 void pkgPrioSortList(pkgCache
&Cache
,pkgCache::Version
**List
)
1297 unsigned long Count
= 0;
1299 for (pkgCache::Version
**I
= List
; *I
!= 0; I
++)
1301 qsort(List
,Count
,sizeof(*List
),PrioComp
);