]>
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>
34 bool pkgPackageManager :: SigINTStop
= false ;
36 // PM::PackageManager - Constructor /*{{{*/
37 // ---------------------------------------------------------------------
39 pkgPackageManager :: pkgPackageManager ( pkgDepCache
* pCache
) : Cache (* pCache
),
40 List ( NULL
), Res ( Incomplete
)
42 FileNames
= new string
[ Cache
. Head (). PackageCount
];
43 Debug
= _config
-> FindB ( "Debug::pkgPackageManager" , false );
44 NoImmConfigure
= ! _config
-> FindB ( "APT::Immediate-Configure" , true );
45 ImmConfigureAll
= _config
-> FindB ( "APT::Immediate-Configure-All" , false );
48 // PM::PackageManager - Destructor /*{{{*/
49 // ---------------------------------------------------------------------
51 pkgPackageManager ::~ pkgPackageManager ()
57 // PM::GetArchives - Queue the archives for download /*{{{*/
58 // ---------------------------------------------------------------------
60 bool pkgPackageManager :: GetArchives ( pkgAcquire
* Owner
, pkgSourceList
* Sources
,
63 if ( CreateOrderList () == false )
67 _config
-> FindB ( "PackageManager::UnpackAll" , true ) ?
68 List
-> OrderUnpack () : List
-> OrderCritical ();
69 if ( ordering
== false )
70 return _error
-> Error ( "Internal ordering error" );
72 for ( pkgOrderList :: iterator I
= List
-> begin (); I
!= List
-> end (); ++ I
)
74 PkgIterator
Pkg ( Cache
,* I
);
75 FileNames
[ Pkg
-> ID
] = string ();
77 // Skip packages to erase
78 if ( Cache
[ Pkg
]. Delete () == true )
81 // Skip Packages that need configure only.
82 if ( Pkg
. State () == pkgCache :: PkgIterator :: NeedsConfigure
&&
83 Cache
[ Pkg
]. Keep () == true )
86 // Skip already processed packages
87 if ( List
-> IsNow ( Pkg
) == false )
90 new pkgAcqArchive ( Owner
, Sources
, Recs
, Cache
[ Pkg
]. InstVerIter ( Cache
),
97 // PM::FixMissing - Keep all missing packages /*{{{*/
98 // ---------------------------------------------------------------------
99 /* This is called to correct the installation when packages could not
101 bool pkgPackageManager :: FixMissing ()
103 pkgDepCache :: ActionGroup
group ( Cache
);
104 pkgProblemResolver
Resolve (& Cache
);
105 List
-> SetFileList ( FileNames
);
108 for ( PkgIterator I
= Cache
. PkgBegin (); I
. end () == false ; ++ I
)
110 if ( List
-> IsMissing ( I
) == false )
113 // Okay, this file is missing and we need it. Mark it for keep
115 Cache
. MarkKeep ( I
, false , false );
118 // We have to empty the list otherwise it will not have the new changes
125 // Now downgrade everything that is broken
126 return Resolve
. ResolveByKeep () == true && Cache
. BrokenCount () == 0 ;
129 // PM::ImmediateAdd - Add the immediate flag recursivly /*{{{*/
130 // ---------------------------------------------------------------------
131 /* This adds the immediate flag to the pkg and recursively to the
134 void pkgPackageManager :: ImmediateAdd ( PkgIterator I
, bool UseInstallVer
, unsigned const int & Depth
)
140 if ( Cache
[ I
]. InstallVer
== 0 )
142 D
= Cache
[ I
]. InstVerIter ( Cache
). DependsList ();
144 if ( I
-> CurrentVer
== 0 )
146 D
= I
. CurrentVer (). DependsList ();
149 for ( /* nothing */ ; D
. end () == false ; ++ D
)
150 if ( D
-> Type
== pkgCache :: Dep :: Depends
|| D
-> Type
== pkgCache :: Dep :: PreDepends
)
152 if (! List
-> IsFlag ( D
. TargetPkg (), pkgOrderList :: Immediate
))
155 clog
<< OutputInDepth ( Depth
) << "ImmediateAdd(): Adding Immediate flag to " << D
. TargetPkg () << " cause of " << D
. DepType () << " " << I
. FullName () << endl
;
156 List
-> Flag ( D
. TargetPkg (), pkgOrderList :: Immediate
);
157 ImmediateAdd ( D
. TargetPkg (), UseInstallVer
, Depth
+ 1 );
163 // PM::CreateOrderList - Create the ordering class /*{{{*/
164 // ---------------------------------------------------------------------
165 /* This populates the ordering list with all the packages that are
167 bool pkgPackageManager :: CreateOrderList ()
173 List
= new pkgOrderList (& Cache
);
175 if ( Debug
&& ImmConfigureAll
)
176 clog
<< "CreateOrderList(): Adding Immediate flag for all packages because of APT::Immediate-Configure-All" << endl
;
178 // Generate the list of affected packages and sort it
179 for ( PkgIterator I
= Cache
. PkgBegin (); I
. end () == false ; ++ I
)
181 // Ignore no-version packages
182 if ( I
-> VersionList
== 0 )
185 // Mark the package and its dependends for immediate configuration
186 if (((( I
-> Flags
& pkgCache :: Flag :: Essential
) == pkgCache :: Flag :: Essential
) &&
187 NoImmConfigure
== false ) || ImmConfigureAll
)
189 if ( Debug
&& ! ImmConfigureAll
)
190 clog
<< "CreateOrderList(): Adding Immediate flag for " << I
. FullName () << endl
;
191 List
-> Flag ( I
, pkgOrderList :: Immediate
);
193 if (! ImmConfigureAll
) {
194 // Look for other install packages to make immediate configurea
195 ImmediateAdd ( I
, true );
197 // And again with the current version.
198 ImmediateAdd ( I
, false );
203 if (( Cache
[ I
]. Keep () == true ||
204 Cache
[ I
]. InstVerIter ( Cache
) == I
. CurrentVer ()) &&
205 I
. State () == pkgCache :: PkgIterator :: NeedsNothing
&&
206 ( Cache
[ I
]. iFlags
& pkgDepCache :: ReInstall
) != pkgDepCache :: ReInstall
&&
207 ( I
. Purge () != false || Cache
[ I
]. Mode
!= pkgDepCache :: ModeDelete
||
208 ( Cache
[ I
]. iFlags
& pkgDepCache :: Purge
) != pkgDepCache :: Purge
))
211 // Append it to the list
218 // PM::DepAlwaysTrue - Returns true if this dep is irrelevent /*{{{*/
219 // ---------------------------------------------------------------------
220 /* The restriction on provides is to eliminate the case when provides
221 are transitioning between valid states [ie exim to smail] */
222 bool pkgPackageManager :: DepAlwaysTrue ( DepIterator D
)
224 if ( D
. TargetPkg ()-> ProvidesList
!= 0 )
227 if (( Cache
[ D
] & pkgDepCache :: DepInstall
) != 0 &&
228 ( Cache
[ D
] & pkgDepCache :: DepNow
) != 0 )
233 // PM::CheckRConflicts - Look for reverse conflicts /*{{{*/
234 // ---------------------------------------------------------------------
235 /* This looks over the reverses for a conflicts line that needs early
237 bool pkgPackageManager :: CheckRConflicts ( PkgIterator Pkg
, DepIterator D
,
240 for (; D
. end () == false ; ++ D
)
242 if ( D
-> Type
!= pkgCache :: Dep :: Conflicts
&&
243 D
-> Type
!= pkgCache :: Dep :: Obsoletes
)
246 // The package hasnt been changed
247 if ( List
-> IsNow ( Pkg
) == false )
250 // Ignore self conflicts, ignore conflicts from irrelevent versions
251 if ( D
. IsIgnorable ( Pkg
) || D
. ParentVer () != D
. ParentPkg (). CurrentVer ())
254 if ( Cache
. VS (). CheckDep ( Ver
, D
-> CompareOp
, D
. TargetVer ()) == false )
257 if ( EarlyRemove ( D
. ParentPkg ()) == false )
258 return _error
-> Error ( "Reverse conflicts early remove for package ' %s ' failed" ,
259 Pkg
. FullName (). c_str ());
264 // PM::ConfigureAll - Run the all out configuration /*{{{*/
265 // ---------------------------------------------------------------------
266 /* This configures every package. It is assumed they are all unpacked and
267 that the final configuration is valid. This is also used to catch packages
268 that have not been configured when using ImmConfigureAll */
269 bool pkgPackageManager :: ConfigureAll ()
271 pkgOrderList
OList (& Cache
);
273 // Populate the order list
274 for ( pkgOrderList :: iterator I
= List
-> begin (); I
!= List
-> end (); ++ I
)
275 if ( List
-> IsFlag ( pkgCache :: PkgIterator ( Cache
,* I
),
276 pkgOrderList :: UnPacked
) == true )
279 if ( OList
. OrderConfigure () == false )
282 std :: string
const conf
= _config
-> Find ( "PackageManager::Configure" , "all" );
283 bool const ConfigurePkgs
= ( conf
== "all" );
285 // Perform the configuring
286 for ( pkgOrderList :: iterator I
= OList
. begin (); I
!= OList
. end (); ++ I
)
288 PkgIterator
Pkg ( Cache
,* I
);
290 /* Check if the package has been configured, this can happen if SmartConfigure
292 if ( List
-> IsFlag ( Pkg
, pkgOrderList :: Configured
)) continue ;
294 if ( ConfigurePkgs
== true && SmartConfigure ( Pkg
, 0 ) == false ) {
296 _error
-> Error ( _ ( "Could not perform immediate configuration on ' %s '. "
297 "Please see man 5 apt.conf under APT::Immediate-Configure for details. ( %d )" ), Pkg
. FullName (). c_str (), 1 );
299 _error
-> Error ( "Internal error, packages left unconfigured. %s " , Pkg
. FullName (). c_str ());
303 List
-> Flag ( Pkg
, pkgOrderList :: Configured
, pkgOrderList :: States
);
309 // PM::SmartConfigure - Perform immediate configuration of the pkg /*{{{*/
310 // ---------------------------------------------------------------------
311 /* This function tries to put the system in a state where Pkg can be configured.
312 This involves checking each of Pkg's dependanies and unpacking and
313 configuring packages where needed.
315 Note on failure: This method can fail, without causing any problems.
316 This can happen when using Immediate-Configure-All, SmartUnPack may call
317 SmartConfigure, it may fail because of a complex dependancy situation, but
318 a error will only be reported if ConfigureAll fails. This is why some of the
319 messages this function reports on failure (return false;) as just warnings
320 only shown when debuging*/
321 bool pkgPackageManager :: SmartConfigure ( PkgIterator Pkg
, int const Depth
)
323 // If this is true, only check and correct and dependencies without the Loop flag
324 bool const PkgLoop
= List
-> IsFlag ( Pkg
, pkgOrderList :: Loop
);
327 VerIterator InstallVer
= VerIterator ( Cache
, Cache
[ Pkg
]. InstallVer
);
328 clog
<< OutputInDepth ( Depth
) << "SmartConfigure " << Pkg
. FullName () << " (" << InstallVer
. VerStr () << ")" ;
330 clog
<< " (Only Correct Dependencies)" ;
334 VerIterator
const instVer
= Cache
[ Pkg
]. InstVerIter ( Cache
);
336 /* Because of the ordered list, most dependencies should be unpacked,
337 however if there is a loop (A depends on B, B depends on A) this will not
338 be the case, so check for dependencies before configuring. */
339 bool Bad
= false , Changed
= false ;
342 for ( DepIterator D
= instVer
. DependsList (); D
. end () == false ; )
344 // Compute a single dependency element (glob or)
345 pkgCache :: DepIterator Start
, End
;
348 if ( End
-> Type
!= pkgCache :: Dep :: Depends
)
352 // Search for dependencies which are unpacked but aren't configured yet (maybe loops)
353 for ( DepIterator Cur
= Start
; true ; ++ Cur
)
355 SPtrArray
< Version
*> VList
= Cur
. AllTargets ();
357 for ( Version
** I
= VList
; * I
!= 0 ; ++ I
)
359 VerIterator
Ver ( Cache
,* I
);
360 PkgIterator DepPkg
= Ver
. ParentPkg ();
362 // Check if the current version of the package is available and will satisfy this dependency
363 if ( DepPkg
. CurrentVer () == Ver
&& List
-> IsNow ( DepPkg
) == true &&
364 List
-> IsFlag ( DepPkg
, pkgOrderList :: Removed
) == false &&
365 DepPkg
. State () == PkgIterator :: NeedsNothing
)
371 // Check if the version that is going to be installed will satisfy the dependency
372 if ( Cache
[ DepPkg
]. InstallVer
!= * I
)
375 if ( List
-> IsFlag ( DepPkg
, pkgOrderList :: UnPacked
))
377 if ( List
-> IsFlag ( DepPkg
, pkgOrderList :: Loop
) && PkgLoop
)
379 // This dependency has already been dealt with by another SmartConfigure on Pkg
383 /* Check for a loop to prevent one forming
384 If A depends on B and B depends on A, SmartConfigure will
385 just hop between them if this is not checked. Dont remove the
386 loop flag after finishing however as loop is already set.
387 This means that there is another SmartConfigure call for this
388 package and it will remove the loop flag */
389 if ( PkgLoop
== false )
390 List
-> Flag ( Pkg
, pkgOrderList :: Loop
);
391 if ( SmartConfigure ( DepPkg
, Depth
+ 1 ) == true )
394 if ( List
-> IsFlag ( DepPkg
, pkgOrderList :: Loop
) == false )
397 if ( PkgLoop
== false )
398 List
-> RmFlag ( Pkg
, pkgOrderList :: Loop
);
399 // If SmartConfigure was succesfull, Bad is false, so break
403 else if ( List
-> IsFlag ( DepPkg
, pkgOrderList :: Configured
))
416 // Check for dependencies that have not been unpacked, probably due to loops.
417 for ( DepIterator Cur
= Start
; true ; ++ Cur
)
419 SPtrArray
< Version
*> VList
= Cur
. AllTargets ();
421 for ( Version
** I
= VList
; * I
!= 0 ; ++ I
)
423 VerIterator
Ver ( Cache
,* I
);
424 PkgIterator DepPkg
= Ver
. ParentPkg ();
426 // Check if the version that is going to be installed will satisfy the dependency
427 if ( Cache
[ DepPkg
]. InstallVer
!= * I
|| List
-> IsNow ( DepPkg
) == false )
433 std :: clog
<< OutputInDepth ( Depth
) << "Package " << Pkg
<< " loops in SmartConfigure" << std :: endl
;
440 clog
<< OutputInDepth ( Depth
) << "Unpacking " << DepPkg
. FullName () << " to avoid loop " << Cur
<< endl
;
441 if ( PkgLoop
== false )
442 List
-> Flag ( Pkg
, pkgOrderList :: Loop
);
443 if ( SmartUnPack ( DepPkg
, true , Depth
+ 1 ) == true )
446 if ( List
-> IsFlag ( DepPkg
, pkgOrderList :: Loop
) == false )
449 if ( PkgLoop
== false )
450 List
-> RmFlag ( Pkg
, pkgOrderList :: Loop
);
460 if ( Bad
== true && Changed
== false && Debug
== true )
461 std :: clog
<< OutputInDepth ( Depth
) << "Could not satisfy " << Start
<< std :: endl
;
463 } while ( Changed
== true );
467 _error
-> Warning ( _ ( "Could not configure ' %s '. " ), Pkg
. FullName (). c_str ());
471 if ( PkgLoop
) return true ;
473 static std :: string
const conf
= _config
-> Find ( "PackageManager::Configure" , "all" );
474 static bool const ConfigurePkgs
= ( conf
== "all" || conf
== "smart" );
476 if ( List
-> IsFlag ( Pkg
, pkgOrderList :: Configured
))
477 return _error
-> Error ( "Internal configure error on ' %s '." , Pkg
. FullName (). c_str ());
479 if ( ConfigurePkgs
== true && Configure ( Pkg
) == false )
482 List
-> Flag ( Pkg
, pkgOrderList :: Configured
, pkgOrderList :: States
);
484 if (( Cache
[ Pkg
]. InstVerIter ( Cache
)-> MultiArch
& pkgCache :: Version :: Same
) == pkgCache :: Version :: Same
)
485 for ( PkgIterator P
= Pkg
. Group (). PackageList ();
486 P
. end () == false ; P
= Pkg
. Group (). NextPkg ( P
))
488 if ( Pkg
== P
|| List
-> IsFlag ( P
, pkgOrderList :: Configured
) == true ||
489 Cache
[ P
]. InstallVer
== 0 || ( P
. CurrentVer () == Cache
[ P
]. InstallVer
&&
490 ( Cache
[ Pkg
]. iFlags
& pkgDepCache :: ReInstall
) != pkgDepCache :: ReInstall
))
492 SmartConfigure ( P
, ( Depth
+ 1 ));
496 if ( List
-> IsFlag ( Pkg
, pkgOrderList :: Configured
) == false )
497 return _error
-> Error ( _ ( "Could not configure ' %s '. " ), Pkg
. FullName (). c_str ());
502 // PM::EarlyRemove - Perform removal of packages before their time /*{{{*/
503 // ---------------------------------------------------------------------
504 /* This is called to deal with conflicts arising from unpacking */
505 bool pkgPackageManager :: EarlyRemove ( PkgIterator Pkg
)
507 if ( List
-> IsNow ( Pkg
) == false )
510 // Already removed it
511 if ( List
-> IsFlag ( Pkg
, pkgOrderList :: Removed
) == true )
514 // Woops, it will not be re-installed!
515 if ( List
-> IsFlag ( Pkg
, pkgOrderList :: InList
) == false )
518 // Essential packages get special treatment
519 bool IsEssential
= false ;
520 if (( Pkg
-> Flags
& pkgCache :: Flag :: Essential
) != 0 ||
521 ( Pkg
-> Flags
& pkgCache :: Flag :: Important
) != 0 )
524 /* Check for packages that are the dependents of essential packages and
526 if ( Pkg
-> CurrentVer
!= 0 )
528 for ( DepIterator D
= Pkg
. RevDependsList (); D
. end () == false &&
529 IsEssential
== false ; ++ D
)
530 if ( D
-> Type
== pkgCache :: Dep :: Depends
|| D
-> Type
== pkgCache :: Dep :: PreDepends
)
531 if (( D
. ParentPkg ()-> Flags
& pkgCache :: Flag :: Essential
) != 0 ||
532 ( D
. ParentPkg ()-> Flags
& pkgCache :: Flag :: Important
) != 0 )
536 if ( IsEssential
== true )
538 if ( _config
-> FindB ( "APT::Force-LoopBreak" , false ) == false )
539 return _error
-> Error ( _ ( "This installation run will require temporarily "
540 "removing the essential package %s due to a "
541 "Conflicts/Pre-Depends loop. This is often bad, "
542 "but if you really want to do it, activate the "
543 "APT::Force-LoopBreak option." ), Pkg
. FullName (). c_str ());
546 bool Res
= SmartRemove ( Pkg
);
547 if ( Cache
[ Pkg
]. Delete () == false )
548 List
-> Flag ( Pkg
, pkgOrderList :: Removed
, pkgOrderList :: States
);
553 // PM::SmartRemove - Removal Helper /*{{{*/
554 // ---------------------------------------------------------------------
556 bool pkgPackageManager :: SmartRemove ( PkgIterator Pkg
)
558 if ( List
-> IsNow ( Pkg
) == false )
561 List
-> Flag ( Pkg
, pkgOrderList :: Configured
, pkgOrderList :: States
);
563 return Remove ( Pkg
,( Cache
[ Pkg
]. iFlags
& pkgDepCache :: Purge
) == pkgDepCache :: Purge
);
566 // PM::SmartUnPack - Install helper /*{{{*/
567 // ---------------------------------------------------------------------
568 /* This puts the system in a state where it can Unpack Pkg, if Pkg is allready
569 unpacked, or when it has been unpacked, if Immediate==true it configures it. */
570 bool pkgPackageManager :: SmartUnPack ( PkgIterator Pkg
)
572 return SmartUnPack ( Pkg
, true , 0 );
574 bool pkgPackageManager :: SmartUnPack ( PkgIterator Pkg
, bool const Immediate
, int const Depth
)
576 bool PkgLoop
= List
-> IsFlag ( Pkg
, pkgOrderList :: Loop
);
579 clog
<< OutputInDepth ( Depth
) << "SmartUnPack " << Pkg
. FullName ();
580 VerIterator InstallVer
= VerIterator ( Cache
, Cache
[ Pkg
]. InstallVer
);
581 if ( Pkg
. CurrentVer () == 0 )
582 clog
<< " (install version " << InstallVer
. VerStr () << ")" ;
584 clog
<< " (replace version " << Pkg
. CurrentVer (). VerStr () << " with " << InstallVer
. VerStr () << ")" ;
586 clog
<< " (Only Perform PreUnpack Checks)" ;
590 VerIterator
const instVer
= Cache
[ Pkg
]. InstVerIter ( Cache
);
592 /* PreUnpack Checks: This loop checks and attempts to rectify and problems that would prevent the package being unpacked.
593 It addresses: PreDepends, Conflicts, Obsoletes and Breaks (DpkgBreaks). Any resolutions that do not require it should
594 avoid configuration (calling SmartUnpack with Immediate=true), this is because when unpacking some packages with
595 complex dependancy structures, trying to configure some packages while breaking the loops can complicate things .
596 This will be either dealt with if the package is configured as a dependency of Pkg (if and when Pkg is configured),
597 or by the ConfigureAll call at the end of the for loop in OrderInstall. */
598 bool Changed
= false ;
601 for ( DepIterator D
= instVer
. DependsList (); D
. end () == false ; )
603 // Compute a single dependency element (glob or)
604 pkgCache :: DepIterator Start
, End
;
607 if ( End
-> Type
== pkgCache :: Dep :: PreDepends
)
611 clog
<< OutputInDepth ( Depth
) << "PreDepends order for " << Pkg
. FullName () << std :: endl
;
613 // Look for easy targets: packages that are already okay
614 for ( DepIterator Cur
= Start
; Bad
== true ; ++ Cur
)
616 SPtrArray
< Version
*> VList
= Start
. AllTargets ();
617 for ( Version
** I
= VList
; * I
!= 0 ; ++ I
)
619 VerIterator
Ver ( Cache
,* I
);
620 PkgIterator Pkg
= Ver
. ParentPkg ();
622 // See if the current version is ok
623 if ( Pkg
. CurrentVer () == Ver
&& List
-> IsNow ( Pkg
) == true &&
624 Pkg
. State () == PkgIterator :: NeedsNothing
)
628 clog
<< OutputInDepth ( Depth
) << "Found ok package " << Pkg
. FullName () << endl
;
636 // Look for something that could be configured.
637 for ( DepIterator Cur
= Start
; Bad
== true ; ++ Cur
)
639 SPtrArray
< Version
*> VList
= Start
. AllTargets ();
640 for ( Version
** I
= VList
; * I
!= 0 ; ++ I
)
642 VerIterator
Ver ( Cache
,* I
);
643 PkgIterator Pkg
= Ver
. ParentPkg ();
645 // Not the install version
646 if ( Cache
[ Pkg
]. InstallVer
!= * I
||
647 ( Cache
[ Pkg
]. Keep () == true && Pkg
. State () == PkgIterator :: NeedsNothing
))
650 if ( List
-> IsFlag ( Pkg
, pkgOrderList :: Configured
))
656 // check if it needs unpack or if if configure is enough
657 if ( List
-> IsFlag ( Pkg
, pkgOrderList :: UnPacked
) == false )
660 clog
<< OutputInDepth ( Depth
) << "Trying to SmartUnpack " << Pkg
. FullName () << endl
;
661 // SmartUnpack with the ImmediateFlag to ensure its really ready
662 if ( SmartUnPack ( Pkg
, true , Depth
+ 1 ) == true )
665 if ( List
-> IsFlag ( Pkg
, pkgOrderList :: Loop
) == false )
673 clog
<< OutputInDepth ( Depth
) << "Trying to SmartConfigure " << Pkg
. FullName () << endl
;
674 if ( SmartConfigure ( Pkg
, Depth
+ 1 ) == true )
677 if ( List
-> IsFlag ( Pkg
, pkgOrderList :: Loop
) == false )
688 return _error
-> Error ( "Couldn't configure pre-depend %s for %s , "
689 "probably a dependency cycle." ,
690 End
. TargetPkg (). FullName (). c_str (), Pkg
. FullName (). c_str ());
695 else if ( End
-> Type
== pkgCache :: Dep :: Conflicts
||
696 End
-> Type
== pkgCache :: Dep :: Obsoletes
)
698 /* Look for conflicts. Two packages that are both in the install
699 state cannot conflict so we don't check.. */
700 SPtrArray
< Version
*> VList
= End
. AllTargets ();
701 for ( Version
** I
= VList
; * I
!= 0 ; I
++)
703 VerIterator
Ver ( Cache
,* I
);
704 PkgIterator ConflictPkg
= Ver
. ParentPkg ();
705 VerIterator
InstallVer ( Cache
, Cache
[ ConflictPkg
]. InstallVer
);
707 // See if the current version is conflicting
708 if ( ConflictPkg
. CurrentVer () == Ver
&& List
-> IsNow ( ConflictPkg
))
710 clog
<< OutputInDepth ( Depth
) << Pkg
. FullName () << " conflicts with " << ConflictPkg
. FullName () << endl
;
711 /* If a loop is not present or has not yet been detected, attempt to unpack packages
712 to resolve this conflict. If there is a loop present, remove packages to resolve this conflict */
713 if ( List
-> IsFlag ( ConflictPkg
, pkgOrderList :: Loop
) == false )
715 if ( Cache
[ ConflictPkg
]. Keep () == 0 && Cache
[ ConflictPkg
]. InstallVer
!= 0 )
718 clog
<< OutputInDepth ( Depth
) << OutputInDepth ( Depth
) << "Unpacking " << ConflictPkg
. FullName () << " to prevent conflict" << endl
;
719 List
-> Flag ( Pkg
, pkgOrderList :: Loop
);
720 if ( SmartUnPack ( ConflictPkg
, false , Depth
+ 1 ) == true )
721 if ( List
-> IsFlag ( ConflictPkg
, pkgOrderList :: Loop
) == false )
723 // Remove loop to allow it to be used later if needed
724 List
-> RmFlag ( Pkg
, pkgOrderList :: Loop
);
726 else if ( EarlyRemove ( ConflictPkg
) == false )
727 return _error
-> Error ( "Internal Error, Could not early remove %s (1)" , ConflictPkg
. FullName (). c_str ());
729 else if ( List
-> IsFlag ( ConflictPkg
, pkgOrderList :: Removed
) == false )
732 clog
<< OutputInDepth ( Depth
) << "Because of conficts knot, removing " << ConflictPkg
. FullName () << " to conflict violation" << endl
;
733 if ( EarlyRemove ( ConflictPkg
) == false )
734 return _error
-> Error ( "Internal Error, Could not early remove %s (2)" , ConflictPkg
. FullName (). c_str ());
739 else if ( End
-> Type
== pkgCache :: Dep :: DpkgBreaks
)
741 SPtrArray
< Version
*> VList
= End
. AllTargets ();
742 for ( Version
** I
= VList
; * I
!= 0 ; ++ I
)
744 VerIterator
Ver ( Cache
,* I
);
745 PkgIterator BrokenPkg
= Ver
. ParentPkg ();
746 if ( BrokenPkg
. CurrentVer () != Ver
)
749 std :: clog
<< OutputInDepth ( Depth
) << " Ignore not-installed version " << Ver
. VerStr () << " of " << Pkg
. FullName () << " for " << End
<< std :: endl
;
753 // Check if it needs to be unpacked
754 if ( List
-> IsFlag ( BrokenPkg
, pkgOrderList :: InList
) && Cache
[ BrokenPkg
]. Delete () == false &&
755 List
-> IsNow ( BrokenPkg
))
757 if ( List
-> IsFlag ( BrokenPkg
, pkgOrderList :: Loop
) && PkgLoop
)
759 // This dependancy has already been dealt with by another SmartUnPack on Pkg
764 // Found a break, so see if we can unpack the package to avoid it
765 // but do not set loop if another SmartUnPack already deals with it
766 // Also, avoid it if the package we would unpack pre-depends on this one
767 VerIterator
InstallVer ( Cache
, Cache
[ BrokenPkg
]. InstallVer
);
769 for ( pkgCache :: DepIterator D
= InstallVer
. DependsList (); D
. end () == false ; ++ D
)
771 if ( D
-> Type
!= pkgCache :: Dep :: PreDepends
)
773 SPtrArray
< Version
*> VL
= D
. AllTargets ();
774 for ( Version
** I
= VL
; * I
!= 0 ; ++ I
)
776 VerIterator
V ( Cache
,* I
);
777 PkgIterator P
= V
. ParentPkg ();
778 // we are checking for installation as an easy 'protection' against or-groups and (unchosen) providers
779 if ( P
-> CurrentVer
== 0 || P
!= Pkg
|| ( P
. CurrentVer () != V
&& Cache
[ P
]. InstallVer
!= V
))
790 clog
<< OutputInDepth ( Depth
) << " Avoiding " << End
<< " avoided as " << BrokenPkg
. FullName () << " has a pre-depends on " << Pkg
. FullName () << std :: endl
;
797 clog
<< OutputInDepth ( Depth
) << " Unpacking " << BrokenPkg
. FullName () << " to avoid " << End
;
799 clog
<< " (Looping)" ;
802 if ( PkgLoop
== false )
803 List
-> Flag ( Pkg
, pkgOrderList :: Loop
);
804 if ( SmartUnPack ( BrokenPkg
, false , Depth
+ 1 ) == true )
806 if ( List
-> IsFlag ( BrokenPkg
, pkgOrderList :: Loop
) == false )
809 if ( PkgLoop
== false )
810 List
-> RmFlag ( Pkg
, pkgOrderList :: Loop
);
814 // Check if a package needs to be removed
815 else if ( Cache
[ BrokenPkg
]. Delete () == true && List
-> IsFlag ( BrokenPkg
, pkgOrderList :: Configured
) == false )
818 clog
<< OutputInDepth ( Depth
) << " Removing " << BrokenPkg
. FullName () << " to avoid " << End
<< endl
;
819 SmartRemove ( BrokenPkg
);
824 } while ( Changed
== true );
826 // Check for reverse conflicts.
827 if ( CheckRConflicts ( Pkg
, Pkg
. RevDependsList (),
828 instVer
. VerStr ()) == false )
831 for ( PrvIterator P
= instVer
. ProvidesList ();
832 P
. end () == false ; ++ P
)
833 if ( Pkg
-> Group
!= P
. OwnerPkg ()-> Group
)
834 CheckRConflicts ( Pkg
, P
. ParentPkg (). RevDependsList (), P
. ProvideVersion ());
839 List
-> Flag ( Pkg
, pkgOrderList :: UnPacked
, pkgOrderList :: States
);
841 if ( Immediate
== true && ( instVer
-> MultiArch
& pkgCache :: Version :: Same
) == pkgCache :: Version :: Same
)
843 /* Do lockstep M-A:same unpacking in two phases:
844 First unpack all installed architectures, then the not installed.
845 This way we avoid that M-A: enabled packages are installed before
846 their older non-M-A enabled packages are replaced by newer versions */
847 bool const installed
= Pkg
-> CurrentVer
!= 0 ;
848 if ( installed
== true && Install ( Pkg
, FileNames
[ Pkg
-> ID
]) == false )
850 for ( PkgIterator P
= Pkg
. Group (). PackageList ();
851 P
. end () == false ; P
= Pkg
. Group (). NextPkg ( P
))
853 if ( P
-> CurrentVer
== 0 || P
== Pkg
|| List
-> IsFlag ( P
, pkgOrderList :: UnPacked
) == true ||
854 Cache
[ P
]. InstallVer
== 0 || ( P
. CurrentVer () == Cache
[ P
]. InstallVer
&&
855 ( Cache
[ Pkg
]. iFlags
& pkgDepCache :: ReInstall
) != pkgDepCache :: ReInstall
))
857 if ( SmartUnPack ( P
, false , Depth
+ 1 ) == false )
860 if ( installed
== false && Install ( Pkg
, FileNames
[ Pkg
-> ID
]) == false )
862 for ( PkgIterator P
= Pkg
. Group (). PackageList ();
863 P
. end () == false ; P
= Pkg
. Group (). NextPkg ( P
))
865 if ( P
-> CurrentVer
!= 0 || P
== Pkg
|| List
-> IsFlag ( P
, pkgOrderList :: UnPacked
) == true ||
866 Cache
[ P
]. InstallVer
== 0 || ( P
. CurrentVer () == Cache
[ P
]. InstallVer
&&
867 ( Cache
[ Pkg
]. iFlags
& pkgDepCache :: ReInstall
) != pkgDepCache :: ReInstall
))
869 if ( SmartUnPack ( P
, false , Depth
+ 1 ) == false )
873 // packages which are already unpacked don't need to be unpacked again
874 else if ( Pkg
. State () != pkgCache :: PkgIterator :: NeedsConfigure
&& Install ( Pkg
, FileNames
[ Pkg
-> ID
]) == false )
877 if ( Immediate
== true ) {
878 // Perform immedate configuration of the package.
879 if ( SmartConfigure ( Pkg
, Depth
+ 1 ) == false )
880 _error
-> Warning ( _ ( "Could not perform immediate configuration on ' %s '. "
881 "Please see man 5 apt.conf under APT::Immediate-Configure for details. ( %d )" ), Pkg
. FullName (). c_str (), 2 );
887 // PM::OrderInstall - Installation ordering routine /*{{{*/
888 // ---------------------------------------------------------------------
890 pkgPackageManager :: OrderResult
pkgPackageManager :: OrderInstall ()
892 if ( CreateOrderList () == false )
898 clog
<< "Beginning to order" << endl
;
900 bool const ordering
=
901 _config
-> FindB ( "PackageManager::UnpackAll" , true ) ?
902 List
-> OrderUnpack ( FileNames
) : List
-> OrderCritical ();
903 if ( ordering
== false )
905 _error
-> Error ( "Internal ordering error" );
910 clog
<< "Done ordering" << endl
;
912 bool DoneSomething
= false ;
913 for ( pkgOrderList :: iterator I
= List
-> begin (); I
!= List
-> end (); ++ I
)
915 PkgIterator
Pkg ( Cache
,* I
);
917 if ( List
-> IsNow ( Pkg
) == false )
919 if (! List
-> IsFlag ( Pkg
, pkgOrderList :: Configured
) && ! NoImmConfigure
) {
920 if ( SmartConfigure ( Pkg
, 0 ) == false && Debug
)
921 _error
-> Warning ( "Internal Error, Could not configure %s " , Pkg
. FullName (). c_str ());
922 // FIXME: The above warning message might need changing
925 clog
<< "Skipping already done " << Pkg
. FullName () << endl
;
931 if ( List
-> IsMissing ( Pkg
) == true )
934 clog
<< "Sequence completed at " << Pkg
. FullName () << endl
;
935 if ( DoneSomething
== false )
937 _error
-> Error ( "Internal Error, ordering was unable to handle the media swap" );
944 if ( Cache
[ Pkg
]. Keep () == true &&
945 Pkg
. State () == pkgCache :: PkgIterator :: NeedsNothing
&&
946 ( Cache
[ Pkg
]. iFlags
& pkgDepCache :: ReInstall
) != pkgDepCache :: ReInstall
)
948 _error
-> Error ( "Internal Error, trying to manipulate a kept package ( %s )" , Pkg
. FullName (). c_str ());
952 // Perform a delete or an install
953 if ( Cache
[ Pkg
]. Delete () == true )
955 if ( SmartRemove ( Pkg
) == false )
959 if ( SmartUnPack ( Pkg
, List
-> IsFlag ( Pkg
, pkgOrderList :: Immediate
), 0 ) == false )
961 DoneSomething
= true ;
963 if ( ImmConfigureAll
) {
964 /* ConfigureAll here to pick up and packages left unconfigured becuase they were unpacked in the
965 "PreUnpack Checks" section */
971 // Final run through the configure phase
972 if ( ConfigureAll () == false )
976 for ( pkgOrderList :: iterator I
= List
-> begin (); I
!= List
-> end (); ++ I
)
978 if ( List
-> IsFlag (* I
, pkgOrderList :: Configured
) == false )
980 _error
-> Error ( "Internal error, packages left unconfigured. %s " ,
981 PkgIterator ( Cache
,* I
). FullName (). c_str ());
989 // PM::DoInstallPostFork - Does install part that happens after the fork /*{{{*/
990 // ---------------------------------------------------------------------
991 pkgPackageManager :: OrderResult
992 pkgPackageManager :: DoInstallPostFork ( int statusFd
)
995 // FIXME: use SetCloseExec here once it taught about throwing
996 // exceptions instead of doing _exit(100) on failure
997 fcntl ( statusFd
, F_SETFD
, FD_CLOEXEC
);
998 bool goResult
= Go ( statusFd
);
999 if ( goResult
== false )
1005 // PM::DoInstall - Does the installation /*{{{*/
1006 // ---------------------------------------------------------------------
1007 /* This uses the filenames in FileNames and the information in the
1008 DepCache to perform the installation of packages.*/
1009 pkgPackageManager :: OrderResult
pkgPackageManager :: DoInstall ( int statusFd
)
1011 if ( DoInstallPreFork () == Failed
)
1014 return DoInstallPostFork ( statusFd
);