]> git.saurik.com Git - apt.git/blame - cmdline/apt-get.cc
* fix "purge" commandline argument, closes: #133421
[apt.git] / cmdline / apt-get.cc
CommitLineData
5ec427c2
AL
1// -*- mode: cpp; mode: fold -*-
2// Description /*{{{*/
640c5d94 3// $Id: apt-get.cc,v 1.156 2004/08/28 01:05:16 mdz Exp $
5ec427c2
AL
4/* ######################################################################
5
6 apt-get - Cover for dpkg
7
8 This is an allout cover for dpkg implementing a safer front end. It is
9 based largely on libapt-pkg.
10
11 The syntax is different,
12 apt-get [opt] command [things]
13 Where command is:
14 update - Resyncronize the package files from their sources
15 upgrade - Smart-Download the newest versions of all packages
16 dselect-upgrade - Follows dselect's changes to the Status: field
17 and installes new and removes old packages
18 dist-upgrade - Powerfull upgrader designed to handle the issues with
19 a new distribution.
20 install - Download and install a given package (by name, not by .deb)
21 check - Update the package cache and check for broken packages
22 clean - Erase the .debs downloaded to /var/cache/apt/archives and
23 the partial dir too
24
25 ##################################################################### */
26 /*}}}*/
27// Include Files /*{{{*/
0a8e3465
AL
28#include <apt-pkg/error.h>
29#include <apt-pkg/cmndline.h>
30#include <apt-pkg/init.h>
31#include <apt-pkg/depcache.h>
32#include <apt-pkg/sourcelist.h>
0a8e3465 33#include <apt-pkg/algorithms.h>
0919e3f9 34#include <apt-pkg/acquire-item.h>
cdcc6d34 35#include <apt-pkg/strutl.h>
1bc849af 36#include <apt-pkg/clean.h>
36375005
AL
37#include <apt-pkg/srcrecords.h>
38#include <apt-pkg/version.h>
2d11135a 39#include <apt-pkg/cachefile.h>
b2e465d6 40#include <apt-pkg/sptr.h>
092ae175 41#include <apt-pkg/md5.h>
b2e465d6
AL
42#include <apt-pkg/versionmatch.h>
43
0a8e3465 44#include <config.h>
b2e465d6 45#include <apti18n.h>
0a8e3465 46
0919e3f9
AL
47#include "acqprogress.h"
48
092ae175 49#include <set>
233c2b66 50#include <locale.h>
c8ca0ce1 51#include <langinfo.h>
90f057fd 52#include <fstream>
d7827aca
AL
53#include <termios.h>
54#include <sys/ioctl.h>
1bc849af 55#include <sys/stat.h>
101030ab 56#include <sys/statvfs.h>
d7827aca 57#include <signal.h>
65a1e968 58#include <unistd.h>
3e3221ba 59#include <stdio.h>
d6e79b75 60#include <errno.h>
c373c37a 61#include <regex.h>
54676e1a 62#include <sys/wait.h>
afb1e2e3 63#include <sstream>
0a8e3465
AL
64 /*}}}*/
65
076d01b0
AL
66using namespace std;
67
68ostream c0out(0);
69ostream c1out(0);
70ostream c2out(0);
0a8e3465 71ofstream devnull("/dev/null");
463870e4 72unsigned int ScreenWidth = 80 - 1; /* - 1 for the cursor */
0a8e3465 73
1089ca89
AL
74// class CacheFile - Cover class for some dependency cache functions /*{{{*/
75// ---------------------------------------------------------------------
76/* */
77class CacheFile : public pkgCacheFile
78{
79 static pkgCache *SortCache;
80 static int NameComp(const void *a,const void *b);
81
82 public:
83 pkgCache::Package **List;
84
85 void Sort();
86 bool CheckDeps(bool AllowBroken = false);
0077d829
AL
87 bool BuildCaches(bool WithLock = true)
88 {
89 OpTextProgress Prog(*_config);
90 if (pkgCacheFile::BuildCaches(Prog,WithLock) == false)
91 return false;
92 return true;
93 }
1089ca89
AL
94 bool Open(bool WithLock = true)
95 {
96 OpTextProgress Prog(*_config);
97 if (pkgCacheFile::Open(Prog,WithLock) == false)
98 return false;
99 Sort();
b2e465d6 100
1089ca89
AL
101 return true;
102 };
c37b9502
AL
103 bool OpenForInstall()
104 {
105 if (_config->FindB("APT::Get::Print-URIs") == true)
079a992d 106 return Open(false);
c37b9502 107 else
079a992d 108 return Open(true);
c37b9502 109 }
1089ca89
AL
110 CacheFile() : List(0) {};
111};
112 /*}}}*/
113
a6568219
AL
114// YnPrompt - Yes No Prompt. /*{{{*/
115// ---------------------------------------------------------------------
116/* Returns true on a Yes.*/
7db98ffc 117bool YnPrompt(bool Default=true)
a6568219
AL
118{
119 if (_config->FindB("APT::Get::Assume-Yes",false) == true)
120 {
10cda9fe 121 c1out << _("Y") << endl;
a6568219
AL
122 return true;
123 }
10cda9fe
AL
124
125 char response[1024] = "";
126 cin.getline(response, sizeof(response));
127
128 if (!cin)
b2e465d6 129 return false;
10cda9fe
AL
130
131 if (strlen(response) == 0)
7db98ffc 132 return Default;
10cda9fe
AL
133
134 regex_t Pattern;
135 int Res;
136
137 Res = regcomp(&Pattern, nl_langinfo(YESEXPR),
138 REG_EXTENDED|REG_ICASE|REG_NOSUB);
139
140 if (Res != 0) {
141 char Error[300];
142 regerror(Res,&Pattern,Error,sizeof(Error));
143 return _error->Error(_("Regex compilation error - %s"),Error);
144 }
a6568219 145
10cda9fe
AL
146 Res = regexec(&Pattern, response, 0, NULL, 0);
147 if (Res == 0)
148 return true;
149 return false;
a6568219
AL
150}
151 /*}}}*/
6f86c974
AL
152// AnalPrompt - Annoying Yes No Prompt. /*{{{*/
153// ---------------------------------------------------------------------
154/* Returns true on a Yes.*/
155bool AnalPrompt(const char *Text)
156{
157 char Buf[1024];
158 cin.getline(Buf,sizeof(Buf));
159 if (strcmp(Buf,Text) == 0)
160 return true;
161 return false;
162}
163 /*}}}*/
0a8e3465
AL
164// ShowList - Show a list /*{{{*/
165// ---------------------------------------------------------------------
b2e465d6 166/* This prints out a string of space separated words with a title and
0a8e3465 167 a two space indent line wraped to the current screen width. */
ac625538 168bool ShowList(ostream &out,string Title,string List,string VersionsList)
0a8e3465
AL
169{
170 if (List.empty() == true)
83d89a9f 171 return true;
4968036c
AL
172 // trim trailing space
173 int NonSpace = List.find_last_not_of(' ');
174 if (NonSpace != -1)
175 {
176 List = List.erase(NonSpace + 1);
177 if (List.empty() == true)
178 return true;
179 }
0a8e3465
AL
180
181 // Acount for the leading space
182 int ScreenWidth = ::ScreenWidth - 3;
183
184 out << Title << endl;
185 string::size_type Start = 0;
ac625538 186 string::size_type VersionsStart = 0;
0a8e3465
AL
187 while (Start < List.size())
188 {
ac625538
AL
189 if(_config->FindB("APT::Get::Show-Versions",false) == true &&
190 VersionsList.size() > 0) {
191 string::size_type End;
192 string::size_type VersionsEnd;
193
194 End = List.find(' ',Start);
195 VersionsEnd = VersionsList.find('\n', VersionsStart);
196
197 out << " " << string(List,Start,End - Start) << " (" <<
198 string(VersionsList,VersionsStart,VersionsEnd - VersionsStart) <<
199 ")" << endl;
03b9be80
AL
200
201 if (End == string::npos || End < Start)
202 End = Start + ScreenWidth;
203
ac625538
AL
204 Start = End + 1;
205 VersionsStart = VersionsEnd + 1;
206 } else {
207 string::size_type End;
208
209 if (Start + ScreenWidth >= List.size())
210 End = List.size();
211 else
212 End = List.rfind(' ',Start+ScreenWidth);
213
214 if (End == string::npos || End < Start)
215 End = Start + ScreenWidth;
216 out << " " << string(List,Start,End - Start) << endl;
217 Start = End + 1;
218 }
0a8e3465 219 }
ac625538 220
83d89a9f 221 return false;
0a8e3465
AL
222}
223 /*}}}*/
224// ShowBroken - Debugging aide /*{{{*/
225// ---------------------------------------------------------------------
226/* This prints out the names of all the packages that are broken along
227 with the name of each each broken dependency and a quite version
b2e465d6
AL
228 description.
229
230 The output looks like:
677cbcbc 231 The following packages have unmet dependencies:
b2e465d6
AL
232 exim: Depends: libc6 (>= 2.1.94) but 2.1.3-10 is to be installed
233 Depends: libldap2 (>= 2.0.2-2) but it is not going to be installed
234 Depends: libsasl7 but it is not going to be installed
235 */
421c8d10 236void ShowBroken(ostream &out,CacheFile &Cache,bool Now)
0a8e3465 237{
677cbcbc 238 out << _("The following packages have unmet dependencies:") << endl;
1089ca89 239 for (unsigned J = 0; J < Cache->Head().PackageCount; J++)
0a8e3465 240 {
1089ca89
AL
241 pkgCache::PkgIterator I(Cache,Cache.List[J]);
242
079a992d
AL
243 if (Now == true)
244 {
245 if (Cache[I].NowBroken() == false)
246 continue;
247 }
248 else
249 {
250 if (Cache[I].InstBroken() == false)
251 continue;
252 }
253
303a1703
AL
254 // Print out each package and the failed dependencies
255 out <<" " << I.Name() << ":";
648e3cb4 256 unsigned Indent = strlen(I.Name()) + 3;
303a1703 257 bool First = true;
079a992d
AL
258 pkgCache::VerIterator Ver;
259
260 if (Now == true)
261 Ver = I.CurrentVer();
262 else
263 Ver = Cache[I].InstVerIter(Cache);
264
265 if (Ver.end() == true)
0a8e3465 266 {
079a992d 267 out << endl;
303a1703
AL
268 continue;
269 }
270
079a992d 271 for (pkgCache::DepIterator D = Ver.DependsList(); D.end() == false;)
303a1703 272 {
30e1eab5
AL
273 // Compute a single dependency element (glob or)
274 pkgCache::DepIterator Start;
275 pkgCache::DepIterator End;
d20333af 276 D.GlobOr(Start,End); // advances D
76fbce56 277
079a992d 278 if (Cache->IsImportantDep(End) == false)
303a1703 279 continue;
079a992d
AL
280
281 if (Now == true)
282 {
283 if ((Cache[End] & pkgDepCache::DepGNow) == pkgDepCache::DepGNow)
284 continue;
285 }
286 else
287 {
288 if ((Cache[End] & pkgDepCache::DepGInstall) == pkgDepCache::DepGInstall)
289 continue;
290 }
291
648e3cb4
AL
292 bool FirstOr = true;
293 while (1)
0a8e3465 294 {
648e3cb4
AL
295 if (First == false)
296 for (unsigned J = 0; J != Indent; J++)
297 out << ' ';
298 First = false;
299
300 if (FirstOr == false)
301 {
302 for (unsigned J = 0; J != strlen(End.DepType()) + 3; J++)
303 out << ' ';
304 }
0a8e3465 305 else
648e3cb4
AL
306 out << ' ' << End.DepType() << ": ";
307 FirstOr = false;
308
309 out << Start.TargetPkg().Name();
310
311 // Show a quick summary of the version requirements
312 if (Start.TargetVer() != 0)
b2e465d6 313 out << " (" << Start.CompType() << " " << Start.TargetVer() << ")";
648e3cb4
AL
314
315 /* Show a summary of the target package if possible. In the case
316 of virtual packages we show nothing */
317 pkgCache::PkgIterator Targ = Start.TargetPkg();
318 if (Targ->ProvidesList == 0)
7e798dd7 319 {
b2e465d6 320 out << ' ';
648e3cb4 321 pkgCache::VerIterator Ver = Cache[Targ].InstVerIter(Cache);
f0ec51c2
AL
322 if (Now == true)
323 Ver = Targ.CurrentVer();
079a992d 324
648e3cb4 325 if (Ver.end() == false)
b2e465d6
AL
326 {
327 if (Now == true)
328 ioprintf(out,_("but %s is installed"),Ver.VerStr());
329 else
330 ioprintf(out,_("but %s is to be installed"),Ver.VerStr());
331 }
648e3cb4 332 else
303a1703 333 {
648e3cb4
AL
334 if (Cache[Targ].CandidateVerIter(Cache).end() == true)
335 {
336 if (Targ->ProvidesList == 0)
b2e465d6 337 out << _("but it is not installable");
648e3cb4 338 else
b2e465d6 339 out << _("but it is a virtual package");
648e3cb4 340 }
303a1703 341 else
b2e465d6 342 out << (Now?_("but it is not installed"):_("but it is not going to be installed"));
648e3cb4
AL
343 }
344 }
345
346 if (Start != End)
b2e465d6 347 out << _(" or");
648e3cb4
AL
348 out << endl;
349
350 if (Start == End)
351 break;
352 Start++;
353 }
303a1703 354 }
0a8e3465
AL
355 }
356}
357 /*}}}*/
358// ShowNew - Show packages to newly install /*{{{*/
359// ---------------------------------------------------------------------
360/* */
1089ca89 361void ShowNew(ostream &out,CacheFile &Cache)
0a8e3465 362{
89260e53 363 /* Print out a list of packages that are going to be installed extra
0a8e3465 364 to what the user asked */
0a8e3465 365 string List;
ac625538 366 string VersionsList;
1089ca89
AL
367 for (unsigned J = 0; J < Cache->Head().PackageCount; J++)
368 {
369 pkgCache::PkgIterator I(Cache,Cache.List[J]);
ac625538
AL
370 if (Cache[I].NewInstall() == true) {
371 List += string(I.Name()) + " ";
372 VersionsList += string(Cache[I].CandVersion) + "\n";
373 }
1089ca89
AL
374 }
375
ac625538 376 ShowList(out,_("The following NEW packages will be installed:"),List,VersionsList);
0a8e3465
AL
377}
378 /*}}}*/
379// ShowDel - Show packages to delete /*{{{*/
380// ---------------------------------------------------------------------
381/* */
1089ca89 382void ShowDel(ostream &out,CacheFile &Cache)
0a8e3465
AL
383{
384 /* Print out a list of packages that are going to be removed extra
385 to what the user asked */
0a8e3465 386 string List;
ac625538 387 string VersionsList;
1089ca89 388 for (unsigned J = 0; J < Cache->Head().PackageCount; J++)
fc4b5c9f 389 {
1089ca89
AL
390 pkgCache::PkgIterator I(Cache,Cache.List[J]);
391 if (Cache[I].Delete() == true)
fc4b5c9f 392 {
1089ca89 393 if ((Cache[I].iFlags & pkgDepCache::Purge) == pkgDepCache::Purge)
fc4b5c9f
AL
394 List += string(I.Name()) + "* ";
395 else
396 List += string(I.Name()) + " ";
ac625538
AL
397
398 VersionsList += string(Cache[I].CandVersion)+ "\n";
fc4b5c9f
AL
399 }
400 }
3d615484 401
ac625538 402 ShowList(out,_("The following packages will be REMOVED:"),List,VersionsList);
0a8e3465
AL
403}
404 /*}}}*/
405// ShowKept - Show kept packages /*{{{*/
406// ---------------------------------------------------------------------
407/* */
f292686b 408void ShowKept(ostream &out,CacheFile &Cache)
0a8e3465 409{
0a8e3465 410 string List;
ac625538 411 string VersionsList;
f292686b 412 for (unsigned J = 0; J < Cache->Head().PackageCount; J++)
0a8e3465 413 {
f292686b
AL
414 pkgCache::PkgIterator I(Cache,Cache.List[J]);
415
0a8e3465 416 // Not interesting
f292686b
AL
417 if (Cache[I].Upgrade() == true || Cache[I].Upgradable() == false ||
418 I->CurrentVer == 0 || Cache[I].Delete() == true)
0a8e3465
AL
419 continue;
420
421 List += string(I.Name()) + " ";
ac625538 422 VersionsList += string(Cache[I].CurVersion) + " => " + Cache[I].CandVersion + "\n";
0a8e3465 423 }
aee7bceb 424 ShowList(out,_("The following packages have been kept back:"),List,VersionsList);
0a8e3465
AL
425}
426 /*}}}*/
427// ShowUpgraded - Show upgraded packages /*{{{*/
428// ---------------------------------------------------------------------
429/* */
1089ca89 430void ShowUpgraded(ostream &out,CacheFile &Cache)
0a8e3465 431{
0a8e3465 432 string List;
ac625538 433 string VersionsList;
1089ca89 434 for (unsigned J = 0; J < Cache->Head().PackageCount; J++)
0a8e3465 435 {
1089ca89
AL
436 pkgCache::PkgIterator I(Cache,Cache.List[J]);
437
0a8e3465 438 // Not interesting
1089ca89 439 if (Cache[I].Upgrade() == false || Cache[I].NewInstall() == true)
0a8e3465
AL
440 continue;
441
442 List += string(I.Name()) + " ";
ac625538 443 VersionsList += string(Cache[I].CurVersion) + " => " + Cache[I].CandVersion + "\n";
0a8e3465 444 }
aee7bceb 445 ShowList(out,_("The following packages will be upgraded:"),List,VersionsList);
b2e465d6
AL
446}
447 /*}}}*/
448// ShowDowngraded - Show downgraded packages /*{{{*/
449// ---------------------------------------------------------------------
450/* */
451bool ShowDowngraded(ostream &out,CacheFile &Cache)
452{
453 string List;
ac625538 454 string VersionsList;
b2e465d6
AL
455 for (unsigned J = 0; J < Cache->Head().PackageCount; J++)
456 {
457 pkgCache::PkgIterator I(Cache,Cache.List[J]);
458
459 // Not interesting
460 if (Cache[I].Downgrade() == false || Cache[I].NewInstall() == true)
461 continue;
462
463 List += string(I.Name()) + " ";
ac625538 464 VersionsList += string(Cache[I].CurVersion) + " => " + Cache[I].CandVersion + "\n";
b2e465d6 465 }
aee7bceb 466 return ShowList(out,_("The following packages will be DOWNGRADED:"),List,VersionsList);
0a8e3465
AL
467}
468 /*}}}*/
469// ShowHold - Show held but changed packages /*{{{*/
470// ---------------------------------------------------------------------
471/* */
1089ca89 472bool ShowHold(ostream &out,CacheFile &Cache)
0a8e3465 473{
0a8e3465 474 string List;
ac625538 475 string VersionsList;
1089ca89 476 for (unsigned J = 0; J < Cache->Head().PackageCount; J++)
0a8e3465 477 {
1089ca89
AL
478 pkgCache::PkgIterator I(Cache,Cache.List[J]);
479 if (Cache[I].InstallVer != (pkgCache::Version *)I.CurrentVer() &&
ac625538
AL
480 I->SelectedState == pkgCache::State::Hold) {
481 List += string(I.Name()) + " ";
482 VersionsList += string(Cache[I].CurVersion) + " => " + Cache[I].CandVersion + "\n";
483 }
0a8e3465
AL
484 }
485
ac625538 486 return ShowList(out,_("The following held packages will be changed:"),List,VersionsList);
0a8e3465
AL
487}
488 /*}}}*/
489// ShowEssential - Show an essential package warning /*{{{*/
490// ---------------------------------------------------------------------
491/* This prints out a warning message that is not to be ignored. It shows
492 all essential packages and their dependents that are to be removed.
493 It is insanely risky to remove the dependents of an essential package! */
1089ca89 494bool ShowEssential(ostream &out,CacheFile &Cache)
0a8e3465 495{
0a8e3465 496 string List;
ac625538 497 string VersionsList;
b2e465d6
AL
498 bool *Added = new bool[Cache->Head().PackageCount];
499 for (unsigned int I = 0; I != Cache->Head().PackageCount; I++)
0a8e3465
AL
500 Added[I] = false;
501
1089ca89 502 for (unsigned J = 0; J < Cache->Head().PackageCount; J++)
0a8e3465 503 {
1089ca89 504 pkgCache::PkgIterator I(Cache,Cache.List[J]);
b2e465d6
AL
505 if ((I->Flags & pkgCache::Flag::Essential) != pkgCache::Flag::Essential &&
506 (I->Flags & pkgCache::Flag::Important) != pkgCache::Flag::Important)
0a8e3465
AL
507 continue;
508
509 // The essential package is being removed
1089ca89 510 if (Cache[I].Delete() == true)
0a8e3465
AL
511 {
512 if (Added[I->ID] == false)
513 {
514 Added[I->ID] = true;
515 List += string(I.Name()) + " ";
ac625538 516 //VersionsList += string(Cache[I].CurVersion) + "\n"; ???
0a8e3465
AL
517 }
518 }
519
520 if (I->CurrentVer == 0)
521 continue;
522
523 // Print out any essential package depenendents that are to be removed
b2e465d6 524 for (pkgCache::DepIterator D = I.CurrentVer().DependsList(); D.end() == false; D++)
0a8e3465 525 {
3e3221ba
AL
526 // Skip everything but depends
527 if (D->Type != pkgCache::Dep::PreDepends &&
528 D->Type != pkgCache::Dep::Depends)
529 continue;
530
0a8e3465 531 pkgCache::PkgIterator P = D.SmartTargetPkg();
1089ca89 532 if (Cache[P].Delete() == true)
0a8e3465
AL
533 {
534 if (Added[P->ID] == true)
535 continue;
536 Added[P->ID] = true;
3e3221ba
AL
537
538 char S[300];
20ebd488 539 snprintf(S,sizeof(S),_("%s (due to %s) "),P.Name(),I.Name());
3e3221ba 540 List += S;
ac625538 541 //VersionsList += "\n"; ???
0a8e3465
AL
542 }
543 }
544 }
545
83d89a9f 546 delete [] Added;
080bf1be 547 return ShowList(out,_("WARNING: The following essential packages will be removed.\n"
ac625538 548 "This should NOT be done unless you know exactly what you are doing!"),List,VersionsList);
0a8e3465 549}
7db98ffc 550
0a8e3465
AL
551 /*}}}*/
552// Stats - Show some statistics /*{{{*/
553// ---------------------------------------------------------------------
554/* */
555void Stats(ostream &out,pkgDepCache &Dep)
556{
557 unsigned long Upgrade = 0;
b2e465d6 558 unsigned long Downgrade = 0;
0a8e3465 559 unsigned long Install = 0;
d0c59649 560 unsigned long ReInstall = 0;
0a8e3465
AL
561 for (pkgCache::PkgIterator I = Dep.PkgBegin(); I.end() == false; I++)
562 {
563 if (Dep[I].NewInstall() == true)
564 Install++;
565 else
b2e465d6 566 {
0a8e3465
AL
567 if (Dep[I].Upgrade() == true)
568 Upgrade++;
b2e465d6
AL
569 else
570 if (Dep[I].Downgrade() == true)
571 Downgrade++;
572 }
573
d0c59649
AL
574 if (Dep[I].Delete() == false && (Dep[I].iFlags & pkgDepCache::ReInstall) == pkgDepCache::ReInstall)
575 ReInstall++;
0a8e3465
AL
576 }
577
2adb5fda 578 ioprintf(out,_("%lu upgraded, %lu newly installed, "),
b2e465d6
AL
579 Upgrade,Install);
580
d0c59649 581 if (ReInstall != 0)
b2e465d6
AL
582 ioprintf(out,_("%lu reinstalled, "),ReInstall);
583 if (Downgrade != 0)
584 ioprintf(out,_("%lu downgraded, "),Downgrade);
0a8e3465 585
2d425135 586 ioprintf(out,_("%lu to remove and %lu not upgraded.\n"),
b2e465d6
AL
587 Dep.DelCount(),Dep.KeepCount());
588
0a8e3465 589 if (Dep.BadCount() != 0)
2adb5fda 590 ioprintf(out,_("%lu not fully installed or removed.\n"),
b2e465d6 591 Dep.BadCount());
0a8e3465
AL
592}
593 /*}}}*/
594
1089ca89 595// CacheFile::NameComp - QSort compare by name /*{{{*/
0a8e3465
AL
596// ---------------------------------------------------------------------
597/* */
1089ca89
AL
598pkgCache *CacheFile::SortCache = 0;
599int CacheFile::NameComp(const void *a,const void *b)
0a8e3465 600{
8508b1df
AL
601 if (*(pkgCache::Package **)a == 0 || *(pkgCache::Package **)b == 0)
602 return *(pkgCache::Package **)a - *(pkgCache::Package **)b;
0a8e3465 603
1089ca89
AL
604 const pkgCache::Package &A = **(pkgCache::Package **)a;
605 const pkgCache::Package &B = **(pkgCache::Package **)b;
606
607 return strcmp(SortCache->StrP + A.Name,SortCache->StrP + B.Name);
608}
609 /*}}}*/
610// CacheFile::Sort - Sort by name /*{{{*/
611// ---------------------------------------------------------------------
612/* */
613void CacheFile::Sort()
614{
615 delete [] List;
616 List = new pkgCache::Package *[Cache->Head().PackageCount];
617 memset(List,0,sizeof(*List)*Cache->Head().PackageCount);
618 pkgCache::PkgIterator I = Cache->PkgBegin();
619 for (;I.end() != true; I++)
620 List[I->ID] = I;
621
622 SortCache = *this;
623 qsort(List,Cache->Head().PackageCount,sizeof(*List),NameComp);
624}
0a8e3465 625 /*}}}*/
b2e465d6 626// CacheFile::CheckDeps - Open the cache file /*{{{*/
0a8e3465
AL
627// ---------------------------------------------------------------------
628/* This routine generates the caches and then opens the dependency cache
629 and verifies that the system is OK. */
2d11135a 630bool CacheFile::CheckDeps(bool AllowBroken)
0a8e3465 631{
4ef9a929
MV
632 bool FixBroken = _config->FindB("APT::Get::Fix-Broken",false);
633
d38b7b3d
AL
634 if (_error->PendingError() == true)
635 return false;
0a8e3465 636
0a8e3465 637 // Check that the system is OK
b2e465d6 638 if (DCache->DelCount() != 0 || DCache->InstCount() != 0)
db0db9fe 639 return _error->Error("Internal error, non-zero counts");
0a8e3465
AL
640
641 // Apply corrections for half-installed packages
b2e465d6 642 if (pkgApplyStatus(*DCache) == false)
0a8e3465
AL
643 return false;
644
4ef9a929
MV
645 if (_config->FindB("APT::Get::Fix-Policy-Broken",false) == true)
646 {
647 FixBroken = true;
648 if ((DCache->PolicyBrokenCount() > 0))
649 {
650 // upgrade all policy-broken packages with ForceImportantDeps=True
651 for (pkgCache::PkgIterator I = Cache->PkgBegin(); !I.end(); I++)
652 if ((*DCache)[I].NowPolicyBroken() == true)
7610bb3d 653 DCache->MarkInstall(I,true,0, false, true);
4ef9a929
MV
654 }
655 }
656
0a8e3465 657 // Nothing is broken
b2e465d6 658 if (DCache->BrokenCount() == 0 || AllowBroken == true)
0a8e3465
AL
659 return true;
660
661 // Attempt to fix broken things
4ef9a929 662 if (FixBroken == true)
0a8e3465 663 {
b2e465d6
AL
664 c1out << _("Correcting dependencies...") << flush;
665 if (pkgFixBroken(*DCache) == false || DCache->BrokenCount() != 0)
0a8e3465 666 {
b2e465d6 667 c1out << _(" failed.") << endl;
421c8d10 668 ShowBroken(c1out,*this,true);
0a8e3465 669
b2e465d6 670 return _error->Error(_("Unable to correct dependencies"));
0a8e3465 671 }
b2e465d6
AL
672 if (pkgMinimizeUpgrade(*DCache) == false)
673 return _error->Error(_("Unable to minimize the upgrade set"));
0a8e3465 674
b2e465d6 675 c1out << _(" Done") << endl;
0a8e3465
AL
676 }
677 else
678 {
b2e465d6 679 c1out << _("You might want to run `apt-get -f install' to correct these.") << endl;
421c8d10 680 ShowBroken(c1out,*this,true);
0a8e3465 681
b2e465d6 682 return _error->Error(_("Unmet dependencies. Try using -f."));
0a8e3465
AL
683 }
684
685 return true;
686}
7db98ffc
MZ
687
688static bool CheckAuth(pkgAcquire& Fetcher)
689{
690 string UntrustedList;
691 for (pkgAcquire::ItemIterator I = Fetcher.ItemsBegin(); I < Fetcher.ItemsEnd(); ++I)
692 {
693 if (!(*I)->IsTrusted())
694 {
695 UntrustedList += string((*I)->ShortDesc()) + " ";
696 }
697 }
698
699 if (UntrustedList == "")
700 {
701 return true;
702 }
703
704 ShowList(c2out,_("WARNING: The following packages cannot be authenticated!"),UntrustedList,"");
705
706 if (_config->FindB("APT::Get::AllowUnauthenticated",false) == true)
707 {
2a7e07c7 708 c2out << _("Authentication warning overridden.\n");
7db98ffc
MZ
709 return true;
710 }
711
712 if (_config->FindI("quiet",0) < 2
713 && _config->FindB("APT::Get::Assume-Yes",false) == false)
714 {
db0db9fe 715 c2out << _("Install these packages without verification [y/N]? ") << flush;
7db98ffc
MZ
716 if (!YnPrompt(false))
717 return _error->Error(_("Some packages could not be authenticated"));
718
719 return true;
720 }
721 else if (_config->FindB("APT::Get::Force-Yes",false) == true)
722 {
723 return true;
724 }
725
726 return _error->Error(_("There are problems and -y was used without --force-yes"));
727}
728
729
0a8e3465
AL
730 /*}}}*/
731
732// InstallPackages - Actually download and install the packages /*{{{*/
733// ---------------------------------------------------------------------
734/* This displays the informative messages describing what is going to
735 happen and then calls the download routines */
a3eaf954 736bool InstallPackages(CacheFile &Cache,bool ShwKept,bool Ask = true,
80fbda96 737 bool Safety = true)
0a8e3465 738{
fc4b5c9f
AL
739 if (_config->FindB("APT::Get::Purge",false) == true)
740 {
741 pkgCache::PkgIterator I = Cache->PkgBegin();
742 for (; I.end() == false; I++)
d556d1a1
AL
743 {
744 if (I.Purge() == false && Cache[I].Mode == pkgDepCache::ModeDelete)
745 Cache->MarkDelete(I,true);
746 }
fc4b5c9f
AL
747 }
748
83d89a9f 749 bool Fail = false;
6f86c974 750 bool Essential = false;
83d89a9f 751
a6568219 752 // Show all the various warning indicators
0a8e3465
AL
753 ShowDel(c1out,Cache);
754 ShowNew(c1out,Cache);
755 if (ShwKept == true)
756 ShowKept(c1out,Cache);
7a215bee 757 Fail |= !ShowHold(c1out,Cache);
906fbf88 758 if (_config->FindB("APT::Get::Show-Upgraded",true) == true)
0a8e3465 759 ShowUpgraded(c1out,Cache);
b2e465d6 760 Fail |= !ShowDowngraded(c1out,Cache);
5d1d0738
AL
761 if (_config->FindB("APT::Get::Download-Only",false) == false)
762 Essential = !ShowEssential(c1out,Cache);
6f86c974 763 Fail |= Essential;
0a8e3465 764 Stats(c1out,Cache);
7db98ffc 765
0a8e3465 766 // Sanity check
d38b7b3d 767 if (Cache->BrokenCount() != 0)
0a8e3465 768 {
421c8d10 769 ShowBroken(c1out,Cache,false);
2a7e07c7 770 return _error->Error(_("Internal error, InstallPackages was called with broken packages!"));
0a8e3465
AL
771 }
772
d0c59649 773 if (Cache->DelCount() == 0 && Cache->InstCount() == 0 &&
d38b7b3d 774 Cache->BadCount() == 0)
c60d151b 775 return true;
03e39e59 776
d150b09d 777 // No remove flag
b2e465d6 778 if (Cache->DelCount() != 0 && _config->FindB("APT::Get::Remove",true) == false)
db0db9fe 779 return _error->Error(_("Packages need to be removed but remove is disabled."));
d150b09d 780
03e39e59
AL
781 // Run the simulator ..
782 if (_config->FindB("APT::Get::Simulate") == true)
783 {
784 pkgSimulate PM(Cache);
2a7e07c7
MV
785 int status_fd = _config->FindI("APT::Status-Fd",-1);
786 pkgPackageManager::OrderResult Res = PM.DoInstall(status_fd);
281daf46
AL
787 if (Res == pkgPackageManager::Failed)
788 return false;
789 if (Res != pkgPackageManager::Completed)
2a7e07c7 790 return _error->Error(_("Internal error, Ordering didn't finish"));
281daf46 791 return true;
03e39e59
AL
792 }
793
794 // Create the text record parser
795 pkgRecords Recs(Cache);
83d89a9f
AL
796 if (_error->PendingError() == true)
797 return false;
798
d38b7b3d 799 // Lock the archive directory
36375005 800 FileFd Lock;
c37b9502
AL
801 if (_config->FindB("Debug::NoLocking",false) == false &&
802 _config->FindB("APT::Get::Print-URIs") == false)
d38b7b3d 803 {
36375005 804 Lock.Fd(GetLock(_config->FindDir("Dir::Cache::Archives") + "lock"));
d38b7b3d 805 if (_error->PendingError() == true)
b2e465d6 806 return _error->Error(_("Unable to lock the download directory"));
d38b7b3d 807 }
03e39e59
AL
808
809 // Create the download object
810 AcqTextStatus Stat(ScreenWidth,_config->FindI("quiet",0));
811 pkgAcquire Fetcher(&Stat);
812
813 // Read the source list
814 pkgSourceList List;
815 if (List.ReadMainList() == false)
b2e465d6 816 return _error->Error(_("The list of sources could not be read."));
03e39e59
AL
817
818 // Create the package manager and prepare to download
b2e465d6
AL
819 SPtr<pkgPackageManager> PM= _system->CreatePM(Cache);
820 if (PM->GetArchives(&Fetcher,&List,&Recs) == false ||
424c3bc0 821 _error->PendingError() == true)
03e39e59
AL
822 return false;
823
7a1b1f8b 824 // Display statistics
b2e465d6
AL
825 double FetchBytes = Fetcher.FetchNeeded();
826 double FetchPBytes = Fetcher.PartialPresent();
827 double DebBytes = Fetcher.TotalNeeded();
d38b7b3d
AL
828 if (DebBytes != Cache->DebSize())
829 {
830 c0out << DebBytes << ',' << Cache->DebSize() << endl;
2a7e07c7 831 c0out << _("How odd.. The sizes didn't match, email apt@packages.debian.org") << endl;
d38b7b3d 832 }
138d4b3d 833
7a1b1f8b 834 // Number of bytes
a6568219 835 if (DebBytes != FetchBytes)
ac7fd99c 836 ioprintf(c1out,_("Need to get %sB/%sB of archives.\n"),
b2e465d6 837 SizeToStr(FetchBytes).c_str(),SizeToStr(DebBytes).c_str());
a6568219 838 else
ac7fd99c 839 ioprintf(c1out,_("Need to get %sB of archives.\n"),
b2e465d6
AL
840 SizeToStr(DebBytes).c_str());
841
10bb1f5f
AL
842 // Size delta
843 if (Cache->UsrSize() >= 0)
ac7fd99c 844 ioprintf(c1out,_("After unpacking %sB of additional disk space will be used.\n"),
b2e465d6 845 SizeToStr(Cache->UsrSize()).c_str());
10bb1f5f 846 else
ac7fd99c 847 ioprintf(c1out,_("After unpacking %sB disk space will be freed.\n"),
b2e465d6 848 SizeToStr(-1*Cache->UsrSize()).c_str());
10bb1f5f
AL
849
850 if (_error->PendingError() == true)
851 return false;
31a0531d 852
01b64152
AL
853 /* Check for enough free space, but only if we are actually going to
854 download */
18e20d63
AL
855 if (_config->FindB("APT::Get::Print-URIs") == false &&
856 _config->FindB("APT::Get::Download",true) == true)
01b64152
AL
857 {
858 struct statvfs Buf;
859 string OutputDir = _config->FindDir("Dir::Cache::Archives");
860 if (statvfs(OutputDir.c_str(),&Buf) != 0)
2a7e07c7 861 return _error->Errno("statvfs",_("Couldn't determine free space in %s"),
01b64152
AL
862 OutputDir.c_str());
863 if (unsigned(Buf.f_bfree) < (FetchBytes - FetchPBytes)/Buf.f_bsize)
677cbcbc 864 return _error->Error(_("You don't have enough free space in %s."),
01b64152
AL
865 OutputDir.c_str());
866 }
867
83d89a9f 868 // Fail safe check
0c95c765
AL
869 if (_config->FindI("quiet",0) >= 2 ||
870 _config->FindB("APT::Get::Assume-Yes",false) == true)
83d89a9f
AL
871 {
872 if (Fail == true && _config->FindB("APT::Get::Force-Yes",false) == false)
b2e465d6 873 return _error->Error(_("There are problems and -y was used without --force-yes"));
83d89a9f 874 }
83d89a9f 875
80fbda96 876 if (Essential == true && Safety == true)
6f86c974 877 {
d150b09d 878 if (_config->FindB("APT::Get::Trivial-Only",false) == true)
b2e465d6 879 return _error->Error(_("Trivial Only specified but this is not a trivial operation."));
d150b09d 880
b2e465d6
AL
881 const char *Prompt = _("Yes, do as I say!");
882 ioprintf(c2out,
080bf1be 883 _("You are about to do something potentially harmful.\n"
b2e465d6
AL
884 "To continue type in the phrase '%s'\n"
885 " ?] "),Prompt);
886 c2out << flush;
887 if (AnalPrompt(Prompt) == false)
6f86c974 888 {
b2e465d6 889 c2out << _("Abort.") << endl;
a6568219 890 exit(1);
6f86c974
AL
891 }
892 }
893 else
d150b09d 894 {
6f86c974 895 // Prompt to continue
38262e68 896 if (Ask == true || Fail == true)
6f86c974 897 {
d150b09d 898 if (_config->FindB("APT::Get::Trivial-Only",false) == true)
b2e465d6 899 return _error->Error(_("Trivial Only specified but this is not a trivial operation."));
d150b09d 900
0c95c765 901 if (_config->FindI("quiet",0) < 2 &&
6f86c974 902 _config->FindB("APT::Get::Assume-Yes",false) == false)
0c95c765 903 {
db0db9fe 904 c2out << _("Do you want to continue [Y/n]? ") << flush;
6f86c974 905
0c95c765
AL
906 if (YnPrompt() == false)
907 {
b2e465d6 908 c2out << _("Abort.") << endl;
0c95c765
AL
909 exit(1);
910 }
911 }
6f86c974
AL
912 }
913 }
914
36375005 915 // Just print out the uris an exit if the --print-uris flag was used
f7a08e33
AL
916 if (_config->FindB("APT::Get::Print-URIs") == true)
917 {
918 pkgAcquire::UriIterator I = Fetcher.UriBegin();
919 for (; I != Fetcher.UriEnd(); I++)
920 cout << '\'' << I->URI << "' " << flNotDir(I->Owner->DestFile) << ' ' <<
495e5cb2 921 I->Owner->FileSize << ' ' << I->Owner->HashSum() << endl;
f7a08e33
AL
922 return true;
923 }
b2e465d6 924
7db98ffc
MZ
925 if (!CheckAuth(Fetcher))
926 return false;
927
b2e465d6
AL
928 /* Unlock the dpkg lock if we are not going to be doing an install
929 after. */
930 if (_config->FindB("APT::Get::Download-Only",false) == true)
931 _system->UnLock();
83d89a9f 932
03e39e59 933 // Run it
281daf46 934 while (1)
30e1eab5 935 {
a3eaf954 936 bool Transient = false;
b2e465d6 937 if (_config->FindB("APT::Get::Download",true) == false)
a3eaf954 938 {
076d01b0 939 for (pkgAcquire::ItemIterator I = Fetcher.ItemsBegin(); I < Fetcher.ItemsEnd();)
a3eaf954
AL
940 {
941 if ((*I)->Local == true)
942 {
943 I++;
944 continue;
945 }
946
947 // Close the item and check if it was found in cache
948 (*I)->Finished();
949 if ((*I)->Complete == false)
950 Transient = true;
951
952 // Clear it out of the fetch list
953 delete *I;
954 I = Fetcher.ItemsBegin();
955 }
956 }
957
958 if (Fetcher.Run() == pkgAcquire::Failed)
959 return false;
30e1eab5 960
281daf46
AL
961 // Print out errors
962 bool Failed = false;
076d01b0 963 for (pkgAcquire::ItemIterator I = Fetcher.ItemsBegin(); I != Fetcher.ItemsEnd(); I++)
f01fe790 964 {
281daf46
AL
965 if ((*I)->Status == pkgAcquire::Item::StatDone &&
966 (*I)->Complete == true)
967 continue;
968
281daf46
AL
969 if ((*I)->Status == pkgAcquire::Item::StatIdle)
970 {
971 Transient = true;
972 // Failed = true;
973 continue;
974 }
a3eaf954 975
b2e465d6
AL
976 fprintf(stderr,_("Failed to fetch %s %s\n"),(*I)->DescURI().c_str(),
977 (*I)->ErrorText.c_str());
f01fe790 978 Failed = true;
f01fe790 979 }
5ec427c2 980
a3eaf954 981 /* If we are in no download mode and missing files and there were
5ec427c2
AL
982 'failures' then the user must specify -m. Furthermore, there
983 is no such thing as a transient error in no-download mode! */
a3eaf954 984 if (Transient == true &&
b2e465d6 985 _config->FindB("APT::Get::Download",true) == false)
5ec427c2
AL
986 {
987 Transient = false;
988 Failed = true;
989 }
f01fe790 990
281daf46
AL
991 if (_config->FindB("APT::Get::Download-Only",false) == true)
992 {
993 if (Failed == true && _config->FindB("APT::Get::Fix-Missing",false) == false)
b2e465d6
AL
994 return _error->Error(_("Some files failed to download"));
995 c1out << _("Download complete and in download only mode") << endl;
281daf46
AL
996 return true;
997 }
998
8195ae46 999 if (Failed == true && _config->FindB("APT::Get::Fix-Missing",false) == false)
f01fe790 1000 {
b2e465d6 1001 return _error->Error(_("Unable to fetch some archives, maybe run apt-get update or try with --fix-missing?"));
f01fe790
AL
1002 }
1003
281daf46 1004 if (Transient == true && Failed == true)
b2e465d6 1005 return _error->Error(_("--fix-missing and media swapping is not currently supported"));
281daf46
AL
1006
1007 // Try to deal with missing package files
b2e465d6 1008 if (Failed == true && PM->FixMissing() == false)
281daf46 1009 {
b2e465d6 1010 cerr << _("Unable to correct missing packages.") << endl;
db0db9fe 1011 return _error->Error(_("Aborting install."));
281daf46 1012 }
afb1e2e3 1013
b2e465d6 1014 _system->UnLock();
2a7e07c7
MV
1015 int status_fd = _config->FindI("APT::Status-Fd",-1);
1016 pkgPackageManager::OrderResult Res = PM->DoInstall(status_fd);
281daf46
AL
1017 if (Res == pkgPackageManager::Failed || _error->PendingError() == true)
1018 return false;
1019 if (Res == pkgPackageManager::Completed)
1020 return true;
1021
1022 // Reload the fetcher object and loop again for media swapping
1023 Fetcher.Shutdown();
b2e465d6 1024 if (PM->GetArchives(&Fetcher,&List,&Recs) == false)
281daf46 1025 return false;
b2e465d6
AL
1026
1027 _system->Lock();
281daf46 1028 }
0a8e3465
AL
1029}
1030 /*}}}*/
c373c37a
AL
1031// TryToInstall - Try to install a single package /*{{{*/
1032// ---------------------------------------------------------------------
1033/* This used to be inlined in DoInstall, but with the advent of regex package
1034 name matching it was split out.. */
1035bool TryToInstall(pkgCache::PkgIterator Pkg,pkgDepCache &Cache,
1036 pkgProblemResolver &Fix,bool Remove,bool BrokenFix,
1037 unsigned int &ExpectedInst,bool AllowFail = true)
1038{
1039 /* This is a pure virtual package and there is a single available
1040 provides */
1041 if (Cache[Pkg].CandidateVer == 0 && Pkg->ProvidesList != 0 &&
1042 Pkg.ProvidesList()->NextProvides == 0)
1043 {
1044 pkgCache::PkgIterator Tmp = Pkg.ProvidesList().OwnerPkg();
b2e465d6
AL
1045 ioprintf(c1out,_("Note, selecting %s instead of %s\n"),
1046 Tmp.Name(),Pkg.Name());
c373c37a
AL
1047 Pkg = Tmp;
1048 }
1049
1050 // Handle the no-upgrade case
b2e465d6 1051 if (_config->FindB("APT::Get::upgrade",true) == false &&
c373c37a
AL
1052 Pkg->CurrentVer != 0)
1053 {
1054 if (AllowFail == true)
b2e465d6
AL
1055 ioprintf(c1out,_("Skipping %s, it is already installed and upgrade is not set.\n"),
1056 Pkg.Name());
c373c37a
AL
1057 return true;
1058 }
1059
1060 // Check if there is something at all to install
1061 pkgDepCache::StateCache &State = Cache[Pkg];
a146c927 1062 if (Remove == true && Pkg->CurrentVer == 0)
10bb1f5f 1063 {
d993b35d
AL
1064 Fix.Clear(Pkg);
1065 Fix.Protect(Pkg);
1066 Fix.Remove(Pkg);
1067
b2e465d6
AL
1068 /* We want to continue searching for regex hits, so we return false here
1069 otherwise this is not really an error. */
10bb1f5f 1070 if (AllowFail == false)
d993b35d
AL
1071 return false;
1072
1156d969 1073 ioprintf(c1out,_("Package %s is not installed, so not removed\n"),Pkg.Name());
b2e465d6 1074 return true;
10bb1f5f 1075 }
a146c927
AL
1076
1077 if (State.CandidateVer == 0 && Remove == false)
c373c37a
AL
1078 {
1079 if (AllowFail == false)
1080 return false;
1081
1082 if (Pkg->ProvidesList != 0)
1083 {
b2e465d6
AL
1084 ioprintf(c1out,_("Package %s is a virtual package provided by:\n"),
1085 Pkg.Name());
c373c37a
AL
1086
1087 pkgCache::PrvIterator I = Pkg.ProvidesList();
1088 for (; I.end() == false; I++)
1089 {
1090 pkgCache::PkgIterator Pkg = I.OwnerPkg();
1091
1092 if (Cache[Pkg].CandidateVerIter(Cache) == I.OwnerVer())
1093 {
1094 if (Cache[Pkg].Install() == true && Cache[Pkg].NewInstall() == false)
1095 c1out << " " << Pkg.Name() << " " << I.OwnerVer().VerStr() <<
b2e465d6 1096 _(" [Installed]") << endl;
c373c37a
AL
1097 else
1098 c1out << " " << Pkg.Name() << " " << I.OwnerVer().VerStr() << endl;
1099 }
1100 }
b2e465d6 1101 c1out << _("You should explicitly select one to install.") << endl;
c373c37a
AL
1102 }
1103 else
1104 {
b2e465d6 1105 ioprintf(c1out,
4c36e062
AL
1106 _("Package %s is not available, but is referred to by another package.\n"
1107 "This may mean that the package is missing, has been obsoleted, or\n"
1108 "is only available from another source\n"),Pkg.Name());
c373c37a
AL
1109
1110 string List;
ac625538 1111 string VersionsList;
c82ffeb6
AL
1112 SPtrArray<bool> Seen = new bool[Cache.Head().PackageCount];
1113 memset(Seen,0,Cache.Head().PackageCount*sizeof(*Seen));
c373c37a
AL
1114 pkgCache::DepIterator Dep = Pkg.RevDependsList();
1115 for (; Dep.end() == false; Dep++)
1116 {
1117 if (Dep->Type != pkgCache::Dep::Replaces)
1118 continue;
b2e465d6
AL
1119 if (Seen[Dep.ParentPkg()->ID] == true)
1120 continue;
1121 Seen[Dep.ParentPkg()->ID] = true;
c373c37a 1122 List += string(Dep.ParentPkg().Name()) + " ";
ac625538 1123 //VersionsList += string(Dep.ParentPkg().CurVersion) + "\n"; ???
c373c37a 1124 }
ac625538 1125 ShowList(c1out,_("However the following packages replace it:"),List,VersionsList);
c373c37a
AL
1126 }
1127
b2e465d6 1128 _error->Error(_("Package %s has no installation candidate"),Pkg.Name());
c373c37a
AL
1129 return false;
1130 }
61d6a8de
AL
1131
1132 Fix.Clear(Pkg);
70777d4b 1133 Fix.Protect(Pkg);
c373c37a
AL
1134 if (Remove == true)
1135 {
1136 Fix.Remove(Pkg);
1137 Cache.MarkDelete(Pkg,_config->FindB("APT::Get::Purge",false));
1138 return true;
1139 }
1140
1141 // Install it
1142 Cache.MarkInstall(Pkg,false);
1143 if (State.Install() == false)
1144 {
d0c59649
AL
1145 if (_config->FindB("APT::Get::ReInstall",false) == true)
1146 {
1147 if (Pkg->CurrentVer == 0 || Pkg.CurrentVer().Downloadable() == false)
677cbcbc 1148 ioprintf(c1out,_("Reinstallation of %s is not possible, it cannot be downloaded.\n"),
b2e465d6 1149 Pkg.Name());
d0c59649
AL
1150 else
1151 Cache.SetReInstall(Pkg,true);
1152 }
1153 else
1154 {
1155 if (AllowFail == true)
677cbcbc 1156 ioprintf(c1out,_("%s is already the newest version.\n"),
b2e465d6 1157 Pkg.Name());
d0c59649 1158 }
c373c37a
AL
1159 }
1160 else
1161 ExpectedInst++;
1162
60681f93
MV
1163 // Install it with autoinstalling enabled (if we not respect the minial
1164 // required deps or the policy)
1165 if ((State.InstBroken() == true || State.InstPolicyBroken() == true) && BrokenFix == false)
c373c37a 1166 Cache.MarkInstall(Pkg,true);
60681f93 1167
c373c37a
AL
1168 return true;
1169}
1170 /*}}}*/
b2e465d6
AL
1171// TryToChangeVer - Try to change a candidate version /*{{{*/
1172// ---------------------------------------------------------------------
1173/* */
1174bool TryToChangeVer(pkgCache::PkgIterator Pkg,pkgDepCache &Cache,
1175 const char *VerTag,bool IsRel)
1176{
d993b35d
AL
1177 pkgVersionMatch Match(VerTag,(IsRel == true?pkgVersionMatch::Release :
1178 pkgVersionMatch::Version));
b2e465d6
AL
1179
1180 pkgCache::VerIterator Ver = Match.Find(Pkg);
1181
1182 if (Ver.end() == true)
1183 {
1184 if (IsRel == true)
1185 return _error->Error(_("Release '%s' for '%s' was not found"),
1186 VerTag,Pkg.Name());
1187 return _error->Error(_("Version '%s' for '%s' was not found"),
1188 VerTag,Pkg.Name());
1189 }
1190
1191 if (strcmp(VerTag,Ver.VerStr()) != 0)
1192 {
1193 ioprintf(c1out,_("Selected version %s (%s) for %s\n"),
1194 Ver.VerStr(),Ver.RelStr().c_str(),Pkg.Name());
1195 }
1196
1197 Cache.SetCandidateVersion(Ver);
1198 return true;
1199}
1200 /*}}}*/
1201// FindSrc - Find a source record /*{{{*/
1202// ---------------------------------------------------------------------
1203/* */
1204pkgSrcRecords::Parser *FindSrc(const char *Name,pkgRecords &Recs,
1205 pkgSrcRecords &SrcRecs,string &Src,
1206 pkgDepCache &Cache)
1207{
1208 // We want to pull the version off the package specification..
1209 string VerTag;
1210 string TmpSrc = Name;
1211 string::size_type Slash = TmpSrc.rfind('=');
aca056a9 1212
ce6162be 1213 // honor default release
aca056a9 1214 string DefRel = _config->Find("APT::Default-Release");
aca056a9 1215 pkgCache::PkgIterator Pkg = Cache.FindPkg(TmpSrc);
aca056a9 1216
b2e465d6
AL
1217 if (Slash != string::npos)
1218 {
1219 VerTag = string(TmpSrc.begin() + Slash + 1,TmpSrc.end());
1220 TmpSrc = string(TmpSrc.begin(),TmpSrc.begin() + Slash);
aca056a9 1221 }
d5f38102 1222 else if(!Pkg.end() && DefRel.empty() == false)
aca056a9
MV
1223 {
1224 // we have a default release, try to locate the pkg. we do it like
1225 // this because GetCandidateVer() will not "downgrade", that means
1226 // "apt-get source -t stable apt" won't work on a unstable system
1227 for (pkgCache::VerIterator Ver = Pkg.VersionList(); Ver.end() == false;
1228 Ver++)
1229 {
1230 for (pkgCache::VerFileIterator VF = Ver.FileList(); VF.end() == false;
1231 VF++)
1232 {
1233 /* If this is the status file, and the current version is not the
1234 version in the status file (ie it is not installed, or somesuch)
1235 then it is not a candidate for installation, ever. This weeds
1236 out bogus entries that may be due to config-file states, or
1237 other. */
1238 if ((VF.File()->Flags & pkgCache::Flag::NotSource) ==
1239 pkgCache::Flag::NotSource && Pkg.CurrentVer() != Ver)
1240 continue;
1241
1242 //std::cout << VF.File().Archive() << std::endl;
d87116ef 1243 if(VF.File().Archive() && (VF.File().Archive() == DefRel))
aca056a9
MV
1244 {
1245 VerTag = Ver.VerStr();
1246 break;
1247 }
1248 }
026f60e2 1249 }
b2e465d6 1250 }
aca056a9 1251
b2e465d6
AL
1252 /* Lookup the version of the package we would install if we were to
1253 install a version and determine the source package name, then look
aca056a9
MV
1254 in the archive for a source package of the same name. */
1255 if (_config->FindB("APT::Get::Only-Source") == false)
b2e465d6 1256 {
b2e465d6
AL
1257 if (Pkg.end() == false)
1258 {
ce6162be 1259 pkgCache::VerIterator Ver = Cache.GetCandidateVer(Pkg);
b2e465d6
AL
1260 if (Ver.end() == false)
1261 {
1262 pkgRecords::Parser &Parse = Recs.Lookup(Ver.FileList());
1263 Src = Parse.SourcePkg();
1264 }
1265 }
1266 }
1267
1268 // No source package name..
1269 if (Src.empty() == true)
1270 Src = TmpSrc;
1271
1272 // The best hit
1273 pkgSrcRecords::Parser *Last = 0;
1274 unsigned long Offset = 0;
1275 string Version;
1276 bool IsMatch = false;
1277
1278 // If we are matching by version then we need exact matches to be happy
1279 if (VerTag.empty() == false)
1280 IsMatch = true;
1281
1282 /* Iterate over all of the hits, which includes the resulting
1283 binary packages in the search */
1284 pkgSrcRecords::Parser *Parse;
1285 SrcRecs.Restart();
1286 while ((Parse = SrcRecs.Find(Src.c_str(),false)) != 0)
1287 {
1288 string Ver = Parse->Version();
1289
1290 // Skip name mismatches
1291 if (IsMatch == true && Parse->Package() != Src)
1292 continue;
1293
1294 if (VerTag.empty() == false)
1295 {
1296 /* Don't want to fall through because we are doing exact version
1297 matching. */
1298 if (Cache.VS().CmpVersion(VerTag,Ver) != 0)
1299 continue;
1300
1301 Last = Parse;
1302 Offset = Parse->Offset();
1303 break;
1304 }
1305
1306 // Newer version or an exact match
1307 if (Last == 0 || Cache.VS().CmpVersion(Version,Ver) < 0 ||
1308 (Parse->Package() == Src && IsMatch == false))
1309 {
1310 IsMatch = Parse->Package() == Src;
1311 Last = Parse;
1312 Offset = Parse->Offset();
1313 Version = Ver;
1314 }
1315 }
1316
ce6162be 1317 if (Last == 0 || Last->Jump(Offset) == false)
b2e465d6
AL
1318 return 0;
1319
1320 return Last;
1321}
1322 /*}}}*/
0a8e3465
AL
1323
1324// DoUpdate - Update the package lists /*{{{*/
1325// ---------------------------------------------------------------------
1326/* */
b2e465d6 1327bool DoUpdate(CommandLine &CmdL)
0a8e3465 1328{
b2e465d6
AL
1329 if (CmdL.FileSize() != 1)
1330 return _error->Error(_("The update command takes no arguments"));
1331
0919e3f9
AL
1332 // Get the source list
1333 pkgSourceList List;
1334 if (List.ReadMainList() == false)
1335 return false;
1336
d38b7b3d 1337 // Lock the list directory
36375005 1338 FileFd Lock;
d38b7b3d
AL
1339 if (_config->FindB("Debug::NoLocking",false) == false)
1340 {
36375005 1341 Lock.Fd(GetLock(_config->FindDir("Dir::State::Lists") + "lock"));
d38b7b3d 1342 if (_error->PendingError() == true)
b2e465d6 1343 return _error->Error(_("Unable to lock the list directory"));
d38b7b3d
AL
1344 }
1345
0919e3f9
AL
1346 // Create the download object
1347 AcqTextStatus Stat(ScreenWidth,_config->FindI("quiet",0));
1348 pkgAcquire Fetcher(&Stat);
f0863b21 1349
0919e3f9 1350
f0863b21
AL
1351 // Just print out the uris an exit if the --print-uris flag was used
1352 if (_config->FindB("APT::Get::Print-URIs") == true)
1353 {
7db98ffc
MZ
1354 // Populate it with the source selection and get all Indexes
1355 // (GetAll=true)
1356 if (List.GetIndexes(&Fetcher,true) == false)
1357 return false;
1358
f0863b21
AL
1359 pkgAcquire::UriIterator I = Fetcher.UriBegin();
1360 for (; I != Fetcher.UriEnd(); I++)
1361 cout << '\'' << I->URI << "' " << flNotDir(I->Owner->DestFile) << ' ' <<
495e5cb2 1362 I->Owner->FileSize << ' ' << I->Owner->HashSum() << endl;
f0863b21
AL
1363 return true;
1364 }
7db98ffc
MZ
1365
1366 // Populate it with the source selection
1367 if (List.GetIndexes(&Fetcher) == false)
1368 return false;
f0863b21 1369
0919e3f9 1370 // Run it
024d1123 1371 if (Fetcher.Run() == pkgAcquire::Failed)
0919e3f9
AL
1372 return false;
1373
9df71a5b 1374 bool Failed = false;
7e5f33eb 1375 bool TransientNetworkFailure = false;
076d01b0 1376 for (pkgAcquire::ItemIterator I = Fetcher.ItemsBegin(); I != Fetcher.ItemsEnd(); I++)
9df71a5b
AL
1377 {
1378 if ((*I)->Status == pkgAcquire::Item::StatDone)
1379 continue;
1380
1381 (*I)->Finished();
7e5f33eb 1382
b2e465d6
AL
1383 fprintf(stderr,_("Failed to fetch %s %s\n"),(*I)->DescURI().c_str(),
1384 (*I)->ErrorText.c_str());
7e5f33eb
MV
1385
1386 if ((*I)->Status == pkgAcquire::Item::StatTransientNetworkError)
1387 {
1388 TransientNetworkFailure = true;
1389 continue;
1390 }
1391
9df71a5b
AL
1392 Failed = true;
1393 }
1394
7a7fa5f0 1395 // Clean out any old list files
7e5f33eb
MV
1396 if (!TransientNetworkFailure &&
1397 _config->FindB("APT::Get::List-Cleanup",true) == true)
9df71a5b
AL
1398 {
1399 if (Fetcher.Clean(_config->FindDir("Dir::State::lists")) == false ||
1400 Fetcher.Clean(_config->FindDir("Dir::State::lists") + "partial/") == false)
1401 return false;
1402 }
7a7fa5f0 1403
0919e3f9
AL
1404 // Prepare the cache.
1405 CacheFile Cache;
0077d829 1406 if (Cache.BuildCaches() == false)
0919e3f9
AL
1407 return false;
1408
7e5f33eb 1409 if (TransientNetworkFailure == true)
47eb38f4 1410 _error->Warning(_("Some index files failed to download, they have been ignored, or old ones used instead."));
7e5f33eb 1411 else if (Failed == true)
b2e465d6 1412 return _error->Error(_("Some index files failed to download, they have been ignored, or old ones used instead."));
7e5f33eb 1413
0919e3f9 1414 return true;
afb1e2e3
MV
1415}
1416 /*}}}*/
1417// DoAutomaticRemove - Remove all automatic unused packages /*{{{*/
1418// ---------------------------------------------------------------------
1419/* Remove unused automatic packages */
1420bool DoAutomaticRemove(CacheFile &Cache)
1421{
9d2938d4 1422 bool Debug = _config->FindI("Debug::pkgAutoRemove",false);
b255ff1a 1423 bool doAutoRemove = _config->FindB("APT::Get::AutomaticRemove", false);
7898bd97 1424 bool hideAutoRemove = _config->FindB("APT::Get::HideAutoRemove");
9d2938d4 1425 pkgDepCache::ActionGroup group(*Cache);
afb1e2e3 1426
9d2938d4 1427 if(Debug)
120365ce 1428 std::cout << "DoAutomaticRemove()" << std::endl;
afb1e2e3 1429
3d0de656
MV
1430 if (_config->FindB("APT::Get::Remove",true) == false &&
1431 doAutoRemove == true)
afb1e2e3 1432 {
3d0de656
MV
1433 c1out << _("We are not supposed to delete stuff, can't start "
1434 "AutoRemover") << std::endl;
1435 doAutoRemove = false;
1436 }
74a05226 1437
9d2938d4
MV
1438 string autoremovelist, autoremoveversions;
1439 // look over the cache to see what can be removed
1440 for (pkgCache::PkgIterator Pkg = Cache->PkgBegin(); ! Pkg.end(); ++Pkg)
afb1e2e3 1441 {
9d2938d4
MV
1442 if (Cache[Pkg].Garbage)
1443 {
1444 if(Pkg.CurrentVer() != 0 || Cache[Pkg].Install())
1445 if(Debug)
1446 std::cout << "We could delete %s" << Pkg.Name() << std::endl;
fd59a713
MV
1447
1448 // only show stuff in the list that is not yet marked for removal
1449 if(Cache[Pkg].Delete() == false)
1450 {
1451 autoremovelist += string(Pkg.Name()) + " ";
1452 autoremoveversions += string(Cache[Pkg].CandVersion) + "\n";
1453 }
3d0de656 1454 if (doAutoRemove)
9d2938d4
MV
1455 {
1456 if(Pkg.CurrentVer() != 0 &&
1457 Pkg->CurrentState != pkgCache::State::ConfigFiles)
74a05226 1458 Cache->MarkDelete(Pkg, _config->FindB("APT::Get::Purge", false));
9d2938d4 1459 else
74a05226 1460 Cache->MarkKeep(Pkg, false, false);
9d2938d4
MV
1461 }
1462 }
afb1e2e3 1463 }
7898bd97
MV
1464 if (!hideAutoRemove)
1465 ShowList(c1out, _("The following packages were automatically installed and are no longer required:"), autoremovelist, autoremoveversions);
1466 if (!doAutoRemove && !hideAutoRemove && autoremovelist.size() > 0)
9d2938d4 1467 c1out << _("Use 'apt-get autoremove' to remove them.") << std::endl;
afb1e2e3
MV
1468
1469 // Now see if we destroyed anything
1470 if (Cache->BrokenCount() != 0)
1471 {
1472 c1out << _("Hmm, seems like the AutoRemover destroyed something which really\n"
1473 "shouldn't happen. Please file a bug report against apt.") << endl;
1474 c1out << endl;
1475 c1out << _("The following information may help to resolve the situation:") << endl;
1476 c1out << endl;
1477 ShowBroken(c1out,Cache,false);
1478
1479 return _error->Error(_("Internal Error, AutoRemover broke stuff"));
1480 }
1481 return true;
db1e7193 1482}
74a05226 1483
db1e7193
MV
1484// DoUpgrade - Upgrade all packages /*{{{*/
1485// ---------------------------------------------------------------------
1486/* Upgrade all packages without installing new packages or erasing old
1487 packages */
1488bool DoUpgrade(CommandLine &CmdL)
1489{
1490 CacheFile Cache;
1491 if (Cache.OpenForInstall() == false || Cache.CheckDeps() == false)
1492 return false;
1493
1494 // Do the upgrade
1495 if (pkgAllUpgrade(Cache) == false)
1496 {
1497 ShowBroken(c1out,Cache,false);
1498 return _error->Error(_("Internal error, AllUpgrade broke stuff"));
1499 }
1500
1501 return InstallPackages(Cache,true);
afb1e2e3
MV
1502}
1503 /*}}}*/
c158ff49
MV
1504// DoInstallTask - Install task from the command line /*{{{*/
1505// ---------------------------------------------------------------------
1506/* Install named task */
39cc1bbd
MV
1507bool TryInstallTask(pkgDepCache &Cache, pkgProblemResolver &Fix,
1508 bool BrokenFix,
1509 unsigned int& ExpectedInst,
394eadc8
MV
1510 const char *taskname,
1511 bool Remove)
c158ff49
MV
1512{
1513 const char *start, *end;
1514 pkgCache::PkgIterator Pkg;
39cc1bbd
MV
1515 char buf[64*1024];
1516 regex_t Pattern;
c158ff49 1517
39cc1bbd 1518 // get the records
c158ff49 1519 pkgRecords Recs(Cache);
c158ff49 1520
39cc1bbd
MV
1521 // build regexp for the task
1522 char S[300];
f03dd1e0
MV
1523 snprintf(S, sizeof(S), "^Task:.*[, ]%s([, ]|$)", taskname);
1524 if(regcomp(&Pattern,S, REG_EXTENDED | REG_NOSUB | REG_NEWLINE) != 0)
1525 return _error->Error("Failed to compile task regexp");
39cc1bbd
MV
1526
1527 bool found = false;
1528 bool res = true;
1529 for (Pkg = Cache.PkgBegin(); Pkg.end() == false; Pkg++)
c158ff49 1530 {
39cc1bbd
MV
1531 pkgCache::VerIterator ver = Cache[Pkg].CandidateVerIter(Cache);
1532 if(ver.end())
1533 continue;
1534 pkgRecords::Parser &parser = Recs.Lookup(ver.FileList());
1535 parser.GetRec(start,end);
1536 strncpy(buf, start, end-start);
1537 buf[end-start] = 0x0;
1538 if (regexec(&Pattern,buf,0,0,0) != 0)
1539 continue;
394eadc8 1540 res &= TryToInstall(Pkg,Cache,Fix,Remove,true,ExpectedInst);
39cc1bbd 1541 found = true;
c158ff49 1542 }
c158ff49 1543
39cc1bbd
MV
1544 if(!found)
1545 _error->Error(_("Couldn't find task %s"),taskname);
1546
1547 regfree(&Pattern);
1548 return res;
c158ff49
MV
1549}
1550
0a8e3465
AL
1551// DoInstall - Install packages from the command line /*{{{*/
1552// ---------------------------------------------------------------------
1553/* Install named packages */
1554bool DoInstall(CommandLine &CmdL)
1555{
1556 CacheFile Cache;
c37b9502
AL
1557 if (Cache.OpenForInstall() == false ||
1558 Cache.CheckDeps(CmdL.FileSize() != 1) == false)
0a8e3465
AL
1559 return false;
1560
7c57fe64
AL
1561 // Enter the special broken fixing mode if the user specified arguments
1562 bool BrokenFix = false;
1563 if (Cache->BrokenCount() != 0)
1564 BrokenFix = true;
1565
e4b74e4b 1566 unsigned int AutoMarkChanged = 0;
a6568219
AL
1567 unsigned int ExpectedInst = 0;
1568 unsigned int Packages = 0;
0a8e3465
AL
1569 pkgProblemResolver Fix(Cache);
1570
303a1703
AL
1571 bool DefRemove = false;
1572 if (strcasecmp(CmdL.FileList[0],"remove") == 0)
1573 DefRemove = true;
e47c7d16
MV
1574 else if (strcasecmp(CmdL.FileList[0], "purge") == 0)
1575 {
1576 _config->Set("APT::Get::Purge", true);
1577 DefRemove = true;
1578 }
74a05226 1579 else if (strcasecmp(CmdL.FileList[0], "autoremove") == 0)
0a8e3465 1580 {
54668e4e
MV
1581 _config->Set("APT::Get::AutomaticRemove", "true");
1582 DefRemove = true;
1583 }
54668e4e 1584 // new scope for the ActionGroup
0a8e3465 1585 {
54668e4e
MV
1586 pkgDepCache::ActionGroup group(Cache);
1587 for (const char **I = CmdL.FileList + 1; *I != 0; I++)
0a8e3465 1588 {
54668e4e
MV
1589 // Duplicate the string
1590 unsigned int Length = strlen(*I);
1591 char S[300];
1592 if (Length >= sizeof(S))
fc4b5c9f 1593 continue;
54668e4e
MV
1594 strcpy(S,*I);
1595
1596 // See if we are removing and special indicators..
1597 bool Remove = DefRemove;
1598 char *VerTag = 0;
1599 bool VerIsRel = false;
5a68ea79
MV
1600
1601 // this is a task!
1602 if (Length >= 1 && S[Length - 1] == '^')
1603 {
1604 S[--Length] = 0;
1605 // tasks must always be confirmed
1606 ExpectedInst += 1000;
1607 // see if we can install it
394eadc8 1608 TryInstallTask(Cache, Fix, BrokenFix, ExpectedInst, S, Remove);
5a68ea79
MV
1609 continue;
1610 }
1611
54668e4e 1612 while (Cache->FindPkg(S).end() == true)
b2e465d6 1613 {
54668e4e
MV
1614 // Handle an optional end tag indicating what to do
1615 if (Length >= 1 && S[Length - 1] == '-')
1616 {
1617 Remove = true;
1618 S[--Length] = 0;
1619 continue;
1620 }
b2e465d6 1621
54668e4e
MV
1622 if (Length >= 1 && S[Length - 1] == '+')
1623 {
1624 Remove = false;
1625 S[--Length] = 0;
1626 continue;
1627 }
b2e465d6 1628
54668e4e
MV
1629 char *Slash = strchr(S,'=');
1630 if (Slash != 0)
1631 {
1632 VerIsRel = false;
1633 *Slash = 0;
1634 VerTag = Slash + 1;
1635 }
c373c37a 1636
54668e4e
MV
1637 Slash = strchr(S,'/');
1638 if (Slash != 0)
1639 {
1640 VerIsRel = true;
1641 *Slash = 0;
1642 VerTag = Slash + 1;
1643 }
c373c37a 1644
54668e4e 1645 break;
b2e465d6 1646 }
54668e4e
MV
1647
1648 // Locate the package
1649 pkgCache::PkgIterator Pkg = Cache->FindPkg(S);
1650 Packages++;
1651 if (Pkg.end() == true)
303a1703 1652 {
54668e4e
MV
1653 // Check if the name is a regex
1654 const char *I;
1655 for (I = S; *I != 0; I++)
1656 if (*I == '?' || *I == '*' || *I == '|' ||
1657 *I == '[' || *I == '^' || *I == '$')
1658 break;
1659 if (*I == 0)
1660 return _error->Error(_("Couldn't find package %s"),S);
1661
1662 // Regexs must always be confirmed
1663 ExpectedInst += 1000;
1664
1665 // Compile the regex pattern
1666 regex_t Pattern;
1667 int Res;
1668 if ((Res = regcomp(&Pattern,S,REG_EXTENDED | REG_ICASE |
1669 REG_NOSUB)) != 0)
1670 {
1671 char Error[300];
1672 regerror(Res,&Pattern,Error,sizeof(Error));
1673 return _error->Error(_("Regex compilation error - %s"),Error);
1674 }
1675
1676 // Run over the matches
1677 bool Hit = false;
1678 for (Pkg = Cache->PkgBegin(); Pkg.end() == false; Pkg++)
1679 {
1680 if (regexec(&Pattern,Pkg.Name(),0,0,0) != 0)
1681 continue;
07801a6d 1682
54668e4e
MV
1683 ioprintf(c1out,_("Note, selecting %s for regex '%s'\n"),
1684 Pkg.Name(),S);
07801a6d 1685
54668e4e
MV
1686 if (VerTag != 0)
1687 if (TryToChangeVer(Pkg,Cache,VerTag,VerIsRel) == false)
1688 return false;
185091b7 1689
54668e4e
MV
1690 Hit |= TryToInstall(Pkg,Cache,Fix,Remove,BrokenFix,
1691 ExpectedInst,false);
1692 }
1693 regfree(&Pattern);
1694
1695 if (Hit == false)
1696 return _error->Error(_("Couldn't find package %s"),S);
1697 }
1698 else
1699 {
b2e465d6
AL
1700 if (VerTag != 0)
1701 if (TryToChangeVer(Pkg,Cache,VerTag,VerIsRel) == false)
1702 return false;
54668e4e 1703 if (TryToInstall(Pkg,Cache,Fix,Remove,BrokenFix,ExpectedInst) == false)
b2e465d6 1704 return false;
e4b74e4b
MV
1705
1706 // see if we need to fix the auto-mark flag
1707 // e.g. apt-get install foo
1708 // where foo is marked automatic
fd59a713
MV
1709 if(!Remove &&
1710 Cache[Pkg].Install() == false &&
e4b74e4b
MV
1711 (Cache[Pkg].Flags & pkgCache::Flag::Auto))
1712 {
1713 ioprintf(c1out,_("%s set to manual installed.\n"),
1714 Pkg.Name());
1715 Cache->MarkAuto(Pkg,false);
1716 AutoMarkChanged++;
1717 }
54668e4e
MV
1718 }
1719 }
0a8e3465 1720
54668e4e
MV
1721 /* If we are in the Broken fixing mode we do not attempt to fix the
1722 problems. This is if the user invoked install without -f and gave
1723 packages */
1724 if (BrokenFix == true && Cache->BrokenCount() != 0)
1725 {
1726 c1out << _("You might want to run `apt-get -f install' to correct these:") << endl;
1727 ShowBroken(c1out,Cache,false);
7c57fe64 1728
54668e4e
MV
1729 return _error->Error(_("Unmet dependencies. Try 'apt-get -f install' with no packages (or specify a solution)."));
1730 }
7c57fe64 1731
54668e4e
MV
1732 // Call the scored problem resolver
1733 Fix.InstallProtect();
1734 if (Fix.Resolve(true) == false)
1735 _error->Discard();
0a8e3465 1736
54668e4e
MV
1737 // Now we check the state of the packages,
1738 if (Cache->BrokenCount() != 0)
303a1703 1739 {
b2e465d6 1740 c1out <<
54668e4e
MV
1741 _("Some packages could not be installed. This may mean that you have\n"
1742 "requested an impossible situation or if you are using the unstable\n"
1743 "distribution that some required packages have not yet been created\n"
1744 "or been moved out of Incoming.") << endl;
1745 if (Packages == 1)
1746 {
1747 c1out << endl;
1748 c1out <<
1749 _("Since you only requested a single operation it is extremely likely that\n"
1750 "the package is simply not installable and a bug report against\n"
1751 "that package should be filed.") << endl;
1752 }
303a1703 1753
54668e4e
MV
1754 c1out << _("The following information may help to resolve the situation:") << endl;
1755 c1out << endl;
1756 ShowBroken(c1out,Cache,false);
1757 return _error->Error(_("Broken packages"));
1758 }
120365ce 1759 }
5a68ea79
MV
1760 if (!DoAutomaticRemove(Cache))
1761 return false;
afb1e2e3 1762
0a8e3465
AL
1763 /* Print out a list of packages that are going to be installed extra
1764 to what the user asked */
1765 if (Cache->InstCount() != ExpectedInst)
1766 {
1767 string List;
ac625538 1768 string VersionsList;
1089ca89 1769 for (unsigned J = 0; J < Cache->Head().PackageCount; J++)
0a8e3465 1770 {
1089ca89 1771 pkgCache::PkgIterator I(Cache,Cache.List[J]);
0a8e3465
AL
1772 if ((*Cache)[I].Install() == false)
1773 continue;
1774
1775 const char **J;
1776 for (J = CmdL.FileList + 1; *J != 0; J++)
1777 if (strcmp(*J,I.Name()) == 0)
1778 break;
1779
ac625538 1780 if (*J == 0) {
0a8e3465 1781 List += string(I.Name()) + " ";
80fa0d8a
MV
1782 VersionsList += string(Cache[I].CandVersion) + "\n";
1783 }
0a8e3465
AL
1784 }
1785
ac625538 1786 ShowList(c1out,_("The following extra packages will be installed:"),List,VersionsList);
0a8e3465
AL
1787 }
1788
a7e41689
AL
1789 /* Print out a list of suggested and recommended packages */
1790 {
1791 string SuggestsList, RecommendsList, List;
72122b62 1792 string SuggestsVersions, RecommendsVersions;
a7e41689
AL
1793 for (unsigned J = 0; J < Cache->Head().PackageCount; J++)
1794 {
29f37db8 1795 pkgCache::PkgIterator Pkg(Cache,Cache.List[J]);
a7e41689
AL
1796
1797 /* Just look at the ones we want to install */
29f37db8 1798 if ((*Cache)[Pkg].Install() == false)
a7e41689
AL
1799 continue;
1800
29f37db8
MV
1801 // get the recommends/suggests for the candidate ver
1802 pkgCache::VerIterator CV = (*Cache)[Pkg].CandidateVerIter(*Cache);
1803 for (pkgCache::DepIterator D = CV.DependsList(); D.end() == false; )
1804 {
1805 pkgCache::DepIterator Start;
1806 pkgCache::DepIterator End;
1807 D.GlobOr(Start,End); // advances D
1808
cd33a786
MV
1809 // FIXME: we really should display a or-group as a or-group to the user
1810 // the problem is that ShowList is incapable of doing this
29f37db8
MV
1811 string RecommendsOrList,RecommendsOrVersions;
1812 string SuggestsOrList,SuggestsOrVersions;
1813 bool foundInstalledInOrGroup = false;
1814 for(;;)
1815 {
1816 /* Skip if package is installed already, or is about to be */
1817 string target = string(Start.TargetPkg().Name()) + " ";
1818
1819 if ((*Start.TargetPkg()).SelectedState == pkgCache::State::Install
1820 || Cache[Start.TargetPkg()].Install())
1821 {
1822 foundInstalledInOrGroup=true;
1823 break;
1824 }
1825
1826 /* Skip if we already saw it */
1827 if (int(SuggestsList.find(target)) != -1 || int(RecommendsList.find(target)) != -1)
1828 {
1829 foundInstalledInOrGroup=true;
1830 break;
1831 }
1832
1833 // this is a dep on a virtual pkg, check if any package that provides it
1834 // should be installed
1835 if(Start.TargetPkg().ProvidesList() != 0)
1836 {
1837 pkgCache::PrvIterator I = Start.TargetPkg().ProvidesList();
1838 for (; I.end() == false; I++)
1839 {
1840 pkgCache::PkgIterator Pkg = I.OwnerPkg();
1841 if (Cache[Pkg].CandidateVerIter(Cache) == I.OwnerVer() &&
1842 Pkg.CurrentVer() != 0)
1843 foundInstalledInOrGroup=true;
1844 }
1845 }
1846
1847 if (Start->Type == pkgCache::Dep::Suggests)
1848 {
1849 SuggestsOrList += target;
1850 SuggestsOrVersions += string(Cache[Start.TargetPkg()].CandVersion) + "\n";
1851 }
1852
1853 if (Start->Type == pkgCache::Dep::Recommends)
1854 {
1855 RecommendsOrList += target;
1856 RecommendsOrVersions += string(Cache[Start.TargetPkg()].CandVersion) + "\n";
1857 }
1858
1859 if (Start >= End)
1860 break;
1861 Start++;
1862 }
1863
1864 if(foundInstalledInOrGroup == false)
1865 {
1866 RecommendsList += RecommendsOrList;
1867 RecommendsVersions += RecommendsOrVersions;
1868 SuggestsList += SuggestsOrList;
1869 SuggestsVersions += SuggestsOrVersions;
1870 }
1871
1872 }
a7e41689 1873 }
29f37db8 1874
72122b62
AL
1875 ShowList(c1out,_("Suggested packages:"),SuggestsList,SuggestsVersions);
1876 ShowList(c1out,_("Recommended packages:"),RecommendsList,RecommendsVersions);
a7e41689
AL
1877
1878 }
1879
e4b74e4b
MV
1880 // if nothing changed in the cache, but only the automark information
1881 // we write the StateFile here, otherwise it will be written in
1882 // cache.commit()
1883 if (AutoMarkChanged > 0 &&
1884 Cache->DelCount() == 0 && Cache->InstCount() == 0 &&
1885 Cache->BadCount() == 0)
1886 Cache->writeStateFile(NULL);
1887
03e39e59 1888 // See if we need to prompt
2c3bc8bb 1889 if (Cache->InstCount() == ExpectedInst && Cache->DelCount() == 0)
2c3bc8bb 1890 return InstallPackages(Cache,false,false);
13e8426f 1891
03e39e59 1892 return InstallPackages(Cache,false);
0a8e3465
AL
1893}
1894 /*}}}*/
1895// DoDistUpgrade - Automatic smart upgrader /*{{{*/
1896// ---------------------------------------------------------------------
1897/* Intelligent upgrader that will install and remove packages at will */
1898bool DoDistUpgrade(CommandLine &CmdL)
1899{
1900 CacheFile Cache;
c37b9502 1901 if (Cache.OpenForInstall() == false || Cache.CheckDeps() == false)
0a8e3465
AL
1902 return false;
1903
db0db9fe 1904 c0out << _("Calculating upgrade... ") << flush;
0a8e3465
AL
1905 if (pkgDistUpgrade(*Cache) == false)
1906 {
b2e465d6 1907 c0out << _("Failed") << endl;
421c8d10 1908 ShowBroken(c1out,Cache,false);
0a8e3465
AL
1909 return false;
1910 }
1911
b2e465d6 1912 c0out << _("Done") << endl;
0a8e3465
AL
1913
1914 return InstallPackages(Cache,true);
1915}
1916 /*}}}*/
1917// DoDSelectUpgrade - Do an upgrade by following dselects selections /*{{{*/
1918// ---------------------------------------------------------------------
1919/* Follows dselect's selections */
1920bool DoDSelectUpgrade(CommandLine &CmdL)
1921{
1922 CacheFile Cache;
c37b9502 1923 if (Cache.OpenForInstall() == false || Cache.CheckDeps() == false)
0a8e3465
AL
1924 return false;
1925
a4decc40
MV
1926 pkgDepCache::ActionGroup group(Cache);
1927
0a8e3465
AL
1928 // Install everything with the install flag set
1929 pkgCache::PkgIterator I = Cache->PkgBegin();
1930 for (;I.end() != true; I++)
1931 {
1932 /* Install the package only if it is a new install, the autoupgrader
1933 will deal with the rest */
1934 if (I->SelectedState == pkgCache::State::Install)
1935 Cache->MarkInstall(I,false);
1936 }
1937
1938 /* Now install their deps too, if we do this above then order of
1939 the status file is significant for | groups */
1940 for (I = Cache->PkgBegin();I.end() != true; I++)
1941 {
1942 /* Install the package only if it is a new install, the autoupgrader
1943 will deal with the rest */
1944 if (I->SelectedState == pkgCache::State::Install)
2f45c76a 1945 Cache->MarkInstall(I,true);
0a8e3465
AL
1946 }
1947
1948 // Apply erasures now, they override everything else.
1949 for (I = Cache->PkgBegin();I.end() != true; I++)
1950 {
1951 // Remove packages
1952 if (I->SelectedState == pkgCache::State::DeInstall ||
1953 I->SelectedState == pkgCache::State::Purge)
d556d1a1 1954 Cache->MarkDelete(I,I->SelectedState == pkgCache::State::Purge);
0a8e3465
AL
1955 }
1956
2f45c76a
AL
1957 /* Resolve any problems that dselect created, allupgrade cannot handle
1958 such things. We do so quite agressively too.. */
1959 if (Cache->BrokenCount() != 0)
1960 {
1961 pkgProblemResolver Fix(Cache);
1962
1963 // Hold back held packages.
b2e465d6 1964 if (_config->FindB("APT::Ignore-Hold",false) == false)
2f45c76a
AL
1965 {
1966 for (pkgCache::PkgIterator I = Cache->PkgBegin(); I.end() == false; I++)
1967 {
1968 if (I->SelectedState == pkgCache::State::Hold)
1969 {
1970 Fix.Protect(I);
1971 Cache->MarkKeep(I);
1972 }
1973 }
1974 }
1975
1976 if (Fix.Resolve() == false)
1977 {
421c8d10 1978 ShowBroken(c1out,Cache,false);
2a7e07c7 1979 return _error->Error(_("Internal error, problem resolver broke stuff"));
2f45c76a
AL
1980 }
1981 }
1982
1983 // Now upgrade everything
0a8e3465
AL
1984 if (pkgAllUpgrade(Cache) == false)
1985 {
421c8d10 1986 ShowBroken(c1out,Cache,false);
2a7e07c7 1987 return _error->Error(_("Internal error, problem resolver broke stuff"));
0a8e3465
AL
1988 }
1989
1990 return InstallPackages(Cache,false);
1991}
1992 /*}}}*/
1993// DoClean - Remove download archives /*{{{*/
1994// ---------------------------------------------------------------------
1995/* */
1996bool DoClean(CommandLine &CmdL)
1997{
8b067c22
AL
1998 if (_config->FindB("APT::Get::Simulate") == true)
1999 {
2000 cout << "Del " << _config->FindDir("Dir::Cache::archives") << "* " <<
2001 _config->FindDir("Dir::Cache::archives") << "partial/*" << endl;
2002 return true;
2003 }
2004
1b6d659c
AL
2005 // Lock the archive directory
2006 FileFd Lock;
2007 if (_config->FindB("Debug::NoLocking",false) == false)
2008 {
2009 Lock.Fd(GetLock(_config->FindDir("Dir::Cache::Archives") + "lock"));
2010 if (_error->PendingError() == true)
b2e465d6 2011 return _error->Error(_("Unable to lock the download directory"));
1b6d659c
AL
2012 }
2013
7a1b1f8b
AL
2014 pkgAcquire Fetcher;
2015 Fetcher.Clean(_config->FindDir("Dir::Cache::archives"));
2016 Fetcher.Clean(_config->FindDir("Dir::Cache::archives") + "partial/");
0a8e3465
AL
2017 return true;
2018}
2019 /*}}}*/
1bc849af
AL
2020// DoAutoClean - Smartly remove downloaded archives /*{{{*/
2021// ---------------------------------------------------------------------
2022/* This is similar to clean but it only purges things that cannot be
2023 downloaded, that is old versions of cached packages. */
65a1e968
AL
2024class LogCleaner : public pkgArchiveCleaner
2025{
2026 protected:
2027 virtual void Erase(const char *File,string Pkg,string Ver,struct stat &St)
2028 {
4cc8bab0 2029 c1out << "Del " << Pkg << " " << Ver << " [" << SizeToStr(St.st_size) << "B]" << endl;
c1e78ee5
AL
2030
2031 if (_config->FindB("APT::Get::Simulate") == false)
2032 unlink(File);
65a1e968
AL
2033 };
2034};
2035
1bc849af
AL
2036bool DoAutoClean(CommandLine &CmdL)
2037{
1b6d659c
AL
2038 // Lock the archive directory
2039 FileFd Lock;
2040 if (_config->FindB("Debug::NoLocking",false) == false)
2041 {
2042 Lock.Fd(GetLock(_config->FindDir("Dir::Cache::Archives") + "lock"));
2043 if (_error->PendingError() == true)
b2e465d6 2044 return _error->Error(_("Unable to lock the download directory"));
1b6d659c
AL
2045 }
2046
1bc849af 2047 CacheFile Cache;
2d11135a 2048 if (Cache.Open() == false)
1bc849af
AL
2049 return false;
2050
65a1e968 2051 LogCleaner Cleaner;
1bc849af
AL
2052
2053 return Cleaner.Go(_config->FindDir("Dir::Cache::archives"),*Cache) &&
2054 Cleaner.Go(_config->FindDir("Dir::Cache::archives") + "partial/",*Cache);
2055}
2056 /*}}}*/
0a8e3465
AL
2057// DoCheck - Perform the check operation /*{{{*/
2058// ---------------------------------------------------------------------
2059/* Opening automatically checks the system, this command is mostly used
2060 for debugging */
2061bool DoCheck(CommandLine &CmdL)
2062{
2063 CacheFile Cache;
2064 Cache.Open();
2d11135a 2065 Cache.CheckDeps();
0a8e3465
AL
2066
2067 return true;
2068}
2069 /*}}}*/
36375005
AL
2070// DoSource - Fetch a source archive /*{{{*/
2071// ---------------------------------------------------------------------
2d11135a 2072/* Fetch souce packages */
fb0ee66e
AL
2073struct DscFile
2074{
2075 string Package;
2076 string Version;
2077 string Dsc;
2078};
2079
36375005
AL
2080bool DoSource(CommandLine &CmdL)
2081{
2082 CacheFile Cache;
2d11135a 2083 if (Cache.Open(false) == false)
36375005
AL
2084 return false;
2085
2d11135a 2086 if (CmdL.FileSize() <= 1)
b2e465d6 2087 return _error->Error(_("Must specify at least one package to fetch source for"));
2d11135a 2088
36375005
AL
2089 // Read the source list
2090 pkgSourceList List;
2091 if (List.ReadMainList() == false)
b2e465d6 2092 return _error->Error(_("The list of sources could not be read."));
36375005
AL
2093
2094 // Create the text record parsers
2095 pkgRecords Recs(Cache);
2096 pkgSrcRecords SrcRecs(List);
2097 if (_error->PendingError() == true)
2098 return false;
2099
2100 // Create the download object
2101 AcqTextStatus Stat(ScreenWidth,_config->FindI("quiet",0));
2102 pkgAcquire Fetcher(&Stat);
fb0ee66e
AL
2103
2104 DscFile *Dsc = new DscFile[CmdL.FileSize()];
36375005 2105
092ae175
MV
2106 // insert all downloaded uris into this set to avoid downloading them
2107 // twice
2108 set<string> queued;
36375005 2109 // Load the requestd sources into the fetcher
fb0ee66e
AL
2110 unsigned J = 0;
2111 for (const char **I = CmdL.FileList + 1; *I != 0; I++, J++)
36375005
AL
2112 {
2113 string Src;
b2e465d6 2114 pkgSrcRecords::Parser *Last = FindSrc(*I,Recs,SrcRecs,Src,*Cache);
36375005
AL
2115
2116 if (Last == 0)
b2e465d6 2117 return _error->Error(_("Unable to find a source package for %s"),Src.c_str());
36375005
AL
2118
2119 // Back track
2120 vector<pkgSrcRecords::File> Lst;
b2e465d6 2121 if (Last->Files(Lst) == false)
36375005
AL
2122 return false;
2123
2124 // Load them into the fetcher
2125 for (vector<pkgSrcRecords::File>::const_iterator I = Lst.begin();
2126 I != Lst.end(); I++)
2127 {
2128 // Try to guess what sort of file it is we are getting.
b2e465d6 2129 if (I->Type == "dsc")
fb0ee66e 2130 {
fb0ee66e
AL
2131 Dsc[J].Package = Last->Package();
2132 Dsc[J].Version = Last->Version();
2133 Dsc[J].Dsc = flNotDir(I->Path);
2134 }
2135
17c0e8e1
AL
2136 // Diff only mode only fetches .diff files
2137 if (_config->FindB("APT::Get::Diff-Only",false) == true &&
b2e465d6 2138 I->Type != "diff")
17c0e8e1
AL
2139 continue;
2140
2141 // Tar only mode only fetches .tar files
2142 if (_config->FindB("APT::Get::Tar-Only",false) == true &&
b2e465d6 2143 I->Type != "tar")
17c0e8e1 2144 continue;
092ae175 2145
1979e742
MV
2146 // Dsc only mode only fetches .dsc files
2147 if (_config->FindB("APT::Get::Dsc-Only",false) == true &&
2148 I->Type != "dsc")
2149 continue;
2150
092ae175
MV
2151 // don't download the same uri twice (should this be moved to
2152 // the fetcher interface itself?)
2153 if(queued.find(Last->Index().ArchiveURI(I->Path)) != queued.end())
2154 continue;
2155 queued.insert(Last->Index().ArchiveURI(I->Path));
2156
2157 // check if we have a file with that md5 sum already localy
2158 if(!I->MD5Hash.empty() && FileExists(flNotDir(I->Path)))
2159 {
2160 FileFd Fd(flNotDir(I->Path), FileFd::ReadOnly);
2161 MD5Summation sum;
2162 sum.AddFD(Fd.Fd(), Fd.Size());
2163 Fd.Close();
2164 if((string)sum.Result() == I->MD5Hash)
2165 {
443cb67c 2166 ioprintf(c1out,_("Skipping already downloaded file '%s'\n"),
092ae175
MV
2167 flNotDir(I->Path).c_str());
2168 continue;
2169 }
2170 }
2171
b2e465d6
AL
2172 new pkgAcqFile(&Fetcher,Last->Index().ArchiveURI(I->Path),
2173 I->MD5Hash,I->Size,
2174 Last->Index().SourceInfo(*Last,*I),Src);
36375005
AL
2175 }
2176 }
2177
2178 // Display statistics
b2e465d6
AL
2179 double FetchBytes = Fetcher.FetchNeeded();
2180 double FetchPBytes = Fetcher.PartialPresent();
2181 double DebBytes = Fetcher.TotalNeeded();
36375005
AL
2182
2183 // Check for enough free space
f332b62b 2184 struct statvfs Buf;
36375005 2185 string OutputDir = ".";
f332b62b 2186 if (statvfs(OutputDir.c_str(),&Buf) != 0)
2a7e07c7 2187 return _error->Errno("statvfs",_("Couldn't determine free space in %s"),
36375005
AL
2188 OutputDir.c_str());
2189 if (unsigned(Buf.f_bfree) < (FetchBytes - FetchPBytes)/Buf.f_bsize)
677cbcbc 2190 return _error->Error(_("You don't have enough free space in %s"),
36375005
AL
2191 OutputDir.c_str());
2192
2193 // Number of bytes
36375005 2194 if (DebBytes != FetchBytes)
b2e465d6
AL
2195 ioprintf(c1out,_("Need to get %sB/%sB of source archives.\n"),
2196 SizeToStr(FetchBytes).c_str(),SizeToStr(DebBytes).c_str());
36375005 2197 else
b2e465d6
AL
2198 ioprintf(c1out,_("Need to get %sB of source archives.\n"),
2199 SizeToStr(DebBytes).c_str());
2200
2c0c53b3
AL
2201 if (_config->FindB("APT::Get::Simulate",false) == true)
2202 {
2203 for (unsigned I = 0; I != J; I++)
db0db9fe 2204 ioprintf(cout,_("Fetch source %s\n"),Dsc[I].Package.c_str());
2c0c53b3
AL
2205 return true;
2206 }
2207
36375005
AL
2208 // Just print out the uris an exit if the --print-uris flag was used
2209 if (_config->FindB("APT::Get::Print-URIs") == true)
2210 {
2211 pkgAcquire::UriIterator I = Fetcher.UriBegin();
2212 for (; I != Fetcher.UriEnd(); I++)
2213 cout << '\'' << I->URI << "' " << flNotDir(I->Owner->DestFile) << ' ' <<
495e5cb2 2214 I->Owner->FileSize << ' ' << I->Owner->HashSum() << endl;
36375005
AL
2215 return true;
2216 }
2217
2218 // Run it
024d1123 2219 if (Fetcher.Run() == pkgAcquire::Failed)
36375005
AL
2220 return false;
2221
2222 // Print error messages
fb0ee66e 2223 bool Failed = false;
076d01b0 2224 for (pkgAcquire::ItemIterator I = Fetcher.ItemsBegin(); I != Fetcher.ItemsEnd(); I++)
36375005
AL
2225 {
2226 if ((*I)->Status == pkgAcquire::Item::StatDone &&
2227 (*I)->Complete == true)
2228 continue;
2229
b2e465d6
AL
2230 fprintf(stderr,_("Failed to fetch %s %s\n"),(*I)->DescURI().c_str(),
2231 (*I)->ErrorText.c_str());
fb0ee66e 2232 Failed = true;
36375005 2233 }
fb0ee66e 2234 if (Failed == true)
b2e465d6 2235 return _error->Error(_("Failed to fetch some archives."));
fb0ee66e
AL
2236
2237 if (_config->FindB("APT::Get::Download-only",false) == true)
b2e465d6
AL
2238 {
2239 c1out << _("Download complete and in download only mode") << endl;
fb0ee66e 2240 return true;
b2e465d6
AL
2241 }
2242
fb0ee66e 2243 // Unpack the sources
54676e1a
AL
2244 pid_t Process = ExecFork();
2245
2246 if (Process == 0)
fb0ee66e 2247 {
54676e1a 2248 for (unsigned I = 0; I != J; I++)
fb0ee66e 2249 {
b2e465d6 2250 string Dir = Dsc[I].Package + '-' + Cache->VS().UpstreamVersion(Dsc[I].Version.c_str());
fb0ee66e 2251
17c0e8e1
AL
2252 // Diff only mode only fetches .diff files
2253 if (_config->FindB("APT::Get::Diff-Only",false) == true ||
a3eaf954
AL
2254 _config->FindB("APT::Get::Tar-Only",false) == true ||
2255 Dsc[I].Dsc.empty() == true)
17c0e8e1 2256 continue;
a3eaf954 2257
54676e1a
AL
2258 // See if the package is already unpacked
2259 struct stat Stat;
2260 if (stat(Dir.c_str(),&Stat) == 0 &&
2261 S_ISDIR(Stat.st_mode) != 0)
2262 {
b2e465d6
AL
2263 ioprintf(c0out ,_("Skipping unpack of already unpacked source in %s\n"),
2264 Dir.c_str());
54676e1a
AL
2265 }
2266 else
2267 {
2268 // Call dpkg-source
2269 char S[500];
2270 snprintf(S,sizeof(S),"%s -x %s",
2271 _config->Find("Dir::Bin::dpkg-source","dpkg-source").c_str(),
2272 Dsc[I].Dsc.c_str());
2273 if (system(S) != 0)
2274 {
b2e465d6 2275 fprintf(stderr,_("Unpack command '%s' failed.\n"),S);
14cd494a 2276 fprintf(stderr,_("Check if the 'dpkg-dev' package is installed.\n"));
54676e1a
AL
2277 _exit(1);
2278 }
2279 }
2280
2281 // Try to compile it with dpkg-buildpackage
2282 if (_config->FindB("APT::Get::Compile",false) == true)
2283 {
2284 // Call dpkg-buildpackage
2285 char S[500];
2286 snprintf(S,sizeof(S),"cd %s && %s %s",
2287 Dir.c_str(),
2288 _config->Find("Dir::Bin::dpkg-buildpackage","dpkg-buildpackage").c_str(),
2289 _config->Find("DPkg::Build-Options","-b -uc").c_str());
2290
2291 if (system(S) != 0)
2292 {
b2e465d6 2293 fprintf(stderr,_("Build command '%s' failed.\n"),S);
54676e1a
AL
2294 _exit(1);
2295 }
2296 }
2297 }
2298
2299 _exit(0);
2300 }
2301
2302 // Wait for the subprocess
2303 int Status = 0;
2304 while (waitpid(Process,&Status,0) != Process)
2305 {
2306 if (errno == EINTR)
2307 continue;
2308 return _error->Errno("waitpid","Couldn't wait for subprocess");
2309 }
2310
2311 if (WIFEXITED(Status) == 0 || WEXITSTATUS(Status) != 0)
b2e465d6
AL
2312 return _error->Error(_("Child process failed"));
2313
2314 return true;
2315}
2316 /*}}}*/
2317// DoBuildDep - Install/removes packages to satisfy build dependencies /*{{{*/
2318// ---------------------------------------------------------------------
2319/* This function will look at the build depends list of the given source
2320 package and install the necessary packages to make it true, or fail. */
2321bool DoBuildDep(CommandLine &CmdL)
2322{
2323 CacheFile Cache;
2324 if (Cache.Open(true) == false)
2325 return false;
2326
2327 if (CmdL.FileSize() <= 1)
2328 return _error->Error(_("Must specify at least one package to check builddeps for"));
2329
2330 // Read the source list
2331 pkgSourceList List;
2332 if (List.ReadMainList() == false)
2333 return _error->Error(_("The list of sources could not be read."));
54676e1a 2334
b2e465d6
AL
2335 // Create the text record parsers
2336 pkgRecords Recs(Cache);
2337 pkgSrcRecords SrcRecs(List);
2338 if (_error->PendingError() == true)
2339 return false;
2340
2341 // Create the download object
2342 AcqTextStatus Stat(ScreenWidth,_config->FindI("quiet",0));
2343 pkgAcquire Fetcher(&Stat);
2344
2345 unsigned J = 0;
2346 for (const char **I = CmdL.FileList + 1; *I != 0; I++, J++)
2347 {
2348 string Src;
2349 pkgSrcRecords::Parser *Last = FindSrc(*I,Recs,SrcRecs,Src,*Cache);
2350 if (Last == 0)
2351 return _error->Error(_("Unable to find a source package for %s"),Src.c_str());
2352
2353 // Process the build-dependencies
2354 vector<pkgSrcRecords::Parser::BuildDepRec> BuildDeps;
45430cbf 2355 if (Last->BuildDepends(BuildDeps, _config->FindB("APT::Get::Arch-Only",false)) == false)
b2e465d6
AL
2356 return _error->Error(_("Unable to get build-dependency information for %s"),Src.c_str());
2357
7d6f9f8f
AL
2358 // Also ensure that build-essential packages are present
2359 Configuration::Item const *Opts = _config->Tree("APT::Build-Essential");
2360 if (Opts)
2361 Opts = Opts->Child;
2362 for (; Opts; Opts = Opts->Next)
2363 {
2364 if (Opts->Value.empty() == true)
2365 continue;
2366
2367 pkgSrcRecords::Parser::BuildDepRec rec;
2368 rec.Package = Opts->Value;
2369 rec.Type = pkgSrcRecords::Parser::BuildDependIndep;
2370 rec.Op = 0;
58d76831 2371 BuildDeps.push_back(rec);
7d6f9f8f
AL
2372 }
2373
b2e465d6
AL
2374 if (BuildDeps.size() == 0)
2375 {
2376 ioprintf(c1out,_("%s has no build depends.\n"),Src.c_str());
2377 continue;
2378 }
2379
2380 // Install the requested packages
2381 unsigned int ExpectedInst = 0;
2382 vector <pkgSrcRecords::Parser::BuildDepRec>::iterator D;
2383 pkgProblemResolver Fix(Cache);
58d76831 2384 bool skipAlternatives = false; // skip remaining alternatives in an or group
b2e465d6
AL
2385 for (D = BuildDeps.begin(); D != BuildDeps.end(); D++)
2386 {
58d76831
AL
2387 bool hasAlternatives = (((*D).Op & pkgCache::Dep::Or) == pkgCache::Dep::Or);
2388
2389 if (skipAlternatives == true)
2390 {
2391 if (!hasAlternatives)
2392 skipAlternatives = false; // end of or group
2393 continue;
2394 }
2395
aa2d22be
AL
2396 if ((*D).Type == pkgSrcRecords::Parser::BuildConflict ||
2397 (*D).Type == pkgSrcRecords::Parser::BuildConflictIndep)
d3fc0061 2398 {
aa2d22be
AL
2399 pkgCache::PkgIterator Pkg = Cache->FindPkg((*D).Package);
2400 // Build-conflicts on unknown packages are silently ignored
2401 if (Pkg.end() == true)
2402 continue;
2403
2404 pkgCache::VerIterator IV = (*Cache)[Pkg].InstVerIter(*Cache);
2405
2406 /*
2407 * Remove if we have an installed version that satisfies the
2408 * version criteria
2409 */
2410 if (IV.end() == false &&
2411 Cache->VS().CheckDep(IV.VerStr(),(*D).Op,(*D).Version.c_str()) == true)
2412 TryToInstall(Pkg,Cache,Fix,true,false,ExpectedInst);
d3fc0061 2413 }
aa2d22be
AL
2414 else // BuildDep || BuildDepIndep
2415 {
2416 pkgCache::PkgIterator Pkg = Cache->FindPkg((*D).Package);
58d76831
AL
2417 if (_config->FindB("Debug::BuildDeps",false) == true)
2418 cout << "Looking for " << (*D).Package << "...\n";
2419
aa2d22be
AL
2420 if (Pkg.end() == true)
2421 {
58d76831
AL
2422 if (_config->FindB("Debug::BuildDeps",false) == true)
2423 cout << " (not found)" << (*D).Package << endl;
2424
2425 if (hasAlternatives)
2426 continue;
2427
2428 return _error->Error(_("%s dependency for %s cannot be satisfied "
2429 "because the package %s cannot be found"),
2430 Last->BuildDepType((*D).Type),Src.c_str(),
2431 (*D).Package.c_str());
aa2d22be
AL
2432 }
2433
2434 /*
2435 * if there are alternatives, we've already picked one, so skip
2436 * the rest
2437 *
2438 * TODO: this means that if there's a build-dep on A|B and B is
2439 * installed, we'll still try to install A; more importantly,
2440 * if A is currently broken, we cannot go back and try B. To fix
2441 * this would require we do a Resolve cycle for each package we
2442 * add to the install list. Ugh
2443 */
aa2d22be 2444
cfa5659c
AL
2445 /*
2446 * If this is a virtual package, we need to check the list of
2447 * packages that provide it and see if any of those are
2448 * installed
2449 */
2450 pkgCache::PrvIterator Prv = Pkg.ProvidesList();
a8a0fdcf
AL
2451 for (; Prv.end() != true; Prv++)
2452 {
58d76831
AL
2453 if (_config->FindB("Debug::BuildDeps",false) == true)
2454 cout << " Checking provider " << Prv.OwnerPkg().Name() << endl;
2455
cfa5659c
AL
2456 if ((*Cache)[Prv.OwnerPkg()].InstVerIter(*Cache).end() == false)
2457 break;
cb99271c 2458 }
e5002e30
AL
2459
2460 // Get installed version and version we are going to install
2461 pkgCache::VerIterator IV = (*Cache)[Pkg].InstVerIter(*Cache);
e5002e30 2462
58d76831
AL
2463 if ((*D).Version[0] != '\0') {
2464 // Versioned dependency
cb99271c
AL
2465
2466 pkgCache::VerIterator CV = (*Cache)[Pkg].CandidateVerIter(*Cache);
2467
2468 for (; CV.end() != true; CV++)
2469 {
2470 if (Cache->VS().CheckDep(CV.VerStr(),(*D).Op,(*D).Version.c_str()) == true)
2471 break;
2472 }
2473 if (CV.end() == true)
34e88622
AL
2474 if (hasAlternatives)
2475 {
2476 continue;
2477 }
2478 else
2479 {
cb99271c
AL
2480 return _error->Error(_("%s dependency for %s cannot be satisfied "
2481 "because no available versions of package %s "
2482 "can satisfy version requirements"),
2483 Last->BuildDepType((*D).Type),Src.c_str(),
2484 (*D).Package.c_str());
34e88622 2485 }
e5002e30 2486 }
58d76831
AL
2487 else
2488 {
2489 // Only consider virtual packages if there is no versioned dependency
2490 if (Prv.end() == false)
2491 {
2492 if (_config->FindB("Debug::BuildDeps",false) == true)
2493 cout << " Is provided by installed package " << Prv.OwnerPkg().Name() << endl;
2494 skipAlternatives = hasAlternatives;
2495 continue;
2496 }
2497 }
cfa5659c 2498
58d76831
AL
2499 if (IV.end() == false)
2500 {
2501 if (_config->FindB("Debug::BuildDeps",false) == true)
2502 cout << " Is installed\n";
2503
2504 if (Cache->VS().CheckDep(IV.VerStr(),(*D).Op,(*D).Version.c_str()) == true)
2505 {
2506 skipAlternatives = hasAlternatives;
2507 continue;
2508 }
2509
2510 if (_config->FindB("Debug::BuildDeps",false) == true)
2511 cout << " ...but the installed version doesn't meet the version requirement\n";
2512
2513 if (((*D).Op & pkgCache::Dep::LessEq) == pkgCache::Dep::LessEq)
2514 {
2515 return _error->Error(_("Failed to satisfy %s dependency for %s: Installed package %s is too new"),
2516 Last->BuildDepType((*D).Type),
2517 Src.c_str(),
2518 Pkg.Name());
2519 }
2520 }
2521
2522
2523 if (_config->FindB("Debug::BuildDeps",false) == true)
2524 cout << " Trying to install " << (*D).Package << endl;
2525
2526 if (TryToInstall(Pkg,Cache,Fix,false,false,ExpectedInst) == true)
2527 {
2528 // We successfully installed something; skip remaining alternatives
2529 skipAlternatives = hasAlternatives;
2530 continue;
2531 }
2532 else if (hasAlternatives)
2533 {
2534 if (_config->FindB("Debug::BuildDeps",false) == true)
2535 cout << " Unsatisfiable, trying alternatives\n";
2536 continue;
2537 }
2538 else
2539 {
2540 return _error->Error(_("Failed to satisfy %s dependency for %s: %s"),
2541 Last->BuildDepType((*D).Type),
2542 Src.c_str(),
2543 (*D).Package.c_str());
2544 }
b2e465d6
AL
2545 }
2546 }
2547
2548 Fix.InstallProtect();
2549 if (Fix.Resolve(true) == false)
2550 _error->Discard();
2551
2552 // Now we check the state of the packages,
2553 if (Cache->BrokenCount() != 0)
c33d7c4d 2554 return _error->Error(_("Build-dependencies for %s could not be satisfied."),*I);
b2e465d6
AL
2555 }
2556
2557 if (InstallPackages(Cache, false, true) == false)
2558 return _error->Error(_("Failed to process build dependencies"));
36375005
AL
2559 return true;
2560}
2561 /*}}}*/
2562
b2e465d6
AL
2563// DoMoo - Never Ask, Never Tell /*{{{*/
2564// ---------------------------------------------------------------------
2565/* */
2566bool DoMoo(CommandLine &CmdL)
2567{
2568 cout <<
2569 " (__) \n"
2570 " (oo) \n"
2571 " /------\\/ \n"
2572 " / | || \n"
2573 " * /\\---/\\ \n"
2574 " ~~ ~~ \n"
2575 "....\"Have you mooed today?\"...\n";
2576
2577 return true;
2578}
2579 /*}}}*/
0a8e3465
AL
2580// ShowHelp - Show a help screen /*{{{*/
2581// ---------------------------------------------------------------------
2582/* */
212ad54a 2583bool ShowHelp(CommandLine &CmdL)
0a8e3465 2584{
5b28c804
OS
2585 ioprintf(cout,_("%s %s for %s compiled on %s %s\n"),PACKAGE,VERSION,
2586 COMMON_ARCH,__DATE__,__TIME__);
b2e465d6 2587
04aa15a8 2588 if (_config->FindB("version") == true)
b2e465d6 2589 {
db0db9fe 2590 cout << _("Supported modules:") << endl;
b2e465d6
AL
2591
2592 for (unsigned I = 0; I != pkgVersioningSystem::GlobalListLen; I++)
2593 {
2594 pkgVersioningSystem *VS = pkgVersioningSystem::GlobalList[I];
2595 if (_system != 0 && _system->VS == VS)
2596 cout << '*';
2597 else
2598 cout << ' ';
2599 cout << "Ver: " << VS->Label << endl;
2600
2601 /* Print out all the packaging systems that will work with
2602 this VS */
2603 for (unsigned J = 0; J != pkgSystem::GlobalListLen; J++)
2604 {
2605 pkgSystem *Sys = pkgSystem::GlobalList[J];
2606 if (_system == Sys)
2607 cout << '*';
2608 else
2609 cout << ' ';
2610 if (Sys->VS->TestCompatibility(*VS) == true)
2611 cout << "Pkg: " << Sys->Label << " (Priority " << Sys->Score(*_config) << ")" << endl;
2612 }
2613 }
2614
2615 for (unsigned I = 0; I != pkgSourceList::Type::GlobalListLen; I++)
2616 {
2617 pkgSourceList::Type *Type = pkgSourceList::Type::GlobalList[I];
2618 cout << " S.L: '" << Type->Name << "' " << Type->Label << endl;
2619 }
2620
2621 for (unsigned I = 0; I != pkgIndexFile::Type::GlobalListLen; I++)
2622 {
2623 pkgIndexFile::Type *Type = pkgIndexFile::Type::GlobalList[I];
2624 cout << " Idx: " << Type->Label << endl;
2625 }
2626
2627 return true;
2628 }
2629
2630 cout <<
2631 _("Usage: apt-get [options] command\n"
2632 " apt-get [options] install|remove pkg1 [pkg2 ...]\n"
2633 " apt-get [options] source pkg1 [pkg2 ...]\n"
2634 "\n"
2635 "apt-get is a simple command line interface for downloading and\n"
2636 "installing packages. The most frequently used commands are update\n"
2637 "and install.\n"
2638 "\n"
2639 "Commands:\n"
2640 " update - Retrieve new lists of packages\n"
2641 " upgrade - Perform an upgrade\n"
2642 " install - Install new packages (pkg is libc6 not libc6.deb)\n"
2643 " remove - Remove packages\n"
e47c7d16 2644 " purge - Remove and purge packages\n"
b2e465d6
AL
2645 " source - Download source archives\n"
2646 " build-dep - Configure build-dependencies for source packages\n"
2647 " dist-upgrade - Distribution upgrade, see apt-get(8)\n"
2648 " dselect-upgrade - Follow dselect selections\n"
2649 " clean - Erase downloaded archive files\n"
2650 " autoclean - Erase old downloaded archive files\n"
2651 " check - Verify that there are no broken dependencies\n"
2652 "\n"
2653 "Options:\n"
2654 " -h This help text.\n"
2655 " -q Loggable output - no progress indicator\n"
2656 " -qq No output except for errors\n"
2657 " -d Download only - do NOT install or unpack archives\n"
2658 " -s No-act. Perform ordering simulation\n"
2659 " -y Assume Yes to all queries and do not prompt\n"
2660 " -f Attempt to continue if the integrity check fails\n"
2661 " -m Attempt to continue if archives are unlocatable\n"
2662 " -u Show a list of upgraded packages as well\n"
2663 " -b Build the source package after fetching it\n"
ac625538 2664 " -V Show verbose version numbers\n"
b2e465d6 2665 " -c=? Read this configuration file\n"
a2884e32 2666 " -o=? Set an arbitrary configuration option, eg -o dir::cache=/tmp\n"
b2e465d6
AL
2667 "See the apt-get(8), sources.list(5) and apt.conf(5) manual\n"
2668 "pages for more information and options.\n"
2669 " This APT has Super Cow Powers.\n");
2670 return true;
0a8e3465
AL
2671}
2672 /*}}}*/
2673// GetInitialize - Initialize things for apt-get /*{{{*/
2674// ---------------------------------------------------------------------
2675/* */
2676void GetInitialize()
2677{
2678 _config->Set("quiet",0);
2679 _config->Set("help",false);
2680 _config->Set("APT::Get::Download-Only",false);
2681 _config->Set("APT::Get::Simulate",false);
2682 _config->Set("APT::Get::Assume-Yes",false);
2683 _config->Set("APT::Get::Fix-Broken",false);
83d89a9f 2684 _config->Set("APT::Get::Force-Yes",false);
640c5d94 2685 _config->Set("APT::Get::List-Cleanup",true);
afb1e2e3 2686 _config->Set("APT::Get::AutomaticRemove",false);
0a8e3465
AL
2687}
2688 /*}}}*/
d7827aca
AL
2689// SigWinch - Window size change signal handler /*{{{*/
2690// ---------------------------------------------------------------------
2691/* */
2692void SigWinch(int)
2693{
2694 // Riped from GNU ls
2695#ifdef TIOCGWINSZ
2696 struct winsize ws;
2697
2698 if (ioctl(1, TIOCGWINSZ, &ws) != -1 && ws.ws_col >= 5)
2699 ScreenWidth = ws.ws_col - 1;
2700#endif
2701}
2702 /*}}}*/
0a8e3465
AL
2703
2704int main(int argc,const char *argv[])
2705{
2706 CommandLine::Args Args[] = {
2707 {'h',"help","help",0},
04aa15a8 2708 {'v',"version","version",0},
ac625538 2709 {'V',"verbose-versions","APT::Get::Show-Versions",0},
0a8e3465
AL
2710 {'q',"quiet","quiet",CommandLine::IntLevel},
2711 {'q',"silent","quiet",CommandLine::IntLevel},
2712 {'d',"download-only","APT::Get::Download-Only",0},
fb0ee66e
AL
2713 {'b',"compile","APT::Get::Compile",0},
2714 {'b',"build","APT::Get::Compile",0},
d150b09d
AL
2715 {'s',"simulate","APT::Get::Simulate",0},
2716 {'s',"just-print","APT::Get::Simulate",0},
2717 {'s',"recon","APT::Get::Simulate",0},
6df23d2f 2718 {'s',"dry-run","APT::Get::Simulate",0},
d150b09d
AL
2719 {'s',"no-act","APT::Get::Simulate",0},
2720 {'y',"yes","APT::Get::Assume-Yes",0},
0a8e3465
AL
2721 {'y',"assume-yes","APT::Get::Assume-Yes",0},
2722 {'f',"fix-broken","APT::Get::Fix-Broken",0},
2723 {'u',"show-upgraded","APT::Get::Show-Upgraded",0},
30e1eab5 2724 {'m',"ignore-missing","APT::Get::Fix-Missing",0},
b2e465d6
AL
2725 {'t',"target-release","APT::Default-Release",CommandLine::HasArg},
2726 {'t',"default-release","APT::Default-Release",CommandLine::HasArg},
2727 {0,"download","APT::Get::Download",0},
30e1eab5 2728 {0,"fix-missing","APT::Get::Fix-Missing",0},
b2e465d6
AL
2729 {0,"ignore-hold","APT::Ignore-Hold",0},
2730 {0,"upgrade","APT::Get::upgrade",0},
83d89a9f 2731 {0,"force-yes","APT::Get::force-yes",0},
f7a08e33 2732 {0,"print-uris","APT::Get::Print-URIs",0},
5fafc0ef 2733 {0,"diff-only","APT::Get::Diff-Only",0},
1979e742
MV
2734 {0,"tar-only","APT::Get::Tar-Only",0},
2735 {0,"dsc-only","APT::Get::Dsc-Only",0},
fc4b5c9f 2736 {0,"purge","APT::Get::Purge",0},
9df71a5b 2737 {0,"list-cleanup","APT::Get::List-Cleanup",0},
d0c59649 2738 {0,"reinstall","APT::Get::ReInstall",0},
d150b09d 2739 {0,"trivial-only","APT::Get::Trivial-Only",0},
b2e465d6
AL
2740 {0,"remove","APT::Get::Remove",0},
2741 {0,"only-source","APT::Get::Only-Source",0},
45430cbf 2742 {0,"arch-only","APT::Get::Arch-Only",0},
f8ac1720 2743 {0,"auto-remove","APT::Get::AutomaticRemove",0},
7db98ffc 2744 {0,"allow-unauthenticated","APT::Get::AllowUnauthenticated",0},
e9ae3677 2745 {0,"install-recommends","APT::Install-Recommends",CommandLine::Boolean},
4ef9a929 2746 {0,"fix-policy","APT::Get::Fix-Policy-Broken",0},
0a8e3465
AL
2747 {'c',"config-file",0,CommandLine::ConfigFile},
2748 {'o',"option",0,CommandLine::ArbItem},
2749 {0,0,0,0}};
83d89a9f
AL
2750 CommandLine::Dispatch Cmds[] = {{"update",&DoUpdate},
2751 {"upgrade",&DoUpgrade},
2752 {"install",&DoInstall},
2753 {"remove",&DoInstall},
74a05226 2754 {"autoremove",&DoInstall},
9efa2e91 2755 {"purge",&DoInstall},
83d89a9f
AL
2756 {"dist-upgrade",&DoDistUpgrade},
2757 {"dselect-upgrade",&DoDSelectUpgrade},
b2e465d6 2758 {"build-dep",&DoBuildDep},
83d89a9f 2759 {"clean",&DoClean},
1bc849af 2760 {"autoclean",&DoAutoClean},
83d89a9f 2761 {"check",&DoCheck},
67111687 2762 {"source",&DoSource},
b2e465d6 2763 {"moo",&DoMoo},
67111687 2764 {"help",&ShowHelp},
83d89a9f 2765 {0,0}};
67111687
AL
2766
2767 // Set up gettext support
2768 setlocale(LC_ALL,"");
2769 textdomain(PACKAGE);
2770
0a8e3465
AL
2771 // Parse the command line and initialize the package library
2772 CommandLine CmdL(Args,_config);
b2e465d6
AL
2773 if (pkgInitConfig(*_config) == false ||
2774 CmdL.Parse(argc,argv) == false ||
2775 pkgInitSystem(*_config,_system) == false)
0a8e3465 2776 {
b2e465d6
AL
2777 if (_config->FindB("version") == true)
2778 ShowHelp(CmdL);
2779
0a8e3465
AL
2780 _error->DumpErrors();
2781 return 100;
2782 }
2783
2784 // See if the help should be shown
2785 if (_config->FindB("help") == true ||
04aa15a8 2786 _config->FindB("version") == true ||
0a8e3465 2787 CmdL.FileSize() == 0)
b2e465d6
AL
2788 {
2789 ShowHelp(CmdL);
2790 return 0;
2791 }
67ff87bf 2792
a9a5908d 2793 // Deal with stdout not being a tty
00581c6b 2794 if (!isatty(STDOUT_FILENO) && _config->FindI("quiet",0) < 1)
a9a5908d 2795 _config->Set("quiet","1");
01b64152 2796
0a8e3465
AL
2797 // Setup the output streams
2798 c0out.rdbuf(cout.rdbuf());
2799 c1out.rdbuf(cout.rdbuf());
2800 c2out.rdbuf(cout.rdbuf());
2801 if (_config->FindI("quiet",0) > 0)
2802 c0out.rdbuf(devnull.rdbuf());
2803 if (_config->FindI("quiet",0) > 1)
2804 c1out.rdbuf(devnull.rdbuf());
d7827aca
AL
2805
2806 // Setup the signals
2807 signal(SIGPIPE,SIG_IGN);
2808 signal(SIGWINCH,SigWinch);
2809 SigWinch(0);
b2e465d6 2810
0a8e3465 2811 // Match the operation
83d89a9f 2812 CmdL.DispatchArg(Cmds);
0a8e3465
AL
2813
2814 // Print any errors or warnings found during parsing
2815 if (_error->empty() == false)
2816 {
2817 bool Errors = _error->PendingError();
2818 _error->DumpErrors();
0a8e3465
AL
2819 return Errors == true?100:0;
2820 }
2821
2822 return 0;
2823}