Beefy Boxes and Bandwidth Generously Provided by pair Networks
No such thing as a small change

Re^2: Add PKCS#7 padding

by burgerc (Novice)
on Dec 17, 2013 at 21:07 UTC ( #1067529=note: print w/replies, xml ) Need Help??

in reply to Re: Add PKCS#7 padding
in thread Add PKCS#7 padding

A .net server is doing the decrypting and it specifies that it must be pkcs#7. I understand there should be no difference, and my program can decrypt my string and the .net string, however .net can not. Probably doesn't mean anything but here are the two encrypted strings.

.net with pkcs#7 - Toi0YpovwX79oXK105RzcH28XjJoxy8Y2q+R1LHyNiw=

perl with pkcs#5 - KBjT88Hk9MBtacub+xT54g==

both of these decrypt to the same string.

If I'm wrong please let me know.

I appreciate your help Chris

Replies are listed 'Best First'.
Re^3: Add PKCS#7 padding
by Anonymous Monk on Dec 18, 2013 at 00:29 UTC
    So... any idea why the .net version is twice as long? Are you sure your perl script decodes them both to the same thing? Have you tried printing the result with MIME::QuotedPrint to see if there are any weird nonprinting characters in there?
      I have fixed the problem. .net (microsoft) considers unicode to be utf16 not utf8. Once I converted my string to utf16 the encryption worked fine.

      Crazy microsoft.

      thanks for all your help in this. I have updated my initial code to show the utf16 encoding so this may help others in the future. I did notice that UTF16 did not work but UTF16le did. Not sure what the difference is.

      I do not know why it is twice as long. They do decrypt to the same string. I will print with MIME::QuotedPrint to see what I get with that. Thanks

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1067529]
[Corion]: A good morning and weekstart to you too, Discipulus!

How do I use this? | Other CB clients
Other Users?
Others romping around the Monastery: (5)
As of 2018-06-25 07:16 GMT
Find Nodes?
    Voting Booth?
    Should cpanminus be part of the standard Perl release?

    Results (126 votes). Check out past polls.