54 #if (MAXTYPE_INT >= 64)
55 int64s LittleEndian2int40s (
const char* List);
56 int64u LittleEndian2int40u (
const char* List);
57 int64s LittleEndian2int48s (
const char* List);
58 int64u LittleEndian2int48u (
const char* List);
59 int64s LittleEndian2int56s (
const char* List);
60 int64u LittleEndian2int56u (
const char* List);
61 int64s LittleEndian2int64s (
const char* List);
62 int64u LittleEndian2int64u (
const char* List);
63 int128u LittleEndian2int128u (
const char* List);
78 #if (MAXTYPE_INT >= 64)
79 void int40s2LittleEndian (
char* List, int64s Value);
80 void int40u2LittleEndian (
char* List, int64u Value);
81 void int48s2LittleEndian (
char* List, int64s Value);
82 void int48u2LittleEndian (
char* List, int64u Value);
83 void int56s2LittleEndian (
char* List, int64s Value);
84 void int56u2LittleEndian (
char* List, int64u Value);
85 void int64s2LittleEndian (
char* List, int64s Value);
86 void int64u2LittleEndian (
char* List, int64u Value);
87 void int128u2LittleEndian (
char* List,
int128u Value);
103 #if (MAXTYPE_INT >= 64)
104 inline int64s LittleEndian2int40s (
const int8u* List) {
return LittleEndian2int40s ((
const char*)List);}
105 inline int64u LittleEndian2int40u (
const int8u* List) {
return LittleEndian2int40u ((
const char*)List);}
106 inline int64s LittleEndian2int48s (
const int8u* List) {
return LittleEndian2int48s ((
const char*)List);}
107 inline int64u LittleEndian2int48u (
const int8u* List) {
return LittleEndian2int48u ((
const char*)List);}
108 inline int64s LittleEndian2int56s (
const int8u* List) {
return LittleEndian2int56s ((
const char*)List);}
109 inline int64u LittleEndian2int56u (
const int8u* List) {
return LittleEndian2int56u ((
const char*)List);}
110 inline int64s LittleEndian2int64s (
const int8u* List) {
return LittleEndian2int64s ((
const char*)List);}
111 inline int64u LittleEndian2int64u (
const int8u* List) {
return LittleEndian2int64u ((
const char*)List);}
112 inline int128u LittleEndian2int128u (
const int8u* List) {
return LittleEndian2int64u ((
const char*)List);}
127 #if (MAXTYPE_INT >= 64)
128 inline void int40s2LittleEndian (int8u* List, int64s Value) {
return int40s2LittleEndian ((
char*)List, Value);}
129 inline void int40u2LittleEndian (int8u* List, int64u Value) {
return int40u2LittleEndian ((
char*)List, Value);}
130 inline void int48s2LittleEndian (int8u* List, int64s Value) {
return int48s2LittleEndian ((
char*)List, Value);}
131 inline void int48u2LittleEndian (int8u* List, int64u Value) {
return int48u2LittleEndian ((
char*)List, Value);}
132 inline void int56s2LittleEndian (int8u* List, int64s Value) {
return int56s2LittleEndian ((
char*)List, Value);}
133 inline void int56u2LittleEndian (int8u* List, int64u Value) {
return int56u2LittleEndian ((
char*)List, Value);}
134 inline void int64s2LittleEndian (int8u* List, int64s Value) {
return int64s2LittleEndian ((
char*)List, Value);}
135 inline void int64u2LittleEndian (int8u* List, int64u Value) {
return int64u2LittleEndian ((
char*)List, Value);}
136 inline void int128u2LittleEndian (int8u* List,
int128u Value) {
return int128u2LittleEndian ((
char*)List, Value);}
142 #endif //__BORLANDC__
154 #if (MAXTYPE_INT >= 64)
155 int64s BigEndian2int40s (
const char* List);
156 int64u BigEndian2int40u (
const char* List);
157 int64s BigEndian2int48s (
const char* List);
158 int64u BigEndian2int48u (
const char* List);
159 int64s BigEndian2int56s (
const char* List);
160 int64u BigEndian2int56u (
const char* List);
161 int64s BigEndian2int64s (
const char* List);
162 int64u BigEndian2int64u (
const char* List);
163 int128u BigEndian2int128u (
const char* List);
178 #if (MAXTYPE_INT >= 64)
179 void int40s2BigEndian (
char* List, int64s Value);
180 void int40u2BigEndian (
char* List, int64u Value);
181 void int48s2BigEndian (
char* List, int64s Value);
182 void int48u2BigEndian (
char* List, int64u Value);
183 void int56s2BigEndian (
char* List, int64s Value);
184 void int56u2BigEndian (
char* List, int64u Value);
185 void int64s2BigEndian (
char* List, int64s Value);
186 void int64u2BigEndian (
char* List, int64u Value);
187 void int128u2BigEndian (
char* List,
int128u Value);
203 #if (MAXTYPE_INT >= 64)
204 inline int64s BigEndian2int40s (
const int8u* List) {
return BigEndian2int40s ((
const char*)List);}
205 inline int64u BigEndian2int40u (
const int8u* List) {
return BigEndian2int40u ((
const char*)List);}
206 inline int64s BigEndian2int48s (
const int8u* List) {
return BigEndian2int48s ((
const char*)List);}
207 inline int64u BigEndian2int48u (
const int8u* List) {
return BigEndian2int48u ((
const char*)List);}
208 inline int64s BigEndian2int56s (
const int8u* List) {
return BigEndian2int56s ((
const char*)List);}
209 inline int64u BigEndian2int56u (
const int8u* List) {
return BigEndian2int56u ((
const char*)List);}
210 inline int64s BigEndian2int64s (
const int8u* List) {
return BigEndian2int64s ((
const char*)List);}
211 inline int64u BigEndian2int64u (
const int8u* List) {
return BigEndian2int64u ((
const char*)List);}
212 inline int128u BigEndian2int128u (
const int8u* List) {
return BigEndian2int128u ((
const char*)List);}
227 #if (MAXTYPE_INT >= 64)
228 inline void int40s2BigEndian (int8u* List, int64s Value) {
return int40s2BigEndian ((
char*)List, Value);}
229 inline void int40u2BigEndian (int8u* List, int64u Value) {
return int40u2BigEndian ((
char*)List, Value);}
230 inline void int48s2BigEndian (int8u* List, int64s Value) {
return int48s2BigEndian ((
char*)List, Value);}
231 inline void int48u2BigEndian (int8u* List, int64u Value) {
return int48u2BigEndian ((
char*)List, Value);}
232 inline void int56s2BigEndian (int8u* List, int64s Value) {
return int56s2BigEndian ((
char*)List, Value);}
233 inline void int56u2BigEndian (int8u* List, int64u Value) {
return int56u2BigEndian ((
char*)List, Value);}
234 inline void int64s2BigEndian (int8u* List, int64s Value) {
return int64s2BigEndian ((
char*)List, Value);}
235 inline void int64u2BigEndian (int8u* List, int64u Value) {
return int64u2BigEndian ((
char*)List, Value);}
236 inline void int128u2BigEndian (int8u* List,
int128u Value) {
return int128u2BigEndian ((
char*)List, Value);}
242 #endif //__BORLANDC__
248 void int32s_int64s (int64s &BigInt, int32s High, int32u Low);
249 void int32u_int64u (int64s &BigInt, int32u High, int32u Low);
250 void int64s_int32s (int64s BigInt, int32s &High, int32u &Low);
251 void int64u_int32u (int64u BigInt, int32u &High, int32u &Low);
261 #if defined(_MSC_VER) && _MSC_VER<=1200
262 inline float32
int64u_float32 (int64u v) {
return static_cast<float32
>(
static_cast<int64s
>(v>>1))*2.0f +
static_cast<float32
>(
static_cast<int64s
>(v & 1));}
263 inline float64
int64u_float64 (int64u v) {
return static_cast<float64
>(
static_cast<int64s
>(v>>1))*2.0f +
static_cast<float32
>(
static_cast<int64s
>(v & 1));}
267 #endif // defined(_MSC_VER) && _MSC_VER<=1200
271 inline int64u
CC8(
const char* C) {
return BigEndian2int64u(C);}
272 inline int64u
CC7(
const char* C) {
return BigEndian2int56u(C);}
273 inline int64u
CC6(
const char* C) {
return BigEndian2int48u(C);}
274 inline int64u
CC5(
const char* C) {
return BigEndian2int40u(C);}
280 inline int64u
CC8(
const int8u* C) {
return BigEndian2int64u(C);}
281 inline int64u
CC7(
const int8u* C) {
return BigEndian2int56u(C);}
282 inline int64u
CC6(
const int8u* C) {
return BigEndian2int48u(C);}
283 inline int64u
CC5(
const int8u* C) {
return BigEndian2int40u(C);}
288 #endif // __BORLANDC__
294 #define HEX__(n) 0x##n##LU
297 #define B8__(x) ((x&0x0000000FLU)?0x01:0) \
298 +((x&0x000000F0LU)?0x02:0) \
299 +((x&0x00000F00LU)?0x04:0) \
300 +((x&0x0000F000LU)?0x08:0) \
301 +((x&0x000F0000LU)?0x10:0) \
302 +((x&0x00F00000LU)?0x20:0) \
303 +((x&0x0F000000LU)?0x40:0) \
304 +((x&0xF0000000LU)?0x80:0)
307 #define B8(d) ((int8u)B8__(HEX__(d)))
310 #define B16(dmsb, dlsb) (((int16u)B8(dmsb)<<8) \
311 + ((int16u)B8(dlsb)<<0))
314 #define B32(dmsb, db2, db3, dlsb) (((int32u)B8(dmsb)<<24) \
315 + ((int32u)B8( db2)<<16) \
316 + ((int32u)B8( db3)<< 8) \
317 + ((int32u)B8(dlsb)<< 0))