diff options
| author | Attila Lendvai <attila@lendvai.name> | 2021-12-21 22:56:10 +0100 |
|---|---|---|
| committer | Mathieu Othacehe <othacehe@gnu.org> | 2021-12-22 10:53:19 +0100 |
| commit | 9ebc9ca070a21ba0aeb3f61202a8071bb250ccc8 (patch) | |
| tree | f29313e0c83112cf7aceeec893f1ee68135af78b /tests/channels.scm | |
| parent | 5b8ae331f73d970e29566b82c9fe36aa0d77ccb7 (diff) | |
tests: Move keys into ./tests/keys/ and add a third ed25519 key.
The third key will be used in an upcoming commit.
Rename public keys to .pub.
* guix/tests/gnupg.scm (%ed25519-3-public-key-file): New variable.
(%ed25519-3-secret-key-file): New variable.
(%ed25519-2-public-key-file): Renamed from %ed25519bis-public-key-file.
(%ed25519-2-secret-key-file): Renamed from %ed25519bis-secret-key-file.
* tests/keys/ed25519-3.key: New file.
* tests/keys/ed25519-3.sec: New file.
Signed-off-by: Mathieu Othacehe <othacehe@gnu.org>
Diffstat (limited to 'tests/channels.scm')
| -rw-r--r-- | tests/channels.scm | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/tests/channels.scm b/tests/channels.scm index 3e82315b0c7..d45c450241d 100644 --- a/tests/channels.scm +++ b/tests/channels.scm | |||
| @@ -480,8 +480,8 @@ | |||
| 480 | #t | 480 | #t |
| 481 | (with-fresh-gnupg-setup (list %ed25519-public-key-file | 481 | (with-fresh-gnupg-setup (list %ed25519-public-key-file |
| 482 | %ed25519-secret-key-file | 482 | %ed25519-secret-key-file |
| 483 | %ed25519bis-public-key-file | 483 | %ed25519-2-public-key-file |
| 484 | %ed25519bis-secret-key-file) | 484 | %ed25519-2-secret-key-file) |
| 485 | (with-temporary-git-repository directory | 485 | (with-temporary-git-repository directory |
| 486 | `((add ".guix-channel" | 486 | `((add ".guix-channel" |
| 487 | ,(object->string | 487 | ,(object->string |
| @@ -507,7 +507,7 @@ | |||
| 507 | (commit-id-string commit1) | 507 | (commit-id-string commit1) |
| 508 | (openpgp-public-key-fingerprint | 508 | (openpgp-public-key-fingerprint |
| 509 | (read-openpgp-packet | 509 | (read-openpgp-packet |
| 510 | %ed25519bis-public-key-file)))) ;different key | 510 | %ed25519-2-public-key-file)))) ;different key |
| 511 | (channel (channel (name 'example) | 511 | (channel (channel (name 'example) |
| 512 | (url (string-append "file://" directory)) | 512 | (url (string-append "file://" directory)) |
| 513 | (introduction intro)))) | 513 | (introduction intro)))) |
| @@ -519,7 +519,7 @@ | |||
| 519 | (oid->string (commit-id commit1)) | 519 | (oid->string (commit-id commit1)) |
| 520 | (key-fingerprint %ed25519-public-key-file) | 520 | (key-fingerprint %ed25519-public-key-file) |
| 521 | (key-fingerprint | 521 | (key-fingerprint |
| 522 | %ed25519bis-public-key-file)))))) | 522 | %ed25519-2-public-key-file)))))) |
| 523 | (authenticate-channel channel directory | 523 | (authenticate-channel channel directory |
| 524 | (commit-id-string commit2) | 524 | (commit-id-string commit2) |
| 525 | #:keyring-reference-prefix "") | 525 | #:keyring-reference-prefix "") |
| @@ -530,8 +530,8 @@ | |||
| 530 | #t | 530 | #t |
| 531 | (with-fresh-gnupg-setup (list %ed25519-public-key-file | 531 | (with-fresh-gnupg-setup (list %ed25519-public-key-file |
| 532 | %ed25519-secret-key-file | 532 | %ed25519-secret-key-file |
| 533 | %ed25519bis-public-key-file | 533 | %ed25519-2-public-key-file |
| 534 | %ed25519bis-secret-key-file) | 534 | %ed25519-2-secret-key-file) |
| 535 | (with-temporary-git-repository directory | 535 | (with-temporary-git-repository directory |
| 536 | `((add ".guix-channel" | 536 | `((add ".guix-channel" |
| 537 | ,(object->string | 537 | ,(object->string |
| @@ -552,12 +552,12 @@ | |||
| 552 | (signer ,(key-fingerprint %ed25519-public-key-file))) | 552 | (signer ,(key-fingerprint %ed25519-public-key-file))) |
| 553 | (add "c.txt" "C") | 553 | (add "c.txt" "C") |
| 554 | (commit "third commit" | 554 | (commit "third commit" |
| 555 | (signer ,(key-fingerprint %ed25519bis-public-key-file))) | 555 | (signer ,(key-fingerprint %ed25519-2-public-key-file))) |
| 556 | (branch "channel-keyring") | 556 | (branch "channel-keyring") |
| 557 | (checkout "channel-keyring") | 557 | (checkout "channel-keyring") |
| 558 | (add "signer.key" ,(call-with-input-file %ed25519-public-key-file | 558 | (add "signer.key" ,(call-with-input-file %ed25519-public-key-file |
| 559 | get-string-all)) | 559 | get-string-all)) |
| 560 | (add "other.key" ,(call-with-input-file %ed25519bis-public-key-file | 560 | (add "other.key" ,(call-with-input-file %ed25519-2-public-key-file |
| 561 | get-string-all)) | 561 | get-string-all)) |
| 562 | (commit "keyring commit") | 562 | (commit "keyring commit") |
| 563 | (checkout "master")) | 563 | (checkout "master")) |
| @@ -588,7 +588,7 @@ | |||
| 588 | (unauthorized-commit-error-signing-key c)) | 588 | (unauthorized-commit-error-signing-key c)) |
| 589 | (openpgp-public-key-fingerprint | 589 | (openpgp-public-key-fingerprint |
| 590 | (read-openpgp-packet | 590 | (read-openpgp-packet |
| 591 | %ed25519bis-public-key-file)))))) | 591 | %ed25519-2-public-key-file)))))) |
| 592 | (authenticate-channel channel directory | 592 | (authenticate-channel channel directory |
| 593 | (commit-id-string commit3) | 593 | (commit-id-string commit3) |
| 594 | #:keyring-reference-prefix "") | 594 | #:keyring-reference-prefix "") |
