|
8 | 8 | -- wherein the signatures have been updated already. In that case to_regprocedure() will
|
9 | 9 | -- return NULL and no updates will happen.
|
10 | 10 |
|
| 11 | +DO LANGUAGE plpgsql |
| 12 | +$$ |
| 13 | +DECLARE |
| 14 | + my_schema pg_catalog.text := pg_catalog.quote_ident(pg_catalog.current_schema()); |
| 15 | + old_path pg_catalog.text := pg_catalog.current_setting('search_path'); |
| 16 | +BEGIN |
| 17 | +-- for safety, transiently set search_path to just pg_catalog+pg_temp |
| 18 | +PERFORM pg_catalog.set_config('search_path', 'pg_catalog, pg_temp', true); |
| 19 | + |
11 | 20 | UPDATE pg_catalog.pg_proc SET
|
12 | 21 | proargtypes = pg_catalog.array_to_string(newtypes::pg_catalog.oid[], ' ')::pg_catalog.oidvector,
|
13 | 22 | pronargs = pg_catalog.array_length(newtypes, 1)
|
14 | 23 | FROM (VALUES
|
15 |
| -(NULL::pg_catalog.text, NULL::pg_catalog.regtype[]), -- establish column types |
| 24 | +(NULL::pg_catalog.text, NULL::pg_catalog.text[]), -- establish column types |
16 | 25 | ('gbt_oid_distance(internal,oid,int2,oid)', '{internal,oid,int2,oid,internal}'),
|
17 | 26 | ('gbt_oid_union(bytea,internal)', '{internal,internal}'),
|
18 |
| -('gbt_oid_same(internal,internal,internal)', '{gbtreekey8,gbtreekey8,internal}'), |
| 27 | +('gbt_oid_same(internal,internal,internal)', '{SCH.gbtreekey8,SCH.gbtreekey8,internal}'), |
19 | 28 | ('gbt_int2_distance(internal,int2,int2,oid)', '{internal,int2,int2,oid,internal}'),
|
20 | 29 | ('gbt_int2_union(bytea,internal)', '{internal,internal}'),
|
21 |
| -('gbt_int2_same(internal,internal,internal)', '{gbtreekey4,gbtreekey4,internal}'), |
| 30 | +('gbt_int2_same(internal,internal,internal)', '{SCH.gbtreekey4,SCH.gbtreekey4,internal}'), |
22 | 31 | ('gbt_int4_distance(internal,int4,int2,oid)', '{internal,int4,int2,oid,internal}'),
|
23 | 32 | ('gbt_int4_union(bytea,internal)', '{internal,internal}'),
|
24 |
| -('gbt_int4_same(internal,internal,internal)', '{gbtreekey8,gbtreekey8,internal}'), |
| 33 | +('gbt_int4_same(internal,internal,internal)', '{SCH.gbtreekey8,SCH.gbtreekey8,internal}'), |
25 | 34 | ('gbt_int8_distance(internal,int8,int2,oid)', '{internal,int8,int2,oid,internal}'),
|
26 | 35 | ('gbt_int8_union(bytea,internal)', '{internal,internal}'),
|
27 |
| -('gbt_int8_same(internal,internal,internal)', '{gbtreekey16,gbtreekey16,internal}'), |
| 36 | +('gbt_int8_same(internal,internal,internal)', '{SCH.gbtreekey16,SCH.gbtreekey16,internal}'), |
28 | 37 | ('gbt_float4_distance(internal,float4,int2,oid)', '{internal,float4,int2,oid,internal}'),
|
29 | 38 | ('gbt_float4_union(bytea,internal)', '{internal,internal}'),
|
30 |
| -('gbt_float4_same(internal,internal,internal)', '{gbtreekey8,gbtreekey8,internal}'), |
| 39 | +('gbt_float4_same(internal,internal,internal)', '{SCH.gbtreekey8,SCH.gbtreekey8,internal}'), |
31 | 40 | ('gbt_float8_distance(internal,float8,int2,oid)', '{internal,float8,int2,oid,internal}'),
|
32 | 41 | ('gbt_float8_union(bytea,internal)', '{internal,internal}'),
|
33 |
| -('gbt_float8_same(internal,internal,internal)', '{gbtreekey16,gbtreekey16,internal}'), |
| 42 | +('gbt_float8_same(internal,internal,internal)', '{SCH.gbtreekey16,SCH.gbtreekey16,internal}'), |
34 | 43 | ('gbt_ts_distance(internal,timestamp,int2,oid)', '{internal,timestamp,int2,oid,internal}'),
|
35 | 44 | ('gbt_tstz_distance(internal,timestamptz,int2,oid)', '{internal,timestamptz,int2,oid,internal}'),
|
36 | 45 | ('gbt_ts_union(bytea,internal)', '{internal,internal}'),
|
37 |
| -('gbt_ts_same(internal,internal,internal)', '{gbtreekey16,gbtreekey16,internal}'), |
| 46 | +('gbt_ts_same(internal,internal,internal)', '{SCH.gbtreekey16,SCH.gbtreekey16,internal}'), |
38 | 47 | ('gbt_time_distance(internal,time,int2,oid)', '{internal,time,int2,oid,internal}'),
|
39 | 48 | ('gbt_time_union(bytea,internal)', '{internal,internal}'),
|
40 |
| -('gbt_time_same(internal,internal,internal)', '{gbtreekey16,gbtreekey16,internal}'), |
| 49 | +('gbt_time_same(internal,internal,internal)', '{SCH.gbtreekey16,SCH.gbtreekey16,internal}'), |
41 | 50 | ('gbt_date_distance(internal,date,int2,oid)', '{internal,date,int2,oid,internal}'),
|
42 | 51 | ('gbt_date_union(bytea,internal)', '{internal,internal}'),
|
43 |
| -('gbt_date_same(internal,internal,internal)', '{gbtreekey8,gbtreekey8,internal}'), |
| 52 | +('gbt_date_same(internal,internal,internal)', '{SCH.gbtreekey8,SCH.gbtreekey8,internal}'), |
44 | 53 | ('gbt_intv_distance(internal,interval,int2,oid)', '{internal,interval,int2,oid,internal}'),
|
45 | 54 | ('gbt_intv_union(bytea,internal)', '{internal,internal}'),
|
46 |
| -('gbt_intv_same(internal,internal,internal)', '{gbtreekey32,gbtreekey32,internal}'), |
| 55 | +('gbt_intv_same(internal,internal,internal)', '{SCH.gbtreekey32,SCH.gbtreekey32,internal}'), |
47 | 56 | ('gbt_cash_distance(internal,money,int2,oid)', '{internal,money,int2,oid,internal}'),
|
48 | 57 | ('gbt_cash_union(bytea,internal)', '{internal,internal}'),
|
49 |
| -('gbt_cash_same(internal,internal,internal)', '{gbtreekey16,gbtreekey16,internal}'), |
| 58 | +('gbt_cash_same(internal,internal,internal)', '{SCH.gbtreekey16,SCH.gbtreekey16,internal}'), |
50 | 59 | ('gbt_macad_union(bytea,internal)', '{internal,internal}'),
|
51 |
| -('gbt_macad_same(internal,internal,internal)', '{gbtreekey16,gbtreekey16,internal}'), |
| 60 | +('gbt_macad_same(internal,internal,internal)', '{SCH.gbtreekey16,SCH.gbtreekey16,internal}'), |
52 | 61 | ('gbt_text_union(bytea,internal)', '{internal,internal}'),
|
53 |
| -('gbt_text_same(internal,internal,internal)', '{gbtreekey_var,gbtreekey_var,internal}'), |
| 62 | +('gbt_text_same(internal,internal,internal)', '{SCH.gbtreekey_var,SCH.gbtreekey_var,internal}'), |
54 | 63 | ('gbt_bytea_union(bytea,internal)', '{internal,internal}'),
|
55 |
| -('gbt_bytea_same(internal,internal,internal)', '{gbtreekey_var,gbtreekey_var,internal}'), |
| 64 | +('gbt_bytea_same(internal,internal,internal)', '{SCH.gbtreekey_var,SCH.gbtreekey_var,internal}'), |
56 | 65 | ('gbt_numeric_union(bytea,internal)', '{internal,internal}'),
|
57 |
| -('gbt_numeric_same(internal,internal,internal)', '{gbtreekey_var,gbtreekey_var,internal}'), |
| 66 | +('gbt_numeric_same(internal,internal,internal)', '{SCH.gbtreekey_var,SCH.gbtreekey_var,internal}'), |
58 | 67 | ('gbt_bit_union(bytea,internal)', '{internal,internal}'),
|
59 |
| -('gbt_bit_same(internal,internal,internal)', '{gbtreekey_var,gbtreekey_var,internal}'), |
| 68 | +('gbt_bit_same(internal,internal,internal)', '{SCH.gbtreekey_var,SCH.gbtreekey_var,internal}'), |
60 | 69 | ('gbt_inet_union(bytea,internal)', '{internal,internal}'),
|
61 |
| -('gbt_inet_same(internal,internal,internal)', '{gbtreekey16,gbtreekey16,internal}') |
62 |
| -) AS update_data (oldproc, newtypes) |
63 |
| -WHERE oid = pg_catalog.to_regprocedure(oldproc); |
| 70 | +('gbt_inet_same(internal,internal,internal)', '{SCH.gbtreekey16,SCH.gbtreekey16,internal}') |
| 71 | +) AS update_data (oldproc, newtypestext), |
| 72 | +LATERAL ( |
| 73 | + SELECT array_agg(replace(typ, 'SCH', my_schema)::regtype) as newtypes FROM unnest(newtypestext) typ |
| 74 | +) ls |
| 75 | +WHERE oid = to_regprocedure(my_schema || '.' || replace(oldproc, 'SCH', my_schema)); |
| 76 | + |
| 77 | +PERFORM pg_catalog.set_config('search_path', old_path, true); |
| 78 | +END |
| 79 | +$$; |
0 commit comments