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