PolarDB-for-PostgreSQL

1
/* contrib/ltree/ltree--1.0--1.1.sql */
2

3
-- complain if script is sourced in psql, rather than via ALTER EXTENSION
4
\echo Use "ALTER EXTENSION ltree UPDATE TO '1.1'" to load this file. \quit
5

6
-- Update procedure signatures the hard way.
7
-- We use to_regprocedure() so that query doesn't fail if run against 9.6beta1 definitions,
8
-- wherein the signatures have been updated already.  In that case to_regprocedure() will
9
-- return NULL and no updates will happen.
10
DO LANGUAGE plpgsql
11
$$
12
DECLARE
13
  my_schema pg_catalog.text := pg_catalog.quote_ident(pg_catalog.current_schema());
14
  old_path pg_catalog.text := pg_catalog.current_setting('search_path');
15
BEGIN
16
-- for safety, transiently set search_path to just pg_catalog+pg_temp
17
PERFORM pg_catalog.set_config('search_path', 'pg_catalog, pg_temp', true);
18

19
UPDATE pg_catalog.pg_proc SET
20
  proargtypes = pg_catalog.array_to_string(newtypes::pg_catalog.oid[], ' ')::pg_catalog.oidvector,
21
  pronargs = pg_catalog.array_length(newtypes, 1)
22
FROM (VALUES
23
(NULL::pg_catalog.text, NULL::pg_catalog.text[]), -- establish column types
24
('ltree_consistent(internal,internal,int2,oid,internal)', '{internal,SCH.ltree,int2,oid,internal}'),
25
('ltree_same(internal,internal,internal)', '{SCH.ltree_gist,SCH.ltree_gist,internal}'),
26
('_ltree_consistent(internal,internal,int2,oid,internal)', '{internal,SCH._ltree,int2,oid,internal}'),
27
('_ltree_same(internal,internal,internal)', '{SCH.ltree_gist,SCH.ltree_gist,internal}')
28
) AS update_data (oldproc, newtypestext),
29
LATERAL (
30
  SELECT array_agg(replace(typ, 'SCH', my_schema)::regtype) as newtypes FROM unnest(newtypestext) typ
31
) ls
32
WHERE oid = to_regprocedure(my_schema || '.' || replace(oldproc, 'SCH', my_schema));
33

34
UPDATE pg_catalog.pg_proc SET
35
  prorettype = (my_schema || '.ltree_gist')::pg_catalog.regtype
36
WHERE oid = pg_catalog.to_regprocedure(my_schema || '.ltree_union(internal,internal)');
37

38
UPDATE pg_catalog.pg_proc SET
39
  prorettype = (my_schema || '.ltree_gist')::pg_catalog.regtype
40
WHERE oid = pg_catalog.to_regprocedure(my_schema || '._ltree_union(internal,internal)');
41

42
PERFORM pg_catalog.set_config('search_path', old_path, true);
43
END
44
$$;
45

46
ALTER FUNCTION ltree_in(cstring) PARALLEL SAFE;
47
ALTER FUNCTION ltree_out(ltree) PARALLEL SAFE;
48
ALTER FUNCTION ltree_cmp(ltree, ltree) PARALLEL SAFE;
49
ALTER FUNCTION ltree_lt(ltree, ltree) PARALLEL SAFE;
50
ALTER FUNCTION ltree_le(ltree, ltree) PARALLEL SAFE;
51
ALTER FUNCTION ltree_eq(ltree, ltree) PARALLEL SAFE;
52
ALTER FUNCTION ltree_ge(ltree, ltree) PARALLEL SAFE;
53
ALTER FUNCTION ltree_gt(ltree, ltree) PARALLEL SAFE;
54
ALTER FUNCTION ltree_ne(ltree, ltree) PARALLEL SAFE;
55
ALTER FUNCTION subltree(ltree, int4, int4) PARALLEL SAFE;
56
ALTER FUNCTION subpath(ltree, int4, int4) PARALLEL SAFE;
57
ALTER FUNCTION subpath(ltree, int4) PARALLEL SAFE;
58
ALTER FUNCTION index(ltree, ltree) PARALLEL SAFE;
59
ALTER FUNCTION index(ltree, ltree, int4) PARALLEL SAFE;
60
ALTER FUNCTION nlevel(ltree) PARALLEL SAFE;
61
ALTER FUNCTION ltree2text(ltree) PARALLEL SAFE;
62
ALTER FUNCTION text2ltree(text) PARALLEL SAFE;
63
ALTER FUNCTION lca(_ltree) PARALLEL SAFE;
64
ALTER FUNCTION lca(ltree, ltree) PARALLEL SAFE;
65
ALTER FUNCTION lca(ltree, ltree, ltree) PARALLEL SAFE;
66
ALTER FUNCTION lca(ltree, ltree, ltree, ltree) PARALLEL SAFE;
67
ALTER FUNCTION lca(ltree, ltree, ltree, ltree, ltree) PARALLEL SAFE;
68
ALTER FUNCTION lca(ltree, ltree, ltree, ltree, ltree, ltree) PARALLEL SAFE;
69
ALTER FUNCTION lca(ltree, ltree, ltree, ltree, ltree, ltree, ltree) PARALLEL SAFE;
70
ALTER FUNCTION lca(ltree, ltree, ltree, ltree, ltree, ltree, ltree, ltree) PARALLEL SAFE;
71
ALTER FUNCTION ltree_isparent(ltree, ltree) PARALLEL SAFE;
72
ALTER FUNCTION ltree_risparent(ltree, ltree) PARALLEL SAFE;
73
ALTER FUNCTION ltree_addltree(ltree, ltree) PARALLEL SAFE;
74
ALTER FUNCTION ltree_addtext(ltree, text) PARALLEL SAFE;
75
ALTER FUNCTION ltree_textadd(text, ltree) PARALLEL SAFE;
76
ALTER FUNCTION ltreeparentsel(internal, oid, internal, integer) PARALLEL SAFE;
77
ALTER FUNCTION lquery_in(cstring) PARALLEL SAFE;
78
ALTER FUNCTION lquery_out(lquery) PARALLEL SAFE;
79
ALTER FUNCTION ltq_regex(ltree, lquery) PARALLEL SAFE;
80
ALTER FUNCTION ltq_rregex(lquery, ltree) PARALLEL SAFE;
81
ALTER FUNCTION lt_q_regex(ltree, _lquery) PARALLEL SAFE;
82
ALTER FUNCTION lt_q_rregex(_lquery, ltree) PARALLEL SAFE;
83
ALTER FUNCTION ltxtq_in(cstring) PARALLEL SAFE;
84
ALTER FUNCTION ltxtq_out(ltxtquery) PARALLEL SAFE;
85
ALTER FUNCTION ltxtq_exec(ltree, ltxtquery) PARALLEL SAFE;
86
ALTER FUNCTION ltxtq_rexec(ltxtquery, ltree) PARALLEL SAFE;
87
ALTER FUNCTION ltree_gist_in(cstring) PARALLEL SAFE;
88
ALTER FUNCTION ltree_gist_out(ltree_gist) PARALLEL SAFE;
89
ALTER FUNCTION ltree_consistent(internal, ltree, int2, oid, internal) PARALLEL SAFE;
90
ALTER FUNCTION ltree_compress(internal) PARALLEL SAFE;
91
ALTER FUNCTION ltree_decompress(internal) PARALLEL SAFE;
92
ALTER FUNCTION ltree_penalty(internal, internal, internal) PARALLEL SAFE;
93
ALTER FUNCTION ltree_picksplit(internal, internal) PARALLEL SAFE;
94
ALTER FUNCTION ltree_union(internal, internal) PARALLEL SAFE;
95
ALTER FUNCTION ltree_same(ltree_gist, ltree_gist, internal) PARALLEL SAFE;
96
ALTER FUNCTION _ltree_isparent(_ltree, ltree) PARALLEL SAFE;
97
ALTER FUNCTION _ltree_r_isparent(ltree, _ltree) PARALLEL SAFE;
98
ALTER FUNCTION _ltree_risparent(_ltree, ltree) PARALLEL SAFE;
99
ALTER FUNCTION _ltree_r_risparent(ltree, _ltree) PARALLEL SAFE;
100
ALTER FUNCTION _ltq_regex(_ltree, lquery) PARALLEL SAFE;
101
ALTER FUNCTION _ltq_rregex(lquery, _ltree) PARALLEL SAFE;
102
ALTER FUNCTION _lt_q_regex(_ltree, _lquery) PARALLEL SAFE;
103
ALTER FUNCTION _lt_q_rregex(_lquery, _ltree) PARALLEL SAFE;
104
ALTER FUNCTION _ltxtq_exec(_ltree, ltxtquery) PARALLEL SAFE;
105
ALTER FUNCTION _ltxtq_rexec(ltxtquery, _ltree) PARALLEL SAFE;
106
ALTER FUNCTION _ltree_extract_isparent(_ltree, ltree) PARALLEL SAFE;
107
ALTER FUNCTION _ltree_extract_risparent(_ltree, ltree) PARALLEL SAFE;
108
ALTER FUNCTION _ltq_extract_regex(_ltree, lquery) PARALLEL SAFE;
109
ALTER FUNCTION _ltxtq_extract_exec(_ltree, ltxtquery) PARALLEL SAFE;
110
ALTER FUNCTION _ltree_consistent(internal, _ltree, int2, oid, internal) PARALLEL SAFE;
111
ALTER FUNCTION _ltree_compress(internal) PARALLEL SAFE;
112
ALTER FUNCTION _ltree_penalty(internal, internal, internal) PARALLEL SAFE;
113
ALTER FUNCTION _ltree_picksplit(internal, internal) PARALLEL SAFE;
114
ALTER FUNCTION _ltree_union(internal, internal) PARALLEL SAFE;
115
ALTER FUNCTION _ltree_same(ltree_gist, ltree_gist, internal) PARALLEL SAFE;
116