2 * Handling of the int64 and uint64 types. Done in 32-bit integers,
3 * for (pre-C99) portability. Hopefully once C99 becomes widespread
4 * we can kiss this lot goodbye...
12 uint64
uint64_div10(uint64 x
, int *remainder
)
20 * Now we have to add in the remainder left over from x.hi.
23 y
.lo
+= r2
* 429496729;
33 void uint64_decimal(uint64 x
, char *buffer
)
40 x
= uint64_div10(x
, &d
);
42 buf
[--start
] = d
+ '0';
43 } while (x
.hi
|| x
.lo
);
45 memcpy(buffer
, buf
+ start
, sizeof(buf
) - start
);
46 buffer
[sizeof(buf
) - start
] = '\0';
49 uint64
uint64_make(unsigned long hi
, unsigned long lo
)
52 y
.hi
= hi
& 0xFFFFFFFFU
;
53 y
.lo
= lo
& 0xFFFFFFFFU
;
57 uint64
uint64_add(uint64 x
, uint64 y
)
59 x
.lo
= (x
.lo
+ y
.lo
) & 0xFFFFFFFFU
;
60 x
.hi
+= y
.hi
+ (x
.lo
< y
.lo ?
1 : 0);
64 uint64
uint64_add32(uint64 x
, unsigned long y
)
69 return uint64_add(x
, yy
);
72 int uint64_compare(uint64 x
, uint64 y
)
75 return x
.hi
< y
.hi ?
-1 : +1;
77 return x
.lo
< y
.lo ?
-1 : +1;
81 uint64
uint64_subtract(uint64 x
, uint64 y
)
83 x
.lo
= (x
.lo
- y
.lo
) & 0xFFFFFFFFU
;
84 x
.hi
= (x
.hi
- y
.hi
- (x
.lo
> (y
.lo
^ 0xFFFFFFFFU
) ?
1 : 0)) & 0xFFFFFFFFU
;
88 double uint64_to_double(uint64 x
)
90 return (4294967296.0 * x
.hi
) + (double)x
.lo
;
93 uint64
uint64_shift_right(uint64 x
, int shift
)
97 x
.lo
|= (x
.hi
<< (32-shift
)) & 0xFFFFFFFFU
;
100 x
.lo
= x
.hi
>> (shift
-32);
106 uint64
uint64_shift_left(uint64 x
, int shift
)
109 x
.hi
= (x
.hi
<< shift
) & 0xFFFFFFFFU
;
110 x
.hi
|= (x
.lo
>> (32-shift
));
111 x
.lo
= (x
.lo
<< shift
) & 0xFFFFFFFFU
;
113 x
.hi
= (x
.lo
<< (shift
-32)) & 0xFFFFFFFFU
;
119 uint64
uint64_from_decimal(char *str
)
123 while (*str
>= '0' && *str
<= '9') {
124 ret
= uint64_add(uint64_shift_left(ret
, 3),
125 uint64_shift_left(ret
, 1));
126 ret
= uint64_add32(ret
, *str
- '0');
141 x
= uint64_make(0x3456789AUL
, 0xDEF01234UL
);
142 printf("%08lx.%08lx\n", x
.hi
, x
.lo
);
143 uint64_decimal(x
, buf
);
146 y
= uint64_add32(x
, 0xFFFFFFFFU
);
147 printf("%08lx.%08lx\n", y
.hi
, y
.lo
);
148 uint64_decimal(y
, buf
);
151 z
= uint64_subtract(y
, x
);
152 printf("%08lx.%08lx\n", z
.hi
, z
.lo
);
153 uint64_decimal(z
, buf
);
156 z
= uint64_subtract(x
, y
);
157 printf("%08lx.%08lx\n", z
.hi
, z
.lo
);
158 uint64_decimal(z
, buf
);
161 y
= uint64_shift_right(x
, 4);
162 printf("%08lx.%08lx\n", y
.hi
, y
.lo
);
164 y
= uint64_shift_right(x
, 36);
165 printf("%08lx.%08lx\n", y
.hi
, y
.lo
);
167 y
= uint64_shift_left(x
, 4);
168 printf("%08lx.%08lx\n", x
.hi
, x
.lo
);
170 y
= uint64_shift_left(x
, 36);
171 printf("%08lx.%08lx\n", x
.hi
, x
.lo
);