2002-03-19 03:18:25 +01:00
|
|
|
|
|
|
|
|
|
|
|
-- Test Comment / Drop
|
|
|
|
create domain domaindroptest int4;
|
|
|
|
comment on domain domaindroptest is 'About to drop this..';
|
|
|
|
|
2002-07-12 20:43:19 +02:00
|
|
|
-- currently this will be disallowed
|
2002-03-19 03:18:25 +01:00
|
|
|
create domain basetypetest domaindroptest;
|
|
|
|
|
|
|
|
drop domain domaindroptest;
|
|
|
|
|
2002-07-12 20:43:19 +02:00
|
|
|
-- this should fail because already gone
|
|
|
|
drop domain domaindroptest cascade;
|
|
|
|
|
2002-03-19 03:18:25 +01:00
|
|
|
|
|
|
|
-- TEST Domains.
|
|
|
|
|
|
|
|
create domain domainvarchar varchar(5);
|
|
|
|
create domain domainnumeric numeric(8,2);
|
|
|
|
create domain domainint4 int4;
|
|
|
|
create domain domaintext text;
|
|
|
|
|
Extend pg_cast castimplicit column to a three-way value; this allows us
to be flexible about assignment casts without introducing ambiguity in
operator/function resolution. Introduce a well-defined promotion hierarchy
for numeric datatypes (int2->int4->int8->numeric->float4->float8).
Change make_const to initially label numeric literals as int4, int8, or
numeric (never float8 anymore).
Explicitly mark Func and RelabelType nodes to indicate whether they came
from a function call, explicit cast, or implicit cast; use this to do
reverse-listing more accurately and without so many heuristics.
Explicit casts to char, varchar, bit, varbit will truncate or pad without
raising an error (the pre-7.2 behavior), while assigning to a column without
any explicit cast will still raise an error for wrong-length data like 7.3.
This more nearly follows the SQL spec than 7.2 behavior (we should be
reporting a 'completion condition' in the explicit-cast cases, but we have
no mechanism for that, so just do silent truncation).
Fix some problems with enforcement of typmod for array elements;
it didn't work at all in 'UPDATE ... SET array[n] = foo', for example.
Provide a generalized array_length_coerce() function to replace the
specialized per-array-type functions that used to be needed (and were
missing for NUMERIC as well as all the datetime types).
Add missing conversions int8<->float4, text<->numeric, oid<->int8.
initdb forced.
2002-09-18 23:35:25 +02:00
|
|
|
-- Test explicit coercions --- these should succeed (and truncate)
|
|
|
|
SELECT cast('123456' as domainvarchar);
|
|
|
|
SELECT cast('12345' as domainvarchar);
|
2002-03-19 03:18:25 +01:00
|
|
|
|
|
|
|
-- Test tables using domains
|
|
|
|
create table basictest
|
|
|
|
( testint4 domainint4
|
|
|
|
, testtext domaintext
|
|
|
|
, testvarchar domainvarchar
|
|
|
|
, testnumeric domainnumeric
|
|
|
|
);
|
|
|
|
|
|
|
|
INSERT INTO basictest values ('88', 'haha', 'short', '123.12'); -- Good
|
|
|
|
INSERT INTO basictest values ('88', 'haha', 'short text', '123.12'); -- Bad varchar
|
|
|
|
INSERT INTO basictest values ('88', 'haha', 'short', '123.1212'); -- Truncate numeric
|
2002-09-20 05:52:50 +02:00
|
|
|
|
|
|
|
-- Test copy
|
|
|
|
COPY basictest (testvarchar) FROM stdin; -- fail
|
|
|
|
notsoshorttext
|
|
|
|
\.
|
|
|
|
|
2002-10-19 03:35:43 +02:00
|
|
|
SET autocommit TO 'on';
|
|
|
|
|
2002-09-20 05:52:50 +02:00
|
|
|
COPY basictest (testvarchar) FROM stdin;
|
|
|
|
short
|
|
|
|
\.
|
|
|
|
|
2002-03-19 03:18:25 +01:00
|
|
|
select * from basictest;
|
|
|
|
|
2002-03-20 20:45:13 +01:00
|
|
|
-- check that domains inherit operations from base types
|
2002-09-01 00:10:48 +02:00
|
|
|
select testtext || testvarchar as concat, testnumeric + 42 as sum
|
2002-03-20 20:45:13 +01:00
|
|
|
from basictest;
|
|
|
|
|
2002-03-19 03:18:25 +01:00
|
|
|
drop table basictest;
|
|
|
|
drop domain domainvarchar restrict;
|
|
|
|
drop domain domainnumeric restrict;
|
|
|
|
drop domain domainint4 restrict;
|
2002-03-20 20:45:13 +01:00
|
|
|
drop domain domaintext;
|
2002-03-19 03:18:25 +01:00
|
|
|
|
|
|
|
|
|
|
|
-- Array Test
|
|
|
|
create domain domainint4arr int4[1];
|
|
|
|
create domain domaintextarr text[2][3];
|
|
|
|
|
|
|
|
create table domarrtest
|
|
|
|
( testint4arr domainint4arr
|
|
|
|
, testtextarr domaintextarr
|
|
|
|
);
|
|
|
|
INSERT INTO domarrtest values ('{2,2}', '{{"a","b"}{"c","d"}}');
|
|
|
|
INSERT INTO domarrtest values ('{{2,2}{2,2}}', '{{"a","b"}}');
|
|
|
|
INSERT INTO domarrtest values ('{2,2}', '{{"a","b"}{"c","d"}{"e"}}');
|
|
|
|
INSERT INTO domarrtest values ('{2,2}', '{{"a"}{"c"}}');
|
|
|
|
INSERT INTO domarrtest values (NULL, '{{"a","b"}{"c","d","e"}}');
|
2002-03-20 20:45:13 +01:00
|
|
|
select * from domarrtest;
|
|
|
|
select testint4arr[1], testtextarr[2:2] from domarrtest;
|
2002-03-19 03:18:25 +01:00
|
|
|
|
|
|
|
drop table domarrtest;
|
|
|
|
drop domain domainint4arr restrict;
|
|
|
|
drop domain domaintextarr restrict;
|
|
|
|
|
|
|
|
|
|
|
|
create domain dnotnull varchar(15) NOT NULL;
|
2002-07-06 22:16:36 +02:00
|
|
|
create domain dnull varchar(15);
|
2002-11-15 03:50:21 +01:00
|
|
|
create domain dcheck varchar(15) NOT NULL CHECK (VALUE = 'a' OR VALUE = 'c' OR VALUE = 'd');
|
2002-03-19 03:18:25 +01:00
|
|
|
|
|
|
|
create table nulltest
|
|
|
|
( col1 dnotnull
|
|
|
|
, col2 dnotnull NULL -- NOT NULL in the domain cannot be overridden
|
|
|
|
, col3 dnull NOT NULL
|
|
|
|
, col4 dnull
|
2002-11-15 03:50:21 +01:00
|
|
|
, col5 dcheck CHECK (col5 IN ('c', 'd'))
|
2002-03-19 03:18:25 +01:00
|
|
|
);
|
|
|
|
INSERT INTO nulltest DEFAULT VALUES;
|
2002-11-15 03:50:21 +01:00
|
|
|
INSERT INTO nulltest values ('a', 'b', 'c', 'd', 'c'); -- Good
|
|
|
|
insert into nulltest values ('a', 'b', 'c', 'd', NULL);
|
|
|
|
insert into nulltest values ('a', 'b', 'c', 'd', 'a');
|
|
|
|
INSERT INTO nulltest values (NULL, 'b', 'c', 'd', 'd');
|
|
|
|
INSERT INTO nulltest values ('a', NULL, 'c', 'd', 'c');
|
|
|
|
INSERT INTO nulltest values ('a', 'b', NULL, 'd', 'c');
|
|
|
|
INSERT INTO nulltest values ('a', 'b', 'c', NULL, 'd'); -- Good
|
2002-09-20 05:52:50 +02:00
|
|
|
|
|
|
|
-- Test copy
|
|
|
|
COPY nulltest FROM stdin; --fail
|
2002-11-15 03:50:21 +01:00
|
|
|
a b \N d \N
|
2002-09-20 05:52:50 +02:00
|
|
|
\.
|
|
|
|
|
2002-10-19 03:35:43 +02:00
|
|
|
SET autocommit TO 'on';
|
|
|
|
|
2002-11-15 03:50:21 +01:00
|
|
|
-- Last row is bad
|
2002-09-20 05:52:50 +02:00
|
|
|
COPY nulltest FROM stdin;
|
2002-11-15 03:50:21 +01:00
|
|
|
a b c \N c
|
|
|
|
a b c \N d
|
|
|
|
a b c \N a
|
2002-09-20 05:52:50 +02:00
|
|
|
\.
|
|
|
|
|
2002-03-19 03:18:25 +01:00
|
|
|
select * from nulltest;
|
|
|
|
|
2002-07-06 22:16:36 +02:00
|
|
|
-- Test out coerced (casted) constraints
|
|
|
|
SELECT cast('1' as dnotnull);
|
|
|
|
SELECT cast(NULL as dnotnull); -- fail
|
|
|
|
SELECT cast(cast(NULL as dnull) as dnotnull); -- fail
|
|
|
|
SELECT cast(col4 as dnotnull) from nulltest; -- fail
|
|
|
|
|
|
|
|
-- cleanup
|
2002-03-19 03:18:25 +01:00
|
|
|
drop table nulltest;
|
|
|
|
drop domain dnotnull restrict;
|
|
|
|
drop domain dnull restrict;
|
2002-12-06 06:00:34 +01:00
|
|
|
drop domain dcheck restrict;
|
2002-03-19 03:18:25 +01:00
|
|
|
|
|
|
|
|
|
|
|
create domain ddef1 int4 DEFAULT 3;
|
|
|
|
create domain ddef2 oid DEFAULT '12';
|
|
|
|
-- Type mixing, function returns int8
|
|
|
|
create domain ddef3 text DEFAULT 5;
|
|
|
|
create sequence ddef4_seq;
|
|
|
|
create domain ddef4 int4 DEFAULT nextval(cast('ddef4_seq' as text));
|
|
|
|
create domain ddef5 numeric(8,2) NOT NULL DEFAULT '12.12';
|
|
|
|
|
|
|
|
create table defaulttest
|
|
|
|
( col1 ddef1
|
|
|
|
, col2 ddef2
|
|
|
|
, col3 ddef3
|
2002-08-20 06:48:36 +02:00
|
|
|
, col4 ddef4 PRIMARY KEY
|
2002-03-19 03:18:25 +01:00
|
|
|
, col5 ddef1 NOT NULL DEFAULT NULL
|
|
|
|
, col6 ddef2 DEFAULT '88'
|
|
|
|
, col7 ddef4 DEFAULT 8000
|
2002-08-20 06:48:36 +02:00
|
|
|
, col8 ddef5
|
2002-03-19 03:18:25 +01:00
|
|
|
);
|
|
|
|
insert into defaulttest default values;
|
|
|
|
insert into defaulttest default values;
|
|
|
|
insert into defaulttest default values;
|
2002-09-20 05:52:50 +02:00
|
|
|
|
|
|
|
-- Test defaults with copy
|
|
|
|
COPY defaulttest(col5) FROM stdin;
|
|
|
|
42
|
|
|
|
\.
|
|
|
|
|
2002-03-19 03:18:25 +01:00
|
|
|
select * from defaulttest;
|
|
|
|
|
|
|
|
drop sequence ddef4_seq;
|
2002-12-06 06:00:34 +01:00
|
|
|
drop table defaulttest cascade;
|
|
|
|
|
|
|
|
-- Test ALTER DOMAIN .. NOT NULL
|
|
|
|
create domain dnotnulltest integer;
|
|
|
|
create table domnotnull
|
|
|
|
( col1 dnotnulltest
|
|
|
|
, col2 dnotnulltest
|
|
|
|
);
|
|
|
|
|
|
|
|
insert into domnotnull default values;
|
|
|
|
alter domain dnotnulltest set not null; -- fails
|
|
|
|
|
|
|
|
update domnotnull set col1 = 5;
|
|
|
|
alter domain dnotnulltest set not null; -- fails
|
|
|
|
|
|
|
|
update domnotnull set col2 = 6;
|
|
|
|
|
|
|
|
alter domain dnotnulltest set not null;
|
|
|
|
alter domain dnotnulltest set not null; -- fails
|
|
|
|
|
|
|
|
update domnotnull set col1 = null; -- fails
|
|
|
|
|
|
|
|
alter domain dnotnulltest drop not null;
|
|
|
|
alter domain dnotnulltest drop not null; -- fails
|
|
|
|
|
|
|
|
update domnotnull set col1 = null;
|
|
|
|
|
|
|
|
drop domain dnotnulltest cascade;
|
|
|
|
|
|
|
|
-- Test ALTER DOMAIN .. DEFAULT ..
|
|
|
|
create table domdeftest (col1 ddef1);
|
|
|
|
|
|
|
|
insert into domdeftest default values;
|
|
|
|
select * from domdeftest;
|
|
|
|
|
|
|
|
alter domain ddef1 set default '42';
|
|
|
|
insert into domdeftest default values;
|
|
|
|
select * from domdeftest;
|
|
|
|
|
|
|
|
alter domain ddef1 drop default;
|
|
|
|
insert into domdeftest default values;
|
|
|
|
select * from domdeftest;
|
|
|
|
|
|
|
|
drop table domdeftest;
|
|
|
|
|
|
|
|
-- Test ALTER DOMAIN .. CONSTRAINT ..
|
|
|
|
create domain con as integer;
|
|
|
|
create table domcontest (col1 con);
|
|
|
|
|
|
|
|
insert into domcontest values (1);
|
|
|
|
insert into domcontest values (2);
|
|
|
|
alter domain con add constraint t check (VALUE < 1); -- fails
|
|
|
|
|
|
|
|
alter domain con add constraint t check (VALUE < 34);
|
|
|
|
alter domain con add check (VALUE > 0);
|
|
|
|
|
|
|
|
insert into domcontest values (-5); -- fails
|
|
|
|
insert into domcontest values (42); -- fails
|
|
|
|
insert into domcontest values (5);
|
|
|
|
|
|
|
|
alter domain con drop constraint t;
|
|
|
|
insert into domcontest values (-5); --fails
|
|
|
|
insert into domcontest values (42);
|
|
|
|
|
|
|
|
-- cleanup
|
2002-03-19 03:18:25 +01:00
|
|
|
drop domain ddef1 restrict;
|
|
|
|
drop domain ddef2 restrict;
|
|
|
|
drop domain ddef3 restrict;
|
|
|
|
drop domain ddef4 restrict;
|
|
|
|
drop domain ddef5 restrict;
|