Revision d254d6ce
b/htools/Ganeti/HTools/Instance.hs | ||
---|---|---|
42 | 42 |
, shrinkByType |
43 | 43 |
, runningStates |
44 | 44 |
, requiredNodes |
45 |
, allNodes |
|
45 | 46 |
) where |
46 | 47 |
|
47 | 48 |
import qualified Ganeti.HTools.Types as T |
... | ... | |
189 | 190 |
requiredNodes :: T.DiskTemplate -> Int |
190 | 191 |
requiredNodes T.DTDrbd8 = 2 |
191 | 192 |
requiredNodes _ = 1 |
193 |
|
|
194 |
-- | Computes all nodes of an instance. |
|
195 |
allNodes :: Instance -> [T.Ndx] |
|
196 |
allNodes inst = case diskTemplate inst of |
|
197 |
T.DTDrbd8 -> [pNode inst, sNode inst] |
|
198 |
_ -> [pNode inst] |
Also available in: Unified diff