]>
git.saurik.com Git - apt.git/blob - apt-pkg/packagemanager.cc
1 // -*- mode: cpp; mode: fold -*-
3 // $Id: packagemanager.cc,v 1.30 2003/04/27 03:04:15 doogie Exp $
4 /* ######################################################################
6 Package Manager - Abstacts the package manager
8 More work is needed in the area of transitioning provides, ie exim
9 replacing smail. This can cause interesing side effects.
11 Other cases involving conflicts+replaces should be tested.
13 ##################################################################### */
15 // Include Files /*{{{*/
16 #include <apt-pkg/packagemanager.h>
17 #include <apt-pkg/orderlist.h>
18 #include <apt-pkg/depcache.h>
19 #include <apt-pkg/error.h>
20 #include <apt-pkg/version.h>
21 #include <apt-pkg/acquire-item.h>
22 #include <apt-pkg/algorithms.h>
23 #include <apt-pkg/configuration.h>
24 #include <apt-pkg/sptr.h>
32 // PM::PackageManager - Constructor /*{{{*/
33 // ---------------------------------------------------------------------
35 pkgPackageManager::pkgPackageManager(pkgDepCache
*pCache
) : Cache(*pCache
)
37 FileNames
= new string
[Cache
.Head().PackageCount
];
39 Debug
= _config
->FindB("Debug::pkgPackageManager",false);
42 // PM::PackageManager - Destructor /*{{{*/
43 // ---------------------------------------------------------------------
45 pkgPackageManager::~pkgPackageManager()
51 // PM::GetArchives - Queue the archives for download /*{{{*/
52 // ---------------------------------------------------------------------
54 bool pkgPackageManager::GetArchives(pkgAcquire
*Owner
,pkgSourceList
*Sources
,
57 if (CreateOrderList() == false)
61 _config
->FindB("PackageManager::UnpackAll",true) ?
62 List
->OrderUnpack() : List
->OrderCritical();
63 if (ordering
== false)
64 return _error
->Error("Internal ordering error");
66 for (pkgOrderList::iterator I
= List
->begin(); I
!= List
->end(); I
++)
68 PkgIterator
Pkg(Cache
,*I
);
69 FileNames
[Pkg
->ID
] = string();
71 // Skip packages to erase
72 if (Cache
[Pkg
].Delete() == true)
75 // Skip Packages that need configure only.
76 if (Pkg
.State() == pkgCache::PkgIterator::NeedsConfigure
&&
77 Cache
[Pkg
].Keep() == true)
80 // Skip already processed packages
81 if (List
->IsNow(Pkg
) == false)
84 new pkgAcqArchive(Owner
,Sources
,Recs
,Cache
[Pkg
].InstVerIter(Cache
),
91 // PM::FixMissing - Keep all missing packages /*{{{*/
92 // ---------------------------------------------------------------------
93 /* This is called to correct the installation when packages could not
95 bool pkgPackageManager::FixMissing()
97 pkgDepCache::ActionGroup
group(Cache
);
98 pkgProblemResolver
Resolve(&Cache
);
99 List
->SetFileList(FileNames
);
102 for (PkgIterator I
= Cache
.PkgBegin(); I
.end() == false; I
++)
104 if (List
->IsMissing(I
) == false)
107 // Okay, this file is missing and we need it. Mark it for keep
109 Cache
.MarkKeep(I
, false, false);
112 // We have to empty the list otherwise it will not have the new changes
119 // Now downgrade everything that is broken
120 return Resolve
.ResolveByKeep() == true && Cache
.BrokenCount() == 0;
123 // PM::ImmediateAdd - Add the immediate flag recursivly /*{{{*/
124 // ---------------------------------------------------------------------
125 /* This adds the immediate flag to the pkg and recursively to the
128 void pkgPackageManager::ImmediateAdd(PkgIterator I
, bool UseInstallVer
)
134 if(Cache
[I
].InstallVer
== 0)
136 D
= Cache
[I
].InstVerIter(Cache
).DependsList();
138 if (I
->CurrentVer
== 0)
140 D
= I
.CurrentVer().DependsList();
143 for ( /* nothing */ ; D
.end() == false; D
++)
144 if (D
->Type
== pkgCache::Dep::Depends
|| D
->Type
== pkgCache::Dep::PreDepends
)
146 if(!List
->IsFlag(D
.TargetPkg(), pkgOrderList::Immediate
))
149 clog
<< "ImmediateAdd(): Adding Immediate flag to " << I
.Name() << endl
;
150 List
->Flag(D
.TargetPkg(),pkgOrderList::Immediate
);
151 ImmediateAdd(D
.TargetPkg(), UseInstallVer
);
157 // PM::CreateOrderList - Create the ordering class /*{{{*/
158 // ---------------------------------------------------------------------
159 /* This populates the ordering list with all the packages that are
161 bool pkgPackageManager::CreateOrderList()
167 List
= new pkgOrderList(&Cache
);
169 static bool const NoImmConfigure
= !_config
->FindB("APT::Immediate-Configure",true);
171 // Generate the list of affected packages and sort it
172 for (PkgIterator I
= Cache
.PkgBegin(); I
.end() == false; I
++)
174 // Ignore no-version packages
175 if (I
->VersionList
== 0)
178 // Mark the package and its dependends for immediate configuration
179 if (((I
->Flags
& pkgCache::Flag::Essential
) == pkgCache::Flag::Essential
||
180 (I
->Flags
& pkgCache::Flag::Important
) == pkgCache::Flag::Important
) &&
181 NoImmConfigure
== false)
184 clog
<< "CreateOrderList(): Adding Immediate flag for " << I
.Name() << endl
;
185 List
->Flag(I
,pkgOrderList::Immediate
);
187 // Look for other install packages to make immediate configurea
188 ImmediateAdd(I
, true);
190 // And again with the current version.
191 ImmediateAdd(I
, false);
195 if ((Cache
[I
].Keep() == true ||
196 Cache
[I
].InstVerIter(Cache
) == I
.CurrentVer()) &&
197 I
.State() == pkgCache::PkgIterator::NeedsNothing
&&
198 (Cache
[I
].iFlags
& pkgDepCache::ReInstall
) != pkgDepCache::ReInstall
&&
199 (I
.Purge() != false || Cache
[I
].Mode
!= pkgDepCache::ModeDelete
||
200 (Cache
[I
].iFlags
& pkgDepCache::Purge
) != pkgDepCache::Purge
))
203 // Append it to the list
210 // PM::DepAlwaysTrue - Returns true if this dep is irrelevent /*{{{*/
211 // ---------------------------------------------------------------------
212 /* The restriction on provides is to eliminate the case when provides
213 are transitioning between valid states [ie exim to smail] */
214 bool pkgPackageManager::DepAlwaysTrue(DepIterator D
)
216 if (D
.TargetPkg()->ProvidesList
!= 0)
219 if ((Cache
[D
] & pkgDepCache::DepInstall
) != 0 &&
220 (Cache
[D
] & pkgDepCache::DepNow
) != 0)
225 // PM::CheckRConflicts - Look for reverse conflicts /*{{{*/
226 // ---------------------------------------------------------------------
227 /* This looks over the reverses for a conflicts line that needs early
229 bool pkgPackageManager::CheckRConflicts(PkgIterator Pkg
,DepIterator D
,
232 for (;D
.end() == false; D
++)
234 if (D
->Type
!= pkgCache::Dep::Conflicts
&&
235 D
->Type
!= pkgCache::Dep::Obsoletes
)
238 // The package hasnt been changed
239 if (List
->IsNow(Pkg
) == false)
242 // Ignore self conflicts, ignore conflicts from irrelevent versions
243 if (D
.ParentPkg() == Pkg
|| D
.ParentVer() != D
.ParentPkg().CurrentVer())
246 if (Cache
.VS().CheckDep(Ver
,D
->CompareOp
,D
.TargetVer()) == false)
249 if (EarlyRemove(D
.ParentPkg()) == false)
250 return _error
->Error("Reverse conflicts early remove for package '%s' failed",
256 // PM::ConfigureAll - Run the all out configuration /*{{{*/
257 // ---------------------------------------------------------------------
258 /* This configures every package. It is assumed they are all unpacked and
259 that the final configuration is valid. */
260 bool pkgPackageManager::ConfigureAll()
262 pkgOrderList
OList(&Cache
);
264 // Populate the order list
265 for (pkgOrderList::iterator I
= List
->begin(); I
!= List
->end(); I
++)
266 if (List
->IsFlag(pkgCache::PkgIterator(Cache
,*I
),
267 pkgOrderList::UnPacked
) == true)
270 if (OList
.OrderConfigure() == false)
273 std::string
const conf
= _config
->Find("PackageManager::Configure","all");
274 bool const ConfigurePkgs
= (conf
== "all");
276 // Perform the configuring
277 for (pkgOrderList::iterator I
= OList
.begin(); I
!= OList
.end(); I
++)
279 PkgIterator
Pkg(Cache
,*I
);
281 if (ConfigurePkgs
== true && Configure(Pkg
) == false)
284 List
->Flag(Pkg
,pkgOrderList::Configured
,pkgOrderList::States
);
290 // PM::SmartConfigure - Perform immediate configuration of the pkg /*{{{*/
291 // ---------------------------------------------------------------------
292 /* This routine scheduals the configuration of the given package and all
293 of it's dependents. */
294 bool pkgPackageManager::SmartConfigure(PkgIterator Pkg
)
296 pkgOrderList
OList(&Cache
);
298 if (DepAdd(OList
,Pkg
) == false)
301 static std::string
const conf
= _config
->Find("PackageManager::Configure","all");
302 static bool const ConfigurePkgs
= (conf
== "all" || conf
== "smart");
304 if (ConfigurePkgs
== true)
305 if (OList
.OrderConfigure() == false)
308 // Perform the configuring
309 for (pkgOrderList::iterator I
= OList
.begin(); I
!= OList
.end(); I
++)
311 PkgIterator
Pkg(Cache
,*I
);
313 if (ConfigurePkgs
== true && Configure(Pkg
) == false)
316 List
->Flag(Pkg
,pkgOrderList::Configured
,pkgOrderList::States
);
320 if (List
->IsFlag(Pkg
,pkgOrderList::Configured
) == false)
321 return _error
->Error("Internal error, could not immediate configure %s",Pkg
.Name());
326 // PM::DepAdd - Add all dependents to the oder list /*{{{*/
327 // ---------------------------------------------------------------------
328 /* This recursively adds all dependents to the order list */
329 bool pkgPackageManager::DepAdd(pkgOrderList
&OList
,PkgIterator Pkg
,int Depth
)
331 if (OList
.IsFlag(Pkg
,pkgOrderList::Added
) == true)
333 if (List
->IsFlag(Pkg
,pkgOrderList::Configured
) == true)
335 if (List
->IsFlag(Pkg
,pkgOrderList::UnPacked
) == false)
338 // Put the package on the list
339 OList
.push_back(Pkg
);
340 OList
.Flag(Pkg
,pkgOrderList::Added
);
343 // Check the dependencies to see if they are all satisfied.
345 for (DepIterator D
= Cache
[Pkg
].InstVerIter(Cache
).DependsList(); D
.end() == false;)
347 if (D
->Type
!= pkgCache::Dep::Depends
&& D
->Type
!= pkgCache::Dep::PreDepends
)
355 for (bool LastOR
= true; D
.end() == false && LastOR
== true; D
++)
357 LastOR
= (D
->CompareOp
& pkgCache::Dep::Or
) == pkgCache::Dep::Or
;
362 SPtrArray
<Version
*> VList
= D
.AllTargets();
363 for (Version
**I
= VList
; *I
!= 0 && Bad
== true; I
++)
365 VerIterator
Ver(Cache
,*I
);
366 PkgIterator Pkg
= Ver
.ParentPkg();
368 // See if the current version is ok
369 if (Pkg
.CurrentVer() == Ver
&& List
->IsNow(Pkg
) == true &&
370 Pkg
.State() == PkgIterator::NeedsNothing
)
376 // Not the install version
377 if (Cache
[Pkg
].InstallVer
!= *I
||
378 (Cache
[Pkg
].Keep() == true && Pkg
.State() == PkgIterator::NeedsNothing
))
381 if (List
->IsFlag(Pkg
,pkgOrderList::UnPacked
) == true)
382 Bad
= !DepAdd(OList
,Pkg
,Depth
);
383 if (List
->IsFlag(Pkg
,pkgOrderList::Configured
) == true)
390 OList
.Flag(Pkg
,0,pkgOrderList::Added
);
401 // PM::EarlyRemove - Perform removal of packages before their time /*{{{*/
402 // ---------------------------------------------------------------------
403 /* This is called to deal with conflicts arising from unpacking */
404 bool pkgPackageManager::EarlyRemove(PkgIterator Pkg
)
406 if (List
->IsNow(Pkg
) == false)
409 // Already removed it
410 if (List
->IsFlag(Pkg
,pkgOrderList::Removed
) == true)
413 // Woops, it will not be re-installed!
414 if (List
->IsFlag(Pkg
,pkgOrderList::InList
) == false)
417 // Essential packages get special treatment
418 bool IsEssential
= false;
419 if ((Pkg
->Flags
& pkgCache::Flag::Essential
) != 0)
422 /* Check for packages that are the dependents of essential packages and
424 if (Pkg
->CurrentVer
!= 0)
426 for (DepIterator D
= Pkg
.RevDependsList(); D
.end() == false &&
427 IsEssential
== false; D
++)
428 if (D
->Type
== pkgCache::Dep::Depends
|| D
->Type
== pkgCache::Dep::PreDepends
)
429 if ((D
.ParentPkg()->Flags
& pkgCache::Flag::Essential
) != 0)
433 if (IsEssential
== true)
435 if (_config
->FindB("APT::Force-LoopBreak",false) == false)
436 return _error
->Error(_("This installation run will require temporarily "
437 "removing the essential package %s due to a "
438 "Conflicts/Pre-Depends loop. This is often bad, "
439 "but if you really want to do it, activate the "
440 "APT::Force-LoopBreak option."),Pkg
.Name());
443 bool Res
= SmartRemove(Pkg
);
444 if (Cache
[Pkg
].Delete() == false)
445 List
->Flag(Pkg
,pkgOrderList::Removed
,pkgOrderList::States
);
450 // PM::SmartRemove - Removal Helper /*{{{*/
451 // ---------------------------------------------------------------------
453 bool pkgPackageManager::SmartRemove(PkgIterator Pkg
)
455 if (List
->IsNow(Pkg
) == false)
458 List
->Flag(Pkg
,pkgOrderList::Configured
,pkgOrderList::States
);
459 return Remove(Pkg
,(Cache
[Pkg
].iFlags
& pkgDepCache::Purge
) == pkgDepCache::Purge
);
462 // PM::SmartUnPack - Install helper /*{{{*/
463 // ---------------------------------------------------------------------
464 /* This performs the task of handling pre-depends. */
465 bool pkgPackageManager::SmartUnPack(PkgIterator Pkg
)
467 // Check if it is already unpacked
468 if (Pkg
.State() == pkgCache::PkgIterator::NeedsConfigure
&&
469 Cache
[Pkg
].Keep() == true)
471 List
->Flag(Pkg
,pkgOrderList::UnPacked
,pkgOrderList::States
);
472 if (List
->IsFlag(Pkg
,pkgOrderList::Immediate
) == true)
473 if (SmartConfigure(Pkg
) == false)
474 return _error
->Error("Internal Error, Could not perform immediate configuration (1) on %s",Pkg
.Name());
478 /* See if this packages install version has any predependencies
479 that are not met by 'now' packages. */
480 for (DepIterator D
= Cache
[Pkg
].InstVerIter(Cache
).DependsList();
483 // Compute a single dependency element (glob or)
484 pkgCache::DepIterator Start
;
485 pkgCache::DepIterator End
;
488 while (End
->Type
== pkgCache::Dep::PreDepends
)
490 // Look for possible ok targets.
491 SPtrArray
<Version
*> VList
= Start
.AllTargets();
493 for (Version
**I
= VList
; *I
!= 0 && Bad
== true; I
++)
495 VerIterator
Ver(Cache
,*I
);
496 PkgIterator Pkg
= Ver
.ParentPkg();
498 // See if the current version is ok
499 if (Pkg
.CurrentVer() == Ver
&& List
->IsNow(Pkg
) == true &&
500 Pkg
.State() == PkgIterator::NeedsNothing
)
507 // Look for something that could be configured.
508 for (Version
**I
= VList
; *I
!= 0 && Bad
== true; I
++)
510 VerIterator
Ver(Cache
,*I
);
511 PkgIterator Pkg
= Ver
.ParentPkg();
513 // Not the install version
514 if (Cache
[Pkg
].InstallVer
!= *I
||
515 (Cache
[Pkg
].Keep() == true && Pkg
.State() == PkgIterator::NeedsNothing
))
518 Bad
= !SmartConfigure(Pkg
);
521 /* If this or element did not match then continue on to the
522 next or element until a matching element is found */
525 // This triggers if someone make a pre-depends/depend loop.
527 return _error
->Error("Couldn't configure pre-depend %s for %s, "
528 "probably a dependency cycle.",
529 End
.TargetPkg().Name(),Pkg
.Name());
536 if (End
->Type
== pkgCache::Dep::Conflicts
||
537 End
->Type
== pkgCache::Dep::Obsoletes
)
539 /* Look for conflicts. Two packages that are both in the install
540 state cannot conflict so we don't check.. */
541 SPtrArray
<Version
*> VList
= End
.AllTargets();
542 for (Version
**I
= VList
; *I
!= 0; I
++)
544 VerIterator
Ver(Cache
,*I
);
545 PkgIterator Pkg
= Ver
.ParentPkg();
547 // See if the current version is conflicting
548 if (Pkg
.CurrentVer() == Ver
&& List
->IsNow(Pkg
) == true)
550 if (EarlyRemove(Pkg
) == false)
551 return _error
->Error("Internal Error, Could not early remove %s",Pkg
.Name());
557 // Check for reverse conflicts.
558 if (CheckRConflicts(Pkg
,Pkg
.RevDependsList(),
559 Cache
[Pkg
].InstVerIter(Cache
).VerStr()) == false)
562 for (PrvIterator P
= Cache
[Pkg
].InstVerIter(Cache
).ProvidesList();
563 P
.end() == false; P
++)
564 CheckRConflicts(Pkg
,P
.ParentPkg().RevDependsList(),P
.ProvideVersion());
566 if (Install(Pkg
,FileNames
[Pkg
->ID
]) == false)
569 List
->Flag(Pkg
,pkgOrderList::UnPacked
,pkgOrderList::States
);
571 // Perform immedate configuration of the package.
572 if (List
->IsFlag(Pkg
,pkgOrderList::Immediate
) == true)
573 if (SmartConfigure(Pkg
) == false)
574 return _error
->Error("Internal Error, Could not perform immediate configuration (2) on %s",Pkg
.Name());
579 // PM::OrderInstall - Installation ordering routine /*{{{*/
580 // ---------------------------------------------------------------------
582 pkgPackageManager::OrderResult
pkgPackageManager::OrderInstall()
584 if (CreateOrderList() == false)
590 clog
<< "Beginning to order" << endl
;
592 bool const ordering
=
593 _config
->FindB("PackageManager::UnpackAll",true) ?
594 List
->OrderUnpack(FileNames
) : List
->OrderCritical();
595 if (ordering
== false)
597 _error
->Error("Internal ordering error");
602 clog
<< "Done ordering" << endl
;
604 bool DoneSomething
= false;
605 for (pkgOrderList::iterator I
= List
->begin(); I
!= List
->end(); I
++)
607 PkgIterator
Pkg(Cache
,*I
);
609 if (List
->IsNow(Pkg
) == false)
612 clog
<< "Skipping already done " << Pkg
.Name() << endl
;
616 if (List
->IsMissing(Pkg
) == true)
619 clog
<< "Sequence completed at " << Pkg
.Name() << endl
;
620 if (DoneSomething
== false)
622 _error
->Error("Internal Error, ordering was unable to handle the media swap");
629 if (Cache
[Pkg
].Keep() == true &&
630 Pkg
.State() == pkgCache::PkgIterator::NeedsNothing
&&
631 (Cache
[Pkg
].iFlags
& pkgDepCache::ReInstall
) != pkgDepCache::ReInstall
)
633 _error
->Error("Internal Error, trying to manipulate a kept package (%s)",Pkg
.Name());
637 // Perform a delete or an install
638 if (Cache
[Pkg
].Delete() == true)
640 if (SmartRemove(Pkg
) == false)
644 if (SmartUnPack(Pkg
) == false)
646 DoneSomething
= true;
649 // Final run through the configure phase
650 if (ConfigureAll() == false)
654 for (pkgOrderList::iterator I
= List
->begin(); I
!= List
->end(); I
++)
656 if (List
->IsFlag(*I
,pkgOrderList::Configured
) == false)
658 _error
->Error("Internal error, packages left unconfigured. %s",
659 PkgIterator(Cache
,*I
).Name());
667 // PM::DoInstallPostFork - Does install part that happens after the fork /*{{{*/
668 // ---------------------------------------------------------------------
669 pkgPackageManager::OrderResult
670 pkgPackageManager::DoInstallPostFork(int statusFd
)
673 // FIXME: use SetCloseExec here once it taught about throwing
674 // exceptions instead of doing _exit(100) on failure
675 fcntl(statusFd
,F_SETFD
,FD_CLOEXEC
);
676 bool goResult
= Go(statusFd
);
677 if(goResult
== false)
683 // PM::DoInstall - Does the installation /*{{{*/
684 // ---------------------------------------------------------------------
685 /* This uses the filenames in FileNames and the information in the
686 DepCache to perform the installation of packages.*/
687 pkgPackageManager::OrderResult
pkgPackageManager::DoInstall(int statusFd
)
689 if(DoInstallPreFork() == Failed
)
692 return DoInstallPostFork(statusFd
);