Line data Source code
1 : /*
2 : * CPU detection code, extracted from mmx.h
3 : * (c)1997-99 by H. Dietz and R. Fisher
4 : * Converted to C and improved by Fabrice Bellard.
5 : *
6 : * This file is part of Libav.
7 : *
8 : * Libav is free software; you can redistribute it and/or
9 : * modify it under the terms of the GNU Lesser General Public
10 : * License as published by the Free Software Foundation; either
11 : * version 2.1 of the License, or (at your option) any later version.
12 : *
13 : * Libav is distributed in the hope that it will be useful,
14 : * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 : * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16 : * Lesser General Public License for more details.
17 : *
18 : * You should have received a copy of the GNU Lesser General Public
19 : * License along with Libav; if not, write to the Free Software
20 : * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
21 : */
22 :
23 : #include <stdlib.h>
24 : #include <string.h>
25 :
26 : #include "libavutil/x86/asm.h"
27 : #include "libavutil/x86/cpu.h"
28 : #include "libavutil/cpu.h"
29 : #include "libavutil/cpu_internal.h"
30 :
31 : #if HAVE_YASM
32 :
33 : #define cpuid(index, eax, ebx, ecx, edx) \
34 : ff_cpu_cpuid(index, &eax, &ebx, &ecx, &edx)
35 :
36 : #define xgetbv(index, eax, edx) \
37 : ff_cpu_xgetbv(index, &eax, &edx)
38 :
39 : #elif HAVE_INLINE_ASM
40 :
41 : /* ebx saving is necessary for PIC. gcc seems unable to see it alone */
42 : #define cpuid(index, eax, ebx, ecx, edx) \
43 : __asm__ volatile ( \
44 : "mov %%"REG_b", %%"REG_S" \n\t" \
45 : "cpuid \n\t" \
46 : "xchg %%"REG_b", %%"REG_S \
47 : : "=a" (eax), "=S" (ebx), "=c" (ecx), "=d" (edx) \
48 : : "0" (index))
49 :
50 : #define xgetbv(index, eax, edx) \
51 : __asm__ (".byte 0x0f, 0x01, 0xd0" : "=a"(eax), "=d"(edx) : "c" (index))
52 :
53 : #define get_eflags(x) \
54 : __asm__ volatile ("pushfl \n" \
55 : "pop %0 \n" \
56 : : "=r"(x))
57 :
58 : #define set_eflags(x) \
59 : __asm__ volatile ("push %0 \n" \
60 : "popfl \n" \
61 : :: "r"(x))
62 :
63 : #endif /* HAVE_INLINE_ASM */
64 :
65 : #if ARCH_X86_64
66 :
67 : #define cpuid_test() 1
68 :
69 : #elif HAVE_YASM
70 :
71 : #define cpuid_test ff_cpu_cpuid_test
72 :
73 : #elif HAVE_INLINE_ASM
74 :
75 : static int cpuid_test(void)
76 : {
77 : x86_reg a, c;
78 :
79 : /* Check if CPUID is supported by attempting to toggle the ID bit in
80 : * the EFLAGS register. */
81 : get_eflags(a);
82 : set_eflags(a ^ 0x200000);
83 : get_eflags(c);
84 :
85 : return a != c;
86 : }
87 : #endif
88 :
89 : /* Function to test if multimedia instructions are supported... */
90 0 : int ff_get_cpu_flags_x86(void)
91 : {
92 0 : int rval = 0;
93 :
94 : #ifdef cpuid
95 :
96 : int eax, ebx, ecx, edx;
97 0 : int max_std_level, max_ext_level, std_caps = 0, ext_caps = 0;
98 0 : int family = 0, model = 0;
99 : union { int i[3]; char c[12]; } vendor;
100 :
101 : if (!cpuid_test())
102 : return 0; /* CPUID not supported */
103 :
104 0 : cpuid(0, max_std_level, vendor.i[0], vendor.i[2], vendor.i[1]);
105 :
106 0 : if (max_std_level >= 1) {
107 0 : cpuid(1, eax, ebx, ecx, std_caps);
108 0 : family = ((eax >> 8) & 0xf) + ((eax >> 20) & 0xff);
109 0 : model = ((eax >> 4) & 0xf) + ((eax >> 12) & 0xf0);
110 0 : if (std_caps & (1 << 15))
111 0 : rval |= AV_CPU_FLAG_CMOV;
112 0 : if (std_caps & (1 << 23))
113 0 : rval |= AV_CPU_FLAG_MMX;
114 0 : if (std_caps & (1 << 25))
115 0 : rval |= AV_CPU_FLAG_MMXEXT;
116 : #if HAVE_SSE
117 0 : if (std_caps & (1 << 25))
118 0 : rval |= AV_CPU_FLAG_SSE;
119 0 : if (std_caps & (1 << 26))
120 0 : rval |= AV_CPU_FLAG_SSE2;
121 0 : if (ecx & 1)
122 0 : rval |= AV_CPU_FLAG_SSE3;
123 0 : if (ecx & 0x00000200 )
124 0 : rval |= AV_CPU_FLAG_SSSE3;
125 0 : if (ecx & 0x00080000 )
126 0 : rval |= AV_CPU_FLAG_SSE4;
127 0 : if (ecx & 0x00100000 )
128 0 : rval |= AV_CPU_FLAG_SSE42;
129 : #if HAVE_AVX
130 : /* Check OXSAVE and AVX bits */
131 0 : if ((ecx & 0x18000000) == 0x18000000) {
132 : /* Check for OS support */
133 0 : xgetbv(0, eax, edx);
134 0 : if ((eax & 0x6) == 0x6) {
135 0 : rval |= AV_CPU_FLAG_AVX;
136 0 : if (ecx & 0x00001000)
137 0 : rval |= AV_CPU_FLAG_FMA3;
138 : }
139 : }
140 : #endif /* HAVE_AVX */
141 : #endif /* HAVE_SSE */
142 : }
143 0 : if (max_std_level >= 7) {
144 0 : cpuid(7, eax, ebx, ecx, edx);
145 : #if HAVE_AVX2
146 0 : if (ebx & 0x00000020)
147 0 : rval |= AV_CPU_FLAG_AVX2;
148 : #endif /* HAVE_AVX2 */
149 : /* BMI1/2 don't need OS support */
150 0 : if (ebx & 0x00000008) {
151 0 : rval |= AV_CPU_FLAG_BMI1;
152 0 : if (ebx & 0x00000100)
153 0 : rval |= AV_CPU_FLAG_BMI2;
154 : }
155 : }
156 :
157 0 : cpuid(0x80000000, max_ext_level, ebx, ecx, edx);
158 :
159 0 : if (max_ext_level >= 0x80000001) {
160 0 : cpuid(0x80000001, eax, ebx, ecx, ext_caps);
161 0 : if (ext_caps & (1U << 31))
162 0 : rval |= AV_CPU_FLAG_3DNOW;
163 0 : if (ext_caps & (1 << 30))
164 0 : rval |= AV_CPU_FLAG_3DNOWEXT;
165 0 : if (ext_caps & (1 << 23))
166 0 : rval |= AV_CPU_FLAG_MMX;
167 0 : if (ext_caps & (1 << 22))
168 0 : rval |= AV_CPU_FLAG_MMXEXT;
169 :
170 : /* Allow for selectively disabling SSE2 functions on AMD processors
171 : with SSE2 support but not SSE4a. This includes Athlon64, some
172 : Opteron, and some Sempron processors. MMX, SSE, or 3DNow! are faster
173 : than SSE2 often enough to utilize this special-case flag.
174 : AV_CPU_FLAG_SSE2 and AV_CPU_FLAG_SSE2SLOW are both set in this case
175 : so that SSE2 is used unless explicitly disabled by checking
176 : AV_CPU_FLAG_SSE2SLOW. */
177 0 : if (!strncmp(vendor.c, "AuthenticAMD", 12) &&
178 0 : rval & AV_CPU_FLAG_SSE2 && !(ecx & 0x00000040)) {
179 0 : rval |= AV_CPU_FLAG_SSE2SLOW;
180 : }
181 :
182 : /* XOP and FMA4 use the AVX instruction coding scheme, so they can't be
183 : * used unless the OS has AVX support. */
184 0 : if (rval & AV_CPU_FLAG_AVX) {
185 0 : if (ecx & 0x00000800)
186 0 : rval |= AV_CPU_FLAG_XOP;
187 0 : if (ecx & 0x00010000)
188 0 : rval |= AV_CPU_FLAG_FMA4;
189 : }
190 : }
191 :
192 0 : if (!strncmp(vendor.c, "GenuineIntel", 12)) {
193 0 : if (family == 6 && (model == 9 || model == 13 || model == 14)) {
194 : /* 6/9 (pentium-m "banias"), 6/13 (pentium-m "dothan"), and
195 : * 6/14 (core1 "yonah") theoretically support sse2, but it's
196 : * usually slower than mmx, so let's just pretend they don't.
197 : * AV_CPU_FLAG_SSE2 is disabled and AV_CPU_FLAG_SSE2SLOW is
198 : * enabled so that SSE2 is not used unless explicitly enabled
199 : * by checking AV_CPU_FLAG_SSE2SLOW. The same situation
200 : * applies for AV_CPU_FLAG_SSE3 and AV_CPU_FLAG_SSE3SLOW. */
201 0 : if (rval & AV_CPU_FLAG_SSE2)
202 0 : rval ^= AV_CPU_FLAG_SSE2SLOW | AV_CPU_FLAG_SSE2;
203 0 : if (rval & AV_CPU_FLAG_SSE3)
204 0 : rval ^= AV_CPU_FLAG_SSE3SLOW | AV_CPU_FLAG_SSE3;
205 : }
206 : /* The Atom processor has SSSE3 support, which is useful in many cases,
207 : * but sometimes the SSSE3 version is slower than the SSE2 equivalent
208 : * on the Atom, but is generally faster on other processors supporting
209 : * SSSE3. This flag allows for selectively disabling certain SSSE3
210 : * functions on the Atom. */
211 0 : if (family == 6 && model == 28)
212 0 : rval |= AV_CPU_FLAG_ATOM;
213 : }
214 :
215 : #endif /* cpuid */
216 :
217 0 : return rval;
218 : }
|