| | 1 | // -*- mode: cpp; mode: fold -*- |
| | 2 | // Description /*{{{*/ |
| | 3 | // $Id: clean.cc,v 1.3 1999/10/03 21:09:27 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 <dirent.h> |
| | 21 | #include <sys/stat.h> |
| | 22 | #include <unistd.h> |
| | 23 | /*}}}*/ |
| | 24 | |
| | 25 | // ArchiveCleaner::Go - Perform smart cleanup of the archive /*{{{*/ |
| | 26 | // --------------------------------------------------------------------- |
| | 27 | /* Scan the directory for files to erase, we check the version information |
| | 28 | against our database to see if it is interesting */ |
| | 29 | bool pkgArchiveCleaner::Go(string Dir,pkgCache &Cache) |
| | 30 | { |
| | 31 | bool CleanInstalled = _config->FindB("APT::Clean-Installed",true); |
| | 32 | |
| | 33 | DIR *D = opendir(Dir.c_str()); |
| | 34 | if (D == 0) |
| | 35 | return _error->Errno("opendir","Unable to read %s",Dir.c_str()); |
| | 36 | |
| | 37 | string StartDir = SafeGetCWD(); |
| | 38 | if (chdir(Dir.c_str()) != 0) |
| | 39 | { |
| | 40 | closedir(D); |
| | 41 | return _error->Errno("chdir","Unable to change to ",Dir.c_str()); |
| | 42 | } |
| | 43 | |
| | 44 | for (struct dirent *Dir = readdir(D); Dir != 0; Dir = readdir(D)) |
| | 45 | { |
| | 46 | // Skip some files.. |
| | 47 | if (strcmp(Dir->d_name,"lock") == 0 || |
| | 48 | strcmp(Dir->d_name,"partial") == 0 || |
| | 49 | strcmp(Dir->d_name,".") == 0 || |
| | 50 | strcmp(Dir->d_name,"..") == 0) |
| | 51 | continue; |
| | 52 | |
| | 53 | struct stat St; |
| | 54 | if (stat(Dir->d_name,&St) != 0) |
| | 55 | return _error->Errno("stat","Unable to stat %s.",Dir->d_name); |
| | 56 | |
| | 57 | // Grab the package name |
| | 58 | const char *I = Dir->d_name; |
| | 59 | for (; *I != 0 && *I != '_';I++); |
| | 60 | if (*I != '_') |
| | 61 | continue; |
| | 62 | string Pkg = DeQuoteString(string(Dir->d_name,I-Dir->d_name)); |
| | 63 | |
| | 64 | // Grab the version |
| | 65 | const char *Start = I + 1; |
| | 66 | for (I = Start; *I != 0 && *I != '_';I++); |
| | 67 | if (*I != '_') |
| | 68 | continue; |
| | 69 | string Ver = DeQuoteString(string(Start,I-Start)); |
| | 70 | |
| | 71 | // Grab the arch |
| | 72 | Start = I + 1; |
| | 73 | for (I = Start; *I != 0 && *I != '.' ;I++); |
| | 74 | if (*I != '.') |
| | 75 | continue; |
| | 76 | string Arch = DeQuoteString(string(Start,I-Start)); |
| | 77 | |
| | 78 | // Lookup the package |
| | 79 | pkgCache::PkgIterator P = Cache.FindPkg(Pkg); |
| | 80 | if (P.end() != true) |
| | 81 | { |
| | 82 | pkgCache::VerIterator V = P.VersionList(); |
| | 83 | for (; V.end() == false; V++) |
| | 84 | { |
| | 85 | // See if we can fetch this version at all |
| | 86 | bool IsFetchable = false; |
| | 87 | for (pkgCache::VerFileIterator J = V.FileList(); |
| | 88 | J.end() == false; J++) |
| | 89 | { |
| | 90 | if (CleanInstalled == true && |
| | 91 | (J.File()->Flags & pkgCache::Flag::NotSource) != 0) |
| | 92 | continue; |
| | 93 | IsFetchable = true; |
| | 94 | break; |
| | 95 | } |
| | 96 | |
| | 97 | // See if this verison matches the file |
| | 98 | if (IsFetchable == true && Ver == V.VerStr()) |
| | 99 | break; |
| | 100 | } |
| | 101 | |
| | 102 | // We found a match, keep the file |
| | 103 | if (V.end() == false) |
| | 104 | continue; |
| | 105 | } |
| | 106 | |
| | 107 | Erase(Dir->d_name,Pkg,Ver,St); |
| | 108 | }; |
| | 109 | |
| | 110 | chdir(StartDir.c_str()); |
| | 111 | closedir(D); |
| | 112 | return true; |
| | 113 | } |
| | 114 | /*}}}*/ |
projects / apt.git / blame_incremental