Sample code for 30+ languages & platforms
Tcl

Create AuthNRequest with embedded signature (HTTP-POST binding)

See more XML Digital Signatures Examples

Demonstrates how to create a SAML AuthNRequest with embedded signature (HTTP-POST binding).

Chilkat Tcl Downloads

Download Chilkat for Tcl
Tcl 

load ./chilkat.dll

set success 0

# This example requires the Chilkat API to have been previously unlocked.
# See Global Unlock Sample for sample code.

# This example will sign the following SAML AuthNRequest:

# <samlp:AuthnRequest 
#      xmlns:samlp="urn:oasis:names:tc:SAML:2.0:protocol"
#      xmlns:saml="urn:oasis:names:tc:SAML:2.0:assertion"
#      ID="pfx41d8ef22-e612-8c50-9960-1b16f15741b3"
#      Version="2.0" ProviderName="SP test" IssueInstant="2014-07-16T23:52:45Z"
#      Destination="http://idp.example.com/SSOService.php"
#      ProtocolBinding="urn:oasis:names:tc:SAML:2.0:bindings:HTTP-POST"
#      AssertionConsumerServiceURL="http://sp.example.com/demo1/index.php?acs">
#   <saml:Issuer>http://sp.example.com/demo1/metadata.php</saml:Issuer>
#   <samlp:NameIDPolicy Format="urn:oasis:names:tc:SAML:1.1:nameid-format:emailAddress" AllowCreate="true"/>
#   <samlp:RequestedAuthnContext Comparison="exact">
#     <saml:AuthnContextClassRef>urn:oasis:names:tc:SAML:2.0:ac:classes:PasswordProtectedTransport</saml:AuthnContextClassRef>
#   </samlp:RequestedAuthnContext>
# </samlp:AuthnRequest>

# First we build the XML to be signed.
# 
# Use this online tool to generate the code from sample XML: 
# Generate Code to Create XML

set success 1
set xmlToSign [new_CkXml]

CkXml_put_Tag $xmlToSign "samlp:AuthnRequest"
CkXml_AddAttribute $xmlToSign "xmlns:samlp" "urn:oasis:names:tc:SAML:2.0:protocol"
CkXml_AddAttribute $xmlToSign "xmlns:saml" "urn:oasis:names:tc:SAML:2.0:assertion"
CkXml_AddAttribute $xmlToSign "ID" "pfx41d8ef22-e612-8c50-9960-1b16f15741b3"
CkXml_AddAttribute $xmlToSign "Version" "2.0"
CkXml_AddAttribute $xmlToSign "ProviderName" "SP test"
CkXml_AddAttribute $xmlToSign "IssueInstant" "2014-07-16T23:52:45Z"
CkXml_AddAttribute $xmlToSign "Destination" "http://idp.example.com/SSOService.php"
CkXml_AddAttribute $xmlToSign "ProtocolBinding" "urn:oasis:names:tc:SAML:2.0:bindings:HTTP-POST"
CkXml_AddAttribute $xmlToSign "AssertionConsumerServiceURL" "http://sp.example.com/demo1/index.php?acs"
CkXml_UpdateChildContent $xmlToSign "saml:Issuer" "http://sp.example.com/demo1/metadata.php"
CkXml_UpdateAttrAt $xmlToSign "samlp:NameIDPolicy" 1 "Format" "urn:oasis:names:tc:SAML:1.1:nameid-format:emailAddress"
CkXml_UpdateAttrAt $xmlToSign "samlp:NameIDPolicy" 1 "AllowCreate" "true"
CkXml_UpdateAttrAt $xmlToSign "samlp:RequestedAuthnContext" 1 "Comparison" "exact"
CkXml_UpdateChildContent $xmlToSign "samlp:RequestedAuthnContext|saml:AuthnContextClassRef" "urn:oasis:names:tc:SAML:2.0:ac:classes:PasswordProtectedTransport"

# Also see the online tool to generate the code from sample already-signed XML: 
# Generate XML Signature Creation Code from an Already-Signed XML Sample

set gen [new_CkXmlDSigGen]

CkXmlDSigGen_put_SigLocation $gen "samlp:AuthnRequest"
CkXmlDSigGen_put_SigNamespacePrefix $gen "ds"
CkXmlDSigGen_put_SigNamespaceUri $gen "http://www.w3.org/2000/09/xmldsig#"
CkXmlDSigGen_put_SignedInfoCanonAlg $gen "EXCL_C14N"
CkXmlDSigGen_put_SignedInfoDigestMethod $gen "sha1"

# -------- Reference 1 --------
CkXmlDSigGen_AddSameDocRef $gen "pfx41d8ef22-e612-8c50-9960-1b16f15741b3" "sha1" "EXCL_C14N" "" ""

# Provide a certificate + private key. (PFX password is test123)
set cert [new_CkCert]

set success [CkCert_LoadPfxFile $cert "qa_data/pfx/cert_test123.pfx" "test123"]
if {$success != 1} then {
    puts [CkCert_lastErrorText $cert]
    delete_CkXml $xmlToSign
    delete_CkXmlDSigGen $gen
    delete_CkCert $cert
    exit
}

CkXmlDSigGen_SetX509Cert $gen $cert 1

CkXmlDSigGen_put_KeyInfoType $gen "X509Data"
CkXmlDSigGen_put_X509Type $gen "Certificate"

# Load XML to be signed...
set sbXml [new_CkStringBuilder]

CkXml_GetXmlSb $xmlToSign $sbXml

CkXmlDSigGen_put_Behaviors $gen "IndentedSignature,ForceAddEnvelopedSignatureTransform"

# Sign the XML...
set success [CkXmlDSigGen_CreateXmlDSigSb $gen $sbXml]
if {$success != 1} then {
    puts [CkXmlDSigGen_lastErrorText $gen]
    delete_CkXml $xmlToSign
    delete_CkXmlDSigGen $gen
    delete_CkCert $cert
    delete_CkStringBuilder $sbXml
    exit
}

# Save the signed XMl to a file.
set success [CkStringBuilder_WriteFile $sbXml "qa_output/signedXml.xml" "utf-8" 0]

# A sample of the signed XML is shown below..
puts [CkStringBuilder_getAsString $sbXml]

# ----------------------------------------
# Verify the signature we just produced...
set verifier [new_CkXmlDSig]

set success [CkXmlDSig_LoadSignatureSb $verifier $sbXml]
if {$success != 1} then {
    puts [CkXmlDSig_lastErrorText $verifier]
    delete_CkXml $xmlToSign
    delete_CkXmlDSigGen $gen
    delete_CkCert $cert
    delete_CkStringBuilder $sbXml
    delete_CkXmlDSig $verifier
    exit
}

set verified [CkXmlDSig_VerifySignature $verifier 1]
if {$verified != 1} then {
    puts [CkXmlDSig_lastErrorText $verifier]
    delete_CkXml $xmlToSign
    delete_CkXmlDSigGen $gen
    delete_CkCert $cert
    delete_CkStringBuilder $sbXml
    delete_CkXmlDSig $verifier
    exit
}

puts "This signature was successfully verified."

# -----------------------------------------
# Sample output of AuthNRequest signed XML:
# (Line-breaks and some indenting added for readability..)

# <?xml version="1.0" encoding="utf-8"?>
# <samlp:AuthnRequest 
#   xmlns:samlp="urn:oasis:names:tc:SAML:2.0:protocol" 
#   xmlns:saml="urn:oasis:names:tc:SAML:2.0:assertion" 
#   ID="pfx41d8ef22-e612-8c50-9960-1b16f15741b3" 
#   Version="2.0" ProviderName="SP test" 
#   IssueInstant="2014-07-16T23:52:45Z" 
#   Destination="http://idp.example.com/SSOService.php" 
#   ProtocolBinding="urn:oasis:names:tc:SAML:2.0:bindings:HTTP-POST" 
#   AssertionConsumerServiceURL="http://sp.example.com/demo1/index.php?acs">
#     <saml:Issuer>http://sp.example.com/demo1/metadata.php</saml:Issuer>
#     <samlp:NameIDPolicy Format="urn:oasis:names:tc:SAML:1.1:nameid-format:emailAddress" AllowCreate="true"/>
#     <samlp:RequestedAuthnContext Comparison="exact">
#         <saml:AuthnContextClassRef>urn:oasis:names:tc:SAML:2.0:ac:classes:PasswordProtectedTransport</saml:AuthnContextClassRef>
#     </samlp:RequestedAuthnContext>
# 	<ds:Signature xmlns:ds="http://www.w3.org/2000/09/xmldsig#">
# 	  <ds:SignedInfo>
# 	    <ds:CanonicalizationMethod Algorithm="http://www.w3.org/2001/10/xml-exc-c14n#"/>
# 	    <ds:SignatureMethod Algorithm="http://www.w3.org/2000/09/xmldsig#rsa-sha1"/>
# 	    <ds:Reference URI="#pfx41d8ef22-e612-8c50-9960-1b16f15741b3">
# 	      <ds:Transforms>
# 	        <ds:Transform Algorithm="http://www.w3.org/2000/09/xmldsig#enveloped-signature"/>
# 	        <ds:Transform Algorithm="http://www.w3.org/2001/10/xml-exc-c14n#"/>
# 	      </ds:Transforms>
# 	      <ds:DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1"/>
# 	      <ds:DigestValue>5d+/YNShy4qnvZcvik8fHHg2SWQ=</ds:DigestValue>
# 	    </ds:Reference>
# 	  </ds:SignedInfo>
# 	  <ds:SignatureValue>QS16H5...U5LQ==</ds:SignatureValue>
# 	  <ds:KeyInfo>
# 	    <ds:X509Data>
# 	      <ds:X509Certificate>MIIF...tjlF4=</ds:X509Certificate>
# 	    </ds:X509Data>
# 	  </ds:KeyInfo>
# 	</ds:Signature>
# </samlp:AuthnRequest>
# 

delete_CkXml $xmlToSign
delete_CkXmlDSigGen $gen
delete_CkCert $cert
delete_CkStringBuilder $sbXml
delete_CkXmlDSig $verifier