{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Amazonka.CloudFront.Types.DefaultCacheBehavior where
import Amazonka.CloudFront.Types.AllowedMethods
import Amazonka.CloudFront.Types.ForwardedValues
import Amazonka.CloudFront.Types.FunctionAssociations
import Amazonka.CloudFront.Types.LambdaFunctionAssociations
import Amazonka.CloudFront.Types.TrustedKeyGroups
import Amazonka.CloudFront.Types.TrustedSigners
import Amazonka.CloudFront.Types.ViewerProtocolPolicy
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import qualified Amazonka.Prelude as Prelude
data DefaultCacheBehavior = DefaultCacheBehavior'
{ DefaultCacheBehavior -> Maybe AllowedMethods
allowedMethods :: Prelude.Maybe AllowedMethods,
DefaultCacheBehavior -> Maybe Text
cachePolicyId :: Prelude.Maybe Prelude.Text,
DefaultCacheBehavior -> Maybe Bool
compress :: Prelude.Maybe Prelude.Bool,
DefaultCacheBehavior -> Maybe Integer
defaultTTL :: Prelude.Maybe Prelude.Integer,
DefaultCacheBehavior -> Maybe Text
fieldLevelEncryptionId :: Prelude.Maybe Prelude.Text,
DefaultCacheBehavior -> Maybe ForwardedValues
forwardedValues :: Prelude.Maybe ForwardedValues,
DefaultCacheBehavior -> Maybe FunctionAssociations
functionAssociations :: Prelude.Maybe FunctionAssociations,
DefaultCacheBehavior -> Maybe LambdaFunctionAssociations
lambdaFunctionAssociations :: Prelude.Maybe LambdaFunctionAssociations,
DefaultCacheBehavior -> Maybe Integer
maxTTL :: Prelude.Maybe Prelude.Integer,
DefaultCacheBehavior -> Maybe Integer
minTTL :: Prelude.Maybe Prelude.Integer,
DefaultCacheBehavior -> Maybe Text
originRequestPolicyId :: Prelude.Maybe Prelude.Text,
DefaultCacheBehavior -> Maybe Text
realtimeLogConfigArn :: Prelude.Maybe Prelude.Text,
:: Prelude.Maybe Prelude.Text,
DefaultCacheBehavior -> Maybe Bool
smoothStreaming :: Prelude.Maybe Prelude.Bool,
DefaultCacheBehavior -> Maybe TrustedKeyGroups
trustedKeyGroups :: Prelude.Maybe TrustedKeyGroups,
DefaultCacheBehavior -> Maybe TrustedSigners
trustedSigners :: Prelude.Maybe TrustedSigners,
DefaultCacheBehavior -> Text
targetOriginId :: Prelude.Text,
DefaultCacheBehavior -> ViewerProtocolPolicy
viewerProtocolPolicy :: ViewerProtocolPolicy
}
deriving (DefaultCacheBehavior -> DefaultCacheBehavior -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DefaultCacheBehavior -> DefaultCacheBehavior -> Bool
$c/= :: DefaultCacheBehavior -> DefaultCacheBehavior -> Bool
== :: DefaultCacheBehavior -> DefaultCacheBehavior -> Bool
$c== :: DefaultCacheBehavior -> DefaultCacheBehavior -> Bool
Prelude.Eq, ReadPrec [DefaultCacheBehavior]
ReadPrec DefaultCacheBehavior
Int -> ReadS DefaultCacheBehavior
ReadS [DefaultCacheBehavior]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DefaultCacheBehavior]
$creadListPrec :: ReadPrec [DefaultCacheBehavior]
readPrec :: ReadPrec DefaultCacheBehavior
$creadPrec :: ReadPrec DefaultCacheBehavior
readList :: ReadS [DefaultCacheBehavior]
$creadList :: ReadS [DefaultCacheBehavior]
readsPrec :: Int -> ReadS DefaultCacheBehavior
$creadsPrec :: Int -> ReadS DefaultCacheBehavior
Prelude.Read, Int -> DefaultCacheBehavior -> ShowS
[DefaultCacheBehavior] -> ShowS
DefaultCacheBehavior -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DefaultCacheBehavior] -> ShowS
$cshowList :: [DefaultCacheBehavior] -> ShowS
show :: DefaultCacheBehavior -> String
$cshow :: DefaultCacheBehavior -> String
showsPrec :: Int -> DefaultCacheBehavior -> ShowS
$cshowsPrec :: Int -> DefaultCacheBehavior -> ShowS
Prelude.Show, forall x. Rep DefaultCacheBehavior x -> DefaultCacheBehavior
forall x. DefaultCacheBehavior -> Rep DefaultCacheBehavior x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep DefaultCacheBehavior x -> DefaultCacheBehavior
$cfrom :: forall x. DefaultCacheBehavior -> Rep DefaultCacheBehavior x
Prelude.Generic)
newDefaultCacheBehavior ::
Prelude.Text ->
ViewerProtocolPolicy ->
DefaultCacheBehavior
newDefaultCacheBehavior :: Text -> ViewerProtocolPolicy -> DefaultCacheBehavior
newDefaultCacheBehavior
Text
pTargetOriginId_
ViewerProtocolPolicy
pViewerProtocolPolicy_ =
DefaultCacheBehavior'
{ $sel:allowedMethods:DefaultCacheBehavior' :: Maybe AllowedMethods
allowedMethods =
forall a. Maybe a
Prelude.Nothing,
$sel:cachePolicyId:DefaultCacheBehavior' :: Maybe Text
cachePolicyId = forall a. Maybe a
Prelude.Nothing,
$sel:compress:DefaultCacheBehavior' :: Maybe Bool
compress = forall a. Maybe a
Prelude.Nothing,
$sel:defaultTTL:DefaultCacheBehavior' :: Maybe Integer
defaultTTL = forall a. Maybe a
Prelude.Nothing,
$sel:fieldLevelEncryptionId:DefaultCacheBehavior' :: Maybe Text
fieldLevelEncryptionId = forall a. Maybe a
Prelude.Nothing,
$sel:forwardedValues:DefaultCacheBehavior' :: Maybe ForwardedValues
forwardedValues = forall a. Maybe a
Prelude.Nothing,
$sel:functionAssociations:DefaultCacheBehavior' :: Maybe FunctionAssociations
functionAssociations = forall a. Maybe a
Prelude.Nothing,
$sel:lambdaFunctionAssociations:DefaultCacheBehavior' :: Maybe LambdaFunctionAssociations
lambdaFunctionAssociations = forall a. Maybe a
Prelude.Nothing,
$sel:maxTTL:DefaultCacheBehavior' :: Maybe Integer
maxTTL = forall a. Maybe a
Prelude.Nothing,
$sel:minTTL:DefaultCacheBehavior' :: Maybe Integer
minTTL = forall a. Maybe a
Prelude.Nothing,
$sel:originRequestPolicyId:DefaultCacheBehavior' :: Maybe Text
originRequestPolicyId = forall a. Maybe a
Prelude.Nothing,
$sel:realtimeLogConfigArn:DefaultCacheBehavior' :: Maybe Text
realtimeLogConfigArn = forall a. Maybe a
Prelude.Nothing,
$sel:responseHeadersPolicyId:DefaultCacheBehavior' :: Maybe Text
responseHeadersPolicyId = forall a. Maybe a
Prelude.Nothing,
$sel:smoothStreaming:DefaultCacheBehavior' :: Maybe Bool
smoothStreaming = forall a. Maybe a
Prelude.Nothing,
$sel:trustedKeyGroups:DefaultCacheBehavior' :: Maybe TrustedKeyGroups
trustedKeyGroups = forall a. Maybe a
Prelude.Nothing,
$sel:trustedSigners:DefaultCacheBehavior' :: Maybe TrustedSigners
trustedSigners = forall a. Maybe a
Prelude.Nothing,
$sel:targetOriginId:DefaultCacheBehavior' :: Text
targetOriginId = Text
pTargetOriginId_,
$sel:viewerProtocolPolicy:DefaultCacheBehavior' :: ViewerProtocolPolicy
viewerProtocolPolicy = ViewerProtocolPolicy
pViewerProtocolPolicy_
}
defaultCacheBehavior_allowedMethods :: Lens.Lens' DefaultCacheBehavior (Prelude.Maybe AllowedMethods)
defaultCacheBehavior_allowedMethods :: Lens' DefaultCacheBehavior (Maybe AllowedMethods)
defaultCacheBehavior_allowedMethods = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DefaultCacheBehavior' {Maybe AllowedMethods
allowedMethods :: Maybe AllowedMethods
$sel:allowedMethods:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe AllowedMethods
allowedMethods} -> Maybe AllowedMethods
allowedMethods) (\s :: DefaultCacheBehavior
s@DefaultCacheBehavior' {} Maybe AllowedMethods
a -> DefaultCacheBehavior
s {$sel:allowedMethods:DefaultCacheBehavior' :: Maybe AllowedMethods
allowedMethods = Maybe AllowedMethods
a} :: DefaultCacheBehavior)
defaultCacheBehavior_cachePolicyId :: Lens.Lens' DefaultCacheBehavior (Prelude.Maybe Prelude.Text)
defaultCacheBehavior_cachePolicyId :: Lens' DefaultCacheBehavior (Maybe Text)
defaultCacheBehavior_cachePolicyId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DefaultCacheBehavior' {Maybe Text
cachePolicyId :: Maybe Text
$sel:cachePolicyId:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe Text
cachePolicyId} -> Maybe Text
cachePolicyId) (\s :: DefaultCacheBehavior
s@DefaultCacheBehavior' {} Maybe Text
a -> DefaultCacheBehavior
s {$sel:cachePolicyId:DefaultCacheBehavior' :: Maybe Text
cachePolicyId = Maybe Text
a} :: DefaultCacheBehavior)
defaultCacheBehavior_compress :: Lens.Lens' DefaultCacheBehavior (Prelude.Maybe Prelude.Bool)
defaultCacheBehavior_compress :: Lens' DefaultCacheBehavior (Maybe Bool)
defaultCacheBehavior_compress = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DefaultCacheBehavior' {Maybe Bool
compress :: Maybe Bool
$sel:compress:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe Bool
compress} -> Maybe Bool
compress) (\s :: DefaultCacheBehavior
s@DefaultCacheBehavior' {} Maybe Bool
a -> DefaultCacheBehavior
s {$sel:compress:DefaultCacheBehavior' :: Maybe Bool
compress = Maybe Bool
a} :: DefaultCacheBehavior)
defaultCacheBehavior_defaultTTL :: Lens.Lens' DefaultCacheBehavior (Prelude.Maybe Prelude.Integer)
defaultCacheBehavior_defaultTTL :: Lens' DefaultCacheBehavior (Maybe Integer)
defaultCacheBehavior_defaultTTL = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DefaultCacheBehavior' {Maybe Integer
defaultTTL :: Maybe Integer
$sel:defaultTTL:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe Integer
defaultTTL} -> Maybe Integer
defaultTTL) (\s :: DefaultCacheBehavior
s@DefaultCacheBehavior' {} Maybe Integer
a -> DefaultCacheBehavior
s {$sel:defaultTTL:DefaultCacheBehavior' :: Maybe Integer
defaultTTL = Maybe Integer
a} :: DefaultCacheBehavior)
defaultCacheBehavior_fieldLevelEncryptionId :: Lens.Lens' DefaultCacheBehavior (Prelude.Maybe Prelude.Text)
defaultCacheBehavior_fieldLevelEncryptionId :: Lens' DefaultCacheBehavior (Maybe Text)
defaultCacheBehavior_fieldLevelEncryptionId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DefaultCacheBehavior' {Maybe Text
fieldLevelEncryptionId :: Maybe Text
$sel:fieldLevelEncryptionId:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe Text
fieldLevelEncryptionId} -> Maybe Text
fieldLevelEncryptionId) (\s :: DefaultCacheBehavior
s@DefaultCacheBehavior' {} Maybe Text
a -> DefaultCacheBehavior
s {$sel:fieldLevelEncryptionId:DefaultCacheBehavior' :: Maybe Text
fieldLevelEncryptionId = Maybe Text
a} :: DefaultCacheBehavior)
defaultCacheBehavior_forwardedValues :: Lens.Lens' DefaultCacheBehavior (Prelude.Maybe ForwardedValues)
defaultCacheBehavior_forwardedValues :: Lens' DefaultCacheBehavior (Maybe ForwardedValues)
defaultCacheBehavior_forwardedValues = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DefaultCacheBehavior' {Maybe ForwardedValues
forwardedValues :: Maybe ForwardedValues
$sel:forwardedValues:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe ForwardedValues
forwardedValues} -> Maybe ForwardedValues
forwardedValues) (\s :: DefaultCacheBehavior
s@DefaultCacheBehavior' {} Maybe ForwardedValues
a -> DefaultCacheBehavior
s {$sel:forwardedValues:DefaultCacheBehavior' :: Maybe ForwardedValues
forwardedValues = Maybe ForwardedValues
a} :: DefaultCacheBehavior)
defaultCacheBehavior_functionAssociations :: Lens.Lens' DefaultCacheBehavior (Prelude.Maybe FunctionAssociations)
defaultCacheBehavior_functionAssociations :: Lens' DefaultCacheBehavior (Maybe FunctionAssociations)
defaultCacheBehavior_functionAssociations = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DefaultCacheBehavior' {Maybe FunctionAssociations
functionAssociations :: Maybe FunctionAssociations
$sel:functionAssociations:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe FunctionAssociations
functionAssociations} -> Maybe FunctionAssociations
functionAssociations) (\s :: DefaultCacheBehavior
s@DefaultCacheBehavior' {} Maybe FunctionAssociations
a -> DefaultCacheBehavior
s {$sel:functionAssociations:DefaultCacheBehavior' :: Maybe FunctionAssociations
functionAssociations = Maybe FunctionAssociations
a} :: DefaultCacheBehavior)
defaultCacheBehavior_lambdaFunctionAssociations :: Lens.Lens' DefaultCacheBehavior (Prelude.Maybe LambdaFunctionAssociations)
defaultCacheBehavior_lambdaFunctionAssociations :: Lens' DefaultCacheBehavior (Maybe LambdaFunctionAssociations)
defaultCacheBehavior_lambdaFunctionAssociations = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DefaultCacheBehavior' {Maybe LambdaFunctionAssociations
lambdaFunctionAssociations :: Maybe LambdaFunctionAssociations
$sel:lambdaFunctionAssociations:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe LambdaFunctionAssociations
lambdaFunctionAssociations} -> Maybe LambdaFunctionAssociations
lambdaFunctionAssociations) (\s :: DefaultCacheBehavior
s@DefaultCacheBehavior' {} Maybe LambdaFunctionAssociations
a -> DefaultCacheBehavior
s {$sel:lambdaFunctionAssociations:DefaultCacheBehavior' :: Maybe LambdaFunctionAssociations
lambdaFunctionAssociations = Maybe LambdaFunctionAssociations
a} :: DefaultCacheBehavior)
defaultCacheBehavior_maxTTL :: Lens.Lens' DefaultCacheBehavior (Prelude.Maybe Prelude.Integer)
defaultCacheBehavior_maxTTL :: Lens' DefaultCacheBehavior (Maybe Integer)
defaultCacheBehavior_maxTTL = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DefaultCacheBehavior' {Maybe Integer
maxTTL :: Maybe Integer
$sel:maxTTL:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe Integer
maxTTL} -> Maybe Integer
maxTTL) (\s :: DefaultCacheBehavior
s@DefaultCacheBehavior' {} Maybe Integer
a -> DefaultCacheBehavior
s {$sel:maxTTL:DefaultCacheBehavior' :: Maybe Integer
maxTTL = Maybe Integer
a} :: DefaultCacheBehavior)
defaultCacheBehavior_minTTL :: Lens.Lens' DefaultCacheBehavior (Prelude.Maybe Prelude.Integer)
defaultCacheBehavior_minTTL :: Lens' DefaultCacheBehavior (Maybe Integer)
defaultCacheBehavior_minTTL = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DefaultCacheBehavior' {Maybe Integer
minTTL :: Maybe Integer
$sel:minTTL:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe Integer
minTTL} -> Maybe Integer
minTTL) (\s :: DefaultCacheBehavior
s@DefaultCacheBehavior' {} Maybe Integer
a -> DefaultCacheBehavior
s {$sel:minTTL:DefaultCacheBehavior' :: Maybe Integer
minTTL = Maybe Integer
a} :: DefaultCacheBehavior)
defaultCacheBehavior_originRequestPolicyId :: Lens.Lens' DefaultCacheBehavior (Prelude.Maybe Prelude.Text)
defaultCacheBehavior_originRequestPolicyId :: Lens' DefaultCacheBehavior (Maybe Text)
defaultCacheBehavior_originRequestPolicyId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DefaultCacheBehavior' {Maybe Text
originRequestPolicyId :: Maybe Text
$sel:originRequestPolicyId:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe Text
originRequestPolicyId} -> Maybe Text
originRequestPolicyId) (\s :: DefaultCacheBehavior
s@DefaultCacheBehavior' {} Maybe Text
a -> DefaultCacheBehavior
s {$sel:originRequestPolicyId:DefaultCacheBehavior' :: Maybe Text
originRequestPolicyId = Maybe Text
a} :: DefaultCacheBehavior)
defaultCacheBehavior_realtimeLogConfigArn :: Lens.Lens' DefaultCacheBehavior (Prelude.Maybe Prelude.Text)
defaultCacheBehavior_realtimeLogConfigArn :: Lens' DefaultCacheBehavior (Maybe Text)
defaultCacheBehavior_realtimeLogConfigArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DefaultCacheBehavior' {Maybe Text
realtimeLogConfigArn :: Maybe Text
$sel:realtimeLogConfigArn:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe Text
realtimeLogConfigArn} -> Maybe Text
realtimeLogConfigArn) (\s :: DefaultCacheBehavior
s@DefaultCacheBehavior' {} Maybe Text
a -> DefaultCacheBehavior
s {$sel:realtimeLogConfigArn:DefaultCacheBehavior' :: Maybe Text
realtimeLogConfigArn = Maybe Text
a} :: DefaultCacheBehavior)
defaultCacheBehavior_responseHeadersPolicyId :: Lens.Lens' DefaultCacheBehavior (Prelude.Maybe Prelude.Text)
= forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DefaultCacheBehavior' {Maybe Text
responseHeadersPolicyId :: Maybe Text
$sel:responseHeadersPolicyId:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe Text
responseHeadersPolicyId} -> Maybe Text
responseHeadersPolicyId) (\s :: DefaultCacheBehavior
s@DefaultCacheBehavior' {} Maybe Text
a -> DefaultCacheBehavior
s {$sel:responseHeadersPolicyId:DefaultCacheBehavior' :: Maybe Text
responseHeadersPolicyId = Maybe Text
a} :: DefaultCacheBehavior)
defaultCacheBehavior_smoothStreaming :: Lens.Lens' DefaultCacheBehavior (Prelude.Maybe Prelude.Bool)
defaultCacheBehavior_smoothStreaming :: Lens' DefaultCacheBehavior (Maybe Bool)
defaultCacheBehavior_smoothStreaming = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DefaultCacheBehavior' {Maybe Bool
smoothStreaming :: Maybe Bool
$sel:smoothStreaming:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe Bool
smoothStreaming} -> Maybe Bool
smoothStreaming) (\s :: DefaultCacheBehavior
s@DefaultCacheBehavior' {} Maybe Bool
a -> DefaultCacheBehavior
s {$sel:smoothStreaming:DefaultCacheBehavior' :: Maybe Bool
smoothStreaming = Maybe Bool
a} :: DefaultCacheBehavior)
defaultCacheBehavior_trustedKeyGroups :: Lens.Lens' DefaultCacheBehavior (Prelude.Maybe TrustedKeyGroups)
defaultCacheBehavior_trustedKeyGroups :: Lens' DefaultCacheBehavior (Maybe TrustedKeyGroups)
defaultCacheBehavior_trustedKeyGroups = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DefaultCacheBehavior' {Maybe TrustedKeyGroups
trustedKeyGroups :: Maybe TrustedKeyGroups
$sel:trustedKeyGroups:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe TrustedKeyGroups
trustedKeyGroups} -> Maybe TrustedKeyGroups
trustedKeyGroups) (\s :: DefaultCacheBehavior
s@DefaultCacheBehavior' {} Maybe TrustedKeyGroups
a -> DefaultCacheBehavior
s {$sel:trustedKeyGroups:DefaultCacheBehavior' :: Maybe TrustedKeyGroups
trustedKeyGroups = Maybe TrustedKeyGroups
a} :: DefaultCacheBehavior)
defaultCacheBehavior_trustedSigners :: Lens.Lens' DefaultCacheBehavior (Prelude.Maybe TrustedSigners)
defaultCacheBehavior_trustedSigners :: Lens' DefaultCacheBehavior (Maybe TrustedSigners)
defaultCacheBehavior_trustedSigners = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DefaultCacheBehavior' {Maybe TrustedSigners
trustedSigners :: Maybe TrustedSigners
$sel:trustedSigners:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe TrustedSigners
trustedSigners} -> Maybe TrustedSigners
trustedSigners) (\s :: DefaultCacheBehavior
s@DefaultCacheBehavior' {} Maybe TrustedSigners
a -> DefaultCacheBehavior
s {$sel:trustedSigners:DefaultCacheBehavior' :: Maybe TrustedSigners
trustedSigners = Maybe TrustedSigners
a} :: DefaultCacheBehavior)
defaultCacheBehavior_targetOriginId :: Lens.Lens' DefaultCacheBehavior Prelude.Text
defaultCacheBehavior_targetOriginId :: Lens' DefaultCacheBehavior Text
defaultCacheBehavior_targetOriginId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DefaultCacheBehavior' {Text
targetOriginId :: Text
$sel:targetOriginId:DefaultCacheBehavior' :: DefaultCacheBehavior -> Text
targetOriginId} -> Text
targetOriginId) (\s :: DefaultCacheBehavior
s@DefaultCacheBehavior' {} Text
a -> DefaultCacheBehavior
s {$sel:targetOriginId:DefaultCacheBehavior' :: Text
targetOriginId = Text
a} :: DefaultCacheBehavior)
defaultCacheBehavior_viewerProtocolPolicy :: Lens.Lens' DefaultCacheBehavior ViewerProtocolPolicy
defaultCacheBehavior_viewerProtocolPolicy :: Lens' DefaultCacheBehavior ViewerProtocolPolicy
defaultCacheBehavior_viewerProtocolPolicy = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DefaultCacheBehavior' {ViewerProtocolPolicy
viewerProtocolPolicy :: ViewerProtocolPolicy
$sel:viewerProtocolPolicy:DefaultCacheBehavior' :: DefaultCacheBehavior -> ViewerProtocolPolicy
viewerProtocolPolicy} -> ViewerProtocolPolicy
viewerProtocolPolicy) (\s :: DefaultCacheBehavior
s@DefaultCacheBehavior' {} ViewerProtocolPolicy
a -> DefaultCacheBehavior
s {$sel:viewerProtocolPolicy:DefaultCacheBehavior' :: ViewerProtocolPolicy
viewerProtocolPolicy = ViewerProtocolPolicy
a} :: DefaultCacheBehavior)
instance Data.FromXML DefaultCacheBehavior where
parseXML :: [Node] -> Either String DefaultCacheBehavior
parseXML [Node]
x =
Maybe AllowedMethods
-> Maybe Text
-> Maybe Bool
-> Maybe Integer
-> Maybe Text
-> Maybe ForwardedValues
-> Maybe FunctionAssociations
-> Maybe LambdaFunctionAssociations
-> Maybe Integer
-> Maybe Integer
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Bool
-> Maybe TrustedKeyGroups
-> Maybe TrustedSigners
-> Text
-> ViewerProtocolPolicy
-> DefaultCacheBehavior
DefaultCacheBehavior'
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> ([Node]
x forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Data..@? Text
"AllowedMethods")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Data..@? Text
"CachePolicyId")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Data..@? Text
"Compress")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Data..@? Text
"DefaultTTL")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Data..@? Text
"FieldLevelEncryptionId")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Data..@? Text
"ForwardedValues")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Data..@? Text
"FunctionAssociations")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Data..@? Text
"LambdaFunctionAssociations")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Data..@? Text
"MaxTTL")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Data..@? Text
"MinTTL")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Data..@? Text
"OriginRequestPolicyId")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Data..@? Text
"RealtimeLogConfigArn")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Data..@? Text
"ResponseHeadersPolicyId")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Data..@? Text
"SmoothStreaming")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Data..@? Text
"TrustedKeyGroups")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Data..@? Text
"TrustedSigners")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x forall a. FromXML a => [Node] -> Text -> Either String a
Data..@ Text
"TargetOriginId")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x forall a. FromXML a => [Node] -> Text -> Either String a
Data..@ Text
"ViewerProtocolPolicy")
instance Prelude.Hashable DefaultCacheBehavior where
hashWithSalt :: Int -> DefaultCacheBehavior -> Int
hashWithSalt Int
_salt DefaultCacheBehavior' {Maybe Bool
Maybe Integer
Maybe Text
Maybe FunctionAssociations
Maybe LambdaFunctionAssociations
Maybe AllowedMethods
Maybe ForwardedValues
Maybe TrustedKeyGroups
Maybe TrustedSigners
Text
ViewerProtocolPolicy
viewerProtocolPolicy :: ViewerProtocolPolicy
targetOriginId :: Text
trustedSigners :: Maybe TrustedSigners
trustedKeyGroups :: Maybe TrustedKeyGroups
smoothStreaming :: Maybe Bool
responseHeadersPolicyId :: Maybe Text
realtimeLogConfigArn :: Maybe Text
originRequestPolicyId :: Maybe Text
minTTL :: Maybe Integer
maxTTL :: Maybe Integer
lambdaFunctionAssociations :: Maybe LambdaFunctionAssociations
functionAssociations :: Maybe FunctionAssociations
forwardedValues :: Maybe ForwardedValues
fieldLevelEncryptionId :: Maybe Text
defaultTTL :: Maybe Integer
compress :: Maybe Bool
cachePolicyId :: Maybe Text
allowedMethods :: Maybe AllowedMethods
$sel:viewerProtocolPolicy:DefaultCacheBehavior' :: DefaultCacheBehavior -> ViewerProtocolPolicy
$sel:targetOriginId:DefaultCacheBehavior' :: DefaultCacheBehavior -> Text
$sel:trustedSigners:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe TrustedSigners
$sel:trustedKeyGroups:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe TrustedKeyGroups
$sel:smoothStreaming:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe Bool
$sel:responseHeadersPolicyId:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe Text
$sel:realtimeLogConfigArn:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe Text
$sel:originRequestPolicyId:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe Text
$sel:minTTL:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe Integer
$sel:maxTTL:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe Integer
$sel:lambdaFunctionAssociations:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe LambdaFunctionAssociations
$sel:functionAssociations:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe FunctionAssociations
$sel:forwardedValues:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe ForwardedValues
$sel:fieldLevelEncryptionId:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe Text
$sel:defaultTTL:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe Integer
$sel:compress:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe Bool
$sel:cachePolicyId:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe Text
$sel:allowedMethods:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe AllowedMethods
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe AllowedMethods
allowedMethods
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
cachePolicyId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
compress
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Integer
defaultTTL
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
fieldLevelEncryptionId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe ForwardedValues
forwardedValues
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe FunctionAssociations
functionAssociations
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe LambdaFunctionAssociations
lambdaFunctionAssociations
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Integer
maxTTL
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Integer
minTTL
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
originRequestPolicyId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
realtimeLogConfigArn
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
responseHeadersPolicyId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
smoothStreaming
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe TrustedKeyGroups
trustedKeyGroups
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe TrustedSigners
trustedSigners
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
targetOriginId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` ViewerProtocolPolicy
viewerProtocolPolicy
instance Prelude.NFData DefaultCacheBehavior where
rnf :: DefaultCacheBehavior -> ()
rnf DefaultCacheBehavior' {Maybe Bool
Maybe Integer
Maybe Text
Maybe FunctionAssociations
Maybe LambdaFunctionAssociations
Maybe AllowedMethods
Maybe ForwardedValues
Maybe TrustedKeyGroups
Maybe TrustedSigners
Text
ViewerProtocolPolicy
viewerProtocolPolicy :: ViewerProtocolPolicy
targetOriginId :: Text
trustedSigners :: Maybe TrustedSigners
trustedKeyGroups :: Maybe TrustedKeyGroups
smoothStreaming :: Maybe Bool
responseHeadersPolicyId :: Maybe Text
realtimeLogConfigArn :: Maybe Text
originRequestPolicyId :: Maybe Text
minTTL :: Maybe Integer
maxTTL :: Maybe Integer
lambdaFunctionAssociations :: Maybe LambdaFunctionAssociations
functionAssociations :: Maybe FunctionAssociations
forwardedValues :: Maybe ForwardedValues
fieldLevelEncryptionId :: Maybe Text
defaultTTL :: Maybe Integer
compress :: Maybe Bool
cachePolicyId :: Maybe Text
allowedMethods :: Maybe AllowedMethods
$sel:viewerProtocolPolicy:DefaultCacheBehavior' :: DefaultCacheBehavior -> ViewerProtocolPolicy
$sel:targetOriginId:DefaultCacheBehavior' :: DefaultCacheBehavior -> Text
$sel:trustedSigners:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe TrustedSigners
$sel:trustedKeyGroups:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe TrustedKeyGroups
$sel:smoothStreaming:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe Bool
$sel:responseHeadersPolicyId:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe Text
$sel:realtimeLogConfigArn:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe Text
$sel:originRequestPolicyId:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe Text
$sel:minTTL:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe Integer
$sel:maxTTL:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe Integer
$sel:lambdaFunctionAssociations:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe LambdaFunctionAssociations
$sel:functionAssociations:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe FunctionAssociations
$sel:forwardedValues:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe ForwardedValues
$sel:fieldLevelEncryptionId:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe Text
$sel:defaultTTL:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe Integer
$sel:compress:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe Bool
$sel:cachePolicyId:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe Text
$sel:allowedMethods:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe AllowedMethods
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe AllowedMethods
allowedMethods
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
cachePolicyId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Bool
compress
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Integer
defaultTTL
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
fieldLevelEncryptionId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe ForwardedValues
forwardedValues
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe FunctionAssociations
functionAssociations
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe LambdaFunctionAssociations
lambdaFunctionAssociations
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Integer
maxTTL
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Integer
minTTL
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
originRequestPolicyId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
realtimeLogConfigArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
responseHeadersPolicyId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Bool
smoothStreaming
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe TrustedKeyGroups
trustedKeyGroups
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe TrustedSigners
trustedSigners
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
targetOriginId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf ViewerProtocolPolicy
viewerProtocolPolicy
instance Data.ToXML DefaultCacheBehavior where
toXML :: DefaultCacheBehavior -> XML
toXML DefaultCacheBehavior' {Maybe Bool
Maybe Integer
Maybe Text
Maybe FunctionAssociations
Maybe LambdaFunctionAssociations
Maybe AllowedMethods
Maybe ForwardedValues
Maybe TrustedKeyGroups
Maybe TrustedSigners
Text
ViewerProtocolPolicy
viewerProtocolPolicy :: ViewerProtocolPolicy
targetOriginId :: Text
trustedSigners :: Maybe TrustedSigners
trustedKeyGroups :: Maybe TrustedKeyGroups
smoothStreaming :: Maybe Bool
responseHeadersPolicyId :: Maybe Text
realtimeLogConfigArn :: Maybe Text
originRequestPolicyId :: Maybe Text
minTTL :: Maybe Integer
maxTTL :: Maybe Integer
lambdaFunctionAssociations :: Maybe LambdaFunctionAssociations
functionAssociations :: Maybe FunctionAssociations
forwardedValues :: Maybe ForwardedValues
fieldLevelEncryptionId :: Maybe Text
defaultTTL :: Maybe Integer
compress :: Maybe Bool
cachePolicyId :: Maybe Text
allowedMethods :: Maybe AllowedMethods
$sel:viewerProtocolPolicy:DefaultCacheBehavior' :: DefaultCacheBehavior -> ViewerProtocolPolicy
$sel:targetOriginId:DefaultCacheBehavior' :: DefaultCacheBehavior -> Text
$sel:trustedSigners:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe TrustedSigners
$sel:trustedKeyGroups:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe TrustedKeyGroups
$sel:smoothStreaming:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe Bool
$sel:responseHeadersPolicyId:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe Text
$sel:realtimeLogConfigArn:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe Text
$sel:originRequestPolicyId:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe Text
$sel:minTTL:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe Integer
$sel:maxTTL:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe Integer
$sel:lambdaFunctionAssociations:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe LambdaFunctionAssociations
$sel:functionAssociations:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe FunctionAssociations
$sel:forwardedValues:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe ForwardedValues
$sel:fieldLevelEncryptionId:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe Text
$sel:defaultTTL:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe Integer
$sel:compress:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe Bool
$sel:cachePolicyId:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe Text
$sel:allowedMethods:DefaultCacheBehavior' :: DefaultCacheBehavior -> Maybe AllowedMethods
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ Name
"AllowedMethods" forall a. ToXML a => Name -> a -> XML
Data.@= Maybe AllowedMethods
allowedMethods,
Name
"CachePolicyId" forall a. ToXML a => Name -> a -> XML
Data.@= Maybe Text
cachePolicyId,
Name
"Compress" forall a. ToXML a => Name -> a -> XML
Data.@= Maybe Bool
compress,
Name
"DefaultTTL" forall a. ToXML a => Name -> a -> XML
Data.@= Maybe Integer
defaultTTL,
Name
"FieldLevelEncryptionId"
forall a. ToXML a => Name -> a -> XML
Data.@= Maybe Text
fieldLevelEncryptionId,
Name
"ForwardedValues" forall a. ToXML a => Name -> a -> XML
Data.@= Maybe ForwardedValues
forwardedValues,
Name
"FunctionAssociations" forall a. ToXML a => Name -> a -> XML
Data.@= Maybe FunctionAssociations
functionAssociations,
Name
"LambdaFunctionAssociations"
forall a. ToXML a => Name -> a -> XML
Data.@= Maybe LambdaFunctionAssociations
lambdaFunctionAssociations,
Name
"MaxTTL" forall a. ToXML a => Name -> a -> XML
Data.@= Maybe Integer
maxTTL,
Name
"MinTTL" forall a. ToXML a => Name -> a -> XML
Data.@= Maybe Integer
minTTL,
Name
"OriginRequestPolicyId"
forall a. ToXML a => Name -> a -> XML
Data.@= Maybe Text
originRequestPolicyId,
Name
"RealtimeLogConfigArn" forall a. ToXML a => Name -> a -> XML
Data.@= Maybe Text
realtimeLogConfigArn,
Name
"ResponseHeadersPolicyId"
forall a. ToXML a => Name -> a -> XML
Data.@= Maybe Text
responseHeadersPolicyId,
Name
"SmoothStreaming" forall a. ToXML a => Name -> a -> XML
Data.@= Maybe Bool
smoothStreaming,
Name
"TrustedKeyGroups" forall a. ToXML a => Name -> a -> XML
Data.@= Maybe TrustedKeyGroups
trustedKeyGroups,
Name
"TrustedSigners" forall a. ToXML a => Name -> a -> XML
Data.@= Maybe TrustedSigners
trustedSigners,
Name
"TargetOriginId" forall a. ToXML a => Name -> a -> XML
Data.@= Text
targetOriginId,
Name
"ViewerProtocolPolicy" forall a. ToXML a => Name -> a -> XML
Data.@= ViewerProtocolPolicy
viewerProtocolPolicy
]