|
Chilkat • HOME • .NET Core C# • Android™ • AutoIt • C • C# • C++ • Chilkat2-Python • CkPython • Classic ASP • DataFlex • Delphi ActiveX • Delphi DLL • Go • Java • Lianja • Mono C# • Node.js • Objective-C • PHP ActiveX • PHP Extension • Perl • PowerBuilder • PowerShell • PureBasic • Ruby • SQL Server • Swift 2 • Swift 3,4,5... • Tcl • Unicode C • Unicode C++ • VB.NET • VBScript • Visual Basic 6.0 • Visual FoxPro • Xojo Plugin
(Tcl) Create AuthNRequest with embedded signature (HTTP-POST binding)Demonstrates how to create a SAML AuthNRequest with embedded signature (HTTP-POST binding).
load ./chilkat.dll # 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 |
||||
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.