]>
git.saurik.com Git - apt.git/blob - apt-pkg/packagemanager.cc
1 // -*- mode: cpp; mode: fold -*-
3 // $Id: packagemanager.cc,v 1.19 1999/08/03 05:19:41 jgg 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 /*{{{*/
17 #pragma implementation "apt-pkg/packagemanager.h"
19 #include <apt-pkg/packagemanager.h>
20 #include <apt-pkg/orderlist.h>
21 #include <apt-pkg/depcache.h>
22 #include <apt-pkg/error.h>
23 #include <apt-pkg/version.h>
24 #include <apt-pkg/acquire-item.h>
25 #include <apt-pkg/algorithms.h>
26 #include <apt-pkg/configuration.h>
29 // PM::PackageManager - Constructor /*{{{*/
30 // ---------------------------------------------------------------------
32 pkgPackageManager::pkgPackageManager(pkgDepCache
&Cache
) : Cache(Cache
)
34 FileNames
= new string
[Cache
.Head().PackageCount
];
36 Debug
= _config
->FindB("Debug::pkgPackageManager",false);
39 // PM::PackageManager - Destructor /*{{{*/
40 // ---------------------------------------------------------------------
42 pkgPackageManager::~pkgPackageManager()
48 // PM::GetArchives - Queue the archives for download /*{{{*/
49 // ---------------------------------------------------------------------
51 bool pkgPackageManager::GetArchives(pkgAcquire
*Owner
,pkgSourceList
*Sources
,
54 if (CreateOrderList() == false)
57 if (List
->OrderUnpack() == false)
58 return _error
->Error("Internal ordering error");
60 for (pkgOrderList::iterator I
= List
->begin(); I
!= List
->end(); I
++)
62 PkgIterator
Pkg(Cache
,*I
);
63 FileNames
[Pkg
->ID
] = string();
65 // Skip packages to erase
66 if (Cache
[Pkg
].Delete() == true)
69 // Skip Packages that need configure only.
70 if (Pkg
.State() == pkgCache::PkgIterator::NeedsConfigure
&&
71 Cache
[Pkg
].Keep() == true)
74 // Skip already processed packages
75 if (List
->IsNow(Pkg
) == false)
78 new pkgAcqArchive(Owner
,Sources
,Recs
,Cache
[Pkg
].InstVerIter(Cache
),
85 // PM::FixMissing - Keep all missing packages /*{{{*/
86 // ---------------------------------------------------------------------
87 /* This is called to correct the installation when packages could not
89 bool pkgPackageManager::FixMissing()
91 pkgProblemResolver
Resolve(Cache
);
92 List
->SetFileList(FileNames
);
95 for (PkgIterator I
= Cache
.PkgBegin(); I
.end() == false; I
++)
97 if (List
->IsMissing(I
) == false)
100 // Okay, this file is missing and we need it. Mark it for keep
105 // We have to empty the list otherwise it will not have the new changes
112 // Now downgrade everything that is broken
113 return Resolve
.ResolveByKeep() == true && Cache
.BrokenCount() == 0;
117 // PM::CreateOrderList - Create the ordering class /*{{{*/
118 // ---------------------------------------------------------------------
119 /* This populates the ordering list with all the packages that are
121 bool pkgPackageManager::CreateOrderList()
127 List
= new pkgOrderList(Cache
);
129 bool NoImmConfigure
= _config
->FindB("APT::Immediate-Configure",false);
131 // Generate the list of affected packages and sort it
132 for (PkgIterator I
= Cache
.PkgBegin(); I
.end() == false; I
++)
134 // Mark the package and its dependends for immediate configuration
135 if (((I
->Flags
& pkgCache::Flag::Essential
) == pkgCache::Flag::Essential
||
136 (I
->Flags
& pkgCache::Flag::Important
) == pkgCache::Flag::Important
) &&
137 NoImmConfigure
== false)
139 List
->Flag(I
,pkgOrderList::Immediate
);
141 // Look for other packages to make immediate configurea
142 if (Cache
[I
].InstallVer
!= 0)
143 for (DepIterator D
= Cache
[I
].InstVerIter(Cache
).DependsList();
144 D
.end() == false; D
++)
145 if (D
->Type
== pkgCache::Dep::Depends
|| D
->Type
== pkgCache::Dep::PreDepends
)
146 List
->Flag(D
.TargetPkg(),pkgOrderList::Immediate
);
148 // And again with the current version.
149 if (I
->CurrentVer
!= 0)
150 for (DepIterator D
= I
.CurrentVer().DependsList();
151 D
.end() == false; D
++)
152 if (D
->Type
== pkgCache::Dep::Depends
|| D
->Type
== pkgCache::Dep::PreDepends
)
153 List
->Flag(D
.TargetPkg(),pkgOrderList::Immediate
);
157 if ((Cache
[I
].Keep() == true ||
158 Cache
[I
].InstVerIter(Cache
) == I
.CurrentVer()) &&
159 I
.State() == pkgCache::PkgIterator::NeedsNothing
&&
160 (I
.Purge() != false || Cache
[I
].Mode
!= pkgDepCache::ModeDelete
||
161 (Cache
[I
].iFlags
& pkgDepCache::Purge
) != pkgDepCache::Purge
))
164 // Append it to the list
171 // PM::DepAlwaysTrue - Returns true if this dep is irrelevent /*{{{*/
172 // ---------------------------------------------------------------------
173 /* The restriction on provides is to eliminate the case when provides
174 are transitioning between valid states [ie exim to smail] */
175 bool pkgPackageManager::DepAlwaysTrue(DepIterator D
)
177 if (D
.TargetPkg()->ProvidesList
!= 0)
180 if ((Cache
[D
] & pkgDepCache::DepInstall
) != 0 &&
181 (Cache
[D
] & pkgDepCache::DepNow
) != 0)
186 // PM::CheckRConflicts - Look for reverse conflicts /*{{{*/
187 // ---------------------------------------------------------------------
188 /* This looks over the reverses for a conflicts line that needs early
190 bool pkgPackageManager::CheckRConflicts(PkgIterator Pkg
,DepIterator D
,
193 for (;D
.end() == false; D
++)
195 if (D
->Type
!= pkgCache::Dep::Conflicts
)
198 if (D
.ParentPkg() == Pkg
)
201 if (pkgCheckDep(D
.TargetVer(),Ver
,D
->CompareOp
) == false)
204 if (List
->IsNow(Pkg
) == false)
207 if (EarlyRemove(D
.ParentPkg()) == false)
213 // PM::ConfigureAll - Run the all out configuration /*{{{*/
214 // ---------------------------------------------------------------------
215 /* This configures every package. It is assumed they are all unpacked and
216 that the final configuration is valid. */
217 bool pkgPackageManager::ConfigureAll()
219 pkgOrderList
OList(Cache
);
221 // Populate the order list
222 for (pkgOrderList::iterator I
= List
->begin(); I
!= List
->end(); I
++)
223 if (List
->IsFlag(pkgCache::PkgIterator(Cache
,*I
),
224 pkgOrderList::UnPacked
) == true)
227 if (OList
.OrderConfigure() == false)
230 // Perform the configuring
231 for (pkgOrderList::iterator I
= OList
.begin(); I
!= OList
.end(); I
++)
233 PkgIterator
Pkg(Cache
,*I
);
235 if (Configure(Pkg
) == false)
238 List
->Flag(Pkg
,pkgOrderList::Configured
,pkgOrderList::States
);
244 // PM::SmartConfigure - Perform immediate configuration of the pkg /*{{{*/
245 // ---------------------------------------------------------------------
246 /* This routine scheduals the configuration of the given package and all
247 of it's dependents. */
248 bool pkgPackageManager::SmartConfigure(PkgIterator Pkg
)
250 pkgOrderList
OList(Cache
);
252 if (DepAdd(OList
,Pkg
) == false)
255 if (OList
.OrderConfigure() == false)
258 // Perform the configuring
259 for (pkgOrderList::iterator I
= OList
.begin(); I
!= OList
.end(); I
++)
261 PkgIterator
Pkg(Cache
,*I
);
263 if (Configure(Pkg
) == false)
266 List
->Flag(Pkg
,pkgOrderList::Configured
,pkgOrderList::States
);
270 if (List
->IsFlag(Pkg
,pkgOrderList::Configured
) == false)
271 return _error
->Error("Internal error, could not immediate configure %s",Pkg
.Name());
276 // PM::DepAdd - Add all dependents to the oder list /*{{{*/
277 // ---------------------------------------------------------------------
278 /* This recursively adds all dependents to the order list */
279 bool pkgPackageManager::DepAdd(pkgOrderList
&OList
,PkgIterator Pkg
,int Depth
)
281 if (OList
.IsFlag(Pkg
,pkgOrderList::Added
) == true)
283 if (List
->IsFlag(Pkg
,pkgOrderList::Configured
) == true)
285 if (List
->IsFlag(Pkg
,pkgOrderList::UnPacked
) == false)
289 // Put the package on the list
290 OList
.push_back(Pkg
);
291 OList
.Flag(Pkg
,pkgOrderList::Added
);
294 // Check the dependencies to see if they are all satisfied.
296 for (DepIterator D
= Cache
[Pkg
].InstVerIter(Cache
).DependsList(); D
.end() == false;)
298 if (D
->Type
!= pkgCache::Dep::Depends
&& D
->Type
!= pkgCache::Dep::PreDepends
)
306 for (bool LastOR
= true; D
.end() == false && LastOR
== true; D
++)
308 LastOR
= (D
->CompareOp
& pkgCache::Dep::Or
) == pkgCache::Dep::Or
;
313 Version
**VList
= D
.AllTargets();
314 for (Version
**I
= VList
; *I
!= 0 && Bad
== true; I
++)
316 VerIterator
Ver(Cache
,*I
);
317 PkgIterator Pkg
= Ver
.ParentPkg();
319 // See if the current version is ok
320 if (Pkg
.CurrentVer() == Ver
&& List
->IsNow(Pkg
) == true &&
321 Pkg
.State() == PkgIterator::NeedsNothing
)
327 // Not the install version
328 if (Cache
[Pkg
].InstallVer
!= *I
||
329 (Cache
[Pkg
].Keep() == true && Pkg
.State() == PkgIterator::NeedsNothing
))
331 if (List
->IsFlag(Pkg
,pkgOrderList::UnPacked
) == true)
332 Bad
= !DepAdd(OList
,Pkg
,Depth
);
333 if (List
->IsFlag(Pkg
,pkgOrderList::Configured
) == true)
341 OList
.Flag(Pkg
,0,pkgOrderList::Added
);
352 // PM::EarlyRemove - Perform removal of packages before their time /*{{{*/
353 // ---------------------------------------------------------------------
354 /* This is called to deal with conflicts arising from unpacking */
355 bool pkgPackageManager::EarlyRemove(PkgIterator Pkg
)
357 if (List
->IsNow(Pkg
) == false)
360 // Already removed it
361 if (List
->IsFlag(Pkg
,pkgOrderList::Removed
) == true)
364 // Woops, it will not be re-installed!
365 if (List
->IsFlag(Pkg
,pkgOrderList::InList
) == false)
368 bool Res
= SmartRemove(Pkg
);
369 if (Cache
[Pkg
].Delete() == false)
370 List
->Flag(Pkg
,pkgOrderList::Removed
,pkgOrderList::States
);
375 // PM::SmartRemove - Removal Helper /*{{{*/
376 // ---------------------------------------------------------------------
378 bool pkgPackageManager::SmartRemove(PkgIterator Pkg
)
380 if (List
->IsNow(Pkg
) == false)
383 List
->Flag(Pkg
,pkgOrderList::Configured
,pkgOrderList::States
);
384 return Remove(Pkg
,(Cache
[Pkg
].iFlags
& pkgDepCache::Purge
) == pkgDepCache::Purge
);
387 // PM::SmartUnPack - Install helper /*{{{*/
388 // ---------------------------------------------------------------------
389 /* This performs the task of handling pre-depends. */
390 bool pkgPackageManager::SmartUnPack(PkgIterator Pkg
)
392 // Check if it is already unpacked
393 if (Pkg
.State() == pkgCache::PkgIterator::NeedsConfigure
&&
394 Cache
[Pkg
].Keep() == true)
396 List
->Flag(Pkg
,pkgOrderList::UnPacked
,pkgOrderList::States
);
397 if (List
->IsFlag(Pkg
,pkgOrderList::Immediate
) == true)
398 if (SmartConfigure(Pkg
) == false)
399 return _error
->Error("Internal Error, Could not perform immediate configuraton");
403 /* See if this packages install version has any predependencies
404 that are not met by 'now' packages. */
405 for (DepIterator D
= Cache
[Pkg
].InstVerIter(Cache
).DependsList();
406 D
.end() == false; D
++)
408 if (D
->Type
== pkgCache::Dep::PreDepends
)
410 // Look for possible ok targets.
411 Version
**VList
= D
.AllTargets();
413 for (Version
**I
= VList
; *I
!= 0 && Bad
== true; I
++)
415 VerIterator
Ver(Cache
,*I
);
416 PkgIterator Pkg
= Ver
.ParentPkg();
418 // See if the current version is ok
419 if (Pkg
.CurrentVer() == Ver
&& List
->IsNow(Pkg
) == true &&
420 Pkg
.State() == PkgIterator::NeedsNothing
)
427 // Look for something that could be configured.
428 for (Version
**I
= VList
; *I
!= 0 && Bad
== true; I
++)
430 VerIterator
Ver(Cache
,*I
);
431 PkgIterator Pkg
= Ver
.ParentPkg();
433 // Not the install version
434 if (Cache
[Pkg
].InstallVer
!= *I
||
435 (Cache
[Pkg
].Keep() == true && Pkg
.State() == PkgIterator::NeedsNothing
))
438 Bad
= !SmartConfigure(Pkg
);
444 return _error
->Error("Internal Error, Couldn't configure a pre-depend");
449 if (D
->Type
== pkgCache::Dep::Conflicts
)
451 /* Look for conflicts. Two packages that are both in the install
452 state cannot conflict so we don't check.. */
453 Version
**VList
= D
.AllTargets();
454 for (Version
**I
= VList
; *I
!= 0; I
++)
456 VerIterator
Ver(Cache
,*I
);
457 PkgIterator Pkg
= Ver
.ParentPkg();
459 // See if the current version is conflicting
460 if (Pkg
.CurrentVer() == Ver
&& List
->IsNow(Pkg
) == true)
462 if (EarlyRemove(Pkg
) == false)
463 return _error
->Error("Internal Error, Could not early remove %s",Pkg
.Name());
470 // Check for reverse conflicts.
471 CheckRConflicts(Pkg
,Pkg
.RevDependsList(),
472 Cache
[Pkg
].InstVerIter(Cache
).VerStr());
473 for (PrvIterator P
= Cache
[Pkg
].InstVerIter(Cache
).ProvidesList();
474 P
.end() == false; P
++)
475 CheckRConflicts(Pkg
,P
.ParentPkg().RevDependsList(),P
.ProvideVersion());
477 if (Install(Pkg
,FileNames
[Pkg
->ID
]) == false)
480 List
->Flag(Pkg
,pkgOrderList::UnPacked
,pkgOrderList::States
);
482 // Perform immedate configuration of the package.
483 if (List
->IsFlag(Pkg
,pkgOrderList::Immediate
) == true)
484 if (SmartConfigure(Pkg
) == false)
485 return _error
->Error("Internal Error, Could not perform immediate configuraton");
490 // PM::OrderInstall - Installation ordering routine /*{{{*/
491 // ---------------------------------------------------------------------
493 pkgPackageManager::OrderResult
pkgPackageManager::OrderInstall()
495 if (CreateOrderList() == false)
501 clog
<< "Begining to order" << endl
;
503 if (List
->OrderUnpack(FileNames
) == false)
505 _error
->Error("Internal ordering error");
510 clog
<< "Done ordering" << endl
;
512 bool DoneSomething
= false;
513 for (pkgOrderList::iterator I
= List
->begin(); I
!= List
->end(); I
++)
515 PkgIterator
Pkg(Cache
,*I
);
517 if (List
->IsNow(Pkg
) == false)
520 clog
<< "Skipping already done " << Pkg
.Name() << endl
;
524 if (List
->IsMissing(Pkg
) == true)
527 clog
<< "Sequence completed at" << Pkg
.Name() << endl
;
528 if (DoneSomething
== false)
530 _error
->Error("Internal Error, ordering was unable to handle the media swap");
537 if (Cache
[Pkg
].Keep() == true && Pkg
.State() == pkgCache::PkgIterator::NeedsNothing
)
539 _error
->Error("Internal Error, trying to manipulate a kept package");
543 // Perform a delete or an install
544 if (Cache
[Pkg
].Delete() == true)
546 if (SmartRemove(Pkg
) == false)
550 if (SmartUnPack(Pkg
) == false)
552 DoneSomething
= true;
555 // Final run through the configure phase
556 if (ConfigureAll() == false)
560 for (pkgOrderList::iterator I
= List
->begin(); I
!= List
->end(); I
++)
562 if (List
->IsFlag(*I
,pkgOrderList::Configured
) == false)
564 _error
->Error("Internal error, packages left unconfigured. %s",
565 PkgIterator(Cache
,*I
).Name());
573 // PM::DoInstall - Does the installation /*{{{*/
574 // ---------------------------------------------------------------------
575 /* This uses the filenames in FileNames and the information in the
576 DepCache to perform the installation of packages.*/
577 pkgPackageManager::OrderResult
pkgPackageManager::DoInstall()
579 OrderResult Res
= OrderInstall();