test_src/performance_test.c

   1 /* performance_test.c */
   2 /*
   3     This file is part of the AVR-Crypto-Lib.
   4     Copyright (C) 2008  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  * author: Daniel Otte
  21  * email:  daniel.otte@rub.de
  22  * license: GPLv3
  23  *
  24  *
  25  **/
  26
  27 #include "config.h"
  28 #include <string.h>
  29 #include <stdint.h>
  30 #include <stdlib.h>
  31 #include <avr/io.h>
  32 #include <avr/interrupt.h>
  33 #include <avr/pgmspace.h>
  34 #include "cli.h"
  35 #include "performance_test.h"
  36
  37
  38 #ifdef ATMEGA644
  39         #define TIMSK TIMSK1
  40 #endif
  41
  42
  43
  44 static volatile uint32_t ovfcounter;
  45
  46 static uint16_t const_overhead=0;
  47 static uint16_t int_overhead=0;
  48
  49 ISR(TIMER1_OVF_vect){
  50         ovfcounter++;
  51 }
  52
  53 void calibrateTimer(void){
  54         volatile uint8_t i=0;
  55         startTimer(1);
  56         stopTimer();
  57         const_overhead = TCNT1;
  58         startTimer(1);
  59         TCNT1=0xFFFE;
  60         i++;
  61         stopTimer();
  62         int_overhead = TCNT1;
  63 }
  64
  65 void startTimer(uint8_t granularity){
  66         TCCR1B = 0; /* stop timer */
  67         TCNT1  = 0;
  68         ovfcounter = 0;
  69         TCCR1A = 0x00;
  70         TIMSK  = _BV(TOIE1); /* enable TOIE1 */
  71         TCCR1B = granularity & 0x7;     /* start timer */
  72 }
  73
  74 uint64_t stopTimer(void){
  75         TCCR1B = 0; /* stop timer */
  76         uint64_t ret;
  77         ret = (((uint64_t)ovfcounter)<<16) | TCNT1;
  78         ret -= const_overhead;
  79         ret -= ovfcounter * int_overhead;
  80         return ret;
  81 }
  82
  83 void getOverhead(uint16_t *constoh, uint16_t *intoh){
  84         *constoh = const_overhead;
  85         *intoh   = int_overhead;
  86 }
  87
  88 void print_time_P(PGM_P s, uint64_t t){
  89         char sv[16];
  90         uint8_t c;
  91         cli_putstr_P(PSTR("\r\n"));
  92         cli_putstr_P(s);
  93         ultoa((unsigned long)t, sv, 10);
  94         for(c=strlen(sv); c<11; ++c){
  95                 cli_putc(' ');
  96         }
  97         cli_putstr(sv);
  98 }
  99
 100 void print_overhead(void){
 101         char str[16];
 102         cli_putstr_P(PSTR("\r\n\r\n=== benchmark ==="));
 103         utoa(const_overhead, str, 10);
 104         cli_putstr_P(PSTR("\r\n\tconst overhead:     "));
 105         cli_putstr(str);
 106         utoa(int_overhead, str, 10);
 107         cli_putstr_P(PSTR("\r\n\tinterrupt overhead: "));
 108         cli_putstr(str);
 109 }
 110
 111