{-# 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.GameLift.Types.MatchmakingConfiguration where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import Amazonka.GameLift.Types.BackfillMode
import Amazonka.GameLift.Types.FlexMatchMode
import Amazonka.GameLift.Types.GameProperty
import qualified Amazonka.Prelude as Prelude
data MatchmakingConfiguration = MatchmakingConfiguration'
{
MatchmakingConfiguration -> Maybe Bool
acceptanceRequired :: Prelude.Maybe Prelude.Bool,
MatchmakingConfiguration -> Maybe Natural
acceptanceTimeoutSeconds :: Prelude.Maybe Prelude.Natural,
MatchmakingConfiguration -> Maybe Natural
additionalPlayerCount :: Prelude.Maybe Prelude.Natural,
MatchmakingConfiguration -> Maybe BackfillMode
backfillMode :: Prelude.Maybe BackfillMode,
MatchmakingConfiguration -> Maybe Text
configurationArn :: Prelude.Maybe Prelude.Text,
MatchmakingConfiguration -> Maybe POSIX
creationTime :: Prelude.Maybe Data.POSIX,
MatchmakingConfiguration -> Maybe Text
customEventData :: Prelude.Maybe Prelude.Text,
MatchmakingConfiguration -> Maybe Text
description :: Prelude.Maybe Prelude.Text,
MatchmakingConfiguration -> Maybe FlexMatchMode
flexMatchMode :: Prelude.Maybe FlexMatchMode,
MatchmakingConfiguration -> Maybe [GameProperty]
gameProperties :: Prelude.Maybe [GameProperty],
MatchmakingConfiguration -> Maybe Text
gameSessionData :: Prelude.Maybe Prelude.Text,
MatchmakingConfiguration -> Maybe [Text]
gameSessionQueueArns :: Prelude.Maybe [Prelude.Text],
MatchmakingConfiguration -> Maybe Text
name :: Prelude.Maybe Prelude.Text,
MatchmakingConfiguration -> Maybe Text
notificationTarget :: Prelude.Maybe Prelude.Text,
MatchmakingConfiguration -> Maybe Natural
requestTimeoutSeconds :: Prelude.Maybe Prelude.Natural,
MatchmakingConfiguration -> Maybe Text
ruleSetArn :: Prelude.Maybe Prelude.Text,
MatchmakingConfiguration -> Maybe Text
ruleSetName :: Prelude.Maybe Prelude.Text
}
deriving (MatchmakingConfiguration -> MatchmakingConfiguration -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: MatchmakingConfiguration -> MatchmakingConfiguration -> Bool
$c/= :: MatchmakingConfiguration -> MatchmakingConfiguration -> Bool
== :: MatchmakingConfiguration -> MatchmakingConfiguration -> Bool
$c== :: MatchmakingConfiguration -> MatchmakingConfiguration -> Bool
Prelude.Eq, ReadPrec [MatchmakingConfiguration]
ReadPrec MatchmakingConfiguration
Int -> ReadS MatchmakingConfiguration
ReadS [MatchmakingConfiguration]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [MatchmakingConfiguration]
$creadListPrec :: ReadPrec [MatchmakingConfiguration]
readPrec :: ReadPrec MatchmakingConfiguration
$creadPrec :: ReadPrec MatchmakingConfiguration
readList :: ReadS [MatchmakingConfiguration]
$creadList :: ReadS [MatchmakingConfiguration]
readsPrec :: Int -> ReadS MatchmakingConfiguration
$creadsPrec :: Int -> ReadS MatchmakingConfiguration
Prelude.Read, Int -> MatchmakingConfiguration -> ShowS
[MatchmakingConfiguration] -> ShowS
MatchmakingConfiguration -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [MatchmakingConfiguration] -> ShowS
$cshowList :: [MatchmakingConfiguration] -> ShowS
show :: MatchmakingConfiguration -> String
$cshow :: MatchmakingConfiguration -> String
showsPrec :: Int -> MatchmakingConfiguration -> ShowS
$cshowsPrec :: Int -> MatchmakingConfiguration -> ShowS
Prelude.Show, forall x.
Rep MatchmakingConfiguration x -> MatchmakingConfiguration
forall x.
MatchmakingConfiguration -> Rep MatchmakingConfiguration x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep MatchmakingConfiguration x -> MatchmakingConfiguration
$cfrom :: forall x.
MatchmakingConfiguration -> Rep MatchmakingConfiguration x
Prelude.Generic)
newMatchmakingConfiguration ::
MatchmakingConfiguration
newMatchmakingConfiguration :: MatchmakingConfiguration
newMatchmakingConfiguration =
MatchmakingConfiguration'
{ $sel:acceptanceRequired:MatchmakingConfiguration' :: Maybe Bool
acceptanceRequired =
forall a. Maybe a
Prelude.Nothing,
$sel:acceptanceTimeoutSeconds:MatchmakingConfiguration' :: Maybe Natural
acceptanceTimeoutSeconds = forall a. Maybe a
Prelude.Nothing,
$sel:additionalPlayerCount:MatchmakingConfiguration' :: Maybe Natural
additionalPlayerCount = forall a. Maybe a
Prelude.Nothing,
$sel:backfillMode:MatchmakingConfiguration' :: Maybe BackfillMode
backfillMode = forall a. Maybe a
Prelude.Nothing,
$sel:configurationArn:MatchmakingConfiguration' :: Maybe Text
configurationArn = forall a. Maybe a
Prelude.Nothing,
$sel:creationTime:MatchmakingConfiguration' :: Maybe POSIX
creationTime = forall a. Maybe a
Prelude.Nothing,
$sel:customEventData:MatchmakingConfiguration' :: Maybe Text
customEventData = forall a. Maybe a
Prelude.Nothing,
$sel:description:MatchmakingConfiguration' :: Maybe Text
description = forall a. Maybe a
Prelude.Nothing,
$sel:flexMatchMode:MatchmakingConfiguration' :: Maybe FlexMatchMode
flexMatchMode = forall a. Maybe a
Prelude.Nothing,
$sel:gameProperties:MatchmakingConfiguration' :: Maybe [GameProperty]
gameProperties = forall a. Maybe a
Prelude.Nothing,
$sel:gameSessionData:MatchmakingConfiguration' :: Maybe Text
gameSessionData = forall a. Maybe a
Prelude.Nothing,
$sel:gameSessionQueueArns:MatchmakingConfiguration' :: Maybe [Text]
gameSessionQueueArns = forall a. Maybe a
Prelude.Nothing,
$sel:name:MatchmakingConfiguration' :: Maybe Text
name = forall a. Maybe a
Prelude.Nothing,
$sel:notificationTarget:MatchmakingConfiguration' :: Maybe Text
notificationTarget = forall a. Maybe a
Prelude.Nothing,
$sel:requestTimeoutSeconds:MatchmakingConfiguration' :: Maybe Natural
requestTimeoutSeconds = forall a. Maybe a
Prelude.Nothing,
$sel:ruleSetArn:MatchmakingConfiguration' :: Maybe Text
ruleSetArn = forall a. Maybe a
Prelude.Nothing,
$sel:ruleSetName:MatchmakingConfiguration' :: Maybe Text
ruleSetName = forall a. Maybe a
Prelude.Nothing
}
matchmakingConfiguration_acceptanceRequired :: Lens.Lens' MatchmakingConfiguration (Prelude.Maybe Prelude.Bool)
matchmakingConfiguration_acceptanceRequired :: Lens' MatchmakingConfiguration (Maybe Bool)
matchmakingConfiguration_acceptanceRequired = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\MatchmakingConfiguration' {Maybe Bool
acceptanceRequired :: Maybe Bool
$sel:acceptanceRequired:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe Bool
acceptanceRequired} -> Maybe Bool
acceptanceRequired) (\s :: MatchmakingConfiguration
s@MatchmakingConfiguration' {} Maybe Bool
a -> MatchmakingConfiguration
s {$sel:acceptanceRequired:MatchmakingConfiguration' :: Maybe Bool
acceptanceRequired = Maybe Bool
a} :: MatchmakingConfiguration)
matchmakingConfiguration_acceptanceTimeoutSeconds :: Lens.Lens' MatchmakingConfiguration (Prelude.Maybe Prelude.Natural)
matchmakingConfiguration_acceptanceTimeoutSeconds :: Lens' MatchmakingConfiguration (Maybe Natural)
matchmakingConfiguration_acceptanceTimeoutSeconds = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\MatchmakingConfiguration' {Maybe Natural
acceptanceTimeoutSeconds :: Maybe Natural
$sel:acceptanceTimeoutSeconds:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe Natural
acceptanceTimeoutSeconds} -> Maybe Natural
acceptanceTimeoutSeconds) (\s :: MatchmakingConfiguration
s@MatchmakingConfiguration' {} Maybe Natural
a -> MatchmakingConfiguration
s {$sel:acceptanceTimeoutSeconds:MatchmakingConfiguration' :: Maybe Natural
acceptanceTimeoutSeconds = Maybe Natural
a} :: MatchmakingConfiguration)
matchmakingConfiguration_additionalPlayerCount :: Lens.Lens' MatchmakingConfiguration (Prelude.Maybe Prelude.Natural)
matchmakingConfiguration_additionalPlayerCount :: Lens' MatchmakingConfiguration (Maybe Natural)
matchmakingConfiguration_additionalPlayerCount = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\MatchmakingConfiguration' {Maybe Natural
additionalPlayerCount :: Maybe Natural
$sel:additionalPlayerCount:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe Natural
additionalPlayerCount} -> Maybe Natural
additionalPlayerCount) (\s :: MatchmakingConfiguration
s@MatchmakingConfiguration' {} Maybe Natural
a -> MatchmakingConfiguration
s {$sel:additionalPlayerCount:MatchmakingConfiguration' :: Maybe Natural
additionalPlayerCount = Maybe Natural
a} :: MatchmakingConfiguration)
matchmakingConfiguration_backfillMode :: Lens.Lens' MatchmakingConfiguration (Prelude.Maybe BackfillMode)
matchmakingConfiguration_backfillMode :: Lens' MatchmakingConfiguration (Maybe BackfillMode)
matchmakingConfiguration_backfillMode = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\MatchmakingConfiguration' {Maybe BackfillMode
backfillMode :: Maybe BackfillMode
$sel:backfillMode:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe BackfillMode
backfillMode} -> Maybe BackfillMode
backfillMode) (\s :: MatchmakingConfiguration
s@MatchmakingConfiguration' {} Maybe BackfillMode
a -> MatchmakingConfiguration
s {$sel:backfillMode:MatchmakingConfiguration' :: Maybe BackfillMode
backfillMode = Maybe BackfillMode
a} :: MatchmakingConfiguration)
matchmakingConfiguration_configurationArn :: Lens.Lens' MatchmakingConfiguration (Prelude.Maybe Prelude.Text)
matchmakingConfiguration_configurationArn :: Lens' MatchmakingConfiguration (Maybe Text)
matchmakingConfiguration_configurationArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\MatchmakingConfiguration' {Maybe Text
configurationArn :: Maybe Text
$sel:configurationArn:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe Text
configurationArn} -> Maybe Text
configurationArn) (\s :: MatchmakingConfiguration
s@MatchmakingConfiguration' {} Maybe Text
a -> MatchmakingConfiguration
s {$sel:configurationArn:MatchmakingConfiguration' :: Maybe Text
configurationArn = Maybe Text
a} :: MatchmakingConfiguration)
matchmakingConfiguration_creationTime :: Lens.Lens' MatchmakingConfiguration (Prelude.Maybe Prelude.UTCTime)
matchmakingConfiguration_creationTime :: Lens' MatchmakingConfiguration (Maybe UTCTime)
matchmakingConfiguration_creationTime = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\MatchmakingConfiguration' {Maybe POSIX
creationTime :: Maybe POSIX
$sel:creationTime:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe POSIX
creationTime} -> Maybe POSIX
creationTime) (\s :: MatchmakingConfiguration
s@MatchmakingConfiguration' {} Maybe POSIX
a -> MatchmakingConfiguration
s {$sel:creationTime:MatchmakingConfiguration' :: Maybe POSIX
creationTime = Maybe POSIX
a} :: MatchmakingConfiguration) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall (a :: Format). Iso' (Time a) UTCTime
Data._Time
matchmakingConfiguration_customEventData :: Lens.Lens' MatchmakingConfiguration (Prelude.Maybe Prelude.Text)
matchmakingConfiguration_customEventData :: Lens' MatchmakingConfiguration (Maybe Text)
matchmakingConfiguration_customEventData = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\MatchmakingConfiguration' {Maybe Text
customEventData :: Maybe Text
$sel:customEventData:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe Text
customEventData} -> Maybe Text
customEventData) (\s :: MatchmakingConfiguration
s@MatchmakingConfiguration' {} Maybe Text
a -> MatchmakingConfiguration
s {$sel:customEventData:MatchmakingConfiguration' :: Maybe Text
customEventData = Maybe Text
a} :: MatchmakingConfiguration)
matchmakingConfiguration_description :: Lens.Lens' MatchmakingConfiguration (Prelude.Maybe Prelude.Text)
matchmakingConfiguration_description :: Lens' MatchmakingConfiguration (Maybe Text)
matchmakingConfiguration_description = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\MatchmakingConfiguration' {Maybe Text
description :: Maybe Text
$sel:description:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe Text
description} -> Maybe Text
description) (\s :: MatchmakingConfiguration
s@MatchmakingConfiguration' {} Maybe Text
a -> MatchmakingConfiguration
s {$sel:description:MatchmakingConfiguration' :: Maybe Text
description = Maybe Text
a} :: MatchmakingConfiguration)
matchmakingConfiguration_flexMatchMode :: Lens.Lens' MatchmakingConfiguration (Prelude.Maybe FlexMatchMode)
matchmakingConfiguration_flexMatchMode :: Lens' MatchmakingConfiguration (Maybe FlexMatchMode)
matchmakingConfiguration_flexMatchMode = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\MatchmakingConfiguration' {Maybe FlexMatchMode
flexMatchMode :: Maybe FlexMatchMode
$sel:flexMatchMode:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe FlexMatchMode
flexMatchMode} -> Maybe FlexMatchMode
flexMatchMode) (\s :: MatchmakingConfiguration
s@MatchmakingConfiguration' {} Maybe FlexMatchMode
a -> MatchmakingConfiguration
s {$sel:flexMatchMode:MatchmakingConfiguration' :: Maybe FlexMatchMode
flexMatchMode = Maybe FlexMatchMode
a} :: MatchmakingConfiguration)
matchmakingConfiguration_gameProperties :: Lens.Lens' MatchmakingConfiguration (Prelude.Maybe [GameProperty])
matchmakingConfiguration_gameProperties :: Lens' MatchmakingConfiguration (Maybe [GameProperty])
matchmakingConfiguration_gameProperties = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\MatchmakingConfiguration' {Maybe [GameProperty]
gameProperties :: Maybe [GameProperty]
$sel:gameProperties:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe [GameProperty]
gameProperties} -> Maybe [GameProperty]
gameProperties) (\s :: MatchmakingConfiguration
s@MatchmakingConfiguration' {} Maybe [GameProperty]
a -> MatchmakingConfiguration
s {$sel:gameProperties:MatchmakingConfiguration' :: Maybe [GameProperty]
gameProperties = Maybe [GameProperty]
a} :: MatchmakingConfiguration) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
matchmakingConfiguration_gameSessionData :: Lens.Lens' MatchmakingConfiguration (Prelude.Maybe Prelude.Text)
matchmakingConfiguration_gameSessionData :: Lens' MatchmakingConfiguration (Maybe Text)
matchmakingConfiguration_gameSessionData = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\MatchmakingConfiguration' {Maybe Text
gameSessionData :: Maybe Text
$sel:gameSessionData:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe Text
gameSessionData} -> Maybe Text
gameSessionData) (\s :: MatchmakingConfiguration
s@MatchmakingConfiguration' {} Maybe Text
a -> MatchmakingConfiguration
s {$sel:gameSessionData:MatchmakingConfiguration' :: Maybe Text
gameSessionData = Maybe Text
a} :: MatchmakingConfiguration)
matchmakingConfiguration_gameSessionQueueArns :: Lens.Lens' MatchmakingConfiguration (Prelude.Maybe [Prelude.Text])
matchmakingConfiguration_gameSessionQueueArns :: Lens' MatchmakingConfiguration (Maybe [Text])
matchmakingConfiguration_gameSessionQueueArns = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\MatchmakingConfiguration' {Maybe [Text]
gameSessionQueueArns :: Maybe [Text]
$sel:gameSessionQueueArns:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe [Text]
gameSessionQueueArns} -> Maybe [Text]
gameSessionQueueArns) (\s :: MatchmakingConfiguration
s@MatchmakingConfiguration' {} Maybe [Text]
a -> MatchmakingConfiguration
s {$sel:gameSessionQueueArns:MatchmakingConfiguration' :: Maybe [Text]
gameSessionQueueArns = Maybe [Text]
a} :: MatchmakingConfiguration) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
matchmakingConfiguration_name :: Lens.Lens' MatchmakingConfiguration (Prelude.Maybe Prelude.Text)
matchmakingConfiguration_name :: Lens' MatchmakingConfiguration (Maybe Text)
matchmakingConfiguration_name = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\MatchmakingConfiguration' {Maybe Text
name :: Maybe Text
$sel:name:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe Text
name} -> Maybe Text
name) (\s :: MatchmakingConfiguration
s@MatchmakingConfiguration' {} Maybe Text
a -> MatchmakingConfiguration
s {$sel:name:MatchmakingConfiguration' :: Maybe Text
name = Maybe Text
a} :: MatchmakingConfiguration)
matchmakingConfiguration_notificationTarget :: Lens.Lens' MatchmakingConfiguration (Prelude.Maybe Prelude.Text)
matchmakingConfiguration_notificationTarget :: Lens' MatchmakingConfiguration (Maybe Text)
matchmakingConfiguration_notificationTarget = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\MatchmakingConfiguration' {Maybe Text
notificationTarget :: Maybe Text
$sel:notificationTarget:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe Text
notificationTarget} -> Maybe Text
notificationTarget) (\s :: MatchmakingConfiguration
s@MatchmakingConfiguration' {} Maybe Text
a -> MatchmakingConfiguration
s {$sel:notificationTarget:MatchmakingConfiguration' :: Maybe Text
notificationTarget = Maybe Text
a} :: MatchmakingConfiguration)
matchmakingConfiguration_requestTimeoutSeconds :: Lens.Lens' MatchmakingConfiguration (Prelude.Maybe Prelude.Natural)
matchmakingConfiguration_requestTimeoutSeconds :: Lens' MatchmakingConfiguration (Maybe Natural)
matchmakingConfiguration_requestTimeoutSeconds = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\MatchmakingConfiguration' {Maybe Natural
requestTimeoutSeconds :: Maybe Natural
$sel:requestTimeoutSeconds:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe Natural
requestTimeoutSeconds} -> Maybe Natural
requestTimeoutSeconds) (\s :: MatchmakingConfiguration
s@MatchmakingConfiguration' {} Maybe Natural
a -> MatchmakingConfiguration
s {$sel:requestTimeoutSeconds:MatchmakingConfiguration' :: Maybe Natural
requestTimeoutSeconds = Maybe Natural
a} :: MatchmakingConfiguration)
matchmakingConfiguration_ruleSetArn :: Lens.Lens' MatchmakingConfiguration (Prelude.Maybe Prelude.Text)
matchmakingConfiguration_ruleSetArn :: Lens' MatchmakingConfiguration (Maybe Text)
matchmakingConfiguration_ruleSetArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\MatchmakingConfiguration' {Maybe Text
ruleSetArn :: Maybe Text
$sel:ruleSetArn:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe Text
ruleSetArn} -> Maybe Text
ruleSetArn) (\s :: MatchmakingConfiguration
s@MatchmakingConfiguration' {} Maybe Text
a -> MatchmakingConfiguration
s {$sel:ruleSetArn:MatchmakingConfiguration' :: Maybe Text
ruleSetArn = Maybe Text
a} :: MatchmakingConfiguration)
matchmakingConfiguration_ruleSetName :: Lens.Lens' MatchmakingConfiguration (Prelude.Maybe Prelude.Text)
matchmakingConfiguration_ruleSetName :: Lens' MatchmakingConfiguration (Maybe Text)
matchmakingConfiguration_ruleSetName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\MatchmakingConfiguration' {Maybe Text
ruleSetName :: Maybe Text
$sel:ruleSetName:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe Text
ruleSetName} -> Maybe Text
ruleSetName) (\s :: MatchmakingConfiguration
s@MatchmakingConfiguration' {} Maybe Text
a -> MatchmakingConfiguration
s {$sel:ruleSetName:MatchmakingConfiguration' :: Maybe Text
ruleSetName = Maybe Text
a} :: MatchmakingConfiguration)
instance Data.FromJSON MatchmakingConfiguration where
parseJSON :: Value -> Parser MatchmakingConfiguration
parseJSON =
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Data.withObject
String
"MatchmakingConfiguration"
( \Object
x ->
Maybe Bool
-> Maybe Natural
-> Maybe Natural
-> Maybe BackfillMode
-> Maybe Text
-> Maybe POSIX
-> Maybe Text
-> Maybe Text
-> Maybe FlexMatchMode
-> Maybe [GameProperty]
-> Maybe Text
-> Maybe [Text]
-> Maybe Text
-> Maybe Text
-> Maybe Natural
-> Maybe Text
-> Maybe Text
-> MatchmakingConfiguration
MatchmakingConfiguration'
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"AcceptanceRequired")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"AcceptanceTimeoutSeconds")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"AdditionalPlayerCount")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"BackfillMode")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"ConfigurationArn")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"CreationTime")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"CustomEventData")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"Description")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"FlexMatchMode")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"GameProperties" forall a. Parser (Maybe a) -> a -> Parser a
Data..!= forall a. Monoid a => a
Prelude.mempty)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"GameSessionData")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ( Object
x
forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"GameSessionQueueArns"
forall a. Parser (Maybe a) -> a -> Parser a
Data..!= forall a. Monoid a => a
Prelude.mempty
)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"Name")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"NotificationTarget")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"RequestTimeoutSeconds")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"RuleSetArn")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"RuleSetName")
)
instance Prelude.Hashable MatchmakingConfiguration where
hashWithSalt :: Int -> MatchmakingConfiguration -> Int
hashWithSalt Int
_salt MatchmakingConfiguration' {Maybe Bool
Maybe Natural
Maybe [Text]
Maybe [GameProperty]
Maybe Text
Maybe POSIX
Maybe BackfillMode
Maybe FlexMatchMode
ruleSetName :: Maybe Text
ruleSetArn :: Maybe Text
requestTimeoutSeconds :: Maybe Natural
notificationTarget :: Maybe Text
name :: Maybe Text
gameSessionQueueArns :: Maybe [Text]
gameSessionData :: Maybe Text
gameProperties :: Maybe [GameProperty]
flexMatchMode :: Maybe FlexMatchMode
description :: Maybe Text
customEventData :: Maybe Text
creationTime :: Maybe POSIX
configurationArn :: Maybe Text
backfillMode :: Maybe BackfillMode
additionalPlayerCount :: Maybe Natural
acceptanceTimeoutSeconds :: Maybe Natural
acceptanceRequired :: Maybe Bool
$sel:ruleSetName:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe Text
$sel:ruleSetArn:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe Text
$sel:requestTimeoutSeconds:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe Natural
$sel:notificationTarget:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe Text
$sel:name:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe Text
$sel:gameSessionQueueArns:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe [Text]
$sel:gameSessionData:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe Text
$sel:gameProperties:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe [GameProperty]
$sel:flexMatchMode:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe FlexMatchMode
$sel:description:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe Text
$sel:customEventData:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe Text
$sel:creationTime:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe POSIX
$sel:configurationArn:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe Text
$sel:backfillMode:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe BackfillMode
$sel:additionalPlayerCount:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe Natural
$sel:acceptanceTimeoutSeconds:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe Natural
$sel:acceptanceRequired:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe Bool
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
acceptanceRequired
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Natural
acceptanceTimeoutSeconds
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Natural
additionalPlayerCount
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe BackfillMode
backfillMode
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
configurationArn
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe POSIX
creationTime
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
customEventData
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
description
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe FlexMatchMode
flexMatchMode
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [GameProperty]
gameProperties
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
gameSessionData
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [Text]
gameSessionQueueArns
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
name
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
notificationTarget
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Natural
requestTimeoutSeconds
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
ruleSetArn
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
ruleSetName
instance Prelude.NFData MatchmakingConfiguration where
rnf :: MatchmakingConfiguration -> ()
rnf MatchmakingConfiguration' {Maybe Bool
Maybe Natural
Maybe [Text]
Maybe [GameProperty]
Maybe Text
Maybe POSIX
Maybe BackfillMode
Maybe FlexMatchMode
ruleSetName :: Maybe Text
ruleSetArn :: Maybe Text
requestTimeoutSeconds :: Maybe Natural
notificationTarget :: Maybe Text
name :: Maybe Text
gameSessionQueueArns :: Maybe [Text]
gameSessionData :: Maybe Text
gameProperties :: Maybe [GameProperty]
flexMatchMode :: Maybe FlexMatchMode
description :: Maybe Text
customEventData :: Maybe Text
creationTime :: Maybe POSIX
configurationArn :: Maybe Text
backfillMode :: Maybe BackfillMode
additionalPlayerCount :: Maybe Natural
acceptanceTimeoutSeconds :: Maybe Natural
acceptanceRequired :: Maybe Bool
$sel:ruleSetName:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe Text
$sel:ruleSetArn:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe Text
$sel:requestTimeoutSeconds:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe Natural
$sel:notificationTarget:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe Text
$sel:name:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe Text
$sel:gameSessionQueueArns:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe [Text]
$sel:gameSessionData:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe Text
$sel:gameProperties:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe [GameProperty]
$sel:flexMatchMode:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe FlexMatchMode
$sel:description:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe Text
$sel:customEventData:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe Text
$sel:creationTime:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe POSIX
$sel:configurationArn:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe Text
$sel:backfillMode:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe BackfillMode
$sel:additionalPlayerCount:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe Natural
$sel:acceptanceTimeoutSeconds:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe Natural
$sel:acceptanceRequired:MatchmakingConfiguration' :: MatchmakingConfiguration -> Maybe Bool
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Bool
acceptanceRequired
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Natural
acceptanceTimeoutSeconds
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Natural
additionalPlayerCount
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe BackfillMode
backfillMode
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
configurationArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe POSIX
creationTime
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
customEventData
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
description
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe FlexMatchMode
flexMatchMode
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe [GameProperty]
gameProperties
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
gameSessionData
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe [Text]
gameSessionQueueArns
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
name
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
notificationTarget
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Natural
requestTimeoutSeconds
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
ruleSetArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
ruleSetName