1 /**************************************************************************
3 * Copyright 2008 Dennis Smit
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:
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
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.
25 **************************************************************************/
29 * CPU feature detection.
32 * @author Based on the work of Eric Anholt <anholt@FreeBSD.org>
35 #include "pipe/p_config.h"
38 #include "u_cpu_detect.h"
40 #if defined(PIPE_ARCH_PPC)
41 #if defined(PIPE_OS_DARWIN)
42 #include <sys/sysctl.h>
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>
55 #if defined(PIPE_OS_FREEBSD)
56 #include <sys/types.h>
57 #include <sys/sysctl.h>
60 #if defined(PIPE_OS_LINUX)
68 #if defined(PIPE_OS_WINDOWS)
73 struct util_cpu_caps util_cpu_caps
;
75 static int has_cpuid(void);
76 static int cpuid(uint32_t ax
, uint32_t *p
);
78 #if defined(PIPE_ARCH_X86)
80 /* The sigill handlers */
81 #if defined(PIPE_OS_LINUX) //&& defined(_POSIX_SOURCE) && defined(X86_FXSR_MAGIC)
83 sigill_handler_sse(int signal
, struct sigcontext sc
)
85 /* Both the "xorps %%xmm0,%%xmm0" and "divps %xmm0,%%xmm1"
86 * instructions are 3 bytes long. We must increment the instruction
87 * pointer manually to avoid repeated execution of the offending
90 * If the SIGILL is caused by a divide-by-zero when unmasked
91 * exceptions aren't supported, the SIMD FPU status and control
92 * word will be restored at the end of the test, so we don't need
93 * to worry about doing it here. Besides, we may not be able to...
97 util_cpu_caps
.has_sse
=0;
101 sigfpe_handler_sse(int signal
, struct sigcontext sc
)
103 if (sc
.fpstate
->magic
!= 0xffff) {
104 /* Our signal context has the extended FPU state, so reset the
105 * divide-by-zero exception mask and clear the divide-by-zero
108 sc
.fpstate
->mxcsr
|= 0x00000200;
109 sc
.fpstate
->mxcsr
&= 0xfffffffb;
111 /* If we ever get here, we're completely hosed.
115 #endif /* PIPE_OS_LINUX && _POSIX_SOURCE && X86_FXSR_MAGIC */
117 #if defined(PIPE_OS_WINDOWS)
119 win32_sig_handler_sse(EXCEPTION_POINTERS
* ep
)
121 if(ep
->ExceptionRecord
->ExceptionCode
==EXCEPTION_ILLEGAL_INSTRUCTION
){
122 ep
->ContextRecord
->Eip
+=3;
123 util_cpu_caps
.has_sse
=0;
124 return EXCEPTION_CONTINUE_EXECUTION
;
126 return EXCEPTION_CONTINUE_SEARCH
;
128 #endif /* PIPE_OS_WINDOWS */
130 #endif /* PIPE_ARCH_X86 */
133 #if defined(PIPE_ARCH_PPC) && !defined(PIPE_OS_DARWIN)
134 static jmp_buf __lv_powerpc_jmpbuf
;
135 static volatile sig_atomic_t __lv_powerpc_canjump
= 0;
138 sigill_handler(int sig
)
140 if (!__lv_powerpc_canjump
) {
141 signal (sig
, SIG_DFL
);
145 __lv_powerpc_canjump
= 0;
146 longjmp(__lv_powerpc_jmpbuf
, 1);
150 #if defined(PIPE_ARCH_PPC)
152 check_os_altivec_support(void)
154 #if defined(PIPE_OS_DARWIN)
155 int sels
[2] = {CTL_HW
, HW_VECTORUNIT
};
157 int len
= sizeof (has_vu
);
160 err
= sysctl(sels
, 2, &has_vu
, &len
, NULL
, 0);
164 util_cpu_caps
.has_altivec
= 1;
167 #else /* !PIPE_OS_DARWIN */
168 /* no Darwin, do it the brute-force way */
169 /* this is borrowed from the libmpeg2 library */
170 signal(SIGILL
, sigill_handler
);
171 if (setjmp(__lv_powerpc_jmpbuf
)) {
172 signal(SIGILL
, SIG_DFL
);
174 __lv_powerpc_canjump
= 1;
178 "vand %%v0, %%v0, %%v0"
182 signal(SIGILL
, SIG_DFL
);
183 util_cpu_caps
.has_altivec
= 1;
185 #endif /* PIPE_OS_DARWIN */
187 #endif /* PIPE_ARCH_PPC */
189 /* If we're running on a processor that can do SSE, let's see if we
190 * are allowed to or not. This will catch 2.4.0 or later kernels that
191 * haven't been configured for a Pentium III but are running on one,
192 * and RedHat patched 2.2 kernels that have broken exception handling
193 * support for user space apps that do SSE.
195 #if defined(PIPE_ARCH_X86) || defined (PIPE_ARCH_X86_64)
197 check_os_katmai_support(void)
199 #if defined(PIPE_ARCH_X86)
200 #if defined(PIPE_OS_FREEBSD)
202 int len
= sizeof (has_sse
);
204 ret
= sysctlbyname("hw.instruction_sse", &has_sse
, &len
, NULL
, 0);
206 util_cpu_caps
.has_sse
=0;
208 #elif defined(PIPE_OS_NETBSD) || defined(PIPE_OS_OPENBSD)
209 int has_sse
, has_sse2
, ret
, mib
[2];
212 mib
[0] = CTL_MACHDEP
;
214 varlen
= sizeof (has_sse
);
216 ret
= sysctl(mib
, 2, &has_sse
, &varlen
, NULL
, 0);
217 if (ret
< 0 || !has_sse
) {
218 util_cpu_caps
.has_sse
= 0;
220 util_cpu_caps
.has_sse
= 1;
224 varlen
= sizeof (has_sse2
);
225 ret
= sysctl(mib
, 2, &has_sse2
, &varlen
, NULL
, 0);
226 if (ret
< 0 || !has_sse2
) {
227 util_cpu_caps
.has_sse2
= 0;
229 util_cpu_caps
.has_sse2
= 1;
231 util_cpu_caps
.has_sse
= 0; /* FIXME ?!?!? */
233 #elif defined(PIPE_OS_WINDOWS)
234 LPTOP_LEVEL_EXCEPTION_FILTER exc_fil
;
235 if (util_cpu_caps
.has_sse
) {
236 exc_fil
= SetUnhandledExceptionFilter(win32_sig_handler_sse
);
237 #if defined(PIPE_CC_GCC)
238 __asm
__volatile ("xorps %xmm0, %xmm0");
239 #elif defined(PIPE_CC_MSVC)
241 xorps xmm0
, xmm0
// executing SSE instruction
244 #error Unsupported compiler
246 SetUnhandledExceptionFilter(exc_fil
);
248 #elif defined(PIPE_OS_LINUX)
249 struct sigaction saved_sigill
;
250 struct sigaction saved_sigfpe
;
252 /* Save the original signal handlers.
254 sigaction(SIGILL
, NULL
, &saved_sigill
);
255 sigaction(SIGFPE
, NULL
, &saved_sigfpe
);
257 signal(SIGILL
, (void (*)(int))sigill_handler_sse
);
258 signal(SIGFPE
, (void (*)(int))sigfpe_handler_sse
);
260 /* Emulate test for OSFXSR in CR4. The OS will set this bit if it
261 * supports the extended FPU save and restore required for SSE. If
262 * we execute an SSE instruction on a PIII and get a SIGILL, the OS
263 * doesn't support Streaming SIMD Exceptions, even if the processor
266 if (util_cpu_caps
.has_sse
) {
267 __asm
__volatile ("xorps %xmm1, %xmm0");
270 /* Emulate test for OSXMMEXCPT in CR4. The OS will set this bit if
271 * it supports unmasked SIMD FPU exceptions. If we unmask the
272 * exceptions, do a SIMD divide-by-zero and get a SIGILL, the OS
273 * doesn't support unmasked SIMD FPU exceptions. If we get a SIGFPE
274 * as expected, we're okay but we need to clean up after it.
276 * Are we being too stringent in our requirement that the OS support
277 * unmasked exceptions? Certain RedHat 2.2 kernels enable SSE by
278 * setting CR4.OSFXSR but don't support unmasked exceptions. Win98
279 * doesn't even support them. We at least know the user-space SSE
280 * support is good in kernels that do support unmasked exceptions,
281 * and therefore to be safe I'm going to leave this test in here.
283 if (util_cpu_caps
.has_sse
) {
284 // test_os_katmai_exception_support();
287 /* Restore the original signal handlers.
289 sigaction(SIGILL
, &saved_sigill
, NULL
);
290 sigaction(SIGFPE
, &saved_sigfpe
, NULL
);
293 /* We can't use POSIX signal handling to test the availability of
294 * SSE, so we disable it by default.
296 util_cpu_caps
.has_sse
= 0;
297 #endif /* __linux__ */
300 #if defined(PIPE_ARCH_X86_64)
301 util_cpu_caps
.has_sse
= 1;
306 static int has_cpuid(void)
308 #if defined(PIPE_ARCH_X86)
309 #if defined(PIPE_OS_GCC)
316 "xorl $0x200000, %0\n"
330 #elif defined(PIPE_ARCH_X86_64)
339 * @sa cpuid.h included in gcc-4.3 onwards.
342 cpuid(uint32_t ax
, uint32_t *p
)
346 #if defined(PIPE_CC_GCC) && defined(PIPE_ARCH_X86)
348 "xchgl %%ebx, %1\n\t"
358 #elif defined(PIPE_CC_GCC) && defined(PIPE_ARCH_X86_64)
368 #elif defined(PIPE_CC_MSVC)
376 #endif /* X86 or X86_64 */
379 util_cpu_detect(void)
381 static boolean util_cpu_detect_initialized
= FALSE
;
383 if(util_cpu_detect_initialized
)
386 memset(&util_cpu_caps
, 0, sizeof util_cpu_caps
);
388 /* Check for arch type */
389 #if defined(PIPE_ARCH_MIPS)
390 util_cpu_caps
.arch
= UTIL_CPU_ARCH_MIPS
;
391 #elif defined(PIPE_ARCH_ALPHA)
392 util_cpu_caps
.arch
= UTIL_CPU_ARCH_ALPHA
;
393 #elif defined(PIPE_ARCH_SPARC)
394 util_cpu_caps
.arch
= UTIL_CPU_ARCH_SPARC
;
395 #elif defined(PIPE_ARCH_X86) || defined(PIPE_ARCH_X86_64)
396 util_cpu_caps
.arch
= UTIL_CPU_ARCH_X86
;
397 util_cpu_caps
.little_endian
= 1;
398 #elif defined(PIPE_ARCH_PPC)
399 util_cpu_caps
.arch
= UTIL_CPU_ARCH_POWERPC
;
400 util_cpu_caps
.little_endian
= 0;
402 util_cpu_caps
.arch
= UTIL_CPU_ARCH_UNKNOWN
;
405 /* Count the number of CPUs in system */
406 #if defined(PIPE_OS_WINDOWS)
408 SYSTEM_INFO system_info
;
409 GetSystemInfo(&system_info
);
410 util_cpu_caps
.nr_cpus
= system_info
.dwNumberOfProcessors
;
412 #elif defined(PIPE_OS_UNIX) && defined(_SC_NPROCESSORS_ONLN)
413 util_cpu_caps
.nr_cpus
= sysconf(_SC_NPROCESSORS_ONLN
);
414 if (util_cpu_caps
.nr_cpus
== -1)
415 util_cpu_caps
.nr_cpus
= 1;
416 #elif defined(PIPE_OS_BSD)
425 sysctl(mib
, 2, &ncpu
, &len
, NULL
, 0);
426 util_cpu_caps
.nr_cpus
= ncpu
;
429 util_cpu_caps
.nr_cpus
= 1;
432 #if defined(PIPE_ARCH_X86) || defined(PIPE_ARCH_X86_64)
437 util_cpu_caps
.cacheline
= 32;
439 /* Get max cpuid level */
440 cpuid(0x00000000, regs
);
442 if (regs
[0] >= 0x00000001) {
443 unsigned int cacheline
;
445 cpuid (0x00000001, regs2
);
447 util_cpu_caps
.x86_cpu_type
= (regs2
[0] >> 8) & 0xf;
448 if (util_cpu_caps
.x86_cpu_type
== 0xf)
449 util_cpu_caps
.x86_cpu_type
= 8 + ((regs2
[0] >> 20) & 255); /* use extended family (P4, IA64) */
451 /* general feature flags */
452 util_cpu_caps
.has_tsc
= (regs2
[3] & (1 << 8 )) >> 8; /* 0x0000010 */
453 util_cpu_caps
.has_mmx
= (regs2
[3] & (1 << 23 )) >> 23; /* 0x0800000 */
454 util_cpu_caps
.has_sse
= (regs2
[3] & (1 << 25 )) >> 25; /* 0x2000000 */
455 util_cpu_caps
.has_sse2
= (regs2
[3] & (1 << 26 )) >> 26; /* 0x4000000 */
456 util_cpu_caps
.has_sse3
= (regs2
[2] & (1)); /* 0x0000001 */
457 util_cpu_caps
.has_ssse3
= (regs2
[2] & (1 << 9 )) >> 9; /* 0x0000020 */
458 util_cpu_caps
.has_sse4_1
= (regs2
[2] & (1 << 19)) >> 19;
459 util_cpu_caps
.has_mmx2
= util_cpu_caps
.has_sse
; /* SSE cpus supports mmxext too */
461 cacheline
= ((regs2
[1] >> 8) & 0xFF) * 8;
463 util_cpu_caps
.cacheline
= cacheline
;
466 cpuid(0x80000000, regs
);
468 if (regs
[0] >= 0x80000001) {
470 cpuid(0x80000001, regs2
);
472 util_cpu_caps
.has_mmx
|= (regs2
[3] & (1 << 23 )) >> 23; /* 0x0800000 */
473 util_cpu_caps
.has_mmx2
|= (regs2
[3] & (1 << 22 )) >> 22; /* 0x400000 */
474 util_cpu_caps
.has_3dnow
= (regs2
[3] & (1 << 31 )) >> 31; /* 0x80000000 */
475 util_cpu_caps
.has_3dnow_ext
= (regs2
[3] & (1 << 30 )) >> 30;
478 if (regs
[0] >= 0x80000006) {
479 cpuid(0x80000006, regs2
);
480 util_cpu_caps
.cacheline
= regs2
[2] & 0xFF;
483 if (util_cpu_caps
.has_sse
)
484 check_os_katmai_support();
486 if (!util_cpu_caps
.has_sse
) {
487 util_cpu_caps
.has_sse2
= 0;
488 util_cpu_caps
.has_sse3
= 0;
489 util_cpu_caps
.has_ssse3
= 0;
490 util_cpu_caps
.has_sse4_1
= 0;
493 #endif /* PIPE_ARCH_X86 || PIPE_ARCH_X86_64 */
495 #if defined(PIPE_ARCH_PPC)
496 check_os_altivec_support();
497 #endif /* PIPE_ARCH_PPC */
500 debug_printf("util_cpu_caps.arch = %i\n", util_cpu_caps
.arch
);
501 debug_printf("util_cpu_caps.nr_cpus = %u\n", util_cpu_caps
.nr_cpus
);
503 debug_printf("util_cpu_caps.x86_cpu_type = %u\n", util_cpu_caps
.x86_cpu_type
);
504 debug_printf("util_cpu_caps.cacheline = %u\n", util_cpu_caps
.cacheline
);
506 debug_printf("util_cpu_caps.has_tsc = %u\n", util_cpu_caps
.has_tsc
);
507 debug_printf("util_cpu_caps.has_mmx = %u\n", util_cpu_caps
.has_mmx
);
508 debug_printf("util_cpu_caps.has_mmx2 = %u\n", util_cpu_caps
.has_mmx2
);
509 debug_printf("util_cpu_caps.has_sse = %u\n", util_cpu_caps
.has_sse
);
510 debug_printf("util_cpu_caps.has_sse2 = %u\n", util_cpu_caps
.has_sse2
);
511 debug_printf("util_cpu_caps.has_sse3 = %u\n", util_cpu_caps
.has_sse3
);
512 debug_printf("util_cpu_caps.has_ssse3 = %u\n", util_cpu_caps
.has_ssse3
);
513 debug_printf("util_cpu_caps.has_sse4_1 = %u\n", util_cpu_caps
.has_sse4_1
);
514 debug_printf("util_cpu_caps.has_3dnow = %u\n", util_cpu_caps
.has_3dnow
);
515 debug_printf("util_cpu_caps.has_3dnow_ext = %u\n", util_cpu_caps
.has_3dnow_ext
);
516 debug_printf("util_cpu_caps.has_altivec = %u\n", util_cpu_caps
.has_altivec
);
519 util_cpu_detect_initialized
= TRUE
;