1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
|
# Test for page level predicate locking in rum
#
# Test to check reduced false positives
#
# Queries are written in such a way that an index scan(from one transaction) and an index insert(from another transaction) will try to access different parts(sub-tree) of the index.
setup
{
CREATE TABLE rum_tbl (id serial, tsv tsvector);
CREATE TABLE text_table (id1 serial, t text[]);
INSERT INTO text_table(t) SELECT array[chr(i) || chr(j)] FROM generate_series(65,90) i,
generate_series(65,90) j ;
-- We need to use pseudorandom to generate values for test table
-- In this case we use linear congruential generator because random()
-- function may generate different outputs with different systems
DO $$
DECLARE
c integer := 17;
a integer := 261;
m integer := 6760;
Xi integer := 228;
BEGIN
FOR i in 1..338 LOOP
INSERT INTO rum_tbl(tsv) VALUES ('');
FOR j in 1..10 LOOP
UPDATE rum_tbl SET tsv = tsv || (SELECT to_tsvector('simple', t[1]) FROM text_table WHERE id1 = Xi % 676 + 1) WHERE id = i;
Xi = (a * Xi + c) % m;
END LOOP;
END LOOP;
END;
$$;
CREATE INDEX rum_tbl_idx ON rum_tbl USING rum (tsv rum_tsvector_ops);
}
teardown
{
DROP TABLE text_table;
DROP TABLE rum_tbl;
}
session "s1"
setup {
BEGIN ISOLATION LEVEL SERIALIZABLE;
set enable_seqscan=off;
}
step "rxy1" { SELECT id, tsv FROM rum_tbl WHERE tsv @@ 'hx'; }
step "wx1" { INSERT INTO rum_tbl(tsv) values('ab'); }
step "c1" { COMMIT; }
session "s2"
setup {
BEGIN ISOLATION LEVEL SERIALIZABLE;
set enable_seqscan=off;
}
step "rxy2" { SELECT id, tsv FROM rum_tbl WHERE tsv @@ 'qh'; }
step "wy2" { INSERT INTO rum_tbl(tsv) values('xz'); }
step "c2" { COMMIT; }
|
