Perl

RSA Signature using Private Key from .snk File

See more RSA Examples

A .snk file (Strong Name Key file) is a file format used in the .NET ecosystem to store an RSA public/private key pair. This key pair is typically used for strong-naming assemblies, which is a process of signing .NET assemblies to ensure their integrity and to uniquely identify them.

This example loads a private key from a .snk file and creates an RSA signature.

Perl

use chilkat();

$success = 0;

$rsa = chilkat::CkRsa->new();

# Load the .snk and return the private key as XML.
$xmlStr = $rsa->snkToXml("./test.snk");
if ($rsa->get_LastMethodSuccess() == 0) {
    print $rsa->lastErrorText() . "\r\n";
    exit;
}

$privKey = chilkat::CkPrivateKey->new();
$success = $privKey->LoadXml($xmlStr);
if ($success == 0) {
    print $privKey->lastErrorText() . "\r\n";
    exit;
}

$success = $rsa->UsePrivateKey($privKey);
if ($success == 0) {
    print $rsa->lastErrorText() . "\r\n";
    exit;
}

# Sign the SHA-256 hash of the utf-8 byte representation of the contents of sb
# Return the signature in base64 format.
$rsa->put_EncodingMode("base64");
$rsa->put_Charset("utf-8");
$sigBase64 = $rsa->signStringENC("This is the text to be hashed and signed.","sha256");
if ($rsa->get_LastMethodSuccess() == 0) {
    print $rsa->lastErrorText() . "\r\n";
    exit;
}

print "RSA signature as base64: " . $sigBase64 . "\r\n";