include/cln/types.h

   1 // Basic type definitions
   2
   3 #ifndef _CL_TYPES_H
   4 #define _CL_TYPES_H
   5
   6 // CPU and other
   7 #include "cln/config.h"
   8
   9 // char_bitsize, short_bitsize, long_bitsize, long_long_bitsize, pointer_bitsize
  10 #include "cln/intparam.h"
  11
  12 // intptr_t, uintptr_t
  13 #include <stdint.h>
  14
  15 // Elementary arithmetic types of given width:
  16   // 8 bits
  17   #if (char_bitsize==8)
  18     typedef signed char    sint8;
  19     typedef unsigned char  uint8;
  20   #else
  21     #error "No 8 bit integer type?"
  22   #endif
  23   // 16 bits
  24   #if (short_bitsize==16)
  25     typedef short           sint16;
  26     typedef unsigned short  uint16;
  27   #else
  28     #error "No 16 bit integer type?"
  29   #endif
  30   // 32 bits
  31   #if (long_bitsize==32)
  32     typedef long           sint32;
  33     typedef unsigned long  uint32;
  34   #elif (int_bitsize==32)
  35     typedef int            sint32;
  36     typedef unsigned int   uint32;
  37   #else
  38     #error "No 32 bit integer type?"
  39   #endif
  40   // 64 bits
  41   #if (long_bitsize==64)
  42     typedef long           sint64;
  43     typedef unsigned long  uint64;
  44   #elif (long_long_bitsize==64)
  45     typedef long long           sint64;
  46     typedef unsigned long long  uint64;
  47   #else
  48     #error "No 64 bit integer type?"
  49   #endif
  50   #if (defined(__alpha__) || defined(__ia64__) || defined(__mips64__) || defined(__powerpc64__) || defined(__s390x__) || (defined(__sparc__) && defined(__arch64__)) || (defined(__x86_64__) || defined(_M_AMD64)) || defined(__aarch64__) || (defined(__riscv) && __riscv_xlen == 64) || defined(__e2k__))
  51     // 64 bit registers in hardware
  52     #define HAVE_FAST_LONGLONG
  53   #endif
  54 // Synonyms
  55   #define intBsize 8
  56   typedef sint8  sintB;
  57   typedef uint8  uintB;
  58   #define intWsize 16
  59   typedef sint16 sintW;
  60   typedef uint16 uintW;
  61   #define intLsize 32
  62   typedef sint32 sintL;
  63   typedef uint32 uintL;
  64   #define intQsize 64
  65   typedef sint64 sintQ;
  66   typedef uint64 uintQ;
  67
  68 // Type for three values (0, +1, -1).
  69   typedef int  cl_signean;
  70   #define signean_plus  1
  71   #define signean_null  0
  72   #define signean_minus -1
  73
  74 // Integer type used for counters.
  75 // Constraint: sizeof(uintC) >= sizeof(uintL)
  76   #if (defined(HAVE_FAST_LONGLONG) && (defined(__alpha__) || defined(__ia64__) || defined(__powerpc64__) || defined(__s390x__) || (defined(__sparc__) && defined(__arch64__)) || defined(__x86_64__) || defined(__aarch64__) || defined(__mips64__) || (defined(__riscv) && __riscv_xlen == 64) || defined(__e2k__)))
  77     #define intCsize long_bitsize
  78     typedef long           sintC;
  79     typedef unsigned long  uintC;
  80   #else
  81     #define intCsize int_bitsize
  82     typedef int           sintC;
  83     typedef unsigned int  uintC;
  84   #endif
  85
  86 // Integer type used for lfloat exponents.
  87 // Constraint: sizeof(uintE) >= sizeof(uintC)
  88   #if (defined(__alpha__) || defined(__ia64__) || defined(__powerpc64__) || defined(__s390x__) || (defined(__sparc__) && defined(__arch64__)) || defined(__x86_64__) || defined(__i386__) || defined(__mips__) || defined(__rs6000__) || defined(__aarch64__) || (defined(__riscv) && __riscv_xlen == 64) || defined(__e2k__))
  89     #define intEsize 64
  90     typedef sint64  sintE;
  91     typedef uint64  uintE;
  92   #else
  93     #define intEsize 32
  94     typedef sint32  sintE;
  95     typedef uint32  uintE;
  96   #endif
  97
  98 // Integer type as large as a pointer.
  99 // Assumption: sizeof(intptr_t) == sizeof(void*)
 100   #define intPsize pointer_bitsize
 101   typedef intptr_t   sintP;
 102   typedef uintptr_t  uintP;
 103
 104 // Integer type used for the value of a fixnum.
 105   // It must be like this, because in a couple of places we assume
 106   // cl_value_shift + cl_value_len == cl_pointer_size.
 107   #define intVsize intPsize
 108   typedef sintP  sintV;
 109   typedef uintP  uintV;
 110
 111 // Numbers in the heap are stored as "digit" sequences.
 112 // A digit is an unsigned int with intDsize bits.
 113 // intDsize should be 8 or 16 or 32 or 64 and it should match mp_limb_t,
 114 // if CLN is sitting on top of GMP.
 115   #if defined(GMP_DEMANDS_UINTD_LONG_LONG)
 116     #define HAVE_FAST_LONGLONG
 117     #define intDsize long_long_bitsize
 118     typedef long long sintD;
 119     typedef unsigned long long uintD;
 120   #elif defined(GMP_DEMANDS_UINTD_LONG)
 121     #define intDsize long_bitsize
 122     typedef long sintD;
 123     typedef unsigned long uintD;
 124   #elif defined(GMP_DEMANDS_UINTD_INT)
 125     #define intDsize int_bitsize
 126     typedef int sintD;
 127     typedef unsigned int uintD;
 128   #else  // we are not using GMP, so just guess something reasonable
 129     #if (defined(HAVE_FAST_LONGLONG) && (defined(__alpha__) || defined(__ia64__) || defined(__powerpc64__) || (defined(__sparc__) && defined(__arch64__)) || defined(__s390x__) || defined(__x86_64__) || defined(__aarch64__) || defined(__mips64__) || (defined(__riscv) && __riscv_xlen == 64) || defined(__e2k__)))
 130       #define intDsize 64
 131       typedef sint64  sintD;
 132       typedef uint64  uintD;
 133     #else
 134       #define intDsize 32
 135       typedef sint32  sintD;
 136       typedef uint32  uintD;
 137     #endif
 138   #endif
 139   #if (intDsize==64)
 140     #define intDDsize 128    // = 2*intDsize
 141     #define log2_intDsize 6  // = log2(intDsize)
 142   #elif (intDsize==32)
 143     #define intDDsize 64     // = 2*intDsize
 144     #define log2_intDsize 5  // = log2(intDsize)
 145   #elif (intDsize==16)
 146     #define intDDsize 32     // = 2*intDsize
 147     #define log2_intDsize 4  // = log2(intDsize)
 148   #elif (intDsize==8)
 149     #define intDDsize 16     // = 2*intDsize
 150     #define log2_intDsize 3  // = log2(intDsize)
 151   #else
 152     #error "What is intDsize again?"
 153   #endif
 154 // HAVE_DD means that there are unsigned ints with 2*intDsize bits.
 155   #if (intDDsize <= (defined(HAVE_FAST_LONGLONG) ? 64 : 32))
 156     #define HAVE_DD 1
 157     #if (intDDsize==16)
 158       typedef sint16  sintDD;
 159       typedef uint16  uintDD;
 160     #endif
 161     #if (intDDsize==32)
 162       typedef sint32  sintDD;
 163       typedef uint32  uintDD;
 164     #endif
 165     #if (intDDsize==64)
 166       typedef sint64  sintDD;
 167       typedef uint64  uintDD;
 168     #endif
 169   #else
 170     #define HAVE_DD 0
 171   #endif
 172
 173 // Largest integer type which can be manipulated as efficiently as a pointer.
 174 // This is normally the same as the hardware register size.
 175 // Assumption: cl_word_size >= intPsize
 176   #ifdef HAVE_FAST_LONGLONG
 177     #define cl_word_size  64
 178   #else
 179     #define cl_word_size  32
 180   #endif
 181
 182 #endif /* _CL_TYPES_H */