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>
22 #include <apt-pkg/acquire-item.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
),
44 Flags
= new unsigned char[Cache
->Head().PackageCount
];
45 memset(Flags
,0,sizeof(*Flags
)*Cache
->Head().PackageCount
);
47 // Fake a filename so as not to activate the media swapping
48 string Jnk
= "SIMULATE";
49 for (unsigned int I
= 0; I
!= Cache
->Head().PackageCount
; I
++)
53 // Simulate::Describe - Describe a package /*{{{*/
54 // ---------------------------------------------------------------------
55 /* Parameter Current == true displays the current package version,
56 Parameter Candidate == true displays the candidate package version */
57 void pkgSimulate::Describe(PkgIterator Pkg
,ostream
&out
,bool Current
,bool Candidate
)
65 Ver
= Pkg
.CurrentVer();
66 if (Ver
.end() == false)
67 out
<< " [" << Ver
.VerStr() << ']';
70 if (Candidate
== true)
72 Ver
= Sim
[Pkg
].CandidateVerIter(Sim
);
73 if (Ver
.end() == true)
76 out
<< " (" << Ver
.VerStr() << ' ' << Ver
.RelStr() << ')';
80 // Simulate::Install - Simulate unpacking of a package /*{{{*/
81 // ---------------------------------------------------------------------
83 bool pkgSimulate::Install(PkgIterator iPkg
,string
/*File*/)
86 PkgIterator Pkg
= Sim
.FindPkg(iPkg
.Name());
90 Describe(Pkg
,cout
,true,true);
91 Sim
.MarkInstall(Pkg
,false);
93 // Look for broken conflicts+predepends.
94 for (PkgIterator I
= Sim
.PkgBegin(); I
.end() == false; I
++)
96 if (Sim
[I
].InstallVer
== 0)
99 for (DepIterator D
= Sim
[I
].InstVerIter(Sim
).DependsList(); D
.end() == false;)
104 if (Start
->Type
== pkgCache::Dep::Conflicts
||
105 Start
->Type
== pkgCache::Dep::DpkgBreaks
||
106 Start
->Type
== pkgCache::Dep::Obsoletes
||
107 End
->Type
== pkgCache::Dep::PreDepends
)
109 if ((Sim
[End
] & pkgDepCache::DepGInstall
) == 0)
111 cout
<< " [" << I
.Name() << " on " << Start
.TargetPkg().Name() << ']';
112 if (Start
->Type
== pkgCache::Dep::Conflicts
)
113 _error
->Error("Fatal, conflicts violated %s",I
.Name());
119 if (Sim
.BrokenCount() != 0)
126 // Simulate::Configure - Simulate configuration of a Package /*{{{*/
127 // ---------------------------------------------------------------------
128 /* This is not an acurate simulation of relatity, we should really not
129 install the package.. For some investigations it may be necessary
131 bool pkgSimulate::Configure(PkgIterator iPkg
)
133 // Adapt the iterator
134 PkgIterator Pkg
= Sim
.FindPkg(iPkg
.Name());
137 // Sim.MarkInstall(Pkg,false);
138 if (Sim
[Pkg
].InstBroken() == true)
140 cout
<< "Conf " << Pkg
.Name() << " broken" << endl
;
144 // Print out each package and the failed dependencies
145 for (pkgCache::DepIterator D
= Sim
[Pkg
].InstVerIter(Sim
).DependsList(); D
.end() == false; D
++)
147 if (Sim
.IsImportantDep(D
) == false ||
148 (Sim
[D
] & pkgDepCache::DepInstall
) != 0)
151 if (D
->Type
== pkgCache::Dep::Obsoletes
)
152 cout
<< " Obsoletes:" << D
.TargetPkg().Name();
153 else if (D
->Type
== pkgCache::Dep::Conflicts
)
154 cout
<< " Conflicts:" << D
.TargetPkg().Name();
155 else if (D
->Type
== pkgCache::Dep::DpkgBreaks
)
156 cout
<< " Breaks:" << D
.TargetPkg().Name();
158 cout
<< " Depends:" << D
.TargetPkg().Name();
162 _error
->Error("Conf Broken %s",Pkg
.Name());
167 Describe(Pkg
,cout
,false,true);
170 if (Sim
.BrokenCount() != 0)
178 // Simulate::Remove - Simulate the removal of a package /*{{{*/
179 // ---------------------------------------------------------------------
181 bool pkgSimulate::Remove(PkgIterator iPkg
,bool Purge
)
183 // Adapt the iterator
184 PkgIterator Pkg
= Sim
.FindPkg(iPkg
.Name());
192 Describe(Pkg
,cout
,true,false);
194 if (Sim
.BrokenCount() != 0)
202 // Simulate::ShortBreaks - Print out a short line describing all breaks /*{{{*/
203 // ---------------------------------------------------------------------
205 void pkgSimulate::ShortBreaks()
208 for (PkgIterator I
= Sim
.PkgBegin(); I
.end() == false; I
++)
210 if (Sim
[I
].InstBroken() == true)
212 if (Flags
[I
->ID
] == 0)
213 cout
<< I
.Name() << ' ';
215 cout << I.Name() << "! ";*/
221 // ApplyStatus - Adjust for non-ok packages /*{{{*/
222 // ---------------------------------------------------------------------
223 /* We attempt to change the state of the all packages that have failed
224 installation toward their real state. The ordering code will perform
225 the necessary calculations to deal with the problems. */
226 bool pkgApplyStatus(pkgDepCache
&Cache
)
228 pkgDepCache::ActionGroup
group(Cache
);
230 for (pkgCache::PkgIterator I
= Cache
.PkgBegin(); I
.end() == false; I
++)
232 if (I
->VersionList
== 0)
235 // Only choice for a ReInstReq package is to reinstall
236 if (I
->InstState
== pkgCache::State::ReInstReq
||
237 I
->InstState
== pkgCache::State::HoldReInstReq
)
239 if (I
->CurrentVer
!= 0 && I
.CurrentVer().Downloadable() == true)
240 Cache
.MarkKeep(I
, false, false);
243 // Is this right? Will dpkg choke on an upgrade?
244 if (Cache
[I
].CandidateVer
!= 0 &&
245 Cache
[I
].CandidateVerIter(Cache
).Downloadable() == true)
246 Cache
.MarkInstall(I
, false, 0, false);
248 return _error
->Error(_("The package %s needs to be reinstalled, "
249 "but I can't find an archive for it."),I
.Name());
255 switch (I
->CurrentState
)
257 /* This means installation failed somehow - it does not need to be
258 re-unpacked (probably) */
259 case pkgCache::State::UnPacked
:
260 case pkgCache::State::HalfConfigured
:
261 case pkgCache::State::TriggersAwaited
:
262 case pkgCache::State::TriggersPending
:
263 if ((I
->CurrentVer
!= 0 && I
.CurrentVer().Downloadable() == true) ||
264 I
.State() != pkgCache::PkgIterator::NeedsUnpack
)
265 Cache
.MarkKeep(I
, false, false);
268 if (Cache
[I
].CandidateVer
!= 0 &&
269 Cache
[I
].CandidateVerIter(Cache
).Downloadable() == true)
270 Cache
.MarkInstall(I
, true, 0, false);
276 // This means removal failed
277 case pkgCache::State::HalfInstalled
:
282 if (I
->InstState
!= pkgCache::State::Ok
)
283 return _error
->Error("The package %s is not ok and I "
284 "don't know how to fix it!",I
.Name());
290 // FixBroken - Fix broken packages /*{{{*/
291 // ---------------------------------------------------------------------
292 /* This autoinstalls every broken package and then runs the problem resolver
294 bool pkgFixBroken(pkgDepCache
&Cache
)
296 pkgDepCache::ActionGroup
group(Cache
);
298 // Auto upgrade all broken packages
299 for (pkgCache::PkgIterator I
= Cache
.PkgBegin(); I
.end() == false; I
++)
300 if (Cache
[I
].NowBroken() == true)
301 Cache
.MarkInstall(I
, true, 0, false);
303 /* Fix packages that are in a NeedArchive state but don't have a
304 downloadable install version */
305 for (pkgCache::PkgIterator I
= Cache
.PkgBegin(); I
.end() == false; I
++)
307 if (I
.State() != pkgCache::PkgIterator::NeedsUnpack
||
308 Cache
[I
].Delete() == true)
311 if (Cache
[I
].InstVerIter(Cache
).Downloadable() == false)
314 Cache
.MarkInstall(I
, true, 0, false);
317 pkgProblemResolver
Fix(&Cache
);
318 return Fix
.Resolve(true);
321 // DistUpgrade - Distribution upgrade /*{{{*/
322 // ---------------------------------------------------------------------
323 /* This autoinstalls every package and then force installs every
324 pre-existing package. This creates the initial set of conditions which
325 most likely contain problems because too many things were installed.
327 The problem resolver is used to resolve the problems.
329 bool pkgDistUpgrade(pkgDepCache
&Cache
)
331 pkgDepCache::ActionGroup
group(Cache
);
333 /* Auto upgrade all installed packages, this provides the basis
334 for the installation */
335 for (pkgCache::PkgIterator I
= Cache
.PkgBegin(); I
.end() == false; I
++)
336 if (I
->CurrentVer
!= 0)
337 Cache
.MarkInstall(I
, true, 0, false);
339 /* Now, auto upgrade all essential packages - this ensures that
340 the essential packages are present and working */
341 for (pkgCache::PkgIterator I
= Cache
.PkgBegin(); I
.end() == false; I
++)
342 if ((I
->Flags
& pkgCache::Flag::Essential
) == pkgCache::Flag::Essential
)
343 Cache
.MarkInstall(I
, true, 0, false);
345 /* We do it again over all previously installed packages to force
346 conflict resolution on them all. */
347 for (pkgCache::PkgIterator I
= Cache
.PkgBegin(); I
.end() == false; I
++)
348 if (I
->CurrentVer
!= 0)
349 Cache
.MarkInstall(I
, false, 0, false);
351 pkgProblemResolver
Fix(&Cache
);
353 // Hold back held packages.
354 if (_config
->FindB("APT::Ignore-Hold",false) == false)
356 for (pkgCache::PkgIterator I
= Cache
.PkgBegin(); I
.end() == false; I
++)
358 if (I
->SelectedState
== pkgCache::State::Hold
)
361 Cache
.MarkKeep(I
, false, false);
366 return Fix
.Resolve();
369 // AllUpgrade - Upgrade as many packages as possible /*{{{*/
370 // ---------------------------------------------------------------------
371 /* Right now the system must be consistent before this can be called.
372 It also will not change packages marked for install, it only tries
373 to install packages not marked for install */
374 bool pkgAllUpgrade(pkgDepCache
&Cache
)
376 pkgDepCache::ActionGroup
group(Cache
);
378 pkgProblemResolver
Fix(&Cache
);
380 if (Cache
.BrokenCount() != 0)
383 // Upgrade all installed packages
384 for (pkgCache::PkgIterator I
= Cache
.PkgBegin(); I
.end() == false; I
++)
386 if (Cache
[I
].Install() == true)
389 if (_config
->FindB("APT::Ignore-Hold",false) == false)
390 if (I
->SelectedState
== pkgCache::State::Hold
)
393 if (I
->CurrentVer
!= 0 && Cache
[I
].InstallVer
!= 0)
394 Cache
.MarkInstall(I
, false, 0, false);
397 return Fix
.ResolveByKeep();
400 // MinimizeUpgrade - Minimizes the set of packages to be upgraded /*{{{*/
401 // ---------------------------------------------------------------------
402 /* This simply goes over the entire set of packages and tries to keep
403 each package marked for upgrade. If a conflict is generated then
404 the package is restored. */
405 bool pkgMinimizeUpgrade(pkgDepCache
&Cache
)
407 pkgDepCache::ActionGroup
group(Cache
);
409 if (Cache
.BrokenCount() != 0)
412 // We loop for 10 tries to get the minimal set size.
414 unsigned int Count
= 0;
418 for (pkgCache::PkgIterator I
= Cache
.PkgBegin(); I
.end() == false; I
++)
421 if (Cache
[I
].Upgrade() == false || Cache
[I
].NewInstall() == true)
424 // Keep it and see if that is OK
425 Cache
.MarkKeep(I
, false, false);
426 if (Cache
.BrokenCount() != 0)
427 Cache
.MarkInstall(I
, false, 0, false);
430 // If keep didnt actually do anything then there was no change..
431 if (Cache
[I
].Upgrade() == false)
437 while (Change
== true && Count
< 10);
439 if (Cache
.BrokenCount() != 0)
440 return _error
->Error("Internal Error in pkgMinimizeUpgrade");
446 // ProblemResolver::pkgProblemResolver - Constructor /*{{{*/
447 // ---------------------------------------------------------------------
449 pkgProblemResolver::pkgProblemResolver(pkgDepCache
*pCache
) : Cache(*pCache
)
452 unsigned long Size
= Cache
.Head().PackageCount
;
453 Scores
= new signed short[Size
];
454 Flags
= new unsigned char[Size
];
455 memset(Flags
,0,sizeof(*Flags
)*Size
);
457 // Set debug to true to see its decision logic
458 Debug
= _config
->FindB("Debug::pkgProblemResolver",false);
461 // ProblemResolver::~pkgProblemResolver - Destructor /*{{{*/
462 // ---------------------------------------------------------------------
464 pkgProblemResolver::~pkgProblemResolver()
470 // ProblemResolver::ScoreSort - Sort the list by score /*{{{*/
471 // ---------------------------------------------------------------------
473 int pkgProblemResolver::ScoreSort(const void *a
,const void *b
)
475 Package
const **A
= (Package
const **)a
;
476 Package
const **B
= (Package
const **)b
;
477 if (This
->Scores
[(*A
)->ID
] > This
->Scores
[(*B
)->ID
])
479 if (This
->Scores
[(*A
)->ID
] < This
->Scores
[(*B
)->ID
])
484 // ProblemResolver::MakeScores - Make the score table /*{{{*/
485 // ---------------------------------------------------------------------
487 void pkgProblemResolver::MakeScores()
489 unsigned long Size
= Cache
.Head().PackageCount
;
490 memset(Scores
,0,sizeof(*Scores
)*Size
);
492 // Generate the base scores for a package based on its properties
493 for (pkgCache::PkgIterator I
= Cache
.PkgBegin(); I
.end() == false; I
++)
495 if (Cache
[I
].InstallVer
== 0)
498 signed short &Score
= Scores
[I
->ID
];
500 /* This is arbitrary, it should be high enough to elevate an
501 essantial package above most other packages but low enough
502 to allow an obsolete essential packages to be removed by
503 a conflicts on a powerfull normal package (ie libc6) */
504 if ((I
->Flags
& pkgCache::Flag::Essential
) == pkgCache::Flag::Essential
)
507 // We transform the priority
508 // Important Required Standard Optional Extra
509 signed short PrioMap
[] = {0,3,2,1,-1,-2};
510 if (Cache
[I
].InstVerIter(Cache
)->Priority
<= 5)
511 Score
+= PrioMap
[Cache
[I
].InstVerIter(Cache
)->Priority
];
513 /* This helps to fix oddball problems with conflicting packages
514 on the same level. We enhance the score of installed packages
515 if those are not obsolete
517 if (I
->CurrentVer
!= 0 && Cache
[I
].CandidateVer
!= 0 && Cache
[I
].CandidateVerIter(Cache
).Downloadable())
521 // Now that we have the base scores we go and propogate dependencies
522 for (pkgCache::PkgIterator I
= Cache
.PkgBegin(); I
.end() == false; I
++)
524 if (Cache
[I
].InstallVer
== 0)
527 for (pkgCache::DepIterator D
= Cache
[I
].InstVerIter(Cache
).DependsList(); D
.end() == false; D
++)
529 if (D
->Type
== pkgCache::Dep::Depends
|| D
->Type
== pkgCache::Dep::PreDepends
)
530 Scores
[D
.TargetPkg()->ID
]++;
534 // Copy the scores to advoid additive looping
535 SPtrArray
<signed short> OldScores
= new signed short[Size
];
536 memcpy(OldScores
,Scores
,sizeof(*Scores
)*Size
);
538 /* Now we cause 1 level of dependency inheritance, that is we add the
539 score of the packages that depend on the target Package. This
540 fortifies high scoring packages */
541 for (pkgCache::PkgIterator I
= Cache
.PkgBegin(); I
.end() == false; I
++)
543 if (Cache
[I
].InstallVer
== 0)
546 for (pkgCache::DepIterator D
= I
.RevDependsList(); D
.end() == false; D
++)
548 // Only do it for the install version
549 if ((pkgCache::Version
*)D
.ParentVer() != Cache
[D
.ParentPkg()].InstallVer
||
550 (D
->Type
!= pkgCache::Dep::Depends
&& D
->Type
!= pkgCache::Dep::PreDepends
))
553 Scores
[I
->ID
] += abs(OldScores
[D
.ParentPkg()->ID
]);
557 /* Now we propogate along provides. This makes the packages that
558 provide important packages extremely important */
559 for (pkgCache::PkgIterator I
= Cache
.PkgBegin(); I
.end() == false; I
++)
561 for (pkgCache::PrvIterator P
= I
.ProvidesList(); P
.end() == false; P
++)
563 // Only do it once per package
564 if ((pkgCache::Version
*)P
.OwnerVer() != Cache
[P
.OwnerPkg()].InstallVer
)
566 Scores
[P
.OwnerPkg()->ID
] += abs(Scores
[I
->ID
] - OldScores
[I
->ID
]);
570 /* Protected things are pushed really high up. This number should put them
571 ahead of everything */
572 for (pkgCache::PkgIterator I
= Cache
.PkgBegin(); I
.end() == false; I
++)
574 if ((Flags
[I
->ID
] & Protected
) != 0)
575 Scores
[I
->ID
] += 10000;
576 if ((I
->Flags
& pkgCache::Flag::Essential
) == pkgCache::Flag::Essential
)
577 Scores
[I
->ID
] += 5000;
581 // ProblemResolver::DoUpgrade - Attempt to upgrade this package /*{{{*/
582 // ---------------------------------------------------------------------
583 /* This goes through and tries to reinstall packages to make this package
585 bool pkgProblemResolver::DoUpgrade(pkgCache::PkgIterator Pkg
)
587 pkgDepCache::ActionGroup
group(Cache
);
589 if ((Flags
[Pkg
->ID
] & Upgradable
) == 0 || Cache
[Pkg
].Upgradable() == false)
591 if ((Flags
[Pkg
->ID
] & Protected
) == Protected
)
594 Flags
[Pkg
->ID
] &= ~Upgradable
;
596 bool WasKept
= Cache
[Pkg
].Keep();
597 Cache
.MarkInstall(Pkg
, false, 0, false);
599 // This must be a virtual package or something like that.
600 if (Cache
[Pkg
].InstVerIter(Cache
).end() == true)
603 // Isolate the problem dependency
605 for (pkgCache::DepIterator D
= Cache
[Pkg
].InstVerIter(Cache
).DependsList(); D
.end() == false;)
607 // Compute a single dependency element (glob or)
608 pkgCache::DepIterator Start
= D
;
609 pkgCache::DepIterator End
= D
;
610 unsigned char State
= 0;
611 for (bool LastOR
= true; D
.end() == false && LastOR
== true;)
614 LastOR
= (D
->CompareOp
& pkgCache::Dep::Or
) == pkgCache::Dep::Or
;
620 // We only worry about critical deps.
621 if (End
.IsCritical() != true)
624 // Iterate over all the members in the or group
628 if ((Cache
[End
] & pkgDepCache::DepGInstall
) == pkgDepCache::DepGInstall
)
631 // Do not change protected packages
632 PkgIterator P
= Start
.SmartTargetPkg();
633 if ((Flags
[P
->ID
] & Protected
) == Protected
)
636 clog
<< " Reinst Failed because of protected " << P
.Name() << endl
;
641 // Upgrade the package if the candidate version will fix the problem.
642 if ((Cache
[Start
] & pkgDepCache::DepCVer
) == pkgDepCache::DepCVer
)
644 if (DoUpgrade(P
) == false)
647 clog
<< " Reinst Failed because of " << P
.Name() << endl
;
658 /* We let the algorithm deal with conflicts on its next iteration,
659 it is much smarter than us */
660 if (Start
->Type
== pkgCache::Dep::Conflicts
||
661 Start
->Type
== pkgCache::Dep::DpkgBreaks
||
662 Start
->Type
== pkgCache::Dep::Obsoletes
)
666 clog
<< " Reinst Failed early because of " << Start
.TargetPkg().Name() << endl
;
679 // Undo our operations - it might be smart to undo everything this did..
683 Cache
.MarkKeep(Pkg
, false, false);
685 Cache
.MarkDelete(Pkg
);
690 clog
<< " Re-Instated " << Pkg
.Name() << endl
;
694 // ProblemResolver::Resolve - Run the resolution pass /*{{{*/
695 // ---------------------------------------------------------------------
696 /* This routines works by calculating a score for each package. The score
697 is derived by considering the package's priority and all reverse
698 dependents giving an integer that reflects the amount of breakage that
699 adjusting the package will inflict.
701 It goes from highest score to lowest and corrects all of the breaks by
702 keeping or removing the dependant packages. If that fails then it removes
703 the package itself and goes on. The routine should be able to intelligently
704 go from any broken state to a fixed state.
706 The BrokenFix flag enables a mode where the algorithm tries to
707 upgrade packages to advoid problems. */
708 bool pkgProblemResolver::Resolve(bool BrokenFix
)
710 pkgDepCache::ActionGroup
group(Cache
);
712 unsigned long Size
= Cache
.Head().PackageCount
;
714 // Record which packages are marked for install
719 for (pkgCache::PkgIterator I
= Cache
.PkgBegin(); I
.end() == false; I
++)
721 if (Cache
[I
].Install() == true)
722 Flags
[I
->ID
] |= PreInstalled
;
725 if (Cache
[I
].InstBroken() == true && BrokenFix
== true)
727 Cache
.MarkInstall(I
, false, 0, false);
728 if (Cache
[I
].Install() == true)
732 Flags
[I
->ID
] &= ~PreInstalled
;
734 Flags
[I
->ID
] |= Upgradable
;
737 while (Again
== true);
740 clog
<< "Starting" << endl
;
744 /* We have to order the packages so that the broken fixing pass
745 operates from highest score to lowest. This prevents problems when
746 high score packages cause the removal of lower score packages that
747 would cause the removal of even lower score packages. */
748 SPtrArray
<pkgCache::Package
*> PList
= new pkgCache::Package
*[Size
];
749 pkgCache::Package
**PEnd
= PList
;
750 for (pkgCache::PkgIterator I
= Cache
.PkgBegin(); I
.end() == false; I
++)
753 qsort(PList
,PEnd
- PList
,sizeof(*PList
),&ScoreSort
);
755 /* for (pkgCache::Package **K = PList; K != PEnd; K++)
756 if (Scores[(*K)->ID] != 0)
758 pkgCache::PkgIterator Pkg(Cache,*K);
759 clog << Scores[(*K)->ID] << ' ' << Pkg.Name() <<
760 ' ' << (pkgCache::Version *)Pkg.CurrentVer() << ' ' <<
761 Cache[Pkg].InstallVer << ' ' << Cache[Pkg].CandidateVer << endl;
765 clog
<< "Starting 2" << endl
;
767 /* Now consider all broken packages. For each broken package we either
768 remove the package or fix it's problem. We do this once, it should
769 not be possible for a loop to form (that is a < b < c and fixing b by
770 changing a breaks c) */
772 for (int Counter
= 0; Counter
!= 10 && Change
== true; Counter
++)
775 for (pkgCache::Package
**K
= PList
; K
!= PEnd
; K
++)
777 pkgCache::PkgIterator
I(Cache
,*K
);
779 /* We attempt to install this and see if any breaks result,
780 this takes care of some strange cases */
781 if (Cache
[I
].CandidateVer
!= Cache
[I
].InstallVer
&&
782 I
->CurrentVer
!= 0 && Cache
[I
].InstallVer
!= 0 &&
783 (Flags
[I
->ID
] & PreInstalled
) != 0 &&
784 (Flags
[I
->ID
] & Protected
) == 0 &&
785 (Flags
[I
->ID
] & ReInstateTried
) == 0)
788 clog
<< " Try to Re-Instate " << I
.Name() << endl
;
789 unsigned long OldBreaks
= Cache
.BrokenCount();
790 pkgCache::Version
*OldVer
= Cache
[I
].InstallVer
;
791 Flags
[I
->ID
] &= ReInstateTried
;
793 Cache
.MarkInstall(I
, false, 0, false);
794 if (Cache
[I
].InstBroken() == true ||
795 OldBreaks
< Cache
.BrokenCount())
800 Cache
.MarkKeep(I
, false, false);
804 clog
<< "Re-Instated " << I
.Name() << " (" << OldBreaks
<< " vs " << Cache
.BrokenCount() << ')' << endl
;
807 if (Cache
[I
].InstallVer
== 0 || Cache
[I
].InstBroken() == false)
811 clog
<< "Investigating " << I
.Name() << endl
;
813 // Isolate the problem dependency
814 PackageKill KillList
[100];
815 PackageKill
*LEnd
= KillList
;
817 pkgCache::DepIterator Start
;
818 pkgCache::DepIterator End
;
819 PackageKill
*OldEnd
= LEnd
;
821 enum {OrRemove
,OrKeep
} OrOp
= OrRemove
;
822 for (pkgCache::DepIterator D
= Cache
[I
].InstVerIter(Cache
).DependsList();
823 D
.end() == false || InOr
== true;)
825 // Compute a single dependency element (glob or)
831 if (OldEnd
== LEnd
&& OrOp
== OrRemove
)
833 if ((Flags
[I
->ID
] & Protected
) != Protected
)
836 clog
<< " Or group remove for " << I
.Name() << endl
;
841 if (OldEnd
== LEnd
&& OrOp
== OrKeep
)
844 clog
<< " Or group keep for " << I
.Name() << endl
;
845 Cache
.MarkKeep(I
, false, false);
850 /* We do an extra loop (as above) to finalize the or group
855 if (Start
.end() == true)
858 // We only worry about critical deps.
859 if (End
.IsCritical() != true)
868 // We only worry about critical deps.
869 if (Start
.IsCritical() != true)
874 if ((Cache
[End
] & pkgDepCache::DepGInstall
) == pkgDepCache::DepGInstall
)
881 clog
<< "Package " << I
.Name() << " has broken dep on " << Start
.TargetPkg().Name() << endl
;
883 /* Look across the version list. If there are no possible
884 targets then we keep the package and bail. This is necessary
885 if a package has a dep on another package that cant be found */
886 SPtrArray
<pkgCache::Version
*> VList
= Start
.AllTargets();
887 if (*VList
== 0 && (Flags
[I
->ID
] & Protected
) != Protected
&&
888 Start
->Type
!= pkgCache::Dep::Conflicts
&&
889 Start
->Type
!= pkgCache::Dep::DpkgBreaks
&&
890 Start
->Type
!= pkgCache::Dep::Obsoletes
&&
891 Cache
[I
].NowBroken() == false)
895 /* No keep choice because the keep being OK could be the
896 result of another element in the OR group! */
901 Cache
.MarkKeep(I
, false, false);
906 for (pkgCache::Version
**V
= VList
; *V
!= 0; V
++)
908 pkgCache::VerIterator
Ver(Cache
,*V
);
909 pkgCache::PkgIterator Pkg
= Ver
.ParentPkg();
912 clog
<< " Considering " << Pkg
.Name() << ' ' << (int)Scores
[Pkg
->ID
] <<
913 " as a solution to " << I
.Name() << ' ' << (int)Scores
[I
->ID
] << endl
;
915 /* Try to fix the package under consideration rather than
916 fiddle with the VList package */
917 if (Scores
[I
->ID
] <= Scores
[Pkg
->ID
] ||
918 ((Cache
[Start
] & pkgDepCache::DepNow
) == 0 &&
919 End
->Type
!= pkgCache::Dep::Conflicts
&&
920 End
->Type
!= pkgCache::Dep::DpkgBreaks
&&
921 End
->Type
!= pkgCache::Dep::Obsoletes
))
923 // Try a little harder to fix protected packages..
924 if ((Flags
[I
->ID
] & Protected
) == Protected
)
926 if (DoUpgrade(Pkg
) == true)
928 if (Scores
[Pkg
->ID
] > Scores
[I
->ID
])
929 Scores
[Pkg
->ID
] = Scores
[I
->ID
];
936 /* See if a keep will do, unless the package is protected,
937 then installing it will be necessary */
938 bool Installed
= Cache
[I
].Install();
939 Cache
.MarkKeep(I
, false, false);
940 if (Cache
[I
].InstBroken() == false)
942 // Unwind operation will be keep now
943 if (OrOp
== OrRemove
)
947 if (InOr
== true && Installed
== true)
948 Cache
.MarkInstall(I
, false, 0, false);
951 clog
<< " Holding Back " << I
.Name() << " rather than change " << Start
.TargetPkg().Name() << endl
;
955 if (BrokenFix
== false || DoUpgrade(I
) == false)
957 // Consider other options
961 clog
<< " Removing " << I
.Name() << " rather than change " << Start
.TargetPkg().Name() << endl
;
965 if (Scores
[Pkg
->ID
] > Scores
[I
->ID
])
966 Scores
[I
->ID
] = Scores
[Pkg
->ID
];
978 /* This is a conflicts, and the version we are looking
979 at is not the currently selected version of the
980 package, which means it is not necessary to
982 if (Cache
[Pkg
].InstallVer
!= Ver
&&
983 (Start
->Type
== pkgCache::Dep::Conflicts
||
984 Start
->Type
== pkgCache::Dep::Obsoletes
))
987 if (Start
->Type
== pkgCache::Dep::DpkgBreaks
)
989 // first, try upgradring the package, if that
990 // does not help, the breaks goes onto the
992 // FIXME: use DoUpgrade(Pkg) instead?
993 if (Cache
[End
] & pkgDepCache::DepGCVer
)
996 clog
<< " Upgrading " << Pkg
.Name() << " due to Breaks field in " << I
.Name() << endl
;
997 Cache
.MarkInstall(Pkg
, false, 0, false);
1002 // Skip adding to the kill list if it is protected
1003 if ((Flags
[Pkg
->ID
] & Protected
) != 0)
1007 clog
<< " Added " << Pkg
.Name() << " to the remove list" << endl
;
1013 if (Start
->Type
!= pkgCache::Dep::Conflicts
&&
1014 Start
->Type
!= pkgCache::Dep::Obsoletes
)
1019 // Hm, nothing can possibly satisify this dep. Nuke it.
1020 if (VList
[0] == 0 &&
1021 Start
->Type
!= pkgCache::Dep::Conflicts
&&
1022 Start
->Type
!= pkgCache::Dep::DpkgBreaks
&&
1023 Start
->Type
!= pkgCache::Dep::Obsoletes
&&
1024 (Flags
[I
->ID
] & Protected
) != Protected
)
1026 bool Installed
= Cache
[I
].Install();
1028 if (Cache
[I
].InstBroken() == false)
1030 // Unwind operation will be keep now
1031 if (OrOp
== OrRemove
)
1035 if (InOr
== true && Installed
== true)
1036 Cache
.MarkInstall(I
, false, 0, false);
1039 clog
<< " Holding Back " << I
.Name() << " because I can't find " << Start
.TargetPkg().Name() << endl
;
1044 clog
<< " Removing " << I
.Name() << " because I can't find " << Start
.TargetPkg().Name() << endl
;
1046 Cache
.MarkDelete(I
);
1061 // Apply the kill list now
1062 if (Cache
[I
].InstallVer
!= 0)
1064 for (PackageKill
*J
= KillList
; J
!= LEnd
; J
++)
1067 if ((Cache
[J
->Dep
] & pkgDepCache::DepGNow
) == 0)
1069 if (J
->Dep
->Type
== pkgCache::Dep::Conflicts
||
1070 J
->Dep
->Type
== pkgCache::Dep::DpkgBreaks
||
1071 J
->Dep
->Type
== pkgCache::Dep::Obsoletes
)
1074 clog
<< " Fixing " << I
.Name() << " via remove of " << J
->Pkg
.Name() << endl
;
1075 Cache
.MarkDelete(J
->Pkg
);
1081 clog
<< " Fixing " << I
.Name() << " via keep of " << J
->Pkg
.Name() << endl
;
1082 Cache
.MarkKeep(J
->Pkg
, false, false);
1087 if (Scores
[I
->ID
] > Scores
[J
->Pkg
->ID
])
1088 Scores
[J
->Pkg
->ID
] = Scores
[I
->ID
];
1096 clog
<< "Done" << endl
;
1098 if (Cache
.BrokenCount() != 0)
1100 // See if this is the result of a hold
1101 pkgCache::PkgIterator I
= Cache
.PkgBegin();
1102 for (;I
.end() != true; I
++)
1104 if (Cache
[I
].InstBroken() == false)
1106 if ((Flags
[I
->ID
] & Protected
) != Protected
)
1107 return _error
->Error(_("Error, pkgProblemResolver::Resolve generated breaks, this may be caused by held packages."));
1109 return _error
->Error(_("Unable to correct problems, you have held broken packages."));
1112 // set the auto-flags (mvo: I'm not sure if we _really_ need this, but
1114 pkgCache::PkgIterator I
= Cache
.PkgBegin();
1115 for (;I
.end() != true; I
++) {
1116 if (Cache
[I
].NewInstall() && !(Flags
[I
->ID
] & PreInstalled
)) {
1117 if(_config
->FindI("Debug::pkgAutoRemove",false)) {
1118 std::clog
<< "Resolve installed new pkg: " << I
.Name()
1119 << " (now marking it as auto)" << std::endl
;
1121 Cache
[I
].Flags
|= pkgCache::Flag::Auto
;
1129 // ProblemResolver::ResolveByKeep - Resolve problems using keep /*{{{*/
1130 // ---------------------------------------------------------------------
1131 /* This is the work horse of the soft upgrade routine. It is very gental
1132 in that it does not install or remove any packages. It is assumed that the
1133 system was non-broken previously. */
1134 bool pkgProblemResolver::ResolveByKeep()
1136 pkgDepCache::ActionGroup
group(Cache
);
1138 unsigned long Size
= Cache
.Head().PackageCount
;
1141 clog
<< "Entering ResolveByKeep" << endl
;
1145 /* We have to order the packages so that the broken fixing pass
1146 operates from highest score to lowest. This prevents problems when
1147 high score packages cause the removal of lower score packages that
1148 would cause the removal of even lower score packages. */
1149 pkgCache::Package
**PList
= new pkgCache::Package
*[Size
];
1150 pkgCache::Package
**PEnd
= PList
;
1151 for (pkgCache::PkgIterator I
= Cache
.PkgBegin(); I
.end() == false; I
++)
1154 qsort(PList
,PEnd
- PList
,sizeof(*PList
),&ScoreSort
);
1156 // Consider each broken package
1157 pkgCache::Package
**LastStop
= 0;
1158 for (pkgCache::Package
**K
= PList
; K
!= PEnd
; K
++)
1160 pkgCache::PkgIterator
I(Cache
,*K
);
1162 if (Cache
[I
].InstallVer
== 0 || Cache
[I
].InstBroken() == false)
1165 /* Keep the package. If this works then great, otherwise we have
1166 to be significantly more agressive and manipulate its dependencies */
1167 if ((Flags
[I
->ID
] & Protected
) == 0)
1170 clog
<< "Keeping package " << I
.Name() << endl
;
1171 Cache
.MarkKeep(I
, false, false);
1172 if (Cache
[I
].InstBroken() == false)
1179 // Isolate the problem dependencies
1180 for (pkgCache::DepIterator D
= Cache
[I
].InstVerIter(Cache
).DependsList(); D
.end() == false;)
1184 D
.GlobOr(Start
,End
);
1186 // We only worry about critical deps.
1187 if (End
.IsCritical() != true)
1191 if ((Cache
[End
] & pkgDepCache::DepGInstall
) == pkgDepCache::DepGInstall
)
1194 /* Hm, the group is broken.. I suppose the best thing to do is to
1195 is to try every combination of keep/not-keep for the set, but thats
1196 slow, and this never happens, just be conservative and assume the
1197 list of ors is in preference and keep till it starts to work. */
1201 clog
<< "Package " << I
.Name() << " has broken dep on " << Start
.TargetPkg().Name() << endl
;
1203 // Look at all the possible provides on this package
1204 SPtrArray
<pkgCache::Version
*> VList
= Start
.AllTargets();
1205 for (pkgCache::Version
**V
= VList
; *V
!= 0; V
++)
1207 pkgCache::VerIterator
Ver(Cache
,*V
);
1208 pkgCache::PkgIterator Pkg
= Ver
.ParentPkg();
1210 // It is not keepable
1211 if (Cache
[Pkg
].InstallVer
== 0 ||
1212 Pkg
->CurrentVer
== 0)
1215 if ((Flags
[I
->ID
] & Protected
) == 0)
1218 clog
<< " Keeping Package " << Pkg
.Name() << " due to dep" << endl
;
1219 Cache
.MarkKeep(Pkg
, false, false);
1222 if (Cache
[I
].InstBroken() == false)
1226 if (Cache
[I
].InstBroken() == false)
1234 if (Cache
[I
].InstBroken() == false)
1238 if (Cache
[I
].InstBroken() == true)
1243 return _error
->Error("Internal Error, pkgProblemResolver::ResolveByKeep is looping on package %s.",I
.Name());
1251 // ProblemResolver::InstallProtect - Install all protected packages /*{{{*/
1252 // ---------------------------------------------------------------------
1253 /* This is used to make sure protected packages are installed */
1254 void pkgProblemResolver::InstallProtect()
1256 pkgDepCache::ActionGroup
group(Cache
);
1258 for (pkgCache::PkgIterator I
= Cache
.PkgBegin(); I
.end() == false; I
++)
1260 if ((Flags
[I
->ID
] & Protected
) == Protected
)
1262 if ((Flags
[I
->ID
] & ToRemove
) == ToRemove
)
1263 Cache
.MarkDelete(I
);
1266 // preserve the information whether the package was auto
1267 // or manually installed
1268 bool autoInst
= (Cache
[I
].Flags
& pkgCache::Flag::Auto
);
1269 Cache
.MarkInstall(I
, false, 0, !autoInst
);
1276 // PrioSortList - Sort a list of versions by priority /*{{{*/
1277 // ---------------------------------------------------------------------
1278 /* This is ment to be used in conjunction with AllTargets to get a list
1279 of versions ordered by preference. */
1280 static pkgCache
*PrioCache
;
1281 static int PrioComp(const void *A
,const void *B
)
1283 pkgCache::VerIterator
L(*PrioCache
,*(pkgCache::Version
**)A
);
1284 pkgCache::VerIterator
R(*PrioCache
,*(pkgCache::Version
**)B
);
1286 if ((L
.ParentPkg()->Flags
& pkgCache::Flag::Essential
) == pkgCache::Flag::Essential
&&
1287 (R
.ParentPkg()->Flags
& pkgCache::Flag::Essential
) != pkgCache::Flag::Essential
)
1289 if ((L
.ParentPkg()->Flags
& pkgCache::Flag::Essential
) != pkgCache::Flag::Essential
&&
1290 (R
.ParentPkg()->Flags
& pkgCache::Flag::Essential
) == pkgCache::Flag::Essential
)
1293 if (L
->Priority
!= R
->Priority
)
1294 return R
->Priority
- L
->Priority
;
1295 return strcmp(L
.ParentPkg().Name(),R
.ParentPkg().Name());
1297 void pkgPrioSortList(pkgCache
&Cache
,pkgCache::Version
**List
)
1299 unsigned long Count
= 0;
1301 for (pkgCache::Version
**I
= List
; *I
!= 0; I
++)
1303 qsort(List
,Count
,sizeof(*List
),PrioComp
);
1307 // CacheFile::ListUpdate - update the cache files /*{{{*/
1308 // ---------------------------------------------------------------------
1309 /* This is a simple wrapper to update the cache. it will fetch stuff
1310 * from the network (or any other sources defined in sources.list)
1312 bool ListUpdate(pkgAcquireStatus
&Stat
,
1313 pkgSourceList
&List
,
1316 pkgAcquire::RunResult res
;
1317 pkgAcquire
Fetcher(&Stat
);
1319 // Populate it with the source selection
1320 if (List
.GetIndexes(&Fetcher
) == false)
1324 RunScripts("APT::Update::Pre-Invoke");
1328 res
= Fetcher
.Run(PulseInterval
);
1330 res
= Fetcher
.Run();
1332 if (res
== pkgAcquire::Failed
)
1335 bool Failed
= false;
1336 bool TransientNetworkFailure
= false;
1337 for (pkgAcquire::ItemIterator I
= Fetcher
.ItemsBegin();
1338 I
!= Fetcher
.ItemsEnd(); I
++)
1340 if ((*I
)->Status
== pkgAcquire::Item::StatDone
)
1345 ::URI
uri((*I
)->DescURI());
1347 uri
.Password
.clear();
1348 string descUri
= string(uri
);
1349 _error
->Warning(_("Failed to fetch %s %s\n"), descUri
.c_str(),
1350 (*I
)->ErrorText
.c_str());
1352 if ((*I
)->Status
== pkgAcquire::Item::StatTransientNetworkError
)
1354 TransientNetworkFailure
= true;
1361 // Clean out any old list files
1362 // Keep "APT::Get::List-Cleanup" name for compatibility, but
1363 // this is really a global option for the APT library now
1364 if (!TransientNetworkFailure
&& !Failed
&&
1365 (_config
->FindB("APT::Get::List-Cleanup",true) == true &&
1366 _config
->FindB("APT::List-Cleanup",true) == true))
1368 if (Fetcher
.Clean(_config
->FindDir("Dir::State::lists")) == false ||
1369 Fetcher
.Clean(_config
->FindDir("Dir::State::lists") + "partial/") == false)
1370 // something went wrong with the clean
1374 if (TransientNetworkFailure
== true)
1375 _error
->Warning(_("Some index files failed to download, they have been ignored, or old ones used instead."));
1376 else if (Failed
== true)
1377 return _error
->Error(_("Some index files failed to download, they have been ignored, or old ones used instead."));
1380 // Run the success scripts if all was fine
1381 if(!TransientNetworkFailure
&& !Failed
)
1382 RunScripts("APT::Update::Post-Invoke-Success");
1384 // Run the other scripts
1385 RunScripts("APT::Update::Post-Invoke");