crypto/sha/sha1s.cpp

   1 //
   2 // gettsc.inl
   3 //
   4 // gives access to the Pentium's (secret) cycle counter
   5 //
   6 // This software was written by Leonard Janke (janke@unixg.ubc.ca)
   7 // in 1996-7 and is entered, by him, into the public domain.
   8
   9 #if defined(__WATCOMC__)
  10 void GetTSC(unsigned long&);
  11 #pragma aux GetTSC = 0x0f 0x31 "mov [edi], eax" parm [edi] modify [edx eax];
  12 #elif defined(__GNUC__)
  13 inline
  14 void GetTSC(unsigned long& tsc)
  15 {
  16   asm volatile(".byte 15, 49\n\t"
  17                : "=eax" (tsc)
  18                :
  19                : "%edx", "%eax");
  20 }
  21 #elif defined(_MSC_VER)
  22 inline
  23 void GetTSC(unsigned long& tsc)
  24 {
  25   unsigned long a;
  26   __asm _emit 0fh
  27   __asm _emit 31h
  28   __asm mov a, eax;
  29   tsc=a;
  30 }
  31 #endif
  32
  33 #include <stdio.h>
  34 #include <stdlib.h>
  35 #include <openssl/sha.h>
  36
  37 #define sha1_block_x86 sha1_block_asm_data_order
  38 extern "C" {
  39 void sha1_block_x86(SHA_CTX *ctx, unsigned char *buffer,int num);
  40 }
  41
  42 void main(int argc,char *argv[])
  43         {
  44         unsigned char buffer[64*256];
  45         SHA_CTX ctx;
  46         unsigned long s1,s2,e1,e2;
  47         unsigned char k[16];
  48         unsigned long data[2];
  49         unsigned char iv[8];
  50         int i,num=0,numm;
  51         int j=0;
  52
  53         if (argc >= 2)
  54                 num=atoi(argv[1]);
  55
  56         if (num == 0) num=16;
  57         if (num > 250) num=16;
  58         numm=num+2;
  59 #if 0
  60         num*=64;
  61         numm*=64;
  62 #endif
  63
  64         for (j=0; j<6; j++)
  65                 {
  66                 for (i=0; i<10; i++) /**/
  67                         {
  68                         sha1_block_x86(&ctx,buffer,numm);
  69                         GetTSC(s1);
  70                         sha1_block_x86(&ctx,buffer,numm);
  71                         GetTSC(e1);
  72                         GetTSC(s2);
  73                         sha1_block_x86(&ctx,buffer,num);
  74                         GetTSC(e2);
  75                         sha1_block_x86(&ctx,buffer,num);
  76                         }
  77
  78                 printf("sha1 (%d bytes) %d %d (%.2f)\n",num*64,
  79                         e1-s1,e2-s2,(double)((e1-s1)-(e2-s2))/2);
  80                 }
  81         }
  82