Revision c22d4dd4 htools/Ganeti/HTools/QC.hs
b/htools/Ganeti/HTools/QC.hs | ||
---|---|---|
97 | 97 |
maxCpu :: Int |
98 | 98 |
maxCpu = 1024 |
99 | 99 |
|
100 |
-- | Max vcpu ratio (random value). |
|
101 |
maxVcpuRatio :: Double |
|
102 |
maxVcpuRatio = 1024.0 |
|
103 |
|
|
104 |
-- | Max spindle ratio (random value). |
|
105 |
maxSpindleRatio :: Double |
|
106 |
maxSpindleRatio = 1024.0 |
|
107 |
|
|
100 | 108 |
-- | All disk templates (used later) |
101 | 109 |
allDiskTemplates :: [Types.DiskTemplate] |
102 | 110 |
allDiskTemplates = [minBound..maxBound] |
... | ... | |
122 | 130 |
, Types.iSpecNicCount = 1 |
123 | 131 |
} |
124 | 132 |
, Types.iPolicyDiskTemplates = [Types.DTDrbd8, Types.DTPlain] |
125 |
, Types.iPolicyVcpuRatio = 1024 -- somewhat random value, high |
|
126 |
-- enough to not impact us |
|
133 |
, Types.iPolicyVcpuRatio = maxVcpuRatio -- somewhat random value, high |
|
134 |
-- enough to not impact us |
|
135 |
, Types.iPolicySpindleRatio = maxSpindleRatio |
|
127 | 136 |
} |
128 | 137 |
|
129 | 138 |
|
... | ... | |
441 | 450 |
imax <- genBiggerISpec istd |
442 | 451 |
num_tmpl <- choose (0, length allDiskTemplates) |
443 | 452 |
dts <- genUniquesList num_tmpl |
444 |
vcpu_ratio <- arbitrary |
|
453 |
vcpu_ratio <- choose (1.0, maxVcpuRatio) |
|
454 |
spindle_ratio <- choose (1.0, maxSpindleRatio) |
|
445 | 455 |
return Types.IPolicy { Types.iPolicyMinSpec = imin |
446 | 456 |
, Types.iPolicyStdSpec = istd |
447 | 457 |
, Types.iPolicyMaxSpec = imax |
448 | 458 |
, Types.iPolicyDiskTemplates = dts |
449 | 459 |
, Types.iPolicyVcpuRatio = vcpu_ratio |
460 |
, Types.iPolicySpindleRatio = spindle_ratio |
|
450 | 461 |
} |
451 | 462 |
|
452 | 463 |
-- * Actual tests |
Also available in: Unified diff