diff options
author | Ludovic Courtès <ludo@gnu.org> | 2014-03-30 21:35:22 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2014-03-30 22:32:16 +0200 |
commit | 52f80dfc8a1c2f116a91a20c8cefd62a317f3d36 (patch) | |
tree | c36efbf0b00df51f8dc417d206e9b314088849f3 /gnu/system.scm | |
parent | 491e6de7d65604f3f3c1d8fa0e88dfd77541db68 (diff) | |
download | guix-52f80dfc8a1c2f116a91a20c8cefd62a317f3d36.tar.gz |
tests: Simplify 'substitute-binary' tests; reduce use of global variables.
* tests/substitute-binary.scm (signature-body): Change 'str' parameter to 'bv', and expect it to be a bytevector. (%signature-body, %wrong-signature, %acl): Remove. (signature): Rename to... (signature-field): ... this. Add 'bv-or-str' parameter. Change 'str' parameter to #:version. Add #:public-key parameter. Call 'signature-body' directly. Change domain part of the signature to 'example.gnu.org'. ("not a number", "wrong version number", "valid narinfo-signature->canonical-sexp"): Use 'signature-field' instead of 'signature' or %SIGNATURE. (test-error-condition): Add 'message-rx' parameter and honor it. ("corrupt signature data", "unauthorized public key", "invalid signature"): Adjust accordingly. (narinfo, %signed-narinfo): Remove. ("query narinfo with invalid hash"): Use '%narinfo' and 'signature-field' instead of 'narinfo' and '%signature'. ("query narinfo signed with authorized key", "query narinfo signed with unauthorized key", "substitute, invalid hash", "substitute, unauthorized key"): Likewise.
Diffstat (limited to 'gnu/system.scm')
0 files changed, 0 insertions, 0 deletions