SHA-256: Difference between revisions

Content added Content deleted
No edit summary
(Contribution in BaCon)
Line 61: Line 61:
<pre>String: Rosetta code
<pre>String: Rosetta code
SHA-256: 764FAF5C61AC315F1497F9DFA542713965B785E5CC2F707D6468D7D1124CDFCF</pre>
SHA-256: 764FAF5C61AC315F1497F9DFA542713965B785E5CC2F707D6468D7D1124CDFCF</pre>

=={{header|BaCon}}==
<lang qbasic>PRAGMA INCLUDE <openssl/sha.h>
PRAGMA LDFLAGS -lcrypto

OPTION MEMTYPE unsigned char

DECLARE out TYPE unsigned char*

out = SHA256("Rosetta code", 12, 0)

FOR i = 0 TO SHA256_DIGEST_LENGTH-1
PRINT PEEK(out+i) FORMAT "%02x"
NEXT

PRINT</lang>
{{out}}
<pre>
user@host $ bacon sha256
Converting 'sha256.bac'... done, 14 lines were processed in 0.002 seconds.
Compiling 'sha256.bac'... cc -c sha256.bac.c
cc -o sha256 sha256.bac.o -lbacon -lm -lcrypto
Done, program 'sha256' ready.
user@host $ ./sha256
764faf5c61ac315f1497f9dfa542713965b785e5cc2f707d6468d7d1124cdfcf
</pre>


=={{header|BBC BASIC}}==
=={{header|BBC BASIC}}==