(AutoIt) Create AuthNRequest with embedded signature (HTTP-POST binding)

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

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

; 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

Local $bSuccess = True
$oXmlToSign = ObjCreate("Chilkat.Xml")
$oXmlToSign.Tag = "samlp:AuthnRequest"
$oXmlToSign.AddAttribute("xmlns:samlp","urn:oasis:names:tc:SAML:2.0:protocol")
$oXmlToSign.AddAttribute("xmlns:saml","urn:oasis:names:tc:SAML:2.0:assertion")
$oXmlToSign.AddAttribute("ID","pfx41d8ef22-e612-8c50-9960-1b16f15741b3")
$oXmlToSign.AddAttribute("Version","2.0")
$oXmlToSign.AddAttribute("ProviderName","SP test")
$oXmlToSign.AddAttribute("IssueInstant","2014-07-16T23:52:45Z")
$oXmlToSign.AddAttribute("Destination","http://idp.example.com/SSOService.php")
$oXmlToSign.AddAttribute("ProtocolBinding","urn:oasis:names:tc:SAML:2.0:bindings:HTTP-POST")
$oXmlToSign.AddAttribute("AssertionConsumerServiceURL","http://sp.example.com/demo1/index.php?acs")
$oXmlToSign.UpdateChildContent "saml:Issuer","http://sp.example.com/demo1/metadata.php"
$oXmlToSign.UpdateAttrAt("samlp:NameIDPolicy",True,"Format","urn:oasis:names:tc:SAML:1.1:nameid-format:emailAddress")
$oXmlToSign.UpdateAttrAt("samlp:NameIDPolicy",True,"AllowCreate","true")
$oXmlToSign.UpdateAttrAt("samlp:RequestedAuthnContext",True,"Comparison","exact")
$oXmlToSign.UpdateChildContent "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

$oGen = ObjCreate("Chilkat.XmlDSigGen")

$oGen.SigLocation = "samlp:AuthnRequest"
$oGen.SigNamespacePrefix = "ds"
$oGen.SigNamespaceUri = "http://www.w3.org/2000/09/xmldsig#"
$oGen.SignedInfoCanonAlg = "EXCL_C14N"
$oGen.SignedInfoDigestMethod = "sha1"

; -------- Reference 1 --------
$oGen.AddSameDocRef("pfx41d8ef22-e612-8c50-9960-1b16f15741b3","sha1","EXCL_C14N","","")

; Provide a certificate + private key. (PFX password is test123)
$oCert = ObjCreate("Chilkat.Cert")
$bSuccess = $oCert.LoadPfxFile("qa_data/pfx/cert_test123.pfx","test123")
If ($bSuccess <> True) Then
    ConsoleWrite($oCert.LastErrorText & @CRLF)
    Exit
EndIf

$oGen.SetX509Cert($oCert,True)

$oGen.KeyInfoType = "X509Data"
$oGen.X509Type = "Certificate"

; Load XML to be signed...
$oSbXml = ObjCreate("Chilkat.StringBuilder")
$oXmlToSign.GetXmlSb($oSbXml)

$oGen.Behaviors = "IndentedSignature,ForceAddEnvelopedSignatureTransform"

; Sign the XML...
$bSuccess = $oGen.CreateXmlDSigSb($oSbXml)
If ($bSuccess <> True) Then
    ConsoleWrite($oGen.LastErrorText & @CRLF)
    Exit
EndIf

; Save the signed XMl to a file.
$bSuccess = $oSbXml.WriteFile("qa_output/signedXml.xml","utf-8",False)

; A sample of the signed XML is shown below..
ConsoleWrite($oSbXml.GetAsString() & @CRLF)

; ----------------------------------------
; Verify the signature we just produced...
$oVerifier = ObjCreate("Chilkat.XmlDSig")
$bSuccess = $oVerifier.LoadSignatureSb($oSbXml)
If ($bSuccess <> True) Then
    ConsoleWrite($oVerifier.LastErrorText & @CRLF)
    Exit
EndIf

Local $bVerified = $oVerifier.VerifySignature(True)
If ($bVerified <> True) Then
    ConsoleWrite($oVerifier.LastErrorText & @CRLF)
    Exit
EndIf

ConsoleWrite("This signature was successfully verified." & @CRLF)

; -----------------------------------------
; 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>
;