File: casts.cpp

package info (click to toggle)
openssl 0.9.8o-4squeeze14
  • links: PTS, VCS
  • area: main
  • in suites: squeeze
  • size: 25,724 kB
  • ctags: 33,381
  • sloc: ansic: 233,772; perl: 23,990; makefile: 13,204; asm: 9,276; cpp: 4,379; sh: 3,194; lisp: 24
file content (70 lines) | stat: -rw-r--r-- 1,431 bytes parent folder | download | duplicates (18)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
//
// gettsc.inl
//
// gives access to the Pentium's (secret) cycle counter
//
// This software was written by Leonard Janke (janke@unixg.ubc.ca)
// in 1996-7 and is entered, by him, into the public domain.

#if defined(__WATCOMC__)
void GetTSC(unsigned long&);
#pragma aux GetTSC = 0x0f 0x31 "mov [edi], eax" parm [edi] modify [edx eax];
#elif defined(__GNUC__)
inline
void GetTSC(unsigned long& tsc)
{
  asm volatile(".byte 15, 49\n\t"
	       : "=eax" (tsc)
	       :
	       : "%edx", "%eax");
}
#elif defined(_MSC_VER)
inline
void GetTSC(unsigned long& tsc)
{
  unsigned long a;
  __asm _emit 0fh
  __asm _emit 31h
  __asm mov a, eax;
  tsc=a;
}
#endif      

#include <stdio.h>
#include <stdlib.h>
#include <openssl/cast.h>

void main(int argc,char *argv[])
	{
	CAST_KEY key;
	unsigned long s1,s2,e1,e2;
	unsigned long data[2];
	int i,j;
	static unsigned char d[16]={0x01,0x23,0x45,0x67,0x89,0xAB,0xCD,0xEF};

	CAST_set_key(&key, 16,d);

	for (j=0; j<6; j++)
		{
		for (i=0; i<1000; i++) /**/
			{
			CAST_encrypt(&data[0],&key);
			GetTSC(s1);
			CAST_encrypt(&data[0],&key);
			CAST_encrypt(&data[0],&key);
			CAST_encrypt(&data[0],&key);
			GetTSC(e1);
			GetTSC(s2);
			CAST_encrypt(&data[0],&key);
			CAST_encrypt(&data[0],&key);
			CAST_encrypt(&data[0],&key);
			CAST_encrypt(&data[0],&key);
			GetTSC(e2);
			CAST_encrypt(&data[0],&key);
			}

		printf("cast %d %d (%d)\n",
			e1-s1,e2-s2,((e2-s2)-(e1-s1)));
		}
	}