contrib/ltree/ltree--1.0--1.1.sql

   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;