"DST_NODE_OPT",
"EARLY_RELEASE_OPT",
"ENABLED_HV_OPT",
- # FIXME: disable storage types once disk templates are fully implemented.
- "ENABLED_STORAGE_TYPES_OPT",
"ENABLED_DISK_TEMPLATES_OPT",
"ERROR_CODES_OPT",
"FAILURE_ONLY_OPT",
help="Comma-separated list of hypervisors",
type="string", default=None)
-# FIXME: Remove once enabled disk templates are fully implemented.
-ENABLED_STORAGE_TYPES_OPT = cli_option("--enabled-storage-types",
- dest="enabled_storage_types",
- help="Comma-separated list of "
- "storage methods",
- type="string", default=None)
-
ENABLED_DISK_TEMPLATES_OPT = cli_option("--enabled-disk-templates",
dest="enabled_disk_templates",
help="Comma-separated list of "
("OS search path", utils.CommaJoin(pathutils.OS_SEARCH_PATH)),
("ExtStorage Providers search path",
utils.CommaJoin(pathutils.ES_SEARCH_PATH)),
- ("enabled storage types",
- utils.CommaJoin(result["enabled_storage_types"])),
("enabled disk templates",
utils.CommaJoin(result["enabled_disk_templates"])),
]),
opts.use_external_mip_script is not None or
opts.prealloc_wipe_disks is not None or
opts.hv_state or
- # FIXME: Remove 'enabled_storage_types' once 'enabled_disk_templates'
- # are fully implemented.
- opts.enabled_storage_types or
opts.enabled_disk_templates or
opts.disk_state or
opts.ispecs_mem_size or
if hvlist is not None:
hvlist = hvlist.split(",")
- # FIXME: Remove once 'enabled_disk_templates' are fully implemented.
- enabled_storage_types = opts.enabled_storage_types
- if enabled_storage_types is not None:
- enabled_storage_types = enabled_storage_types.split(",")
-
enabled_disk_templates = opts.enabled_disk_templates
if enabled_disk_templates:
enabled_disk_templates = enabled_disk_templates.split(",")
use_external_mip_script=ext_ip_script,
hv_state=hv_state,
disk_state=disk_state,
- # FIXME: remove once 'enabled_disk_templates' are fully implemented.
- enabled_storage_types=enabled_storage_types,
enabled_disk_templates=enabled_disk_templates,
)
SubmitOrSend(op, opts)
DRBD_HELPER_OPT, NODRBD_STORAGE_OPT, DEFAULT_IALLOCATOR_OPT,
RESERVED_LVS_OPT, DRY_RUN_OPT, PRIORITY_OPT, PREALLOC_WIPE_DISKS_OPT,
NODE_PARAMS_OPT, USE_EXTERNAL_MIP_SCRIPT, DISK_PARAMS_OPT, HV_STATE_OPT,
- DISK_STATE_OPT, SUBMIT_OPT, ENABLED_STORAGE_TYPES_OPT,
- ENABLED_DISK_TEMPLATES_OPT] +
+ DISK_STATE_OPT, SUBMIT_OPT, ENABLED_DISK_TEMPLATES_OPT] +
INSTANCE_POLICY_OPTS,
"[opts...]",
"Alters the parameters of the cluster"),
if self.op.enabled_hypervisors is not None:
self.cluster.hvparams = self.new_hvparams
self.cluster.enabled_hypervisors = self.op.enabled_hypervisors
- # FIXME: remove once 'enabled_disk_templates' is fully implemented.
- if self.op.enabled_storage_types is not None:
- self.cluster.enabled_storage_types = \
- list(set(self.op.enabled_storage_types))
if self.op.enabled_disk_templates:
self.cluster.enabled_disk_templates = \
list(set(self.op.enabled_disk_templates))
ST_SHARED_FILE,
])
-# Per default, only lvm is enabled.
-DEFAULT_ENABLED_STORAGE_TYPES = compat.UniqueFrozenset([
- ST_LVM_VG,
- ])
-
# Storage fields
# first two are valid in LU context only, not passed to backend
SF_NODE = "node"
"prealloc_wipe_disks",
"hv_state_static",
"disk_state_static",
- # Keeping this in temporarily to not break the build between patches of
- # this series. Remove after 'enabled_disk_templates' is fully implemented.
- "enabled_storage_types",
"enabled_disk_templates",
] + _TIMESTAMPS + _UUID
" ``%s`` or ``%s``" % (constants.DDM_ADD, constants.DDM_REMOVE)),
("use_external_mip_script", None, ht.TMaybeBool,
"Whether to use an external master IP address setup script"),
- # FIXME: remove once enabled disk templates are fully implemented.
- ("enabled_storage_types", None,
- ht.TMaybe(ht.TAnd(ht.TListOf(ht.TElemOf(constants.VALID_STORAGE_TYPES)),
- ht.TTrue)),
- "List of enabled storage types"),
("enabled_disk_templates", None,
ht.TMaybe(ht.TAnd(ht.TListOf(ht.TElemOf(constants.DISK_TEMPLATES)),
ht.TTrue)),
, simpleField "primary_ip_family" [t| IpFamily |]
, simpleField "prealloc_wipe_disks" [t| Bool |]
, simpleField "ipolicy" [t| FilledIPolicy |]
- -- FIXME: Remove enabled storage types once enabled disk templates
- -- is fully implemented.
- , simpleField "enabled_storage_types" [t| [StorageType] |]
, simpleField "enabled_disk_templates" [t| [DiskTemplate] |]
]
++ timeStampFields
, pHiddenOs
, pBlacklistedOs
, pUseExternalMipScript
- -- FIXME: Remove once enabled disk templates are fully implemented.
- , pEnabledStorageTypes
, pEnabledDiskTemplates
])
, ("OpClusterRedistConf", [])
, pDependencies
, pComment
, pReason
- -- FIXME: Remove once enabled disk templates are fully implemented
- , pEnabledStorageTypes
, pEnabledDiskTemplates
, dOldQuery
, dOldQueryNoLocking
optionalField $
simpleField "enabled_hypervisors" [t| NonEmpty Hypervisor |]
--- | List of enabled storage methods.
--- FIXME: Remove once enabled disk templates are fully implemented.
-pEnabledStorageTypes :: Field
-pEnabledStorageTypes =
- optionalField $
- simpleField "enabled_storage_types" [t| NonEmpty StorageType |]
-
-- | List of enabled disk templates.
pEnabledDiskTemplates :: Field
pEnabledDiskTemplates =
handleCall cdata QueryClusterInfo =
let cluster = configCluster cdata
hypervisors = clusterEnabledHypervisors cluster
- storageTypes = clusterEnabledStorageTypes cluster
diskTemplates = clusterEnabledDiskTemplates cluster
def_hv = case hypervisors of
x:_ -> showJSON x
showJSON $ clusterPreallocWipeDisks cluster)
, ("hidden_os", showJSON $ clusterHiddenOs cluster)
, ("blacklisted_os", showJSON $ clusterBlacklistedOs cluster)
- -- FIXME: remove storage types once enabled disk templates are
- -- fully implemented.
- , ("enabled_storage_types", showJSON storageTypes)
, ("enabled_disk_templates", showJSON diskTemplates)
]
arbitrary <*> arbitrary <*> arbitrary <*>
emptyMUD <*> emptyMUD <*> arbitrary <*>
arbitrary <*> arbitrary <*> arbitrary <*> arbitrary <*>
- arbitrary <*> arbitrary <*> arbitrary <*> arbitrary <*>
- arbitrary
+ arbitrary <*> arbitrary <*> arbitrary <*> arbitrary
"OP_CLUSTER_REDIST_CONF" -> pure OpCodes.OpClusterRedistConf
"OP_CLUSTER_ACTIVATE_MASTER_IP" ->
pure OpCodes.OpClusterActivateMasterIp