如何使用 PL/pgSQL 触发器限制删除?

How To Restrict Delete using PL/pgSQL trigger?

如果客户端用户试图从 Table 中删除超过 5 条记录,我想使用触发器来限制它。我有一个基本的想法,但我不知道如何实施这个想法。感谢您的帮助。

基本思路:在触发器中如果TG_OP =删除并且要删除的记录数超过5则限制。

CREATE TRIGGER adjust_count_trigger BEFORE DELETE ON schemaname.tablename
FOR EACH ROW EXECUTE PROCEDURE public.adjust_count();

CREATE OR REPLACE FUNCTION adjust_count()
RETURNS TRIGGER AS
$$
    DECLARE
        num_rows int;
        num_rows1 int;

    BEGIN

        IF TG_OP = 'DELETE' THEN

            EXECUTE 'select count(*) from '||TG_TABLE_SCHEMA ||'.'||TG_RELNAME ||' where oid = old.oid ' into num_rows  ;


            IF num_rows > 5   Then

            RAISE NOTICE 'Cannot Delete More than 5 Records , % ', num_rows ;

            END IF ;


        END IF ;

        RETURN OLD;
    END;
$$
LANGUAGE 'plpgsql';

您可以使用 PostgreSQL v10 中的新转换关系功能轻松做到这一点:

CREATE OR REPLACE FUNCTION forbid_more_than() RETURNS trigger
   LANGUAGE plpgsql AS
$$DECLARE
   n bigint := TG_ARGV[0];
BEGIN
   IF (SELECT count(*) FROM deleted_rows) <= n IS NOT TRUE
   THEN
      RAISE EXCEPTION 'More than % rows deleted', n;
   END IF;
   RETURN OLD;
END;$$;

CREATE TRIGGER forbid_more_than_5
   AFTER DELETE ON mytable
   REFERENCING OLD TABLE AS deleted_rows
   FOR EACH STATEMENT
   EXECUTE PROCEDURE forbid_more_than(5);

在早期版本的 Postgres 中,您可以模拟 Postgres 10 中引入的转换 table。您需要两个触发器。

create trigger before_delete 
before delete on my_table
for each row execute procedure before_delete();

create trigger after_delete 
after delete on my_table
for each statement execute procedure after_delete();

在第一个触发器中创建一个临时文件 table 并向其中插入一行:

create or replace function before_delete()
returns trigger language plpgsql as $$
begin
    create temp table if not exists deleted_rows_of_my_table (dummy int);
    insert into deleted_rows_of_my_table values (1);
    return old;
end $$;

在临时 table 的其他触发器计数行中并将其删除:

create or replace function after_delete()
returns trigger language plpgsql as $$
declare
    num_rows bigint;
begin
    select count(*) from deleted_rows_of_my_table into num_rows;
    drop table deleted_rows_of_my_table;
    if num_rows > 5 then
        raise exception 'Cannot Delete More than 5 Records , % ', num_rows;
    end if;
    return null;
end $$;

上述解决方案可能看起来有点 hacky 但如果在删除之前只有临时 table 不存在是安全的(不要对多个 [= 使用与临时 table 相同的名称24=]s).

Test it in rextester.