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 &= 0xC3;
  71         TIMSK |= _BV(TOIE1); /* enable TOIE1 */
  72         TCCR1B = granularity & 0x7;     /* start timer */
  73 }
  74
  75 uint64_t stopTimer(void){
  76         TCCR1B = 0; /* stop timer */
  77         uint64_t ret;
  78         ret = (((uint64_t)ovfcounter)<<16) | TCNT1;
  79         ret -= const_overhead;
  80         ret -= ovfcounter * int_overhead;
  81         return ret;
  82 }
  83
  84 void getOverhead(uint16_t* constoh, uint16_t* intoh){
  85         *constoh = const_overhead;
  86         *intoh   = int_overhead;
  87 }
  88
  89 void print_time_P(PGM_P s, uint64_t t){
  90         char sv[16];
  91         uint8_t c;
  92         cli_putstr_P(PSTR("\r\n"));
  93         cli_putstr_P(s);
  94         ultoa((unsigned long)t, sv, 10);
  95         for(c=strlen(sv); c<11; ++c){
  96                 cli_putc(' ');
  97         }
  98         cli_putstr(sv);
  99 }
 100
 101 void print_overhead(void){
 102         char str[16];
 103         cli_putstr_P(PSTR("\r\n\r\n=== benchmark ==="));
 104         utoa(const_overhead, str, 10);
 105         cli_putstr_P(PSTR("\r\n\tconst overhead:     "));
 106         cli_putstr(str);
 107         utoa(int_overhead, str, 10);
 108         cli_putstr_P(PSTR("\r\n\tinterrupt overhead: "));
 109         cli_putstr(str);
 110 }
 111
 112