Changeset 1217 in ProjectBuilder for devel/pb

Timestamp:

Feb 24, 2011, 10:22:17 AM (14 years ago)

Author:

Bruno Cornec

Message:

• *tmout param is optional and now handled and documented as such

File:

• devel/pb/bin/pb (modified) (4 diffs)

devel/pb/bin/pb

@@ -1615 +1615 @@
     }
     if ($cmt =~ /^(V|R)M/) {
-        ($vtmout) = pb_conf_get($tmout);
+        ($vtmout) = pb_conf_get_if($tmout);
     }
     my $remhost = $sshhost->{$ENV{'PBPROJ'}};
@@ -1623 +1623 @@
         $remhost = pb_distro_get_param($pbos,$sshhost);
     }
-    pb_log(2,"ssh: ".Dumper(($remhost,$sshlogin,$remdir,$sshport,$vtmout,$vepath,$rbsconf))."\n");
+    pb_log(2,"ssh: ".Dumper(($remhost,$sshlogin,$remdir,$sshport,$vepath,$rbsconf))."\n");
+    pb_log(2,"ssh: ".Dumper($vtmout)."\n") if (defined $vtmout);
 
     my $mac;
@@ -1844 +1845 @@
     $tdir =~ s|\$ENV.+\}/||;
 
-    my $tm = undef;
+    my $tm = "";
     if ($cmt =~ /^(V|R)M/) {
-        $tm = $vtmout->{$v};
+        $tm = "sleep $vtmout->{$v}" if (defined $vtmout);
     }
 
@@ -2000 +2001 @@
             $hoption = "" ;
         }
-        pb_system("$shcmd \"sudo $hpath $hoption \"; sleep $tm ; echo \'if [ -d /proc/$vmpid ]; then kill -9 $vmpid; fi \' | bash ; sleep 10","VM $v halt (pid $vmpid)");
+        pb_system("$shcmd \"sudo $hpath $hoption \"; $tm ; echo \'if [ -d /proc/$vmpid ]; then kill -9 $vmpid; fi \' | bash ; sleep 10","VM $v halt (pid $vmpid)");
     }
     if (($cmt =~ /^VE/) && ($snapme != 0)) {