diff options
| author | Eelco Dolstra <e.dolstra@tudelft.nl> | 2003-07-12 11:03:14 +0000 |
|---|---|---|
| committer | Eelco Dolstra <e.dolstra@tudelft.nl> | 2003-07-12 11:03:14 +0000 |
| commit | 5304a1eb3a2bbcc379924d3f5a58b64ce77f4849 (patch) | |
| tree | 6c428995c253d8f33a9b3e82fcc9ab1e5db4ef27 /corepkgs | |
| parent | 73b163c1a10f2ce675d9fc3d7ad02fad4bc6511f (diff) | |
| download | guix-5304a1eb3a2bbcc379924d3f5a58b64ce77f4849.tar.gz | |
* Fetchurl: check md5 checksum.
Diffstat (limited to 'corepkgs')
| -rw-r--r-- | corepkgs/fetchurl/fetchurl.fix | 4 | ||||
| -rw-r--r-- | corepkgs/fetchurl/fetchurl.sh | 9 |
2 files changed, 10 insertions, 3 deletions
diff --git a/corepkgs/fetchurl/fetchurl.fix b/corepkgs/fetchurl/fetchurl.fix index a3b3d46e10..f798c0becb 100644 --- a/corepkgs/fetchurl/fetchurl.fix +++ b/corepkgs/fetchurl/fetchurl.fix @@ -1,8 +1,8 @@ -Function(["url", "hash"], +Function(["url", "md5"], Package( [ ("build", Relative("fetchurl/fetchurl.sh")) , ("url", Var("url")) - , ("hash", Var("hash")) + , ("md5", Var("md5")) , ("name", BaseName(Var("url"))) ] ) diff --git a/corepkgs/fetchurl/fetchurl.sh b/corepkgs/fetchurl/fetchurl.sh index a92092c6ee..7b6243974d 100644 --- a/corepkgs/fetchurl/fetchurl.sh +++ b/corepkgs/fetchurl/fetchurl.sh @@ -1,3 +1,10 @@ #! /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 |