mirror of
https://github.com/postgres/postgres.git
synced 2025-07-28 23:42:10 +03:00
Allow numeric scale to be negative or greater than precision.
Formerly, when specifying NUMERIC(precision, scale), the scale had to be in the range [0, precision], which was per SQL spec. This commit extends the range of allowed scales to [-1000, 1000], independent of the precision (whose valid range remains [1, 1000]). A negative scale implies rounding before the decimal point. For example, a column might be declared with a scale of -3 to round values to the nearest thousand. Note that the display scale remains non-negative, so in this case the display scale will be zero, and all digits before the decimal point will be displayed. A scale greater than the precision supports fractional values with zeros immediately after the decimal point. Take the opportunity to tidy up the code that packs, unpacks and validates the contents of a typmod integer, encapsulating it in a small set of new inline functions. Bump the catversion because the allowed contents of atttypmod have changed for numeric columns. This isn't a change that requires a re-initdb, but negative scale values in the typmod would confuse old backends. Dean Rasheed, with additional improvements by Tom Lane. Reviewed by Tom Lane. Discussion: https://postgr.es/m/CAEZATCWdNLgpKihmURF8nfofP0RFtAKJ7ktY6GcZOPnMfUoRqA@mail.gmail.com
This commit is contained in:
@ -815,6 +815,62 @@ numeric_is_integral(Numeric num)
|
||||
return (arg.ndigits == 0 || arg.ndigits <= arg.weight + 1);
|
||||
}
|
||||
|
||||
/*
|
||||
* make_numeric_typmod() -
|
||||
*
|
||||
* Pack numeric precision and scale values into a typmod. The upper 16 bits
|
||||
* are used for the precision (though actually not all these bits are needed,
|
||||
* since the maximum allowed precision is 1000). The lower 16 bits are for
|
||||
* the scale, but since the scale is constrained to the range [-1000, 1000],
|
||||
* we use just the lower 11 of those 16 bits, and leave the remaining 5 bits
|
||||
* unset, for possible future use.
|
||||
*
|
||||
* For purely historical reasons VARHDRSZ is then added to the result, thus
|
||||
* the unused space in the upper 16 bits is not all as freely available as it
|
||||
* might seem. (We can't let the result overflow to a negative int32, as
|
||||
* other parts of the system would interpret that as not-a-valid-typmod.)
|
||||
*/
|
||||
static inline int32
|
||||
make_numeric_typmod(int precision, int scale)
|
||||
{
|
||||
return ((precision << 16) | (scale & 0x7ff)) + VARHDRSZ;
|
||||
}
|
||||
|
||||
/*
|
||||
* Because of the offset, valid numeric typmods are at least VARHDRSZ
|
||||
*/
|
||||
static inline bool
|
||||
is_valid_numeric_typmod(int32 typmod)
|
||||
{
|
||||
return typmod >= (int32) VARHDRSZ;
|
||||
}
|
||||
|
||||
/*
|
||||
* numeric_typmod_precision() -
|
||||
*
|
||||
* Extract the precision from a numeric typmod --- see make_numeric_typmod().
|
||||
*/
|
||||
static inline int
|
||||
numeric_typmod_precision(int32 typmod)
|
||||
{
|
||||
return ((typmod - VARHDRSZ) >> 16) & 0xffff;
|
||||
}
|
||||
|
||||
/*
|
||||
* numeric_typmod_scale() -
|
||||
*
|
||||
* Extract the scale from a numeric typmod --- see make_numeric_typmod().
|
||||
*
|
||||
* Note that the scale may be negative, so we must do sign extension when
|
||||
* unpacking it. We do this using the bit hack (x^1024)-1024, which sign
|
||||
* extends an 11-bit two's complement number x.
|
||||
*/
|
||||
static inline int
|
||||
numeric_typmod_scale(int32 typmod)
|
||||
{
|
||||
return (((typmod - VARHDRSZ) & 0x7ff) ^ 1024) - 1024;
|
||||
}
|
||||
|
||||
/*
|
||||
* numeric_maximum_size() -
|
||||
*
|
||||
@ -826,11 +882,11 @@ numeric_maximum_size(int32 typmod)
|
||||
int precision;
|
||||
int numeric_digits;
|
||||
|
||||
if (typmod < (int32) (VARHDRSZ))
|
||||
if (!is_valid_numeric_typmod(typmod))
|
||||
return -1;
|
||||
|
||||
/* precision (ie, max # of digits) is in upper bits of typmod */
|
||||
precision = ((typmod - VARHDRSZ) >> 16) & 0xffff;
|
||||
precision = numeric_typmod_precision(typmod);
|
||||
|
||||
/*
|
||||
* This formula computes the maximum number of NumericDigits we could need
|
||||
@ -1084,20 +1140,20 @@ numeric_support(PG_FUNCTION_ARGS)
|
||||
Node *source = (Node *) linitial(expr->args);
|
||||
int32 old_typmod = exprTypmod(source);
|
||||
int32 new_typmod = DatumGetInt32(((Const *) typmod)->constvalue);
|
||||
int32 old_scale = (old_typmod - VARHDRSZ) & 0xffff;
|
||||
int32 new_scale = (new_typmod - VARHDRSZ) & 0xffff;
|
||||
int32 old_precision = (old_typmod - VARHDRSZ) >> 16 & 0xffff;
|
||||
int32 new_precision = (new_typmod - VARHDRSZ) >> 16 & 0xffff;
|
||||
int32 old_scale = numeric_typmod_scale(old_typmod);
|
||||
int32 new_scale = numeric_typmod_scale(new_typmod);
|
||||
int32 old_precision = numeric_typmod_precision(old_typmod);
|
||||
int32 new_precision = numeric_typmod_precision(new_typmod);
|
||||
|
||||
/*
|
||||
* If new_typmod < VARHDRSZ, the destination is unconstrained;
|
||||
* that's always OK. If old_typmod >= VARHDRSZ, the source is
|
||||
* If new_typmod is invalid, the destination is unconstrained;
|
||||
* that's always OK. If old_typmod is valid, the source is
|
||||
* constrained, and we're OK if the scale is unchanged and the
|
||||
* precision is not decreasing. See further notes in function
|
||||
* header comment.
|
||||
*/
|
||||
if (new_typmod < (int32) VARHDRSZ ||
|
||||
(old_typmod >= (int32) VARHDRSZ &&
|
||||
if (!is_valid_numeric_typmod(new_typmod) ||
|
||||
(is_valid_numeric_typmod(old_typmod) &&
|
||||
new_scale == old_scale && new_precision >= old_precision))
|
||||
ret = relabel_to_typmod(source, new_typmod);
|
||||
}
|
||||
@ -1119,11 +1175,11 @@ numeric (PG_FUNCTION_ARGS)
|
||||
Numeric num = PG_GETARG_NUMERIC(0);
|
||||
int32 typmod = PG_GETARG_INT32(1);
|
||||
Numeric new;
|
||||
int32 tmp_typmod;
|
||||
int precision;
|
||||
int scale;
|
||||
int ddigits;
|
||||
int maxdigits;
|
||||
int dscale;
|
||||
NumericVar var;
|
||||
|
||||
/*
|
||||
@ -1140,17 +1196,19 @@ numeric (PG_FUNCTION_ARGS)
|
||||
* If the value isn't a valid type modifier, simply return a copy of the
|
||||
* input value
|
||||
*/
|
||||
if (typmod < (int32) (VARHDRSZ))
|
||||
if (!is_valid_numeric_typmod(typmod))
|
||||
PG_RETURN_NUMERIC(duplicate_numeric(num));
|
||||
|
||||
/*
|
||||
* Get the precision and scale out of the typmod value
|
||||
*/
|
||||
tmp_typmod = typmod - VARHDRSZ;
|
||||
precision = (tmp_typmod >> 16) & 0xffff;
|
||||
scale = tmp_typmod & 0xffff;
|
||||
precision = numeric_typmod_precision(typmod);
|
||||
scale = numeric_typmod_scale(typmod);
|
||||
maxdigits = precision - scale;
|
||||
|
||||
/* The target display scale is non-negative */
|
||||
dscale = Max(scale, 0);
|
||||
|
||||
/*
|
||||
* If the number is certainly in bounds and due to the target scale no
|
||||
* rounding could be necessary, just make a copy of the input and modify
|
||||
@ -1160,17 +1218,17 @@ numeric (PG_FUNCTION_ARGS)
|
||||
*/
|
||||
ddigits = (NUMERIC_WEIGHT(num) + 1) * DEC_DIGITS;
|
||||
if (ddigits <= maxdigits && scale >= NUMERIC_DSCALE(num)
|
||||
&& (NUMERIC_CAN_BE_SHORT(scale, NUMERIC_WEIGHT(num))
|
||||
&& (NUMERIC_CAN_BE_SHORT(dscale, NUMERIC_WEIGHT(num))
|
||||
|| !NUMERIC_IS_SHORT(num)))
|
||||
{
|
||||
new = duplicate_numeric(num);
|
||||
if (NUMERIC_IS_SHORT(num))
|
||||
new->choice.n_short.n_header =
|
||||
(num->choice.n_short.n_header & ~NUMERIC_SHORT_DSCALE_MASK)
|
||||
| (scale << NUMERIC_SHORT_DSCALE_SHIFT);
|
||||
| (dscale << NUMERIC_SHORT_DSCALE_SHIFT);
|
||||
else
|
||||
new->choice.n_long.n_sign_dscale = NUMERIC_SIGN(new) |
|
||||
((uint16) scale & NUMERIC_DSCALE_MASK);
|
||||
((uint16) dscale & NUMERIC_DSCALE_MASK);
|
||||
PG_RETURN_NUMERIC(new);
|
||||
}
|
||||
|
||||
@ -1206,12 +1264,12 @@ numerictypmodin(PG_FUNCTION_ARGS)
|
||||
(errcode(ERRCODE_INVALID_PARAMETER_VALUE),
|
||||
errmsg("NUMERIC precision %d must be between 1 and %d",
|
||||
tl[0], NUMERIC_MAX_PRECISION)));
|
||||
if (tl[1] < 0 || tl[1] > tl[0])
|
||||
if (tl[1] < NUMERIC_MIN_SCALE || tl[1] > NUMERIC_MAX_SCALE)
|
||||
ereport(ERROR,
|
||||
(errcode(ERRCODE_INVALID_PARAMETER_VALUE),
|
||||
errmsg("NUMERIC scale %d must be between 0 and precision %d",
|
||||
tl[1], tl[0])));
|
||||
typmod = ((tl[0] << 16) | tl[1]) + VARHDRSZ;
|
||||
errmsg("NUMERIC scale %d must be between %d and %d",
|
||||
tl[1], NUMERIC_MIN_SCALE, NUMERIC_MAX_SCALE)));
|
||||
typmod = make_numeric_typmod(tl[0], tl[1]);
|
||||
}
|
||||
else if (n == 1)
|
||||
{
|
||||
@ -1221,7 +1279,7 @@ numerictypmodin(PG_FUNCTION_ARGS)
|
||||
errmsg("NUMERIC precision %d must be between 1 and %d",
|
||||
tl[0], NUMERIC_MAX_PRECISION)));
|
||||
/* scale defaults to zero */
|
||||
typmod = (tl[0] << 16) + VARHDRSZ;
|
||||
typmod = make_numeric_typmod(tl[0], 0);
|
||||
}
|
||||
else
|
||||
{
|
||||
@ -1240,10 +1298,10 @@ numerictypmodout(PG_FUNCTION_ARGS)
|
||||
int32 typmod = PG_GETARG_INT32(0);
|
||||
char *res = (char *) palloc(64);
|
||||
|
||||
if (typmod >= 0)
|
||||
if (is_valid_numeric_typmod(typmod))
|
||||
snprintf(res, 64, "(%d,%d)",
|
||||
((typmod - VARHDRSZ) >> 16) & 0xffff,
|
||||
(typmod - VARHDRSZ) & 0xffff);
|
||||
numeric_typmod_precision(typmod),
|
||||
numeric_typmod_scale(typmod));
|
||||
else
|
||||
*res = '\0';
|
||||
|
||||
@ -7428,18 +7486,21 @@ apply_typmod(NumericVar *var, int32 typmod)
|
||||
int ddigits;
|
||||
int i;
|
||||
|
||||
/* Do nothing if we have a default typmod (-1) */
|
||||
if (typmod < (int32) (VARHDRSZ))
|
||||
/* Do nothing if we have an invalid typmod */
|
||||
if (!is_valid_numeric_typmod(typmod))
|
||||
return;
|
||||
|
||||
typmod -= VARHDRSZ;
|
||||
precision = (typmod >> 16) & 0xffff;
|
||||
scale = typmod & 0xffff;
|
||||
precision = numeric_typmod_precision(typmod);
|
||||
scale = numeric_typmod_scale(typmod);
|
||||
maxdigits = precision - scale;
|
||||
|
||||
/* Round to target scale (and set var->dscale) */
|
||||
round_var(var, scale);
|
||||
|
||||
/* but don't allow var->dscale to be negative */
|
||||
if (var->dscale < 0)
|
||||
var->dscale = 0;
|
||||
|
||||
/*
|
||||
* Check for overflow - note we can't do this before rounding, because
|
||||
* rounding could raise the weight. Also note that the var's weight could
|
||||
@ -7514,12 +7575,11 @@ apply_typmod_special(Numeric num, int32 typmod)
|
||||
return;
|
||||
|
||||
/* Do nothing if we have a default typmod (-1) */
|
||||
if (typmod < (int32) (VARHDRSZ))
|
||||
if (!is_valid_numeric_typmod(typmod))
|
||||
return;
|
||||
|
||||
typmod -= VARHDRSZ;
|
||||
precision = (typmod >> 16) & 0xffff;
|
||||
scale = typmod & 0xffff;
|
||||
precision = numeric_typmod_precision(typmod);
|
||||
scale = numeric_typmod_scale(typmod);
|
||||
|
||||
ereport(ERROR,
|
||||
(errcode(ERRCODE_NUMERIC_VALUE_OUT_OF_RANGE),
|
||||
|
@ -53,6 +53,6 @@
|
||||
*/
|
||||
|
||||
/* yyyymmddN */
|
||||
#define CATALOG_VERSION_NO 202107181
|
||||
#define CATALOG_VERSION_NO 202107261
|
||||
|
||||
#endif
|
||||
|
@ -17,12 +17,22 @@
|
||||
#include "fmgr.h"
|
||||
|
||||
/*
|
||||
* Limit on the precision (and hence scale) specifiable in a NUMERIC typmod.
|
||||
* Note that the implementation limit on the length of a numeric value is
|
||||
* much larger --- beware of what you use this for!
|
||||
* Limits on the precision and scale specifiable in a NUMERIC typmod. The
|
||||
* precision is strictly positive, but the scale may be positive or negative.
|
||||
* A negative scale implies rounding before the decimal point.
|
||||
*
|
||||
* Note that the minimum display scale defined below is zero --- we always
|
||||
* display all digits before the decimal point, even when the scale is
|
||||
* negative.
|
||||
*
|
||||
* Note that the implementation limits on the precision and display scale of a
|
||||
* numeric value are much larger --- beware of what you use these for!
|
||||
*/
|
||||
#define NUMERIC_MAX_PRECISION 1000
|
||||
|
||||
#define NUMERIC_MIN_SCALE (-1000)
|
||||
#define NUMERIC_MAX_SCALE 1000
|
||||
|
||||
/*
|
||||
* Internal limits on the scales chosen for calculation results
|
||||
*/
|
||||
|
@ -2118,6 +2118,69 @@ SELECT * FROM num_input_test;
|
||||
-Infinity
|
||||
(13 rows)
|
||||
|
||||
--
|
||||
-- Test precision and scale typemods
|
||||
--
|
||||
CREATE TABLE num_typemod_test (
|
||||
millions numeric(3, -6),
|
||||
thousands numeric(3, -3),
|
||||
units numeric(3, 0),
|
||||
thousandths numeric(3, 3),
|
||||
millionths numeric(3, 6)
|
||||
);
|
||||
\d num_typemod_test
|
||||
Table "public.num_typemod_test"
|
||||
Column | Type | Collation | Nullable | Default
|
||||
-------------+---------------+-----------+----------+---------
|
||||
millions | numeric(3,-6) | | |
|
||||
thousands | numeric(3,-3) | | |
|
||||
units | numeric(3,0) | | |
|
||||
thousandths | numeric(3,3) | | |
|
||||
millionths | numeric(3,6) | | |
|
||||
|
||||
-- rounding of valid inputs
|
||||
INSERT INTO num_typemod_test VALUES (123456, 123, 0.123, 0.000123, 0.000000123);
|
||||
INSERT INTO num_typemod_test VALUES (654321, 654, 0.654, 0.000654, 0.000000654);
|
||||
INSERT INTO num_typemod_test VALUES (2345678, 2345, 2.345, 0.002345, 0.000002345);
|
||||
INSERT INTO num_typemod_test VALUES (7654321, 7654, 7.654, 0.007654, 0.000007654);
|
||||
INSERT INTO num_typemod_test VALUES (12345678, 12345, 12.345, 0.012345, 0.000012345);
|
||||
INSERT INTO num_typemod_test VALUES (87654321, 87654, 87.654, 0.087654, 0.000087654);
|
||||
INSERT INTO num_typemod_test VALUES (123456789, 123456, 123.456, 0.123456, 0.000123456);
|
||||
INSERT INTO num_typemod_test VALUES (987654321, 987654, 987.654, 0.987654, 0.000987654);
|
||||
INSERT INTO num_typemod_test VALUES ('NaN', 'NaN', 'NaN', 'NaN', 'NaN');
|
||||
SELECT scale(millions), * FROM num_typemod_test ORDER BY millions;
|
||||
scale | millions | thousands | units | thousandths | millionths
|
||||
-------+-----------+-----------+-------+-------------+------------
|
||||
0 | 0 | 0 | 0 | 0.000 | 0.000000
|
||||
0 | 1000000 | 1000 | 1 | 0.001 | 0.000001
|
||||
0 | 2000000 | 2000 | 2 | 0.002 | 0.000002
|
||||
0 | 8000000 | 8000 | 8 | 0.008 | 0.000008
|
||||
0 | 12000000 | 12000 | 12 | 0.012 | 0.000012
|
||||
0 | 88000000 | 88000 | 88 | 0.088 | 0.000088
|
||||
0 | 123000000 | 123000 | 123 | 0.123 | 0.000123
|
||||
0 | 988000000 | 988000 | 988 | 0.988 | 0.000988
|
||||
| NaN | NaN | NaN | NaN | NaN
|
||||
(9 rows)
|
||||
|
||||
-- invalid inputs
|
||||
INSERT INTO num_typemod_test (millions) VALUES ('inf');
|
||||
ERROR: numeric field overflow
|
||||
DETAIL: A field with precision 3, scale -6 cannot hold an infinite value.
|
||||
INSERT INTO num_typemod_test (millions) VALUES (999500000);
|
||||
ERROR: numeric field overflow
|
||||
DETAIL: A field with precision 3, scale -6 must round to an absolute value less than 10^9.
|
||||
INSERT INTO num_typemod_test (thousands) VALUES (999500);
|
||||
ERROR: numeric field overflow
|
||||
DETAIL: A field with precision 3, scale -3 must round to an absolute value less than 10^6.
|
||||
INSERT INTO num_typemod_test (units) VALUES (999.5);
|
||||
ERROR: numeric field overflow
|
||||
DETAIL: A field with precision 3, scale 0 must round to an absolute value less than 10^3.
|
||||
INSERT INTO num_typemod_test (thousandths) VALUES (0.9995);
|
||||
ERROR: numeric field overflow
|
||||
DETAIL: A field with precision 3, scale 3 must round to an absolute value less than 1.
|
||||
INSERT INTO num_typemod_test (millionths) VALUES (0.0009995);
|
||||
ERROR: numeric field overflow
|
||||
DETAIL: A field with precision 3, scale 6 must round to an absolute value less than 10^-3.
|
||||
--
|
||||
-- Test some corner cases for multiplication
|
||||
--
|
||||
|
@ -92,6 +92,7 @@ num_exp_sqrt|t
|
||||
num_exp_sub|t
|
||||
num_input_test|f
|
||||
num_result|f
|
||||
num_typemod_test|f
|
||||
nummultirange_test|t
|
||||
numrange_test|t
|
||||
onek|t
|
||||
|
@ -1032,6 +1032,40 @@ INSERT INTO num_input_test(n1) VALUES ('+ infinity');
|
||||
|
||||
SELECT * FROM num_input_test;
|
||||
|
||||
--
|
||||
-- Test precision and scale typemods
|
||||
--
|
||||
|
||||
CREATE TABLE num_typemod_test (
|
||||
millions numeric(3, -6),
|
||||
thousands numeric(3, -3),
|
||||
units numeric(3, 0),
|
||||
thousandths numeric(3, 3),
|
||||
millionths numeric(3, 6)
|
||||
);
|
||||
\d num_typemod_test
|
||||
|
||||
-- rounding of valid inputs
|
||||
INSERT INTO num_typemod_test VALUES (123456, 123, 0.123, 0.000123, 0.000000123);
|
||||
INSERT INTO num_typemod_test VALUES (654321, 654, 0.654, 0.000654, 0.000000654);
|
||||
INSERT INTO num_typemod_test VALUES (2345678, 2345, 2.345, 0.002345, 0.000002345);
|
||||
INSERT INTO num_typemod_test VALUES (7654321, 7654, 7.654, 0.007654, 0.000007654);
|
||||
INSERT INTO num_typemod_test VALUES (12345678, 12345, 12.345, 0.012345, 0.000012345);
|
||||
INSERT INTO num_typemod_test VALUES (87654321, 87654, 87.654, 0.087654, 0.000087654);
|
||||
INSERT INTO num_typemod_test VALUES (123456789, 123456, 123.456, 0.123456, 0.000123456);
|
||||
INSERT INTO num_typemod_test VALUES (987654321, 987654, 987.654, 0.987654, 0.000987654);
|
||||
INSERT INTO num_typemod_test VALUES ('NaN', 'NaN', 'NaN', 'NaN', 'NaN');
|
||||
|
||||
SELECT scale(millions), * FROM num_typemod_test ORDER BY millions;
|
||||
|
||||
-- invalid inputs
|
||||
INSERT INTO num_typemod_test (millions) VALUES ('inf');
|
||||
INSERT INTO num_typemod_test (millions) VALUES (999500000);
|
||||
INSERT INTO num_typemod_test (thousands) VALUES (999500);
|
||||
INSERT INTO num_typemod_test (units) VALUES (999.5);
|
||||
INSERT INTO num_typemod_test (thousandths) VALUES (0.9995);
|
||||
INSERT INTO num_typemod_test (millionths) VALUES (0.0009995);
|
||||
|
||||
--
|
||||
-- Test some corner cases for multiplication
|
||||
--
|
||||
|
Reference in New Issue
Block a user