Encrypted datastore #9

New Issue

MasseR · 2018-08-14T22:34:15+03:00

MasseR commented

2018-08-14 22:34:15 +03:00

Reading public keys:

Right [Right (Right (PubKeyRSA pubkey, _))] <- fmap (fmap (fmap fromASN1 . decodeASN1' DER . pemContent)) . pemParseBS <$> B.readFile "pub_key.pem"

Reading private keys:

[PrivKeyRSA privkey] <- readKeyFile "priv_key.pem"

**Reading public keys:** ~~~.Haskell Right [Right (Right (PubKeyRSA pubkey, _))] <- fmap (fmap (fmap fromASN1 . decodeASN1' DER . pemContent)) . pemParseBS <$> B.readFile "pub_key.pem" ~~~ **Reading private keys:** ~~~.Haskell [PrivKeyRSA privkey] <- readKeyFile "priv_key.pem" ~~~

Sign in to join this conversation.