Revision 93439b1c htools/Ganeti/HTools/Cluster.hs
b/htools/Ganeti/HTools/Cluster.hs | ||
---|---|---|
1010 | 1010 |
in if sdx == Node.noSecondary |
1011 | 1011 |
then "" |
1012 | 1012 |
else Container.nameOf nl sdx |
1013 |
, if Instance.auto_balance inst then "Y" else "N" |
|
1013 | 1014 |
, printf "%3d" $ Instance.vcpus inst |
1014 | 1015 |
, printf "%5d" $ Instance.mem inst |
1015 | 1016 |
, printf "%5d" $ Instance.dsk inst `div` 1024 |
... | ... | |
1019 | 1020 |
, printf "%5.3f" lN |
1020 | 1021 |
] |
1021 | 1022 |
where DynUtil lC lM lD lN = Instance.util inst |
1022 |
header = [ "F", "Name", "Pri_node", "Sec_node", "vcpu", "mem"
|
|
1023 |
, "dsk", "lCpu", "lMem", "lDsk", "lNet" ] |
|
1024 |
isnum = False:False:False:False:repeat True |
|
1023 |
header = [ "F", "Name", "Pri_node", "Sec_node", "Auto_bal"
|
|
1024 |
, "vcpu", "mem" , "dsk", "lCpu", "lMem", "lDsk", "lNet" ]
|
|
1025 |
isnum = False:False:False:False:False:repeat True
|
|
1025 | 1026 |
in unlines . map ((:) ' ' . intercalate " ") $ |
1026 | 1027 |
formatTable (header:map helper sil) isnum |
1027 | 1028 |
|
Also available in: Unified diff