1 /**************************************************************************
2 *
3 * Copyright 2008 Dennis Smit
4 * All Rights Reserved.
5 *
6 * Permission is hereby granted, free of charge, to any person obtaining a
7 * copy of this software and associated documentation files (the "Software"),
8 * to deal in the Software without restriction, including without limitation
9 * on the rights to use, copy, modify, merge, publish, distribute, sub
10 * license, and/or sell copies of the Software, and to permit persons to whom
11 * the Software is furnished to do so, subject to the following conditions:
12 *
13 * The above copyright notice and this permission notice (including the next
14 * paragraph) shall be included in all copies or substantial portions of the
15 * Software.
16 *
17 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
18 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
19 * FITNESS FOR A PARTICULAR PURPOSE AND NON-INFRINGEMENT. IN NO EVENT SHALL
20 * AUTHORS, COPYRIGHT HOLDERS, AND/OR THEIR SUPPLIERS BE LIABLE FOR ANY CLAIM,
21 * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR
22 * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE
23 * USE OR OTHER DEALINGS IN THE SOFTWARE.
24 *
25 **************************************************************************/
26
27 /**
28 * @file
29 * CPU feature detection.
30 *
31 * @author Dennis Smit
32 * @author Based on the work of Eric Anholt <anholt@FreeBSD.org>
33 */
34
35 #include "pipe/p_config.h"
36
37 #include "u_debug.h"
38 #include "u_cpu_detect.h"
39
40 #if defined(PIPE_ARCH_PPC)
41 #if defined(PIPE_OS_APPLE)
42 #include <sys/sysctl.h>
43 #else
44 #include <signal.h>
45 #include <setjmp.h>
46 #endif
47 #endif
48
49 #if defined(PIPE_OS_NETBSD) || defined(PIPE_OS_OPENBSD)
50 #include <sys/param.h>
51 #include <sys/sysctl.h>
52 #include <machine/cpu.h>
53 #endif
54
55 #if defined(PIPE_OS_FREEBSD)
56 #include <sys/types.h>
57 #include <sys/sysctl.h>
58 #endif
59
60 #if defined(PIPE_OS_LINUX)
61 #include <signal.h>
62 #endif
63
64 #ifdef PIPE_OS_UNIX
65 #include <unistd.h>
66 #endif
67
68 #if defined(PIPE_OS_WINDOWS)
69 #include <windows.h>
70 #if defined(MSVC)
71 #include <intrin.h>
72 #endif
73 #endif
74
75
76 #ifdef DEBUG
77 DEBUG_GET_ONCE_BOOL_OPTION(dump_cpu, "GALLIUM_DUMP_CPU", FALSE)
78 #endif
79
80
81 struct util_cpu_caps util_cpu_caps;
82
83 #if defined(PIPE_ARCH_X86) || defined(PIPE_ARCH_X86_64)
84 static int has_cpuid(void);
85 #endif
86
87
88 #if defined(PIPE_ARCH_PPC) && !defined(PIPE_OS_APPLE)
89 static jmp_buf __lv_powerpc_jmpbuf;
90 static volatile sig_atomic_t __lv_powerpc_canjump = 0;
91
92 static void
sigill_handler(int sig)93 sigill_handler(int sig)
94 {
95 if (!__lv_powerpc_canjump) {
96 signal (sig, SIG_DFL);
97 raise (sig);
98 }
99
100 __lv_powerpc_canjump = 0;
101 longjmp(__lv_powerpc_jmpbuf, 1);
102 }
103 #endif
104
105 #if defined(PIPE_ARCH_PPC)
106 static void
check_os_altivec_support(void)107 check_os_altivec_support(void)
108 {
109 #if defined(PIPE_OS_APPLE)
110 int sels[2] = {CTL_HW, HW_VECTORUNIT};
111 int has_vu = 0;
112 int len = sizeof (has_vu);
113 int err;
114
115 err = sysctl(sels, 2, &has_vu, &len, NULL, 0);
116
117 if (err == 0) {
118 if (has_vu != 0) {
119 util_cpu_caps.has_altivec = 1;
120 }
121 }
122 #else /* !PIPE_OS_APPLE */
123 /* not on Apple/Darwin, do it the brute-force way */
124 /* this is borrowed from the libmpeg2 library */
125 signal(SIGILL, sigill_handler);
126 if (setjmp(__lv_powerpc_jmpbuf)) {
127 signal(SIGILL, SIG_DFL);
128 } else {
129 __lv_powerpc_canjump = 1;
130
131 __asm __volatile
132 ("mtspr 256, %0\n\t"
133 "vand %%v0, %%v0, %%v0"
134 :
135 : "r" (-1));
136
137 signal(SIGILL, SIG_DFL);
138 util_cpu_caps.has_altivec = 1;
139 }
140 #endif /* !PIPE_OS_APPLE */
141 }
142 #endif /* PIPE_ARCH_PPC */
143
144
145 #if defined(PIPE_ARCH_X86) || defined (PIPE_ARCH_X86_64)
has_cpuid(void)146 static int has_cpuid(void)
147 {
148 #if defined(PIPE_ARCH_X86)
149 #if defined(PIPE_OS_GCC)
150 int a, c;
151
152 __asm __volatile
153 ("pushf\n"
154 "popl %0\n"
155 "movl %0, %1\n"
156 "xorl $0x200000, %0\n"
157 "push %0\n"
158 "popf\n"
159 "pushf\n"
160 "popl %0\n"
161 : "=a" (a), "=c" (c)
162 :
163 : "cc");
164
165 return a != c;
166 #else
167 /* FIXME */
168 return 1;
169 #endif
170 #elif defined(PIPE_ARCH_X86_64)
171 return 1;
172 #else
173 return 0;
174 #endif
175 }
176
177
178 /**
179 * @sa cpuid.h included in gcc-4.3 onwards.
180 * @sa http://msdn.microsoft.com/en-us/library/hskdteyh.aspx
181 */
182 static INLINE void
cpuid(uint32_t ax,uint32_t * p)183 cpuid(uint32_t ax, uint32_t *p)
184 {
185 #if defined(PIPE_CC_GCC) && defined(PIPE_ARCH_X86)
186 __asm __volatile (
187 "xchgl %%ebx, %1\n\t"
188 "cpuid\n\t"
189 "xchgl %%ebx, %1"
190 : "=a" (p[0]),
191 "=S" (p[1]),
192 "=c" (p[2]),
193 "=d" (p[3])
194 : "0" (ax)
195 );
196 #elif defined(PIPE_CC_GCC) && defined(PIPE_ARCH_X86_64)
197 __asm __volatile (
198 "cpuid\n\t"
199 : "=a" (p[0]),
200 "=b" (p[1]),
201 "=c" (p[2]),
202 "=d" (p[3])
203 : "0" (ax)
204 );
205 #elif defined(PIPE_CC_MSVC)
206 __cpuid(p, ax);
207 #else
208 p[0] = 0;
209 p[1] = 0;
210 p[2] = 0;
211 p[3] = 0;
212 #endif
213 }
214 #endif /* X86 or X86_64 */
215
216 void
util_cpu_detect(void)217 util_cpu_detect(void)
218 {
219 static boolean util_cpu_detect_initialized = FALSE;
220
221 if(util_cpu_detect_initialized)
222 return;
223
224 memset(&util_cpu_caps, 0, sizeof util_cpu_caps);
225
226 /* Count the number of CPUs in system */
227 #if defined(PIPE_OS_WINDOWS)
228 {
229 SYSTEM_INFO system_info;
230 GetSystemInfo(&system_info);
231 util_cpu_caps.nr_cpus = system_info.dwNumberOfProcessors;
232 }
233 #elif defined(PIPE_OS_UNIX) && defined(_SC_NPROCESSORS_ONLN)
234 util_cpu_caps.nr_cpus = sysconf(_SC_NPROCESSORS_ONLN);
235 if (util_cpu_caps.nr_cpus == -1)
236 util_cpu_caps.nr_cpus = 1;
237 #elif defined(PIPE_OS_BSD)
238 {
239 int mib[2], ncpu;
240 int len;
241
242 mib[0] = CTL_HW;
243 mib[1] = HW_NCPU;
244
245 len = sizeof (ncpu);
246 sysctl(mib, 2, &ncpu, &len, NULL, 0);
247 util_cpu_caps.nr_cpus = ncpu;
248 }
249 #else
250 util_cpu_caps.nr_cpus = 1;
251 #endif
252
253 #if defined(PIPE_ARCH_X86) || defined(PIPE_ARCH_X86_64)
254 if (has_cpuid()) {
255 uint32_t regs[4];
256 uint32_t regs2[4];
257
258 util_cpu_caps.cacheline = 32;
259
260 /* Get max cpuid level */
261 cpuid(0x00000000, regs);
262
263 if (regs[0] >= 0x00000001) {
264 unsigned int cacheline;
265
266 cpuid (0x00000001, regs2);
267
268 util_cpu_caps.x86_cpu_type = (regs2[0] >> 8) & 0xf;
269 if (util_cpu_caps.x86_cpu_type == 0xf)
270 util_cpu_caps.x86_cpu_type = 8 + ((regs2[0] >> 20) & 255); /* use extended family (P4, IA64) */
271
272 /* general feature flags */
273 util_cpu_caps.has_tsc = (regs2[3] >> 8) & 1; /* 0x0000010 */
274 util_cpu_caps.has_mmx = (regs2[3] >> 23) & 1; /* 0x0800000 */
275 util_cpu_caps.has_sse = (regs2[3] >> 25) & 1; /* 0x2000000 */
276 util_cpu_caps.has_sse2 = (regs2[3] >> 26) & 1; /* 0x4000000 */
277 util_cpu_caps.has_sse3 = (regs2[2] >> 0) & 1; /* 0x0000001 */
278 util_cpu_caps.has_ssse3 = (regs2[2] >> 9) & 1; /* 0x0000020 */
279 util_cpu_caps.has_sse4_1 = (regs2[2] >> 19) & 1;
280 util_cpu_caps.has_sse4_2 = (regs2[2] >> 20) & 1;
281 util_cpu_caps.has_avx = (regs2[2] >> 28) & 1;
282 util_cpu_caps.has_mmx2 = util_cpu_caps.has_sse; /* SSE cpus supports mmxext too */
283
284 cacheline = ((regs2[1] >> 8) & 0xFF) * 8;
285 if (cacheline > 0)
286 util_cpu_caps.cacheline = cacheline;
287 }
288
289 cpuid(0x80000000, regs);
290
291 if (regs[0] >= 0x80000001) {
292
293 cpuid(0x80000001, regs2);
294
295 util_cpu_caps.has_mmx |= (regs2[3] >> 23) & 1;
296 util_cpu_caps.has_mmx2 |= (regs2[3] >> 22) & 1;
297 util_cpu_caps.has_3dnow = (regs2[3] >> 31) & 1;
298 util_cpu_caps.has_3dnow_ext = (regs2[3] >> 30) & 1;
299 }
300
301 if (regs[0] >= 0x80000006) {
302 cpuid(0x80000006, regs2);
303 util_cpu_caps.cacheline = regs2[2] & 0xFF;
304 }
305
306 if (!util_cpu_caps.has_sse) {
307 util_cpu_caps.has_sse2 = 0;
308 util_cpu_caps.has_sse3 = 0;
309 util_cpu_caps.has_ssse3 = 0;
310 util_cpu_caps.has_sse4_1 = 0;
311 }
312 }
313 #endif /* PIPE_ARCH_X86 || PIPE_ARCH_X86_64 */
314
315 #if defined(PIPE_ARCH_PPC)
316 check_os_altivec_support();
317 #endif /* PIPE_ARCH_PPC */
318
319 #ifdef DEBUG
320 if (debug_get_option_dump_cpu()) {
321 debug_printf("util_cpu_caps.nr_cpus = %u\n", util_cpu_caps.nr_cpus);
322
323 debug_printf("util_cpu_caps.x86_cpu_type = %u\n", util_cpu_caps.x86_cpu_type);
324 debug_printf("util_cpu_caps.cacheline = %u\n", util_cpu_caps.cacheline);
325
326 debug_printf("util_cpu_caps.has_tsc = %u\n", util_cpu_caps.has_tsc);
327 debug_printf("util_cpu_caps.has_mmx = %u\n", util_cpu_caps.has_mmx);
328 debug_printf("util_cpu_caps.has_mmx2 = %u\n", util_cpu_caps.has_mmx2);
329 debug_printf("util_cpu_caps.has_sse = %u\n", util_cpu_caps.has_sse);
330 debug_printf("util_cpu_caps.has_sse2 = %u\n", util_cpu_caps.has_sse2);
331 debug_printf("util_cpu_caps.has_sse3 = %u\n", util_cpu_caps.has_sse3);
332 debug_printf("util_cpu_caps.has_ssse3 = %u\n", util_cpu_caps.has_ssse3);
333 debug_printf("util_cpu_caps.has_sse4_1 = %u\n", util_cpu_caps.has_sse4_1);
334 debug_printf("util_cpu_caps.has_sse4_2 = %u\n", util_cpu_caps.has_sse4_2);
335 debug_printf("util_cpu_caps.has_avx = %u\n", util_cpu_caps.has_avx);
336 debug_printf("util_cpu_caps.has_3dnow = %u\n", util_cpu_caps.has_3dnow);
337 debug_printf("util_cpu_caps.has_3dnow_ext = %u\n", util_cpu_caps.has_3dnow_ext);
338 debug_printf("util_cpu_caps.has_altivec = %u\n", util_cpu_caps.has_altivec);
339 }
340 #endif
341
342 util_cpu_detect_initialized = TRUE;
343 }
344