src/libFLAC/cpu.c

   1 /* libFLAC - Free Lossless Audio Codec library
   2  * Copyright (C) 2001,2002,2003,2004,2005,2006,2007  Josh Coalson
   3  *
   4  * Redistribution and use in source and binary forms, with or without
   5  * modification, are permitted provided that the following conditions
   6  * are met:
   7  *
   8  * - Redistributions of source code must retain the above copyright
   9  * notice, this list of conditions and the following disclaimer.
  10  *
  11  * - Redistributions in binary form must reproduce the above copyright
  12  * notice, this list of conditions and the following disclaimer in the
  13  * documentation and/or other materials provided with the distribution.
  14  *
  15  * - Neither the name of the Xiph.org Foundation nor the names of its
  16  * contributors may be used to endorse or promote products derived from
  17  * this software without specific prior written permission.
  18  *
  19  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
  20  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
  21  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
  22  * A PARTICULAR PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR
  23  * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
  24  * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
  25  * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
  26  * PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
  27  * LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
  28  * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
  29  * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  30  */
  31
  32 #if HAVE_CONFIG_H
  33 #  include <config.h>
  34 #endif
  35
  36 #include "private/cpu.h"
  37 #include <stdlib.h>
  38 #include <stdio.h>
  39
  40 #if defined FLAC__CPU_PPC
  41 # if !defined FLAC__NO_ASM
  42 #  if defined FLAC__SYS_DARWIN
  43 #   include <sys/sysctl.h>
  44 #   include <mach/mach.h>
  45 #   include <mach/mach_host.h>
  46 #   include <mach/host_info.h>
  47 #   include <mach/machine.h>
  48 #   ifndef CPU_SUBTYPE_POWERPC_970
  49 #    define CPU_SUBTYPE_POWERPC_970 ((cpu_subtype_t) 100)
  50 #   endif
  51 #  else /* FLAC__SYS_DARWIN */
  52
  53 #   ifdef __FreeBSD__
  54 #    include <sys/types.h>
  55 #    include <sys/sysctl.h>
  56 #   endif
  57
  58 #   include <signal.h>
  59 #   include <setjmp.h>
  60
  61 static sigjmp_buf jmpbuf;
  62 static volatile sig_atomic_t canjump = 0;
  63
  64 static void sigill_handler (int sig)
  65 {
  66         if (!canjump) {
  67                 signal (sig, SIG_DFL);
  68                 raise (sig);
  69         }
  70         canjump = 0;
  71         siglongjmp (jmpbuf, 1);
  72 }
  73 #  endif /* FLAC__SYS_DARWIN */
  74 # endif /* FLAC__NO_ASM */
  75 #endif /* FLAC__CPU_PPC */
  76
  77 const unsigned FLAC__CPUINFO_IA32_CPUID_CMOV = 0x00008000;
  78 const unsigned FLAC__CPUINFO_IA32_CPUID_MMX = 0x00800000;
  79 const unsigned FLAC__CPUINFO_IA32_CPUID_FXSR = 0x01000000;
  80 const unsigned FLAC__CPUINFO_IA32_CPUID_SSE = 0x02000000;
  81 const unsigned FLAC__CPUINFO_IA32_CPUID_SSE2 = 0x04000000;
  82
  83 const unsigned FLAC__CPUINFO_IA32_CPUID_EXTENDED_AMD_3DNOW = 0x80000000;
  84 const unsigned FLAC__CPUINFO_IA32_CPUID_EXTENDED_AMD_EXT3DNOW = 0x40000000;
  85 const unsigned FLAC__CPUINFO_IA32_CPUID_EXTENDED_AMD_EXTMMX = 0x00400000;
  86
  87
  88 void FLAC__cpu_info(FLAC__CPUInfo *info)
  89 {
  90 #ifdef FLAC__CPU_IA32
  91         info->type = FLAC__CPUINFO_TYPE_IA32;
  92 #if !defined FLAC__NO_ASM && defined FLAC__HAS_NASM
  93         info->use_asm = true;
  94         {
  95                 unsigned cpuid = FLAC__cpu_info_asm_ia32();
  96                 info->data.ia32.cmov = (cpuid & FLAC__CPUINFO_IA32_CPUID_CMOV)? true : false;
  97                 info->data.ia32.mmx = (cpuid & FLAC__CPUINFO_IA32_CPUID_MMX)? true : false;
  98                 info->data.ia32.fxsr = (cpuid & FLAC__CPUINFO_IA32_CPUID_FXSR)? true : false;
  99                 info->data.ia32.sse = (cpuid & FLAC__CPUINFO_IA32_CPUID_SSE)? true : false;
 100                 info->data.ia32.sse2 = (cpuid & FLAC__CPUINFO_IA32_CPUID_SSE2)? true : false;
 101
 102 #ifndef FLAC__SSE_OS
 103                 info->data.ia32.fxsr = info->data.ia32.sse = info->data.ia32.sse2 = false;
 104 #elif defined(__FreeBSD__)
 105                 /* on FreeBSD we can double-check via sysctl whether the OS supports SSE */
 106                 {
 107                         int sse;
 108                         size_t len = sizeof(sse);
 109                         if (sysctlbyname("hw.instruction_sse", &sse, &len, NULL, 0) || !sse)
 110                                 info->data.ia32.fxsr = info->data.ia32.sse = info->data.ia32.sse2 = false;
 111                 }
 112 #endif
 113
 114 #ifdef FLAC__USE_3DNOW
 115                 cpuid = FLAC__cpu_info_extended_amd_asm_ia32();
 116                 info->data.ia32._3dnow = (cpuid & FLAC__CPUINFO_IA32_CPUID_EXTENDED_AMD_3DNOW)? true : false;
 117                 info->data.ia32.ext3dnow = (cpuid & FLAC__CPUINFO_IA32_CPUID_EXTENDED_AMD_EXT3DNOW)? true : false;
 118                 info->data.ia32.extmmx = (cpuid & FLAC__CPUINFO_IA32_CPUID_EXTENDED_AMD_EXTMMX)? true : false;
 119 #else
 120                 info->data.ia32._3dnow = info->data.ia32.ext3dnow = info->data.ia32.extmmx = false;
 121 #endif
 122         }
 123 #else
 124         info->use_asm = false;
 125 #endif
 126 #elif defined FLAC__CPU_PPC
 127         info->type = FLAC__CPUINFO_TYPE_PPC;
 128 #if !defined FLAC__NO_ASM
 129         info->use_asm = true;
 130 #ifdef FLAC__USE_ALTIVEC
 131 #if defined FLAC__SYS_DARWIN
 132         {
 133                 int selectors[2] = { CTL_HW, HW_VECTORUNIT };
 134                 int result = 0;
 135                 size_t length = sizeof(result);
 136                 int error = sysctl(selectors, 2, &result, &length, 0, 0);
 137
 138                 info->data.ppc.altivec = error==0 ? result!=0 : 0;
 139         }
 140         {
 141                 host_basic_info_data_t hostInfo;
 142                 mach_msg_type_number_t infoCount;
 143
 144                 infoCount = HOST_BASIC_INFO_COUNT;
 145                 host_info(mach_host_self(), HOST_BASIC_INFO, (host_info_t)&hostInfo, &infoCount);
 146
 147                 info->data.ppc.ppc64 = (hostInfo.cpu_type == CPU_TYPE_POWERPC) && (hostInfo.cpu_subtype == CPU_SUBTYPE_POWERPC_970);
 148         }
 149 #else /* FLAC__SYS_DARWIN */
 150         {
 151                 /* no Darwin, do it the brute-force way */
 152                 /* this is borrowed from MPlayer from the libmpeg2 library */
 153                 info->data.ppc.altivec = 0;
 154                 info->data.ppc.ppc64 = 0;
 155
 156                 signal (SIGILL, sigill_handler);
 157                 if (!sigsetjmp (jmpbuf, 1)) {
 158                         canjump = 1;
 159
 160                         asm volatile (
 161                                 "mtspr 256, %0\n\t"
 162                                 "vand %%v0, %%v0, %%v0"
 163                                 :
 164                                 : "r" (-1)
 165                         );
 166
 167                         info->data.ppc.altivec = 1;
 168                 }
 169                 canjump = 0;
 170                 if (!sigsetjmp (jmpbuf, 1)) {
 171                         int x = 0;
 172                         canjump = 1;
 173
 174                         /* PPC64 hardware implements the cntlzd instruction */
 175                         asm volatile ("cntlzd %0, %1" : "=r" (x) : "r" (x) );
 176
 177                         info->data.ppc.ppc64 = 1;
 178                 }
 179                 signal (SIGILL, SIG_DFL);
 180         }
 181 #endif /* FLAC__SYS_DARWIN */
 182 #else /* FLAC__USE_ALTIVEC */
 183         info->data.ppc.altivec = 0;
 184         info->data.ppc.ppc64 = 0;
 185 #endif /* FLAC__USE_ALTIVEC */
 186 #else /* FLAC__NO_ASM */
 187         info->use_asm = false;
 188 #endif /* FLAC__NO_ASM */
 189 #else
 190         info->type = FLAC__CPUINFO_TYPE_UNKNOWN;
 191         info->use_asm = false;
 192 #endif
 193 }