Safe Haskell | None |
---|
Implementation of the Ganeti confd types.
- data ConfdRequestType
- confdRequestTypeFromRaw :: forall m. Monad m => Int -> m ConfdRequestType
- confdRequestTypeToRaw :: ConfdRequestType -> Int
- _ReqInstanceDisks :: Int
- _ReqNodeInstances :: Int
- _ReqNodeDrbd :: Int
- _ReqInstIpsList :: Int
- _ReqMcPipList :: Int
- _ReqNodePipList :: Int
- _ReqClusterMaster :: Int
- _ReqNodePipByInstPip :: Int
- _ReqNodeRoleByName :: Int
- _ReqPing :: Int
- data ConfdReqField
- confdReqFieldFromRaw :: forall m. Monad m => Int -> m ConfdReqField
- confdReqFieldToRaw :: ConfdReqField -> Int
- _ReqFieldMNodePip :: Int
- _ReqFieldIp :: Int
- _ReqFieldName :: Int
- data ConfdReqQ = ConfdReqQ {
- confdReqQIp :: Maybe String
- confdReqQIpList :: [String]
- confdReqQLink :: Maybe String
- confdReqQFields :: [ConfdReqField]
- loadConfdReqQ :: JSValue -> Result ConfdReqQ
- saveConfdReqQ :: ConfdReqQ -> JSValue
- data ConfdQuery
- = EmptyQuery
- | PlainQuery String
- | DictQuery ConfdReqQ
- data ConfdReplyStatus
- confdReplyStatusFromRaw :: forall m. Monad m => Int -> m ConfdReplyStatus
- confdReplyStatusToRaw :: ConfdReplyStatus -> Int
- _ReplyStatusNotImpl :: Int
- _ReplyStatusError :: Int
- _ReplyStatusOk :: Int
- data ConfdNodeRole
- confdNodeRoleFromRaw :: forall m. Monad m => Int -> m ConfdNodeRole
- confdNodeRoleToRaw :: ConfdNodeRole -> Int
- _NodeRoleRegular :: Int
- _NodeRoleDrained :: Int
- _NodeRoleOffline :: Int
- _NodeRoleCandidate :: Int
- _NodeRoleMaster :: Int
- data ConfdErrorType
- confdErrorTypeFromRaw :: forall m. Monad m => Int -> m ConfdErrorType
- confdErrorTypeToRaw :: ConfdErrorType -> Int
- _ConfdErrorArgument :: Int
- _ConfdErrorInternal :: Int
- _ConfdErrorUnknownEntry :: Int
- data ConfdRequest = ConfdRequest {
- confdRqProtocol :: Int
- confdRqType :: ConfdRequestType
- confdRqQuery :: ConfdQuery
- confdRqRsalt :: String
- loadConfdRequest :: JSValue -> Result ConfdRequest
- saveConfdRequest :: ConfdRequest -> JSValue
- newConfdRequest :: ConfdRequestType -> ConfdQuery -> IO ConfdRequest
- data ConfdReply = ConfdReply {
- confdReplyProtocol :: Int
- confdReplyStatus :: ConfdReplyStatus
- confdReplyAnswer :: JSValue
- confdReplySerial :: Int
- loadConfdReply :: JSValue -> Result ConfdReply
- saveConfdReply :: ConfdReply -> JSValue
- data SignedMessage = SignedMessage {
- signedMsgHmac :: String
- signedMsgMsg :: String
- signedMsgSalt :: String
- loadSignedMessage :: JSValue -> Result SignedMessage
- saveSignedMessage :: SignedMessage -> JSValue
- data ConfdClient = ConfdClient {
- hmacKey :: HashKey
- peers :: [String]
- serverPort :: PortNumber
Documentation
data ConfdRequestType Source
ReqPing | |
ReqNodeRoleByName | |
ReqNodePipByInstPip | |
ReqClusterMaster | |
ReqNodePipList | |
ReqMcPipList | |
ReqInstIpsList | |
ReqNodeDrbd | |
ReqNodeInstances | |
ReqInstanceDisks |
Bounded ConfdRequestType | |
Enum ConfdRequestType | |
Eq ConfdRequestType | |
Ord ConfdRequestType | |
Show ConfdRequestType | |
Arbitrary ConfdRequestType | |
JSON ConfdRequestType |
confdRequestTypeFromRaw :: forall m. Monad m => Int -> m ConfdRequestTypeSource
confdRequestTypeToRaw :: ConfdRequestType -> IntSource
_ReqInstanceDisks :: IntSource
_ReqNodeInstances :: IntSource
_ReqNodeDrbd :: IntSource
_ReqInstIpsList :: IntSource
_ReqMcPipList :: IntSource
_ReqNodePipList :: IntSource
_ReqClusterMaster :: IntSource
_ReqNodePipByInstPip :: IntSource
_ReqNodeRoleByName :: IntSource
data ConfdReqField Source
Bounded ConfdReqField | |
Enum ConfdReqField | |
Eq ConfdReqField | |
Ord ConfdReqField | |
Show ConfdReqField | |
Arbitrary ConfdReqField | |
JSON ConfdReqField |
confdReqFieldFromRaw :: forall m. Monad m => Int -> m ConfdReqFieldSource
confdReqFieldToRaw :: ConfdReqField -> IntSource
_ReqFieldMNodePip :: IntSource
_ReqFieldIp :: IntSource
_ReqFieldName :: IntSource
ConfdReqQ | |
|
Eq ConfdReqQ | |
Show ConfdReqQ | |
Arbitrary ConfdReqQ | |
JSON ConfdReqQ | |
ArrayObject ConfdReqQ | |
DictObject ConfdReqQ |
loadConfdReqQ :: JSValue -> Result ConfdReqQSource
saveConfdReqQ :: ConfdReqQ -> JSValueSource
data ConfdQuery Source
Confd query type. This is complex enough that we can't automatically derive it via THH.
EmptyQuery | |
PlainQuery String | |
DictQuery ConfdReqQ |
Eq ConfdQuery | |
Show ConfdQuery | |
Arbitrary ConfdQuery | |
JSON ConfdQuery |
data ConfdReplyStatus Source
Bounded ConfdReplyStatus | |
Enum ConfdReplyStatus | |
Eq ConfdReplyStatus | |
Ord ConfdReplyStatus | |
Show ConfdReplyStatus | |
Arbitrary ConfdReplyStatus | |
JSON ConfdReplyStatus |
confdReplyStatusFromRaw :: forall m. Monad m => Int -> m ConfdReplyStatusSource
confdReplyStatusToRaw :: ConfdReplyStatus -> IntSource
_ReplyStatusNotImpl :: IntSource
_ReplyStatusError :: IntSource
_ReplyStatusOk :: IntSource
data ConfdNodeRole Source
Bounded ConfdNodeRole | |
Enum ConfdNodeRole | |
Eq ConfdNodeRole | |
Ord ConfdNodeRole | |
Show ConfdNodeRole | |
Arbitrary ConfdNodeRole | |
JSON ConfdNodeRole |
confdNodeRoleFromRaw :: forall m. Monad m => Int -> m ConfdNodeRoleSource
confdNodeRoleToRaw :: ConfdNodeRole -> IntSource
_NodeRoleRegular :: IntSource
_NodeRoleDrained :: IntSource
_NodeRoleOffline :: IntSource
_NodeRoleCandidate :: IntSource
_NodeRoleMaster :: IntSource
data ConfdErrorType Source
Bounded ConfdErrorType | |
Enum ConfdErrorType | |
Eq ConfdErrorType | |
Ord ConfdErrorType | |
Show ConfdErrorType | |
Arbitrary ConfdErrorType | |
JSON ConfdErrorType |
confdErrorTypeFromRaw :: forall m. Monad m => Int -> m ConfdErrorTypeSource
confdErrorTypeToRaw :: ConfdErrorType -> IntSource
_ConfdErrorArgument :: IntSource
_ConfdErrorInternal :: IntSource
data ConfdRequest Source
ConfdRequest | |
|
Eq ConfdRequest | |
Show ConfdRequest | |
Arbitrary ConfdRequest | |
JSON ConfdRequest | |
ArrayObject ConfdRequest | |
DictObject ConfdRequest |
loadConfdRequest :: JSValue -> Result ConfdRequestSource
saveConfdRequest :: ConfdRequest -> JSValueSource
newConfdRequest :: ConfdRequestType -> ConfdQuery -> IO ConfdRequestSource
Client side helper function for creating requests. It automatically fills in some default values.
data ConfdReply Source
ConfdReply | |
|
Eq ConfdReply | |
Show ConfdReply | |
Arbitrary ConfdReply | |
JSON ConfdReply | |
ArrayObject ConfdReply | |
DictObject ConfdReply |
loadConfdReply :: JSValue -> Result ConfdReplySource
saveConfdReply :: ConfdReply -> JSValueSource
data SignedMessage Source
SignedMessage | |
|
loadSignedMessage :: JSValue -> Result SignedMessageSource
saveSignedMessage :: SignedMessage -> JSValueSource
data ConfdClient Source
Data type containing information used by the Confd client.
ConfdClient | |
|