Revision a10a476a htools/Ganeti/HTools/Instance.hs
b/htools/Ganeti/HTools/Instance.hs | ||
---|---|---|
41 | 41 |
, specOf |
42 | 42 |
, shrinkByType |
43 | 43 |
, runningStates |
44 |
, requiredNodes |
|
44 | 45 |
) where |
45 | 46 |
|
46 | 47 |
import qualified Ganeti.HTools.Types as T |
... | ... | |
183 | 184 |
specOf :: Instance -> T.RSpec |
184 | 185 |
specOf Instance { mem = m, dsk = d, vcpus = c } = |
185 | 186 |
T.RSpec { T.rspecCpu = c, T.rspecMem = m, T.rspecDsk = d } |
187 |
|
|
188 |
-- | Computed the number of nodes for a given disk template |
|
189 |
requiredNodes :: T.DiskTemplate -> Int |
|
190 |
requiredNodes T.DTDrbd8 = 2 |
|
191 |
requiredNodes _ = 1 |
Also available in: Unified diff