-/* main-base64-test.c */
+/* main-bigint-test.c */
/*
This file is part of the AVR-Crypto-Lib.
- Copyright (C) 2008, 2009 Daniel Otte (daniel.otte@rub.de)
+ Copyright (C) 2008, 2009, 2010 Daniel Otte (daniel.otte@rub.de)
This program is free software: you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
along with this program. If not, see <http://www.gnu.org/licenses/>.
*/
/*
- * base64 test-suit
+ * bigint test-suit
*
*/
}
}
+void test_add_scale_bigint(void){
+ bigint_t a, b, c;
+ uint16_t scale;
+ cli_putstr_P(PSTR("\r\nadd-scale test\r\n"));
+ for(;;){
+ cli_putstr_P(PSTR("\r\nenter a:"));
+ if(bigint_read_hex_echo(&a)){
+ cli_putstr_P(PSTR("\r\n end add test"));
+ return;
+ }
+ cli_putstr_P(PSTR("\r\nenter b:"));
+ if(bigint_read_hex_echo(&b)){
+ cli_putstr_P(PSTR("\r\n end add test"));
+ return;
+ }
+ cli_putstr_P(PSTR("\r\nenter scale:"));
+ {
+ char str[8];
+ cli_getsn_cecho(str, 7);
+ scale = atoi(str);
+ }
+ /*
+ if(bigint_read_hex_echo(&scale)){
+ free(scale.wordv);
+ cli_putstr_P(PSTR("\r\n end add test"));
+ return;
+ }
+ */
+ cli_putstr_P(PSTR("\r\n "));
+ bigint_print_hex(&a);
+ cli_putstr_P(PSTR(" + "));
+ bigint_print_hex(&b);
+ cli_putstr_P(PSTR("<<8*"));
+ cli_hexdump_rev(&scale, 2);
+ cli_putstr_P(PSTR(" = "));
+ uint8_t *c_b;
+ c_b = malloc(((a.length_B>(b.length_B+scale))?a.length_B:(b.length_B+scale))+2);
+ if(c_b==NULL){
+ cli_putstr_P(PSTR("\n\rERROR: Out of memory!"));
+ free(a.wordv);
+ free(b.wordv);
+ continue;
+ }
+ bigint_copy(&c, &a);
+ c.wordv = c_b;
+ bigint_add_scale_u(&c, &b, scale);
+ bigint_print_hex(&c);
+ cli_putstr_P(PSTR("\r\n"));
+ free(a.wordv);
+ free(b.wordv);
+ free(c_b);
+ }
+}
+
void test_mul_bigint(void){
bigint_t a, b, c;
cli_putstr_P(PSTR("\r\nmul test\r\n"));
}
void test_reduce_bigint(void){
- bigint_t a, b, c;
+ bigint_t a, b;
cli_putstr_P(PSTR("\r\nreduce test\r\n"));
for(;;){
cli_putstr_P(PSTR("\r\nenter a:"));
free(b.wordv);
}
}
+/* d = a**b % c */
+void test_expmod_bigint(void){
+ bigint_t a, b, c, d;
+ uint8_t *d_b;
+ cli_putstr_P(PSTR("\r\nreduce 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_B);
+ 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(&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"));
+ for(;;){
+ cli_putstr_P(PSTR("\r\nenter a:"));
+ if(bigint_read_hex_echo(&a)){
+ cli_putstr_P(PSTR("\r\n end gcdext 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 gcdext test"));
+ return;
+ }
+ c.wordv = malloc((a.length_B<b.length_B)?a.length_B:b.length_B);
+ d.wordv = malloc(1+(a.length_B>b.length_B)?a.length_B:b.length_B);
+ e.wordv = malloc(1+(a.length_B>b.length_B)?a.length_B:b.length_B);
+
+ cli_putstr_P(PSTR("\r\n gcdext( "));
+ bigint_print_hex(&a);
+ cli_putstr_P(PSTR(", "));
+ bigint_print_hex(&b);
+ cli_putstr_P(PSTR(") => "));
+ bigint_gcdext(&c, &d, &e, &a, &b);
+ cli_putstr_P(PSTR("a = "));
+ bigint_print_hex(&d);
+ cli_putstr_P(PSTR("; b = "));
+ bigint_print_hex(&e);
+ cli_putstr_P(PSTR("; gcd = "));
+ bigint_print_hex(&c);
+
+ cli_putstr_P(PSTR("\r\n"));
+ free(a.wordv);
+ free(b.wordv);
+ free(c.wordv);
+ free(d.wordv);
+ free(e.wordv);
+ }
+}
void test_simple(void){
bigint_t a, b, c;
bigint_print_hex(&c);
}
+/* gcdext( B5DDAD, 6CBBC2) */
+/* gcdext( CD319349, 9EFD76CC) */
+/* gcdext( 1609000771, 6FAC577D72) */
+/* */
+void test_gcdext_simple(void){
+ bigint_t a, b, c, d, e;
+
+ uint8_t a_b[5] = {0x71, 0x07, 0x00, 0x09, 0x16};
+ 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.info=0x00;
+ bigint_adjust(&a);
+ b.wordv=b_b;
+ b.length_B = 5;
+ b.info=0x00;
+ bigint_adjust(&b);
+ c.wordv = c_b;
+ d.wordv = d_b;
+ e.wordv = e_b;
+ bigint_gcdext(&c, &d, &e, &a, &b);
+ cli_putstr_P(PSTR("\r\n test: gcd( "));
+ bigint_print_hex(&a);
+ cli_putstr_P(PSTR(", "));
+ bigint_print_hex(&b);
+ cli_putstr_P(PSTR(") => a = "));
+ bigint_print_hex(&d);
+ cli_putstr_P(PSTR("; b = "));
+ bigint_print_hex(&e);
+ cli_putstr_P(PSTR("; gcd = "));
+ bigint_print_hex(&c);
+}
void testrun_performance_bigint(void){
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 square_test_str[] PROGMEM = "square-test";
const char reduce_test_str[] PROGMEM = "reduce-test";
+const char expmod_test_str[] PROGMEM = "expmod-test";
+const char gcdext_test_str[] PROGMEM = "gcdext-test";
const char quick_test_str[] PROGMEM = "quick-test";
const char performance_str[] PROGMEM = "performance";
const char echo_str[] PROGMEM = "echo";
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 },
{ square_test_str, NULL, test_square_bigint },
{ reduce_test_str, NULL, test_reduce_bigint },
- { quick_test_str, NULL, test_reduce_simple },
+ { expmod_test_str, NULL, test_expmod_bigint },
+ { gcdext_test_str, NULL, test_gcdext_bigint },
+ { quick_test_str, NULL, test_gcdext_simple },
{ echo_test_str, NULL, test_echo_bigint },
{ performance_str, NULL, testrun_performance_bigint },
{ echo_str, (void*)1, (void_fpt)echo_ctrl },