binary X509 encoding for RSA key send during transport handshake (#105)

This commit is contained in:
Evgeny Poberezkin
2021-04-24 12:46:57 +01:00
committed by GitHub
parent 3187bc8140
commit cddff78719
6 changed files with 89 additions and 35 deletions
+2 -2
View File
@@ -31,10 +31,10 @@ testPort :: ServiceName
testPort = "5000"
teshKeyHashStr :: B.ByteString
teshKeyHashStr = "p1xa/XuzchgqomEL6RX+Me+fX096w50V7nJPAA0wpDE="
teshKeyHashStr = "KXNE1m2E1m0lm92WGKet9CL6+lO742Vy5G6nsrkvgs8="
teshKeyHash :: Maybe C.KeyHash
teshKeyHash = Just "p1xa/XuzchgqomEL6RX+Me+fX096w50V7nJPAA0wpDE="
teshKeyHash = Just "KXNE1m2E1m0lm92WGKet9CL6+lO742Vy5G6nsrkvgs8="
testSMPClient :: MonadUnliftIO m => (THandle -> m a) -> m a
testSMPClient client =