1 /* CpuArch.h -- CPU specific code
2 2016-06-09: Igor Pavlov : Public domain */
3 
4 #ifndef __CPU_ARCH_H
5 #define __CPU_ARCH_H
6 
7 #include "7zTypes.h"
8 
9 EXTERN_C_BEGIN
10 
11 /*
12 MY_CPU_LE means that CPU is LITTLE ENDIAN.
13 MY_CPU_BE means that CPU is BIG ENDIAN.
14 If MY_CPU_LE and MY_CPU_BE are not defined, we don't know about ENDIANNESS of platform.
15 
16 MY_CPU_LE_UNALIGN means that CPU is LITTLE ENDIAN and CPU supports unaligned memory accesses.
17 */
18 
19 #if defined(_M_X64) \
20    || defined(_M_AMD64) \
21    || defined(__x86_64__) \
22    || defined(__AMD64__) \
23    || defined(__amd64__)
24   #define MY_CPU_AMD64
25 #endif
26 
27 #if defined(MY_CPU_AMD64) \
28     || defined(_M_IA64) \
29     || defined(__AARCH64EL__) \
30     || defined(__AARCH64EB__)
31   #define MY_CPU_64BIT
32 #endif
33 
34 #if defined(_M_IX86) || defined(__i386__)
35 #define MY_CPU_X86
36 #endif
37 
38 #if defined(MY_CPU_X86) || defined(MY_CPU_AMD64)
39 #define MY_CPU_X86_OR_AMD64
40 #endif
41 
42 #if defined(MY_CPU_X86) \
43     || defined(_M_ARM) \
44     || defined(__ARMEL__) \
45     || defined(__THUMBEL__) \
46     || defined(__ARMEB__) \
47     || defined(__THUMBEB__)
48   #define MY_CPU_32BIT
49 #endif
50 
51 #if defined(_WIN32) && defined(_M_ARM)
52 #define MY_CPU_ARM_LE
53 #endif
54 
55 #if defined(_WIN32) && defined(_M_IA64)
56 #define MY_CPU_IA64_LE
57 #endif
58 
59 #if defined(MY_CPU_X86_OR_AMD64) \
60     || defined(MY_CPU_ARM_LE) \
61     || defined(MY_CPU_IA64_LE) \
62     || defined(__LITTLE_ENDIAN__) \
63     || defined(__ARMEL__) \
64     || defined(__THUMBEL__) \
65     || defined(__AARCH64EL__) \
66     || defined(__MIPSEL__) \
67     || defined(__MIPSEL) \
68     || defined(_MIPSEL) \
69     || defined(__BFIN__) \
70     || (defined(__BYTE_ORDER__) && (__BYTE_ORDER__ == __ORDER_LITTLE_ENDIAN__))
71   #define MY_CPU_LE
72 #endif
73 
74 #if defined(__BIG_ENDIAN__) \
75     || defined(__ARMEB__) \
76     || defined(__THUMBEB__) \
77     || defined(__AARCH64EB__) \
78     || defined(__MIPSEB__) \
79     || defined(__MIPSEB) \
80     || defined(_MIPSEB) \
81     || defined(__m68k__) \
82     || defined(__s390__) \
83     || defined(__s390x__) \
84     || defined(__zarch__) \
85     || (defined(__BYTE_ORDER__) && (__BYTE_ORDER__ == __ORDER_BIG_ENDIAN__))
86   #define MY_CPU_BE
87 #endif
88 
89 #if defined(MY_CPU_LE) && defined(MY_CPU_BE)
90 Stop_Compiling_Bad_Endian
91 #endif
92 
93 
94 #ifdef MY_CPU_LE
95   #if defined(MY_CPU_X86_OR_AMD64) \
96       /* || defined(__AARCH64EL__) */
97     #define MY_CPU_LE_UNALIGN
98   #endif
99 #endif
100 
101 
102 #ifdef MY_CPU_LE_UNALIGN
103 
104 #define GetUi16(p) (*(const UInt16 *)(const void *)(p))
105 #define GetUi32(p) (*(const UInt32 *)(const void *)(p))
106 #define GetUi64(p) (*(const UInt64 *)(const void *)(p))
107 
108 #define SetUi16(p, v) { *(UInt16 *)(p) = (v); }
109 #define SetUi32(p, v) { *(UInt32 *)(p) = (v); }
110 #define SetUi64(p, v) { *(UInt64 *)(p) = (v); }
111 
112 #else
113 
114 #define GetUi16(p) ( (UInt16) ( \
115              ((const Byte *)(p))[0] | \
116     ((UInt16)((const Byte *)(p))[1] << 8) ))
117 
118 #define GetUi32(p) ( \
119              ((const Byte *)(p))[0]        | \
120     ((UInt32)((const Byte *)(p))[1] <<  8) | \
121     ((UInt32)((const Byte *)(p))[2] << 16) | \
122     ((UInt32)((const Byte *)(p))[3] << 24))
123 
124 #define GetUi64(p) (GetUi32(p) | ((UInt64)GetUi32(((const Byte *)(p)) + 4) << 32))
125 
126 #define SetUi16(p, v) { Byte *_ppp_ = (Byte *)(p); UInt32 _vvv_ = (v); \
127     _ppp_[0] = (Byte)_vvv_; \
128     _ppp_[1] = (Byte)(_vvv_ >> 8); }
129 
130 #define SetUi32(p, v) { Byte *_ppp_ = (Byte *)(p); UInt32 _vvv_ = (v); \
131     _ppp_[0] = (Byte)_vvv_; \
132     _ppp_[1] = (Byte)(_vvv_ >> 8); \
133     _ppp_[2] = (Byte)(_vvv_ >> 16); \
134     _ppp_[3] = (Byte)(_vvv_ >> 24); }
135 
136 #define SetUi64(p, v) { Byte *_ppp2_ = (Byte *)(p); UInt64 _vvv2_ = (v); \
137     SetUi32(_ppp2_    , (UInt32)_vvv2_); \
138     SetUi32(_ppp2_ + 4, (UInt32)(_vvv2_ >> 32)); }
139 
140 #endif
141 
142 
143 #if defined(MY_CPU_LE_UNALIGN) && /* defined(_WIN64) && */ (_MSC_VER >= 1300)
144 
145 /* Note: we use bswap instruction, that is unsupported in 386 cpu */
146 
147 #include <stdlib.h>
148 
149 #pragma intrinsic(_byteswap_ulong)
150 #pragma intrinsic(_byteswap_uint64)
151 #define GetBe32(p) _byteswap_ulong(*(const UInt32 *)(const Byte *)(p))
152 #define GetBe64(p) _byteswap_uint64(*(const UInt64 *)(const Byte *)(p))
153 
154 #define SetBe32(p, v) (*(UInt32 *)(void *)(p)) = _byteswap_ulong(v)
155 
156 #elif defined(MY_CPU_LE_UNALIGN) && defined (__GNUC__) && (__GNUC__ > 4 || (__GNUC__ == 4 && __GNUC_MINOR__ >= 3))
157 
158 #define GetBe32(p) __builtin_bswap32(*(const UInt32 *)(const Byte *)(p))
159 #define GetBe64(p) __builtin_bswap64(*(const UInt64 *)(const Byte *)(p))
160 
161 #define SetBe32(p, v) (*(UInt32 *)(void *)(p)) = __builtin_bswap32(v)
162 
163 #else
164 
165 #define GetBe32(p) ( \
166     ((UInt32)((const Byte *)(p))[0] << 24) | \
167     ((UInt32)((const Byte *)(p))[1] << 16) | \
168     ((UInt32)((const Byte *)(p))[2] <<  8) | \
169              ((const Byte *)(p))[3] )
170 
171 #define GetBe64(p) (((UInt64)GetBe32(p) << 32) | GetBe32(((const Byte *)(p)) + 4))
172 
173 #define SetBe32(p, v) { Byte *_ppp_ = (Byte *)(p); UInt32 _vvv_ = (v); \
174     _ppp_[0] = (Byte)(_vvv_ >> 24); \
175     _ppp_[1] = (Byte)(_vvv_ >> 16); \
176     _ppp_[2] = (Byte)(_vvv_ >> 8); \
177     _ppp_[3] = (Byte)_vvv_; }
178 
179 #endif
180 
181 
182 #define GetBe16(p) ( (UInt16) ( \
183     ((UInt16)((const Byte *)(p))[0] << 8) | \
184              ((const Byte *)(p))[1] ))
185 
186 
187 
188 #ifdef MY_CPU_X86_OR_AMD64
189 
190 typedef struct
191 {
192   UInt32 maxFunc;
193   UInt32 vendor[3];
194   UInt32 ver;
195   UInt32 b;
196   UInt32 c;
197   UInt32 d;
198 } Cx86cpuid;
199 
200 enum
201 {
202   CPU_FIRM_INTEL,
203   CPU_FIRM_AMD,
204   CPU_FIRM_VIA
205 };
206 
207 void MyCPUID(UInt32 function, UInt32 *a, UInt32 *b, UInt32 *c, UInt32 *d);
208 
209 Bool x86cpuid_CheckAndRead(Cx86cpuid *p);
210 int x86cpuid_GetFirm(const Cx86cpuid *p);
211 
212 #define x86cpuid_GetFamily(ver) (((ver >> 16) & 0xFF0) | ((ver >> 8) & 0xF))
213 #define x86cpuid_GetModel(ver)  (((ver >> 12) &  0xF0) | ((ver >> 4) & 0xF))
214 #define x86cpuid_GetStepping(ver) (ver & 0xF)
215 
216 Bool CPU_Is_InOrder();
217 Bool CPU_Is_Aes_Supported();
218 
219 #endif
220 
221 EXTERN_C_END
222 
223 #endif
224