Revision 8a9ee1e9 htools/Ganeti/HTools/Luxi.hs
b/htools/Ganeti/HTools/Luxi.hs | ||
---|---|---|
98 | 98 |
-- | The input data for node query. |
99 | 99 |
queryNodesMsg :: L.LuxiOp |
100 | 100 |
queryNodesMsg = |
101 |
L.Query L.QRNode ["name", "mtotal", "mnode", "mfree", "dtotal", "dfree",
|
|
102 |
"ctotal", "offline", "drained", "vm_capable", |
|
103 |
"ndp/spindle_count", "group.uuid"] Qlang.EmptyFilter |
|
101 |
L.Query Qlang.QRNode ["name", "mtotal", "mnode", "mfree", "dtotal", "dfree",
|
|
102 |
"ctotal", "offline", "drained", "vm_capable",
|
|
103 |
"ndp/spindle_count", "group.uuid"] Qlang.EmptyFilter
|
|
104 | 104 |
|
105 | 105 |
-- | The input data for instance query. |
106 | 106 |
queryInstancesMsg :: L.LuxiOp |
107 | 107 |
queryInstancesMsg = |
108 |
L.Query L.QRInstance ["name", "disk_usage", "be/memory", "be/vcpus",
|
|
109 |
"status", "pnode", "snodes", "tags", "oper_ram", |
|
110 |
"be/auto_balance", "disk_template", |
|
111 |
"be/spindle_use"] Qlang.EmptyFilter |
|
108 |
L.Query Qlang.QRInstance ["name", "disk_usage", "be/memory", "be/vcpus",
|
|
109 |
"status", "pnode", "snodes", "tags", "oper_ram",
|
|
110 |
"be/auto_balance", "disk_template",
|
|
111 |
"be/spindle_use"] Qlang.EmptyFilter
|
|
112 | 112 |
|
113 | 113 |
-- | The input data for cluster query. |
114 | 114 |
queryClusterInfoMsg :: L.LuxiOp |
... | ... | |
117 | 117 |
-- | The input data for node group query. |
118 | 118 |
queryGroupsMsg :: L.LuxiOp |
119 | 119 |
queryGroupsMsg = |
120 |
L.Query L.QRGroup ["uuid", "name", "alloc_policy", "ipolicy"]
|
|
120 |
L.Query Qlang.QRGroup ["uuid", "name", "alloc_policy", "ipolicy"]
|
|
121 | 121 |
Qlang.EmptyFilter |
122 | 122 |
|
123 | 123 |
-- | Wraper over 'callMethod' doing node query. |
Also available in: Unified diff