(AutoIt) Load RSA Public Key from Hex Modulus and Exponent

Load an RSA public key from a hex modulus and exponent.

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

Local $bSuccess

; Load a 128-byte (1024-bit) modulus + exponent into a Chilkat public key object..
Local $sModulus = "BF5F4AF9A018B5F324A0C10448C0D3248D9BE78967FDC551A27876AC5789ADCBA8245D3D942AE3799563D895DA801E765D225A54FA15DAB2C4731DD817DCF94A9AD62197074C2349442093A206234BF3747F0E88AA6F538355684CC1FB26FCE029C9050A1DAF9F507C2BABF6EFC9FB16320C8036721BE0279FBB76122C41E429"

Local $sExponent = "00000003"

; We'll need to re-encode from hex to base64..
$oBdModulus = ObjCreate("Chilkat.BinData")
$oBdModulus.AppendEncoded($sModulus,"hex")
$oBdExponent = ObjCreate("Chilkat.BinData")
$oBdExponent.AppendEncoded($sExponent,"hex")

$oXml = ObjCreate("Chilkat.Xml")
$oXml.Tag = "RsaKeyValue"
$oXml.NewChild2 "Modulus",$oBdModulus.GetEncoded("base64")
$oXml.NewChild2 "Exponent",$oBdExponent.GetEncoded("base64")

; Now load into the pubkey object..
$oPubkey = ObjCreate("Chilkat.PublicKey")
$bSuccess = $oPubkey.LoadFromString($oXml.GetXml())
If ($bSuccess = False) Then
    ConsoleWrite($oPubkey.LastErrorText & @CRLF)
    Exit
EndIf

ConsoleWrite("Success." & @CRLF)