我确实需要实现 Openssl 与 RSACryptoServiceProvider 的互操作性,这样我才能实现软件许可证密钥系统 (Ref)。
我需要能够在 Linux 中使用 openssl 创建私钥和公钥,以便以后可以将它们用于 PHP Web 应用程序中的许可证管理。但是,也可以将它们用作 VB.Net 应用程序中 RSA 签名许可系统的基础。
经过一周的搜索,我最终发现这是完全可能的,所以我想我会分享它。
在 Linux(或任何其他有用的操作系统)上启动并使用 openssl 创建私钥 (private.pem)、公钥 (public.pem)、证书 (certificate.crt) 和个人信息交换文件 (证书.pfx)。不用担心 CN 和 emailAddress 字段,证书和 pfx 文件仅用作将公钥或私钥获取到 RSACryptoServiceProvider 对象的工具。
openssl genrsa -out private.pem 1024
openssl rsa -in private.pem -out public.pem -pubout
openssl req -nodes -x509 -days 3650 -subj '/CN=www.example.com/emailAddress=info@example.com' -new -key private.pem -out certificate.crt
openssl pkcs12 -export -out certificate.pfx -inkey private.pem -in certificate.crt
现在将私钥获取到代码中:
Dim cert As New X509Certificate2("certificate.pfx", "", X509KeyStorageFlags.Exportable)
Dim rsaProvider As RSACryptoServiceProvider = DirectCast(cert.PrivateKey, RSACryptoServiceProvider)
如果你需要私钥或公钥,试试这个:
msgbox(rsaProvider.ToXmlString(True)) 'Private key in XML format
msgbox(rsaProvider.ToXmlString(False)) 'Public key in XML format
要将公钥放入代码中:
Dim cert As New X509Certificate2("certificate.crt")
Dim rsaProvider As RSACryptoServiceProvider = DirectCast(cert.PublicKey.Key, RSACryptoServiceProvider)
如果你需要公钥试试这个:
msgbox(rsaProvider.ToXmlString(False)) 'Public key in XML format
还有更多......