{-# 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.IoT.Types.AuthorizerDescription where
import qualified Amazonka.Core as Core
import Amazonka.IoT.Types.AuthorizerStatus
import qualified Amazonka.Lens as Lens
import qualified Amazonka.Prelude as Prelude
data AuthorizerDescription = AuthorizerDescription'
{
AuthorizerDescription -> Maybe AuthorizerStatus
status :: Prelude.Maybe AuthorizerStatus,
AuthorizerDescription -> Maybe POSIX
lastModifiedDate :: Prelude.Maybe Core.POSIX,
AuthorizerDescription -> Maybe Bool
signingDisabled :: Prelude.Maybe Prelude.Bool,
AuthorizerDescription -> Maybe Text
authorizerName :: Prelude.Maybe Prelude.Text,
AuthorizerDescription -> Maybe Text
authorizerFunctionArn :: Prelude.Maybe Prelude.Text,
AuthorizerDescription -> Maybe Text
authorizerArn :: Prelude.Maybe Prelude.Text,
AuthorizerDescription -> Maybe POSIX
creationDate :: Prelude.Maybe Core.POSIX,
AuthorizerDescription -> Maybe (HashMap Text Text)
tokenSigningPublicKeys :: Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text),
AuthorizerDescription -> Maybe Text
tokenKeyName :: Prelude.Maybe Prelude.Text
}
deriving (AuthorizerDescription -> AuthorizerDescription -> Bool
(AuthorizerDescription -> AuthorizerDescription -> Bool)
-> (AuthorizerDescription -> AuthorizerDescription -> Bool)
-> Eq AuthorizerDescription
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: AuthorizerDescription -> AuthorizerDescription -> Bool
$c/= :: AuthorizerDescription -> AuthorizerDescription -> Bool
== :: AuthorizerDescription -> AuthorizerDescription -> Bool
$c== :: AuthorizerDescription -> AuthorizerDescription -> Bool
Prelude.Eq, ReadPrec [AuthorizerDescription]
ReadPrec AuthorizerDescription
Int -> ReadS AuthorizerDescription
ReadS [AuthorizerDescription]
(Int -> ReadS AuthorizerDescription)
-> ReadS [AuthorizerDescription]
-> ReadPrec AuthorizerDescription
-> ReadPrec [AuthorizerDescription]
-> Read AuthorizerDescription
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [AuthorizerDescription]
$creadListPrec :: ReadPrec [AuthorizerDescription]
readPrec :: ReadPrec AuthorizerDescription
$creadPrec :: ReadPrec AuthorizerDescription
readList :: ReadS [AuthorizerDescription]
$creadList :: ReadS [AuthorizerDescription]
readsPrec :: Int -> ReadS AuthorizerDescription
$creadsPrec :: Int -> ReadS AuthorizerDescription
Prelude.Read, Int -> AuthorizerDescription -> ShowS
[AuthorizerDescription] -> ShowS
AuthorizerDescription -> String
(Int -> AuthorizerDescription -> ShowS)
-> (AuthorizerDescription -> String)
-> ([AuthorizerDescription] -> ShowS)
-> Show AuthorizerDescription
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [AuthorizerDescription] -> ShowS
$cshowList :: [AuthorizerDescription] -> ShowS
show :: AuthorizerDescription -> String
$cshow :: AuthorizerDescription -> String
showsPrec :: Int -> AuthorizerDescription -> ShowS
$cshowsPrec :: Int -> AuthorizerDescription -> ShowS
Prelude.Show, (forall x. AuthorizerDescription -> Rep AuthorizerDescription x)
-> (forall x. Rep AuthorizerDescription x -> AuthorizerDescription)
-> Generic AuthorizerDescription
forall x. Rep AuthorizerDescription x -> AuthorizerDescription
forall x. AuthorizerDescription -> Rep AuthorizerDescription x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep AuthorizerDescription x -> AuthorizerDescription
$cfrom :: forall x. AuthorizerDescription -> Rep AuthorizerDescription x
Prelude.Generic)
newAuthorizerDescription ::
AuthorizerDescription
newAuthorizerDescription :: AuthorizerDescription
newAuthorizerDescription =
AuthorizerDescription' :: Maybe AuthorizerStatus
-> Maybe POSIX
-> Maybe Bool
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe POSIX
-> Maybe (HashMap Text Text)
-> Maybe Text
-> AuthorizerDescription
AuthorizerDescription'
{ $sel:status:AuthorizerDescription' :: Maybe AuthorizerStatus
status = Maybe AuthorizerStatus
forall a. Maybe a
Prelude.Nothing,
$sel:lastModifiedDate:AuthorizerDescription' :: Maybe POSIX
lastModifiedDate = Maybe POSIX
forall a. Maybe a
Prelude.Nothing,
$sel:signingDisabled:AuthorizerDescription' :: Maybe Bool
signingDisabled = Maybe Bool
forall a. Maybe a
Prelude.Nothing,
$sel:authorizerName:AuthorizerDescription' :: Maybe Text
authorizerName = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:authorizerFunctionArn:AuthorizerDescription' :: Maybe Text
authorizerFunctionArn = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:authorizerArn:AuthorizerDescription' :: Maybe Text
authorizerArn = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:creationDate:AuthorizerDescription' :: Maybe POSIX
creationDate = Maybe POSIX
forall a. Maybe a
Prelude.Nothing,
$sel:tokenSigningPublicKeys:AuthorizerDescription' :: Maybe (HashMap Text Text)
tokenSigningPublicKeys = Maybe (HashMap Text Text)
forall a. Maybe a
Prelude.Nothing,
$sel:tokenKeyName:AuthorizerDescription' :: Maybe Text
tokenKeyName = Maybe Text
forall a. Maybe a
Prelude.Nothing
}
authorizerDescription_status :: Lens.Lens' AuthorizerDescription (Prelude.Maybe AuthorizerStatus)
authorizerDescription_status :: (Maybe AuthorizerStatus -> f (Maybe AuthorizerStatus))
-> AuthorizerDescription -> f AuthorizerDescription
authorizerDescription_status = (AuthorizerDescription -> Maybe AuthorizerStatus)
-> (AuthorizerDescription
-> Maybe AuthorizerStatus -> AuthorizerDescription)
-> Lens
AuthorizerDescription
AuthorizerDescription
(Maybe AuthorizerStatus)
(Maybe AuthorizerStatus)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\AuthorizerDescription' {Maybe AuthorizerStatus
status :: Maybe AuthorizerStatus
$sel:status:AuthorizerDescription' :: AuthorizerDescription -> Maybe AuthorizerStatus
status} -> Maybe AuthorizerStatus
status) (\s :: AuthorizerDescription
s@AuthorizerDescription' {} Maybe AuthorizerStatus
a -> AuthorizerDescription
s {$sel:status:AuthorizerDescription' :: Maybe AuthorizerStatus
status = Maybe AuthorizerStatus
a} :: AuthorizerDescription)
authorizerDescription_lastModifiedDate :: Lens.Lens' AuthorizerDescription (Prelude.Maybe Prelude.UTCTime)
authorizerDescription_lastModifiedDate :: (Maybe UTCTime -> f (Maybe UTCTime))
-> AuthorizerDescription -> f AuthorizerDescription
authorizerDescription_lastModifiedDate = (AuthorizerDescription -> Maybe POSIX)
-> (AuthorizerDescription -> Maybe POSIX -> AuthorizerDescription)
-> Lens
AuthorizerDescription
AuthorizerDescription
(Maybe POSIX)
(Maybe POSIX)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\AuthorizerDescription' {Maybe POSIX
lastModifiedDate :: Maybe POSIX
$sel:lastModifiedDate:AuthorizerDescription' :: AuthorizerDescription -> Maybe POSIX
lastModifiedDate} -> Maybe POSIX
lastModifiedDate) (\s :: AuthorizerDescription
s@AuthorizerDescription' {} Maybe POSIX
a -> AuthorizerDescription
s {$sel:lastModifiedDate:AuthorizerDescription' :: Maybe POSIX
lastModifiedDate = Maybe POSIX
a} :: AuthorizerDescription) ((Maybe POSIX -> f (Maybe POSIX))
-> AuthorizerDescription -> f AuthorizerDescription)
-> ((Maybe UTCTime -> f (Maybe UTCTime))
-> Maybe POSIX -> f (Maybe POSIX))
-> (Maybe UTCTime -> f (Maybe UTCTime))
-> AuthorizerDescription
-> f AuthorizerDescription
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. AnIso POSIX POSIX UTCTime UTCTime
-> Iso (Maybe POSIX) (Maybe POSIX) (Maybe UTCTime) (Maybe UTCTime)
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 AnIso POSIX POSIX UTCTime UTCTime
forall (a :: Format). Iso' (Time a) UTCTime
Core._Time
authorizerDescription_signingDisabled :: Lens.Lens' AuthorizerDescription (Prelude.Maybe Prelude.Bool)
authorizerDescription_signingDisabled :: (Maybe Bool -> f (Maybe Bool))
-> AuthorizerDescription -> f AuthorizerDescription
authorizerDescription_signingDisabled = (AuthorizerDescription -> Maybe Bool)
-> (AuthorizerDescription -> Maybe Bool -> AuthorizerDescription)
-> Lens
AuthorizerDescription
AuthorizerDescription
(Maybe Bool)
(Maybe Bool)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\AuthorizerDescription' {Maybe Bool
signingDisabled :: Maybe Bool
$sel:signingDisabled:AuthorizerDescription' :: AuthorizerDescription -> Maybe Bool
signingDisabled} -> Maybe Bool
signingDisabled) (\s :: AuthorizerDescription
s@AuthorizerDescription' {} Maybe Bool
a -> AuthorizerDescription
s {$sel:signingDisabled:AuthorizerDescription' :: Maybe Bool
signingDisabled = Maybe Bool
a} :: AuthorizerDescription)
authorizerDescription_authorizerName :: Lens.Lens' AuthorizerDescription (Prelude.Maybe Prelude.Text)
authorizerDescription_authorizerName :: (Maybe Text -> f (Maybe Text))
-> AuthorizerDescription -> f AuthorizerDescription
authorizerDescription_authorizerName = (AuthorizerDescription -> Maybe Text)
-> (AuthorizerDescription -> Maybe Text -> AuthorizerDescription)
-> Lens
AuthorizerDescription
AuthorizerDescription
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\AuthorizerDescription' {Maybe Text
authorizerName :: Maybe Text
$sel:authorizerName:AuthorizerDescription' :: AuthorizerDescription -> Maybe Text
authorizerName} -> Maybe Text
authorizerName) (\s :: AuthorizerDescription
s@AuthorizerDescription' {} Maybe Text
a -> AuthorizerDescription
s {$sel:authorizerName:AuthorizerDescription' :: Maybe Text
authorizerName = Maybe Text
a} :: AuthorizerDescription)
authorizerDescription_authorizerFunctionArn :: Lens.Lens' AuthorizerDescription (Prelude.Maybe Prelude.Text)
authorizerDescription_authorizerFunctionArn :: (Maybe Text -> f (Maybe Text))
-> AuthorizerDescription -> f AuthorizerDescription
authorizerDescription_authorizerFunctionArn = (AuthorizerDescription -> Maybe Text)
-> (AuthorizerDescription -> Maybe Text -> AuthorizerDescription)
-> Lens
AuthorizerDescription
AuthorizerDescription
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\AuthorizerDescription' {Maybe Text
authorizerFunctionArn :: Maybe Text
$sel:authorizerFunctionArn:AuthorizerDescription' :: AuthorizerDescription -> Maybe Text
authorizerFunctionArn} -> Maybe Text
authorizerFunctionArn) (\s :: AuthorizerDescription
s@AuthorizerDescription' {} Maybe Text
a -> AuthorizerDescription
s {$sel:authorizerFunctionArn:AuthorizerDescription' :: Maybe Text
authorizerFunctionArn = Maybe Text
a} :: AuthorizerDescription)
authorizerDescription_authorizerArn :: Lens.Lens' AuthorizerDescription (Prelude.Maybe Prelude.Text)
authorizerDescription_authorizerArn :: (Maybe Text -> f (Maybe Text))
-> AuthorizerDescription -> f AuthorizerDescription
authorizerDescription_authorizerArn = (AuthorizerDescription -> Maybe Text)
-> (AuthorizerDescription -> Maybe Text -> AuthorizerDescription)
-> Lens
AuthorizerDescription
AuthorizerDescription
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\AuthorizerDescription' {Maybe Text
authorizerArn :: Maybe Text
$sel:authorizerArn:AuthorizerDescription' :: AuthorizerDescription -> Maybe Text
authorizerArn} -> Maybe Text
authorizerArn) (\s :: AuthorizerDescription
s@AuthorizerDescription' {} Maybe Text
a -> AuthorizerDescription
s {$sel:authorizerArn:AuthorizerDescription' :: Maybe Text
authorizerArn = Maybe Text
a} :: AuthorizerDescription)
authorizerDescription_creationDate :: Lens.Lens' AuthorizerDescription (Prelude.Maybe Prelude.UTCTime)
authorizerDescription_creationDate :: (Maybe UTCTime -> f (Maybe UTCTime))
-> AuthorizerDescription -> f AuthorizerDescription
authorizerDescription_creationDate = (AuthorizerDescription -> Maybe POSIX)
-> (AuthorizerDescription -> Maybe POSIX -> AuthorizerDescription)
-> Lens
AuthorizerDescription
AuthorizerDescription
(Maybe POSIX)
(Maybe POSIX)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\AuthorizerDescription' {Maybe POSIX
creationDate :: Maybe POSIX
$sel:creationDate:AuthorizerDescription' :: AuthorizerDescription -> Maybe POSIX
creationDate} -> Maybe POSIX
creationDate) (\s :: AuthorizerDescription
s@AuthorizerDescription' {} Maybe POSIX
a -> AuthorizerDescription
s {$sel:creationDate:AuthorizerDescription' :: Maybe POSIX
creationDate = Maybe POSIX
a} :: AuthorizerDescription) ((Maybe POSIX -> f (Maybe POSIX))
-> AuthorizerDescription -> f AuthorizerDescription)
-> ((Maybe UTCTime -> f (Maybe UTCTime))
-> Maybe POSIX -> f (Maybe POSIX))
-> (Maybe UTCTime -> f (Maybe UTCTime))
-> AuthorizerDescription
-> f AuthorizerDescription
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. AnIso POSIX POSIX UTCTime UTCTime
-> Iso (Maybe POSIX) (Maybe POSIX) (Maybe UTCTime) (Maybe UTCTime)
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 AnIso POSIX POSIX UTCTime UTCTime
forall (a :: Format). Iso' (Time a) UTCTime
Core._Time
authorizerDescription_tokenSigningPublicKeys :: Lens.Lens' AuthorizerDescription (Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text))
authorizerDescription_tokenSigningPublicKeys :: (Maybe (HashMap Text Text) -> f (Maybe (HashMap Text Text)))
-> AuthorizerDescription -> f AuthorizerDescription
authorizerDescription_tokenSigningPublicKeys = (AuthorizerDescription -> Maybe (HashMap Text Text))
-> (AuthorizerDescription
-> Maybe (HashMap Text Text) -> AuthorizerDescription)
-> Lens
AuthorizerDescription
AuthorizerDescription
(Maybe (HashMap Text Text))
(Maybe (HashMap Text Text))
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\AuthorizerDescription' {Maybe (HashMap Text Text)
tokenSigningPublicKeys :: Maybe (HashMap Text Text)
$sel:tokenSigningPublicKeys:AuthorizerDescription' :: AuthorizerDescription -> Maybe (HashMap Text Text)
tokenSigningPublicKeys} -> Maybe (HashMap Text Text)
tokenSigningPublicKeys) (\s :: AuthorizerDescription
s@AuthorizerDescription' {} Maybe (HashMap Text Text)
a -> AuthorizerDescription
s {$sel:tokenSigningPublicKeys:AuthorizerDescription' :: Maybe (HashMap Text Text)
tokenSigningPublicKeys = Maybe (HashMap Text Text)
a} :: AuthorizerDescription) ((Maybe (HashMap Text Text) -> f (Maybe (HashMap Text Text)))
-> AuthorizerDescription -> f AuthorizerDescription)
-> ((Maybe (HashMap Text Text) -> f (Maybe (HashMap Text Text)))
-> Maybe (HashMap Text Text) -> f (Maybe (HashMap Text Text)))
-> (Maybe (HashMap Text Text) -> f (Maybe (HashMap Text Text)))
-> AuthorizerDescription
-> f AuthorizerDescription
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. AnIso
(HashMap Text Text)
(HashMap Text Text)
(HashMap Text Text)
(HashMap Text Text)
-> Iso
(Maybe (HashMap Text Text))
(Maybe (HashMap Text Text))
(Maybe (HashMap Text Text))
(Maybe (HashMap Text Text))
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 AnIso
(HashMap Text Text)
(HashMap Text Text)
(HashMap Text Text)
(HashMap Text Text)
forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
authorizerDescription_tokenKeyName :: Lens.Lens' AuthorizerDescription (Prelude.Maybe Prelude.Text)
authorizerDescription_tokenKeyName :: (Maybe Text -> f (Maybe Text))
-> AuthorizerDescription -> f AuthorizerDescription
authorizerDescription_tokenKeyName = (AuthorizerDescription -> Maybe Text)
-> (AuthorizerDescription -> Maybe Text -> AuthorizerDescription)
-> Lens
AuthorizerDescription
AuthorizerDescription
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\AuthorizerDescription' {Maybe Text
tokenKeyName :: Maybe Text
$sel:tokenKeyName:AuthorizerDescription' :: AuthorizerDescription -> Maybe Text
tokenKeyName} -> Maybe Text
tokenKeyName) (\s :: AuthorizerDescription
s@AuthorizerDescription' {} Maybe Text
a -> AuthorizerDescription
s {$sel:tokenKeyName:AuthorizerDescription' :: Maybe Text
tokenKeyName = Maybe Text
a} :: AuthorizerDescription)
instance Core.FromJSON AuthorizerDescription where
parseJSON :: Value -> Parser AuthorizerDescription
parseJSON =
String
-> (Object -> Parser AuthorizerDescription)
-> Value
-> Parser AuthorizerDescription
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Core.withObject
String
"AuthorizerDescription"
( \Object
x ->
Maybe AuthorizerStatus
-> Maybe POSIX
-> Maybe Bool
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe POSIX
-> Maybe (HashMap Text Text)
-> Maybe Text
-> AuthorizerDescription
AuthorizerDescription'
(Maybe AuthorizerStatus
-> Maybe POSIX
-> Maybe Bool
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe POSIX
-> Maybe (HashMap Text Text)
-> Maybe Text
-> AuthorizerDescription)
-> Parser (Maybe AuthorizerStatus)
-> Parser
(Maybe POSIX
-> Maybe Bool
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe POSIX
-> Maybe (HashMap Text Text)
-> Maybe Text
-> AuthorizerDescription)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x Object -> Text -> Parser (Maybe AuthorizerStatus)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"status")
Parser
(Maybe POSIX
-> Maybe Bool
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe POSIX
-> Maybe (HashMap Text Text)
-> Maybe Text
-> AuthorizerDescription)
-> Parser (Maybe POSIX)
-> Parser
(Maybe Bool
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe POSIX
-> Maybe (HashMap Text Text)
-> Maybe Text
-> AuthorizerDescription)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe POSIX)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"lastModifiedDate")
Parser
(Maybe Bool
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe POSIX
-> Maybe (HashMap Text Text)
-> Maybe Text
-> AuthorizerDescription)
-> Parser (Maybe Bool)
-> Parser
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe POSIX
-> Maybe (HashMap Text Text)
-> Maybe Text
-> AuthorizerDescription)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Bool)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"signingDisabled")
Parser
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe POSIX
-> Maybe (HashMap Text Text)
-> Maybe Text
-> AuthorizerDescription)
-> Parser (Maybe Text)
-> Parser
(Maybe Text
-> Maybe Text
-> Maybe POSIX
-> Maybe (HashMap Text Text)
-> Maybe Text
-> AuthorizerDescription)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"authorizerName")
Parser
(Maybe Text
-> Maybe Text
-> Maybe POSIX
-> Maybe (HashMap Text Text)
-> Maybe Text
-> AuthorizerDescription)
-> Parser (Maybe Text)
-> Parser
(Maybe Text
-> Maybe POSIX
-> Maybe (HashMap Text Text)
-> Maybe Text
-> AuthorizerDescription)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"authorizerFunctionArn")
Parser
(Maybe Text
-> Maybe POSIX
-> Maybe (HashMap Text Text)
-> Maybe Text
-> AuthorizerDescription)
-> Parser (Maybe Text)
-> Parser
(Maybe POSIX
-> Maybe (HashMap Text Text)
-> Maybe Text
-> AuthorizerDescription)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"authorizerArn")
Parser
(Maybe POSIX
-> Maybe (HashMap Text Text)
-> Maybe Text
-> AuthorizerDescription)
-> Parser (Maybe POSIX)
-> Parser
(Maybe (HashMap Text Text) -> Maybe Text -> AuthorizerDescription)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe POSIX)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"creationDate")
Parser
(Maybe (HashMap Text Text) -> Maybe Text -> AuthorizerDescription)
-> Parser (Maybe (HashMap Text Text))
-> Parser (Maybe Text -> AuthorizerDescription)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ( Object
x Object -> Text -> Parser (Maybe (Maybe (HashMap Text Text)))
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"tokenSigningPublicKeys"
Parser (Maybe (Maybe (HashMap Text Text)))
-> Maybe (HashMap Text Text) -> Parser (Maybe (HashMap Text Text))
forall a. Parser (Maybe a) -> a -> Parser a
Core..!= Maybe (HashMap Text Text)
forall a. Monoid a => a
Prelude.mempty
)
Parser (Maybe Text -> AuthorizerDescription)
-> Parser (Maybe Text) -> Parser AuthorizerDescription
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"tokenKeyName")
)
instance Prelude.Hashable AuthorizerDescription
instance Prelude.NFData AuthorizerDescription