1 /* CpuArch.c -- CPU specific code
2 2010-10-26: Igor Pavlov : Public domain */
3
4 #include "CpuArch.h"
5
6 #ifdef MY_CPU_X86_OR_AMD64
7
8 #if (defined(_MSC_VER) && !defined(MY_CPU_AMD64)) || defined(__GNUC__)
9 #define USE_ASM
10 #endif
11
12 #if defined(USE_ASM) && !defined(MY_CPU_AMD64)
CheckFlag(UInt32 flag)13 static UInt32 CheckFlag(UInt32 flag)
14 {
15 #ifdef _MSC_VER
16 __asm pushfd;
17 __asm pop EAX;
18 __asm mov EDX, EAX;
19 __asm xor EAX, flag;
20 __asm push EAX;
21 __asm popfd;
22 __asm pushfd;
23 __asm pop EAX;
24 __asm xor EAX, EDX;
25 __asm push EDX;
26 __asm popfd;
27 __asm and flag, EAX;
28 #else
29 __asm__ __volatile__ (
30 "pushf\n\t"
31 "pop %%EAX\n\t"
32 "movl %%EAX,%%EDX\n\t"
33 "xorl %0,%%EAX\n\t"
34 "push %%EAX\n\t"
35 "popf\n\t"
36 "pushf\n\t"
37 "pop %%EAX\n\t"
38 "xorl %%EDX,%%EAX\n\t"
39 "push %%EDX\n\t"
40 "popf\n\t"
41 "andl %%EAX, %0\n\t":
42 "=c" (flag) : "c" (flag));
43 #endif
44 return flag;
45 }
46 #define CHECK_CPUID_IS_SUPPORTED if (CheckFlag(1 << 18) == 0 || CheckFlag(1 << 21) == 0) return False;
47 #else
48 #define CHECK_CPUID_IS_SUPPORTED
49 #endif
50
MyCPUID(UInt32 function,UInt32 * a,UInt32 * b,UInt32 * c,UInt32 * d)51 static void MyCPUID(UInt32 function, UInt32 *a, UInt32 *b, UInt32 *c, UInt32 *d)
52 {
53 #ifdef USE_ASM
54
55 #ifdef _MSC_VER
56
57 UInt32 a2, b2, c2, d2;
58 __asm xor EBX, EBX;
59 __asm xor ECX, ECX;
60 __asm xor EDX, EDX;
61 __asm mov EAX, function;
62 __asm cpuid;
63 __asm mov a2, EAX;
64 __asm mov b2, EBX;
65 __asm mov c2, ECX;
66 __asm mov d2, EDX;
67
68 *a = a2;
69 *b = b2;
70 *c = c2;
71 *d = d2;
72
73 #else
74
75 __asm__ __volatile__ (
76 "cpuid"
77 : "=a" (*a) ,
78 "=b" (*b) ,
79 "=c" (*c) ,
80 "=d" (*d)
81 : "0" (function)) ;
82
83 #endif
84
85 #else
86
87 int CPUInfo[4];
88 __cpuid(CPUInfo, function);
89 *a = CPUInfo[0];
90 *b = CPUInfo[1];
91 *c = CPUInfo[2];
92 *d = CPUInfo[3];
93
94 #endif
95 }
96
x86cpuid_CheckAndRead(Cx86cpuid * p)97 Bool x86cpuid_CheckAndRead(Cx86cpuid *p)
98 {
99 CHECK_CPUID_IS_SUPPORTED
100 MyCPUID(0, &p->maxFunc, &p->vendor[0], &p->vendor[2], &p->vendor[1]);
101 MyCPUID(1, &p->ver, &p->b, &p->c, &p->d);
102 return True;
103 }
104
105 static UInt32 kVendors[][3] =
106 {
107 { 0x756E6547, 0x49656E69, 0x6C65746E},
108 { 0x68747541, 0x69746E65, 0x444D4163},
109 { 0x746E6543, 0x48727561, 0x736C7561}
110 };
111
x86cpuid_GetFirm(const Cx86cpuid * p)112 int x86cpuid_GetFirm(const Cx86cpuid *p)
113 {
114 unsigned i;
115 for (i = 0; i < sizeof(kVendors) / sizeof(kVendors[i]); i++)
116 {
117 const UInt32 *v = kVendors[i];
118 if (v[0] == p->vendor[0] &&
119 v[1] == p->vendor[1] &&
120 v[2] == p->vendor[2])
121 return (int)i;
122 }
123 return -1;
124 }
125
CPU_Is_InOrder()126 Bool CPU_Is_InOrder()
127 {
128 Cx86cpuid p;
129 int firm;
130 UInt32 family, model;
131 if (!x86cpuid_CheckAndRead(&p))
132 return True;
133 family = x86cpuid_GetFamily(&p);
134 model = x86cpuid_GetModel(&p);
135 firm = x86cpuid_GetFirm(&p);
136 switch (firm)
137 {
138 case CPU_FIRM_INTEL: return (family < 6 || (family == 6 && model == 0x100C));
139 case CPU_FIRM_AMD: return (family < 5 || (family == 5 && (model < 6 || model == 0xA)));
140 case CPU_FIRM_VIA: return (family < 6 || (family == 6 && model < 0xF));
141 }
142 return True;
143 }
144
145 #if !defined(MY_CPU_AMD64) && defined(_WIN32)
CPU_Sys_Is_SSE_Supported()146 static Bool CPU_Sys_Is_SSE_Supported()
147 {
148 OSVERSIONINFO vi;
149 vi.dwOSVersionInfoSize = sizeof(vi);
150 if (!GetVersionEx(&vi))
151 return False;
152 return (vi.dwMajorVersion >= 5);
153 }
154 #define CHECK_SYS_SSE_SUPPORT if (!CPU_Sys_Is_SSE_Supported()) return False;
155 #else
156 #define CHECK_SYS_SSE_SUPPORT
157 #endif
158
CPU_Is_Aes_Supported()159 Bool CPU_Is_Aes_Supported()
160 {
161 Cx86cpuid p;
162 CHECK_SYS_SSE_SUPPORT
163 if (!x86cpuid_CheckAndRead(&p))
164 return False;
165 return (p.c >> 25) & 1;
166 }
167
168 #endif
169