wroclaw-git-backups/nix
1
0
Fork 0
mirror of https://github.com/NixOS/nix synced 2025-06-29 06:21:14 +02:00
Code Activity

* Separate the cache reading code.

Browse source
This commit is contained in:
Eelco Dolstra 2006-02-22 14:35:19 +00:00
parent 928cce5922
commit 43fa1c20e7
2 changed files with 28 additions and 25 deletions
Download patch file Download diff file Expand all files Collapse all files

21
scripts/maintenance/readcache.pm Normal file
View file

@ -0,0 +1,21 @@
package readcache;
use strict;
# Read the archive directories.
our %archives;
sub readDir {
my $dir = shift;
opendir(DIR, "$dir") or die "cannot open `$dir': $!";
my @as = readdir DIR;
foreach my $archive (@as) {
$archives{$archive} = "$dir/$archive";
}
closedir DIR;
}
readDir "/data/webserver/dist/nix-cache";
readDir "/data/webserver/dist/test";
readDir "/data/webserver/dist/patches";
print STDERR scalar (keys %archives), "\n";