Revision 5867e439
| b/src/Ganeti/HsConstants.hs | ||
|---|---|---|
| 499 | 499 |
-- * Admin states |
| 500 | 500 |
|
| 501 | 501 |
adminstDown :: String |
| 502 |
adminstDown = "down"
|
|
| 502 |
adminstDown = Types.adminStateToRaw AdminDown
|
|
| 503 | 503 |
|
| 504 | 504 |
adminstOffline :: String |
| 505 |
adminstOffline = "offline"
|
|
| 505 |
adminstOffline = Types.adminStateToRaw AdminOffline
|
|
| 506 | 506 |
|
| 507 | 507 |
adminstUp :: String |
| 508 |
adminstUp = "up"
|
|
| 508 |
adminstUp = Types.adminStateToRaw AdminUp
|
|
| 509 | 509 |
|
| 510 | 510 |
adminstAll :: FrozenSet String |
| 511 |
adminstAll = ConstantUtils.mkSet [adminstDown, adminstOffline, adminstUp] |
|
| 511 |
adminstAll = ConstantUtils.mkSet $ map Types.adminStateToRaw [minBound..] |
|
| 512 |
|
|
| 513 |
-- * Node roles |
|
| 514 |
|
|
| 515 |
nrDrained :: String |
|
| 516 |
nrDrained = Types.nodeRoleToRaw NRDrained |
|
| 517 |
|
|
| 518 |
nrMaster :: String |
|
| 519 |
nrMaster = Types.nodeRoleToRaw NRMaster |
|
| 520 |
|
|
| 521 |
nrMcandidate :: String |
|
| 522 |
nrMcandidate = Types.nodeRoleToRaw NRCandidate |
|
| 523 |
|
|
| 524 |
nrOffline :: String |
|
| 525 |
nrOffline = Types.nodeRoleToRaw NROffline |
|
| 526 |
|
|
| 527 |
nrRegular :: String |
|
| 528 |
nrRegular = Types.nodeRoleToRaw NRRegular |
|
| 529 |
|
|
| 530 |
nrAll :: FrozenSet String |
|
| 531 |
nrAll = ConstantUtils.mkSet $ map Types.nodeRoleToRaw [minBound..] |
|
| 512 | 532 |
|
| 513 | 533 |
-- * Allocator framework constants |
| 514 | 534 |
|
| ... | ... | |
| 913 | 933 |
fdLoop :: String |
| 914 | 934 |
fdLoop = Types.fileDriverToRaw FileLoop |
| 915 | 935 |
|
| 936 |
-- * Disk access mode |
|
| 937 |
|
|
| 938 |
diskRdonly :: String |
|
| 939 |
diskRdonly = Types.diskModeToRaw DiskRdOnly |
|
| 940 |
|
|
| 941 |
diskRdwr :: String |
|
| 942 |
diskRdwr = Types.diskModeToRaw DiskRdWr |
|
| 943 |
|
|
| 944 |
diskAccessSet :: FrozenSet String |
|
| 945 |
diskAccessSet = ConstantUtils.mkSet $ map Types.diskModeToRaw [minBound..] |
|
| 946 |
|
|
| 916 | 947 |
-- * Instance export mode |
| 917 | 948 |
|
| 918 | 949 |
exportModeLocal :: String |
| ... | ... | |
| 1021 | 1052 |
rebootTypes :: FrozenSet String |
| 1022 | 1053 |
rebootTypes = ConstantUtils.mkSet $ map Types.rebootTypeToRaw [minBound..] |
| 1023 | 1054 |
|
| 1055 |
-- * VTypes |
|
| 1056 |
|
|
| 1057 |
vtypeBool :: String |
|
| 1058 |
vtypeBool = Types.vTypeToRaw VTypeBool |
|
| 1059 |
|
|
| 1060 |
vtypeInt :: String |
|
| 1061 |
vtypeInt = Types.vTypeToRaw VTypeInt |
|
| 1062 |
|
|
| 1063 |
vtypeMaybeString :: String |
|
| 1064 |
vtypeMaybeString = Types.vTypeToRaw VTypeMaybeString |
|
| 1065 |
|
|
| 1066 |
-- | Size in MiBs |
|
| 1067 |
vtypeSize :: String |
|
| 1068 |
vtypeSize = Types.vTypeToRaw VTypeSize |
|
| 1069 |
|
|
| 1070 |
vtypeString :: String |
|
| 1071 |
vtypeString = Types.vTypeToRaw VTypeString |
|
| 1072 |
|
|
| 1073 |
enforceableTypes :: FrozenSet String |
|
| 1074 |
enforceableTypes = ConstantUtils.mkSet $ map Types.vTypeToRaw [minBound..] |
|
| 1075 |
|
|
| 1024 | 1076 |
-- * Possible values for NodeGroup.alloc_policy |
| 1025 | 1077 |
|
| 1026 | 1078 |
allocPolicyLastResort :: String |
| ... | ... | |
| 1037 | 1089 |
|
| 1038 | 1090 |
-- | Temporary external/shared storage parameters |
| 1039 | 1091 |
blockdevDriverManual :: String |
| 1040 |
blockdevDriverManual = "manual"
|
|
| 1092 |
blockdevDriverManual = Types.blockDriverToRaw BlockDrvManual
|
|
| 1041 | 1093 |
|
| 1042 | 1094 |
-- | Path generating random UUID |
| 1043 | 1095 |
randomUuidFile :: String |
Also available in: Unified diff