X-Git-Url: https://git.cryptolib.org/?a=blobdiff_plain;f=test_src%2Fmain-bigint-test.c;h=41dd45b2463ea84213d9e7ea924a40083515a5bc;hb=b3cf9d2f35e428cae278fffb8a8f5820d40c833b;hp=8fef0fbc9236ba3ee180656b0b5f99c2f6b95c2c;hpb=701cee0d98aab48dd3192c8cc7c77eb42581bc56;p=avr-crypto-lib.git diff --git a/test_src/main-bigint-test.c b/test_src/main-bigint-test.c index 8fef0fb..41dd45b 100644 --- a/test_src/main-bigint-test.c +++ b/test_src/main-bigint-test.c @@ -21,24 +21,16 @@ * */ -#include "config.h" - -#include "uart_i.h" -#include "debug.h" +#include "main-test-common.h" #include "noekeon.h" #include "noekeon_prng.h" #include "bigint.h" #include "bigint_io.h" -#include "cli.h" #include "performance_test.h" -#include -#include -#include - -char* algo_name = "BigInt"; +char *algo_name = "BigInt"; /***************************************************************************** * additional validation-functions * @@ -80,7 +72,7 @@ void test_add_bigint(void){ bigint_print_hex(&b); cli_putstr_P(PSTR(" = ")); uint8_t *c_b; - c_b = malloc(((a.length_B>b.length_B)?a.length_B:b.length_B)+2); + c_b = malloc(((a.length_W>b.length_W)?a.length_W:b.length_W)+2); if(c_b==NULL){ cli_putstr_P(PSTR("\n\rERROR: Out of memory!")); free(a.wordv); @@ -126,7 +118,7 @@ void test_add_scale_bigint(void){ } */ uint8_t *c_b; - c_b = malloc(((a.length_B>(b.length_B+scale))?a.length_B:(b.length_B+scale))+2); + c_b = malloc(((a.length_W>(b.length_W+scale))?a.length_W:(b.length_W+scale))+2); if(c_b==NULL){ cli_putstr_P(PSTR("\n\rERROR: Out of memory!")); free(a.wordv); @@ -172,7 +164,7 @@ void test_mul_bigint(void){ bigint_print_hex(&b); cli_putstr_P(PSTR(" = ")); uint8_t *c_b; - c_b = malloc((((a.length_B>b.length_B)?a.length_B:b.length_B)+1)*2); + c_b = malloc((((a.length_W>b.length_W)?a.length_W:b.length_W)+1)*2); if(c_b==NULL){ cli_putstr_P(PSTR("\n\rERROR: Out of memory!")); free(a.wordv); @@ -189,6 +181,99 @@ void test_mul_bigint(void){ } } +void test_mul_mont_bigint(void){ + bigint_t a, b, c, a_, b_, m_, res; + bigint_length_t s; + cli_putstr_P(PSTR("\r\nmul-mont test ( (a * b) % c )\r\n")); + for(;;){ + cli_putstr_P(PSTR("\r\nenter a:")); + if(bigint_read_hex_echo(&a)){ + cli_putstr_P(PSTR("\r\n end mul test")); + return; + } + cli_putstr_P(PSTR("\r\nenter b:")); + if(bigint_read_hex_echo(&b)){ + free(a.wordv); + cli_putstr_P(PSTR("\r\n end mul test")); + return; + } + cli_putstr_P(PSTR("\r\nenter c:")); + if(bigint_read_hex_echo(&c)){ + free(a.wordv); + free(b.wordv); + cli_putstr_P(PSTR("\r\n end mul test")); + return; + } + s = c.length_W; + cli_putstr_P(PSTR("\r\n (")); + bigint_print_hex(&a); + cli_putstr_P(PSTR(" * ")); + bigint_print_hex(&b); + cli_putstr_P(PSTR(") % ")); + bigint_print_hex(&c); + cli_putstr_P(PSTR(" = ")); + bigint_word_t res_w[s], a_w_[s], b_w_[s], m_w_[s + 1]; + res.wordv = res_w; + a_.wordv = a_w_; + b_.wordv = b_w_; + m_.wordv = m_w_; + bigint_mont_gen_m_(&m_, &c); + bigint_mont_trans(&a_, &a, &c); + bigint_mont_trans(&b_, &b, &c); + bigint_mont_mul(&res, &a_, &b_, &c, &m_); + bigint_mont_red(&res, &res, &c, &m_); + bigint_print_hex(&res); + putchar('\n'); + free(a.wordv); + free(b.wordv); + free(c.wordv); + } +} + +void test_mul_word_bigint(void){ + bigint_t a, b; + bigint_word_t *t; + cli_putstr_P(PSTR("\r\nmul test\r\n")); + for(;;){ + cli_putstr_P(PSTR("\r\nenter a:")); + if(bigint_read_hex_echo(&a)){ + cli_putstr_P(PSTR("\r\n end mul test")); + return; + } + cli_putstr_P(PSTR("\r\nenter b:")); + if(bigint_read_hex_echo(&b)){ + free(a.wordv); + cli_putstr_P(PSTR("\r\n end mul test")); + return; + } + cli_putstr_P(PSTR("\r\n ")); + bigint_print_hex(&a); + cli_putstr_P(PSTR(" * ")); + bigint_print_hex(&b); + cli_putstr_P(PSTR(" = ")); + + if(b.length_W > 1){ + free(a.wordv); + free(b.wordv); + cli_putstr_P(PSTR("\r\n end mul test")); + } + + t = realloc(a.wordv, a.length_W + 3); + if(t == NULL){ + cli_putstr_P(PSTR("\n\rERROR: Out of memory!")); + free(a.wordv); + free(b.wordv); + continue; + } + a.wordv = t; + bigint_mul_word_u(&a, b.wordv[0]); + bigint_print_hex(&a); + cli_putstr_P(PSTR("\r\n")); + free(a.wordv); + free(b.wordv); + } +} + void test_square_bigint(void){ bigint_t a, c; cli_putstr_P(PSTR("\r\nsquare test\r\n")); @@ -202,7 +287,7 @@ void test_square_bigint(void){ bigint_print_hex(&a); cli_putstr_P(PSTR("**2 = ")); uint8_t *c_b; - c_b = malloc(a.length_B*2); + c_b = malloc(a.length_W*2); if(c_b==NULL){ cli_putstr_P(PSTR("\n\rERROR: Out of memory!")); free(a.wordv); @@ -248,7 +333,7 @@ void test_reduce_bigint(void){ void test_expmod_bigint(void){ bigint_t a, b, c, d; uint8_t *d_b; - cli_putstr_P(PSTR("\r\nreduce test\r\n")); + cli_putstr_P(PSTR("\r\nexpnonentiation-modulo test\r\n")); for(;;){ cli_putstr_P(PSTR("\r\nenter a:")); if(bigint_read_hex_echo(&a)){ @@ -268,7 +353,7 @@ void test_expmod_bigint(void){ cli_putstr_P(PSTR("\r\n end expmod test")); return; } - d_b = malloc(c.length_B); + d_b = malloc(c.length_W); if(d_b==NULL){ cli_putstr_P(PSTR("\n\rERROR: Out of memory!")); free(a.wordv); @@ -295,6 +380,57 @@ void test_expmod_bigint(void){ } } +/* d = a**b % c */ +void test_expmod_mont_bigint(void){ + bigint_t a, b, c, d; + uint8_t *d_b; + cli_putstr_P(PSTR("\r\nexpnonentiation-modulo-montgomory test\r\n")); + for(;;){ + cli_putstr_P(PSTR("\r\nenter a:")); + if(bigint_read_hex_echo(&a)){ + cli_putstr_P(PSTR("\r\n end expmod test")); + return; + } + cli_putstr_P(PSTR("\r\nenter b:")); + if(bigint_read_hex_echo(&b)){ + free(a.wordv); + cli_putstr_P(PSTR("\r\n end expmod test")); + return; + } + cli_putstr_P(PSTR("\r\nenter c:")); + if(bigint_read_hex_echo(&c)){ + free(a.wordv); + free(b.wordv); + cli_putstr_P(PSTR("\r\n end expmod test")); + return; + } + d_b = malloc(c.length_W); + if(d_b==NULL){ + cli_putstr_P(PSTR("\n\rERROR: Out of memory!")); + free(a.wordv); + free(b.wordv); + free(c.wordv); + continue; + } + d.wordv = d_b; + cli_putstr_P(PSTR("\r\n ")); + bigint_print_hex(&a); + cli_putstr_P(PSTR("**")); + bigint_print_hex(&b); + cli_putstr_P(PSTR(" % ")); + bigint_print_hex(&c); + cli_putstr_P(PSTR(" = ")); + bigint_expmod_u_mont_sam(&d, &a, &b, &c); + bigint_print_hex(&d); + cli_putstr_P(PSTR("\r\n")); + free(a.wordv); + free(b.wordv); + free(c.wordv); + free(d.wordv); + + } +} + void test_gcdext_bigint(void){ bigint_t a, b, c, d, e; cli_putstr_P(PSTR("\r\ngcdext test\r\n")); @@ -310,9 +446,9 @@ void test_gcdext_bigint(void){ cli_putstr_P(PSTR("\r\n end gcdext test")); return; } - c.wordv = malloc((a.length_Bb.length_B)?a.length_B:b.length_B); - e.wordv = malloc(1+(a.length_B>b.length_B)?a.length_B:b.length_B); + c.wordv = malloc((a.length_Wb.length_W)?a.length_W:b.length_W); + e.wordv = malloc(1+(a.length_W>b.length_W)?a.length_W:b.length_W); cli_putstr_P(PSTR("\r\n gcdext( ")); bigint_print_hex(&a); @@ -342,8 +478,8 @@ void test_simple(void){ a.wordv=a_b; b.wordv=b_b; c.wordv=c_b; - a.length_B = 1; - b.length_B = 1; + a.length_W = 1; + b.length_W = 1; a_b[0] = 1; b_b[0] = 2; bigint_add_u(&c, &a, &b); @@ -359,8 +495,8 @@ void test_mul_simple(void){ a.wordv=a_b; b.wordv=b_b; c.wordv=c_b; - a.length_B = 5; - b.length_B = 5; + a.length_W = 5; + b.length_W = 5; bigint_adjust(&a); bigint_adjust(&b); bigint_mul_s(&c, &a, &b); @@ -384,8 +520,8 @@ void test_mul_simple(void){ a.wordv=a_b; b.wordv=b_b; c.wordv=c_b; - a.length_B = 8; - b.length_B = 8; + a.length_W = 8; + b.length_W = 8; a.info=0x80; bigint_adjust(&a); bigint_adjust(&b); @@ -426,7 +562,7 @@ void test_square_simple(void){ uint8_t c_b[22]; a.wordv=a_b; c.wordv=c_b; - a.length_B = 11; + a.length_W = 11; a.info=0x00; bigint_adjust(&a); bigint_square(&c, &a); @@ -444,11 +580,11 @@ void test_reduce_simple(void){ uint8_t b_b[2] = {0x52, 0x27}; uint8_t c_b[2]; a.wordv=a_b; - a.length_B = 2; + a.length_W = 2; a.info=0x00; bigint_adjust(&a); b.wordv=b_b; - b.length_B = 2; + b.length_W = 2; b.info=0x00; bigint_adjust(&b); c.wordv = c_b; @@ -473,11 +609,11 @@ void test_gcdext_simple(void){ uint8_t b_b[5] = {0x72, 0x7D, 0x57, 0xAC, 0X6F}; uint8_t c_b[6], d_b[6], e_b[6]; a.wordv=a_b; - a.length_B = 5; + a.length_W = 5; a.info=0x00; bigint_adjust(&a); b.wordv=b_b; - b.length_B = 5; + b.length_W = 5; b.info=0x00; bigint_adjust(&b); c.wordv = c_b; @@ -507,9 +643,12 @@ const char echo_test_str[] PROGMEM = "echo-test"; const char add_test_str[] PROGMEM = "add-test"; const char add_scale_test_str[] PROGMEM = "add-scale-test"; const char mul_test_str[] PROGMEM = "mul-test"; +const char mul_mont_test_str[] PROGMEM = "mul-mont-test"; +const char mul_word_test_str[] PROGMEM = "mul-word-test"; const char square_test_str[] PROGMEM = "square-test"; const char reduce_test_str[] PROGMEM = "reduce-test"; const char expmod_test_str[] PROGMEM = "expmod-test"; +const char expmod_mont_test_str[] PROGMEM = "expmod-mont-test"; const char gcdext_test_str[] PROGMEM = "gcdext-test"; const char quick_test_str[] PROGMEM = "quick-test"; const char performance_str[] PROGMEM = "performance"; @@ -519,9 +658,12 @@ const cmdlist_entry_t cmdlist[] PROGMEM = { { add_test_str, NULL, test_add_bigint }, { add_scale_test_str, NULL, test_add_scale_bigint }, { mul_test_str, NULL, test_mul_bigint }, + { mul_mont_test_str, NULL, test_mul_mont_bigint }, + { mul_word_test_str, NULL, test_mul_word_bigint }, { square_test_str, NULL, test_square_bigint }, { reduce_test_str, NULL, test_reduce_bigint }, - { expmod_test_str, NULL, test_expmod_bigint }, + { expmod_test_str, NULL, test_expmod_bigint }, + { expmod_mont_test_str, NULL, test_expmod_mont_bigint }, { gcdext_test_str, NULL, test_gcdext_bigint }, { quick_test_str, NULL, test_gcdext_simple }, { echo_test_str, NULL, test_echo_bigint }, @@ -531,14 +673,10 @@ const cmdlist_entry_t cmdlist[] PROGMEM = { }; int main (void){ - DEBUG_INIT(); - - cli_rx = (cli_rx_fpt)uart0_getc; - cli_tx = (cli_tx_fpt)uart0_putc; - for(;;){ - cli_putstr_P(PSTR("\r\n\r\nCrypto-VS (")); - cli_putstr(algo_name); - cli_putstr_P(PSTR(")\r\nloaded and running\r\n")); + main_setup(); + + for(;;){ + welcome_msg(algo_name); cmd_interface(cmdlist); } }