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