adding MonteCarlo tests for Sha-3 candidates
This commit is contained in:
parent
f26c4e0df2
commit
e1cb3a050d
|
@ -70,7 +70,6 @@ void hfal_hash_mem(const hfdesc_t* hash_descriptor, void* dest, const void* msg,
|
||||||
if(f){
|
if(f){
|
||||||
((hf_mem_fpt)f)(dest, msg, length_b);
|
((hf_mem_fpt)f)(dest, msg, length_b);
|
||||||
}else{
|
}else{
|
||||||
|
|
||||||
uint16_t bs,bsb;
|
uint16_t bs,bsb;
|
||||||
uint8_t ctx[pgm_read_word(&(hash_descriptor->ctxsize_B))];
|
uint8_t ctx[pgm_read_word(&(hash_descriptor->ctxsize_B))];
|
||||||
f=(void_fpt)pgm_read_word(&(hash_descriptor->init));
|
f=(void_fpt)pgm_read_word(&(hash_descriptor->init));
|
||||||
|
|
|
@ -291,13 +291,13 @@ sha1_lastBlock_prolog:
|
||||||
/* allocate space on stack */
|
/* allocate space on stack */
|
||||||
in r30, SPL
|
in r30, SPL
|
||||||
in r31, SPH
|
in r31, SPH
|
||||||
in r1, SREG
|
in r0, SREG
|
||||||
subi r30, lo8(64)
|
subi r30, lo8(64)
|
||||||
sbci r31, hi8(64) /* ??? */
|
sbci r31, hi8(64) /* ??? */
|
||||||
cli
|
cli
|
||||||
out SPL, r30
|
out SPL, r30
|
||||||
|
out SREG, r0
|
||||||
out SPH, r31
|
out SPH, r31
|
||||||
out SREG,r1
|
|
||||||
|
|
||||||
adiw r30, 1 /* SP points to next free byte on stack */
|
adiw r30, 1 /* SP points to next free byte on stack */
|
||||||
mov r18, r20 /* r20 = LSB(length) */
|
mov r18, r20 /* r20 = LSB(length) */
|
||||||
|
@ -421,15 +421,14 @@ sha1_lastBlock_insert_length:
|
||||||
sha1_lastBlock_epilog:
|
sha1_lastBlock_epilog:
|
||||||
in r30, SPL
|
in r30, SPL
|
||||||
in r31, SPH
|
in r31, SPH
|
||||||
in r1, SREG
|
in r0, SREG
|
||||||
adiw r30, 63 ; lo8(64)
|
adiw r30, 63 ; lo8(64)
|
||||||
adiw r30, 1 ; hi8(64)
|
adiw r30, 1 ; hi8(64)
|
||||||
cli
|
cli
|
||||||
out SPL, r30
|
out SPL, r30
|
||||||
|
out SREG, r0
|
||||||
out SPH, r31
|
out SPH, r31
|
||||||
out SREG,r1
|
|
||||||
clr r1
|
clr r1
|
||||||
clr r0
|
|
||||||
ret
|
ret
|
||||||
|
|
||||||
/**/
|
/**/
|
||||||
|
@ -488,8 +487,8 @@ sha1_nextBlock:
|
||||||
in r0, SREG
|
in r0, SREG
|
||||||
cli ; we want to be uninterrupted while updating SP
|
cli ; we want to be uninterrupted while updating SP
|
||||||
out SPL, r20
|
out SPL, r20
|
||||||
out SPH, r21
|
|
||||||
out SREG, r0
|
out SREG, r0
|
||||||
|
out SPH, r21
|
||||||
|
|
||||||
push r18
|
push r18
|
||||||
push r19 /* push old SP on new stack */
|
push r19 /* push old SP on new stack */
|
||||||
|
@ -776,8 +775,8 @@ sha1_nextBlock_epilog:
|
||||||
in r0, SREG
|
in r0, SREG
|
||||||
cli ; we want to be uninterrupted while updating SP
|
cli ; we want to be uninterrupted while updating SP
|
||||||
out SPL, r20
|
out SPL, r20
|
||||||
out SPH, r21
|
|
||||||
out SREG, r0
|
out SREG, r0
|
||||||
|
out SPH, r21
|
||||||
|
|
||||||
clr r1
|
clr r1
|
||||||
pop r29
|
pop r29
|
||||||
|
|
|
@ -273,13 +273,13 @@ sha256_lastBlock_prolog:
|
||||||
/* allocate space on stack */
|
/* allocate space on stack */
|
||||||
in r30, SPL
|
in r30, SPL
|
||||||
in r31, SPH
|
in r31, SPH
|
||||||
in r1, SREG
|
in r0, SREG
|
||||||
subi r30, lo8(64)
|
subi r30, lo8(64)
|
||||||
sbci r31, hi8(64)
|
sbci r31, hi8(64)
|
||||||
cli
|
cli
|
||||||
out SPL, r30
|
out SPL, r30
|
||||||
|
out SREG,r0
|
||||||
out SPH, r31
|
out SPH, r31
|
||||||
out SREG,r1
|
|
||||||
|
|
||||||
adiw r30, 1 /* SP points to next free byte on stack */
|
adiw r30, 1 /* SP points to next free byte on stack */
|
||||||
mov r18, r20 /* r20 = LSB(length) */
|
mov r18, r20 /* r20 = LSB(length) */
|
||||||
|
@ -403,15 +403,14 @@ sha256_lastBlock_insert_length:
|
||||||
sha256_lastBlock_epilog:
|
sha256_lastBlock_epilog:
|
||||||
in r30, SPL
|
in r30, SPL
|
||||||
in r31, SPH
|
in r31, SPH
|
||||||
in r1, SREG
|
in r0, SREG
|
||||||
adiw r30, 63 ; lo8(64)
|
adiw r30, 63 ; lo8(64)
|
||||||
adiw r30, 1 ; hi8(64)
|
adiw r30, 1 ; hi8(64)
|
||||||
cli
|
cli
|
||||||
out SPL, r30
|
out SPL, r30
|
||||||
|
out SREG,r0
|
||||||
out SPH, r31
|
out SPH, r31
|
||||||
out SREG,r1
|
|
||||||
clr r1
|
clr r1
|
||||||
clr r0
|
|
||||||
ret
|
ret
|
||||||
|
|
||||||
/**/
|
/**/
|
||||||
|
@ -477,8 +476,8 @@ sha256_nextBlock:
|
||||||
in r0, SREG
|
in r0, SREG
|
||||||
cli ; we want to be uninterrupted while updating SP
|
cli ; we want to be uninterrupted while updating SP
|
||||||
out SPL, r20
|
out SPL, r20
|
||||||
out SPH, r21
|
|
||||||
out SREG, r0
|
out SREG, r0
|
||||||
|
out SPH, r21
|
||||||
push r18
|
push r18
|
||||||
push r19
|
push r19
|
||||||
push r24
|
push r24
|
||||||
|
@ -876,9 +875,8 @@ sha256_nextBlock_epilog:
|
||||||
in r0, SREG
|
in r0, SREG
|
||||||
cli ; we want to be uninterrupted while updating SP
|
cli ; we want to be uninterrupted while updating SP
|
||||||
out SPL, r20
|
out SPL, r20
|
||||||
out SPH, r21
|
|
||||||
out SREG, r0
|
out SREG, r0
|
||||||
|
out SPH, r21
|
||||||
clr r1
|
clr r1
|
||||||
pop r29
|
pop r29
|
||||||
pop r28
|
pop r28
|
||||||
|
@ -972,13 +970,14 @@ bitrotl:
|
||||||
bitrotl_loop:
|
bitrotl_loop:
|
||||||
tst r20
|
tst r20
|
||||||
breq fixrotl
|
breq fixrotl
|
||||||
|
2:
|
||||||
rol r22
|
rol r22
|
||||||
rol r23
|
rol r23
|
||||||
rol r24
|
rol r24
|
||||||
rol r25
|
rol r25
|
||||||
rol r21
|
rol r21
|
||||||
dec r20
|
dec r20
|
||||||
rjmp bitrotl_loop
|
brne 2b
|
||||||
fixrotl:
|
fixrotl:
|
||||||
or r22, r21
|
or r22, r21
|
||||||
ret
|
ret
|
||||||
|
@ -1010,13 +1009,14 @@ bitrotr:
|
||||||
bitrotr_loop:
|
bitrotr_loop:
|
||||||
tst r20
|
tst r20
|
||||||
breq fixrotr
|
breq fixrotr
|
||||||
|
2:
|
||||||
ror r25
|
ror r25
|
||||||
ror r24
|
ror r24
|
||||||
ror r23
|
ror r23
|
||||||
ror r22
|
ror r22
|
||||||
ror r21
|
ror r21
|
||||||
dec r20
|
dec r20
|
||||||
rjmp bitrotr_loop
|
brne 2b
|
||||||
fixrotr:
|
fixrotr:
|
||||||
or r25, r21
|
or r25, r21
|
||||||
ret
|
ret
|
||||||
|
|
|
@ -127,6 +127,7 @@ const char echo_str[] PROGMEM = "echo";
|
||||||
const char shavs_list_str[] PROGMEM = "shavs_list";
|
const char shavs_list_str[] PROGMEM = "shavs_list";
|
||||||
const char shavs_set_str[] PROGMEM = "shavs_set";
|
const char shavs_set_str[] PROGMEM = "shavs_set";
|
||||||
const char shavs_test1_str[] PROGMEM = "shavs_test1";
|
const char shavs_test1_str[] PROGMEM = "shavs_test1";
|
||||||
|
const char shavs_test3_str[] PROGMEM = "shavs_test3";
|
||||||
|
|
||||||
cmdlist_entry_t cmdlist[] PROGMEM = {
|
cmdlist_entry_t cmdlist[] PROGMEM = {
|
||||||
{ nessie_str, NULL, testrun_nessie_blake},
|
{ nessie_str, NULL, testrun_nessie_blake},
|
||||||
|
@ -138,6 +139,7 @@ cmdlist_entry_t cmdlist[] PROGMEM = {
|
||||||
{ shavs_list_str, NULL, shavs_listalgos},
|
{ shavs_list_str, NULL, shavs_listalgos},
|
||||||
{ shavs_set_str, (void*)1, (void_fpt)shavs_setalgo},
|
{ shavs_set_str, (void*)1, (void_fpt)shavs_setalgo},
|
||||||
{ shavs_test1_str, NULL, shavs_test1},
|
{ shavs_test1_str, NULL, shavs_test1},
|
||||||
|
{ shavs_test3_str, NULL, shavs_test3},
|
||||||
{ echo_str, (void*)1, (void_fpt)echo_ctrl},
|
{ echo_str, (void*)1, (void_fpt)echo_ctrl},
|
||||||
{ NULL, NULL, NULL}
|
{ NULL, NULL, NULL}
|
||||||
};
|
};
|
||||||
|
|
|
@ -154,6 +154,7 @@ const char echo_str[] PROGMEM = "echo";
|
||||||
const char shavs_list_str[] PROGMEM = "shavs_list";
|
const char shavs_list_str[] PROGMEM = "shavs_list";
|
||||||
const char shavs_set_str[] PROGMEM = "shavs_set";
|
const char shavs_set_str[] PROGMEM = "shavs_set";
|
||||||
const char shavs_test1_str[] PROGMEM = "shavs_test1";
|
const char shavs_test1_str[] PROGMEM = "shavs_test1";
|
||||||
|
const char shavs_test3_str[] PROGMEM = "shavs_test3";
|
||||||
|
|
||||||
cmdlist_entry_t cmdlist[] PROGMEM = {
|
cmdlist_entry_t cmdlist[] PROGMEM = {
|
||||||
{ nessie_str, NULL, testrun_nessie_bmw},
|
{ nessie_str, NULL, testrun_nessie_bmw},
|
||||||
|
@ -166,6 +167,7 @@ cmdlist_entry_t cmdlist[] PROGMEM = {
|
||||||
{ shavs_list_str, NULL, shavs_listalgos},
|
{ shavs_list_str, NULL, shavs_listalgos},
|
||||||
{ shavs_set_str, (void*)1, (void_fpt)shavs_setalgo},
|
{ shavs_set_str, (void*)1, (void_fpt)shavs_setalgo},
|
||||||
{ shavs_test1_str, NULL, shavs_test1},
|
{ shavs_test1_str, NULL, shavs_test1},
|
||||||
|
{ shavs_test3_str, NULL, shavs_test3},
|
||||||
{ echo_str, (void*)1, (void_fpt)echo_ctrl},
|
{ echo_str, (void*)1, (void_fpt)echo_ctrl},
|
||||||
{ NULL, NULL, NULL}
|
{ NULL, NULL, NULL}
|
||||||
};
|
};
|
||||||
|
|
|
@ -96,6 +96,31 @@ void test_monte(void){
|
||||||
cli_hexdump(hash, 32);
|
cli_hexdump(hash, 32);
|
||||||
}
|
}
|
||||||
|
|
||||||
|
void test_monte2(void){
|
||||||
|
uint8_t data[] = {
|
||||||
|
0x6c, 0xd4, 0xc0, 0xc5, 0xcb, 0x2c, 0xa2, 0xa0,
|
||||||
|
0xf1, 0xd1, 0xae, 0xce, 0xba, 0xc0, 0x3b, 0x52,
|
||||||
|
0xe6, 0x4e, 0xa0, 0x3d, 0x1a, 0x16, 0x54, 0x37,
|
||||||
|
0x29, 0x36, 0x54, 0x5b, 0x92, 0xbb, 0xc5, 0x48,
|
||||||
|
0x4a, 0x59, 0xdb, 0x74, 0xbb, 0x60, 0xf9, 0xc4,
|
||||||
|
0x0c, 0xeb, 0x1a, 0x5a, 0xa3, 0x5a, 0x6f, 0xaf,
|
||||||
|
0xe8, 0x03, 0x49, 0xe1, 0x4c, 0x25, 0x3a, 0x4e,
|
||||||
|
0x8b, 0x1d, 0x77, 0x61, 0x2d, 0xdd, 0x81, 0xac,
|
||||||
|
0xe9, 0x26, 0xae, 0x8b, 0x0a, 0xf6, 0xe5, 0x31,
|
||||||
|
0x76, 0xdb, 0xff, 0xcc, 0x2a, 0x6b, 0x88, 0xc6,
|
||||||
|
0xbd, 0x76, 0x5f, 0x93, 0x9d, 0x3d, 0x17, 0x8a,
|
||||||
|
0x9b, 0xde, 0x9e, 0xf3, 0xaa, 0x13, 0x1c, 0x61,
|
||||||
|
0xe3, 0x1c, 0x1e, 0x42, 0xcd, 0xfa, 0xf4, 0xb4,
|
||||||
|
0xdc, 0xde, 0x57, 0x9a, 0x37, 0xe1, 0x50, 0xef,
|
||||||
|
0xbe, 0xf5, 0x55, 0x5b, 0x4c, 0x1c, 0xb4, 0x04,
|
||||||
|
0x39, 0xd8, 0x35, 0xa7, 0x24, 0xe2, 0xfa, 0xe7 };
|
||||||
|
|
||||||
|
uint8_t hash[SHA256_HASH_BYTES];
|
||||||
|
sha256(hash, data, 1024);
|
||||||
|
cli_putstr_P(PSTR("\r\n hash(data) = "));
|
||||||
|
cli_hexdump(hash, 32);
|
||||||
|
}
|
||||||
|
|
||||||
/*****************************************************************************
|
/*****************************************************************************
|
||||||
* main *
|
* main *
|
||||||
*****************************************************************************/
|
*****************************************************************************/
|
||||||
|
@ -103,24 +128,28 @@ void test_monte(void){
|
||||||
const char nessie_str[] PROGMEM = "nessie";
|
const char nessie_str[] PROGMEM = "nessie";
|
||||||
const char test_str[] PROGMEM = "test";
|
const char test_str[] PROGMEM = "test";
|
||||||
const char monte_str[] PROGMEM = "monte";
|
const char monte_str[] PROGMEM = "monte";
|
||||||
|
const char monte2_str[] PROGMEM = "monte2";
|
||||||
const char performance_str[] PROGMEM = "performance";
|
const char performance_str[] PROGMEM = "performance";
|
||||||
const char echo_str[] PROGMEM = "echo";
|
const char echo_str[] PROGMEM = "echo";
|
||||||
const char shavs_list_str[] PROGMEM = "shavs_list";
|
const char shavs_list_str[] PROGMEM = "shavs_list";
|
||||||
const char shavs_set_str[] PROGMEM = "shavs_set";
|
const char shavs_set_str[] PROGMEM = "shavs_set";
|
||||||
const char shavs_test1_str[] PROGMEM = "shavs_test1";
|
const char shavs_test1_str[] PROGMEM = "shavs_test1";
|
||||||
const char shavs_test2_str[] PROGMEM = "shavs_test2";
|
const char shavs_test2_str[] PROGMEM = "shavs_test2";
|
||||||
|
const char shavs_test3_str[] PROGMEM = "shavs_test3";
|
||||||
const char dump_str[] PROGMEM = "dump";
|
const char dump_str[] PROGMEM = "dump";
|
||||||
|
|
||||||
cmdlist_entry_t cmdlist[] PROGMEM = {
|
cmdlist_entry_t cmdlist[] PROGMEM = {
|
||||||
{ nessie_str, NULL, testrun_nessie_sha256},
|
{ nessie_str, NULL, testrun_nessie_sha256},
|
||||||
{ test_str, NULL, testrun_nessie_sha256},
|
{ test_str, NULL, testrun_nessie_sha256},
|
||||||
{ monte_str, NULL, test_monte},
|
{ monte_str, NULL, test_monte},
|
||||||
|
{ monte2_str, NULL, test_monte2},
|
||||||
{ performance_str, NULL, testrun_performance_sha256},
|
{ performance_str, NULL, testrun_performance_sha256},
|
||||||
{ echo_str, (void*)1, (void_fpt)echo_ctrl},
|
{ echo_str, (void*)1, (void_fpt)echo_ctrl},
|
||||||
{ shavs_list_str, NULL, shavs_listalgos},
|
{ shavs_list_str, NULL, shavs_listalgos},
|
||||||
{ shavs_set_str, (void*)1, (void_fpt)shavs_setalgo},
|
{ shavs_set_str, (void*)1, (void_fpt)shavs_setalgo},
|
||||||
{ shavs_test1_str, NULL, shavs_test1},
|
{ shavs_test1_str, NULL, shavs_test1},
|
||||||
{ shavs_test2_str, NULL, shavs_test2},
|
{ shavs_test2_str, NULL, shavs_test2},
|
||||||
|
{ shavs_test3_str, NULL, shavs_test3},
|
||||||
{ dump_str, (void*)1, (void_fpt)dump},
|
{ dump_str, (void*)1, (void_fpt)dump},
|
||||||
{ NULL, NULL, NULL}
|
{ NULL, NULL, NULL}
|
||||||
};
|
};
|
||||||
|
|
|
@ -18,7 +18,7 @@
|
||||||
*/
|
*/
|
||||||
/*
|
/*
|
||||||
* skein test-suit
|
* skein test-suit
|
||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
|
|
||||||
#include "config.h"
|
#include "config.h"
|
||||||
|
@ -51,7 +51,7 @@ const hfdesc_t* algolist[] PROGMEM = {
|
||||||
(hfdesc_t*)&skein256_256_desc,
|
(hfdesc_t*)&skein256_256_desc,
|
||||||
(hfdesc_t*)&skein256_384_desc,
|
(hfdesc_t*)&skein256_384_desc,
|
||||||
(hfdesc_t*)&skein256_512_desc,
|
(hfdesc_t*)&skein256_512_desc,
|
||||||
|
|
||||||
(hfdesc_t*)&skein512_128_desc,
|
(hfdesc_t*)&skein512_128_desc,
|
||||||
(hfdesc_t*)&skein512_160_desc,
|
(hfdesc_t*)&skein512_160_desc,
|
||||||
(hfdesc_t*)&skein512_224_desc,
|
(hfdesc_t*)&skein512_224_desc,
|
||||||
|
@ -59,7 +59,7 @@ const hfdesc_t* algolist[] PROGMEM = {
|
||||||
(hfdesc_t*)&skein512_384_desc,
|
(hfdesc_t*)&skein512_384_desc,
|
||||||
(hfdesc_t*)&skein512_512_desc,
|
(hfdesc_t*)&skein512_512_desc,
|
||||||
(hfdesc_t*)&skein512_1024_desc,
|
(hfdesc_t*)&skein512_1024_desc,
|
||||||
|
|
||||||
(hfdesc_t*)&skein1024_128_desc,
|
(hfdesc_t*)&skein1024_128_desc,
|
||||||
(hfdesc_t*)&skein1024_160_desc,
|
(hfdesc_t*)&skein1024_160_desc,
|
||||||
(hfdesc_t*)&skein1024_224_desc,
|
(hfdesc_t*)&skein1024_224_desc,
|
||||||
|
@ -77,23 +77,23 @@ void testrun_stdtest_skein256(uint16_t outsize_b){
|
||||||
uint8_t message[64];
|
uint8_t message[64];
|
||||||
uint8_t hash[(outsize_b+7)/8];
|
uint8_t hash[(outsize_b+7)/8];
|
||||||
uint8_t i;
|
uint8_t i;
|
||||||
|
|
||||||
cli_putstr_P(PSTR("\r\n\r\nTest vectors for Skein (256 bits):"));
|
cli_putstr_P(PSTR("\r\n\r\nTest vectors for Skein (256 bits):"));
|
||||||
for(i=0; i<64; ++i)
|
for(i=0; i<64; ++i)
|
||||||
message[i] = 0xFF-i;
|
message[i] = 0xFF-i;
|
||||||
|
|
||||||
cli_putstr_P(PSTR("\r\nmessage: "));
|
cli_putstr_P(PSTR("\r\nmessage: "));
|
||||||
cli_hexdump(message, 1);
|
cli_hexdump(message, 1);
|
||||||
skein256(hash, outsize_b, message, 8);
|
skein256(hash, outsize_b, message, 8);
|
||||||
cli_putstr_P(PSTR("\r\nhash:"));
|
cli_putstr_P(PSTR("\r\nhash:"));
|
||||||
cli_hexdump_block(hash, (outsize_b+7)/8, 4, 16);
|
cli_hexdump_block(hash, (outsize_b+7)/8, 4, 16);
|
||||||
|
|
||||||
cli_putstr_P(PSTR("\r\nmessage:"));
|
cli_putstr_P(PSTR("\r\nmessage:"));
|
||||||
cli_hexdump_block(message, 32, 4, 16);
|
cli_hexdump_block(message, 32, 4, 16);
|
||||||
skein256(hash, outsize_b, message, 32*8);
|
skein256(hash, outsize_b, message, 32*8);
|
||||||
cli_putstr_P(PSTR("\r\nhash:"));
|
cli_putstr_P(PSTR("\r\nhash:"));
|
||||||
cli_hexdump_block(hash, (outsize_b+7)/8, 4, 16);
|
cli_hexdump_block(hash, (outsize_b+7)/8, 4, 16);
|
||||||
|
|
||||||
cli_putstr_P(PSTR("\r\nmessage:"));
|
cli_putstr_P(PSTR("\r\nmessage:"));
|
||||||
cli_hexdump_block(message, 64, 4, 16);
|
cli_hexdump_block(message, 64, 4, 16);
|
||||||
skein256(hash, outsize_b, message, 64*8);
|
skein256(hash, outsize_b, message, 64*8);
|
||||||
|
@ -105,23 +105,23 @@ void testrun_stdtest_skein512(uint16_t outsize_b){
|
||||||
uint8_t message[128];
|
uint8_t message[128];
|
||||||
uint8_t hash[(outsize_b+7)/8];
|
uint8_t hash[(outsize_b+7)/8];
|
||||||
uint8_t i;
|
uint8_t i;
|
||||||
|
|
||||||
cli_putstr_P(PSTR("\r\n\r\nTest vectors for Skein (512 bits):"));
|
cli_putstr_P(PSTR("\r\n\r\nTest vectors for Skein (512 bits):"));
|
||||||
for(i=0; i<128; ++i)
|
for(i=0; i<128; ++i)
|
||||||
message[i] = 0xFF-i;
|
message[i] = 0xFF-i;
|
||||||
|
|
||||||
cli_putstr_P(PSTR("\r\nmessage: "));
|
cli_putstr_P(PSTR("\r\nmessage: "));
|
||||||
cli_hexdump(message, 1);
|
cli_hexdump(message, 1);
|
||||||
skein512(hash, outsize_b, message, 8);
|
skein512(hash, outsize_b, message, 8);
|
||||||
cli_putstr_P(PSTR("\r\nhash:"));
|
cli_putstr_P(PSTR("\r\nhash:"));
|
||||||
cli_hexdump_block(hash, (outsize_b+7)/8, 4, 16);
|
cli_hexdump_block(hash, (outsize_b+7)/8, 4, 16);
|
||||||
|
|
||||||
cli_putstr_P(PSTR("\r\nmessage:"));
|
cli_putstr_P(PSTR("\r\nmessage:"));
|
||||||
cli_hexdump_block(message, 64, 4, 16);
|
cli_hexdump_block(message, 64, 4, 16);
|
||||||
skein512(hash, outsize_b, message, 64*8);
|
skein512(hash, outsize_b, message, 64*8);
|
||||||
cli_putstr_P(PSTR("\r\nhash:"));
|
cli_putstr_P(PSTR("\r\nhash:"));
|
||||||
cli_hexdump_block(hash, (outsize_b+7)/8, 4, 16);
|
cli_hexdump_block(hash, (outsize_b+7)/8, 4, 16);
|
||||||
|
|
||||||
cli_putstr_P(PSTR("\r\nmessage:"));
|
cli_putstr_P(PSTR("\r\nmessage:"));
|
||||||
cli_hexdump_block(message, 128, 4, 16);
|
cli_hexdump_block(message, 128, 4, 16);
|
||||||
skein512(hash, outsize_b, message, 128*8);
|
skein512(hash, outsize_b, message, 128*8);
|
||||||
|
@ -133,23 +133,23 @@ void testrun_stdtest_skein1024(uint16_t outsize_b){
|
||||||
uint8_t message[256];
|
uint8_t message[256];
|
||||||
uint8_t hash[(outsize_b+7)/8];
|
uint8_t hash[(outsize_b+7)/8];
|
||||||
uint16_t i;
|
uint16_t i;
|
||||||
|
|
||||||
cli_putstr_P(PSTR("\r\n\r\nTest vectors for Skein (1024 bits):"));
|
cli_putstr_P(PSTR("\r\n\r\nTest vectors for Skein (1024 bits):"));
|
||||||
for(i=0; i<256; ++i)
|
for(i=0; i<256; ++i)
|
||||||
message[i] = 0xFF-i;
|
message[i] = 0xFF-i;
|
||||||
|
|
||||||
cli_putstr_P(PSTR("\r\nmessage: "));
|
cli_putstr_P(PSTR("\r\nmessage: "));
|
||||||
cli_hexdump(message, 1);
|
cli_hexdump(message, 1);
|
||||||
skein1024(hash, outsize_b, message, 8);
|
skein1024(hash, outsize_b, message, 8);
|
||||||
cli_putstr_P(PSTR("\r\nhash:"));
|
cli_putstr_P(PSTR("\r\nhash:"));
|
||||||
cli_hexdump_block(hash, (outsize_b+7)/8, 4, 16);
|
cli_hexdump_block(hash, (outsize_b+7)/8, 4, 16);
|
||||||
|
|
||||||
cli_putstr_P(PSTR("\r\nmessage:"));
|
cli_putstr_P(PSTR("\r\nmessage:"));
|
||||||
cli_hexdump_block(message, 128, 4, 16);
|
cli_hexdump_block(message, 128, 4, 16);
|
||||||
skein1024(hash, outsize_b, message, 128*8);
|
skein1024(hash, outsize_b, message, 128*8);
|
||||||
cli_putstr_P(PSTR("\r\nhash:"));
|
cli_putstr_P(PSTR("\r\nhash:"));
|
||||||
cli_hexdump_block(hash, (outsize_b+7)/8, 4, 16);
|
cli_hexdump_block(hash, (outsize_b+7)/8, 4, 16);
|
||||||
|
|
||||||
cli_putstr_P(PSTR("\r\nmessage:"));
|
cli_putstr_P(PSTR("\r\nmessage:"));
|
||||||
cli_hexdump_block(message, 256, 4, 16);
|
cli_hexdump_block(message, 256, 4, 16);
|
||||||
skein1024(hash, outsize_b, message, 256*8);
|
skein1024(hash, outsize_b, message, 256*8);
|
||||||
|
@ -166,21 +166,21 @@ void testrun_stdtest_skein(void){
|
||||||
void zeromsg_test_skein(uint16_t outsize_b){
|
void zeromsg_test_skein(uint16_t outsize_b){
|
||||||
char str[8];
|
char str[8];
|
||||||
uint8_t hash[(outsize_b+7)/8];
|
uint8_t hash[(outsize_b+7)/8];
|
||||||
|
|
||||||
skein256(hash, outsize_b, NULL, 0);
|
skein256(hash, outsize_b, NULL, 0);
|
||||||
cli_putstr_P(PSTR("\r\nskein256-"));
|
cli_putstr_P(PSTR("\r\nskein256-"));
|
||||||
utoa(outsize_b, str, 10);
|
utoa(outsize_b, str, 10);
|
||||||
cli_putstr(str);
|
cli_putstr(str);
|
||||||
cli_putstr_P(PSTR(" :"));
|
cli_putstr_P(PSTR(" :"));
|
||||||
cli_hexdump_block(hash, (outsize_b+7)/8, 4, 16);
|
cli_hexdump_block(hash, (outsize_b+7)/8, 4, 16);
|
||||||
|
|
||||||
skein512(hash, outsize_b, NULL, 0);
|
skein512(hash, outsize_b, NULL, 0);
|
||||||
cli_putstr_P(PSTR("\r\nskein512-"));
|
cli_putstr_P(PSTR("\r\nskein512-"));
|
||||||
utoa(outsize_b, str, 10);
|
utoa(outsize_b, str, 10);
|
||||||
cli_putstr(str);
|
cli_putstr(str);
|
||||||
cli_putstr_P(PSTR(" :"));
|
cli_putstr_P(PSTR(" :"));
|
||||||
cli_hexdump_block(hash, (outsize_b+7)/8, 4, 16);
|
cli_hexdump_block(hash, (outsize_b+7)/8, 4, 16);
|
||||||
|
|
||||||
skein1024(hash, outsize_b, NULL, 0);
|
skein1024(hash, outsize_b, NULL, 0);
|
||||||
cli_putstr_P(PSTR("\r\nskein1024-"));
|
cli_putstr_P(PSTR("\r\nskein1024-"));
|
||||||
utoa(outsize_b, str, 10);
|
utoa(outsize_b, str, 10);
|
||||||
|
@ -227,6 +227,8 @@ const char echo_str[] PROGMEM = "echo";
|
||||||
const char shavs_list_str[] PROGMEM = "shavs_list";
|
const char shavs_list_str[] PROGMEM = "shavs_list";
|
||||||
const char shavs_set_str[] PROGMEM = "shavs_set";
|
const char shavs_set_str[] PROGMEM = "shavs_set";
|
||||||
const char shavs_test1_str[] PROGMEM = "shavs_test1";
|
const char shavs_test1_str[] PROGMEM = "shavs_test1";
|
||||||
|
const char shavs_test2_str[] PROGMEM = "shavs_test2";
|
||||||
|
const char shavs_test3_str[] PROGMEM = "shavs_test3";
|
||||||
|
|
||||||
cmdlist_entry_t cmdlist[] PROGMEM = {
|
cmdlist_entry_t cmdlist[] PROGMEM = {
|
||||||
{ nessie_str, NULL, testrun_nessie_skein},
|
{ nessie_str, NULL, testrun_nessie_skein},
|
||||||
|
@ -236,15 +238,17 @@ cmdlist_entry_t cmdlist[] PROGMEM = {
|
||||||
{ shavs_list_str, NULL, shavs_listalgos},
|
{ shavs_list_str, NULL, shavs_listalgos},
|
||||||
{ shavs_set_str, (void*)1, (void_fpt)shavs_setalgo},
|
{ shavs_set_str, (void*)1, (void_fpt)shavs_setalgo},
|
||||||
{ shavs_test1_str, NULL, shavs_test1},
|
{ shavs_test1_str, NULL, shavs_test1},
|
||||||
|
{ shavs_test2_str, NULL, shavs_test2},
|
||||||
|
{ shavs_test3_str, NULL, shavs_test3},
|
||||||
{ echo_str, (void*)1, (void_fpt)echo_ctrl},
|
{ echo_str, (void*)1, (void_fpt)echo_ctrl},
|
||||||
{ NULL, NULL, NULL}
|
{ NULL, NULL, NULL}
|
||||||
};
|
};
|
||||||
|
|
||||||
int main (void){
|
int main (void){
|
||||||
DEBUG_INIT();
|
DEBUG_INIT();
|
||||||
|
|
||||||
cli_rx = (cli_rx_fpt)uart0_getc;
|
cli_rx = (cli_rx_fpt)uart0_getc;
|
||||||
cli_tx = (cli_tx_fpt)uart0_putc;
|
cli_tx = (cli_tx_fpt)uart0_putc;
|
||||||
shavs_algolist=(hfdesc_t**)algolist;
|
shavs_algolist=(hfdesc_t**)algolist;
|
||||||
shavs_algo=(hfdesc_t*)&skein256_256_desc;
|
shavs_algo=(hfdesc_t*)&skein256_256_desc;
|
||||||
for(;;){
|
for(;;){
|
||||||
|
@ -255,7 +259,7 @@ int main (void){
|
||||||
cli_putstr_P(PSTR(" "));
|
cli_putstr_P(PSTR(" "));
|
||||||
cli_putstr(__TIME__);
|
cli_putstr(__TIME__);
|
||||||
cli_putstr_P(PSTR(")\r\nloaded and running\r\n"));
|
cli_putstr_P(PSTR(")\r\nloaded and running\r\n"));
|
||||||
|
|
||||||
cmd_interface(cmdlist);
|
cmd_interface(cmdlist);
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
|
@ -325,7 +325,7 @@ void shavs_test1(void){ /* KAT tests */
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
void shavs_test2(void){ /* MonteCarlo - tests */
|
void shavs_test2(void){ /* Monte Carlo tests for SHA-1 & SHA-2 */
|
||||||
uint16_t expected_input;
|
uint16_t expected_input;
|
||||||
uint16_t count;
|
uint16_t count;
|
||||||
uint8_t v;
|
uint8_t v;
|
||||||
|
@ -364,8 +364,6 @@ void shavs_test2(void){ /* MonteCarlo - tests */
|
||||||
return;
|
return;
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
cli_putstr_P(PSTR("\r\n reading seed ml=0x"));
|
|
||||||
cli_hexdump_rev(&ml, 1);
|
|
||||||
expected_input = ml*2;
|
expected_input = ml*2;
|
||||||
memset(m+2*ml, 0, ml);
|
memset(m+2*ml, 0, ml);
|
||||||
do{
|
do{
|
||||||
|
@ -402,7 +400,7 @@ void shavs_test2(void){ /* MonteCarlo - tests */
|
||||||
memmove(m, m+ml, 3*ml);
|
memmove(m, m+ml, 3*ml);
|
||||||
}
|
}
|
||||||
cli_putstr_P(PSTR("\r\n\r\nCOUNT = "));
|
cli_putstr_P(PSTR("\r\n\r\nCOUNT = "));
|
||||||
if(count>10){
|
if(count>=10){
|
||||||
cli_putc(count/10+'0');
|
cli_putc(count/10+'0');
|
||||||
}
|
}
|
||||||
cli_putc(count%10+'0');
|
cli_putc(count%10+'0');
|
||||||
|
@ -411,3 +409,87 @@ void shavs_test2(void){ /* MonteCarlo - tests */
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
void shavs_test3(void){ /* Monte Carlo tests for SHA-3 */
|
||||||
|
uint16_t expected_input;
|
||||||
|
uint16_t count;
|
||||||
|
uint8_t v;
|
||||||
|
uint8_t index=0;
|
||||||
|
char c;
|
||||||
|
if(!shavs_algo){
|
||||||
|
cli_putstr_P(PSTR("\r\nERROR: select algorithm first!"));
|
||||||
|
return;
|
||||||
|
}
|
||||||
|
uint8_t ml=pgm_read_word(&(shavs_algo->hashsize_b))/8;
|
||||||
|
uint8_t m[ml+128];
|
||||||
|
for(;;){
|
||||||
|
while((c=cli_getc_cecho())!='S' && c!='s'){
|
||||||
|
if(!isblank(c)){
|
||||||
|
cli_putstr_P(PSTR("\r\nERROR: wrong input (1) [0x"));
|
||||||
|
cli_hexdump(&c, 1);
|
||||||
|
cli_putstr_P(PSTR("]!\r\n"));
|
||||||
|
return;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
if((c=cli_getc_cecho())!='e' && c!='e'){
|
||||||
|
cli_putstr_P(PSTR("\r\nERROR: wrong input (2)!\r\n"));
|
||||||
|
return;
|
||||||
|
}
|
||||||
|
if((c=cli_getc_cecho())!='e' && c!='e'){
|
||||||
|
cli_putstr_P(PSTR("\r\nERROR: wrong input (3)!\r\n"));
|
||||||
|
return;
|
||||||
|
}
|
||||||
|
if((c=cli_getc_cecho())!='d' && c!='D'){
|
||||||
|
cli_putstr_P(PSTR("\r\nERROR: wrong input (4)!\r\n"));
|
||||||
|
return;
|
||||||
|
}
|
||||||
|
while((c=cli_getc_cecho())!='='){
|
||||||
|
if(!isblank(c)){
|
||||||
|
cli_putstr_P(PSTR("\r\nERROR: wrong input (5)!\r\n"));
|
||||||
|
return;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
expected_input = 1024/4;
|
||||||
|
memset(m+ml, 0, 1024/8);
|
||||||
|
do{
|
||||||
|
v=0xff;
|
||||||
|
c=cli_getc_cecho();
|
||||||
|
if(c>='0' && c<='9'){
|
||||||
|
v = c - '0';
|
||||||
|
}else{
|
||||||
|
c |= 'A'^'a';
|
||||||
|
if(c>='a' && c<='f'){
|
||||||
|
v = c - 'a' +10;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
if(v<0x10){
|
||||||
|
c=m[ml+index/2];
|
||||||
|
if(index&1){
|
||||||
|
c |= v;
|
||||||
|
}else{
|
||||||
|
c |=v<<4;
|
||||||
|
}
|
||||||
|
m[ml+index/2]=c;
|
||||||
|
index++;
|
||||||
|
expected_input--;
|
||||||
|
}
|
||||||
|
}while(expected_input);
|
||||||
|
/* so we have the seed */
|
||||||
|
cli_putstr_P(PSTR("\r\nstarting processing"));
|
||||||
|
uint16_t j;
|
||||||
|
for(count=0; count<100; ++count){
|
||||||
|
for(j=0; j<1000; ++j){
|
||||||
|
hfal_hash_mem(shavs_algo, m, m+ml, 1024);
|
||||||
|
memmove(m+ml, m, 1024/8);
|
||||||
|
}
|
||||||
|
cli_putstr_P(PSTR("\r\n\r\nj = "));
|
||||||
|
if(count>=10){
|
||||||
|
cli_putc(count/10+'0');
|
||||||
|
}
|
||||||
|
cli_putc(count%10+'0');
|
||||||
|
cli_putstr_P(PSTR("\r\nMD = "));
|
||||||
|
cli_hexdump(m+ml, ml);
|
||||||
|
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
|
@ -37,6 +37,7 @@ void shavs_listalgos(void);
|
||||||
void shavs_setalgo(char* param);
|
void shavs_setalgo(char* param);
|
||||||
void shavs_test1(void);
|
void shavs_test1(void);
|
||||||
void shavs_test2(void);
|
void shavs_test2(void);
|
||||||
|
void shavs_test3(void);
|
||||||
|
|
||||||
|
|
||||||
#endif /* SHAVS */
|
#endif /* SHAVS */
|
||||||
|
|
|
@ -0,0 +1,22 @@
|
||||||
|
|
||||||
|
[Skein-256-224]
|
||||||
|
algo=a
|
||||||
|
file_0=testvectors/shavs/Skein/ShortMsgKAT_224.txt
|
||||||
|
file_1=testvectors/shavs/Skein/LongMsgKAT_224.txt
|
||||||
|
|
||||||
|
[Skein-256-256]
|
||||||
|
algo=b
|
||||||
|
file_0=testvectors/shavs/Skein/ShortMsgKAT_256.txt
|
||||||
|
file_1=testvectors/shavs/Skein/LongMsgKAT_256.txt
|
||||||
|
|
||||||
|
[Skein-512-384]
|
||||||
|
algo=c
|
||||||
|
file_0=testvectors/shavs/Skein/ShortMsgKAT_384.txt
|
||||||
|
file_1=testvectors/shavs/Skein/LongMsgKAT_384.txt
|
||||||
|
|
||||||
|
[Skein-512-512]
|
||||||
|
algo=d
|
||||||
|
file_0=testvectors/shavs/Blake/ShortMsgKAT_512.txt
|
||||||
|
file_1=testvectors/shavs/Blake/LongMsgKAT_512.txt
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue