]>
git.saurik.com Git - apt.git/blob - apt-pkg/packagemanager.cc
a2079a2e4554d76429a8765612cb2c690eae4dae
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 ;
340 const unsigned int max_loops
= _config
-> FindI ( "APT::pkgPackageManager::MaxLoopCount" , 5000 );
342 std :: list
< DepIterator
> needConfigure
;
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 // Check for dependencies that have not been unpacked, probably due to 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
|| List
-> IsNow ( DepPkg
) == false )
382 std :: clog
<< OutputInDepth ( Depth
) << "Package " << Pkg
<< " loops in SmartConfigure" << std :: endl
;
389 clog
<< OutputInDepth ( Depth
) << "Unpacking " << DepPkg
. FullName () << " to avoid loop " << Cur
<< endl
;
390 if ( PkgLoop
== false )
391 List
-> Flag ( Pkg
, pkgOrderList :: Loop
);
392 if ( SmartUnPack ( DepPkg
, true , Depth
+ 1 ) == true )
395 if ( List
-> IsFlag ( DepPkg
, pkgOrderList :: Loop
) == false )
398 if ( PkgLoop
== false )
399 List
-> RmFlag ( Pkg
, pkgOrderList :: Loop
);
405 if ( Cur
== End
|| Bad
== false )
412 needConfigure
. push_back ( Start
);
415 return _error
-> Error ( "Internal error: MaxLoopCount reached in SmartUnPack (1) for %s , aborting" , Pkg
. FullName (). c_str ());
416 } while ( Changed
== true );
418 Bad
= false , Changed
= false , i
= 0 ;
422 for ( std :: list
< DepIterator
>:: const_iterator D
= needConfigure
. begin (); D
!= needConfigure
. end (); ++ D
)
424 // Compute a single dependency element (glob or) without modifying D
425 pkgCache :: DepIterator Start
, End
;
427 pkgCache :: DepIterator Discard
= * D
;
428 Discard
. GlobOr ( Start
, End
);
431 if ( End
-> Type
!= pkgCache :: Dep :: Depends
)
435 // Search for dependencies which are unpacked but aren't configured yet (maybe loops)
436 for ( DepIterator Cur
= Start
; true ; ++ Cur
)
438 SPtrArray
< Version
*> VList
= Cur
. AllTargets ();
440 for ( Version
** I
= VList
; * I
!= 0 ; ++ I
)
442 VerIterator
Ver ( Cache
,* I
);
443 PkgIterator DepPkg
= Ver
. ParentPkg ();
445 // Check if the version that is going to be installed will satisfy the dependency
446 if ( Cache
[ DepPkg
]. InstallVer
!= * I
)
449 if ( List
-> IsFlag ( DepPkg
, pkgOrderList :: UnPacked
))
451 if ( List
-> IsFlag ( DepPkg
, pkgOrderList :: Loop
) && PkgLoop
)
453 // This dependency has already been dealt with by another SmartConfigure on Pkg
457 /* Check for a loop to prevent one forming
458 If A depends on B and B depends on A, SmartConfigure will
459 just hop between them if this is not checked. Dont remove the
460 loop flag after finishing however as loop is already set.
461 This means that there is another SmartConfigure call for this
462 package and it will remove the loop flag */
463 if ( PkgLoop
== false )
464 List
-> Flag ( Pkg
, pkgOrderList :: Loop
);
465 if ( SmartConfigure ( DepPkg
, Depth
+ 1 ) == true )
468 if ( List
-> IsFlag ( DepPkg
, pkgOrderList :: Loop
) == false )
471 if ( PkgLoop
== false )
472 List
-> RmFlag ( Pkg
, pkgOrderList :: Loop
);
473 // If SmartConfigure was succesfull, Bad is false, so break
477 else if ( List
-> IsFlag ( DepPkg
, pkgOrderList :: Configured
))
483 if ( Cur
== End
|| Bad
== false )
488 if ( Bad
== true && Changed
== false && Debug
== true )
489 std :: clog
<< OutputInDepth ( Depth
) << "Could not satisfy " << * D
<< std :: endl
;
492 return _error
-> Error ( "Internal error: MaxLoopCount reached in SmartUnPack (2) for %s , aborting" , Pkg
. FullName (). c_str ());
493 } while ( Changed
== true );
497 _error
-> Warning ( _ ( "Could not configure ' %s '. " ), Pkg
. FullName (). c_str ());
501 if ( PkgLoop
) return true ;
503 static std :: string
const conf
= _config
-> Find ( "PackageManager::Configure" , "all" );
504 static bool const ConfigurePkgs
= ( conf
== "all" || conf
== "smart" );
506 if ( List
-> IsFlag ( Pkg
, pkgOrderList :: Configured
))
507 return _error
-> Error ( "Internal configure error on ' %s '." , Pkg
. FullName (). c_str ());
509 if ( ConfigurePkgs
== true && Configure ( Pkg
) == false )
512 List
-> Flag ( Pkg
, pkgOrderList :: Configured
, pkgOrderList :: States
);
514 if (( Cache
[ Pkg
]. InstVerIter ( Cache
)-> MultiArch
& pkgCache :: Version :: Same
) == pkgCache :: Version :: Same
)
515 for ( PkgIterator P
= Pkg
. Group (). PackageList ();
516 P
. end () == false ; P
= Pkg
. Group (). NextPkg ( P
))
518 if ( Pkg
== P
|| List
-> IsFlag ( P
, pkgOrderList :: Configured
) == true ||
519 List
-> IsFlag ( P
, pkgOrderList :: UnPacked
) == false ||
520 Cache
[ P
]. InstallVer
== 0 || ( P
. CurrentVer () == Cache
[ P
]. InstallVer
&&
521 ( Cache
[ Pkg
]. iFlags
& pkgDepCache :: ReInstall
) != pkgDepCache :: ReInstall
))
523 SmartConfigure ( P
, ( Depth
+ 1 ));
527 if ( List
-> IsFlag ( Pkg
, pkgOrderList :: Configured
) == false )
528 return _error
-> Error ( _ ( "Could not configure ' %s '. " ), Pkg
. FullName (). c_str ());
533 // PM::EarlyRemove - Perform removal of packages before their time /*{{{*/
534 // ---------------------------------------------------------------------
535 /* This is called to deal with conflicts arising from unpacking */
536 bool pkgPackageManager :: EarlyRemove ( PkgIterator Pkg
)
538 if ( List
-> IsNow ( Pkg
) == false )
541 // Already removed it
542 if ( List
-> IsFlag ( Pkg
, pkgOrderList :: Removed
) == true )
545 // Woops, it will not be re-installed!
546 if ( List
-> IsFlag ( Pkg
, pkgOrderList :: InList
) == false )
549 // Essential packages get special treatment
550 bool IsEssential
= false ;
551 if (( Pkg
-> Flags
& pkgCache :: Flag :: Essential
) != 0 ||
552 ( Pkg
-> Flags
& pkgCache :: Flag :: Important
) != 0 )
555 /* Check for packages that are the dependents of essential packages and
557 if ( Pkg
-> CurrentVer
!= 0 )
559 for ( DepIterator D
= Pkg
. RevDependsList (); D
. end () == false &&
560 IsEssential
== false ; ++ D
)
561 if ( D
-> Type
== pkgCache :: Dep :: Depends
|| D
-> Type
== pkgCache :: Dep :: PreDepends
)
562 if (( D
. ParentPkg ()-> Flags
& pkgCache :: Flag :: Essential
) != 0 ||
563 ( D
. ParentPkg ()-> Flags
& pkgCache :: Flag :: Important
) != 0 )
567 if ( IsEssential
== true )
569 if ( _config
-> FindB ( "APT::Force-LoopBreak" , false ) == false )
570 return _error
-> Error ( _ ( "This installation run will require temporarily "
571 "removing the essential package %s due to a "
572 "Conflicts/Pre-Depends loop. This is often bad, "
573 "but if you really want to do it, activate the "
574 "APT::Force-LoopBreak option." ), Pkg
. FullName (). c_str ());
577 bool Res
= SmartRemove ( Pkg
);
578 if ( Cache
[ Pkg
]. Delete () == false )
579 List
-> Flag ( Pkg
, pkgOrderList :: Removed
, pkgOrderList :: States
);
584 // PM::SmartRemove - Removal Helper /*{{{*/
585 // ---------------------------------------------------------------------
587 bool pkgPackageManager :: SmartRemove ( PkgIterator Pkg
)
589 if ( List
-> IsNow ( Pkg
) == false )
592 List
-> Flag ( Pkg
, pkgOrderList :: Configured
, pkgOrderList :: States
);
594 return Remove ( Pkg
,( Cache
[ Pkg
]. iFlags
& pkgDepCache :: Purge
) == pkgDepCache :: Purge
);
597 // PM::SmartUnPack - Install helper /*{{{*/
598 // ---------------------------------------------------------------------
599 /* This puts the system in a state where it can Unpack Pkg, if Pkg is allready
600 unpacked, or when it has been unpacked, if Immediate==true it configures it. */
601 bool pkgPackageManager :: SmartUnPack ( PkgIterator Pkg
)
603 return SmartUnPack ( Pkg
, true , 0 );
605 bool pkgPackageManager :: SmartUnPack ( PkgIterator Pkg
, bool const Immediate
, int const Depth
)
607 bool PkgLoop
= List
-> IsFlag ( Pkg
, pkgOrderList :: Loop
);
610 clog
<< OutputInDepth ( Depth
) << "SmartUnPack " << Pkg
. FullName ();
611 VerIterator InstallVer
= VerIterator ( Cache
, Cache
[ Pkg
]. InstallVer
);
612 if ( Pkg
. CurrentVer () == 0 )
613 clog
<< " (install version " << InstallVer
. VerStr () << ")" ;
615 clog
<< " (replace version " << Pkg
. CurrentVer (). VerStr () << " with " << InstallVer
. VerStr () << ")" ;
617 clog
<< " (Only Perform PreUnpack Checks)" ;
621 VerIterator
const instVer
= Cache
[ Pkg
]. InstVerIter ( Cache
);
623 /* PreUnpack Checks: This loop checks and attempts to rectify and problems that would prevent the package being unpacked.
624 It addresses: PreDepends, Conflicts, Obsoletes and Breaks (DpkgBreaks). Any resolutions that do not require it should
625 avoid configuration (calling SmartUnpack with Immediate=true), this is because when unpacking some packages with
626 complex dependancy structures, trying to configure some packages while breaking the loops can complicate things .
627 This will be either dealt with if the package is configured as a dependency of Pkg (if and when Pkg is configured),
628 or by the ConfigureAll call at the end of the for loop in OrderInstall. */
629 bool Changed
= false ;
630 const unsigned int max_loops
= _config
-> FindI ( "APT::pkgPackageManager::MaxLoopCount" , 5000 );
635 for ( DepIterator D
= instVer
. DependsList (); D
. end () == false ; )
637 // Compute a single dependency element (glob or)
638 pkgCache :: DepIterator Start
, End
;
641 if ( End
-> Type
== pkgCache :: Dep :: PreDepends
)
645 clog
<< OutputInDepth ( Depth
) << "PreDepends order for " << Pkg
. FullName () << std :: endl
;
647 // Look for easy targets: packages that are already okay
648 for ( DepIterator Cur
= Start
; Bad
== true ; ++ Cur
)
650 SPtrArray
< Version
*> VList
= Cur
. AllTargets ();
651 for ( Version
** I
= VList
; * I
!= 0 ; ++ I
)
653 VerIterator
Ver ( Cache
,* I
);
654 PkgIterator Pkg
= Ver
. ParentPkg ();
656 // See if the current version is ok
657 if ( Pkg
. CurrentVer () == Ver
&& List
-> IsNow ( Pkg
) == true &&
658 Pkg
. State () == PkgIterator :: NeedsNothing
)
662 clog
<< OutputInDepth ( Depth
) << "Found ok package " << Pkg
. FullName () << endl
;
670 // Look for something that could be configured.
671 for ( DepIterator Cur
= Start
; Bad
== true && Cur
. end () == false ; ++ Cur
)
673 SPtrArray
< Version
*> VList
= Cur
. AllTargets ();
674 for ( Version
** I
= VList
; * I
!= 0 ; ++ I
)
676 VerIterator
Ver ( Cache
,* I
);
677 PkgIterator Pkg
= Ver
. ParentPkg ();
679 // Not the install version
680 if ( Cache
[ Pkg
]. InstallVer
!= * I
||
681 ( Cache
[ Pkg
]. Keep () == true && Pkg
. State () == PkgIterator :: NeedsNothing
))
684 if ( List
-> IsFlag ( Pkg
, pkgOrderList :: Configured
))
690 // check if it needs unpack or if if configure is enough
691 if ( List
-> IsFlag ( Pkg
, pkgOrderList :: UnPacked
) == false )
694 clog
<< OutputInDepth ( Depth
) << "Trying to SmartUnpack " << Pkg
. FullName () << endl
;
695 // SmartUnpack with the ImmediateFlag to ensure its really ready
696 if ( SmartUnPack ( Pkg
, true , Depth
+ 1 ) == true )
699 if ( List
-> IsFlag ( Pkg
, pkgOrderList :: Loop
) == false )
707 clog
<< OutputInDepth ( Depth
) << "Trying to SmartConfigure " << Pkg
. FullName () << endl
;
708 if ( SmartConfigure ( Pkg
, Depth
+ 1 ) == true )
711 if ( List
-> IsFlag ( Pkg
, pkgOrderList :: Loop
) == false )
722 return _error
-> Error ( "Couldn't configure pre-depend %s for %s , "
723 "probably a dependency cycle." ,
724 End
. TargetPkg (). FullName (). c_str (), Pkg
. FullName (). c_str ());
729 else if ( End
-> Type
== pkgCache :: Dep :: Conflicts
||
730 End
-> Type
== pkgCache :: Dep :: Obsoletes
)
732 /* Look for conflicts. Two packages that are both in the install
733 state cannot conflict so we don't check.. */
734 SPtrArray
< Version
*> VList
= End
. AllTargets ();
735 for ( Version
** I
= VList
; * I
!= 0 ; I
++)
737 VerIterator
Ver ( Cache
,* I
);
738 PkgIterator ConflictPkg
= Ver
. ParentPkg ();
739 VerIterator
InstallVer ( Cache
, Cache
[ ConflictPkg
]. InstallVer
);
741 // See if the current version is conflicting
742 if ( ConflictPkg
. CurrentVer () == Ver
&& List
-> IsNow ( ConflictPkg
))
744 clog
<< OutputInDepth ( Depth
) << Pkg
. FullName () << " conflicts with " << ConflictPkg
. FullName () << endl
;
745 /* If a loop is not present or has not yet been detected, attempt to unpack packages
746 to resolve this conflict. If there is a loop present, remove packages to resolve this conflict */
747 if ( List
-> IsFlag ( ConflictPkg
, pkgOrderList :: Loop
) == false )
749 if ( Cache
[ ConflictPkg
]. Keep () == 0 && Cache
[ ConflictPkg
]. InstallVer
!= 0 )
752 clog
<< OutputInDepth ( Depth
) << OutputInDepth ( Depth
) << "Unpacking " << ConflictPkg
. FullName () << " to prevent conflict" << endl
;
753 List
-> Flag ( Pkg
, pkgOrderList :: Loop
);
754 if ( SmartUnPack ( ConflictPkg
, false , Depth
+ 1 ) == true )
755 if ( List
-> IsFlag ( ConflictPkg
, pkgOrderList :: Loop
) == false )
757 // Remove loop to allow it to be used later if needed
758 List
-> RmFlag ( Pkg
, pkgOrderList :: Loop
);
760 else if ( EarlyRemove ( ConflictPkg
) == false )
761 return _error
-> Error ( "Internal Error, Could not early remove %s (1)" , ConflictPkg
. FullName (). c_str ());
763 else if ( List
-> IsFlag ( ConflictPkg
, pkgOrderList :: Removed
) == false )
766 clog
<< OutputInDepth ( Depth
) << "Because of conficts knot, removing " << ConflictPkg
. FullName () << " to conflict violation" << endl
;
767 if ( EarlyRemove ( ConflictPkg
) == false )
768 return _error
-> Error ( "Internal Error, Could not early remove %s (2)" , ConflictPkg
. FullName (). c_str ());
773 else if ( End
-> Type
== pkgCache :: Dep :: DpkgBreaks
)
775 SPtrArray
< Version
*> VList
= End
. AllTargets ();
776 for ( Version
** I
= VList
; * I
!= 0 ; ++ I
)
778 VerIterator
Ver ( Cache
,* I
);
779 PkgIterator BrokenPkg
= Ver
. ParentPkg ();
780 if ( BrokenPkg
. CurrentVer () != Ver
)
783 std :: clog
<< OutputInDepth ( Depth
) << " Ignore not-installed version " << Ver
. VerStr () << " of " << Pkg
. FullName () << " for " << End
<< std :: endl
;
787 // Check if it needs to be unpacked
788 if ( List
-> IsFlag ( BrokenPkg
, pkgOrderList :: InList
) && Cache
[ BrokenPkg
]. Delete () == false &&
789 List
-> IsNow ( BrokenPkg
))
791 if ( List
-> IsFlag ( BrokenPkg
, pkgOrderList :: Loop
) && PkgLoop
)
793 // This dependancy has already been dealt with by another SmartUnPack on Pkg
798 // Found a break, so see if we can unpack the package to avoid it
799 // but do not set loop if another SmartUnPack already deals with it
800 // Also, avoid it if the package we would unpack pre-depends on this one
801 VerIterator
InstallVer ( Cache
, Cache
[ BrokenPkg
]. InstallVer
);
803 for ( pkgCache :: DepIterator D
= InstallVer
. DependsList (); D
. end () == false ; ++ D
)
805 if ( D
-> Type
!= pkgCache :: Dep :: PreDepends
)
807 SPtrArray
< Version
*> VL
= D
. AllTargets ();
808 for ( Version
** I
= VL
; * I
!= 0 ; ++ I
)
810 VerIterator
V ( Cache
,* I
);
811 PkgIterator P
= V
. ParentPkg ();
812 // we are checking for installation as an easy 'protection' against or-groups and (unchosen) providers
813 if ( P
!= Pkg
|| ( P
. CurrentVer () != V
&& Cache
[ P
]. InstallVer
!= V
))
824 clog
<< OutputInDepth ( Depth
) << " Avoiding " << End
<< " avoided as " << BrokenPkg
. FullName () << " has a pre-depends on " << Pkg
. FullName () << std :: endl
;
831 clog
<< OutputInDepth ( Depth
) << " Unpacking " << BrokenPkg
. FullName () << " to avoid " << End
;
833 clog
<< " (Looping)" ;
836 if ( PkgLoop
== false )
837 List
-> Flag ( Pkg
, pkgOrderList :: Loop
);
838 if ( SmartUnPack ( BrokenPkg
, false , Depth
+ 1 ) == true )
840 if ( List
-> IsFlag ( BrokenPkg
, pkgOrderList :: Loop
) == false )
843 if ( PkgLoop
== false )
844 List
-> RmFlag ( Pkg
, pkgOrderList :: Loop
);
848 // Check if a package needs to be removed
849 else if ( Cache
[ BrokenPkg
]. Delete () == true && List
-> IsFlag ( BrokenPkg
, pkgOrderList :: Configured
) == false )
852 clog
<< OutputInDepth ( Depth
) << " Removing " << BrokenPkg
. FullName () << " to avoid " << End
<< endl
;
853 SmartRemove ( BrokenPkg
);
859 return _error
-> Error ( "Internal error: APT::pkgPackageManager::MaxLoopCount reached in SmartConfigure for %s , aborting" , Pkg
. FullName (). c_str ());
860 } while ( Changed
== true );
862 // Check for reverse conflicts.
863 if ( CheckRConflicts ( Pkg
, Pkg
. RevDependsList (),
864 instVer
. VerStr ()) == false )
867 for ( PrvIterator P
= instVer
. ProvidesList ();
868 P
. end () == false ; ++ P
)
869 if ( Pkg
-> Group
!= P
. OwnerPkg ()-> Group
)
870 CheckRConflicts ( Pkg
, P
. ParentPkg (). RevDependsList (), P
. ProvideVersion ());
875 List
-> Flag ( Pkg
, pkgOrderList :: UnPacked
, pkgOrderList :: States
);
877 if ( Immediate
== true && ( instVer
-> MultiArch
& pkgCache :: Version :: Same
) == pkgCache :: Version :: Same
)
879 /* Do lockstep M-A:same unpacking in two phases:
880 First unpack all installed architectures, then the not installed.
881 This way we avoid that M-A: enabled packages are installed before
882 their older non-M-A enabled packages are replaced by newer versions */
883 bool const installed
= Pkg
-> CurrentVer
!= 0 ;
884 if ( installed
== true &&
885 ( instVer
!= Pkg
. CurrentVer () ||
886 (( Cache
[ Pkg
]. iFlags
& pkgDepCache :: ReInstall
) == pkgDepCache :: ReInstall
)) &&
887 Install ( Pkg
, FileNames
[ Pkg
-> ID
]) == false )
889 for ( PkgIterator P
= Pkg
. Group (). PackageList ();
890 P
. end () == false ; P
= Pkg
. Group (). NextPkg ( P
))
892 if ( P
-> CurrentVer
== 0 || P
== Pkg
|| List
-> IsFlag ( P
, pkgOrderList :: UnPacked
) == true ||
893 Cache
[ P
]. InstallVer
== 0 || ( P
. CurrentVer () == Cache
[ P
]. InstallVer
&&
894 ( Cache
[ Pkg
]. iFlags
& pkgDepCache :: ReInstall
) != pkgDepCache :: ReInstall
))
896 if ( SmartUnPack ( P
, false , Depth
+ 1 ) == false )
899 if ( installed
== false && Install ( Pkg
, FileNames
[ Pkg
-> ID
]) == false )
901 for ( PkgIterator P
= Pkg
. Group (). PackageList ();
902 P
. end () == false ; P
= Pkg
. Group (). NextPkg ( P
))
904 if ( P
-> CurrentVer
!= 0 || P
== Pkg
|| List
-> IsFlag ( P
, pkgOrderList :: UnPacked
) == true ||
905 List
-> IsFlag ( P
, pkgOrderList :: Configured
) == true ||
906 Cache
[ P
]. InstallVer
== 0 || ( P
. CurrentVer () == Cache
[ P
]. InstallVer
&&
907 ( Cache
[ Pkg
]. iFlags
& pkgDepCache :: ReInstall
) != pkgDepCache :: ReInstall
))
909 if ( SmartUnPack ( P
, false , Depth
+ 1 ) == false )
913 // packages which are already unpacked don't need to be unpacked again
914 else if (( instVer
!= Pkg
. CurrentVer () ||
915 (( Cache
[ Pkg
]. iFlags
& pkgDepCache :: ReInstall
) == pkgDepCache :: ReInstall
)) &&
916 Install ( Pkg
, FileNames
[ Pkg
-> ID
]) == false )
919 if ( Immediate
== true ) {
920 // Perform immedate configuration of the package.
921 if ( SmartConfigure ( Pkg
, Depth
+ 1 ) == false )
922 _error
-> Warning ( _ ( "Could not perform immediate configuration on ' %s '. "
923 "Please see man 5 apt.conf under APT::Immediate-Configure for details. ( %d )" ), Pkg
. FullName (). c_str (), 2 );
929 // PM::OrderInstall - Installation ordering routine /*{{{*/
930 // ---------------------------------------------------------------------
932 pkgPackageManager :: OrderResult
pkgPackageManager :: OrderInstall ()
934 if ( CreateOrderList () == false )
940 clog
<< "Beginning to order" << endl
;
942 bool const ordering
=
943 _config
-> FindB ( "PackageManager::UnpackAll" , true ) ?
944 List
-> OrderUnpack ( FileNames
) : List
-> OrderCritical ();
945 if ( ordering
== false )
947 _error
-> Error ( "Internal ordering error" );
952 clog
<< "Done ordering" << endl
;
954 bool DoneSomething
= false ;
955 for ( pkgOrderList :: iterator I
= List
-> begin (); I
!= List
-> end (); ++ I
)
957 PkgIterator
Pkg ( Cache
,* I
);
959 if ( List
-> IsNow ( Pkg
) == false )
961 if (! List
-> IsFlag ( Pkg
, pkgOrderList :: Configured
) && ! NoImmConfigure
) {
962 if ( SmartConfigure ( Pkg
, 0 ) == false && Debug
)
963 _error
-> Warning ( "Internal Error, Could not configure %s " , Pkg
. FullName (). c_str ());
964 // FIXME: The above warning message might need changing
967 clog
<< "Skipping already done " << Pkg
. FullName () << endl
;
973 if ( List
-> IsMissing ( Pkg
) == true )
976 clog
<< "Sequence completed at " << Pkg
. FullName () << endl
;
977 if ( DoneSomething
== false )
979 _error
-> Error ( "Internal Error, ordering was unable to handle the media swap" );
986 if ( Cache
[ Pkg
]. Keep () == true &&
987 Pkg
. State () == pkgCache :: PkgIterator :: NeedsNothing
&&
988 ( Cache
[ Pkg
]. iFlags
& pkgDepCache :: ReInstall
) != pkgDepCache :: ReInstall
)
990 _error
-> Error ( "Internal Error, trying to manipulate a kept package ( %s )" , Pkg
. FullName (). c_str ());
994 // Perform a delete or an install
995 if ( Cache
[ Pkg
]. Delete () == true )
997 if ( SmartRemove ( Pkg
) == false )
1001 if ( SmartUnPack ( Pkg
, List
-> IsFlag ( Pkg
, pkgOrderList :: Immediate
), 0 ) == false )
1003 DoneSomething
= true ;
1005 if ( ImmConfigureAll
) {
1006 /* ConfigureAll here to pick up and packages left unconfigured becuase they were unpacked in the
1007 "PreUnpack Checks" section */
1008 if (! ConfigureAll ())
1013 // Final run through the configure phase
1014 if ( ConfigureAll () == false )
1018 for ( pkgOrderList :: iterator I
= List
-> begin (); I
!= List
-> end (); ++ I
)
1020 if ( List
-> IsFlag (* I
, pkgOrderList :: Configured
) == false )
1022 _error
-> Error ( "Internal error, packages left unconfigured. %s " ,
1023 PkgIterator ( Cache
,* I
). FullName (). c_str ());
1030 // PM::DoInstallPostFork - compat /*{{{*/
1031 // ---------------------------------------------------------------------
1033 pkgPackageManager :: OrderResult
1034 pkgPackageManager :: DoInstallPostFork ( int statusFd
)
1036 APT :: Progress :: PackageManager
* progress
= new
1037 APT :: Progress :: PackageManagerProgressFd ( statusFd
);
1038 pkgPackageManager :: OrderResult res
= DoInstallPostFork ( progress
);
1043 // PM::DoInstallPostFork - Does install part that happens after the fork /*{{{*/
1044 // ---------------------------------------------------------------------
1045 pkgPackageManager :: OrderResult
1046 pkgPackageManager :: DoInstallPostFork ( APT :: Progress :: PackageManager
* progress
)
1048 bool goResult
= Go ( progress
);
1049 if ( goResult
== false )
1055 // PM::DoInstall - Does the installation /*{{{*/
1056 // ---------------------------------------------------------------------
1058 pkgPackageManager :: OrderResult
1059 pkgPackageManager :: DoInstall ( int statusFd
)
1061 APT :: Progress :: PackageManager
* progress
= new
1062 APT :: Progress :: PackageManagerProgressFd ( statusFd
);
1063 OrderResult res
= DoInstall ( progress
);
1068 // PM::DoInstall - Does the installation /*{{{*/
1069 // ---------------------------------------------------------------------
1070 /* This uses the filenames in FileNames and the information in the
1071 DepCache to perform the installation of packages.*/
1072 pkgPackageManager :: OrderResult
1073 pkgPackageManager :: DoInstall ( APT :: Progress :: PackageManager
* progress
)
1075 if ( DoInstallPreFork () == Failed
)
1078 return DoInstallPostFork ( progress
);