diff options
| author | Sverker Eriksson <[email protected]> | 2011-11-30 12:22:42 +0100 |
|---|---|---|
| committer | Sverker Eriksson <[email protected]> | 2011-11-30 16:13:56 +0100 |
| commit | b6e702835f72372a4222bf3c75f9a066875f9920 (patch) | |
| tree | 5382018e33a3268594aa3e5dec5c474d14eb30c3 /lib/crypto/src/crypto.erl | |
| parent | 6a5dc8fdf6569e14a42d136baa6ab242719edeba (diff) | |
| download | otp-b6e702835f72372a4222bf3c75f9a066875f9920.tar.gz otp-b6e702835f72372a4222bf3c75f9a066875f9920.tar.bz2 otp-b6e702835f72372a4222bf3c75f9a066875f9920.zip | |
crypto: Add sha{256,384,512} to rsa_verify
Diffstat (limited to 'lib/crypto/src/crypto.erl')
| -rw-r--r-- | lib/crypto/src/crypto.erl | 12 |
1 files changed, 9 insertions, 3 deletions
diff --git a/lib/crypto/src/crypto.erl b/lib/crypto/src/crypto.erl index 522cce2086..d7aac27825 100644 --- a/lib/crypto/src/crypto.erl +++ b/lib/crypto/src/crypto.erl @@ -95,7 +95,7 @@ aes_ctr_stream_init, aes_ctr_stream_encrypt, aes_ctr_stream_decrypt, info_lib]). --type rsa_digest_type() :: 'md5' | 'sha'. +-type rsa_digest_type() :: 'md5' | 'sha' | 'sha256' | 'sha384' | 'sha512'. -type dss_digest_type() :: 'none' | 'sha'. -type crypto_integer() :: binary() | integer(). @@ -589,8 +589,14 @@ dss_verify(_Type,_Data,_Signature,_Key) -> ?nif_stub. % Key = [E,N] E=PublicExponent N=PublicModulus rsa_verify(Data,Signature,Key) -> - rsa_verify(sha, Data,Signature,Key). -rsa_verify(_Type,_Data,_Signature,_Key) -> ?nif_stub. + rsa_verify_nif(sha, Data,Signature,Key). +rsa_verify(Type, Data, Signature, Key) -> + case rsa_verify_nif(Type, Data, Signature, Key) of + notsup -> erlang:error(notsup); + Bool -> Bool + end. + +rsa_verify_nif(_Type, _Data, _Signature, _Key) -> ?nif_stub. %% |