lunaphied/lix
0
0
Fork 0
forked from lix-project/lix
Code Pull requests Activity

download-from-binary-cache: Print correct URL

Browse source
This commit is contained in:
Eelco Dolstra 2012-07-18 11:01:17 -04:00
parent fe241ece29
commit aa115e22df
1 changed files with 5 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
scripts/download-from-binary-cache.pl.in
View file

@ -213,6 +213,8 @@ sub processNARInfo {
print STDERR "bad NAR info file ‘$request->{url}’\n"; print STDERR "bad NAR info file ‘$request->{url}’\n";
return undef; return undef;
} }
# FIXME: validate $url etc. for security.
# Cache the result. # Cache the result.
$insertNAR->execute( $insertNAR->execute(
@ -417,8 +419,9 @@ sub downloadBinary {
print STDERR "unknown compression method ‘$info->{compression}’\n"; print STDERR "unknown compression method ‘$info->{compression}’\n";
next; next;
} }
print STDERR "\n*** Downloading ‘$info->{url}’ into ‘$storePath’...\n"; my $url = "$binaryCacheUrl/$info->{url}"; # FIXME: handle non-relative URLs
if (system("$Nix::Config::curl --fail --location $binaryCacheUrl/$info->{url} | $decompressor | $Nix::Config::binDir/nix-store --restore $storePath") != 0) { print STDERR "\n*** Downloading ‘$url’ into ‘$storePath’...\n";
if (system("$Nix::Config::curl --fail --location '$url' | $decompressor | $Nix::Config::binDir/nix-store --restore $storePath") != 0) {
die "download of `$info->{url}' failed" . ($! ? ": $!" : "") . "\n" unless $? == 0; die "download of `$info->{url}' failed" . ($! ? ": $!" : "") . "\n" unless $? == 0;
next; next;
} }