From 767f80e7296c41a4428c73cadc90b953d252f8d7 Mon Sep 17 00:00:00 2001 From: Arun Isaac Date: Thu, 28 Aug 2025 20:09:50 +0100 Subject: e2e-tests: Add tests based off of examples in the ccwl manual. --- e2e-tests/tools/checksum.scm | 22 ++++++++++++++++++++++ 1 file changed, 22 insertions(+) create mode 100644 e2e-tests/tools/checksum.scm (limited to 'e2e-tests/tools/checksum.scm') diff --git a/e2e-tests/tools/checksum.scm b/e2e-tests/tools/checksum.scm new file mode 100644 index 0000000..27dec78 --- /dev/null +++ b/e2e-tests/tools/checksum.scm @@ -0,0 +1,22 @@ +(define md5sum + (command #:inputs (file #:type File #:stage? #t) + #:run "md5sum" "$(inputs.file.basename)" + #:outputs (md5 #:type stdout) + #:stdout "md5")) + +(define sha1sum + (command #:inputs (file #:type File #:stage? #t) + #:run "sha1sum" "$(inputs.file.basename)" + #:outputs (sha1 #:type stdout) + #:stdout "sha1")) + +(define sha256sum + (command #:inputs (file #:type File #:stage? #t) + #:run "sha256sum" "$(inputs.file.basename)" + #:outputs (sha256 #:type stdout) + #:stdout "sha256")) + +(workflow ((file #:type File)) + (tee (md5sum #:file file) + (sha1sum #:file file) + (sha256sum #:file file))) -- cgit 1.4.1