Commit ee9f9a2e authored by Leigh Stoller's avatar Leigh Stoller

Watch for an expired slice credential, and make up a new one.

parent 7e3a60ff
......@@ -62,8 +62,19 @@ sub RegisterExperiment($$)
my ($experiment, $user) = @_;
my $slice = GeniSlice->LookupByExperiment($experiment);
return 0
if (defined($slice));
#
# If we have a slice for it, check to see if its expired. We just
# go ahead and renew it.
#
if (defined($slice)) {
if ($slice->IsExpired() &&
$slice->SetExpiration(time() + (24 * 3600 * 30))) {
print STDERR "Could not reset slice expiration\n";
return -1;
}
return 0;
}
#
# Load the SA cert to act as caller context.
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment