bump version number to 1.1.3
[flac.git] / src / libFLAC / cpu.c
1 /* libFLAC - Free Lossless Audio Codec library
2  * Copyright (C) 2001,2002,2003,2004,2005,2006  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 }