* ./src/playlist/playlist.c: lots of playlist behaviour enhancements.
[vlc.git] / src / misc / cpu.c
1 /*****************************************************************************
2  * cpu.c: CPU detection code
3  *****************************************************************************
4  * Copyright (C) 1998-2002 VideoLAN
5  * $Id: cpu.c,v 1.4 2002/06/07 14:30:41 sam Exp $
6  *
7  * Authors: Samuel Hocevar <sam@zoy.org>
8  *          Christophe Massiot <massiot@via.ecp.fr>
9  *          Eugenio Jarosiewicz <ej0@cise.ufl.eduEujenio>
10  *
11  * This program is free software; you can redistribute it and/or modify
12  * it under the terms of the GNU General Public License as published by
13  * the Free Software Foundation; either version 2 of the License, or
14  * (at your option) any later version.
15  *
16  * This program is distributed in the hope that it will be useful,
17  * but WITHOUT ANY WARRANTY; without even the implied warranty of
18  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
19  * GNU General Public License for more details.
20  *
21  * You should have received a copy of the GNU General Public License
22  * along with this program; if not, write to the Free Software
23  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111, USA.
24  *****************************************************************************/
25
26 /*****************************************************************************
27  * Preamble
28  *****************************************************************************/
29 #include <signal.h>                               /* SIGHUP, SIGINT, SIGKILL */
30 #include <setjmp.h>                                       /* longjmp, setjmp */
31
32 #include <vlc/vlc.h>
33
34 #ifdef SYS_DARWIN
35 #   include <mach/mach.h>                               /* AltiVec detection */
36 #   include <mach/mach_error.h>       /* some day the header files||compiler *
37                                                        will define it for us */
38 #   include <mach/bootstrap.h>
39 #endif
40
41 #include "vlc_cpu.h"
42
43 /*****************************************************************************
44  * Local prototypes
45  *****************************************************************************/
46 static void IllegalSignalHandler( int i_signal );
47
48 /*****************************************************************************
49  * Global variables - they're needed for signal handling
50  *****************************************************************************/
51 static jmp_buf env;
52 static int     i_illegal;
53 #if defined( __i386__ )
54 static char   *psz_capability;
55 #endif
56
57 /*****************************************************************************
58  * CPUCapabilities: list the processors MMX support and other capabilities
59  *****************************************************************************
60  * This function is called to list extensions the CPU may have.
61  *****************************************************************************/
62 u32 __CPUCapabilities( vlc_object_t *p_this )
63 {
64     volatile u32 i_capabilities = CPU_CAPABILITY_NONE;
65
66 #if defined( SYS_DARWIN )
67     struct host_basic_info hi;
68     kern_return_t          ret;
69     host_name_port_t       host;
70
71     int i_size;
72     char *psz_name, *psz_subname;
73
74     i_capabilities |= CPU_CAPABILITY_FPU;
75
76     /* Should 'never' fail? */
77     host = mach_host_self();
78
79     i_size = sizeof( hi ) / sizeof( int );
80     ret = host_info( host, HOST_BASIC_INFO, ( host_info_t )&hi, &i_size );
81
82     if( ret != KERN_SUCCESS )
83     {
84         fprintf( stderr, "error: couldn't get CPU information\n" );
85         return i_capabilities;
86     }
87
88     slot_name( hi.cpu_type, hi.cpu_subtype, &psz_name, &psz_subname );
89     /* FIXME: need better way to detect newer proccessors.
90      * could do strncmp(a,b,5), but that's real ugly */
91     if( !strcmp(psz_name, "ppc7400") || !strcmp(psz_name, "ppc7450") )
92     {
93         i_capabilities |= CPU_CAPABILITY_ALTIVEC;
94     }
95
96     return i_capabilities;
97
98 #elif defined( __i386__ )
99     volatile unsigned int  i_eax, i_ebx, i_ecx, i_edx;
100     volatile vlc_bool_t    b_amd;
101
102     /* Needed for x86 CPU capabilities detection */
103 #   define cpuid( a )                      \
104         asm volatile ( "pushl %%ebx\n\t"   \
105                        "cpuid\n\t"         \
106                        "movl %%ebx,%1\n\t" \
107                        "popl %%ebx\n\t"    \
108                      : "=a" ( i_eax ),     \
109                        "=r" ( i_ebx ),     \
110                        "=c" ( i_ecx ),     \
111                        "=d" ( i_edx )      \
112                      : "a"  ( a )          \
113                      : "cc" );
114
115     i_capabilities |= CPU_CAPABILITY_FPU;
116
117 #   if defined( CAN_COMPILE_SSE ) || defined ( CAN_COMPILE_3DNOW )
118     signal( SIGILL, IllegalSignalHandler );
119 #   endif
120
121     /* test for a 486 CPU */
122     asm volatile ( "pushl %%ebx\n\t"
123                    "pushfl\n\t"
124                    "popl %%eax\n\t"
125                    "movl %%eax, %%ebx\n\t"
126                    "xorl $0x200000, %%eax\n\t"
127                    "pushl %%eax\n\t"
128                    "popfl\n\t"
129                    "pushfl\n\t"
130                    "popl %%eax\n\t"
131                    "movl %%ebx,%1\n\t"
132                    "popl %%ebx\n\t"
133                  : "=a" ( i_eax ),
134                    "=r" ( i_ebx )
135                  :
136                  : "cc" );
137
138     if( i_eax == i_ebx )
139     {
140 #   if defined( CAN_COMPILE_SSE ) || defined ( CAN_COMPILE_3DNOW )
141         signal( SIGILL, NULL );
142 #   endif
143         return i_capabilities;
144     }
145
146     i_capabilities |= CPU_CAPABILITY_486;
147
148     /* the CPU supports the CPUID instruction - get its level */
149     cpuid( 0x00000000 );
150
151     if( !i_eax )
152     {
153 #   if defined( CAN_COMPILE_SSE ) || defined ( CAN_COMPILE_3DNOW )
154         signal( SIGILL, NULL );
155 #   endif
156         return i_capabilities;
157     }
158
159     /* FIXME: this isn't correct, since some 486s have cpuid */
160     i_capabilities |= CPU_CAPABILITY_586;
161
162     /* borrowed from mpeg2dec */
163     b_amd = ( i_ebx == 0x68747541 ) && ( i_ecx == 0x444d4163 )
164                     && ( i_edx == 0x69746e65 );
165
166     /* test for the MMX flag */
167     cpuid( 0x00000001 );
168
169     if( ! (i_edx & 0x00800000) )
170     {
171 #   if defined( CAN_COMPILE_SSE ) || defined ( CAN_COMPILE_3DNOW )
172         signal( SIGILL, NULL );
173 #   endif
174         return i_capabilities;
175     }
176
177     i_capabilities |= CPU_CAPABILITY_MMX;
178
179     if( i_edx & 0x02000000 )
180     {
181         i_capabilities |= CPU_CAPABILITY_MMXEXT;
182
183 #   ifdef CAN_COMPILE_SSE
184         /* We test if OS supports the SSE instructions */
185         psz_capability = "SSE";
186         i_illegal = 0;
187
188         vlc_mutex_lock( p_this->p_vlc->p_global_lock );
189         if( setjmp( env ) == 0 )
190         {
191             /* Test a SSE instruction */
192             __asm__ __volatile__ ( "xorps %%xmm0,%%xmm0\n" : : );
193         }
194         vlc_mutex_unlock( p_this->p_vlc->p_global_lock );
195
196         if( i_illegal == 0 )
197         {
198             i_capabilities |= CPU_CAPABILITY_SSE;
199         }
200 #   endif
201     }
202
203     /* test for additional capabilities */
204     cpuid( 0x80000000 );
205
206     if( i_eax < 0x80000001 )
207     {
208 #   if defined( CAN_COMPILE_SSE ) || defined ( CAN_COMPILE_3DNOW )
209         signal( SIGILL, NULL );
210 #   endif
211         return i_capabilities;
212     }
213
214     /* list these additional capabilities */
215     cpuid( 0x80000001 );
216
217 #   ifdef CAN_COMPILE_3DNOW
218     if( i_edx & 0x80000000 )
219     {
220         psz_capability = "3D Now!";
221         i_illegal = 0;
222
223         vlc_mutex_lock( p_this->p_vlc->p_global_lock );
224         if( setjmp( env ) == 0 )
225         {
226             /* Test a 3D Now! instruction */
227             __asm__ __volatile__ ( "pfadd %%mm0,%%mm0\n" "femms\n" : : );
228         }
229         vlc_mutex_unlock( p_this->p_vlc->p_global_lock );
230
231         if( i_illegal == 0 )
232         {
233             i_capabilities |= CPU_CAPABILITY_3DNOW;
234         }
235     }
236 #   endif
237
238     if( b_amd && ( i_edx & 0x00400000 ) )
239     {
240         i_capabilities |= CPU_CAPABILITY_MMXEXT;
241     }
242
243 #   if defined( CAN_COMPILE_SSE ) || defined ( CAN_COMPILE_3DNOW )
244     signal( SIGILL, NULL );
245 #   endif
246     return i_capabilities;
247
248 #elif defined( __powerpc__ )
249
250     i_capabilities |= CPU_CAPABILITY_FPU;
251
252 #   ifdef CAN_COMPILE_ALTIVEC
253     signal( SIGILL, IllegalSignalHandler );
254
255     i_illegal = 0;
256
257     vlc_mutex_lock( p_this->p_vlc->p_global_lock );
258     if( setjmp( env ) == 0 )
259     {
260         asm volatile ("mtspr 256, %0\n\t"
261                       "vand %%v0, %%v0, %%v0"
262                       :
263                       : "r" (-1));
264     }
265     vlc_mutex_unlock( p_this->p_vlc->p_global_lock );
266
267     if( i_illegal == 0 )
268     {
269         i_capabilities |= CPU_CAPABILITY_ALTIVEC;
270     }
271
272     signal( SIGILL, NULL );
273 #   endif
274
275     return i_capabilities;
276
277 #elif defined( __sparc__ )
278
279     i_capabilities |= CPU_CAPABILITY_FPU;
280     return i_capabilities;
281
282 #else
283     /* default behaviour */
284     return i_capabilities;
285
286 #endif
287 }
288
289 /*****************************************************************************
290  * IllegalSignalHandler: system signal handler
291  *****************************************************************************
292  * This function is called when an illegal instruction signal is received by
293  * the program. We use this function to test OS and CPU capabilities
294  *****************************************************************************/
295 static void IllegalSignalHandler( int i_signal )
296 {
297     /* Acknowledge the signal received */
298     i_illegal = 1;
299
300 #ifdef HAVE_SIGRELSE
301     sigrelse( i_signal );
302 #endif
303
304 #if defined( __i386__ )
305     fprintf( stderr, "warning: your CPU has %s instructions, but not your "
306                      "operating system.\n", psz_capability );
307     fprintf( stderr, "         some optimizations will be disabled unless "
308                      "you upgrade your OS\n" );
309 #   if defined( SYS_LINUX )
310     fprintf( stderr, "         (for instance Linux kernel 2.4.x or later)\n" );
311 #   endif
312 #endif
313
314     longjmp( env, 1 );
315 }
316