module Stratosphere.Transfer.Server (
        module Exports, Server(..), mkServer
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.Transfer.Server.EndpointDetailsProperty as Exports
import {-# SOURCE #-} Stratosphere.Transfer.Server.IdentityProviderDetailsProperty as Exports
import {-# SOURCE #-} Stratosphere.Transfer.Server.ProtocolDetailsProperty as Exports
import {-# SOURCE #-} Stratosphere.Transfer.Server.S3StorageOptionsProperty as Exports
import {-# SOURCE #-} Stratosphere.Transfer.Server.WorkflowDetailsProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Tag
import Stratosphere.Value
data Server
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-transfer-server.html>
    Server {Server -> ()
haddock_workaround_ :: (),
            -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-transfer-server.html#cfn-transfer-server-certificate>
            Server -> Maybe (Value Text)
certificate :: (Prelude.Maybe (Value Prelude.Text)),
            -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-transfer-server.html#cfn-transfer-server-domain>
            Server -> Maybe (Value Text)
domain :: (Prelude.Maybe (Value Prelude.Text)),
            -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-transfer-server.html#cfn-transfer-server-endpointdetails>
            Server -> Maybe EndpointDetailsProperty
endpointDetails :: (Prelude.Maybe EndpointDetailsProperty),
            -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-transfer-server.html#cfn-transfer-server-endpointtype>
            Server -> Maybe (Value Text)
endpointType :: (Prelude.Maybe (Value Prelude.Text)),
            -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-transfer-server.html#cfn-transfer-server-identityproviderdetails>
            Server -> Maybe IdentityProviderDetailsProperty
identityProviderDetails :: (Prelude.Maybe IdentityProviderDetailsProperty),
            -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-transfer-server.html#cfn-transfer-server-identityprovidertype>
            Server -> Maybe (Value Text)
identityProviderType :: (Prelude.Maybe (Value Prelude.Text)),
            -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-transfer-server.html#cfn-transfer-server-ipaddresstype>
            Server -> Maybe (Value Text)
ipAddressType :: (Prelude.Maybe (Value Prelude.Text)),
            -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-transfer-server.html#cfn-transfer-server-loggingrole>
            Server -> Maybe (Value Text)
loggingRole :: (Prelude.Maybe (Value Prelude.Text)),
            -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-transfer-server.html#cfn-transfer-server-postauthenticationloginbanner>
            Server -> Maybe (Value Text)
postAuthenticationLoginBanner :: (Prelude.Maybe (Value Prelude.Text)),
            -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-transfer-server.html#cfn-transfer-server-preauthenticationloginbanner>
            Server -> Maybe (Value Text)
preAuthenticationLoginBanner :: (Prelude.Maybe (Value Prelude.Text)),
            -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-transfer-server.html#cfn-transfer-server-protocoldetails>
            Server -> Maybe ProtocolDetailsProperty
protocolDetails :: (Prelude.Maybe ProtocolDetailsProperty),
            -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-transfer-server.html#cfn-transfer-server-protocols>
            Server -> Maybe (ValueList Text)
protocols :: (Prelude.Maybe (ValueList Prelude.Text)),
            -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-transfer-server.html#cfn-transfer-server-s3storageoptions>
            Server -> Maybe S3StorageOptionsProperty
s3StorageOptions :: (Prelude.Maybe S3StorageOptionsProperty),
            -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-transfer-server.html#cfn-transfer-server-securitypolicyname>
            Server -> Maybe (Value Text)
securityPolicyName :: (Prelude.Maybe (Value Prelude.Text)),
            -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-transfer-server.html#cfn-transfer-server-structuredlogdestinations>
            Server -> Maybe (ValueList Text)
structuredLogDestinations :: (Prelude.Maybe (ValueList Prelude.Text)),
            -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-transfer-server.html#cfn-transfer-server-tags>
            Server -> Maybe [Tag]
tags :: (Prelude.Maybe [Tag]),
            -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-transfer-server.html#cfn-transfer-server-workflowdetails>
            Server -> Maybe WorkflowDetailsProperty
workflowDetails :: (Prelude.Maybe WorkflowDetailsProperty)}
  deriving stock (Server -> Server -> Bool
(Server -> Server -> Bool)
-> (Server -> Server -> Bool) -> Eq Server
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: Server -> Server -> Bool
== :: Server -> Server -> Bool
$c/= :: Server -> Server -> Bool
/= :: Server -> Server -> Bool
Prelude.Eq, Int -> Server -> ShowS
[Server] -> ShowS
Server -> String
(Int -> Server -> ShowS)
-> (Server -> String) -> ([Server] -> ShowS) -> Show Server
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> Server -> ShowS
showsPrec :: Int -> Server -> ShowS
$cshow :: Server -> String
show :: Server -> String
$cshowList :: [Server] -> ShowS
showList :: [Server] -> ShowS
Prelude.Show)
mkServer :: Server
mkServer :: Server
mkServer
  = Server
      {haddock_workaround_ :: ()
haddock_workaround_ = (), certificate :: Maybe (Value Text)
certificate = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       domain :: Maybe (Value Text)
domain = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing, endpointDetails :: Maybe EndpointDetailsProperty
endpointDetails = Maybe EndpointDetailsProperty
forall a. Maybe a
Prelude.Nothing,
       endpointType :: Maybe (Value Text)
endpointType = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderDetails = Maybe IdentityProviderDetailsProperty
forall a. Maybe a
Prelude.Nothing,
       identityProviderType :: Maybe (Value Text)
identityProviderType = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       ipAddressType :: Maybe (Value Text)
ipAddressType = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing, loggingRole :: Maybe (Value Text)
loggingRole = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       postAuthenticationLoginBanner :: Maybe (Value Text)
postAuthenticationLoginBanner = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       preAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       protocolDetails :: Maybe ProtocolDetailsProperty
protocolDetails = Maybe ProtocolDetailsProperty
forall a. Maybe a
Prelude.Nothing, protocols :: Maybe (ValueList Text)
protocols = Maybe (ValueList Text)
forall a. Maybe a
Prelude.Nothing,
       s3StorageOptions :: Maybe S3StorageOptionsProperty
s3StorageOptions = Maybe S3StorageOptionsProperty
forall a. Maybe a
Prelude.Nothing,
       securityPolicyName :: Maybe (Value Text)
securityPolicyName = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       structuredLogDestinations :: Maybe (ValueList Text)
structuredLogDestinations = Maybe (ValueList Text)
forall a. Maybe a
Prelude.Nothing,
       tags :: Maybe [Tag]
tags = Maybe [Tag]
forall a. Maybe a
Prelude.Nothing, workflowDetails :: Maybe WorkflowDetailsProperty
workflowDetails = Maybe WorkflowDetailsProperty
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties Server where
  toResourceProperties :: Server -> ResourceProperties
toResourceProperties Server {Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe EndpointDetailsProperty
Maybe IdentityProviderDetailsProperty
Maybe ProtocolDetailsProperty
Maybe S3StorageOptionsProperty
Maybe WorkflowDetailsProperty
()
haddock_workaround_ :: Server -> ()
certificate :: Server -> Maybe (Value Text)
domain :: Server -> Maybe (Value Text)
endpointDetails :: Server -> Maybe EndpointDetailsProperty
endpointType :: Server -> Maybe (Value Text)
identityProviderDetails :: Server -> Maybe IdentityProviderDetailsProperty
identityProviderType :: Server -> Maybe (Value Text)
ipAddressType :: Server -> Maybe (Value Text)
loggingRole :: Server -> Maybe (Value Text)
postAuthenticationLoginBanner :: Server -> Maybe (Value Text)
preAuthenticationLoginBanner :: Server -> Maybe (Value Text)
protocolDetails :: Server -> Maybe ProtocolDetailsProperty
protocols :: Server -> Maybe (ValueList Text)
s3StorageOptions :: Server -> Maybe S3StorageOptionsProperty
securityPolicyName :: Server -> Maybe (Value Text)
structuredLogDestinations :: Server -> Maybe (ValueList Text)
tags :: Server -> Maybe [Tag]
workflowDetails :: Server -> Maybe WorkflowDetailsProperty
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::Transfer::Server", supportsTags :: Bool
supportsTags = Bool
Prelude.True,
         properties :: Object
properties = [Item Object] -> Object
forall l. IsList l => [Item l] -> l
Prelude.fromList
                        ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                           [Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Certificate" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
certificate,
                            Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Domain" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
domain,
                            Key -> EndpointDetailsProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"EndpointDetails" (EndpointDetailsProperty -> (Key, Value))
-> Maybe EndpointDetailsProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe EndpointDetailsProperty
endpointDetails,
                            Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"EndpointType" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
endpointType,
                            Key -> IdentityProviderDetailsProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"IdentityProviderDetails"
                              (IdentityProviderDetailsProperty -> (Key, Value))
-> Maybe IdentityProviderDetailsProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe IdentityProviderDetailsProperty
identityProviderDetails,
                            Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"IdentityProviderType" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
identityProviderType,
                            Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"IpAddressType" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
ipAddressType,
                            Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"LoggingRole" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
loggingRole,
                            Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"PostAuthenticationLoginBanner"
                              (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
postAuthenticationLoginBanner,
                            Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"PreAuthenticationLoginBanner"
                              (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
preAuthenticationLoginBanner,
                            Key -> ProtocolDetailsProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ProtocolDetails" (ProtocolDetailsProperty -> (Key, Value))
-> Maybe ProtocolDetailsProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ProtocolDetailsProperty
protocolDetails,
                            Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Protocols" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
protocols,
                            Key -> S3StorageOptionsProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"S3StorageOptions" (S3StorageOptionsProperty -> (Key, Value))
-> Maybe S3StorageOptionsProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe S3StorageOptionsProperty
s3StorageOptions,
                            Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"SecurityPolicyName" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
securityPolicyName,
                            Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"StructuredLogDestinations"
                              (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
structuredLogDestinations,
                            Key -> [Tag] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Tags" ([Tag] -> (Key, Value)) -> Maybe [Tag] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Tag]
tags,
                            Key -> WorkflowDetailsProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"WorkflowDetails" (WorkflowDetailsProperty -> (Key, Value))
-> Maybe WorkflowDetailsProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe WorkflowDetailsProperty
workflowDetails])}
instance JSON.ToJSON Server where
  toJSON :: Server -> Value
toJSON Server {Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe EndpointDetailsProperty
Maybe IdentityProviderDetailsProperty
Maybe ProtocolDetailsProperty
Maybe S3StorageOptionsProperty
Maybe WorkflowDetailsProperty
()
haddock_workaround_ :: Server -> ()
certificate :: Server -> Maybe (Value Text)
domain :: Server -> Maybe (Value Text)
endpointDetails :: Server -> Maybe EndpointDetailsProperty
endpointType :: Server -> Maybe (Value Text)
identityProviderDetails :: Server -> Maybe IdentityProviderDetailsProperty
identityProviderType :: Server -> Maybe (Value Text)
ipAddressType :: Server -> Maybe (Value Text)
loggingRole :: Server -> Maybe (Value Text)
postAuthenticationLoginBanner :: Server -> Maybe (Value Text)
preAuthenticationLoginBanner :: Server -> Maybe (Value Text)
protocolDetails :: Server -> Maybe ProtocolDetailsProperty
protocols :: Server -> Maybe (ValueList Text)
s3StorageOptions :: Server -> Maybe S3StorageOptionsProperty
securityPolicyName :: Server -> Maybe (Value Text)
structuredLogDestinations :: Server -> Maybe (ValueList Text)
tags :: Server -> Maybe [Tag]
workflowDetails :: Server -> Maybe WorkflowDetailsProperty
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
..}
    = [(Key, Value)] -> Value
JSON.object
        ([Item [(Key, Value)]] -> [(Key, Value)]
forall l. IsList l => [Item l] -> l
Prelude.fromList
           ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
              [Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Certificate" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
certificate,
               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Domain" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
domain,
               Key -> EndpointDetailsProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"EndpointDetails" (EndpointDetailsProperty -> (Key, Value))
-> Maybe EndpointDetailsProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe EndpointDetailsProperty
endpointDetails,
               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"EndpointType" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
endpointType,
               Key -> IdentityProviderDetailsProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"IdentityProviderDetails"
                 (IdentityProviderDetailsProperty -> (Key, Value))
-> Maybe IdentityProviderDetailsProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe IdentityProviderDetailsProperty
identityProviderDetails,
               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"IdentityProviderType" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
identityProviderType,
               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"IpAddressType" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
ipAddressType,
               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"LoggingRole" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
loggingRole,
               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"PostAuthenticationLoginBanner"
                 (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
postAuthenticationLoginBanner,
               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"PreAuthenticationLoginBanner"
                 (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
preAuthenticationLoginBanner,
               Key -> ProtocolDetailsProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ProtocolDetails" (ProtocolDetailsProperty -> (Key, Value))
-> Maybe ProtocolDetailsProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ProtocolDetailsProperty
protocolDetails,
               Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Protocols" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
protocols,
               Key -> S3StorageOptionsProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"S3StorageOptions" (S3StorageOptionsProperty -> (Key, Value))
-> Maybe S3StorageOptionsProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe S3StorageOptionsProperty
s3StorageOptions,
               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"SecurityPolicyName" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
securityPolicyName,
               Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"StructuredLogDestinations"
                 (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
structuredLogDestinations,
               Key -> [Tag] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Tags" ([Tag] -> (Key, Value)) -> Maybe [Tag] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Tag]
tags,
               Key -> WorkflowDetailsProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"WorkflowDetails" (WorkflowDetailsProperty -> (Key, Value))
-> Maybe WorkflowDetailsProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe WorkflowDetailsProperty
workflowDetails]))
instance Property "Certificate" Server where
  type PropertyType "Certificate" Server = Value Prelude.Text
  set :: PropertyType "Certificate" Server -> Server -> Server
set PropertyType "Certificate" Server
newValue Server {Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe EndpointDetailsProperty
Maybe IdentityProviderDetailsProperty
Maybe ProtocolDetailsProperty
Maybe S3StorageOptionsProperty
Maybe WorkflowDetailsProperty
()
haddock_workaround_ :: Server -> ()
certificate :: Server -> Maybe (Value Text)
domain :: Server -> Maybe (Value Text)
endpointDetails :: Server -> Maybe EndpointDetailsProperty
endpointType :: Server -> Maybe (Value Text)
identityProviderDetails :: Server -> Maybe IdentityProviderDetailsProperty
identityProviderType :: Server -> Maybe (Value Text)
ipAddressType :: Server -> Maybe (Value Text)
loggingRole :: Server -> Maybe (Value Text)
postAuthenticationLoginBanner :: Server -> Maybe (Value Text)
preAuthenticationLoginBanner :: Server -> Maybe (Value Text)
protocolDetails :: Server -> Maybe ProtocolDetailsProperty
protocols :: Server -> Maybe (ValueList Text)
s3StorageOptions :: Server -> Maybe S3StorageOptionsProperty
securityPolicyName :: Server -> Maybe (Value Text)
structuredLogDestinations :: Server -> Maybe (ValueList Text)
tags :: Server -> Maybe [Tag]
workflowDetails :: Server -> Maybe WorkflowDetailsProperty
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
..}
    = Server {certificate :: Maybe (Value Text)
certificate = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Certificate" Server
Value Text
newValue, Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe EndpointDetailsProperty
Maybe IdentityProviderDetailsProperty
Maybe ProtocolDetailsProperty
Maybe S3StorageOptionsProperty
Maybe WorkflowDetailsProperty
()
haddock_workaround_ :: ()
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
haddock_workaround_ :: ()
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
..}
instance Property "Domain" Server where
  type PropertyType "Domain" Server = Value Prelude.Text
  set :: PropertyType "Domain" Server -> Server -> Server
set PropertyType "Domain" Server
newValue Server {Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe EndpointDetailsProperty
Maybe IdentityProviderDetailsProperty
Maybe ProtocolDetailsProperty
Maybe S3StorageOptionsProperty
Maybe WorkflowDetailsProperty
()
haddock_workaround_ :: Server -> ()
certificate :: Server -> Maybe (Value Text)
domain :: Server -> Maybe (Value Text)
endpointDetails :: Server -> Maybe EndpointDetailsProperty
endpointType :: Server -> Maybe (Value Text)
identityProviderDetails :: Server -> Maybe IdentityProviderDetailsProperty
identityProviderType :: Server -> Maybe (Value Text)
ipAddressType :: Server -> Maybe (Value Text)
loggingRole :: Server -> Maybe (Value Text)
postAuthenticationLoginBanner :: Server -> Maybe (Value Text)
preAuthenticationLoginBanner :: Server -> Maybe (Value Text)
protocolDetails :: Server -> Maybe ProtocolDetailsProperty
protocols :: Server -> Maybe (ValueList Text)
s3StorageOptions :: Server -> Maybe S3StorageOptionsProperty
securityPolicyName :: Server -> Maybe (Value Text)
structuredLogDestinations :: Server -> Maybe (ValueList Text)
tags :: Server -> Maybe [Tag]
workflowDetails :: Server -> Maybe WorkflowDetailsProperty
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
..}
    = Server {domain :: Maybe (Value Text)
domain = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Domain" Server
Value Text
newValue, Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe EndpointDetailsProperty
Maybe IdentityProviderDetailsProperty
Maybe ProtocolDetailsProperty
Maybe S3StorageOptionsProperty
Maybe WorkflowDetailsProperty
()
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
..}
instance Property "EndpointDetails" Server where
  type PropertyType "EndpointDetails" Server = EndpointDetailsProperty
  set :: PropertyType "EndpointDetails" Server -> Server -> Server
set PropertyType "EndpointDetails" Server
newValue Server {Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe EndpointDetailsProperty
Maybe IdentityProviderDetailsProperty
Maybe ProtocolDetailsProperty
Maybe S3StorageOptionsProperty
Maybe WorkflowDetailsProperty
()
haddock_workaround_ :: Server -> ()
certificate :: Server -> Maybe (Value Text)
domain :: Server -> Maybe (Value Text)
endpointDetails :: Server -> Maybe EndpointDetailsProperty
endpointType :: Server -> Maybe (Value Text)
identityProviderDetails :: Server -> Maybe IdentityProviderDetailsProperty
identityProviderType :: Server -> Maybe (Value Text)
ipAddressType :: Server -> Maybe (Value Text)
loggingRole :: Server -> Maybe (Value Text)
postAuthenticationLoginBanner :: Server -> Maybe (Value Text)
preAuthenticationLoginBanner :: Server -> Maybe (Value Text)
protocolDetails :: Server -> Maybe ProtocolDetailsProperty
protocols :: Server -> Maybe (ValueList Text)
s3StorageOptions :: Server -> Maybe S3StorageOptionsProperty
securityPolicyName :: Server -> Maybe (Value Text)
structuredLogDestinations :: Server -> Maybe (ValueList Text)
tags :: Server -> Maybe [Tag]
workflowDetails :: Server -> Maybe WorkflowDetailsProperty
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
..}
    = Server {endpointDetails :: Maybe EndpointDetailsProperty
endpointDetails = EndpointDetailsProperty -> Maybe EndpointDetailsProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "EndpointDetails" Server
EndpointDetailsProperty
newValue, Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe IdentityProviderDetailsProperty
Maybe ProtocolDetailsProperty
Maybe S3StorageOptionsProperty
Maybe WorkflowDetailsProperty
()
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
..}
instance Property "EndpointType" Server where
  type PropertyType "EndpointType" Server = Value Prelude.Text
  set :: PropertyType "EndpointType" Server -> Server -> Server
set PropertyType "EndpointType" Server
newValue Server {Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe EndpointDetailsProperty
Maybe IdentityProviderDetailsProperty
Maybe ProtocolDetailsProperty
Maybe S3StorageOptionsProperty
Maybe WorkflowDetailsProperty
()
haddock_workaround_ :: Server -> ()
certificate :: Server -> Maybe (Value Text)
domain :: Server -> Maybe (Value Text)
endpointDetails :: Server -> Maybe EndpointDetailsProperty
endpointType :: Server -> Maybe (Value Text)
identityProviderDetails :: Server -> Maybe IdentityProviderDetailsProperty
identityProviderType :: Server -> Maybe (Value Text)
ipAddressType :: Server -> Maybe (Value Text)
loggingRole :: Server -> Maybe (Value Text)
postAuthenticationLoginBanner :: Server -> Maybe (Value Text)
preAuthenticationLoginBanner :: Server -> Maybe (Value Text)
protocolDetails :: Server -> Maybe ProtocolDetailsProperty
protocols :: Server -> Maybe (ValueList Text)
s3StorageOptions :: Server -> Maybe S3StorageOptionsProperty
securityPolicyName :: Server -> Maybe (Value Text)
structuredLogDestinations :: Server -> Maybe (ValueList Text)
tags :: Server -> Maybe [Tag]
workflowDetails :: Server -> Maybe WorkflowDetailsProperty
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
..}
    = Server {endpointType :: Maybe (Value Text)
endpointType = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "EndpointType" Server
Value Text
newValue, Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe EndpointDetailsProperty
Maybe IdentityProviderDetailsProperty
Maybe ProtocolDetailsProperty
Maybe S3StorageOptionsProperty
Maybe WorkflowDetailsProperty
()
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
..}
instance Property "IdentityProviderDetails" Server where
  type PropertyType "IdentityProviderDetails" Server = IdentityProviderDetailsProperty
  set :: PropertyType "IdentityProviderDetails" Server -> Server -> Server
set PropertyType "IdentityProviderDetails" Server
newValue Server {Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe EndpointDetailsProperty
Maybe IdentityProviderDetailsProperty
Maybe ProtocolDetailsProperty
Maybe S3StorageOptionsProperty
Maybe WorkflowDetailsProperty
()
haddock_workaround_ :: Server -> ()
certificate :: Server -> Maybe (Value Text)
domain :: Server -> Maybe (Value Text)
endpointDetails :: Server -> Maybe EndpointDetailsProperty
endpointType :: Server -> Maybe (Value Text)
identityProviderDetails :: Server -> Maybe IdentityProviderDetailsProperty
identityProviderType :: Server -> Maybe (Value Text)
ipAddressType :: Server -> Maybe (Value Text)
loggingRole :: Server -> Maybe (Value Text)
postAuthenticationLoginBanner :: Server -> Maybe (Value Text)
preAuthenticationLoginBanner :: Server -> Maybe (Value Text)
protocolDetails :: Server -> Maybe ProtocolDetailsProperty
protocols :: Server -> Maybe (ValueList Text)
s3StorageOptions :: Server -> Maybe S3StorageOptionsProperty
securityPolicyName :: Server -> Maybe (Value Text)
structuredLogDestinations :: Server -> Maybe (ValueList Text)
tags :: Server -> Maybe [Tag]
workflowDetails :: Server -> Maybe WorkflowDetailsProperty
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
..}
    = Server {identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderDetails = IdentityProviderDetailsProperty
-> Maybe IdentityProviderDetailsProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "IdentityProviderDetails" Server
IdentityProviderDetailsProperty
newValue, Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe EndpointDetailsProperty
Maybe ProtocolDetailsProperty
Maybe S3StorageOptionsProperty
Maybe WorkflowDetailsProperty
()
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
..}
instance Property "IdentityProviderType" Server where
  type PropertyType "IdentityProviderType" Server = Value Prelude.Text
  set :: PropertyType "IdentityProviderType" Server -> Server -> Server
set PropertyType "IdentityProviderType" Server
newValue Server {Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe EndpointDetailsProperty
Maybe IdentityProviderDetailsProperty
Maybe ProtocolDetailsProperty
Maybe S3StorageOptionsProperty
Maybe WorkflowDetailsProperty
()
haddock_workaround_ :: Server -> ()
certificate :: Server -> Maybe (Value Text)
domain :: Server -> Maybe (Value Text)
endpointDetails :: Server -> Maybe EndpointDetailsProperty
endpointType :: Server -> Maybe (Value Text)
identityProviderDetails :: Server -> Maybe IdentityProviderDetailsProperty
identityProviderType :: Server -> Maybe (Value Text)
ipAddressType :: Server -> Maybe (Value Text)
loggingRole :: Server -> Maybe (Value Text)
postAuthenticationLoginBanner :: Server -> Maybe (Value Text)
preAuthenticationLoginBanner :: Server -> Maybe (Value Text)
protocolDetails :: Server -> Maybe ProtocolDetailsProperty
protocols :: Server -> Maybe (ValueList Text)
s3StorageOptions :: Server -> Maybe S3StorageOptionsProperty
securityPolicyName :: Server -> Maybe (Value Text)
structuredLogDestinations :: Server -> Maybe (ValueList Text)
tags :: Server -> Maybe [Tag]
workflowDetails :: Server -> Maybe WorkflowDetailsProperty
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
..}
    = Server {identityProviderType :: Maybe (Value Text)
identityProviderType = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "IdentityProviderType" Server
Value Text
newValue, Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe EndpointDetailsProperty
Maybe IdentityProviderDetailsProperty
Maybe ProtocolDetailsProperty
Maybe S3StorageOptionsProperty
Maybe WorkflowDetailsProperty
()
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
..}
instance Property "IpAddressType" Server where
  type PropertyType "IpAddressType" Server = Value Prelude.Text
  set :: PropertyType "IpAddressType" Server -> Server -> Server
set PropertyType "IpAddressType" Server
newValue Server {Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe EndpointDetailsProperty
Maybe IdentityProviderDetailsProperty
Maybe ProtocolDetailsProperty
Maybe S3StorageOptionsProperty
Maybe WorkflowDetailsProperty
()
haddock_workaround_ :: Server -> ()
certificate :: Server -> Maybe (Value Text)
domain :: Server -> Maybe (Value Text)
endpointDetails :: Server -> Maybe EndpointDetailsProperty
endpointType :: Server -> Maybe (Value Text)
identityProviderDetails :: Server -> Maybe IdentityProviderDetailsProperty
identityProviderType :: Server -> Maybe (Value Text)
ipAddressType :: Server -> Maybe (Value Text)
loggingRole :: Server -> Maybe (Value Text)
postAuthenticationLoginBanner :: Server -> Maybe (Value Text)
preAuthenticationLoginBanner :: Server -> Maybe (Value Text)
protocolDetails :: Server -> Maybe ProtocolDetailsProperty
protocols :: Server -> Maybe (ValueList Text)
s3StorageOptions :: Server -> Maybe S3StorageOptionsProperty
securityPolicyName :: Server -> Maybe (Value Text)
structuredLogDestinations :: Server -> Maybe (ValueList Text)
tags :: Server -> Maybe [Tag]
workflowDetails :: Server -> Maybe WorkflowDetailsProperty
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
..}
    = Server {ipAddressType :: Maybe (Value Text)
ipAddressType = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "IpAddressType" Server
Value Text
newValue, Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe EndpointDetailsProperty
Maybe IdentityProviderDetailsProperty
Maybe ProtocolDetailsProperty
Maybe S3StorageOptionsProperty
Maybe WorkflowDetailsProperty
()
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
..}
instance Property "LoggingRole" Server where
  type PropertyType "LoggingRole" Server = Value Prelude.Text
  set :: PropertyType "LoggingRole" Server -> Server -> Server
set PropertyType "LoggingRole" Server
newValue Server {Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe EndpointDetailsProperty
Maybe IdentityProviderDetailsProperty
Maybe ProtocolDetailsProperty
Maybe S3StorageOptionsProperty
Maybe WorkflowDetailsProperty
()
haddock_workaround_ :: Server -> ()
certificate :: Server -> Maybe (Value Text)
domain :: Server -> Maybe (Value Text)
endpointDetails :: Server -> Maybe EndpointDetailsProperty
endpointType :: Server -> Maybe (Value Text)
identityProviderDetails :: Server -> Maybe IdentityProviderDetailsProperty
identityProviderType :: Server -> Maybe (Value Text)
ipAddressType :: Server -> Maybe (Value Text)
loggingRole :: Server -> Maybe (Value Text)
postAuthenticationLoginBanner :: Server -> Maybe (Value Text)
preAuthenticationLoginBanner :: Server -> Maybe (Value Text)
protocolDetails :: Server -> Maybe ProtocolDetailsProperty
protocols :: Server -> Maybe (ValueList Text)
s3StorageOptions :: Server -> Maybe S3StorageOptionsProperty
securityPolicyName :: Server -> Maybe (Value Text)
structuredLogDestinations :: Server -> Maybe (ValueList Text)
tags :: Server -> Maybe [Tag]
workflowDetails :: Server -> Maybe WorkflowDetailsProperty
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
..}
    = Server {loggingRole :: Maybe (Value Text)
loggingRole = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "LoggingRole" Server
Value Text
newValue, Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe EndpointDetailsProperty
Maybe IdentityProviderDetailsProperty
Maybe ProtocolDetailsProperty
Maybe S3StorageOptionsProperty
Maybe WorkflowDetailsProperty
()
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
..}
instance Property "PostAuthenticationLoginBanner" Server where
  type PropertyType "PostAuthenticationLoginBanner" Server = Value Prelude.Text
  set :: PropertyType "PostAuthenticationLoginBanner" Server
-> Server -> Server
set PropertyType "PostAuthenticationLoginBanner" Server
newValue Server {Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe EndpointDetailsProperty
Maybe IdentityProviderDetailsProperty
Maybe ProtocolDetailsProperty
Maybe S3StorageOptionsProperty
Maybe WorkflowDetailsProperty
()
haddock_workaround_ :: Server -> ()
certificate :: Server -> Maybe (Value Text)
domain :: Server -> Maybe (Value Text)
endpointDetails :: Server -> Maybe EndpointDetailsProperty
endpointType :: Server -> Maybe (Value Text)
identityProviderDetails :: Server -> Maybe IdentityProviderDetailsProperty
identityProviderType :: Server -> Maybe (Value Text)
ipAddressType :: Server -> Maybe (Value Text)
loggingRole :: Server -> Maybe (Value Text)
postAuthenticationLoginBanner :: Server -> Maybe (Value Text)
preAuthenticationLoginBanner :: Server -> Maybe (Value Text)
protocolDetails :: Server -> Maybe ProtocolDetailsProperty
protocols :: Server -> Maybe (ValueList Text)
s3StorageOptions :: Server -> Maybe S3StorageOptionsProperty
securityPolicyName :: Server -> Maybe (Value Text)
structuredLogDestinations :: Server -> Maybe (ValueList Text)
tags :: Server -> Maybe [Tag]
workflowDetails :: Server -> Maybe WorkflowDetailsProperty
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
..}
    = Server
        {postAuthenticationLoginBanner :: Maybe (Value Text)
postAuthenticationLoginBanner = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "PostAuthenticationLoginBanner" Server
Value Text
newValue, Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe EndpointDetailsProperty
Maybe IdentityProviderDetailsProperty
Maybe ProtocolDetailsProperty
Maybe S3StorageOptionsProperty
Maybe WorkflowDetailsProperty
()
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
..}
instance Property "PreAuthenticationLoginBanner" Server where
  type PropertyType "PreAuthenticationLoginBanner" Server = Value Prelude.Text
  set :: PropertyType "PreAuthenticationLoginBanner" Server
-> Server -> Server
set PropertyType "PreAuthenticationLoginBanner" Server
newValue Server {Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe EndpointDetailsProperty
Maybe IdentityProviderDetailsProperty
Maybe ProtocolDetailsProperty
Maybe S3StorageOptionsProperty
Maybe WorkflowDetailsProperty
()
haddock_workaround_ :: Server -> ()
certificate :: Server -> Maybe (Value Text)
domain :: Server -> Maybe (Value Text)
endpointDetails :: Server -> Maybe EndpointDetailsProperty
endpointType :: Server -> Maybe (Value Text)
identityProviderDetails :: Server -> Maybe IdentityProviderDetailsProperty
identityProviderType :: Server -> Maybe (Value Text)
ipAddressType :: Server -> Maybe (Value Text)
loggingRole :: Server -> Maybe (Value Text)
postAuthenticationLoginBanner :: Server -> Maybe (Value Text)
preAuthenticationLoginBanner :: Server -> Maybe (Value Text)
protocolDetails :: Server -> Maybe ProtocolDetailsProperty
protocols :: Server -> Maybe (ValueList Text)
s3StorageOptions :: Server -> Maybe S3StorageOptionsProperty
securityPolicyName :: Server -> Maybe (Value Text)
structuredLogDestinations :: Server -> Maybe (ValueList Text)
tags :: Server -> Maybe [Tag]
workflowDetails :: Server -> Maybe WorkflowDetailsProperty
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
..}
    = Server {preAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "PreAuthenticationLoginBanner" Server
Value Text
newValue, Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe EndpointDetailsProperty
Maybe IdentityProviderDetailsProperty
Maybe ProtocolDetailsProperty
Maybe S3StorageOptionsProperty
Maybe WorkflowDetailsProperty
()
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
..}
instance Property "ProtocolDetails" Server where
  type PropertyType "ProtocolDetails" Server = ProtocolDetailsProperty
  set :: PropertyType "ProtocolDetails" Server -> Server -> Server
set PropertyType "ProtocolDetails" Server
newValue Server {Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe EndpointDetailsProperty
Maybe IdentityProviderDetailsProperty
Maybe ProtocolDetailsProperty
Maybe S3StorageOptionsProperty
Maybe WorkflowDetailsProperty
()
haddock_workaround_ :: Server -> ()
certificate :: Server -> Maybe (Value Text)
domain :: Server -> Maybe (Value Text)
endpointDetails :: Server -> Maybe EndpointDetailsProperty
endpointType :: Server -> Maybe (Value Text)
identityProviderDetails :: Server -> Maybe IdentityProviderDetailsProperty
identityProviderType :: Server -> Maybe (Value Text)
ipAddressType :: Server -> Maybe (Value Text)
loggingRole :: Server -> Maybe (Value Text)
postAuthenticationLoginBanner :: Server -> Maybe (Value Text)
preAuthenticationLoginBanner :: Server -> Maybe (Value Text)
protocolDetails :: Server -> Maybe ProtocolDetailsProperty
protocols :: Server -> Maybe (ValueList Text)
s3StorageOptions :: Server -> Maybe S3StorageOptionsProperty
securityPolicyName :: Server -> Maybe (Value Text)
structuredLogDestinations :: Server -> Maybe (ValueList Text)
tags :: Server -> Maybe [Tag]
workflowDetails :: Server -> Maybe WorkflowDetailsProperty
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
..}
    = Server {protocolDetails :: Maybe ProtocolDetailsProperty
protocolDetails = ProtocolDetailsProperty -> Maybe ProtocolDetailsProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ProtocolDetails" Server
ProtocolDetailsProperty
newValue, Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe EndpointDetailsProperty
Maybe IdentityProviderDetailsProperty
Maybe S3StorageOptionsProperty
Maybe WorkflowDetailsProperty
()
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
..}
instance Property "Protocols" Server where
  type PropertyType "Protocols" Server = ValueList Prelude.Text
  set :: PropertyType "Protocols" Server -> Server -> Server
set PropertyType "Protocols" Server
newValue Server {Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe EndpointDetailsProperty
Maybe IdentityProviderDetailsProperty
Maybe ProtocolDetailsProperty
Maybe S3StorageOptionsProperty
Maybe WorkflowDetailsProperty
()
haddock_workaround_ :: Server -> ()
certificate :: Server -> Maybe (Value Text)
domain :: Server -> Maybe (Value Text)
endpointDetails :: Server -> Maybe EndpointDetailsProperty
endpointType :: Server -> Maybe (Value Text)
identityProviderDetails :: Server -> Maybe IdentityProviderDetailsProperty
identityProviderType :: Server -> Maybe (Value Text)
ipAddressType :: Server -> Maybe (Value Text)
loggingRole :: Server -> Maybe (Value Text)
postAuthenticationLoginBanner :: Server -> Maybe (Value Text)
preAuthenticationLoginBanner :: Server -> Maybe (Value Text)
protocolDetails :: Server -> Maybe ProtocolDetailsProperty
protocols :: Server -> Maybe (ValueList Text)
s3StorageOptions :: Server -> Maybe S3StorageOptionsProperty
securityPolicyName :: Server -> Maybe (Value Text)
structuredLogDestinations :: Server -> Maybe (ValueList Text)
tags :: Server -> Maybe [Tag]
workflowDetails :: Server -> Maybe WorkflowDetailsProperty
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
..}
    = Server {protocols :: Maybe (ValueList Text)
protocols = ValueList Text -> Maybe (ValueList Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Protocols" Server
ValueList Text
newValue, Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe EndpointDetailsProperty
Maybe IdentityProviderDetailsProperty
Maybe ProtocolDetailsProperty
Maybe S3StorageOptionsProperty
Maybe WorkflowDetailsProperty
()
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
..}
instance Property "S3StorageOptions" Server where
  type PropertyType "S3StorageOptions" Server = S3StorageOptionsProperty
  set :: PropertyType "S3StorageOptions" Server -> Server -> Server
set PropertyType "S3StorageOptions" Server
newValue Server {Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe EndpointDetailsProperty
Maybe IdentityProviderDetailsProperty
Maybe ProtocolDetailsProperty
Maybe S3StorageOptionsProperty
Maybe WorkflowDetailsProperty
()
haddock_workaround_ :: Server -> ()
certificate :: Server -> Maybe (Value Text)
domain :: Server -> Maybe (Value Text)
endpointDetails :: Server -> Maybe EndpointDetailsProperty
endpointType :: Server -> Maybe (Value Text)
identityProviderDetails :: Server -> Maybe IdentityProviderDetailsProperty
identityProviderType :: Server -> Maybe (Value Text)
ipAddressType :: Server -> Maybe (Value Text)
loggingRole :: Server -> Maybe (Value Text)
postAuthenticationLoginBanner :: Server -> Maybe (Value Text)
preAuthenticationLoginBanner :: Server -> Maybe (Value Text)
protocolDetails :: Server -> Maybe ProtocolDetailsProperty
protocols :: Server -> Maybe (ValueList Text)
s3StorageOptions :: Server -> Maybe S3StorageOptionsProperty
securityPolicyName :: Server -> Maybe (Value Text)
structuredLogDestinations :: Server -> Maybe (ValueList Text)
tags :: Server -> Maybe [Tag]
workflowDetails :: Server -> Maybe WorkflowDetailsProperty
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
..}
    = Server {s3StorageOptions :: Maybe S3StorageOptionsProperty
s3StorageOptions = S3StorageOptionsProperty -> Maybe S3StorageOptionsProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "S3StorageOptions" Server
S3StorageOptionsProperty
newValue, Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe EndpointDetailsProperty
Maybe IdentityProviderDetailsProperty
Maybe ProtocolDetailsProperty
Maybe WorkflowDetailsProperty
()
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
..}
instance Property "SecurityPolicyName" Server where
  type PropertyType "SecurityPolicyName" Server = Value Prelude.Text
  set :: PropertyType "SecurityPolicyName" Server -> Server -> Server
set PropertyType "SecurityPolicyName" Server
newValue Server {Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe EndpointDetailsProperty
Maybe IdentityProviderDetailsProperty
Maybe ProtocolDetailsProperty
Maybe S3StorageOptionsProperty
Maybe WorkflowDetailsProperty
()
haddock_workaround_ :: Server -> ()
certificate :: Server -> Maybe (Value Text)
domain :: Server -> Maybe (Value Text)
endpointDetails :: Server -> Maybe EndpointDetailsProperty
endpointType :: Server -> Maybe (Value Text)
identityProviderDetails :: Server -> Maybe IdentityProviderDetailsProperty
identityProviderType :: Server -> Maybe (Value Text)
ipAddressType :: Server -> Maybe (Value Text)
loggingRole :: Server -> Maybe (Value Text)
postAuthenticationLoginBanner :: Server -> Maybe (Value Text)
preAuthenticationLoginBanner :: Server -> Maybe (Value Text)
protocolDetails :: Server -> Maybe ProtocolDetailsProperty
protocols :: Server -> Maybe (ValueList Text)
s3StorageOptions :: Server -> Maybe S3StorageOptionsProperty
securityPolicyName :: Server -> Maybe (Value Text)
structuredLogDestinations :: Server -> Maybe (ValueList Text)
tags :: Server -> Maybe [Tag]
workflowDetails :: Server -> Maybe WorkflowDetailsProperty
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
..}
    = Server {securityPolicyName :: Maybe (Value Text)
securityPolicyName = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "SecurityPolicyName" Server
Value Text
newValue, Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe EndpointDetailsProperty
Maybe IdentityProviderDetailsProperty
Maybe ProtocolDetailsProperty
Maybe S3StorageOptionsProperty
Maybe WorkflowDetailsProperty
()
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
..}
instance Property "StructuredLogDestinations" Server where
  type PropertyType "StructuredLogDestinations" Server = ValueList Prelude.Text
  set :: PropertyType "StructuredLogDestinations" Server -> Server -> Server
set PropertyType "StructuredLogDestinations" Server
newValue Server {Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe EndpointDetailsProperty
Maybe IdentityProviderDetailsProperty
Maybe ProtocolDetailsProperty
Maybe S3StorageOptionsProperty
Maybe WorkflowDetailsProperty
()
haddock_workaround_ :: Server -> ()
certificate :: Server -> Maybe (Value Text)
domain :: Server -> Maybe (Value Text)
endpointDetails :: Server -> Maybe EndpointDetailsProperty
endpointType :: Server -> Maybe (Value Text)
identityProviderDetails :: Server -> Maybe IdentityProviderDetailsProperty
identityProviderType :: Server -> Maybe (Value Text)
ipAddressType :: Server -> Maybe (Value Text)
loggingRole :: Server -> Maybe (Value Text)
postAuthenticationLoginBanner :: Server -> Maybe (Value Text)
preAuthenticationLoginBanner :: Server -> Maybe (Value Text)
protocolDetails :: Server -> Maybe ProtocolDetailsProperty
protocols :: Server -> Maybe (ValueList Text)
s3StorageOptions :: Server -> Maybe S3StorageOptionsProperty
securityPolicyName :: Server -> Maybe (Value Text)
structuredLogDestinations :: Server -> Maybe (ValueList Text)
tags :: Server -> Maybe [Tag]
workflowDetails :: Server -> Maybe WorkflowDetailsProperty
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
..}
    = Server {structuredLogDestinations :: Maybe (ValueList Text)
structuredLogDestinations = ValueList Text -> Maybe (ValueList Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "StructuredLogDestinations" Server
ValueList Text
newValue, Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe EndpointDetailsProperty
Maybe IdentityProviderDetailsProperty
Maybe ProtocolDetailsProperty
Maybe S3StorageOptionsProperty
Maybe WorkflowDetailsProperty
()
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
..}
instance Property "Tags" Server where
  type PropertyType "Tags" Server = [Tag]
  set :: PropertyType "Tags" Server -> Server -> Server
set PropertyType "Tags" Server
newValue Server {Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe EndpointDetailsProperty
Maybe IdentityProviderDetailsProperty
Maybe ProtocolDetailsProperty
Maybe S3StorageOptionsProperty
Maybe WorkflowDetailsProperty
()
haddock_workaround_ :: Server -> ()
certificate :: Server -> Maybe (Value Text)
domain :: Server -> Maybe (Value Text)
endpointDetails :: Server -> Maybe EndpointDetailsProperty
endpointType :: Server -> Maybe (Value Text)
identityProviderDetails :: Server -> Maybe IdentityProviderDetailsProperty
identityProviderType :: Server -> Maybe (Value Text)
ipAddressType :: Server -> Maybe (Value Text)
loggingRole :: Server -> Maybe (Value Text)
postAuthenticationLoginBanner :: Server -> Maybe (Value Text)
preAuthenticationLoginBanner :: Server -> Maybe (Value Text)
protocolDetails :: Server -> Maybe ProtocolDetailsProperty
protocols :: Server -> Maybe (ValueList Text)
s3StorageOptions :: Server -> Maybe S3StorageOptionsProperty
securityPolicyName :: Server -> Maybe (Value Text)
structuredLogDestinations :: Server -> Maybe (ValueList Text)
tags :: Server -> Maybe [Tag]
workflowDetails :: Server -> Maybe WorkflowDetailsProperty
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
..}
    = Server {tags :: Maybe [Tag]
tags = [Tag] -> Maybe [Tag]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [Tag]
PropertyType "Tags" Server
newValue, Maybe (ValueList Text)
Maybe (Value Text)
Maybe EndpointDetailsProperty
Maybe IdentityProviderDetailsProperty
Maybe ProtocolDetailsProperty
Maybe S3StorageOptionsProperty
Maybe WorkflowDetailsProperty
()
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
workflowDetails :: Maybe WorkflowDetailsProperty
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
workflowDetails :: Maybe WorkflowDetailsProperty
..}
instance Property "WorkflowDetails" Server where
  type PropertyType "WorkflowDetails" Server = WorkflowDetailsProperty
  set :: PropertyType "WorkflowDetails" Server -> Server -> Server
set PropertyType "WorkflowDetails" Server
newValue Server {Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe EndpointDetailsProperty
Maybe IdentityProviderDetailsProperty
Maybe ProtocolDetailsProperty
Maybe S3StorageOptionsProperty
Maybe WorkflowDetailsProperty
()
haddock_workaround_ :: Server -> ()
certificate :: Server -> Maybe (Value Text)
domain :: Server -> Maybe (Value Text)
endpointDetails :: Server -> Maybe EndpointDetailsProperty
endpointType :: Server -> Maybe (Value Text)
identityProviderDetails :: Server -> Maybe IdentityProviderDetailsProperty
identityProviderType :: Server -> Maybe (Value Text)
ipAddressType :: Server -> Maybe (Value Text)
loggingRole :: Server -> Maybe (Value Text)
postAuthenticationLoginBanner :: Server -> Maybe (Value Text)
preAuthenticationLoginBanner :: Server -> Maybe (Value Text)
protocolDetails :: Server -> Maybe ProtocolDetailsProperty
protocols :: Server -> Maybe (ValueList Text)
s3StorageOptions :: Server -> Maybe S3StorageOptionsProperty
securityPolicyName :: Server -> Maybe (Value Text)
structuredLogDestinations :: Server -> Maybe (ValueList Text)
tags :: Server -> Maybe [Tag]
workflowDetails :: Server -> Maybe WorkflowDetailsProperty
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
workflowDetails :: Maybe WorkflowDetailsProperty
..}
    = Server {workflowDetails :: Maybe WorkflowDetailsProperty
workflowDetails = WorkflowDetailsProperty -> Maybe WorkflowDetailsProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "WorkflowDetails" Server
WorkflowDetailsProperty
newValue, Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe EndpointDetailsProperty
Maybe IdentityProviderDetailsProperty
Maybe ProtocolDetailsProperty
Maybe S3StorageOptionsProperty
()
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
haddock_workaround_ :: ()
certificate :: Maybe (Value Text)
domain :: Maybe (Value Text)
endpointDetails :: Maybe EndpointDetailsProperty
endpointType :: Maybe (Value Text)
identityProviderDetails :: Maybe IdentityProviderDetailsProperty
identityProviderType :: Maybe (Value Text)
ipAddressType :: Maybe (Value Text)
loggingRole :: Maybe (Value Text)
postAuthenticationLoginBanner :: Maybe (Value Text)
preAuthenticationLoginBanner :: Maybe (Value Text)
protocolDetails :: Maybe ProtocolDetailsProperty
protocols :: Maybe (ValueList Text)
s3StorageOptions :: Maybe S3StorageOptionsProperty
securityPolicyName :: Maybe (Value Text)
structuredLogDestinations :: Maybe (ValueList Text)
tags :: Maybe [Tag]
..}