|
|
|
@ -100,18 +100,12 @@ my %pgdump_runs = ( |
|
|
|
|
defaults_no_public => { |
|
|
|
|
database => 'regress_pg_dump_test', |
|
|
|
|
dump_cmd => [ |
|
|
|
|
'pg_dump', |
|
|
|
|
'--no-sync', |
|
|
|
|
'-f', |
|
|
|
|
"$tempdir/defaults_no_public.sql", |
|
|
|
|
'pg_dump', '--no-sync', '-f', "$tempdir/defaults_no_public.sql", |
|
|
|
|
'regress_pg_dump_test', ], }, |
|
|
|
|
defaults_no_public_clean => { |
|
|
|
|
database => 'regress_pg_dump_test', |
|
|
|
|
dump_cmd => [ |
|
|
|
|
'pg_dump', |
|
|
|
|
'--no-sync', |
|
|
|
|
'-c', |
|
|
|
|
'-f', |
|
|
|
|
'pg_dump', '--no-sync', '-c', '-f', |
|
|
|
|
"$tempdir/defaults_no_public_clean.sql", |
|
|
|
|
'regress_pg_dump_test', ], }, |
|
|
|
|
|
|
|
|
@ -465,8 +459,7 @@ my %tests = ( |
|
|
|
|
|
|
|
|
|
'ALTER COLLATION test0 OWNER TO' => { |
|
|
|
|
all_runs => 1, |
|
|
|
|
catch_all => |
|
|
|
|
'ALTER ... OWNER commands (except post-data objects)', |
|
|
|
|
catch_all => 'ALTER ... OWNER commands (except post-data objects)', |
|
|
|
|
regexp => qr/^ALTER COLLATION test0 OWNER TO .*;/m, |
|
|
|
|
collation => 1, |
|
|
|
|
like => { |
|
|
|
@ -492,8 +485,7 @@ my %tests = ( |
|
|
|
|
|
|
|
|
|
'ALTER FOREIGN DATA WRAPPER dummy OWNER TO' => { |
|
|
|
|
all_runs => 1, |
|
|
|
|
catch_all => |
|
|
|
|
'ALTER ... OWNER commands (except post-data objects)', |
|
|
|
|
catch_all => 'ALTER ... OWNER commands (except post-data objects)', |
|
|
|
|
regexp => qr/^ALTER FOREIGN DATA WRAPPER dummy OWNER TO .*;/m, |
|
|
|
|
like => { |
|
|
|
|
binary_upgrade => 1, |
|
|
|
@ -519,8 +511,7 @@ my %tests = ( |
|
|
|
|
|
|
|
|
|
'ALTER SERVER s1 OWNER TO' => { |
|
|
|
|
all_runs => 1, |
|
|
|
|
catch_all => |
|
|
|
|
'ALTER ... OWNER commands (except post-data objects)', |
|
|
|
|
catch_all => 'ALTER ... OWNER commands (except post-data objects)', |
|
|
|
|
regexp => qr/^ALTER SERVER s1 OWNER TO .*;/m, |
|
|
|
|
like => { |
|
|
|
|
binary_upgrade => 1, |
|
|
|
@ -546,8 +537,7 @@ my %tests = ( |
|
|
|
|
|
|
|
|
|
'ALTER FUNCTION dump_test.pltestlang_call_handler() OWNER TO' => { |
|
|
|
|
all_runs => 1, |
|
|
|
|
catch_all => |
|
|
|
|
'ALTER ... OWNER commands (except post-data objects)', |
|
|
|
|
catch_all => 'ALTER ... OWNER commands (except post-data objects)', |
|
|
|
|
regexp => qr/^ |
|
|
|
|
\QALTER FUNCTION dump_test.pltestlang_call_handler() \E |
|
|
|
|
\QOWNER TO \E |
|
|
|
@ -575,8 +565,7 @@ my %tests = ( |
|
|
|
|
|
|
|
|
|
'ALTER OPERATOR FAMILY dump_test.op_family OWNER TO' => { |
|
|
|
|
all_runs => 1, |
|
|
|
|
catch_all => |
|
|
|
|
'ALTER ... OWNER commands (except post-data objects)', |
|
|
|
|
catch_all => 'ALTER ... OWNER commands (except post-data objects)', |
|
|
|
|
regexp => qr/^ |
|
|
|
|
\QALTER OPERATOR FAMILY dump_test.op_family USING btree \E |
|
|
|
|
\QOWNER TO \E |
|
|
|
@ -654,8 +643,7 @@ my %tests = ( |
|
|
|
|
|
|
|
|
|
'ALTER OPERATOR CLASS dump_test.op_class OWNER TO' => { |
|
|
|
|
all_runs => 1, |
|
|
|
|
catch_all => |
|
|
|
|
'ALTER ... OWNER commands (except post-data objects)', |
|
|
|
|
catch_all => 'ALTER ... OWNER commands (except post-data objects)', |
|
|
|
|
regexp => qr/^ |
|
|
|
|
\QALTER OPERATOR CLASS dump_test.op_class USING btree \E |
|
|
|
|
\QOWNER TO \E |
|
|
|
@ -745,8 +733,7 @@ my %tests = ( |
|
|
|
|
|
|
|
|
|
'ALTER PROCEDURAL LANGUAGE pltestlang OWNER TO' => { |
|
|
|
|
all_runs => 1, |
|
|
|
|
catch_all => |
|
|
|
|
'ALTER ... OWNER commands (except post-data objects)', |
|
|
|
|
catch_all => 'ALTER ... OWNER commands (except post-data objects)', |
|
|
|
|
regexp => qr/^ALTER PROCEDURAL LANGUAGE pltestlang OWNER TO .*;/m, |
|
|
|
|
like => { |
|
|
|
|
binary_upgrade => 1, |
|
|
|
@ -771,8 +758,7 @@ my %tests = ( |
|
|
|
|
|
|
|
|
|
'ALTER SCHEMA dump_test OWNER TO' => { |
|
|
|
|
all_runs => 1, |
|
|
|
|
catch_all => |
|
|
|
|
'ALTER ... OWNER commands (except post-data objects)', |
|
|
|
|
catch_all => 'ALTER ... OWNER commands (except post-data objects)', |
|
|
|
|
regexp => qr/^ALTER SCHEMA dump_test OWNER TO .*;/m, |
|
|
|
|
like => { |
|
|
|
|
binary_upgrade => 1, |
|
|
|
@ -797,8 +783,7 @@ my %tests = ( |
|
|
|
|
|
|
|
|
|
'ALTER SCHEMA dump_test_second_schema OWNER TO' => { |
|
|
|
|
all_runs => 1, |
|
|
|
|
catch_all => |
|
|
|
|
'ALTER ... OWNER commands (except post-data objects)', |
|
|
|
|
catch_all => 'ALTER ... OWNER commands (except post-data objects)', |
|
|
|
|
regexp => qr/^ALTER SCHEMA dump_test_second_schema OWNER TO .*;/m, |
|
|
|
|
like => { |
|
|
|
|
binary_upgrade => 1, |
|
|
|
@ -1192,8 +1177,7 @@ my %tests = ( |
|
|
|
|
|
|
|
|
|
'ALTER TABLE test_table OWNER TO' => { |
|
|
|
|
all_runs => 1, |
|
|
|
|
catch_all => |
|
|
|
|
'ALTER ... OWNER commands (except post-data objects)', |
|
|
|
|
catch_all => 'ALTER ... OWNER commands (except post-data objects)', |
|
|
|
|
regexp => qr/^ALTER TABLE test_table OWNER TO .*;/m, |
|
|
|
|
like => { |
|
|
|
|
binary_upgrade => 1, |
|
|
|
@ -1250,8 +1234,7 @@ my %tests = ( |
|
|
|
|
|
|
|
|
|
'ALTER TABLE test_second_table OWNER TO' => { |
|
|
|
|
all_runs => 1, |
|
|
|
|
catch_all => |
|
|
|
|
'ALTER ... OWNER commands (except post-data objects)', |
|
|
|
|
catch_all => 'ALTER ... OWNER commands (except post-data objects)', |
|
|
|
|
regexp => qr/^ALTER TABLE test_second_table OWNER TO .*;/m, |
|
|
|
|
like => { |
|
|
|
|
binary_upgrade => 1, |
|
|
|
@ -1277,8 +1260,7 @@ my %tests = ( |
|
|
|
|
|
|
|
|
|
'ALTER TABLE test_third_table OWNER TO' => { |
|
|
|
|
all_runs => 1, |
|
|
|
|
catch_all => |
|
|
|
|
'ALTER ... OWNER commands (except post-data objects)', |
|
|
|
|
catch_all => 'ALTER ... OWNER commands (except post-data objects)', |
|
|
|
|
regexp => qr/^ALTER TABLE test_third_table OWNER TO .*;/m, |
|
|
|
|
like => { |
|
|
|
|
binary_upgrade => 1, |
|
|
|
@ -1304,8 +1286,7 @@ my %tests = ( |
|
|
|
|
|
|
|
|
|
'ALTER TABLE measurement OWNER TO' => { |
|
|
|
|
all_runs => 1, |
|
|
|
|
catch_all => |
|
|
|
|
'ALTER ... OWNER commands (except post-data objects)', |
|
|
|
|
catch_all => 'ALTER ... OWNER commands (except post-data objects)', |
|
|
|
|
regexp => qr/^ALTER TABLE measurement OWNER TO .*;/m, |
|
|
|
|
like => { |
|
|
|
|
binary_upgrade => 1, |
|
|
|
@ -1331,8 +1312,7 @@ my %tests = ( |
|
|
|
|
|
|
|
|
|
'ALTER TABLE measurement_y2006m2 OWNER TO' => { |
|
|
|
|
all_runs => 1, |
|
|
|
|
catch_all => |
|
|
|
|
'ALTER ... OWNER commands (except post-data objects)', |
|
|
|
|
catch_all => 'ALTER ... OWNER commands (except post-data objects)', |
|
|
|
|
regexp => qr/^ALTER TABLE measurement_y2006m2 OWNER TO .*;/m, |
|
|
|
|
like => { |
|
|
|
|
binary_upgrade => 1, |
|
|
|
@ -1358,8 +1338,7 @@ my %tests = ( |
|
|
|
|
|
|
|
|
|
'ALTER FOREIGN TABLE foreign_table OWNER TO' => { |
|
|
|
|
all_runs => 1, |
|
|
|
|
catch_all => |
|
|
|
|
'ALTER ... OWNER commands (except post-data objects)', |
|
|
|
|
catch_all => 'ALTER ... OWNER commands (except post-data objects)', |
|
|
|
|
regexp => qr/^ALTER FOREIGN TABLE foreign_table OWNER TO .*;/m, |
|
|
|
|
like => { |
|
|
|
|
binary_upgrade => 1, |
|
|
|
@ -1385,8 +1364,7 @@ my %tests = ( |
|
|
|
|
|
|
|
|
|
'ALTER TEXT SEARCH CONFIGURATION alt_ts_conf1 OWNER TO' => { |
|
|
|
|
all_runs => 1, |
|
|
|
|
catch_all => |
|
|
|
|
'ALTER ... OWNER commands (except post-data objects)', |
|
|
|
|
catch_all => 'ALTER ... OWNER commands (except post-data objects)', |
|
|
|
|
regexp => |
|
|
|
|
qr/^ALTER TEXT SEARCH CONFIGURATION alt_ts_conf1 OWNER TO .*;/m, |
|
|
|
|
like => { |
|
|
|
@ -1413,8 +1391,7 @@ my %tests = ( |
|
|
|
|
|
|
|
|
|
'ALTER TEXT SEARCH DICTIONARY alt_ts_dict1 OWNER TO' => { |
|
|
|
|
all_runs => 1, |
|
|
|
|
catch_all => |
|
|
|
|
'ALTER ... OWNER commands (except post-data objects)', |
|
|
|
|
catch_all => 'ALTER ... OWNER commands (except post-data objects)', |
|
|
|
|
regexp => |
|
|
|
|
qr/^ALTER TEXT SEARCH DICTIONARY alt_ts_dict1 OWNER TO .*;/m, |
|
|
|
|
like => { |
|
|
|
@ -5272,7 +5249,8 @@ qr/CREATE TRANSFORM FOR integer LANGUAGE sql \(FROM SQL WITH FUNCTION pg_catalog |
|
|
|
|
create_sql => 'DROP SCHEMA public;', |
|
|
|
|
regexp => qr/^DROP SCHEMA public;/m, |
|
|
|
|
like => {}, |
|
|
|
|
unlike => { defaults_no_public => 1, |
|
|
|
|
unlike => { |
|
|
|
|
defaults_no_public => 1, |
|
|
|
|
defaults_no_public_clean => 1, } }, |
|
|
|
|
|
|
|
|
|
'DROP SCHEMA public' => { |
|
|
|
@ -6519,7 +6497,8 @@ foreach my $run (sort keys %pgdump_runs) |
|
|
|
|
my $test_key = $run; |
|
|
|
|
my $run_db = 'postgres'; |
|
|
|
|
|
|
|
|
|
if (defined($pgdump_runs{$run}->{database})) { |
|
|
|
|
if (defined($pgdump_runs{$run}->{database})) |
|
|
|
|
{ |
|
|
|
|
$run_db = $pgdump_runs{$run}->{database}; |
|
|
|
|
} |
|
|
|
|
|
|
|
|
@ -6540,17 +6519,20 @@ foreach my $run (sort keys %pgdump_runs) |
|
|
|
|
# Then count all the tests run against each run |
|
|
|
|
foreach my $test (sort keys %tests) |
|
|
|
|
{ |
|
|
|
|
|
|
|
|
|
# postgres is the default database, if it isn't overridden |
|
|
|
|
my $test_db = 'postgres'; |
|
|
|
|
|
|
|
|
|
# Specific tests can override the database to use |
|
|
|
|
if (defined($tests{$test}->{database})) { |
|
|
|
|
if (defined($tests{$test}->{database})) |
|
|
|
|
{ |
|
|
|
|
$test_db = $tests{$test}->{database}; |
|
|
|
|
} |
|
|
|
|
|
|
|
|
|
# The database to test against needs to match the database the run is |
|
|
|
|
# for, so skip combinations where they don't match up. |
|
|
|
|
if ($run_db ne $test_db) { |
|
|
|
|
if ($run_db ne $test_db) |
|
|
|
|
{ |
|
|
|
|
next; |
|
|
|
|
} |
|
|
|
|
|
|
|
|
@ -6626,7 +6608,8 @@ foreach my $test ( |
|
|
|
|
{ |
|
|
|
|
my $test_db = 'postgres'; |
|
|
|
|
|
|
|
|
|
if (defined($tests{$test}->{database})) { |
|
|
|
|
if (defined($tests{$test}->{database})) |
|
|
|
|
{ |
|
|
|
|
$test_db = $tests{$test}->{database}; |
|
|
|
|
} |
|
|
|
|
|
|
|
|
|