/
balmaster
/
postgres
Обзор
Документация
Войти
/
balmaster
/
postgres
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
master
src/pl/plperl/sql/plperl_init.sql
41 строка
770 B
Tom Lane
Fix missed corner cases for grantable permissions on GUCs.
20 июл 2022, 00:21
20 июл 2022, 00:21
13d8388
Код
Авторство
О чём код?
-- test plperl.on_plperl_init -- This test tests setting on_plperl_init after loading plperl LOAD 'plperl'; SET SESSION plperl.on_plperl_init = ' system("/nonesuch"); '; SHOW plperl.on_plperl_init; DO $$ warn 42 $$ language plperl; -- -- Reconnect (to unload plperl), then test setting on_plperl_init -- as an unprivileged user -- \c - CREATE ROLE regress_plperl_user; SET ROLE regress_plperl_user; -- this succeeds, since the GUC isn't known yet SET SESSION plperl.on_plperl_init = 'test'; RESET ROLE; LOAD 'plperl'; SHOW plperl.on_plperl_init; DO $$ warn 42 $$ language plperl; -- now we won't be allowed to set it in the first place SET ROLE regress_plperl_user; SET SESSION plperl.on_plperl_init = 'test'; RESET ROLE; DROP ROLE regress_plperl_user;