Translations update
[openttd/fttd.git] / src / cpu.cpp
blob826e5223014d906094030f5c294c58fa154fece3
1 /* $Id$ */
3 /*
4 * This file is part of OpenTTD.
5 * OpenTTD is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation, version 2.
6 * OpenTTD is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
7 * See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with OpenTTD. If not, see <http://www.gnu.org/licenses/>.
8 */
10 /** @file cpu.cpp OS/CPU/compiler dependant CPU specific calls. */
12 #include "stdafx.h"
13 #include "core/bitmath_func.hpp"
15 #undef RDTSC_AVAILABLE
17 /* rdtsc for MSC_VER, uses simple inline assembly, or _rdtsc
18 * from external win64.asm because VS2005 does not support inline assembly */
19 #if defined(_MSC_VER) && !defined(RDTSC_AVAILABLE) && !defined(WINCE)
20 #include <intrin.h>
21 uint64 ottd_rdtsc()
23 return __rdtsc();
25 #define RDTSC_AVAILABLE
26 #endif
28 /* rdtsc for OS/2. Hopefully this works, who knows */
29 #if defined (__WATCOMC__) && !defined(RDTSC_AVAILABLE)
30 unsigned __int64 ottd_rdtsc();
31 # pragma aux ottd_rdtsc = 0x0F 0x31 value [edx eax] parm nomemory modify exact [edx eax] nomemory;
32 # define RDTSC_AVAILABLE
33 #endif
35 /* rdtsc for all other *nix-en (hopefully). Use GCC syntax */
36 #if (defined(__i386__) || defined(__x86_64__)) && !defined(__DJGPP__) && !defined(RDTSC_AVAILABLE)
37 uint64 ottd_rdtsc()
39 uint32 high, low;
40 __asm__ __volatile__ ("rdtsc" : "=a" (low), "=d" (high));
41 return ((uint64)high << 32) | low;
43 # define RDTSC_AVAILABLE
44 #endif
46 /* rdtsc for PPC which has this not */
47 #if (defined(__POWERPC__) || defined(__powerpc__)) && !defined(RDTSC_AVAILABLE)
48 uint64 ottd_rdtsc()
50 uint32 high = 0, high2 = 0, low;
51 /* PPC does not have rdtsc, so we cheat by reading the two 32-bit time-counters
52 * it has, 'Move From Time Base (Upper)'. Since these are two reads, in the
53 * very unlikely event that the lower part overflows to the upper part while we
54 * read it; we double-check and reread the registers */
55 asm volatile (
56 "mftbu %0\n"
57 "mftb %1\n"
58 "mftbu %2\n"
59 "cmpw %3,%4\n"
60 "bne- $-16\n"
61 : "=r" (high), "=r" (low), "=r" (high2)
62 : "0" (high), "2" (high2)
64 return ((uint64)high << 32) | low;
66 # define RDTSC_AVAILABLE
67 #endif
69 /* In all other cases we have no support for rdtsc. No major issue,
70 * you just won't be able to profile your code with TIC()/TOC() */
71 #if !defined(RDTSC_AVAILABLE)
72 /* MSVC (in case of WinCE) can't handle #warning */
73 # if !defined(_MSC_VER)
74 #warning "(non-fatal) No support for rdtsc(), you won't be able to profile with TIC/TOC"
75 # endif
76 uint64 ottd_rdtsc() {return 0;}
77 #endif
80 /**
81 * Definitions for CPU detection:
83 * MSVC offers cpu information while gcc only implements in gcc 4.8
84 * __builtin_cpu_supports and friends
85 * http://msdn.microsoft.com/library/vstudio/hskdteyh%28v=vs.100%29.aspx
86 * http://gcc.gnu.org/onlinedocs/gcc/X86-Built-in-Functions.html
88 * Other platforms/architectures don't have CPUID, so zero the info and then
89 * most (if not all) of the features are set as if they do not exist.
91 #if defined(_MSC_VER)
92 void ottd_cpuid(int info[4], int type)
94 __cpuid(info, type);
96 #elif defined(__x86_64__) || defined(__i386)
97 void ottd_cpuid(int info[4], int type)
99 #if defined(__i386) && defined(__PIC__)
100 /* The easy variant would be just cpuid, however... ebx is being used by the GOT (Global Offset Table)
101 * in case of PIC;
102 * clobbering ebx is no alternative: some compiler versions don't like this
103 * and will issue an error message like
104 * "can't find a register in class 'BREG' while reloading 'asm'"
106 __asm__ __volatile__ (
107 "xchgl %%ebx, %1 \n\t"
108 "cpuid \n\t"
109 "xchgl %%ebx, %1 \n\t"
110 : "=a" (info[0]), "=r" (info[1]), "=c" (info[2]), "=d" (info[3])
111 /* It is safe to write "=r" for (info[1]) as in case that PIC is enabled for i386,
112 * the compiler will not choose EBX as target register (but something else).
114 : "a" (type)
116 #else
117 __asm__ __volatile__ (
118 "cpuid \n\t"
119 : "=a" (info[0]), "=b" (info[1]), "=c" (info[2]), "=d" (info[3])
120 : "a" (type)
122 #endif /* i386 PIC */
124 #else
125 void ottd_cpuid(int info[4], int type)
127 info[0] = info[1] = info[2] = info[3] = 0;
129 #endif
131 bool HasCPUIDFlag(uint type, uint index, uint bit)
133 int cpu_info[4] = {-1};
134 ottd_cpuid(cpu_info, 0);
135 uint max_info_type = cpu_info[0];
136 if (max_info_type < type) return false;
138 ottd_cpuid(cpu_info, type);
139 return HasBit(cpu_info[index], bit);