201/470: gnu: Add rust-sha1-0.10.

[guix-commits]

efraim pushed a commit to branch rust-team
in repository guix.

commit 6019e566bbb685667b18845922ac8746f8549a41
Author: Efraim Flashner <efraim@flashner.co.il>
AuthorDate: Wed Feb 22 11:39:49 2023 +0200

    gnu: Add rust-sha1-0.10.
    
    * gnu/packages/crates-io.scm (rust-sha1-0.10): New variable.
    (rust-sha1-0.6): Inherit from rust-sha1-0.10.
---
 gnu/packages/crates-io.scm | 37 ++++++++++++++++++++++++++++++-------
 1 file changed, 30 insertions(+), 7 deletions(-)

diff --git a/gnu/packages/crates-io.scm b/gnu/packages/crates-io.scm
index 147ee7ebbe..9822cc6a80 100644
--- a/gnu/packages/crates-io.scm
+++ b/gnu/packages/crates-io.scm
@@ -53892,8 +53892,37 @@ functionality and without weak references.")
        (("rust-digest" ,rust-digest-0.8)
         ("rust-hex-literal" ,rust-hex-literal-0.1))))))
 
+(define-public rust-sha1-0.10
+  (package
+    (name "rust-sha1")
+    (version "0.10.5")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "sha1" version))
+       (file-name
+        (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "18zb80sxn31kxdpl1ly6w17hkrvyf08zbxnpy8ckb6f3h3f96hph"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:cargo-inputs
+       (("rust-cfg-if" ,rust-cfg-if-1)
+        ("rust-cpufeatures" ,rust-cpufeatures-0.2)
+        ("rust-digest" ,rust-digest-0.10)
+        ("rust-sha1-asm" ,rust-sha1-asm-0.5))
+       #:cargo-development-inputs
+       (("rust-digest" ,rust-digest-0.10)
+        ("rust-hex-literal" ,rust-hex-literal-0.2))))
+    (home-page "https://github.com/mitsuhiko/rust-sha1";)
+    (synopsis "Minimal implementation of SHA1 for Rust")
+    (description
+     "This package provides a ,inimal implementation of SHA1 for Rust.")
+    (license license:bsd-3)))
+
 (define-public rust-sha1-0.6
   (package
+    (inherit rust-sha1-0.10)
     (name "rust-sha1")
     (version "0.6.0")
     (source
@@ -53905,7 +53934,6 @@ functionality and without weak references.")
        (sha256
         (base32
          "03gs2q4m67rn2p8xcdfxhip6mpgahdwm12bnb3vh90ahv9grhy95"))))
-    (build-system cargo-build-system)
     (arguments
      `(#:skip-build? #t
        #:cargo-inputs
@@ -53913,12 +53941,7 @@ functionality and without weak references.")
        #:cargo-development-inputs
        (("rust-openssl" ,rust-openssl-0.10)
         ("rust-rand" ,rust-rand-0.4)
-        ("rust-serde-json" ,rust-serde-json-1))))
-    (home-page "https://github.com/mitsuhiko/rust-sha1";)
-    (synopsis "Minimal implementation of SHA1 for Rust")
-    (description
-     "Minimal implementation of SHA1 for Rust.")
-    (license license:bsd-3)))
+        ("rust-serde-json" ,rust-serde-json-1))))))
 
 (define-public rust-sha1-0.2
   (package