todo: Suggestion for UUIDs in /etc/fstab (thanks Joshua Daniel Franklin).

[libguestfs.git] / regressions / test-launch-race.pl

diff --git a/regressions/test-launch-race.pl b/regressions/test-launch-race.pl
index 941eff6..5a660ce 100755 (executable)
--- a/regressions/test-launch-race.pl
+++ b/regressions/test-launch-race.pl
@@ -13,7 +13,7 @@
 #
 # You should have received a copy of the GNU General Public License
 # along with this program; if not, write to the Free Software
-# Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
 
 # Test that 2 simultaneous launches in a clean cache directory will both succeed
 
@@ -25,6 +25,9 @@ use POSIX;
 
 use Sys::Guestfs;
 
+# Allow this test to be skipped.
+exit 0 if $ENV{SKIP_TEST_LAUNCH_RACE_PL};
+
 # Use a temporary TMPDIR to ensure it's clean
 my $tmpdir = tempdir (CLEANUP => 1);
 $ENV{TMPDIR} = $tmpdir;
@@ -50,11 +53,15 @@ $g = undef;
 waitpid ($pid, 0) or die ("waitpid: $!");
 die ("child failed") unless ($? == 0);
 
-# Check that only 1 temporary cache directory was created
+# Check that only 1 temporary cache directory was created.
+#
+# No cache directory is OK too (as long as the appliance launched w/o
+# failure) because it indicates we're not using supermin.
 my $dh;
 opendir ($dh, $tmpdir) or die ("Failed to open $tmpdir: $!");
 my @cachedirs = grep { /^guestfs\./ } readdir ($dh);
 closedir ($dh) or die ("Failed to close $tmpdir: $!");
 
 my $ncachedirs = scalar(@cachedirs);
-die ("Expected 1 cachedir, found $ncachedirs") unless ($ncachedirs == 1);
+die "Expected 0 or 1 cachedir, found $ncachedirs"
+    unless $ncachedirs == 0 || $ncachedirs == 1;