pkcs10
PKCS#10 library
https://github.com/fcomb/pkcs10-hs#readme
| Version on this page: | 0.1.1.0 |
| LTS Haskell 18.28: | 0.2.0.0 |
| Stackage Nightly 2021-06-14: | 0.2.0.0 |
| Latest on Hackage: | 0.2.0.0 |
This version can be pinned in stack with:
pkcs10-0.1.1.0@sha256:a5c4f5ef3c9d105b4937cf262fe21d8887ab326e7084a722ca5d250a85ff4d72,2489Module documentation for 0.1.1.0
- Data
- Data.X509
Depends on 8 packages(full list with versions):
PKCS#10 library
Example
import Crypto.Hash
import Crypto.PubKey.RSA
import Data.X509
import Data.X509.PKCS10
main :: IO ()
main = do
let rsaKeySize = 128
let publicExponent = 3
(pubKey, privKey) <- generate rsaKeySize publicExponent
let subjectAttrs = makeX520Attributes [(X520CommonName, "node.fcomb.io"), (X520OrganizationName, "fcomb")]
let extAttrs = PKCS9Attributes [PKCS9Attribute $ ExtBasicConstraints False Nothing, PKCS9Attribute $ ExtKeyUsage [KeyUsage_digitalSignature,KeyUsage_nonRepudiation,KeyUsage_keyEncipherment]]
Right req <- generateCSR subjectAttrs extAttrs (KeyPairRSA pubKey privKey) SHA512
putStrLn . show . toPEM $ req -- export in PEM format
putStrLn . show $ verify (csrToSigned req) $ PubKeyRSA pubKey -- sign CSR before verifying