nethercote | 288b766 | 2004-01-20 09:24:53 +0000 | [diff] [blame] | 1 | #include <stdio.h> |
| 2 | #include <stdlib.h> |
| 3 | #include <string.h> |
| 4 | |
nethercote | 362c0d2 | 2004-11-18 18:21:56 +0000 | [diff] [blame^] | 5 | // We return: |
| 6 | // - 0 if the machine matches the asked-for cpu |
| 7 | // - 1 if it didn't match, but did match the name of another arch |
| 8 | // - 2 otherwise |
| 9 | |
| 10 | // When updating this file for a new architecture, add the name to |
| 11 | // 'all_archs' as well as adding go(). |
| 12 | |
| 13 | #define False 0 |
| 14 | #define True 1 |
| 15 | typedef int Bool; |
| 16 | |
| 17 | char* all_archs[] = { |
| 18 | "x86", |
| 19 | "ppc", |
| 20 | "amd64", |
| 21 | NULL |
| 22 | }; |
nethercote | b625bcb | 2004-10-19 16:29:30 +0000 | [diff] [blame] | 23 | |
| 24 | #ifdef __x86__ |
nethercote | 1018bdd | 2004-02-11 23:33:29 +0000 | [diff] [blame] | 25 | static __inline__ void cpuid(unsigned int n, |
nethercote | 288b766 | 2004-01-20 09:24:53 +0000 | [diff] [blame] | 26 | unsigned int *a, unsigned int *b, |
| 27 | unsigned int *c, unsigned int *d) |
| 28 | { |
| 29 | __asm__ __volatile__ ( |
| 30 | "cpuid" |
| 31 | : "=a" (*a), "=b" (*b), "=c" (*c), "=d" (*d) /* output */ |
| 32 | : "0" (n) /* input */ |
| 33 | ); |
| 34 | } |
| 35 | |
nethercote | 362c0d2 | 2004-11-18 18:21:56 +0000 | [diff] [blame^] | 36 | static Bool go(char* cpu) |
nethercote | b625bcb | 2004-10-19 16:29:30 +0000 | [diff] [blame] | 37 | { |
| 38 | unsigned int level = 0, mask = 0, a, b, c, d; |
nethercote | 288b766 | 2004-01-20 09:24:53 +0000 | [diff] [blame] | 39 | |
nethercote | b625bcb | 2004-10-19 16:29:30 +0000 | [diff] [blame] | 40 | if ( strcmp( cpu, "x86" ) == 0 ) { |
nethercote | 362c0d2 | 2004-11-18 18:21:56 +0000 | [diff] [blame^] | 41 | return True; |
nethercote | b625bcb | 2004-10-19 16:29:30 +0000 | [diff] [blame] | 42 | } else if ( strcmp( cpu, "x86-fpu" ) == 0 ) { |
| 43 | level = 1; |
| 44 | mask = 1 << 0; |
| 45 | } else if ( strcmp( cpu, "x86-cmov" ) == 0 ) { |
| 46 | level = 1; |
| 47 | mask = 1 << 15; |
| 48 | } else if ( strcmp( cpu, "x86-mmx" ) == 0 ) { |
| 49 | level = 1; |
| 50 | mask = 1 << 23; |
| 51 | } else if ( strcmp( cpu, "x86-mmxext" ) == 0 ) { |
| 52 | level = 0x80000001; |
| 53 | mask = 1 << 22; |
| 54 | } else if ( strcmp( cpu, "x86-sse" ) == 0 ) { |
| 55 | level = 1; |
| 56 | mask = 1 << 25; |
| 57 | } else if ( strcmp( cpu, "x86-sse2" ) == 0 ) { |
| 58 | level = 1; |
| 59 | mask = 1 << 26; |
| 60 | } else { |
nethercote | 362c0d2 | 2004-11-18 18:21:56 +0000 | [diff] [blame^] | 61 | return False; |
nethercote | 288b766 | 2004-01-20 09:24:53 +0000 | [diff] [blame] | 62 | } |
| 63 | |
nethercote | 1018bdd | 2004-02-11 23:33:29 +0000 | [diff] [blame] | 64 | cpuid( level & 0x80000000, &a, &b, &c, &d ); |
nethercote | 288b766 | 2004-01-20 09:24:53 +0000 | [diff] [blame] | 65 | |
nethercote | 1018bdd | 2004-02-11 23:33:29 +0000 | [diff] [blame] | 66 | if ( a >= level ) { |
| 67 | cpuid( level, &a, &b, &c, &d ); |
nethercote | 288b766 | 2004-01-20 09:24:53 +0000 | [diff] [blame] | 68 | |
nethercote | 362c0d2 | 2004-11-18 18:21:56 +0000 | [diff] [blame^] | 69 | if ( ( d & mask ) != 0 ) return True; |
nethercote | 288b766 | 2004-01-20 09:24:53 +0000 | [diff] [blame] | 70 | } |
nethercote | 362c0d2 | 2004-11-18 18:21:56 +0000 | [diff] [blame^] | 71 | return False; |
nethercote | b625bcb | 2004-10-19 16:29:30 +0000 | [diff] [blame] | 72 | } |
| 73 | #endif // __x86__ |
nethercote | 288b766 | 2004-01-20 09:24:53 +0000 | [diff] [blame] | 74 | |
nethercote | b625bcb | 2004-10-19 16:29:30 +0000 | [diff] [blame] | 75 | |
| 76 | #ifdef __ppc__ |
nethercote | 362c0d2 | 2004-11-18 18:21:56 +0000 | [diff] [blame^] | 77 | static Bool go(char* cpu) |
nethercote | b625bcb | 2004-10-19 16:29:30 +0000 | [diff] [blame] | 78 | { |
| 79 | if ( strcmp( cpu, "ppc" ) == 0 ) |
nethercote | 362c0d2 | 2004-11-18 18:21:56 +0000 | [diff] [blame^] | 80 | return True; |
nethercote | b625bcb | 2004-10-19 16:29:30 +0000 | [diff] [blame] | 81 | else |
nethercote | 362c0d2 | 2004-11-18 18:21:56 +0000 | [diff] [blame^] | 82 | return False; |
nethercote | b625bcb | 2004-10-19 16:29:30 +0000 | [diff] [blame] | 83 | } |
| 84 | #endif // __ppc__ |
| 85 | |
nethercote | b625bcb | 2004-10-19 16:29:30 +0000 | [diff] [blame] | 86 | int main(int argc, char **argv) |
| 87 | { |
nethercote | 362c0d2 | 2004-11-18 18:21:56 +0000 | [diff] [blame^] | 88 | int i; |
nethercote | b625bcb | 2004-10-19 16:29:30 +0000 | [diff] [blame] | 89 | if ( argc != 2 ) { |
| 90 | fprintf( stderr, "usage: cputest <cpu-type>\n" ); |
nethercote | 362c0d2 | 2004-11-18 18:21:56 +0000 | [diff] [blame^] | 91 | exit( 2 ); |
nethercote | b625bcb | 2004-10-19 16:29:30 +0000 | [diff] [blame] | 92 | } |
nethercote | 362c0d2 | 2004-11-18 18:21:56 +0000 | [diff] [blame^] | 93 | if (go( argv[1] )) { |
| 94 | return 0; // matched |
| 95 | } |
| 96 | for (i = 0; NULL != all_archs[i]; i++) { |
| 97 | if ( strcmp( argv[1], all_archs[i] ) == 0 ) |
| 98 | return 1; |
| 99 | } |
| 100 | return 2; |
nethercote | 288b766 | 2004-01-20 09:24:53 +0000 | [diff] [blame] | 101 | } |