Commit 189c9cf4 authored by Leigh B. Stoller's avatar Leigh B. Stoller

Add failure status to sliver/slice status.

parent b9871e67
......@@ -36,7 +36,8 @@ use GeniHRN;
use libtestbed qw(SENDMAIL);
use emutil;
# Hate to import all this crap; need a utility library.
use libdb qw(TBGetSiteVar EXPTSTATE_SWAPPED EXPTSTATE_ACTIVE TBOPSPID);
use libdb qw(TBGetSiteVar EXPTSTATE_SWAPPED EXPTSTATE_ACTIVE TBOPSPID
TBDB_NODESTATE_TBFAILED);
use User;
use Node;
use OSinfo;
......@@ -2850,6 +2851,11 @@ sub SliceStatus($)
$details{$node_uuid} = "ready";
$detailsNew{$hrn} = "ready";
}
elsif ($node->eventstate() eq TBDB_NODESTATE_TBFAILED()) {
$details{$node_uuid} = "failed";
$detailsNew{$hrn} = "failed";
$summary = "notready";
}
else {
$details{$node_uuid} = "notready";
$detailsNew{$hrn} = "notready";
......@@ -3054,6 +3060,11 @@ sub SliverStatus($)
$details{$node_uuid} = "ready";
$detailsNew{$hrn} = "ready";
}
elsif ($node->eventstate() eq TBDB_NODESTATE_TBFAILED()) {
$details{$node_uuid} = "failed";
$detailsNew{$hrn} = "failed";
$summary = "notready";
}
else {
$details{$node_uuid} = "notready";
$detailsNew{$hrn} = "notready";
......
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