diff --git a/clientside/tmcc/common/rc.linktest b/clientside/tmcc/common/rc.linktest index f05598d5d077c7711272333da6de95c3b7cf499c..af073c120ca5b6f7e8778b46833270b92048570a 100755 --- a/clientside/tmcc/common/rc.linktest +++ b/clientside/tmcc/common/rc.linktest @@ -1,6 +1,6 @@ #!/usr/bin/perl -w # -# Copyright (c) 2000-2013 University of Utah and the Flux Group. +# Copyright (c) 2000-2016 University of Utah and the Flux Group. # # {{{EMULAB-LICENSE # @@ -104,14 +104,14 @@ my $server = getlocalevserver(); my $args = "-s $server -l $logfile -i $pidfile -k $keyfile -u $swapper"; # -# Only wait for 60 seconds, to avoid pointless wait forever. +# Only wait for a couple of minutes, to avoid pointless wait forever. # We will report an error. # my $childpid = fork(); if ($childpid) { my $timedout = 0; local $SIG{ALRM} = sub { kill("TERM", $childpid); $timedout = 1; }; - alarm 90; + alarm 120; waitpid($childpid, 0); alarm 0; @@ -120,7 +120,7 @@ if ($childpid) { # if ($? || $timedout) { print STDERR "*** ERROR: linktest daemon failed to start. "; - print STDERR ($? ? "Status: $?" : "Timed out.") . "\n"; + print STDERR ($timedout ? "Timed out" : "Status: $?") . ".\n"; exit(-1); } exit(0);