Revision da4a52a3 src/Ganeti/Query/Node.hs
b/src/Ganeti/Query/Node.hs | ||
---|---|---|
184 | 184 |
, (FieldDefinition "pinst_cnt" "Pinst" QFTNumber |
185 | 185 |
"Number of instances with this node as primary", |
186 | 186 |
FieldConfig (\cfg -> |
187 |
rsNormal . length . fst . getNodeInstances cfg . nodeName),
|
|
187 |
rsNormal . length . fst . getNodeInstances cfg . nodeUuid),
|
|
188 | 188 |
QffNormal) |
189 | 189 |
, (FieldDefinition "sinst_cnt" "Sinst" QFTNumber |
190 | 190 |
"Number of instances with this node as secondary", |
191 | 191 |
FieldConfig (\cfg -> |
192 |
rsNormal . length . snd . getNodeInstances cfg . nodeName),
|
|
192 |
rsNormal . length . snd . getNodeInstances cfg . nodeUuid),
|
|
193 | 193 |
QffNormal) |
194 | 194 |
, (FieldDefinition "pinst_list" "PriInstances" QFTOther |
195 | 195 |
"List of instances with this node as primary", |
196 | 196 |
FieldConfig (\cfg -> rsNormal . niceSort . map instName . fst . |
197 |
getNodeInstances cfg . nodeName), QffNormal)
|
|
197 |
getNodeInstances cfg . nodeUuid), QffNormal)
|
|
198 | 198 |
, (FieldDefinition "sinst_list" "SecInstances" QFTOther |
199 | 199 |
"List of instances with this node as secondary", |
200 | 200 |
FieldConfig (\cfg -> rsNormal . niceSort . map instName . snd . |
201 |
getNodeInstances cfg . nodeName), QffNormal)
|
|
201 |
getNodeInstances cfg . nodeUuid), QffNormal)
|
|
202 | 202 |
, (FieldDefinition "role" "Role" QFTText nodeRoleDoc, |
203 | 203 |
FieldConfig ((rsNormal .) . getNodeRole), QffNormal) |
204 | 204 |
, (FieldDefinition "powered" "Powered" QFTBool |
Also available in: Unified diff