Revision a2b55ccd src/Ganeti/HsConstants.hs
| b/src/Ganeti/HsConstants.hs | ||
|---|---|---|
| 43 | 43 |
import qualified Data.Map as Map (empty, fromList, keys, insert) |
| 44 | 44 |
|
| 45 | 45 |
import qualified AutoConf |
| 46 |
import Ganeti.ConstantUtils (PythonChar(..), FrozenSet, Protocol(..),
|
|
| 47 |
buildVersion) |
|
| 46 |
import Ganeti.ConstantUtils (PythonChar(..), PythonNone(..), FrozenSet,
|
|
| 47 |
Protocol(..), buildVersion)
|
|
| 48 | 48 |
import qualified Ganeti.ConstantUtils as ConstantUtils |
| 49 | 49 |
import Ganeti.HTools.Types (AutoRepairResult(..), AutoRepairType(..)) |
| 50 | 50 |
import qualified Ganeti.HTools.Types as Types |
| ... | ... | |
| 581 | 581 |
ieioScript :: String |
| 582 | 582 |
ieioScript = "script" |
| 583 | 583 |
|
| 584 |
-- * Values |
|
| 585 |
|
|
| 586 |
valueDefault :: String |
|
| 587 |
valueDefault = "default" |
|
| 588 |
|
|
| 589 |
valueAuto :: String |
|
| 590 |
valueAuto = "auto" |
|
| 591 |
|
|
| 592 |
valueGenerate :: String |
|
| 593 |
valueGenerate = "generate" |
|
| 594 |
|
|
| 595 |
valueNone :: String |
|
| 596 |
valueNone = "none" |
|
| 597 |
|
|
| 598 |
valueTrue :: String |
|
| 599 |
valueTrue = "true" |
|
| 600 |
|
|
| 601 |
valueFalse :: String |
|
| 602 |
valueFalse = "false" |
|
| 603 |
|
|
| 604 |
valueHsNothing :: Map String PythonNone |
|
| 605 |
valueHsNothing = Map.fromList [("Nothing", PythonNone)]
|
|
| 606 |
|
|
| 584 | 607 |
-- * Hooks |
| 585 | 608 |
|
| 586 | 609 |
hooksNameCfgupdate :: String |
| ... | ... | |
| 3517 | 3540 |
, (DTExt, Map.empty) |
| 3518 | 3541 |
] |
| 3519 | 3542 |
|
| 3543 |
niccDefaults :: Map String PyValueEx |
|
| 3544 |
niccDefaults = |
|
| 3545 |
Map.fromList |
|
| 3546 |
[ (nicMode, PyValueEx nicModeBridged) |
|
| 3547 |
, (nicLink, PyValueEx defaultBridge) |
|
| 3548 |
, (nicVlan, PyValueEx valueHsNothing) |
|
| 3549 |
] |
|
| 3550 |
|
|
| 3520 | 3551 |
-- | All of the following values are quite arbitrary - there are no |
| 3521 | 3552 |
-- "good" defaults, these must be customised per-site |
| 3522 | 3553 |
ispecsMinmaxDefaults :: Map String (Map String Int) |
Also available in: Unified diff