OLD | NEW |
| (Empty) |
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 | |
OLD | NEW |