]> git.saurik.com Git - apt.git/blob - apt-pkg/clean.cc
* added APT::NeverAutoRemove (a list of regexp for package names that should never...
[apt.git] / apt-pkg / clean.cc
1 // -*- mode: cpp; mode: fold -*-
2 // Description /*{{{*/
3 // $Id: clean.cc,v 1.4 2001/02/20 07:03:17 jgg Exp $
4 /* ######################################################################
5
6 Clean - Clean out downloaded directories
7
8 ##################################################################### */
9 /*}}}*/
10 // Includes /*{{{*/
11 #ifdef __GNUG__
12 #pragma implementation "apt-pkg/clean.h"
13 #endif
14
15 #include <apt-pkg/clean.h>
16 #include <apt-pkg/strutl.h>
17 #include <apt-pkg/error.h>
18 #include <apt-pkg/configuration.h>
19
20 #include <apti18n.h>
21
22 #include <dirent.h>
23 #include <sys/stat.h>
24 #include <unistd.h>
25 /*}}}*/
26
27 // ArchiveCleaner::Go - Perform smart cleanup of the archive /*{{{*/
28 // ---------------------------------------------------------------------
29 /* Scan the directory for files to erase, we check the version information
30 against our database to see if it is interesting */
31 bool pkgArchiveCleaner::Go(string Dir,pkgCache &Cache)
32 {
33 bool CleanInstalled = _config->FindB("APT::Clean-Installed",true);
34 string MyArch = _config->Find("APT::Architecture");
35
36 DIR *D = opendir(Dir.c_str());
37 if (D == 0)
38 return _error->Errno("opendir",_("Unable to read %s"),Dir.c_str());
39
40 string StartDir = SafeGetCWD();
41 if (chdir(Dir.c_str()) != 0)
42 {
43 closedir(D);
44 return _error->Errno("chdir",_("Unable to change to %s"),Dir.c_str());
45 }
46
47 for (struct dirent *Dir = readdir(D); Dir != 0; Dir = readdir(D))
48 {
49 // Skip some files..
50 if (strcmp(Dir->d_name,"lock") == 0 ||
51 strcmp(Dir->d_name,"partial") == 0 ||
52 strcmp(Dir->d_name,".") == 0 ||
53 strcmp(Dir->d_name,"..") == 0)
54 continue;
55
56 struct stat St;
57 if (stat(Dir->d_name,&St) != 0)
58 {
59 chdir(StartDir.c_str());
60 closedir(D);
61 return _error->Errno("stat",_("Unable to stat %s."),Dir->d_name);
62 }
63
64 // Grab the package name
65 const char *I = Dir->d_name;
66 for (; *I != 0 && *I != '_';I++);
67 if (*I != '_')
68 continue;
69 string Pkg = DeQuoteString(string(Dir->d_name,I-Dir->d_name));
70
71 // Grab the version
72 const char *Start = I + 1;
73 for (I = Start; *I != 0 && *I != '_';I++);
74 if (*I != '_')
75 continue;
76 string Ver = DeQuoteString(string(Start,I-Start));
77
78 // Grab the arch
79 Start = I + 1;
80 for (I = Start; *I != 0 && *I != '.' ;I++);
81 if (*I != '.')
82 continue;
83 string Arch = DeQuoteString(string(Start,I-Start));
84
85 if (Arch != "all" && Arch != MyArch)
86 continue;
87
88 // Lookup the package
89 pkgCache::PkgIterator P = Cache.FindPkg(Pkg);
90 if (P.end() != true)
91 {
92 pkgCache::VerIterator V = P.VersionList();
93 for (; V.end() == false; V++)
94 {
95 // See if we can fetch this version at all
96 bool IsFetchable = false;
97 for (pkgCache::VerFileIterator J = V.FileList();
98 J.end() == false; J++)
99 {
100 if (CleanInstalled == true &&
101 (J.File()->Flags & pkgCache::Flag::NotSource) != 0)
102 continue;
103 IsFetchable = true;
104 break;
105 }
106
107 // See if this verison matches the file
108 if (IsFetchable == true && Ver == V.VerStr())
109 break;
110 }
111
112 // We found a match, keep the file
113 if (V.end() == false)
114 continue;
115 }
116
117 Erase(Dir->d_name,Pkg,Ver,St);
118 };
119
120 chdir(StartDir.c_str());
121 closedir(D);
122 return true;
123 }
124 /*}}}*/