Revision 1e3dccc8 Ganeti/HTools/Node.hs
| b/Ganeti/HTools/Node.hs | ||
|---|---|---|
| 41 | 41 |
, setSec |
| 42 | 42 |
, setMdsk |
| 43 | 43 |
, setMcpu |
| 44 |
-- * Tag maps |
|
| 45 |
, addTags |
|
| 46 |
, delTags |
|
| 47 |
, rejectAddTags |
|
| 44 | 48 |
-- * Instance (re)location |
| 45 | 49 |
, removePri |
| 46 | 50 |
, removeSec |
| ... | ... | |
| 48 | 52 |
, addSec |
| 49 | 53 |
-- * Stats |
| 50 | 54 |
, availDisk |
| 55 |
, availMem |
|
| 56 |
, availCpu |
|
| 51 | 57 |
, conflictingPrimaries |
| 52 | 58 |
-- * Formatting |
| 53 | 59 |
, defaultFields |
| ... | ... | |
| 397 | 403 |
then 0 |
| 398 | 404 |
else _f - _l |
| 399 | 405 |
|
| 406 |
-- | Computes the amount of available memory on a given node |
|
| 407 |
availMem :: Node -> Int |
|
| 408 |
availMem t = |
|
| 409 |
let _f = fMem t |
|
| 410 |
_l = rMem t |
|
| 411 |
in if _f < _l |
|
| 412 |
then 0 |
|
| 413 |
else _f - _l |
|
| 414 |
|
|
| 415 |
-- | Computes the amount of available memory on a given node |
|
| 416 |
availCpu :: Node -> Int |
|
| 417 |
availCpu t = |
|
| 418 |
let _u = uCpu t |
|
| 419 |
_l = hiCpu t |
|
| 420 |
in if _l >= _u |
|
| 421 |
then _l - _u |
|
| 422 |
else 0 |
|
| 423 |
|
|
| 400 | 424 |
-- * Display functions |
| 401 | 425 |
|
| 402 | 426 |
showField :: Node -> String -> String |
Also available in: Unified diff