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 | be714ff | 2006-10-17 01:49:50 +0000 | [diff] [blame] | 26 | #if !defined(_AIX) && 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 | |
sewardj | be714ff | 2006-10-17 01:49:50 +0000 | [diff] [blame] | 35 | #if !defined(_AIX) && defined(__powerpc__) && defined(__powerpc64__) |
sewardj | 0d4f8ac | 2006-01-02 16:24:03 +0000 | [diff] [blame] | 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 | |
sewardj | be714ff | 2006-10-17 01:49:50 +0000 | [diff] [blame] | 46 | #if defined(_AIX) |
| 47 | static Bool go(char* cpu) |
| 48 | { |
| 49 | if (sizeof(void*) == 8) { |
| 50 | /* cpu is in 64-bit mode */ |
| 51 | if ( strcmp( cpu, "ppc64" ) == 0 ) |
| 52 | return True; |
| 53 | if ( strcmp( cpu, "ppc32" ) == 0 ) |
| 54 | return True; |
| 55 | } else { |
| 56 | if ( strcmp( cpu, "ppc32" ) == 0 ) |
| 57 | return True; |
| 58 | } |
| 59 | return False; |
| 60 | } |
| 61 | #endif // _AIX |
| 62 | |
| 63 | #if !defined(_AIX) && (defined(__i386__) || defined(__x86_64__)) |
sewardj | b5f6f51 | 2005-03-10 23:59:00 +0000 | [diff] [blame] | 64 | static void cpuid ( unsigned int n, |
| 65 | unsigned int* a, unsigned int* b, |
| 66 | unsigned int* c, unsigned int* d ) |
nethercote | 288b766 | 2004-01-20 09:24:53 +0000 | [diff] [blame] | 67 | { |
| 68 | __asm__ __volatile__ ( |
| 69 | "cpuid" |
| 70 | : "=a" (*a), "=b" (*b), "=c" (*c), "=d" (*d) /* output */ |
| 71 | : "0" (n) /* input */ |
| 72 | ); |
| 73 | } |
| 74 | |
nethercote | 362c0d2 | 2004-11-18 18:21:56 +0000 | [diff] [blame] | 75 | static Bool go(char* cpu) |
nethercote | b625bcb | 2004-10-19 16:29:30 +0000 | [diff] [blame] | 76 | { |
sewardj | c49ae75 | 2006-08-05 12:22:52 +0000 | [diff] [blame] | 77 | unsigned int level = 0, cmask = 0, dmask = 0, a, b, c, d; |
nethercote | 288b766 | 2004-01-20 09:24:53 +0000 | [diff] [blame] | 78 | |
nethercote | b625bcb | 2004-10-19 16:29:30 +0000 | [diff] [blame] | 79 | if ( strcmp( cpu, "x86" ) == 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 if ( strcmp( cpu, "x86-fpu" ) == 0 ) { |
| 82 | level = 1; |
sewardj | c49ae75 | 2006-08-05 12:22:52 +0000 | [diff] [blame] | 83 | dmask = 1 << 0; |
nethercote | b625bcb | 2004-10-19 16:29:30 +0000 | [diff] [blame] | 84 | } else if ( strcmp( cpu, "x86-cmov" ) == 0 ) { |
| 85 | level = 1; |
sewardj | c49ae75 | 2006-08-05 12:22:52 +0000 | [diff] [blame] | 86 | dmask = 1 << 15; |
nethercote | b625bcb | 2004-10-19 16:29:30 +0000 | [diff] [blame] | 87 | } else if ( strcmp( cpu, "x86-mmx" ) == 0 ) { |
| 88 | level = 1; |
sewardj | c49ae75 | 2006-08-05 12:22:52 +0000 | [diff] [blame] | 89 | dmask = 1 << 23; |
nethercote | b625bcb | 2004-10-19 16:29:30 +0000 | [diff] [blame] | 90 | } else if ( strcmp( cpu, "x86-mmxext" ) == 0 ) { |
| 91 | level = 0x80000001; |
sewardj | c49ae75 | 2006-08-05 12:22:52 +0000 | [diff] [blame] | 92 | dmask = 1 << 22; |
nethercote | b625bcb | 2004-10-19 16:29:30 +0000 | [diff] [blame] | 93 | } else if ( strcmp( cpu, "x86-sse" ) == 0 ) { |
| 94 | level = 1; |
sewardj | c49ae75 | 2006-08-05 12:22:52 +0000 | [diff] [blame] | 95 | dmask = 1 << 25; |
nethercote | b625bcb | 2004-10-19 16:29:30 +0000 | [diff] [blame] | 96 | } else if ( strcmp( cpu, "x86-sse2" ) == 0 ) { |
| 97 | level = 1; |
sewardj | c49ae75 | 2006-08-05 12:22:52 +0000 | [diff] [blame] | 98 | dmask = 1 << 26; |
| 99 | } else if ( strcmp( cpu, "x86-sse3" ) == 0 ) { |
| 100 | level = 1; |
| 101 | cmask = 1 << 0; |
tom | ef56732 | 2005-11-11 14:33:43 +0000 | [diff] [blame] | 102 | #if defined(__x86_64__) |
| 103 | } else if ( strcmp( cpu, "amd64" ) == 0 ) { |
| 104 | return True; |
sewardj | c49ae75 | 2006-08-05 12:22:52 +0000 | [diff] [blame] | 105 | } else if ( strcmp( cpu, "amd64-sse3" ) == 0 ) { |
| 106 | level = 1; |
| 107 | cmask = 1 << 0; |
tom | ef56732 | 2005-11-11 14:33:43 +0000 | [diff] [blame] | 108 | #endif |
nethercote | b625bcb | 2004-10-19 16:29:30 +0000 | [diff] [blame] | 109 | } else { |
nethercote | 362c0d2 | 2004-11-18 18:21:56 +0000 | [diff] [blame] | 110 | return False; |
nethercote | 288b766 | 2004-01-20 09:24:53 +0000 | [diff] [blame] | 111 | } |
| 112 | |
sewardj | c49ae75 | 2006-08-05 12:22:52 +0000 | [diff] [blame] | 113 | assert( !(cmask != 0 && dmask != 0) ); |
| 114 | assert( !(cmask == 0 && dmask == 0) ); |
| 115 | |
nethercote | 1018bdd | 2004-02-11 23:33:29 +0000 | [diff] [blame] | 116 | cpuid( level & 0x80000000, &a, &b, &c, &d ); |
nethercote | 288b766 | 2004-01-20 09:24:53 +0000 | [diff] [blame] | 117 | |
nethercote | 1018bdd | 2004-02-11 23:33:29 +0000 | [diff] [blame] | 118 | if ( a >= level ) { |
| 119 | cpuid( level, &a, &b, &c, &d ); |
nethercote | 288b766 | 2004-01-20 09:24:53 +0000 | [diff] [blame] | 120 | |
sewardj | c49ae75 | 2006-08-05 12:22:52 +0000 | [diff] [blame] | 121 | if (dmask > 0 && (d & dmask) != 0) return True; |
| 122 | if (cmask > 0 && (c & cmask) != 0) return True; |
nethercote | 288b766 | 2004-01-20 09:24:53 +0000 | [diff] [blame] | 123 | } |
nethercote | 362c0d2 | 2004-11-18 18:21:56 +0000 | [diff] [blame] | 124 | return False; |
nethercote | b625bcb | 2004-10-19 16:29:30 +0000 | [diff] [blame] | 125 | } |
sewardj | be714ff | 2006-10-17 01:49:50 +0000 | [diff] [blame] | 126 | #endif // !_AIX && (__i386__ || __x86_64__) |
nethercote | 288b766 | 2004-01-20 09:24:53 +0000 | [diff] [blame] | 127 | |
nethercote | b625bcb | 2004-10-19 16:29:30 +0000 | [diff] [blame] | 128 | |
nethercote | b625bcb | 2004-10-19 16:29:30 +0000 | [diff] [blame] | 129 | int main(int argc, char **argv) |
| 130 | { |
nethercote | 362c0d2 | 2004-11-18 18:21:56 +0000 | [diff] [blame] | 131 | int i; |
nethercote | b625bcb | 2004-10-19 16:29:30 +0000 | [diff] [blame] | 132 | if ( argc != 2 ) { |
| 133 | fprintf( stderr, "usage: cputest <cpu-type>\n" ); |
nethercote | 362c0d2 | 2004-11-18 18:21:56 +0000 | [diff] [blame] | 134 | exit( 2 ); |
nethercote | b625bcb | 2004-10-19 16:29:30 +0000 | [diff] [blame] | 135 | } |
nethercote | 362c0d2 | 2004-11-18 18:21:56 +0000 | [diff] [blame] | 136 | if (go( argv[1] )) { |
| 137 | return 0; // matched |
| 138 | } |
| 139 | for (i = 0; NULL != all_archs[i]; i++) { |
| 140 | if ( strcmp( argv[1], all_archs[i] ) == 0 ) |
| 141 | return 1; |
| 142 | } |
| 143 | return 2; |
nethercote | 288b766 | 2004-01-20 09:24:53 +0000 | [diff] [blame] | 144 | } |