--

-- Free Space Map test

--

SELECT current_setting('block_size')::integer AS blocksize,

current_setting('block_size')::integer / 8 AS strsize

\gset

CREATE TABLE fsm_check_size (num int, str text);

-- With one block, there should be no FSM

INSERT INTO fsm_check_size VALUES(1, 'a');

-- Fill 3 blocks with one record each

ALTER TABLE fsm_check_size SET (fillfactor=15);

INSERT INTO fsm_check_size SELECT i, rpad('', :strsize, 'a')

FROM generate_series(1,3) i;

-- There should be no FSM

VACUUM fsm_check_size;

SELECT pg_relation_size('fsm_check_size', 'main') AS heap_size,

pg_relation_size('fsm_check_size', 'fsm') AS fsm_size;

heap_size | fsm_size

-----------+----------

8192 | 0

SELECT pg_relation_size('fsm_check_size', 'main') / :blocksize AS heap_nblocks,

pg_relation_size('fsm_check_size', 'fsm') / :blocksize AS fsm_nblocks;

heap_nblocks | fsm_nblocks

--------------+-------------

3 | 0

(1 row)

-- The following operations are for testing the functionality of the local

-- in-memory map. In particular, we want to be able to insert into some

-- other block than the one at the end of the heap, without using a FSM.

-- Fill most of the last block

ALTER TABLE fsm_check_size SET (fillfactor=100);

INSERT INTO fsm_check_size SELECT i, rpad('', :strsize, 'a')

FROM generate_series(101,105) i;

-- Make sure records can go into any block but the last one

ALTER TABLE fsm_check_size SET (fillfactor=30);

-- Insert large record and make sure it does not cause the relation to extend

INSERT INTO fsm_check_size VALUES (111, rpad('', :strsize, 'a'));

VACUUM fsm_check_size;

SELECT pg_relation_size('fsm_check_size', 'main') / :blocksize AS heap_nblocks,

pg_relation_size('fsm_check_size', 'fsm') / :blocksize AS fsm_nblocks;

heap_nblocks | fsm_nblocks

--------------+-------------

3 | 0

(1 row)

-- Extend table with enough blocks to exceed the FSM threshold

END;

$$;

VACUUM fsm_check_size;

SELECT pg_relation_size('fsm_check_size', 'fsm') ASfsm_size;

----------

SELECT pg_relation_size('fsm_check_size', 'fsm')/ :blocksizeASfsm_nblocks;

-------------

(1 row)

-- Add long random string to extend TOAST table to 1 block

INSERT INTO fsm_check_size

VALUES(0, (SELECT string_agg(md5(chr(i)), '')

FROM generate_series(1,100) i));

FROM generate_series(1, :blocksize /100) i));

VACUUM fsm_check_size;

SELECT pg_relation_size(reltoastrelid, 'main') AStoast_size,

pg_relation_size(reltoastrelid, 'fsm') AStoast_fsm_size

SELECT pg_relation_size(reltoastrelid, 'main')/ :blocksizeAStoast_nblocks,

pg_relation_size(reltoastrelid, 'fsm')/ :blocksizeAStoast_fsm_nblocks

FROM pg_class WHERE relname = 'fsm_check_size';

toast_size |toast_fsm_size

------------+----------------

8192 | 0

toast_nblocks |toast_fsm_nblocks

---------------+-------------------

1 | 0

(1 row)

DROP TABLE fsm_check_size;

# ----------

# The second group of parallel tests

# ----------

test: point lseg line box path polygon circle date time timetz timestamp timestamptz interval inet macaddr macaddr8 tstypes

test: point lseg line box path polygon circle date time timetz timestamp timestamptz interval inet macaddr macaddr8 tstypes fsm

# ----------

# Another group of parallel tests

# ----------

test: sanity_check

# ----------

# fsm does a delete followed by vacuum, and running it in parallel can prevent

# removal of rows.

# ----------

test: fsm

# ----------

# Believe it or not, select creates a table, subsequent

# tests need.

test: macaddr

test: macaddr8

test: tstypes

test: fsm

test: geometry

test: horology

test: regex

test: create_am

test: hash_func

test: sanity_check

test: fsm

test: errors

test: select

test: select_into

SELECT current_setting('block_size')::integerAS blocksize,

current_setting('block_size')::integer/8AS strsize

\gset

CREATETABLEfsm_check_size (numint, strtext);

INSERT INTO fsm_check_sizeVALUES(1,'a');

ALTERTABLE fsm_check_sizeSET (fillfactor=15);

INSERT INTO fsm_check_sizeSELECT i, rpad('', :strsize,'a')

FROM generate_series(1,3) i;

VACUUM fsm_check_size;

SELECT pg_relation_size('fsm_check_size','main')AS heap_size,

pg_relation_size('fsm_check_size','fsm')AS fsm_size;

SELECT pg_relation_size('fsm_check_size','main')/ :blocksizeAS heap_nblocks,

pg_relation_size('fsm_check_size','fsm')/ :blocksizeAS fsm_nblocks;

ALTERTABLE fsm_check_sizeSET (fillfactor=100);

INSERT INTO fsm_check_sizeSELECT i, rpad('', :strsize,'a')

FROM generate_series(101,105) i;

ALTERTABLE fsm_check_sizeSET (fillfactor=30);

INSERT INTO fsm_check_sizeVALUES (111, rpad('', :strsize,'a'));

VACUUM fsm_check_size;

SELECT pg_relation_size('fsm_check_size','main')/ :blocksizeAS heap_nblocks,

pg_relation_size('fsm_check_size','fsm')/ :blocksizeAS fsm_nblocks;

DO $$

$$;

VACUUM fsm_check_size;

SELECT pg_relation_size('fsm_check_size','fsm')ASfsm_size;

SELECT pg_relation_size('fsm_check_size','fsm')/ :blocksizeASfsm_nblocks;

INSERT INTO fsm_check_size

VALUES(0, (SELECT string_agg(md5(chr(i)),'')

FROM generate_series(1,100) i));

FROM generate_series(1, :blocksize/100) i));

VACUUM fsm_check_size;

SELECT pg_relation_size(reltoastrelid,'main')AStoast_size,

pg_relation_size(reltoastrelid,'fsm')AStoast_fsm_size

SELECT pg_relation_size(reltoastrelid,'main')/ :blocksizeAStoast_nblocks,

pg_relation_size(reltoastrelid,'fsm')/ :blocksizeAStoast_fsm_nblocks

FROM pg_classWHERE relname='fsm_check_size';

DROPTABLE fsm_check_size;