mdebray/tvl-depot
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* In the build hook, if connecting to a machine fails, try the other

Browse source 
machines of the right type (if available).  This makes the build
  farm more robust to failures.
This commit is contained in:
Eelco Dolstra 2010-02-03 20:35:37 +00:00
parent f56a039775
commit d0c32dc135
3 changed files with 83 additions and 79 deletions
Download patch file Download diff file Expand all files Collapse all files

5
scripts/ssh.pm
View file

@ -12,15 +12,16 @@ sub openSSHConnection {
my ($host) = @_;
die if $sshStarted;
$sshHost = $host;
return if system("ssh $sshHost @sshOpts -O check 2> /dev/null") == 0;
return 1 if system("ssh $sshHost @sshOpts -O check 2> /dev/null") == 0;
my $tmpDir = tempdir("nix-ssh.XXXXXX", CLEANUP => 1, TMPDIR => 1)
or die "cannot create a temporary directory";
push @sshOpts, "-S", "$tmpDir/control";
system("ssh $sshHost @sshOpts -M -N -f") == 0
or die "unable to start SSH: $?";
or return 0;
$sshStarted = 1;
return 1;
}
# Tell the master SSH client to exit.