399 lines
11 KiB
Plaintext
399 lines
11 KiB
Plaintext
--
|
|
-- MISC
|
|
--
|
|
-- directory paths and dlsuffix are passed to us in environment variables
|
|
\getenv abs_srcdir PG_ABS_SRCDIR
|
|
\getenv abs_builddir PG_ABS_BUILDDIR
|
|
\getenv libdir PG_LIBDIR
|
|
\getenv dlsuffix PG_DLSUFFIX
|
|
\set regresslib :libdir '/regress' :dlsuffix
|
|
CREATE FUNCTION overpaid(emp)
|
|
RETURNS bool
|
|
AS :'regresslib'
|
|
LANGUAGE C STRICT;
|
|
CREATE FUNCTION reverse_name(name)
|
|
RETURNS name
|
|
AS :'regresslib'
|
|
LANGUAGE C STRICT;
|
|
--
|
|
-- BTREE
|
|
--
|
|
UPDATE onek
|
|
SET unique1 = onek.unique1 + 1;
|
|
UPDATE onek
|
|
SET unique1 = onek.unique1 - 1;
|
|
--
|
|
-- BTREE partial
|
|
--
|
|
-- UPDATE onek2
|
|
-- SET unique1 = onek2.unique1 + 1;
|
|
--UPDATE onek2
|
|
-- SET unique1 = onek2.unique1 - 1;
|
|
--
|
|
-- BTREE shutting out non-functional updates
|
|
--
|
|
-- the following two tests seem to take a long time on some
|
|
-- systems. This non-func update stuff needs to be examined
|
|
-- more closely. - jolly (2/22/96)
|
|
--
|
|
SELECT two, stringu1, ten, string4
|
|
INTO TABLE tmp
|
|
FROM onek;
|
|
UPDATE tmp
|
|
SET stringu1 = reverse_name(onek.stringu1)
|
|
FROM onek
|
|
WHERE onek.stringu1 = 'JBAAAA' and
|
|
onek.stringu1 = tmp.stringu1;
|
|
UPDATE tmp
|
|
SET stringu1 = reverse_name(onek2.stringu1)
|
|
FROM onek2
|
|
WHERE onek2.stringu1 = 'JCAAAA' and
|
|
onek2.stringu1 = tmp.stringu1;
|
|
DROP TABLE tmp;
|
|
--UPDATE person*
|
|
-- SET age = age + 1;
|
|
--UPDATE person*
|
|
-- SET age = age + 3
|
|
-- WHERE name = 'linda';
|
|
--
|
|
-- copy
|
|
--
|
|
\set filename :abs_builddir '/results/onek.data'
|
|
COPY onek TO :'filename';
|
|
CREATE TEMP TABLE onek_copy (LIKE onek);
|
|
COPY onek_copy FROM :'filename';
|
|
SELECT * FROM onek EXCEPT ALL SELECT * FROM onek_copy;
|
|
unique1 | unique2 | two | four | ten | twenty | hundred | thousand | twothousand | fivethous | tenthous | odd | even | stringu1 | stringu2 | string4
|
|
---------+---------+-----+------+-----+--------+---------+----------+-------------+-----------+----------+-----+------+----------+----------+---------
|
|
(0 rows)
|
|
|
|
SELECT * FROM onek_copy EXCEPT ALL SELECT * FROM onek;
|
|
unique1 | unique2 | two | four | ten | twenty | hundred | thousand | twothousand | fivethous | tenthous | odd | even | stringu1 | stringu2 | string4
|
|
---------+---------+-----+------+-----+--------+---------+----------+-------------+-----------+----------+-----+------+----------+----------+---------
|
|
(0 rows)
|
|
|
|
\set filename :abs_builddir '/results/stud_emp.data'
|
|
COPY BINARY stud_emp TO :'filename';
|
|
CREATE TEMP TABLE stud_emp_copy (LIKE stud_emp);
|
|
COPY BINARY stud_emp_copy FROM :'filename';
|
|
SELECT * FROM stud_emp_copy;
|
|
name | age | location | salary | manager | gpa | percent
|
|
-------+-----+------------+--------+---------+-----+---------
|
|
jeff | 23 | (8,7.7) | 600 | sharon | 3.5 |
|
|
cim | 30 | (10.5,4.7) | 400 | | 3.4 |
|
|
linda | 19 | (0.9,6.1) | 100 | | 2.9 |
|
|
(3 rows)
|
|
|
|
--
|
|
-- test data for postquel functions
|
|
--
|
|
CREATE TABLE hobbies_r (
|
|
name text,
|
|
person text
|
|
);
|
|
CREATE TABLE equipment_r (
|
|
name text,
|
|
hobby text
|
|
);
|
|
INSERT INTO hobbies_r (name, person)
|
|
SELECT 'posthacking', p.name
|
|
FROM person* p
|
|
WHERE p.name = 'mike' or p.name = 'jeff';
|
|
INSERT INTO hobbies_r (name, person)
|
|
SELECT 'basketball', p.name
|
|
FROM person p
|
|
WHERE p.name = 'joe' or p.name = 'sally';
|
|
INSERT INTO hobbies_r (name) VALUES ('skywalking');
|
|
INSERT INTO equipment_r (name, hobby) VALUES ('advil', 'posthacking');
|
|
INSERT INTO equipment_r (name, hobby) VALUES ('peet''s coffee', 'posthacking');
|
|
INSERT INTO equipment_r (name, hobby) VALUES ('hightops', 'basketball');
|
|
INSERT INTO equipment_r (name, hobby) VALUES ('guts', 'skywalking');
|
|
--
|
|
-- postquel functions
|
|
--
|
|
CREATE FUNCTION hobbies(person)
|
|
RETURNS setof hobbies_r
|
|
AS 'select * from hobbies_r where person = $1.name'
|
|
LANGUAGE SQL;
|
|
CREATE FUNCTION hobby_construct(text, text)
|
|
RETURNS hobbies_r
|
|
AS 'select $1 as name, $2 as hobby'
|
|
LANGUAGE SQL;
|
|
CREATE FUNCTION hobby_construct_named(name text, hobby text)
|
|
RETURNS hobbies_r
|
|
AS 'select name, hobby'
|
|
LANGUAGE SQL;
|
|
CREATE FUNCTION hobbies_by_name(hobbies_r.name%TYPE)
|
|
RETURNS hobbies_r.person%TYPE
|
|
AS 'select person from hobbies_r where name = $1'
|
|
LANGUAGE SQL;
|
|
NOTICE: type reference hobbies_r.name%TYPE converted to text
|
|
NOTICE: type reference hobbies_r.person%TYPE converted to text
|
|
CREATE FUNCTION equipment(hobbies_r)
|
|
RETURNS setof equipment_r
|
|
AS 'select * from equipment_r where hobby = $1.name'
|
|
LANGUAGE SQL;
|
|
CREATE FUNCTION equipment_named(hobby hobbies_r)
|
|
RETURNS setof equipment_r
|
|
AS 'select * from equipment_r where equipment_r.hobby = equipment_named.hobby.name'
|
|
LANGUAGE SQL;
|
|
CREATE FUNCTION equipment_named_ambiguous_1a(hobby hobbies_r)
|
|
RETURNS setof equipment_r
|
|
AS 'select * from equipment_r where hobby = equipment_named_ambiguous_1a.hobby.name'
|
|
LANGUAGE SQL;
|
|
CREATE FUNCTION equipment_named_ambiguous_1b(hobby hobbies_r)
|
|
RETURNS setof equipment_r
|
|
AS 'select * from equipment_r where equipment_r.hobby = hobby.name'
|
|
LANGUAGE SQL;
|
|
CREATE FUNCTION equipment_named_ambiguous_1c(hobby hobbies_r)
|
|
RETURNS setof equipment_r
|
|
AS 'select * from equipment_r where hobby = hobby.name'
|
|
LANGUAGE SQL;
|
|
CREATE FUNCTION equipment_named_ambiguous_2a(hobby text)
|
|
RETURNS setof equipment_r
|
|
AS 'select * from equipment_r where hobby = equipment_named_ambiguous_2a.hobby'
|
|
LANGUAGE SQL;
|
|
CREATE FUNCTION equipment_named_ambiguous_2b(hobby text)
|
|
RETURNS setof equipment_r
|
|
AS 'select * from equipment_r where equipment_r.hobby = hobby'
|
|
LANGUAGE SQL;
|
|
--
|
|
-- mike does post_hacking,
|
|
-- joe and sally play basketball, and
|
|
-- everyone else does nothing.
|
|
--
|
|
SELECT p.name, name(p.hobbies) FROM ONLY person p;
|
|
name | name
|
|
-------+-------------
|
|
mike | posthacking
|
|
joe | basketball
|
|
sally | basketball
|
|
(3 rows)
|
|
|
|
--
|
|
-- as above, but jeff also does post_hacking.
|
|
--
|
|
SELECT p.name, name(p.hobbies) FROM person* p;
|
|
name | name
|
|
-------+-------------
|
|
mike | posthacking
|
|
joe | basketball
|
|
sally | basketball
|
|
jeff | posthacking
|
|
(4 rows)
|
|
|
|
--
|
|
-- the next two queries demonstrate how functions generate bogus duplicates.
|
|
-- this is a "feature" ..
|
|
--
|
|
SELECT DISTINCT hobbies_r.name, name(hobbies_r.equipment) FROM hobbies_r
|
|
ORDER BY 1,2;
|
|
name | name
|
|
-------------+---------------
|
|
basketball | hightops
|
|
posthacking | advil
|
|
posthacking | peet's coffee
|
|
skywalking | guts
|
|
(4 rows)
|
|
|
|
SELECT hobbies_r.name, (hobbies_r.equipment).name FROM hobbies_r;
|
|
name | name
|
|
-------------+---------------
|
|
posthacking | advil
|
|
posthacking | peet's coffee
|
|
posthacking | advil
|
|
posthacking | peet's coffee
|
|
basketball | hightops
|
|
basketball | hightops
|
|
skywalking | guts
|
|
(7 rows)
|
|
|
|
--
|
|
-- mike needs advil and peet's coffee,
|
|
-- joe and sally need hightops, and
|
|
-- everyone else is fine.
|
|
--
|
|
SELECT p.name, name(p.hobbies), name(equipment(p.hobbies)) FROM ONLY person p;
|
|
name | name | name
|
|
-------+-------------+---------------
|
|
mike | posthacking | advil
|
|
mike | posthacking | peet's coffee
|
|
joe | basketball | hightops
|
|
sally | basketball | hightops
|
|
(4 rows)
|
|
|
|
--
|
|
-- as above, but jeff needs advil and peet's coffee as well.
|
|
--
|
|
SELECT p.name, name(p.hobbies), name(equipment(p.hobbies)) FROM person* p;
|
|
name | name | name
|
|
-------+-------------+---------------
|
|
mike | posthacking | advil
|
|
mike | posthacking | peet's coffee
|
|
joe | basketball | hightops
|
|
sally | basketball | hightops
|
|
jeff | posthacking | advil
|
|
jeff | posthacking | peet's coffee
|
|
(6 rows)
|
|
|
|
--
|
|
-- just like the last two, but make sure that the target list fixup and
|
|
-- unflattening is being done correctly.
|
|
--
|
|
SELECT name(equipment(p.hobbies)), p.name, name(p.hobbies) FROM ONLY person p;
|
|
name | name | name
|
|
---------------+-------+-------------
|
|
advil | mike | posthacking
|
|
peet's coffee | mike | posthacking
|
|
hightops | joe | basketball
|
|
hightops | sally | basketball
|
|
(4 rows)
|
|
|
|
SELECT (p.hobbies).equipment.name, p.name, name(p.hobbies) FROM person* p;
|
|
name | name | name
|
|
---------------+-------+-------------
|
|
advil | mike | posthacking
|
|
peet's coffee | mike | posthacking
|
|
hightops | joe | basketball
|
|
hightops | sally | basketball
|
|
advil | jeff | posthacking
|
|
peet's coffee | jeff | posthacking
|
|
(6 rows)
|
|
|
|
SELECT (p.hobbies).equipment.name, name(p.hobbies), p.name FROM ONLY person p;
|
|
name | name | name
|
|
---------------+-------------+-------
|
|
advil | posthacking | mike
|
|
peet's coffee | posthacking | mike
|
|
hightops | basketball | joe
|
|
hightops | basketball | sally
|
|
(4 rows)
|
|
|
|
SELECT name(equipment(p.hobbies)), name(p.hobbies), p.name FROM person* p;
|
|
name | name | name
|
|
---------------+-------------+-------
|
|
advil | posthacking | mike
|
|
peet's coffee | posthacking | mike
|
|
hightops | basketball | joe
|
|
hightops | basketball | sally
|
|
advil | posthacking | jeff
|
|
peet's coffee | posthacking | jeff
|
|
(6 rows)
|
|
|
|
SELECT name(equipment(hobby_construct(text 'skywalking', text 'mer')));
|
|
name
|
|
------
|
|
guts
|
|
(1 row)
|
|
|
|
SELECT name(equipment(hobby_construct_named(text 'skywalking', text 'mer')));
|
|
name
|
|
------
|
|
guts
|
|
(1 row)
|
|
|
|
SELECT name(equipment_named(hobby_construct_named(text 'skywalking', text 'mer')));
|
|
name
|
|
------
|
|
guts
|
|
(1 row)
|
|
|
|
SELECT name(equipment_named_ambiguous_1a(hobby_construct_named(text 'skywalking', text 'mer')));
|
|
name
|
|
------
|
|
guts
|
|
(1 row)
|
|
|
|
SELECT name(equipment_named_ambiguous_1b(hobby_construct_named(text 'skywalking', text 'mer')));
|
|
name
|
|
------
|
|
guts
|
|
(1 row)
|
|
|
|
SELECT name(equipment_named_ambiguous_1c(hobby_construct_named(text 'skywalking', text 'mer')));
|
|
name
|
|
------
|
|
guts
|
|
(1 row)
|
|
|
|
SELECT name(equipment_named_ambiguous_2a(text 'skywalking'));
|
|
name
|
|
------
|
|
guts
|
|
(1 row)
|
|
|
|
SELECT name(equipment_named_ambiguous_2b(text 'skywalking'));
|
|
name
|
|
---------------
|
|
advil
|
|
peet's coffee
|
|
hightops
|
|
guts
|
|
(4 rows)
|
|
|
|
SELECT hobbies_by_name('basketball');
|
|
hobbies_by_name
|
|
-----------------
|
|
joe
|
|
(1 row)
|
|
|
|
SELECT name, overpaid(emp.*) FROM emp;
|
|
name | overpaid
|
|
--------+----------
|
|
sharon | t
|
|
sam | t
|
|
bill | t
|
|
jeff | f
|
|
cim | f
|
|
linda | f
|
|
(6 rows)
|
|
|
|
--
|
|
-- Try a few cases with SQL-spec row constructor expressions
|
|
--
|
|
SELECT * FROM equipment(ROW('skywalking', 'mer'));
|
|
name | hobby
|
|
------+------------
|
|
guts | skywalking
|
|
(1 row)
|
|
|
|
SELECT name(equipment(ROW('skywalking', 'mer')));
|
|
name
|
|
------
|
|
guts
|
|
(1 row)
|
|
|
|
SELECT *, name(equipment(h.*)) FROM hobbies_r h;
|
|
name | person | name
|
|
-------------+--------+---------------
|
|
posthacking | mike | advil
|
|
posthacking | mike | peet's coffee
|
|
posthacking | jeff | advil
|
|
posthacking | jeff | peet's coffee
|
|
basketball | joe | hightops
|
|
basketball | sally | hightops
|
|
skywalking | | guts
|
|
(7 rows)
|
|
|
|
SELECT *, (equipment(CAST((h.*) AS hobbies_r))).name FROM hobbies_r h;
|
|
name | person | name
|
|
-------------+--------+---------------
|
|
posthacking | mike | advil
|
|
posthacking | mike | peet's coffee
|
|
posthacking | jeff | advil
|
|
posthacking | jeff | peet's coffee
|
|
basketball | joe | hightops
|
|
basketball | sally | hightops
|
|
skywalking | | guts
|
|
(7 rows)
|
|
|
|
--
|
|
-- functional joins
|
|
--
|
|
--
|
|
-- instance rules
|
|
--
|
|
--
|
|
-- rewrite rules
|
|
--
|