]> git.cryptolib.org Git - avr-crypto-lib.git/blobdiff - rsa/rsa_basic.c
fixing E-Mail-Address & Copyright
[avr-crypto-lib.git] / rsa / rsa_basic.c
index 98cdfb2ca5fa77498db0fe6e9c350e5559e9ac35..0b6fef624237e0393e568f4d0bf0982b982de2dd 100644 (file)
@@ -1,7 +1,7 @@
 /* rsa_basic.c */
 /*
     This file is part of the ARM-Crypto-Lib.
-    Copyright (C) 2006-2011 Daniel Otte (daniel.otte@rub.de)
+    Copyright (C) 2006-2015 Daniel Otte (bg@nerilex.org)
 
     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
 
 #if DEBUG
 #include "cli.h"
+#include <stdio.h>
 #endif
 
-void rsa_enc(bigint_t* data, rsa_publickey_t* key){
+void rsa_enc(bigint_t *data, const rsa_publickey_t *key){
 /*
        cli_putstr_P(PSTR("\r\n -->rsa_enc()\r\n m = "));
        bigint_print_hex(data);
@@ -39,7 +40,7 @@ void rsa_enc(bigint_t* data, rsa_publickey_t* key){
        cli_putstr_P(PSTR("\r\n n = "));
        bigint_print_hex(key->modulus);
 */
-       bigint_expmod_u(data, data, key->exponent, key->modulus);
+       bigint_expmod_u(data, data, &key->exponent, &key->modulus);
 }
 
 /*
@@ -50,10 +51,10 @@ h = (m1 - m2) * qinv % p
 m = m2 + q * h
 */
 
-uint8_t rsa_dec_crt_mono(bigint_t* data, rsa_privatekey_t* key){
+uint8_t rsa_dec_crt_mono(bigint_t *data, const rsa_privatekey_t *key){
        bigint_t m1, m2;
-       m1.wordv = malloc((key->components[0]->length_B + 1) * sizeof(bigint_word_t));
-       m2.wordv = malloc((key->components[1]->length_B + 1) * sizeof(bigint_word_t));
+       m1.wordv = malloc((key->components[0].length_W /* + 1 */) * sizeof(bigint_word_t));
+       m2.wordv = malloc((key->components[1].length_W /* + 1 */) * sizeof(bigint_word_t));
        if(!m1.wordv || !m2.wordv){
 #if DEBUG
                cli_putstr_P(PSTR("\r\nERROR: OOM!"));
@@ -67,24 +68,24 @@ uint8_t rsa_dec_crt_mono(bigint_t* data, rsa_privatekey_t* key){
        cli_putstr_P(PSTR("\r\nexpmod("));
        bigint_print_hex(data);
        cli_putc(',');
-       bigint_print_hex(key->components[2]);
+       bigint_print_hex(&(key->components[2]));
        cli_putc(',');
-       bigint_print_hex(key->components[0]);
+       bigint_print_hex(&(key->components[0]));
        cli_putstr_P(PSTR(") = "));
 #endif
-       bigint_expmod_u(&m1, data, key->components[2], key->components[0]);
+       bigint_expmod_u(&m1, data, &(key->components[2]), &(key->components[0]));
 #if DEBUG
        bigint_print_hex(&m1);
        cli_putstr_P(PSTR("expmod m2 ..."));
        cli_putstr_P(PSTR("\r\nexpmod("));
        bigint_print_hex(data);
        cli_putc(',');
-       bigint_print_hex(key->components[3]);
+       bigint_print_hex(&(key->components[3]));
        cli_putc(',');
-       bigint_print_hex(key->components[1]);
+       bigint_print_hex(&(key->components[1]));
        cli_putstr_P(PSTR(") = "));
 #endif
-       bigint_expmod_u(&m2, data, key->components[3], key->components[1]);
+       bigint_expmod_u(&m2, data, &(key->components[3]), &(key->components[1]));
 #if DEBUG
        bigint_print_hex(&m2);
        cli_putstr_P(PSTR("\r\nDBG: sub ..."));
@@ -101,48 +102,48 @@ uint8_t rsa_dec_crt_mono(bigint_t* data, rsa_privatekey_t* key){
        while(BIGINT_NEG_MASK & m1.info){
 #if DEBUG
        cli_putstr_P(PSTR("\r\nDBG: adding "));
-       bigint_print_hex(key->components[0]);
+       bigint_print_hex(&key->components[0]);
        cli_putstr_P(PSTR("\r\nDBG: to "));
        bigint_print_hex(&m1);
 #endif
-               bigint_add_s(&m1, &m1, key->components[0]);
+               bigint_add_s(&m1, &m1, &(key->components[0]));
        }
 #if DEBUG
        cli_putstr_P(PSTR("\r\nDBG: reduce-mul ..."));
        cli_putstr_P(PSTR("\r\nreduce("));
        bigint_print_hex(&m1);
        cli_putc(',');
-       bigint_print_hex(key->components[0]);
+       bigint_print_hex(&(key->components[0]));
        cli_putstr_P(PSTR(") = "));
 #endif
-       bigint_reduce(&m1, key->components[0]);
+       bigint_reduce(&m1, &(key->components[0]));
 #if DEBUG
        bigint_print_hex(&m1);
        cli_putstr_P(PSTR("\r\nmul("));
        bigint_print_hex(&m1);
        cli_putc(',');
-       bigint_print_hex(key->components[4]);
+       bigint_print_hex(&(key->components[4]));
        cli_putstr_P(PSTR(") = "));
 #endif
-       bigint_mul_u(data, &m1, key->components[4]);
+       bigint_mul_u(data, &m1, &(key->components[4]));
 #if DEBUG
        bigint_print_hex(data);
        cli_putstr_P(PSTR("\r\nreduce("));
        bigint_print_hex(data);
        cli_putc(',');
-       bigint_print_hex(key->components[0]);
+       bigint_print_hex(&(key->components[0]));
        cli_putstr_P(PSTR(") = "));
 #endif
-       bigint_reduce(data, key->components[0]);
+       bigint_reduce(data, &(key->components[0]));
 #if DEBUG
        bigint_print_hex(data);
        cli_putstr_P(PSTR("\r\nmul("));
        bigint_print_hex(data);
        cli_putc(',');
-       bigint_print_hex(key->components[1]);
+       bigint_print_hex(&(key->components[1]));
        cli_putstr_P(PSTR(") = "));
 #endif
-       bigint_mul_u(data, data, key->components[1]);
+       bigint_mul_u(data, data, &(key->components[1]));
 #if DEBUG
        bigint_print_hex(data);
        cli_putstr_P(PSTR("\r\nadd("));
@@ -160,9 +161,9 @@ uint8_t rsa_dec_crt_mono(bigint_t* data, rsa_privatekey_t* key){
        return 0;
 }
 
-uint8_t rsa_dec(bigint_t* data, rsa_privatekey_t* key){
+uint8_t rsa_dec(bigint_t *data, const rsa_privatekey_t *key){
        if(key->n == 1){
-               bigint_expmod_u(data, data, key->components[0], key->modulus);
+               bigint_expmod_u(data, data, &(key->components[0]), &key->modulus);
                return 0;
        }
        if(key->n == 5){
@@ -178,23 +179,22 @@ uint8_t rsa_dec(bigint_t* data, rsa_privatekey_t* key){
        return 2;
 }
 
-void rsa_os2ip(bigint_t* dest, const void* data, uint32_t length_B){
+void rsa_os2ip(bigint_t *dest, const void *data, uint32_t length_B){
 #if BIGINT_WORD_SIZE == 8
        if(data){
                memcpy(dest->wordv, data, length_B);
        }
-       dest->length_B = length_B;
+       dest->length_W = length_B;
 #else
        uint8_t off;
        off = (sizeof(bigint_word_t) - length_B % sizeof(bigint_word_t)) % sizeof(bigint_word_t);
 #if DEBUG
-       cli_putstr_P(PSTR("\r\nDBG: off = 0x"));
-       cli_hexdump_byte(off);
+       printf("\r\nDBG: off = 0x%02x", off);
 #endif
-       if(!data){
-               if(off){
+       if (!data) {
+               if (off) {
                        dest->wordv = realloc(dest->wordv, length_B + sizeof(bigint_word_t) - off);
-                       memmove((uint8_t*)dest->wordv+off, dest->wordv, length_B);
+                       memmove((uint8_t*)dest->wordv + off, dest->wordv, length_B);
                        memset(dest->wordv, 0, off);
                }
        }else{
@@ -203,10 +203,9 @@ void rsa_os2ip(bigint_t* dest, const void* data, uint32_t length_B){
                        memset(dest->wordv, 0, off);
                }
        }
-       dest->length_B = (length_B + off) / sizeof(bigint_word_t);
+       dest->length_W = (length_B + off) / sizeof(bigint_word_t);
 #if DEBUG
-       cli_putstr_P(PSTR("\r\nDBG: dest->length_B = 0x"));
-       cli_hexdump_rev(&(dest->length_B), 2);
+       printf("\r\nDBG: dest->length_W = %u", dest->length_W);
 #endif
 #endif
        dest->info = 0;
@@ -214,12 +213,12 @@ void rsa_os2ip(bigint_t* dest, const void* data, uint32_t length_B){
        bigint_adjust(dest);
 }
 
-void rsa_i2osp(void* dest, bigint_t* src, uint16_t* out_length_B){
+void rsa_i2osp(void *dest, bigint_t *src, uint16_t *out_length_B){
 #if BIGINT_WORD_SIZE == 8
        if(dest){
-               uint8_t *e = src->wordv + src->length_B;
+               uint8_t *e = src->wordv + src->length_W;
                uint16_t i;
-               for(i=src->length_B; i>0; --i){
+               for(i=src->length_W; i>0; --i){
                        *((uint8_t*)dest) = *--e;
                        dest = (uint8_t*)dest + 1;
                }
@@ -227,7 +226,7 @@ void rsa_i2osp(void* dest, bigint_t* src, uint16_t* out_length_B){
                bigint_changeendianess(src);
        }
 
-       *out_length_B = src->length_B;
+       *out_length_B = src->length_W;
 #else
        *out_length_B = bigint_get_first_set_bit(src) / 8 + 1;
        if(dest){