workbench/libs/mesa/src/gallium/auxiliary/util/u_cpu_detect.c

   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
  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
 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)
 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
 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
 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 }