Asynchronously compress build logs

This commit is contained in:
Eelco Dolstra
2015-06-19 14:51:59 +02:00
parent 8e408048e2
commit 133d298e26
5 changed files with 97 additions and 13 deletions

View File

@ -134,7 +134,7 @@ sub getDrvLogPath {
my $bucketed = substr($base, 0, 2) . "/" . substr($base, 2);
my $fn = ($ENV{NIX_LOG_DIR} || "/nix/var/log/nix") . "/drvs/";
my $fn2 = Hydra::Model::DB::getHydraPath . "/build-logs/";
for ($fn2 . $bucketed, $fn . $bucketed . ".bz2", $fn . $bucketed, $fn . $base . ".bz2", $fn . $base) {
for ($fn2 . $bucketed, $fn2 . $bucketed . ".bz2", $fn . $bucketed . ".bz2", $fn . $bucketed, $fn . $base . ".bz2", $fn . $base) {
return $_ if -f $_;
}
return undef;