]>
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 /*{{{*/
18 #include <apt-pkg/packagemanager.h>
19 #include <apt-pkg/orderlist.h>
20 #include <apt-pkg/depcache.h>
21 #include <apt-pkg/error.h>
22 #include <apt-pkg/version.h>
23 #include <apt-pkg/acquire-item.h>
24 #include <apt-pkg/algorithms.h>
25 #include <apt-pkg/configuration.h>
26 #include <apt-pkg/sptr.h>
35 bool pkgPackageManager :: SigINTStop
= false ;
37 // PM::PackageManager - Constructor /*{{{*/
38 // ---------------------------------------------------------------------
40 pkgPackageManager :: pkgPackageManager ( pkgDepCache
* pCache
) : Cache (* pCache
),
41 List ( NULL
), Res ( Incomplete
)
43 FileNames
= new string
[ Cache
. Head (). PackageCount
];
44 Debug
= _config
-> FindB ( "Debug::pkgPackageManager" , false );
45 NoImmConfigure
= ! _config
-> FindB ( "APT::Immediate-Configure" , true );
46 ImmConfigureAll
= _config
-> FindB ( "APT::Immediate-Configure-All" , false );
49 // PM::PackageManager - Destructor /*{{{*/
50 // ---------------------------------------------------------------------
52 pkgPackageManager ::~ pkgPackageManager ()
58 // PM::GetArchives - Queue the archives for download /*{{{*/
59 // ---------------------------------------------------------------------
61 bool pkgPackageManager :: GetArchives ( pkgAcquire
* Owner
, pkgSourceList
* Sources
,
64 if ( CreateOrderList () == false )
68 _config
-> FindB ( "PackageManager::UnpackAll" , true ) ?
69 List
-> OrderUnpack () : List
-> OrderCritical ();
70 if ( ordering
== false )
71 return _error
-> Error ( "Internal ordering error" );
73 for ( pkgOrderList :: iterator I
= List
-> begin (); I
!= List
-> end (); ++ I
)
75 PkgIterator
Pkg ( Cache
,* I
);
76 FileNames
[ Pkg
-> ID
] = string ();
78 // Skip packages to erase
79 if ( Cache
[ Pkg
]. Delete () == true )
82 // Skip Packages that need configure only.
83 if ( Pkg
. State () == pkgCache :: PkgIterator :: NeedsConfigure
&&
84 Cache
[ Pkg
]. Keep () == true )
87 // Skip already processed packages
88 if ( List
-> IsNow ( Pkg
) == false )
91 new pkgAcqArchive ( Owner
, Sources
, Recs
, Cache
[ Pkg
]. InstVerIter ( Cache
),
98 // PM::FixMissing - Keep all missing packages /*{{{*/
99 // ---------------------------------------------------------------------
100 /* This is called to correct the installation when packages could not
102 bool pkgPackageManager :: FixMissing ()
104 pkgDepCache :: ActionGroup
group ( Cache
);
105 pkgProblemResolver
Resolve (& Cache
);
106 List
-> SetFileList ( FileNames
);
109 for ( PkgIterator I
= Cache
. PkgBegin (); I
. end () == false ; ++ I
)
111 if ( List
-> IsMissing ( I
) == false )
114 // Okay, this file is missing and we need it. Mark it for keep
116 Cache
. MarkKeep ( I
, false , false );
119 // We have to empty the list otherwise it will not have the new changes
126 // Now downgrade everything that is broken
127 return Resolve
. ResolveByKeep () == true && Cache
. BrokenCount () == 0 ;
130 // PM::ImmediateAdd - Add the immediate flag recursivly /*{{{*/
131 // ---------------------------------------------------------------------
132 /* This adds the immediate flag to the pkg and recursively to the
135 void pkgPackageManager :: ImmediateAdd ( PkgIterator I
, bool UseInstallVer
, unsigned const int & Depth
)
141 if ( Cache
[ I
]. InstallVer
== 0 )
143 D
= Cache
[ I
]. InstVerIter ( Cache
). DependsList ();
145 if ( I
-> CurrentVer
== 0 )
147 D
= I
. CurrentVer (). DependsList ();
150 for ( /* nothing */ ; D
. end () == false ; ++ D
)
151 if ( D
-> Type
== pkgCache :: Dep :: Depends
|| D
-> Type
== pkgCache :: Dep :: PreDepends
)
153 if (! List
-> IsFlag ( D
. TargetPkg (), pkgOrderList :: Immediate
))
156 clog
<< OutputInDepth ( Depth
) << "ImmediateAdd(): Adding Immediate flag to " << D
. TargetPkg () << " cause of " << D
. DepType () << " " << I
. FullName () << endl
;
157 List
-> Flag ( D
. TargetPkg (), pkgOrderList :: Immediate
);
158 ImmediateAdd ( D
. TargetPkg (), UseInstallVer
, Depth
+ 1 );
164 // PM::CreateOrderList - Create the ordering class /*{{{*/
165 // ---------------------------------------------------------------------
166 /* This populates the ordering list with all the packages that are
168 bool pkgPackageManager :: CreateOrderList ()
174 List
= new pkgOrderList (& Cache
);
176 if ( Debug
&& ImmConfigureAll
)
177 clog
<< "CreateOrderList(): Adding Immediate flag for all packages because of APT::Immediate-Configure-All" << endl
;
179 // Generate the list of affected packages and sort it
180 for ( PkgIterator I
= Cache
. PkgBegin (); I
. end () == false ; ++ I
)
182 // Ignore no-version packages
183 if ( I
-> VersionList
== 0 )
186 // Mark the package and its dependends for immediate configuration
187 if (((( I
-> Flags
& pkgCache :: Flag :: Essential
) == pkgCache :: Flag :: Essential
) &&
188 NoImmConfigure
== false ) || ImmConfigureAll
)
190 if ( Debug
&& ! ImmConfigureAll
)
191 clog
<< "CreateOrderList(): Adding Immediate flag for " << I
. FullName () << endl
;
192 List
-> Flag ( I
, pkgOrderList :: Immediate
);
194 if (! ImmConfigureAll
) {
195 // Look for other install packages to make immediate configurea
196 ImmediateAdd ( I
, true );
198 // And again with the current version.
199 ImmediateAdd ( I
, false );
204 if (( Cache
[ I
]. Keep () == true ||
205 Cache
[ I
]. InstVerIter ( Cache
) == I
. CurrentVer ()) &&
206 I
. State () == pkgCache :: PkgIterator :: NeedsNothing
&&
207 ( Cache
[ I
]. iFlags
& pkgDepCache :: ReInstall
) != pkgDepCache :: ReInstall
&&
208 ( I
. Purge () != false || Cache
[ I
]. Mode
!= pkgDepCache :: ModeDelete
||
209 ( Cache
[ I
]. iFlags
& pkgDepCache :: Purge
) != pkgDepCache :: Purge
))
212 // Append it to the list
219 // PM::DepAlwaysTrue - Returns true if this dep is irrelevent /*{{{*/
220 // ---------------------------------------------------------------------
221 /* The restriction on provides is to eliminate the case when provides
222 are transitioning between valid states [ie exim to smail] */
223 bool pkgPackageManager :: DepAlwaysTrue ( DepIterator D
)
225 if ( D
. TargetPkg ()-> ProvidesList
!= 0 )
228 if (( Cache
[ D
] & pkgDepCache :: DepInstall
) != 0 &&
229 ( Cache
[ D
] & pkgDepCache :: DepNow
) != 0 )
234 // PM::CheckRConflicts - Look for reverse conflicts /*{{{*/
235 // ---------------------------------------------------------------------
236 /* This looks over the reverses for a conflicts line that needs early
238 bool pkgPackageManager :: CheckRConflicts ( PkgIterator Pkg
, DepIterator D
,
241 for (; D
. end () == false ; ++ D
)
243 if ( D
-> Type
!= pkgCache :: Dep :: Conflicts
&&
244 D
-> Type
!= pkgCache :: Dep :: Obsoletes
)
247 // The package hasnt been changed
248 if ( List
-> IsNow ( Pkg
) == false )
251 // Ignore self conflicts, ignore conflicts from irrelevent versions
252 if ( D
. IsIgnorable ( Pkg
) || D
. ParentVer () != D
. ParentPkg (). CurrentVer ())
255 if ( Cache
. VS (). CheckDep ( Ver
, D
-> CompareOp
, D
. TargetVer ()) == false )
258 if ( EarlyRemove ( D
. ParentPkg ()) == false )
259 return _error
-> Error ( "Reverse conflicts early remove for package ' %s ' failed" ,
260 Pkg
. FullName (). c_str ());
265 // PM::ConfigureAll - Run the all out configuration /*{{{*/
266 // ---------------------------------------------------------------------
267 /* This configures every package. It is assumed they are all unpacked and
268 that the final configuration is valid. This is also used to catch packages
269 that have not been configured when using ImmConfigureAll */
270 bool pkgPackageManager :: ConfigureAll ()
272 pkgOrderList
OList (& Cache
);
274 // Populate the order list
275 for ( pkgOrderList :: iterator I
= List
-> begin (); I
!= List
-> end (); ++ I
)
276 if ( List
-> IsFlag ( pkgCache :: PkgIterator ( Cache
,* I
),
277 pkgOrderList :: UnPacked
) == true )
280 if ( OList
. OrderConfigure () == false )
283 std :: string
const conf
= _config
-> Find ( "PackageManager::Configure" , "all" );
284 bool const ConfigurePkgs
= ( conf
== "all" );
286 // Perform the configuring
287 for ( pkgOrderList :: iterator I
= OList
. begin (); I
!= OList
. end (); ++ I
)
289 PkgIterator
Pkg ( Cache
,* I
);
291 /* Check if the package has been configured, this can happen if SmartConfigure
293 if ( List
-> IsFlag ( Pkg
, pkgOrderList :: Configured
)) continue ;
295 if ( ConfigurePkgs
== true && SmartConfigure ( Pkg
, 0 ) == false ) {
297 _error
-> Error ( _ ( "Could not perform immediate configuration on ' %s '. "
298 "Please see man 5 apt.conf under APT::Immediate-Configure for details. ( %d )" ), Pkg
. FullName (). c_str (), 1 );
300 _error
-> Error ( "Internal error, packages left unconfigured. %s " , Pkg
. FullName (). c_str ());
304 List
-> Flag ( Pkg
, pkgOrderList :: Configured
, pkgOrderList :: States
);
310 // PM::SmartConfigure - Perform immediate configuration of the pkg /*{{{*/
311 // ---------------------------------------------------------------------
312 /* This function tries to put the system in a state where Pkg can be configured.
313 This involves checking each of Pkg's dependanies and unpacking and
314 configuring packages where needed.
316 Note on failure: This method can fail, without causing any problems.
317 This can happen when using Immediate-Configure-All, SmartUnPack may call
318 SmartConfigure, it may fail because of a complex dependancy situation, but
319 a error will only be reported if ConfigureAll fails. This is why some of the
320 messages this function reports on failure (return false;) as just warnings
321 only shown when debuging*/
322 bool pkgPackageManager :: SmartConfigure ( PkgIterator Pkg
, int const Depth
)
324 // If this is true, only check and correct and dependencies without the Loop flag
325 bool const PkgLoop
= List
-> IsFlag ( Pkg
, pkgOrderList :: Loop
);
328 VerIterator InstallVer
= VerIterator ( Cache
, Cache
[ Pkg
]. InstallVer
);
329 clog
<< OutputInDepth ( Depth
) << "SmartConfigure " << Pkg
. FullName () << " (" << InstallVer
. VerStr () << ")" ;
331 clog
<< " (Only Correct Dependencies)" ;
335 VerIterator
const instVer
= Cache
[ Pkg
]. InstVerIter ( Cache
);
337 /* Because of the ordered list, most dependencies should be unpacked,
338 however if there is a loop (A depends on B, B depends on A) this will not
339 be the case, so check for dependencies before configuring. */
340 bool Bad
= false , Changed
= false ;
341 const unsigned int max_loops
= _config
-> FindI ( "APT::pkgPackageManager::MaxLoopCount" , 500 );
346 for ( DepIterator D
= instVer
. DependsList (); D
. end () == false ; )
348 // Compute a single dependency element (glob or)
349 pkgCache :: DepIterator Start
, End
;
352 if ( End
-> Type
!= pkgCache :: Dep :: Depends
)
356 // Search for dependencies which are unpacked but aren't configured yet (maybe loops)
357 for ( DepIterator Cur
= Start
; true ; ++ Cur
)
359 SPtrArray
< Version
*> VList
= Cur
. AllTargets ();
361 for ( Version
** I
= VList
; * I
!= 0 ; ++ I
)
363 VerIterator
Ver ( Cache
,* I
);
364 PkgIterator DepPkg
= Ver
. ParentPkg ();
366 // Check if the current version of the package is available and will satisfy this dependency
367 if ( DepPkg
. CurrentVer () == Ver
&& List
-> IsNow ( DepPkg
) == true &&
368 List
-> IsFlag ( DepPkg
, pkgOrderList :: Removed
) == false &&
369 DepPkg
. State () == PkgIterator :: NeedsNothing
)
375 // Check if the version that is going to be installed will satisfy the dependency
376 if ( Cache
[ DepPkg
]. InstallVer
!= * I
)
379 if ( List
-> IsFlag ( DepPkg
, pkgOrderList :: UnPacked
))
381 if ( List
-> IsFlag ( DepPkg
, pkgOrderList :: Loop
) && PkgLoop
)
383 // This dependency has already been dealt with by another SmartConfigure on Pkg
387 /* Check for a loop to prevent one forming
388 If A depends on B and B depends on A, SmartConfigure will
389 just hop between them if this is not checked. Dont remove the
390 loop flag after finishing however as loop is already set.
391 This means that there is another SmartConfigure call for this
392 package and it will remove the loop flag */
393 if ( PkgLoop
== false )
394 List
-> Flag ( Pkg
, pkgOrderList :: Loop
);
395 if ( SmartConfigure ( DepPkg
, Depth
+ 1 ) == true )
398 if ( List
-> IsFlag ( DepPkg
, pkgOrderList :: Loop
) == false )
401 if ( PkgLoop
== false )
402 List
-> RmFlag ( Pkg
, pkgOrderList :: Loop
);
403 // If SmartConfigure was succesfull, Bad is false, so break
407 else if ( List
-> IsFlag ( DepPkg
, pkgOrderList :: Configured
))
420 // Check for dependencies that have not been unpacked, probably due to loops.
421 for ( DepIterator Cur
= Start
; true ; ++ Cur
)
423 SPtrArray
< Version
*> VList
= Cur
. AllTargets ();
425 for ( Version
** I
= VList
; * I
!= 0 ; ++ I
)
427 VerIterator
Ver ( Cache
,* I
);
428 PkgIterator DepPkg
= Ver
. ParentPkg ();
430 // Check if the version that is going to be installed will satisfy the dependency
431 if ( Cache
[ DepPkg
]. InstallVer
!= * I
|| List
-> IsNow ( DepPkg
) == false )
437 std :: clog
<< OutputInDepth ( Depth
) << "Package " << Pkg
<< " loops in SmartConfigure" << std :: endl
;
444 clog
<< OutputInDepth ( Depth
) << "Unpacking " << DepPkg
. FullName () << " to avoid loop " << Cur
<< endl
;
445 if ( PkgLoop
== false )
446 List
-> Flag ( Pkg
, pkgOrderList :: Loop
);
447 if ( SmartUnPack ( DepPkg
, true , Depth
+ 1 ) == true )
450 if ( List
-> IsFlag ( DepPkg
, pkgOrderList :: Loop
) == false )
453 if ( PkgLoop
== false )
454 List
-> RmFlag ( Pkg
, pkgOrderList :: Loop
);
464 if ( Bad
== true && Changed
== false && Debug
== true )
465 std :: clog
<< OutputInDepth ( Depth
) << "Could not satisfy " << Start
<< std :: endl
;
468 return _error
-> Error ( "Internal error: MaxLoopCount reached in SmartUnPack for %s , aborting" , Pkg
. FullName (). c_str ());
469 } while ( Changed
== true );
473 _error
-> Warning ( _ ( "Could not configure ' %s '. " ), Pkg
. FullName (). c_str ());
477 if ( PkgLoop
) return true ;
479 static std :: string
const conf
= _config
-> Find ( "PackageManager::Configure" , "all" );
480 static bool const ConfigurePkgs
= ( conf
== "all" || conf
== "smart" );
482 if ( List
-> IsFlag ( Pkg
, pkgOrderList :: Configured
))
483 return _error
-> Error ( "Internal configure error on ' %s '." , Pkg
. FullName (). c_str ());
485 if ( ConfigurePkgs
== true && Configure ( Pkg
) == false )
488 List
-> Flag ( Pkg
, pkgOrderList :: Configured
, pkgOrderList :: States
);
490 if (( Cache
[ Pkg
]. InstVerIter ( Cache
)-> MultiArch
& pkgCache :: Version :: Same
) == pkgCache :: Version :: Same
)
491 for ( PkgIterator P
= Pkg
. Group (). PackageList ();
492 P
. end () == false ; P
= Pkg
. Group (). NextPkg ( P
))
494 if ( Pkg
== P
|| List
-> IsFlag ( P
, pkgOrderList :: Configured
) == true ||
495 Cache
[ P
]. InstallVer
== 0 || ( P
. CurrentVer () == Cache
[ P
]. InstallVer
&&
496 ( Cache
[ Pkg
]. iFlags
& pkgDepCache :: ReInstall
) != pkgDepCache :: ReInstall
))
498 SmartConfigure ( P
, ( Depth
+ 1 ));
502 if ( List
-> IsFlag ( Pkg
, pkgOrderList :: Configured
) == false )
503 return _error
-> Error ( _ ( "Could not configure ' %s '. " ), Pkg
. FullName (). c_str ());
508 // PM::EarlyRemove - Perform removal of packages before their time /*{{{*/
509 // ---------------------------------------------------------------------
510 /* This is called to deal with conflicts arising from unpacking */
511 bool pkgPackageManager :: EarlyRemove ( PkgIterator Pkg
)
513 if ( List
-> IsNow ( Pkg
) == false )
516 // Already removed it
517 if ( List
-> IsFlag ( Pkg
, pkgOrderList :: Removed
) == true )
520 // Woops, it will not be re-installed!
521 if ( List
-> IsFlag ( Pkg
, pkgOrderList :: InList
) == false )
524 // Essential packages get special treatment
525 bool IsEssential
= false ;
526 if (( Pkg
-> Flags
& pkgCache :: Flag :: Essential
) != 0 ||
527 ( Pkg
-> Flags
& pkgCache :: Flag :: Important
) != 0 )
530 /* Check for packages that are the dependents of essential packages and
532 if ( Pkg
-> CurrentVer
!= 0 )
534 for ( DepIterator D
= Pkg
. RevDependsList (); D
. end () == false &&
535 IsEssential
== false ; ++ D
)
536 if ( D
-> Type
== pkgCache :: Dep :: Depends
|| D
-> Type
== pkgCache :: Dep :: PreDepends
)
537 if (( D
. ParentPkg ()-> Flags
& pkgCache :: Flag :: Essential
) != 0 ||
538 ( D
. ParentPkg ()-> Flags
& pkgCache :: Flag :: Important
) != 0 )
542 if ( IsEssential
== true )
544 if ( _config
-> FindB ( "APT::Force-LoopBreak" , false ) == false )
545 return _error
-> Error ( _ ( "This installation run will require temporarily "
546 "removing the essential package %s due to a "
547 "Conflicts/Pre-Depends loop. This is often bad, "
548 "but if you really want to do it, activate the "
549 "APT::Force-LoopBreak option." ), Pkg
. FullName (). c_str ());
552 bool Res
= SmartRemove ( Pkg
);
553 if ( Cache
[ Pkg
]. Delete () == false )
554 List
-> Flag ( Pkg
, pkgOrderList :: Removed
, pkgOrderList :: States
);
559 // PM::SmartRemove - Removal Helper /*{{{*/
560 // ---------------------------------------------------------------------
562 bool pkgPackageManager :: SmartRemove ( PkgIterator Pkg
)
564 if ( List
-> IsNow ( Pkg
) == false )
567 List
-> Flag ( Pkg
, pkgOrderList :: Configured
, pkgOrderList :: States
);
569 return Remove ( Pkg
,( Cache
[ Pkg
]. iFlags
& pkgDepCache :: Purge
) == pkgDepCache :: Purge
);
572 // PM::SmartUnPack - Install helper /*{{{*/
573 // ---------------------------------------------------------------------
574 /* This puts the system in a state where it can Unpack Pkg, if Pkg is allready
575 unpacked, or when it has been unpacked, if Immediate==true it configures it. */
576 bool pkgPackageManager :: SmartUnPack ( PkgIterator Pkg
)
578 return SmartUnPack ( Pkg
, true , 0 );
580 bool pkgPackageManager :: SmartUnPack ( PkgIterator Pkg
, bool const Immediate
, int const Depth
)
582 bool PkgLoop
= List
-> IsFlag ( Pkg
, pkgOrderList :: Loop
);
585 clog
<< OutputInDepth ( Depth
) << "SmartUnPack " << Pkg
. FullName ();
586 VerIterator InstallVer
= VerIterator ( Cache
, Cache
[ Pkg
]. InstallVer
);
587 if ( Pkg
. CurrentVer () == 0 )
588 clog
<< " (install version " << InstallVer
. VerStr () << ")" ;
590 clog
<< " (replace version " << Pkg
. CurrentVer (). VerStr () << " with " << InstallVer
. VerStr () << ")" ;
592 clog
<< " (Only Perform PreUnpack Checks)" ;
596 VerIterator
const instVer
= Cache
[ Pkg
]. InstVerIter ( Cache
);
598 /* PreUnpack Checks: This loop checks and attempts to rectify and problems that would prevent the package being unpacked.
599 It addresses: PreDepends, Conflicts, Obsoletes and Breaks (DpkgBreaks). Any resolutions that do not require it should
600 avoid configuration (calling SmartUnpack with Immediate=true), this is because when unpacking some packages with
601 complex dependancy structures, trying to configure some packages while breaking the loops can complicate things .
602 This will be either dealt with if the package is configured as a dependency of Pkg (if and when Pkg is configured),
603 or by the ConfigureAll call at the end of the for loop in OrderInstall. */
604 bool Changed
= false ;
605 const unsigned int max_loops
= _config
-> FindI ( "APT::pkgPackageManager::MaxLoopCount" , 500 );
610 for ( DepIterator D
= instVer
. DependsList (); D
. end () == false ; )
612 // Compute a single dependency element (glob or)
613 pkgCache :: DepIterator Start
, End
;
616 if ( End
-> Type
== pkgCache :: Dep :: PreDepends
)
620 clog
<< OutputInDepth ( Depth
) << "PreDepends order for " << Pkg
. FullName () << std :: endl
;
622 // Look for easy targets: packages that are already okay
623 for ( DepIterator Cur
= Start
; Bad
== true ; ++ Cur
)
625 SPtrArray
< Version
*> VList
= Cur
. AllTargets ();
626 for ( Version
** I
= VList
; * I
!= 0 ; ++ I
)
628 VerIterator
Ver ( Cache
,* I
);
629 PkgIterator Pkg
= Ver
. ParentPkg ();
631 // See if the current version is ok
632 if ( Pkg
. CurrentVer () == Ver
&& List
-> IsNow ( Pkg
) == true &&
633 Pkg
. State () == PkgIterator :: NeedsNothing
)
637 clog
<< OutputInDepth ( Depth
) << "Found ok package " << Pkg
. FullName () << endl
;
645 // Look for something that could be configured.
646 for ( DepIterator Cur
= Start
; Bad
== true ; ++ Cur
)
648 SPtrArray
< Version
*> VList
= Cur
. AllTargets ();
649 for ( Version
** I
= VList
; * I
!= 0 ; ++ I
)
651 VerIterator
Ver ( Cache
,* I
);
652 PkgIterator Pkg
= Ver
. ParentPkg ();
654 // Not the install version
655 if ( Cache
[ Pkg
]. InstallVer
!= * I
||
656 ( Cache
[ Pkg
]. Keep () == true && Pkg
. State () == PkgIterator :: NeedsNothing
))
659 if ( List
-> IsFlag ( Pkg
, pkgOrderList :: Configured
))
665 // check if it needs unpack or if if configure is enough
666 if ( List
-> IsFlag ( Pkg
, pkgOrderList :: UnPacked
) == false )
669 clog
<< OutputInDepth ( Depth
) << "Trying to SmartUnpack " << Pkg
. FullName () << endl
;
670 // SmartUnpack with the ImmediateFlag to ensure its really ready
671 if ( SmartUnPack ( Pkg
, true , Depth
+ 1 ) == true )
674 if ( List
-> IsFlag ( Pkg
, pkgOrderList :: Loop
) == false )
682 clog
<< OutputInDepth ( Depth
) << "Trying to SmartConfigure " << Pkg
. FullName () << endl
;
683 if ( SmartConfigure ( Pkg
, Depth
+ 1 ) == true )
686 if ( List
-> IsFlag ( Pkg
, pkgOrderList :: Loop
) == false )
697 return _error
-> Error ( "Couldn't configure pre-depend %s for %s , "
698 "probably a dependency cycle." ,
699 End
. TargetPkg (). FullName (). c_str (), Pkg
. FullName (). c_str ());
704 else if ( End
-> Type
== pkgCache :: Dep :: Conflicts
||
705 End
-> Type
== pkgCache :: Dep :: Obsoletes
)
707 /* Look for conflicts. Two packages that are both in the install
708 state cannot conflict so we don't check.. */
709 SPtrArray
< Version
*> VList
= End
. AllTargets ();
710 for ( Version
** I
= VList
; * I
!= 0 ; I
++)
712 VerIterator
Ver ( Cache
,* I
);
713 PkgIterator ConflictPkg
= Ver
. ParentPkg ();
714 VerIterator
InstallVer ( Cache
, Cache
[ ConflictPkg
]. InstallVer
);
716 // See if the current version is conflicting
717 if ( ConflictPkg
. CurrentVer () == Ver
&& List
-> IsNow ( ConflictPkg
))
719 clog
<< OutputInDepth ( Depth
) << Pkg
. FullName () << " conflicts with " << ConflictPkg
. FullName () << endl
;
720 /* If a loop is not present or has not yet been detected, attempt to unpack packages
721 to resolve this conflict. If there is a loop present, remove packages to resolve this conflict */
722 if ( List
-> IsFlag ( ConflictPkg
, pkgOrderList :: Loop
) == false )
724 if ( Cache
[ ConflictPkg
]. Keep () == 0 && Cache
[ ConflictPkg
]. InstallVer
!= 0 )
727 clog
<< OutputInDepth ( Depth
) << OutputInDepth ( Depth
) << "Unpacking " << ConflictPkg
. FullName () << " to prevent conflict" << endl
;
728 List
-> Flag ( Pkg
, pkgOrderList :: Loop
);
729 if ( SmartUnPack ( ConflictPkg
, false , Depth
+ 1 ) == true )
730 if ( List
-> IsFlag ( ConflictPkg
, pkgOrderList :: Loop
) == false )
732 // Remove loop to allow it to be used later if needed
733 List
-> RmFlag ( Pkg
, pkgOrderList :: Loop
);
735 else if ( EarlyRemove ( ConflictPkg
) == false )
736 return _error
-> Error ( "Internal Error, Could not early remove %s (1)" , ConflictPkg
. FullName (). c_str ());
738 else if ( List
-> IsFlag ( ConflictPkg
, pkgOrderList :: Removed
) == false )
741 clog
<< OutputInDepth ( Depth
) << "Because of conficts knot, removing " << ConflictPkg
. FullName () << " to conflict violation" << endl
;
742 if ( EarlyRemove ( ConflictPkg
) == false )
743 return _error
-> Error ( "Internal Error, Could not early remove %s (2)" , ConflictPkg
. FullName (). c_str ());
748 else if ( End
-> Type
== pkgCache :: Dep :: DpkgBreaks
)
750 SPtrArray
< Version
*> VList
= End
. AllTargets ();
751 for ( Version
** I
= VList
; * I
!= 0 ; ++ I
)
753 VerIterator
Ver ( Cache
,* I
);
754 PkgIterator BrokenPkg
= Ver
. ParentPkg ();
755 if ( BrokenPkg
. CurrentVer () != Ver
)
758 std :: clog
<< OutputInDepth ( Depth
) << " Ignore not-installed version " << Ver
. VerStr () << " of " << Pkg
. FullName () << " for " << End
<< std :: endl
;
762 // Check if it needs to be unpacked
763 if ( List
-> IsFlag ( BrokenPkg
, pkgOrderList :: InList
) && Cache
[ BrokenPkg
]. Delete () == false &&
764 List
-> IsNow ( BrokenPkg
))
766 if ( List
-> IsFlag ( BrokenPkg
, pkgOrderList :: Loop
) && PkgLoop
)
768 // This dependancy has already been dealt with by another SmartUnPack on Pkg
773 // Found a break, so see if we can unpack the package to avoid it
774 // but do not set loop if another SmartUnPack already deals with it
775 // Also, avoid it if the package we would unpack pre-depends on this one
776 VerIterator
InstallVer ( Cache
, Cache
[ BrokenPkg
]. InstallVer
);
778 for ( pkgCache :: DepIterator D
= InstallVer
. DependsList (); D
. end () == false ; ++ D
)
780 if ( D
-> Type
!= pkgCache :: Dep :: PreDepends
)
782 SPtrArray
< Version
*> VL
= D
. AllTargets ();
783 for ( Version
** I
= VL
; * I
!= 0 ; ++ I
)
785 VerIterator
V ( Cache
,* I
);
786 PkgIterator P
= V
. ParentPkg ();
787 // we are checking for installation as an easy 'protection' against or-groups and (unchosen) providers
788 if ( P
-> CurrentVer
== 0 || P
!= Pkg
|| ( P
. CurrentVer () != V
&& Cache
[ P
]. InstallVer
!= V
))
799 clog
<< OutputInDepth ( Depth
) << " Avoiding " << End
<< " avoided as " << BrokenPkg
. FullName () << " has a pre-depends on " << Pkg
. FullName () << std :: endl
;
806 clog
<< OutputInDepth ( Depth
) << " Unpacking " << BrokenPkg
. FullName () << " to avoid " << End
;
808 clog
<< " (Looping)" ;
811 if ( PkgLoop
== false )
812 List
-> Flag ( Pkg
, pkgOrderList :: Loop
);
813 if ( SmartUnPack ( BrokenPkg
, false , Depth
+ 1 ) == true )
815 if ( List
-> IsFlag ( BrokenPkg
, pkgOrderList :: Loop
) == false )
818 if ( PkgLoop
== false )
819 List
-> RmFlag ( Pkg
, pkgOrderList :: Loop
);
823 // Check if a package needs to be removed
824 else if ( Cache
[ BrokenPkg
]. Delete () == true && List
-> IsFlag ( BrokenPkg
, pkgOrderList :: Configured
) == false )
827 clog
<< OutputInDepth ( Depth
) << " Removing " << BrokenPkg
. FullName () << " to avoid " << End
<< endl
;
828 SmartRemove ( BrokenPkg
);
834 return _error
-> Error ( "Internal error: APT::pkgPackageManager::MaxLoopCount reached in SmartConfigure for %s , aborting" , Pkg
. FullName (). c_str ());
835 } while ( Changed
== true );
837 // Check for reverse conflicts.
838 if ( CheckRConflicts ( Pkg
, Pkg
. RevDependsList (),
839 instVer
. VerStr ()) == false )
842 for ( PrvIterator P
= instVer
. ProvidesList ();
843 P
. end () == false ; ++ P
)
844 if ( Pkg
-> Group
!= P
. OwnerPkg ()-> Group
)
845 CheckRConflicts ( Pkg
, P
. ParentPkg (). RevDependsList (), P
. ProvideVersion ());
850 List
-> Flag ( Pkg
, pkgOrderList :: UnPacked
, pkgOrderList :: States
);
852 if ( Immediate
== true && ( instVer
-> MultiArch
& pkgCache :: Version :: Same
) == pkgCache :: Version :: Same
)
854 /* Do lockstep M-A:same unpacking in two phases:
855 First unpack all installed architectures, then the not installed.
856 This way we avoid that M-A: enabled packages are installed before
857 their older non-M-A enabled packages are replaced by newer versions */
858 bool const installed
= Pkg
-> CurrentVer
!= 0 ;
859 if ( installed
== true && Install ( Pkg
, FileNames
[ Pkg
-> ID
]) == false )
861 for ( PkgIterator P
= Pkg
. Group (). PackageList ();
862 P
. end () == false ; P
= Pkg
. Group (). NextPkg ( P
))
864 if ( P
-> CurrentVer
== 0 || P
== Pkg
|| List
-> IsFlag ( P
, pkgOrderList :: UnPacked
) == true ||
865 Cache
[ P
]. InstallVer
== 0 || ( P
. CurrentVer () == Cache
[ P
]. InstallVer
&&
866 ( Cache
[ Pkg
]. iFlags
& pkgDepCache :: ReInstall
) != pkgDepCache :: ReInstall
))
868 if ( SmartUnPack ( P
, false , Depth
+ 1 ) == false )
871 if ( installed
== false && Install ( Pkg
, FileNames
[ Pkg
-> ID
]) == false )
873 for ( PkgIterator P
= Pkg
. Group (). PackageList ();
874 P
. end () == false ; P
= Pkg
. Group (). NextPkg ( P
))
876 if ( P
-> CurrentVer
!= 0 || P
== Pkg
|| List
-> IsFlag ( P
, pkgOrderList :: UnPacked
) == true ||
877 Cache
[ P
]. InstallVer
== 0 || ( P
. CurrentVer () == Cache
[ P
]. InstallVer
&&
878 ( Cache
[ Pkg
]. iFlags
& pkgDepCache :: ReInstall
) != pkgDepCache :: ReInstall
))
880 if ( SmartUnPack ( P
, false , Depth
+ 1 ) == false )
884 // packages which are already unpacked don't need to be unpacked again
885 else if ( Pkg
. State () != pkgCache :: PkgIterator :: NeedsConfigure
&& Install ( Pkg
, FileNames
[ Pkg
-> ID
]) == false )
888 if ( Immediate
== true ) {
889 // Perform immedate configuration of the package.
890 if ( SmartConfigure ( Pkg
, Depth
+ 1 ) == false )
891 _error
-> Warning ( _ ( "Could not perform immediate configuration on ' %s '. "
892 "Please see man 5 apt.conf under APT::Immediate-Configure for details. ( %d )" ), Pkg
. FullName (). c_str (), 2 );
898 // PM::OrderInstall - Installation ordering routine /*{{{*/
899 // ---------------------------------------------------------------------
901 pkgPackageManager :: OrderResult
pkgPackageManager :: OrderInstall ()
903 if ( CreateOrderList () == false )
909 clog
<< "Beginning to order" << endl
;
911 bool const ordering
=
912 _config
-> FindB ( "PackageManager::UnpackAll" , true ) ?
913 List
-> OrderUnpack ( FileNames
) : List
-> OrderCritical ();
914 if ( ordering
== false )
916 _error
-> Error ( "Internal ordering error" );
921 clog
<< "Done ordering" << endl
;
923 bool DoneSomething
= false ;
924 for ( pkgOrderList :: iterator I
= List
-> begin (); I
!= List
-> end (); ++ I
)
926 PkgIterator
Pkg ( Cache
,* I
);
928 if ( List
-> IsNow ( Pkg
) == false )
930 if (! List
-> IsFlag ( Pkg
, pkgOrderList :: Configured
) && ! NoImmConfigure
) {
931 if ( SmartConfigure ( Pkg
, 0 ) == false && Debug
)
932 _error
-> Warning ( "Internal Error, Could not configure %s " , Pkg
. FullName (). c_str ());
933 // FIXME: The above warning message might need changing
936 clog
<< "Skipping already done " << Pkg
. FullName () << endl
;
942 if ( List
-> IsMissing ( Pkg
) == true )
945 clog
<< "Sequence completed at " << Pkg
. FullName () << endl
;
946 if ( DoneSomething
== false )
948 _error
-> Error ( "Internal Error, ordering was unable to handle the media swap" );
955 if ( Cache
[ Pkg
]. Keep () == true &&
956 Pkg
. State () == pkgCache :: PkgIterator :: NeedsNothing
&&
957 ( Cache
[ Pkg
]. iFlags
& pkgDepCache :: ReInstall
) != pkgDepCache :: ReInstall
)
959 _error
-> Error ( "Internal Error, trying to manipulate a kept package ( %s )" , Pkg
. FullName (). c_str ());
963 // Perform a delete or an install
964 if ( Cache
[ Pkg
]. Delete () == true )
966 if ( SmartRemove ( Pkg
) == false )
970 if ( SmartUnPack ( Pkg
, List
-> IsFlag ( Pkg
, pkgOrderList :: Immediate
), 0 ) == false )
972 DoneSomething
= true ;
974 if ( ImmConfigureAll
) {
975 /* ConfigureAll here to pick up and packages left unconfigured becuase they were unpacked in the
976 "PreUnpack Checks" section */
982 // Final run through the configure phase
983 if ( ConfigureAll () == false )
987 for ( pkgOrderList :: iterator I
= List
-> begin (); I
!= List
-> end (); ++ I
)
989 if ( List
-> IsFlag (* I
, pkgOrderList :: Configured
) == false )
991 _error
-> Error ( "Internal error, packages left unconfigured. %s " ,
992 PkgIterator ( Cache
,* I
). FullName (). c_str ());
1000 // PM::DoInstallPostFork - Does install part that happens after the fork /*{{{*/
1001 // ---------------------------------------------------------------------
1002 pkgPackageManager :: OrderResult
1003 pkgPackageManager :: DoInstallPostFork ( int statusFd
)
1006 // FIXME: use SetCloseExec here once it taught about throwing
1007 // exceptions instead of doing _exit(100) on failure
1008 fcntl ( statusFd
, F_SETFD
, FD_CLOEXEC
);
1009 bool goResult
= Go ( statusFd
);
1010 if ( goResult
== false )
1016 // PM::DoInstall - Does the installation /*{{{*/
1017 // ---------------------------------------------------------------------
1018 /* This uses the filenames in FileNames and the information in the
1019 DepCache to perform the installation of packages.*/
1020 pkgPackageManager :: OrderResult
pkgPackageManager :: DoInstall ( int statusFd
)
1022 if ( DoInstallPreFork () == Failed
)
1025 return DoInstallPostFork ( statusFd
);