tame1 has asked for the wisdom of the Perl Monks concerning the following question:
Below is what the company security web page tells me about my own cookie. However, I cannot get their "cyphertext" to decode to something which can be parsed into what they have in the table.
Note that they don't show a few fields near the end, and I know for a fact that the last field is an MD5 hash of an RSA key, so it won't be readable. But the rest . . . how am I supposed to parse the result of decode_base64? It's garbage!
Please help!!!
| Your WSL certificate/cookie in plain text is: | |
| issue date | Fri Mar 16 19:27:12 2001 |
| exp. date | Sat Mar 17 05:27:12 2001 |
| issuer | issuer here |
| cdsid | JROBISO2 |
| ip addr. | 19.82.24.80 |
| aci group | NONOVVM |
| dept no. | 1239D709 |
| org. code | ENG |
| employee type | V |
| mr role | N |
| organization | organization here |
| company | company here |
| div. abbr. | VP |
| Your WSL cookie in ciphertext: OrJpEDqy9bBwcm9mc3B3MkB3ZWJmYXJtLmRlYXJib3JuLmZvcmQuY29tAGpyb2Jpc28yADE5LjgyLjI0LjgwAE5PTk9WVk0AMTIzOUQ3MDkARU5HAFYATgBWSVNURU9OAFZJU1RFT04uQ09SUE9SQVRJT04AVlAANTIwNQBERUFSQk9STgBNSQBVU0EATlVMTC5jZW50b2tzAACKnsXgqAYrukdta7sDd65KLWOchc53KcNMRqeTYX4rLmr/XID4lE2I2cNyIjZApSG9D0JWR1jUzoo3t53alPsL |
#!/usr/local/bin/perl -w # # this is an attempt to make a cleaner read of the Ford-WSL cookie use strict; use CGI qw/:standard/; use CGI::Carp qw(fatalsToBrowser); use MIME::Base64; use CGI::Cookie; my $query = new CGI; my %cookies = fetch CGI::Cookie; my $cookie = $cookies{'Cookie-Name'}->value; print $query->header; print $query->start_html; print "<h1>Cookie</h1><br>\n"; print "Straight cookie: $cookie\n<br><br>\n"; my $decoded = decode_base64($cookie); #write_file($decoded); print "and Base64 decoded: $decoded <br><br>\n"; print $query->end_html;
Edit: chipmunk 2001-03-16
Edit: chipmunk 2001-03-16
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: Base64 Encoded cookie is giving me headaches!
by chipmunk (Parson) on Mar 17, 2001 at 01:02 UTC | |
by tame1 (Pilgrim) on Mar 17, 2001 at 01:40 UTC | |
by chipmunk (Parson) on Mar 17, 2001 at 02:19 UTC |