git.sesse.net Git - vlc/blob - src/misc/cpu.c

   1 /*****************************************************************************
   2  * cpu.c: CPU detection code
   3  *****************************************************************************
   4  * Copyright (C) 1998-2002 VideoLAN
   5  * $Id: cpu.c,v 1.7 2002/10/03 13:21:55 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 SigHandler   ( int );
  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: get the CPU capabilities
  59  *****************************************************************************
  60  * This function is called to list extensions the CPU may have.
  61  *****************************************************************************/
  62 u32 CPUCapabilities( void )
  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 #   if defined( CAN_COMPILE_SSE ) || defined ( CAN_COMPILE_3DNOW )
 116     void (*pf_sigill) (int) = signal( SIGILL, SigHandler );
 117 #   endif
 118
 119     i_capabilities |= CPU_CAPABILITY_FPU;
 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, pf_sigill );
 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, pf_sigill );
 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, pf_sigill );
 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         if( setjmp( env ) == 0 )
 189         {
 190             /* Test a SSE instruction */
 191             __asm__ __volatile__ ( "xorps %%xmm0,%%xmm0\n" : : );
 192         }
 193
 194         if( i_illegal == 0 )
 195         {
 196             i_capabilities |= CPU_CAPABILITY_SSE;
 197         }
 198 #   endif
 199     }
 200
 201     /* test for additional capabilities */
 202     cpuid( 0x80000000 );
 203
 204     if( i_eax < 0x80000001 )
 205     {
 206 #   if defined( CAN_COMPILE_SSE ) || defined ( CAN_COMPILE_3DNOW )
 207         signal( SIGILL, pf_sigill );
 208 #   endif
 209         return i_capabilities;
 210     }
 211
 212     /* list these additional capabilities */
 213     cpuid( 0x80000001 );
 214
 215 #   ifdef CAN_COMPILE_3DNOW
 216     if( i_edx & 0x80000000 )
 217     {
 218         psz_capability = "3D Now!";
 219         i_illegal = 0;
 220
 221         if( setjmp( env ) == 0 )
 222         {
 223             /* Test a 3D Now! instruction */
 224             __asm__ __volatile__ ( "pfadd %%mm0,%%mm0\n" "femms\n" : : );
 225         }
 226
 227         if( i_illegal == 0 )
 228         {
 229             i_capabilities |= CPU_CAPABILITY_3DNOW;
 230         }
 231     }
 232 #   endif
 233
 234     if( b_amd && ( i_edx & 0x00400000 ) )
 235     {
 236         i_capabilities |= CPU_CAPABILITY_MMXEXT;
 237     }
 238
 239 #   if defined( CAN_COMPILE_SSE ) || defined ( CAN_COMPILE_3DNOW )
 240     signal( SIGILL, pf_sigill );
 241 #   endif
 242     return i_capabilities;
 243
 244 #elif defined( __powerpc__ )
 245
 246 #   ifdef CAN_COMPILE_ALTIVEC
 247     void (*pf_sigill) (int) = signal( SIGILL, SigHandler );
 248
 249     i_capabilities |= CPU_CAPABILITY_FPU;
 250
 251     i_illegal = 0;
 252
 253     if( setjmp( env ) == 0 )
 254     {
 255         asm volatile ("mtspr 256, %0\n\t"
 256                       "vand %%v0, %%v0, %%v0"
 257                       :
 258                       : "r" (-1));
 259     }
 260
 261     if( i_illegal == 0 )
 262     {
 263         i_capabilities |= CPU_CAPABILITY_ALTIVEC;
 264     }
 265
 266     signal( SIGILL, pf_sigill );
 267 #   endif
 268
 269     return i_capabilities;
 270
 271 #elif defined( __sparc__ )
 272
 273     i_capabilities |= CPU_CAPABILITY_FPU;
 274     return i_capabilities;
 275
 276 #else
 277     /* default behaviour */
 278     return i_capabilities;
 279
 280 #endif
 281 }
 282
 283 /*****************************************************************************
 284  * SigHandler: system signal handler
 285  *****************************************************************************
 286  * This function is called when an illegal instruction signal is received by
 287  * the program. We use this function to test OS and CPU capabilities
 288  *****************************************************************************/
 289 static void SigHandler( int i_signal )
 290 {
 291     /* Acknowledge the signal received */
 292     i_illegal = 1;
 293
 294 #ifdef HAVE_SIGRELSE
 295     sigrelse( i_signal );
 296 #endif
 297
 298 #if defined( __i386__ )
 299     fprintf( stderr, "warning: your CPU has %s instructions, but not your "
 300                      "operating system.\n", psz_capability );
 301     fprintf( stderr, "         some optimizations will be disabled unless "
 302                      "you upgrade your OS\n" );
 303 #   if defined( SYS_LINUX )
 304     fprintf( stderr, "         (for instance Linux kernel 2.4.x or later)\n" );
 305 #   endif
 306 #endif
 307
 308     longjmp( env, 1 );
 309 }
 310