9a34123bc3
This avoids additional translatable strings for each distinct type, as well as making our quoting style around type names more consistent (namely, that we don't quote type names). This continues what started as f402b9950120. Discussion: https://postgr.es/m/20160401170642.GA57509@alvherre.pgsql
76 lines
3.8 KiB
Plaintext
76 lines
3.8 KiB
Plaintext
-- general regression test for transforms
|
|
DROP EXTENSION IF EXISTS hstore CASCADE;
|
|
NOTICE: extension "hstore" does not exist, skipping
|
|
DROP EXTENSION IF EXISTS plperl CASCADE;
|
|
NOTICE: extension "plperl" does not exist, skipping
|
|
DROP EXTENSION IF EXISTS hstore_plperl CASCADE;
|
|
NOTICE: extension "hstore_plperl" does not exist, skipping
|
|
CREATE EXTENSION hstore;
|
|
CREATE EXTENSION plperl;
|
|
CREATE FUNCTION hstore_to_plperl(val internal) RETURNS internal
|
|
LANGUAGE C STRICT IMMUTABLE
|
|
AS '$libdir/hstore_plperl';
|
|
CREATE FUNCTION plperl_to_hstore(val internal) RETURNS hstore
|
|
LANGUAGE C STRICT IMMUTABLE
|
|
AS '$libdir/hstore_plperl';
|
|
CREATE TRANSFORM FOR foo LANGUAGE plperl (FROM SQL WITH FUNCTION hstore_to_plperl(internal), TO SQL WITH FUNCTION plperl_to_hstore(internal)); -- fail
|
|
ERROR: type "foo" does not exist
|
|
CREATE TRANSFORM FOR hstore LANGUAGE foo (FROM SQL WITH FUNCTION hstore_to_plperl(internal), TO SQL WITH FUNCTION plperl_to_hstore(internal)); -- fail
|
|
ERROR: language "foo" does not exist
|
|
CREATE TRANSFORM FOR hstore LANGUAGE plperl (FROM SQL WITH FUNCTION hstore_out(hstore), TO SQL WITH FUNCTION plperl_to_hstore(internal)); -- fail
|
|
ERROR: return data type of FROM SQL function must be internal
|
|
CREATE TRANSFORM FOR hstore LANGUAGE plperl (FROM SQL WITH FUNCTION internal_in(cstring), TO SQL WITH FUNCTION plperl_to_hstore(internal)); -- fail
|
|
ERROR: first argument of transform function must be type internal
|
|
CREATE TRANSFORM FOR hstore LANGUAGE plperl (FROM SQL WITH FUNCTION hstore_to_plperl(internal), TO SQL WITH FUNCTION plperl_to_hstore(internal)); -- ok
|
|
CREATE TRANSFORM FOR hstore LANGUAGE plperl (FROM SQL WITH FUNCTION hstore_to_plperl(internal), TO SQL WITH FUNCTION plperl_to_hstore(internal)); -- fail
|
|
ERROR: transform for type hstore language "plperl" already exists
|
|
CREATE OR REPLACE TRANSFORM FOR hstore LANGUAGE plperl (FROM SQL WITH FUNCTION hstore_to_plperl(internal), TO SQL WITH FUNCTION plperl_to_hstore(internal)); -- ok
|
|
CREATE OR REPLACE TRANSFORM FOR hstore LANGUAGE plperl (FROM SQL WITH FUNCTION hstore_to_plperl(internal)); -- ok
|
|
CREATE OR REPLACE TRANSFORM FOR hstore LANGUAGE plperl (TO SQL WITH FUNCTION plperl_to_hstore(internal)); -- ok
|
|
COMMENT ON TRANSFORM FOR hstore LANGUAGE plperl IS 'test';
|
|
DROP TRANSFORM IF EXISTS FOR fake_type LANGUAGE plperl;
|
|
NOTICE: type "fake_type" does not exist, skipping
|
|
DROP TRANSFORM IF EXISTS FOR hstore LANGUAGE fake_lang;
|
|
NOTICE: transform for type hstore language "fake_lang" does not exist, skipping
|
|
DROP TRANSFORM FOR foo LANGUAGE plperl;
|
|
ERROR: type "foo" does not exist
|
|
DROP TRANSFORM FOR hstore LANGUAGE foo;
|
|
ERROR: language "foo" does not exist
|
|
DROP TRANSFORM FOR hstore LANGUAGE plperl;
|
|
DROP TRANSFORM IF EXISTS FOR hstore LANGUAGE plperl;
|
|
NOTICE: transform for type hstore language "plperl" does not exist, skipping
|
|
DROP FUNCTION hstore_to_plperl(val internal);
|
|
DROP FUNCTION plperl_to_hstore(val internal);
|
|
CREATE EXTENSION hstore_plperl;
|
|
\dx+ hstore_plperl
|
|
Objects in extension "hstore_plperl"
|
|
Object Description
|
|
--------------------------------------
|
|
function hstore_to_plperl(internal)
|
|
function plperl_to_hstore(internal)
|
|
transform for hstore language plperl
|
|
(3 rows)
|
|
|
|
ALTER EXTENSION hstore_plperl DROP TRANSFORM FOR hstore LANGUAGE plperl;
|
|
\dx+ hstore_plperl
|
|
Objects in extension "hstore_plperl"
|
|
Object Description
|
|
-------------------------------------
|
|
function hstore_to_plperl(internal)
|
|
function plperl_to_hstore(internal)
|
|
(2 rows)
|
|
|
|
ALTER EXTENSION hstore_plperl ADD TRANSFORM FOR hstore LANGUAGE plperl;
|
|
\dx+ hstore_plperl
|
|
Objects in extension "hstore_plperl"
|
|
Object Description
|
|
--------------------------------------
|
|
function hstore_to_plperl(internal)
|
|
function plperl_to_hstore(internal)
|
|
transform for hstore language plperl
|
|
(3 rows)
|
|
|
|
DROP EXTENSION hstore CASCADE;
|
|
NOTICE: drop cascades to extension hstore_plperl
|
|
DROP EXTENSION plperl CASCADE;
|