test_src/main-cast5-test.c

   1 /* main-cast5-test.c */
   2 /*
   3     This file is part of the ARM-Crypto-Lib.
   4     Copyright (C) 2006-2010  Daniel Otte (daniel.otte@rub.de)
   5
   6     This program is free software: you can redistribute it and/or modify
   7     it under the terms of the GNU General Public License as published by
   8     the Free Software Foundation, either version 3 of the License, or
   9     (at your option) any later version.
  10
  11     This program is distributed in the hope that it will be useful,
  12     but WITHOUT ANY WARRANTY; without even the implied warranty of
  13     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14     GNU General Public License for more details.
  15
  16     You should have received a copy of the GNU General Public License
  17     along with this program.  If not, see <http://www.gnu.org/licenses/>.
  18 */
  19 /*
  20  * cast5 test-suit
  21  *
  22 */
  23 #include <stdint.h>
  24 #include <stdlib.h>
  25 #include <string.h>
  26 #include "config.h"
  27 #include "cli.h"
  28 #include "dump.h"
  29 #include "uart_lowlevel.h"
  30 #include "sysclock.h"
  31 #include "hw_gptm.h"
  32
  33 #include <cast5.h>
  34 #include "nessie_bc_test.h"
  35 #include "performance_test.h"
  36 #include "bcal-performance.h"
  37 #include "bcal_cast5.h"
  38
  39 char* algo_name = "cast-128 (cast5)";
  40
  41 void uart0_putc(char byte){
  42         uart_putc(UART_0, byte);
  43 }
  44
  45 char uart0_getc(void){
  46         return uart_getc(UART_0);
  47 }
  48
  49 const bcdesc_t* algolist[] = {
  50         (bcdesc_t*)&cast5_desc,
  51         NULL
  52 };
  53
  54 /*****************************************************************************
  55  *  additional validation-functions                                                                                      *
  56  *****************************************************************************/
  57
  58 void testrun_nessie_cast5(void){
  59         nessie_bc_ctx.blocksize_B =   8;
  60         nessie_bc_ctx.keysize_b   = 128;
  61         nessie_bc_ctx.name        = algo_name;
  62         nessie_bc_ctx.ctx_size_B  = sizeof(cast5_ctx_t);
  63         nessie_bc_ctx.cipher_enc  = (nessie_bc_enc_fpt)cast5_enc;
  64         nessie_bc_ctx.cipher_dec  = (nessie_bc_dec_fpt)cast5_dec;
  65         nessie_bc_ctx.cipher_genctx  = (nessie_bc_gen_fpt)cast5_init;
  66
  67         nessie_bc_run();
  68 }
  69
  70 /*****************************************************************************
  71  *  self tests                                                                                                                           *
  72  *****************************************************************************/
  73
  74 void cast5_ctx_dump(cast5_ctx_t *s){
  75         uint8_t i;
  76         cli_putstr("\r\n==== cast5_ctx_dump ====\r\n shortkey: ");
  77         cli_putstr(s->shortkey?"yes":"no");
  78         for(i=0;i<16;++i){
  79                 uint8_t r;
  80                 cli_putstr("\r\n Km"); cli_hexdump(&i, 1); cli_putc(':');
  81                 cli_hexdump(&(s->mask[i]), 4);
  82                 cli_putstr("\r\n Kr"); cli_hexdump(&i, 1); cli_putc(':');
  83                 r = (s->rotl[i/2]);
  84                 if (i&0x01) r >>= 4;
  85                 r &= 0xf;
  86                 r += (s->roth[i>>3]&(1<<(i&0x7)))?0x10:0x00;
  87                 cli_hexdump(&r, 1);
  88         }
  89 }
  90
  91
  92 void test_encrypt(uint8_t *block, uint8_t *key, uint8_t keylength, bool print){
  93         cast5_ctx_t s;
  94         if (print){
  95                 cli_putstr("\r\nCAST5:\r\n key:\t");
  96                 cli_hexdump(key, keylength/8);
  97                 cli_putstr("\r\n plaintext:\t");
  98                 cli_hexdump(block, 8);
  99         }
 100         cast5_init(key, keylength, &s);
 101         cast5_enc(block, &s);
 102         if (print){
 103                 cli_putstr("\r\n ciphertext:\t");
 104                 cli_hexdump(block, 8);
 105         }
 106 }
 107
 108 void test_decrypt(uint8_t *block, uint8_t *key, uint8_t keylength, bool print){
 109         cast5_ctx_t s;
 110         if (print){
 111                 cli_putstr("\r\nCAST5:\r\n key:\t");
 112                 cli_hexdump(key, keylength/8);
 113                 cli_putstr("\r\n ciphertext:\t");
 114                 cli_hexdump(block, 8);
 115         }
 116         cast5_init(key, keylength, &s);
 117         cast5_dec(block, &s);
 118         if (print){
 119                 cli_putstr("\r\n plaintext:\t");
 120                 cli_hexdump(block, 8);
 121         }
 122 }
 123
 124 void testrun_cast5(void){
 125         uint8_t block[8];
 126         uint8_t key[16];
 127         uint8_t *tda = (uint8_t*)"\x01\x23\x45\x67\x89\xAB\xCD\xEF",
 128                 *tka = (uint8_t*)"\x01\x23\x45\x67\x12\x34\x56\x78\x23\x45\x67\x89\x34\x56\x78\x9A";
 129         memcpy(block, tda, 8);
 130         memcpy(key, tka, 16);
 131         test_encrypt(block, key, 128, true);
 132         test_decrypt(block, key, 128, true);
 133         memcpy(block, tda, 8);
 134         memcpy(key, tka, 16);
 135         test_encrypt(block, key, 80, true);
 136         test_decrypt(block, key, 80, true);
 137         memcpy(block, tda, 8);
 138         memcpy(key, tka, 16);
 139         test_encrypt(block, key, 40, true);
 140         test_decrypt(block, key, 40, true);
 141
 142 /**** long test *****/
 143         cli_putstr("\r\nmaintance-test");
 144         uint8_t a[16]= {0x01, 0x23, 0x45, 0x67, 0x12,
 145                                     0x34, 0x56, 0x78, 0x23, 0x45,
 146                                     0x67, 0x89, 0x34, 0x56, 0x78,
 147                                     0x9A},
 148                         b[16]= {0x01, 0x23, 0x45, 0x67, 0x12,
 149                                     0x34, 0x56, 0x78, 0x23, 0x45,
 150                                     0x67, 0x89, 0x34, 0x56, 0x78,
 151                                     0x9A};
 152         uint32_t i;
 153         for(i=0;i<1000000; ++i){
 154                 test_encrypt(&(a[0]), &(b[0]), 128, false);
 155                 test_encrypt(&(a[8]), &(b[0]), 128, false);
 156                 test_encrypt(&(b[0]), &(a[0]), 128, false);
 157                 test_encrypt(&(b[8]), &(a[0]), 128, false);
 158                 if ((i&0x000000ff) == 0){
 159
 160                         cli_hexdump(&i, 4);
 161                 }
 162         }
 163         cli_putstr("\r\na = "); cli_hexdump(a, 16);
 164         cli_putstr("\r\nb = "); cli_hexdump(b, 16);
 165
 166 }
 167
 168 void testrun_performance_cast5(void){
 169         bcal_performance_multiple(algolist);
 170 }
 171
 172 /*****************************************************************************
 173  *  main                                                                                                                                         *
 174  *****************************************************************************/
 175
 176 const char nessie_str[]      = "nessie";
 177 const char test_str[]        = "test";
 178 const char performance_str[] = "performance";
 179 const char echo_str[]        = "echo";
 180
 181 const cmdlist_entry_t cmdlist[] = {
 182         { nessie_str,      NULL, testrun_nessie_cast5},
 183         { test_str,        NULL, testrun_cast5},
 184         { performance_str, NULL, testrun_performance_cast5},
 185         { echo_str,    (void*)1, (void_fpt)echo_ctrl},
 186         { NULL,            NULL, NULL}
 187 };
 188
 189 int main (void){
 190         sysclk_set_freq(SYS_FREQ);
 191         sysclk_mosc_verify_enable();
 192         uart_init(UART_0, 115200, 8, UART_PARATY_NONE, UART_STOPBITS_ONE);
 193         gptm_set_timer_32periodic(TIMER0);
 194
 195         cli_rx = (cli_rx_fpt)uart0_getc;
 196         cli_tx = (cli_tx_fpt)uart0_putc;
 197         for(;;){
 198                 cli_putstr("\r\n\r\nARM-Crypto-Lib VS (");
 199                 cli_putstr(algo_name);
 200                 cli_putstr("; ");
 201                 cli_putstr(__DATE__);
 202                 cli_putc(' ');
 203                 cli_putstr(__TIME__);
 204                 cli_putstr(")\r\nloaded and running\r\n");
 205         cmd_interface(cmdlist);
 206     }
 207 }