TakeV
/
guix
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

* Fetchurl: check md5 checksum.

This commit is contained in:
Eelco Dolstra 2003-07-12 11:03:14 +00:00
parent 73b163c1a1
commit 5304a1eb3a
2 changed files with 10 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
corepkgs/fetchurl/fetchurl.fix
View File

@ -1,8 +1,8 @@
Function(["url", "hash"], Function(["url", "md5"],
Package( Package(
[ ("build", Relative("fetchurl/fetchurl.sh")) [ ("build", Relative("fetchurl/fetchurl.sh"))
, ("url", Var("url")) , ("url", Var("url"))
, ("hash", Var("hash")) , ("md5", Var("md5"))
, ("name", BaseName(Var("url"))) , ("name", BaseName(Var("url")))
] ]
) )

9
corepkgs/fetchurl/fetchurl.sh
View File

@ -1,3 +1,10 @@
#! /bin/sh #! /bin/sh
wget "$url" -O "$out" echo "downloading $url into $out..."
wget "$url" -O "$out" || exit 1
actual=$(md5sum -b $out | cut -c1-32)
if ! test "$actual" == "$md5"; then
echo "hash is $actual, expected $md5"
exit 1
fi