|
TroubleshootingGuide
$ perl -d ./infocard.pl enctoken.xml
Loading DB routines from perl5db.pl version 1.28
Editor support available.
Enter h or `h h' for help, or `man perldebug' for more help.
main::(./infocard.pl:7): my $PRIV_KEY_PATH = "/etc/ssl-keys/server.key";
DB<1> n
main::(./infocard.pl:8): my $PUB_KEY_PATH = "/etc/ssl-keys/server.crt";
DB<1>
main::(./infocard.pl:10): if(@ARGV < 1) {
DB<1>
main::(./infocard.pl:15): undef $/;
DB<1>
main::(./infocard.pl:16): open(IN, $ARGV[0]) or die $!;
DB<1>
main::(./infocard.pl:17): my $encToken = <IN>;
DB<1>
main::(./infocard.pl:18): close(IN);
DB<1>
main::(./infocard.pl:19): $/ = "\n";
DB<1>
main::(./infocard.pl:21): print "Encrypted Token\n";
DB<1>
Encrypted Token
main::(./infocard.pl:22): print $encToken;
xmlsec1 --decrypt --privkey-pem /etc/ssl-keys/server.key enctoken.xml > dectoken.xml
xmlsec1 --verify --id-attr:AssertionID urn:oasis:names:tc:SAML:1.0:assertion:Assertion --node-xpath / --enabled-reference-uris same-doc dectoken.xml OK SignedInfo References (ok/all): 1/1 Manifests References (ok/all): 0/0 |
► Sign in to add a comment