Home | History | Annotate | Download | only in C
      1 /* CpuArch.h -- CPU specific code
      2 2018-07-04 : 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   #ifdef __ILP32__
     26     #define MY_CPU_NAME "x32"
     27   #else
     28     #define MY_CPU_NAME "x64"
     29   #endif
     30   #define MY_CPU_64BIT
     31 #endif
     32 
     33 
     34 #if  defined(_M_IX86) \
     35   || defined(__i386__)
     36   #define MY_CPU_X86
     37   #define MY_CPU_NAME "x86"
     38   #define MY_CPU_32BIT
     39 #endif
     40 
     41 
     42 #if  defined(_M_ARM64) \
     43   || defined(__AARCH64EL__) \
     44   || defined(__AARCH64EB__) \
     45   || defined(__aarch64__)
     46   #define MY_CPU_ARM64
     47   #define MY_CPU_NAME "arm64"
     48   #define MY_CPU_64BIT
     49 #endif
     50 
     51 
     52 #if  defined(_M_ARM) \
     53   || defined(_M_ARM_NT) \
     54   || defined(_M_ARMT) \
     55   || defined(__arm__) \
     56   || defined(__thumb__) \
     57   || defined(__ARMEL__) \
     58   || defined(__ARMEB__) \
     59   || defined(__THUMBEL__) \
     60   || defined(__THUMBEB__)
     61   #define MY_CPU_ARM
     62   #define MY_CPU_NAME "arm"
     63   #define MY_CPU_32BIT
     64 #endif
     65 
     66 
     67 #if  defined(_M_IA64) \
     68   || defined(__ia64__)
     69   #define MY_CPU_IA64
     70   #define MY_CPU_NAME "ia64"
     71   #define MY_CPU_64BIT
     72 #endif
     73 
     74 
     75 #if  defined(__mips64) \
     76   || defined(__mips64__) \
     77   || (defined(__mips) && (__mips == 64 || __mips == 4 || __mips == 3))
     78   #define MY_CPU_NAME "mips64"
     79   #define MY_CPU_64BIT
     80 #elif defined(__mips__)
     81   #define MY_CPU_NAME "mips"
     82   /* #define MY_CPU_32BIT */
     83 #endif
     84 
     85 
     86 #if  defined(__ppc64__) \
     87   || defined(__powerpc64__)
     88   #ifdef __ILP32__
     89     #define MY_CPU_NAME "ppc64-32"
     90   #else
     91     #define MY_CPU_NAME "ppc64"
     92   #endif
     93   #define MY_CPU_64BIT
     94 #elif defined(__ppc__) \
     95   || defined(__powerpc__)
     96   #define MY_CPU_NAME "ppc"
     97   #define MY_CPU_32BIT
     98 #endif
     99 
    100 
    101 #if  defined(__sparc64__)
    102   #define MY_CPU_NAME "sparc64"
    103   #define MY_CPU_64BIT
    104 #elif defined(__sparc__)
    105   #define MY_CPU_NAME "sparc"
    106   /* #define MY_CPU_32BIT */
    107 #endif
    108 
    109 
    110 #if defined(MY_CPU_X86) || defined(MY_CPU_AMD64)
    111 #define MY_CPU_X86_OR_AMD64
    112 #endif
    113 
    114 
    115 #ifdef _WIN32
    116 
    117   #ifdef MY_CPU_ARM
    118   #define MY_CPU_ARM_LE
    119   #endif
    120 
    121   #ifdef MY_CPU_ARM64
    122   #define MY_CPU_ARM64_LE
    123   #endif
    124 
    125   #ifdef _M_IA64
    126   #define MY_CPU_IA64_LE
    127   #endif
    128 
    129 #endif
    130 
    131 
    132 #if defined(MY_CPU_X86_OR_AMD64) \
    133     || defined(MY_CPU_ARM_LE) \
    134     || defined(MY_CPU_ARM64_LE) \
    135     || defined(MY_CPU_IA64_LE) \
    136     || defined(__LITTLE_ENDIAN__) \
    137     || defined(__ARMEL__) \
    138     || defined(__THUMBEL__) \
    139     || defined(__AARCH64EL__) \
    140     || defined(__MIPSEL__) \
    141     || defined(__MIPSEL) \
    142     || defined(_MIPSEL) \
    143     || defined(__BFIN__) \
    144     || (defined(__BYTE_ORDER__) && (__BYTE_ORDER__ == __ORDER_LITTLE_ENDIAN__))
    145   #define MY_CPU_LE
    146 #endif
    147 
    148 #if defined(__BIG_ENDIAN__) \
    149     || defined(__ARMEB__) \
    150     || defined(__THUMBEB__) \
    151     || defined(__AARCH64EB__) \
    152     || defined(__MIPSEB__) \
    153     || defined(__MIPSEB) \
    154     || defined(_MIPSEB) \
    155     || defined(__m68k__) \
    156     || defined(__s390__) \
    157     || defined(__s390x__) \
    158     || defined(__zarch__) \
    159     || (defined(__BYTE_ORDER__) && (__BYTE_ORDER__ == __ORDER_BIG_ENDIAN__))
    160   #define MY_CPU_BE
    161 #endif
    162 
    163 
    164 #if defined(MY_CPU_LE) && defined(MY_CPU_BE)
    165   #error Stop_Compiling_Bad_Endian
    166 #endif
    167 
    168 
    169 #if defined(MY_CPU_32BIT) && defined(MY_CPU_64BIT)
    170   #error Stop_Compiling_Bad_32_64_BIT
    171 #endif
    172 
    173 
    174 #ifndef MY_CPU_NAME
    175   #ifdef MY_CPU_LE
    176     #define MY_CPU_NAME "LE"
    177   #elif defined(MY_CPU_BE)
    178     #define MY_CPU_NAME "BE"
    179   #else
    180     /*
    181     #define MY_CPU_NAME ""
    182     */
    183   #endif
    184 #endif
    185 
    186 
    187 
    188 
    189 
    190 #ifdef MY_CPU_LE
    191   #if defined(MY_CPU_X86_OR_AMD64) \
    192       || defined(MY_CPU_ARM64) \
    193       || defined(__ARM_FEATURE_UNALIGNED)
    194     #define MY_CPU_LE_UNALIGN
    195   #endif
    196 #endif
    197 
    198 
    199 #ifdef MY_CPU_LE_UNALIGN
    200 
    201 #define GetUi16(p) (*(const UInt16 *)(const void *)(p))
    202 #define GetUi32(p) (*(const UInt32 *)(const void *)(p))
    203 #define GetUi64(p) (*(const UInt64 *)(const void *)(p))
    204 
    205 #define SetUi16(p, v) { *(UInt16 *)(p) = (v); }
    206 #define SetUi32(p, v) { *(UInt32 *)(p) = (v); }
    207 #define SetUi64(p, v) { *(UInt64 *)(p) = (v); }
    208 
    209 #else
    210 
    211 #define GetUi16(p) ( (UInt16) ( \
    212              ((const Byte *)(p))[0] | \
    213     ((UInt16)((const Byte *)(p))[1] << 8) ))
    214 
    215 #define GetUi32(p) ( \
    216              ((const Byte *)(p))[0]        | \
    217     ((UInt32)((const Byte *)(p))[1] <<  8) | \
    218     ((UInt32)((const Byte *)(p))[2] << 16) | \
    219     ((UInt32)((const Byte *)(p))[3] << 24))
    220 
    221 #define GetUi64(p) (GetUi32(p) | ((UInt64)GetUi32(((const Byte *)(p)) + 4) << 32))
    222 
    223 #define SetUi16(p, v) { Byte *_ppp_ = (Byte *)(p); UInt32 _vvv_ = (v); \
    224     _ppp_[0] = (Byte)_vvv_; \
    225     _ppp_[1] = (Byte)(_vvv_ >> 8); }
    226 
    227 #define SetUi32(p, v) { Byte *_ppp_ = (Byte *)(p); UInt32 _vvv_ = (v); \
    228     _ppp_[0] = (Byte)_vvv_; \
    229     _ppp_[1] = (Byte)(_vvv_ >> 8); \
    230     _ppp_[2] = (Byte)(_vvv_ >> 16); \
    231     _ppp_[3] = (Byte)(_vvv_ >> 24); }
    232 
    233 #define SetUi64(p, v) { Byte *_ppp2_ = (Byte *)(p); UInt64 _vvv2_ = (v); \
    234     SetUi32(_ppp2_    , (UInt32)_vvv2_); \
    235     SetUi32(_ppp2_ + 4, (UInt32)(_vvv2_ >> 32)); }
    236 
    237 #endif
    238 
    239 #ifdef __has_builtin
    240   #define MY__has_builtin(x) __has_builtin(x)
    241 #else
    242   #define MY__has_builtin(x) 0
    243 #endif
    244 
    245 #if defined(MY_CPU_LE_UNALIGN) && /* defined(_WIN64) && */ (_MSC_VER >= 1300)
    246 
    247 /* Note: we use bswap instruction, that is unsupported in 386 cpu */
    248 
    249 #include <stdlib.h>
    250 
    251 #pragma intrinsic(_byteswap_ushort)
    252 #pragma intrinsic(_byteswap_ulong)
    253 #pragma intrinsic(_byteswap_uint64)
    254 
    255 /* #define GetBe16(p) _byteswap_ushort(*(const UInt16 *)(const Byte *)(p)) */
    256 #define GetBe32(p) _byteswap_ulong(*(const UInt32 *)(const Byte *)(p))
    257 #define GetBe64(p) _byteswap_uint64(*(const UInt64 *)(const Byte *)(p))
    258 
    259 #define SetBe32(p, v) (*(UInt32 *)(void *)(p)) = _byteswap_ulong(v)
    260 
    261 #elif defined(MY_CPU_LE_UNALIGN) && ( \
    262        (defined(__GNUC__) && (__GNUC__ > 4 || (__GNUC__ == 4 && __GNUC_MINOR__ >= 3))) \
    263     || (defined(__clang__) && MY__has_builtin(__builtin_bswap16)) )
    264 
    265 /* #define GetBe16(p) __builtin_bswap16(*(const UInt16 *)(const Byte *)(p)) */
    266 #define GetBe32(p) __builtin_bswap32(*(const UInt32 *)(const Byte *)(p))
    267 #define GetBe64(p) __builtin_bswap64(*(const UInt64 *)(const Byte *)(p))
    268 
    269 #define SetBe32(p, v) (*(UInt32 *)(void *)(p)) = __builtin_bswap32(v)
    270 
    271 #else
    272 
    273 #define GetBe32(p) ( \
    274     ((UInt32)((const Byte *)(p))[0] << 24) | \
    275     ((UInt32)((const Byte *)(p))[1] << 16) | \
    276     ((UInt32)((const Byte *)(p))[2] <<  8) | \
    277              ((const Byte *)(p))[3] )
    278 
    279 #define GetBe64(p) (((UInt64)GetBe32(p) << 32) | GetBe32(((const Byte *)(p)) + 4))
    280 
    281 #define SetBe32(p, v) { Byte *_ppp_ = (Byte *)(p); UInt32 _vvv_ = (v); \
    282     _ppp_[0] = (Byte)(_vvv_ >> 24); \
    283     _ppp_[1] = (Byte)(_vvv_ >> 16); \
    284     _ppp_[2] = (Byte)(_vvv_ >> 8); \
    285     _ppp_[3] = (Byte)_vvv_; }
    286 
    287 #endif
    288 
    289 
    290 #ifndef GetBe16
    291 
    292 #define GetBe16(p) ( (UInt16) ( \
    293     ((UInt16)((const Byte *)(p))[0] << 8) | \
    294              ((const Byte *)(p))[1] ))
    295 
    296 #endif
    297 
    298 
    299 
    300 #ifdef MY_CPU_X86_OR_AMD64
    301 
    302 typedef struct
    303 {
    304   UInt32 maxFunc;
    305   UInt32 vendor[3];
    306   UInt32 ver;
    307   UInt32 b;
    308   UInt32 c;
    309   UInt32 d;
    310 } Cx86cpuid;
    311 
    312 enum
    313 {
    314   CPU_FIRM_INTEL,
    315   CPU_FIRM_AMD,
    316   CPU_FIRM_VIA
    317 };
    318 
    319 void MyCPUID(UInt32 function, UInt32 *a, UInt32 *b, UInt32 *c, UInt32 *d);
    320 
    321 BoolInt x86cpuid_CheckAndRead(Cx86cpuid *p);
    322 int x86cpuid_GetFirm(const Cx86cpuid *p);
    323 
    324 #define x86cpuid_GetFamily(ver) (((ver >> 16) & 0xFF0) | ((ver >> 8) & 0xF))
    325 #define x86cpuid_GetModel(ver)  (((ver >> 12) &  0xF0) | ((ver >> 4) & 0xF))
    326 #define x86cpuid_GetStepping(ver) (ver & 0xF)
    327 
    328 BoolInt CPU_Is_InOrder();
    329 BoolInt CPU_Is_Aes_Supported();
    330 
    331 #endif
    332 
    333 EXTERN_C_END
    334 
    335 #endif
    336