nethercote | 288b766 | 2004-01-20 09:24:53 +0000 | [diff] [blame] | 1 | #include <stdio.h> |
| 2 | #include <stdlib.h> |
| 3 | #include <string.h> |
sewardj | c49ae75 | 2006-08-05 12:22:52 +0000 | [diff] [blame^] | 4 | #include <assert.h> |
nethercote | 288b766 | 2004-01-20 09:24:53 +0000 | [diff] [blame] | 5 | |
nethercote | 362c0d2 | 2004-11-18 18:21:56 +0000 | [diff] [blame] | 6 | // We return: |
| 7 | // - 0 if the machine matches the asked-for cpu |
| 8 | // - 1 if it didn't match, but did match the name of another arch |
| 9 | // - 2 otherwise |
| 10 | |
| 11 | // When updating this file for a new architecture, add the name to |
| 12 | // 'all_archs' as well as adding go(). |
| 13 | |
| 14 | #define False 0 |
| 15 | #define True 1 |
| 16 | typedef int Bool; |
| 17 | |
| 18 | char* all_archs[] = { |
nethercote | 362c0d2 | 2004-11-18 18:21:56 +0000 | [diff] [blame] | 19 | "amd64", |
njn | 10c122e | 2005-09-13 00:45:14 +0000 | [diff] [blame] | 20 | "ppc32", |
sewardj | 0d4f8ac | 2006-01-02 16:24:03 +0000 | [diff] [blame] | 21 | "ppc64", |
njn | c616819 | 2004-11-29 13:54:10 +0000 | [diff] [blame] | 22 | "x86", |
nethercote | 362c0d2 | 2004-11-18 18:21:56 +0000 | [diff] [blame] | 23 | NULL |
| 24 | }; |
nethercote | b625bcb | 2004-10-19 16:29:30 +0000 | [diff] [blame] | 25 | |
sewardj | 0d4f8ac | 2006-01-02 16:24:03 +0000 | [diff] [blame] | 26 | #if defined(__powerpc__) && !defined(__powerpc64__) |
njn | c616819 | 2004-11-29 13:54:10 +0000 | [diff] [blame] | 27 | static Bool go(char* cpu) |
| 28 | { |
sewardj | fcbb942 | 2005-11-10 23:30:21 +0000 | [diff] [blame] | 29 | if ( strcmp( cpu, "ppc32" ) == 0 ) |
njn | c616819 | 2004-11-29 13:54:10 +0000 | [diff] [blame] | 30 | return True; |
sewardj | 87f7fdd | 2006-01-04 03:08:16 +0000 | [diff] [blame] | 31 | return False; |
njn | c616819 | 2004-11-29 13:54:10 +0000 | [diff] [blame] | 32 | } |
sewardj | 0d4f8ac | 2006-01-02 16:24:03 +0000 | [diff] [blame] | 33 | #endif // __powerpc__ (32) |
| 34 | |
| 35 | #if defined(__powerpc__) && defined(__powerpc64__) |
| 36 | static Bool go(char* cpu) |
| 37 | { |
| 38 | if ( strcmp( cpu, "ppc64" ) == 0 ) |
| 39 | return True; |
sewardj | 87f7fdd | 2006-01-04 03:08:16 +0000 | [diff] [blame] | 40 | if ( strcmp( cpu, "ppc32" ) == 0 ) |
| 41 | return True; |
| 42 | return False; |
sewardj | 0d4f8ac | 2006-01-02 16:24:03 +0000 | [diff] [blame] | 43 | } |
| 44 | #endif // __powerpc__ (64) |
njn | c616819 | 2004-11-29 13:54:10 +0000 | [diff] [blame] | 45 | |
tom | ef56732 | 2005-11-11 14:33:43 +0000 | [diff] [blame] | 46 | #if defined(__i386__) || defined(__x86_64__) |
sewardj | b5f6f51 | 2005-03-10 23:59:00 +0000 | [diff] [blame] | 47 | static void cpuid ( unsigned int n, |
| 48 | unsigned int* a, unsigned int* b, |
| 49 | unsigned int* c, unsigned int* d ) |
nethercote | 288b766 | 2004-01-20 09:24:53 +0000 | [diff] [blame] | 50 | { |
| 51 | __asm__ __volatile__ ( |
| 52 | "cpuid" |
| 53 | : "=a" (*a), "=b" (*b), "=c" (*c), "=d" (*d) /* output */ |
| 54 | : "0" (n) /* input */ |
| 55 | ); |
| 56 | } |
| 57 | |
nethercote | 362c0d2 | 2004-11-18 18:21:56 +0000 | [diff] [blame] | 58 | static Bool go(char* cpu) |
nethercote | b625bcb | 2004-10-19 16:29:30 +0000 | [diff] [blame] | 59 | { |
sewardj | c49ae75 | 2006-08-05 12:22:52 +0000 | [diff] [blame^] | 60 | unsigned int level = 0, cmask = 0, dmask = 0, a, b, c, d; |
nethercote | 288b766 | 2004-01-20 09:24:53 +0000 | [diff] [blame] | 61 | |
nethercote | b625bcb | 2004-10-19 16:29:30 +0000 | [diff] [blame] | 62 | if ( strcmp( cpu, "x86" ) == 0 ) { |
nethercote | 362c0d2 | 2004-11-18 18:21:56 +0000 | [diff] [blame] | 63 | return True; |
nethercote | b625bcb | 2004-10-19 16:29:30 +0000 | [diff] [blame] | 64 | } else if ( strcmp( cpu, "x86-fpu" ) == 0 ) { |
| 65 | level = 1; |
sewardj | c49ae75 | 2006-08-05 12:22:52 +0000 | [diff] [blame^] | 66 | dmask = 1 << 0; |
nethercote | b625bcb | 2004-10-19 16:29:30 +0000 | [diff] [blame] | 67 | } else if ( strcmp( cpu, "x86-cmov" ) == 0 ) { |
| 68 | level = 1; |
sewardj | c49ae75 | 2006-08-05 12:22:52 +0000 | [diff] [blame^] | 69 | dmask = 1 << 15; |
nethercote | b625bcb | 2004-10-19 16:29:30 +0000 | [diff] [blame] | 70 | } else if ( strcmp( cpu, "x86-mmx" ) == 0 ) { |
| 71 | level = 1; |
sewardj | c49ae75 | 2006-08-05 12:22:52 +0000 | [diff] [blame^] | 72 | dmask = 1 << 23; |
nethercote | b625bcb | 2004-10-19 16:29:30 +0000 | [diff] [blame] | 73 | } else if ( strcmp( cpu, "x86-mmxext" ) == 0 ) { |
| 74 | level = 0x80000001; |
sewardj | c49ae75 | 2006-08-05 12:22:52 +0000 | [diff] [blame^] | 75 | dmask = 1 << 22; |
nethercote | b625bcb | 2004-10-19 16:29:30 +0000 | [diff] [blame] | 76 | } else if ( strcmp( cpu, "x86-sse" ) == 0 ) { |
| 77 | level = 1; |
sewardj | c49ae75 | 2006-08-05 12:22:52 +0000 | [diff] [blame^] | 78 | dmask = 1 << 25; |
nethercote | b625bcb | 2004-10-19 16:29:30 +0000 | [diff] [blame] | 79 | } else if ( strcmp( cpu, "x86-sse2" ) == 0 ) { |
| 80 | level = 1; |
sewardj | c49ae75 | 2006-08-05 12:22:52 +0000 | [diff] [blame^] | 81 | dmask = 1 << 26; |
| 82 | } else if ( strcmp( cpu, "x86-sse3" ) == 0 ) { |
| 83 | level = 1; |
| 84 | cmask = 1 << 0; |
tom | ef56732 | 2005-11-11 14:33:43 +0000 | [diff] [blame] | 85 | #if defined(__x86_64__) |
| 86 | } else if ( strcmp( cpu, "amd64" ) == 0 ) { |
| 87 | return True; |
sewardj | c49ae75 | 2006-08-05 12:22:52 +0000 | [diff] [blame^] | 88 | } else if ( strcmp( cpu, "amd64-sse3" ) == 0 ) { |
| 89 | level = 1; |
| 90 | cmask = 1 << 0; |
tom | ef56732 | 2005-11-11 14:33:43 +0000 | [diff] [blame] | 91 | #endif |
nethercote | b625bcb | 2004-10-19 16:29:30 +0000 | [diff] [blame] | 92 | } else { |
nethercote | 362c0d2 | 2004-11-18 18:21:56 +0000 | [diff] [blame] | 93 | return False; |
nethercote | 288b766 | 2004-01-20 09:24:53 +0000 | [diff] [blame] | 94 | } |
| 95 | |
sewardj | c49ae75 | 2006-08-05 12:22:52 +0000 | [diff] [blame^] | 96 | assert( !(cmask != 0 && dmask != 0) ); |
| 97 | assert( !(cmask == 0 && dmask == 0) ); |
| 98 | |
nethercote | 1018bdd | 2004-02-11 23:33:29 +0000 | [diff] [blame] | 99 | cpuid( level & 0x80000000, &a, &b, &c, &d ); |
nethercote | 288b766 | 2004-01-20 09:24:53 +0000 | [diff] [blame] | 100 | |
nethercote | 1018bdd | 2004-02-11 23:33:29 +0000 | [diff] [blame] | 101 | if ( a >= level ) { |
| 102 | cpuid( level, &a, &b, &c, &d ); |
nethercote | 288b766 | 2004-01-20 09:24:53 +0000 | [diff] [blame] | 103 | |
sewardj | c49ae75 | 2006-08-05 12:22:52 +0000 | [diff] [blame^] | 104 | if (dmask > 0 && (d & dmask) != 0) return True; |
| 105 | if (cmask > 0 && (c & cmask) != 0) return True; |
nethercote | 288b766 | 2004-01-20 09:24:53 +0000 | [diff] [blame] | 106 | } |
nethercote | 362c0d2 | 2004-11-18 18:21:56 +0000 | [diff] [blame] | 107 | return False; |
nethercote | b625bcb | 2004-10-19 16:29:30 +0000 | [diff] [blame] | 108 | } |
tom | ef56732 | 2005-11-11 14:33:43 +0000 | [diff] [blame] | 109 | #endif // __i386__ || __x86_64__ |
nethercote | 288b766 | 2004-01-20 09:24:53 +0000 | [diff] [blame] | 110 | |
nethercote | b625bcb | 2004-10-19 16:29:30 +0000 | [diff] [blame] | 111 | |
nethercote | b625bcb | 2004-10-19 16:29:30 +0000 | [diff] [blame] | 112 | int main(int argc, char **argv) |
| 113 | { |
nethercote | 362c0d2 | 2004-11-18 18:21:56 +0000 | [diff] [blame] | 114 | int i; |
nethercote | b625bcb | 2004-10-19 16:29:30 +0000 | [diff] [blame] | 115 | if ( argc != 2 ) { |
| 116 | fprintf( stderr, "usage: cputest <cpu-type>\n" ); |
nethercote | 362c0d2 | 2004-11-18 18:21:56 +0000 | [diff] [blame] | 117 | exit( 2 ); |
nethercote | b625bcb | 2004-10-19 16:29:30 +0000 | [diff] [blame] | 118 | } |
nethercote | 362c0d2 | 2004-11-18 18:21:56 +0000 | [diff] [blame] | 119 | if (go( argv[1] )) { |
| 120 | return 0; // matched |
| 121 | } |
| 122 | for (i = 0; NULL != all_archs[i]; i++) { |
| 123 | if ( strcmp( argv[1], all_archs[i] ) == 0 ) |
| 124 | return 1; |
| 125 | } |
| 126 | return 2; |
nethercote | 288b766 | 2004-01-20 09:24:53 +0000 | [diff] [blame] | 127 | } |