MD5: Difference between revisions

Content deleted Content added
Stefan (talk | contribs)
added OpenEdge solution
Stefan (talk | contribs)
used reference suite
Line 950: Line 950:
The MD5-DIGEST function is readily available, but displaying hexadecimal is not.
The MD5-DIGEST function is readily available, but displaying hexadecimal is not.


<lang progress>DEFINE VARIABLE cc AS CHARACTER INITIAL "The quick brown fox jumps over the lazy dog".
<lang progress>FUNCTION displayHex RETURNS CHARACTER (

FUNCTION displayHex RETURNS CHARACTER (
i_rr AS RAW
i_rr AS RAW
):
):
Line 972: Line 970:
END FUNCTION. /* displayHex */
END FUNCTION. /* displayHex */


MESSAGE
MESSAGE displayHex( MD5-DIGEST( cc ) ) VIEW-AS ALERT-BOX.
1 displayHex( MD5-DIGEST( "" ) ) SKIP
</lang>
2 displayHex( MD5-DIGEST( "a" ) ) SKIP
3 displayHex( MD5-DIGEST( "abc" ) ) SKIP
4 displayHex( MD5-DIGEST( "message digest" ) ) SKIP
5 displayHex( MD5-DIGEST( "abcdefghijklmnopqrstuvwxyz" ) ) SKIP
6 displayHex( MD5-DIGEST( "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789" ) ) SKIP
7 displayHex( MD5-DIGEST( "12345678901234567890123456789012345678901234567890123456789012345678901234567890" ) )
VIEW-AS ALERT-BOX.</lang>


Output:
Output:
Line 980: Line 985:
Message
Message
---------------------------
---------------------------
1 d41d8cd98f00b204e9800998ecf8427e
9e107d9d372bb6826bd81d3542a419d6
2 0cc175b9c0f1b6a831c399e269772661
3 900150983cd24fb0d6963f7d28e17f72
4 f96b697d7cb7938d525a2f31aaf161d0
5 c3fcd3d76192e4007dfb496cca67e13b
6 d174ab98d277d9f5a5611c2c9f419d9f
7 57edf4a22be3c955ac49da2e2107b67a
---------------------------
---------------------------
OK
OK
---------------------------
---------------------------

</pre>
</pre>