2022-07-29 11:39:32 +02:00
|
|
|
--liquibase formatted sql
|
2022-07-29 08:46:04 +02:00
|
|
|
|
2022-07-29 11:39:32 +02:00
|
|
|
-- ============================================================================
|
|
|
|
--changeset hs-customer-rbac-CREATE-OBJECT:1 endDelimiter:--//
|
|
|
|
-- ----------------------------------------------------------------------------
|
2022-07-29 08:46:04 +02:00
|
|
|
|
2022-07-29 11:39:32 +02:00
|
|
|
/*
|
|
|
|
Creates the related RbacObject through a BEFORE INSERT TRIGGER.
|
|
|
|
*/
|
2022-07-29 08:46:04 +02:00
|
|
|
drop trigger if exists createRbacObjectForCustomer_Trigger on customer;
|
|
|
|
create trigger createRbacObjectForCustomer_Trigger
|
|
|
|
before insert
|
|
|
|
on customer
|
|
|
|
for each row
|
|
|
|
execute procedure createRbacObject();
|
2022-07-29 11:39:32 +02:00
|
|
|
--//
|
|
|
|
|
|
|
|
-- ============================================================================
|
|
|
|
--changeset hs-customer-rbac-ROLE-DESCRIPTORS:1 endDelimiter:--//
|
|
|
|
-- ----------------------------------------------------------------------------
|
2022-07-29 08:46:04 +02:00
|
|
|
|
|
|
|
create or replace function customerOwner(customer customer)
|
|
|
|
returns RbacRoleDescriptor
|
|
|
|
language plpgsql
|
|
|
|
strict as $$
|
|
|
|
begin
|
|
|
|
return roleDescriptor('customer', customer.uuid, 'owner');
|
|
|
|
end; $$;
|
|
|
|
|
|
|
|
create or replace function customerAdmin(customer customer)
|
|
|
|
returns RbacRoleDescriptor
|
|
|
|
language plpgsql
|
|
|
|
strict as $$
|
|
|
|
begin
|
|
|
|
return roleDescriptor('customer', customer.uuid, 'admin');
|
|
|
|
end; $$;
|
|
|
|
|
|
|
|
create or replace function customerTenant(customer customer)
|
|
|
|
returns RbacRoleDescriptor
|
|
|
|
language plpgsql
|
|
|
|
strict as $$
|
|
|
|
begin
|
|
|
|
return roleDescriptor('customer', customer.uuid, 'tenant');
|
|
|
|
end; $$;
|
2022-07-29 11:39:32 +02:00
|
|
|
--//
|
|
|
|
|
|
|
|
|
|
|
|
-- ============================================================================
|
|
|
|
--changeset hs-customer-rbac-ROLES-CREATION:1 endDelimiter:--//
|
|
|
|
-- ----------------------------------------------------------------------------
|
2022-07-29 08:46:04 +02:00
|
|
|
|
2022-07-29 11:39:32 +02:00
|
|
|
/*
|
|
|
|
Creates the roles and their assignments for a new customer for the AFTER INSERT TRIGGER.
|
|
|
|
*/
|
2022-07-29 08:46:04 +02:00
|
|
|
|
2022-07-29 11:39:32 +02:00
|
|
|
create or replace function createRbacRolesForCustomer()
|
2022-07-29 08:46:04 +02:00
|
|
|
returns trigger
|
|
|
|
language plpgsql
|
|
|
|
strict as $$
|
|
|
|
declare
|
|
|
|
customerOwnerUuid uuid;
|
|
|
|
customerAdminUuid uuid;
|
|
|
|
begin
|
|
|
|
if TG_OP <> 'INSERT' then
|
|
|
|
raise exception 'invalid usage of TRIGGER AFTER INSERT';
|
|
|
|
end if;
|
|
|
|
|
|
|
|
-- the owner role with full access for Hostsharing administrators
|
|
|
|
customerOwnerUuid = createRole(
|
|
|
|
customerOwner(NEW),
|
|
|
|
grantingPermissions(forObjectUuid => NEW.uuid, permitOps => array ['*']),
|
|
|
|
beneathRole(hostsharingAdmin())
|
|
|
|
);
|
|
|
|
|
|
|
|
-- the admin role for the customer's admins, who can view and add products
|
|
|
|
customerAdminUuid = createRole(
|
|
|
|
customerAdmin(NEW),
|
|
|
|
grantingPermissions(forObjectUuid => NEW.uuid, permitOps => array ['view', 'add-package']),
|
2022-08-13 16:47:36 +02:00
|
|
|
-- NO auto assume for customer owner to avoid exploding permissions for administrators
|
2022-08-16 10:46:41 +02:00
|
|
|
withUser(NEW.adminUserName, 'create'), -- implicitly ignored if null
|
|
|
|
grantedByRole(hostsharingAdmin())
|
2022-07-29 08:46:04 +02:00
|
|
|
);
|
|
|
|
|
|
|
|
-- allow the customer owner role (thus administrators) to assume the customer admin role
|
|
|
|
call grantRoleToRole(customerAdminUuid, customerOwnerUuid, false);
|
|
|
|
|
|
|
|
-- the tenant role which later can be used by owners+admins of sub-objects
|
|
|
|
perform createRole(
|
|
|
|
customerTenant(NEW),
|
|
|
|
grantingPermissions(forObjectUuid => NEW.uuid, permitOps => array ['view'])
|
|
|
|
);
|
|
|
|
|
|
|
|
return NEW;
|
|
|
|
end; $$;
|
|
|
|
|
2022-07-29 11:39:32 +02:00
|
|
|
/*
|
|
|
|
An AFTER INSERT TRIGGER which creates the role structure for a new customer.
|
|
|
|
*/
|
|
|
|
|
|
|
|
drop trigger if exists createRbacRolesForCustomer_Trigger on customer;
|
|
|
|
create trigger createRbacRolesForCustomer_Trigger
|
2022-07-29 08:46:04 +02:00
|
|
|
after insert
|
|
|
|
on customer
|
|
|
|
for each row
|
2022-07-29 11:39:32 +02:00
|
|
|
execute procedure createRbacRolesForCustomer();
|
|
|
|
--//
|
|
|
|
|
2022-07-29 12:14:22 +02:00
|
|
|
|
2022-07-29 11:39:32 +02:00
|
|
|
-- ============================================================================
|
|
|
|
--changeset hs-customer-rbac-ROLES-REMOVAL:1 endDelimiter:--//
|
|
|
|
-- ----------------------------------------------------------------------------
|
|
|
|
|
|
|
|
/*
|
|
|
|
Deletes the roles and their assignments of a deleted customer for the BEFORE DELETE TRIGGER.
|
|
|
|
*/
|
2022-07-29 08:46:04 +02:00
|
|
|
|
|
|
|
create or replace function deleteRbacRulesForCustomer()
|
|
|
|
returns trigger
|
|
|
|
language plpgsql
|
|
|
|
strict as $$
|
|
|
|
begin
|
|
|
|
if TG_OP = 'DELETE' then
|
2022-07-29 11:39:32 +02:00
|
|
|
call deleteRole(findRoleId(customerOwner(OLD)));
|
|
|
|
call deleteRole(findRoleId(customerAdmin(OLD)));
|
|
|
|
call deleteRole(findRoleId(customerTenant(OLD)));
|
2022-07-29 08:46:04 +02:00
|
|
|
else
|
|
|
|
raise exception 'invalid usage of TRIGGER BEFORE DELETE';
|
|
|
|
end if;
|
|
|
|
end; $$;
|
|
|
|
|
2022-07-29 11:39:32 +02:00
|
|
|
/*
|
|
|
|
An BEFORE DELETE TRIGGER which deletes the role structure of a customer.
|
|
|
|
*/
|
|
|
|
|
2022-07-29 08:46:04 +02:00
|
|
|
drop trigger if exists deleteRbacRulesForCustomer_Trigger on customer;
|
|
|
|
create trigger deleteRbacRulesForCustomer_Trigger
|
|
|
|
before delete
|
|
|
|
on customer
|
|
|
|
for each row
|
|
|
|
execute procedure deleteRbacRulesForCustomer();
|
2022-07-29 11:39:32 +02:00
|
|
|
--//
|
2022-07-29 08:46:04 +02:00
|
|
|
|
2022-07-29 11:39:32 +02:00
|
|
|
-- ============================================================================
|
|
|
|
--changeset hs-customer-rbac-IDENTITY-VIEW:1 endDelimiter:--//
|
|
|
|
-- ----------------------------------------------------------------------------
|
|
|
|
|
|
|
|
/*
|
|
|
|
Creates a view to the customer main table which maps the identifying name
|
|
|
|
(in this case, the prefix) to the objectUuid.
|
|
|
|
*/
|
2022-07-29 08:46:04 +02:00
|
|
|
drop view if exists customer_iv;
|
|
|
|
create or replace view customer_iv as
|
2022-08-02 11:51:36 +02:00
|
|
|
select target.uuid, target.prefix as idName
|
2022-07-29 08:46:04 +02:00
|
|
|
from customer as target;
|
|
|
|
-- TODO: Is it ok that everybody has access to this information?
|
|
|
|
grant all privileges on customer_iv to restricted;
|
|
|
|
|
2022-07-29 11:39:32 +02:00
|
|
|
/*
|
|
|
|
Returns the objectUuid for a given identifying name (in this case the prefix).
|
|
|
|
*/
|
2022-07-29 08:46:04 +02:00
|
|
|
create or replace function customerUuidByIdName(idName varchar)
|
|
|
|
returns uuid
|
|
|
|
language sql
|
|
|
|
strict as $$
|
|
|
|
select uuid from customer_iv iv where iv.idName = customerUuidByIdName.idName;
|
|
|
|
$$;
|
2022-08-03 06:12:16 +02:00
|
|
|
|
|
|
|
/*
|
|
|
|
Returns the identifying name for a given objectUuid (in this case the prefix).
|
|
|
|
*/
|
|
|
|
create or replace function customerIdNameByUuid(uuid uuid)
|
|
|
|
returns varchar
|
|
|
|
language sql
|
|
|
|
strict as $$
|
|
|
|
select idName from customer_iv iv where iv.uuid = customerIdNameByUuid.uuid;
|
|
|
|
$$;
|
2022-07-29 11:39:32 +02:00
|
|
|
--//
|
2022-07-29 08:46:04 +02:00
|
|
|
|
2022-07-29 11:39:32 +02:00
|
|
|
|
|
|
|
-- ============================================================================
|
|
|
|
--changeset hs-customer-rbac-RESTRICTED-VIEW:1 endDelimiter:--//
|
|
|
|
-- ----------------------------------------------------------------------------
|
|
|
|
/*
|
2022-08-03 06:12:16 +02:00
|
|
|
Creates a view to the customer main table with row-level limitation
|
2022-07-29 11:39:32 +02:00
|
|
|
based on the 'view' permission of the current user or assumed roles.
|
|
|
|
*/
|
2022-07-29 08:46:04 +02:00
|
|
|
set session session authorization default;
|
|
|
|
drop view if exists customer_rv;
|
|
|
|
create or replace view customer_rv as
|
2022-08-02 11:51:36 +02:00
|
|
|
select target.*
|
2022-07-29 08:46:04 +02:00
|
|
|
from customer as target
|
2022-08-30 09:18:52 +02:00
|
|
|
where target.uuid in (select queryAccessibleObjectUuidsOfSubjectIds('view', 'customer', currentSubjectsUuids()));
|
2022-07-29 08:46:04 +02:00
|
|
|
grant all privileges on customer_rv to restricted;
|
2022-07-29 11:39:32 +02:00
|
|
|
--//
|
2022-08-02 11:51:36 +02:00
|
|
|
|
|
|
|
|
|
|
|
-- ============================================================================
|
|
|
|
--changeset hs-customer-rbac-ADD-CUSTOMER:1 endDelimiter:--//
|
|
|
|
-- ----------------------------------------------------------------------------
|
|
|
|
/*
|
|
|
|
Creates a global permission for add-customer and assigns it to the hostsharing admins role.
|
|
|
|
*/
|
|
|
|
do language plpgsql $$
|
|
|
|
declare
|
|
|
|
addCustomerPermissions uuid[];
|
|
|
|
hostsharingObjectUuid uuid;
|
|
|
|
hsAdminRoleUuid uuid ;
|
|
|
|
begin
|
2022-08-24 11:32:51 +02:00
|
|
|
set local hsadminng.currentUser to 'init';
|
|
|
|
set local hsadminng.currentTask to 'granting global add-customer permission to Hostsharing admin role';
|
|
|
|
|
2022-08-02 11:51:36 +02:00
|
|
|
hsAdminRoleUuid := findRoleId(hostsharingAdmin());
|
|
|
|
hostsharingObjectUuid := (select uuid from global);
|
|
|
|
addCustomerPermissions := createPermissions(hostsharingObjectUuid, array ['add-customer']);
|
|
|
|
call grantPermissionsToRole(hsAdminRoleUuid, addCustomerPermissions);
|
|
|
|
end;
|
|
|
|
$$;
|
|
|
|
|
|
|
|
/**
|
|
|
|
Used by the trigger to prevent the add-customer to current user respectively assumed roles.
|
|
|
|
*/
|
|
|
|
create or replace function addCustomerNotAllowedForCurrentSubjects()
|
|
|
|
returns trigger
|
|
|
|
language PLPGSQL
|
|
|
|
as $$
|
|
|
|
begin
|
2022-08-05 14:31:54 +02:00
|
|
|
raise exception '[403] add-customer not permitted for %', array_to_string(currentSubjects(), ';', 'null');
|
2022-08-02 11:51:36 +02:00
|
|
|
end; $$;
|
|
|
|
|
|
|
|
/**
|
|
|
|
Checks if the user or assumed roles are allowed to add a new customer.
|
|
|
|
*/
|
|
|
|
create trigger customer_insert_trigger
|
|
|
|
before insert
|
|
|
|
on customer
|
|
|
|
for each row
|
|
|
|
when ( currentUser() <> 'mike@hostsharing.net' or not hasGlobalPermission('add-customer') )
|
|
|
|
execute procedure addCustomerNotAllowedForCurrentSubjects();
|
|
|
|
--//
|
|
|
|
|