diff options
author | unknown <konstantin@mysql.com> | 2005-03-21 15:58:34 +0300 |
---|---|---|
committer | unknown <konstantin@mysql.com> | 2005-03-21 15:58:34 +0300 |
commit | 3231241f837729781339f68c270252ac80d11a52 (patch) | |
tree | 0d7d7a0f4c911a3f725b4113c66230c4a08bd74e /strings/decimal.c | |
parent | 4ebfa64a1942ad2c221f13f63cc4ec4c1399f819 (diff) | |
download | mariadb-git-3231241f837729781339f68c270252ac80d11a52.tar.gz |
Rename decimal -> decimal_t, decimal_digit -> decimal_digit_t
Diffstat (limited to 'strings/decimal.c')
-rw-r--r-- | strings/decimal.c | 94 |
1 files changed, 49 insertions, 45 deletions
diff --git a/strings/decimal.c b/strings/decimal.c index f288a93eb5e..d7bea3e291d 100644 --- a/strings/decimal.c +++ b/strings/decimal.c @@ -109,20 +109,20 @@ /* Internally decimal numbers are stored base 10^9 (see DIG_BASE below) - So one "decimal_digit" is + So one variable of type decimal_digit_t is limited: 0 < decimal_digit <= DIG_MAX < DIG_BASE - in the struct st_decimal: + in the struct st_decimal_t: - intg is the number of *decimal* digits (NOT number of decimal_digit's !) + intg is the number of *decimal* digits (NOT number of decimal_digit_t's !) before the point frac - number of decimal digits after the point - buf is an array of decimal_digit's - len is the length of buf (length of allocated space) in decimal_digit's, + buf is an array of decimal_digit_t's + len is the length of buf (length of allocated space) in decimal_digit_t's, not in bytes */ -typedef decimal_digit dec1; +typedef decimal_digit_t dec1; typedef longlong dec2; #define DIG_PER_DEC1 9 @@ -223,7 +223,7 @@ static const dec1 frac_max[DIG_PER_DEC1-1]={ to->buf and to->len must be set. */ -void max_decimal(int precision, int frac, decimal *to) +void max_decimal(int precision, int frac, decimal_t *to) { int intpart; dec1 *buf= to->buf; @@ -250,7 +250,7 @@ void max_decimal(int precision, int frac, decimal *to) } -static dec1 *remove_leading_zeroes(decimal *from, int *intg_result) +static dec1 *remove_leading_zeroes(decimal_t *from, int *intg_result) { int intg= from->intg, i; dec1 *buf0= from->buf; @@ -281,7 +281,7 @@ static dec1 *remove_leading_zeroes(decimal *from, int *intg_result) from number for processing */ -void decimal_optimize_fraction(decimal *from) +void decimal_optimize_fraction(decimal_t *from) { int frac= from->frac, i; dec1 *buf0= from->buf + ROUND_UP(from->intg) + ROUND_UP(frac) - 1; @@ -328,7 +328,7 @@ void decimal_optimize_fraction(decimal *from) E_DEC_OK/E_DEC_TRUNCATED/E_DEC_OVERFLOW */ -int decimal2string(decimal *from, char *to, int *to_len, +int decimal2string(decimal_t *from, char *to, int *to_len, int fixed_precision, int fixed_decimals, char filler) { @@ -453,7 +453,7 @@ int decimal2string(decimal *from, char *to, int *to_len, be written by this address */ -static void digits_bounds(decimal *from, int *start_result, int *end_result) +static void digits_bounds(decimal_t *from, int *start_result, int *end_result) { int start, stop, i; dec1 *buf_beg= from->buf; @@ -520,7 +520,7 @@ static void digits_bounds(decimal *from, int *start_result, int *end_result) 'shift' have to be from 1 to DIG_PER_DEC1-1 (inclusive) */ -void do_mini_left_shift(decimal *dec, int shift, int beg, int last) +void do_mini_left_shift(decimal_t *dec, int shift, int beg, int last) { dec1 *from= dec->buf + ROUND_UP(beg + 1) - 1; dec1 *end= dec->buf + ROUND_UP(last) - 1; @@ -550,7 +550,7 @@ void do_mini_left_shift(decimal *dec, int shift, int beg, int last) 'shift' have to be from 1 to DIG_PER_DEC1-1 (inclusive) */ -void do_mini_right_shift(decimal *dec, int shift, int beg, int last) +void do_mini_right_shift(decimal_t *dec, int shift, int beg, int last) { dec1 *from= dec->buf + ROUND_UP(last) - 1; dec1 *end= dec->buf + ROUND_UP(beg + 1) - 1; @@ -583,7 +583,7 @@ void do_mini_right_shift(decimal *dec, int shift, int beg, int last) E_DEC_TRUNCATED number was rounded to fit into buffer */ -int decimal_shift(decimal *dec, int shift) +int decimal_shift(decimal_t *dec, int shift) { /* index of first non zero digit (all indexes from 0) */ int beg; @@ -780,7 +780,8 @@ int decimal_shift(decimal *dec, int shift) (to make error handling easier) */ -int internal_str2dec(const char *from, decimal *to, char **end, my_bool fixed) +int +internal_str2dec(const char *from, decimal_t *to, char **end, my_bool fixed) { const char *s= from, *s1, *endp, *end_of_string= *end; int i, intg, frac, error, intg1, frac1; @@ -937,7 +938,7 @@ fatal_error: E_DEC_OK */ -int decimal2double(decimal *from, double *to) +int decimal2double(decimal_t *from, double *to) { double x=0, t=DIG_BASE; int intg, frac; @@ -963,7 +964,7 @@ int decimal2double(decimal *from, double *to) E_DEC_OK/E_DEC_OVERFLOW/E_DEC_TRUNCATED */ -int double2decimal(double from, decimal *to) +int double2decimal(double from, decimal_t *to) { /* TODO: fix it, when we'll have dtoa */ char s[400], *end; @@ -972,7 +973,7 @@ int double2decimal(double from, decimal *to) return string2decimal(s, to, &end); } -static int ull2dec(ulonglong from, decimal *to) +static int ull2dec(ulonglong from, decimal_t *to) { int intg1, error=E_DEC_OK; ulonglong x=from; @@ -998,20 +999,20 @@ static int ull2dec(ulonglong from, decimal *to) return error; } -int ulonglong2decimal(ulonglong from, decimal *to) +int ulonglong2decimal(ulonglong from, decimal_t *to) { to->sign=0; return ull2dec(from, to); } -int longlong2decimal(longlong from, decimal *to) +int longlong2decimal(longlong from, decimal_t *to) { if ((to->sign= from < 0)) return ull2dec(-from, to); return ull2dec(from, to); } -int decimal2ulonglong(decimal *from, ulonglong *to) +int decimal2ulonglong(decimal_t *from, ulonglong *to) { dec1 *buf=from->buf; ulonglong x=0; @@ -1040,7 +1041,7 @@ int decimal2ulonglong(decimal *from, ulonglong *to) return E_DEC_OK; } -int decimal2longlong(decimal *from, longlong *to) +int decimal2longlong(decimal_t *from, longlong *to) { dec1 *buf=from->buf; longlong x=0; @@ -1112,7 +1113,7 @@ int decimal2longlong(decimal *from, longlong *to) 3. The first intg % DIG_PER_DEC1 digits are stored in the reduced number of bytes (enough bytes to store this number of digits - see dig2bytes) - 4. same for frac - full decimal_digit's are stored as is, + 4. same for frac - full decimal_digit_t's are stored as is, the last frac % DIG_PER_DEC1 digits - in the reduced number of bytes. 5. If the number is negative - every byte is inversed. 5. The very first bit of the resulting byte array is inverted (because @@ -1122,7 +1123,7 @@ int decimal2longlong(decimal *from, longlong *to) 1234567890.1234 - internally is represented as 3 decimal_digit's + internally is represented as 3 decimal_digit_t's 1 234567890 123400000 @@ -1131,13 +1132,13 @@ int decimal2longlong(decimal *from, longlong *to) 00-00-00-01 0D-FB-38-D2 07-5A-EF-40 - now, middle decimal_digit is full - it stores 9 decimal digits. It goes + now, middle decimal_digit_t is full - it stores 9 decimal digits. It goes into binary representation as is: ........... 0D-FB-38-D2 ............ - First decimal_digit has only one decimal digit. We can store one digit in + First decimal_digit_t has only one decimal digit. We can store one digit in one byte, no need to waste four: 01 0D-FB-38-D2 ............ @@ -1155,7 +1156,7 @@ int decimal2longlong(decimal *from, longlong *to) 7E F2 04 37 2D FB 2D */ -int decimal2bin(decimal *from, char *to, int precision, int frac) +int decimal2bin(decimal_t *from, char *to, int precision, int frac) { dec1 mask=from->sign ? -1 : 0, *buf1=from->buf, *stop1; int error=E_DEC_OK, intg=precision-frac, @@ -1283,7 +1284,7 @@ int decimal2bin(decimal *from, char *to, int precision, int frac) E_DEC_OK/E_DEC_TRUNCATED/E_DEC_OVERFLOW */ -int bin2decimal(char *from, decimal *to, int precision, int scale) +int bin2decimal(char *from, decimal_t *to, int precision, int scale) { int error=E_DEC_OK, intg=precision-scale, intg0=intg/DIG_PER_DEC1, frac0=scale/DIG_PER_DEC1, @@ -1424,7 +1425,9 @@ int decimal_bin_size(int precision, int scale) E_DEC_OK/E_DEC_TRUNCATED */ -int decimal_round(decimal *from, decimal *to, int scale, decimal_round_mode mode) +int +decimal_round(decimal_t *from, decimal_t *to, int scale, + decimal_round_mode mode) { int frac0=scale>0 ? ROUND_UP(scale) : scale/DIG_PER_DEC1, frac1=ROUND_UP(from->frac), round_digit, @@ -1585,7 +1588,7 @@ done: multiply by sizeof(dec1) */ -int decimal_result_size(decimal *from1, decimal *from2, char op, int param) +int decimal_result_size(decimal_t *from1, decimal_t *from2, char op, int param) { switch (op) { case '-': @@ -1604,7 +1607,7 @@ int decimal_result_size(decimal *from1, decimal *from2, char op, int param) return -1; /* shut up the warning */ } -static int do_add(decimal *from1, decimal *from2, decimal *to) +static int do_add(decimal_t *from1, decimal_t *from2, decimal_t *to) { int intg1=ROUND_UP(from1->intg), intg2=ROUND_UP(from2->intg), frac1=ROUND_UP(from1->frac), frac2=ROUND_UP(from2->frac), @@ -1680,7 +1683,7 @@ static int do_add(decimal *from1, decimal *from2, decimal *to) /* to=from1-from2. if to==0, return -1/0/+1 - the result of the comparison */ -static int do_sub(decimal *from1, decimal *from2, decimal *to) +static int do_sub(decimal_t *from1, decimal_t *from2, decimal_t *to) { int intg1=ROUND_UP(from1->intg), intg2=ROUND_UP(from2->intg), frac1=ROUND_UP(from1->frac), frac2=ROUND_UP(from2->frac); @@ -1741,7 +1744,7 @@ static int do_sub(decimal *from1, decimal *from2, decimal *to) /* ensure that always from1 > from2 (and intg1 >= intg2) */ if (carry) { - swap_variables(decimal *,from1,from1); + swap_variables(decimal_t *,from1,from1); swap_variables(dec1 *,start1, start2); swap_variables(int,intg1,intg2); swap_variables(int,frac1,frac2); @@ -1807,28 +1810,28 @@ static int do_sub(decimal *from1, decimal *from2, decimal *to) return error; } -int decimal_add(decimal *from1, decimal *from2, decimal *to) +int decimal_add(decimal_t *from1, decimal_t *from2, decimal_t *to) { if (likely(from1->sign == from2->sign)) return do_add(from1, from2, to); return do_sub(from1, from2, to); } -int decimal_sub(decimal *from1, decimal *from2, decimal *to) +int decimal_sub(decimal_t *from1, decimal_t *from2, decimal_t *to) { if (likely(from1->sign == from2->sign)) return do_sub(from1, from2, to); return do_add(from1, from2, to); } -int decimal_cmp(decimal *from1, decimal *from2) +int decimal_cmp(decimal_t *from1, decimal_t *from2) { if (likely(from1->sign == from2->sign)) return do_sub(from1, from2, 0); return from1->sign > from2->sign ? -1 : 1; } -int decimal_is_zero(decimal *from) +int decimal_is_zero(decimal_t *from) { dec1 *buf1=from->buf, *end=buf1+ROUND_UP(from->intg)+ROUND_UP(from->frac); @@ -1859,7 +1862,7 @@ int decimal_is_zero(decimal *from) XXX if this library is to be used with huge numbers of thousands of digits, fast multiplication must be implemented. */ -int decimal_mul(decimal *from1, decimal *from2, decimal *to) +int decimal_mul(decimal_t *from1, decimal_t *from2, decimal_t *to) { int intg1=ROUND_UP(from1->intg), intg2=ROUND_UP(from2->intg), frac1=ROUND_UP(from1->frac), frac2=ROUND_UP(from2->frac), @@ -1932,8 +1935,8 @@ int decimal_mul(decimal *from1, decimal *from2, decimal *to) changed to malloc (or at least fallback to malloc if alloca() fails) but then, decimal_mod() should be rewritten too :( */ -static int do_div_mod(decimal *from1, decimal *from2, - decimal *to, decimal *mod, int scale_incr) +static int do_div_mod(decimal_t *from1, decimal_t *from2, + decimal_t *to, decimal_t *mod, int scale_incr) { int frac1=ROUND_UP(from1->frac)*DIG_PER_DEC1, prec1=from1->intg+frac1, frac2=ROUND_UP(from2->frac)*DIG_PER_DEC1, prec2=from2->intg+frac2, @@ -2208,7 +2211,8 @@ done: see do_div_mod() */ -int decimal_div(decimal *from1, decimal *from2, decimal *to, int scale_incr) +int +decimal_div(decimal_t *from1, decimal_t *from2, decimal_t *to, int scale_incr) { return do_div_mod(from1, from2, to, 0, scale_incr); } @@ -2240,7 +2244,7 @@ int decimal_div(decimal *from1, decimal *from2, decimal *to, int scale_incr) thus, there's no requirement for M or N to be integers */ -int decimal_mod(decimal *from1, decimal *from2, decimal *to) +int decimal_mod(decimal_t *from1, decimal_t *from2, decimal_t *to) { return do_div_mod(from1, from2, 0, to, 0); } @@ -2248,10 +2252,10 @@ int decimal_mod(decimal *from1, decimal *from2, decimal *to) #ifdef MAIN int full= 0; -decimal a, b, c; +decimal_t a, b, c; char buf1[100], buf2[100], buf3[100]; -void dump_decimal(decimal *d) +void dump_decimal(decimal_t *d) { int i; printf("/* intg=%d, frac=%d, sign=%d, buf[]={", d->intg, d->frac, d->sign); @@ -2271,7 +2275,7 @@ void check_result_code(int actual, int want) } -void print_decimal(decimal *d, const char *orig, int actual, int want) +void print_decimal(decimal_t *d, const char *orig, int actual, int want) { char s[100]; int slen=sizeof(s); |