Changeset 13251 for trunk/Nebulous/t/Test/Nebulous.pm

Timestamp:

May 4, 2007, 1:36:46 PM (19 years ago)

Author:

jhoblitt

Message:

rework the getmountedvol() stored procedure to attempt to work around what appears to be some nasty transacational isolation leak throught that was causing getmountedvol() to randomly hang when nebdiskd changed the mount table.

File:

• trunk/Nebulous/t/Test/Nebulous.pm (modified) (2 diffs)

trunk/Nebulous/t/Test/Nebulous.pm

@@ -1 +1 @@
 # Copyright (C) 2004  Joshua Hoblitt
 #
-# $Id: Nebulous.pm,v 1.14 2007-05-02 20:53:42 jhoblitt Exp $
+# $Id: Nebulous.pm,v 1.15 2007-05-04 23:36:46 jhoblitt Exp $
 
 package Test::Nebulous;
@@ -66 +66 @@
     $dbh->do(qq{ INSERT INTO volume (vol_id, name, path, allocate, available) VALUES (6, 'node06', ?, TRUE, FALSE) }, undef, $dir4);
     $dbh->do(qq{ INSERT INTO mount VALUES (?, 10e10, 10e7) }, undef, $dir6);
+
+    $dbh->do(qq{ call getmountedvol() });
 }