diff options
author | Guillaume Le Vaillant <glv@posteo.net> | 2020-09-03 15:12:43 +0200 |
---|---|---|
committer | Guillaume Le Vaillant <glv@posteo.net> | 2020-09-03 15:12:43 +0200 |
commit | 2139d2b8b703181701d2608357fdaf630c7f5711 (patch) | |
tree | 98942214daa64843a0d5fc904b0224e91e3468c4 /src | |
parent | dc46e5fb58f3e5aed2f8e3d37f9e27bba22bff54 (diff) |
Add list-all-key-pair-kinds function
Diffstat (limited to 'src')
-rw-r--r-- | src/package.lisp | 1 | ||||
-rw-r--r-- | src/public-key/public-key.lisp | 6 |
2 files changed, 7 insertions, 0 deletions
diff --git a/src/package.lisp b/src/package.lisp index 70653b6..559d5a4 100644 --- a/src/package.lisp +++ b/src/package.lisp @@ -64,6 +64,7 @@ #:pbkdf2-check-password ;; public-key encryption operations + #:list-all-key-pair-kinds #:make-public-key #:destructure-public-key #:make-private-key #:destructure-private-key #:generate-key-pair diff --git a/src/public-key/public-key.lisp b/src/public-key/public-key.lisp index 0675214..26712a6 100644 --- a/src/public-key/public-key.lisp +++ b/src/public-key/public-key.lisp @@ -3,6 +3,12 @@ (in-package :crypto) + +(defun list-all-key-pair-kinds () + (copy-list '(:curve25519 :curve448 :dsa :ed25519 :ed448 :elgamal + :rsa :secp256k1 :secp256r1 :secp384r1 :secp521r1))) + + ;;; class definitions (defclass discrete-logarithm-group () |