]>
Commit | Line | Data |
---|---|---|
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 | #include<config.h> | |
12 | ||
13 | #include <apt-pkg/clean.h> | |
14 | #include <apt-pkg/strutl.h> | |
15 | #include <apt-pkg/error.h> | |
16 | #include <apt-pkg/configuration.h> | |
17 | #include <apt-pkg/aptconfiguration.h> | |
18 | #include <apt-pkg/fileutl.h> | |
19 | ||
20 | #include <dirent.h> | |
21 | #include <sys/stat.h> | |
22 | #include <unistd.h> | |
23 | ||
24 | #include <apti18n.h> | |
25 | /*}}}*/ | |
26 | // ArchiveCleaner::Go - Perform smart cleanup of the archive /*{{{*/ | |
27 | // --------------------------------------------------------------------- | |
28 | /* Scan the directory for files to erase, we check the version information | |
29 | against our database to see if it is interesting */ | |
30 | bool pkgArchiveCleaner::Go(std::string Dir,pkgCache &Cache) | |
31 | { | |
32 | bool CleanInstalled = _config->FindB("APT::Clean-Installed",true); | |
33 | ||
34 | DIR *D = opendir(Dir.c_str()); | |
35 | if (D == 0) | |
36 | return _error->Errno("opendir",_("Unable to read %s"),Dir.c_str()); | |
37 | ||
38 | std::string StartDir = SafeGetCWD(); | |
39 | if (chdir(Dir.c_str()) != 0) | |
40 | { | |
41 | closedir(D); | |
42 | return _error->Errno("chdir",_("Unable to change to %s"),Dir.c_str()); | |
43 | } | |
44 | ||
45 | for (struct dirent *Dir = readdir(D); Dir != 0; Dir = readdir(D)) | |
46 | { | |
47 | // Skip some files.. | |
48 | if (strcmp(Dir->d_name,"lock") == 0 || | |
49 | strcmp(Dir->d_name,"partial") == 0 || | |
50 | strcmp(Dir->d_name,".") == 0 || | |
51 | strcmp(Dir->d_name,"..") == 0) | |
52 | continue; | |
53 | ||
54 | struct stat St; | |
55 | if (stat(Dir->d_name,&St) != 0) | |
56 | { | |
57 | _error->Errno("stat",_("Unable to stat %s."),Dir->d_name); | |
58 | closedir(D); | |
59 | if (chdir(StartDir.c_str()) != 0) | |
60 | return _error->Errno("chdir", _("Unable to change to %s"), StartDir.c_str()); | |
61 | return false; | |
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 | std::string Pkg = DeQuoteString(std::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 | std::string Ver = DeQuoteString(std::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 | std::string const Arch = DeQuoteString(std::string(Start,I-Start)); | |
84 | ||
85 | // ignore packages of unconfigured architectures | |
86 | if (APT::Configuration::checkArchitecture(Arch) == false) | |
87 | continue; | |
88 | ||
89 | // Lookup the package | |
90 | pkgCache::PkgIterator P = Cache.FindPkg(Pkg, Arch); | |
91 | if (P.end() != true) | |
92 | { | |
93 | pkgCache::VerIterator V = P.VersionList(); | |
94 | for (; V.end() == false; ++V) | |
95 | { | |
96 | // See if we can fetch this version at all | |
97 | bool IsFetchable = false; | |
98 | for (pkgCache::VerFileIterator J = V.FileList(); | |
99 | J.end() == false; ++J) | |
100 | { | |
101 | if (CleanInstalled == true && | |
102 | (J.File()->Flags & pkgCache::Flag::NotSource) != 0) | |
103 | continue; | |
104 | IsFetchable = true; | |
105 | break; | |
106 | } | |
107 | ||
108 | // See if this verison matches the file | |
109 | if (IsFetchable == true && Ver == V.VerStr()) | |
110 | break; | |
111 | } | |
112 | ||
113 | // We found a match, keep the file | |
114 | if (V.end() == false) | |
115 | continue; | |
116 | } | |
117 | ||
118 | Erase(Dir->d_name,Pkg,Ver,St); | |
119 | }; | |
120 | ||
121 | closedir(D); | |
122 | if (chdir(StartDir.c_str()) != 0) | |
123 | return _error->Errno("chdir", _("Unable to change to %s"), StartDir.c_str()); | |
124 | return true; | |
125 | } | |
126 | /*}}}*/ |