]>
git.saurik.com Git - apt.git/blob - apt-pkg/packagemanager.cc
4d08fb3ba503e62c1a1e7361aa4c23645c2cd14e
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>
27 #include <apt-pkg/macros.h>
28 #include <apt-pkg/pkgcache.h>
29 #include <apt-pkg/cacheiterators.h>
30 #include <apt-pkg/strutl.h>
41 bool pkgPackageManager :: SigINTStop
= false ;
43 // PM::PackageManager - Constructor /*{{{*/
44 // ---------------------------------------------------------------------
46 pkgPackageManager :: pkgPackageManager ( pkgDepCache
* pCache
) : Cache (* pCache
),
47 List ( NULL
), Res ( Incomplete
)
49 FileNames
= new string
[ Cache
. Head (). PackageCount
];
50 Debug
= _config
-> FindB ( "Debug::pkgPackageManager" , false );
51 NoImmConfigure
= ! _config
-> FindB ( "APT::Immediate-Configure" , true );
52 ImmConfigureAll
= _config
-> FindB ( "APT::Immediate-Configure-All" , false );
55 // PM::PackageManager - Destructor /*{{{*/
56 // ---------------------------------------------------------------------
58 pkgPackageManager ::~ pkgPackageManager ()
64 // PM::GetArchives - Queue the archives for download /*{{{*/
65 // ---------------------------------------------------------------------
67 bool pkgPackageManager :: GetArchives ( pkgAcquire
* Owner
, pkgSourceList
* Sources
,
70 if ( CreateOrderList () == false )
74 _config
-> FindB ( "PackageManager::UnpackAll" , true ) ?
75 List
-> OrderUnpack () : List
-> OrderCritical ();
76 if ( ordering
== false )
77 return _error
-> Error ( "Internal ordering error" );
79 for ( pkgOrderList :: iterator I
= List
-> begin (); I
!= List
-> end (); ++ I
)
81 PkgIterator
Pkg ( Cache
,* I
);
82 FileNames
[ Pkg
-> ID
] = string ();
84 // Skip packages to erase
85 if ( Cache
[ Pkg
]. Delete () == true )
88 // Skip Packages that need configure only.
89 if ( Pkg
. State () == pkgCache :: PkgIterator :: NeedsConfigure
&&
90 Cache
[ Pkg
]. Keep () == true )
93 // Skip already processed packages
94 if ( List
-> IsNow ( Pkg
) == false )
97 new pkgAcqArchive ( Owner
, Sources
, Recs
, Cache
[ Pkg
]. InstVerIter ( Cache
),
104 // PM::FixMissing - Keep all missing packages /*{{{*/
105 // ---------------------------------------------------------------------
106 /* This is called to correct the installation when packages could not
108 bool pkgPackageManager :: FixMissing ()
110 pkgDepCache :: ActionGroup
group ( Cache
);
111 pkgProblemResolver
Resolve (& Cache
);
112 List
-> SetFileList ( FileNames
);
115 for ( PkgIterator I
= Cache
. PkgBegin (); I
. end () == false ; ++ I
)
117 if ( List
-> IsMissing ( I
) == false )
120 // Okay, this file is missing and we need it. Mark it for keep
122 Cache
. MarkKeep ( I
, false , false );
125 // We have to empty the list otherwise it will not have the new changes
132 // Now downgrade everything that is broken
133 return Resolve
. ResolveByKeep () == true && Cache
. BrokenCount () == 0 ;
136 // PM::ImmediateAdd - Add the immediate flag recursivly /*{{{*/
137 // ---------------------------------------------------------------------
138 /* This adds the immediate flag to the pkg and recursively to the
141 void pkgPackageManager :: ImmediateAdd ( PkgIterator I
, bool UseInstallVer
, unsigned const int & Depth
)
147 if ( Cache
[ I
]. InstallVer
== 0 )
149 D
= Cache
[ I
]. InstVerIter ( Cache
). DependsList ();
151 if ( I
-> CurrentVer
== 0 )
153 D
= I
. CurrentVer (). DependsList ();
156 for ( /* nothing */ ; D
. end () == false ; ++ D
)
157 if ( D
-> Type
== pkgCache :: Dep :: Depends
|| D
-> Type
== pkgCache :: Dep :: PreDepends
)
159 if (! List
-> IsFlag ( D
. TargetPkg (), pkgOrderList :: Immediate
))
162 clog
<< OutputInDepth ( Depth
) << "ImmediateAdd(): Adding Immediate flag to " << D
. TargetPkg () << " cause of " << D
. DepType () << " " << I
. FullName () << endl
;
163 List
-> Flag ( D
. TargetPkg (), pkgOrderList :: Immediate
);
164 ImmediateAdd ( D
. TargetPkg (), UseInstallVer
, Depth
+ 1 );
170 // PM::CreateOrderList - Create the ordering class /*{{{*/
171 // ---------------------------------------------------------------------
172 /* This populates the ordering list with all the packages that are
174 bool pkgPackageManager :: CreateOrderList ()
180 List
= new pkgOrderList (& Cache
);
182 if ( Debug
&& ImmConfigureAll
)
183 clog
<< "CreateOrderList(): Adding Immediate flag for all packages because of APT::Immediate-Configure-All" << endl
;
185 // Generate the list of affected packages and sort it
186 for ( PkgIterator I
= Cache
. PkgBegin (); I
. end () == false ; ++ I
)
188 // Ignore no-version packages
189 if ( I
-> VersionList
== 0 )
192 // Mark the package and its dependends for immediate configuration
193 if (((( I
-> Flags
& pkgCache :: Flag :: Essential
) == pkgCache :: Flag :: Essential
) &&
194 NoImmConfigure
== false ) || ImmConfigureAll
)
196 if ( Debug
&& ! ImmConfigureAll
)
197 clog
<< "CreateOrderList(): Adding Immediate flag for " << I
. FullName () << endl
;
198 List
-> Flag ( I
, pkgOrderList :: Immediate
);
200 if (! ImmConfigureAll
) {
201 // Look for other install packages to make immediate configurea
202 ImmediateAdd ( I
, true );
204 // And again with the current version.
205 ImmediateAdd ( I
, false );
210 if (( Cache
[ I
]. Keep () == true ||
211 Cache
[ I
]. InstVerIter ( Cache
) == I
. CurrentVer ()) &&
212 I
. State () == pkgCache :: PkgIterator :: NeedsNothing
&&
213 ( Cache
[ I
]. iFlags
& pkgDepCache :: ReInstall
) != pkgDepCache :: ReInstall
&&
214 ( I
. Purge () != false || Cache
[ I
]. Mode
!= pkgDepCache :: ModeDelete
||
215 ( Cache
[ I
]. iFlags
& pkgDepCache :: Purge
) != pkgDepCache :: Purge
))
218 // Append it to the list
225 // PM::DepAlwaysTrue - Returns true if this dep is irrelevant /*{{{*/
226 // ---------------------------------------------------------------------
227 /* The restriction on provides is to eliminate the case when provides
228 are transitioning between valid states [ie exim to smail] */
229 bool pkgPackageManager :: DepAlwaysTrue ( DepIterator D
)
231 if ( D
. TargetPkg ()-> ProvidesList
!= 0 )
234 if (( Cache
[ D
] & pkgDepCache :: DepInstall
) != 0 &&
235 ( Cache
[ D
] & pkgDepCache :: DepNow
) != 0 )
240 // PM::CheckRConflicts - Look for reverse conflicts /*{{{*/
241 // ---------------------------------------------------------------------
242 /* This looks over the reverses for a conflicts line that needs early
244 bool pkgPackageManager :: CheckRConflicts ( PkgIterator Pkg
, DepIterator D
,
247 for (; D
. end () == false ; ++ D
)
249 if ( D
-> Type
!= pkgCache :: Dep :: Conflicts
&&
250 D
-> Type
!= pkgCache :: Dep :: Obsoletes
)
253 // The package hasn't been changed
254 if ( List
-> IsNow ( Pkg
) == false )
257 // Ignore self conflicts, ignore conflicts from irrelevant versions
258 if ( D
. IsIgnorable ( Pkg
) || D
. ParentVer () != D
. ParentPkg (). CurrentVer ())
261 if ( Cache
. VS (). CheckDep ( Ver
, D
-> CompareOp
, D
. TargetVer ()) == false )
264 if ( EarlyRemove ( D
. ParentPkg ()) == false )
265 return _error
-> Error ( "Reverse conflicts early remove for package ' %s ' failed" ,
266 Pkg
. FullName (). c_str ());
271 // PM::ConfigureAll - Run the all out configuration /*{{{*/
272 // ---------------------------------------------------------------------
273 /* This configures every package. It is assumed they are all unpacked and
274 that the final configuration is valid. This is also used to catch packages
275 that have not been configured when using ImmConfigureAll */
276 bool pkgPackageManager :: ConfigureAll ()
278 pkgOrderList
OList (& Cache
);
280 // Populate the order list
281 for ( pkgOrderList :: iterator I
= List
-> begin (); I
!= List
-> end (); ++ I
)
282 if ( List
-> IsFlag ( pkgCache :: PkgIterator ( Cache
,* I
),
283 pkgOrderList :: UnPacked
) == true )
286 if ( OList
. OrderConfigure () == false )
289 std :: string
const conf
= _config
-> Find ( "PackageManager::Configure" , "all" );
290 bool const ConfigurePkgs
= ( conf
== "all" );
292 // Perform the configuring
293 for ( pkgOrderList :: iterator I
= OList
. begin (); I
!= OList
. end (); ++ I
)
295 PkgIterator
Pkg ( Cache
,* I
);
297 /* Check if the package has been configured, this can happen if SmartConfigure
299 if ( List
-> IsFlag ( Pkg
, pkgOrderList :: Configured
)) continue ;
301 if ( ConfigurePkgs
== true && SmartConfigure ( Pkg
, 0 ) == false ) {
303 _error
-> Error ( _ ( "Could not perform immediate configuration on ' %s '. "
304 "Please see man 5 apt.conf under APT::Immediate-Configure for details. ( %d )" ), Pkg
. FullName (). c_str (), 1 );
306 _error
-> Error ( "Internal error, packages left unconfigured. %s " , Pkg
. FullName (). c_str ());
310 List
-> Flag ( Pkg
, pkgOrderList :: Configured
, pkgOrderList :: States
);
316 // PM::SmartConfigure - Perform immediate configuration of the pkg /*{{{*/
317 // ---------------------------------------------------------------------
318 /* This function tries to put the system in a state where Pkg can be configured.
319 This involves checking each of Pkg's dependanies and unpacking and
320 configuring packages where needed.
322 Note on failure: This method can fail, without causing any problems.
323 This can happen when using Immediate-Configure-All, SmartUnPack may call
324 SmartConfigure, it may fail because of a complex dependency situation, but
325 a error will only be reported if ConfigureAll fails. This is why some of the
326 messages this function reports on failure (return false;) as just warnings
327 only shown when debuging*/
328 bool pkgPackageManager :: SmartConfigure ( PkgIterator Pkg
, int const Depth
)
330 // If this is true, only check and correct and dependencies without the Loop flag
331 bool const PkgLoop
= List
-> IsFlag ( Pkg
, pkgOrderList :: Loop
);
334 VerIterator InstallVer
= VerIterator ( Cache
, Cache
[ Pkg
]. InstallVer
);
335 clog
<< OutputInDepth ( Depth
) << "SmartConfigure " << Pkg
. FullName () << " (" << InstallVer
. VerStr () << ")" ;
337 clog
<< " (Only Correct Dependencies)" ;
341 VerIterator
const instVer
= Cache
[ Pkg
]. InstVerIter ( Cache
);
343 /* Because of the ordered list, most dependencies should be unpacked,
344 however if there is a loop (A depends on B, B depends on A) this will not
345 be the case, so check for dependencies before configuring. */
346 bool Bad
= false , Changed
= false ;
347 const unsigned int max_loops
= _config
-> FindI ( "APT::pkgPackageManager::MaxLoopCount" , 5000 );
349 std :: list
< DepIterator
> needConfigure
;
353 for ( DepIterator D
= instVer
. DependsList (); D
. end () == false ; )
355 // Compute a single dependency element (glob or)
356 pkgCache :: DepIterator Start
, End
;
359 if ( End
-> Type
!= pkgCache :: Dep :: Depends
)
363 // Check for dependencies that have not been unpacked, probably due to loops.
364 for ( DepIterator Cur
= Start
; true ; ++ Cur
)
366 SPtrArray
< Version
*> VList
= Cur
. AllTargets ();
368 for ( Version
** I
= VList
; * I
!= 0 ; ++ I
)
370 VerIterator
Ver ( Cache
,* I
);
371 PkgIterator DepPkg
= Ver
. ParentPkg ();
373 // Check if the current version of the package is available and will satisfy this dependency
374 if ( DepPkg
. CurrentVer () == Ver
&& List
-> IsNow ( DepPkg
) == true &&
375 List
-> IsFlag ( DepPkg
, pkgOrderList :: Removed
) == false &&
376 DepPkg
. State () == PkgIterator :: NeedsNothing
)
382 // Check if the version that is going to be installed will satisfy the dependency
383 if ( Cache
[ DepPkg
]. InstallVer
!= * I
|| List
-> IsNow ( DepPkg
) == false )
389 std :: clog
<< OutputInDepth ( Depth
) << "Package " << Pkg
<< " loops in SmartConfigure" << std :: endl
;
396 clog
<< OutputInDepth ( Depth
) << "Unpacking " << DepPkg
. FullName () << " to avoid loop " << Cur
<< endl
;
397 if ( PkgLoop
== false )
398 List
-> Flag ( Pkg
, pkgOrderList :: Loop
);
399 if ( SmartUnPack ( DepPkg
, true , Depth
+ 1 ) == true )
402 if ( List
-> IsFlag ( DepPkg
, pkgOrderList :: Loop
) == false )
405 if ( PkgLoop
== false )
406 List
-> RmFlag ( Pkg
, pkgOrderList :: Loop
);
412 if ( Cur
== End
|| Bad
== false )
419 needConfigure
. push_back ( Start
);
422 return _error
-> Error ( "Internal error: MaxLoopCount reached in SmartUnPack (1) for %s , aborting" , Pkg
. FullName (). c_str ());
423 } while ( Changed
== true );
425 Bad
= false , Changed
= false , i
= 0 ;
429 for ( std :: list
< DepIterator
>:: const_iterator D
= needConfigure
. begin (); D
!= needConfigure
. end (); ++ D
)
431 // Compute a single dependency element (glob or) without modifying D
432 pkgCache :: DepIterator Start
, End
;
434 pkgCache :: DepIterator Discard
= * D
;
435 Discard
. GlobOr ( Start
, End
);
438 if ( End
-> Type
!= pkgCache :: Dep :: Depends
)
442 // Search for dependencies which are unpacked but aren't configured yet (maybe loops)
443 for ( DepIterator Cur
= Start
; true ; ++ Cur
)
445 SPtrArray
< Version
*> VList
= Cur
. AllTargets ();
447 for ( Version
** I
= VList
; * I
!= 0 ; ++ I
)
449 VerIterator
Ver ( Cache
,* I
);
450 PkgIterator DepPkg
= Ver
. ParentPkg ();
452 // Check if the version that is going to be installed will satisfy the dependency
453 if ( Cache
[ DepPkg
]. InstallVer
!= * I
)
456 if ( List
-> IsFlag ( DepPkg
, pkgOrderList :: UnPacked
))
458 if ( List
-> IsFlag ( DepPkg
, pkgOrderList :: Loop
) && PkgLoop
)
460 // This dependency has already been dealt with by another SmartConfigure on Pkg
464 /* Check for a loop to prevent one forming
465 If A depends on B and B depends on A, SmartConfigure will
466 just hop between them if this is not checked. Dont remove the
467 loop flag after finishing however as loop is already set.
468 This means that there is another SmartConfigure call for this
469 package and it will remove the loop flag */
470 if ( PkgLoop
== false )
471 List
-> Flag ( Pkg
, pkgOrderList :: Loop
);
472 if ( SmartConfigure ( DepPkg
, Depth
+ 1 ) == true )
475 if ( List
-> IsFlag ( DepPkg
, pkgOrderList :: Loop
) == false )
478 if ( PkgLoop
== false )
479 List
-> RmFlag ( Pkg
, pkgOrderList :: Loop
);
480 // If SmartConfigure was succesfull, Bad is false, so break
484 else if ( List
-> IsFlag ( DepPkg
, pkgOrderList :: Configured
))
490 if ( Cur
== End
|| Bad
== false )
495 if ( Bad
== true && Changed
== false && Debug
== true )
496 std :: clog
<< OutputInDepth ( Depth
) << "Could not satisfy " << * D
<< std :: endl
;
499 return _error
-> Error ( "Internal error: MaxLoopCount reached in SmartUnPack (2) for %s , aborting" , Pkg
. FullName (). c_str ());
500 } while ( Changed
== true );
504 _error
-> Warning ( _ ( "Could not configure ' %s '. " ), Pkg
. FullName (). c_str ());
508 if ( PkgLoop
) return true ;
510 static std :: string
const conf
= _config
-> Find ( "PackageManager::Configure" , "all" );
511 static bool const ConfigurePkgs
= ( conf
== "all" || conf
== "smart" );
513 if ( List
-> IsFlag ( Pkg
, pkgOrderList :: Configured
))
514 return _error
-> Error ( "Internal configure error on ' %s '." , Pkg
. FullName (). c_str ());
516 if ( ConfigurePkgs
== true && Configure ( Pkg
) == false )
519 List
-> Flag ( Pkg
, pkgOrderList :: Configured
, pkgOrderList :: States
);
521 if (( Cache
[ Pkg
]. InstVerIter ( Cache
)-> MultiArch
& pkgCache :: Version :: Same
) == pkgCache :: Version :: Same
)
522 for ( PkgIterator P
= Pkg
. Group (). PackageList ();
523 P
. end () == false ; P
= Pkg
. Group (). NextPkg ( P
))
525 if ( Pkg
== P
|| List
-> IsFlag ( P
, pkgOrderList :: Configured
) == true ||
526 List
-> IsFlag ( P
, pkgOrderList :: UnPacked
) == false ||
527 Cache
[ P
]. InstallVer
== 0 || ( P
. CurrentVer () == Cache
[ P
]. InstallVer
&&
528 ( Cache
[ Pkg
]. iFlags
& pkgDepCache :: ReInstall
) != pkgDepCache :: ReInstall
))
530 SmartConfigure ( P
, ( Depth
+ 1 ));
534 if ( List
-> IsFlag ( Pkg
, pkgOrderList :: Configured
) == false )
535 return _error
-> Error ( _ ( "Could not configure ' %s '. " ), Pkg
. FullName (). c_str ());
540 // PM::EarlyRemove - Perform removal of packages before their time /*{{{*/
541 // ---------------------------------------------------------------------
542 /* This is called to deal with conflicts arising from unpacking */
543 bool pkgPackageManager :: EarlyRemove ( PkgIterator Pkg
)
545 if ( List
-> IsNow ( Pkg
) == false )
548 // Already removed it
549 if ( List
-> IsFlag ( Pkg
, pkgOrderList :: Removed
) == true )
552 // Woops, it will not be re-installed!
553 if ( List
-> IsFlag ( Pkg
, pkgOrderList :: InList
) == false )
556 // Essential packages get special treatment
557 bool IsEssential
= false ;
558 if (( Pkg
-> Flags
& pkgCache :: Flag :: Essential
) != 0 ||
559 ( Pkg
-> Flags
& pkgCache :: Flag :: Important
) != 0 )
562 /* Check for packages that are the dependents of essential packages and
564 if ( Pkg
-> CurrentVer
!= 0 )
566 for ( DepIterator D
= Pkg
. RevDependsList (); D
. end () == false &&
567 IsEssential
== false ; ++ D
)
568 if ( D
-> Type
== pkgCache :: Dep :: Depends
|| D
-> Type
== pkgCache :: Dep :: PreDepends
)
569 if (( D
. ParentPkg ()-> Flags
& pkgCache :: Flag :: Essential
) != 0 ||
570 ( D
. ParentPkg ()-> Flags
& pkgCache :: Flag :: Important
) != 0 )
574 if ( IsEssential
== true )
576 if ( _config
-> FindB ( "APT::Force-LoopBreak" , false ) == false )
577 return _error
-> Error ( _ ( "This installation run will require temporarily "
578 "removing the essential package %s due to a "
579 "Conflicts/Pre-Depends loop. This is often bad, "
580 "but if you really want to do it, activate the "
581 "APT::Force-LoopBreak option." ), Pkg
. FullName (). c_str ());
584 bool Res
= SmartRemove ( Pkg
);
585 if ( Cache
[ Pkg
]. Delete () == false )
586 List
-> Flag ( Pkg
, pkgOrderList :: Removed
, pkgOrderList :: States
);
591 // PM::SmartRemove - Removal Helper /*{{{*/
592 // ---------------------------------------------------------------------
594 bool pkgPackageManager :: SmartRemove ( PkgIterator Pkg
)
596 if ( List
-> IsNow ( Pkg
) == false )
599 List
-> Flag ( Pkg
, pkgOrderList :: Configured
, pkgOrderList :: States
);
601 return Remove ( Pkg
,( Cache
[ Pkg
]. iFlags
& pkgDepCache :: Purge
) == pkgDepCache :: Purge
);
604 // PM::SmartUnPack - Install helper /*{{{*/
605 // ---------------------------------------------------------------------
606 /* This puts the system in a state where it can Unpack Pkg, if Pkg is already
607 unpacked, or when it has been unpacked, if Immediate==true it configures it. */
608 bool pkgPackageManager :: SmartUnPack ( PkgIterator Pkg
)
610 return SmartUnPack ( Pkg
, true , 0 );
612 bool pkgPackageManager :: SmartUnPack ( PkgIterator Pkg
, bool const Immediate
, int const Depth
)
614 bool PkgLoop
= List
-> IsFlag ( Pkg
, pkgOrderList :: Loop
);
617 clog
<< OutputInDepth ( Depth
) << "SmartUnPack " << Pkg
. FullName ();
618 VerIterator InstallVer
= VerIterator ( Cache
, Cache
[ Pkg
]. InstallVer
);
619 if ( Pkg
. CurrentVer () == 0 )
620 clog
<< " (install version " << InstallVer
. VerStr () << ")" ;
622 clog
<< " (replace version " << Pkg
. CurrentVer (). VerStr () << " with " << InstallVer
. VerStr () << ")" ;
624 clog
<< " (Only Perform PreUnpack Checks)" ;
628 VerIterator
const instVer
= Cache
[ Pkg
]. InstVerIter ( Cache
);
630 /* PreUnpack Checks: This loop checks and attempts to rectify and problems that would prevent the package being unpacked.
631 It addresses: PreDepends, Conflicts, Obsoletes and Breaks (DpkgBreaks). Any resolutions that do not require it should
632 avoid configuration (calling SmartUnpack with Immediate=true), this is because when unpacking some packages with
633 complex dependency structures, trying to configure some packages while breaking the loops can complicate things .
634 This will be either dealt with if the package is configured as a dependency of Pkg (if and when Pkg is configured),
635 or by the ConfigureAll call at the end of the for loop in OrderInstall. */
636 bool Changed
= false ;
637 const unsigned int max_loops
= _config
-> FindI ( "APT::pkgPackageManager::MaxLoopCount" , 5000 );
642 for ( DepIterator D
= instVer
. DependsList (); D
. end () == false ; )
644 // Compute a single dependency element (glob or)
645 pkgCache :: DepIterator Start
, End
;
648 if ( End
-> Type
== pkgCache :: Dep :: PreDepends
)
652 clog
<< OutputInDepth ( Depth
) << "PreDepends order for " << Pkg
. FullName () << std :: endl
;
654 // Look for easy targets: packages that are already okay
655 for ( DepIterator Cur
= Start
; Bad
== true ; ++ Cur
)
657 SPtrArray
< Version
*> VList
= Cur
. AllTargets ();
658 for ( Version
** I
= VList
; * I
!= 0 ; ++ I
)
660 VerIterator
Ver ( Cache
,* I
);
661 PkgIterator Pkg
= Ver
. ParentPkg ();
663 // See if the current version is ok
664 if ( Pkg
. CurrentVer () == Ver
&& List
-> IsNow ( Pkg
) == true &&
665 Pkg
. State () == PkgIterator :: NeedsNothing
)
669 clog
<< OutputInDepth ( Depth
) << "Found ok package " << Pkg
. FullName () << endl
;
677 // Look for something that could be configured.
678 for ( DepIterator Cur
= Start
; Bad
== true && Cur
. end () == false ; ++ Cur
)
680 SPtrArray
< Version
*> VList
= Cur
. AllTargets ();
681 for ( Version
** I
= VList
; * I
!= 0 ; ++ I
)
683 VerIterator
Ver ( Cache
,* I
);
684 PkgIterator Pkg
= Ver
. ParentPkg ();
686 // Not the install version
687 if ( Cache
[ Pkg
]. InstallVer
!= * I
||
688 ( Cache
[ Pkg
]. Keep () == true && Pkg
. State () == PkgIterator :: NeedsNothing
))
691 if ( List
-> IsFlag ( Pkg
, pkgOrderList :: Configured
))
697 // check if it needs unpack or if if configure is enough
698 if ( List
-> IsFlag ( Pkg
, pkgOrderList :: UnPacked
) == false )
701 clog
<< OutputInDepth ( Depth
) << "Trying to SmartUnpack " << Pkg
. FullName () << endl
;
702 // SmartUnpack with the ImmediateFlag to ensure its really ready
703 if ( SmartUnPack ( Pkg
, true , Depth
+ 1 ) == true )
706 if ( List
-> IsFlag ( Pkg
, pkgOrderList :: Loop
) == false )
714 clog
<< OutputInDepth ( Depth
) << "Trying to SmartConfigure " << Pkg
. FullName () << endl
;
715 if ( SmartConfigure ( Pkg
, Depth
+ 1 ) == true )
718 if ( List
-> IsFlag ( Pkg
, pkgOrderList :: Loop
) == false )
729 return _error
-> Error ( "Couldn't configure pre-depend %s for %s , "
730 "probably a dependency cycle." ,
731 End
. TargetPkg (). FullName (). c_str (), Pkg
. FullName (). c_str ());
736 else if ( End
-> Type
== pkgCache :: Dep :: Conflicts
||
737 End
-> Type
== pkgCache :: Dep :: Obsoletes
)
739 /* Look for conflicts. Two packages that are both in the install
740 state cannot conflict so we don't check.. */
741 SPtrArray
< Version
*> VList
= End
. AllTargets ();
742 for ( Version
** I
= VList
; * I
!= 0 ; I
++)
744 VerIterator
Ver ( Cache
,* I
);
745 PkgIterator ConflictPkg
= Ver
. ParentPkg ();
746 VerIterator
InstallVer ( Cache
, Cache
[ ConflictPkg
]. InstallVer
);
748 // See if the current version is conflicting
749 if ( ConflictPkg
. CurrentVer () == Ver
&& List
-> IsNow ( ConflictPkg
))
752 clog
<< OutputInDepth ( Depth
) << Pkg
. FullName () << " conflicts with " << ConflictPkg
. FullName () << endl
;
753 /* If a loop is not present or has not yet been detected, attempt to unpack packages
754 to resolve this conflict. If there is a loop present, remove packages to resolve this conflict */
755 if ( List
-> IsFlag ( ConflictPkg
, pkgOrderList :: Loop
) == false )
757 if ( Cache
[ ConflictPkg
]. Keep () == 0 && Cache
[ ConflictPkg
]. InstallVer
!= 0 )
760 clog
<< OutputInDepth ( Depth
) << OutputInDepth ( Depth
) << "Unpacking " << ConflictPkg
. FullName () << " to prevent conflict" << endl
;
761 List
-> Flag ( Pkg
, pkgOrderList :: Loop
);
762 if ( SmartUnPack ( ConflictPkg
, false , Depth
+ 1 ) == true )
763 if ( List
-> IsFlag ( ConflictPkg
, pkgOrderList :: Loop
) == false )
765 // Remove loop to allow it to be used later if needed
766 List
-> RmFlag ( Pkg
, pkgOrderList :: Loop
);
768 else if ( EarlyRemove ( ConflictPkg
) == false )
769 return _error
-> Error ( "Internal Error, Could not early remove %s (1)" , ConflictPkg
. FullName (). c_str ());
771 else if ( List
-> IsFlag ( ConflictPkg
, pkgOrderList :: Removed
) == false )
774 clog
<< OutputInDepth ( Depth
) << "Because of conficts knot, removing " << ConflictPkg
. FullName () << " to conflict violation" << endl
;
775 if ( EarlyRemove ( ConflictPkg
) == false )
776 return _error
-> Error ( "Internal Error, Could not early remove %s (2)" , ConflictPkg
. FullName (). c_str ());
781 else if ( End
-> Type
== pkgCache :: Dep :: DpkgBreaks
)
783 SPtrArray
< Version
*> VList
= End
. AllTargets ();
784 for ( Version
** I
= VList
; * I
!= 0 ; ++ I
)
786 VerIterator
Ver ( Cache
,* I
);
787 PkgIterator BrokenPkg
= Ver
. ParentPkg ();
788 if ( BrokenPkg
. CurrentVer () != Ver
)
791 std :: clog
<< OutputInDepth ( Depth
) << " Ignore not-installed version " << Ver
. VerStr () << " of " << Pkg
. FullName () << " for " << End
<< std :: endl
;
795 // Check if it needs to be unpacked
796 if ( List
-> IsFlag ( BrokenPkg
, pkgOrderList :: InList
) && Cache
[ BrokenPkg
]. Delete () == false &&
797 List
-> IsNow ( BrokenPkg
))
799 if ( List
-> IsFlag ( BrokenPkg
, pkgOrderList :: Loop
) && PkgLoop
)
801 // This dependency has already been dealt with by another SmartUnPack on Pkg
806 // Found a break, so see if we can unpack the package to avoid it
807 // but do not set loop if another SmartUnPack already deals with it
808 // Also, avoid it if the package we would unpack pre-depends on this one
809 VerIterator
InstallVer ( Cache
, Cache
[ BrokenPkg
]. InstallVer
);
811 for ( pkgCache :: DepIterator D
= InstallVer
. DependsList (); D
. end () == false ; ++ D
)
813 if ( D
-> Type
!= pkgCache :: Dep :: PreDepends
)
815 SPtrArray
< Version
*> VL
= D
. AllTargets ();
816 for ( Version
** I
= VL
; * I
!= 0 ; ++ I
)
818 VerIterator
V ( Cache
,* I
);
819 PkgIterator P
= V
. ParentPkg ();
820 // we are checking for installation as an easy 'protection' against or-groups and (unchosen) providers
821 if ( P
!= Pkg
|| ( P
. CurrentVer () != V
&& Cache
[ P
]. InstallVer
!= V
))
832 clog
<< OutputInDepth ( Depth
) << " Avoiding " << End
<< " avoided as " << BrokenPkg
. FullName () << " has a pre-depends on " << Pkg
. FullName () << std :: endl
;
839 clog
<< OutputInDepth ( Depth
) << " Unpacking " << BrokenPkg
. FullName () << " to avoid " << End
;
841 clog
<< " (Looping)" ;
844 if ( PkgLoop
== false )
845 List
-> Flag ( Pkg
, pkgOrderList :: Loop
);
846 if ( SmartUnPack ( BrokenPkg
, false , Depth
+ 1 ) == true )
848 if ( List
-> IsFlag ( BrokenPkg
, pkgOrderList :: Loop
) == false )
851 if ( PkgLoop
== false )
852 List
-> RmFlag ( Pkg
, pkgOrderList :: Loop
);
856 // Check if a package needs to be removed
857 else if ( Cache
[ BrokenPkg
]. Delete () == true && List
-> IsFlag ( BrokenPkg
, pkgOrderList :: Configured
) == false )
860 clog
<< OutputInDepth ( Depth
) << " Removing " << BrokenPkg
. FullName () << " to avoid " << End
<< endl
;
861 SmartRemove ( BrokenPkg
);
867 return _error
-> Error ( "Internal error: APT::pkgPackageManager::MaxLoopCount reached in SmartConfigure for %s , aborting" , Pkg
. FullName (). c_str ());
868 } while ( Changed
== true );
870 // Check for reverse conflicts.
871 if ( CheckRConflicts ( Pkg
, Pkg
. RevDependsList (),
872 instVer
. VerStr ()) == false )
875 for ( PrvIterator P
= instVer
. ProvidesList ();
876 P
. end () == false ; ++ P
)
877 if ( Pkg
-> Group
!= P
. OwnerPkg ()-> Group
)
878 CheckRConflicts ( Pkg
, P
. ParentPkg (). RevDependsList (), P
. ProvideVersion ());
883 List
-> Flag ( Pkg
, pkgOrderList :: UnPacked
, pkgOrderList :: States
);
885 if ( Immediate
== true && ( instVer
-> MultiArch
& pkgCache :: Version :: Same
) == pkgCache :: Version :: Same
)
887 /* Do lockstep M-A:same unpacking in two phases:
888 First unpack all installed architectures, then the not installed.
889 This way we avoid that M-A: enabled packages are installed before
890 their older non-M-A enabled packages are replaced by newer versions */
891 bool const installed
= Pkg
-> CurrentVer
!= 0 ;
892 if ( installed
== true &&
893 ( instVer
!= Pkg
. CurrentVer () ||
894 (( Cache
[ Pkg
]. iFlags
& pkgDepCache :: ReInstall
) == pkgDepCache :: ReInstall
)) &&
895 Install ( Pkg
, FileNames
[ Pkg
-> ID
]) == false )
897 for ( PkgIterator P
= Pkg
. Group (). PackageList ();
898 P
. end () == false ; P
= Pkg
. Group (). NextPkg ( P
))
900 if ( P
-> CurrentVer
== 0 || P
== Pkg
|| List
-> IsFlag ( P
, pkgOrderList :: UnPacked
) == true ||
901 Cache
[ P
]. InstallVer
== 0 || ( P
. CurrentVer () == Cache
[ P
]. InstallVer
&&
902 ( Cache
[ Pkg
]. iFlags
& pkgDepCache :: ReInstall
) != pkgDepCache :: ReInstall
))
904 if ( SmartUnPack ( P
, false , Depth
+ 1 ) == false )
907 if ( installed
== false && Install ( Pkg
, FileNames
[ Pkg
-> ID
]) == false )
909 for ( PkgIterator P
= Pkg
. Group (). PackageList ();
910 P
. end () == false ; P
= Pkg
. Group (). NextPkg ( P
))
912 if ( P
-> CurrentVer
!= 0 || P
== Pkg
|| List
-> IsFlag ( P
, pkgOrderList :: UnPacked
) == true ||
913 List
-> IsFlag ( P
, pkgOrderList :: Configured
) == true ||
914 Cache
[ P
]. InstallVer
== 0 || ( P
. CurrentVer () == Cache
[ P
]. InstallVer
&&
915 ( Cache
[ Pkg
]. iFlags
& pkgDepCache :: ReInstall
) != pkgDepCache :: ReInstall
))
917 if ( SmartUnPack ( P
, false , Depth
+ 1 ) == false )
921 // packages which are already unpacked don't need to be unpacked again
922 else if (( instVer
!= Pkg
. CurrentVer () ||
923 (( Cache
[ Pkg
]. iFlags
& pkgDepCache :: ReInstall
) == pkgDepCache :: ReInstall
)) &&
924 Install ( Pkg
, FileNames
[ Pkg
-> ID
]) == false )
927 if ( Immediate
== true ) {
928 // Perform immedate configuration of the package.
929 if ( SmartConfigure ( Pkg
, Depth
+ 1 ) == false )
930 _error
-> Warning ( _ ( "Could not perform immediate configuration on ' %s '. "
931 "Please see man 5 apt.conf under APT::Immediate-Configure for details. ( %d )" ), Pkg
. FullName (). c_str (), 2 );
937 // PM::OrderInstall - Installation ordering routine /*{{{*/
938 // ---------------------------------------------------------------------
940 pkgPackageManager :: OrderResult
pkgPackageManager :: OrderInstall ()
942 if ( CreateOrderList () == false )
948 clog
<< "Beginning to order" << endl
;
950 bool const ordering
=
951 _config
-> FindB ( "PackageManager::UnpackAll" , true ) ?
952 List
-> OrderUnpack ( FileNames
) : List
-> OrderCritical ();
953 if ( ordering
== false )
955 _error
-> Error ( "Internal ordering error" );
960 clog
<< "Done ordering" << endl
;
962 bool DoneSomething
= false ;
963 for ( pkgOrderList :: iterator I
= List
-> begin (); I
!= List
-> end (); ++ I
)
965 PkgIterator
Pkg ( Cache
,* I
);
967 if ( List
-> IsNow ( Pkg
) == false )
969 if (! List
-> IsFlag ( Pkg
, pkgOrderList :: Configured
) && ! NoImmConfigure
) {
970 if ( SmartConfigure ( Pkg
, 0 ) == false && Debug
)
971 _error
-> Warning ( "Internal Error, Could not configure %s " , Pkg
. FullName (). c_str ());
972 // FIXME: The above warning message might need changing
975 clog
<< "Skipping already done " << Pkg
. FullName () << endl
;
981 if ( List
-> IsMissing ( Pkg
) == true )
984 clog
<< "Sequence completed at " << Pkg
. FullName () << endl
;
985 if ( DoneSomething
== false )
987 _error
-> Error ( "Internal Error, ordering was unable to handle the media swap" );
994 if ( Cache
[ Pkg
]. Keep () == true &&
995 Pkg
. State () == pkgCache :: PkgIterator :: NeedsNothing
&&
996 ( Cache
[ Pkg
]. iFlags
& pkgDepCache :: ReInstall
) != pkgDepCache :: ReInstall
)
998 _error
-> Error ( "Internal Error, trying to manipulate a kept package ( %s )" , Pkg
. FullName (). c_str ());
1002 // Perform a delete or an install
1003 if ( Cache
[ Pkg
]. Delete () == true )
1005 if ( SmartRemove ( Pkg
) == false )
1009 if ( SmartUnPack ( Pkg
, List
-> IsFlag ( Pkg
, pkgOrderList :: Immediate
), 0 ) == false )
1011 DoneSomething
= true ;
1013 if ( ImmConfigureAll
) {
1014 /* ConfigureAll here to pick up and packages left unconfigured because they were unpacked in the
1015 "PreUnpack Checks" section */
1016 if (! ConfigureAll ())
1021 // Final run through the configure phase
1022 if ( ConfigureAll () == false )
1026 for ( pkgOrderList :: iterator I
= List
-> begin (); I
!= List
-> end (); ++ I
)
1028 if ( List
-> IsFlag (* I
, pkgOrderList :: Configured
) == false )
1030 _error
-> Error ( "Internal error, packages left unconfigured. %s " ,
1031 PkgIterator ( Cache
,* I
). FullName (). c_str ());
1038 // PM::DoInstallPostFork - compat /*{{{*/
1039 // ---------------------------------------------------------------------
1041 #if (APT_PKG_MAJOR >= 4 && APT_PKG_MINOR >= 13)
1042 pkgPackageManager :: OrderResult
1043 pkgPackageManager :: DoInstallPostFork ( int statusFd
)
1045 APT :: Progress :: PackageManager
* progress
= new
1046 APT :: Progress :: PackageManagerProgressFd ( statusFd
);
1047 pkgPackageManager :: OrderResult res
= DoInstallPostFork ( progress
);
1052 // PM::DoInstallPostFork - Does install part that happens after the fork /*{{{*/
1053 // ---------------------------------------------------------------------
1054 pkgPackageManager :: OrderResult
1055 pkgPackageManager :: DoInstallPostFork ( APT :: Progress :: PackageManager
* progress
)
1057 bool goResult
= Go ( progress
);
1058 if ( goResult
== false )
1064 pkgPackageManager :: OrderResult
1065 pkgPackageManager :: DoInstallPostFork ( int statusFd
)
1067 bool goResult
= Go ( statusFd
);
1068 if ( goResult
== false )
1075 // PM::DoInstall - Does the installation /*{{{*/
1076 // ---------------------------------------------------------------------
1078 #if (APT_PKG_MAJOR >= 4 && APT_PKG_MINOR >= 13)
1079 pkgPackageManager :: OrderResult
1080 pkgPackageManager :: DoInstall ( int statusFd
)
1082 APT :: Progress :: PackageManager
* progress
= new
1083 APT :: Progress :: PackageManagerProgressFd ( statusFd
);
1084 OrderResult res
= DoInstall ( progress
);
1089 pkgPackageManager :: OrderResult
pkgPackageManager :: DoInstall ( int statusFd
)
1091 if ( DoInstallPreFork () == Failed
)
1094 return DoInstallPostFork ( statusFd
);
1098 // PM::DoInstall - Does the installation /*{{{*/
1099 // ---------------------------------------------------------------------
1100 /* This uses the filenames in FileNames and the information in the
1101 DepCache to perform the installation of packages.*/
1102 #if (APT_PKG_MAJOR >= 4 && APT_PKG_MINOR >= 13)
1103 pkgPackageManager :: OrderResult
1104 pkgPackageManager :: DoInstall ( APT :: Progress :: PackageManager
* progress
)
1106 if ( DoInstallPreFork () == Failed
)
1109 return DoInstallPostFork ( progress
);