Safe Haskell	None
Language	Haskell2010

Network.VaultTool

Description

Unless otherwise specified, all IO functions in this module may potentially throw HttpException or VaultException

Synopsis

newtype VaultAddress = VaultAddress {
- unVaultAddress :: Text
}
newtype VaultUnsealKey = VaultUnsealKey {
- unVaultUnsealKey :: Text
}
newtype VaultAuthToken = VaultAuthToken {
- unVaultAuthToken :: Text
}
newtype VaultAppRoleId = VaultAppRoleId {
- unVaultAppRoleId :: Text
}
newtype VaultAppRoleSecretId = VaultAppRoleSecretId {
- unVaultAppRoleSecretId :: Text
}
data VaultException
- = VaultException
- | VaultException_InvalidAddress ByteString String
- | VaultException_BadStatusCode ByteString String ByteString Int ByteString
- | VaultException_ParseBodyError ByteString String ByteString String
data VaultHealth = VaultHealth {
- _VaultHealth_Version :: Text
- _VaultHealth_ServerTimeUtc :: Int
- _VaultHealth_Initialized :: Bool
- _VaultHealth_Sealed :: Bool
- _VaultHealth_Standby :: Bool
}
vaultHealth :: VaultAddress -> IO VaultHealth
data VaultConnection
connectToVault :: VaultAddress -> VaultAuthToken -> IO VaultConnection
connectToVaultAppRole :: VaultAddress -> VaultAppRoleId -> VaultAppRoleSecretId -> IO VaultConnection
vaultAuthEnable :: VaultConnection -> Text -> IO ()
vaultPolicyCreate :: VaultConnection -> Text -> Text -> IO ()
vaultInit :: VaultAddress -> Int -> Int -> IO ([VaultUnsealKey], VaultAuthToken)
data VaultSealStatus = VaultSealStatus {
- _VaultSealStatus_Sealed :: Bool
- _VaultSealStatus_T :: Int
- _VaultSealStatus_N :: Int
- _VaultSealStatus_Progress :: Int
}
vaultSealStatus :: VaultAddress -> IO VaultSealStatus
vaultSeal :: VaultConnection -> IO ()
data VaultUnseal
- = VaultUnseal_Key VaultUnsealKey
- | VaultUnseal_Reset
vaultUnseal :: VaultAddress -> VaultUnseal -> IO VaultSealStatus
vaultAppRoleCreate :: VaultConnection -> Text -> VaultAppRoleParameters -> IO ()
vaultAppRoleRoleIdRead :: VaultConnection -> Text -> IO VaultAppRoleId
vaultAppRoleSecretIdGenerate :: VaultConnection -> Text -> Text -> IO VaultAppRoleSecretIdGenerateResponse
defaultVaultAppRoleParameters :: VaultAppRoleParameters
data VaultAppRoleParameters = VaultAppRoleParameters {
- _VaultAppRoleParameters_BindSecretId :: Bool
- _VaultAppRoleParameters_Policies :: [Text]
- _VaultAppRoleParameters_SecretIdNumUses :: Maybe Int
- _VaultAppRoleParameters_SecretIdTTL :: Maybe Int
- _VaultAppRoleParameters_TokenNumUses :: Maybe Int
- _VaultAppRoleParameters_TokenTTL :: Maybe Int
- _VaultAppRoleParameters_TokenMaxTTL :: Maybe Int
- _VaultAppRoleParameters_Period :: Maybe Int
}
data VaultAppRoleSecretIdGenerateResponse = VaultAppRoleSecretIdGenerateResponse {
- _VaultAppRoleSecretIdGenerateResponse_SecretIdAccessor :: VaultAppRoleSecretIdAccessor
- _VaultAppRoleSecretIdGenerateResponse_SecretId :: VaultAppRoleSecretId
}
data VaultMount a b = VaultMount {
- _VaultMount_Type :: Text
- _VaultMount_Description :: a
- _VaultMount_Config :: b
}
type VaultMountRead = VaultMount Text VaultMountConfigRead
type VaultMountWrite = VaultMount (Maybe Text) (Maybe VaultMountConfigWrite)
data VaultMountConfig a = VaultMountConfig {
- _VaultMountConfig_DefaultLeaseTtl :: a
- _VaultMountConfig_MaxLeaseTtl :: a
}
type VaultMountConfigRead = VaultMountConfig Int
type VaultMountConfigWrite = VaultMountConfig (Maybe Int)
vaultMounts :: VaultConnection -> IO [(Text, VaultMountRead)]
vaultMountTune :: VaultConnection -> Text -> IO VaultMountConfigRead
vaultMountSetTune :: VaultConnection -> Text -> VaultMountConfigWrite -> IO ()
vaultNewMount :: VaultConnection -> Text -> VaultMountWrite -> IO ()
vaultUnmount :: VaultConnection -> Text -> IO ()
newtype VaultMountedPath = VaultMountedPath {
- unVaultMountedPath :: Text
}
newtype VaultSearchPath = VaultSearchPath {
- unVaultSearchPath :: Text
}
newtype VaultSecretPath = VaultSecretPath (VaultMountedPath, VaultSearchPath)
data VaultSecretMetadata = VaultSecretMetadata {
- _VaultSecretMetadata_leaseDuration :: Int
- _VaultSecretMetadata_leaseId :: Text
- _VauleSecretMetadata_renewable :: Bool
}
vaultWrite :: ToJSON a => VaultConnection -> VaultSecretPath -> a -> IO ()
vaultRead :: FromJSON a => VaultConnection -> VaultSecretPath -> IO (VaultSecretMetadata, Either (Value, String) a)
vaultDelete :: VaultConnection -> VaultSecretPath -> IO ()
vaultList :: VaultConnection -> VaultSecretPath -> IO [VaultSecretPath]
isFolder :: VaultSecretPath -> Bool
vaultListRecursive :: VaultConnection -> VaultSecretPath -> IO [VaultSecretPath]

Documentation

newtype VaultAddress Source #

Constructors

VaultAddress
Fields unVaultAddress :: Text

Instances

Eq VaultAddress Source #
Instance details Defined in Network.VaultTool.Types Methods (==) :: VaultAddress -> VaultAddress -> Bool # (/=) :: VaultAddress -> VaultAddress -> Bool #
Ord VaultAddress Source #
Instance details Defined in Network.VaultTool.Types Methods compare :: VaultAddress -> VaultAddress -> Ordering # (<) :: VaultAddress -> VaultAddress -> Bool # (<=) :: VaultAddress -> VaultAddress -> Bool # (>) :: VaultAddress -> VaultAddress -> Bool # (>=) :: VaultAddress -> VaultAddress -> Bool # max :: VaultAddress -> VaultAddress -> VaultAddress # min :: VaultAddress -> VaultAddress -> VaultAddress #
Show VaultAddress Source #
Instance details Defined in Network.VaultTool.Types Methods showsPrec :: Int -> VaultAddress -> ShowS # show :: VaultAddress -> String # showList :: [VaultAddress] -> ShowS #

newtype VaultUnsealKey Source #

Constructors

VaultUnsealKey
Fields unVaultUnsealKey :: Text

Instances

Eq VaultUnsealKey Source #
Instance details Defined in Network.VaultTool.Types Methods (==) :: VaultUnsealKey -> VaultUnsealKey -> Bool # (/=) :: VaultUnsealKey -> VaultUnsealKey -> Bool #
Ord VaultUnsealKey Source #
Instance details Defined in Network.VaultTool.Types Methods compare :: VaultUnsealKey -> VaultUnsealKey -> Ordering # (<) :: VaultUnsealKey -> VaultUnsealKey -> Bool # (<=) :: VaultUnsealKey -> VaultUnsealKey -> Bool # (>) :: VaultUnsealKey -> VaultUnsealKey -> Bool # (>=) :: VaultUnsealKey -> VaultUnsealKey -> Bool # max :: VaultUnsealKey -> VaultUnsealKey -> VaultUnsealKey # min :: VaultUnsealKey -> VaultUnsealKey -> VaultUnsealKey #
Show VaultUnsealKey Source #
Instance details Defined in Network.VaultTool.Types Methods showsPrec :: Int -> VaultUnsealKey -> ShowS # show :: VaultUnsealKey -> String # showList :: [VaultUnsealKey] -> ShowS #

newtype VaultAuthToken Source #

Constructors

VaultAuthToken
Fields unVaultAuthToken :: Text

Instances

Eq VaultAuthToken Source #
Instance details Defined in Network.VaultTool.Types Methods (==) :: VaultAuthToken -> VaultAuthToken -> Bool # (/=) :: VaultAuthToken -> VaultAuthToken -> Bool #
Ord VaultAuthToken Source #
Instance details Defined in Network.VaultTool.Types Methods compare :: VaultAuthToken -> VaultAuthToken -> Ordering # (<) :: VaultAuthToken -> VaultAuthToken -> Bool # (<=) :: VaultAuthToken -> VaultAuthToken -> Bool # (>) :: VaultAuthToken -> VaultAuthToken -> Bool # (>=) :: VaultAuthToken -> VaultAuthToken -> Bool # max :: VaultAuthToken -> VaultAuthToken -> VaultAuthToken # min :: VaultAuthToken -> VaultAuthToken -> VaultAuthToken #
Show VaultAuthToken Source #
Instance details Defined in Network.VaultTool.Types Methods showsPrec :: Int -> VaultAuthToken -> ShowS # show :: VaultAuthToken -> String # showList :: [VaultAuthToken] -> ShowS #
FromJSON VaultAuthToken Source #
Instance details Defined in Network.VaultTool.Types Methods parseJSON :: Value -> Parser VaultAuthToken # parseJSONList :: Value -> Parser [VaultAuthToken] #

newtype VaultAppRoleId Source #

Constructors

VaultAppRoleId
Fields unVaultAppRoleId :: Text

Instances

Eq VaultAppRoleId Source #
Instance details Defined in Network.VaultTool.Types Methods (==) :: VaultAppRoleId -> VaultAppRoleId -> Bool # (/=) :: VaultAppRoleId -> VaultAppRoleId -> Bool #
Ord VaultAppRoleId Source #
Instance details Defined in Network.VaultTool.Types Methods compare :: VaultAppRoleId -> VaultAppRoleId -> Ordering # (<) :: VaultAppRoleId -> VaultAppRoleId -> Bool # (<=) :: VaultAppRoleId -> VaultAppRoleId -> Bool # (>) :: VaultAppRoleId -> VaultAppRoleId -> Bool # (>=) :: VaultAppRoleId -> VaultAppRoleId -> Bool # max :: VaultAppRoleId -> VaultAppRoleId -> VaultAppRoleId # min :: VaultAppRoleId -> VaultAppRoleId -> VaultAppRoleId #
Show VaultAppRoleId Source #
Instance details Defined in Network.VaultTool.Types Methods showsPrec :: Int -> VaultAppRoleId -> ShowS # show :: VaultAppRoleId -> String # showList :: [VaultAppRoleId] -> ShowS #
ToJSON VaultAppRoleId Source #
Instance details Defined in Network.VaultTool.Types Methods toJSON :: VaultAppRoleId -> Value # toEncoding :: VaultAppRoleId -> Encoding # toJSONList :: [VaultAppRoleId] -> Value # toEncodingList :: [VaultAppRoleId] -> Encoding #
FromJSON VaultAppRoleId Source #
Instance details Defined in Network.VaultTool.Types Methods parseJSON :: Value -> Parser VaultAppRoleId # parseJSONList :: Value -> Parser [VaultAppRoleId] #

newtype VaultAppRoleSecretId Source #

Constructors

VaultAppRoleSecretId
Fields unVaultAppRoleSecretId :: Text

Instances

Eq VaultAppRoleSecretId Source #
Instance details Defined in Network.VaultTool.Types Methods (==) :: VaultAppRoleSecretId -> VaultAppRoleSecretId -> Bool # (/=) :: VaultAppRoleSecretId -> VaultAppRoleSecretId -> Bool #
Ord VaultAppRoleSecretId Source #
Instance details Defined in Network.VaultTool.Types Methods compare :: VaultAppRoleSecretId -> VaultAppRoleSecretId -> Ordering # (<) :: VaultAppRoleSecretId -> VaultAppRoleSecretId -> Bool # (<=) :: VaultAppRoleSecretId -> VaultAppRoleSecretId -> Bool # (>) :: VaultAppRoleSecretId -> VaultAppRoleSecretId -> Bool # (>=) :: VaultAppRoleSecretId -> VaultAppRoleSecretId -> Bool # max :: VaultAppRoleSecretId -> VaultAppRoleSecretId -> VaultAppRoleSecretId # min :: VaultAppRoleSecretId -> VaultAppRoleSecretId -> VaultAppRoleSecretId #
Show VaultAppRoleSecretId Source #
Instance details Defined in Network.VaultTool.Types Methods showsPrec :: Int -> VaultAppRoleSecretId -> ShowS # show :: VaultAppRoleSecretId -> String # showList :: [VaultAppRoleSecretId] -> ShowS #
ToJSON VaultAppRoleSecretId Source #
Instance details Defined in Network.VaultTool.Types Methods toJSON :: VaultAppRoleSecretId -> Value # toEncoding :: VaultAppRoleSecretId -> Encoding # toJSONList :: [VaultAppRoleSecretId] -> Value # toEncodingList :: [VaultAppRoleSecretId] -> Encoding #
FromJSON VaultAppRoleSecretId Source #
Instance details Defined in Network.VaultTool.Types Methods parseJSON :: Value -> Parser VaultAppRoleSecretId # parseJSONList :: Value -> Parser [VaultAppRoleSecretId] #

data VaultException Source #

Constructors

VaultException
VaultException_InvalidAddress ByteString String
VaultException_BadStatusCode ByteString String ByteString Int ByteString
VaultException_ParseBodyError ByteString String ByteString String

Instances

Eq VaultException Source #
Instance details Defined in Network.VaultTool.Types Methods (==) :: VaultException -> VaultException -> Bool # (/=) :: VaultException -> VaultException -> Bool #
Show VaultException Source #
Instance details Defined in Network.VaultTool.Types Methods showsPrec :: Int -> VaultException -> ShowS # show :: VaultException -> String # showList :: [VaultException] -> ShowS #
Exception VaultException Source #
Instance details Defined in Network.VaultTool.Types Methods toException :: VaultException -> SomeException # fromException :: SomeException -> Maybe VaultException # displayException :: VaultException -> String #

data VaultHealth Source #

https://www.vaultproject.io/docs/http/sys-health.html

See vaultHealth

Constructors

VaultHealth
Fields _VaultHealth_Version :: Text _VaultHealth_ServerTimeUtc :: Int _VaultHealth_Initialized :: Bool _VaultHealth_Sealed :: Bool _VaultHealth_Standby :: Bool

Instances

Eq VaultHealth Source #
Instance details Defined in Network.VaultTool Methods (==) :: VaultHealth -> VaultHealth -> Bool # (/=) :: VaultHealth -> VaultHealth -> Bool #
Ord VaultHealth Source #
Instance details Defined in Network.VaultTool Methods compare :: VaultHealth -> VaultHealth -> Ordering # (<) :: VaultHealth -> VaultHealth -> Bool # (<=) :: VaultHealth -> VaultHealth -> Bool # (>) :: VaultHealth -> VaultHealth -> Bool # (>=) :: VaultHealth -> VaultHealth -> Bool # max :: VaultHealth -> VaultHealth -> VaultHealth # min :: VaultHealth -> VaultHealth -> VaultHealth #
Show VaultHealth Source #
Instance details Defined in Network.VaultTool Methods showsPrec :: Int -> VaultHealth -> ShowS # show :: VaultHealth -> String # showList :: [VaultHealth] -> ShowS #
FromJSON VaultHealth Source #
Instance details Defined in Network.VaultTool Methods parseJSON :: Value -> Parser VaultHealth # parseJSONList :: Value -> Parser [VaultHealth] #

vaultHealth :: VaultAddress -> IO VaultHealth Source #

https://www.vaultproject.io/docs/http/sys-health.html

data VaultConnection Source #

connectToVault :: VaultAddress -> VaultAuthToken -> IO VaultConnection Source #

Just initializes the VaultConnection objects, does not actually make any contact with the vault server. (That is also the explanation why there is no function to disconnect)

connectToVaultAppRole :: VaultAddress -> VaultAppRoleId -> VaultAppRoleSecretId -> IO VaultConnection Source #

Initializes the VaultConnection objects using approle credentials to retrieve an authtoken, and then calls connectToVault

vaultAuthEnable :: VaultConnection -> Text -> IO () Source #

https://www.vaultproject.io/docs/auth/approle.html#via-the-api-1

vaultPolicyCreate :: VaultConnection -> Text -> Text -> IO () Source #

https://www.vaultproject.io/api/system/policies.html#create-update-acl-policy

vaultInit Source #

Arguments

:: VaultAddress
-> Int	`secret_shares`: The number of shares to split the master key into
-> Int	`secret_threshold`: The number of shares required to reconstruct the master key. This must be less than or equal to secret_shares
-> IO ([VaultUnsealKey], VaultAuthToken)	master keys and initial root token

https://www.vaultproject.io/docs/http/sys-init.html

data VaultSealStatus Source #

https://www.vaultproject.io/docs/http/sys-seal-status.html

See vaultSealStatus

Constructors

VaultSealStatus
Fields _VaultSealStatus_Sealed :: Bool _VaultSealStatus_T :: Int threshold _VaultSealStatus_N :: Int number of shares _VaultSealStatus_Progress :: Int

Instances

Eq VaultSealStatus Source #
Instance details Defined in Network.VaultTool Methods (==) :: VaultSealStatus -> VaultSealStatus -> Bool # (/=) :: VaultSealStatus -> VaultSealStatus -> Bool #
Ord VaultSealStatus Source #
Instance details Defined in Network.VaultTool Methods compare :: VaultSealStatus -> VaultSealStatus -> Ordering # (<) :: VaultSealStatus -> VaultSealStatus -> Bool # (<=) :: VaultSealStatus -> VaultSealStatus -> Bool # (>) :: VaultSealStatus -> VaultSealStatus -> Bool # (>=) :: VaultSealStatus -> VaultSealStatus -> Bool # max :: VaultSealStatus -> VaultSealStatus -> VaultSealStatus # min :: VaultSealStatus -> VaultSealStatus -> VaultSealStatus #
Show VaultSealStatus Source #
Instance details Defined in Network.VaultTool Methods showsPrec :: Int -> VaultSealStatus -> ShowS # show :: VaultSealStatus -> String # showList :: [VaultSealStatus] -> ShowS #
FromJSON VaultSealStatus Source #
Instance details Defined in Network.VaultTool Methods parseJSON :: Value -> Parser VaultSealStatus # parseJSONList :: Value -> Parser [VaultSealStatus] #

vaultSealStatus :: VaultAddress -> IO VaultSealStatus Source #

vaultSeal :: VaultConnection -> IO () Source #

data VaultUnseal Source #

https://www.vaultproject.io/docs/http/sys-unseal.html

See vaultUnseal

Constructors

VaultUnseal_Key VaultUnsealKey
VaultUnseal_Reset

Instances

Eq VaultUnseal Source #
Instance details Defined in Network.VaultTool Methods (==) :: VaultUnseal -> VaultUnseal -> Bool # (/=) :: VaultUnseal -> VaultUnseal -> Bool #
Ord VaultUnseal Source #
Instance details Defined in Network.VaultTool Methods compare :: VaultUnseal -> VaultUnseal -> Ordering # (<) :: VaultUnseal -> VaultUnseal -> Bool # (<=) :: VaultUnseal -> VaultUnseal -> Bool # (>) :: VaultUnseal -> VaultUnseal -> Bool # (>=) :: VaultUnseal -> VaultUnseal -> Bool # max :: VaultUnseal -> VaultUnseal -> VaultUnseal # min :: VaultUnseal -> VaultUnseal -> VaultUnseal #
Show VaultUnseal Source #
Instance details Defined in Network.VaultTool Methods showsPrec :: Int -> VaultUnseal -> ShowS # show :: VaultUnseal -> String # showList :: [VaultUnseal] -> ShowS #

vaultUnseal :: VaultAddress -> VaultUnseal -> IO VaultSealStatus Source #

https://www.vaultproject.io/docs/http/sys-unseal.html

vaultAppRoleCreate :: VaultConnection -> Text -> VaultAppRoleParameters -> IO () Source #

https://www.vaultproject.io/api/auth/approle/index.html#create-new-approle

vaultAppRoleRoleIdRead :: VaultConnection -> Text -> IO VaultAppRoleId Source #

https://www.vaultproject.io/api/auth/approle/index.html#read-approle-role-id

vaultAppRoleSecretIdGenerate :: VaultConnection -> Text -> Text -> IO VaultAppRoleSecretIdGenerateResponse Source #

https://www.vaultproject.io/api/auth/approle/index.html#generate-new-secret-id

defaultVaultAppRoleParameters :: VaultAppRoleParameters Source #

data VaultAppRoleParameters Source #

https://www.vaultproject.io/api/auth/approle/index.html#create-new-approle

Note: For TTL fields, only integer number seconds, i.e. 3600, are supported

Instances

ToJSON VaultAppRoleParameters Source #
Instance details Defined in Network.VaultTool Methods toJSON :: VaultAppRoleParameters -> Value # toEncoding :: VaultAppRoleParameters -> Encoding # toJSONList :: [VaultAppRoleParameters] -> Value # toEncodingList :: [VaultAppRoleParameters] -> Encoding #
FromJSON VaultAppRoleParameters Source #
Instance details Defined in Network.VaultTool Methods parseJSON :: Value -> Parser VaultAppRoleParameters # parseJSONList :: Value -> Parser [VaultAppRoleParameters] #

data VaultAppRoleSecretIdGenerateResponse Source #

Constructors

VaultAppRoleSecretIdGenerateResponse
Fields _VaultAppRoleSecretIdGenerateResponse_SecretIdAccessor :: VaultAppRoleSecretIdAccessor _VaultAppRoleSecretIdGenerateResponse_SecretId :: VaultAppRoleSecretId

Instances

FromJSON VaultAppRoleSecretIdGenerateResponse Source #
Instance details Defined in Network.VaultTool Methods parseJSON :: Value -> Parser VaultAppRoleSecretIdGenerateResponse # parseJSONList :: Value -> Parser [VaultAppRoleSecretIdGenerateResponse] #

data VaultMount a b Source #

https://www.vaultproject.io/docs/http/sys-mounts.html

Constructors

VaultMount
Fields _VaultMount_Type :: Text _VaultMount_Description :: a _VaultMount_Config :: b

Instances

ToJSON VaultMountWrite Source #
Instance details Defined in Network.VaultTool Methods toJSON :: VaultMountWrite -> Value # toEncoding :: VaultMountWrite -> Encoding # toJSONList :: [VaultMountWrite] -> Value # toEncodingList :: [VaultMountWrite] -> Encoding #
FromJSON VaultMountRead Source #
Instance details Defined in Network.VaultTool Methods parseJSON :: Value -> Parser VaultMountRead # parseJSONList :: Value -> Parser [VaultMountRead] #
(Eq a, Eq b) => Eq (VaultMount a b) Source #
Instance details Defined in Network.VaultTool Methods (==) :: VaultMount a b -> VaultMount a b -> Bool # (/=) :: VaultMount a b -> VaultMount a b -> Bool #
(Ord a, Ord b) => Ord (VaultMount a b) Source #
Instance details Defined in Network.VaultTool Methods compare :: VaultMount a b -> VaultMount a b -> Ordering # (<) :: VaultMount a b -> VaultMount a b -> Bool # (<=) :: VaultMount a b -> VaultMount a b -> Bool # (>) :: VaultMount a b -> VaultMount a b -> Bool # (>=) :: VaultMount a b -> VaultMount a b -> Bool # max :: VaultMount a b -> VaultMount a b -> VaultMount a b # min :: VaultMount a b -> VaultMount a b -> VaultMount a b #
(Show a, Show b) => Show (VaultMount a b) Source #
Instance details Defined in Network.VaultTool Methods showsPrec :: Int -> VaultMount a b -> ShowS # show :: VaultMount a b -> String # showList :: [VaultMount a b] -> ShowS #

type VaultMountRead = VaultMount Text VaultMountConfigRead Source #

type VaultMountWrite = VaultMount (Maybe Text) (Maybe VaultMountConfigWrite) Source #

data VaultMountConfig a Source #

https://www.vaultproject.io/docs/http/sys-mounts.html

Constructors

VaultMountConfig
Fields _VaultMountConfig_DefaultLeaseTtl :: a _VaultMountConfig_MaxLeaseTtl :: a

Instances

ToJSON VaultMountConfigWrite Source #
Instance details Defined in Network.VaultTool Methods toJSON :: VaultMountConfigWrite -> Value # toEncoding :: VaultMountConfigWrite -> Encoding # toJSONList :: [VaultMountConfigWrite] -> Value # toEncodingList :: [VaultMountConfigWrite] -> Encoding #
ToJSON VaultMountWrite Source #
Instance details Defined in Network.VaultTool Methods toJSON :: VaultMountWrite -> Value # toEncoding :: VaultMountWrite -> Encoding # toJSONList :: [VaultMountWrite] -> Value # toEncodingList :: [VaultMountWrite] -> Encoding #
FromJSON VaultMountConfigRead Source #
Instance details Defined in Network.VaultTool Methods parseJSON :: Value -> Parser VaultMountConfigRead # parseJSONList :: Value -> Parser [VaultMountConfigRead] #
FromJSON VaultMountRead Source #
Instance details Defined in Network.VaultTool Methods parseJSON :: Value -> Parser VaultMountRead # parseJSONList :: Value -> Parser [VaultMountRead] #
Eq a => Eq (VaultMountConfig a) Source #
Instance details Defined in Network.VaultTool Methods (==) :: VaultMountConfig a -> VaultMountConfig a -> Bool # (/=) :: VaultMountConfig a -> VaultMountConfig a -> Bool #
Ord a => Ord (VaultMountConfig a) Source #
Instance details Defined in Network.VaultTool Methods compare :: VaultMountConfig a -> VaultMountConfig a -> Ordering # (<) :: VaultMountConfig a -> VaultMountConfig a -> Bool # (<=) :: VaultMountConfig a -> VaultMountConfig a -> Bool # (>) :: VaultMountConfig a -> VaultMountConfig a -> Bool # (>=) :: VaultMountConfig a -> VaultMountConfig a -> Bool # max :: VaultMountConfig a -> VaultMountConfig a -> VaultMountConfig a # min :: VaultMountConfig a -> VaultMountConfig a -> VaultMountConfig a #
Show a => Show (VaultMountConfig a) Source #
Instance details Defined in Network.VaultTool Methods showsPrec :: Int -> VaultMountConfig a -> ShowS # show :: VaultMountConfig a -> String # showList :: [VaultMountConfig a] -> ShowS #

type VaultMountConfigRead = VaultMountConfig Int Source #

type VaultMountConfigWrite = VaultMountConfig (Maybe Int) Source #

vaultMounts :: VaultConnection -> IO [(Text, VaultMountRead)] Source #

https://www.vaultproject.io/docs/http/sys-mounts.html

For your convenience, the results are returned sorted (by the mount point)

vaultMountTune :: VaultConnection -> Text -> IO VaultMountConfigRead Source #

https://www.vaultproject.io/docs/http/sys-mounts.html

vaultMountSetTune :: VaultConnection -> Text -> VaultMountConfigWrite -> IO () Source #

https://www.vaultproject.io/docs/http/sys-mounts.html

vaultNewMount :: VaultConnection -> Text -> VaultMountWrite -> IO () Source #

https://www.vaultproject.io/docs/http/sys-mounts.html

vaultUnmount :: VaultConnection -> Text -> IO () Source #

https://www.vaultproject.io/docs/http/sys-mounts.html

newtype VaultMountedPath Source #

Constructors

VaultMountedPath
Fields unVaultMountedPath :: Text

Instances

Eq VaultMountedPath Source #
Instance details Defined in Network.VaultTool.Types Methods (==) :: VaultMountedPath -> VaultMountedPath -> Bool # (/=) :: VaultMountedPath -> VaultMountedPath -> Bool #
Ord VaultMountedPath Source #
Instance details Defined in Network.VaultTool.Types Methods compare :: VaultMountedPath -> VaultMountedPath -> Ordering # (<) :: VaultMountedPath -> VaultMountedPath -> Bool # (<=) :: VaultMountedPath -> VaultMountedPath -> Bool # (>) :: VaultMountedPath -> VaultMountedPath -> Bool # (>=) :: VaultMountedPath -> VaultMountedPath -> Bool # max :: VaultMountedPath -> VaultMountedPath -> VaultMountedPath # min :: VaultMountedPath -> VaultMountedPath -> VaultMountedPath #
Show VaultMountedPath Source #
Instance details Defined in Network.VaultTool.Types Methods showsPrec :: Int -> VaultMountedPath -> ShowS # show :: VaultMountedPath -> String # showList :: [VaultMountedPath] -> ShowS #

newtype VaultSearchPath Source #

Constructors

VaultSearchPath
Fields unVaultSearchPath :: Text

Instances

Eq VaultSearchPath Source #
Instance details Defined in Network.VaultTool.Types Methods (==) :: VaultSearchPath -> VaultSearchPath -> Bool # (/=) :: VaultSearchPath -> VaultSearchPath -> Bool #
Ord VaultSearchPath Source #
Instance details Defined in Network.VaultTool.Types Methods compare :: VaultSearchPath -> VaultSearchPath -> Ordering # (<) :: VaultSearchPath -> VaultSearchPath -> Bool # (<=) :: VaultSearchPath -> VaultSearchPath -> Bool # (>) :: VaultSearchPath -> VaultSearchPath -> Bool # (>=) :: VaultSearchPath -> VaultSearchPath -> Bool # max :: VaultSearchPath -> VaultSearchPath -> VaultSearchPath # min :: VaultSearchPath -> VaultSearchPath -> VaultSearchPath #
Show VaultSearchPath Source #
Instance details Defined in Network.VaultTool.Types Methods showsPrec :: Int -> VaultSearchPath -> ShowS # show :: VaultSearchPath -> String # showList :: [VaultSearchPath] -> ShowS #

newtype VaultSecretPath Source #

Constructors

VaultSecretPath (VaultMountedPath, VaultSearchPath)

Instances

Eq VaultSecretPath Source #
Instance details Defined in Network.VaultTool.Types Methods (==) :: VaultSecretPath -> VaultSecretPath -> Bool # (/=) :: VaultSecretPath -> VaultSecretPath -> Bool #
Ord VaultSecretPath Source #
Instance details Defined in Network.VaultTool.Types Methods compare :: VaultSecretPath -> VaultSecretPath -> Ordering # (<) :: VaultSecretPath -> VaultSecretPath -> Bool # (<=) :: VaultSecretPath -> VaultSecretPath -> Bool # (>) :: VaultSecretPath -> VaultSecretPath -> Bool # (>=) :: VaultSecretPath -> VaultSecretPath -> Bool # max :: VaultSecretPath -> VaultSecretPath -> VaultSecretPath # min :: VaultSecretPath -> VaultSecretPath -> VaultSecretPath #
Show VaultSecretPath Source #
Instance details Defined in Network.VaultTool.Types Methods showsPrec :: Int -> VaultSecretPath -> ShowS # show :: VaultSecretPath -> String # showList :: [VaultSecretPath] -> ShowS #

data VaultSecretMetadata Source #

Constructors

VaultSecretMetadata
Fields _VaultSecretMetadata_leaseDuration :: Int _VaultSecretMetadata_leaseId :: Text _VauleSecretMetadata_renewable :: Bool

Instances

Eq VaultSecretMetadata Source #
Instance details Defined in Network.VaultTool Methods (==) :: VaultSecretMetadata -> VaultSecretMetadata -> Bool # (/=) :: VaultSecretMetadata -> VaultSecretMetadata -> Bool #
Show VaultSecretMetadata Source #
Instance details Defined in Network.VaultTool Methods showsPrec :: Int -> VaultSecretMetadata -> ShowS # show :: VaultSecretMetadata -> String # showList :: [VaultSecretMetadata] -> ShowS #
FromJSON VaultSecretMetadata Source #
Instance details Defined in Network.VaultTool Methods parseJSON :: Value -> Parser VaultSecretMetadata # parseJSONList :: Value -> Parser [VaultSecretMetadata] #

vaultWrite :: ToJSON a => VaultConnection -> VaultSecretPath -> a -> IO () Source #

https://www.vaultproject.io/docs/secrets/generic/index.html

The value that you give must encode as a JSON object

vaultRead Source #

Arguments

:: FromJSON a
=> VaultConnection
-> VaultSecretPath
-> IO (VaultSecretMetadata, Either (Value, String) a)	A `Left` result means that the secret's "data" could not be parsed into the data structure that you requested. You will get the "data" as a raw `Value` as well as the error message from the parse failure

vaultDelete :: VaultConnection -> VaultSecretPath -> IO () Source #

https://www.vaultproject.io/docs/secrets/generic/index.html

vaultList :: VaultConnection -> VaultSecretPath -> IO [VaultSecretPath] Source #

https://www.vaultproject.io/docs/secrets/generic/index.html

This will normalise the results to be full secret paths.

Will return only secrets that in the are located in the folder hierarchy directly below the given folder.

Use isFolder to check if whether each result is a secret or a subfolder.

The order of the results is unspecified.

To recursively retrieve all of the secrets use vaultListRecursive

isFolder :: VaultSecretPath -> Bool Source #

Does the path end with a / character?

Meant to be used on the results of vaultList

vaultListRecursive :: VaultConnection -> VaultSecretPath -> IO [VaultSecretPath] Source #

Recursively calls vaultList to retrieve all of the secrets in a folder (including all subfolders and sub-subfolders, etc...)

There will be no folders in the result.

The order of the results is unspecified.

VaultAppRoleParameters
Fields _VaultAppRoleParameters_BindSecretId :: Bool _VaultAppRoleParameters_Policies :: [Text] _VaultAppRoleParameters_SecretIdNumUses :: Maybe Int _VaultAppRoleParameters_SecretIdTTL :: Maybe Int _VaultAppRoleParameters_TokenNumUses :: Maybe Int _VaultAppRoleParameters_TokenTTL :: Maybe Int _VaultAppRoleParameters_TokenMaxTTL :: Maybe Int _VaultAppRoleParameters_Period :: Maybe Int