2022-07-29 12:37:40 +02:00
|
|
|
--liquibase formatted sql
|
|
|
|
|
|
|
|
-- ============================================================================
|
2022-08-31 09:42:40 +02:00
|
|
|
--changeset test-package-rbac-CREATE-OBJECT:1 endDelimiter:--//
|
2022-07-29 12:37:40 +02:00
|
|
|
-- ----------------------------------------------------------------------------
|
|
|
|
/*
|
|
|
|
Creates the related RbacObject through a BEFORE INSERT TRIGGER.
|
|
|
|
*/
|
2022-08-31 09:42:40 +02:00
|
|
|
drop trigger if exists createRbacObjectForPackage_Trigger on test_package;
|
2022-07-29 12:37:40 +02:00
|
|
|
create trigger createRbacObjectForPackage_Trigger
|
|
|
|
before insert
|
2022-08-31 09:42:40 +02:00
|
|
|
on test_package
|
2022-07-29 12:37:40 +02:00
|
|
|
for each row
|
|
|
|
execute procedure createRbacObject();
|
|
|
|
--//
|
2022-07-22 13:31:37 +02:00
|
|
|
|
|
|
|
|
2022-07-29 12:37:40 +02:00
|
|
|
-- ============================================================================
|
2022-08-31 09:42:40 +02:00
|
|
|
--changeset test-package-rbac-ROLE-DESCRIPTORS:1 endDelimiter:--//
|
2022-07-29 12:37:40 +02:00
|
|
|
-- ----------------------------------------------------------------------------
|
2022-07-22 13:31:37 +02:00
|
|
|
|
2022-08-31 09:42:40 +02:00
|
|
|
create or replace function testPackageOwner(pac test_package)
|
2022-07-29 08:46:04 +02:00
|
|
|
returns RbacRoleDescriptor
|
|
|
|
returns null on null input
|
|
|
|
language plpgsql as $$
|
2022-07-25 16:38:21 +02:00
|
|
|
begin
|
2022-08-31 09:42:40 +02:00
|
|
|
return roleDescriptor('test_package', pac.uuid, 'owner');
|
2022-07-25 16:38:21 +02:00
|
|
|
end; $$;
|
|
|
|
|
2022-08-31 09:42:40 +02:00
|
|
|
create or replace function testPackageAdmin(pac test_package)
|
2022-07-29 08:46:04 +02:00
|
|
|
returns RbacRoleDescriptor
|
|
|
|
returns null on null input
|
|
|
|
language plpgsql as $$
|
2022-07-25 16:38:21 +02:00
|
|
|
begin
|
2022-08-31 09:42:40 +02:00
|
|
|
return roleDescriptor('test_package', pac.uuid, 'admin');
|
2022-07-25 16:38:21 +02:00
|
|
|
end; $$;
|
|
|
|
|
2022-08-31 09:42:40 +02:00
|
|
|
create or replace function testPackageTenant(pac test_package)
|
2022-07-29 08:46:04 +02:00
|
|
|
returns RbacRoleDescriptor
|
|
|
|
returns null on null input
|
|
|
|
language plpgsql as $$
|
2022-07-25 16:38:21 +02:00
|
|
|
begin
|
2022-08-31 09:42:40 +02:00
|
|
|
return roleDescriptor('test_package', pac.uuid, 'tenant');
|
2022-07-25 16:38:21 +02:00
|
|
|
end; $$;
|
2022-07-29 12:37:40 +02:00
|
|
|
--//
|
2022-07-25 16:38:21 +02:00
|
|
|
|
|
|
|
|
2022-07-29 12:37:40 +02:00
|
|
|
-- ============================================================================
|
2022-08-31 09:42:40 +02:00
|
|
|
--changeset test-package-rbac-ROLES-CREATION:1 endDelimiter:--//
|
2022-07-29 12:37:40 +02:00
|
|
|
-- ----------------------------------------------------------------------------
|
|
|
|
/*
|
|
|
|
Creates the roles and their assignments for a new package for the AFTER INSERT TRIGGER.
|
|
|
|
*/
|
2022-08-31 09:42:40 +02:00
|
|
|
create or replace function createRbacRolesForTestPackage()
|
2022-07-29 08:46:04 +02:00
|
|
|
returns trigger
|
|
|
|
language plpgsql
|
|
|
|
strict as $$
|
|
|
|
declare
|
2022-08-31 09:42:40 +02:00
|
|
|
parentCustomer test_customer;
|
2022-07-25 16:38:21 +02:00
|
|
|
packageOwnerRoleUuid uuid;
|
|
|
|
packageAdminRoleUuid uuid;
|
2022-07-29 08:46:04 +02:00
|
|
|
begin
|
|
|
|
if TG_OP <> 'INSERT' then
|
|
|
|
raise exception 'invalid usage of TRIGGER AFTER INSERT';
|
|
|
|
end if;
|
2022-07-22 13:31:37 +02:00
|
|
|
|
2022-08-31 09:42:40 +02:00
|
|
|
select * from test_customer as c where c.uuid = NEW.customerUuid into parentCustomer;
|
2022-07-22 13:31:37 +02:00
|
|
|
|
2022-07-25 16:38:21 +02:00
|
|
|
-- an owner role is created and assigned to the customer's admin role
|
|
|
|
packageOwnerRoleUuid = createRole(
|
2022-08-31 09:42:40 +02:00
|
|
|
testPackageOwner(NEW),
|
2022-07-29 12:37:40 +02:00
|
|
|
withoutPermissions(),
|
2022-08-31 09:42:40 +02:00
|
|
|
beneathRole(testCustomerAdmin(parentCustomer))
|
2022-07-25 16:38:21 +02:00
|
|
|
);
|
|
|
|
|
|
|
|
-- an owner role is created and assigned to the package owner role
|
|
|
|
packageAdminRoleUuid = createRole(
|
2022-08-31 09:42:40 +02:00
|
|
|
testPackageAdmin(NEW),
|
2022-08-31 14:57:15 +02:00
|
|
|
grantingPermissions(forObjectUuid => NEW.uuid, permitOps => array ['add-domain']),
|
2022-07-25 16:38:21 +02:00
|
|
|
beneathRole(packageOwnerRoleUuid)
|
|
|
|
);
|
|
|
|
|
|
|
|
-- and a package tenant role is created and assigned to the package admin as well
|
|
|
|
perform createRole(
|
2022-08-31 09:42:40 +02:00
|
|
|
testPackageTenant(NEW),
|
2022-07-29 08:46:04 +02:00
|
|
|
grantingPermissions(forObjectUuid => NEW.uuid, permitOps => array ['view']),
|
2022-07-25 16:38:21 +02:00
|
|
|
beneathRole(packageAdminRoleUuid),
|
2022-08-31 09:42:40 +02:00
|
|
|
beingItselfA(testCustomerTenant(parentCustomer))
|
2022-07-25 16:38:21 +02:00
|
|
|
);
|
2022-07-22 13:31:37 +02:00
|
|
|
|
2022-07-29 08:46:04 +02:00
|
|
|
return NEW;
|
|
|
|
end; $$;
|
2022-07-22 13:31:37 +02:00
|
|
|
|
2022-07-29 12:37:40 +02:00
|
|
|
/*
|
|
|
|
An AFTER INSERT TRIGGER which creates the role structure for a new package.
|
|
|
|
*/
|
|
|
|
|
2022-08-31 09:42:40 +02:00
|
|
|
drop trigger if exists createRbacRolesForTestPackage_Trigger on test_package;
|
|
|
|
create trigger createRbacRolesForTestPackage_Trigger
|
2022-07-29 08:46:04 +02:00
|
|
|
after insert
|
2022-08-31 09:42:40 +02:00
|
|
|
on test_package
|
2022-07-29 08:46:04 +02:00
|
|
|
for each row
|
2022-08-31 09:42:40 +02:00
|
|
|
execute procedure createRbacRolesForTestPackage();
|
2022-07-29 12:37:40 +02:00
|
|
|
--//
|
|
|
|
|
|
|
|
-- ============================================================================
|
2022-08-31 09:42:40 +02:00
|
|
|
--changeset test-package-rbac-ROLES-REMOVAL:1 endDelimiter:--//
|
2022-07-29 12:37:40 +02:00
|
|
|
-- ----------------------------------------------------------------------------
|
|
|
|
|
|
|
|
/*
|
|
|
|
Deletes the roles and their assignments of a deleted package for the BEFORE DELETE TRIGGER.
|
|
|
|
*/
|
2022-07-29 08:46:04 +02:00
|
|
|
|
2022-08-31 09:42:40 +02:00
|
|
|
create or replace function deleteRbacRulesForTestPackage()
|
2022-07-29 08:46:04 +02:00
|
|
|
returns trigger
|
|
|
|
language plpgsql
|
|
|
|
strict as $$
|
|
|
|
begin
|
|
|
|
if TG_OP = 'DELETE' then
|
2022-08-31 09:42:40 +02:00
|
|
|
call deleteRole(findRoleId(testPackageOwner(OLD)));
|
|
|
|
call deleteRole(findRoleId(testPackageAdmin(OLD)));
|
|
|
|
call deleteRole(findRoleId(testPackageTenant(OLD)));
|
2022-07-29 08:46:04 +02:00
|
|
|
else
|
|
|
|
raise exception 'invalid usage of TRIGGER BEFORE DELETE';
|
|
|
|
end if;
|
|
|
|
end; $$;
|
2022-07-22 13:31:37 +02:00
|
|
|
|
2022-07-29 12:37:40 +02:00
|
|
|
/*
|
|
|
|
An BEFORE DELETE TRIGGER which deletes the role structure of a package.
|
|
|
|
*/
|
|
|
|
|
2022-08-31 09:42:40 +02:00
|
|
|
drop trigger if exists deleteRbacRulesForTestPackage_Trigger on test_package;
|
|
|
|
create trigger deleteRbacRulesForTestPackage_Trigger
|
2022-07-29 08:46:04 +02:00
|
|
|
before delete
|
2022-08-31 09:42:40 +02:00
|
|
|
on test_package
|
2022-07-29 08:46:04 +02:00
|
|
|
for each row
|
2022-08-31 09:42:40 +02:00
|
|
|
execute procedure deleteRbacRulesForTestPackage();
|
2022-07-29 12:37:40 +02:00
|
|
|
--//
|
2022-07-22 13:31:37 +02:00
|
|
|
|
2022-07-29 12:37:40 +02:00
|
|
|
|
|
|
|
-- ============================================================================
|
2022-08-31 09:42:40 +02:00
|
|
|
--changeset test-package-rbac-IDENTITY-VIEW:1 endDelimiter:--//
|
2022-07-29 16:25:46 +02:00
|
|
|
-- ----------------------------------------------------------------------------
|
|
|
|
|
|
|
|
/*
|
|
|
|
Creates a view to the package main table which maps the identifying name
|
|
|
|
(in this case, actually the column `name`) to the objectUuid.
|
|
|
|
*/
|
2022-08-31 09:42:40 +02:00
|
|
|
drop view if exists test_package_iv;
|
|
|
|
create or replace view test_package_iv as
|
2022-07-29 16:25:46 +02:00
|
|
|
select distinct target.uuid, target.name as idName
|
2022-08-31 09:42:40 +02:00
|
|
|
from test_package as target;
|
2022-07-29 16:25:46 +02:00
|
|
|
-- TODO: Is it ok that everybody has access to this information?
|
2022-08-31 09:42:40 +02:00
|
|
|
grant all privileges on test_package_iv to restricted;
|
2022-07-29 16:25:46 +02:00
|
|
|
|
|
|
|
/*
|
|
|
|
Returns the objectUuid for a given identifying name (in this case, actually the column `name`).
|
|
|
|
*/
|
2022-08-31 09:42:40 +02:00
|
|
|
create or replace function test_packageUuidByIdName(idName varchar)
|
2022-07-29 16:25:46 +02:00
|
|
|
returns uuid
|
|
|
|
language sql
|
|
|
|
strict as $$
|
2022-08-31 09:42:40 +02:00
|
|
|
select uuid from test_package_iv iv where iv.idName = test_packageUuidByIdName.idName;
|
2022-07-29 16:25:46 +02:00
|
|
|
$$;
|
2022-08-03 06:12:16 +02:00
|
|
|
|
|
|
|
/*
|
|
|
|
Returns the identifying name for a given objectUuid (in this case the name).
|
|
|
|
*/
|
2022-08-31 09:42:40 +02:00
|
|
|
create or replace function test_packageIdNameByUuid(uuid uuid)
|
2022-08-03 06:12:16 +02:00
|
|
|
returns varchar
|
2022-08-04 17:19:45 +02:00
|
|
|
stable leakproof
|
2022-08-03 06:12:16 +02:00
|
|
|
language sql
|
|
|
|
strict as $$
|
2022-08-31 09:42:40 +02:00
|
|
|
select idName from test_package_iv iv where iv.uuid = test_packageIdNameByUuid.uuid;
|
2022-08-03 06:12:16 +02:00
|
|
|
$$;
|
2022-07-29 16:25:46 +02:00
|
|
|
--//
|
|
|
|
|
|
|
|
|
|
|
|
-- ============================================================================
|
2022-08-31 09:42:40 +02:00
|
|
|
--changeset test-package-rbac-RESTRICTED-VIEW:1 endDelimiter:--//
|
2022-07-29 12:37:40 +02:00
|
|
|
-- ----------------------------------------------------------------------------
|
|
|
|
|
|
|
|
/*
|
|
|
|
Creates a view to the customer main table which maps the identifying name
|
|
|
|
(in this case, the prefix) to the objectUuid.
|
|
|
|
*/
|
2022-08-31 09:42:40 +02:00
|
|
|
drop view if exists test_package_rv;
|
|
|
|
create or replace view test_package_rv as
|
2022-08-02 11:51:36 +02:00
|
|
|
select target.*
|
2022-08-31 09:42:40 +02:00
|
|
|
from test_package as target
|
|
|
|
where target.uuid in (select queryAccessibleObjectUuidsOfSubjectIds('view', 'test_package', currentSubjectsUuids()))
|
2022-08-09 17:51:50 +02:00
|
|
|
order by target.name;
|
2022-08-31 09:42:40 +02:00
|
|
|
grant all privileges on test_package_rv to restricted;
|
2022-07-29 12:37:40 +02:00
|
|
|
--//
|