release/src/router/openssl/crypto/cast/casts.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/cast.h>
  36
  37 void main(int argc,char *argv[])
  38         {
  39         CAST_KEY key;
  40         unsigned long s1,s2,e1,e2;
  41         unsigned long data[2];
  42         int i,j;
  43         static unsigned char d[16]={0x01,0x23,0x45,0x67,0x89,0xAB,0xCD,0xEF};
  44
  45         CAST_set_key(&key, 16,d);
  46
  47         for (j=0; j<6; j++)
  48                 {
  49                 for (i=0; i<1000; i++) /**/
  50                         {
  51                         CAST_encrypt(&data[0],&key);
  52                         GetTSC(s1);
  53                         CAST_encrypt(&data[0],&key);
  54                         CAST_encrypt(&data[0],&key);
  55                         CAST_encrypt(&data[0],&key);
  56                         GetTSC(e1);
  57                         GetTSC(s2);
  58                         CAST_encrypt(&data[0],&key);
  59                         CAST_encrypt(&data[0],&key);
  60                         CAST_encrypt(&data[0],&key);
  61                         CAST_encrypt(&data[0],&key);
  62                         GetTSC(e2);
  63                         CAST_encrypt(&data[0],&key);
  64                         }
  65
  66                 printf("cast %d %d (%d)\n",
  67                         e1-s1,e2-s2,((e2-s2)-(e1-s1)));
  68                 }
  69         }
  70