pg_dump: Skip COLLATION-related regression tests
authorStephen Frost <[email protected]>
Sun, 19 Mar 2017 20:56:14 +0000 (16:56 -0400)
committerStephen Frost <[email protected]>
Sun, 19 Mar 2017 20:56:14 +0000 (16:56 -0400)
Not every platform supports non-default collations, as pointed out by
the buildfarm, so skip collation-related regression tests in pg_dump
when they aren't supported.

src/bin/pg_dump/t/002_pg_dump.pl

index 3cac4a9ae07ca8d9eb6db1c93778ddcc7c8d4564..a4e260a4e48d509f342650d943ac68086a9cc7dc 100644 (file)
@@ -427,6 +427,7 @@ my %tests = (
        catch_all =>
          'ALTER ... OWNER commands (except LARGE OBJECTs and PUBLICATIONs)',
        regexp => qr/^ALTER COLLATION test0 OWNER TO .*;/m,
+       collation => 1,
        like   => {
            binary_upgrade           => 1,
            clean                    => 1,
@@ -1707,6 +1708,7 @@ my %tests = (
        create_sql   => 'COMMENT ON COLLATION test0
                       IS \'comment on test0 collation\';',
        regexp => qr/^COMMENT ON COLLATION test0 IS 'comment on test0 collation';/m,
+       collation => 1,
        like   => {
            binary_upgrade           => 1,
            clean                    => 1,
@@ -2423,6 +2425,7 @@ qr/^\QINSERT INTO test_fifth_table (col1, col2, col3, col4, col5) VALUES (NULL,
        regexp =>
          qr/^
          \QCREATE COLLATION test0 (lc_collate = 'C', lc_ctype = 'C');\E/xm,
+       collation => 1,
        like => {
            binary_upgrade           => 1,
            clean                    => 1,
@@ -6090,6 +6093,17 @@ $node->start;
 
 my $port = $node->port;
 
+# We need to see if this system supports CREATE COLLATION or not
+# If it doesn't then we will skip all the COLLATION-related tests.
+my $collation_support = 0;
+my $collation_check_stderr;
+$node->psql('postgres',"CREATE COLLATION testing FROM \"C\"; DROP COLLATION testing;", on_error_stop => 0, stderr => \$collation_check_stderr);
+
+if ($collation_check_stderr !~ /ERROR: /)
+{
+   $collation_support = 1;
+}
+
 # Start with number of command_fails_like()*2 tests below (each
 # command_fails_like is actually 2 tests)
 my $num_tests = 12;
@@ -6115,6 +6129,11 @@ foreach my $run (sort keys %pgdump_runs)
    # Then count all the tests run against each run
    foreach my $test (sort keys %tests)
    {
+       # Skip any collation-related commands if there is no collation support
+       if (!$collation_support && defined($tests{$test}->{collation})) {
+           next;
+       }
+
        if ($tests{$test}->{like}->{$test_key})
        {
            $num_tests++;
@@ -6181,6 +6200,11 @@ foreach my $test (
 {
    if ($tests{$test}->{create_sql})
    {
+       # Skip any collation-related commands if there is no collation support
+       if (!$collation_support && defined($tests{$test}->{collation})) {
+           next;
+       }
+
        $create_sql .= $tests{$test}->{create_sql};
    }
 }
@@ -6258,6 +6282,11 @@ foreach my $run (sort keys %pgdump_runs)
 
    foreach my $test (sort keys %tests)
    {
+       # Skip any collation-related commands if there is no collation support
+       if (!$collation_support && defined($tests{$test}->{collation})) {
+           next;
+       }
+
        if ($tests{$test}->{like}->{$test_key})
        {
            like($output_file, $tests{$test}->{regexp}, "$run: dumps $test");