pkcs10: PKCS#10 library
Downloads
- pkcs10-0.2.0.0.tar.gz [browse] (Cabal source package)
- Package description (as included in the package)
Maintainer's Corner
For package maintainers and hackage trustees
Candidates
- No Candidates
| Versions [RSS] | 0.1.0.0, 0.1.0.1, 0.1.0.2, 0.1.0.3, 0.1.0.4, 0.1.0.5, 0.1.1.0, 0.2.0.0 |
|---|---|
| Dependencies | asn1-encoding, asn1-parse, asn1-types, base (>=4.3 && <5), bytestring, cryptonite, pem, x509 [details] |
| License | Apache-2.0 |
| Copyright | Timothy Klim <hackage@timothyklim.com> |
| Author | Timothy Klim <hackage@timothyklim.com> |
| Maintainer | Timothy Klim <hackage@timothyklim.com> |
| Category | Data |
| Home page | https://github.com/fcomb/pkcs10-hs#readme |
| Source repo | head: git clone git://github.com/fcomb/pkcs10-hs |
| Uploaded | by ktimothy at 2016-11-02T09:36:02Z |
| Distributions | |
| Reverse Dependencies | 1 direct, 0 indirect [details] |
| Downloads | 6280 total (10 in the last 30 days) |
| Rating | (no votes yet) [estimated by Bayesian average] |
| Your Rating | |
| Status | Docs available [build log] Last success reported on 2016-11-18 [all 1 reports] |
Readme for pkcs10-0.2.0.0
[back to package description]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