mirror of
https://git.postgresql.org/git/postgresql.git
synced 2026-02-12 17:37:07 +08:00
05fb5d6619
get_relation_info() was too optimistic about opening indexes in partitioned tables, which would raise errors when any queries were planned on such tables. Fix by ignoring any indexes of the partitioned kind. CLUSTER (and ALTER TABLE CLUSTER ON) had a similar problem. Fix by disallowing these commands in partitioned tables. Fallout from 8b08f7d4820f.
232 lines
7.9 KiB
PL/PgSQL
232 lines
7.9 KiB
PL/PgSQL
--
|
|
-- CLUSTER
|
|
--
|
|
|
|
CREATE TABLE clstr_tst_s (rf_a SERIAL PRIMARY KEY,
|
|
b INT);
|
|
|
|
CREATE TABLE clstr_tst (a SERIAL PRIMARY KEY,
|
|
b INT,
|
|
c TEXT,
|
|
d TEXT,
|
|
CONSTRAINT clstr_tst_con FOREIGN KEY (b) REFERENCES clstr_tst_s);
|
|
|
|
CREATE INDEX clstr_tst_b ON clstr_tst (b);
|
|
CREATE INDEX clstr_tst_c ON clstr_tst (c);
|
|
CREATE INDEX clstr_tst_c_b ON clstr_tst (c,b);
|
|
CREATE INDEX clstr_tst_b_c ON clstr_tst (b,c);
|
|
|
|
INSERT INTO clstr_tst_s (b) VALUES (0);
|
|
INSERT INTO clstr_tst_s (b) SELECT b FROM clstr_tst_s;
|
|
INSERT INTO clstr_tst_s (b) SELECT b FROM clstr_tst_s;
|
|
INSERT INTO clstr_tst_s (b) SELECT b FROM clstr_tst_s;
|
|
INSERT INTO clstr_tst_s (b) SELECT b FROM clstr_tst_s;
|
|
INSERT INTO clstr_tst_s (b) SELECT b FROM clstr_tst_s;
|
|
|
|
CREATE TABLE clstr_tst_inh () INHERITS (clstr_tst);
|
|
|
|
INSERT INTO clstr_tst (b, c) VALUES (11, 'once');
|
|
INSERT INTO clstr_tst (b, c) VALUES (10, 'diez');
|
|
INSERT INTO clstr_tst (b, c) VALUES (31, 'treinta y uno');
|
|
INSERT INTO clstr_tst (b, c) VALUES (22, 'veintidos');
|
|
INSERT INTO clstr_tst (b, c) VALUES (3, 'tres');
|
|
INSERT INTO clstr_tst (b, c) VALUES (20, 'veinte');
|
|
INSERT INTO clstr_tst (b, c) VALUES (23, 'veintitres');
|
|
INSERT INTO clstr_tst (b, c) VALUES (21, 'veintiuno');
|
|
INSERT INTO clstr_tst (b, c) VALUES (4, 'cuatro');
|
|
INSERT INTO clstr_tst (b, c) VALUES (14, 'catorce');
|
|
INSERT INTO clstr_tst (b, c) VALUES (2, 'dos');
|
|
INSERT INTO clstr_tst (b, c) VALUES (18, 'dieciocho');
|
|
INSERT INTO clstr_tst (b, c) VALUES (27, 'veintisiete');
|
|
INSERT INTO clstr_tst (b, c) VALUES (25, 'veinticinco');
|
|
INSERT INTO clstr_tst (b, c) VALUES (13, 'trece');
|
|
INSERT INTO clstr_tst (b, c) VALUES (28, 'veintiocho');
|
|
INSERT INTO clstr_tst (b, c) VALUES (32, 'treinta y dos');
|
|
INSERT INTO clstr_tst (b, c) VALUES (5, 'cinco');
|
|
INSERT INTO clstr_tst (b, c) VALUES (29, 'veintinueve');
|
|
INSERT INTO clstr_tst (b, c) VALUES (1, 'uno');
|
|
INSERT INTO clstr_tst (b, c) VALUES (24, 'veinticuatro');
|
|
INSERT INTO clstr_tst (b, c) VALUES (30, 'treinta');
|
|
INSERT INTO clstr_tst (b, c) VALUES (12, 'doce');
|
|
INSERT INTO clstr_tst (b, c) VALUES (17, 'diecisiete');
|
|
INSERT INTO clstr_tst (b, c) VALUES (9, 'nueve');
|
|
INSERT INTO clstr_tst (b, c) VALUES (19, 'diecinueve');
|
|
INSERT INTO clstr_tst (b, c) VALUES (26, 'veintiseis');
|
|
INSERT INTO clstr_tst (b, c) VALUES (15, 'quince');
|
|
INSERT INTO clstr_tst (b, c) VALUES (7, 'siete');
|
|
INSERT INTO clstr_tst (b, c) VALUES (16, 'dieciseis');
|
|
INSERT INTO clstr_tst (b, c) VALUES (8, 'ocho');
|
|
-- This entry is needed to test that TOASTED values are copied correctly.
|
|
INSERT INTO clstr_tst (b, c, d) VALUES (6, 'seis', repeat('xyzzy', 100000));
|
|
|
|
CLUSTER clstr_tst_c ON clstr_tst;
|
|
|
|
SELECT a,b,c,substring(d for 30), length(d) from clstr_tst;
|
|
SELECT a,b,c,substring(d for 30), length(d) from clstr_tst ORDER BY a;
|
|
SELECT a,b,c,substring(d for 30), length(d) from clstr_tst ORDER BY b;
|
|
SELECT a,b,c,substring(d for 30), length(d) from clstr_tst ORDER BY c;
|
|
|
|
-- Verify that inheritance link still works
|
|
INSERT INTO clstr_tst_inh VALUES (0, 100, 'in child table');
|
|
SELECT a,b,c,substring(d for 30), length(d) from clstr_tst;
|
|
|
|
-- Verify that foreign key link still works
|
|
INSERT INTO clstr_tst (b, c) VALUES (1111, 'this should fail');
|
|
|
|
SELECT conname FROM pg_constraint WHERE conrelid = 'clstr_tst'::regclass
|
|
ORDER BY 1;
|
|
|
|
|
|
SELECT relname, relkind,
|
|
EXISTS(SELECT 1 FROM pg_class WHERE oid = c.reltoastrelid) AS hastoast
|
|
FROM pg_class c WHERE relname LIKE 'clstr_tst%' ORDER BY relname;
|
|
|
|
-- Verify that indisclustered is correctly set
|
|
SELECT pg_class.relname FROM pg_index, pg_class, pg_class AS pg_class_2
|
|
WHERE pg_class.oid=indexrelid
|
|
AND indrelid=pg_class_2.oid
|
|
AND pg_class_2.relname = 'clstr_tst'
|
|
AND indisclustered;
|
|
|
|
-- Try changing indisclustered
|
|
ALTER TABLE clstr_tst CLUSTER ON clstr_tst_b_c;
|
|
SELECT pg_class.relname FROM pg_index, pg_class, pg_class AS pg_class_2
|
|
WHERE pg_class.oid=indexrelid
|
|
AND indrelid=pg_class_2.oid
|
|
AND pg_class_2.relname = 'clstr_tst'
|
|
AND indisclustered;
|
|
|
|
-- Try turning off all clustering
|
|
ALTER TABLE clstr_tst SET WITHOUT CLUSTER;
|
|
SELECT pg_class.relname FROM pg_index, pg_class, pg_class AS pg_class_2
|
|
WHERE pg_class.oid=indexrelid
|
|
AND indrelid=pg_class_2.oid
|
|
AND pg_class_2.relname = 'clstr_tst'
|
|
AND indisclustered;
|
|
|
|
-- Verify that clustering all tables does in fact cluster the right ones
|
|
CREATE USER regress_clstr_user;
|
|
CREATE TABLE clstr_1 (a INT PRIMARY KEY);
|
|
CREATE TABLE clstr_2 (a INT PRIMARY KEY);
|
|
CREATE TABLE clstr_3 (a INT PRIMARY KEY);
|
|
ALTER TABLE clstr_1 OWNER TO regress_clstr_user;
|
|
ALTER TABLE clstr_3 OWNER TO regress_clstr_user;
|
|
GRANT SELECT ON clstr_2 TO regress_clstr_user;
|
|
INSERT INTO clstr_1 VALUES (2);
|
|
INSERT INTO clstr_1 VALUES (1);
|
|
INSERT INTO clstr_2 VALUES (2);
|
|
INSERT INTO clstr_2 VALUES (1);
|
|
INSERT INTO clstr_3 VALUES (2);
|
|
INSERT INTO clstr_3 VALUES (1);
|
|
|
|
-- "CLUSTER <tablename>" on a table that hasn't been clustered
|
|
CLUSTER clstr_2;
|
|
|
|
CLUSTER clstr_1_pkey ON clstr_1;
|
|
CLUSTER clstr_2 USING clstr_2_pkey;
|
|
SELECT * FROM clstr_1 UNION ALL
|
|
SELECT * FROM clstr_2 UNION ALL
|
|
SELECT * FROM clstr_3;
|
|
|
|
-- revert to the original state
|
|
DELETE FROM clstr_1;
|
|
DELETE FROM clstr_2;
|
|
DELETE FROM clstr_3;
|
|
INSERT INTO clstr_1 VALUES (2);
|
|
INSERT INTO clstr_1 VALUES (1);
|
|
INSERT INTO clstr_2 VALUES (2);
|
|
INSERT INTO clstr_2 VALUES (1);
|
|
INSERT INTO clstr_3 VALUES (2);
|
|
INSERT INTO clstr_3 VALUES (1);
|
|
|
|
-- this user can only cluster clstr_1 and clstr_3, but the latter
|
|
-- has not been clustered
|
|
SET SESSION AUTHORIZATION regress_clstr_user;
|
|
CLUSTER;
|
|
SELECT * FROM clstr_1 UNION ALL
|
|
SELECT * FROM clstr_2 UNION ALL
|
|
SELECT * FROM clstr_3;
|
|
|
|
-- cluster a single table using the indisclustered bit previously set
|
|
DELETE FROM clstr_1;
|
|
INSERT INTO clstr_1 VALUES (2);
|
|
INSERT INTO clstr_1 VALUES (1);
|
|
CLUSTER clstr_1;
|
|
SELECT * FROM clstr_1;
|
|
|
|
-- Test MVCC-safety of cluster. There isn't much we can do to verify the
|
|
-- results with a single backend...
|
|
|
|
CREATE TABLE clustertest (key int PRIMARY KEY);
|
|
|
|
INSERT INTO clustertest VALUES (10);
|
|
INSERT INTO clustertest VALUES (20);
|
|
INSERT INTO clustertest VALUES (30);
|
|
INSERT INTO clustertest VALUES (40);
|
|
INSERT INTO clustertest VALUES (50);
|
|
|
|
-- Use a transaction so that updates are not committed when CLUSTER sees 'em
|
|
BEGIN;
|
|
|
|
-- Test update where the old row version is found first in the scan
|
|
UPDATE clustertest SET key = 100 WHERE key = 10;
|
|
|
|
-- Test update where the new row version is found first in the scan
|
|
UPDATE clustertest SET key = 35 WHERE key = 40;
|
|
|
|
-- Test longer update chain
|
|
UPDATE clustertest SET key = 60 WHERE key = 50;
|
|
UPDATE clustertest SET key = 70 WHERE key = 60;
|
|
UPDATE clustertest SET key = 80 WHERE key = 70;
|
|
|
|
SELECT * FROM clustertest;
|
|
CLUSTER clustertest_pkey ON clustertest;
|
|
SELECT * FROM clustertest;
|
|
|
|
COMMIT;
|
|
|
|
SELECT * FROM clustertest;
|
|
|
|
-- check that temp tables can be clustered
|
|
create temp table clstr_temp (col1 int primary key, col2 text);
|
|
insert into clstr_temp values (2, 'two'), (1, 'one');
|
|
cluster clstr_temp using clstr_temp_pkey;
|
|
select * from clstr_temp;
|
|
drop table clstr_temp;
|
|
|
|
RESET SESSION AUTHORIZATION;
|
|
|
|
-- Check that partitioned tables cannot be clustered
|
|
CREATE TABLE clstrpart (a int) PARTITION BY RANGE (a);
|
|
CREATE INDEX clstrpart_idx ON clstrpart (a);
|
|
ALTER TABLE clstrpart CLUSTER ON clstrpart_idx;
|
|
CLUSTER clstrpart USING clstrpart_idx;
|
|
DROP TABLE clstrpart;
|
|
|
|
-- Test CLUSTER with external tuplesorting
|
|
|
|
create table clstr_4 as select * from tenk1;
|
|
create index cluster_sort on clstr_4 (hundred, thousand, tenthous);
|
|
-- ensure we don't use the index in CLUSTER nor the checking SELECTs
|
|
set enable_indexscan = off;
|
|
|
|
-- Use external sort:
|
|
set maintenance_work_mem = '1MB';
|
|
cluster clstr_4 using cluster_sort;
|
|
select * from
|
|
(select hundred, lag(hundred) over () as lhundred,
|
|
thousand, lag(thousand) over () as lthousand,
|
|
tenthous, lag(tenthous) over () as ltenthous from clstr_4) ss
|
|
where row(hundred, thousand, tenthous) <= row(lhundred, lthousand, ltenthous);
|
|
|
|
reset enable_indexscan;
|
|
reset maintenance_work_mem;
|
|
|
|
-- clean up
|
|
DROP TABLE clustertest;
|
|
DROP TABLE clstr_1;
|
|
DROP TABLE clstr_2;
|
|
DROP TABLE clstr_3;
|
|
DROP TABLE clstr_4;
|
|
DROP USER regress_clstr_user;
|