HEADERS = segdata.h

REGRESS = security seg

REGRESS = security seg partition

EXTRA_CLEAN = segparse.h segparse.c segscan.c

--

-- Test that partitioned-index operations cope with objects that are

-- not in the secure search path. (This has little to do with seg,

-- but we need an opclass that isn't in pg_catalog, and the base system

-- has no such opclass.) Note that we need to test propagation of the

-- partitioned index's properties both to partitions that pre-date it

-- and to partitions created later.

--

create function mydouble(int) returns int strict immutable parallel safe

begin atomic select $1 * 2; end;

create collation mycollation from "POSIX";

create table pt (category int, sdata seg, tdata text)

partition by list (category);

-- pre-existing partition

create table pt12 partition of pt for values in (1,2);

insert into pt values(1, '0 .. 1'::seg, 'zed');

-- expression references object in public schema

create index pti1 on pt ((mydouble(category) + 1));

-- opclass in public schema

create index pti2 on pt (sdata seg_ops);

-- collation in public schema

create index pti3 on pt (tdata collate mycollation);

-- new partition

create table pt34 partition of pt for values in (3,4);

insert into pt values(4, '-1 .. 1'::seg, 'foo');

\d+ pt

Partitioned table "public.pt"

Column | Type | Collation | Nullable | Default | Storage | Stats target | Description

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

category | integer | | | | plain | |

sdata | seg | | | | plain | |

tdata | text | | | | extended | |

Partition key: LIST (category)

Indexes:

"pti1" btree ((mydouble(category) + 1))

"pti2" btree (sdata)

"pti3" btree (tdata COLLATE mycollation)

Partitions: pt12 FOR VALUES IN (1, 2),

pt34 FOR VALUES IN (3, 4)

\d+ pt12

Table "public.pt12"

Column | Type | Collation | Nullable | Default | Storage | Stats target | Description

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

category | integer | | | | plain | |

sdata | seg | | | | plain | |

tdata | text | | | | extended | |

Partition of: pt FOR VALUES IN (1, 2)

Partition constraint: ((category IS NOT NULL) AND (category = ANY (ARRAY[1, 2])))

Indexes:

"pt12_expr_idx" btree ((mydouble(category) + 1))

"pt12_sdata_idx" btree (sdata)

"pt12_tdata_idx" btree (tdata COLLATE mycollation)

'sql': [

'security',

'seg',

'partition',

],

},

}

createfunctionmydouble(int) returnsint strict immutable parallel safe

begin atomicselect $1*2; end;

create collation mycollationfrom"POSIX";

createtablept (categoryint, sdata seg, tdatatext)

partition by list (category);

createtablept12 partition of pt forvaluesin (1,2);

insert into ptvalues(1,'0 .. 1'::seg,'zed');

createindexpti1on pt ((mydouble(category)+1));

createindexpti2on pt (sdata seg_ops);

createindexpti3on pt (tdata collate mycollation);

createtablept34 partition of pt forvaluesin (3,4);

insert into ptvalues(4,'-1 .. 1'::seg,'foo');

\d+ pt

\d+ pt12

if (!found)

{

IndexStmt*childStmt=copyObject(stmt);

boolfound_whole_row;

ListCell*lc;

IndexStmt*childStmt;

ObjectAddresschildAddr;

childStmt->idxname=NULL;

childStmt->relation=NULL;

childStmt->indexOid=InvalidOid;

childStmt->oldNumber=InvalidRelFileNumber;

childStmt->oldCreateSubid=InvalidSubTransactionId;

childStmt->oldFirstRelfilelocatorSubid=InvalidSubTransactionId;

foreach(lc,childStmt->indexParams)

{

IndexElem*ielem=lfirst(lc);

if (ielem->expr)

{

map_variable_attnos((Node*)ielem->expr,

1,0,attmap,

InvalidOid,

&found_whole_row);

if (found_whole_row)

elog(ERROR,"cannot convert whole-row table reference");

}

}

map_variable_attnos(stmt->whereClause,1,0,

attmap,

InvalidOid,&found_whole_row);

if (found_whole_row)

elog(ERROR,"cannot convert whole-row table reference");

childStmt=generateClonedIndexStmt(NULL,

parentIndex,

attmap,

NULL);

(3 rows)

alter table at_partitioned alter column name type varchar(127);

-- Note: these tests currently show the wrong behavior for comments :-(

select relname,

c.oid = oldoid as orig_oid,

case relfilenode

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

at_partitioned | t | none |

at_partitioned_0 | t | own |

at_partitioned_0_id_name_key | f | own |parent index

at_partitioned_0_id_name_key | f | own |

at_partitioned_1 | t | own |

at_partitioned_1_id_name_key | f | own |parent index

at_partitioned_1_id_name_key | f | own |

at_partitioned_id_name_key | f | none | parent index

(6 rows)

altertable at_partitioned alter column name typevarchar(127);

select relname,

c.oid= oldoidas orig_oid,

case relfilenode