diff --git a/htools/Ganeti/HTools/Node.hs b/htools/Ganeti/HTools/Node.hs index c117a6ae18c0f334638da04b5507e7b4aae64b23..41f2bf55757498e27bba80c45876c056f47e740e 100644 --- a/htools/Ganeti/HTools/Node.hs +++ b/htools/Ganeti/HTools/Node.hs @@ -547,6 +547,9 @@ showField t field = "ptags" -> intercalate "," . map (uncurry (printf "%s=%d")) . Map.toList $ pTags t "peermap" -> show $ peers t + "spindle_count" -> show $ spindleCount t + "hi_spindles" -> show $ hiSpindles t + "inst_spindles" -> show $ instSpindles t _ -> T.unknownField where T.DynUtil { T.cpuWeight = uC, T.memWeight = uM, @@ -584,6 +587,9 @@ showHeader field = "nload" -> ("lNet", True) "ptags" -> ("PrimaryTags", False) "peermap" -> ("PeerMap", False) + "spindle_count" -> ("NodeSpindles", True) + "hi_spindles" -> ("MaxSpindles", True) + "inst_spindles" -> ("InstSpindles", True) -- TODO: add node fields (group.uuid, group) _ -> (T.unknownField, False)