1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
|
set client_min_messages = 'warning';
\i sql/modules/Blacklisted.sql.inc
\copy blacklisted_funcs FROM 'sql/modules/BLACKLIST';
DO $$
DECLARE f record;
BEGIN
WITH function_list AS (
SELECT n.nspname as "Schema",
p.proname as "Name",
pg_catalog.pg_get_function_result(p.oid) as "Result data type",
pg_catalog.pg_get_function_arguments(p.oid) as "Argument data types"
FROM pg_catalog.pg_proc p
LEFT JOIN pg_catalog.pg_namespace n ON n.oid = p.pronamespace
WHERE pg_catalog.pg_function_is_visible(p.oid)
AND n.nspname <> 'pg_catalog'
AND n.nspname <> 'information_schema'
AND p.proname IN (
SELECT funcname from blacklisted_funcs
)
ORDER BY 1, 2, 4
)
SELECT * INTO f from function_list
WHERE "Name" in (
SELECT "Name" FROM function_list
GROUP BY 1
HAVING COUNT(*) > 1);
IF f IS NULL THEN
UPDATE defaults SET value ='yes' WHERE setting_key = 'module_load_ok';
ELSE
UPDATE defaults SET value ='no' WHERE setting_key = 'module_load_ok';
RAISE EXCEPTION 'Duplicate functions found: %',f;
END IF;
END$$;
|
