Update release notes and some test fixes.

README.md

@@ -829,6 +829,16 @@ Get information about backups in the `db` stanza.
 
 * 
 
+### v0.78: Remove CPAN dependencies, stability improvements
+
+* Removed dependency on CPAN packages for multi-threaded operation.  While it might not be a bad idea to update the threads and Thread::Queue packages, it is no longer necessary.
+
+* Added vagrant test configurations for Ubuntu 12.04 and CentOS 6.
+
+* Modified wait backoffs to use a Fibonacci sequence rather than geometric.  This will make then grow less aggresively while still giving reasonable wait times.
+
+* More options for regression tests and improved code to run in a variety of environments.
+
 ### v0.77: CentOS/RHEL 6 support and protocol improvements
 
 * Removed pg_backrest_remote and added the functionality to pg_backrest as remote command.

doc/doc.xml

@@ -788,6 +788,23 @@ Run a <id>full</id> backup on the <id>db</id> stanza.  <param>--type</param> can
 				</release-feature-bullet-list>
 			</release-version>
 
+			<release-version version="0.78" title="Remove CPAN dependencies, stability improvements">
+				<release-feature-bullet-list>
+					<release-feature>
+						<text>Removed dependency on CPAN packages for multi-threaded operation.  While it might not be a bad idea to update the threads and Thread::Queue packages, it is no longer necessary.</text>
+					</release-feature>
+					<release-feature>
+						<text>Added vagrant test configurations for Ubuntu 12.04 and CentOS 6.</text>
+					</release-feature>
+					<release-feature>
+						<text>Modified wait backoffs to use a Fibonacci sequence rather than geometric.  This will make then grow less aggresively while still giving reasonable wait times.</text>
+					</release-feature>
+					<release-feature>
+						<text>More options for regression tests and improved code to run in a variety of environments.</text>
+					</release-feature>
+				</release-feature-bullet-list>
+			</release-version>
+
 			<release-version version="0.77" title="CentOS/RHEL 6 support and protocol improvements">
 				<release-feature-bullet-list>
 					<release-feature>

test/lib/BackRestTest/BackupTest.pm

@@ -53,11 +53,8 @@ sub BackRestTestBackup_PgConnect
     # Disconnect user session
     BackRestTestBackup_PgDisconnect();
 
-    # Default
+    # Setup the wait loop
-    $iWaitSeconds = defined($iWaitSeconds) ? $iWaitSeconds : 30;
+    my $oWait = waitInit(defined($iWaitSeconds) ? $iWaitSeconds : 30);
-
-    # Record the start time
-    my $lTime = time();
 
     do
     {
@@ -69,14 +66,8 @@ sub BackRestTestBackup_PgConnect
                             {AutoCommit => 0, RaiseError => 0, PrintError => 0});
 
         return if $hDb;
-
-        # If waiting then sleep before trying again
-        if (defined($iWaitSeconds))
-        {
-            hsleep(.1);
     }
-    }
+    while (waitMore($oWait));
-    while ($lTime > time() - $iWaitSeconds);
 
     confess &log(ERROR, "unable to connect to PostgreSQL after ${iWaitSeconds} second(s):\n" .
                  $DBI::errstr, ERROR_DB_CONNECT);
@@ -1687,16 +1678,20 @@ sub BackRestTestBackup_Test
                             $strArchiveCheck .= '.gz';
                         }
 
-                        if (!$oFile->exists(PATH_BACKUP_ARCHIVE, $strArchiveCheck))
+                        my $oWait = waitInit(5);
-                        {
+                        my $bFound = false;
-                            hsleep(1);
 
-                            if (!$oFile->exists(PATH_BACKUP_ARCHIVE, $strArchiveCheck))
+                        do
+                        {
+                            $bFound = $oFile->exists(PATH_BACKUP_ARCHIVE, $strArchiveCheck);
+                        }
+                        while (!$bFound && waitMore($oWait));
+
+                        if (!$bFound)
                         {
                             confess 'unable to find ' . $strArchiveCheck;
                         }
                     }
-                    }
 
                     # !!! Need to put in tests for .backup files here
                 }

test/log/backup-archive-stop-004.log

@@ -34,6 +34,7 @@ DEBUG:     File->manifest: db:absolute:[TEST_PATH]/local/archive/db/out
 DEBUG:     Remote->new(): command = [BACKREST_BIN_PATH]/pg_backrest --no-config "--cmd-psql=[PGSQL_BIN_PATH]/psql -X %option% -h [TEST_PATH]/db" --no-fork --repo-remote-path=[TEST_PATH]/backrest --stanza=db remote, host = bogus, user = [USER-1]
 DEBUG:     Protocol->new(): blockSize = 4194304, command = [BACKREST_BIN_PATH]/pg_backrest --no-config "--cmd-psql=[PGSQL_BIN_PATH]/psql -X %option% -h [TEST_PATH]/db" --no-fork --repo-remote-path=[TEST_PATH]/backrest --stanza=db remote, compressLevel = 6, compressLevelNetwork = 3, host = bogus, isBackend = false, name = remote, user = [USER-1]
 ERROR: [124]: remote process terminated: no error captured because stderr is already closed
+ERROR: [124]: protocol version mismatch
 DEBUG:     safe exit called, terminating threads
 
 > [BACKREST_BIN_PATH]/../bin/pg_backrest --config=[TEST_PATH]/db/pg_backrest.conf --archive-max-mb=24 --no-fork --stanza=db archive-push  --backup-host=bogus [TEST_PATH]/db/common/pg_xlog/000000010000000100000003
@@ -47,6 +48,7 @@ DEBUG:     File->manifest: db:absolute:[TEST_PATH]/local/archive/db/out
 DEBUG:     Remote->new(): command = [BACKREST_BIN_PATH]/pg_backrest --no-config "--cmd-psql=[PGSQL_BIN_PATH]/psql -X %option% -h [TEST_PATH]/db" --no-fork --repo-remote-path=[TEST_PATH]/backrest --stanza=db remote, host = bogus, user = [USER-1]
 DEBUG:     Protocol->new(): blockSize = 4194304, command = [BACKREST_BIN_PATH]/pg_backrest --no-config "--cmd-psql=[PGSQL_BIN_PATH]/psql -X %option% -h [TEST_PATH]/db" --no-fork --repo-remote-path=[TEST_PATH]/backrest --stanza=db remote, compressLevel = 6, compressLevelNetwork = 3, host = bogus, isBackend = false, name = remote, user = [USER-1]
 ERROR: [124]: remote process terminated: no error captured because stderr is already closed
+ERROR: [124]: protocol version mismatch
 ERROR: local archive store max size has exceeded limit of 24MB - WAL segments will be discarded until the stop file ([TEST_PATH]/local/lock/db-archive.stop) is removed
 DEBUG:     safe exit called, terminating threads
 

test/log/backup-archive-stop-006.log

@@ -34,6 +34,7 @@ DEBUG:     File->manifest: db:absolute:[TEST_PATH]/local/archive/db/out
 DEBUG:     Remote->new(): command = [BACKREST_BIN_PATH]/pg_backrest --no-config "--cmd-psql=[PGSQL_BIN_PATH]/psql -X %option% -h [TEST_PATH]/db" --no-fork --repo-remote-path=[TEST_PATH]/backrest --stanza=db remote, host = bogus, user = [USER-1]
 DEBUG:     Protocol->new(): blockSize = 4194304, command = [BACKREST_BIN_PATH]/pg_backrest --no-config "--cmd-psql=[PGSQL_BIN_PATH]/psql -X %option% -h [TEST_PATH]/db" --no-fork --repo-remote-path=[TEST_PATH]/backrest --stanza=db remote, compressLevel = 6, compressLevelNetwork = 3, host = bogus, isBackend = false, name = remote, user = [USER-1]
 ERROR: [124]: remote process terminated: no error captured because stderr is already closed
+ERROR: [124]: protocol version mismatch
 DEBUG:     safe exit called, terminating threads
 
 > [BACKREST_BIN_PATH]/../bin/pg_backrest --config=[TEST_PATH]/db/pg_backrest.conf --archive-max-mb=24 --no-fork --stanza=db archive-push  --backup-host=bogus [TEST_PATH]/db/common/pg_xlog/000000010000000100000003
@@ -47,6 +48,7 @@ DEBUG:     File->manifest: db:absolute:[TEST_PATH]/local/archive/db/out
 DEBUG:     Remote->new(): command = [BACKREST_BIN_PATH]/pg_backrest --no-config "--cmd-psql=[PGSQL_BIN_PATH]/psql -X %option% -h [TEST_PATH]/db" --no-fork --repo-remote-path=[TEST_PATH]/backrest --stanza=db remote, host = bogus, user = [USER-1]
 DEBUG:     Protocol->new(): blockSize = 4194304, command = [BACKREST_BIN_PATH]/pg_backrest --no-config "--cmd-psql=[PGSQL_BIN_PATH]/psql -X %option% -h [TEST_PATH]/db" --no-fork --repo-remote-path=[TEST_PATH]/backrest --stanza=db remote, compressLevel = 6, compressLevelNetwork = 3, host = bogus, isBackend = false, name = remote, user = [USER-1]
 ERROR: [124]: remote process terminated: no error captured because stderr is already closed
+ERROR: [124]: protocol version mismatch
 ERROR: local archive store max size has exceeded limit of 24MB - WAL segments will be discarded until the stop file ([TEST_PATH]/local/lock/db-archive.stop) is removed
 DEBUG:     safe exit called, terminating threads